mirror of
git://projects.qi-hardware.com/openwrt-xburst.git
synced 2024-11-09 07:14:03 +02:00
27 lines
403 B
Plaintext
27 lines
403 B
Plaintext
|
# set wwan mode from environment
|
||
|
opengt
|
||
|
set com 115200n81
|
||
|
set senddelay 0.02
|
||
|
waitquiet 1 0.2
|
||
|
flash 0.1
|
||
|
|
||
|
:start
|
||
|
print "Trying to set mode\n"
|
||
|
send $env("MODE")
|
||
|
send "^m"
|
||
|
|
||
|
waitfor 15 "OK","ERR","ERROR"
|
||
|
if % = 0 goto continue
|
||
|
if % = 1 goto modeerror
|
||
|
if % = 2 goto modeerror
|
||
|
|
||
|
print "Timeout setting WWAN mode!\n"
|
||
|
exit 1
|
||
|
|
||
|
:modeerror
|
||
|
print "Error setting WWAN mode!\n"
|
||
|
exit 1
|
||
|
|
||
|
:continue
|
||
|
exit 0
|