#!/bin/sh # # Copyright (c) 1999-2005 SWsoft Inc. # All rights reserved # # # Plesk script # remove_tmp_state() { if [ -d "/tmp/.state" ]; then rm -Rf "/tmp/.state" >> $product_log 2>&1 fi } # db_test test_query awk_script # Runs test_query and processes it with awk_script. If the output is # not empty, return 0, otherwise return 1. Hint: supply '1' for # awk_script to test just for the presence of any output. db_test() { local any_db= eval `sh_get_args '--any-db) any_db=yes;;'` local test_query="$1" local awk_script="$2" if [ -n "$any_db" ]; then local output="`mysql_raw_anydb -e \"$test_query\" 2>>\"$product_log\"`" else local output="`mysql_raw -e \"$test_query\" 2>>\"$product_log\"`" fi local status=$? if [ "$status" -ne 0 ]; then p_echo "$output" die "run the following SQL query: $1" fi echo -n "$output" | awk -F '\t' -- "$awk_script" | test `wc -l` -ne 0 } p_echo() { echo "$*" >> "$product_log" 2>&1 echo "$*" } pnnl_echo() { echo -n "$*" >> "$product_log" 2>&1 echo -n "$*" } die() { PACKAGE_SCRIPT_FAILED="$*" if [ "X$trigger_uninstall" != "X1" ]; then printf "\a\a" p_echo p_echo "ERROR while trying to $*" echo "Check the error reason(see log file: ${product_log}), fix and try again" p_echo if [ "X$do_patch" != "X1" -a "X$do_reconfigure" != "X1" ]; then p_echo "Aborting..." p_echo fi fi smart_undo_install selinux_close exit 1 } warn() { local inten inten="$1" p_echo p_echo "WARNING!" pnnl_echo "During the $inten found some problems" echo "(see log file: ${product_log})" p_echo p_echo "Continue..." p_echo } echo_try() { msg="$*" pnnl_echo " Trying to $msg... " } suc() { p_echo "done" } extract_report() { case "$1" in 0) p_echo " Extraction successfully completed" p_echo ;; *) p_echo p_echo "ERROR: something wrong with distribution archive file" p_echo "Exiting..." p_echo smart_undo_install exit 1 ;; esac } extract_mess() { p_echo p_echo p_echo " So, it's time to unpack distribution files " p_echo " All files will be extracted into $PRODUCT_ROOT_D directory" p_echo " This operation takes some time," p_echo " please, wait..." p_echo } product_extract() { extract_mess if [ ! -d $PRODUCT_ROOT_D ]; then mkdir -p $PRODUCT_ROOT_D; fi cd "/usr/local" p_echo "===> Checking integrity of package..." if [ -x /usr/bin/sum ] ; then sum=`tail +${installer_length} "$my_name" | /usr/bin/sum` sum1=`echo ${sum} | awk '{ print $1}'` sum2=`echo ${sum} | awk '{ print $2}'` if [ 0$sum1 -ne 0${package_sum1} -o 0$sum2 -ne 0${package_sum2} ]; then p_echo " Package file appears to be corrupted. Please download" p_echo " original file from download page." p_echo " Do not attempt to install this archive file." p_echo exit 1 fi else p_echo "Can't find /usr/bin/sum to do checksum. Continuing anyway." fi p_echo p_echo "===> Extracting distribution into $PRODUCT_ROOT_D directory..." exclude_files_list="/tmp/${PRODNAME}_${product_version}_upgrade_exclude_list" if [ "X$do_upgrade" != "X1" ]; then pnnl_echo >"$exclude_files_list" else cat > ${exclude_files_list} << EOF ./home/vhosts/default/htdocs/black_line.gif ./home/vhosts/default/htdocs/index.html ./home/vhosts/default/htdocs/logo.gif ./home/vhosts/default/httpsdocs/black_line.gif ./home/vhosts/default/httpsdocs/index.html ./home/vhosts/default/httpsdocs/logo.gif ./home/vhosts/.skel/error_docs/bad_request.html ./home/vhosts/.skel/error_docs/unauthorized.html ./home/vhosts/.skel/error_docs/forbidden.html ./home/vhosts/.skel/error_docs/internal_server_error.html ./home/vhosts/.skel/error_docs/not_found.html ./home/vhosts/.skel/httpdocs/index.html ./home/vhosts/.skel/httpsdocs/index.html EOF fi tail "+$installer_length" "$my_name" \ | $tar xpzf - --no-overwrite-dir --same-owner --exclude-from \ "$exclude_files_list" >> "$product_log" 2>&1 extract_report "$?" rm -f "$exclude_files_list" } mk_backup() { target="$1" dup="$2" opts="$3" if [ -L "$target" ]; then rm "$target" elif [ -$opts "$target" ]; then if [ ! -$opts "$target.$product_suffo" ]; then case "$dup" in mv) mv -f $target $target.$product_suffo || die "mv -f $target $target.$product_suff" ;; cp) cp -fp $target $target.$product_suffo || die "cp -fp $target $target.$product_suff" ;; *) p_echo " mk_backup: wrong option -- must be 'cp' or 'mv'" die "mk_backup" ;; esac else case "$dup" in mv) mv -f $target $target.$product_suff || die "mv -f $target $target.$product_suff" ;; cp) cp -fp $target $target.$product_suff || die "cp -fp $target $target.$product_suff" ;; *) p_echo " mk_backup: wrong option -- must be 'cp' or 'mv'" die "mk_backup" ;; esac fi else case "$opts" in f|d) ;; *) p_echo " mk_backup: wrong option -- must be 'f' or 'd'" die "mk_backup" ;; esac fi } detect_vz() { local vzcheck_file PLESK_VZ=0 vzcheck_file="/proc/self/status" if [ ! -f ${vzcheck_file} ]; then return 1; fi grep -q -E '^envID\:[[:space:]]*([[:digit:]]+)$' < ${vzcheck_file} >/dev/null 2>&1 if [ $? -eq 0 ]; then PLESK_VZ=1 return 0; fi return 1; } call_optional_function() { export LANG=C LC_MESSAGES=C local type_output="`type \"$1\" 2>/dev/null | head -n 1`" case "$type_output" in *function) "$@" ;; *) return 0 ;; esac } sh_get_args() { echo 'while true; do case "$1" in '"$1"'*) break;; esac; shift; done' } sequence() { if type seq; then seq $* elif type jot; then jot $* else die "Unable to find seq or jot command" fi } comment_service_xinetd() { #comment service records local dir file service grep_res service=$1 inten="comment out record for service $service" echo_try "$inten" for dir in $xinetd_dir; do for file in $dir/*; do grep "$service" $file || continue awk "/^[[:space:]]*service[[:space:]]+$service($|[[:space:]]+)/,/.*}.*/ \ { print \"#\"\$0; next; } {print} " <$file >$file.tmp && mv -f $file.tmp $file || die "$inten" >> $product_log 2>&1 done done suc } comment_service_inetd() { local grep_res service=$1 inten="comment out record for service $service" echo_try "$inten" grep_res=`grep "^$service[[:space:]]" $inetd_conf` case "$?" in 0) sed -e "s|^$service|##commented_by_psa $service|g" < "$inetd_conf" > "$inetd_conf.${product}_tmp" \ && mv -f "$inetd_conf.${product}_tmp" "$inetd_conf" \ && suc || die >> $product_log 2>&1 ;; *) p_echo " no record for service $service found in the $inetd_conf" ;; esac } comment_service() { local service service=$1 case "$super_server" in 'xinetd') comment_service_xinetd "$service" ;; 'inetd') comment_service_inetd "$service" ;; *) die "Super server type is undefined" ;; esac } remove_xinetd() { local service file service=$1; rm -f $xinetd_dir/${service}_${product} #uncomment old records inten="comment out ${product} record for service $service" for file in $xinetd_dir/*; do awk "/^[[:space:]]*#[[:space:]]*service[[:space:]]+$service($|[[:space:]]+)/,/.*}.*/ \ { print substr(\$0,2); next; } {print} " <$file >$file.tmp && mv -f $file.tmp $file >> $product_log 2>&1 done; } remove_inetd() { local service service=$1; case "$service" in ftp) inten="restore ftp service record in the $inetd_conf" sed -e "s|^ftp.*/${product}/ftpd/sbin/proftpd.*||g" \ -e "s|ftp.*/${prev_product}/ftpd/sbin/proftpd.*||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; smtp) inten="restore smtp service record in the $inetd_conf" sed -e "s|^smtp.*$QMAIL_ROOT_D/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ -e "s|^smtp.*${product}/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ -e "s|smtp.*${prev_product}/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; smtps) inten="restore smtp service record in the $inetd_conf" sed -e "s|^smtps.*$QMAIL_ROOT_D/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ -e "s|^smtps.*${product}/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ -e "s|smtps.*${prev_product}/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/relaylock.*||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; submission) inten="restore submission service record in the $inetd_conf" sed -e "s|^submission.*$QMAIL_ROOT_D/qmail/bin/tcp-env.*tcp-env.*||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; pop3) inten="restore pop3 service record in the $inetd_conf" sed -e "s|^pop[-]*3.*/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/pop3$||g" \ -e "s|^pop[-]*3.*/qmail/bin/tcp-env.*tcp-env.*/qmail/bin/pop3$||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; poppassd) # poppassd stream tcp nowait root /usr/sbin/tcpd /${PRODUCT_ROOT_D}/admin/bin/poppassd inten="restore poppassd service record in the $inetd_conf" sed -e "s|^poppassd.*$PRODUCT_ROOT_D/admin/bin/poppassd.*||g" \ < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 ;; esac # uncomment old records sed -e "s|^##commented_by_psa $service|$service|g" < $inetd_conf > $inetd_conf.${product}_tmp \ && mv -f $inetd_conf.${product}_tmp $inetd_conf >> $product_log 2>&1 } remove_super_server() { local service service=$1; case "$super_server" in xinetd) remove_xinetd "$service" ;; inetd) remove_inetd "$service" ;; esac } setup_xinetd() { local service file rbl_on rbl_server service=$1; rbl_on=$2; rbl_server=$3; #comment old records comment_service "$service" #setup service=$1; inten="set up record for service $service" echo_try "$inten" case "$service" in ftp) echo " service ftp { socket_type = stream protocol = tcp wait = no disable = no user = root instances = UNLIMITED server = $PRODUCT_ROOT_D/ftpd/sbin/proftpd server_args = -c $PRODUCT_ROOT_D/ftpd/etc/proftpd.conf }" > "$xinetd_dir/ftp_${product}" || die "$inten" ;; smtp) case "$rbl_on" in on) echo " service smtp { socket_type = stream protocol = tcp wait = no disable = no user = root instances = UNLIMITED server = $QMAIL_ROOT_D/bin/tcp-env server_args = -Rt0 $RBLSMTPD $rbl_server $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $TRUE_BIN $QMAIL_ROOT_D/bin/cmd5checkpw $TRUE_BIN }" > "$xinetd_dir/smtp_${product}" || die "$inten" ;; *) echo " service smtp { socket_type = stream protocol = tcp wait = no disable = no user = root instances = UNLIMITED server = $QMAIL_ROOT_D/bin/tcp-env server_args = -Rt0 $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $TRUE_BIN $QMAIL_ROOT_D/bin/cmd5checkpw $TRUE_BIN }" > "$xinetd_dir/smtp_${product}" || die "$inten" ;; esac ;; smtps) case "$rbl_on" in on) echo " service smtps { socket_type = stream protocol = tcp wait = no disable = no user = root instances = UNLIMITED server = $QMAIL_ROOT_D/bin/tcp-env server_args = -Rt0 $RBLSMTPD $rbl_server $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $TRUE_BIN $QMAIL_ROOT_D/bin/cmd5checkpw $TRUE_BIN }" > "$xinetd_dir/smtps_${product}" || die "$inten" ;; *) echo " service smtps { socket_type = stream protocol = tcp wait = no disable = no user = root instances = UNLIMITED server = $QMAIL_ROOT_D/bin/tcp-env server_args = -Rt0 $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $TRUE_BIN $QMAIL_ROOT_D/bin/cmd5checkpw $TRUE_BIN }" > "$xinetd_dir/smtps_${product}" || die "$inten" ;; esac ;; submission) echo " service submission { socket_type = stream protocol = tcp wait = no disable = no user = qmaild instances = UNLIMITED env = SUBMISSION=1 SMTPAUTH=1 server = $QMAIL_ROOT_D/bin/tcp-env server_args = -Rt0 $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $TRUE_BIN $QMAIL_ROOT_D/bin/cmd5checkpw $TRUE_BIN }" > "$xinetd_dir/submission_${product}" || die "$inten" ;; poppassd) echo " service poppassd { socket_type = stream protocol = tcp port = 106 wait = no disable = no user = root instances = 1000 flags = KEEPALIVE server = $PRODUCT_ROOT_D/admin/bin/poppassd }" > "$xinetd_dir/poppassd_${product}" || die "$inten" ;; esac case "$machine" in Darwin) echo '#!/bin/sh name_script="$0" name_service='org.xinetd.xinetd' case "$1" in start) echo "Plesk: Starting xinetd" launchctl start "$name_service" ;; stop) echo "Plesk: Stopping xinetd" launchctl stop "$name_service" ;; restart) $name_script stop $name_script start ;; *) echo "Usage: xinetd [start|stop|restart]" ;; esac ' > "$PRODUCT_RC_D/xinetd" chmod 755 "$PRODUCT_RC_D/xinetd" ;; *) ;; esac suc } setup_inetd() { local service rbl_on rbl_server service=$1; rbl_on=$2; rbl_server=$3; local ftp_rec smtp_rec smtps_rec submission_rec ftp_rec="ftp stream tcp nowait root $PRODUCT_ROOT_D/ftpd/sbin/proftpd proftpd -c $PRODUCT_ROOT_D/ftpd/etc/proftpd.conf" case "$linux_distr" in debian) maxconn='.1000' ;; *) maxconn="" ;; esac case "$rbl_on" in on) smtp_rec="smtp stream tcp nowait$maxconn root $QMAIL_ROOT_D/bin/tcp-env tcp-env $RBLSMTPD $rbl_server $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $QMAIL_ROOT_D/bin/true $QMAIL_ROOT_D/bin/cmd5checkpw $QMAIL_ROOT_D/bin/true" smtps_rec="smtps stream tcp nowait$maxconn root $QMAIL_ROOT_D/bin/tcp-env tcp-env $RBLSMTPD $rbl_server $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $QMAIL_ROOT_D/bin/true $QMAIL_ROOT_D/bin/cmd5checkpw $QMAIL_ROOT_D/bin/true" ;; *) smtp_rec="smtp stream tcp nowait$maxconn root $QMAIL_ROOT_D/bin/tcp-env tcp-env $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $QMAIL_ROOT_D/bin/true $QMAIL_ROOT_D/bin/cmd5checkpw $QMAIL_ROOT_D/bin/true" smtps_rec="smtps stream tcp nowait$maxconn root $QMAIL_ROOT_D/bin/tcp-env tcp-env $QMAIL_ROOT_D/bin/relaylock $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $QMAIL_ROOT_D/bin/true $QMAIL_ROOT_D/bin/cmd5checkpw $QMAIL_ROOT_D/bin/true" ;; esac submission_rec="submission stream tcp nowait$maxconn qmaild $QMAIL_ROOT_D/bin/tcp-env tcp-env /usr/bin/env SUBMISSION=1 SMTPAUTH=1 $QMAIL_ROOT_D/bin/qmail-smtpd $QMAIL_ROOT_D/bin/smtp_auth $QMAIL_ROOT_D/bin/true $QMAIL_ROOT_D/bin/cmd5checkpw $QMAIL_ROOT_D/bin/true" case "$machine" in BSD*) poppassd_rec="poppassd stream tcp nowait/1000 root /usr/libexec/tcpd $PRODUCT_ROOT_D/admin/bin/poppassd" ;; *) poppassd_rec="poppassd stream tcp nowait/1000 root /usr/sbin/tcpd $PRODUCT_ROOT_D/admin/bin/poppassd" ;; esac case "$service" in ftp) if [ -x /usr/sbin/update-inetd ]; then # Use Debian inetd config manipulation facility /usr/sbin/update-inetd --enable "ftp" /usr/sbin/update-inetd --remove "ftp" /usr/sbin/update-inetd --add "$ftp_rec" else grep_res=`egrep "^ftp.*/${product}/ftpd/sbin/proftpd*." $inetd_conf` inten="add ftp service (proftpd) record into the $inetd_conf file" echo_try $inten case "$grep_res" in ftp*) p_echo p_echo " ftp service (proftpd) is already in the $inetd_conf" ;; *) comment_service $service echo "$ftp_rec" >> $inetd_conf && suc || die ;; esac fi ;; smtp) if [ -x /usr/sbin/update-inetd ]; then # Use Debian inetd config manipulation facility /usr/sbin/update-inetd --enable "smtp" /usr/sbin/update-inetd --remove "smtp" /usr/sbin/update-inetd --add "$smtp_rec" else egrep "^smtp.*$QMAIL_ROOT_D/bin/tcp-env.*tcp-env.*$QMAIL_ROOT_D/bin/relaylock.*$" "$inetd_conf" >> $product_log 2>&1 case "$?" in 0) sed -e "/^smtp/d" < "$inetd_conf" > "$inetd_conf.${product}_tmp" \ && mv -f "$inetd_conf.${product}_tmp" "$inetd_conf" || die >> $product_log 2>&1 ;; 1) comment_service $service ;; *) err ;; esac inten="add smtp service record into the $inetd_conf file" echo_try $inten echo "$smtp_rec" >> $inetd_conf && suc || die $inten fi ;; smtps) if [ -x /usr/sbin/update-inetd ]; then # Use Debian inetd config manipulation facility /usr/sbin/update-inetd --enable "smtps" /usr/sbin/update-inetd --remove "smtps" /usr/sbin/update-inetd --add "$smtps_rec" else egrep "^smtps.*$QMAIL_ROOT_D/bin/tcp-env.*tcp-env.*$QMAIL_ROOT_D/bin/relaylock.*$" "$inetd_conf" >> $product_log 2>&1 case "$?" in 0) sed -e "/^smtps/d" < "$inetd_conf" > "$inetd_conf.${product}_tmp" \ && mv -f "$inetd_conf.${product}_tmp" "$inetd_conf" || die >> $product_log 2>&1 ;; 1) comment_service $service ;; *) err ;; esac inten="add smtps service record into the $inetd_conf file" echo_try $inten echo "$smtps_rec" >> $inetd_conf && suc || die $inten fi ;; submission) if [ -x /usr/sbin/update-inetd ]; then # Use Debian inetd config manipulation facility /usr/sbin/update-inetd --enable "submission" /usr/sbin/update-inetd --remove "submission" /usr/sbin/update-inetd --add "$submission_rec" else egrep "^submission.*$QMAIL_ROOT_D/bin/tcp-env.*tcp-env.*$" "$inetd_conf" >> $product_log 2>&1 case "$?" in 0) sed -e "/^submission/d" < "$inetd_conf" > "$inetd_conf.${product}_tmp" \ && mv -f "$inetd_conf.${product}_tmp" "$inetd_conf" || die >> $product_log 2>&1 ;; 1) comment_service $service ;; *) err ;; esac inten="add submission service record into the $inetd_conf file" echo_try $inten echo "$submission_rec" >> $inetd_conf && suc || die $inten fi ;; poppassd) if [ -x /usr/sbin/update-inetd ]; then # Use Debian inetd config manipulation facility /usr/sbin/update-inetd --enable "poppassd" /usr/sbin/update-inetd --remove "poppassd" /usr/sbin/update-inetd --add "$poppassd_rec" else # ^poppassd.*$PRODUCT_ROOT_D/admin/bin/poppassd.* grep_res=`egrep "^poppassd.*$PRODUCT_ROOT_D/admin/bin/poppassd.*" $inetd_conf` inten="add poppassd service record in the $inetd_conf" echo_try $inten case "$grep_res" in poppassd*) p_echo p_echo " poppassd service is already in the $inetd_conf" ;; *) comment_service $service echo "$poppassd_rec" >> $inetd_conf && suc || die ;; esac fi ;; esac } setup_super_server() { local service rbl_on rbl_server service=$1; rbl_on=$2; rbl_server=$3; case "$super_server" in xinetd) setup_xinetd "$service" "$rbl_on" "$rbl_server" ;; inetd) setup_inetd "$service" "$rbl_on" "$rbl_server" ;; esac } package_script_begin_pkg() { package_script_begin } package_script_end_pkg() { package_script_end } package_script_begin() { local title if [ "X$process" = "X" ]; then if [ "X$do_reconfigure" = "X1" ]; then process="reconfiguration" elif [ "X$do_upgrade" = "X1" ]; then process="upgrade" else process="installing" fi fi product_log="/tmp/${PACKAGE_NAME}_${PACKAGE_VERSION}_${PACKAGE_RELEASE}_${process}.`date +%y%m%d.%H.%M`.log" product_problems_log="/tmp/${PACKAGE_NAME}_${PACKAGE_VERSION}_${PACKAGE_RELEASE}_problems.`date +%y%m%d.%H.%M`.log" title="`package_script_log_title`" echo "START $title" >>"$product_log" \ && echo "START $title" >>"$product_problems_log" \ && chmod 600 "$product_log" "$product_problems_log" \ || { echo "Cannot write installation log $product_log, $product_problems_log" >&2 exit 1 } problems_occured=0 product_default_conf initial_conf set_common_params read_conf } package_script_end() { local title title="`package_script_log_title`" packagemng_set_dirty_flag echo "STOP $title" >>"$product_log" echo "STOP $title" >>"$product_problems_log" } package_script_log_title() { local stage case "$do_upgrade" in 0) stage="installing";; 1) stage="upgrading";; *) stage="installing";; esac if [ -n "$PACKAGE_DEB_ACTION" ]; then stage="$stage (deb action: $PACKAGE_DEB_ACTION)" fi echo "$PACKAGE_NAME-$PACKAGE_VERSION-$PACKAGE_RELEASE $stage AT `date`" } # NAME VERSION RELEASE [DEB_ACTION] package_script_call_main_function() { package_script_call_main_function_begin "$@" for package_func in $1; do if ! call_optional_function "$package_func"; then break fi done package_script_end_handler ok } package_script_call_main_function_begin() { PACKAGE_NAME="$2" PACKAGE_VERSION="$3" PACKAGE_RELEASE="$4" PACKAGE_DEB_ACTION="$5" package_script_begin_this_system trap "package_script_end_handler error" HUP PIPE INT QUIT TERM EXIT } package_script_end_handler() { case "$1" in error) if [ -z "$PACKAGE_SCRIPT_FAILED" ]; then PACKAGE_SCRIPT_FAILED="Package script failed" fi ;; ok) PACKAGE_SCRIPT_FAILED= ;; esac trap - EXIT package_script_end_this_system } package_script_begin_this_system() { package_script_begin_pkg } package_script_end_this_system() { package_script_end_pkg } get_pid() { local i local ex_f="$1" local opt="$2" local owner="$3" local min_num="1" # Use pidof by default, bug 121868 if type pidof >/dev/null 2>&1; then for pid in `pidof -o $$ -o $PPID -o %PPID -x $ex_f`; do # Check for owner [ "$opt" = "true" -a "$owner" != "`ps -p $pid -o ruser=`" ] && continue min_num=$pid break done common_var=$min_num return $min_num fi case "$opt" in false) for i in `$ps_long | grep $ex_f | grep -v grep | grep -v httpsdctl | grep -v apachectl | awk '{print $2}' -`; do min_num=$i break done ;; true) for i in `$ps_long | grep $ex_f | grep -v grep | grep -v httpsdctl | grep -v apachectl | grep "$owner" | awk '{print $2}' -`; do min_num=$i break done ;; *) p_echo "get_pid: wrong parameter" die "get_pid $ex_f $opt $owner" ;; esac common_var=$min_num return $min_num } kill_pids() { ex_f="$1" owner="$2" for i in `$ps_long | grep $ex_f | grep -v grep | grep -v httpsdctl | grep -v apachectl | grep $owner | awk '{print $2}' -`; do if [ $i -gt 1 ]; then $K_TERM $i >> $product_log 2>&1 fi done } #lib_test test_for_root() { my_id="`id`" case "$my_id" in uid=0\(root\)*) ;; *) echo "$0: This script must be run as root" echo "Log in as root then run this script again." echo exit 1 ;; esac } delete_user() { local rm_user rm_user="$1" # if it is mailman user, remove its crontab from system if [ "X${rm_user}" = "X${mailman_user}" ]; then inten="remove crontab of ${rm_user}" echo "y" | $crontab -u "${mailman_user}" -r >> $product_log 2>&1 || die "$inten" fi inten="remove user $rm_user" echo_try "$inten" case "$machine" in BSD) echo "y" | pw userdel $rm_user>> $product_log 2>&1 && suc pwd_mkdb /etc/master.passwd >> $product_log 2>&1 ;; linux|solaris) userdel $rm_user>> $product_log 2>&1 && suc || die "$inten" ;; Darwin) niutil -destroy / /users/"$rm_user" >> $product_log 2>&1 && suc || die "$inten" reload_darwin_netinfo ;; esac } delete_group() { local rm_group rm_group="$1" inten="remove group $rm_group" echo_try "$inten" case "$machine" in BSD) pw groupdel $rm_group>> $product_log 2>&1 pwd_mkdb /etc/master.passwd >> $product_log 2>&1 ;; linux|solaris) mk_backup "/etc/group" cp f if [ -f "/etc/group" ]; then sed -e "/$rm_group/d" < /etc/group > /etc/group.tmp || die $inten mv -f /etc/group.tmp /etc/group >> $product_log 2>&1 if [ "$?" -ne 0 ]; then rsr_backup "/etc/group" cp f die $inten fi fi ;; Darwin) niutil -destroy / /groups/"$rm_group" >> $product_log 2>&1 && suc || die "$inten" reload_darwin_netinfo ;; esac suc } reload_darwin_netinfo() { if [ -f /var/run/memberd.pid ]; then kill -HUP `cat /var/run/memberd.pid` else SystemStarter start memberd fi return 0 } initial_conf() { DEMO_VERSION="no" PRODNAME="psa" PRODUCT_NAME="Plesk" product_full="Plesk" product=${PRODNAME} PRODUCT_FULL_NAME="Plesk" product_etc="/etc/${PRODNAME}" prod_conf_t="/etc/psa/psa.conf" prodkey="$product_etc/$PRODNAME.key" minimal_changes="0" MYSQL_VERS="4.1.18" POSTGRESQL_VERS="7.4.11" EXTERNAL_PACKAGES=" localedata" EXTERNAL_PACKAGES_DIR=""tmp/packages"" BUILDER_UID="10007" PERL5LIB="/usr/local/psa/lib/perl5/site_perl/5.8.8:/usr/local/psa/lib/perl5/site_perl/5.8.8/mach" export PERL5LIB support_contact="http://www.swsoft.com/support" sales_email="sales@swsoft.com" product_version="8.3.0" product_db_version="0830" product_build="83071218.19" conceived_os_vendor=FreeBSD conceived_os_version="6.1" osrels="fr6.1" # This variable contains all versions, which is supported by # cumulative upgrade known_product_versions="71 75 80 81 82 83" prev_product="plesk" prev_clients_group="${prev_product}cln" clients_group="${product}cln" clients_GID=10001 services_group="${product}serv" services_GID=10003 product_suff="saved_by_${product}".`date "+%m.%d;%H:%M"` product_suffo="saved_by_${product}" PREV_PRODUCT_ROOT_D="/usr/local/${prev_product}" # plesk default password if [ "X$DEMO_VERSION" = "Xyes" ]; then PRODUCT_DEFAULT_PASSWORD="plesk" else PRODUCT_DEFAULT_PASSWORD="setup" fi } read_conf() { if [ -s $prod_conf_t ]; then tmp_var=`perl -e 'undef $/; $_=<>; s/#.*$//gm; s/^\s*(\S+)\s*/$1=/mg; print' $prod_conf_t` eval $tmp_var else if [ "X$do_upgrade" = "X1" ]; then [ 0$ignore_miss_conf -ne 1 ] && p_echo "Unable to find product configuration file: $prod_conf_t" return 1 fi fi return 0 } get_my_cnf_param() { local my_cnf cnf_files cnf_files="/etc/my.cnf /etc/mysql/my.cnf /var/db/mysql/my.cnf" for my_cnf in ${cnf_files}; do if [ -f ${my_cnf} ]; then break fi done [ -f ${my_cnf} ] && r=`perl -e '$p="'"$1"'"; undef $/; $_=<>; s/#.*$//gm; /\[mysqld\](.*?)\[/sg; $_=substr($1, rindex $1,"$p") and /$p\s*=(.*)/m and print $1 ' ${my_cnf}` echo $r } get_mysql_socket() { mysql_socket="/tmp/mysql.sock" local mysqlsock=`get_my_cnf_param socket` local MYSQL_SOCKETS="/var/lib/mysql/mysql.sock /tmp/mysql.sock /var/run/mysqld/mysqld.sock" for i in $mysql_socket $mysqlsock $MYSQL_SOCKETS; do if [ -S "$i" ]; then MYSQL_UNIX_PORT=$i export MYSQL_UNIX_PORT mysql_socket="$i" break fi done } #default values product_default_conf() { PRODUCT_ROOT_D=/usr/local/psa PRODUCT_RC_D=/usr/local/etc/rc.d PRODUCT_ETC_D=/usr/local/etc/psa HTTPD_VHOSTS_D=/usr/local/www/vhosts HTTPD_CONF_D=dynamic HTTPD_INCLUDE_D=dynamic HTTPD_BIN_D=/usr/local/sbin HTTPD_LOG_D=/var/log HTTPD_SERVICE=dynamic QMAIL_ROOT_D=/usr/local/psa/qmail QMAIL_MAILNAMES_D=/usr/local/psa/qmail/mailnames RBLSMTPD=/usr/local/psa/qmail/bin/rblsmtpd COURIER_IMAP_ROOT_D=/usr/local/psa/courier-imap FTPD_CONF=/usr/local/psa/ftpd/etc/proftpd.conf FTPD_CONF_INC=/usr/local/psa/ftpd/etc/proftpd.include FTPD_BIN_D=/usr/local/psa/ftpd/bin FTPD_VAR_D=/usr/local/psa/ftpd/var FTPD_SCOREBOARD=/usr/local/psa/ftpd/var/scoreboard NAMED_RUN_ROOT_D=/var/named NAMED_OPTIONS_CONF=/etc/namedb/named.conf.include.plesk-options NAMED_ZONES_CONF=/etc/namedb/named.conf.include.plesk-zones WEB_STAT=/usr/local/psa/webalizer/bin/webalizer LOGROTATE=/usr/local/psa/logrotate/sbin/logrotate MYSQL_VAR_D=/var/db/mysql MYSQL_BIN_D=/usr/local/bin PGSQL_DATA_D=/usr/local/pgsql/data PGSQL_BIN_D=/usr/local/bin DUMP_D=/usr/local/psa/var/dumps MAILMAN_ROOT_D=/usr/local/psa/mailman MAILMAN_VAR_D=/usr/local/psa/mailman PYTHON_BIN=/usr/local/bin/python2.5 CATALINA_HOME=/usr/local/tomcat5.5 DRWEB_ROOT_D=/usr/local/drweb DRWEB_ETC_D=/usr/local/etc/drweb GPG_BIN=/usr/local/psa/bin/gpg TAR_BIN=/usr/bin/tar CURL_CA_BUNDLE_FILE=/usr/share/curl/curl-ca-bundle.crt AWSTATS_ETC_D=/usr/local/etc/awstats AWSTATS_BIN_D=/usr/local/psa/awstats/wwwroot/cgi-bin AWSTATS_TOOLS_D=/usr/local/psa/awstats/tools AWSTATS_DOC_D=/usr/local/psa/awstats/wwwroot OPENSSL_BIN=/usr/bin/openssl LIB_SSL_PATH=/lib/libssl.so LIB_CRYPTO_PATH=/lib/libcrypto.so CLIENT_PHP_BIN=/usr/local/psa/bin/php-cli } #Need for register/unregister services into /etc/rc.conf for BSD OSes. #Create or change strings such as service_option_variable="variable" rc_service() { local service="$1" local option="$2" local variable="$3" local comment="$4" local config="/etc/rc.conf" if [ "X$variable" = "Xdefault" ]; then remove_option_string "${service}_${option}" "$config" return 0 fi if [ ! -f /etc/rc.conf ]; then die 'File /etc/rc.conf not found!' fi if [ "X$service" = "X" -o "X$option" = "X" -o "X$variable" = "X" ]; then die fi local flag="`grep "${service}_${option}" $config`" if [ "X$flag" = "X" ]; then if [ "X$comment" = "Xyes" ]; then echo "#Option for $service created by Plesk installer." >> $config fi echo "${service}_${option}=\"${variable}\"" >> $config || die else sed -i "" -e 's|\('"${service}_${option}"'.*=\"\).*|\1'"${variable}"'\"|' $config || die fi return 0 } remove_option_string() { #using: remove_option_string