[commit] r2553 - dev

[repository service]

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