#!/bin/sh

export DATE="29.11.2006";SCRIPT=${0#/rom}
export TITLE="Situação
atual: OLSR"
. ${SCRIPT%/*}/cgi-bin-pre.sh

WLDEV=$(l=$(grep : /proc/net/wireless);l=${l%:*};echo ${l##* })
ff_httpinfo=$(nvram get ff_httpinfo)
if [ "$REQUEST_METHOD" = "POST" ]; then
read QUERY_STRING
fi
if [ "$QUERY_STRING" != "${QUERY_STRING#*post_olsr=}" ]; then

cat<<EOF
<H1>Situa&ccedil;&atilde;o
atual: OLSR</H1>
<FORM ACTION="cgi-bin-status.html" METHOD="POST">
<TABLE CLASS="shadow0" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow1" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow2" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE BORDER="1" CELLPADDING="0" CELLSPACING="0" CLASS="formfixwidth">
<TR>
<TD><INPUT NAME="post_overview" TITLE="Mostrar as principais características do aparelho resumidamente" TYPE="SUBMIT" VALUE="Visão geral">&nbsp;&nbsp;&nbsp;<INPUT NAME="post_route" TITLE="Mostar a tabela de roteamento do aparelho" TYPE="SUBMIT" VALUE="Roteamento">
EOF

if [ "$(nvram get wl0_mode)" != "ap" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_scan" TITLE="Procurar por estações Wlan" TYPE="SUBMIT" VALUE="Procurar Wlan">
EOF

fi
if [ "$ff_httpinfo" != "0" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_olsr" TITLE="Mostrar página com informações sobre a situação atual do OLSR" TYPE="SUBMIT" VALUE="Informação OLSR">
EOF

fi

cat<<EOF
</TD>
</TR>
<TR>
<TD>&nbsp;</TD>
</TR>
<TR>
<TD>
EOF

wget -q -O - http://127.0.0.1:2006/|sed -ne'
/^Table:/,/^$/{
s#^Table: \(.*\)#<H2>\1</H2><\TABLE BORDER="1" CELLSPACING="0" CELLPADDING="0" WIDTH="100%">#
:n
p
n
s#[0-9]\+\.[0-9]\+\.[0-9]\+\.[0-9]\+#<A HREF="http://&/">&</A>#g
s/		/	-	/g
s/	$//
s#	#</TD><TD>#g
s#.\+#<TR><TD>&</TD></TR>#
s/./&/
tn
c\
<\/TABLE>
p
}
'

cat<<EOF
</TD>
</TR>
</TABLE></TD></TR></TABLE></TD></TR></TABLE></TD></TR></TABLE>
</FORM>
EOF

elif [ "$QUERY_STRING" != "${QUERY_STRING#*post_route=}" ]; then

cat<<EOF
<H1>Situa&ccedil;&atilde;o
atual: Roteador</H1>
<FORM ACTION="cgi-bin-status.html" METHOD="POST">
<TABLE CLASS="shadow0" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow1" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow2" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE BORDER="1" CELLPADDING="0" CELLSPACING="0" CLASS="formfixwidth">
<TR>
<TD><INPUT NAME="post_overview" TITLE="Mostrar as principais características do aparelho resumidamente" TYPE="SUBMIT" VALUE="Visão geral">&nbsp;&nbsp;&nbsp;<INPUT NAME="post_route" TITLE="Mostar a tabela atual de roteamento do aparelho" TYPE="SUBMIT" VALUE="Roteamento">
EOF

if [ "$(nvram get wl0_mode)" != "ap" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_scan" TITLE="Procurar por estações Wlan" TYPE="SUBMIT" VALUE="Procurar Wlan">
EOF

fi
if [ "$ff_httpinfo" != "0" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_olsr" TITLE="Mostrar página com informações sobre a situação atual do OLSR" TYPE="SUBMIT" VALUE="Informação OLSR">
EOF

fi

cat<<EOF
</TD>
</TR>
<TR>
<TD>&nbsp;</TD>
</TR>
<TR>
<TD>
EOF

echo '<''TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0">'
ip route ls|sed -e'
s#^\([^ ]\+\)\(.*\)#<TR>\
<TD STYLE="padding:0 2 0 2;font-size:9px;">\1</TD>\
<TD STYLE="padding:0 2 0 2;font-size:9px;">\2</TD>\
</TR>#
s#\([0-9]\+\.[0-9]\+\.[0-9]\+\.[0-9]\+\)\([ <]\)#<A HREF="http://\1/">\1</A>\2#g
'
echo '<''/TABLE>'

cat<<EOF
</TD>
</TR>
</TABLE></TD></TR></TABLE></TD></TR></TABLE></TD></TR></TABLE>
</FORM>
EOF

elif [ "$QUERY_STRING" != "${QUERY_STRING#*post_scan=}" ]; then

cat<<EOF
<H1>Situa&ccedil;&atilde;o
atual: Procurar esta&ccedil;&otilde;es Wlan</H1>
<FORM ACTION="cgi-bin-status.html" METHOD="POST">
<TABLE CLASS="shadow0" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow1" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow2" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE BORDER="1" CELLPADDING="0" CELLSPACING="0" CLASS="formfixwidth">
<TR>
<TD COLSPAN="7"><INPUT NAME="post_overview" TITLE="Mostrar as principais características do aparelho resumidamente" TYPE="SUBMIT" VALUE="Visão geral">&nbsp;&nbsp;&nbsp;<INPUT NAME="post_route" TITLE="Mostar a tabela atual de roteamento do aparelho" TYPE="SUBMIT" VALUE="Roteamento">
EOF

if [ "$(nvram get wl0_mode)" != "ap" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_scan" TITLE="Procurar por estações Wlan" TYPE="SUBMIT" VALUE="Procurar Wlan">
EOF

fi
if [ "$ff_httpinfo" != "0" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_olsr" TITLE="Mostrar página com informações sobre a situação atual do OLSR" TYPE="SUBMIT" VALUE="Informação OLSR">
EOF

fi

cat<<EOF
</TD>
</TR>
<TR>
<TD COLSPAN="7">&nbsp;</TD>
</TR>
<TR>
<TH>SSID</TH>
<TH>Canal</TH>
<TH>Ad-Hoc</TH>
<TH>Open</TH>
<TH>Signal</TH>
<TH>Max.</TH>
<TH>BSSID</TH>
</TR>
<TR>
<TD COLSPAN="7">
EOF

/usr/sbin/wl -i $WLDEV scan
sleep 2
echo '</TR></TR>'
/usr/sbin/wl -i $WLDEV scanresults|sed -ne'
/^$/d
/^WSEC/d
/^SSID:/{
s/["\\]//g
s/: \(.*\)/="\1"/
h
d
}
/^Supported Rates:/{
s/.* \([0-9]\+\).*/RATE="\1"/
H
g
s/\n/ /g
p
}
s/ dBm//g
s/: \+\([^	]\+\)/="\1"/g
s/ \+"/"/g
s/Mode="Ad Hoc"/ADHOC="yes"/
s/Mode="[^"]\+"/ADHOC="no"/
s/Capability=".* WEP .*/OPEN="no"/
s/Capability.*/OPEN="yes"/g
H
'|while read line; do
eval $line
gif=$(( $RSSI - $noise ))
gif=$(( $gif / 5 ))
test $gif -gt 5 && gif=5
test $gif -lt 0 && gif=0
cat<<EOF
<TR><TD>$SSID</TD><TD>$Channel</TD>
<TD><IMG SRC="images/$ADHOC.gif" ALT="ad hoc" TITLE="Ad-Hoc mode" ALIGN="ABSMIDDLE"></TD>
<TD><IMG SRC="images/$OPEN.gif" ALT="$OPEN" TITLE="No WEP/WPA" ALIGN="ABSMIDDLE"></TD>
<TD><IMG SRC="images/power$gif.gif" ALT="P=$gif" TITLE="RSSI: $RSSI dBm, Noise: $noise dBm" ALIGN="ABSMIDDLE"></TD>
<TD>$RATE</TD><TD>$BSSID</TD></tr>
EOF
done
echo '<TR><TD colspan="7">&nbsp;'

cat<<EOF
</TD>
</TR>
</TABLE></TD></TR></TABLE></TD></TR></TABLE></TD></TR></TABLE>
</FORM>
EOF

else

cat<<EOF
<H1>Situa&ccedil;&atilde;o
atual: Vis&atilde;o geral</H1>
<SCRIPT LANGUAGE="JavaScript" TYPE="text/javascript"><!--
function fold(id) {
obj = document.getElementById(id);
obj.style.display = ('none'==obj.style.display?'block':'none');
return false;
}
//--></SCRIPT>
<FORM ACTION="cgi-bin-status.html" METHOD="POST">
<TABLE CLASS="shadow0" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow1" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE CLASS="shadow2" CELLPADDING="0" CELLSPACING="0"><TR><TD><TABLE BORDER="1" CELLPADDING="0" CELLSPACING="0" CLASS="formfixwidth">
<TR>
<TD COLSPAN="2"><INPUT NAME="post_overview" TITLE="Mostrar as principais características do aparelho resumidamente" TYPE="SUBMIT" VALUE="Visão geral">&nbsp;&nbsp;&nbsp;<INPUT NAME="post_route" TITLE="Mostar a tabela atual de roteamento do aparelho" TYPE="SUBMIT" VALUE="Roteamento">
EOF

if [ "$(nvram get wl0_mode)" != "ap" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_scan" TITLE="Procurar por estações Wlan" TYPE="SUBMIT" VALUE="Procurar Wlan">
EOF

fi
if [ "$ff_httpinfo" != "0" ];then

cat<<EOF
&nbsp;
<INPUT NAME="post_olsr" TITLE="Mostrar página com informações sobre a situação atual do OLSR" TYPE="SUBMIT" VALUE="Informação OLSR">
EOF

fi
WLMASK=$(ip -f inet addr show dev $WLDEV label $WLDEV |sed -ne'2{s# \+inet \([0-9\.\/]\+\).*#\1#;p}')

cat<<EOF
</TD>
</TR>
<TR>
<TD COLSPAN="2">&nbsp;</TD>
</TR>
<TR>
<TD>Endere&ccedil;o IP:</TD>
<TD>IP:&nbsp;$(ip -f inet addr show dev $WLDEV label $WLDEV |sed -ne'2{s/ \+inet \([0-9\.]\+\).*/\1/;p}'),
M&aacute;scara:&nbsp;$(test -n "$WLMASK" && ipcalc -m $WLMASK|cut -d'=' -f2),
MAC:&nbsp;$(ip link show dev $WLDEV|sed -ne'2{s/.*ether \+\([^ ]\+\).*/\1/;p}')</TD>
</TR>
<TR>
<TD>Situa&ccedil;&atilde;o
atual Wlan:</TD>
<TD>
$(/usr/sbin/wl -i $WLDEV status 2>&1)</TD>
</TR>
<TR>
<TD>Dura&ccedil;&atilde;o Online</TD>
<TD>$(uptime)</TD>
</TR>
<TR>
<TD>Informa&ccedil;&otilde;es
do aparelho</TD>
<TD>Boardtype: $(nvram get boardtype), Boardnum: $(nvram get boardnum)</TD>
</TR>
<TR>
<TD>Gateway
padr&atilde;o :</TD>
<TD>$(ip route list exact 0/0|sed '1q'|sed 's#\([0-9]\+\.[0-9]\+\.[0-9]\+\.[0-9]\+\)#<A HREF="http://\1/cgi-bin-status.html">\1</A>#')
EOF

if [ "$ff_httpinfo" != "0" ];then

cat<<EOF
</TD>
</TR>
<TR>
<TD>Vizinhos:</TD>
<TD>
EOF

wget -q -O - http://127.0.0.1:2006/neighbours|sed -ne'
/^Table: Links/{
s/.*/<\TABLE FRAME="VOID" BORDER="1" CELLSPACING="0" CELLPADDING="1" WIDTH="100%">/
:n
p
n
s/^[^	]*	//
s/^remote //
s#\([0-9]\+\.[0-9]\+\.[0-9]\+\.[0-9]\+\)\([^/]\)#<A HREF="http://\1/cgi-bin-status.html">\1</A>\2#g
s/	$//
s#	#</TD><TD>#g
s#.\+#<TR><TD STYLE="padding-right:100">&</TD></TR>#
s/./&/
tn
c\
<\/TABLE>
p
}
'
fi

cat<<EOF
</TD>
</TR>
<TR>
<TD> Registro
de dados do Kernel:</TD>
<TD><A HREF="#" ONCLICK="return fold('dmesg')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="dmesg">'
dmesg 2>&1
echo '</PRE>'
if pidof syslogd>/dev/null;then

cat<<EOF
</TD>
</TR>
<TR>
<TD> Registro
de dados do Sistema:</TD>
<TD><A HREF="#" ONCLICK="return fold('logread')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="logread">'
logread 2>&1
echo '</PRE>'
fi

cat<<EOF
</TD>
</TR>
<TR>
<TD>
Tabela IP-NAT:</TD>
<TD><A HREF="#" ONCLICK="return fold('nat')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="nat">'
iptables -t nat -L -n -v 2>&1
echo '</PRE>'

cat<<EOF
</TD>
</TR>
<TR>
<TD> Configura&ccedil;&otilde;es da
interfaces:</TD>
<TD><A HREF="#" ONCLICK="return fold('ifconfig')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="ifconfig">'
echo "lan_ifnames=$(nvram get lan_ifnames)"
echo "lan_ifname=$(nvram get lan_ifname)"
echo "wl0_ifname=$(nvram get wl0_ifname)"
echo "wifi_ifname=$(nvram get wifi_ifname)"
echo "wan_ifname=$(nvram get wan_ifname)"
echo
brctl show 2>&1
echo
ip addr show 2>&1
echo '</PRE>'

cat<<EOF
</TD>
</TR>
<TR>
<TD> Configura&ccedil;&otilde;es
da NVRAM:</TD>
<TD><A HREF="#" ONCLICK="return fold('nvram')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="nvram">'
nvram show 2>&-|sort|sed -ne'
/^wifi_/p
/^wl0_/{
s/wpa\|wep\|key/&/
t
p
}
/^ff_/{
s/adm\|key\|pw\|pass\|user\|txpwr/&/
t
p
}
'
echo '</PRE>'

cat<<EOF
</TD>
</TR>
<TR>
<TD>
Conex&ccedil;&otilde;es
ativas:</TD>
<TD><A HREF="#" ONCLICK="return fold('conntrk')">Mostrar
/ Esconder</A></TD>
</TR>
<TR>
<TD COLSPAN="2">
EOF

echo -n '<PRE STYLE="display:none" ID="conntrk">'
eval $(sed -e'
s/src=\([0-9\.]\+\).*/conn_\1=$(( \$conn_\1 + 1 ));/
s/^.* conn_/conn_/
s/\./_/g
' /proc/net/ip_conntrack)
set|sed -ne"
s/^conn_//
tp
b
:p
s/_/./g
s/^\(.*\)='\([0-9]\+\)'/\2	\1/
p
"|sort
echo '</PRE>'

cat<<EOF
</TD>
</TR>
</TABLE></TD></TR></TABLE></TD></TR></TABLE></TD></TR></TABLE>
</FORM>
EOF

if [ "00:90:96:00:00:00" = "$(nvram get et0macaddr)" ] || [ "00:90:96:00:00:02" = "$(nvram get il0macaddr)" ]; then

cat<<EOF
<P>
<B>Aten&ccedil;&atilde;o</B>:
Este aparelho SE505 n&atilde;o tem o endere&ccedil;o-MAC certo. Isto
acontece no ato de reiniciar o aparelho com as informa&ccedil;&otilde;es
de f&aacute;brica. Leia o endere&ccedil;o-MAC na parte inferior do
aparelho e corrija manualmente na linha de comando, por exemplo com
<CODE>nvram&nbsp;set&nbsp;et0macaddr=xx:xx:xx:xx:xx:xx</CODE>, <CODE>nvram&nbsp;set&nbsp;il0macaddr=xx:xx:xx:xx:xx:[xx+1]</CODE>,
<CODE>nvram&nbsp;commit</CODE> e <CODE>reboot</CODE> para reiniciar o
aparelho. </P>
EOF

fi
fi

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