diff --git a/BSC.st b/BSC.st new file mode 100644 index 0000000..34d6c5c --- /dev/null +++ b/BSC.st @@ -0,0 +1,24 @@ +Object subclass: BSCConfig [ + | lacs password | + + + BSCConfig class >> initialize: aPassword [ + ^ (self new) + initialize; + password: aPassword; + yourself + ] + + initialize [ + lacs := OrderedCollection new. + ] + + password: aPassword [ + password := aPassword. + ] + + addLac: aLac [ + lacs add: aLac. + ] +] + diff --git a/Server.st b/Server.st new file mode 100644 index 0000000..4963ae6 --- /dev/null +++ b/Server.st @@ -0,0 +1,32 @@ +PackageLoader fileInPackage: 'OsmoNetwork'. +PackageLoader fileInPackage: 'OsmoLogging'. + +Object subclass: IPAConnection [ + | socket bsc rx tx | + + + IPAConnection class >> createOn: aSocket [ + + ] +] + + +Object subclass: IPAServer [ + | socket addr port | + + IPAServer class >> listenOn: anAddr port: aPort [ + ^ (self new) + addr: anAddr port: aPort. + ] + + addr: anAddr port: aPort [ + + addr := anAddr. + port := aPort. + ] + + listen [ + ] +]