fix ipv6 0.0.0.0 to ::, the equivalent ip

add ifname to arguments for checkConfig_Sles
update routeop with device based routing
2014-04-04 01:19:09 +01:00 · 2014-04-02 09:59:22 +01:00 · 2014-04-02 09:43:15 +01:00 · 2014-04-01 22:20:37 +01:00 · 2014-04-01 16:16:14 +01:00 · 2014-03-27 13:33:30 -04:00
1889 changed files with 98917 additions and 54219 deletions
@@ -1,14 +0,0 @@
-xCAT - eXtreme Cloud Administration Toolkit
-
-xCAT is a toolkit for the deployment and administration of clusters.
-
-xCAT documentation is available at: http://xcat.sourceforge.net/
-
-xCAT is made available as open source software under the EPL license:
-http://www.opensource.org/licenses/eclipse-1.0.php
-
-
-
-
-
-
@@ -1 +1 @@
-2.10
+2.8.4
@@ -68,7 +68,7 @@ function makedeb {
 }

 # build all debian packages
-packages="xCAT-client xCAT-nbroot xCAT-nbroot2 perl-xCAT xCAT-server xCAT-UI xCAT xCATsn xCAT-test xCAT-IBMhpc xCAT-rmc xCAT-vlan xCAT-confluent"
+packages="xCAT-client xCAT-nbroot xCAT-nbroot2 perl-xCAT xCAT-server xCAT-UI xCAT xCATsn xCAT-test xCAT-IBMhpc xCAT-rmc"

 for file in `echo $packages`
 do
@@ -53,7 +53,7 @@ for i in $*; do
 done

 # Supported distributions
-dists="saucy trusty utopic"
+dists="maverick natty oneiric precise saucy"

 c_flag=            # xcat-core (trunk-delvel) path
 d_flag=            # xcat-dep (trunk) path
@@ -86,7 +86,7 @@ if [ "$c_flag" -a "$d_flag" ];then
    exit 2
 fi

-uploader="ligc"
+uploader="bp-sawyers"
 # Find where this script is located to set some build variables
 old_pwd=`pwd`
 cd `dirname $0`
@@ -194,39 +194,27 @@ then
        if [ ! -d ../../$package_dir_name ];then
            mkdir -p "../../$package_dir_name"
        fi
-        packages="xCAT-client xCAT-genesis-scripts perl-xCAT xCAT-server xCAT xCATsn xCAT-test xCAT-buildkit xCAT-vlan xCAT-confluent"
-        target_archs=(amd64 ppc64el)
+        packages="xCAT-client xCAT-genesis-scripts perl-xCAT xCAT-server xCAT-UI xCAT xCATsn xCAT-test xCAT-OpenStack xCAT-OpenStack-baremetal"
+
        for file in `echo $packages`
        do
            file_low=`echo $file | tr '[A-Z]' '[a-z]'`
-            if [ "$file" = "xCAT" -o "$file" = "xCAT-genesis-scripts" ]; then
-                target_archs="amd64 ppc64el"
-            else
-                target_archs="all"
-            fi
-            for target_arch in `echo $target_archs`
-            do
-                if grep -q $file $update_log || [ "$BUILDALL" == 1 -o "$file" = "perl-xCAT" ]; then
-                    rm -f ../../$package_dir_name/${file_low}_*.$target_arch.deb
-                    #genesis scripts package, don't remove genesis amd64 files
-                    #rm -f ../../$package_dir_name/${file_low}-amd64_*.deb
-                    cd $file
-                    dch -v $pkg_version -b -c debian/changelog $build_string
-                    if [ "$target_arch" = "all" ]; then
-                        dpkg-buildpackage -uc -us
-                    else
-                        dpkg-buildpackage -uc -us -a$target_arch
-                    fi
-                    rc=$?
-                    if [ $rc -gt 0 ]; then
-                        echo "Error: $file build package failed exit code $rc"
-                    fi
-                    cd -
-                    find $file -maxdepth 3 -type d -name "${file_low}*" | grep debian | xargs rm -rf
-                    find $file -maxdepth 3 -type f -name "files" | grep debian | xargs rm -rf
-                    mv ${file_low}* ../../$package_dir_name/
+            if grep -q $file $update_log || [ "$BUILDALL" == 1 -o "$file" = "perl-xCAT" ]; then
+                rm -f ../../$package_dir_name/${file_low}_*.deb
+                #only for genesis package
+                rm -f ../../$package_dir_name/${file_low}-amd64_*.deb
+                cd $file
+                dch -v $pkg_version -b -c debian/changelog $build_string
+                dpkg-buildpackage -uc -us
+                rc=$?
+                if [ $rc -gt 0 ]; then
+                    echo "Error: $file build package failed exit code $rc"
                fi
-            done
+                cd -
+                find $file -maxdepth 3 -type d -name "${file_low}*" | grep debian | xargs rm -rf
+                find $file -maxdepth 3 -type f -name "files" | grep debian | xargs rm -rf
+                mv ${file_low}* ../../$package_dir_name/
+            fi
        done

        find ../../$package_dir_name/* ! -name *.deb | xargs rm -f
@@ -262,16 +250,11 @@ then
    mkdir conf

    for dist in $dists; do
-       if [ "$dist" = "trusty" ] || [ "$dist" = "utopic" ]; then
-           tmp_out_arch="amd64 ppc64el"
-       else
-           tmp_out_arch="amd64"
-       fi
       cat << __EOF__ >> conf/distributions
 Origin: xCAT internal repository
 Label: xcat-core bazaar repository
 Codename: $dist
-Architectures: $tmp_out_arch
+Architectures: amd64 
 Components: main
 Description: Repository automatically genereted conf 
 SignWith: yes
@@ -286,29 +269,17 @@ basedir .
 __EOF__

    #import the deb packages into the repo
-    amd_files=`ls ../$package_dir_name/*.deb | grep -v "ppc64el"`
-    all_files=`ls ../$package_dir_name/*.deb`
    for dist in $dists; do
-      if [ "$dist" = "trusty" ] || [ "$dist" = "utopic" ]; then
-          deb_files=$all_files
-      else
-          deb_files=$amd_files
-      fi
-      for file in $deb_files; do
+      for file in `ls ../$package_dir_name/*.deb`; do
 	reprepro -b ./ includedeb $dist $file;
      done
    done
+
    #create the mklocalrepo script
    cat << '__EOF__' > mklocalrepo.sh
 . /etc/lsb-release
 cd `dirname $0`
-host_arch=`uname -m`
-if [ "$host_arch" != "ppc64le" ];then
-    host_arch="amd64"
-else
-    host_arch="ppc64el"
-fi
-echo deb [arch=$host_arch] file://"`pwd`" $DISTRIB_CODENAME main > /etc/apt/sources.list.d/xcat-core.list
+echo deb file://"`pwd`" $DISTRIB_CODENAME main > /etc/apt/sources.list.d/xcat-core.list
 __EOF__

    chmod 775 mklocalrepo.sh
@@ -382,16 +353,11 @@ then

    #create the conf/distributions file
    for dist in $dists; do
-       if [ "$dist" = "trusty" ] || [ "$dist" = "utopic" ]; then
-           tmp_out_arch="amd64 ppc64el"
-       else 
-           tmp_out_arch="amd64"
-       fi
        cat << __EOF__ >> conf/distributions
 Origin: xCAT internal repository
 Label: xcat-dep bazaar repository
 Codename: $dist
-Architectures: $tmp_out_arch
+Architectures: amd64 
 Components: main
 Description: Repository automatically genereted conf 
 SignWith: yes
@@ -405,16 +371,8 @@ ask-passphrase
 basedir .
 __EOF__

-    #import the deb packages into the repo
-    amd_files=`ls ../debs/*.deb | grep -v "ppc64el"`
-    all_files=`ls ../debs/*.deb`
    for dist in $dists; do
-      if [ "$dist" = "trusty" ] || [ "$dist" = "utopic" ]; then
-          deb_files=$all_files
-      else
-          deb_files=$amd_files
-      fi
-      for file in $deb_files; do
+      for file in `ls ../debs/*.deb`; do
 	reprepro -b ./ includedeb $dist $file;
      done
    done
@@ -422,13 +380,7 @@ __EOF__
    cat << '__EOF__' > mklocalrepo.sh
 . /etc/lsb-release
 cd `dirname $0`
-host_arch=`uname -m`
-if [ "$host_arch" != "ppc64le" ];then
-    host_arch="amd64"
-else
-    host_arch="ppc64el"
-fi
-echo deb [arch=$host_arch] file://"`pwd`" $DISTRIB_CODENAME main > /etc/apt/sources.list.d/xcat-dep.list
+echo deb file://"`pwd`" $DISTRIB_CODENAME main > /etc/apt/sources.list.d/xcat-dep.list
 __EOF__

    chmod 775 mklocalrepo.sh
@@ -444,7 +396,7 @@ __EOF__
    chmod -R g+w xcat-dep

    #create the tar ball
-    dep_tar_name=xcat-dep-ubuntu-snap`date +%Y%m%d`.tar.bz
+    dep_tar_name=xcat-dep-ubuntu.tar.bz
    tar -hjcf $dep_tar_name xcat-dep
    chgrp root $dep_tar_name
    chmod g+w $dep_tar_name
@@ -12,44 +12,40 @@
 #    at https://sourceforge.net/account/ssh
 #  - On Linux:  make sure createrepo is installed on the build machine
 #  - On AIX:  Install openssl and openssh installp pkgs and run updtvpkg.  Install from http://www.perzl.org/aix/ :
-#        apr, apr-util, bash, bzip2, db4, expat, gdbm, gettext, glib2, gmp, info, libidn, neon, openssl (won't
-#        conflict with the installp version - but i don't think you need this), pcre, perl-DBD-SQLite, perl-DBI,
-#        popt, python, readline, rsynce, sqlite, subversion, unixODBC, zlib.  
-#        Install wget from http://www-03.ibm.com/systems/power/software/aix/linux/toolbox/alpha.html
+#			apr, apr-util, bash, bzip2, db4, expat, gdbm, gettext, glib2, gmp, info, libidn, neon, openssl (won't
+#			conflict with the installp version - but i don't think you need this), pcre, perl-DBD-SQLite, perl-DBI,
+#           popt, python, readline, rsynce, sqlite, subversion, unixODBC, zlib.  Install wget from http://www-03.ibm.com/systems/power/software/aix/linux/toolbox/alpha.html
 #  - Run this script from the local svn repository you just created.  It will create the other
 #    directories that are needed.

 # Usage:  buildcore.sh [attr=value attr=value ...]
-#    Before running buildcore.sh, you must change the local git repo to the branch you want built, using: git checkout <branch>
-#        PROMOTE=1 - if the attribute "PROMOTE" is specified, means an official dot release.  This does not actually build
-#                    xcat, just uploads the most recent snap build to https://sourceforge.net/projects/xcat/files/xcat/ .
-#                    If not specified, a snap build is assumed, which uploads to https://sourceforge.net/projects/xcat/files/yum/
-#                    or https://sourceforge.net/projects/xcat/files/aix/.
-#        PREGA=1 - use this option with PROMOTE=1 on a branch that already has a released dot release, but this build is
-#                  a GA candidate build, not to be released yet.  This will result in the tarball being uploaded to
-#                  https://sourceforge.net/projects/xcat/files/yum/ or https://sourceforge.net/projects/xcat/files/aix/
-#                  (but the tarball file name will be like a released tarball, not a snap build).  When you are ready to
-#                  release this build, use PROMOTE=1 without PREGA
-#        BUILDALL=1 - build all rpms, whether they changed or not.  Should be used for snap builds that are in prep for a release.
-#        UP=0 or UP=1 - override the default upload behavior 
-#        SVNUP=<filename> - control which rpms get built by specifying a coresvnup file
-#        GITUP=<filename> - control which rpms get built by specifying a coregitup file
-#        EMBED=<embedded-environment> - the environment for which a minimal version of xcat should be built, e.g. zvm or flex
-#        VERBOSE=1 - to see lots of verbose output
+#       Before running buildcore.sh, you must change the local git repo to the branch you want built, using: git checkout <branch>
+#		PROMOTE=1 - if the attribute "PROMOTE" is specified, means an official dot release.  This does not
+#					actually build xcat, just uploads the most recent snap build to https://sourceforge.net/projects/xcat/files/xcat/ .
+#					If not specified, a snap build is assumed, which uploads to https://sourceforge.net/projects/xcat/files/yum/
+#					or https://sourceforge.net/projects/xcat/files/aix/.
+#		PREGA=1 - use this option with PROMOTE=1 on a branch that already has a released dot release, but this build is
+#					a GA candidate build, not to be released yet.  This will result in the tarball being uploaded to
+#					https://sourceforge.net/projects/xcat/files/yum/ or https://sourceforge.net/projects/xcat/files/aix/
+#					(but the tarball file name will be like a released tarball, not a snap build).  When you are ready to
+#					release this build, use PROMOTE=1 without PREGA
+#		BUILDALL=1 - build all rpms, whether they changed or not.  Should be used for snap builds that are in prep for a release.
+# 		UP=0 or UP=1 - override the default upload behavior 
+# 		SVNUP=<filename> - control which rpms get built by specifying a coresvnup file
+# 		GITUP=<filename> - control which rpms get built by specifying a coregitup file
+#		EMBED=<embedded-environment> - the environment for which a minimal version of xcat should be built, e.g. zvm or flex
+#		VERBOSE=1 - to see lots of verbose output

 # you can change this if you need to
 UPLOADUSER=bp-sawyers
 FRS=/home/frs/project/x/xc/xcat

 # These are the rpms that should be built for each kind of xcat build
-ALLBUILD="perl-xCAT xCAT-client xCAT-server xCAT-test xCAT-buildkit xCAT xCATsn xCAT-genesis-scripts xCAT-SoftLayer xCAT-vlan xCAT-confluent"
+ALLBUILD="perl-xCAT xCAT-client xCAT-server xCAT-IBMhpc xCAT-rmc xCAT-UI xCAT-test xCAT-buildkit xCAT xCATsn xCAT-genesis-scripts xCAT-OpenStack xCAT-SoftLayer xCAT-OpenStack-baremetal"
 ZVMBUILD="perl-xCAT xCAT-server xCAT-UI"
 ZVMLINK="xCAT-client xCAT xCATsn"
-# xCAT and xCATsn have PCM specific configuration - conserver-xcat, syslinux-xcat
-# xCAT-server has PCM specific configuration - RESTAPI(perl-JSON) 
-# xCAT-client has PCM specific configuration - getxcatdocs(perl-JSON) 
-PCMBUILD="xCAT xCAT-server xCAT-client xCATsn"
-PCMLINK="perl-xCAT xCAT-buildkit xCAT-genesis-scripts-x86_64"
+PCMBUILD="xCAT"
+PCMLINK="perl-xCAT xCAT-client xCAT-server xCAT-buildkit xCAT-genesis-scripts-x86_64"
 # Note: for FSM, the FlexCAT rpm is built separately from gsa/git
 FSMBUILD="perl-xCAT xCAT-client xCAT-server"
 FSMLINK=""
@@ -241,13 +237,10 @@ if [ "$OSNAME" = "AIX" ]; then
 fi

 # Build the rest of the noarch rpms
-for rpmname in xCAT-client xCAT-server xCAT-IBMhpc xCAT-rmc xCAT-UI xCAT-test xCAT-buildkit xCAT-SoftLayer xCAT-vlan xCAT-confluent; do
+for rpmname in xCAT-client xCAT-server xCAT-IBMhpc xCAT-rmc xCAT-UI xCAT-test xCAT-buildkit xCAT-SoftLayer; do
 	#if [ "$EMBED" = "zvm" -a "$rpmname" != "xCAT-server" -a "$rpmname" != "xCAT-UI" ]; then continue; fi		# for zvm embedded env only need to build server and UI
 	if [[ " $EMBEDBUILD " != *\ $rpmname\ * ]]; then continue; fi
-	if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-buildkit" ]; then continue; fi  # do not build xCAT-buildkit on aix
-	if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-SoftLayer" ]; then continue; fi # do not build xCAT-softlayer on aix
-	if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-vlan" ]; then continue; fi      # do not build xCAT-vlan on aix
-	if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-confluent" ]; then continue; fi # do not build xCAT-confluent on aix
+	if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-buildkit" ]; then continue; fi		# do not build xCAT-buildkit on aix
 	if $GREP $rpmname $GITUP || [ "$BUILDALL" == 1 ]; then
 		UPLOAD=1
 		maker $rpmname
@@ -268,8 +261,6 @@ if [ "$OSNAME" != "AIX" ]; then
 			ORIGFAILEDRPMS="$FAILEDRPMS"
 			./makerpm xCAT-genesis-scripts x86_64 "$EMBED"
 			if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS xCAT-genesis-scripts-x86_64"; fi
-			./makerpm xCAT-genesis-scripts ppc64 "$EMBED"
-			if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS xCAT-genesis-scripts-ppc64"; fi
 			if [ "$FAILEDRPMS" = "$ORIGFAILEDRPMS" ]; then	# all succeeded
 				rm -f $DESTDIR/xCAT-genesis-scripts*rpm
 				rm -f $SRCDIR/xCAT-genesis-scripts*rpm
@@ -281,8 +272,7 @@ if [ "$OSNAME" != "AIX" ]; then
 fi

 # Build the xCAT and xCATsn rpms for all platforms
-#for rpmname in xCAT xCATsn xCAT-OpenStack xCAT-OpenStack-baremetal; do
-for rpmname in xCAT xCATsn; do 
+for rpmname in xCAT xCATsn xCAT-OpenStack xCAT-OpenStack-baremetal; do
 	#if [ "$EMBED" = "zvm" ]; then break; fi
 	if [[ " $EMBEDBUILD " != *\ $rpmname\ * ]]; then continue; fi
 	if [ $SOMETHINGCHANGED == 1 -o "$BUILDALL" == 1 ]; then		# used to be:  if $GREP -E "^[UAD] +$rpmname/" $GITUP; then
@@ -293,7 +283,7 @@ for rpmname in xCAT xCATsn; do
 			./makerpm $rpmname "$EMBED"
 			if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS $rpmname"; fi
 		else
-			for arch in x86_64 ppc64 ppc64le s390x; do
+			for arch in x86_64 ppc64 s390x; do
 				if [ "$rpmname" = "xCAT-OpenStack" -a "$arch" != "x86_64" ] || [ "$rpmname" = "xCAT-OpenStack-baremetal" -a "$arch" != "x86_64" ] ; then continue; fi 		# only bld openstack for x86_64 for now
 				./makerpm $rpmname $arch "$EMBED"
 				if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS $rpmname-$arch"; fi
@@ -362,7 +352,7 @@ if [ "$OSNAME" != "AIX" ]; then
 		echo '%_signature gpg' >> $MACROS
 	fi
 	if ! $GREP '%_gpg_name' $MACROS 2>/dev/null; then
-		echo '%_gpg_name xCAT Security Key' >> $MACROS
+		echo '%_gpg_name Jarrod Johnson' >> $MACROS
 	fi
 	echo "Signing RPMs..."
 	build-utils/rpmsign.exp `find $DESTDIR -type f -name '*.rpm'` | grep -v -E '(already contains identical signature|was already signed|rpm --quiet --resign|WARNING: standard input reopened)'
@@ -425,18 +415,7 @@ EOF
 #!/bin/sh
 cd `dirname $0`
 REPOFILE=`basename xCAT-*.repo`
-if [[ $REPOFILE == "xCAT-*.repo" ]]; then 
-    echo "ERROR: For xcat-dep, please execute $0 in the correct <os>/<arch> subdirectory"
-    exit 1
-fi
-#
-# default to RHEL yum, if doesn't exist try Zypper
-#
-DIRECTORY="/etc/yum.repos.d"
-if [[ ! -d ${DIRECTORY} ]]; then                                                                            
-    DIRECTORY="/etc/zypp/repos.d"                                                                           
-fi
-sed -e 's|baseurl=.*|baseurl=file://'"`pwd`"'|' $REPOFILE | sed -e 's|gpgkey=.*|gpgkey=file://'"`pwd`"'/repodata/repomd.xml.key|' > ${DIRECTORY}/$REPOFILE
+sed -e 's|baseurl=.*|baseurl=file://'"`pwd`"'|' $REPOFILE | sed -e 's|gpgkey=.*|gpgkey=file://'"`pwd`"'/repodata/repomd.xml.key|' > /etc/yum.repos.d/$REPOFILE
 cd -
 EOF2
 chmod 775 mklocalrepo.sh
@@ -516,9 +495,8 @@ if [ "$OSNAME" != "AIX" -a "$REL" = "devel" -a "$PROMOTE" != 1 -a -z "$EMBED" ];
 	rpm2cpio ../$XCATCORE/perl-xCAT-*.$NOARCH.rpm | cpio -id '*.html'
 	rpm2cpio ../$XCATCORE/xCAT-test-*.$NOARCH.rpm | cpio -id '*.html'
 	rpm2cpio ../$XCATCORE/xCAT-buildkit-*.$NOARCH.rpm | cpio -id '*.html'
-	#rpm2cpio ../$XCATCORE/xCAT-OpenStack-*.x86_64.rpm | cpio -id '*.html'
+	rpm2cpio ../$XCATCORE/xCAT-OpenStack-*.x86_64.rpm | cpio -id '*.html'
 	rpm2cpio ../$XCATCORE/xCAT-SoftLayer-*.$NOARCH.rpm | cpio -id '*.html'
-	rpm2cpio ../$XCATCORE/xCAT-vlan-*.$NOARCH.rpm | cpio -id '*.html'
 	i=0
 	while [ $((i+=1)) -le 5 ] && ! rsync $verboseflag -r opt/xcat/share/doc/man1 opt/xcat/share/doc/man3 opt/xcat/share/doc/man5 opt/xcat/share/doc/man7 opt/xcat/share/doc/man8 $UPLOADUSER,xcat@web.sourceforge.net:htdocs/
 	do : ; done
@@ -92,7 +92,7 @@ if [ "$OSNAME" != "AIX" ]; then
 		echo '%_signature gpg' >> $MACROS
 	fi
 	if ! $GREP -q '%_gpg_name' $MACROS 2>/dev/null; then
-		echo '%_gpg_name xCAT Security Key' >> $MACROS
+		echo '%_gpg_name Jarrod Johnson' >> $MACROS
 	fi

 	# Sign the rpms that are not already signed.  The "standard input reopened" warnings are normal.
@@ -138,21 +138,8 @@ if [ "$PERLVER" == "v5.8.2" ]; then
        OSVER='5.3'
 elif [ "$PERLVER" == "v5.8.8" ]; then
        OSVER='6.1'
-        aixver=`lslpp -lc|grep 'bos.rte:'|head -1|cut -d: -f3`
-                if [[ $aixver < '6.1.9.0' ]]; then
-                        AIX61Y=0
-                else
-                        AIX61Y=1
-                fi
 elif [ "$PERLVER" == "v5.10.1" ]; then
        OSVER='7.1'
-        aixver=`lslpp -lc|grep 'bos.rte:'|head -1|cut -d: -f3`
-		if [[ $aixver < '7.1.3.0' ]]; then
-			AIX71L=0
-		else
-			AIX71L=1
-		fi
-
 else
        echo "Error: the perl version of '$PERLVER' is not one that instoss understands.  Exiting..."
        exit 2
@@ -169,30 +156,33 @@ echo "Running updtvpkg. This could take a few minutes."
 /usr/sbin/updtvpkg
 echo "updtvpkg has completed."

-# unixODBC is required by pyodbc, so install it first
 rpm -Uvh unixODBC*
-# Now install the bulk of the rpms, one at a time, in case some are already installed
-for i in `ls *.rpm|grep -v -E '^tcl-|^tk-|^expect-|^unixODBC-|^xCAT-UI-deps|^perl-DBD-DB2Lite|^net-snmp'`; do
+for i in `ls *.rpm|grep -v -E '^tcl-|^tk-|^expect-|^unixODBC-|^xCAT-UI-deps|^perl-DBD-DB2Lite'`; do
 	if [ "$i" == "perl-Net-DNS-0.66-1.aix5.3.ppc.rpm" ]; then
 		opts="--nodeps"
 	else
 		opts=""
 	fi
-
-	# On 7.1L and 6.1Y we need a newer version of perl-Net_SSLeay.pm
-	if [[ $AIX71L -eq 1 || $AIX61Y -eq 1 ]]; then
-		if [[ $i == perl-Net_SSLeay.pm-1.30-* ]]; then continue; fi 	# skip the old rpm
-	else
-		if [[ $i == perl-Net_SSLeay.pm-1.55-* ]]; then continue; fi 	# skip the new rpm
-	fi
+	
+	# just in case we need it sometime, this next if stmt would mean: if it does not start with perl-DBD-DB2
+	#if [ "${i#perl-DBD-DB2}" == "$i" ]; then
 	
 	echo rpm -Uvh $opts $i
 	rpm -Uvh $opts $i
 done
-# Have to upgrade all of the net-snmp rpms together because they depend on each other.
-# Also, they require bash, so do it after the loop, rather than before
-rpm -Uvh net-snmp*
-
+# don't try to install tcl, tk, or expect if they are already installed!
+# this section about expect/tcl/tk can be removed once 2.8 releases, because 2.8 no longer requires expect
+lslpp -l | grep expect.base > /dev/null 2>&1
+if [ $? -gt 0 ]; then
+	if [ "$OSVER" == "5.3" ]; then
+		for i in tcl-*.rpm tk-*.rpm expect-*.rpm; do
+			echo rpm -Uvh $i
+			rpm -Uvh $i
+		done
+	else
+		echo "The expect.base, tcl.base, and tk.base filesets must also be installed before installing the xCAT RPMs from xcat-core."
+	fi
+fi
 EOF
 # end of instoss file content ---------------------------------------------

@@ -206,7 +196,7 @@ if [ "$OSNAME" == "AIX" ]; then
 else
 	SYSGRP=root
 fi
-chgrp -R -h $SYSGRP *
+chgrp -R $SYSGRP *
 chmod -R g+w *

 # Build the tarball
@@ -1,163 +0,0 @@
-#######################################################################
-#build script for local usage
-#used for Linux/AIX/Ubuntu
-#
-###########################################################################
-
-
-OSNAME=$(uname)
-NAMEALL=$(uname -a)
-
-for i in $*; do
-        # upper case the variable name
-        varstring=`echo "$i"|cut -d '=' -f 1|tr '[a-z]' '[A-Z]'`=`echo "$i"|cut -d '=' -f 2`
-        export $varstring
-done
-
-if [ -z "$CURDIR" ]; then
-   echo "get current directory!"
-   CURDIR=$(pwd)
-fi
-
-echo "CURDIR is $CURDIR"
-echo "OSNAME is $OSNAME!"
-echo "NAMEALL is $NAMEALL"
-
-grep -i 'SUSE' /etc/issue
-if [ $? -eq 0 ]; then
-   echo "This is a SUSE system!"
-   OS="SUSE";
-fi
-
-
-ls $CURDIR/makerpm
-
-if [ $? -gt 0 ]; then
-                echo "Error:no repo exist, exit 1."
-                exit 1 
-fi
-
-# Get a lock, so can not do 2 builds at once
-exec 8>/var/lock/xcatbld.lock
-if ! flock -n 8; then
-    echo "Can't get lock /var/lock/xcatbld.lock.  Someone else must be doing a build right now.  Exiting...."
-    exit 1
-fi
-
-#delete old package if there is
-rm -rf $CURDIR/build/
-cd $CURDIR
-
-echo "==============================================="
-echo $NAMEALL |  egrep "Ubuntu"
-
-#Check if it is an Ubuntu system
-if [ $? -eq 0 ]; then
-
-echo "This is an Ubuntu system"
-     pkg_type="snap"
-     build_string="Snap_Build"
-     cur_date=`date +%Y%m%d`
-     short_ver=`cat Version|cut -d. -f 1,2`
-     pkg_version="${short_ver}-${pkg_type}${cur_date}"
-
-     mkdir -p $CURDIR/build
-
- for rpmname in xCAT-client xCAT-genesis-scripts perl-xCAT xCAT-server xCAT xCATsn xCAT-test xCAT-vlan; do
-     rpmname_low=`echo $rpmname | tr '[A-Z]' '[a-z]'`
-     echo "============================================"
-     echo "$rpmname_low"
-     cd $rpmname
-     dch -v $pkg_version -b -c debian/changelog $build_string
-     dpkg-buildpackage -uc -us
-     rc=$?
-     if [ $rc -gt 0 ]; then
-                  echo "Error: $rpmname build package failed exit code $rc"
-     fi
-     cd -
-     mv ${rpmname_low}* $CURDIR/build
- 
- done 
-     #delete all files except  .deb file
-     find $CURDIR/build/* ! -name *.deb | xargs rm -f
-
-else
-#This is not an Ubuntu system
-echo "This is an $OSNAME system"
-
-     if [ "$OS" = "SUSE" ]; then
-         rm -rf /usr/src/packages/RPMS/noarch/*
-         rm -rf /usr/src/packages/RPMS/x86_64/*
-         rm -rf /usr/src/packages/RPMS/ppc64/*
-     else
-         rm -rf /root/rpmbuild/RPMS/noarch/*
-         rm -rf /root/rpmbuild/RPMS/x86_64/*
-         rm -rf /root/rpmbuild/RPMS/ppc64/*
-     fi
-
-     mkdir -p $CURDIR/build/
-  
-   #always build perl-xCAT
-   $CURDIR/makerpm  perl-xCAT  
- 
-
-   # Build the rest of the noarch rpms
-   for rpmname in xCAT-client xCAT-server xCAT-IBMhpc xCAT-rmc xCAT-test xCAT-buildkit xCAT-vlan; do
-        if [ "$OSNAME" = "AIX" -a "$rpmname" = "xCAT-buildkit" ]; then continue; fi     
-        $CURDIR/makerpm $rpmname
-   done
-  
-  #build xCAT-genesis-scripts if it is x86_64 platform
-  ARCH=$(uname -p)
-  if [ "$ARCH" = "x86_64" ]; then 
-       $CURDIR/makerpm xCAT-genesis-scripts x86_64  
-  else
-       $CURDIR/makerpm xCAT-genesis-scripts ppc64
-  fi
-
-  
-  # Build the xCAT and xCATsn rpms for all platforms
-  for rpmname in xCAT xCATsn; do
-                if [ "$OSNAME" = "AIX" ]; then
-                        $CURDIR/makerpm $rpmname
-                        if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS $rpmname"; fi 
-                else
-                        for arch in x86_64 ppc64 s390x; do
-                                $CURDIR/makerpm $rpmname $arch
-                                if [ $? -ne 0 ]; then FAILEDRPMS="$FAILEDRPMS $rpmname-$arch"; fi
-                        done
-                fi
-  done
-
-  if [ "$OS" = "SUSE" ]; then
-      cp /usr/src/packages/RPMS/noarch/* $CURDIR/build/
-      cp /usr/src/packages/RPMS/x86_64/* $CURDIR/build/
-      cp /usr/src/packages/RPMS/ppc64/* $CURDIR/build/ 
-  else
-      cp /root/rpmbuild/RPMS/noarch/* $CURDIR/build/
-      cp /root/rpmbuild/RPMS/x86_64/* $CURDIR/build/
-      cp /root/rpmbuild/RPMS/ppc64/* $CURDIR/build/
-  fi
-
-  #begin to create repo for redhat platform
-
-   grep -i 'Red' /etc/*release*;
-   if [ "$OSNAME" != "AIX" -a $? -eq 0 ]; then
-        cat >$CURDIR/build/xCAT-core.repo << EOF
-[xcat-2-core]
-name=xCAT 2 Core packages
-baseurl=file://$CURDIR/build
-enabled=1
-gpgcheck=0
-EOF
-
-  cp $CURDIR/build/xCAT-core.repo /etc/yum.repos.d/
-  createrepo $CURDIR/build
-  else
-     rm -f /etc/zypp/repos.d/xCAT-core.repo
-     zypper ar file://$CURDIR/build xCAT-core
-  fi
-   
-fi
-
-
@@ -85,7 +85,6 @@ function makexcat {
 			cd `dirname $0`/$RPMNAME
 			tar --exclude .svn -czf $RPMROOT/SOURCES/license.tar.gz LICENSE.html
 			cp xcat.conf $RPMROOT/SOURCES
-			cp xcat.conf.apach24 $RPMROOT/SOURCES
 			cp xCATSN $RPMROOT/SOURCES
 			cd - >/dev/null
 		elif [ "$RPMNAME" = "xCAT-buildkit" ]; then
@@ -106,23 +105,7 @@ function makexcat {
 	fi
 }

-# make ironic rpm for ironic baremetal driver
-function makeironic {
-	RPMNAME="$1"
-	ARCH="$2"
-	cd `dirname $0`/$RPMNAME    
-	cp -rf ironic_baremetal /tmp/
-	cd /tmp/ironic_baremetal
-	git init
-	git add *
-	git commit -a -m "generate rpm"
-	python setup.py bdist_rpm
-	rm -rf $RPMROOT/RPMS/$ARCH/
-	mkdir -p $RPMROOT/RPMS/$ARCH/
-	cp -rf dist/*.rpm $RPMROOT/RPMS/$ARCH/
-	rm -rf /tmp/ironic_baremetal
-}	
-	
+

 # Make the xCAT-nbroot-core rpm
 function makenbroot {
@@ -222,6 +205,7 @@ else	# linux
 	fi
 fi

+
 if [ "$1" = "xCAT" -o "$1" = "xCATsn" -o "$1" = "xCAT-buildkit" -o "$1" = "xCAT-OpenStack" ]; then
 	exportEmbed $3
 	makexcat $1 $2
@@ -234,8 +218,6 @@ elif [ "$1" = "xCAT-genesis-builder" ]; then
 elif [ "$1" = "xCAT-genesis-scripts" ]; then
 	exportEmbed $3
 	makegenesisscripts $1 $2
-elif [ "$1" = "xCAT-OpenStack-ironic" ]; then
-	makeironic $1 $2    
 else	# must be one of the noarch rpms
 	exportEmbed $2
 	makenoarch $1
@@ -266,7 +266,7 @@ See http://www.perl.com/doc/manual/html/pod/perlre.html for information on perl

 As of xCAT 2.8.1, you can use a modified version of the regular expression support described in the previous section. You do not need to enter the node information (1st part of the expression), it will be derived from the input nodename. You only need to supply the 2nd part of the expression to determine the value to give the attribute. For examples, see 

-https://sourceforge.net/p/xcat/wiki/Listing_and_Modifying_the_Database/#easy-regular-expressions
+https://sourceforge.net/apps/mediawiki/xcat/index.php?title=Listing_and_Modifying_the_Database#Easy_Regular_expressions

 =head1 OBJECT DEFINITIONS

@@ -48,7 +48,7 @@ binary-arch: build install
 	chmod 644 `pwd`/debian/perl-xcat/opt/xcat/share/doc/man5/*
 	chmod 644 `pwd`/debian/perl-xcat/opt/xcat/share/man/man7/*
 	chmod 644 `pwd`/debian/perl-xcat/opt/xcat/share/doc/man7/*
-	./modifyUtils `cat ../Version` `git log -n 1 | head -n 1 | cut -f 2 -d ' '`
+	./modifyUtils `cat ../Version` `svn info | grep Revision | cut -d" " -f 2`
 #	dh_installmenu
 #	dh_installdebconf	
 #	dh_installlogrotate
@@ -1,21 +1,20 @@
 #!/bin/sh
 # Put the version, svn revision #, and build date into the Version function in Version.pm

-if [ -z "$2" ]
+if [ -z "$1" ]
 	then
 	echo "modifyUtils:  Error:  must specify the xCAT version as an argument" >&2
 	exit
 fi

 VER=$1
-GITREF="git commit $2, "

 BUILDDATE=`date`
 #echo ". '(built $BUILDDATE)'"

 if [ "$(uname)" = "AIX" ]
 then
-	sed -e s/"#XCATVERSIONSUBHERE"/". '$VER'"/ -e s/"#XCATSVNBUILDSUBHERE"/". ' (${GITREF}built $BUILDDATE)'"/ xCAT/Version.pm >xCAT/Version.pm.new
+	sed -e s/"#XCATVERSIONSUBHERE"/". '$VER'"/ -e s/"#XCATSVNBUILDSUBHERE"/". ' (built $BUILDDATE)'"/ xCAT/Version.pm >xCAT/Version.pm.new
 	mv xCAT/Version.pm.new xCAT/Version.pm
 else
        if [ -f "/etc/debian_version" ];then
@@ -23,5 +22,5 @@ else
        else
            FILENAME="xCAT/Version.pm"
        fi
-	sed -i -e s/"#XCATVERSIONSUBHERE"/". '$VER'"/ -e s/"#XCATSVNBUILDSUBHERE"/". ' (${GITREF}built $BUILDDATE)'"/ $FILENAME
+	sed -i -e s/"#XCATVERSIONSUBHERE"/". '$VER'"/ -e s/"#XCATSVNBUILDSUBHERE"/". ' (built $BUILDDATE)'"/ $FILENAME
 fi
@@ -23,8 +23,6 @@ Provides: perl-xCAT = %{epoch}:%{version}
 Provides perl xCAT libraries for core functionality.  Required for all xCAT installations.
 Includes xCAT::Table, xCAT::NodeRange, among others.

-%define gitinfo %(git log -n 1 | head -n 1 | cut -f 2 -d ' ')
-
 %define zvm %(if [ "$zvm" = "1" ];then echo 1; else echo 0; fi)
 %define fsm %(if [ "$fsm" = "1" ];then echo 1; else echo 0; fi)

@@ -38,7 +36,7 @@ Includes xCAT::Table, xCAT::NodeRange, among others.
 %if %fsm
 %else
 # Modify the Version() function in xCAT/Utils.pm to automatically have the correct version
-./modifyUtils %{version} %{gitinfo}
+./modifyUtils %{version}

 # Build the pod version of the man pages for each DB table.  It puts them in the man5 and man7 subdirs.
 # Then convert the pods to man pages and html pages.
@@ -500,7 +500,6 @@ sub setCFMPkglistFile {
    Arguments:
      $imagename - the specified linuximage name
      @curospkgs - the currently selected OS packages list
-      $mode      - using Fuzzy Matching or Exact Matching to check packages
    Returns:
      0 - update successfully
      1 - update failed
@@ -510,22 +509,13 @@ sub setCFMPkglistFile {
      none
    Example:
      my $ret = CAT::CFMUtils->updateCFMPkglistFile($imagename, @cur_selected_pkgs);
-      my $ret = CAT::CFMUtils->updateCFMPkglistFile($imagename, @cur_selected_pkgs, 1);

 =cut

 #-----------------------------------------------------------------------------
 sub updateCFMPkglistFile {
-    my ($class, $img, $ospkgs, $mode) = @_;
-    
-    if(defined($mode)){
-        # Exact Matching
-        $mode = 1;
-    }else {
-        # Fuzzy Matching
-        $mode = 0;
-    }
-    
+    my ($class, $img, $ospkgs) = @_;
+     
    my @cur_selected = @$ospkgs;
    my $cfmpkglist = "/install/osimages/$img/pkglist.cfm";

@@ -559,14 +549,6 @@ sub updateCFMPkglistFile {
        my @selected = @$selected_ref;
        @basepkgs = xCAT::CFMUtils->arrayops("U", \@basepkgs, \@selected);
    }
-    
-    # Fuzzy Matching
-    if (not $mode){
-        my ($ref1, $ref2, $ref3) = xCAT::CFMUtils->updateSelectedPkgs(\@pre_selected, \@pre_removed, \@cur_selected);
-        @pre_selected = @$ref1;
-        @pre_removed = @$ref2;
-        @cur_selected = @$ref3;
-    }

    # get diff between previous and current selected OS packages lists    
    my @diff = xCAT::CFMUtils->getPkgsDiff(\@pre_selected, \@cur_selected);
@@ -679,48 +661,6 @@ sub getPreOSpkgsList {
    return (\@selected, \@removed);
 }

-#-----------------------------------------------------------------------------
-
-=head3 getPreBaseOSpkgsList
-    Get previously selected and removed base OS packages lists from pkglist file. Packages named with "example.xxx" should be the base name "example"
-
-    Arguments:
-      $ospkglist - the path for ospkglist file
-    Returns:
-      refs for selected and removed OS packages arrays
-    Globals:
-      none
-    Error:
-      none
-    Example:
-      my $pre_selected_ref = xCAT::CFMUtils->getPreOSpkgsList($ospkglist);
-
-=cut
-
-#-----------------------------------------------------------------------------
-sub getPreBaseOSpkgsList {
-    my ($class, $pkglist) = @_;
-    
-    my ($pre_selected_ref, $pre_removed_ref) = xCAT::CFMUtils->getPreOSpkgsList($pkglist); 
-    
-    my %pre_selected_hash = ();
-    foreach (@$pre_selected_ref) {
-        my @names = split(/\./, $_);
-        my $basename = $names[0];
-        
-        if ($_ =~ /^$basename\.([^\.]+)$/) {
-            $pre_selected_hash{$basename} = 1;
-        }else {
-            $pre_selected_hash{$_} = 1;
-        }
-    }
-    
-    my @pre_selected = keys %pre_selected_hash;
-
-    return \@pre_selected;
-}
-
-
 #-----------------------------------------------------------------------------

 =head3 getPkgsDiff
@@ -879,66 +819,3 @@ sub arrayops {

    #return (\@union, \@intersection, \@difference);
 }
-
-
-#-----------------------------------------------------------------------------
-
-=head3 updateSelectedPkgs
-    Update previous selected, previous removed and current selected packages based on fuzzy matching rules. Packages named with "example.i686" should be same with package "example"
-
-    Arguments:
-      \@pre_selected - reference to previous selected packages
-      \@pre_removed - reference to previous removed packages
-      \@cur_selected - reference to current selected packages
-    Returns:
-      new previous selected, previous removed, current selected packages
-    Globals:
-      none
-    Error:
-      none
-    Example:
-      my ($ref1, $ref2, $ref3) = xCAT::CFMUtils->arrayops(\@pre_selected, \@pre_removed, \@cur_selected);
-
-=cut
-
-#-----------------------------------------------------------------------------
-sub updateSelectedPkgs() {
-    my ($class, $pre_selected_ref, $pre_removed_ref, $cur_selected_ref) = @_; 
-    
-    my %pre_selected_hash = map{$_ => 1} @$pre_selected_ref;
-    my %pre_removed_hash = map{$_ => 1} @$pre_removed_ref;
-    my %cur_selected_hash = map{$_ => 1} @$cur_selected_ref;
-    
-    my %new_pre_selected_hash = %pre_selected_hash;
-    my %new_pre_removed_hash = %pre_removed_hash;
-    my %new_cur_selected_hash = %cur_selected_hash;
-    
-    foreach (keys %cur_selected_hash) {
-        my $father = $_;
-        my $flag = 0;
-        foreach (keys %pre_selected_hash) {
-            my $child = $_;
-            if ($child =~ /^$father\.([^\.]+)$/) {
-                $new_cur_selected_hash{$child} = 1;
-                $flag = 1;
-            }
-        }
-        if ($flag and not exists $pre_selected_hash{$father}){
-            delete $new_cur_selected_hash{$father} if exists $new_cur_selected_hash{$father};
-        }
-        
-        foreach (keys %pre_removed_hash) {
-            my $child = $_;
-            if ($child =~ /^$father\.([^\.]+)$/) {
-                delete $new_pre_removed_hash{$child} if exists $new_pre_removed_hash{$child};
-            }
-        }
-    }
-    
-    my @new_cur_selected = keys %new_cur_selected_hash;
-    my @new_pre_selected = keys %new_pre_selected_hash;
-    my @new_pre_removed = keys %new_pre_removed_hash;
-    
-    
-    return (\@new_pre_selected, \@new_pre_removed, \@new_cur_selected);  
-}
@@ -1,462 +0,0 @@
-#! /usr/bin/env perl
-# IBM(c) 2014 EPL license http://www.eclipse.org/legal/epl-v10.html
-
-# This package offers subroutines to access CIM server
-
-package xCAT::CIMUtils;
-
-use strict;
-use warnings;
-
-use HTTP::Headers;
-use HTTP::Request;
-use LWP::UserAgent;
-
-use XML::LibXML;
-use Data::Dumper;
-
-=head1 HTTP_PARAMS
-
-    A hash which includes all the parameters for accessing HTTP server. The valid parameter:
-        ip:        The IP address of the HTTP server
-        user:      The user to access HTTP server. 
-        password:  The password for the user. 
-        method:    The http method. (GET, PUT, POST, DELETE). Default is GET
-        protocol:  The protocol which will be used to access HTTP server.  (http/https). Default is https
-        format:    The format of payload. Default is xml
-        payload:   The payload of http
-        
-    Example:
-        my %http_params = ( ip       => '192.168.1.1',
-                            port     => '5989',
-                            user     => 'HMC',
-                            password => 'admin',
-                            method   => 'POST',
-                            protocol => 'https');
-        
-=cut
-
-=head1 enum_instance ()
-    Description:
-        Enumerate CIM instances.
-
-    Arguments:
-        http_params: A reference to HTTP_PARAMS
-        cim_params:  The CIM parameters
-            classname - a mandatory param to specify the class that enumerate will target to.
-
-    Return:
-        1 - A hash reference. The valid key includes:
-            rc     - The return code. 0 - success. > 0 - fail.
-            cim_rc - The return code from CIM server.
-            msg    - Output message.
-            
-        2 - Array of instances, each instance is a hash contains lots of properties.
-
-        3 - The name path of instance
-=cut
-
-
-sub enum_instance
-{
-    my $http_params = shift;
-    unless (ref($http_params)) {
-        $http_params = shift;
-    }
-    
-    my $cim_params = shift;
-
-   # This is a mandatory parameter 
-    unless ($cim_params->{classname}) {
-        return ({rc => 1, msg => "Missed the classname"});
-    }
-
-    unless ($cim_params->{namespace}) {
-        $cim_params->{namespace} = "ibmsd";
-    }
-    
-    # prepare the CIM payload
-    my $tmpnode;
-
-    # create a new doc
-    my $doc = XML::LibXML->createDocument('1.0','UTF-8');
-    
-    # create and add the root element
-    my $root = $doc->createElement("CIM");
-    $root->setAttribute("CIMVERSION", "2.0");
-    $root->setAttribute("DTDVERSION", "2.0");
-    
-    $doc->setDocumentElement($root);
-    
-    # create and add the MESSAGE element
-    my $message = $doc->createElement("MESSAGE");
-    $message->setAttribute("ID", "1000");
-    $message->setAttribute("PROTOCOLVERSION", "1.0");
-    
-    $root->addChild($message);
-    
-    # add a SIMPLE REQUEST
-    my $simple_request = $doc->createElement("SIMPLEREQ");
-    $message->addChild($simple_request);
-    
-    # add an IMETHOD CALL
-    my $imethod_call = $doc->createElement("IMETHODCALL");
-    $imethod_call->setAttribute("NAME", "EnumerateInstances");
-    
-    $simple_request->addChild($imethod_call);
-    
-    # add the local name space path
-    my $localnamespacepath = $doc->createElement("LOCALNAMESPACEPATH");
-    $tmpnode = $doc->createElement("NAMESPACE");
-    $tmpnode->setAttribute("NAME", "root");
-    $localnamespacepath->addChild($tmpnode);
-    
-    $tmpnode = $doc->createElement("NAMESPACE");
-    $tmpnode->setAttribute("NAME", $cim_params->{namespace});
-    $localnamespacepath->addChild($tmpnode);
-    
-    $imethod_call->addChild($localnamespacepath);
-    
-    # add the target class name
-    my $param_classname = $doc->createElement("IPARAMVALUE");
-    $param_classname->setAttribute("NAME", "ClassName");
-    $imethod_call->addChild($param_classname);
-    
-    my $classname = $doc->createElement("CLASSNAME");
-    $classname->setAttribute("NAME", $cim_params->{classname});
-    $param_classname->addChild($classname);
-    
-    # add several common parameters
-    $imethod_call->appendWellBalancedChunk('<IPARAMVALUE NAME="DeepInheritance"><VALUE>TRUE</VALUE></IPARAMVALUE><IPARAMVALUE NAME="LocalOnly"><VALUE>FALSE</VALUE></IPARAMVALUE><IPARAMVALUE NAME="IncludeQualifiers"><VALUE>FALSE</VALUE></IPARAMVALUE><IPARAMVALUE NAME="IncludeClassOrigin"><VALUE>TRUE</VALUE></IPARAMVALUE>');
-    
-    my $payload = $doc->toString();
-    
-    # generate http request
-    my $ret = gen_http_request($http_params, $payload);
-
-    if ($ret->{rc}) {
-        return $ret;
-    }
-
-    # send request to http server
-    $ret = send_http_request($http_params, $ret->{request});
-    if ($ret->{rc}) {
-        return $ret;
-    }
-
-    # parse the http response
-    my $ret_value;
-    my $parser = XML::LibXML->new();
-    my $resp_doc = $parser->parse_string($ret->{payload});
-
-    # check the error message from CIM
-    my $error_node = $resp_doc->getElementsByTagName("ERROR");
-    if ($error_node) {
-        my $msg = $error_node->[0]->getAttribute("DESCRIPTION");
-        my $errorcode = $error_node->[0]->getAttribute("CODE");
-        return ({rc => 1, cim_rc => $errorcode, msg => $error_node->[0]->getAttribute("DESCRIPTION")." [cim return code: $errorcode]"});
-    }
-
-    # get the name path of the instance, which is used to set property
-    my @namepath = $resp_doc->getElementsByTagName("INSTANCENAME");
-    my $namepath_string;
-    if (@namepath) {
-        $namepath_string = $namepath[0]->toString();
-    }
-
-    # get all the instance elements
-    my @instances = $resp_doc->getElementsByTagName("VALUE.NAMEDINSTANCE");
-    foreach my $instance (@instances) {
-        # get all the property element for each instance
-        my @properties = $instance->getElementsByTagName("PROPERTY");
-        if (my @property_arrays = $instance->getElementsByTagName("PROPERTY.ARRAY")) {
-            push @properties, @property_arrays;
-        }
-        my $ins_value;
-        foreach my $property (@properties) {
-            # get name, vlaue and type for each property. (only the one which has value)
-            if (my $pname = $property->getAttribute("NAME")) {
-                if (my $pvalue = $property->getAttribute("TYPE")) {
-                    $ins_value->{property}->{$pname}->{type} = $pvalue;
-                }
-                if ($property->getElementsByTagName("VALUE.ARRAY")) {
-                    my @nodelist = $property->getElementsByTagName("VALUE");
-                    my @value_array = ();
-                    foreach my $n (@nodelist) {
-                        push @value_array, $n->textContent;
-                    }
-                    $ins_value->{property}->{$pname}->{value} = join(',',@value_array);
-                } elsif (my $node = $property->getElementsByTagName("VALUE")) {
-                    $ins_value->{property}->{$pname}->{value} = $node->[0]->textContent;
-                }
-            }
-        }
-        push @{$ret_value}, $ins_value;
-    }
-    
-    return ({rc =>0}, $ret_value, $namepath_string);
-}
-
-=head1 set_property ()
-    Description:
-        Set the property for an instance.
-
-    Arguments:
-        http_params: A reference to HTTP_PARAMS
-        cim_params:  The CIM parameters
-            namepath - a mandatory param to specify the path of the instance.
-                It should be returned from 'enum_instance' subroutine.
-
-    Return:
-        1 - A hash reference. The valid key includes:
-            rc     - The return code. 0 - success. > 0 - fail.
-            cim_rc - The return code from CIM server.
-            msg    - Output message.
-=cut
-sub set_property
-{
-    my $http_params = shift;
-    unless (ref($http_params)) {
-        $http_params = shift;
-    }
-    
-    my $cim_params = shift;
-
-    # This is a mandatory parameter
-    unless ($cim_params->{namepath}) {
-        return ({rc => 1, msg => "Missed the name path for the instance"});
-    }
-
-    unless ($cim_params->{namespace}) {
-        $cim_params->{namespace} = "ibmsd";
-    }
-    
-    # prepare the CIM payload
-    my $tmpnode;
-
-    # create a new doc
-    my $doc = XML::LibXML->createDocument('1.0','UTF-8');
-    
-    # create and add the root element
-    my $root = $doc->createElement("CIM");
-    $root->setAttribute("CIMVERSION", "2.0");
-    $root->setAttribute("DTDVERSION", "2.0");
-    
-    $doc->setDocumentElement($root);
-    
-    # create and add the MESSAGE element
-    my $message = $doc->createElement("MESSAGE");
-    $message->setAttribute("ID", "1000");
-    $message->setAttribute("PROTOCOLVERSION", "1.0");
-    
-    $root->addChild($message);
-    
-    # add a SIMPLE REQUEST
-    my $simple_request = $doc->createElement("SIMPLEREQ");
-    $message->addChild($simple_request);
-    
-    # add an IMETHOD CALL
-    my $imethod_call = $doc->createElement("IMETHODCALL");
-    $imethod_call->setAttribute("NAME", "SetProperty");
-    
-    $simple_request->addChild($imethod_call);
-    
-    # add the local name space path
-    my $localnamespacepath = $doc->createElement("LOCALNAMESPACEPATH");
-    $tmpnode = $doc->createElement("NAMESPACE");
-    $tmpnode->setAttribute("NAME", "root");
-    $localnamespacepath->addChild($tmpnode);
-    
-    $tmpnode = $doc->createElement("NAMESPACE");
-    $tmpnode->setAttribute("NAME", $cim_params->{namespace});
-    $localnamespacepath->addChild($tmpnode);
-    
-    $imethod_call->addChild($localnamespacepath);
-    
-    # add the target property name
-    my $param_propertyname = $doc->createElement("IPARAMVALUE");
-    $param_propertyname->setAttribute("NAME", "PropertyName");
-    $imethod_call->addChild($param_propertyname);
-    
-    $tmpnode = $doc->createElement("VALUE");
-    $tmpnode->appendTextNode($cim_params->{propertyname});
-    $param_propertyname->addChild($tmpnode);
-
-    # add the target property value
-    my $param_newvaluename = $doc->createElement("IPARAMVALUE");
-    $param_newvaluename->setAttribute("NAME", "NewValue");
-    $imethod_call->addChild($param_newvaluename);
-    
-    $tmpnode = $doc->createElement("VALUE");
-    $tmpnode->appendTextNode($cim_params->{propertyvalue});
-    $param_newvaluename->addChild($tmpnode);
-    
-    # add parameters of instance name path
-    my $param_namepath = $doc->createElement("IPARAMVALUE");
-    $param_namepath->setAttribute("NAME", "InstanceName");
-    $param_namepath->appendWellBalancedChunk($cim_params->{namepath});
-    $imethod_call->addChild($param_namepath);
-    
-    my $payload = $doc->toString();
-    
-    # generate http request
-    my $ret = gen_http_request($http_params, $payload);
-
-    if ($ret->{rc}) {
-        return $ret;
-    }
-
-    # send request to http server
-    $ret = send_http_request($http_params, $ret->{request});
-    if ($ret->{rc}) {
-        return $ret;
-    }
-
-    # parse the http response
-    my $ret_value;
-    my $parser = XML::LibXML->new();
-    my $resp_doc = $parser->parse_string($ret->{payload});
-
-    # check the error message from CIM
-    my $error_node = $resp_doc->getElementsByTagName("ERROR");
-    if ($error_node) {
-        my $msg = $error_node->[0]->getAttribute("DESCRIPTION");
-        my $errorcode = $error_node->[0]->getAttribute("CODE");
-        return ({rc => 1, cim_rc => $errorcode, msg => $error_node->[0]->getAttribute("DESCRIPTION")." [cim return code: $errorcode]"});
-    }
-
-
-    # if no http and cim error, the setting was succeeded
-    return ($ret);
-}
-
-=head1 gen_http_request ()
-    Description:
-        Generate a http request.
-
-    Arguments: 
-        http_params: A reference to HTTP_PARAMS
-        payload:     The payload for the http request. It can be null if the payload has been set in http_params.
-
-    Return:
-        A hash reference. The valid key includes:
-            rc      - The return code. 0 - success. > 0 - fail.
-            msg     - Output message 
-            request - The generated HTTP::Request object
-=cut
-
-sub gen_http_request
-{
-    my $http_params = shift;
-    my $http_payload = shift;
-    
-    # check the mandatory parameters
-    unless (defined ($http_params->{ip}) && defined ($http_params->{port}) && defined($http_params->{user}) && defined($http_params->{password})) {
-        return ({rc => 1, msg => "Missed the mandatory parameters: ip, port, user or password"});
-    }
-
-    # set the default value for parameters
-    unless (defined ($http_params->{protocol})) {
-        $http_params->{protocol} = 'https';
-    }
-    unless (defined ($http_params->{format})) {
-        $http_params->{format} = 'xml';
-    }
-    unless (defined ($http_params->{method})) {
-        $http_params->{method} = 'GET';
-    }
-
-    my $payload = '';
-    if (defined ($http_params->{payload})) {
-        $payload = $http_params->{payload};
-    }
-    if (defined ($http_payload)) {
-        unless (ref($http_payload)) { #Todo: support payloasd to be a hash
-            $payload = $http_payload;
-        }
-    }
-
-    # create the http head
-    my $header = HTTP::Headers->new('content-type' => "application/$http_params->{format}",
-                                    'Accept' => "application/$http_params->{format}",
-                                    'User-Agent' => "xCAT/2",
-                                    'Host' => "$http_params->{ip}:$http_params->{port}");
-
-    # set the user & password
-    $header->authorization_basic($http_params->{user}, $http_params->{password});
-
-    # set the length of payload
-    my $plen = length($payload);
-    $header->push_header('Content-Length' => $plen);
-
-    # create the URL
-    my $url = "$http_params->{protocol}://$http_params->{ip}:$http_params->{port}";
-    my $request = HTTP::Request->new($http_params->{method}, $url, $header, $payload);
-
-    # set the http version
-    $request->protocol('HTTP/1.1');
-
-    return ({rc => 0, request => $request});
-}
-
-
-=head1 send_http_request ()
-    Description:
-        Send http request to http server and waiting for the response.
-
-    Arguments:
-        http_params:  A reference to HTTP_PARAMS
-        http_request: A HTTP::Request object
-
-    Return:
-        A hash reference. The valid key includes:
-            rc      - The return code. 0 - success. > 0 - fail.
-            http_rc - The return code of http. 200, 400 ...
-            msg     - Output message
-            payload - The http response from http server
-=cut
-
-sub send_http_request
-{
-    my $http_params = shift;
-    my $http_request = shift;
-
-    # Load the library LWP::Protocol::https for https support
-    if ($http_params->{protocol} eq 'https') {
-        eval { require LWP::Protocol::https};
-        if ($@) {
-            return ({rc => 1, msg => "Failed to load perl library LWP::Protocol::https"});
-        }
-    }
-
-    # create a new HTTP User Agent Object
-    my $ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 0, SSL_verify_mode => 0});
-    if ($http_params->{timeout}) {
-        $ua->timeout($http_params->{timeout});
-    } else {
-        $ua->timeout(10);   # the default timeout is 10s
-    }
-
-    if (defined($http_params->{verbose}) && defined ($http_params->{callback})) {
-        $http_params->{callback}({data => ["\n========CIM Request Start========", $http_request->as_string(), "=======CIM Request End======="]});
-    }
-
-    # send request and receive the response
-    my $response = $ua->request($http_request);
-
-    if (defined($http_params->{verbose}) && defined ($http_params->{callback}) && defined ($response->{_content})) {
-        $http_params->{callback}({data => ["\n========CIM Response Start========", $response->{_content}, "=======CIM Response End======="]});
-    }
-
-    # check the http response
-    if (defined ($response) && defined ($response->{_rc}) && defined ($response->{_msg})) {
-        if ($response->{_rc} eq "200" && $response->{_msg} eq "OK") {
-            return ({rc => 0, http_rc => $response->{_rc}, msg => "$response->{_msg} [http return code: $response->{_rc}]", payload => $response->{_content}});
-        }
-    }
-    
-    return ({rc => 1, http_rc => $response->{_rc}, msg => $response->{_msg}});
-}
-
-
-1;
@@ -8,11 +8,9 @@ BEGIN

 # if AIX - make sure we include perl 5.8.2 in INC path.
 #       Needed to find perl dependencies shipped in deps tarball.
-use Storable qw/nstore_fd fd_retrieve/;
 if ($^O =~ /^aix/i) {
 	unshift(@INC, qw(/usr/opt/perl5/lib/5.8.2/aix-thread-multi /usr/opt/perl5/lib/5.8.2 /usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi /usr/opt/perl5/lib/site_perl/5.8.2));
 }
-use IO::Handle;

 my $inet6support;
 if ($^O =~ /^aix/i) {  # disable AIX IPV6  TODO fix
@@ -29,7 +27,7 @@ if ($inet6support) {

 if ($^O =~ /^linux/i) {
    # Is IPv6 enabled on the MN or xcat client node at all?
-    my $ipv6enabled = `ip addr 2> /dev/null | grep inet6`;
+    my $ipv6enabled = `ip addr | grep inet6`;
    if (!$ipv6enabled) {
        $inet6support = 0;
    }
@@ -79,23 +77,6 @@ sub rspclean {
 	}
 	return 0;
 }
-sub send_request {
-    my $request = shift;
-    my $sock = shift;
-    my $encode = shift;
-    if ($encode eq "xml") {
-        my $msg=XMLout($request,RootName=>'xcatrequest',NoAttr=>1,KeyAttr=>[]);
-        if ($ENV{XCATXMLTRACE}) { print $msg; }
-        if($ENV{XCATXMLWARNING}) {
-            validateXML($msg);
-        }
-        print $sock $msg;
-        $sock->flush();
-    } else {
-        nstore_fd($request,$sock);
-        $sock->flush();
-    }
-}
 #################################
 # submit_request will take an xCAT command and pass it to the xCAT
 #   server for execution.
@@ -237,10 +218,6 @@ if (ref($request) eq 'HASH') { # the request is an array, not pure XML
     }
  }
  my $client;
-  my %sslargs;
-  if (defined($ENV{'XCATSSLVER'})) {
-    $sslargs{SSL_version} = $ENV{'XCATSSLVER'};
-  }
  if (-r $keyfile and -r $certfile and -r $cafile) {
    $client = IO::Socket::SSL->start_SSL($pclient,
    SSL_key_file => $keyfile,
@@ -249,7 +226,6 @@ if (ref($request) eq 'HASH') { # the request is an array, not pure XML
    SSL_verify_mode => SSL_VERIFY_PEER,
    SSL_use_cert => 1,
    Timeout => 0,
-    %sslargs,
   );
  } else {
    $client =  IO::Socket::SSL->start_SSL($pclient,
@@ -267,26 +243,20 @@ if (ref($request) eq 'HASH') { # the request is an array, not pure XML
  }

  my $msg;
-  my $encode = "xml";
-  #storable encoding is unsafe, carry on with the unsafe xml scheme
-  #perhaps one day will support faster schemes
-  #my $encode = "storable";
-  #my $straightprint=0;
-  #if ($ENV{XCATXMLTRACE} or $ENV{XCATXMLWARNING}) { $encode="xml"; }
  if (ref($request) eq 'HASH') { # the request is an array, not pure XML
-    #print $client "xcatencoding: $encode\n";
-    #my $encok=<$client>;
-    send_request($request,$client,$encode);
+    $msg=XMLout($request,RootName=>'xcatrequest',NoAttr=>1,KeyAttr=>[]);
  } else { #XML
-    $straightprint=1;
    $msg=$request;
-    print $client $msg;
  }
-  $SIG{TERM} =  $SIG{INT} = sub { send_request({abortcommand=>[1]},$client,$encode); exit 0; };
+  if ($ENV{XCATXMLTRACE}) { print $msg; }
+  if($ENV{XCATXMLWARNING}) {
+    validateXML($msg);
+  }
+  $SIG{TERM} =  $SIG{INT} = sub { print $client XMLout({abortcommand=>1},RootName=>'xcatrequest',NoAttr=>1,KeyAttr=>[]); exit 0; };
+  print $client $msg;
  my $response;
  my $rsp;
  my $cleanexit=0;
-  if ($encode eq 'xml') {
  my $massresponse="<massresponse>";
  my $nextcoalescetime=time()+1;
  my $coalescenow=0;
@@ -340,27 +310,6 @@ if (ref($request) eq 'HASH') { # the request is an array, not pure XML
 	$massresponse .= "</massresponse>";
         $cleanexit = rspclean($massresponse,$callback);
  }
-  } else { #storable encode
-    my $rsp;
-    eval { $rsp = fd_retrieve($client); };
-    SERVERINPUT: while ($rsp) {
-     my @rsps;
-     if (ref $rsp eq 'ARRAY') {
-        @rsps = @$rsp;
-     } else {
-        @rsps = ($rsp);
-    }
-    foreach (@rsps) {
-     $callback->($_);
-     if ($_->{serverdone}) {
-         $cleanexit=1;
-         last SERVERINPUT;
-      }
-     }
-     $rsp = undef;
-     eval { $rsp = fd_retrieve($client); };
-    }
-  }
  $massresponse="";
  unless ($cleanexit) {
     print STDERR "ERROR/WARNING: communication with the xCAT server seems to have been ended prematurely\n";
@@ -1164,12 +1113,7 @@ sub handle_response {
 #print "printing node\n";
    my $node;
    foreach $node (@$nodes) {
-      my $desc;
-      if (ref($node->{name}) eq 'ARRAY') {
-      $desc=$node->{name}->[0];
-      } else {
-      $desc=$node->{name};
-      }
+      my $desc=$node->{name}->[0];
      if ($node->{errorcode}) {
        if (ref($node->{errorcode}) eq 'ARRAY') {
          foreach my $ecode (@{$node->{errorcode}}) {
@@ -1189,24 +1133,7 @@ sub handle_response {
 		 $errflg=1;
      }
      if ($node->{data}) {
-         if (ref(\($node->{data})) eq 'SCALAR') {
-            $desc=$desc.": ".$node->{data};
-         } elsif (ref($node->{data}) eq 'HASH') {
-            if ($node->{data}->{desc}) {
-             if (ref($node->{data}->{desc}) eq 'ARRAY') {
-              $desc=$desc.": ".$node->{data}->{desc}->[0];
-              } else {
-              $desc=$desc.": ".$node->{data}->{desc};
-              }
-            }
-            if ($node->{data}->{contents}) {
-                if (ref($node->{data}->{contents}) eq 'ARRAY') {
-        $desc="$desc: ".$node->{data}->{contents}->[0];
-                } else {
-        $desc="$desc: ".$node->{data}->{contents};
-                }
-            }
-         } elsif (ref(\($node->{data}->[0])) eq 'SCALAR') {
+         if (ref(\($node->{data}->[0])) eq 'SCALAR') {
            $desc=$desc.": ".$node->{data}->[0];
         } else {
            if ($node->{data}->[0]->{desc}) {
@@ -598,7 +598,7 @@ sub _execute_dsh
                }
                else
                {
-                    # HERE: This is where the output shows up
+                    # LKV: This is where the output shows up
                    #print STDOUT @{$output_buffers{$user_target}};
                    #print STDERR @{$error_buffers{$user_target}};
                    chomp(@{$output_buffers{$user_target}});
@@ -1020,7 +1020,6 @@ sub fork_fanout_dsh
        }
    }
    # save the original exports,  we are going to add the unique node name below
-    my $firstpass=0;
    while (@$targets_waiting
           && (keys(%$targets_active) < $$options{'fanout'}))
    {
@@ -1047,7 +1046,6 @@ sub fork_fanout_dsh
        }
        if ($$options{'environment'})
        {
-          if ($firstpass ==0) {   # do the servicenode stuff only once
            # if we are on a servicenode need to get the environment file
            # from the SNsyncfiledir, not local
            if (xCAT::Utils->isServiceNode()) {
@@ -1070,10 +1068,8 @@ sub fork_fanout_dsh
               $rsp->{error}->[0] = "File $$options{'environment'} does not exist";
               xCAT::MsgUtils->message("E", $rsp, $::CALLBACK);
            }
-            $firstpass=1;
-           }
-           # build the xdsh command
-           push @dsh_command,
+            # build the xdsh command
+            push @dsh_command,
              "$exportnode$$options{'pre-command'} . $$options{'environment'} ; $$options{'command'}$$options{'post-command'}";
        }

@@ -3997,7 +3993,8 @@ sub parse_and_run_dsh
    {
        $options{'user'} = $ENV{'DSH_TO_USERID'};
    }
-    if ((!(defined($nodes))) && (!(defined($options{'rootimg'}))))
+
+    if ((!(defined(@$nodes))) && (!(defined($options{'rootimg'}))))
    {    #  no nodes and not -i option, error
        my $rsp = ();
        $rsp->{error}->[0] = "Unless using -i option,  noderange is required.";
@@ -4036,7 +4033,7 @@ sub parse_and_run_dsh
        {    # from sinv, discard this name
            undef @$nodes;
        }
-        if (@$nodes[0])
+        if (defined(@$nodes))
        {
            my $rsp = {};
            $rsp->{error}->[0] =
@@ -4407,16 +4404,8 @@ sub parse_and_run_dcp
            xCAT::MsgUtils->message("E", $rsp, $::CALLBACK, 1);
            return;
        }
-        if (@$nodes[0])
-        {
-            my $rsp = {};
-            $rsp->{error}->[0] =
-              "Input noderange:@$nodes and any other xdsh flags or environment variables are not valid with -i flag.";
-            xCAT::MsgUtils->message("E", $rsp, $::CALLBACK, 1);
-            return;
-        }
    }
-    if ((!(defined($nodes))) && (!(defined($options{'rootimg'}))))
+    if ((!(defined(@$nodes))) && (!(defined($options{'rootimg'}))))
    {    #  no nodes and not -i option, error
        my $rsp = {};
        $rsp->{error}->[0] = "Unless using -i option,  noderange is required.";
@@ -4513,7 +4502,7 @@ sub parse_and_run_dcp
    #
    # build list of nodes
    my @nodelist;
-    if (@$nodes[0])
+    if (defined(@$nodes))
    {    # there are nodes
        @nodelist = @$nodes;
        $options{'nodes'} = join(',', @nodelist);
@@ -4983,8 +4972,7 @@ sub parse_rsync_input_file_on_MN
    $::process_line = 0;
    my $destfileisdir;
    my $clause=0;
-    my $addmergescript =0;
-    my $addappendscript =0;
+    
    open(INPUTFILE, "< $input_file") || die "File $input_file does not exist\n";
    while (my $line = <INPUTFILE>)
    {
@@ -5025,16 +5013,12 @@ sub parse_rsync_input_file_on_MN
                  # this triggers the running of the appendscript
                  $::appendscript ="/opt/xcat/share/xcat/scripts/xdcpappend.sh";
                }
-
                # add the append script to the sync
-                if ($addappendscript == 0) {  # only add once
-                  my  $appscript ="/opt/xcat/share/xcat/scripts/xdcpappend.sh";
-                  my $appendscriptline = "$appscript -> $appscript"; 
-                  $syncappendscript=1;  # syncing the xdcpappend.sh script
-                   &build_append_rsync($appendscriptline,$nodes, $options, $input_file,$rsyncSN, $syncdir,$nodesyncfiledir,$onServiceNode,$syncappendscript);
-                   $addappendscript=1;
-                 } 
-               }  # end APPEND clause
+                my  $appscript ="/opt/xcat/share/xcat/scripts/xdcpappend.sh";
+                my $appendscriptline = "$appscript -> $appscript"; 
+                $syncappendscript=1;  # syncing the xdcpappend.sh script
+                 &build_append_rsync($appendscriptline,$nodes, $options, $input_file,$rsyncSN, $syncdir,$nodesyncfiledir,$onServiceNode,$syncappendscript);
+               }
               if ($clause =~ /MERGE:/) {
                 # location of the base merge script
                 # for MERGE we have to sync the mergescript and the
@@ -5046,16 +5030,12 @@ sub parse_rsync_input_file_on_MN
                  # this triggers the running of the mergescript
                  $::mergescript ="/opt/xcat/share/xcat/scripts/xdcpmerge.sh";
                }
-                
                # add the merge script to the sync
-                if ($addmergescript == 0) {  # only add once
-                  my  $mergescript ="/opt/xcat/share/xcat/scripts/xdcpmerge.sh";
-                  my $mergescriptline = "$mergescript -> $mergescript"; 
-                  $syncmergescript=1;  # syncing the xdcpmerge.sh script
-                  &build_merge_rsync($mergescriptline,$nodes, $options, $input_file,$rsyncSN, $syncdir,$nodesyncfiledir,$onServiceNode,$syncmergescript);
-                  $addmergescript=1;
-                }
-               }  # end MERGE clause
+                my  $mergescript ="/opt/xcat/share/xcat/scripts/xdcpmerge.sh";
+                my $mergescriptline = "$mergescript -> $mergescript"; 
+                $syncmergescript=1;  # syncing the xdcpmerge.sh script
+                 &build_merge_rsync($mergescriptline,$nodes, $options, $input_file,$rsyncSN, $syncdir,$nodesyncfiledir,$onServiceNode,$syncmergescript);
+               }
           
           }
         } else {  # not processing EXECUTE, EXECUTEALWAYS or APPEND
@@ -5219,7 +5199,6 @@ sub build_append_rsync
              push @::appendlines,$line;
            }
            my $src_file  = $1; # append file left of arror
-            my $orig_src_file  = $1; # append file left of arror
            # it will be sync'd to $nodesyncfiledir/$append_file
            my $dest_file = $nodesyncfiledir;
            $dest_file .= $src_file;  
@@ -5248,7 +5227,7 @@ sub build_append_rsync
                    # to pick up files from /var/xcat/syncfiles...
                    if ($onServiceNode == 1) {
                      my $newsrcfile = $syncdir;    # add SN syndir on front
-                      $newsrcfile .= $orig_src_file;
+                      $newsrcfile .= $src_file;
                      $src_file=$newsrcfile;
                    }
                    # destination file name
@@ -5331,8 +5310,7 @@ sub build_merge_rsync
            if ($syncmergescript == 0) { # don't add the xdcpmerge.sh line 
              push @::mergelines,$line;
            }
-            my $src_file  = $1; # merge file left of arrow
-            my $orig_src_file = $1;
+            my $src_file  = $1; # merge file left of arror
            # it will be sync'd to $nodesyncfiledir/$merge_file
            my $dest_file = $nodesyncfiledir;
            $dest_file .= $src_file;  
@@ -5361,7 +5339,7 @@ sub build_merge_rsync
                    # to pick up files from /var/xcat/syncfiles...
                    if ($onServiceNode == 1) {
                      my $newsrcfile = $syncdir;    # add SN syndir on front
-                      $newsrcfile .= $orig_src_file; 
+                      $newsrcfile .= $src_file;
                      $src_file=$newsrcfile;
                    }
                    # destination file name
@@ -6051,11 +6029,11 @@ sub run_always_rsync_postscripts
        # if on the service node need to add the $syncdir directory 
        # to the path
        if (xCAT::Utils->isServiceNode()) {
-         my $tmps=$syncdir . $ps;
-         push @args, $tmps;
-        } else{
-          push @args, $ps;
+         my $tmpp=$syncdir . $ps;
+         $ps=$tmpp;
        }
+        push @args, $ps;
+
        push (@nodes, @{$$dshparms{'postscripts'}{$ps}}); 
         
        $out=xCAT::Utils->runxcmd( { command => ['xdsh'],
@@ -253,6 +253,64 @@ use strict;



+#---------------------------------------------------------------------------
+
+=head3
+        ifconfig_inet
+
+        Builds a list of all IP Addresses bound to the local host and
+        stores them in a global list
+
+        Arguments:
+        	None
+
+        Returns:
+        	None
+                
+        Globals:
+        	@local_inet
+    
+        Error:
+        	None
+    
+        Example:
+        	xCAT::DSHCore->ifconfig_inet;
+
+        Comments:
+        	Internal routine only
+
+=cut
+
+#---------------------------------------------------------------------------
+
+sub ifconfig_inet
+{
+    my @local_inet = ();
+
+    if ($^O eq 'aix')
+    {
+        my @ip_address = ();
+        my @output     = `/usr/sbin/ifconfig -a`;
+
+        foreach my $line (@output)
+        {
+            ($line =~ /inet ((\d{1,3}?\.){3}(\d){1,3})\s/o)
+              && (push @local_inet, $1);
+        }
+    }
+
+    elsif ($^O eq 'linux')
+    {
+        my @ip_address = ();
+        my @output     = `/sbin/ifconfig -a`;
+
+        foreach my $line (@output)
+        {
+            ($line =~ /inet addr:((\d{1,3}?\.){3}(\d){1,3})\s/o)
+              && (push @local_inet, $1);
+        }
+    }
+}

 #---------------------------------------------------------------------------

@@ -407,7 +407,7 @@ sub lshwconn_parse_args
    }
    if (scalar(@error_type_nodes)) {
        my $tmp_nodelist = join ',', @error_type_nodes;
-        my $link = (scalar(@error_type_nodes) eq '1')? 'is':'are';
+        my $link = (scalar(@error_type_nodes) == '1')? 'is':'are';
        return( ["Node type of node(s) $tmp_nodelist $link not supported for this command in FSPAPI.\n"]);
    }
    #$nodetypetab->close();
@@ -517,14 +517,12 @@ sub getmacs {
 	         $data.= "\n$_\n";
 	         push @$value, "\n$_\n";
 	      } elsif ( /^ent\s+/ ||  /^hfi-ent\s+/ ) {
-	         #my @fields = split /\s+/, $_;
-	         #my $mac    = $fields[2];
-	         #$mac    = format_mac( $mac );
-	         #$fields[2] = $mac;
-	         #$data  .= join(" ",@fields)."\n";
-	         #push @$value, join(" ",@fields)."\n";
-                 $data .= "$_\n";
-                 push @$value, "$_\n";
+	         my @fields = split /\s+/, $_;
+	         my $mac    = $fields[2];
+	         $mac    = format_mac( $mac );
+	         $fields[2] = $mac;
+	         $data  .= join(" ",@fields)."\n";
+	         push @$value, join(" ",@fields)."\n";
 	      }
 	   }
 	   push @$res,[$node,$data,0];
@@ -264,7 +264,7 @@ sub temp {
            # No frame commands for IVM 
            ################################# 
            if ( $hwtype eq "ivm" ) {
-                push @result, [$name,"$prefix Not available (No BPA)",0];
+                push @result, [$name,"$prefix Not available (No BPA)",1];
                next;
            }
            ################################# 
@@ -272,14 +272,14 @@ sub temp {
            ################################# 
            if ( @$d[4] !~ /^(fsp|lpar|cec)$/ ) {
                my $text = "$prefix Only available for CEC/LPAR";
-                push @result, [$name,$text,0];
+                push @result, [$name,$text,1];
                next;
            }
            ################################# 
            # Error - No frame 
            #################################
            if ( $mtms eq "0" ) {
-                push @result, [$name,"$prefix Not available (No BPA)",0];
+                push @result, [$name,"$prefix Not available (No BPA)",1];
                next;
            }
            #################################
@@ -352,7 +352,7 @@ sub rackenv {
            ################################# 
            if ( @$d[4] !~ /^(bpa|frame)$/ ) {
                my $text = "$prefix Only available for BPA/Frame";
-                push @result, [$name,$text,0];
+                push @result, [$name,$text,1];
                next;
            }
            
@@ -435,7 +435,7 @@ sub lcds {
    if( $type eq "lpar" ) {
        $action = "query_lcds";
    } elsif ($type eq "blade") {
-        $action = "pblade_query_lcds";  
+        $action = "pblade_query_lcds";
    } else {
        $action = "cec_query_lcds";
    } 
@@ -16,7 +16,7 @@ use xCAT::Usage;
 use xCAT::NodeRange;
 use xCAT::FSPUtils;
 use xCAT::VMCommon;
-use Data::Dumper;
+#use Data::Dumper;
 use xCAT::MsgUtils qw(verbose_message);
 ##############################################
 # Globals
@@ -48,26 +48,15 @@ sub parse_args {
 ##########################################################################
 # Parse the chvm command line for options and operands
 ##########################################################################
-my @query_array = ();
-my %param_list_map = (
-    'vmcpus' => 'part_get_lpar_processing',
-    'vmmemory' => 'part_get_lpar_memory',
-    'add_physlots' => 'part_get_all_io_bus_info',
-    'del_physlots' => 'part_get_all_io_bus_info',
-    'add_vmnics' => 'part_get_all_vio_info',
-    'add_vmstorage' => 'part_get_all_vio_info',
-    'del_vadapter' => 'part_get_all_vio_info'
-);

 sub chvm_parse_extra_options {
 	my $args = shift;
 	my $opt = shift;
    # Partition used attributes #
-    my @support_ops = qw(vmcpus vmmemory add_physlots vmothersetting add_vmstorage add_vmnics del_vadapter del_physlots);
+    my @support_ops = qw(vmcpus vmmemory vmphyslots vmothersetting vmstorage vmnics del_vadapter);
 	if (ref($args) ne 'ARRAY') {
 		return "$args";
 	}	
-    my %tmp_hash = ();
 	foreach (@$args) {
 		my ($cmd, $value) = split (/\=/, $_);
 		if (!defined($value)) {
@@ -86,33 +75,17 @@ sub chvm_parse_extra_options {
 #				return "'$value' invalid";
 #			}
        } elsif (grep(/^$cmd$/, @support_ops)) {
-            if (exists($param_list_map{$cmd})) {
-                $tmp_hash{$param_list_map{$cmd}} = 1;
-            }
            if (exists($opt->{p775})) {
                return "'$cmd' doesn't work for Power 775 machines.";
-            } elsif ($cmd eq "del_vadapter") {
-                if ($value !~ /^\d+$/) {
-                    return "Invalid param '$value', only one slot id can be specified";
-                }
-            } elsif ($cmd eq "del_physlots") {
-                my @tmp_array = split ",",$value;
-                foreach (@tmp_array) {
-                    unless (/(0x\w{8})/) {
-                        return "'$_' is invalid";
-                    }
-                }
            } elsif ($cmd eq "vmothersetting") {
                if ($value =~ /hugepage:\s*(\d+)/i) {
                    $opt->{huge_page} = $1;
-                    $tmp_hash{'get_huge_page'} = 1;
                }
                if ($value =~ /bsr:\s*(\d+)/i) {
                    $opt->{bsr} = $1;
-                    $tmp_hash{'get_cec_bsr'} = 1;
                }
                next;
-            } elsif ($cmd eq "add_vmstorage") {
+            } elsif ($cmd eq "vmstorage") {
                if (exists($opt->{vios})) {
                    if ($value !~ /\d+/) {
                        return "'$value' is invalid, must be numbers";
@@ -141,13 +114,13 @@ sub chvm_parse_extra_options {
            } elsif ($cmd eq "vmmemory") {
                if ($value =~ /^([\d|.]+)([G|M]?)\/([\d|.]+)([G|M]?)\/([\d|.]+)([G|M]?)$/i) {
                    my ($mmin, $mcur, $mmax);
-                    if ($2 eq "G" or $2 eq '') {
+                    if ($2 == "G" or $2 == '') {
                        $mmin = $1 * 1024;
                    } 
-                    if ($4 eq "G" or $4 eq '') {
+                    if ($4 == "G" or $4 == '') {
                        $mcur = $3 * 1024;
                    }
-                    if ($6 eq "G" or $6 eq '') {
+                    if ($6 == "G" or $6 == '') {
                        $mmax = $5 * 1024;
                    }
                    unless ($mmin <= $mcur and $mcur <= $mmax) {
@@ -156,7 +129,7 @@ sub chvm_parse_extra_options {
                } else {
                    return "'$value' is invalid";
                }
-            } elsif ($cmd eq "add_physlots") {
+            } elsif ($cmd eq "vmphyslots") {
                my @tmp_array = split ",",$value;
                foreach (@tmp_array) {
                    unless (/(0x\w{8})/) {
@@ -170,7 +143,7 @@ sub chvm_parse_extra_options {
                        return "'$_' is invalid";
                    }
                }
-            } elsif ($cmd eq "add_vmnics") {
+            } elsif ($cmd eq "vmnics") {
                my @tmp_array = split ",", $value;
                foreach (@tmp_array) {
                    unless (/^vlan\d+$/i) {
@@ -184,7 +157,6 @@ sub chvm_parse_extra_options {
 		}
 		$opt->{$cmd} = $value;
 	}
-    @query_array = keys(%tmp_hash);
 	return undef;
 }

@@ -206,9 +178,8 @@ sub chvm_parse_args {
    # Process command-line arguments
    #############################################
    if ( !defined( $args )) {
-        #$request->{method} = $cmd;
-        #return( \%opt );
-        return ( usage() );
+        $request->{method} = $cmd;
+        return( \%opt );
    }
    #############################################
    # Checks case in GetOptions, allows opts
@@ -423,7 +394,7 @@ sub chvm_parse_args {
        my $check_chvm_arg = chvm_parse_extra_options(\@ARGV, \%opt);
        if (defined($check_chvm_arg)) {
            return (usage("Invalid argument: $check_chvm_arg"));
-        } elsif (($opt{lparname}) && ($opt{lparname} ne '*') && (scalar(@{$request->{node}}) > '1')){
+        } elsif (($opt{lparname} ne '*') && (scalar(@{$request->{node}}) > '1')){
            return(usage( "Invalid argument: must specify '*' for more than one node" ));
        }
        if ((exists($opt{lparname}) ||exists($opt{huge_page})) && 
@@ -616,6 +587,7 @@ sub mkvm_parse_args {
    if ( (!exists( $opt{i} ) ||  !exists( $opt{r} )) ) {
        return(usage());
    }
+    } 
    $opt{target} = \@{$request->{node}};
    my $ppctab = xCAT::Table->new( 'ppc');
    unless($ppctab) {
@@ -640,11 +612,9 @@ sub mkvm_parse_args {
            return(usage("For Power 775, please make sure the noderange are in one CEC "));
        }
    } 
-    #if (exists($opt{p775})) {
+    if (exists($opt{p775})) {
        $request->{node} = [$other_p]; 
        $request->{noderange} = $other_p;  
-    #}
-
    }
    ####################################
    # No operands - add command name 
@@ -749,7 +719,7 @@ sub lsvm_parse_args {
    $Getopt::Long::ignorecase = 0;
    Getopt::Long::Configure( "bundling" );

-    if ( !GetOptions( \%opt, qw(V|verbose l|long p775 updatedb) )) {
+    if ( !GetOptions( \%opt, qw(V|verbose l|long p775) )) {
        return( usage() );
    }
    if (exists($opt{l}) && !exists($opt{p775})) {
@@ -788,12 +758,11 @@ sub modify {
    return op_extra_cmds ($request, $hash) if ($request->{opt}->{lparname} || $request->{opt}->{huge_page});
    return ([["Error", "Miss argument\n".$usage_string, 1]]);
 }
-
 sub do_op_extra_cmds {
    my $request = shift;
    my $hash = shift;
    my @values = ();
-    my %lpar_hash = ();
+
    while (my ($mtms, $h) = each(%$hash)) {
        my $memhash;
        while (my($name, $d) = each(%$h)) {
@@ -803,27 +772,14 @@ sub do_op_extra_cmds {
 	        if ($op eq "lparname") {
 		    $action = "set_lpar_name";
 	        } elsif ($op eq "huge_page") {
-                    my @td = @$d;
-                    @td[0] = 0;
-                    my $tmphash = &query_cec_info_actions($request, $name, \@td, 1, ["get_huge_page"]);
-                    if ($tmphash->{huge_page_avail}) {
-                        if ($param > $tmphash->{huge_page_avail}) {
-                            push @values, [$name, "No enough huge pages, only $tmphash->{huge_page_avail} pages available", 0];
-                            $param = $tmphash->{huge_page_avail};
-                        }
-                        $param = "1/$param/$param";
-                    } else {
-                        push @values, [$name, "No huge page available to configure", 0];
-                        next;
-                    }
 		    $action = "set_huge_page";
 	        } elsif ($op eq "vmcpus") {
                    $action = "part_set_lpar_pending_proc";
-                } elsif ($op eq "add_physlots" or $op eq "del_physlots") {
+                } elsif ($op eq "vmphyslots") {
                    $action = "set_io_slot_owner_uber";
                } elsif ($op eq "del_vadapter") {
                    $action = "part_clear_vslot_config";
-                } elsif ($op eq "add_vmnics") {
+                } elsif ($op eq "vmnics") {
                    my @vlans = split /,/,$param;
                    foreach (@vlans) {
                        if (/vlan(\d+)/i) {
@@ -842,7 +798,7 @@ sub do_op_extra_cmds {
                        }
                    }
                    next;
-                } elsif ($op eq "add_vmstorage") {
+                } elsif ($op eq "vmstorage") {
                    foreach my $v_info (@$param) {
                        if ($v_info =~ /(\d+),([\w_-]*):(\d+)/) {
                            my $vios = &find_lpar_id($request, @$d[3], $2);
@@ -864,28 +820,24 @@ sub do_op_extra_cmds {
                    my @td = @$d;
                    @td[0] = 0;
                    $memhash = &query_cec_info_actions($request, $name, \@td, 1, ["part_get_hyp_process_and_mem"]);
-                    unless (scalar keys(%$memhash)) {
-                        push @values, [$mtms, "Can not get hypervisor information", 1];
-                        next;
-                    }
                    if (!exists($memhash->{run})) {
                        if ($param =~ /(\d+)([G|M]?)\/(\d+)([G|M]?)\/(\d+)([G|M]?)/i) {
                            my $memsize = $memhash->{mem_region_size};
                            my $min = $1;
-                            if ($2 eq "G" or $2 eq '') {
+                            if ($2 == "G" or $2 == '') {
                                $min = $min * 1024;
                            } 
-                            $min = int($min/$memsize);
+                            $min = $min/$memsize;
                            my $cur = $3;
-                            if ($4 eq "G" or $4 eq '') {
+                            if ($4 == "G" or $4 == '') {
                                $cur = $cur * 1024;
                            }
-                            $cur = int($cur/$memsize);
+                            $cur = $cur/$memsize;
                            my $max = $5;
-                            if ($6 eq "G" or $6 eq '') {
+                            if ($6 == "G" or $6 == '') {
                                $max = $max * 1024;
                            }
-                            $max = int($max/$memsize);
+                            $max = $max/$memsize;
                            $request->{opt}->{$op} ="$min/$cur/$max";
                            $param = $request->{opt}->{$op};
                        } else {
@@ -897,11 +849,7 @@ sub do_op_extra_cmds {
                    $memhash->{lpar_used_regions} = 0;
                    my $ret = &deal_with_avail_mem($request, $name, $d, $memhash);
                    if (ref($ret) eq "ARRAY") {
-                        if (@$ret[2]) {
-                            return ([[@$ret]]);
-	                 } else {
-                            push @values, $ret;
-                        }
+                        return ([[@$ret]]);
                    }
                    $param = $memhash->{memory};
                    $action = "part_set_lpar_pending_mem";
@@ -915,32 +863,15 @@ sub do_op_extra_cmds {
                }
                my $tmp_value = ($param eq '*') ? $name : $param;
                xCAT::MsgUtils->verbose_message($request, "$request->{command} $action for node:$name, parm:$tmp_value."); 
-                my @tmpd = @$d;
-                if ($op eq "del_physlots") {
-                    @tmpd[0] = "-1";
-                }
-                my $value = xCAT::FSPUtils::fsp_api_action($request, $name, \@tmpd, $action, 0, $tmp_value);
+                my $value = xCAT::FSPUtils::fsp_api_action($request, $name, $d, $action, 0, $tmp_value);
                if (@$value[1] && ((@$value[1] =~ /Error/i) && (@$value[2] ne '0'))) {
                    return ([[$name, @$value[1], '1']]) ;
                } else {
                    push @values, [$name, "Success", '0'];
                } 
            }
-            if (@query_array) {
-                my $rethash = query_cec_info_actions($request, $name, $d, 1, \@query_array);
-                unless (scalar keys(%$rethash)) {
-                    push @values, [$mtms, "Can not get hypervisor information", 1];
-                    next;
-                }
-                # need to add update db here 
-                $lpar_hash{$name} = $rethash;     
-                $lpar_hash{$name}->{parent} = @$d[3];
-            }
        }
    } 
-    if (%lpar_hash) {
-        update_vm_db($request, \%lpar_hash);
-    }
    return \@values;
 }
 sub check_node_info {
@@ -1183,7 +1114,7 @@ sub get_cec_lpar_name {
    my @value = split(/\n/, $lpar_info);
    foreach my $v (@value) {
        if($v =~ /lparname:\s*([^\,]*),\s*lparid:\s*([\d]+),/) {
-            if($2 eq $lparid) {
+            if($2 == $lparid) {
                return $1;
            }
        }
@@ -1707,7 +1638,7 @@ sub xCATdB {
                $profile,
                $parent ); 
        
-        return( xCAT::PPCdb::add_ppc( $hwtype, [$values],'','',"FSP" )); 
+        return( xCAT::PPCdb::add_ppc( $hwtype, [$values] )); 
    }
    return undef;
 }
@@ -1721,7 +1652,6 @@ my @partition_query_actions = qw(part_get_partition_cap part_get_hyp_process_and
 sub parse_part_get_info {
    my $hash = shift;
    my $data = shift;
-    my $lparid = shift;
    my @array = split /\n/, $data;
    foreach my $line (@array) {
        chomp($line);
@@ -1738,16 +1668,13 @@ sub parse_part_get_info {
            $hash->{process_units_avail} = $2;
        } elsif ($line =~ /Authority Lpar id:(\w+)/i) {
            $hash->{service_lparid} = $1;
-        } elsif ($line =~ /(\d+),(\d+),[^,]*,(\w+),\w*\(([\w| |-|_|\/]*)\)/) {
+        } elsif ($line =~ /(\d+),(\d+),[^,]*,(\w+),\w*\(([\w| |-|_]*)\)/) {
            $hash->{bus}->{$3}->{cur_lparid} = $1;
            $hash->{bus}->{$3}->{bus_slot} = $2;
            $hash->{bus}->{$3}->{des} = $4;
-            if ($lparid and $lparid eq $1) {
-                push @{$hash->{lpar_phy_bus}}, $3;
-            }
        } elsif ($line =~ /Phy drc_index:(\w+), Port group: (\w+), Phy port id: (\w+)/) {
            $hash->{phy_drc_group_port}->{$1}->{$2}->{$3} = '1';
-        #} elsif ($line =~ /adapter_id=(\w+),lpar_id=([\d|-]+).*port_group=(\d+),phys_port_id=(\d+).*drc_index=(\w+),.*/) {
+        } elsif ($line =~ /adapter_id=(\w+),lpar_id=([\d|-]+).*port_group=(\d+),phys_port_id=(\d+).*drc_index=(\w+),.*/) {
            if (($2 == -1) && ($4 == 255)) {
                $hash->{logic_drc_phydrc}->{$3}->{$5} = $1;
                #$hash->{logic_drc_phydrc}->{$5}->{$1} = [$2,$3,$4];
@@ -1760,49 +1687,12 @@ sub parse_part_get_info {
            $hash->{lpar0_used_mem} = $2;
            $hash->{phy_min_mem_req} = $3;
            #print "===>lpar0_used_mem:$hash->{lpar0_used_mem}.\n";
-        } elsif ($line =~ /Curr Memory (Min|Req|Max):\s*([\d]*)[^\(]*\((\d+)\s*regions\)/) {
-            if ($1 eq 'Min') {
-                $hash->{lpar_mem_min} = $2
-            } elsif ($1 eq 'Max') {
-                $hash->{lpar_mem_max} = $2;
-            } else {
-                $hash->{lpar_mem_req} = $2;
-                $hash->{lpar_used_regions} = $3;
-            }
-        } elsif ($line =~ /Curr Processor (Min|Req|Max):\s*(\d+)/) {
-            if ($1 eq 'Min') {
-                $hash->{lpar_cpu_min} = $2;
-            } elsif ($1 eq 'Max') {
-                $hash->{lpar_cpu_max} = $2;
-            } else {
-                $hash->{lpar_cpu_req} = $2;
-            }
-        } elsif ($line =~ /\s*lpar_id=(\d+),type=vSCSI,slot=(\d+),attr=(\d+).*remote_lpar_id=0x(\w+),remote_slot_num=0x(\w+)/) {
-            if ($3 eq '0') {
-                my $lparid = hex($4);
-                my $slotid = hex($5);
-                push @{$hash->{lpar_vmstorage_client}}, "$lparid:$slotid";
-            } else {
-                if (exists($hash->{lpar_vmstorage_server})) {
-                    $hash->{lpar_vmstorage_server}++;
-                } else {
-                    $hash->{lpar_vmstorage_server} = 1;
-                }
-            }
-        } elsif ($line =~ /\s*lpar_id=(\d+),type=(vEth),slot=(\d+).*port_vlan_id=(\d+),mac_addr=(\w+)/) {
-            push @{$hash->{lpar_vmnics}}, "vlan$4";
+        } elsif ($line =~ /Curr Memory Req:[^\(]*\((\d+)\s*regions\)/) {
+            $hash->{lpar_used_regions} = $1;
        } elsif ($line =~ /Available huge page memory\(in pages\):\s*(\d+)/) {
            $hash->{huge_page_avail} = $1;
        } elsif ($line =~ /Available BSR array:\s*(\d+)/) {
            $hash->{cec_bsr_avail} = $1;
-        } elsif ($line =~ /^\d+\/(\d+)\/\d+$/) {
-            if ($1 ne 0) {
-                push @{$hash->{lpar_othersetting}}, "hugepage:$1";
-            }
-        } elsif ($line =~ /^(\d+)\.$/) {
-            if ($1 ne 0) {
-                push @{$hash->{lpar_othersetting}}, "bsr:$1";
-            }
        }
    }
 }
@@ -1813,7 +1703,6 @@ sub query_cec_info_actions {
    my $td = shift;
    my $usage = shift;
    my $action_array = shift;
-    my $lpar_hash = shift;
    my $lparid = @$td[0];
    my $data;
    my @array = ();
@@ -1828,16 +1717,12 @@ sub query_cec_info_actions {
        chomp(@$values[1]);
        #if ($action eq "part_get_partition_cap" and (@$values[1] =~ /Error:/i or @$values[2] ne 0)) {
        if (@$values[1] =~ /Error:/i or @$values[2] ne 0) {
-            next; #return ([[@$values]]);
+            return ([[@$values]]);
        }
        if (@$values[1] =~ /^$/) {
            next;
        }
-        if ($usage eq 1 or $usage eq 2) {
-            &parse_part_get_info(\%hash, @$values[1], $lparid);
-        }
-
-        if ($usage eq 0 or $usage eq 2) {
+        if ($usage eq 0) {
            if ($lparid) {
                if ($action eq "lpar_lhea_mac") {
                    my @output = split /\n/,@$values[1];
@@ -1892,72 +1777,18 @@ sub query_cec_info_actions {
            }
 	    #$data .= "@$values[1]\n\n";
            push @array, [$name, @$values[1], @$values[2]];
-        } 
-    }
-    if ($usage eq 0 or $usage eq 2) {
-        #return $data;
-        if ($usage eq 2) {
-            %$lpar_hash = %hash;
+        } else {
+            &parse_part_get_info(\%hash, @$values[1]);
        }
+    }
+    if ($usage eq 0) {
+        #return $data;
        return \@array;
    } else {
        return \%hash; 
    }
 }

-sub update_vm_db {
-    my $request = shift;
-    my $lpar_hash = shift;
-    my $vm_hd = xCAT::Table->new('vm');
-    my %name_id_map = ();
-    my $commit = 0;
-    foreach (keys (%$lpar_hash)) {
-        my %db_update = ();
-        my $node_hash = $lpar_hash->{$_};
-        if (exists($node_hash->{lpar_cpu_min})) {
-            $db_update{cpus} = "$node_hash->{lpar_cpu_min}/$node_hash->{lpar_cpu_req}/$node_hash->{lpar_cpu_max}";
-        }
-        if (exists($node_hash->{lpar_mem_min})) {
-            $db_update{memory} = "$node_hash->{lpar_mem_min}/$node_hash->{lpar_mem_req}/$node_hash->{lpar_mem_max}";
-        }
-        if (exists($node_hash->{lpar_vmstorage_server})) {
-            $db_update{storage} = $node_hash->{lpar_vmstorage_server};
-        } elsif (exists($node_hash->{lpar_vmstorage_client})) {
-            my @tmp_array = ();
-            foreach (@{$node_hash->{lpar_vmstorage_client}}) {
-                if (/(\d+):(\d+)/) {
-                    if (exists($name_id_map{$1})) {
-                        push @tmp_array, "$name_id_map{$1}:$2";
-                    } else {
-                        my $vios_name = &find_lpar_name($request, $node_hash->{parent}, $1);
-                        if (defined($vios_name)) {
-                            $name_id_map{$1} = $vios_name;
-                            push @tmp_array, "$vios_name:$2";
-                        }
-                    }
-                }
-            }
-            $db_update{storage} = join(",",@tmp_array);
-        }
-        if (exists($node_hash->{lpar_vmnics})) {
-            $db_update{nics} = join(",",@{$node_hash->{lpar_vmnics}});
-        }
-        if (exists($node_hash->{lpar_phy_bus})) {
-            $db_update{physlots} = join(",",@{$node_hash->{lpar_phy_bus}});
-        }
-        if (exists($node_hash->{lpar_othersetting})) {
-            $db_update{othersettings} = join(",",@{$node_hash->{lpar_othersetting}});
-        }
-        if (%db_update) {
-            $vm_hd->setNodeAttribs($_,\%db_update);
-            $commit = 1;
-        }
-    }
-    if ($commit) {
-        $vm_hd->commit;
-    }
-}
-
 #my @partition_query_actions = qw(part_get_partition_cap part_get_num_of_lpar_slots part_get_hyp_config_process_and_mem part_get_hyp_avail_process_and_mem part_get_service_authority_lpar_id part_get_shared_processing_resource part_get_all_vio_info lpar_lhea_mac part_get_all_io_bus_info part_get_lpar_processing part_get_lpar_memory get_huge_page get_cec_bsr);
 sub query_cec_info {
    my $request = shift;
@@ -1965,48 +1796,25 @@ sub query_cec_info {
    my $args    = $request->{opt};
    my @td = ();
    my @result = ();
-    my $usage = 0;
-    my %lpar_hash = ();
    #print Dumper($request);
    #print Dumper($hash);
    while (my ($mtms,$h) = each(%$hash) ) {
        while (my ($name, $d) = each (%$h)) {
-            my %tmp_hash = ();
            @td = @$d;
            if (@$d[0] == 0 && @$d[4] !~ /lpar|vios/) {
                last;
            }
            #my $rethash = query_cec_info_actions($request, $name, $d, 0, ["part_get_lpar_processing","part_get_lpar_memory","part_get_all_vio_info","lpar_lhea_mac","part_get_all_io_bus_info","get_huge_page","get_cec_bsr"]);
-            if ($args->{updatedb}) {
-                $usage = 2;
-            }
-            my $rethash = query_cec_info_actions($request, $name, $d, $usage, ["part_get_lpar_processing","part_get_lpar_memory","part_get_all_io_bus_info","part_get_all_vio_info","get_huge_page","get_cec_bsr"], \%tmp_hash);
+            my $rethash = query_cec_info_actions($request, $name, $d, 0, ["part_get_lpar_processing","part_get_lpar_memory","part_get_all_io_bus_info","part_get_all_vio_info","get_huge_page","get_cec_bsr"]);
 	        #push @result, [$name, $rethash, 0];
-	        #push @result, @$rethash;
-                if (scalar (@$rethash)) {
-                    push @result, @$rethash;
-                } else {
-                    push @result, [$name, "No information got", -1];
-                    last;
-                }
-                $lpar_hash{$name} = \%tmp_hash;
-                $lpar_hash{$name}->{parent} = @$d[3];
+	        push @result, @$rethash;
        }
        if (@td[0] == 0) {
-            my $rethash = query_cec_info_actions($request, @td[3],\@td, $usage);
-            if (scalar (@$rethash)) {
-                push @result, @$rethash;
-            } else {
-                push @result, [@td[3], "No information got", -1];
-                last;
-            }
+            my $rethash = query_cec_info_actions($request, @td[3],\@td, 0);
            #push @result, [@td[3], $rethash, 0];
-            #push @result, @$rethash;
+            push @result, @$rethash;
        }  
    }
-    if ($args->{updatedb} and %lpar_hash) {
-        update_vm_db($request, \%lpar_hash);
-    }
    return \@result;
 }

@@ -2101,12 +1909,9 @@ sub deal_with_avail_mem {
                my $cur_mem_in_G = $lparhash->{hyp_avail_mem} * $lparhash->{mem_region_size} * 1.0 / 1024;
                return([$name, "Parse reserverd regions failed, no enough memory, available:$cur_mem_in_G GB.", 1]);
            }           
-            if (($cur_avail > 0) and ($cur > $cur_avail)) {
-                my $cur_avail_in_G = $cur_avail * $lparhash->{mem_region_size} * 1.0 / 1024;
-                $lparhash->{memory} = "$min/$cur_avail/$max";
-		 unless ($lparhash->{full_par}) {
-                     return([$name, "Available memory is less than required, allocate $cur_avail_in_G GB.", 0]);
-		 }
+            if ($cur > $cur_avail) {
+                my $new_cur = $cur_avail;
+                $lparhash->{memory} = "$min/$new_cur/$max";
            }
        } else {
            return ([$name, "Failed to get hypervisor reserved memory regions.", 1]);
@@ -2126,25 +1931,11 @@ sub find_lpar_id {
    return undef;
 }

-sub find_lpar_name {
-    my $request = shift;
-    my $parent = shift;
-    my $id = shift;
-    my %mapping = %{$request->{ppc}->{$parent}->{mapping}};
-    foreach (keys %mapping) {
-        if ($mapping{$_} eq $id) {
-            return $_;
-        }
-    }
-    return undef;
-}
-
 sub create_lpar {
    my $request = shift;
    my $name = shift;
    my $d = shift;
    my $lparhash = shift;
-    my @ret = ();
    my $values;
    if (exists($request->{opt}->{vios})) {
        $values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_def_state", 0, 0x03);
@@ -2157,7 +1948,7 @@ sub create_lpar {
    $values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "set_lpar_name", 0, $name);
    if (@$values[2] ne 0) {
        &set_lpar_undefined($request, $name, $d);
-        return ([[$name, @$values[1], @$values[0]]]);
+        return ([$name, @$values[1], @$values[0]]);
    }
    xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_shared_pool_util_auth");
    xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_group_id");
@@ -2168,7 +1959,7 @@ sub create_lpar {
        #$values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "set_io_slot_owner", 0, join(",",@phy_io_array)); 
        if (@$values[2] ne 0) {
            &set_lpar_undefined($request, $name, $d);
-            return ([[$name, @$values[1], @$values[2]]]);
+            return ([$name, @$values[1], @$values[2]]);
        }
    }
    if (exists($lparhash->{nics})) {
@@ -2184,7 +1975,7 @@ sub create_lpar {
                $values = xCAT::FSPUtils::fsp_api_action($request,$name, $d, "part_set_veth_slot_config",0,"0,$vlanid,$mac");
                if (@$values[2] ne 0) {
                    &set_lpar_undefined($request, $name, $d);
-                    return ([[$name, @$values[1], @$values[2]]]);
+                    return ([$name, @$values[1], @$values[2]]);
                }
            }
        }
@@ -2194,7 +1985,7 @@ sub create_lpar {
            $values = xCAT::FSPUtils::fsp_api_action($request,$name, $d, "part_set_vscsi_slot_config",0,$v_info);
            if (@$values[2] ne 0) {
                &set_lpar_undefined($request, $name, $d);
-                return ([[$name, @$values[1], @$values[2]]]);
+                return ([$name, @$values[1], @$values[2]]);
            }
        }
    }
@@ -2225,23 +2016,19 @@ sub create_lpar {
    $values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_pending_proc", 0, $lparhash->{cpus});
    if (@$values[2] ne 0) {
        &set_lpar_undefined($request, $name, $d);
-        return ([[$name, @$values[1], @$values[2]]]);
+        return ([$name, @$values[1], @$values[2]]);
    }
    $values = &deal_with_avail_mem($request, $name, $d,$lparhash);
    if (ref($values) eq "ARRAY") {
-        if (@$values[2]) {
-            &set_lpar_undefined($request, $name, $d);
-            return ([[@$values]]);
-	 } else {
-            push @ret, $values;
-        }
+        &set_lpar_undefined($request, $name, $d);
+        return ([@$values]);
    }

    #print "======>memory:$lparhash->{memory}.\n";
    $values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_pending_mem", 0, $lparhash->{memory});
    if (@$values[2] ne 0) {
        &set_lpar_undefined($request, $name, $d);
-        return ([[$name, @$values[1], @$values[2]]]);
+        return ([$name, @$values[1], @$values[2]]);
    }
    
    xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_comp_modes"); 
@@ -2256,11 +2043,9 @@ sub create_lpar {
        $values = xCAT::FSPUtils::fsp_api_action($request, $name, $d, "part_set_lpar_def_state", 0, 0x02);
    }
    if (@$values[2] ne 0) {
-        return ([[$name, @$values[1], @$values[2]]]);
+        return ([$name, @$values[1], @$values[2]]);
    }
-    push @ret, [$name, "Done", 0];
-    #return ([$name, "Done", 0]);
-    return \@ret;
+    return ([$name, "Done", 0]);
 }

 sub mkspeclpar {
@@ -2269,13 +2054,12 @@ sub mkspeclpar {
    my $opt = $request->{opt};
    my $values;
    my @result = ();
-    my %lpar_hash = ();
    my $vmtab = xCAT::Table->new( 'vm');
    unless($vmtab) {
        return([["Error","Cannot open vm table", 1]]);
    }
    while (my ($mtms, $h) = each (%$hash)) {
-        my $memhash = undef;
+        my $memhash;
        my @nodes = keys(%$h);
        my $ent = $vmtab->getNodesAttribs(\@nodes, ['cpus', 'memory','physlots', 'othersettings', 'storage', 'nics']); 
        while (my ($name, $d) = each (%$h)) {
@@ -2283,18 +2067,12 @@ sub mkspeclpar {
                push @result, [$name, "Node must be LPAR", 1];
                last;
            }
-            #if (!exists($memhash->{run})) 
-            #{
+            if (!exists($memhash->{run})) {
                my @td = @$d;
                @td[0] = 0;
                $memhash = &query_cec_info_actions($request, $name, \@td, 1, ["part_get_hyp_process_and_mem","lpar_lhea_mac","part_get_all_io_bus_info"]);
-                unless (scalar keys(%$memhash)) {
-                    push @result, [$mtms, "Can not get hypervisor information", 1];
-                    last;
-                }
-                #$memhash->{run} = 1; 
-            #}
-            
+                $memhash->{run} = 1; 
+            }
            my $tmp_ent = $ent->{$name}->[0];
            if (exists($opt->{vmcpus})) {
                $tmp_ent->{cpus} = $opt->{vmcpus};
@@ -2329,40 +2107,28 @@ sub mkspeclpar {
 	    if ($tmp_ent->{cpus} =~ /^(\d+)\/(\d+)\/(\d+)$/) {
                unless ($1 <= $2 and $2 <= $3) {
                    return([[$name, "Parameter for 'vmcpus' is invalid", 1]]);
-	        } elsif ($memhash->{process_units_avail} eq '0') {
-                    push @result, [$name, "No process available", 1];
-                    next;
-                } elsif ($2 > $memhash->{process_units_avail}) {
-                    my $cur = $memhash->{process_units_avail};
-                    my $min = $1 > $cur ? $cur : $1;
-                    $tmp_ent->{cpus} = "$min/$cur/$3";
-                    push @result, [$name, "Available processor is less than required, allocate $cur processors.", 0];
                }
            } else {
                return([[$name, "Parameter for 'vmcpus' is invalid", 1]]);
            }
            if ($tmp_ent->{memory} =~ /^([\d|.]+)([G|M]?)\/([\d|.]+)([G|M]?)\/([\d|.]+)([G|M]?)$/i) {
-                if ($memhash->{hyp_avail_mem} eq '0') {
-                    push @result, [$name, "No memory available", 1];
-                    next;
-                }
                my ($mmin, $mcur, $mmax);
-                if ($2 eq "G" or $2 eq '') {
+                if ($2 == "G" or $2 == '') {
                    $mmin = $1 * 1024;
                } 
-                if ($4 eq "G" or $4 eq '') {
+                if ($4 == "G" or $4 == '') {
                    $mcur = $3 * 1024;
                }
-                if ($6 eq "G" or $6 eq '') {
+                if ($6 == "G" or $6 == '') {
                    $mmax = $5 * 1024;
                }
                unless ($mmin <= $mcur and $mcur <= $mmax) {
                    return([[$name, "Parameter for 'vmmemory' is invalid", 1]]);
                }
                my $memsize = $memhash->{mem_region_size};
-                $mmin = int(($mmin + $memsize - 1) / $memsize);
-                $mcur = int(($mcur + $memsize - 1) / $memsize);
-                $mmax = int(($mmax + $memsize - 1) / $memsize);
+                $mmin = ($mmin + $memsize) / $memsize;
+                $mcur = ($mcur + $memsize) / $memsize;
+                $mmax = ($mmax + $memsize) / $memsize;
                $tmp_ent->{memory} = "$mmin/$mcur/$mmax";
                $tmp_ent->{mem_region_size} = $memsize;
            } else {
@@ -2412,27 +2178,21 @@ sub mkspeclpar {
                    $tmp_ent->{storage} = \@array;
                }
            } else {
-                if (exists($tmp_ent->{storage})) {
-                    my @tmp_array = split ",",$tmp_ent->{storage};
-                    my $storage_array = undef;
-                    foreach (@tmp_array) {
-                        if (/([\w_-]*):(\d+)/) {
-                            my $vios = &find_lpar_id($request, @$d[3], $1);
-                            my $r_slotid = $2;
-                            if (defined($vios)) {
-                                push @$storage_array, "0,$vios,$r_slotid";
-                            } else {
-                                return ([[$name, "Cannot find lparid for Server lpar:$1"]]);
-                            }
-                        } else {
-                            return ([[$name, "Parameter for 'vmstorage' is invalid", 1]]);
+                if (exists($tmp_ent->{storage}) and $tmp_ent->{storage} !~ /^[\w_-]*:\d+$/) {
+                    return ([[$name, "Parameter for 'vmstorage' is invalid", 1]]);
+                } elsif (exists($tmp_ent->{storage})) {
+                    if ($tmp_ent->{storage} =~ /([\w_-]*):(\d+)/) {
+                        my $vios = &find_lpar_id($request, @$d[3], $1);
+                        my $r_slotid = $2;
+                        if (!defined($vios)) {
+                            return ([[$name, "Cannot find lparid for Server lpar:$1"]]);
                        }
+                        $tmp_ent->{storage} = ["0,$vios,$r_slotid"];
                    }
-                    $tmp_ent->{storage} = $storage_array;
-                    
                }
            }

+
            $tmp_ent->{hyp_config_mem} = $memhash->{hyp_config_mem};
            $tmp_ent->{hyp_avail_mem} = $memhash->{hyp_avail_mem};
            if (exists($tmp_ent->{othersettings}))  {
@@ -2452,23 +2212,11 @@ sub mkspeclpar {
            $tmp_ent->{phy_hea} = $memhash->{phy_drc_group_port};
            $tmp_ent->{logic_drc_phydrc} = $memhash->{logic_drc_phydrc};
            $values = &create_lpar($request, $name, $d, $tmp_ent); 
-            push @result, @$values;
-            #need to add update db here
-            my $rethash = query_cec_info_actions($request, $name, $d, 1, ["part_get_lpar_processing","part_get_lpar_memory","part_get_all_vio_info","part_get_all_io_bus_info","get_huge_page","get_cec_bsr"]);
-            unless (scalar keys(%$rethash)) {
-                push @result, [$mtms, "Can not get hypervisor information", 1];
-                next;
-            }
-            $lpar_hash{$name} = $rethash;     
-            $lpar_hash{$name}->{parent} = @$d[3];
-
+            push @result, $values;
            $name = undef;
            $d = undef;
        }
    }
-    if (%lpar_hash) {
-        update_vm_db($request, \%lpar_hash);
-    }
    return \@result;    
 }

@@ -2488,9 +2236,8 @@ sub mkfulllpar {
                my @td = @$d;
                @td[0] = 0;
                $rethash = query_cec_info_actions($request, $name, \@td, 1); 
-                unless (scalar keys(%$rethash)) {
-                    push @result, [$mtms, "Can not get hypervisor information", 1];
-                    next;
+                if (ref($rethash) ne 'HASH') {
+                    return ([[$mtms, "Cann't get hypervisor info hash", 1]]);
                }
                $rethash->{run} = 1; 
                #print Dumper($rethash);
@@ -2500,17 +2247,15 @@ sub mkfulllpar {
            $lpar_param{memory} = "1/".$rethash->{hyp_avail_mem}."/".$rethash->{hyp_config_mem};
            $lpar_param{hyp_config_mem} = $rethash->{hyp_config_mem};
            $lpar_param{hyp_avail_mem} = $rethash->{hyp_avail_mem};
-            $lpar_param{mem_region_size} = $rethash->{mem_region_size};
            my @phy_io_array = keys(%{$rethash->{bus}});
            $lpar_param{physlots} = join(",", @phy_io_array);
            $lpar_param{huge_page} = "1/".$rethash->{huge_page_avail}."/".$rethash->{huge_page_avail};
            $lpar_param{bsr_num} = $rethash->{cec_bsr_avail};
            $lpar_param{phy_hea} = $rethash->{phy_drc_group_port};
            $lpar_param{logic_drc_phydrc} = $rethash->{logic_drc_phydrc}; 
-            $lpar_param{full_par} = 1;
            $values = &create_lpar($request, $name, $d, \%lpar_param);
            $rethash->{logic_drc_phydrc} = $lpar_param{logic_drc_phydrc};
-            push @result, @$values;
+            push @result, $values;
            $name = undef;
            $d = undef;
        }    
@@ -217,23 +217,14 @@ sub is_me
    #my ($b1, $b2, $b3, $b4) = split /\./, $nameIP;

    # get all the possible IPs for the node I'm running on
-    # this is a common subroutine for both AIX and Linux,
-    # AIX does not have ip command
-    my $ipcmd;
-    if ( -f "/sbin/ip" )
-    {
-        $ipcmd = "ip addr | grep 'inet'";
-    }
-    else
-    {
-        $ipcmd = "ifconfig -a | grep 'inet'";
-    }
-    my $result = xCAT::Utils->runcmd($ipcmd, -1, 1);
+    my $ifcmd = "ifconfig -a | grep 'inet'";
+    my $result = xCAT::Utils->runcmd($ifcmd, -1, 1);
    if ($::RUNCMD_RC != 0)
    {
-        my $str="Error running ipcmd";
-        xCAT::MsgUtils->message("S", $str);
-        $::VERBOSE = $verb;
+        my $rsp;
+        #	push @{$rsp->{data}}, "Could not run $ifcmd.\n";
+        #    xCAT::MsgUtils->message("E", $rsp, $callback);
+		$::VERBOSE = $verb;
        return 0;
    }

@@ -241,6 +232,7 @@ sub is_me
    {
        my ($inet, $myIP, $str) = split(" ", $int);
        chomp $myIP;
+        $myIP =~ s/addr://;
        $myIP =~ s/\/.*//; # ipv6 address 4000::99/64
        $myIP =~ s/\%.*//; # ipv6 address ::1%1/128

@@ -1031,7 +1023,7 @@ sub dolitesetup
        $nrange = join(',',@nodel);
    }

-	@flist = xCAT::Utils->runcmd("/opt/xcat/bin/litefile $nrange", -1);
+	my @flist = xCAT::Utils->runcmd("/opt/xcat/bin/litefile $nrange", -1);
    if (scalar(@flist) > 0) {
        foreach my $l (@flist) {
 			my ($j1, $j2, $file) = split /\s+/, $l;
@@ -629,8 +629,7 @@ sub  get_adap_prop    {
    $cmd[0] = "\" supported-network-types\" " . $phandle . " get-package-property\r";
    $msg[0] = "Status: rc and all supported network types now on stack\n";
    #$pattern[0] = "(.*)3 >(.*)";
-    #$pattern[0] = "3 >";
-    $pattern[0] = "ok";
+    $pattern[0] = "3 >";
    $newstate[0] = 1;

    # state 1, return code and string on stack
@@ -638,8 +637,7 @@ sub  get_adap_prop    {
    $cmd[1] = ".\r";
    $msg[1] = "Status: All supported network types now on stack\n";
    #$pattern[1] = "(.*)2 >(.*)";
-    #$pattern[1] = "2 >";
-    $pattern[1] = "ok";
+    $pattern[1] = "2 >";
    $newstate[1] = 2;

    # state 2, data ready to decode
@@ -693,16 +691,6 @@ sub  get_adap_prop    {
        $timeout,
        [ qr/$pattern[$state]/i,
            sub {
-               if ($state eq 1) {
-                    if ($rconsole->before() =~ /-\d+/) {
-                        nc_msg($verbose, "Status: Error getting adapter property for phandle=$phandle.\n");
-                        $state = 7;
-                        $rconsole->clear_accum();
-                        $rc = 1;
-                        return 1;
-                    }
-                }
-
                nc_msg($verbose, $msg[$state]);
                $state = $newstate[$state];
                $rconsole->clear_accum();
@@ -890,15 +878,6 @@ sub get_mac_addr {
            $timeout,
            [qr/$pattern[$state]/=>
            sub {
-                if ($state eq 1) {
-                    if ($rconsole->before() =~ /-\d+/) {
-                        nc_msg($verbose, "Status: Error getting MAC address for phandle=$phandle.\n");
-                        $rconsole->clear_accum();
-                        $state = 4;
-                        $rc = 1;
-                        return undef;
-                    }
-                }
                nc_msg($verbose, $msg[$state]);
                $state = $newstate[$state];
                $rconsole->clear_accum();
@@ -1040,8 +1019,7 @@ sub get_mac_addr {
    $cmd[0] = "\" ibm,loc-code\" $phandle get-package-property\r";
    $msg[0] = "Status:  return code and loc-code now on stack\n";
    #$pattern[0] = "(.*)3 >(.*)";
-    #$pattern[0] = "3 >";
-    $pattern[0] = "ok";
+    $pattern[0] = "3 >";
    $newstate[0] = 1;

    # cmd(1) is a dot (.). This is a stack manipulation command that removes one
@@ -1074,16 +1052,6 @@ sub get_mac_addr {
            $timeout,
            [qr/$pattern[$state]/=>
            sub {
-                if ($state eq 1) {
-                    if ($rconsole->before() =~ /-\d+/) {
-                        nc_msg($verbose, "Status: Error getting adapter location for phandle=$phandle.");
-                        $rconsole->clear_accum();
-                        $state = 3;
-                        $rc = 1;
-                        return undef;
-                    }
-                }
-
                nc_msg($verbose, $msg[$state]);
                $rconsole->clear_accum();
                $state = $newstate[$state];
@@ -1157,19 +1125,10 @@ sub get_mac_addr {
        return undef if ($rc eq 1);
    }
    # Did we find one or more adapters?
-    my @loc_array = split /\n/,$result[3];
-    my $found = 0;
-    $loc_code = '';
-    foreach my $line ( @loc_array ) {
-        if ($line =~ /(\w*):(.*):([\w|\.|-]*):/) {
-            $loc_code .= $3; 
-            $found = 1;
-        }
-    }
-    if ($found) {
-        $loc_code =~ s/\.$//;
-        return $loc_code;
-    } else {
+
+    if ($result[3] =~ /(\w*):(.*):(\w*\.\w*\.\w*):/) {
+        $loc_code = $3;
+    }else {
        return undef;
    }
 }
@@ -1281,12 +1240,6 @@ sub  ping_server{
    $msg[3] = "Status: ping return code now on stack\n";
    $newstate[3] = 4;

-    # get the timeout for ping test
-    my $to4pt;
-    if ( $ENV{TIMEOUT4PINGTEST} =~ /^\d+$/ ) {
-        $to4pt = ",$ENV{TIMEOUT4PINGTEST}";
-    } 
-
    #IPv6
    if ( $server_ip =~ /:/ ) {
        #::1, calculate link local address
@@ -1296,9 +1249,9 @@ sub  ping_server{
        } else {
            $linklocal_ip = $client_ip;
        }
-        $cmd[3] = "ping $full_path_name:ipv6,$server_ip,$linklocal_ip,$gateway_ip$to4pt\r";
+        $cmd[3] = "ping $full_path_name:ipv6,$server_ip,$linklocal_ip,$gateway_ip\r";
    } else {
-        $cmd[3] = "ping $full_path_name:$server_ip,$client_ip,$gateway_ip$to4pt\r";
+        $cmd[3] = "ping $full_path_name:$server_ip,$client_ip,$gateway_ip\r";
    }
    $pattern[3] = ".*ping(.*)ok(.*)0 >(.*)";

@@ -2675,7 +2628,7 @@ sub lparnetbootexp
            sub {
                $rc = 2;
                $rconsole->clear_accum();
-                nc_msg(1, "Please make sure rcons $node works.\n");
+                nc_msg($verbose, "Please make sure rcons $node works.\n");
            }
        ],
    );
@@ -3047,21 +3000,6 @@ sub lparnetbootexp
                        $device_type = "physical";
                    }

-                    if (defined($mac_address)) {
-                        my @newmacs = ();
-                        my @allmacs = split /\|/,$mac_address;
-                        if ( !xCAT::Utils->isAIX() ) {
-                            foreach my $mac_a ( @allmacs ) {
-                                $mac_a = lc($mac_a);
-                                $mac_a =~ s/(\w{2})/$1:/g;
-                                $mac_a =~ s/:$//;
-                                push @newmacs, $mac_a;
-                            }
-                            $mac_address = join("|",@newmacs);
-                        } 
-                    }
-
-
                    if($colon) {
                        nc_msg($verbose, "$adap_type[$i]\:$loc_code\:$mac_address\:$full_path_name_array[$i]\:$ping_result\:$device_type\:\:\:\:\n");
                        $outputarrayindex++;
@@ -138,9 +138,8 @@ This program module file, supports the xcat messaging and logging
                N - Node informational  goes to STDOUT
                S - Message will be logged to syslog ( severe error)
                     Note S can be combined with other flags for example
-		            SE logs message to syslog and is sent to STDERR.
-			        SA logs message to syslog and to the auditlog DB table. (only xcatd)
-		        A logs message auditlog DB table only. (only for xcatd) 
+					 SE logs message to syslog and is sent to STDERR.
+					 SA logs message to syslog and to the auditlog DB table 
                V - verbose.  This flag is not valid, the calling routine
 				should check for verbose mode before calling the message

@@ -176,7 +175,7 @@ This program module file, supports the xcat messaging and logging
        # Message to Syslog 
        xCAT::MsgUtils->message('S', "Host $host not responding\n");
 		
-        # Message to Syslog and auditlog table (only used by xcatd) 
+        # Message to Syslog and auditlog table 
 		# see tabdump -d auditlog
        my $rsp = {};
 		$rsp->{syslogdata}->[0] = "$host not responding\n"; # for syslog
@@ -190,18 +189,6 @@ This program module file, supports the xcat messaging and logging
 		$rsp->{status} -> [0] = $status; 
        xCAT::MsgUtils->message('SA', $rsp);
 		
-        # Message to only  auditlog table (only used by xcatd) 
-		# see tabdump -d auditlog
-        my $rsp = {};
-		$rsp->{userid} ->[0] = $user; 
-		$rsp->{clientname} -> [0] = $client; 
-		$rsp->{clienttype} -> [0] = $clienttype; 
-		$rsp->{command} -> [0] = $command; 
-		$rsp->{noderange} -> [0] = $noderange; 
-		$rsp->{args} -> [0] = $arguments; 
-		$rsp->{status} -> [0] = $status; 
-        xCAT::MsgUtils->message('A', $rsp);
-		
        # Message to Log and Syslog 
        xCAT::MsgUtils->message('LS', "Host $host not responding\n");
 		
@@ -210,44 +197,44 @@ This program module file, supports the xcat messaging and logging

    Use with callback
        # Message to callback
-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{data}->[0] = "Job did not run. \n";
 	    xCAT::MsgUtils->message("D", $rsp, $::CALLBACK);

-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{error}->[0] = "No hosts in node list\n";
 	    xCAT::MsgUtils->message("E", $rsp, $::CALLBACK);

-        my $rsp = {};
-        $rsp->{node}->[0]->{name}->[0] ="mynode";
-        $rsp->{node}->[0]->{data}->[0] ="mydata";
-        xCAT::MsgUtils->message("N", $rsp, $callback);
+      my $rsp = {};
+     $rsp->{node}->[0]->{name}->[0] ="mynode";
+     $rsp->{node}->[0]->{data}->[0] ="mydata";
+     xCAT::MsgUtils->message("N", $rsp, $callback);

-         my $rsp = {};
+      my $rsp = {};
 		$rsp->{info}->[0] = "No hosts in node list\n";
 	    xCAT::MsgUtils->message("I", $rsp, $::CALLBACK);

-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{sinfo}->[0] = "No hosts in node list\n";
 	    xCAT::MsgUtils->message("IS", $rsp, $::CALLBACK);


-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{warning}->[0] = "No hosts in node list\n";
 	    xCAT::MsgUtils->message("W", $rsp, $::CALLBACK);

-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{error}->[0] = "Host not responding\n";
 	    xCAT::MsgUtils->message("S", $rsp, $::CALLBACK);


        # Message to Syslog and callback
-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{error}->[0] = "Host not responding\n";
 	    xCAT::MsgUtils->message("SE", $rsp, $::CALLBACK);

        # Message to Syslog and callback
-        my $rsp = {};
+      my $rsp = {};
 		$rsp->{info}->[0] = "Host not responding\n";
 	    xCAT::MsgUtils->message("SI", $rsp, $::CALLBACK);

@@ -287,19 +274,17 @@ sub message
    my $call_back = shift;    # optional
    my $exitcode  = shift;    # optional

-    # should be I,IS, D, E, S, SA,A ,LS, W , L,N
+    # should be I,IS, D, E, S, SA ,LS, W , L,N
    #  or S(I, D, E, S, W, L,N)
    #
-    # if  SA option need to split syslog messages from auditlog entry
+    # if new SA option need to split syslog messages from auditlog entry
    #
    my $newrsp;
-    if (($sev eq 'SA') || ($sev eq 'A'))
-    {    # if SA ( syslog and auditlog) or A ( only auditlog)then need to pull first entry from $rsp
-         # for syslog, to preserve old interface
+    if ($sev eq 'SA')
+    {    # if SA then need to pull first entry from $rsp
+            # for syslog, to preserve old interface
        $newrsp = $rsp;
-       if ($sev eq 'SA'){  # syslog and auditlog
        $rsp    = $newrsp->{syslogdata}->[0];
-       }
    }
    my $stdouterrf = \*STDOUT;
    my $stdouterrd = '';
@@ -464,10 +449,11 @@ sub message
        }
    }

-    # is syslog option requested 
+    # is syslog requested

    if ($sev =~ /S/)
    {
+
        # If they want this msg to also go to syslog, do that now
        eval {
            openlog("xCAT", "nofatal,pid", "local4");
@@ -488,7 +474,7 @@ sub message

    # if write to auditlog table requested, if not on service node
    if (xCAT::Utils->isMN()){
-     if (($sev eq 'SA') || ($sev eq 'A'))
+     if ($sev eq 'SA')
     {
        require xCAT::Table;
        my $auditlogentry;
@@ -19,7 +19,6 @@ use File::Path;
 use Math::BigInt;
 use Socket;
 use xCAT::GlobalDef;
-#use Data::Dumper;
 use strict;
 use warnings "all";
 my $socket6support = eval { require Socket6 };
@@ -69,14 +68,14 @@ This program module file, is a set of network utilities used by xCAT commands.
 #-------------------------------------------------------------------------------
 sub getNodeDomains()
 {
-        my $class    = shift;
+    my $class    = shift;
 	my $nodes  = shift;

 	my @nodelist = @$nodes;
 	my %nodedomains;

 	# Get the network info for each node
-        my %nethash = xCAT::DBobjUtils->getNetwkInfo(\@nodelist);
+    my %nethash = xCAT::DBobjUtils->getNetwkInfo(\@nodelist);

 	# get the site domain value
 	my @domains = xCAT::TableUtils->get_site_attribute("domain");
@@ -85,13 +84,12 @@ sub getNodeDomains()
 	# for each node - set hash value to network domain or default 
 	#		to site domain 
 	foreach my $node (@nodelist) {
-            unless (defined($node)) {next;}
-            if (defined($nethash{$node}) && $nethash{$node}{domain}) {
-                $nodedomains{$node} = $nethash{$node}{domain};
-            } else {
-                $nodedomains{$node} = $sitedomain;
-            }
-        }
+		if ($nethash{$node}{domain}) {
+			$nodedomains{$node} = $nethash{$node}{domain};
+		} else {
+			$nodedomains{$node} = $sitedomain;
+		}
+	}

 	return \%nodedomains;
 }
@@ -644,11 +642,16 @@ sub get_nic_ip
 {
    my $nic;
    my %iphash;
+    my $cmd     = "ifconfig -a";
+    my $result  = `$cmd`;
    my $mode    = "MULTICAST";
-        my $payingattention=0;
-        my $interface;
-        my $keepcurrentiface;

+    #############################################
+    # Error running command
+    #############################################
+    if ( !$result ) {
+        return undef;
+    }

    if (xCAT::Utils->isAIX()) {
        ##############################################################
@@ -660,14 +663,6 @@ sub get_nic_ip
        # en1: ...
        #
        ##############################################################
-        my $cmd     = "ifconfig -a";
-        my $result  = `$cmd`;
-        #############################################
-        # Error running command
-        #############################################
-        if ( !$result ) {
-          return undef;
-        }
        my @adapter = split /(\w+\d+):\s+flags=/, $result;
        foreach ( @adapter ) {
            if ($_ =~ /^(en\d)/) {
@@ -687,39 +682,37 @@ sub get_nic_ip
            }
        }
    }
-    else {   # linux
-        my @ipoutput = `ip addr`;
-        #############################################
-        # Error running command
-        #############################################
-        if ( !@ipoutput ) {
-          return undef;
-        }
-        foreach my $line (@ipoutput) {
-            if ($line =~ /^\d/) { # new interface, new context..
-                if ($interface and not $keepcurrentiface) {
-                    #don't bother reporting unusable nics
-                    delete $iphash{$interface};
+    else {
+        ##############################################################
+        # Should look like this for Linux:
+        # eth0 Link encap:Ethernet  HWaddr 00:02:55:7B:06:30
+        #      inet addr:9.114.154.193  Bcast:9.114.154.223
+        #      inet6 addr: fe80::202:55ff:fe7b:630/64 Scope:Link
+        #      UP BROADCAST RUNNING MULTICAST  MTU:1500  Metric:1
+        #      RX packets:1280982 errors:0 dropped:0 overruns:0 frame:0
+        #      TX packets:3535776 errors:0 dropped:0 overruns:0 carrier:0
+        #      collisions:0 txqueuelen:1000
+        #      RX bytes:343489371 (327.5 MiB)  TX bytes:870969610 (830.6 MiB)
+        #      Base address:0x2600 Memory:fbfe0000-fc0000080
+        #
+        # eth1 ...
+        #
+        ##############################################################
+        my @adapter= split /\n{2,}/, $result;
+        foreach ( @adapter ) {
+            if ( !($_ =~ /LOOPBACK / ) and
+                   $_ =~ /UP / and
+                   $_ =~ /$mode / ) {
+                my @ip = split /\n/;
+                for my $ent ( @ip ) {
+                    if ($ent =~ /^(eth\d|ib\d|hf\d)\s+/) {
+                        $nic = $1;
+                    }    
+                    if ( $ent =~ /^\s*inet addr:\s*(\d+\.\d+\.\d+\.\d+)/ ) {
+                        $iphash{$nic} = $1; 
+                        next;
+                    }
                }
-                $keepcurrentiface=0;
-                if ( !($line =~ /LOOPBACK/ ) and
-                   $line =~ /UP( |,|>)/ and 
-                   $line =~ /$mode/ ) {
-                
-                    $payingattention=1;
-                    $line =~ /^([^:]*): ([^:]*):/;
-                    $interface=$2;
-               } else {
-                    $payingattention=0;
-                    next;
-               }
-            }
-            unless ($payingattention) { next; } 
-            if ($line =~ /inet/) {
-                $keepcurrentiface=1;
-            }
-            if ( $line =~ /^\s*inet \s*(\d+\.\d+\.\d+\.\d+)/ ) {
-                 $iphash{$interface} = $1;
            }
        }
    }
@@ -1098,8 +1091,7 @@ sub my_if_netmap
    Error:
        none
    Example:
-        my $ip = xCAT::NetworkUtils->my_ip_facing($peerip)
-        my @ip = xCAT::NetworkUtils->my_ip_facing($peerip)  # return multiple
+        xCAT::NetworkUtils->my_ip_facing
    Comments:
        none
 =cut
@@ -1117,8 +1109,6 @@ sub my_ip_facing
    unless ($peernumber) { return undef; }
    my $noden = unpack("N", inet_aton($peer));
    my @nets = split /\n/, `/sbin/ip addr`;
-
-    my @ips;
    foreach (@nets)
    {
        my @elems = split /\s+/;
@@ -1131,19 +1121,10 @@ sub my_ip_facing
        my $curn = unpack("N", inet_aton($curnet));
        if (($noden & $curmask) == ($curn & $curmask))
        {
-            push @ips, $curnet;
+            return $curnet;
        }
    }
-
-    if (@ips) {
-        if (wantarray) {
-            return @ips;
-        } else {
-            return $ips[0];
-        }
-    } else {
-        return undef;
-    }
+    return undef;
 }

 #-------------------------------------------------------------------------------
@@ -1614,124 +1595,56 @@ sub thishostisnot
 =cut

 #-----------------------------------------------------------------------------
-#sub gethost_ips1
-#{
-#    my ($class) = @_;
-#    my $cmd;
-#    my @ipaddress;
-#    $cmd = "ifconfig" . " -a";
-#    $cmd = $cmd . "| grep \"inet\"";
-#    my @result = xCAT::Utils->runcmd($cmd, 0);
-#    if ($::RUNCMD_RC != 0)
-#    {
-#        xCAT::MsgUtils->message("S", "Error from $cmd\n");
-#        exit $::RUNCMD_RC;
-#    }
-#    foreach my $addr (@result)
-#    {
-#        my @ip;
-#        if (xCAT::Utils->isLinux())
-#        {
-#            if ($addr =~ /inet6/)
-#            {
-#               #TODO, Linux ipv6 
-#            }
-#            else
-#            {
-#                my ($inet, $addr1, $Bcast, $Mask) = split(" ", $addr);
-#                #@ip = split(":", $addr1);
-#                #push @ipaddress, $ip[1];
-#                $addr1 =~ s/.*://;
-#                push @ipaddress, $addr1;
-#            }
-#        }
-#        else
-#        {    #AIX
-#            if ($addr =~ /inet6/)
-#            {
-#               $addr =~ /\s*inet6\s+([\da-fA-F:]+).*\/(\d+)/;
-#               my $v6ip = $1;
-#               my $v6mask = $2;
-#               if ($v6ip)
-#               {
-#                   push @ipaddress, $v6ip;
-#               }
-#            }
-#            else
-#            {
-#                my ($inet, $addr1, $netmask, $mask1, $Bcast, $bcastaddr) =
-#                  split(" ", $addr);
-#                push @ipaddress, $addr1;
-#            }
-#
-#        }
-#    }
-#    my @names = @ipaddress;
-#    foreach my $ipaddr (@names)
-#    {
-#        my $hostname = xCAT::NetworkUtils->gethostname($ipaddr);
-#        if ($hostname)
-#        {
-#            my @shorthost = split(/\./, $hostname);
-#            push @ipaddress, $shorthost[0];
-#        }
-#    }
-#
-#    return @ipaddress;
-#}
-
-
 sub gethost_ips
 {
    my ($class) = @_;
    my $cmd;
    my @ipaddress;
-    if (xCAT::Utils->isLinux())
+    $cmd = "ifconfig" . " -a";
+    $cmd = $cmd . "| grep \"inet\"";
+    my @result = xCAT::Utils->runcmd($cmd, 0);
+    if ($::RUNCMD_RC != 0)
    {
-       $cmd="ip -4 --oneline addr show |awk -F ' ' '{print \$4}'|awk -F '/' '{print \$1}'";
-       my @result =xCAT::Utils->runcmd($cmd);
-       if ($::RUNCMD_RC != 0)
-       {
-           xCAT::MsgUtils->message("S", "Error from $cmd\n");
-           exit $::RUNCMD_RC;
-       }   
-       
-       push @ipaddress, @result;
+        xCAT::MsgUtils->message("S", "Error from $cmd\n");
+        exit $::RUNCMD_RC;
    }
-    else
-    {    #AIX
-    
-       $cmd = "ifconfig" . " -a";
-       $cmd = $cmd . "| grep \"inet\"";
-       my @result = xCAT::Utils->runcmd($cmd, 0);
-       if ($::RUNCMD_RC != 0)
-       {
-           xCAT::MsgUtils->message("S", "Error from $cmd\n");
-           exit $::RUNCMD_RC;
-       }
-       
-       foreach my $addr (@result)
-       {
-          if ($addr =~ /inet6/)
-          {
-             $addr =~ /\s*inet6\s+([\da-fA-F:]+).*\/(\d+)/;
-             my $v6ip = $1;
-             my $v6mask = $2;
-             if ($v6ip)
-             {
-                 push @ipaddress, $v6ip;
-             }
-          }
-          else
-          {
-              my ($inet, $addr1, $netmask, $mask1, $Bcast, $bcastaddr) =
-                split(" ", $addr);
-              push @ipaddress, $addr1;
-          }
+    foreach my $addr (@result)
+    {
+        my @ip;
+        if (xCAT::Utils->isLinux())
+        {
+            if ($addr =~ /inet6/)
+            {
+               #TODO, Linux ipv6 
+            }
+            else
+            {
+                my ($inet, $addr1, $Bcast, $Mask) = split(" ", $addr);
+                @ip = split(":", $addr1);
+                push @ipaddress, $ip[1];
+            }
+        }
+        else
+        {    #AIX
+            if ($addr =~ /inet6/)
+            {
+               $addr =~ /\s*inet6\s+([\da-fA-F:]+).*\/(\d+)/;
+               my $v6ip = $1;
+               my $v6mask = $2;
+               if ($v6ip)
+               {
+                   push @ipaddress, $v6ip;
+               }
+            }
+            else
+            {
+                my ($inet, $addr1, $netmask, $mask1, $Bcast, $bcastaddr) =
+                  split(" ", $addr);
+                push @ipaddress, $addr1;
+            }

-       }
+        }
    }
-
    my @names = @ipaddress;
    foreach my $ipaddr (@names)
    {
@@ -1742,9 +1655,9 @@ sub gethost_ips
            push @ipaddress, $shorthost[0];
        }
    }
+
    return @ipaddress;
 }
-
 #-------------------------------------------------------------------------------

 =head3 get_subnet_aix 
@@ -1920,6 +1833,102 @@ sub validate_ip
    }
    return([0]);
 }
+
+#-------------------------------------------------------------------------------
+
+=head3   getFacingIP
+       Gets the ip address of the adapter of the localhost that is facing the
+    the given node.
+       Assume it is the same as my_ip_facing...
+    Arguments:
+       The name of the node that is facing the localhost.
+    Returns:
+       The ip address of the adapter that faces the node.
+
+=cut
+
+#-------------------------------------------------------------------------------
+sub getFacingIP
+{
+    my ($class, $node) = @_;
+    my $ip;
+    my $cmd;
+    my @ipaddress;
+
+    my $nodeip = inet_ntoa(inet_aton($node));
+    unless ($nodeip =~ /\d+\.\d+\.\d+\.\d+/)
+    {
+        return 0;    #Not supporting IPv6 here IPV6TODO
+    }
+
+    $cmd = "ifconfig" . " -a";
+    $cmd = $cmd . "| grep \"inet \"";
+    my @result = xCAT::Utils->runcmd($cmd, 0);
+    if ($::RUNCMD_RC != 0)
+    {
+        xCAT::MsgUtils->message("S", "Error from $cmd\n");
+        exit $::RUNCMD_RC;
+    }
+
+    # split node address
+    my ($n1, $n2, $n3, $n4) = split('\.', $nodeip);
+
+    foreach my $addr (@result)
+    {
+        my $ip;
+        my $mask;
+        if (xCAT::Utils->isLinux())
+        {
+            my ($inet, $addr1, $Bcast, $Mask) = split(" ", $addr);
+            if ((!$addr1) || (!$Mask)) { next; }
+            my @ips   = split(":", $addr1);
+            my @masks = split(":", $Mask);
+            $ip   = $ips[1];
+            $mask = $masks[1];
+        }
+        else
+        {    #AIX
+            my ($inet, $addr1, $netmask, $mask1, $Bcast, $bcastaddr) =
+              split(" ", $addr);
+            if ((!$addr1) && (!$mask1)) { next; }
+            $ip = $addr1;
+            $mask1 =~ s/0x//;
+            $mask =
+              `printf "%d.%d.%d.%d" \$(echo "$mask1" | sed 's/../0x& /g')`;
+        }
+
+        if ($ip && $mask)
+        {
+
+            # split interface IP
+            my ($h1, $h2, $h3, $h4) = split('\.', $ip);
+
+            # split mask
+            my ($m1, $m2, $m3, $m4) = split('\.', $mask);
+
+            # AND this interface IP with the netmask of the network
+            my $a1 = ((int $h1) & (int $m1));
+            my $a2 = ((int $h2) & (int $m2));
+            my $a3 = ((int $h3) & (int $m3));
+            my $a4 = ((int $h4) & (int $m4));
+
+            # AND node IP with the netmask of the network
+            my $b1 = ((int $n1) & (int $m1));
+            my $b2 = ((int $n2) & (int $m2));
+            my $b3 = ((int $n3) & (int $m3));
+            my $b4 = ((int $n4) & (int $m4));
+
+            if (($b1 == $a1) && ($b2 == $a2) && ($b3 == $a3) && ($b4 == $a4))
+            {
+                return $ip;
+            }
+        }
+    }
+
+    xCAT::MsgUtils->message("S", "Cannot find master for the node $node\n");
+    return 0;
+}
+
 #-------------------------------------------------------------------------------

 =head3    isIpaddr
@@ -1972,65 +1981,6 @@ sub isIpaddr
    }
 }

-
-
-
-#-------------------------------------------------------------------------------
-=head3  getNodeNameservers 
-    Description:
-        Get nameservers of  specified nodes. 
-        The priority: noderes.nameservers > networks.nameservers > site.nameservers
-    Arguments:
-        node: node name list
-    Returns:
-        Return a hash ref, of the $nameservers{$node}
-        undef - Failed to get the nameservers
-    Globals:
-        none
-    Error:
-        none
-    Example:
-        my $nameservers = xCAT::NetworkUtils::getNodeNameservers(\@node);
-    Comments:
-        none
-
-=cut
-#-------------------------------------------------------------------------------
-sub getNodeNameservers{
-    my $nodes=shift;
-    if( $nodes =~ /xCAT::NetworkUtils/)
-    {
-      $nodes=shift;
-    }
-    my @nodelist = @$nodes;
-    my %nodenameservers;
-    my $nrtab = xCAT::Table->new('noderes',-create=>0);
-    my %nrhash = %{$nrtab->getNodesAttribs(\@nodelist,['nameservers'])};
-    
-    my $nettab = xCAT::Table->new("networks");
-    my %nethash = xCAT::DBobjUtils->getNetwkInfo( \@nodelist );
-
-    my @nameservers = xCAT::TableUtils->get_site_attribute("nameservers");
-    my $sitenameservers=$nameservers[0];
-
-
-    foreach my $node (@nodelist){
-       if ($nrhash{$node} and $nrhash{$node}->[0] and $nrhash{$node}->[0]->{nameservers})
-       {
-           $nodenameservers{$node}=$nrhash{$node}->[0]->{nameservers};
-       }elsif($nethash{$node}{nameservers})
-       {
-           $nodenameservers{$node}=$nethash{$node}{nameservers};
-       }elsif($sitenameservers)
-       {
-           $nodenameservers{$node}=$sitenameservers;
-       }
-    }
-
-    return \%nodenameservers;
-}
-
-
 #-------------------------------------------------------------------------------

 =head3   getNodeNetworkCfg 
@@ -2057,31 +2007,19 @@ sub getNodeNameservers{
 sub getNodeNetworkCfg
 {
    my $node = shift;
-    if( $node =~ /xCAT::NetworkUtils/)
-    {
-       $node =shift;
-    }

+    my $nets = xCAT::NetworkUtils::my_nets();
    my $ip   = xCAT::NetworkUtils->getipaddr($node);
    my $mask = undef;
-    my $gateway = undef;
-
-    my $nettab = xCAT::Table->new("networks");
-    if ($nettab) {
-	   my @nets = $nettab->getAllAttribs('net','mask','gateway');
-	   foreach my $net (@nets) {
-	      if (xCAT::NetworkUtils::isInSameSubnet( $net->{'net'}, $ip, $net->{'mask'}, 0)) {
-	          $gateway=$net->{'gateway'};
-	          $mask=$net->{'mask'};
-	       }
-	   }
+    for my $net (keys %$nets)
+    {
+        my $netname;
+        ($netname,$mask) = split /\//, $net;
+        last if ( xCAT::NetworkUtils::isInSameSubnet( $netname, $ip, $mask, 1));
    }
- 
-    return ($ip, $node, $gateway, xCAT::NetworkUtils::formatNetmask($mask,0,0));
+    return ($ip, $node, undef, xCAT::NetworkUtils::formatNetmask($mask,1,0));
 }

-
-
 #-------------------------------------------------------------------------------

 =head3   get_hdwr_ip 
@@ -2155,13 +2093,7 @@ sub pingNodeStatus {
 	    foreach (@mon_nodes) {
 		$deadnodes{$_}=1;
 	    }	 
-
-		# get additional options from site table
-		my @nmap_options = xCAT::TableUtils->get_site_attribute("nmapoptions"); 
-		my $more_options = $nmap_options[0];
-
-        #call namp
-	    open (NMAP, "nmap -PE --system-dns --send-ip -sP $more_options ". $nodes . " 2> /dev/null|") or die("Cannot open nmap pipe: $!");
+	    open (NMAP, "nmap -PE --system-dns --send-ip -sP ". $nodes . " 2> /dev/null|") or die("Cannot open nmap pipe: $!");
 	    my $node;
 	    while (<NMAP>) {
 		if (/Host (.*) \(.*\) appears to be up/) {
@@ -2428,106 +2360,6 @@ sub get_all_nicips{
    }
 }

-#-------------------------------------------------------------------------------

-=head3  gen_net_boot_params
-
-    Description:
-        This subroutine is used to generate all possible kernel parameters for network boot (rh/sles/ubuntu + diskfull/diskless)
-        The supported network boot parameters:
-            ksdevice - Specify network device for Anaconda. For rh6 and earlier. Format: 'ksdevice={$mac|$nicname}'
-            BOOTIF - Specify network device for Anaconda. The boot device which set by pxe. xCAT also set it if the bootload is not pxe. Format 'BOOTIF={$mac}'
-            ifname - Specify a interfacename<->mac pair, it will set the interfacename to the interface which has the <mac>. Format 'ifname=$ifname:$mac'
-               # This will only be generated when linuximage.nodebootif is set. 
-            bootdev - Specify the boot device. Mostly it's used with <ip> parameter and when there are multiple <ip> params. Format 'bootdev={$mac|$ifname}
-            ip - Specify the network configuration for an interface. Format: 'ip=dhcp', 'ip=$ifname:dhcp'
-           
-            netdevice - Specify network device for Linuxrc (Suse bootloader). Format: 'netdevice={$mac|$nicname}'
-           
-            netdev - Specify the interfacename which is used by xCAT diskless boot script to select the network interface. Format: 'netdev=$nicname'
-
-        Reference:
-            Redhat anaconda doc: https://github.com/rhinstaller/anaconda/blob/master/docs/boot-options.txt
-            Suse Linuxrc do: https://en.opensuse.org/SDB:Linuxrc
-            
-    Arguments:
-        $installnic   <- node.installnic
-        $primarynic <- node.primarynic
-        $macmac    <- node.mac
-        $nodebootif <- linuximage.nodebootif
-        
-    Returns: 
-        $net_params - The key will be the parameter name, the value for the key will be the parameter value.
-        Valid Parameter Name:
-            ksdevice
-            netdev
-            netdevice
-            ip
-            ifname
-            BOOTIF
-
-        And following two keys also will be returned for reference
-            mac
-            nicname
-
-    Example:
-        my $netparams = xCAT::NetworkUtils->gen_net_boot_params($installnic, $primmarynic, $macmac, $nodebootif);
-
-=cut
-
-#-------------------------------------------------------------------------------
-
-sub gen_net_boot_params 
-{
-    my $class = shift;
-    my $installnic = shift;
-    my $primarynic = shift;
-    my $macmac = shift;
-    my $nodebootif = shift;
-
-    my $net_params;
-    
-    # arbitrary use primarynic if installnic is not set
-    unless ($installnic) {
-         $installnic = $primarynic;
-    }
-    
-    # just use the installnic to generate the nic related kernel parameters
-    my $mac;
-    my $nicname;
-    
-    if ((! defined ($installnic)) || ($installnic eq "") || ($installnic =~ /^mac$/i)) {
-        $mac = $macmac;
-        $net_params->{mac} = $mac;
-    } elsif ($installnic =~ /^[0-9a-fA-F]{2}:[0-9a-fA-F]{2}:[0-9a-fA-F]{2}:[0-9a-fA-F]{2}:[0-9a-fA-F]{2}:[0-9a-fA-F]{2}$/) {
-        $mac = $installnic;
-        $net_params->{mac} = $mac;
-        $net_params->{setmac} = $mac;
-    } else {
-        $mac = $macmac;
-        $nicname = $installnic;
-        $net_params->{nicname} = $nicname;
-        $net_params->{mac} = $mac;
-    }
-
-    if ($nicname) {
-        $net_params->{ksdevice} = "ksdevice=$nicname";
-        $net_params->{ip} = "ip=$nicname:dhcp";
-        $net_params->{netdev} = "netdev=$nicname";
-        $net_params->{netdevice} = "netdevice=$nicname";
-        $net_params->{ifname} = "ifname=$nodebootif:$mac";
-    } elsif ($mac) {
-        $net_params->{ksdevice} = "ksdevice=$mac";
-        $net_params->{BOOTIF} = "BOOTIF=$mac";
-        $net_params->{bootdev} = "bootdev=$mac";
-        $net_params->{ip} = "ip=dhcp";
-        if ($nodebootif) {
-            $net_params->{ifname} = "ifname=$nodebootif:$mac";
-        }
-        $net_params->{netdevice} = "netdevice=$mac";
-    }
-
-    return $net_params;
-}

 1;
@@ -196,7 +196,6 @@ sub expandatom {
 	$nodelist->_set_use_cache(1);
        @allnodeset = $nodelist->getAllAttribs('node','groups');
        %allnodehash = map { $_->{node} => 1 } @allnodeset;
-	$nodelist->_set_use_cache(0);   #The {_use_cache} for nodelist table object must be turn off, otherwise it will keep open and affect the Table.pm subroutines like getNodesAttribs when it tries to access nodelist table to get status column.
    }
 	my $verify = (scalar(@_) >= 1 ? shift : 1);
  my %options = @_;      # additional options
@@ -311,6 +311,9 @@ sub notify {
    my ($modname, $path, $suffix) = fileparse($_, ".pm");
     # print "modname=$modname, path=$path, suffix=$suffix\n";
    if ($suffix =~ /.pm/) { #it is a perl module
+      my $pid;
+      if ($pid=xCAT::Utils->xfork()) { }
+      elsif (defined($pid)) {
 	my $fname;
        if (($path eq "") || ($path eq ".\/")) {
          #default path is /opt/xcat/lib/perl/xCAT_monitoring/ if there is no path specified
@@ -325,7 +328,8 @@ sub notify {
        else {
          ${"xCAT_monitoring::".$modname."::"}{processTableChanges}->($action, $tablename, $old_data, $new_data);
        }
-        return 0;
+        exit 0;
+      }
    }
    else { #it is a command
      my $pid;
@@ -21,6 +21,7 @@ sub parse_args {
    my %opt     = ();
    my $cmd     = $request->{command};
    my $args    = $request->{arg};
+    my @VERSION = qw( 2.1 );

    #############################################
    # Responds with usage statement
@@ -59,8 +60,7 @@ sub parse_args {
    # Option -v for version
    ####################################
    if ( exists( $opt{v} )) {
-        my $version = xCAT::Utils->Version();
-        return ([$version]);
+        return( \@VERSION );
    }

    if ( exists( $opt{s} ) ){
@@ -350,27 +350,6 @@ sub do_rnetboot {
            last;
        }
    }
-
-    # Set the boot mode to norm from 'of' (open firmware)
-    # NOW, only necessary for IVM
-    my $hwtype = @$exp[2];
-    if ($hwtype eq "ivm") {
-        my $server = @$exp[3];
-
-        # creat connection first
-        my @newexp = xCAT::PPCcli::connect( $request, $hwtype, $server );
-        if (ref($newexp[0]) eq "Expect" ) {
-            my $cfg = "lpar_id=@$d[0],boot_mode=norm";
-            # change the boot mode to 'norm'
-            xCAT::PPCcli::chsyscfg(\@newexp, "prof", $d, $cfg);
-            xCAT::PPCcli::disconnect(\@newexp);
-        } else {
-            my $rsp;
-            $rsp->{data} = ["Failed to set the boot mode to normal. For rnetboot command, you have to rpower off and then on the node after finishing the OS deployment."];
-            xCAT::MsgUtils->message("E", $rsp, $request->{callback});
-        }
-    }
-
    return  $result;
 }

@@ -436,9 +436,9 @@ sub sshcfg {
    #####################################
    # userid@host not found in key file
    #####################################
-    #if ( $sshkey !~ /\s+(\S+\@\S+$)/ ) {
-    #    return( [[$server,"Cannot find userid\@host in '$fname'",RC_ERROR]] );
-    #}
+    if ( $sshkey !~ /\s+(\S+\@\S+$)/ ) {
+        return( [[$server,"Cannot find userid\@host in '$fname'",RC_ERROR]] );
+    }
    my $logon = $1;

    #####################################
@@ -156,7 +156,7 @@ sub connect {
    # Shell prompt regexp based on HW Type 
    ##################################################
    my %prompt = (
-        hmc => "~>\\s*\$",
+        hmc => "~> \$",
        ivm => "\\\$ \$"
    );
    ##################################################
@@ -339,7 +339,7 @@ sub lshwconn_parse_args
    }
    if (scalar(@error_type_nodes)) {
        my $tmp_nodelist = join ',', @error_type_nodes;
-        my $link = (scalar(@error_type_nodes) eq '1')? 'is':'are';
+        my $link = (scalar(@error_type_nodes) == '1')? 'is':'are';
        return( ["Node type of node(s) $tmp_nodelist $link not supported for this command.\n"]);
    }
    $request->{nodetype} = $nodetype;
@@ -75,7 +75,6 @@ sub add_ppc {
    my $values   = shift;
    my $not_overwrite = shift;
    my $otherinterfaces = shift;
-    my $callfile = shift;
    my @tabs     = qw(ppc vpd nodehm nodelist nodetype hosts mac); 
    my %db       = ();
    ###################################
@@ -120,12 +119,7 @@ sub add_ppc {
        
        # Specify CEC and Frame's mgt as fsp and bpa
        if ( $type =~ /^cec$/)  {
-            if ( $callfile eq "PPC" )  {
-                $mgt = "hmc";
-            }
-            if ( $callfile eq "FSP" )   {
-                $mgt = "fsp";
-            }
+            $mgt = "fsp";
        }
        if ( $type =~ /^frame$/)  {
            $mgt = "bpa";
@@ -326,7 +320,7 @@ sub update_lpar {
            }
    }
    if (defined($write)) {
-        &add_ppc($hwtype, \@write_list,'','',"FSP");
+        &add_ppc($hwtype, \@write_list);
        return ([@update_list,@write_list]);
    } else {
        foreach ( @tabs ) {
@@ -14,7 +14,7 @@ use xCAT::Usage;
 use xCAT::NodeRange;
 use xCAT::DBobjUtils;
 use xCAT::FSPUtils;
-use xCAT::TableUtils;
+use xCAT::TableUtils qw(get_site_Master);
 %::QUERY_ATTRS = (
 'savingstatus' => 1,
 'dsavingstatus' => 1,
@@ -223,6 +223,7 @@ sub renergy {
    my ($node, $attrs) = %$nodehash;
    my $cec_name = @$attrs[2];
    my $hw_type = @$attrs[4];
+
    
    if (!$cec_name) {
        return ([[$node, "ERROR: Cannot find the cec name, check the attributes: vpd.serial, vpd.mtm.", 1]]);
@@ -294,43 +295,43 @@ sub renergy {
 	foreach (@hcps_ip) {
 	    $deadnodes{$_}=1;
 	}	 
-
-	# get additional options from site table
-	my @nmap_options = xCAT::TableUtils->get_site_attribute("nmapoptions"); 
-	my $more_options = $nmap_options[0];
-
-	open (NMAP, "nmap -PE --system-dns --send-ip -sP $more_options ". join(' ',@hcps_ip) . " 2> /dev/null|") or die("Cannot open nmap pipe: $!");
-	my $node;
+	open (NMAP, "nmap -PE --system-dns --send-ip -sP ". join(' ',@hcps_ip) . " 2> /dev/null|") or die("Cannot open nmap pipe: $!");
+	my $node1;
+	my $msg1;
 	while (<NMAP>) {
 	    #print "$_\n";
 	    if (/Host (.*) \((.*)\) appears to be up/) {
-		$node=$2;
-		unless ($deadnodes{$node}) {
+		$node1=$2;
+		unless ($deadnodes{$node1}) {
 		    foreach (keys %deadnodes) {
-			if ($node =~ /^$_\./) {
-			    $node = $_;
+			if ($node1 =~ /^$_\./) {
+			    $node1 = $_;
 			    last;
 			}
 		    }
 		}
-		delete $deadnodes{$node};
+		delete $deadnodes{$node1};
 		if ($verbose) {
 		    push @return_msg, [$node, $_, 0];
 		}
-		push(@pingable_hcp, $node);
-	    } elsif (/Nmap scan report for ([^ ]*)/) {
-		$node=$1;
+		push(@pingable_hcp, $node1);
+	    } elsif (/Nmap scan report for ([^ ]*) \((.*)\)/) {
+		$node1=$2;
+		$msg1=$_;
 	    } elsif (/Host is up./) {
-		unless ($deadnodes{$node}) {
+		unless ($deadnodes{$node1}) {
 		    foreach (keys %deadnodes) {
-			if ($node =~ /^$_\./) {
-			    $node = $_;
+			if ($node1 =~ /^$_\./) {
+			    $node1 = $_;
 			    last;
 			}
 		    }
 		}
-		delete $deadnodes{$node};
-		push(@pingable_hcp, $node);
+		delete $deadnodes{$node1};
+		if ($verbose) {
+		    push @return_msg, [$node, "$msg1$_", 0];
+		}
+		push(@pingable_hcp, $node1);
 	    }
 	}	
    } else {
@@ -144,16 +144,12 @@ sub connect {
    ##################################
    # Set options
    ##################################
-    #my $hosttab  = xCAT::Table->new( 'hosts' );
-    #if ( $hosttab) {
-    #    my $hostshash = $hosttab->getNodeAttribs( $server, [qw(ip otherinterfaces)]);
-    #    if ( $hostshash ) {
-    #        $server = $hostshash->{ip};
-    #    }
-    #}
-    $server = xCAT::NetworkUtils::getNodeIPaddress( $server );
-    unless ($server) {
-             return( "Unable to get IP address for $server" );
+    my $hosttab  = xCAT::Table->new( 'hosts' );
+    if ( $hosttab) {
+        my $hostshash = $hosttab->getNodeAttribs( $server, [qw(ip otherinterfaces)]);
+        if ( $hostshash ) {
+            $server = $hostshash->{ip};
+        }
    }
 #    my $serverip = inet_ntoa(inet_aton($server));
    my $url = "https://$server/cgi-bin/cgi?form=2";
@@ -347,7 +347,7 @@ sub bus {
            #################################
            # Output header 
            #################################
-            push @result, [$name,"I/O Bus Information", 0];
+            push @result, [$name,"I/O Bus Information"];

            #################################
            # Output error 
@@ -532,7 +532,7 @@ sub config {
            #################################
            # Output header
            #################################
-            push @result, [$name,"Machine Configuration Info", 0];
+            push @result, [$name,"Machine Configuration Info"];
            my $i;

            foreach ( @prefix ) {
@@ -555,9 +555,6 @@ sub getmacs {
                    } else {
                        $type = "virtualio";
                    }
-                    if ($mac_addr) {
-                        $mac_addr = format_mac($mac_addr);
-                    }

                    my %att = ();
                    $att{'MAC_Address'}        = ($mac_addr) ? $mac_addr : "N/A";
@@ -630,9 +627,9 @@ sub getmacs {
                }
                foreach ( @$value ) {
                    if ( /^#\s?Type/ ) {
-                       $data.= "\n$_\n";
+                        $data.= "\n$_\n";
                    } else {
-                        $data.= "$_\n";
+                        $data.= format_mac( $_ );
                    }
                }

@@ -759,7 +756,7 @@ sub getmacs {
            if ( /^#\s?Type/ ) {
                $data.= "\n$_\n";
            } elsif ( /^ent\s+/ or /^hfi-ent\s+/ ) {
-                $data.= "$_\n";
+                $data.= format_mac( $_ );
            }
        }
        #####################################
@@ -804,8 +801,10 @@ sub cal_mac {
 ##########################################################################
 sub format_mac {

-    my $mac = shift;
+    my $data = shift;

+    $data =~ /^(\S+\s+\S+\s+)(\S+)(\s+.*)$/;
+    my $mac = $2;
    #####################################
    # Get adapter mac
    #####################################
@@ -814,10 +813,6 @@ sub format_mac {

    if ( !xCAT::Utils->isAIX() ) {
        foreach my $mac_a ( @macs ) {
-            if (&checkmac($mac_a)) {
-                push @newmacs, $mac_a;
-                next;
-            }
            #################################
            # Delineate MAC with colons
            #################################
@@ -826,30 +821,14 @@ sub format_mac {
            $mac_a =~ s/:$//;
            push @newmacs, $mac_a;
        }
-        $mac = join("|",@newmacs);
+        my $newmac = join("|",@newmacs);
+        $data   =~ s/$mac/$newmac/;
    }

-    return( "$mac\n" );
+    return( "$data\n" );

 }

-##########################################################################
-# checkmac format 
-##########################################################################
-
-sub checkmac {
-    my $mac = shift;
-    if ( !xCAT::Utils->isAIX()) {
-        if ($mac =~ /\w{2}:\w{2}:\w{2}:\w{2}:\w{2}:\w{2}/) {
-            return 1;
-        } else {
-            return 0;
-        }
-    } else {
-        return 1;
-    }
-}
-

 ##########################################################################
 # Write first valid adapter MAC to database 
@@ -868,9 +847,6 @@ sub writemac {
    # Find first valid adapter
    #####################################
    foreach ( @$data ) {
-        unless (&checkmac($_)) {
-            next;
-        }
        if ( /^ent\s+/ or /^hfi-ent\s+/ ) {
            $value = $_;
            #####################################
@@ -893,9 +869,6 @@ sub writemac {
    #####################################
    if ( $pingret ne "successful" ) {
        foreach ( @$data ) {
-            unless (&checkmac($_)) {
-                next;
-            }
            if ( /^ent\s+/ or /^hfi-ent\s+/ ) {
                $value = $_;
                $ping_test = 0;
@@ -917,7 +890,7 @@ sub writemac {
    #####################################
    # Get adapter mac
    #####################################
-    #$value = format_mac( $value ); 
+    $value = format_mac( $value ); 
    @fields = split /\s+/, $value;
    $mac    = $fields[2];

@@ -411,7 +411,7 @@ sub format_output {
        # Strip errors for results
        #######################################
        my @val = grep( !/^#.*: ERROR /, @$values );
-        xCAT::PPCdb::add_ppc( $hwtype, \@val ,'','',"PPC");
+        xCAT::PPCdb::add_ppc( $hwtype, \@val );
    }

    ###########################################
@@ -203,7 +203,7 @@ sub voltage {
            # Voltages available in frame
            ################################# 
            if ( @$d[4] ne "bpa" ) {
-                push @result, [$name,"$text Only available for BPA",0];
+                push @result, [$name,"$text Only available for BPA",1];
                next;
            }
            my $volt = enumerate_volt( $exp, $d );
@@ -256,7 +256,7 @@ sub temp {
            # No frame commands for IVM 
            ################################# 
            if ( $hwtype eq "ivm" ) {
-                push @result, [$name,"$prefix Not available (No BPA)",0];
+                push @result, [$name,"$prefix Not available (No BPA)",1];
                next;
            }
            ################################# 
@@ -264,14 +264,14 @@ sub temp {
            ################################# 
            if ( @$d[4] !~ /^(fsp|cec|lpar)$/ ) {
                my $text = "$prefix Only available for CEC/LPAR";
-                push @result, [$name,$text,0];
+                push @result, [$name,$text,1];
                next;
            }
            ################################# 
            # Error - No frame 
            #################################
            if ( $mtms eq "0" ) {
-                push @result, [$name,"$prefix Not available (No BPA)",0];
+                push @result, [$name,"$prefix Not available (No BPA)",1];
                next;
            }
            #################################
@@ -1913,7 +1913,7 @@ sub xCATdB {
                $profile,
                $parent ); 
        
-        return( xCAT::PPCdb::add_ppc( $hwtype, [$values],'','',"PPC" )); 
+        return( xCAT::PPCdb::add_ppc( $hwtype, [$values] )); 
    }
    return undef;
 }
@@ -277,7 +277,7 @@ sub get_nodes_nic_attrs{
    my $nodes = shift;

    my $nicstab = xCAT::Table->new( 'nics');
-    my $entry = $nicstab->getNodesAttribs($nodes, ['nictypes', 'nichostnamesuffixes', 'nichostnameprefixes', 'niccustomscripts', 'nicnetworks', 'nicips', 'nicextraparams']);
+    my $entry = $nicstab->getNodesAttribs($nodes, ['nictypes', 'nichostnamesuffixes', 'nichostnameprefixes', 'niccustomscripts', 'nicnetworks', 'nicips']);

    my %nicsattrs;
    my @nicattrslist;
@@ -361,19 +361,6 @@ sub get_nodes_nic_attrs{
                $nicsattrs{$node}{$nicattrs[0]}{'ip'} = $nicattrs[1];
            }
        }
-
-        if($entry->{$node}->[0]->{'nicextraparams'}){
-            @nicattrslist = split(",", $entry->{$node}->[0]->{'nicextraparams'});
-            foreach (@nicattrslist){
-				my @nicattrs;
-				if ($_  =~ /!/) {
-					@nicattrs = split("!", $_);
-				} else {
-					@nicattrs = split(":", $_);
-				}
-                $nicsattrs{$node}{$nicattrs[0]}{'extraparams'} = $nicattrs[1];
-            }
-        }
    }

    return \%nicsattrs;
@@ -666,39 +653,6 @@ sub get_all_cecs
    }
 }

-#-------------------------------------------------------------------------------
- 
-=head3 get_all_lparids
-      Description : Get all LPAR ids  in system.
-      Arguments   : ref of all cecs
-      Returns     : ref for LPAR ids hash.
-      Example     : 
-                    my $arrayref = xCAT::ProfiledNodeUtils->get_all_lparids(\%allcecs);
-=cut
-
-#-------------------------------------------------------------------------------
-sub get_all_lparids
-{
-    my $class= shift;
-    my $cecsref = shift;
-    my %allcecs = %$cecsref;
-    my %lparids;
-
-    my $ppctab = xCAT::Table->new('ppc');
-    foreach my $cec (keys  %allcecs) {
-        my @ids = $ppctab->getAllAttribsWhere("hcp = '$cec'", 'id');
-        foreach (@ids) {
-            if ( $_->{'id'} ){
-                $lparids{$cec}{$_->{'id'}} = 0;
-            }
-        }
-    }
-    $ppctab->close();
-    
-    return \%lparids;
-}
-
-
 #-------------------------------------------------------------------------------

 =head3 is_discover_started
@@ -736,7 +690,6 @@ sub get_nodes_profiles
 {
    my $class = shift;
    my $nodelistref = shift;
-    my $groupnamemode = shift;
    my %profile_dict;

    my $nodelisttab = xCAT::Table->new('nodelist');
@@ -756,12 +709,8 @@ sub get_nodes_profiles
                if ( $idx == 2 ){
                    # The group string will like @NetworkProfile_<profile name>
                    # So, index should +3, 2 for '__', 1 for _.
-                    if ($groupnamemode) { 
-                        $profile_dict{$_}{$profile} = $group;
-                    } else{
-                        my $append_index = length($profile) + 3;
-                        $profile_dict{$_}{$profile} = substr $group, $append_index;
-                    }
+                    my $append_index = length($profile) + 3;
+                    $profile_dict{$_}{$profile} = substr $group, $append_index;
                    last;
                }
            }
@@ -790,7 +739,7 @@ sub get_imageprofile_prov_method

    my $nodetypestab = xCAT::Table->new('nodetype');
    my $entry = ($nodetypestab->getAllAttribsWhere("node = '$imgprofilename'", 'ALL' ))[0];
-    return $entry->{'provmethod'};
+    my $osimgname = $entry->{'provmethod'};

    #my $osimgtab = xCAT::Table->new('osimage');
    #my $osimgentry = ($osimgtab->getAllAttribsWhere("imagename = '$osimgname'", 'ALL' ))[0];
@@ -851,20 +800,16 @@ sub check_profile_consistent{
        }
    }

+    # Profile consistent keys, arch=>netboot,  mgt=>nictype
+    my %profile_dict = ('x86' => 'xnba','x86_64' => 'xnba', 'ppc64' => 'yaboot',
+                        'fsp' => 'FSP', 'ipmi' => 'BMC');
+                        
    # Get Imageprofile arch
    my $nodetypetab = xCAT::Table->new('nodetype');
-    my $nodetypeentry = $nodetypetab->getNodeAttribs($imageprofile, ['os','arch']);
-    my $os = $nodetypeentry->{'os'};
+    my $nodetypeentry = $nodetypetab->getNodeAttribs($imageprofile, ['arch']);
    my $arch = $nodetypeentry->{'arch'};
    $nodetypetab->close();
    
-    # Get Imageprofile pkgdir
-    my $osdistroname = $os . "-" . $arch;
-    my $osdistrotab = xCAT::Table->new('osdistro');
-    my $osdistroentry = ($osdistrotab->getAllAttribsWhere("osdistroname = '$osdistroname'", 'ALL' ))[0];
-    my $pkgdir = $osdistroentry->{'dirpaths'};
-    $osdistrotab->close();
-    
    # Get networkprofile netboot and installnic
    my $noderestab = xCAT::Table->new('noderes');
    my $noderesentry = $noderestab->getNodeAttribs($networkprofile, ['netboot', 'installnic']);
@@ -896,33 +841,16 @@ sub check_profile_consistent{
    my $nodetype = undef;
    $nodetype = $ntentry->{'nodetype'} if ($ntentry->{'nodetype'});
    $ppctab->close(); 
-    
-    # Checking whether netboot initrd image for Ubuntu ppc64
-    # This image should be downloaded from internet
-    if ($arch =~ /ppc64/i and $os =~ /ubuntu/i and !(-e "$pkgdir/install/netboot/initrd.gz")){
-        return 0, "The netboot initrd is not found in $pkgdir/install/netboot, please download it firstly.";
-    }
 
    # Check if exists provision network
    if (not ($installnic and exists $netprofile_nicshash{$installnic}{"network"})){
        return 0, "Provisioning network not defined for network profile."
    }

-    # Remove check mechanism about arch and netboot attribute
-    # Attribute 'neboot' will be generated based on arch, management method, os
-    
-    # Profile consistent keys, arch=>netboot,  mgt=>nictype
-    #my $ppc_netboot = 'yaboot';
-    #if( $os =~ /rhels7/ ){
-    #    $ppc_netboot = 'grub2';
-    #}
-    #my %profile_dict = ('x86' => 'xnba','x86_64' => 'xnba', 'ppc64' => $ppc_netboot,
-    #                    'ppc64el' => $ppc_netboot,
-    #                    'fsp' => 'FSP', 'ipmi' => 'BMC');
    # Check if imageprofile is consistent with networkprofile
-    #if ($profile_dict{$arch} ne $netboot) {
-    #    return 0, "Imageprofile's arch is not consistent with networkprofile's netboot."
-    #}
+    if ($profile_dict{$arch} ne $netboot) {
+        return 0, "Imageprofile's arch is not consistent with networkprofile's netboot."
+    }
    
    # Check if networkprofile is consistent with hardwareprofile
    if (not $hardwareprofile) { # Not define hardwareprofile
@@ -932,29 +860,24 @@ sub check_profile_consistent{
            return 0, "$nictype networkprofile must use with hardwareprofile.";
        }
    }
-    
-    my %mgt_dict = ('fsp' => 'FSP', 'ipmi' => 'BMC', 'kvm' => '');
       
-    if ($mgt eq 'vm') {
-        return 1, "";
+    # For nodetype is lpar node, not need to check the nictype as it is not required for lpar node
+    if (not $nictype and $mgt and $nodetype ne 'lpar' ) { 
+        # define hardwareprofile, not define fsp or bmc networkprofile, and the node type is not lpar
+        return 0, "$profile_dict{$mgt} hardwareprofile must use with $profile_dict{$mgt} networkprofile.";
    }
    
-    if ($nodetype eq 'lpar') {
-        if ($nictype) {
-            # Can not associate FSP/BMC network if the node type is lpar
-            return 0, "The node with hardware type $nodetype can not use with $nictype networkprofile.";
-        }
-        return 1, ""
+    if ($profile_dict{$mgt} ne $nictype and $nodetype ne 'lpar') {
+        # Networkprofile's nictype is not consistent with hadrwareprofile's mgt, and the node type is not lpar
+        return 0, "Networkprofile's nictype is not consistent with hardwareprofile's mgt.";
    }
-    
-    if ($mgt and $mgt_dict{$mgt} ne $nictype) {
-        my $errmsg = "$mgt hardwareprofile must use with $mgt_dict{$mgt} networkprofile.";
-        if ( $mgt eq 'kvm' ) {
-            $errmsg = "$mgt hardwareprofile must use with non-BMC and non-FSP networkprofile."
-        }
-        return 0, $errmsg;
+
+    if ($nodetype eq 'lpar' and $nictype eq 'FSP') 
+    {
+        # can not associate FSP network if the node type is lpar
+        return 0, "The node with hardware type $nodetype can not use with $nictype networkprofile.";
    }
-            
+        
    return 1, "";
 }

@@ -1216,249 +1139,3 @@ sub check_nicips{
    return (0, \%nics_hash, "");
 }

-#-------------------------------------------------------------------------------
-=head3 gen_chain_for_profiles
-    Description: Generate a chain string based on Network/Hardware/Image profiles.
-    Arguments: $profiles_hash: The reference for profiles hash.
-             For example: 
-             $profiles_hash = { 'HardwareProfile' => 'IBM_NeXtScale_M4',
-                                'ImageProfile' => 'rhels6.5-x86_64-stateful-compute',
-                                'NetworkProfile' => 'default_network_profile',
-                              }
-             $hw_reconfig: the flag shows whether we need re-configure all hardware
-                           relative settings or not: like runcmds, runimg...etc
-    Returns: ($retcode, $chain)
-              $retcode = 1. Generate chain failed, $chain stands for error message.
-              $retcode = 0. Generate chain OK. $chain stands for the chain string.
-
-=cut
-#-------------------------------------------------------------------------------
-sub gen_chain_for_profiles{
-    my $class = shift;
-    my $profiles_hashref = shift;
-    my $hw_reconfig = shift;
-    my $final_chain = "";
-    if (! $profiles_hashref){
-        return (1, "Missing parameter for gen_chain_for_profiles.");
-    }
-    # A node must have at least imageprofile and network profile.
-    unless (defined $profiles_hashref->{'ImageProfile'}){
-        return (1, "No imageprofile specified in profiles hash.");
-    }
-    unless (defined $profiles_hashref->{'NetworkProfile'}){
-        return (1, "No networkprofile specified in profiles hash.");
-    }
-    my $hwprofile = $profiles_hashref->{'HardwareProfile'};
-    my $imgprofile = $profiles_hashref->{'ImageProfile'};
-    my $netprofile = $profiles_hashref->{'NetworkProfile'};
-
-    # Get node's provisioning method
-    my $provmethod = xCAT::ProfiledNodeUtils->get_imageprofile_prov_method($imgprofile);
-    unless ($provmethod ){
-        return (1, "Can not get provisioning method for image profile $imgprofile");
-    }
-    my $netprofileattr = xCAT::ProfiledNodeUtils->get_nodes_nic_attrs([$netprofile])->{$netprofile};
-    unless ($netprofileattr){
-        return (1, "Can not get attributes for network profile $netprofile");
-    }
-
-    $final_chain = 'osimage='.$provmethod.":--noupdateinitrd";
-    # get the chain attribute from hardwareprofile and insert it to node.
-    if (defined $hwprofile and $hwprofile and $hw_reconfig){
-        my $chaintab = xCAT::Table->new('chain');
-        my $chain = $chaintab->getNodeAttribs($hwprofile, ['chain']);
-        if (exists $chain->{'chain'}) {
-               my $hw_chain = $chain->{'chain'};
-               $final_chain = $hw_chain.',osimage='.$provmethod.":--noupdateinitrd";
-        }
-    }
-    #run bmcsetups.
-    if ((exists $netprofileattr->{"bmc"}) and $hw_reconfig){ 
-        if (index($final_chain, "runcmd=bmcsetup") == -1){
-            $final_chain = 'runcmd=bmcsetup,'.$final_chain.':reboot4deploy';
-        }
-        else{
-            $final_chain = $final_chain.':reboot4deploy';
-        }
-    }
-    return (0, $final_chain);
-}
-
-#-------------------------------------------------------------------------------
-
-=head3 get_all_vmhosts
-      Description : Get all vm hosts/hypervisor from DB. 
-      Arguments   : N/A
-      Returns     : ref for vm hosts/hypervisor hash.
-      Example     : 
-                    my $hashref = xCAT::ProfiledNodeUtils->get_all_vmhosts();
-=cut
-
-#-------------------------------------------------------------------------------
-sub get_all_vmhosts
-{
-    my %vmhostshash;
-
-    my $nodelisttab = xCAT::Table->new('nodelist');
-    # groups like '__Hypervisor_pkvm' means this node is Power KVM hypervisor
-    my @vmhosts = $nodelisttab->getAllAttribsWhere("groups like '%__Hypervisor_kvm%'", 'node');
-    foreach (@vmhosts) {
-        if($_->{'node'}) {
-            $vmhostshash{$_->{'node'}} = 1;
-        }
-    }
-    $nodelisttab->close();
-
-    # Return the ref accordingly 
-    return \%vmhostshash;
-}
-
-#-------------------------------------------------------------------------------
-
-=head3 get_netboot_attr
-      Description : Get netboot attribute for node
-      Arguments   : $imageprofile - image profile name, mandatory. e.g. "__ImageProfile_rhels7.0-x86_64-stateful-mgmtnode"
-                    $hardwareprofile - harware profile name, optional. e.g. "__HardwareProfile_IBM_System_x_M4"
-      Returns     : (returncode, netboot)
-                    returncode=0 - can not get netboot value,netboot is the error message
-                    returncode=1 - can get netboot value,netboot is the right value
-=cut
-
-#-------------------------------------------------------------------------------
-sub get_netboot_attr{
-    my $class = shift;
-    my $imageprofile = shift;
-    my $hardwareprofile = shift;
-    my $netboot;
-
-    my @nodegrps = xCAT::TableUtils->list_all_node_groups();
-    unless(grep{ $_ eq $imageprofile} @nodegrps)
-    {
-        return 0, "Image profile not defined in DB."
-    }
-    $imageprofile =~ s/^__ImageProfile_//;
-
-    if ($hardwareprofile){
-        unless(grep{ $_ eq $hardwareprofile} @nodegrps)
-        {
-            return 0, "Hardware profile not defined in DB."
-        }
-        $hardwareprofile =~ s/^__HardwareProfile_//;
-    }
-    else
-    {
-        $hardwareprofile = '*';
-    }
-
-    # Get os name, os major version, osarch
-    my $osimage_tab = xCAT::Table->new('osimage');
-    my $osimage_tab_entry = $osimage_tab->getAttribs({'imagename'=> $imageprofile},('osdistroname'));
-    my $osdistroname = $osimage_tab_entry->{'osdistroname'};
-    $osimage_tab->close();
-
-    my $osdistro_tab = xCAT::Table->new('osdistro');
-    my $osdistro_tab_entry = $osdistro_tab->getAttribs({'osdistroname'=> $osdistroname},('basename', 'majorversion', 'arch'));
-    my $os_name = $osdistro_tab_entry->{'basename'};
-    my $os_major_version = $osdistro_tab_entry->{'majorversion'};
-    my $os_arch = $osdistro_tab_entry->{'arch'};
-    $osdistro_tab->close;
-
-    # Treate os name rhel,centos,rhelhpc same as rhels
-    if ($os_name eq 'centos' || $os_name eq 'rhelhpc' || $os_name eq 'rhel')
-    {
-        $os_name = 'rhels';
-    }
-    # Treate arch ppc64el same as ppc64le,x86 same as x86_64
-    if ($os_arch eq 'ppc64el')
-    {
-        $os_arch = 'ppc64le';
-    }elsif ($os_arch eq 'x86')
-    {
-        $os_arch = 'x86_64';
-    }
-
-# Rule for netboot attribute.If update the rule,just update %netboot_dict and @condition_array
-# It's sequence sensitive: os arch -> os name -> os major version -> hardware profile
-# Priority |  Arch       | OS Name | OS Major Version | Hardware Profile | Noderes.netboot  |
-# 1        |  x86_64/x86 | *       | *                | *                | xnba             |
-# 2        |  ppc64      | rhels   | 7                | *                | grub2            |
-# 3        |             | *       | *                | *                | yaboot           |
-# 4        |  ppc64le/el | *       | *                | IBM_PowerNV      | petiboot         |
-# 5        |             | *       | *                | *                | grub2            |
-#                         arch          osname       version  hardware           netboot
-    my %netboot_dict = ( 'x86_64'                                             => 'xnba', 
-                         'ppc64'   => { 
-                                        'rhels' => { 
-                                                     '7'                      => 'grub2', 
-                                                     '*'                      => 'yaboot',
-                                                   }, 
-                                        '*'                                   => 'yaboot', 
-                                      },                                  
-                         'ppc64le' => {
-                                        '*'    =>  { 
-                                                     '*' => { 
-                                                              'IBM_PowerNV'   => 'petiboot',
-                                                              '*'             => 'grub2',
-                                                            },
-                                                   },
-                                      },
-                       );
-    my $condition_array_ref = [$os_arch, $os_name, $os_major_version, $hardwareprofile];
-    $netboot = cal_netboot(\%netboot_dict, $condition_array_ref);
-    if($netboot eq '0')
-    {
-        return 0, "Can not get the netboot attribute";
-    }
-    else
-    {
-        return 1, $netboot;
-    }
-}
-#-------------------------------------------------------------------------------
-
-=head3 cal_netboot
-      Description : Calculate netboot attribute by conditions recursively, internal use.
-      Arguments   : $netboot_dict_ref
-                    $condition_array_ref
-      Returns     : netboot
-                    returncode=0 - can not get netboot value
-=cut
-
-#-------------------------------------------------------------------------------
-sub cal_netboot{
-    my $netboot_dict_ref = shift;
-    my $condition_array_ref = shift;
-    my $condition_array_len = scalar @$condition_array_ref;
-    
-    if( $condition_array_len == 0 ){
-        return 0;
-    }
-
-    my $condition = shift @$condition_array_ref;
-    if( (exists($netboot_dict_ref->{$condition})) || (exists($netboot_dict_ref->{'*'})) )
-    {
-        if(!exists($netboot_dict_ref->{$condition}))
-        {
-            $condition = '*';
-        }
-        if(ref($netboot_dict_ref->{$condition}) eq 'HASH')
-        {
-            if($condition_array_len > 1)
-            {
-                return cal_netboot($netboot_dict_ref->{$condition}, $condition_array_ref);
-            }
-            else
-            {
-                return 0;
-            }
-        }
-        else
-        {
-            return $netboot_dict_ref->{$condition};
-        }
-    }
-    else
-    {
-        return 0;
-    }
-}
@@ -810,10 +810,6 @@ sub senddeviceskeys
    # add to the command
    $setupcmd .=$key; 
    $setupcmd .="\"";
-    # Special case for vios
-    if ($ENV{DEVICETYPE} eq 'vios') {
-        $setupcmd = "\"echo $key | tee -a ~/.ssh/authorized_keys2\"";
-    }
    # For each input device
    my @nodelist=split(/,/,$nodes);
    foreach my $node (@nodelist) {
@@ -116,9 +116,6 @@ sub dodiscover {
                   send_message($args{reqcallback}, 0, "The rarge is too large and may be time consuming. Broadcast is recommended.");
               }
            }
-
-            #no need to check site.nmapoptions because it specifilly 
-			# uses T5 for certain performance requirement.
            `/usr/bin/nmap $range -sn -PE -n --send-ip -T5 `;
            my $nmapres = `/usr/bin/nmap $range -PE -p 427 -n --send-ip -T5 `;
            foreach my $line (split(/\n\n/,$nmapres)) {
@@ -290,7 +287,7 @@ sub dodiscover {
                    if ($rethash{$peername}) {
                            next; #got a dupe, discard
                    }
-                    my $result = process_slp_packet(packet=>$slpkg,sockaddr=>$pkg,'socket'=>$args{'socket'}, peername=>$peername, callback=>$args{reqcallback});
+                    my $result = process_slp_packet(packet=>$slpkg,sockaddr=>$pkg,'socket'=>$args{'socket'});
                    if ($result) {
                        if ($peername =~ /\./) { #ipv4
                            $peername =~ s/::ffff://;
@@ -374,10 +371,9 @@ sub process_slp_packet {
        if ($parsedpacket->{FunctionId} == 2) {#Service Reply
            parse_service_reply($parsedpacket->{payload},$parsedpacket);
            unless (ref $parsedpacket->{service_urls} and scalar @{$parsedpacket->{service_urls}}) { return undef; }
-            if ($parsedpacket->{attributes} && get_mac_for_addr($args{peername})) {
-                #service reply had ext. Stop here if has gotten attributes and got mac. 
-                #continue the unicast request for service attributes if cannot find mac for peernode
-                return $parsedpacket; #don't bother sending attrrequest, already got it in first packet
+            if ($parsedpacket->{attributes}) { #service reply had ext
+
+                    return $parsedpacket; #don't bother sending attrrequest, already got it in first packet
            }
            my $srvtype = $xid_to_srvtype_map{$parsedpacket->{Xid}};
            my $packet = generate_attribute_request(%args,SrvType=>$srvtype);
@@ -650,8 +650,7 @@ sub decode_spd {
        8 => "DDR2 SDRAM",
        9 => "DDR2 SDRAM FB-DIMM",
        10 => "DDR2 SDRAM FB-DIMM PROBE",
-        11 => "DDR3 SDRAM",
-        12 => "DDR4 SDRAM",
+        11 => "DDR3 SDRAM"
    );
    
    my %modtypes = (
@@ -669,35 +668,33 @@ sub decode_spd {
        1333 => 10600,
        1600 => 12800,
        1867 => 14900,
-        2132 => 17000,
        2133 => 17000,
        2134 => 17000,
    );

-    my %ddrmodcap = (
+    my %ddr3modcap = (
        0 => 256,
        1 => 512,
        2 => 1024,
        3 => 2048,
        4 => 4096,
        5 => 8192,
-        6 => 16384,
-        7 => 32768,
+        6 => 16384
    );

-    my %ddrdevwidth = (
+    my %ddr3devwidth = (
        0 => 4,
        1 => 8,
        2 => 16,
        3 => 32
    );
-    my %ddrranks = (
+    my %ddr3ranks = (
        0 => 1,
        1 => 2,
        2 => 3,
        3 => 4
    );
-    my %ddrbuswidth = (
+    my %ddr3buswidth = (
        0 => 8,
        1 => 16,
        2 => 32,
@@ -731,10 +728,10 @@ sub decode_spd {
            $rethash->{product}->{name} .= " ECC";
        }
        $rethash->{product}->{name}.=" ".$modtypes{$spd[3]&0x0f};
-        my $sdramcap=$ddrmodcap{$spd[4]&0xf};
-        my $buswidth=$ddrbuswidth{$spd[8]&0b111};
-        my $sdramwidth=$ddrdevwidth{$spd[7]&0b111};
-        my $ranks = $ddrranks{($spd[7]&0b111000)>>3};
+        my $sdramcap=$ddr3modcap{$spd[4]&0xf};
+        my $buswidth=$ddr3buswidth{$spd[8]&0b111};
+        my $sdramwidth=$ddr3devwidth{$spd[7]&0b111};
+        my $ranks = $ddr3ranks{($spd[7]&0b111000)>>3};


        my $capacity = $sdramcap/8*$buswidth/$sdramwidth*$ranks;
@@ -772,61 +769,6 @@ sub decode_spd {
 	#	$rawspd .= sprintf("%02X ",$_);
 	#}
 	#push @{$rethash->{product}->{extra}},$rawspd;
-    } elsif  ($spd[2] == 12) { #DDR4 spec applies
-        # spd[125] spd[18] spd[18is sdram min cycle time .. spd125 is fine offset for min time
-        # mtb and ftb are fixed in ddr4 spd spec.. mtb is always 0.125 ns and ftb is always 0.001 ns
-        my $speed;
-        my $clock;
-        if ($spd[17] == 0) {
-            my $fineoffset = $spd[125];
-            if ($fineoffset & 0b10000000) {
-                #negative value, twos complement
-                $fineoffset = 0-(($fineoffset ^ 0xff) + 1);
-            }
-            $clock = int(2/((0.125*$spd[18] + $fineoffset*0.001)*0.001));
-            $speed = $speedfromclock{$clock};
-            unless ($speed) { $speed = "UNKNOWN"; }
-        } else { # this would mean a different MTB and FTB than spec indicated..
-            $clock = "UNKNOWN";
-            $speed = "UNKNOWN";
-        }
-        $rethash->{product}->{name}="PC4-".$speed." ($clock MT/s)";
-        if ($spd[13]&0b11000 == 0b1000) {
-            $rethash->{product}->{name} .= " ECC";
-        }
-        $rethash->{product}->{name}.=" ".$modtypes{$spd[3]&0x0f};
-        my $sdramcap=$ddrmodcap{$spd[4]&0xf};
-        my $buswidth=$ddrbuswidth{$spd[13]&0b111};
-        my $sdramwidth=$ddrdevwidth{$spd[12]&0b111};
-        my $ranks = $ddrranks{($spd[12]&0b111000)>>3};
-
-
-        my $capacity = $sdramcap/8*$buswidth/$sdramwidth*$ranks;
-        if ($capacity < 1024) {
-            $capacity = $capacity."MB";
-        } else {
-            $capacity = ($capacity/1024)."GB";
-        }
-        $rethash->{product}->{name} = $capacity." ".$rethash->{product}->{name};
-
-        $rethash->{product}->{manufacturer} = decode_manufacturer($spd[320],$spd[321]);
-        $rethash->{product}->{buildlocation} = sprintf("%02x",$spd[322]);
-        if ($spd[120] != 0 or $spd[121] != 0) {
-            $rethash->{product}->{builddate} = sprintf("Week %x of 20%02x",$spd[323],$spd[324]);
-        }
-        foreach (@spd[329..348]) {
-            if ($_ > 126 or $_ < 32) {
-                $rethash->{product}->{model}="Malformed SPD";
-            }
-        }
-        unless ($rethash->{product}->{model}) {
-            $rethash->{product}->{model}=pack("C*",@spd[329..348]);
-        }
-	#my $rawspd="SPD Dump: ";
-	#foreach (@spd) {
-	#	$rawspd .= sprintf("%02X ",$_);
-	#}
-	#push @{$rethash->{product}->{extra}},$rawspd;
    } else {
        $rethash->{product}->{model}="Unrecognized SPD";
    } 
@@ -267,14 +267,11 @@ virtsd => {
 },

 storage => {
-    cols => [qw(node osvolume size state storagepool hypervisor fcprange volumetag type controller comments disable)],
+    cols => [qw(node osvolume size state storagepool hypervisor fcprange volumetag comments disable)],
    keys => [qw(node)],
    table_descr => 'Node storage resources',
    descriptions => {
        node => 'The node name',
-        controller => 'The management address to attach/detach new volumes.
-                       In the scenario involving multiple controllers, this data must be
-                       passed as argument rather than by table value',
        osvolume => "Specification of what storage to place the node OS image onto.  Examples include:
                localdisk (Install to first non-FC attached disk)
                usbdisk (Install to first USB mass storage device seen)
@@ -284,7 +281,6 @@ storage => {
        storagepool => 'Name of storage pool where the volume is assigned.',
        hypervisor => 'Name of the hypervisor where the volume is configured.',
        fcprange => 'A range of acceptable fibre channels that the volume can use. Examples include: 3B00-3C00;4B00-4C00.',
-        type => 'The plugin used to drive storage configuration (e.g. svc)',
        volumetag => 'A specific tag used to identify the volume in the autoyast or kickstart template.',
        comments => 'Any user-written notes.',
        disable => "Set to 'yes' or '1' to comment out this row.",
@@ -393,46 +389,7 @@ ipmi => {
 descriptions => {
  node => 'The node name or group name.',
  bmc => 'The hostname of the BMC adapater.',
-  bmcport => ' In systems with selectable shared/dedicated ethernet ports,
-           this parameter can be used to specify the preferred port.  0
-           means use the shared port, 1 means dedicated, blank is to not
-           assign.
-
-           The following special cases exist for IBM System x servers:
-
-           For x3755 M3 systems, 0 means use the dedicated port, 1 means
-           shared, blank is to not assign.
-
-       For certain systems which have a mezzaine or ML2 adapter, there is a second
-       value to include:
-
-
-           For x3750 M4 (Model 8722):
-
-
-           0 2   1st 1Gbps interface for LOM
-
-           0 0   1st 10Gbps interface for LOM
-
-           0 3   2nd 1Gbps interface for LOM
-
-           0 1   2nd 10Gbps interface for LOM
-
-
-           For  x3750 M4 (Model 8752), x3850/3950 X6, dx360 M4, x3550 M4, and x3650 M4:
-
-
-           0     Shared (1st onboard interface)
-
-           1     Dedicated
-
-           2 0   First interface on ML2 or mezzanine adapter
-
-           2 1   Second interface on ML2 or mezzanine adapter
-
-           2 2   Third interface on ML2 or mezzanine adapter
-
-           2 3   Fourth interface on ML2 or mezzanine adapter',
+  bmcport => 'In systems with selectable shared/dedicated ethernet ports, this parameter can be used to specify the preferred port.  0 means use the shared port, 1 means dedicated, blank is to not assign',
  taggedvlan => 'Have bmcsetup place the BMC on the specified vlan tag on a shared netwirk interface.  Some network devices may be incompatible with this option',
  bmcid => 'Unique identified data used by discovery processes to distinguish known BMCs from unrecognized BMCs',
  username => 'The BMC userid.  If not specified, the key=ipmi row in the passwd table is used as the default.',
@@ -542,7 +499,7 @@ networks => {
  netname => 'Name used to identify this network definition.',
  net => 'The network address.',
  mask => 'The network mask.',
-  mgtifname => 'The interface name of the management/service node facing this network.  !remote!<nicname> indicates a non-local network on a specific nic for relay DHCP.',
+  mgtifname => 'The interface name of the management/service node facing this network.  !remote! indicates a non-local network for relay DHCP.',
  gateway => 'The network gateway. It can be set to an ip address or the keyword <xcatmaster>, the keyword <xcatmaster> indicates the cluster-facing ip address configured on this management node or service node. Leaving this field blank means that there is no gateway for this network.',
  dhcpserver => 'The DHCP server that is servicing this network.  Required to be explicitly set for pooled service node operation.',
  tftpserver => 'The TFTP server that is servicing this network.  If not set, the DHCP server is assumed.',
@@ -575,7 +532,7 @@ nodegroup => {
 },
  },
 nodehm => {
-    cols => [qw(node power mgt cons termserver termport conserver serialport serialspeed serialflow getmac cmdmapping consoleondemand comments disable)],
+    cols => [qw(node power mgt cons termserver termport conserver serialport serialspeed serialflow getmac cmdmapping comments disable)],
    keys => [qw(node)],
    tablespace =>'XCATTBS16K',
    table_desc => "Settings that control how each node's hardware is managed.  Typically, an additional table that is specific to the hardware type of the node contains additional info.  E.g. the ipmi, mp, and ppc tables.",
@@ -592,7 +549,6 @@ nodehm => {
  serialflow => "The flow control value of the serial port for this node.  For SOL this is typically 'hard'.",
  getmac => 'The method to use to get MAC address of the node with the getmac command. If not set, the mgt attribute will be used.  Valid values: same as values for mgmt attribute.',
  cmdmapping => 'The fully qualified name of the file that stores the mapping between PCM hardware management commands and xCAT/third-party hardware management commands for a particular type of hardware device.  Only used by PCM.',
-  consoleondemand => 'This overrides the value from site.consoleondemand; (0=no, 1=yes). Default is the result from site.consoleondemand.',
     comments => 'Any user-written notes.',
     disable => "Set to 'yes' or '1' to comment out this row.",
 },
@@ -611,7 +567,7 @@ nodelist => {
     appstatustime =>'The date and time when appstatus was updated.',
     primarysn => 'Not used currently. The primary servicenode, used by this node.',
     hidden => "Used to hide fsp and bpa definitions, 1 means not show them when running lsdef and nodels",
-     updatestatus => "The current node update status. Valid states are synced, out-of-sync,syncing,failed.",
+     updatestatus => "The current node update status. Valid states are synced out-of-sync,syncing,failed.",
     updatestatustime => "The date and time when the updatestatus was updated.",
     zonename => "The name of the zone to which the node is currently assigned. If undefined, then it is not assigned to any zone. ",
     comments => 'Any user-written notes.',
@@ -643,14 +599,14 @@ noderes => {
 descriptions => {
  node => 'The node name or group name.',
  servicenode => 'A comma separated list of node names (as known by the management node) that provides most services for this node. The first service node on the list that is accessible will be used.  The 2nd node on the list is generally considered to be the backup service node for this node when running commands like snmove.',
-  netboot => 'The type of network booting to use for this node.  Valid values:  pxe or xnba for x86* architecture, yaboot for POWER architecture, grub2-tftp and grub2-http for RHEL7 on Power and all the os deployment on Power LE. Notice: yaboot is not supported from rhels7 on Power,use grub2-tftp or grub2-http instead, the difference between the 2 is the file transfer protocol(i.e, http or tftp)',
+  netboot => 'The type of network booting to use for this node.  Valid values:  pxe or xnba for x86* architecture, yaboot for POWER architecture, grub2 for RHEL7 on Power. Notice: yaboot is not supported from rhels7 on Power,use grub2 instead',
  tftpserver => 'The TFTP server for this node (as known by this node). If not set, it defaults to networks.tftpserver.',
  tftpdir => 'The directory that roots this nodes contents from a tftp and related perspective.  Used for NAS offload by using different mountpoints.',
  nfsserver => 'The NFS or HTTP server for this node (as known by this node).',
  monserver => 'The monitoring aggregation point for this node. The format is "x,y" where x is the ip address as known by the management node and y is the ip address as known by the node.',
  nfsdir => 'The path that should be mounted from the NFS server.',
-  installnic => 'The network adapter on the node that will be used for OS deployment, the installnic can be set to the network adapter name or the mac address or the keyword "mac" which means that the network interface specified by the mac address in the mac table will be used.  If not set, primarynic will be used. If primarynic is not set too, the keyword "mac" will be used as default.',
-  primarynic => 'This attribute will be deprecated. All the used network interface will be determined by installnic. The network adapter on the node that will be used for xCAT management, the primarynic can be set to the network adapter name or the mac address or the keyword "mac" which means that the network interface specified by the mac address in the mac table  will be used.  Default is eth0.',
+  installnic => 'The network adapter on the node that will be used for OS deployment, the installnic can be set to the network adapter name or the mac address or the keyword "mac" which means that the network interface specified by the mac address in the mac table will be used.  If not set, primarynic will be used.',
+  primarynic => 'The network adapter on the node that will be used for xCAT management, the primarynic can be set to the network adapter name or the mac address or the keyword "mac" which means that the network interface specified by the mac address in the mac table  will be used.  Default is eth0.',
  discoverynics => 'If specified, force discovery to occur on specific network adapters only, regardless of detected connectivity.  Syntax can be simply "eth2,eth3" to restrict discovery to whatever happens to come up as eth2 and eth3, or by driver name such as "bnx2:0,bnx2:1" to specify the first two adapters managed by the bnx2 driver',
  cmdinterface => 'Not currently used.',
  xcatmaster => 'The hostname of the xCAT service node (as known by this node).  This acts as the default value for nfsserver and tftpserver, if they are not set.  If xcatmaster is not set, the node will use whoever responds to its boot request as its master.  For the directed bootp case for POWER, it will use the management node if xcatmaster is not set.',
@@ -728,7 +684,7 @@ osimage => {
  description => 'OS Image Description',
  provmethod => 'The provisioning method for node deployment. The valid values are install, netboot,statelite,boottarget,dualboot,sysclone. If boottarget is set, you must set linuximage.boottarget to the name of the boottarget definition. It is not used by AIX.',
  rootfstype => 'The filesystem type for the rootfs is used when the provmethod is statelite. The valid values are nfs or ramdisk. The default value is nfs',
-  osdistroname => 'The name of the OS distro definition.  This attribute can be used to specify which OS distro to use, instead of using the osname,osvers,and osarch attributes. For *kit commands,  the attribute will be used to read the osdistro table for the osname, osvers, and osarch attributes. If defined, the osname, osvers, and osarch attributes defined in the osimage table will be ignored.',
+  osdistroname => 'The name of the OS distro definition.  This attribute can be used to specify which OS distro to use, instead of using the osname,osvers,and osarch attributes.',
  osupdatename => 'A comma-separated list of OS distro updates to apply to this osimage.',
  cfmdir => 'CFM directory name for PCM. Set to /install/osimages/<osimage name>/cfmdir by PCM. ',
  profile => 'The node usage category. For example compute, service.',
@@ -752,16 +708,16 @@ linuximage  => {
 table_desc => 'Information about a Linux operating system image that can be used to deploy cluster nodes.',
 descriptions => {
  imagename => 'The name of this xCAT OS image definition.',
-  template => 'The fully qualified name of the template file that will be used to create the OS installer configuration file for stateful installations (e.g.  kickstart for RedHat, autoyast for SLES).',
+  template => 'The fully qualified name of the template file that is used to create the kick start file for diskful installation.',
  boottarget => 'The name of the boottarget definition.  When this attribute is set, xCAT will use the kernel, initrd and kernel params defined in the boottarget definition instead of the default.',
   addkcmdline=> 'User specified arguments to be passed to the kernel.  The user arguments are appended to xCAT.s default kernel arguments.   This attribute is ignored if linuximage.boottarget is set.',
  pkglist => 'The fully qualified name of the file that stores the distro  packages list that will be included in the image. Make sure that if the pkgs in the pkglist have dependency pkgs, the dependency pkgs should be found in one of the pkgdir',
-  pkgdir => 'The name of the directory where the distro packages are stored. It could be set multiple paths.The multiple paths must be seperated by ",". The first path in the value of osimage.pkgdir must be the OS base pkg dir path, such as pkgdir=/install/rhels6.2/x86_64,/install/updates . In the os base pkg path, there are default repository data. And in the other pkg path(s), the users should make sure there are repository data. If not, use "createrepo" command to create them. For ubuntu, multiple mirrors can be specified in the pkgdir attribute, the mirrors must be prefixed by the protocol(http/ssh) and delimited with "," between each other.',
+  pkgdir => 'The name of the directory where the distro packages are stored. It could be set multiple paths.The multiple paths must be seperated by ",". The first path in the value of osimage.pkgdir must be the OS base pkg dir path, such as pkgdir=/install/rhels6.2/x86_64,/install/updates . In the os base pkg path, there are default repository data. And in the other pkg path(s), the users should make sure there are repository data. If not, use "createrepo" command to create them. ',
  otherpkglist => 'The fully qualified name of the file that stores non-distro package lists that will be included in the image.',
-  otherpkgdir => 'The base directory where the non-distro packages are stored. Only 1 local directory supported at present.', 
+  otherpkgdir => 'The base directory where the non-distro packages are stored.', 
  exlist => 'The fully qualified name of the file that stores the file names and directory names that will be excluded from the image during packimage command.  It is used for diskless image only.',
  postinstall => 'The fully qualified name of the script file that will be run at the end of the genimage command. It is used for diskless image only.',
-  rootimgdir => 'The directory name where the image is stored.  It is generally used for diskless image. it also can be used in sysclone environment to specify where the image captured from golden client is stored. in sysclone environment, rootimgdir is generally assigned to some default value by xcat, but you can specify your own store directory. just one thing need to be noticed, wherever you save the image, the name of last level directory must be the name of image. for example, if your image name is testimage and you want to save this image under home directoy, rootimgdir should be assigned to value /home/testimage/',
+  rootimgdir => 'The directory name where the image is stored.  It is used for diskless image only.',
  kerneldir => 'The directory name where the 3rd-party kernel is stored. It is used for diskless image only.',
  nodebootif => 'The network interface the stateless/statelite node will boot over (e.g. eth0)',
  otherifce => 'Other network interfaces (e.g. eth1) in the image that should be configured via DHCP',
@@ -771,7 +727,7 @@ linuximage  => {
  permission => 'The mount permission of /.statelite directory is used, its default value is 755',
  dump => qq{The NFS directory to hold the Linux kernel dump file (vmcore) when the node with this image crashes, its format is "nfs://<nfs_server_ip>/<kdump_path>". If you want to use the node's "xcatmaster" (its SN or MN), <nfs_server_ip> can be left blank. For example, "nfs:///<kdump_path>" means the NFS directory to hold the kernel dump file is on the node's SN, or MN if there's no SN.},
  crashkernelsize => 'the size that assigned to the kdump kernel. If the kernel size is not set, 256M will be the default value.',
-  partitionfile => 'The path of the configuration file which will be used to partition the disk for the node. For stateful osimages,two types of files are supported: "<partition file absolute path>" which contains a partitioning definition that will be inserted directly into the generated autoinst configuration file and must be formatted for the corresponding OS installer (e.g. kickstart for RedHat, autoyast for SLES).  "s:<partitioning script absolute path>" which specifies a shell script that will be run from the OS installer configuration file %pre section;  the script must write the correct partitioning definition into the file /tmp/partitionfile on the node which will be included into the configuration file during the install process. For statelite osimages, partitionfile should specify "<partition file absolute path>";  see the xCAT Statelite documentation for the xCAT defined format of this configuration file.',
+  partitionfile => 'The path of the configuration file which is used to part the disk for the node. For stateful: two types of value can be set for this attribute. One is "<partition file absolute path>", the content of the partition file must use the corresponding format with the OS type. The other one is "s:<partition file absolute path>", the content of the partition file should be a shell script which must write the partition definition into /tmp/partitionfile on the node. For statelite: the valid value is <partition file absolute path>, refer to the statelite doc for the xCAT defined format of the configuration file.',
  driverupdatesrc => 'The source of the drivers which need to be loaded during the boot. Two types of driver update source are supported: Driver update disk and Driver rpm package. The value for this attribute should be comma separated sources. Each source should be the format tab:full_path_of_srouce_file. The tab keyword can be: dud (for Driver update disk) and rpm (for driver rpm). If missing the tab, the rpm format is the default. e.g. dud:/install/dud/dd.img,rpm:/install/rpm/d.rpm',
  comments => 'Any user-written notes.',
  disable => "Set to 'yes' or '1' to comment out this row.",
@@ -786,7 +742,7 @@ winimage => {
  imagename => 'The name of this xCAT OS image definition.',
  template => 'The fully qualified name of the template file that is used to create the windows unattend.xml file for diskful installation.',
  installto => 'The disk and partition that the Windows will be deployed to. The valid format is <disk>:<partition>. If not set, default value is 0:1 for bios boot mode(legacy) and 0:3 for uefi boot mode; If setting to 1, it means 1:1 for bios boot and 1:3 for uefi boot',
-  partitionfile => 'The path of partition configuration file. Since the partition configuration for bios boot mode and uefi boot mode are different, this configuration file can include both configurations if you need to support both bios and uefi mode. Either way, you must specify the boot mode in the configuration. Example of partition configuration file: [BIOS]xxxxxxx[UEFI]yyyyyyy. To simplify the setting, you also can set installto in partitionfile with section like [INSTALLTO]0:1',
+  partitionfile => 'The path of partition configuration file. Since the partition configuration for bios boot mode and uefi boot mode are different, this configuration file should include two parts if customer wants to support both bios and uefi mode. If customer just wants to support one of the modes, specify one of them anyway. Example of partition configuration file: [BIOS]xxxxxxx[UEFI]yyyyyyy. To simplify the setting, you also can set installto in partitionfile with section likes [INSTALLTO]0:1',
  winpepath => 'The path of winpe which will be used to boot this image. If the real path is /tftpboot/winboot/winpe1/, the value for winpepath should be set to winboot/winpe1',
  comments => 'Any user-written notes.',
  disable => "Set to 'yes' or '1' to comment out this row.",
@@ -809,11 +765,11 @@ passwd => {
 policy => {
    cols => [qw(priority name host commands noderange parameters time rule comments disable)],
    keys => [qw(priority)],
-    table_desc => 'The policy table in the xCAT database controls who has authority to run specific xCAT operations. It is basically the Access Control List (ACL) for xCAT. It is sorted on the priority field before evaluating.',
+    table_desc => 'The policy table in the xCAT database controls who has authority to run specific xCAT operations. It is basically the Access Control List (ACL) for xCAT.',
 descriptions => {
-  priority => 'The priority value for this rule.  This value is used to identify this policy data object (i.e. this rule) The table is sorted on this field with the lower the number the higher the priority. For example 1.0 is higher priority than 4.1 is higher than 4.9.',
+  priority => 'The priority value for this rule.  This value is used to identify this policy data object (i.e. this rule).',
  name => 'The username that is allowed to perform the commands specified by this rule.  Default is "*" (all users).',
-  host => 'The host from which users may issue the commands specified by this rule.  Default is "*" (all hosts). Only all or one host is supported',
+  host => 'The host from which users may issue the commands specified by this rule.  Default is "*" (all hosts). Only all or one host supported. ',
  commands => 'The list of commands that this rule applies to.  Default is "*" (all commands).',
  noderange => 'The Noderange that this rule applies to.  Default is "*" (all nodes). Not supported with the *def commands.',
  parameters => 'A regular expression that matches the command parameters (everything except the noderange) that this rule applies to.  Default is "*" (all parameters). Not supported with the *def commands.',
@@ -827,11 +783,11 @@ postscripts => {
    cols => [qw(node postscripts postbootscripts comments disable)],
    keys => [qw(node)],
    tablespace =>'XCATTBS16K',
-    table_desc => 'The scripts that should be run on each node after installation or diskless boot.',
+    table_desc => ' The scripts that should be run on each node after installation or diskless boot.',
 descriptions => {
  node => 'The node name or group name.',
  postscripts => 'Comma separated list of scripts that should be run on this node after diskfull installation or diskless boot. Each script can take zero or more parameters. For example: "script1 p1 p2,script2,...". xCAT automatically adds the postscripts from  the xcatdefaults.postscripts attribute of the table to run first on the nodes after install or diskless boot. For installation of RedHat, CentOS, Fedora, the scripts will be run before the reboot. For installation of SLES, the scripts will be run after the reboot but before the init.d process. For diskless deployment, the scripts will be run at the init.d time, and xCAT will automatically add the list of scripts from the postbootscripts attribute to run after postscripts list. For installation of AIX, the scripts will run after the reboot and acts the same as the postbootscripts attribute.  For AIX, use the postbootscripts attribute. Support will be added in the future for  the postscripts attribute to run the scripts before the reboot in AIX. ',
-  postbootscripts => 'Comma separated list of scripts that should be run on this node after diskfull installation or diskless boot. Each script can take zero or more parameters. For example: "script1 p1 p2,script2,...". On AIX these scripts are run during the processing of /etc/inittab.  On Linux they are run at the init.d time. xCAT automatically adds the scripts in the xcatdefaults.postbootscripts attribute to run first in the list.',
+  postbootscripts => 'Comma separated list of scripts that should be run on thisnode after diskfull installation or diskless boot. Each script can take zero or more parameters. For example: "script1 p1 p2,script2,...". On AIX these scripts are run during the processing of /etc/inittab.  On Linux they are run at the init.d time. xCAT automatically adds the scripts in the xcatdefaults.postbootscripts attri bute to run first in the list.',
    comments => 'Any user-written notes.',
     disable => "Set to 'yes' or '1' to comment out this row.",
 },
@@ -924,11 +880,8 @@ site => {
   " -----------------\n".
   "DATABASE ATTRIBUTES\n".
   " -----------------\n".
-   " auditnosyslog: If set to 1, then commands will only be written to the auditlog table.\n".
-   "                This attribute set to 1 and auditskipcmds=ALL means no logging of commands.\n".
-   "                Default is to write to both the auditlog table and syslog.\n".
   " auditskipcmds: List of commands and/or client types that will not be\n".
-   "                written to the auditlog table and syslog. See auditnosyslog.\n".
+   "                written to the auditlog table.\n".
   "                'ALL' means all cmds will be skipped. If attribute is null, all\n".
   "                commands will be written.\n". 
   "                clienttype:web would skip all commands from the web client\n". 
@@ -946,7 +899,6 @@ site => {
   " nodestatus:  If set to 'n', the nodelist.status column will not be updated during\n".
   "              the node deployment, node discovery and power operations. The default is to update.\n\n".
   " skiptables:  Comma separated list of tables to be skipped by dumpxCATdb\n\n".
-   " skipvalidatelog:  If set to 1, then getcredentials and getpostscripts calls will not be logged in syslog.\n\n".
   " -------------\n".
   "DHCP ATTRIBUTES\n".
   " -------------\n".
@@ -964,11 +916,6 @@ site => {
   "                 '0' value means include all the nodes in the subnet.\n\n".
   " pruneservices:  Whether to enable service pruning when noderm is run (i.e.\n".
   "                 removing DHCP entries when noderm is executed)\n\n".
-   " managedaddressmode: The mode of networking configuration during node provision.\n".
-   "                     If set to 'static', the network configuration will be configured \n".
-   "                     in static mode based on the node and network definition on MN.\n".
-   "                     If set to 'dhcp', the network will be configured with dhcp protocol.\n".
-   "                     The default is 'dhcp'.\n\n".
   " ------------\n".
   "DNS ATTRIBUTES\n".
   " ------------\n".
@@ -989,22 +936,6 @@ site => {
   "               \"<xcatmaster>\" to mean the DNS server for each node should be the\n".
   "               node that is managing it (either its service node or the management\n".
   "               node).\n\n".
-   " externaldns:  To specify that external dns is used. If externaldns is set to any value\n".
-   "               then, makedns command will not start the local nameserver on xCAT MN. \n".
-   "               Default is to start the local nameserver.\n\n".
-   " dnsupdaters:  The value are \',\' separated string which will be added to the zone config\n".
-   "               section. This is an interface for user to add configuration entries to\n". 
-   "               the zone sections in named.conf.\n\n".
-   " dnsinterfaces:  The network interfaces DNS server should listen on.  If it is the same\n".
-   "                  for all nodes, use a simple comma-separated list of NICs.  To\n".
-   "                  specify different NICs for different nodes:\n".
-   "                       xcatmn|eth1,eth2;service|bond0.\n".
-   "                  In this example xcatmn is the name of the xCAT MN, and DNS there\n".
-   "                  should listen on eth1 and eth2.  On all of the nodes in group\n".
-   "                  'service' DNS should listen on the bond0 nic.\n".
-   "                  NOTE: if using this attribute to block certain interfaces, make sure\n".
-   "                  the ip maps to your hostname of xCAT MN is not blocked since xCAT needs to\n".
-   "                  use this ip to communicate with the local NDS server on MN.\n\n".
   " -------------------------\n".
   "HARDWARE CONTROL ATTRIBUTES\n".
   " -------------------------\n".
@@ -1132,13 +1063,6 @@ site => {
   " httpport:    The port number that the booting/installing nodes should contact the\n".
   "              http server on the MN/SN on. It is your responsibility to configure\n".
   "              the http server to listen on that port - xCAT will not do that.\n\n".
-   " nmapoptions: Additional options for the nmap command. nmap is used in pping, \n".
-   "              nodestat, xdsh -v and updatenode commands. Sometimes additional \n".
-   "              performance tuning may be needed for nmap due to network traffic.\n".
-   "              For example, if the network response time is too slow, nmap may not\n".
-   "              give stable output. You can increase the timeout value by specifying \n".
-   "              '--min-rtt-timeout 1s'. xCAT will append the options defined here to \n".
-   "              the nmap command.\n\n".
   " ntpservers:  A comma delimited list of NTP servers for the cluster - often the\n".
   "              xCAT management node.\n\n".
   " svloglocal:  if set to 1, syslog on the service node will not get forwarded to the\n".
@@ -1167,10 +1091,6 @@ site => {
   "                   will not interfere.\n\n".
   " vmwarereconfigonpower:  When set to no, the VMWare plugin will make no effort to\n".
   "                         push vm.cpus/vm.memory updates from xCAT to VMWare.\n\n".
-   " persistkvmguests:  Keep the kvm definition on the kvm hypervisor when you power off\n".
-   "                    the kvm guest node. This is useful for you to manually change the \n".
-   "                    kvm xml definition file in virsh for debugging. Set anything means\n".
-   "                    enable.\n\n".
   " --------------------\n".
   "XCAT DAEMON ATTRIBUTES\n".
   " --------------------\n".
@@ -1181,9 +1101,9 @@ site => {
   "               locking out admin interactive use. This value works with the\n".
   "               xcatmaxconnections and xcatmaxbatch attributes. Is not supported on AIX.\n".
   "               If the value is no, nodes sleep for a random time before contacting\n".
-   "               xcatd, and retry. The default is no.\n".
+   "               xcatd, and retry. On a new install of xcat, this value will be set to yes.\n".
   "               See the following document for details:\n".
-   "               Hints_and_Tips_for_Large_Scale_Clusters\n\n".
+   "               https://sourceforge.net/apps/mediawiki/xcat/index.php?title=Hints_and_Tips_for_Large_Scale_Clusters\n\n".
   " xcatmaxconnections:  Number of concurrent xCAT protocol requests before requests\n".
   "                      begin queueing. This applies to both client command requests\n".
   "                      and node requests, e.g. to get postscripts. Default is 64.\n\n".
@@ -1420,7 +1340,7 @@ firmware => {
 },

 nics => {
-        cols => [qw(node nicips  nichostnamesuffixes nichostnameprefixes nictypes niccustomscripts nicnetworks nicaliases nicextraparams comments disable)], 
+        cols => [qw(node nicips  nichostnamesuffixes nichostnameprefixes nictypes niccustomscripts nicnetworks nicaliases comments disable)], 
        keys => [qw(node)],
        tablespace =>'XCATTBS16K',
        table_desc => 'Stores NIC details.',
@@ -1457,12 +1377,6 @@ nics => {
            Format: eth0!<alias list>,eth1!<alias1 list>|<alias2 list>
 			For multiple aliases per nic use a space-separated list.
            For example: eth0!moe larry curly,eth1!tom|jerry',
-            nicextraparams => 'Comma-separated list of extra parameters that will be used for each NIC configuration.
-                If only one ip address is associated with each NIC:
-                    <nic1>!<param1=value1 param2=value2>,<nic2>!<param3=value3>, for example, eth0!MTU=1500,ib0!MTU=65520 CONNECTED_MODE=yes.
-                If multiple ip addresses are associated with each NIC:
-                    <nic1>!<param1=value1 param2=value2>|<param3=value3>,<nic2>!<param4=value4 param5=value5>|<param6=value6>, for example, eth0!MTU=1500|MTU=1460,ib0!MTU=65520 CONNECTED_MODE=yes.
-            The xCAT object definition commands support to use nicextraparams.<nicname> as the sub attributes.',
            comments => 'Any user-written notes.',
            disable => "Set to 'yes' or '1' to comment out this row.",
        },
@@ -1584,7 +1498,7 @@ discoverydata => {
       method => 'The method which handled the discovery request. The method could be one of: switch, blade, profile, sequential.',
       discoverytime => 'The last time that xCAT received the discovery message.',
       arch => 'The architecture of the discovered node. e.g. x86_64.',
-       cpucount => 'The number of cores multiply by threads core supported for the discovered node. e.g. 192.',
+       cpucount => 'The cpu number of the discovered node. e.g. 32.', 
       cputype => 'The cpu type of the discovered node. e.g. Intel(R) Xeon(R) CPU E5-2690 0 @ 2.90GHz',
       memory => 'The memory size of the discovered node. e.g. 198460852',
       mtm => 'The machine type model of the discovered node. e.g. 786310X',
@@ -1638,7 +1552,7 @@ mic => {
 hwinv => {
    cols => [qw(node cputype cpucount memory disksize comments disable)],
    keys => [qw(node)],
-    table_desc => 'The hareware inventory for the node.',
+    table_desc => 'The hardware inventory for the node.',
    descriptions => {
        node => 'The node name or group name.',
        cputype => 'The cpu model name for the node.',
@@ -1649,18 +1563,6 @@ hwinv => {
        disable =>  "Set to 'yes' or '1' to comment out this row.",
    },
 },
-token => {
-    cols => [qw(tokenid username expire comments disable)],
-    keys => [qw(tokenid)],
-    table_desc => 'The token of users for authentication.',
-    descriptions => {
-        tokenid => 'It is a UUID as an unified identify for the user.',
-        username => 'The user name.',
-        expire => 'The expire time for this token.',
-        comments => 'Any user-provided notes.',
-        disable =>  "Set to 'yes' or '1' to comment out this row.",
-    },
-},
 ); # end of tabspec definition


@@ -2004,10 +1906,6 @@ my @nodeattrs = (
        {attr_name => 'serialflow',
                 tabentry => 'nodehm.serialflow',
                 access_tabentry => 'nodehm.node=attr:node',
-  },
-        {attr_name => 'consoleondemand',
-                 tabentry => 'nodehm.consoleondemand',
-                 access_tabentry => 'nodehm.node=attr:node',
  },
 ##################
 #  vpd table     #
@@ -2389,11 +2287,7 @@ my @nodeattrs = (
 				tabentry => 'nics.nicaliases',
 				access_tabentry => 'nics.node=attr:node',
 		},
-		{attr_name => 'nicextraparams',
-				tabentry => 'nics.nicextraparams',
-				access_tabentry => 'nics.node=attr:node',
-		},
-#######################
+######################
 #  prodkey table     #
 ######################
                {attr_name => 'productkey',
@@ -2430,14 +2324,6 @@ my @nodeattrs = (
                 tabentry => 'storage.osvolume',
                 access_tabentry => 'storage.node=attr:node',
                },
-                {attr_name => 'storagcontroller',
-                 tabentry => 'storage.controller',
-                 access_tabentry => 'storage.node=attr:node',
-                },
-                {attr_name => 'storagetype',
-                 tabentry => 'storage.type',
-                 access_tabentry => 'storage.node=attr:node',
-                },
 ######################
 #  vm table          #
 ######################
@@ -2679,7 +2565,7 @@ my @nodeattrs = (
 		tabentry => 'hwinv.disksize',
 		access_tabentry => 'hwinv.node=attr:node',
 	},
-		
+	
  );	# end of @nodeattrs that applies to both nodes and groups


@@ -2729,11 +2615,11 @@ my @nodeattrs = (
 		{attr_name => 'updatestatustime',
                 tabentry => 'nodelist.updatestatustime',
                 access_tabentry => 'nodelist.node=attr:node',
-             },       
-                {attr_name => 'zonename',
+             },             
+		{attr_name => 'zonename',
                 tabentry => 'nodelist.zonename',
                 access_tabentry => 'nodelist.node=attr:node',
-             },
+             },             
 		{attr_name => 'usercomment',
                 tabentry => 'nodelist.comments',
                 access_tabentry => 'nodelist.node=attr:node',
@@ -3217,6 +3103,11 @@ push(@{$defspec{node}->{'attrs'}}, @nodeattrs);
 #########################
 #     routes table    #
 #########################
+#########################
+#  route data object  #
+#########################
+#     routes table    #
+#########################
@{$defspec{route}->{'attrs'}} = (
        {attr_name => 'routename',
                 tabentry => 'routes.routename',
@@ -3644,10 +3535,6 @@ push(@{$defspec{group}->{'attrs'}}, @nodeattrs);
                 tabentry => 'kit.kitdeployparams',
                 access_tabentry => 'kit.kitname=attr:kitname',
        },
-        {attr_name => 'kitdir',
-                 tabentry => 'kit.kitdir',
-                 access_tabentry => 'kit.kitname=attr:kitname',
-        },

 );
 #############################
@@ -3664,8 +3551,8 @@ push(@{$defspec{group}->{'attrs'}}, @nodeattrs);
                 tabentry => 'kitrepo.kitname',
                 access_tabentry => 'kitrepo.kitreponame=attr:kitreponame',
        },
-        {attr_name => 'osbasename',
-                 tabentry => 'kitrepo.osbasename',
+        {attr_name => 'osname',
+                 tabentry => 'kitrepo.osname',
                 access_tabentry => 'kitrepo.kitreponame=attr:kitreponame',
        },
        {attr_name => 'osmajorversion',
@@ -3733,10 +3620,6 @@ push(@{$defspec{group}->{'attrs'}}, @nodeattrs);
                 tabentry => 'kitcomponent.kitpkgdeps',
                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
        },
-        {attr_name => 'prerequisite',
-                 tabentry => 'kitcomponent.prerequisite',
-                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
-        },
        {attr_name => 'driverpacks',
                 tabentry => 'kitcomponent.driverpacks',
                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
@@ -3749,10 +3632,6 @@ push(@{$defspec{group}->{'attrs'}}, @nodeattrs);
                 tabentry => 'kitcomponent.postbootscripts',
                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
        },
-        {attr_name => 'genimage_postinstall',
-                 tabentry => 'kitcomponent.genimage_postinstall',
-                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
-        },
        {attr_name => 'exlist',
                 tabentry => 'kitcomponent.exlist',
                 access_tabentry => 'kitcomponent.kitcompname=attr:kitcompname',
@@ -10,8 +10,12 @@ BEGIN
 # if AIX - make sure we include perl 5.8.2 in INC path.
 #       Needed to find perl dependencies shipped in deps tarball.
 if ($^O =~ /^aix/i) {
-    unshift(@INC, qw(/usr/opt/perl5/lib/5.8.2/aix-thread-multi /usr/opt/perl5/lib/5.8.2 /usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi /usr/opt/perl5/lib/site_perl/5.8.2));
-    }
+        use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/5.8.2";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2";
+}
+
 use lib "$::XCATROOT/lib/perl";
 use strict;
 #-----------------------------------------------------------------------------
@@ -185,13 +189,6 @@ sub isServiceReq
      if (!exists($servicehash->{'tftpserver'})) { 
           $servicehash->{'tftpserver'} = 1;
      }
-      # On Ubuntu management node, we disabled the isc-dhcp-server in upstart,
-      # through file /etc/init/isc-dhcp-server.override, see bug 4399
-      # however, this causes a new problem, bug 4515
-      # the fix is to start dhcp server when starting xcatd
-      if (!exists($servicehash->{'dhcpserver'}) && xCAT::Utils->osver() =~ /ubuntu.*/i) {
-          $servicehash->{'dhcpserver'} = 1;
-      }
    }
    $servicenodetab->close;

@@ -179,10 +179,6 @@ sub init_dbworker {
        #setup signal in NotifHandler so that the cache can be updated
        xCAT::NotifHandler::setup($$, 0);

-        # NOTE: There's a bug that sometimes the %SIG is cleaned up by accident, but we cannot figure out when and why
-        # this happens. The temporary fix is to backup the %SIG and recover it when necessary.
-        my %SIGbakup = %SIG;
-
        while (not $exitdbthread) {
            eval {
                my @ready_socks = $clientset->can_read;
@@ -195,7 +191,6 @@ sub init_dbworker {
                    } else {
                        eval {
                            handle_dbc_conn($currcon,$clientset);
-                            unless (%SIG && defined ($SIG{USR1})) { %SIG = %SIGbakup; }
                        };
                        if ($@) { 
                            my $err=$@;
@@ -220,9 +215,6 @@ sub init_dbworker {
                exit(0);
            }
        }
-
-        # sleep a while to make sure the client process has done
-        sleep 1.5;
        close($dbworkersocket);
        unlink($dbsockpath);
        exit 0;
@@ -3842,7 +3834,7 @@ sub writeAllEntries
    }
    my $filename = shift;
    my $fh;
-    my $rc = 0;
+    my $rc;
    # open the file for write
    unless (open($fh," > $filename")) {
     my $msg="Unable to open $filename for write \n.";
@@ -4021,8 +4013,7 @@ sub output_table {
    Example:

 	 my $tabh = xCAT::Table->new($table);
-         my $recs=$tabh->getEntries("recid"); # returns row with recid max value in database 
-                                              # and the row with the min value.
+         my $recs=$tabh->getMAXMINEntries("recid"); 

    Comments:
        none
@@ -4040,14 +4031,13 @@ sub getMAXMINEntries
    my $rets;
    my $query;
    my $xcatcfg=get_xcatcfg();
-
    # delimit the disable column based on the DB 
    my $disable= &delimitcol("disable");	
    my $qstring;
-    if ($xcatcfg =~ /^DB2:/) {  # for DB2
+    if ($xcatcfg =~ /^DB2:/) {  # for DB2 
       $qstring = "SELECT MAX (\"$attr\") FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
    } else {
-     $qstring = "SELECT MAX($attr) FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
+       $qstring = "SELECT MAX($attr) FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
    }
    $query = $self->{dbh}->prepare($qstring);

@@ -4068,10 +4058,10 @@ sub getMAXMINEntries
        }
    }
    $query->finish();
-    if ($xcatcfg =~ /^DB2:/) {  # for DB2
+    if ($xcatcfg =~ /^DB2:/) {  # for DB2 
       $qstring = "SELECT MIN (\"$attr\") FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
    } else {
-      $qstring = "SELECT MIN($attr) FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
+    $qstring = "SELECT MIN($attr) FROM " . $self->{tabname} . " WHERE " . $disable . " is NULL or " .  $disable . " in ('0','no','NO','No','nO')";
    }
    $query = $self->{dbh}->prepare($qstring);

@@ -4086,10 +4076,11 @@ sub getMAXMINEntries
            } else {
                $rets->{"min"} = $data->{$_};
            }
-            last;    # better be only one value for min
+            last;   # better be only one value  for min
        }
    }
    return $rets;
 }
+
 1;

@@ -10,8 +10,11 @@ BEGIN
 # if AIX - make sure we include perl 5.8.2 in INC path.
 #       Needed to find perl dependencies shipped in deps tarball.
 if ($^O =~ /^aix/i) {
-    unshift(@INC, qw(/usr/opt/perl5/lib/5.8.2/aix-thread-multi /usr/opt/perl5/lib/5.8.2 /usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi /usr/opt/perl5/lib/site_perl/5.8.2));
-    }
+        use lib "/usr/opt/perl5/lib/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/5.8.2";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2/aix-thread-multi";
+        use lib "/usr/opt/perl5/lib/site_perl/5.8.2";
+}

 use lib "$::XCATROOT/lib/perl";
 use strict;
@@ -426,6 +429,7 @@ rmdir \"/tmp/$to_userid\" \n";
      # Need to check if nodes are in a zone.  
      my @zones;
      my $tab = xCAT::Table->new("zone"); 
+      my @zones; 
      if ($tab) 
      {
          # if we have zones, need to send the zone keys to each node in the zone
@@ -619,7 +623,7 @@ sub sendkeysTOzones
      my ($class, $ref_nodes,$expecttimeout) = @_;
      my @nodes=$ref_nodes;
      my $n_str    = $nodes[0];
-      @nodes=  split(",", $n_str);
+      my @nodes=  split(",", $n_str);
      my $rsp = ();
      my $cmd;
      my $roothome = xCAT::Utils->getHomeDir("root");
@@ -1174,9 +1178,7 @@ sub getAppStatus
    my ($class, $nodes_ref, $application) = @_;
    my @nodes = @$nodes_ref;

-    # FIXME: why autocommit matters for a read-only subroutine getNodesAttribs?
-    # but could not get the appstatus without the autocommit=0
-    my $nltab = xCAT::Table->new('nodelist', -autocommit => 0);
+    my $nltab = xCAT::Table->new('nodelist');
    my $nodeappstat = $nltab->getNodesAttribs(\@nodes,['appstatus']);

    my $ret_nodeappstat;
@@ -18,9 +18,8 @@ use xCAT::Utils;
 my %usage = (
    "rnetboot" => 
 "Usage: rnetboot <noderange> [-s net|hd] [-F] [-f] [-V|--verbose] [-m table.colum==expectedstatus] [-m table.colum==expectedstatus...] [-r <retrycount>] [-t <timeout>]
-       rnetboot [-h|--help|-v|--version]
-     zVM specific:
-       rnetboot <noderange> [ipl= address]",
+       rnetboot <noderange> [ipl= address]
+       rnetboot [-h|--help|-v|--version]",
    "rpower" => 
 "Usage: rpower <noderange> [--nodeps] [on|onstandby|off|suspend|reset|stat|state|boot] [-V|--verbose] [-m table.colum==expectedstatus][-m table.colum==expectedstatus...] [-r <retrycount>] [-t <timeout>]
       rpower [-h|--help|-v|--version]
@@ -28,12 +27,10 @@ my %usage = (
       rpower <noderange> [boot] [ -c <path to iso> ]
     PPC (with IVM or HMC) specific:
       rpower <noderange> [--nodeps] [of] [-V|--verbose]
-     CEC (with HMC) specific:
-       rpower <noderange> [on|off|reset|boot|onstandby]
-     LPAR(with HMC) specific:
-       rpower <noderange> [on|off|reset|stat|state|boot|of|sms|softoff]
+     PPC (HMC) specific:
+       rpower <noderange> [onstandby] [-V|--verbose]
     CEC(using Direct FSP Management) specific:
-       rpower <noderange> [on|onstandby|off|stat|state|resetsp]
+       rpower <noderange> [on|onstandby|off|stat|state|lowpower|resetsp]
     Frame(using Direct FSP Management) specific:
       rpower <noderange> [stat|state|rackstandby|exit_rackstandby|resetsp]
     LPAR(using Direct FSP Management) specific:
@@ -134,7 +131,7 @@ my %usage = (
           textid=<*>|
           frame=<*>|
           ntp=<[ntp],[ip],[frequency],[v3]>
-   FSP/CEC (using ASM Interface) Specific:
+   FSP/BPA Common:
       rspconfig <noderange> [autopower|iocap|decfg|memdecfg|procdecfg|time|date|spdump|sysdump|network|hostname]
       rspconfig <noderange> autopower=<enable|disable>|
           iocap=<enable|disable>|
@@ -225,7 +222,7 @@ my %usage = (
       lsvm <noderange> [-a|--all]
   PPC (using Direct FSP Management) specific:
       lsvm <noderange> [-l|--long] --p775
-       lsvm <noderange> 
+       lsvm <noderange>
   zVM specific:
       lsvm noderange
       lsvm noderange --getnetworknames
@@ -244,10 +241,8 @@ my %usage = (
       chvm <noderange> --p775 -i <id> [-m <memory_interleaving>] -r <partition_rule>
       chvm <noderange> [lparname=<*|name>]
       chvm <noderange> [vmcpus=min/req/max] [vmmemory=min/req/max]
-                        [vmothersetting=hugepage:N,bsr:N]
-                        [add_physlots=drc_index1,drc_index2...] 
-                        [add_vmnics=vlan1,vlan2] [add_vmstorage=<N|viosnode:slotid>] [--vios]
-       chvm <noderange> [del_physlots=drc_index1,drc_index2...]
+                        [vmphyslots=drc_index1,drc_index2...] [vmothersetting=hugepage:N,bsr:N]
+                        [vmnics=vlan1,vlan2] [vmstorage=<N|viosnode:slotid>] [--vios]
       chvm <noderange> [del_vadapter=slotid]
   VMware specific:
       chvm <noderange> [-a size][-d disk][-p disk][--resize disk=size][--cpus count][--mem memory]
@@ -333,16 +328,12 @@ my %usage = (
    renergy [-v | --version] 

    Power 6 server specific :
-      renergy noderange [-V] { all | { [savingstatus] [cappingstatus] [cappingmaxmin] [cappingvalue] [cappingsoftmin] [averageAC] [averageDC] [ambienttemp] [exhausttemp] [CPUspeed] } }
-      renergy noderange [-V] { {savingstatus}={on | off} | {cappingstatus}={on | off} | {cappingwatt}=watt | {cappingperc}=percentage } 
+    renergy noderange [-V] { all | { [savingstatus] [cappingstatus] [cappingmaxmin] [cappingvalue] [cappingsoftmin] [averageAC] [averageDC] [ambienttemp] [exhausttemp] [CPUspeed] } }
+    renergy noderange [-V] { {savingstatus}={on | off} | {cappingstatus}={on | off} | {cappingwatt}=watt | {cappingperc}=percentage } 

    Power 7 server specific :
-      renergy noderange [-V] { all | { [savingstatus] [dsavingstatus] [cappingstatus] [cappingmaxmin] [cappingvalue] [cappingsoftmin] [averageAC] [averageDC] [ambienttemp] [exhausttemp] [CPUspeed] [syssbpower] [sysIPLtime] [fsavingstatus] [ffoMin] [ffoVmin] [ffoTurbo] [ffoNorm] [ffovalue] } }
-      renergy noderange [-V] { {savingstatus}={on | off} | {dsavingstatus}={on-norm | on-maxp | off} | {fsavingstatus}={on | off} | {ffovalue}=MHZ | {cappingstatus}={on | off} | {cappingwatt}=watt | {cappingperc}=percentage }
-
-    Power 8 server specific :
-      renergy noderange [-V] { all | [savingstatus] [dsavingstatus] [averageAC] [averageAChistory] [averageDC] [averageDChistory] [ambienttemp] [ambienttemphistory] [exhausttemp] [exhausttemphistory] [fanspeed] [fanspeedhistory] [CPUspeed] [CPUspeedhistory] [syssbpower] [sysIPLtime] [fsavingstatus] [ffoMin] [ffoVmin] [ffoTurbo] [ffoNorm] [ffovalue]}
-      renergy noderange [-V] { savingstatus={on | off} | dsavingstatus={on-norm | on-maxp | off} | fsavingstatus={on | off} | ffovalue=MHZ }
+    renergy noderange [-V] { all | { [savingstatus] [dsavingstatus] [cappingstatus] [cappingmaxmin] [cappingvalue] [cappingsoftmin] [averageAC] [averageDC] [ambienttemp] [exhausttemp] [CPUspeed] [syssbpower] [sysIPLtime] [fsavingstatus] [ffoMin] [ffoVmin] [ffoTurbo] [ffoNorm] [ffovalue] } }
+    renergy noderange [-V] { {savingstatus}={on | off} | {dsavingstatus}={on-norm | on-maxp | off} | {fsavingstatus}={on | off} | {ffovalue}=MHZ | {cappingstatus}={on | off} | {cappingwatt}=watt | {cappingperc}=percentage }

    BladeCenter specific :
      For Management Modules:
@@ -18,7 +18,6 @@ require Exporter;
                 "1341569670.539525" => "centos6.3",#x86
                 "1362445555.957609" => "centos6.4",#x86_64
                 "1385726732.061157" => "centos6.5",#x86_64
-                 "1404489053.504589" => "centos7.0",
                 "1176234647.982657" => "centos5",
                 "1156364963.862322" => "centos4.4",
                 "1178480581.024704" => "centos4.5",
@@ -30,7 +29,6 @@ require Exporter;
                 "1272326751.405938" => "centos5.5",
                 "1330913492.861127" => "centos5.8",#x86_64
                 "1357930415.252042" => "centos5.9",#x86_64
-                 "1381776971.473332" => "centos5.10",#x86_64
                 "1195488871.805863" => "centos4.6",
                 "1195487524.127458" => "centos4.6",
                 "1301444731.448392" => "centos5.6",
@@ -67,16 +65,11 @@ require Exporter;
                 "1359576196.686790" => "rhels6.4", #ppc64
                 "1384196515.415715" => "rhels6.5", #x86_64
                 "1384198011.520581" => "rhels6.5", #ppc64
-                 "1411733344.627228" => "rhels6.6", #x86_64
-                 "1411733344.616389" => "rhels6.6", #ppc64
 		 "1285193176.593806" => "rhelhpc6", #x86_64
 		 "1305067719.718814" => "rhelhpc6.1",#x86_64				
 		 "1321545261.599847" => "rhelhpc6.2",#x86_64				
 		 "1339640148.070971" => "rhelhpc6.3",#x86_64				
 		 "1359576195.413831" => "rhelhpc6.4",#x86_64, RHEL ComputeNode
-		 "1384196516.465862" => "rhelhpc6.5",#x86_64, RHEL ComputeNode
-		 "1411733344.599861" => "rhelhpc6.6",#x86_64, RHEL ComputeNode
-		 "1399449226.140088" => "rhelhpc7.0",#x86_64, RHEL ComputeNode
                 "1194015916.783841" => "fedora8",
                 "1194015385.299901" => "fedora8",
                 "1210112435.291709" => "fedora9",
@@ -95,12 +88,8 @@ require Exporter;
                 "1194512327.501046" => "rhas4.6",
                 "1241464993.830723" => "rhas4.8", #x86-64

-                 "1273608367.051780" => "SL5.5", #x86_64 DVD ISO
-                 "1299104542.844706" => "SL6", #x86_64 DVD ISO
-                 "1390839789.062069" => "SL6.5", #x86_64 DVD ISO Install
-
-                 "1394111947.452332" => "pkvm2.1", # ppc64, PowerKVM
-                 "1413749127.352649" => "pkvm2.1.1", # ppc64, PowerKVM
+		 "1273608367.051780" => "SL5.5", #x86_64 DVD ISO
+                "1299104542.844706" => "SL6", #x86_64 DVD ISO
                );
 my %numdiscs = (
                "1156364963.862322" => 4,
@@ -611,23 +611,39 @@ sub punch2Reader {
            
    # Punch to reader
    # VMUR located in different directories on RHEL and SLES
-    my $out;
+    my $vmur;
    if ( $os =~ m/sles10/i ) {
-        $out = `ssh -o ConnectTimeout=5 $user\@$hcp "$sudo /sbin/vmur punch $options -u $userId -r $srcFile -N $tgtFile"`;
-    } elsif ( $os =~ m/rhel/i ) {
-    	$out = `ssh -o ConnectTimeout=5 $user\@$hcp "$sudo /usr/sbin/vmur punch $options -u $userId -r $srcFile -N $tgtFile"`;
+        $vmur = "/sbin/vmur";
    } else {
-    	$out = `ssh -o ConnectTimeout=5 $user\@$hcp "$sudo /usr/sbin/vmur punch $options -u $userId -r $srcFile -N $tgtFile"`;
+        $vmur = "/usr/sbin/vmur";
+    }
+    my $out;
+    my $done = 0;
+    
+    until ( $done ) {
+        $out = `ssh -o ConnectTimeout=5 $user\@$hcp "$sudo $vmur punch $options -u $userId -r $srcFile -N $tgtFile" 2>&1`;
+        my $rc = $? >> 8;
+        if ( $rc == 255 ) {
+            $out = "(Error) Unable to communicate with the zHCP system: $hcp";
+            $done = 1;
+        } elsif ( $out =~ m/A concurrent instance of vmur is already active/i ) {
+            # Recoverable error: retry the command after a delay
+            xCAT::zvmUtils->printSyslog( "punch2Reader() Punch in use on $hcp, retrying in 15 seconds" );
+            sleep( 15 );
+        } else {
+            # Punch appears successful -- Look for the completion string
+            my $searchStr = "created and transferred";
+            if ( !( $out =~ m/$searchStr/i ) ) {
+                chomp( $out );
+                $out = "Failed, punch info: '$out'\n";
+                xCAT::zvmUtils->printSyslog( "punch2Reader() Failed punching $srcFile to $userId from $hcp, info: '$out'" );
+            } else {
+                $out = "Done\n";
+            }
+            $done = 1;
+        }
    }
    
-    # If punch is successful -- Look for this string
-    my $searchStr = "created and transferred";
-    if ( !( $out =~ m/$searchStr/i ) ) {
-        $out = "Failed\n";
-    } else {
-        $out = "Done\n";
-    }
-
    return $out;
 }

@@ -289,7 +289,7 @@ sub printLn {
    # Print string
    my $rsp;
    my $type = "I";
-    if ($str =~ m/error/i) {  # Set to print error if the string contains error
+    if ($str =~ m/(\(error\)|\sfailed)/i) {  # Set to print error if the string contains error
        $type = "E";
    }
    
@@ -1246,7 +1246,7 @@ sub getArch {
    }

    # Get host using VMCP
-    my $arch = `ssh $user\@$node "$sudo uname -p"`;
+    my $arch = `ssh $user\@$node "$sudo uname -m"`;

    return ( xCAT::zvmUtils->trimStr($arch) );
 }
@@ -2308,19 +2308,20 @@ sub getUsedFcpDevices {
    Arguments   : Sudoer user name
                  Sudo keyword
                  zHCP hostname
+                  Install root directory
                  Local directory to remotely mount
                  Mount access ('ro' for read only, 'rw' for read write)
                  Directory as known to zHCP (out)
    Returns     : 0 - Mounted, or zHCP and MN are on the same system
                  1 - Mount failed
-    Example     : establishMount( $callback, $::SUDOER, $::SUDO, $hcp, "$installRoot/$provMethod", "ro", \$remoteDeployDir );
+    Example     : establishMount( $callback, $::SUDOER, $::SUDO, $hcp, $installRoot, $provMethod, "ro", \$remoteDeployDir );
    
 =cut

 #-------------------------------------------------------
 sub establishMount {
    # Get inputs
-    my ($class, $callback, $sudoer, $sudo, $hcp, $localDir, $access, $mountedPt) = @_;    
+    my ($class, $callback, $sudoer, $sudo, $hcp, $installRoot, $localDir, $access, $mountedPt) = @_;    
    my $out;

    # If the target system is not on this system then establish the NFS mount point.
@@ -2338,7 +2339,7 @@ sub establishMount {
    
    if ($masterIp eq $hcpIP) {
        # xCAT MN and zHCP are on the same box and will use the same directory without the need for an NFS mount.
-        $$mountedPt = $localDir;
+        $$mountedPt = "$installRoot/$localDir";
    } else {
        # Determine the hostname for this management node
        my $masterHostname = Sys::Hostname::hostname();
@@ -2347,15 +2348,23 @@ sub establishMount {
            $masterHostname = $masterIp;
        }
        
+        $$mountedPt = "/mnt/$masterHostname$installRoot/$localDir";
+        
+        # If the mount point already exists then return because we are done.
+        my $rc = `ssh $sudoer\@$hcp "$sudo mount | grep $$mountedPt > /dev/null; echo \\\$?"`;
+        if ($rc == 0) {
+            return 0;
+        }
+        
        xCAT::zvmUtils->printSyslog( "establishMount() Preparing the NFS mount point on zHCP ($hcpIP) to xCAT MN $masterHostname($masterIp) for $localDir" );
        
        # Prepare the staging mount point on zHCP, if they need to be established
-        $$mountedPt = "/mnt/$masterHostname$localDir";
-        my $rc = `ssh $sudoer\@$hcp "$sudo mkdir -p $$mountedPt && mount -t nfs -o $access $masterIp:$localDir $$mountedPt; echo \\\$?"`;
+        $rc = `ssh $sudoer\@$hcp "$sudo mkdir -p $$mountedPt && mount -t nfs -o $access $masterIp:/$localDir $$mountedPt; echo \\\$?"`;
        
-        # Return code = 0 (mount succeeded) or 32 (mount already exists)
-        if ($rc != '0' && $rc != '32') {
+        # Return code = 0 (mount succeeded)
+        if ($rc != '0') {
            xCAT::zvmUtils->printLn( $callback, "$hcp: (Error) Unable to establish zHCP mount point: $$mountedPt" );
+            xCAT::zvmUtils->printSyslog( "establishMount() Unable to establish zHCP mount point: $$mountedPt, rc: $rc" );
            return 1;
        }
    }
@@ -2367,9 +2376,12 @@ sub establishMount {

 =head3   getFreeRepoSpace

-    Description : Get the free space of image repository under /install
+    Description : Get the free space of image repository under /install.
    Arguments   : Node
-    Returns     : The available space for /install
+    Returns     : The available space for /install (e.g. "2.1G ").  
+                  The value is returned as a perl string (e.g. "0 ") to 
+                  avoid perl returning null instead of "0" in the case
+                  of no space available.
    Example     : my $free = getFreeRepoSpace($callback, $node);
    
 =cut
@@ -2393,9 +2405,12 @@ sub getFreeRepoSpace {
    if ($master eq $ip) {
        # If the master IP and node IP match, then it is the management node
        my $out = `$sudo /bin/df -h /install | sed 1d`;
-        # causing problems on other platforms $out =~ s/\h+/ /g;$out =~ s/\h+/ /g;
+        $out =~ s/\h+/ /g;
        my @results = split(' ', $out);
-        return ($results[3]);
+        if ( $results[3] eq "0" ) {
+            $results[3] = "0M";
+        }
+        return $results[3];
    } 

    return;
@@ -2475,12 +2490,12 @@ sub findAndUpdatezFcpPool {
        return \%results;
    }
    
-    # Check WWPN and LUN syntax
-    if ( $wwpn && ($wwpn =~ /[^0-9a-f;"]/i) ) {
-        xCAT::zvmUtils->printLn( $callback, "$header: (Error) Invalid world wide portname $wwpn." );
+    # Owner must be specified if status is used
+    if ($status =~ m/used/i && !$owner) {
+        xCAT::zvmUtils->printLn( $callback, "$header: (Error) Owner must be specified if status is used." );
        return \%results;
-    } if ( $lun && ($lun =~ /[^0-9a-f]/i) ) {
-        xCAT::zvmUtils->printLn( $callback, "$header: (Error) Invalid logical unit number $lun." );
+    } elsif ($status =~ m/free/i && $owner) {
+        xCAT::zvmUtils->printLn( $callback, "$header: (Error) Owner must not be specified if status is free." );
        return \%results;
    }
        
@@ -2509,6 +2524,15 @@ sub findAndUpdatezFcpPool {
        # Make sure WWPN and LUN do not have 0x prefix
        $wwpn = xCAT::zvmUtils->replaceStr($wwpn, "0x", "");
        $lun = xCAT::zvmUtils->replaceStr($lun, "0x", "");
+        
+        # Check WWPN and LUN syntax
+        if ( $wwpn && ($wwpn =~ /[^0-9a-f;"]/i) ) {
+            xCAT::zvmUtils->printLn( $callback, "$header: (Error) Invalid world wide portname $wwpn." );
+            return \%results;
+        } if ( $lun && ($lun =~ /[^0-9a-f]/i) ) {
+            xCAT::zvmUtils->printLn( $callback, "$header: (Error) Invalid logical unit number $lun." );
+            return \%results;
+        }
    }
    
    # Find disk pool (create one if non-existent)
@@ -2569,15 +2593,19 @@ sub findAndUpdatezFcpPool {
        }
        
        # Do not continue if no devices can be found
-        if (!$wwpn && !$lun) {
+        if (!$wwpn || !$lun) {
            xCAT::zvmUtils->printLn($callback, "$header: (Error) A suitable device of $size" . "M or larger could not be found");
            return \%results;
        }
    } else {
-    	# Find given WWPN and LUN. Do not continue if device is used
+        # Find given WWPN and LUN. Do not continue if device is used
        my $select = `ssh $user\@$hcp "$sudo cat $zfcpDir/$pool.conf" | grep -i "$wwpn,$lun"`;
        chomp($select);
-        
+        if (!$select) {
+            xCAT::zvmUtils->printLn($callback, "$header: (Error) zFCP device 0x$wwpn/0x$lun could not be found in zFCP pool $pool");
+            return \%results;
+        }
+
        @info = split(',', $select);
        
        if ($size) {
@@ -2585,13 +2613,11 @@ sub findAndUpdatezFcpPool {
                # Convert to MegaBytes
                $info[3] =~ s/\D//g;
                $info[3] = int($info[3]) * 1024
-            } elsif ($info[3] =~ m/M/i) {
+            } else {
                # Do nothing
                $info[3] =~ s/\D//g;
-            } else {
-                next;
            }
-                
+            
            # Do not continue if specified device does not have enough capacity
            if ($info[3] < $size) {
                xCAT::zvmUtils->printLn($callback, "$header: (Error) FCP device $wwpn/$lun is not large enough");
@@ -2602,7 +2628,7 @@ sub findAndUpdatezFcpPool {
        # Find range of the specified disk
        $range = $info[4];
    }
-       
+    
    # If there are multiple paths, take the 1st one
    # Handle multi-pathing in postscript because autoyast/kickstart does not support it.
    my $origWwpn = $wwpn;
@@ -2612,117 +2638,23 @@ sub findAndUpdatezFcpPool {
    }
        
    xCAT::zvmUtils->printLn($callback, "$header: Found FCP device 0x$wwpn/0x$lun");
-        
-    # Find a free FCP device based on the given range
-    if ($fcpDevice =~ m/^auto/i) {
-        my @ranges;
-        my $min;
-        my $max;
-        my $found = 0;
-                
-        if ($range =~ m/;/i) {
-            @ranges = split(';', $range);
-        } else {
-            push(@ranges, $range);
-        }
-                    
-        if (!$found) {
-            # If the node has an eligible FCP device, use it
-            my @deviceList = xCAT::zvmUtils->getDedicates($callback, $user, $owner);
-            foreach (@deviceList) {
-                # Check if this devide is eligible (among the range specified for disk $lun)
-                @info = split(' ', $_);
-                my $candidate = $info[2];
-                foreach (@ranges) {
-                    ($min, $max) = split('-', $_);
-                    if (hex($candidate) >= hex($min) && hex($candidate) <= hex($max)) {
-                        $found = 1;
-                        $fcpDevice = uc($candidate);
-                        
-                        last;
-                    }
-                }
-                
-                if ($found) {
-                	xCAT::zvmUtils->printLn($callback, "$header: Found eligible FCP channel $fcpDevice");
-                    last;
-                }       
-            }
-        }
-        
-        if (!$found) {
-            # If the node has no eligible FCP device, find a free one for it.
-            my %usedDevices = xCAT::zvmUtils->getUsedFcpDevices($user, $hcp);
-            
-            my $hcpUserId = xCAT::zvmCPUtils->getUserId($user, $hcp);
-            $hcpUserId =~ tr/a-z/A-Z/;
-        
-            # Find a free FCP channel
-            $out = `ssh $user\@$hcp "$sudo $dir/smcli System_WWPN_Query -T $hcpUserId" | egrep -i "FCP device number|Status"`;
-            my @devices = split( "\n", $out );
-            for (my $i = 0; $i < @devices; $i++) {
-                # Extract the device number and status
-                $fcpDevice = $devices[$i];
-                $fcpDevice =~ s/^FCP device number:(.*)/$1/;
-                $fcpDevice =~ s/^\s+//;
-                $fcpDevice =~ s/\s+$//;
-                        
-                $i++;
-                my $fcpStatus = $devices[$i];
-                $fcpStatus =~ s/^Status:(.*)/$1/;
-                $fcpStatus =~ s/^\s+//;
-                $fcpStatus =~ s/\s+$//;                    
-                        
-                # Only look at free FCP devices
-                if ($fcpStatus =~ m/free/i) {                    
-                    # If the device number is within the specified range, exit out of loop
-                    # Range: 3B00-3C00;4B00-4C00;5E12-5E12
-                    foreach (@ranges) {
-                        ($min, $max) = split('-', $_);
-                        if (hex($fcpDevice) >= hex($min) && hex($fcpDevice) <= hex($max)) {
-                            $fcpDevice = uc($fcpDevice);
-                
-                            # Used found FCP channel if not in use or allocated                        
-                            if (!$usedDevices{$fcpDevice}) {
-                                $found = 1;
-                                last;
-                            }
-                        }
-                    }
-                }
-                
-                # Break out of loop if FCP channel is found
-                if ($found) {
-                	xCAT::zvmUtils->printLn($callback, "$header: Found FCP channel within acceptable range $fcpDevice");
-                    last;
-                }
-            }
-        }
-            
-        # Do not continue if no FCP channel is found
-        if (!$found) {
-            xCAT::zvmUtils->printLn($callback, "$header: (Error) A suitable FCP channel could not be found");
+    
+    if ( ($status =~ m/used/i) && ($fcpDevice =~ /^auto/i) ) {
+        # select an eligible FCP device
+        $fcpDevice = xCAT::zvmUtils->selectFcpDevice($callback, $header, $user, $hcp, $fcpDevice, $range, $owner);
+        if (!$fcpDevice) {
            return \%results;
        }
-    }
-    
-    # If there are multiple devices (multipathing), take the 1st one
-    if ($fcpDevice) {
-        if ($fcpDevice =~ m/;/i) {
-            @info = split(';', $fcpDevice);
-            $fcpDevice = xCAT::zvmUtils->trimStr($info[0]);
-        }
-                    
-        # Make sure channel has a length of 4
-        while (length($fcpDevice) < 4) {
-            $fcpDevice = "0" . $fcpDevice;
-        }
+    } elsif ($status =~ m/free/i) {
+        # Owner and FCP channel make no sense when status is free
+        $fcpDevice = "";
+        $owner = "";
    }
            
    # Mark WWPN and LUN as used, free, or reserved and set the owner/channel appropriately
    # This config file keeps track of the owner of each device, which is useful in nodeset
    $size = $size . "M";
-    my $select = `ssh $user\@$hcp "$sudo cat $zfcpDir/$pool.conf" | grep -i "$lun" | grep -i "$wwpn"`;
+    my $select = `ssh $user\@$hcp "$sudo cat $zfcpDir/$pool.conf" | grep -i "$lun"`;
    chomp($select);
    if ($select) {
        @info = split(',', $select);
@@ -2759,6 +2691,156 @@ sub findAndUpdatezFcpPool {

 #-------------------------------------------------------

+=head3   selectFcpDevice
+
+    Description : Select an eligible FCP device for attaching a zFCP device to a node
+    Arguments   :   Message header
+                    User (root or non-root)
+                    zHCP
+                    candidate FCP devices or auto
+                    FCP device range
+                    zFCP device owner
+    Returns     : selected FCP device or empty if no one is selected
+    Example     : my $fcpDevice = xCAT::zvmUtils->selectFcpDevice($callback, $header, $user, $hcp, $fcpDevice, $range, $owner);
+    
+=cut
+
+#-------------------------------------------------------
+sub selectFcpDevice {
+    # Get inputs
+    my ($class, $callback, $header, $user, $hcp, $fcpDevice, $range, $owner) = @_;
+        
+    # Determine if sudo is used
+    my $sudo = "sudo";
+    if ($user eq "root") {
+        $sudo = "";
+    }
+    
+    # Directory where executables are on zHCP
+    my $dir = "/opt/zhcp/bin";
+        
+    # Directory where FCP disk pools are on zHCP
+    my $zfcpDir = "/var/opt/zhcp/zfcp";
+    
+    my %results = ('rc' => -1);  # Default to error
+    
+    # Check FCP device syntax
+    if ($fcpDevice && ($fcpDevice !~ /^auto/i) && ($fcpDevice =~ /[^0-9a-f]/i)) {
+        xCAT::zvmUtils->printLn($callback, "$header: (Error) Invalid FCP channel address $fcpDevice.");
+        return;
+    }
+    
+    # Find a free FCP device based on the given range
+    if ($fcpDevice =~ m/^auto/i) {
+        my @ranges;
+        my $min;
+        my $max;
+        my $found = 0;
+                
+        if ($range =~ m/;/i) {
+            @ranges = split(';', $range);
+        } else {
+            push(@ranges, $range);
+        }
+                    
+        if (!$found) {
+            # If the node has an eligible FCP device, use it
+            my @deviceList = xCAT::zvmUtils->getDedicates($callback, $user, $owner);
+            foreach (@deviceList) {
+                # Check if this devide is eligible (among the range specified for disk $lun)
+                my @info = split(' ', $_);
+                my $candidate = $info[2];
+                foreach (@ranges) {
+                    ($min, $max) = split('-', $_);
+                    if (hex($candidate) >= hex($min) && hex($candidate) <= hex($max)) {
+                        $found = 1;
+                        $fcpDevice = uc($candidate);
+                        
+                        last;
+                    }
+                }
+                
+                if ($found) {
+                    xCAT::zvmUtils->printLn($callback, "$header: Found eligible FCP channel $fcpDevice");
+                    last;
+                }       
+            }
+        }
+        
+        if (!$found) {
+            # If the node has no eligible FCP device, find a free one for it.
+            my %usedDevices = xCAT::zvmUtils->getUsedFcpDevices($user, $hcp);
+            
+            my $hcpUserId = xCAT::zvmCPUtils->getUserId($user, $hcp);
+            $hcpUserId =~ tr/a-z/A-Z/;
+        
+            # Find a free FCP channel
+            my $out = `ssh $user\@$hcp "$sudo $dir/smcli System_WWPN_Query -T $hcpUserId" | egrep -i "FCP device number|Status"`;
+            my @devices = split( "\n", $out );
+            for (my $i = 0; $i < @devices; $i++) {
+                # Extract the device number and status
+                $fcpDevice = $devices[$i];
+                $fcpDevice =~ s/^FCP device number:(.*)/$1/;
+                $fcpDevice =~ s/^\s+//;
+                $fcpDevice =~ s/\s+$//;
+                        
+                $i++;
+                my $fcpStatus = $devices[$i];
+                $fcpStatus =~ s/^Status:(.*)/$1/;
+                $fcpStatus =~ s/^\s+//;
+                $fcpStatus =~ s/\s+$//;                    
+                        
+                # Only look at free FCP devices
+                if ($fcpStatus =~ m/free/i) {                    
+                    # If the device number is within the specified range, exit out of loop
+                    # Range: 3B00-3C00;4B00-4C00;5E12-5E12
+                    foreach (@ranges) {
+                        ($min, $max) = split('-', $_);
+                        if (hex($fcpDevice) >= hex($min) && hex($fcpDevice) <= hex($max)) {
+                            $fcpDevice = uc($fcpDevice);
+                
+                            # Use found FCP channel if not in use or allocated                        
+                            if (!$usedDevices{$fcpDevice}) {
+                                $found = 1;
+                                last;
+                            }
+                        }
+                    }
+                }
+                
+                # Break out of loop if FCP channel is found
+                if ($found) {
+                    xCAT::zvmUtils->printLn($callback, "$header: Found FCP channel within acceptable range $fcpDevice");
+                    last;
+                }
+            }
+        }
+            
+        # Do not continue if no FCP channel is found
+        if (!$found) {
+            xCAT::zvmUtils->printLn($callback, "$header: (Error) A suitable FCP channel could not be found");
+            return;
+        }
+    }
+    
+    # If there are multiple devices (multipathing), take the 1st one
+    if ($fcpDevice) {
+        if ($fcpDevice =~ m/;/i) {
+            my @info = split(';', $fcpDevice);
+            $fcpDevice = xCAT::zvmUtils->trimStr($info[0]);
+        }
+                    
+        # Make sure channel has a length of 4
+        while (length($fcpDevice) < 4) {
+            $fcpDevice = "0" . $fcpDevice;
+        }
+    }
+    
+    return $fcpDevice;
+}
+
+#-------------------------------------------------------
+
 =head3   findzFcpDevicePool

    Description : Find the zFCP storage pool that contains the given zFCP device
@@ -2807,7 +2889,7 @@ sub findzFcpDevicePool {
                    WWPN
                    LUN
    Returns     : Architecture of node
-    Example     : my $deviceRef = xCAT::zvmUtils->findzFcpDeviceAttr($user, $hcp, $wwpn, $lun);
+    Example     : my $deviceRef = xCAT::zvmUtils->findzFcpDeviceAttr($user, $hcp, $pool, $wwpn, $lun);
    
 =cut

@@ -2827,7 +2909,7 @@ sub findzFcpDeviceAttr {

    # Find the SCSI/FCP device
    # Entry order: status,wwpn,lun,size,range,owner,channel,tag
-    my @info = split("\n", `ssh $user\@$hcp "$sudo grep \"$wwpn,$lun\" $zfcpDir/$pool.conf"`);
+    my @info = split("\n", `ssh $user\@$hcp "$sudo grep -i \"$wwpn,$lun\" $zfcpDir/$pool.conf"`);
    my $entry = $info[0];
    chomp($entry);
    
@@ -1,48 +0,0 @@
-/* IBM(c) 2013 EPL licens http://www.eclipse.org/legal/epl-v10.html
- * Jarrod Johnson - jbjohnso@us.ibm.com
- * This program periodically transmits a udp packet to designated xCAT server
- * It waits for an 'ok' and then exits
- */
-#include <sys/types.h>
-#include <sys/socket.h>
-#include <netdb.h>
-#include <stdlib.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <string.h>
-int main(int argc, char* argv[]) { 
-	int server;
-	struct addrinfo hints;
-	struct addrinfo *results,*cur;
-	struct timeval timeout;
-	int canread=0;
-	char buffer[128];
-	srand(time(NULL));
-	memset(&hints,0,sizeof(struct addrinfo));
-	hints.ai_family = AF_UNSPEC;
-	hints.ai_socktype = SOCK_DGRAM;
-	hints.ai_protocol = IPPROTO_UDP;
-	fd_set selectset;
-	getaddrinfo(argv[1],argv[2],&hints,&results);
-	server = socket(AF_UNSPEC,SOCK_DGRAM,17);
-	for (cur=results; cur != NULL; cur = cur->ai_next) {
-		server = socket(cur->ai_family,cur->ai_socktype,cur->ai_protocol);
-		if (server == -1) continue;
-		if (connect(server,cur->ai_addr,cur->ai_addrlen) != -1) break;
-		close(server);
-	}
-	FD_ZERO(&selectset);
-	FD_SET(server,&selectset);
-	while (1) {
-		timeout.tv_sec = rand() % 120+60;
-		timeout.tv_usec = rand() % 10000;
-		write(server,"resourcerequest: xcatd\n",strlen("resourcerequest: xcatd\n"));
-		canread = select(FD_SETSIZE,&selectset,NULL,NULL,&timeout);
-		if (canread) {
-			read(server,buffer,sizeof(buffer));
-			if (strncmp(buffer,"resourcerequest: ok",strlen("resourcerequest: ok"))==0) {
-				exit(0);
-			}
-		}
-	}
-}
@@ -1,10 +0,0 @@
-# AIX Bundle file for compiler runtime packages
-
-I:xlC.aix61
-I:xlC.rte
-I:xlfrte
-I:xlfrte.aix61
-I:xlfrte.msg.en_US
-I:xlsmp.aix61.rte
-I:xlsmp.msg.en_US.rte
-I:xlsmp.rte
@@ -41,8 +41,8 @@ if [ $OS != "AIX" ]; then
        mkdir -p /tmp/gpfs_updates
        rm -f -R /tmp/gpfs_updates/*
        cd /tmp/gpfs_updates
-#        wget -l inf -N -r --waitretry=10 --random-wait --retry-connrefused -t 10 -T 60 -nH --cut-dirs=3 ftp://$MASTER/$UPDATES_DIR/*.rpm 2> /tmp/wget.log
-        wget -l inf -N -r --waitretry=10 --random-wait --retry-connrefused -t 10 -T 60 -nH --cut-dirs=4 --reject "index.html*"  --no-parent http://$MASTER$INSTALL_DIR/$UPDATES_DIR/ 2> /tmp/wget.log
+#        wget -l inf -N -r --waitretry=10 --random-wait --retry-connrefused -t 10 -T 60 -nH --cut-dirs=3 ftp://$SITEMASTER/$UPDATES_DIR/*.rpm 2> /tmp/wget.log
+        wget -l inf -N -r --waitretry=10 --random-wait --retry-connrefused -t 10 -T 60 -nH --cut-dirs=4 --reject "index.html*"  --no-parent http://$SITEMASTER$INSTALL_DIR/$UPDATES_DIR/ 2> /tmp/wget.log
        if [ -n "`ls *.rpm 2> /dev/null`" ] ; then
            rpm -Uvh *.rpm
        fi
@@ -103,7 +103,7 @@ else  # assume Linux
    fi
    if [ ! -e $gpfsprofile.sh ]; then
        echo 'export PATH=$PATH:/usr/lpp/mmfs/bin' > $gpfsprofile.sh
-        echo 'setenv PATH ${PATH}:/usr/lpp/mmfs/bin' > $gpfsprofile.csh
+        echo 'setenv PATH $PATH:/usr/lpp/mmfs/bin' > $gpfsprofile.csh
        # Turn off LANG support since we did not install other msg catalogs
        echo 'export LC_CTYPE=POSIX' >> $gpfsprofile.sh
        echo 'setenv LC_CTYPE POSIX' >> $gpfsprofile.csh
@@ -62,8 +62,7 @@ else
   file=$1
 fi

-#ifconfig -a  | grep 'inet ' | awk ' { print $2 } ' | grep -v 127.0.0.1 | 
-ip -4 -oneline addr show 2>/dev/null |grep inet | sed -ne "s/.*inet //p"|awk -F ' ' '{print $1}'|awk -F '/' '{print $1}'|
+ifconfig -a  | grep 'inet ' | awk ' { print $2 } ' | grep -v 127.0.0.1 | 
 while read my_address ; do
    ##print "checking $my_address"
    grep -q " ${my_address}$" $file
@@ -1,88 +1,38 @@
-Eclipse Public License - v 1.0
+Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/
+Upstream-Name: xcat-openstack-baremetal
+Source: <url://example.com>

-THE ACCOMPANYING PROGRAM IS PROVIDED UNDER THE TERMS OF THIS ECLIPSE PUBLIC LICENSE ("AGREEMENT"). ANY USE, REPRODUCTION OR DISTRIBUTION OF THE PROGRAM CONSTITUTES RECIPIENT'S ACCEPTANCE OF THIS AGREEMENT.
+Files: *
+Copyright: <years> <put author's name and email here>
+           <years> <likewise for another author>
+License: <special license>
+ <Put the license of the package here indented by 1 space>
+ <This follows the format of Description: lines in control file>
+ .
+ <Including paragraphs>

-1. DEFINITIONS
+# If you want to use GPL v2 or later for the /debian/* files use 
+# the following clauses, or change it to suit. Delete these two lines
+Files: debian/*
+Copyright: 2014 root <root@unknown>
+License: GPL-2+
+ This package 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; either version 2 of the License, or
+ (at your option) any later version.
+ .
+ This package 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, see <http://www.gnu.org/licenses/>
+ .
+ On Debian systems, the complete text of the GNU General
+ Public License version 2 can be found in "/usr/share/common-licenses/GPL-2".

-"Contribution" means:
-
-a) in the case of the initial Contributor, the initial code and documentation distributed under this Agreement, and
-b) in the case of each subsequent Contributor:
-
-i) changes to the Program, and
-
-ii) additions to the Program;
-
-where such changes and/or additions to the Program originate from and are distributed by that particular Contributor. A Contribution 'originates' from a Contributor if it was added to the Program by such Contributor itself or anyone acting on such Contributor's behalf. Contributions do not include additions to the Program which: (i) are separate modules of software distributed in conjunction with the Program under their own license agreement, and (ii) are not derivative works of the Program.
-
-"Contributor" means any person or entity that distributes the Program.
-
-"Licensed Patents " mean patent claims licensable by a Contributor which are necessarily infringed by the use or sale of its Contribution alone or when combined with the Program.
-
-"Program" means the Contributions distributed in accordance with this Agreement.
-
-"Recipient" means anyone who receives the Program under this Agreement, including all Contributors.
-
-2. GRANT OF RIGHTS
-
-a) Subject to the terms of this Agreement, each Contributor hereby grants Recipient a non-exclusive, worldwide, royalty-free copyright license to reproduce, prepare derivative works of, publicly display, publicly perform, distribute and sublicense the Contribution of such Contributor, if any, and such derivative works, in source code and object code form.
-
-b) Subject to the terms of this Agreement, each Contributor hereby grants Recipient a non-exclusive, worldwide, royalty-free patent license under Licensed Patents to make, use, sell, offer to sell, import and otherwise transfer the Contribution of such Contributor, if any, in source code and object code form. This patent license shall apply to the combination of the Contribution and the Program if, at the time the Contribution is added by the Contributor, such addition of the Contribution causes such combination to be covered by the Licensed Patents. The patent license shall not apply to any other combinations which include the Contribution. No hardware per se is licensed hereunder.
-
-c) Recipient understands that although each Contributor grants the licenses to its Contributions set forth herein, no assurances are provided by any Contributor that the Program does not infringe the patent or other intellectual property rights of any other entity. Each Contributor disclaims any liability to Recipient for claims brought by any other entity based on infringement of intellectual property rights or otherwise. As a condition to exercising the rights and licenses granted hereunder, each Recipient hereby assumes sole responsibility to secure any other intellectual property rights needed, if any. For example, if a third party patent license is required to allow Recipient to distribute the Program, it is Recipient's responsibility to acquire that license before distributing the Program.
-
-d) Each Contributor represents that to its knowledge it has sufficient copyright rights in its Contribution, if any, to grant the copyright license set forth in this Agreement.
-
-3. REQUIREMENTS
-
-A Contributor may choose to distribute the Program in object code form under its own license agreement, provided that:
-
-a) it complies with the terms and conditions of this Agreement; and
-
-b) its license agreement:
-
-i) effectively disclaims on behalf of all Contributors all warranties and conditions, express and implied, including warranties or conditions of title and non-infringement, and implied warranties or conditions of merchantability and fitness for a particular purpose;
-
-ii) effectively excludes on behalf of all Contributors all liability for damages, including direct, indirect, special, incidental and consequential damages, such as lost profits;
-
-iii) states that any provisions which differ from this Agreement are offered by that Contributor alone and not by any other party; and
-
-iv) states that source code for the Program is available from such Contributor, and informs licensees how to obtain it in a reasonable manner on or through a medium customarily used for software exchange.
-
-When the Program is made available in source code form:
-
-a) it must be made available under this Agreement; and
-
-b) a copy of this Agreement must be included with each copy of the Program.
-
-Contributors may not remove or alter any copyright notices contained within the Program.
-
-Each Contributor must identify itself as the originator of its Contribution, if any, in a manner that reasonably allows subsequent Recipients to identify the originator of the Contribution.
-
-4. COMMERCIAL DISTRIBUTION
-
-Commercial distributors of software may accept certain responsibilities with respect to end users, business partners and the like. While this license is intended to facilitate the commercial use of the Program, the Contributor who includes the Program in a commercial product offering should do so in a manner which does not create potential liability for other Contributors. Therefore, if a Contributor includes the Program in a commercial product offering, such Contributor ("Commercial Contributor") hereby agrees to defend and indemnify every other Contributor ("Indemnified Contributor") against any losses, damages and costs (collectively "Losses") arising from claims, lawsuits and other legal actions brought by a third party against the Indemnified Contributor to the extent caused by the acts or omissions of such Commercial Contributor in connection with its distribution of the Program in a commercial product offering. The obligations in this section do not apply to any claims or Losses relating to any actual or alleged intellectual property infringement. In order to qualify, an Indemnified Contributor must: a) promptly notify the Commercial Contributor in writing of such claim, and b) allow the Commercial Contributor to control, and cooperate with the Commercial Contributor in, the defense and any related settlement negotiations. The Indemnified Contributor may participate in any such claim at its own expense.
-
-For example, a Contributor might include the Program in a commercial product offering, Product X. That Contributor is then a Commercial Contributor. If that Commercial Contributor then makes performance claims, or offers warranties related to Product X, those performance claims and warranties are such Commercial Contributor's responsibility alone. Under this section, the Commercial Contributor would have to defend claims against the other Contributors related to those performance claims and warranties, and if a court requires any other Contributor to pay any damages as a result, the Commercial Contributor must pay those damages.
-
-5. NO WARRANTY
-
-EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, THE PROGRAM IS PROVIDED ON AN "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED INCLUDING, WITHOUT LIMITATION, ANY WARRANTIES OR CONDITIONS OF TITLE, NON-INFRINGEMENT, MERCHANTABILITY OR FITNESS FOR A PARTICULAR PURPOSE. Each Recipient is solely responsible for determining the appropriateness of using and distributing the Program and assumes all risks associated with its exercise of rights under this Agreement , including but not limited to the risks and costs of program errors, compliance with applicable laws, damage to or loss of data, programs or equipment, and unavailability or interruption of operations.
-
-6. DISCLAIMER OF LIABILITY
-
-EXCEPT AS EXPRESSLY SET FORTH IN THIS AGREEMENT, NEITHER RECIPIENT NOR ANY CONTRIBUTORS SHALL HAVE ANY LIABILITY FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING WITHOUT LIMITATION LOST PROFITS), HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OR DISTRIBUTION OF THE PROGRAM OR THE EXERCISE OF ANY RIGHTS GRANTED HEREUNDER, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
-
-7. GENERAL
-
-If any provision of this Agreement is invalid or unenforceable under applicable law, it shall not affect the validity or enforceability of the remainder of the terms of this Agreement, and without further action by the parties hereto, such provision shall be reformed to the minimum extent necessary to make such provision valid and enforceable.
-
-If Recipient institutes patent litigation against any entity (including a cross-claim or counterclaim in a lawsuit) alleging that the Program itself (excluding combinations of the Program with other software or hardware) infringes such Recipient's patent(s), then such Recipient's rights granted under Section 2(b) shall terminate as of the date such litigation is filed.
-
-All Recipient's rights under this Agreement shall terminate if it fails to comply with any of the material terms or conditions of this Agreement and does not cure such failure in a reasonable period of time after becoming aware of such noncompliance. If all Recipient's rights under this Agreement terminate, Recipient agrees to cease use and distribution of the Program as soon as reasonably practicable. However, Recipient's obligations under this Agreement and any licenses granted by Recipient relating to the Program shall continue and survive.
-
-Everyone is permitted to copy and distribute copies of this Agreement, but in order to avoid inconsistency the Agreement is copyrighted and may only be modified in the following manner. The Agreement Steward reserves the right to publish new versions (including revisions) of this Agreement from time to time. No one other than the Agreement Steward has the right to modify this Agreement. The Eclipse Foundation is the initial Agreement Steward. The Eclipse Foundation may assign the responsibility to serve as the Agreement Steward to a suitable separate entity. Each new version of the Agreement will be given a distinguishing version number. The Program (including Contributions) may always be distributed subject to the version of the Agreement under which it was received. In addition, after a new version of the Agreement is published, Contributor may elect to distribute the Program (including its Contributions) under the new version. Except as expressly stated in Sections 2(a) and 2(b) above, Recipient receives no rights or licenses to the intellectual property of any Contributor under this Agreement, whether expressly, by implication, estoppel or otherwise. All rights in the Program not expressly granted under this Agreement are reserved.
-
-This Agreement is governed by the laws of the State of New York and the intellectual property laws of the United States of America. No party to this Agreement will bring a legal action under this Agreement more than one year after the cause of action arose. Each party waives its rights to a jury trial in any resulting litigation.
-
- 
+# Please also look if there are files or directories which have a
+# different copyright/license attached and list them here.
+# Please avoid to pick license terms that are more restrictive than the
+# packaged work, as it may make Debian's contributions unacceptable upstream.
@@ -0,0 +1,2 @@
+xcat-openstack-baremetal_2.8.4-1_all.deb admin extra
+xcat-openstack-baremetal_2.8.4-1_all.deb admin extra
@@ -0,0 +1,201 @@
+dh_installdirs
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
+dh_installdirs
+dh_install
+dh_link
+dh_installman
+dh_compress
+dh_installdeb
+dh_gencontrol
+dh_md5sums
+dh_builddeb
+dh_builddeb
@@ -67,13 +67,11 @@ sub opsaddbmnode {
 	
 	my $help;
 	my $version;
-	my $verbose;
 	my $host;
 	
    if(!GetOptions(
            'h|help'      => \$help,
            'v|version'   => \$version,
-            'V|verbose'   => \$verbose,
            's=s'         => \$host,
       ))
    {
@@ -245,18 +243,7 @@ sub opsaddbmnode {
 			$disk = 1;
 		}				
 		
-		if ($verbose) {
-			my $rsp;
-			push @{$rsp->{data}}, "Attributes gathered from the xCAT database:";
-			push @{$rsp->{data}}, "  bmc=$bmc";
-			push @{$rsp->{data}}, "  bmc_user=$bmc_user";
-			push @{$rsp->{data}}, "  bmc_password=$bmc_password";
-			push @{$rsp->{data}}, "  mac=$mac";
-			push @{$rsp->{data}}, "  cpu=$cpu";
-			push @{$rsp->{data}}, "  memory=$memory";
-			push @{$rsp->{data}}, "  disk=$disk";
-			xCAT::MsgUtils->message("I", $rsp, $callback);
-		}
+		#print "$bmc, $bmc_user, $bmc_password, $mac, $cpu, $memory, $disk\n";

 		#call OpenStack command to add the node into the OpenStack as
        #a baremetal node.
@@ -276,14 +263,7 @@ sub opsaddbmnode {
 		}
 		$cmd_tmp .= " $host $cpu $memory $disk $mac";
 
-		my $cmd = qq~$cmd_tmp~;
-		if ($verbose) {
-			my $rsp;
-			push @{$rsp->{data}}, "The command to run on $host:";
-			push @{$rsp->{data}}, "  $cmd";
-			push @{$rsp->{data}}, "  ";
-			xCAT::MsgUtils->message("I", $rsp, $callback);
-		}
+		my $cmd = qq~source \~/openrc;$cmd_tmp~;
 		#print "cmd=$cmd\n";
 		my $output =
 			xCAT::InstUtils->xcmd($callback, $doreq, "xdsh", [$host], $cmd, 0);
@@ -291,17 +271,8 @@ sub opsaddbmnode {
 			my $rsp;
 			push @{$rsp->{data}}, "OpenStack creating baremetal node $node:";
 			push @{$rsp->{data}}, "$output";
-			push @{$rsp->{data}}, "The command was: $cmd";
 			xCAT::MsgUtils->message("E", $rsp, $callback);
-		} else {
-			if (($verbose) && ($output)) {
-				my $rsp;
-				push @{$rsp->{data}}, "$output";
-				push @{$rsp->{data}}, "  ";
-				xCAT::MsgUtils->message("I", $rsp, $callback);
-			}
 		}
-
 	}
 }

@@ -325,7 +296,6 @@ sub opsaddimage {
 	
 	my $help;
 	my $version;
-	my $verbose;
 	#my $cloud;
 	my $ops_img_names;
    my $controller;
@@ -333,7 +303,6 @@ sub opsaddimage {
    if(!GetOptions(
            'h|help'      => \$help,
            'v|version'   => \$version,
-            'V|verbose'   => \$verbose,
            'c=s'         => \$controller,
 			'n=s'         => \$ops_img_names,
       ))
@@ -422,46 +391,16 @@ sub opsaddimage {
 		}
        my $cmd_tmp = "glance image-create --name $new_name --public --disk-format qcow2 --container-format bare --property xcat_image_name=\'$image\' < /tmp/$image.qcow2";

-		my $cmd = qq~touch /tmp/$image.qcow2;$cmd_tmp~;
-		if ($verbose) {
-			my $rsp;
-			push @{$rsp->{data}}, "The command to run on $controller:";
-			push @{$rsp->{data}}, "   $cmd";
-			push @{$rsp->{data}}, "  ";
-			xCAT::MsgUtils->message("I", $rsp, $callback);
-		}
+		my $cmd = qq~touch /tmp/$image.qcow2;source \~/openrc;$cmd_tmp;rm /tmp/$image.qcow2~;
+		#print "cmd=$cmd\ncontroller=$controller\n";
 		my $output =
 			xCAT::InstUtils->xcmd($callback, $doreq, "xdsh", [$controller], $cmd, 0);
 		if ($::RUNCMD_RC != 0) {
 			my $rsp;
 			push @{$rsp->{data}}, "OpenStack creating image $new_name:";
 			push @{$rsp->{data}}, "$output";
-			push @{$rsp->{data}}, "The command was: $cmd";
 			xCAT::MsgUtils->message("E", $rsp, $callback);
-		} else {
-			if (($verbose) && ($output)) {
-				my $rsp;
-				push @{$rsp->{data}}, "$output";
-				push @{$rsp->{data}}, "  ";
-				xCAT::MsgUtils->message("I", $rsp, $callback);
-			}
 		}		 
-		my $cmd1 = qq~rm /tmp/$image.qcow2~;
-		if ($verbose) {
-			my $rsp;
-			push @{$rsp->{data}}, "The command to run on $controller:";
-			push @{$rsp->{data}}, "  $cmd1";
-			push @{$rsp->{data}}, "  ";
-			xCAT::MsgUtils->message("I", $rsp, $callback);
-		}
-		my $output1 =
-			xCAT::InstUtils->xcmd($callback, $doreq, "xdsh", [$controller], $cmd1, 0);
-		if (($verbose) && ($output1)) {
-			my $rsp;
-			push @{$rsp->{data}}, "$output1";
-			push @{$rsp->{data}}, "  ";
-			xCAT::MsgUtils->message("I", $rsp, $callback);
-		}
 	}
 }

@@ -906,7 +845,7 @@ sub opsaddbmnode_usage {

    $rsp->{data}->[0]= "Usage: opsaddbmnode -h";
    $rsp->{data}->[1]= "       opsaddbmnode -v";
-    $rsp->{data}->[2]= "       opsaddbmnode <noderange> -s <service_host> [-V]";
+    $rsp->{data}->[2]= "       opsaddbmnode <noderange> -s <service_host>";
    $cb->($rsp);
 }

@@ -924,7 +863,7 @@ sub opsaddimage_usage {

    $rsp->{data}->[0]= "Usage: opsaddimage -h";
    $rsp->{data}->[1]= "       opsaddimage -v";
-    $rsp->{data}->[2]= "       opsaddimage <image1,image2...> [-n <new_name1,new_name2...> -c <controller> [-V]";
+    $rsp->{data}->[2]= "       opsaddimage <image1,image2...> [-n <new_name1,new_name2...> -c <controller>";
    $cb->($rsp);
 }

@@ -4,7 +4,7 @@ B<opsaddbmnode> - It adds xCAT baremetal nodes to an OpenStack cloud.

 =head1 SYNOPSIS

-B<opsaddbmnode> I<noderange> B<-s> I<service_host> [B<-V>|B<--verbose>]
+B<opsaddbmnode> I<noderange> B<-s> I<service_host>

 B<opsaddbmnode> [B<-h>|B<--help>]

@@ -59,8 +59,6 @@ I<noderage> is a comma separated node or node group names.

 =item B<-v|--version>  The Command Version.

-=item B<-V|--verbose>  Verbose output.
-
 =back

 =head1 RETURN VALUE
@@ -4,7 +4,7 @@ B<opsaddimage> - It adds or removes nodes for the vlan.

 =head1 SYNOPSIS

-B<opsaddimage> I<image1,image2,...> B<-n> I<new_name1,new_name2,...> [B<-c> I<controller>] [B<-V>|B<--verbose>] 
+B<opsaddimage> I<image1,image2,...> B<-n> I<new_name1,new_name2,...> [B<-c> I<controller>]  

 B<opsaddimage> [B<-h>|B<--help>]

@@ -35,8 +35,6 @@ I<image1,image1...> a comma separated xCAT images names.

 =item B<-v|--version>  The Command Version.

-=item B<-V|--verbose>  Verbose output.
-
 =back

 =head1 RETURN VALUE
@@ -100,8 +100,8 @@ change_host_name()

    if [ "$str_os_type" = "sles" ];then
        echo "Persistently changing the hostname not implemented yet."
-    #debian ubuntu and rh7
-    elif [ -f "/etc/hostname" ];then
+    #debian ubuntu
+    elif [ "$str_os_type" = "debian" ];then
        conf_file="/etc/hostname"
        echo "$str_hostname" > $conf_file
    else
@@ -36,8 +36,8 @@ change_host_name()

    if [ "$str_os_type" = "sles" ];then
        echo "Persistently changing the hostname not implemented yet."
-    #debian ubuntu and rh7
-    elif [ -f "/etc/hostname" ];then 
+    #debian ubuntu
+    elif [ "$str_os_type" = "debian" ];then
        conf_file="/etc/hostname"
        echo "$str_hostname" > $conf_file
    else
@@ -126,7 +126,7 @@ sub getPodList {


 # Create the xcat man page that gives a summary description of each xcat cmd.
-# Not used
+# Not used.
 sub writesummarypage {
 	my $file = shift;       # relative path file name of the man page
 	# the rest of @_ contains the pod files that describe each cmd
@@ -1,6 +0,0 @@
-include AUTHORS
-include ChangeLog
-exclude .gitignore
-exclude .gitreview
-
-global-exclude *.pyc
@@ -1,44 +0,0 @@
-xCAT Driver for ironic x86/64 machine
-==================================
-
-xCAT is a Extreme Cluster/Cloud Administration Toolkit. We can use xcat
-to do :
-1 hardward discoveery
-2 remote hardware control
-3 remote sonsole
-4 hardware inventory
-5 firmware flashing
-
-Ironic is a project in Openstack, it will replace the nova-baremetal in juno release. Ironic's design is very flexable, we can add driver to extend function
-without change any code in Openstack. Ironic xCAT driver takes the advantage of xcat and openstack, we can use it to deploy the baremetal machine very easily.
-
-Before using this driver, we must setup the openstack environment at least for two nodes( ironic conductor and neutron network node can't setup on the same node)
-Ironic conductor and the baremetal node( waiting for deploy) must in the same vlan 
-
-Add the follows in the ironic egg-info entry_points.txt file (ironic.drivers section) 
-
-pxe_xcat = ironic.drivers.xcat:XCATBaremetalDriver
- 
-When the openstack with ironic is ready, just execute command in the ironic_xcat directory as follows:
-
-$ python setup.py install
-
-Restart the ironic-conductor process
-
-Initialize the xcat environment according  to http://sourceforge.net/p/xcat/wiki/XCAT_iDataPlex_Cluster_Quick_Start/
-Using xCAT baremetal driver need config site table and run copycds to generate image. The node definition is not requirement.
-
-Ironic use neutron as the network service.
-Check the openvswitch config on the network node ,make sure brbm bridge connect to the baremetal node. 
-
-==================================================================================
-Some Example to use the xCAT baremetal driver. 
-
-$touch /tmp/rhelhpc6.5-x86_64-install-compute.qcow2;glance image-create --name rhelhpc6.5-x86_64-install-compute --public --disk-format qcow2 --container-format bare --property xcat_image_name='rhels6.4-x86_64-install-compute' < /tmp/rhelhpc6.5-x86_64-install-compute.qcow2
--name rhelhpc6.5-x86_64-install-compute is the image name in xcat. You can use lsdef -t osimage on the ironic-conductor node which xcat is installed.
-
-$ ironic node-create --driver pxe_xcat -i ipmi_address=xxx.xxx.xxx.xxx   -i ipmi_username=userid -i ipmi_password=password  -i xcat_node=x3550m4n02  -i xcatmaster=10.1.0.241 -i netboot=xnba -i ipmi_terminal_port=0 -p memory_mb=2048 -p cpus=8
-
-$ ironic port-create --address ff:ff:ff:ff:ff:ff --node_uuid <ironic node uuid>
-
-$ nova boot --flavor baremetal --image <image-id>  testing --nic net-id=<internal network id>
@@ -1,25 +0,0 @@
-"""xCAT baremtal exceptions.
-"""
-
-from oslo.config import cfg
-import six
-
-from ironic.openstack.common.gettextutils import _
-from ironic.openstack.common import log as logging
-from ironic.common.exception import IronicException
-LOG = logging.getLogger(__name__)
-
-class xCATCmdFailure(IronicException):
-    message = _("xcat call failed: %(cmd)s %(node)s %(args)s.")
-
-class xCATDeploymentFailure(IronicException):
-    message = _("xCAT node deployment failed for node %(node)s:%(error)s")
-
-class GetNetworkFixedIPFailure(IronicException):
-    message = _("get fixed ip failed for mac %(mac_address)s")
-
-class GetNetworkIdFailure(IronicException):
-    message = _("get node network in failed for mac %(mac_address)s")
-
-class FailedToGetInfoOnPort(IronicException):
-    message = _("Show info on port: %(port_id)s failed.")
@@ -1,41 +0,0 @@
-"""
-Get the network from neutron
-This is a xcat patch for the ironic/common/neutron.py
-"""
-
-from neutronclient.common import exceptions as neutron_client_exc
-from ironic.common import exception
-from ironic.openstack.common import log as logging
-from ironic.common import neutron
-from ironic.drivers.modules import xcat_exception
-
-LOG = logging.getLogger(__name__)
-
-def get_vif_port_info(task, port_id):
-    """ Get  detail port info from neutron with a given port id """
-    api = neutron.NeutronAPI(task.context)
-    try:
-        port_info = api.client.show_port(port_id)
-    except neutron_client_exc.NeutronClientException:
-        LOG.exception(_("Failed to get port info %s."), port_id)
-        raise exception.FailedToGetInfoOnPort(port_id=port_id)
-    return port_info
-
-
-def get_ports_info_from_neutron(task):
-    """  Get neutron port info from neutron about this task """
-    vifs = neutron.get_node_vif_ids(task)
-    if not vifs:
-        LOG.warning(_("No VIFs found for node %(node)s when attempting to "
-                      "update Neutron DHCP BOOT options."),
-                      {'node': task.node.uuid})
-        return
-    failures = []
-    vif_ports_info = {}
-    for port_id, port_vif in vifs.iteritems():
-        try:
-            vif_ports_info[port_id] = get_vif_port_info(task,port_vif)
-        except xcat_exception.FailedToGetInfoOnPort(port_id=port_vif):
-            failures.append(port_vif)
-    return vif_ports_info
-
@@ -1,462 +0,0 @@
-"""
-pxe procedure for the xcat baremetal driver
-use xcat to config dhcp and tftp
-"""
-
-import os
-import time
-import paramiko
-import datetime
-from oslo.config import cfg
-from ironic.common import exception
-from ironic.common import image_service as service
-from ironic.common import keystone
-from ironic.common import states
-from ironic.common import utils
-from ironic.conductor import task_manager
-from ironic.conductor import utils as manager_utils
-from ironic.drivers import base
-from ironic.drivers import utils as driver_utils
-from ironic.openstack.common import log as logging
-from ironic.openstack.common import strutils
-from ironic.drivers.modules import xcat_neutron
-from ironic.drivers.modules import xcat_util
-from ironic.openstack.common import loopingcall
-from nova.openstack.common import timeutils
-from ironic.openstack.common import lockutils
-from ironic.drivers.modules import xcat_exception
-
-
-pxe_opts = [
-    cfg.StrOpt('pxe_append_params',
-               default='nofb nomodeset vga=normal',
-               help='Additional append parameters for baremetal PXE boot.'),
-    cfg.StrOpt('default_ephemeral_format',
-               default='ext4',
-               help='Default file system format for ephemeral partition, '
-                    'if one is created.'),
-    ]
-xcat_opts = [
-    cfg.StrOpt('network_node_ip',
-               default='127.0.0.1',
-               help='IP address of neutron network node'),
-    cfg.StrOpt('ssh_user',
-               default='root',
-               help='Username of neutron network node.'),
-    cfg.StrOpt('ssh_password',
-               default='cluster',
-               help='Password of neutron network node'),
-    cfg.IntOpt('ssh_port',
-               default=22,
-               help='ssh connection port for the neutron '),
-    cfg.StrOpt('host_filepath',
-               default='/etc/hosts',
-               help='host file of server'),
-    cfg.IntOpt('deploy_timeout',
-               default=3600,
-               help='max depolyment time(seconds) for the xcat driver'),
-    cfg.IntOpt('deploy_checking_interval',
-               default=30,
-               help='interval time(seconds) to check the xcat deploy state'),
-    ]
-
-LOG = logging.getLogger(__name__)
-
-CONF = cfg.CONF
-CONF.register_opts(pxe_opts, group='pxe')
-CONF.register_opts(xcat_opts, group='xcat')
-CONF.import_opt('use_ipv6', 'ironic.netconf')
-
-REQUIRED_PROPERTIES = {
-    'pxe_deploy_kernel': _("UUID (from Glance) of the deployment kernel. "
-                           "Required."),
-    'pxe_deploy_ramdisk': _("UUID (from Glance) of the ramdisk that is "
-                            "mounted at boot time. Required."),
-}
-COMMON_PROPERTIES = REQUIRED_PROPERTIES
-EM_SEMAPHORE = 'xcat_pxe'
-
-def _check_for_missing_params(info_dict, param_prefix=''):
-    missing_info = []
-    for label, value in info_dict.items():
-        if not value:
-            missing_info.append(param_prefix + label)
-
-    if missing_info:
-        raise exception.InvalidParameterValue(_(
-                "Can not validate PXE bootloader. The following parameters "
-                "were not passed to ironic: %s") % missing_info)
-
-def _parse_driver_info(node):
-    """Gets the driver specific Node deployment info.
-
-    This method validates whether the 'driver_info' property of the
-    supplied node contains the required information for this driver to
-    deploy images to the node.
-
-    :param node: a single Node.
-    :returns: A dict with the driver_info values.
-    """
-    info = node.driver_info
-    d_info = {}
-    d_info['xcat_node'] = info.get('xcat_node')
-    return d_info
-
-def _parse_instance_info(node):
-    """Gets the instance specific Node deployment info.
-
-    This method validates whether the 'instance_info' property of the
-    supplied node contains the required information for this driver to
-    deploy images to the node.
-
-    :param node: a single Node.
-    :returns: A dict with the instance_info values.
-    """
-
-    info = node.instance_info
-    i_info = {}
-    i_info['image_source'] = info.get('image_source')
-    i_info['root_gb'] = info.get('root_gb')
-    i_info['image_file'] = i_info['image_source']
-
-    _check_for_missing_params(i_info)
-
-    # Internal use only
-    i_info['deploy_key'] = info.get('deploy_key')
-
-    i_info['swap_mb'] = info.get('swap_mb', 0)
-    i_info['ephemeral_gb'] = info.get('ephemeral_gb', 0)
-    i_info['ephemeral_format'] = info.get('ephemeral_format')
-
-    err_msg_invalid = _("Can not validate PXE bootloader. Invalid parameter "
-                        "%(param)s. Reason: %(reason)s")
-    for param in ('root_gb', 'swap_mb', 'ephemeral_gb'):
-        try:
-            int(i_info[param])
-        except ValueError:
-            reason = _("'%s' is not an integer value.") % i_info[param]
-            raise exception.InvalidParameterValue(err_msg_invalid %
-                                            {'param': param, 'reason': reason})
-
-    if i_info['ephemeral_gb'] and not i_info['ephemeral_format']:
-        i_info['ephemeral_format'] = CONF.pxe.default_ephemeral_format
-
-    preserve_ephemeral = info.get('preserve_ephemeral', False)
-    try:
-        i_info['preserve_ephemeral'] = strutils.bool_from_string(
-                                            preserve_ephemeral, strict=True)
-    except ValueError as e:
-        raise exception.InvalidParameterValue(err_msg_invalid %
-                                  {'param': 'preserve_ephemeral', 'reason': e})
-    return i_info
-
-
-def _parse_deploy_info(node):
-    """Gets the instance and driver specific Node deployment info.
-
-    This method validates whether the 'instance_info' and 'driver_info'
-    property of the supplied node contains the required information for
-    this driver to deploy images to the node.
-
-    :param node: a single Node.
-    :returns: A dict with the instance_info and driver_info values.
-    """
-    info = {}
-    info.update(_parse_instance_info(node))
-    info.update(_parse_driver_info(node))
-    return info
-
-def _validate_glance_image(ctx, deploy_info):
-    """Validate the image in Glance.
-
-    Check if the image exist in Glance and if it contains the
-    'kernel_id' and 'ramdisk_id' properties.
-
-    :raises: InvalidParameterValue.
-    """
-    image_id = deploy_info['image_source']
-    if not image_id:
-        raise exception.ImageNotFound
-
-class PXEDeploy(base.DeployInterface):
-    """PXE Deploy Interface: just a stub until the real driver is ported."""
-    def get_properties(self):
-        return COMMON_PROPERTIES
-
-    def validate(self, task):
-        """Validate the deployment information for the task's node.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :raises: InvalidParameterValue.
-        """
-        node = task.node
-        if not driver_utils.get_node_mac_addresses(task):
-            raise exception.InvalidParameterValue(_("Node %s does not have "
-                                "any port associated with it.") % node.uuid)
-
-        d_info = _parse_deploy_info(node)
-        # Try to get the URL of the Ironic API
-        try:
-            # TODO(lucasagomes): Validate the format of the URL
-            CONF.conductor.api_url or keystone.get_service_url()
-        except (exception.CatalogFailure,
-                exception.CatalogNotFound,
-                exception.CatalogUnauthorized):
-            raise exception.InvalidParameterValue(_(
-                "Couldn't get the URL of the Ironic API service from the "
-                "configuration file or keystone catalog."))
-
-        _validate_glance_image(task.context, d_info)
-
-    @task_manager.require_exclusive_lock
-    def deploy(self, task):
-        """Start deployment of the task's node'.
-
-        Config host file and xcat dhcp, generate image info for xcat
-        and issues a  reboot request to the power driver.
-        This causes the node to boot into the deployment ramdisk and triggers
-        the next phase of PXE-based deployment via
-        VendorPassthru._continue_deploy().
-
-        :param task: a TaskManager instance containing the node to act on.
-        :returns: deploy state DEPLOYDONE.
-        """
-
-        d_info = _parse_deploy_info(task.node)
-        if not task.node.instance_info.get('fixed_ip_address') or not task.node.instance_info.get('image_name'):
-            raise exception.InvalidParameterValue
-        self._config_host_file(d_info,task.node.instance_info.get('fixed_ip_address'))
-        self._make_dhcp()
-        self._nodeset_osimage(d_info,task.node.instance_info.get('image_name'))
-        manager_utils.node_set_boot_device(task, 'pxe', persistent=True)
-        manager_utils.node_power_action(task, states.REBOOT)
-        try:
-            self._wait_for_node_deploy(task)
-        except xcat_exception.xCATDeploymentFailure:
-            LOG.info(_("xcat deployment failed"))
-            return states.ERROR
-
-        return states.DEPLOYDONE
-
-    @task_manager.require_exclusive_lock
-    def tear_down(self, task):
-        """Tear down a previous deployment on the task's node.
-
-        Power off the node. All actual clean-up is done in the clean_up()
-        method which should be called separately.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :returns: deploy state DELETED.
-        """
-        manager_utils.node_power_action(task, states.POWER_OFF)
-        return states.DELETED
-
-    def prepare(self, task):
-        """Prepare the deployment environment for this task's node.
-        Get the image info from glance, config the mac for the xcat
-        use ssh and iptables to disable dhcp on network node
-        :param task: a TaskManager instance containing the node to act on.
-        """
-        # TODO(deva): optimize this if rerun on existing files
-        d_info = _parse_deploy_info(task.node)
-        i_info = task.node.instance_info
-        image_id = d_info['image_source']
-        try:
-            glance_service = service.Service(version=1, context=task.context)
-            image_name = glance_service.show(image_id)['name']
-            i_info['image_name'] = image_name
-        except (exception.GlanceConnectionFailed,
-                exception.ImageNotAuthorized,
-                exception.Invalid):
-            LOG.warning(_("Failed to connect to Glance to get the properties "
-                "of the image %s") % image_id)
-
-        node_mac_addresses = driver_utils.get_node_mac_addresses(task)
-        vif_ports_info = xcat_neutron.get_ports_info_from_neutron(task)
-        try:
-            network_info = self._get_deploy_network_info(vif_ports_info, node_mac_addresses)
-        except (xcat_exception.GetNetworkFixedIPFailure,xcat_exception.GetNetworkIdFailure):
-            LOG.error(_("Failed to get network info"))
-            return
-        if not network_info:
-            LOG.error(_("Failed to get network info"))
-            return
-
-        fixed_ip_address = network_info['fixed_ip_address']
-        deploy_mac_address = network_info['mac_address']
-        network_id = network_info['network_id']
-
-        i_info['fixed_ip_address'] = fixed_ip_address
-        i_info['network_id'] = network_id
-        i_info['deploy_mac_address'] = deploy_mac_address
-
-        # use iptables to drop the dhcp mac of baremetal machine
-        self._ssh_append_dhcp_rule(CONF.xcat.network_node_ip,CONF.xcat.ssh_port,CONF.xcat.ssh_user,
-                                     CONF.xcat.ssh_password,network_id,deploy_mac_address)
-        self._chdef_node_mac_address(d_info,deploy_mac_address)
-
-    def clean_up(self, task):
-        """Clean up the deployment environment for the task's node.
-
-        Unlinks TFTP and instance images and triggers image cache cleanup.
-        Removes the TFTP configuration files for this node. As a precaution,
-        this method also ensures the keystone auth token file was removed.
-
-        :param task: a TaskManager instance containing the node to act on.
-        """
-        pass
-
-    def take_over(self, task):
-        pass
-
-    def _get_deploy_network_info(self, vif_ports_info, valid_node_mac_addrsses):
-        """Get network info from mac address of ironic node.
-        :param vif_ports_info: info collection from neutron ports
-        :param valid_node_mac_addrsses: mac address from ironic node
-        :raises: GetNetworkFixedIpFailure if search the fixed ip from mac address failure
-        :raises: GetNetworkIdFailure if search the network id from mac address failure
-        """
-        network_info = {}
-        for port_info in vif_ports_info.values():
-            if(port_info['port']['mac_address'] in valid_node_mac_addrsses ):
-                network_info['fixed_ip_address'] = port_info['port']['fixed_ips'][0]['ip_address']
-                if not network_info['fixed_ip_address']:
-                    raise xcat_exception.GetNetworkFixedIPFailure(mac_address=port_info['port']['mac_address'])
-                network_info['mac_address'] = port_info['port']['mac_address']
-                network_info['network_id'] = port_info['port']['network_id']
-                if not network_info['network_id']:
-                    raise xcat_exception.GetNetworkIdFailure(mac_address=port_info['port']['mac_address'])
-                network_info['port_id'] = port_info['port']['id']
-                return network_info
-        return network_info
-
-    def _chdef_node_mac_address(self, driver_info, deploy_mac):
-        """ run chdef command to set mac address"""
-        cmd = 'chdef'
-        args = 'mac='+ deploy_mac
-        try:
-            out_err = xcat_util.exec_xcatcmd(driver_info, cmd, args)
-            LOG.info(_("xcat chdef cmd exetute output: %(out_err)s") % {'out_err':out_err})
-        except xcat_exception.xCATCmdFailure as e:
-            LOG.warning(_("xcat chdef failed for node %(xcat_node)s with "
-                        "error: %(error)s.")
-                        % {'xcat_node': driver_info['xcat_node'], 'error': e})
-            raise exception.IPMIFailure(cmd=cmd)
-
-    @lockutils.synchronized(EM_SEMAPHORE, 'xcat-hosts-')
-    def _config_host_file(self, driver_info, deploy_ip):
-        """ append node and ip infomation to host file"""
-        with open(CONF.xcat.host_filepath,"r+") as f:
-            lines = []
-            for line in f:
-                temp = line.split('#')
-                if temp[0].strip():
-                    host_name = xcat_util._tsplit(temp[0].strip(),(' ','\t'))[1]
-                    if driver_info['xcat_node'] not in host_name:
-                        lines.append(line)
-
-            # append a new line to host file
-            line = "%s\t%s\n" %(deploy_ip,driver_info['xcat_node'])
-            lines.append(line)
-            f.seek(0)
-            f.truncate()
-            for line in lines:
-                f.write(line)
-
-    def _nodeset_osimage(self, driver_info, image_name):
-        """run nodeset command to config the image for the xcat node
-        :param driver_info: xcat node deploy info
-        :param image_name: image for the xcat deployment
-        """
-        cmd = 'nodeset'
-        args = 'osimage='+ image_name
-        try:
-            xcat_util.exec_xcatcmd(driver_info, cmd, args)
-        except xcat_exception.xCATCmdFailure as e:
-            LOG.warning(_("xcat nodeset failed for node %(xcat_node)s with "
-                        "error: %(error)s.")
-                        % {'xcat_node': driver_info['xcat_node'], 'error': e})
-
-    def _make_dhcp(self):
-        """run makedhcp command to setup dhcp environment for the xcat node"""
-        cmd = ['makedhcp',
-            '-n'
-            ]
-        try:
-            out, err = utils.execute(*cmd)
-            LOG.info(_(" excute cmd: %(cmd)s \n output: %(out)s \n. Error: %(err)s \n"),
-                      {'cmd':cmd,'out': out, 'err': err})
-        except Exception as e:
-            LOG.error(_("Unable to execute %(cmd)s. Exception: %(exception)s"),
-                      {'cmd': cmd, 'exception': e})
-        # makedhcp -a
-        cmd = ['makedhcp',
-            '-a'
-            ]
-        try:
-            out, err = utils.execute(*cmd)
-            LOG.info(_(" excute cmd: %(cmd)s \n output: %(out)s \n. Error: %(err)s \n"),
-                      {'cmd':cmd,'out': out, 'err': err})
-        except Exception as e:
-            LOG.error(_("Unable to execute %(cmd)s. Exception: %(exception)s"),
-                      {'cmd': cmd, 'exception': e})
-
-    def _ssh_append_dhcp_rule(self,ip,port,username,password,network_id,mac_address):
-        """ drop the dhcp package in network node to avoid of confilct of dhcp """
-        netns = 'qdhcp-%s' %network_id
-        append_cmd = 'sudo ip netns exec %s iptables -A INPUT -m mac --mac-source %s -j DROP' % \
-               (netns,mac_address)
-        cmd = [append_cmd]
-        xcat_util.xcat_ssh(ip,port,username,password,cmd)
-
-    def _ssh_delete_dhcp_rule(self,ip,port,username,password,network_id,mac_address):
-        """ delete the iptable rule on network node to recover the environment"""
-        netns = 'qdhcp-%s' %network_id
-        cancel_cmd = 'sudo ip netns exec %s iptables -D INPUT -m mac --mac-source %s -j DROP' % \
-               (netns,mac_address)
-        cmd = [cancel_cmd]
-        xcat_util.xcat_ssh(ip,port,username,password,cmd)
-
-    def _wait_for_node_deploy(self, task):
-        """Wait for xCAT node deployment to complete."""
-        locals = {'errstr':''}
-        driver_info = _parse_deploy_info(task.node)
-        node_mac_addrsses = driver_utils.get_node_mac_addresses(task)
-        i_info = task.node.instance_info
-
-        def _wait_for_deploy():
-            out,err = xcat_util.exec_xcatcmd(driver_info,'nodels','nodelist.status')
-            if err:
-                locals['errstr'] = _("Error returned when quering node status"
-                           " for node %s:%s") % (driver_info['xcat_node'], err)
-                LOG.warning(locals['errstr'])
-                raise loopingcall.LoopingCallDone()
-
-            if out:
-                node,status = out.split(": ")
-                status = status.strip()
-                if status == "booted":
-                    LOG.info(_("Deployment for node %s completed.")
-                             % driver_info['xcat_node'])
-                    raise loopingcall.LoopingCallDone()
-
-            if (CONF.xcat.deploy_timeout and
-                    timeutils.utcnow() > expiration):
-                locals['errstr'] = _("Timeout while waiting for"
-                           " deployment of node %s.") % driver_info['xcat_node']
-                LOG.warning(locals['errstr'])
-                raise loopingcall.LoopingCallDone()
-
-        expiration = timeutils.utcnow() + datetime.timedelta(
-                seconds=CONF.xcat.deploy_timeout)
-        timer = loopingcall.FixedIntervalLoopingCall(_wait_for_deploy)
-        # default check every 10 seconds
-        timer.start(interval=CONF.xcat.deploy_checking_interval).wait()
-
-        if locals['errstr']:
-            raise xcat_exception.xCATDeploymentFailure(locals['errstr'])
-        # deploy end, delete the dhcp rule for xcat
-        self._ssh_delete_dhcp_rule(CONF.xcat.network_node_ip,CONF.xcat.ssh_port,CONF.xcat.ssh_user,
-                                     CONF.xcat.ssh_password,i_info['network_id'],node_mac_addrsses[0])
-
-
@@ -1,444 +0,0 @@
-
-"""
-IPMI power manager driver.
-"""
-
-import contextlib
-import os
-import stat
-import tempfile
-import time
-
-from oslo.config import cfg
-
-from ironic.common import exception
-from ironic.common import states
-from ironic.common import utils
-from ironic.conductor import task_manager
-from ironic.drivers import base
-from ironic.drivers.modules import console_utils
-from ironic.openstack.common import excutils
-from ironic.openstack.common import log as logging
-from ironic.openstack.common import loopingcall
-from ironic.openstack.common import processutils
-from ironic.drivers.modules import xcat_exception
-from ironic.drivers.modules import xcat_util
-
-CONF = cfg.CONF
-CONF.import_opt('retry_timeout',
-                'ironic.drivers.modules.ipminative',
-                group='ipmi')
-CONF.import_opt('min_command_interval',
-                'ironic.drivers.modules.ipminative',
-                group='ipmi')
-
-LOG = logging.getLogger(__name__)
-
-VALID_PRIV_LEVELS = ['ADMINISTRATOR', 'CALLBACK', 'OPERATOR', 'USER']
-REQUIRED_PROPERTIES = {
-    'ipmi_address': _("IP address or hostname of the node. Required.")
-}
-OPTIONAL_PROPERTIES = {
-    'ipmi_password': _("password. Optional."),
-    'ipmi_priv_level': _("privilege level; default is ADMINISTRATOR. One of "
-                         "%s. Optional.") % ', '.join(VALID_PRIV_LEVELS),
-    'ipmi_username': _("username; default is NULL user. Optional.")
-}
-COMMON_PROPERTIES = REQUIRED_PROPERTIES.copy()
-COMMON_PROPERTIES.update(OPTIONAL_PROPERTIES)
-CONSOLE_PROPERTIES = {
-    'ipmi_terminal_port': _("node's UDP port to connect to. Only required for "
-                            "console access.")
-}
-TIMING_SUPPORT = None
-
-
-def _is_timing_supported(is_supported=None):
-    # shim to allow module variable to be mocked in unit tests
-    global TIMING_SUPPORT
-
-    if (TIMING_SUPPORT is None) and (is_supported is not None):
-        TIMING_SUPPORT = is_supported
-    return TIMING_SUPPORT
-
-
-def check_timing_support():
-    """Check the installed version of ipmitool for -N -R option support.
-
-    Support was added in 1.8.12 for the -N -R options, which enable
-    more precise control over timing of ipmi packets. Prior to this,
-    the default behavior was to retry each command up to 18 times at
-    1 to 5 second intervals.
-    http://ipmitool.cvs.sourceforge.net/viewvc/ipmitool/ipmitool/ChangeLog?revision=1.37  # noqa
-
-    This method updates the module-level TIMING_SUPPORT variable so that
-    it is accessible by any driver interface class in this module. It is
-    intended to be called from the __init__ method of such classes only.
-
-    :returns: boolean indicating whether support for -N -R is present
-    :raises: OSError
-    """
-    if _is_timing_supported() is None:
-        # Directly check ipmitool for support of -N and -R options. Because
-        # of the way ipmitool processes' command line options, if the local
-        # ipmitool does not support setting the timing options, the command
-        # below will fail.
-        try:
-            out, err = utils.execute(*['ipmitool', '-N', '0', '-R', '0', '-h'])
-        except processutils.ProcessExecutionError:
-            # the local ipmitool does not support the -N and -R options.
-            _is_timing_supported(False)
-        else:
-            # looks like ipmitool supports timing options.
-            _is_timing_supported(True)
-
-
-def _console_pwfile_path(uuid):
-    """Return the file path for storing the ipmi password for a console."""
-    file_name = "%(uuid)s.pw" % {'uuid': uuid}
-    return os.path.join(tempfile.gettempdir(), file_name)
-
-def _parse_driver_info(node):
-    """Gets the parameters required for ipmitool to access the node.
-
-    :param node: the Node of interest.
-    :returns: dictionary of parameters.
-    :raises: InvalidParameterValue if any required parameters are missing.
-
-    """
-    info = node.driver_info or {}
-    address = info.get('ipmi_address')
-    username = info.get('ipmi_username')
-    password = info.get('ipmi_password')
-    port = info.get('ipmi_terminal_port')
-    priv_level = info.get('ipmi_priv_level', 'ADMINISTRATOR')
-    xcat_node = info.get('xcat_node')
-    xcatmaster = info.get('xcatmaster')
-    netboot = info.get('netboot')
-
-    if port:
-        try:
-            port = int(port)
-        except ValueError:
-            raise exception.InvalidParameterValue(_(
-                "IPMI terminal port is not an integer."))
-
-    if not address:
-        raise exception.InvalidParameterValue(_(
-            "IPMI address not supplied to xcat driver."))
-
-    if priv_level not in VALID_PRIV_LEVELS:
-        valid_priv_lvls = ', '.join(VALID_PRIV_LEVELS)
-        raise exception.InvalidParameterValue(_(
-            "Invalid privilege level value:%(priv_level)s, the valid value"
-            " can be one of %(valid_levels)s") %
-            {'priv_level': priv_level, 'valid_levels': valid_priv_lvls})
-
-    if not xcat_node:
-        raise exception.InvalidParameterValue(_(
-            "xcat node name not supplied to xcat driver"))
-
-    if not xcatmaster:
-        raise exception.InvalidParameterValue(_(
-            "xcatmaster not supplied to xcat driver"))
-
-    if not netboot:
-        raise exception.InvalidParameterValue(_(
-            "netboot not supplied to xcat driver"))
-
-    return {
-            'address': address,
-            'username': username,
-            'password': password,
-            'port': port,
-            'uuid': node.uuid,
-            'priv_level': priv_level,
-            'xcat_node': xcat_node,
-            'xcatmaster': xcatmaster,
-            'netboot': netboot
-           }
-def chdef_node(driver_info):
-    """Run the chdef command in xcat, config the node
-    :param driver_info: driver_info for the xcat node
-    """
-    cmd = 'chdef'
-    args = 'mgt=ipmi' + \
-           ' bmc=' + driver_info['address'] + \
-           ' bmcusername=' + driver_info['username'] + \
-           ' bmcpassword=' + driver_info['password'] + \
-           ' xcatmaster='  + driver_info['xcatmaster']+ \
-           ' netboot=' + driver_info['netboot']+ \
-           ' primarynic=mac'+ \
-           ' installnic=mac'+ \
-           ' monserver=' + driver_info['xcatmaster'] + \
-           ' nfsserver=' + driver_info['xcatmaster'] + \
-           ' serialflow=hard'+ \
-           ' serialspeed=115200' + \
-           ' serialport=' + str(driver_info['port']);
-
-    try:
-        xcat_util.exec_xcatcmd(driver_info, cmd, args)
-    except xcat_exception.xCATCmdFailure as e:
-        LOG.warning(_("xcat chdef failed for node %(node_id)s with "
-                    "error: %(error)s.")
-                    % {'node_id': driver_info['uuid'], 'error': e})
-
-def _sleep_time(iter):
-    """Return the time-to-sleep for the n'th iteration of a retry loop.
-    This implementation increases exponentially.
-
-    :param iter: iteration number
-    :returns: number of seconds to sleep
-
-    """
-    if iter <= 1:
-        return 1
-    return iter ** 2
-
-
-def _set_and_wait(target_state, driver_info):
-    """Helper function for DynamicLoopingCall.
-
-    This method changes the power state and polls the BMCuntil the desired
-    power state is reached, or CONF.ipmi.retry_timeout would be exceeded by the
-    next iteration.
-
-    This method assumes the caller knows the current power state and does not
-    check it prior to changing the power state. Most BMCs should be fine, but
-    if a driver is concerned, the state should be checked prior to calling this
-    method.
-
-    :param target_state: desired power state
-    :param driver_info: the ipmitool parameters for accessing a node.
-    :returns: one of ironic.common.states
-    :raises: IPMIFailure on an error from ipmitool (from _power_status call).
-
-    """
-    if target_state == states.POWER_ON:
-        state_name = "on"
-    elif target_state == states.POWER_OFF:
-        state_name = "off"
-
-    def _wait(mutable):
-        try:
-            # Only issue power change command once
-            if mutable['iter'] < 0:
-                xcat_util.exec_xcatcmd(driver_info,'rpower',state_name)
-            else:
-                mutable['power'] = _power_status(driver_info)
-        except Exception:
-            # Log failures but keep trying
-            LOG.warning(_("xcat rpower %(state)s failed for node %(node)s."),
-                         {'state': state_name, 'node': driver_info['uuid']})
-        finally:
-            mutable['iter'] += 1
-
-        if mutable['power'] == target_state:
-            raise loopingcall.LoopingCallDone()
-
-        sleep_time = _sleep_time(mutable['iter'])
-        if (sleep_time + mutable['total_time']) > CONF.ipmi.retry_timeout:
-            # Stop if the next loop would exceed maximum retry_timeout
-            LOG.error(_('xcat rpower %(state)s timed out after '
-                        '%(tries)s retries on node %(node_id)s.'),
-                        {'state': state_name, 'tries': mutable['iter'],
-                        'node_id': driver_info['uuid']})
-            mutable['power'] = states.ERROR
-            raise loopingcall.LoopingCallDone()
-        else:
-            mutable['total_time'] += sleep_time
-            return sleep_time
-
-    # Use mutable objects so the looped method can change them.
-    # Start 'iter' from -1 so that the first two checks are one second apart.
-    status = {'power': None, 'iter': -1, 'total_time': 0}
-
-    timer = loopingcall.DynamicLoopingCall(_wait, status)
-    timer.start().wait()
-    return status['power']
-
-def _power_on(driver_info):
-    """Turn the power ON for this node.
-
-    :param driver_info: the xcat parameters for accessing a node.
-    :returns: one of ironic.common.states POWER_ON or ERROR.
-    :raises: IPMIFailure on an error from ipmitool (from _power_status call).
-
-    """
-    return _set_and_wait(states.POWER_ON, driver_info)
-
-
-def _power_off(driver_info):
-    """Turn the power OFF for this node.
-
-    :param driver_info: the xcat parameters for accessing a node.
-    :returns: one of ironic.common.states POWER_OFF or ERROR.
-    :raises: IPMIFailure on an error from ipmitool (from _power_status call).
-
-    """
-    return _set_and_wait(states.POWER_OFF, driver_info)
-
-def _power_status(driver_info):
-    """Get the power status for a node.
-
-    :param driver_info: the xcat access parameters for a node.
-    :returns: one of ironic.common.states POWER_OFF, POWER_ON or ERROR.
-    :raises: IPMIFailure on an error from ipmitool.
-
-    """
-    cmd = "rpower"
-    try:
-        out_err = xcat_util.exec_xcatcmd(driver_info,cmd,'status')
-    except Exception as e:
-        LOG.warning(_("xcat rpower status failed for node %(node_id)s with "
-                      "error: %(error)s.")
-                    % {'node_id': driver_info['uuid'], 'error': e})
-
-    if out_err[0].split(' ')[1].strip() == "on":
-        return states.POWER_ON
-    elif out_err[0].split(' ')[1].strip() == "off":
-        return states.POWER_OFF
-    else:
-        return states.ERROR
-
-
-class XcatPower(base.PowerInterface):
-
-    def __init__(self):
-        try:
-            check_timing_support()
-        except OSError:
-            raise exception.DriverLoadError(
-                    driver=self.__class__.__name__,
-                    reason="Unable to locate usable xcat command in "
-                           "the system path when checking xcat version")
-    def get_properties(self):
-        return COMMON_PROPERTIES
-
-    def validate(self, task):
-        """Validate driver_info for xcat driver.
-
-        Check that node['driver_info'] contains IPMI credentials.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :raises: InvalidParameterValue if required ipmi parameters are missing.
-
-        """
-        driver_info = _parse_driver_info(task.node)
-        try:
-            chdef_node(driver_info)
-        except exception:
-            LOG.error(_("chdef xcat info error!"))
-
-    def get_power_state(self, task):
-        """Get the current power state of the task's node.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :returns: one of ironic.common.states POWER_OFF, POWER_ON or ERROR.
-
-        """
-        driver_info = _parse_driver_info(task.node)
-        return _power_status(driver_info)
-
-    @task_manager.require_exclusive_lock
-    def set_power_state(self, task, pstate):
-        """Turn the power on or off.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :param pstate: The desired power state, one of ironic.common.states
-            POWER_ON, POWER_OFF.
-        :raises: InvalidParameterValue if required ipmi parameters are missing
-            or if an invalid power state was specified.
-        :raises: PowerStateFailure if the power couldn't be set to pstate.
-
-        """
-        driver_info = _parse_driver_info(task.node)
-
-        if pstate == states.POWER_ON:
-            state = _power_on(driver_info)
-        elif pstate == states.POWER_OFF:
-            state = _power_off(driver_info)
-        else:
-            raise exception.InvalidParameterValue(_("set_power_state called "
-                    "with invalid power state %s.") % pstate)
-        if state != pstate:
-            raise exception.PowerStateFailure(pstate=pstate)
-
-    @task_manager.require_exclusive_lock
-    def reboot(self, task):
-        """Cycles the power to the task's node.
-
-        :param task: a TaskManager instance containing the node to act on.
-        :raises: InvalidParameterValue if required ipmi parameters are missing.
-        :raises: PowerStateFailure if the final state of the node is not
-            POWER_ON.
-
-        """
-        driver_info = _parse_driver_info(task.node)
-        _power_off(driver_info)
-        state = _power_on(driver_info)
-
-        if state != states.POWER_ON:
-            raise exception.PowerStateFailure(pstate=states.POWER_ON)
-
-class IPMIShellinaboxConsole(base.ConsoleInterface):
-    """A ConsoleInterface that uses ipmitool and shellinabox."""
-
-    def __init__(self):
-        try:
-            check_timing_support()
-        except OSError:
-            raise exception.DriverLoadError(
-                    driver=self.__class__.__name__,
-                    reason="Unable to locate usable xcat command in "
-                           "the system path when checking xcat version")
-    def get_properties(self):
-        return COMMON_PROPERTIES
-
-    def validate(self, task):
-        """Validate the Node console info.
-
-        :param task: a task from TaskManager.
-        :raises: InvalidParameterValue
-        """
-        driver_info = _parse_driver_info(task.node)
-        if not driver_info['xcat_node']:
-            raise exception.InvalidParameterValue(_(
-                "xcat node name not supplied to xcat baremetal driver."))
-        if not driver_info['port']:
-            raise exception.InvalidParameterValue(_(
-                "IPMI terminal port not supplied to IPMI driver."))
-
-    def start_console(self, task):
-        """Start a remote console for the node."""
-        driver_info = _parse_driver_info(task.node)
-
-        path = _console_pwfile_path(driver_info['uuid'])
-        pw_file = console_utils.make_persistent_password_file(
-                path, driver_info['password'])
-
-        ipmi_cmd = "/:%(uid)s:%(gid)s:HOME:ipmitool -H %(address)s" \
-                   " -I lanplus -U %(user)s -f %(pwfile)s"  \
-                   % {'uid': os.getuid(),
-                      'gid': os.getgid(),
-                      'address': driver_info['address'],
-                      'user': driver_info['username'],
-                      'pwfile': pw_file}
-        if CONF.debug:
-            ipmi_cmd += " -v"
-        ipmi_cmd += " sol activate"
-        console_utils.start_shellinabox_console(driver_info['uuid'],
-                                                driver_info['port'],
-                                                ipmi_cmd)
-
-    def stop_console(self, task):
-        """Stop the remote console session for the node."""
-        driver_info = _parse_driver_info(task.node)
-        console_utils.stop_shellinabox_console(driver_info['uuid'])
-        utils.unlink_without_raise(_console_pwfile_path(driver_info['uuid']))
-
-    def get_console(self, task):
-        """Get the type and connection information about the console."""
-        driver_info = _parse_driver_info(task.node)
-        url = console_utils.get_shellinabox_console_url(driver_info['port'])
-        return {'type': 'shellinabox', 'url': url}
@@ -1,110 +0,0 @@
-"""
-util for xcat baremetal driver
-exec_xcatcmd
-xcat_ssh  to excute remote cmd
-"""
-import paramiko
-import time
-import socket
-from ironic.openstack.common import log as logging
-from oslo.config import cfg
-from ironic.drivers.modules import xcat_exception
-from ironic.common import utils
-
-xcat_opts = [
-    cfg.IntOpt('ssh_session_timeout',
-               default=10,
-               help='ssh session time'),
-    cfg.FloatOpt('ssh_shell_wait',
-               default=0.5,
-               help='wait time for the ssh cmd excute'),
-    cfg.IntOpt('ssh_buf_size',
-               default=65535,
-               help='Maximum size (in charactor) of cache for ssh, '
-               'including those in use'),
-    cfg.StrOpt('ssh_key',
-               default=None,
-               help='ssh private key to login '),
-    cfg.StrOpt('ssh_key_pass',
-               default=None,
-               help='Maximum size (in charactor) of cache for ssh, '
-               'including those in use'),
-    ]
-
-LOG = logging.getLogger(__name__)
-
-CONF = cfg.CONF
-CONF.register_opts(xcat_opts, group='xcat')
-
-LAST_CMD_TIME = {}
-
-def xcat_ssh(ip,port,username,password,cmd):
-    """ exec remote command with ssh  """
-    key =None
-    if CONF.xcat.ssh_key:
-        try:
-            key=paramiko.RSAKey.from_private_key_file(CONF.xcat.ssh_key)
-        except paramiko.PasswordRequiredException:
-            if not CONF.ssh_key_pass:
-                raise Exception.message("no pubkey password")
-            key = paramiko.RSAKey.from_private_key_file(
-                CONF.xcat.ssh_key, CONF.xcat.ssh_key.ssh_key_pass)
-    s = paramiko.SSHClient()
-    s.set_missing_host_key_policy(paramiko.AutoAddPolicy())
-    try:
-        s.connect(ip,port,username=username,password=password,pkey=key,
-                  timeout=CONF.xcat.ssh_session_timeout)
-    except socket.timeout as e:
-        LOG.error(_("Unable to connect to the ssh server Exception: %(exception)s"),
-                      {'exception': e})
-    chan = s.invoke_shell()
-    output = chan.recv(CONF.xcat.ssh_buf_size)
-    while not output.rstrip().endswith('#') and not output.rstrip().endswith('$'):
-        output = chan.recv(CONF.xcat.ssh_buf_size)
-    for  c in cmd :
-        _xcat_ssh_exec(chan,c,password)
-
-def _xcat_ssh_exec(chan,cmd,password):
-    """ exec ssh command """
-    chan.send(cmd + '\n')
-    time.sleep(CONF.xcat.ssh_shell_wait)
-    ret = chan.recv(CONF.xcat.ssh_buf_size)
-    if 'password' in ret and ret.rstrip().endswith(':'):
-        chan.send(password + '\n')
-        output = chan.recv(CONF.xcat.ssh_buf_size)
-        while not output.rstrip().endswith('#') and not output.rstrip().endswith('$'):
-            output = chan.recv(CONF.xcat.ssh_buf_size)
-    return output
-
-def _tsplit(string, delimiters):
-    """ Behaves str.split but supports multiple delimiters. """
-    delimiters = tuple(delimiters)
-    stack = [string,]
-    for delimiter in delimiters:
-        for i, substring in enumerate(stack):
-            substack = substring.split(delimiter)
-            stack.pop(i)
-            for j, _substring in enumerate(substack):
-                stack.insert(i+j, _substring)
-    return stack
-
-def exec_xcatcmd(driver_info, command, args):
-    """ excute xcat cmd """
-    cmd = [command,
-            driver_info['xcat_node']
-            ]
-    cmd.extend(args.split(" "))
-        # NOTE: ensure that no communications are excuted more
-        #             often than once every min_command_interval seconds.
-    time_till_next_poll = CONF.ipmi.min_command_interval - (
-                time.time() - LAST_CMD_TIME.get(driver_info['xcat_node'], 0))
-    if time_till_next_poll > 0:
-        time.sleep(time_till_next_poll)
-    try:
-        out, err = utils.execute(*cmd)
-        if err:
-            raise xcat_exception.xCATCmdFailure(cmd=cmd,node=driver_info['xcat_node'],
-                                            args=args)
-    finally:
-        LAST_CMD_TIME[driver_info['xcat_node']] = time.time()
-    return out, err
@@ -1,27 +0,0 @@
-"""
-XCATBaremetalDriver
-use xcat to deploy a baremetal machine
-"""
-
-
-from ironic.drivers import base
-from ironic.drivers.modules import ipmitool
-from ironic.drivers.modules import pxe
-from ironic.drivers.modules import xcat_pxe
-from ironic.drivers import utils
-from ironic.drivers.modules import xcat_rpower
-
-
-class XCATBaremetalDriver(base.BaseDriver):
-    """xCAT driver
-    This driver implements the `core` functionality, combinding
-    :class:`ironic.drivers.xcat_rpower.XcatPower` for power on/off and reboot with
-    :class:`ironic.driver.xcat_pxe.PXEDeploy` for image deployment. Implementations are in
-    those respective classes; this class is merely the glue between them.
-    """
-    def __init__(self):
-        self.power = xcat_rpower.XcatPower()
-        self.console = ipmitool.IPMIShellinaboxConsole()
-        self.deploy = xcat_pxe.PXEDeploy()
-        self.management = ipmitool.IPMIManagement()
-        self.vendor = pxe.VendorPassthru()
@@ -1,33 +0,0 @@
-[DEFAULT]
-
-# The list of modules to copy from oslo-incubator
-module=cliutils
-module=config.generator
-module=context
-module=db
-module=db.sqlalchemy
-module=db.sqlalchemy.migration_cli
-module=eventlet_backdoor
-module=excutils
-module=fileutils
-module=gettextutils
-module=importutils
-module=jsonutils
-module=local
-module=lockutils
-module=log
-module=loopingcall
-module=network_utils
-module=periodic_task
-module=policy
-module=processutils
-module=service
-module=strutils
-module=timeutils
-module=versionutils
-
-# Tools
-
-
-# The base module to hold the copy of openstack.common
-base=ironic
@@ -1,51 +0,0 @@
-[metadata]
-name = ironic
-version = 2014.2
-summary = OpenStack Bare Metal Provisioning
-description-file =
-    README.rst
-author = chenglch
-author-email = chenglch@cn.ibm.com
-home-page = http://xcat.sf.net/
-classifier =
-    Environment :: OpenStack
-    Intended Audience :: Information Technology
-    Intended Audience :: System Administrators
-    License :: OSI Approved :: Apache Software License
-    Operating System :: POSIX :: Linux
-    Programming Language :: Python
-    Programming Language :: Python :: 2
-    Programming Language :: Python :: 2.7
-    Programming Language :: Python :: 2.6
-
-[files]
-packages =
-    ironic
-
-[entry_points]
-ironic.drivers =    
-    agent_ipmitool = ironic.drivers.agent:AgentAndIPMIToolDriver
-	agent_pyghmi = ironic.drivers.agent:AgentAndIPMINativeDriver
-	agent_ssh = ironic.drivers.agent:AgentAndSSHDriver
-	fake = ironic.drivers.fake:FakeDriver
-	fake_agent = ironic.drivers.fake:FakeAgentDriver
-	fake_iboot = ironic.drivers.fake:FakeIBootDriver
-	fake_ipminative = ironic.drivers.fake:FakeIPMINativeDriver
-	fake_ipmitool = ironic.drivers.fake:FakeIPMIToolDriver
-	fake_pxe = ironic.drivers.fake:FakePXEDriver
-	fake_seamicro = ironic.drivers.fake:FakeSeaMicroDriver
-	fake_ssh = ironic.drivers.fake:FakeSSHDriver
-	ilo = ironic.drivers.ilo:IloDriver
-	pxe_iboot = ironic.drivers.pxe:PXEAndIBootDriver
-	pxe_ipminative = ironic.drivers.pxe:PXEAndIPMINativeDriver
-	pxe_ipmitool = ironic.drivers.pxe:PXEAndIPMIToolDriver
-	pxe_seamicro = ironic.drivers.pxe:PXEAndSeaMicroDriver
-	pxe_ssh = ironic.drivers.pxe:PXEAndSSHDriver
-	pxe_xcat = ironic.drivers.xcat:XCATBaremetalDriver
-
-[pbr]
-autodoc_index_modules = True
-
-[global]
-setup-hooks =
-    pbr.hooks.setup_hook
@@ -1,22 +0,0 @@
-hacking>=0.8.0,<0.9
-coverage>=3.6
-discover
-fixtures>=0.3.14
-mock>=1.0
-Babel>=1.3
-MySQL-python
-psycopg2
-python-ironicclient
-python-subunit>=0.0.18
-testrepository>=0.0.18
-testtools>=0.9.34
-
-# Doc requirements
-sphinx>=1.1.2,!=1.2.0,<1.3
-sphinxcontrib-pecanwsme>=0.8
-oslosphinx
-
-# Required for Nova unit tests in ironic/nova/tests/ and can be removed
-# once the driver code lands in Nova.
-http://tarballs.openstack.org/nova/nova-master.tar.gz#egg=nova
-mox>=0.5.3
@@ -0,0 +1,15 @@
+AllCops:
+  Excludes:
+    - test/**
+    - vendor/**
+
+AlignParameters:
+  Enabled: false
+Encoding:
+  Enabled: false
+HashSyntax:
+  Enabled: false
+LineLength:
+  Enabled: false
+MethodLength:
+  Max: 30
@@ -0,0 +1,9 @@
+rvm:
+  - 1.9.3
+  - 2.0.0
+before_script:
+  - bundle exec berks install
+script:
+  - bundle exec foodcritic -f any . --tags ~FC007 --tags ~FC015 --tags ~FC023
+  # - bundle exec rspec --color --format progress
+  - bundle exec rubocop
@@ -0,0 +1,7 @@
+site :opscode
+metadata
+
+group :integration do
+  cookbook 'apt', '~> 2.0'
+  cookbook 'yum', '~> 2.0'
+end
@@ -0,0 +1,198 @@
+apache2 Cookbook Changelog
+==========================
+This file is used to list changes made in each version of the apache2 cookbook.
+
+v1.8.4
+------
+### Bug
+- **[COOK-3769](https://tickets.opscode.com/browse/COOK-3769)** - Fix a critical bug where the `apache_module` could not enable modules
+
+
+v1.8.2
+------
+### Bug
+- **[COOK-3766](https://tickets.opscode.com/browse/COOK-3766)** - Fix an issue where the `mod_ssl` recipe fails due to a missing attribute
+
+
+v1.8.0
+------
+### Bug
+- **[COOK-3680](https://tickets.opscode.com/browse/COOK-3680)** - Update template paths
+- **[COOK-3570](https://tickets.opscode.com/browse/COOK-3570)** - Apache cookbook breaks on RHEL / CentOS 6
+- **[COOK-2944](https://tickets.opscode.com/browse/COOK-2944)** - Fix foodcritic failures
+- **[COOK-2893](https://tickets.opscode.com/browse/COOK-2893)** - Improve mod_auth_openid recipe with guards and idempotency
+- **[COOK-2758](https://tickets.opscode.com/browse/COOK-2758)** - Fix use of non-existent attribute
+
+### New Feature
+- **[COOK-3665](https://tickets.opscode.com/browse/COOK-3665)** - Add recipe for mod_userdir
+- **[COOK-3646](https://tickets.opscode.com/browse/COOK-3646)** - Add recipe for mod_cloudflare
+- **[COOK-3213](https://tickets.opscode.com/browse/COOK-3213)** - Add recipe for mod_info
+
+### Improvement
+- **[COOK-3656](https://tickets.opscode.com/browse/COOK-3656)** - Parameterize apache2 binary
+- **[COOK-3562](https://tickets.opscode.com/browse/COOK-3562)** - Allow mod_proxy settings to be configured as attributes
+- **[COOK-3326](https://tickets.opscode.com/browse/COOK-3326)** - Fix default_test to use ServerTokens attribute
+- **[COOK-2635](https://tickets.opscode.com/browse/COOK-2635)** - Add support for SVG mime types
+- **[COOK-2598](https://tickets.opscode.com/browse/COOK-2598)** - FastCGI Module only works on Debian-based platforms
+- **[COOK-1984](https://tickets.opscode.com/browse/COOK-1984)** - Add option to configure the address apache listens to
+
+
+v1.7.0
+------
+### Improvement
+
+- [COOK-3073]: make access.log location configurable per-platform
+- [COOK-3074]: don't hardcode the error.log location in the default site config
+- [COOK-3268]: don't hardcode DocumentRoot and cgi-bin locations in `default_site`
+
+### New Feature
+
+- [COOK-3184]: Add `mod_filter` recipe to Apache2-cookbook
+- [COOK-3236]: Add `mod_action` recipe to Apache2-cookbook
+
+v1.6.6
+------
+1.6.4 had a missed step in the automated release, long live 1.6.6.
+
+### Bug
+
+- [COOK-3018]: apache2_module does duplicate delayed restart of apache2 service when conf = true
+- [COOK-3027]: Default site enable true, then false, does not disable default site
+- [COOK-3109]: fix apache lib_dir arch attribute regexp
+
+v1.6.2
+------
+- [COOK-2535] - `mod_auth_openid` requires libtool to run autogen.sh
+- [COOK-2667] - Typo in usage documentation
+- [COOK-2461] - `apache2::mod_auth_openid` fails on some ubuntu systems
+- [COOK-2720] - Apache2 minitest helper function `ran_recipe` is not portable
+
+v1.6.0
+------
+- [COOK-2372] - apache2 mpm_worker: add ServerLimit attribute (default to 16)
+
+v1.5.0
+------
+The `mod_auth_openid` attributes are changed. The upstream maintainer deprecated the older release versions, and the source repository has releases available at specific SHA1SUM references. The new attribute, `node['apache']['mod_auth_openid']['ref']` is used to set this.
+
+- [COOK-2198] - `apache::mod_auth_openid` compiles from source, but does not install make on debian/ubuntu
+- [COOK-2224] - version conflict between cucumber and other gems
+- [COOK-2248] - `apache2::mod_php5` uses `not_if` "which php" without ensuring package 'which' is installed
+- [COOK-2269] - Set allow list for mod_status incase external monitor scripts need
+- [COOK-2276] - cookbook apache2 documentation regarding listening ports doesn't match default attributes
+- [COOK-2296] - `mod_auth_openid` doesn't have tags/releases for the version I need for features and fixes
+- [COOK-2323] - Add Oracle linux support
+
+v1.4.2
+------
+- [COOK-1721] - fix logrotate recipe
+
+v1.4.0
+------
+- [COOK-1456] - iptables enhancements
+- [COOK-1473] - apache2 does not disable default site when setting "`default_site_enabled`" back to false
+- [COOK-1824] - the apache2 cookbook needs to specify which binary is used on rhel platform
+- [COOK-1916] - Download location wrong for apache2 `mod_auth_openid` >= 0.7
+- [COOK-1917] - Improve `mod_auth_openid` recipe to handle module upgrade more gracefully
+- [COOK-2029] - apache2 restarts on every run on RHEL and friends, generate-module-list on every run.
+- [COOK-2036] - apache2: Cookbook style
+
+v1.3.2
+------
+- [COOK-1804] - fix `web_app` definition parameter so site can be disabled.
+
+v1.3.0
+------
+- [COOK-1738] - Better configuration for `mod_include` and some overrides in `web_app` definition
+- [COOK-1470] - Change SSL Ciphers to Mitigate BEAST attack
+
+v1.2.0
+------
+- [COOK-692] - delete package conf.d files in module recipes, for EL
+- [COOK-1693] - Foodcritic finding for unnecessary string interpolation
+- [COOK-1757] - platform_family and better style / usage practices
+
+v1.1.16
+-------
+re-releasing as .16 due to error on tag 1.1.14
+
+- [COOK-1466] - add `mod_auth_cas` recipe
+- [COOK-1609] - apache2 changes ports.conf twice per run when using apache2::mod_ssl
+
+v1.1.12
+-------
+- [COOK-1436] - restore apache2 web_app definition
+- [COOK-1356] - allow ExtendedStatus via attribute
+- [COOK-1403] - add mod_fastcgi recipe
+
+v1.1.10
+-------
+- [COOK-1315] - allow the default site to not be enabled
+- [COOK-1328] - cookbook tests (minitest, cucumber)
+
+v1.1.8
+------
+- Some platforms with minimal installations that don't have perl won't have a `node['languages']['perl']` attribute, so remove the conditional and rely on the power of idempotence in the package resource.
+- [COOK-1214] - address foodcritic warnings
+- [COOK-1180] - add `mod_logio` and fix `mod_proxy`
+
+v1.1.6
+------
+FreeBSD users: This release requires the `freebsd` cookbook. See README.md.
+
+- [COOK-1025] - freebsd support in mod_php5 recipe
+
+v1.1.4
+------
+- [COOK-1100] - support amazon linux
+
+v1.1.2
+------
+- [COOK-996] - apache2::mod_php5 can cause PHP and module API mismatches
+- [COOK-1083] - return string for v_f_p and use correct value for default
+
+v1.1.0
+------
+- [COOK-861] - Add `mod_perl` and apreq2
+- [COOK-941] - fix `mod_auth_openid` on FreeBSD
+- [COOK-1021] - add a commented-out LoadModule directive to keep apxs happy
+- [COOK-1022] - consistency for icondir attribute
+- [COOK-1023] - fix platform test for attributes
+- [COOK-1024] - fix a2enmod script so it runs cleanly on !bash
+- [COOK-1026] - fix `error_log` location on FreeBSD
+
+v1.0.8
+------
+- COOK-548 - directory resource doesn't have backup parameter
+
+v1.0.6
+------
+- COOK-915 - update to `mod_auth_openid` version 0.6, see __Recipes/mod_auth_openid__ below.
+- COOK-548 - Add support for FreeBSD.
+
+v1.0.4
+------
+- COOK-859 - don't hardcode module paths
+
+v1.0.2
+------
+- Tickets resolved in this release: COOK-788, COOK-782, COOK-780
+
+v1.0.0
+------
+- Red Hat family support is greatly improved, all recipes except `god_monitor` converge.
+- Recipe `mod_auth_openid` now works on RHEL family distros
+- Recipe `mod_php5` will now remove config from package on RHEL family so it doesn't conflict with the cookbook's.
+- Added `php5.conf.erb` template for `mod_php5` recipe.
+- Create the run state directory for `mod_fcgid` to prevent a startup error on RHEL version 6.
+- New attribute `node['apache']['lib_dir']` to handle lib vs lib64 on RHEL family distributions.
+- New attribute `node['apache']['group']`.
+- Scientific Linux support added.
+- Use a file resource instead of the generate-module-list executed perl script on RHEL family.
+- "default" site can now be disabled.
+- web_app now has an "enable" parameter.
+- Support for dav_fs apache module.
+- Tickets resolved in this release: COOK-754, COOK-753, COOK-665, COOK-624, COOK-579, COOK-519, COOK-518
+- Fix node references in template for a2dissite
+- Use proper user and group attributes on files and templates.
+- Replace the anemic README.rdoc with this new and improved superpowered README.md :).
@@ -0,0 +1,257 @@
+# Contributing to Opscode Cookbooks
+
+We are glad you want to contribute to Opscode Cookbooks! The first
+step is the desire to improve the project.
+
+You can find the answers to additional frequently asked questions
+[on the wiki](http://wiki.opscode.com/display/chef/How+to+Contribute).
+
+You can find additional information about
+[contributing to cookbooks](http://wiki.opscode.com/display/chef/How+to+Contribute+to+Opscode+Cookbooks)
+on the wiki as well.
+
+## Quick-contribute
+
+* Create an account on our [bug tracker](http://tickets.opscode.com)
+* Sign our contributor agreement (CLA)
+[ online](https://secure.echosign.com/public/hostedForm?formid=PJIF5694K6L)
+(keep reading if you're contributing on behalf of your employer)
+* Create a ticket for your change on the
+  [bug tracker](http://tickets.opscode.com)
+* Link to your patch as a rebased git branch or pull request from the
+  ticket
+* Resolve the ticket as fixed
+
+We regularly review contributions and will get back to you if we have
+any suggestions or concerns.
+
+## The Apache License and the CLA/CCLA
+
+Licensing is very important to open source projects, it helps ensure
+the software continues to be available under the terms that the author
+desired. Chef uses the Apache 2.0 license to strike a balance between
+open contribution and allowing you to use the software however you
+would like to.
+
+The license tells you what rights you have that are provided by the
+copyright holder. It is important that the contributor fully
+understands what rights they are licensing and agrees to them.
+Sometimes the copyright holder isn't the contributor, most often when
+the contributor is doing work for a company.
+
+To make a good faith effort to ensure these criteria are met, Opscode
+requires a Contributor License Agreement (CLA) or a Corporate
+Contributor License Agreement (CCLA) for all contributions. This is
+without exception due to some matters not being related to copyright
+and to avoid having to continually check with our lawyers about small
+patches.
+
+It only takes a few minutes to complete a CLA, and you retain the
+copyright to your contribution.
+
+You can complete our contributor agreement (CLA)
+[ online](https://secure.echosign.com/public/hostedForm?formid=PJIF5694K6L).
+If you're contributing on behalf of your employer, have your employer
+fill out our
+[Corporate CLA](https://secure.echosign.com/public/hostedForm?formid=PIE6C7AX856)
+instead.
+
+## Ticket Tracker (JIRA)
+
+The [ticket tracker](http://tickets.opscode.com) is the most important
+documentation for the code base. It provides significant historical
+information, such as:
+
+* Which release a bug fix is included in
+* Discussion regarding the design and merits of features
+* Error output to aid in finding similar bugs
+
+Each ticket should aim to fix one bug or add one feature.
+
+## Using git
+
+You can get a quick copy of the repository for this cookbook by
+running `git clone
+git://github.com/opscode-coobkooks/COOKBOOKNAME.git`.
+
+For collaboration purposes, it is best if you create a Github account
+and fork the repository to your own account. Once you do this you will
+be able to push your changes to your Github repository for others to
+see and use.
+
+If you have another repository in your GitHub account named the same
+as the cookbook, we suggest you suffix the repository with -cookbook.
+
+### Branches and Commits
+
+You should submit your patch as a git branch named after the ticket,
+such as COOK-1337. This is called a _topic branch_ and allows users to
+associate a branch of code with the ticket.
+
+It is a best practice to have your commit message have a _summary
+line_ that includes the ticket number, followed by an empty line and
+then a brief description of the commit. This also helps other
+contributors understand the purpose of changes to the code.
+
+    [COOK-1757] - platform_family and style
+
+    * use platform_family for platform checking
+    * update notifies syntax to "resource_type[resource_name]" instead of
+      resources() lookup
+    * COOK-692 - delete config files dropped off by packages in conf.d
+    * dropped debian 4 support because all other platforms have the same
+      values, and it is older than "old stable" debian release
+
+Remember that not all users use Chef in the same way or on the same
+operating systems as you, so it is helpful to be clear about your use
+case and change so they can understand it even when it doesn't apply
+to them.
+
+### Github and Pull Requests
+
+All of Opscode's open source cookbook projects are available on
+[Github](http://www.github.com/opscode-cookbooks).
+
+We don't require you to use Github, and we will even take patch diffs
+attached to tickets on the tracker. However Github has a lot of
+convenient features, such as being able to see a diff of changes
+between a pull request and the main repository quickly without
+downloading the branch.
+
+If you do choose to use a pull request, please provide a link to the
+pull request from the ticket __and__ a link to the ticket from the
+pull request. Because pull requests only have two states, open and
+closed, we can't easily filter pull requests that are waiting for a
+reply from the author for various reasons.
+
+### More information
+
+Additional help with git is available on the
+[Working with Git](http://wiki.opscode.com/display/chef/Working+with+Git)
+wiki page.
+
+## Functional and Unit Tests
+
+This cookbook is set up to run tests under
+[Opscode's test-kitchen](https://github.com/opscode/test-kitchen). It
+uses minitest-chef to run integration tests after the node has been
+converged to verify that the state of the node.
+
+Test kitchen should run completely without exception using the default
+[baseboxes provided by Opscode](https://github.com/opscode/bento).
+Because Test Kitchen creates VirtualBox machines and runs through
+every configuration in the Kitchenfile, it may take some time for
+these tests to complete.
+
+If your changes are only for a specific recipe, run only its
+configuration with Test Kitchen. If you are adding a new recipe, or
+other functionality such as a LWRP or definition, please add
+appropriate tests and ensure they run with Test Kitchen.
+
+If any don't pass, investigate them before submitting your patch.
+
+Any new feature should have unit tests included with the patch with
+good code coverage to help protect it from future changes. Similarly,
+patches that fix a bug or regression should have a _regression test_.
+Simply put, this is a test that would fail without your patch but
+passes with it. The goal is to ensure this bug doesn't regress in the
+future. Consider a regular expression that doesn't match a certain
+pattern that it should, so you provide a patch and a test to ensure
+that the part of the code that uses this regular expression works as
+expected. Later another contributor may modify this regular expression
+in a way that breaks your use cases. The test you wrote will fail,
+signalling to them to research your ticket and use case and accounting
+for it.
+
+If you need help writing tests, please ask on the Chef Developer's
+mailing list, or the #chef-hacking IRC channel.
+
+## Code Review
+
+Opscode regularly reviews code contributions and provides suggestions
+for improvement in the code itself or the implementation.
+
+We find contributions by searching the ticket tracker for _resolved_
+tickets with a status of _fixed_. If we have feedback we will reopen
+the ticket and you should resolve it again when you've made the
+changes or have a response to our feedback. When we believe the patch
+is ready to be merged, we will tag the _Code Reviewed_ field with
+_Reviewed_.
+
+Depending on the project, these tickets are then merged within a week
+or two, depending on the current release cycle.
+
+## Release Cycle
+
+The versioning for Opscode Cookbook projects is X.Y.Z.
+
+* X is a major release, which may not be fully compatible with prior
+  major releases
+* Y is a minor release, which adds both new features and bug fixes
+* Z is a patch release, which adds just bug fixes
+
+A released version of a cookbook will end in an even number, e.g.
+"1.2.4" or "0.8.0". When development for the next version of the
+cookbook begins, the "Z" patch number is incremented to the next odd
+number, however the next release of the cookbook may be a major or
+minor incrementing version.
+
+Releases of Opscode's cookbooks are usually announced on the Chef user
+mailing list. Releases of several cookbooks may be batched together
+and announced on the [Opscode Blog](http://www.opscode.com/blog).
+
+## Working with the community
+
+These resources will help you learn more about Chef and connect to
+other members of the Chef community:
+
+* [chef](http://lists.opscode.com/sympa/info/chef) and
+  [chef-dev](http://lists.opscode.com/sympa/info/chef-dev) mailing
+  lists
+* #chef and #chef-hacking IRC channels on irc.freenode.net
+* [Community Cookbook site](http://community.opscode.com)
+* [Chef wiki](http://wiki.opscode.com/display/chef)
+* Opscode Chef [product page](http://www.opscode.com/chef)
+
+
+## Cookbook Contribution Do's and Don't's
+
+Please do include tests for your contribution. If you need help, ask
+on the
+[chef-dev mailing list](http://lists.opscode.com/sympa/info/chef-dev)
+or the
+[#chef-hacking IRC channel](http://community.opscode.com/chat/chef-hacking).
+Not all platforms that a cookbook supports may be supported by Test
+Kitchen. Please provide evidence of testing your contribution if it
+isn't trivial so we don't have to duplicate effort in testing. Chef
+10.14+ "doc" formatted output is sufficient.
+
+Please do indicate new platform (families) or platform versions in the
+commit message, and update the relevant ticket.
+
+If a contribution adds new platforms or platform versions, indicate
+such in the body of the commit message(s), and update the relevant
+COOK ticket. When writing commit messages, it is helpful for others if
+you indicate the COOK ticket. For example:
+
+    git commit -m '[COOK-1041] - Updated pool resource to correctly
+    delete.'
+
+Please do use [foodcritic](http://acrmp.github.com/foodcritic) to
+lint-check the cookbook. Except FC007, it should pass all correctness
+rules. FC007 is okay as long as the dependent cookbooks are *required*
+for the default behavior of the cookbook, such as to support an
+uncommon platform, secondary recipe, etc.
+
+Please do ensure that your changes do not break or modify behavior for
+other platforms supported by the cookbook. For example if your changes
+are for Debian, make sure that they do not break on CentOS.
+
+Please do not modify the version number in the metadata.rb, Opscode
+will select the appropriate version based on the release cycle
+information above.
+
+Please do not update the CHANGELOG.md for a new version. Not all
+changes to a cookbook may be merged and released in the same versions.
+Opscode will update the CHANGELOG.md when releasing a new version of
+the cookbook.
@@ -0,0 +1,23 @@
+# source "https://rubygems.org"
+
+# gem 'cucumber', '~> 1.2.0'
+# gem 'httparty', '~> 0.8.3'
+# gem 'minitest', '~> 3.0.0'
+# gem 'nokogiri', '~> 1.5.0'
+
+# group :kitchen  do
+#   gem 'test-kitchen', '< 1.0'
+# end
+
+
+source 'https://rubygems.org'
+
+gem 'berkshelf',  '~> 2.0'
+gem 'chefspec',   '~> 2.0'
+gem 'foodcritic', '~> 3.0'
+gem 'rubocop',    '~> 0.12'
+
+group :integration do
+  gem 'test-kitchen',    '~> 1.0.0.beta'
+  gem 'kitchen-vagrant', '~> 0.11'
+end
@@ -0,0 +1,201 @@
+                              Apache License
+                        Version 2.0, January 2004
+                     http://www.apache.org/licenses/
+
+TERMS AND CONDITIONS FOR USE, REPRODUCTION, AND DISTRIBUTION
+
+1. Definitions.
+
+   "License" shall mean the terms and conditions for use, reproduction,
+   and distribution as defined by Sections 1 through 9 of this document.
+
+   "Licensor" shall mean the copyright owner or entity authorized by
+   the copyright owner that is granting the License.
+
+   "Legal Entity" shall mean the union of the acting entity and all
+   other entities that control, are controlled by, or are under common
+   control with that entity. For the purposes of this definition,
+   "control" means (i) the power, direct or indirect, to cause the
+   direction or management of such entity, whether by contract or
+   otherwise, or (ii) ownership of fifty percent (50%) or more of the
+   outstanding shares, or (iii) beneficial ownership of such entity.
+
+   "You" (or "Your") shall mean an individual or Legal Entity
+   exercising permissions granted by this License.
+
+   "Source" form shall mean the preferred form for making modifications,
+   including but not limited to software source code, documentation
+   source, and configuration files.
+
+   "Object" form shall mean any form resulting from mechanical
+   transformation or translation of a Source form, including but
+   not limited to compiled object code, generated documentation,
+   and conversions to other media types.
+
+   "Work" shall mean the work of authorship, whether in Source or
+   Object form, made available under the License, as indicated by a
+   copyright notice that is included in or attached to the work
+   (an example is provided in the Appendix below).
+
+   "Derivative Works" shall mean any work, whether in Source or Object
+   form, that is based on (or derived from) the Work and for which the
+   editorial revisions, annotations, elaborations, or other modifications
+   represent, as a whole, an original work of authorship. For the purposes
+   of this License, Derivative Works shall not include works that remain
+   separable from, or merely link (or bind by name) to the interfaces of,
+   the Work and Derivative Works thereof.
+
+   "Contribution" shall mean any work of authorship, including
+   the original version of the Work and any modifications or additions
+   to that Work or Derivative Works thereof, that is intentionally
+   submitted to Licensor for inclusion in the Work by the copyright owner
+   or by an individual or Legal Entity authorized to submit on behalf of
+   the copyright owner. For the purposes of this definition, "submitted"
+   means any form of electronic, verbal, or written communication sent
+   to the Licensor or its representatives, including but not limited to
+   communication on electronic mailing lists, source code control systems,
+   and issue tracking systems that are managed by, or on behalf of, the
+   Licensor for the purpose of discussing and improving the Work, but
+   excluding communication that is conspicuously marked or otherwise
+   designated in writing by the copyright owner as "Not a Contribution."
+
+   "Contributor" shall mean Licensor and any individual or Legal Entity
+   on behalf of whom a Contribution has been received by Licensor and
+   subsequently incorporated within the Work.
+
+2. Grant of Copyright License. Subject to the terms and conditions of
+   this License, each Contributor hereby grants to You a perpetual,
+   worldwide, non-exclusive, no-charge, royalty-free, irrevocable
+   copyright license to reproduce, prepare Derivative Works of,
+   publicly display, publicly perform, sublicense, and distribute the
+   Work and such Derivative Works in Source or Object form.
+
+3. Grant of Patent License. Subject to the terms and conditions of
+   this License, each Contributor hereby grants to You a perpetual,
+   worldwide, non-exclusive, no-charge, royalty-free, irrevocable
+   (except as stated in this section) patent license to make, have made,
+   use, offer to sell, sell, import, and otherwise transfer the Work,
+   where such license applies only to those patent claims licensable
+   by such Contributor that are necessarily infringed by their
+   Contribution(s) alone or by combination of their Contribution(s)
+   with the Work to which such Contribution(s) was submitted. If You
+   institute patent litigation against any entity (including a
+   cross-claim or counterclaim in a lawsuit) alleging that the Work
+   or a Contribution incorporated within the Work constitutes direct
+   or contributory patent infringement, then any patent licenses
+   granted to You under this License for that Work shall terminate
+   as of the date such litigation is filed.
+
+4. Redistribution. You may reproduce and distribute copies of the
+   Work or Derivative Works thereof in any medium, with or without
+   modifications, and in Source or Object form, provided that You
+   meet the following conditions:
+
+   (a) You must give any other recipients of the Work or
+       Derivative Works a copy of this License; and
+
+   (b) You must cause any modified files to carry prominent notices
+       stating that You changed the files; and
+
+   (c) You must retain, in the Source form of any Derivative Works
+       that You distribute, all copyright, patent, trademark, and
+       attribution notices from the Source form of the Work,
+       excluding those notices that do not pertain to any part of
+       the Derivative Works; and
+
+   (d) If the Work includes a "NOTICE" text file as part of its
+       distribution, then any Derivative Works that You distribute must
+       include a readable copy of the attribution notices contained
+       within such NOTICE file, excluding those notices that do not
+       pertain to any part of the Derivative Works, in at least one
+       of the following places: within a NOTICE text file distributed
+       as part of the Derivative Works; within the Source form or
+       documentation, if provided along with the Derivative Works; or,
+       within a display generated by the Derivative Works, if and
+       wherever such third-party notices normally appear. The contents
+       of the NOTICE file are for informational purposes only and
+       do not modify the License. You may add Your own attribution
+       notices within Derivative Works that You distribute, alongside
+       or as an addendum to the NOTICE text from the Work, provided
+       that such additional attribution notices cannot be construed
+       as modifying the License.
+
+   You may add Your own copyright statement to Your modifications and
+   may provide additional or different license terms and conditions
+   for use, reproduction, or distribution of Your modifications, or
+   for any such Derivative Works as a whole, provided Your use,
+   reproduction, and distribution of the Work otherwise complies with
+   the conditions stated in this License.
+
+5. Submission of Contributions. Unless You explicitly state otherwise,
+   any Contribution intentionally submitted for inclusion in the Work
+   by You to the Licensor shall be under the terms and conditions of
+   this License, without any additional terms or conditions.
+   Notwithstanding the above, nothing herein shall supersede or modify
+   the terms of any separate license agreement you may have executed
+   with Licensor regarding such Contributions.
+
+6. Trademarks. This License does not grant permission to use the trade
+   names, trademarks, service marks, or product names of the Licensor,
+   except as required for reasonable and customary use in describing the
+   origin of the Work and reproducing the content of the NOTICE file.
+
+7. Disclaimer of Warranty. Unless required by applicable law or
+   agreed to in writing, Licensor provides the Work (and each
+   Contributor provides its Contributions) on an "AS IS" BASIS,
+   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+   implied, including, without limitation, any warranties or conditions
+   of TITLE, NON-INFRINGEMENT, MERCHANTABILITY, or FITNESS FOR A
+   PARTICULAR PURPOSE. You are solely responsible for determining the
+   appropriateness of using or redistributing the Work and assume any
+   risks associated with Your exercise of permissions under this License.
+
+8. Limitation of Liability. In no event and under no legal theory,
+   whether in tort (including negligence), contract, or otherwise,
+   unless required by applicable law (such as deliberate and grossly
+   negligent acts) or agreed to in writing, shall any Contributor be
+   liable to You for damages, including any direct, indirect, special,
+   incidental, or consequential damages of any character arising as a
+   result of this License or out of the use or inability to use the
+   Work (including but not limited to damages for loss of goodwill,
+   work stoppage, computer failure or malfunction, or any and all
+   other commercial damages or losses), even if such Contributor
+   has been advised of the possibility of such damages.
+
+9. Accepting Warranty or Additional Liability. While redistributing
+   the Work or Derivative Works thereof, You may choose to offer,
+   and charge a fee for, acceptance of support, warranty, indemnity,
+   or other liability obligations and/or rights consistent with this
+   License. However, in accepting such obligations, You may act only
+   on Your own behalf and on Your sole responsibility, not on behalf
+   of any other Contributor, and only if You agree to indemnify,
+   defend, and hold each Contributor harmless for any liability
+   incurred by, or claims asserted against, such Contributor by reason
+   of your accepting any such warranty or additional liability.
+
+END OF TERMS AND CONDITIONS
+
+APPENDIX: How to apply the Apache License to your work.
+
+   To apply the Apache License to your work, attach the following
+   boilerplate notice, with the fields enclosed by brackets "[]"
+   replaced with your own identifying information. (Don't include
+   the brackets!)  The text should be enclosed in the appropriate
+   comment syntax for the file format. We also recommend that a
+   file or class name and description of purpose be included on the
+   same "printed page" as the copyright notice for easier
+   identification within third-party archives.
+
+Copyright [yyyy] [name of copyright owner]
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+    http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.
@@ -0,0 +1,586 @@
+apache2 Cookbook
+================
+[![Build Status](https://secure.travis-ci.org/opscode-cookbooks/apache2.png?branch=master)](http://travis-ci.org/opscode-cookbooks/apache2)
+
+
+This cookbook provides a complete Debian/Ubuntu style Apache HTTPD
+configuration. Non-Debian based distributions such as Red Hat/CentOS,
+ArchLinux and others supported by this cookbook will have a
+configuration that mimics Debian/Ubuntu style as it is easier to
+manage with Chef.
+
+Debian-style Apache configuration uses scripts to manage modules and
+sites (vhosts). The scripts are:
+
+* a2ensite
+* a2dissite
+* a2enmod
+* a2dismod
+
+This cookbook ships with templates of these scripts for non
+Debian/Ubuntu platforms. The scripts are used in the __Definitions__
+below.
+
+Requirements
+============
+
+## Ohai and Chef:
+
+* Ohai: 0.6.12+
+* Chef: 0.10.10+
+
+As of v1.2.0, this cookbook makes use of `node['platform_family']` to
+simplify platform selection logic. This attribute was introduced in
+Ohai v0.6.12. The recipe methods were introduced in Chef v0.10.10. If
+you must run an older version of Chef or Ohai, use [version 1.1.16 of
+this cookbook](http://community.opscode.com/cookbooks/apache2/versions/1_1_16/downloads).
+
+## Cookbooks:
+
+This cookbook doesn't have direct dependencies on other cookbooks, as
+none are needed for the default recipe or the general use cases.
+
+Depending on your OS configuration and security policy, you may need
+additional recipes or cookbooks for this cookbook's recipes to
+converge on the node. In particular, the following Operating System
+settings may affect the behavior of this cookbook:
+
+* apt cache outdated
+* SELinux enabled
+* IPtables
+* Compile tools
+* 3rd party repositories
+
+On Ubuntu/Debian, use Opscode's `apt` cookbook to ensure the package
+cache is updated so Chef can install packages, or consider putting
+apt-get in your bootstrap process or
+[knife bootstrap template](http://wiki.opscode.com/display/chef/Knife+Bootstrap).
+
+On RHEL, SELinux is enabled by default. The `selinux` cookbook
+contains a `permissive` recipe that can be used to set SELinux to
+"Permissive" state. Otherwise, additional recipes need to be created
+by the user to address SELinux permissions.
+
+The easiest but **certainly not ideal way** to deal with IPtables is
+to flush all rules. Opscode does provide an `iptables` cookbook but is
+migrating from the approach used there to a more robust solution
+utilizing a general "firewall" LWRP that would have an "iptables"
+provider. Alternately, you can use ufw, with Opscode's `ufw` and
+`firewall` cookbooks to set up rules. See those cookbooks' READMEs for
+documentation.
+
+Build/compile tools may not be installed on the system by default.
+Some recipes (e.g., `apache2::mod_auth_openid`) build the module from
+source. Use Opscode's `build-essential` cookbook to get essential
+build packages installed.
+
+On ArchLinux, if you are using the `apache2::mod_auth_openid` recipe,
+you also need the `pacman` cookbook for the `pacman_aur` LWRP. Put
+`recipe[pacman]` on the node's expanded run list (on the node or in a
+role). This is not an explicit dependency because it is only required
+for this single recipe and platform; the pacman default recipe
+performs `pacman -Sy` to keep pacman's package cache updated.
+
+The `apache2::god_monitor` recipe uses a definition from the `god`
+cookbook. Include `recipe[god]` in the node's expanded run list to
+ensure that the cookbook is available to the node, and to set up `god`.
+
+## Platforms:
+
+The following platforms and versions are tested and supported using
+Opscode's [test-kitchen](http://github.com/opscode/test-kitchen).
+
+* Ubuntu 10.04, 12.04
+* CentOS 5.8, 6.3
+
+The following platform families are supported in the code, and are
+assumed to work based on the successful testing on Ubuntu and CentOS.
+
+* Debian
+* Red Hat (rhel)
+* Fedora
+* Amazon Linux
+
+The following platforms are also supported in the code, have been
+tested manually but are not tested under test-kitchen.
+
+* SUSE/OpenSUSE
+* ArchLinux
+* FreeBSD
+
+### Notes for RHEL Family:
+
+On Red Hat Enterprise Linux and derivatives, the EPEL repository may
+be necessary to install packages used in certain recipes. The
+`apache2::default` recipe, however, does not require any additional
+repositories. Opscode's `yum` cookbook contains a recipe to add the
+EPEL repository. See __Examples__ for more information.
+
+### Notes for FreeBSD:
+
+The `apache2::mod_php5` recipe depends on the `freebsd` cookbook,
+which it uses to set the correct options for compiling the `php5` port
+from sources. You need to ensure the `freebsd` is in the expanded run
+list, or this recipe will fail. We don't set an explicit dependency
+because we feel the `freebsd` cookbook is something users would want
+on their nodes, and due to the generality of this cookbook we don't
+want additional specific dependencies.
+
+Tests
+=====
+
+This cookbook in the
+[source repository](https://github.com/opscode-cookbooks/apache2)
+contains minitest and cucumber tests. This is an initial proof of
+concept that will be fleshed out with more supporting infrastructure
+at a future time.
+
+Please see the CONTRIBUTING file for information on how to add tests
+for your contributions.
+
+Attributes
+==========
+
+This cookbook uses many attributes, broken up into a few different
+kinds.
+
+Platform specific
+-----------------
+
+In order to support the broadest number of platforms, several
+attributes are determined based on the node's platform. See the
+attributes/default.rb file for default values in the case statement at
+the top of the file.
+
+* `node['apache']['dir']` - Location for the Apache configuration
+* `node['apache']['log_dir']` - Location for Apache logs
+* `node['apache']['error_log']` - Location for the default error log
+* `node['apache']['access_log']` - Location for the default access log
+* `node['apache']['user']` - User Apache runs as
+* `node['apache']['group']` - Group Apache runs as
+* `node['apache']['binary']` - Apache httpd server daemon
+* `node['apache']['icondir']` - Location for icons
+* `node['apache']['cache_dir']` - Location for cached files used by Apache itself or recipes
+* `node['apache']['pid_file']` - Location of the PID file for Apache httpd
+* `node['apache']['lib_dir']` - Location for shared libraries
+* `node['apache']['default_site_enabled']` - Default site enabled. Default is false.
+* `node['apache']['ext_status']` - if true, enables ExtendedStatus for `mod_status`
+
+General settings
+----------------
+
+These are general settings used in recipes and templates. Default
+values are noted.
+
+* `node['apache']['listen_addresses']` - Addresses that httpd should listen on. Default is any ("*").
+* `node['apache']['listen_ports']` - Ports that httpd should listen on. Default is port 80.
+* `node['apache']['contact']` - Value for ServerAdmin directive. Default "ops@example.com".
+* `node['apache']['timeout']` - Value for the Timeout directive. Default is 300.
+* `node['apache']['keepalive']` - Value for the KeepAlive directive. Default is On.
+* `node['apache']['keepaliverequests']` - Value for MaxKeepAliveRequests. Default is 100.
+* `node['apache']['keepalivetimeout']` - Value for the KeepAliveTimeout directive. Default is 5.
+* `node['apache']['default_modules']` - Array of module names. Can take "mod_FOO" or "FOO" as names, where FOO is the apache module, e.g. "`mod_status`" or "`status`".
+
+The modules listed in `default_modules` will be included as recipes in `recipe[apache::default]`.
+
+Prefork attributes
+------------------
+
+Prefork attributes are used for tuning the Apache HTTPD prefork MPM
+configuration.
+
+* `node['apache']['prefork']['startservers']` - initial number of server processes to start. Default is 16.
+* `node['apache']['prefork']['minspareservers']` - minimum number of spare server processes. Default 16.
+* `node['apache']['prefork']['maxspareservers']` - maximum number of spare server processes. Default 32.
+* `node['apache']['prefork']['serverlimit']` - upper limit on configurable server processes. Default 400.
+* `node['apache']['prefork']['maxclients']` - Maximum number of simultaneous connections.
+* `node['apache']['prefork']['maxrequestsperchild']` - Maximum number of request a child process will handle. Default 10000.
+
+Worker attributes
+-----------------
+
+Worker attributes are used for tuning the Apache HTTPD worker MPM
+configuration.
+
+* `node['apache']['worker']['startservers']` - Initial number of server processes to start. Default 4
+* `node['apache']['worker']['serverlimit']` - upper limit on configurable server processes. Default 16.
+* `node['apache']['worker']['maxclients']` - Maximum number of simultaneous connections. Default 1024.
+* `node['apache']['worker']['minsparethreads']` - Minimum number of spare worker threads. Default 64
+* `node['apache']['worker']['maxsparethreads']` - Maximum number of spare worker threads. Default 192.
+* `node['apache']['worker']['maxrequestsperchild']` - Maximum number of requests a child process will handle.
+
+mod\_auth\_openid attributes
+----------------------------
+
+The following attributes are in the `attributes/mod_auth_openid.rb`
+file. Like all Chef attributes files, they are loaded as well, but
+they're logistically unrelated to the others, being specific to the
+`mod_auth_openid` recipe.
+
+* `node['apache']['mod_auth_openid']['checksum']` - sha256sum of the tarball containing the source.
+* `node['apache']['mod_auth_openid']['ref']` - Any sha, tag, or branch found from https://github.com/bmuller/mod_auth_openid
+* `node['apache']['mod_auth_openid']['cache_dir']` - the cache directory is where the sqlite3 database is stored. It is separate so it can be managed as a directory resource.
+* `node['apache']['mod_auth_openid']['dblocation']` - filename of the sqlite3 database used for directive `AuthOpenIDDBLocation`, stored in the `cache_dir` by default.
+* `node['apache']['mod_auth_openid']['configure_flags']` - optional array of configure flags passed to the `./configure` step in the compilation of the module.
+
+mod\_ssl attributes
+-------------------
+
+* `node['apache']['mod_ssl']['cipher_suite']` - sets the
+  SSLCiphersuite value to the specified string. The default is
+  considered "sane" but you may need to change it for your local
+  security policy, e.g. if you have PCI-DSS requirements. Additional
+  commentary on the
+  [original pull request](https://github.com/opscode-cookbooks/apache2/pull/15#commitcomment-1605406).
+
+Recipes
+=======
+
+Most of the recipes in the cookbook are for enabling Apache modules.
+Where additional configuration or behavior is used, it is documented
+below in more detail.
+
+The following recipes merely enable the specified module: `mod_alias`,
+`mod_basic`, `mod_digest`, `mod_authn_file`, `mod_authnz_ldap`,
+`mod_authz_default`, `mod_authz_groupfile`, `mod_authz_host`,
+`mod_authz_user`, `mod_autoindex`, `mod_cgi`, `mod_dav_fs`,
+`mod_dav_svn`, `mod_deflate`, `mod_dir`, `mod_env`, `mod_expires`,
+`mod_headers`, `mod_ldap`, `mod_log_config`, `mod_mime`,
+`mod_negotiation`, `mod_proxy`, `mod_proxy_ajp`, `mod_proxy_balancer`,
+`mod_proxy_connect`, `mod_proxy_http`, `mod_python`, `mod_rewrite`,
+`mod_setenvif`, `mod_status`, `mod_wsgi`, `mod_xsendfile`.
+
+On RHEL Family distributions, certain modules ship with a config file
+with the package. The recipes here may delete those configuration
+files to ensure they don't conflict with the settings from the
+cookbook, which will use per-module configuration in
+`/etc/httpd/mods-enabled`.
+
+default
+-------
+
+The default recipe does a number of things to set up Apache HTTPd. It
+also includes a number of modules based on the attribute
+`node['apache']['default_modules']` as recipes.
+
+logrotate
+---------
+
+Logrotate adds a logrotate entry for your apache2 logs. This recipe
+requires the `logrotate` cookbook; ensure that `recipe[logrotate]` is
+in the node's expanded run list.
+
+mod\_auth\_cas
+--------------
+
+This recipe installs the proper package and enables the `auth_cas`
+module. It can install from source or package. Package is the default,
+set the attribute `node['apache']['mod_auth_cas']['from_source']` to
+true to enable source installation. Modify the version to install by
+changing the attribute
+`node['apache']['mod_auth_cas']['source_revision']`. It is a version
+tag by default, but could be master, or another tag, or branch.
+
+The module configuration is written out with the `CASCookiePath` set,
+otherwise an error loading the module may cause Apache to not start.
+
+**Note**: This recipe does not work on EL 6 platforms unless
+epel-testing repository is enabled (outside the scope of this
+cookbook), or the package version 1.0.8.1-3.el6 or higher is otherwise
+available to the system due to this bug:
+
+https://bugzilla.redhat.com/show_bug.cgi?format=multiple&id=708550
+
+mod\_auth\_openid
+-----------------
+
+**Changed via COOK-915**
+
+This recipe compiles the module from source. In addition to
+`build-essential`, some other packages are included for installation
+like the GNU C++ compiler and development headers.
+
+To use the module in your own cookbooks to authenticate systems using
+OpenIDs, specify an array of OpenIDs that are allowed to authenticate
+with the attribute `node['apache']['allowed_openids']`. Use the
+following in a vhost to protect with OpenID authentication:
+
+    AuthType OpenID require user <%= node['apache']['allowed_openids'].join(' ') %>
+    AuthOpenIDDBLocation <%= node['apache']['mod_auth_openid']['dblocation'] %>
+
+Change the DBLocation with the attribute as required; this file is in
+a different location than previous versions, see below. It should be a
+sane default for most platforms, though, see
+`attributes/mod_auth_openid.rb`.
+
+### Changes from COOK-915:
+
+* `AuthType OpenID` instead of `AuthOpenIDEnabled On`.
+* `require user` instead of `AuthOpenIDUserProgram`.
+* A bug(?) in `mod_auth_openid` causes it to segfault when attempting
+  to update the database file if the containing directory is not
+  writable by the HTTPD process owner (e.g., www-data), even if the
+  file is writable. In order to not interfere with other settings from
+  the default recipe in this cookbook, the db file is moved.
+
+mod\_fastcgi
+------------
+
+Install the fastcgi package and enable the module.
+
+Only work on Debian/Ubuntu
+
+mod\_fcgid
+----------
+
+Installs the fcgi package and enables the module. Requires EPEL on
+RHEL family.
+
+On RHEL family, this recipe will delete the fcgid.conf and on version
+6+, create the /var/run/httpd/mod_fcgid` directory, which prevents the
+emergency error:
+
+    [emerg] (2)No such file or directory: mod_fcgid: Can't create shared memory for size XX bytes
+
+mod\_php5
+--------
+
+Simply installs the appropriate package on Debian, Ubuntu and
+ArchLinux.
+
+On Red Hat family distributions including Fedora, the php.conf that
+comes with the package is removed. On RHEL platforms less than v6, the
+`php53` package is used.
+
+mod\_ssl
+--------
+
+Besides installing and enabling `mod_ssl`, this recipe will append
+port 443 to the `node['apache']['listen_ports']` attribute array and
+update the ports.conf.
+
+god\_monitor
+------------
+
+Sets up a `god` monitor for Apache. External requirements are the
+`god` and `runit` cookbooks from Opscode. When using this recipe,
+include `recipe[god]` in the node's expanded run list to ensure the
+client downloads it; `god` depends on runit so that will also be
+downloaded.
+
+**Note** This recipe is not tested under test-kitchen yet and is
+  pending fix in COOK-744.
+
+Definitions
+===========
+
+The cookbook provides a few definitions. At some point in the future
+these definitions may be refactored into lightweight resources and
+providers as suggested by
+[foodcritic rule FC015](http://acrmp.github.com/foodcritic/#FC015).
+
+apache\_conf
+------------
+
+Sets up configuration file for an Apache module from a template. The
+template should be in the same cookbook where the definition is used.
+This is used by the `apache_module` definition and is not often used
+directly.
+
+This will use a template resource to write the module's configuration
+file in the `mods-available` under the Apache configuration directory
+(`node['apache']['dir']`). This is a platform-dependent location. See
+__apache\_module__.
+
+### Parameters:
+
+* `name` - Name of the template. When used from the `apache_module`,
+  it will use the same name as the module.
+
+### Examples:
+
+Create `#{node['apache']['dir']}/mods-available/alias.conf`.
+
+    apache_conf "alias"
+
+apache\_module
+--------------
+
+Enable or disable an Apache module in
+`#{node['apache']['dir']}/mods-available` by calling `a2enmod` or
+`a2dismod` to manage the symbolic link in
+`#{node['apache']['dir']}/mods-enabled`. If the module has a
+configuration file, a template should be created in the cookbook where
+the definition is used. See __Examples__.
+
+### Parameters:
+
+* `name` - Name of the module enabled or disabled with the `a2enmod` or `a2dismod` scripts.
+* `enable` - Default true, which uses `a2enmod` to enable the module. If false, the module will be disabled with `a2dismod`.
+* `conf` - Default false. Set to true if the module has a config file, which will use `apache_conf` for the file.
+* `filename` - specify the full name of the file, e.g.
+
+### Examples:
+
+Enable the ssl module, which also has a configuration template in `templates/default/mods/ssl.conf.erb`.
+
+    apache_module "ssl" do
+      conf true
+    end
+
+Enable the php5 module, which has a different filename than the module default:
+
+    apache_module "php5" do
+      filename "libphp5.so"
+    end
+
+Disable a module:
+
+    apache_module "disabled_module" do
+      enable false
+    end
+
+See the recipes directory for many more examples of `apache_module`.
+
+apache\_site
+------------
+
+Enable or disable a VirtualHost in
+`#{node['apache']['dir']}/sites-available` by calling a2ensite or
+a2dissite to manage the symbolic link in
+`#{node['apache']['dir']}/sites-enabled`.
+
+The template for the site must be managed as a separate resource. To
+combine the template with enabling a site, see `web_app`.
+
+### Parameters:
+
+* `name` - Name of the site.
+* `enable` - Default true, which uses `a2ensite` to enable the site. If false, the site will be disabled with `a2dissite`.
+
+web\_app
+--------
+
+Manage a template resource for a VirtualHost site, and enable it with
+`apache_site`. This is commonly done for managing web applications
+such as Ruby on Rails, PHP or Django, and the default behavior
+reflects that. However it is flexible.
+
+This definition includes some recipes to make sure the system is
+configured to have Apache and some sane default modules:
+
+* `apache2`
+* `apache2::mod_rewrite`
+* `apache2::mod_deflate`
+* `apache2::mod_headers`
+
+It will then configure the template (see __Parameters__ and
+__Examples__ below), and enable or disable the site per the `enable`
+parameter.
+
+### Parameters:
+
+Current parameters used by the definition:
+
+* `name` - The name of the site. The template will be written to
+  `#{node['apache']['dir']}/sites-available/#{params['name']}.conf`
+* `cookbook` - Optional. Cookbook where the source template is. If
+  this is not defined, Chef will use the named template in the
+  cookbook where the definition is used.
+* `template` - Default `web_app.conf.erb`, source template file.
+* `enable` - Default true. Passed to the `apache_site` definition.
+
+Additional parameters can be defined when the definition is called in
+a recipe, see __Examples__.
+
+### Examples:
+
+All parameters are passed into the template. You can use whatever you
+like. The apache2 cookbook comes with a `web_app.conf.erb` template as
+an example. The following parameters are used in the template:
+
+* `server_name` - ServerName directive.
+* `server_aliases` - ServerAlias directive. Must be an array of aliases.
+* `docroot` - DocumentRoot directive.
+* `application_name` - Used in RewriteLog directive. Will be set to the `name` parameter.
+* `directory_index` - Allow overriding the default DirectoryIndex setting, optional
+* `directory_options` - Override Options on the docroot, for example to add parameters like Includes or Indexes, optional.
+* `allow_override` - Modify the AllowOverride directive on the docroot to support apps that need .htaccess to modify configuration or require authentication.
+
+To use the default web_app, for example:
+
+    web_app "my_site" do
+      server_name node['hostname']
+      server_aliases [node['fqdn'], "my-site.example.com"]
+      docroot "/srv/www/my_site"
+    end
+
+The parameters specified will be used as:
+
+* `@params[:server_name]`
+* `@params[:server_aliases]`
+* `@params[:docroot]`
+
+In the template. When you write your own, the `@` is significant.
+
+For more information about Definitions and parameters, see the
+[Chef Wiki](http://wiki.opscode.com/display/chef/Definitions)
+
+Usage
+=====
+
+Using this cookbook is relatively straightforward. Add the desired
+recipes to the run list of a node, or create a role. Depending on your
+environment, you may have multiple roles that use different recipes
+from this cookbook. Adjust any attributes as desired. For example, to
+create a basic role for web servers that provide both HTTP and HTTPS:
+
+    % cat roles/webserver.rb
+    name "webserver"
+    description "Systems that serve HTTP and HTTPS"
+    run_list(
+      "recipe[apache2]",
+      "recipe[apache2::mod_ssl]"
+    )
+    default_attributes(
+      "apache" => {
+        "listen_ports" => ["80", "443"]
+      }
+    )
+
+For examples of using the definitions in your own recipes, see their
+respective sections above.
+
+License and Authors
+===================
+
+* Author:: Adam Jacob <adam@opscode.com>
+* Author:: Joshua Timberman <joshua@opscode.com>
+* Author:: Bryan McLellan <bryanm@widemile.com>
+* Author:: Dave Esposito <esposito@espolinux.corpnet.local>
+* Author:: David Abdemoulaie <github@hobodave.com>
+* Author:: Edmund Haselwanter <edmund@haselwanter.com>
+* Author:: Eric Rochester <err8n@virginia.edu>
+* Author:: Jim Browne <jbrowne@42lines.net>
+* Author:: Matthew Kent <mkent@magoazul.com>
+* Author:: Nathen Harvey <nharvey@customink.com>
+* Author:: Ringo De Smet <ringo.de.smet@amplidata.com>
+* Author:: Sean OMeara <someara@opscode.com>
+* Author:: Seth Chisamore <schisamo@opscode.com>
+* Author:: Gilles Devaux <gilles@peerpong.com>
+
+* Copyright:: 2009-2012, Opscode, Inc
+* Copyright:: 2011, Atriso
+* Copyright:: 2011, CustomInk, LLC.
+
+Licensed under the Apache License, Version 2.0 (the "License");
+you may not use this file except in compliance with the License.
+You may obtain a copy of the License at
+
+    http://www.apache.org/licenses/LICENSE-2.0
+
+Unless required by applicable law or agreed to in writing, software
+distributed under the License is distributed on an "AS IS" BASIS,
+WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+See the License for the specific language governing permissions and
+limitations under the License.
@@ -0,0 +1,53 @@
+This cookbook uses a variety of testing components:
+
+- Unit tests: [ChefSpec](https://github.com/acrmp/chefspec)
+- Integration tests: [Test Kitchen](https://github.com/opscode/test-kitchen)
+- Chef Style lints: [Foodcritic](https://github.com/acrmp/foodcritic)
+- Ruby Style lints: [Rubocop](https://github.com/bbatsov/rubocop)
+
+
+Prerequisites
+-------------
+To develop on this cookbook, you must have a sane Ruby 1.9+ environment. Given the nature of this installation process (and it's variance across multiple operating systems), we will leave this installation process to the user.
+
+You must also have `bundler` installed:
+
+    $ gem install bundler
+
+You must also have Vagrant and VirtualBox installed:
+
+- [Vagrant](https://vagrantup.com)
+- [VirtualBox](https://virtualbox.org)
+
+Once installed, you must install the `vagrant-berkshelf` plugin:
+
+    $ vagrant plugin install vagrant-berkshelf
+
+
+Development
+-----------
+1. Clone the git repository from GitHub:
+
+        $ git clone git@github.com:opscode-cookbooks/COOKBOOK.git
+
+2. Install the dependencies using bundler:
+
+        $ bundle install
+
+3. Create a branch for your changes:
+
+        $ git checkout -b my_bug_fix
+
+4. Make any changes
+5. Write tests to support those changes. It is highly recommended you write both unit and integration tests.
+6. Run the tests:
+    - `bundle exec rspec`
+    - `bundle exec foodcritic .`
+    - `bundle exec rubocop`
+    - `bundle exec kitchen test`
+
+7. Assuming the tests pass, open a Pull Request on GitHub
+8. Open a JIRA ticket for this compontent, linking the JIRA ticket to the Pull Request and visa versa.
+9. Mark the JIRA ticket as "Fix Provided"
+
+For more information, see [Opscode's Contribution Guidelines](https://wiki.opscode.com/display/chef/How+to+Contribute).
@@ -0,0 +1,177 @@
+#
+# Cookbook Name:: apache2
+# Attributes:: apache
+#
+# Copyright 2008-2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+default['apache']['root_group'] = 'root'
+
+# Where the various parts of apache are
+case node['platform']
+when 'redhat', 'centos', 'scientific', 'fedora', 'suse', 'amazon', 'oracle'
+  default['apache']['package']     = 'httpd'
+  default['apache']['dir']         = '/etc/httpd'
+  default['apache']['log_dir']     = '/var/log/httpd'
+  default['apache']['error_log']   = 'error.log'
+  default['apache']['access_log']  = 'access.log'
+  default['apache']['user']        = 'apache'
+  default['apache']['group']       = 'apache'
+  default['apache']['binary']      = '/usr/sbin/httpd'
+  default['apache']['docroot_dir'] = '/var/www/html'
+  default['apache']['cgibin_dir']  = '/var/www/cgi-bin'
+  default['apache']['icondir']     = '/var/www/icons'
+  default['apache']['cache_dir']   = '/var/cache/httpd'
+  default['apache']['pid_file']    = if node['platform_version'].to_f >= 6
+                                       '/var/run/httpd/httpd.pid'
+                                     else
+                                       '/var/run/httpd.pid'
+                                     end
+  default['apache']['lib_dir']     = node['kernel']['machine'] =~ /^i[36]86$/ ? '/usr/lib/httpd' : '/usr/lib64/httpd'
+  default['apache']['libexecdir']  = "#{node['apache']['lib_dir']}/modules"
+  default['apache']['default_site_enabled'] = false
+when 'debian', 'ubuntu'
+  default['apache']['package']     = 'apache2'
+  default['apache']['dir']         = '/etc/apache2'
+  default['apache']['log_dir']     = '/var/log/apache2'
+  default['apache']['error_log']   = 'error.log'
+  default['apache']['access_log']  = 'access.log'
+  default['apache']['user']        = 'www-data'
+  default['apache']['group']       = 'www-data'
+  default['apache']['binary']      = '/usr/sbin/apache2'
+  default['apache']['docroot_dir'] = '/var/www'
+  default['apache']['cgibin_dir']  = '/usr/lib/cgi-bin'
+  default['apache']['icondir']     = '/usr/share/apache2/icons'
+  default['apache']['cache_dir']   = '/var/cache/apache2'
+  default['apache']['pid_file']    = '/var/run/apache2.pid'
+  default['apache']['lib_dir']     = '/usr/lib/apache2'
+  default['apache']['libexecdir']  = "#{node['apache']['lib_dir']}/modules"
+  default['apache']['default_site_enabled'] = false
+when 'arch'
+  default['apache']['package']     = 'apache'
+  default['apache']['dir']         = '/etc/httpd'
+  default['apache']['log_dir']     = '/var/log/httpd'
+  default['apache']['error_log']   = 'error.log'
+  default['apache']['access_log']  = 'access.log'
+  default['apache']['user']        = 'http'
+  default['apache']['group']       = 'http'
+  default['apache']['binary']      = '/usr/sbin/httpd'
+  default['apache']['docroot_dir'] = '/srv/http'
+  default['apache']['cgibin_dir']  = '/usr/share/httpd/cgi-bin'
+  default['apache']['icondir']     = '/usr/share/httpd/icons'
+  default['apache']['cache_dir']   = '/var/cache/httpd'
+  default['apache']['pid_file']    = '/var/run/httpd/httpd.pid'
+  default['apache']['lib_dir']     = '/usr/lib/httpd'
+  default['apache']['libexecdir']  = "#{node['apache']['lib_dir']}/modules"
+  default['apache']['default_site_enabled'] = false
+when 'freebsd'
+  default['apache']['package']     = 'apache22'
+  default['apache']['dir']         = '/usr/local/etc/apache22'
+  default['apache']['log_dir']     = '/var/log'
+  default['apache']['error_log']   = 'httpd-error.log'
+  default['apache']['access_log']  = 'httpd-access.log'
+  default['apache']['root_group']  = 'wheel'
+  default['apache']['user']        = 'www'
+  default['apache']['group']       = 'www'
+  default['apache']['binary']      = '/usr/local/sbin/httpd'
+  default['apache']['docroot_dir'] = '/usr/local/www/apache22/data'
+  default['apache']['cgibin_dir']  = '/usr/local/www/apache22/cgi-bin'
+  default['apache']['icondir']     = '/usr/local/www/apache22/icons'
+  default['apache']['cache_dir']   = '/var/run/apache22'
+  default['apache']['pid_file']    = '/var/run/httpd.pid'
+  default['apache']['lib_dir']     = '/usr/local/libexec/apache22'
+  default['apache']['libexecdir']  = node['apache']['lib_dir']
+  default['apache']['default_site_enabled'] = false
+else
+  default['apache']['dir']         = '/etc/apache2'
+  default['apache']['log_dir']     = '/var/log/apache2'
+  default['apache']['error_log']   = 'error.log'
+  default['apache']['access_log']  = 'access.log'
+  default['apache']['user']        = 'www-data'
+  default['apache']['group']       = 'www-data'
+  default['apache']['binary']      = '/usr/sbin/apache2'
+  default['apache']['docroot_dir'] = '/var/www'
+  default['apache']['cgibin_dir']  = '/usr/lib/cgi-bin'
+  default['apache']['icondir']     = '/usr/share/apache2/icons'
+  default['apache']['cache_dir']   = '/var/cache/apache2'
+  default['apache']['pid_file']    = 'logs/httpd.pid'
+  default['apache']['lib_dir']     = '/usr/lib/apache2'
+  default['apache']['libexecdir']  = "#{node['apache']['lib_dir']}/modules"
+  default['apache']['default_site_enabled'] = false
+end
+
+###
+# These settings need the unless, since we want them to be tunable,
+# and we don't want to override the tunings.
+###
+
+# General settings
+default['apache']['listen_addresses']  = %w[*]
+default['apache']['listen_ports']      = %w[80]
+default['apache']['contact']           = 'ops@example.com'
+default['apache']['timeout']           = 300
+default['apache']['keepalive']         = 'On'
+default['apache']['keepaliverequests'] = 100
+default['apache']['keepalivetimeout']  = 5
+
+# Security
+default['apache']['servertokens']    = 'Prod'
+default['apache']['serversignature'] = 'On'
+default['apache']['traceenable']     = 'On'
+
+# mod_auth_openids
+default['apache']['allowed_openids'] = []
+
+# mod_status Allow list, space seprated list of allowed entries.
+default['apache']['status_allow_list'] = 'localhost ip6-localhost'
+
+# mod_status ExtendedStatus, set to 'true' to enable
+default['apache']['ext_status'] = false
+
+# mod_info Allow list, space seprated list of allowed entries.
+default['apache']['info_allow_list'] = 'localhost ip6-localhost'
+
+# Prefork Attributes
+default['apache']['prefork']['startservers']        = 16
+default['apache']['prefork']['minspareservers']     = 16
+default['apache']['prefork']['maxspareservers']     = 32
+default['apache']['prefork']['serverlimit']         = 400
+default['apache']['prefork']['maxclients']          = 400
+default['apache']['prefork']['maxrequestsperchild'] = 10_000
+
+# Worker Attributes
+default['apache']['worker']['startservers']        = 4
+default['apache']['worker']['serverlimit']         = 16
+default['apache']['worker']['maxclients']          = 1024
+default['apache']['worker']['minsparethreads']     = 64
+default['apache']['worker']['maxsparethreads']     = 192
+default['apache']['worker']['threadsperchild']     = 64
+default['apache']['worker']['maxrequestsperchild'] = 0
+
+# mod_proxy settings
+default['apache']['proxy']['order']      = 'deny,allow'
+default['apache']['proxy']['deny_from']  = 'all'
+default['apache']['proxy']['allow_from'] = 'none'
+
+# Default modules to enable via include_recipe
+
+default['apache']['default_modules'] = %w[
+  status alias auth_basic authn_file authz_default authz_groupfile authz_host authz_user autoindex
+  dir env mime negotiation setenvif
+]
+
+%w[log_config logio].each do |log_mod|
+  default['apache']['default_modules'] << log_mod if %w[rhel fedora suse arch freebsd].include?(node['platform_family'])
+end
@@ -0,0 +1,21 @@
+#
+# Cookbook Name:: apache2
+# Attributes:: mod_auth_cas
+#
+# Copyright 2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+default['apache']['mod_auth_cas']['from_source']     = false
+default['apache']['mod_auth_cas']['source_revision'] = 'v1.0.8.1'
@@ -0,0 +1,33 @@
+#
+# Cookbook Name:: apache2
+# Attributes:: mod_auth_cas
+#
+# Copyright 2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+default['apache']['mod_auth_openid']['ref']        = '95043901eab868400937642d9bc55d17e9dd069f'
+default['apache']['mod_auth_openid']['source_url'] = "https://github.com/bmuller/mod_auth_openid/archive/#{node['apache']['mod_auth_openid']['ref']}.tar.gz"
+default['apache']['mod_auth_openid']['cache_dir']  = '/var/cache/mod_auth_openid'
+default['apache']['mod_auth_openid']['dblocation'] = "#{node['apache']['mod_auth_openid']['cache_dir']}/mod_auth_openid.db"
+
+case node['platform_family']
+when 'freebsd'
+  default['apache']['mod_auth_openid']['configure_flags'] = [
+    'CPPFLAGS=-I/usr/local/include',
+    'LDFLAGS=-I/usr/local/lib -lsqlite3'
+  ]
+else
+  default['apache']['mod_auth_openid']['configure_flags'] = []
+end
@@ -0,0 +1,20 @@
+#
+# Cookbook Name:: apache2
+# Attributes:: mod_fastcgi
+#
+# Copyright 2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+default['apache']['mod_fastcgi']['download_url'] = 'http://www.fastcgi.com/dist/mod_fastcgi-current.tar.gz'
@@ -0,0 +1,20 @@
+#
+# Cookbook Name:: apache2
+# Attributes:: mod_ssl
+#
+# Copyright 2012-2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+default['apache']['mod_ssl']['cipher_suite'] = 'RC4-SHA:HIGH:!ADH'
@@ -0,0 +1,26 @@
+#
+# Cookbook Name:: apache2
+# Definition:: apache_conf
+#
+# Copyright 2008-20013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+define :apache_conf do
+  template "#{node['apache']['dir']}/mods-available/#{params[:name]}.conf" do
+    source   "mods/#{params[:name]}.conf.erb"
+    mode     '0644'
+    notifies :restart, 'service[apache2]'
+  end
+end
@@ -0,0 +1,51 @@
+#
+# Cookbook Name:: apache2
+# Definition:: apache_module
+#
+# Copyright 2008-2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+define :apache_module, :enable => true, :conf => false do
+  include_recipe 'apache2::default'
+
+  params[:filename]    = params[:filename] || "mod_#{params[:name]}.so"
+  params[:module_path] = params[:module_path] || "#{node['apache']['libexecdir']}/#{params[:filename]}"
+
+  apache_conf params[:name] if params[:conf]
+
+  if platform_family?('rhel', 'fedora', 'arch', 'suse', 'freebsd')
+    file "#{node['apache']['dir']}/mods-available/#{params[:name]}.load" do
+      content "LoadModule #{params[:name]}_module #{params[:module_path]}\n"
+      mode    '0644'
+    end
+  end
+
+  if params[:enable]
+    execute "a2enmod #{params[:name]}" do
+      command "/usr/sbin/a2enmod #{params[:name]}"
+      notifies :restart, 'service[apache2]'
+      not_if do
+        ::File.symlink?("#{node['apache']['dir']}/mods-enabled/#{params[:name]}.load") &&
+        (::File.exists?("#{node['apache']['dir']}/mods-available/#{params[:name]}.conf") ? ::File.symlink?("#{node['apache']['dir']}/mods-enabled/#{params[:name]}.conf") : true)
+      end
+    end
+  else
+    execute "a2dismod #{params[:name]}" do
+      command "/usr/sbin/a2dismod #{params[:name]}"
+      notifies :restart, 'service[apache2]'
+      only_if { ::File.symlink?("#{node['apache']['dir']}/mods-enabled/#{params[:name]}.load") }
+    end
+  end
+end
@@ -0,0 +1,43 @@
+#
+# Cookbook Name:: apache2
+# Definition:: apache_site
+#
+# Copyright 2008-2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+define :apache_site, :enable => true do
+  include_recipe 'apache2::default'
+
+  if params[:enable]
+    execute "a2ensite #{params[:name]}" do
+      command "/usr/sbin/a2ensite #{params[:name]}"
+      notifies :restart, 'service[apache2]'
+      not_if do
+        ::File.symlink?("#{node['apache']['dir']}/sites-enabled/#{params[:name]}") ||
+        ::File.symlink?("#{node['apache']['dir']}/sites-enabled/000-#{params[:name]}")
+      end
+      only_if { ::File.exists?("#{node['apache']['dir']}/sites-available/#{params[:name]}") }
+    end
+  else
+    execute "a2dissite #{params[:name]}" do
+      command "/usr/sbin/a2dissite #{params[:name]}"
+      notifies :restart, 'service[apache2]'
+      only_if do
+        ::File.symlink?("#{node['apache']['dir']}/sites-enabled/#{params[:name]}") ||
+        ::File.symlink?("#{node['apache']['dir']}/sites-enabled/000-#{params[:name]}")
+      end
+    end
+  end
+end
@@ -0,0 +1,48 @@
+#
+# Cookbook Name:: apache2
+# Definition:: web_app
+#
+# Copyright 2008-2013, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+define :web_app, :template => 'web_app.conf.erb', :enable => true do
+
+  application_name = params[:name]
+
+  include_recipe 'apache2::default'
+  include_recipe 'apache2::mod_rewrite'
+  include_recipe 'apache2::mod_deflate'
+  include_recipe 'apache2::mod_headers'
+
+  template "#{node['apache']['dir']}/sites-available/#{application_name}.conf" do
+    source   params[:template]
+    owner    'root'
+    group    node['apache']['root_group']
+    mode     '0644'
+    cookbook params[:cookbook] if params[:cookbook]
+    variables(
+      :application_name => application_name,
+      :params           => params
+    )
+    if ::File.exists?("#{node['apache']['dir']}/sites-enabled/#{application_name}.conf")
+      notifies :reload, 'service[apache2]'
+    end
+  end
+
+  site_enabled = params[:enable]
+  apache_site "#{params[:name]}.conf" do
+    enable site_enabled
+  end
+end
@@ -0,0 +1,41 @@
+#!/usr/bin/perl
+
+=begin
+
+Generates Ubuntu style module.load files.
+
+./apache2_module_conf_generate.pl /usr/lib64/httpd/modules /etc/httpd/mods-available
+
+ARGV[0] is the apache modules directory, ARGV[1] is where you want 'em.
+
+=cut
+
+use File::Find;
+
+use strict;
+use warnings;
+
+die "Must have '/path/to/modules' and '/path/to/modules.load'"
+  unless $ARGV[0] && $ARGV[1];
+
+find(
+  {
+    wanted => sub {
+      return 1 if $File::Find::name !~ /\.so$/;
+      my $modfile = $_;
+      $modfile =~ /(lib|mod_)(.+)\.so$/;
+      my $modname  = $2;
+      my $filename = "$ARGV[1]/$modname.load";
+      unless ( -f $filename ) {
+        open( FILE, ">", $filename ) or die "Cannot open $filename";
+        print FILE "LoadModule " . $modname . "_module $File::Find::name\n";
+        close(FILE);
+      }
+    },
+    follow => 1,
+  },
+  $ARGV[0]
+);
+
+exit 0;
+
@@ -0,0 +1,76 @@
+require File.expand_path('../support/helpers', __FILE__)
+
+describe 'apache2::default' do
+  include Helpers::Apache
+
+  it 'installs apache' do
+    package(node['apache']['package']).must_be_installed
+  end
+
+  it 'starts apache' do
+    apache_service.must_be_running
+  end
+
+  it 'enables apache' do
+    apache_service.must_be_enabled
+  end
+
+  it 'creates the conf.d directory' do
+    directory("#{node['apache']['dir']}/conf.d").must_exist.with(:mode, '755')
+  end
+
+  it 'creates the logs directory' do
+    directory(node['apache']['log_dir']).must_exist
+  end
+
+  it 'enables the default site unless it is disabled' do
+    skip unless node['apache']['default_site_enabled']
+    file("#{node['apache']['dir']}/sites-enabled/000-default").must_exist
+    file("#{node['apache']['dir']}/sites-available/default").must_exist
+  end
+
+  it 'ensures the debian-style apache module scripts are present' do
+    %w{a2ensite a2dissite a2enmod a2dismod}.each do |mod_script|
+      file("/usr/sbin/#{mod_script}").must_exist
+    end
+  end
+
+  it 'reports server name only, not detailed version info' do
+    assert_match(/^ServerTokens #{node['apache']['servertokens']} *$/, File.read("#{node['apache']['dir']}/conf.d/security"))
+  end
+
+  it 'listens on port 80' do
+    apache_configured_ports.must_include(80)
+  end
+
+  it 'only listens on port 443 when SSL is enabled' do
+    unless ran_recipe?('apache2::mod_ssl')
+      apache_configured_ports.wont_include(443)
+    end
+  end
+
+  it 'reports server name only, not detailed version info' do
+    file("#{node['apache']['dir']}/conf.d/security").must_match(/^ServerTokens #{node['apache']['servertokens']} *$/)
+  end
+
+  it 'enables default_modules' do
+    node['apache']['default_modules'].each do |a2mod|
+      apache_enabled_modules.must_include "#{a2mod}_module"
+    end
+  end
+
+  describe 'centos' do
+    it 'ensures no modules are loaded in conf.d' do
+      Dir["#{node['apache']['dir']}/conf.d/*"].each do |f|
+        file(f).wont_include 'LoadModule'
+      end
+    end
+  end
+
+  describe 'configuration' do
+    it { config.must_include '# Generated by Chef' }
+    it { config.must_include %Q{ServerRoot "#{node['apache']['dir']}"} }
+    it { config.must_include "Include #{node['apache']['dir']}/conf.d/" }
+    it { apache_config_parses? }
+  end
+end
@@ -0,0 +1,34 @@
+#
+# Author:: Joshua Timberman <joshua@opscode.com>
+# Copyright:: Copyright (c) 2012, Opscode, Inc.
+#
+# Licensed under the Apache License, Version 2.0 (the "License");
+# you may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#    http://www.apache.org/licenses/LICENSE-2.0
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+require File.expand_path('../support/helpers', __FILE__)
+
+describe 'apache2::god_monitor' do
+  include Helpers::Apache
+
+  it 'starts god service to supervise apache2' do
+    service('god').must_be_running
+  end
+
+  it 'creates the god service template for apache' do
+    file('/etc/god/conf.d/apache2.god').must_exist
+  end
+
+  it 'starts an apache2 service that works like a regular service' do
+    # to be implemented when COOK-744 is fixed
+  end
+end
@@ -0,0 +1,19 @@
+require File.expand_path('../support/helpers', __FILE__)
+
+describe 'apache2::mod_apreq2' do
+  include Helpers::Apache
+
+  it 'enables apreq_module' do
+    apache_enabled_modules.must_include 'apreq_module'
+  end
+
+  it 'symlinks the module on EL' do
+    skip unless %w[rhel fedora].include?(node['platform_family'])
+    libdir = node['kernel']['machine'] == 'x86_64' ? 'lib64' : 'lib'
+    link(
+      "/usr/#{libdir}/httpd/modules/mod_apreq.so"
+    ).must_exist.with(
+        :link_type, :symbolic).and(:to, "/usr/#{libdir}/httpd/modules/mod_apreq2.so"
+        )
+  end
+end
@@ -0,0 +1,10 @@
+require File.expand_path('../support/helpers', __FILE__)
+
+describe 'apache2::mod_auth_cas' do
+  include Helpers::Apache
+
+  it 'enables auth_cas_module' do
+    skip if %w[rhel fedora].include?(node['platform_family']) && node['platform_version'].to_f > 6.0
+    apache_enabled_modules.must_include 'auth_cas_module'
+  end
+end
--- a/Show More
+++ b/Show More
@@ -1 +1 @@
 .10
 .8.4