#!/bin/sh
# copyright (C) 2013-2014 FUJITSU LIMITED All Rights Reserved

# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; version 2
# of the License.
# 
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
# 
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  
# 02110-1301, USA.

# check root
if [ ${EUID:-${UID}} != 0 ]; then
    echo "error: Because you are not root, you cannot execute this command. "
    exit 1
fi

# check option
FLG_Q=0

while getopts q OPT ; do
  case $OPT in
  q) FLG_Q=1 ;;
  esac
done
shift $((OPTIND - 1))

if [ $FLG_Q -eq 1 ]; then
	exec /usr/lib64/lxcf/lxcf-queue-list $*
fi


print_list() {

	LNAME=`cut -d ' ' -f 1 /etc/lxcf/rsc/${LXCNAME}/container_name`
	LMODEL=`cut -d ' ' -f 2 /etc/lxcf/rsc/${LXCNAME}/container_name`
	LSTATE=`LANG=C /usr/bin/virsh -c lxc:/// list | /usr/bin/awk '($2 == "'${LXCNAME}'"){print $3}'`
	if [ -z "${LSTATE}"  ]; then
		LSTATE="stopped";
	fi
	if [ -f /etc/lxcf/rsc/${LXCNAME}/autostart ]; then
		AUTOSTART="y"
	else
		AUTOSTART="n"
	fi
	LPATH=`readlink -f /opt/lxcf/${LXCNAME}`
	printf "%s\t\t%s    \t%s\t  %s\t      %s\n" ${LNAME} ${LMODEL} ${LSTATE} ${AUTOSTART} ${LPATH}
}


lsdir() {
  ls -f --ind=none $1 | sed '/^\.\{1,2\}$/d'
}


# When uuid is specified, the container name is returned. 
uuid2name() {
  NAME=$1
  if [ -d /opt/lxcf/${NAME} ]; then
    echo -n $NAME
    return
  fi
  for i in `lsdir /etc/lxcf/rsc`
  do
     if [ x$NAME == x`cat /etc/lxcf/rsc/${i}/uuid` ]; then
       echo -n $i
       return
     fi
  done
  echo -n $NAME
}

printf "Name\t\tMode    \tState\t  Autostart    Path\n"
echo   "-------------------------------------------------------------------------"

if [ $# -eq 0 ] ; then
  for LXCNAME in `ls -1 /opt/lxcf/`
  do
	# compatibility with old release
	if [ ! -f /etc/lxcf/rsc/${LXCNAME}/container_name ]; then
		if [ -f /opt/lxcf/${LXCNAME}/etc/lxcf/container_name ]; then
			cp -p /opt/lxcf/${LXCNAME}/etc/lxcf/container_name \
				/etc/lxcf/rsc/${LXCNAME}/container_name
		fi
	fi

	if [ -e /etc/lxcf/rsc/${LXCNAME}/container_name  ] ; then
		print_list 
	fi
  done
else
  for LXCNAME in $*
  do
    LXCNAME=`uuid2name $LXCNAME`
    if ! /usr/lib64/lxcf/lxcf-parmchk-cname $LXCNAME ; then
      echo "error:" $LXCNAME "is not a container name"
      echo "        The container name must be alphanumeric character, \"-\", and \"_\"."
      exit 1
    fi

    if [ ! -e /opt/lxcf/${LXCNAME} ] ; then
      echo "error:" $LXCNAME "is the unknown container name"
      exit 1
    fi

    # compatibility with old release
    if [ ! -f /etc/lxcf/rsc/${LXCNAME}/container_name ]; then
		if [-f /opt/lxcf/${LXCNAME}/etc/lxcf/container_name ]; then
			cp -p /opt/lxcf/${LXCNAME}/etc/lxcf/container_name \
			/etc/lxcf/rsc/${LXCNAME}/container_name
		fi
    fi

    if [ -e /etc/lxcf/rsc/${LXCNAME}/container_name ] ; then
		print_list
    fi
  done
fi

exit 0

