[openfirmware] [commit] r2553 - dev
repository service
svn at openfirmware.info
Fri Sep 30 02:15:07 CEST 2011
Author: wmb
Date: Fri Sep 30 02:15:06 2011
New Revision: 2553
URL: http://tracker.coreboot.org/trac/openfirmware/changeset/2553
Log:
Libertas driver - trac #11230 - WLAN selftest - added association test that runs if there is an OLPCOFW access point.
Modified:
dev/libertas.fth
Modified: dev/libertas.fth
==============================================================================
--- dev/libertas.fth Fri Sep 30 02:13:12 2011 (r2552)
+++ dev/libertas.fth Fri Sep 30 02:15:06 2011 (r2553)
@@ -926,7 +926,7 @@
d# 34 instance buffer: scan-ssid
-0 value scan-type
+0 instance value scan-type
: active-scan ( -- ) 0 to scan-type ;
: passive-scan ( -- ) 1 to scan-type ;
@@ -2088,6 +2088,24 @@
: reset ( -- flag ) reset-nic ;
+: test-association ( -- error? )
+ passive-scan
+ " OLPCOFW" " scan-ssid?" $call-supplicant if
+ " (do-associate)" $call-supplicant if
+ \ Success
+ " target-mac$" $call-supplicant disassociate
+ true to ssid-reset?
+ false
+ else
+ true
+ then
+ else
+ \ There is no OLPCOFW access point, so we don't try associating
+ false
+ then
+ active-scan
+;
+
: (scan-wifi) ( -- error? )
true to force-open?
open
@@ -2106,7 +2124,8 @@
true
then
else ( adr len )
- drop .ssids false
+ drop .ssids ( )
+ test-association ( error? )
then
then
More information about the openfirmware
mailing list