#!/bin/sh
decode(){
echo $QUERY_STRING |\
sed 's/+/ /g'| sed 's/\%0[dD]//g' |\
awk '/%/{while(match($0,/\%[0-9a-fA-F][0-9a-fA-F]/))\
{$0=substr($0,1,RSTART-1)sprintf("%c",0+("0x"substr(\
$0,RSTART+1,2)))substr($0,RSTART+3);}}{print}'
}
QRY=$( decode )
#echo 'HTTP/1.0 200 OK'
#echo 'Server: Netscape-Communications/3.0'
echo 'Content-type: text/html'
echo
ch1=$(uci get radio.@radio[0].ch1)
ch2=$(uci get radio.@radio[0].ch2)
ch3=$(uci get radio.@radio[0].ch3)
ch4=$(uci get radio.@radio[0].ch4)
ch5=$(uci get radio.@radio[0].ch5)
ch6=$(uci get radio.@radio[0].ch6)
ch7=$(uci get radio.@radio[0].ch7)
ch8=$(uci get radio.@radio[0].ch8)
ch9=$(uci get radio.@radio[0].ch9)
ch10=$(uci get radio.@radio[0].ch10)
ch11=$(uci get radio.@radio[0].ch11)
ch12=$(uci get radio.@radio[0].ch12)
ch13=$(uci get radio.@radio[0].ch13)
ch14=$(uci get radio.@radio[0].ch14)
ch15=$(uci get radio.@radio[0].ch15)
ch16=$(uci get radio.@radio[0].ch16)
name1=$(uci get radio.@radio[0].name1)
name2=$(uci get radio.@radio[0].name2)
name3=$(uci get radio.@radio[0].name3)
name4=$(uci get radio.@radio[0].name4)
name5=$(uci get radio.@radio[0].name5)
name6=$(uci get radio.@radio[0].name6)
name7=$(uci get radio.@radio[0].name7)
name8=$(uci get radio.@radio[0].name8)
name9=$(uci get radio.@radio[0].name9)
name10=$(uci get radio.@radio[0].name10)
name11=$(uci get radio.@radio[0].name11)
name12=$(uci get radio.@radio[0].name12)
name13=$(uci get radio.@radio[0].name13)
name14=$(uci get radio.@radio[0].name14)
name15=$(uci get radio.@radio[0].name15)
name16=$(uci get radio.@radio[0].name16)
header='Radio Channels
Radio channel selection
'
echo $header
echo $QRY
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''
echo ''