#!/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 options
FLG_F=0

while getopts f OPT
do
  case $OPT in
    "f" ) FLG_F=1 ;;
  esac
done

shift `expr $OPTIND - 1`

# check args
if [ $# -lt 1 ]; then
	echo "usage lxcf stop [-f] LXCNAME"
	exit 1
fi

# stop one container
lxcf_stop1() {
  LXCNAME=$1

  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

  LSTATE=`LANG=C /usr/bin/virsh -c lxc:/// list | /usr/bin/awk '($2 == "'${LXCNAME}'"){print $3}'`

  if [ x${LSTATE} == x ] ; then
	echo "error:" $LXCNAME "is not a container name that does not exist."
        echo "        The container name must be alphanumeric character, \"-\", and \"_\"."
  	exit -1
  fi

  echo $LXCNAME "is being shutdown"

  if [ x${LSTATE} == x"paused" ] ; then
	/usr/bin/virsh -c lxc:/// resume ${LXCNAME} >& /dev/null
  fi

  if [ ${FLG_F} -ne 1 ] ; then
	/usr/bin/virsh -c lxc:/// shutdown ${LXCNAME} >& /dev/null
  else
	/usr/bin/virsh -c lxc:/// destroy ${LXCNAME} >& /dev/null
  fi


  while sleep 1
  do
    LSTATE=`LANG=C /usr/bin/virsh -c lxc:/// list | /usr/bin/awk '($2 == "'${LXCNAME}'"){print $3}'`
    if [ -z "$LSTATE" ] ; then
      break;
    fi
  done

  echo $LXCNAME "is stopped"
}

# stop containers of args
for i in $*
do
  lxcf_stop1 $i
done

exit 0

