source: freewrt/package/comgt/files/hsoauth.comgt@ 621d5d2

freewrt_2_0
Last change on this file since 621d5d2 was b676a7b, checked in by Markus Wigge <markus@…>, 17 years ago

the only available documentation is wrong here, username and password are required contrariwise.

git-svn-id: svn://www.freewrt.org/branches/freewrt_1_0@3804 afb5a338-a214-0410-bd46-81f09a774fd1

  • Property mode set to 100644
File size: 404 bytes
Line 
1opengt
2 set com 115200n81
3 set senddelay 0.02
4 waitquiet 1 0.2
5
6:start
7 flash 0.1
8
9:getuser
10 let $u=$env("USER")
11 let a=len($u)
12 if a=0 goto continue
13
14:getpass
15 let $p=$env("PASS")
16
17:auth
18 print "User: ",$u,"\n"
19 print "Pass: ",$p,"\n"
20 send "AT$QCPDPP=1,1,\""
21 send $p
22 send "\",\""
23 send $u
24 send "\"^m"
25 waitfor 2 "OK"
26 if % = -1 goto error
27 if % = 0 goto continue
28
29:error
30 exit 1
31
32:continue
33 exit 0
34
Note: See TracBrowser for help on using the repository browser.