#!/bin/ksh
#
# Component: help
#
# Description:
#  Control script of component help
#
# Last Updated     : $Author$
# Update Date Time : $Date$
# RCS File Name    : $RCSfile$
# RCS Revision     : $Revision$
# Locked by        : $Locker$
# Symbolic name    : $Name$
# State            : $State$

#--- INIT ------------------------------
#needs $HOME
. $HOME/etc/ctrl.main.shi

[ -f $HOME/etc/setenv.sh ] && . $HOME/etc/setenv.sh

#--- FUNC ------------------------------
do_shell_()
{
	cat <<-EndOfInlineData
		HELP_HOME="\$HOME/component/help"
	EndOfInlineData

} #do_shell_()

do_start_()
{
	linkTarget="$HELP_HOME/htdocs"

	echo "link target: $linkTarget"
	curTarget=`ls -ld $HOME/htdocs/help | awk '{print $11}' 2>/dev/null`
	
	if [ -d "$HOME/htdocs/help" -a -z "$curTarget" ] ; then
		echo "Cannot create link to help component, "$HOME/htdocs/help" is a directory."
		exit 1
	fi

	if [ ! -d "$linkTarget" ] ; then
		echo "Cannot create link to help component, target directory $linkTarget does not exist."
		exit 1
	fi

	if [ "$curTarget" != "$linkTarget" ] ; then
		[ -L "$HOME/htdocs/help" ] && rm $HOME/htdocs/help
      cd "$HOME/htdocs"
      ln -s "$linkTarget" help
	fi	
} #do_start_()

do_stop_()
{
} #do_stop_()

do_status_()
{
} #do_status_()

do_beforesubmit_()
{
} #do_beforesubmit_()

do_aftersubmit_()
{ 
	do_start_

} #do_aftersubmit_()

#--- MAIN ------------------------------

check_action_ $1
if [ 0 = $? ]; then
	do_$1_

else
	echo "--- Component help [ctrl $$]: Bad command: $1" >&2
	exit 1

fi
