#!/bin/sh

. /usr/share/shlib.sh version webif package

export DATE="$(version_get_releasedate '$LastChangedDate: 2008-04-27 13:25:35 +0200 (Sun, 27 Apr 2008) $')";SCRIPT=${0#/rom}
export TITLE="Verwaltung: Software 2"
. ${SCRIPT%/*}/cgi-bin-pre.sh

webif_parse_urlquery 'q_'
package_has_listupdate || q_display=update

cat<<EOF
<h1>Verwaltung: Softwarepakete</h1>
<br />

$(
	if [ -z "$q_install" -a -z "$q_remove" ]; then

		# Workaround to highlight current tab...
		display="${q_display:-search}"

		webif_gentabs 'search=Suchen & Installieren;list=Alle auflisten;installed=Deinstallieren;update=Listen aktualisieren'
	fi
)

<div style="border:2px solid #CACACA;padding:3px">

EOF

#
# search & install packages
#
if [ -z "$q_install" -a -z "$q_remove" -a "${q_display:-search}" = "search" ]; then

	# search form
	echo "<form action='' method='post'>"
	echo "	<label for='pkgsearch'><strong>Paketname oder Suchbegriff eingeben:</strong></label><br />"
	echo "  <input type='hidden' name='display' value='search' />"
	echo "	<input type='text' name='search' value='${q_search:-freifunk-recommended-de-le}' id='pkgsearch' size='50' />"
	echo "	<input type='submit' name='submit' value='Suchen &raquo;' />"
	echo "</form>"

	if [ -n "$q_search" ]; then
	
		echo "<hr size='1' /><h2>Suchergebnisse:</h2><br /><ol>"
	
		html="$(
			ipkg list | grep -i "$(webif_shellescape "$q_search")" | sort | uniq | \
			while read pkg; do
				name="${pkg%% - *}"
				desc="${pkg#* - }"

				if [ ! -f "/usr/lib/ipkg/info/$name.list" ]; then
					echo "<li><p>"
					echo "<strong><a href='?install=$name&amp;from=search' title='Paket installieren...'>$name</a></strong>"
					echo "<br />$desc</p></li>"
				fi
			done
		)";

		if [ -z "$html" ]; then
			echo "<li style='list-style-type:none'><em>Keine Ergebnisse f&uuml;r '$q_search' gefunden.</em></li>"
		else
			echo "$html"
		fi

		echo "</ol>"
	fi


#
# list all available packages
#
elif [ "$q_display" = "list" ]; then

	echo "<h2>Liste aller verf&uuml;gbaren, nicht installierten Pakete:</h2><br /><ol>"

	ipkg list | sort | uniq | \
		while read pkg; do
			name="${pkg%% - *}"
			desc="${pkg#* - }" 

			if [ ! -f "/usr/lib/ipkg/info/$name.list" ]; then
				echo "<li><p>"
				echo "<strong><a href='?install=$name&amp;from=list' title='Paket installieren...'>$name</a></strong>"
				echo "<br />$desc</p></li>"
			fi
		done      

		echo "</ol>"


#
# list installed packages
#
elif [ "$q_display" = "installed" ]; then
	
	echo "<h2>Liste aller nachinstallierten Pakete:</h2><br /><ol>"

	for pkg in $(package_get_installedlist); do
		echo "<li><p>"
		echo "<strong><a href='?remove=$pkg' title='Paket deinstallieren...'>$pkg</a></strong>"
		echo "<br />$(package_get_description $pkg)</p></li>"
	done

	echo "</ol>"

#
# update package lists
#
elif [ "$q_display" = "update" ]; then

	echo "<h2>Aktualisiere Paketlisten...</h2><ol>"

	ipkg update 2>&1 | sed -ne 's!^Updated .*/!1 !p; /^wget: / { N; N; s!\n!!g; s!.*/!0 !p }' | \
		while read list; do
			set -- $list
			img=no.gif;		[ $1 = 1 ] && img=yes.gif
			txt=fehlgeschlagen;	[ $1 = 1 ] && txt=aktualisiert

			echo "<li style='list-style-image:url(../images/$img)'>"
			echo "Liste &quot;<strong>$2</strong>&quot; $txt</li>"
		done

	echo "</ol>"

#
# install package
#
elif [ -n "$q_install" ]; then

	pkg="$(webif_shellescape "$q_install")"
	echo "<h2>Paketinstallation</h2><br /><ul>"
	echo "<li style='list-style-type:none'>Installiere Paket &quot;<strong>$pkg</strong>&quot;...</li>"

	error="$(ipkg install "$pkg" 2>&1 | sed -ne's/^.*ERROR: //p')"

	if [ -z "$error" ]; then
		echo "<li style='list-style-image:url(../images/yes.gif)'>erfolgreich abgeschlossen.</li>"
	else
		echo "<li style='list-style-image:url(../images/no.gif)'>Ein Fehler ist aufgetreten: $error</li>"
	fi 

	echo "</ul><br />[<a href='?display=$q_from'><strong>Weiter &raquo;</strong></a>]"

#
# remove package
#
elif [ -n "$q_remove" ]; then

        pkg="$(webif_shellescape "$q_remove")"
        echo "<h2>Paketdeinstallation</h2><br /><ul>"
        echo "<li style='list-style-type:none'>Deinstalliere Paket &quot;<strong>$pkg</strong>&quot;...</li>"
        
        removed="$(ipkg remove "$pkg" 2>&1)"
                
        if [ -n "$removed" ]; then
                echo "<li style='list-style-image:url(../images/yes.gif)'>erfolgreich abgeschlossen.</li>"
        else
                echo "<li style='list-style-image:url(../images/no.gif)'>Ein Fehler ist aufgetreten (Paket nicht installiert?)</li>"
        fi
                                
	echo "</ul><br />[<a href='?display=installed'><strong>Weiter &raquo;</strong></a>]"


fi


echo "</div>"

. ${SCRIPT%/*}/cgi-bin-post.sh