Project

General

Profile

Download (6.42 KB) Statistics
| Branch: | Tag: | Revision:
1 d0330501 Scott Ullrich
<?php
2 5b237745 Scott Ullrich
/*
3
	status_wireless.php
4 d0330501 Scott Ullrich
	Copyright (C) 2004 Scott Ullrich
5 5b237745 Scott Ullrich
	All rights reserved.
6
	
7
	Redistribution and use in source and binary forms, with or without
8
	modification, are permitted provided that the following conditions are met:
9
	
10
	1. Redistributions of source code must retain the above copyright notice,
11 d0330501 Scott Ullrich
	this list of conditions and the following disclaimer.
12 5b237745 Scott Ullrich
	
13
	2. Redistributions in binary form must reproduce the above copyright
14 d0330501 Scott Ullrich
	notice, this list of conditions and the following disclaimer in the
15
	documentation and/or other materials provided with the distribution.
16 5b237745 Scott Ullrich
	
17
	THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
18
	INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
19
	AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
20
	AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
21
	OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22
	SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23
	INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24
	CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25
	ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26
	POSSIBILITY OF SUCH DAMAGE.
27
*/
28 1d333258 Scott Ullrich
/*
29
	pfSense_MODULE:	interfaces
30
*/
31 5b237745 Scott Ullrich
32 6b07c15a Matthew Grooms
##|+PRIV
33
##|*IDENT=page-diagnostics-wirelessstatus
34 d1104fa6 Chris Buechler
##|*NAME=Status: Wireless page
35
##|*DESCR=Allow access to the 'Status: Wireless' page.
36 6b07c15a Matthew Grooms
##|*MATCH=status_wireless.php*
37
##|-PRIV
38
39 d0330501 Scott Ullrich
require_once("guiconfig.inc");
40 5b237745 Scott Ullrich
41 41740617 Rafael Lucas
$pgtitle = array(gettext("Status"),gettext("Wireless"));
42 4df96eff Scott Ullrich
include("head.inc");
43
44 d0330501 Scott Ullrich
$if = $_POST['if'];
45
if($_GET['if'] <> "")
46
	$if = $_GET['if'];
47 64b2f3c8 Ermal Lu?i
48
$ciflist = get_configured_interface_with_descr();
49
if(empty($if)) {
50 d0330501 Scott Ullrich
	/* Find the first interface
51
	   that is wireless */
52 64b2f3c8 Ermal Lu?i
	foreach($ciflist as $interface => $ifdescr) {
53 be2b47d5 Erik Fonnesbeck
		if(is_interface_wireless(get_real_interface($interface))) {
54 64b2f3c8 Ermal Lu?i
			$if = $interface;
55 be2b47d5 Erik Fonnesbeck
			break;
56
		}
57 d0330501 Scott Ullrich
	}
58
}
59 5b237745 Scott Ullrich
?>
60
61 d0330501 Scott Ullrich
<body link="#0000CC" vlink="#0000CC" alink="#0000CC">
62
<?php
63
include("fbegin.inc");
64
?>
65 53961f06 Scott Ullrich
<form action="status_wireless.php" method="post">
66 d0330501 Scott Ullrich
<?php if ($savemsg) print_info_box($savemsg); ?>
67 d0440f75 Scott Ullrich
68 d0330501 Scott Ullrich
<table width="100%" border="0" cellpadding="0" cellspacing="0">
69
<tr><td>
70
<?php
71
$tab_array = array();
72 64b2f3c8 Ermal Lu?i
foreach($ciflist as $interface => $ifdescr) {
73 88e9bceb smos
	if (is_interface_wireless(get_real_interface($interface))) {
74 64b2f3c8 Ermal Lu?i
		$enabled = false;
75 a2b724a6 Ermal Lu?i
		if($if == $interface)
76 d0330501 Scott Ullrich
			$enabled = true;
77 24357d92 jim-p
		$tab_array[] = array(gettext("Status") . " ({$ifdescr})", $enabled, "status_wireless.php?if={$interface}");
78 d0330501 Scott Ullrich
	}
79
}
80 72d2682c Erik Fonnesbeck
$rwlif = get_real_interface($if);
81 6f87ed42 Chris Buechler
if($_POST['rescanwifi'] <> "") {
82 4362a612 Chris Buechler
	mwexec_bg("/sbin/ifconfig {$rwlif} scan 2>&1");
83 c3ff89b4 Renato Botelho
	$savemsg = gettext("Rescan has been initiated in the background. Refresh this page in 10 seconds to see the results.");
84 6f87ed42 Chris Buechler
}
85 ea52942c Chris Buechler
if ($savemsg) print_info_box($savemsg);
86 d0330501 Scott Ullrich
display_top_tabs($tab_array);
87
?>
88
</td></tr>
89 53961f06 Scott Ullrich
<tr><td>
90
<div id="mainarea">
91
<table class="tabcont" colspan="3" cellpadding="3" width="100%">
92 351cbef7 Scott Ullrich
<?php
93
94 f2f0c37e Scott Ullrich
	/* table header */
95 61c22433 Erik Fonnesbeck
	print "<input type=\"hidden\" name=\"if\" id=\"if\" value=\"{$if}\">\n";
96 72d2682c Erik Fonnesbeck
	print "<tr><td colspan=7><b><input type=\"submit\" name=\"rescanwifi\" id=\"rescanwifi\" value=\"Rescan\"><br/></td></tr>\n";
97 c3ff89b4 Renato Botelho
	print "<tr><td colspan=7><b>" . gettext("Nearby access points or ad-hoc peers") . ".<br/></td></tr>\n";
98 e2d90eac Seth Mos
	print "\n<tr>";
99 f2f0c37e Scott Ullrich
	print "<tr bgcolor='#990000'>";
100
	print "<td><b><font color='#ffffff'>SSID</td>";
101
	print "<td><b><font color='#ffffff'>BSSID</td>";
102
	print "<td><b><font color='#ffffff'>CHAN</td>";
103
	print "<td><b><font color='#ffffff'>RATE</td>";
104
	print "<td><b><font color='#ffffff'>RSSI</td>";
105
	print "<td><b><font color='#ffffff'>INT</td>";
106
	print "<td><b><font color='#ffffff'>CAPS</td>";
107
	print "</tr>\n\n";
108
109 64b2f3c8 Ermal Lu?i
	exec("/sbin/ifconfig {$rwlif} list scan 2>&1", $states, $ret);
110 e2d90eac Seth Mos
	/* Skip Header */
111
	array_shift($states);
112 d0330501 Scott Ullrich
113 f2f0c37e Scott Ullrich
	$counter=0;
114
	foreach($states as $state) {
115 e2d90eac Seth Mos
		/* Split by Mac address for the SSID Field */
116 22275785 Seth Mos
		$split = preg_split("/([0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f])/i", $state);
117
		preg_match("/([0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f]\:[0-9a-f][[0-9a-f])/i", $state, $bssid);
118 e2d90eac Seth Mos
		$ssid = $split[0];
119 22275785 Seth Mos
		$bssid = $bssid[0];
120 e2d90eac Seth Mos
		/* Split the rest by using spaces for this line using the 2nd part */
121
		$split = preg_split("/[ ]+/i", $split[1]);
122
		$channel = $split[1];
123
		$rate = $split[2];
124
		$rssi = $split[3];
125
		$int = $split[4];
126
		$caps = "$split[5] $split[6] $split[7] $split[8] $split[9] $split[10] $split[11] ";
127
128 bdeca4ed Scott Ullrich
		print "<tr>";
129 e2d90eac Seth Mos
		print "<td>{$ssid}</td>";
130
		print "<td>{$bssid}</td>";
131
		print "<td>{$channel}</td>";
132
		print "<td>{$rate}</td>";
133
		print "<td>{$rssi}</td>";
134
		print "<td>{$int}</td>";
135
		print "<td>{$caps}</td>";
136 6c40c007 Scott Ullrich
		print "</tr>\n";
137 f2f0c37e Scott Ullrich
	}
138 c29ad853 Scott Ullrich
139
	print "</table><table class=\"tabcont\" colspan=\"3\" cellpadding=\"3\" width=\"100%\">";
140
141 f2f0c37e Scott Ullrich
	/* table header */
142 41740617 Rafael Lucas
        print "\n<tr>";
143 5943a23f jim-p
        print "<tr><td colspan=7><b>" . gettext("Associated or ad-hoc peers") . "<br/></td></tr>\n";
144 f2f0c37e Scott Ullrich
	print "<tr bgcolor='#990000'>";
145
	print "<td><b><font color='#ffffff'>ADDR</td>";
146
	print "<td><b><font color='#ffffff'>AID</td>";
147
	print "<td><b><font color='#ffffff'>CHAN</td>";
148
	print "<td><b><font color='#ffffff'>RATE</td>";
149
	print "<td><b><font color='#ffffff'>RSSI</td>";
150
	print "<td><b><font color='#ffffff'>IDLE</td>";
151
	print "<td><b><font color='#ffffff'>TXSEQ</td>";
152
	print "<td><b><font color='#ffffff'>RXSEQ</td>";
153
	print "<td><b><font color='#ffffff'>CAPS</td>";
154
	print "<td><b><font color='#ffffff'>ERP</td>";
155
	print "</tr>\n\n";
156 d0330501 Scott Ullrich
157 105bb6a6 Seth Mos
	$states = array();
158 64b2f3c8 Ermal Lu?i
	exec("/sbin/ifconfig {$rwlif} list sta 2>&1", $states, $ret);
159 e2d90eac Seth Mos
	array_shift($states);
160 f2f0c37e Scott Ullrich
161
	$counter=0;
162
	foreach($states as $state) {
163 105bb6a6 Seth Mos
		$split = preg_split("/[ ]+/i", $state);
164
		/* Split the rest by using spaces for this line using the 2nd part */
165 f2f0c37e Scott Ullrich
		print "<tr>";
166 105bb6a6 Seth Mos
		print "<td>{$split[0]}</td>";
167
		print "<td>{$split[1]}</td>";
168
		print "<td>{$split[2]}</td>";
169
		print "<td>{$split[3]}</td>";
170
		print "<td>{$split[4]}</td>";
171
		print "<td>{$split[5]}</td>";
172
		print "<td>{$split[6]}</td>";
173
		print "<td>{$split[7]}</td>";
174
		print "<td>{$split[8]}</td>";
175
		print "<td>{$split[9]}</td>";
176 f2f0c37e Scott Ullrich
		print "</tr>\n";
177
	}
178 351cbef7 Scott Ullrich
179 f2f0c37e Scott Ullrich
/* XXX: what stats to we get for adhoc mode? */ 
180
181 351cbef7 Scott Ullrich
?>
182 d0330501 Scott Ullrich
</table>
183 4ca92170 Chris Buechler
</div><br>
184
                  <b>Flags:</b> A = authorized, E = Extended Rate (802.11g), P = Power save mode<br>
185
                  <b>Capabilities:</b> E = ESS (infrastructure mode), I = IBSS (ad-hoc mode), P = privacy (WEP/TKIP/AES),
186
                  	S = Short preamble, s = Short slot time
187 d0330501 Scott Ullrich
</td></tr>
188
</table>
189 d0440f75 Scott Ullrich
190 5b237745 Scott Ullrich
<?php include("fend.inc"); ?>
191 d0330501 Scott Ullrich
</body>
192
</html>