add mod version to front page

git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@397 2a923420-c742-0410-a762-8d5b09965624

var/mongoose/html/index.shtml

@@ -120,6 +120,7 @@ $(document).ready(function() {
 <a href=/jim/sqlite.html target=_blank>Sqlite</a>
 </li>
 </ul>
+<!--#exec cmd="/mod/var/mongoose/include/modversion.jim" -->
 </div>
 
 <!--#include virtual="/lib/footer.shtml" -->

var/mongoose/include/modversion.jim

@@ -0,0 +1,9 @@
+#!/mod/bin/jimsh
+
+source /mod/var/mongoose/lib/setup
+require system.class
+
+puts "<font class=blood style=\"font-size: 0.9em; float: right; clear: right\">
+	Custom firmware version: [system modversion]
+</font>"
+

var/mongoose/lib/system.class

@@ -20,6 +20,17 @@ proc {system hostname} {} {
 	return $hostname
 }
 
+proc {system modversion} {} {
+	if {[catch {set fp [open /etc/modversion r]}]} {
+		set modver "1.02"
+	} else {
+		set modver [string trim [read $fp]]
+		close $fp
+	}
+	lassign [split $modver ""] a b c
+	return [format "%d.%d%d" $a $b $c]
+}
+
 proc {system diskspace} {} {
 	switch [system model] {
 		HDR { set part /mnt/hd2 }