#!/mod/bin/jimsh

source /mod/webif/lib/setup
require settings.class

proc menuitem {title icon link {width 217} {height 0} {extra ""}} {{num 0}} {
	incr num
	if {$title eq ""} return
	if {$num > 4} {
		puts {</div><div style="clear: both; padding-top: 1em">}
		set num 1
	}
	if {$extra ne ""} { append extra " " }
	puts -nonewline "
<div class=left num=$num>
	<center>
	<a href=$link>
		<img src=$icon ${extra}border=0 width=$width"
	if {$height} { puts -nonewline " height=$height" }
	puts -nonewline ">
	</a>
	<br>
	<a href=$link>
	<b>$title</b>
	</a>
	<br>
	</center>
</div>
"
}

if {[[settings] epg_style] eq "grid"} {
	set epglink "/cgi-bin/xepg.jim"
} else {
	set epglink "/epg.shtml"
}

puts {<div style="clear: both">}

menuitem "Browse Media Files" "/images/323_1_10_Menu_Video.png" \
	/cgi-bin/browse.jim 217 228
menuitem "Scheduled Events" "/images/321_1_00_Menu_CHList.png" \
	/sched/sched.jim 217 228
menuitem "EPG" "/images/328_1_26_Menu_TV_Guide.png" \
	$epglink 217 228

if {[file exists "/mod/bin/ir"]} {
	menuitem "Remote" "/img/remote.png" /plugin/ir/remote.jim 217 228
}

if {[[settings] nomobile] eq "0"} {
	menuitem "Mobile Version" "/img/mobile.png" /m/ 217 228
}

menuitem "Service Management" "/img/spanner.png" \
	/services.shtml 217 228
menuitem "Package Management" "/img/packages.png" \
	/pkg/index.shtml 217 228
menuitem "Settings" "/images/326_1_00_Menu_Settings.png" \
	/cgi-bin/settings.jim 217 228

menuitem "Diagnostics" "/img/diagnostics.png" \
	/diag/diag.jim 217 228