openbsc/contrib/rtp/rtp_replay.st


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

"
Simple UDP replay from the state files
"

PackageLoader fileInPackage: #Sockets.
FileStream fileIn: 'rtp_replay_shared.st'.


Eval [
    | replay |


    replay := RTPReplay on: Smalltalk arguments first.

    Transcript nextPutAll: 'Going to stream now'; nl.
    replay streamAudio: '127.0.0.1' port: 4000.
]