start
=====

echo 0 | sudo tee /sys/devices/platform/neo1973-pm-gsm.0/power_on
echo 1 | sudo tee /sys/devices/platform/neo1973-pm-gsm.0/power_on
echo 1 | sudo tee /sys/devices/platform/neo1973-pm-gsm.0/reset
socat - file:/dev/ttySAC0,crtscts,crnl,b115200
expect "AT-Command Interpreter ready"
send ATE0
expect ATE0
expect OK
send AT+CFUN=1
expect ERROR
send AT+CPIN="0000"
expect OK
send AT+CPIN?
expect ""
expect +CPIN: READY
expect ""
expect OK
send AT+COPS
send AT+COPS?
expect +COPS: 0
or expect +COPS: 0,0,"Saunalahti"
=> registered

registered
==========

if received RING
=> incoming1

if received order to call X
=> outgoing1(X)

incoming1
=========

alsactl restore -f /usr/share/openmoko/scenarios/stereoout.state
start ringtone

if received order to answer
stop ringtone
alsactl restore -f /usr/share/openmoko/scenarios/gsmhandset.state
send ATA
expect ???
=> call1

outgoing1(X)
========

send ATDT${X}
expect ???

call1
=====

if received order to hangup
or received ???
send ATH
expect ???

=> registered