tests: Prepare a class that helps in writing GSM tests

The goal is to be able to bring up a BTS, ask for radio channels
and provide default handling for common messages. This is mostly
all varpoware right now.

fakebts/OpenBSCTest.st

@@ -0,0 +1,36 @@
+"
+ (C) 2012 by Holger Hans Peter Freyther
+ All Rights Reserved
+
+ This program is free software: you can redistribute it and/or modify
+ it under the terms of the GNU Affero General Public License as
+ published by the Free Software Foundation, either version 3 of the
+ License, or (at your option) any later version.
+
+ This program is distributed in the hope that it will be useful,
+ but WITHOUT ANY WARRANTY; without even the implied warranty of
+ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ GNU Affero General Public License for more details.
+
+ You should have received a copy of the GNU Affero General Public License
+ along with this program.  If not, see <http://www.gnu.org/licenses/>.
+"
+
+Object subclass: OpenBSCTest [
+    | bts |
+    <category: 'OpenBSC-Test'>
+    <comment: 'I help in dealing with setup and teardown of a test'>
+
+    createAndConnectBTS [
+        <category: 'bts'>
+        bts := BTS new.
+        bts connect: 'localhost'.
+        bts waitForBTSReady.
+    ]
+
+    requireAnyChannel [
+        <category: 'bts'>
+        "Require a Radio Channel of any type"
+    ]
+]
+