This repository has been archived on 2022-02-17. You can view files and clone it, but cannot push or open issues or pull requests.
2011-06-13 14:26:49 +00:00
|
|
|
st> transport := SIPUdpTransport startOn: '172.16.254.33'.
|
|
|
|
st> useragent := SIPUserAgent createOn: transport.
|
|
|
|
st> transport start.
|
|
|
|
|
2011-07-06 08:13:42 +00:00
|
|
|
"Create a call"
|
|
|
|
st> sdpfile := nil.
|
|
|
|
st> call := SIPCall fromUser: 'sip:1000@on-waves.com' host: '172.16.1.72' port: 5060 to: 'sip:9198@172.16.1.72' on: useragent
|
|
|
|
st> call createCall: sdpfile.
|
|
|
|
st> stdin next
|
2011-06-13 14:26:49 +00:00
|
|
|
|
2011-07-06 08:13:42 +00:00
|
|
|
"Try to hangup an active call"
|
|
|
|
st> call hangup
|
2011-06-13 14:26:49 +00:00
|
|
|
|
2011-07-06 08:13:42 +00:00
|
|
|
"Try to cancel a non active call"
|
|
|
|
st> call cancel
|
|
|
|
|
|
|
|
"Try to terminate either by hangup or by cancel"
|
|
|
|
st> call terminate
|
2011-06-13 14:26:49 +00:00
|
|
|
|