#!/bin/sh

PATH=/bin:/usr/bin:/sbin:/usr/sbin
. /usr/lib/libmodcgi.sh

update_inetd() {
	if [ -e "/etc/default.inetd/inetd.cfg" ]; then
		if [ -x "/etc/init.d/rc.$1" ]; then
			status=$(/etc/init.d/rc.$1 status)
			if [ "running" = "$2" -a "inetd" = "$status" ]; then
			echo
				/etc/init.d/rc.$1 stop
				/usr/bin/modinetd --nosave $1
			echo
			elif [ "inetd" = "$2" -a "inetd" != "$status" ]; then
				echo
				/usr/bin/modinetd --nosave $1
				/etc/init.d/rc.$1 start
				echo
			elif [ "inetd" = "$2" -o "inetd" = "$status" ]; then
        	                echo
                	        /usr/bin/modinetd --nosave $1
                        	echo
			fi
                fi
        fi
}

save_flash() {
	if modsave flash; then
		if [ -x "/etc/init.d/rc.$1" ]; then
			if [ "running" = "$2" -o "running" = "$status" ]; then
				echo
				/etc/init.d/rc.$1 restart
			fi
		fi
	fi
}

rc_status() {
	if [ -x "/etc/init.d/rc.$1" ]; then
	echo "$(/etc/init.d/rc.$1 status)"
	else
		echo ""
	fi
}

cgi_begin "$(lang de:"Speichern" en:"Saving")..."

echo "<p>$(lang de:"Konfiguration speichern" en:"Saving settings"):</p>"
echo -n "<pre>"

form="$(echo "$QUERY_STRING" | sed -e 's/^.*form=//' -e 's/&.*$//' -e 's/\.//g')"

script='status.cgi';
package=''
file_id=''
oldstatus1=''
oldstatus2=''

case "$form" in
	pkg_*)
		package="${form#pkg_}"
		if [ -r "/etc/default.$package/$package.cfg" ]; then
			if [ "$package" = "mod" ]; then script='settings.cgi'; else script="pkgconf.cgi"; fi
			prefix="$(echo "$package" | tr 'a-z\-' 'A-Z_')_"

			vars=''; delim=''
			for var in $(modconf vars $package); do
				vars="${vars}${delim}${var#$prefix}"
				delim=':'
			done

			if [ "mod" = "$package" ]; then
				oldstatus1="$(rc_status telnetd)"
				oldstatus2="$(rc_status webcfg)"
			else
				oldstatus1="$(/etc/init.d/rc.$package status)"
			fi

			echo -n 'Saving settings...'
			modcgi $vars $package | modconf set $package -
			echo 'done.'

			echo -n "Saving $package.cfg..."
			modconf save $package
			echo 'done.'

			if [ "mod" = "$package" ]; then
				update_inetd telnetd $oldstatus1
				update_inetd webcfg $oldstatus2
				oldstatus1=''
			else
				update_inetd $package $oldstatus1
			fi
			save_flash $package $oldstatus1
		fi
		;;
	def_*)
		package="${form#def_}"
		if [ -r "/etc/default.$package/$package.cfg" ]; then
			if [ "$package" = "mod" ]; then script='settings.cgi'; else script="pkgconf.cgi"; fi

			if [ "mod" != "$package" ]; then
				oldstatus1="$(/etc/init.d/rc.$package status)"
			fi

			echo -n 'Restoring defaults...'
			modconf default $package
			echo 'done.'

			save_flash $package $oldstatus1
		fi
		;;
	file_*)
		file_id="${form#file_}"
		script='file.cgi'

		[ -e "/mod/etc/reg/file.reg" ] || touch /mod/etc/reg/file.reg

		sec_level=1
		[ -r "/tmp/flash/security" ] && let sec_level="$(cat /tmp/flash/security)"

		OIFS="$IFS"
		IFS='|'
		set -- $(cat /mod/etc/reg/file.reg | grep "^$file_id|")
		IFS="$OIFS"

		[ -r "$4" ] && . $4

		if [ -z "$CONFIG_FILE" -o "$sec_level" -gt "$3" ]; then
			echo "Configuration file not available at the current security level!"
		else
			case "$CONFIG_TYPE" in
				text)
					eval "$(modcgi content mod_cgi)"
					echo -n "Saving $file_id..."
					echo "$MOD_CGI_CONTENT" > $CONFIG_FILE
					echo 'done.'
					eval "$CONFIG_SAVE"
					;;
				list)
					eval "$CONFIG_SAVE"
					;;
			esac
		fi
		;;
	*)
		echo "$(lang de:"Fehler: Unbekanntes Formular" en:"Error: unknown form") '$form'"
		;;
esac

echo '</pre>'
echo -n "</p><form action=\"/cgi-bin/$script\">"
[ -z "$package" ] || echo -n "<input type=\"hidden\" name=\"pkg\" value=\"$package\">"
[ -z "$file_id" ] || echo -n "<input type=\"hidden\" name=\"id\" value=\"$file_id\">"
echo '<input type="submit" value="$(lang de:"Zur&uuml;ck" en:"Back")"></form></p>'

cgi_end