aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorNeels Hofmeyr <nhofmeyr@sysmocom.de>2017-07-13 02:03:50 +0200
committerNeels Hofmeyr <neels@hofmeyr.de>2017-08-30 14:14:58 +0200
commitee6cfdc0d9710e3a69c8e1939eb21c8f2b759885 (patch)
treeed5aeb0979a1838778649078847a1ed6caa6b1a4 /src
parent6c809185ee86d318d10205756bb6d91914d11fdf (diff)
split off osmo-sgsn: remove files, apply build1.1.0
Diffstat (limited to 'src')
-rw-r--r--src/Makefile.am29
-rw-r--r--src/gprs/Makefile.am5
-rw-r--r--src/gprs/gb_proxy.c3
-rw-r--r--src/gprs/gb_proxy_main.c35
-rw-r--r--src/gprs/gb_proxy_patch.c3
-rw-r--r--src/gprs/gb_proxy_peer.c5
-rw-r--r--src/gprs/gb_proxy_vty.c2
-rw-r--r--src/gprs/gprs_gmm.c7
-rw-r--r--src/gprs/gprs_llc.c3
-rw-r--r--src/gprs/gprs_llc_parse.c1
-rw-r--r--src/gprs/gprs_llc_vty.c1
-rw-r--r--src/gprs/gprs_sgsn.c2
-rw-r--r--src/gprs/gprs_sndcp.c1
-rw-r--r--src/gprs/gprs_sndcp_vty.c1
-rw-r--r--src/gprs/gsup_client.c355
-rw-r--r--src/gprs/gtphub_main.c35
-rw-r--r--src/gprs/gtphub_vty.c1
-rw-r--r--src/gprs/oap_client.c280
-rw-r--r--src/gprs/sgsn_ares.c2
-rw-r--r--src/gprs/sgsn_ctrl.c1
-rw-r--r--src/gprs/sgsn_main.c54
-rw-r--r--src/gprs/sgsn_vty.c2
-rw-r--r--src/ipaccess/Makefile.am66
-rw-r--r--src/ipaccess/abisip-find.c216
-rw-r--r--src/ipaccess/ipaccess-config.c1019
-rw-r--r--src/ipaccess/ipaccess-firmware.c135
-rw-r--r--src/ipaccess/ipaccess-proxy.c1226
-rw-r--r--src/ipaccess/network_listen.c257
-rw-r--r--src/libbsc/Makefile.am57
-rw-r--r--src/libbsc/abis_nm.c2924
-rw-r--r--src/libbsc/abis_nm_ipaccess.c87
-rw-r--r--src/libbsc/abis_nm_vty.c191
-rw-r--r--src/libbsc/abis_om2000.c2776
-rw-r--r--src/libbsc/abis_om2000_vty.c609
-rw-r--r--src/libbsc/abis_rsl.c2939
-rw-r--r--src/libbsc/arfcn_range_encode.c330
-rw-r--r--src/libbsc/bsc_api.c897
-rw-r--r--src/libbsc/bsc_ctrl_commands.c459
-rw-r--r--src/libbsc/bsc_ctrl_lookup.c107
-rw-r--r--src/libbsc/bsc_dyn_ts.c77
-rw-r--r--src/libbsc/bsc_init.c567
-rw-r--r--src/libbsc/bsc_msc.c320
-rw-r--r--src/libbsc/bsc_rf_ctrl.c534
-rw-r--r--src/libbsc/bsc_rll.c139
-rw-r--r--src/libbsc/bsc_subscriber.c168
-rw-r--r--src/libbsc/bsc_vty.c4412
-rw-r--r--src/libbsc/bts_ericsson_rbs2000.c204
-rw-r--r--src/libbsc/bts_init.c30
-rw-r--r--src/libbsc/bts_ipaccess_nanobts.c520
-rw-r--r--src/libbsc/bts_ipaccess_nanobts_omlattr.c240
-rw-r--r--src/libbsc/bts_nokia_site.c1739
-rw-r--r--src/libbsc/bts_siemens_bs11.c602
-rw-r--r--src/libbsc/bts_sysmobts.c60
-rw-r--r--src/libbsc/bts_unknown.c40
-rw-r--r--src/libbsc/chan_alloc.c543
-rw-r--r--src/libbsc/e1_config.c297
-rw-r--r--src/libbsc/gsm_04_08_utils.c632
-rw-r--r--src/libbsc/gsm_04_80_utils.c40
-rw-r--r--src/libbsc/handover_decision.c325
-rw-r--r--src/libbsc/handover_logic.c381
-rw-r--r--src/libbsc/meas_proc.c84
-rw-r--r--src/libbsc/meas_rep.c115
-rw-r--r--src/libbsc/net_init.c80
-rw-r--r--src/libbsc/paging.c456
-rw-r--r--src/libbsc/pcu_sock.c742
-rw-r--r--src/libbsc/rest_octets.c860
-rw-r--r--src/libbsc/system_information.c1169
-rw-r--r--src/libcommon-cs/Makefile.am21
-rw-r--r--src/libcommon-cs/a_reset.c224
-rw-r--r--src/libcommon-cs/common_cs.c154
-rw-r--r--src/libcommon-cs/common_cs_vty.c360
-rw-r--r--src/libcommon/common_vty.c1
-rw-r--r--src/libfilter/Makefile.am26
-rw-r--r--src/libfilter/bsc_msg_acc.c119
-rw-r--r--src/libfilter/bsc_msg_filter.c398
-rw-r--r--src/libfilter/bsc_msg_vty.c140
-rw-r--r--src/libmsc/Makefile.am75
-rw-r--r--src/libmsc/a_iface.c591
-rw-r--r--src/libmsc/a_iface_bssap.c716
-rw-r--r--src/libmsc/auth.c42
-rw-r--r--src/libmsc/ctrl_commands.c88
-rw-r--r--src/libmsc/db.c1007
-rw-r--r--src/libmsc/gsm_04_08.c3493
-rw-r--r--src/libmsc/gsm_04_11.c1189
-rw-r--r--src/libmsc/gsm_04_80.c155
-rw-r--r--src/libmsc/gsm_subscriber.c190
-rw-r--r--src/libmsc/iucs.c189
-rw-r--r--src/libmsc/iucs_ranap.c104
-rw-r--r--src/libmsc/meas_feed.c168
-rw-r--r--src/libmsc/meas_feed.h12
-rw-r--r--src/libmsc/mncc.c107
-rw-r--r--src/libmsc/mncc_builtin.c383
-rw-r--r--src/libmsc/mncc_sock.c317
-rw-r--r--src/libmsc/msc_ifaces.c423
-rw-r--r--src/libmsc/msc_vty.c162
-rw-r--r--src/libmsc/osmo_msc.c387
-rw-r--r--src/libmsc/rrlp.c104
-rw-r--r--src/libmsc/silent_call.c165
-rw-r--r--src/libmsc/smpp_openbsc.c794
-rw-r--r--src/libmsc/smpp_smsc.c1037
-rw-r--r--src/libmsc/smpp_smsc.h167
-rw-r--r--src/libmsc/smpp_utils.c62
-rw-r--r--src/libmsc/smpp_vty.c612
-rw-r--r--src/libmsc/sms_queue.c578
-rw-r--r--src/libmsc/subscr_conn.c359
-rw-r--r--src/libmsc/transaction.c221
-rw-r--r--src/libmsc/ussd.c103
-rw-r--r--src/libmsc/vty_interface_layer3.c979
-rw-r--r--src/libtrau/Makefile.am31
-rw-r--r--src/libtrau/rtp_proxy.c764
-rw-r--r--src/libtrau/trau_mux.c547
-rw-r--r--src/libtrau/trau_upqueue.c27
-rw-r--r--src/libvlr/Makefile.am19
-rw-r--r--src/libvlr/vlr.c1112
-rw-r--r--src/libvlr/vlr_access_req_fsm.c795
-rw-r--r--src/libvlr/vlr_access_req_fsm.h17
-rw-r--r--src/libvlr/vlr_auth_fsm.c605
-rw-r--r--src/libvlr/vlr_auth_fsm.h52
-rw-r--r--src/libvlr/vlr_core.h21
-rw-r--r--src/libvlr/vlr_lu_fsm.c1449
-rw-r--r--src/libvlr/vlr_lu_fsm.h18
-rw-r--r--src/osmo-bsc/Makefile.am57
-rw-r--r--src/osmo-bsc/osmo_bsc_api.c569
-rw-r--r--src/osmo-bsc/osmo_bsc_audio.c141
-rw-r--r--src/osmo-bsc/osmo_bsc_bssap.c721
-rw-r--r--src/osmo-bsc/osmo_bsc_ctrl.c680
-rw-r--r--src/osmo-bsc/osmo_bsc_filter.c381
-rw-r--r--src/osmo-bsc/osmo_bsc_grace.c169
-rw-r--r--src/osmo-bsc/osmo_bsc_main.c307
-rw-r--r--src/osmo-bsc/osmo_bsc_msc.c600
-rw-r--r--src/osmo-bsc/osmo_bsc_reset.c190
-rw-r--r--src/osmo-bsc/osmo_bsc_sigtran.c561
-rw-r--r--src/osmo-bsc/osmo_bsc_vty.c1039
-rw-r--r--src/osmo-bsc_nat/Makefile.am61
-rw-r--r--src/osmo-bsc_nat/bsc_filter.c218
-rw-r--r--src/osmo-bsc_nat/bsc_mgcp_utils.c1151
-rw-r--r--src/osmo-bsc_nat/bsc_nat.c1739
-rw-r--r--src/osmo-bsc_nat/bsc_nat_ctrl.c525
-rw-r--r--src/osmo-bsc_nat/bsc_nat_filter.c119
-rw-r--r--src/osmo-bsc_nat/bsc_nat_rewrite.c714
-rw-r--r--src/osmo-bsc_nat/bsc_nat_rewrite_trie.c259
-rw-r--r--src/osmo-bsc_nat/bsc_nat_utils.c535
-rw-r--r--src/osmo-bsc_nat/bsc_nat_vty.c1336
-rw-r--r--src/osmo-bsc_nat/bsc_sccp.c247
-rw-r--r--src/osmo-bsc_nat/bsc_ussd.c454
-rw-r--r--src/osmo-msc/Makefile.am58
-rw-r--r--src/osmo-msc/msc_main.c589
-rw-r--r--src/utils/Makefile.am147
-rw-r--r--src/utils/bs11_config.c953
-rw-r--r--src/utils/isdnsync.c189
-rw-r--r--src/utils/meas_db.c330
-rw-r--r--src/utils/meas_db.h17
-rw-r--r--src/utils/meas_json.c190
-rw-r--r--src/utils/meas_pcap2db.c138
-rw-r--r--src/utils/meas_udp2db.c126
-rw-r--r--src/utils/meas_vis.c310
-rw-r--r--src/utils/smpp_mirror.c359
157 files changed, 760 insertions, 67797 deletions
diff --git a/src/Makefile.am b/src/Makefile.am
index 70e53ac3e..4d1bba47a 100644
--- a/src/Makefile.am
+++ b/src/Makefile.am
@@ -19,34 +19,7 @@ AM_LDFLAGS = \
$(COVERAGE_LDFLAGS) \
$(NULL)
-# Libraries
-SUBDIRS = \
- libcommon \
- libvlr \
- libbsc \
- libmsc \
- libtrau \
- libfilter \
- libcommon-cs \
- $(NULL)
-
# Programs
-SUBDIRS += \
- osmo-msc \
- utils \
- ipaccess \
+SUBDIRS = \
gprs \
$(NULL)
-
-# Conditional Programs
-if BUILD_NAT
-SUBDIRS += \
- osmo-bsc_nat \
- $(NULL)
-endif
-
-if BUILD_BSC
-SUBDIRS += \
- osmo-bsc \
- $(NULL)
-endif
diff --git a/src/gprs/Makefile.am b/src/gprs/Makefile.am
index 39a4c12a7..654604b80 100644
--- a/src/gprs/Makefile.am
+++ b/src/gprs/Makefile.am
@@ -62,7 +62,6 @@ osmo_gbproxy_SOURCES = \
gprs_utils.c \
$(NULL)
osmo_gbproxy_LDADD = \
- $(top_builddir)/src/libcommon/libcommon.a \
$(OSMO_LIBS) \
$(LIBCRYPTO_LIBS) \
-lrt \
@@ -93,9 +92,10 @@ osmo_sgsn_SOURCES = \
slhc.c \
gprs_llc_xid.c \
v42bis.c \
+ gsup_client.c \
+ oap_client.c \
$(NULL)
osmo_sgsn_LDADD = \
- $(top_builddir)/src/libcommon/libcommon.a \
$(OSMO_LIBS) \
$(LIBOSMOABIS_LIBS) \
$(LIBCARES_LIBS) \
@@ -122,7 +122,6 @@ osmo_gtphub_SOURCES = \
gprs_utils.c \
$(NULL)
osmo_gtphub_LDADD = \
- $(top_builddir)/src/libcommon/libcommon.a \
$(LIBOSMOCORE_LIBS) \
$(LIBOSMOGSM_LIBS) \
$(LIBOSMOVTY_LIBS) \
diff --git a/src/gprs/gb_proxy.c b/src/gprs/gb_proxy.c
index cd38d23bf..d288cb314 100644
--- a/src/gprs/gb_proxy.c
+++ b/src/gprs/gb_proxy.c
@@ -47,12 +47,13 @@
#include <openbsc/gb_proxy.h>
#include <openbsc/gprs_llc.h>
-#include <openbsc/gsm_04_08.h>
#include <osmocom/gsm/protocol/gsm_04_08_gprs.h>
#include <openbsc/gprs_utils.h>
#include <openssl/rand.h>
+extern void *tall_bsc_ctx;
+
static const struct rate_ctr_desc global_ctr_description[] = {
{ "inv-bvci", "Invalid BVC Identifier " },
{ "inv-lai", "Invalid Location Area Identifier" },
diff --git a/src/gprs/gb_proxy_main.c b/src/gprs/gb_proxy_main.c
index caff27f6f..853a763a2 100644
--- a/src/gprs/gb_proxy_main.c
+++ b/src/gprs/gb_proxy_main.c
@@ -190,13 +190,39 @@ static void handle_options(int argc, char **argv)
}
}
-extern int bsc_vty_go_parent(struct vty *vty);
+int gbproxy_vty_is_config_node(struct vty *vty, int node)
+{
+ switch (node) {
+ /* add items that are not config */
+ case CONFIG_NODE:
+ return 0;
+
+ default:
+ return 1;
+ }
+}
+
+int gbproxy_vty_go_parent(struct vty *vty)
+{
+ switch (vty->node) {
+ case GBPROXY_NODE:
+ default:
+ if (gbproxy_vty_is_config_node(vty, vty->node))
+ vty->node = CONFIG_NODE;
+ else
+ vty->node = ENABLE_NODE;
+
+ vty->index = NULL;
+ }
+
+ return vty->node;
+}
static struct vty_app_info vty_info = {
.name = "OsmoGbProxy",
.version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
+ .go_parent_cb = gbproxy_vty_go_parent,
+ .is_config_node = gbproxy_vty_is_config_node,
};
/* default categories */
@@ -226,7 +252,6 @@ static const struct log_info gprs_log_info = {
int main(int argc, char **argv)
{
- struct gsm_network dummy_network;
int rc;
tall_bsc_ctx = talloc_named_const(NULL, 0, "nsip_proxy");
@@ -271,7 +296,7 @@ int main(int argc, char **argv)
}
/* start telnet after reading config for vty_get_bind_addr() */
- rc = telnet_init_dynif(tall_bsc_ctx, &dummy_network,
+ rc = telnet_init_dynif(tall_bsc_ctx, NULL,
vty_get_bind_addr(), OSMO_VTY_PORT_GBPROXY);
if (rc < 0)
exit(1);
diff --git a/src/gprs/gb_proxy_patch.c b/src/gprs/gb_proxy_patch.c
index 210fb2b96..bee315036 100644
--- a/src/gprs/gb_proxy_patch.c
+++ b/src/gprs/gb_proxy_patch.c
@@ -23,13 +23,14 @@
#include <openbsc/gprs_utils.h>
#include <openbsc/gprs_gb_parse.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/debug.h>
#include <osmocom/gprs/protocol/gsm_08_18.h>
#include <osmocom/core/rate_ctr.h>
#include <osmocom/gsm/apn.h>
+extern void *tall_bsc_ctx;
+
/* patch RA identifier in place */
static void gbproxy_patch_raid(uint8_t *raid_enc, struct gbproxy_peer *peer,
int to_bss, const char *log_text)
diff --git a/src/gprs/gb_proxy_peer.c b/src/gprs/gb_proxy_peer.c
index 890968717..a83630bc1 100644
--- a/src/gprs/gb_proxy_peer.c
+++ b/src/gprs/gb_proxy_peer.c
@@ -22,17 +22,18 @@
#include <openbsc/gb_proxy.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_data_shared.h>
#include <openbsc/debug.h>
#include <osmocom/gprs/protocol/gsm_08_18.h>
#include <osmocom/core/rate_ctr.h>
#include <osmocom/core/stats.h>
#include <osmocom/core/talloc.h>
+#include <osmocom/gsm/tlv.h>
#include <string.h>
+extern void *tall_bsc_ctx;
+
static const struct rate_ctr_desc peer_ctr_description[] = {
{ "blocked", "BVC Block " },
{ "unblocked", "BVC Unblock " },
diff --git a/src/gprs/gb_proxy_vty.c b/src/gprs/gb_proxy_vty.c
index 86d65a8e3..bd5bb1b5b 100644
--- a/src/gprs/gb_proxy_vty.c
+++ b/src/gprs/gb_proxy_vty.c
@@ -26,8 +26,8 @@
#include <osmocom/core/talloc.h>
#include <osmocom/core/rate_ctr.h>
+#include <osmocom/gsm/gsm48.h>
-#include <openbsc/gsm_04_08.h>
#include <osmocom/gprs/gprs_ns.h>
#include <osmocom/gsm/apn.h>
diff --git a/src/gprs/gprs_gmm.c b/src/gprs/gprs_gmm.c
index 032137f0b..7301bf1c2 100644
--- a/src/gprs/gprs_gmm.c
+++ b/src/gprs/gprs_gmm.c
@@ -35,7 +35,6 @@
#include "bscconfig.h"
-#include <openbsc/db.h>
#include <osmocom/core/msgb.h>
#include <osmocom/gsm/tlv.h>
#include <osmocom/gsm/gsm_utils.h>
@@ -56,11 +55,6 @@
#endif
#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/paging.h>
-#include <openbsc/transaction.h>
#include <openbsc/gprs_llc.h>
#include <openbsc/gprs_sgsn.h>
#include <openbsc/gprs_gmm.h>
@@ -75,6 +69,7 @@
#define PTMSI_ALLOC
extern struct sgsn_instance *sgsn;
+extern void *tall_bsc_ctx;
static const struct tlv_definition gsm48_gmm_att_tlvdef = {
.def = {
diff --git a/src/gprs/gprs_llc.c b/src/gprs/gprs_llc.c
index 2be663f98..904ec7e07 100644
--- a/src/gprs/gprs_llc.c
+++ b/src/gprs/gprs_llc.c
@@ -31,15 +31,14 @@
#include <osmocom/core/talloc.h>
#include <osmocom/core/rate_ctr.h>
#include <osmocom/gprs/gprs_bssgp.h>
+#include <osmocom/gsm/gsm_utils.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/debug.h>
#include <openbsc/gprs_sgsn.h>
#include <openbsc/gprs_gmm.h>
#include <openbsc/gprs_llc.h>
#include <openbsc/crc24.h>
#include <openbsc/sgsn.h>
-#include <openbsc/gsm_subscriber.h>
#include <openbsc/gprs_llc_xid.h>
#include <openbsc/gprs_sndcp_comp.h>
#include <openbsc/gprs_sndcp.h>
diff --git a/src/gprs/gprs_llc_parse.c b/src/gprs/gprs_llc_parse.c
index a5a7a7122..be634974a 100644
--- a/src/gprs/gprs_llc_parse.c
+++ b/src/gprs/gprs_llc_parse.c
@@ -28,7 +28,6 @@
#include <osmocom/core/talloc.h>
#include <osmocom/gprs/gprs_bssgp.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/debug.h>
#include <openbsc/gprs_sgsn.h>
#include <openbsc/gprs_gmm.h>
diff --git a/src/gprs/gprs_llc_vty.c b/src/gprs/gprs_llc_vty.c
index bf34e9782..626d6ef1b 100644
--- a/src/gprs/gprs_llc_vty.c
+++ b/src/gprs/gprs_llc_vty.c
@@ -27,7 +27,6 @@
#include <arpa/inet.h>
-#include <openbsc/gsm_data.h>
#include <osmocom/core/msgb.h>
#include <osmocom/gsm/tlv.h>
#include <osmocom/core/talloc.h>
diff --git a/src/gprs/gprs_sgsn.c b/src/gprs/gprs_sgsn.c
index de79afb1a..560485de5 100644
--- a/src/gprs/gprs_sgsn.c
+++ b/src/gprs/gprs_sgsn.c
@@ -31,6 +31,7 @@
#include <osmocom/gprs/gprs_bssgp.h>
#include <osmocom/gsm/protocol/gsm_04_08_gprs.h>
#include <osmocom/gsm/apn.h>
+#include <osmocom/gsm/gsm_utils.h>
#include <openbsc/gprs_subscriber.h>
#include <openbsc/debug.h>
@@ -56,6 +57,7 @@
#define GPRS_LLME_CHECK_TICK 30
extern struct sgsn_instance *sgsn;
+extern void *tall_bsc_ctx;
LLIST_HEAD(sgsn_mm_ctxts);
LLIST_HEAD(sgsn_ggsn_ctxts);
diff --git a/src/gprs/gprs_sndcp.c b/src/gprs/gprs_sndcp.c
index a18998f9e..05dad6603 100644
--- a/src/gprs/gprs_sndcp.c
+++ b/src/gprs/gprs_sndcp.c
@@ -30,7 +30,6 @@
#include <osmocom/core/talloc.h>
#include <osmocom/gprs/gprs_bssgp.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/debug.h>
#include <openbsc/gprs_llc.h>
#include <openbsc/sgsn.h>
diff --git a/src/gprs/gprs_sndcp_vty.c b/src/gprs/gprs_sndcp_vty.c
index 430881fc8..4bad8b040 100644
--- a/src/gprs/gprs_sndcp_vty.c
+++ b/src/gprs/gprs_sndcp_vty.c
@@ -26,7 +26,6 @@
#include <arpa/inet.h>
-#include <openbsc/gsm_data.h>
#include <osmocom/core/msgb.h>
#include <osmocom/gsm/tlv.h>
#include <osmocom/core/talloc.h>
diff --git a/src/gprs/gsup_client.c b/src/gprs/gsup_client.c
new file mode 100644
index 000000000..258f230cb
--- /dev/null
+++ b/src/gprs/gsup_client.c
@@ -0,0 +1,355 @@
+/* Generic Subscriber Update Protocol client */
+
+/* (C) 2014-2016 by Sysmocom s.f.m.c. GmbH
+ * All Rights Reserved
+ *
+ * Author: Jacob Erlbeck
+ * Author: Neels Hofmeyr
+ *
+ * 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/>.
+ *
+ */
+
+#include <openbsc/gsup_client.h>
+
+#include <osmocom/abis/ipa.h>
+#include <osmocom/gsm/protocol/ipaccess.h>
+#include <osmocom/core/msgb.h>
+#include <osmocom/core/logging.h>
+
+#include <openbsc/debug.h>
+
+#include <errno.h>
+#include <string.h>
+
+extern void *tall_bsc_ctx;
+
+static void start_test_procedure(struct gsup_client *gsupc);
+
+static void gsup_client_send_ping(struct gsup_client *gsupc)
+{
+ struct msgb *msg = gsup_client_msgb_alloc();
+
+ msg->l2h = msgb_put(msg, 1);
+ msg->l2h[0] = IPAC_MSGT_PING;
+ ipa_msg_push_header(msg, IPAC_PROTO_IPACCESS);
+ ipa_client_conn_send(gsupc->link, msg);
+}
+
+static int gsup_client_connect(struct gsup_client *gsupc)
+{
+ int rc;
+
+ if (gsupc->is_connected)
+ return 0;
+
+ if (osmo_timer_pending(&gsupc->connect_timer)) {
+ LOGP(DLGSUP, LOGL_DEBUG,
+ "GSUP connect: connect timer already running\n");
+ osmo_timer_del(&gsupc->connect_timer);
+ }
+
+ if (osmo_timer_pending(&gsupc->ping_timer)) {
+ LOGP(DLGSUP, LOGL_DEBUG,
+ "GSUP connect: ping timer already running\n");
+ osmo_timer_del(&gsupc->ping_timer);
+ }
+
+ if (ipa_client_conn_clear_queue(gsupc->link) > 0)
+ LOGP(DLGSUP, LOGL_DEBUG, "GSUP connect: discarded stored messages\n");
+
+ rc = ipa_client_conn_open(gsupc->link);
+
+ if (rc >= 0) {
+ LOGP(DLGSUP, LOGL_NOTICE, "GSUP connecting to %s:%d\n",
+ gsupc->link->addr, gsupc->link->port);
+ return 0;
+ }
+
+ LOGP(DLGSUP, LOGL_ERROR, "GSUP failed to connect to %s:%d: %s\n",
+ gsupc->link->addr, gsupc->link->port, strerror(-rc));
+
+ if (rc == -EBADF || rc == -ENOTSOCK || rc == -EAFNOSUPPORT ||
+ rc == -EINVAL)
+ return rc;
+
+ osmo_timer_schedule(&gsupc->connect_timer,
+ GSUP_CLIENT_RECONNECT_INTERVAL, 0);
+
+ LOGP(DLGSUP, LOGL_INFO, "Scheduled timer to retry GSUP connect to %s:%d\n",
+ gsupc->link->addr, gsupc->link->port);
+
+ return 0;
+}
+
+static void connect_timer_cb(void *gsupc_)
+{
+ struct gsup_client *gsupc = gsupc_;
+
+ if (gsupc->is_connected)
+ return;
+
+ gsup_client_connect(gsupc);
+}
+
+static void client_send(struct gsup_client *gsupc, int proto_ext,
+ struct msgb *msg_tx)
+{
+ ipa_prepend_header_ext(msg_tx, proto_ext);
+ ipa_msg_push_header(msg_tx, IPAC_PROTO_OSMO);
+ ipa_client_conn_send(gsupc->link, msg_tx);
+ /* msg_tx is now queued and will be freed. */
+}
+
+static void gsup_client_oap_register(struct gsup_client *gsupc)
+{
+ struct msgb *msg_tx;
+ int rc;
+ rc = oap_client_register(&gsupc->oap_state, &msg_tx);
+
+ if ((rc < 0) || (!msg_tx)) {
+ LOGP(DLGSUP, LOGL_ERROR, "GSUP OAP set up, but cannot register.\n");
+ return;
+ }
+
+ client_send(gsupc, IPAC_PROTO_EXT_OAP, msg_tx);
+}
+
+static void gsup_client_updown_cb(struct ipa_client_conn *link, int up)
+{
+ struct gsup_client *gsupc = link->data;
+
+ LOGP(DLGSUP, LOGL_INFO, "GSUP link to %s:%d %s\n",
+ link->addr, link->port, up ? "UP" : "DOWN");
+
+ gsupc->is_connected = up;
+
+ if (up) {
+ start_test_procedure(gsupc);
+
+ if (gsupc->oap_state.state == OAP_INITIALIZED)
+ gsup_client_oap_register(gsupc);
+
+ osmo_timer_del(&gsupc->connect_timer);
+ } else {
+ osmo_timer_del(&gsupc->ping_timer);
+
+ osmo_timer_schedule(&gsupc->connect_timer,
+ GSUP_CLIENT_RECONNECT_INTERVAL, 0);
+ }
+}
+
+static int gsup_client_oap_handle(struct gsup_client *gsupc, struct msgb *msg_rx)
+{
+ int rc;
+ struct msgb *msg_tx;
+
+ /* If the oap_state is disabled, this will reject the messages. */
+ rc = oap_client_handle(&gsupc->oap_state, msg_rx, &msg_tx);
+ msgb_free(msg_rx);
+ if (rc < 0)
+ return rc;
+
+ if (msg_tx)
+ client_send(gsupc, IPAC_PROTO_EXT_OAP, msg_tx);
+
+ return 0;
+}
+
+static int gsup_client_read_cb(struct ipa_client_conn *link, struct msgb *msg)
+{
+ struct ipaccess_head *hh = (struct ipaccess_head *) msg->data;
+ struct ipaccess_head_ext *he = (struct ipaccess_head_ext *) msgb_l2(msg);
+ struct gsup_client *gsupc = (struct gsup_client *)link->data;
+ int rc;
+ struct ipaccess_unit ipa_dev = {
+ /* see gsup_client_create() on const vs non-const */
+ .unit_name = (char*)gsupc->unit_name,
+ };
+
+ OSMO_ASSERT(ipa_dev.unit_name);
+
+ msg->l2h = &hh->data[0];
+
+ rc = ipaccess_bts_handle_ccm(link, &ipa_dev, msg);
+
+ if (rc < 0) {
+ LOGP(DLGSUP, LOGL_NOTICE,
+ "GSUP received an invalid IPA/CCM message from %s:%d\n",
+ link->addr, link->port);
+ /* Link has been closed */
+ gsupc->is_connected = 0;
+ msgb_free(msg);
+ return -1;
+ }
+
+ if (rc == 1) {
+ uint8_t msg_type = *(msg->l2h);
+ /* CCM message */
+ if (msg_type == IPAC_MSGT_PONG) {
+ LOGP(DLGSUP, LOGL_DEBUG, "GSUP receiving PONG\n");
+ gsupc->got_ipa_pong = 1;
+ }
+
+ msgb_free(msg);
+ return 0;
+ }
+
+ if (hh->proto != IPAC_PROTO_OSMO)
+ goto invalid;
+
+ if (!he || msgb_l2len(msg) < sizeof(*he))
+ goto invalid;
+
+ msg->l2h = &he->data[0];
+
+ if (he->proto == IPAC_PROTO_EXT_GSUP) {
+ OSMO_ASSERT(gsupc->read_cb != NULL);
+ gsupc->read_cb(gsupc, msg);
+ /* expecting read_cb() to free msg */
+ } else if (he->proto == IPAC_PROTO_EXT_OAP) {
+ return gsup_client_oap_handle(gsupc, msg);
+ /* gsup_client_oap_handle frees msg */
+ } else
+ goto invalid;
+
+ return 0;
+
+invalid:
+ LOGP(DLGSUP, LOGL_NOTICE,
+ "GSUP received an invalid IPA message from %s:%d, size = %d\n",
+ link->addr, link->port, msgb_length(msg));
+
+ msgb_free(msg);
+ return -1;
+}
+
+static void ping_timer_cb(void *gsupc_)
+{
+ struct gsup_client *gsupc = gsupc_;
+
+ LOGP(DLGSUP, LOGL_INFO, "GSUP ping callback (%s, %s PONG)\n",
+ gsupc->is_connected ? "connected" : "not connected",
+ gsupc->got_ipa_pong ? "got" : "didn't get");
+
+ if (gsupc->got_ipa_pong) {
+ start_test_procedure(gsupc);
+ return;
+ }
+
+ LOGP(DLGSUP, LOGL_NOTICE, "GSUP ping timed out, reconnecting\n");
+ ipa_client_conn_close(gsupc->link);
+ gsupc->is_connected = 0;
+
+ gsup_client_connect(gsupc);
+}
+
+static void start_test_procedure(struct gsup_client *gsupc)
+{
+ osmo_timer_setup(&gsupc->ping_timer, ping_timer_cb, gsupc);
+
+ gsupc->got_ipa_pong = 0;
+ osmo_timer_schedule(&gsupc->ping_timer, GSUP_CLIENT_PING_INTERVAL, 0);
+ LOGP(DLGSUP, LOGL_DEBUG, "GSUP sending PING\n");
+ gsup_client_send_ping(gsupc);
+}
+
+struct gsup_client *gsup_client_create(const char *unit_name,
+ const char *ip_addr,
+ unsigned int tcp_port,
+ gsup_client_read_cb_t read_cb,
+ struct oap_client_config *oapc_config)
+{
+ struct gsup_client *gsupc;
+ int rc;
+
+ gsupc = talloc_zero(tall_bsc_ctx, struct gsup_client);
+ OSMO_ASSERT(gsupc);
+
+ /* struct ipaccess_unit has a non-const unit_name, so let's copy to be
+ * able to have a non-const unit_name here as well. To not taint the
+ * public gsup_client API, let's store it in a const char* anyway. */
+ gsupc->unit_name = talloc_strdup(gsupc, unit_name);
+ OSMO_ASSERT(gsupc->unit_name);
+
+ /* a NULL oapc_config will mark oap_state disabled. */
+ rc = oap_client_init(oapc_config, &gsupc->oap_state);
+ if (rc != 0)
+ goto failed;
+
+ gsupc->link = ipa_client_conn_create(gsupc,
+ /* no e1inp */ NULL,
+ 0,
+ ip_addr, tcp_port,
+ gsup_client_updown_cb,
+ gsup_client_read_cb,
+ /* default write_cb */ NULL,
+ gsupc);
+ if (!gsupc->link)
+ goto failed;
+
+ osmo_timer_setup(&gsupc->connect_timer, connect_timer_cb, gsupc);
+
+ rc = gsup_client_connect(gsupc);
+
+ if (rc < 0)
+ goto failed;
+
+ gsupc->read_cb = read_cb;
+
+ return gsupc;
+
+failed:
+ gsup_client_destroy(gsupc);
+ return NULL;
+}
+
+void gsup_client_destroy(struct gsup_client *gsupc)
+{
+ osmo_timer_del(&gsupc->connect_timer);
+ osmo_timer_del(&gsupc->ping_timer);
+
+ if (gsupc->link) {
+ ipa_client_conn_close(gsupc->link);
+ ipa_client_conn_destroy(gsupc->link);
+ gsupc->link = NULL;
+ }
+ talloc_free(gsupc);
+}
+
+int gsup_client_send(struct gsup_client *gsupc, struct msgb *msg)
+{
+ if (!gsupc) {
+ LOGP(DGPRS, LOGL_NOTICE, "No GSUP client, unable to "
+ "send %s\n", msgb_hexdump(msg));
+ msgb_free(msg);
+ return -ENOTCONN;
+ }
+
+ if (!gsupc->is_connected) {
+ LOGP(DGPRS, LOGL_NOTICE, "GSUP not connected, unable to "
+ "send %s\n", msgb_hexdump(msg));
+ msgb_free(msg);
+ return -EAGAIN;
+ }
+
+ client_send(gsupc, IPAC_PROTO_EXT_GSUP, msg);
+
+ return 0;
+}
+
+struct msgb *gsup_client_msgb_alloc(void)
+{
+ return msgb_alloc_headroom(4000, 64, __func__);
+}
diff --git a/src/gprs/gtphub_main.c b/src/gprs/gtphub_main.c
index 2b87d19ef..d7b3ba74b 100644
--- a/src/gprs/gtphub_main.c
+++ b/src/gprs/gtphub_main.c
@@ -39,6 +39,8 @@
#include <osmocom/vty/telnet_interface.h>
#include <osmocom/vty/ports.h>
+#include <osmocom/sigtran/osmo_ss7.h>
+
#include <openbsc/debug.h>
#include <openbsc/gtphub.h>
#include <openbsc/vty.h>
@@ -46,7 +48,7 @@
#include "../../bscconfig.h"
extern void *osmo_gtphub_ctx;
-
+void *tall_bsc_ctx;
const char *gtphub_copyright =
"Copyright (C) 2015 sysmocom s.f.m.c GmbH <info@sysmocom.de>\r\n"
@@ -113,13 +115,38 @@ static void signal_handler(int signal)
}
}
-extern int bsc_vty_go_parent(struct vty *vty);
+int gtphub_vty_go_parent(struct vty *vty)
+{
+ switch (vty->node) {
+ default:
+ osmo_ss7_vty_go_parent(vty);
+ }
+
+ return vty->node;
+}
+
+int gtphub_vty_is_config_node(struct vty *vty, int node)
+{
+ /* Check if libosmo-sccp declares the node in
+ * question as config node */
+ if (osmo_ss7_is_config_node(vty, node))
+ return 1;
+
+ switch (node) {
+ /* add items that are not config */
+ case CONFIG_NODE:
+ return 0;
+
+ default:
+ return 1;
+ }
+}
static struct vty_app_info vty_info = {
.name = "OsmoGTPhub",
.version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
+ .go_parent_cb = gtphub_vty_go_parent,
+ .is_config_node = gtphub_vty_is_config_node,
};
struct cmdline_cfg {
diff --git a/src/gprs/gtphub_vty.c b/src/gprs/gtphub_vty.c
index a30ad2a54..d611b1f9a 100644
--- a/src/gprs/gtphub_vty.c
+++ b/src/gprs/gtphub_vty.c
@@ -37,6 +37,7 @@
* globals. */
#include <openbsc/sgsn.h>
extern struct sgsn_instance *sgsn;
+extern void *tall_bsc_ctx;
static struct gtphub *g_hub = 0;
static struct gtphub_cfg *g_cfg = 0;
diff --git a/src/gprs/oap_client.c b/src/gprs/oap_client.c
new file mode 100644
index 000000000..5128ac119
--- /dev/null
+++ b/src/gprs/oap_client.c
@@ -0,0 +1,280 @@
+/* Osmocom Authentication Protocol API */
+
+/* (C) 2015 by Sysmocom s.f.m.c. GmbH
+ * All Rights Reserved
+ *
+ * Author: Neels Hofmeyr
+ *
+ * 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/>.
+ *
+ */
+
+#include <string.h>
+#include <errno.h>
+
+#include <osmocom/core/utils.h>
+#include <osmocom/crypt/auth.h>
+#include <osmocom/gsm/oap.h>
+
+#include <openbsc/oap_client.h>
+#include <openbsc/debug.h>
+
+int oap_client_init(struct oap_client_config *config,
+ struct oap_client_state *state)
+{
+ OSMO_ASSERT(state->state == OAP_UNINITIALIZED);
+
+ if (!config)
+ goto disable;
+
+ if (config->client_id == 0)
+ goto disable;
+
+ if (config->secret_k_present == 0) {
+ LOGP(DLOAP, LOGL_NOTICE, "OAP: client ID set, but secret K missing.\n");
+ goto disable;
+ }
+
+ if (config->secret_opc_present == 0) {
+ LOGP(DLOAP, LOGL_NOTICE, "OAP: client ID set, but secret OPC missing.\n");
+ goto disable;
+ }
+
+ state->client_id = config->client_id;
+ memcpy(state->secret_k, config->secret_k, sizeof(state->secret_k));
+ memcpy(state->secret_opc, config->secret_opc, sizeof(state->secret_opc));
+ state->state = OAP_INITIALIZED;
+ return 0;
+
+disable:
+ state->state = OAP_DISABLED;
+ return 0;
+}
+
+/* From the given state and received RAND and AUTN octets, validate the
+ * server's authenticity and formulate the matching milenage reply octets in
+ * *tx_xres. The state is not modified.
+ * On success, and if tx_res is not NULL, exactly 8 octets will be written to
+ * *tx_res. If not NULL, tx_res must point at allocated memory of at least 8
+ * octets. The caller will want to send XRES back to the server in a challenge
+ * response message and update the state.
+ * Return 0 on success; -1 if OAP is disabled; -2 if rx_random and rx_autn fail
+ * the authentication check; -3 for any other errors. */
+static int oap_evaluate_challenge(const struct oap_client_state *state,
+ const uint8_t *rx_random,
+ const uint8_t *rx_autn,
+ uint8_t *tx_xres)
+{
+ struct osmo_auth_vector vec;
+
+ struct osmo_sub_auth_data auth = {
+ .type = OSMO_AUTH_TYPE_UMTS,
+ .algo = OSMO_AUTH_ALG_MILENAGE,
+ };
+
+ osmo_static_assert(sizeof(((struct osmo_sub_auth_data*)0)->u.umts.k)
+ == sizeof(state->secret_k), _secret_k_size_match);
+ osmo_static_assert(sizeof(((struct osmo_sub_auth_data*)0)->u.umts.opc)
+ == sizeof(state->secret_opc), _secret_opc_size_match);
+
+ switch (state->state) {
+ case OAP_UNINITIALIZED:
+ case OAP_DISABLED:
+ return -1;
+ default:
+ break;
+ }
+
+ memcpy(auth.u.umts.k, state->secret_k, sizeof(auth.u.umts.k));
+ memcpy(auth.u.umts.opc, state->secret_opc, sizeof(auth.u.umts.opc));
+ memset(auth.u.umts.amf, '\0', sizeof(auth.u.umts.amf));
+ auth.u.umts.sqn = 41; /* TODO use incrementing sequence nr */
+
+ memset(&vec, 0, sizeof(vec));
+ osmo_auth_gen_vec(&vec, &auth, rx_random);
+
+ if (vec.res_len != 8) {
+ LOGP(DLOAP, LOGL_ERROR, "OAP: Expected XRES to be 8 octets, got %d\n",
+ vec.res_len);
+ return -3;
+ }
+
+ if (osmo_constant_time_cmp(vec.autn, rx_autn, sizeof(vec.autn)) != 0) {
+ LOGP(DLOAP, LOGL_ERROR, "OAP: AUTN mismatch!\n");
+ LOGP(DLOAP, LOGL_INFO, "OAP: AUTN from server: %s\n",
+ osmo_hexdump_nospc(rx_autn, sizeof(vec.autn)));
+ LOGP(DLOAP, LOGL_INFO, "OAP: AUTN expected: %s\n",
+ osmo_hexdump_nospc(vec.autn, sizeof(vec.autn)));
+ return -2;
+ }
+
+ if (tx_xres != NULL)
+ memcpy(tx_xres, vec.res, 8);
+ return 0;
+}
+
+struct msgb *oap_client_encoded(const struct osmo_oap_message *oap_msg)
+{
+ struct msgb *msg = msgb_alloc_headroom(1000, 64, __func__);
+ OSMO_ASSERT(msg);
+ osmo_oap_encode(msg, oap_msg);
+ return msg;
+}
+
+/* Create a new msgb containing an OAP registration message.
+ * On error, return NULL. */
+static struct msgb* oap_msg_register(uint16_t client_id)
+{
+ struct osmo_oap_message oap_msg = {0};
+
+ if (client_id < 1) {
+ LOGP(DLOAP, LOGL_ERROR, "OAP: Invalid client ID: %d\n", client_id);
+ return NULL;
+ }
+
+ oap_msg.message_type = OAP_MSGT_REGISTER_REQUEST;
+ oap_msg.client_id = client_id;
+ return oap_client_encoded(&oap_msg);
+}
+
+int oap_client_register(struct oap_client_state *state, struct msgb **msg_tx)
+{
+ *msg_tx = oap_msg_register(state->client_id);
+ if (!(*msg_tx))
+ return -1;
+
+ state->state = OAP_REQUESTED_CHALLENGE;
+ return 0;
+}
+
+/* Create a new msgb containing an OAP challenge response message.
+ * xres must point at 8 octets to return as challenge response.
+ * On error, return NULL. */
+static struct msgb* oap_msg_challenge_response(uint8_t *xres)
+{
+ struct osmo_oap_message oap_reply = {0};
+
+ oap_reply.message_type = OAP_MSGT_CHALLENGE_RESULT;
+ memcpy(oap_reply.xres, xres, sizeof(oap_reply.xres));
+ oap_reply.xres_present = 1;
+ return oap_client_encoded(&oap_reply);
+}
+
+static int handle_challenge(struct oap_client_state *state,
+ struct osmo_oap_message *oap_rx,
+ struct msgb **msg_tx)
+{
+ int rc;
+ uint8_t xres[8];
+
+ if (!(oap_rx->rand_present && oap_rx->autn_present)) {
+ LOGP(DLOAP, LOGL_ERROR,
+ "OAP challenge incomplete (rand_present: %d, autn_present: %d)\n",
+ oap_rx->rand_present, oap_rx->autn_present);
+ rc = -2;
+ goto failure;
+ }
+
+ rc = oap_evaluate_challenge(state,
+ oap_rx->rand,
+ oap_rx->autn,
+ xres);
+ if (rc < 0)
+ goto failure;
+
+ *msg_tx = oap_msg_challenge_response(xres);
+ if ((*msg_tx) == NULL) {
+ rc = -1;
+ goto failure;
+ }
+
+ state->state = OAP_SENT_CHALLENGE_RESULT;
+ return 0;
+
+failure:
+ OSMO_ASSERT(rc < 0);
+ state->state = OAP_INITIALIZED;
+ return rc;
+}
+
+int oap_client_handle(struct oap_client_state *state,
+ const struct msgb *msg_rx, struct msgb **msg_tx)
+{
+ uint8_t *data = msgb_l2(msg_rx);
+ size_t data_len = msgb_l2len(msg_rx);
+ struct osmo_oap_message oap_msg = {0};
+ int rc = 0;
+
+ *msg_tx = NULL;
+
+ OSMO_ASSERT(data);
+
+ rc = osmo_oap_decode(&oap_msg, data, data_len);
+ if (rc < 0) {
+ LOGP(DLOAP, LOGL_ERROR,
+ "Decoding OAP message failed with error '%s' (%d)\n",
+ get_value_string(gsm48_gmm_cause_names, -rc), -rc);
+ return -10;
+ }
+
+ switch (state->state) {
+ case OAP_UNINITIALIZED:
+ LOGP(DLOAP, LOGL_ERROR,
+ "Received OAP message %d, but the OAP client is"
+ " not initialized\n", oap_msg.message_type);
+ return -ENOTCONN;
+ case OAP_DISABLED:
+ LOGP(DLOAP, LOGL_ERROR,
+ "Received OAP message %d, but the OAP client is"
+ " disabled\n", oap_msg.message_type);
+ return -ENOTCONN;
+ default:
+ break;
+ }
+
+ switch (oap_msg.message_type) {
+ case OAP_MSGT_CHALLENGE_REQUEST:
+ return handle_challenge(state, &oap_msg, msg_tx);
+
+ case OAP_MSGT_REGISTER_RESULT:
+ /* successfully registered */
+ state->state = OAP_REGISTERED;
+ break;
+
+ case OAP_MSGT_REGISTER_ERROR:
+ LOGP(DLOAP, LOGL_ERROR,
+ "OAP registration failed\n");
+ state->state = OAP_INITIALIZED;
+ if (state->registration_failures < 3) {
+ state->registration_failures ++;
+ return oap_client_register(state, msg_tx);
+ }
+ return -11;
+
+ case OAP_MSGT_REGISTER_REQUEST:
+ case OAP_MSGT_CHALLENGE_RESULT:
+ LOGP(DLOAP, LOGL_ERROR,
+ "Received invalid OAP message type for OAP client side: %d\n",
+ (int)oap_msg.message_type);
+ return -12;
+
+ default:
+ LOGP(DLOAP, LOGL_ERROR,
+ "Unknown OAP message type: %d\n",
+ (int)oap_msg.message_type);
+ return -13;
+ }
+
+ return 0;
+}
diff --git a/src/gprs/sgsn_ares.c b/src/gprs/sgsn_ares.c
index d94d184a3..623809911 100644
--- a/src/gprs/sgsn_ares.c
+++ b/src/gprs/sgsn_ares.c
@@ -24,6 +24,8 @@
#include <netdb.h>
+extern void *tall_bsc_ctx;
+
struct cares_event_fd {
struct llist_head head;
struct osmo_fd fd;
diff --git a/src/gprs/sgsn_ctrl.c b/src/gprs/sgsn_ctrl.c
index 31ac74f1f..f7b1180be 100644
--- a/src/gprs/sgsn_ctrl.c
+++ b/src/gprs/sgsn_ctrl.c
@@ -21,7 +21,6 @@
#include <osmocom/ctrl/control_if.h>
#include <osmocom/ctrl/control_cmd.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/gprs_sgsn.h>
#include <openbsc/sgsn.h>
#include <openbsc/debug.h>
diff --git a/src/gprs/sgsn_main.c b/src/gprs/sgsn_main.c
index 25ee632cc..e24a57ba2 100644
--- a/src/gprs/sgsn_main.c
+++ b/src/gprs/sgsn_main.c
@@ -62,13 +62,13 @@
#include <osmocom/ctrl/control_if.h>
#include <osmocom/ctrl/ports.h>
-#include <osmocom/sigtran/protocol/m3ua.h>
-
#include <gtp.h>
#include "../../bscconfig.h"
#if BUILD_IU
+#include <osmocom/sigtran/osmo_ss7.h>
+#include <osmocom/sigtran/protocol/m3ua.h>
#include <osmocom/ranap/iu_client.h>
#endif
@@ -173,13 +173,40 @@ static void signal_handler(int signal)
/* NSI that BSSGP uses when transmitting on NS */
extern struct gprs_ns_inst *bssgp_nsi;
-extern int bsc_vty_go_parent(struct vty *vty);
+int sgsn_vty_is_config_node(struct vty *vty, int node)
+{
+ /* So far the SGSN has no nested nodes that need parent node
+ * declaration, except for the ss7 vty nodes. */
+ switch (node) {
+ case SGSN_NODE:
+ return 1;
+ default:
+#if BUILD_IU
+ return osmo_ss7_is_config_node(vty, node);
+#else
+ return 0;
+#endif
+ }
+}
+
+int sgsn_vty_go_parent(struct vty *vty)
+{
+ /* So far the SGSN has no nested nodes that need parent node
+ * declaration, except for the ss7 vty nodes. */
+#if BUILD_IU
+ return osmo_ss7_vty_go_parent(vty);
+#else
+ vty->node = CONFIG_NODE;
+ vty->index = NULL;
+ return 0;
+#endif
+}
static struct vty_app_info vty_info = {
.name = "OsmoSGSN",
.version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
+ .go_parent_cb = sgsn_vty_go_parent,
+ .is_config_node = sgsn_vty_is_config_node,
};
static void print_help(void)
@@ -325,14 +352,17 @@ static const struct log_info gprs_log_info = {
.num_cat = ARRAY_SIZE(gprs_categories),
};
-int sgsn_ranap_iu_event(struct ue_conn_ctx *ctx, enum ranap_iu_event_type type, void *data);
+#if BUILD_IU
+int sgsn_ranap_iu_event(struct ranap_ue_conn_ctx *ctx, enum ranap_iu_event_type type, void *data);
+#endif
int main(int argc, char **argv)
{
struct ctrl_handle *ctrl;
- struct gsm_network dummy_network;
- struct osmo_sccp_instance *sccp;
int rc;
+#if BUILD_IU
+ struct osmo_sccp_instance *sccp;
+#endif
srand(time(NULL));
tall_bsc_ctx = talloc_named_const(NULL, 0, "osmo_sgsn");
@@ -354,7 +384,11 @@ int main(int argc, char **argv)
osmo_stats_vty_add_cmds(&gprs_log_info);
sgsn_vty_init(&sgsn_inst.cfg);
ctrl_vty_init(tall_bsc_ctx);
+
+#if BUILD_IU
osmo_ss7_init();
+ osmo_ss7_vty_init_asp(tall_bsc_ctx);
+#endif
handle_options(argc, argv);
@@ -389,7 +423,7 @@ int main(int argc, char **argv)
}
/* start telnet after reading config for vty_get_bind_addr() */
- rc = telnet_init_dynif(tall_bsc_ctx, &dummy_network,
+ rc = telnet_init_dynif(tall_bsc_ctx, NULL,
vty_get_bind_addr(), OSMO_VTY_PORT_SGSN);
if (rc < 0)
exit(1);
@@ -442,7 +476,7 @@ int main(int argc, char **argv)
}
}
-#ifdef BUILD_IU
+#if BUILD_IU
sccp = osmo_sccp_simple_client(tall_bsc_ctx, "OsmoSGSN",
2 /* FIXME: configurable */,
OSMO_SS7_ASP_PROT_M3UA, 0,
diff --git a/src/gprs/sgsn_vty.c b/src/gprs/sgsn_vty.c
index 3a5b2ca64..fce251885 100644
--- a/src/gprs/sgsn_vty.c
+++ b/src/gprs/sgsn_vty.c
@@ -51,6 +51,8 @@
#include <osmocom/ranap/iu_client.h>
#endif
+extern void *tall_bsc_ctx;
+
static struct sgsn_config *g_cfg = NULL;
const struct value_string sgsn_auth_pol_strs[] = {
diff --git a/src/ipaccess/Makefile.am b/src/ipaccess/Makefile.am
deleted file mode 100644
index 4dfe24738..000000000
--- a/src/ipaccess/Makefile.am
+++ /dev/null
@@ -1,66 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-OSMO_LIBS = \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOABIS_LIBS) \
- $(NULL)
-
-bin_PROGRAMS = \
- abisip-find \
- ipaccess-config \
- ipaccess-proxy \
- $(NULL)
-
-abisip_find_LDADD = \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(OSMO_LIBS) \
- $(NULL)
-
-abisip_find_SOURCES = \
- abisip-find.c \
- $(NULL)
-
-ipaccess_config_SOURCES = \
- ipaccess-config.c \
- ipaccess-firmware.c \
- network_listen.c \
- $(NULL)
-
-# FIXME: resolve the bogus dependencies patched around here:
-ipaccess_config_LDADD = \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libcommon-cs/libcommon-cs.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(OSMO_LIBS) \
- $(NULL)
-
-ipaccess_proxy_SOURCES = \
- ipaccess-proxy.c \
- $(NULL)
-
-ipaccess_proxy_LDADD = \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(OSMO_LIBS) \
- $(NULL)
diff --git a/src/ipaccess/abisip-find.c b/src/ipaccess/abisip-find.c
deleted file mode 100644
index 21d9f2290..000000000
--- a/src/ipaccess/abisip-find.c
+++ /dev/null
@@ -1,216 +0,0 @@
-/* ip.access nanoBTS configuration tool */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <unistd.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-
-
-#include <osmocom/core/select.h>
-#include <osmocom/core/timer.h>
-#include <osmocom/gsm/protocol/ipaccess.h>
-#include <osmocom/gsm/ipa.h>
-#include <openbsc/gsm_data.h>
-
-static int udp_sock(const char *ifname)
-{
- int fd, rc, bc = 1;
- struct sockaddr_in sa;
-
- fd = socket(PF_INET, SOCK_DGRAM, IPPROTO_UDP);
- if (fd < 0)
- return fd;
-
- if (ifname) {
-#ifdef __FreeBSD__
- rc = setsockopt(fd, SOL_SOCKET, IP_RECVIF, ifname,
- strlen(ifname));
-#else
- rc = setsockopt(fd, SOL_SOCKET, SO_BINDTODEVICE, ifname,
- strlen(ifname));
-#endif
- if (rc < 0)
- goto err;
- }
-
- memset(&sa, 0, sizeof(sa));
- sa.sin_family = AF_INET;
- sa.sin_port = htons(3006);
- sa.sin_addr.s_addr = INADDR_ANY;
-
- rc = bind(fd, (struct sockaddr *)&sa, sizeof(sa));
- if (rc < 0)
- goto err;
-
- rc = setsockopt(fd, SOL_SOCKET, SO_BROADCAST, &bc, sizeof(bc));
- if (rc < 0)
- goto err;
-
-#if 0
- /* we cannot bind, since the response packets don't come from
- * the broadcast address */
- sa.sin_family = AF_INET;
- sa.sin_port = htons(3006);
- inet_aton("255.255.255.255", &sa.sin_addr);
-
- rc = connect(fd, (struct sockaddr *)&sa, sizeof(sa));
- if (rc < 0)
- goto err;
-#endif
- return fd;
-
-err:
- close(fd);
- return rc;
-}
-
-const unsigned char find_pkt[] = { 0x00, 0x0b+8, IPAC_PROTO_IPACCESS, 0x00,
- IPAC_MSGT_ID_GET,
- 0x01, IPAC_IDTAG_MACADDR,
- 0x01, IPAC_IDTAG_IPADDR,
- 0x01, IPAC_IDTAG_UNIT,
- 0x01, IPAC_IDTAG_LOCATION1,
- 0x01, IPAC_IDTAG_LOCATION2,
- 0x01, IPAC_IDTAG_EQUIPVERS,
- 0x01, IPAC_IDTAG_SWVERSION,
- 0x01, IPAC_IDTAG_UNITNAME,
- 0x01, IPAC_IDTAG_SERNR,
- };
-
-
-static int bcast_find(int fd)
-{
- struct sockaddr_in sa;
-
- sa.sin_family = AF_INET;
- sa.sin_port = htons(3006);
- inet_aton("255.255.255.255", &sa.sin_addr);
-
- return sendto(fd, find_pkt, sizeof(find_pkt), 0, (struct sockaddr *) &sa, sizeof(sa));
-}
-
-static int parse_response(unsigned char *buf, int len)
-{
- uint8_t t_len;
- uint8_t t_tag;
- uint8_t *cur = buf;
-
- while (cur < buf + len) {
- t_len = *cur++;
- t_tag = *cur++;
-
- printf("%s='%s' ", ipa_ccm_idtag_name(t_tag), cur);
-
- cur += t_len;
- }
- printf("\n");
- return 0;
-}
-
-static int read_response(int fd)
-{
- unsigned char buf[255];
- struct sockaddr_in sa;
- int len;
- socklen_t sa_len = sizeof(sa);
-
- len = recvfrom(fd, buf, sizeof(buf), 0, (struct sockaddr *)&sa, &sa_len);
- if (len < 0)
- return len;
-
- /* 2 bytes length, 1 byte protocol */
- if (buf[2] != IPAC_PROTO_IPACCESS)
- return 0;
-
- if (buf[4] != IPAC_MSGT_ID_RESP)
- return 0;
-
- return parse_response(buf+6, len-6);
-}
-
-static int bfd_cb(struct osmo_fd *bfd, unsigned int flags)
-{
- if (flags & BSC_FD_READ)
- return read_response(bfd->fd);
- if (flags & BSC_FD_WRITE) {
- bfd->when &= ~BSC_FD_WRITE;
- return bcast_find(bfd->fd);
- }
- return 0;
-}
-
-static struct osmo_timer_list timer;
-
-static void timer_cb(void *_data)
-{
- struct osmo_fd *bfd = _data;
-
- bfd->when |= BSC_FD_WRITE;
-
- osmo_timer_schedule(&timer, 5, 0);
-}
-
-int main(int argc, char **argv)
-{
- struct osmo_fd bfd;
- char *ifname = NULL;
- int rc;
-
- printf("abisip-find (C) 2009 by Harald Welte\n");
- printf("This is FREE SOFTWARE with ABSOLUTELY NO WARRANTY\n\n");
-
- if (argc < 2) {
- fprintf(stdout, "you might need to specify the outgoing\n"
- " network interface, e.g. ``%s eth0''\n", argv[0]);
- } else {
- ifname = argv[1];
- }
-
- bfd.cb = bfd_cb;
- bfd.when = BSC_FD_READ | BSC_FD_WRITE;
- bfd.fd = udp_sock(ifname);
- if (bfd.fd < 0) {
- perror("Cannot create local socket for broadcast udp");
- exit(1);
- }
-
- rc = osmo_fd_register(&bfd);
- if (rc < 0) {
- fprintf(stderr, "Cannot register FD\n");
- exit(1);
- }
-
- osmo_timer_setup(&timer, timer_cb, &bfd);
- osmo_timer_schedule(&timer, 5, 0);
-
- printf("Trying to find ip.access BTS by broadcast UDP...\n");
-
- while (1) {
- rc = osmo_select_main(0);
- if (rc < 0)
- exit(3);
- }
-
- exit(0);
-}
-
diff --git a/src/ipaccess/ipaccess-config.c b/src/ipaccess/ipaccess-config.c
deleted file mode 100644
index 6822c06a6..000000000
--- a/src/ipaccess/ipaccess-config.c
+++ /dev/null
@@ -1,1019 +0,0 @@
-/* ip.access nanoBTS configuration tool */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2011 by Holger Hans Peter Freyther
- * (C) 2009-2010 by On-Waves
- * 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/>.
- *
- */
-
-#include <unistd.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <getopt.h>
-#include <errno.h>
-#include <sys/fcntl.h>
-#include <sys/stat.h>
-
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-
-
-#include <osmocom/core/application.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/timer.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/common_bsc.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <openbsc/network_listen.h>
-#include <osmocom/abis/ipaccess.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <openbsc/network_listen.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/abis/abis.h>
-#include <osmocom/gsm/protocol/gsm_12_21.h>
-
-struct gsm_network *bsc_gsmnet;
-
-static int net_listen_testnr;
-static int restart;
-static char *prim_oml_ip;
-static char *bts_ip_addr, *bts_ip_mask, *bts_ip_gw;
-static char *unit_id;
-static uint16_t nv_flags;
-static uint16_t nv_mask;
-static char *software = NULL;
-static int sw_load_state = 0;
-static int oml_state = 0;
-static int dump_files = 0;
-static char *firmware_analysis = NULL;
-static int found_trx = 0;
-static int loop_tests = 0;
-
-static void *tall_ctx_config = NULL;
-static struct abis_nm_sw_desc *sw_load1 = NULL;
-static struct abis_nm_sw_desc *sw_load2 = NULL;
-
-/*
-static uint8_t prim_oml_attr[] = { 0x95, 0x00, 7, 0x88, 192, 168, 100, 11, 0x00, 0x00 };
-static uint8_t unit_id_attr[] = { 0x91, 0x00, 9, '2', '3', '4', '2', '/' , '0', '/', '0', 0x00 };
-*/
-
-extern int ipaccess_fd_cb(struct osmo_fd *bfd, unsigned int what);
-extern struct e1inp_line_ops ipaccess_e1inp_line_ops;
-
-/* Actively connect to a BTS. Currently used by ipaccess-config.c */
-static int ipaccess_connect(struct e1inp_line *line, struct sockaddr_in *sa)
-{
- struct e1inp_ts *e1i_ts = &line->ts[0];
- struct osmo_fd *bfd = &e1i_ts->driver.ipaccess.fd;
- int ret, on = 1;
-
- bfd->fd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
- bfd->cb = ipaccess_fd_cb;
- bfd->when = BSC_FD_READ | BSC_FD_WRITE;
- bfd->data = line;
- bfd->priv_nr = E1INP_SIGN_OML;
-
- if (bfd->fd < 0) {
- LOGP(DLINP, LOGL_ERROR, "could not create TCP socket.\n");
- return -EIO;
- }
-
- ret = setsockopt(bfd->fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "could not set socket option\n");
- close(bfd->fd);
- return -EIO;
- }
-
- ret = connect(bfd->fd, (struct sockaddr *) sa, sizeof(*sa));
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "could not connect socket\n");
- close(bfd->fd);
- return ret;
- }
-
- ret = osmo_fd_register(bfd);
- if (ret < 0) {
- close(bfd->fd);
- return ret;
- }
- return ret;
- //return e1inp_line_register(line);
-}
-
-/* configure pseudo E1 line in ip.access style and connect to BTS */
-static int ia_config_connect(struct gsm_bts *bts, struct sockaddr_in *sin)
-{
- struct e1inp_line *line;
- struct e1inp_ts *sign_ts, *rsl_ts;
- struct e1inp_sign_link *oml_link, *rsl_link;
-
- line = talloc_zero(tall_bsc_ctx, struct e1inp_line);
- if (!line)
- return -ENOMEM;
-
- line->driver = e1inp_driver_find("ipa");
- if (!line->driver) {
- fprintf(stderr, "cannot `ipa' driver, giving up.\n");
- return -EINVAL;
- }
- line->ops = &ipaccess_e1inp_line_ops;
-
- /* create E1 timeslots for signalling and TRAU frames */
- e1inp_ts_config_sign(&line->ts[1-1], line);
- e1inp_ts_config_sign(&line->ts[2-1], line);
-
- /* create signalling links for TS1 */
- sign_ts = &line->ts[1-1];
- rsl_ts = &line->ts[2-1];
- oml_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_OML,
- bts->c0, 0xff, 0);
- rsl_link = e1inp_sign_link_create(rsl_ts, E1INP_SIGN_RSL,
- bts->c0, 0, 0);
-
- /* create back-links from bts/trx */
- bts->oml_link = oml_link;
- bts->c0->rsl_link = rsl_link;
-
- /* default port at BTS for incoming connections is 3006 */
- if (sin->sin_port == 0)
- sin->sin_port = htons(3006);
-
- return ipaccess_connect(line, sin);
-}
-
-/*
- * Callback function for NACK on the OML NM
- *
- * Currently we send the config requests but don't check the
- * result. The nanoBTS will send us a NACK when we did something the
- * BTS didn't like.
- */
-static int ipacc_msg_nack(uint8_t mt)
-{
- fprintf(stderr, "Failure to set attribute. This seems fatal\n");
- exit(-1);
- return 0;
-}
-
-static void check_restart_or_exit(struct gsm_bts_trx *trx)
-{
- if (restart) {
- abis_nm_ipaccess_restart(trx);
- } else {
- exit(0);
- }
-}
-
-static int ipacc_msg_ack(uint8_t mt, struct gsm_bts_trx *trx)
-{
- if (sw_load_state == 1) {
- fprintf(stderr, "The new software is activaed.\n");
- check_restart_or_exit(trx);
- } else if (oml_state == 1) {
- fprintf(stderr, "Set the NV Attributes.\n");
- check_restart_or_exit(trx);
- }
-
- return 0;
-}
-
-static const uint8_t phys_conf_min[] = { 0x02 };
-
-static uint16_t build_physconf(uint8_t *physconf_buf, const struct rxlev_stats *st)
-{
- uint16_t *whitelist = (uint16_t *) (physconf_buf + 4);
- int num_arfcn;
- unsigned int arfcnlist_size;
-
- /* Create whitelist from rxlevels */
- physconf_buf[0] = phys_conf_min[0];
- physconf_buf[1] = NM_IPAC_EIE_ARFCN_WHITE;
- num_arfcn = ipac_rxlevstat2whitelist(whitelist, st, 0, 100);
- arfcnlist_size = num_arfcn * 2;
- *((uint16_t *) (physconf_buf+2)) = htons(arfcnlist_size);
- DEBUGP(DNM, "physconf_buf (%s)\n", osmo_hexdump(physconf_buf, arfcnlist_size+4));
- return arfcnlist_size+4;
-}
-
-static int nwl_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_bts_trx *trx;
- uint8_t physconf_buf[2*NUM_ARFCNS+16];
- uint16_t physconf_len;
-
- switch (signal) {
- case S_IPAC_NWL_COMPLETE:
- trx = signal_data;
- DEBUGP(DNM, "received S_IPAC_NWL_COMPLETE signal\n");
- switch (trx->ipaccess.test_nr) {
- case NM_IPACC_TESTNO_CHAN_USAGE:
- /* Dump RxLev results */
- //rxlev_stat_dump(&trx->ipaccess.rxlev_stat);
- /* Create whitelist from results */
- physconf_len = build_physconf(physconf_buf,
- &trx->ipaccess.rxlev_stat);
- /* Start next test abbout BCCH channel usage */
- ipac_nwl_test_start(trx, NM_IPACC_TESTNO_BCCH_CHAN_USAGE,
- physconf_buf, physconf_len);
- break;
- case NM_IPACC_TESTNO_BCCH_CHAN_USAGE:
- /* Dump BCCH RxLev results */
- //rxlev_stat_dump(&trx->ipaccess.rxlev_stat);
- /* Create whitelist from results */
- physconf_len = build_physconf(physconf_buf,
- &trx->ipaccess.rxlev_stat);
- /* Start next test about BCCH info */
- ipac_nwl_test_start(trx, NM_IPACC_TESTNO_BCCH_INFO,
- physconf_buf, physconf_len);
- break;
- case NM_IPACC_TESTNO_BCCH_INFO:
- /* re-start full process with CHAN_USAGE */
- if (loop_tests) {
- DEBUGP(DNM, "starting next test cycle\n");
- ipac_nwl_test_start(trx, net_listen_testnr, phys_conf_min,
- sizeof(phys_conf_min));
- } else {
- exit(0);
- }
- break;
- }
- break;
- }
- return 0;
-}
-
-static int nm_state_event(int evt, uint8_t obj_class, void *obj,
- struct gsm_nm_state *old_state, struct gsm_nm_state *new_state,
- struct abis_om_obj_inst *obj_inst);
-
-static int nm_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct ipacc_ack_signal_data *ipacc_data;
- struct nm_statechg_signal_data *nsd;
-
- switch (signal) {
- case S_NM_IPACC_NACK:
- ipacc_data = signal_data;
- return ipacc_msg_nack(ipacc_data->msg_type);
- case S_NM_IPACC_ACK:
- ipacc_data = signal_data;
- return ipacc_msg_ack(ipacc_data->msg_type, ipacc_data->trx);
- case S_NM_IPACC_RESTART_ACK:
- printf("The BTS has acked the restart. Exiting.\n");
- exit(0);
- break;
- case S_NM_IPACC_RESTART_NACK:
- printf("The BTS has nacked the restart. Exiting.\n");
- exit(0);
- break;
- case S_NM_STATECHG_OPER:
- case S_NM_STATECHG_ADM:
- nsd = signal_data;
- nm_state_event(signal, nsd->obj_class, nsd->obj, nsd->old_state,
- nsd->new_state, nsd->obj_inst);
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-/* callback function passed to the ABIS OML code */
-static int percent;
-static int percent_old;
-static int swload_cbfn(unsigned int hook, unsigned int event, struct msgb *_msg,
- void *data, void *param)
-{
- struct msgb *msg;
- struct gsm_bts_trx *trx;
-
- if (hook != GSM_HOOK_NM_SWLOAD)
- return 0;
-
- trx = (struct gsm_bts_trx *) data;
-
- switch (event) {
- case NM_MT_LOAD_INIT_ACK:
- fprintf(stdout, "Software Load Initiate ACK\n");
- break;
- case NM_MT_LOAD_INIT_NACK:
- fprintf(stderr, "ERROR: Software Load Initiate NACK\n");
- exit(5);
- break;
- case NM_MT_LOAD_END_ACK:
- fprintf(stderr, "LOAD END ACK...");
- /* now make it the default */
- sw_load_state = 1;
-
- msg = msgb_alloc(1024, "sw: nvattr");
- msg->l2h = msgb_put(msg, 3);
- msg->l3h = &msg->l2h[3];
-
- /* activate software */
- if (sw_load1)
- abis_nm_put_sw_desc(msg, sw_load1, true);
-
- if (sw_load2)
- abis_nm_put_sw_desc(msg, sw_load2, true);
-
- /* fill in the data */
- msg->l2h[0] = NM_ATT_IPACC_CUR_SW_CFG;
- msg->l2h[1] = msgb_l3len(msg) >> 8;
- msg->l2h[2] = msgb_l3len(msg) & 0xff;
- printf("Foo l2h: %p l3h: %p... length l2: %u l3: %u\n", msg->l2h, msg->l3h, msgb_l2len(msg), msgb_l3len(msg));
- abis_nm_ipaccess_set_nvattr(trx, msg->l2h, msgb_l2len(msg));
- msgb_free(msg);
- break;
- case NM_MT_LOAD_END_NACK:
- fprintf(stderr, "ERROR: Software Load End NACK\n");
- exit(3);
- break;
- case NM_MT_ACTIVATE_SW_NACK:
- fprintf(stderr, "ERROR: Activate Software NACK\n");
- exit(4);
- break;
- case NM_MT_ACTIVATE_SW_ACK:
- break;
- case NM_MT_LOAD_SEG_ACK:
- percent = abis_nm_software_load_status(trx->bts);
- if (percent > percent_old)
- printf("Software Download Progress: %d%%\n", percent);
- percent_old = percent;
- break;
- case NM_MT_LOAD_ABORT:
- fprintf(stderr, "ERROR: Load aborted by the BTS.\n");
- exit(6);
- break;
- }
- return 0;
-}
-
-static void nv_put_ip_if_cfg(struct msgb *nmsg, uint32_t ip, uint32_t mask)
-{
- msgb_put_u8(nmsg, NM_ATT_IPACC_IP_IF_CFG);
-
- msgb_put_u32(nmsg, ip);
- msgb_put_u32(nmsg, mask);
-}
-
-static void nv_put_gw_cfg(struct msgb *nmsg, uint32_t addr, uint32_t mask, uint32_t gw)
-{
- msgb_put_u8(nmsg, NM_ATT_IPACC_IP_GW_CFG);
- msgb_put_u32(nmsg, addr);
- msgb_put_u32(nmsg, mask);
- msgb_put_u32(nmsg, gw);
-}
-
-static void nv_put_unit_id(struct msgb *nmsg, const char *unit_id)
-{
- msgb_tl16v_put(nmsg, NM_ATT_IPACC_UNIT_ID, strlen(unit_id)+1,
- (const uint8_t *)unit_id);
-}
-
-static void nv_put_prim_oml(struct msgb *nmsg, uint32_t ip, uint16_t port)
-{
- int len;
-
- /* 0x88 + IP + port */
- len = 1 + sizeof(ip) + sizeof(port);
-
- msgb_put_u8(nmsg, NM_ATT_IPACC_PRIM_OML_CFG_LIST);
- msgb_put_u16(nmsg, len);
-
- msgb_put_u8(nmsg, 0x88);
-
- /* IP address */
- msgb_put_u32(nmsg, ip);
-
- /* port number */
- msgb_put_u16(nmsg, port);
-}
-
-static void nv_put_flags(struct msgb *nmsg, uint16_t nv_flags, uint16_t nv_mask)
-{
- msgb_put_u8(nmsg, NM_ATT_IPACC_NV_FLAGS);
- msgb_put_u16(nmsg, sizeof(nv_flags) + sizeof(nv_mask));
- msgb_put_u8(nmsg, nv_flags & 0xff);
- msgb_put_u8(nmsg, nv_mask & 0xff);
- msgb_put_u8(nmsg, nv_flags >> 8);
- msgb_put_u8(nmsg, nv_mask >> 8);
-}
-
-/* human-readable test names for the ip.access tests */
-static const struct value_string ipa_test_strs[] = {
- { 64, "ccch-usage" },
- { 65, "bcch-usage" },
- { 66, "freq-sync" },
- { 67, "rtp-usage" },
- { 68, "rtp-perf" },
- { 69, "gprs-ccch" },
- { 70, "pccch-usage" },
- { 71, "gprs-usage" },
- { 72, "esta-mf" },
- { 73, "uplink-mf" },
- { 74, "dolink-mf" },
- { 75, "tbf-details" },
- { 76, "tbf-usage" },
- { 77, "llc-data" },
- { 78, "pdch-usage" },
- { 79, "power-control" },
- { 80, "link-adaption" },
- { 81, "tch-usage" },
- { 82, "amr-mf" },
- { 83, "rtp-multiplex-perf" },
- { 84, "rtp-multiplex-usage" },
- { 85, "srtp-multiplex-usage" },
- { 86, "abis-traffic" },
- { 89, "gprs-multiplex-perf" },
- { 90, "gprs-multiplex-usage" },
- { 0, NULL },
-};
-
-/* human-readable names for the ip.access nanoBTS NVRAM Flags */
-static const struct value_string ipa_nvflag_strs[] = {
- { 0x0001, "static-ip" },
- { 0x0002, "static-gw" },
- { 0x0004, "no-dhcp-vsi" },
- { 0x0008, "dhcp-enabled" },
- { 0x0040, "led-disabled" },
- { 0x0100, "secondary-oml-enabled" },
- { 0x0200, "diag-enabled" },
- { 0x0400, "cli-enabled" },
- { 0x0800, "http-enabled" },
- { 0x1000, "post-enabled" },
- { 0x2000, "snmp-enabled" },
- { 0, NULL }
-};
-
-/* set the flags in flags/mask according to a string-identified flag and 'enable' */
-static int ipa_nvflag_set(uint16_t *flags, uint16_t *mask, const char *name, int en)
-{
- int rc;
- rc = get_string_value(ipa_nvflag_strs, name);
- if (rc < 0)
- return rc;
-
- *mask |= rc;
- if (en)
- *flags |= rc;
- else
- *flags &= ~rc;
-
- return 0;
-}
-
-static void bootstrap_om(struct gsm_bts_trx *trx)
-{
- struct msgb *nmsg = msgb_alloc(1024, "nested msgb");
- int need_to_set_attr = 0;
- int len;
-
- printf("OML link established using TRX %d\n", trx->nr);
-
- if (unit_id) {
- len = strlen(unit_id);
- if (len > nmsg->data_len-10)
- goto out_err;
- printf("setting Unit ID to '%s'\n", unit_id);
- nv_put_unit_id(nmsg, unit_id);
- need_to_set_attr = 1;
- }
- if (prim_oml_ip) {
- struct in_addr ia;
-
- if (!inet_aton(prim_oml_ip, &ia)) {
- fprintf(stderr, "invalid IP address: %s\n",
- prim_oml_ip);
- goto out_err;
- }
-
- printf("setting primary OML link IP to '%s'\n", inet_ntoa(ia));
- nv_put_prim_oml(nmsg, ntohl(ia.s_addr), 0);
- need_to_set_attr = 1;
- }
- if (nv_mask) {
- printf("setting NV Flags/Mask to 0x%04x/0x%04x\n",
- nv_flags, nv_mask);
- nv_put_flags(nmsg, nv_flags, nv_mask);
- need_to_set_attr = 1;
- }
- if (bts_ip_addr && bts_ip_mask) {
- struct in_addr ia_addr, ia_mask;
-
- if (!inet_aton(bts_ip_addr, &ia_addr)) {
- fprintf(stderr, "invalid IP address: %s\n",
- bts_ip_addr);
- goto out_err;
- }
-
- if (!inet_aton(bts_ip_mask, &ia_mask)) {
- fprintf(stderr, "invalid IP address: %s\n",
- bts_ip_mask);
- goto out_err;
- }
-
- printf("setting static IP Address/Mask\n");
- nv_put_ip_if_cfg(nmsg, ntohl(ia_addr.s_addr), ntohl(ia_mask.s_addr));
- need_to_set_attr = 1;
- }
- if (bts_ip_gw) {
- struct in_addr ia_gw;
-
- if (!inet_aton(bts_ip_gw, &ia_gw)) {
- fprintf(stderr, "invalid IP address: %s\n",
- bts_ip_gw);
- goto out_err;
- }
-
- printf("setting static IP Gateway\n");
- /* we only set the default gateway with zero addr/mask */
- nv_put_gw_cfg(nmsg, 0, 0, ntohl(ia_gw.s_addr));
- need_to_set_attr = 1;
- }
-
- if (need_to_set_attr) {
- abis_nm_ipaccess_set_nvattr(trx, nmsg->head, nmsg->len);
- oml_state = 1;
- }
-
- if (restart && !prim_oml_ip && !software) {
- printf("restarting BTS\n");
- abis_nm_ipaccess_restart(trx);
- }
-
-out_err:
- msgb_free(nmsg);
-}
-
-static int nm_state_event(int evt, uint8_t obj_class, void *obj,
- struct gsm_nm_state *old_state, struct gsm_nm_state *new_state,
- struct abis_om_obj_inst *obj_inst)
-{
- if (obj_class == NM_OC_BASEB_TRANSC) {
- if (!found_trx && obj_inst->trx_nr != 0xff) {
- struct gsm_bts_trx *trx = container_of(obj, struct gsm_bts_trx, bb_transc);
- bootstrap_om(trx);
- found_trx = 1;
- }
- } else if (evt == S_NM_STATECHG_OPER &&
- obj_class == NM_OC_RADIO_CARRIER &&
- new_state->availability == 3) {
- struct gsm_bts_trx *trx = obj;
-
- if (net_listen_testnr)
- ipac_nwl_test_start(trx, net_listen_testnr,
- phys_conf_min, sizeof(phys_conf_min));
- else if (software) {
- int rc;
- printf("Attempting software upload with '%s'\n", software);
- rc = abis_nm_software_load(trx->bts, trx->nr, software, 19, 0, swload_cbfn, trx);
- if (rc < 0) {
- fprintf(stderr, "Failed to start software load\n");
- exit(-3);
- }
- }
- }
- return 0;
-}
-
-static struct abis_nm_sw_desc *create_swload(struct sdp_header *header)
-{
- struct abis_nm_sw_desc *load;
-
- load = talloc_zero(tall_ctx_config, struct abis_nm_sw_desc);
-
- osmo_strlcpy((char *)load->file_id, header->firmware_info.sw_part,
- sizeof(load->file_id));
- load->file_id_len = strlen((char*)load->file_id) + 1;
-
- osmo_strlcpy((char *)load->file_version, header->firmware_info.version,
- sizeof(load->file_version));
- load->file_version_len = strlen((char*)load->file_version) + 1;
-
- return load;
-}
-
-static int find_sw_load_params(const char *filename)
-{
- struct stat stat;
- struct sdp_header *header;
- struct llist_head *entry;
- int fd;
- void *tall_firm_ctx = 0;
-
- entry = talloc_zero(tall_firm_ctx, struct llist_head);
- INIT_LLIST_HEAD(entry);
-
- fd = open(filename, O_RDONLY);
- if (!fd) {
- perror("nada");
- return -1;
- }
-
- /* verify the file */
- if (fstat(fd, &stat) == -1) {
- perror("Can not stat the file");
- close(fd);
- return -1;
- }
-
- ipaccess_analyze_file(fd, stat.st_size, 0, entry);
- if (close(fd) != 0) {
- perror("Close failed.\n");
- return -1;
- }
-
- /* try to find what we are looking for */
- llist_for_each_entry(header, entry, entry) {
- if (ntohs(header->firmware_info.more_more_magic) == 0x1000) {
- sw_load1 = create_swload(header);
- } else if (ntohs(header->firmware_info.more_more_magic) == 0x2001) {
- sw_load2 = create_swload(header);
- }
- }
-
- if (!sw_load1 || !sw_load2) {
- fprintf(stderr, "Did not find data.\n");
- talloc_free(tall_firm_ctx);
- return -1;
- }
-
- talloc_free(tall_firm_ctx);
- return 0;
-}
-
-static void dump_entry(struct sdp_header_item *sub_entry, int part, int fd)
-{
- int out_fd;
- int copied;
- char filename[4096];
- off_t target;
-
- if (!dump_files)
- return;
-
- if (sub_entry->header_entry.something1 == 0)
- return;
-
- snprintf(filename, sizeof(filename), "part.%d", part++);
- out_fd = open(filename, O_WRONLY | O_CREAT, 0660);
- if (out_fd < 0) {
- perror("Can not dump firmware");
- return;
- }
-
- target = sub_entry->absolute_offset + ntohl(sub_entry->header_entry.start) + 4;
- if (lseek(fd, target, SEEK_SET) != target) {
- perror("seek failed");
- close(out_fd);
- return;
- }
-
- for (copied = 0; copied < ntohl(sub_entry->header_entry.length); ++copied) {
- char c;
- if (read(fd, &c, sizeof(c)) != sizeof(c)) {
- perror("copy failed");
- break;
- }
-
- if (write(out_fd, &c, sizeof(c)) != sizeof(c)) {
- perror("write failed");
- break;
- }
- }
-
- close(out_fd);
-}
-
-static void analyze_firmware(const char *filename)
-{
- struct stat stat;
- struct sdp_header *header;
- struct sdp_header_item *sub_entry;
- struct llist_head *entry;
- int fd;
- void *tall_firm_ctx = 0;
- int part = 0;
-
- entry = talloc_zero(tall_firm_ctx, struct llist_head);
- INIT_LLIST_HEAD(entry);
-
- printf("Opening possible firmware '%s'\n", filename);
- fd = open(filename, O_RDONLY);
- if (!fd) {
- perror("nada");
- return;
- }
-
- /* verify the file */
- if (fstat(fd, &stat) == -1) {
- perror("Can not stat the file");
- close(fd);
- return;
- }
-
- ipaccess_analyze_file(fd, stat.st_size, 0, entry);
-
- llist_for_each_entry(header, entry, entry) {
- printf("Printing header information:\n");
- printf("more_more_magic: 0x%x\n", ntohs(header->firmware_info.more_more_magic));
- printf("header_length: %u\n", ntohl(header->firmware_info.header_length));
- printf("file_length: %u\n", ntohl(header->firmware_info.file_length));
- printf("sw_part: %.20s\n", header->firmware_info.sw_part);
- printf("text1: %.64s\n", header->firmware_info.text1);
- printf("time: %.12s\n", header->firmware_info.time);
- printf("date: %.14s\n", header->firmware_info.date);
- printf("text2: %.10s\n", header->firmware_info.text2);
- printf("version: %.20s\n", header->firmware_info.version);
- printf("subitems...\n");
-
- llist_for_each_entry(sub_entry, &header->header_list, entry) {
- printf("\tsomething1: %u\n", sub_entry->header_entry.something1);
- printf("\ttext1: %.64s\n", sub_entry->header_entry.text1);
- printf("\ttime: %.12s\n", sub_entry->header_entry.time);
- printf("\tdate: %.14s\n", sub_entry->header_entry.date);
- printf("\ttext2: %.10s\n", sub_entry->header_entry.text2);
- printf("\tversion: %.20s\n", sub_entry->header_entry.version);
- printf("\tlength: %u\n", ntohl(sub_entry->header_entry.length));
- printf("\taddr1: 0x%x\n", ntohl(sub_entry->header_entry.addr1));
- printf("\taddr2: 0x%x\n", ntohl(sub_entry->header_entry.addr2));
- printf("\tstart: 0x%x\n", ntohl(sub_entry->header_entry.start));
- printf("\tabs. offset: 0x%lx\n", sub_entry->absolute_offset);
- printf("\n\n");
-
- dump_entry(sub_entry, part++, fd);
- }
- printf("\n\n");
- }
-
- if (close(fd) != 0) {
- perror("Close failed.\n");
- return;
- }
-
- talloc_free(tall_firm_ctx);
-}
-
-static void print_usage(void)
-{
- printf("Usage: ipaccess-config IP_OF_BTS\n");
-}
-
-static void print_help(void)
-{
-#if 0
- printf("Commands for reading from the BTS:\n");
- printf(" -D --dump\t\t\tDump the BTS configuration\n");
- printf("\n");
-#endif
- printf("Commands for writing to the BTS:\n");
- printf(" -u --unit-id UNIT_ID\t\tSet the Unit ID of the BTS\n");
- printf(" -o --oml-ip IP\t\tSet primary OML IP (IP of your BSC)\n");
- printf(" -i --ip-address IP/MASK\tSet static IP address + netmask of BTS\n");
- printf(" -g --ip-gateway IP\t\tSet static IP gateway of BTS\n");
- printf(" -r --restart\t\t\tRestart the BTS (after other operations)\n");
- printf(" -n --nvram-flags FLAGS/MASK\tSet NVRAM attributes\n");
- printf(" -S --nvattr-set FLAG\tSet one additional NVRAM attribute\n");
- printf(" -U --nvattr-unset FLAG\tSet one additional NVRAM attribute\n");
- printf(" -l --listen TESTNR\t\tPerform specified test number\n");
- printf(" -L --Listen TEST_NAME\t\tPerform specified test\n");
- printf(" -s --stream-id ID\t\tSet the IPA Stream Identifier for OML\n");
- printf(" -d --software FIRMWARE\tDownload firmware into BTS\n");
- printf("\n");
- printf("Miscellaneous commands:\n");
- printf(" -h --help\t\t\tthis text\n");
- printf(" -H --HELP\t\t\tPrint parameter details.\n");
- printf(" -f --firmware FIRMWARE\tProvide firmware information\n");
- printf(" -w --write-firmware\t\tThis will dump the firmware parts to the filesystem. Use with -f.\n");
- printf(" -p --loop\t\t\tLoop the tests executed with the --listen command.\n");
-}
-
-static void print_value_string(const struct value_string *val, int size)
-{
- int i;
-
- for (i = 0; i < size - 1; ++i) {
- char sep = val[i + 1].str == NULL ? '.' : ',';
- printf("%s%c ", val[i].str, sep);
- }
- printf("\n");
-}
-
-static void print_options(void)
-{
-
- printf("Options for NVRAM (-S,-U):\n ");
- print_value_string(&ipa_nvflag_strs[0], ARRAY_SIZE(ipa_nvflag_strs));
-
- printf("Options for Tests (-L):\n ");
- print_value_string(&ipa_test_strs[0], ARRAY_SIZE(ipa_test_strs));
-}
-
-extern void bts_model_nanobts_init();
-
-int main(int argc, char **argv)
-{
- struct gsm_bts *bts;
- struct sockaddr_in sin;
- int rc, option_index = 0, stream_id = 0xff;
-
- tall_ctx_config = talloc_named_const(NULL, 0, "ipaccess-config");
- msgb_talloc_ctx_init(tall_ctx_config, 0);
-
- osmo_init_logging(&log_info);
- log_parse_category_mask(osmo_stderr_target, "DNM,0");
- bts_model_nanobts_init();
-
- printf("ipaccess-config (C) 2009-2010 by Harald Welte and others\n");
- printf("This is FREE SOFTWARE with ABSOLUTELY NO WARRANTY\n\n");
-
- while (1) {
- int c;
- unsigned long ul;
- char *slash;
- static struct option long_options[] = {
- { "unit-id", 1, 0, 'u' },
- { "oml-ip", 1, 0, 'o' },
- { "ip-address", 1, 0, 'i' },
- { "ip-gateway", 1, 0, 'g' },
- { "restart", 0, 0, 'r' },
- { "nvram-flags", 1, 0, 'n' },
- { "nvattr-set", 1, 0, 'S' },
- { "nvattr-unset", 1, 0, 'U' },
- { "help", 0, 0, 'h' },
- { "HELP", 0, 0, 'H' },
- { "listen", 1, 0, 'l' },
- { "Listen", 1, 0, 'L' },
- { "stream-id", 1, 0, 's' },
- { "software", 1, 0, 'd' },
- { "firmware", 1, 0, 'f' },
- { "write-firmware", 0, 0, 'w' },
- { "disable-color", 0, 0, 'c'},
- { "loop", 0, 0, 'p' },
- { 0, 0, 0, 0 },
- };
-
- c = getopt_long(argc, argv, "u:o:i:g:rn:S:U:l:L:hs:d:f:wcpH", long_options,
- &option_index);
-
- if (c == -1)
- break;
-
- switch (c) {
- case 'u':
- unit_id = optarg;
- break;
- case 'o':
- prim_oml_ip = optarg;
- break;
- case 'i':
- slash = strchr(optarg, '/');
- if (!slash)
- exit(2);
- bts_ip_addr = optarg;
- *slash = 0;
- bts_ip_mask = slash+1;
- break;
- case 'g':
- bts_ip_gw = optarg;
- break;
- case 'r':
- restart = 1;
- break;
- case 'n':
- slash = strchr(optarg, '/');
- if (!slash)
- exit(2);
- ul = strtoul(optarg, NULL, 16);
- nv_flags = ul & 0xffff;
- ul = strtoul(slash+1, NULL, 16);
- nv_mask = ul & 0xffff;
- break;
- case 'S':
- if (ipa_nvflag_set(&nv_flags, &nv_mask, optarg, 1) < 0)
- exit(2);
- break;
- case 'U':
- if (ipa_nvflag_set(&nv_flags, &nv_mask, optarg, 0) < 0)
- exit(2);
- break;
- case 'l':
- net_listen_testnr = atoi(optarg);
- break;
- case 'L':
- net_listen_testnr = get_string_value(ipa_test_strs,
- optarg);
- if (net_listen_testnr < 0) {
- fprintf(stderr,
- "The test '%s' is not known. Use -H to"
- " see available tests.\n", optarg);
- exit(2);
- }
- break;
- case 's':
- stream_id = atoi(optarg);
- break;
- case 'd':
- software = strdup(optarg);
- if (find_sw_load_params(optarg) != 0)
- exit(0);
- break;
- case 'f':
- firmware_analysis = optarg;
- break;
- case 'w':
- dump_files = 1;
- break;
- case 'c':
- log_set_use_color(osmo_stderr_target, 0);
- break;
- case 'p':
- loop_tests = 1;
- break;
- case 'h':
- print_usage();
- print_help();
- exit(0);
- case 'H':
- print_options();
- exit(0);
- }
- };
-
- if (firmware_analysis)
- analyze_firmware(firmware_analysis);
-
- if (optind >= argc) {
- /* only warn if we have not done anything else */
- if (!firmware_analysis)
- fprintf(stderr, "you have to specify the IP address of the BTS. Use --help for more information\n");
- exit(2);
- }
- libosmo_abis_init(tall_ctx_config);
-
- bsc_gsmnet = bsc_network_init(tall_bsc_ctx, 1, 1, NULL);
- if (!bsc_gsmnet)
- exit(1);
-
- bts = gsm_bts_alloc_register(bsc_gsmnet, GSM_BTS_TYPE_NANOBTS,
- HARDCODED_BSIC);
- /* ip.access supports up to 4 chained TRX */
- gsm_bts_trx_alloc(bts);
- gsm_bts_trx_alloc(bts);
- gsm_bts_trx_alloc(bts);
- bts->oml_tei = stream_id;
-
- osmo_signal_register_handler(SS_NM, nm_sig_cb, NULL);
- osmo_signal_register_handler(SS_IPAC_NWL, nwl_sig_cb, NULL);
-
- ipac_nwl_init();
-
- printf("Trying to connect to ip.access BTS ...\n");
-
- memset(&sin, 0, sizeof(sin));
- sin.sin_family = AF_INET;
- inet_aton(argv[optind], &sin.sin_addr);
- rc = ia_config_connect(bts, &sin);
- if (rc < 0) {
- perror("Error connecting to the BTS");
- exit(1);
- }
-
- bts->oml_link->ts->sign.delay = 10;
- bts->c0->rsl_link->ts->sign.delay = 10;
- while (1) {
- rc = osmo_select_main(0);
- if (rc < 0)
- exit(3);
- }
-
- exit(0);
-}
-
diff --git a/src/ipaccess/ipaccess-firmware.c b/src/ipaccess/ipaccess-firmware.c
deleted file mode 100644
index 5f55bb526..000000000
--- a/src/ipaccess/ipaccess-firmware.c
+++ /dev/null
@@ -1,135 +0,0 @@
-/* Routines for parsing an ipacces SDP firmware file */
-
-/* (C) 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-#include <osmocom/core/talloc.h>
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-
-#define PART_LENGTH 138
-
-osmo_static_assert(sizeof(struct sdp_header_entry) == 138, right_entry);
-osmo_static_assert(sizeof(struct sdp_firmware) == 158, _right_header_length);
-
-/* more magic, the second "int" in the header */
-static char more_magic[] = { 0x10, 0x02 };
-
-int ipaccess_analyze_file(int fd, const unsigned int st_size, const unsigned int base_offset, struct llist_head *list)
-{
- struct sdp_firmware *firmware_header = 0;
- struct sdp_header *header;
- char buf[4096];
- int rc, i;
- uint16_t table_size;
- uint16_t table_offset;
- off_t table_start;
-
-
- rc = read(fd, buf, sizeof(*firmware_header));
- if (rc < 0) {
- perror("Can not read header start.");
- return -1;
- }
-
- firmware_header = (struct sdp_firmware *) &buf[0];
- if (strncmp(firmware_header->magic, " SDP", 4) != 0) {
- fprintf(stderr, "Wrong magic.\n");
- return -1;
- }
-
- if (memcmp(firmware_header->more_magic, more_magic, 2) != 0) {
- fprintf(stderr, "Wrong more magic. Got: 0x%x 0x%x vs. 0x%x 0x%x\n",
- firmware_header->more_magic[0] & 0xff, firmware_header->more_magic[1] & 0xff,
- more_magic[0], more_magic[1]);
- return -1;
- }
-
-
- if (ntohl(firmware_header->file_length) != st_size) {
- fprintf(stderr, "The filesize and the header do not match.\n");
- return -1;
- }
-
- /* add the firmware */
- header = talloc_zero(list, struct sdp_header);
- header->firmware_info = *firmware_header;
- INIT_LLIST_HEAD(&header->header_list);
- llist_add(&header->entry, list);
-
- table_offset = ntohs(firmware_header->table_offset);
- table_start = lseek(fd, table_offset, SEEK_CUR);
- if (table_start == -1) {
- fprintf(stderr, "Failed to seek to the rel position: 0x%x\n", table_offset);
- return -1;
- }
-
- if (read(fd, &table_size, sizeof(table_size)) != sizeof(table_size)) {
- fprintf(stderr, "The table size could not be read.\n");
- return -1;
- }
-
- table_size = ntohs(table_size);
-
- if (table_size % PART_LENGTH != 0) {
- fprintf(stderr, "The part length seems to be wrong: 0x%x\n", table_size);
- return -1;
- }
-
- /* look into each firmware now */
- for (i = 0; i < table_size / PART_LENGTH; ++i) {
- struct sdp_header_entry entry;
- struct sdp_header_item *header_entry;
- unsigned int offset = table_start + 2;
- offset += i * 138;
-
- if (lseek(fd, offset, SEEK_SET) != offset) {
- fprintf(stderr, "Can not seek to the offset: %u.\n", offset);
- return -1;
- }
-
- rc = read(fd, &entry, sizeof(entry));
- if (rc != sizeof(entry)) {
- fprintf(stderr, "Can not read the header entry.\n");
- return -1;
- }
-
- header_entry = talloc_zero(header, struct sdp_header_item);
- header_entry->header_entry = entry;
- header_entry->absolute_offset = base_offset;
- llist_add(&header_entry->entry, &header->header_list);
-
- /* now we need to find the SDP file... */
- offset = ntohl(entry.start) + 4 + base_offset;
- if (lseek(fd, offset, SEEK_SET) != offset) {
- perror("can't seek to sdp");
- return -1;
- }
-
-
- ipaccess_analyze_file(fd, ntohl(entry.length), offset, list);
- }
-
- return 0;
-}
-
diff --git a/src/ipaccess/ipaccess-proxy.c b/src/ipaccess/ipaccess-proxy.c
deleted file mode 100644
index d3674426c..000000000
--- a/src/ipaccess/ipaccess-proxy.c
+++ /dev/null
@@ -1,1226 +0,0 @@
-/* OpenBSC Abis/IP proxy ip.access nanoBTS */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2010 by On-Waves
- * (C) 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- *
- * 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/>.
- *
- */
-
-#include <stdio.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <errno.h>
-#include <string.h>
-#include <signal.h>
-#include <time.h>
-#include <sys/fcntl.h>
-#include <sys/socket.h>
-#include <sys/ioctl.h>
-#include <arpa/inet.h>
-#include <netinet/in.h>
-
-#define _GNU_SOURCE
-#include <getopt.h>
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/core/application.h>
-#include <osmocom/core/select.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/ipa.h>
-#include <osmocom/abis/ipa.h>
-#include <osmocom/abis/ipaccess.h>
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/socket.h>
-#include <osmocom/core/talloc.h>
-
-/* one instance of an ip.access protocol proxy */
-struct ipa_proxy {
- /* socket where we listen for incoming OML from BTS */
- struct osmo_fd oml_listen_fd;
- /* socket where we listen for incoming RSL from BTS */
- struct osmo_fd rsl_listen_fd;
- /* list of BTS's (struct ipa_bts_conn */
- struct llist_head bts_list;
- /* the BSC reconnect timer */
- struct osmo_timer_list reconn_timer;
- /* global GPRS NS data */
- struct in_addr gprs_addr;
- struct in_addr listen_addr;
-};
-
-/* global pointer to the proxy structure */
-static struct ipa_proxy *ipp;
-
-struct ipa_proxy_conn {
- struct osmo_fd fd;
- struct llist_head tx_queue;
- struct ipa_bts_conn *bts_conn;
-};
-#define MAX_TRX 4
-
-/* represents a particular BTS in our proxy */
-struct ipa_bts_conn {
- /* list of BTS's (ipa_proxy->bts_list) */
- struct llist_head list;
- /* back pointer to the proxy which we belong to */
- struct ipa_proxy *ipp;
- /* the unit ID as determined by CCM */
- struct {
- uint16_t site_id;
- uint16_t bts_id;
- } unit_id;
-
- /* incoming connections from BTS */
- struct ipa_proxy_conn *oml_conn;
- struct ipa_proxy_conn *rsl_conn[MAX_TRX];
-
- /* outgoing connections to BSC */
- struct ipa_proxy_conn *bsc_oml_conn;
- struct ipa_proxy_conn *bsc_rsl_conn[MAX_TRX];
-
- /* UDP sockets for BTS and BSC injection */
- struct osmo_fd udp_bts_fd;
- struct osmo_fd udp_bsc_fd;
-
- /* NS data */
- struct in_addr bts_addr;
- struct osmo_fd gprs_ns_fd;
- int gprs_local_port;
- uint16_t gprs_orig_port;
- uint32_t gprs_orig_ip;
-
- char *id_tags[256];
- uint8_t *id_resp;
- unsigned int id_resp_len;
-};
-
-enum ipp_fd_type {
- OML_FROM_BTS = 1,
- RSL_FROM_BTS = 2,
- OML_TO_BSC = 3,
- RSL_TO_BSC = 4,
- UDP_TO_BTS = 5,
- UDP_TO_BSC = 6,
-};
-
-/* some of the code against we link from OpenBSC needs this */
-void *tall_bsc_ctx;
-
-static char *listen_ipaddr;
-static char *bsc_ipaddr;
-static char *gprs_ns_ipaddr;
-
-static int gprs_ns_cb(struct osmo_fd *bfd, unsigned int what);
-
-#define PROXY_ALLOC_SIZE 1200
-
-static struct ipa_bts_conn *find_bts_by_unitid(struct ipa_proxy *ipp,
- uint16_t site_id,
- uint16_t bts_id)
-{
- struct ipa_bts_conn *ipbc;
-
- llist_for_each_entry(ipbc, &ipp->bts_list, list) {
- if (ipbc->unit_id.site_id == site_id &&
- ipbc->unit_id.bts_id == bts_id)
- return ipbc;
- }
-
- return NULL;
-}
-
-struct ipa_proxy_conn *alloc_conn(void)
-{
- struct ipa_proxy_conn *ipc;
-
- ipc = talloc_zero(tall_bsc_ctx, struct ipa_proxy_conn);
- if (!ipc)
- return NULL;
-
- INIT_LLIST_HEAD(&ipc->tx_queue);
-
- return ipc;
-}
-
-static int store_idtags(struct ipa_bts_conn *ipbc, struct tlv_parsed *tlvp)
-{
- unsigned int i, len;
-
- for (i = 0; i <= 0xff; i++) {
- if (!TLVP_PRESENT(tlvp, i))
- continue;
-
- len = TLVP_LEN(tlvp, i);
-#if 0
- if (!ipbc->id_tags[i])
- ipbc->id_tags[i] = talloc_size(tall_bsc_ctx, len);
- else
-#endif
- ipbc->id_tags[i] = talloc_realloc_size(ipbc,
- ipbc->id_tags[i], len);
- if (!ipbc->id_tags[i])
- return -ENOMEM;
-
- memset(ipbc->id_tags[i], 0, len);
- //memcpy(ipbc->id_tags[i], TLVP_VAL(tlvp, i), len);
- }
- return 0;
-}
-
-
-static struct ipa_proxy_conn *connect_bsc(struct sockaddr_in *sa, int priv_nr, void *data);
-
-#define logp_ipbc_uid(ss, lvl, ipbc, trx_id) _logp_ipbc_uid(ss, lvl, __FILE__, __LINE__, ipbc, trx_id)
-
-static void _logp_ipbc_uid(unsigned int ss, unsigned int lvl, char *file, int line,
- struct ipa_bts_conn *ipbc, uint8_t trx_id)
-{
- if (ipbc)
- logp2(ss, lvl, file, line, 0, "(%u/%u/%u) ", ipbc->unit_id.site_id,
- ipbc->unit_id.bts_id, trx_id);
- else
- logp2(ss, lvl, file, line, 0, "unknown ");
-}
-
-static int handle_udp_read(struct osmo_fd *bfd)
-{
- struct ipa_bts_conn *ipbc = bfd->data;
- struct ipa_proxy_conn *other_conn = NULL;
- struct msgb *msg = msgb_alloc(PROXY_ALLOC_SIZE, "Abis/IP UDP");
- struct ipaccess_head *hh;
- int ret;
-
- /* with UDP sockets, we cannot read partial packets but have to read
- * all of it in one go */
- hh = (struct ipaccess_head *) msg->data;
- ret = recv(bfd->fd, msg->data, msg->data_len, 0);
- if (ret < 0) {
- if (errno != EAGAIN)
- LOGP(DLINP, LOGL_ERROR, "recv error %s\n", strerror(errno));
- msgb_free(msg);
- return ret;
- }
- if (ret == 0) {
- DEBUGP(DLINP, "UDP peer disappeared, dead socket\n");
- osmo_fd_unregister(bfd);
- close(bfd->fd);
- bfd->fd = -1;
- msgb_free(msg);
- return -EIO;
- }
- if (ret < sizeof(*hh)) {
- DEBUGP(DLINP, "could not even read header!?!\n");
- msgb_free(msg);
- return -EIO;
- }
- msgb_put(msg, ret);
- msg->l2h = msg->data + sizeof(*hh);
- DEBUGP(DLMI, "UDP RX: %s\n", osmo_hexdump(msg->data, msg->len));
-
- if (hh->len != msg->len - sizeof(*hh)) {
- DEBUGP(DLINP, "length (%u/%u) disagrees with header(%u)\n",
- msg->len, msg->len - 3, hh->len);
- msgb_free(msg);
- return -EIO;
- }
-
- switch (bfd->priv_nr & 0xff) {
- case UDP_TO_BTS:
- /* injection towards BTS */
- switch (hh->proto) {
- case IPAC_PROTO_RSL:
- /* FIXME: what to do about TRX > 0 */
- other_conn = ipbc->rsl_conn[0];
- break;
- default:
- DEBUGP(DLINP, "Unknown protocol 0x%02x, sending to "
- "OML FD\n", hh->proto);
- /* fall through */
- case IPAC_PROTO_IPACCESS:
- case IPAC_PROTO_OML:
- other_conn = ipbc->oml_conn;
- break;
- }
- break;
- case UDP_TO_BSC:
- /* injection towards BSC */
- switch (hh->proto) {
- case IPAC_PROTO_RSL:
- /* FIXME: what to do about TRX > 0 */
- other_conn = ipbc->bsc_rsl_conn[0];
- break;
- default:
- DEBUGP(DLINP, "Unknown protocol 0x%02x, sending to "
- "OML FD\n", hh->proto);
- /* fall through */
- case IPAC_PROTO_IPACCESS:
- case IPAC_PROTO_OML:
- other_conn = ipbc->bsc_oml_conn;
- break;
- }
- break;
- default:
- DEBUGP(DLINP, "Unknown filedescriptor priv_nr=%04x\n", bfd->priv_nr);
- break;
- }
-
- if (other_conn) {
- /* enqueue the message for TX on the respective FD */
- msgb_enqueue(&other_conn->tx_queue, msg);
- other_conn->fd.when |= BSC_FD_WRITE;
- } else
- msgb_free(msg);
-
- return 0;
-}
-
-static int handle_udp_write(struct osmo_fd *bfd)
-{
- /* not implemented yet */
- bfd->when &= ~BSC_FD_WRITE;
-
- return -EIO;
-}
-
-/* callback from select.c in case one of the fd's can be read/written */
-static int udp_fd_cb(struct osmo_fd *bfd, unsigned int what)
-{
- int rc = 0;
-
- if (what & BSC_FD_READ)
- rc = handle_udp_read(bfd);
- if (what & BSC_FD_WRITE)
- rc = handle_udp_write(bfd);
-
- return rc;
-}
-
-
-static int ipbc_alloc_connect(struct ipa_proxy_conn *ipc, struct osmo_fd *bfd,
- uint16_t site_id, uint16_t bts_id,
- uint16_t trx_id, struct tlv_parsed *tlvp,
- struct msgb *msg)
-{
- struct ipa_bts_conn *ipbc;
- uint16_t udp_port;
- int ret = 0;
- struct sockaddr_in sin;
-
- memset(&sin, 0, sizeof(sin));
- sin.sin_family = AF_INET;
- inet_aton(bsc_ipaddr, &sin.sin_addr);
-
- DEBUGP(DLINP, "(%u/%u/%u) New BTS connection: ",
- site_id, bts_id, trx_id);
-
- /* OML needs to be established before RSL */
- if ((bfd->priv_nr & 0xff) != OML_FROM_BTS) {
- DEBUGPC(DLINP, "Not a OML connection ?!?\n");
- return -EIO;
- }
-
- /* allocate new BTS connection data structure */
- ipbc = talloc_zero(tall_bsc_ctx, struct ipa_bts_conn);
- if (!ipbc) {
- ret = -ENOMEM;
- goto err_out;
- }
-
- DEBUGPC(DLINP, "Created BTS Conn data structure\n");
- ipbc->ipp = ipp;
- ipbc->unit_id.site_id = site_id;
- ipbc->unit_id.bts_id = bts_id;
- ipbc->oml_conn = ipc;
- ipc->bts_conn = ipbc;
-
- /* store the content of the ID TAGS for later reference */
- store_idtags(ipbc, tlvp);
- ipbc->id_resp_len = msg->len;
- ipbc->id_resp = talloc_size(tall_bsc_ctx, ipbc->id_resp_len);
- memcpy(ipbc->id_resp, msg->data, ipbc->id_resp_len);
-
- /* Create OML TCP connection towards BSC */
- sin.sin_port = htons(IPA_TCP_PORT_OML);
- ipbc->bsc_oml_conn = connect_bsc(&sin, OML_TO_BSC, ipbc);
- if (!ipbc->bsc_oml_conn) {
- ret = -EIO;
- goto err_bsc_conn;
- }
-
- DEBUGP(DLINP, "(%u/%u/%u) OML Connected to BSC\n",
- site_id, bts_id, trx_id);
-
- /* Create UDP socket for BTS packet injection */
- udp_port = 10000 + (site_id % 1000)*100 + (bts_id % 100);
- ret = make_sock(&ipbc->udp_bts_fd, IPPROTO_UDP, INADDR_ANY, udp_port,
- UDP_TO_BTS, udp_fd_cb, ipbc);
- if (ret < 0)
- goto err_udp_bts;
- DEBUGP(DLINP, "(%u/%u/%u) Created UDP socket for injection "
- "towards BTS at port %u\n", site_id, bts_id, trx_id, udp_port);
-
- /* Create UDP socket for BSC packet injection */
- udp_port = 20000 + (site_id % 1000)*100 + (bts_id % 100);
- ret = make_sock(&ipbc->udp_bsc_fd, IPPROTO_UDP, INADDR_ANY, udp_port,
- UDP_TO_BSC, udp_fd_cb, ipbc);
- if (ret < 0)
- goto err_udp_bsc;
- DEBUGP(DLINP, "(%u/%u/%u) Created UDP socket for injection "
- "towards BSC at port %u\n", site_id, bts_id, trx_id, udp_port);
-
-
- /* GPRS NS related code */
- if (gprs_ns_ipaddr) {
- struct sockaddr_in sock;
- socklen_t len = sizeof(sock);
- struct in_addr addr;
- uint32_t ip;
-
- inet_aton(listen_ipaddr, &addr);
- ip = ntohl(addr.s_addr); /* make_sock() needs host byte order */
- ret = make_sock(&ipbc->gprs_ns_fd, IPPROTO_UDP, ip, 0, 0,
- gprs_ns_cb, ipbc);
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "Creating the GPRS socket failed.\n");
- goto err_udp_bsc;
- }
-
- ret = getsockname(ipbc->gprs_ns_fd.fd, (struct sockaddr* ) &sock, &len);
- ipbc->gprs_local_port = ntohs(sock.sin_port);
- LOGP(DLINP, LOGL_NOTICE,
- "Created GPRS NS Socket. Listening on: %s:%d\n",
- inet_ntoa(sock.sin_addr), ipbc->gprs_local_port);
-
- ret = getpeername(bfd->fd, (struct sockaddr* ) &sock, &len);
- ipbc->bts_addr = sock.sin_addr;
- }
-
- llist_add(&ipbc->list, &ipp->bts_list);
-
- return 0;
-
-err_udp_bsc:
- osmo_fd_unregister(&ipbc->udp_bts_fd);
-err_udp_bts:
- osmo_fd_unregister(&ipbc->bsc_oml_conn->fd);
- close(ipbc->bsc_oml_conn->fd.fd);
- talloc_free(ipbc->bsc_oml_conn);
- ipbc->bsc_oml_conn = NULL;
-err_bsc_conn:
- talloc_free(ipbc->id_resp);
- talloc_free(ipbc);
-#if 0
- osmo_fd_unregister(bfd);
- close(bfd->fd);
- talloc_free(bfd);
-#endif
-err_out:
- return ret;
-}
-
-static int ipaccess_rcvmsg(struct ipa_proxy_conn *ipc, struct msgb *msg,
- struct osmo_fd *bfd)
-{
- struct tlv_parsed tlvp;
- uint8_t msg_type = *(msg->l2h);
- struct ipaccess_unit unit_data;
- struct ipa_bts_conn *ipbc;
- int ret = 0;
-
- switch (msg_type) {
- case IPAC_MSGT_PING:
- ret = ipa_ccm_send_pong(bfd->fd);
- break;
- case IPAC_MSGT_PONG:
- DEBUGP(DLMI, "PONG!\n");
- break;
- case IPAC_MSGT_ID_RESP:
- DEBUGP(DLMI, "ID_RESP ");
- /* parse tags, search for Unit ID */
- ipa_ccm_idtag_parse(&tlvp, (uint8_t *)msg->l2h + 2,
- msgb_l2len(msg)-2);
- DEBUGP(DLMI, "\n");
-
- if (!TLVP_PRESENT(&tlvp, IPAC_IDTAG_UNIT)) {
- LOGP(DLINP, LOGL_ERROR, "No Unit ID in ID RESPONSE !?!\n");
- return -EIO;
- }
-
- /* lookup BTS, create sign_link, ... */
- memset(&unit_data, 0, sizeof(unit_data));
- ipa_parse_unitid((char *)TLVP_VAL(&tlvp, IPAC_IDTAG_UNIT),
- &unit_data);
- ipbc = find_bts_by_unitid(ipp, unit_data.site_id, unit_data.bts_id);
- if (!ipbc) {
- /* We have not found an ipbc (per-bts proxy instance)
- * for this BTS yet. The first connection of a new BTS must
- * be a OML connection. We allocate the associated data structures,
- * and try to connect to the remote end */
-
- return ipbc_alloc_connect(ipc, bfd, unit_data.site_id,
- unit_data.bts_id,
- unit_data.trx_id, &tlvp, msg);
- /* if this fails, the caller will clean up bfd */
- } else {
- struct sockaddr_in sin;
- memset(&sin, 0, sizeof(sin));
- sin.sin_family = AF_INET;
- inet_aton(bsc_ipaddr, &sin.sin_addr);
-
- DEBUGP(DLINP, "Identified BTS %u/%u/%u\n",
- unit_data.site_id, unit_data.bts_id, unit_data.trx_id);
-
- if ((bfd->priv_nr & 0xff) != RSL_FROM_BTS) {
- LOGP(DLINP, LOGL_ERROR, "Second OML connection from "
- "same BTS ?!?\n");
- return 0;
- }
-
- if (unit_data.trx_id >= MAX_TRX) {
- LOGP(DLINP, LOGL_ERROR, "We don't support more "
- "than %u TRX\n", MAX_TRX);
- return -EINVAL;
- }
-
- ipc->bts_conn = ipbc;
- /* store TRX number in higher 8 bit of the bfd private number */
- bfd->priv_nr |= unit_data.trx_id << 8;
- ipbc->rsl_conn[unit_data.trx_id] = ipc;
-
- /* Create RSL TCP connection towards BSC */
- sin.sin_port = htons(IPA_TCP_PORT_RSL);
- ipbc->bsc_rsl_conn[unit_data.trx_id] =
- connect_bsc(&sin, RSL_TO_BSC | (unit_data.trx_id << 8), ipbc);
- if (!ipbc->bsc_oml_conn)
- return -EIO;
- DEBUGP(DLINP, "(%u/%u/%u) Connected RSL to BSC\n",
- unit_data.site_id, unit_data.bts_id, unit_data.trx_id);
- }
- break;
- case IPAC_MSGT_ID_GET:
- DEBUGP(DLMI, "ID_GET\n");
- if ((bfd->priv_nr & 0xff) != OML_TO_BSC &&
- (bfd->priv_nr & 0xff) != RSL_TO_BSC) {
- DEBUGP(DLINP, "IDentity REQuest from BTS ?!?\n");
- return -EIO;
- }
- ipbc = ipc->bts_conn;
- if (!ipbc) {
- DEBUGP(DLINP, "ID_GET from BSC before we have ID_RESP from BTS\n");
- return -EIO;
- }
- ret = write(bfd->fd, ipbc->id_resp, ipbc->id_resp_len);
- if (ret != ipbc->id_resp_len) {
- LOGP(DLINP, LOGL_ERROR, "Partial write: %d of %d\n",
- ret, ipbc->id_resp_len);
- return -EIO;
- }
- ret = 0;
- break;
- case IPAC_MSGT_ID_ACK:
- DEBUGP(DLMI, "ID_ACK? -> ACK!\n");
- ret = ipa_ccm_send_id_ack(bfd->fd);
- break;
- default:
- LOGP(DLMI, LOGL_ERROR, "Unhandled IPA type; %d\n", msg_type);
- return 1;
- break;
- }
- return ret;
-}
-
-struct msgb *ipaccess_proxy_read_msg(struct osmo_fd *bfd, int *error)
-{
- struct msgb *msg = msgb_alloc(PROXY_ALLOC_SIZE, "Abis/IP");
- struct ipaccess_head *hh;
- int len, ret = 0;
-
- if (!msg) {
- *error = -ENOMEM;
- return NULL;
- }
-
- /* first read our 3-byte header */
- hh = (struct ipaccess_head *) msg->data;
- ret = recv(bfd->fd, msg->data, 3, 0);
- if (ret < 0) {
- if (errno != EAGAIN)
- LOGP(DLINP, LOGL_ERROR, "recv error: %s\n", strerror(errno));
- msgb_free(msg);
- *error = ret;
- return NULL;
- } else if (ret == 0) {
- msgb_free(msg);
- *error = ret;
- return NULL;
- }
-
- msgb_put(msg, ret);
-
- /* then read te length as specified in header */
- msg->l2h = msg->data + sizeof(*hh);
- len = ntohs(hh->len);
- ret = recv(bfd->fd, msg->l2h, len, 0);
- if (ret < len) {
- LOGP(DLINP, LOGL_ERROR, "short read!\n");
- msgb_free(msg);
- *error = -EIO;
- return NULL;
- }
- msgb_put(msg, ret);
-
- return msg;
-}
-
-static struct ipa_proxy_conn *ipc_by_priv_nr(struct ipa_bts_conn *ipbc,
- unsigned int priv_nr)
-{
- struct ipa_proxy_conn *bsc_conn;
- unsigned int trx_id = priv_nr >> 8;
-
- switch (priv_nr & 0xff) {
- case OML_FROM_BTS: /* incoming OML data from BTS, forward to BSC OML */
- bsc_conn = ipbc->bsc_oml_conn;
- break;
- case RSL_FROM_BTS: /* incoming RSL data from BTS, forward to BSC RSL */
- bsc_conn = ipbc->bsc_rsl_conn[trx_id];
- break;
- case OML_TO_BSC: /* incoming OML data from BSC, forward to BTS OML */
- bsc_conn = ipbc->oml_conn;
- break;
- case RSL_TO_BSC: /* incoming RSL data from BSC, forward to BTS RSL */
- bsc_conn = ipbc->rsl_conn[trx_id];
- break;
- default:
- bsc_conn = NULL;
- break;
- }
- return bsc_conn;
-}
-
-static void reconn_tmr_cb(void *data)
-{
- struct ipa_proxy *ipp = data;
- struct ipa_bts_conn *ipbc;
- struct sockaddr_in sin;
- int i;
-
- DEBUGP(DLINP, "Running reconnect timer\n");
-
- memset(&sin, 0, sizeof(sin));
- sin.sin_family = AF_INET;
- inet_aton(bsc_ipaddr, &sin.sin_addr);
-
- llist_for_each_entry(ipbc, &ipp->bts_list, list) {
- /* if OML to BSC is dead, try to restore it */
- if (ipbc->oml_conn && !ipbc->bsc_oml_conn) {
- sin.sin_port = htons(IPA_TCP_PORT_OML);
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, 0);
- LOGPC(DLINP, LOGL_NOTICE, "OML Trying to reconnect\n");
- ipbc->bsc_oml_conn = connect_bsc(&sin, OML_TO_BSC, ipbc);
- if (!ipbc->bsc_oml_conn)
- goto reschedule;
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, 0);
- LOGPC(DLINP, LOGL_NOTICE, "OML Reconnected\n");
- }
- /* if we (still) don't have a OML connection, skip RSL */
- if (!ipbc->oml_conn || !ipbc->bsc_oml_conn)
- continue;
-
- for (i = 0; i < ARRAY_SIZE(ipbc->rsl_conn); i++) {
- unsigned int priv_nr;
- /* don't establish RSL links which we don't have */
- if (!ipbc->rsl_conn[i])
- continue;
- if (ipbc->bsc_rsl_conn[i])
- continue;
- priv_nr = ipbc->rsl_conn[i]->fd.priv_nr;
- priv_nr &= ~0xff;
- priv_nr |= RSL_TO_BSC;
- sin.sin_port = htons(IPA_TCP_PORT_RSL);
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, priv_nr >> 8);
- LOGPC(DLINP, LOGL_NOTICE, "RSL Trying to reconnect\n");
- ipbc->bsc_rsl_conn[i] = connect_bsc(&sin, priv_nr, ipbc);
- if (!ipbc->bsc_rsl_conn[i])
- goto reschedule;
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, priv_nr >> 8);
- LOGPC(DLINP, LOGL_NOTICE, "RSL Reconnected\n");
- }
- }
- return;
-
-reschedule:
- osmo_timer_schedule(&ipp->reconn_timer, 5, 0);
-}
-
-static void handle_dead_socket(struct osmo_fd *bfd)
-{
- struct ipa_proxy_conn *ipc = bfd->data; /* local conn */
- struct ipa_proxy_conn *bsc_conn; /* remote conn */
- struct ipa_bts_conn *ipbc = ipc->bts_conn;
- unsigned int trx_id = bfd->priv_nr >> 8;
- struct msgb *msg, *msg2;
-
- osmo_fd_unregister(bfd);
- close(bfd->fd);
- bfd->fd = -1;
-
- /* FIXME: clear tx_queue, remove all references, etc. */
- llist_for_each_entry_safe(msg, msg2, &ipc->tx_queue, list)
- msgb_free(msg);
-
- switch (bfd->priv_nr & 0xff) {
- case OML_FROM_BTS: /* incoming OML data from BTS, forward to BSC OML */
- /* The BTS started a connection with us but we got no
- * IPAC_MSGT_ID_RESP message yet, in that scenario we did not
- * allocate the ipa_bts_conn structure. */
- if (ipbc == NULL)
- break;
- ipbc->oml_conn = NULL;
- bsc_conn = ipbc->bsc_oml_conn;
- /* close the connection to the BSC */
- osmo_fd_unregister(&bsc_conn->fd);
- close(bsc_conn->fd.fd);
- llist_for_each_entry_safe(msg, msg2, &bsc_conn->tx_queue, list)
- msgb_free(msg);
- talloc_free(bsc_conn);
- ipbc->bsc_oml_conn = NULL;
- /* FIXME: do we need to delete the entire ipbc ? */
- break;
- case RSL_FROM_BTS: /* incoming RSL data from BTS, forward to BSC RSL */
- ipbc->rsl_conn[trx_id] = NULL;
- bsc_conn = ipbc->bsc_rsl_conn[trx_id];
- /* close the connection to the BSC */
- osmo_fd_unregister(&bsc_conn->fd);
- close(bsc_conn->fd.fd);
- llist_for_each_entry_safe(msg, msg2, &bsc_conn->tx_queue, list)
- msgb_free(msg);
- talloc_free(bsc_conn);
- ipbc->bsc_rsl_conn[trx_id] = NULL;
- break;
- case OML_TO_BSC: /* incoming OML data from BSC, forward to BTS OML */
- ipbc->bsc_oml_conn = NULL;
- bsc_conn = ipbc->oml_conn;
- /* start reconnect timer */
- osmo_timer_schedule(&ipp->reconn_timer, 5, 0);
- break;
- case RSL_TO_BSC: /* incoming RSL data from BSC, forward to BTS RSL */
- ipbc->bsc_rsl_conn[trx_id] = NULL;
- bsc_conn = ipbc->rsl_conn[trx_id];
- /* start reconnect timer */
- osmo_timer_schedule(&ipp->reconn_timer, 5, 0);
- break;
- default:
- bsc_conn = NULL;
- break;
- }
-
- talloc_free(ipc);
-}
-
-static void patch_gprs_msg(struct ipa_bts_conn *ipbc, int priv_nr, struct msgb *msg)
-{
- uint8_t *nsvci;
-
- if ((priv_nr & 0xff) != OML_FROM_BTS && (priv_nr & 0xff) != OML_TO_BSC)
- return;
-
- if (msgb_l2len(msg) != 39)
- return;
-
- /*
- * Check if this is a IPA Set Attribute or IPA Set Attribute ACK
- * and if the FOM Class is GPRS NSVC0 and then we will patch it.
- *
- * The patch assumes the message looks like the one from the trace
- * but we only match messages with a specific size anyway... So
- * this hack should work just fine.
- */
-
- if (msg->l2h[0] == 0x10 && msg->l2h[1] == 0x80 &&
- msg->l2h[2] == 0x00 && msg->l2h[3] == 0x15 &&
- msg->l2h[18] == 0xf5 && msg->l2h[19] == 0xf2) {
- nsvci = &msg->l2h[23];
- ipbc->gprs_orig_port = *(uint16_t *)(nsvci+8);
- ipbc->gprs_orig_ip = *(uint32_t *)(nsvci+10);
- *(uint16_t *)(nsvci+8) = htons(ipbc->gprs_local_port);
- *(uint32_t *)(nsvci+10) = ipbc->ipp->listen_addr.s_addr;
- } else if (msg->l2h[0] == 0x10 && msg->l2h[1] == 0x80 &&
- msg->l2h[2] == 0x00 && msg->l2h[3] == 0x15 &&
- msg->l2h[18] == 0xf6 && msg->l2h[19] == 0xf2) {
- nsvci = &msg->l2h[23];
- *(uint16_t *)(nsvci+8) = ipbc->gprs_orig_port;
- *(uint32_t *)(nsvci+10) = ipbc->gprs_orig_ip;
- }
-}
-
-static int handle_tcp_read(struct osmo_fd *bfd)
-{
- struct ipa_proxy_conn *ipc = bfd->data;
- struct ipa_bts_conn *ipbc = ipc->bts_conn;
- struct ipa_proxy_conn *bsc_conn;
- struct msgb *msg;
- struct ipaccess_head *hh;
- int ret = 0;
- char *btsbsc;
-
- if ((bfd->priv_nr & 0xff) <= 2)
- btsbsc = "BTS";
- else
- btsbsc = "BSC";
-
- msg = ipaccess_proxy_read_msg(bfd, &ret);
- if (!msg) {
- if (ret == 0) {
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, bfd->priv_nr >> 8);
- LOGPC(DLINP, LOGL_NOTICE, "%s disappeared, "
- "dead socket\n", btsbsc);
- handle_dead_socket(bfd);
- }
- return ret;
- }
-
- msgb_put(msg, ret);
- logp_ipbc_uid(DLMI, LOGL_DEBUG, ipbc, bfd->priv_nr >> 8);
- DEBUGPC(DLMI, "RX<-%s: %s\n", btsbsc, osmo_hexdump(msg->data, msg->len));
-
- hh = (struct ipaccess_head *) msg->data;
- if (hh->proto == IPAC_PROTO_IPACCESS) {
- ret = ipaccess_rcvmsg(ipc, msg, bfd);
- if (ret < 0) {
- osmo_fd_unregister(bfd);
- close(bfd->fd);
- bfd->fd = -1;
- talloc_free(bfd);
- msgb_free(msg);
- return ret;
- } else if (ret == 0) {
- /* we do not forward parts of the CCM protocol
- * through the proxy but rather terminate it ourselves. */
- msgb_free(msg);
- return ret;
- }
- }
-
- if (!ipbc) {
- LOGP(DLINP, LOGL_ERROR,
- "received %s packet but no ipc->bts_conn?!?\n", btsbsc);
- msgb_free(msg);
- return -EIO;
- }
-
- bsc_conn = ipc_by_priv_nr(ipbc, bfd->priv_nr);
- if (bsc_conn) {
- if (gprs_ns_ipaddr)
- patch_gprs_msg(ipbc, bfd->priv_nr, msg);
- /* enqueue packet towards BSC */
- msgb_enqueue(&bsc_conn->tx_queue, msg);
- /* mark respective filedescriptor as 'we want to write' */
- bsc_conn->fd.when |= BSC_FD_WRITE;
- } else {
- logp_ipbc_uid(DLINP, LOGL_INFO, ipbc, bfd->priv_nr >> 8);
- LOGPC(DLINP, LOGL_INFO, "Dropping packet from %s, "
- "since remote connection is dead\n", btsbsc);
- msgb_free(msg);
- }
-
- return ret;
-}
-
-/* a TCP socket is ready to be written to */
-static int handle_tcp_write(struct osmo_fd *bfd)
-{
- struct ipa_proxy_conn *ipc = bfd->data;
- struct ipa_bts_conn *ipbc = ipc->bts_conn;
- struct llist_head *lh;
- struct msgb *msg;
- char *btsbsc;
- int ret;
-
- if ((bfd->priv_nr & 0xff) <= 2)
- btsbsc = "BTS";
- else
- btsbsc = "BSC";
-
-
- /* get the next msg for this timeslot */
- if (llist_empty(&ipc->tx_queue)) {
- bfd->when &= ~BSC_FD_WRITE;
- return 0;
- }
- lh = ipc->tx_queue.next;
- llist_del(lh);
- msg = llist_entry(lh, struct msgb, list);
-
- logp_ipbc_uid(DLMI, LOGL_DEBUG, ipbc, bfd->priv_nr >> 8);
- DEBUGPC(DLMI, "TX %04x: %s\n", bfd->priv_nr,
- osmo_hexdump(msg->data, msg->len));
-
- ret = send(bfd->fd, msg->data, msg->len, 0);
- msgb_free(msg);
-
- if (ret == 0) {
- logp_ipbc_uid(DLINP, LOGL_NOTICE, ipbc, bfd->priv_nr >> 8);
- LOGP(DLINP, LOGL_NOTICE, "%s disappeared, dead socket\n", btsbsc);
- handle_dead_socket(bfd);
- }
-
- return ret;
-}
-
-/* callback from select.c in case one of the fd's can be read/written */
-static int proxy_ipaccess_fd_cb(struct osmo_fd *bfd, unsigned int what)
-{
- int rc = 0;
-
- if (what & BSC_FD_READ) {
- rc = handle_tcp_read(bfd);
- if (rc < 0)
- return rc;
- }
- if (what & BSC_FD_WRITE)
- rc = handle_tcp_write(bfd);
-
- return rc;
-}
-
-/* callback of the listening filedescriptor */
-static int listen_fd_cb(struct osmo_fd *listen_bfd, unsigned int what)
-{
- int ret;
- struct ipa_proxy_conn *ipc;
- struct osmo_fd *bfd;
- struct sockaddr_in sa;
- socklen_t sa_len = sizeof(sa);
-
- if (!(what & BSC_FD_READ))
- return 0;
-
- ret = accept(listen_bfd->fd, (struct sockaddr *) &sa, &sa_len);
- if (ret < 0) {
- perror("accept");
- return ret;
- }
- DEBUGP(DLINP, "accept()ed new %s link from %s\n",
- (listen_bfd->priv_nr & 0xff) == OML_FROM_BTS ? "OML" : "RSL",
- inet_ntoa(sa.sin_addr));
-
- ipc = alloc_conn();
- if (!ipc) {
- close(ret);
- return -ENOMEM;
- }
-
- bfd = &ipc->fd;
- bfd->fd = ret;
- bfd->data = ipc;
- bfd->priv_nr = listen_bfd->priv_nr;
- bfd->cb = proxy_ipaccess_fd_cb;
- bfd->when = BSC_FD_READ;
- ret = osmo_fd_register(bfd);
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "could not register FD\n");
- close(bfd->fd);
- talloc_free(ipc);
- return ret;
- }
-
- /* Request ID. FIXME: request LOCATION, HW/SW VErsion, Unit Name, Serno */
- ret = ipa_ccm_send_id_req(bfd->fd);
-
- return 0;
-}
-
-static void send_ns(int fd, const char *buf, int size, struct in_addr ip, int port)
-{
- int ret;
- struct sockaddr_in addr;
- socklen_t len = sizeof(addr);
- memset(&addr, 0, sizeof(addr));
-
- addr.sin_family = AF_INET;
- addr.sin_port = htons(port);
- addr.sin_addr = ip;
-
- ret = sendto(fd, buf, size, 0, (struct sockaddr *) &addr, len);
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to forward GPRS message.\n");
- }
-}
-
-static int gprs_ns_cb(struct osmo_fd *bfd, unsigned int what)
-{
- struct ipa_bts_conn *bts;
- char buf[4096];
- int ret;
- struct sockaddr_in sock;
- socklen_t len = sizeof(sock);
-
- /* 1. get the data... */
- ret = recvfrom(bfd->fd, buf, sizeof(buf), 0, (struct sockaddr *) &sock, &len);
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to recv GPRS NS msg: %s.\n", strerror(errno));
- return -1;
- }
-
- bts = bfd->data;
-
- /* 2. figure out where to send it to */
- if (memcmp(&sock.sin_addr, &ipp->gprs_addr, sizeof(sock.sin_addr)) == 0) {
- LOGP(DLINP, LOGL_DEBUG, "GPRS NS msg from network.\n");
- send_ns(bfd->fd, buf, ret, bts->bts_addr, 23000);
- } else if (memcmp(&sock.sin_addr, &bts->bts_addr, sizeof(sock.sin_addr)) == 0) {
- LOGP(DLINP, LOGL_DEBUG, "GPRS NS msg from BTS.\n");
- send_ns(bfd->fd, buf, ret, ipp->gprs_addr, 23000);
- } else {
- LOGP(DLINP, LOGL_ERROR, "Unknown GPRS source: %s\n", inet_ntoa(sock.sin_addr));
- }
-
- return 0;
-}
-
-/* Actively connect to a BSC. */
-static struct ipa_proxy_conn *connect_bsc(struct sockaddr_in *sa, int priv_nr, void *data)
-{
- struct ipa_proxy_conn *ipc;
- struct osmo_fd *bfd;
- int ret, on = 1;
-
- ipc = alloc_conn();
- if (!ipc)
- return NULL;
-
- ipc->bts_conn = data;
-
- bfd = &ipc->fd;
- bfd->fd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
- bfd->cb = ipaccess_fd_cb;
- bfd->when = BSC_FD_READ | BSC_FD_WRITE;
- bfd->data = ipc;
- bfd->priv_nr = priv_nr;
-
- if (bfd->fd < 0) {
- LOGP(DLINP, LOGL_ERROR, "Could not create socket: %s\n",
- strerror(errno));
- talloc_free(ipc);
- return NULL;
- }
-
- ret = setsockopt(bfd->fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "Could not set socket option\n");
- close(bfd->fd);
- talloc_free(ipc);
- return NULL;
- }
-
- ret = connect(bfd->fd, (struct sockaddr *) sa, sizeof(*sa));
- if (ret < 0) {
- LOGP(DLINP, LOGL_ERROR, "Could not connect socket: %s\n",
- inet_ntoa(sa->sin_addr));
- close(bfd->fd);
- talloc_free(ipc);
- return NULL;
- }
-
- /* pre-fill tx_queue with identity request */
- ret = osmo_fd_register(bfd);
- if (ret < 0) {
- close(bfd->fd);
- talloc_free(ipc);
- return NULL;
- }
-
- return ipc;
-}
-
-static int ipaccess_proxy_setup(void)
-{
- int ret;
-
- ipp = talloc_zero(tall_bsc_ctx, struct ipa_proxy);
- if (!ipp)
- return -ENOMEM;
- INIT_LLIST_HEAD(&ipp->bts_list);
- osmo_timer_setup(&ipp->reconn_timer, reconn_tmr_cb, ipp);
-
- /* Listen for OML connections */
- ret = make_sock(&ipp->oml_listen_fd, IPPROTO_TCP, INADDR_ANY,
- IPA_TCP_PORT_OML, OML_FROM_BTS, listen_fd_cb, NULL);
- if (ret < 0)
- return ret;
-
- /* Listen for RSL connections */
- ret = make_sock(&ipp->rsl_listen_fd, IPPROTO_TCP, INADDR_ANY,
- IPA_TCP_PORT_RSL, RSL_FROM_BTS, listen_fd_cb, NULL);
-
- if (ret < 0)
- return ret;
-
- /* Connect the GPRS NS Socket */
- if (gprs_ns_ipaddr) {
- inet_aton(gprs_ns_ipaddr, &ipp->gprs_addr);
- inet_aton(listen_ipaddr, &ipp->listen_addr);
- }
-
- return ret;
-}
-
-static void signal_handler(int signal)
-{
- fprintf(stdout, "signal %u received\n", signal);
-
- switch (signal) {
- case SIGABRT:
- /* in case of abort, we want to obtain a talloc report
- * and then return to the caller, who will abort the process */
- case SIGUSR1:
- talloc_report_full(tall_bsc_ctx, stderr);
- break;
- default:
- break;
- }
-}
-
-static void print_help(void)
-{
- printf(" ipaccess-proxy is a proxy BTS.\n");
- printf(" -h --help. This help text.\n");
- printf(" -l --listen IP. The ip to listen to.\n");
- printf(" -b --bsc IP. The BSC IP address.\n");
- printf(" -g --gprs IP. Take GPRS NS from that IP.\n");
- printf("\n");
- printf(" -s --disable-color. Disable the color inside the logging message.\n");
- printf(" -e --log-level number. Set the global loglevel.\n");
- printf(" -T --timestamp. Prefix every log message with a timestamp.\n");
- printf(" -V --version. Print the version of OpenBSC.\n");
-}
-
-static void print_usage(void)
-{
- printf("Usage: ipaccess-proxy [options]\n");
-}
-
-enum {
- IPA_PROXY_OPT_LISTEN_NONE = 0,
- IPA_PROXY_OPT_LISTEN_IP = (1 << 0),
- IPA_PROXY_OPT_BSC_IP = (1 << 1),
-};
-
-static void handle_options(int argc, char** argv)
-{
- int options_mask = 0;
-
- /* disable explicit missing arguments error output from getopt_long */
- opterr = 0;
-
- while (1) {
- int option_index = 0, c;
- static struct option long_options[] = {
- {"help", 0, 0, 'h'},
- {"disable-color", 0, 0, 's'},
- {"timestamp", 0, 0, 'T'},
- {"log-level", 1, 0, 'e'},
- {"listen", 1, 0, 'l'},
- {"bsc", 1, 0, 'b'},
- {0, 0, 0, 0}
- };
-
- c = getopt_long(argc, argv, "hsTe:l:b:g:",
- long_options, &option_index);
- if (c == -1)
- break;
-
- switch (c) {
- case 'h':
- print_usage();
- print_help();
- exit(0);
- case 'l':
- listen_ipaddr = optarg;
- options_mask |= IPA_PROXY_OPT_LISTEN_IP;
- break;
- case 'b':
- bsc_ipaddr = optarg;
- options_mask |= IPA_PROXY_OPT_BSC_IP;
- break;
- case 'g':
- gprs_ns_ipaddr = optarg;
- break;
- case 's':
- log_set_use_color(osmo_stderr_target, 0);
- break;
- case 'T':
- log_set_print_timestamp(osmo_stderr_target, 1);
- break;
- case 'e':
- log_set_log_level(osmo_stderr_target, atoi(optarg));
- break;
- case '?':
- if (optopt) {
- printf("ERROR: missing mandatory argument "
- "for `%s' option\n", argv[optind-1]);
- } else {
- printf("ERROR: unknown option `%s'\n",
- argv[optind-1]);
- }
- print_usage();
- print_help();
- exit(EXIT_FAILURE);
- break;
- default:
- /* ignore */
- break;
- }
- }
- if ((options_mask & (IPA_PROXY_OPT_LISTEN_IP | IPA_PROXY_OPT_BSC_IP))
- != (IPA_PROXY_OPT_LISTEN_IP | IPA_PROXY_OPT_BSC_IP)) {
- printf("ERROR: You have to specify `--listen' and `--bsc' "
- "options at least.\n");
- print_usage();
- print_help();
- exit(EXIT_FAILURE);
- }
-}
-
-int main(int argc, char **argv)
-{
- int rc;
-
- tall_bsc_ctx = talloc_named_const(NULL, 1, "ipaccess-proxy");
- msgb_talloc_ctx_init(tall_bsc_ctx, 0);
-
- osmo_init_logging(&log_info);
- log_parse_category_mask(osmo_stderr_target, "DLINP:DLMI");
-
- handle_options(argc, argv);
-
- rc = ipaccess_proxy_setup();
- if (rc < 0)
- exit(1);
-
- signal(SIGUSR1, &signal_handler);
- signal(SIGABRT, &signal_handler);
- osmo_init_ignore_signals();
-
- while (1) {
- osmo_select_main(0);
- }
-}
diff --git a/src/ipaccess/network_listen.c b/src/ipaccess/network_listen.c
deleted file mode 100644
index 3b44ceb74..000000000
--- a/src/ipaccess/network_listen.c
+++ /dev/null
@@ -1,257 +0,0 @@
-/* ip.access nanoBTS network listen mode */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <unistd.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <stdint.h>
-
-#include <arpa/inet.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/timer.h>
-#include <osmocom/gsm/rxlev_stat.h>
-#include <osmocom/gsm/gsm48_ie.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <osmocom/abis/e1_input.h>
-
-#define WHITELIST_MAX_SIZE ((NUM_ARFCNS*2)+2+1)
-
-int ipac_rxlevstat2whitelist(uint16_t *buf, const struct rxlev_stats *st, uint8_t min_rxlev,
- uint16_t max_num_arfcns)
-{
- int i;
- unsigned int num_arfcn = 0;
-
- for (i = NUM_RXLEVS-1; i >= min_rxlev; i--) {
- int16_t arfcn = -1;
-
- while ((arfcn = rxlev_stat_get_next(st, i, arfcn)) >= 0) {
- *buf++ = htons(arfcn);
- num_arfcn++;
-
- }
-
- if (num_arfcn > max_num_arfcns)
- break;
- }
-
- return num_arfcn;
-}
-
-enum ipac_test_state {
- IPAC_TEST_S_IDLE,
- IPAC_TEST_S_RQD,
- IPAC_TEST_S_EXEC,
- IPAC_TEST_S_PARTIAL,
-};
-
-int ipac_nwl_test_start(struct gsm_bts_trx *trx, uint8_t testnr,
- const uint8_t *phys_conf, unsigned int phys_conf_len)
-{
- struct msgb *msg;
-
- if (trx->ipaccess.test_state != IPAC_TEST_S_IDLE) {
- fprintf(stderr, "Cannot start test in state %u\n", trx->ipaccess.test_state);
- return -EINVAL;
- }
-
- switch (testnr) {
- case NM_IPACC_TESTNO_CHAN_USAGE:
- case NM_IPACC_TESTNO_BCCH_CHAN_USAGE:
- rxlev_stat_reset(&trx->ipaccess.rxlev_stat);
- break;
- }
-
- msg = msgb_alloc_headroom(phys_conf_len+256, 128, "OML");
-
- if (phys_conf && phys_conf_len) {
- uint8_t *payload;
- /* first put the phys conf header */
- msgb_tv16_put(msg, NM_ATT_PHYS_CONF, phys_conf_len);
- payload = msgb_put(msg, phys_conf_len);
- memcpy(payload, phys_conf, phys_conf_len);
- }
-
- abis_nm_perform_test(trx->bts, NM_OC_RADIO_CARRIER, 0, trx->nr, 0xff,
- testnr, 1, msg);
- trx->ipaccess.test_nr = testnr;
-
- /* FIXME: start safety timer until when test is supposed to complete */
-
- return 0;
-}
-
-static uint16_t last_arfcn;
-static struct gsm_sysinfo_freq nwl_si_freq[1024];
-#define FREQ_TYPE_NCELL_2 0x04 /* sub channel of SI 2 */
-#define FREQ_TYPE_NCELL_2bis 0x08 /* sub channel of SI 2bis */
-#define FREQ_TYPE_NCELL_2ter 0x10 /* sub channel of SI 2ter */
-
-struct ipacc_ferr_elem {
- int16_t freq_err;
- uint8_t freq_qual;
- uint8_t arfcn;
-} __attribute__((packed));
-
-struct ipacc_cusage_elem {
- uint16_t arfcn:10,
- rxlev:6;
-} __attribute__ ((packed));
-
-static int test_rep(void *_msg)
-{
- struct msgb *msg = _msg;
- struct abis_om_fom_hdr *foh = msgb_l3(msg);
- uint16_t test_rep_len, ferr_list_len;
- struct ipacc_ferr_elem *ife;
- struct ipac_bcch_info binfo;
- struct e1inp_sign_link *sign_link = (struct e1inp_sign_link *)msg->dst;
- int i, rc;
-
- DEBUGP(DNM, "TEST REPORT: ");
-
- if (foh->data[0] != NM_ATT_TEST_NO ||
- foh->data[2] != NM_ATT_TEST_REPORT)
- return -EINVAL;
-
- DEBUGPC(DNM, "test_no=0x%02x ", foh->data[1]);
- /* data[2] == NM_ATT_TEST_REPORT */
- /* data[3..4]: test_rep_len */
- memcpy(&test_rep_len, &foh->data[3], sizeof(uint16_t));
- test_rep_len = ntohs(test_rep_len);
- /* data[5]: ip.access test result */
- DEBUGPC(DNM, "tst_res=%s\n", ipacc_testres_name(foh->data[5]));
-
- /* data[6]: ip.access nested IE. 3 == freq_err_list */
- switch (foh->data[6]) {
- case NM_IPAC_EIE_FREQ_ERR_LIST:
- /* data[7..8]: length of ferr_list */
- memcpy(&ferr_list_len, &foh->data[7], sizeof(uint16_t));
- ferr_list_len = ntohs(ferr_list_len);
-
- /* data[9...]: frequency error list elements */
- for (i = 0; i < ferr_list_len; i+= sizeof(*ife)) {
- ife = (struct ipacc_ferr_elem *) (foh->data + 9 + i);
- DEBUGP(DNM, "==> ARFCN %4u, Frequency Error %6hd\n",
- ife->arfcn, ntohs(ife->freq_err));
- }
- break;
- case NM_IPAC_EIE_CHAN_USE_LIST:
- /* data[7..8]: length of ferr_list */
- memcpy(&ferr_list_len, &foh->data[7], sizeof(uint16_t));
- ferr_list_len = ntohs(ferr_list_len);
-
- /* data[9...]: channel usage list elements */
- for (i = 0; i < ferr_list_len; i+= 2) {
- uint16_t *cu_ptr = (uint16_t *)(foh->data + 9 + i);
- uint16_t cu = ntohs(*cu_ptr);
- uint16_t arfcn = cu & 0x3ff;
- uint8_t rxlev = cu >> 10;
- DEBUGP(DNM, "==> ARFCN %4u, RxLev %2u\n", arfcn, rxlev);
- rxlev_stat_input(&sign_link->trx->ipaccess.rxlev_stat,
- arfcn, rxlev);
- }
- break;
- case NM_IPAC_EIE_BCCH_INFO_TYPE:
- break;
- case NM_IPAC_EIE_BCCH_INFO:
- rc = ipac_parse_bcch_info(&binfo, foh->data+6);
- if (rc < 0) {
- DEBUGP(DNM, "BCCH Info parsing failed\n");
- break;
- }
- DEBUGP(DNM, "==> ARFCN %u, RxLev %2u, RxQual %2u: %3d-%d, LAC %d CI %d BSIC %u\n",
- binfo.arfcn, binfo.rx_lev, binfo.rx_qual,
- binfo.cgi.mcc, binfo.cgi.mnc,
- binfo.cgi.lac, binfo.cgi.ci, binfo.bsic);
-
- if (binfo.arfcn != last_arfcn) {
- /* report is on a new arfcn, need to clear channel list */
- memset(nwl_si_freq, 0, sizeof(nwl_si_freq));
- last_arfcn = binfo.arfcn;
- }
- if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2) {
- DEBUGP(DNM, "BA SI2: %s\n", osmo_hexdump(binfo.ba_list_si2, sizeof(binfo.ba_list_si2)));
- gsm48_decode_freq_list(nwl_si_freq, binfo.ba_list_si2, sizeof(binfo.ba_list_si2),
- 0x8c, FREQ_TYPE_NCELL_2);
- }
- if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2bis) {
- DEBUGP(DNM, "BA SI2bis: %s\n", osmo_hexdump(binfo.ba_list_si2bis, sizeof(binfo.ba_list_si2bis)));
- gsm48_decode_freq_list(nwl_si_freq, binfo.ba_list_si2bis, sizeof(binfo.ba_list_si2bis),
- 0x8e, FREQ_TYPE_NCELL_2bis);
- }
- if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2ter) {
- DEBUGP(DNM, "BA SI2ter: %s\n", osmo_hexdump(binfo.ba_list_si2ter, sizeof(binfo.ba_list_si2ter)));
- gsm48_decode_freq_list(nwl_si_freq, binfo.ba_list_si2ter, sizeof(binfo.ba_list_si2ter),
- 0x8e, FREQ_TYPE_NCELL_2ter);
- }
- for (i = 0; i < ARRAY_SIZE(nwl_si_freq); i++) {
- if (nwl_si_freq[i].mask)
- DEBUGP(DNM, "Neighbor Cell on ARFCN %u\n", i);
- }
- break;
- default:
- break;
- }
-
- switch (foh->data[5]) {
- case NM_IPACC_TESTRES_SUCCESS:
- case NM_IPACC_TESTRES_STOPPED:
- case NM_IPACC_TESTRES_TIMEOUT:
- case NM_IPACC_TESTRES_NO_CHANS:
- sign_link->trx->ipaccess.test_state = IPAC_TEST_S_IDLE;
- /* Send signal to notify higher layers of test completion */
- DEBUGP(DNM, "dispatching S_IPAC_NWL_COMPLETE signal\n");
- osmo_signal_dispatch(SS_IPAC_NWL, S_IPAC_NWL_COMPLETE,
- sign_link->trx);
- break;
- case NM_IPACC_TESTRES_PARTIAL:
- sign_link->trx->ipaccess.test_state = IPAC_TEST_S_PARTIAL;
- break;
- }
-
- return 0;
-}
-
-static int nwl_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- switch (signal) {
- case S_NM_TEST_REP:
- return test_rep(signal_data);
- default:
- break;
- }
-
- return 0;
-}
-
-void ipac_nwl_init(void)
-{
- osmo_signal_register_handler(SS_NM, nwl_sig_cb, NULL);
-}
diff --git a/src/libbsc/Makefile.am b/src/libbsc/Makefile.am
deleted file mode 100644
index e78bde624..000000000
--- a/src/libbsc/Makefile.am
+++ /dev/null
@@ -1,57 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-noinst_LIBRARIES = \
- libbsc.a \
- $(NULL)
-
-libbsc_a_SOURCES = \
- abis_nm.c \
- abis_nm_vty.c \
- abis_om2000.c \
- abis_om2000_vty.c \
- abis_rsl.c \
- bsc_rll.c \
- bsc_subscriber.c \
- paging.c \
- bts_ericsson_rbs2000.c \
- bts_ipaccess_nanobts.c \
- bts_siemens_bs11.c \
- bts_nokia_site.c \
- bts_unknown.c \
- bts_sysmobts.c \
- chan_alloc.c \
- handover_decision.c \
- handover_logic.c \
- meas_rep.c \
- pcu_sock.c \
- rest_octets.c \
- system_information.c \
- e1_config.c \
- bsc_api.c \
- bsc_msc.c bsc_vty.c \
- gsm_04_08_utils.c \
- gsm_04_80_utils.c \
- bsc_init.c \
- bts_init.c \
- bsc_rf_ctrl.c \
- arfcn_range_encode.c \
- bsc_ctrl_commands.c \
- bsc_ctrl_lookup.c \
- net_init.c \
- bsc_dyn_ts.c \
- bts_ipaccess_nanobts_omlattr.c \
- $(NULL)
-
diff --git a/src/libbsc/abis_nm.c b/src/libbsc/abis_nm.c
deleted file mode 100644
index cf20d7c49..000000000
--- a/src/libbsc/abis_nm.c
+++ /dev/null
@@ -1,2924 +0,0 @@
-/* GSM Network Management (OML) messages on the A-bis interface
- * 3GPP TS 12.21 version 8.0.0 Release 1999 / ETSI TS 100 623 V8.0.0 */
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <errno.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <fcntl.h>
-#include <stdlib.h>
-#include <libgen.h>
-#include <time.h>
-#include <limits.h>
-
-#include <sys/stat.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/protocol/gsm_12_21.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/gsm/abis_nm.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/misdn.h>
-#include <openbsc/signal.h>
-#include <osmocom/abis/e1_input.h>
-
-#define OM_ALLOC_SIZE 1024
-#define OM_HEADROOM_SIZE 128
-#define IPACC_SEGMENT_SIZE 245
-
-int abis_nm_tlv_parse(struct tlv_parsed *tp, struct gsm_bts *bts, const uint8_t *buf, int len)
-{
- if (!bts->model)
- return -EIO;
- return tlv_parse(tp, &bts->model->nm_att_tlvdef, buf, len, 0, 0);
-}
-
-static int is_in_arr(enum abis_nm_msgtype mt, const enum abis_nm_msgtype *arr, int size)
-{
- int i;
-
- for (i = 0; i < size; i++) {
- if (arr[i] == mt)
- return 1;
- }
-
- return 0;
-}
-
-#if 0
-/* is this msgtype the usual ACK/NACK type ? */
-static int is_ack_nack(enum abis_nm_msgtype mt)
-{
- return !is_in_arr(mt, no_ack_nack, ARRAY_SIZE(no_ack_nack));
-}
-#endif
-
-/* is this msgtype a report ? */
-static int is_report(enum abis_nm_msgtype mt)
-{
- return is_in_arr(mt, abis_nm_reports, ARRAY_SIZE(abis_nm_reports));
-}
-
-#define MT_ACK(x) (x+1)
-#define MT_NACK(x) (x+2)
-
-static void fill_om_hdr(struct abis_om_hdr *oh, uint8_t len)
-{
- oh->mdisc = ABIS_OM_MDISC_FOM;
- oh->placement = ABIS_OM_PLACEMENT_ONLY;
- oh->sequence = 0;
- oh->length = len;
-}
-
-static struct abis_om_fom_hdr *fill_om_fom_hdr(struct abis_om_hdr *oh, uint8_t len,
- uint8_t msg_type, uint8_t obj_class,
- uint8_t bts_nr, uint8_t trx_nr, uint8_t ts_nr)
-{
- struct abis_om_fom_hdr *foh =
- (struct abis_om_fom_hdr *) oh->data;
-
- fill_om_hdr(oh, len+sizeof(*foh));
- foh->msg_type = msg_type;
- foh->obj_class = obj_class;
- foh->obj_inst.bts_nr = bts_nr;
- foh->obj_inst.trx_nr = trx_nr;
- foh->obj_inst.ts_nr = ts_nr;
- return foh;
-}
-
-static struct msgb *nm_msgb_alloc(void)
-{
- return msgb_alloc_headroom(OM_ALLOC_SIZE, OM_HEADROOM_SIZE,
- "OML");
-}
-
-int _abis_nm_sendmsg(struct msgb *msg)
-{
- msg->l2h = msg->data;
-
- if (!msg->dst) {
- LOGP(DNM, LOGL_ERROR, "%s: msg->dst == NULL\n", __func__);
- return -EINVAL;
- }
-
- return abis_sendmsg(msg);
-}
-
-/* Send a OML NM Message from BSC to BTS */
-static int abis_nm_queue_msg(struct gsm_bts *bts, struct msgb *msg)
-{
- msg->dst = bts->oml_link;
-
- /* queue OML messages */
- if (llist_empty(&bts->abis_queue) && !bts->abis_nm_pend) {
- bts->abis_nm_pend = OBSC_NM_W_ACK_CB(msg);
- return _abis_nm_sendmsg(msg);
- } else {
- msgb_enqueue(&bts->abis_queue, msg);
- return 0;
- }
-
-}
-
-int abis_nm_sendmsg(struct gsm_bts *bts, struct msgb *msg)
-{
- OBSC_NM_W_ACK_CB(msg) = 1;
- return abis_nm_queue_msg(bts, msg);
-}
-
-static int abis_nm_sendmsg_direct(struct gsm_bts *bts, struct msgb *msg)
-{
- OBSC_NM_W_ACK_CB(msg) = 0;
- return abis_nm_queue_msg(bts, msg);
-}
-
-static int abis_nm_rcvmsg_sw(struct msgb *mb);
-
-int nm_is_running(struct gsm_nm_state *s) {
- return (s->operational == NM_OPSTATE_ENABLED) && (
- (s->availability == NM_AVSTATE_OK) ||
- (s->availability == 0xff)
- );
-}
-
-/* Update the administrative state of a given object in our in-memory data
- * structures and send an event to the higher layer */
-static int update_admstate(struct gsm_bts *bts, uint8_t obj_class,
- struct abis_om_obj_inst *obj_inst, uint8_t adm_state)
-{
- struct gsm_nm_state *nm_state, new_state;
- struct nm_statechg_signal_data nsd;
-
- memset(&nsd, 0, sizeof(nsd));
-
- nsd.obj = gsm_objclass2obj(bts, obj_class, obj_inst);
- if (!nsd.obj)
- return -EINVAL;
- nm_state = gsm_objclass2nmstate(bts, obj_class, obj_inst);
- if (!nm_state)
- return -1;
-
- new_state = *nm_state;
- new_state.administrative = adm_state;
-
- nsd.bts = bts;
- nsd.obj_class = obj_class;
- nsd.old_state = nm_state;
- nsd.new_state = &new_state;
- nsd.obj_inst = obj_inst;
- osmo_signal_dispatch(SS_NM, S_NM_STATECHG_ADM, &nsd);
-
- nm_state->administrative = adm_state;
-
- return 0;
-}
-
-static int abis_nm_rx_statechg_rep(struct msgb *mb)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct gsm_bts *bts = sign_link->trx->bts;
- struct tlv_parsed tp;
- struct gsm_nm_state *nm_state, new_state;
-
- DEBUGPC(DNM, "STATE CHG: ");
-
- memset(&new_state, 0, sizeof(new_state));
-
- nm_state = gsm_objclass2nmstate(bts, foh->obj_class, &foh->obj_inst);
- if (!nm_state) {
- DEBUGPC(DNM, "unknown object class\n");
- return -EINVAL;
- }
-
- new_state = *nm_state;
-
- abis_nm_tlv_parse(&tp, bts, foh->data, oh->length-sizeof(*foh));
- if (TLVP_PRESENT(&tp, NM_ATT_OPER_STATE)) {
- new_state.operational = *TLVP_VAL(&tp, NM_ATT_OPER_STATE);
- DEBUGPC(DNM, "OP_STATE=%s ",
- abis_nm_opstate_name(new_state.operational));
- }
- if (TLVP_PRESENT(&tp, NM_ATT_AVAIL_STATUS)) {
- if (TLVP_LEN(&tp, NM_ATT_AVAIL_STATUS) == 0)
- new_state.availability = 0xff;
- else
- new_state.availability = *TLVP_VAL(&tp, NM_ATT_AVAIL_STATUS);
- DEBUGPC(DNM, "AVAIL=%s(%02x) ",
- abis_nm_avail_name(new_state.availability),
- new_state.availability);
- } else
- new_state.availability = 0xff;
- if (TLVP_PRESENT(&tp, NM_ATT_ADM_STATE)) {
- new_state.administrative = *TLVP_VAL(&tp, NM_ATT_ADM_STATE);
- DEBUGPC(DNM, "ADM=%2s ",
- get_value_string(abis_nm_adm_state_names,
- new_state.administrative));
- }
- DEBUGPC(DNM, "\n");
-
- if ((new_state.administrative != 0 && nm_state->administrative == 0) ||
- new_state.operational != nm_state->operational ||
- new_state.availability != nm_state->availability) {
- /* Update the operational state of a given object in our in-memory data
- * structures and send an event to the higher layer */
- struct nm_statechg_signal_data nsd;
- nsd.obj = gsm_objclass2obj(bts, foh->obj_class, &foh->obj_inst);
- nsd.obj_class = foh->obj_class;
- nsd.old_state = nm_state;
- nsd.new_state = &new_state;
- nsd.obj_inst = &foh->obj_inst;
- nsd.bts = bts;
- osmo_signal_dispatch(SS_NM, S_NM_STATECHG_OPER, &nsd);
- nm_state->operational = new_state.operational;
- nm_state->availability = new_state.availability;
- if (nm_state->administrative == 0)
- nm_state->administrative = new_state.administrative;
- }
-#if 0
- if (op_state == 1) {
- /* try to enable objects that are disabled */
- abis_nm_opstart(bts, foh->obj_class,
- foh->obj_inst.bts_nr,
- foh->obj_inst.trx_nr,
- foh->obj_inst.ts_nr);
- }
-#endif
- return 0;
-}
-
-static inline void log_oml_fail_rep(const struct gsm_bts *bts, const char *type,
- const char *severity, const uint8_t *p_val,
- const char *text)
-{
- enum abis_nm_pcause_type pcause = p_val[0];
- enum abis_mm_event_causes cause = osmo_load16be(p_val + 1);
-
- LOGPC(DNM, LOGL_ERROR, "BTS %u: Failure Event Report: ", bts->nr);
- if (type)
- LOGPC(DNM, LOGL_ERROR, "Type=%s, ", type);
- if (severity)
- LOGPC(DNM, LOGL_ERROR, "Severity=%s, ", severity);
-
- LOGPC(DNM, LOGL_ERROR, "Probable cause=%s: ",
- get_value_string(abis_nm_pcause_type_names, pcause));
-
- if (pcause == NM_PCAUSE_T_MANUF)
- LOGPC(DNM, LOGL_ERROR, "%s, ",
- get_value_string(abis_mm_event_cause_names, cause));
- else
- LOGPC(DNM, LOGL_ERROR, "%02X %02X ", p_val[1], p_val[2]);
-
- if (text) {
- LOGPC(DNM, LOGL_ERROR, "Additional Text=%s. ", text);
- }
-
- LOGPC(DNM, LOGL_ERROR, "\n");
-}
-
-static inline void handle_manufact_report(struct gsm_bts *bts, const uint8_t *p_val, const char *type,
- const char *severity, const char *text)
-{
- enum abis_mm_event_causes cause = osmo_load16be(p_val + 1);
-
- switch (cause) {
- case OSMO_EVT_PCU_VERS:
- if (text) {
- LOGPC(DNM, LOGL_NOTICE, "BTS %u reported connected PCU version %s\n", bts->nr, text);
- osmo_strlcpy(bts->pcu_version, text, sizeof(bts->pcu_version));
- } else {
- LOGPC(DNM, LOGL_ERROR, "BTS %u reported PCU disconnection.\n", bts->nr);
- bts->pcu_version[0] = '\0';
- }
- break;
- default:
- log_oml_fail_rep(bts, type, severity, p_val, text);
- };
-}
-
-static int rx_fail_evt_rep(struct msgb *mb, struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct tlv_parsed tp;
- int rc = 0;
- const uint8_t *p_val = NULL;
- char *p_text = NULL;
- const char *e_type = NULL, *severity = NULL;
-
- abis_nm_tlv_parse(&tp, sign_link->trx->bts, foh->data,
- oh->length-sizeof(*foh));
-
- if (TLVP_PRESENT(&tp, NM_ATT_ADD_TEXT)) {
- p_val = TLVP_VAL(&tp, NM_ATT_ADD_TEXT);
- p_text = talloc_strndup(tall_bsc_ctx, (const char *) p_val,
- TLVP_LEN(&tp, NM_ATT_ADD_TEXT));
- }
-
- if (TLVP_PRESENT(&tp, NM_ATT_EVENT_TYPE))
- e_type = abis_nm_event_type_name(*TLVP_VAL(&tp,
- NM_ATT_EVENT_TYPE));
-
- if (TLVP_PRESENT(&tp, NM_ATT_SEVERITY))
- severity = abis_nm_severity_name(*TLVP_VAL(&tp,
- NM_ATT_SEVERITY));
-
- if (TLVP_PRESENT(&tp, NM_ATT_PROB_CAUSE)) {
- p_val = TLVP_VAL(&tp, NM_ATT_PROB_CAUSE);
-
- switch (p_val[0]) {
- case NM_PCAUSE_T_MANUF:
- handle_manufact_report(bts, p_val, e_type, severity,
- p_text);
- break;
- default:
- log_oml_fail_rep(bts, e_type, severity, p_val, p_text);
- };
- } else {
- LOGPC(DNM, LOGL_ERROR, "BTS%u: Failure Event Report without "
- "Probable Cause?!\n", bts->nr);
- rc = -EINVAL;
- }
-
- if (p_text)
- talloc_free(p_text);
-
- return rc;
-}
-
-static int abis_nm_rcvmsg_report(struct msgb *mb, struct gsm_bts *bts)
-{
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- uint8_t mt = foh->msg_type;
-
- abis_nm_debugp_foh(DNM, foh);
-
- //nmh->cfg->report_cb(mb, foh);
-
- switch (mt) {
- case NM_MT_STATECHG_EVENT_REP:
- return abis_nm_rx_statechg_rep(mb);
- break;
- case NM_MT_SW_ACTIVATED_REP:
- DEBUGPC(DNM, "Software Activated Report\n");
- osmo_signal_dispatch(SS_NM, S_NM_SW_ACTIV_REP, mb);
- break;
- case NM_MT_FAILURE_EVENT_REP:
- rx_fail_evt_rep(mb, bts);
- osmo_signal_dispatch(SS_NM, S_NM_FAIL_REP, mb);
- break;
- case NM_MT_TEST_REP:
- DEBUGPC(DNM, "Test Report\n");
- osmo_signal_dispatch(SS_NM, S_NM_TEST_REP, mb);
- break;
- default:
- DEBUGPC(DNM, "reporting NM MT 0x%02x\n", mt);
- break;
-
- };
-
- return 0;
-}
-
-/* Activate the specified software into the BTS */
-static int ipacc_sw_activate(struct gsm_bts *bts, uint8_t obj_class, uint8_t i0, uint8_t i1,
- uint8_t i2, const struct abis_nm_sw_desc *sw_desc)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint16_t len = abis_nm_sw_desc_len(sw_desc, true);
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_ACTIVATE_SW, obj_class, i0, i1, i2);
- abis_nm_put_sw_desc(msg, sw_desc, true);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_select_newest_sw(const struct abis_nm_sw_desc *sw_descr,
- const size_t size)
-{
- int res = 0;
- int i;
-
- for (i = 1; i < size; ++i) {
- if (memcmp(sw_descr[res].file_version, sw_descr[i].file_version,
- OSMO_MIN(sw_descr[i].file_version_len,
- sw_descr[res].file_version_len)) < 0) {
- res = i;
- }
- }
-
- return res;
-}
-
-static inline bool handle_attr(const struct gsm_bts *bts, enum bts_attribute id, uint8_t *val, uint8_t len)
-{
- switch (id) {
- case BTS_TYPE_VARIANT:
- LOGP(DNM, LOGL_NOTICE, "BTS%u reported variant: %s\n", bts->nr, val);
- break;
- case BTS_SUB_MODEL:
- LOGP(DNM, LOGL_NOTICE, "BTS%u reported submodel: %s\n", bts->nr, val);
- break;
- default:
- return false;
- }
- return true;
-}
-
-/* Parse Attribute Response Info - return pointer to the actual content */
-static inline uint8_t *parse_attr_resp_info_unreported(uint8_t bts_nr, uint8_t *ari, uint16_t ari_len, uint16_t *out_len)
-{
- uint8_t num_unreported = ari[0], i;
-
- DEBUGP(DNM, "BTS%u Get Attributes Response Info: %u bytes total with %u unreported attributes\n",
- bts_nr, ari_len, num_unreported);
-
- /* +1 because we have to account for number of unreported attributes, prefixing the list: */
- for (i = 0; i < num_unreported; i++)
- LOGP(DNM, LOGL_ERROR, "BTS%u Attribute %s is unreported\n",
- bts_nr, get_value_string(abis_nm_att_names, ari[i + 1]));
-
- /* the data starts right after the list of unreported attributes + space for length of that list */
- *out_len = ari_len - (num_unreported + 2);
-
- return ari + num_unreported + 1; /* we have to account for 1st byte with number of unreported attributes */
-}
-
-/* Parse Attribute Response Info content for 3GPP TS 52.021 §9.4.30 Manufacturer Id */
-static inline uint8_t *parse_attr_resp_info_manuf_id(struct gsm_bts *bts, uint8_t *data, uint16_t *data_len)
-{
- struct tlv_parsed tp;
- uint16_t m_id_len = 0;
- uint8_t adjust = 0, i;
-
- abis_nm_tlv_parse(&tp, bts, data, *data_len);
- if (TLVP_PRES_LEN(&tp, NM_ATT_MANUF_ID, 2)) {
- m_id_len = TLVP_LEN(&tp, NM_ATT_MANUF_ID);
-
- /* log potential BTS feature vector overflow */
- if (m_id_len > sizeof(bts->_features_data))
- LOGP(DNM, LOGL_NOTICE, "BTS%u Get Attributes Response: feature vector is truncated to %u bytes\n",
- bts->nr, MAX_BTS_FEATURES/8);
-
- /* check that max. expected BTS attribute is above given feature vector length */
- if (m_id_len > OSMO_BYTES_FOR_BITS(_NUM_BTS_FEAT))
- LOGP(DNM, LOGL_NOTICE, "BTS%u Get Attributes Response: reported unexpectedly long (%u bytes) "
- "feature vector - most likely it was compiled against newer BSC headers. "
- "Consider upgrading your BSC to later version.\n",
- bts->nr, m_id_len);
-
- memcpy(bts->_features_data, TLVP_VAL(&tp, NM_ATT_MANUF_ID), sizeof(bts->_features_data));
- adjust = m_id_len + 3; /* adjust for parsed TL16V struct */
-
- for (i = 0; i < _NUM_BTS_FEAT; i++)
- if (gsm_bts_has_feature(bts, i) != gsm_btsmodel_has_feature(bts->model, i))
- LOGP(DNM, LOGL_NOTICE, "BTS%u feature '%s' reported via OML does not match statically "
- "set feature: %u != %u. Please fix.\n", bts->nr,
- get_value_string(gsm_bts_features_descs, i),
- gsm_bts_has_feature(bts, i), gsm_btsmodel_has_feature(bts->model, i));
- }
-
- *data_len -= adjust;
-
- return data + adjust;
-}
-
-/* Parse Attribute Response Info content for 3GPP TS 52.021 §9.4.28 Manufacturer Dependent State */
-static inline uint8_t *parse_attr_resp_info_manuf_state(const struct gsm_bts_trx *trx, uint8_t *data, uint16_t *data_len)
-{
- struct tlv_parsed tp;
- const uint8_t *power;
- uint8_t adjust = 0;
-
- if (!trx) /* this attribute does not make sense on BTS level, only on TRX level */
- return data;
-
- abis_nm_tlv_parse(&tp, trx->bts, data, *data_len);
- if (TLVP_PRES_LEN(&tp, NM_ATT_MANUF_STATE, 1)) {
- power = TLVP_VAL(&tp, NM_ATT_MANUF_STATE);
- LOGP(DNM, LOGL_NOTICE, "%s Get Attributes Response: nominal power is %u\n", gsm_trx_name(trx), *power);
- adjust = 2; /* adjust for parsed TV struct */
- }
-
- *data_len -= adjust;
-
- return data + adjust;
-}
-
-/* Handle 3GPP TS 52.021 §9.4.64 Get Attribute Response Info */
-static int abis_nm_rx_get_attr_resp(struct msgb *mb, const struct gsm_bts_trx *trx)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct gsm_bts *bts = trx ? trx->bts : sign_link->trx->bts;
- struct tlv_parsed tp;
- uint8_t *data, i;
- uint16_t data_len;
- int rc;
- struct abis_nm_sw_desc sw_descr[MAX_BTS_ATTR];
-
- abis_nm_debugp_foh(DNM, foh);
-
- DEBUGPC(DNM, "Get Attributes Response for BTS%u\n", bts->nr);
-
- abis_nm_tlv_parse(&tp, bts, foh->data, oh->length-sizeof(*foh));
- if (!TLVP_PRES_LEN(&tp, NM_ATT_GET_ARI, 1)) {
- LOGP(DNM, LOGL_ERROR, "BTS%u: Get Attributes Response without Response Info?!\n", bts->nr);
- return -EINVAL;
- }
-
- data = parse_attr_resp_info_unreported(bts->nr, TLVP_VAL(&tp, NM_ATT_GET_ARI), TLVP_LEN(&tp, NM_ATT_GET_ARI),
- &data_len);
-
- data = parse_attr_resp_info_manuf_state(trx, data, &data_len);
- data = parse_attr_resp_info_manuf_id(bts, data, &data_len);
-
- /* after parsing manufacturer-specific attributes there's list of replies in form of sw-conf structure: */
- rc = abis_nm_get_sw_conf(data, data_len, &sw_descr[0], ARRAY_SIZE(sw_descr));
- if (rc > 0) {
- for (i = 0; i < rc; i++) {
- if (!handle_attr(bts, str2btsattr((const char *)sw_descr[i].file_id),
- sw_descr[i].file_version, sw_descr[i].file_version_len))
- LOGP(DNM, LOGL_NOTICE, "BTS%u: ARI reported sw[%d/%d]: %s is %s\n",
- bts->nr, i, rc, sw_descr[i].file_id, sw_descr[i].file_version);
- }
- } else
- LOGP(DNM, LOGL_ERROR, "BTS%u: failed to parse SW-Config part of Get Attribute Response Info: %s\n",
- bts->nr, strerror(-rc));
-
- return 0;
-}
-
-/* 3GPP TS 52.021 §6.2.5 */
-static int abis_nm_rx_sw_act_req(struct msgb *mb)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct tlv_parsed tp;
- const uint8_t *sw_config;
- int ret, sw_config_len, len;
- struct abis_nm_sw_desc sw_descr[MAX_BTS_ATTR];
-
- abis_nm_debugp_foh(DNM, foh);
-
- DEBUGPC(DNM, "SW Activate Request: ");
-
- DEBUGP(DNM, "Software Activate Request, ACKing and Activating\n");
-
- ret = abis_nm_sw_act_req_ack(sign_link->trx->bts, foh->obj_class,
- foh->obj_inst.bts_nr,
- foh->obj_inst.trx_nr,
- foh->obj_inst.ts_nr, 0,
- foh->data, oh->length-sizeof(*foh));
- if (ret != 0) {
- LOGP(DNM, LOGL_ERROR,
- "Sending SW ActReq ACK failed: %d\n", ret);
- return ret;
- }
-
- abis_nm_tlv_parse(&tp, sign_link->trx->bts, foh->data, oh->length-sizeof(*foh));
- sw_config = TLVP_VAL(&tp, NM_ATT_SW_CONFIG);
- sw_config_len = TLVP_LEN(&tp, NM_ATT_SW_CONFIG);
- if (!TLVP_PRESENT(&tp, NM_ATT_SW_CONFIG)) {
- LOGP(DNM, LOGL_ERROR,
- "SW config not found! Can't continue.\n");
- return -EINVAL;
- } else {
- DEBUGP(DNM, "Found SW config: %s\n", osmo_hexdump(sw_config, sw_config_len));
- }
-
- /* Parse up to two sw descriptions from the data */
- len = abis_nm_get_sw_conf(sw_config, sw_config_len, &sw_descr[0],
- ARRAY_SIZE(sw_descr));
- if (len <= 0) {
- LOGP(DNM, LOGL_ERROR, "Failed to parse SW Config.\n");
- return -EINVAL;
- }
-
- ret = abis_nm_select_newest_sw(&sw_descr[0], len);
- DEBUGP(DNM, "Selected sw description %d of %d\n", ret, len);
-
- return ipacc_sw_activate(sign_link->trx->bts, foh->obj_class,
- foh->obj_inst.bts_nr,
- foh->obj_inst.trx_nr,
- foh->obj_inst.ts_nr,
- &sw_descr[ret]);
-}
-
-/* Receive a CHANGE_ADM_STATE_ACK, parse the TLV and update local state */
-static int abis_nm_rx_chg_adm_state_ack(struct msgb *mb)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct tlv_parsed tp;
- uint8_t adm_state;
-
- abis_nm_tlv_parse(&tp, sign_link->trx->bts, foh->data, oh->length-sizeof(*foh));
- if (!TLVP_PRESENT(&tp, NM_ATT_ADM_STATE))
- return -EINVAL;
-
- adm_state = *TLVP_VAL(&tp, NM_ATT_ADM_STATE);
-
- return update_admstate(sign_link->trx->bts, foh->obj_class, &foh->obj_inst, adm_state);
-}
-
-static int abis_nm_rx_lmt_event(struct msgb *mb)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct tlv_parsed tp;
-
- DEBUGP(DNM, "LMT Event ");
- abis_nm_tlv_parse(&tp, sign_link->trx->bts, foh->data, oh->length-sizeof(*foh));
- if (TLVP_PRESENT(&tp, NM_ATT_BS11_LMT_LOGON_SESSION) &&
- TLVP_LEN(&tp, NM_ATT_BS11_LMT_LOGON_SESSION) >= 1) {
- uint8_t onoff = *TLVP_VAL(&tp, NM_ATT_BS11_LMT_LOGON_SESSION);
- DEBUGPC(DNM, "LOG%s ", onoff ? "ON" : "OFF");
- }
- if (TLVP_PRESENT(&tp, NM_ATT_BS11_LMT_USER_ACC_LEV) &&
- TLVP_LEN(&tp, NM_ATT_BS11_LMT_USER_ACC_LEV) >= 1) {
- uint8_t level = *TLVP_VAL(&tp, NM_ATT_BS11_LMT_USER_ACC_LEV);
- DEBUGPC(DNM, "Level=%u ", level);
- }
- if (TLVP_PRESENT(&tp, NM_ATT_BS11_LMT_USER_NAME) &&
- TLVP_LEN(&tp, NM_ATT_BS11_LMT_USER_NAME) >= 1) {
- char *name = (char *) TLVP_VAL(&tp, NM_ATT_BS11_LMT_USER_NAME);
- DEBUGPC(DNM, "Username=%s ", name);
- }
- DEBUGPC(DNM, "\n");
- /* FIXME: parse LMT LOGON TIME */
- return 0;
-}
-
-void abis_nm_queue_send_next(struct gsm_bts *bts)
-{
- int wait = 0;
- struct msgb *msg;
- /* the queue is empty */
- while (!llist_empty(&bts->abis_queue)) {
- msg = msgb_dequeue(&bts->abis_queue);
- wait = OBSC_NM_W_ACK_CB(msg);
- _abis_nm_sendmsg(msg);
-
- if (wait)
- break;
- }
-
- bts->abis_nm_pend = wait;
-}
-
-/* Receive a OML NM Message from BTS */
-static int abis_nm_rcvmsg_fom(struct msgb *mb)
-{
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- uint8_t mt = foh->msg_type;
- /* sign_link might get deleted via osmo_signal_dispatch -> save bts */
- struct gsm_bts *bts = sign_link->trx->bts;
- int ret = 0;
-
- /* check for unsolicited message */
- if (is_report(mt))
- return abis_nm_rcvmsg_report(mb, bts);
-
- if (is_in_arr(mt, abis_nm_sw_load_msgs, ARRAY_SIZE(abis_nm_sw_load_msgs)))
- return abis_nm_rcvmsg_sw(mb);
-
- if (is_in_arr(mt, abis_nm_nacks, ARRAY_SIZE(abis_nm_nacks))) {
- struct nm_nack_signal_data nack_data;
- struct tlv_parsed tp;
-
- abis_nm_debugp_foh(DNM, foh);
-
- DEBUGPC(DNM, "%s NACK ", abis_nm_nack_name(mt));
-
- abis_nm_tlv_parse(&tp, bts, foh->data, oh->length-sizeof(*foh));
- if (TLVP_PRESENT(&tp, NM_ATT_NACK_CAUSES))
- DEBUGPC(DNM, "CAUSE=%s\n",
- abis_nm_nack_cause_name(*TLVP_VAL(&tp, NM_ATT_NACK_CAUSES)));
- else
- DEBUGPC(DNM, "\n");
-
- nack_data.msg = mb;
- nack_data.mt = mt;
- nack_data.bts = bts;
- osmo_signal_dispatch(SS_NM, S_NM_NACK, &nack_data);
- abis_nm_queue_send_next(bts);
- return 0;
- }
-#if 0
- /* check if last message is to be acked */
- if (is_ack_nack(nmh->last_msgtype)) {
- if (mt == MT_ACK(nmh->last_msgtype)) {
- DEBUGP(DNM, "received ACK (0x%x)\n", foh->msg_type);
- /* we got our ACK, continue sending the next msg */
- } else if (mt == MT_NACK(nmh->last_msgtype)) {
- /* we got a NACK, signal this to the caller */
- DEBUGP(DNM, "received NACK (0x%x)\n", foh->msg_type);
- /* FIXME: somehow signal this to the caller */
- } else {
- /* really strange things happen */
- return -EINVAL;
- }
- }
-#endif
-
- switch (mt) {
- case NM_MT_CHG_ADM_STATE_ACK:
- ret = abis_nm_rx_chg_adm_state_ack(mb);
- break;
- case NM_MT_SW_ACT_REQ:
- ret = abis_nm_rx_sw_act_req(mb);
- break;
- case NM_MT_BS11_LMT_SESSION:
- ret = abis_nm_rx_lmt_event(mb);
- break;
- case NM_MT_OPSTART_ACK:
- abis_nm_debugp_foh(DNM, foh);
- DEBUGPC(DNM, "Opstart ACK\n");
- break;
- case NM_MT_SET_CHAN_ATTR_ACK:
- abis_nm_debugp_foh(DNM, foh);
- DEBUGPC(DNM, "Set Channel Attributes ACK\n");
- break;
- case NM_MT_SET_RADIO_ATTR_ACK:
- abis_nm_debugp_foh(DNM, foh);
- DEBUGPC(DNM, "Set Radio Carrier Attributes ACK\n");
- break;
- case NM_MT_CONN_MDROP_LINK_ACK:
- abis_nm_debugp_foh(DNM, foh);
- DEBUGPC(DNM, "CONN MDROP LINK ACK\n");
- break;
- case NM_MT_IPACC_RESTART_ACK:
- osmo_signal_dispatch(SS_NM, S_NM_IPACC_RESTART_ACK, NULL);
- break;
- case NM_MT_IPACC_RESTART_NACK:
- osmo_signal_dispatch(SS_NM, S_NM_IPACC_RESTART_NACK, NULL);
- break;
- case NM_MT_SET_BTS_ATTR_ACK:
- break;
- case NM_MT_GET_ATTR_RESP:
- ret = abis_nm_rx_get_attr_resp(mb, gsm_bts_trx_num(bts, (foh)->obj_inst.trx_nr));
- break;
- default:
- abis_nm_debugp_foh(DNM, foh);
- LOGPC(DNM, LOGL_ERROR, "Unhandled message %s\n",
- get_value_string(abis_nm_msgtype_names, mt));
- }
-
- abis_nm_queue_send_next(bts);
- return ret;
-}
-
-static int abis_nm_rx_ipacc(struct msgb *mb);
-
-static int abis_nm_rcvmsg_manuf(struct msgb *mb)
-{
- int rc;
- struct e1inp_sign_link *sign_link = mb->dst;
- int bts_type = sign_link->trx->bts->type;
-
- switch (bts_type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- rc = abis_nm_rx_ipacc(mb);
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- default:
- LOGP(DNM, LOGL_ERROR, "don't know how to parse OML for this "
- "BTS type (%u)\n", bts_type);
- rc = 0;
- break;
- }
-
- return rc;
-}
-
-/* High-Level API */
-/* Entry-point where L2 OML from BTS enters the NM code */
-int abis_nm_rcvmsg(struct msgb *msg)
-{
- struct abis_om_hdr *oh = msgb_l2(msg);
- int rc = 0;
-
- /* Various consistency checks */
- if (oh->placement != ABIS_OM_PLACEMENT_ONLY) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML placement 0x%x not supported\n",
- oh->placement);
- if (oh->placement != ABIS_OM_PLACEMENT_FIRST) {
- rc = -EINVAL;
- goto err;
- }
- }
- if (oh->sequence != 0) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML sequence 0x%x != 0x00\n",
- oh->sequence);
- rc = -EINVAL;
- goto err;
- }
-#if 0
- unsigned int l2_len = msg->tail - (uint8_t *)msgb_l2(msg);
- unsigned int hlen = sizeof(*oh) + sizeof(struct abis_om_fom_hdr);
- if (oh->length + hlen > l2_len) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML truncated message (%u > %u)\n",
- oh->length + sizeof(*oh), l2_len);
- return -EINVAL;
- }
- if (oh->length + hlen < l2_len)
- LOGP(DNM, LOGL_ERROR, "ABIS OML message with extra trailer?!? (oh->len=%d, sizeof_oh=%d l2_len=%d\n", oh->length, sizeof(*oh), l2_len);
-#endif
- msg->l3h = (unsigned char *)oh + sizeof(*oh);
-
- switch (oh->mdisc) {
- case ABIS_OM_MDISC_FOM:
- rc = abis_nm_rcvmsg_fom(msg);
- break;
- case ABIS_OM_MDISC_MANUF:
- rc = abis_nm_rcvmsg_manuf(msg);
- break;
- case ABIS_OM_MDISC_MMI:
- case ABIS_OM_MDISC_TRAU:
- LOGP(DNM, LOGL_ERROR, "unimplemented ABIS OML message discriminator 0x%x\n",
- oh->mdisc);
- break;
- default:
- LOGP(DNM, LOGL_ERROR, "unknown ABIS OML message discriminator 0x%x\n",
- oh->mdisc);
- rc = -EINVAL;
- break;
- }
-err:
- msgb_free(msg);
- return rc;
-}
-
-#if 0
-/* initialized all resources */
-struct abis_nm_h *abis_nm_init(struct abis_nm_cfg *cfg)
-{
- struct abis_nm_h *nmh;
-
- nmh = malloc(sizeof(*nmh));
- if (!nmh)
- return NULL;
-
- nmh->cfg = cfg;
-
- return nmh;
-}
-
-/* free all resources */
-void abis_nm_fini(struct abis_nm_h *nmh)
-{
- free(nmh);
-}
-#endif
-
-/* Here we are trying to define a high-level API that can be used by
- * the actual BSC implementation. However, the architecture is currently
- * still under design. Ideally the calls to this API would be synchronous,
- * while the underlying stack behind the APi runs in a traditional select
- * based state machine.
- */
-
-/* 6.2 Software Load: */
-enum sw_state {
- SW_STATE_NONE,
- SW_STATE_WAIT_INITACK,
- SW_STATE_WAIT_SEGACK,
- SW_STATE_WAIT_ENDACK,
- SW_STATE_WAIT_ACTACK,
- SW_STATE_ERROR,
-};
-
-struct abis_nm_sw {
- struct gsm_bts *bts;
- int trx_nr;
- gsm_cbfn *cbfn;
- void *cb_data;
- int forced;
-
- /* this will become part of the SW LOAD INITIATE */
- uint8_t obj_class;
- uint8_t obj_instance[3];
-
- uint8_t file_id[255];
- uint8_t file_id_len;
-
- uint8_t file_version[255];
- uint8_t file_version_len;
-
- uint8_t window_size;
- uint8_t seg_in_window;
-
- int fd;
- FILE *stream;
- enum sw_state state;
- int last_seg;
-};
-
-static struct abis_nm_sw g_sw;
-
-static void sw_add_file_id_and_ver(struct abis_nm_sw *sw, struct msgb *msg)
-{
- if (sw->bts->type == GSM_BTS_TYPE_NANOBTS) {
- msgb_v_put(msg, NM_ATT_SW_DESCR);
- msgb_tl16v_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id);
- msgb_tl16v_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len,
- sw->file_version);
- } else if (sw->bts->type == GSM_BTS_TYPE_BS11) {
- msgb_tlv_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id);
- msgb_tlv_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len,
- sw->file_version);
- } else {
- LOGP(DNM, LOGL_ERROR, "Please implement this for the BTS.\n");
- }
-}
-
-/* 6.2.1 / 8.3.1: Load Data Initiate */
-static int sw_load_init(struct abis_nm_sw *sw)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t len = 3*2 + sw->file_id_len + sw->file_version_len;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_LOAD_INIT, sw->obj_class,
- sw->obj_instance[0], sw->obj_instance[1],
- sw->obj_instance[2]);
-
- sw_add_file_id_and_ver(sw, msg);
- msgb_tv_put(msg, NM_ATT_WINDOW_SIZE, sw->window_size);
-
- return abis_nm_sendmsg(sw->bts, msg);
-}
-
-static int is_last_line(FILE *stream)
-{
- char next_seg_buf[256];
- long pos;
-
- /* check if we're sending the last line */
- pos = ftell(stream);
-
- /* Did ftell fail? Then we are at the end for sure */
- if (pos < 0)
- return 1;
-
- if (!fgets(next_seg_buf, sizeof(next_seg_buf)-2, stream)) {
- int rc = fseek(stream, pos, SEEK_SET);
- if (rc < 0)
- return rc;
- return 1;
- }
-
- fseek(stream, pos, SEEK_SET);
- return 0;
-}
-
-/* 6.2.2 / 8.3.2 Load Data Segment */
-static int sw_load_segment(struct abis_nm_sw *sw)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- char seg_buf[256];
- char *line_buf = seg_buf+2;
- unsigned char *tlv;
- int len;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
-
- switch (sw->bts->type) {
- case GSM_BTS_TYPE_BS11:
- if (fgets(line_buf, sizeof(seg_buf)-2, sw->stream) == NULL) {
- perror("fgets reading segment");
- return -EINVAL;
- }
- seg_buf[0] = 0x00;
-
- /* check if we're sending the last line */
- sw->last_seg = is_last_line(sw->stream);
- if (sw->last_seg)
- seg_buf[1] = 0;
- else
- seg_buf[1] = 1 + sw->seg_in_window++;
-
- len = strlen(line_buf) + 2;
- tlv = msgb_put(msg, TLV_GROSS_LEN(len));
- tlv_put(tlv, NM_ATT_BS11_FILE_DATA, len, (uint8_t *)seg_buf);
- /* BS11 wants CR + LF in excess of the TLV length !?! */
- tlv[1] -= 2;
-
- /* we only now know the exact length for the OM hdr */
- len = strlen(line_buf)+2;
- break;
- case GSM_BTS_TYPE_NANOBTS: {
- osmo_static_assert(sizeof(seg_buf) >= IPACC_SEGMENT_SIZE, buffer_big_enough);
- len = read(sw->fd, &seg_buf, IPACC_SEGMENT_SIZE);
- if (len < 0) {
- perror("read failed");
- return -EINVAL;
- }
-
- if (len != IPACC_SEGMENT_SIZE)
- sw->last_seg = 1;
-
- ++sw->seg_in_window;
- msgb_tl16v_put(msg, NM_ATT_IPACC_FILE_DATA, len, (const uint8_t *) seg_buf);
- len += 3;
- break;
- }
- default:
- LOGP(DNM, LOGL_ERROR, "sw_load_segment needs implementation for the BTS.\n");
- /* FIXME: Other BTS types */
- return -1;
- }
-
- fill_om_fom_hdr(oh, len, NM_MT_LOAD_SEG, sw->obj_class,
- sw->obj_instance[0], sw->obj_instance[1],
- sw->obj_instance[2]);
-
- return abis_nm_sendmsg_direct(sw->bts, msg);
-}
-
-/* 6.2.4 / 8.3.4 Load Data End */
-static int sw_load_end(struct abis_nm_sw *sw)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t len = 2*2 + sw->file_id_len + sw->file_version_len;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_LOAD_END, sw->obj_class,
- sw->obj_instance[0], sw->obj_instance[1],
- sw->obj_instance[2]);
-
- sw_add_file_id_and_ver(sw, msg);
- return abis_nm_sendmsg(sw->bts, msg);
-}
-
-/* Activate the specified software into the BTS */
-static int sw_activate(struct abis_nm_sw *sw)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t len = 2*2 + sw->file_id_len + sw->file_version_len;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_ACTIVATE_SW, sw->obj_class,
- sw->obj_instance[0], sw->obj_instance[1],
- sw->obj_instance[2]);
-
- /* FIXME: this is BS11 specific format */
- msgb_tlv_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id);
- msgb_tlv_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len,
- sw->file_version);
-
- return abis_nm_sendmsg(sw->bts, msg);
-}
-
-struct sdp_firmware {
- char magic[4];
- char more_magic[4];
- unsigned int header_length;
- unsigned int file_length;
-} __attribute__ ((packed));
-
-static int parse_sdp_header(struct abis_nm_sw *sw)
-{
- struct sdp_firmware firmware_header;
- int rc;
- struct stat stat;
-
- rc = read(sw->fd, &firmware_header, sizeof(firmware_header));
- if (rc != sizeof(firmware_header)) {
- LOGP(DNM, LOGL_ERROR, "Could not read SDP file header.\n");
- return -1;
- }
-
- if (strncmp(firmware_header.magic, " SDP", 4) != 0) {
- LOGP(DNM, LOGL_ERROR, "The magic number1 is wrong.\n");
- return -1;
- }
-
- if (firmware_header.more_magic[0] != 0x10 ||
- firmware_header.more_magic[1] != 0x02 ||
- firmware_header.more_magic[2] != 0x00 ||
- firmware_header.more_magic[3] != 0x00) {
- LOGP(DNM, LOGL_ERROR, "The more magic number is wrong.\n");
- return -1;
- }
-
-
- if (fstat(sw->fd, &stat) == -1) {
- LOGP(DNM, LOGL_ERROR, "Could not stat the file.\n");
- return -1;
- }
-
- if (ntohl(firmware_header.file_length) != stat.st_size) {
- LOGP(DNM, LOGL_ERROR, "The filesizes do not match.\n");
- return -1;
- }
-
- /* go back to the start as we checked the whole filesize.. */
- lseek(sw->fd, 0l, SEEK_SET);
- LOGP(DNM, LOGL_NOTICE, "The ipaccess SDP header is not fully understood.\n"
- "There might be checksums in the file that are not\n"
- "verified and incomplete firmware might be flashed.\n"
- "There is absolutely no WARRANTY that flashing will\n"
- "work.\n");
- return 0;
-}
-
-static int sw_open_file(struct abis_nm_sw *sw, const char *fname)
-{
- char file_id[12+1];
- char file_version[80+1];
- int rc;
-
- sw->fd = open(fname, O_RDONLY);
- if (sw->fd < 0)
- return sw->fd;
-
- switch (sw->bts->type) {
- case GSM_BTS_TYPE_BS11:
- sw->stream = fdopen(sw->fd, "r");
- if (!sw->stream) {
- perror("fdopen");
- return -1;
- }
- /* read first line and parse file ID and VERSION */
- rc = fscanf(sw->stream, "@(#)%12s:%80s\r\n",
- file_id, file_version);
- if (rc != 2) {
- perror("parsing header line of software file");
- return -1;
- }
- strcpy((char *)sw->file_id, file_id);
- sw->file_id_len = strlen(file_id);
- strcpy((char *)sw->file_version, file_version);
- sw->file_version_len = strlen(file_version);
- /* rewind to start of file */
- rewind(sw->stream);
- break;
- case GSM_BTS_TYPE_NANOBTS:
- /* TODO: extract that from the filename or content */
- rc = parse_sdp_header(sw);
- if (rc < 0) {
- fprintf(stderr, "Could not parse the ipaccess SDP header\n");
- return -1;
- }
-
- strcpy((char *)sw->file_id, "id");
- sw->file_id_len = 3;
- strcpy((char *)sw->file_version, "version");
- sw->file_version_len = 8;
- break;
- default:
- /* We don't know how to treat them yet */
- close(sw->fd);
- return -EINVAL;
- }
-
- return 0;
-}
-
-static void sw_close_file(struct abis_nm_sw *sw)
-{
- switch (sw->bts->type) {
- case GSM_BTS_TYPE_BS11:
- fclose(sw->stream);
- break;
- default:
- close(sw->fd);
- break;
- }
-}
-
-/* Fill the window */
-static int sw_fill_window(struct abis_nm_sw *sw)
-{
- int rc;
-
- while (sw->seg_in_window < sw->window_size) {
- rc = sw_load_segment(sw);
- if (rc < 0)
- return rc;
- if (sw->last_seg)
- break;
- }
- return 0;
-}
-
-/* callback function from abis_nm_rcvmsg() handler */
-static int abis_nm_rcvmsg_sw(struct msgb *mb)
-{
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- int rc = -1;
- struct abis_nm_sw *sw = &g_sw;
- enum sw_state old_state = sw->state;
-
- //DEBUGP(DNM, "state %u, NM MT 0x%02x\n", sw->state, foh->msg_type);
-
- switch (sw->state) {
- case SW_STATE_WAIT_INITACK:
- switch (foh->msg_type) {
- case NM_MT_LOAD_INIT_ACK:
- /* fill window with segments */
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_INIT_ACK, mb,
- sw->cb_data, NULL);
- rc = sw_fill_window(sw);
- sw->state = SW_STATE_WAIT_SEGACK;
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- case NM_MT_LOAD_INIT_NACK:
- if (sw->forced) {
- DEBUGP(DNM, "FORCED: Ignoring Software Load "
- "Init NACK\n");
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_INIT_ACK, mb,
- sw->cb_data, NULL);
- rc = sw_fill_window(sw);
- sw->state = SW_STATE_WAIT_SEGACK;
- } else {
- DEBUGP(DNM, "Software Load Init NACK\n");
- /* FIXME: cause */
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_INIT_NACK, mb,
- sw->cb_data, NULL);
- sw->state = SW_STATE_ERROR;
- }
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- }
- break;
- case SW_STATE_WAIT_SEGACK:
- switch (foh->msg_type) {
- case NM_MT_LOAD_SEG_ACK:
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_SEG_ACK, mb,
- sw->cb_data, NULL);
- sw->seg_in_window = 0;
- if (!sw->last_seg) {
- /* fill window with more segments */
- rc = sw_fill_window(sw);
- sw->state = SW_STATE_WAIT_SEGACK;
- } else {
- /* end the transfer */
- sw->state = SW_STATE_WAIT_ENDACK;
- rc = sw_load_end(sw);
- }
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- case NM_MT_LOAD_ABORT:
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_ABORT, mb,
- sw->cb_data, NULL);
- break;
- }
- break;
- case SW_STATE_WAIT_ENDACK:
- switch (foh->msg_type) {
- case NM_MT_LOAD_END_ACK:
- sw_close_file(sw);
- DEBUGP(DNM, "Software Load End (BTS %u)\n",
- sw->bts->nr);
- sw->state = SW_STATE_NONE;
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_END_ACK, mb,
- sw->cb_data, NULL);
- rc = 0;
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- case NM_MT_LOAD_END_NACK:
- if (sw->forced) {
- DEBUGP(DNM, "FORCED: Ignoring Software Load"
- "End NACK\n");
- sw->state = SW_STATE_NONE;
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_END_ACK, mb,
- sw->cb_data, NULL);
- } else {
- DEBUGP(DNM, "Software Load End NACK\n");
- /* FIXME: cause */
- sw->state = SW_STATE_ERROR;
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_LOAD_END_NACK, mb,
- sw->cb_data, NULL);
- }
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- }
- case SW_STATE_WAIT_ACTACK:
- switch (foh->msg_type) {
- case NM_MT_ACTIVATE_SW_ACK:
- /* we're done */
- DEBUGP(DNM, "Activate Software DONE!\n");
- sw->state = SW_STATE_NONE;
- rc = 0;
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_ACTIVATE_SW_ACK, mb,
- sw->cb_data, NULL);
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- case NM_MT_ACTIVATE_SW_NACK:
- DEBUGP(DNM, "Activate Software NACK\n");
- /* FIXME: cause */
- sw->state = SW_STATE_ERROR;
- if (sw->cbfn)
- sw->cbfn(GSM_HOOK_NM_SWLOAD,
- NM_MT_ACTIVATE_SW_NACK, mb,
- sw->cb_data, NULL);
- abis_nm_queue_send_next(sign_link->trx->bts);
- break;
- }
- case SW_STATE_NONE:
- switch (foh->msg_type) {
- case NM_MT_ACTIVATE_SW_ACK:
- rc = 0;
- break;
- }
- break;
- case SW_STATE_ERROR:
- break;
- }
-
- if (rc)
- DEBUGP(DNM, "unexpected NM MT 0x%02x in state %u -> %u\n",
- foh->msg_type, old_state, sw->state);
-
- return rc;
-}
-
-/* Load the specified software into the BTS */
-int abis_nm_software_load(struct gsm_bts *bts, int trx_nr, const char *fname,
- uint8_t win_size, int forced,
- gsm_cbfn *cbfn, void *cb_data)
-{
- struct abis_nm_sw *sw = &g_sw;
- int rc;
-
- DEBUGP(DNM, "Software Load (BTS %u, File \"%s\")\n",
- bts->nr, fname);
-
- if (sw->state != SW_STATE_NONE)
- return -EBUSY;
-
- sw->bts = bts;
- sw->trx_nr = trx_nr;
-
- switch (bts->type) {
- case GSM_BTS_TYPE_BS11:
- sw->obj_class = NM_OC_SITE_MANAGER;
- sw->obj_instance[0] = 0xff;
- sw->obj_instance[1] = 0xff;
- sw->obj_instance[2] = 0xff;
- break;
- case GSM_BTS_TYPE_NANOBTS:
- sw->obj_class = NM_OC_BASEB_TRANSC;
- sw->obj_instance[0] = sw->bts->nr;
- sw->obj_instance[1] = sw->trx_nr;
- sw->obj_instance[2] = 0xff;
- break;
- case GSM_BTS_TYPE_UNKNOWN:
- default:
- LOGPC(DNM, LOGL_ERROR, "Software Load not properly implemented.\n");
- return -1;
- break;
- }
- sw->window_size = win_size;
- sw->state = SW_STATE_WAIT_INITACK;
- sw->cbfn = cbfn;
- sw->cb_data = cb_data;
- sw->forced = forced;
-
- rc = sw_open_file(sw, fname);
- if (rc < 0) {
- sw->state = SW_STATE_NONE;
- return rc;
- }
-
- return sw_load_init(sw);
-}
-
-int abis_nm_software_load_status(struct gsm_bts *bts)
-{
- struct abis_nm_sw *sw = &g_sw;
- struct stat st;
- int rc, percent;
-
- rc = fstat(sw->fd, &st);
- if (rc < 0) {
- perror("ERROR during stat");
- return rc;
- }
-
- if (sw->stream)
- percent = (ftell(sw->stream) * 100) / st.st_size;
- else
- percent = (lseek(sw->fd, 0, SEEK_CUR) * 100) / st.st_size;
- return percent;
-}
-
-/* Activate the specified software into the BTS */
-int abis_nm_software_activate(struct gsm_bts *bts, const char *fname,
- gsm_cbfn *cbfn, void *cb_data)
-{
- struct abis_nm_sw *sw = &g_sw;
- int rc;
-
- DEBUGP(DNM, "Activating Software (BTS %u, File \"%s\")\n",
- bts->nr, fname);
-
- if (sw->state != SW_STATE_NONE)
- return -EBUSY;
-
- sw->bts = bts;
- sw->obj_class = NM_OC_SITE_MANAGER;
- sw->obj_instance[0] = 0xff;
- sw->obj_instance[1] = 0xff;
- sw->obj_instance[2] = 0xff;
- sw->state = SW_STATE_WAIT_ACTACK;
- sw->cbfn = cbfn;
- sw->cb_data = cb_data;
-
- /* Open the file in order to fill some sw struct members */
- rc = sw_open_file(sw, fname);
- if (rc < 0) {
- sw->state = SW_STATE_NONE;
- return rc;
- }
- sw_close_file(sw);
-
- return sw_activate(sw);
-}
-
-static void fill_nm_channel(struct abis_nm_channel *ch, uint8_t bts_port,
- uint8_t ts_nr, uint8_t subslot_nr)
-{
- ch->attrib = NM_ATT_ABIS_CHANNEL;
- ch->bts_port = bts_port;
- ch->timeslot = ts_nr;
- ch->subslot = subslot_nr;
-}
-
-int abis_nm_establish_tei(struct gsm_bts *bts, uint8_t trx_nr,
- uint8_t e1_port, uint8_t e1_timeslot, uint8_t e1_subslot,
- uint8_t tei)
-{
- struct abis_om_hdr *oh;
- struct abis_nm_channel *ch;
- uint8_t len = sizeof(*ch) + 2;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_ESTABLISH_TEI, NM_OC_RADIO_CARRIER,
- bts->bts_nr, trx_nr, 0xff);
-
- msgb_tv_put(msg, NM_ATT_TEI, tei);
-
- ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch));
- fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* connect signalling of one (BTS,TRX) to a particular timeslot on the E1 */
-int abis_nm_conn_terr_sign(struct gsm_bts_trx *trx,
- uint8_t e1_port, uint8_t e1_timeslot, uint8_t e1_subslot)
-{
- struct gsm_bts *bts = trx->bts;
- struct abis_om_hdr *oh;
- struct abis_nm_channel *ch;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, sizeof(*ch), NM_MT_CONN_TERR_SIGN,
- NM_OC_RADIO_CARRIER, bts->bts_nr, trx->nr, 0xff);
-
- ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch));
- fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-#if 0
-int abis_nm_disc_terr_sign(struct abis_nm_h *h, struct abis_om_obj_inst *inst,
- struct abis_nm_abis_channel *chan)
-{
-}
-#endif
-
-int abis_nm_conn_terr_traf(struct gsm_bts_trx_ts *ts,
- uint8_t e1_port, uint8_t e1_timeslot,
- uint8_t e1_subslot)
-{
- struct gsm_bts *bts = ts->trx->bts;
- struct abis_om_hdr *oh;
- struct abis_nm_channel *ch;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, sizeof(*ch), NM_MT_CONN_TERR_TRAF,
- NM_OC_CHANNEL, bts->bts_nr, ts->trx->nr, ts->nr);
-
- ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch));
- fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot);
-
- DEBUGP(DNM, "CONNECT TERR TRAF Um=%s E1=(%u,%u,%u)\n",
- gsm_ts_name(ts),
- e1_port, e1_timeslot, e1_subslot);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-#if 0
-int abis_nm_disc_terr_traf(struct abis_nm_h *h, struct abis_om_obj_inst *inst,
- struct abis_nm_abis_channel *chan,
- uint8_t subchan)
-{
-}
-#endif
-
-/* 3GPP TS 52.021 § 8.11.1 */
-int abis_nm_get_attr(struct gsm_bts *bts, uint8_t obj_class, uint8_t bts_nr, uint8_t trx_nr, uint8_t ts_nr,
- const uint8_t *attr, uint8_t attr_len)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg;
-
- if (bts->type != GSM_BTS_TYPE_OSMOBTS) {
- LOGPC(DNM, LOGL_NOTICE, "Getting attributes from BTS%d type %s is not supported.\n",
- bts->nr, btstype2str(bts->type));
- return -EINVAL;
- }
-
- DEBUGP(DNM, "Get Attr (bts=%d)\n", bts->nr);
-
- msg = nm_msgb_alloc();
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, attr_len, NM_MT_GET_ATTR, obj_class,
- bts_nr, trx_nr, ts_nr);
- msgb_tl16v_put(msg, NM_ATT_LIST_REQ_ATTR, attr_len, attr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Chapter 8.6.1 */
-int abis_nm_set_bts_attr(struct gsm_bts *bts, uint8_t *attr, int attr_len)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t *cur;
-
- DEBUGP(DNM, "Set BTS Attr (bts=%d)\n", bts->nr);
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, attr_len, NM_MT_SET_BTS_ATTR, NM_OC_BTS, bts->bts_nr, 0xff, 0xff);
- cur = msgb_put(msg, attr_len);
- memcpy(cur, attr, attr_len);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Chapter 8.6.2 */
-int abis_nm_set_radio_attr(struct gsm_bts_trx *trx, uint8_t *attr, int attr_len)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t *cur;
-
- DEBUGP(DNM, "Set TRX Attr (bts=%d,trx=%d)\n", trx->bts->nr, trx->nr);
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, attr_len, NM_MT_SET_RADIO_ATTR, NM_OC_RADIO_CARRIER,
- trx->bts->bts_nr, trx->nr, 0xff);
- cur = msgb_put(msg, attr_len);
- memcpy(cur, attr, attr_len);
-
- return abis_nm_sendmsg(trx->bts, msg);
-}
-
-int abis_nm_update_max_power_red(struct gsm_bts_trx *trx)
-{
- uint8_t attr[] = { NM_ATT_RF_MAXPOWR_R, trx->max_power_red / 2 };
- return abis_nm_set_radio_attr(trx, attr, ARRAY_SIZE(attr));
-}
-
-static int verify_chan_comb(struct gsm_bts_trx_ts *ts, uint8_t chan_comb,
- const char **reason)
-{
- int i;
-
- *reason = "Reason unknown";
-
- /* As it turns out, the BS-11 has some very peculiar restrictions
- * on the channel combinations it allows */
- switch (ts->trx->bts->type) {
- case GSM_BTS_TYPE_BS11:
- switch (chan_comb) {
- case NM_CHANC_TCHHalf:
- case NM_CHANC_TCHHalf2:
- case NM_CHANC_OSMO_TCHFull_TCHHalf_PDCH:
- /* not supported */
- *reason = "TCH/H is not supported.";
- return -EINVAL;
- case NM_CHANC_SDCCH:
- /* only one SDCCH/8 per TRX */
- for (i = 0; i < TRX_NR_TS; i++) {
- if (i == ts->nr)
- continue;
- if (ts->trx->ts[i].nm_chan_comb ==
- NM_CHANC_SDCCH) {
- *reason = "Only one SDCCH/8 per TRX allowed.";
- return -EINVAL;
- }
- }
- /* not allowed for TS0 of BCCH-TRX */
- if (ts->trx == ts->trx->bts->c0 &&
- ts->nr == 0) {
- *reason = "SDCCH/8 must be on TS0.";
- return -EINVAL;
- }
-
- /* not on the same TRX that has a BCCH+SDCCH4
- * combination */
- if (ts->trx != ts->trx->bts->c0 &&
- (ts->trx->ts[0].nm_chan_comb == 5 ||
- ts->trx->ts[0].nm_chan_comb == 8)) {
- *reason = "SDCCH/8 and BCCH must be on the same TRX.";
- return -EINVAL;
- }
- break;
- case NM_CHANC_mainBCCH:
- case NM_CHANC_BCCHComb:
- /* allowed only for TS0 of C0 */
- if (ts->trx != ts->trx->bts->c0 || ts->nr != 0) {
- *reason = "Main BCCH must be on TS0.";
- return -EINVAL;
- }
- break;
- case NM_CHANC_BCCH:
- /* allowed only for TS 2/4/6 of C0 */
- if (ts->trx != ts->trx->bts->c0) {
- *reason = "BCCH must be on C0.";
- return -EINVAL;
- }
- if (ts->nr != 2 && ts->nr != 4 && ts->nr != 6) {
- *reason = "BCCH must be on TS 2/4/6.";
- return -EINVAL;
- }
- break;
- case 8: /* this is not like 08.58, but in fact
- * FCCH+SCH+BCCH+CCCH+SDCCH/4+SACCH/C4+CBCH */
- /* FIXME: only one CBCH allowed per cell */
- break;
- }
- break;
- case GSM_BTS_TYPE_NANOBTS:
- switch (ts->nr) {
- case 0:
- if (ts->trx->nr == 0) {
- /* only on TRX0 */
- switch (chan_comb) {
- case NM_CHANC_BCCH:
- case NM_CHANC_mainBCCH:
- case NM_CHANC_BCCHComb:
- return 0;
- break;
- default:
- *reason = "TS0 of TRX0 must carry a BCCH.";
- return -EINVAL;
- }
- } else {
- switch (chan_comb) {
- case NM_CHANC_TCHFull:
- case NM_CHANC_TCHHalf:
- case NM_CHANC_IPAC_TCHFull_TCHHalf:
- return 0;
- default:
- *reason = "TS0 must carry a TCH/F or TCH/H.";
- return -EINVAL;
- }
- }
- break;
- case 1:
- if (ts->trx->nr == 0) {
- switch (chan_comb) {
- case NM_CHANC_SDCCH_CBCH:
- if (ts->trx->ts[0].nm_chan_comb ==
- NM_CHANC_mainBCCH)
- return 0;
- *reason = "TS0 must be the main BCCH for CBCH.";
- return -EINVAL;
- case NM_CHANC_SDCCH:
- case NM_CHANC_TCHFull:
- case NM_CHANC_TCHHalf:
- case NM_CHANC_IPAC_TCHFull_TCHHalf:
- case NM_CHANC_IPAC_TCHFull_PDCH:
- case NM_CHANC_OSMO_TCHFull_TCHHalf_PDCH:
- return 0;
- default:
- *reason = "TS1 must carry a CBCH, SDCCH or TCH.";
- return -EINVAL;
- }
- } else {
- switch (chan_comb) {
- case NM_CHANC_SDCCH:
- case NM_CHANC_TCHFull:
- case NM_CHANC_TCHHalf:
- case NM_CHANC_IPAC_TCHFull_TCHHalf:
- return 0;
- default:
- *reason = "TS1 must carry a SDCCH or TCH.";
- return -EINVAL;
- }
- }
- break;
- case 2:
- case 3:
- case 4:
- case 5:
- case 6:
- case 7:
- switch (chan_comb) {
- case NM_CHANC_TCHFull:
- case NM_CHANC_TCHHalf:
- case NM_CHANC_IPAC_TCHFull_TCHHalf:
- return 0;
- case NM_CHANC_IPAC_PDCH:
- case NM_CHANC_IPAC_TCHFull_PDCH:
- case NM_CHANC_OSMO_TCHFull_TCHHalf_PDCH:
- if (ts->trx->nr == 0)
- return 0;
- else {
- *reason = "PDCH must be on TRX0.";
- return -EINVAL;
- }
- }
- break;
- }
- *reason = "Unknown combination";
- return -EINVAL;
- case GSM_BTS_TYPE_OSMOBTS:
- /* no known restrictions */
- return 0;
- default:
- /* unknown BTS type */
- return 0;
- }
- return 0;
-}
-
-/* Chapter 8.6.3 */
-int abis_nm_set_channel_attr(struct gsm_bts_trx_ts *ts, uint8_t chan_comb)
-{
- struct gsm_bts *bts = ts->trx->bts;
- struct abis_om_hdr *oh;
- uint8_t zero = 0x00;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t len = 2 + 2;
- const char *reason = NULL;
-
- if (bts->type == GSM_BTS_TYPE_BS11)
- len += 4 + 2 + 2 + 3;
-
- DEBUGP(DNM, "Set Chan Attr %s\n", gsm_ts_name(ts));
- if (verify_chan_comb(ts, chan_comb, &reason) < 0) {
- msgb_free(msg);
- LOGP(DNM, LOGL_ERROR,
- "Invalid Channel Combination %d on %s. Reason: %s\n",
- chan_comb, gsm_ts_name(ts), reason);
- return -EINVAL;
- }
- ts->nm_chan_comb = chan_comb;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, len, NM_MT_SET_CHAN_ATTR,
- NM_OC_CHANNEL, bts->bts_nr,
- ts->trx->nr, ts->nr);
- msgb_tv_put(msg, NM_ATT_CHAN_COMB, chan_comb);
- if (ts->hopping.enabled) {
- unsigned int i;
- uint8_t *len;
-
- msgb_tv_put(msg, NM_ATT_HSN, ts->hopping.hsn);
- msgb_tv_put(msg, NM_ATT_MAIO, ts->hopping.maio);
-
- /* build the ARFCN list */
- msgb_put_u8(msg, NM_ATT_ARFCN_LIST);
- len = msgb_put(msg, 1);
- *len = 0;
- for (i = 0; i < ts->hopping.arfcns.data_len*8; i++) {
- if (bitvec_get_bit_pos(&ts->hopping.arfcns, i)) {
- msgb_put_u16(msg, i);
- /* At least BS-11 wants a TLV16 here */
- if (bts->type == GSM_BTS_TYPE_BS11)
- *len += 1;
- else
- *len += sizeof(uint16_t);
- }
- }
- }
- msgb_tv_put(msg, NM_ATT_TSC, gsm_ts_tsc(ts)); /* training sequence */
- if (bts->type == GSM_BTS_TYPE_BS11)
- msgb_tlv_put(msg, 0x59, 1, &zero);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_sw_act_req_ack(struct gsm_bts *bts, uint8_t obj_class, uint8_t i1,
- uint8_t i2, uint8_t i3, int nack, uint8_t *attr, int att_len)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t msgtype = NM_MT_SW_ACT_REQ_ACK;
- uint8_t len = att_len;
-
- if (nack) {
- len += 2;
- msgtype = NM_MT_SW_ACT_REQ_NACK;
- }
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, att_len, msgtype, obj_class, i1, i2, i3);
-
- if (attr) {
- uint8_t *ptr = msgb_put(msg, att_len);
- memcpy(ptr, attr, att_len);
- }
- if (nack)
- msgb_tv_put(msg, NM_ATT_NACK_CAUSES, NM_NACK_OBJCLASS_NOTSUPP);
-
- return abis_nm_sendmsg_direct(bts, msg);
-}
-
-int abis_nm_raw_msg(struct gsm_bts *bts, int len, uint8_t *rawmsg)
-{
- struct msgb *msg = nm_msgb_alloc();
- struct abis_om_hdr *oh;
- uint8_t *data;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, sizeof(*oh));
- fill_om_hdr(oh, len);
- data = msgb_put(msg, len);
- memcpy(data, rawmsg, len);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Siemens specific commands */
-static int __simple_cmd(struct gsm_bts *bts, uint8_t msg_type)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 0, msg_type, NM_OC_SITE_MANAGER,
- 0xff, 0xff, 0xff);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Chapter 8.9.2 */
-int abis_nm_opstart(struct gsm_bts *bts, uint8_t obj_class, uint8_t i0, uint8_t i1, uint8_t i2)
-{
- struct abis_om_hdr *oh;
- struct abis_om_fom_hdr *foh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- foh = fill_om_fom_hdr(oh, 0, NM_MT_OPSTART, obj_class, i0, i1, i2);
-
- abis_nm_debugp_foh(DNM, foh);
- DEBUGPC(DNM, "Sending OPSTART\n");
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Chapter 8.8.5 */
-int abis_nm_chg_adm_state(struct gsm_bts *bts, uint8_t obj_class, uint8_t i0,
- uint8_t i1, uint8_t i2, enum abis_nm_adm_state adm_state)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2, NM_MT_CHG_ADM_STATE, obj_class, i0, i1, i2);
- msgb_tv_put(msg, NM_ATT_ADM_STATE, adm_state);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_conn_mdrop_link(struct gsm_bts *bts, uint8_t e1_port0, uint8_t ts0,
- uint8_t e1_port1, uint8_t ts1)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t *attr;
-
- DEBUGP(DNM, "CONNECT MDROP LINK E1=(%u,%u) -> E1=(%u, %u)\n",
- e1_port0, ts0, e1_port1, ts1);
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 6, NM_MT_CONN_MDROP_LINK,
- NM_OC_SITE_MANAGER, 0x00, 0x00, 0x00);
-
- attr = msgb_put(msg, 3);
- attr[0] = NM_ATT_MDROP_LINK;
- attr[1] = e1_port0;
- attr[2] = ts0;
-
- attr = msgb_put(msg, 3);
- attr[0] = NM_ATT_MDROP_NEXT;
- attr[1] = e1_port1;
- attr[2] = ts1;
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Chapter 8.7.1 */
-int abis_nm_perform_test(struct gsm_bts *bts, uint8_t obj_class,
- uint8_t bts_nr, uint8_t trx_nr, uint8_t ts_nr,
- uint8_t test_nr, uint8_t auton_report, struct msgb *msg)
-{
- struct abis_om_hdr *oh;
-
- DEBUGP(DNM, "PEFORM TEST %s\n", abis_nm_test_name(test_nr));
-
- if (!msg)
- msg = nm_msgb_alloc();
-
- msgb_tv_push(msg, NM_ATT_AUTON_REPORT, auton_report);
- msgb_tv_push(msg, NM_ATT_TEST_NO, test_nr);
- oh = (struct abis_om_hdr *) msgb_push(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, msgb_l3len(msg), NM_MT_PERF_TEST,
- obj_class, bts_nr, trx_nr, ts_nr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_event_reports(struct gsm_bts *bts, int on)
-{
- if (on == 0)
- return __simple_cmd(bts, NM_MT_STOP_EVENT_REP);
- else
- return __simple_cmd(bts, NM_MT_REST_EVENT_REP);
-}
-
-/* Siemens (or BS-11) specific commands */
-
-int abis_nm_bs11_bsc_disconnect(struct gsm_bts *bts, int reconnect)
-{
- if (reconnect == 0)
- return __simple_cmd(bts, NM_MT_BS11_DISCONNECT);
- else
- return __simple_cmd(bts, NM_MT_BS11_RECONNECT);
-}
-
-int abis_nm_bs11_restart(struct gsm_bts *bts)
-{
- return __simple_cmd(bts, NM_MT_BS11_RESTART);
-}
-
-
-struct bs11_date_time {
- uint16_t year;
- uint8_t month;
- uint8_t day;
- uint8_t hour;
- uint8_t min;
- uint8_t sec;
-} __attribute__((packed));
-
-
-void get_bs11_date_time(struct bs11_date_time *aet)
-{
- time_t t;
- struct tm *tm;
-
- t = time(NULL);
- tm = localtime(&t);
- aet->sec = tm->tm_sec;
- aet->min = tm->tm_min;
- aet->hour = tm->tm_hour;
- aet->day = tm->tm_mday;
- aet->month = tm->tm_mon;
- aet->year = htons(1900 + tm->tm_year);
-}
-
-int abis_nm_bs11_reset_resource(struct gsm_bts *bts)
-{
- return __simple_cmd(bts, NM_MT_BS11_RESET_RESOURCE);
-}
-
-int abis_nm_bs11_db_transmission(struct gsm_bts *bts, int begin)
-{
- if (begin)
- return __simple_cmd(bts, NM_MT_BS11_BEGIN_DB_TX);
- else
- return __simple_cmd(bts, NM_MT_BS11_END_DB_TX);
-}
-
-int abis_nm_bs11_create_object(struct gsm_bts *bts,
- enum abis_bs11_objtype type, uint8_t idx,
- uint8_t attr_len, const uint8_t *attr)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t *cur;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, attr_len, NM_MT_BS11_CREATE_OBJ,
- NM_OC_BS11, type, 0, idx);
- cur = msgb_put(msg, attr_len);
- memcpy(cur, attr, attr_len);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_delete_object(struct gsm_bts *bts,
- enum abis_bs11_objtype type, uint8_t idx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 0, NM_MT_BS11_DELETE_OBJ,
- NM_OC_BS11, type, 0, idx);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_create_envaBTSE(struct gsm_bts *bts, uint8_t idx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t zero = 0x00;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 3, NM_MT_BS11_CREATE_OBJ,
- NM_OC_BS11_ENVABTSE, 0, idx, 0xff);
- msgb_tlv_put(msg, 0x99, 1, &zero);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_create_bport(struct gsm_bts *bts, uint8_t idx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 0, NM_MT_BS11_CREATE_OBJ, NM_OC_BS11_BPORT,
- idx, 0xff, 0xff);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_delete_bport(struct gsm_bts *bts, uint8_t idx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 0, NM_MT_BS11_DELETE_OBJ, NM_OC_BS11_BPORT,
- idx, 0xff, 0xff);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-static const uint8_t sm_attr[] = { NM_ATT_TEI, NM_ATT_ABIS_CHANNEL };
-int abis_nm_bs11_get_oml_tei_ts(struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+sizeof(sm_attr), NM_MT_GET_ATTR, NM_OC_SITE_MANAGER,
- 0xff, 0xff, 0xff);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(sm_attr), sm_attr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* like abis_nm_conn_terr_traf + set_tei */
-int abis_nm_bs11_conn_oml_tei(struct gsm_bts *bts, uint8_t e1_port,
- uint8_t e1_timeslot, uint8_t e1_subslot,
- uint8_t tei)
-{
- struct abis_om_hdr *oh;
- struct abis_nm_channel *ch;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, sizeof(*ch)+2, NM_MT_BS11_SET_ATTR,
- NM_OC_SITE_MANAGER, 0xff, 0xff, 0xff);
-
- ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch));
- fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot);
- msgb_tv_put(msg, NM_ATT_TEI, tei);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_set_trx_power(struct gsm_bts_trx *trx, uint8_t level)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 3, NM_MT_BS11_SET_ATTR,
- NM_OC_BS11, BS11_OBJ_PA, 0x00, trx->nr);
- msgb_tlv_put(msg, NM_ATT_BS11_TXPWR, 1, &level);
-
- return abis_nm_sendmsg(trx->bts, msg);
-}
-
-int abis_nm_bs11_get_trx_power(struct gsm_bts_trx *trx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t attr = NM_ATT_BS11_TXPWR;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+sizeof(attr), NM_MT_GET_ATTR,
- NM_OC_BS11, BS11_OBJ_PA, 0x00, trx->nr);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(attr), &attr);
-
- return abis_nm_sendmsg(trx->bts, msg);
-}
-
-int abis_nm_bs11_get_pll_mode(struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t attr[] = { NM_ATT_BS11_PLL_MODE };
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+sizeof(attr), NM_MT_GET_ATTR,
- NM_OC_BS11, BS11_OBJ_LI, 0x00, 0x00);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(attr), attr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_get_cclk(struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t attr[] = { NM_ATT_BS11_CCLK_ACCURACY,
- NM_ATT_BS11_CCLK_TYPE };
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+sizeof(attr), NM_MT_GET_ATTR,
- NM_OC_BS11, BS11_OBJ_CCLK, 0x00, 0x00);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(attr), attr);
-
- return abis_nm_sendmsg(bts, msg);
-
-}
-
-//static const uint8_t bs11_logon_c7[] = { 0x07, 0xd9, 0x01, 0x11, 0x0d, 0x10, 0x20 };
-
-int abis_nm_bs11_factory_logon(struct gsm_bts *bts, int on)
-{
- return abis_nm_bs11_logon(bts, 0x02, "FACTORY", on);
-}
-
-int abis_nm_bs11_infield_logon(struct gsm_bts *bts, int on)
-{
- return abis_nm_bs11_logon(bts, 0x03, "FIELD ", on);
-}
-
-int abis_nm_bs11_logon(struct gsm_bts *bts, uint8_t level, const char *name, int on)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- struct bs11_date_time bdt;
-
- get_bs11_date_time(&bdt);
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- if (on) {
- uint8_t len = 3*2 + sizeof(bdt)
- + 1 + strlen(name);
- fill_om_fom_hdr(oh, len, NM_MT_BS11_LMT_LOGON,
- NM_OC_BS11_BTSE, 0xff, 0xff, 0xff);
- msgb_tlv_put(msg, NM_ATT_BS11_LMT_LOGIN_TIME,
- sizeof(bdt), (uint8_t *) &bdt);
- msgb_tlv_put(msg, NM_ATT_BS11_LMT_USER_ACC_LEV,
- 1, &level);
- msgb_tlv_put(msg, NM_ATT_BS11_LMT_USER_NAME,
- strlen(name), (uint8_t *)name);
- } else {
- fill_om_fom_hdr(oh, 0, NM_MT_BS11_LMT_LOGOFF,
- NM_OC_BS11_BTSE, 0xff, 0xff, 0xff);
- }
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_set_trx1_pw(struct gsm_bts *bts, const char *password)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg;
-
- if (strlen(password) != 10)
- return -EINVAL;
-
- msg = nm_msgb_alloc();
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+strlen(password), NM_MT_BS11_SET_ATTR,
- NM_OC_BS11, BS11_OBJ_TRX1, 0x00, 0x00);
- msgb_tlv_put(msg, NM_ATT_BS11_PASSWORD, 10, (const uint8_t *)password);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* change the BS-11 PLL Mode to either locked (E1 derived) or standalone */
-int abis_nm_bs11_set_pll_locked(struct gsm_bts *bts, int locked)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg;
- uint8_t tlv_value;
-
- msg = nm_msgb_alloc();
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 3, NM_MT_BS11_SET_ATTR, NM_OC_BS11,
- BS11_OBJ_LI, 0x00, 0x00);
-
- if (locked)
- tlv_value = BS11_LI_PLL_LOCKED;
- else
- tlv_value = BS11_LI_PLL_STANDALONE;
-
- msgb_tlv_put(msg, NM_ATT_BS11_PLL_MODE, 1, &tlv_value);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* Set the calibration value of the PLL (work value/set value)
- * It depends on the login which one is changed */
-int abis_nm_bs11_set_pll(struct gsm_bts *bts, int value)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg;
- uint8_t tlv_value[2];
-
- msg = nm_msgb_alloc();
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 3, NM_MT_BS11_SET_ATTR, NM_OC_BS11,
- BS11_OBJ_TRX1, 0x00, 0x00);
-
- tlv_value[0] = value>>8;
- tlv_value[1] = value&0xff;
-
- msgb_tlv_put(msg, NM_ATT_BS11_PLL, 2, tlv_value);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_get_state(struct gsm_bts *bts)
-{
- return __simple_cmd(bts, NM_MT_BS11_GET_STATE);
-}
-
-/* BS11 SWL */
-
-void *tall_fle_ctx;
-
-struct abis_nm_bs11_sw {
- struct gsm_bts *bts;
- char swl_fname[PATH_MAX];
- uint8_t win_size;
- int forced;
- struct llist_head file_list;
- gsm_cbfn *user_cb; /* specified by the user */
-};
-static struct abis_nm_bs11_sw _g_bs11_sw, *g_bs11_sw = &_g_bs11_sw;
-
-struct file_list_entry {
- struct llist_head list;
- char fname[PATH_MAX];
-};
-
-struct file_list_entry *fl_dequeue(struct llist_head *queue)
-{
- struct llist_head *lh;
-
- if (llist_empty(queue))
- return NULL;
-
- lh = queue->next;
- llist_del(lh);
-
- return llist_entry(lh, struct file_list_entry, list);
-}
-
-static int bs11_read_swl_file(struct abis_nm_bs11_sw *bs11_sw)
-{
- char linebuf[255];
- struct llist_head *lh, *lh2;
- FILE *swl;
- int rc = 0;
-
- swl = fopen(bs11_sw->swl_fname, "r");
- if (!swl)
- return -ENODEV;
-
- /* zero the stale file list, if any */
- llist_for_each_safe(lh, lh2, &bs11_sw->file_list) {
- llist_del(lh);
- talloc_free(lh);
- }
-
- while (fgets(linebuf, sizeof(linebuf), swl)) {
- char file_id[12+1];
- char file_version[80+1];
- struct file_list_entry *fle;
- static char dir[PATH_MAX];
-
- if (strlen(linebuf) < 4)
- continue;
-
- rc = sscanf(linebuf+4, "%12s:%80s\r\n", file_id, file_version);
- if (rc < 0) {
- perror("ERR parsing SWL file");
- rc = -EINVAL;
- goto out;
- }
- if (rc < 2)
- continue;
-
- fle = talloc_zero(tall_fle_ctx, struct file_list_entry);
- if (!fle) {
- rc = -ENOMEM;
- goto out;
- }
-
- /* construct new filename */
- osmo_strlcpy(dir, bs11_sw->swl_fname, sizeof(dir));
- strncat(fle->fname, dirname(dir), sizeof(fle->fname) - 1);
- strcat(fle->fname, "/");
- strncat(fle->fname, file_id, sizeof(fle->fname) - 1 -strlen(fle->fname));
-
- llist_add_tail(&fle->list, &bs11_sw->file_list);
- }
-
-out:
- fclose(swl);
- return rc;
-}
-
-/* bs11 swload specific callback, passed to abis_nm core swload */
-static int bs11_swload_cbfn(unsigned int hook, unsigned int event,
- struct msgb *msg, void *data, void *param)
-{
- struct abis_nm_bs11_sw *bs11_sw = data;
- struct file_list_entry *fle;
- int rc = 0;
-
- switch (event) {
- case NM_MT_LOAD_END_ACK:
- fle = fl_dequeue(&bs11_sw->file_list);
- if (fle) {
- /* start download the next file of our file list */
- rc = abis_nm_software_load(bs11_sw->bts, 0xff, fle->fname,
- bs11_sw->win_size,
- bs11_sw->forced,
- &bs11_swload_cbfn, bs11_sw);
- talloc_free(fle);
- } else {
- /* activate the SWL */
- rc = abis_nm_software_activate(bs11_sw->bts,
- bs11_sw->swl_fname,
- bs11_swload_cbfn,
- bs11_sw);
- }
- break;
- case NM_MT_LOAD_SEG_ACK:
- case NM_MT_LOAD_END_NACK:
- case NM_MT_LOAD_INIT_ACK:
- case NM_MT_LOAD_INIT_NACK:
- case NM_MT_ACTIVATE_SW_NACK:
- case NM_MT_ACTIVATE_SW_ACK:
- default:
- /* fallthrough to the user callback */
- if (bs11_sw->user_cb)
- rc = bs11_sw->user_cb(hook, event, msg, NULL, NULL);
- break;
- }
-
- return rc;
-}
-
-/* Siemens provides a SWL file that is a mere listing of all the other
- * files that are part of a software release. We need to upload first
- * the list file, and then each file that is listed in the list file */
-int abis_nm_bs11_load_swl(struct gsm_bts *bts, const char *fname,
- uint8_t win_size, int forced, gsm_cbfn *cbfn)
-{
- struct abis_nm_bs11_sw *bs11_sw = g_bs11_sw;
- struct file_list_entry *fle;
- int rc = 0;
-
- INIT_LLIST_HEAD(&bs11_sw->file_list);
- bs11_sw->bts = bts;
- bs11_sw->win_size = win_size;
- bs11_sw->user_cb = cbfn;
- bs11_sw->forced = forced;
-
- osmo_strlcpy(bs11_sw->swl_fname, fname, sizeof(bs11_sw->swl_fname));
- rc = bs11_read_swl_file(bs11_sw);
- if (rc < 0)
- return rc;
-
- /* dequeue next item in file list */
- fle = fl_dequeue(&bs11_sw->file_list);
- if (!fle)
- return -EINVAL;
-
- /* start download the next file of our file list */
- rc = abis_nm_software_load(bts, 0xff, fle->fname, win_size, forced,
- bs11_swload_cbfn, bs11_sw);
- talloc_free(fle);
- return rc;
-}
-
-#if 0
-static uint8_t req_attr_btse[] = {
- NM_ATT_ADM_STATE, NM_ATT_BS11_LMT_LOGON_SESSION,
- NM_ATT_BS11_LMT_LOGIN_TIME, NM_ATT_BS11_LMT_USER_ACC_LEV,
- NM_ATT_BS11_LMT_USER_NAME,
-
- 0xaf, NM_ATT_BS11_RX_OFFSET, NM_ATT_BS11_VENDOR_NAME,
-
- NM_ATT_BS11_SW_LOAD_INTENDED, NM_ATT_BS11_SW_LOAD_SAFETY,
-
- NM_ATT_BS11_SW_LOAD_STORED };
-
-static uint8_t req_attr_btsm[] = {
- NM_ATT_ABIS_CHANNEL, NM_ATT_TEI, NM_ATT_BS11_ABIS_EXT_TIME,
- NM_ATT_ADM_STATE, NM_ATT_AVAIL_STATUS, 0xce, NM_ATT_FILE_ID,
- NM_ATT_FILE_VERSION, NM_ATT_OPER_STATE, 0xe8, NM_ATT_BS11_ALL_TEST_CATG,
- NM_ATT_SW_DESCR, NM_ATT_GET_ARI };
-#endif
-
-static uint8_t req_attr[] = {
- NM_ATT_ADM_STATE, NM_ATT_AVAIL_STATUS, 0xa8, NM_ATT_OPER_STATE,
- 0xd5, 0xa1, NM_ATT_BS11_ESN_FW_CODE_NO, NM_ATT_BS11_ESN_HW_CODE_NO,
- 0x42, NM_ATT_BS11_ESN_PCB_SERIAL, NM_ATT_BS11_PLL };
-
-int abis_nm_bs11_get_serno(struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- /* SiemensHW CCTRL object */
- fill_om_fom_hdr(oh, 2+sizeof(req_attr), NM_MT_GET_ATTR, NM_OC_BS11,
- 0x03, 0x00, 0x00);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(req_attr), req_attr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_set_ext_time(struct gsm_bts *bts)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- struct bs11_date_time aet;
-
- get_bs11_date_time(&aet);
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- /* SiemensHW CCTRL object */
- fill_om_fom_hdr(oh, 2+sizeof(aet), NM_MT_BS11_SET_ATTR, NM_OC_SITE_MANAGER,
- 0xff, 0xff, 0xff);
- msgb_tlv_put(msg, NM_ATT_BS11_ABIS_EXT_TIME, sizeof(aet), (uint8_t *) &aet);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_get_bport_line_cfg(struct gsm_bts *bts, uint8_t bport)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- uint8_t attr = NM_ATT_BS11_LINE_CFG;
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2+sizeof(attr), NM_MT_GET_ATTR,
- NM_OC_BS11_BPORT, bport, 0xff, 0x02);
- msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(attr), &attr);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-int abis_nm_bs11_set_bport_line_cfg(struct gsm_bts *bts, uint8_t bport, enum abis_bs11_line_cfg line_cfg)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
- struct bs11_date_time aet;
-
- get_bs11_date_time(&aet);
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 2, NM_MT_BS11_SET_ATTR, NM_OC_BS11_BPORT,
- bport, 0xff, 0x02);
- msgb_tv_put(msg, NM_ATT_BS11_LINE_CFG, line_cfg);
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* ip.access nanoBTS specific commands */
-static const char ipaccess_magic[] = "com.ipaccess";
-
-
-static int abis_nm_rx_ipacc(struct msgb *msg)
-{
- struct in_addr addr;
- struct abis_om_hdr *oh = msgb_l2(msg);
- struct abis_om_fom_hdr *foh;
- uint8_t idstrlen = oh->data[0];
- struct tlv_parsed tp;
- struct ipacc_ack_signal_data signal;
- struct e1inp_sign_link *sign_link = msg->dst;
-
- if (strncmp((char *)&oh->data[1], ipaccess_magic, idstrlen)) {
- LOGP(DNM, LOGL_ERROR, "id string is not com.ipaccess !?!\n");
- return -EINVAL;
- }
-
- foh = (struct abis_om_fom_hdr *) (oh->data + 1 + idstrlen);
- abis_nm_tlv_parse(&tp, sign_link->trx->bts, foh->data, oh->length-sizeof(*foh));
-
- abis_nm_debugp_foh(DNM, foh);
-
- DEBUGPC(DNM, "IPACCESS(0x%02x): ", foh->msg_type);
-
- switch (foh->msg_type) {
- case NM_MT_IPACC_RSL_CONNECT_ACK:
- DEBUGPC(DNM, "RSL CONNECT ACK ");
- if (TLVP_PRESENT(&tp, NM_ATT_IPACC_DST_IP)) {
- memcpy(&addr,
- TLVP_VAL(&tp, NM_ATT_IPACC_DST_IP), sizeof(addr));
-
- DEBUGPC(DNM, "IP=%s ", inet_ntoa(addr));
- }
- if (TLVP_PRESENT(&tp, NM_ATT_IPACC_DST_IP_PORT))
- DEBUGPC(DNM, "PORT=%u ",
- ntohs(*((uint16_t *)
- TLVP_VAL(&tp, NM_ATT_IPACC_DST_IP_PORT))));
- if (TLVP_PRESENT(&tp, NM_ATT_IPACC_STREAM_ID))
- DEBUGPC(DNM, "STREAM=0x%02x ",
- *TLVP_VAL(&tp, NM_ATT_IPACC_STREAM_ID));
- DEBUGPC(DNM, "\n");
- break;
- case NM_MT_IPACC_RSL_CONNECT_NACK:
- LOGP(DNM, LOGL_ERROR, "RSL CONNECT NACK ");
- if (TLVP_PRESENT(&tp, NM_ATT_NACK_CAUSES))
- LOGPC(DNM, LOGL_ERROR, " CAUSE=%s\n",
- abis_nm_nack_cause_name(*TLVP_VAL(&tp, NM_ATT_NACK_CAUSES)));
- else
- LOGPC(DNM, LOGL_ERROR, "\n");
- break;
- case NM_MT_IPACC_SET_NVATTR_ACK:
- DEBUGPC(DNM, "SET NVATTR ACK\n");
- /* FIXME: decode and show the actual attributes */
- break;
- case NM_MT_IPACC_SET_NVATTR_NACK:
- LOGP(DNM, LOGL_ERROR, "SET NVATTR NACK ");
- if (TLVP_PRESENT(&tp, NM_ATT_NACK_CAUSES))
- LOGPC(DNM, LOGL_ERROR, " CAUSE=%s\n",
- abis_nm_nack_cause_name(*TLVP_VAL(&tp, NM_ATT_NACK_CAUSES)));
- else
- LOGPC(DNM, LOGL_ERROR, "\n");
- break;
- case NM_MT_IPACC_GET_NVATTR_ACK:
- DEBUGPC(DNM, "GET NVATTR ACK\n");
- /* FIXME: decode and show the actual attributes */
- break;
- case NM_MT_IPACC_GET_NVATTR_NACK:
- LOGPC(DNM, LOGL_ERROR, "GET NVATTR NACK ");
- if (TLVP_PRESENT(&tp, NM_ATT_NACK_CAUSES))
- LOGPC(DNM, LOGL_ERROR, " CAUSE=%s\n",
- abis_nm_nack_cause_name(*TLVP_VAL(&tp, NM_ATT_NACK_CAUSES)));
- else
- LOGPC(DNM, LOGL_ERROR, "\n");
- break;
- case NM_MT_IPACC_SET_ATTR_ACK:
- DEBUGPC(DNM, "SET ATTR ACK\n");
- break;
- case NM_MT_IPACC_SET_ATTR_NACK:
- LOGPC(DNM, LOGL_ERROR, "SET ATTR NACK ");
- if (TLVP_PRESENT(&tp, NM_ATT_NACK_CAUSES))
- LOGPC(DNM, LOGL_ERROR, " CAUSE=%s\n",
- abis_nm_nack_cause_name(*TLVP_VAL(&tp, NM_ATT_NACK_CAUSES)));
- else
- LOGPC(DNM, LOGL_ERROR, "\n");
- break;
- default:
- DEBUGPC(DNM, "unknown\n");
- break;
- }
-
- /* signal handling */
- switch (foh->msg_type) {
- case NM_MT_IPACC_RSL_CONNECT_NACK:
- case NM_MT_IPACC_SET_NVATTR_NACK:
- case NM_MT_IPACC_GET_NVATTR_NACK:
- signal.trx = gsm_bts_trx_by_nr(sign_link->trx->bts, foh->obj_inst.trx_nr);
- signal.msg_type = foh->msg_type;
- osmo_signal_dispatch(SS_NM, S_NM_IPACC_NACK, &signal);
- break;
- case NM_MT_IPACC_SET_NVATTR_ACK:
- signal.trx = gsm_bts_trx_by_nr(sign_link->trx->bts, foh->obj_inst.trx_nr);
- signal.msg_type = foh->msg_type;
- osmo_signal_dispatch(SS_NM, S_NM_IPACC_ACK, &signal);
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-/* send an ip-access manufacturer specific message */
-int abis_nm_ipaccess_msg(struct gsm_bts *bts, uint8_t msg_type,
- uint8_t obj_class, uint8_t bts_nr,
- uint8_t trx_nr, uint8_t ts_nr,
- uint8_t *attr, int attr_len)
-{
- struct msgb *msg = nm_msgb_alloc();
- struct abis_om_hdr *oh;
- struct abis_om_fom_hdr *foh;
- uint8_t *data;
-
- /* construct the 12.21 OM header, observe the erroneous length */
- oh = (struct abis_om_hdr *) msgb_put(msg, sizeof(*oh));
- fill_om_hdr(oh, sizeof(*foh) + attr_len);
- oh->mdisc = ABIS_OM_MDISC_MANUF;
-
- /* add the ip.access magic */
- data = msgb_put(msg, sizeof(ipaccess_magic)+1);
- *data++ = sizeof(ipaccess_magic);
- memcpy(data, ipaccess_magic, sizeof(ipaccess_magic));
-
- /* fill the 12.21 FOM header */
- foh = (struct abis_om_fom_hdr *) msgb_put(msg, sizeof(*foh));
- foh->msg_type = msg_type;
- foh->obj_class = obj_class;
- foh->obj_inst.bts_nr = bts_nr;
- foh->obj_inst.trx_nr = trx_nr;
- foh->obj_inst.ts_nr = ts_nr;
-
- if (attr && attr_len) {
- data = msgb_put(msg, attr_len);
- memcpy(data, attr, attr_len);
- }
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* set some attributes in NVRAM */
-int abis_nm_ipaccess_set_nvattr(struct gsm_bts_trx *trx, uint8_t *attr,
- int attr_len)
-{
- return abis_nm_ipaccess_msg(trx->bts, NM_MT_IPACC_SET_NVATTR,
- NM_OC_BASEB_TRANSC, 0, trx->nr, 0xff, attr,
- attr_len);
-}
-
-int abis_nm_ipaccess_rsl_connect(struct gsm_bts_trx *trx,
- uint32_t ip, uint16_t port, uint8_t stream)
-{
- struct in_addr ia;
- uint8_t attr[] = { NM_ATT_IPACC_STREAM_ID, 0,
- NM_ATT_IPACC_DST_IP_PORT, 0, 0,
- NM_ATT_IPACC_DST_IP, 0, 0, 0, 0 };
-
- int attr_len = sizeof(attr);
-
- ia.s_addr = htonl(ip);
- attr[1] = stream;
- attr[3] = port >> 8;
- attr[4] = port & 0xff;
- *(uint32_t *)(attr+6) = ia.s_addr;
-
- /* if ip == 0, we use the default IP */
- if (ip == 0)
- attr_len -= 5;
-
- DEBUGP(DNM, "ip.access RSL CONNECT IP=%s PORT=%u STREAM=0x%02x\n",
- inet_ntoa(ia), port, stream);
-
- return abis_nm_ipaccess_msg(trx->bts, NM_MT_IPACC_RSL_CONNECT,
- NM_OC_BASEB_TRANSC, trx->bts->bts_nr,
- trx->nr, 0xff, attr, attr_len);
-}
-
-/* restart / reboot an ip.access nanoBTS */
-int abis_nm_ipaccess_restart(struct gsm_bts_trx *trx)
-{
- struct abis_om_hdr *oh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE);
- fill_om_fom_hdr(oh, 0, NM_MT_IPACC_RESTART, NM_OC_BASEB_TRANSC,
- trx->bts->nr, trx->nr, 0xff);
-
- return abis_nm_sendmsg_direct(trx->bts, msg);
-}
-
-int abis_nm_ipaccess_set_attr(struct gsm_bts *bts, uint8_t obj_class,
- uint8_t bts_nr, uint8_t trx_nr, uint8_t ts_nr,
- uint8_t *attr, uint8_t attr_len)
-{
- return abis_nm_ipaccess_msg(bts, NM_MT_IPACC_SET_ATTR,
- obj_class, bts_nr, trx_nr, ts_nr,
- attr, attr_len);
-}
-
-void abis_nm_ipaccess_cgi(uint8_t *buf, struct gsm_bts *bts)
-{
- /* we simply reuse the GSM48 function and overwrite the RAC
- * with the Cell ID */
- gsm48_ra_id_by_bts(buf, bts);
- *((uint16_t *)(buf + 5)) = htons(bts->cell_identity);
-}
-
-void gsm_trx_lock_rf(struct gsm_bts_trx *trx, int locked)
-{
- int new_state = locked ? NM_STATE_LOCKED : NM_STATE_UNLOCKED;
-
- trx->mo.nm_state.administrative = new_state;
- if (!trx->bts || !trx->bts->oml_link)
- return;
-
- abis_nm_chg_adm_state(trx->bts, NM_OC_RADIO_CARRIER,
- trx->bts->bts_nr, trx->nr, 0xff,
- new_state);
-}
-
-static const struct value_string ipacc_testres_names[] = {
- { NM_IPACC_TESTRES_SUCCESS, "SUCCESS" },
- { NM_IPACC_TESTRES_TIMEOUT, "TIMEOUT" },
- { NM_IPACC_TESTRES_NO_CHANS, "NO CHANNELS" },
- { NM_IPACC_TESTRES_PARTIAL, "PARTIAL" },
- { NM_IPACC_TESTRES_STOPPED, "STOPPED" },
- { 0, NULL }
-};
-
-const char *ipacc_testres_name(uint8_t res)
-{
- return get_value_string(ipacc_testres_names, res);
-}
-
-void ipac_parse_cgi(struct cell_global_id *cid, const uint8_t *buf)
-{
- cid->mcc = (buf[0] & 0xf) * 100;
- cid->mcc += (buf[0] >> 4) * 10;
- cid->mcc += (buf[1] & 0xf) * 1;
-
- if (buf[1] >> 4 == 0xf) {
- cid->mnc = (buf[2] & 0xf) * 10;
- cid->mnc += (buf[2] >> 4) * 1;
- } else {
- cid->mnc = (buf[2] & 0xf) * 100;
- cid->mnc += (buf[2] >> 4) * 10;
- cid->mnc += (buf[1] >> 4) * 1;
- }
-
- cid->lac = ntohs(*((uint16_t *)&buf[3]));
- cid->ci = ntohs(*((uint16_t *)&buf[5]));
-}
-
-/* parse BCCH information IEI from wire format to struct ipac_bcch_info */
-int ipac_parse_bcch_info(struct ipac_bcch_info *binf, uint8_t *buf)
-{
- uint8_t *cur = buf;
- uint16_t len __attribute__((unused));
-
- memset(binf, 0, sizeof(*binf));
-
- if (cur[0] != NM_IPAC_EIE_BCCH_INFO)
- return -EINVAL;
- cur++;
-
- len = ntohs(*(uint16_t *)cur);
- cur += 2;
-
- binf->info_type = ntohs(*(uint16_t *)cur);
- cur += 2;
-
- if (binf->info_type & IPAC_BINF_FREQ_ERR_QUAL)
- binf->freq_qual = *cur >> 2;
-
- binf->arfcn = (*cur++ & 3) << 8;
- binf->arfcn |= *cur++;
-
- if (binf->info_type & IPAC_BINF_RXLEV)
- binf->rx_lev = *cur & 0x3f;
- cur++;
-
- if (binf->info_type & IPAC_BINF_RXQUAL)
- binf->rx_qual = *cur & 0x7;
- cur++;
-
- if (binf->info_type & IPAC_BINF_FREQ_ERR_QUAL)
- binf->freq_err = ntohs(*(uint16_t *)cur);
- cur += 2;
-
- if (binf->info_type & IPAC_BINF_FRAME_OFFSET)
- binf->frame_offset = ntohs(*(uint16_t *)cur);
- cur += 2;
-
- if (binf->info_type & IPAC_BINF_FRAME_NR_OFFSET)
- binf->frame_nr_offset = ntohl(*(uint32_t *)cur);
- cur += 4;
-
-#if 0
- /* Somehow this is not set correctly */
- if (binf->info_type & IPAC_BINF_BSIC)
-#endif
- binf->bsic = *cur & 0x3f;
- cur++;
-
- ipac_parse_cgi(&binf->cgi, cur);
- cur += 7;
-
- if (binf->info_type & IPAC_BINF_NEIGH_BA_SI2) {
- memcpy(binf->ba_list_si2, cur, sizeof(binf->ba_list_si2));
- cur += sizeof(binf->ba_list_si2);
- }
-
- if (binf->info_type & IPAC_BINF_NEIGH_BA_SI2bis) {
- memcpy(binf->ba_list_si2bis, cur,
- sizeof(binf->ba_list_si2bis));
- cur += sizeof(binf->ba_list_si2bis);
- }
-
- if (binf->info_type & IPAC_BINF_NEIGH_BA_SI2ter) {
- memcpy(binf->ba_list_si2ter, cur,
- sizeof(binf->ba_list_si2ter));
- cur += sizeof(binf->ba_list_si2ter);
- }
-
- return 0;
-}
-
-void abis_nm_clear_queue(struct gsm_bts *bts)
-{
- struct msgb *msg;
-
- while (!llist_empty(&bts->abis_queue)) {
- msg = msgb_dequeue(&bts->abis_queue);
- msgb_free(msg);
- }
-
- bts->abis_nm_pend = 0;
-}
diff --git a/src/libbsc/abis_nm_ipaccess.c b/src/libbsc/abis_nm_ipaccess.c
deleted file mode 100644
index b8225383a..000000000
--- a/src/libbsc/abis_nm_ipaccess.c
+++ /dev/null
@@ -1,87 +0,0 @@
-/* GSM Network Management (OML) messages on the A-bis interface
- * Extensions for the ip.access A-bis over IP protocol*/
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-/* A list of all the 'embedded' attributes of ip.access */
-enum ipa_embedded_att {
- IPA_ATT_ARFCN_WHITELIST = 0x01,
- IPA_ATT_ARFCN_BLACKLIST = 0x02,
- IPA_ATT_FREQ_ERR_LIST = 0x03,
- IPA_ATT_CHAN_USAGE_LIST = 0x04,
- IPA_ATT_BCCH_INF_TYPE = 0x05,
- IPA_ATT_BCCH_INF = 0x06,
- IPA_ATT_CONFIG = 0x07,
- IPA_ATT_RESULT_DETAILS = 0x08,
- IPA_ATT_RXLEV_THRESH = 0x09,
- IPA_ATT_FREQ_SYNC_OPT = 0x0a,
- IPA_ATT_MAC_ADDR = 0x0b,
- IPA_ATT_HW_SW_COMPAT_NR = 0x0c,
- IPA_ATT_MANUF_SER_NR = 0x0d,
- IPA_ATT_OEM_ID = 0x0e,
- IPA_ATT_DATETIME_MANUF = 0x0f,
- IPA_ATT_DATETIME_CALIB = 0x10,
- IPA_ATT_BEACON_INF = 0x11,
- IPA_ATT_FREQ_ERR = 0x12,
- IPA_ATT_SNMP_COMM_STRING = 0x13,
- IPA_ATT_SNMP_TRAP_ADDR = 0x14,
- IPA_ATT_SNMP_TRAP_PORT = 0x15,
- IPA_ATT_SNMP_MAN_ADDR = 0x16,
- IPA_ATT_SNMP_SYS_CONTACT = 0x17,
- IPA_ATT_FACTORY_ID = 0x18,
- IPA_ATT_FACTORY_SERIAL = 0x19,
- IPA_ATT_LOGGED_EVT_IND = 0x1a,
- IPA_ATT_LOCAL_ADD_TEXT = 0x1b,
- IPA_ATT_FREQ_BANDS = 0x1c,
- IPA_ATT_MAX_TA = 0x1d,
- IPA_ATT_CIPH_ALG = 0x1e,
- IPA_ATT_CHAN_TYPES = 0x1f,
- IPA_ATT_CHAN_MODES = 0x20,
- IPA_ATT_GPRS_CODING_SCHEMES = 0x21,
- IPA_ATT_RTP_FEATURES = 0x22,
- IPA_ATT_RSL_FEATURES = 0x23,
- IPA_ATT_BTS_HW_CLASS = 0x24,
- IPA_ATT_BTS_ID = 0x25,
- IPA_ATT_BCAST_L2_MSG = 0x26,
-};
-
-/* append an ip.access channel list to the given msgb */
-static int ipa_chan_list_append(struct msgb *msg, uint8_t ie,
- uint16_t *arfcns, int arfcn_count)
-{
- int i;
- uint8_t *u8;
- uint16_t *u16;
-
- /* tag */
- u8 = msgb_push(msg, 1);
- *u8 = ie;
-
- /* length in octets */
- u16 = msgb_push(msg, 2);
- *u16 = htons(arfcn_count * 2);
-
- for (i = 0; i < arfcn_count; i++) {
- u16 = msgb_push(msg, 2);
- *u16 = htons(arfcns[i]);
- }
-
- return 0;
-}
diff --git a/src/libbsc/abis_nm_vty.c b/src/libbsc/abis_nm_vty.c
deleted file mode 100644
index 6ec0a4a21..000000000
--- a/src/libbsc/abis_nm_vty.c
+++ /dev/null
@@ -1,191 +0,0 @@
-/* VTY interface for A-bis OML (Netowrk Management) */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <unistd.h>
-#include <errno.h>
-#include <stdint.h>
-
-#include <arpa/inet.h>
-
-#include <osmocom/gsm/abis_nm.h>
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/debug.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/vty/vty.h>
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/telnet_interface.h>
-
-extern struct gsm_network *bsc_gsmnet;
-
-static struct cmd_node oml_node = {
- OML_NODE,
- "%s(oml)# ",
- 1,
-};
-
-struct oml_node_state {
- struct gsm_bts *bts;
- uint8_t obj_class;
- uint8_t obj_inst[3];
-};
-
-static int dummy_config_write(struct vty *v)
-{
- return CMD_SUCCESS;
-}
-
-/* FIXME: auto-generate those strings from the value_string lists */
-#define NM_OBJCLASS_VTY "(site-manager|bts|radio-carrier|baseband-transceiver|channel|adjc|handover|power-contorl|btse|rack|test|envabtse|bport|gprs-nse|gprs-cell|gprs-nsvc|siemenshw)"
-#define NM_OBJCLASS_VTY_HELP "Site Manager Object\n" \
- "BTS Object\n" \
- "Radio Carrier Object\n" \
- "Baseband Transceiver Object\n" \
- "Channel (Timeslot) Object\n" \
- "Adjacent Object (Siemens)\n" \
- "Handover Object (Siemens)\n" \
- "Power Control Object (Siemens)\n" \
- "BTSE Object (Siemens)\n" \
- "Rack Object (Siemens)\n" \
- "Test Object (Siemens)\n" \
- "ENVABTSE Object (Siemens)\n" \
- "BPORT Object (Siemens)\n" \
- "GPRS NSE Object (ip.access/osmo-bts)\n" \
- "GPRS Cell Object (ip.acecss/osmo-bts)\n" \
- "GPRS NSVC Object (ip.acecss/osmo-bts)\n" \
- "SIEMENSHW Object (Siemens)\n"
-
-
-DEFUN(oml_class_inst, oml_class_inst_cmd,
- "bts <0-255> oml class " NM_OBJCLASS_VTY
- " instance <0-255> <0-255> <0-255>",
- "BTS related commands\n" "BTS Number\n"
- "Manipulate the OML managed objects\n"
- "Object Class\n" NM_OBJCLASS_VTY_HELP
- "Object Instance\n" "BTS Number\n" "TRX Number\n" "TS Number\n")
-{
- struct gsm_bts *bts;
- struct oml_node_state *oms;
- int bts_nr = atoi(argv[0]);
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- oms = talloc_zero(tall_bsc_ctx, struct oml_node_state);
- if (!oms)
- return CMD_WARNING;
-
- oms->bts = bts;
- oms->obj_class = get_string_value(abis_nm_obj_class_names, argv[1]);
- oms->obj_inst[0] = atoi(argv[2]);
- oms->obj_inst[1] = atoi(argv[3]);
- oms->obj_inst[2] = atoi(argv[4]);
-
- vty->index = oms;
- vty->node = OML_NODE;
-
- return CMD_SUCCESS;
-
-}
-
-DEFUN(oml_classnum_inst, oml_classnum_inst_cmd,
- "bts <0-255> oml class <0-255> instance <0-255> <0-255> <0-255>",
- "BTS related commands\n" "BTS Number\n"
- "Manipulate the OML managed objects\n"
- "Object Class\n" "Object Class\n"
- "Object Instance\n" "BTS Number\n" "TRX Number\n" "TS Number\n")
-{
- struct gsm_bts *bts;
- struct oml_node_state *oms;
- int bts_nr = atoi(argv[0]);
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- oms = talloc_zero(tall_bsc_ctx, struct oml_node_state);
- if (!oms)
- return CMD_WARNING;
-
- oms->bts = bts;
- oms->obj_class = atoi(argv[1]);
- oms->obj_inst[0] = atoi(argv[2]);
- oms->obj_inst[1] = atoi(argv[3]);
- oms->obj_inst[2] = atoi(argv[4]);
-
- vty->index = oms;
- vty->node = OML_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(oml_chg_adm_state, oml_chg_adm_state_cmd,
- "change-adm-state (locked|unlocked|shutdown|null)",
- "Change the Administrative State\n"
- "Locked\n" "Unlocked\n" "Shutdown\n" "NULL\n")
-{
- struct oml_node_state *oms = vty->index;
- enum abis_nm_adm_state state;
-
- state = get_string_value(abis_nm_adm_state_names, argv[0]);
-
- abis_nm_chg_adm_state(oms->bts, oms->obj_class, oms->obj_inst[0],
- oms->obj_inst[1], oms->obj_inst[2], state);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(oml_opstart, oml_opstart_cmd,
- "opstart", "Send an OPSTART message to the object")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_nm_opstart(oms->bts, oms->obj_class, oms->obj_inst[0],
- oms->obj_inst[1], oms->obj_inst[2]);
-
- return CMD_SUCCESS;
-}
-
-int abis_nm_vty_init(void)
-{
- install_element(ENABLE_NODE, &oml_class_inst_cmd);
- install_element(ENABLE_NODE, &oml_classnum_inst_cmd);
- install_node(&oml_node, dummy_config_write);
-
- vty_install_default(OML_NODE);
- install_element(OML_NODE, &oml_chg_adm_state_cmd);
- install_element(OML_NODE, &oml_opstart_cmd);
-
- return 0;
-}
diff --git a/src/libbsc/abis_om2000.c b/src/libbsc/abis_om2000.c
deleted file mode 100644
index 82a14b269..000000000
--- a/src/libbsc/abis_om2000.c
+++ /dev/null
@@ -1,2776 +0,0 @@
-/* Ericsson RBS 2xxx GSM O&M (OM2000) messages on the A-bis interface
- * implemented based on protocol trace analysis, no formal documentation */
-
-/* (C) 2010-2011,2016 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <errno.h>
-#include <unistd.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-#include <stdint.h>
-
-#include <arpa/inet.h>
-
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/fsm.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/abis_om2000.h>
-#include <openbsc/signal.h>
-#include <osmocom/abis/e1_input.h>
-
-/* FIXME: move to libosmocore */
-struct osmo_fsm_inst *osmo_fsm_inst_alloc_child_id(struct osmo_fsm *fsm,
- struct osmo_fsm_inst *parent,
- uint32_t parent_term_event,
- const char *id)
-{
- struct osmo_fsm_inst *fi;
-
- fi = osmo_fsm_inst_alloc(fsm, parent, NULL, parent->log_level,
- id ? id : parent->id);
- if (!fi) {
- /* indicate immediate termination to caller */
- osmo_fsm_inst_dispatch(parent, parent_term_event, NULL);
- return NULL;
- }
-
- LOGPFSM(fi, "is child of %s\n", osmo_fsm_inst_name(parent));
-
- fi->proc.parent = parent;
- fi->proc.parent_term_event = parent_term_event;
- llist_add(&fi->proc.child, &parent->proc.children);
-
- return fi;
-}
-
-
-#define OM_ALLOC_SIZE 1024
-#define OM_HEADROOM_SIZE 128
-
-#define OM2K_TIMEOUT 10
-#define TRX_FSM_TIMEOUT 60
-#define BTS_FSM_TIMEOUT 60
-
-/* use following functions from abis_nm.c:
- * om2k_msgb_alloc()
- * abis_om2k_sendmsg()
- */
-
-struct abis_om2k_hdr {
- struct abis_om_hdr om;
- uint16_t msg_type;
- struct abis_om2k_mo mo;
- uint8_t data[0];
-} __attribute__ ((packed));
-
-enum abis_om2k_msgtype {
- OM2K_MSGT_ABORT_SP_CMD = 0x0000,
- OM2K_MSGT_ABORT_SP_COMPL = 0x0002,
- OM2K_MSGT_ALARM_REP_ACK = 0x0004,
- OM2K_MSGT_ALARM_REP_NACK = 0x0005,
- OM2K_MSGT_ALARM_REP = 0x0006,
- OM2K_MSGT_ALARM_STATUS_REQ = 0x0008,
- OM2K_MSGT_ALARM_STATUS_REQ_ACK = 0x000a,
- OM2K_MSGT_ALARM_STATUS_REQ_REJ = 0x000b,
- OM2K_MSGT_ALARM_STATUS_RES_ACK = 0x000c,
- OM2K_MSGT_ALARM_STATUS_RES_NACK = 0x000d,
- OM2K_MSGT_ALARM_STATUS_RES = 0x000e,
- OM2K_MSGT_CAL_TIME_RESP = 0x0010,
- OM2K_MSGT_CAL_TIME_REJ = 0x0011,
- OM2K_MSGT_CAL_TIME_REQ = 0x0012,
-
- OM2K_MSGT_CON_CONF_REQ = 0x0014,
- OM2K_MSGT_CON_CONF_REQ_ACK = 0x0016,
- OM2K_MSGT_CON_CONF_REQ_REJ = 0x0017,
- OM2K_MSGT_CON_CONF_RES_ACK = 0x0018,
- OM2K_MSGT_CON_CONF_RES_NACK = 0x0019,
- OM2K_MSGT_CON_CONF_RES = 0x001a,
-
- OM2K_MSGT_CONNECT_CMD = 0x001c,
- OM2K_MSGT_CONNECT_COMPL = 0x001e,
- OM2K_MSGT_CONNECT_REJ = 0x001f,
-
- OM2K_MSGT_DISABLE_REQ = 0x0028,
- OM2K_MSGT_DISABLE_REQ_ACK = 0x002a,
- OM2K_MSGT_DISABLE_REQ_REJ = 0x002b,
- OM2K_MSGT_DISABLE_RES_ACK = 0x002c,
- OM2K_MSGT_DISABLE_RES_NACK = 0x002d,
- OM2K_MSGT_DISABLE_RES = 0x002e,
- OM2K_MSGT_DISCONNECT_CMD = 0x0030,
- OM2K_MSGT_DISCONNECT_COMPL = 0x0032,
- OM2K_MSGT_DISCONNECT_REJ = 0x0033,
- OM2K_MSGT_ENABLE_REQ = 0x0034,
- OM2K_MSGT_ENABLE_REQ_ACK = 0x0036,
- OM2K_MSGT_ENABLE_REQ_REJ = 0x0037,
- OM2K_MSGT_ENABLE_RES_ACK = 0x0038,
- OM2K_MSGT_ENABLE_RES_NACK = 0x0039,
- OM2K_MSGT_ENABLE_RES = 0x003a,
-
- OM2K_MSGT_FAULT_REP_ACK = 0x0040,
- OM2K_MSGT_FAULT_REP_NACK = 0x0041,
- OM2K_MSGT_FAULT_REP = 0x0042,
-
- OM2K_MSGT_IS_CONF_REQ = 0x0060,
- OM2K_MSGT_IS_CONF_REQ_ACK = 0x0062,
- OM2K_MSGT_IS_CONF_REQ_REJ = 0x0063,
- OM2K_MSGT_IS_CONF_RES_ACK = 0x0064,
- OM2K_MSGT_IS_CONF_RES_NACK = 0x0065,
- OM2K_MSGT_IS_CONF_RES = 0x0066,
-
- OM2K_MSGT_OP_INFO = 0x0074,
- OM2K_MSGT_OP_INFO_ACK = 0x0076,
- OM2K_MSGT_OP_INFO_REJ = 0x0077,
- OM2K_MSGT_RESET_CMD = 0x0078,
- OM2K_MSGT_RESET_COMPL = 0x007a,
- OM2K_MSGT_RESET_REJ = 0x007b,
- OM2K_MSGT_RX_CONF_REQ = 0x007c,
- OM2K_MSGT_RX_CONF_REQ_ACK = 0x007e,
- OM2K_MSGT_RX_CONF_REQ_REJ = 0x007f,
- OM2K_MSGT_RX_CONF_RES_ACK = 0x0080,
- OM2K_MSGT_RX_CONF_RES_NACK = 0x0081,
- OM2K_MSGT_RX_CONF_RES = 0x0082,
- OM2K_MSGT_START_REQ = 0x0084,
- OM2K_MSGT_START_REQ_ACK = 0x0086,
- OM2K_MSGT_START_REQ_REJ = 0x0087,
- OM2K_MSGT_START_RES_ACK = 0x0088,
- OM2K_MSGT_START_RES_NACK = 0x0089,
- OM2K_MSGT_START_RES = 0x008a,
- OM2K_MSGT_STATUS_REQ = 0x008c,
- OM2K_MSGT_STATUS_RESP = 0x008e,
- OM2K_MSGT_STATUS_REJ = 0x008f,
-
- OM2K_MSGT_TEST_REQ = 0x0094,
- OM2K_MSGT_TEST_REQ_ACK = 0x0096,
- OM2K_MSGT_TEST_REQ_REJ = 0x0097,
- OM2K_MSGT_TEST_RES_ACK = 0x0098,
- OM2K_MSGT_TEST_RES_NACK = 0x0099,
- OM2K_MSGT_TEST_RES = 0x009a,
-
- OM2K_MSGT_TF_CONF_REQ = 0x00a0,
- OM2K_MSGT_TF_CONF_REQ_ACK = 0x00a2,
- OM2K_MSGT_TF_CONF_REQ_REJ = 0x00a3,
- OM2K_MSGT_TF_CONF_RES_ACK = 0x00a4,
- OM2K_MSGT_TF_CONF_RES_NACK = 0x00a5,
- OM2K_MSGT_TF_CONF_RES = 0x00a6,
- OM2K_MSGT_TS_CONF_REQ = 0x00a8,
- OM2K_MSGT_TS_CONF_REQ_ACK = 0x00aa,
- OM2K_MSGT_TS_CONF_REQ_REJ = 0x00ab,
- OM2K_MSGT_TS_CONF_RES_ACK = 0x00ac,
- OM2K_MSGT_TS_CONF_RES_NACK = 0x00ad,
- OM2K_MSGT_TS_CONF_RES = 0x00ae,
- OM2K_MSGT_TX_CONF_REQ = 0x00b0,
- OM2K_MSGT_TX_CONF_REQ_ACK = 0x00b2,
- OM2K_MSGT_TX_CONF_REQ_REJ = 0x00b3,
- OM2K_MSGT_TX_CONF_RES_ACK = 0x00b4,
- OM2K_MSGT_TX_CONF_RES_NACK = 0x00b5,
- OM2K_MSGT_TX_CONF_RES = 0x00b6,
-
- OM2K_MSGT_CAPA_REQ = 0x00e8,
- OM2K_MSGT_CAPA_REQ_ACK = 0x00ea,
- OM2K_MSGT_CAPA_REQ_REJ = 0x00eb,
- OM2K_MSGT_CAPA_RES = 0x00ee,
- OM2K_MSGT_CAPA_RES_ACK = 0x00ec,
- OM2K_MSGT_CAPA_RES_NACK = 0x00ed,
-
- OM2K_MSGT_NEGOT_REQ_ACK = 0x0104,
- OM2K_MSGT_NEGOT_REQ_NACK = 0x0105,
- OM2K_MSGT_NEGOT_REQ = 0x0106,
-};
-
-enum abis_om2k_dei {
- OM2K_DEI_ACCORDANCE_IND = 0x00,
- OM2K_DEI_BCC = 0x06,
- OM2K_DEI_BS_AG_BKS_RES = 0x07,
- OM2K_DEI_BSIC = 0x09,
- OM2K_DEI_BA_PA_MFRMS = 0x0a,
- OM2K_DEI_CBCH_INDICATOR = 0x0b,
- OM2K_DEI_CCCH_OPTIONS = 0x0c,
- OM2K_DEI_CAL_TIME = 0x0d,
- OM2K_DEI_COMBINATION = 0x0f,
- OM2K_DEI_CON_CONN_LIST = 0x10,
- OM2K_DEI_DRX_DEV_MAX = 0x12,
- OM2K_DEI_END_LIST_NR = 0x13,
- OM2K_DEI_EXT_COND_MAP_1 = 0x14,
- OM2K_DEI_EXT_COND_MAP_2 = 0x15,
- OM2K_DEI_FILLING_MARKER = 0x1c,
- OM2K_DEI_FN_OFFSET = 0x1d,
- OM2K_DEI_FREQ_LIST = 0x1e,
- OM2K_DEI_FREQ_SPEC_RX = 0x1f,
- OM2K_DEI_FREQ_SPEC_TX = 0x20,
- OM2K_DEI_HSN = 0x21,
- OM2K_DEI_ICM_INDICATOR = 0x22,
- OM2K_DEI_INT_FAULT_MAP_1A = 0x23,
- OM2K_DEI_INT_FAULT_MAP_1B = 0x24,
- OM2K_DEI_INT_FAULT_MAP_2A = 0x25,
- OM2K_DEI_INT_FAULT_MAP_2A_EXT = 0x26,
- OM2K_DEI_IS_CONN_LIST = 0x27,
- OM2K_DEI_LIST_NR = 0x28,
- OM2K_DEI_LOCAL_ACCESS = 0x2a,
- OM2K_DEI_MAIO = 0x2b,
- OM2K_DEI_MO_STATE = 0x2c,
- OM2K_DEI_NY1 = 0x2d,
- OM2K_DEI_OP_INFO = 0x2e,
- OM2K_DEI_POWER = 0x2f,
- OM2K_DEI_REASON_CODE = 0x32,
- OM2K_DEI_RX_DIVERSITY = 0x33,
- OM2K_DEI_REPL_UNIT_MAP = 0x34,
- OM2K_DEI_RESULT_CODE = 0x35,
- OM2K_DEI_T3105 = 0x38,
- OM2K_DEI_TF_MODE = 0x3a,
- OM2K_DEI_TS_NR = 0x3c,
- OM2K_DEI_TSC = 0x3d,
- OM2K_DEI_BTS_VERSION = 0x40,
- OM2K_DEI_OML_IWD_VERSION = 0x41,
- OM2K_DEI_RSL_IWD_VERSION = 0x42,
- OM2K_DEI_OML_FUNC_MAP_1 = 0x43,
- OM2K_DEI_OML_FUNC_MAP_2 = 0x44,
- OM2K_DEI_RSL_FUNC_MAP_1 = 0x45,
- OM2K_DEI_RSL_FUNC_MAP_2 = 0x46,
- OM2K_DEI_EXT_RANGE = 0x47,
- OM2K_DEI_REQ_IND = 0x48,
- OM2K_DEI_REPL_UNIT_MAP_EXT = 0x50,
- OM2K_DEI_ICM_BOUND_PARAMS = 0x74,
- OM2K_DEI_LSC = 0x79,
- OM2K_DEI_LSC_FILT_TIME = 0x7a,
- OM2K_DEI_CALL_SUPV_TIME = 0x7b,
- OM2K_DEI_ICM_CHAN_RATE = 0x7e,
- OM2K_DEI_HW_INFO_SIG = 0x84,
- OM2K_DEI_TF_SYNC_SRC = 0x86,
- OM2K_DEI_TTA = 0x87,
- OM2K_DEI_CAPA_SIG = 0x8a,
- OM2K_DEI_NEGOT_REC1 = 0x90,
- OM2K_DEI_NEGOT_REC2 = 0x91,
- OM2K_DEI_ENCR_ALG = 0x92,
- OM2K_DEI_INTERF_REJ_COMB = 0x94,
- OM2K_DEI_FS_OFFSET = 0x98,
- OM2K_DEI_EXT_COND_MAP_2_EXT = 0x9c,
- OM2K_DEI_TSS_MO_STATE = 0x9d,
-};
-
-const struct tlv_definition om2k_att_tlvdef = {
- .def = {
- [OM2K_DEI_ACCORDANCE_IND] = { TLV_TYPE_TV },
- [OM2K_DEI_BCC] = { TLV_TYPE_TV },
- [OM2K_DEI_BS_AG_BKS_RES] = { TLV_TYPE_TV },
- [OM2K_DEI_BSIC] = { TLV_TYPE_TV },
- [OM2K_DEI_BA_PA_MFRMS] = { TLV_TYPE_TV },
- [OM2K_DEI_CBCH_INDICATOR] = { TLV_TYPE_TV },
- [OM2K_DEI_INT_FAULT_MAP_1A] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_INT_FAULT_MAP_1B] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_INT_FAULT_MAP_2A] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_INT_FAULT_MAP_2A_EXT]={ TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_CCCH_OPTIONS] = { TLV_TYPE_TV },
- [OM2K_DEI_CAL_TIME] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_COMBINATION] = { TLV_TYPE_TV },
- [OM2K_DEI_CON_CONN_LIST] = { TLV_TYPE_TLV },
- [OM2K_DEI_DRX_DEV_MAX] = { TLV_TYPE_TV },
- [OM2K_DEI_END_LIST_NR] = { TLV_TYPE_TV },
- [OM2K_DEI_EXT_COND_MAP_1] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_EXT_COND_MAP_2] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_FILLING_MARKER] = { TLV_TYPE_TV },
- [OM2K_DEI_FN_OFFSET] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_FREQ_LIST] = { TLV_TYPE_TLV },
- [OM2K_DEI_FREQ_SPEC_RX] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_FREQ_SPEC_TX] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_HSN] = { TLV_TYPE_TV },
- [OM2K_DEI_ICM_INDICATOR] = { TLV_TYPE_TV },
- [OM2K_DEI_IS_CONN_LIST] = { TLV_TYPE_TLV },
- [OM2K_DEI_LIST_NR] = { TLV_TYPE_TV },
- [OM2K_DEI_LOCAL_ACCESS] = { TLV_TYPE_TV },
- [OM2K_DEI_MAIO] = { TLV_TYPE_TV },
- [OM2K_DEI_MO_STATE] = { TLV_TYPE_TV },
- [OM2K_DEI_NY1] = { TLV_TYPE_TV },
- [OM2K_DEI_OP_INFO] = { TLV_TYPE_TV },
- [OM2K_DEI_POWER] = { TLV_TYPE_TV },
- [OM2K_DEI_REASON_CODE] = { TLV_TYPE_TV },
- [OM2K_DEI_RX_DIVERSITY] = { TLV_TYPE_TV },
- [OM2K_DEI_RESULT_CODE] = { TLV_TYPE_TV },
- [OM2K_DEI_T3105] = { TLV_TYPE_TV },
- [OM2K_DEI_TF_MODE] = { TLV_TYPE_TV },
- [OM2K_DEI_TS_NR] = { TLV_TYPE_TV },
- [OM2K_DEI_TSC] = { TLV_TYPE_TV },
- [OM2K_DEI_BTS_VERSION] = { TLV_TYPE_FIXED, 12 },
- [OM2K_DEI_OML_IWD_VERSION] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_RSL_IWD_VERSION] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_OML_FUNC_MAP_1] = { TLV_TYPE_TLV },
- [OM2K_DEI_OML_FUNC_MAP_2] = { TLV_TYPE_TLV },
- [OM2K_DEI_RSL_FUNC_MAP_1] = { TLV_TYPE_TLV },
- [OM2K_DEI_RSL_FUNC_MAP_2] = { TLV_TYPE_TLV },
- [OM2K_DEI_EXT_RANGE] = { TLV_TYPE_TV },
- [OM2K_DEI_REQ_IND] = { TLV_TYPE_TV },
- [OM2K_DEI_REPL_UNIT_MAP] = { TLV_TYPE_FIXED, 6 },
- [OM2K_DEI_REPL_UNIT_MAP_EXT] = {TLV_TYPE_FIXED, 6},
- [OM2K_DEI_ICM_BOUND_PARAMS] = { TLV_TYPE_FIXED, 5 },
- [OM2K_DEI_LSC] = { TLV_TYPE_TV },
- [OM2K_DEI_LSC_FILT_TIME] = { TLV_TYPE_TV },
- [OM2K_DEI_CALL_SUPV_TIME] = { TLV_TYPE_TV },
- [OM2K_DEI_ICM_CHAN_RATE] = { TLV_TYPE_TV },
- [OM2K_DEI_HW_INFO_SIG] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_TF_SYNC_SRC] = { TLV_TYPE_TV },
- [OM2K_DEI_TTA] = { TLV_TYPE_TV },
- [OM2K_DEI_CAPA_SIG] = { TLV_TYPE_FIXED, 2 },
- [OM2K_DEI_NEGOT_REC1] = { TLV_TYPE_TLV },
- [OM2K_DEI_NEGOT_REC2] = { TLV_TYPE_TLV },
- [OM2K_DEI_ENCR_ALG] = { TLV_TYPE_TV },
- [OM2K_DEI_INTERF_REJ_COMB] = { TLV_TYPE_TV },
- [OM2K_DEI_FS_OFFSET] = { TLV_TYPE_FIXED, 5 },
- [OM2K_DEI_EXT_COND_MAP_2_EXT] = { TLV_TYPE_FIXED, 4 },
- [OM2K_DEI_TSS_MO_STATE] = { TLV_TYPE_FIXED, 4 },
- },
-};
-
-static const struct value_string om2k_msgcode_vals[] = {
- { 0x0000, "Abort SP Command" },
- { 0x0002, "Abort SP Complete" },
- { 0x0004, "Alarm Report ACK" },
- { 0x0005, "Alarm Report NACK" },
- { 0x0006, "Alarm Report" },
- { 0x0008, "Alarm Status Request" },
- { 0x000a, "Alarm Status Request Accept" },
- { 0x000b, "Alarm Status Request Reject" },
- { 0x000c, "Alarm Status Result ACK" },
- { 0x000d, "Alarm Status Result NACK" },
- { 0x000e, "Alarm Status Result" },
- { 0x0010, "Calendar Time Response" },
- { 0x0011, "Calendar Time Reject" },
- { 0x0012, "Calendar Time Request" },
- { 0x0014, "CON Configuration Request" },
- { 0x0016, "CON Configuration Request Accept" },
- { 0x0017, "CON Configuration Request Reject" },
- { 0x0018, "CON Configuration Result ACK" },
- { 0x0019, "CON Configuration Result NACK" },
- { 0x001a, "CON Configuration Result" },
- { 0x001c, "Connect Command" },
- { 0x001e, "Connect Complete" },
- { 0x001f, "Connect Reject" },
- { 0x0028, "Disable Request" },
- { 0x002a, "Disable Request Accept" },
- { 0x002b, "Disable Request Reject" },
- { 0x002c, "Disable Result ACK" },
- { 0x002d, "Disable Result NACK" },
- { 0x002e, "Disable Result" },
- { 0x0030, "Disconnect Command" },
- { 0x0032, "Disconnect Complete" },
- { 0x0033, "Disconnect Reject" },
- { 0x0034, "Enable Request" },
- { 0x0036, "Enable Request Accept" },
- { 0x0037, "Enable Request Reject" },
- { 0x0038, "Enable Result ACK" },
- { 0x0039, "Enable Result NACK" },
- { 0x003a, "Enable Result" },
- { 0x003c, "Escape Downlink Normal" },
- { 0x003d, "Escape Downlink NACK" },
- { 0x003e, "Escape Uplink Normal" },
- { 0x003f, "Escape Uplink NACK" },
- { 0x0040, "Fault Report ACK" },
- { 0x0041, "Fault Report NACK" },
- { 0x0042, "Fault Report" },
- { 0x0044, "File Package End Command" },
- { 0x0046, "File Package End Result" },
- { 0x0047, "File Package End Reject" },
- { 0x0048, "File Relation Request" },
- { 0x004a, "File Relation Response" },
- { 0x004b, "File Relation Request Reject" },
- { 0x004c, "File Segment Transfer" },
- { 0x004e, "File Segment Transfer Complete" },
- { 0x004f, "File Segment Transfer Reject" },
- { 0x0050, "HW Information Request" },
- { 0x0052, "HW Information Request Accept" },
- { 0x0053, "HW Information Request Reject" },
- { 0x0054, "HW Information Result ACK" },
- { 0x0055, "HW Information Result NACK" },
- { 0x0056, "HW Information Result" },
- { 0x0060, "IS Configuration Request" },
- { 0x0062, "IS Configuration Request Accept" },
- { 0x0063, "IS Configuration Request Reject" },
- { 0x0064, "IS Configuration Result ACK" },
- { 0x0065, "IS Configuration Result NACK" },
- { 0x0066, "IS Configuration Result" },
- { 0x0068, "Load Data End" },
- { 0x006a, "Load Data End Result" },
- { 0x006b, "Load Data End Reject" },
- { 0x006c, "Load Data Init" },
- { 0x006e, "Load Data Init Accept" },
- { 0x006f, "Load Data Init Reject" },
- { 0x0070, "Loop Control Command" },
- { 0x0072, "Loop Control Complete" },
- { 0x0073, "Loop Control Reject" },
- { 0x0074, "Operational Information" },
- { 0x0076, "Operational Information Accept" },
- { 0x0077, "Operational Information Reject" },
- { 0x0078, "Reset Command" },
- { 0x007a, "Reset Complete" },
- { 0x007b, "Reset Reject" },
- { 0x007c, "RX Configuration Request" },
- { 0x007e, "RX Configuration Request Accept" },
- { 0x007f, "RX Configuration Request Reject" },
- { 0x0080, "RX Configuration Result ACK" },
- { 0x0081, "RX Configuration Result NACK" },
- { 0x0082, "RX Configuration Result" },
- { 0x0084, "Start Request" },
- { 0x0086, "Start Request Accept" },
- { 0x0087, "Start Request Reject" },
- { 0x0088, "Start Result ACK" },
- { 0x0089, "Start Result NACK" },
- { 0x008a, "Start Result" },
- { 0x008c, "Status Request" },
- { 0x008e, "Status Response" },
- { 0x008f, "Status Reject" },
- { 0x0094, "Test Request" },
- { 0x0096, "Test Request Accept" },
- { 0x0097, "Test Request Reject" },
- { 0x0098, "Test Result ACK" },
- { 0x0099, "Test Result NACK" },
- { 0x009a, "Test Result" },
- { 0x00a0, "TF Configuration Request" },
- { 0x00a2, "TF Configuration Request Accept" },
- { 0x00a3, "TF Configuration Request Reject" },
- { 0x00a4, "TF Configuration Result ACK" },
- { 0x00a5, "TF Configuration Result NACK" },
- { 0x00a6, "TF Configuration Result" },
- { 0x00a8, "TS Configuration Request" },
- { 0x00aa, "TS Configuration Request Accept" },
- { 0x00ab, "TS Configuration Request Reject" },
- { 0x00ac, "TS Configuration Result ACK" },
- { 0x00ad, "TS Configuration Result NACK" },
- { 0x00ae, "TS Configuration Result" },
- { 0x00b0, "TX Configuration Request" },
- { 0x00b2, "TX Configuration Request Accept" },
- { 0x00b3, "TX Configuration Request Reject" },
- { 0x00b4, "TX Configuration Result ACK" },
- { 0x00b5, "TX Configuration Result NACK" },
- { 0x00b6, "TX Configuration Result" },
- { 0x00bc, "DIP Alarm Report ACK" },
- { 0x00bd, "DIP Alarm Report NACK" },
- { 0x00be, "DIP Alarm Report" },
- { 0x00c0, "DIP Alarm Status Request" },
- { 0x00c2, "DIP Alarm Status Response" },
- { 0x00c3, "DIP Alarm Status Reject" },
- { 0x00c4, "DIP Quality Report I ACK" },
- { 0x00c5, "DIP Quality Report I NACK" },
- { 0x00c6, "DIP Quality Report I" },
- { 0x00c8, "DIP Quality Report II ACK" },
- { 0x00c9, "DIP Quality Report II NACK" },
- { 0x00ca, "DIP Quality Report II" },
- { 0x00dc, "DP Configuration Request" },
- { 0x00de, "DP Configuration Request Accept" },
- { 0x00df, "DP Configuration Request Reject" },
- { 0x00e0, "DP Configuration Result ACK" },
- { 0x00e1, "DP Configuration Result NACK" },
- { 0x00e2, "DP Configuration Result" },
- { 0x00e4, "Capabilities HW Info Report ACK" },
- { 0x00e5, "Capabilities HW Info Report NACK" },
- { 0x00e6, "Capabilities HW Info Report" },
- { 0x00e8, "Capabilities Request" },
- { 0x00ea, "Capabilities Request Accept" },
- { 0x00eb, "Capabilities Request Reject" },
- { 0x00ec, "Capabilities Result ACK" },
- { 0x00ed, "Capabilities Result NACK" },
- { 0x00ee, "Capabilities Result" },
- { 0x00f0, "FM Configuration Request" },
- { 0x00f2, "FM Configuration Request Accept" },
- { 0x00f3, "FM Configuration Request Reject" },
- { 0x00f4, "FM Configuration Result ACK" },
- { 0x00f5, "FM Configuration Result NACK" },
- { 0x00f6, "FM Configuration Result" },
- { 0x00f8, "FM Report Request" },
- { 0x00fa, "FM Report Response" },
- { 0x00fb, "FM Report Reject" },
- { 0x00fc, "FM Start Command" },
- { 0x00fe, "FM Start Complete" },
- { 0x00ff, "FM Start Reject" },
- { 0x0100, "FM Stop Command" },
- { 0x0102, "FM Stop Complete" },
- { 0x0103, "FM Stop Reject" },
- { 0x0104, "Negotiation Request ACK" },
- { 0x0105, "Negotiation Request NACK" },
- { 0x0106, "Negotiation Request" },
- { 0x0108, "BTS Initiated Request ACK" },
- { 0x0109, "BTS Initiated Request NACK" },
- { 0x010a, "BTS Initiated Request" },
- { 0x010c, "Radio Channels Release Command" },
- { 0x010e, "Radio Channels Release Complete" },
- { 0x010f, "Radio Channels Release Reject" },
- { 0x0118, "Feature Control Command" },
- { 0x011a, "Feature Control Complete" },
- { 0x011b, "Feature Control Reject" },
-
- { 0, NULL }
-};
-
-/* TS 12.21 Section 9.4: Attributes */
-static const struct value_string om2k_attr_vals[] = {
- { 0x00, "Accordance indication" },
- { 0x01, "Alarm Id" },
- { 0x02, "Alarm Data" },
- { 0x03, "Alarm Severity" },
- { 0x04, "Alarm Status" },
- { 0x05, "Alarm Status Type" },
- { 0x06, "BCC" },
- { 0x07, "BS_AG_BKS_RES" },
- { 0x09, "BSIC" },
- { 0x0a, "BA_PA_MFRMS" },
- { 0x0b, "CBCH Indicator" },
- { 0x0c, "CCCH Options" },
- { 0x0d, "Calendar Time" },
- { 0x0f, "Channel Combination" },
- { 0x10, "CON Connection List" },
- { 0x11, "Data End Indication" },
- { 0x12, "DRX_DEV_MAX" },
- { 0x13, "End List Number" },
- { 0x14, "External Condition Map Class 1" },
- { 0x15, "External Condition Map Class 2" },
- { 0x16, "File Relation Indication" },
- { 0x17, "File Revision" },
- { 0x18, "File Segment Data" },
- { 0x19, "File Segment Length" },
- { 0x1a, "File Segment Sequence Number" },
- { 0x1b, "File Size" },
- { 0x1c, "Filling Marker" },
- { 0x1d, "FN Offset" },
- { 0x1e, "Frequency List" },
- { 0x1f, "Frequency Specifier RX" },
- { 0x20, "Frequency Specifier TX" },
- { 0x21, "HSN" },
- { 0x22, "ICM Indicator" },
- { 0x23, "Internal Fault Map Class 1A" },
- { 0x24, "Internal Fault Map Class 1B" },
- { 0x25, "Internal Fault Map Class 2A" },
- { 0x26, "Internal Fault Map Class 2A Extension" },
- { 0x27, "IS Connection List" },
- { 0x28, "List Number" },
- { 0x29, "File Package State Indication" },
- { 0x2a, "Local Access State" },
- { 0x2b, "MAIO" },
- { 0x2c, "MO State" },
- { 0x2d, "Ny1" },
- { 0x2e, "Operational Information" },
- { 0x2f, "Power" },
- { 0x30, "RU Position Data" },
- { 0x31, "Protocol Error" },
- { 0x32, "Reason Code" },
- { 0x33, "Receiver Diversity" },
- { 0x34, "Replacement Unit Map" },
- { 0x35, "Result Code" },
- { 0x36, "RU Revision Data" },
- { 0x38, "T3105" },
- { 0x39, "Test Loop Setting" },
- { 0x3a, "TF Mode" },
- { 0x3b, "TF Compensation Value" },
- { 0x3c, "Time Slot Number" },
- { 0x3d, "TSC" },
- { 0x3e, "RU Logical Id" },
- { 0x3f, "RU Serial Number Data" },
- { 0x40, "BTS Version" },
- { 0x41, "OML IWD Version" },
- { 0x42, "RWL IWD Version" },
- { 0x43, "OML Function Map 1" },
- { 0x44, "OML Function Map 2" },
- { 0x45, "RSL Function Map 1" },
- { 0x46, "RSL Function Map 2" },
- { 0x47, "Extended Range Indicator" },
- { 0x48, "Request Indicators" },
- { 0x49, "DIP Alarm Condition Map" },
- { 0x4a, "ES Incoming" },
- { 0x4b, "ES Outgoing" },
- { 0x4e, "SES Incoming" },
- { 0x4f, "SES Outgoing" },
- { 0x50, "Replacement Unit Map Extension" },
- { 0x52, "UAS Incoming" },
- { 0x53, "UAS Outgoing" },
- { 0x58, "DF Incoming" },
- { 0x5a, "DF Outgoing" },
- { 0x5c, "SF" },
- { 0x60, "S Bits Setting" },
- { 0x61, "CRC-4 Use Option" },
- { 0x62, "T Parameter" },
- { 0x63, "N Parameter" },
- { 0x64, "N1 Parameter" },
- { 0x65, "N3 Parameter" },
- { 0x66, "N4 Parameter" },
- { 0x67, "P Parameter" },
- { 0x68, "Q Parameter" },
- { 0x69, "BI_Q1" },
- { 0x6a, "BI_Q2" },
- { 0x74, "ICM Boundary Parameters" },
- { 0x77, "AFT" },
- { 0x78, "AFT RAI" },
- { 0x79, "Link Supervision Control" },
- { 0x7a, "Link Supervision Filtering Time" },
- { 0x7b, "Call Supervision Time" },
- { 0x7c, "Interval Length UAS Incoming" },
- { 0x7d, "Interval Length UAS Outgoing" },
- { 0x7e, "ICM Channel Rate" },
- { 0x7f, "Attribute Identifier" },
- { 0x80, "FM Frequency List" },
- { 0x81, "FM Frequency Report" },
- { 0x82, "FM Percentile" },
- { 0x83, "FM Clear Indication" },
- { 0x84, "HW Info Signature" },
- { 0x85, "MO Record" },
- { 0x86, "TF Synchronisation Source" },
- { 0x87, "TTA" },
- { 0x88, "End Segment Number" },
- { 0x89, "Segment Number" },
- { 0x8a, "Capabilities Signature" },
- { 0x8c, "File Relation List" },
- { 0x90, "Negotiation Record I" },
- { 0x91, "Negotiation Record II" },
- { 0x92, "Encryption Algorithm" },
- { 0x94, "Interference Rejection Combining" },
- { 0x95, "Dedication Information" },
- { 0x97, "Feature Code" },
- { 0x98, "FS Offset" },
- { 0x99, "ESB Timeslot" },
- { 0x9a, "Master TG Instance" },
- { 0x9b, "Master TX Chain Delay" },
- { 0x9c, "External Condition Class 2 Extension" },
- { 0x9d, "TSs MO State" },
- { 0, NULL }
-};
-
-const struct value_string om2k_mo_class_short_vals[] = {
- { 0x01, "TRXC" },
- { 0x03, "TS" },
- { 0x04, "TF" },
- { 0x05, "IS" },
- { 0x06, "CON" },
- { 0x07, "DP" },
- { 0x0a, "CF" },
- { 0x0b, "TX" },
- { 0x0c, "RX" },
- { 0, NULL }
-};
-
-const struct value_string om2k_result_strings[] = {
- { 0x02, "Wrong state or out of sequence" },
- { 0x03, "File error" },
- { 0x04, "Fault, unspecified" },
- { 0x05, "Tuning fault" },
- { 0x06, "Protocol error" },
- { 0x07, "MO not connected" },
- { 0x08, "Parameter error" },
- { 0x09, "Optional function not supported" },
- { 0x0a, "Local access state LOCALLY DISCONNECTED" },
- { 0, NULL }
-};
-
-const struct value_string om2k_accordance_strings[] = {
- { 0x00, "Data according to request" },
- { 0x01, "Data not according to request" },
- { 0x02, "Inconsistent MO data" },
- { 0x03, "Capability constraint violation" },
- { 0, NULL }
-};
-
-const struct value_string om2k_mostate_vals[] = {
- { 0x00, "RESET" },
- { 0x01, "STARTED" },
- { 0x02, "ENABLED" },
- { 0x03, "DISABLED" },
- { 0, NULL }
-};
-
-/* entire decoded OM2K message (header + parsed TLV) */
-struct om2k_decoded_msg {
- struct abis_om2k_hdr o2h;
- uint16_t msg_type;
- struct tlv_parsed tp;
-};
-
-/* resolve the OM2000 Managed Object by BTS + MO Address */
-static struct om2k_mo *
-get_om2k_mo(struct gsm_bts *bts, const struct abis_om2k_mo *abis_mo)
-{
- struct om2k_mo *mo = NULL;
- struct gsm_bts_trx *trx;
-
- switch (abis_mo->class) {
- case OM2K_MO_CLS_CF:
- mo = &bts->rbs2000.cf.om2k_mo;
- break;
- case OM2K_MO_CLS_CON:
- mo = &bts->rbs2000.con.om2k_mo;
- break;
- case OM2K_MO_CLS_IS:
- mo = &bts->rbs2000.is.om2k_mo;
- break;
- case OM2K_MO_CLS_TF:
- mo = &bts->rbs2000.tf.om2k_mo;
- break;
-
- case OM2K_MO_CLS_TRXC:
- trx = gsm_bts_trx_num(bts, abis_mo->inst);
- if (!trx)
- return NULL;
- mo = &trx->rbs2000.trxc.om2k_mo;
- break;
- case OM2K_MO_CLS_TX:
- trx = gsm_bts_trx_num(bts, abis_mo->inst);
- if (!trx)
- return NULL;
- mo = &trx->rbs2000.tx.om2k_mo;
- break;
- case OM2K_MO_CLS_RX:
- trx = gsm_bts_trx_num(bts, abis_mo->inst);
- if (!trx)
- return NULL;
- mo = &trx->rbs2000.rx.om2k_mo;
- break;
- case OM2K_MO_CLS_TS:
- trx = gsm_bts_trx_num(bts, abis_mo->assoc_so);
- if (!trx)
- return NULL;
- if (abis_mo->inst >= ARRAY_SIZE(trx->ts))
- return NULL;
- mo = &trx->ts[abis_mo->inst].rbs2000.om2k_mo;
- break;
- default:
- return NULL;
- };
-
- return mo;
-}
-
-static struct msgb *om2k_msgb_alloc(void)
-{
- return msgb_alloc_headroom(OM_ALLOC_SIZE, OM_HEADROOM_SIZE,
- "OM2000");
-}
-
-static int abis_om2k_tlv_parse(struct tlv_parsed *tp, const uint8_t *buf, int len)
-{
- return tlv_parse(tp, &om2k_att_tlvdef, buf, len, 0, 0);
-}
-
-static int abis_om2k_msg_tlv_parse(struct tlv_parsed *tp, struct abis_om2k_hdr *oh)
-{
- return abis_om2k_tlv_parse(tp, oh->data, oh->om.length - 6);
-}
-
-/* decode/parse the message */
-static int om2k_decode_msg(struct om2k_decoded_msg *odm, struct msgb *msg)
-{
- struct abis_om2k_hdr *o2h = msgb_l2(msg);
- odm->msg_type = ntohs(o2h->msg_type);
- odm->o2h = *o2h;
- return abis_om2k_msg_tlv_parse(&odm->tp, o2h);
-}
-
-static char *om2k_mo_name(const struct abis_om2k_mo *mo)
-{
- static char mo_buf[64];
-
- memset(mo_buf, 0, sizeof(mo_buf));
- snprintf(mo_buf, sizeof(mo_buf), "%s/%02x/%02x/%02x",
- get_value_string(om2k_mo_class_short_vals, mo->class),
- mo->bts, mo->assoc_so, mo->inst);
- return mo_buf;
-}
-
-/* resolve the gsm_nm_state data structure for a given MO */
-static struct gsm_nm_state *
-mo2nm_state(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- struct gsm_bts_trx *trx;
- struct gsm_nm_state *nm_state = NULL;
-
- switch (mo->class) {
- case OM2K_MO_CLS_TRXC:
- trx = gsm_bts_trx_num(bts, mo->inst);
- if (!trx)
- return NULL;
- nm_state = &trx->mo.nm_state;
- break;
- case OM2K_MO_CLS_TS:
- trx = gsm_bts_trx_num(bts, mo->assoc_so);
- if (!trx)
- return NULL;
- if (mo->inst >= ARRAY_SIZE(trx->ts))
- return NULL;
- nm_state = &trx->ts[mo->inst].mo.nm_state;
- break;
- case OM2K_MO_CLS_TF:
- nm_state = &bts->rbs2000.tf.mo.nm_state;
- break;
- case OM2K_MO_CLS_IS:
- nm_state = &bts->rbs2000.is.mo.nm_state;
- break;
- case OM2K_MO_CLS_CON:
- nm_state = &bts->rbs2000.con.mo.nm_state;
- break;
- case OM2K_MO_CLS_DP:
- nm_state = &bts->rbs2000.con.mo.nm_state;
- break;
- case OM2K_MO_CLS_CF:
- nm_state = &bts->mo.nm_state;
- break;
- case OM2K_MO_CLS_TX:
- trx = gsm_bts_trx_num(bts, mo->inst);
- if (!trx)
- return NULL;
- /* FIXME */
- break;
- case OM2K_MO_CLS_RX:
- trx = gsm_bts_trx_num(bts, mo->inst);
- if (!trx)
- return NULL;
- /* FIXME */
- break;
- }
-
- return nm_state;
-}
-
-static void *mo2obj(struct gsm_bts *bts, struct abis_om2k_mo *mo)
-{
- struct gsm_bts_trx *trx;
-
- switch (mo->class) {
- case OM2K_MO_CLS_TX:
- case OM2K_MO_CLS_RX:
- case OM2K_MO_CLS_TRXC:
- return gsm_bts_trx_num(bts, mo->inst);
- case OM2K_MO_CLS_TS:
- trx = gsm_bts_trx_num(bts, mo->assoc_so);
- if (!trx)
- return NULL;
- if (mo->inst >= ARRAY_SIZE(trx->ts))
- return NULL;
- return &trx->ts[mo->inst];
- case OM2K_MO_CLS_TF:
- case OM2K_MO_CLS_IS:
- case OM2K_MO_CLS_CON:
- case OM2K_MO_CLS_DP:
- case OM2K_MO_CLS_CF:
- return bts;
- }
-
- return NULL;
-}
-
-static void update_mo_state(struct gsm_bts *bts, struct abis_om2k_mo *mo,
- uint8_t mo_state)
-{
- struct gsm_nm_state *nm_state = mo2nm_state(bts, mo);
- struct gsm_nm_state new_state;
- struct nm_statechg_signal_data nsd;
-
- if (!nm_state)
- return;
-
- new_state = *nm_state;
- /* NOTICE: 12.21 Availability state values != OM2000 */
- new_state.availability = mo_state;
-
- memset(&nsd, 0, sizeof(nsd));
-
- nsd.bts = bts;
- nsd.obj = mo2obj(bts, mo);
- nsd.old_state = nm_state;
- nsd.new_state = &new_state;
- nsd.om2k_mo = mo;
-
- osmo_signal_dispatch(SS_NM, S_NM_STATECHG_ADM, &nsd);
-
- nm_state->availability = new_state.availability;
-}
-
-static void update_op_state(struct gsm_bts *bts, const struct abis_om2k_mo *mo,
- uint8_t op_state)
-{
- struct gsm_nm_state *nm_state = mo2nm_state(bts, mo);
- struct gsm_nm_state new_state;
-
- if (!nm_state)
- return;
-
- new_state = *nm_state;
- switch (op_state) {
- case 1:
- new_state.operational = NM_OPSTATE_ENABLED;
- break;
- case 0:
- new_state.operational = NM_OPSTATE_DISABLED;
- break;
- default:
- new_state.operational = NM_OPSTATE_NULL;
- break;
- }
-
- nm_state->operational = new_state.operational;
-}
-
-static int abis_om2k_sendmsg(struct gsm_bts *bts, struct msgb *msg)
-{
- struct abis_om2k_hdr *o2h;
- struct gsm_bts_trx *trx;
-
- msg->l2h = msg->data;
- o2h = (struct abis_om2k_hdr *) msg->l2h;
-
- /* Compute the length in the OML header */
- o2h->om.length = 6 + msgb_l2len(msg)-sizeof(*o2h);
-
- switch (o2h->mo.class) {
- case OM2K_MO_CLS_TRXC:
- case OM2K_MO_CLS_TX:
- case OM2K_MO_CLS_RX:
- /* Route through per-TRX OML Link to the appropriate TRX */
- trx = gsm_bts_trx_by_nr(bts, o2h->mo.inst);
- if (!trx) {
- LOGP(DNM, LOGL_ERROR, "MO=%s Tx Dropping msg to "
- "non-existing TRX\n", om2k_mo_name(&o2h->mo));
- return -ENODEV;
- }
- msg->dst = trx->oml_link;
- break;
- case OM2K_MO_CLS_TS:
- /* Route through per-TRX OML Link to the appropriate TRX */
- trx = gsm_bts_trx_by_nr(bts, o2h->mo.assoc_so);
- if (!trx) {
- LOGP(DNM, LOGL_ERROR, "MO=%s Tx Dropping msg to "
- "non-existing TRX\n", om2k_mo_name(&o2h->mo));
- return -ENODEV;
- }
- msg->dst = trx->oml_link;
- break;
- default:
- /* Route through the IXU/DXU OML Link */
- msg->dst = bts->oml_link;
- break;
- }
-
- return _abis_nm_sendmsg(msg);
-}
-
-static void fill_om2k_hdr(struct abis_om2k_hdr *o2h, const struct abis_om2k_mo *mo,
- uint16_t msg_type)
-{
- o2h->om.mdisc = ABIS_OM_MDISC_FOM;
- o2h->om.placement = ABIS_OM_PLACEMENT_ONLY;
- o2h->om.sequence = 0;
- /* We fill o2h->om.length later during om2k_sendmsg() */
- o2h->msg_type = htons(msg_type);
- memcpy(&o2h->mo, mo, sizeof(o2h->mo));
-}
-
-static int abis_om2k_cal_time_resp(struct gsm_bts *bts)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- time_t tm_t;
- struct tm *tm;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &bts->rbs2000.cf.om2k_mo.addr,
- OM2K_MSGT_CAL_TIME_RESP);
-
- tm_t = time(NULL);
- tm = localtime(&tm_t);
-
- msgb_put_u8(msg, OM2K_DEI_CAL_TIME);
- msgb_put_u8(msg, tm->tm_year % 100);
- msgb_put_u8(msg, tm->tm_mon + 1);
- msgb_put_u8(msg, tm->tm_mday);
- msgb_put_u8(msg, tm->tm_hour);
- msgb_put_u8(msg, tm->tm_min);
- msgb_put_u8(msg, tm->tm_sec);
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-static int abis_om2k_tx_simple(struct gsm_bts *bts, const struct abis_om2k_mo *mo,
- uint8_t msg_type)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, mo, msg_type);
-
- DEBUGP(DNM, "Tx MO=%s %s\n", om2k_mo_name(mo),
- get_value_string(om2k_msgcode_vals, msg_type));
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-int abis_om2k_tx_reset_cmd(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_RESET_CMD);
-}
-
-int abis_om2k_tx_start_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_START_REQ);
-}
-
-int abis_om2k_tx_status_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_STATUS_REQ);
-}
-
-int abis_om2k_tx_connect_cmd(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_CONNECT_CMD);
-}
-
-int abis_om2k_tx_disconnect_cmd(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_DISCONNECT_CMD);
-}
-
-int abis_om2k_tx_test_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_TEST_REQ);
-}
-
-int abis_om2k_tx_enable_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_ENABLE_REQ);
-}
-
-int abis_om2k_tx_disable_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_DISABLE_REQ);
-}
-
-int abis_om2k_tx_op_info(struct gsm_bts *bts, const struct abis_om2k_mo *mo,
- uint8_t operational)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, mo, OM2K_MSGT_OP_INFO);
-
- msgb_tv_put(msg, OM2K_DEI_OP_INFO, operational);
-
- DEBUGP(DNM, "Tx MO=%s %s\n", om2k_mo_name(mo),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_OP_INFO));
-
- /* we update the state here... and send the signal at ACK */
- update_op_state(bts, mo, operational);
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-int abis_om2k_tx_cap_req(struct gsm_bts *bts, const struct abis_om2k_mo *mo)
-{
- return abis_om2k_tx_simple(bts, mo, OM2K_MSGT_CAPA_REQ);
-}
-
-static void om2k_fill_is_conn_grp(struct om2k_is_conn_grp *grp, uint16_t icp1,
- uint16_t icp2, uint8_t cont_idx)
-{
- grp->icp1 = htons(icp1);
- grp->icp2 = htons(icp2);
- grp->cont_idx = cont_idx;
-}
-
-int abis_om2k_tx_is_conf_req(struct gsm_bts *bts)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- struct is_conn_group *grp;
- unsigned int num_grps = 0, i = 0;
- struct om2k_is_conn_grp *cg;
-
- /* count number of groups in linked list */
- llist_for_each_entry(grp, &bts->rbs2000.is.conn_groups, list)
- num_grps++;
-
- if (!num_grps)
- return -EINVAL;
-
- /* allocate buffer for oml group array */
- cg = talloc_zero_array(bts, struct om2k_is_conn_grp, num_grps);
-
- /* fill array with data from linked list */
- llist_for_each_entry(grp, &bts->rbs2000.is.conn_groups, list)
- om2k_fill_is_conn_grp(&cg[i++], grp->icp1, grp->icp2, grp->ci);
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &bts->rbs2000.is.om2k_mo.addr,
- OM2K_MSGT_IS_CONF_REQ);
-
- msgb_tv_put(msg, OM2K_DEI_LIST_NR, 1);
- msgb_tv_put(msg, OM2K_DEI_END_LIST_NR, 1);
-
- msgb_tlv_put(msg, OM2K_DEI_IS_CONN_LIST,
- num_grps * sizeof(*cg), (uint8_t *)cg);
-
- talloc_free(cg);
-
- DEBUGP(DNM, "Tx MO=%s %s\n",
- om2k_mo_name(&bts->rbs2000.is.om2k_mo.addr),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_IS_CONF_REQ));
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-int abis_om2k_tx_con_conf_req(struct gsm_bts *bts)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- struct con_group *grp;
- unsigned int num_grps = 0;
-
- /* count number of groups in linked list */
- llist_for_each_entry(grp, &bts->rbs2000.con.conn_groups, list)
- num_grps++;
-
- if (!num_grps)
- return -EINVAL;
-
- /* first build the value part of the OM2K_DEI_CON_CONN_LIST DEI */
- msgb_put_u8(msg, num_grps);
- llist_for_each_entry(grp, &bts->rbs2000.con.conn_groups, list) {
- struct con_path *cp;
- unsigned int num_paths = 0;
- llist_for_each_entry(cp, &grp->paths, list)
- num_paths++;
- msgb_put_u8(msg, num_paths);
- llist_for_each_entry(cp, &grp->paths, list) {
- struct om2k_con_path *om2k_cp;
- om2k_cp = (struct om2k_con_path *) msgb_put(msg, sizeof(*om2k_cp));
- om2k_cp->ccp = htons(cp->ccp);
- om2k_cp->ci = cp->ci;
- om2k_cp->tag = cp->tag;
- om2k_cp->tei = cp->tei;
- }
- }
- msgb_push_u8(msg, msgb_length(msg));
- msgb_push_u8(msg, OM2K_DEI_CON_CONN_LIST);
-
- /* pre-pend the list number DEIs */
- msgb_tv_push(msg, OM2K_DEI_END_LIST_NR, 1);
- msgb_tv_push(msg, OM2K_DEI_LIST_NR, 1);
-
- /* pre-pend the OM2K header */
- o2k = (struct abis_om2k_hdr *) msgb_push(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &bts->rbs2000.con.om2k_mo.addr,
- OM2K_MSGT_CON_CONF_REQ);
-
- DEBUGP(DNM, "Tx MO=%s %s\n",
- om2k_mo_name(&bts->rbs2000.con.om2k_mo.addr),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_CON_CONF_REQ));
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-static void om2k_trx_to_mo(struct abis_om2k_mo *mo,
- const struct gsm_bts_trx *trx,
- enum abis_om2k_mo_cls cls)
-{
- mo->class = cls;
- mo->bts = 0;
- mo->inst = trx->nr;
- mo->assoc_so = 255;
-}
-
-static void om2k_ts_to_mo(struct abis_om2k_mo *mo,
- const struct gsm_bts_trx_ts *ts)
-{
- mo->class = OM2K_MO_CLS_TS;
- mo->bts = 0;
- mo->inst = ts->nr;
- mo->assoc_so = ts->trx->nr;
-}
-
-/* Configure a Receiver MO */
-int abis_om2k_tx_rx_conf_req(struct gsm_bts_trx *trx)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- struct abis_om2k_mo mo;
-
- om2k_trx_to_mo(&mo, trx, OM2K_MO_CLS_RX);
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &mo, OM2K_MSGT_RX_CONF_REQ);
-
- msgb_tv16_put(msg, OM2K_DEI_FREQ_SPEC_RX, trx->arfcn);
- msgb_tv_put(msg, OM2K_DEI_RX_DIVERSITY, 0x02); /* A */
-
- return abis_om2k_sendmsg(trx->bts, msg);
-}
-
-/* Configure a Transmitter MO */
-int abis_om2k_tx_tx_conf_req(struct gsm_bts_trx *trx)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- struct abis_om2k_mo mo;
-
- om2k_trx_to_mo(&mo, trx, OM2K_MO_CLS_TX);
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &mo, OM2K_MSGT_TX_CONF_REQ);
-
- msgb_tv16_put(msg, OM2K_DEI_FREQ_SPEC_TX, trx->arfcn);
- msgb_tv_put(msg, OM2K_DEI_POWER, trx->nominal_power-trx->max_power_red);
- msgb_tv_put(msg, OM2K_DEI_FILLING_MARKER, 0); /* Filling enabled */
- msgb_tv_put(msg, OM2K_DEI_BCC, trx->bts->bsic & 0x7);
- /* Dedication Information is optional */
-
- return abis_om2k_sendmsg(trx->bts, msg);
-}
-
-enum abis_om2k_tf_mode {
- OM2K_TF_MODE_MASTER = 0x00,
- OM2K_TF_MODE_STANDALONE = 0x01,
- OM2K_TF_MODE_SLAVE = 0x02,
- OM2K_TF_MODE_UNDEFINED = 0xff,
-};
-
-static const uint8_t fs_offset_undef[5] = { 0xff, 0xff, 0xff, 0xff, 0xff };
-
-int abis_om2k_tx_tf_conf_req(struct gsm_bts *bts)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &bts->rbs2000.tf.om2k_mo.addr,
- OM2K_MSGT_TF_CONF_REQ);
-
- msgb_tv_put(msg, OM2K_DEI_TF_MODE, OM2K_TF_MODE_STANDALONE);
- msgb_tv_put(msg, OM2K_DEI_TF_SYNC_SRC, 0x00);
- msgb_tv_fixed_put(msg, OM2K_DEI_FS_OFFSET,
- sizeof(fs_offset_undef), fs_offset_undef);
-
- DEBUGP(DNM, "Tx MO=%s %s\n",
- om2k_mo_name(&bts->rbs2000.tf.om2k_mo.addr),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_TF_CONF_REQ));
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-static uint8_t pchan2comb(enum gsm_phys_chan_config pchan)
-{
- switch (pchan) {
- case GSM_PCHAN_CCCH:
- return 4;
- case GSM_PCHAN_CCCH_SDCCH4:
- return 5;
- case GSM_PCHAN_SDCCH8_SACCH8C:
- return 3;
- case GSM_PCHAN_TCH_F:
- case GSM_PCHAN_TCH_H:
- case GSM_PCHAN_PDCH:
- case GSM_PCHAN_TCH_F_PDCH:
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- return 8;
- default:
- return 0;
- }
-}
-
-static uint8_t ts2comb(struct gsm_bts_trx_ts *ts)
-{
- switch (ts->pchan) {
- case GSM_PCHAN_TCH_F_PDCH:
- LOGP(DNM, LOGL_ERROR, "%s pchan %s not intended for use"
- " with OM2000, use %s instead\n",
- gsm_ts_and_pchan_name(ts),
- gsm_pchan_name(GSM_PCHAN_TCH_F_PDCH),
- gsm_pchan_name(GSM_PCHAN_TCH_F_TCH_H_PDCH));
- /* If we allowed initialization of TCH/F_PDCH, it would fail
- * when we try to send the ip.access specific RSL PDCH Act
- * message for it. Rather fail completely right now: */
- return 0;
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- return pchan2comb(GSM_PCHAN_TCH_F);
- default:
- return pchan2comb(ts->pchan);
- }
-}
-
-static int put_freq_list(uint8_t *buf, uint16_t arfcn)
-{
- buf[0] = 0x00; /* TX/RX address */
- buf[1] = (arfcn >> 8);
- buf[2] = (arfcn & 0xff);
-
- return 3;
-}
-
-/* Compute a frequency list in OM2000 fomrmat */
-static int om2k_gen_freq_list(uint8_t *list, struct gsm_bts_trx_ts *ts)
-{
- uint8_t *cur = list;
- int len;
-
- if (ts->hopping.enabled) {
- unsigned int i;
- for (i = 0; i < ts->hopping.arfcns.data_len*8; i++) {
- if (bitvec_get_bit_pos(&ts->hopping.arfcns, i))
- cur += put_freq_list(cur, i);
- }
- } else
- cur += put_freq_list(cur, ts->trx->arfcn);
-
- len = cur - list;
-
- return len;
-}
-
-const uint8_t icm_bound_params[] = { 0x02, 0x06, 0x0c, 0x16, 0x06 };
-
-int abis_om2k_tx_ts_conf_req(struct gsm_bts_trx_ts *ts)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
- struct abis_om2k_mo mo;
- uint8_t freq_list[64*3]; /* BA max size: 64 ARFCN */
- int freq_list_len;
-
- om2k_ts_to_mo(&mo, ts);
-
- memset(freq_list, 0, sizeof(freq_list));
- freq_list_len = om2k_gen_freq_list(freq_list, ts);
- if (freq_list_len < 0)
- return freq_list_len;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, &mo, OM2K_MSGT_TS_CONF_REQ);
-
- msgb_tv_put(msg, OM2K_DEI_COMBINATION, ts2comb(ts));
- msgb_tv_put(msg, OM2K_DEI_TS_NR, ts->nr);
- msgb_tlv_put(msg, OM2K_DEI_FREQ_LIST, freq_list_len, freq_list);
- msgb_tv_put(msg, OM2K_DEI_HSN, ts->hopping.hsn);
- msgb_tv_put(msg, OM2K_DEI_MAIO, ts->hopping.maio);
- msgb_tv_put(msg, OM2K_DEI_BSIC, ts->trx->bts->bsic);
- msgb_tv_put(msg, OM2K_DEI_RX_DIVERSITY, 0x02); /* A */
- msgb_tv16_put(msg, OM2K_DEI_FN_OFFSET, 0);
- msgb_tv_put(msg, OM2K_DEI_EXT_RANGE, 0); /* Off */
- /* Optional: Interference Rejection Combining */
- msgb_tv_put(msg, OM2K_DEI_INTERF_REJ_COMB, 0x00);
- switch (ts->pchan) {
- case GSM_PCHAN_CCCH:
- msgb_tv_put(msg, OM2K_DEI_BA_PA_MFRMS, 0x06);
- msgb_tv_put(msg, OM2K_DEI_BS_AG_BKS_RES, 0x01);
- msgb_tv_put(msg, OM2K_DEI_DRX_DEV_MAX, 0x05);
- /* Repeat Paging/IMM.ASS: True, Allow Paging Type 3: Yes, Page for 5 seconds (default) */
- msgb_tv_put(msg, OM2K_DEI_CCCH_OPTIONS, 0x01);
- break;
- case GSM_PCHAN_CCCH_SDCCH4:
- msgb_tv_put(msg, OM2K_DEI_T3105, ts->trx->bts->network->T3105 / 10);
- msgb_tv_put(msg, OM2K_DEI_NY1, 35);
- msgb_tv_put(msg, OM2K_DEI_BA_PA_MFRMS, 0x06);
- msgb_tv_put(msg, OM2K_DEI_CBCH_INDICATOR, 0);
- msgb_tv_put(msg, OM2K_DEI_TSC, gsm_ts_tsc(ts));
- msgb_tv_put(msg, OM2K_DEI_BS_AG_BKS_RES, 0x01);
- msgb_tv_put(msg, OM2K_DEI_ICM_INDICATOR, 0);
- msgb_tv_put(msg, OM2K_DEI_DRX_DEV_MAX, 0x05);
- /* Repeat Paging/IMM.ASS: True, Allow Paging Type 3: Yes, Page for 5 seconds (default) */
- msgb_tv_put(msg, OM2K_DEI_CCCH_OPTIONS, 0x01);
- msgb_tv_fixed_put(msg, OM2K_DEI_ICM_BOUND_PARAMS,
- sizeof(icm_bound_params), icm_bound_params);
- break;
- case GSM_PCHAN_SDCCH8_SACCH8C:
- msgb_tv_put(msg, OM2K_DEI_T3105, ts->trx->bts->network->T3105 / 10);
- msgb_tv_put(msg, OM2K_DEI_NY1, 35);
- msgb_tv_put(msg, OM2K_DEI_CBCH_INDICATOR, 0);
- msgb_tv_put(msg, OM2K_DEI_TSC, gsm_ts_tsc(ts));
- /* Disable RF RESOURCE INDICATION on idle channels */
- msgb_tv_put(msg, OM2K_DEI_ICM_INDICATOR, 0);
- msgb_tv_fixed_put(msg, OM2K_DEI_ICM_BOUND_PARAMS,
- sizeof(icm_bound_params), icm_bound_params);
- break;
- default:
- msgb_tv_put(msg, OM2K_DEI_T3105, ts->trx->bts->network->T3105 / 10);
- msgb_tv_put(msg, OM2K_DEI_NY1, 35);
- msgb_tv_put(msg, OM2K_DEI_TSC, gsm_ts_tsc(ts));
- /* Disable RF RESOURCE INDICATION on idle channels */
- msgb_tv_put(msg, OM2K_DEI_ICM_INDICATOR, 0);
- msgb_tv_fixed_put(msg, OM2K_DEI_ICM_BOUND_PARAMS,
- sizeof(icm_bound_params), icm_bound_params);
- msgb_tv_put(msg, OM2K_DEI_TTA, 10); /* Timer for Time Alignment */
- if (ts->pchan == GSM_PCHAN_TCH_H)
- msgb_tv_put(msg, OM2K_DEI_ICM_CHAN_RATE, 1); /* TCH/H */
- else
- msgb_tv_put(msg, OM2K_DEI_ICM_CHAN_RATE, 0); /* TCH/F */
- msgb_tv_put(msg, OM2K_DEI_LSC, 1); /* enabled */
- msgb_tv_put(msg, OM2K_DEI_LSC_FILT_TIME, 10); /* units of 100ms */
- msgb_tv_put(msg, OM2K_DEI_CALL_SUPV_TIME, 8);
- msgb_tv_put(msg, OM2K_DEI_ENCR_ALG, 0x00);
- /* Not sure what those below mean */
- msgb_tv_put(msg, 0x9e, 0x00);
- msgb_tv_put(msg, 0x9f, 0x37);
- msgb_tv_put(msg, 0xa0, 0x01);
- break;
- }
-
- DEBUGP(DNM, "Tx MO=%s %s\n",
- om2k_mo_name(&mo),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_TS_CONF_REQ));
-
- return abis_om2k_sendmsg(ts->trx->bts, msg);
-}
-
-
-/***********************************************************************
- * OM2000 Managed Object (MO) FSM
- ***********************************************************************/
-
-#define S(x) (1 << (x))
-
-enum om2k_event_name {
- OM2K_MO_EVT_START,
- OM2K_MO_EVT_RX_CONN_COMPL,
- OM2K_MO_EVT_RX_RESET_COMPL,
- OM2K_MO_EVT_RX_START_REQ_ACCEPT,
- OM2K_MO_EVT_RX_START_RES,
- OM2K_MO_EVT_RX_CFG_REQ_ACCEPT,
- OM2K_MO_EVT_RX_CFG_RES,
- OM2K_MO_EVT_RX_ENA_REQ_ACCEPT,
- OM2K_MO_EVT_RX_ENA_RES,
- OM2K_MO_EVT_RX_OPINFO_ACC,
-};
-
-static const struct value_string om2k_event_names[] = {
- { OM2K_MO_EVT_START, "START" },
- { OM2K_MO_EVT_RX_CONN_COMPL, "RX-CONN-COMPL" },
- { OM2K_MO_EVT_RX_RESET_COMPL, "RX-RESET-COMPL" },
- { OM2K_MO_EVT_RX_START_REQ_ACCEPT, "RX-RESET-REQ-ACCEPT" },
- { OM2K_MO_EVT_RX_START_RES, "RX-START-RESULT" },
- { OM2K_MO_EVT_RX_CFG_REQ_ACCEPT, "RX-CFG-REQ-ACCEPT" },
- { OM2K_MO_EVT_RX_CFG_RES, "RX-CFG-RESULT" },
- { OM2K_MO_EVT_RX_ENA_REQ_ACCEPT, "RX-ENABLE-REQ-ACCEPT" },
- { OM2K_MO_EVT_RX_ENA_RES, "RX-ENABLE-RESULT" },
- { OM2K_MO_EVT_RX_OPINFO_ACC, "RX-OPINFO-ACCEPT" },
- { 0, NULL }
-};
-
-enum om2k_mo_fsm_state {
- OM2K_ST_INIT,
- OM2K_ST_WAIT_CONN_COMPL,
- OM2K_ST_WAIT_RES_COMPL,
- OM2K_ST_WAIT_START_ACCEPT,
- OM2K_ST_WAIT_START_RES,
- OM2K_ST_WAIT_CFG_ACCEPT,
- OM2K_ST_WAIT_CFG_RES,
- OM2K_ST_WAIT_ENABLE_ACCEPT,
- OM2K_ST_WAIT_ENABLE_RES,
- OM2K_ST_WAIT_OPINFO_ACCEPT,
- OM2K_ST_DONE,
- OM2K_ST_ERROR,
-};
-
-struct om2k_mo_fsm_priv {
- struct gsm_bts_trx *trx;
- struct om2k_mo *mo;
- uint8_t ts_nr;
-};
-
-static void om2k_mo_st_init(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
-
- OSMO_ASSERT(event == OM2K_MO_EVT_START);
-
- switch (omfp->mo->addr.class) {
- case OM2K_MO_CLS_CF:
- /* no Connect required, is always connected */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_START_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_start_req(omfp->trx->bts, &omfp->mo->addr);
- break;
- case OM2K_MO_CLS_TRXC:
- /* no Connect required, start with Reset */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_RES_COMPL,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_reset_cmd(omfp->trx->bts, &omfp->mo->addr);
- break;
- default:
- /* start with Connect */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_CONN_COMPL,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_connect_cmd(omfp->trx->bts, &omfp->mo->addr);
- break;
- }
-}
-
-static void om2k_mo_st_wait_conn_compl(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
-
- switch (omfp->mo->addr.class) {
-#if 0
- case OM2K_MO_CLS_TF:
- /* skip the reset, hope that helps */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_START_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_start_req(omfp->trx->bts, &omfp->mo->addr);
- break;
-#endif
- default:
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_RES_COMPL,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_reset_cmd(omfp->trx->bts, &omfp->mo->addr);
- break;
- }
-}
-
-static void om2k_mo_st_wait_res_compl(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
-
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_START_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_start_req(omfp->trx->bts, &omfp->mo->addr);
-}
-
-static void om2k_mo_st_wait_start_accept(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_decoded_msg *omd = data;
-
- switch (omd->msg_type) {
- case OM2K_MSGT_START_REQ_ACK:
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_START_RES,
- OM2K_TIMEOUT, 0);
- break;
- case OM2K_MSGT_START_REQ_REJ:
- osmo_fsm_inst_state_chg(fi, OM2K_ST_ERROR, 0, 0);
- break;
- }
-}
-
-static void om2k_mo_st_wait_start_res(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- struct gsm_bts_trx_ts *ts;
-
- switch (omfp->mo->addr.class) {
- case OM2K_MO_CLS_CF:
- case OM2K_MO_CLS_TRXC:
- /* Transition directly to Operational Info */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_OPINFO_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_op_info(omfp->trx->bts, &omfp->mo->addr, 1);
- return;
- case OM2K_MO_CLS_DP:
- /* Transition directoy to WAIT_ENABLE_ACCEPT */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_ENABLE_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_enable_req(omfp->trx->bts, &omfp->mo->addr);
- return;
-#if 0
- case OM2K_MO_CLS_TF:
- /* skip the config, hope that helps speeding things up */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_ENABLE_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_enable_req(omfp->trx->bts, &omfp->mo->addr);
- return;
-#endif
- }
-
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_CFG_ACCEPT,
- OM2K_TIMEOUT, 0);
- switch (omfp->mo->addr.class) {
- case OM2K_MO_CLS_TF:
- abis_om2k_tx_tf_conf_req(omfp->trx->bts);
- break;
- case OM2K_MO_CLS_IS:
- abis_om2k_tx_is_conf_req(omfp->trx->bts);
- break;
- case OM2K_MO_CLS_CON:
- abis_om2k_tx_con_conf_req(omfp->trx->bts);
- break;
- case OM2K_MO_CLS_TX:
- abis_om2k_tx_tx_conf_req(omfp->trx);
- break;
- case OM2K_MO_CLS_RX:
- abis_om2k_tx_rx_conf_req(omfp->trx);
- break;
- case OM2K_MO_CLS_TS:
- ts = mo2obj(omfp->trx->bts, &omfp->mo->addr);
- abis_om2k_tx_ts_conf_req(ts);
- break;
- }
-}
-
-static void om2k_mo_st_wait_cfg_accept(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- uint32_t timeout = OM2K_TIMEOUT;
-
- if (omfp->mo->addr.class == OM2K_MO_CLS_TF)
- timeout = 600;
-
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_CFG_RES, timeout, 0);
-}
-
-static void om2k_mo_st_wait_cfg_res(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- struct om2k_decoded_msg *omd = data;
- uint8_t accordance;
-
- if (!TLVP_PRESENT(&omd->tp, OM2K_DEI_ACCORDANCE_IND)) {
- osmo_fsm_inst_state_chg(fi, OM2K_ST_ERROR, 0, 0);
- return;
- }
- accordance = *TLVP_VAL(&omd->tp, OM2K_DEI_ACCORDANCE_IND);
-
- if (accordance != 0) {
- /* accordance not OK */
- osmo_fsm_inst_state_chg(fi, OM2K_ST_ERROR, 0, 0);
- return;
- }
-
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_ENABLE_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_enable_req(omfp->trx->bts, &omfp->mo->addr);
-}
-
-static void om2k_mo_st_wait_enable_accept(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- struct om2k_decoded_msg *omd = data;
-
- switch (omd->msg_type) {
- case OM2K_MSGT_ENABLE_REQ_REJ:
- osmo_fsm_inst_state_chg(fi, OM2K_ST_ERROR, 0, 0);
- break;
- case OM2K_MSGT_ENABLE_REQ_ACK:
- if (omfp->mo->addr.class == OM2K_MO_CLS_IS &&
- omfp->trx->bts->rbs2000.use_superchannel)
- e1inp_ericsson_set_altc(omfp->trx->bts->oml_link->ts->line, 1);
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_ENABLE_RES,
- OM2K_TIMEOUT, 0);
- }
-}
-
-static void om2k_mo_st_wait_enable_res(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- //struct om2k_decoded_msg *omd = data;
- /* TODO: check if state is actually enabled now? */
-
- osmo_fsm_inst_state_chg(fi, OM2K_ST_WAIT_OPINFO_ACCEPT,
- OM2K_TIMEOUT, 0);
- abis_om2k_tx_op_info(omfp->trx->bts, &omfp->mo->addr, 1);
-}
-
-static void om2k_mo_st_wait_opinfo_accept(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
-
- /* if we have just received opinfo accept for the timeslot,
- * start dynamic TCH switching procedures */
- if (omfp->mo->addr.class == OM2K_MO_CLS_TS) {
- struct gsm_bts_trx_ts *ts;
- ts = mo2obj(omfp->trx->bts, &omfp->mo->addr);
- dyn_ts_init(ts);
- }
- osmo_fsm_inst_state_chg(fi, OM2K_ST_DONE, 0, 0);
-}
-
-static void om2k_mo_s_done_onenter(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
- omfp->mo->fsm = NULL;
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
-}
-
-static void om2k_mo_s_error_onenter(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- struct om2k_mo_fsm_priv *omfp = fi->priv;
-
- omfp->mo->fsm = NULL;
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_ERROR, NULL);
-}
-
-static const struct osmo_fsm_state om2k_is_states[] = {
- [OM2K_ST_INIT] = {
- .name = "INIT",
- .in_event_mask = S(OM2K_MO_EVT_START),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_CONN_COMPL) |
- S(OM2K_ST_WAIT_START_ACCEPT) |
- S(OM2K_ST_WAIT_RES_COMPL),
- .action = om2k_mo_st_init,
- },
- [OM2K_ST_WAIT_CONN_COMPL] = {
- .name = "WAIT-CONN-COMPL",
- .in_event_mask = S(OM2K_MO_EVT_RX_CONN_COMPL),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_START_ACCEPT) |
- S(OM2K_ST_WAIT_RES_COMPL),
- .action = om2k_mo_st_wait_conn_compl,
- },
- [OM2K_ST_WAIT_RES_COMPL] = {
- .name = "WAIT-RES-COMPL",
- .in_event_mask = S(OM2K_MO_EVT_RX_RESET_COMPL),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_START_ACCEPT),
- .action = om2k_mo_st_wait_res_compl,
- },
- [OM2K_ST_WAIT_START_ACCEPT] = {
- .name = "WAIT-START-ACCEPT",
- .in_event_mask = S(OM2K_MO_EVT_RX_START_REQ_ACCEPT),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_START_RES),
- .action =om2k_mo_st_wait_start_accept,
- },
- [OM2K_ST_WAIT_START_RES] = {
- .name = "WAIT-START-RES",
- .in_event_mask = S(OM2K_MO_EVT_RX_START_RES),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_CFG_ACCEPT) |
- S(OM2K_ST_WAIT_OPINFO_ACCEPT),
- .action = om2k_mo_st_wait_start_res,
- },
- [OM2K_ST_WAIT_CFG_ACCEPT] = {
- .name = "WAIT-CFG-ACCEPT",
- .in_event_mask = S(OM2K_MO_EVT_RX_CFG_REQ_ACCEPT),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_CFG_RES),
- .action = om2k_mo_st_wait_cfg_accept,
- },
- [OM2K_ST_WAIT_CFG_RES] = {
- .name = "WAIT-CFG-RES",
- .in_event_mask = S(OM2K_MO_EVT_RX_CFG_RES),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_ENABLE_ACCEPT),
- .action = om2k_mo_st_wait_cfg_res,
- },
- [OM2K_ST_WAIT_ENABLE_ACCEPT] = {
- .name = "WAIT-ENABLE-ACCEPT",
- .in_event_mask = S(OM2K_MO_EVT_RX_ENA_REQ_ACCEPT),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_ENABLE_RES),
- .action = om2k_mo_st_wait_enable_accept,
- },
- [OM2K_ST_WAIT_ENABLE_RES] = {
- .name = "WAIT-ENABLE-RES",
- .in_event_mask = S(OM2K_MO_EVT_RX_ENA_RES),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR) |
- S(OM2K_ST_WAIT_OPINFO_ACCEPT),
- .action = om2k_mo_st_wait_enable_res,
- },
- [OM2K_ST_WAIT_OPINFO_ACCEPT] = {
- .name = "WAIT-OPINFO-ACCEPT",
- .in_event_mask = S(OM2K_MO_EVT_RX_OPINFO_ACC),
- .out_state_mask = S(OM2K_ST_DONE) |
- S(OM2K_ST_ERROR),
- .action = om2k_mo_st_wait_opinfo_accept,
- },
- [OM2K_ST_DONE] = {
- .name = "DONE",
- .in_event_mask = 0,
- .out_state_mask = 0,
- .onenter = om2k_mo_s_done_onenter,
- },
- [OM2K_ST_ERROR] = {
- .name = "ERROR",
- .in_event_mask = 0,
- .out_state_mask = 0,
- .onenter = om2k_mo_s_error_onenter,
- },
-
-};
-
-static int om2k_mo_timer_cb(struct osmo_fsm_inst *fi)
-{
- osmo_fsm_inst_state_chg(fi, OM2K_ST_ERROR, 0, 0);
- return 0;
-}
-
-static struct osmo_fsm om2k_mo_fsm = {
- .name = "OM2000-MO",
- .states = om2k_is_states,
- .num_states = ARRAY_SIZE(om2k_is_states),
- .log_subsys = DNM,
- .event_names = om2k_event_names,
- .timer_cb = om2k_mo_timer_cb,
-};
-
-struct osmo_fsm_inst *om2k_mo_fsm_start(struct osmo_fsm_inst *parent,
- uint32_t term_event,
- struct gsm_bts_trx *trx, struct om2k_mo *mo)
-{
- struct osmo_fsm_inst *fi;
- struct om2k_mo_fsm_priv *omfp;
- char idbuf[64];
-
- snprintf(idbuf, sizeof(idbuf), "%s-%s", parent->id,
- om2k_mo_name(&mo->addr));
-
- fi = osmo_fsm_inst_alloc_child_id(&om2k_mo_fsm, parent,
- term_event, idbuf);
- if (!fi)
- return NULL;
-
- mo->fsm = fi;
- omfp = talloc_zero(fi, struct om2k_mo_fsm_priv);
- omfp->mo = mo;
- omfp->trx = trx;
- fi->priv = omfp;
-
- osmo_fsm_inst_dispatch(fi, OM2K_MO_EVT_START, NULL);
-
- return fi;
-}
-
-int om2k_mo_fsm_recvmsg(struct gsm_bts *bts, struct om2k_mo *mo,
- struct om2k_decoded_msg *odm)
-{
- switch (odm->msg_type) {
- case OM2K_MSGT_CONNECT_COMPL:
- case OM2K_MSGT_CONNECT_REJ:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_CONN_COMPL, odm);
- break;
-
- case OM2K_MSGT_RESET_COMPL:
- case OM2K_MSGT_RESET_REJ:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_RESET_COMPL, odm);
- break;
-
- case OM2K_MSGT_START_REQ_ACK:
- case OM2K_MSGT_START_REQ_REJ:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_START_REQ_ACCEPT, odm);
- break;
-
- case OM2K_MSGT_START_RES:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_START_RES, odm);
- break;
-
- case OM2K_MSGT_CON_CONF_REQ_ACK:
- case OM2K_MSGT_IS_CONF_REQ_ACK:
- case OM2K_MSGT_RX_CONF_REQ_ACK:
- case OM2K_MSGT_TF_CONF_REQ_ACK:
- case OM2K_MSGT_TS_CONF_REQ_ACK:
- case OM2K_MSGT_TX_CONF_REQ_ACK:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_CFG_REQ_ACCEPT, odm);
- break;
-
- case OM2K_MSGT_CON_CONF_RES:
- case OM2K_MSGT_IS_CONF_RES:
- case OM2K_MSGT_RX_CONF_RES:
- case OM2K_MSGT_TF_CONF_RES:
- case OM2K_MSGT_TS_CONF_RES:
- case OM2K_MSGT_TX_CONF_RES:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_CFG_RES, odm);
- break;
-
- case OM2K_MSGT_ENABLE_REQ_ACK:
- case OM2K_MSGT_ENABLE_REQ_REJ:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_ENA_REQ_ACCEPT, odm);
- break;
- case OM2K_MSGT_ENABLE_RES:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_ENA_RES, odm);
- break;
-
- case OM2K_MSGT_OP_INFO_ACK:
- case OM2K_MSGT_OP_INFO_REJ:
- osmo_fsm_inst_dispatch(mo->fsm,
- OM2K_MO_EVT_RX_OPINFO_ACC, odm);
- break;
- default:
- return -1;
- }
-
- return 0;
-}
-
-/***********************************************************************
- * OM2000 TRX Finite State Machine, initializes TRXC and all siblings
- ***********************************************************************/
-
-enum om2k_trx_event {
- OM2K_TRX_EVT_START,
- OM2K_TRX_EVT_TRXC_DONE,
- OM2K_TRX_EVT_TX_DONE,
- OM2K_TRX_EVT_RX_DONE,
- OM2K_TRX_EVT_TS_DONE,
- OM2K_TRX_EVT_STOP,
-};
-
-static struct value_string om2k_trx_events[] = {
- { OM2K_TRX_EVT_START, "START" },
- { OM2K_TRX_EVT_TRXC_DONE, "TRXC-DONE" },
- { OM2K_TRX_EVT_TX_DONE, "TX-DONE" },
- { OM2K_TRX_EVT_RX_DONE, "RX-DONE" },
- { OM2K_TRX_EVT_TS_DONE, "TS-DONE" },
- { OM2K_TRX_EVT_STOP, "STOP" },
- { 0, NULL }
-};
-
-enum om2k_trx_state {
- OM2K_TRX_S_INIT,
- OM2K_TRX_S_WAIT_TRXC,
- OM2K_TRX_S_WAIT_TX,
- OM2K_TRX_S_WAIT_RX,
- OM2K_TRX_S_WAIT_TS,
- OM2K_TRX_S_DONE,
- OM2K_TRX_S_ERROR
-};
-
-struct om2k_trx_fsm_priv {
- struct gsm_bts_trx *trx;
- uint8_t next_ts_nr;
-};
-
-static void om2k_trx_s_init(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
-
- /* First initialize TRXC */
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_WAIT_TRXC,
- TRX_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_TRX_EVT_TRXC_DONE, otfp->trx,
- &otfp->trx->rbs2000.trxc.om2k_mo);
-}
-
-static void om2k_trx_s_wait_trxc(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
-
- /* Initialize TX after TRXC */
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_WAIT_TX,
- TRX_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_TRX_EVT_TX_DONE, otfp->trx,
- &otfp->trx->rbs2000.tx.om2k_mo);
-}
-
-static void om2k_trx_s_wait_tx(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
-
- /* Initialize RX after TX */
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_WAIT_RX,
- TRX_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_TRX_EVT_RX_DONE, otfp->trx,
- &otfp->trx->rbs2000.rx.om2k_mo);
-}
-
-static void om2k_trx_s_wait_rx(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
- struct gsm_bts_trx_ts *ts;
-
- /* Initialize Timeslots after TX */
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_WAIT_TS,
- TRX_FSM_TIMEOUT, 0);
- otfp->next_ts_nr = 0;
- ts = &otfp->trx->ts[otfp->next_ts_nr++];
- om2k_mo_fsm_start(fi, OM2K_TRX_EVT_TS_DONE, otfp->trx,
- &ts->rbs2000.om2k_mo);
-}
-
-static void om2k_trx_s_wait_ts(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
- struct gsm_bts_trx_ts *ts;
-
- if (otfp->next_ts_nr < 8) {
- /* iterate to the next timeslot */
- ts = &otfp->trx->ts[otfp->next_ts_nr++];
- om2k_mo_fsm_start(fi, OM2K_TRX_EVT_TS_DONE, otfp->trx,
- &ts->rbs2000.om2k_mo);
- } else {
- /* only after all 8 TS */
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_DONE, 0, 0);
- }
-}
-
-static void om2k_trx_s_done_onenter(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- struct om2k_trx_fsm_priv *otfp = fi->priv;
- gsm_bts_trx_set_system_infos(otfp->trx);
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
-}
-
-static const struct osmo_fsm_state om2k_trx_states[] = {
- [OM2K_TRX_S_INIT] = {
- .in_event_mask = S(OM2K_TRX_EVT_START),
- .out_state_mask = S(OM2K_TRX_S_WAIT_TRXC),
- .name = "INIT",
- .action = om2k_trx_s_init,
- },
- [OM2K_TRX_S_WAIT_TRXC] = {
- .in_event_mask = S(OM2K_TRX_EVT_TRXC_DONE),
- .out_state_mask = S(OM2K_TRX_S_ERROR) |
- S(OM2K_TRX_S_WAIT_TX),
- .name = "WAIT-TRXC",
- .action = om2k_trx_s_wait_trxc,
- },
- [OM2K_TRX_S_WAIT_TX] = {
- .in_event_mask = S(OM2K_TRX_EVT_TX_DONE),
- .out_state_mask = S(OM2K_TRX_S_ERROR) |
- S(OM2K_TRX_S_WAIT_RX),
- .name = "WAIT-TX",
- .action = om2k_trx_s_wait_tx,
- },
- [OM2K_TRX_S_WAIT_RX] = {
- .in_event_mask = S(OM2K_TRX_EVT_RX_DONE),
- .out_state_mask = S(OM2K_TRX_S_ERROR) |
- S(OM2K_TRX_S_WAIT_TS),
- .name = "WAIT-RX",
- .action = om2k_trx_s_wait_rx,
- },
- [OM2K_TRX_S_WAIT_TS] = {
- .in_event_mask = S(OM2K_TRX_EVT_TS_DONE),
- .out_state_mask = S(OM2K_TRX_S_ERROR) |
- S(OM2K_TRX_S_DONE),
- .name = "WAIT-TS",
- .action = om2k_trx_s_wait_ts,
- },
- [OM2K_TRX_S_DONE] = {
- .name = "DONE",
- .onenter = om2k_trx_s_done_onenter,
- },
- [OM2K_TRX_S_ERROR] = {
- .name = "ERROR",
- },
-};
-
-static int om2k_trx_timer_cb(struct osmo_fsm_inst *fi)
-{
- osmo_fsm_inst_state_chg(fi, OM2K_TRX_S_ERROR, 0, 0);
- return 0;
-}
-
-static struct osmo_fsm om2k_trx_fsm = {
- .name = "OM2000-TRX",
- .states = om2k_trx_states,
- .num_states = ARRAY_SIZE(om2k_trx_states),
- .log_subsys = DNM,
- .event_names = om2k_trx_events,
- .timer_cb = om2k_trx_timer_cb,
-};
-
-struct osmo_fsm_inst *om2k_trx_fsm_start(struct osmo_fsm_inst *parent,
- struct gsm_bts_trx *trx,
- uint32_t term_event)
-{
- struct osmo_fsm_inst *fi;
- struct om2k_trx_fsm_priv *otfp;
- char idbuf[32];
-
- snprintf(idbuf, sizeof(idbuf), "%u/%u", trx->bts->nr, trx->nr);
-
- fi = osmo_fsm_inst_alloc_child_id(&om2k_trx_fsm, parent, term_event,
- idbuf);
- if (!fi)
- return NULL;
-
- otfp = talloc_zero(fi, struct om2k_trx_fsm_priv);
- otfp->trx = trx;
- fi->priv = otfp;
-
- osmo_fsm_inst_dispatch(fi, OM2K_TRX_EVT_START, NULL);
-
- return fi;
-}
-
-
-/***********************************************************************
- * OM2000 BTS Finite State Machine, initializes CF and all siblings
- ***********************************************************************/
-
-enum om2k_bts_event {
- OM2K_BTS_EVT_START,
- OM2K_BTS_EVT_CF_DONE,
- OM2K_BTS_EVT_IS_DONE,
- OM2K_BTS_EVT_CON_DONE,
- OM2K_BTS_EVT_TF_DONE,
- OM2K_BTS_EVT_TRX_DONE,
- OM2K_BTS_EVT_STOP,
-};
-
-static const struct value_string om2k_bts_events[] = {
- { OM2K_BTS_EVT_START, "START" },
- { OM2K_BTS_EVT_CF_DONE, "CF-DONE" },
- { OM2K_BTS_EVT_IS_DONE, "IS-DONE" },
- { OM2K_BTS_EVT_CON_DONE, "CON-DONE" },
- { OM2K_BTS_EVT_TF_DONE, "TF-DONE" },
- { OM2K_BTS_EVT_TRX_DONE, "TRX-DONE" },
- { OM2K_BTS_EVT_STOP, "STOP" },
- { 0, NULL }
-};
-
-enum om2k_bts_state {
- OM2K_BTS_S_INIT,
- OM2K_BTS_S_WAIT_CF,
- OM2K_BTS_S_WAIT_IS,
- OM2K_BTS_S_WAIT_CON,
- OM2K_BTS_S_WAIT_TF,
- OM2K_BTS_S_WAIT_TRX,
- OM2K_BTS_S_DONE,
- OM2K_BTS_S_ERROR,
-};
-
-struct om2k_bts_fsm_priv {
- struct gsm_bts *bts;
- uint8_t next_trx_nr;
-};
-
-static void om2k_bts_s_init(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
- struct gsm_bts *bts = obfp->bts;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_START);
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_WAIT_CF,
- BTS_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_BTS_EVT_CF_DONE, bts->c0,
- &bts->rbs2000.cf.om2k_mo);
-}
-
-static void om2k_bts_s_wait_cf(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
- struct gsm_bts *bts = obfp->bts;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_CF_DONE);
- /* TF can take a long time to initialize, wait for 10min */
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_WAIT_TF, 600, 0);
- om2k_mo_fsm_start(fi, OM2K_BTS_EVT_TF_DONE, bts->c0,
- &bts->rbs2000.tf.om2k_mo);
-}
-
-static void om2k_bts_s_wait_tf(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
- struct gsm_bts *bts = obfp->bts;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_TF_DONE);
-
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_WAIT_CON,
- BTS_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_BTS_EVT_CON_DONE, bts->c0,
- &bts->rbs2000.con.om2k_mo);
-}
-
-static void om2k_bts_s_wait_con(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
- struct gsm_bts *bts = obfp->bts;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_CON_DONE);
-
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_WAIT_IS,
- BTS_FSM_TIMEOUT, 0);
- om2k_mo_fsm_start(fi, OM2K_BTS_EVT_IS_DONE, bts->c0,
- &bts->rbs2000.is.om2k_mo);
-}
-
-static void om2k_bts_s_wait_is(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
- struct gsm_bts_trx *trx;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_IS_DONE);
-
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_WAIT_TRX,
- BTS_FSM_TIMEOUT, 0);
- obfp->next_trx_nr = 0;
- trx = gsm_bts_trx_num(obfp->bts, obfp->next_trx_nr++);
- om2k_trx_fsm_start(fi, trx, OM2K_BTS_EVT_TRX_DONE);
-}
-
-static void om2k_bts_s_wait_trx(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct om2k_bts_fsm_priv *obfp = fi->priv;
-
- OSMO_ASSERT(event == OM2K_BTS_EVT_TRX_DONE);
-
- if (obfp->next_trx_nr < obfp->bts->num_trx) {
- struct gsm_bts_trx *trx;
- trx = gsm_bts_trx_num(obfp->bts, obfp->next_trx_nr++);
- om2k_trx_fsm_start(fi, trx, OM2K_BTS_EVT_TRX_DONE);
- } else {
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_DONE, 0, 0);
- }
-}
-
-static void om2k_bts_s_done_onenter(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
-}
-
-static const struct osmo_fsm_state om2k_bts_states[] = {
- [OM2K_BTS_S_INIT] = {
- .in_event_mask = S(OM2K_BTS_EVT_START),
- .out_state_mask = S(OM2K_BTS_S_WAIT_CF),
- .name = "INIT",
- .action = om2k_bts_s_init,
- },
- [OM2K_BTS_S_WAIT_CF] = {
- .in_event_mask = S(OM2K_BTS_EVT_CF_DONE),
- .out_state_mask = S(OM2K_BTS_S_ERROR) |
- S(OM2K_BTS_S_WAIT_TF),
- .name = "WAIT-CF",
- .action = om2k_bts_s_wait_cf,
- },
- [OM2K_BTS_S_WAIT_TF] = {
- .in_event_mask = S(OM2K_BTS_EVT_TF_DONE),
- .out_state_mask = S(OM2K_BTS_S_ERROR) |
- S(OM2K_BTS_S_WAIT_CON),
- .name = "WAIT-TF",
- .action = om2k_bts_s_wait_tf,
- },
- [OM2K_BTS_S_WAIT_CON] = {
- .in_event_mask = S(OM2K_BTS_EVT_CON_DONE),
- .out_state_mask = S(OM2K_BTS_S_ERROR) |
- S(OM2K_BTS_S_WAIT_IS),
- .name = "WAIT-CON",
- .action = om2k_bts_s_wait_con,
- },
- [OM2K_BTS_S_WAIT_IS] = {
- .in_event_mask = S(OM2K_BTS_EVT_IS_DONE),
- .out_state_mask = S(OM2K_BTS_S_ERROR) |
- S(OM2K_BTS_S_WAIT_TRX),
- .name = "WAIT-IS",
- .action = om2k_bts_s_wait_is,
- },
- [OM2K_BTS_S_WAIT_TRX] = {
- .in_event_mask = S(OM2K_BTS_EVT_TRX_DONE),
- .out_state_mask = S(OM2K_BTS_S_ERROR) |
- S(OM2K_BTS_S_DONE),
- .name = "WAIT-TRX",
- .action = om2k_bts_s_wait_trx,
- },
- [OM2K_BTS_S_DONE] = {
- .name = "DONE",
- .onenter = om2k_bts_s_done_onenter,
- },
- [OM2K_BTS_S_ERROR] = {
- .name = "ERROR",
- },
-};
-
-static int om2k_bts_timer_cb(struct osmo_fsm_inst *fi)
-{
- osmo_fsm_inst_state_chg(fi, OM2K_BTS_S_ERROR, 0, 0);
- return 0;
-}
-
-static struct osmo_fsm om2k_bts_fsm = {
- .name = "OM2000-BTS",
- .states = om2k_bts_states,
- .num_states = ARRAY_SIZE(om2k_bts_states),
- .log_subsys = DNM,
- .event_names = om2k_bts_events,
- .timer_cb = om2k_bts_timer_cb,
-};
-
-struct osmo_fsm_inst *
-om2k_bts_fsm_start(struct gsm_bts *bts)
-{
- struct osmo_fsm_inst *fi;
- struct om2k_bts_fsm_priv *obfp;
- char idbuf[16];
-
- snprintf(idbuf, sizeof(idbuf), "%u", bts->nr);
-
- fi = osmo_fsm_inst_alloc(&om2k_bts_fsm, bts, NULL,
- LOGL_DEBUG, idbuf);
- if (!fi)
- return NULL;
- fi->priv = obfp = talloc_zero(fi, struct om2k_bts_fsm_priv);
- obfp->bts = bts;
-
- osmo_fsm_inst_dispatch(fi, OM2K_BTS_EVT_START, NULL);
-
- return fi;
-}
-
-
-/***********************************************************************
- * OM2000 Negotiation
- ***********************************************************************/
-
-static int abis_om2k_tx_negot_req_ack(struct gsm_bts *bts, const struct abis_om2k_mo *mo,
- uint8_t *data, unsigned int len)
-{
- struct msgb *msg = om2k_msgb_alloc();
- struct abis_om2k_hdr *o2k;
-
- o2k = (struct abis_om2k_hdr *) msgb_put(msg, sizeof(*o2k));
- fill_om2k_hdr(o2k, mo, OM2K_MSGT_NEGOT_REQ_ACK);
-
- msgb_tlv_put(msg, OM2K_DEI_NEGOT_REC2, len, data);
-
- DEBUGP(DNM, "Tx MO=%s %s\n", om2k_mo_name(mo),
- get_value_string(om2k_msgcode_vals, OM2K_MSGT_NEGOT_REQ_ACK));
-
- return abis_om2k_sendmsg(bts, msg);
-}
-
-struct iwd_version {
- uint8_t gen_char[3+1];
- uint8_t rev_char[3+1];
-};
-
-struct iwd_type {
- uint8_t num_vers;
- struct iwd_version v[8];
-};
-
-static int om2k_rx_negot_req(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = (struct e1inp_sign_link *)msg->dst;
- struct abis_om2k_hdr *o2h = msgb_l2(msg);
- struct iwd_type iwd_types[16];
- uint8_t num_iwd_types = o2h->data[2];
- uint8_t *cur = o2h->data+3;
- unsigned int i, v;
-
- uint8_t out_buf[1024];
- uint8_t *out_cur = out_buf+1;
- uint8_t out_num_types = 0;
-
- memset(iwd_types, 0, sizeof(iwd_types));
-
- /* Parse the RBS-supported IWD versions into iwd_types array */
- for (i = 0; i < num_iwd_types; i++) {
- uint8_t num_versions = *cur++;
- uint8_t iwd_type = *cur++;
-
- iwd_types[iwd_type].num_vers = num_versions;
-
- for (v = 0; v < num_versions; v++) {
- struct iwd_version *iwd_v = &iwd_types[iwd_type].v[v];
-
- memcpy(iwd_v->gen_char, cur, 3);
- cur += 3;
- memcpy(iwd_v->rev_char, cur, 3);
- cur += 3;
-
- DEBUGP(DNM, "\tIWD Type %u Gen %s Rev %s\n", iwd_type,
- iwd_v->gen_char, iwd_v->rev_char);
- }
- }
-
- /* Select the last version for each IWD type */
- for (i = 0; i < ARRAY_SIZE(iwd_types); i++) {
- struct iwd_type *type = &iwd_types[i];
- struct iwd_version *last_v;
-
- if (type->num_vers == 0)
- continue;
-
- out_num_types++;
-
- last_v = &type->v[type->num_vers-1];
-
- *out_cur++ = i;
- memcpy(out_cur, last_v->gen_char, 3);
- out_cur += 3;
- memcpy(out_cur, last_v->rev_char, 3);
- out_cur += 3;
- }
-
- out_buf[0] = out_num_types;
-
- return abis_om2k_tx_negot_req_ack(sign_link->trx->bts, &o2h->mo, out_buf, out_cur - out_buf);
-}
-
-
-/***********************************************************************
- * OM2000 Receive Message Handler
- ***********************************************************************/
-
-static int om2k_rx_nack(struct msgb *msg)
-{
- struct abis_om2k_hdr *o2h = msgb_l2(msg);
- uint16_t msg_type = ntohs(o2h->msg_type);
- struct tlv_parsed tp;
-
- LOGP(DNM, LOGL_ERROR, "Rx MO=%s %s", om2k_mo_name(&o2h->mo),
- get_value_string(om2k_msgcode_vals, msg_type));
-
- abis_om2k_msg_tlv_parse(&tp, o2h);
- if (TLVP_PRESENT(&tp, OM2K_DEI_REASON_CODE))
- LOGPC(DNM, LOGL_ERROR, ", Reason 0x%02x",
- *TLVP_VAL(&tp, OM2K_DEI_REASON_CODE));
-
- if (TLVP_PRESENT(&tp, OM2K_DEI_RESULT_CODE))
- LOGPC(DNM, LOGL_ERROR, ", Result %s",
- get_value_string(om2k_result_strings,
- *TLVP_VAL(&tp, OM2K_DEI_RESULT_CODE)));
- LOGPC(DNM, LOGL_ERROR, "\n");
-
- return 0;
-}
-
-static int process_mo_state(struct gsm_bts *bts, struct om2k_decoded_msg *odm)
-{
- uint8_t mo_state;
-
- if (!TLVP_PRESENT(&odm->tp, OM2K_DEI_MO_STATE))
- return -EIO;
- mo_state = *TLVP_VAL(&odm->tp, OM2K_DEI_MO_STATE);
-
- LOGP(DNM, LOGL_DEBUG, "Rx MO=%s %s, MO State: %s\n",
- om2k_mo_name(&odm->o2h.mo),
- get_value_string(om2k_msgcode_vals, odm->msg_type),
- get_value_string(om2k_mostate_vals, mo_state));
-
- /* Throw error message in case we see an enable rsponse that does
- * not yield an enabled mo-state */
- if (odm->msg_type == OM2K_MSGT_ENABLE_RES
- && mo_state != OM2K_MO_S_ENABLED) {
- LOGP(DNM, LOGL_ERROR,
- "Rx MO=%s %s Failed to enable MO State!\n",
- om2k_mo_name(&odm->o2h.mo),
- get_value_string(om2k_msgcode_vals, odm->msg_type));
- }
-
- update_mo_state(bts, &odm->o2h.mo, mo_state);
-
- return 0;
-}
-
-/* Display fault report bits (helper function of display_fault_maps()) */
-static bool display_fault_bits(const uint8_t *vect, uint16_t len,
- uint8_t dei, const struct abis_om2k_mo *mo)
-{
- uint16_t i;
- int k;
- bool faults_present = false;
- int first = 1;
- char string[255];
-
- /* Check if errors are present at all */
- for (i = 0; i < len; i++)
- if (vect[i])
- faults_present = true;
- if (!faults_present)
- return false;
-
- sprintf(string, "Fault Report: %s (",
- get_value_string(om2k_attr_vals, dei));
-
- for (i = 0; i < len; i++) {
- for (k = 0; k < 8; k++) {
- if ((vect[i] >> k) & 1) {
- if (!first)
- sprintf(string + strlen(string), ",");
- sprintf(string + strlen(string), "%d", k + i*8);
- first = 0;
- }
- }
- }
-
- sprintf(string + strlen(string), ")\n");
- DEBUGP(DNM, "Rx MO=%s %s", om2k_mo_name(mo), string);
-
- return true;
-}
-
-/* Display fault report maps */
-static void display_fault_maps(const uint8_t *src, unsigned int src_len,
- const struct abis_om2k_mo *mo)
-{
- uint8_t tag;
- uint16_t tag_len;
- const uint8_t *val;
- int src_pos = 0;
- int rc;
- int tlv_count = 0;
- uint16_t msg_code;
- bool faults_present = false;
-
- /* Chop off header */
- src+=4;
- src_len-=4;
-
- /* Check message type */
- msg_code = (*src & 0xff) << 8;
- src++;
- src_len--;
- msg_code |= (*src & 0xff);
- src++;
- src_len--;
- if (msg_code != OM2K_MSGT_FAULT_REP) {
- LOGP(DNM, LOGL_ERROR, "Rx MO=%s Fault report: invalid message code!\n",
- om2k_mo_name(mo));
- return;
- }
-
- /* Chop off mo-interface */
- src += 4;
- src_len -= 4;
-
- /* Iterate over each TLV element */
- while (1) {
-
- /* Bail if an the maximum number of TLV fields
- * have been parsed */
- if (tlv_count >= 11) {
- LOGP(DNM, LOGL_ERROR,
- "Rx MO=%s Fault Report: too many tlv elements!\n",
- om2k_mo_name(mo));
- return;
- }
-
- /* Parse TLV field */
- rc = tlv_parse_one(&tag, &tag_len, &val, &om2k_att_tlvdef,
- src + src_pos, src_len - src_pos);
- if (rc > 0)
- src_pos += rc;
- else {
- LOGP(DNM, LOGL_ERROR,
- "Rx MO=%s Fault Report: invalid tlv element!\n",
- om2k_mo_name(mo));
- return;
- }
-
- switch (tag) {
- case OM2K_DEI_INT_FAULT_MAP_1A:
- case OM2K_DEI_INT_FAULT_MAP_1B:
- case OM2K_DEI_INT_FAULT_MAP_2A:
- case OM2K_DEI_EXT_COND_MAP_1:
- case OM2K_DEI_EXT_COND_MAP_2:
- case OM2K_DEI_REPL_UNIT_MAP:
- case OM2K_DEI_INT_FAULT_MAP_2A_EXT:
- case OM2K_DEI_EXT_COND_MAP_2_EXT:
- case OM2K_DEI_REPL_UNIT_MAP_EXT:
- faults_present |= display_fault_bits(val, tag_len,
- tag, mo);
- break;
- }
-
- /* Stop when no further TLV elements can be expected */
- if (src_len - src_pos < 2)
- break;
-
- tlv_count++;
- }
-
- if (!faults_present) {
- DEBUGP(DNM, "Rx MO=%s Fault Report: All faults ceased!\n",
- om2k_mo_name(mo));
- }
-}
-
-int abis_om2k_rcvmsg(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = (struct e1inp_sign_link *)msg->dst;
- struct gsm_bts *bts = sign_link->trx->bts;
- struct abis_om2k_hdr *o2h = msgb_l2(msg);
- struct abis_om_hdr *oh = &o2h->om;
- uint16_t msg_type = ntohs(o2h->msg_type);
- struct om2k_decoded_msg odm;
- struct om2k_mo *mo;
- int rc = 0;
-
- /* Various consistency checks */
- if (oh->placement != ABIS_OM_PLACEMENT_ONLY) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML placement 0x%x not supported\n",
- oh->placement);
- if (oh->placement != ABIS_OM_PLACEMENT_FIRST)
- return -EINVAL;
- }
- if (oh->sequence != 0) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML sequence 0x%x != 0x00\n",
- oh->sequence);
- return -EINVAL;
- }
-
- msg->l3h = (unsigned char *)o2h + sizeof(*o2h);
-
- if (oh->mdisc != ABIS_OM_MDISC_FOM) {
- LOGP(DNM, LOGL_ERROR, "unknown ABIS OM2000 message discriminator 0x%x\n",
- oh->mdisc);
- return -EINVAL;
- }
-
- DEBUGP(DNM, "Rx MO=%s %s (%s)\n", om2k_mo_name(&o2h->mo),
- get_value_string(om2k_msgcode_vals, msg_type),
- osmo_hexdump(msg->l2h, msgb_l2len(msg)));
-
- om2k_decode_msg(&odm, msg);
-
- process_mo_state(bts, &odm);
-
- switch (msg_type) {
- case OM2K_MSGT_CAL_TIME_REQ:
- rc = abis_om2k_cal_time_resp(bts);
- break;
- case OM2K_MSGT_FAULT_REP:
- display_fault_maps(msg->l2h, msgb_l2len(msg), &o2h->mo);
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_FAULT_REP_ACK);
- break;
- case OM2K_MSGT_NEGOT_REQ:
- rc = om2k_rx_negot_req(msg);
- break;
- case OM2K_MSGT_START_RES:
- /* common processing here */
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_START_RES_ACK);
- /* below we dispatch into MO */
- break;
- case OM2K_MSGT_IS_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_IS_CONF_RES_ACK);
- break;
- case OM2K_MSGT_CON_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_CON_CONF_RES_ACK);
- break;
- case OM2K_MSGT_TX_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_TX_CONF_RES_ACK);
- break;
- case OM2K_MSGT_RX_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_RX_CONF_RES_ACK);
- break;
- case OM2K_MSGT_TS_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_TS_CONF_RES_ACK);
- break;
- case OM2K_MSGT_TF_CONF_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_TF_CONF_RES_ACK);
- break;
- case OM2K_MSGT_ENABLE_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_ENABLE_RES_ACK);
- break;
- case OM2K_MSGT_DISABLE_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_DISABLE_RES_ACK);
- break;
- case OM2K_MSGT_TEST_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_TEST_RES_ACK);
- break;
- case OM2K_MSGT_CAPA_RES:
- rc = abis_om2k_tx_simple(bts, &o2h->mo, OM2K_MSGT_CAPA_RES_ACK);
- break;
- /* ERrors */
- case OM2K_MSGT_START_REQ_REJ:
- case OM2K_MSGT_CONNECT_REJ:
- case OM2K_MSGT_OP_INFO_REJ:
- case OM2K_MSGT_DISCONNECT_REJ:
- case OM2K_MSGT_TEST_REQ_REJ:
- case OM2K_MSGT_CON_CONF_REQ_REJ:
- case OM2K_MSGT_IS_CONF_REQ_REJ:
- case OM2K_MSGT_TX_CONF_REQ_REJ:
- case OM2K_MSGT_RX_CONF_REQ_REJ:
- case OM2K_MSGT_TS_CONF_REQ_REJ:
- case OM2K_MSGT_TF_CONF_REQ_REJ:
- case OM2K_MSGT_ENABLE_REQ_REJ:
- case OM2K_MSGT_ALARM_STATUS_REQ_REJ:
- case OM2K_MSGT_DISABLE_REQ_REJ:
- rc = om2k_rx_nack(msg);
- break;
- }
-
- /* Resolve the MO for this message */
- mo = get_om2k_mo(bts, &o2h->mo);
- if (!mo) {
- LOGP(DNM, LOGL_ERROR, "Couldn't resolve MO for OM2K msg "
- "%s: %s\n", get_value_string(om2k_msgcode_vals, msg_type),
- msgb_hexdump(msg));
- return 0;
- }
- if (!mo->fsm) {
- LOGP(DNM, LOGL_ERROR, "MO object should not generate any message. fsm == NULL "
- "%s: %s\n", get_value_string(om2k_msgcode_vals, msg_type),
- msgb_hexdump(msg));
- return 0;
- }
-
- /* Dispatch message to that MO */
- om2k_mo_fsm_recvmsg(bts, mo, &odm);
-
- msgb_free(msg);
- return rc;
-}
-
-static void om2k_mo_init(struct om2k_mo *mo, uint8_t class,
- uint8_t bts_nr, uint8_t assoc_so, uint8_t inst)
-{
- mo->addr.class = class;
- mo->addr.bts = bts_nr;
- mo->addr.assoc_so = assoc_so;
- mo->addr.inst = inst;
-}
-
-/* initialize the OM2K_MO members of gsm_bts_trx and its timeslots */
-void abis_om2k_trx_init(struct gsm_bts_trx *trx)
-{
- struct gsm_bts *bts = trx->bts;
- unsigned int i;
-
- OSMO_ASSERT(bts->type == GSM_BTS_TYPE_RBS2000);
-
- om2k_mo_init(&trx->rbs2000.trxc.om2k_mo, OM2K_MO_CLS_TRXC,
- bts->nr, 255, trx->nr);
- om2k_mo_init(&trx->rbs2000.tx.om2k_mo, OM2K_MO_CLS_TX,
- bts->nr, 255, trx->nr);
- om2k_mo_init(&trx->rbs2000.rx.om2k_mo, OM2K_MO_CLS_RX,
- bts->nr, 255, trx->nr);
-
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- om2k_mo_init(&trx->ts[i].rbs2000.om2k_mo, OM2K_MO_CLS_TS,
- bts->nr, trx->nr, i);
- }
-}
-
-/* initialize the OM2K_MO members of gsm_bts */
-void abis_om2k_bts_init(struct gsm_bts *bts)
-{
- OSMO_ASSERT(bts->type == GSM_BTS_TYPE_RBS2000);
-
- om2k_mo_init(&bts->rbs2000.cf.om2k_mo, OM2K_MO_CLS_CF,
- bts->nr, 0xFF, 0);
- om2k_mo_init(&bts->rbs2000.is.om2k_mo, OM2K_MO_CLS_IS,
- bts->nr, 0xFF, 0);
- om2k_mo_init(&bts->rbs2000.con.om2k_mo, OM2K_MO_CLS_CON,
- bts->nr, 0xFF, 0);
- om2k_mo_init(&bts->rbs2000.dp.om2k_mo, OM2K_MO_CLS_DP,
- bts->nr, 0xFF, 0);
- om2k_mo_init(&bts->rbs2000.tf.om2k_mo, OM2K_MO_CLS_TF,
- bts->nr, 0xFF, 0);
-}
-
-static __attribute__((constructor)) void abis_om2k_init(void)
-{
- osmo_fsm_register(&om2k_mo_fsm);
- osmo_fsm_register(&om2k_bts_fsm);
- osmo_fsm_register(&om2k_trx_fsm);
-}
diff --git a/src/libbsc/abis_om2000_vty.c b/src/libbsc/abis_om2000_vty.c
deleted file mode 100644
index a6bc4c78c..000000000
--- a/src/libbsc/abis_om2000_vty.c
+++ /dev/null
@@ -1,609 +0,0 @@
-/* VTY interface for A-bis OM2000 */
-
-/* (C) 2010-2011 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <unistd.h>
-#include <errno.h>
-#include <stdint.h>
-
-#include <arpa/inet.h>
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/debug.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_om2000.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/vty/vty.h>
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/telnet_interface.h>
-
-extern struct gsm_network *bsc_gsmnet;
-
-static struct cmd_node om2k_node = {
- OM2K_NODE,
- "%s(om2k)# ",
- 1,
-};
-
-static struct cmd_node om2k_con_group_node = {
- OM2K_CON_GROUP_NODE,
- "%s(om2k-con-group)# ",
- 1,
-};
-
-struct con_group;
-
-struct oml_node_state {
- struct gsm_bts *bts;
- struct abis_om2k_mo mo;
- struct con_group *cg;
-};
-
-static int dummy_config_write(struct vty *v)
-{
- return CMD_SUCCESS;
-}
-
-/* FIXME: auto-generate those strings from the value_string lists */
-#define OM2K_OBJCLASS_VTY "(trxc|ts|tf|is|con|dp|cf|tx|rx)"
-#define OM2K_OBJCLASS_VTY_HELP "TRX Controller\n" \
- "Timeslot\n" \
- "Timing Function\n" \
- "Interface Switch\n" \
- "Abis Concentrator\n" \
- "Digital Path\n" \
- "Central Function\n" \
- "Transmitter\n" \
- "Receiver\n"
-
-DEFUN(om2k_class_inst, om2k_class_inst_cmd,
- "bts <0-255> om2000 class " OM2K_OBJCLASS_VTY
- " <0-255> <0-255> <0-255>",
- "BTS related commands\n" "BTS Number\n"
- "Manipulate the OM2000 managed objects\n"
- "Object Class\n" OM2K_OBJCLASS_VTY_HELP
- "BTS Number\n" "Associated SO Instance\n" "Instance Number\n")
-{
- struct gsm_bts *bts;
- struct oml_node_state *oms;
- int bts_nr = atoi(argv[0]);
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (bts->type != GSM_BTS_TYPE_RBS2000) {
- vty_out(vty, "%% BTS %d not an Ericsson RBS%s",
- bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- oms = talloc_zero(tall_bsc_ctx, struct oml_node_state);
- if (!oms)
- return CMD_WARNING;
-
- oms->bts = bts;
- oms->mo.class = get_string_value(om2k_mo_class_short_vals, argv[1]);
- oms->mo.bts = atoi(argv[2]);
- oms->mo.assoc_so = atoi(argv[3]);
- oms->mo.inst = atoi(argv[4]);
-
- vty->index = oms;
- vty->node = OM2K_NODE;
-
- return CMD_SUCCESS;
-
-}
-
-DEFUN(om2k_classnum_inst, om2k_classnum_inst_cmd,
- "bts <0-255> om2000 class <0-255> <0-255> <0-255> <0-255>",
- "BTS related commands\n" "BTS Number\n"
- "Manipulate the OML managed objects\n"
- "Object Class\n" "Object Class\n"
- "BTS Number\n" "Associated SO Instance\n" "Instance Number\n")
-{
- struct gsm_bts *bts;
- struct oml_node_state *oms;
- int bts_nr = atoi(argv[0]);
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- oms = talloc_zero(tall_bsc_ctx, struct oml_node_state);
- if (!oms)
- return CMD_WARNING;
-
- oms->bts = bts;
- oms->mo.class = atoi(argv[1]);
- oms->mo.bts = atoi(argv[2]);
- oms->mo.assoc_so = atoi(argv[3]);
- oms->mo.inst = atoi(argv[4]);
-
- vty->index = oms;
- vty->node = OM2K_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_reset, om2k_reset_cmd,
- "reset-command",
- "Reset the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_reset_cmd(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_start, om2k_start_cmd,
- "start-request",
- "Start the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_start_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_status, om2k_status_cmd,
- "status-request",
- "Get the MO Status\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_status_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_connect, om2k_connect_cmd,
- "connect-command",
- "Connect the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_connect_cmd(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_disconnect, om2k_disconnect_cmd,
- "disconnect-command",
- "Disconnect the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_disconnect_cmd(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_enable, om2k_enable_cmd,
- "enable-request",
- "Enable the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_enable_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_disable, om2k_disable_cmd,
- "disable-request",
- "Disable the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_disable_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_op_info, om2k_op_info_cmd,
- "operational-info <0-1>",
- "Set operational information\n"
- "Set operational info to 0 or 1\n")
-{
- struct oml_node_state *oms = vty->index;
- int oper = atoi(argv[0]);
-
- abis_om2k_tx_op_info(oms->bts, &oms->mo, oper);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_test, om2k_test_cmd,
- "test-request",
- "Test the MO\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_test_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-DEFUN(om2k_cap_req, om2k_cap_req_cmd,
- "capabilities-request",
- "Request MO capabilities\n")
-{
- struct oml_node_state *oms = vty->index;
-
- abis_om2k_tx_cap_req(oms->bts, &oms->mo);
- return CMD_SUCCESS;
-}
-
-static struct con_group *con_group_find_or_create(struct gsm_bts *bts, uint8_t cg)
-{
- struct con_group *ent;
-
- llist_for_each_entry(ent, &bts->rbs2000.con.conn_groups, list) {
- if (ent->cg == cg)
- return ent;
- }
-
- ent = talloc_zero(bts, struct con_group);
- ent->bts = bts;
- ent->cg = cg;
- INIT_LLIST_HEAD(&ent->paths);
- llist_add_tail(&ent->list, &bts->rbs2000.con.conn_groups);
-
- return ent;
-}
-
-static int con_group_del(struct gsm_bts *bts, uint8_t cg_id)
-{
- struct con_group *cg, *cg2;
-
- llist_for_each_entry_safe(cg, cg2, &bts->rbs2000.con.conn_groups, list) {
- if (cg->cg == cg_id) {
- llist_del(&cg->list);
- talloc_free(cg);
- return 0;
- };
- }
- return -ENOENT;
-}
-
-static void con_group_add_path(struct con_group *cg, uint16_t ccp,
- uint8_t ci, uint8_t tag, uint8_t tei)
-{
- struct con_path *cp = talloc_zero(cg, struct con_path);
-
- cp->ccp = ccp;
- cp->ci = ci;
- cp->tag = tag;
- cp->tei = tei;
- llist_add(&cp->list, &cg->paths);
-}
-
-static int con_group_del_path(struct con_group *cg, uint16_t ccp,
- uint8_t ci, uint8_t tag, uint8_t tei)
-{
- struct con_path *cp, *cp2;
- llist_for_each_entry_safe(cp, cp2, &cg->paths, list) {
- if (cp->ccp == ccp && cp->ci == ci && cp->tag == tag &&
- cp->tei == tei) {
- llist_del(&cp->list);
- talloc_free(cp);
- return 0;
- }
- }
- return -ENOENT;
-}
-
-DEFUN(cfg_om2k_con_group, cfg_om2k_con_group_cmd,
- "con-connection-group <1-31>",
- "Configure a CON (Concentrator) Connection Group\n"
- "CON Connection Group Number\n")
-{
- struct gsm_bts *bts = vty->index;
- struct con_group *cg;
- uint8_t cgid = atoi(argv[0]);
-
- if (bts->type != GSM_BTS_TYPE_RBS2000) {
- vty_out(vty, "%% CON MO only exists in RBS2000%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- cg = con_group_find_or_create(bts, cgid);
- if (!cg) {
- vty_out(vty, "%% Cannot create CON Group%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty->node = OM2K_CON_GROUP_NODE;
- vty->index = cg;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(del_om2k_con_group, del_om2k_con_group_cmd,
- "del-connection-group <1-31>",
- "Delete a CON (Concentrator) Connection Group\n"
- "CON Connection Group Number\n")
-{
- struct gsm_bts *bts = vty->index;
- int rc;
- uint8_t cgid = atoi(argv[0]);
-
- if (bts->type != GSM_BTS_TYPE_RBS2000) {
- vty_out(vty, "%% CON MO only exists in RBS2000%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- rc = con_group_del(bts, cgid);
- if (rc != 0) {
- vty_out(vty, "%% Cannot delete CON Group%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-#define CON_PATH_HELP "CON Path (In/Out)\n" \
- "Add CON Path to Concentration Group\n" \
- "Delete CON Path from Concentration Group\n" \
- "CON Conection Point\n" \
- "Contiguity Index\n" \
-
-DEFUN(cfg_om2k_con_path_dec, cfg_om2k_con_path_dec_cmd,
- "con-path (add|del) <0-2047> <0-255> deconcentrated <0-63>",
- CON_PATH_HELP "De-concentrated in/outlet\n" "TEI Value\n")
-{
- struct con_group *cg = vty->index;
- uint16_t ccp = atoi(argv[1]);
- uint8_t ci = atoi(argv[2]);
- uint8_t tei = atoi(argv[3]);
-
- if (!strcmp(argv[0], "add"))
- con_group_add_path(cg, ccp, ci, 0, tei);
- else {
- if (con_group_del_path(cg, ccp, ci, 0, tei) < 0) {
- vty_out(vty, "%% No matching CON Path%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_om2k_con_path_conc, cfg_om2k_con_path_conc_cmd,
- "con-path (add|del) <0-2047> <0-255> concentrated <1-16>",
- CON_PATH_HELP "Concentrated in/outlet\n" "Tag Number\n")
-{
- struct con_group *cg = vty->index;
- uint16_t ccp = atoi(argv[1]);
- uint8_t ci = atoi(argv[2]);
- uint8_t tag = atoi(argv[3]);
-
- if (!strcmp(argv[0], "add"))
- con_group_add_path(cg, ccp, ci, tag, 0xff);
- else {
- if (con_group_del_path(cg, ccp, ci, tag, 0xff) < 0) {
- vty_out(vty, "%% No matching CON list entry%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_alt_mode, cfg_bts_alt_mode_cmd,
- "abis-lower-transport (single-timeslot|super-channel)",
- "Configure thee Abis Lower Transport\n"
- "Single Timeslot (classic Abis)\n"
- "SuperChannel (Packet Abis)\n")
-{
- struct gsm_bts *bts = vty->index;
- struct con_group *cg;
-
- if (bts->type != GSM_BTS_TYPE_RBS2000) {
- vty_out(vty, "%% Command only works for RBS2000%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[0], "super-channel"))
- bts->rbs2000.use_superchannel = 1;
- else
- bts->rbs2000.use_superchannel = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_is_conn_list, cfg_bts_is_conn_list_cmd,
- "is-connection-list (add|del) <0-2047> <0-2047> <0-255>",
- "Interface Switch Connection List\n"
- "Add to IS list\n" "Delete from IS list\n"
- "ICP1\n" "ICP2\n" "Contiguity Index\n")
-{
- struct gsm_bts *bts = vty->index;
- uint16_t icp1 = atoi(argv[1]);
- uint16_t icp2 = atoi(argv[2]);
- uint8_t ci = atoi(argv[3]);
- struct is_conn_group *grp, *grp2;
-
- if (bts->type != GSM_BTS_TYPE_RBS2000) {
- vty_out(vty, "%% IS MO only exists in RBS2000%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[0], "add")) {
- grp = talloc_zero(bts, struct is_conn_group);
- grp->icp1 = icp1;
- grp->icp2 = icp2;
- grp->ci = ci;
- llist_add_tail(&grp->list, &bts->rbs2000.is.conn_groups);
- } else {
- llist_for_each_entry_safe(grp, grp2, &bts->rbs2000.is.conn_groups, list) {
- if (grp->icp1 == icp1 && grp->icp2 == icp2
- && grp->ci == ci) {
- llist_del(&grp->list);
- talloc_free(grp);
- return CMD_SUCCESS;
- }
- }
- vty_out(vty, "%% No matching IS Conn Group found!%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(om2k_conf_req, om2k_conf_req_cmd,
- "configuration-request",
- "Send the configuration request for current MO\n")
-{
- struct oml_node_state *oms = vty->index;
- struct gsm_bts *bts = oms->bts;
- struct gsm_bts_trx *trx = NULL;
- struct gsm_bts_trx_ts *ts = NULL;
-
- switch (oms->mo.class) {
- case OM2K_MO_CLS_IS:
- abis_om2k_tx_is_conf_req(bts);
- break;
- case OM2K_MO_CLS_TS:
- trx = gsm_bts_trx_by_nr(bts, oms->mo.assoc_so);
- if (!trx) {
- vty_out(vty, "%% BTS %u has no TRX %u%s", bts->nr,
- oms->mo.assoc_so, VTY_NEWLINE);
- return CMD_WARNING;
- }
- if (oms->mo.inst >= ARRAY_SIZE(trx->ts)) {
- vty_out(vty, "%% Timeslot %u out of range%s",
- oms->mo.inst, VTY_NEWLINE);
- return CMD_WARNING;
- }
- ts = &trx->ts[oms->mo.inst];
- abis_om2k_tx_ts_conf_req(ts);
- break;
- case OM2K_MO_CLS_RX:
- case OM2K_MO_CLS_TX:
- case OM2K_MO_CLS_TRXC:
- trx = gsm_bts_trx_by_nr(bts, oms->mo.inst);
- if (!trx) {
- vty_out(vty, "%% BTS %u has no TRX %u%s", bts->nr,
- oms->mo.inst, VTY_NEWLINE);
- return CMD_WARNING;
- }
- switch (oms->mo.class) {
- case OM2K_MO_CLS_RX:
- abis_om2k_tx_rx_conf_req(trx);
- break;
- case OM2K_MO_CLS_TX:
- abis_om2k_tx_tx_conf_req(trx);
- break;
- default:
- break;
- }
- break;
- case OM2K_MO_CLS_TF:
- abis_om2k_tx_tf_conf_req(bts);
- break;
- default:
- vty_out(vty, "%% Don't know how to configure MO%s",
- VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-static void dump_con_group(struct vty *vty, struct con_group *cg)
-{
- struct con_path *cp;
-
- llist_for_each_entry(cp, &cg->paths, list) {
- vty_out(vty, " con-path add %u %u ", cp->ccp, cp->ci);
- if (cp->tei == 0xff) {
- vty_out(vty, "concentrated %u%s", cp->tag,
- VTY_NEWLINE);
- } else {
- vty_out(vty, "deconcentrated %u%s", cp->tei,
- VTY_NEWLINE);
- }
- }
-}
-
-void abis_om2k_config_write_bts(struct vty *vty, struct gsm_bts *bts)
-{
- struct is_conn_group *igrp;
- struct con_group *cgrp;
-
- llist_for_each_entry(igrp, &bts->rbs2000.is.conn_groups, list)
- vty_out(vty, " is-connection-list add %u %u %u%s",
- igrp->icp1, igrp->icp2, igrp->ci, VTY_NEWLINE);
-
- llist_for_each_entry(cgrp, &bts->rbs2000.con.conn_groups, list) {
- vty_out(vty, " con-connection-group %u%s", cgrp->cg,
- VTY_NEWLINE);
- dump_con_group(vty, cgrp);
- }
- if (bts->rbs2000.use_superchannel)
- vty_out(vty, " abis-lower-transport super-channel%s",
- VTY_NEWLINE);
-}
-
-int abis_om2k_vty_init(void)
-{
- install_element(ENABLE_NODE, &om2k_class_inst_cmd);
- install_element(ENABLE_NODE, &om2k_classnum_inst_cmd);
- install_node(&om2k_node, dummy_config_write);
-
- vty_install_default(OM2K_NODE);
- install_element(OM2K_NODE, &om2k_reset_cmd);
- install_element(OM2K_NODE, &om2k_start_cmd);
- install_element(OM2K_NODE, &om2k_status_cmd);
- install_element(OM2K_NODE, &om2k_connect_cmd);
- install_element(OM2K_NODE, &om2k_disconnect_cmd);
- install_element(OM2K_NODE, &om2k_enable_cmd);
- install_element(OM2K_NODE, &om2k_disable_cmd);
- install_element(OM2K_NODE, &om2k_op_info_cmd);
- install_element(OM2K_NODE, &om2k_test_cmd);
- install_element(OM2K_NODE, &om2k_cap_req_cmd);
- install_element(OM2K_NODE, &om2k_conf_req_cmd);
-
- install_node(&om2k_con_group_node, dummy_config_write);
- vty_install_default(OM2K_CON_GROUP_NODE);
- install_element(OM2K_CON_GROUP_NODE, &cfg_om2k_con_path_dec_cmd);
- install_element(OM2K_CON_GROUP_NODE, &cfg_om2k_con_path_conc_cmd);
-
- install_element(BTS_NODE, &cfg_bts_is_conn_list_cmd);
- install_element(BTS_NODE, &cfg_bts_alt_mode_cmd);
- install_element(BTS_NODE, &cfg_om2k_con_group_cmd);
- install_element(BTS_NODE, &del_om2k_con_group_cmd);
-
- return 0;
-}
diff --git a/src/libbsc/abis_rsl.c b/src/libbsc/abis_rsl.c
deleted file mode 100644
index 66cda8200..000000000
--- a/src/libbsc/abis_rsl.c
+++ /dev/null
@@ -1,2939 +0,0 @@
-/* GSM Radio Signalling Link messages on the A-bis interface
- * 3GPP TS 08.58 version 8.6.0 Release 1999 / ETSI TS 100 596 V8.6.0 */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (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/>.
- *
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <errno.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_04_08.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/bsc_rll.h>
-#include <openbsc/debug.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-#include <osmocom/gsm/protocol/gsm_08_58.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-#include <openbsc/meas_rep.h>
-#include <openbsc/rtp_proxy.h>
-#include <openbsc/gsm_subscriber.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/gsm/rsl.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/pcu_if.h>
-
-#define RSL_ALLOC_SIZE 1024
-#define RSL_ALLOC_HEADROOM 128
-
-enum sacch_deact {
- SACCH_NONE,
- SACCH_DEACTIVATE,
-};
-
-static int rsl_send_imm_assignment(struct gsm_lchan *lchan);
-static void error_timeout_cb(void *data);
-static int dyn_ts_switchover_continue(struct gsm_bts_trx_ts *ts);
-static int dyn_ts_switchover_failed(struct gsm_bts_trx_ts *ts, int rc);
-static void dyn_ts_switchover_complete(struct gsm_lchan *lchan);
-
-static void send_lchan_signal(int sig_no, struct gsm_lchan *lchan,
- struct gsm_meas_rep *resp)
-{
- struct lchan_signal_data sig;
- sig.lchan = lchan;
- sig.mr = resp;
- osmo_signal_dispatch(SS_LCHAN, sig_no, &sig);
-}
-
-static void do_lchan_free(struct gsm_lchan *lchan)
-{
- /* We start the error timer to make the channel available again */
- if (lchan->state == LCHAN_S_REL_ERR) {
- osmo_timer_setup(&lchan->error_timer, error_timeout_cb, lchan);
- osmo_timer_schedule(&lchan->error_timer,
- lchan->ts->trx->bts->network->T3111 + 2, 0);
- } else {
- rsl_lchan_set_state(lchan, LCHAN_S_NONE);
- }
- lchan_free(lchan);
-}
-
-static void count_codecs(struct gsm_bts *bts, struct gsm_lchan *lchan)
-{
- OSMO_ASSERT(bts);
-
- if (lchan->type == GSM_LCHAN_TCH_H) {
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_AMR:
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CODEC_AMR_H]);
- break;
- case GSM48_CMODE_SPEECH_V1:
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CODEC_V1_HR]);
- break;
- default:
- break;
- }
- } else if (lchan->type == GSM_LCHAN_TCH_F) {
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_AMR:
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CODEC_AMR_F]);
- break;
- case GSM48_CMODE_SPEECH_V1:
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CODEC_V1_FR]);
- break;
- case GSM48_CMODE_SPEECH_EFR:
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CODEC_EFR]);
- break;
- default:
- break;
- }
- }
-}
-
-static uint8_t mdisc_by_msgtype(uint8_t msg_type)
-{
- /* mask off the transparent bit ? */
- msg_type &= 0xfe;
-
- if ((msg_type & 0xf0) == 0x00)
- return ABIS_RSL_MDISC_RLL;
- if ((msg_type & 0xf0) == 0x10) {
- if (msg_type >= 0x19 && msg_type <= 0x22)
- return ABIS_RSL_MDISC_TRX;
- else
- return ABIS_RSL_MDISC_COM_CHAN;
- }
- if ((msg_type & 0xe0) == 0x20)
- return ABIS_RSL_MDISC_DED_CHAN;
-
- return ABIS_RSL_MDISC_LOC;
-}
-
-static inline void init_dchan_hdr(struct abis_rsl_dchan_hdr *dh,
- uint8_t msg_type)
-{
- dh->c.msg_discr = mdisc_by_msgtype(msg_type);
- dh->c.msg_type = msg_type;
- dh->ie_chan = RSL_IE_CHAN_NR;
-}
-
-/* call rsl_lchan_lookup and set the log context */
-static struct gsm_lchan *lchan_lookup(struct gsm_bts_trx *trx, uint8_t chan_nr,
- const char *log_name)
-{
- int rc;
- struct gsm_lchan *lchan = rsl_lchan_lookup(trx, chan_nr, &rc);
-
- if (!lchan) {
- LOGP(DRSL, LOGL_ERROR, "%sunknown chan_nr=0x%02x\n",
- log_name, chan_nr);
- return NULL;
- }
-
- if (rc < 0)
- LOGP(DRSL, LOGL_ERROR, "%s %smismatching chan_nr=0x%02x\n",
- gsm_ts_and_pchan_name(lchan->ts), log_name, chan_nr);
-
- if (lchan->conn)
- log_set_context(LOG_CTX_VLR_SUBSCR, lchan->conn->vsub);
-
- return lchan;
-}
-
-/* As per TS 03.03 Section 2.2, the IMSI has 'not more than 15 digits' */
-uint64_t str_to_imsi(const char *imsi_str)
-{
- uint64_t ret;
-
- ret = strtoull(imsi_str, NULL, 10);
-
- return ret;
-}
-
-static struct msgb *rsl_msgb_alloc(void)
-{
- return msgb_alloc_headroom(RSL_ALLOC_SIZE, RSL_ALLOC_HEADROOM,
- "RSL");
-}
-
-static void pad_macblock(uint8_t *out, const uint8_t *in, int len)
-{
- memcpy(out, in, len);
-
- if (len < GSM_MACBLOCK_LEN)
- memset(out+len, 0x2b, GSM_MACBLOCK_LEN - len);
-}
-
-/* Chapter 9.3.7: Encryption Information */
-static int build_encr_info(uint8_t *out, struct gsm_lchan *lchan)
-{
- *out++ = lchan->encr.alg_id & 0xff;
- if (lchan->encr.key_len)
- memcpy(out, lchan->encr.key, lchan->encr.key_len);
- return lchan->encr.key_len + 1;
-}
-
-static void print_rsl_cause(int lvl, const uint8_t *cause_v, uint8_t cause_len)
-{
- int i;
-
- LOGPC(DRSL, lvl, "CAUSE=0x%02x(%s) ",
- cause_v[0], rsl_err_name(cause_v[0]));
- for (i = 1; i < cause_len-1; i++)
- LOGPC(DRSL, lvl, "%02x ", cause_v[i]);
-}
-
-static void lchan_act_tmr_cb(void *data)
-{
- struct gsm_lchan *lchan = data;
-
- rsl_lchan_mark_broken(lchan, "activation timeout");
- lchan_free(lchan);
-}
-
-static void lchan_deact_tmr_cb(void *data)
-{
- struct gsm_lchan *lchan = data;
-
- rsl_lchan_mark_broken(lchan, "de-activation timeout");
- lchan_free(lchan);
-}
-
-
-/* Send a BCCH_INFO message as per Chapter 8.5.1 */
-int rsl_bcch_info(const struct gsm_bts_trx *trx, enum osmo_sysinfo_type si_type, const uint8_t *data, int len)
-{
- struct abis_rsl_dchan_hdr *dh;
- const struct gsm_bts *bts = trx->bts;
- struct msgb *msg = rsl_msgb_alloc();
- uint8_t type = osmo_sitype2rsl(si_type);
-
- if (bts->c0 != trx)
- LOGP(DRR, LOGL_ERROR, "Attempting to set BCCH SI%s on wrong BTS%u/TRX%u\n",
- get_value_string(osmo_sitype_strs, si_type), bts->nr, trx->nr);
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof*dh);
- init_dchan_hdr(dh, RSL_MT_BCCH_INFO);
- dh->chan_nr = RSL_CHAN_BCCH;
-
- if (trx->bts->type == GSM_BTS_TYPE_RBS2000
- && type == RSL_SYSTEM_INFO_13) {
- /* Ericsson proprietary encoding of SI13 */
- msgb_tv_put(msg, RSL_IE_SYSINFO_TYPE, RSL_ERIC_SYSTEM_INFO_13);
- if (data)
- msgb_tlv_put(msg, RSL_IE_FULL_BCCH_INFO, len, data);
- msgb_tv_put(msg, RSL_IE_ERIC_BCCH_MAPPING, 0x00);
- } else {
- /* Normal encoding */
- msgb_tv_put(msg, RSL_IE_SYSINFO_TYPE, type);
- if (data)
- msgb_tlv_put(msg, RSL_IE_FULL_BCCH_INFO, len, data);
- }
-
- msg->dst = trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_sacch_filling(struct gsm_bts_trx *trx, uint8_t type,
- const uint8_t *data, int len)
-{
- struct abis_rsl_common_hdr *ch;
- struct msgb *msg = rsl_msgb_alloc();
-
- ch = (struct abis_rsl_common_hdr *) msgb_put(msg, sizeof(*ch));
- ch->msg_discr = ABIS_RSL_MDISC_TRX;
- ch->msg_type = RSL_MT_SACCH_FILL;
-
- msgb_tv_put(msg, RSL_IE_SYSINFO_TYPE, type);
- if (data)
- msgb_tl16v_put(msg, RSL_IE_L3_INFO, len, data);
-
- msg->dst = trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_sacch_info_modify(struct gsm_lchan *lchan, uint8_t type,
- const uint8_t *data, int len)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg = rsl_msgb_alloc();
- uint8_t chan_nr = gsm_lchan2chan_nr(lchan);
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_SACCH_INFO_MODIFY);
- dh->chan_nr = chan_nr;
-
- msgb_tv_put(msg, RSL_IE_SYSINFO_TYPE, type);
- if (data)
- msgb_tl16v_put(msg, RSL_IE_L3_INFO, len, data);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_chan_bs_power_ctrl(struct gsm_lchan *lchan, unsigned int fpc, int db)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg;
- uint8_t chan_nr = gsm_lchan2chan_nr(lchan);
-
- db = abs(db);
- if (db > 30)
- return -EINVAL;
-
- msg = rsl_msgb_alloc();
-
- lchan->bs_power = db/2;
- if (fpc)
- lchan->bs_power |= 0x10;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_BS_POWER_CONTROL);
- dh->chan_nr = chan_nr;
-
- msgb_tv_put(msg, RSL_IE_BS_POWER, lchan->bs_power);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_chan_ms_power_ctrl(struct gsm_lchan *lchan, unsigned int fpc, int dbm)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg;
- uint8_t chan_nr = gsm_lchan2chan_nr(lchan);
- int ctl_lvl;
-
- ctl_lvl = ms_pwr_ctl_lvl(lchan->ts->trx->bts->band, dbm);
- if (ctl_lvl < 0)
- return ctl_lvl;
-
- msg = rsl_msgb_alloc();
-
- lchan->ms_power = ctl_lvl;
-
- if (fpc)
- lchan->ms_power |= 0x20;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_MS_POWER_CONTROL);
- dh->chan_nr = chan_nr;
-
- msgb_tv_put(msg, RSL_IE_MS_POWER, lchan->ms_power);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-static int channel_mode_from_lchan(struct rsl_ie_chan_mode *cm,
- struct gsm_lchan *lchan)
-{
- memset(cm, 0, sizeof(*cm));
-
- /* FIXME: what to do with data calls ? */
- cm->dtx_dtu = 0;
- if (lchan->ts->trx->bts->dtxu != GSM48_DTX_SHALL_NOT_BE_USED)
- cm->dtx_dtu |= RSL_CMOD_DTXu;
- if (lchan->ts->trx->bts->dtxd)
- cm->dtx_dtu |= RSL_CMOD_DTXd;
-
- /* set TCH Speech/Data */
- cm->spd_ind = lchan->rsl_cmode;
-
- if (lchan->rsl_cmode == RSL_CMOD_SPD_SIGN &&
- lchan->tch_mode != GSM48_CMODE_SIGN)
- LOGP(DRSL, LOGL_ERROR, "unsupported: rsl_mode == signalling, "
- "but tch_mode != signalling\n");
-
- switch (lchan->type) {
- case GSM_LCHAN_SDCCH:
- cm->chan_rt = RSL_CMOD_CRT_SDCCH;
- break;
- case GSM_LCHAN_TCH_F:
- cm->chan_rt = RSL_CMOD_CRT_TCH_Bm;
- break;
- case GSM_LCHAN_TCH_H:
- cm->chan_rt = RSL_CMOD_CRT_TCH_Lm;
- break;
- case GSM_LCHAN_NONE:
- case GSM_LCHAN_UNKNOWN:
- default:
- LOGP(DRSL, LOGL_ERROR,
- "unsupported activation lchan->type %u %s\n",
- lchan->type, gsm_lchant_name(lchan->type));
- return -EINVAL;
- }
-
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SIGN:
- cm->chan_rate = 0;
- break;
- case GSM48_CMODE_SPEECH_V1:
- cm->chan_rate = RSL_CMOD_SP_GSM1;
- break;
- case GSM48_CMODE_SPEECH_EFR:
- cm->chan_rate = RSL_CMOD_SP_GSM2;
- break;
- case GSM48_CMODE_SPEECH_AMR:
- cm->chan_rate = RSL_CMOD_SP_GSM3;
- break;
- case GSM48_CMODE_DATA_14k5:
- case GSM48_CMODE_DATA_12k0:
- case GSM48_CMODE_DATA_6k0:
- switch (lchan->csd_mode) {
- case LCHAN_CSD_M_NT:
- /* non-transparent CSD with RLP */
- switch (lchan->tch_mode) {
- case GSM48_CMODE_DATA_14k5:
- cm->chan_rate = RSL_CMOD_SP_NT_14k5;
- break;
- case GSM48_CMODE_DATA_12k0:
- cm->chan_rate = RSL_CMOD_SP_NT_12k0;
- break;
- case GSM48_CMODE_DATA_6k0:
- cm->chan_rate = RSL_CMOD_SP_NT_6k0;
- break;
- default:
- LOGP(DRSL, LOGL_ERROR,
- "unsupported lchan->tch_mode %u\n",
- lchan->tch_mode);
- return -EINVAL;
- }
- break;
- /* transparent data services below */
- case LCHAN_CSD_M_T_1200_75:
- cm->chan_rate = RSL_CMOD_CSD_T_1200_75;
- break;
- case LCHAN_CSD_M_T_600:
- cm->chan_rate = RSL_CMOD_CSD_T_600;
- break;
- case LCHAN_CSD_M_T_1200:
- cm->chan_rate = RSL_CMOD_CSD_T_1200;
- break;
- case LCHAN_CSD_M_T_2400:
- cm->chan_rate = RSL_CMOD_CSD_T_2400;
- break;
- case LCHAN_CSD_M_T_9600:
- cm->chan_rate = RSL_CMOD_CSD_T_9600;
- break;
- case LCHAN_CSD_M_T_14400:
- cm->chan_rate = RSL_CMOD_CSD_T_14400;
- break;
- case LCHAN_CSD_M_T_29000:
- cm->chan_rate = RSL_CMOD_CSD_T_29000;
- break;
- case LCHAN_CSD_M_T_32000:
- cm->chan_rate = RSL_CMOD_CSD_T_32000;
- break;
- default:
- LOGP(DRSL, LOGL_ERROR,
- "unsupported lchan->csd_mode %u\n",
- lchan->csd_mode);
- return -EINVAL;
- }
- break;
- default:
- LOGP(DRSL, LOGL_ERROR,
- "unsupported lchan->tch_mode %u\n",
- lchan->tch_mode);
- return -EINVAL;
- }
-
- return 0;
-}
-
-static void mr_config_for_bts(struct gsm_lchan *lchan, struct msgb *msg)
-{
- if (lchan->tch_mode == GSM48_CMODE_SPEECH_AMR)
- msgb_tlv_put(msg, RSL_IE_MR_CONFIG, lchan->mr_bts_lv[0],
- lchan->mr_bts_lv + 1);
-}
-
-static enum gsm_phys_chan_config pchan_for_lchant(enum gsm_chan_t type)
-{
- switch (type) {
- case GSM_LCHAN_TCH_F:
- return GSM_PCHAN_TCH_F;
- case GSM_LCHAN_TCH_H:
- return GSM_PCHAN_TCH_H;
- case GSM_LCHAN_NONE:
- case GSM_LCHAN_PDTCH:
- /* TODO: so far lchan->type is NONE in PDCH mode. PDTCH is only
- * used in osmo-bts. Maybe set PDTCH and drop the NONE case
- * here. */
- return GSM_PCHAN_PDCH;
- default:
- return GSM_PCHAN_UNKNOWN;
- }
-}
-
-/*! Tx simplified channel activation message for non-standard PDCH type. */
-static int rsl_chan_activate_lchan_as_pdch(struct gsm_lchan *lchan)
-{
- struct msgb *msg;
- struct abis_rsl_dchan_hdr *dh;
-
- /* This might be called after release of the second lchan of a TCH/H,
- * but PDCH activation must always happen on the first lchan. Make sure
- * the calling code passes the correct lchan. */
- OSMO_ASSERT(lchan == lchan->ts->lchan);
-
- rsl_lchan_set_state(lchan, LCHAN_S_ACT_REQ);
-
- msg = rsl_msgb_alloc();
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_CHAN_ACTIV);
- dh->chan_nr = gsm_lchan_as_pchan2chan_nr(lchan, GSM_PCHAN_PDCH);
-
- msgb_tv_put(msg, RSL_IE_ACT_TYPE, RSL_ACT_OSMO_PDCH);
-
- if (lchan->ts->trx->bts->type == GSM_BTS_TYPE_RBS2000 &&
- lchan->ts->trx->bts->rbs2000.use_superchannel) {
- const uint8_t eric_pgsl_tmr[] = { 30, 1 };
- msgb_tv_fixed_put(msg, RSL_IE_ERIC_PGSL_TIMERS,
- sizeof(eric_pgsl_tmr), eric_pgsl_tmr);
- }
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Chapter 8.4.1 */
-int rsl_chan_activate_lchan(struct gsm_lchan *lchan, uint8_t act_type,
- uint8_t ho_ref)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg;
- int rc;
- uint8_t *len;
- uint8_t ta;
-
- struct rsl_ie_chan_mode cm;
- struct gsm48_chan_desc cd;
-
- /* If a TCH_F/PDCH TS is in PDCH mode, deactivate PDCH first. */
- if (lchan->ts->pchan == GSM_PCHAN_TCH_F_PDCH
- && (lchan->ts->flags & TS_F_PDCH_ACTIVE)) {
- /* store activation type and handover reference */
- lchan->dyn.act_type = act_type;
- lchan->dyn.ho_ref = ho_ref;
- return rsl_ipacc_pdch_activate(lchan->ts, 0);
- }
-
- /*
- * If necessary, release PDCH on dynamic TS. Note that sending a
- * release here is only necessary when in PDCH mode; for TCH types, an
- * RSL RF Chan Release is initiated by the BTS when a voice call ends,
- * so when we reach this, it will already be released. If a dyn TS is
- * in PDCH mode, it is still active and we need to initiate a release
- * from the BSC side here.
- *
- * If pchan_is != pchan_want, the PDCH has already been taken down and
- * the switchover now needs to enable the TCH lchan.
- *
- * To switch a dyn TS between TCH/H and TCH/F, it is sufficient to send
- * a chan activ with the new lchan type, because it will already be
- * released.
- */
- if (lchan->ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH
- && lchan->ts->dyn.pchan_is == GSM_PCHAN_PDCH
- && lchan->ts->dyn.pchan_is == lchan->ts->dyn.pchan_want) {
- enum gsm_phys_chan_config pchan_want;
- pchan_want = pchan_for_lchant(lchan->type);
- if (lchan->ts->dyn.pchan_is != pchan_want) {
- /*
- * Make sure to record on lchan[0] so that we'll find
- * it after the PDCH release.
- */
- struct gsm_lchan *lchan0 = lchan->ts->lchan;
- lchan0->dyn.act_type = act_type,
- lchan0->dyn.ho_ref = ho_ref;
- lchan0->dyn.rqd_ref = lchan->rqd_ref;
- lchan0->dyn.rqd_ta = lchan->rqd_ta;
- lchan->rqd_ref = NULL;
- lchan->rqd_ta = 0;
- DEBUGP(DRSL, "%s saved rqd_ref=%p ta=%u\n",
- gsm_lchan_name(lchan0), lchan0->rqd_ref,
- lchan0->rqd_ta);
- return dyn_ts_switchover_start(lchan->ts, pchan_want);
- }
- }
-
- DEBUGP(DRSL, "%s Tx RSL Channel Activate with act_type=%s\n",
- gsm_ts_and_pchan_name(lchan->ts),
- rsl_act_type_name(act_type));
-
- if (act_type == RSL_ACT_OSMO_PDCH) {
- if (lchan->ts->pchan != GSM_PCHAN_TCH_F_TCH_H_PDCH) {
- LOGP(DRSL, LOGL_ERROR,
- "%s PDCH channel activation only allowed on %s\n",
- gsm_ts_and_pchan_name(lchan->ts),
- gsm_pchan_name(GSM_PCHAN_TCH_F_TCH_H_PDCH));
- return -EINVAL;
- }
- return rsl_chan_activate_lchan_as_pdch(lchan);
- }
-
- if (lchan->ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH
- && lchan->ts->dyn.pchan_want == GSM_PCHAN_PDCH) {
- LOGP(DRSL, LOGL_ERROR,
- "%s Expected PDCH activation kind\n",
- gsm_ts_and_pchan_name(lchan->ts));
- return -EINVAL;
- }
-
- rc = channel_mode_from_lchan(&cm, lchan);
- if (rc < 0) {
- LOGP(DRSL, LOGL_ERROR,
- "%s Cannot find channel mode from lchan type\n",
- gsm_ts_and_pchan_name(lchan->ts));
- return rc;
- }
-
- rsl_lchan_set_state(lchan, LCHAN_S_ACT_REQ);
-
- ta = lchan->rqd_ta;
-
- /* BS11 requires TA shifted by 2 bits */
- if (lchan->ts->trx->bts->type == GSM_BTS_TYPE_BS11)
- ta <<= 2;
-
- memset(&cd, 0, sizeof(cd));
- gsm48_lchan2chan_desc(&cd, lchan);
-
- msg = rsl_msgb_alloc();
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_CHAN_ACTIV);
-
- if (lchan->ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH)
- dh->chan_nr = gsm_lchan_as_pchan2chan_nr(
- lchan, lchan->ts->dyn.pchan_want);
- else
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
-
- msgb_tv_put(msg, RSL_IE_ACT_TYPE, act_type);
- msgb_tlv_put(msg, RSL_IE_CHAN_MODE, sizeof(cm),
- (uint8_t *) &cm);
-
- /*
- * The Channel Identification is needed for Phase1 phones
- * and it contains the GSM48 Channel Description and the
- * Mobile Allocation. The GSM 08.58 asks for the Mobile
- * Allocation to have a length of zero. We are using the
- * msgb_l3len to calculate the length of both messages.
- */
- msgb_v_put(msg, RSL_IE_CHAN_IDENT);
- len = msgb_put(msg, 1);
- msgb_tv_fixed_put(msg, GSM48_IE_CHANDESC_2, sizeof(cd), (const uint8_t *) &cd);
-
- if (lchan->ts->hopping.enabled)
- msgb_tlv_put(msg, GSM48_IE_MA_AFTER, lchan->ts->hopping.ma_len,
- lchan->ts->hopping.ma_data);
- else
- msgb_tlv_put(msg, GSM48_IE_MA_AFTER, 0, NULL);
-
- /* update the calculated size */
- msg->l3h = len + 1;
- *len = msgb_l3len(msg);
-
- if (lchan->encr.alg_id > RSL_ENC_ALG_A5(0)) {
- uint8_t encr_info[MAX_A5_KEY_LEN+2];
- rc = build_encr_info(encr_info, lchan);
- if (rc > 0)
- msgb_tlv_put(msg, RSL_IE_ENCR_INFO, rc, encr_info);
- }
-
- switch (act_type) {
- case RSL_ACT_INTER_ASYNC:
- case RSL_ACT_INTER_SYNC:
- msgb_tv_put(msg, RSL_IE_HANDO_REF, ho_ref);
- break;
- default:
- break;
- }
-
- msgb_tv_put(msg, RSL_IE_BS_POWER, lchan->bs_power);
- msgb_tv_put(msg, RSL_IE_MS_POWER, lchan->ms_power);
- msgb_tv_put(msg, RSL_IE_TIMING_ADVANCE, ta);
- mr_config_for_bts(lchan, msg);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Chapter 8.4.9: Modify channel mode on BTS side */
-int rsl_chan_mode_modify_req(struct gsm_lchan *lchan)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg;
- int rc;
-
- uint8_t chan_nr = gsm_lchan2chan_nr(lchan);
- struct rsl_ie_chan_mode cm;
-
- rc = channel_mode_from_lchan(&cm, lchan);
- if (rc < 0)
- return rc;
-
- msg = rsl_msgb_alloc();
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_MODE_MODIFY_REQ);
- dh->chan_nr = chan_nr;
-
- msgb_tlv_put(msg, RSL_IE_CHAN_MODE, sizeof(cm),
- (uint8_t *) &cm);
-
- if (lchan->encr.alg_id > RSL_ENC_ALG_A5(0)) {
- uint8_t encr_info[MAX_A5_KEY_LEN+2];
- rc = build_encr_info(encr_info, lchan);
- if (rc > 0)
- msgb_tlv_put(msg, RSL_IE_ENCR_INFO, rc, encr_info);
- }
-
- mr_config_for_bts(lchan, msg);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Chapter 8.4.6: Send the encryption command with given L3 info */
-int rsl_encryption_cmd(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct gsm_lchan *lchan = msg->lchan;
- uint8_t chan_nr = gsm_lchan2chan_nr(lchan);
- uint8_t encr_info[MAX_A5_KEY_LEN+2];
- uint8_t l3_len = msg->len;
- int rc;
-
- /* First push the L3 IE tag and length */
- msgb_tv16_push(msg, RSL_IE_L3_INFO, l3_len);
-
- /* then the link identifier (SAPI0, main sign link) */
- msgb_tv_push(msg, RSL_IE_LINK_IDENT, 0);
-
- /* then encryption information */
- rc = build_encr_info(encr_info, lchan);
- if (rc <= 0)
- return rc;
- msgb_tlv_push(msg, RSL_IE_ENCR_INFO, rc, encr_info);
-
- /* and finally the DCHAN header */
- dh = (struct abis_rsl_dchan_hdr *) msgb_push(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_ENCR_CMD);
- dh->chan_nr = chan_nr;
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Chapter 8.4.5 / 4.6: Deactivate the SACCH after 04.08 RR CHAN RELEASE */
-int rsl_deact_sacch(struct gsm_lchan *lchan)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg = rsl_msgb_alloc();
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_DEACTIVATE_SACCH);
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
-
- msg->lchan = lchan;
- msg->dst = lchan->ts->trx->rsl_link;
-
- DEBUGP(DRSL, "%s DEACTivate SACCH CMD\n", gsm_lchan_name(lchan));
-
- return abis_rsl_sendmsg(msg);
-}
-
-static bool dyn_ts_should_switch_to_pdch(struct gsm_bts_trx_ts *ts)
-{
- int ss;
-
- if (ts->pchan != GSM_PCHAN_TCH_F_TCH_H_PDCH)
- return false;
-
- if (ts->trx->bts->gprs.mode == BTS_GPRS_NONE)
- return false;
-
- /* Already in PDCH mode? */
- if (ts->dyn.pchan_is == GSM_PCHAN_PDCH)
- return false;
-
- /* See if all lchans are released. */
- for (ss = 0; ss < ts_subslots(ts); ss++) {
- struct gsm_lchan *lc = &ts->lchan[ss];
- if (lc->state != LCHAN_S_NONE) {
- DEBUGP(DRSL, "%s lchan %u still in use"
- " (type=%s,state=%s)\n",
- gsm_ts_and_pchan_name(ts), lc->nr,
- gsm_lchant_name(lc->type),
- gsm_lchans_name(lc->state));
- /* An lchan is still used. */
- return false;
- }
- }
-
- /* All channels are released, go to PDCH mode. */
- DEBUGP(DRSL, "%s back to PDCH\n",
- gsm_ts_and_pchan_name(ts));
- return true;
-}
-
-static void error_timeout_cb(void *data)
-{
- struct gsm_lchan *lchan = data;
- if (lchan->state != LCHAN_S_REL_ERR) {
- LOGP(DRSL, LOGL_ERROR, "%s error timeout but not in error state: %d\n",
- gsm_lchan_name(lchan), lchan->state);
- return;
- }
-
- /* go back to the none state */
- LOGP(DRSL, LOGL_INFO, "%s is back in operation.\n", gsm_lchan_name(lchan));
- rsl_lchan_set_state(lchan, LCHAN_S_NONE);
-
- /* Put PDCH channel back into PDCH mode, if GPRS is enabled */
- if (lchan->ts->pchan == GSM_PCHAN_TCH_F_PDCH
- && lchan->ts->trx->bts->gprs.mode != BTS_GPRS_NONE)
- rsl_ipacc_pdch_activate(lchan->ts, 1);
-
- if (dyn_ts_should_switch_to_pdch(lchan->ts))
- dyn_ts_switchover_start(lchan->ts, GSM_PCHAN_PDCH);
-}
-
-static int rsl_rx_rf_chan_rel_ack(struct gsm_lchan *lchan);
-
-/* Chapter 8.4.14 / 4.7: Tell BTS to release the radio channel */
-static int rsl_rf_chan_release(struct gsm_lchan *lchan, int error,
- enum sacch_deact deact_sacch)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg;
- int rc;
-
- /* Stop timers that should lead to a channel release */
- osmo_timer_del(&lchan->T3109);
-
- if (lchan->state == LCHAN_S_REL_ERR) {
- LOGP(DRSL, LOGL_NOTICE, "%s is in error state, not sending release.\n",
- gsm_lchan_name(lchan));
- return -1;
- }
-
- msg = rsl_msgb_alloc();
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_RF_CHAN_REL);
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
-
- msg->lchan = lchan;
- msg->dst = lchan->ts->trx->rsl_link;
-
- if (error)
- DEBUGP(DRSL, "%s RF Channel Release due to error: %d\n",
- gsm_lchan_name(lchan), error);
- else
- DEBUGP(DRSL, "%s RF Channel Release\n", gsm_lchan_name(lchan));
-
- if (error) {
- /*
- * FIXME: GSM 04.08 gives us two options for the abnormal
- * chanel release. This can be either like in the non-existent
- * sub-lcuase 3.5.1 or for the main signalling link deactivate
- * the SACCH, start timer T3109 and consider the channel as
- * released.
- *
- * This code is doing the later for all raido links and not
- * only the main link. Right now all SAPIs are released on the
- * local end, the SACCH will be de-activated and right now the
- * T3111 will be started. First T3109 should be started and then
- * the T3111.
- *
- * TODO: Move this out of the function.
- */
-
- /*
- * sacch de-activate and "local end release"
- */
- if (deact_sacch == SACCH_DEACTIVATE)
- rsl_deact_sacch(lchan);
- rsl_release_sapis_from(lchan, 0, RSL_REL_LOCAL_END);
-
- /*
- * TODO: start T3109 now.
- */
- rsl_lchan_set_state(lchan, LCHAN_S_REL_ERR);
- }
-
- /* Start another timer or assume the BTS sends a ACK/NACK? */
- osmo_timer_setup(&lchan->act_timer, lchan_deact_tmr_cb, lchan);
- osmo_timer_schedule(&lchan->act_timer, 4, 0);
-
- rc = abis_rsl_sendmsg(msg);
-
- /* BTS will respond by RF CHAN REL ACK */
- return rc;
-}
-
-/*
- * Special handling for channel releases in the error case.
- */
-static int rsl_rf_chan_release_err(struct gsm_lchan *lchan)
-{
- enum sacch_deact sacch_deact;
- if (lchan->state != LCHAN_S_ACTIVE)
- return 0;
- switch (ts_pchan(lchan->ts)) {
- case GSM_PCHAN_TCH_F:
- case GSM_PCHAN_TCH_H:
- case GSM_PCHAN_CCCH_SDCCH4:
- case GSM_PCHAN_CCCH_SDCCH4_CBCH:
- case GSM_PCHAN_SDCCH8_SACCH8C:
- case GSM_PCHAN_SDCCH8_SACCH8C_CBCH:
- sacch_deact = SACCH_DEACTIVATE;
- break;
- default:
- sacch_deact = SACCH_NONE;
- break;
- }
- return rsl_rf_chan_release(lchan, 1, sacch_deact);
-}
-
-static int rsl_rx_rf_chan_rel_ack(struct gsm_lchan *lchan)
-{
- struct gsm_bts_trx_ts *ts = lchan->ts;
-
- DEBUGP(DRSL, "%s RF CHANNEL RELEASE ACK\n", gsm_lchan_name(lchan));
-
- /* Stop all pending timers */
- osmo_timer_del(&lchan->act_timer);
- osmo_timer_del(&lchan->T3111);
-
- /*
- * The BTS didn't respond within the timeout to our channel
- * release request and we have marked the channel as broken.
- * Now we do receive an ACK and let's be conservative. If it
- * is a sysmoBTS we know that only one RF Channel Release ACK
- * will be sent. So let's "repair" the channel.
- */
- if (lchan->state == LCHAN_S_BROKEN) {
- int do_free = is_sysmobts_v2(ts->trx->bts);
- LOGP(DRSL, LOGL_NOTICE,
- "%s CHAN REL ACK for broken channel. %s.\n",
- gsm_lchan_name(lchan),
- do_free ? "Releasing it" : "Keeping it broken");
- if (do_free)
- do_lchan_free(lchan);
- if (dyn_ts_should_switch_to_pdch(lchan->ts))
- dyn_ts_switchover_start(lchan->ts, GSM_PCHAN_PDCH);
- return 0;
- }
-
- if (lchan->state != LCHAN_S_REL_REQ && lchan->state != LCHAN_S_REL_ERR)
- LOGP(DRSL, LOGL_NOTICE, "%s CHAN REL ACK but state %s\n",
- gsm_lchan_name(lchan),
- gsm_lchans_name(lchan->state));
-
- do_lchan_free(lchan);
-
- /*
- * Check Osmocom RSL CHAN ACT style dynamic TCH/F_TCH/H_PDCH TS for pending
- * transitions in these cases:
- *
- * a) after PDCH was released due to switchover request, activate TCH.
- * BSC initiated this switchover, so dyn.pchan_is != pchan_want and
- * lchan->type has been set to the desired GSM_LCHAN_*.
- *
- * b) Voice call ended and a TCH is released. If the TS is now unused,
- * switch to PDCH. Here still dyn.pchan_is == dyn.pchan_want because
- * we're only just notified and may decide to switch to PDCH now.
- */
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH) {
- DEBUGP(DRSL, "%s Rx RSL Channel Release ack for lchan %u\n",
- gsm_ts_and_pchan_name(ts), lchan->nr);
-
- /* (a) */
- if (ts->dyn.pchan_is != ts->dyn.pchan_want)
- return dyn_ts_switchover_continue(ts);
-
- /* (b) */
- if (dyn_ts_should_switch_to_pdch(ts))
- return dyn_ts_switchover_start(ts, GSM_PCHAN_PDCH);
- }
-
- /*
- * Put a dynamic TCH/F_PDCH channel back to PDCH mode iff it was
- * released successfully. If in error, the PDCH ACT will follow after
- * T3111 in error_timeout_cb().
- *
- * Any state other than LCHAN_S_REL_ERR became LCHAN_S_NONE after above
- * do_lchan_free(). Assert this, because that's what ensures a PDCH ACT
- * on a TCH/F_PDCH TS in all cases.
- *
- * If GPRS is disabled, always skip the PDCH ACT.
- */
- OSMO_ASSERT(lchan->state == LCHAN_S_NONE
- || lchan->state == LCHAN_S_REL_ERR);
- if (ts->trx->bts->gprs.mode == BTS_GPRS_NONE)
- return 0;
- if (ts->pchan == GSM_PCHAN_TCH_F_PDCH
- && lchan->state == LCHAN_S_NONE)
- return rsl_ipacc_pdch_activate(ts, 1);
- return 0;
-}
-
-int rsl_paging_cmd(struct gsm_bts *bts, uint8_t paging_group, uint8_t len,
- uint8_t *ms_ident, uint8_t chan_needed, bool is_gprs)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *msg = rsl_msgb_alloc();
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_PAGING_CMD);
- dh->chan_nr = RSL_CHAN_PCH_AGCH;
-
- msgb_tv_put(msg, RSL_IE_PAGING_GROUP, paging_group);
- msgb_tlv_put(msg, RSL_IE_MS_IDENTITY, len-2, ms_ident+2);
- msgb_tv_put(msg, RSL_IE_CHAN_NEEDED, chan_needed);
-
- /* Ericsson wants to have this IE in case a paging message
- * relates to packet paging */
- if (bts->type == GSM_BTS_TYPE_RBS2000 && is_gprs)
- msgb_tv_put(msg, RSL_IE_ERIC_PACKET_PAG_IND, 0);
-
- msg->dst = bts->c0->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int imsi_str2bcd(uint8_t *bcd_out, const char *str_in)
-{
- int i, len = strlen(str_in);
-
- for (i = 0; i < len; i++) {
- int num = str_in[i] - 0x30;
- if (num < 0 || num > 9)
- return -1;
- if (i % 2 == 0)
- bcd_out[i/2] = num;
- else
- bcd_out[i/2] |= (num << 4);
- }
-
- return 0;
-}
-
-/* Chapter 8.5.6 */
-struct msgb *rsl_imm_assign_cmd_common(struct gsm_bts *bts, uint8_t len, uint8_t *val)
-{
- struct msgb *msg = rsl_msgb_alloc();
- struct abis_rsl_dchan_hdr *dh;
- uint8_t buf[GSM_MACBLOCK_LEN];
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_IMMEDIATE_ASSIGN_CMD);
- dh->chan_nr = RSL_CHAN_PCH_AGCH;
-
- switch (bts->type) {
- case GSM_BTS_TYPE_BS11:
- msgb_tlv_put(msg, RSL_IE_IMM_ASS_INFO, len, val);
- break;
- default:
- /* If phase 2, construct a FULL_IMM_ASS_INFO */
- pad_macblock(buf, val, len);
- msgb_tlv_put(msg, RSL_IE_FULL_IMM_ASS_INFO, GSM_MACBLOCK_LEN,
- buf);
- break;
- }
-
- msg->dst = bts->c0->rsl_link;
- return msg;
-}
-
-/* Chapter 8.5.6 */
-int rsl_imm_assign_cmd(struct gsm_bts *bts, uint8_t len, uint8_t *val)
-{
- struct msgb *msg = rsl_imm_assign_cmd_common(bts, len, val);
- if (!msg)
- return 1;
- return abis_rsl_sendmsg(msg);
-}
-
-/* Chapter 8.5.6 */
-int rsl_ericsson_imm_assign_cmd(struct gsm_bts *bts, uint32_t tlli, uint8_t len, uint8_t *val)
-{
- struct msgb *msg = rsl_imm_assign_cmd_common(bts, len, val);
- if (!msg)
- return 1;
-
- /* ericsson can handle a reference at the end of the message which is used in
- * the confirm message. The confirm message is only sent if the trailer is present */
- msgb_put_u8(msg, RSL_IE_ERIC_MOBILE_ID);
- msgb_put_u32(msg, tlli);
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Send Siemens specific MS RF Power Capability Indication */
-int rsl_siemens_mrpci(struct gsm_lchan *lchan, struct rsl_mrpci *mrpci)
-{
- struct msgb *msg = rsl_msgb_alloc();
- struct abis_rsl_dchan_hdr *dh;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_SIEMENS_MRPCI);
- dh->c.msg_discr = ABIS_RSL_MDISC_DED_CHAN;
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
- msgb_tv_put(msg, RSL_IE_SIEMENS_MRPCI, *(uint8_t *)mrpci);
-
- DEBUGP(DRSL, "%s TX Siemens MRPCI 0x%02x\n",
- gsm_lchan_name(lchan), *(uint8_t *)mrpci);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-
-/* Send "DATA REQUEST" message with given L3 Info payload */
-/* Chapter 8.3.1 */
-int rsl_data_request(struct msgb *msg, uint8_t link_id)
-{
- if (msg->lchan == NULL) {
- LOGP(DRSL, LOGL_ERROR, "cannot send DATA REQUEST to unknown lchan\n");
- return -EINVAL;
- }
-
- rsl_rll_push_l3(msg, RSL_MT_DATA_REQ, gsm_lchan2chan_nr(msg->lchan),
- link_id, 1);
-
- msg->dst = msg->lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* Send "ESTABLISH REQUEST" message with given L3 Info payload */
-/* Chapter 8.3.1 */
-int rsl_establish_request(struct gsm_lchan *lchan, uint8_t link_id)
-{
- struct msgb *msg;
-
- msg = rsl_rll_simple(RSL_MT_EST_REQ, gsm_lchan2chan_nr(lchan),
- link_id, 0);
- msg->dst = lchan->ts->trx->rsl_link;
-
- DEBUGP(DRLL, "%s RSL RLL ESTABLISH REQ (link_id=0x%02x)\n",
- gsm_lchan_name(lchan), link_id);
-
- return abis_rsl_sendmsg(msg);
-}
-
-static void rsl_handle_release(struct gsm_lchan *lchan);
-
-/* Special work handler to handle missing RSL_MT_REL_CONF message from
- * Nokia InSite BTS */
-static void lchan_rel_work_cb(void *data)
-{
- struct gsm_lchan *lchan = data;
- int sapi;
-
- for (sapi = 0; sapi < ARRAY_SIZE(lchan->sapis); ++sapi) {
- if (lchan->sapis[sapi] == LCHAN_SAPI_REL)
- lchan->sapis[sapi] = LCHAN_SAPI_UNUSED;
- }
- rsl_handle_release(lchan);
-}
-
-/* Chapter 8.3.7 Request the release of multiframe mode of RLL connection.
- This is what higher layers should call. The BTS then responds with
- RELEASE CONFIRM, which we in turn use to trigger RSL CHANNEL RELEASE,
- which in turn is acknowledged by RSL CHANNEL RELEASE ACK, which calls
- lchan_free() */
-int rsl_release_request(struct gsm_lchan *lchan, uint8_t link_id,
- enum rsl_rel_mode release_mode)
-{
-
- struct msgb *msg;
-
- msg = rsl_rll_simple(RSL_MT_REL_REQ, gsm_lchan2chan_nr(lchan),
- link_id, 0);
- /* 0 is normal release, 1 is local end */
- msgb_tv_put(msg, RSL_IE_RELEASE_MODE, release_mode);
-
- /* FIXME: start some timer in case we don't receive a REL ACK ? */
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- DEBUGP(DRLL, "%s RSL RLL RELEASE REQ (link_id=0x%02x, reason=%u)\n",
- gsm_lchan_name(lchan), link_id, release_mode);
-
- abis_rsl_sendmsg(msg);
-
- /* Do not wait for Nokia BTS to send the confirm. */
- if (is_nokia_bts(lchan->ts->trx->bts)
- && lchan->ts->trx->bts->nokia.no_loc_rel_cnf
- && release_mode == RSL_REL_LOCAL_END) {
- DEBUGP(DRLL, "Scheduling release, becasuse Nokia InSite BTS does not send a RELease CONFirm.\n");
- lchan->sapis[link_id & 0x7] = LCHAN_SAPI_REL;
- osmo_timer_setup(&lchan->rel_work, lchan_rel_work_cb, lchan);
- osmo_timer_schedule(&lchan->rel_work, 0, 0);
- }
-
- return 0;
-}
-
-int rsl_lchan_mark_broken(struct gsm_lchan *lchan, const char *reason)
-{
- LOGP(DRSL, LOGL_ERROR, "%s %s lchan broken: %s\n",
- gsm_lchan_name(lchan), gsm_lchant_name(lchan->type), reason);
- rsl_lchan_set_state(lchan, LCHAN_S_BROKEN);
- lchan->broken_reason = reason;
- return 0;
-}
-
-int rsl_lchan_set_state(struct gsm_lchan *lchan, int state)
-{
- DEBUGP(DRSL, "%s state %s -> %s\n",
- gsm_lchan_name(lchan), gsm_lchans_name(lchan->state),
- gsm_lchans_name(state));
- lchan->state = state;
- return 0;
-}
-
-/* Chapter 8.4.2: Channel Activate Acknowledge */
-static int rsl_rx_chan_act_ack(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *rslh = msgb_l2(msg);
- struct gsm_lchan *lchan = msg->lchan;
- struct gsm_bts_trx_ts *ts = lchan->ts;
-
- /* BTS has confirmed channel activation, we now need
- * to assign the activated channel to the MS */
- if (rslh->ie_chan != RSL_IE_CHAN_NR)
- return -EINVAL;
-
- osmo_timer_del(&lchan->act_timer);
-
- if (lchan->state == LCHAN_S_BROKEN) {
- int do_release = is_sysmobts_v2(ts->trx->bts);
- LOGP(DRSL, LOGL_NOTICE, "%s CHAN ACT ACK for broken channel. %s\n",
- gsm_lchan_name(lchan),
- do_release ? "Releasing it" : "Keeping it broken");
- if (do_release) {
- talloc_free(lchan->rqd_ref);
- lchan->rqd_ref = NULL;
- lchan->rqd_ta = 0;
- rsl_lchan_set_state(msg->lchan, LCHAN_S_ACTIVE);
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH) {
- /*
- * lchan_act_tmr_cb() already called
- * lchan_free() and cleared the lchan->type, so
- * calling dyn_ts_switchover_complete() here
- * would not have the desired effect of
- * mimicking an activated lchan that we can
- * release. Instead hack the dyn ts state to
- * make sure that rsl_rx_rf_chan_rel_ack() will
- * switch back to PDCH, i.e. have pchan_is ==
- * pchan_want, both != GSM_PCHAN_PDCH:
- */
- ts->dyn.pchan_is = GSM_PCHAN_NONE;
- ts->dyn.pchan_want = GSM_PCHAN_NONE;
- }
- rsl_rf_chan_release(msg->lchan, 0, SACCH_NONE);
- }
- return 0;
- }
-
- if (lchan->state != LCHAN_S_ACT_REQ)
- LOGP(DRSL, LOGL_NOTICE, "%s CHAN ACT ACK, but state %s\n",
- gsm_lchan_name(lchan),
- gsm_lchans_name(lchan->state));
- rsl_lchan_set_state(lchan, LCHAN_S_ACTIVE);
-
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH)
- dyn_ts_switchover_complete(lchan);
-
- if (lchan->rqd_ref) {
- rsl_send_imm_assignment(lchan);
- talloc_free(lchan->rqd_ref);
- lchan->rqd_ref = NULL;
- lchan->rqd_ta = 0;
- }
-
- send_lchan_signal(S_LCHAN_ACTIVATE_ACK, lchan, NULL);
-
- /* Update bts attributes inside the PCU */
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH ||
- ts->pchan == GSM_PCHAN_TCH_F_PDCH ||
- ts->pchan == GSM_PCHAN_PDCH)
- pcu_info_update(ts->trx->bts);
-
- return 0;
-}
-
-/* Chapter 8.4.3: Channel Activate NACK */
-static int rsl_rx_chan_act_nack(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tp;
-
- osmo_timer_del(&msg->lchan->act_timer);
-
- if (msg->lchan->state == LCHAN_S_BROKEN) {
- LOGP(DRSL, LOGL_ERROR,
- "%s CHANNEL ACTIVATE NACK for broken channel.\n",
- gsm_lchan_name(msg->lchan));
- return -1;
- }
-
- LOGP(DRSL, LOGL_ERROR, "%s CHANNEL ACTIVATE NACK ",
- gsm_lchan_name(msg->lchan));
-
- /* BTS has rejected channel activation ?!? */
- if (dh->ie_chan != RSL_IE_CHAN_NR)
- return -EINVAL;
-
- rsl_tlv_parse(&tp, dh->data, msgb_l2len(msg)-sizeof(*dh));
- if (TLVP_PRESENT(&tp, RSL_IE_CAUSE)) {
- const uint8_t *cause = TLVP_VAL(&tp, RSL_IE_CAUSE);
- print_rsl_cause(LOGL_ERROR, cause,
- TLVP_LEN(&tp, RSL_IE_CAUSE));
- msg->lchan->error_cause = *cause;
- if (*cause != RSL_ERR_RCH_ALR_ACTV_ALLOC) {
- rsl_lchan_mark_broken(msg->lchan, "NACK on activation");
- } else
- rsl_rf_chan_release(msg->lchan, 1, SACCH_DEACTIVATE);
-
- } else {
- rsl_lchan_mark_broken(msg->lchan, "NACK on activation no IE");
- }
-
- LOGPC(DRSL, LOGL_ERROR, "\n");
-
- send_lchan_signal(S_LCHAN_ACTIVATE_NACK, msg->lchan, NULL);
- return 0;
-}
-
-/* Chapter 8.4.4: Connection Failure Indication */
-static int rsl_rx_conn_fail(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tp;
-
- LOGP(DRSL, LOGL_NOTICE, "%s CONNECTION FAIL: RELEASING state %s ",
- gsm_lchan_name(msg->lchan),
- gsm_lchans_name(msg->lchan->state));
-
- rsl_tlv_parse(&tp, dh->data, msgb_l2len(msg)-sizeof(*dh));
-
- if (TLVP_PRESENT(&tp, RSL_IE_CAUSE))
- print_rsl_cause(LOGL_NOTICE, TLVP_VAL(&tp, RSL_IE_CAUSE),
- TLVP_LEN(&tp, RSL_IE_CAUSE));
-
- LOGPC(DRSL, LOGL_NOTICE, "\n");
- rate_ctr_inc(&msg->lchan->ts->trx->bts->network->bsc_ctrs->ctr[BSC_CTR_CHAN_RF_FAIL]);
- return rsl_rf_chan_release_err(msg->lchan);
-}
-
-static void print_meas_rep_uni(struct gsm_meas_rep_unidir *mru,
- const char *prefix)
-{
- DEBUGPC(DMEAS, "RXL-FULL-%s=%3ddBm RXL-SUB-%s=%3ddBm ",
- prefix, rxlev2dbm(mru->full.rx_lev),
- prefix, rxlev2dbm(mru->sub.rx_lev));
- DEBUGPC(DMEAS, "RXQ-FULL-%s=%d RXQ-SUB-%s=%d ",
- prefix, mru->full.rx_qual, prefix, mru->sub.rx_qual);
-}
-
-static void print_meas_rep(struct gsm_lchan *lchan, struct gsm_meas_rep *mr)
-{
- int i;
- const char *name = "";
-
- if (lchan && lchan->conn) {
- if (lchan->conn->bsub)
- name = bsc_subscr_name(lchan->conn->bsub);
- else
- name = lchan->name;
- }
-
- DEBUGP(DMEAS, "[%s] MEASUREMENT RESULT NR=%d ", name, mr->nr);
-
- if (mr->flags & MEAS_REP_F_DL_DTX)
- DEBUGPC(DMEAS, "DTXd ");
-
- print_meas_rep_uni(&mr->ul, "ul");
- DEBUGPC(DMEAS, "BS_POWER=%d ", mr->bs_power);
-
- if (mr->flags & MEAS_REP_F_MS_TO)
- DEBUGPC(DMEAS, "MS_TO=%d ", mr->ms_timing_offset);
-
- if (mr->flags & MEAS_REP_F_MS_L1) {
- DEBUGPC(DMEAS, "L1_MS_PWR=%3ddBm ", mr->ms_l1.pwr);
- DEBUGPC(DMEAS, "L1_FPC=%u ",
- mr->flags & MEAS_REP_F_FPC ? 1 : 0);
- DEBUGPC(DMEAS, "L1_TA=%u ", mr->ms_l1.ta);
- }
-
- if (mr->flags & MEAS_REP_F_UL_DTX)
- DEBUGPC(DMEAS, "DTXu ");
- if (mr->flags & MEAS_REP_F_BA1)
- DEBUGPC(DMEAS, "BA1 ");
- if (!(mr->flags & MEAS_REP_F_DL_VALID))
- DEBUGPC(DMEAS, "NOT VALID ");
- else
- print_meas_rep_uni(&mr->dl, "dl");
-
- DEBUGPC(DMEAS, "NUM_NEIGH=%u\n", mr->num_cell);
- if (mr->num_cell == 7)
- return;
- for (i = 0; i < mr->num_cell; i++) {
- struct gsm_meas_rep_cell *mrc = &mr->cell[i];
- DEBUGP(DMEAS, "IDX=%u ARFCN=%u BSIC=%u => %d dBm\n",
- mrc->neigh_idx, mrc->arfcn, mrc->bsic, rxlev2dbm(mrc->rxlev));
- }
-}
-
-static struct gsm_meas_rep *lchan_next_meas_rep(struct gsm_lchan *lchan)
-{
- struct gsm_meas_rep *meas_rep;
-
- meas_rep = &lchan->meas_rep[lchan->meas_rep_idx];
- memset(meas_rep, 0, sizeof(*meas_rep));
- meas_rep->lchan = lchan;
- lchan->meas_rep_idx = (lchan->meas_rep_idx + 1)
- % ARRAY_SIZE(lchan->meas_rep);
-
- return meas_rep;
-}
-
-static int rsl_rx_meas_res(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tp;
- struct gsm_meas_rep *mr = lchan_next_meas_rep(msg->lchan);
- uint8_t len;
- const uint8_t *val;
- int rc;
-
- /* check if this channel is actually active */
- /* FIXME: maybe this check should be way more generic/centralized */
- if (msg->lchan->state != LCHAN_S_ACTIVE) {
- LOGP(DRSL, LOGL_DEBUG, "%s: MEAS RES for inactive channel\n",
- gsm_lchan_name(msg->lchan));
- return 0;
- }
-
- memset(mr, 0, sizeof(*mr));
- mr->lchan = msg->lchan;
-
- rsl_tlv_parse(&tp, dh->data, msgb_l2len(msg)-sizeof(*dh));
-
- if (!TLVP_PRESENT(&tp, RSL_IE_MEAS_RES_NR) ||
- !TLVP_PRESENT(&tp, RSL_IE_UPLINK_MEAS) ||
- !TLVP_PRESENT(&tp, RSL_IE_BS_POWER))
- return -EIO;
-
- /* Mandatory Parts */
- mr->nr = *TLVP_VAL(&tp, RSL_IE_MEAS_RES_NR);
-
- len = TLVP_LEN(&tp, RSL_IE_UPLINK_MEAS);
- val = TLVP_VAL(&tp, RSL_IE_UPLINK_MEAS);
- if (len >= 3) {
- if (val[0] & 0x40)
- mr->flags |= MEAS_REP_F_DL_DTX;
- mr->ul.full.rx_lev = val[0] & 0x3f;
- mr->ul.sub.rx_lev = val[1] & 0x3f;
- mr->ul.full.rx_qual = val[2]>>3 & 0x7;
- mr->ul.sub.rx_qual = val[2] & 0x7;
- }
-
- mr->bs_power = *TLVP_VAL(&tp, RSL_IE_BS_POWER);
-
- /* Optional Parts */
- if (TLVP_PRESENT(&tp, RSL_IE_MS_TIMING_OFFSET)) {
- /* According to 3GPP TS 48.058 § MS Timing Offset = Timing Offset field - 63 */
- mr->ms_timing_offset = *TLVP_VAL(&tp, RSL_IE_MS_TIMING_OFFSET) - 63;
- mr->flags |= MEAS_REP_F_MS_TO;
- }
-
- if (TLVP_PRESENT(&tp, RSL_IE_L1_INFO)) {
- struct e1inp_sign_link *sign_link = msg->dst;
-
- val = TLVP_VAL(&tp, RSL_IE_L1_INFO);
- mr->flags |= MEAS_REP_F_MS_L1;
- mr->ms_l1.pwr = ms_pwr_dbm(sign_link->trx->bts->band, val[0] >> 3);
- if (val[0] & 0x04)
- mr->flags |= MEAS_REP_F_FPC;
- mr->ms_l1.ta = val[1];
- /* BS11 and Nokia reports TA shifted by 2 bits */
- if (msg->lchan->ts->trx->bts->type == GSM_BTS_TYPE_BS11
- || msg->lchan->ts->trx->bts->type == GSM_BTS_TYPE_NOKIA_SITE)
- mr->ms_l1.ta >>= 2;
- }
- if (TLVP_PRESENT(&tp, RSL_IE_L3_INFO)) {
- msg->l3h = (uint8_t *) TLVP_VAL(&tp, RSL_IE_L3_INFO);
- rc = gsm48_parse_meas_rep(mr, msg);
- if (rc < 0)
- return rc;
- }
-
- print_meas_rep(msg->lchan, mr);
-
- send_lchan_signal(S_LCHAN_MEAS_REP, msg->lchan, mr);
-
- return 0;
-}
-
-/* Chapter 8.4.7 */
-static int rsl_rx_hando_det(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tp;
-
- DEBUGP(DRSL, "%s HANDOVER DETECT ", gsm_lchan_name(msg->lchan));
-
- rsl_tlv_parse(&tp, dh->data, msgb_l2len(msg)-sizeof(*dh));
-
- if (TLVP_PRESENT(&tp, RSL_IE_ACCESS_DELAY))
- DEBUGPC(DRSL, "access delay = %u\n",
- *TLVP_VAL(&tp, RSL_IE_ACCESS_DELAY));
- else
- DEBUGPC(DRSL, "\n");
-
- send_lchan_signal(S_LCHAN_HANDOVER_DETECT, msg->lchan, NULL);
-
- return 0;
-}
-
-static bool lchan_may_change_pdch(struct gsm_lchan *lchan, bool pdch_act)
-{
- struct gsm_bts_trx_ts *ts;
-
- OSMO_ASSERT(lchan);
-
- ts = lchan->ts;
- OSMO_ASSERT(ts);
- OSMO_ASSERT(ts->trx);
- OSMO_ASSERT(ts->trx->bts);
-
- if (lchan->ts->pchan != GSM_PCHAN_TCH_F_PDCH) {
- LOGP(DRSL, LOGL_ERROR, "%s pchan=%s Rx PDCH %s ACK"
- " for channel that is no TCH/F_PDCH\n",
- gsm_lchan_name(lchan),
- gsm_pchan_name(ts->pchan),
- pdch_act? "ACT" : "DEACT");
- return false;
- }
-
- if (lchan->state != LCHAN_S_NONE) {
- LOGP(DRSL, LOGL_ERROR, "%s pchan=%s Rx PDCH %s ACK"
- " in unexpected state: %s\n",
- gsm_lchan_name(lchan),
- gsm_pchan_name(ts->pchan),
- pdch_act? "ACT" : "DEACT",
- gsm_lchans_name(lchan->state));
- return false;
- }
- return true;
-}
-
-static int rsl_rx_pdch_act_ack(struct msgb *msg)
-{
- if (!lchan_may_change_pdch(msg->lchan, true))
- return -EINVAL;
-
- msg->lchan->ts->flags |= TS_F_PDCH_ACTIVE;
- msg->lchan->ts->flags &= ~TS_F_PDCH_ACT_PENDING;
-
- return 0;
-}
-
-static int rsl_rx_pdch_deact_ack(struct msgb *msg)
-{
- if (!lchan_may_change_pdch(msg->lchan, false))
- return -EINVAL;
-
- msg->lchan->ts->flags &= ~TS_F_PDCH_ACTIVE;
- msg->lchan->ts->flags &= ~TS_F_PDCH_DEACT_PENDING;
-
- rsl_chan_activate_lchan(msg->lchan, msg->lchan->dyn.act_type,
- msg->lchan->dyn.ho_ref);
-
- return 0;
-}
-
-static int abis_rsl_rx_dchan(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *rslh = msgb_l2(msg);
- int rc = 0;
- char *ts_name;
- struct e1inp_sign_link *sign_link = msg->dst;
-
- msg->lchan = lchan_lookup(sign_link->trx, rslh->chan_nr,
- "Abis RSL rx DCHAN: ");
- if (!msg->lchan)
- return -1;
- ts_name = gsm_lchan_name(msg->lchan);
-
- switch (rslh->c.msg_type) {
- case RSL_MT_CHAN_ACTIV_ACK:
- DEBUGP(DRSL, "%s CHANNEL ACTIVATE ACK\n", ts_name);
- rc = rsl_rx_chan_act_ack(msg);
- count_codecs(sign_link->trx->bts, msg->lchan);
- break;
- case RSL_MT_CHAN_ACTIV_NACK:
- rc = rsl_rx_chan_act_nack(msg);
- break;
- case RSL_MT_CONN_FAIL:
- rc = rsl_rx_conn_fail(msg);
- break;
- case RSL_MT_MEAS_RES:
- rc = rsl_rx_meas_res(msg);
- break;
- case RSL_MT_HANDO_DET:
- rc = rsl_rx_hando_det(msg);
- break;
- case RSL_MT_RF_CHAN_REL_ACK:
- rc = rsl_rx_rf_chan_rel_ack(msg->lchan);
- break;
- case RSL_MT_MODE_MODIFY_ACK:
- count_codecs(sign_link->trx->bts, msg->lchan);
- DEBUGP(DRSL, "%s CHANNEL MODE MODIFY ACK\n", ts_name);
- break;
- case RSL_MT_MODE_MODIFY_NACK:
- LOGP(DRSL, LOGL_ERROR, "%s CHANNEL MODE MODIFY NACK\n", ts_name);
- break;
- case RSL_MT_IPAC_PDCH_ACT_ACK:
- DEBUGP(DRSL, "%s IPAC PDCH ACT ACK\n", ts_name);
- rc = rsl_rx_pdch_act_ack(msg);
- break;
- case RSL_MT_IPAC_PDCH_ACT_NACK:
- LOGP(DRSL, LOGL_ERROR, "%s IPAC PDCH ACT NACK\n", ts_name);
- break;
- case RSL_MT_IPAC_PDCH_DEACT_ACK:
- DEBUGP(DRSL, "%s IPAC PDCH DEACT ACK\n", ts_name);
- rc = rsl_rx_pdch_deact_ack(msg);
- break;
- case RSL_MT_IPAC_PDCH_DEACT_NACK:
- LOGP(DRSL, LOGL_ERROR, "%s IPAC PDCH DEACT NACK\n", ts_name);
- break;
- case RSL_MT_PHY_CONTEXT_CONF:
- case RSL_MT_PREPROC_MEAS_RES:
- case RSL_MT_TALKER_DET:
- case RSL_MT_LISTENER_DET:
- case RSL_MT_REMOTE_CODEC_CONF_REP:
- case RSL_MT_MR_CODEC_MOD_ACK:
- case RSL_MT_MR_CODEC_MOD_NACK:
- case RSL_MT_MR_CODEC_MOD_PER:
- LOGP(DRSL, LOGL_NOTICE, "%s Unimplemented Abis RSL DChan "
- "msg 0x%02x\n", ts_name, rslh->c.msg_type);
- break;
- default:
- LOGP(DRSL, LOGL_NOTICE, "%s unknown Abis RSL DChan msg 0x%02x\n",
- ts_name, rslh->c.msg_type);
- return -EINVAL;
- }
-
- return rc;
-}
-
-static int rsl_rx_error_rep(struct msgb *msg)
-{
- struct abis_rsl_common_hdr *rslh = msgb_l2(msg);
- struct tlv_parsed tp;
- struct e1inp_sign_link *sign_link = msg->dst;
-
- LOGP(DRSL, LOGL_ERROR, "%s ERROR REPORT ", gsm_trx_name(sign_link->trx));
-
- rsl_tlv_parse(&tp, rslh->data, msgb_l2len(msg)-sizeof(*rslh));
-
- if (TLVP_PRESENT(&tp, RSL_IE_CAUSE))
- print_rsl_cause(LOGL_ERROR, TLVP_VAL(&tp, RSL_IE_CAUSE),
- TLVP_LEN(&tp, RSL_IE_CAUSE));
-
- LOGPC(DRSL, LOGL_ERROR, "\n");
-
- return 0;
-}
-
-static int abis_rsl_rx_trx(struct msgb *msg)
-{
- struct abis_rsl_common_hdr *rslh = msgb_l2(msg);
- struct e1inp_sign_link *sign_link = msg->dst;
- int rc = 0;
-
- switch (rslh->msg_type) {
- case RSL_MT_ERROR_REPORT:
- rc = rsl_rx_error_rep(msg);
- break;
- case RSL_MT_RF_RES_IND:
- /* interference on idle channels of TRX */
- //DEBUGP(DRSL, "%s RF Resource Indication\n", gsm_trx_name(sign_link->trx));
- break;
- case RSL_MT_OVERLOAD:
- /* indicate CCCH / ACCH / processor overload */
- LOGP(DRSL, LOGL_ERROR, "%s CCCH/ACCH/CPU Overload\n",
- gsm_trx_name(sign_link->trx));
- break;
- case 0x42: /* Nokia specific: SI End ACK */
- LOGP(DRSL, LOGL_INFO, "Nokia SI End ACK\n");
- break;
- case 0x43: /* Nokia specific: SI End NACK */
- LOGP(DRSL, LOGL_INFO, "Nokia SI End NACK\n");
- break;
- default:
- LOGP(DRSL, LOGL_NOTICE, "%s Unknown Abis RSL TRX message "
- "type 0x%02x\n", gsm_trx_name(sign_link->trx), rslh->msg_type);
- return -EINVAL;
- }
- return rc;
-}
-
-/* If T3101 expires, we never received a response to IMMEDIATE ASSIGN */
-static void t3101_expired(void *data)
-{
- struct gsm_lchan *lchan = data;
- LOGP(DRSL, LOGL_NOTICE,
- "%s T3101 expired: no response to IMMEDIATE ASSIGN\n",
- gsm_lchan_name(lchan));
- rsl_rf_chan_release(lchan, 1, SACCH_DEACTIVATE);
-}
-
-/* If T3111 expires, we will send the RF Channel Request */
-static void t3111_expired(void *data)
-{
- struct gsm_lchan *lchan = data;
- LOGP(DRSL, LOGL_NOTICE,
- "%s T3111 expired: releasing RF Channel\n",
- gsm_lchan_name(lchan));
- rsl_rf_chan_release(lchan, 0, SACCH_NONE);
-}
-
-/* If T3109 expires the MS has not send a UA/UM do the error release */
-static void t3109_expired(void *data)
-{
- struct gsm_lchan *lchan = data;
-
- LOGP(DRSL, LOGL_ERROR,
- "%s SACCH deactivation timeout.\n", gsm_lchan_name(lchan));
- rsl_rf_chan_release(lchan, 1, SACCH_NONE);
-}
-
-/* Format an IMM ASS REJ according to 04.08 Chapter 9.1.20 */
-static int rsl_send_imm_ass_rej(struct gsm_bts *bts,
- unsigned int num_req_refs,
- struct gsm48_req_ref *rqd_refs,
- uint8_t wait_ind)
-{
- uint8_t buf[GSM_MACBLOCK_LEN];
- struct gsm48_imm_ass_rej *iar = (struct gsm48_imm_ass_rej *)buf;
-
- /* create IMMEDIATE ASSIGN REJECT 04.08 message */
- memset(iar, 0, sizeof(*iar));
- iar->proto_discr = GSM48_PDISC_RR;
- iar->msg_type = GSM48_MT_RR_IMM_ASS_REJ;
- iar->page_mode = GSM48_PM_SAME;
-
- memcpy(&iar->req_ref1, &rqd_refs[0], sizeof(iar->req_ref1));
- iar->wait_ind1 = wait_ind;
-
- if (num_req_refs >= 2)
- memcpy(&iar->req_ref2, &rqd_refs[1], sizeof(iar->req_ref2));
- else
- memcpy(&iar->req_ref2, &rqd_refs[0], sizeof(iar->req_ref2));
- iar->wait_ind2 = wait_ind;
-
- if (num_req_refs >= 3)
- memcpy(&iar->req_ref3, &rqd_refs[2], sizeof(iar->req_ref3));
- else
- memcpy(&iar->req_ref3, &rqd_refs[0], sizeof(iar->req_ref3));
- iar->wait_ind3 = wait_ind;
-
- if (num_req_refs >= 4)
- memcpy(&iar->req_ref4, &rqd_refs[3], sizeof(iar->req_ref4));
- else
- memcpy(&iar->req_ref4, &rqd_refs[0], sizeof(iar->req_ref4));
- iar->wait_ind4 = wait_ind;
-
- /* we need to subtract 1 byte from sizeof(*iar) since ia includes the l2_plen field */
- iar->l2_plen = GSM48_LEN2PLEN((sizeof(*iar)-1));
-
- return rsl_imm_assign_cmd(bts, sizeof(*iar), (uint8_t *) iar);
-}
-
-/* Handle packet channel rach requests */
-static int rsl_rx_pchan_rqd(struct msgb *msg, struct gsm_bts *bts)
-{
- struct gsm48_req_ref *rqd_ref;
- struct abis_rsl_dchan_hdr *rqd_hdr = msgb_l2(msg);
- rqd_ref = (struct gsm48_req_ref *) &rqd_hdr->data[1];
- uint8_t ra = rqd_ref->ra;
- uint8_t t1, t2, t3;
- uint32_t fn;
- uint8_t rqd_ta;
- uint8_t is_11bit;
-
- /* Process rach request and forward contained information to PCU */
- if (ra == 0x7F) {
- is_11bit = 1;
-
- /* FIXME: Also handle 11 bit rach requests */
- LOGP(DRSL, LOGL_ERROR, "BTS %d eleven bit access burst not supported yet!\n",bts->nr);
- return -EINVAL;
- } else {
- is_11bit = 0;
- t1 = rqd_ref->t1;
- t2 = rqd_ref->t2;
- t3 = rqd_ref->t3_low | (rqd_ref->t3_high << 3);
- fn = (51 * ((t3-t2) % 26) + t3 + 51 * 26 * t1);
-
- rqd_ta = rqd_hdr->data[sizeof(struct gsm48_req_ref)+2];
- }
-
- return pcu_tx_rach_ind(bts, rqd_ta, ra, fn, is_11bit,
- GSM_L1_BURST_TYPE_ACCESS_0);
-}
-
-/* MS has requested a channel on the RACH */
-static int rsl_rx_chan_rqd(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = msg->dst;
- struct gsm_bts *bts = sign_link->trx->bts;
- struct abis_rsl_dchan_hdr *rqd_hdr = msgb_l2(msg);
- struct gsm48_req_ref *rqd_ref;
- enum gsm_chan_t lctype;
- enum gsm_chreq_reason_t chreq_reason;
- struct gsm_lchan *lchan;
- uint8_t rqd_ta;
- int is_lu;
-
- uint16_t arfcn;
- uint8_t subch;
-
- /* parse request reference to be used in immediate assign */
- if (rqd_hdr->data[0] != RSL_IE_REQ_REFERENCE)
- return -EINVAL;
-
- rqd_ref = (struct gsm48_req_ref *) &rqd_hdr->data[1];
-
- /* parse access delay and use as TA */
- if (rqd_hdr->data[sizeof(struct gsm48_req_ref)+1] != RSL_IE_ACCESS_DELAY)
- return -EINVAL;
- rqd_ta = rqd_hdr->data[sizeof(struct gsm48_req_ref)+2];
-
- /* Determine channel request cause code */
- chreq_reason = get_reason_by_chreq(rqd_ref->ra, bts->network->neci);
- LOGP(DRSL, LOGL_NOTICE, "BTS %d CHAN RQD: reason: %s (ra=0x%02x, neci=0x%02x, chreq_reason=0x%02x)\n",
- msg->lchan->ts->trx->bts->nr,
- get_value_string(gsm_chreq_descs, chreq_reason),
- rqd_ref->ra, bts->network->neci, chreq_reason);
-
- /* Handle PDCH related rach requests (in case of BSC-co-located-PCU */
- if (chreq_reason == GSM_CHREQ_REASON_PDCH)
- return rsl_rx_pchan_rqd(msg, bts);
-
- /* determine channel type (SDCCH/TCH_F/TCH_H) based on
- * request reference RA */
- lctype = get_ctype_by_chreq(bts->network, rqd_ref->ra);
-
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CHREQ_TOTAL]);
-
- /*
- * We want LOCATION UPDATES to succeed and will assign a TCH
- * if we have no SDCCH available.
- */
- is_lu = !!(chreq_reason == GSM_CHREQ_REASON_LOCATION_UPD);
-
- /* check availability / allocate channel */
- lchan = lchan_alloc(bts, lctype, is_lu);
- if (!lchan) {
- LOGP(DRSL, LOGL_NOTICE, "BTS %d CHAN RQD: no resources for %s 0x%x\n",
- msg->lchan->ts->trx->bts->nr, gsm_lchant_name(lctype), rqd_ref->ra);
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_CHREQ_NO_CHANNEL]);
- /* FIXME gather multiple CHAN RQD and reject up to 4 at the same time */
- if (bts->network->T3122)
- rsl_send_imm_ass_rej(bts, 1, rqd_ref, bts->network->T3122 & 0xff);
- return 0;
- }
-
- /*
- * Expecting lchan state to be NONE, except for dyn TS in PDCH mode.
- * Those are expected to be ACTIVE: the PDCH release will be sent from
- * rsl_chan_activate_lchan() below.
- */
- if (lchan->state != LCHAN_S_NONE
- && !(lchan->ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH
- && lchan->ts->dyn.pchan_is == GSM_PCHAN_PDCH
- && lchan->state == LCHAN_S_ACTIVE))
- LOGP(DRSL, LOGL_NOTICE, "%s lchan_alloc() returned channel "
- "in state %s\n", gsm_lchan_name(lchan),
- gsm_lchans_name(lchan->state));
-
- /* save the RACH data as we need it after the CHAN ACT ACK */
- lchan->rqd_ref = talloc_zero(bts, struct gsm48_req_ref);
- if (!lchan->rqd_ref) {
- LOGP(DRSL, LOGL_ERROR, "Failed to allocate gsm48_req_ref.\n");
- lchan_free(lchan);
- return -ENOMEM;
- }
-
- memcpy(lchan->rqd_ref, rqd_ref, sizeof(*rqd_ref));
- lchan->rqd_ta = rqd_ta;
-
- arfcn = lchan->ts->trx->arfcn;
- subch = lchan->nr;
-
- lchan->encr.alg_id = RSL_ENC_ALG_A5(0); /* no encryption */
- lchan->ms_power = ms_pwr_ctl_lvl(bts->band, bts->ms_max_power);
- lchan->bs_power = 0; /* 0dB reduction, output power = Pn */
- lchan->rsl_cmode = RSL_CMOD_SPD_SIGN;
- lchan->tch_mode = GSM48_CMODE_SIGN;
-
- /* Start another timer or assume the BTS sends a ACK/NACK? */
- osmo_timer_setup(&lchan->act_timer, lchan_act_tmr_cb, lchan);
- osmo_timer_schedule(&lchan->act_timer, 4, 0);
-
- DEBUGP(DRSL, "%s Activating ARFCN(%u) SS(%u) lctype %s "
- "r=%s ra=0x%02x ta=%d\n", gsm_lchan_name(lchan), arfcn, subch,
- gsm_lchant_name(lchan->type), gsm_chreq_name(chreq_reason),
- rqd_ref->ra, rqd_ta);
-
- rsl_chan_activate_lchan(lchan, RSL_ACT_INTRA_IMM_ASS, 0);
-
- return 0;
-}
-
-static int rsl_send_imm_assignment(struct gsm_lchan *lchan)
-{
- struct gsm_bts *bts = lchan->ts->trx->bts;
- uint8_t buf[GSM_MACBLOCK_LEN];
- struct gsm48_imm_ass *ia = (struct gsm48_imm_ass *) buf;
-
- /* create IMMEDIATE ASSIGN 04.08 messge */
- memset(ia, 0, sizeof(*ia));
- /* we set ia->l2_plen once we know the length of the MA below */
- ia->proto_discr = GSM48_PDISC_RR;
- ia->msg_type = GSM48_MT_RR_IMM_ASS;
- ia->page_mode = GSM48_PM_SAME;
- gsm48_lchan2chan_desc(&ia->chan_desc, lchan);
-
- /* use request reference extracted from CHAN_RQD */
- memcpy(&ia->req_ref, lchan->rqd_ref, sizeof(ia->req_ref));
- ia->timing_advance = lchan->rqd_ta;
- if (!lchan->ts->hopping.enabled) {
- ia->mob_alloc_len = 0;
- } else {
- ia->mob_alloc_len = lchan->ts->hopping.ma_len;
- memcpy(ia->mob_alloc, lchan->ts->hopping.ma_data, ia->mob_alloc_len);
- }
- /* we need to subtract 1 byte from sizeof(*ia) since ia includes the l2_plen field */
- ia->l2_plen = GSM48_LEN2PLEN((sizeof(*ia)-1) + ia->mob_alloc_len);
-
- /* Start timer T3101 to wait for GSM48_MT_RR_PAG_RESP */
- osmo_timer_setup(&lchan->T3101, t3101_expired, lchan);
- osmo_timer_schedule(&lchan->T3101, bts->network->T3101, 0);
-
- /* send IMMEDIATE ASSIGN CMD on RSL to BTS (to send on CCCH to MS) */
- return rsl_imm_assign_cmd(bts, sizeof(*ia)+ia->mob_alloc_len, (uint8_t *) ia);
-}
-
-/* current load on the CCCH */
-static int rsl_rx_ccch_load(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = msg->dst;
- struct abis_rsl_dchan_hdr *rslh = msgb_l2(msg);
- struct ccch_signal_data sd;
-
- sd.bts = sign_link->trx->bts;
- sd.rach_slot_count = -1;
- sd.rach_busy_count = -1;
- sd.rach_access_count = -1;
-
- switch (rslh->data[0]) {
- case RSL_IE_PAGING_LOAD:
- sd.pg_buf_space = rslh->data[1] << 8 | rslh->data[2];
- if (is_ipaccess_bts(sign_link->trx->bts) && sd.pg_buf_space == 0xffff) {
- /* paging load below configured threshold, use 50 as default */
- sd.pg_buf_space = 50;
- }
- paging_update_buffer_space(sign_link->trx->bts, sd.pg_buf_space);
- osmo_signal_dispatch(SS_CCCH, S_CCCH_PAGING_LOAD, &sd);
- break;
- case RSL_IE_RACH_LOAD:
- if (msg->data_len >= 7) {
- sd.rach_slot_count = rslh->data[2] << 8 | rslh->data[3];
- sd.rach_busy_count = rslh->data[4] << 8 | rslh->data[5];
- sd.rach_access_count = rslh->data[6] << 8 | rslh->data[7];
- osmo_signal_dispatch(SS_CCCH, S_CCCH_RACH_LOAD, &sd);
- }
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-static int abis_rsl_rx_cchan(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = msg->dst;
- struct abis_rsl_dchan_hdr *rslh = msgb_l2(msg);
- int rc = 0;
- uint32_t tlli;
-
- msg->lchan = lchan_lookup(sign_link->trx, rslh->chan_nr,
- "Abis RSL rx CCHAN: ");
-
- switch (rslh->c.msg_type) {
- case RSL_MT_CHAN_RQD:
- /* MS has requested a channel on the RACH */
- rc = rsl_rx_chan_rqd(msg);
- break;
- case RSL_MT_CCCH_LOAD_IND:
- /* current load on the CCCH */
- rc = rsl_rx_ccch_load(msg);
- break;
- case RSL_MT_DELETE_IND:
- /* CCCH overloaded, IMM_ASSIGN was dropped */
- case RSL_MT_CBCH_LOAD_IND:
- /* current load on the CBCH */
- LOGP(DRSL, LOGL_NOTICE, "Unimplemented Abis RSL TRX message "
- "type 0x%02x\n", rslh->c.msg_type);
- break;
- case 0x10: /* Ericsson specific: Immediate Assign Sent */
- /* FIXME: Replace the messy message parsing below
- * with proper TV parser */
- LOGP(DRSL, LOGL_INFO, "IMM.ass sent\n");
- if(msg->len < 9)
- LOGP(DRSL, LOGL_ERROR, "short IMM.ass sent message!\n");
- else if(msg->data[4] != 0xf1)
- LOGP(DRSL, LOGL_ERROR, "unsupported IMM.ass message format! (please fix)\n");
- else {
- msgb_pull(msg, 5); /* drop previous data to use msg_pull_u32 */
- tlli = msgb_pull_u32(msg);
- pcu_tx_imm_ass_sent(sign_link->trx->bts, tlli);
- }
- break;
- default:
- LOGP(DRSL, LOGL_NOTICE, "Unknown Abis RSL TRX message type "
- "0x%02x\n", rslh->c.msg_type);
- return -EINVAL;
- }
-
- return rc;
-}
-
-static int rsl_rx_rll_err_ind(struct msgb *msg)
-{
- struct tlv_parsed tp;
- struct abis_rsl_rll_hdr *rllh = msgb_l2(msg);
- uint8_t rlm_cause;
-
- rsl_tlv_parse(&tp, rllh->data, msgb_l2len(msg) - sizeof(*rllh));
- if (!TLVP_PRESENT(&tp, RSL_IE_RLM_CAUSE)) {
- LOGP(DRLL, LOGL_ERROR,
- "%s ERROR INDICATION without mandantory cause.\n",
- gsm_lchan_name(msg->lchan));
- return -1;
- }
-
- rlm_cause = *TLVP_VAL(&tp, RSL_IE_RLM_CAUSE);
- LOGP(DRLL, LOGL_ERROR, "%s ERROR INDICATION cause=%s in state=%s\n",
- gsm_lchan_name(msg->lchan),
- rsl_rlm_cause_name(rlm_cause),
- gsm_lchans_name(msg->lchan->state));
-
- rll_indication(msg->lchan, rllh->link_id, BSC_RLLR_IND_ERR_IND);
-
- if (rlm_cause == RLL_CAUSE_T200_EXPIRED) {
- rate_ctr_inc(&msg->lchan->ts->trx->bts->network->bsc_ctrs->ctr[BSC_CTR_CHAN_RLL_ERR]);
- return rsl_rf_chan_release_err(msg->lchan);
- }
-
- return 0;
-}
-
-static void rsl_handle_release(struct gsm_lchan *lchan)
-{
- int sapi;
- struct gsm_bts *bts;
-
- /*
- * Maybe only one link/SAPI was releasd or the error handling
- * was activated. Just return now and let the other code handle
- * it.
- */
- if (lchan->state != LCHAN_S_REL_REQ)
- return;
-
- for (sapi = 0; sapi < ARRAY_SIZE(lchan->sapis); ++sapi) {
- if (lchan->sapis[sapi] == LCHAN_SAPI_UNUSED)
- continue;
- LOGP(DRSL, LOGL_DEBUG, "%s waiting for SAPI=%d to be released.\n",
- gsm_lchan_name(lchan), sapi);
- return;
- }
-
-
- /* Stop T3109 and wait for T3111 before re-using the channel */
- osmo_timer_del(&lchan->T3109);
- osmo_timer_setup(&lchan->T3111, t3111_expired, lchan);
- bts = lchan->ts->trx->bts;
- osmo_timer_schedule(&lchan->T3111, bts->network->T3111, 0);
-}
-
-/* ESTABLISH INDICATION, LOCATION AREA UPDATE REQUEST
- 0x02, 0x06,
- 0x01, 0x20,
- 0x02, 0x00,
- 0x0b, 0x00, 0x0f, 0x05, 0x08, ... */
-
-static int abis_rsl_rx_rll(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = msg->dst;
- struct abis_rsl_rll_hdr *rllh = msgb_l2(msg);
- int rc = 0;
- char *ts_name;
- uint8_t sapi = rllh->link_id & 7;
-
- msg->lchan = lchan_lookup(sign_link->trx, rllh->chan_nr,
- "Abis RSL rx RLL: ");
- ts_name = gsm_lchan_name(msg->lchan);
- DEBUGP(DRLL, "%s SAPI=%u ", ts_name, sapi);
-
- switch (rllh->c.msg_type) {
- case RSL_MT_DATA_IND:
- DEBUGPC(DRLL, "DATA INDICATION\n");
- if (msgb_l2len(msg) >
- sizeof(struct abis_rsl_common_hdr) + sizeof(*rllh) &&
- rllh->data[0] == RSL_IE_L3_INFO) {
- msg->l3h = &rllh->data[3];
- return gsm0408_rcvmsg(msg, rllh->link_id);
- }
- break;
- case RSL_MT_EST_IND:
- DEBUGPC(DRLL, "ESTABLISH INDICATION\n");
- /* lchan is established, stop T3101 */
- msg->lchan->sapis[rllh->link_id & 0x7] = LCHAN_SAPI_MS;
- osmo_timer_del(&msg->lchan->T3101);
- if (msgb_l2len(msg) >
- sizeof(struct abis_rsl_common_hdr) + sizeof(*rllh) &&
- rllh->data[0] == RSL_IE_L3_INFO) {
- msg->l3h = &rllh->data[3];
- return gsm0408_rcvmsg(msg, rllh->link_id);
- }
- break;
- case RSL_MT_EST_CONF:
- DEBUGPC(DRLL, "ESTABLISH CONFIRM\n");
- msg->lchan->sapis[rllh->link_id & 0x7] = LCHAN_SAPI_NET;
- rll_indication(msg->lchan, rllh->link_id,
- BSC_RLLR_IND_EST_CONF);
- break;
- case RSL_MT_REL_IND:
- /* BTS informs us of having received DISC from MS */
- DEBUGPC(DRLL, "RELEASE INDICATION\n");
- msg->lchan->sapis[rllh->link_id & 0x7] = LCHAN_SAPI_UNUSED;
- rll_indication(msg->lchan, rllh->link_id,
- BSC_RLLR_IND_REL_IND);
- rsl_handle_release(msg->lchan);
- break;
- case RSL_MT_REL_CONF:
- /* BTS informs us of having received UA from MS,
- * in response to DISC that we've sent earlier */
- DEBUGPC(DRLL, "RELEASE CONFIRMATION\n");
- msg->lchan->sapis[rllh->link_id & 0x7] = LCHAN_SAPI_UNUSED;
- rsl_handle_release(msg->lchan);
- break;
- case RSL_MT_ERROR_IND:
- DEBUGPC(DRLL, "ERROR INDICATION\n");
- rc = rsl_rx_rll_err_ind(msg);
- break;
- case RSL_MT_UNIT_DATA_IND:
- DEBUGPC(DRLL, "UNIT DATA INDICATION\n");
- LOGP(DRLL, LOGL_NOTICE, "unimplemented Abis RLL message "
- "type 0x%02x\n", rllh->c.msg_type);
- break;
- default:
- DEBUGPC(DRLL, "UNKNOWN\n");
- LOGP(DRLL, LOGL_NOTICE, "unknown Abis RLL message "
- "type 0x%02x\n", rllh->c.msg_type);
- }
- return rc;
-}
-
-static uint8_t ipa_smod_s_for_lchan(struct gsm_lchan *lchan)
-{
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_V1:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return 0x00;
- case GSM_LCHAN_TCH_H:
- return 0x03;
- default:
- break;
- }
- break;
- case GSM48_CMODE_SPEECH_EFR:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return 0x01;
- /* there's no half-rate EFR */
- default:
- break;
- }
- break;
- case GSM48_CMODE_SPEECH_AMR:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return 0x02;
- case GSM_LCHAN_TCH_H:
- return 0x05;
- default:
- break;
- }
- break;
- default:
- break;
- }
- LOGP(DRSL, LOGL_ERROR, "Cannot determine ip.access speech mode for "
- "tch_mode == 0x%02x\n", lchan->tch_mode);
- return 0;
-}
-
-static uint8_t ipa_rtp_pt_for_lchan(struct gsm_lchan *lchan)
-{
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_V1:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return RTP_PT_GSM_FULL;
- case GSM_LCHAN_TCH_H:
- return RTP_PT_GSM_HALF;
- default:
- break;
- }
- break;
- case GSM48_CMODE_SPEECH_EFR:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return RTP_PT_GSM_EFR;
- /* there's no half-rate EFR */
- default:
- break;
- }
- break;
- case GSM48_CMODE_SPEECH_AMR:
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- case GSM_LCHAN_TCH_H:
- return RTP_PT_AMR;
- default:
- break;
- }
- break;
- default:
- break;
- }
- LOGP(DRSL, LOGL_ERROR, "Cannot determine ip.access rtp payload type for "
- "tch_mode == 0x%02x\n & lchan_type == %d",
- lchan->tch_mode, lchan->type);
- return 0;
-}
-
-/* ip.access specific RSL extensions */
-static void ipac_parse_rtp(struct gsm_lchan *lchan, struct tlv_parsed *tv)
-{
- struct in_addr ip;
- uint16_t port, conn_id;
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_LOCAL_IP)) {
- ip.s_addr = tlvp_val32_unal(tv, RSL_IE_IPAC_LOCAL_IP);
- DEBUGPC(DRSL, "LOCAL_IP=%s ", inet_ntoa(ip));
- lchan->abis_ip.bound_ip = ntohl(ip.s_addr);
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_LOCAL_PORT)) {
- port = tlvp_val16_unal(tv, RSL_IE_IPAC_LOCAL_PORT);
- port = ntohs(port);
- DEBUGPC(DRSL, "LOCAL_PORT=%u ", port);
- lchan->abis_ip.bound_port = port;
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_CONN_ID)) {
- conn_id = tlvp_val16_unal(tv, RSL_IE_IPAC_CONN_ID);
- conn_id = ntohs(conn_id);
- DEBUGPC(DRSL, "CON_ID=%u ", conn_id);
- lchan->abis_ip.conn_id = conn_id;
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_RTP_PAYLOAD2)) {
- lchan->abis_ip.rtp_payload2 =
- *TLVP_VAL(tv, RSL_IE_IPAC_RTP_PAYLOAD2);
- DEBUGPC(DRSL, "RTP_PAYLOAD2=0x%02x ",
- lchan->abis_ip.rtp_payload2);
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_SPEECH_MODE)) {
- lchan->abis_ip.speech_mode =
- *TLVP_VAL(tv, RSL_IE_IPAC_SPEECH_MODE);
- DEBUGPC(DRSL, "speech_mode=0x%02x ",
- lchan->abis_ip.speech_mode);
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_REMOTE_IP)) {
- ip.s_addr = tlvp_val32_unal(tv, RSL_IE_IPAC_REMOTE_IP);
- DEBUGPC(DRSL, "REMOTE_IP=%s ", inet_ntoa(ip));
- lchan->abis_ip.connect_ip = ntohl(ip.s_addr);
- }
-
- if (TLVP_PRESENT(tv, RSL_IE_IPAC_REMOTE_PORT)) {
- port = tlvp_val16_unal(tv, RSL_IE_IPAC_REMOTE_PORT);
- port = ntohs(port);
- DEBUGPC(DRSL, "REMOTE_PORT=%u ", port);
- lchan->abis_ip.connect_port = port;
- }
-
- DEBUGPC(DRSL, "\n");
-}
-
-/*! \brief Issue IPA RSL CRCX to configure RTP on BTS side
- * \param[in] lchan Logical Channel for which we issue CRCX
- */
-int rsl_ipacc_crcx(struct gsm_lchan *lchan)
-{
- struct msgb *msg = rsl_msgb_alloc();
- struct abis_rsl_dchan_hdr *dh;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_IPAC_CRCX);
- dh->c.msg_discr = ABIS_RSL_MDISC_IPACCESS;
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
-
- /* 0x1- == receive-only, 0x-1 == EFR codec */
- lchan->abis_ip.speech_mode = 0x10 | ipa_smod_s_for_lchan(lchan);
- lchan->abis_ip.rtp_payload = ipa_rtp_pt_for_lchan(lchan);
- msgb_tv_put(msg, RSL_IE_IPAC_SPEECH_MODE, lchan->abis_ip.speech_mode);
- msgb_tv_put(msg, RSL_IE_IPAC_RTP_PAYLOAD, lchan->abis_ip.rtp_payload);
-
- DEBUGP(DRSL, "%s IPAC_BIND speech_mode=0x%02x RTP_PAYLOAD=%d\n",
- gsm_lchan_name(lchan), lchan->abis_ip.speech_mode,
- lchan->abis_ip.rtp_payload);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/*! \brief Issue IPA RSL MDCX to configure MGW-side of RTP
- * \param[in] lchan Logical Channel for which we issue MDCX
- * \param[in] ip Remote (MGW) IP address for RTP
- * \param[in] port Remote (MGW) UDP port number for RTP
- * \param[in] rtp_payload2 Contents of RTP PAYLOAD 2 IE
- */
-int rsl_ipacc_mdcx(struct gsm_lchan *lchan, uint32_t ip, uint16_t port,
- uint8_t rtp_payload2)
-{
- struct msgb *msg = rsl_msgb_alloc();
- struct abis_rsl_dchan_hdr *dh;
- uint32_t *att_ip;
- struct in_addr ia;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_IPAC_MDCX);
- dh->c.msg_discr = ABIS_RSL_MDISC_IPACCESS;
- dh->chan_nr = gsm_lchan2chan_nr(lchan);
-
- /* we need to store these now as MDCX_ACK does not return them :( */
- lchan->abis_ip.rtp_payload2 = rtp_payload2;
- lchan->abis_ip.connect_port = port;
- lchan->abis_ip.connect_ip = ip;
-
- /* 0x0- == both directions, 0x-1 == EFR codec */
- lchan->abis_ip.speech_mode = 0x00 | ipa_smod_s_for_lchan(lchan);
- lchan->abis_ip.rtp_payload = ipa_rtp_pt_for_lchan(lchan);
-
- ia.s_addr = htonl(ip);
- DEBUGP(DRSL, "%s IPAC_MDCX IP=%s PORT=%d RTP_PAYLOAD=%d RTP_PAYLOAD2=%d "
- "CONN_ID=%d speech_mode=0x%02x\n", gsm_lchan_name(lchan),
- inet_ntoa(ia), port, lchan->abis_ip.rtp_payload, rtp_payload2,
- lchan->abis_ip.conn_id, lchan->abis_ip.speech_mode);
-
- msgb_tv16_put(msg, RSL_IE_IPAC_CONN_ID, lchan->abis_ip.conn_id);
- msgb_v_put(msg, RSL_IE_IPAC_REMOTE_IP);
- att_ip = (uint32_t *) msgb_put(msg, sizeof(ip));
- *att_ip = ia.s_addr;
- msgb_tv16_put(msg, RSL_IE_IPAC_REMOTE_PORT, port);
- msgb_tv_put(msg, RSL_IE_IPAC_SPEECH_MODE, lchan->abis_ip.speech_mode);
- msgb_tv_put(msg, RSL_IE_IPAC_RTP_PAYLOAD, lchan->abis_ip.rtp_payload);
- if (rtp_payload2)
- msgb_tv_put(msg, RSL_IE_IPAC_RTP_PAYLOAD2, rtp_payload2);
-
- msg->dst = lchan->ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/* tell BTS to connect RTP stream to our local RTP socket */
-int rsl_ipacc_mdcx_to_rtpsock(struct gsm_lchan *lchan)
-{
- struct rtp_socket *rs = lchan->abis_ip.rtp_socket;
- int rc;
-
- rc = rsl_ipacc_mdcx(lchan, ntohl(rs->rtp.sin_local.sin_addr.s_addr),
- ntohs(rs->rtp.sin_local.sin_port),
- /* FIXME: use RTP payload of bound socket, not BTS*/
- lchan->abis_ip.rtp_payload2);
-
- return rc;
-}
-
-int rsl_ipacc_pdch_activate(struct gsm_bts_trx_ts *ts, int act)
-{
- struct msgb *msg = rsl_msgb_alloc();
- struct abis_rsl_dchan_hdr *dh;
- uint8_t msg_type;
-
- if (ts->flags & TS_F_PDCH_PENDING_MASK) {
- LOGP(DRSL, LOGL_ERROR,
- "%s PDCH %s requested, but a PDCH%s%s is still pending\n",
- gsm_ts_name(ts),
- act ? "ACT" : "DEACT",
- ts->flags & TS_F_PDCH_ACT_PENDING? " ACT" : "",
- ts->flags & TS_F_PDCH_DEACT_PENDING? " DEACT" : "");
- return -EINVAL;
- }
-
- if (act){
- /* Callers should heed the GPRS mode. */
- OSMO_ASSERT(ts->trx->bts->gprs.mode != BTS_GPRS_NONE);
- msg_type = RSL_MT_IPAC_PDCH_ACT;
- ts->flags |= TS_F_PDCH_ACT_PENDING;
- } else {
- msg_type = RSL_MT_IPAC_PDCH_DEACT;
- ts->flags |= TS_F_PDCH_DEACT_PENDING;
- }
- /* TODO add timeout to cancel PDCH DE/ACT */
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(msg, sizeof(*dh));
- init_dchan_hdr(dh, msg_type);
- dh->c.msg_discr = ABIS_RSL_MDISC_DED_CHAN;
- dh->chan_nr = gsm_pchan2chan_nr(GSM_PCHAN_TCH_F, ts->nr, 0);
-
- DEBUGP(DRSL, "%s IPAC PDCH %sACT\n", gsm_ts_name(ts),
- act ? "" : "DE");
-
- msg->dst = ts->trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-static int abis_rsl_rx_ipacc_crcx_ack(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tv;
- struct gsm_lchan *lchan = msg->lchan;
-
- /* the BTS has acknowledged a local bind, it now tells us the IP
- * address and port number to which it has bound the given logical
- * channel */
-
- rsl_tlv_parse(&tv, dh->data, msgb_l2len(msg)-sizeof(*dh));
- if (!TLVP_PRESENT(&tv, RSL_IE_IPAC_LOCAL_PORT) ||
- !TLVP_PRESENT(&tv, RSL_IE_IPAC_LOCAL_IP) ||
- !TLVP_PRESENT(&tv, RSL_IE_IPAC_CONN_ID)) {
- LOGP(DRSL, LOGL_NOTICE, "mandatory IE missing");
- return -EINVAL;
- }
-
- ipac_parse_rtp(lchan, &tv);
-
- osmo_signal_dispatch(SS_ABISIP, S_ABISIP_CRCX_ACK, msg->lchan);
-
- return 0;
-}
-
-static int abis_rsl_rx_ipacc_mdcx_ack(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tv;
- struct gsm_lchan *lchan = msg->lchan;
-
- /* the BTS has acknowledged a remote connect request and
- * it now tells us the IP address and port number to which it has
- * connected the given logical channel */
-
- rsl_tlv_parse(&tv, dh->data, msgb_l2len(msg)-sizeof(*dh));
- ipac_parse_rtp(lchan, &tv);
- osmo_signal_dispatch(SS_ABISIP, S_ABISIP_MDCX_ACK, msg->lchan);
-
- return 0;
-}
-
-static int abis_rsl_rx_ipacc_dlcx_ind(struct msgb *msg)
-{
- struct abis_rsl_dchan_hdr *dh = msgb_l2(msg);
- struct tlv_parsed tv;
-
- rsl_tlv_parse(&tv, dh->data, msgb_l2len(msg)-sizeof(*dh));
-
- if (TLVP_PRESENT(&tv, RSL_IE_CAUSE))
- print_rsl_cause(LOGL_DEBUG, TLVP_VAL(&tv, RSL_IE_CAUSE),
- TLVP_LEN(&tv, RSL_IE_CAUSE));
-
- osmo_signal_dispatch(SS_ABISIP, S_ABISIP_DLCX_IND, msg->lchan);
-
- return 0;
-}
-
-static int abis_rsl_rx_ipacc(struct msgb *msg)
-{
- struct e1inp_sign_link *sign_link = msg->dst;
- struct abis_rsl_rll_hdr *rllh = msgb_l2(msg);
- char *ts_name;
- int rc = 0;
-
- msg->lchan = lchan_lookup(sign_link->trx, rllh->chan_nr,
- "Abis RSL rx IPACC: ");
- ts_name = gsm_lchan_name(msg->lchan);
-
- switch (rllh->c.msg_type) {
- case RSL_MT_IPAC_CRCX_ACK:
- DEBUGP(DRSL, "%s IPAC_CRCX_ACK ", ts_name);
- rc = abis_rsl_rx_ipacc_crcx_ack(msg);
- break;
- case RSL_MT_IPAC_CRCX_NACK:
- /* somehow the BTS was unable to bind the lchan to its local
- * port?!? */
- LOGP(DRSL, LOGL_ERROR, "%s IPAC_CRCX_NACK\n", ts_name);
- break;
- case RSL_MT_IPAC_MDCX_ACK:
- /* the BTS tells us that a connect operation was successful */
- DEBUGP(DRSL, "%s IPAC_MDCX_ACK ", ts_name);
- rc = abis_rsl_rx_ipacc_mdcx_ack(msg);
- break;
- case RSL_MT_IPAC_MDCX_NACK:
- /* somehow the BTS was unable to connect the lchan to a remote
- * port */
- LOGP(DRSL, LOGL_ERROR, "%s IPAC_MDCX_NACK\n", ts_name);
- break;
- case RSL_MT_IPAC_DLCX_IND:
- DEBUGP(DRSL, "%s IPAC_DLCX_IND ", ts_name);
- rc = abis_rsl_rx_ipacc_dlcx_ind(msg);
- break;
- default:
- LOGP(DRSL, LOGL_NOTICE, "Unknown ip.access msg_type 0x%02x\n",
- rllh->c.msg_type);
- break;
- }
-
- return rc;
-}
-
-int dyn_ts_switchover_start(struct gsm_bts_trx_ts *ts,
- enum gsm_phys_chan_config to_pchan)
-{
- int ss;
- int rc = -EIO;
-
- OSMO_ASSERT(ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH);
- DEBUGP(DRSL, "%s starting switchover to %s\n",
- gsm_ts_and_pchan_name(ts), gsm_pchan_name(to_pchan));
-
- if (ts->dyn.pchan_is != ts->dyn.pchan_want) {
- LOGP(DRSL, LOGL_ERROR,
- "%s: Attempt to switch dynamic channel to %s,"
- " but is already in switchover.\n",
- gsm_ts_and_pchan_name(ts),
- gsm_pchan_name(to_pchan));
- return ts->dyn.pchan_want == to_pchan? 0 : -EAGAIN;
- }
-
- if (ts->dyn.pchan_is == to_pchan) {
- LOGP(DRSL, LOGL_INFO,
- "%s %s Already is in %s mode, cannot switchover.\n",
- gsm_ts_name(ts), gsm_pchan_name(ts->pchan),
- gsm_pchan_name(to_pchan));
- return -EINVAL;
- }
-
- /* Paranoia: let's make sure all is indeed released. */
- for (ss = 0; ss < ts_subslots(ts); ss++) {
- struct gsm_lchan *lc = &ts->lchan[ss];
- if (lc->state != LCHAN_S_NONE) {
- LOGP(DRSL, LOGL_ERROR,
- "%s Attempt to switch dynamic channel to %s,"
- " but is not fully released.\n",
- gsm_ts_and_pchan_name(ts),
- gsm_pchan_name(to_pchan));
- return -EAGAIN;
- }
- }
-
- /* Record that we're busy switching. */
- ts->dyn.pchan_want = to_pchan;
-
- /*
- * To switch from PDCH, we need to initiate the release from the BSC
- * side. dyn_ts_switchover_continue() will be called from
- * rsl_rx_rf_chan_rel_ack(). PDCH is always on lchan[0].
- */
- if (ts->dyn.pchan_is == GSM_PCHAN_PDCH) {
- rsl_lchan_set_state(ts->lchan, LCHAN_S_REL_REQ);
- rc = rsl_rf_chan_release(ts->lchan, 0, SACCH_NONE);
- if (rc) {
- LOGP(DRSL, LOGL_ERROR,
- "%s RSL RF Chan Release failed\n",
- gsm_ts_and_pchan_name(ts));
- return dyn_ts_switchover_failed(ts, rc);
- }
- return 0;
- }
-
- /*
- * To switch from TCH/F and TCH/H pchans, this has been called from
- * rsl_rx_rf_chan_rel_ack(), i.e. release is complete. Go ahead and
- * activate as new type. This will always be PDCH.
- */
- return dyn_ts_switchover_continue(ts);
-}
-
-static int dyn_ts_switchover_continue(struct gsm_bts_trx_ts *ts)
-{
- int rc;
- uint8_t act_type;
- uint8_t ho_ref;
- int ss;
- struct gsm_lchan *lchan;
-
- OSMO_ASSERT(ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH);
- DEBUGP(DRSL, "%s switchover: release complete,"
- " activating new pchan type\n",
- gsm_ts_and_pchan_name(ts));
-
- if (ts->dyn.pchan_is == ts->dyn.pchan_want) {
- LOGP(DRSL, LOGL_ERROR,
- "%s Requested to switchover dynamic channel to the"
- " same type it is already in.\n",
- gsm_ts_and_pchan_name(ts));
- return 0;
- }
-
- for (ss = 0; ss < ts_subslots(ts); ss++) {
- lchan = &ts->lchan[ss];
- if (lchan->rqd_ref) {
- LOGP(DRSL, LOGL_ERROR,
- "%s During dyn TS switchover, expecting no"
- " Request Reference to be pending. Discarding!\n",
- gsm_lchan_name(lchan));
- talloc_free(lchan->rqd_ref);
- lchan->rqd_ref = NULL;
- }
- }
-
- /*
- * When switching pchan modes, all lchans are unused. So always
- * activate whatever wants to be activated on the first lchan. (We
- * wouldn't remember to use lchan[1] across e.g. a PDCH deact anyway)
- */
- lchan = ts->lchan;
-
- /*
- * For TCH/x, the lchan->type has been set in lchan_alloc(), but it may
- * have been lost during channel release due to dynamic switchover.
- *
- * For PDCH, the lchan->type will actually remain NONE.
- * TODO: set GSM_LCHAN_PDTCH?
- */
- switch (ts->dyn.pchan_want) {
- case GSM_PCHAN_TCH_F:
- lchan->type = GSM_LCHAN_TCH_F;
- break;
- case GSM_PCHAN_TCH_H:
- lchan->type = GSM_LCHAN_TCH_H;
- break;
- case GSM_PCHAN_PDCH:
- lchan->type = GSM_LCHAN_NONE;
- break;
- default:
- LOGP(DRSL, LOGL_ERROR,
- "%s Invalid target pchan for dynamic TS\n",
- gsm_ts_and_pchan_name(ts));
- }
-
- act_type = (ts->dyn.pchan_want == GSM_PCHAN_PDCH)
- ? RSL_ACT_OSMO_PDCH
- : lchan->dyn.act_type;
- ho_ref = (ts->dyn.pchan_want == GSM_PCHAN_PDCH)
- ? 0
- : lchan->dyn.ho_ref;
-
- /* Fetch the rqd_ref back from before switchover started. */
- lchan->rqd_ref = lchan->dyn.rqd_ref;
- lchan->rqd_ta = lchan->dyn.rqd_ta;
- lchan->dyn.rqd_ref = NULL;
- lchan->dyn.rqd_ta = 0;
-
- /* During switchover, we have received a release ack, which means that
- * the act_timer has been stopped. Start the timer again so we mark
- * this channel broken if the activation ack comes too late. */
- osmo_timer_setup(&lchan->act_timer, lchan_act_tmr_cb, lchan);
- osmo_timer_schedule(&lchan->act_timer, 4, 0);
-
- rc = rsl_chan_activate_lchan(lchan, act_type, ho_ref);
- if (rc) {
- LOGP(DRSL, LOGL_ERROR,
- "%s RSL Chan Activate failed\n",
- gsm_ts_and_pchan_name(ts));
- return dyn_ts_switchover_failed(ts, rc);
- }
- return 0;
-}
-
-static int dyn_ts_switchover_failed(struct gsm_bts_trx_ts *ts, int rc)
-{
- ts->dyn.pchan_want = ts->dyn.pchan_is;
- LOGP(DRSL, LOGL_ERROR, "%s Error %d during dynamic channel switchover."
- " Going back to previous pchan.\n", gsm_ts_and_pchan_name(ts),
- rc);
- return rc;
-}
-
-static void dyn_ts_switchover_complete(struct gsm_lchan *lchan)
-{
- enum gsm_phys_chan_config pchan_act;
- enum gsm_phys_chan_config pchan_was;
- struct gsm_bts_trx_ts *ts = lchan->ts;
-
- OSMO_ASSERT(ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH);
-
- pchan_act = pchan_for_lchant(lchan->type);
- /*
- * Paranoia: do the types match?
- * In case of errors: we've received an act ack already, so what to do
- * about it? Logging the error should suffice for now.
- */
- if (pchan_act != ts->dyn.pchan_want)
- LOGP(DRSL, LOGL_ERROR,
- "%s Requested transition does not match lchan type %s\n",
- gsm_ts_and_pchan_name(ts),
- gsm_lchant_name(lchan->type));
-
- pchan_was = ts->dyn.pchan_is;
- ts->dyn.pchan_is = ts->dyn.pchan_want = pchan_act;
-
- if (pchan_was != ts->dyn.pchan_is)
- LOGP(DRSL, LOGL_INFO, "%s switchover from %s complete.\n",
- gsm_ts_and_pchan_name(ts), gsm_pchan_name(pchan_was));
-}
-
-/* Entry-point where L2 RSL from BTS enters */
-int abis_rsl_rcvmsg(struct msgb *msg)
-{
- struct abis_rsl_common_hdr *rslh;
- int rc = 0;
-
- if (!msg) {
- DEBUGP(DRSL, "Empty RSL msg?..\n");
- return -1;
- }
-
- if (msgb_l2len(msg) < sizeof(*rslh)) {
- DEBUGP(DRSL, "Truncated RSL message with l2len: %u\n", msgb_l2len(msg));
- msgb_free(msg);
- return -1;
- }
-
- rslh = msgb_l2(msg);
-
- switch (rslh->msg_discr & 0xfe) {
- case ABIS_RSL_MDISC_RLL:
- rc = abis_rsl_rx_rll(msg);
- break;
- case ABIS_RSL_MDISC_DED_CHAN:
- rc = abis_rsl_rx_dchan(msg);
- break;
- case ABIS_RSL_MDISC_COM_CHAN:
- rc = abis_rsl_rx_cchan(msg);
- break;
- case ABIS_RSL_MDISC_TRX:
- rc = abis_rsl_rx_trx(msg);
- break;
- case ABIS_RSL_MDISC_LOC:
- LOGP(DRSL, LOGL_NOTICE, "unimplemented RSL msg disc 0x%02x\n",
- rslh->msg_discr);
- break;
- case ABIS_RSL_MDISC_IPACCESS:
- rc = abis_rsl_rx_ipacc(msg);
- break;
- default:
- LOGP(DRSL, LOGL_NOTICE, "unknown RSL message discriminator "
- "0x%02x\n", rslh->msg_discr);
- rc = -EINVAL;
- }
- msgb_free(msg);
- return rc;
-}
-
-int rsl_sms_cb_command(struct gsm_bts *bts, uint8_t chan_number,
- struct rsl_ie_cb_cmd_type cb_command,
- const uint8_t *data, int len)
-{
- struct abis_rsl_dchan_hdr *dh;
- struct msgb *cb_cmd;
-
- cb_cmd = rsl_msgb_alloc();
- if (!cb_cmd)
- return -1;
-
- dh = (struct abis_rsl_dchan_hdr *) msgb_put(cb_cmd, sizeof(*dh));
- init_dchan_hdr(dh, RSL_MT_SMS_BC_CMD);
- dh->c.msg_discr = ABIS_RSL_MDISC_COM_CHAN;
- dh->chan_nr = chan_number; /* TODO: check the chan config */
-
- msgb_tv_put(cb_cmd, RSL_IE_CB_CMD_TYPE, *(uint8_t*)&cb_command);
- msgb_tlv_put(cb_cmd, RSL_IE_SMSCB_MSG, len, data);
-
- cb_cmd->dst = bts->c0->rsl_link;
-
- return abis_rsl_sendmsg(cb_cmd);
-}
-
-int rsl_nokia_si_begin(struct gsm_bts_trx *trx)
-{
- struct abis_rsl_common_hdr *ch;
- struct msgb *msg = rsl_msgb_alloc();
-
- ch = (struct abis_rsl_common_hdr *) msgb_put(msg, sizeof(*ch));
- ch->msg_discr = ABIS_RSL_MDISC_TRX;
- ch->msg_type = 0x40; /* Nokia SI Begin */
-
- msg->dst = trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_nokia_si_end(struct gsm_bts_trx *trx)
-{
- struct abis_rsl_common_hdr *ch;
- struct msgb *msg = rsl_msgb_alloc();
-
- ch = (struct abis_rsl_common_hdr *) msgb_put(msg, sizeof(*ch));
- ch->msg_discr = ABIS_RSL_MDISC_TRX;
- ch->msg_type = 0x41; /* Nokia SI End */
-
- msgb_tv_put(msg, 0xFD, 0x00); /* Nokia Pagemode Info, No paging reorganisation required */
-
- msg->dst = trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-int rsl_bs_power_control(struct gsm_bts_trx *trx, uint8_t channel, uint8_t reduction)
-{
- struct abis_rsl_common_hdr *ch;
- struct msgb *msg = rsl_msgb_alloc();
-
- ch = (struct abis_rsl_common_hdr *) msgb_put(msg, sizeof(*ch));
- ch->msg_discr = ABIS_RSL_MDISC_DED_CHAN;
- ch->msg_type = RSL_MT_BS_POWER_CONTROL;
-
- msgb_tv_put(msg, RSL_IE_CHAN_NR, channel);
- msgb_tv_put(msg, RSL_IE_BS_POWER, reduction); /* reduction in 2dB steps */
-
- msg->dst = trx->rsl_link;
-
- return abis_rsl_sendmsg(msg);
-}
-
-/**
- * Release all allocated SAPIs starting from @param start and
- * release them with the given release mode. Once the release
- * confirmation arrives it will be attempted to release the
- * the RF channel.
- */
-int rsl_release_sapis_from(struct gsm_lchan *lchan, int start,
- enum rsl_rel_mode release_mode)
-{
- int no_sapi = 1;
- int sapi;
-
- for (sapi = start; sapi < ARRAY_SIZE(lchan->sapis); ++sapi) {
- uint8_t link_id;
- if (lchan->sapis[sapi] == LCHAN_SAPI_UNUSED)
- continue;
-
- link_id = sapi;
- if (lchan->type == GSM_LCHAN_TCH_F || lchan->type == GSM_LCHAN_TCH_H)
- link_id |= 0x40;
- rsl_release_request(lchan, link_id, release_mode);
- no_sapi = 0;
- }
-
- return no_sapi;
-}
-
-int rsl_start_t3109(struct gsm_lchan *lchan)
-{
- struct gsm_bts *bts = lchan->ts->trx->bts;
-
- osmo_timer_setup(&lchan->T3109, t3109_expired, lchan);
- osmo_timer_schedule(&lchan->T3109, bts->network->T3109, 0);
- return 0;
-}
-
-/**
- * \brief directly RF Channel Release the lchan
- *
- * When no SAPI was allocated, directly release the logical channel. This
- * should only be called from chan_alloc.c on channel release handling. In
- * case no SAPI was established the RF Channel can be directly released,
- */
-int rsl_direct_rf_release(struct gsm_lchan *lchan)
-{
- int i;
- for (i = 0; i < ARRAY_SIZE(lchan->sapis); ++i) {
- if (lchan->sapis[i] != LCHAN_SAPI_UNUSED) {
- LOGP(DRSL, LOGL_ERROR, "%s SAPI(%d) still allocated.\n",
- gsm_lchan_name(lchan), i);
- return -1;
- }
- }
-
- /* Now release it */
- return rsl_rf_chan_release(lchan, 0, SACCH_NONE);
-}
diff --git a/src/libbsc/arfcn_range_encode.c b/src/libbsc/arfcn_range_encode.c
deleted file mode 100644
index 9ca48407e..000000000
--- a/src/libbsc/arfcn_range_encode.c
+++ /dev/null
@@ -1,330 +0,0 @@
-/* gsm 04.08 system information (si) encoding and decoding
- * 3gpp ts 04.08 version 7.21.0 release 1998 / etsi ts 100 940 v7.21.0 */
-
-/*
- * (C) 2012 Holger Hans Peter Freyther
- * (C) 2012 by On-Waves
- * 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/>.
- */
-
-#include <openbsc/arfcn_range_encode.h>
-#include <openbsc/debug.h>
-
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-
-#include <osmocom/core/utils.h>
-
-#include <errno.h>
-
-static inline int greatest_power_of_2_lesser_or_equal_to(int index)
-{
- int power_of_2 = 1;
-
- do {
- power_of_2 *= 2;
- } while (power_of_2 <= index);
-
- /* now go back one step */
- return power_of_2 / 2;
-}
-
-static inline int mod(int data, int range)
-{
- int res = data % range;
- while (res < 0)
- res += range;
- return res;
-}
-
-/**
- * Determine at which index to split the ARFCNs to create an
- * equally size partition for the given range. Return -1 if
- * no such partition exists.
- */
-int range_enc_find_index(enum gsm48_range range, const int *freqs, const int size)
-{
- int i, j, n;
-
- const int RANGE_DELTA = (range - 1) / 2;
-
- for (i = 0; i < size; ++i) {
- n = 0;
- for (j = 0; j < size; ++j) {
- if (mod(freqs[j] - freqs[i], range) <= RANGE_DELTA)
- n += 1;
- }
-
- if (n - 1 == (size - 1) / 2)
- return i;
- }
-
- return -1;
-}
-
-/**
- * Range encode the ARFCN list.
- * \param range The range to use.
- * \param arfcns The list of ARFCNs
- * \param size The size of the list of ARFCNs
- * \param out Place to store the W(i) output.
- */
-int range_enc_arfcns(enum gsm48_range range,
- const int *arfcns, int size, int *out,
- const int index)
-{
- int split_at;
- int i;
-
- /*
- * The below is a GNU extension and we can remove it when
- * we move to a quicksort like in-situ swap with the pivot.
- */
- int arfcns_left[size / 2];
- int arfcns_right[size / 2];
- int l_size;
- int r_size;
- int l_origin;
- int r_origin;
-
-
- /* Test the two recursion anchors and stop processing */
- if (size == 0)
- return 0;
-
- if (size == 1) {
- out[index] = 1 + arfcns[0];
- return 0;
- }
-
- /* Now do the processing */
- split_at = range_enc_find_index(range, arfcns, size);
- if (split_at < 0)
- return -EINVAL;
-
- /* we now know where to split */
- out[index] = 1 + arfcns[split_at];
-
- /* calculate the work that needs to be done for the leafs */
- l_origin = mod(arfcns[split_at] + ((range - 1) / 2) + 1, range);
- r_origin = mod(arfcns[split_at] + 1, range);
- for (i = 0, l_size = 0, r_size = 0; i < size; ++i) {
- if (mod(arfcns[i] - l_origin, range) < range / 2)
- arfcns_left[l_size++] = mod(arfcns[i] - l_origin, range);
- if (mod(arfcns[i] - r_origin, range) < range / 2)
- arfcns_right[r_size++] = mod(arfcns[i] - r_origin, range);
- }
-
- /*
- * Now recurse and we need to make this iterative... but as the
- * tree is balanced the stack will not be too deep.
- */
- if (l_size)
- range_enc_arfcns(range / 2, arfcns_left, l_size,
- out, index + greatest_power_of_2_lesser_or_equal_to(index + 1));
- if (r_size)
- range_enc_arfcns((range - 1) / 2, arfcns_right, r_size,
- out, index + (2 * greatest_power_of_2_lesser_or_equal_to(index + 1)));
- return 0;
-}
-
-/*
- * The easiest is to use f0 == arfcns[0]. This means that under certain
- * circumstances we can encode less ARFCNs than possible with an optimal f0.
- *
- * TODO: Solve the optimisation problem and pick f0 so that the max distance
- * is the smallest. Taking into account the modulo operation. I think picking
- * size/2 will be the optimal arfcn.
- */
-/**
- * This implements the range determination as described in GSM 04.08 J4. The
- * result will be a base frequency f0 and the range to use. Note that for range
- * 1024 encoding f0 always refers to ARFCN 0 even if it is not an element of
- * the arfcns list.
- *
- * \param[in] arfcns The input frequencies, they must be sorted, lowest number first
- * \param[in] size The length of the array
- * \param[out] f0 The selected F0 base frequency. It might not be inside the list
- */
-int range_enc_determine_range(const int *arfcns, const int size, int *f0)
-{
- int max = 0;
-
- /*
- * Go for the easiest. And pick arfcns[0] == f0.
- */
- max = arfcns[size - 1] - arfcns[0];
- *f0 = arfcns[0];
-
- if (max < 128 && size <= 29)
- return ARFCN_RANGE_128;
- if (max < 256 && size <= 22)
- return ARFCN_RANGE_256;
- if (max < 512 && size <= 18)
- return ARFCN_RANGE_512;
- if (max < 1024 && size <= 17) {
- *f0 = 0;
- return ARFCN_RANGE_1024;
- }
-
- return ARFCN_RANGE_INVALID;
-}
-
-static void write_orig_arfcn(uint8_t *chan_list, int f0)
-{
- chan_list[0] |= (f0 >> 9) & 1;
- chan_list[1] = (f0 >> 1);
- chan_list[2] = (f0 & 1) << 7;
-}
-
-static void write_all_wn(uint8_t *chan_list, int bit_offs,
- int *w, int w_size, int w1_len)
-{
- int octet_offs = 0; /* offset into chan_list */
- int wk_len = w1_len; /* encoding size in bits of w[k] */
- int k; /* 1 based */
- int level = 0; /* tree level, top level = 0 */
- int lvl_left = 1; /* nodes per tree level */
-
- /* W(2^i) to W(2^(i+1)-1) are on w1_len-i bits when present */
-
- for (k = 1; k <= w_size; k++) {
- int wk_left = wk_len;
- DEBUGP(DRR,
- "k=%d, wk_len=%d, offs=%d:%d, level=%d, "
- "lvl_left=%d\n",
- k, wk_len, octet_offs, bit_offs, level, lvl_left);
-
- while (wk_left > 0) {
- int cur_bits = 8 - bit_offs;
- int cur_mask;
- int wk_slice;
-
- if (cur_bits > wk_left)
- cur_bits = wk_left;
-
- cur_mask = ((1 << cur_bits) - 1);
-
- DEBUGP(DRR,
- " wk_left=%d, cur_bits=%d, offs=%d:%d\n",
- wk_left, cur_bits, octet_offs, bit_offs);
-
- /* advance */
- wk_left -= cur_bits;
- bit_offs += cur_bits;
-
- /* right aligned wk data for current out octet */
- wk_slice = (w[k-1] >> wk_left) & cur_mask;
-
- /* cur_bits now contains the number of bits
- * that are to be copied from wk to the chan_list.
- * wk_left is set to the number of bits that must
- * not yet be copied.
- * bit_offs points after the bit area that is going to
- * be overwritten:
- *
- * wk_left
- * |
- * v
- * wk: WWWWWWWWWWW
- * |||||<-- wk_slice, cur_bits=5
- * --WWWWW-
- * ^
- * |
- * bit_offs
- */
-
- DEBUGP(DRR,
- " wk=%02x, slice=%02x/%02x, cl=%02x\n",
- w[k-1], wk_slice, cur_mask, wk_slice << (8 - bit_offs));
-
- chan_list[octet_offs] &= ~(cur_mask << (8 - bit_offs));
- chan_list[octet_offs] |= wk_slice << (8 - bit_offs);
-
- /* adjust output */
- if (bit_offs == 8) {
- bit_offs = 0;
- octet_offs += 1;
- }
- }
-
- /* adjust bit sizes */
- lvl_left -= 1;
- if (!lvl_left) {
- /* completed tree level, advance to next */
- level += 1;
- lvl_left = 1 << level;
- wk_len -= 1;
- }
- }
-}
-
-int range_enc_range128(uint8_t *chan_list, int f0, int *w)
-{
- chan_list[0] = 0x8C;
- write_orig_arfcn(chan_list, f0);
-
- write_all_wn(&chan_list[2], 1, w, 28, 7);
- return 0;
-}
-
-int range_enc_range256(uint8_t *chan_list, int f0, int *w)
-{
- chan_list[0] = 0x8A;
- write_orig_arfcn(chan_list, f0);
-
- write_all_wn(&chan_list[2], 1, w, 21, 8);
- return 0;
-}
-
-int range_enc_range512(uint8_t *chan_list, int f0, int *w)
-{
- chan_list[0] = 0x88;
- write_orig_arfcn(chan_list, f0);
-
- write_all_wn(&chan_list[2], 1, w, 17, 9);
- return 0;
-}
-
-int range_enc_range1024(uint8_t *chan_list, int f0, int f0_included, int *w)
-{
- chan_list[0] = 0x80 | (f0_included << 2);
-
- write_all_wn(&chan_list[0], 6, w, 16, 10);
- return 0;
-}
-
-int range_enc_filter_arfcns(int *arfcns,
- const int size, const int f0, int *f0_included)
-{
- int i, j = 0;
- *f0_included = 0;
-
- for (i = 0; i < size; ++i) {
- /*
- * Appendix J.4 says the following:
- * All frequencies except F(0), minus F(0) + 1.
- * I assume we need to exclude it here.
- */
- if (arfcns[i] == f0) {
- *f0_included = 1;
- continue;
- }
-
- arfcns[j++] = mod(arfcns[i] - (f0 + 1), 1024);
- }
-
- return j;
-}
diff --git a/src/libbsc/bsc_api.c b/src/libbsc/bsc_api.c
deleted file mode 100644
index c60f8182a..000000000
--- a/src/libbsc/bsc_api.c
+++ /dev/null
@@ -1,897 +0,0 @@
-/* GSM 08.08 like API for OpenBSC. The bridge from MSC to BSC */
-
-/* (C) 2010-2011 by Holger Hans Peter Freyther
- * (C) 2010-2011 by On-Waves
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_api.h>
-#include <openbsc/bsc_rll.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/handover.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/trau_mux.h>
-#include <openbsc/vlr.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/gsm48.h>
-
-#include <osmocom/core/talloc.h>
-
-#define GSM0808_T10_VALUE 6, 0
-
-
-static void rll_ind_cb(struct gsm_lchan *, uint8_t, void *, enum bsc_rllr_ind);
-static void send_sapi_reject(struct gsm_subscriber_connection *conn, int link_id);
-static void handle_release(struct gsm_subscriber_connection *conn, struct bsc_api *bsc, struct gsm_lchan *lchan);
-static void handle_chan_ack(struct gsm_subscriber_connection *conn, struct bsc_api *bsc, struct gsm_lchan *lchan);
-static void handle_chan_nack(struct gsm_subscriber_connection *conn, struct bsc_api *bsc, struct gsm_lchan *lchan);
-
-/* GSM 08.08 3.2.2.33 */
-static uint8_t lchan_to_chosen_channel(struct gsm_lchan *lchan)
-{
- uint8_t channel_mode = 0, channel = 0;
-
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_V1:
- case GSM48_CMODE_SPEECH_EFR:
- case GSM48_CMODE_SPEECH_AMR:
- channel_mode = 0x9;
- break;
- case GSM48_CMODE_SIGN:
- channel_mode = 0x8;
- break;
- case GSM48_CMODE_DATA_14k5:
- channel_mode = 0xe;
- break;
- case GSM48_CMODE_DATA_12k0:
- channel_mode = 0xb;
- break;
- case GSM48_CMODE_DATA_6k0:
- channel_mode = 0xc;
- break;
- case GSM48_CMODE_DATA_3k6:
- channel_mode = 0xd;
- break;
- }
-
- switch (lchan->type) {
- case GSM_LCHAN_NONE:
- channel = 0x0;
- break;
- case GSM_LCHAN_SDCCH:
- channel = 0x1;
- break;
- case GSM_LCHAN_TCH_F:
- channel = 0x8;
- break;
- case GSM_LCHAN_TCH_H:
- channel = 0x9;
- break;
- case GSM_LCHAN_UNKNOWN:
- default:
- LOGP(DMSC, LOGL_ERROR, "Unknown lchan type: %p\n", lchan);
- break;
- }
-
- return channel_mode << 4 | channel;
-}
-
-static uint8_t chan_mode_to_speech(struct gsm_lchan *lchan)
-{
- int mode = 0;
-
- switch (lchan->tch_mode) {
- case GSM48_CMODE_SPEECH_V1:
- mode = 1;
- break;
- case GSM48_CMODE_SPEECH_EFR:
- mode = 0x11;
- break;
- case GSM48_CMODE_SPEECH_AMR:
- mode = 0x21;
- break;
- case GSM48_CMODE_SIGN:
- case GSM48_CMODE_DATA_14k5:
- case GSM48_CMODE_DATA_12k0:
- case GSM48_CMODE_DATA_6k0:
- case GSM48_CMODE_DATA_3k6:
- default:
- LOGP(DMSC, LOGL_ERROR, "Using non speech mode: %d\n", mode);
- return 0;
- break;
- }
-
- /* assume to always do AMR HR on any TCH type */
- if (lchan->type == GSM_LCHAN_TCH_H ||
- lchan->tch_mode == GSM48_CMODE_SPEECH_AMR)
- mode |= 0x4;
-
- return mode;
-}
-
-static void assignment_t10_timeout(void *_conn)
-{
- struct bsc_api *api;
- struct gsm_subscriber_connection *conn =
- (struct gsm_subscriber_connection *) _conn;
-
- LOGP(DMSC, LOGL_ERROR, "Assignment T10 timeout on %p\n", conn);
-
- /*
- * normal release on the secondary channel but only if the
- * secondary_channel has not been released by the handle_chan_nack.
- */
- if (conn->secondary_lchan)
- lchan_release(conn->secondary_lchan, 0, RSL_REL_LOCAL_END);
- conn->secondary_lchan = NULL;
-
- /* inform them about the failure */
- api = conn->network->bsc_api;
- api->assign_fail(conn, GSM0808_CAUSE_NO_RADIO_RESOURCE_AVAILABLE, NULL);
-}
-
-/*! \brief Determine and apply AMR multi-rate configuration to lchan
- * Determine which AMR multi-rate configuration to use and apply it to
- * the lchan (so it can be communicated to BTS and MS during channel
- * activation.
- * \param[in] conn subscriber connection (used to resolve bsc_api)
- * \param[out] lchan logical channel to which to apply mr config
- * \param[in] full_rate whether to use full-rate (1) or half-rate (0) config
- */
-static void handle_mr_config(struct gsm_subscriber_connection *conn,
- struct gsm_lchan *lchan, int full_rate)
-{
- struct bsc_api *api;
- api = conn->network->bsc_api;
- struct amr_multirate_conf *mr;
- struct gsm48_multi_rate_conf *mr_conf;
-
- /* BSC api override for this method, used in OsmoBSC mode with
- * bsc_mr_config() to use MSC-specific/specified configuration */
- if (api->mr_config)
- return api->mr_config(conn, lchan, full_rate);
-
- /* NITB case: use the BTS-specic multi-rate configuration from
- * the vty/configuration file */
- if (full_rate)
- mr = &lchan->ts->trx->bts->mr_full;
- else
- mr = &lchan->ts->trx->bts->mr_half;
-
- mr_conf = (struct gsm48_multi_rate_conf *) mr->gsm48_ie;
- mr_conf->ver = 1;
-
- /* default, if no AMR codec defined */
- if (!mr->gsm48_ie[1]) {
- mr_conf->icmi = 1;
- mr_conf->m5_90 = 1;
- }
- /* store encoded MR config IE lchan for both MS (uplink) and BTS
- * (downlink) directions */
- gsm48_multirate_config(lchan->mr_ms_lv, mr, mr->ms_mode);
- gsm48_multirate_config(lchan->mr_bts_lv, mr, mr->bts_mode);
-}
-
-/*
- * Start a new assignment and make sure that it is completed within T10 either
- * positively, negatively or by the timeout.
- *
- * 1.) allocate a new lchan
- * 2.) copy the encryption key and other data from the
- * old to the new channel.
- * 3.) RSL Channel Activate this channel and wait
- *
- * -> Signal handler for the LCHAN
- * 4.) Send GSM 04.08 assignment command to the MS
- *
- * -> Assignment Complete/Assignment Failure
- * 5.) Release the SDCCH, continue signalling on the new link
- */
-static int handle_new_assignment(struct gsm_subscriber_connection *conn, int chan_mode, int full_rate)
-{
- struct gsm_lchan *new_lchan;
- int chan_type;
-
- chan_type = full_rate ? GSM_LCHAN_TCH_F : GSM_LCHAN_TCH_H;
-
- new_lchan = lchan_alloc(conn->bts, chan_type, 0);
-
- if (!new_lchan) {
- LOGP(DMSC, LOGL_NOTICE, "No free channel.\n");
- return -1;
- }
-
- /* copy old data to the new channel */
- memcpy(&new_lchan->encr, &conn->lchan->encr, sizeof(new_lchan->encr));
- new_lchan->ms_power = conn->lchan->ms_power;
- new_lchan->bs_power = conn->lchan->bs_power;
- new_lchan->rqd_ta = conn->lchan->rqd_ta;
-
- /* copy new data to it */
- new_lchan->tch_mode = chan_mode;
- new_lchan->rsl_cmode = RSL_CMOD_SPD_SPEECH;
-
- /* handle AMR correctly */
- if (chan_mode == GSM48_CMODE_SPEECH_AMR)
- handle_mr_config(conn, new_lchan, full_rate);
-
- if (rsl_chan_activate_lchan(new_lchan, 0x1, 0) < 0) {
- LOGP(DHO, LOGL_ERROR, "could not activate channel\n");
- lchan_free(new_lchan);
- return -1;
- }
-
- /* remember that we have the channel */
- conn->secondary_lchan = new_lchan;
- new_lchan->conn = conn;
-
- rsl_lchan_set_state(new_lchan, LCHAN_S_ACT_REQ);
- return 0;
-}
-
-struct gsm_subscriber_connection *bsc_subscr_con_allocate(struct gsm_lchan *lchan)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_network *net = lchan->ts->trx->bts->network;
-
- conn = talloc_zero(net, struct gsm_subscriber_connection);
- if (!conn)
- return NULL;
-
- conn->network = net;
- conn->lchan = lchan;
- conn->bts = lchan->ts->trx->bts;
- conn->via_ran = RAN_GERAN_A;
- conn->lac = conn->bts->location_area_code;
- lchan->conn = conn;
- llist_add_tail(&conn->entry, &net->subscr_conns);
- return conn;
-}
-
-void bsc_subscr_con_free(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return;
-
- if (conn->network->bsc_api->conn_cleanup)
- conn->network->bsc_api->conn_cleanup(conn);
-
- if (conn->vsub) {
- LOGP(DNM, LOGL_ERROR, "conn->vsub should have been cleared.\n");
- conn->vsub = NULL;
- }
-
- if (conn->ho_lchan) {
- LOGP(DNM, LOGL_ERROR, "The ho_lchan should have been cleared.\n");
- conn->ho_lchan->conn = NULL;
- }
-
- if (conn->lchan) {
- LOGP(DNM, LOGL_ERROR, "The lchan should have been cleared.\n");
- conn->lchan->conn = NULL;
- }
-
- if (conn->secondary_lchan) {
- LOGP(DNM, LOGL_ERROR, "The secondary_lchan should have been cleared.\n");
- conn->secondary_lchan->conn = NULL;
- }
-
- llist_del(&conn->entry);
- talloc_free(conn);
-}
-
-int bsc_api_init(struct gsm_network *network, struct bsc_api *api)
-{
- network->bsc_api = api;
- return 0;
-}
-
-/*! \brief process incoming 08.08 DTAP from MSC (send via BTS to MS) */
-int gsm0808_submit_dtap(struct gsm_subscriber_connection *conn,
- struct msgb *msg, int link_id, int allow_sacch)
-{
- uint8_t sapi;
-
-
- if (!conn->lchan) {
- LOGP(DMSC, LOGL_ERROR,
- "Called submit dtap without an lchan.\n");
- msgb_free(msg);
- return -1;
- }
-
- sapi = link_id & 0x7;
- msg->lchan = conn->lchan;
- msg->dst = msg->lchan->ts->trx->rsl_link;
-
- /* If we are on a TCH and need to submit a SMS (on SAPI=3) we need to use the SACH */
- if (allow_sacch && sapi != 0) {
- if (conn->lchan->type == GSM_LCHAN_TCH_F || conn->lchan->type == GSM_LCHAN_TCH_H)
- link_id |= 0x40;
- }
-
- msg->l3h = msg->data;
- /* is requested SAPI already up? */
- if (conn->lchan->sapis[sapi] == LCHAN_SAPI_UNUSED) {
- /* Establish L2 for additional SAPI */
- OBSC_LINKID_CB(msg) = link_id;
- if (rll_establish(msg->lchan, sapi, rll_ind_cb, msg) != 0) {
- msgb_free(msg);
- send_sapi_reject(conn, link_id);
- return -1;
- }
- return 0;
- } else {
- /* Directly forward via RLL/RSL to BTS */
- return rsl_data_request(msg, link_id);
- }
-}
-
-/*
- * \brief Check if the given channel is compatible with the mode/fullrate
- */
-static int chan_compat_with_mode(struct gsm_lchan *lchan, int chan_mode, int full_rate)
-{
- switch (chan_mode) {
- case GSM48_CMODE_SIGN:
- /* signalling is always possible */
- return 1;
- case GSM48_CMODE_SPEECH_V1:
- case GSM48_CMODE_SPEECH_AMR:
- case GSM48_CMODE_DATA_3k6:
- case GSM48_CMODE_DATA_6k0:
- /* these services can all run on TCH/H, but we may have
- * an explicit override by the 'full_rate' argument */
- switch (lchan->type) {
- case GSM_LCHAN_TCH_F:
- return 1;
- case GSM_LCHAN_TCH_H:
- if (full_rate)
- return 0;
- else
- return 1;
- break;
- default:
- return 0;
- }
- break;
- case GSM48_CMODE_DATA_12k0:
- case GSM48_CMODE_DATA_14k5:
- case GSM48_CMODE_SPEECH_EFR:
- /* these services all explicitly require a TCH/F */
- if (lchan->type == GSM_LCHAN_TCH_F)
- return 1;
- else
- return 0;
- break;
- }
-
- return 0;
-}
-
-/**
- * Send a GSM08.08 Assignment Request. Right now this does not contain the
- * audio codec type or the allowed rates for the config. It is assumed that
- * this is for audio handling only. In case the current channel does not allow
- * the selected mode a new one will be allocated.
- *
- * TODO: Add multirate configuration, make it work for more than audio.
- */
-int gsm0808_assign_req(struct gsm_subscriber_connection *conn, int chan_mode, int full_rate)
-{
- struct bsc_api *api;
- api = conn->network->bsc_api;
-
- if (!chan_compat_with_mode(conn->lchan, chan_mode, full_rate)) {
- if (handle_new_assignment(conn, chan_mode, full_rate) != 0)
- goto error;
- } else {
- if (chan_mode == GSM48_CMODE_SPEECH_AMR)
- handle_mr_config(conn, conn->lchan, full_rate);
-
- LOGP(DMSC, LOGL_NOTICE,
- "Sending %s ChanModify for speech: %s on channel %s\n",
- gsm_lchan_name(conn->lchan),
- get_value_string(gsm48_chan_mode_names, chan_mode),
- get_value_string(gsm_chan_t_names, conn->lchan->type));
- gsm48_lchan_modify(conn->lchan, chan_mode);
- }
-
- /* we will now start the timer to complete the assignment */
- osmo_timer_setup(&conn->T10, assignment_t10_timeout, conn);
- osmo_timer_schedule(&conn->T10, GSM0808_T10_VALUE);
- return 0;
-
-error:
- api->assign_fail(conn, 0, NULL);
- return -1;
-}
-
-int gsm0808_page(struct gsm_bts *bts, unsigned int page_group, unsigned int mi_len,
- uint8_t *mi, int chan_type)
-{
- return rsl_paging_cmd(bts, page_group, mi_len, mi, chan_type, false);
-}
-
-static void handle_ass_compl(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh;
- struct bsc_api *api = conn->network->bsc_api;
-
- if (conn->secondary_lchan != msg->lchan) {
- LOGP(DMSC, LOGL_ERROR, "Assignment Compl should occur on second lchan.\n");
- return;
- }
-
- gh = msgb_l3(msg);
- if (msgb_l3len(msg) - sizeof(*gh) != 1) {
- LOGP(DMSC, LOGL_ERROR, "Assignment Compl invalid: %zu\n",
- msgb_l3len(msg) - sizeof(*gh));
- return;
- }
-
- /* switch TRAU muxer for E1 based BTS from one channel to another */
- if (is_e1_bts(conn->bts))
- switch_trau_mux(conn->lchan, conn->secondary_lchan);
-
- /* swap channels */
- osmo_timer_del(&conn->T10);
-
- lchan_release(conn->lchan, 0, RSL_REL_LOCAL_END);
- conn->lchan = conn->secondary_lchan;
- conn->secondary_lchan = NULL;
-
- if (is_ipaccess_bts(conn->bts) && conn->lchan->tch_mode != GSM48_CMODE_SIGN)
- rsl_ipacc_crcx(conn->lchan);
-
- api->assign_compl(conn, gh->data[0],
- lchan_to_chosen_channel(conn->lchan),
- conn->lchan->encr.alg_id,
- chan_mode_to_speech(conn->lchan));
-}
-
-static void handle_ass_fail(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct bsc_api *api = conn->network->bsc_api;
- uint8_t *rr_failure;
- struct gsm48_hdr *gh;
-
-
- if (conn->lchan != msg->lchan) {
- LOGP(DMSC, LOGL_ERROR, "Assignment failure should occur on primary lchan.\n");
- return;
- }
-
- /* stop the timer and release it */
- osmo_timer_del(&conn->T10);
- lchan_release(conn->secondary_lchan, 0, RSL_REL_LOCAL_END);
- conn->secondary_lchan = NULL;
-
- gh = msgb_l3(msg);
- if (msgb_l3len(msg) - sizeof(*gh) != 1) {
- LOGP(DMSC, LOGL_ERROR, "assignment failure unhandled: %zu\n",
- msgb_l3len(msg) - sizeof(*gh));
- rr_failure = NULL;
- } else {
- rr_failure = &gh->data[0];
- }
-
- api->assign_fail(conn,
- GSM0808_CAUSE_RADIO_INTERFACE_MESSAGE_FAILURE,
- rr_failure);
-}
-
-static void handle_classmark_chg(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct bsc_api *api = msg->lchan->ts->trx->bts->network->bsc_api;
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- uint8_t cm2_len, cm3_len = 0;
- uint8_t *cm2, *cm3 = NULL;
-
- DEBUGP(DRR, "CLASSMARK CHANGE ");
-
- /* classmark 2 */
- cm2_len = gh->data[0];
- cm2 = &gh->data[1];
- DEBUGPC(DRR, "CM2(len=%u) ", cm2_len);
-
- if (payload_len > cm2_len + 1) {
- /* we must have a classmark3 */
- if (gh->data[cm2_len+1] != 0x20) {
- DEBUGPC(DRR, "ERR CM3 TAG\n");
- return;
- }
- if (cm2_len > 3) {
- DEBUGPC(DRR, "CM2 too long!\n");
- return;
- }
-
- cm3_len = gh->data[cm2_len+2];
- cm3 = &gh->data[cm2_len+3];
- if (cm3_len > 14) {
- DEBUGPC(DRR, "CM3 len %u too long!\n", cm3_len);
- return;
- }
- DEBUGPC(DRR, "CM3(len=%u)\n", cm3_len);
- }
- api->classmark_chg(conn, cm2, cm2_len, cm3, cm3_len);
-}
-
-/* Chapter 9.1.16 Handover complete */
-static void handle_rr_ho_compl(struct msgb *msg)
-{
- struct lchan_signal_data sig;
- struct gsm48_hdr *gh = msgb_l3(msg);
-
- DEBUGP(DRR, "HANDOVER COMPLETE cause = %s\n",
- rr_cause_name(gh->data[0]));
-
- sig.lchan = msg->lchan;
- sig.mr = NULL;
- osmo_signal_dispatch(SS_LCHAN, S_LCHAN_HANDOVER_COMPL, &sig);
- /* FIXME: release old channel */
-}
-
-/* Chapter 9.1.17 Handover Failure */
-static void handle_rr_ho_fail(struct msgb *msg)
-{
- struct lchan_signal_data sig;
- struct gsm48_hdr *gh = msgb_l3(msg);
-
- DEBUGP(DRR, "HANDOVER FAILED cause = %s\n",
- rr_cause_name(gh->data[0]));
-
- sig.lchan = msg->lchan;
- sig.mr = NULL;
- osmo_signal_dispatch(SS_LCHAN, S_LCHAN_HANDOVER_FAIL, &sig);
- /* FIXME: release allocated new channel */
-}
-
-
-static void dispatch_dtap(struct gsm_subscriber_connection *conn,
- uint8_t link_id, struct msgb *msg)
-{
- struct bsc_api *api = msg->lchan->ts->trx->bts->network->bsc_api;
- struct gsm48_hdr *gh;
- uint8_t pdisc;
- uint8_t msg_type;
- int rc;
-
- if (msgb_l3len(msg) < sizeof(*gh)) {
- LOGP(DMSC, LOGL_ERROR, "Message too short for a GSM48 header.\n");
- return;
- }
-
- gh = msgb_l3(msg);
- pdisc = gsm48_hdr_pdisc(gh);
- msg_type = gsm48_hdr_msg_type(gh);
-
- /* the idea is to handle all RR messages here, and only hand
- * MM/CC/SMS-CP/LCS up to the MSC. Some messages like PAGING
- * RESPONSE or CM SERVICE REQUEST will not be covered here, as
- * they are only possible in the first L3 message of each L2
- * channel, i.e. 'conn' will not exist and gsm0408_rcvmsg()
- * will call api->compl_l3() for it */
- switch (pdisc) {
- case GSM48_PDISC_RR:
- switch (msg_type) {
- case GSM48_MT_RR_GPRS_SUSP_REQ:
- DEBUGP(DRR, "%s\n",
- gsm48_rr_msg_name(GSM48_MT_RR_GPRS_SUSP_REQ));
- break;
- case GSM48_MT_RR_STATUS:
- LOGP(DRR, LOGL_NOTICE, "%s (cause: %s)\n",
- gsm48_rr_msg_name(GSM48_MT_RR_STATUS),
- rr_cause_name(gh->data[0]));
- break;
- case GSM48_MT_RR_MEAS_REP:
- /* This shouldn't actually end up here, as RSL treats
- * L3 Info of 08.58 MEASUREMENT REPORT different by calling
- * directly into gsm48_parse_meas_rep */
- LOGP(DMEAS, LOGL_ERROR, "DIRECT GSM48 MEASUREMENT REPORT ?!? ");
- break;
- case GSM48_MT_RR_HANDO_COMPL:
- handle_rr_ho_compl(msg);
- break;
- case GSM48_MT_RR_HANDO_FAIL:
- handle_rr_ho_fail(msg);
- break;
- case GSM48_MT_RR_CIPH_M_COMPL:
- if (api->cipher_mode_compl)
- api->cipher_mode_compl(conn, msg,
- conn->lchan->encr.alg_id);
- break;
- case GSM48_MT_RR_ASS_COMPL:
- handle_ass_compl(conn, msg);
- break;
- case GSM48_MT_RR_ASS_FAIL:
- handle_ass_fail(conn, msg);
- break;
- case GSM48_MT_RR_CHAN_MODE_MODIF_ACK:
- osmo_timer_del(&conn->T10);
- rc = gsm48_rx_rr_modif_ack(msg);
- if (rc < 0) {
- api->assign_fail(conn,
- GSM0808_CAUSE_NO_RADIO_RESOURCE_AVAILABLE,
- NULL);
- } else if (rc >= 0) {
- api->assign_compl(conn, 0,
- lchan_to_chosen_channel(conn->lchan),
- conn->lchan->encr.alg_id,
- chan_mode_to_speech(conn->lchan));
- }
- break;
- case GSM48_MT_RR_CLSM_CHG:
- handle_classmark_chg(conn, msg);
- break;
- case GSM48_MT_RR_APP_INFO:
- /* Passing RR APP INFO to MSC, not quite
- * according to spec */
- if (api->dtap)
- api->dtap(conn, link_id, msg);
- break;
- default:
- /* Normally, a MSC should never receive RR
- * messages, but we'd rather forward what we
- * don't know than drop it... */
- LOGP(DRR, LOGL_NOTICE,
- "BSC: Passing %s 04.08 RR message to MSC\n",
- gsm48_rr_msg_name(msg_type));
- if (api->dtap)
- api->dtap(conn, link_id, msg);
- }
- break;
- default:
- if (api->dtap)
- api->dtap(conn, link_id, msg);
- break;
- }
-}
-
-/*! \brief RSL has received a DATA INDICATION with L3 from MS */
-int gsm0408_rcvmsg(struct msgb *msg, uint8_t link_id)
-{
- int rc;
- struct bsc_api *api = msg->lchan->ts->trx->bts->network->bsc_api;
- struct gsm_lchan *lchan;
-
- lchan = msg->lchan;
- if (lchan->state != LCHAN_S_ACTIVE) {
- LOGP(DRSL, LOGL_INFO, "Got data in non active state(%s), "
- "discarding.\n", gsm_lchans_name(lchan->state));
- return -1;
- }
-
-
- if (lchan->conn) {
- /* if we already have a connection, forward via DTAP to
- * MSC */
- dispatch_dtap(lchan->conn, link_id, msg);
- } else {
- /* allocate a new connection */
- rc = BSC_API_CONN_POL_REJECT;
- lchan->conn = bsc_subscr_con_allocate(msg->lchan);
- if (!lchan->conn) {
- lchan_release(lchan, 1, RSL_REL_NORMAL);
- return -1;
- }
-
- /* fwd via bsc_api to send COMPLETE L3 INFO to MSC */
- rc = api->compl_l3(lchan->conn, msg, 0);
-
- if (rc != BSC_API_CONN_POL_ACCEPT) {
- lchan->conn->lchan = NULL;
- bsc_subscr_con_free(lchan->conn);
- lchan_release(lchan, 1, RSL_REL_NORMAL);
- }
- }
-
- return 0;
-}
-
-/*! \brief We received a GSM 08.08 CIPHER MODE from the MSC */
-int gsm0808_cipher_mode(struct gsm_subscriber_connection *conn, int cipher,
- const uint8_t *key, int len, int include_imeisv)
-{
- if (cipher > 0 && key == NULL) {
- LOGP(DRSL, LOGL_ERROR, "Need to have an encrytpion key.\n");
- return -1;
- }
-
- if (len > MAX_A5_KEY_LEN) {
- LOGP(DRSL, LOGL_ERROR, "The key is too long: %d\n", len);
- return -1;
- }
-
- conn->lchan->encr.alg_id = RSL_ENC_ALG_A5(cipher);
- if (key) {
- conn->lchan->encr.key_len = len;
- memcpy(conn->lchan->encr.key, key, len);
- }
-
- return gsm48_send_rr_ciph_mode(conn->lchan, include_imeisv);
-}
-
-/*
- * Release all occupied RF Channels but stay around for more.
- */
-int gsm0808_clear(struct gsm_subscriber_connection *conn)
-{
- if (conn->ho_lchan)
- bsc_clear_handover(conn, 1);
-
- if (conn->secondary_lchan)
- lchan_release(conn->secondary_lchan, 0, RSL_REL_LOCAL_END);
-
- if (conn->lchan)
- lchan_release(conn->lchan, 1, RSL_REL_NORMAL);
-
- conn->lchan = NULL;
- conn->secondary_lchan = NULL;
- conn->ho_lchan = NULL;
- conn->bts = NULL;
-
- osmo_timer_del(&conn->T10);
-
- return 0;
-}
-
-static void send_sapi_reject(struct gsm_subscriber_connection *conn, int link_id)
-{
- struct bsc_api *api;
-
- if (!conn)
- return;
-
- api = conn->network->bsc_api;
- if (!api || !api->sapi_n_reject)
- return;
-
- api->sapi_n_reject(conn, link_id);
-}
-
-static void rll_ind_cb(struct gsm_lchan *lchan, uint8_t link_id, void *_data, enum bsc_rllr_ind rllr_ind)
-{
- struct msgb *msg = _data;
-
- /*
- * There seems to be a small window that the RLL timer can
- * fire after a lchan_release call and before the S_CHALLOC_FREED
- * is called. Check if a conn is set before proceeding.
- */
- if (!lchan->conn)
- return;
-
- switch (rllr_ind) {
- case BSC_RLLR_IND_EST_CONF:
- rsl_data_request(msg, OBSC_LINKID_CB(msg));
- break;
- case BSC_RLLR_IND_REL_IND:
- case BSC_RLLR_IND_ERR_IND:
- case BSC_RLLR_IND_TIMEOUT:
- send_sapi_reject(lchan->conn, OBSC_LINKID_CB(msg));
- msgb_free(msg);
- break;
- }
-}
-
-static int bsc_handle_lchan_signal(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct bsc_api *bsc;
- struct gsm_lchan *lchan;
- struct lchan_signal_data *lchan_data;
-
- if (subsys != SS_LCHAN)
- return 0;
-
-
- lchan_data = signal_data;
- if (!lchan_data->lchan || !lchan_data->lchan->conn)
- return 0;
-
- lchan = lchan_data->lchan;
- bsc = lchan->ts->trx->bts->network->bsc_api;
- if (!bsc)
- return 0;
-
- switch (signal) {
- case S_LCHAN_UNEXPECTED_RELEASE:
- handle_release(lchan->conn, bsc, lchan);
- break;
- case S_LCHAN_ACTIVATE_ACK:
- handle_chan_ack(lchan->conn, bsc, lchan);
- break;
- case S_LCHAN_ACTIVATE_NACK:
- handle_chan_nack(lchan->conn, bsc, lchan);
- break;
- }
-
- return 0;
-}
-
-static void handle_release(struct gsm_subscriber_connection *conn,
- struct bsc_api *bsc, struct gsm_lchan *lchan)
-{
- int destruct = 1;
-
- if (conn->secondary_lchan == lchan) {
- osmo_timer_del(&conn->T10);
- conn->secondary_lchan = NULL;
-
- bsc->assign_fail(conn,
- GSM0808_CAUSE_RADIO_INTERFACE_FAILURE,
- NULL);
- }
-
- /* clear the connection now */
- if (bsc->clear_request)
- destruct = bsc->clear_request(conn, 0);
-
- /* now give up all channels */
- if (conn->lchan == lchan)
- conn->lchan = NULL;
- if (conn->ho_lchan == lchan) {
- bsc_clear_handover(conn, 0);
- conn->ho_lchan = NULL;
- }
- lchan->conn = NULL;
-
- gsm0808_clear(conn);
-
- if (destruct)
- bsc_subscr_con_free(conn);
-}
-
-static void handle_chan_ack(struct gsm_subscriber_connection *conn,
- struct bsc_api *api, struct gsm_lchan *lchan)
-{
- if (conn->secondary_lchan != lchan)
- return;
-
- LOGP(DMSC, LOGL_NOTICE, "Sending assignment on chan: %p\n", lchan);
- gsm48_send_rr_ass_cmd(conn->lchan, lchan, lchan->ms_power);
-}
-
-static void handle_chan_nack(struct gsm_subscriber_connection *conn,
- struct bsc_api *api, struct gsm_lchan *lchan)
-{
- if (conn->secondary_lchan != lchan)
- return;
-
- LOGP(DMSC, LOGL_ERROR, "Channel activation failed. Waiting for timeout now\n");
- conn->secondary_lchan->conn = NULL;
- conn->secondary_lchan = NULL;
-}
-
-static __attribute__((constructor)) void on_dso_load_bsc(void)
-{
- osmo_signal_register_handler(SS_LCHAN, bsc_handle_lchan_signal, NULL);
-}
-
diff --git a/src/libbsc/bsc_ctrl_commands.c b/src/libbsc/bsc_ctrl_commands.c
deleted file mode 100644
index 641fe2bf6..000000000
--- a/src/libbsc/bsc_ctrl_commands.c
+++ /dev/null
@@ -1,459 +0,0 @@
-/*
- * (C) 2013-2015 by Holger Hans Peter Freyther
- * (C) 2013-2015 by sysmocom s.f.m.c. GmbH
- *
- * 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/>.
- *
- */
-#include <errno.h>
-#include <time.h>
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/debug.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/bsc_msc_data.h>
-
-#define CTRL_CMD_VTY_STRING(cmdname, cmdstr, dtype, element) \
- CTRL_HELPER_GET_STRING(cmdname, dtype, element) \
- CTRL_HELPER_SET_STRING(cmdname, dtype, element) \
-static struct ctrl_cmd_element cmd_##cmdname = { \
- .name = cmdstr, \
- .get = get_##cmdname, \
- .set = set_##cmdname, \
- .verify = verify_vty_description_string, \
-}
-
-/**
- * Check that there are no newlines or comments or other things
- * that could make the VTY configuration unparsable.
- */
-static int verify_vty_description_string(struct ctrl_cmd *cmd,
- const char *value, void *data)
-{
- int i;
- const size_t len = strlen(value);
-
- for (i = 0; i < len; ++i) {
- switch(value[i]) {
- case '#':
- case '\n':
- case '\r':
- cmd->reply = "String includes illegal character";
- return -1;
- default:
- break;
- }
- }
-
- return 0;
-}
-
-CTRL_CMD_DEFINE_RANGE(net_mnc, "mnc", struct gsm_network, network_code, 0, 999);
-CTRL_CMD_DEFINE_RANGE(net_mcc, "mcc", struct gsm_network, country_code, 1, 999);
-CTRL_CMD_VTY_STRING(net_short_name, "short-name", struct gsm_network, name_short);
-CTRL_CMD_VTY_STRING(net_long_name, "long-name", struct gsm_network, name_long);
-
-static int set_net_apply_config(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net = cmd->node;
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- if (!is_ipaccess_bts(bts))
- continue;
-
- /*
- * The ip.access nanoBTS seems to be unrelaible on BSSGP
- * so let's us just reboot it. For the sysmoBTS we can just
- * restart the process as all state is gone.
- */
- if (!is_sysmobts_v2(bts) && strcmp(cmd->value, "restart") == 0) {
- struct gsm_bts_trx *trx;
- llist_for_each_entry_reverse(trx, &bts->trx_list, list)
- abis_nm_ipaccess_restart(trx);
- } else
- ipaccess_drop_oml(bts);
- }
-
- cmd->reply = "Tried to drop the BTS";
- return CTRL_CMD_REPLY;
-}
-
-CTRL_CMD_DEFINE_WO_NOVRF(net_apply_config, "apply-configuration");
-
-static int verify_net_mcc_mnc_apply(struct ctrl_cmd *cmd, const char *value, void *d)
-{
- char *tmp, *saveptr, *mcc, *mnc;
-
- tmp = talloc_strdup(cmd, value);
- if (!tmp)
- return 1;
-
- mcc = strtok_r(tmp, ",", &saveptr);
- mnc = strtok_r(NULL, ",", &saveptr);
- talloc_free(tmp);
-
- if (!mcc || !mnc)
- return 1;
- return 0;
-}
-
-static int set_net_mcc_mnc_apply(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net = cmd->node;
- char *tmp, *saveptr, *mcc_str, *mnc_str;
- int mcc, mnc;
-
- tmp = talloc_strdup(cmd, cmd->value);
- if (!tmp)
- goto oom;
-
-
- mcc_str = strtok_r(tmp, ",", &saveptr);
- mnc_str = strtok_r(NULL, ",", &saveptr);
-
- mcc = atoi(mcc_str);
- mnc = atoi(mnc_str);
-
- talloc_free(tmp);
-
- if (net->network_code == mnc && net->country_code == mcc) {
- cmd->reply = "Nothing changed";
- return CTRL_CMD_REPLY;
- }
-
- net->network_code = mnc;
- net->country_code = mcc;
-
- return set_net_apply_config(cmd, data);
-
-oom:
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
-}
-CTRL_CMD_DEFINE_WO(net_mcc_mnc_apply, "mcc-mnc-apply");
-
-/* BTS related commands below */
-CTRL_CMD_DEFINE_RANGE(bts_lac, "location-area-code", struct gsm_bts, location_area_code, 0, 65535);
-CTRL_CMD_DEFINE_RANGE(bts_ci, "cell-identity", struct gsm_bts, cell_identity, 0, 65535);
-
-static int set_bts_apply_config(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_bts *bts = cmd->node;
-
- if (!is_ipaccess_bts(bts)) {
- cmd->reply = "BTS is not IP based";
- return CTRL_CMD_ERROR;
- }
-
- ipaccess_drop_oml(bts);
- cmd->reply = "Tried to drop the BTS";
- return CTRL_CMD_REPLY;
-}
-
-CTRL_CMD_DEFINE_WO_NOVRF(bts_apply_config, "apply-configuration");
-
-static int set_bts_si(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_bts *bts = cmd->node;
- int rc;
-
- rc = gsm_bts_set_system_infos(bts);
- if (rc != 0) {
- cmd->reply = "Failed to generate SI";
- return CTRL_CMD_ERROR;
- }
-
- cmd->reply = "Generated new System Information";
- return CTRL_CMD_REPLY;
-}
-CTRL_CMD_DEFINE_WO_NOVRF(bts_si, "send-new-system-informations");
-
-static int get_bts_chan_load(struct ctrl_cmd *cmd, void *data)
-{
- int i;
- struct pchan_load pl;
- struct gsm_bts *bts;
- const char *space = "";
-
- bts = cmd->node;
- memset(&pl, 0, sizeof(pl));
- bts_chan_load(&pl, bts);
-
- cmd->reply = talloc_strdup(cmd, "");
-
- for (i = 0; i < ARRAY_SIZE(pl.pchan); ++i) {
- const struct load_counter *lc = &pl.pchan[i];
-
- /* These can never have user load */
- if (i == GSM_PCHAN_NONE)
- continue;
- if (i == GSM_PCHAN_CCCH)
- continue;
- if (i == GSM_PCHAN_PDCH)
- continue;
- if (i == GSM_PCHAN_UNKNOWN)
- continue;
-
- cmd->reply = talloc_asprintf_append(cmd->reply,
- "%s%s,%u,%u",
- space, gsm_pchan_name(i), lc->used, lc->total);
- if (!cmd->reply)
- goto error;
- space = " ";
- }
-
- return CTRL_CMD_REPLY;
-
-error:
- cmd->reply = "Memory allocation failure";
- return CTRL_CMD_ERROR;
-}
-
-CTRL_CMD_DEFINE_RO(bts_chan_load, "channel-load");
-
-static int get_bts_oml_conn(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_bts *bts = cmd->node;
-
- cmd->reply = bts->oml_link ? "connected" : "disconnected";
- return CTRL_CMD_REPLY;
-}
-
-CTRL_CMD_DEFINE_RO(bts_oml_conn, "oml-connection-state");
-
-static int verify_bts_gprs_mode(struct ctrl_cmd *cmd, const char *value, void *_data)
-{
- int valid;
- enum bts_gprs_mode mode;
- struct gsm_bts *bts = cmd->node;
-
- mode = bts_gprs_mode_parse(value, &valid);
- if (!valid) {
- cmd->reply = "Mode is not known";
- return 1;
- }
-
- if (!bts_gprs_mode_is_compat(bts, mode)) {
- cmd->reply = "bts does not support this mode";
- return 1;
- }
-
- return 0;
-}
-
-static int get_bts_gprs_mode(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_bts *bts = cmd->node;
-
- cmd->reply = talloc_strdup(cmd, bts_gprs_mode_name(bts->gprs.mode));
- return CTRL_CMD_REPLY;
-}
-
-static int set_bts_gprs_mode(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_bts *bts = cmd->node;
-
- bts->gprs.mode = bts_gprs_mode_parse(cmd->value, NULL);
- return get_bts_gprs_mode(cmd, data);
-}
-
-CTRL_CMD_DEFINE(bts_gprs_mode, "gprs-mode");
-
-static int get_bts_rf_state(struct ctrl_cmd *cmd, void *data)
-{
- const char *oper, *admin, *policy;
- struct gsm_bts *bts = cmd->node;
-
- if (!bts) {
- cmd->reply = "bts not found.";
- return CTRL_CMD_ERROR;
- }
-
- oper = osmo_bsc_rf_get_opstate_name(osmo_bsc_rf_get_opstate_by_bts(bts));
- admin = osmo_bsc_rf_get_adminstate_name(osmo_bsc_rf_get_adminstate_by_bts(bts));
- policy = osmo_bsc_rf_get_policy_name(osmo_bsc_rf_get_policy_by_bts(bts));
-
- cmd->reply = talloc_asprintf(cmd, "%s,%s,%s", oper, admin, policy);
- if (!cmd->reply) {
- cmd->reply = "OOM.";
- return CTRL_CMD_ERROR;
- }
-
- return CTRL_CMD_REPLY;
-}
-CTRL_CMD_DEFINE_RO(bts_rf_state, "rf_state");
-
-static int get_net_rf_lock(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net = cmd->node;
- struct gsm_bts *bts;
- const char *policy_name;
-
- policy_name = osmo_bsc_rf_get_policy_name(net->bsc_data->rf_ctrl->policy);
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- struct gsm_bts_trx *trx;
-
- /* Exclude the BTS from the global lock */
- if (bts->excl_from_rf_lock)
- continue;
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- if (trx->mo.nm_state.availability == NM_AVSTATE_OK &&
- trx->mo.nm_state.operational != NM_OPSTATE_DISABLED) {
- cmd->reply = talloc_asprintf(cmd,
- "state=on,policy=%s,bts=%u,trx=%u",
- policy_name, bts->nr, trx->nr);
- return CTRL_CMD_REPLY;
- }
- }
- }
-
- cmd->reply = talloc_asprintf(cmd, "state=off,policy=%s",
- policy_name);
- return CTRL_CMD_REPLY;
-}
-
-#define TIME_FORMAT_RFC2822 "%a, %d %b %Y %T %z"
-
-static int set_net_rf_lock(struct ctrl_cmd *cmd, void *data)
-{
- int locked = atoi(cmd->value);
- struct gsm_network *net = cmd->node;
- time_t now = time(NULL);
- char now_buf[64];
- struct osmo_bsc_rf *rf;
-
- if (!net) {
- cmd->reply = "net not found.";
- return CTRL_CMD_ERROR;
- }
-
- rf = net->bsc_data->rf_ctrl;
-
- if (!rf) {
- cmd->reply = "RF Ctrl is not enabled in the BSC Configuration";
- return CTRL_CMD_ERROR;
- }
-
- talloc_free(rf->last_rf_lock_ctrl_command);
- strftime(now_buf, sizeof(now_buf), TIME_FORMAT_RFC2822, gmtime(&now));
- rf->last_rf_lock_ctrl_command =
- talloc_asprintf(rf, "rf_locked %u (%s)", locked, now_buf);
-
- osmo_bsc_rf_schedule_lock(rf, locked == 1 ? '0' : '1');
-
- cmd->reply = talloc_asprintf(cmd, "%u", locked);
- if (!cmd->reply) {
- cmd->reply = "OOM.";
- return CTRL_CMD_ERROR;
- }
-
- return CTRL_CMD_REPLY;
-}
-
-static int verify_net_rf_lock(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- int locked = atoi(cmd->value);
-
- if ((locked != 0) && (locked != 1))
- return 1;
-
- return 0;
-}
-CTRL_CMD_DEFINE(net_rf_lock, "rf_locked");
-
-static int get_net_bts_num(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net = cmd->node;
-
- cmd->reply = talloc_asprintf(cmd, "%u", net->num_bts);
- return CTRL_CMD_REPLY;
-}
-CTRL_CMD_DEFINE_RO(net_bts_num, "number-of-bts");
-
-/* TRX related commands below here */
-CTRL_HELPER_GET_INT(trx_max_power, struct gsm_bts_trx, max_power_red);
-static int verify_trx_max_power(struct ctrl_cmd *cmd, const char *value, void *_data)
-{
- int tmp = atoi(value);
-
- if (tmp < 0 || tmp > 22) {
- cmd->reply = "Value must be between 0 and 22";
- return -1;
- }
-
- if (tmp & 1) {
- cmd->reply = "Value must be even";
- return -1;
- }
-
- return 0;
-}
-CTRL_CMD_DEFINE_RANGE(trx_arfcn, "arfcn", struct gsm_bts_trx, arfcn, 0, 1023);
-
-static int set_trx_max_power(struct ctrl_cmd *cmd, void *_data)
-{
- struct gsm_bts_trx *trx = cmd->node;
- int old_power;
-
- /* remember the old value, set the new one */
- old_power = trx->max_power_red;
- trx->max_power_red = atoi(cmd->value);
-
- /* Maybe update the value */
- if (old_power != trx->max_power_red) {
- LOGP(DCTRL, LOGL_NOTICE,
- "%s updating max_pwr_red(%d)\n",
- gsm_trx_name(trx), trx->max_power_red);
- abis_nm_update_max_power_red(trx);
- }
-
- return get_trx_max_power(cmd, _data);
-}
-CTRL_CMD_DEFINE(trx_max_power, "max-power-reduction");
-
-int bsc_base_ctrl_cmds_install(void)
-{
- int rc = 0;
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_mnc);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_mcc);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_short_name);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_long_name);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_apply_config);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_mcc_mnc_apply);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_rf_lock);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_bts_num);
-
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_lac);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_ci);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_apply_config);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_si);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_chan_load);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_oml_conn);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_gprs_mode);
- rc |= ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_rf_state);
-
- rc |= ctrl_cmd_install(CTRL_NODE_TRX, &cmd_trx_max_power);
- rc |= ctrl_cmd_install(CTRL_NODE_TRX, &cmd_trx_arfcn);
-
- return rc;
-}
diff --git a/src/libbsc/bsc_ctrl_lookup.c b/src/libbsc/bsc_ctrl_lookup.c
deleted file mode 100644
index a8a8cf526..000000000
--- a/src/libbsc/bsc_ctrl_lookup.c
+++ /dev/null
@@ -1,107 +0,0 @@
-/* SNMP-like status interface. Look-up of BTS/TRX
- *
- * (C) 2010-2011 by Daniel Willmann <daniel@totalueberwachung.de>
- * (C) 2010-2011 by On-Waves
- *
- * All Rights Reserved
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 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 General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with this program; if not, write to the Free Software Foundation, Inc.,
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-#include <errno.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/ctrl/control_if.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-
-extern vector ctrl_node_vec;
-
-/*! \brief control interface lookup function for bsc/bts gsm_data
- * \param[in] data Private data passed to controlif_setup()
- * \param[in] vline Vector of the line holding the command string
- * \param[out] node_type type (CTRL_NODE_) that was determined
- * \param[out] node_data private dta of node that was determined
- * \param i Current index into vline, up to which it is parsed
- */
-static int bsc_ctrl_node_lookup(void *data, vector vline, int *node_type,
- void **node_data, int *i)
-{
- struct gsm_network *net = data;
- struct gsm_bts *bts = NULL;
- struct gsm_bts_trx *trx = NULL;
- struct gsm_bts_trx_ts *ts = NULL;
- char *token = vector_slot(vline, *i);
- long num;
-
- /* TODO: We need to make sure that the following chars are digits
- * and/or use strtol to check if number conversion was successful
- * Right now something like net.bts_stats will not work */
- if (!strcmp(token, "bts")) {
- if (*node_type != CTRL_NODE_ROOT || !net)
- goto err_missing;
- (*i)++;
- if (!ctrl_parse_get_num(vline, *i, &num))
- goto err_index;
-
- bts = gsm_bts_num(net, num);
- if (!bts)
- goto err_missing;
- *node_data = bts;
- *node_type = CTRL_NODE_BTS;
- } else if (!strcmp(token, "trx")) {
- if (*node_type != CTRL_NODE_BTS || !*node_data)
- goto err_missing;
- bts = *node_data;
- (*i)++;
- if (!ctrl_parse_get_num(vline, *i, &num))
- goto err_index;
-
- trx = gsm_bts_trx_num(bts, num);
- if (!trx)
- goto err_missing;
- *node_data = trx;
- *node_type = CTRL_NODE_TRX;
- } else if (!strcmp(token, "ts")) {
- if (*node_type != CTRL_NODE_TRX || !*node_data)
- goto err_missing;
- trx = *node_data;
- (*i)++;
- if (!ctrl_parse_get_num(vline, *i, &num))
- goto err_index;
-
- if ((num >= 0) && (num < TRX_NR_TS))
- ts = &trx->ts[num];
- if (!ts)
- goto err_missing;
- *node_data = ts;
- *node_type = CTRL_NODE_TS;
- } else
- return 0;
-
- return 1;
-err_missing:
- return -ENODEV;
-err_index:
- return -ERANGE;
-}
-
-struct ctrl_handle *bsc_controlif_setup(struct gsm_network *net,
- const char *bind_addr, uint16_t port)
-{
- return ctrl_interface_setup_dynip(net, bind_addr, port,
- bsc_ctrl_node_lookup);
-}
diff --git a/src/libbsc/bsc_dyn_ts.c b/src/libbsc/bsc_dyn_ts.c
deleted file mode 100644
index e5422fc5c..000000000
--- a/src/libbsc/bsc_dyn_ts.c
+++ /dev/null
@@ -1,77 +0,0 @@
-/* Dynamic PDCH initialisation implementation shared across NM and RSL */
-
-/* (C) 2016 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>
- * 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/>.
- *
- */
-
-#include <osmocom/core/logging.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_rsl.h>
-
-void tchf_pdch_ts_init(struct gsm_bts_trx_ts *ts)
-{
- int rc;
-
- if (ts->trx->bts->gprs.mode == BTS_GPRS_NONE) {
- LOGP(DRSL, LOGL_NOTICE, "%s: GPRS mode is 'none':"
- " not activating PDCH.\n",
- gsm_ts_and_pchan_name(ts));
- return;
- }
-
- LOGP(DRSL, LOGL_DEBUG, "%s: trying to PDCH ACT\n",
- gsm_ts_and_pchan_name(ts));
-
- rc = rsl_ipacc_pdch_activate(ts, 1);
- if (rc != 0)
- LOGP(DRSL, LOGL_ERROR, "%s %s: PDCH ACT failed\n",
- gsm_ts_name(ts), gsm_pchan_name(ts->pchan));
-}
-
-void tchf_tchh_pdch_ts_init(struct gsm_bts_trx_ts *ts)
-{
- if (ts->trx->bts->gprs.mode == BTS_GPRS_NONE) {
- LOGP(DRSL, LOGL_NOTICE, "%s: GPRS mode is 'none':"
- " not activating PDCH.\n",
- gsm_ts_and_pchan_name(ts));
- return;
- }
-
- dyn_ts_switchover_start(ts, GSM_PCHAN_PDCH);
-}
-
-void dyn_ts_init(struct gsm_bts_trx_ts *ts)
-{
- /* Clear all TCH/F_PDCH flags */
- ts->flags &= ~(TS_F_PDCH_PENDING_MASK | TS_F_PDCH_ACTIVE);
-
- /* Clear TCH/F_TCH/H_PDCH state */
- ts->dyn.pchan_is = ts->dyn.pchan_want = GSM_PCHAN_NONE;
- ts->dyn.pending_chan_activ = NULL;
-
- switch (ts->pchan) {
- case GSM_PCHAN_TCH_F_PDCH:
- tchf_pdch_ts_init(ts);
- break;
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- tchf_tchh_pdch_ts_init(ts);
- break;
- default:
- break;
- }
-}
diff --git a/src/libbsc/bsc_init.c b/src/libbsc/bsc_init.c
deleted file mode 100644
index 78ca2ab4d..000000000
--- a/src/libbsc/bsc_init.c
+++ /dev/null
@@ -1,567 +0,0 @@
-/* A hackish minimal BSC (+MSC +HLR) implementation */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/debug.h>
-#include <openbsc/misdn.h>
-#include <osmocom/vty/telnet_interface.h>
-#include <osmocom/vty/ports.h>
-#include <openbsc/system_information.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-#include <openbsc/chan_alloc.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/ipaccess.h>
-#include <osmocom/gsm/sysinfo.h>
-#include <openbsc/e1_config.h>
-#include <openbsc/common_bsc.h>
-#include <openbsc/pcu_if.h>
-#include <openbsc/osmo_msc.h>
-#include <limits.h>
-
-/* global pointer to the gsm network data structure */
-extern struct gsm_network *bsc_gsmnet;
-
-/* Callback function for NACK on the OML NM */
-static int oml_msg_nack(struct nm_nack_signal_data *nack)
-{
- if (nack->mt == NM_MT_GET_ATTR_NACK) {
- LOGP(DNM, LOGL_ERROR, "BTS%u does not support Get Attributes "
- "OML message.\n", nack->bts->nr);
- return 0;
- }
-
- if (nack->mt == NM_MT_SET_BTS_ATTR_NACK)
- LOGP(DNM, LOGL_ERROR, "Failed to set BTS attributes. That is fatal. "
- "Was the bts type and frequency properly specified?\n");
- else
- LOGP(DNM, LOGL_ERROR, "Got %s NACK going to drop the OML links.\n",
- abis_nm_nack_name(nack->mt));
-
- if (!nack->bts) {
- LOGP(DNM, LOGL_ERROR, "Unknown bts. Can not drop it.\n");
- return 0;
- }
-
- if (is_ipaccess_bts(nack->bts))
- ipaccess_drop_oml(nack->bts);
-
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from NM */
-static int nm_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct nm_nack_signal_data *nack;
-
- switch (signal) {
- case S_NM_NACK:
- nack = signal_data;
- return oml_msg_nack(nack);
- default:
- break;
- }
- return 0;
-}
-
-int bsc_shutdown_net(struct gsm_network *net)
-{
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- LOGP(DNM, LOGL_NOTICE, "shutting down OML for BTS %u\n", bts->nr);
- osmo_signal_dispatch(SS_L_GLOBAL, S_GLOBAL_BTS_CLOSE_OM, bts);
- }
-
- return 0;
-}
-
-static int rsl_si(struct gsm_bts_trx *trx, enum osmo_sysinfo_type i, int si_len)
-{
- struct gsm_bts *bts = trx->bts;
- int rc, j;
-
- if (si_len) {
- DEBUGP(DRR, "SI%s: %s\n", get_value_string(osmo_sitype_strs, i),
- osmo_hexdump(GSM_BTS_SI(bts, i), GSM_MACBLOCK_LEN));
- } else
- DEBUGP(DRR, "SI%s: OFF\n", get_value_string(osmo_sitype_strs, i));
-
- switch (i) {
- case SYSINFO_TYPE_5:
- case SYSINFO_TYPE_5bis:
- case SYSINFO_TYPE_5ter:
- case SYSINFO_TYPE_6:
- rc = rsl_sacch_filling(trx, osmo_sitype2rsl(i),
- si_len ? GSM_BTS_SI(bts, i) : NULL, si_len);
- break;
- case SYSINFO_TYPE_2quater:
- if (si_len == 0) {
- rc = rsl_bcch_info(trx, i, NULL, 0);
- break;
- }
- for (j = 0; j <= bts->si2q_count; j++)
- rc = rsl_bcch_info(trx, i, (const uint8_t *)GSM_BTS_SI2Q(bts, j), GSM_MACBLOCK_LEN);
- break;
- default:
- rc = rsl_bcch_info(trx, i, si_len ? GSM_BTS_SI(bts, i) : NULL, si_len);
- break;
- }
-
- return rc;
-}
-
-/* set all system information types for a TRX */
-int gsm_bts_trx_set_system_infos(struct gsm_bts_trx *trx)
-{
- int i, rc;
- struct gsm_bts *bts = trx->bts;
- uint8_t gen_si[_MAX_SYSINFO_TYPE], n_si = 0, n;
- int si_len[_MAX_SYSINFO_TYPE];
-
- bts->si_common.cell_sel_par.ms_txpwr_max_ccch =
- ms_pwr_ctl_lvl(bts->band, bts->ms_max_power);
- bts->si_common.cell_sel_par.neci = bts->network->neci;
-
- /* Zero/forget the state of the dynamically computed SIs, leeping the static ones */
- bts->si_valid = bts->si_mode_static;
-
- /* First, we determine which of the SI messages we actually need */
-
- if (trx == bts->c0) {
- /* 1...4 are always present on a C0 TRX */
- gen_si[n_si++] = SYSINFO_TYPE_1;
- gen_si[n_si++] = SYSINFO_TYPE_2;
- gen_si[n_si++] = SYSINFO_TYPE_2bis;
- gen_si[n_si++] = SYSINFO_TYPE_2ter;
- gen_si[n_si++] = SYSINFO_TYPE_2quater;
- gen_si[n_si++] = SYSINFO_TYPE_3;
- gen_si[n_si++] = SYSINFO_TYPE_4;
-
- /* 13 is always present on a C0 TRX of a GPRS BTS */
- if (bts->gprs.mode != BTS_GPRS_NONE)
- gen_si[n_si++] = SYSINFO_TYPE_13;
- }
-
- /* 5 and 6 are always present on every TRX */
- gen_si[n_si++] = SYSINFO_TYPE_5;
- gen_si[n_si++] = SYSINFO_TYPE_5bis;
- gen_si[n_si++] = SYSINFO_TYPE_5ter;
- gen_si[n_si++] = SYSINFO_TYPE_6;
-
- /* Second, we generate the selected SI via RSL */
-
- for (n = 0; n < n_si; n++) {
- i = gen_si[n];
- /* Only generate SI if this SI is not in "static" (user-defined) mode */
- if (!(bts->si_mode_static & (1 << i))) {
- /* Set SI as being valid. gsm_generate_si() might unset
- * it, if SI is not required. */
- bts->si_valid |= (1 << i);
- rc = gsm_generate_si(bts, i);
- if (rc < 0)
- goto err_out;
- si_len[i] = rc;
- } else {
- if (i == SYSINFO_TYPE_5 || i == SYSINFO_TYPE_5bis
- || i == SYSINFO_TYPE_5ter)
- si_len[i] = 18;
- else if (i == SYSINFO_TYPE_6)
- si_len[i] = 11;
- else
- si_len[i] = 23;
- }
- }
-
- /* Third, we send the selected SI via RSL */
-
- for (n = 0; n < n_si; n++) {
- i = gen_si[n];
- /* if we don't currently have this SI, we send a zero-length
- * RSL BCCH FILLING / SACCH FILLING * in order to deactivate
- * the SI, in case it might have previously been active */
- if (!GSM_BTS_HAS_SI(bts, i))
- rc = rsl_si(trx, i, 0);
- else
- rc = rsl_si(trx, i, si_len[i]);
- if (rc < 0)
- return rc;
- }
-
- /* Make sure the PCU is aware (in case anything GPRS related has
- * changed in SI */
- pcu_info_update(bts);
-
- return 0;
-err_out:
- LOGP(DRR, LOGL_ERROR, "Cannot generate SI%s for BTS %u: error <%s>, "
- "most likely a problem with neighbor cell list generation\n",
- get_value_string(osmo_sitype_strs, i), bts->nr, strerror(-rc));
- return rc;
-}
-
-/* set all system information types for a BTS */
-int gsm_bts_set_system_infos(struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- /* Generate a new ID */
- bts->bcch_change_mark += 1;
- bts->bcch_change_mark %= 0x7;
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- int rc;
-
- rc = gsm_bts_trx_set_system_infos(trx);
- if (rc != 0)
- return rc;
- }
-
- return 0;
-}
-
-/* Produce a MA as specified in 10.5.2.21 */
-static int generate_ma_for_ts(struct gsm_bts_trx_ts *ts)
-{
- /* we have three bitvecs: the per-timeslot ARFCNs, the cell chan ARFCNs
- * and the MA */
- struct bitvec *cell_chan = &ts->trx->bts->si_common.cell_alloc;
- struct bitvec *ts_arfcn = &ts->hopping.arfcns;
- struct bitvec *ma = &ts->hopping.ma;
- unsigned int num_cell_arfcns, bitnum, n_chan;
- int i;
-
- /* re-set the MA to all-zero */
- ma->cur_bit = 0;
- ts->hopping.ma_len = 0;
- memset(ma->data, 0, ma->data_len);
-
- if (!ts->hopping.enabled)
- return 0;
-
- /* count the number of ARFCNs in the cell channel allocation */
- num_cell_arfcns = 0;
- for (i = 0; i < 1024; i++) {
- if (bitvec_get_bit_pos(cell_chan, i))
- num_cell_arfcns++;
- }
-
- /* pad it to octet-aligned number of bits */
- ts->hopping.ma_len = num_cell_arfcns / 8;
- if (num_cell_arfcns % 8)
- ts->hopping.ma_len++;
-
- n_chan = 0;
- for (i = 0; i < 1024; i++) {
- if (!bitvec_get_bit_pos(cell_chan, i))
- continue;
- /* set the corresponding bit in the MA */
- bitnum = (ts->hopping.ma_len * 8) - 1 - n_chan;
- if (bitvec_get_bit_pos(ts_arfcn, i))
- bitvec_set_bit_pos(ma, bitnum, 1);
- else
- bitvec_set_bit_pos(ma, bitnum, 0);
- n_chan++;
- }
-
- /* ARFCN 0 is special: It is coded last in the bitmask */
- if (bitvec_get_bit_pos(cell_chan, 0)) {
- n_chan++;
- /* set the corresponding bit in the MA */
- bitnum = (ts->hopping.ma_len * 8) - 1 - n_chan;
- if (bitvec_get_bit_pos(ts_arfcn, 0))
- bitvec_set_bit_pos(ma, bitnum, 1);
- else
- bitvec_set_bit_pos(ma, bitnum, 0);
- }
-
- return 0;
-}
-
-static void bootstrap_rsl(struct gsm_bts_trx *trx)
-{
- unsigned int i;
-
- LOGP(DRSL, LOGL_NOTICE, "bootstrapping RSL for BTS/TRX (%u/%u) "
- "on ARFCN %u using MCC=%u MNC=%u LAC=%u CID=%u BSIC=%u\n",
- trx->bts->nr, trx->nr, trx->arfcn, bsc_gsmnet->country_code,
- bsc_gsmnet->network_code, trx->bts->location_area_code,
- trx->bts->cell_identity, trx->bts->bsic);
-
- if (trx->bts->type == GSM_BTS_TYPE_NOKIA_SITE) {
- rsl_nokia_si_begin(trx);
- }
-
- gsm_bts_trx_set_system_infos(trx);
-
- if (trx->bts->type == GSM_BTS_TYPE_NOKIA_SITE) {
- /* channel unspecific, power reduction in 2 dB steps */
- rsl_bs_power_control(trx, 0xFF, trx->max_power_red / 2);
- rsl_nokia_si_end(trx);
- }
-
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++)
- generate_ma_for_ts(&trx->ts[i]);
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int inp_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct input_signal_data *isd = signal_data;
- struct gsm_bts_trx *trx = isd->trx;
- int ts_no, lchan_no;
- /* N. B: we rely on attribute order when parsing response in abis_nm_rx_get_attr_resp() */
- const uint8_t bts_attr[] = { NM_ATT_MANUF_ID, NM_ATT_SW_CONFIG, };
- const uint8_t trx_attr[] = { NM_ATT_MANUF_STATE, NM_ATT_SW_CONFIG, };
-
- /* we should not request more attributes than we're ready to handle */
- OSMO_ASSERT(sizeof(bts_attr) < MAX_BTS_ATTR);
- OSMO_ASSERT(sizeof(trx_attr) < MAX_BTS_ATTR);
-
- if (subsys != SS_L_INPUT)
- return -EINVAL;
-
- LOGP(DLMI, LOGL_DEBUG, "%s(): Input signal '%s' received\n", __func__,
- get_value_string(e1inp_signal_names, signal));
- switch (signal) {
- case S_L_INP_TEI_UP:
- if (isd->link_type == E1INP_SIGN_OML) {
- /* TODO: this is required for the Nokia BTS, hopping is configured
- during OML, other MA is not set. */
- struct gsm_bts_trx *cur_trx;
- /* was static in system_information.c */
- extern int generate_cell_chan_list(uint8_t *chan_list, struct gsm_bts *bts);
- uint8_t ca[20];
- /* has to be called before generate_ma_for_ts to
- set bts->si_common.cell_alloc */
- generate_cell_chan_list(ca, trx->bts);
-
- /* Request generic BTS-level attributes */
- abis_nm_get_attr(trx->bts, NM_OC_BTS, 0xFF, 0xFF, 0xFF, bts_attr, sizeof(bts_attr));
-
- llist_for_each_entry(cur_trx, &trx->bts->trx_list, list) {
- int i;
- /* Request TRX-level attributes */
- abis_nm_get_attr(cur_trx->bts, NM_OC_BASEB_TRANSC, 0, cur_trx->nr, 0xFF,
- trx_attr, sizeof(trx_attr));
- for (i = 0; i < ARRAY_SIZE(cur_trx->ts); i++)
- generate_ma_for_ts(&cur_trx->ts[i]);
- }
- }
- if (isd->link_type == E1INP_SIGN_RSL)
- bootstrap_rsl(trx);
- break;
- case S_L_INP_TEI_DN:
- LOGP(DLMI, LOGL_ERROR, "Lost some E1 TEI link: %d %p\n", isd->link_type, trx);
-
- if (isd->link_type == E1INP_SIGN_OML)
- rate_ctr_inc(&trx->bts->network->bsc_ctrs->ctr[BSC_CTR_BTS_OML_FAIL]);
- else if (isd->link_type == E1INP_SIGN_RSL)
- rate_ctr_inc(&trx->bts->network->bsc_ctrs->ctr[BSC_CTR_BTS_RSL_FAIL]);
-
- /*
- * free all allocated channels. change the nm_state so the
- * trx and trx_ts becomes unusable and chan_alloc.c can not
- * allocate from it.
- */
- for (ts_no = 0; ts_no < ARRAY_SIZE(trx->ts); ++ts_no) {
- struct gsm_bts_trx_ts *ts = &trx->ts[ts_no];
-
- for (lchan_no = 0; lchan_no < ARRAY_SIZE(ts->lchan); ++lchan_no) {
- if (ts->lchan[lchan_no].state != LCHAN_S_NONE)
- lchan_free(&ts->lchan[lchan_no]);
- lchan_reset(&ts->lchan[lchan_no]);
- }
- }
-
- gsm_bts_mo_reset(trx->bts);
-
- abis_nm_clear_queue(trx->bts);
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-static int bootstrap_bts(struct gsm_bts *bts)
-{
- int i, n;
-
- if (!bts->model)
- return -EFAULT;
-
- if (bts->model->start && !bts->model->started) {
- int ret = bts->model->start(bts->network);
- if (ret < 0)
- return ret;
-
- bts->model->started = true;
- }
-
- /* FIXME: What about secondary TRX of a BTS? What about a BTS that has TRX
- * in different bands? Why is 'band' a parameter of the BTS and not of the TRX? */
- switch (bts->band) {
- case GSM_BAND_1800:
- if (bts->c0->arfcn < 512 || bts->c0->arfcn > 885) {
- LOGP(DNM, LOGL_ERROR, "GSM1800 channel must be between 512-885.\n");
- return -EINVAL;
- }
- break;
- case GSM_BAND_1900:
- if (bts->c0->arfcn < 512 || bts->c0->arfcn > 810) {
- LOGP(DNM, LOGL_ERROR, "GSM1900 channel must be between 512-810.\n");
- return -EINVAL;
- }
- break;
- case GSM_BAND_900:
- if ((bts->c0->arfcn > 124 && bts->c0->arfcn < 955) ||
- bts->c0->arfcn > 1023) {
- LOGP(DNM, LOGL_ERROR, "GSM900 channel must be between 0-124, 955-1023.\n");
- return -EINVAL;
- }
- break;
- case GSM_BAND_850:
- if (bts->c0->arfcn < 128 || bts->c0->arfcn > 251) {
- LOGP(DNM, LOGL_ERROR, "GSM850 channel must be between 128-251.\n");
- return -EINVAL;
- }
- break;
- default:
- LOGP(DNM, LOGL_ERROR, "Unsupported frequency band.\n");
- return -EINVAL;
- }
-
- if (bts->network->auth_policy == GSM_AUTH_POLICY_ACCEPT_ALL &&
- !bts->si_common.rach_control.cell_bar)
- LOGP(DNM, LOGL_ERROR, "\nWARNING: You are running an 'accept-all' "
- "network on a BTS that is not barred. This "
- "configuration is likely to interfere with production "
- "GSM networks and should only be used in a RF "
- "shielded environment such as a faraday cage!\n\n");
-
- /* Control Channel Description is set from vty/config */
-
- /* T3212 is set from vty/config */
-
- /* Set ccch config by looking at ts config */
- for (n=0, i=0; i<8; i++)
- n += bts->c0->ts[i].pchan == GSM_PCHAN_CCCH ? 1 : 0;
-
- /* Indicate R99 MSC in SI3 */
- bts->si_common.chan_desc.mscr = 1;
-
- switch (n) {
- case 0:
- bts->si_common.chan_desc.ccch_conf = RSL_BCCH_CCCH_CONF_1_C;
- /* Limit reserved block to 2 on combined channel according to
- 3GPP TS 44.018 Table 10.5.2.11.1 */
- if (bts->si_common.chan_desc.bs_ag_blks_res > 2) {
- LOGP(DNM, LOGL_NOTICE, "CCCH is combined with SDCCHs, "
- "reducing BS-AG-BLKS-RES value %d -> 2\n",
- bts->si_common.chan_desc.bs_ag_blks_res);
- bts->si_common.chan_desc.bs_ag_blks_res = 2;
- }
- break;
- case 1:
- bts->si_common.chan_desc.ccch_conf = RSL_BCCH_CCCH_CONF_1_NC;
- break;
- case 2:
- bts->si_common.chan_desc.ccch_conf = RSL_BCCH_CCCH_CONF_2_NC;
- break;
- case 3:
- bts->si_common.chan_desc.ccch_conf = RSL_BCCH_CCCH_CONF_3_NC;
- break;
- case 4:
- bts->si_common.chan_desc.ccch_conf = RSL_BCCH_CCCH_CONF_4_NC;
- break;
- default:
- LOGP(DNM, LOGL_ERROR, "Unsupported CCCH timeslot configuration\n");
- return -EINVAL;
- }
-
- bts->si_common.cell_options.pwrc = 0; /* PWRC not set */
-
- bts->si_common.cell_sel_par.acs = 0;
-
- bts->si_common.ncc_permitted = 0xff;
-
- /* Initialize the BTS state */
- gsm_bts_mo_reset(bts);
-
- return 0;
-}
-
-int bsc_network_alloc(mncc_recv_cb_t mncc_recv)
-{
- /* initialize our data structures */
- bsc_gsmnet = bsc_network_init(tall_bsc_ctx, 1, 1, mncc_recv);
- if (!bsc_gsmnet)
- return -ENOMEM;
-
- bsc_gsmnet->name_long = talloc_strdup(bsc_gsmnet, "OpenBSC");
- bsc_gsmnet->name_short = talloc_strdup(bsc_gsmnet, "OpenBSC");
-
- return 0;
-}
-
-int bsc_network_configure(const char *config_file)
-{
- struct gsm_bts *bts;
- int rc;
-
- rc = vty_read_config_file(config_file, NULL);
- if (rc < 0) {
- LOGP(DNM, LOGL_FATAL, "Failed to parse the config file: '%s'\n", config_file);
- return rc;
- }
-
- /* start telnet after reading config for vty_get_bind_addr() */
- rc = telnet_init_dynif(tall_bsc_ctx, bsc_gsmnet, vty_get_bind_addr(),
- OSMO_VTY_PORT_NITB_BSC);
- if (rc < 0)
- return rc;
-
- osmo_signal_register_handler(SS_NM, nm_sig_cb, NULL);
- osmo_signal_register_handler(SS_L_INPUT, inp_sig_cb, NULL);
-
- llist_for_each_entry(bts, &bsc_gsmnet->bts_list, list) {
- rc = bootstrap_bts(bts);
- if (rc < 0) {
- LOGP(DNM, LOGL_FATAL, "Error bootstrapping BTS\n");
- return rc;
- }
- rc = e1_reconfig_bts(bts);
- if (rc < 0) {
- LOGP(DNM, LOGL_FATAL, "Error enabling E1 input driver\n");
- return rc;
- }
- }
-
- return 0;
-}
diff --git a/src/libbsc/bsc_msc.c b/src/libbsc/bsc_msc.c
deleted file mode 100644
index 82a572dbe..000000000
--- a/src/libbsc/bsc_msc.c
+++ /dev/null
@@ -1,320 +0,0 @@
-/* Routines to talk to the MSC using the IPA Protocol */
-/*
- * (C) 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_msc.h>
-#include <openbsc/debug.h>
-#include <osmocom/abis/ipaccess.h>
-
-#include <osmocom/core/write_queue.h>
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/gsm/tlv.h>
-
-#include <arpa/inet.h>
-#include <sys/socket.h>
-#include <errno.h>
-#include <fcntl.h>
-#include <stdio.h>
-#include <string.h>
-#include <unistd.h>
-
-static void connection_loss(struct bsc_msc_connection *con)
-{
- struct osmo_fd *fd;
-
- fd = &con->write_queue.bfd;
-
- if (con->pending_msg) {
- LOGP(DMSC, LOGL_ERROR,
- "MSC(%s) dropping incomplete message.\n", con->name);
- msgb_free(con->pending_msg);
- con->pending_msg = NULL;
- }
-
- close(fd->fd);
- fd->fd = -1;
- fd->cb = osmo_wqueue_bfd_cb;
- fd->when = 0;
-
- con->is_connected = 0;
- con->first_contact = 0;
- con->connection_loss(con);
-}
-
-static void msc_con_timeout(void *_con)
-{
- struct bsc_msc_connection *con = _con;
-
- LOGP(DMSC, LOGL_ERROR,
- "MSC(%s) Connection timeout.\n", con->name);
- bsc_msc_lost(con);
-}
-
-/* called in the case of a non blocking connect */
-static int msc_connection_connect(struct osmo_fd *fd, unsigned int what)
-{
- int rc;
- int val;
- struct bsc_msc_connection *con;
- struct osmo_wqueue *queue;
-
- socklen_t len = sizeof(val);
-
- queue = container_of(fd, struct osmo_wqueue, bfd);
- con = container_of(queue, struct bsc_msc_connection, write_queue);
-
- if ((what & BSC_FD_WRITE) == 0) {
- LOGP(DMSC, LOGL_ERROR,
- "MSC(%s) Callback but not writable.\n", con->name);
- return -1;
- }
-
- /* From here on we will either be connected or reconnect */
- osmo_timer_del(&con->timeout_timer);
-
- /* check the socket state */
- rc = getsockopt(fd->fd, SOL_SOCKET, SO_ERROR, &val, &len);
- if (rc != 0) {
- LOGP(DMSC, LOGL_ERROR,
- "getsockopt for the MSC(%s) socket failed.\n", con->name);
- goto error;
- }
- if (val != 0) {
- LOGP(DMSC, LOGL_ERROR,
- "Not connected to the MSC(%s): %d\n",
- con->name, val);
- goto error;
- }
-
-
- /* go to full operation */
- fd->cb = osmo_wqueue_bfd_cb;
- fd->when = BSC_FD_READ | BSC_FD_EXCEPT;
-
- con->is_connected = 1;
- LOGP(DMSC, LOGL_NOTICE,
- "(Re)Connected to the MSC(%s).\n", con->name);
- if (con->connected)
- con->connected(con);
- return 0;
-
-error:
- osmo_fd_unregister(fd);
- connection_loss(con);
- return -1;
-}
-static void setnonblocking(struct osmo_fd *fd)
-{
- int flags;
-
- flags = fcntl(fd->fd, F_GETFL);
- if (flags < 0) {
- perror("fcntl get failed");
- close(fd->fd);
- fd->fd = -1;
- return;
- }
-
- flags |= O_NONBLOCK;
- flags = fcntl(fd->fd, F_SETFL, flags);
- if (flags < 0) {
- perror("fcntl get failed");
- close(fd->fd);
- fd->fd = -1;
- return;
- }
-}
-
-int bsc_msc_connect(struct bsc_msc_connection *con)
-{
- struct bsc_msc_dest *dest;
- struct osmo_fd *fd;
- struct sockaddr_in sin;
- int on = 1, ret;
-
- if (llist_empty(con->dests)) {
- LOGP(DMSC, LOGL_ERROR,
- "No MSC(%s) connections configured.\n",
- con->name);
- connection_loss(con);
- return -1;
- }
-
- /* TODO: Why are we not using the libosmocore soecket
- * abstraction, or libosmo-netif? */
-
- /* move to the next connection */
- dest = (struct bsc_msc_dest *) con->dests->next;
- llist_del(&dest->list);
- llist_add_tail(&dest->list, con->dests);
-
- LOGP(DMSC, LOGL_NOTICE,
- "Attempting to connect MSC(%s) at %s:%d\n",
- con->name, dest->ip, dest->port);
-
- con->is_connected = 0;
-
- msgb_free(con->pending_msg);
- con->pending_msg = NULL;
-
- fd = &con->write_queue.bfd;
- fd->fd = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
- fd->priv_nr = 1;
-
- if (fd->fd < 0) {
- perror("Creating TCP socket failed");
- return fd->fd;
- }
-
- /* make it non blocking */
- setnonblocking(fd);
-
- /* set the socket priority */
- ret = setsockopt(fd->fd, IPPROTO_IP, IP_TOS,
- &dest->dscp, sizeof(dest->dscp));
- if (ret != 0)
- LOGP(DMSC, LOGL_ERROR,
- "Failed to set DSCP to %d on MSC(%s). %s\n",
- dest->dscp, con->name, strerror(errno));
-
- memset(&sin, 0, sizeof(sin));
- sin.sin_family = AF_INET;
- sin.sin_port = htons(dest->port);
- inet_aton(dest->ip, &sin.sin_addr);
-
- ret = setsockopt(fd->fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
- if (ret != 0)
- LOGP(DMSC, LOGL_ERROR,
- "Failed to set SO_REUSEADDR socket option\n");
- ret = connect(fd->fd, (struct sockaddr *) &sin, sizeof(sin));
-
- if (ret == -1 && errno == EINPROGRESS) {
- LOGP(DMSC, LOGL_ERROR,
- "MSC(%s) Connection in progress\n", con->name);
- fd->when = BSC_FD_WRITE;
- fd->cb = msc_connection_connect;
- osmo_timer_setup(&con->timeout_timer, msc_con_timeout, con);
- osmo_timer_schedule(&con->timeout_timer, 20, 0);
- } else if (ret < 0) {
- perror("Connection failed");
- connection_loss(con);
- return ret;
- } else {
- fd->when = BSC_FD_READ | BSC_FD_EXCEPT;
- fd->cb = osmo_wqueue_bfd_cb;
- con->is_connected = 1;
- if (con->connected)
- con->connected(con);
- }
-
- ret = osmo_fd_register(fd);
- if (ret < 0) {
- perror("Registering the fd failed");
- close(fd->fd);
- return ret;
- }
-
- return ret;
-}
-
-struct bsc_msc_connection *bsc_msc_create(void *ctx, struct llist_head *dests)
-{
- struct bsc_msc_connection *con;
-
- con = talloc_zero(NULL, struct bsc_msc_connection);
- if (!con) {
- LOGP(DMSC, LOGL_FATAL, "Failed to create the MSC connection.\n");
- return NULL;
- }
-
- con->dests = dests;
- con->write_queue.bfd.fd = -1;
- con->name = "";
- osmo_wqueue_init(&con->write_queue, 100);
- return con;
-}
-
-void bsc_msc_lost(struct bsc_msc_connection *con)
-{
- osmo_wqueue_clear(&con->write_queue);
- osmo_timer_del(&con->timeout_timer);
- osmo_timer_del(&con->reconnect_timer);
-
- if (con->write_queue.bfd.fd >= 0)
- osmo_fd_unregister(&con->write_queue.bfd);
- connection_loss(con);
-}
-
-static void reconnect_msc(void *_msc)
-{
- struct bsc_msc_connection *con = _msc;
-
- LOGP(DMSC, LOGL_NOTICE,
- "Attempting to reconnect to the MSC(%s).\n", con->name);
- bsc_msc_connect(con);
-}
-
-void bsc_msc_schedule_connect(struct bsc_msc_connection *con)
-{
- LOGP(DMSC, LOGL_NOTICE,
- "Attempting to reconnect to the MSC(%s)\n", con->name);
- osmo_timer_setup(&con->reconnect_timer, reconnect_msc, con);
- osmo_timer_schedule(&con->reconnect_timer, 5, 0);
-}
-
-struct msgb *bsc_msc_id_get_resp(int fixed, const char *token, const uint8_t *res, int len)
-{
- struct msgb *msg;
-
- if (!token) {
- LOGP(DMSC, LOGL_ERROR, "No token specified.\n");
- return NULL;
- }
-
- msg = msgb_alloc_headroom(4096, 128, "id resp");
- if (!msg) {
- LOGP(DMSC, LOGL_ERROR, "Failed to create the message.\n");
- return NULL;
- }
-
- /*
- * The situation is bizarre. The encoding doesn't follow the
- * TLV structure. It is more like a LV and old versions had
- * it wrong but we want new versions to old servers so we
- * introduce the quirk here.
- */
- msg->l2h = msgb_v_put(msg, IPAC_MSGT_ID_RESP);
- if (fixed) {
- msgb_put_u8(msg, 0);
- msgb_put_u8(msg, strlen(token) + 2);
- msgb_tv_fixed_put(msg, IPAC_IDTAG_UNITNAME, strlen(token) + 1, (uint8_t *) token);
- if (len > 0) {
- msgb_put_u8(msg, 0);
- msgb_put_u8(msg, len + 1);
- msgb_tv_fixed_put(msg, 0x24, len, res);
- }
- } else {
- msgb_l16tv_put(msg, strlen(token) + 1,
- IPAC_IDTAG_UNITNAME, (uint8_t *) token);
- }
-
- return msg;
-}
diff --git a/src/libbsc/bsc_rf_ctrl.c b/src/libbsc/bsc_rf_ctrl.c
deleted file mode 100644
index b7b6fc819..000000000
--- a/src/libbsc/bsc_rf_ctrl.c
+++ /dev/null
@@ -1,534 +0,0 @@
-/* RF Ctl handling socket */
-
-/* (C) 2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2010-2014 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2014 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/ipaccess.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/protocol/gsm_12_21.h>
-
-#include <sys/socket.h>
-#include <sys/un.h>
-
-#include <errno.h>
-#include <unistd.h>
-
-#define RF_CMD_QUERY '?'
-#define RF_CMD_OFF '0'
-#define RF_CMD_ON '1'
-#define RF_CMD_D_OFF 'd'
-#define RF_CMD_ON_G 'g'
-
-static const struct value_string opstate_names[] = {
- { OSMO_BSC_RF_OPSTATE_INOPERATIONAL, "inoperational" },
- { OSMO_BSC_RF_OPSTATE_OPERATIONAL, "operational" },
- { 0, NULL }
-};
-
-static const struct value_string adminstate_names[] = {
- { OSMO_BSC_RF_ADMINSTATE_UNLOCKED, "unlocked" },
- { OSMO_BSC_RF_ADMINSTATE_LOCKED, "locked" },
- { 0, NULL }
-};
-
-static const struct value_string policy_names[] = {
- { OSMO_BSC_RF_POLICY_OFF, "off" },
- { OSMO_BSC_RF_POLICY_ON, "on" },
- { OSMO_BSC_RF_POLICY_GRACE, "grace" },
- { OSMO_BSC_RF_POLICY_UNKNOWN, "unknown" },
- { 0, NULL }
-};
-
-const char *osmo_bsc_rf_get_opstate_name(enum osmo_bsc_rf_opstate opstate)
-{
- return get_value_string(opstate_names, opstate);
-}
-
-const char *osmo_bsc_rf_get_adminstate_name(enum osmo_bsc_rf_adminstate adminstate)
-{
- return get_value_string(adminstate_names, adminstate);
-}
-
-const char *osmo_bsc_rf_get_policy_name(enum osmo_bsc_rf_policy policy)
-{
- return get_value_string(policy_names, policy);
-}
-
-enum osmo_bsc_rf_opstate osmo_bsc_rf_get_opstate_by_bts(struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- if (trx->mo.nm_state.operational == NM_OPSTATE_ENABLED)
- return OSMO_BSC_RF_OPSTATE_OPERATIONAL;
- }
-
- /* No trx were active, so this bts is disabled */
- return OSMO_BSC_RF_OPSTATE_INOPERATIONAL;
-}
-
-enum osmo_bsc_rf_adminstate osmo_bsc_rf_get_adminstate_by_bts(struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- if (trx->mo.nm_state.administrative == NM_STATE_UNLOCKED)
- return OSMO_BSC_RF_ADMINSTATE_UNLOCKED;
- }
-
- /* All trx administrative states were locked */
- return OSMO_BSC_RF_ADMINSTATE_LOCKED;
-}
-
-enum osmo_bsc_rf_policy osmo_bsc_rf_get_policy_by_bts(struct gsm_bts *bts)
-{
- struct osmo_bsc_data *bsc_data = bts->network->bsc_data;
-
- if (!bsc_data)
- return OSMO_BSC_RF_POLICY_UNKNOWN;
-
- switch (bsc_data->rf_ctrl->policy) {
- case S_RF_ON:
- return OSMO_BSC_RF_POLICY_ON;
- case S_RF_OFF:
- return OSMO_BSC_RF_POLICY_OFF;
- case S_RF_GRACE:
- return OSMO_BSC_RF_POLICY_GRACE;
- default:
- return OSMO_BSC_RF_POLICY_UNKNOWN;
- }
-}
-
-static int lock_each_trx(struct gsm_network *net, int lock)
-{
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- struct gsm_bts_trx *trx;
-
- /* Exclude the BTS from the global lock */
- if (bts->excl_from_rf_lock) {
- LOGP(DLINP, LOGL_DEBUG,
- "Excluding BTS(%d) from trx lock.\n", bts->nr);
- continue;
- }
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- gsm_trx_lock_rf(trx, lock);
- }
- }
-
- return 0;
-}
-
-static void send_resp(struct osmo_bsc_rf_conn *conn, char send)
-{
- struct msgb *msg;
-
- msg = msgb_alloc(10, "RF Query");
- if (!msg) {
- LOGP(DLINP, LOGL_ERROR, "Failed to allocate response msg.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, 1);
- msg->l2h[0] = send;
-
- if (osmo_wqueue_enqueue(&conn->queue, msg) != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to enqueue the answer.\n");
- msgb_free(msg);
- return;
- }
-
- return;
-}
-
-
-/*
- * Send a
- * 'g' when we are in grace mode
- * '1' when one TRX is online,
- * '0' otherwise
- */
-static void handle_query(struct osmo_bsc_rf_conn *conn)
-{
- struct gsm_bts *bts;
- char send = RF_CMD_OFF;
-
- if (conn->rf->policy == S_RF_GRACE)
- return send_resp(conn, RF_CMD_ON_G);
-
- llist_for_each_entry(bts, &conn->rf->gsm_network->bts_list, list) {
- struct gsm_bts_trx *trx;
-
- /* Exclude the BTS from the global lock */
- if (bts->excl_from_rf_lock) {
- LOGP(DLINP, LOGL_DEBUG,
- "Excluding BTS(%d) from query.\n", bts->nr);
- continue;
- }
- llist_for_each_entry(trx, &bts->trx_list, list) {
- if (trx->mo.nm_state.availability == NM_AVSTATE_OK &&
- trx->mo.nm_state.operational != NM_OPSTATE_DISABLED) {
- send = RF_CMD_ON;
- break;
- }
- }
- }
-
- send_resp(conn, send);
-}
-
-static void rf_check_cb(void *_data)
-{
- struct gsm_bts *bts;
- struct osmo_bsc_rf *rf = _data;
-
- llist_for_each_entry(bts, &rf->gsm_network->bts_list, list) {
- struct gsm_bts_trx *trx;
-
- /* don't bother to check a booting or missing BTS */
- if (!bts->oml_link || !is_ipaccess_bts(bts))
- continue;
-
- /* Exclude the BTS from the global lock */
- if (bts->excl_from_rf_lock) {
- LOGP(DLINP, LOGL_DEBUG,
- "Excluding BTS(%d) from query.\n", bts->nr);
- continue;
- }
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- if (trx->mo.nm_state.availability != NM_AVSTATE_OK ||
- trx->mo.nm_state.operational != NM_OPSTATE_ENABLED ||
- trx->mo.nm_state.administrative != NM_STATE_UNLOCKED) {
- LOGP(DNM, LOGL_ERROR, "RF activation failed. Starting again.\n");
- ipaccess_drop_oml(bts);
- break;
- }
- }
- }
-}
-
-static void send_signal(struct osmo_bsc_rf *rf, int val)
-{
- struct rf_signal_data sig;
- sig.net = rf->gsm_network;
-
- rf->policy = val;
- osmo_signal_dispatch(SS_RF, val, &sig);
-}
-
-static int switch_rf_off(struct osmo_bsc_rf *rf)
-{
- lock_each_trx(rf->gsm_network, 1);
- send_signal(rf, S_RF_OFF);
-
- return 0;
-}
-
-static void grace_timeout(void *_data)
-{
- struct osmo_bsc_rf *rf = (struct osmo_bsc_rf *) _data;
-
- LOGP(DLINP, LOGL_NOTICE, "Grace timeout. Going to disable all BTS/TRX.\n");
- switch_rf_off(rf);
-}
-
-static int enter_grace(struct osmo_bsc_rf *rf)
-{
- if (osmo_timer_pending(&rf->grace_timeout)) {
- LOGP(DLINP, LOGL_NOTICE, "RF Grace timer is pending. Not restarting.\n");
- return 0;
- }
-
- osmo_timer_setup(&rf->grace_timeout, grace_timeout, rf);
- osmo_timer_schedule(&rf->grace_timeout, rf->gsm_network->bsc_data->mid_call_timeout, 0);
- LOGP(DLINP, LOGL_NOTICE, "Going to switch RF off in %d seconds.\n",
- rf->gsm_network->bsc_data->mid_call_timeout);
-
- send_signal(rf, S_RF_GRACE);
- return 0;
-}
-
-static void rf_delay_cmd_cb(void *data)
-{
- struct osmo_bsc_rf *rf = data;
-
- switch (rf->last_request) {
- case RF_CMD_D_OFF:
- rf->last_state_command = "RF Direct Off";
- osmo_timer_del(&rf->rf_check);
- osmo_timer_del(&rf->grace_timeout);
- switch_rf_off(rf);
- break;
- case RF_CMD_ON:
- rf->last_state_command = "RF Direct On";
- osmo_timer_del(&rf->grace_timeout);
- lock_each_trx(rf->gsm_network, 0);
- send_signal(rf, S_RF_ON);
- osmo_timer_schedule(&rf->rf_check, 3, 0);
- break;
- case RF_CMD_OFF:
- rf->last_state_command = "RF Scheduled Off";
- osmo_timer_del(&rf->rf_check);
- enter_grace(rf);
- break;
- }
-}
-
-static int rf_read_cmd(struct osmo_fd *fd)
-{
- struct osmo_bsc_rf_conn *conn = fd->data;
- char buf[1];
- int rc;
-
- rc = read(fd->fd, buf, sizeof(buf));
- if (rc != sizeof(buf)) {
- LOGP(DLINP, LOGL_ERROR, "Short read %d/%s\n", errno, strerror(errno));
- osmo_fd_unregister(fd);
- close(fd->fd);
- osmo_wqueue_clear(&conn->queue);
- talloc_free(conn);
- return -1;
- }
-
- switch (buf[0]) {
- case RF_CMD_QUERY:
- handle_query(conn);
- break;
- case RF_CMD_D_OFF:
- case RF_CMD_ON:
- case RF_CMD_OFF:
- osmo_bsc_rf_schedule_lock(conn->rf, buf[0]);
- break;
- default:
- conn->rf->last_state_command = "Unknown command";
- LOGP(DLINP, LOGL_ERROR, "Unknown command %d\n", buf[0]);
- break;
- }
-
- return 0;
-}
-
-static int rf_write_cmd(struct osmo_fd *fd, struct msgb *msg)
-{
- int rc;
-
- rc = write(fd->fd, msg->data, msg->len);
- if (rc != msg->len) {
- LOGP(DLINP, LOGL_ERROR, "Short write %d/%s\n", errno, strerror(errno));
- return -1;
- }
-
- return 0;
-}
-
-static int rf_ctrl_accept(struct osmo_fd *bfd, unsigned int what)
-{
- struct osmo_bsc_rf_conn *conn;
- struct osmo_bsc_rf *rf = bfd->data;
- struct sockaddr_un addr;
- socklen_t len = sizeof(addr);
- int fd;
-
- fd = accept(bfd->fd, (struct sockaddr *) &addr, &len);
- if (fd < 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to accept. errno: %d/%s\n",
- errno, strerror(errno));
- return -1;
- }
-
- conn = talloc_zero(rf, struct osmo_bsc_rf_conn);
- if (!conn) {
- LOGP(DLINP, LOGL_ERROR, "Failed to allocate mem.\n");
- close(fd);
- return -1;
- }
-
- osmo_wqueue_init(&conn->queue, 10);
- conn->queue.bfd.data = conn;
- conn->queue.bfd.fd = fd;
- conn->queue.bfd.when = BSC_FD_READ | BSC_FD_WRITE;
- conn->queue.read_cb = rf_read_cmd;
- conn->queue.write_cb = rf_write_cmd;
- conn->rf = rf;
-
- if (osmo_fd_register(&conn->queue.bfd) != 0) {
- close(fd);
- talloc_free(conn);
- return -1;
- }
-
- return 0;
-}
-
-static void rf_auto_off_cb(void *_timer)
-{
- struct osmo_bsc_rf *rf = _timer;
-
- LOGP(DLINP, LOGL_NOTICE,
- "Going to switch off RF due lack of a MSC connection.\n");
- osmo_bsc_rf_schedule_lock(rf, RF_CMD_D_OFF);
-}
-
-static int msc_signal_handler(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_network *net;
- struct msc_signal_data *msc;
- struct osmo_bsc_rf *rf;
-
- /* check if we want to handle this signal */
- if (subsys != SS_MSC)
- return 0;
-
- net = handler_data;
- msc = signal_data;
-
- /* check if we have the needed information */
- if (!net->bsc_data)
- return 0;
- if (msc->data->type != MSC_CON_TYPE_NORMAL)
- return 0;
-
- rf = net->bsc_data->rf_ctrl;
- switch (signal) {
- case S_MSC_LOST:
- if (net->bsc_data->auto_off_timeout < 0)
- return 0;
- if (osmo_timer_pending(&rf->auto_off_timer))
- return 0;
- osmo_timer_schedule(&rf->auto_off_timer,
- net->bsc_data->auto_off_timeout, 0);
- break;
- case S_MSC_CONNECTED:
- osmo_timer_del(&rf->auto_off_timer);
- break;
- }
-
- return 0;
-}
-
-static int rf_create_socket(struct osmo_bsc_rf *rf, const char *path)
-{
- unsigned int namelen;
- struct sockaddr_un local;
- struct osmo_fd *bfd;
- int rc;
-
- bfd = &rf->listen;
- bfd->fd = socket(AF_UNIX, SOCK_STREAM, 0);
- if (bfd->fd < 0) {
- LOGP(DLINP, LOGL_ERROR, "Can not create socket. %d/%s\n",
- errno, strerror(errno));
- return -1;
- }
-
- local.sun_family = AF_UNIX;
- osmo_strlcpy(local.sun_path, path, sizeof(local.sun_path));
- unlink(local.sun_path);
-
- /* we use the same magic that X11 uses in Xtranssock.c for
- * calculating the proper length of the sockaddr */
-#if defined(BSD44SOCKETS) || defined(__UNIXWARE__)
- local.sun_len = strlen(local.sun_path);
-#endif
-#if defined(BSD44SOCKETS) || defined(SUN_LEN)
- namelen = SUN_LEN(&local);
-#else
- namelen = strlen(local.sun_path) +
- offsetof(struct sockaddr_un, sun_path);
-#endif
-
- rc = bind(bfd->fd, (struct sockaddr *) &local, namelen);
- if (rc != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to bind '%s' errno: %d/%s\n",
- local.sun_path, errno, strerror(errno));
- close(bfd->fd);
- return -1;
- }
-
- if (listen(bfd->fd, 0) != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to listen: %d/%s\n", errno, strerror(errno));
- close(bfd->fd);
- return -1;
- }
-
- bfd->when = BSC_FD_READ;
- bfd->cb = rf_ctrl_accept;
- bfd->data = rf;
-
- if (osmo_fd_register(bfd) != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to register bfd.\n");
- close(bfd->fd);
- return -1;
- }
-
- return 0;
-}
-
-struct osmo_bsc_rf *osmo_bsc_rf_create(const char *path, struct gsm_network *net)
-{
- struct osmo_bsc_rf *rf;
-
- rf = talloc_zero(NULL, struct osmo_bsc_rf);
- if (!rf) {
- LOGP(DLINP, LOGL_ERROR, "Failed to create osmo_bsc_rf.\n");
- return NULL;
- }
-
- if (path && rf_create_socket(rf, path) != 0) {
- talloc_free(rf);
- return NULL;
- }
-
- rf->gsm_network = net;
- rf->policy = S_RF_ON;
- rf->last_state_command = "";
- rf->last_rf_lock_ctrl_command = talloc_strdup(rf, "");
-
- /* check the rf state */
- osmo_timer_setup(&rf->rf_check, rf_check_cb, rf);
-
- /* delay cmd handling */
- osmo_timer_setup(&rf->delay_cmd, rf_delay_cmd_cb, rf);
-
- osmo_timer_setup(&rf->auto_off_timer, rf_auto_off_cb, rf);
-
- /* listen to RF signals */
- osmo_signal_register_handler(SS_MSC, msc_signal_handler, net);
-
- return rf;
-}
-
-void osmo_bsc_rf_schedule_lock(struct osmo_bsc_rf *rf, char cmd)
-{
- rf->last_request = cmd;
- if (!osmo_timer_pending(&rf->delay_cmd))
- osmo_timer_schedule(&rf->delay_cmd, 1, 0);
-}
diff --git a/src/libbsc/bsc_rll.c b/src/libbsc/bsc_rll.c
deleted file mode 100644
index bb488da15..000000000
--- a/src/libbsc/bsc_rll.c
+++ /dev/null
@@ -1,139 +0,0 @@
-/* GSM BSC Radio Link Layer API
- * 3GPP TS 08.58 version 8.6.0 Release 1999 / ETSI TS 100 596 V8.6.0 */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <errno.h>
-
-#include <openbsc/debug.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/timer.h>
-#include <osmocom/core/linuxlist.h>
-#include <openbsc/bsc_rll.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/signal.h>
-
-struct bsc_rll_req {
- struct llist_head list;
- struct osmo_timer_list timer;
-
- struct gsm_lchan *lchan;
- uint8_t link_id;
-
- void (*cb)(struct gsm_lchan *lchan, uint8_t link_id,
- void *data, enum bsc_rllr_ind);
- void *data;
-};
-
-/* we only compare C1, C2 and SAPI */
-#define LINKID_MASK 0xC7
-
-static LLIST_HEAD(bsc_rll_reqs);
-
-static void complete_rllr(struct bsc_rll_req *rllr, enum bsc_rllr_ind type)
-{
- llist_del(&rllr->list);
- rllr->cb(rllr->lchan, rllr->link_id, rllr->data, type);
- talloc_free(rllr);
-}
-
-static void timer_cb(void *_rllr)
-{
- struct bsc_rll_req *rllr = _rllr;
-
- complete_rllr(rllr, BSC_RLLR_IND_TIMEOUT);
-}
-
-/* establish a RLL connection with given SAPI / priority */
-int rll_establish(struct gsm_lchan *lchan, uint8_t sapi,
- void (*cb)(struct gsm_lchan *, uint8_t, void *,
- enum bsc_rllr_ind),
- void *data)
-{
- struct bsc_rll_req *rllr = talloc_zero(tall_bsc_ctx, struct bsc_rll_req);
- uint8_t link_id;
- if (!rllr)
- return -ENOMEM;
-
- link_id = sapi;
-
- /* If we are a TCH and not in signalling mode, we need to
- * indicate that the new RLL connection is to be made on the SACCH */
- if ((lchan->type == GSM_LCHAN_TCH_F ||
- lchan->type == GSM_LCHAN_TCH_H) && sapi != 0)
- link_id |= 0x40;
-
- rllr->lchan = lchan;
- rllr->link_id = link_id;
- rllr->cb = cb;
- rllr->data = data;
-
- llist_add(&rllr->list, &bsc_rll_reqs);
-
- osmo_timer_setup(&rllr->timer, timer_cb, rllr);
- osmo_timer_schedule(&rllr->timer, 7, 0);
-
- /* send the RSL RLL ESTablish REQuest */
- return rsl_establish_request(rllr->lchan, rllr->link_id);
-}
-
-/* Called from RSL code in case we have received an indication regarding
- * any RLL link */
-void rll_indication(struct gsm_lchan *lchan, uint8_t link_id, uint8_t type)
-{
- struct bsc_rll_req *rllr, *rllr2;
-
- llist_for_each_entry_safe(rllr, rllr2, &bsc_rll_reqs, list) {
- if (rllr->lchan == lchan &&
- (rllr->link_id & LINKID_MASK) == (link_id & LINKID_MASK)) {
- osmo_timer_del(&rllr->timer);
- complete_rllr(rllr, type);
- return;
- }
- }
-}
-
-static int rll_lchan_signal(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct challoc_signal_data *challoc;
- struct bsc_rll_req *rllr, *rllr2;
-
- if (subsys != SS_CHALLOC || signal != S_CHALLOC_FREED)
- return 0;
-
- challoc = (struct challoc_signal_data *) signal_data;
-
- llist_for_each_entry_safe(rllr, rllr2, &bsc_rll_reqs, list) {
- if (rllr->lchan == challoc->lchan) {
- osmo_timer_del(&rllr->timer);
- complete_rllr(rllr, BSC_RLLR_IND_ERR_IND);
- }
- }
-
- return 0;
-}
-
-static __attribute__((constructor)) void on_dso_load_rll(void)
-{
- osmo_signal_register_handler(SS_CHALLOC, rll_lchan_signal, NULL);
-}
diff --git a/src/libbsc/bsc_subscriber.c b/src/libbsc/bsc_subscriber.c
deleted file mode 100644
index 73e61e801..000000000
--- a/src/libbsc/bsc_subscriber.c
+++ /dev/null
@@ -1,168 +0,0 @@
-/* GSM subscriber details for use in BSC land */
-
-/*
- * (C) 2016 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>
- *
- * Author: Neels Hofmeyr <nhofmeyr@sysmocom.de>
- *
- * 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/>.
- *
- */
-
-#include <talloc.h>
-#include <string.h>
-#include <limits.h>
-
-#include <osmocom/gsm/gsm48.h>
-#include <osmocom/core/logging.h>
-
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/debug.h>
-
-static struct bsc_subscr *bsc_subscr_alloc(struct llist_head *list)
-{
- struct bsc_subscr *bsub;
-
- bsub = talloc_zero(list, struct bsc_subscr);
- if (!bsub)
- return NULL;
-
- llist_add_tail(&bsub->entry, list);
- bsub->use_count = 1;
-
- return bsub;
-}
-
-struct bsc_subscr *bsc_subscr_find_by_imsi(struct llist_head *list,
- const char *imsi)
-{
- struct bsc_subscr *bsub;
-
- if (!imsi || !*imsi)
- return NULL;
-
- llist_for_each_entry(bsub, list, entry) {
- if (!strcmp(bsub->imsi, imsi))
- return bsc_subscr_get(bsub);
- }
- return NULL;
-}
-
-struct bsc_subscr *bsc_subscr_find_by_tmsi(struct llist_head *list,
- uint32_t tmsi)
-{
- struct bsc_subscr *bsub;
-
- if (tmsi == GSM_RESERVED_TMSI)
- return NULL;
-
- llist_for_each_entry(bsub, list, entry) {
- if (bsub->tmsi == tmsi)
- return bsc_subscr_get(bsub);
- }
- return NULL;
-}
-
-void bsc_subscr_set_imsi(struct bsc_subscr *bsub, const char *imsi)
-{
- if (!bsub)
- return;
- osmo_strlcpy(bsub->imsi, imsi, sizeof(bsub->imsi));
-}
-
-struct bsc_subscr *bsc_subscr_find_or_create_by_imsi(struct llist_head *list,
- const char *imsi)
-{
- struct bsc_subscr *bsub;
- bsub = bsc_subscr_find_by_imsi(list, imsi);
- if (bsub)
- return bsub;
- bsub = bsc_subscr_alloc(list);
- bsc_subscr_set_imsi(bsub, imsi);
- return bsub;
-}
-
-struct bsc_subscr *bsc_subscr_find_or_create_by_tmsi(struct llist_head *list,
- uint32_t tmsi)
-{
- struct bsc_subscr *bsub;
- bsub = bsc_subscr_find_by_tmsi(list, tmsi);
- if (bsub)
- return bsub;
- bsub = bsc_subscr_alloc(list);
- bsub->tmsi = tmsi;
- return bsub;
-}
-
-const char *bsc_subscr_name(struct bsc_subscr *bsub)
-{
- static char buf[32];
- if (!bsub)
- return "unknown";
- if (bsub->imsi[0])
- snprintf(buf, sizeof(buf), "IMSI:%s", bsub->imsi);
- else
- snprintf(buf, sizeof(buf), "TMSI:0x%08x", bsub->tmsi);
- return buf;
-}
-
-static void bsc_subscr_free(struct bsc_subscr *bsub)
-{
- llist_del(&bsub->entry);
- talloc_free(bsub);
-}
-
-struct bsc_subscr *_bsc_subscr_get(struct bsc_subscr *bsub,
- const char *file, int line)
-{
- OSMO_ASSERT(bsub->use_count < INT_MAX);
- bsub->use_count++;
- LOGPSRC(DREF, LOGL_DEBUG, file, line,
- "BSC subscr %s usage increases to: %d\n",
- bsc_subscr_name(bsub), bsub->use_count);
- return bsub;
-}
-
-struct bsc_subscr *_bsc_subscr_put(struct bsc_subscr *bsub,
- const char *file, int line)
-{
- bsub->use_count--;
- LOGPSRC(DREF, bsub->use_count >= 0? LOGL_DEBUG : LOGL_ERROR,
- file, line,
- "BSC subscr %s usage decreases to: %d\n",
- bsc_subscr_name(bsub), bsub->use_count);
- if (bsub->use_count <= 0)
- bsc_subscr_free(bsub);
- return NULL;
-}
-
-void log_set_filter_bsc_subscr(struct log_target *target,
- struct bsc_subscr *bsc_subscr)
-{
- struct bsc_subscr **fsub = (void*)&target->filter_data[LOG_FLT_BSC_SUBSCR];
-
- /* free the old data */
- if (*fsub) {
- bsc_subscr_put(*fsub);
- *fsub = NULL;
- }
-
- if (bsc_subscr) {
- target->filter_map |= (1 << LOG_FLT_BSC_SUBSCR);
- *fsub = bsc_subscr_get(bsc_subscr);
- } else
- target->filter_map &= ~(1 << LOG_FLT_BSC_SUBSCR);
-}
diff --git a/src/libbsc/bsc_vty.c b/src/libbsc/bsc_vty.c
deleted file mode 100644
index d55c6eb30..000000000
--- a/src/libbsc/bsc_vty.c
+++ /dev/null
@@ -1,4412 +0,0 @@
-/* OpenBSC interface to quagga VTY */
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <stdbool.h>
-#include <unistd.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/buffer.h>
-#include <osmocom/vty/vty.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/stats.h>
-#include <osmocom/vty/telnet_interface.h>
-#include <osmocom/vty/misc.h>
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-#include <osmocom/gsm/gsm0502.h>
-#include <osmocom/ctrl/control_if.h>
-
-#include <arpa/inet.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <openbsc/gsm_data.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/abis_om2000.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <osmocom/gsm/abis_nm.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/meas_rep.h>
-#include <openbsc/db.h>
-#include <openbsc/vty.h>
-#include <osmocom/gprs/gprs_ns.h>
-#include <openbsc/system_information.h>
-#include <openbsc/debug.h>
-#include <openbsc/paging.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/pcu_if.h>
-#include <openbsc/common_cs.h>
-#include <openbsc/vlr.h>
-#include <openbsc/handover.h>
-
-#include <inttypes.h>
-
-#include "../../bscconfig.h"
-
-
-#define LCHAN_NR_STR "Logical Channel Number\n"
-
-
-/* FIXME: this should go to some common file */
-static const struct value_string gprs_ns_timer_strs[] = {
- { 0, "tns-block" },
- { 1, "tns-block-retries" },
- { 2, "tns-reset" },
- { 3, "tns-reset-retries" },
- { 4, "tns-test" },
- { 5, "tns-alive" },
- { 6, "tns-alive-retries" },
- { 0, NULL }
-};
-
-static const struct value_string gprs_bssgp_cfg_strs[] = {
- { 0, "blocking-timer" },
- { 1, "blocking-retries" },
- { 2, "unblocking-retries" },
- { 3, "reset-timer" },
- { 4, "reset-retries" },
- { 5, "suspend-timer" },
- { 6, "suspend-retries" },
- { 7, "resume-timer" },
- { 8, "resume-retries" },
- { 9, "capability-update-timer" },
- { 10, "capability-update-retries" },
- { 0, NULL }
-};
-
-static const struct value_string bts_neigh_mode_strs[] = {
- { NL_MODE_AUTOMATIC, "automatic" },
- { NL_MODE_MANUAL, "manual" },
- { NL_MODE_MANUAL_SI5SEP, "manual-si5" },
- { 0, NULL }
-};
-
-const struct value_string bts_loc_fix_names[] = {
- { BTS_LOC_FIX_INVALID, "invalid" },
- { BTS_LOC_FIX_2D, "fix2d" },
- { BTS_LOC_FIX_3D, "fix3d" },
- { 0, NULL }
-};
-
-struct cmd_node bts_node = {
- BTS_NODE,
- "%s(config-net-bts)# ",
- 1,
-};
-
-struct cmd_node trx_node = {
- TRX_NODE,
- "%s(config-net-bts-trx)# ",
- 1,
-};
-
-struct cmd_node ts_node = {
- TS_NODE,
- "%s(config-net-bts-trx-ts)# ",
- 1,
-};
-
-static int dummy_config_write(struct vty *v)
-{
- return CMD_SUCCESS;
-}
-
-static void net_dump_nmstate(struct vty *vty, struct gsm_nm_state *nms)
-{
- vty_out(vty,"Oper '%s', Admin '%s', Avail '%s'%s",
- abis_nm_opstate_name(nms->operational),
- get_value_string(abis_nm_adm_state_names, nms->administrative),
- abis_nm_avail_name(nms->availability), VTY_NEWLINE);
-}
-
-static void dump_pchan_load_vty(struct vty *vty, char *prefix,
- const struct pchan_load *pl)
-{
- int i;
-
- for (i = 0; i < ARRAY_SIZE(pl->pchan); i++) {
- const struct load_counter *lc = &pl->pchan[i];
- unsigned int percent;
-
- if (lc->total == 0)
- continue;
-
- percent = (lc->used * 100) / lc->total;
-
- vty_out(vty, "%s%20s: %3u%% (%u/%u)%s", prefix,
- gsm_pchan_name(i), percent, lc->used, lc->total,
- VTY_NEWLINE);
- }
-}
-
-static void net_dump_vty(struct vty *vty, struct gsm_network *net)
-{
- struct pchan_load pl;
-
- vty_out(vty, "BSC is on Country Code %u, Network Code %u "
- "and has %u BTS%s", net->country_code, net->network_code,
- net->num_bts, VTY_NEWLINE);
- vty_out(vty, " Long network name: '%s'%s",
- net->name_long, VTY_NEWLINE);
- vty_out(vty, " Short network name: '%s'%s",
- net->name_short, VTY_NEWLINE);
- vty_out(vty, " Authentication policy: %s",
- gsm_auth_policy_name(net->auth_policy));
- if (net->authorized_reg_str)
- vty_out(vty, ", authorized regexp: %s", net->authorized_reg_str);
- vty_out(vty, "%s", VTY_NEWLINE);
- vty_out(vty, " Location updating reject cause: %u%s",
- net->reject_cause, VTY_NEWLINE);
- vty_out(vty, " Encryption: A5/%u%s", net->a5_encryption,
- VTY_NEWLINE);
- vty_out(vty, " NECI (TCH/H): %u%s", net->neci,
- VTY_NEWLINE);
- vty_out(vty, " Use TCH for Paging any: %d%s", net->pag_any_tch,
- VTY_NEWLINE);
- vty_out(vty, " RRLP Mode: %s%s", rrlp_mode_name(net->rrlp.mode),
- VTY_NEWLINE);
- vty_out(vty, " MM Info: %s%s", net->send_mm_info ? "On" : "Off",
- VTY_NEWLINE);
- vty_out(vty, " Handover: %s%s", net->handover.active ? "On" : "Off",
- VTY_NEWLINE);
- network_chan_load(&pl, net);
- vty_out(vty, " Current Channel Load:%s", VTY_NEWLINE);
- dump_pchan_load_vty(vty, " ", &pl);
-
- /* show rf */
- if (net->bsc_data)
- vty_out(vty, " Last RF Command: %s%s",
- net->bsc_data->rf_ctrl->last_state_command,
- VTY_NEWLINE);
- if (net->bsc_data)
- vty_out(vty, " Last RF Lock Command: %s%s",
- net->bsc_data->rf_ctrl->last_rf_lock_ctrl_command,
- VTY_NEWLINE);
-}
-
-DEFUN(bsc_show_net, bsc_show_net_cmd, "show network",
- SHOW_STR "Display information about a GSM NETWORK\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- net_dump_vty(vty, net);
-
- return CMD_SUCCESS;
-}
-
-static void e1isl_dump_vty(struct vty *vty, struct e1inp_sign_link *e1l)
-{
- struct e1inp_line *line;
-
- if (!e1l) {
- vty_out(vty, " None%s", VTY_NEWLINE);
- return;
- }
-
- line = e1l->ts->line;
-
- vty_out(vty, " E1 Line %u, Type %s: Timeslot %u, Mode %s%s",
- line->num, line->driver->name, e1l->ts->num,
- e1inp_signtype_name(e1l->type), VTY_NEWLINE);
- vty_out(vty, " E1 TEI %u, SAPI %u%s",
- e1l->tei, e1l->sapi, VTY_NEWLINE);
-}
-
-static void bts_dump_vty(struct vty *vty, struct gsm_bts *bts)
-{
- struct pchan_load pl;
-
- vty_out(vty, "BTS %u is of %s type in band %s, has CI %u LAC %u, "
- "BSIC %u (NCC=%u, BCC=%u) and %u TRX%s",
- bts->nr, btstype2str(bts->type), gsm_band_name(bts->band),
- bts->cell_identity,
- bts->location_area_code, bts->bsic,
- bts->bsic >> 3, bts->bsic & 7,
- bts->num_trx, VTY_NEWLINE);
- vty_out(vty, "Description: %s%s",
- bts->description ? bts->description : "(null)", VTY_NEWLINE);
- if (strnlen(bts->pcu_version, MAX_VERSION_LENGTH))
- vty_out(vty, "PCU version %s connected%s", bts->pcu_version,
- VTY_NEWLINE);
- vty_out(vty, "MS Max power: %u dBm%s", bts->ms_max_power, VTY_NEWLINE);
- vty_out(vty, "Minimum Rx Level for Access: %i dBm%s",
- rxlev2dbm(bts->si_common.cell_sel_par.rxlev_acc_min),
- VTY_NEWLINE);
- vty_out(vty, "Cell Reselection Hysteresis: %u dBm%s",
- bts->si_common.cell_sel_par.cell_resel_hyst*2, VTY_NEWLINE);
- vty_out(vty, "RACH TX-Integer: %u%s", bts->si_common.rach_control.tx_integer,
- VTY_NEWLINE);
- vty_out(vty, "RACH Max transmissions: %u%s",
- rach_max_trans_raw2val(bts->si_common.rach_control.max_trans),
- VTY_NEWLINE);
- if (bts->si_common.rach_control.cell_bar)
- vty_out(vty, " CELL IS BARRED%s", VTY_NEWLINE);
- if (bts->dtxu != GSM48_DTX_SHALL_NOT_BE_USED)
- vty_out(vty, "Uplink DTX: %s%s",
- (bts->dtxu != GSM48_DTX_SHALL_BE_USED) ?
- "enabled" : "forced", VTY_NEWLINE);
- else
- vty_out(vty, "Uplink DTX: not enabled%s", VTY_NEWLINE);
- vty_out(vty, "Downlink DTX: %senabled%s", bts->dtxd ? "" : "not ",
- VTY_NEWLINE);
- vty_out(vty, "Channel Description Attachment: %s%s",
- (bts->si_common.chan_desc.att) ? "yes" : "no", VTY_NEWLINE);
- vty_out(vty, "Channel Description BS-PA-MFRMS: %u%s",
- bts->si_common.chan_desc.bs_pa_mfrms + 2, VTY_NEWLINE);
- vty_out(vty, "Channel Description BS-AG_BLKS-RES: %u%s",
- bts->si_common.chan_desc.bs_ag_blks_res, VTY_NEWLINE);
- vty_out(vty, "System Information present: 0x%08x, static: 0x%08x%s",
- bts->si_valid, bts->si_mode_static, VTY_NEWLINE);
- vty_out(vty, "Early Classmark Sending: %s%s",
- bts->early_classmark_allowed ? "allowed" : "forbidden",
- VTY_NEWLINE);
- if (bts->pcu_sock_path)
- vty_out(vty, "PCU Socket Path: %s%s", bts->pcu_sock_path, VTY_NEWLINE);
- if (is_ipaccess_bts(bts))
- vty_out(vty, " Unit ID: %u/%u/0, OML Stream ID 0x%02x%s",
- bts->ip_access.site_id, bts->ip_access.bts_id,
- bts->oml_tei, VTY_NEWLINE);
- else if (bts->type == GSM_BTS_TYPE_NOKIA_SITE)
- vty_out(vty, " Skip Reset: %d%s",
- bts->nokia.skip_reset, VTY_NEWLINE);
- vty_out(vty, " NM State: ");
- net_dump_nmstate(vty, &bts->mo.nm_state);
- vty_out(vty, " Site Mgr NM State: ");
- net_dump_nmstate(vty, &bts->site_mgr.mo.nm_state);
- vty_out(vty, " GPRS NSE: ");
- net_dump_nmstate(vty, &bts->gprs.nse.mo.nm_state);
- vty_out(vty, " GPRS CELL: ");
- net_dump_nmstate(vty, &bts->gprs.cell.mo.nm_state);
- vty_out(vty, " GPRS NSVC0: ");
- net_dump_nmstate(vty, &bts->gprs.nsvc[0].mo.nm_state);
- vty_out(vty, " GPRS NSVC1: ");
- net_dump_nmstate(vty, &bts->gprs.nsvc[1].mo.nm_state);
- vty_out(vty, " Paging: %u pending requests, %u free slots%s",
- paging_pending_requests_nr(bts),
- bts->paging.available_slots, VTY_NEWLINE);
- if (is_ipaccess_bts(bts)) {
- vty_out(vty, " OML Link state: %s.%s",
- bts->oml_link ? "connected" : "disconnected", VTY_NEWLINE);
- } else {
- vty_out(vty, " E1 Signalling Link:%s", VTY_NEWLINE);
- e1isl_dump_vty(vty, bts->oml_link);
- }
-
- /* FIXME: chan_desc */
- memset(&pl, 0, sizeof(pl));
- bts_chan_load(&pl, bts);
- vty_out(vty, " Current Channel Load:%s", VTY_NEWLINE);
- dump_pchan_load_vty(vty, " ", &pl);
-}
-
-DEFUN(show_bts, show_bts_cmd, "show bts [<0-255>]",
- SHOW_STR "Display information about a BTS\n"
- "BTS number")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- int bts_nr;
-
- if (argc != 0) {
- /* use the BTS number that the user has specified */
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS '%s'%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts_dump_vty(vty, gsm_bts_num(net, bts_nr));
- return CMD_SUCCESS;
- }
- /* print all BTS's */
- for (bts_nr = 0; bts_nr < net->num_bts; bts_nr++)
- bts_dump_vty(vty, gsm_bts_num(net, bts_nr));
-
- return CMD_SUCCESS;
-}
-
-/* utility functions */
-static void parse_e1_link(struct gsm_e1_subslot *e1_link, const char *line,
- const char *ts, const char *ss)
-{
- e1_link->e1_nr = atoi(line);
- e1_link->e1_ts = atoi(ts);
- if (!strcmp(ss, "full"))
- e1_link->e1_ts_ss = 255;
- else
- e1_link->e1_ts_ss = atoi(ss);
-}
-
-static void config_write_e1_link(struct vty *vty, struct gsm_e1_subslot *e1_link,
- const char *prefix)
-{
- if (!e1_link->e1_ts)
- return;
-
- if (e1_link->e1_ts_ss == 255)
- vty_out(vty, "%se1 line %u timeslot %u sub-slot full%s",
- prefix, e1_link->e1_nr, e1_link->e1_ts, VTY_NEWLINE);
- else
- vty_out(vty, "%se1 line %u timeslot %u sub-slot %u%s",
- prefix, e1_link->e1_nr, e1_link->e1_ts,
- e1_link->e1_ts_ss, VTY_NEWLINE);
-}
-
-
-static void config_write_ts_single(struct vty *vty, struct gsm_bts_trx_ts *ts)
-{
- vty_out(vty, " timeslot %u%s", ts->nr, VTY_NEWLINE);
- if (ts->tsc != -1)
- vty_out(vty, " training_sequence_code %u%s", ts->tsc, VTY_NEWLINE);
- if (ts->pchan != GSM_PCHAN_NONE)
- vty_out(vty, " phys_chan_config %s%s",
- gsm_pchan_name(ts->pchan), VTY_NEWLINE);
- vty_out(vty, " hopping enabled %u%s",
- ts->hopping.enabled, VTY_NEWLINE);
- if (ts->hopping.enabled) {
- unsigned int i;
- vty_out(vty, " hopping sequence-number %u%s",
- ts->hopping.hsn, VTY_NEWLINE);
- vty_out(vty, " hopping maio %u%s",
- ts->hopping.maio, VTY_NEWLINE);
- for (i = 0; i < ts->hopping.arfcns.data_len*8; i++) {
- if (!bitvec_get_bit_pos(&ts->hopping.arfcns, i))
- continue;
- vty_out(vty, " hopping arfcn add %u%s",
- i, VTY_NEWLINE);
- }
- }
- config_write_e1_link(vty, &ts->e1_link, " ");
-
- if (ts->trx->bts->model->config_write_ts)
- ts->trx->bts->model->config_write_ts(vty, ts);
-}
-
-static void config_write_trx_single(struct vty *vty, struct gsm_bts_trx *trx)
-{
- int i;
-
- vty_out(vty, " trx %u%s", trx->nr, VTY_NEWLINE);
- if (trx->description)
- vty_out(vty, " description %s%s", trx->description,
- VTY_NEWLINE);
- vty_out(vty, " rf_locked %u%s",
- trx->mo.nm_state.administrative == NM_STATE_LOCKED ? 1 : 0,
- VTY_NEWLINE);
- vty_out(vty, " arfcn %u%s", trx->arfcn, VTY_NEWLINE);
- vty_out(vty, " nominal power %u%s", trx->nominal_power, VTY_NEWLINE);
- vty_out(vty, " max_power_red %u%s", trx->max_power_red, VTY_NEWLINE);
- config_write_e1_link(vty, &trx->rsl_e1_link, " rsl ");
- vty_out(vty, " rsl e1 tei %u%s", trx->rsl_tei, VTY_NEWLINE);
-
- if (trx->bts->model->config_write_trx)
- trx->bts->model->config_write_trx(vty, trx);
-
- for (i = 0; i < TRX_NR_TS; i++)
- config_write_ts_single(vty, &trx->ts[i]);
-}
-
-static void config_write_bts_gprs(struct vty *vty, struct gsm_bts *bts)
-{
- unsigned int i;
- vty_out(vty, " gprs mode %s%s", bts_gprs_mode_name(bts->gprs.mode),
- VTY_NEWLINE);
- if (bts->gprs.mode == BTS_GPRS_NONE)
- return;
-
- vty_out(vty, " gprs 11bit_rach_support_for_egprs %u%s",
- bts->gprs.supports_egprs_11bit_rach, VTY_NEWLINE);
-
- vty_out(vty, " gprs routing area %u%s", bts->gprs.rac,
- VTY_NEWLINE);
- vty_out(vty, " gprs network-control-order nc%u%s",
- bts->gprs.net_ctrl_ord, VTY_NEWLINE);
- if (!bts->gprs.ctrl_ack_type_use_block)
- vty_out(vty, " gprs control-ack-type-rach%s", VTY_NEWLINE);
- vty_out(vty, " gprs cell bvci %u%s", bts->gprs.cell.bvci,
- VTY_NEWLINE);
- for (i = 0; i < ARRAY_SIZE(bts->gprs.cell.timer); i++)
- vty_out(vty, " gprs cell timer %s %u%s",
- get_value_string(gprs_bssgp_cfg_strs, i),
- bts->gprs.cell.timer[i], VTY_NEWLINE);
- vty_out(vty, " gprs nsei %u%s", bts->gprs.nse.nsei,
- VTY_NEWLINE);
- for (i = 0; i < ARRAY_SIZE(bts->gprs.nse.timer); i++)
- vty_out(vty, " gprs ns timer %s %u%s",
- get_value_string(gprs_ns_timer_strs, i),
- bts->gprs.nse.timer[i], VTY_NEWLINE);
- for (i = 0; i < ARRAY_SIZE(bts->gprs.nsvc); i++) {
- struct gsm_bts_gprs_nsvc *nsvc =
- &bts->gprs.nsvc[i];
- struct in_addr ia;
-
- ia.s_addr = htonl(nsvc->remote_ip);
- vty_out(vty, " gprs nsvc %u nsvci %u%s", i,
- nsvc->nsvci, VTY_NEWLINE);
- vty_out(vty, " gprs nsvc %u local udp port %u%s", i,
- nsvc->local_port, VTY_NEWLINE);
- vty_out(vty, " gprs nsvc %u remote udp port %u%s", i,
- nsvc->remote_port, VTY_NEWLINE);
- vty_out(vty, " gprs nsvc %u remote ip %s%s", i,
- inet_ntoa(ia), VTY_NEWLINE);
- }
-}
-
-/* Write the model data if there is one */
-static void config_write_bts_model(struct vty *vty, struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- if (!bts->model)
- return;
-
- if (bts->model->config_write_bts)
- bts->model->config_write_bts(vty, bts);
-
- llist_for_each_entry(trx, &bts->trx_list, list)
- config_write_trx_single(vty, trx);
-}
-
-static void write_amr_modes(struct vty *vty, const char *prefix,
- const char *name, struct amr_mode *modes, int num)
-{
- int i;
-
- vty_out(vty, " %s threshold %s", prefix, name);
- for (i = 0; i < num - 1; i++)
- vty_out(vty, " %d", modes[i].threshold);
- vty_out(vty, "%s", VTY_NEWLINE);
- vty_out(vty, " %s hysteresis %s", prefix, name);
- for (i = 0; i < num - 1; i++)
- vty_out(vty, " %d", modes[i].hysteresis);
- vty_out(vty, "%s", VTY_NEWLINE);
-}
-
-static void config_write_bts_amr(struct vty *vty, struct gsm_bts *bts,
- struct amr_multirate_conf *mr, int full)
-{
- struct gsm48_multi_rate_conf *mr_conf;
- const char *prefix = (full) ? "amr tch-f" : "amr tch-h";
- int i, num;
-
- if (!(mr->gsm48_ie[1]))
- return;
-
- mr_conf = (struct gsm48_multi_rate_conf *) mr->gsm48_ie;
-
- num = 0;
- vty_out(vty, " %s modes", prefix);
- for (i = 0; i < ((full) ? 8 : 6); i++) {
- if ((mr->gsm48_ie[1] & (1 << i))) {
- vty_out(vty, " %d", i);
- num++;
- }
- }
- vty_out(vty, "%s", VTY_NEWLINE);
- if (num > 4)
- num = 4;
- if (num > 1) {
- write_amr_modes(vty, prefix, "ms", mr->ms_mode, num);
- write_amr_modes(vty, prefix, "bts", mr->bts_mode, num);
- }
- vty_out(vty, " %s start-mode ", prefix);
- if (mr_conf->icmi) {
- num = 0;
- for (i = 0; i < ((full) ? 8 : 6) && num < 4; i++) {
- if ((mr->gsm48_ie[1] & (1 << i)))
- num++;
- if (mr_conf->smod == num - 1) {
- vty_out(vty, "%d%s", num, VTY_NEWLINE);
- break;
- }
- }
- } else
- vty_out(vty, "auto%s", VTY_NEWLINE);
-}
-
-static void config_write_bts_single(struct vty *vty, struct gsm_bts *bts)
-{
- int i;
- uint8_t tmp;
-
- vty_out(vty, " bts %u%s", bts->nr, VTY_NEWLINE);
- vty_out(vty, " type %s%s", btstype2str(bts->type), VTY_NEWLINE);
- if (bts->description)
- vty_out(vty, " description %s%s", bts->description, VTY_NEWLINE);
- vty_out(vty, " band %s%s", gsm_band_name(bts->band), VTY_NEWLINE);
- vty_out(vty, " cell_identity %u%s", bts->cell_identity, VTY_NEWLINE);
- vty_out(vty, " location_area_code %u%s", bts->location_area_code,
- VTY_NEWLINE);
- if (bts->dtxu != GSM48_DTX_SHALL_NOT_BE_USED)
- vty_out(vty, " dtx uplink%s%s",
- (bts->dtxu != GSM48_DTX_SHALL_BE_USED) ? "" : " force",
- VTY_NEWLINE);
- if (bts->dtxd)
- vty_out(vty, " dtx downlink%s", VTY_NEWLINE);
- vty_out(vty, " base_station_id_code %u%s", bts->bsic, VTY_NEWLINE);
- vty_out(vty, " ms max power %u%s", bts->ms_max_power, VTY_NEWLINE);
- vty_out(vty, " cell reselection hysteresis %u%s",
- bts->si_common.cell_sel_par.cell_resel_hyst*2, VTY_NEWLINE);
- vty_out(vty, " rxlev access min %u%s",
- bts->si_common.cell_sel_par.rxlev_acc_min, VTY_NEWLINE);
-
- if (bts->si_common.cell_ro_sel_par.present) {
- struct gsm48_si_selection_params *sp;
- sp = &bts->si_common.cell_ro_sel_par;
-
- if (sp->cbq)
- vty_out(vty, " cell bar qualify %u%s",
- sp->cbq, VTY_NEWLINE);
-
- if (sp->cell_resel_off)
- vty_out(vty, " cell reselection offset %u%s",
- sp->cell_resel_off*2, VTY_NEWLINE);
-
- if (sp->temp_offs == 7)
- vty_out(vty, " temporary offset infinite%s",
- VTY_NEWLINE);
- else if (sp->temp_offs)
- vty_out(vty, " temporary offset %u%s",
- sp->temp_offs*10, VTY_NEWLINE);
-
- if (sp->penalty_time == 31)
- vty_out(vty, " penalty time reserved%s",
- VTY_NEWLINE);
- else if (sp->penalty_time)
- vty_out(vty, " penalty time %u%s",
- (sp->penalty_time*20)+20, VTY_NEWLINE);
- }
-
- if (gsm_bts_get_radio_link_timeout(bts) < 0)
- vty_out(vty, " radio-link-timeout infinite%s", VTY_NEWLINE);
- else
- vty_out(vty, " radio-link-timeout %d%s",
- gsm_bts_get_radio_link_timeout(bts), VTY_NEWLINE);
-
- vty_out(vty, " channel allocator %s%s",
- bts->chan_alloc_reverse ? "descending" : "ascending",
- VTY_NEWLINE);
- vty_out(vty, " rach tx integer %u%s",
- bts->si_common.rach_control.tx_integer, VTY_NEWLINE);
- vty_out(vty, " rach max transmission %u%s",
- rach_max_trans_raw2val(bts->si_common.rach_control.max_trans),
- VTY_NEWLINE);
-
- vty_out(vty, " channel-descrption attach %u%s",
- bts->si_common.chan_desc.att, VTY_NEWLINE);
- vty_out(vty, " channel-descrption bs-pa-mfrms %u%s",
- bts->si_common.chan_desc.bs_pa_mfrms + 2, VTY_NEWLINE);
- vty_out(vty, " channel-descrption bs-ag-blks-res %u%s",
- bts->si_common.chan_desc.bs_ag_blks_res, VTY_NEWLINE);
-
- if (bts->rach_b_thresh != -1)
- vty_out(vty, " rach nm busy threshold %u%s",
- bts->rach_b_thresh, VTY_NEWLINE);
- if (bts->rach_ldavg_slots != -1)
- vty_out(vty, " rach nm load average %u%s",
- bts->rach_ldavg_slots, VTY_NEWLINE);
- if (bts->si_common.rach_control.cell_bar)
- vty_out(vty, " cell barred 1%s", VTY_NEWLINE);
- if ((bts->si_common.rach_control.t2 & 0x4) == 0)
- vty_out(vty, " rach emergency call allowed 1%s", VTY_NEWLINE);
- if ((bts->si_common.rach_control.t3) != 0)
- for (i = 0; i < 8; i++)
- if (bts->si_common.rach_control.t3 & (0x1 << i))
- vty_out(vty, " rach access-control-class %d barred%s", i, VTY_NEWLINE);
- if ((bts->si_common.rach_control.t2 & 0xfb) != 0)
- for (i = 0; i < 8; i++)
- if ((i != 2) && (bts->si_common.rach_control.t2 & (0x1 << i)))
- vty_out(vty, " rach access-control-class %d barred%s", i+8, VTY_NEWLINE);
- for (i = SYSINFO_TYPE_1; i < _MAX_SYSINFO_TYPE; i++) {
- if (bts->si_mode_static & (1 << i)) {
- vty_out(vty, " system-information %s mode static%s",
- get_value_string(osmo_sitype_strs, i), VTY_NEWLINE);
- vty_out(vty, " system-information %s static %s%s",
- get_value_string(osmo_sitype_strs, i),
- osmo_hexdump_nospc(GSM_BTS_SI(bts, i), GSM_MACBLOCK_LEN),
- VTY_NEWLINE);
- }
- }
- vty_out(vty, " early-classmark-sending %s%s",
- bts->early_classmark_allowed ? "allowed" : "forbidden", VTY_NEWLINE);
- switch (bts->type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- vty_out(vty, " ip.access unit_id %u %u%s",
- bts->ip_access.site_id, bts->ip_access.bts_id, VTY_NEWLINE);
- if (bts->ip_access.rsl_ip) {
- struct in_addr ia;
- ia.s_addr = htonl(bts->ip_access.rsl_ip);
- vty_out(vty, " ip.access rsl-ip %s%s", inet_ntoa(ia),
- VTY_NEWLINE);
- }
- vty_out(vty, " oml ip.access stream_id %u line %u%s",
- bts->oml_tei, bts->oml_e1_link.e1_nr, VTY_NEWLINE);
- break;
- case GSM_BTS_TYPE_NOKIA_SITE:
- vty_out(vty, " nokia_site skip-reset %d%s", bts->nokia.skip_reset, VTY_NEWLINE);
- vty_out(vty, " nokia_site no-local-rel-conf %d%s",
- bts->nokia.no_loc_rel_cnf, VTY_NEWLINE);
- vty_out(vty, " nokia_site bts-reset-timer %d%s", bts->nokia.bts_reset_timer_cnf, VTY_NEWLINE);
- /* fall through: Nokia requires "oml e1" parameters also */
- default:
- config_write_e1_link(vty, &bts->oml_e1_link, " oml ");
- vty_out(vty, " oml e1 tei %u%s", bts->oml_tei, VTY_NEWLINE);
- break;
- }
-
- /* if we have a limit, write it */
- if (bts->paging.free_chans_need >= 0)
- vty_out(vty, " paging free %d%s", bts->paging.free_chans_need, VTY_NEWLINE);
-
- vty_out(vty, " neighbor-list mode %s%s",
- get_value_string(bts_neigh_mode_strs, bts->neigh_list_manual_mode), VTY_NEWLINE);
- if (bts->neigh_list_manual_mode != NL_MODE_AUTOMATIC) {
- for (i = 0; i < 1024; i++) {
- if (bitvec_get_bit_pos(&bts->si_common.neigh_list, i))
- vty_out(vty, " neighbor-list add arfcn %u%s",
- i, VTY_NEWLINE);
- }
- }
- if (bts->neigh_list_manual_mode == NL_MODE_MANUAL_SI5SEP) {
- for (i = 0; i < 1024; i++) {
- if (bitvec_get_bit_pos(&bts->si_common.si5_neigh_list, i))
- vty_out(vty, " si5 neighbor-list add arfcn %u%s",
- i, VTY_NEWLINE);
- }
- }
-
- for (i = 0; i < MAX_EARFCN_LIST; i++) {
- struct osmo_earfcn_si2q *e = &bts->si_common.si2quater_neigh_list;
- if (e->arfcn[i] != OSMO_EARFCN_INVALID) {
- vty_out(vty, " si2quater neighbor-list add earfcn %u "
- "thresh-hi %u", e->arfcn[i], e->thresh_hi);
-
- vty_out(vty, " thresh-lo %u",
- e->thresh_lo_valid ? e->thresh_lo : 32);
-
- vty_out(vty, " prio %u",
- e->prio_valid ? e->prio : 8);
-
- vty_out(vty, " qrxlv %u",
- e->qrxlm_valid ? e->qrxlm : 32);
-
- tmp = e->meas_bw[i];
- vty_out(vty, " meas %u",
- (tmp != OSMO_EARFCN_MEAS_INVALID) ? tmp : 8);
-
- vty_out(vty, "%s", VTY_NEWLINE);
- }
- }
-
- for (i = 0; i < bts->si_common.uarfcn_length; i++) {
- vty_out(vty, " si2quater neighbor-list add uarfcn %u %u %u%s",
- bts->si_common.data.uarfcn_list[i],
- bts->si_common.data.scramble_list[i] & ~(1 << 9),
- (bts->si_common.data.scramble_list[i] >> 9) & 1,
- VTY_NEWLINE);
- }
-
- vty_out(vty, " codec-support fr");
- if (bts->codec.hr)
- vty_out(vty, " hr");
- if (bts->codec.efr)
- vty_out(vty, " efr");
- if (bts->codec.amr)
- vty_out(vty, " amr");
- vty_out(vty, "%s", VTY_NEWLINE);
-
- config_write_bts_amr(vty, bts, &bts->mr_full, 1);
- config_write_bts_amr(vty, bts, &bts->mr_half, 0);
-
- config_write_bts_gprs(vty, bts);
-
- if (bts->excl_from_rf_lock)
- vty_out(vty, " rf-lock-exclude%s", VTY_NEWLINE);
-
- vty_out(vty, " %sforce-combined-si%s",
- bts->force_combined_si ? "" : "no ", VTY_NEWLINE);
-
- for (i = 0; i < ARRAY_SIZE(bts->depends_on); ++i) {
- int j;
-
- if (bts->depends_on[i] == 0)
- continue;
-
- for (j = 0; j < sizeof(bts->depends_on[i]) * 8; ++j) {
- int bts_nr;
-
- if ((bts->depends_on[i] & (1<<j)) == 0)
- continue;
-
- bts_nr = (i * sizeof(bts->depends_on[i]) * 8) + j;
- vty_out(vty, " depends-on-bts %d%s", bts_nr, VTY_NEWLINE);
- }
- }
- if (bts->pcu_sock_path)
- vty_out(vty, " pcu-socket %s%s", bts->pcu_sock_path, VTY_NEWLINE);
-
- config_write_bts_model(vty, bts);
-}
-
-static int config_write_bts(struct vty *v)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(v);
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &gsmnet->bts_list, list)
- config_write_bts_single(v, bts);
-
- return CMD_SUCCESS;
-}
-
-/* small helper macro for conditional dumping of timer */
-#define VTY_OUT_TIMER(number) \
- if (gsmnet->T##number != GSM_T##number##_DEFAULT) \
- vty_out(vty, " timer t"#number" %u%s", gsmnet->T##number, VTY_NEWLINE)
-
-static int config_write_net(struct vty *vty)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- vty_out(vty, "network%s", VTY_NEWLINE);
- vty_out(vty, " network country code %u%s", gsmnet->country_code, VTY_NEWLINE);
- vty_out(vty, " mobile network code %u%s", gsmnet->network_code, VTY_NEWLINE);
- vty_out(vty, " short name %s%s", gsmnet->name_short, VTY_NEWLINE);
- vty_out(vty, " long name %s%s", gsmnet->name_long, VTY_NEWLINE);
- vty_out(vty, " auth policy %s%s", gsm_auth_policy_name(gsmnet->auth_policy), VTY_NEWLINE);
- if (gsmnet->authorized_reg_str)
- vty_out(vty, " authorized-regexp %s%s", gsmnet->authorized_reg_str, VTY_NEWLINE);
- vty_out(vty, " location updating reject cause %u%s",
- gsmnet->reject_cause, VTY_NEWLINE);
- vty_out(vty, " encryption a5 %u%s", gsmnet->a5_encryption, VTY_NEWLINE);
- vty_out(vty, " authentication %s%s",
- gsmnet->authentication_required ? "required" : "optional",
- VTY_NEWLINE);
- vty_out(vty, " neci %u%s", gsmnet->neci, VTY_NEWLINE);
- vty_out(vty, " paging any use tch %d%s", gsmnet->pag_any_tch, VTY_NEWLINE);
- vty_out(vty, " rrlp mode %s%s", rrlp_mode_name(gsmnet->rrlp.mode),
- VTY_NEWLINE);
- vty_out(vty, " mm info %u%s", gsmnet->send_mm_info, VTY_NEWLINE);
- vty_out(vty, " handover %u%s", gsmnet->handover.active, VTY_NEWLINE);
- vty_out(vty, " handover window rxlev averaging %u%s",
- gsmnet->handover.win_rxlev_avg, VTY_NEWLINE);
- vty_out(vty, " handover window rxqual averaging %u%s",
- gsmnet->handover.win_rxqual_avg, VTY_NEWLINE);
- vty_out(vty, " handover window rxlev neighbor averaging %u%s",
- gsmnet->handover.win_rxlev_avg_neigh, VTY_NEWLINE);
- vty_out(vty, " handover power budget interval %u%s",
- gsmnet->handover.pwr_interval, VTY_NEWLINE);
- vty_out(vty, " handover power budget hysteresis %u%s",
- gsmnet->handover.pwr_hysteresis, VTY_NEWLINE);
- vty_out(vty, " handover maximum distance %u%s",
- gsmnet->handover.max_distance, VTY_NEWLINE);
- VTY_OUT_TIMER(3101);
- VTY_OUT_TIMER(3103);
- VTY_OUT_TIMER(3105);
- VTY_OUT_TIMER(3107);
- VTY_OUT_TIMER(3109);
- VTY_OUT_TIMER(3111);
- VTY_OUT_TIMER(3113);
- VTY_OUT_TIMER(3115);
- VTY_OUT_TIMER(3117);
- VTY_OUT_TIMER(3119);
- VTY_OUT_TIMER(3122);
- VTY_OUT_TIMER(3141);
- vty_out(vty, " dyn_ts_allow_tch_f %d%s",
- gsmnet->dyn_ts_allow_tch_f ? 1 : 0, VTY_NEWLINE);
- if (gsmnet->tz.override != 0) {
- if (gsmnet->tz.dst)
- vty_out(vty, " timezone %d %d %d%s",
- gsmnet->tz.hr, gsmnet->tz.mn, gsmnet->tz.dst,
- VTY_NEWLINE);
- else
- vty_out(vty, " timezone %d %d%s",
- gsmnet->tz.hr, gsmnet->tz.mn, VTY_NEWLINE);
- }
- if (gsmnet->t3212 == 0)
- vty_out(vty, " no periodic location update%s", VTY_NEWLINE);
- else
- vty_out(vty, " periodic location update %u%s",
- gsmnet->t3212 * 6, VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-static void trx_dump_vty(struct vty *vty, struct gsm_bts_trx *trx)
-{
- vty_out(vty, "TRX %u of BTS %u is on ARFCN %u%s",
- trx->nr, trx->bts->nr, trx->arfcn, VTY_NEWLINE);
- vty_out(vty, "Description: %s%s",
- trx->description ? trx->description : "(null)", VTY_NEWLINE);
- vty_out(vty, " RF Nominal Power: %d dBm, reduced by %u dB, "
- "resulting BS power: %d dBm%s",
- trx->nominal_power, trx->max_power_red,
- trx->nominal_power - trx->max_power_red, VTY_NEWLINE);
- vty_out(vty, " NM State: ");
- net_dump_nmstate(vty, &trx->mo.nm_state);
- vty_out(vty, " Baseband Transceiver NM State: ");
- net_dump_nmstate(vty, &trx->bb_transc.mo.nm_state);
- if (is_ipaccess_bts(trx->bts)) {
- vty_out(vty, " ip.access stream ID: 0x%02x%s",
- trx->rsl_tei, VTY_NEWLINE);
- } else {
- vty_out(vty, " E1 Signalling Link:%s", VTY_NEWLINE);
- e1isl_dump_vty(vty, trx->rsl_link);
- }
-}
-
-DEFUN(show_trx,
- show_trx_cmd,
- "show trx [<0-255>] [<0-255>]",
- SHOW_STR "Display information about a TRX\n"
- "BTS Number\n"
- "TRX Number\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_bts *bts = NULL;
- struct gsm_bts_trx *trx;
- int bts_nr, trx_nr;
-
- if (argc >= 1) {
- /* use the BTS number that the user has specified */
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS '%s'%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts = gsm_bts_num(net, bts_nr);
- }
- if (argc >= 2) {
- trx_nr = atoi(argv[1]);
- if (trx_nr >= bts->num_trx) {
- vty_out(vty, "%% can't find TRX '%s'%s", argv[1],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- trx = gsm_bts_trx_num(bts, trx_nr);
- trx_dump_vty(vty, trx);
- return CMD_SUCCESS;
- }
- if (bts) {
- /* print all TRX in this BTS */
- for (trx_nr = 0; trx_nr < bts->num_trx; trx_nr++) {
- trx = gsm_bts_trx_num(bts, trx_nr);
- trx_dump_vty(vty, trx);
- }
- return CMD_SUCCESS;
- }
-
- for (bts_nr = 0; bts_nr < net->num_bts; bts_nr++) {
- bts = gsm_bts_num(net, bts_nr);
- for (trx_nr = 0; trx_nr < bts->num_trx; trx_nr++) {
- trx = gsm_bts_trx_num(bts, trx_nr);
- trx_dump_vty(vty, trx);
- }
- }
-
- return CMD_SUCCESS;
-}
-
-
-static void ts_dump_vty(struct vty *vty, struct gsm_bts_trx_ts *ts)
-{
- vty_out(vty, "BTS %u, TRX %u, Timeslot %u, phys cfg %s, TSC %u",
- ts->trx->bts->nr, ts->trx->nr, ts->nr,
- gsm_pchan_name(ts->pchan), gsm_ts_tsc(ts));
- if (ts->pchan == GSM_PCHAN_TCH_F_PDCH)
- vty_out(vty, " (%s mode)",
- ts->flags & TS_F_PDCH_ACTIVE ? "PDCH" : "TCH/F");
- vty_out(vty, "%s", VTY_NEWLINE);
- vty_out(vty, " NM State: ");
- net_dump_nmstate(vty, &ts->mo.nm_state);
- if (!is_ipaccess_bts(ts->trx->bts))
- vty_out(vty, " E1 Line %u, Timeslot %u, Subslot %u%s",
- ts->e1_link.e1_nr, ts->e1_link.e1_ts,
- ts->e1_link.e1_ts_ss, VTY_NEWLINE);
-}
-
-DEFUN(show_ts,
- show_ts_cmd,
- "show timeslot [<0-255>] [<0-255>] [<0-7>]",
- SHOW_STR "Display information about a TS\n"
- "BTS Number\n" "TRX Number\n" "Timeslot Number\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_bts *bts = NULL;
- struct gsm_bts_trx *trx = NULL;
- struct gsm_bts_trx_ts *ts = NULL;
- int bts_nr, trx_nr, ts_nr;
-
- if (argc >= 1) {
- /* use the BTS number that the user has specified */
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS '%s'%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts = gsm_bts_num(net, bts_nr);
- }
- if (argc >= 2) {
- trx_nr = atoi(argv[1]);
- if (trx_nr >= bts->num_trx) {
- vty_out(vty, "%% can't find TRX '%s'%s", argv[1],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- trx = gsm_bts_trx_num(bts, trx_nr);
- }
- if (argc >= 3) {
- ts_nr = atoi(argv[2]);
- if (ts_nr >= TRX_NR_TS) {
- vty_out(vty, "%% can't find TS '%s'%s", argv[2],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- /* Fully Specified: print and exit */
- ts = &trx->ts[ts_nr];
- ts_dump_vty(vty, ts);
- return CMD_SUCCESS;
- }
-
- if (bts && trx) {
- /* Iterate over all TS in this TRX */
- for (ts_nr = 0; ts_nr < TRX_NR_TS; ts_nr++) {
- ts = &trx->ts[ts_nr];
- ts_dump_vty(vty, ts);
- }
- } else if (bts) {
- /* Iterate over all TRX in this BTS, TS in each TRX */
- for (trx_nr = 0; trx_nr < bts->num_trx; trx_nr++) {
- trx = gsm_bts_trx_num(bts, trx_nr);
- for (ts_nr = 0; ts_nr < TRX_NR_TS; ts_nr++) {
- ts = &trx->ts[ts_nr];
- ts_dump_vty(vty, ts);
- }
- }
- } else {
- /* Iterate over all BTS, TRX in each BTS, TS in each TRX */
- for (bts_nr = 0; bts_nr < net->num_bts; bts_nr++) {
- bts = gsm_bts_num(net, bts_nr);
- for (trx_nr = 0; trx_nr < bts->num_trx; trx_nr++) {
- trx = gsm_bts_trx_num(bts, trx_nr);
- for (ts_nr = 0; ts_nr < TRX_NR_TS; ts_nr++) {
- ts = &trx->ts[ts_nr];
- ts_dump_vty(vty, ts);
- }
- }
- }
- }
-
- return CMD_SUCCESS;
-}
-
-static void subscr_dump_vty(struct vty *vty, struct vlr_subscr *vsub)
-{
- OSMO_ASSERT(vsub);
- if (strlen(vsub->name))
- vty_out(vty, " Name: '%s'%s", vsub->name, VTY_NEWLINE);
- if (strlen(vsub->msisdn))
- vty_out(vty, " Extension: %s%s", vsub->msisdn,
- VTY_NEWLINE);
- if (strlen(vsub->imsi))
- vty_out(vty, " IMSI: %s%s", vsub->imsi, VTY_NEWLINE);
- if (vsub->tmsi != GSM_RESERVED_TMSI)
- vty_out(vty, " TMSI: %08X%s", vsub->tmsi,
- VTY_NEWLINE);
- if (vsub->tmsi_new != GSM_RESERVED_TMSI)
- vty_out(vty, " new TMSI: %08X%s", vsub->tmsi_new,
- VTY_NEWLINE);
-
- vty_out(vty, " Use count: %u%s", vsub->use_count, VTY_NEWLINE);
-}
-
-static void bsc_subscr_dump_vty(struct vty *vty, struct bsc_subscr *bsub)
-{
- if (strlen(bsub->imsi))
- vty_out(vty, " IMSI: %s%s", bsub->imsi, VTY_NEWLINE);
- if (bsub->tmsi != GSM_RESERVED_TMSI)
- vty_out(vty, " TMSI: 0x%08x%s", bsub->tmsi,
- VTY_NEWLINE);
- vty_out(vty, " Use count: %d%s", bsub->use_count, VTY_NEWLINE);
-}
-
-static void meas_rep_dump_uni_vty(struct vty *vty,
- struct gsm_meas_rep_unidir *mru,
- const char *prefix,
- const char *dir)
-{
- vty_out(vty, "%s RXL-FULL-%s: %4d dBm, RXL-SUB-%s: %4d dBm ",
- prefix, dir, rxlev2dbm(mru->full.rx_lev),
- dir, rxlev2dbm(mru->sub.rx_lev));
- vty_out(vty, "RXQ-FULL-%s: %d, RXQ-SUB-%s: %d%s",
- dir, mru->full.rx_qual, dir, mru->sub.rx_qual,
- VTY_NEWLINE);
-}
-
-static void meas_rep_dump_vty(struct vty *vty, struct gsm_meas_rep *mr,
- const char *prefix)
-{
- vty_out(vty, "%sMeasurement Report:%s", prefix, VTY_NEWLINE);
- vty_out(vty, "%s Flags: %s%s%s%s%s", prefix,
- mr->flags & MEAS_REP_F_UL_DTX ? "DTXu " : "",
- mr->flags & MEAS_REP_F_DL_DTX ? "DTXd " : "",
- mr->flags & MEAS_REP_F_FPC ? "FPC " : "",
- mr->flags & MEAS_REP_F_DL_VALID ? " " : "DLinval ",
- VTY_NEWLINE);
- if (mr->flags & MEAS_REP_F_MS_TO)
- vty_out(vty, "%s MS Timing Offset: %d%s", prefix, mr->ms_timing_offset, VTY_NEWLINE);
- if (mr->flags & MEAS_REP_F_MS_L1)
- vty_out(vty, "%s L1 MS Power: %u dBm, Timing Advance: %u%s",
- prefix, mr->ms_l1.pwr, mr->ms_l1.ta, VTY_NEWLINE);
- if (mr->flags & MEAS_REP_F_DL_VALID)
- meas_rep_dump_uni_vty(vty, &mr->dl, prefix, "dl");
- meas_rep_dump_uni_vty(vty, &mr->ul, prefix, "ul");
-}
-
-/* FIXME: move this to libosmogsm */
-static const struct value_string gsm48_cmode_names[] = {
- { GSM48_CMODE_SIGN, "signalling" },
- { GSM48_CMODE_SPEECH_V1, "FR or HR" },
- { GSM48_CMODE_SPEECH_EFR, "EFR" },
- { GSM48_CMODE_SPEECH_AMR, "AMR" },
- { GSM48_CMODE_DATA_14k5, "CSD(14k5)" },
- { GSM48_CMODE_DATA_12k0, "CSD(12k0)" },
- { GSM48_CMODE_DATA_6k0, "CSD(6k0)" },
- { GSM48_CMODE_DATA_3k6, "CSD(3k6)" },
- { 0, NULL }
-};
-
-/* call vty_out() to print a string like " as TCH/H" for dynamic timeslots.
- * Don't do anything if the ts is not dynamic. */
-static void vty_out_dyn_ts_status(struct vty *vty, struct gsm_bts_trx_ts *ts)
-{
- switch (ts->pchan) {
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- if (ts->dyn.pchan_is == ts->dyn.pchan_want)
- vty_out(vty, " as %s",
- gsm_pchan_name(ts->dyn.pchan_is));
- else
- vty_out(vty, " switching %s -> %s",
- gsm_pchan_name(ts->dyn.pchan_is),
- gsm_pchan_name(ts->dyn.pchan_want));
- break;
- case GSM_PCHAN_TCH_F_PDCH:
- if ((ts->flags & TS_F_PDCH_PENDING_MASK) == 0)
- vty_out(vty, " as %s",
- (ts->flags & TS_F_PDCH_ACTIVE)? "PDCH"
- : "TCH/F");
- else
- vty_out(vty, " switching %s -> %s",
- (ts->flags & TS_F_PDCH_ACTIVE)? "PDCH"
- : "TCH/F",
- (ts->flags & TS_F_PDCH_ACT_PENDING)? "PDCH"
- : "TCH/F");
- break;
- default:
- /* no dyn ts */
- break;
- }
-}
-
-static void lchan_dump_full_vty(struct vty *vty, struct gsm_lchan *lchan)
-{
- int idx;
-
- vty_out(vty, "BTS %u, TRX %u, Timeslot %u, Lchan %u: Type %s%s",
- lchan->ts->trx->bts->nr, lchan->ts->trx->nr, lchan->ts->nr,
- lchan->nr, gsm_lchant_name(lchan->type), VTY_NEWLINE);
- /* show dyn TS details, if applicable */
- switch (lchan->ts->pchan) {
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- vty_out(vty, " Osmocom Dyn TS:");
- vty_out_dyn_ts_status(vty, lchan->ts);
- vty_out(vty, VTY_NEWLINE);
- break;
- case GSM_PCHAN_TCH_F_PDCH:
- vty_out(vty, " IPACC Dyn PDCH TS:");
- vty_out_dyn_ts_status(vty, lchan->ts);
- vty_out(vty, VTY_NEWLINE);
- break;
- default:
- /* no dyn ts */
- break;
- }
- vty_out(vty, " Connection: %u, State: %s%s%s%s",
- lchan->conn ? 1: 0,
- gsm_lchans_name(lchan->state),
- lchan->state == LCHAN_S_BROKEN ? " Error reason: " : "",
- lchan->state == LCHAN_S_BROKEN ? lchan->broken_reason : "",
- VTY_NEWLINE);
- vty_out(vty, " BS Power: %u dBm, MS Power: %u dBm%s",
- lchan->ts->trx->nominal_power - lchan->ts->trx->max_power_red
- - lchan->bs_power*2,
- ms_pwr_dbm(lchan->ts->trx->bts->band, lchan->ms_power),
- VTY_NEWLINE);
- vty_out(vty, " Channel Mode / Codec: %s%s",
- get_value_string(gsm48_cmode_names, lchan->tch_mode),
- VTY_NEWLINE);
- if (lchan->conn && lchan->conn->vsub) {
- vty_out(vty, " Subscriber:%s", VTY_NEWLINE);
- subscr_dump_vty(vty, lchan->conn->vsub);
- } else
- vty_out(vty, " No Subscriber%s", VTY_NEWLINE);
- if (is_ipaccess_bts(lchan->ts->trx->bts)) {
- struct in_addr ia;
- ia.s_addr = htonl(lchan->abis_ip.bound_ip);
- vty_out(vty, " Bound IP: %s Port %u RTP_TYPE2=%u CONN_ID=%u%s",
- inet_ntoa(ia), lchan->abis_ip.bound_port,
- lchan->abis_ip.rtp_payload2, lchan->abis_ip.conn_id,
- VTY_NEWLINE);
- }
-
- /* we want to report the last measurement report */
- idx = calc_initial_idx(ARRAY_SIZE(lchan->meas_rep),
- lchan->meas_rep_idx, 1);
- meas_rep_dump_vty(vty, &lchan->meas_rep[idx], " ");
-}
-
-static void lchan_dump_short_vty(struct vty *vty, struct gsm_lchan *lchan)
-{
- struct gsm_meas_rep *mr;
- int idx;
-
- /* we want to report the last measurement report */
- idx = calc_initial_idx(ARRAY_SIZE(lchan->meas_rep),
- lchan->meas_rep_idx, 1);
- mr = &lchan->meas_rep[idx];
-
- vty_out(vty, "BTS %u, TRX %u, Timeslot %u %s",
- lchan->ts->trx->bts->nr, lchan->ts->trx->nr, lchan->ts->nr,
- gsm_pchan_name(lchan->ts->pchan));
- vty_out_dyn_ts_status(vty, lchan->ts);
- vty_out(vty, ", Lchan %u, Type %s, State %s - "
- "L1 MS Power: %u dBm RXL-FULL-dl: %4d dBm RXL-FULL-ul: %4d dBm%s",
- lchan->nr,
- gsm_lchant_name(lchan->type), gsm_lchans_name(lchan->state),
- mr->ms_l1.pwr,
- rxlev2dbm(mr->dl.full.rx_lev),
- rxlev2dbm(mr->ul.full.rx_lev),
- VTY_NEWLINE);
-}
-
-
-static int dump_lchan_trx_ts(struct gsm_bts_trx_ts *ts, struct vty *vty,
- void (*dump_cb)(struct vty *, struct gsm_lchan *))
-{
- int lchan_nr;
- for (lchan_nr = 0; lchan_nr < TS_MAX_LCHAN; lchan_nr++) {
- struct gsm_lchan *lchan = &ts->lchan[lchan_nr];
- if ((lchan->type == GSM_LCHAN_NONE) && (lchan->state == LCHAN_S_NONE))
- continue;
- dump_cb(vty, lchan);
- }
-
- return CMD_SUCCESS;
-}
-
-static int dump_lchan_trx(struct gsm_bts_trx *trx, struct vty *vty,
- void (*dump_cb)(struct vty *, struct gsm_lchan *))
-{
- int ts_nr;
-
- for (ts_nr = 0; ts_nr < TRX_NR_TS; ts_nr++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[ts_nr];
- dump_lchan_trx_ts(ts, vty, dump_cb);
- }
-
- return CMD_SUCCESS;
-}
-
-static int dump_lchan_bts(struct gsm_bts *bts, struct vty *vty,
- void (*dump_cb)(struct vty *, struct gsm_lchan *))
-{
- int trx_nr;
-
- for (trx_nr = 0; trx_nr < bts->num_trx; trx_nr++) {
- struct gsm_bts_trx *trx = gsm_bts_trx_num(bts, trx_nr);
- dump_lchan_trx(trx, vty, dump_cb);
- }
-
- return CMD_SUCCESS;
-}
-
-static int lchan_summary(struct vty *vty, int argc, const char **argv,
- void (*dump_cb)(struct vty *, struct gsm_lchan *))
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_bts *bts;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
- struct gsm_lchan *lchan;
- int bts_nr, trx_nr, ts_nr, lchan_nr;
-
- if (argc >= 1) {
- /* use the BTS number that the user has specified */
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS %s%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts = gsm_bts_num(net, bts_nr);
-
- if (argc == 1)
- return dump_lchan_bts(bts, vty, dump_cb);
- }
- if (argc >= 2) {
- trx_nr = atoi(argv[1]);
- if (trx_nr >= bts->num_trx) {
- vty_out(vty, "%% can't find TRX %s%s", argv[1],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- trx = gsm_bts_trx_num(bts, trx_nr);
-
- if (argc == 2)
- return dump_lchan_trx(trx, vty, dump_cb);
- }
- if (argc >= 3) {
- ts_nr = atoi(argv[2]);
- if (ts_nr >= TRX_NR_TS) {
- vty_out(vty, "%% can't find TS %s%s", argv[2],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- ts = &trx->ts[ts_nr];
-
- if (argc == 3)
- return dump_lchan_trx_ts(ts, vty, dump_cb);
- }
- if (argc >= 4) {
- lchan_nr = atoi(argv[3]);
- if (lchan_nr >= TS_MAX_LCHAN) {
- vty_out(vty, "%% can't find LCHAN %s%s", argv[3],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- lchan = &ts->lchan[lchan_nr];
- dump_cb(vty, lchan);
- return CMD_SUCCESS;
- }
-
-
- for (bts_nr = 0; bts_nr < net->num_bts; bts_nr++) {
- bts = gsm_bts_num(net, bts_nr);
- dump_lchan_bts(bts, vty, dump_cb);
- }
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(show_lchan,
- show_lchan_cmd,
- "show lchan [<0-255>] [<0-255>] [<0-7>] [lchan_nr]",
- SHOW_STR "Display information about a logical channel\n"
- "BTS Number\n" "TRX Number\n" "Timeslot Number\n"
- LCHAN_NR_STR)
-
-{
- return lchan_summary(vty, argc, argv, lchan_dump_full_vty);
-}
-
-DEFUN(show_lchan_summary,
- show_lchan_summary_cmd,
- "show lchan summary [<0-255>] [<0-255>] [<0-7>] [lchan_nr]",
- SHOW_STR "Display information about a logical channel\n"
- "Short summary\n"
- "BTS Number\n" "TRX Number\n" "Timeslot Number\n"
- LCHAN_NR_STR)
-{
- return lchan_summary(vty, argc, argv, lchan_dump_short_vty);
-}
-
-DEFUN(show_subscr_conn,
- show_subscr_conn_cmd,
- "show conns",
- SHOW_STR "Display currently active subscriber connections\n")
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_network *net = gsmnet_from_vty(vty);
- bool no_conns = true;
- unsigned int count = 0;
-
- vty_out(vty, "Active subscriber connections: %s", VTY_NEWLINE);
-
- llist_for_each_entry(conn, &net->subscr_conns, entry) {
- vty_out(vty, "conn nr #%u:%s", count, VTY_NEWLINE);
- lchan_dump_full_vty(vty, conn->lchan);
- no_conns = false;
- count++;
- }
-
- if (no_conns)
- vty_out(vty, "None%s", VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(handover_subscr_conn,
- handover_subscr_conn_cmd,
- "handover <0-255> <0-255> <0-7> LCHAN_NR <0-255>",
- "Handover subscriber connection to other BTS\n"
- "BTS Number (current)\n" "TRX Number\n" "Timeslot Number\n"
- LCHAN_NR_STR "BTS Number (new)\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_subscriber_connection *conn;
- struct gsm_bts *bts;
- struct gsm_bts *new_bts = NULL;
- unsigned int bts_nr = atoi(argv[0]);
- unsigned int trx_nr = atoi(argv[1]);
- unsigned int ts_nr = atoi(argv[2]);
- unsigned int ss_nr = atoi(argv[3]);
- unsigned int bts_nr_new = atoi(argv[4]);
-
- /* Lookup the BTS where we want to handover to */
- llist_for_each_entry(bts, &net->bts_list, list) {
- if (bts->nr == bts_nr_new) {
- new_bts = bts;
- break;
- }
- }
-
- if (!new_bts) {
- vty_out(vty, "Unable to trigger handover,"
- "specified bts #%u does not exist %s", bts_nr_new,
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* Find the connection/lchan that we want to handover */
- llist_for_each_entry(conn, &net->subscr_conns, entry) {
- if (conn->bts->nr == bts_nr &&
- conn->lchan->ts->trx->nr == trx_nr &&
- conn->lchan->ts->nr == ts_nr && conn->lchan->nr == ss_nr) {
- vty_out(vty, "starting handover for lchan %s...%s",
- conn->lchan->name, VTY_NEWLINE);
- lchan_dump_full_vty(vty, conn->lchan);
- bsc_handover_start(conn->lchan, new_bts);
- return CMD_SUCCESS;
- }
- }
-
- vty_out(vty, "Unable to trigger handover,"
- "specified connection (bts=%u,trx=%u,ts=%u,ss=%u) does not exist%s",
- bts_nr, trx_nr, ts_nr, ss_nr, VTY_NEWLINE);
-
- return CMD_WARNING;
-}
-
-static void paging_dump_vty(struct vty *vty, struct gsm_paging_request *pag)
-{
- vty_out(vty, "Paging on BTS %u%s", pag->bts->nr, VTY_NEWLINE);
- bsc_subscr_dump_vty(vty, pag->bsub);
-}
-
-static void bts_paging_dump_vty(struct vty *vty, struct gsm_bts *bts)
-{
- struct gsm_paging_request *pag;
-
- if (!bts->paging.bts)
- return;
-
- llist_for_each_entry(pag, &bts->paging.pending_requests, entry)
- paging_dump_vty(vty, pag);
-}
-
-DEFUN(show_paging,
- show_paging_cmd,
- "show paging [<0-255>]",
- SHOW_STR "Display information about paging reuqests of a BTS\n"
- "BTS Number\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_bts *bts;
- int bts_nr;
-
- if (argc >= 1) {
- /* use the BTS number that the user has specified */
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS %s%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts = gsm_bts_num(net, bts_nr);
- bts_paging_dump_vty(vty, bts);
-
- return CMD_SUCCESS;
- }
- for (bts_nr = 0; bts_nr < net->num_bts; bts_nr++) {
- bts = gsm_bts_num(net, bts_nr);
- bts_paging_dump_vty(vty, bts);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_paging_group,
- show_paging_group_cmd,
- "show paging-group <0-255> IMSI",
- SHOW_STR "Display the paging group\n"
- "BTS Number\n" "IMSI\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
- struct gsm_bts *bts;
- unsigned int page_group;
- int bts_nr = atoi(argv[0]);
-
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS %s%s", argv[0], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts = gsm_bts_num(net, bts_nr);
- if (!bts) {
- vty_out(vty, "%% can't find BTS %s%s", argv[0], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- page_group = gsm0502_calc_paging_group(&bts->si_common.chan_desc,
- str_to_imsi(argv[1]));
- vty_out(vty, "%%Paging group for IMSI %" PRIu64 " on BTS #%d is %u%s",
- str_to_imsi(argv[1]), bts->nr,
- page_group, VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_neci,
- cfg_net_neci_cmd,
- "neci (0|1)",
- "New Establish Cause Indication\n"
- "Don't set the NECI bit\n" "Set the NECI bit\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->neci = atoi(argv[0]);
- gsm_net_update_ctype(gsmnet);
- return CMD_SUCCESS;
-}
-
-#define HANDOVER_STR "Handover Options\n"
-
-DEFUN(cfg_net_handover, cfg_net_handover_cmd,
- "handover (0|1)",
- HANDOVER_STR
- "Don't perform in-call handover\n"
- "Perform in-call handover\n")
-{
- int enable = atoi(argv[0]);
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- if (enable && ipacc_rtp_direct) {
- vty_out(vty, "%% Cannot enable handover unless RTP Proxy mode "
- "is enabled by using the -P command line option%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- gsmnet->handover.active = enable;
-
- return CMD_SUCCESS;
-}
-
-#define HO_WIN_STR HANDOVER_STR "Measurement Window\n"
-#define HO_WIN_RXLEV_STR HO_WIN_STR "Received Level Averaging\n"
-#define HO_WIN_RXQUAL_STR HO_WIN_STR "Received Quality Averaging\n"
-#define HO_PBUDGET_STR HANDOVER_STR "Power Budget\n"
-#define HO_AVG_COUNT_STR "Amount to use for Averaging\n"
-
-DEFUN(cfg_net_ho_win_rxlev_avg, cfg_net_ho_win_rxlev_avg_cmd,
- "handover window rxlev averaging <1-10>",
- HO_WIN_RXLEV_STR
- "How many RxLev measurements are used for averaging\n"
- HO_AVG_COUNT_STR)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.win_rxlev_avg = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ho_win_rxqual_avg, cfg_net_ho_win_rxqual_avg_cmd,
- "handover window rxqual averaging <1-10>",
- HO_WIN_RXQUAL_STR
- "How many RxQual measurements are used for averaging\n"
- HO_AVG_COUNT_STR)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.win_rxqual_avg = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ho_win_rxlev_neigh_avg, cfg_net_ho_win_rxlev_avg_neigh_cmd,
- "handover window rxlev neighbor averaging <1-10>",
- HO_WIN_RXLEV_STR "Neighbor\n"
- "How many RxQual measurements are used for averaging\n"
- HO_AVG_COUNT_STR)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.win_rxlev_avg_neigh = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ho_pwr_interval, cfg_net_ho_pwr_interval_cmd,
- "handover power budget interval <1-99>",
- HO_PBUDGET_STR
- "How often to check if we have a better cell (SACCH frames)\n"
- "Interval\n" "Number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.pwr_interval = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ho_pwr_hysteresis, cfg_net_ho_pwr_hysteresis_cmd,
- "handover power budget hysteresis <0-999>",
- HO_PBUDGET_STR
- "How many dB does a neighbor to be stronger to become a HO candidate\n"
- "Hysteresis\n" "Number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.pwr_hysteresis = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ho_max_distance, cfg_net_ho_max_distance_cmd,
- "handover maximum distance <0-9999>",
- HANDOVER_STR
- "How big is the maximum timing advance before HO is forced\n"
- "Distance\n" "Number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->handover.max_distance = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_pag_any_tch,
- cfg_net_pag_any_tch_cmd,
- "paging any use tch (0|1)",
- "Assign a TCH when receiving a Paging Any request\n"
- "Any Channel\n" "Use\n" "TCH\n"
- "Do not use TCH for Paging Request Any\n"
- "Do use TCH for Paging Request Any\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->pag_any_tch = atoi(argv[0]);
- gsm_net_update_ctype(gsmnet);
- return CMD_SUCCESS;
-}
-
-#define DEFAULT_TIMER(number) GSM_T##number##_DEFAULT
-/* Add another expansion so that DEFAULT_TIMER() becomes its value */
-#define EXPAND_AND_STRINGIFY(x) OSMO_STRINGIFY(x)
-
-#define DECLARE_TIMER(number, doc) \
- DEFUN(cfg_net_T##number, \
- cfg_net_T##number##_cmd, \
- "timer t" #number " (default|<1-65535>)", \
- "Configure GSM Timers\n" \
- doc " (default: " EXPAND_AND_STRINGIFY(DEFAULT_TIMER(number)) " seconds)\n" \
- "Set to default timer value" \
- " (" EXPAND_AND_STRINGIFY(DEFAULT_TIMER(number)) " seconds)\n" \
- "Timer Value in seconds\n") \
-{ \
- struct gsm_network *gsmnet = gsmnet_from_vty(vty); \
- int value; \
- if (strcmp(argv[0], "default") == 0) \
- value = DEFAULT_TIMER(number); \
- else \
- value = atoi(argv[0]); \
- \
- gsmnet->T##number = value; \
- return CMD_SUCCESS; \
-}
-
-DECLARE_TIMER(3101, "Set the timeout value for IMMEDIATE ASSIGNMENT")
-DECLARE_TIMER(3103, "Set the timeout value for HANDOVER")
-DECLARE_TIMER(3105, "Set the timer for repetition of PHYSICAL INFORMATION")
-DECLARE_TIMER(3107, "Currently not used")
-DECLARE_TIMER(3109, "Set the RSL SACCH deactivation timeout")
-DECLARE_TIMER(3111, "Set the RSL timeout to wait before releasing the RF Channel")
-DECLARE_TIMER(3113, "Set the time to try paging a subscriber")
-DECLARE_TIMER(3115, "Currently not used")
-DECLARE_TIMER(3117, "Currently not used")
-DECLARE_TIMER(3119, "Currently not used")
-DECLARE_TIMER(3122, "Waiting time (seconds) after IMM ASS REJECT")
-DECLARE_TIMER(3141, "Currently not used")
-
-DEFUN_DEPRECATED(cfg_net_dtx,
- cfg_net_dtx_cmd,
- "dtx-used (0|1)",
- ".HIDDEN\n""Obsolete\n""Obsolete\n")
-{
- vty_out(vty, "%% 'dtx-used' is now deprecated: use dtx * "
- "configuration options of BTS instead%s", VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-/* per-BTS configuration */
-DEFUN(cfg_bts,
- cfg_bts_cmd,
- "bts <0-255>",
- "Select a BTS to configure\n"
- "BTS Number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- int bts_nr = atoi(argv[0]);
- struct gsm_bts *bts;
-
- if (bts_nr > gsmnet->num_bts) {
- vty_out(vty, "%% The next unused BTS number is %u%s",
- gsmnet->num_bts, VTY_NEWLINE);
- return CMD_WARNING;
- } else if (bts_nr == gsmnet->num_bts) {
- /* allocate a new one */
- bts = gsm_bts_alloc_register(gsmnet, GSM_BTS_TYPE_UNKNOWN,
- HARDCODED_BSIC);
- } else
- bts = gsm_bts_num(gsmnet, bts_nr);
-
- if (!bts) {
- vty_out(vty, "%% Unable to allocate BTS %u%s",
- gsmnet->num_bts, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty->index = bts;
- vty->index_sub = &bts->description;
- vty->node = BTS_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_type,
- cfg_bts_type_cmd,
- "type TYPE", /* dynamically created */
- "Set the BTS type\n" "Type\n")
-{
- struct gsm_bts *bts = vty->index;
- int rc;
-
- rc = gsm_set_bts_type(bts, str2btstype(argv[0]));
- if (rc < 0)
- return CMD_WARNING;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_band,
- cfg_bts_band_cmd,
- "band BAND",
- "Set the frequency band of this BTS\n" "Frequency band\n")
-{
- struct gsm_bts *bts = vty->index;
- int band = gsm_band_parse(argv[0]);
-
- if (band < 0) {
- vty_out(vty, "%% BAND %d is not a valid GSM band%s",
- band, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->band = band;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_dtxu, cfg_bts_dtxu_cmd, "dtx uplink [force]",
- "Configure discontinuous transmission\n"
- "Enable Uplink DTX for this BTS\n"
- "MS 'shall' use DTXu instead of 'may' use (might not be supported by "
- "older phones).\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->dtxu = (argc > 0) ? GSM48_DTX_SHALL_BE_USED : GSM48_DTX_MAY_BE_USED;
- if (!is_ipaccess_bts(bts))
- vty_out(vty, "%% DTX enabled on non-IP BTS: this configuration "
- "neither supported nor tested!%s", VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_no_dtxu, cfg_bts_no_dtxu_cmd, "no dtx uplink",
- NO_STR
- "Configure discontinuous transmission\n"
- "Disable Uplink DTX for this BTS\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->dtxu = GSM48_DTX_SHALL_NOT_BE_USED;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_dtxd, cfg_bts_dtxd_cmd, "dtx downlink",
- "Configure discontinuous transmission\n"
- "Enable Downlink DTX for this BTS\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->dtxd = true;
- if (!is_ipaccess_bts(bts))
- vty_out(vty, "%% DTX enabled on non-IP BTS: this configuration "
- "neither supported nor tested!%s", VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_no_dtxd, cfg_bts_no_dtxd_cmd, "no dtx downlink",
- NO_STR
- "Configure discontinuous transmission\n"
- "Disable Downlink DTX for this BTS\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->dtxd = false;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_ci,
- cfg_bts_ci_cmd,
- "cell_identity <0-65535>",
- "Set the Cell identity of this BTS\n" "Cell Identity\n")
-{
- struct gsm_bts *bts = vty->index;
- int ci = atoi(argv[0]);
-
- if (ci < 0 || ci > 0xffff) {
- vty_out(vty, "%% CI %d is not in the valid range (0-65535)%s",
- ci, VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts->cell_identity = ci;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_lac,
- cfg_bts_lac_cmd,
- "location_area_code <0-65535>",
- "Set the Location Area Code (LAC) of this BTS\n" "LAC\n")
-{
- struct gsm_bts *bts = vty->index;
- int lac = atoi(argv[0]);
-
- if (lac < 0 || lac > 0xffff) {
- vty_out(vty, "%% LAC %d is not in the valid range (0-65535)%s",
- lac, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (lac == GSM_LAC_RESERVED_DETACHED || lac == GSM_LAC_RESERVED_ALL_BTS) {
- vty_out(vty, "%% LAC %d is reserved by GSM 04.08%s",
- lac, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->location_area_code = lac;
-
- return CMD_SUCCESS;
-}
-
-
-/* compatibility wrapper for old config files */
-DEFUN_HIDDEN(cfg_bts_tsc,
- cfg_bts_tsc_cmd,
- "training_sequence_code <0-7>",
- "Set the Training Sequence Code (TSC) of this BTS\n" "TSC\n")
-{
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_bsic,
- cfg_bts_bsic_cmd,
- "base_station_id_code <0-63>",
- "Set the Base Station Identity Code (BSIC) of this BTS\n"
- "BSIC of this BTS\n")
-{
- struct gsm_bts *bts = vty->index;
- int bsic = atoi(argv[0]);
-
- if (bsic < 0 || bsic > 0x3f) {
- vty_out(vty, "%% BSIC %d is not in the valid range (0-255)%s",
- bsic, VTY_NEWLINE);
- return CMD_WARNING;
- }
- bts->bsic = bsic;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_unit_id,
- cfg_bts_unit_id_cmd,
- "ip.access unit_id <0-65534> <0-255>",
- "Abis/IP specific options\n"
- "Set the IPA BTS Unit ID\n"
- "Unit ID (Site)\n"
- "Unit ID (BTS)\n")
-{
- struct gsm_bts *bts = vty->index;
- int site_id = atoi(argv[0]);
- int bts_id = atoi(argv[1]);
-
- if (!is_ipaccess_bts(bts)) {
- vty_out(vty, "%% BTS is not of ip.access type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->ip_access.site_id = site_id;
- bts->ip_access.bts_id = bts_id;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rsl_ip,
- cfg_bts_rsl_ip_cmd,
- "ip.access rsl-ip A.B.C.D",
- "Abis/IP specific options\n"
- "Set the IPA RSL IP Address of the BSC\n"
- "Destination IP address for RSL connection\n")
-{
- struct gsm_bts *bts = vty->index;
- struct in_addr ia;
-
- if (!is_ipaccess_bts(bts)) {
- vty_out(vty, "%% BTS is not of ip.access type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- inet_aton(argv[0], &ia);
- bts->ip_access.rsl_ip = ntohl(ia.s_addr);
-
- return CMD_SUCCESS;
-}
-
-#define NOKIA_STR "Nokia *Site related commands\n"
-
-DEFUN(cfg_bts_nokia_site_skip_reset,
- cfg_bts_nokia_site_skip_reset_cmd,
- "nokia_site skip-reset (0|1)",
- NOKIA_STR
- "Skip the reset step during bootstrap process of this BTS\n"
- "Do NOT skip the reset\n" "Skip the reset\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->type != GSM_BTS_TYPE_NOKIA_SITE) {
- vty_out(vty, "%% BTS is not of Nokia *Site type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->nokia.skip_reset = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_nokia_site_no_loc_rel_cnf,
- cfg_bts_nokia_site_no_loc_rel_cnf_cmd,
- "nokia_site no-local-rel-conf (0|1)",
- NOKIA_STR
- "Do not wait for RELease CONFirm message when releasing channel locally\n"
- "Wait for RELease CONFirm\n" "Do not wait for RELease CONFirm\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (!is_nokia_bts(bts)) {
- vty_out(vty, "%% BTS is not of Nokia *Site type%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->nokia.no_loc_rel_cnf = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_nokia_site_bts_reset_timer_cnf,
- cfg_bts_nokia_site_bts_reset_timer_cnf_cmd,
- "nokia_site bts-reset-timer <15-100>",
- NOKIA_STR
- "The amount of time (in sec.) between BTS_RESET is sent,\n"
- "and the BTS is being bootstrapped.\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (!is_nokia_bts(bts)) {
- vty_out(vty, "%% BTS is not of Nokia *Site type%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->nokia.bts_reset_timer_cnf = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-#define OML_STR "Organization & Maintenance Link\n"
-#define IPA_STR "A-bis/IP Specific Options\n"
-
-DEFUN(cfg_bts_stream_id,
- cfg_bts_stream_id_cmd,
- "oml ip.access stream_id <0-255> line E1_LINE",
- OML_STR IPA_STR
- "Set the ip.access Stream ID of the OML link of this BTS\n"
- "Stream Identifier\n" "Virtual E1 Line Number\n" "Virtual E1 Line Number\n")
-{
- struct gsm_bts *bts = vty->index;
- int stream_id = atoi(argv[0]), linenr = atoi(argv[1]);
-
- if (!is_ipaccess_bts(bts)) {
- vty_out(vty, "%% BTS is not of ip.access type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->oml_tei = stream_id;
- /* This is used by e1inp_bind_ops callback for each BTS model. */
- bts->oml_e1_link.e1_nr = linenr;
-
- return CMD_SUCCESS;
-}
-
-#define OML_E1_STR OML_STR "OML E1/T1 Configuration\n"
-
-DEFUN(cfg_bts_oml_e1,
- cfg_bts_oml_e1_cmd,
- "oml e1 line E1_LINE timeslot <1-31> sub-slot (0|1|2|3|full)",
- OML_E1_STR
- "E1/T1 line number to be used for OML\n"
- "E1/T1 line number to be used for OML\n"
- "E1/T1 timeslot to be used for OML\n"
- "E1/T1 timeslot to be used for OML\n"
- "E1/T1 sub-slot to be used for OML\n"
- "Use E1/T1 sub-slot 0\n"
- "Use E1/T1 sub-slot 1\n"
- "Use E1/T1 sub-slot 2\n"
- "Use E1/T1 sub-slot 3\n"
- "Use full E1 slot 3\n"
- )
-{
- struct gsm_bts *bts = vty->index;
-
- parse_e1_link(&bts->oml_e1_link, argv[0], argv[1], argv[2]);
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(cfg_bts_oml_e1_tei,
- cfg_bts_oml_e1_tei_cmd,
- "oml e1 tei <0-63>",
- OML_E1_STR
- "Set the TEI to be used for OML\n"
- "TEI Number\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->oml_tei = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_challoc, cfg_bts_challoc_cmd,
- "channel allocator (ascending|descending)",
- "Channnel Allocator\n" "Channel Allocator\n"
- "Allocate Timeslots and Transceivers in ascending order\n"
- "Allocate Timeslots and Transceivers in descending order\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (!strcmp(argv[0], "ascending"))
- bts->chan_alloc_reverse = 0;
- else
- bts->chan_alloc_reverse = 1;
-
- return CMD_SUCCESS;
-}
-
-#define RACH_STR "Random Access Control Channel\n"
-
-DEFUN(cfg_bts_rach_tx_integer,
- cfg_bts_rach_tx_integer_cmd,
- "rach tx integer <0-15>",
- RACH_STR
- "Set the raw tx integer value in RACH Control parameters IE\n"
- "Set the raw tx integer value in RACH Control parameters IE\n"
- "Raw tx integer value in RACH Control parameters IE\n")
-{
- struct gsm_bts *bts = vty->index;
- bts->si_common.rach_control.tx_integer = atoi(argv[0]) & 0xf;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rach_max_trans,
- cfg_bts_rach_max_trans_cmd,
- "rach max transmission (1|2|4|7)",
- RACH_STR
- "Set the maximum number of RACH burst transmissions\n"
- "Set the maximum number of RACH burst transmissions\n"
- "Maximum number of 1 RACH burst transmissions\n"
- "Maximum number of 2 RACH burst transmissions\n"
- "Maximum number of 4 RACH burst transmissions\n"
- "Maximum number of 7 RACH burst transmissions\n")
-{
- struct gsm_bts *bts = vty->index;
- bts->si_common.rach_control.max_trans = rach_max_trans_val2raw(atoi(argv[0]));
- return CMD_SUCCESS;
-}
-
-#define CD_STR "Channel Description\n"
-
-DEFUN(cfg_bts_chan_desc_att,
- cfg_bts_chan_desc_att_cmd,
- "channel-descrption attach (0|1)",
- CD_STR
- "Set if attachment is required\n"
- "Attachment is NOT required\n"
- "Attachment is required (standard)\n")
-{
- struct gsm_bts *bts = vty->index;
- bts->si_common.chan_desc.att = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_chan_desc_bs_pa_mfrms,
- cfg_bts_chan_desc_bs_pa_mfrms_cmd,
- "channel-descrption bs-pa-mfrms <2-9>",
- CD_STR
- "Set number of multiframe periods for paging groups\n"
- "Number of multiframe periods for paging groups\n")
-{
- struct gsm_bts *bts = vty->index;
- int bs_pa_mfrms = atoi(argv[0]);
-
- bts->si_common.chan_desc.bs_pa_mfrms = bs_pa_mfrms - 2;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_chan_desc_bs_ag_blks_res,
- cfg_bts_chan_desc_bs_ag_blks_res_cmd,
- "channel-descrption bs-ag-blks-res <0-7>",
- CD_STR
- "Set number of blocks reserved for access grant\n"
- "Number of blocks reserved for access grant\n")
-{
- struct gsm_bts *bts = vty->index;
- int bs_ag_blks_res = atoi(argv[0]);
-
- bts->si_common.chan_desc.bs_ag_blks_res = bs_ag_blks_res;
- return CMD_SUCCESS;
-}
-
-#define NM_STR "Network Management\n"
-
-DEFUN(cfg_bts_rach_nm_b_thresh,
- cfg_bts_rach_nm_b_thresh_cmd,
- "rach nm busy threshold <0-255>",
- RACH_STR NM_STR
- "Set the NM Busy Threshold\n"
- "Set the NM Busy Threshold\n"
- "NM Busy Threshold in dB")
-{
- struct gsm_bts *bts = vty->index;
- bts->rach_b_thresh = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rach_nm_ldavg,
- cfg_bts_rach_nm_ldavg_cmd,
- "rach nm load average <0-65535>",
- RACH_STR NM_STR
- "Set the NM Loadaverage Slots value\n"
- "Set the NM Loadaverage Slots value\n"
- "NM Loadaverage Slots value\n")
-{
- struct gsm_bts *bts = vty->index;
- bts->rach_ldavg_slots = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_cell_barred, cfg_bts_cell_barred_cmd,
- "cell barred (0|1)",
- "Should this cell be barred from access?\n"
- "Should this cell be barred from access?\n"
- "Cell should NOT be barred\n"
- "Cell should be barred\n")
-
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.rach_control.cell_bar = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rach_ec_allowed, cfg_bts_rach_ec_allowed_cmd,
- "rach emergency call allowed (0|1)",
- RACH_STR
- "Should this cell allow emergency calls?\n"
- "Should this cell allow emergency calls?\n"
- "Should this cell allow emergency calls?\n"
- "Do NOT allow emergency calls\n"
- "Allow emergency calls\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (atoi(argv[0]) == 0)
- bts->si_common.rach_control.t2 |= 0x4;
- else
- bts->si_common.rach_control.t2 &= ~0x4;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rach_ac_class, cfg_bts_rach_ac_class_cmd,
- "rach access-control-class (0|1|2|3|4|5|6|7|8|9|11|12|13|14|15) (barred|allowed)",
- RACH_STR
- "Set access control class\n"
- "Access control class 0\n"
- "Access control class 1\n"
- "Access control class 2\n"
- "Access control class 3\n"
- "Access control class 4\n"
- "Access control class 5\n"
- "Access control class 6\n"
- "Access control class 7\n"
- "Access control class 8\n"
- "Access control class 9\n"
- "Access control class 11 for PLMN use\n"
- "Access control class 12 for security services\n"
- "Access control class 13 for public utilities (e.g. water/gas suppliers)\n"
- "Access control class 14 for emergency services\n"
- "Access control class 15 for PLMN staff\n"
- "barred to use access control class\n"
- "allowed to use access control class\n")
-{
- struct gsm_bts *bts = vty->index;
-
- uint8_t control_class;
- uint8_t allowed = 0;
-
- if (strcmp(argv[1], "allowed") == 0)
- allowed = 1;
-
- control_class = atoi(argv[0]);
- if (control_class < 8)
- if (allowed)
- bts->si_common.rach_control.t3 &= ~(0x1 << control_class);
- else
- bts->si_common.rach_control.t3 |= (0x1 << control_class);
- else
- if (allowed)
- bts->si_common.rach_control.t2 &= ~(0x1 << (control_class - 8));
- else
- bts->si_common.rach_control.t2 |= (0x1 << (control_class - 8));
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_ms_max_power, cfg_bts_ms_max_power_cmd,
- "ms max power <0-40>",
- "MS Options\n"
- "Maximum transmit power of the MS\n"
- "Maximum transmit power of the MS\n"
- "Maximum transmit power of the MS in dBm")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->ms_max_power = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-#define CELL_STR "Cell Parameters\n"
-
-DEFUN(cfg_bts_cell_resel_hyst, cfg_bts_cell_resel_hyst_cmd,
- "cell reselection hysteresis <0-14>",
- CELL_STR "Cell re-selection parameters\n"
- "Cell Re-Selection Hysteresis in dB\n"
- "Cell Re-Selection Hysteresis in dB")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_sel_par.cell_resel_hyst = atoi(argv[0])/2;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_rxlev_acc_min, cfg_bts_rxlev_acc_min_cmd,
- "rxlev access min <0-63>",
- "Minimum RxLev needed for cell access\n"
- "Minimum RxLev needed for cell access\n"
- "Minimum RxLev needed for cell access\n"
- "Minimum RxLev needed for cell access (better than -110dBm)")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_sel_par.rxlev_acc_min = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_cell_bar_qualify, cfg_bts_cell_bar_qualify_cmd,
- "cell bar qualify (0|1)",
- CELL_STR "Cell Bar Qualify\n" "Cell Bar Qualify\n"
- "Set CBQ to 0\n" "Set CBQ to 1\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.cbq = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_cell_resel_ofs, cfg_bts_cell_resel_ofs_cmd,
- "cell reselection offset <0-126>",
- CELL_STR "Cell Re-Selection Parameters\n"
- "Cell Re-Selection Offset (CRO) in dB\n"
- "Cell Re-Selection Offset (CRO) in dB\n"
- )
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.cell_resel_off = atoi(argv[0])/2;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_temp_ofs, cfg_bts_temp_ofs_cmd,
- "temporary offset <0-60>",
- "Cell selection temporary negative offset\n"
- "Cell selection temporary negative offset\n"
- "Cell selection temporary negative offset in dB")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.temp_offs = atoi(argv[0])/10;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_temp_ofs_inf, cfg_bts_temp_ofs_inf_cmd,
- "temporary offset infinite",
- "Cell selection temporary negative offset\n"
- "Cell selection temporary negative offset\n"
- "Sets cell selection temporary negative offset to infinity")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.temp_offs = 7;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_penalty_time, cfg_bts_penalty_time_cmd,
- "penalty time <20-620>",
- "Cell selection penalty time\n"
- "Cell selection penalty time\n"
- "Cell selection penalty time in seconds (by 20s increments)\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.penalty_time = (atoi(argv[0])-20)/20;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_penalty_time_rsvd, cfg_bts_penalty_time_rsvd_cmd,
- "penalty time reserved",
- "Cell selection penalty time\n"
- "Cell selection penalty time\n"
- "Set cell selection penalty time to reserved value 31, "
- "(indicate that CELL_RESELECT_OFFSET is subtracted from C2 "
- "and TEMPORARY_OFFSET is ignored)")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->si_common.cell_ro_sel_par.present = 1;
- bts->si_common.cell_ro_sel_par.penalty_time = 31;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_radio_link_timeout, cfg_bts_radio_link_timeout_cmd,
- "radio-link-timeout <4-64>",
- "Radio link timeout criterion (BTS side)\n"
- "Radio link timeout value (lost SACCH block)\n")
-{
- struct gsm_bts *bts = vty->index;
-
- gsm_bts_set_radio_link_timeout(bts, atoi(argv[0]));
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_radio_link_timeout_inf, cfg_bts_radio_link_timeout_inf_cmd,
- "radio-link-timeout infinite",
- "Radio link timeout criterion (BTS side)\n"
- "Infinite Radio link timeout value (use only for BTS RF testing)\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->type != GSM_BTS_TYPE_OSMOBTS) {
- vty_out(vty, "%% infinite radio link timeout not supported by this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty_out(vty, "%% INFINITE RADIO LINK TIMEOUT, USE ONLY FOR BTS RF TESTING%s", VTY_NEWLINE);
- gsm_bts_set_radio_link_timeout(bts, -1);
-
- return CMD_SUCCESS;
-}
-
-#define GPRS_TEXT "GPRS Packet Network\n"
-
-DEFUN(cfg_bts_prs_bvci, cfg_bts_gprs_bvci_cmd,
- "gprs cell bvci <2-65535>",
- GPRS_TEXT
- "GPRS Cell Settings\n"
- "GPRS BSSGP VC Identifier\n"
- "GPRS BSSGP VC Identifier")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.cell.bvci = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_nsei, cfg_bts_gprs_nsei_cmd,
- "gprs nsei <0-65535>",
- GPRS_TEXT
- "GPRS NS Entity Identifier\n"
- "GPRS NS Entity Identifier")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.nse.nsei = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-#define NSVC_TEXT "Network Service Virtual Connection (NS-VC)\n" \
- "NSVC Logical Number\n"
-
-DEFUN(cfg_bts_gprs_nsvci, cfg_bts_gprs_nsvci_cmd,
- "gprs nsvc <0-1> nsvci <0-65535>",
- GPRS_TEXT NSVC_TEXT
- "NS Virtual Connection Identifier\n"
- "GPRS NS VC Identifier")
-{
- struct gsm_bts *bts = vty->index;
- int idx = atoi(argv[0]);
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.nsvc[idx].nsvci = atoi(argv[1]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_nsvc_lport, cfg_bts_gprs_nsvc_lport_cmd,
- "gprs nsvc <0-1> local udp port <0-65535>",
- GPRS_TEXT NSVC_TEXT
- "GPRS NS Local UDP Port\n"
- "GPRS NS Local UDP Port\n"
- "GPRS NS Local UDP Port\n"
- "GPRS NS Local UDP Port Number\n")
-{
- struct gsm_bts *bts = vty->index;
- int idx = atoi(argv[0]);
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.nsvc[idx].local_port = atoi(argv[1]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_nsvc_rport, cfg_bts_gprs_nsvc_rport_cmd,
- "gprs nsvc <0-1> remote udp port <0-65535>",
- GPRS_TEXT NSVC_TEXT
- "GPRS NS Remote UDP Port\n"
- "GPRS NS Remote UDP Port\n"
- "GPRS NS Remote UDP Port\n"
- "GPRS NS Remote UDP Port Number\n")
-{
- struct gsm_bts *bts = vty->index;
- int idx = atoi(argv[0]);
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.nsvc[idx].remote_port = atoi(argv[1]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_nsvc_rip, cfg_bts_gprs_nsvc_rip_cmd,
- "gprs nsvc <0-1> remote ip A.B.C.D",
- GPRS_TEXT NSVC_TEXT
- "GPRS NS Remote IP Address\n"
- "GPRS NS Remote IP Address\n"
- "GPRS NS Remote IP Address\n")
-{
- struct gsm_bts *bts = vty->index;
- int idx = atoi(argv[0]);
- struct in_addr ia;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- inet_aton(argv[1], &ia);
- bts->gprs.nsvc[idx].remote_ip = ntohl(ia.s_addr);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_pag_free, cfg_bts_pag_free_cmd,
- "paging free <-1-1024>",
- "Paging options\n"
- "Only page when having a certain amount of free slots\n"
- "amount of required free paging slots. -1 to disable\n")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->paging.free_chans_need = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_ns_timer, cfg_bts_gprs_ns_timer_cmd,
- "gprs ns timer " NS_TIMERS " <0-255>",
- GPRS_TEXT "Network Service\n"
- "Network Service Timer\n"
- NS_TIMERS_HELP "Timer Value\n")
-{
- struct gsm_bts *bts = vty->index;
- int idx = get_string_value(gprs_ns_timer_strs, argv[0]);
- int val = atoi(argv[1]);
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (idx < 0 || idx >= ARRAY_SIZE(bts->gprs.nse.timer))
- return CMD_WARNING;
-
- bts->gprs.nse.timer[idx] = val;
-
- return CMD_SUCCESS;
-}
-
-#define BSSGP_TIMERS "(blocking-timer|blocking-retries|unblocking-retries|reset-timer|reset-retries|suspend-timer|suspend-retries|resume-timer|resume-retries|capability-update-timer|capability-update-retries)"
-#define BSSGP_TIMERS_HELP \
- "Tbvc-block timeout\n" \
- "Tbvc-block retries\n" \
- "Tbvc-unblock retries\n" \
- "Tbvcc-reset timeout\n" \
- "Tbvc-reset retries\n" \
- "Tbvc-suspend timeout\n" \
- "Tbvc-suspend retries\n" \
- "Tbvc-resume timeout\n" \
- "Tbvc-resume retries\n" \
- "Tbvc-capa-update timeout\n" \
- "Tbvc-capa-update retries\n"
-
-DEFUN(cfg_bts_gprs_cell_timer, cfg_bts_gprs_cell_timer_cmd,
- "gprs cell timer " BSSGP_TIMERS " <0-255>",
- GPRS_TEXT "Cell / BSSGP\n"
- "Cell/BSSGP Timer\n"
- BSSGP_TIMERS_HELP "Timer Value\n")
-{
- struct gsm_bts *bts = vty->index;
- int idx = get_string_value(gprs_bssgp_cfg_strs, argv[0]);
- int val = atoi(argv[1]);
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (idx < 0 || idx >= ARRAY_SIZE(bts->gprs.cell.timer))
- return CMD_WARNING;
-
- bts->gprs.cell.timer[idx] = val;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_rac, cfg_bts_gprs_rac_cmd,
- "gprs routing area <0-255>",
- GPRS_TEXT
- "GPRS Routing Area Code\n"
- "GPRS Routing Area Code\n"
- "GPRS Routing Area Code\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.rac = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_ctrl_ack, cfg_bts_gprs_ctrl_ack_cmd,
- "gprs control-ack-type-rach", GPRS_TEXT
- "Set GPRS Control Ack Type for PACKET CONTROL ACKNOWLEDGMENT message to "
- "four access bursts format instead of default RLC/MAC control block\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.ctrl_ack_type_use_block = false;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_no_bts_gprs_ctrl_ack, cfg_no_bts_gprs_ctrl_ack_cmd,
- "no gprs control-ack-type-rach", NO_STR GPRS_TEXT
- "Set GPRS Control Ack Type for PACKET CONTROL ACKNOWLEDGMENT message to "
- "four access bursts format instead of default RLC/MAC control block\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.ctrl_ack_type_use_block = true;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_net_ctrl_ord, cfg_bts_gprs_net_ctrl_ord_cmd,
- "gprs network-control-order (nc0|nc1|nc2)",
- GPRS_TEXT
- "GPRS Network Control Order\n"
- "MS controlled cell re-selection, no measurement reporting\n"
- "MS controlled cell re-selection, MS sends measurement reports\n"
- "Network controlled cell re-selection, MS sends measurement reports\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts->gprs.mode == BTS_GPRS_NONE) {
- vty_out(vty, "%% GPRS not enabled on this BTS%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.net_ctrl_ord = atoi(argv[0] + 2);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_mode, cfg_bts_gprs_mode_cmd,
- "gprs mode (none|gprs|egprs)",
- GPRS_TEXT
- "GPRS Mode for this BTS\n"
- "GPRS Disabled on this BTS\n"
- "GPRS Enabled on this BTS\n"
- "EGPRS (EDGE) Enabled on this BTS\n")
-{
- struct gsm_bts *bts = vty->index;
- enum bts_gprs_mode mode = bts_gprs_mode_parse(argv[0], NULL);
-
- if (!bts_gprs_mode_is_compat(bts, mode)) {
- vty_out(vty, "This BTS type does not support %s%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts->gprs.mode = mode;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_gprs_11bit_rach_support_for_egprs,
- cfg_bts_gprs_11bit_rach_support_for_egprs_cmd,
- "gprs 11bit_rach_support_for_egprs (0|1)",
- GPRS_TEXT "11 bit RACH options\n"
- "Disable 11 bit RACH for EGPRS\n"
- "Enable 11 bit RACH for EGPRS")
-{
- struct gsm_bts *bts = vty->index;
-
- bts->gprs.supports_egprs_11bit_rach = atoi(argv[0]);
-
- if (bts->gprs.supports_egprs_11bit_rach > 1) {
- vty_out(vty, "Error in RACH type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if ((bts->gprs.mode == BTS_GPRS_NONE) &&
- (bts->gprs.supports_egprs_11bit_rach == 1)) {
- vty_out(vty, "Error:gprs mode is none and 11bit rach is"
- " enabled%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-#define SI_TEXT "System Information Messages\n"
-#define SI_TYPE_TEXT "(1|2|3|4|5|6|7|8|9|10|13|16|17|18|19|20|2bis|2ter|2quater|5bis|5ter)"
-#define SI_TYPE_HELP "System Information Type 1\n" \
- "System Information Type 2\n" \
- "System Information Type 3\n" \
- "System Information Type 4\n" \
- "System Information Type 5\n" \
- "System Information Type 6\n" \
- "System Information Type 7\n" \
- "System Information Type 8\n" \
- "System Information Type 9\n" \
- "System Information Type 10\n" \
- "System Information Type 13\n" \
- "System Information Type 16\n" \
- "System Information Type 17\n" \
- "System Information Type 18\n" \
- "System Information Type 19\n" \
- "System Information Type 20\n" \
- "System Information Type 2bis\n" \
- "System Information Type 2ter\n" \
- "System Information Type 2quater\n" \
- "System Information Type 5bis\n" \
- "System Information Type 5ter\n"
-
-DEFUN(cfg_bts_si_mode, cfg_bts_si_mode_cmd,
- "system-information " SI_TYPE_TEXT " mode (static|computed)",
- SI_TEXT SI_TYPE_HELP
- "System Information Mode\n"
- "Static user-specified\n"
- "Dynamic, BSC-computed\n")
-{
- struct gsm_bts *bts = vty->index;
- int type;
-
- type = get_string_value(osmo_sitype_strs, argv[0]);
- if (type < 0) {
- vty_out(vty, "Error SI Type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[1], "static"))
- bts->si_mode_static |= (1 << type);
- else
- bts->si_mode_static &= ~(1 << type);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_si_static, cfg_bts_si_static_cmd,
- "system-information " SI_TYPE_TEXT " static HEXSTRING",
- SI_TEXT SI_TYPE_HELP
- "Static System Information filling\n"
- "Static user-specified SI content in HEX notation\n")
-{
- struct gsm_bts *bts = vty->index;
- int rc, type;
-
- type = get_string_value(osmo_sitype_strs, argv[0]);
- if (type < 0) {
- vty_out(vty, "Error SI Type%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!(bts->si_mode_static & (1 << type))) {
- vty_out(vty, "SI Type %s is not configured in static mode%s",
- get_value_string(osmo_sitype_strs, type), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* Fill buffer with padding pattern */
- memset(GSM_BTS_SI(bts, type), 0x2b, GSM_MACBLOCK_LEN);
-
- /* Parse the user-specified SI in hex format, [partially] overwriting padding */
- rc = osmo_hexparse(argv[1], GSM_BTS_SI(bts, type), GSM_MACBLOCK_LEN);
- if (rc < 0 || rc > GSM_MACBLOCK_LEN) {
- vty_out(vty, "Error parsing HEXSTRING%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* Mark this SI as present */
- bts->si_valid |= (1 << type);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_early_cm, cfg_bts_early_cm_cmd,
- "early-classmark-sending (allowed|forbidden)",
- "Early Classmark Sending\n"
- "Early Classmark Sending is allowed\n"
- "Early Classmark Sending is forbidden\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (!strcmp(argv[0], "allowed"))
- bts->early_classmark_allowed = true;
- else
- bts->early_classmark_allowed = false;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_neigh_mode, cfg_bts_neigh_mode_cmd,
- "neighbor-list mode (automatic|manual|manual-si5)",
- "Neighbor List\n" "Mode of Neighbor List generation\n"
- "Automatically from all BTS in this OpenBSC\n" "Manual\n"
- "Manual with different lists for SI2 and SI5\n")
-{
- struct gsm_bts *bts = vty->index;
- int mode = get_string_value(bts_neigh_mode_strs, argv[0]);
-
- switch (mode) {
- case NL_MODE_MANUAL_SI5SEP:
- case NL_MODE_MANUAL:
- /* make sure we clear the current list when switching to
- * manual mode */
- if (bts->neigh_list_manual_mode == 0)
- memset(&bts->si_common.data.neigh_list, 0,
- sizeof(bts->si_common.data.neigh_list));
- break;
- default:
- break;
- }
-
- bts->neigh_list_manual_mode = mode;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_neigh, cfg_bts_neigh_cmd,
- "neighbor-list (add|del) arfcn <0-1023>",
- "Neighbor List\n" "Add to manual neighbor list\n"
- "Delete from manual neighbor list\n" "ARFCN of neighbor\n"
- "ARFCN of neighbor\n")
-{
- struct gsm_bts *bts = vty->index;
- struct bitvec *bv = &bts->si_common.neigh_list;
- uint16_t arfcn = atoi(argv[1]);
-
- if (!bts->neigh_list_manual_mode) {
- vty_out(vty, "%% Cannot configure neighbor list in "
- "automatic mode%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[0], "add"))
- bitvec_set_bit_pos(bv, arfcn, 1);
- else
- bitvec_set_bit_pos(bv, arfcn, 0);
-
- return CMD_SUCCESS;
-}
-
-/* help text should be kept in sync with EARFCN_*_INVALID defines */
-DEFUN(cfg_bts_si2quater_neigh_add, cfg_bts_si2quater_neigh_add_cmd,
- "si2quater neighbor-list add earfcn <0-65535> thresh-hi <0-31> "
- "thresh-lo <0-32> prio <0-8> qrxlv <0-32> meas <0-8>",
- "SI2quater Neighbor List\n" "SI2quater Neighbor List\n"
- "Add to manual SI2quater neighbor list\n"
- "EARFCN of neighbor\n" "EARFCN of neighbor\n"
- "threshold high bits\n" "threshold high bits\n"
- "threshold low bits\n" "threshold low bits (32 means NA)\n"
- "priority\n" "priority (8 means NA)\n"
- "QRXLEVMIN\n" "QRXLEVMIN (32 means NA)\n"
- "measurement bandwidth\n" "measurement bandwidth (8 means NA)\n")
-{
- struct gsm_bts *bts = vty->index;
- struct osmo_earfcn_si2q *e = &bts->si_common.si2quater_neigh_list;
- uint16_t arfcn = atoi(argv[0]);
- uint8_t thresh_hi = atoi(argv[1]), thresh_lo = atoi(argv[2]),
- prio = atoi(argv[3]), qrx = atoi(argv[4]), meas = atoi(argv[5]);
- int r = bts_earfcn_add(bts, arfcn, thresh_hi, thresh_lo, prio, qrx, meas);
-
- switch (r) {
- case 1:
- vty_out(vty, "Warning: multiple threshold-high are not supported, overriding with %u%s",
- thresh_hi, VTY_NEWLINE);
- break;
- case EARFCN_THRESH_LOW_INVALID:
- vty_out(vty, "Warning: multiple threshold-low are not supported, overriding with %u%s",
- thresh_lo, VTY_NEWLINE);
- break;
- case EARFCN_QRXLV_INVALID + 1:
- vty_out(vty, "Warning: multiple QRXLEVMIN are not supported, overriding with %u%s",
- qrx, VTY_NEWLINE);
- break;
- case EARFCN_PRIO_INVALID:
- vty_out(vty, "Warning: multiple priorities are not supported, overriding with %u%s",
- prio, VTY_NEWLINE);
- break;
- default:
- if (r < 0) {
- vty_out(vty, "Unable to add ARFCN %u: %s%s", arfcn, strerror(-r), VTY_NEWLINE);
- return CMD_WARNING;
- }
- }
-
- if (si2q_num(bts) <= SI2Q_MAX_NUM)
- return CMD_SUCCESS;
-
- vty_out(vty, "Warning: not enough space in SI2quater (%u/%u used) for a given EARFCN %u%s",
- bts->si2q_count, SI2Q_MAX_NUM, arfcn, VTY_NEWLINE);
- osmo_earfcn_del(e, arfcn);
-
- return CMD_WARNING;
-}
-
-DEFUN(cfg_bts_si2quater_neigh_del, cfg_bts_si2quater_neigh_del_cmd,
- "si2quater neighbor-list del earfcn <0-65535>",
- "SI2quater Neighbor List\n"
- "SI2quater Neighbor List\n"
- "Delete from SI2quater manual neighbor list\n"
- "EARFCN of neighbor\n"
- "EARFCN\n")
-{
- struct gsm_bts *bts = vty->index;
- struct osmo_earfcn_si2q *e = &bts->si_common.si2quater_neigh_list;
- uint16_t arfcn = atoi(argv[0]);
- int r = osmo_earfcn_del(e, arfcn);
- if (r < 0) {
- vty_out(vty, "Unable to delete arfcn %u: %s%s", arfcn,
- strerror(-r), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_si2quater_uarfcn_add, cfg_bts_si2quater_uarfcn_add_cmd,
- "si2quater neighbor-list add uarfcn <0-16383> <0-511> <0-1>",
- "SI2quater Neighbor List\n"
- "SI2quater Neighbor List\n" "Add to manual SI2quater neighbor list\n"
- "UARFCN of neighbor\n" "UARFCN of neighbor\n" "scrambling code\n"
- "diversity bit\n")
-{
- struct gsm_bts *bts = vty->index;
- uint16_t arfcn = atoi(argv[0]), scramble = atoi(argv[1]);
-
- switch(bts_uarfcn_add(bts, arfcn, scramble, atoi(argv[2]))) {
- case -ENOMEM:
- vty_out(vty, "Unable to add UARFCN: max number of UARFCNs (%u) reached%s", MAX_EARFCN_LIST, VTY_NEWLINE);
- return CMD_WARNING;
- case -ENOSPC:
- vty_out(vty, "Warning: not enough space in SI2quater for a given UARFCN (%u, %u)%s",
- arfcn, scramble, VTY_NEWLINE);
- return CMD_WARNING;
- case -EADDRINUSE:
- vty_out(vty, "Unable to add UARFCN: (%u, %u) is already added%s", arfcn, scramble, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_si2quater_uarfcn_del, cfg_bts_si2quater_uarfcn_del_cmd,
- "si2quater neighbor-list del uarfcn <0-16383> <0-511>",
- "SI2quater Neighbor List\n"
- "SI2quater Neighbor List\n"
- "Delete from SI2quater manual neighbor list\n"
- "UARFCN of neighbor\n"
- "UARFCN\n"
- "scrambling code\n")
-{
- struct gsm_bts *bts = vty->index;
-
- if (bts_uarfcn_del(bts, atoi(argv[0]), atoi(argv[1])) < 0) {
- vty_out(vty, "Unable to delete uarfcn: pair not found%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_si5_neigh, cfg_bts_si5_neigh_cmd,
- "si5 neighbor-list (add|del) arfcn <0-1023>",
- "SI5 Neighbor List\n"
- "SI5 Neighbor List\n" "Add to manual SI5 neighbor list\n"
- "Delete from SI5 manual neighbor list\n" "ARFCN of neighbor\n"
- "ARFCN of neighbor\n")
-{
- struct gsm_bts *bts = vty->index;
- struct bitvec *bv = &bts->si_common.si5_neigh_list;
- uint16_t arfcn = atoi(argv[1]);
-
- if (!bts->neigh_list_manual_mode) {
- vty_out(vty, "%% Cannot configure neighbor list in "
- "automatic mode%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[0], "add"))
- bitvec_set_bit_pos(bv, arfcn, 1);
- else
- bitvec_set_bit_pos(bv, arfcn, 0);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_pcu_sock, cfg_bts_pcu_sock_cmd,
- "pcu-socket PATH",
- "PCU Socket Path for using OsmoPCU co-located with BSC (legacy BTS)\n"
- "Path in the file system for the unix-domain PCU socket\n")
-{
- struct gsm_bts *bts = vty->index;
- int rc;
-
- osmo_talloc_replace_string(bts, &bts->pcu_sock_path, argv[0]);
- pcu_sock_exit(bts);
- rc = pcu_sock_init(bts->pcu_sock_path, bts);
- if (rc < 0) {
- vty_out(vty, "%% Error creating PCU socket `%s' for BTS %u%s",
- bts->pcu_sock_path, bts->nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-#define EXCL_RFLOCK_STR "Exclude this BTS from the global RF Lock\n"
-
-DEFUN(cfg_bts_excl_rf_lock,
- cfg_bts_excl_rf_lock_cmd,
- "rf-lock-exclude",
- EXCL_RFLOCK_STR)
-{
- struct gsm_bts *bts = vty->index;
- bts->excl_from_rf_lock = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_no_excl_rf_lock,
- cfg_bts_no_excl_rf_lock_cmd,
- "no rf-lock-exclude",
- NO_STR EXCL_RFLOCK_STR)
-{
- struct gsm_bts *bts = vty->index;
- bts->excl_from_rf_lock = 0;
- return CMD_SUCCESS;
-}
-
-#define FORCE_COMB_SI_STR "Force the generation of a single SI (no ter/bis)\n"
-
-DEFUN(cfg_bts_force_comb_si,
- cfg_bts_force_comb_si_cmd,
- "force-combined-si",
- FORCE_COMB_SI_STR)
-{
- struct gsm_bts *bts = vty->index;
- bts->force_combined_si = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_no_force_comb_si,
- cfg_bts_no_force_comb_si_cmd,
- "no force-combined-si",
- NO_STR FORCE_COMB_SI_STR)
-{
- struct gsm_bts *bts = vty->index;
- bts->force_combined_si = 0;
- return CMD_SUCCESS;
-}
-
-static void _get_codec_from_arg(struct vty *vty, int argc, const char *argv[])
-{
- struct gsm_bts *bts = vty->index;
- struct bts_codec_conf *codec = &bts->codec;
- int i;
-
- codec->hr = 0;
- codec->efr = 0;
- codec->amr = 0;
- for (i = 0; i < argc; i++) {
- if (!strcmp(argv[i], "hr"))
- codec->hr = 1;
- if (!strcmp(argv[i], "efr"))
- codec->efr = 1;
- if (!strcmp(argv[i], "amr"))
- codec->amr = 1;
- }
-}
-
-#define CODEC_PAR_STR " (hr|efr|amr)"
-#define CODEC_HELP_STR "Half Rate\n" \
- "Enhanced Full Rate\nAdaptive Multirate\n"
-
-DEFUN(cfg_bts_codec0, cfg_bts_codec0_cmd,
- "codec-support fr",
- "Codec Support settings\nFullrate\n")
-{
- _get_codec_from_arg(vty, 0, argv);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_codec1, cfg_bts_codec1_cmd,
- "codec-support fr" CODEC_PAR_STR,
- "Codec Support settings\nFullrate\n"
- CODEC_HELP_STR)
-{
- _get_codec_from_arg(vty, 1, argv);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_codec2, cfg_bts_codec2_cmd,
- "codec-support fr" CODEC_PAR_STR CODEC_PAR_STR,
- "Codec Support settings\nFullrate\n"
- CODEC_HELP_STR CODEC_HELP_STR)
-{
- _get_codec_from_arg(vty, 2, argv);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_codec3, cfg_bts_codec3_cmd,
- "codec-support fr" CODEC_PAR_STR CODEC_PAR_STR CODEC_PAR_STR,
- "Codec Support settings\nFullrate\n"
- CODEC_HELP_STR CODEC_HELP_STR CODEC_HELP_STR)
-{
- _get_codec_from_arg(vty, 3, argv);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_codec4, cfg_bts_codec4_cmd,
- "codec-support fr" CODEC_PAR_STR CODEC_PAR_STR CODEC_PAR_STR CODEC_PAR_STR,
- "Codec Support settings\nFullrate\n"
- CODEC_HELP_STR CODEC_HELP_STR CODEC_HELP_STR CODEC_HELP_STR)
-{
- _get_codec_from_arg(vty, 4, argv);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_depends_on, cfg_bts_depends_on_cmd,
- "depends-on-bts <0-255>",
- "This BTS can only be started if another one is up\n" "BTS Number\n")
-{
- struct gsm_bts *bts = vty->index;
- struct gsm_bts *other_bts;
- int dep = atoi(argv[0]);
-
-
- if (!is_ipaccess_bts(bts)) {
- vty_out(vty, "This feature is only available for IP systems.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- other_bts = gsm_bts_num(bts->network, dep);
- if (!other_bts || !is_ipaccess_bts(other_bts)) {
- vty_out(vty, "This feature is only available for IP systems.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (dep >= bts->nr) {
- vty_out(vty, "%%Need to depend on an already declared unit.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts_depend_mark(bts, dep);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_no_depends_on, cfg_bts_no_depends_on_cmd,
- "depeneds-on-bts <0-255>",
- NO_STR "This BTS can only be started if another one is up\n"
- "BTS Number\n")
-{
- struct gsm_bts *bts = vty->index;
- int dep = atoi(argv[0]);
-
- bts_depend_clear(bts, dep);
- return CMD_SUCCESS;
-}
-
-#define AMR_TEXT "Adaptive Multi Rate settings\n"
-#define AMR_MODE_TEXT "Codec modes to use with AMR codec\n"
-#define AMR_START_TEXT "Initial codec to use with AMR\n" \
- "Automatically\nFirst codec\nSecond codec\nThird codec\nFourth codec\n"
-#define AMR_TH_TEXT "AMR threshold between codecs\nMS side\nBTS side\n"
-#define AMR_HY_TEXT "AMR hysteresis between codecs\nMS side\nBTS side\n"
-
-static void get_amr_from_arg(struct vty *vty, int argc, const char *argv[], int full)
-{
- struct gsm_bts *bts = vty->index;
- struct amr_multirate_conf *mr = (full) ? &bts->mr_full: &bts->mr_half;
- struct gsm48_multi_rate_conf *mr_conf =
- (struct gsm48_multi_rate_conf *) mr->gsm48_ie;
- int i;
-
- mr->gsm48_ie[1] = 0;
- for (i = 0; i < argc; i++)
- mr->gsm48_ie[1] |= 1 << atoi(argv[i]);
- mr_conf->icmi = 0;
-}
-
-static void get_amr_th_from_arg(struct vty *vty, int argc, const char *argv[], int full)
-{
- struct gsm_bts *bts = vty->index;
- struct amr_multirate_conf *mr = (full) ? &bts->mr_full: &bts->mr_half;
- struct amr_mode *modes;
- int i;
-
- modes = argv[0][0]=='m' ? mr->ms_mode : mr->bts_mode;
- for (i = 0; i < argc - 1; i++)
- modes[i].threshold = atoi(argv[i + 1]);
-}
-
-static void get_amr_hy_from_arg(struct vty *vty, int argc, const char *argv[], int full)
-{
- struct gsm_bts *bts = vty->index;
- struct amr_multirate_conf *mr = (full) ? &bts->mr_full: &bts->mr_half;
- struct amr_mode *modes;
- int i;
-
- modes = argv[0][0]=='m' ? mr->ms_mode : mr->bts_mode;
- for (i = 0; i < argc - 1; i++)
- modes[i].hysteresis = atoi(argv[i + 1]);
-}
-
-static void get_amr_start_from_arg(struct vty *vty, const char *argv[], int full)
-{
- struct gsm_bts *bts = vty->index;
- struct amr_multirate_conf *mr = (full) ? &bts->mr_full: &bts->mr_half;
- struct gsm48_multi_rate_conf *mr_conf =
- (struct gsm48_multi_rate_conf *) mr->gsm48_ie;
- int num = 0, i;
-
- for (i = 0; i < ((full) ? 8 : 6); i++) {
- if ((mr->gsm48_ie[1] & (1 << i))) {
- num++;
- }
- }
-
- if (argv[0][0] == 'a' || num == 0)
- mr_conf->icmi = 0;
- else {
- mr_conf->icmi = 1;
- if (num < atoi(argv[0]))
- mr_conf->smod = num - 1;
- else
- mr_conf->smod = atoi(argv[0]) - 1;
- }
-}
-
-#define AMR_TCHF_PAR_STR " (0|1|2|3|4|5|6|7)"
-#define AMR_TCHF_HELP_STR "4,75k\n5,15k\n5,90k\n6,70k\n7,40k\n7,95k\n" \
- "10,2k\n12,2k\n"
-
-#define AMR_TCHH_PAR_STR " (0|1|2|3|4|5)"
-#define AMR_TCHH_HELP_STR "4,75k\n5,15k\n5,90k\n6,70k\n7,40k\n7,95k\n"
-
-#define AMR_TH_HELP_STR "Threshold between codec 1 and 2\n"
-#define AMR_HY_HELP_STR "Hysteresis between codec 1 and 2\n"
-
-DEFUN(cfg_bts_amr_fr_modes1, cfg_bts_amr_fr_modes1_cmd,
- "amr tch-f modes" AMR_TCHF_PAR_STR,
- AMR_TEXT "Full Rate\n" AMR_MODE_TEXT
- AMR_TCHF_HELP_STR)
-{
- get_amr_from_arg(vty, 1, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_modes2, cfg_bts_amr_fr_modes2_cmd,
- "amr tch-f modes" AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR,
- AMR_TEXT "Full Rate\n" AMR_MODE_TEXT
- AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR)
-{
- get_amr_from_arg(vty, 2, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_modes3, cfg_bts_amr_fr_modes3_cmd,
- "amr tch-f modes" AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR,
- AMR_TEXT "Full Rate\n" AMR_MODE_TEXT
- AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR)
-{
- get_amr_from_arg(vty, 3, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_modes4, cfg_bts_amr_fr_modes4_cmd,
- "amr tch-f modes" AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR AMR_TCHF_PAR_STR,
- AMR_TEXT "Full Rate\n" AMR_MODE_TEXT
- AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR AMR_TCHF_HELP_STR)
-{
- get_amr_from_arg(vty, 4, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_start_mode, cfg_bts_amr_fr_start_mode_cmd,
- "amr tch-f start-mode (auto|1|2|3|4)",
- AMR_TEXT "Full Rate\n" AMR_START_TEXT)
-{
- get_amr_start_from_arg(vty, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_thres1, cfg_bts_amr_fr_thres1_cmd,
- "amr tch-f threshold (ms|bts) <0-63>",
- AMR_TEXT "Full Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 2, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_thres2, cfg_bts_amr_fr_thres2_cmd,
- "amr tch-f threshold (ms|bts) <0-63> <0-63>",
- AMR_TEXT "Full Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 3, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_thres3, cfg_bts_amr_fr_thres3_cmd,
- "amr tch-f threshold (ms|bts) <0-63> <0-63> <0-63>",
- AMR_TEXT "Full Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR AMR_TH_HELP_STR AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 4, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_hyst1, cfg_bts_amr_fr_hyst1_cmd,
- "amr tch-f hysteresis (ms|bts) <0-15>",
- AMR_TEXT "Full Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 2, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_hyst2, cfg_bts_amr_fr_hyst2_cmd,
- "amr tch-f hysteresis (ms|bts) <0-15> <0-15>",
- AMR_TEXT "Full Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 3, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_fr_hyst3, cfg_bts_amr_fr_hyst3_cmd,
- "amr tch-f hysteresis (ms|bts) <0-15> <0-15> <0-15>",
- AMR_TEXT "Full Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR AMR_HY_HELP_STR AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 4, argv, 1);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_modes1, cfg_bts_amr_hr_modes1_cmd,
- "amr tch-h modes" AMR_TCHH_PAR_STR,
- AMR_TEXT "Half Rate\n" AMR_MODE_TEXT
- AMR_TCHH_HELP_STR)
-{
- get_amr_from_arg(vty, 1, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_modes2, cfg_bts_amr_hr_modes2_cmd,
- "amr tch-h modes" AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR,
- AMR_TEXT "Half Rate\n" AMR_MODE_TEXT
- AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR)
-{
- get_amr_from_arg(vty, 2, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_modes3, cfg_bts_amr_hr_modes3_cmd,
- "amr tch-h modes" AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR,
- AMR_TEXT "Half Rate\n" AMR_MODE_TEXT
- AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR)
-{
- get_amr_from_arg(vty, 3, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_modes4, cfg_bts_amr_hr_modes4_cmd,
- "amr tch-h modes" AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR AMR_TCHH_PAR_STR,
- AMR_TEXT "Half Rate\n" AMR_MODE_TEXT
- AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR AMR_TCHH_HELP_STR)
-{
- get_amr_from_arg(vty, 4, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_start_mode, cfg_bts_amr_hr_start_mode_cmd,
- "amr tch-h start-mode (auto|1|2|3|4)",
- AMR_TEXT "Half Rate\n" AMR_START_TEXT)
-{
- get_amr_start_from_arg(vty, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_thres1, cfg_bts_amr_hr_thres1_cmd,
- "amr tch-h threshold (ms|bts) <0-63>",
- AMR_TEXT "Half Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 2, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_thres2, cfg_bts_amr_hr_thres2_cmd,
- "amr tch-h threshold (ms|bts) <0-63> <0-63>",
- AMR_TEXT "Half Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 3, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_thres3, cfg_bts_amr_hr_thres3_cmd,
- "amr tch-h threshold (ms|bts) <0-63> <0-63> <0-63>",
- AMR_TEXT "Half Rate\n" AMR_TH_TEXT
- AMR_TH_HELP_STR AMR_TH_HELP_STR AMR_TH_HELP_STR)
-{
- get_amr_th_from_arg(vty, 4, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_hyst1, cfg_bts_amr_hr_hyst1_cmd,
- "amr tch-h hysteresis (ms|bts) <0-15>",
- AMR_TEXT "Half Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 2, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_hyst2, cfg_bts_amr_hr_hyst2_cmd,
- "amr tch-h hysteresis (ms|bts) <0-15> <0-15>",
- AMR_TEXT "Half Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 3, argv, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bts_amr_hr_hyst3, cfg_bts_amr_hr_hyst3_cmd,
- "amr tch-h hysteresis (ms|bts) <0-15> <0-15> <0-15>",
- AMR_TEXT "Half Rate\n" AMR_HY_TEXT
- AMR_HY_HELP_STR AMR_HY_HELP_STR AMR_HY_HELP_STR)
-{
- get_amr_hy_from_arg(vty, 4, argv, 0);
- return CMD_SUCCESS;
-}
-
-#define TRX_TEXT "Radio Transceiver\n"
-
-/* per TRX configuration */
-DEFUN(cfg_trx,
- cfg_trx_cmd,
- "trx <0-255>",
- TRX_TEXT
- "Select a TRX to configure")
-{
- int trx_nr = atoi(argv[0]);
- struct gsm_bts *bts = vty->index;
- struct gsm_bts_trx *trx;
-
- if (trx_nr > bts->num_trx) {
- vty_out(vty, "%% The next unused TRX number in this BTS is %u%s",
- bts->num_trx, VTY_NEWLINE);
- return CMD_WARNING;
- } else if (trx_nr == bts->num_trx) {
- /* we need to allocate a new one */
- trx = gsm_bts_trx_alloc(bts);
- } else
- trx = gsm_bts_trx_num(bts, trx_nr);
-
- if (!trx)
- return CMD_WARNING;
-
- vty->index = trx;
- vty->index_sub = &trx->description;
- vty->node = TRX_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_arfcn,
- cfg_trx_arfcn_cmd,
- "arfcn <0-1023>",
- "Set the ARFCN for this TRX\n"
- "Absolute Radio Frequency Channel Number\n")
-{
- int arfcn = atoi(argv[0]);
- struct gsm_bts_trx *trx = vty->index;
-
- /* FIXME: check if this ARFCN is supported by this TRX */
-
- trx->arfcn = arfcn;
-
- /* FIXME: patch ARFCN into SYSTEM INFORMATION */
- /* FIXME: use OML layer to update the ARFCN */
- /* FIXME: use RSL layer to update SYSTEM INFORMATION */
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_nominal_power,
- cfg_trx_nominal_power_cmd,
- "nominal power <0-100>",
- "Nominal TRX RF Power in dBm\n"
- "Nominal TRX RF Power in dBm\n"
- "Nominal TRX RF Power in dBm\n")
-{
- struct gsm_bts_trx *trx = vty->index;
-
- trx->nominal_power = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_max_power_red,
- cfg_trx_max_power_red_cmd,
- "max_power_red <0-100>",
- "Reduction of maximum BS RF Power (relative to nominal power)\n"
- "Reduction of maximum BS RF Power in dB\n")
-{
- int maxpwr_r = atoi(argv[0]);
- struct gsm_bts_trx *trx = vty->index;
- int upper_limit = 24; /* default 12.21 max power red. */
-
- /* FIXME: check if our BTS type supports more than 12 */
- if (maxpwr_r < 0 || maxpwr_r > upper_limit) {
- vty_out(vty, "%% Power %d dB is not in the valid range%s",
- maxpwr_r, VTY_NEWLINE);
- return CMD_WARNING;
- }
- if (maxpwr_r & 1) {
- vty_out(vty, "%% Power %d dB is not an even value%s",
- maxpwr_r, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- trx->max_power_red = maxpwr_r;
-
- /* FIXME: make sure we update this using OML */
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_rsl_e1,
- cfg_trx_rsl_e1_cmd,
- "rsl e1 line E1_LINE timeslot <1-31> sub-slot (0|1|2|3|full)",
- "RSL Parameters\n"
- "E1/T1 interface to be used for RSL\n"
- "E1/T1 interface to be used for RSL\n"
- "E1/T1 Line Number to be used for RSL\n"
- "E1/T1 Timeslot to be used for RSL\n"
- "E1/T1 Timeslot to be used for RSL\n"
- "E1/T1 Sub-slot to be used for RSL\n"
- "E1/T1 Sub-slot 0 is to be used for RSL\n"
- "E1/T1 Sub-slot 1 is to be used for RSL\n"
- "E1/T1 Sub-slot 2 is to be used for RSL\n"
- "E1/T1 Sub-slot 3 is to be used for RSL\n"
- "E1/T1 full timeslot is to be used for RSL\n")
-{
- struct gsm_bts_trx *trx = vty->index;
-
- parse_e1_link(&trx->rsl_e1_link, argv[0], argv[1], argv[2]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_rsl_e1_tei,
- cfg_trx_rsl_e1_tei_cmd,
- "rsl e1 tei <0-63>",
- "RSL Parameters\n"
- "Set the TEI to be used for RSL\n"
- "Set the TEI to be used for RSL\n"
- "TEI to be used for RSL\n")
-{
- struct gsm_bts_trx *trx = vty->index;
-
- trx->rsl_tei = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_trx_rf_locked,
- cfg_trx_rf_locked_cmd,
- "rf_locked (0|1)",
- "Set or unset the RF Locking (Turn off RF of the TRX)\n"
- "TRX is NOT RF locked (active)\n"
- "TRX is RF locked (turned off)\n")
-{
- int locked = atoi(argv[0]);
- struct gsm_bts_trx *trx = vty->index;
-
- gsm_trx_lock_rf(trx, locked);
- return CMD_SUCCESS;
-}
-
-/* per TS configuration */
-DEFUN(cfg_ts,
- cfg_ts_cmd,
- "timeslot <0-7>",
- "Select a Timeslot to configure\n"
- "Timeslot number\n")
-{
- int ts_nr = atoi(argv[0]);
- struct gsm_bts_trx *trx = vty->index;
- struct gsm_bts_trx_ts *ts;
-
- if (ts_nr >= TRX_NR_TS) {
- vty_out(vty, "%% A GSM TRX only has %u Timeslots per TRX%s",
- TRX_NR_TS, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- ts = &trx->ts[ts_nr];
-
- vty->index = ts;
- vty->node = TS_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_pchan,
- cfg_ts_pchan_cmd,
- "phys_chan_config PCHAN", /* dynamically generated! */
- "Physical Channel configuration (TCH/SDCCH/...)\n" "Physical Channel\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
- int pchanc;
-
- pchanc = gsm_pchan_parse(argv[0]);
- if (pchanc < 0)
- return CMD_WARNING;
-
- ts->pchan = pchanc;
-
- return CMD_SUCCESS;
-}
-
-/* used for backwards compatibility with old config files that still
- * have uppercase pchan type names */
-DEFUN_HIDDEN(cfg_ts_pchan_compat,
- cfg_ts_pchan_compat_cmd,
- "phys_chan_config PCHAN",
- "Physical Channel configuration (TCH/SDCCH/...)\n" "Physical Channel\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
- int pchanc;
-
- pchanc = gsm_pchan_parse(argv[0]);
- if (pchanc < 0)
- return CMD_WARNING;
-
- ts->pchan = pchanc;
-
- return CMD_SUCCESS;
-}
-
-
-
-DEFUN(cfg_ts_tsc,
- cfg_ts_tsc_cmd,
- "training_sequence_code <0-7>",
- "Training Sequence Code of the Timeslot\n" "TSC\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
-
- if (!gsm_btsmodel_has_feature(ts->trx->bts->model, BTS_FEAT_MULTI_TSC)) {
- vty_out(vty, "%% This BTS does not support a TSC != BCC, "
- "falling back to BCC%s", VTY_NEWLINE);
- ts->tsc = -1;
- return CMD_WARNING;
- }
-
- ts->tsc = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-#define HOPPING_STR "Configure frequency hopping\n"
-
-DEFUN(cfg_ts_hopping,
- cfg_ts_hopping_cmd,
- "hopping enabled (0|1)",
- HOPPING_STR "Enable or disable frequency hopping\n"
- "Disable frequency hopping\n" "Enable frequency hopping\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
- int enabled = atoi(argv[0]);
-
- if (enabled && !gsm_btsmodel_has_feature(ts->trx->bts->model, BTS_FEAT_HOPPING)) {
- vty_out(vty, "BTS model does not support hopping%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- ts->hopping.enabled = enabled;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_hsn,
- cfg_ts_hsn_cmd,
- "hopping sequence-number <0-63>",
- HOPPING_STR
- "Which hopping sequence to use for this channel\n"
- "Hopping Sequence Number (HSN)\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
-
- ts->hopping.hsn = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_maio,
- cfg_ts_maio_cmd,
- "hopping maio <0-63>",
- HOPPING_STR
- "Which hopping MAIO to use for this channel\n"
- "Mobile Allocation Index Offset (MAIO)\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
-
- ts->hopping.maio = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_arfcn_add,
- cfg_ts_arfcn_add_cmd,
- "hopping arfcn add <0-1023>",
- HOPPING_STR "Configure hopping ARFCN list\n"
- "Add an entry to the hopping ARFCN list\n" "ARFCN\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
- int arfcn = atoi(argv[0]);
-
- bitvec_set_bit_pos(&ts->hopping.arfcns, arfcn, 1);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_arfcn_del,
- cfg_ts_arfcn_del_cmd,
- "hopping arfcn del <0-1023>",
- HOPPING_STR "Configure hopping ARFCN list\n"
- "Delete an entry to the hopping ARFCN list\n" "ARFCN\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
- int arfcn = atoi(argv[0]);
-
- bitvec_set_bit_pos(&ts->hopping.arfcns, arfcn, 0);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_ts_e1_subslot,
- cfg_ts_e1_subslot_cmd,
- "e1 line E1_LINE timeslot <1-31> sub-slot (0|1|2|3|full)",
- "E1/T1 channel connected to this on-air timeslot\n"
- "E1/T1 channel connected to this on-air timeslot\n"
- "E1/T1 line connected to this on-air timeslot\n"
- "E1/T1 timeslot connected to this on-air timeslot\n"
- "E1/T1 timeslot connected to this on-air timeslot\n"
- "E1/T1 sub-slot connected to this on-air timeslot\n"
- "E1/T1 sub-slot 0 connected to this on-air timeslot\n"
- "E1/T1 sub-slot 1 connected to this on-air timeslot\n"
- "E1/T1 sub-slot 2 connected to this on-air timeslot\n"
- "E1/T1 sub-slot 3 connected to this on-air timeslot\n"
- "Full E1/T1 timeslot connected to this on-air timeslot\n")
-{
- struct gsm_bts_trx_ts *ts = vty->index;
-
- parse_e1_link(&ts->e1_link, argv[0], argv[1], argv[2]);
-
- return CMD_SUCCESS;
-}
-
-void openbsc_vty_print_statistics(struct vty *vty, struct gsm_network *net)
-{
- vty_out(vty, "Channel Requests : %lu total, %lu no channel%s",
- net->bsc_ctrs->ctr[BSC_CTR_CHREQ_TOTAL].current,
- net->bsc_ctrs->ctr[BSC_CTR_CHREQ_NO_CHANNEL].current,
- VTY_NEWLINE);
- vty_out(vty, "Channel Failures : %lu rf_failures, %lu rll failures%s",
- net->bsc_ctrs->ctr[BSC_CTR_CHAN_RF_FAIL].current,
- net->bsc_ctrs->ctr[BSC_CTR_CHAN_RLL_ERR].current,
- VTY_NEWLINE);
- vty_out(vty, "Paging : %lu attempted, %lu complete, %lu expired%s",
- net->bsc_ctrs->ctr[BSC_CTR_PAGING_ATTEMPTED].current,
- net->bsc_ctrs->ctr[BSC_CTR_PAGING_COMPLETED].current,
- net->bsc_ctrs->ctr[BSC_CTR_PAGING_EXPIRED].current,
- VTY_NEWLINE);
- vty_out(vty, "BTS failures : %lu OML, %lu RSL%s",
- net->bsc_ctrs->ctr[BSC_CTR_BTS_OML_FAIL].current,
- net->bsc_ctrs->ctr[BSC_CTR_BTS_RSL_FAIL].current,
- VTY_NEWLINE);
-}
-
-DEFUN(drop_bts,
- drop_bts_cmd,
- "drop bts connection <0-65535> (oml|rsl)",
- "Debug/Simulation command to drop Abis/IP BTS\n"
- "Debug/Simulation command to drop Abis/IP BTS\n"
- "Debug/Simulation command to drop Abis/IP BTS\n"
- "BTS NR\n" "Drop OML Connection\n" "Drop RSL Connection\n")
-{
- struct gsm_network *gsmnet;
- struct gsm_bts_trx *trx;
- struct gsm_bts *bts;
- unsigned int bts_nr;
-
- gsmnet = gsmnet_from_vty(vty);
-
- bts_nr = atoi(argv[0]);
- if (bts_nr >= gsmnet->num_bts) {
- vty_out(vty, "BTS number must be between 0 and %d. It was %d.%s",
- gsmnet->num_bts, bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts = gsm_bts_num(gsmnet, bts_nr);
- if (!bts) {
- vty_out(vty, "BTS Nr. %d could not be found.%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!is_ipaccess_bts(bts)) {
- vty_out(vty, "This command only works for ipaccess.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
-
- /* close all connections */
- if (strcmp(argv[1], "oml") == 0) {
- ipaccess_drop_oml(bts);
- } else if (strcmp(argv[1], "rsl") == 0) {
- /* close all rsl connections */
- llist_for_each_entry(trx, &bts->trx_list, list) {
- ipaccess_drop_rsl(trx);
- }
- } else {
- vty_out(vty, "Argument must be 'oml# or 'rsl'.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(restart_bts, restart_bts_cmd,
- "restart-bts <0-65535>",
- "Restart ip.access nanoBTS through OML\n"
- "BTS Number\n")
-{
- struct gsm_network *gsmnet;
- struct gsm_bts_trx *trx;
- struct gsm_bts *bts;
- unsigned int bts_nr;
-
- gsmnet = gsmnet_from_vty(vty);
-
- bts_nr = atoi(argv[0]);
- if (bts_nr >= gsmnet->num_bts) {
- vty_out(vty, "BTS number must be between 0 and %d. It was %d.%s",
- gsmnet->num_bts, bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts = gsm_bts_num(gsmnet, bts_nr);
- if (!bts) {
- vty_out(vty, "BTS Nr. %d could not be found.%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!is_ipaccess_bts(bts) || is_sysmobts_v2(bts)) {
- vty_out(vty, "This command only works for ipaccess nanoBTS.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* go from last TRX to c0 */
- llist_for_each_entry_reverse(trx, &bts->trx_list, list)
- abis_nm_ipaccess_restart(trx);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(bts_resend, bts_resend_cmd,
- "bts <0-255> resend-system-information",
- "BTS Specific Commands\n" "BTS Number\n"
- "Re-generate + re-send BCCH SYSTEM INFORMATION\n")
-{
- struct gsm_network *gsmnet;
- struct gsm_bts_trx *trx;
- struct gsm_bts *bts;
- unsigned int bts_nr;
-
- gsmnet = gsmnet_from_vty(vty);
-
- bts_nr = atoi(argv[0]);
- if (bts_nr >= gsmnet->num_bts) {
- vty_out(vty, "BTS number must be between 0 and %d. It was %d.%s",
- gsmnet->num_bts, bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts = gsm_bts_num(gsmnet, bts_nr);
- if (!bts) {
- vty_out(vty, "BTS Nr. %d could not be found.%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- llist_for_each_entry_reverse(trx, &bts->trx_list, list)
- gsm_bts_trx_set_system_infos(trx);
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(smscb_cmd, smscb_cmd_cmd,
- "bts <0-255> smscb-command <1-4> HEXSTRING",
- "BTS related commands\n" "BTS Number\n"
- "SMS Cell Broadcast\n" "Last Valid Block\n"
- "Hex Encoded SMSCB message (up to 88 octets)\n")
-{
- struct gsm_bts *bts;
- int bts_nr = atoi(argv[0]);
- int last_block = atoi(argv[1]);
- struct rsl_ie_cb_cmd_type cb_cmd;
- uint8_t buf[88];
- int rc;
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
- rc = osmo_hexparse(argv[2], buf, sizeof(buf));
- if (rc < 0 || rc > sizeof(buf)) {
- vty_out(vty, "Error parsing HEXSTRING%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- cb_cmd.spare = 0;
- cb_cmd.def_bcast = 0;
- cb_cmd.command = RSL_CB_CMD_TYPE_NORMAL;
-
- switch (last_block) {
- case 1:
- cb_cmd.last_block = RSL_CB_CMD_LASTBLOCK_1;
- break;
- case 2:
- cb_cmd.last_block = RSL_CB_CMD_LASTBLOCK_2;
- break;
- case 3:
- cb_cmd.last_block = RSL_CB_CMD_LASTBLOCK_3;
- break;
- case 4:
- cb_cmd.last_block = RSL_CB_CMD_LASTBLOCK_4;
- break;
- }
-
- rsl_sms_cb_command(bts, RSL_CHAN_SDCCH4_ACCH, cb_cmd, buf, rc);
-
- return CMD_SUCCESS;
-}
-
-/* resolve a gsm_bts_trx_ts basd on the given numeric identifiers */
-static struct gsm_bts_trx_ts *vty_get_ts(struct vty *vty, const char *bts_str, const char *trx_str,
- const char *ts_str)
-{
- int bts_nr = atoi(bts_str);
- int trx_nr = atoi(trx_str);
- int ts_nr = atoi(ts_str);
- struct gsm_bts *bts;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
-
- bts = gsm_bts_num(gsmnet_from_vty(vty), bts_nr);
- if (!bts) {
- vty_out(vty, "%% No such BTS (%d)%s", bts_nr, VTY_NEWLINE);
- return NULL;
- }
-
- trx = gsm_bts_trx_num(bts, trx_nr);
- if (!trx) {
- vty_out(vty, "%% No such TRX (%d)%s", trx_nr, VTY_NEWLINE);
- return NULL;
- }
-
- ts = &trx->ts[ts_nr];
-
- return ts;
-}
-
-DEFUN(pdch_act, pdch_act_cmd,
- "bts <0-255> trx <0-255> timeslot <0-7> pdch (activate|deactivate)",
- "BTS related commands\n" "BTS Number\n" "Transceiver\n" "Transceiver Number\n"
- "TRX Timeslot\n" "Timeslot Number\n" "Packet Data Channel\n"
- "Activate Dynamic PDCH/TCH (-> PDCH mode)\n"
- "Deactivate Dynamic PDCH/TCH (-> TCH mode)\n")
-{
- struct gsm_bts_trx_ts *ts;
- int activate;
-
- ts = vty_get_ts(vty, argv[0], argv[1], argv[2]);
- if (!ts)
- return CMD_WARNING;
-
- if (!is_ipaccess_bts(ts->trx->bts)) {
- vty_out(vty, "%% This command only works for ipaccess BTS%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (ts->pchan != GSM_PCHAN_TCH_F_PDCH) {
- vty_out(vty, "%% Timeslot %u is not in dynamic TCH_F/PDCH "
- "mode%s", ts->nr, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[3], "activate"))
- activate = 1;
- else
- activate = 0;
-
- rsl_ipacc_pdch_activate(ts, activate);
-
- return CMD_SUCCESS;
-
-}
-
-/* determine the logical channel type based on the physical channel type */
-static int lchan_type_by_pchan(enum gsm_phys_chan_config pchan)
-{
- switch (pchan) {
- case GSM_PCHAN_TCH_F:
- return GSM_LCHAN_TCH_F;
- case GSM_PCHAN_TCH_H:
- return GSM_LCHAN_TCH_H;
- case GSM_PCHAN_SDCCH8_SACCH8C:
- case GSM_PCHAN_SDCCH8_SACCH8C_CBCH:
- case GSM_PCHAN_CCCH_SDCCH4:
- case GSM_PCHAN_CCCH_SDCCH4_CBCH:
- return GSM_LCHAN_SDCCH;
- default:
- return -1;
- }
-}
-
-/* configure the lchan for a single AMR mode (as specified) */
-static int lchan_set_single_amr_mode(struct gsm_lchan *lchan, uint8_t amr_mode)
-{
- struct amr_multirate_conf mr;
- struct gsm48_multi_rate_conf *mr_conf;
- mr_conf = (struct gsm48_multi_rate_conf *) &mr.gsm48_ie;
-
- if (amr_mode > 7)
- return -1;
-
- memset(&mr, 0, sizeof(mr));
- mr_conf->ver = 1;
- /* bit-mask of supported modes, only one bit is set. Reflects
- * Figure 10.5.2.47a where there are no thershold and only a
- * single mode */
- mr.gsm48_ie[1] = 1 << amr_mode;
-
- mr.ms_mode[0].mode = amr_mode;
- mr.bts_mode[0].mode = amr_mode;
-
- /* encode this configuration into the lchan for both uplink and
- * downlink direction */
- gsm48_multirate_config(lchan->mr_ms_lv, &mr, mr.ms_mode);
- gsm48_multirate_config(lchan->mr_bts_lv, &mr, mr.bts_mode);
-
- return 0;
-}
-
-/* Debug/Measurement command to activate a given logical channel
- * manually in a given mode/codec. This is useful for receiver
- * performance testing (FER/RBER/...) */
-DEFUN(lchan_act, lchan_act_cmd,
- "bts <0-255> trx <0-255> timeslot <0-7> sub-slot <0-7> (activate|deactivate) (hr|fr|efr|amr) [<0-7>]",
- "BTS related commands\n" "BTS Number\n" "Transceiver\n" "Transceiver Number\n"
- "TRX Timeslot\n" "Timeslot Number\n" "Sub-Slot Number\n" "Sub-Slot Number\n"
- "Manual Channel Activation (e.g. for BER test)\n"
- "Manual Channel Deactivation (e.g. for BER test)\n"
- "Half-Rate v1\n" "Full-Rate\n" "Enhanced Full Rate\n" "Adaptive Multi-Rate\n" "AMR Mode\n")
-{
- struct gsm_bts_trx_ts *ts;
- struct gsm_lchan *lchan;
- int ss_nr = atoi(argv[3]);
- const char *act_str = argv[4];
- const char *codec_str = argv[5];
- int activate;
-
- ts = vty_get_ts(vty, argv[0], argv[1], argv[2]);
- if (!ts)
- return CMD_WARNING;
-
- lchan = &ts->lchan[ss_nr];
-
- if (!strcmp(act_str, "activate"))
- activate = 1;
- else
- activate = 0;
-
- if (ss_nr >= ts_subslots(ts)) {
- vty_out(vty, "%% subslot %d >= permitted %d for physical channel %s%s",
- ss_nr, ts_subslots(ts), gsm_pchan_name(ts->pchan), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (activate) {
- int lchan_t;
- if (lchan->state != LCHAN_S_NONE) {
- vty_out(vty, "%% Cannot activate: Channel busy!%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
- lchan_t = lchan_type_by_pchan(ts->pchan);
- if (lchan_t < 0)
- return CMD_WARNING;
- /* configure the lchan */
- lchan->type = lchan_t;
- lchan->rsl_cmode = RSL_CMOD_SPD_SPEECH;
- if (!strcmp(codec_str, "hr") || !strcmp(codec_str, "fr"))
- lchan->tch_mode = GSM48_CMODE_SPEECH_V1;
- else if (!strcmp(codec_str, "efr"))
- lchan->tch_mode = GSM48_CMODE_SPEECH_EFR;
- else if (!strcmp(codec_str, "amr")) {
- int amr_mode;
- if (argc < 7) {
- vty_out(vty, "%% AMR requires specification of AMR mode%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
- amr_mode = atoi(argv[6]);
- lchan->tch_mode = GSM48_CMODE_SPEECH_AMR;
- lchan_set_single_amr_mode(lchan, amr_mode);
- }
- vty_out(vty, "%% activating lchan %s%s", gsm_lchan_name(lchan), VTY_NEWLINE);
- rsl_chan_activate_lchan(lchan, RSL_ACT_TYPE_INITIAL, 0);
- rsl_ipacc_crcx(lchan);
- } else {
- rsl_direct_rf_release(lchan);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(lchan_mdcx, lchan_mdcx_cmd,
- "bts <0-255> trx <0-255> timeslot <0-7> sub-slot <0-7> mdcx A.B.C.D <0-65535>",
- "BTS related commands\n" "BTS Number\n" "Transceiver\n" "Transceiver Number\n"
- "TRX Timeslot\n" "Timeslot Number\n" "Sub-Slot\n" "Sub-Slot Number\n"
- "Modify RTP Connection\n" "MGW IP Address\n" "MGW UDP Port\n")
-{
- struct gsm_bts_trx_ts *ts;
- struct gsm_lchan *lchan;
- int ss_nr = atoi(argv[3]);
- int port = atoi(argv[5]);
- struct in_addr ia;
- inet_aton(argv[4], &ia);
-
- ts = vty_get_ts(vty, argv[0], argv[1], argv[2]);
- if (!ts)
- return CMD_WARNING;
-
- lchan = &ts->lchan[ss_nr];
-
- if (ss_nr >= ts_subslots(ts)) {
- vty_out(vty, "%% subslot %d >= permitted %d for physical channel %s%s",
- ss_nr, ts_subslots(ts), gsm_pchan_name(ts->pchan), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty_out(vty, "%% connecting RTP of %s to %s:%u%s", gsm_lchan_name(lchan),
- inet_ntoa(ia), port, VTY_NEWLINE);
- rsl_ipacc_mdcx(lchan, ntohl(ia.s_addr), port, 0);
- return CMD_SUCCESS;
-}
-
-DEFUN(ctrl_trap, ctrl_trap_cmd,
- "ctrl-interface generate-trap TRAP VALUE",
- "Commands related to the CTRL Interface\n"
- "Generate a TRAP for test purpose\n"
- "Identity/Name of the TRAP variable\n"
- "Value of the TRAP variable\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- ctrl_cmd_send_trap(net->ctrl, argv[0], (char *) argv[1]);
- return CMD_SUCCESS;
-}
-
-extern int bsc_vty_init_extra(void);
-
-int bsc_vty_init(struct gsm_network *network)
-{
- cfg_ts_pchan_cmd.string =
- vty_cmd_string_from_valstr(tall_bsc_ctx,
- gsm_pchant_names,
- "phys_chan_config (", "|", ")",
- VTY_DO_LOWER);
- cfg_ts_pchan_cmd.doc =
- vty_cmd_string_from_valstr(tall_bsc_ctx,
- gsm_pchant_descs,
- "Physical Channel Combination\n",
- "\n", "", 0);
-
- cfg_bts_type_cmd.string =
- vty_cmd_string_from_valstr(tall_bsc_ctx,
- bts_type_names,
- "type (", "|", ")",
- VTY_DO_LOWER);
- cfg_bts_type_cmd.doc =
- vty_cmd_string_from_valstr(tall_bsc_ctx,
- bts_type_descs,
- "BTS Vendor/Type\n",
- "\n", "", 0);
-
- common_cs_vty_init(network, config_write_net);
-
- install_element_ve(&bsc_show_net_cmd);
- install_element_ve(&show_bts_cmd);
- install_element_ve(&show_trx_cmd);
- install_element_ve(&show_ts_cmd);
- install_element_ve(&show_lchan_cmd);
- install_element_ve(&show_lchan_summary_cmd);
-
- install_element_ve(&show_subscr_conn_cmd);
- install_element_ve(&handover_subscr_conn_cmd);
-
- install_element_ve(&show_paging_cmd);
- install_element_ve(&show_paging_group_cmd);
-
- logging_vty_add_cmds(NULL);
-
- install_element(GSMNET_NODE, &cfg_net_neci_cmd);
- install_element(GSMNET_NODE, &cfg_net_handover_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_win_rxlev_avg_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_win_rxqual_avg_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_win_rxlev_avg_neigh_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_pwr_interval_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_pwr_hysteresis_cmd);
- install_element(GSMNET_NODE, &cfg_net_ho_max_distance_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3101_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3103_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3105_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3107_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3109_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3111_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3113_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3115_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3117_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3119_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3122_cmd);
- install_element(GSMNET_NODE, &cfg_net_T3141_cmd);
- install_element(GSMNET_NODE, &cfg_net_dtx_cmd);
- install_element(GSMNET_NODE, &cfg_net_pag_any_tch_cmd);
-
- install_element(GSMNET_NODE, &cfg_bts_cmd);
- install_node(&bts_node, config_write_bts);
- vty_install_default(BTS_NODE);
- install_element(BTS_NODE, &cfg_bts_type_cmd);
- install_element(BTS_NODE, &cfg_description_cmd);
- install_element(BTS_NODE, &cfg_no_description_cmd);
- install_element(BTS_NODE, &cfg_bts_band_cmd);
- install_element(BTS_NODE, &cfg_bts_ci_cmd);
- install_element(BTS_NODE, &cfg_bts_dtxu_cmd);
- install_element(BTS_NODE, &cfg_bts_dtxd_cmd);
- install_element(BTS_NODE, &cfg_bts_no_dtxu_cmd);
- install_element(BTS_NODE, &cfg_bts_no_dtxd_cmd);
- install_element(BTS_NODE, &cfg_bts_lac_cmd);
- install_element(BTS_NODE, &cfg_bts_tsc_cmd);
- install_element(BTS_NODE, &cfg_bts_bsic_cmd);
- install_element(BTS_NODE, &cfg_bts_unit_id_cmd);
- install_element(BTS_NODE, &cfg_bts_rsl_ip_cmd);
- install_element(BTS_NODE, &cfg_bts_nokia_site_skip_reset_cmd);
- install_element(BTS_NODE, &cfg_bts_nokia_site_no_loc_rel_cnf_cmd);
- install_element(BTS_NODE, &cfg_bts_nokia_site_bts_reset_timer_cnf_cmd);
- install_element(BTS_NODE, &cfg_bts_stream_id_cmd);
- install_element(BTS_NODE, &cfg_bts_oml_e1_cmd);
- install_element(BTS_NODE, &cfg_bts_oml_e1_tei_cmd);
- install_element(BTS_NODE, &cfg_bts_challoc_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_tx_integer_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_max_trans_cmd);
- install_element(BTS_NODE, &cfg_bts_chan_desc_att_cmd);
- install_element(BTS_NODE, &cfg_bts_chan_desc_bs_pa_mfrms_cmd);
- install_element(BTS_NODE, &cfg_bts_chan_desc_bs_ag_blks_res_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_nm_b_thresh_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_nm_ldavg_cmd);
- install_element(BTS_NODE, &cfg_bts_cell_barred_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_ec_allowed_cmd);
- install_element(BTS_NODE, &cfg_bts_rach_ac_class_cmd);
- install_element(BTS_NODE, &cfg_bts_ms_max_power_cmd);
- install_element(BTS_NODE, &cfg_bts_cell_resel_hyst_cmd);
- install_element(BTS_NODE, &cfg_bts_rxlev_acc_min_cmd);
- install_element(BTS_NODE, &cfg_bts_cell_bar_qualify_cmd);
- install_element(BTS_NODE, &cfg_bts_cell_resel_ofs_cmd);
- install_element(BTS_NODE, &cfg_bts_temp_ofs_cmd);
- install_element(BTS_NODE, &cfg_bts_temp_ofs_inf_cmd);
- install_element(BTS_NODE, &cfg_bts_penalty_time_cmd);
- install_element(BTS_NODE, &cfg_bts_penalty_time_rsvd_cmd);
- install_element(BTS_NODE, &cfg_bts_radio_link_timeout_cmd);
- install_element(BTS_NODE, &cfg_bts_radio_link_timeout_inf_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_mode_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_11bit_rach_support_for_egprs_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_ns_timer_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_rac_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_net_ctrl_ord_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_ctrl_ack_cmd);
- install_element(BTS_NODE, &cfg_no_bts_gprs_ctrl_ack_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_bvci_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_cell_timer_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_nsei_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_nsvci_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_nsvc_lport_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_nsvc_rport_cmd);
- install_element(BTS_NODE, &cfg_bts_gprs_nsvc_rip_cmd);
- install_element(BTS_NODE, &cfg_bts_pag_free_cmd);
- install_element(BTS_NODE, &cfg_bts_si_mode_cmd);
- install_element(BTS_NODE, &cfg_bts_si_static_cmd);
- install_element(BTS_NODE, &cfg_bts_early_cm_cmd);
- install_element(BTS_NODE, &cfg_bts_neigh_mode_cmd);
- install_element(BTS_NODE, &cfg_bts_neigh_cmd);
- install_element(BTS_NODE, &cfg_bts_si5_neigh_cmd);
- install_element(BTS_NODE, &cfg_bts_si2quater_neigh_add_cmd);
- install_element(BTS_NODE, &cfg_bts_si2quater_neigh_del_cmd);
- install_element(BTS_NODE, &cfg_bts_si2quater_uarfcn_add_cmd);
- install_element(BTS_NODE, &cfg_bts_si2quater_uarfcn_del_cmd);
- install_element(BTS_NODE, &cfg_bts_excl_rf_lock_cmd);
- install_element(BTS_NODE, &cfg_bts_no_excl_rf_lock_cmd);
- install_element(BTS_NODE, &cfg_bts_force_comb_si_cmd);
- install_element(BTS_NODE, &cfg_bts_no_force_comb_si_cmd);
- install_element(BTS_NODE, &cfg_bts_codec0_cmd);
- install_element(BTS_NODE, &cfg_bts_codec1_cmd);
- install_element(BTS_NODE, &cfg_bts_codec2_cmd);
- install_element(BTS_NODE, &cfg_bts_codec3_cmd);
- install_element(BTS_NODE, &cfg_bts_codec4_cmd);
- install_element(BTS_NODE, &cfg_bts_depends_on_cmd);
- install_element(BTS_NODE, &cfg_bts_no_depends_on_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_modes1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_modes2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_modes3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_modes4_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_thres1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_thres2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_thres3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_hyst1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_hyst2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_hyst3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_fr_start_mode_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_modes1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_modes2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_modes3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_modes4_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_thres1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_thres2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_thres3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_hyst1_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_hyst2_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_hyst3_cmd);
- install_element(BTS_NODE, &cfg_bts_amr_hr_start_mode_cmd);
- install_element(BTS_NODE, &cfg_bts_pcu_sock_cmd);
-
- install_element(BTS_NODE, &cfg_trx_cmd);
- install_node(&trx_node, dummy_config_write);
- vty_install_default(TRX_NODE);
- install_element(TRX_NODE, &cfg_trx_arfcn_cmd);
- install_element(TRX_NODE, &cfg_description_cmd);
- install_element(TRX_NODE, &cfg_no_description_cmd);
- install_element(TRX_NODE, &cfg_trx_nominal_power_cmd);
- install_element(TRX_NODE, &cfg_trx_max_power_red_cmd);
- install_element(TRX_NODE, &cfg_trx_rsl_e1_cmd);
- install_element(TRX_NODE, &cfg_trx_rsl_e1_tei_cmd);
- install_element(TRX_NODE, &cfg_trx_rf_locked_cmd);
-
- install_element(TRX_NODE, &cfg_ts_cmd);
- install_node(&ts_node, dummy_config_write);
- vty_install_default(TS_NODE);
- install_element(TS_NODE, &cfg_ts_pchan_cmd);
- install_element(TS_NODE, &cfg_ts_pchan_compat_cmd);
- install_element(TS_NODE, &cfg_ts_tsc_cmd);
- install_element(TS_NODE, &cfg_ts_hopping_cmd);
- install_element(TS_NODE, &cfg_ts_hsn_cmd);
- install_element(TS_NODE, &cfg_ts_maio_cmd);
- install_element(TS_NODE, &cfg_ts_arfcn_add_cmd);
- install_element(TS_NODE, &cfg_ts_arfcn_del_cmd);
- install_element(TS_NODE, &cfg_ts_e1_subslot_cmd);
-
- install_element(ENABLE_NODE, &drop_bts_cmd);
- install_element(ENABLE_NODE, &restart_bts_cmd);
- install_element(ENABLE_NODE, &bts_resend_cmd);
- install_element(ENABLE_NODE, &pdch_act_cmd);
- install_element(ENABLE_NODE, &lchan_act_cmd);
- install_element(ENABLE_NODE, &lchan_mdcx_cmd);
- install_element(ENABLE_NODE, &smscb_cmd_cmd);
- install_element(ENABLE_NODE, &ctrl_trap_cmd);
-
- abis_nm_vty_init();
- abis_om2k_vty_init();
- e1inp_vty_init();
- osmo_fsm_vty_add_cmds();
-
- bsc_vty_init_extra();
-
- return 0;
-}
diff --git a/src/libbsc/bts_ericsson_rbs2000.c b/src/libbsc/bts_ericsson_rbs2000.c
deleted file mode 100644
index 99da4e75f..000000000
--- a/src/libbsc/bts_ericsson_rbs2000.c
+++ /dev/null
@@ -1,204 +0,0 @@
-/* Ericsson RBS-2xxx specific code */
-
-/* (C) 2011 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <osmocom/gsm/tlv.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_om2000.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/signal.h>
-
-#include <osmocom/abis/lapd.h>
-
-static void bootstrap_om_bts(struct gsm_bts *bts)
-{
- LOGP(DNM, LOGL_NOTICE, "bootstrapping OML for BTS %u\n", bts->nr);
-
- /* FIXME: this is global init, not bootstrapping */
- abis_om2k_bts_init(bts);
- abis_om2k_trx_init(bts->c0);
-
- /* TODO: Should we wait for a Failure report? */
- om2k_bts_fsm_start(bts);
-}
-
-static void bootstrap_om_trx(struct gsm_bts_trx *trx)
-{
- LOGP(DNM, LOGL_NOTICE, "bootstrapping OML for TRX %u/%u\n",
- trx->bts->nr, trx->nr);
- /* FIXME */
-}
-
-static int shutdown_om(struct gsm_bts *bts)
-{
- /* FIXME */
- return 0;
-}
-
-
-/* Tell LAPD to start start the SAP (send SABM requests) for all signalling
- * timeslots in this line */
-static void start_sabm_in_line(struct e1inp_line *line, int start)
-{
- struct e1inp_sign_link *link;
- int i;
-
- for (i = 0; i < ARRAY_SIZE(line->ts); i++) {
- struct e1inp_ts *ts = &line->ts[i];
-
- if (ts->type != E1INP_TS_TYPE_SIGN)
- continue;
-
- llist_for_each_entry(link, &ts->sign.sign_links, list) {
- if (!ts->lapd)
- continue;
- lapd_instance_set_profile(ts->lapd,
- &lapd_profile_abis_ericsson);
-
- if (start)
- lapd_sap_start(ts->lapd, link->tei, link->sapi);
- else
- lapd_sap_stop(ts->lapd, link->tei, link->sapi);
- }
- }
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int gbl_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_bts *bts;
-
- if (subsys != SS_L_GLOBAL)
- return 0;
-
- switch (signal) {
- case S_GLOBAL_BTS_CLOSE_OM:
- bts = signal_data;
- if (bts->type == GSM_BTS_TYPE_RBS2000)
- shutdown_om(signal_data);
- break;
- }
-
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int inp_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct input_signal_data *isd = signal_data;
- struct e1inp_ts *e1i_ts;
-
- if (subsys != SS_L_INPUT)
- return 0;
-
- LOGP(DNM, LOGL_DEBUG, "%s(): Input signal '%s' received\n", __func__,
- get_value_string(e1inp_signal_names, signal));
- switch (signal) {
- case S_L_INP_TEI_UP:
- switch (isd->link_type) {
- case E1INP_SIGN_OML:
- if (isd->trx->bts->type != GSM_BTS_TYPE_RBS2000)
- break;
- if (isd->tei == isd->trx->bts->oml_tei)
- bootstrap_om_bts(isd->trx->bts);
- else
- bootstrap_om_trx(isd->trx);
- break;
- }
- break;
- case S_L_INP_TEI_DN:
- if (isd->trx->bts->type != GSM_BTS_TYPE_RBS2000)
- break;
- LOGP(DNM, LOGL_NOTICE, "Line-%u TS-%u TEI-%u SAPI-%u: Link "
- "Lost for Ericsson RBS2000. Re-starting DL Establishment\n",
- isd->line->num, isd->ts_nr, isd->tei, isd->sapi);
- /* Some datalink for a given TEI/SAPI went down, try to re-start it */
- e1i_ts = &isd->line->ts[isd->ts_nr-1];
- OSMO_ASSERT(e1i_ts->type == E1INP_TS_TYPE_SIGN);
- lapd_sap_start(e1i_ts->lapd, isd->tei, isd->sapi);
- break;
- case S_L_INP_LINE_INIT:
- case S_L_INP_LINE_NOALARM:
- if (strcasecmp(isd->line->driver->name, "DAHDI")
- && strcasecmp(isd->line->driver->name, "MISDN_LAPD")
- && strcasecmp(isd->line->driver->name, "UNIXSOCKET"))
- break;
- start_sabm_in_line(isd->line, 1);
- break;
- case S_L_INP_LINE_ALARM:
- if (strcasecmp(isd->line->driver->name, "DAHDI")
- && strcasecmp(isd->line->driver->name, "MISDN_LAPD")
- && strcasecmp(isd->line->driver->name, "UNIXSOCKET"))
- break;
- start_sabm_in_line(isd->line, 0);
- break;
- }
-
- return 0;
-}
-
-static void config_write_bts(struct vty *vty, struct gsm_bts *bts)
-{
- abis_om2k_config_write_bts(vty, bts);
-}
-
-static int bts_model_rbs2k_start(struct gsm_network *net);
-
-static void bts_model_rbs2k_e1line_bind_ops(struct e1inp_line *line)
-{
- e1inp_line_bind_ops(line, &bts_isdn_e1inp_line_ops);
-}
-
-static struct gsm_bts_model model_rbs2k = {
- .type = GSM_BTS_TYPE_RBS2000,
- .name = "rbs2000",
- .start = bts_model_rbs2k_start,
- .oml_rcvmsg = &abis_om2k_rcvmsg,
- .config_write_bts = &config_write_bts,
- .e1line_bind_ops = &bts_model_rbs2k_e1line_bind_ops,
-};
-
-static int bts_model_rbs2k_start(struct gsm_network *net)
-{
- model_rbs2k.features.data = &model_rbs2k._features_data[0];
- model_rbs2k.features.data_len = sizeof(model_rbs2k._features_data);
-
- gsm_btsmodel_set_feature(&model_rbs2k, BTS_FEAT_GPRS);
- gsm_btsmodel_set_feature(&model_rbs2k, BTS_FEAT_EGPRS);
- gsm_btsmodel_set_feature(&model_rbs2k, BTS_FEAT_HOPPING);
- gsm_btsmodel_set_feature(&model_rbs2k, BTS_FEAT_HSCSD);
- gsm_btsmodel_set_feature(&model_rbs2k, BTS_FEAT_MULTI_TSC);
-
- osmo_signal_register_handler(SS_L_INPUT, inp_sig_cb, NULL);
- osmo_signal_register_handler(SS_L_GLOBAL, gbl_sig_cb, NULL);
-
- return 0;
-}
-
-int bts_model_rbs2k_init(void)
-{
- return gsm_bts_model_register(&model_rbs2k);
-}
diff --git a/src/libbsc/bts_init.c b/src/libbsc/bts_init.c
deleted file mode 100644
index d6b152a79..000000000
--- a/src/libbsc/bts_init.c
+++ /dev/null
@@ -1,30 +0,0 @@
-/* (C) 2011 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-#include <openbsc/bss.h>
-
-int bts_init(void)
-{
- bts_model_bs11_init();
- bts_model_rbs2k_init();
- bts_model_nanobts_init();
- bts_model_nokia_site_init();
- bts_model_sysmobts_init();
- /* Your new BTS here. */
- return 0;
-}
diff --git a/src/libbsc/bts_ipaccess_nanobts.c b/src/libbsc/bts_ipaccess_nanobts.c
deleted file mode 100644
index a1bde778f..000000000
--- a/src/libbsc/bts_ipaccess_nanobts.c
+++ /dev/null
@@ -1,520 +0,0 @@
-/* ip.access nanoBTS specific code */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <arpa/inet.h>
-
-#include <osmocom/gsm/tlv.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/debug.h>
-#include <osmocom/abis/subchan_demux.h>
-#include <osmocom/gsm/ipa.h>
-#include <osmocom/abis/ipaccess.h>
-#include <osmocom/core/logging.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/bts_ipaccess_nanobts_omlattr.h>
-
-extern struct gsm_network *bsc_gsmnet;
-
-static int bts_model_nanobts_start(struct gsm_network *net);
-static void bts_model_nanobts_e1line_bind_ops(struct e1inp_line *line);
-
-struct gsm_bts_model bts_model_nanobts = {
- .type = GSM_BTS_TYPE_NANOBTS,
- .name = "nanobts",
- .start = bts_model_nanobts_start,
- .oml_rcvmsg = &abis_nm_rcvmsg,
- .e1line_bind_ops = bts_model_nanobts_e1line_bind_ops,
- .nm_att_tlvdef = {
- .def = {
- /* ip.access specifics */
- [NM_ATT_IPACC_DST_IP] = { TLV_TYPE_FIXED, 4 },
- [NM_ATT_IPACC_DST_IP_PORT] = { TLV_TYPE_FIXED, 2 },
- [NM_ATT_IPACC_STREAM_ID] = { TLV_TYPE_TV, },
- [NM_ATT_IPACC_SEC_OML_CFG] = { TLV_TYPE_FIXED, 6 },
- [NM_ATT_IPACC_IP_IF_CFG] = { TLV_TYPE_FIXED, 8 },
- [NM_ATT_IPACC_IP_GW_CFG] = { TLV_TYPE_FIXED, 12 },
- [NM_ATT_IPACC_IN_SERV_TIME] = { TLV_TYPE_FIXED, 4 },
- [NM_ATT_IPACC_LOCATION] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_PAGING_CFG] = { TLV_TYPE_FIXED, 2 },
- [NM_ATT_IPACC_UNIT_ID] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_UNIT_NAME] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_SNMP_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_PRIM_OML_CFG_LIST] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_NV_FLAGS] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_FREQ_CTRL] = { TLV_TYPE_FIXED, 2 },
- [NM_ATT_IPACC_PRIM_OML_FB_TOUT] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_CUR_SW_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_TIMING_BUS] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_CGI] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_RAC] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_OBJ_VERSION] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_GPRS_PAGING_CFG]= { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_NSEI] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_BVCI] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_NSVCI] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_NS_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_BSSGP_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_NS_LINK_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_RLC_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_ALM_THRESH_LIST]= { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_MONIT_VAL_LIST] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_TIB_CONTROL] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_SUPP_FEATURES] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_CODING_SCHEMES] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_RLC_CFG_2] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_HEARTB_TOUT] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_UPTIME] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_RLC_CFG_3] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_SSL_CFG] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_SEC_POSSIBLE] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_IML_SSL_STATE] = { TLV_TYPE_TL16V },
- [NM_ATT_IPACC_REVOC_DATE] = { TLV_TYPE_TL16V },
- },
- },
-};
-
-
-/* Callback function to be called whenever we get a GSM 12.21 state change event */
-static int nm_statechg_event(int evt, struct nm_statechg_signal_data *nsd)
-{
- uint8_t obj_class = nsd->obj_class;
- void *obj = nsd->obj;
- struct gsm_nm_state *new_state = nsd->new_state;
-
- struct gsm_bts *bts;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
- struct gsm_bts_gprs_nsvc *nsvc;
-
- struct msgb *msgb;
-
- if (!is_ipaccess_bts(nsd->bts))
- return 0;
-
- /* This event-driven BTS setup is currently only required on nanoBTS */
-
- /* S_NM_STATECHG_ADM is called after we call chg_adm_state() and would create
- * endless loop */
- if (evt != S_NM_STATECHG_OPER)
- return 0;
-
- switch (obj_class) {
- case NM_OC_SITE_MANAGER:
- bts = container_of(obj, struct gsm_bts, site_mgr);
- if ((new_state->operational == NM_OPSTATE_ENABLED &&
- new_state->availability == NM_AVSTATE_OK) ||
- (new_state->operational == NM_OPSTATE_DISABLED &&
- new_state->availability == NM_AVSTATE_OFF_LINE))
- abis_nm_opstart(bts, obj_class, 0xff, 0xff, 0xff);
- break;
- case NM_OC_BTS:
- bts = obj;
- if (new_state->availability == NM_AVSTATE_DEPENDENCY) {
- msgb = nanobts_attr_bts_get(bts);
- abis_nm_set_bts_attr(bts, msgb->data, msgb->len);
- msgb_free(msgb);
- abis_nm_chg_adm_state(bts, obj_class,
- bts->bts_nr, 0xff, 0xff,
- NM_STATE_UNLOCKED);
- abis_nm_opstart(bts, obj_class,
- bts->bts_nr, 0xff, 0xff);
- }
- break;
- case NM_OC_CHANNEL:
- ts = obj;
- trx = ts->trx;
- if (new_state->operational == NM_OPSTATE_DISABLED &&
- new_state->availability == NM_AVSTATE_DEPENDENCY) {
- enum abis_nm_chan_comb ccomb =
- abis_nm_chcomb4pchan(ts->pchan);
- if (abis_nm_set_channel_attr(ts, ccomb) == -EINVAL) {
- ipaccess_drop_oml(trx->bts);
- return -1;
- }
- abis_nm_chg_adm_state(trx->bts, obj_class,
- trx->bts->bts_nr, trx->nr, ts->nr,
- NM_STATE_UNLOCKED);
- abis_nm_opstart(trx->bts, obj_class,
- trx->bts->bts_nr, trx->nr, ts->nr);
- }
- if (new_state->operational == NM_OPSTATE_ENABLED
- && new_state->availability == NM_AVSTATE_OK)
- dyn_ts_init(ts);
- break;
- case NM_OC_RADIO_CARRIER:
- trx = obj;
- if (new_state->operational == NM_OPSTATE_DISABLED &&
- new_state->availability == NM_AVSTATE_OK)
- abis_nm_opstart(trx->bts, obj_class, trx->bts->bts_nr,
- trx->nr, 0xff);
- break;
- case NM_OC_GPRS_NSE:
- bts = container_of(obj, struct gsm_bts, gprs.nse);
- if (bts->gprs.mode == BTS_GPRS_NONE)
- break;
- if (new_state->availability == NM_AVSTATE_DEPENDENCY) {
- msgb = nanobts_attr_nse_get(bts);
- abis_nm_ipaccess_set_attr(bts, obj_class, bts->bts_nr,
- 0xff, 0xff, msgb->data,
- msgb->len);
- msgb_free(msgb);
- abis_nm_opstart(bts, obj_class, bts->bts_nr,
- 0xff, 0xff);
- }
- break;
- case NM_OC_GPRS_CELL:
- bts = container_of(obj, struct gsm_bts, gprs.cell);
- if (bts->gprs.mode == BTS_GPRS_NONE)
- break;
- if (new_state->availability == NM_AVSTATE_DEPENDENCY) {
- msgb = nanobts_attr_cell_get(bts);
- abis_nm_ipaccess_set_attr(bts, obj_class, bts->bts_nr,
- 0, 0xff, msgb->data,
- msgb->len);
- msgb_free(msgb);
- abis_nm_opstart(bts, obj_class, bts->bts_nr,
- 0, 0xff);
- abis_nm_chg_adm_state(bts, obj_class, bts->bts_nr,
- 0, 0xff, NM_STATE_UNLOCKED);
- abis_nm_chg_adm_state(bts, NM_OC_GPRS_NSE, bts->bts_nr,
- 0xff, 0xff, NM_STATE_UNLOCKED);
- }
- break;
- case NM_OC_GPRS_NSVC:
- nsvc = obj;
- bts = nsvc->bts;
- if (bts->gprs.mode == BTS_GPRS_NONE)
- break;
- /* We skip NSVC1 since we only use NSVC0 */
- if (nsvc->id == 1)
- break;
- if ((new_state->availability == NM_AVSTATE_OFF_LINE) ||
- (new_state->availability == NM_AVSTATE_DEPENDENCY)) {
- msgb = nanobts_attr_nscv_get(bts);
- abis_nm_ipaccess_set_attr(bts, obj_class, bts->bts_nr,
- nsvc->id, 0xff,
- msgb->data, msgb->len);
- msgb_free(msgb);
- abis_nm_opstart(bts, obj_class, bts->bts_nr,
- nsvc->id, 0xff);
- abis_nm_chg_adm_state(bts, obj_class, bts->bts_nr,
- nsvc->id, 0xff,
- NM_STATE_UNLOCKED);
- }
- default:
- break;
- }
- return 0;
-}
-
-/* Callback function to be called every time we receive a 12.21 SW activated report */
-static int sw_activ_rep(struct msgb *mb)
-{
- struct abis_om_fom_hdr *foh = msgb_l3(mb);
- struct e1inp_sign_link *sign_link = mb->dst;
- struct gsm_bts *bts = sign_link->trx->bts;
- struct gsm_bts_trx *trx = gsm_bts_trx_num(bts, foh->obj_inst.trx_nr);
-
- if (!trx)
- return -EINVAL;
-
- if (!is_ipaccess_bts(trx->bts))
- return 0;
-
- switch (foh->obj_class) {
- case NM_OC_BASEB_TRANSC:
- abis_nm_chg_adm_state(trx->bts, foh->obj_class,
- trx->bts->bts_nr, trx->nr, 0xff,
- NM_STATE_UNLOCKED);
- abis_nm_opstart(trx->bts, foh->obj_class,
- trx->bts->bts_nr, trx->nr, 0xff);
- /* TRX software is active, tell it to initiate RSL Link */
- abis_nm_ipaccess_rsl_connect(trx, trx->bts->ip_access.rsl_ip,
- 3003, trx->rsl_tei);
- break;
- case NM_OC_RADIO_CARRIER: {
- /*
- * Locking the radio carrier will make it go
- * offline again and we would come here. The
- * framework should determine that there was
- * no change and avoid recursion.
- *
- * This code is here to make sure that on start
- * a TRX remains locked.
- */
- int rc_state = trx->mo.nm_state.administrative;
- /* Patch ARFCN into radio attribute */
- struct msgb *msgb = nanobts_attr_radio_get(trx->bts, trx);
- abis_nm_set_radio_attr(trx, msgb->data, msgb->len);
- msgb_free(msgb);
- abis_nm_chg_adm_state(trx->bts, foh->obj_class,
- trx->bts->bts_nr, trx->nr, 0xff,
- rc_state);
- abis_nm_opstart(trx->bts, foh->obj_class, trx->bts->bts_nr,
- trx->nr, 0xff);
- break;
- }
- }
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from NM */
-static int bts_ipa_nm_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- if (subsys != SS_NM)
- return 0;
-
- switch (signal) {
- case S_NM_SW_ACTIV_REP:
- return sw_activ_rep(signal_data);
- case S_NM_STATECHG_OPER:
- case S_NM_STATECHG_ADM:
- return nm_statechg_event(signal, signal_data);
- default:
- break;
- }
- return 0;
-}
-
-static int bts_model_nanobts_start(struct gsm_network *net)
-{
- osmo_signal_unregister_handler(SS_NM, bts_ipa_nm_sig_cb, NULL);
- osmo_signal_register_handler(SS_NM, bts_ipa_nm_sig_cb, NULL);
- return 0;
-}
-
-int bts_model_nanobts_init(void)
-{
- bts_model_nanobts.features.data = &bts_model_nanobts._features_data[0];
- bts_model_nanobts.features.data_len =
- sizeof(bts_model_nanobts._features_data);
-
- gsm_btsmodel_set_feature(&bts_model_nanobts, BTS_FEAT_GPRS);
- gsm_btsmodel_set_feature(&bts_model_nanobts, BTS_FEAT_EGPRS);
- gsm_btsmodel_set_feature(&bts_model_nanobts, BTS_FEAT_MULTI_TSC);
-
- return gsm_bts_model_register(&bts_model_nanobts);
-}
-
-#define OML_UP 0x0001
-#define RSL_UP 0x0002
-
-static struct gsm_bts *
-find_bts_by_unitid(struct gsm_network *net, uint16_t site_id, uint16_t bts_id)
-{
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- if (!is_ipaccess_bts(bts))
- continue;
-
- if (bts->ip_access.site_id == site_id &&
- bts->ip_access.bts_id == bts_id)
- return bts;
- }
- return NULL;
-}
-
-/* These are exported because they are used by the VTY interface. */
-void ipaccess_drop_rsl(struct gsm_bts_trx *trx)
-{
- if (!trx->rsl_link)
- return;
-
- e1inp_sign_link_destroy(trx->rsl_link);
- trx->rsl_link = NULL;
-}
-
-void ipaccess_drop_oml(struct gsm_bts *bts)
-{
- struct gsm_bts *rdep_bts;
- struct gsm_bts_trx *trx;
-
- if (!bts->oml_link)
- return;
-
- e1inp_sign_link_destroy(bts->oml_link);
- bts->oml_link = NULL;
-
- /* we have issues reconnecting RSL, drop everything. */
- llist_for_each_entry(trx, &bts->trx_list, list)
- ipaccess_drop_rsl(trx);
-
- bts->ip_access.flags = 0;
-
- /*
- * Go through the list and see if we are the depndency of a BTS
- * and then drop the BTS. This can lead to some recursion but it
- * should be fine in userspace.
- * The oml_link is serving as recursion anchor for us and
- * it is set to NULL some lines above.
- */
- llist_for_each_entry(rdep_bts, &bts->network->bts_list, list) {
- if (!bts_depend_is_depedency(rdep_bts, bts))
- continue;
- LOGP(DLINP, LOGL_NOTICE, "Dropping BTS(%u) due BTS(%u).\n",
- rdep_bts->nr, bts->nr);
- ipaccess_drop_oml(rdep_bts);
- }
-}
-
-/* This function is called once the OML/RSL link becomes up. */
-static struct e1inp_sign_link *
-ipaccess_sign_link_up(void *unit_data, struct e1inp_line *line,
- enum e1inp_sign_type type)
-{
- struct gsm_bts *bts;
- struct ipaccess_unit *dev = unit_data;
- struct e1inp_sign_link *sign_link = NULL;
-
- bts = find_bts_by_unitid(bsc_gsmnet, dev->site_id, dev->bts_id);
- if (!bts) {
- LOGP(DLINP, LOGL_ERROR, "Unable to find BTS configuration for "
- " %u/%u/%u, disconnecting\n", dev->site_id,
- dev->bts_id, dev->trx_id);
- return NULL;
- }
- DEBUGP(DLINP, "Identified BTS %u/%u/%u\n",
- dev->site_id, dev->bts_id, dev->trx_id);
-
- switch(type) {
- case E1INP_SIGN_OML:
- /* remove old OML signal link for this BTS. */
- ipaccess_drop_oml(bts);
-
- if (!bts_depend_check(bts)) {
- LOGP(DLINP, LOGL_NOTICE,
- "Dependency not full-filled for %u/%u/%u\n",
- dev->site_id, dev->bts_id, dev->trx_id);
- return NULL;
- }
-
- /* create new OML link. */
- sign_link = bts->oml_link =
- e1inp_sign_link_create(&line->ts[E1INP_SIGN_OML - 1],
- E1INP_SIGN_OML, bts->c0,
- bts->oml_tei, 0);
- break;
- case E1INP_SIGN_RSL: {
- struct e1inp_ts *ts;
- struct gsm_bts_trx *trx = gsm_bts_trx_num(bts, dev->trx_id);
-
- /* no OML link set yet? give up. */
- if (!bts->oml_link || !trx)
- return NULL;
-
- /* remove old RSL link for this TRX. */
- ipaccess_drop_rsl(trx);
-
- /* set new RSL link for this TRX. */
- line = bts->oml_link->ts->line;
- ts = &line->ts[E1INP_SIGN_RSL + dev->trx_id - 1];
- e1inp_ts_config_sign(ts, line);
- sign_link = trx->rsl_link =
- e1inp_sign_link_create(ts, E1INP_SIGN_RSL,
- trx, trx->rsl_tei, 0);
- trx->rsl_link->ts->sign.delay = 0;
- break;
- }
- default:
- break;
- }
- return sign_link;
-}
-
-static void ipaccess_sign_link_down(struct e1inp_line *line)
-{
- /* No matter what link went down, we close both signal links. */
- struct e1inp_ts *ts = &line->ts[E1INP_SIGN_OML-1];
- struct e1inp_sign_link *link;
-
- llist_for_each_entry(link, &ts->sign.sign_links, list) {
- struct gsm_bts *bts = link->trx->bts;
-
- ipaccess_drop_oml(bts);
- /* Yes, we only use the first element of the list. */
- break;
- }
-}
-
-/* This function is called if we receive one OML/RSL message. */
-static int ipaccess_sign_link(struct msgb *msg)
-{
- int ret = 0;
- struct e1inp_sign_link *link = msg->dst;
- struct e1inp_ts *e1i_ts = link->ts;
-
- switch (link->type) {
- case E1INP_SIGN_RSL:
- if (!(link->trx->bts->ip_access.flags &
- (RSL_UP << link->trx->nr))) {
- e1inp_event(e1i_ts, S_L_INP_TEI_UP,
- link->tei, link->sapi);
- link->trx->bts->ip_access.flags |=
- (RSL_UP << link->trx->nr);
- }
- ret = abis_rsl_rcvmsg(msg);
- break;
- case E1INP_SIGN_OML:
- if (!(link->trx->bts->ip_access.flags & OML_UP)) {
- e1inp_event(e1i_ts, S_L_INP_TEI_UP,
- link->tei, link->sapi);
- link->trx->bts->ip_access.flags |= OML_UP;
- }
- ret = abis_nm_rcvmsg(msg);
- break;
- default:
- LOGP(DLINP, LOGL_ERROR, "Unknown signal link type %d\n",
- link->type);
- msgb_free(msg);
- break;
- }
- return ret;
-}
-
-/* not static, ipaccess-config needs it. */
-struct e1inp_line_ops ipaccess_e1inp_line_ops = {
- .cfg = {
- .ipa = {
- .addr = "0.0.0.0",
- .role = E1INP_LINE_R_BSC,
- },
- },
- .sign_link_up = ipaccess_sign_link_up,
- .sign_link_down = ipaccess_sign_link_down,
- .sign_link = ipaccess_sign_link,
-};
-
-static void bts_model_nanobts_e1line_bind_ops(struct e1inp_line *line)
-{
- e1inp_line_bind_ops(line, &ipaccess_e1inp_line_ops);
-}
diff --git a/src/libbsc/bts_ipaccess_nanobts_omlattr.c b/src/libbsc/bts_ipaccess_nanobts_omlattr.c
deleted file mode 100644
index 473e1caea..000000000
--- a/src/libbsc/bts_ipaccess_nanobts_omlattr.c
+++ /dev/null
@@ -1,240 +0,0 @@
-/* ip.access nanoBTS specific code, OML attribute table generator */
-
-/* (C) 2016 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- */
-
-#include <arpa/inet.h>
-#include <osmocom/core/msgb.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-
-static void patch_16(uint8_t *data, const uint16_t val)
-{
- memcpy(data, &val, sizeof(val));
-}
-
-static void patch_32(uint8_t *data, const uint32_t val)
-{
- memcpy(data, &val, sizeof(val));
-}
-
-struct msgb *nanobts_attr_bts_get(struct gsm_bts *bts)
-{
- struct msgb *msgb;
- uint8_t buf[256];
- int rlt;
- msgb = msgb_alloc(1024, "nanobts_attr_bts");
-
- memcpy(buf, "\x55\x5b\x61\x67\x6d\x73", 6);
- msgb_tv_fixed_put(msgb, NM_ATT_INTERF_BOUND, 6, buf);
-
- /* interference avg. period in numbers of SACCH multifr */
- msgb_tv_put(msgb, NM_ATT_INTAVE_PARAM, 0x06);
-
- rlt = gsm_bts_get_radio_link_timeout(bts);
- if (rlt == -1) {
- /* Osmocom extension: Use infinite radio link timeout */
- buf[0] = 0xFF;
- buf[1] = 0x00;
- } else {
- /* conn fail based on SACCH error rate */
- buf[0] = 0x01;
- buf[1] = rlt;
- }
- msgb_tl16v_put(msgb, NM_ATT_CONN_FAIL_CRIT, 2, buf);
-
- memcpy(buf, "\x1e\x24\x24\xa8\x34\x21\xa8", 7);
- msgb_tv_fixed_put(msgb, NM_ATT_T200, 7, buf);
-
- msgb_tv_put(msgb, NM_ATT_MAX_TA, 0x3f);
-
- /* seconds */
- memcpy(buf, "\x00\x01\x0a", 3);
- msgb_tv_fixed_put(msgb, NM_ATT_OVERL_PERIOD, 3, buf);
-
- /* percent */
- msgb_tv_put(msgb, NM_ATT_CCCH_L_T, 10);
-
- /* seconds */
- msgb_tv_put(msgb, NM_ATT_CCCH_L_I_P, 1);
-
- /* busy threshold in - dBm */
- buf[0] = 10;
- if (bts->rach_b_thresh != -1)
- buf[0] = bts->rach_b_thresh & 0xff;
- msgb_tv_put(msgb, NM_ATT_RACH_B_THRESH, buf[0]);
-
- /* rach load averaging 1000 slots */
- buf[0] = 0x03;
- buf[1] = 0xe8;
- if (bts->rach_ldavg_slots != -1) {
- buf[0] = (bts->rach_ldavg_slots >> 8) & 0x0f;
- buf[1] = bts->rach_ldavg_slots & 0xff;
- }
- msgb_tv_fixed_put(msgb, NM_ATT_LDAVG_SLOTS, 2, buf);
-
- /* miliseconds */
- msgb_tv_put(msgb, NM_ATT_BTS_AIR_TIMER, 128);
-
- /* 10 retransmissions of physical config */
- msgb_tv_put(msgb, NM_ATT_NY1, 10);
-
- buf[0] = (bts->c0->arfcn >> 8) & 0x0f;
- buf[1] = bts->c0->arfcn & 0xff;
- msgb_tv_fixed_put(msgb, NM_ATT_BCCH_ARFCN, 2, buf);
-
- msgb_tv_put(msgb, NM_ATT_BSIC, bts->bsic);
-
- abis_nm_ipaccess_cgi(buf, bts);
- msgb_tl16v_put(msgb, NM_ATT_IPACC_CGI, 7, buf);
-
- return msgb;
-}
-
-struct msgb *nanobts_attr_nse_get(struct gsm_bts *bts)
-{
- struct msgb *msgb;
- uint8_t buf[256];
- msgb = msgb_alloc(1024, "nanobts_attr_bts");
-
- /* NSEI 925 */
- buf[0] = bts->gprs.nse.nsei >> 8;
- buf[1] = bts->gprs.nse.nsei & 0xff;
- msgb_tl16v_put(msgb, NM_ATT_IPACC_NSEI, 2, buf);
-
- /* all timers in seconds */
- OSMO_ASSERT(ARRAY_SIZE(bts->gprs.nse.timer) < sizeof(buf));
- memcpy(buf, bts->gprs.nse.timer, ARRAY_SIZE(bts->gprs.nse.timer));
- msgb_tl16v_put(msgb, NM_ATT_IPACC_NS_CFG, 7, buf);
-
- /* all timers in seconds */
- buf[0] = 3; /* blockimg timer (T1) */
- buf[1] = 3; /* blocking retries */
- buf[2] = 3; /* unblocking retries */
- buf[3] = 3; /* reset timer (T2) */
- buf[4] = 3; /* reset retries */
- buf[5] = 10; /* suspend timer (T3) in 100ms */
- buf[6] = 3; /* suspend retries */
- buf[7] = 10; /* resume timer (T4) in 100ms */
- buf[8] = 3; /* resume retries */
- buf[9] = 10; /* capability update timer (T5) */
- buf[10] = 3; /* capability update retries */
-
- OSMO_ASSERT(ARRAY_SIZE(bts->gprs.cell.timer) < sizeof(buf));
- memcpy(buf, bts->gprs.cell.timer, ARRAY_SIZE(bts->gprs.cell.timer));
- msgb_tl16v_put(msgb, NM_ATT_IPACC_BSSGP_CFG, 11, buf);
-
- return msgb;
-}
-
-struct msgb *nanobts_attr_cell_get(struct gsm_bts *bts)
-{
- struct msgb *msgb;
- uint8_t buf[256];
- msgb = msgb_alloc(1024, "nanobts_attr_bts");
-
- /* routing area code */
- buf[0] = bts->gprs.rac;
- msgb_tl16v_put(msgb, NM_ATT_IPACC_RAC, 1, buf);
-
- buf[0] = 5; /* repeat time (50ms) */
- buf[1] = 3; /* repeat count */
- msgb_tl16v_put(msgb, NM_ATT_IPACC_GPRS_PAGING_CFG, 2, buf);
-
- /* BVCI 925 */
- buf[0] = bts->gprs.cell.bvci >> 8;
- buf[1] = bts->gprs.cell.bvci & 0xff;
- msgb_tl16v_put(msgb, NM_ATT_IPACC_BVCI, 2, buf);
-
- /* all timers in seconds, unless otherwise stated */
- buf[0] = 20; /* T3142 */
- buf[1] = 5; /* T3169 */
- buf[2] = 5; /* T3191 */
- buf[3] = 160; /* T3193 (units of 10ms) */
- buf[4] = 5; /* T3195 */
- buf[5] = 10; /* N3101 */
- buf[6] = 4; /* N3103 */
- buf[7] = 8; /* N3105 */
- buf[8] = 15; /* RLC CV countdown */
- msgb_tl16v_put(msgb, NM_ATT_IPACC_RLC_CFG, 9, buf);
-
- if (bts->gprs.mode == BTS_GPRS_EGPRS) {
- buf[0] = 0x8f;
- buf[1] = 0xff;
- } else {
- buf[0] = 0x0f;
- buf[1] = 0x00;
- }
- msgb_tl16v_put(msgb, NM_ATT_IPACC_CODING_SCHEMES, 2, buf);
-
- buf[0] = 0; /* T downlink TBF extension (0..500, high byte) */
- buf[1] = 250; /* T downlink TBF extension (0..500, low byte) */
- buf[2] = 0; /* T uplink TBF extension (0..500, high byte) */
- buf[3] = 250; /* T uplink TBF extension (0..500, low byte) */
- buf[4] = 2; /* CS2 */
- msgb_tl16v_put(msgb, NM_ATT_IPACC_RLC_CFG_2, 5, buf);
-
-#if 0
- /* EDGE model only, breaks older models.
- * Should inquire the BTS capabilities */
- buf[0] = 2; /* MCS2 */
- msgb_tl16v_put(msgb, NM_ATT_IPACC_RLC_CFG_3, 1, buf);
-#endif
-
- return msgb;
-}
-
-struct msgb *nanobts_attr_nscv_get(struct gsm_bts *bts)
-{
- struct msgb *msgb;
- uint8_t buf[256];
- msgb = msgb_alloc(1024, "nanobts_attr_bts");
-
- /* 925 */
- buf[0] = bts->gprs.nsvc[0].nsvci >> 8;
- buf[1] = bts->gprs.nsvc[0].nsvci & 0xff;
- msgb_tl16v_put(msgb, NM_ATT_IPACC_NSVCI, 2, buf);
-
- /* remote udp port */
- patch_16(&buf[0], htons(bts->gprs.nsvc[0].remote_port));
- /* remote ip address */
- patch_32(&buf[2], htonl(bts->gprs.nsvc[0].remote_ip));
- /* local udp port */
- patch_16(&buf[6], htons(bts->gprs.nsvc[0].local_port));
- msgb_tl16v_put(msgb, NM_ATT_IPACC_NS_LINK_CFG, 8, buf);
-
- return msgb;
-}
-
-struct msgb *nanobts_attr_radio_get(struct gsm_bts *bts,
- struct gsm_bts_trx *trx)
-{
- struct msgb *msgb;
- uint8_t buf[256];
- msgb = msgb_alloc(1024, "nanobts_attr_bts");
-
- /* number of -2dB reduction steps / Pn */
- msgb_tv_put(msgb, NM_ATT_RF_MAXPOWR_R, trx->max_power_red / 2);
-
- buf[0] = trx->arfcn >> 8;
- buf[1] = trx->arfcn & 0xff;
- msgb_tl16v_put(msgb, NM_ATT_ARFCN_LIST, 2, buf);
-
- return msgb;
-}
diff --git a/src/libbsc/bts_nokia_site.c b/src/libbsc/bts_nokia_site.c
deleted file mode 100644
index 3ca76c017..000000000
--- a/src/libbsc/bts_nokia_site.c
+++ /dev/null
@@ -1,1739 +0,0 @@
-/* Nokia XXXsite family specific code */
-
-/* (C) 2011 by Dieter Spaar <spaar@mirider.augusta.de>
- *
- * 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/>.
- *
- */
-
-/*
- TODO: Attention: There are some static variables used for states during
- configuration. Those variables have to be moved to a BTS specific context,
- otherwise there will most certainly be problems if more than one Nokia BTS
- is used.
-*/
-
-#include <time.h>
-
-#include <osmocom/gsm/tlv.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/signal.h>
-
-#include <osmocom/core/timer.h>
-
-#include <osmocom/abis/lapd.h>
-
-/* TODO: put in a separate file ? */
-
-extern int abis_nm_sendmsg(struct gsm_bts *bts, struct msgb *msg);
-/* was static in system_information.c */
-extern int generate_cell_chan_list(uint8_t * chan_list, struct gsm_bts *bts);
-
-static void nokia_abis_nm_queue_send_next(struct gsm_bts *bts);
-static void reset_timer_cb(void *_bts);
-static int abis_nm_reset(struct gsm_bts *bts, uint16_t ref);
-static int dump_elements(uint8_t * data, int len) __attribute__((unused));
-
-static void bootstrap_om_bts(struct gsm_bts *bts)
-{
- LOGP(DNM, LOGL_NOTICE, "bootstrapping OML for BTS %u\n", bts->nr);
-
- if (!bts->nokia.skip_reset) {
- if (!bts->nokia.did_reset)
- abis_nm_reset(bts, 1);
- } else
- bts->nokia.did_reset = 1;
-}
-
-static void bootstrap_om_trx(struct gsm_bts_trx *trx)
-{
- LOGP(DNM, LOGL_NOTICE, "bootstrapping OML for TRX %u/%u\n",
- trx->bts->nr, trx->nr);
-}
-
-static int shutdown_om(struct gsm_bts *bts)
-{
- /* TODO !? */
- return 0;
-}
-
-#define SAPI_OML 62
-#define SAPI_RSL 0
-
-/*
-
- Tell LAPD to start start the SAP (send SABM requests) for all signalling
- timeslots in this line
-
- Attention: this has to be adapted for mISDN
-*/
-
-static void start_sabm_in_line(struct e1inp_line *line, int start, int sapi)
-{
- struct e1inp_sign_link *link;
- int i;
-
- for (i = 0; i < ARRAY_SIZE(line->ts); i++) {
- struct e1inp_ts *ts = &line->ts[i];
-
- if (ts->type != E1INP_TS_TYPE_SIGN)
- continue;
-
- llist_for_each_entry(link, &ts->sign.sign_links, list) {
- if (sapi != -1 && link->sapi != sapi)
- continue;
-
-#if 0 /* debugging */
- printf("sap start/stop (%d): %d tei=%d sapi=%d\n",
- start, i + 1, link->tei, link->sapi);
-#endif
-
- if (start) {
- ts->lapd->profile.t200_sec = 1;
- ts->lapd->profile.t200_usec = 0;
- lapd_sap_start(ts->lapd, link->tei,
- link->sapi);
- } else
- lapd_sap_stop(ts->lapd, link->tei,
- link->sapi);
- }
- }
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int gbl_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_bts *bts;
-
- if (subsys != SS_L_GLOBAL)
- return 0;
-
- switch (signal) {
- case S_GLOBAL_BTS_CLOSE_OM:
- bts = signal_data;
- if (bts->type == GSM_BTS_TYPE_NOKIA_SITE)
- shutdown_om(signal_data);
- break;
- }
-
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int inp_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct input_signal_data *isd = signal_data;
-
- if (subsys != SS_L_INPUT)
- return 0;
-
- switch (signal) {
- case S_L_INP_LINE_INIT:
- start_sabm_in_line(isd->line, 1, SAPI_OML); /* start only OML */
- break;
- case S_L_INP_TEI_DN:
- break;
- case S_L_INP_TEI_UP:
- switch (isd->link_type) {
- case E1INP_SIGN_OML:
- if (isd->trx->bts->type != GSM_BTS_TYPE_NOKIA_SITE)
- break;
-
- if (isd->tei == isd->trx->bts->oml_tei)
- bootstrap_om_bts(isd->trx->bts);
- else
- bootstrap_om_trx(isd->trx);
- break;
- }
- break;
- case S_L_INP_TEI_UNKNOWN:
- /* We are receiving LAPD frames with one TEI that we do not
- * seem to know, likely that we (the BSC) stopped working
- * and lost our local states. However, the BTS is already
- * configured, we try to take over the RSL links. */
- start_sabm_in_line(isd->line, 1, SAPI_RSL);
- break;
- }
-
- return 0;
-}
-
-static void nm_statechg_evt(unsigned int signal,
- struct nm_statechg_signal_data *nsd)
-{
- if (nsd->bts->type != GSM_BTS_TYPE_NOKIA_SITE)
- return;
-}
-
-static int nm_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- if (subsys != SS_NM)
- return 0;
-
- switch (signal) {
- case S_NM_STATECHG_OPER:
- case S_NM_STATECHG_ADM:
- nm_statechg_evt(signal, signal_data);
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-/* TODO: put in a separate file ? */
-
-static const struct value_string nokia_msgt_name[] = {
- { 0x80, "NOKIA_BTS_CONF_DATA" },
- { 0x81, "NOKIA_BTS_ACK" },
- { 0x82, "NOKIA_BTS_OMU_STARTED" },
- { 0x83, "NOKIA_BTS_START_DOWNLOAD_REQ" },
- { 0x84, "NOKIA_BTS_MF_REQ" },
- { 0x85, "NOKIA_BTS_AF_REQ" },
- { 0x86, "NOKIA_BTS_RESET_REQ" },
- { 0x87, "NOKIA_reserved" },
- { 0x88, "NOKIA_BTS_CONF_REQ" },
- { 0x89, "NOKIA_BTS_TEST_REQ" },
- { 0x8A, "NOKIA_BTS_TEST_REPORT" },
- { 0x8B, "NOKIA_reserved" },
- { 0x8C, "NOKIA_reserved" },
- { 0x8D, "NOKIA_reserved" },
- { 0x8E, "NOKIA_BTS_CONF_COMPL" },
- { 0x8F, "NOKIA_reserved" },
- { 0x90, "NOKIA_BTS_STM_TEST_REQ" },
- { 0x91, "NOKIA_BTS_STM_TEST_REPORT" },
- { 0x92, "NOKIA_BTS_TRANSMISSION_COMMAND" },
- { 0x93, "NOKIA_BTS_TRANSMISSION_ANSWER" },
- { 0x94, "NOKIA_BTS_HW_DB_UPLOAD_REQ" },
- { 0x95, "NOKIA_BTS_START_HW_DB_DOWNLOAD_REQ" },
- { 0x96, "NOKIA_BTS_HW_DB_SAVE_REQ" },
- { 0x97, "NOKIA_BTS_FLASH_ERASURE_REQ" },
- { 0x98, "NOKIA_BTS_HW_DB_DOWNLOAD_REQ" },
- { 0x99, "NOKIA_BTS_PWR_SUPPLY_CONTROL" },
- { 0x9A, "NOKIA_BTS_ATTRIBUTE_REQ" },
- { 0x9B, "NOKIA_BTS_ATTRIBUTE_REPORT" },
- { 0x9C, "NOKIA_BTS_HW_REQ" },
- { 0x9D, "NOKIA_BTS_HW_REPORT" },
- { 0x9E, "NOKIA_BTS_RTE_TEST_REQ" },
- { 0x9F, "NOKIA_BTS_RTE_TEST_REPORT" },
- { 0xA0, "NOKIA_BTS_HW_DB_VERIFICATION_REQ" },
- { 0xA1, "NOKIA_BTS_CLOCK_REQ" },
- { 0xA2, "NOKIA_AC_CIRCUIT_REQ_NACK" },
- { 0xA3, "NOKIA_AC_INTERRUPTED" },
- { 0xA4, "NOKIA_BTS_NEW_TRE_INFO" },
- { 0xA5, "NOKIA_AC_BSC_CIRCUITS_ALLOCATED" },
- { 0xA6, "NOKIA_BTS_TRE_POLL_LIST" },
- { 0xA7, "NOKIA_AC_CIRCUIT_REQ" },
- { 0xA8, "NOKIA_BTS_BLOCK_CTRL_REQ" },
- { 0xA9, "NOKIA_BTS_GSM_TIME_REQ" },
- { 0xAA, "NOKIA_BTS_GSM_TIME" },
- { 0xAB, "NOKIA_BTS_OUTPUT_CONTROL" },
- { 0xAC, "NOKIA_BTS_STATE_CHANGED" },
- { 0xAD, "NOKIA_BTS_SW_SAVE_REQ" },
- { 0xAE, "NOKIA_BTS_ALARM" },
- { 0xAF, "NOKIA_BTS_CHA_ADM_STATE" },
- { 0xB0, "NOKIA_AC_POOL_SIZE_REPORT" },
- { 0xB1, "NOKIA_AC_POOL_SIZE_INQUIRY" },
- { 0xB2, "NOKIA_BTS_COMMISS_TEST_COMPLETED" },
- { 0xB3, "NOKIA_BTS_COMMISS_TEST_REQ" },
- { 0xB4, "NOKIA_BTS_TRANSP_BTS_TO_BSC" },
- { 0xB5, "NOKIA_BTS_TRANSP_BSC_TO_BTS" },
- { 0xB6, "NOKIA_BTS_LCS_COMMAND" },
- { 0xB7, "NOKIA_BTS_LCS_ANSWER" },
- { 0xB8, "NOKIA_BTS_LMU_FN_OFFSET_COMMAND" },
- { 0xB9, "NOKIA_BTS_LMU_FN_OFFSET_ANSWER" },
- { 0, NULL }
-};
-
-static const char *get_msg_type_name_string(uint8_t msg_type)
-{
- return get_value_string(nokia_msgt_name, msg_type);
-}
-
-static const struct value_string nokia_element_name[] = {
- { 0x01, "Ny1" },
- { 0x02, "T3105_F" },
- { 0x03, "Interference band limits" },
- { 0x04, "Interference report timer in secs" },
- { 0x05, "Channel configuration per TS" },
- { 0x06, "BSIC" },
- { 0x07, "RACH report timer in secs" },
- { 0x08, "Hardware database status" },
- { 0x09, "BTS RX level" },
- { 0x0A, "ARFN" },
- { 0x0B, "STM antenna attenuation" },
- { 0x0C, "Cell allocation bitmap" },
- { 0x0D, "Radio definition per TS" },
- { 0x0E, "Frame number" },
- { 0x0F, "Antenna diversity" },
- { 0x10, "T3105_D" },
- { 0x11, "File format" },
- { 0x12, "Last File" },
- { 0x13, "BTS type" },
- { 0x14, "Erasure mode" },
- { 0x15, "Hopping mode" },
- { 0x16, "Floating TRX" },
- { 0x17, "Power supplies" },
- { 0x18, "Reset type" },
- { 0x19, "Averaging period" },
- { 0x1A, "RBER2" },
- { 0x1B, "LAC" },
- { 0x1C, "CI" },
- { 0x1D, "Failure parameters" },
- { 0x1E, "(RF max power reduction)" },
- { 0x1F, "Measured RX_SENS" },
- { 0x20, "Extended cell radius" },
- { 0x21, "reserved" },
- { 0x22, "Success-Failure" },
- { 0x23, "Ack-Nack" },
- { 0x24, "OMU test results" },
- { 0x25, "File identity" },
- { 0x26, "Generation and version code" },
- { 0x27, "SW description" },
- { 0x28, "BCCH LEV" },
- { 0x29, "Test type" },
- { 0x2A, "Subscriber number" },
- { 0x2B, "reserved" },
- { 0x2C, "HSN" },
- { 0x2D, "reserved" },
- { 0x2E, "MS RXLEV" },
- { 0x2F, "MS TXLEV" },
- { 0x30, "RXQUAL" },
- { 0x31, "RX SENS" },
- { 0x32, "Alarm block" },
- { 0x33, "Neighbouring BCCH levels" },
- { 0x34, "STM report type" },
- { 0x35, "MA" },
- { 0x36, "MAIO" },
- { 0x37, "H_FLAG" },
- { 0x38, "TCH_ARFN" },
- { 0x39, "Clock output" },
- { 0x3A, "Transmitted power" },
- { 0x3B, "Clock sync" },
- { 0x3C, "TMS protocol discriminator" },
- { 0x3D, "TMS protocol data" },
- { 0x3E, "FER" },
- { 0x3F, "SWR result" },
- { 0x40, "Object identity" },
- { 0x41, "STM RX Antenna Test" },
- { 0x42, "reserved" },
- { 0x43, "reserved" },
- { 0x44, "Object current state" },
- { 0x45, "reserved" },
- { 0x46, "FU channel configuration" },
- { 0x47, "reserved" },
- { 0x48, "ARFN of a CU" },
- { 0x49, "FU radio definition" },
- { 0x4A, "reserved" },
- { 0x4B, "Severity" },
- { 0x4C, "Diversity selection" },
- { 0x4D, "RX antenna test" },
- { 0x4E, "RX antenna supervision period" },
- { 0x4F, "RX antenna state" },
- { 0x50, "Sector configuration" },
- { 0x51, "Additional info" },
- { 0x52, "SWR parameters" },
- { 0x53, "HW inquiry mode" },
- { 0x54, "reserved" },
- { 0x55, "Availability status" },
- { 0x56, "reserved" },
- { 0x57, "EAC inputs" },
- { 0x58, "EAC outputs" },
- { 0x59, "reserved" },
- { 0x5A, "Position" },
- { 0x5B, "HW unit identity" },
- { 0x5C, "RF test signal attenuation" },
- { 0x5D, "Operational state" },
- { 0x5E, "Logical object identity" },
- { 0x5F, "reserved" },
- { 0x60, "BS_TXPWR_OM" },
- { 0x61, "Loop_Duration" },
- { 0x62, "LNA_Path_Selection" },
- { 0x63, "Serial number" },
- { 0x64, "HW version" },
- { 0x65, "Obj. identity and obj. state" },
- { 0x66, "reserved" },
- { 0x67, "EAC input definition" },
- { 0x68, "EAC id and text" },
- { 0x69, "HW unit status" },
- { 0x6A, "SW release version" },
- { 0x6B, "FW version" },
- { 0x6C, "Bit_Error_Ratio" },
- { 0x6D, "RXLEV_with_Attenuation" },
- { 0x6E, "RXLEV_without_Attenuation" },
- { 0x6F, "reserved" },
- { 0x70, "CU_Results" },
- { 0x71, "reserved" },
- { 0x72, "LNA_Path_Results" },
- { 0x73, "RTE Results" },
- { 0x74, "Real Time" },
- { 0x75, "RX diversity selection" },
- { 0x76, "EAC input config" },
- { 0x77, "Feature support" },
- { 0x78, "File version" },
- { 0x79, "Outputs" },
- { 0x7A, "FU parameters" },
- { 0x7B, "Diagnostic info" },
- { 0x7C, "FU BSIC" },
- { 0x7D, "TRX Configuration" },
- { 0x7E, "Download status" },
- { 0x7F, "RX difference limit" },
- { 0x80, "TRX HW capability" },
- { 0x81, "Common HW config" },
- { 0x82, "Autoconfiguration pool size" },
- { 0x83, "TRE diagnostic info" },
- { 0x84, "TRE object identity" },
- { 0x85, "New TRE Info" },
- { 0x86, "Acknowledgement period" },
- { 0x87, "Synchronization mode" },
- { 0x88, "reserved" },
- { 0x89, "Block Control Data" },
- { 0x8A, "SW load mode" },
- { 0x8B, "Recommended recovery action" },
- { 0x8C, "BSC BCF id" },
- { 0x8D, "Q1 baud rate" },
- { 0x8E, "Allocation status" },
- { 0x8F, "Functional entity number" },
- { 0x90, "Transmission delay" },
- { 0x91, "Loop Duration ms" },
- { 0x92, "Logical channel" },
- { 0x93, "Q1 address" },
- { 0x94, "Alarm detail" },
- { 0x95, "Cabinet type" },
- { 0x96, "HW unit existence" },
- { 0x97, "RF power parameters" },
- { 0x98, "Message scenario" },
- { 0x99, "HW unit max amount" },
- { 0x9A, "Master TRX" },
- { 0x9B, "Transparent data" },
- { 0x9C, "BSC topology info" },
- { 0x9D, "Air i/f modulation" },
- { 0x9E, "LCS Q1 command data" },
- { 0x9F, "Frame number offset" },
- { 0xA0, "Abis TSL" },
- { 0xA1, "Dynamic pool info" },
- { 0xA2, "LCS LLP data" },
- { 0xA3, "LCS Q1 answer data" },
- { 0xA4, "DFCA FU Radio Definition" },
- { 0xA5, "Antenna hopping" },
- { 0xA6, "Field record sequence number" },
- { 0xA7, "Timeslot offslot" },
- { 0xA8, "EPCR capability" },
- { 0xA9, "Connectsite optional element" },
- { 0xAA, "TSC" },
- { 0xAB, "Special TX Power Setting" },
- { 0xAC, "Optional sync settings" },
- { 0xFA, "Abis If parameters" },
- { 0, NULL }
-};
-
-static const char *get_element_name_string(uint16_t element)
-{
- return get_value_string(nokia_element_name, element);
-}
-
-static const struct value_string nokia_bts_types[] = {
- { 0x0a, "MetroSite GSM 900" },
- { 0x0b, "MetroSite GSM 1800" },
- { 0x0c, "MetroSite GSM 1900 (PCS)" },
- { 0x0d, "MetroSite GSM 900 & 1800" },
- { 0x0e, "InSite GSM 900" },
- { 0x0f, "InSite GSM 1800" },
- { 0x10, "InSite GSM 1900" },
- { 0x11, "UltraSite GSM 900" },
- { 0x12, "UltraSite GSM 1800" },
- { 0x13, "UltraSite GSM/US-TDMA 1900" },
- { 0x14, "UltraSite GSM 900 & 1800" },
- { 0x16, "UltraSite GSM/US-TDMA 850" },
- { 0x18, "MetroSite GSM/US-TDMA 850" },
- { 0x19, "UltraSite GSM 800/1900" },
- { 0, NULL }
-};
-
-static const char *get_bts_type_string(uint8_t type)
-{
- return get_value_string(nokia_bts_types, type);
-}
-
-static const struct value_string nokia_severity[] = {
- { 0, "indeterminate" },
- { 1, "critical" },
- { 2, "major" },
- { 3, "minor" },
- { 4, "warning" },
- { 0, NULL }
-};
-
-static const char *get_severity_string(uint8_t severity)
-{
- return get_value_string(nokia_severity, severity);
-}
-
-/* TODO: put in a separate file ? */
-
-/* some message IDs */
-
-#define NOKIA_MSG_CONF_DATA 128
-#define NOKIA_MSG_ACK 129
-#define NOKIA_MSG_OMU_STARTED 130
-#define NOKIA_MSG_START_DOWNLOAD_REQ 131
-#define NOKIA_MSG_MF_REQ 132
-#define NOKIA_MSG_RESET_REQ 134
-#define NOKIA_MSG_CONF_REQ 136
-#define NOKIA_MSG_CONF_COMPLETE 142
-#define NOKIA_MSG_BLOCK_CTRL_REQ 168
-#define NOKIA_MSG_STATE_CHANGED 172
-#define NOKIA_MSG_ALARM 174
-
-/* some element IDs */
-
-#define NOKIA_EI_BTS_TYPE 0x13
-#define NOKIA_EI_ACK 0x23
-#define NOKIA_EI_ADD_INFO 0x51
-#define NOKIA_EI_SEVERITY 0x4B
-#define NOKIA_EI_ALARM_DETAIL 0x94
-
-#define OM_ALLOC_SIZE 1024
-#define OM_HEADROOM_SIZE 128
-
-static uint8_t fu_config_template[] = {
- 0x7F, 0x7A, 0x39,
- /* ID = 0x7A (FU parameters) ## constructed ## */
- /* length = 57 */
- /* [3] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [6] */
- 0x00, 0x07, 0x01, 0xFF,
-
- 0x41, 0x02,
- /* ID = 0x01 (Ny1) */
- /* length = 2 */
- /* [12] */
- 0x00, 0x05,
-
- 0x42, 0x02,
- /* ID = 0x02 (T3105_F) */
- /* length = 2 */
- /* [16] */
- 0x00, 0x28, /* FIXME: use net->T3105 */
-
- 0x50, 0x02,
- /* ID = 0x10 (T3105_D) */
- /* length = 2 */
- /* [20] */
- 0x00, 0x28, /* FIXME: use net->T3105 */
-
- 0x43, 0x05,
- /* ID = 0x03 (Interference band limits) */
- /* length = 5 */
- /* [24] */
- 0x0F, 0x1B, 0x27, 0x33, 0x3F,
-
- 0x44, 0x02,
- /* ID = 0x04 (Interference report timer in secs) */
- /* length = 2 */
- /* [31] */
- 0x00, 0x10,
-
- 0x47, 0x01,
- /* ID = 0x07 (RACH report timer in secs) */
- /* length = 1 */
- /* [35] */
- 0x1E,
-
- 0x4C, 0x10,
- /* ID = 0x0C (Cell allocation bitmap) ####### */
- /* length = 16 */
- /* [38] */
- 0x8F, 0xB1, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
-
- 0x59, 0x01,
- /* ID = 0x19 (Averaging period) */
- /* length = 1 */
- /* [56] */
- 0x01,
-
- 0x5E, 0x01,
- /* ID = 0x1E ((RF max power reduction)) */
- /* length = 1 */
- /* [59] */
- 0x00,
-
- 0x7F, 0x46, 0x11,
- /* ID = 0x46 (FU channel configuration) ## constructed ## */
- /* length = 17 */
- /* [63] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [66] */
- 0x00, 0x07, 0x01, 0xFF,
-
- 0x45, 0x08,
- /* ID = 0x05 (Channel configuration per TS) */
- /* length = 8 */
- /* [72] */
- 0x01, 0x09, 0x09, 0x09, 0x09, 0x09, 0x09, 0x09,
-
- 0x7F, 0x65, 0x0B,
- /* ID = 0x65 (Obj. identity and obj. state) ## constructed ## */
- /* length = 11 */
- /* [83] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [86] */
- 0x00, 0x04, 0x01, 0xFF,
-
- 0x5F, 0x44, 0x01,
- /* ID = 0x44 (Object current state) */
- /* length = 1 */
- /* [93] */
- 0x03,
-
- 0x7F, 0x7C, 0x0A,
- /* ID = 0x7C (FU BSIC) ## constructed ## */
- /* length = 10 */
- /* [97] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [100] */
- 0x00, 0x07, 0x01, 0xFF,
-
- 0x46, 0x01,
- /* ID = 0x06 (BSIC) */
- /* length = 1 */
- /* [106] */
- 0x00,
-
- 0x7F, 0x48, 0x0B,
- /* ID = 0x48 (ARFN of a CU) ## constructed ## */
- /* length = 11 */
- /* [110] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [113] */
- 0x00, 0x08, 0x01, 0xFF,
-
- 0x4A, 0x02,
- /* ID = 0x0A (ARFN) ####### */
- /* length = 2 */
- /* [119] */
- 0x03, 0x62,
-
- 0x7F, 0x49, 0x59,
- /* ID = 0x49 (FU radio definition) ## constructed ## */
- /* length = 89 */
- /* [124] */
-
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [127] */
- 0x00, 0x07, 0x01, 0xFF,
-
- 0x4D, 0x50,
- /* ID = 0x0D (Radio definition per TS) ####### */
- /* length = 80 */
- /* [133] */
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* MA */
- 0x03, 0x62, /* HSN, MAIO or ARFCN if no hopping */
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
- 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
- 0x03, 0x62,
-};
-
-/* TODO: put in a separate file ? */
-
-/*
- build the configuration for each TRX
-*/
-
-static int make_fu_config(struct gsm_bts_trx *trx, uint8_t id,
- uint8_t * fu_config, int *hopping)
-{
- int i;
-
- *hopping = 0;
-
- memcpy(fu_config, fu_config_template, sizeof(fu_config_template));
-
- /* set ID */
-
- fu_config[6 + 2] = id;
- fu_config[66 + 2] = id;
- fu_config[86 + 2] = id;
- fu_config[100 + 2] = id;
- fu_config[113 + 2] = id;
- fu_config[127 + 2] = id;
-
- /* set ARFCN */
-
- uint16_t arfcn = trx->arfcn;
-
- fu_config[119] = arfcn >> 8;
- fu_config[119 + 1] = arfcn & 0xFF;
-
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[i];
-
- if (ts->hopping.enabled) {
- /* reverse order */
- int j;
- for (j = 0; j < ts->hopping.ma_len; j++)
- fu_config[133 + (i * 10) + (7 - j)] =
- ts->hopping.ma_data[j];
- fu_config[133 + 8 + (i * 10)] = ts->hopping.hsn;
- fu_config[133 + 8 + 1 + (i * 10)] = ts->hopping.maio;
- *hopping = 1;
- } else {
- fu_config[133 + 8 + (i * 10)] = arfcn >> 8;
- fu_config[133 + 8 + 1 + (i * 10)] = arfcn & 0xFF;
- }
- }
-
- /* set BSIC */
-
- /*
- Attention: all TRX except the first one seem to get the TSC
- from the CHANNEL ACTIVATION command (in CHANNEL IDENTIFICATION,
- GSM 04.08 CHANNEL DESCRIPTION).
- There was a bug in rsl_chan_activate_lchan() setting this parameter.
- */
-
- uint8_t bsic = trx->bts->bsic;
-
- fu_config[106] = bsic;
-
- /* set CA */
-
- if (generate_cell_chan_list(&fu_config[38], trx->bts) != 0) {
- fprintf(stderr, "generate_cell_chan_list failed\n");
- return 0;
- }
-
- /* set channel configuration */
-
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[i];
- uint8_t chan_config;
-
- /*
- 0 = FCCH + SCH + BCCH + CCCH
- 1 = FCCH + SCH + BCCH + CCCH + SDCCH/4 + SACCH/4
- 2 = BCCH + CCCH (This combination is not used in any BTS)
- 3 = FCCH + SCH + BCCH + CCCH + SDCCH/4 with SDCCH2 used as CBCH
- 4 = SDCCH/8 + SACCH/8
- 5 = SDCCH/8 with SDCCH2 used as CBCH
- 6 = TCH/F + FACCH/F + SACCH/F
- 7 = E-RACH (Talk family)
- 9 = Dual rate (capability for TCH/F and TCH/H)
- 10 = reserved for BTS internal use
- 11 = PBCCH + PCCCH + PDTCH + PACCH + PTCCH (can be used in GPRS release 2).
- 0xFF = spare TS
- */
-
- if (ts->pchan == GSM_PCHAN_NONE)
- chan_config = 0xFF;
- else if (ts->pchan == GSM_PCHAN_CCCH)
- chan_config = 0;
- else if (ts->pchan == GSM_PCHAN_CCCH_SDCCH4)
- chan_config = 1;
- else if (ts->pchan == GSM_PCHAN_TCH_F)
- chan_config = 6; /* 9 should work too */
- else if (ts->pchan == GSM_PCHAN_TCH_H)
- chan_config = 9;
- else if (ts->pchan == GSM_PCHAN_SDCCH8_SACCH8C)
- chan_config = 4;
- else if (ts->pchan == GSM_PCHAN_PDCH)
- chan_config = 11;
- else {
- fprintf(stderr,
- "unsupported channel config %d for timeslot %d\n",
- ts->pchan, i);
- return 0;
- }
-
- fu_config[72 + i] = chan_config;
- }
- return sizeof(fu_config_template);
-}
-
-/* TODO: put in a separate file ? */
-
-static uint8_t bts_config_1[] = {
- 0x4E, 0x02,
- /* ID = 0x0E (Frame number) */
- /* length = 2 */
- /* [2] */
- 0xFF, 0xFF,
-
- 0x5F, 0x4E, 0x02,
- /* ID = 0x4E (RX antenna supervision period) */
- /* length = 2 */
- /* [7] */
- 0xFF, 0xFF,
-
- 0x5F, 0x50, 0x02,
- /* ID = 0x50 (Sector configuration) */
- /* length = 2 */
- /* [12] */
- 0x01, 0x01,
-};
-
-static uint8_t bts_config_2[] = {
- 0x55, 0x02,
- /* ID = 0x15 (Hopping mode) */
- /* length = 2 */
- /* [2] */
- 0x01, 0x00,
-
- 0x5F, 0x75, 0x02,
- /* ID = 0x75 (RX diversity selection) */
- /* length = 2 */
- /* [7] */
- 0x01, 0x01,
-};
-
-static uint8_t bts_config_3[] = {
- 0x5F, 0x20, 0x02,
- /* ID = 0x20 (Extended cell radius) */
- /* length = 2 */
- /* [3] */
- 0x01, 0x00,
-};
-
-static uint8_t bts_config_4[] = {
- 0x5F, 0x74, 0x09,
- /* ID = 0x74 (Real Time) */
- /* length = 9 */
- /* [3] year-high, year-low, month, day, hour, minute, second, msec-high, msec-low */
- 0x07, 0xDB, 0x06, 0x02, 0x0B, 0x20, 0x0C, 0x00,
- 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [15] */
- 0x01, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [21] */
- 0x02, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [27] */
- 0x03, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [33] */
- 0x04, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [39] */
- 0x05, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [45] */
- 0x06, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [51] */
- 0x07, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [57] */
- 0x08, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [63] */
- 0x09, 0x01, 0x00,
-
- 0x5F, 0x76, 0x03,
- /* ID = 0x76 (EAC input config) */
- /* length = 3 */
- /* [69] */
- 0x0A, 0x01, 0x00,
-};
-
-static uint8_t bts_config_insite[] = {
- 0x4E, 0x02,
- /* ID = 0x0E (Frame number) */
- /* length = 2 */
- /* [2] */
- 0xFF, 0xFF,
-
- 0x5F, 0x4E, 0x02,
- /* ID = 0x4E (RX antenna supervision period) */
- /* length = 2 */
- /* [7] */
- 0xFF, 0xFF,
-
- 0x5F, 0x50, 0x02,
- /* ID = 0x50 (Sector configuration) */
- /* length = 2 */
- /* [12] */
- 0x01, 0x01,
-
- 0x55, 0x02,
- /* ID = 0x15 (Hopping mode) */
- /* length = 2 */
- /* [16] */
- 0x01, 0x00,
-
- 0x5F, 0x20, 0x02,
- /* ID = 0x20 (Extended cell radius) */
- /* length = 2 */
- /* [21] */
- 0x01, 0x00,
-
- 0x5F, 0x74, 0x09,
- /* ID = 0x74 (Real Time) */
- /* length = 9 */
- /* [26] */
- 0x07, 0xDB, 0x07, 0x0A, 0x0F, 0x09, 0x0B, 0x00,
- 0x00,
-};
-
-void set_real_time(uint8_t * real_time)
-{
- time_t t;
- struct tm *tm;
-
- t = time(NULL);
- tm = localtime(&t);
-
- /* year-high, year-low, month, day, hour, minute, second, msec-high, msec-low */
-
- real_time[0] = (1900 + tm->tm_year) >> 8;
- real_time[1] = (1900 + tm->tm_year) & 0xFF;
- real_time[2] = tm->tm_mon + 1;
- real_time[3] = tm->tm_mday;
- real_time[4] = tm->tm_hour;
- real_time[5] = tm->tm_min;
- real_time[6] = tm->tm_sec;
- real_time[7] = 0;
- real_time[8] = 0;
-}
-
-/* TODO: put in a separate file ? */
-
-/*
- build the configuration data
-*/
-
-static int make_bts_config(uint8_t bts_type, int n_trx, uint8_t * fu_config,
- int need_hopping)
-{
- /* is it an InSite BTS ? */
- if (bts_type == 0x0E || bts_type == 0x0F || bts_type == 0x10) { /* TODO */
- if (n_trx != 1) {
- fprintf(stderr, "InSite has only one TRX\n");
- return 0;
- }
- if (need_hopping != 0) {
- fprintf(stderr, "InSite does not support hopping\n");
- return 0;
- }
- memcpy(fu_config, bts_config_insite, sizeof(bts_config_insite));
- set_real_time(&fu_config[26]);
- return sizeof(bts_config_insite);
- }
-
- int len = 0;
- int i;
-
- memcpy(fu_config + len, bts_config_1, sizeof(bts_config_1));
-
- /* set sector configuration */
- fu_config[len + 12 - 1] = 1 + n_trx; /* len */
- for (i = 0; i < n_trx; i++)
- fu_config[len + 12 + 1 + i] = ((i + 1) & 0xFF);
-
- len += (sizeof(bts_config_1) + (n_trx - 1));
-
- memcpy(fu_config + len, bts_config_2, sizeof(bts_config_2));
- /* set hopping mode (Baseband and RF hopping work for the MetroSite) */
- if (need_hopping)
- fu_config[len + 2 + 1] = 1; /* 0: no hopping, 1: Baseband hopping, 2: RF hopping */
- len += sizeof(bts_config_2);
-
- /* set extended cell radius for each TRX */
- for (i = 0; i < n_trx; i++) {
- memcpy(fu_config + len, bts_config_3, sizeof(bts_config_3));
- fu_config[len + 3] = ((i + 1) & 0xFF);
- len += sizeof(bts_config_3);
- }
-
- memcpy(fu_config + len, bts_config_4, sizeof(bts_config_4));
- set_real_time(&fu_config[len + 3]);
- len += sizeof(bts_config_4);
-
- return len;
-}
-
-/* TODO: put in a separate file ? */
-
-static struct msgb *nm_msgb_alloc(void)
-{
- return msgb_alloc_headroom(OM_ALLOC_SIZE, OM_HEADROOM_SIZE, "OML");
-}
-
-/* TODO: put in a separate file ? */
-
-struct abis_om_nokia_hdr {
- uint8_t msg_type;
- uint8_t spare;
- uint16_t reference;
- uint8_t data[0];
-} __attribute__ ((packed));
-
-#define ABIS_OM_NOKIA_HDR_SIZE (sizeof(struct abis_om_hdr) + sizeof(struct abis_om_nokia_hdr))
-
-static int abis_nm_send(struct gsm_bts *bts, uint8_t msg_type, uint16_t ref,
- uint8_t * data, int len_data)
-{
- struct abis_om_hdr *oh;
- struct abis_om_nokia_hdr *noh;
- struct msgb *msg = nm_msgb_alloc();
-
- oh = (struct abis_om_hdr *)msgb_put(msg,
- ABIS_OM_NOKIA_HDR_SIZE + len_data);
-
- oh->mdisc = ABIS_OM_MDISC_FOM;
- oh->placement = ABIS_OM_PLACEMENT_ONLY;
- oh->sequence = 0;
- oh->length = sizeof(struct abis_om_nokia_hdr) + len_data;
-
- noh = (struct abis_om_nokia_hdr *)oh->data;
-
- noh->msg_type = msg_type;
- noh->spare = 0;
- noh->reference = htons(ref);
- memcpy(noh->data, data, len_data);
-
- DEBUGPC(DNM, "Sending %s\n", get_msg_type_name_string(msg_type));
-
- return abis_nm_sendmsg(bts, msg);
-}
-
-/* TODO: put in a separate file ? */
-
-static uint8_t download_req[] = {
- 0x5F, 0x25, 0x0B,
- /* ID = 0x25 (File identity) */
- /* length = 11 */
- /* [3] */
- 0x2A, 0x2A, 0x2A, 0x2A, 0x2A, 0x2A, 0x2A, 0x2A,
- 0x2A, 0x2A, 0x2A,
-
- 0x5F, 0x78, 0x03,
- /* ID = 0x78 (File version) */
- /* length = 3 */
- /* [17] */
- 0x2A, 0x2A, 0x2A,
-
- 0x5F, 0x81, 0x0A, 0x01,
- /* ID = 0x8A (SW load mode) */
- /* length = 1 */
- /* [24] */
- 0x01,
-
- 0x5F, 0x81, 0x06, 0x01,
- /* ID = 0x86 (Acknowledgement period) */
- /* length = 1 */
- /* [29] */
- 0x01,
-};
-
-static int abis_nm_download_req(struct gsm_bts *bts, uint16_t ref)
-{
- uint8_t *data = download_req;
- int len_data = sizeof(download_req);
-
- return abis_nm_send(bts, NOKIA_MSG_START_DOWNLOAD_REQ, ref, data,
- len_data);
-}
-
-/* TODO: put in a separate file ? */
-
-static uint8_t ack[] = {
- 0x5F, 0x23, 0x01,
- /* ID = 0x23 (Ack-Nack) */
- /* length = 1 */
- /* [3] */
- 0x01,
-};
-
-static int abis_nm_ack(struct gsm_bts *bts, uint16_t ref)
-{
- uint8_t *data = ack;
- int len_data = sizeof(ack);
-
- return abis_nm_send(bts, NOKIA_MSG_ACK, ref, data, len_data);
-}
-
-/* TODO: put in a separate file ? */
-
-static uint8_t reset[] = {
- 0x5F, 0x40, 0x04,
- /* ID = 0x40 (Object identity) */
- /* length = 4 */
- /* [3] */
- 0x00, 0x01, 0xFF, 0xFF,
-};
-
-static int abis_nm_reset(struct gsm_bts *bts, uint16_t ref)
-{
- uint8_t *data = reset;
- int len_data = sizeof(reset);
- LOGP(DLINP, LOGL_INFO, "Nokia BTS reset timer: %d\n", bts->nokia.bts_reset_timer_cnf);
- return abis_nm_send(bts, NOKIA_MSG_RESET_REQ, ref, data, len_data);
-}
-
-/* TODO: put in a separate file ? */
-
-static int abis_nm_send_multi_segments(struct gsm_bts *bts, uint8_t msg_type,
- uint16_t ref, uint8_t * data, int len)
-{
- int len_remain, len_to_send, max_send;
- int seq = 0;
- int ret;
-
- len_remain = len;
-
- while (len_remain) {
- struct abis_om_hdr *oh;
- struct abis_om_nokia_hdr *noh;
- struct msgb *msg = nm_msgb_alloc();
-
- if (seq == 0)
- max_send = 256 - sizeof(struct abis_om_nokia_hdr);
- else
- max_send = 256;
-
- if (len_remain > max_send) {
- len_to_send = max_send;
-
- if (seq == 0) {
- /* first segment */
- oh = (struct abis_om_hdr *)msgb_put(msg,
- ABIS_OM_NOKIA_HDR_SIZE
- +
- len_to_send);
-
- oh->mdisc = ABIS_OM_MDISC_FOM;
- oh->placement = ABIS_OM_PLACEMENT_FIRST; /* first segment of multi-segment message */
- oh->sequence = seq;
- oh->length = 0; /* 256 bytes */
-
- noh = (struct abis_om_nokia_hdr *)oh->data;
-
- noh->msg_type = msg_type;
- noh->spare = 0;
- noh->reference = htons(ref);
- memcpy(noh->data, data, len_to_send);
- } else {
- /* segment in between */
- oh = (struct abis_om_hdr *)msgb_put(msg,
- sizeof
- (struct
- abis_om_hdr)
- +
- len_to_send);
-
- oh->mdisc = ABIS_OM_MDISC_FOM;
- oh->placement = ABIS_OM_PLACEMENT_MIDDLE; /* segment of multi-segment message */
- oh->sequence = seq;
- oh->length = 0; /* 256 bytes */
-
- memcpy(oh->data, data, len_to_send);
- }
- } else {
-
- len_to_send = len_remain;
-
- /* check if message fits in a single segment */
-
- if (seq == 0)
- return abis_nm_send(bts, msg_type, ref, data,
- len_to_send);
-
- /* last segment */
-
- oh = (struct abis_om_hdr *)msgb_put(msg,
- sizeof(struct
- abis_om_hdr)
- + len_to_send);
-
- oh->mdisc = ABIS_OM_MDISC_FOM;
- oh->placement = ABIS_OM_PLACEMENT_LAST; /* last segment of multi-segment message */
- oh->sequence = seq;
- oh->length = len_to_send;
-
- memcpy(oh->data, data, len_to_send);
- }
-
- DEBUGPC(DNM, "Sending multi-segment %d\n", seq);
-
- ret = abis_nm_sendmsg(bts, msg);
- if (ret < 0)
- return ret;
-
- nokia_abis_nm_queue_send_next(bts);
-
- /* next segment */
- len_remain -= len_to_send;
- data += len_to_send;
- seq++;
- }
- return ret;
-}
-
-/* TODO: put in a separate file ? */
-
-static int abis_nm_send_config(struct gsm_bts *bts, uint8_t bts_type)
-{
- struct gsm_bts_trx *trx;
- uint8_t config[2048]; /* TODO: might be too small if lots of TRX are used */
- int len = 0;
- int idx = 0;
- int ret;
- int hopping = 0;
- int need_hopping = 0;
-
- memset(config, 0, sizeof(config));
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
-#if 0 /* debugging */
- printf("TRX\n");
- printf(" arfcn: %d\n", trx->arfcn);
- printf(" bsic: %d\n", trx->bts->bsic);
- uint8_t ca[20];
- memset(ca, 0xFF, sizeof(ca));
- ret = generate_cell_chan_list(ca, trx->bts);
- printf(" ca (%d): %s\n", ret, osmo_hexdump(ca, sizeof(ca)));
- int i;
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[i];
-
- printf(" pchan %d: %d\n", i, ts->pchan);
- }
-#endif
- ret = make_fu_config(trx, idx + 1, config + len, &hopping);
- need_hopping |= hopping;
- len += ret;
-
- idx++;
- }
-
- ret = make_bts_config(bts_type, idx, config + len, need_hopping);
- len += ret;
-
-#if 0 /* debugging */
- dump_elements(config, len);
-#endif
-
- return abis_nm_send_multi_segments(bts, NOKIA_MSG_CONF_DATA, 1, config,
- len);
-}
-
-#define GET_NEXT_BYTE if(idx >= len) return 0; \
- ub = data[idx++];
-
-static int find_element(uint8_t * data, int len, uint16_t id, uint8_t * value,
- int max_value)
-{
- uint8_t ub;
- int idx = 0;
- int found = 0;
- int constructed __attribute__((unused));
- uint16_t id_value;
-
- for (;;) {
-
- GET_NEXT_BYTE;
-
- /* encoding bit, construced means that other elements are contained */
- constructed = ((ub & 0x20) ? 1 : 0);
-
- if ((ub & 0x1F) == 0x1F) {
- /* fixed pattern, ID follows */
- GET_NEXT_BYTE; /* ID */
- id_value = ub & 0x7F;
- if (ub & 0x80) {
- /* extension bit */
- GET_NEXT_BYTE; /* ID low part */
- id_value = (id_value << 7) | (ub & 0x7F);
- }
- if (id_value == id)
- found = 1;
- } else {
- id_value = (ub & 0x3F);
- if (id_value == id)
- found = 1;
- }
-
- GET_NEXT_BYTE; /* length */
-
- if (found) {
- /* get data */
- uint8_t n = ub;
- uint8_t i;
- for (i = 0; i < n; i++) {
- GET_NEXT_BYTE;
- if (max_value <= 0)
- return -1; /* buffer too small */
- *value = ub;
- value++;
- max_value--;
- }
- return n; /* length */
- } else {
- /* skip data */
- uint8_t n = ub;
- uint8_t i;
- for (i = 0; i < n; i++) {
- GET_NEXT_BYTE;
- }
- }
- }
- return 0; /* not found */
-}
-
-static int dump_elements(uint8_t * data, int len)
-{
- uint8_t ub;
- int idx = 0;
- int constructed;
- uint16_t id_value;
- static char indent[100] = ""; /* TODO: move static to BTS context */
-
- for (;;) {
-
- GET_NEXT_BYTE;
-
- /* encoding bit, construced means that other elements are contained */
- constructed = ((ub & 0x20) ? 1 : 0);
-
- if ((ub & 0x1F) == 0x1F) {
- /* fixed pattern, ID follows */
- GET_NEXT_BYTE; /* ID */
- id_value = ub & 0x7F;
- if (ub & 0x80) {
- /* extension bit */
- GET_NEXT_BYTE; /* ID low part */
- id_value = (id_value << 7) | (ub & 0x7F);
- }
-
- } else {
- id_value = (ub & 0x3F);
- }
-
- GET_NEXT_BYTE; /* length */
-
- printf("%s--ID = 0x%02X (%s) %s\n", indent, id_value,
- get_element_name_string(id_value),
- constructed ? "** constructed **" : "");
- printf("%s length = %d\n", indent, ub);
- printf("%s %s\n", indent, osmo_hexdump(data + idx, ub));
-
- if (constructed) {
- int indent_len = strlen(indent);
- strcat(indent, " ");
-
- dump_elements(data + idx, ub);
-
- indent[indent_len] = 0;
- }
- /* skip data */
- uint8_t n = ub;
- uint8_t i;
- for (i = 0; i < n; i++) {
- GET_NEXT_BYTE;
- }
- }
- return 0;
-}
-
-/* TODO: put in a separate file ? */
-
-/* taken from abis_nm.c */
-
-static void nokia_abis_nm_queue_send_next(struct gsm_bts *bts)
-{
- int wait = 0;
- struct msgb *msg;
- /* the queue is empty */
- while (!llist_empty(&bts->abis_queue)) {
- msg = msgb_dequeue(&bts->abis_queue);
- wait = OBSC_NM_W_ACK_CB(msg);
- abis_sendmsg(msg);
-
- if (wait)
- break;
- }
-
- bts->abis_nm_pend = wait;
-}
-
-/* TODO: put in a separate file ? */
-
-/* timer for restarting OML after BTS reset */
-
-static void reset_timer_cb(void *_bts)
-{
- struct gsm_bts *bts = _bts;
- struct gsm_e1_subslot *e1_link = &bts->oml_e1_link;
- struct e1inp_line *line;
-
- bts->nokia.wait_reset = 0;
-
- /* OML link */
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR, "BTS %u OML link referring to "
- "non-existing E1 line %u\n", bts->nr, e1_link->e1_nr);
- return;
- }
-
- start_sabm_in_line(line, 0, -1); /* stop all first */
- start_sabm_in_line(line, 1, SAPI_OML); /* start only OML */
-}
-
-/* TODO: put in a separate file ? */
-
-/*
- This is how the configuration is done:
- - start OML link
- - reset BTS
- - receive ACK, wait some time and restart OML link
- - receive OMU STARTED message, send START DOWNLOAD REQ
- - receive CNF REQ message, send CONF DATA
- - receive ACK, start RSL link(s)
- ACK some other messages received from the BTS.
-
- Probably its also possible to configure the BTS without a reset, this
- has not been tested yet.
-*/
-
-static int abis_nm_rcvmsg_fom(struct msgb *mb)
-{
- struct e1inp_sign_link *sign_link = (struct e1inp_sign_link *)mb->dst;
- struct gsm_bts *bts = sign_link->trx->bts;
- struct abis_om_hdr *oh = msgb_l2(mb);
- struct abis_om_nokia_hdr *noh = msgb_l3(mb);
- uint8_t mt = noh->msg_type;
- int ret = 0;
- uint16_t ref = ntohs(noh->reference);
- uint8_t info[256];
- uint8_t ack = 0xFF;
- uint8_t severity = 0xFF;
- int str_len;
- int len_data;
-
- if (bts->nokia.wait_reset) {
- LOGP(DNM, LOGL_INFO,
- "Ignore message while waiting for reset\n");
- return ret;
- }
-
- if (oh->length < sizeof(struct abis_om_nokia_hdr)) {
- LOGP(DNM, LOGL_ERROR, "Message too short\n");
- return -EINVAL;
- }
-
- len_data = oh->length - sizeof(struct abis_om_nokia_hdr);
- LOGP(DNM, LOGL_INFO, "(0x%02X) %s\n", mt, get_msg_type_name_string(mt));
-#if 0 /* debugging */
- dump_elements(noh->data, len_data);
-#endif
-
- switch (mt) {
- case NOKIA_MSG_OMU_STARTED:
- if (find_element(noh->data, len_data,
- NOKIA_EI_BTS_TYPE, &bts->nokia.bts_type,
- sizeof(uint8_t)) == sizeof(uint8_t))
- LOGP(DNM, LOGL_INFO, "BTS type = %d (%s)\n",
- bts->nokia.bts_type,
- get_bts_type_string(bts->nokia.bts_type));
- else
- LOGP(DNM, LOGL_ERROR, "BTS type not found\n");
- /* send START_DOWNLOAD_REQ */
- abis_nm_download_req(bts, ref);
- break;
- case NOKIA_MSG_MF_REQ:
- break;
- case NOKIA_MSG_CONF_REQ:
- /* send ACK */
- abis_nm_ack(bts, ref);
- nokia_abis_nm_queue_send_next(bts);
- /* send CONF_DATA */
- abis_nm_send_config(bts, bts->nokia.bts_type);
- bts->nokia.configured = 1;
- break;
- case NOKIA_MSG_ACK:
- if (find_element
- (noh->data, len_data, NOKIA_EI_ACK, &ack,
- sizeof(uint8_t)) == sizeof(uint8_t)) {
- LOGP(DNM, LOGL_INFO, "ACK = %d\n", ack);
- if (ack != 1) {
- LOGP(DNM, LOGL_ERROR, "No ACK received (%d)\n",
- ack);
- /* TODO: properly handle failures (NACK) */
- }
- } else
- LOGP(DNM, LOGL_ERROR, "ACK not found\n");
-
- /* TODO: the assumption for the following is that no NACK was received */
-
- /* ACK for reset message ? */
- if (!bts->nokia.did_reset) {
- bts->nokia.did_reset = 1;
-
- /*
- TODO: For the InSite processing the received data is
- blocked in the driver during reset.
- Otherwise the LAPD module might assert because the InSite
- sends garbage on the E1 line during reset.
- This is done by looking at "wait_reset" in the driver
- (function handle_ts1_read()) and ignoring the received data.
- It seems to be necessary for the MetroSite too.
- */
- bts->nokia.wait_reset = 1;
-
- osmo_timer_setup(&bts->nokia.reset_timer,
- reset_timer_cb, bts);
- osmo_timer_schedule(&bts->nokia.reset_timer, bts->nokia.bts_reset_timer_cnf, 0);
-
- struct gsm_e1_subslot *e1_link = &bts->oml_e1_link;
- struct e1inp_line *line;
- /* OML link */
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR,
- "BTS %u OML link referring to "
- "non-existing E1 line %u\n", bts->nr,
- e1_link->e1_nr);
- return -ENOMEM;
- }
-
- start_sabm_in_line(line, 0, -1); /* stop all first */
- }
-
- /* ACK for CONF DATA message ? */
- if (bts->nokia.configured != 0) {
- /* start TRX (RSL link) */
-
- struct gsm_e1_subslot *e1_link =
- &sign_link->trx->rsl_e1_link;
- struct e1inp_line *line;
-
- bts->nokia.configured = 0;
-
- /* RSL Link */
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR,
- "TRX (%u/%u) RSL link referring "
- "to non-existing E1 line %u\n",
- sign_link->trx->bts->nr, sign_link->trx->nr,
- e1_link->e1_nr);
- return -ENOMEM;
- }
- /* start TRX */
- start_sabm_in_line(line, 1, SAPI_RSL); /* start only RSL */
- }
- break;
- case NOKIA_MSG_STATE_CHANGED:
- /* send ACK */
- abis_nm_ack(bts, ref);
- break;
- case NOKIA_MSG_CONF_COMPLETE:
- /* send ACK */
- abis_nm_ack(bts, ref);
- break;
- case NOKIA_MSG_BLOCK_CTRL_REQ: /* seems to be send when something goes wrong !? */
- /* send ACK (do we have to send an ACK ?) */
- abis_nm_ack(bts, ref);
- break;
- case NOKIA_MSG_ALARM:
- find_element(noh->data, len_data, NOKIA_EI_SEVERITY, &severity,
- sizeof(severity));
- /* TODO: there might be alarms with both elements set */
- str_len =
- find_element(noh->data, len_data, NOKIA_EI_ADD_INFO, info,
- sizeof(info));
- if (str_len > 0) {
- info[str_len] = 0;
- LOGP(DNM, LOGL_INFO, "ALARM Severity %s (%d) : %s\n",
- get_severity_string(severity), severity, info);
- } else { /* nothing found, try details */
- str_len =
- find_element(noh->data, len_data,
- NOKIA_EI_ALARM_DETAIL, info,
- sizeof(info));
- if (str_len > 0) {
- uint16_t code;
- info[str_len] = 0;
- code = (info[0] << 8) + info[1];
- LOGP(DNM, LOGL_INFO,
- "ALARM Severity %s (%d), code 0x%X : %s\n",
- get_severity_string(severity), severity,
- code, info + 2);
- }
- }
- /* send ACK */
- abis_nm_ack(bts, ref);
- break;
- }
-
- nokia_abis_nm_queue_send_next(bts);
-
- return ret;
-}
-
-/* TODO: put in a separate file ? */
-
-int abis_nokia_rcvmsg(struct msgb *msg)
-{
- struct abis_om_hdr *oh = msgb_l2(msg);
- int rc = 0;
-
- /* Various consistency checks */
- if (oh->placement != ABIS_OM_PLACEMENT_ONLY) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML placement 0x%x not supported\n",
- oh->placement);
- if (oh->placement != ABIS_OM_PLACEMENT_FIRST)
- return -EINVAL;
- }
- if (oh->sequence != 0) {
- LOGP(DNM, LOGL_ERROR, "ABIS OML sequence 0x%x != 0x00\n",
- oh->sequence);
- return -EINVAL;
- }
- msg->l3h = (unsigned char *)oh + sizeof(*oh);
-
- switch (oh->mdisc) {
- case ABIS_OM_MDISC_FOM:
- LOGP(DNM, LOGL_INFO, "ABIS_OM_MDISC_FOM\n");
- rc = abis_nm_rcvmsg_fom(msg);
- break;
- case ABIS_OM_MDISC_MANUF:
- LOGP(DNM, LOGL_INFO, "ABIS_OM_MDISC_MANUF\n");
- break;
- case ABIS_OM_MDISC_MMI:
- case ABIS_OM_MDISC_TRAU:
- LOGP(DNM, LOGL_ERROR,
- "unimplemented ABIS OML message discriminator 0x%x\n",
- oh->mdisc);
- break;
- default:
- LOGP(DNM, LOGL_ERROR,
- "unknown ABIS OML message discriminator 0x%x\n",
- oh->mdisc);
- return -EINVAL;
- }
-
- msgb_free(msg);
- return rc;
-}
-
-static int bts_model_nokia_site_start(struct gsm_network *net);
-
-static void bts_model_nokia_site_e1line_bind_ops(struct e1inp_line *line)
-{
- e1inp_line_bind_ops(line, &bts_isdn_e1inp_line_ops);
-}
-
-static struct gsm_bts_model model_nokia_site = {
- .type = GSM_BTS_TYPE_NOKIA_SITE,
- .name = "nokia_site",
- .start = bts_model_nokia_site_start,
- .oml_rcvmsg = &abis_nokia_rcvmsg,
- .e1line_bind_ops = &bts_model_nokia_site_e1line_bind_ops,
-};
-
-static struct gsm_network *my_net;
-
-static int bts_model_nokia_site_start(struct gsm_network *net)
-{
- model_nokia_site.features.data = &model_nokia_site._features_data[0];
- model_nokia_site.features.data_len =
- sizeof(model_nokia_site._features_data);
-
- gsm_btsmodel_set_feature(&model_nokia_site, BTS_FEAT_HOPPING);
- gsm_btsmodel_set_feature(&model_nokia_site, BTS_FEAT_HSCSD);
- gsm_btsmodel_set_feature(&model_nokia_site, BTS_FEAT_MULTI_TSC);
-
- osmo_signal_register_handler(SS_L_INPUT, inp_sig_cb, NULL);
- osmo_signal_register_handler(SS_L_GLOBAL, gbl_sig_cb, NULL);
- osmo_signal_register_handler(SS_NM, nm_sig_cb, NULL);
-
- my_net = net;
-
- return 0;
-}
-
-int bts_model_nokia_site_init(void)
-{
- return gsm_bts_model_register(&model_nokia_site);
-}
diff --git a/src/libbsc/bts_siemens_bs11.c b/src/libbsc/bts_siemens_bs11.c
deleted file mode 100644
index c083b1e06..000000000
--- a/src/libbsc/bts_siemens_bs11.c
+++ /dev/null
@@ -1,602 +0,0 @@
-/* Siemens BS-11 specific code */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <osmocom/gsm/tlv.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/signal.h>
-
-static int bts_model_bs11_start(struct gsm_network *net);
-
-static void bts_model_bs11_e1line_bind_ops(struct e1inp_line *line)
-{
- e1inp_line_bind_ops(line, &bts_isdn_e1inp_line_ops);
-}
-
-static struct gsm_bts_model model_bs11 = {
- .type = GSM_BTS_TYPE_BS11,
- .name = "bs11",
- .start = bts_model_bs11_start,
- .oml_rcvmsg = &abis_nm_rcvmsg,
- .e1line_bind_ops = bts_model_bs11_e1line_bind_ops,
- .nm_att_tlvdef = {
- .def = {
- [NM_ATT_AVAIL_STATUS] = { TLV_TYPE_TLV },
- /* BS11 specifics */
- [NM_ATT_BS11_ESN_FW_CODE_NO] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_ESN_HW_CODE_NO] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_ESN_PCB_SERIAL] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_BOOT_SW_VERS] = { TLV_TYPE_TLV },
- [0xd5] = { TLV_TYPE_TLV },
- [0xa8] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_PASSWORD] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_TXPWR] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_RSSI_OFFS] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_LINE_CFG] = { TLV_TYPE_TV },
- [NM_ATT_BS11_L1_PROT_TYPE] = { TLV_TYPE_TV },
- [NM_ATT_BS11_BIT_ERR_THESH] = { TLV_TYPE_FIXED, 2 },
- [NM_ATT_BS11_DIVERSITY] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_LMT_LOGON_SESSION]={ TLV_TYPE_TLV },
- [NM_ATT_BS11_LMT_LOGIN_TIME] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_LMT_USER_ACC_LEV] ={ TLV_TYPE_TLV },
- [NM_ATT_BS11_LMT_USER_NAME] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_BTS_STATE] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_E1_STATE] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_PLL_MODE] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_PLL] = { TLV_TYPE_TLV },
- [NM_ATT_BS11_CCLK_ACCURACY] = { TLV_TYPE_TV },
- [NM_ATT_BS11_CCLK_TYPE] = { TLV_TYPE_TV },
- [0x95] = { TLV_TYPE_FIXED, 2 },
- },
- },
-};
-
-/* The following definitions are for OM and NM packets that we cannot yet
- * generate by code but we just pass on */
-
-// BTS Site Manager, SET ATTRIBUTES
-
-/*
- Object Class: BTS Site Manager
- Instance 1: FF
- Instance 2: FF
- Instance 3: FF
-SET ATTRIBUTES
- sAbisExternalTime: 2007/09/08 14:36:11
- omLAPDRelTimer: 30sec
- shortLAPDIntTimer: 5sec
- emergencyTimer1: 10 minutes
- emergencyTimer2: 0 minutes
-*/
-
-unsigned char msg_1[] =
-{
- NM_MT_BS11_SET_ATTR, NM_OC_SITE_MANAGER, 0xFF, 0xFF, 0xFF,
- NM_ATT_BS11_ABIS_EXT_TIME, 0x07,
- 0xD7, 0x09, 0x08, 0x0E, 0x24, 0x0B, 0xCE,
- 0x02,
- 0x00, 0x1E,
- NM_ATT_BS11_SH_LAPD_INT_TIMER,
- 0x01, 0x05,
- 0x42, 0x02, 0x00, 0x0A,
- 0x44, 0x02, 0x00, 0x00
-};
-
-// BTS, SET BTS ATTRIBUTES
-
-/*
- Object Class: BTS
- BTS relat. Number: 0
- Instance 2: FF
- Instance 3: FF
-SET BTS ATTRIBUTES
- bsIdentityCode / BSIC:
- PLMN_colour_code: 7h
- BS_colour_code: 7h
- BTS Air Timer T3105: 4 ,unit 10 ms
- btsIsHopping: FALSE
- periodCCCHLoadIndication: 1sec
- thresholdCCCHLoadIndication: 0%
- cellAllocationNumber: 00h = GSM 900
- enableInterferenceClass: 00h = Disabled
- fACCHQual: 6 (FACCH stealing flags minus 1)
- intaveParameter: 31 SACCH multiframes
- interferenceLevelBoundaries:
- Interference Boundary 1: 0Ah
- Interference Boundary 2: 0Fh
- Interference Boundary 3: 14h
- Interference Boundary 4: 19h
- Interference Boundary 5: 1Eh
- mSTxPwrMax: 11
- GSM range: 2=39dBm, 15=13dBm, stepsize 2 dBm
- DCS1800 range: 0=30dBm, 15=0dBm, stepsize 2 dBm
- PCS1900 range: 0=30dBm, 15=0dBm, stepsize 2 dBm
- 30=33dBm, 31=32dBm
- ny1:
- Maximum number of repetitions for PHYSICAL INFORMATION message (GSM 04.08): 20
- powerOutputThresholds:
- Out Power Fault Threshold: -10 dB
- Red Out Power Threshold: - 6 dB
- Excessive Out Power Threshold: 5 dB
- rACHBusyThreshold: -127 dBm
- rACHLoadAveragingSlots: 250 ,number of RACH burst periods
- rfResourceIndicationPeriod: 125 SACCH multiframes
- T200:
- SDCCH: 044 in 5 ms
- FACCH/Full rate: 031 in 5 ms
- FACCH/Half rate: 041 in 5 ms
- SACCH with TCH SAPI0: 090 in 10 ms
- SACCH with SDCCH: 090 in 10 ms
- SDCCH with SAPI3: 090 in 5 ms
- SACCH with TCH SAPI3: 135 in 10 ms
- tSync: 9000 units of 10 msec
- tTrau: 9000 units of 10 msec
- enableUmLoopTest: 00h = disabled
- enableExcessiveDistance: 00h = Disabled
- excessiveDistance: 64km
- hoppingMode: 00h = baseband hopping
- cellType: 00h = Standard Cell
- BCCH ARFCN / bCCHFrequency: 1
-*/
-
-static unsigned char bs11_attr_bts[] =
-{
- NM_ATT_BSIC, HARDCODED_BSIC,
- NM_ATT_BTS_AIR_TIMER, 0x04,
- NM_ATT_BS11_BTSLS_HOPPING, 0x00,
- NM_ATT_CCCH_L_I_P, 0x01,
- NM_ATT_CCCH_L_T, 0x00,
- NM_ATT_BS11_CELL_ALLOC_NR, NM_BS11_CANR_GSM,
- NM_ATT_BS11_ENA_INTERF_CLASS, 0x01,
- NM_ATT_BS11_FACCH_QUAL, 0x06,
- /* interference avg. period in numbers of SACCH multifr */
- NM_ATT_INTAVE_PARAM, 0x1F,
- NM_ATT_INTERF_BOUND, 0x0A, 0x0F, 0x14, 0x19, 0x1E, 0x7B,
- NM_ATT_CCCH_L_T, 0x23,
- NM_ATT_GSM_TIME, 0x28, 0x00,
- NM_ATT_ADM_STATE, 0x03,
- NM_ATT_RACH_B_THRESH, 0x7F,
- NM_ATT_LDAVG_SLOTS, 0x00, 0xFA,
- NM_ATT_BS11_RF_RES_IND_PER, 0x7D,
- NM_ATT_T200, 0x2C, 0x1F, 0x29, 0x5A, 0x5A, 0x5A, 0x87,
- NM_ATT_BS11_TSYNC, 0x23, 0x28,
- NM_ATT_BS11_TTRAU, 0x23, 0x28,
- NM_ATT_TEST_DUR, 0x01, 0x00,
- NM_ATT_OUTST_ALARM, 0x01, 0x00,
- NM_ATT_BS11_EXCESSIVE_DISTANCE, 0x01, 0x40,
- NM_ATT_BS11_HOPPING_MODE, 0x01, 0x00,
- NM_ATT_BS11_PLL, 0x01, 0x00,
- NM_ATT_BCCH_ARFCN, 0x00, HARDCODED_ARFCN/*0x01*/,
-};
-
-// Handover Recognition, SET ATTRIBUTES
-
-/*
-Illegal Contents GSM Formatted O&M Msg
- Object Class: Handover Recognition
- BTS relat. Number: 0
- Instance 2: FF
- Instance 3: FF
-SET ATTRIBUTES
- enableDelayPowerBudgetHO: 00h = Disabled
- enableDistanceHO: 00h = Disabled
- enableInternalInterCellHandover: 00h = Disabled
- enableInternalIntraCellHandover: 00h = Disabled
- enablePowerBudgetHO: 00h = Disabled
- enableRXLEVHO: 00h = Disabled
- enableRXQUALHO: 00h = Disabled
- hoAveragingDistance: 8 SACCH multiframes
- hoAveragingLev:
- A_LEV_HO: 8 SACCH multiframes
- W_LEV_HO: 1 SACCH multiframes
- hoAveragingPowerBudget: 16 SACCH multiframes
- hoAveragingQual:
- A_QUAL_HO: 8 SACCH multiframes
- W_QUAL_HO: 2 SACCH multiframes
- hoLowerThresholdLevDL: (10 - 110) dBm
- hoLowerThresholdLevUL: (5 - 110) dBm
- hoLowerThresholdQualDL: 06h = 6.4% < BER < 12.8%
- hoLowerThresholdQualUL: 06h = 6.4% < BER < 12.8%
- hoThresholdLevDLintra : (20 - 110) dBm
- hoThresholdLevULintra: (20 - 110) dBm
- hoThresholdMsRangeMax: 20 km
- nCell: 06h
- timerHORequest: 3 ,unit 2 SACCH multiframes
-*/
-
-unsigned char msg_3[] =
-{
- NM_MT_BS11_SET_ATTR, NM_OC_BS11_HANDOVER, 0x00, 0xFF, 0xFF,
- 0xD0, 0x00, /* enableDelayPowerBudgetHO */
- 0x64, 0x00, /* enableDistanceHO */
- 0x67, 0x00, /* enableInternalInterCellHandover */
- 0x68, 0x00, /* enableInternalInterCellHandover */
- 0x6A, 0x00, /* enablePowerBudgetHO */
- 0x6C, 0x00, /* enableRXLEVHO */
- 0x6D, 0x00, /* enableRXQUALHO */
- 0x6F, 0x08, /* hoAveragingDistance */
- 0x70, 0x08, 0x01, /* hoAveragingLev */
- 0x71, 0x10, 0x10, 0x10,
- 0x72, 0x08, 0x02, /* hoAveragingQual */
- 0x73, 0x0A, /* hoLowerThresholdLevDL */
- 0x74, 0x05, /* hoLowerThresholdLevUL */
- 0x75, 0x06, /* hoLowerThresholdQualDL */
- 0x76, 0x06, /* hoLowerThresholdQualUL */
- 0x78, 0x14, /* hoThresholdLevDLintra */
- 0x79, 0x14, /* hoThresholdLevULintra */
- 0x7A, 0x14, /* hoThresholdMsRangeMax */
- 0x7D, 0x06, /* nCell */
- NM_ATT_BS11_TIMER_HO_REQUEST, 0x03,
- 0x20, 0x01, 0x00,
- 0x45, 0x01, 0x00,
- 0x48, 0x01, 0x00,
- 0x5A, 0x01, 0x00,
- 0x5B, 0x01, 0x05,
- 0x5E, 0x01, 0x1A,
- 0x5F, 0x01, 0x20,
- 0x9D, 0x01, 0x00,
- 0x47, 0x01, 0x00,
- 0x5C, 0x01, 0x64,
- 0x5D, 0x01, 0x1E,
- 0x97, 0x01, 0x20,
- 0xF7, 0x01, 0x3C,
-};
-
-// Power Control, SET ATTRIBUTES
-
-/*
- Object Class: Power Control
- BTS relat. Number: 0
- Instance 2: FF
- Instance 3: FF
-SET ATTRIBUTES
- enableMsPowerControl: 00h = Disabled
- enablePowerControlRLFW: 00h = Disabled
- pcAveragingLev:
- A_LEV_PC: 4 SACCH multiframes
- W_LEV_PC: 1 SACCH multiframes
- pcAveragingQual:
- A_QUAL_PC: 4 SACCH multiframes
- W_QUAL_PC: 2 SACCH multiframes
- pcLowerThresholdLevDL: 0Fh
- pcLowerThresholdLevUL: 0Ah
- pcLowerThresholdQualDL: 05h = 3.2% < BER < 6.4%
- pcLowerThresholdQualUL: 05h = 3.2% < BER < 6.4%
- pcRLFThreshold: 0Ch
- pcUpperThresholdLevDL: 14h
- pcUpperThresholdLevUL: 0Fh
- pcUpperThresholdQualDL: 04h = 1.6% < BER < 3.2%
- pcUpperThresholdQualUL: 04h = 1.6% < BER < 3.2%
- powerConfirm: 2 ,unit 2 SACCH multiframes
- powerControlInterval: 2 ,unit 2 SACCH multiframes
- powerIncrStepSize: 02h = 4 dB
- powerRedStepSize: 01h = 2 dB
- radioLinkTimeoutBs: 64 SACCH multiframes
- enableBSPowerControl: 00h = disabled
-*/
-
-unsigned char msg_4[] =
-{
- NM_MT_BS11_SET_ATTR, NM_OC_BS11_PWR_CTRL, 0x00, 0xFF, 0xFF,
- NM_ATT_BS11_ENA_MS_PWR_CTRL, 0x00,
- NM_ATT_BS11_ENA_PWR_CTRL_RLFW, 0x00,
- 0x7E, 0x04, 0x01, /* pcAveragingLev */
- 0x7F, 0x04, 0x02, /* pcAveragingQual */
- 0x80, 0x0F, /* pcLowerThresholdLevDL */
- 0x81, 0x0A, /* pcLowerThresholdLevUL */
- 0x82, 0x05, /* pcLowerThresholdQualDL */
- 0x83, 0x05, /* pcLowerThresholdQualUL */
- 0x84, 0x0C, /* pcRLFThreshold */
- 0x85, 0x14, /* pcUpperThresholdLevDL */
- 0x86, 0x0F, /* pcUpperThresholdLevUL */
- 0x87, 0x04, /* pcUpperThresholdQualDL */
- 0x88, 0x04, /* pcUpperThresholdQualUL */
- 0x89, 0x02, /* powerConfirm */
- 0x8A, 0x02, /* powerConfirmInterval */
- 0x8B, 0x02, /* powerIncrStepSize */
- 0x8C, 0x01, /* powerRedStepSize */
- 0x8D, 0x40, /* radioLinkTimeoutBs */
- 0x65, 0x01, 0x00 // set to 0x01 to enable BSPowerControl
-};
-
-
-// Transceiver, SET TRX ATTRIBUTES (TRX 0)
-
-/*
- Object Class: Transceiver
- BTS relat. Number: 0
- Tranceiver number: 0
- Instance 3: FF
-SET TRX ATTRIBUTES
- aRFCNList (HEX): 0001
- txPwrMaxReduction: 00h = 30dB
- radioMeasGran: 254 SACCH multiframes
- radioMeasRep: 01h = enabled
- memberOfEmergencyConfig: 01h = TRUE
- trxArea: 00h = TRX doesn't belong to a concentric cell
-*/
-
-static unsigned char bs11_attr_radio[] =
-{
- NM_ATT_ARFCN_LIST, 0x01, 0x00, HARDCODED_ARFCN /*0x01*/,
- NM_ATT_RF_MAXPOWR_R, 0x00,
- NM_ATT_BS11_RADIO_MEAS_GRAN, 0x01, 0x05,
- NM_ATT_BS11_RADIO_MEAS_REP, 0x01, 0x01,
- NM_ATT_BS11_EMRG_CFG_MEMBER, 0x01, 0x01,
- NM_ATT_BS11_TRX_AREA, 0x01, 0x00,
-};
-
-/*
- * Patch the various SYSTEM INFORMATION tables to update
- * the LAI
- */
-static void patch_nm_tables(struct gsm_bts *bts)
-{
- uint8_t arfcn_low = bts->c0->arfcn & 0xff;
- uint8_t arfcn_high = (bts->c0->arfcn >> 8) & 0x0f;
-
- /* T3105 attribute in units of 10ms */
- bs11_attr_bts[2] = bts->network->T3105 / 10;
-
- /* patch ARFCN into BTS Attributes */
- bs11_attr_bts[69] &= 0xf0;
- bs11_attr_bts[69] |= arfcn_high;
- bs11_attr_bts[70] = arfcn_low;
-
- /* patch ARFCN into TRX Attributes */
- bs11_attr_radio[2] &= 0xf0;
- bs11_attr_radio[2] |= arfcn_high;
- bs11_attr_radio[3] = arfcn_low;
-
- /* patch the RACH attributes */
- if (bts->rach_b_thresh != -1)
- bs11_attr_bts[33] = bts->rach_b_thresh & 0xff;
-
- if (bts->rach_ldavg_slots != -1) {
- uint8_t avg_high = bts->rach_ldavg_slots & 0xff;
- uint8_t avg_low = (bts->rach_ldavg_slots >> 8) & 0x0f;
-
- bs11_attr_bts[35] = avg_high;
- bs11_attr_bts[36] = avg_low;
- }
-
- /* patch BSIC */
- bs11_attr_bts[1] = bts->bsic;
-
- /* patch the power reduction */
- bs11_attr_radio[5] = bts->c0->max_power_red / 2;
-}
-
-
-static void nm_reconfig_ts(struct gsm_bts_trx_ts *ts)
-{
- enum abis_nm_chan_comb ccomb = abis_nm_chcomb4pchan(ts->pchan);
- struct gsm_e1_subslot *e1l = &ts->e1_link;
-
- abis_nm_set_channel_attr(ts, ccomb);
-
- if (is_ipaccess_bts(ts->trx->bts))
- return;
-
- if (ts_is_tch(ts))
- abis_nm_conn_terr_traf(ts, e1l->e1_nr, e1l->e1_ts,
- e1l->e1_ts_ss);
-}
-
-static void nm_reconfig_trx(struct gsm_bts_trx *trx)
-{
- struct gsm_e1_subslot *e1l = &trx->rsl_e1_link;
- int i;
-
- patch_nm_tables(trx->bts);
-
- switch (trx->bts->type) {
- case GSM_BTS_TYPE_BS11:
- /* FIXME: discover this by fetching an attribute */
-#if 0
- trx->nominal_power = 15; /* 15dBm == 30mW PA configuration */
-#else
- trx->nominal_power = 24; /* 24dBm == 250mW PA configuration */
-#endif
- abis_nm_conn_terr_sign(trx, e1l->e1_nr, e1l->e1_ts,
- e1l->e1_ts_ss);
- abis_nm_establish_tei(trx->bts, trx->nr, e1l->e1_nr,
- e1l->e1_ts, e1l->e1_ts_ss, trx->rsl_tei);
-
- /* Set Radio Attributes */
- if (trx == trx->bts->c0)
- abis_nm_set_radio_attr(trx, bs11_attr_radio,
- sizeof(bs11_attr_radio));
- else {
- uint8_t trx1_attr_radio[sizeof(bs11_attr_radio)];
- uint8_t arfcn_low = trx->arfcn & 0xff;
- uint8_t arfcn_high = (trx->arfcn >> 8) & 0x0f;
- memcpy(trx1_attr_radio, bs11_attr_radio,
- sizeof(trx1_attr_radio));
-
- /* patch ARFCN into TRX Attributes */
- trx1_attr_radio[2] &= 0xf0;
- trx1_attr_radio[2] |= arfcn_high;
- trx1_attr_radio[3] = arfcn_low;
-
- abis_nm_set_radio_attr(trx, trx1_attr_radio,
- sizeof(trx1_attr_radio));
- }
- break;
- case GSM_BTS_TYPE_NANOBTS:
- switch (trx->bts->band) {
- case GSM_BAND_850:
- case GSM_BAND_900:
- trx->nominal_power = 20;
- break;
- case GSM_BAND_1800:
- case GSM_BAND_1900:
- trx->nominal_power = 23;
- break;
- default:
- LOGP(DNM, LOGL_ERROR, "Unsupported nanoBTS GSM band %s\n",
- gsm_band_name(trx->bts->band));
- break;
- }
- break;
- default:
- break;
- }
-
- for (i = 0; i < TRX_NR_TS; i++)
- nm_reconfig_ts(&trx->ts[i]);
-}
-
-static void nm_reconfig_bts(struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- switch (bts->type) {
- case GSM_BTS_TYPE_BS11:
- patch_nm_tables(bts);
- abis_nm_raw_msg(bts, sizeof(msg_1), msg_1); /* set BTS SiteMgr attr*/
- abis_nm_set_bts_attr(bts, bs11_attr_bts, sizeof(bs11_attr_bts));
- abis_nm_raw_msg(bts, sizeof(msg_3), msg_3); /* set BTS handover attr */
- abis_nm_raw_msg(bts, sizeof(msg_4), msg_4); /* set BTS power control attr */
- break;
- default:
- break;
- }
-
- llist_for_each_entry(trx, &bts->trx_list, list)
- nm_reconfig_trx(trx);
-}
-
-
-static void bootstrap_om_bs11(struct gsm_bts *bts)
-{
- LOGP(DNM, LOGL_NOTICE, "bootstrapping OML for BTS %u\n", bts->nr);
-
- /* stop sending event reports */
- abis_nm_event_reports(bts, 0);
-
- /* begin DB transmission */
- abis_nm_bs11_db_transmission(bts, 1);
-
- /* end DB transmission */
- abis_nm_bs11_db_transmission(bts, 0);
-
- /* Reset BTS Site manager resource */
- abis_nm_bs11_reset_resource(bts);
-
- /* begin DB transmission */
- abis_nm_bs11_db_transmission(bts, 1);
-
- /* reconfigure BTS with all TRX and all TS */
- nm_reconfig_bts(bts);
-
- /* end DB transmission */
- abis_nm_bs11_db_transmission(bts, 0);
-
- /* Reset BTS Site manager resource */
- abis_nm_bs11_reset_resource(bts);
-
- /* restart sending event reports */
- abis_nm_event_reports(bts, 1);
-}
-
-static int shutdown_om(struct gsm_bts *bts)
-{
- /* stop sending event reports */
- abis_nm_event_reports(bts, 0);
-
- /* begin DB transmission */
- abis_nm_bs11_db_transmission(bts, 1);
-
- /* end DB transmission */
- abis_nm_bs11_db_transmission(bts, 0);
-
- /* Reset BTS Site manager resource */
- abis_nm_bs11_reset_resource(bts);
-
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int gbl_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_bts *bts;
-
- if (subsys != SS_L_GLOBAL)
- return 0;
-
- switch (signal) {
- case S_GLOBAL_BTS_CLOSE_OM:
- bts = signal_data;
- if (bts->type == GSM_BTS_TYPE_BS11)
- shutdown_om(signal_data);
- break;
- }
-
- return 0;
-}
-
-/* Callback function to be called every time we receive a signal from INPUT */
-static int inp_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct input_signal_data *isd = signal_data;
-
- if (subsys != SS_L_INPUT)
- return 0;
-
- switch (signal) {
- case S_L_INP_TEI_UP:
- switch (isd->link_type) {
- case E1INP_SIGN_OML:
- if (isd->trx->bts->type == GSM_BTS_TYPE_BS11)
- bootstrap_om_bs11(isd->trx->bts);
- break;
- }
- }
-
- return 0;
-}
-
-static int bts_model_bs11_start(struct gsm_network *net)
-{
- model_bs11.features.data = &model_bs11._features_data[0];
- model_bs11.features.data_len = sizeof(model_bs11._features_data);
-
- gsm_btsmodel_set_feature(&model_bs11, BTS_FEAT_HOPPING);
- gsm_btsmodel_set_feature(&model_bs11, BTS_FEAT_HSCSD);
- gsm_btsmodel_set_feature(&model_bs11, BTS_FEAT_MULTI_TSC);
-
- osmo_signal_register_handler(SS_L_INPUT, inp_sig_cb, NULL);
- osmo_signal_register_handler(SS_L_GLOBAL, gbl_sig_cb, NULL);
-
- return 0;
-}
-
-int bts_model_bs11_init(void)
-{
- return gsm_bts_model_register(&model_bs11);
-}
diff --git a/src/libbsc/bts_sysmobts.c b/src/libbsc/bts_sysmobts.c
deleted file mode 100644
index e4b6cdc78..000000000
--- a/src/libbsc/bts_sysmobts.c
+++ /dev/null
@@ -1,60 +0,0 @@
-/* sysmocom sysmoBTS specific code */
-
-/* (C) 2010-2012 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <arpa/inet.h>
-
-#include <osmocom/gsm/tlv.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/debug.h>
-#include <osmocom/abis/subchan_demux.h>
-#include <osmocom/abis/ipaccess.h>
-#include <osmocom/core/logging.h>
-
-extern struct gsm_bts_model bts_model_nanobts;
-
-static struct gsm_bts_model model_sysmobts;
-
-int bts_model_sysmobts_init(void)
-{
- model_sysmobts = bts_model_nanobts;
- model_sysmobts.name = "sysmobts";
- model_sysmobts.type = GSM_BTS_TYPE_OSMOBTS;
-
- model_sysmobts.features.data = &model_sysmobts._features_data[0];
- model_sysmobts.features.data_len =
- sizeof(model_sysmobts._features_data);
- memset(model_sysmobts.features.data, 0, sizeof(model_sysmobts.features.data_len));
-
- gsm_btsmodel_set_feature(&model_sysmobts, BTS_FEAT_GPRS);
- gsm_btsmodel_set_feature(&model_sysmobts, BTS_FEAT_EGPRS);
-
- return gsm_bts_model_register(&model_sysmobts);
-}
diff --git a/src/libbsc/bts_unknown.c b/src/libbsc/bts_unknown.c
deleted file mode 100644
index f1135294f..000000000
--- a/src/libbsc/bts_unknown.c
+++ /dev/null
@@ -1,40 +0,0 @@
-/* Generic BTS - VTY code tries to allocate this BTS before type is known */
-
-/* (C) 2010 by Daniel Willmann <daniel@totalueberwachung.de>
- *
- * 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/>.
- *
- */
-
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/gsm/tlv.h>
-#include <openbsc/abis_nm.h>
-
-static struct gsm_bts_model model_unknown = {
- .type = GSM_BTS_TYPE_UNKNOWN,
- .name = "unknown",
- .oml_rcvmsg = &abis_nm_rcvmsg,
- .nm_att_tlvdef = {
- .def = {
- },
- },
-};
-
-int bts_model_unknown_init(void)
-{
- return gsm_bts_model_register(&model_unknown);
-}
diff --git a/src/libbsc/chan_alloc.c b/src/libbsc/chan_alloc.c
deleted file mode 100644
index 33b79a0b2..000000000
--- a/src/libbsc/chan_alloc.c
+++ /dev/null
@@ -1,543 +0,0 @@
-/* GSM Channel allocation routines
- *
- * (C) 2008 by Harald Welte <laforge@gnumonks.org>
- * (C) 2008, 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- *
- * 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/>.
- *
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/debug.h>
-#include <openbsc/rtp_proxy.h>
-#include <openbsc/signal.h>
-
-#include <osmocom/core/talloc.h>
-
-static int ts_is_usable(struct gsm_bts_trx_ts *ts)
-{
- /* FIXME: How does this behave for BS-11 ? */
- if (is_ipaccess_bts(ts->trx->bts)) {
- if (!nm_is_running(&ts->mo.nm_state))
- return 0;
- }
-
- /* If a TCH/F_PDCH TS is busy changing, it is already taken or not
- * yet available. */
- if (ts->pchan == GSM_PCHAN_TCH_F_PDCH) {
- if (ts->flags & TS_F_PDCH_PENDING_MASK)
- return 0;
- }
-
- /* If a dynamic channel is busy changing, it is already taken or not
- * yet available. */
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH) {
- if (ts->dyn.pchan_is != ts->dyn.pchan_want)
- return 0;
- }
-
- return 1;
-}
-
-int trx_is_usable(struct gsm_bts_trx *trx)
-{
- /* FIXME: How does this behave for BS-11 ? */
- if (is_ipaccess_bts(trx->bts)) {
- if (!nm_is_running(&trx->mo.nm_state) ||
- !nm_is_running(&trx->bb_transc.mo.nm_state))
- return 0;
- }
-
- return 1;
-}
-
-static struct gsm_lchan *
-_lc_find_trx(struct gsm_bts_trx *trx, enum gsm_phys_chan_config pchan,
- enum gsm_phys_chan_config dyn_as_pchan)
-{
- struct gsm_bts_trx_ts *ts;
- int j, start, stop, dir, ss;
- int check_subslots;
-
- if (!trx_is_usable(trx))
- return NULL;
-
- if (trx->bts->chan_alloc_reverse) {
- /* check TS 7..0 */
- start = 7;
- stop = -1;
- dir = -1;
- } else {
- /* check TS 0..7 */
- start = 0;
- stop = 8;
- dir = 1;
- }
-
- for (j = start; j != stop; j += dir) {
- ts = &trx->ts[j];
- if (!ts_is_usable(ts))
- continue;
- if (ts->pchan != pchan)
- continue;
-
- /*
- * Allocation for fully dynamic timeslots
- * (does not apply for ip.access style GSM_PCHAN_TCH_F_PDCH)
- *
- * Note the special nature of a dynamic timeslot in PDCH mode:
- * in PDCH mode, typically, lchan->type is GSM_LCHAN_NONE and
- * lchan->state is LCHAN_S_NONE -- an otherwise unused slot
- * becomes PDCH implicitly. In the same sense, this channel
- * allocator will never be asked to find an available PDCH
- * slot; only TCH/F or TCH/H will be requested, and PDCH mode
- * means that it is available for switchover.
- *
- * A dynamic timeslot in PDCH mode may be switched to TCH/F or
- * TCH/H. If a dyn TS is already in TCH/F or TCH/H mode, it
- * means that it is in use and its mode can't be switched.
- *
- * The logic concerning channels for TCH/F is trivial: there is
- * only one channel, so a dynamic TS in TCH/F mode is already
- * taken and not available for allocation. For TCH/H, we need
- * to check whether a dynamic timeslot is already in TCH/H mode
- * and whether one of the two channels is still available.
- */
- switch (pchan) {
- case GSM_PCHAN_TCH_F_TCH_H_PDCH:
- if (ts->dyn.pchan_is != ts->dyn.pchan_want) {
- /* The TS's mode is being switched. Not
- * available anymore/yet. */
- DEBUGP(DRLL, "%s already in switchover\n",
- gsm_ts_and_pchan_name(ts));
- continue;
- }
- if (ts->dyn.pchan_is == GSM_PCHAN_PDCH) {
- /* This slot is available. Still check for
- * error states to be sure; in all cases the
- * first lchan will be used. */
- if (ts->lchan->state != LCHAN_S_NONE
- && ts->lchan->state != LCHAN_S_ACTIVE)
- continue;
- return ts->lchan;
- }
- if (ts->dyn.pchan_is != dyn_as_pchan)
- /* not applicable. */
- continue;
- /* The requested type matches the dynamic timeslot's
- * current mode. A channel may still be available
- * (think TCH/H). */
- check_subslots = ts_subslots(ts);
- break;
-
- case GSM_PCHAN_TCH_F_PDCH:
- /* Available for voice when in PDCH mode */
- if (ts_pchan(ts) != GSM_PCHAN_PDCH)
- continue;
- /* Subslots of a PDCH ts don't need to be checked. */
- return ts->lchan;
-
- default:
- /* Not a dynamic channel, there is only one pchan kind: */
- check_subslots = ts_subslots(ts);
- break;
- }
-
- /* Is a sub-slot still available? */
- for (ss = 0; ss < check_subslots; ss++) {
- struct gsm_lchan *lc = &ts->lchan[ss];
- if (lc->type == GSM_LCHAN_NONE &&
- lc->state == LCHAN_S_NONE)
- return lc;
- }
- }
-
- return NULL;
-}
-
-static struct gsm_lchan *
-_lc_dyn_find_bts(struct gsm_bts *bts, enum gsm_phys_chan_config pchan,
- enum gsm_phys_chan_config dyn_as_pchan)
-{
- struct gsm_bts_trx *trx;
- struct gsm_lchan *lc;
-
- if (bts->chan_alloc_reverse) {
- llist_for_each_entry_reverse(trx, &bts->trx_list, list) {
- lc = _lc_find_trx(trx, pchan, dyn_as_pchan);
- if (lc)
- return lc;
- }
- } else {
- llist_for_each_entry(trx, &bts->trx_list, list) {
- lc = _lc_find_trx(trx, pchan, dyn_as_pchan);
- if (lc)
- return lc;
- }
- }
-
- return NULL;
-}
-
-static struct gsm_lchan *
-_lc_find_bts(struct gsm_bts *bts, enum gsm_phys_chan_config pchan)
-{
- return _lc_dyn_find_bts(bts, pchan, GSM_PCHAN_NONE);
-}
-
-/* Allocate a logical channel.
- *
- * Dynamic channel types: we always prefer a dedicated TS, and only pick +
- * switch a dynamic TS if no pure TS of the requested PCHAN is available.
- *
- * TCH_F/PDCH: if we pick a PDCH ACT style dynamic TS as TCH/F channel, PDCH
- * will be disabled in rsl_chan_activate_lchan(); there is no need to check
- * whether PDCH mode is currently active, here.
- */
-struct gsm_lchan *lchan_alloc(struct gsm_bts *bts, enum gsm_chan_t type,
- int allow_bigger)
-{
- struct gsm_lchan *lchan = NULL;
- enum gsm_phys_chan_config first, first_cbch, second, second_cbch;
-
- switch (type) {
- case GSM_LCHAN_SDCCH:
- if (bts->chan_alloc_reverse) {
- first = GSM_PCHAN_SDCCH8_SACCH8C;
- first_cbch = GSM_PCHAN_SDCCH8_SACCH8C_CBCH;
- second = GSM_PCHAN_CCCH_SDCCH4;
- second_cbch = GSM_PCHAN_CCCH_SDCCH4_CBCH;
- } else {
- first = GSM_PCHAN_CCCH_SDCCH4;
- first_cbch = GSM_PCHAN_CCCH_SDCCH4_CBCH;
- second = GSM_PCHAN_SDCCH8_SACCH8C;
- second_cbch = GSM_PCHAN_SDCCH8_SACCH8C_CBCH;
- }
-
- lchan = _lc_find_bts(bts, first);
- if (lchan == NULL)
- lchan = _lc_find_bts(bts, first_cbch);
- if (lchan == NULL)
- lchan = _lc_find_bts(bts, second);
- if (lchan == NULL)
- lchan = _lc_find_bts(bts, second_cbch);
-
- /* allow to assign bigger channels */
- if (allow_bigger) {
- if (lchan == NULL) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_H);
- if (lchan)
- type = GSM_LCHAN_TCH_H;
- }
-
- if (lchan == NULL) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F);
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
-
- /* try dynamic TCH/F_PDCH */
- if (lchan == NULL) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F_PDCH);
- /* TCH/F_PDCH will be used as TCH/F */
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
-
- /* try fully dynamic TCH/F_TCH/H_PDCH */
- if (lchan == NULL) {
- lchan = _lc_dyn_find_bts(bts, GSM_PCHAN_TCH_F_TCH_H_PDCH,
- GSM_PCHAN_TCH_H);
- if (lchan)
- type = GSM_LCHAN_TCH_H;
- }
- /*
- * No need to check fully dynamic channels for TCH/F:
- * if no TCH/H was available, neither will be TCH/F.
- */
- }
- break;
- case GSM_LCHAN_TCH_F:
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F);
- /* If we don't have TCH/F available, fall-back to TCH/H */
- if (!lchan) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_H);
- if (lchan)
- type = GSM_LCHAN_TCH_H;
- }
- /* If we don't have TCH/H either, try dynamic TCH/F_PDCH */
- if (!lchan) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F_PDCH);
- /* TCH/F_PDCH used as TCH/F -- here, type is already
- * set to GSM_LCHAN_TCH_F, but for clarity's sake... */
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
-
- /* Try fully dynamic TCH/F_TCH/H_PDCH as TCH/F... */
- if (!lchan && bts->network->dyn_ts_allow_tch_f) {
- lchan = _lc_dyn_find_bts(bts,
- GSM_PCHAN_TCH_F_TCH_H_PDCH,
- GSM_PCHAN_TCH_F);
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
- /* ...and as TCH/H. */
- if (!lchan) {
- lchan = _lc_dyn_find_bts(bts,
- GSM_PCHAN_TCH_F_TCH_H_PDCH,
- GSM_PCHAN_TCH_H);
- if (lchan)
- type = GSM_LCHAN_TCH_H;
- }
- break;
- case GSM_LCHAN_TCH_H:
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_H);
- /* If we don't have TCH/H available, fall-back to TCH/F */
- if (!lchan) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F);
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
- /* No dedicated TCH/x available -- try fully dynamic
- * TCH/F_TCH/H_PDCH */
- if (!lchan) {
- lchan = _lc_dyn_find_bts(bts,
- GSM_PCHAN_TCH_F_TCH_H_PDCH,
- GSM_PCHAN_TCH_H);
- if (lchan)
- type = GSM_LCHAN_TCH_H;
- }
- /*
- * No need to check TCH/F_TCH/H_PDCH channels for TCH/F:
- * if no TCH/H was available, neither will be TCH/F.
- */
- /* If we don't have TCH/F either, try dynamic TCH/F_PDCH */
- if (!lchan) {
- lchan = _lc_find_bts(bts, GSM_PCHAN_TCH_F_PDCH);
- if (lchan)
- type = GSM_LCHAN_TCH_F;
- }
- break;
- default:
- LOGP(DRLL, LOGL_ERROR, "Unknown gsm_chan_t %u\n", type);
- }
-
- if (lchan) {
- lchan->type = type;
-
- LOGP(DRLL, LOGL_INFO, "%s Allocating lchan=%u as %s\n",
- gsm_ts_and_pchan_name(lchan->ts),
- lchan->nr, gsm_lchant_name(lchan->type));
-
- /* clear sapis */
- memset(lchan->sapis, 0, ARRAY_SIZE(lchan->sapis));
-
- /* clear multi rate config */
- memset(&lchan->mr_ms_lv, 0, sizeof(lchan->mr_ms_lv));
- memset(&lchan->mr_bts_lv, 0, sizeof(lchan->mr_bts_lv));
- lchan->broken_reason = "";
- } else {
- struct challoc_signal_data sig;
-
- LOGP(DRLL, LOGL_ERROR, "Failed to allocate %s channel\n",
- gsm_lchant_name(type));
-
- sig.bts = bts;
- sig.type = type;
- osmo_signal_dispatch(SS_CHALLOC, S_CHALLOC_ALLOC_FAIL, &sig);
- }
-
- return lchan;
-}
-
-/* Free a logical channel */
-void lchan_free(struct gsm_lchan *lchan)
-{
- struct challoc_signal_data sig;
- int i;
-
- sig.type = lchan->type;
- lchan->type = GSM_LCHAN_NONE;
-
-
- if (lchan->conn) {
- struct lchan_signal_data sig;
-
- /* We might kill an active channel... */
- sig.lchan = lchan;
- sig.mr = NULL;
- osmo_signal_dispatch(SS_LCHAN, S_LCHAN_UNEXPECTED_RELEASE, &sig);
- }
-
- if (lchan->abis_ip.rtp_socket) {
- LOGP(DRLL, LOGL_ERROR, "%s RTP Proxy Socket remained open.\n",
- gsm_lchan_name(lchan));
- rtp_socket_free(lchan->abis_ip.rtp_socket);
- lchan->abis_ip.rtp_socket = NULL;
- }
-
- /* stop the timer */
- osmo_timer_del(&lchan->T3101);
-
- /* clear cached measuement reports */
- lchan->meas_rep_idx = 0;
- for (i = 0; i < ARRAY_SIZE(lchan->meas_rep); i++) {
- lchan->meas_rep[i].flags = 0;
- lchan->meas_rep[i].nr = 0;
- }
- for (i = 0; i < ARRAY_SIZE(lchan->neigh_meas); i++)
- lchan->neigh_meas[i].arfcn = 0;
-
- if (lchan->rqd_ref) {
- talloc_free(lchan->rqd_ref);
- lchan->rqd_ref = NULL;
- lchan->rqd_ta = 0;
- }
-
- sig.lchan = lchan;
- sig.bts = lchan->ts->trx->bts;
- osmo_signal_dispatch(SS_CHALLOC, S_CHALLOC_FREED, &sig);
-
- if (lchan->conn) {
- LOGP(DRLL, LOGL_ERROR, "the subscriber connection should be gone.\n");
- lchan->conn = NULL;
- }
-
- /* FIXME: ts_free() the timeslot, if we're the last logical
- * channel using it */
-}
-
-/*
- * There was an error with the TRX and we need to forget
- * any state so that a lchan can be allocated again after
- * the trx is fully usable.
- *
- * This should be called after lchan_free to force a channel
- * be available for allocation again. This means that this
- * method will stop the "delay after error"-timer and set the
- * state to LCHAN_S_NONE.
- */
-void lchan_reset(struct gsm_lchan *lchan)
-{
- osmo_timer_del(&lchan->T3101);
- osmo_timer_del(&lchan->T3109);
- osmo_timer_del(&lchan->T3111);
- osmo_timer_del(&lchan->error_timer);
-
- lchan->type = GSM_LCHAN_NONE;
- lchan->state = LCHAN_S_NONE;
-
- if (lchan->abis_ip.rtp_socket) {
- rtp_socket_free(lchan->abis_ip.rtp_socket);
- lchan->abis_ip.rtp_socket = NULL;
- }
-}
-
-/* Drive the release process of the lchan */
-static void _lchan_handle_release(struct gsm_lchan *lchan,
- int sacch_deact, int mode)
-{
- /* Release all SAPIs on the local end and continue */
- rsl_release_sapis_from(lchan, 1, RSL_REL_LOCAL_END);
-
- /*
- * Shall we send a RR Release, start T3109 and wait for the
- * release indication from the BTS or just take it down (e.g.
- * on assignment requests)
- */
- if (sacch_deact) {
- gsm48_send_rr_release(lchan);
-
- /* Deactivate the SACCH on the BTS side */
- rsl_deact_sacch(lchan);
- rsl_start_t3109(lchan);
- } else if (lchan->sapis[0] == LCHAN_SAPI_UNUSED) {
- rsl_direct_rf_release(lchan);
- } else {
- rsl_release_request(lchan, 0, mode);
- }
-}
-
-/* Consider releasing the channel now */
-int lchan_release(struct gsm_lchan *lchan, int sacch_deact, enum rsl_rel_mode mode)
-{
- DEBUGP(DRLL, "%s starting release sequence\n", gsm_lchan_name(lchan));
- rsl_lchan_set_state(lchan, LCHAN_S_REL_REQ);
-
- lchan->conn = NULL;
- _lchan_handle_release(lchan, sacch_deact, mode);
- return 1;
-}
-
-void bts_chan_load(struct pchan_load *cl, const struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
-
- llist_for_each_entry(trx, &bts->trx_list, list) {
- int i;
-
- /* skip administratively deactivated tranxsceivers */
- if (!nm_is_running(&trx->mo.nm_state) ||
- !nm_is_running(&trx->bb_transc.mo.nm_state))
- continue;
-
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[i];
- struct load_counter *pl = &cl->pchan[ts->pchan];
- int j;
- int subslots;
-
- /* skip administratively deactivated timeslots */
- if (!nm_is_running(&ts->mo.nm_state))
- continue;
-
- subslots = ts_subslots(ts);
- for (j = 0; j < subslots; j++) {
- struct gsm_lchan *lchan = &ts->lchan[j];
-
- pl->total++;
-
- switch (lchan->state) {
- case LCHAN_S_NONE:
- break;
- default:
- pl->used++;
- break;
- }
- }
- }
- }
-}
-
-void network_chan_load(struct pchan_load *pl, struct gsm_network *net)
-{
- struct gsm_bts *bts;
-
- memset(pl, 0, sizeof(*pl));
-
- llist_for_each_entry(bts, &net->bts_list, list)
- bts_chan_load(pl, bts);
-}
-
diff --git a/src/libbsc/e1_config.c b/src/libbsc/e1_config.c
deleted file mode 100644
index d57dec57e..000000000
--- a/src/libbsc/e1_config.c
+++ /dev/null
@@ -1,297 +0,0 @@
-/* OpenBSC E1 Input code */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <string.h>
-#include <errno.h>
-
-#include <netinet/in.h>
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/abis/trau_frame.h>
-#include <openbsc/trau_mux.h>
-#include <openbsc/misdn.h>
-#include <osmocom/abis/ipaccess.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/debug.h>
-#include <openbsc/abis_rsl.h>
-
-#define SAPI_L2ML 0
-#define SAPI_OML 62
-#define SAPI_RSL 0 /* 63 ? */
-
-/* The e1_reconfig_*() functions below take the configuration present in the
- * bts/trx/ts data structures and ensure the E1 configuration reflects the
- * timeslot/subslot/TEI configuration */
-
-int e1_reconfig_ts(struct gsm_bts_trx_ts *ts)
-{
- struct gsm_e1_subslot *e1_link = &ts->e1_link;
- struct e1inp_line *line;
- struct e1inp_ts *e1_ts;
-
- DEBUGP(DLMI, "e1_reconfig_ts(%u,%u,%u)\n", ts->trx->bts->nr, ts->trx->nr, ts->nr);
-
- if (!e1_link->e1_ts) {
- LOGP(DLINP, LOGL_ERROR, "TS (%u/%u/%u) without E1 timeslot?\n",
- ts->nr, ts->trx->nr, ts->trx->bts->nr);
- return 0;
- }
-
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR, "TS (%u/%u/%u) referring to "
- "non-existing E1 line %u\n", ts->nr, ts->trx->nr,
- ts->trx->bts->nr, e1_link->e1_nr);
- return -ENOMEM;
- }
-
- if (ts_is_tch(ts)) {
- e1_ts = &line->ts[e1_link->e1_ts-1];
- e1inp_ts_config_trau(e1_ts, line, subch_cb);
- subch_demux_activate(&e1_ts->trau.demux, e1_link->e1_ts_ss);
- }
-
- return 0;
-}
-
-int e1_reconfig_trx(struct gsm_bts_trx *trx)
-{
- struct gsm_e1_subslot *e1_link = &trx->rsl_e1_link;
- struct e1inp_ts *sign_ts;
- struct e1inp_line *line;
- struct e1inp_sign_link *rsl_link;
- int i;
-
- if (!e1_link->e1_ts) {
- LOGP(DLINP, LOGL_ERROR, "TRX (%u/%u) RSL link without "
- "timeslot?\n", trx->bts->nr, trx->nr);
- return -EINVAL;
- }
-
- /* RSL Link */
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR, "TRX (%u/%u) RSL link referring "
- "to non-existing E1 line %u\n", trx->bts->nr,
- trx->nr, e1_link->e1_nr);
- return -ENOMEM;
- }
- sign_ts = &line->ts[e1_link->e1_ts-1];
- e1inp_ts_config_sign(sign_ts, line);
- /* Ericsson RBS have a per-TRX OML link in parallel to RSL */
- if (trx->bts->type == GSM_BTS_TYPE_RBS2000) {
- struct e1inp_sign_link *oml_link;
- oml_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_OML, trx,
- trx->rsl_tei, SAPI_OML);
- if (!oml_link) {
- LOGP(DLINP, LOGL_ERROR, "TRX (%u/%u) OML link creation "
- "failed\n", trx->bts->nr, trx->nr);
- return -ENOMEM;
- }
- if (trx->oml_link)
- e1inp_sign_link_destroy(trx->oml_link);
- trx->oml_link = oml_link;
- }
- rsl_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_RSL,
- trx, trx->rsl_tei, SAPI_RSL);
- if (!rsl_link) {
- LOGP(DLINP, LOGL_ERROR, "TRX (%u/%u) RSL link creation "
- "failed\n", trx->bts->nr, trx->nr);
- return -ENOMEM;
- }
- if (trx->rsl_link)
- e1inp_sign_link_destroy(trx->rsl_link);
- trx->rsl_link = rsl_link;
-
- for (i = 0; i < TRX_NR_TS; i++)
- e1_reconfig_ts(&trx->ts[i]);
-
- return 0;
-}
-
-/* this is the generic callback for all ISDN-based BTS. */
-static int bts_isdn_sign_link(struct msgb *msg)
-{
- int ret = -EINVAL;
- struct e1inp_sign_link *link = msg->dst;
- struct gsm_bts *bts;
-
- switch (link->type) {
- case E1INP_SIGN_OML:
- bts = link->trx->bts;
- ret = bts->model->oml_rcvmsg(msg);
- break;
- case E1INP_SIGN_RSL:
- ret = abis_rsl_rcvmsg(msg);
- break;
- default:
- LOGP(DLMI, LOGL_ERROR, "unknown link type %u\n", link->type);
- break;
- }
- return ret;
-}
-
-struct e1inp_line_ops bts_isdn_e1inp_line_ops = {
- .sign_link = bts_isdn_sign_link,
-};
-
-int e1_reconfig_bts(struct gsm_bts *bts)
-{
- struct gsm_e1_subslot *e1_link = &bts->oml_e1_link;
- struct e1inp_ts *sign_ts;
- struct e1inp_line *line;
- struct e1inp_sign_link *oml_link;
- struct gsm_bts_trx *trx;
-
- DEBUGP(DLMI, "e1_reconfig_bts(%u)\n", bts->nr);
-
- line = e1inp_line_find(e1_link->e1_nr);
- if (!line) {
- LOGP(DLINP, LOGL_ERROR, "BTS %u OML link referring to "
- "non-existing E1 line %u\n", bts->nr, e1_link->e1_nr);
- return -ENOMEM;
- }
-
- if (!bts->model->e1line_bind_ops) {
- LOGP(DLINP, LOGL_ERROR, "no callback to bind E1 line operations\n");
- return -EINVAL;
- }
- if (!line->ops)
- bts->model->e1line_bind_ops(line);
-
- /* skip signal link initialization, this is done later for these BTS. */
- if (bts->type == GSM_BTS_TYPE_NANOBTS ||
- bts->type == GSM_BTS_TYPE_OSMOBTS)
- return e1inp_line_update(line);
-
- /* OML link */
- if (!e1_link->e1_ts) {
- LOGP(DLINP, LOGL_ERROR, "BTS %u OML link without timeslot?\n",
- bts->nr);
- return -EINVAL;
- }
-
- sign_ts = &line->ts[e1_link->e1_ts-1];
- e1inp_ts_config_sign(sign_ts, line);
- oml_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_OML,
- bts->c0, bts->oml_tei, SAPI_OML);
- if (!oml_link) {
- LOGP(DLINP, LOGL_ERROR, "BTS %u OML link creation failed\n",
- bts->nr);
- return -ENOMEM;
- }
- if (bts->oml_link)
- e1inp_sign_link_destroy(bts->oml_link);
- bts->oml_link = oml_link;
-
- llist_for_each_entry(trx, &bts->trx_list, list)
- e1_reconfig_trx(trx);
-
- /* notify E1 input something has changed */
- return e1inp_line_update(line);
-}
-
-#if 0
-/* do some compiled-in configuration for our BTS/E1 setup */
-int e1_config(struct gsm_bts *bts, int cardnr, int release_l2)
-{
- struct e1inp_line *line;
- struct e1inp_ts *sign_ts;
- struct e1inp_sign_link *oml_link, *rsl_link;
- struct gsm_bts_trx *trx = bts->c0;
- int base_ts;
-
- switch (bts->nr) {
- case 0:
- /* First BTS uses E1 TS 01,02,03,04,05 */
- base_ts = HARDCODED_BTS0_TS - 1;
- break;
- case 1:
- /* Second BTS uses E1 TS 06,07,08,09,10 */
- base_ts = HARDCODED_BTS1_TS - 1;
- break;
- case 2:
- /* Third BTS uses E1 TS 11,12,13,14,15 */
- base_ts = HARDCODED_BTS2_TS - 1;
- default:
- return -EINVAL;
- }
-
- line = talloc_zero(tall_bsc_ctx, struct e1inp_line);
- if (!line)
- return -ENOMEM;
-
- /* create E1 timeslots for signalling and TRAU frames */
- e1inp_ts_config(&line->ts[base_ts+1-1], line, E1INP_TS_TYPE_SIGN);
- e1inp_ts_config(&line->ts[base_ts+2-1], line, E1INP_TS_TYPE_TRAU);
- e1inp_ts_config(&line->ts[base_ts+3-1], line, E1INP_TS_TYPE_TRAU);
-
- /* create signalling links for TS1 */
- sign_ts = &line->ts[base_ts+1-1];
- oml_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_OML,
- trx, TEI_OML, SAPI_OML);
- rsl_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_RSL,
- trx, TEI_RSL, SAPI_RSL);
-
- /* create back-links from bts/trx */
- bts->oml_link = oml_link;
- trx->rsl_link = rsl_link;
-
- /* enable subchannel demuxer on TS2 */
- subch_demux_activate(&line->ts[base_ts+2-1].trau.demux, 1);
- subch_demux_activate(&line->ts[base_ts+2-1].trau.demux, 2);
- subch_demux_activate(&line->ts[base_ts+2-1].trau.demux, 3);
-
- /* enable subchannel demuxer on TS3 */
- subch_demux_activate(&line->ts[base_ts+3-1].trau.demux, 0);
- subch_demux_activate(&line->ts[base_ts+3-1].trau.demux, 1);
- subch_demux_activate(&line->ts[base_ts+3-1].trau.demux, 2);
- subch_demux_activate(&line->ts[base_ts+3-1].trau.demux, 3);
-
- trx = gsm_bts_trx_num(bts, 1);
- if (trx) {
- /* create E1 timeslots for TRAU frames of TRX1 */
- e1inp_ts_config(&line->ts[base_ts+4-1], line, E1INP_TS_TYPE_TRAU);
- e1inp_ts_config(&line->ts[base_ts+5-1], line, E1INP_TS_TYPE_TRAU);
-
- /* create RSL signalling link for TRX1 */
- sign_ts = &line->ts[base_ts+1-1];
- rsl_link = e1inp_sign_link_create(sign_ts, E1INP_SIGN_RSL,
- trx, TEI_RSL+1, SAPI_RSL);
- /* create back-links from trx */
- trx->rsl_link = rsl_link;
-
- /* enable subchannel demuxer on TS2 */
- subch_demux_activate(&line->ts[base_ts+4-1].trau.demux, 0);
- subch_demux_activate(&line->ts[base_ts+4-1].trau.demux, 1);
- subch_demux_activate(&line->ts[base_ts+4-1].trau.demux, 2);
- subch_demux_activate(&line->ts[base_ts+4-1].trau.demux, 3);
-
- /* enable subchannel demuxer on TS3 */
- subch_demux_activate(&line->ts[base_ts+5-1].trau.demux, 0);
- subch_demux_activate(&line->ts[base_ts+5-1].trau.demux, 1);
- subch_demux_activate(&line->ts[base_ts+5-1].trau.demux, 2);
- subch_demux_activate(&line->ts[base_ts+5-1].trau.demux, 3);
- }
-
- return mi_setup(cardnr, line, release_l2);
-}
-#endif
diff --git a/src/libbsc/gsm_04_08_utils.c b/src/libbsc/gsm_04_08_utils.c
deleted file mode 100644
index 7c5e0e97a..000000000
--- a/src/libbsc/gsm_04_08_utils.c
+++ /dev/null
@@ -1,632 +0,0 @@
-/* GSM Mobile Radio Interface Layer 3 messages on the A-bis interface
- * 3GPP TS 04.08 version 7.21.0 Release 1998 / ETSI TS 100 940 V7.21.0
- * utility functions
- */
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2008, 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- *
- * 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/>.
- *
- */
-#include <stdio.h>
-#include <stdlib.h>
-#include <errno.h>
-#include <netinet/in.h>
-
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/gsm48.h>
-
-#include <openbsc/abis_rsl.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/transaction.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-#include <openbsc/bsc_api.h>
-
-/* should ip.access BTS use direct RTP streams between each other (1),
- * or should OpenBSC always act as RTP relay/proxy in between (0) ? */
-int ipacc_rtp_direct = 1;
-
-static int gsm48_sendmsg(struct msgb *msg)
-{
- if (msg->lchan)
- msg->dst = msg->lchan->ts->trx->rsl_link;
-
- msg->l3h = msg->data;
- return rsl_data_request(msg, 0);
-}
-
-/* Section 9.1.8 / Table 9.9 */
-struct chreq {
- uint8_t val;
- uint8_t mask;
- enum chreq_type type;
-};
-
-/* If SYSTEM INFORMATION TYPE 4 NECI bit == 1 */
-static const struct chreq chreq_type_neci1[] = {
- { 0xa0, 0xe0, CHREQ_T_EMERG_CALL },
- { 0xc0, 0xe0, CHREQ_T_CALL_REEST_TCH_F },
- { 0x68, 0xfc, CHREQ_T_CALL_REEST_TCH_H },
- { 0x6c, 0xfc, CHREQ_T_CALL_REEST_TCH_H_DBL },
- { 0xe0, 0xe0, CHREQ_T_TCH_F },
- { 0x40, 0xf0, CHREQ_T_VOICE_CALL_TCH_H },
- { 0x50, 0xf0, CHREQ_T_DATA_CALL_TCH_H },
- { 0x00, 0xf0, CHREQ_T_LOCATION_UPD },
- { 0x10, 0xf0, CHREQ_T_SDCCH },
- { 0x80, 0xe0, CHREQ_T_PAG_R_ANY_NECI1 },
- { 0x20, 0xf0, CHREQ_T_PAG_R_TCH_F },
- { 0x30, 0xf0, CHREQ_T_PAG_R_TCH_FH },
- { 0x67, 0xff, CHREQ_T_LMU },
- { 0x60, 0xf9, CHREQ_T_RESERVED_SDCCH },
- { 0x61, 0xfb, CHREQ_T_RESERVED_SDCCH },
- { 0x63, 0xff, CHREQ_T_RESERVED_SDCCH },
- { 0x70, 0xf8, CHREQ_T_PDCH_TWO_PHASE },
- { 0x78, 0xfc, CHREQ_T_PDCH_ONE_PHASE },
- { 0x78, 0xfa, CHREQ_T_PDCH_ONE_PHASE },
- { 0x78, 0xf9, CHREQ_T_PDCH_ONE_PHASE },
- { 0x7f, 0xff, CHREQ_T_RESERVED_IGNORE },
-};
-
-/* If SYSTEM INFORMATION TYPE 4 NECI bit == 0 */
-static const struct chreq chreq_type_neci0[] = {
- { 0xa0, 0xe0, CHREQ_T_EMERG_CALL },
- { 0xc0, 0xe0, CHREQ_T_CALL_REEST_TCH_H },
- { 0xe0, 0xe0, CHREQ_T_TCH_F },
- { 0x50, 0xf0, CHREQ_T_DATA_CALL_TCH_H },
- { 0x00, 0xe0, CHREQ_T_LOCATION_UPD },
- { 0x80, 0xe0, CHREQ_T_PAG_R_ANY_NECI0 },
- { 0x20, 0xf0, CHREQ_T_PAG_R_TCH_F },
- { 0x30, 0xf0, CHREQ_T_PAG_R_TCH_FH },
- { 0x67, 0xff, CHREQ_T_LMU },
- { 0x60, 0xf9, CHREQ_T_RESERVED_SDCCH },
- { 0x61, 0xfb, CHREQ_T_RESERVED_SDCCH },
- { 0x63, 0xff, CHREQ_T_RESERVED_SDCCH },
- { 0x70, 0xf8, CHREQ_T_PDCH_TWO_PHASE },
- { 0x78, 0xfc, CHREQ_T_PDCH_ONE_PHASE },
- { 0x78, 0xfa, CHREQ_T_PDCH_ONE_PHASE },
- { 0x78, 0xf9, CHREQ_T_PDCH_ONE_PHASE },
- { 0x7f, 0xff, CHREQ_T_RESERVED_IGNORE },
-};
-
-static const enum gsm_chan_t ctype_by_chreq[] = {
- [CHREQ_T_EMERG_CALL] = GSM_LCHAN_TCH_F,
- [CHREQ_T_CALL_REEST_TCH_F] = GSM_LCHAN_TCH_F,
- [CHREQ_T_CALL_REEST_TCH_H] = GSM_LCHAN_TCH_H,
- [CHREQ_T_CALL_REEST_TCH_H_DBL] = GSM_LCHAN_TCH_H,
- [CHREQ_T_SDCCH] = GSM_LCHAN_SDCCH,
- [CHREQ_T_TCH_F] = GSM_LCHAN_TCH_F,
- [CHREQ_T_VOICE_CALL_TCH_H] = GSM_LCHAN_TCH_H,
- [CHREQ_T_DATA_CALL_TCH_H] = GSM_LCHAN_TCH_H,
- [CHREQ_T_LOCATION_UPD] = GSM_LCHAN_SDCCH,
- [CHREQ_T_PAG_R_ANY_NECI1] = GSM_LCHAN_SDCCH,
- [CHREQ_T_PAG_R_ANY_NECI0] = GSM_LCHAN_SDCCH,
- [CHREQ_T_PAG_R_TCH_F] = GSM_LCHAN_TCH_F,
- [CHREQ_T_PAG_R_TCH_FH] = GSM_LCHAN_TCH_F,
- [CHREQ_T_LMU] = GSM_LCHAN_SDCCH,
- [CHREQ_T_RESERVED_SDCCH] = GSM_LCHAN_SDCCH,
- [CHREQ_T_PDCH_ONE_PHASE] = GSM_LCHAN_PDTCH,
- [CHREQ_T_PDCH_TWO_PHASE] = GSM_LCHAN_PDTCH,
- [CHREQ_T_RESERVED_IGNORE] = GSM_LCHAN_UNKNOWN,
-};
-
-static const enum gsm_chreq_reason_t reason_by_chreq[] = {
- [CHREQ_T_EMERG_CALL] = GSM_CHREQ_REASON_EMERG,
- [CHREQ_T_CALL_REEST_TCH_F] = GSM_CHREQ_REASON_CALL,
- [CHREQ_T_CALL_REEST_TCH_H] = GSM_CHREQ_REASON_CALL,
- [CHREQ_T_CALL_REEST_TCH_H_DBL] = GSM_CHREQ_REASON_CALL,
- [CHREQ_T_SDCCH] = GSM_CHREQ_REASON_OTHER,
- [CHREQ_T_TCH_F] = GSM_CHREQ_REASON_OTHER,
- [CHREQ_T_VOICE_CALL_TCH_H] = GSM_CHREQ_REASON_CALL,
- [CHREQ_T_DATA_CALL_TCH_H] = GSM_CHREQ_REASON_OTHER,
- [CHREQ_T_LOCATION_UPD] = GSM_CHREQ_REASON_LOCATION_UPD,
- [CHREQ_T_PAG_R_ANY_NECI1] = GSM_CHREQ_REASON_PAG,
- [CHREQ_T_PAG_R_ANY_NECI0] = GSM_CHREQ_REASON_PAG,
- [CHREQ_T_PAG_R_TCH_F] = GSM_CHREQ_REASON_PAG,
- [CHREQ_T_PAG_R_TCH_FH] = GSM_CHREQ_REASON_PAG,
- [CHREQ_T_LMU] = GSM_CHREQ_REASON_OTHER,
- [CHREQ_T_PDCH_ONE_PHASE] = GSM_CHREQ_REASON_PDCH,
- [CHREQ_T_PDCH_TWO_PHASE] = GSM_CHREQ_REASON_PDCH,
- [CHREQ_T_RESERVED_SDCCH] = GSM_CHREQ_REASON_OTHER,
- [CHREQ_T_RESERVED_IGNORE] = GSM_CHREQ_REASON_OTHER,
-};
-
-/* verify that the two tables match */
-osmo_static_assert(sizeof(ctype_by_chreq) ==
- sizeof(((struct gsm_network *) NULL)->ctype_by_chreq), assert_size);
-
-/*
- * Update channel types for request based on policy. E.g. in the
- * case of a TCH/H network/bsc use TCH/H for the emergency calls,
- * for early assignment assign a SDCCH and some other options.
- */
-void gsm_net_update_ctype(struct gsm_network *network)
-{
- /* copy over the data */
- memcpy(network->ctype_by_chreq, ctype_by_chreq, sizeof(ctype_by_chreq));
-
- /*
- * Use TCH/H for emergency calls when this cell allows TCH/H. Maybe it
- * is better to iterate over the BTS/TRX and check if no TCH/F is available
- * and then set it to TCH/H.
- */
- if (network->neci)
- network->ctype_by_chreq[CHREQ_T_EMERG_CALL] = GSM_LCHAN_TCH_H;
-
- if (network->pag_any_tch) {
- if (network->neci) {
- network->ctype_by_chreq[CHREQ_T_PAG_R_ANY_NECI0] = GSM_LCHAN_TCH_H;
- network->ctype_by_chreq[CHREQ_T_PAG_R_ANY_NECI1] = GSM_LCHAN_TCH_H;
- } else {
- network->ctype_by_chreq[CHREQ_T_PAG_R_ANY_NECI0] = GSM_LCHAN_TCH_F;
- network->ctype_by_chreq[CHREQ_T_PAG_R_ANY_NECI1] = GSM_LCHAN_TCH_F;
- }
- }
-}
-
-enum gsm_chan_t get_ctype_by_chreq(struct gsm_network *network, uint8_t ra)
-{
- int i;
- int length;
- const struct chreq *chreq;
-
- if (network->neci) {
- chreq = chreq_type_neci1;
- length = ARRAY_SIZE(chreq_type_neci1);
- } else {
- chreq = chreq_type_neci0;
- length = ARRAY_SIZE(chreq_type_neci0);
- }
-
-
- for (i = 0; i < length; i++) {
- const struct chreq *chr = &chreq[i];
- if ((ra & chr->mask) == chr->val)
- return network->ctype_by_chreq[chr->type];
- }
- LOGP(DRR, LOGL_ERROR, "Unknown CHANNEL REQUEST RQD 0x%02x\n", ra);
- return GSM_LCHAN_SDCCH;
-}
-
-int get_reason_by_chreq(uint8_t ra, int neci)
-{
- int i;
- int length;
- const struct chreq *chreq;
-
- if (neci) {
- chreq = chreq_type_neci1;
- length = ARRAY_SIZE(chreq_type_neci1);
- } else {
- chreq = chreq_type_neci0;
- length = ARRAY_SIZE(chreq_type_neci0);
- }
-
- for (i = 0; i < length; i++) {
- const struct chreq *chr = &chreq[i];
- if ((ra & chr->mask) == chr->val)
- return reason_by_chreq[chr->type];
- }
- LOGP(DRR, LOGL_ERROR, "Unknown CHANNEL REQUEST REASON 0x%02x\n", ra);
- return GSM_CHREQ_REASON_OTHER;
-}
-
-static void mr_config_for_ms(struct gsm_lchan *lchan, struct msgb *msg)
-{
- if (lchan->tch_mode == GSM48_CMODE_SPEECH_AMR)
- msgb_tlv_put(msg, GSM48_IE_MUL_RATE_CFG, lchan->mr_ms_lv[0],
- lchan->mr_ms_lv + 1);
-}
-
-/* 7.1.7 and 9.1.7: RR CHANnel RELease */
-int gsm48_send_rr_release(struct gsm_lchan *lchan)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 RR REL");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- uint8_t *cause;
-
- msg->lchan = lchan;
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_CHAN_REL;
-
- cause = msgb_put(msg, 1);
- cause[0] = GSM48_RR_CAUSE_NORMAL;
-
- DEBUGP(DRR, "Sending Channel Release: Chan: Number: %d Type: %d\n",
- lchan->nr, lchan->type);
-
- /* Send actual release request to MS */
- return gsm48_sendmsg(msg);
-}
-
-int send_siemens_mrpci(struct gsm_lchan *lchan,
- uint8_t *classmark2_lv)
-{
- struct rsl_mrpci mrpci;
-
- if (classmark2_lv[0] < 2)
- return -EINVAL;
-
- mrpci.power_class = classmark2_lv[1] & 0x7;
- mrpci.vgcs_capable = classmark2_lv[2] & (1 << 1);
- mrpci.vbs_capable = classmark2_lv[2] & (1 <<2);
- mrpci.gsm_phase = (classmark2_lv[1]) >> 5 & 0x3;
-
- return rsl_siemens_mrpci(lchan, &mrpci);
-}
-
-/* Chapter 9.1.9: Ciphering Mode Command */
-int gsm48_send_rr_ciph_mode(struct gsm_lchan *lchan, int want_imeisv)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CIPH");
- struct gsm48_hdr *gh;
- uint8_t ciph_mod_set;
-
- msg->lchan = lchan;
-
- DEBUGP(DRR, "TX CIPHERING MODE CMD\n");
-
- if (lchan->encr.alg_id <= RSL_ENC_ALG_A5(0))
- ciph_mod_set = 0;
- else
- ciph_mod_set = (lchan->encr.alg_id-2)<<1 | 1;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh) + 1);
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_CIPH_M_CMD;
- gh->data[0] = (want_imeisv & 0x1) << 4 | (ciph_mod_set & 0xf);
-
- return rsl_encryption_cmd(msg);
-}
-
-static void gsm48_cell_desc(struct gsm48_cell_desc *cd,
- const struct gsm_bts *bts)
-{
- cd->ncc = (bts->bsic >> 3 & 0x7);
- cd->bcc = (bts->bsic & 0x7);
- cd->arfcn_hi = bts->c0->arfcn >> 8;
- cd->arfcn_lo = bts->c0->arfcn & 0xff;
-}
-
-void gsm48_lchan2chan_desc(struct gsm48_chan_desc *cd,
- const struct gsm_lchan *lchan)
-{
- uint16_t arfcn = lchan->ts->trx->arfcn & 0x3ff;
-
- cd->chan_nr = gsm_lchan2chan_nr(lchan);
- if (!lchan->ts->hopping.enabled) {
- cd->h0.tsc = gsm_ts_tsc(lchan->ts);
- cd->h0.h = 0;
- cd->h0.arfcn_high = arfcn >> 8;
- cd->h0.arfcn_low = arfcn & 0xff;
- } else {
- cd->h1.tsc = gsm_ts_tsc(lchan->ts);
- cd->h1.h = 1;
- cd->h1.maio_high = lchan->ts->hopping.maio >> 2;
- cd->h1.maio_low = lchan->ts->hopping.maio & 0x03;
- cd->h1.hsn = lchan->ts->hopping.hsn;
- }
-}
-
-/*! \brief Encode a TS 04.08 multirate config LV according to 10.5.2.21aa
- * \param[out] lv caller-allocated buffer of 7 bytes. First octet is IS length
- * \param[in] mr multi-rate configuration to encode
- * \param[in] modes array describing the AMR modes
- * \returns 0 on success */
-int gsm48_multirate_config(uint8_t *lv, const struct amr_multirate_conf *mr, const struct amr_mode *modes)
-{
- int num = 0, i;
-
- for (i = 0; i < 8; i++) {
- if (((mr->gsm48_ie[1] >> i) & 1))
- num++;
- }
- if (num > 4) {
- LOGP(DRR, LOGL_ERROR, "BUG: Using multirate codec with too "
- "many modes in config.\n");
- num = 4;
- }
- if (num < 1) {
- LOGP(DRR, LOGL_ERROR, "BUG: Using multirate codec with no "
- "mode in config.\n");
- num = 1;
- }
-
- lv[0] = (num == 1) ? 2 : (num + 2);
- memcpy(lv + 1, mr->gsm48_ie, 2);
- if (num == 1)
- return 0;
-
- lv[3] = modes[0].threshold & 0x3f;
- lv[4] = modes[0].hysteresis << 4;
- if (num == 2)
- return 0;
- lv[4] |= (modes[1].threshold & 0x3f) >> 2;
- lv[5] = modes[1].threshold << 6;
- lv[5] |= (modes[1].hysteresis & 0x0f) << 2;
- if (num == 3)
- return 0;
- lv[5] |= (modes[2].threshold & 0x3f) >> 4;
- lv[6] = modes[2].threshold << 4;
- lv[6] |= modes[2].hysteresis & 0x0f;
-
- return 0;
-}
-
-#define GSM48_HOCMD_CCHDESC_LEN 16
-
-/* Chapter 9.1.15: Handover Command */
-int gsm48_send_ho_cmd(struct gsm_lchan *old_lchan, struct gsm_lchan *new_lchan,
- uint8_t power_command, uint8_t ho_ref)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 HO CMD");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- struct gsm48_ho_cmd *ho =
- (struct gsm48_ho_cmd *) msgb_put(msg, sizeof(*ho));
-
- msg->lchan = old_lchan;
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_HANDO_CMD;
-
- /* mandatory bits */
- gsm48_cell_desc(&ho->cell_desc, new_lchan->ts->trx->bts);
- gsm48_lchan2chan_desc(&ho->chan_desc, new_lchan);
- ho->ho_ref = ho_ref;
- ho->power_command = power_command;
-
- if (new_lchan->ts->hopping.enabled) {
- struct gsm_bts *bts = new_lchan->ts->trx->bts;
- struct gsm48_system_information_type_1 *si1;
- uint8_t *cur;
-
- si1 = GSM_BTS_SI(bts, SYSINFO_TYPE_1);
- /* Copy the Cell Chan Desc (ARFCNS in this cell) */
- msgb_put_u8(msg, GSM48_IE_CELL_CH_DESC);
- cur = msgb_put(msg, GSM48_HOCMD_CCHDESC_LEN);
- memcpy(cur, si1->cell_channel_description,
- GSM48_HOCMD_CCHDESC_LEN);
- /* Copy the Mobile Allocation */
- msgb_tlv_put(msg, GSM48_IE_MA_BEFORE,
- new_lchan->ts->hopping.ma_len,
- new_lchan->ts->hopping.ma_data);
- }
- /* FIXME: optional bits for type of synchronization? */
-
- return gsm48_sendmsg(msg);
-}
-
-/* Chapter 9.1.2: Assignment Command */
-int gsm48_send_rr_ass_cmd(struct gsm_lchan *dest_lchan, struct gsm_lchan *lchan, uint8_t power_command)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 ASS CMD");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- struct gsm48_ass_cmd *ass =
- (struct gsm48_ass_cmd *) msgb_put(msg, sizeof(*ass));
-
- DEBUGP(DRR, "-> ASSIGNMENT COMMAND tch_mode=0x%02x\n", lchan->tch_mode);
-
- msg->lchan = dest_lchan;
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_ASS_CMD;
-
- /*
- * fill the channel information element, this code
- * should probably be shared with rsl_rx_chan_rqd(),
- * gsm48_lchan_modify(). But beware that 10.5.2.5
- * 10.5.2.5.a have slightly different semantic for
- * the chan_desc. But as long as multi-slot configurations
- * are not used we seem to be fine.
- */
- gsm48_lchan2chan_desc(&ass->chan_desc, lchan);
- ass->power_command = power_command;
-
- /* optional: cell channel description */
-
- msgb_tv_put(msg, GSM48_IE_CHANMODE_1, lchan->tch_mode);
-
- /* mobile allocation in case of hopping */
- if (lchan->ts->hopping.enabled) {
- msgb_tlv_put(msg, GSM48_IE_MA_BEFORE, lchan->ts->hopping.ma_len,
- lchan->ts->hopping.ma_data);
- }
-
- /* in case of multi rate we need to attach a config */
- mr_config_for_ms(lchan, msg);
-
- return gsm48_sendmsg(msg);
-}
-
-/* 9.1.5 Channel mode modify: Modify the mode on the MS side */
-int gsm48_lchan_modify(struct gsm_lchan *lchan, uint8_t mode)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CHN MOD");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- struct gsm48_chan_mode_modify *cmm =
- (struct gsm48_chan_mode_modify *) msgb_put(msg, sizeof(*cmm));
-
- DEBUGP(DRR, "-> CHANNEL MODE MODIFY mode=0x%02x\n", mode);
-
- lchan->tch_mode = mode;
- msg->lchan = lchan;
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_CHAN_MODE_MODIF;
-
- /* fill the channel information element, this code
- * should probably be shared with rsl_rx_chan_rqd() */
- gsm48_lchan2chan_desc(&cmm->chan_desc, lchan);
- cmm->mode = mode;
-
- /* in case of multi rate we need to attach a config */
- mr_config_for_ms(lchan, msg);
-
- return gsm48_sendmsg(msg);
-}
-
-int gsm48_rx_rr_modif_ack(struct msgb *msg)
-{
- int rc;
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_chan_mode_modify *mod =
- (struct gsm48_chan_mode_modify *) gh->data;
-
- DEBUGP(DRR, "CHANNEL MODE MODIFY ACK\n");
-
- if (mod->mode != msg->lchan->tch_mode) {
- LOGP(DRR, LOGL_ERROR, "CHANNEL MODE change failed. Wanted: %d Got: %d\n",
- msg->lchan->tch_mode, mod->mode);
- return -1;
- }
-
- /* update the channel type */
- switch (mod->mode) {
- case GSM48_CMODE_SIGN:
- msg->lchan->rsl_cmode = RSL_CMOD_SPD_SIGN;
- break;
- case GSM48_CMODE_SPEECH_V1:
- case GSM48_CMODE_SPEECH_EFR:
- case GSM48_CMODE_SPEECH_AMR:
- msg->lchan->rsl_cmode = RSL_CMOD_SPD_SPEECH;
- break;
- case GSM48_CMODE_DATA_14k5:
- case GSM48_CMODE_DATA_12k0:
- case GSM48_CMODE_DATA_6k0:
- case GSM48_CMODE_DATA_3k6:
- msg->lchan->rsl_cmode = RSL_CMOD_SPD_DATA;
- break;
- }
-
- /* We've successfully modified the MS side of the channel,
- * now go on to modify the BTS side of the channel */
- rc = rsl_chan_mode_modify_req(msg->lchan);
-
- /* FIXME: we not only need to do this after mode modify, but
- * also after channel activation */
- if (is_ipaccess_bts(msg->lchan->ts->trx->bts) && mod->mode != GSM48_CMODE_SIGN)
- rsl_ipacc_crcx(msg->lchan);
- return rc;
-}
-
-int gsm48_parse_meas_rep(struct gsm_meas_rep *rep, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t *data = gh->data;
- struct gsm_bts *bts = msg->lchan->ts->trx->bts;
- struct bitvec *nbv = &bts->si_common.neigh_list;
- struct gsm_meas_rep_cell *mrc;
-
- if (gh->msg_type != GSM48_MT_RR_MEAS_REP)
- return -EINVAL;
-
- if (data[0] & 0x80)
- rep->flags |= MEAS_REP_F_BA1;
- if (data[0] & 0x40)
- rep->flags |= MEAS_REP_F_UL_DTX;
- if ((data[1] & 0x40) == 0x00)
- rep->flags |= MEAS_REP_F_DL_VALID;
-
- rep->dl.full.rx_lev = data[0] & 0x3f;
- rep->dl.sub.rx_lev = data[1] & 0x3f;
- rep->dl.full.rx_qual = (data[2] >> 4) & 0x7;
- rep->dl.sub.rx_qual = (data[2] >> 1) & 0x7;
-
- rep->num_cell = ((data[3] >> 6) & 0x3) | ((data[2] & 0x01) << 2);
- if (rep->num_cell < 1 || rep->num_cell > 6)
- return 0;
-
- /* an encoding nightmare in perfection */
- mrc = &rep->cell[0];
- mrc->rxlev = data[3] & 0x3f;
- mrc->neigh_idx = data[4] >> 3;
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = ((data[4] & 0x07) << 3) | (data[5] >> 5);
- if (rep->num_cell < 2)
- return 0;
-
- mrc = &rep->cell[1];
- mrc->rxlev = ((data[5] & 0x1f) << 1) | (data[6] >> 7);
- mrc->neigh_idx = (data[6] >> 2) & 0x1f;
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = ((data[6] & 0x03) << 4) | (data[7] >> 4);
- if (rep->num_cell < 3)
- return 0;
-
- mrc = &rep->cell[2];
- mrc->rxlev = ((data[7] & 0x0f) << 2) | (data[8] >> 6);
- mrc->neigh_idx = (data[8] >> 1) & 0x1f;
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = ((data[8] & 0x01) << 5) | (data[9] >> 3);
- if (rep->num_cell < 4)
- return 0;
-
- mrc = &rep->cell[3];
- mrc->rxlev = ((data[9] & 0x07) << 3) | (data[10] >> 5);
- mrc->neigh_idx = data[10] & 0x1f;
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = data[11] >> 2;
- if (rep->num_cell < 5)
- return 0;
-
- mrc = &rep->cell[4];
- mrc->rxlev = ((data[11] & 0x03) << 4) | (data[12] >> 4);
- mrc->neigh_idx = ((data[12] & 0xf) << 1) | (data[13] >> 7);
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = (data[13] >> 1) & 0x3f;
- if (rep->num_cell < 6)
- return 0;
-
- mrc = &rep->cell[5];
- mrc->rxlev = ((data[13] & 0x01) << 5) | (data[14] >> 3);
- mrc->neigh_idx = ((data[14] & 0x07) << 2) | (data[15] >> 6);
- mrc->arfcn = bitvec_get_nth_set_bit(nbv, mrc->neigh_idx + 1);
- mrc->bsic = data[15] & 0x3f;
-
- return 0;
-}
-
-/* 9.2.5 CM service accept */
-int gsm48_tx_mm_serv_ack(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 SERV ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- msg->lchan = conn->lchan;
-
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_CM_SERV_ACC;
-
- DEBUGP(DMM, "-> CM SERVICE ACK\n");
-
- return gsm0808_submit_dtap(conn, msg, 0, 0);
-}
-
-/* 9.2.6 CM service reject */
-int gsm48_tx_mm_serv_rej(struct gsm_subscriber_connection *conn,
- enum gsm48_reject_value value)
-{
- struct msgb *msg;
-
- msg = gsm48_create_mm_serv_rej(value);
- if (!msg) {
- LOGP(DMM, LOGL_ERROR, "Failed to allocate CM Service Reject.\n");
- return -1;
- }
-
- DEBUGP(DMM, "-> CM SERVICE Reject cause: %d\n", value);
-
- return gsm0808_submit_dtap(conn, msg, 0, 0);
-}
diff --git a/src/libbsc/gsm_04_80_utils.c b/src/libbsc/gsm_04_80_utils.c
deleted file mode 100644
index e0db81edf..000000000
--- a/src/libbsc/gsm_04_80_utils.c
+++ /dev/null
@@ -1,40 +0,0 @@
-/* OpenBSC utility functions for 3GPP TS 04.80 */
-
-/* (C) 2016 by sysmocom s.m.f.c. GmbH <info@sysmocom.de>
- *
- * 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/>.
- *
- */
-
-#include <osmocom/gsm/gsm0480.h>
-#include <openbsc/bsc_api.h>
-
-int bsc_send_ussd_notify(struct gsm_subscriber_connection *conn, int level,
- const char *text)
-{
- struct msgb *msg = gsm0480_create_ussd_notify(level, text);
- if (!msg)
- return -1;
- return gsm0808_submit_dtap(conn, msg, 0, 0);
-}
-
-int bsc_send_ussd_release_complete(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg = gsm0480_create_ussd_release_complete();
- if (!msg)
- return -1;
- return gsm0808_submit_dtap(conn, msg, 0, 0);
-}
diff --git a/src/libbsc/handover_decision.c b/src/libbsc/handover_decision.c
deleted file mode 100644
index 8d7e047b7..000000000
--- a/src/libbsc/handover_decision.c
+++ /dev/null
@@ -1,325 +0,0 @@
-/* Handover Decision making for Inter-BTS (Intra-BSC) Handover. This
- * only implements the handover algorithm/decision, but not execution
- * of it */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <errno.h>
-
-#include <osmocom/core/msgb.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/meas_rep.h>
-#include <openbsc/signal.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/handover.h>
-#include <osmocom/gsm/gsm_utils.h>
-
-/* Get reference to a neighbor cell on a given BCCH ARFCN */
-static struct gsm_bts *gsm_bts_neighbor(const struct gsm_bts *bts,
- uint16_t arfcn, uint8_t bsic)
-{
- struct gsm_bts *neigh;
- /* FIXME: use some better heuristics here to determine which cell
- * using this ARFCN really is closest to the target cell. For
- * now we simply assume that each ARFCN will only be used by one
- * cell */
-
- llist_for_each_entry(neigh, &bts->network->bts_list, list) {
- /* FIXME: this is probably returning the same bts again!? */
- if (neigh->c0->arfcn == arfcn &&
- neigh->bsic == bsic)
- return neigh;
- }
-
- return NULL;
-}
-
-
-/* issue handover to a cell identified by ARFCN and BSIC */
-static int handover_to_arfcn_bsic(struct gsm_lchan *lchan,
- uint16_t arfcn, uint8_t bsic)
-{
- struct gsm_bts *new_bts;
-
- /* resolve the gsm_bts structure for the best neighbor */
- new_bts = gsm_bts_neighbor(lchan->ts->trx->bts, arfcn, bsic);
- if (!new_bts) {
- LOGP(DHO, LOGL_NOTICE, "unable to determine neighbor BTS "
- "for ARFCN %u BSIC %u ?!?\n", arfcn, bsic);
- return -EINVAL;
- }
-
- /* and actually try to handover to that cell */
- return bsc_handover_start(lchan, new_bts);
-}
-
-/* did we get a RXLEV for a given cell in the given report? */
-static int rxlev_for_cell_in_rep(struct gsm_meas_rep *mr,
- uint16_t arfcn, uint8_t bsic)
-{
- int i;
-
- for (i = 0; i < mr->num_cell; i++) {
- struct gsm_meas_rep_cell *mrc = &mr->cell[i];
-
- /* search for matching report */
- if (!(mrc->arfcn == arfcn && mrc->bsic == bsic))
- continue;
-
- mrc->flags |= MRC_F_PROCESSED;
- return mrc->rxlev;
- }
- return -ENODEV;
-}
-
-/* obtain averaged rxlev for given neighbor */
-static int neigh_meas_avg(struct neigh_meas_proc *nmp, int window)
-{
- unsigned int i, idx;
- int avg = 0;
-
- idx = calc_initial_idx(ARRAY_SIZE(nmp->rxlev),
- nmp->rxlev_cnt % ARRAY_SIZE(nmp->rxlev),
- window);
-
- for (i = 0; i < window; i++) {
- int j = (idx+i) % ARRAY_SIZE(nmp->rxlev);
-
- avg += nmp->rxlev[j];
- }
-
- return avg / window;
-}
-
-/* find empty or evict bad neighbor */
-static struct neigh_meas_proc *find_evict_neigh(struct gsm_lchan *lchan)
-{
- int j, worst = 999999;
- struct neigh_meas_proc *nmp_worst = NULL;
-
- /* first try to find an empty/unused slot */
- for (j = 0; j < ARRAY_SIZE(lchan->neigh_meas); j++) {
- struct neigh_meas_proc *nmp = &lchan->neigh_meas[j];
- if (!nmp->arfcn)
- return nmp;
- }
-
- /* no empty slot found. evict worst neighbor from list */
- for (j = 0; j < ARRAY_SIZE(lchan->neigh_meas); j++) {
- struct neigh_meas_proc *nmp = &lchan->neigh_meas[j];
- int avg = neigh_meas_avg(nmp, MAX_WIN_NEIGH_AVG);
- if (!nmp_worst || avg < worst) {
- worst = avg;
- nmp_worst = nmp;
- }
- }
-
- return nmp_worst;
-}
-
-/* process neighbor cell measurement reports */
-static void process_meas_neigh(struct gsm_meas_rep *mr)
-{
- int i, j, idx;
-
- /* for each reported cell, try to update global state */
- for (j = 0; j < ARRAY_SIZE(mr->lchan->neigh_meas); j++) {
- struct neigh_meas_proc *nmp = &mr->lchan->neigh_meas[j];
- unsigned int idx;
- int rxlev;
-
- /* skip unused entries */
- if (!nmp->arfcn)
- continue;
-
- rxlev = rxlev_for_cell_in_rep(mr, nmp->arfcn, nmp->bsic);
- idx = nmp->rxlev_cnt % ARRAY_SIZE(nmp->rxlev);
- if (rxlev >= 0) {
- nmp->rxlev[idx] = rxlev;
- nmp->last_seen_nr = mr->nr;
- } else
- nmp->rxlev[idx] = 0;
- nmp->rxlev_cnt++;
- }
-
- /* iterate over list of reported cells, check if we did not
- * process all of them */
- for (i = 0; i < mr->num_cell; i++) {
- struct gsm_meas_rep_cell *mrc = &mr->cell[i];
- struct neigh_meas_proc *nmp;
-
- if (mrc->flags & MRC_F_PROCESSED)
- continue;
-
- nmp = find_evict_neigh(mr->lchan);
-
- nmp->arfcn = mrc->arfcn;
- nmp->bsic = mrc->bsic;
-
- idx = nmp->rxlev_cnt % ARRAY_SIZE(nmp->rxlev);
- nmp->rxlev[idx] = mrc->rxlev;
- nmp->rxlev_cnt++;
- nmp->last_seen_nr = mr->nr;
-
- mrc->flags |= MRC_F_PROCESSED;
- }
-}
-
-/* attempt to do a handover */
-static int attempt_handover(struct gsm_meas_rep *mr)
-{
- struct gsm_network *net = mr->lchan->ts->trx->bts->network;
- struct neigh_meas_proc *best_cell = NULL;
- unsigned int best_better_db = 0;
- int i, rc;
-
- /* find the best cell in this report that is at least RXLEV_HYST
- * better than the current serving cell */
-
- for (i = 0; i < ARRAY_SIZE(mr->lchan->neigh_meas); i++) {
- struct neigh_meas_proc *nmp = &mr->lchan->neigh_meas[i];
- int avg, better;
-
- /* skip empty slots */
- if (nmp->arfcn == 0)
- continue;
-
- /* caculate average rxlev for this cell over the window */
- avg = neigh_meas_avg(nmp, net->handover.win_rxlev_avg_neigh);
-
- /* check if hysteresis is fulfilled */
- if (avg < mr->dl.full.rx_lev + net->handover.pwr_hysteresis)
- continue;
-
- better = avg - mr->dl.full.rx_lev;
- if (better > best_better_db) {
- best_cell = nmp;
- best_better_db = better;
- }
- }
-
- if (!best_cell)
- return 0;
-
- LOGP(DHO, LOGL_INFO, "%s: Cell on ARFCN %u is better: ",
- gsm_ts_name(mr->lchan->ts), best_cell->arfcn);
- if (!net->handover.active) {
- LOGPC(DHO, LOGL_INFO, "Skipping, Handover disabled\n");
- return 0;
- }
-
- rc = handover_to_arfcn_bsic(mr->lchan, best_cell->arfcn, best_cell->bsic);
- switch (rc) {
- case 0:
- LOGPC(DHO, LOGL_INFO, "Starting handover\n");
- break;
- case -ENOSPC:
- LOGPC(DHO, LOGL_INFO, "No channel available\n");
- break;
- case -EBUSY:
- LOGPC(DHO, LOGL_INFO, "Handover already active\n");
- break;
- default:
- LOGPC(DHO, LOGL_ERROR, "Unknown error\n");
- }
- return rc;
-}
-
-/* process an already parsed measurement report and decide if we want to
- * attempt a handover */
-static int process_meas_rep(struct gsm_meas_rep *mr)
-{
- struct gsm_network *net = mr->lchan->ts->trx->bts->network;
- enum meas_rep_field dlev, dqual;
- int av_rxlev;
-
- /* we currently only do handover for TCH channels */
- switch (mr->lchan->type) {
- case GSM_LCHAN_TCH_F:
- case GSM_LCHAN_TCH_H:
- break;
- default:
- return 0;
- }
-
- if (mr->flags & MEAS_REP_F_DL_DTX) {
- dlev = MEAS_REP_DL_RXLEV_SUB;
- dqual = MEAS_REP_DL_RXQUAL_SUB;
- } else {
- dlev = MEAS_REP_DL_RXLEV_FULL;
- dqual = MEAS_REP_DL_RXQUAL_FULL;
- }
-
- /* parse actual neighbor cell info */
- if (mr->num_cell > 0 && mr->num_cell < 7)
- process_meas_neigh(mr);
-
- av_rxlev = get_meas_rep_avg(mr->lchan, dlev,
- net->handover.win_rxlev_avg);
-
- /* Interference HO */
- if (rxlev2dbm(av_rxlev) > -85 &&
- meas_rep_n_out_of_m_be(mr->lchan, dqual, 3, 4, 5))
- return attempt_handover(mr);
-
- /* Bad Quality */
- if (meas_rep_n_out_of_m_be(mr->lchan, dqual, 3, 4, 5))
- return attempt_handover(mr);
-
- /* Low Level */
- if (rxlev2dbm(av_rxlev) <= -110)
- return attempt_handover(mr);
-
- /* Distance */
- if (mr->ms_l1.ta > net->handover.max_distance)
- return attempt_handover(mr);
-
- /* Power Budget AKA Better Cell */
- if ((mr->nr % net->handover.pwr_interval) == 0)
- return attempt_handover(mr);
-
- return 0;
-
-}
-
-static int ho_dec_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct lchan_signal_data *lchan_data;
-
- if (subsys != SS_LCHAN)
- return 0;
-
- lchan_data = signal_data;
- switch (signal) {
- case S_LCHAN_MEAS_REP:
- process_meas_rep(lchan_data->mr);
- break;
- }
-
- return 0;
-}
-
-void on_dso_load_ho_dec(void)
-{
- osmo_signal_register_handler(SS_LCHAN, ho_dec_sig_cb, NULL);
-}
diff --git a/src/libbsc/handover_logic.c b/src/libbsc/handover_logic.c
deleted file mode 100644
index 14566cfa1..000000000
--- a/src/libbsc/handover_logic.c
+++ /dev/null
@@ -1,381 +0,0 @@
-/* Handover Logic for Inter-BTS (Intra-BSC) Handover. This does not
- * actually implement the handover algorithm/decision, but executes a
- * handover decision */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <time.h>
-#include <netinet/in.h>
-
-#include <osmocom/core/msgb.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/signal.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/transaction.h>
-#include <openbsc/trau_mux.h>
-#include <openbsc/vlr.h>
-
-struct bsc_handover {
- struct llist_head list;
-
- struct gsm_lchan *old_lchan;
- struct gsm_lchan *new_lchan;
-
- struct osmo_timer_list T3103;
-
- uint8_t ho_ref;
-};
-
-static LLIST_HEAD(bsc_handovers);
-
-static void handover_free(struct bsc_handover *ho)
-{
- osmo_timer_del(&ho->T3103);
- llist_del(&ho->list);
- talloc_free(ho);
-}
-
-static struct bsc_handover *bsc_ho_by_new_lchan(struct gsm_lchan *new_lchan)
-{
- struct bsc_handover *ho;
-
- llist_for_each_entry(ho, &bsc_handovers, list) {
- if (ho->new_lchan == new_lchan)
- return ho;
- }
-
- return NULL;
-}
-
-static struct bsc_handover *bsc_ho_by_old_lchan(struct gsm_lchan *old_lchan)
-{
- struct bsc_handover *ho;
-
- llist_for_each_entry(ho, &bsc_handovers, list) {
- if (ho->old_lchan == old_lchan)
- return ho;
- }
-
- return NULL;
-}
-
-/*! \brief Hand over the specified logical channel to the specified new BTS.
- * This is the main entry point for the actual handover algorithm, after the
- * decision whether to initiate HO to a specific BTS. */
-int bsc_handover_start(struct gsm_lchan *old_lchan, struct gsm_bts *bts)
-{
- struct gsm_lchan *new_lchan;
- struct bsc_handover *ho;
- static uint8_t ho_ref;
- int rc;
-
- /* don't attempt multiple handovers for the same lchan at
- * the same time */
- if (bsc_ho_by_old_lchan(old_lchan))
- return -EBUSY;
-
- DEBUGP(DHO, "Beginning with handover operation"
- "(old_lchan on BTS %u, new BTS %u) ...\n",
- old_lchan->ts->trx->bts->nr, bts->nr);
-
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_HANDOVER_ATTEMPTED]);
-
- if (!old_lchan->conn) {
- LOGP(DHO, LOGL_ERROR, "Old lchan lacks connection data.\n");
- return -ENOSPC;
- }
-
- new_lchan = lchan_alloc(bts, old_lchan->type, 0);
- if (!new_lchan) {
- LOGP(DHO, LOGL_NOTICE, "No free channel\n");
- rate_ctr_inc(&bts->network->bsc_ctrs->ctr[BSC_CTR_HANDOVER_NO_CHANNEL]);
- return -ENOSPC;
- }
-
- ho = talloc_zero(tall_bsc_ctx, struct bsc_handover);
- if (!ho) {
- LOGP(DHO, LOGL_FATAL, "Out of Memory\n");
- lchan_free(new_lchan);
- return -ENOMEM;
- }
- ho->old_lchan = old_lchan;
- ho->new_lchan = new_lchan;
- ho->ho_ref = ho_ref++;
-
- /* copy some parameters from old lchan */
- memcpy(&new_lchan->encr, &old_lchan->encr, sizeof(new_lchan->encr));
- new_lchan->ms_power = old_lchan->ms_power;
- new_lchan->bs_power = old_lchan->bs_power;
- new_lchan->rsl_cmode = old_lchan->rsl_cmode;
- new_lchan->tch_mode = old_lchan->tch_mode;
- memcpy(&new_lchan->mr_ms_lv, &old_lchan->mr_ms_lv, ARRAY_SIZE(new_lchan->mr_ms_lv));
- memcpy(&new_lchan->mr_bts_lv, &old_lchan->mr_bts_lv, ARRAY_SIZE(new_lchan->mr_bts_lv));
-
- new_lchan->conn = old_lchan->conn;
- new_lchan->conn->ho_lchan = new_lchan;
-
- /* FIXME: do we have a better idea of the timing advance? */
- rc = rsl_chan_activate_lchan(new_lchan, RSL_ACT_INTER_ASYNC, ho->ho_ref);
- if (rc < 0) {
- LOGP(DHO, LOGL_ERROR, "could not activate channel\n");
- new_lchan->conn->ho_lchan = NULL;
- new_lchan->conn = NULL;
- talloc_free(ho);
- lchan_free(new_lchan);
- return rc;
- }
-
- rsl_lchan_set_state(new_lchan, LCHAN_S_ACT_REQ);
- llist_add(&ho->list, &bsc_handovers);
- /* we continue in the SS_LCHAN handler / ho_chan_activ_ack */
-
- return 0;
-}
-
-void bsc_clear_handover(struct gsm_subscriber_connection *conn, int free_lchan)
-{
- struct bsc_handover *ho;
-
- ho = bsc_ho_by_new_lchan(conn->ho_lchan);
-
-
- if (!ho && conn->ho_lchan)
- LOGP(DHO, LOGL_ERROR, "BUG: We lost some state.\n");
-
- if (!ho) {
- LOGP(DHO, LOGL_ERROR, "unable to find HO record\n");
- return;
- }
-
- conn->ho_lchan->conn = NULL;
- conn->ho_lchan = NULL;
-
- if (free_lchan)
- lchan_release(ho->new_lchan, 0, RSL_REL_LOCAL_END);
-
- handover_free(ho);
-}
-
-/* T3103 expired: Handover has failed without HO COMPLETE or HO FAIL */
-static void ho_T3103_cb(void *_ho)
-{
- struct bsc_handover *ho = _ho;
- struct gsm_network *net = ho->new_lchan->ts->trx->bts->network;
-
- DEBUGP(DHO, "HO T3103 expired\n");
- rate_ctr_inc(&net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_TIMEOUT]);
-
- ho->new_lchan->conn->ho_lchan = NULL;
- ho->new_lchan->conn = NULL;
- lchan_release(ho->new_lchan, 0, RSL_REL_LOCAL_END);
- handover_free(ho);
-}
-
-/* RSL has acknowledged activation of the new lchan */
-static int ho_chan_activ_ack(struct gsm_lchan *new_lchan)
-{
- struct bsc_handover *ho;
-
- /* we need to check if this channel activation is related to
- * a handover at all (and if, which particular handover) */
- ho = bsc_ho_by_new_lchan(new_lchan);
- if (!ho)
- return -ENODEV;
-
- DEBUGP(DHO, "handover activate ack, send HO Command\n");
-
- /* we can now send the 04.08 HANDOVER COMMAND to the MS
- * using the old lchan */
-
- gsm48_send_ho_cmd(ho->old_lchan, new_lchan, 0, ho->ho_ref);
-
- /* start T3103. We can continue either with T3103 expiration,
- * 04.08 HANDOVER COMPLETE or 04.08 HANDOVER FAIL */
- osmo_timer_setup(&ho->T3103, ho_T3103_cb, ho);
- osmo_timer_schedule(&ho->T3103, 10, 0);
-
- /* create a RTP connection */
- if (is_ipaccess_bts(new_lchan->ts->trx->bts))
- rsl_ipacc_crcx(new_lchan);
-
- return 0;
-}
-
-/* RSL has not acknowledged activation of the new lchan */
-static int ho_chan_activ_nack(struct gsm_lchan *new_lchan)
-{
- struct bsc_handover *ho;
-
- ho = bsc_ho_by_new_lchan(new_lchan);
- if (!ho) {
- LOGP(DHO, LOGL_INFO, "ACT NACK: unable to find HO record\n");
- return -ENODEV;
- }
-
- new_lchan->conn->ho_lchan = NULL;
- new_lchan->conn = NULL;
- handover_free(ho);
-
- /* FIXME: maybe we should try to allocate a new LCHAN here? */
-
- return 0;
-}
-
-/* GSM 04.08 HANDOVER COMPLETE has been received on new channel */
-static int ho_gsm48_ho_compl(struct gsm_lchan *new_lchan)
-{
- struct gsm_network *net;
- struct bsc_handover *ho;
-
- ho = bsc_ho_by_new_lchan(new_lchan);
- if (!ho) {
- LOGP(DHO, LOGL_ERROR, "unable to find HO record\n");
- return -ENODEV;
- }
-
- net = new_lchan->ts->trx->bts->network;
- LOGP(DHO, LOGL_INFO, "Subscriber %s HO from BTS %u->%u on ARFCN "
- "%u->%u\n", vlr_subscr_name(ho->old_lchan->conn->vsub),
- ho->old_lchan->ts->trx->bts->nr, new_lchan->ts->trx->bts->nr,
- ho->old_lchan->ts->trx->arfcn, new_lchan->ts->trx->arfcn);
-
- rate_ctr_inc(&net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_COMPLETED]);
-
- osmo_timer_del(&ho->T3103);
-
- /* switch TRAU muxer for E1 based BTS from one channel to another */
- if (is_e1_bts(new_lchan->conn->bts))
- switch_trau_mux(ho->old_lchan, new_lchan);
-
- /* Replace the ho lchan with the primary one */
- if (ho->old_lchan != new_lchan->conn->lchan)
- LOGP(DHO, LOGL_ERROR, "Primary lchan changed during handover.\n");
-
- if (new_lchan != new_lchan->conn->ho_lchan)
- LOGP(DHO, LOGL_ERROR, "Handover channel changed during this handover.\n");
-
- new_lchan->conn->ho_lchan = NULL;
- new_lchan->conn->lchan = new_lchan;
- new_lchan->conn->bts = new_lchan->ts->trx->bts;
- ho->old_lchan->conn = NULL;
-
- lchan_release(ho->old_lchan, 0, RSL_REL_LOCAL_END);
-
- handover_free(ho);
- return 0;
-}
-
-/* GSM 04.08 HANDOVER FAIL has been received */
-static int ho_gsm48_ho_fail(struct gsm_lchan *old_lchan)
-{
- struct gsm_network *net = old_lchan->ts->trx->bts->network;
- struct bsc_handover *ho;
- struct gsm_lchan *new_lchan;
-
- ho = bsc_ho_by_old_lchan(old_lchan);
- if (!ho) {
- LOGP(DHO, LOGL_ERROR, "unable to find HO record\n");
- return -ENODEV;
- }
-
- rate_ctr_inc(&net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_FAILED]);
-
- new_lchan = ho->new_lchan;
-
- /* release the channel and forget about it */
- ho->new_lchan->conn->ho_lchan = NULL;
- ho->new_lchan->conn = NULL;
- handover_free(ho);
-
- lchan_release(new_lchan, 0, RSL_REL_LOCAL_END);
-
-
- return 0;
-}
-
-/* GSM 08.58 HANDOVER DETECT has been received */
-static int ho_rsl_detect(struct gsm_lchan *new_lchan)
-{
- struct bsc_handover *ho;
-
- ho = bsc_ho_by_new_lchan(new_lchan);
- if (!ho) {
- LOGP(DHO, LOGL_ERROR, "unable to find HO record\n");
- return -ENODEV;
- }
-
- /* FIXME: do we actually want to do something here ? */
-
- return 0;
-}
-
-static int ho_logic_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct lchan_signal_data *lchan_data;
- struct gsm_lchan *lchan;
-
- lchan_data = signal_data;
- switch (subsys) {
- case SS_LCHAN:
- lchan = lchan_data->lchan;
- switch (signal) {
- case S_LCHAN_ACTIVATE_ACK:
- return ho_chan_activ_ack(lchan);
- case S_LCHAN_ACTIVATE_NACK:
- return ho_chan_activ_nack(lchan);
- case S_LCHAN_HANDOVER_DETECT:
- return ho_rsl_detect(lchan);
- case S_LCHAN_HANDOVER_COMPL:
- return ho_gsm48_ho_compl(lchan);
- case S_LCHAN_HANDOVER_FAIL:
- return ho_gsm48_ho_fail(lchan);
- }
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-struct gsm_lchan *bsc_handover_pending(struct gsm_lchan *new_lchan)
-{
- struct bsc_handover *ho;
- ho = bsc_ho_by_new_lchan(new_lchan);
- if (!ho)
- return NULL;
- return ho->old_lchan;
-}
-
-static __attribute__((constructor)) void on_dso_load_ho_logic(void)
-{
- osmo_signal_register_handler(SS_LCHAN, ho_logic_sig_cb, NULL);
-}
diff --git a/src/libbsc/meas_proc.c b/src/libbsc/meas_proc.c
deleted file mode 100644
index 5b97e74ee..000000000
--- a/src/libbsc/meas_proc.c
+++ /dev/null
@@ -1,84 +0,0 @@
-/* Measurement Processing */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <errno.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/msgb.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/meas_rep.h>
-#include <openbsc/signal.h>
-
-/* process an already parsed measurement report */
-static int process_meas_rep(struct gsm_meas_rep *mr)
-{
- struct gsm_meas_rep_cell *mr_cell = NULL;
- unsigned int best_better_db;
- int i;
-
- /* FIXME: implement actual averaging over multiple measurement
- * reports */
-
- /* find the best cell in this report that is at least RXLEV_HYST
- * better than the current serving cell */
- for (i = 0; i < mr->num_cell; i++) {
- unsigned int better;
- if (mr->cell[i].rxlev < mr->dl.full.rx_lev + RXLEV_HYST)
- continue;
-
- better = mr->cell[i].rxlev - mr->dl.full.rx_lev;
- if (better > best_better_db) {
- mr_cell = &mr->cell[i];
- best_better_db = better;
- }
- }
-
- if (mr_cell)
- return handover_to_arfcn_bsic(mr->lchan, mr_cell->arfcn,
- mr_cell->bsic);
- return 0;
-}
-
-static int meas_proc_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_lchan *lchan;
- struct gsm_meas_rep *mr;
-
- if (subsys != SS_LCHAN)
- return 0;
-
- switch (signal) {
- case S_LCHAN_MEAS_REP:
- mr = signal_data;
- process_meas_rep(mr);
- break;
- }
-
- return 0;
-}
-
-static __attribute__((constructor)) void on_dso_load_meas(void)
-{
- osmo_signal_register_handler(SS_LCHAN, meas_proc_sig_cb, NULL);
-}
diff --git a/src/libbsc/meas_rep.c b/src/libbsc/meas_rep.c
deleted file mode 100644
index 808103d28..000000000
--- a/src/libbsc/meas_rep.c
+++ /dev/null
@@ -1,115 +0,0 @@
-/* Measurement Report Processing */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/meas_rep.h>
-
-static int get_field(const struct gsm_meas_rep *rep,
- enum meas_rep_field field)
-{
- switch (field) {
- case MEAS_REP_DL_RXLEV_FULL:
- return rep->dl.full.rx_lev;
- case MEAS_REP_DL_RXLEV_SUB:
- return rep->dl.sub.rx_lev;
- case MEAS_REP_DL_RXQUAL_FULL:
- return rep->dl.full.rx_qual;
- case MEAS_REP_DL_RXQUAL_SUB:
- return rep->dl.sub.rx_qual;
- case MEAS_REP_UL_RXLEV_FULL:
- return rep->ul.full.rx_lev;
- case MEAS_REP_UL_RXLEV_SUB:
- return rep->ul.sub.rx_lev;
- case MEAS_REP_UL_RXQUAL_FULL:
- return rep->ul.full.rx_qual;
- case MEAS_REP_UL_RXQUAL_SUB:
- return rep->ul.sub.rx_qual;
- }
-
- return 0;
-}
-
-
-unsigned int calc_initial_idx(unsigned int array_size,
- unsigned int meas_rep_idx,
- unsigned int num_values)
-{
- int offs, idx;
-
- /* from which element do we need to start if we're interested
- * in an average of 'num' elements */
- offs = meas_rep_idx - num_values;
-
- if (offs < 0)
- idx = array_size + offs;
- else
- idx = offs;
-
- return idx;
-}
-
-/* obtain an average over the last 'num' fields in the meas reps */
-int get_meas_rep_avg(const struct gsm_lchan *lchan,
- enum meas_rep_field field, unsigned int num)
-{
- unsigned int i, idx;
- int avg = 0;
-
- if (num < 1)
- return 0;
-
- idx = calc_initial_idx(ARRAY_SIZE(lchan->meas_rep),
- lchan->meas_rep_idx, num);
-
- for (i = 0; i < num; i++) {
- int j = (idx+i) % ARRAY_SIZE(lchan->meas_rep);
-
- avg += get_field(&lchan->meas_rep[j], field);
- }
-
- return avg / num;
-}
-
-/* Check if N out of M last values for FIELD are >= bd */
-int meas_rep_n_out_of_m_be(const struct gsm_lchan *lchan,
- enum meas_rep_field field,
- unsigned int n, unsigned int m, int be)
-{
- unsigned int i, idx;
- int count = 0;
-
- idx = calc_initial_idx(ARRAY_SIZE(lchan->meas_rep),
- lchan->meas_rep_idx, m);
-
- for (i = 0; i < m; i++) {
- int j = (idx + i) % ARRAY_SIZE(lchan->meas_rep);
- int val = get_field(&lchan->meas_rep[j], field);
-
- if (val >= be)
- count++;
-
- if (count >= n)
- return 1;
- }
-
- return 0;
-}
diff --git a/src/libbsc/net_init.c b/src/libbsc/net_init.c
deleted file mode 100644
index 9d5431964..000000000
--- a/src/libbsc/net_init.c
+++ /dev/null
@@ -1,80 +0,0 @@
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <openbsc/common_cs.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/bsc_msc_data.h>
-
-struct gsm_network *bsc_network_init(void *ctx,
- uint16_t country_code,
- uint16_t network_code,
- mncc_recv_cb_t mncc_recv)
-{
- struct gsm_network *net;
-
- net = gsm_network_init(ctx, country_code, network_code, mncc_recv);
-
- net->bsc_data = talloc_zero(net, struct osmo_bsc_data);
- if (!net->bsc_data) {
- talloc_free(net);
- return NULL;
- }
-
- /* Init back pointer */
- net->bsc_data->auto_off_timeout = -1;
- net->bsc_data->network = net;
- INIT_LLIST_HEAD(&net->bsc_data->mscs);
-
- net->num_bts = 0;
- net->reject_cause = GSM48_REJECT_ROAMING_NOT_ALLOWED;
- net->T3101 = GSM_T3101_DEFAULT;
- net->T3103 = GSM_T3103_DEFAULT;
- net->T3105 = GSM_T3105_DEFAULT;
- net->T3107 = GSM_T3107_DEFAULT;
- net->T3109 = GSM_T3109_DEFAULT;
- net->T3111 = GSM_T3111_DEFAULT;
- net->T3113 = GSM_T3113_DEFAULT;
- net->T3115 = GSM_T3115_DEFAULT;
- net->T3117 = GSM_T3117_DEFAULT;
- net->T3119 = GSM_T3119_DEFAULT;
- net->T3122 = GSM_T3122_DEFAULT;
- net->T3141 = GSM_T3141_DEFAULT;
-
- /* default set of handover parameters */
- net->handover.win_rxlev_avg = 10;
- net->handover.win_rxqual_avg = 1;
- net->handover.win_rxlev_avg_neigh = 10;
- net->handover.pwr_interval = 6;
- net->handover.pwr_hysteresis = 3;
- net->handover.max_distance = 9999;
-
- INIT_LLIST_HEAD(&net->bts_list);
-
- /* init statistics */
- net->bsc_ctrs = rate_ctr_group_alloc(net, &bsc_ctrg_desc, 0);
- if (!net->bsc_ctrs) {
- talloc_free(net);
- return NULL;
- }
-
- gsm_net_update_ctype(net);
-
- return net;
-}
-
diff --git a/src/libbsc/paging.c b/src/libbsc/paging.c
deleted file mode 100644
index e19c2d1c4..000000000
--- a/src/libbsc/paging.c
+++ /dev/null
@@ -1,456 +0,0 @@
-/* Paging helper and manager.... */
-/* (C) 2009,2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-/*
- * Relevant specs:
- * 12.21:
- * - 9.4.12 for CCCH Local Threshold
- *
- * 05.58:
- * - 8.5.2 CCCH Load indication
- * - 9.3.15 Paging Load
- *
- * Approach:
- * - Send paging command to subscriber
- * - On Channel Request we will remember the reason
- * - After the ACK we will request the identity
- * - Then we will send assign the gsm_subscriber and
- * - and call a callback
- */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <assert.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/gsm48.h>
-#include <osmocom/gsm/gsm0502.h>
-
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/paging.h>
-#include <openbsc/debug.h>
-#include <openbsc/signal.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/bsc_api.h>
-#include <openbsc/vlr.h>
-
-void *tall_paging_ctx;
-
-#define PAGING_TIMER 0, 500000
-
-/*
- * TODO MSCSPLIT: the paging in libbsc is closely tied to MSC land in that the
- * MSC realm callback functions used to be invoked from the BSC/BTS level. So
- * this entire file needs to be rewired for use with an A interface.
- */
-
-/*
- * Kill one paging request update the internal list...
- */
-static void paging_remove_request(struct gsm_bts_paging_state *paging_bts,
- struct gsm_paging_request *to_be_deleted)
-{
- osmo_timer_del(&to_be_deleted->T3113);
- llist_del(&to_be_deleted->entry);
- bsc_subscr_put(to_be_deleted->bsub);
- talloc_free(to_be_deleted);
-}
-
-static void page_ms(struct gsm_paging_request *request)
-{
- uint8_t mi[128];
- unsigned int mi_len;
- unsigned int page_group;
- struct gsm_bts *bts = request->bts;
-
- /* the bts is down.. we will just wait for the paging to expire */
- if (!bts->oml_link)
- return;
-
- log_set_context(LOG_CTX_BSC_SUBSCR, request->bsub);
-
- LOGP(DPAG, LOGL_INFO, "Going to send paging commands: imsi: %s tmsi: "
- "0x%08x for ch. type %d (attempt %d)\n", request->bsub->imsi,
- request->bsub->tmsi, request->chan_type, request->attempts);
-
- if (request->bsub->tmsi == GSM_RESERVED_TMSI)
- mi_len = gsm48_generate_mid_from_imsi(mi, request->bsub->imsi);
- else
- mi_len = gsm48_generate_mid_from_tmsi(mi, request->bsub->tmsi);
-
- page_group = gsm0502_calc_paging_group(&bts->si_common.chan_desc,
- str_to_imsi(request->bsub->imsi));
- gsm0808_page(bts, page_group, mi_len, mi, request->chan_type);
- log_set_context(LOG_CTX_BSC_SUBSCR, NULL);
-}
-
-static void paging_schedule_if_needed(struct gsm_bts_paging_state *paging_bts)
-{
- if (llist_empty(&paging_bts->pending_requests))
- return;
-
- if (!osmo_timer_pending(&paging_bts->work_timer))
- osmo_timer_schedule(&paging_bts->work_timer, PAGING_TIMER);
-}
-
-
-static void paging_handle_pending_requests(struct gsm_bts_paging_state *paging_bts);
-static void paging_give_credit(void *data)
-{
- struct gsm_bts_paging_state *paging_bts = data;
-
- LOGP(DPAG, LOGL_NOTICE, "No slots available on bts nr %d\n", paging_bts->bts->nr);
- paging_bts->available_slots = 20;
- paging_handle_pending_requests(paging_bts);
-}
-
-static int can_send_pag_req(struct gsm_bts *bts, int rsl_type)
-{
- struct pchan_load pl;
- int count;
-
- memset(&pl, 0, sizeof(pl));
- bts_chan_load(&pl, bts);
-
- switch (rsl_type) {
- case RSL_CHANNEED_TCH_F:
- case RSL_CHANNEED_TCH_ForH:
- goto count_tch;
- break;
- case RSL_CHANNEED_SDCCH:
- goto count_sdcch;
- break;
- case RSL_CHANNEED_ANY:
- default:
- if (bts->network->pag_any_tch)
- goto count_tch;
- else
- goto count_sdcch;
- break;
- }
-
- return 0;
-
- /* could available SDCCH */
-count_sdcch:
- count = 0;
- count += pl.pchan[GSM_PCHAN_SDCCH8_SACCH8C].total
- - pl.pchan[GSM_PCHAN_SDCCH8_SACCH8C].used;
- count += pl.pchan[GSM_PCHAN_CCCH_SDCCH4].total
- - pl.pchan[GSM_PCHAN_CCCH_SDCCH4].used;
- return bts->paging.free_chans_need > count;
-
-count_tch:
- count = 0;
- count += pl.pchan[GSM_PCHAN_TCH_F].total
- - pl.pchan[GSM_PCHAN_TCH_F].used;
- if (bts->network->neci)
- count += pl.pchan[GSM_PCHAN_TCH_H].total
- - pl.pchan[GSM_PCHAN_TCH_H].used;
- return bts->paging.free_chans_need > count;
-}
-
-/*
- * This is kicked by the periodic PAGING LOAD Indicator
- * coming from abis_rsl.c
- *
- * We attempt to iterate once over the list of items but
- * only upto available_slots.
- */
-static void paging_handle_pending_requests(struct gsm_bts_paging_state *paging_bts)
-{
- struct gsm_paging_request *request = NULL;
-
- /*
- * Determine if the pending_requests list is empty and
- * return then.
- */
- if (llist_empty(&paging_bts->pending_requests)) {
- /* since the list is empty, no need to reschedule the timer */
- return;
- }
-
- /*
- * In case the BTS does not provide us with load indication and we
- * ran out of slots, call an autofill routine. It might be that the
- * BTS did not like our paging messages and then we have counted down
- * to zero and we do not get any messages.
- */
- if (paging_bts->available_slots == 0) {
- osmo_timer_setup(&paging_bts->credit_timer, paging_give_credit,
- paging_bts);
- osmo_timer_schedule(&paging_bts->credit_timer, 5, 0);
- return;
- }
-
- request = llist_entry(paging_bts->pending_requests.next,
- struct gsm_paging_request, entry);
-
- /* we need to determine the number of free channels */
- if (paging_bts->free_chans_need != -1) {
- if (can_send_pag_req(request->bts, request->chan_type) != 0)
- goto skip_paging;
- }
-
- /* handle the paging request now */
- page_ms(request);
- paging_bts->available_slots--;
- request->attempts++;
-
- /* take the current and add it to the back */
- llist_del(&request->entry);
- llist_add_tail(&request->entry, &paging_bts->pending_requests);
-
-skip_paging:
- osmo_timer_schedule(&paging_bts->work_timer, PAGING_TIMER);
-}
-
-static void paging_worker(void *data)
-{
- struct gsm_bts_paging_state *paging_bts = data;
-
- paging_handle_pending_requests(paging_bts);
-}
-
-static void paging_init_if_needed(struct gsm_bts *bts)
-{
- if (bts->paging.bts)
- return;
-
- bts->paging.bts = bts;
- INIT_LLIST_HEAD(&bts->paging.pending_requests);
- osmo_timer_setup(&bts->paging.work_timer, paging_worker,
- &bts->paging);
-
- /* Large number, until we get a proper message */
- bts->paging.available_slots = 20;
-}
-
-static int paging_pending_request(struct gsm_bts_paging_state *bts,
- struct bsc_subscr *bsub)
-{
- struct gsm_paging_request *req;
-
- llist_for_each_entry(req, &bts->pending_requests, entry) {
- if (bsub == req->bsub)
- return 1;
- }
-
- return 0;
-}
-
-static void paging_T3113_expired(void *data)
-{
- struct gsm_paging_request *req = (struct gsm_paging_request *)data;
- void *cbfn_param;
- gsm_cbfn *cbfn;
- int msg;
-
- log_set_context(LOG_CTX_BSC_SUBSCR, req->bsub);
-
- LOGP(DPAG, LOGL_INFO, "T3113 expired for request %p (%s)\n",
- req, bsc_subscr_name(req->bsub));
-
- /* must be destroyed before calling cbfn, to prevent double free */
- rate_ctr_inc(&req->bts->network->bsc_ctrs->ctr[BSC_CTR_PAGING_EXPIRED]);
- cbfn_param = req->cbfn_param;
- cbfn = req->cbfn;
-
- /* did we ever manage to page the subscriber */
- msg = req->attempts > 0 ? GSM_PAGING_EXPIRED : GSM_PAGING_BUSY;
-
- /* destroy it now. Do not access req afterwards */
- paging_remove_request(&req->bts->paging, req);
-
- if (cbfn)
- cbfn(GSM_HOOK_RR_PAGING, msg, NULL, NULL,
- cbfn_param);
-
-}
-
-static int _paging_request(struct gsm_bts *bts, struct bsc_subscr *bsub,
- int type, gsm_cbfn *cbfn, void *data)
-{
- struct gsm_bts_paging_state *bts_entry = &bts->paging;
- struct gsm_paging_request *req;
-
- if (paging_pending_request(bts_entry, bsub)) {
- LOGP(DPAG, LOGL_INFO, "Paging request already pending for %s\n",
- bsc_subscr_name(bsub));
- return -EEXIST;
- }
-
- LOGP(DPAG, LOGL_DEBUG, "Start paging of subscriber %s on bts %d.\n",
- bsc_subscr_name(bsub), bts->nr);
- req = talloc_zero(tall_paging_ctx, struct gsm_paging_request);
- req->bsub = bsc_subscr_get(bsub);
- req->bts = bts;
- req->chan_type = type;
- req->cbfn = cbfn;
- req->cbfn_param = data;
- osmo_timer_setup(&req->T3113, paging_T3113_expired, req);
- osmo_timer_schedule(&req->T3113, bts->network->T3113, 0);
- llist_add_tail(&req->entry, &bts_entry->pending_requests);
- paging_schedule_if_needed(bts_entry);
-
- return 0;
-}
-
-int paging_request_bts(struct gsm_bts *bts, struct bsc_subscr *bsub,
- int type, gsm_cbfn *cbfn, void *data)
-{
- int rc;
-
- /* skip all currently inactive TRX */
- if (!trx_is_usable(bts->c0))
- return 0;
-
- /* maybe it is the first time we use it */
- paging_init_if_needed(bts);
-
- /* Trigger paging, pass any error to the caller */
- rc = _paging_request(bts, bsub, type, cbfn, data);
- if (rc < 0)
- return rc;
- return 1;
-}
-
-int paging_request(struct gsm_network *network, struct bsc_subscr *bsub,
- int type, gsm_cbfn *cbfn, void *data)
-{
- struct gsm_bts *bts = NULL;
- int num_pages = 0;
-
- rate_ctr_inc(&network->bsc_ctrs->ctr[BSC_CTR_PAGING_ATTEMPTED]);
-
- /* start paging subscriber on all BTS within Location Area */
- do {
- int rc;
-
- bts = gsm_bts_by_lac(network, bsub->lac, bts);
- if (!bts)
- break;
-
- rc = paging_request_bts(bts, bsub, type, cbfn, data);
- if (rc < 0) {
- paging_request_stop(&network->bts_list, NULL, bsub,
- NULL, NULL);
- return rc;
- }
- num_pages += rc;
- } while (1);
-
- if (num_pages == 0)
- rate_ctr_inc(&network->bsc_ctrs->ctr[BSC_CTR_PAGING_DETACHED]);
-
- return num_pages;
-}
-
-
-/* we consciously ignore the type of the request here */
-static void _paging_request_stop(struct gsm_bts *bts, struct bsc_subscr *bsub,
- struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm_bts_paging_state *bts_entry = &bts->paging;
- struct gsm_paging_request *req, *req2;
-
- paging_init_if_needed(bts);
-
- llist_for_each_entry_safe(req, req2, &bts_entry->pending_requests,
- entry) {
- if (req->bsub == bsub) {
- gsm_cbfn *cbfn = req->cbfn;
- void *param = req->cbfn_param;
-
- /* now give up the data structure */
- paging_remove_request(&bts->paging, req);
- req = NULL;
-
- if (conn && cbfn) {
- LOGP(DPAG, LOGL_DEBUG, "Stop paging %s on bts %d, calling cbfn.\n", bsub->imsi, bts->nr);
- cbfn(GSM_HOOK_RR_PAGING, GSM_PAGING_SUCCEEDED,
- msg, conn, param);
- } else
- LOGP(DPAG, LOGL_DEBUG, "Stop paging %s on bts %d silently.\n", bsub->imsi, bts->nr);
- break;
- }
- }
-}
-
-/* Stop paging on all other bts' */
-void paging_request_stop(struct llist_head *bts_list,
- struct gsm_bts *_bts, struct bsc_subscr *bsub,
- struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm_bts *bts;
-
- log_set_context(LOG_CTX_BSC_SUBSCR, bsub);
-
- /* Stop this first and dispatch the request */
- if (_bts)
- _paging_request_stop(_bts, bsub, conn, msg);
-
- /* Make sure to cancel this everywhere else */
- llist_for_each_entry(bts, bts_list, list) {
- /* Sort of an optimization. */
- if (bts == _bts)
- continue;
- _paging_request_stop(bts, bsub, NULL, NULL);
- }
-}
-
-void paging_update_buffer_space(struct gsm_bts *bts, uint16_t free_slots)
-{
- paging_init_if_needed(bts);
-
- osmo_timer_del(&bts->paging.credit_timer);
- bts->paging.available_slots = free_slots;
- paging_schedule_if_needed(&bts->paging);
-}
-
-unsigned int paging_pending_requests_nr(struct gsm_bts *bts)
-{
- unsigned int requests = 0;
- struct gsm_paging_request *req;
-
- paging_init_if_needed(bts);
-
- llist_for_each_entry(req, &bts->paging.pending_requests, entry)
- ++requests;
-
- return requests;
-}
-
-/**
- * Find any paging data for the given subscriber at the given BTS.
- */
-void *paging_get_data(struct gsm_bts *bts, struct bsc_subscr *bsub)
-{
- struct gsm_paging_request *req;
-
- llist_for_each_entry(req, &bts->paging.pending_requests, entry)
- if (req->bsub == bsub)
- return req->cbfn_param;
-
- return NULL;
-}
diff --git a/src/libbsc/pcu_sock.c b/src/libbsc/pcu_sock.c
deleted file mode 100644
index 98e12fad4..000000000
--- a/src/libbsc/pcu_sock.c
+++ /dev/null
@@ -1,742 +0,0 @@
-/* pcu_sock.c: Connect from PCU via unix domain socket */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2012 by Andreas Eversberg <jolly@eversberg.eu>
- * (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 General Public License as published by
- * the Free Software Foundation; either version 2 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 General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with this program; if not, write to the Free Software Foundation, Inc.,
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-#include <stdio.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <assert.h>
-#include <sys/socket.h>
-#include <sys/un.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/socket.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/gsm/l1sap.h>
-#include <osmocom/gsm/gsm0502.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/pcu_if.h>
-#include <openbsc/pcuif_proto.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <openbsc/abis_rsl.h>
-
-static int pcu_sock_send(struct gsm_bts *bts, struct msgb *msg);
-uint32_t trx_get_hlayer1(struct gsm_bts_trx *trx);
-int pcu_direct = 1;
-
-static const char *sapi_string[] = {
- [PCU_IF_SAPI_RACH] = "RACH",
- [PCU_IF_SAPI_AGCH] = "AGCH",
- [PCU_IF_SAPI_PCH] = "PCH",
- [PCU_IF_SAPI_BCCH] = "BCCH",
- [PCU_IF_SAPI_PDTCH] = "PDTCH",
- [PCU_IF_SAPI_PRACH] = "PRACH",
- [PCU_IF_SAPI_PTCCH] = "PTCCH",
- [PCU_IF_SAPI_AGCH_DT] = "AGCH_DT",
-};
-
-/* Check if BTS has a PCU connection */
-static bool pcu_connected(struct gsm_bts *bts)
-{
- struct pcu_sock_state *state = bts->pcu_state;
-
- if (!state)
- return false;
- if (state->conn_bfd.fd <= 0)
- return false;
- return true;
-}
-
-/*
- * PCU messages
- */
-
-/* Set up an message buffer to package an pcu interface message */
-struct msgb *pcu_msgb_alloc(uint8_t msg_type, uint8_t bts_nr)
-{
- struct msgb *msg;
- struct gsm_pcu_if *pcu_prim;
-
- msg = msgb_alloc(sizeof(struct gsm_pcu_if), "pcu_sock_tx");
- if (!msg)
- return NULL;
-
- msgb_put(msg, sizeof(struct gsm_pcu_if));
- pcu_prim = (struct gsm_pcu_if *) msg->data;
- pcu_prim->msg_type = msg_type;
- pcu_prim->bts_nr = bts_nr;
-
- return msg;
-}
-
-/* Helper function exclusivly used by pcu_if_signal_cb() */
-static bool ts_should_be_pdch(struct gsm_bts_trx_ts *ts) {
- if (ts->pchan == GSM_PCHAN_PDCH)
- return true;
- if (ts->pchan == GSM_PCHAN_TCH_F_PDCH) {
- /* When we're busy deactivating the PDCH, we first set
- * DEACT_PENDING, tell the PCU about it and wait for a
- * response. So DEACT_PENDING means "no PDCH" to the PCU.
- * Similarly, when we're activating PDCH, we set the
- * ACT_PENDING and wait for an activation response from the
- * PCU, so ACT_PENDING means "is PDCH". */
- if (ts->flags & TS_F_PDCH_ACTIVE)
- return !(ts->flags & TS_F_PDCH_DEACT_PENDING);
- else
- return (ts->flags & TS_F_PDCH_ACT_PENDING);
- }
- if (ts->pchan == GSM_PCHAN_TCH_F_TCH_H_PDCH) {
- /*
- * When we're busy de-/activating the PDCH, we first set
- * ts->dyn.pchan_want, tell the PCU about it and wait for a
- * response. So only care about dyn.pchan_want here.
- */
- return ts->dyn.pchan_want == GSM_PCHAN_PDCH;
- }
- return false;
-}
-
-/* Send BTS properties to the PCU */
-static int pcu_tx_info_ind(struct gsm_bts *bts)
-{
- struct msgb *msg;
- struct gsm_pcu_if *pcu_prim;
- struct gsm_pcu_if_info_ind *info_ind;
- struct gprs_rlc_cfg *rlcc;
- struct gsm_bts_gprs_nsvc *nsvc;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
- int i, j;
-
- OSMO_ASSERT(bts);
- OSMO_ASSERT(bts->network);
-
- LOGP(DPCU, LOGL_INFO, "Sending info for BTS %d\n",bts->nr);
-
- rlcc = &bts->gprs.cell.rlc_cfg;
-
- msg = pcu_msgb_alloc(PCU_IF_MSG_INFO_IND, bts->nr);
- if (!msg)
- return -ENOMEM;
-
- pcu_prim = (struct gsm_pcu_if *) msg->data;
- info_ind = &pcu_prim->u.info_ind;
- info_ind->version = PCU_IF_VERSION;
- info_ind->flags |= PCU_IF_FLAG_ACTIVE;
-
- if (pcu_direct)
- info_ind->flags |= PCU_IF_FLAG_SYSMO;
-
- /* RAI */
- info_ind->mcc = bts->network->country_code;
- info_ind->mnc = bts->network->network_code;
- info_ind->lac = bts->location_area_code;
- info_ind->rac = bts->gprs.rac;
-
- /* NSE */
- info_ind->nsei = bts->gprs.nse.nsei;
- memcpy(info_ind->nse_timer, bts->gprs.nse.timer, 7);
- memcpy(info_ind->cell_timer, bts->gprs.cell.timer, 11);
-
- /* cell attributes */
- info_ind->cell_id = bts->cell_identity;
- info_ind->repeat_time = rlcc->paging.repeat_time;
- info_ind->repeat_count = rlcc->paging.repeat_count;
- info_ind->bvci = bts->gprs.cell.bvci;
- info_ind->t3142 = rlcc->parameter[RLC_T3142];
- info_ind->t3169 = rlcc->parameter[RLC_T3169];
- info_ind->t3191 = rlcc->parameter[RLC_T3191];
- info_ind->t3193_10ms = rlcc->parameter[RLC_T3193];
- info_ind->t3195 = rlcc->parameter[RLC_T3195];
- info_ind->n3101 = rlcc->parameter[RLC_N3101];
- info_ind->n3103 = rlcc->parameter[RLC_N3103];
- info_ind->n3105 = rlcc->parameter[RLC_N3105];
- info_ind->cv_countdown = rlcc->parameter[CV_COUNTDOWN];
- if (rlcc->cs_mask & (1 << GPRS_CS1))
- info_ind->flags |= PCU_IF_FLAG_CS1;
- if (rlcc->cs_mask & (1 << GPRS_CS2))
- info_ind->flags |= PCU_IF_FLAG_CS2;
- if (rlcc->cs_mask & (1 << GPRS_CS3))
- info_ind->flags |= PCU_IF_FLAG_CS3;
- if (rlcc->cs_mask & (1 << GPRS_CS4))
- info_ind->flags |= PCU_IF_FLAG_CS4;
- if (bts->gprs.mode == BTS_GPRS_EGPRS) {
- if (rlcc->cs_mask & (1 << GPRS_MCS1))
- info_ind->flags |= PCU_IF_FLAG_MCS1;
- if (rlcc->cs_mask & (1 << GPRS_MCS2))
- info_ind->flags |= PCU_IF_FLAG_MCS2;
- if (rlcc->cs_mask & (1 << GPRS_MCS3))
- info_ind->flags |= PCU_IF_FLAG_MCS3;
- if (rlcc->cs_mask & (1 << GPRS_MCS4))
- info_ind->flags |= PCU_IF_FLAG_MCS4;
- if (rlcc->cs_mask & (1 << GPRS_MCS5))
- info_ind->flags |= PCU_IF_FLAG_MCS5;
- if (rlcc->cs_mask & (1 << GPRS_MCS6))
- info_ind->flags |= PCU_IF_FLAG_MCS6;
- if (rlcc->cs_mask & (1 << GPRS_MCS7))
- info_ind->flags |= PCU_IF_FLAG_MCS7;
- if (rlcc->cs_mask & (1 << GPRS_MCS8))
- info_ind->flags |= PCU_IF_FLAG_MCS8;
- if (rlcc->cs_mask & (1 << GPRS_MCS9))
- info_ind->flags |= PCU_IF_FLAG_MCS9;
- }
-#warning "isn't dl_tbf_ext wrong?: * 10 and no ntohs"
- info_ind->dl_tbf_ext = rlcc->parameter[T_DL_TBF_EXT];
-#warning "isn't ul_tbf_ext wrong?: * 10 and no ntohs"
- info_ind->ul_tbf_ext = rlcc->parameter[T_UL_TBF_EXT];
- info_ind->initial_cs = rlcc->initial_cs;
- info_ind->initial_mcs = rlcc->initial_mcs;
-
- /* NSVC */
- for (i = 0; i < ARRAY_SIZE(info_ind->nsvci); i++) {
- nsvc = &bts->gprs.nsvc[i];
- info_ind->nsvci[i] = nsvc->nsvci;
- info_ind->local_port[i] = nsvc->local_port;
- info_ind->remote_port[i] = nsvc->remote_port;
- info_ind->remote_ip[i] = nsvc->remote_ip;
- }
-
- for (i = 0; i < ARRAY_SIZE(info_ind->trx); i++) {
- trx = gsm_bts_trx_num(bts, i);
- if (!trx)
- continue;
- info_ind->trx[i].hlayer1 = 0x2342;
- info_ind->trx[i].pdch_mask = 0;
- info_ind->trx[i].arfcn = trx->arfcn;
- for (j = 0; j < ARRAY_SIZE(trx->ts); j++) {
- ts = &trx->ts[j];
- if (ts->mo.nm_state.operational == NM_OPSTATE_ENABLED
- && ts_should_be_pdch(ts)) {
- info_ind->trx[i].pdch_mask |= (1 << j);
- info_ind->trx[i].tsc[j] =
- (ts->tsc >= 0) ? ts->tsc : bts->bsic & 7;
- LOGP(DPCU, LOGL_INFO, "trx=%d ts=%d: "
- "available (tsc=%d arfcn=%d)\n",
- trx->nr, ts->nr,
- info_ind->trx[i].tsc[j],
- info_ind->trx[i].arfcn);
- }
- }
- }
-
- return pcu_sock_send(bts, msg);
-}
-
-void pcu_info_update(struct gsm_bts *bts)
-{
- if (pcu_connected(bts))
- pcu_tx_info_ind(bts);
-}
-
-/* Forward rach indication to PCU */
-int pcu_tx_rach_ind(struct gsm_bts *bts, int16_t qta, uint16_t ra, uint32_t fn,
- uint8_t is_11bit, enum ph_burst_type burst_type)
-{
- struct msgb *msg;
- struct gsm_pcu_if *pcu_prim;
- struct gsm_pcu_if_rach_ind *rach_ind;
-
- /* Bail if no PCU is connected */
- if (!pcu_connected(bts)) {
- LOGP(DRSL, LOGL_ERROR, "BTS %d CHAN RQD(GPRS) but PCU not "
- "connected!\n", bts->nr);
- return -ENODEV;
- }
-
- LOGP(DPCU, LOGL_INFO, "Sending RACH indication: qta=%d, ra=%d, "
- "fn=%d\n", qta, ra, fn);
-
- msg = pcu_msgb_alloc(PCU_IF_MSG_RACH_IND, bts->nr);
- if (!msg)
- return -ENOMEM;
- pcu_prim = (struct gsm_pcu_if *) msg->data;
- rach_ind = &pcu_prim->u.rach_ind;
-
- rach_ind->sapi = PCU_IF_SAPI_RACH;
- rach_ind->ra = ra;
- rach_ind->qta = qta;
- rach_ind->fn = fn;
- rach_ind->is_11bit = is_11bit;
- rach_ind->burst_type = burst_type;
-
- return pcu_sock_send(bts, msg);
-}
-
-/* Confirm the sending of an immediate assignment to the pcu */
-int pcu_tx_imm_ass_sent(struct gsm_bts *bts, uint32_t tlli)
-{
- struct msgb *msg;
- struct gsm_pcu_if *pcu_prim;
- struct gsm_pcu_if_data_cnf_dt *data_cnf_dt;
-
- LOGP(DPCU, LOGL_INFO, "Sending PCH confirm with direct TLLI\n");
-
- msg = pcu_msgb_alloc(PCU_IF_MSG_DATA_CNF_DT, bts->nr);
- if (!msg)
- return -ENOMEM;
- pcu_prim = (struct gsm_pcu_if *) msg->data;
- data_cnf_dt = &pcu_prim->u.data_cnf_dt;
-
- data_cnf_dt->sapi = PCU_IF_SAPI_PCH;
- data_cnf_dt->tlli = tlli;
-
- return pcu_sock_send(bts, msg);
-}
-
-/* we need to decode the raw RR paging messsage (see PCU code
- * Encoding::write_paging_request) and extract the mobile identity
- * (P-TMSI) from it */
-static int pcu_rx_rr_paging(struct gsm_bts *bts, uint8_t paging_group,
- const uint8_t *raw_rr_msg)
-{
- struct gsm48_paging1 *p1 = (struct gsm48_paging1 *) raw_rr_msg;
- uint8_t chan_needed;
- unsigned int mi_len;
- uint8_t *mi;
- int rc;
-
- switch (p1->msg_type) {
- case GSM48_MT_RR_PAG_REQ_1:
- chan_needed = (p1->cneed2 << 2) | p1->cneed1;
- mi_len = p1->data[0];
- mi = p1->data+1;
- LOGP(DPCU, LOGL_ERROR, "PCU Sends paging "
- "request type %02x (chan_needed=%02x, mi_len=%u, mi=%s)\n",
- p1->msg_type, chan_needed, mi_len,
- osmo_hexdump_nospc(mi,mi_len));
- /* NOTE: We will have to add 2 to mi_len and subtract 2 from
- * the mi pointer because rsl_paging_cmd() will perform the
- * reverse operations. This is because rsl_paging_cmd() is
- * normally expected to chop off the element identifier (0xC0)
- * and the length field. In our parameter, we do not have
- * those fields included. */
- rc = rsl_paging_cmd(bts, paging_group, mi_len+2, mi-2,
- chan_needed, true);
- break;
- case GSM48_MT_RR_PAG_REQ_2:
- case GSM48_MT_RR_PAG_REQ_3:
- LOGP(DPCU, LOGL_ERROR, "PCU Sends unsupported paging "
- "request type %02x\n", p1->msg_type);
- rc = -EINVAL;
- break;
- default:
- LOGP(DPCU, LOGL_ERROR, "PCU Sends unknown paging "
- "request type %02x\n", p1->msg_type);
- rc = -EINVAL;
- break;
- }
-
- return rc;
-}
-
-static int pcu_rx_data_req(struct gsm_bts *bts, uint8_t msg_type,
- struct gsm_pcu_if_data *data_req)
-{
- uint8_t is_ptcch;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
- struct msgb *msg;
- char imsi_digit_buf[4];
- uint32_t tlli = -1;
- uint8_t pag_grp;
- int rc = 0;
-
- LOGP(DPCU, LOGL_DEBUG, "Data request received: sapi=%s arfcn=%d "
- "block=%d data=%s\n", sapi_string[data_req->sapi],
- data_req->arfcn, data_req->block_nr,
- osmo_hexdump(data_req->data, data_req->len));
-
- switch (data_req->sapi) {
- case PCU_IF_SAPI_PCH:
- /* the first three bytes are the last three digits of
- * the IMSI, which we need to compute the paging group */
- imsi_digit_buf[0] = data_req->data[0];
- imsi_digit_buf[1] = data_req->data[1];
- imsi_digit_buf[2] = data_req->data[2];
- imsi_digit_buf[3] = '\0';
- LOGP(DPCU, LOGL_DEBUG, "SAPI PCH imsi %s\n", imsi_digit_buf);
- pag_grp = gsm0502_calc_paging_group(&bts->si_common.chan_desc,
- str_to_imsi(imsi_digit_buf));
- pcu_rx_rr_paging(bts, pag_grp, data_req->data+3);
- break;
- case PCU_IF_SAPI_AGCH:
- msg = msgb_alloc(data_req->len, "pcu_agch");
- if (!msg) {
- rc = -ENOMEM;
- break;
- }
- msg->l3h = msgb_put(msg, data_req->len);
- memcpy(msg->l3h, data_req->data, data_req->len);
-
- if (rsl_imm_assign_cmd(bts, msg->len, msg->data)) {
- msgb_free(msg);
- rc = -EIO;
- }
- break;
- case PCU_IF_SAPI_AGCH_DT:
- /* DT = direct tlli. A tlli is prefixed */
-
- if (data_req->len < 5) {
- LOGP(DPCU, LOGL_ERROR, "Received PCU data request with "
- "invalid/small length %d\n", data_req->len);
- break;
- }
- tlli = *((uint32_t *)data_req->data);
-
- msg = msgb_alloc(data_req->len - 4, "pcu_agch");
- if (!msg) {
- rc = -ENOMEM;
- break;
- }
- msg->l3h = msgb_put(msg, data_req->len - 4);
- memcpy(msg->l3h, data_req->data + 4, data_req->len - 4);
-
- if (bts->type == GSM_BTS_TYPE_RBS2000)
- rc = rsl_ericsson_imm_assign_cmd(bts, tlli, msg->len, msg->data);
- else
- rc = rsl_imm_assign_cmd(bts, msg->len, msg->data);
-
- if (rc) {
- msgb_free(msg);
- rc = -EIO;
- }
- break;
- default:
- LOGP(DPCU, LOGL_ERROR, "Received PCU data request with "
- "unsupported sapi %d\n", data_req->sapi);
- rc = -EINVAL;
- }
-
- return rc;
-}
-
-static int pcu_rx(struct gsm_network *net, uint8_t msg_type,
- struct gsm_pcu_if *pcu_prim)
-{
- int rc = 0;
- struct gsm_bts *bts;
-
- /* FIXME: allow multiple BTS */
- bts = llist_entry(net->bts_list.next, struct gsm_bts, list);
-
- switch (msg_type) {
- case PCU_IF_MSG_DATA_REQ:
- case PCU_IF_MSG_PAG_REQ:
- rc = pcu_rx_data_req(bts, msg_type, &pcu_prim->u.data_req);
- break;
- default:
- LOGP(DPCU, LOGL_ERROR, "Received unknwon PCU msg type %d\n",
- msg_type);
- rc = -EINVAL;
- }
-
- return rc;
-}
-
-/*
- * PCU socket interface
- */
-
-static int pcu_sock_send(struct gsm_bts *bts, struct msgb *msg)
-{
- struct pcu_sock_state *state = bts->pcu_state;
- struct osmo_fd *conn_bfd;
- struct gsm_pcu_if *pcu_prim = (struct gsm_pcu_if *) msg->data;
-
- if (!state) {
- if (pcu_prim->msg_type != PCU_IF_MSG_TIME_IND)
- LOGP(DPCU, LOGL_INFO, "PCU socket not created, "
- "dropping message\n");
- msgb_free(msg);
- return -EINVAL;
- }
- conn_bfd = &state->conn_bfd;
- if (conn_bfd->fd <= 0) {
- if (pcu_prim->msg_type != PCU_IF_MSG_TIME_IND)
- LOGP(DPCU, LOGL_NOTICE, "PCU socket not connected, "
- "dropping message\n");
- msgb_free(msg);
- return -EIO;
- }
- msgb_enqueue(&state->upqueue, msg);
- conn_bfd->when |= BSC_FD_WRITE;
-
- return 0;
-}
-
-static void pcu_sock_close(struct pcu_sock_state *state)
-{
- struct osmo_fd *bfd = &state->conn_bfd;
- struct gsm_bts *bts;
- struct gsm_bts_trx *trx;
- struct gsm_bts_trx_ts *ts;
- int i, j;
-
- /* FIXME: allow multiple BTS */
- bts = llist_entry(state->net->bts_list.next, struct gsm_bts, list);
-
- LOGP(DPCU, LOGL_NOTICE, "PCU socket has LOST connection\n");
-
- close(bfd->fd);
- bfd->fd = -1;
- osmo_fd_unregister(bfd);
-
- /* re-enable the generation of ACCEPT for new connections */
- state->listen_bfd.when |= BSC_FD_READ;
-
-#if 0
- /* remove si13, ... */
- bts->si_valid &= ~(1 << SYSINFO_TYPE_13);
- osmo_signal_dispatch(SS_GLOBAL, S_NEW_SYSINFO, bts);
-#endif
-
- /* release PDCH */
- for (i = 0; i < 8; i++) {
- trx = gsm_bts_trx_num(bts, i);
- if (!trx)
- break;
- for (j = 0; j < 8; j++) {
- ts = &trx->ts[j];
- if (ts->mo.nm_state.operational == NM_OPSTATE_ENABLED
- && ts->pchan == GSM_PCHAN_PDCH) {
- printf("l1sap_chan_rel(trx,gsm_lchan2chan_nr(ts->lchan));\n");
- }
- }
- }
-
- /* flush the queue */
- while (!llist_empty(&state->upqueue)) {
- struct msgb *msg = msgb_dequeue(&state->upqueue);
- msgb_free(msg);
- }
-}
-
-static int pcu_sock_read(struct osmo_fd *bfd)
-{
- struct pcu_sock_state *state = (struct pcu_sock_state *)bfd->data;
- struct gsm_pcu_if *pcu_prim;
- struct msgb *msg;
- int rc;
-
- msg = msgb_alloc(sizeof(*pcu_prim), "pcu_sock_rx");
- if (!msg)
- return -ENOMEM;
-
- pcu_prim = (struct gsm_pcu_if *) msg->tail;
-
- rc = recv(bfd->fd, msg->tail, msgb_tailroom(msg), 0);
- if (rc == 0)
- goto close;
-
- if (rc < 0) {
- if (errno == EAGAIN)
- return 0;
- goto close;
- }
-
- rc = pcu_rx(state->net, pcu_prim->msg_type, pcu_prim);
-
- /* as we always synchronously process the message in pcu_rx() and
- * its callbacks, we can free the message here. */
- msgb_free(msg);
-
- return rc;
-
-close:
- msgb_free(msg);
- pcu_sock_close(state);
- return -1;
-}
-
-static int pcu_sock_write(struct osmo_fd *bfd)
-{
- struct pcu_sock_state *state = bfd->data;
- int rc;
-
- while (!llist_empty(&state->upqueue)) {
- struct msgb *msg, *msg2;
- struct gsm_pcu_if *pcu_prim;
-
- /* peek at the beginning of the queue */
- msg = llist_entry(state->upqueue.next, struct msgb, list);
- pcu_prim = (struct gsm_pcu_if *)msg->data;
-
- bfd->when &= ~BSC_FD_WRITE;
-
- /* bug hunter 8-): maybe someone forgot msgb_put(...) ? */
- if (!msgb_length(msg)) {
- LOGP(DPCU, LOGL_ERROR, "message type (%d) with ZERO "
- "bytes!\n", pcu_prim->msg_type);
- goto dontsend;
- }
-
- /* try to send it over the socket */
- rc = write(bfd->fd, msgb_data(msg), msgb_length(msg));
- if (rc == 0)
- goto close;
- if (rc < 0) {
- if (errno == EAGAIN) {
- bfd->when |= BSC_FD_WRITE;
- break;
- }
- goto close;
- }
-
-dontsend:
- /* _after_ we send it, we can deueue */
- msg2 = msgb_dequeue(&state->upqueue);
- assert(msg == msg2);
- msgb_free(msg);
- }
- return 0;
-
-close:
- pcu_sock_close(state);
-
- return -1;
-}
-
-static int pcu_sock_cb(struct osmo_fd *bfd, unsigned int flags)
-{
- int rc = 0;
-
- if (flags & BSC_FD_READ)
- rc = pcu_sock_read(bfd);
- if (rc < 0)
- return rc;
-
- if (flags & BSC_FD_WRITE)
- rc = pcu_sock_write(bfd);
-
- return rc;
-}
-
-/* accept connection comming from PCU */
-static int pcu_sock_accept(struct osmo_fd *bfd, unsigned int flags)
-{
- struct pcu_sock_state *state = (struct pcu_sock_state *)bfd->data;
- struct osmo_fd *conn_bfd = &state->conn_bfd;
- struct sockaddr_un un_addr;
- socklen_t len;
- int rc;
-
- len = sizeof(un_addr);
- rc = accept(bfd->fd, (struct sockaddr *) &un_addr, &len);
- if (rc < 0) {
- LOGP(DPCU, LOGL_ERROR, "Failed to accept a new connection\n");
- return -1;
- }
-
- if (conn_bfd->fd >= 0) {
- LOGP(DPCU, LOGL_NOTICE, "PCU connects but we already have "
- "another active connection ?!?\n");
- /* We already have one PCU connected, this is all we support */
- state->listen_bfd.when &= ~BSC_FD_READ;
- close(rc);
- return 0;
- }
-
- conn_bfd->fd = rc;
- conn_bfd->when = BSC_FD_READ;
- conn_bfd->cb = pcu_sock_cb;
- conn_bfd->data = state;
-
- if (osmo_fd_register(conn_bfd) != 0) {
- LOGP(DPCU, LOGL_ERROR, "Failed to register new connection "
- "fd\n");
- close(conn_bfd->fd);
- conn_bfd->fd = -1;
- return -1;
- }
-
- LOGP(DPCU, LOGL_NOTICE, "PCU socket connected to external PCU\n");
-
- return 0;
-}
-
-/* Open connection to PCU */
-int pcu_sock_init(const char *path, struct gsm_bts *bts)
-{
- struct pcu_sock_state *state;
- struct osmo_fd *bfd;
- int rc;
-
- state = talloc_zero(NULL, struct pcu_sock_state);
- if (!state)
- return -ENOMEM;
-
- INIT_LLIST_HEAD(&state->upqueue);
- state->net = bts->network;
- state->conn_bfd.fd = -1;
-
- bfd = &state->listen_bfd;
-
- bfd->fd = osmo_sock_unix_init(SOCK_SEQPACKET, 0, path,
- OSMO_SOCK_F_BIND);
- if (bfd->fd < 0) {
- LOGP(DPCU, LOGL_ERROR, "Could not create unix socket: %s\n",
- strerror(errno));
- talloc_free(state);
- return -1;
- }
-
- bfd->when = BSC_FD_READ;
- bfd->cb = pcu_sock_accept;
- bfd->data = state;
-
- rc = osmo_fd_register(bfd);
- if (rc < 0) {
- LOGP(DPCU, LOGL_ERROR, "Could not register listen fd: %d\n",
- rc);
- close(bfd->fd);
- talloc_free(state);
- return rc;
- }
-
- bts->pcu_state = state;
- return 0;
-}
-
-/* Close connection to PCU */
-void pcu_sock_exit(struct gsm_bts *bts)
-{
- struct pcu_sock_state *state = bts->pcu_state;
- struct osmo_fd *bfd, *conn_bfd;
-
- if (!state)
- return;
-
- conn_bfd = &state->conn_bfd;
- if (conn_bfd->fd > 0)
- pcu_sock_close(state);
- bfd = &state->listen_bfd;
- close(bfd->fd);
- osmo_fd_unregister(bfd);
- talloc_free(state);
- bts->pcu_state = NULL;
-}
-
diff --git a/src/libbsc/rest_octets.c b/src/libbsc/rest_octets.c
deleted file mode 100644
index fdab70a0c..000000000
--- a/src/libbsc/rest_octets.c
+++ /dev/null
@@ -1,860 +0,0 @@
-/* GSM Mobile Radio Interface Layer 3 messages on the A-bis interface,
- * rest octet handling according to
- * 3GPP TS 04.08 version 7.21.0 Release 1998 / ETSI TS 100 940 V7.21.0 */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <string.h>
-#include <stdlib.h>
-#include <errno.h>
-#include <stdbool.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <osmocom/core/bitvec.h>
-#include <osmocom/gsm/bitvec_gsm.h>
-#include <openbsc/rest_octets.h>
-#include <openbsc/arfcn_range_encode.h>
-#include <openbsc/system_information.h>
-
-/* generate SI1 rest octets */
-int rest_octets_si1(uint8_t *data, uint8_t *nch_pos, int is1800_net)
-{
- struct bitvec bv;
-
- memset(&bv, 0, sizeof(bv));
- bv.data = data;
- bv.data_len = 1;
-
- if (nch_pos) {
- bitvec_set_bit(&bv, H);
- bitvec_set_uint(&bv, *nch_pos, 5);
- } else
- bitvec_set_bit(&bv, L);
-
- if (is1800_net)
- bitvec_set_bit(&bv, L);
- else
- bitvec_set_bit(&bv, H);
-
- bitvec_spare_padding(&bv, 6);
- return bv.data_len;
-}
-
-/* Append Repeated E-UTRAN Neighbour Cell to bitvec: see 3GPP TS 44.018 Table 10.5.2.33b.1 */
-static inline void append_eutran_neib_cell(struct bitvec *bv, struct gsm_bts *bts, uint8_t budget)
-{
- const struct osmo_earfcn_si2q *e = &bts->si_common.si2quater_neigh_list;
- unsigned i, skip = 0;
- size_t offset = bts->e_offset;
- uint8_t rem = budget - 6, earfcn_budget; /* account for mandatory stop bit and THRESH_E-UTRAN_high */
-
- if (budget <= 6)
- return;
-
- OSMO_ASSERT(budget <= SI2Q_MAX_LEN);
-
- /* first we have to properly adjust budget requirements */
- if (e->prio_valid) /* E-UTRAN_PRIORITY: 3GPP TS 45.008*/
- rem -= 4;
- else
- rem--;
-
- if (e->thresh_lo_valid) /* THRESH_E-UTRAN_low: */
- rem -= 6;
- else
- rem--;
-
- if (e->qrxlm_valid) /* E-UTRAN_QRXLEVMIN: */
- rem -= 6;
- else
- rem--;
-
- /* now we can proceed with actually adding EARFCNs within adjusted budget limit */
- for (i = 0; i < e->length; i++) {
- if (e->arfcn[i] != OSMO_EARFCN_INVALID) {
- if (skip < offset) {
- skip++; /* ignore EARFCNs added on previous calls */
- } else {
- earfcn_budget = 17; /* compute budget per-EARFCN */
- if (OSMO_EARFCN_MEAS_INVALID == e->meas_bw[i])
- earfcn_budget++;
- else
- earfcn_budget += 4;
-
- if (rem - earfcn_budget < 0)
- break;
- else {
- bts->e_offset++;
- rem -= earfcn_budget;
- bitvec_set_bit(bv, 1); /* EARFCN: */
- bitvec_set_uint(bv, e->arfcn[i], 16);
-
- if (OSMO_EARFCN_MEAS_INVALID == e->meas_bw[i])
- bitvec_set_bit(bv, 0);
- else { /* Measurement Bandwidth: 9.1.54 */
- bitvec_set_bit(bv, 1);
- bitvec_set_uint(bv, e->meas_bw[i], 3);
- }
- }
- }
- }
- }
-
- /* stop bit - end of EARFCN + Measurement Bandwidth sequence */
- bitvec_set_bit(bv, 0);
-
- /* Note: we don't support different EARFCN arrays each with different priority, threshold etc. */
-
- if (e->prio_valid) {
- /* E-UTRAN_PRIORITY: 3GPP TS 45.008*/
- bitvec_set_bit(bv, 1);
- bitvec_set_uint(bv, e->prio, 3);
- } else
- bitvec_set_bit(bv, 0);
-
- /* THRESH_E-UTRAN_high */
- bitvec_set_uint(bv, e->thresh_hi, 5);
-
- if (e->thresh_lo_valid) {
- /* THRESH_E-UTRAN_low: */
- bitvec_set_bit(bv, 1);
- bitvec_set_uint(bv, e->thresh_lo, 5);
- } else
- bitvec_set_bit(bv, 0);
-
- if (e->qrxlm_valid) {
- /* E-UTRAN_QRXLEVMIN: */
- bitvec_set_bit(bv, 1);
- bitvec_set_uint(bv, e->qrxlm, 5);
- } else
- bitvec_set_bit(bv, 0);
-}
-
-static inline void append_earfcn(struct bitvec *bv, struct gsm_bts *bts, uint8_t budget)
-{
- int rem = budget - 25;
- if (rem <= 0)
- return;
-
- OSMO_ASSERT(budget <= SI2Q_MAX_LEN);
-
- /* Additions in Rel-5: */
- bitvec_set_bit(bv, H);
- /* No 3G Additional Measurement Param. Descr. */
- bitvec_set_bit(bv, 0);
- /* No 3G ADDITIONAL MEASUREMENT Param. Descr. 2 */
- bitvec_set_bit(bv, 0);
- /* Additions in Rel-6: */
- bitvec_set_bit(bv, H);
- /* 3G_CCN_ACTIVE */
- bitvec_set_bit(bv, 0);
- /* Additions in Rel-7: */
- bitvec_set_bit(bv, H);
- /* No 700_REPORTING_OFFSET */
- bitvec_set_bit(bv, 0);
- /* No 810_REPORTING_OFFSET */
- bitvec_set_bit(bv, 0);
- /* Additions in Rel-8: */
- bitvec_set_bit(bv, H);
-
- /* Priority and E-UTRAN Parameters Description */
- bitvec_set_bit(bv, 1);
-
- /* No Serving Cell Priority Parameters Descr. */
- bitvec_set_bit(bv, 0);
- /* No 3G Priority Parameters Description */
- bitvec_set_bit(bv, 0);
- /* E-UTRAN Parameters Description */
- bitvec_set_bit(bv, 1);
-
- /* E-UTRAN_CCN_ACTIVE */
- bitvec_set_bit(bv, 0);
- /* E-UTRAN_Start: 9.1.54 */
- bitvec_set_bit(bv, 1);
- /* E-UTRAN_Stop: 9.1.54 */
- bitvec_set_bit(bv, 1);
-
- /* No E-UTRAN Measurement Parameters Descr. */
- bitvec_set_bit(bv, 0);
- /* No GPRS E-UTRAN Measurement Param. Descr. */
- bitvec_set_bit(bv, 0);
-
- /* Note: each of next 3 "repeated" structures might be repeated any
- (0, 1, 2...) times - we only support 1 and 0 */
-
- /* Repeated E-UTRAN Neighbour Cells */
- bitvec_set_bit(bv, 1);
-
- /* N. B: 25 bits are set in append_earfcn() - keep it in sync with budget adjustment below: */
- append_eutran_neib_cell(bv, bts, rem);
-
- /* stop bit - end of Repeated E-UTRAN Neighbour Cells sequence: */
- bitvec_set_bit(bv, 0);
-
- /* Note: following 2 repeated structs are not supported ATM */
- /* stop bit - end of Repeated E-UTRAN Not Allowed Cells sequence: */
- bitvec_set_bit(bv, 0);
- /* stop bit - end of Repeated E-UTRAN PCID to TA mapping sequence: */
- bitvec_set_bit(bv, 0);
-
- /* Priority and E-UTRAN Parameters Description ends here */
- /* No 3G CSG Description */
- bitvec_set_bit(bv, 0);
- /* No E-UTRAN CSG Description */
- bitvec_set_bit(bv, 0);
- /* No Additions in Rel-9: */
- bitvec_set_bit(bv, L);
-}
-
-static inline int f0_helper(int *sc, size_t length, uint8_t *chan_list)
-{
- int w[RANGE_ENC_MAX_ARFCNS] = { 0 };
-
- return range_encode(ARFCN_RANGE_1024, sc, length, w, 0, chan_list);
-}
-
-/* Estimate how many bits it'll take to append single FDD UARFCN */
-static inline int append_utran_fdd_length(uint16_t u, int *sc, size_t sc_len, size_t length)
-{
- uint8_t chan_list[16] = { 0 };
- int tmp[sc_len], f0;
-
- memcpy(tmp, sc, sizeof(tmp));
-
- f0 = f0_helper(tmp, length, chan_list);
- if (f0 < 0)
- return f0;
-
- return 21 + range1024_p(length);
-}
-
-/* Append single FDD UARFCN */
-static inline int append_utran_fdd(struct bitvec *bv, uint16_t u, int *sc, size_t length)
-{
- uint8_t chan_list[16] = { 0 };
- int f0 = f0_helper(sc, length, chan_list);
-
- if (f0 < 0)
- return f0;
-
- /* Repeated UTRAN FDD Neighbour Cells */
- bitvec_set_bit(bv, 1);
-
- /* FDD-ARFCN */
- bitvec_set_bit(bv, 0);
- bitvec_set_uint(bv, u, 14);
-
- /* FDD_Indic0: parameter value '0000000000' is a member of the set? */
- bitvec_set_bit(bv, f0);
- /* NR_OF_FDD_CELLS */
- bitvec_set_uint(bv, length, 5);
-
- f0 = bv->cur_bit;
- bitvec_add_range1024(bv, (struct gsm48_range_1024 *)chan_list);
- bv->cur_bit = f0 + range1024_p(length);
-
- return 21 + range1024_p(length);
-}
-
-/* Append multiple FDD UARFCNs */
-static inline int append_uarfcns(struct bitvec *bv, struct gsm_bts *bts, uint8_t budget)
-{
- const uint16_t *u = bts->si_common.data.uarfcn_list, *sc = bts->si_common.data.scramble_list;
- int i, j, k, rc, st = 0, a[bts->si_common.uarfcn_length];
- uint16_t cu = u[bts->u_offset]; /* caller ensures that length is positive */
- uint8_t rem = budget - 7, offset_diff; /* account for constant bits right away */
-
- OSMO_ASSERT(budget <= SI2Q_MAX_LEN);
-
- if (budget <= 7)
- return -ENOMEM;
-
- /* 3G Neighbour Cell Description */
- bitvec_set_bit(bv, 1);
- /* No Index_Start_3G */
- bitvec_set_bit(bv, 0);
- /* No Absolute_Index_Start_EMR */
- bitvec_set_bit(bv, 0);
-
- /* UTRAN FDD Description */
- bitvec_set_bit(bv, 1);
- /* No Bandwidth_FDD */
- bitvec_set_bit(bv, 0);
-
- for (i = bts->u_offset; i < bts->si_common.uarfcn_length; i++) {
- offset_diff = 0;
- for (j = st, k = 0; j < i; j++) {
- a[k++] = sc[j]; /* copy corresponding SCs */
- offset_diff++; /* compute proper offset step */
- }
- if (u[i] != cu) { /* we've reached new UARFCN */
- rc = append_utran_fdd_length(cu, a, bts->si_common.uarfcn_length, k);
- if (rc < 0) { /* estimate bit length requirements */
- return rc;
- }
-
- if (rem - rc <= 0)
- break; /* we have ran out of budget in current SI2q */
- else {
- rem -= append_utran_fdd(bv, cu, a, k);
- bts->u_offset += offset_diff;
- }
- cu = u[i];
- st = i; /* update start position */
- }
- }
-
- if (rem > 22) { /* add last UARFCN not covered by previous cycle if it could possibly fit into budget */
- offset_diff = 0;
- for (i = st, k = 0; i < bts->si_common.uarfcn_length; i++) {
- a[k++] = sc[i];
- offset_diff++;
- }
- rc = append_utran_fdd_length(cu, a, bts->si_common.uarfcn_length, k);
- if (rc < 0) {
- return rc;
- }
-
- if (rem - rc >= 0) {
- rem -= append_utran_fdd(bv, cu, a, k);
- bts->u_offset += offset_diff;
- }
- }
-
- /* stop bit - end of Repeated UTRAN FDD Neighbour Cells */
- bitvec_set_bit(bv, 0);
-
- /* UTRAN TDD Description */
- bitvec_set_bit(bv, 0);
-
- return 0;
-}
-
-/* generate SI2quater rest octets: 3GPP TS 44.018 § 10.5.2.33b */
-int rest_octets_si2quater(uint8_t *data, struct gsm_bts *bts)
-{
- int rc;
- struct bitvec bv;
-
- if (bts->si2q_count < bts->si2q_index)
- return -EINVAL;
-
- bv.data = data;
- bv.data_len = 20;
- bitvec_zero(&bv);
-
- /* BA_IND */
- bitvec_set_bit(&bv, 1);
- /* 3G_BA_IND */
- bitvec_set_bit(&bv, 1);
- /* MP_CHANGE_MARK */
- bitvec_set_bit(&bv, 0);
-
- /* SI2quater_INDEX */
- bitvec_set_uint(&bv, bts->si2q_index, 4);
- /* SI2quater_COUNT */
- bitvec_set_uint(&bv, bts->si2q_count, 4);
-
- /* No Measurement_Parameters Description */
- bitvec_set_bit(&bv, 0);
- /* No GPRS_Real Time Difference Description */
- bitvec_set_bit(&bv, 0);
- /* No GPRS_BSIC Description */
- bitvec_set_bit(&bv, 0);
- /* No GPRS_REPORT PRIORITY Description */
- bitvec_set_bit(&bv, 0);
- /* No GPRS_MEASUREMENT_Parameters Description */
- bitvec_set_bit(&bv, 0);
- /* No NC Measurement Parameters */
- bitvec_set_bit(&bv, 0);
- /* No extension (length) */
- bitvec_set_bit(&bv, 0);
-
- rc = SI2Q_MAX_LEN - (bv.cur_bit + 3);
- if (rc > 0 && bts->si_common.uarfcn_length - bts->u_offset > 0) {
- rc = append_uarfcns(&bv, bts, rc);
- if (rc < 0) {
- LOGP(DRR, LOGL_ERROR, "SI2quater [%u/%u]: failed to append %zu UARFCNs due to range encoding "
- "failure: %s\n",
- bts->si2q_index, bts->si2q_count, bts->si_common.uarfcn_length, strerror(-rc));
- return rc;
- }
- } else /* No 3G Neighbour Cell Description */
- bitvec_set_bit(&bv, 0);
-
- /* No 3G Measurement Parameters Description */
- bitvec_set_bit(&bv, 0);
- /* No GPRS_3G_MEASUREMENT Parameters Descr. */
- bitvec_set_bit(&bv, 0);
-
- rc = SI2Q_MAX_LEN - bv.cur_bit;
- if (rc > 0 && si2q_earfcn_count(&bts->si_common.si2quater_neigh_list) - bts->e_offset > 0)
- append_earfcn(&bv, bts, rc);
- else /* No Additions in Rel-5: */
- bitvec_set_bit(&bv, L);
-
- bitvec_spare_padding(&bv, (bv.data_len * 8) - 1);
- return bv.data_len;
-}
-
-/* Append selection parameters to bitvec */
-static void append_selection_params(struct bitvec *bv,
- const struct gsm48_si_selection_params *sp)
-{
- if (sp->present) {
- bitvec_set_bit(bv, H);
- bitvec_set_bit(bv, sp->cbq);
- bitvec_set_uint(bv, sp->cell_resel_off, 6);
- bitvec_set_uint(bv, sp->temp_offs, 3);
- bitvec_set_uint(bv, sp->penalty_time, 5);
- } else
- bitvec_set_bit(bv, L);
-}
-
-/* Append power offset to bitvec */
-static void append_power_offset(struct bitvec *bv,
- const struct gsm48_si_power_offset *po)
-{
- if (po->present) {
- bitvec_set_bit(bv, H);
- bitvec_set_uint(bv, po->power_offset, 2);
- } else
- bitvec_set_bit(bv, L);
-}
-
-/* Append GPRS indicator to bitvec */
-static void append_gprs_ind(struct bitvec *bv,
- const struct gsm48_si3_gprs_ind *gi)
-{
- if (gi->present) {
- bitvec_set_bit(bv, H);
- bitvec_set_uint(bv, gi->ra_colour, 3);
- /* 0 == SI13 in BCCH Norm, 1 == SI13 sent on BCCH Ext */
- bitvec_set_bit(bv, gi->si13_position);
- } else
- bitvec_set_bit(bv, L);
-}
-
-
-/* Generate SI3 Rest Octests (Chapter 10.5.2.34 / Table 10.4.72) */
-int rest_octets_si3(uint8_t *data, const struct gsm48_si_ro_info *si3)
-{
- struct bitvec bv;
-
- memset(&bv, 0, sizeof(bv));
- bv.data = data;
- bv.data_len = 4;
-
- /* Optional Selection Parameters */
- append_selection_params(&bv, &si3->selection_params);
-
- /* Optional Power Offset */
- append_power_offset(&bv, &si3->power_offset);
-
- /* Do we have a SI2ter on the BCCH? */
- if (si3->si2ter_indicator)
- bitvec_set_bit(&bv, H);
- else
- bitvec_set_bit(&bv, L);
-
- /* Early Classmark Sending Control */
- if (si3->early_cm_ctrl)
- bitvec_set_bit(&bv, H);
- else
- bitvec_set_bit(&bv, L);
-
- /* Do we have a SI Type 9 on the BCCH? */
- if (si3->scheduling.present) {
- bitvec_set_bit(&bv, H);
- bitvec_set_uint(&bv, si3->scheduling.where, 3);
- } else
- bitvec_set_bit(&bv, L);
-
- /* GPRS Indicator */
- append_gprs_ind(&bv, &si3->gprs_ind);
-
- /* 3G Early Classmark Sending Restriction controlled by
- * early_cm_ctrl above */
- bitvec_set_bit(&bv, H);
-
- if (si3->si2quater_indicator) {
- bitvec_set_bit(&bv, H); /* indicator struct present */
- bitvec_set_uint(&bv, 0, 1); /* message is sent on BCCH Norm */
- }
-
- bitvec_spare_padding(&bv, (bv.data_len*8)-1);
- return bv.data_len;
-}
-
-static int append_lsa_params(struct bitvec *bv,
- const struct gsm48_lsa_params *lsa_params)
-{
- /* FIXME */
- return -1;
-}
-
-/* Generate SI4 Rest Octets (Chapter 10.5.2.35) */
-int rest_octets_si4(uint8_t *data, const struct gsm48_si_ro_info *si4, int len)
-{
- struct bitvec bv;
-
- memset(&bv, 0, sizeof(bv));
- bv.data = data;
- bv.data_len = len;
-
- /* SI4 Rest Octets O */
- append_selection_params(&bv, &si4->selection_params);
- append_power_offset(&bv, &si4->power_offset);
- append_gprs_ind(&bv, &si4->gprs_ind);
-
- if (0 /* FIXME */) {
- /* H and SI4 Rest Octets S */
- bitvec_set_bit(&bv, H);
-
- /* LSA Parameters */
- if (si4->lsa_params.present) {
- bitvec_set_bit(&bv, H);
- append_lsa_params(&bv, &si4->lsa_params);
- } else
- bitvec_set_bit(&bv, L);
-
- /* Cell Identity */
- if (1) {
- bitvec_set_bit(&bv, H);
- bitvec_set_uint(&bv, si4->cell_id, 16);
- } else
- bitvec_set_bit(&bv, L);
-
- /* LSA ID Information */
- if (0) {
- bitvec_set_bit(&bv, H);
- /* FIXME */
- } else
- bitvec_set_bit(&bv, L);
- } else {
- /* L and break indicator */
- bitvec_set_bit(&bv, L);
- bitvec_set_bit(&bv, si4->break_ind ? H : L);
- }
-
- return bv.data_len;
-}
-
-
-/* GSM 04.18 ETSI TS 101 503 V8.27.0 (2006-05)
-
-<SI6 rest octets> ::=
-{L | H <PCH and NCH info>}
-{L | H <VBS/VGCS options : bit(2)>}
-{ < DTM_support : bit == L > I < DTM_support : bit == H >
-< RAC : bit (8) >
-< MAX_LAPDm : bit (3) > }
-< Band indicator >
-{ L | H < GPRS_MS_TXPWR_MAX_CCH : bit (5) > }
-<implicit spare >;
-*/
-int rest_octets_si6(uint8_t *data, bool is1800_net)
-{
- struct bitvec bv;
-
- memset(&bv, 0, sizeof(bv));
- bv.data = data;
- bv.data_len = 1;
-
- /* no PCH/NCH info */
- bitvec_set_bit(&bv, L);
- /* no VBS/VGCS options */
- bitvec_set_bit(&bv, L);
- /* no DTM_support */
- bitvec_set_bit(&bv, L);
- /* band indicator */
- if (is1800_net)
- bitvec_set_bit(&bv, L);
- else
- bitvec_set_bit(&bv, H);
- /* no GPRS_MS_TXPWR_MAX_CCH */
- bitvec_set_bit(&bv, L);
-
- bitvec_spare_padding(&bv, (bv.data_len * 8) - 1);
- return bv.data_len;
-}
-
-/* GPRS Mobile Allocation as per TS 04.60 Chapter 12.10a:
- < GPRS Mobile Allocation IE > ::=
- < HSN : bit (6) >
- { 0 | 1 < RFL number list : < RFL number list struct > > }
- { 0 < MA_LENGTH : bit (6) >
- < MA_BITMAP: bit (val(MA_LENGTH) + 1) >
- | 1 { 0 | 1 <ARFCN index list : < ARFCN index list struct > > } } ;
-
- < RFL number list struct > :: =
- < RFL_NUMBER : bit (4) >
- { 0 | 1 < RFL number list struct > } ;
- < ARFCN index list struct > ::=
- < ARFCN_INDEX : bit(6) >
- { 0 | 1 < ARFCN index list struct > } ;
- */
-static int append_gprs_mobile_alloc(struct bitvec *bv)
-{
- /* Hopping Sequence Number */
- bitvec_set_uint(bv, 0, 6);
-
- if (0) {
- /* We want to use a RFL number list */
- bitvec_set_bit(bv, 1);
- /* FIXME: RFL number list */
- } else
- bitvec_set_bit(bv, 0);
-
- if (0) {
- /* We want to use a MA_BITMAP */
- bitvec_set_bit(bv, 0);
- /* FIXME: MA_LENGTH, MA_BITMAP, ... */
- } else {
- bitvec_set_bit(bv, 1);
- if (0) {
- /* We want to provide an ARFCN index list */
- bitvec_set_bit(bv, 1);
- /* FIXME */
- } else
- bitvec_set_bit(bv, 0);
- }
- return 0;
-}
-
-static int encode_t3192(unsigned int t3192)
-{
- /* See also 3GPP TS 44.060
- Table 12.24.2: GPRS Cell Options information element details */
- if (t3192 == 0)
- return 3;
- else if (t3192 <= 80)
- return 4;
- else if (t3192 <= 120)
- return 5;
- else if (t3192 <= 160)
- return 6;
- else if (t3192 <= 200)
- return 7;
- else if (t3192 <= 500)
- return 0;
- else if (t3192 <= 1000)
- return 1;
- else if (t3192 <= 1500)
- return 2;
- else
- return -EINVAL;
-}
-
-static int encode_drx_timer(unsigned int drx)
-{
- if (drx == 0)
- return 0;
- else if (drx == 1)
- return 1;
- else if (drx == 2)
- return 2;
- else if (drx <= 4)
- return 3;
- else if (drx <= 8)
- return 4;
- else if (drx <= 16)
- return 5;
- else if (drx <= 32)
- return 6;
- else if (drx <= 64)
- return 7;
- else
- return -EINVAL;
-}
-
-/* GPRS Cell Options as per TS 04.60 Chapter 12.24
- < GPRS Cell Options IE > ::=
- < NMO : bit(2) >
- < T3168 : bit(3) >
- < T3192 : bit(3) >
- < DRX_TIMER_MAX: bit(3) >
- < ACCESS_BURST_TYPE: bit >
- < CONTROL_ACK_TYPE : bit >
- < BS_CV_MAX: bit(4) >
- { 0 | 1 < PAN_DEC : bit(3) >
- < PAN_INC : bit(3) >
- < PAN_MAX : bit(3) >
- { 0 | 1 < Extension Length : bit(6) >
- < bit (val(Extension Length) + 1
- & { < Extension Information > ! { bit ** = <no string> } } ;
- < Extension Information > ::=
- { 0 | 1 < EGPRS_PACKET_CHANNEL_REQUEST : bit >
- < BEP_PERIOD : bit(4) > }
- < PFC_FEATURE_MODE : bit >
- < DTM_SUPPORT : bit >
- <BSS_PAGING_COORDINATION: bit >
- <spare bit > ** ;
- */
-static int append_gprs_cell_opt(struct bitvec *bv,
- const struct gprs_cell_options *gco)
-{
- int t3192, drx_timer_max;
-
- t3192 = encode_t3192(gco->t3192);
- if (t3192 < 0)
- return t3192;
-
- drx_timer_max = encode_drx_timer(gco->drx_timer_max);
- if (drx_timer_max < 0)
- return drx_timer_max;
-
- bitvec_set_uint(bv, gco->nmo, 2);
-
- /* See also 3GPP TS 44.060
- Table 12.24.2: GPRS Cell Options information element details */
- bitvec_set_uint(bv, gco->t3168 / 500 - 1, 3);
-
- bitvec_set_uint(bv, t3192, 3);
- bitvec_set_uint(bv, drx_timer_max, 3);
- /* ACCESS_BURST_TYPE: Hard-code 8bit */
- bitvec_set_bit(bv, 0);
- /* CONTROL_ACK_TYPE: */
- bitvec_set_bit(bv, gco->ctrl_ack_type_use_block);
- bitvec_set_uint(bv, gco->bs_cv_max, 4);
-
- if (0) {
- /* hard-code no PAN_{DEC,INC,MAX} */
- bitvec_set_bit(bv, 0);
- } else {
- /* copied from ip.access BSC protocol trace */
- bitvec_set_bit(bv, 1);
- bitvec_set_uint(bv, 1, 3); /* DEC */
- bitvec_set_uint(bv, 1, 3); /* INC */
- bitvec_set_uint(bv, 15, 3); /* MAX */
- }
-
- if (!gco->ext_info_present) {
- /* no extension information */
- bitvec_set_bit(bv, 0);
- } else {
- /* extension information */
- bitvec_set_bit(bv, 1);
- if (!gco->ext_info.egprs_supported) {
- /* 6bit length of extension */
- bitvec_set_uint(bv, (1 + 3)-1, 6);
- /* EGPRS supported in the cell */
- bitvec_set_bit(bv, 0);
- } else {
- /* 6bit length of extension */
- bitvec_set_uint(bv, (1 + 5 + 3)-1, 6);
- /* EGPRS supported in the cell */
- bitvec_set_bit(bv, 1);
-
- /* 1bit EGPRS PACKET CHANNEL REQUEST */
- if (gco->supports_egprs_11bit_rach == 0) {
- bitvec_set_bit(bv,
- gco->ext_info.use_egprs_p_ch_req);
- } else {
- bitvec_set_bit(bv, 0);
- }
-
- /* 4bit BEP PERIOD */
- bitvec_set_uint(bv, gco->ext_info.bep_period, 4);
- }
- bitvec_set_bit(bv, gco->ext_info.pfc_supported);
- bitvec_set_bit(bv, gco->ext_info.dtm_supported);
- bitvec_set_bit(bv, gco->ext_info.bss_paging_coordination);
- }
-
- return 0;
-}
-
-static void append_gprs_pwr_ctrl_pars(struct bitvec *bv,
- const struct gprs_power_ctrl_pars *pcp)
-{
- bitvec_set_uint(bv, pcp->alpha, 4);
- bitvec_set_uint(bv, pcp->t_avg_w, 5);
- bitvec_set_uint(bv, pcp->t_avg_t, 5);
- bitvec_set_uint(bv, pcp->pc_meas_chan, 1);
- bitvec_set_uint(bv, pcp->n_avg_i, 4);
-}
-
-/* Generate SI13 Rest Octests (04.08 Chapter 10.5.2.37b) */
-int rest_octets_si13(uint8_t *data, const struct gsm48_si13_info *si13)
-{
- struct bitvec bv;
-
- memset(&bv, 0, sizeof(bv));
- bv.data = data;
- bv.data_len = 20;
-
- if (0) {
- /* No rest octets */
- bitvec_set_bit(&bv, L);
- } else {
- bitvec_set_bit(&bv, H);
- bitvec_set_uint(&bv, si13->bcch_change_mark, 3);
- bitvec_set_uint(&bv, si13->si_change_field, 4);
- if (1) {
- bitvec_set_bit(&bv, 0);
- } else {
- bitvec_set_bit(&bv, 1);
- bitvec_set_uint(&bv, si13->bcch_change_mark, 2);
- append_gprs_mobile_alloc(&bv);
- }
- if (!si13->pbcch_present) {
- /* PBCCH not present in cell */
- bitvec_set_bit(&bv, 0);
- bitvec_set_uint(&bv, si13->no_pbcch.rac, 8);
- bitvec_set_bit(&bv, si13->no_pbcch.spgc_ccch_sup);
- bitvec_set_uint(&bv, si13->no_pbcch.prio_acc_thr, 3);
- bitvec_set_uint(&bv, si13->no_pbcch.net_ctrl_ord, 2);
- append_gprs_cell_opt(&bv, &si13->cell_opts);
- append_gprs_pwr_ctrl_pars(&bv, &si13->pwr_ctrl_pars);
- } else {
- /* PBCCH present in cell */
- bitvec_set_bit(&bv, 1);
- bitvec_set_uint(&bv, si13->pbcch.psi1_rep_per, 4);
- /* PBCCH Descripiton */
- bitvec_set_uint(&bv, si13->pbcch.pb, 4);
- bitvec_set_uint(&bv, si13->pbcch.tsc, 3);
- bitvec_set_uint(&bv, si13->pbcch.tn, 3);
- switch (si13->pbcch.carrier_type) {
- case PBCCH_BCCH:
- bitvec_set_bit(&bv, 0);
- bitvec_set_bit(&bv, 0);
- break;
- case PBCCH_ARFCN:
- bitvec_set_bit(&bv, 0);
- bitvec_set_bit(&bv, 1);
- bitvec_set_uint(&bv, si13->pbcch.arfcn, 10);
- break;
- case PBCCH_MAIO:
- bitvec_set_bit(&bv, 1);
- bitvec_set_uint(&bv, si13->pbcch.maio, 6);
- break;
- }
- }
- /* 3GPP TS 44.018 Release 6 / 10.5.2.37b */
- bitvec_set_bit(&bv, H); /* added Release 99 */
- /* claim our SGSN is compatible with Release 99, as EDGE and EGPRS
- * was only added in this Release */
- bitvec_set_bit(&bv, 1);
- }
- bitvec_spare_padding(&bv, (bv.data_len*8)-1);
- return bv.data_len;
-}
diff --git a/src/libbsc/system_information.c b/src/libbsc/system_information.c
deleted file mode 100644
index dcabbbdd1..000000000
--- a/src/libbsc/system_information.c
+++ /dev/null
@@ -1,1169 +0,0 @@
-/* GSM 04.08 System Information (SI) encoding and decoding
- * 3GPP TS 04.08 version 7.21.0 Release 1998 / ETSI TS 100 940 V7.21.0 */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2012 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/>.
- *
- */
-
-#include <errno.h>
-#include <string.h>
-#include <stdio.h>
-#include <netinet/in.h>
-#include <stdbool.h>
-
-#include <osmocom/core/bitvec.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/sysinfo.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/rest_octets.h>
-#include <openbsc/arfcn_range_encode.h>
-
-/*
- * DCS1800 and PCS1900 have overlapping ARFCNs. We would need to set the
- * ARFCN_PCS flag on the 1900 ARFCNs but this would increase cell_alloc
- * and other arrays to make sure (ARFCN_PCS + 1024)/8 ARFCNs fit into the
- * array. DCS1800 and PCS1900 can not be used at the same time so conserve
- * memory and do the below.
- */
-static int band_compatible(const struct gsm_bts *bts, int arfcn)
-{
- enum gsm_band band = gsm_arfcn2band(arfcn);
-
- /* normal case */
- if (band == bts->band)
- return 1;
- /* deal with ARFCN_PCS not set */
- if (band == GSM_BAND_1800 && bts->band == GSM_BAND_1900)
- return 1;
-
- return 0;
-}
-
-static int is_dcs_net(const struct gsm_bts *bts)
-{
- if (bts->band == GSM_BAND_850)
- return 0;
- if (bts->band == GSM_BAND_1900)
- return 0;
- return 1;
-}
-
-/* Return p(n) for given NR_OF_TDD_CELLS - see Table 9.1.54.1a, 3GPP TS 44.018 */
-unsigned range1024_p(unsigned n)
-{
- switch (n) {
- case 0: return 0;
- case 1: return 10;
- case 2: return 19;
- case 3: return 28;
- case 4: return 36;
- case 5: return 44;
- case 6: return 52;
- case 7: return 60;
- case 8: return 67;
- case 9: return 74;
- case 10: return 81;
- case 11: return 88;
- case 12: return 95;
- case 13: return 102;
- case 14: return 109;
- case 15: return 116;
- case 16: return 122;
- default: return 0;
- }
-}
-
-/* Return q(m) for given NR_OF_TDD_CELLS - see Table 9.1.54.1b, 3GPP TS 44.018 */
-unsigned range512_q(unsigned m)
-{
- switch (m) {
- case 0: return 0;
- case 1: return 9;
- case 2: return 17;
- case 3: return 25;
- case 4: return 32;
- case 5: return 39;
- case 6: return 46;
- case 7: return 53;
- case 8: return 59;
- case 9: return 65;
- case 10: return 71;
- case 11: return 77;
- case 12: return 83;
- case 13: return 89;
- case 14: return 95;
- case 15: return 101;
- case 16: return 106;
- case 17: return 111;
- case 18: return 116;
- case 19: return 121;
- case 20: return 126;
- default: return 0;
- }
-}
-
-size_t si2q_earfcn_count(const struct osmo_earfcn_si2q *e)
-{
- unsigned i, ret = 0;
-
- if (!e)
- return 0;
-
- for (i = 0; i < e->length; i++)
- if (e->arfcn[i] != OSMO_EARFCN_INVALID)
- ret++;
-
- return ret;
-}
-
-/* generate SI2quater messages, return rest octets length of last generated message or negative error code */
-static int make_si2quaters(struct gsm_bts *bts, bool counting)
-{
- int rc;
- bool memory_exceeded = true;
- struct gsm48_system_information_type_2quater *si2q;
-
- for (bts->si2q_index = 0; bts->si2q_index < SI2Q_MAX_NUM; bts->si2q_index++) {
- si2q = GSM_BTS_SI2Q(bts, bts->si2q_index);
- if (counting) { /* that's legitimate if we're called for counting purpose: */
- if (bts->si2q_count < bts->si2q_index)
- bts->si2q_count = bts->si2q_index;
- } else {
- memset(si2q, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si2q->header.l2_plen = GSM48_LEN2PLEN(22);
- si2q->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si2q->header.skip_indicator = 0;
- si2q->header.system_information = GSM48_MT_RR_SYSINFO_2quater;
- }
-
- rc = rest_octets_si2quater(si2q->rest_octets, bts);
- if (rc < 0)
- return rc;
-
- if (bts->u_offset >= bts->si_common.uarfcn_length &&
- bts->e_offset >= si2q_earfcn_count(&bts->si_common.si2quater_neigh_list)) {
- memory_exceeded = false;
- break;
- }
- }
-
- if (memory_exceeded)
- return -ENOMEM;
-
- return rc;
-}
-
-/* we generate SI2q rest octets twice to get proper estimation but it's one time cost anyway */
-uint8_t si2q_num(struct gsm_bts *bts)
-{
- int rc = make_si2quaters(bts, true);
- uint8_t num = bts->si2q_index + 1; /* number of SI2quater messages */
-
- /* N. B: si2q_num() should NEVER be called during actualSI2q rest octets generation
- we're not re-entrant because of the following code: */
- bts->u_offset = 0;
- bts->e_offset = 0;
-
- if (rc < 0)
- return 0xFF; /* return impossible index as an indicator of error in generating SI2quater */
-
- return num;
-}
-
-/* 3GPP TS 44.018, Table 9.1.54.1 - prepend diversity bit to scrambling code */
-static inline uint16_t encode_fdd(uint16_t scramble, bool diversity)
-{
- if (diversity)
- return scramble | (1 << 9);
- return scramble;
-}
-
-int bts_earfcn_add(struct gsm_bts *bts, uint16_t earfcn, uint8_t thresh_hi, uint8_t thresh_lo, uint8_t prio,
- uint8_t qrx, uint8_t meas_bw)
-{
- struct osmo_earfcn_si2q *e = &bts->si_common.si2quater_neigh_list;
- int r = osmo_earfcn_add(e, earfcn, (meas_bw < EARFCN_MEAS_BW_INVALID) ? meas_bw : OSMO_EARFCN_MEAS_INVALID);
-
- if (r < 0)
- return r;
-
- if (e->thresh_hi && thresh_hi != e->thresh_hi)
- r = 1;
-
- e->thresh_hi = thresh_hi;
-
- if (thresh_lo != EARFCN_THRESH_LOW_INVALID) {
- if (e->thresh_lo_valid && e->thresh_lo != thresh_lo)
- r = EARFCN_THRESH_LOW_INVALID;
- e->thresh_lo = thresh_lo;
- e->thresh_lo_valid = true;
- }
-
- if (qrx != EARFCN_QRXLV_INVALID) {
- if (e->qrxlm_valid && e->qrxlm != qrx)
- r = EARFCN_QRXLV_INVALID + 1;
- e->qrxlm = qrx;
- e->qrxlm_valid = true;
- }
-
- if (prio != EARFCN_PRIO_INVALID) {
- if (e->prio_valid && e->prio != prio)
- r = EARFCN_PRIO_INVALID;
- e->prio = prio;
- e->prio_valid = true;
- }
-
- return r;
-}
-
-int bts_uarfcn_del(struct gsm_bts *bts, uint16_t arfcn, uint16_t scramble)
-{
- uint16_t sc0 = encode_fdd(scramble, false), sc1 = encode_fdd(scramble, true),
- *ual = bts->si_common.data.uarfcn_list,
- *scl = bts->si_common.data.scramble_list;
- size_t len = bts->si_common.uarfcn_length, i;
- for (i = 0; i < len; i++) {
- if (arfcn == ual[i] && (sc0 == scl[i] || sc1 == scl[i])) {
- /* we rely on the assumption that (uarfcn, scramble)
- tuple is unique in the lists */
- if (i != len - 1) { /* move the tail if necessary */
- memmove(ual + i, ual + i + 1, 2 * (len - i + 1));
- memmove(scl + i, scl + i + 1, 2 * (len - i + 1));
- }
- break;
- }
- }
-
- if (i == len)
- return -EINVAL;
-
- bts->si_common.uarfcn_length--;
- return 0;
-}
-
-int bts_uarfcn_add(struct gsm_bts *bts, uint16_t arfcn, uint16_t scramble, bool diversity)
-{
- size_t len = bts->si_common.uarfcn_length, i, k = 0;
- uint16_t scr, chk,
- *ual = bts->si_common.data.uarfcn_list,
- *scl = bts->si_common.data.scramble_list,
- scramble1 = encode_fdd(scramble, true),
- scramble0 = encode_fdd(scramble, false);
-
- scr = diversity ? scramble1 : scramble0;
- chk = diversity ? scramble0 : scramble1;
-
- if (len == MAX_EARFCN_LIST)
- return -ENOMEM;
-
- for (i = 0; i < len; i++) /* find the position of arfcn if any */
- if (arfcn == ual[i])
- break;
-
- for (k = 0; i < len; i++) {
- if (arfcn == ual[i] && (scr == scl[i] || chk == scl[i]))
- return -EADDRINUSE;
- if (scr > scl[i])
- k = i + 1;
- }
- /* we keep lists sorted by scramble code:
- insert into appropriate position and move the tail */
- if (len - k) {
- memmove(ual + k + 1, ual + k, (len - k) * 2);
- memmove(scl + k + 1, scl + k, (len - k) * 2);
- }
-
- ual[k] = arfcn;
- scl[k] = scr;
- bts->si_common.uarfcn_length++;
-
- if (si2q_num(bts) <= SI2Q_MAX_NUM) {
- bts->si2q_count = si2q_num(bts) - 1;
- return 0;
- }
-
- bts_uarfcn_del(bts, arfcn, scramble);
- return -ENOSPC;
-}
-
-static inline int use_arfcn(const struct gsm_bts *bts, const bool bis, const bool ter,
- const bool pgsm, const int arfcn)
-{
- if (bts->force_combined_si)
- return !bis && !ter;
- if (!bis && !ter && band_compatible(bts, arfcn))
- return 1;
- /* Correct but somehow broken with either the nanoBTS or the iPhone5 */
- if (bis && pgsm && band_compatible(bts, arfcn) && (arfcn < 1 || arfcn > 124))
- return 1;
- if (ter && !band_compatible(bts, arfcn))
- return 1;
- return 0;
-}
-
-/* Frequency Lists as per TS 04.08 10.5.2.13 */
-
-/* 10.5.2.13.2: Bit map 0 format */
-static int freq_list_bm0_set_arfcn(uint8_t *chan_list, unsigned int arfcn)
-{
- unsigned int byte, bit;
-
- if (arfcn > 124 || arfcn < 1) {
- LOGP(DRR, LOGL_ERROR, "Bitmap 0 only supports ARFCN 1...124\n");
- return -EINVAL;
- }
-
- /* the bitmask is from 1..124, not from 0..123 */
- arfcn--;
-
- byte = arfcn / 8;
- bit = arfcn % 8;
-
- chan_list[GSM48_CELL_CHAN_DESC_SIZE-1-byte] |= (1 << bit);
-
- return 0;
-}
-
-/* 10.5.2.13.7: Variable bit map format */
-static int freq_list_bmrel_set_arfcn(uint8_t *chan_list, unsigned int arfcn)
-{
- unsigned int byte, bit;
- unsigned int min_arfcn;
- unsigned int bitno;
-
- min_arfcn = (chan_list[0] & 1) << 9;
- min_arfcn |= chan_list[1] << 1;
- min_arfcn |= (chan_list[2] >> 7) & 1;
-
- /* The lower end of our bitmaks is always implicitly included */
- if (arfcn == min_arfcn)
- return 0;
-
- if (((arfcn - min_arfcn) & 1023) > 111) {
- LOGP(DRR, LOGL_ERROR, "arfcn(%u) > min(%u) + 111\n", arfcn, min_arfcn);
- return -EINVAL;
- }
-
- bitno = (arfcn - min_arfcn) & 1023;
- byte = bitno / 8;
- bit = bitno % 8;
-
- chan_list[2 + byte] |= 1 << (7 - bit);
-
- return 0;
-}
-
-/* generate a variable bitmap */
-static inline int enc_freq_lst_var_bitmap(uint8_t *chan_list,
- struct bitvec *bv, const struct gsm_bts *bts,
- bool bis, bool ter, int min, bool pgsm)
-{
- int i;
-
- /* set it to 'Variable bitmap format' */
- chan_list[0] = 0x8e;
-
- chan_list[0] |= (min >> 9) & 1;
- chan_list[1] = (min >> 1);
- chan_list[2] = (min & 1) << 7;
-
- for (i = 0; i < bv->data_len*8; i++) {
- /* see notes in bitvec2freq_list */
- if (bitvec_get_bit_pos(bv, i)
- && ((!bis && !ter && band_compatible(bts,i))
- || (bis && pgsm && band_compatible(bts,i) && (i < 1 || i > 124))
- || (ter && !band_compatible(bts, i)))) {
- int rc = freq_list_bmrel_set_arfcn(chan_list, i);
- if (rc < 0)
- return rc;
- }
- }
-
- return 0;
-}
-
-int range_encode(enum gsm48_range r, int *arfcns, int arfcns_used, int *w,
- int f0, uint8_t *chan_list)
-{
- /*
- * Manipulate the ARFCN list according to the rules in J4 depending
- * on the selected range.
- */
- int rc, f0_included;
-
- range_enc_filter_arfcns(arfcns, arfcns_used, f0, &f0_included);
-
- rc = range_enc_arfcns(r, arfcns, arfcns_used, w, 0);
- if (rc < 0)
- return rc;
-
- /* Select the range and the amount of bits needed */
- switch (r) {
- case ARFCN_RANGE_128:
- return range_enc_range128(chan_list, f0, w);
- case ARFCN_RANGE_256:
- return range_enc_range256(chan_list, f0, w);
- case ARFCN_RANGE_512:
- return range_enc_range512(chan_list, f0, w);
- case ARFCN_RANGE_1024:
- return range_enc_range1024(chan_list, f0, f0_included, w);
- default:
- return -ERANGE;
- };
-
- return f0_included;
-}
-
-/* generate a frequency list with the range 512 format */
-static inline int enc_freq_lst_range(uint8_t *chan_list,
- struct bitvec *bv, const struct gsm_bts *bts,
- bool bis, bool ter, bool pgsm)
-{
- int arfcns[RANGE_ENC_MAX_ARFCNS];
- int w[RANGE_ENC_MAX_ARFCNS];
- int arfcns_used = 0;
- int i, range, f0;
-
- /*
- * Select ARFCNs according to the rules in bitvec2freq_list
- */
- for (i = 0; i < bv->data_len * 8; ++i) {
- /* More ARFCNs than the maximum */
- if (arfcns_used > ARRAY_SIZE(arfcns))
- return -1;
- /* Check if we can select it? */
- if (bitvec_get_bit_pos(bv, i) && use_arfcn(bts, bis, ter, pgsm, i))
- arfcns[arfcns_used++] = i;
- }
-
- /*
- * Check if the given list of ARFCNs can be encoded.
- */
- range = range_enc_determine_range(arfcns, arfcns_used, &f0);
- if (range == ARFCN_RANGE_INVALID)
- return -2;
-
- memset(w, 0, sizeof(w));
- return range_encode(range, arfcns, arfcns_used, w, f0, chan_list);
-}
-
-/* generate a cell channel list as per Section 10.5.2.1b of 04.08 */
-static int bitvec2freq_list(uint8_t *chan_list, struct bitvec *bv,
- const struct gsm_bts *bts, bool bis, bool ter)
-{
- int i, rc, min = -1, max = -1, arfcns = 0;
- bool pgsm = false;
- memset(chan_list, 0, 16);
-
- if (bts->band == GSM_BAND_900
- && bts->c0->arfcn >= 1 && bts->c0->arfcn <= 124)
- pgsm = true;
- /* P-GSM-only handsets only support 'bit map 0 format' */
- if (!bis && !ter && pgsm) {
- chan_list[0] = 0;
-
- for (i = 0; i < bv->data_len*8; i++) {
- if (i >= 1 && i <= 124
- && bitvec_get_bit_pos(bv, i)) {
- rc = freq_list_bm0_set_arfcn(chan_list, i);
- if (rc < 0)
- return rc;
- }
- }
- return 0;
- }
-
- for (i = 0; i < bv->data_len*8; i++) {
- /* in case of SI2 or SI5 allow all neighbours in same band
- * in case of SI*bis, allow neighbours in same band ouside pgsm
- * in case of SI*ter, allow neighbours in different bands
- */
- if (!bitvec_get_bit_pos(bv, i))
- continue;
- if (!use_arfcn(bts, bis, ter, pgsm, i))
- continue;
- /* count the arfcns we want to carry */
- arfcns += 1;
-
- /* 955..1023 < 0..885 */
- if (min < 0)
- min = i;
- if (i >= 955 && min < 955)
- min = i;
- if (i >= 955 && min >= 955 && i < min)
- min = i;
- if (i < 955 && min < 955 && i < min)
- min = i;
- if (max < 0)
- max = i;
- if (i < 955 && max >= 955)
- max = i;
- if (i >= 955 && max >= 955 && i > max)
- max = i;
- if (i < 955 && max < 955 && i > max)
- max = i;
- }
-
- if (max == -1) {
- /* Empty set, use 'bit map 0 format' */
- chan_list[0] = 0;
- return 0;
- }
-
- /* Now find the best encoding */
- if (((max - min) & 1023) <= 111)
- return enc_freq_lst_var_bitmap(chan_list, bv, bts, bis,
- ter, min, pgsm);
-
- /* Attempt to do the range encoding */
- rc = enc_freq_lst_range(chan_list, bv, bts, bis, ter, pgsm);
- if (rc >= 0)
- return 0;
-
- LOGP(DRR, LOGL_ERROR, "min_arfcn=%u, max_arfcn=%u, arfcns=%d "
- "can not generate ARFCN list", min, max, arfcns);
- return -EINVAL;
-}
-
-/* generate a cell channel list as per Section 10.5.2.1b of 04.08 */
-/* static*/ int generate_cell_chan_list(uint8_t *chan_list, struct gsm_bts *bts)
-{
- struct gsm_bts_trx *trx;
- struct bitvec *bv = &bts->si_common.cell_alloc;
-
- /* Zero-initialize the bit-vector */
- memset(bv->data, 0, bv->data_len);
-
- /* first we generate a bitvec of all TRX ARFCN's in our BTS */
- llist_for_each_entry(trx, &bts->trx_list, list) {
- unsigned int i, j;
- /* Always add the TRX's ARFCN */
- bitvec_set_bit_pos(bv, trx->arfcn, 1);
- for (i = 0; i < ARRAY_SIZE(trx->ts); i++) {
- struct gsm_bts_trx_ts *ts = &trx->ts[i];
- /* Add any ARFCNs present in hopping channels */
- for (j = 0; j < 1024; j++) {
- if (bitvec_get_bit_pos(&ts->hopping.arfcns, j))
- bitvec_set_bit_pos(bv, j, 1);
- }
- }
- }
-
- /* then we generate a GSM 04.08 frequency list from the bitvec */
- return bitvec2freq_list(chan_list, bv, bts, false, false);
-}
-
-/* generate a cell channel list as per Section 10.5.2.1b of 04.08 */
-static int generate_bcch_chan_list(uint8_t *chan_list, struct gsm_bts *bts,
- bool si5, bool bis, bool ter)
-{
- struct gsm_bts *cur_bts;
- struct bitvec *bv;
-
- if (si5 && bts->neigh_list_manual_mode == NL_MODE_MANUAL_SI5SEP)
- bv = &bts->si_common.si5_neigh_list;
- else
- bv = &bts->si_common.neigh_list;
-
- /* Generate list of neighbor cells if we are in automatic mode */
- if (bts->neigh_list_manual_mode == NL_MODE_AUTOMATIC) {
- /* Zero-initialize the bit-vector */
- memset(bv->data, 0, bv->data_len);
-
- /* first we generate a bitvec of the BCCH ARFCN's in our BSC */
- llist_for_each_entry(cur_bts, &bts->network->bts_list, list) {
- if (cur_bts == bts)
- continue;
- bitvec_set_bit_pos(bv, cur_bts->c0->arfcn, 1);
- }
- }
-
- /* then we generate a GSM 04.08 frequency list from the bitvec */
- return bitvec2freq_list(chan_list, bv, bts, bis, ter);
-}
-
-static int list_arfcn(uint8_t *chan_list, uint8_t mask, char *text)
-{
- int n = 0, i;
- struct gsm_sysinfo_freq freq[1024];
-
- memset(freq, 0, sizeof(freq));
- gsm48_decode_freq_list(freq, chan_list, 16, 0xce, 1);
- for (i = 0; i < 1024; i++) {
- if (freq[i].mask) {
- if (!n)
- LOGP(DRR, LOGL_INFO, "%s", text);
- LOGPC(DRR, LOGL_INFO, " %d", i);
- n++;
- }
- }
- if (n)
- LOGPC(DRR, LOGL_INFO, "\n");
-
- return n;
-}
-
-static int generate_si1(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_1 *si1 = (struct gsm48_system_information_type_1 *) GSM_BTS_SI(bts, t);
-
- memset(si1, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si1->header.l2_plen = GSM48_LEN2PLEN(21);
- si1->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si1->header.skip_indicator = 0;
- si1->header.system_information = GSM48_MT_RR_SYSINFO_1;
-
- rc = generate_cell_chan_list(si1->cell_channel_description, bts);
- if (rc < 0)
- return rc;
- list_arfcn(si1->cell_channel_description, 0xce, "Serving cell:");
-
- si1->rach_control = bts->si_common.rach_control;
-
- /*
- * SI1 Rest Octets (10.5.2.32), contains NCH position and band
- * indicator but that is not in the 04.08.
- */
- rc = rest_octets_si1(si1->rest_octets, NULL, is_dcs_net(bts));
-
- return sizeof(*si1) + rc;
-}
-
-static int generate_si2(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_2 *si2 = (struct gsm48_system_information_type_2 *) GSM_BTS_SI(bts, t);
-
- memset(si2, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si2->header.l2_plen = GSM48_LEN2PLEN(22);
- si2->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si2->header.skip_indicator = 0;
- si2->header.system_information = GSM48_MT_RR_SYSINFO_2;
-
- rc = generate_bcch_chan_list(si2->bcch_frequency_list, bts, false, false, false);
- if (rc < 0)
- return rc;
- list_arfcn(si2->bcch_frequency_list, 0xce,
- "SI2 Neighbour cells in same band:");
-
- si2->ncc_permitted = bts->si_common.ncc_permitted;
- si2->rach_control = bts->si_common.rach_control;
-
- return sizeof(*si2);
-}
-
-static int generate_si2bis(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_2bis *si2b =
- (struct gsm48_system_information_type_2bis *) GSM_BTS_SI(bts, t);
- int n;
-
- memset(si2b, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si2b->header.l2_plen = GSM48_LEN2PLEN(22);
- si2b->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si2b->header.skip_indicator = 0;
- si2b->header.system_information = GSM48_MT_RR_SYSINFO_2bis;
-
- rc = generate_bcch_chan_list(si2b->bcch_frequency_list, bts, false, true, false);
- if (rc < 0)
- return rc;
- n = list_arfcn(si2b->bcch_frequency_list, 0xce,
- "Neighbour cells in same band, but outside P-GSM:");
- if (n) {
- /* indicate in SI2 and SI2bis: there is an extension */
- struct gsm48_system_information_type_2 *si2 =
- (struct gsm48_system_information_type_2 *) GSM_BTS_SI(bts, SYSINFO_TYPE_2);
- si2->bcch_frequency_list[0] |= 0x20;
- si2b->bcch_frequency_list[0] |= 0x20;
- } else
- bts->si_valid &= ~(1 << SYSINFO_TYPE_2bis);
-
- si2b->rach_control = bts->si_common.rach_control;
-
- return sizeof(*si2b);
-}
-
-static int generate_si2ter(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_2ter *si2t =
- (struct gsm48_system_information_type_2ter *) GSM_BTS_SI(bts, t);
- int n;
-
- memset(si2t, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si2t->header.l2_plen = GSM48_LEN2PLEN(22);
- si2t->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si2t->header.skip_indicator = 0;
- si2t->header.system_information = GSM48_MT_RR_SYSINFO_2ter;
-
- rc = generate_bcch_chan_list(si2t->ext_bcch_frequency_list, bts, false, false, true);
- if (rc < 0)
- return rc;
- n = list_arfcn(si2t->ext_bcch_frequency_list, 0x8e,
- "Neighbour cells in different band:");
- if (!n)
- bts->si_valid &= ~(1 << SYSINFO_TYPE_2ter);
-
- return sizeof(*si2t);
-}
-
-/* SI2quater messages are optional - we only generate them when neighbor UARFCNs or EARFCNs are configured */
-static inline bool si2quater_not_needed(struct gsm_bts *bts)
-{
- unsigned i = MAX_EARFCN_LIST;
-
- if (bts->si_common.si2quater_neigh_list.arfcn)
- for (i = 0; i < MAX_EARFCN_LIST; i++)
- if (bts->si_common.si2quater_neigh_list.arfcn[i] != OSMO_EARFCN_INVALID)
- break;
-
- if (!bts->si_common.uarfcn_length && i == MAX_EARFCN_LIST) {
- bts->si_valid &= ~(1 << SYSINFO_TYPE_2quater); /* mark SI2q as invalid if no (E|U)ARFCNs are present */
- return true;
- }
-
- return false;
-}
-
-static int generate_si2quater(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_2quater *si2q;
-
- if (si2quater_not_needed(bts)) /* generate rest_octets for SI2q only when necessary */
- return GSM_MACBLOCK_LEN;
-
- bts->u_offset = 0;
- bts->e_offset = 0;
- bts->si2q_index = 0;
- bts->si2q_count = si2q_num(bts) - 1;
-
- rc = make_si2quaters(bts, false);
- if (rc < 0)
- return rc;
-
- OSMO_ASSERT(bts->si2q_count == bts->si2q_index);
- OSMO_ASSERT(bts->si2q_count <= SI2Q_MAX_NUM);
-
- return sizeof(*si2q) + rc;
-}
-
-static struct gsm48_si_ro_info si_info = {
- .selection_params = {
- .present = 0,
- },
- .power_offset = {
- .present = 0,
- },
- .si2ter_indicator = 0,
- .early_cm_ctrl = 1,
- .scheduling = {
- .present = 0,
- },
- .gprs_ind = {
- .si13_position = 0,
- .ra_colour = 0,
- .present = 1,
- },
- .si2quater_indicator = 0,
- .lsa_params = {
- .present = 0,
- },
- .cell_id = 0, /* FIXME: doesn't the bts have this? */
- .break_ind = 0,
-};
-
-static int generate_si3(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_3 *si3 = (struct gsm48_system_information_type_3 *) GSM_BTS_SI(bts, t);
-
- memset(si3, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si3->header.l2_plen = GSM48_LEN2PLEN(18);
- si3->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si3->header.skip_indicator = 0;
- si3->header.system_information = GSM48_MT_RR_SYSINFO_3;
-
- si3->cell_identity = htons(bts->cell_identity);
- gsm48_generate_lai(&si3->lai, bts->network->country_code,
- bts->network->network_code,
- bts->location_area_code);
- si3->control_channel_desc = bts->si_common.chan_desc;
- si3->cell_options = bts->si_common.cell_options;
- si3->cell_sel_par = bts->si_common.cell_sel_par;
- si3->rach_control = bts->si_common.rach_control;
-
- /* allow/disallow DTXu */
- gsm48_set_dtx(&si3->cell_options, bts->dtxu, bts->dtxu, true);
-
- if (GSM_BTS_HAS_SI(bts, SYSINFO_TYPE_2ter)) {
- LOGP(DRR, LOGL_INFO, "SI 2ter is included.\n");
- si_info.si2ter_indicator = 1;
- } else {
- si_info.si2ter_indicator = 0;
- }
- if (GSM_BTS_HAS_SI(bts, SYSINFO_TYPE_2quater)) {
- LOGP(DRR, LOGL_INFO, "SI 2quater is included, based on %zu EARFCNs and %zu UARFCNs.\n",
- si2q_earfcn_count(&bts->si_common.si2quater_neigh_list), bts->si_common.uarfcn_length);
- si_info.si2quater_indicator = 1;
- } else {
- si_info.si2quater_indicator = 0;
- }
- si_info.early_cm_ctrl = bts->early_classmark_allowed;
-
- /* SI3 Rest Octets (10.5.2.34), containing
- CBQ, CELL_RESELECT_OFFSET, TEMPORARY_OFFSET, PENALTY_TIME
- Power Offset, 2ter Indicator, Early Classmark Sending,
- Scheduling if and WHERE, GPRS Indicator, SI13 position */
- rc = rest_octets_si3(si3->rest_octets, &si_info);
-
- return sizeof(*si3) + rc;
-}
-
-static int generate_si4(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- int rc;
- struct gsm48_system_information_type_4 *si4 = (struct gsm48_system_information_type_4 *) GSM_BTS_SI(bts, t);
- struct gsm_lchan *cbch_lchan;
- uint8_t *restoct = si4->data;
-
- /* length of all IEs present except SI4 rest octets and l2_plen */
- int l2_plen = sizeof(*si4) - 1;
-
- memset(si4, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si4->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si4->header.skip_indicator = 0;
- si4->header.system_information = GSM48_MT_RR_SYSINFO_4;
-
- gsm48_generate_lai(&si4->lai, bts->network->country_code,
- bts->network->network_code,
- bts->location_area_code);
- si4->cell_sel_par = bts->si_common.cell_sel_par;
- si4->rach_control = bts->si_common.rach_control;
-
- /* Optional: CBCH Channel Description + CBCH Mobile Allocation */
- cbch_lchan = gsm_bts_get_cbch(bts);
- if (cbch_lchan) {
- struct gsm48_chan_desc cd;
- gsm48_lchan2chan_desc(&cd, cbch_lchan);
- tv_fixed_put(si4->data, GSM48_IE_CBCH_CHAN_DESC, 3,
- (uint8_t *) &cd);
- l2_plen += 3 + 1;
- restoct += 3 + 1;
- /* we don't use hopping and thus don't need a CBCH MA */
- }
-
- si4->header.l2_plen = GSM48_LEN2PLEN(l2_plen);
-
- /* SI4 Rest Octets (10.5.2.35), containing
- Optional Power offset, GPRS Indicator,
- Cell Identity, LSA ID, Selection Parameter */
- rc = rest_octets_si4(restoct, &si_info, (uint8_t *)GSM_BTS_SI(bts, t) + GSM_MACBLOCK_LEN - restoct);
-
- return l2_plen + 1 + rc;
-}
-
-static int generate_si5(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- struct gsm48_system_information_type_5 *si5;
- uint8_t *output = GSM_BTS_SI(bts, t);
- int rc, l2_plen = 18;
-
- memset(output, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- /* ip.access nanoBTS needs l2_plen!! */
- switch (bts->type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- *output++ = GSM48_LEN2PLEN(l2_plen);
- l2_plen++;
- break;
- default:
- break;
- }
-
- si5 = (struct gsm48_system_information_type_5 *) GSM_BTS_SI(bts, t);
-
- /* l2 pseudo length, not part of msg: 18 */
- si5->rr_protocol_discriminator = GSM48_PDISC_RR;
- si5->skip_indicator = 0;
- si5->system_information = GSM48_MT_RR_SYSINFO_5;
- rc = generate_bcch_chan_list(si5->bcch_frequency_list, bts, true, false, false);
- if (rc < 0)
- return rc;
- list_arfcn(si5->bcch_frequency_list, 0xce,
- "SI5 Neighbour cells in same band:");
-
- /* 04.08 9.1.37: L2 Pseudo Length of 18 */
- return l2_plen;
-}
-
-static int generate_si5bis(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- struct gsm48_system_information_type_5bis *si5b;
- uint8_t *output = GSM_BTS_SI(bts, t);
- int rc, l2_plen = 18;
- int n;
-
- memset(output, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- /* ip.access nanoBTS needs l2_plen!! */
- switch (bts->type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- *output++ = GSM48_LEN2PLEN(l2_plen);
- l2_plen++;
- break;
- default:
- break;
- }
-
- si5b = (struct gsm48_system_information_type_5bis *) GSM_BTS_SI(bts, t);
-
- /* l2 pseudo length, not part of msg: 18 */
- si5b->rr_protocol_discriminator = GSM48_PDISC_RR;
- si5b->skip_indicator = 0;
- si5b->system_information = GSM48_MT_RR_SYSINFO_5bis;
- rc = generate_bcch_chan_list(si5b->bcch_frequency_list, bts, true, true, false);
- if (rc < 0)
- return rc;
- n = list_arfcn(si5b->bcch_frequency_list, 0xce,
- "Neighbour cells in same band, but outside P-GSM:");
- if (n) {
- /* indicate in SI5 and SI5bis: there is an extension */
- struct gsm48_system_information_type_5 *si5 =
- (struct gsm48_system_information_type_5 *) GSM_BTS_SI(bts, SYSINFO_TYPE_5);
- si5->bcch_frequency_list[0] |= 0x20;
- si5b->bcch_frequency_list[0] |= 0x20;
- } else
- bts->si_valid &= ~(1 << SYSINFO_TYPE_5bis);
-
- /* 04.08 9.1.37: L2 Pseudo Length of 18 */
- return l2_plen;
-}
-
-static int generate_si5ter(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- struct gsm48_system_information_type_5ter *si5t;
- uint8_t *output = GSM_BTS_SI(bts, t);
- int rc, l2_plen = 18;
- int n;
-
- memset(output, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- /* ip.access nanoBTS needs l2_plen!! */
- switch (bts->type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- *output++ = GSM48_LEN2PLEN(l2_plen);
- l2_plen++;
- break;
- default:
- break;
- }
-
- si5t = (struct gsm48_system_information_type_5ter *) GSM_BTS_SI(bts, t);
-
- /* l2 pseudo length, not part of msg: 18 */
- si5t->rr_protocol_discriminator = GSM48_PDISC_RR;
- si5t->skip_indicator = 0;
- si5t->system_information = GSM48_MT_RR_SYSINFO_5ter;
- rc = generate_bcch_chan_list(si5t->bcch_frequency_list, bts, true, false, true);
- if (rc < 0)
- return rc;
- n = list_arfcn(si5t->bcch_frequency_list, 0x8e,
- "Neighbour cells in different band:");
- if (!n)
- bts->si_valid &= ~(1 << SYSINFO_TYPE_5ter);
-
- /* 04.08 9.1.37: L2 Pseudo Length of 18 */
- return l2_plen;
-}
-
-static int generate_si6(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- struct gsm48_system_information_type_6 *si6;
- uint8_t *output = GSM_BTS_SI(bts, t);
- int l2_plen = 11;
- int rc;
-
- memset(output, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- /* ip.access nanoBTS needs l2_plen!! */
- switch (bts->type) {
- case GSM_BTS_TYPE_NANOBTS:
- case GSM_BTS_TYPE_OSMOBTS:
- *output++ = GSM48_LEN2PLEN(l2_plen);
- l2_plen++;
- break;
- default:
- break;
- }
-
- si6 = (struct gsm48_system_information_type_6 *) GSM_BTS_SI(bts, t);
-
- /* l2 pseudo length, not part of msg: 11 */
- si6->rr_protocol_discriminator = GSM48_PDISC_RR;
- si6->skip_indicator = 0;
- si6->system_information = GSM48_MT_RR_SYSINFO_6;
- si6->cell_identity = htons(bts->cell_identity);
- gsm48_generate_lai(&si6->lai, bts->network->country_code,
- bts->network->network_code,
- bts->location_area_code);
- si6->cell_options = bts->si_common.cell_options;
- si6->ncc_permitted = bts->si_common.ncc_permitted;
- /* allow/disallow DTXu */
- gsm48_set_dtx(&si6->cell_options, bts->dtxu, bts->dtxu, false);
-
- /* SI6 Rest Octets: 10.5.2.35a: PCH / NCH info, VBS/VGCS options */
- rc = rest_octets_si6(si6->rest_octets, is_dcs_net(bts));
-
- return l2_plen + rc;
-}
-
-static struct gsm48_si13_info si13_default = {
- .cell_opts = {
- .nmo = GPRS_NMO_II,
- .t3168 = 2000,
- .t3192 = 1500,
- .drx_timer_max = 3,
- .bs_cv_max = 15,
- .ctrl_ack_type_use_block = true,
- .ext_info_present = 0,
- .supports_egprs_11bit_rach = 0,
- .ext_info = {
- /* The values below are just guesses ! */
- .egprs_supported = 0,
- .use_egprs_p_ch_req = 1,
- .bep_period = 5,
- .pfc_supported = 0,
- .dtm_supported = 0,
- .bss_paging_coordination = 0,
- },
- },
- .pwr_ctrl_pars = {
- .alpha = 0, /* a = 0.0 */
- .t_avg_w = 16,
- .t_avg_t = 16,
- .pc_meas_chan = 0, /* downling measured on CCCH */
- .n_avg_i = 8,
- },
- .bcch_change_mark = 1,
- .si_change_field = 0,
- .pbcch_present = 0,
- {
- .no_pbcch = {
- .rac = 0, /* needs to be patched */
- .spgc_ccch_sup = 0,
- .net_ctrl_ord = 0,
- .prio_acc_thr = 6,
- },
- },
-};
-
-static int generate_si13(enum osmo_sysinfo_type t, struct gsm_bts *bts)
-{
- struct gsm48_system_information_type_13 *si13 =
- (struct gsm48_system_information_type_13 *) GSM_BTS_SI(bts, t);
- int ret;
-
- memset(si13, GSM_MACBLOCK_PADDING, GSM_MACBLOCK_LEN);
-
- si13->header.rr_protocol_discriminator = GSM48_PDISC_RR;
- si13->header.skip_indicator = 0;
- si13->header.system_information = GSM48_MT_RR_SYSINFO_13;
-
- si13_default.no_pbcch.rac = bts->gprs.rac;
- si13_default.no_pbcch.net_ctrl_ord = bts->gprs.net_ctrl_ord;
-
- si13_default.cell_opts.ctrl_ack_type_use_block =
- bts->gprs.ctrl_ack_type_use_block;
-
- /* Information about the other SIs */
- si13_default.bcch_change_mark = bts->bcch_change_mark;
- si13_default.cell_opts.supports_egprs_11bit_rach =
- bts->gprs.supports_egprs_11bit_rach;
-
- ret = rest_octets_si13(si13->rest_octets, &si13_default);
- if (ret < 0)
- return ret;
-
- /* length is coded in bit 2 an up */
- si13->header.l2_plen = 0x01;
-
- return sizeof (*si13) + ret;
-}
-
-typedef int (*gen_si_fn_t)(enum osmo_sysinfo_type t, struct gsm_bts *bts);
-
-static const gen_si_fn_t gen_si_fn[_MAX_SYSINFO_TYPE] = {
- [SYSINFO_TYPE_1] = &generate_si1,
- [SYSINFO_TYPE_2] = &generate_si2,
- [SYSINFO_TYPE_2bis] = &generate_si2bis,
- [SYSINFO_TYPE_2ter] = &generate_si2ter,
- [SYSINFO_TYPE_2quater] = &generate_si2quater,
- [SYSINFO_TYPE_3] = &generate_si3,
- [SYSINFO_TYPE_4] = &generate_si4,
- [SYSINFO_TYPE_5] = &generate_si5,
- [SYSINFO_TYPE_5bis] = &generate_si5bis,
- [SYSINFO_TYPE_5ter] = &generate_si5ter,
- [SYSINFO_TYPE_6] = &generate_si6,
- [SYSINFO_TYPE_13] = &generate_si13,
-};
-
-int gsm_generate_si(struct gsm_bts *bts, enum osmo_sysinfo_type si_type)
-{
- gen_si_fn_t gen_si;
-
- switch (bts->gprs.mode) {
- case BTS_GPRS_EGPRS:
- si13_default.cell_opts.ext_info_present = 1;
- si13_default.cell_opts.ext_info.egprs_supported = 1;
- /* fallthrough */
- case BTS_GPRS_GPRS:
- si_info.gprs_ind.present = 1;
- break;
- case BTS_GPRS_NONE:
- si_info.gprs_ind.present = 0;
- break;
- }
-
- memcpy(&si_info.selection_params,
- &bts->si_common.cell_ro_sel_par,
- sizeof(struct gsm48_si_selection_params));
-
- gen_si = gen_si_fn[si_type];
- if (!gen_si)
- return -EINVAL;
-
- return gen_si(si_type, bts);
-}
diff --git a/src/libcommon-cs/Makefile.am b/src/libcommon-cs/Makefile.am
deleted file mode 100644
index 21c27455d..000000000
--- a/src/libcommon-cs/Makefile.am
+++ /dev/null
@@ -1,21 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-noinst_LIBRARIES = libcommon-cs.a
-
-libcommon_cs_a_SOURCES = \
- a_reset.c \
- common_cs.c \
- common_cs_vty.c
diff --git a/src/libcommon-cs/a_reset.c b/src/libcommon-cs/a_reset.c
deleted file mode 100644
index c0294c797..000000000
--- a/src/libcommon-cs/a_reset.c
+++ /dev/null
@@ -1,224 +0,0 @@
-/* (C) 2017 by sysmocom s.f.m.c. GmbH
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/logging.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/timer.h>
-#include <osmocom/core/fsm.h>
-#include <unistd.h>
-#include <errno.h>
-#include <string.h>
-#include <openbsc/debug.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-
-#define RESET_RESEND_INTERVAL 2 /* sec */
-#define RESET_RESEND_TIMER_NO 1234 /* FIXME: dig out the real timer number */
-#define BAD_CONNECTION_THRESOLD 3 /* connection failures */
-
-enum fsm_states {
- ST_DISC, /* Disconnected from remote end */
- ST_CONN, /* We have a confirmed connection */
-};
-
-static const struct value_string fsm_state_names[] = {
- {ST_DISC, "ST_DISC (disconnected)"},
- {ST_CONN, "ST_CONN (connected)"},
- {0, NULL},
-};
-
-enum fsm_evt {
- EV_RESET_ACK, /* got reset acknowlegement from remote end */
- EV_N_DISCONNECT, /* lost a connection */
- EV_N_CONNECT, /* made a successful connection */
-};
-
-static const struct value_string fsm_evt_names[] = {
- {EV_RESET_ACK, "EV_RESET_ACK"},
- {EV_N_DISCONNECT, "EV_N_DISCONNECT"},
- {EV_N_CONNECT, "EV_N_CONNECT"},
- {0, NULL},
-};
-
-/* Disconnected state */
-static void fsm_disc_cb(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct a_reset_ctx *reset = (struct a_reset_ctx *)data;
- OSMO_ASSERT(reset);
-
- LOGP(DMSC, LOGL_NOTICE, "(%s) fsm-state (msc-reset): %s, fsm-event: %s\n", reset->name,
- get_value_string(fsm_state_names, ST_CONN), get_value_string(fsm_evt_names, event));
-
- reset->conn_loss_counter = 0;
- osmo_fsm_inst_state_chg(fi, ST_CONN, 0, 0);
-}
-
-/* Connected state */
-static void fsm_conn_cb(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct a_reset_ctx *reset = (struct a_reset_ctx *)data;
- OSMO_ASSERT(reset);
-
- LOGP(DMSC, LOGL_NOTICE, "(%s) fsm-state (msc-reset): %s, fsm-event: %s\n", reset->name,
- get_value_string(fsm_state_names, ST_CONN), get_value_string(fsm_evt_names, event));
-
- switch (event) {
- case EV_N_DISCONNECT:
- if (reset->conn_loss_counter >= BAD_CONNECTION_THRESOLD) {
- LOGP(DMSC, LOGL_NOTICE, "(%s) SIGTRAN connection down, reconnecting...\n", reset->name);
- osmo_fsm_inst_state_chg(fi, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
- } else
- reset->conn_loss_counter++;
- break;
- case EV_N_CONNECT:
- reset->conn_loss_counter = 0;
- break;
- }
-}
-
-/* Timer callback to retransmit the reset signal */
-static int fsm_reset_ack_timeout_cb(struct osmo_fsm_inst *fi)
-{
- struct a_reset_ctx *reset = (struct a_reset_ctx *)fi->priv;
-
- LOGP(DMSC, LOGL_NOTICE, "(%s) reset-ack timeout (T%i) in state %s, resending...\n", reset->name, fi->T,
- get_value_string(fsm_state_names, fi->state));
-
- reset->cb(reset->priv);
-
- osmo_fsm_inst_state_chg(fi, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
- return 0;
-}
-
-static struct osmo_fsm_state fsm_states[] = {
- [ST_DISC] = {
- .in_event_mask = (1 << EV_RESET_ACK),
- .out_state_mask = (1 << ST_DISC) | (1 << ST_CONN),
- .name = "DISC",
- .action = fsm_disc_cb,
- },
- [ST_CONN] = {
- .in_event_mask = (1 << EV_N_DISCONNECT) | (1 << EV_N_CONNECT),
- .out_state_mask = (1 << ST_DISC) | (1 << ST_CONN),
- .name = "CONN",
- .action = fsm_conn_cb,
- },
-};
-
-/* State machine definition */
-static struct osmo_fsm fsm = {
- .name = "FSM RESET",
- .states = fsm_states,
- .num_states = ARRAY_SIZE(fsm_states),
- .log_subsys = DMSC,
- .timer_cb = fsm_reset_ack_timeout_cb,
-};
-
-/* Create and start state machine which handles the reset/reset-ack procedure */
-struct a_reset_ctx *a_reset_alloc(const void *ctx, const char *name, void *cb, void *priv)
-{
- OSMO_ASSERT(name);
-
- struct a_reset_ctx *reset;
-
- /* Register the fsm description (if not already done) */
- if (osmo_fsm_find_by_name(fsm.name) != &fsm)
- osmo_fsm_register(&fsm);
-
- /* Allocate and configure a new fsm instance */
- reset = talloc_zero(ctx, struct a_reset_ctx);
- OSMO_ASSERT(reset);
- reset->priv = priv;
- reset->cb = cb;
- strncpy(reset->name, name, sizeof(reset->name));
- reset->conn_loss_counter = 0;
- reset->fsm = osmo_fsm_inst_alloc(&fsm, NULL, NULL, LOGL_DEBUG, "FSM RESET INST");
- OSMO_ASSERT(reset->fsm);
- reset->fsm->priv = reset;
- LOGP(DMSC, LOGL_NOTICE, "(%s) reset handler fsm created.\n", reset->name);
-
- /* kick off reset-ack sending mechanism */
- osmo_fsm_inst_state_chg(reset->fsm, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
-
- return reset;
-}
-
-/* Tear down state machine */
-void a_reset_free(struct a_reset_ctx *reset)
-{
- OSMO_ASSERT(reset);
- OSMO_ASSERT(reset->fsm);
-
- osmo_fsm_inst_free(reset->fsm);
- reset->fsm = NULL;
-
- memset(reset, 0, sizeof(*reset));
- talloc_free(reset);
-
- LOGP(DMSC, LOGL_NOTICE, "(%s) reset handler fsm destroyed.\n", reset->name);
-}
-
-/* Confirm that we sucessfully received a reset acknowlege message */
-void a_reset_ack_confirm(struct a_reset_ctx *reset)
-{
- OSMO_ASSERT(reset);
- OSMO_ASSERT(reset->fsm);
-
- osmo_fsm_inst_dispatch(reset->fsm, EV_RESET_ACK, reset);
-}
-
-/* Report a failed connection */
-void a_reset_conn_fail(struct a_reset_ctx *reset)
-{
- /* If no reset context is supplied, just drop the info */
- if (!reset)
- return;
-
- OSMO_ASSERT(reset->fsm);
-
- osmo_fsm_inst_dispatch(reset->fsm, EV_N_DISCONNECT, reset);
-}
-
-/* Report a successful connection */
-void a_reset_conn_success(struct a_reset_ctx *reset)
-{
- /* If no reset context is supplied, just drop the info */
- if (!reset)
- return;
-
- OSMO_ASSERT(reset->fsm);
-
- osmo_fsm_inst_dispatch(reset->fsm, EV_N_CONNECT, reset);
-}
-
-/* Check if we have a connection to a specified msc */
-bool a_reset_conn_ready(struct a_reset_ctx *reset)
-{
- /* If no reset context is supplied, we assume that
- * the connection can't be ready! */
- if (!reset)
- return false;
-
- OSMO_ASSERT(reset->fsm);
- if (reset->fsm->state == ST_CONN)
- return true;
-
- return false;
-}
diff --git a/src/libcommon-cs/common_cs.c b/src/libcommon-cs/common_cs.c
deleted file mode 100644
index d6dff95df..000000000
--- a/src/libcommon-cs/common_cs.c
+++ /dev/null
@@ -1,154 +0,0 @@
-/* Code used by both libbsc and libmsc (common_cs means "BSC or MSC").
- *
- * (C) 2016 by sysmocom s.m.f.c. <info@sysmocom.de>
- * (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2014 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/>.
- *
- */
-
-#include <stdbool.h>
-
-#include <osmocom/gsm/gsm0480.h>
-
-#include <openbsc/common_cs.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_04_11.h>
-
-/* Warning: if bsc_network_init() is not called, some of the members of
- * gsm_network are not initialized properly and must not be used! (In
- * particular the llist heads and stats counters.)
- * The long term aim should be to have entirely separate structs for libbsc and
- * libmsc with some common general items.
- */
-struct gsm_network *gsm_network_init(void *ctx,
- uint16_t country_code,
- uint16_t network_code,
- mncc_recv_cb_t mncc_recv)
-{
- struct gsm_network *net;
-
- const char *default_regexp = ".*";
-
- net = talloc_zero(ctx, struct gsm_network);
- if (!net)
- return NULL;
-
- if (gsm_parse_reg(net, &net->authorized_regexp, &net->authorized_reg_str, 1,
- &default_regexp) != 0)
- return NULL;
-
- net->country_code = country_code;
- net->network_code = network_code;
-
- /* Use 30 min periodic update interval as sane default */
- net->t3212 = 5;
-
- INIT_LLIST_HEAD(&net->trans_list);
- INIT_LLIST_HEAD(&net->upqueue);
- INIT_LLIST_HEAD(&net->subscr_conns);
-
- net->bsc_subscribers = talloc_zero(net, struct llist_head);
- INIT_LLIST_HEAD(net->bsc_subscribers);
-
- /* init statistics */
- net->msc_ctrs = rate_ctr_group_alloc(net, &msc_ctrg_desc, 0);
- if (!net->msc_ctrs) {
- talloc_free(net);
- return NULL;
- }
- net->active_calls = osmo_counter_alloc("msc.active_calls");
-
- net->mncc_recv = mncc_recv;
-
- net->dyn_ts_allow_tch_f = true;
-
- INIT_LLIST_HEAD(&net->a.bscs);
-
- return net;
-}
-
-struct msgb *gsm48_create_mm_serv_rej(enum gsm48_reject_value value)
-{
- struct msgb *msg;
- struct gsm48_hdr *gh;
-
- msg = gsm48_msgb_alloc_name("GSM 04.08 SERV REJ");
- if (!msg)
- return NULL;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh) + 1);
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_CM_SERV_REJ;
- gh->data[0] = value;
-
- return msg;
-}
-
-struct msgb *gsm48_create_loc_upd_rej(uint8_t cause)
-{
- struct gsm48_hdr *gh;
- struct msgb *msg;
-
- msg = gsm48_msgb_alloc_name("GSM 04.08 LOC UPD REJ");
- if (!msg)
- return NULL;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh) + 1);
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_LOC_UPD_REJECT;
- gh->data[0] = cause;
- return msg;
-}
-
-int gsm48_extract_mi(uint8_t *classmark2_lv, int length, char *mi_string, uint8_t *mi_type)
-{
- /* Check the size for the classmark */
- if (length < 1 + *classmark2_lv)
- return -1;
-
- uint8_t *mi_lv = classmark2_lv + *classmark2_lv + 1;
- if (length < 2 + *classmark2_lv + mi_lv[0])
- return -2;
-
- *mi_type = mi_lv[1] & GSM_MI_TYPE_MASK;
- return gsm48_mi_to_string(mi_string, GSM48_MI_SIZE, mi_lv+1, *mi_lv);
-}
-
-int gsm48_paging_extract_mi(struct gsm48_pag_resp *resp, int length,
- char *mi_string, uint8_t *mi_type)
-{
- static const uint32_t classmark_offset =
- offsetof(struct gsm48_pag_resp, classmark2);
- uint8_t *classmark2_lv = (uint8_t *) &resp->classmark2;
- return gsm48_extract_mi(classmark2_lv, length - classmark_offset,
- mi_string, mi_type);
-}
-
-uint8_t sms_next_rp_msg_ref(uint8_t *next_rp_ref)
-{
- const uint8_t rp_msg_ref = *next_rp_ref;
- /*
- * This should wrap as the valid range is 0 to 255. We only
- * transfer one SMS at a time so we don't need to check if
- * the id has been already assigned.
- */
- *next_rp_ref += 1;
-
- return rp_msg_ref;
-}
diff --git a/src/libcommon-cs/common_cs_vty.c b/src/libcommon-cs/common_cs_vty.c
deleted file mode 100644
index 17916878b..000000000
--- a/src/libcommon-cs/common_cs_vty.c
+++ /dev/null
@@ -1,360 +0,0 @@
-/* Code used by both libbsc and libmsc (common_cs means "BSC or MSC").
- *
- * (C) 2016 by sysmocom s.m.f.c. <info@sysmocom.de>
- * (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <osmocom/core/utils.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/stats.h>
-
-#include <openbsc/vty.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-
-struct cmd_node net_node = {
- GSMNET_NODE,
- "%s(config-net)# ",
- 1,
-};
-
-#define NETWORK_STR "Configure the GSM network\n"
-#define CODE_CMD_STR "Code commands\n"
-#define NAME_CMD_STR "Name Commands\n"
-#define NAME_STR "Name to use\n"
-
-DEFUN(cfg_net,
- cfg_net_cmd,
- "network", NETWORK_STR)
-{
- vty->index = gsmnet_from_vty(vty);
- vty->node = GSMNET_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_ncc,
- cfg_net_ncc_cmd,
- "network country code <1-999>",
- "Set the GSM network country code\n"
- "Country commands\n"
- CODE_CMD_STR
- "Network Country Code to use\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->country_code = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_mnc,
- cfg_net_mnc_cmd,
- "mobile network code <0-999>",
- "Set the GSM mobile network code\n"
- "Network Commands\n"
- CODE_CMD_STR
- "Mobile Network Code to use\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->network_code = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_name_short,
- cfg_net_name_short_cmd,
- "short name NAME",
- "Set the short GSM network name\n" NAME_CMD_STR NAME_STR)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- osmo_talloc_replace_string(gsmnet, &gsmnet->name_short, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_name_long,
- cfg_net_name_long_cmd,
- "long name NAME",
- "Set the long GSM network name\n" NAME_CMD_STR NAME_STR)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- osmo_talloc_replace_string(gsmnet, &gsmnet->name_long, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_auth_policy,
- cfg_net_auth_policy_cmd,
- "auth policy (closed|accept-all|regexp|token)",
- "Authentication (not cryptographic)\n"
- "Set the GSM network authentication policy\n"
- "Require the MS to be activated in HLR\n"
- "Accept all MS, whether in HLR or not\n"
- "Use regular expression for IMSI authorization decision\n"
- "Use SMS-token based authentication\n")
-{
- enum gsm_auth_policy policy = gsm_auth_policy_parse(argv[0]);
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->auth_policy = policy;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_authorize_regexp, cfg_net_authorize_regexp_cmd,
- "authorized-regexp REGEXP",
- "Set regexp for IMSI which will be used for authorization decision\n"
- "Regular expression, IMSIs matching it are allowed to use the network\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- if (gsm_parse_reg(gsmnet, &gsmnet->authorized_regexp,
- &gsmnet->authorized_reg_str, argc, argv) != 0) {
- vty_out(vty, "%%Failed to parse the authorized-regexp: '%s'%s",
- argv[0], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_reject_cause,
- cfg_net_reject_cause_cmd,
- "location updating reject cause <2-111>",
- "Set the reject cause of location updating reject\n"
- "Set the reject cause of location updating reject\n"
- "Set the reject cause of location updating reject\n"
- "Set the reject cause of location updating reject\n"
- "Cause Value as Per GSM TS 04.08\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->reject_cause = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_encryption,
- cfg_net_encryption_cmd,
- "encryption a5 (0|1|2|3)",
- "Encryption options\n"
- "A5 encryption\n" "A5/0: No encryption\n"
- "A5/1: Encryption\n" "A5/2: Export-grade Encryption\n"
- "A5/3: 'New' Secure Encryption\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->a5_encryption = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_authentication,
- cfg_net_authentication_cmd,
- "authentication (optional|required)",
- "Whether to enforce MS authentication in 2G\n"
- "Allow MS to attach via 2G BSC without authentication\n"
- "Always do authentication\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->authentication_required = (argv[0][0] == 'r') ? true : false;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_rrlp_mode, cfg_net_rrlp_mode_cmd,
- "rrlp mode (none|ms-based|ms-preferred|ass-preferred)",
- "Radio Resource Location Protocol\n"
- "Set the Radio Resource Location Protocol Mode\n"
- "Don't send RRLP request\n"
- "Request MS-based location\n"
- "Request any location, prefer MS-based\n"
- "Request any location, prefer MS-assisted\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->rrlp.mode = rrlp_mode_parse(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_mm_info, cfg_net_mm_info_cmd,
- "mm info (0|1)",
- "Mobility Management\n"
- "Send MM INFO after LOC UPD ACCEPT\n"
- "Disable\n" "Enable\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- gsmnet->send_mm_info = atoi(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_dyn_ts_allow_tch_f,
- cfg_net_dyn_ts_allow_tch_f_cmd,
- "dyn_ts_allow_tch_f (0|1)",
- "Allow or disallow allocating TCH/F on TCH_F_TCH_H_PDCH timeslots\n"
- "Disallow TCH/F on TCH_F_TCH_H_PDCH (default)\n"
- "Allow TCH/F on TCH_F_TCH_H_PDCH\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->dyn_ts_allow_tch_f = atoi(argv[0]) ? true : false;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_timezone,
- cfg_net_timezone_cmd,
- "timezone <-19-19> (0|15|30|45)",
- "Set the Timezone Offset of the network\n"
- "Timezone offset (hours)\n"
- "Timezone offset (00 minutes)\n"
- "Timezone offset (15 minutes)\n"
- "Timezone offset (30 minutes)\n"
- "Timezone offset (45 minutes)\n"
- )
-{
- struct gsm_network *net = vty->index;
- int tzhr = atoi(argv[0]);
- int tzmn = atoi(argv[1]);
-
- net->tz.hr = tzhr;
- net->tz.mn = tzmn;
- net->tz.dst = 0;
- net->tz.override = 1;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_timezone_dst,
- cfg_net_timezone_dst_cmd,
- "timezone <-19-19> (0|15|30|45) <0-2>",
- "Set the Timezone Offset of the network\n"
- "Timezone offset (hours)\n"
- "Timezone offset (00 minutes)\n"
- "Timezone offset (15 minutes)\n"
- "Timezone offset (30 minutes)\n"
- "Timezone offset (45 minutes)\n"
- "DST offset (hours)\n"
- )
-{
- struct gsm_network *net = vty->index;
- int tzhr = atoi(argv[0]);
- int tzmn = atoi(argv[1]);
- int tzdst = atoi(argv[2]);
-
- net->tz.hr = tzhr;
- net->tz.mn = tzmn;
- net->tz.dst = tzdst;
- net->tz.override = 1;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_no_timezone,
- cfg_net_no_timezone_cmd,
- "no timezone",
- NO_STR
- "Disable network timezone override, use system tz\n")
-{
- struct gsm_network *net = vty->index;
-
- net->tz.override = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_per_loc_upd, cfg_net_per_loc_upd_cmd,
- "periodic location update <6-1530>",
- "Periodic Location Updating Interval\n"
- "Periodic Location Updating Interval\n"
- "Periodic Location Updating Interval\n"
- "Periodic Location Updating Interval in Minutes\n")
-{
- struct gsm_network *net = vty->index;
-
- net->t3212 = atoi(argv[0]) / 6;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_no_per_loc_upd, cfg_net_no_per_loc_upd_cmd,
- "no periodic location update",
- NO_STR
- "Periodic Location Updating Interval\n"
- "Periodic Location Updating Interval\n"
- "Periodic Location Updating Interval\n")
-{
- struct gsm_network *net = vty->index;
-
- net->t3212 = 0;
-
- return CMD_SUCCESS;
-}
-
-static struct gsm_network *vty_global_gsm_network = NULL;
-
-/* initialize VTY elements used in both BSC and MSC */
-int common_cs_vty_init(struct gsm_network *network,
- int (* config_write_net )(struct vty *))
-{
- OSMO_ASSERT(vty_global_gsm_network == NULL);
- vty_global_gsm_network = network;
-
- osmo_stats_vty_add_cmds();
-
- install_element(CONFIG_NODE, &cfg_net_cmd);
- install_node(&net_node, config_write_net);
- vty_install_default(GSMNET_NODE);
- install_element(GSMNET_NODE, &cfg_net_ncc_cmd);
- install_element(GSMNET_NODE, &cfg_net_mnc_cmd);
- install_element(GSMNET_NODE, &cfg_net_name_short_cmd);
- install_element(GSMNET_NODE, &cfg_net_name_long_cmd);
- install_element(GSMNET_NODE, &cfg_net_auth_policy_cmd);
- install_element(GSMNET_NODE, &cfg_net_authorize_regexp_cmd);
- install_element(GSMNET_NODE, &cfg_net_reject_cause_cmd);
- install_element(GSMNET_NODE, &cfg_net_encryption_cmd);
- install_element(GSMNET_NODE, &cfg_net_authentication_cmd);
- install_element(GSMNET_NODE, &cfg_net_rrlp_mode_cmd);
- install_element(GSMNET_NODE, &cfg_net_mm_info_cmd);
- install_element(GSMNET_NODE, &cfg_net_timezone_cmd);
- install_element(GSMNET_NODE, &cfg_net_timezone_dst_cmd);
- install_element(GSMNET_NODE, &cfg_net_no_timezone_cmd);
- install_element(GSMNET_NODE, &cfg_net_per_loc_upd_cmd);
- install_element(GSMNET_NODE, &cfg_net_no_per_loc_upd_cmd);
- install_element(GSMNET_NODE, &cfg_net_dyn_ts_allow_tch_f_cmd);
-
- return CMD_SUCCESS;
-}
-
-struct gsm_network *gsmnet_from_vty(struct vty *v)
-{
- /* It can't hurt to force callers to continue to pass the vty instance
- * to this function, in case we'd like to retrieve the global
- * gsm_network instance from the vty at some point in the future. But
- * until then, just return the global pointer, which should have been
- * initialized by common_cs_vty_init().
- */
- OSMO_ASSERT(vty_global_gsm_network);
- return vty_global_gsm_network;
-}
diff --git a/src/libcommon/common_vty.c b/src/libcommon/common_vty.c
index 1443791f0..856583e0c 100644
--- a/src/libcommon/common_vty.c
+++ b/src/libcommon/common_vty.c
@@ -24,7 +24,6 @@
#include <osmocom/core/talloc.h>
#include <openbsc/vty.h>
-#include <openbsc/gsm_data.h>
#include <openbsc/debug.h>
#include <openbsc/gsm_subscriber.h>
#include <openbsc/bsc_nat.h>
diff --git a/src/libfilter/Makefile.am b/src/libfilter/Makefile.am
deleted file mode 100644
index 6d3db0b90..000000000
--- a/src/libfilter/Makefile.am
+++ /dev/null
@@ -1,26 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(LIBOSMOSCCP_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-noinst_LIBRARIES = \
- libfilter.a \
- $(NULL)
-
-libfilter_a_SOURCES = \
- bsc_msg_filter.c \
- bsc_msg_acc.c \
- bsc_msg_vty.c \
- $(NULL)
-
diff --git a/src/libfilter/bsc_msg_acc.c b/src/libfilter/bsc_msg_acc.c
deleted file mode 100644
index a42206db8..000000000
--- a/src/libfilter/bsc_msg_acc.c
+++ /dev/null
@@ -1,119 +0,0 @@
-/*
- * (C) 2010-2015 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/bsc_nat.h>
-#include <openbsc/debug.h>
-
-#include <osmocom/core/rate_ctr.h>
-#include <osmocom/core/stats.h>
-
-#include <string.h>
-
-static const struct rate_ctr_desc acc_list_ctr_description[] = {
- [ACC_LIST_LOCAL_FILTER] = { "access-list.local-filter", "Rejected by rule for local"},
- [ACC_LIST_GLOBAL_FILTER]= { "access-list.global-filter", "Rejected by rule for global"},
-};
-
-static const struct rate_ctr_group_desc bsc_cfg_acc_list_desc = {
- .group_name_prefix = "nat.filter",
- .group_description = "NAT Access-List Statistics",
- .num_ctr = ARRAY_SIZE(acc_list_ctr_description),
- .ctr_desc = acc_list_ctr_description,
- .class_id = OSMO_STATS_CLASS_GLOBAL,
-};
-
-
-int bsc_msg_acc_lst_check_allow(struct bsc_msg_acc_lst *lst, const char *mi_string)
-{
- struct bsc_msg_acc_lst_entry *entry;
-
- llist_for_each_entry(entry, &lst->fltr_list, list) {
- if (!entry->imsi_allow)
- continue;
- if (regexec(&entry->imsi_allow_re, mi_string, 0, NULL, 0) == 0)
- return 0;
- }
-
- return 1;
-}
-
-struct bsc_msg_acc_lst *bsc_msg_acc_lst_find(struct llist_head *head, const char *name)
-{
- struct bsc_msg_acc_lst *lst;
-
- if (!name)
- return NULL;
-
- llist_for_each_entry(lst, head, list)
- if (strcmp(lst->name, name) == 0)
- return lst;
-
- return NULL;
-}
-
-struct bsc_msg_acc_lst *bsc_msg_acc_lst_get(void *ctx, struct llist_head *head, const char *name)
-{
- struct bsc_msg_acc_lst *lst;
-
- lst = bsc_msg_acc_lst_find(head, name);
- if (lst)
- return lst;
-
- lst = talloc_zero(ctx, struct bsc_msg_acc_lst);
- if (!lst) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate access list");
- return NULL;
- }
-
- /* TODO: get the index right */
- lst->stats = rate_ctr_group_alloc(lst, &bsc_cfg_acc_list_desc, 0);
- if (!lst->stats) {
- talloc_free(lst);
- return NULL;
- }
-
- INIT_LLIST_HEAD(&lst->fltr_list);
- lst->name = talloc_strdup(lst, name);
- llist_add_tail(&lst->list, head);
- return lst;
-}
-
-void bsc_msg_acc_lst_delete(struct bsc_msg_acc_lst *lst)
-{
- llist_del(&lst->list);
- rate_ctr_group_free(lst->stats);
- talloc_free(lst);
-}
-
-struct bsc_msg_acc_lst_entry *bsc_msg_acc_lst_entry_create(struct bsc_msg_acc_lst *lst)
-{
- struct bsc_msg_acc_lst_entry *entry;
-
- entry = talloc_zero(lst, struct bsc_msg_acc_lst_entry);
- if (!entry)
- return NULL;
-
- entry->cm_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- entry->lu_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- llist_add_tail(&entry->list, &lst->fltr_list);
- return entry;
-}
-
diff --git a/src/libfilter/bsc_msg_filter.c b/src/libfilter/bsc_msg_filter.c
deleted file mode 100644
index 115d376cb..000000000
--- a/src/libfilter/bsc_msg_filter.c
+++ /dev/null
@@ -1,398 +0,0 @@
-/*
- * Access filtering
- */
-/*
- * (C) 2010-2015 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2012 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_msg_filter.h>
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_msc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/gsm0808.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-
-int bsc_filter_barr_find(struct rb_root *root, const char *imsi, int *cm, int *lu)
-{
- struct bsc_filter_barr_entry *n;
- n = rb_entry(root->rb_node, struct bsc_filter_barr_entry, node);
-
- while (n) {
- int rc = strcmp(imsi, n->imsi);
- if (rc == 0) {
- *cm = n->cm_reject_cause;
- *lu = n->lu_reject_cause;
- return 1;
- }
-
- n = rb_entry(
- (rc < 0) ? n->node.rb_left : n->node.rb_right,
- struct bsc_filter_barr_entry, node);
- };
-
- return 0;
-}
-
-static int insert_barr_node(struct bsc_filter_barr_entry *entry, struct rb_root *root)
-{
- struct rb_node **new = &root->rb_node, *parent = NULL;
-
- while (*new) {
- int rc;
- struct bsc_filter_barr_entry *this;
- this = rb_entry(*new, struct bsc_filter_barr_entry, node);
- parent = *new;
-
- rc = strcmp(entry->imsi, this->imsi);
- if (rc < 0)
- new = &((*new)->rb_left);
- else if (rc > 0)
- new = &((*new)->rb_right);
- else {
- LOGP(DFILTER, LOGL_ERROR,
- "Duplicate entry for IMSI(%s)\n", entry->imsi);
- talloc_free(entry);
- return -1;
- }
- }
-
- rb_link_node(&entry->node, parent, new);
- rb_insert_color(&entry->node, root);
- return 0;
-}
-
-int bsc_filter_barr_adapt(void *ctx, struct rb_root *root,
- const struct osmo_config_list *list)
-{
- struct osmo_config_entry *cfg_entry;
- int err = 0;
-
- /* free the old data */
- while (!RB_EMPTY_ROOT(root)) {
- struct rb_node *node = rb_first(root);
- rb_erase(node, root);
- talloc_free(node);
- }
-
- if (!list)
- return 0;
-
- /* now adapt the new list */
- llist_for_each_entry(cfg_entry, &list->entry, list) {
- struct bsc_filter_barr_entry *entry;
- entry = talloc_zero(ctx, struct bsc_filter_barr_entry);
- if (!entry) {
- LOGP(DFILTER, LOGL_ERROR,
- "Allocation of the barr entry failed.\n");
- continue;
- }
-
- entry->imsi = talloc_strdup(entry, cfg_entry->mcc);
- entry->cm_reject_cause = atoi(cfg_entry->mnc);
- entry->lu_reject_cause = atoi(cfg_entry->option);
- err |= insert_barr_node(entry, root);
- }
-
- return err;
-}
-
-
-static int lst_check_deny(struct bsc_msg_acc_lst *lst, const char *mi_string,
- int *cm_cause, int *lu_cause)
-{
- struct bsc_msg_acc_lst_entry *entry;
-
- llist_for_each_entry(entry, &lst->fltr_list, list) {
- if (!entry->imsi_deny)
- continue;
- if (regexec(&entry->imsi_deny_re, mi_string, 0, NULL, 0) == 0) {
- *cm_cause = entry->cm_reject_cause;
- *lu_cause = entry->lu_reject_cause;
- return 0;
- }
- }
-
- return 1;
-}
-
-/* apply white/black list */
-static int auth_imsi(struct bsc_filter_request *req,
- const char *imsi,
- struct bsc_filter_reject_cause *cause)
-{
- /*
- * Now apply blacklist/whitelist of the BSC and the NAT.
- * 1.) Check the global IMSI barr list
- * 2.) Allow directly if the IMSI is allowed at the BSC
- * 3.) Reject if the IMSI is not allowed at the BSC
- * 4.) Reject if the IMSI not allowed at the global level.
- * 5.) Allow directly if the IMSI is allowed at the global level
- */
- int cm, lu;
- struct bsc_msg_acc_lst *nat_lst = NULL;
- struct bsc_msg_acc_lst *bsc_lst = NULL;
-
- /* 1. global check for barred imsis */
- if (req->black_list && bsc_filter_barr_find(req->black_list, imsi, &cm, &lu)) {
- cause->cm_reject_cause = cm;
- cause->lu_reject_cause = lu;
- LOGP(DFILTER, LOGL_DEBUG,
- "Blocking subscriber IMSI %s with CM: %d LU: %d\n",
- imsi, cm, lu);
- return -4;
- }
-
-
- bsc_lst = bsc_msg_acc_lst_find(req->access_lists, req->local_lst_name);
- nat_lst = bsc_msg_acc_lst_find(req->access_lists, req->global_lst_name);
-
-
- if (bsc_lst) {
- /* 2. BSC allow */
- if (bsc_msg_acc_lst_check_allow(bsc_lst, imsi) == 0)
- return 1;
-
- /* 3. BSC deny */
- if (lst_check_deny(bsc_lst, imsi, &cm, &lu) == 0) {
- LOGP(DFILTER, LOGL_ERROR,
- "Filtering %s by imsi_deny on config nr: %d.\n", imsi, req->bsc_nr);
- rate_ctr_inc(&bsc_lst->stats->ctr[ACC_LIST_LOCAL_FILTER]);
- cause->cm_reject_cause = cm;
- cause->lu_reject_cause = lu;
- return -2;
- }
-
- }
-
- /* 4. NAT deny */
- if (nat_lst) {
- if (lst_check_deny(nat_lst, imsi, &cm, &lu) == 0) {
- LOGP(DFILTER, LOGL_ERROR,
- "Filtering %s global imsi_deny on bsc nr: %d.\n", imsi, req->bsc_nr);
- rate_ctr_inc(&nat_lst->stats->ctr[ACC_LIST_GLOBAL_FILTER]);
- cause->cm_reject_cause = cm;
- cause->lu_reject_cause = lu;
- return -3;
- }
- }
-
- return 1;
-}
-
-static int _cr_check_loc_upd(void *ctx,
- uint8_t *data, unsigned int length,
- char **imsi)
-{
- uint8_t mi_type;
- struct gsm48_loc_upd_req *lu;
- char mi_string[GSM48_MI_SIZE];
-
- if (length < sizeof(*lu)) {
- LOGP(DFILTER, LOGL_ERROR,
- "LU does not fit. Length is %d \n", length);
- return -1;
- }
-
- lu = (struct gsm48_loc_upd_req *) data;
- mi_type = lu->mi[0] & GSM_MI_TYPE_MASK;
-
- /*
- * We can only deal with the IMSI. This will fail for a phone that
- * will send the TMSI of a previous network to us.
- */
- if (mi_type != GSM_MI_TYPE_IMSI)
- return 0;
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), lu->mi, lu->mi_len);
- *imsi = talloc_strdup(ctx, mi_string);
- return 1;
-}
-
-static int _cr_check_cm_serv_req(void *ctx,
- uint8_t *data, unsigned int length,
- int *con_type, char **imsi)
-{
- static const uint32_t classmark_offset =
- offsetof(struct gsm48_service_request, classmark);
-
- char mi_string[GSM48_MI_SIZE];
- uint8_t mi_type;
- int rc;
- struct gsm48_service_request *req;
-
- /* unfortunately in Phase1 the classmark2 length is variable */
-
- if (length < sizeof(*req)) {
- LOGP(DFILTER, LOGL_ERROR,
- "CM Serv Req does not fit. Length is %d\n", length);
- return -1;
- }
-
- req = (struct gsm48_service_request *) data;
- if (req->cm_service_type == 0x8)
- *con_type = FLT_CON_TYPE_SSA;
- rc = gsm48_extract_mi((uint8_t *) &req->classmark,
- length - classmark_offset, mi_string, &mi_type);
- if (rc < 0) {
- LOGP(DFILTER, LOGL_ERROR, "Failed to parse the classmark2/mi. error: %d\n", rc);
- return -1;
- }
-
- /* we have to let the TMSI or such pass */
- if (mi_type != GSM_MI_TYPE_IMSI)
- return 0;
-
- *imsi = talloc_strdup(ctx, mi_string);
- return 1;
-}
-
-static int _cr_check_pag_resp(void *ctx,
- uint8_t *data, unsigned int length, char **imsi)
-{
- struct gsm48_pag_resp *resp;
- char mi_string[GSM48_MI_SIZE];
- uint8_t mi_type;
-
- if (length < sizeof(*resp)) {
- LOGP(DFILTER, LOGL_ERROR, "PAG RESP does not fit. Length was %d.\n", length);
- return -1;
- }
-
- resp = (struct gsm48_pag_resp *) data;
- if (gsm48_paging_extract_mi(resp, length, mi_string, &mi_type) < 0) {
- LOGP(DFILTER, LOGL_ERROR, "Failed to extract the MI.\n");
- return -1;
- }
-
- /* we need to let it pass for now */
- if (mi_type != GSM_MI_TYPE_IMSI)
- return 0;
-
- *imsi = talloc_strdup(ctx, mi_string);
- return 1;
-}
-
-static int _dt_check_id_resp(struct bsc_filter_request *req,
- uint8_t *data, unsigned int length,
- struct bsc_filter_state *state,
- struct bsc_filter_reject_cause *cause)
-{
- char mi_string[GSM48_MI_SIZE];
- uint8_t mi_type;
-
- if (length < 2) {
- LOGP(DFILTER, LOGL_ERROR, "mi does not fit.\n");
- return -1;
- }
-
- if (data[0] < length - 1) {
- LOGP(DFILTER, LOGL_ERROR, "mi length too big.\n");
- return -2;
- }
-
- mi_type = data[1] & GSM_MI_TYPE_MASK;
- gsm48_mi_to_string(mi_string, sizeof(mi_string), &data[1], data[0]);
-
- if (mi_type != GSM_MI_TYPE_IMSI)
- return 0;
-
- state->imsi_checked = 1;
- state->imsi = talloc_strdup(req->ctx, mi_string);
- return auth_imsi(req, mi_string, cause);
-}
-
-
-/* Filter out CR data... */
-int bsc_msg_filter_initial(struct gsm48_hdr *hdr48, size_t hdr48_len,
- struct bsc_filter_request *req,
- int *con_type,
- char **imsi, struct bsc_filter_reject_cause *cause)
-{
- int ret = 0;
- uint8_t msg_type, proto;
-
- *con_type = FLT_CON_TYPE_NONE;
- cause->cm_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- cause->lu_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- *imsi = NULL;
-
- proto = gsm48_hdr_pdisc(hdr48);
- msg_type = gsm48_hdr_msg_type(hdr48);
- if (proto == GSM48_PDISC_MM &&
- msg_type == GSM48_MT_MM_LOC_UPD_REQUEST) {
- *con_type = FLT_CON_TYPE_LU;
- ret = _cr_check_loc_upd(req->ctx, &hdr48->data[0],
- hdr48_len - sizeof(*hdr48), imsi);
- } else if (proto == GSM48_PDISC_MM &&
- msg_type == GSM48_MT_MM_CM_SERV_REQ) {
- *con_type = FLT_CON_TYPE_CM_SERV_REQ;
- ret = _cr_check_cm_serv_req(req->ctx, &hdr48->data[0],
- hdr48_len - sizeof(*hdr48),
- con_type, imsi);
- } else if (proto == GSM48_PDISC_RR &&
- msg_type == GSM48_MT_RR_PAG_RESP) {
- *con_type = FLT_CON_TYPE_PAG_RESP;
- ret = _cr_check_pag_resp(req->ctx, &hdr48->data[0],
- hdr48_len - sizeof(*hdr48), imsi);
- } else {
- /* We only want to filter the above, let other things pass */
- *con_type = FLT_CON_TYPE_OTHER;
- return 0;
- }
-
- /* check if we are done */
- if (ret != 1)
- return ret;
-
- /* the memory allocation failed */
- if (!*imsi)
- return -1;
-
- /* now check the imsi */
- return auth_imsi(req, *imsi, cause);
-}
-
-int bsc_msg_filter_data(struct gsm48_hdr *hdr48, size_t len,
- struct bsc_filter_request *req,
- struct bsc_filter_state *state,
- struct bsc_filter_reject_cause *cause)
-{
- uint8_t msg_type, proto;
-
- cause->cm_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- cause->lu_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
-
- if (state->imsi_checked)
- return 0;
-
- proto = gsm48_hdr_pdisc(hdr48);
- msg_type = gsm48_hdr_msg_type(hdr48);
- if (proto != GSM48_PDISC_MM || msg_type != GSM48_MT_MM_ID_RESP)
- return 0;
-
- return _dt_check_id_resp(req, &hdr48->data[0],
- len - sizeof(*hdr48), state, cause);
-}
diff --git a/src/libfilter/bsc_msg_vty.c b/src/libfilter/bsc_msg_vty.c
deleted file mode 100644
index c342fdca0..000000000
--- a/src/libfilter/bsc_msg_vty.c
+++ /dev/null
@@ -1,140 +0,0 @@
-/* (C) 2010-2015 by Holger Hans Peter Freyther
- * (C) 2010-2013 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/vty/misc.h>
-
-static struct llist_head *_acc_lst;
-static void *_ctx;
-
-DEFUN(cfg_lst_no,
- cfg_lst_no_cmd,
- "no access-list NAME",
- NO_STR "Remove an access-list by name\n"
- "The access-list to remove\n")
-{
- struct bsc_msg_acc_lst *acc;
- acc = bsc_msg_acc_lst_find(_acc_lst, argv[0]);
- if (!acc)
- return CMD_WARNING;
-
- bsc_msg_acc_lst_delete(acc);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_acc_lst,
- show_acc_lst_cmd,
- "show access-list NAME",
- SHOW_STR "IMSI access list\n" "Name of the access list\n")
-{
- struct bsc_msg_acc_lst *acc;
- acc = bsc_msg_acc_lst_find(_acc_lst, argv[0]);
- if (!acc)
- return CMD_WARNING;
-
- vty_out(vty, "access-list %s%s", acc->name, VTY_NEWLINE);
- vty_out_rate_ctr_group(vty, " ", acc->stats);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_lst_imsi_allow,
- cfg_lst_imsi_allow_cmd,
- "access-list NAME imsi-allow [REGEXP]",
- "Access list commands\n"
- "Name of the access list\n"
- "Add allowed IMSI to the list\n"
- "Regexp for IMSIs\n")
-{
- struct bsc_msg_acc_lst *acc;
- struct bsc_msg_acc_lst_entry *entry;
-
- acc = bsc_msg_acc_lst_get(_ctx, _acc_lst, argv[0]);
- if (!acc)
- return CMD_WARNING;
-
- entry = bsc_msg_acc_lst_entry_create(acc);
- if (!entry)
- return CMD_WARNING;
-
- if (gsm_parse_reg(acc, &entry->imsi_allow_re, &entry->imsi_allow, argc - 1, &argv[1]) != 0)
- return CMD_WARNING;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_lst_imsi_deny,
- cfg_lst_imsi_deny_cmd,
- "access-list NAME imsi-deny [REGEXP] (<0-256>) (<0-256>)",
- "Access list commands\n"
- "Name of the access list\n"
- "Add denied IMSI to the list\n"
- "Regexp for IMSIs\n"
- "CM Service Reject reason\n"
- "LU Reject reason\n")
-{
- struct bsc_msg_acc_lst *acc;
- struct bsc_msg_acc_lst_entry *entry;
-
- acc = bsc_msg_acc_lst_get(_ctx, _acc_lst, argv[0]);
- if (!acc)
- return CMD_WARNING;
-
- entry = bsc_msg_acc_lst_entry_create(acc);
- if (!entry)
- return CMD_WARNING;
-
- if (gsm_parse_reg(acc, &entry->imsi_deny_re, &entry->imsi_deny, argc - 1, &argv[1]) != 0)
- return CMD_WARNING;
- if (argc >= 3)
- entry->cm_reject_cause = atoi(argv[2]);
- if (argc >= 4)
- entry->lu_reject_cause = atoi(argv[3]);
- return CMD_SUCCESS;
-}
-
-void bsc_msg_acc_lst_write(struct vty *vty, struct bsc_msg_acc_lst *lst)
-{
- struct bsc_msg_acc_lst_entry *entry;
-
- llist_for_each_entry(entry, &lst->fltr_list, list) {
- if (entry->imsi_allow)
- vty_out(vty, " access-list %s imsi-allow %s%s",
- lst->name, entry->imsi_allow, VTY_NEWLINE);
- if (entry->imsi_deny)
- vty_out(vty, " access-list %s imsi-deny %s %d %d%s",
- lst->name, entry->imsi_deny,
- entry->cm_reject_cause, entry->lu_reject_cause,
- VTY_NEWLINE);
- }
-}
-
-void bsc_msg_lst_vty_init(void *ctx, struct llist_head *lst, int node)
-{
- _ctx = ctx;
- _acc_lst = lst;
- install_element_ve(&show_acc_lst_cmd);
-
- /* access-list */
- install_element(node, &cfg_lst_imsi_allow_cmd);
- install_element(node, &cfg_lst_imsi_deny_cmd);
- install_element(node, &cfg_lst_no_cmd);
-}
diff --git a/src/libmsc/Makefile.am b/src/libmsc/Makefile.am
deleted file mode 100644
index c9b8bb4cc..000000000
--- a/src/libmsc/Makefile.am
+++ /dev/null
@@ -1,75 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(LIBCRYPTO_CFLAGS) \
- $(LIBSMPP34_CFLAGS) \
- $(LIBASN1C_CFLAGS) \
- $(LIBOSMOSIGTRAN_CFLAGS) \
- $(NULL)
-
-noinst_HEADERS = \
- meas_feed.h \
- $(NULL)
-
-noinst_LIBRARIES = \
- libmsc.a \
- $(NULL)
-
-libmsc_a_SOURCES = \
- a_iface.c \
- a_iface_bssap.c \
- auth.c \
- msc_vty.c \
- db.c \
- gsm_04_08.c \
- gsm_04_11.c \
- gsm_04_14.c \
- gsm_04_80.c \
- gsm_subscriber.c \
- mncc.c \
- mncc_builtin.c \
- mncc_sock.c \
- msc_ifaces.c \
- rrlp.c \
- silent_call.c \
- sms_queue.c \
- ussd.c \
- vty_interface_layer3.c \
- transaction.c \
- osmo_msc.c \
- ctrl_commands.c \
- meas_feed.c \
- subscr_conn.c \
- $(NULL)
-if BUILD_IU
-libmsc_a_SOURCES += \
- iucs.c \
- iucs_ranap.c \
- $(NULL)
-else
-libmsc_a_SOURCES += \
- iu_dummy.c \
- $(NULL)
-endif
-
-if BUILD_SMPP
-noinst_HEADERS += \
- smpp_smsc.h \
- $(NULL)
-
-libmsc_a_SOURCES += \
- smpp_smsc.c \
- smpp_openbsc.c \
- smpp_vty.c \
- smpp_utils.c \
- $(NULL)
-endif
diff --git a/src/libmsc/a_iface.c b/src/libmsc/a_iface.c
deleted file mode 100644
index e473b7526..000000000
--- a/src/libmsc/a_iface.c
+++ /dev/null
@@ -1,591 +0,0 @@
-/* (C) 2017 by sysmocom s.f.m.c. GmbH
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/sigtran/sccp_helpers.h>
-#include <osmocom/sigtran/sccp_sap.h>
-#include <osmocom/sigtran/osmo_ss7.h>
-#include <osmocom/sigtran/protocol/m3ua.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-#include <osmocom/gsm/gsm0808_utils.h>
-#include <openbsc/debug.h>
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/a_iface.h>
-#include <openbsc/a_iface_bssap.h>
-#include <openbsc/transaction.h>
-#include <osmocom/legacy_mgcp/mgcpgw_client.h>
-#include <osmocom/core/byteswap.h>
-#include <osmocom/sccp/sccp_types.h>
-#include <openbsc/a_reset.h>
-#include <openbsc/osmo_msc.h>
-
-/* A pointer to the GSM network we work with. By the current paradigm,
- * there can only be one gsm_network per MSC. The pointer is set once
- * when calling a_init() */
-static struct gsm_network *gsm_network = NULL;
-
-/* A struct to track currently active connections. We need that information
- * to handle failure sitautions. In case of a problem, we must know which
- * connections are currently open and which BSC is responsible. We also need
- * the data to perform our connection checks (a_reset). All other logic will
- * look at the connection ids and addresses that are supplied by the
- * primitives */
-struct bsc_conn {
- struct llist_head list;
- uint32_t conn_id; /* Connection identifier */
-};
-
-/* Internal list with connections we currently maintain. This
- * list is of type struct bsc_conn (see above) */
-static LLIST_HEAD(active_connections);
-
-/* Record info of a new active connection in the active connection list */
-static void record_bsc_con(const void *ctx, uint32_t conn_id)
-{
- struct bsc_conn *conn;
-
- conn = talloc_zero(ctx, struct bsc_conn);
- OSMO_ASSERT(conn);
-
- conn->conn_id = conn_id;
-
- llist_add_tail(&conn->list, &active_connections);
-}
-
-/* Delete info of a closed connection from the active connection list */
-void a_delete_bsc_con(uint32_t conn_id)
-{
- struct bsc_conn *conn;
- struct bsc_conn *conn_temp;
-
- LOGP(DMSC, LOGL_DEBUG,
- "Removing connection from active sccp-connection list (conn_id=%i)\n",
- conn_id);
-
- llist_for_each_entry_safe(conn, conn_temp, &active_connections, list) {
- if (conn->conn_id == conn_id) {
- llist_del(&conn->list);
- talloc_free(conn);
- }
- }
-}
-
-/* Check if a specified connection id has an active SCCP connection */
-static bool check_connection_active(uint32_t conn_id)
-{
- struct bsc_conn *conn;
-
- /* Find the address for the current connection id */
- llist_for_each_entry(conn, &active_connections, list) {
- if (conn->conn_id == conn_id) {
- return true;
- }
- }
-
- return false;
-}
-
-/* Get the reset context for a specifiec calling (BSC) address */
-static struct a_reset_ctx *get_reset_ctx_by_sccp_addr(const struct osmo_sccp_addr *addr)
-{
- struct bsc_context *bsc_ctx;
- struct osmo_ss7_instance *ss7;
-
- if (!addr)
- return NULL;
-
- llist_for_each_entry(bsc_ctx, &gsm_network->a.bscs, list) {
- if (memcmp(&bsc_ctx->bsc_addr, addr, sizeof(*addr)) == 0)
- return bsc_ctx->reset;
- }
-
- ss7 = osmo_ss7_instance_find(gsm_network->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_ERROR, "The calling BSC (%s) is unknown to this MSC ...\n",
- osmo_sccp_addr_name(ss7, addr));
- return NULL;
-}
-
-/* Send DTAP message via A-interface */
-int a_iface_tx_dtap(struct msgb *msg)
-{
- struct gsm_subscriber_connection *conn;
- struct msgb *msg_resp;
-
- /* FIXME: Set this to some meaninful value! */
- uint8_t link_id = 0x00;
- OSMO_ASSERT(msg);
- conn = (struct gsm_subscriber_connection *)msg->dst;
- OSMO_ASSERT(conn);
- OSMO_ASSERT(conn->a.scu);
-
- LOGP(DMSC, LOGL_DEBUG, "Passing DTAP message from MSC to BSC (conn_id=%i)\n", conn->a.conn_id);
-
- msg->l3h = msg->data;
- msg_resp = gsm0808_create_dtap(msg, link_id);
- if (!msg_resp) {
- LOGP(DMSC, LOGL_ERROR, "Unable to generate BSSMAP DTAP message!\n");
- return -EINVAL;
- } else
- LOGP(DMSC, LOGL_DEBUG, "Massage will be sent as BSSMAP DTAP message!\n");
-
- LOGP(DMSC, LOGL_DEBUG, "N-DATA.req(%u, %s)\n", conn->a.conn_id, osmo_hexdump(msg_resp->data, msg_resp->len));
- return osmo_sccp_tx_data_msg(conn->a.scu, conn->a.conn_id, msg_resp);
-}
-
-/* Send Cipher mode command via A-interface */
-int a_iface_tx_cipher_mode(const struct gsm_subscriber_connection *conn,
- int cipher, const const uint8_t *key, int len, int include_imeisv)
-{
- /* TODO generalize for A- and Iu interfaces, don't name after 08.08 */
- struct msgb *msg_resp;
- struct gsm0808_encrypt_info ei;
-
- OSMO_ASSERT(conn);
-
- LOGP(DMSC, LOGL_DEBUG, "Passing Cipher mode command message from MSC to BSC (conn_id=%i)\n", conn->a.conn_id);
- uint8_t crm = 0x01;
- uint8_t *crm_ptr = NULL;
-
- /* Setup encryption information */
- if (len > ENCRY_INFO_KEY_MAXLEN || !key) {
- LOGP(DMSC, LOGL_ERROR,
- "Cipher mode command message could not be generated due to invalid key! (conn_id=%i)\n",
- conn->a.conn_id);
- return -EINVAL;
- } else {
- memcpy(&ei.key, key, len);
- ei.key_len = len;
- }
-
- if (include_imeisv)
- crm_ptr = &crm;
-
- ei.perm_algo[0] = (uint8_t) (1 << cipher);
- ei.perm_algo_len = 1;
-
- msg_resp = gsm0808_create_cipher(&ei, crm_ptr);
- LOGP(DMSC, LOGL_DEBUG, "N-DATA.req(%u, %s)\n", conn->a.conn_id, osmo_hexdump(msg_resp->data, msg_resp->len));
-
- return osmo_sccp_tx_data_msg(conn->a.scu, conn->a.conn_id, msg_resp);
-}
-
-/* Page a subscriber via A-interface */
-int a_iface_tx_paging(const char *imsi, uint32_t tmsi, uint16_t lac)
-{
- struct bsc_context *bsc_ctx;
- struct gsm0808_cell_id_list cil;
- struct msgb *msg;
- int page_count = 0;
- struct osmo_ss7_instance *ss7;
-
- OSMO_ASSERT(imsi);
-
- cil.id_discr = CELL_IDENT_LAC;
- cil.id_list_lac[0] = lac;
- cil.id_list_len = 1;
-
- ss7 = osmo_ss7_instance_find(gsm_network->a.cs7_instance);
- OSMO_ASSERT(ss7);
-
- /* Deliver paging request to all known BSCs */
- llist_for_each_entry(bsc_ctx, &gsm_network->a.bscs, list) {
- if (a_reset_conn_ready(bsc_ctx->reset)) {
- LOGP(DMSC, LOGL_DEBUG,
- "Passing paging message from MSC %s to BSC %s (imsi=%s, tmsi=0x%08x, lac=%u)\n",
- osmo_sccp_addr_name(ss7, &bsc_ctx->msc_addr),
- osmo_sccp_addr_name(ss7, &bsc_ctx->bsc_addr), imsi, tmsi, lac);
- msg = gsm0808_create_paging(imsi, &tmsi, &cil, NULL);
- osmo_sccp_tx_unitdata_msg(bsc_ctx->sccp_user,
- &bsc_ctx->msc_addr, &bsc_ctx->bsc_addr, msg);
- page_count++;
- } else {
- LOGP(DMSC, LOGL_DEBUG,
- "Connection down, dropping paging from MSC %s to BSC %s (imsi=%s, tmsi=0x%08x, lac=%u)\n",
- osmo_sccp_addr_name(ss7, &bsc_ctx->msc_addr),
- osmo_sccp_addr_name(ss7, &bsc_ctx->bsc_addr), imsi, tmsi, lac);
- }
- }
-
- if (page_count <= 0)
- LOGP(DMSC, LOGL_ERROR, "Could not deliver paging because none of the associated BSCs is available!\n");
-
- return page_count;
-}
-
-/* Convert speech version field */
-static uint8_t convert_Abis_sv_to_A_sv(int speech_ver)
-{
- /* The speech versions that are transmitted in the Bearer capability
- * information element, that is transmitted on the Abis interfece
- * use a different encoding than the permitted speech version
- * identifier, that is signalled in the channel type element on the A
- * interface. (See also 3GPP TS 48.008, 3.2.2.1 and 3GPP TS 24.008,
- * 10.5.103 */
-
- switch (speech_ver) {
- case GSM48_BCAP_SV_FR:
- return GSM0808_PERM_FR1;
- break;
- case GSM48_BCAP_SV_HR:
- return GSM0808_PERM_HR1;
- break;
- case GSM48_BCAP_SV_EFR:
- return GSM0808_PERM_FR2;
- break;
- case GSM48_BCAP_SV_AMR_F:
- return GSM0808_PERM_FR3;
- break;
- case GSM48_BCAP_SV_AMR_H:
- return GSM0808_PERM_HR3;
- break;
- case GSM48_BCAP_SV_AMR_OFW:
- return GSM0808_PERM_FR4;
- break;
- case GSM48_BCAP_SV_AMR_OHW:
- return GSM0808_PERM_HR4;
- break;
- case GSM48_BCAP_SV_AMR_FW:
- return GSM0808_PERM_FR5;
- break;
- case GSM48_BCAP_SV_AMR_OH:
- return GSM0808_PERM_HR6;
- break;
- }
-
- /* If nothing matches, tag the result as invalid */
- LOGP(DMSC, LOGL_ERROR, "Invalid permitted speech version / rate detected, discarding.\n");
- return 0xFF;
-}
-
-/* Convert speech preference field */
-static uint8_t convert_Abis_prev_to_A_pref(int radio)
-{
- /* The Radio channel requirement field that is transmitted in the
- * Bearer capability information element, that is transmitted on the
- * Abis interfece uses a different encoding than the Channel rate and
- * type field that is signalled in the channel type element on the A
- * interface. (See also 3GPP TS 48.008, 3.2.2.1 and 3GPP TS 24.008,
- * 10.5.102 */
-
- switch (radio) {
- case GSM48_BCAP_RRQ_FR_ONLY:
- return GSM0808_SPEECH_FULL_BM;
- case GSM48_BCAP_RRQ_DUAL_FR:
- return GSM0808_SPEECH_FULL_PREF;
- case GSM48_BCAP_RRQ_DUAL_HR:
- return GSM0808_SPEECH_HALF_PREF;
- }
-
- LOGP(DMSC, LOGL_ERROR, "Invalid speech version / rate combination preference, defaulting to full rate.\n");
- return GSM0808_SPEECH_FULL_BM;
-}
-
-/* Assemble the channel type field */
-static int enc_channel_type(struct gsm0808_channel_type *ct, const struct gsm_mncc_bearer_cap *bc)
-{
- unsigned int i;
- uint8_t sv;
- unsigned int count = 0;
- bool only_gsm_hr = true;
-
- OSMO_ASSERT(ct);
- OSMO_ASSERT(bc);
-
- ct->ch_indctr = GSM0808_CHAN_SPEECH;
-
- for (i = 0; i < ARRAY_SIZE(bc->speech_ver); i++) {
- if (bc->speech_ver[i] == -1)
- break;
- sv = convert_Abis_sv_to_A_sv(bc->speech_ver[i]);
- if (sv != 0xFF) {
- /* Detect if something else than
- * GSM HR V1 is supported */
- if (sv == GSM0808_PERM_HR2 ||
- sv == GSM0808_PERM_HR3 || sv == GSM0808_PERM_HR4 || sv == GSM0808_PERM_HR6)
- only_gsm_hr = false;
-
- ct->perm_spch[count] = sv;
- count++;
- }
- }
- ct->perm_spch_len = count;
-
- if (only_gsm_hr)
- /* Note: We must avoid the usage of GSM HR1 as this
- * codec only offers very poor audio quality. If the
- * MS only supports GSM HR1 (and full rate), and has
- * a preference for half rate. Then we will ignore the
- * preference and assume a preference for full rate. */
- ct->ch_rate_type = GSM0808_SPEECH_FULL_BM;
- else
- ct->ch_rate_type = convert_Abis_prev_to_A_pref(bc->radio);
-
- if (count)
- return 0;
- else
- return -EINVAL;
-}
-
-/* Assemble the speech codec field */
-static int enc_speech_codec_list(struct gsm0808_speech_codec_list *scl, const struct gsm0808_channel_type *ct)
-{
- unsigned int i;
- int rc;
-
- memset(scl, 0, sizeof(*scl));
- for (i = 0; i < ct->perm_spch_len; i++) {
- rc = gsm0808_speech_codec_from_chan_type(&scl->codec[i], ct->perm_spch[i]);
- if (rc != 0)
- return -EINVAL;
- }
- scl->len = i;
-
- return 0;
-}
-
-/* Send assignment request via A-interface */
-int a_iface_tx_assignment(const struct gsm_trans *trans)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm0808_channel_type ct;
- struct gsm0808_speech_codec_list scl;
- uint32_t *ci_ptr = NULL;
- struct msgb *msg;
- struct sockaddr_storage rtp_addr;
- struct sockaddr_in rtp_addr_in;
- int rc;
-
- OSMO_ASSERT(trans);
- conn = trans->conn;
- OSMO_ASSERT(conn);
-
- LOGP(DMSC, LOGL_ERROR, "Sending assignment command to BSC (conn_id %u)\n", conn->a.conn_id);
-
- /* Channel type */
- rc = enc_channel_type(&ct, &trans->bearer_cap);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "Faild to generate channel type -- assignment not sent!\n");
- return -EINVAL;
- }
-
- /* Speech codec list */
- rc = enc_speech_codec_list(&scl, &ct);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "Faild to generate Speech codec list -- assignment not sent!\n");
- return -EINVAL;
- }
-
- /* Package RTP-Address data */
- memset(&rtp_addr_in, 0, sizeof(rtp_addr_in));
- rtp_addr_in.sin_family = AF_INET;
- rtp_addr_in.sin_port = osmo_htons(conn->rtp.port_subscr);
- rtp_addr_in.sin_addr.s_addr = osmo_htonl(mgcpgw_client_remote_addr_n(gsm_network->mgcpgw.client));
-
- memset(&rtp_addr, 0, sizeof(rtp_addr));
- memcpy(&rtp_addr, &rtp_addr_in, sizeof(rtp_addr_in));
-
- msg = gsm0808_create_ass(&ct, NULL, &rtp_addr, &scl, ci_ptr);
-
- LOGP(DMSC, LOGL_DEBUG, "N-DATA.req(%u, %s)\n", conn->a.conn_id, osmo_hexdump(msg->data, msg->len));
- return osmo_sccp_tx_data_msg(conn->a.scu, conn->a.conn_id, msg);
-}
-
-/* Send clear command via A-interface */
-int a_iface_tx_clear_cmd(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg;
-
- LOGP(DMSC, LOGL_NOTICE, "Sending clear command to BSC (conn_id=%u)\n", conn->a.conn_id);
-
- msg = gsm0808_create_clear_command(GSM0808_CAUSE_CALL_CONTROL);
- return osmo_sccp_tx_data_msg(conn->a.scu, conn->a.conn_id, msg);
-}
-
-/* Callback function: Close all open connections */
-static void a_reset_cb(const void *priv)
-{
- struct msgb *msg;
- struct bsc_context *bsc_ctx = (struct bsc_context*) priv;
- struct osmo_ss7_instance *ss7;
-
- /* Skip if the A interface is not properly initalized yet */
- if (!gsm_network)
- return;
-
- /* Clear all now orphaned subscriber connections */
- a_clear_all(bsc_ctx->sccp_user, &bsc_ctx->bsc_addr);
-
- /* Send reset to the remote BSC */
- ss7 = osmo_ss7_instance_find(gsm_network->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Sending RESET to BSC %s\n", osmo_sccp_addr_name(ss7, &bsc_ctx->bsc_addr));
- msg = gsm0808_create_reset();
- osmo_sccp_tx_unitdata_msg(bsc_ctx->sccp_user, &bsc_ctx->msc_addr,
- &bsc_ctx->bsc_addr, msg);
-}
-
-/* Add a new BSC connection to our internal list with known BSCs */
-static void add_bsc(const struct osmo_sccp_addr *msc_addr, const struct osmo_sccp_addr *bsc_addr,
- struct osmo_sccp_user *scu)
-{
- struct bsc_context *bsc_ctx;
- struct osmo_ss7_instance *ss7;
-
- OSMO_ASSERT(bsc_addr);
- OSMO_ASSERT(msc_addr);
- OSMO_ASSERT(scu);
-
- /* Check if we already know this BSC, if yes, skip adding it. */
- if (get_reset_ctx_by_sccp_addr(bsc_addr))
- return;
-
- ss7 = osmo_ss7_instance_find(gsm_network->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Adding new BSC connection for BSC %s...\n", osmo_sccp_addr_name(ss7, bsc_addr));
-
- /* Generate and fill up a new bsc context */
- bsc_ctx = talloc_zero(gsm_network, struct bsc_context);
- OSMO_ASSERT(bsc_ctx);
- memcpy(&bsc_ctx->bsc_addr, bsc_addr, sizeof(*bsc_addr));
- memcpy(&bsc_ctx->msc_addr, msc_addr, sizeof(*msc_addr));
- bsc_ctx->sccp_user = scu;
- llist_add_tail(&bsc_ctx->list, &gsm_network->a.bscs);
-
- /* Start reset procedure to make the new connection active */
- bsc_ctx->reset = a_reset_alloc(bsc_ctx, osmo_sccp_addr_name(ss7, bsc_addr), a_reset_cb, bsc_ctx);
-}
-
-/* Callback function, called by the SSCP stack when data arrives */
-static int sccp_sap_up(struct osmo_prim_hdr *oph, void *_scu)
-{
- struct osmo_sccp_user *scu = _scu;
- struct osmo_scu_prim *scu_prim = (struct osmo_scu_prim *)oph;
- int rc = 0;
- struct a_conn_info a_conn_info;
- memset(&a_conn_info, 0, sizeof(a_conn_info));
- a_conn_info.network = gsm_network;
- a_conn_info.reset = NULL;
-
- switch (OSMO_PRIM_HDR(&scu_prim->oph)) {
- case OSMO_PRIM(OSMO_SCU_PRIM_N_CONNECT, PRIM_OP_INDICATION):
- /* Handle inbound connection indication */
- add_bsc(&scu_prim->u.connect.called_addr, &scu_prim->u.connect.calling_addr, scu);
- a_conn_info.conn_id = scu_prim->u.connect.conn_id;
- a_conn_info.msc_addr = &scu_prim->u.connect.called_addr;
- a_conn_info.bsc_addr = &scu_prim->u.connect.calling_addr;
- a_conn_info.reset = get_reset_ctx_by_sccp_addr(&scu_prim->u.unitdata.calling_addr);
-
- if (a_reset_conn_ready(a_conn_info.reset) == false) {
- rc = osmo_sccp_tx_disconn(scu, a_conn_info.conn_id, a_conn_info.msc_addr,
- SCCP_RETURN_CAUSE_UNQUALIFIED);
- break;
- }
-
- osmo_sccp_tx_conn_resp(scu, scu_prim->u.connect.conn_id, &scu_prim->u.connect.called_addr, NULL, 0);
- if (msgb_l2len(oph->msg) > 0) {
- LOGP(DMSC, LOGL_DEBUG, "N-CONNECT.ind(%u, %s)\n",
- scu_prim->u.connect.conn_id, osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
- rc = sccp_rx_dt(scu, &a_conn_info, oph->msg);
- } else
- LOGP(DMSC, LOGL_DEBUG, "N-CONNECT.ind(%u)\n", scu_prim->u.connect.conn_id);
-
- record_bsc_con(scu, scu_prim->u.connect.conn_id);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_DATA, PRIM_OP_INDICATION):
- /* Handle incoming connection oriented data */
- a_conn_info.conn_id = scu_prim->u.data.conn_id;
- LOGP(DMSC, LOGL_DEBUG, "N-DATA.ind(%u, %s)\n",
- scu_prim->u.data.conn_id, osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
- sccp_rx_dt(scu, &a_conn_info, oph->msg);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_UNITDATA, PRIM_OP_INDICATION):
- /* Handle inbound UNITDATA */
- add_bsc(&scu_prim->u.unitdata.called_addr, &scu_prim->u.unitdata.calling_addr, scu);
- a_conn_info.msc_addr = &scu_prim->u.unitdata.called_addr;
- a_conn_info.bsc_addr = &scu_prim->u.unitdata.calling_addr;
- a_conn_info.reset = get_reset_ctx_by_sccp_addr(&scu_prim->u.unitdata.calling_addr);
- DEBUGP(DMSC, "N-UNITDATA.ind(%s)\n", osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
- sccp_rx_udt(scu, &a_conn_info, oph->msg);
- break;
-
- default:
- LOGP(DMSC, LOGL_ERROR, "Unhandled SIGTRAN primitive: %u:%u\n", oph->primitive, oph->operation);
- break;
- }
-
- return rc;
-}
-
-/* Clear all subscriber connections on a specified BSC */
-void a_clear_all(struct osmo_sccp_user *scu, const struct osmo_sccp_addr *bsc_addr)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_subscriber_connection *conn_temp;
- struct gsm_network *network = gsm_network;
-
- OSMO_ASSERT(scu);
- OSMO_ASSERT(bsc_addr);
-
- llist_for_each_entry_safe(conn, conn_temp, &network->subscr_conns, entry) {
- /* Clear only A connections and connections that actually
- * belong to the specified BSC */
- if (conn->via_ran == RAN_GERAN_A && memcmp(bsc_addr, &conn->a.bsc_addr, sizeof(conn->a.bsc_addr)) == 0) {
- LOGP(DMSC, LOGL_NOTICE, "Dropping orphaned subscriber connection (conn_id %i)\n",
- conn->a.conn_id);
- msc_clear_request(conn, GSM48_CC_CAUSE_SWITCH_CONG);
-
- /* If there is still an SCCP connection active, remove it now */
- if (check_connection_active(conn->a.conn_id)) {
- osmo_sccp_tx_disconn(scu, conn->a.conn_id, bsc_addr,
- SCCP_RELEASE_CAUSE_END_USER_ORIGINATED);
- a_delete_bsc_con(conn->a.conn_id);
- }
- }
- }
-}
-
-/* Initalize A interface connection between to MSC and BSC */
-int a_init(struct osmo_sccp_instance *sccp, struct gsm_network *network)
-{
- OSMO_ASSERT(sccp);
- OSMO_ASSERT(network);
-
- /* FIXME: Remove hardcoded parameters, use parameters in parameter list */
- LOGP(DMSC, LOGL_NOTICE, "Initalizing SCCP connection to stp...\n");
-
- /* Set GSM network variable, there can only be
- * one network by design */
- if (gsm_network != NULL) {
- OSMO_ASSERT(gsm_network == network);
- } else
- gsm_network = network;
-
- /* SCCP Protocol stack */
- osmo_sccp_user_bind(sccp, "OsmoMSC-A", sccp_sap_up, SCCP_SSN_BSSAP);
-
- return 0;
-}
diff --git a/src/libmsc/a_iface_bssap.c b/src/libmsc/a_iface_bssap.c
deleted file mode 100644
index e8a229374..000000000
--- a/src/libmsc/a_iface_bssap.c
+++ /dev/null
@@ -1,716 +0,0 @@
-/* (C) 2017 by Sysmocom s.f.m.c. GmbH
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/sigtran/sccp_helpers.h>
-#include <osmocom/sccp/sccp_types.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/gsm0808_utils.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/a_iface_bssap.h>
-#include <openbsc/a_iface.h>
-#include <openbsc/osmo_msc.h>
-#include <osmocom/core/byteswap.h>
-#include <openbsc/a_reset.h>
-
-#define IP_V4_ADDR_LEN 4
-
-/*
- * Helper functions to lookup and allocate subscribers
- */
-
-/* Allocate a new subscriber connection */
-static struct gsm_subscriber_connection *subscr_conn_allocate_a(const struct a_conn_info *a_conn_info,
- struct gsm_network *network,
- uint16_t lac, struct osmo_sccp_user *scu, int conn_id)
-{
- struct gsm_subscriber_connection *conn;
-
- LOGP(DMSC, LOGL_NOTICE, "Allocating A-Interface subscriber conn: lac %i, conn_id %i\n", lac, conn_id);
-
- conn = talloc_zero(network, struct gsm_subscriber_connection);
- if (!conn)
- return NULL;
-
- conn->network = network;
- conn->via_ran = RAN_GERAN_A;
- conn->lac = lac;
-
- conn->a.conn_id = conn_id;
- conn->a.scu = scu;
-
- /* Also backup the calling address of the BSC, this allows us to
- * identify later which BSC is responsible for this subscriber connection */
- memcpy(&conn->a.bsc_addr, a_conn_info->bsc_addr, sizeof(conn->a.bsc_addr));
-
- llist_add_tail(&conn->entry, &network->subscr_conns);
- LOGP(DMSC, LOGL_NOTICE, "A-Interface subscriber connection successfully allocated!\n");
- return conn;
-}
-
-/* Return an existing A subscriber connection record for the given
- * connection IDs, or return NULL if not found. */
-static struct gsm_subscriber_connection *subscr_conn_lookup_a(const struct gsm_network *network, int conn_id)
-{
- struct gsm_subscriber_connection *conn;
-
- OSMO_ASSERT(network);
-
- DEBUGP(DMSC, "Looking for A subscriber: conn_id %i\n", conn_id);
-
- /* FIXME: log_subscribers() is defined in iucs.c as static inline, if
- * maybe this function should be public to reach it from here? */
- /* log_subscribers(network); */
-
- llist_for_each_entry(conn, &network->subscr_conns, entry) {
- if (conn->via_ran == RAN_GERAN_A && conn->a.conn_id == conn_id) {
- DEBUGP(DIUCS, "Found A subscriber for conn_id %i\n", conn_id);
- return conn;
- }
- }
- DEBUGP(DMSC, "No A subscriber found for conn_id %i\n", conn_id);
- return NULL;
-}
-
-/*
- * BSSMAP handling for UNITDATA
- */
-
-/* Endpoint to handle BSSMAP reset */
-static void bssmap_rx_reset(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct osmo_ss7_instance *ss7;
-
- ss7 = osmo_ss7_instance_find(network->a.cs7_instance);
- OSMO_ASSERT(ss7);
-
- LOGP(DMSC, LOGL_NOTICE, "Rx RESET from BSC %s, sending RESET ACK\n",
- osmo_sccp_addr_name(ss7, a_conn_info->bsc_addr));
- osmo_sccp_tx_unitdata_msg(scu, a_conn_info->msc_addr, a_conn_info->bsc_addr, gsm0808_create_reset_ack());
-
- /* Make sure all orphand subscriber connections will be cleard */
- a_clear_all(scu, a_conn_info->bsc_addr);
-
- msgb_free(msg);
-}
-
-/* Endpoint to handle BSSMAP reset acknowlegement */
-static void bssmap_rx_reset_ack(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info,
- struct msgb *msg)
-{
-
- struct gsm_network *network = a_conn_info->network;
- struct osmo_ss7_instance *ss7;
-
- ss7 = osmo_ss7_instance_find(network->a.cs7_instance);
- OSMO_ASSERT(ss7);
-
- if (a_conn_info->reset == NULL) {
- LOGP(DMSC, LOGL_ERROR, "Received RESET ACK from an unknown BSC %s, ignoring...\n",
- osmo_sccp_addr_name(ss7, a_conn_info->bsc_addr));
- goto fail;
- }
-
- LOGP(DMSC, LOGL_NOTICE, "Received RESET ACK from BSC %s\n", osmo_sccp_addr_name(ss7, a_conn_info->bsc_addr));
-
- /* Confirm that we managed to get the reset ack message
- * towards the connection reset logic */
- a_reset_ack_confirm(a_conn_info->reset);
-
-fail:
- msgb_free(msg);
-}
-
-/* Handle UNITDATA BSSMAP messages */
-static void bssmap_rcvmsg_udt(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- /* Note: When in the MSC role, RESET ACK is the only valid message that
- * can be received via UNITDATA */
-
- if (msgb_l3len(msg) < 1) {
- LOGP(DMSC, LOGL_NOTICE, "Error: No data received -- discarding message!\n");
- return;
- }
-
- LOGP(DMSC, LOGL_NOTICE, "Rx BSC UDT BSSMAP %s\n", gsm0808_bssmap_name(msg->l3h[0]));
-
- switch (msg->l3h[0]) {
- case BSS_MAP_MSG_RESET:
- bssmap_rx_reset(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_RESET_ACKNOWLEDGE:
- bssmap_rx_reset_ack(scu, a_conn_info, msg);
- break;
- default:
- LOGP(DMSC, LOGL_NOTICE, "Unimplemented message format: %s -- message discarded!\n",
- gsm0808_bssmap_name(msg->l3h[0]));
- msgb_free(msg);
- }
-}
-
-/* Receive incoming connection less data messages via sccp */
-void sccp_rx_udt(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- /* Note: The only valid message type that can be received
- * via UNITDATA are BSS Management messages */
- struct bssmap_header *bs;
-
- OSMO_ASSERT(scu);
- OSMO_ASSERT(a_conn_info);
- OSMO_ASSERT(msg);
-
- LOGP(DMSC, LOGL_NOTICE, "Rx BSC UDT: %s\n", osmo_hexdump(msgb_l2(msg), msgb_l2len(msg)));
-
- if (msgb_l2len(msg) < sizeof(*bs)) {
- LOGP(DMSC, LOGL_ERROR, "Error: Header is too short -- discarding message!\n");
- msgb_free(msg);
- return;
- }
-
- bs = (struct bssmap_header *)msgb_l2(msg);
- if (bs->length < msgb_l2len(msg) - sizeof(*bs)) {
- LOGP(DMSC, LOGL_ERROR, "Error: Message is too short -- discarding message!\n");
- msgb_free(msg);
- return;
- }
-
- switch (bs->type) {
- case BSSAP_MSG_BSS_MANAGEMENT:
- msg->l3h = &msg->l2h[sizeof(struct bssmap_header)];
- bssmap_rcvmsg_udt(scu, a_conn_info, msg);
- break;
- default:
- LOGP(DMSC, LOGL_ERROR,
- "Error: Unimplemented message type: %s -- message discarded!\n", gsm0808_bssmap_name(bs->type));
- msgb_free(msg);
- }
-}
-
-/*
- * BSSMAP handling for connection oriented data
- */
-
-/* Endpoint to handle BSSMAP clear request */
-static int bssmap_rx_clear_rqst(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct tlv_parsed tp;
- int rc;
- struct msgb *msg_resp;
- uint8_t cause;
- struct gsm_subscriber_connection *conn;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC requested to clear connection (conn_id=%i)\n", a_conn_info->conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CAUSE)) {
- LOGP(DMSC, LOGL_ERROR, "Cause code is missing -- discarding message!\n");
- goto fail;
- }
- cause = TLVP_VAL(&tp, GSM0808_IE_CAUSE)[0];
-
- /* Respond with clear command */
- msg_resp = gsm0808_create_clear_command(GSM0808_CAUSE_CALL_CONTROL);
- rc = osmo_sccp_tx_data_msg(scu, a_conn_info->conn_id, msg_resp);
-
- /* If possible, inform the MSC about the clear request */
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
- msc_clear_request(conn, cause);
-
- msgb_free(msg);
- return rc;
-
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle BSSMAP clear complete */
-static int bssmap_rx_clear_complete(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- int rc;
-
- LOGP(DMSC, LOGL_NOTICE, "Releasing connection (conn_id=%i)\n", a_conn_info->conn_id);
- rc = osmo_sccp_tx_disconn(scu, a_conn_info->conn_id,
- a_conn_info->msc_addr, SCCP_RELEASE_CAUSE_END_USER_ORIGINATED);
-
- /* Remove the record from the list with active connections. */
- a_delete_bsc_con(a_conn_info->conn_id);
-
- msgb_free(msg);
- return rc;
-}
-
-/* Endpoint to handle layer 3 complete messages */
-static int bssmap_rx_l3_compl(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct tlv_parsed tp;
- struct {
- uint8_t ident;
- struct gsm48_loc_area_id lai;
- uint16_t ci;
- } __attribute__ ((packed)) lai_ci;
- uint16_t mcc;
- uint16_t mnc;
- uint16_t lac;
- uint8_t data_length;
- const uint8_t *data;
- int rc;
-
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC has completed layer 3 connection (conn_id=%i)\n", a_conn_info->conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CELL_IDENTIFIER)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory CELL IDENTIFIER not present -- discarding message!\n");
- goto fail;
- }
- if (!TLVP_PRESENT(&tp, GSM0808_IE_LAYER_3_INFORMATION)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory LAYER 3 INFORMATION not present -- discarding message!\n");
- goto fail;
- }
-
- /* Parse Cell ID element */
- /* FIXME: Encapsulate this in a parser/generator function inside
- * libosmocore, add support for all specified cell identification
- * discriminators (see 3GPP ts 3.2.2.17 Cell Identifier) */
- data_length = TLVP_LEN(&tp, GSM0808_IE_CELL_IDENTIFIER);
- data = TLVP_VAL(&tp, GSM0808_IE_CELL_IDENTIFIER);
- if (sizeof(lai_ci) != data_length) {
- LOGP(DMSC, LOGL_ERROR,
- "Unable to parse element CELL IDENTIFIER (wrong field length) -- discarding message!\n");
- goto fail;
- }
- memcpy(&lai_ci, data, sizeof(lai_ci));
- if (lai_ci.ident != CELL_IDENT_WHOLE_GLOBAL) {
- LOGP(DMSC, LOGL_ERROR,
- "Unable to parse element CELL IDENTIFIER (wrong cell identification discriminator) -- discarding message!\n");
- goto fail;
- }
- if (gsm48_decode_lai(&lai_ci.lai, &mcc, &mnc, &lac) != 0) {
- LOGP(DMSC, LOGL_ERROR,
- "Unable to parse element CELL IDENTIFIER (lai decoding failed) -- discarding message!\n");
- goto fail;
- }
-
- /* Parse Layer 3 Information element */
- /* FIXME: This is probably to hackish, compiler also complains "assignment discards ‘const’ qualifier..." */
- msg->l3h = TLVP_VAL(&tp, GSM0808_IE_LAYER_3_INFORMATION);
- msg->tail = msg->l3h + TLVP_LEN(&tp, GSM0808_IE_LAYER_3_INFORMATION);
-
- /* Create new subscriber context */
- conn = subscr_conn_allocate_a(a_conn_info, network, lac, scu, a_conn_info->conn_id);
-
- /* Handover location update to the MSC code */
- /* msc_compl_l3() takes ownership of dtap_msg
- * message buffer */
- rc = msc_compl_l3(conn, msg, 0);
- if (rc == MSC_CONN_ACCEPT) {
- LOGP(DMSC, LOGL_NOTICE, "User has been accepted by MSC.\n");
- return 0;
- } else if (rc == MSC_CONN_REJECT)
- LOGP(DMSC, LOGL_NOTICE, "User has been rejected by MSC.\n");
- else
- LOGP(DMSC, LOGL_NOTICE, "User has been rejected by MSC (unknown error)\n");
-
- return -EINVAL;
-
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle BSSMAP classmark update */
-static int bssmap_rx_classmark_upd(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct tlv_parsed tp;
- const uint8_t *cm2 = NULL;
- const uint8_t *cm3 = NULL;
- uint8_t cm2_len = 0;
- uint8_t cm3_len = 0;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends clasmark update (conn_id=%i)\n", conn->a.conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T2)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory Classmark Information Type 2 not present -- discarding message!\n");
- goto fail;
- }
-
- cm2 = TLVP_VAL(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T2);
- cm2_len = TLVP_LEN(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T2);
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T3)) {
- cm3 = TLVP_VAL(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T3);
- cm3_len = TLVP_LEN(&tp, GSM0808_IE_CLASSMARK_INFORMATION_T3);
- }
-
- /* Inform MSC about the classmark change */
- msc_classmark_chg(conn, cm2, cm2_len, cm3, cm3_len);
-
- msgb_free(msg);
- return 0;
-
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle BSSMAP cipher mode complete */
-static int bssmap_rx_ciph_compl(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info,
- struct msgb *msg)
-{
- /* FIXME: The field GSM0808_IE_LAYER_3_MESSAGE_CONTENTS is optional by
- * means of the specification. So there can be messages without L3 info.
- * In this case, the code will crash becrause msc_cipher_mode_compl()
- * is not able to deal with msg = NULL and apperently
- * msc_cipher_mode_compl() was never meant to be used without L3 data.
- * This needs to be discussed further! */
-
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct tlv_parsed tp;
- uint8_t alg_id = 1;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends cipher mode complete (conn_id=%i)\n", conn->a.conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_CHOSEN_ENCR_ALG)) {
- alg_id = TLVP_VAL(&tp, GSM0808_IE_CHOSEN_ENCR_ALG)[0] - 1;
- }
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_LAYER_3_MESSAGE_CONTENTS)) {
- msg->l3h = TLVP_VAL(&tp, GSM0808_IE_LAYER_3_MESSAGE_CONTENTS);
- msg->tail = msg->l3h + TLVP_LEN(&tp, GSM0808_IE_LAYER_3_MESSAGE_CONTENTS);
- } else {
- msgb_free(msg);
- msg = NULL;
- }
-
- /* Hand over cipher mode complete message to the MSC,
- * msc_cipher_mode_compl() takes ownership for msg */
- msc_cipher_mode_compl(conn, msg, alg_id);
-
- return 0;
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle BSSMAP cipher mode reject */
-static int bssmap_rx_ciph_rej(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct tlv_parsed tp;
- uint8_t cause;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends cipher mode reject (conn_id=%i)\n", conn->a.conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, BSS_MAP_MSG_CIPHER_MODE_REJECT)) {
- LOGP(DMSC, LOGL_ERROR, "Cause code is missing -- discarding message!\n");
- goto fail;
- }
-
- cause = TLVP_VAL(&tp, BSS_MAP_MSG_CIPHER_MODE_REJECT)[0];
- LOGP(DMSC, LOGL_NOTICE, "Cipher mode rejection cause: %i\n", cause);
-
- /* FIXME: Can we do something meaningful here? e.g. report to the
- * msc code somehow that the cipher mode command has failed. */
-
- msgb_free(msg);
- return 0;
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle BSSMAP assignment failure */
-static int bssmap_rx_ass_fail(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct tlv_parsed tp;
- uint8_t cause;
- uint8_t *rr_cause_ptr = NULL;
- uint8_t rr_cause;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends assignment failure message (conn_id=%i)\n", conn->a.conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CAUSE)) {
- LOGP(DMSC, LOGL_ERROR, "Cause code is missing -- discarding message!\n");
- goto fail;
- }
- cause = TLVP_VAL(&tp, GSM0808_IE_CAUSE)[0];
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_RR_CAUSE)) {
- rr_cause = TLVP_VAL(&tp, GSM0808_IE_RR_CAUSE)[0];
- rr_cause_ptr = &rr_cause;
- }
-
- /* FIXME: In AoIP, the Assignment failure will carry also an optional
- * Codec List (BSS Supported) element. It has to be discussed if we
- * can ignore this element. If not, The msc_assign_fail() function
- * call has to change. However msc_assign_fail() does nothing in the
- * end. So probably we can just leave it as it is. Even for AoIP */
-
- /* Inform the MSC about the assignment failure event */
- msc_assign_fail(conn, cause, rr_cause_ptr);
-
- msgb_free(msg);
- return 0;
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle sapi "n" reject */
-static int bssmap_rx_sapi_n_rej(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info,
- struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct tlv_parsed tp;
- uint8_t dlci;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends sapi \"n\" reject message (conn_id=%i)\n", conn->a.conn_id);
-
- /* Note: The MSC code seems not to care about the cause code, but by
- * the specification it is mandatory, so we check its presence. See
- * also 3GPP TS 48.008 3.2.1.34 SAPI "n" REJECT */
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CAUSE)) {
- LOGP(DMSC, LOGL_ERROR, "Cause code is missing -- discarding message!\n");
- goto fail;
- }
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_DLCI)) {
- LOGP(DMSC, LOGL_ERROR, "DLCI is missing -- discarding message!\n");
- goto fail;
- }
- dlci = TLVP_VAL(&tp, GSM0808_IE_DLCI)[0];
-
- /* Inform the MSC about the sapi "n" reject event */
- msc_sapi_n_reject(conn, dlci);
-
- msgb_free(msg);
- return 0;
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Endpoint to handle assignment complete */
-static int bssmap_rx_ass_compl(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info,
- struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
- struct mgcpgw_client *mgcp;
- struct tlv_parsed tp;
- struct sockaddr_storage rtp_addr;
- struct sockaddr_in *rtp_addr_in;
- int rc;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn)
- goto fail;
-
- mgcp = conn->network->mgcpgw.client;
- OSMO_ASSERT(mgcp);
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends assignment complete message (conn_id=%i)\n", conn->a.conn_id);
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 1, msgb_l3len(msg) - 1, 0, 0);
-
- if (!TLVP_PRESENT(&tp, GSM0808_IE_AOIP_TRASP_ADDR)) {
- LOGP(DMSC, LOGL_ERROR, "AoIP transport identifier missing -- discarding message!\n");
- goto fail;
- }
-
- /* Decode AoIP transport address element */
- rc = gsm0808_dec_aoip_trasp_addr(&rtp_addr, TLVP_VAL(&tp, GSM0808_IE_AOIP_TRASP_ADDR),
- TLVP_LEN(&tp, GSM0808_IE_AOIP_TRASP_ADDR));
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "Unable to decode aoip transport address.\n");
- goto fail;
- }
-
- /* use address / port supplied with the AoIP
- * transport address element */
- if (rtp_addr.ss_family == AF_INET) {
- rtp_addr_in = (struct sockaddr_in *)&rtp_addr;
- conn->rtp.port_subscr = osmo_ntohs(rtp_addr_in->sin_port);
- /* FIXME: We also get the IP-Address of the remote (e.g. BTS)
- * end with the response. Currently we just ignore that address.
- * Instead we expect that our local MGCP gateway and the code
- * controlling it, magically knows the IP of the remote end. */
- } else {
- LOGP(DMSC, LOGL_ERROR, "Unsopported addressing scheme. (supports only IPV4)\n");
- goto fail;
- }
-
- /* FIXME: Seems to be related to authentication or,
- encryption. Is this really in the right place? */
- msc_rx_sec_mode_compl(conn);
-
- msgb_free(msg);
- return 0;
-fail:
- msgb_free(msg);
- return -EINVAL;
-}
-
-/* Handle incoming connection oriented BSSMAP messages */
-static int rx_bssmap(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- if (msgb_l3len(msg) < 1) {
- LOGP(DMSC, LOGL_NOTICE, "Error: No data received -- discarding message!\n");
- msgb_free(msg);
- return -1;
- }
-
- LOGP(DMSC, LOGL_NOTICE, "Rx MSC DT1 BSSMAP %s\n", gsm0808_bssmap_name(msg->l3h[0]));
-
- switch (msg->l3h[0]) {
- case BSS_MAP_MSG_CLEAR_RQST:
- return bssmap_rx_clear_rqst(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_CLEAR_COMPLETE:
- return bssmap_rx_clear_complete(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_COMPLETE_LAYER_3:
- return bssmap_rx_l3_compl(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_CLASSMARK_UPDATE:
- return bssmap_rx_classmark_upd(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_CIPHER_MODE_COMPLETE:
- return bssmap_rx_ciph_compl(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_CIPHER_MODE_REJECT:
- return bssmap_rx_ciph_rej(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_ASSIGMENT_FAILURE:
- return bssmap_rx_ass_fail(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_SAPI_N_REJECT:
- return bssmap_rx_sapi_n_rej(scu, a_conn_info, msg);
- break;
- case BSS_MAP_MSG_ASSIGMENT_COMPLETE:
- return bssmap_rx_ass_compl(scu, a_conn_info, msg);
- break;
- default:
- LOGP(DMSC, LOGL_ERROR, "Unimplemented msg type: %s\n", gsm0808_bssmap_name(msg->l3h[0]));
- msgb_free(msg);
- return -EINVAL;
- }
-
- return -EINVAL;
-}
-
-/* Endpoint to handle regular BSSAP DTAP messages */
-static int rx_dtap(const struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- struct gsm_network *network = a_conn_info->network;
- struct gsm_subscriber_connection *conn;
-
- conn = subscr_conn_lookup_a(network, a_conn_info->conn_id);
- if (!conn) {
- msgb_free(msg);
- return -EINVAL;
- }
-
- LOGP(DMSC, LOGL_NOTICE, "BSC sends layer 3 dtap (conn_id=%i)\n", conn->a.conn_id);
-
- /* msc_dtap expects the dtap payload in l3h */
- msg->l3h = msg->l2h + 3;
-
- /* Forward dtap payload into the msc,
- * msc_dtap() takes ownership for msg */
- msc_dtap(conn, conn->a.conn_id, msg);
-
- return 0;
-}
-
-/* Handle incoming connection oriented messages */
-int sccp_rx_dt(struct osmo_sccp_user *scu, const struct a_conn_info *a_conn_info, struct msgb *msg)
-{
- OSMO_ASSERT(scu);
- OSMO_ASSERT(a_conn_info);
- OSMO_ASSERT(msg);
-
- LOGP(DMSC, LOGL_NOTICE, "Rx BSC DT: %s\n", osmo_hexdump(msgb_l2(msg), msgb_l2len(msg)));
-
- if (msgb_l2len(msg) < sizeof(struct bssmap_header)) {
- LOGP(DMSC, LOGL_NOTICE, "The header is too short -- discarding message!\n");
- msgb_free(msg);
- }
-
- switch (msg->l2h[0]) {
- case BSSAP_MSG_BSS_MANAGEMENT:
- msg->l3h = &msg->l2h[sizeof(struct bssmap_header)];
- return rx_bssmap(scu, a_conn_info, msg);
- break;
- case BSSAP_MSG_DTAP:
- return rx_dtap(scu, a_conn_info, msg);
- break;
- default:
- LOGP(DMSC, LOGL_ERROR, "Unimplemented BSSAP msg type: %s\n", gsm0808_bssap_name(msg->l2h[0]));
- msgb_free(msg);
- return -EINVAL;
- }
-
- return -EINVAL;
-}
diff --git a/src/libmsc/auth.c b/src/libmsc/auth.c
deleted file mode 100644
index 9064ce6c4..000000000
--- a/src/libmsc/auth.c
+++ /dev/null
@@ -1,42 +0,0 @@
-/* Authentication related functions */
-
-/*
- * (C) 2010 by Sylvain Munaut <tnt@246tNt.com>
- *
- * 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/>.
- *
- */
-
-#include <openbsc/db.h>
-#include <openbsc/debug.h>
-#include <openbsc/auth.h>
-#include <openbsc/gsm_data.h>
-
-#include <osmocom/gsm/comp128.h>
-#include <osmocom/core/utils.h>
-
-#include <openssl/rand.h>
-
-#include <stdlib.h>
-
-const struct value_string auth_action_names[] = {
- OSMO_VALUE_STRING(AUTH_ERROR),
- OSMO_VALUE_STRING(AUTH_NOT_AVAIL),
- OSMO_VALUE_STRING(AUTH_DO_AUTH_THEN_CIPH),
- OSMO_VALUE_STRING(AUTH_DO_CIPH),
- OSMO_VALUE_STRING(AUTH_DO_AUTH),
- { 0, NULL }
-};
diff --git a/src/libmsc/ctrl_commands.c b/src/libmsc/ctrl_commands.c
deleted file mode 100644
index 9d1f0d4fa..000000000
--- a/src/libmsc/ctrl_commands.c
+++ /dev/null
@@ -1,88 +0,0 @@
-/*
- * (C) 2014 by Holger Hans Peter Freyther
- * (C) 2014 by sysmocom s.f.m.c. GmbH
- *
- * 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/>.
- *
- */
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <osmocom/core/utils.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/db.h>
-#include <openbsc/debug.h>
-#include <openbsc/vlr.h>
-
-#include <stdbool.h>
-
-static struct gsm_network *msc_ctrl_net = NULL;
-
-static int verify_subscriber_modify(struct ctrl_cmd *cmd, const char *value, void *d)
-{
- return 0;
-}
-
-static int set_subscriber_modify(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "Command moved to osmo-hlr, no longer available here";
- return CTRL_CMD_ERROR;
-}
-
-CTRL_CMD_DEFINE_WO(subscriber_modify, "subscriber-modify-v1");
-
-static int set_subscriber_delete(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "Command moved to osmo-hlr, no longer available here";
- return CTRL_CMD_ERROR;
-}
-CTRL_CMD_DEFINE_WO_NOVRF(subscriber_delete, "subscriber-delete-v1");
-
-static int get_subscriber_list(struct ctrl_cmd *cmd, void *d)
-{
- struct vlr_subscr *vsub;
-
- if (!msc_ctrl_net) {
- cmd->reply = "MSC CTRL commands not initialized";
- return CTRL_CMD_ERROR;
- }
-
- if (!msc_ctrl_net->vlr) {
- cmd->reply = "VLR not initialized";
- return CTRL_CMD_ERROR;
- }
-
- cmd->reply = talloc_strdup(cmd, "");
-
- llist_for_each_entry(vsub, &msc_ctrl_net->vlr->subscribers, list) {
- cmd->reply = talloc_asprintf_append(cmd->reply, "%s,%s\n",
- vsub->imsi, vsub->msisdn);
- }
- printf("%s\n", cmd->reply); /* <-- what? */
- return CTRL_CMD_REPLY;
-}
-CTRL_CMD_DEFINE_RO(subscriber_list, "subscriber-list-active-v1");
-
-int msc_ctrl_cmds_install(struct gsm_network *net)
-{
- int rc = 0;
- msc_ctrl_net = net;
-
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_subscriber_modify);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_subscriber_delete);
- rc |= ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_subscriber_list);
- return rc;
-}
diff --git a/src/libmsc/db.c b/src/libmsc/db.c
deleted file mode 100644
index ae7e2876b..000000000
--- a/src/libmsc/db.c
+++ /dev/null
@@ -1,1007 +0,0 @@
-/* Simple HLR/VLR database backend using dbi */
-/* (C) 2008 by Jan Luebbe <jluebbe@debian.org>
- * (C) 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <stdint.h>
-#include <inttypes.h>
-#include <libgen.h>
-#include <stdio.h>
-#include <stdbool.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <dbi/dbi.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_11.h>
-#include <openbsc/db.h>
-#include <openbsc/debug.h>
-#include <openbsc/vlr.h>
-
-#include <osmocom/gsm/protocol/gsm_23_003.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/statistics.h>
-#include <osmocom/core/rate_ctr.h>
-#include <osmocom/core/utils.h>
-
-#include <openssl/rand.h>
-
-static char *db_basename = NULL;
-static char *db_dirname = NULL;
-static dbi_conn conn;
-
-#define SCHEMA_REVISION "5"
-
-enum {
- SCHEMA_META,
- INSERT_META,
- SCHEMA_SUBSCRIBER,
- SCHEMA_AUTH,
- SCHEMA_EQUIPMENT,
- SCHEMA_EQUIPMENT_WATCH,
- SCHEMA_SMS,
- SCHEMA_VLR,
- SCHEMA_APDU,
- SCHEMA_COUNTERS,
- SCHEMA_RATE,
- SCHEMA_AUTHKEY,
- SCHEMA_AUTHLAST,
-};
-
-static const char *create_stmts[] = {
- [SCHEMA_META] = "CREATE TABLE IF NOT EXISTS Meta ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "key TEXT UNIQUE NOT NULL, "
- "value TEXT NOT NULL"
- ")",
- [INSERT_META] = "INSERT OR IGNORE INTO Meta "
- "(key, value) "
- "VALUES "
- "('revision', " SCHEMA_REVISION ")",
- [SCHEMA_SUBSCRIBER] = "CREATE TABLE IF NOT EXISTS Subscriber ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "updated TIMESTAMP NOT NULL, "
- "imsi NUMERIC UNIQUE NOT NULL, "
- "name TEXT, "
- "extension TEXT UNIQUE, "
- "authorized INTEGER NOT NULL DEFAULT 0, "
- "tmsi TEXT UNIQUE, "
- "lac INTEGER NOT NULL DEFAULT 0, "
- "expire_lu TIMESTAMP DEFAULT NULL"
- ")",
- [SCHEMA_AUTH] = "CREATE TABLE IF NOT EXISTS AuthToken ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "subscriber_id INTEGER UNIQUE NOT NULL, "
- "created TIMESTAMP NOT NULL, "
- "token TEXT UNIQUE NOT NULL"
- ")",
- [SCHEMA_EQUIPMENT] = "CREATE TABLE IF NOT EXISTS Equipment ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "updated TIMESTAMP NOT NULL, "
- "name TEXT, "
- "classmark1 NUMERIC, "
- "classmark2 BLOB, "
- "classmark3 BLOB, "
- "imei NUMERIC UNIQUE NOT NULL"
- ")",
- [SCHEMA_EQUIPMENT_WATCH] = "CREATE TABLE IF NOT EXISTS EquipmentWatch ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "updated TIMESTAMP NOT NULL, "
- "subscriber_id NUMERIC NOT NULL, "
- "equipment_id NUMERIC NOT NULL, "
- "UNIQUE (subscriber_id, equipment_id) "
- ")",
- [SCHEMA_SMS] = "CREATE TABLE IF NOT EXISTS SMS ("
- /* metadata, not part of sms */
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "sent TIMESTAMP, "
- "deliver_attempts INTEGER NOT NULL DEFAULT 0, "
- /* data directly copied/derived from SMS */
- "valid_until TIMESTAMP, "
- "reply_path_req INTEGER NOT NULL, "
- "status_rep_req INTEGER NOT NULL, "
- "is_report INTEGER NOT NULL, "
- "msg_ref INTEGER NOT NULL, "
- "protocol_id INTEGER NOT NULL, "
- "data_coding_scheme INTEGER NOT NULL, "
- "ud_hdr_ind INTEGER NOT NULL, "
- "src_addr TEXT NOT NULL, "
- "src_ton INTEGER NOT NULL, "
- "src_npi INTEGER NOT NULL, "
- "dest_addr TEXT NOT NULL, "
- "dest_ton INTEGER NOT NULL, "
- "dest_npi INTEGER NOT NULL, "
- "user_data BLOB, " /* TP-UD */
- /* additional data, interpreted from SMS */
- "header BLOB, " /* UD Header */
- "text TEXT " /* decoded UD after UDH */
- ")",
- [SCHEMA_VLR] = "CREATE TABLE IF NOT EXISTS VLR ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "updated TIMESTAMP NOT NULL, "
- "subscriber_id NUMERIC UNIQUE NOT NULL, "
- "last_bts NUMERIC NOT NULL "
- ")",
- [SCHEMA_APDU] = "CREATE TABLE IF NOT EXISTS ApduBlobs ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "created TIMESTAMP NOT NULL, "
- "apdu_id_flags INTEGER NOT NULL, "
- "subscriber_id INTEGER NOT NULL, "
- "apdu BLOB "
- ")",
- [SCHEMA_COUNTERS] = "CREATE TABLE IF NOT EXISTS Counters ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "timestamp TIMESTAMP NOT NULL, "
- "value INTEGER NOT NULL, "
- "name TEXT NOT NULL "
- ")",
- [SCHEMA_RATE] = "CREATE TABLE IF NOT EXISTS RateCounters ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT, "
- "timestamp TIMESTAMP NOT NULL, "
- "value INTEGER NOT NULL, "
- "name TEXT NOT NULL, "
- "idx INTEGER NOT NULL "
- ")",
- [SCHEMA_AUTHKEY] = "CREATE TABLE IF NOT EXISTS AuthKeys ("
- "subscriber_id INTEGER PRIMARY KEY, "
- "algorithm_id INTEGER NOT NULL, "
- "a3a8_ki BLOB "
- ")",
- [SCHEMA_AUTHLAST] = "CREATE TABLE IF NOT EXISTS AuthLastTuples ("
- "subscriber_id INTEGER PRIMARY KEY, "
- "issued TIMESTAMP NOT NULL, "
- "use_count INTEGER NOT NULL DEFAULT 0, "
- "key_seq INTEGER NOT NULL, "
- "rand BLOB NOT NULL, "
- "sres BLOB NOT NULL, "
- "kc BLOB NOT NULL "
- ")",
-};
-
-void db_error_func(dbi_conn conn, void *data)
-{
- const char *msg;
- dbi_conn_error(conn, &msg);
- LOGP(DDB, LOGL_ERROR, "DBI: %s\n", msg);
- osmo_log_backtrace(DDB, LOGL_ERROR);
-}
-
-static int update_db_revision_2(void)
-{
- dbi_result result;
-
- result = dbi_conn_query(conn,
- "ALTER TABLE Subscriber "
- "ADD COLUMN expire_lu "
- "TIMESTAMP DEFAULT NULL");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to alter table Subscriber (upgrade from rev 2).\n");
- return -EINVAL;
- }
- dbi_result_free(result);
-
- result = dbi_conn_query(conn,
- "UPDATE Meta "
- "SET value = '3' "
- "WHERE key = 'revision'");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to update DB schema revision (upgrade from rev 2).\n");
- return -EINVAL;
- }
- dbi_result_free(result);
-
- return 0;
-}
-
-/**
- * Copied from the normal sms_from_result_v3 to avoid having
- * to make sure that the real routine will remain backward
- * compatible.
- */
-static struct gsm_sms *sms_from_result_v3(dbi_result result)
-{
- struct gsm_sms *sms = sms_alloc();
- long long unsigned int sender_id;
- const char *text, *daddr;
- const unsigned char *user_data;
- char buf[32];
- char *quoted;
- dbi_result result2;
- const char *extension;
-
- if (!sms)
- return NULL;
-
- sms->id = dbi_result_get_ulonglong(result, "id");
-
- /* find extension by id, assuming that the subscriber still exists in
- * the db */
- sender_id = dbi_result_get_ulonglong(result, "sender_id");
- snprintf(buf, sizeof(buf), "%llu", sender_id);
-
- dbi_conn_quote_string_copy(conn, buf, &quoted);
- result2 = dbi_conn_queryf(conn,
- "SELECT extension FROM Subscriber "
- "WHERE id = %s ", quoted);
- free(quoted);
- extension = dbi_result_get_string(result2, "extension");
- if (extension)
- osmo_strlcpy(sms->src.addr, extension, sizeof(sms->src.addr));
- dbi_result_free(result2);
- /* got the extension */
-
- sms->reply_path_req = dbi_result_get_ulonglong(result, "reply_path_req");
- sms->status_rep_req = dbi_result_get_ulonglong(result, "status_rep_req");
- sms->ud_hdr_ind = dbi_result_get_ulonglong(result, "ud_hdr_ind");
- sms->protocol_id = dbi_result_get_ulonglong(result, "protocol_id");
- sms->data_coding_scheme = dbi_result_get_ulonglong(result,
- "data_coding_scheme");
-
- daddr = dbi_result_get_string(result, "dest_addr");
- if (daddr)
- osmo_strlcpy(sms->dst.addr, daddr, sizeof(sms->dst.addr));
-
- sms->user_data_len = dbi_result_get_field_length(result, "user_data");
- user_data = dbi_result_get_binary(result, "user_data");
- if (sms->user_data_len > sizeof(sms->user_data))
- sms->user_data_len = (uint8_t) sizeof(sms->user_data);
- memcpy(sms->user_data, user_data, sms->user_data_len);
-
- text = dbi_result_get_string(result, "text");
- if (text)
- osmo_strlcpy(sms->text, text, sizeof(sms->text));
- return sms;
-}
-
-static int update_db_revision_3(void)
-{
- dbi_result result;
- struct gsm_sms *sms;
-
- LOGP(DDB, LOGL_NOTICE, "Going to migrate from revision 3\n");
-
- result = dbi_conn_query(conn, "BEGIN EXCLUSIVE TRANSACTION");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to begin transaction (upgrade from rev 3)\n");
- return -EINVAL;
- }
- dbi_result_free(result);
-
- /* Rename old SMS table to be able create a new one */
- result = dbi_conn_query(conn, "ALTER TABLE SMS RENAME TO SMS_3");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to rename the old SMS table (upgrade from rev 3).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* Create new SMS table with all the bells and whistles! */
- result = dbi_conn_query(conn, create_stmts[SCHEMA_SMS]);
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to create a new SMS table (upgrade from rev 3).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* Cycle through old messages and convert them to the new format */
- result = dbi_conn_query(conn, "SELECT * FROM SMS_3");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed fetch messages from the old SMS table (upgrade from rev 3).\n");
- goto rollback;
- }
- while (dbi_result_next_row(result)) {
- sms = sms_from_result_v3(result);
- if (db_sms_store(sms) != 0) {
- LOGP(DDB, LOGL_ERROR, "Failed to store message to the new SMS table(upgrade from rev 3).\n");
- sms_free(sms);
- dbi_result_free(result);
- goto rollback;
- }
- sms_free(sms);
- }
- dbi_result_free(result);
-
- /* Remove the temporary table */
- result = dbi_conn_query(conn, "DROP TABLE SMS_3");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to drop the old SMS table (upgrade from rev 3).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* We're done. Bump DB Meta revision to 4 */
- result = dbi_conn_query(conn,
- "UPDATE Meta "
- "SET value = '4' "
- "WHERE key = 'revision'");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to update DB schema revision (upgrade from rev 3).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- result = dbi_conn_query(conn, "COMMIT TRANSACTION");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to commit the transaction (upgrade from rev 3)\n");
- return -EINVAL;
- } else {
- dbi_result_free(result);
- }
-
- /* Shrink DB file size by actually wiping out SMS_3 table data */
- result = dbi_conn_query(conn, "VACUUM");
- if (!result)
- LOGP(DDB, LOGL_ERROR,
- "VACUUM failed. Ignoring it (upgrade from rev 3).\n");
- else
- dbi_result_free(result);
-
- return 0;
-
-rollback:
- result = dbi_conn_query(conn, "ROLLBACK TRANSACTION");
- if (!result)
- LOGP(DDB, LOGL_ERROR,
- "Rollback failed (upgrade from rev 3).\n");
- else
- dbi_result_free(result);
- return -EINVAL;
-}
-
-/* Just like v3, but there is a new message reference field for status reports,
- * that is set to zero for existing entries since there is no way we can infer
- * this.
- */
-static struct gsm_sms *sms_from_result_v4(dbi_result result)
-{
- struct gsm_sms *sms = sms_alloc();
- const unsigned char *user_data;
- const char *text, *addr;
-
- if (!sms)
- return NULL;
-
- sms->id = dbi_result_get_ulonglong(result, "id");
-
- sms->reply_path_req = dbi_result_get_ulonglong(result, "reply_path_req");
- sms->status_rep_req = dbi_result_get_ulonglong(result, "status_rep_req");
- sms->ud_hdr_ind = dbi_result_get_ulonglong(result, "ud_hdr_ind");
- sms->protocol_id = dbi_result_get_ulonglong(result, "protocol_id");
- sms->data_coding_scheme = dbi_result_get_ulonglong(result,
- "data_coding_scheme");
-
- addr = dbi_result_get_string(result, "src_addr");
- osmo_strlcpy(sms->src.addr, addr, sizeof(sms->src.addr));
- sms->src.ton = dbi_result_get_ulonglong(result, "src_ton");
- sms->src.npi = dbi_result_get_ulonglong(result, "src_npi");
-
- addr = dbi_result_get_string(result, "dest_addr");
- osmo_strlcpy(sms->dst.addr, addr, sizeof(sms->dst.addr));
- sms->dst.ton = dbi_result_get_ulonglong(result, "dest_ton");
- sms->dst.npi = dbi_result_get_ulonglong(result, "dest_npi");
-
- sms->user_data_len = dbi_result_get_field_length(result, "user_data");
- user_data = dbi_result_get_binary(result, "user_data");
- if (sms->user_data_len > sizeof(sms->user_data))
- sms->user_data_len = (uint8_t) sizeof(sms->user_data);
- memcpy(sms->user_data, user_data, sms->user_data_len);
-
- text = dbi_result_get_string(result, "text");
- if (text)
- osmo_strlcpy(sms->text, text, sizeof(sms->text));
- return sms;
-}
-
-static int update_db_revision_4(void)
-{
- dbi_result result;
- struct gsm_sms *sms;
-
- LOGP(DDB, LOGL_NOTICE, "Going to migrate from revision 4\n");
-
- result = dbi_conn_query(conn, "BEGIN EXCLUSIVE TRANSACTION");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to begin transaction (upgrade from rev 4)\n");
- return -EINVAL;
- }
- dbi_result_free(result);
-
- /* Rename old SMS table to be able create a new one */
- result = dbi_conn_query(conn, "ALTER TABLE SMS RENAME TO SMS_4");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to rename the old SMS table (upgrade from rev 4).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* Create new SMS table with all the bells and whistles! */
- result = dbi_conn_query(conn, create_stmts[SCHEMA_SMS]);
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to create a new SMS table (upgrade from rev 4).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* Cycle through old messages and convert them to the new format */
- result = dbi_conn_query(conn, "SELECT * FROM SMS_4");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed fetch messages from the old SMS table (upgrade from rev 4).\n");
- goto rollback;
- }
- while (dbi_result_next_row(result)) {
- sms = sms_from_result_v4(result);
- if (db_sms_store(sms) != 0) {
- LOGP(DDB, LOGL_ERROR, "Failed to store message to the new SMS table(upgrade from rev 4).\n");
- sms_free(sms);
- dbi_result_free(result);
- goto rollback;
- }
- sms_free(sms);
- }
- dbi_result_free(result);
-
- /* Remove the temporary table */
- result = dbi_conn_query(conn, "DROP TABLE SMS_4");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to drop the old SMS table (upgrade from rev 4).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- /* We're done. Bump DB Meta revision to 4 */
- result = dbi_conn_query(conn,
- "UPDATE Meta "
- "SET value = '5' "
- "WHERE key = 'revision'");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to update DB schema revision (upgrade from rev 4).\n");
- goto rollback;
- }
- dbi_result_free(result);
-
- result = dbi_conn_query(conn, "COMMIT TRANSACTION");
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to commit the transaction (upgrade from rev 4)\n");
- return -EINVAL;
- } else {
- dbi_result_free(result);
- }
-
- /* Shrink DB file size by actually wiping out SMS_4 table data */
- result = dbi_conn_query(conn, "VACUUM");
- if (!result)
- LOGP(DDB, LOGL_ERROR,
- "VACUUM failed. Ignoring it (upgrade from rev 4).\n");
- else
- dbi_result_free(result);
-
- return 0;
-
-rollback:
- result = dbi_conn_query(conn, "ROLLBACK TRANSACTION");
- if (!result)
- LOGP(DDB, LOGL_ERROR,
- "Rollback failed (upgrade from rev 4).\n");
- else
- dbi_result_free(result);
- return -EINVAL;
-}
-
-static int check_db_revision(void)
-{
- dbi_result result;
- const char *rev_s;
- int db_rev = 0;
-
- /* Make a query */
- result = dbi_conn_query(conn,
- "SELECT value FROM Meta "
- "WHERE key = 'revision'");
-
- if (!result)
- return -EINVAL;
-
- if (!dbi_result_next_row(result)) {
- dbi_result_free(result);
- return -EINVAL;
- }
-
- /* Fetch the DB schema revision */
- rev_s = dbi_result_get_string(result, "value");
- if (!rev_s) {
- dbi_result_free(result);
- return -EINVAL;
- }
-
- if (!strcmp(rev_s, SCHEMA_REVISION)) {
- /* Everything is fine */
- dbi_result_free(result);
- return 0;
- }
-
- db_rev = atoi(rev_s);
- dbi_result_free(result);
-
- /* Incremental migration waterfall */
- switch (db_rev) {
- case 2:
- if (update_db_revision_2())
- goto error;
- case 3:
- if (update_db_revision_3())
- goto error;
- case 4:
- if (update_db_revision_4())
- goto error;
-
- /* The end of waterfall */
- break;
- default:
- LOGP(DDB, LOGL_FATAL,
- "Invalid database schema revision '%d'.\n", db_rev);
- return -EINVAL;
- }
-
- return 0;
-
-error:
- LOGP(DDB, LOGL_FATAL, "Failed to update database "
- "from schema revision '%d'.\n", db_rev);
- return -EINVAL;
-}
-
-static int db_configure(void)
-{
- dbi_result result;
-
- result = dbi_conn_query(conn,
- "PRAGMA synchronous = FULL");
- if (!result)
- return -EINVAL;
-
- dbi_result_free(result);
- return 0;
-}
-
-int db_init(const char *name)
-{
- dbi_initialize(NULL);
-
- conn = dbi_conn_new("sqlite3");
- if (conn == NULL) {
- LOGP(DDB, LOGL_FATAL, "Failed to create connection.\n");
- return 1;
- }
-
- dbi_conn_error_handler( conn, db_error_func, NULL );
-
- /* MySQL
- dbi_conn_set_option(conn, "host", "localhost");
- dbi_conn_set_option(conn, "username", "your_name");
- dbi_conn_set_option(conn, "password", "your_password");
- dbi_conn_set_option(conn, "dbname", "your_dbname");
- dbi_conn_set_option(conn, "encoding", "UTF-8");
- */
-
- /* SqLite 3 */
- db_basename = strdup(name);
- db_dirname = strdup(name);
- dbi_conn_set_option(conn, "sqlite3_dbdir", dirname(db_dirname));
- dbi_conn_set_option(conn, "dbname", basename(db_basename));
-
- if (dbi_conn_connect(conn) < 0)
- goto out_err;
-
- return 0;
-
-out_err:
- free(db_dirname);
- free(db_basename);
- db_dirname = db_basename = NULL;
- return -1;
-}
-
-
-int db_prepare(void)
-{
- dbi_result result;
- int i;
-
- for (i = 0; i < ARRAY_SIZE(create_stmts); i++) {
- result = dbi_conn_query(conn, create_stmts[i]);
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to create some table.\n");
- return 1;
- }
- dbi_result_free(result);
- }
-
- if (check_db_revision() < 0) {
- LOGP(DDB, LOGL_FATAL, "Database schema revision invalid, "
- "please update your database schema\n");
- return -1;
- }
-
- db_configure();
-
- return 0;
-}
-
-int db_fini(void)
-{
- dbi_conn_close(conn);
- dbi_shutdown();
-
- free(db_dirname);
- free(db_basename);
- return 0;
-}
-
-/* store an [unsent] SMS to the database */
-int db_sms_store(struct gsm_sms *sms)
-{
- dbi_result result;
- char *q_text, *q_daddr, *q_saddr;
- unsigned char *q_udata;
- char *validity_timestamp = "2222-2-2";
-
- /* FIXME: generate validity timestamp based on validity_minutes */
-
- dbi_conn_quote_string_copy(conn, (char *)sms->text, &q_text);
- dbi_conn_quote_string_copy(conn, (char *)sms->dst.addr, &q_daddr);
- dbi_conn_quote_string_copy(conn, (char *)sms->src.addr, &q_saddr);
- dbi_conn_quote_binary_copy(conn, sms->user_data, sms->user_data_len,
- &q_udata);
-
- /* FIXME: correct validity period */
- result = dbi_conn_queryf(conn,
- "INSERT INTO SMS "
- "(created, valid_until, "
- "reply_path_req, status_rep_req, is_report, "
- "msg_ref, protocol_id, data_coding_scheme, "
- "ud_hdr_ind, "
- "user_data, text, "
- "dest_addr, dest_ton, dest_npi, "
- "src_addr, src_ton, src_npi) VALUES "
- "(datetime('now'), %u, "
- "%u, %u, %u, "
- "%u, %u, %u, "
- "%u, "
- "%s, %s, "
- "%s, %u, %u, "
- "%s, %u, %u)",
- validity_timestamp,
- sms->reply_path_req, sms->status_rep_req, sms->is_report,
- sms->msg_ref, sms->protocol_id, sms->data_coding_scheme,
- sms->ud_hdr_ind,
- q_udata, q_text,
- q_daddr, sms->dst.ton, sms->dst.npi,
- q_saddr, sms->src.ton, sms->src.npi);
- free(q_text);
- free(q_udata);
- free(q_daddr);
- free(q_saddr);
-
- if (!result)
- return -EIO;
-
- dbi_result_free(result);
- return 0;
-}
-
-static struct gsm_sms *sms_from_result(struct gsm_network *net, dbi_result result)
-{
- struct gsm_sms *sms = sms_alloc();
- const char *text, *daddr, *saddr;
- const unsigned char *user_data;
-
- if (!sms)
- return NULL;
-
- sms->id = dbi_result_get_ulonglong(result, "id");
-
- /* FIXME: validity */
- /* FIXME: those should all be get_uchar, but sqlite3 is braindead */
- sms->created = dbi_result_get_datetime(result, "created");
- sms->reply_path_req = dbi_result_get_ulonglong(result, "reply_path_req");
- sms->status_rep_req = dbi_result_get_ulonglong(result, "status_rep_req");
- sms->is_report = dbi_result_get_ulonglong(result, "is_report");
- sms->msg_ref = dbi_result_get_ulonglong(result, "msg_ref");
- sms->ud_hdr_ind = dbi_result_get_ulonglong(result, "ud_hdr_ind");
- sms->protocol_id = dbi_result_get_ulonglong(result, "protocol_id");
- sms->data_coding_scheme = dbi_result_get_ulonglong(result,
- "data_coding_scheme");
-
- sms->dst.npi = dbi_result_get_ulonglong(result, "dest_npi");
- sms->dst.ton = dbi_result_get_ulonglong(result, "dest_ton");
- daddr = dbi_result_get_string(result, "dest_addr");
- if (daddr)
- osmo_strlcpy(sms->dst.addr, daddr, sizeof(sms->dst.addr));
- sms->receiver = vlr_subscr_find_by_msisdn(net->vlr, sms->dst.addr);
-
- sms->src.npi = dbi_result_get_ulonglong(result, "src_npi");
- sms->src.ton = dbi_result_get_ulonglong(result, "src_ton");
- saddr = dbi_result_get_string(result, "src_addr");
- if (saddr)
- osmo_strlcpy(sms->src.addr, saddr, sizeof(sms->src.addr));
-
- sms->user_data_len = dbi_result_get_field_length(result, "user_data");
- user_data = dbi_result_get_binary(result, "user_data");
- if (sms->user_data_len > sizeof(sms->user_data))
- sms->user_data_len = (uint8_t) sizeof(sms->user_data);
- memcpy(sms->user_data, user_data, sms->user_data_len);
-
- text = dbi_result_get_string(result, "text");
- if (text)
- osmo_strlcpy(sms->text, text, sizeof(sms->text));
- return sms;
-}
-
-struct gsm_sms *db_sms_get(struct gsm_network *net, unsigned long long id)
-{
- dbi_result result;
- struct gsm_sms *sms;
-
- result = dbi_conn_queryf(conn,
- "SELECT * FROM SMS WHERE SMS.id = %llu", id);
- if (!result)
- return NULL;
-
- if (!dbi_result_next_row(result)) {
- dbi_result_free(result);
- return NULL;
- }
-
- sms = sms_from_result(net, result);
-
- dbi_result_free(result);
-
- return sms;
-}
-
-struct gsm_sms *db_sms_get_next_unsent(struct gsm_network *net,
- unsigned long long min_sms_id,
- unsigned int max_failed)
-{
- dbi_result result;
- struct gsm_sms *sms;
-
- result = dbi_conn_queryf(conn,
- "SELECT * FROM SMS"
- " WHERE sent IS NULL"
- " AND id >= %llu"
- " AND deliver_attempts <= %u"
- " ORDER BY id LIMIT 1",
- min_sms_id, max_failed);
-
- if (!result)
- return NULL;
-
- if (!dbi_result_next_row(result)) {
- dbi_result_free(result);
- return NULL;
- }
-
- sms = sms_from_result(net, result);
-
- dbi_result_free(result);
-
- return sms;
-}
-
-/* retrieve the next unsent SMS for a given subscriber */
-struct gsm_sms *db_sms_get_unsent_for_subscr(struct vlr_subscr *vsub,
- unsigned int max_failed)
-{
- struct gsm_network *net = vsub->vlr->user_ctx;
- dbi_result result;
- struct gsm_sms *sms;
-
- if (!vsub->lu_complete)
- return NULL;
-
- result = dbi_conn_queryf(conn,
- "SELECT * FROM SMS"
- " WHERE sent IS NULL"
- " AND dest_addr=%s"
- " AND deliver_attempts <= %u"
- " ORDER BY id LIMIT 1",
- vsub->msisdn, max_failed);
- if (!result)
- return NULL;
-
- if (!dbi_result_next_row(result)) {
- dbi_result_free(result);
- return NULL;
- }
-
- sms = sms_from_result(net, result);
-
- dbi_result_free(result);
-
- return sms;
-}
-
-struct gsm_sms *db_sms_get_next_unsent_rr_msisdn(struct gsm_network *net,
- const char *last_msisdn,
- unsigned int max_failed)
-{
- dbi_result result;
- struct gsm_sms *sms;
-
- result = dbi_conn_queryf(conn,
- "SELECT * FROM SMS"
- " WHERE sent IS NULL"
- " AND dest_addr > '%s'"
- " AND deliver_attempts <= %u"
- " ORDER BY dest_addr, id LIMIT 1",
- last_msisdn, max_failed);
- if (!result)
- return NULL;
-
- if (!dbi_result_next_row(result)) {
- dbi_result_free(result);
- return NULL;
- }
-
- sms = sms_from_result(net, result);
-
- dbi_result_free(result);
-
- return sms;
-}
-
-/* mark a given SMS as delivered */
-int db_sms_mark_delivered(struct gsm_sms *sms)
-{
- dbi_result result;
-
- result = dbi_conn_queryf(conn,
- "UPDATE SMS "
- "SET sent = datetime('now') "
- "WHERE id = %llu", sms->id);
- if (!result) {
- LOGP(DDB, LOGL_ERROR, "Failed to mark SMS %llu as sent.\n", sms->id);
- return 1;
- }
-
- dbi_result_free(result);
- return 0;
-}
-
-/* increase the number of attempted deliveries */
-int db_sms_inc_deliver_attempts(struct gsm_sms *sms)
-{
- dbi_result result;
-
- result = dbi_conn_queryf(conn,
- "UPDATE SMS "
- "SET deliver_attempts = deliver_attempts + 1 "
- "WHERE id = %llu", sms->id);
- if (!result) {
- LOGP(DDB, LOGL_ERROR, "Failed to inc deliver attempts for "
- "SMS %llu.\n", sms->id);
- return 1;
- }
-
- dbi_result_free(result);
- return 0;
-}
-
-/* Drop all pending SMS to or from the given extension */
-int db_sms_delete_by_msisdn(const char *msisdn)
-{
- dbi_result result;
- if (!msisdn || !*msisdn)
- return 0;
- result = dbi_conn_queryf(conn,
- "DELETE FROM SMS WHERE src_addr=%s OR dest_addr=%s",
- msisdn, msisdn);
- if (!result) {
- LOGP(DDB, LOGL_ERROR,
- "Failed to delete SMS for %s\n", msisdn);
- return -1;
- }
- dbi_result_free(result);
- return 0;
-}
-
-int db_store_counter(struct osmo_counter *ctr)
-{
- dbi_result result;
- char *q_name;
-
- dbi_conn_quote_string_copy(conn, ctr->name, &q_name);
-
- result = dbi_conn_queryf(conn,
- "INSERT INTO Counters "
- "(timestamp,name,value) VALUES "
- "(datetime('now'),%s,%lu)", q_name, ctr->value);
-
- free(q_name);
-
- if (!result)
- return -EIO;
-
- dbi_result_free(result);
- return 0;
-}
-
-static int db_store_rate_ctr(struct rate_ctr_group *ctrg, unsigned int num,
- char *q_prefix)
-{
- dbi_result result;
- char *q_name;
-
- dbi_conn_quote_string_copy(conn, ctrg->desc->ctr_desc[num].name,
- &q_name);
-
- result = dbi_conn_queryf(conn,
- "Insert INTO RateCounters "
- "(timestamp,name,idx,value) VALUES "
- "(datetime('now'),%s.%s,%u,%"PRIu64")",
- q_prefix, q_name, ctrg->idx, ctrg->ctr[num].current);
-
- free(q_name);
-
- if (!result)
- return -EIO;
-
- dbi_result_free(result);
- return 0;
-}
-
-int db_store_rate_ctr_group(struct rate_ctr_group *ctrg)
-{
- unsigned int i;
- char *q_prefix;
-
- dbi_conn_quote_string_copy(conn, ctrg->desc->group_name_prefix, &q_prefix);
-
- for (i = 0; i < ctrg->desc->num_ctr; i++)
- db_store_rate_ctr(ctrg, i, q_prefix);
-
- free(q_prefix);
-
- return 0;
-}
diff --git a/src/libmsc/gsm_04_08.c b/src/libmsc/gsm_04_08.c
deleted file mode 100644
index 21bc2b83b..000000000
--- a/src/libmsc/gsm_04_08.c
+++ /dev/null
@@ -1,3493 +0,0 @@
-/* GSM Mobile Radio Interface Layer 3 messages on the A-bis interface
- * 3GPP TS 04.08 version 7.21.0 Release 1998 / ETSI TS 100 940 V7.21.0 */
-
-/* (C) 2008-2016 by Harald Welte <laforge@gnumonks.org>
- * (C) 2008-2012 by Holger Hans Peter Freyther <zecke@selfish.org>
- *
- * 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/>.
- *
- */
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <stdbool.h>
-#include <errno.h>
-#include <time.h>
-#include <netinet/in.h>
-#include <regex.h>
-#include <sys/types.h>
-#include <openssl/rand.h>
-
-#include "bscconfig.h"
-
-#include <openbsc/auth.h>
-#include <openbsc/db.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_11.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/gsm_04_14.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-#include <osmocom/abis/trau_frame.h>
-#include <openbsc/trau_mux.h>
-#include <openbsc/rtp_proxy.h>
-#include <openbsc/transaction.h>
-#include <openbsc/ussd.h>
-#include <openbsc/silent_call.h>
-#include <openbsc/bsc_api.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/handover.h>
-#include <openbsc/mncc_int.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/core/bitvec.h>
-#include <openbsc/vlr.h>
-#include <openbsc/msc_ifaces.h>
-
-#include <osmocom/gsm/gsm48.h>
-#include <osmocom/gsm/gsm0480.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/crypt/auth.h>
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-#endif
-
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/a_iface.h>
-
-#include <assert.h>
-
-
-void *tall_locop_ctx;
-void *tall_authciphop_ctx;
-
-static int gsm0408_loc_upd_acc(struct gsm_subscriber_connection *conn,
- uint32_t send_tmsi);
-static int gsm48_tx_simple(struct gsm_subscriber_connection *conn,
- uint8_t pdisc, uint8_t msg_type);
-
-struct gsm_lai {
- uint16_t mcc;
- uint16_t mnc;
- uint16_t lac;
-};
-
-static uint32_t new_callref = 0x80000001;
-
-void cc_tx_to_mncc(struct gsm_network *net, struct msgb *msg)
-{
- net->mncc_recv(net, msg);
-}
-
-static int gsm48_conn_sendmsg(struct msgb *msg, struct gsm_subscriber_connection *conn,
- struct gsm_trans *trans)
-{
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msg->data;
-
- /* if we get passed a transaction reference, do some common
- * work that the caller no longer has to do */
- if (trans) {
- gh->proto_discr = trans->protocol | (trans->transaction_id << 4);
- }
-
- return msc_tx_dtap(conn, msg);
-}
-
-int gsm48_cc_tx_notify_ss(struct gsm_trans *trans, const char *message)
-{
- struct gsm48_hdr *gh;
- struct msgb *ss_notify;
-
- ss_notify = gsm0480_create_notifySS(message);
- if (!ss_notify)
- return -1;
-
- gsm0480_wrap_invoke(ss_notify, GSM0480_OP_CODE_NOTIFY_SS, 0);
- uint8_t *data = msgb_push(ss_notify, 1);
- data[0] = ss_notify->len - 1;
- gh = (struct gsm48_hdr *) msgb_push(ss_notify, sizeof(*gh));
- gh->msg_type = GSM48_MT_CC_FACILITY;
- return gsm48_conn_sendmsg(ss_notify, trans->conn, trans);
-}
-
-/* clear all transactions globally; used in case of MNCC socket disconnect */
-void gsm0408_clear_all_trans(struct gsm_network *net, int protocol)
-{
- struct gsm_trans *trans, *temp;
-
- LOGP(DCC, LOGL_NOTICE, "Clearing all currently active transactions!!!\n");
-
- llist_for_each_entry_safe(trans, temp, &net->trans_list, entry) {
- if (trans->protocol == protocol) {
- trans->callref = 0;
- trans_free(trans);
- }
- }
-}
-
-/* Chapter 9.2.14 : Send LOCATION UPDATING REJECT */
-static int gsm0408_loc_upd_rej(struct gsm_subscriber_connection *conn, uint8_t cause)
-{
- struct msgb *msg;
-
- msg = gsm48_create_loc_upd_rej(cause);
- if (!msg) {
- LOGP(DMM, LOGL_ERROR, "Failed to create msg for LOCATION UPDATING REJECT.\n");
- return -1;
- }
-
- LOGP(DMM, LOGL_INFO, "Subscriber %s: LOCATION UPDATING REJECT\n",
- vlr_subscr_name(conn->vsub));
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/* Chapter 9.2.13 : Send LOCATION UPDATE ACCEPT */
-static int gsm0408_loc_upd_acc(struct gsm_subscriber_connection *conn,
- uint32_t send_tmsi)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 LOC UPD ACC");
- struct gsm48_hdr *gh;
- struct gsm48_loc_area_id *lai;
- uint8_t *mid;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_LOC_UPD_ACCEPT;
-
- lai = (struct gsm48_loc_area_id *) msgb_put(msg, sizeof(*lai));
- gsm48_generate_lai(lai, conn->network->country_code,
- conn->network->network_code,
- conn->lac);
-
- if (send_tmsi == GSM_RESERVED_TMSI) {
- /* we did not allocate a TMSI to the MS, so we need to
- * include the IMSI in order for the MS to delete any
- * old TMSI that might still be allocated */
- uint8_t mi[10];
- int len;
- len = gsm48_generate_mid_from_imsi(mi, conn->vsub->imsi);
- mid = msgb_put(msg, len);
- memcpy(mid, mi, len);
- DEBUGP(DMM, "-> %s LOCATION UPDATE ACCEPT\n",
- vlr_subscr_name(conn->vsub));
- } else {
- /* Include the TMSI, which means that the MS will send a
- * TMSI REALLOCATION COMPLETE, and we should wait for
- * that until T3250 expiration */
- mid = msgb_put(msg, GSM48_MID_TMSI_LEN);
- gsm48_generate_mid_from_tmsi(mid, send_tmsi);
- DEBUGP(DMM, "-> %s LOCATION UPDATE ACCEPT (TMSI = 0x%08x)\n",
- vlr_subscr_name(conn->vsub),
- send_tmsi);
- }
- /* TODO: Follow-on proceed */
- /* TODO: CTS permission */
- /* TODO: Equivalent PLMNs */
- /* TODO: Emergency Number List */
- /* TODO: Per-MS T3312 */
-
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/* Transmit Chapter 9.2.10 Identity Request */
-static int mm_tx_identity_req(struct gsm_subscriber_connection *conn, uint8_t id_type)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 ID REQ");
- struct gsm48_hdr *gh;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh) + 1);
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_ID_REQ;
- gh->data[0] = id_type;
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/* Parse Chapter 9.2.11 Identity Response */
-static int mm_rx_id_resp(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t mi_type = gh->data[1] & GSM_MI_TYPE_MASK;
- char mi_string[GSM48_MI_SIZE];
-
- if (!conn->vsub) {
- LOGP(DMM, LOGL_ERROR,
- "Rx MM Identity Response: invalid: no subscriber\n");
- return -EINVAL;
- }
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), &gh->data[1], gh->data[0]);
- DEBUGP(DMM, "IDENTITY RESPONSE: MI(%s)=%s\n",
- gsm48_mi_type_name(mi_type), mi_string);
-
- osmo_signal_dispatch(SS_SUBSCR, S_SUBSCR_IDENTITY, gh->data);
-
- return vlr_subscr_rx_id_resp(conn->vsub, gh->data+1, gh->data[0]);
-}
-
-/* FIXME: to libosmogsm */
-static const struct value_string lupd_names[] = {
- { GSM48_LUPD_NORMAL, "NORMAL" },
- { GSM48_LUPD_PERIODIC, "PERIODIC" },
- { GSM48_LUPD_IMSI_ATT, "IMSI ATTACH" },
- { 0, NULL }
-};
-
-/* Chapter 9.2.15: Receive Location Updating Request.
- * Keep this function non-static for direct invocation by unit tests. */
-int mm_rx_loc_upd_req(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- static const enum subscr_conn_from conn_from_lu = SUBSCR_CONN_FROM_LU;
- struct gsm_network *net = conn->network;
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_loc_upd_req *lu;
- uint8_t mi_type;
- char mi_string[GSM48_MI_SIZE];
- enum vlr_lu_type vlr_lu_type = VLR_LU_TYPE_REGULAR;
- uint32_t tmsi;
- char *imsi;
- struct osmo_location_area_id old_lai, new_lai;
- struct osmo_fsm_inst *lu_fsm;
- bool is_utran;
- int rc;
-
- lu = (struct gsm48_loc_upd_req *) gh->data;
-
- mi_type = lu->mi[0] & GSM_MI_TYPE_MASK;
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), lu->mi, lu->mi_len);
-
- rc = msc_create_conn_fsm(conn, mi_string);
- if (rc)
- /* logging already happened in msc_create_conn_fsm() */
- return rc;
-
- conn->classmark.classmark1 = lu->classmark1;
- conn->classmark.classmark1_set = true;
-
- DEBUGP(DMM, "LOCATION UPDATING REQUEST: MI(%s)=%s type=%s\n",
- gsm48_mi_type_name(mi_type), mi_string,
- get_value_string(lupd_names, lu->type));
-
- osmo_signal_dispatch(SS_SUBSCR, S_SUBSCR_IDENTITY, &lu->mi_len);
-
- switch (lu->type) {
- case GSM48_LUPD_NORMAL:
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_NORMAL]);
- vlr_lu_type = VLR_LU_TYPE_REGULAR;
- break;
- case GSM48_LUPD_IMSI_ATT:
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_ATTACH]);
- vlr_lu_type = VLR_LU_TYPE_IMSI_ATTACH;
- break;
- case GSM48_LUPD_PERIODIC:
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_PERIODIC]);
- vlr_lu_type = VLR_LU_TYPE_PERIODIC;
- break;
- }
-
- /* TODO: 10.5.1.6 MS Classmark for UMTS / Classmark 2 */
- /* TODO: 10.5.3.14 Aditional update parameters (CS fallback calls) */
- /* TODO: 10.5.7.8 Device properties */
- /* TODO: 10.5.1.15 MS network feature support */
-
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- tmsi = GSM_RESERVED_TMSI;
- imsi = mi_string;
- break;
- case GSM_MI_TYPE_TMSI:
- tmsi = tmsi_from_string(mi_string);
- imsi = NULL;
- break;
- default:
- DEBUGPC(DMM, "unknown mobile identity type\n");
- tmsi = GSM_RESERVED_TMSI;
- imsi = NULL;
- break;
- }
-
- gsm48_decode_lai(&lu->lai, &old_lai.plmn.mcc,
- &old_lai.plmn.mnc, &old_lai.lac);
- new_lai.plmn.mcc = conn->network->country_code;
- new_lai.plmn.mnc = conn->network->network_code;
- new_lai.lac = conn->lac;
- DEBUGP(DMM, "LU/new-LAC: %u/%u\n", old_lai.lac, new_lai.lac);
-
- is_utran = (conn->via_ran == RAN_UTRAN_IU);
- lu_fsm = vlr_loc_update(conn->conn_fsm,
- SUBSCR_CONN_E_ACCEPTED,
- SUBSCR_CONN_E_CN_CLOSE,
- (void*)&conn_from_lu,
- net->vlr, conn, vlr_lu_type, tmsi, imsi,
- &old_lai, &new_lai,
- is_utran || conn->network->authentication_required,
- is_utran? VLR_CIPH_A5_3
- : conn->network->a5_encryption,
- classmark_is_r99(&conn->classmark),
- is_utran,
- net->vlr->cfg.assign_tmsi);
- if (!lu_fsm) {
- DEBUGP(DRR, "%s: Can't start LU FSM\n", mi_string);
- return 0;
- }
-
- /* From vlr_loc_update() we expect an implicit dispatch of
- * VLR_ULA_E_UPDATE_LA, and thus we expect msc_vlr_subscr_assoc() to
- * already have been called and completed. Has an error occured? */
-
- if (!conn->vsub || conn->vsub->lu_fsm != lu_fsm) {
- LOGP(DRR, LOGL_ERROR,
- "%s: internal error during Location Updating attempt\n",
- mi_string);
- return -EIO;
- }
-
- return 0;
-}
-
-/* Turn int into semi-octet representation: 98 => 0x89 */
-/* FIXME: libosmocore/libosmogsm */
-static uint8_t bcdify(uint8_t value)
-{
- uint8_t ret;
-
- ret = value / 10;
- ret |= (value % 10) << 4;
-
- return ret;
-}
-
-
-/* Section 9.2.15a */
-int gsm48_tx_mm_info(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 MM INF");
- struct gsm48_hdr *gh;
- struct gsm_network *net = conn->network;
- uint8_t *ptr8;
- int name_len, name_pad;
-
- time_t cur_t;
- struct tm* gmt_time;
- struct tm* local_time;
- int tzunits;
- int dst = 0;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_INFO;
-
- if (net->name_long) {
-#if 0
- name_len = strlen(net->name_long);
- /* 10.5.3.5a */
- ptr8 = msgb_put(msg, 3);
- ptr8[0] = GSM48_IE_NAME_LONG;
- ptr8[1] = name_len*2 +1;
- ptr8[2] = 0x90; /* UCS2, no spare bits, no CI */
-
- ptr16 = (uint16_t *) msgb_put(msg, name_len*2);
- for (i = 0; i < name_len; i++)
- ptr16[i] = htons(net->name_long[i]);
-
- /* FIXME: Use Cell Broadcast, not UCS-2, since
- * UCS-2 is only supported by later revisions of the spec */
-#endif
- name_len = (strlen(net->name_long)*7)/8;
- name_pad = (8 - strlen(net->name_long)*7)%8;
- if (name_pad > 0)
- name_len++;
- /* 10.5.3.5a */
- ptr8 = msgb_put(msg, 3);
- ptr8[0] = GSM48_IE_NAME_LONG;
- ptr8[1] = name_len +1;
- ptr8[2] = 0x80 | name_pad; /* Cell Broadcast DCS, no CI */
-
- ptr8 = msgb_put(msg, name_len);
- gsm_7bit_encode_n(ptr8, name_len, net->name_long, NULL);
-
- }
-
- if (net->name_short) {
-#if 0
- name_len = strlen(net->name_short);
- /* 10.5.3.5a */
- ptr8 = (uint8_t *) msgb_put(msg, 3);
- ptr8[0] = GSM48_IE_NAME_SHORT;
- ptr8[1] = name_len*2 + 1;
- ptr8[2] = 0x90; /* UCS2, no spare bits, no CI */
-
- ptr16 = (uint16_t *) msgb_put(msg, name_len*2);
- for (i = 0; i < name_len; i++)
- ptr16[i] = htons(net->name_short[i]);
-#endif
- name_len = (strlen(net->name_short)*7)/8;
- name_pad = (8 - strlen(net->name_short)*7)%8;
- if (name_pad > 0)
- name_len++;
- /* 10.5.3.5a */
- ptr8 = (uint8_t *) msgb_put(msg, 3);
- ptr8[0] = GSM48_IE_NAME_SHORT;
- ptr8[1] = name_len +1;
- ptr8[2] = 0x80 | name_pad; /* Cell Broadcast DCS, no CI */
-
- ptr8 = msgb_put(msg, name_len);
- gsm_7bit_encode_n(ptr8, name_len, net->name_short, NULL);
-
- }
-
- /* Section 10.5.3.9 */
- cur_t = time(NULL);
- gmt_time = gmtime(&cur_t);
-
- ptr8 = msgb_put(msg, 8);
- ptr8[0] = GSM48_IE_NET_TIME_TZ;
- ptr8[1] = bcdify(gmt_time->tm_year % 100);
- ptr8[2] = bcdify(gmt_time->tm_mon + 1);
- ptr8[3] = bcdify(gmt_time->tm_mday);
- ptr8[4] = bcdify(gmt_time->tm_hour);
- ptr8[5] = bcdify(gmt_time->tm_min);
- ptr8[6] = bcdify(gmt_time->tm_sec);
-
- if (net->tz.override) {
- /* Convert tz.hr and tz.mn to units */
- if (net->tz.hr < 0) {
- tzunits = ((net->tz.hr/-1)*4);
- tzunits = tzunits + (net->tz.mn/15);
- ptr8[7] = bcdify(tzunits);
- /* Set negative time */
- ptr8[7] |= 0x08;
- }
- else {
- tzunits = net->tz.hr*4;
- tzunits = tzunits + (net->tz.mn/15);
- ptr8[7] = bcdify(tzunits);
- }
- /* Convert DST value */
- if (net->tz.dst >= 0 && net->tz.dst <= 2)
- dst = net->tz.dst;
- }
- else {
- /* Need to get GSM offset and convert into 15 min units */
- /* This probably breaks if gmtoff returns a value not evenly divisible by 15? */
-#ifdef HAVE_TM_GMTOFF_IN_TM
- local_time = localtime(&cur_t);
- tzunits = (local_time->tm_gmtoff/60)/15;
-#else
- /* find timezone offset */
- time_t utc;
- double offsetFromUTC;
- utc = mktime(gmt_time);
- local_time = localtime(&cur_t);
- offsetFromUTC = difftime(cur_t, utc);
- if (local_time->tm_isdst)
- offsetFromUTC += 3600.0;
- tzunits = ((int)offsetFromUTC) / 60 / 15;
-#endif
- if (tzunits < 0) {
- tzunits = tzunits/-1;
- ptr8[7] = bcdify(tzunits);
- /* Flip it to negative */
- ptr8[7] |= 0x08;
- }
- else
- ptr8[7] = bcdify(tzunits);
-
- /* Does not support DST +2 */
- if (local_time->tm_isdst)
- dst = 1;
- }
-
- if (dst) {
- ptr8 = msgb_put(msg, 3);
- ptr8[0] = GSM48_IE_NET_DST;
- ptr8[1] = 1;
- ptr8[2] = dst;
- }
-
- DEBUGP(DMM, "-> MM INFO\n");
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/*! Send an Authentication Request to MS on the given subscriber connection
- * according to 3GPP/ETSI TS 24.008, Section 9.2.2.
- * \param[in] conn Subscriber connection to send on.
- * \param[in] rand Random challenge token to send, must be 16 bytes long.
- * \param[in] autn r99: In case of UMTS mutual authentication, AUTN token to
- * send; must be 16 bytes long, or pass NULL for plain GSM auth.
- * \param[in] key_seq auth tuple's sequence number.
- */
-int gsm48_tx_mm_auth_req(struct gsm_subscriber_connection *conn, uint8_t *rand,
- uint8_t *autn, int key_seq)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 AUTH REQ");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- struct gsm48_auth_req *ar = (struct gsm48_auth_req *) msgb_put(msg, sizeof(*ar));
-
- DEBUGP(DMM, "-> AUTH REQ (rand = %s)\n", osmo_hexdump_nospc(rand, 16));
- if (autn)
- DEBUGP(DMM, " AUTH REQ (autn = %s)\n", osmo_hexdump_nospc(autn, 16));
-
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_AUTH_REQ;
-
- ar->key_seq = key_seq;
-
- /* 16 bytes RAND parameters */
- osmo_static_assert(sizeof(ar->rand) == 16, sizeof_auth_req_r99_rand);
- if (rand)
- memcpy(ar->rand, rand, 16);
-
-
- /* 16 bytes AUTN */
- if (autn)
- msgb_tlv_put(msg, GSM48_IE_AUTN, 16, autn);
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/* Section 9.2.1 */
-int gsm48_tx_mm_auth_rej(struct gsm_subscriber_connection *conn)
-{
- DEBUGP(DMM, "-> AUTH REJECT\n");
- return gsm48_tx_simple(conn, GSM48_PDISC_MM, GSM48_MT_MM_AUTH_REJ);
-}
-
-static int msc_vlr_tx_cm_serv_acc(void *msc_conn_ref);
-static int msc_vlr_tx_cm_serv_rej(void *msc_conn_ref, enum vlr_proc_arq_result result);
-
-static int cm_serv_reuse_conn(struct gsm_subscriber_connection *conn, const uint8_t *mi_lv)
-{
- uint8_t mi_type;
- char mi_string[GSM48_MI_SIZE];
- uint32_t tmsi;
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), mi_lv+1, mi_lv[0]);
- mi_type = mi_lv[1] & GSM_MI_TYPE_MASK;
-
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- if (vlr_subscr_matches_imsi(conn->vsub, mi_string))
- goto accept_reuse;
- break;
- case GSM_MI_TYPE_TMSI:
- tmsi = osmo_load32be(mi_lv+2);
- if (vlr_subscr_matches_tmsi(conn->vsub, tmsi))
- goto accept_reuse;
- break;
- case GSM_MI_TYPE_IMEI:
- if (vlr_subscr_matches_imei(conn->vsub, mi_string))
- goto accept_reuse;
- break;
- default:
- break;
- }
-
- LOGP(DMM, LOGL_ERROR, "%s: CM Service Request with mismatching mobile identity: %s %s\n",
- vlr_subscr_name(conn->vsub), gsm48_mi_type_name(mi_type), mi_string);
- msc_vlr_tx_cm_serv_rej(conn, VLR_PR_ARQ_RES_ILLEGAL_SUBSCR);
- return -EINVAL;
-
-accept_reuse:
- DEBUGP(DMM, "%s: re-using already accepted connection\n",
- vlr_subscr_name(conn->vsub));
- conn->received_cm_service_request = true;
- return conn->network->vlr->ops.tx_cm_serv_acc(conn);
-}
-
-/*
- * Handle CM Service Requests
- * a) Verify that the packet is long enough to contain the information
- * we require otherwsie reject with INCORRECT_MESSAGE
- * b) Try to parse the TMSI. If we do not have one reject
- * c) Check that we know the subscriber with the TMSI otherwise reject
- * with a HLR cause
- * d) Set the subscriber on the conn and accept
- *
- * Keep this function non-static for direct invocation by unit tests.
- */
-int gsm48_rx_mm_serv_req(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- static const enum subscr_conn_from conn_from_cm_service_req =
- SUBSCR_CONN_FROM_CM_SERVICE_REQ;
- struct gsm_network *net = conn->network;
- uint8_t mi_type;
- char mi_string[GSM48_MI_SIZE];
-
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_service_request *req =
- (struct gsm48_service_request *)gh->data;
- /* unfortunately in Phase1 the classmark2 length is variable */
- uint8_t classmark2_len = gh->data[1];
- uint8_t *classmark2 = gh->data+2;
- uint8_t mi_len = *(classmark2 + classmark2_len);
- uint8_t *mi = (classmark2 + classmark2_len + 1);
- struct osmo_location_area_id lai;
- bool is_utran;
- int rc;
-
- lai.plmn.mcc = conn->network->country_code;
- lai.plmn.mnc = conn->network->network_code;
- lai.lac = conn->lac;
-
- DEBUGP(DMM, "<- CM SERVICE REQUEST ");
- if (msg->data_len < sizeof(struct gsm48_service_request*)) {
- DEBUGPC(DMM, "wrong sized message\n");
- return msc_gsm48_tx_mm_serv_rej(conn,
- GSM48_REJECT_INCORRECT_MESSAGE);
- }
-
- if (msg->data_len < req->mi_len + 6) {
- DEBUGPC(DMM, "does not fit in packet\n");
- return msc_gsm48_tx_mm_serv_rej(conn,
- GSM48_REJECT_INCORRECT_MESSAGE);
- }
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), mi, mi_len);
- mi_type = mi[0] & GSM_MI_TYPE_MASK;
-
- if (mi_type == GSM_MI_TYPE_IMSI) {
- DEBUGPC(DMM, "serv_type=0x%02x MI(%s)=%s\n",
- req->cm_service_type, gsm48_mi_type_name(mi_type),
- mi_string);
- } else if (mi_type == GSM_MI_TYPE_TMSI) {
- DEBUGPC(DMM, "serv_type=0x%02x MI(%s)=%s\n",
- req->cm_service_type, gsm48_mi_type_name(mi_type),
- mi_string);
- } else {
- DEBUGPC(DMM, "mi_type is not expected: %d\n", mi_type);
- return msc_gsm48_tx_mm_serv_rej(conn,
- GSM48_REJECT_INCORRECT_MESSAGE);
- }
-
- osmo_signal_dispatch(SS_SUBSCR, S_SUBSCR_IDENTITY, (classmark2 + classmark2_len));
- memcpy(conn->classmark.classmark2, classmark2, classmark2_len);
- conn->classmark.classmark2_len = classmark2_len;
-
- if (conn->conn_fsm) {
- if (msc_subscr_conn_is_accepted(conn))
- return cm_serv_reuse_conn(conn, mi-1);
- LOGP(DMM, LOGL_ERROR, "%s: connection already in use\n",
- vlr_subscr_name(conn->vsub));
- msc_vlr_tx_cm_serv_rej(conn, VLR_PR_ARQ_RES_UNKNOWN_ERROR);
- return -EINVAL;
- }
-
- rc = msc_create_conn_fsm(conn, mi_string);
- if (rc) {
- msc_vlr_tx_cm_serv_rej(conn, VLR_PR_ARQ_RES_UNKNOWN_ERROR);
- /* logging already happened in msc_create_conn_fsm() */
- return rc;
- }
-
- is_utran = (conn->via_ran == RAN_UTRAN_IU);
- vlr_proc_acc_req(conn->conn_fsm,
- SUBSCR_CONN_E_ACCEPTED,
- SUBSCR_CONN_E_CN_CLOSE,
- (void*)&conn_from_cm_service_req,
- net->vlr, conn,
- VLR_PR_ARQ_T_CM_SERV_REQ, mi-1, &lai,
- is_utran || conn->network->authentication_required,
- is_utran? VLR_CIPH_A5_3
- : conn->network->a5_encryption,
- classmark_is_r99(&conn->classmark),
- is_utran);
-
- return 0;
-}
-
-static int gsm48_rx_mm_imsi_detach_ind(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm_network *network = conn->network;
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_imsi_detach_ind *idi =
- (struct gsm48_imsi_detach_ind *) gh->data;
- uint8_t mi_type = idi->mi[0] & GSM_MI_TYPE_MASK;
- char mi_string[GSM48_MI_SIZE];
- struct vlr_subscr *vsub = NULL;
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), idi->mi, idi->mi_len);
- DEBUGP(DMM, "IMSI DETACH INDICATION: MI(%s)=%s\n",
- gsm48_mi_type_name(mi_type), mi_string);
-
- rate_ctr_inc(&network->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_DETACH]);
-
- switch (mi_type) {
- case GSM_MI_TYPE_TMSI:
- vsub = vlr_subscr_find_by_tmsi(network->vlr,
- tmsi_from_string(mi_string));
- break;
- case GSM_MI_TYPE_IMSI:
- vsub = vlr_subscr_find_by_imsi(network->vlr, mi_string);
- break;
- case GSM_MI_TYPE_IMEI:
- case GSM_MI_TYPE_IMEISV:
- /* no sim card... FIXME: what to do ? */
- LOGP(DMM, LOGL_ERROR, "MI(%s)=%s: unimplemented mobile identity type\n",
- gsm48_mi_type_name(mi_type), mi_string);
- break;
- default:
- LOGP(DMM, LOGL_ERROR, "MI(%s)=%s: unknown mobile identity type\n",
- gsm48_mi_type_name(mi_type), mi_string);
- break;
- }
-
- /* TODO? We used to remember the subscriber's classmark1 here and
- * stored it in the old sqlite db, but now we store it in a conn that
- * will be discarded anyway: */
- conn->classmark.classmark1 = idi->classmark1;
-
- if (!vsub) {
- LOGP(DMM, LOGL_ERROR, "IMSI DETACH for unknown subscriber MI(%s)=%s\n",
- gsm48_mi_type_name(mi_type), mi_string);
- } else {
- LOGP(DMM, LOGL_INFO, "IMSI DETACH for %s\n", vlr_subscr_name(vsub));
- vlr_subscr_rx_imsi_detach(vsub);
- osmo_signal_dispatch(SS_SUBSCR, S_SUBSCR_DETACHED, vsub);
- vlr_subscr_put(vsub);
- }
-
- msc_subscr_conn_close(conn, 0);
- return 0;
-}
-
-static int gsm48_rx_mm_status(struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
-
- DEBUGP(DMM, "MM STATUS (reject cause 0x%02x)\n", gh->data[0]);
-
- return 0;
-}
-
-static int parse_gsm_auth_resp(uint8_t *res, uint8_t *res_len,
- struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_auth_resp *ar = (struct gsm48_auth_resp*) gh->data;
-
- if (msgb_l3len(msg) < sizeof(*gh) + sizeof(*ar)) {
- LOGP(DMM, LOGL_ERROR,
- "%s: MM AUTHENTICATION RESPONSE:"
- " l3 length invalid: %u\n",
- vlr_subscr_name(conn->vsub), msgb_l3len(msg));
- return -EINVAL;
- }
-
- *res_len = sizeof(ar->sres);
- memcpy(res, ar->sres, sizeof(ar->sres));
- return 0;
-}
-
-static int parse_umts_auth_resp(uint8_t *res, uint8_t *res_len,
- struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh;
- uint8_t *data;
- uint8_t iei;
- uint8_t ie_len;
- unsigned int data_len;
-
- /* First parse the GSM part */
- if (parse_gsm_auth_resp(res, res_len, conn, msg))
- return -EINVAL;
- OSMO_ASSERT(*res_len == 4);
-
- /* Then add the extended res part */
- gh = msgb_l3(msg);
- data = gh->data + sizeof(struct gsm48_auth_resp);
- data_len = msgb_l3len(msg) - (data - (uint8_t*)msgb_l3(msg));
-
- if (data_len < 3) {
- LOGP(DMM, LOGL_ERROR,
- "%s: MM AUTHENTICATION RESPONSE:"
- " l3 length invalid: %u\n",
- vlr_subscr_name(conn->vsub), msgb_l3len(msg));
- return -EINVAL;
- }
-
- iei = data[0];
- ie_len = data[1];
- if (iei != GSM48_IE_AUTH_RES_EXT) {
- LOGP(DMM, LOGL_ERROR,
- "%s: MM R99 AUTHENTICATION RESPONSE:"
- " expected IEI 0x%02x, got 0x%02x\n",
- vlr_subscr_name(conn->vsub),
- GSM48_IE_AUTH_RES_EXT, iei);
- return -EINVAL;
- }
-
- if (ie_len > 12) {
- LOGP(DMM, LOGL_ERROR,
- "%s: MM R99 AUTHENTICATION RESPONSE:"
- " extended Auth Resp IE 0x%02x is too large: %u bytes\n",
- vlr_subscr_name(conn->vsub), GSM48_IE_AUTH_RES_EXT, ie_len);
- return -EINVAL;
- }
-
- *res_len += ie_len;
- memcpy(res + 4, &data[2], ie_len);
- return 0;
-}
-
-/* Chapter 9.2.3: Authentication Response */
-static int gsm48_rx_mm_auth_resp(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- uint8_t res[16];
- uint8_t res_len;
- int rc;
- bool is_r99;
-
- if (!conn->vsub) {
- LOGP(DMM, LOGL_ERROR,
- "MM AUTHENTICATION RESPONSE: invalid: no subscriber\n");
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- if (msgb_l3len(msg) >
- sizeof(struct gsm48_hdr) + sizeof(struct gsm48_auth_resp)) {
- rc = parse_umts_auth_resp(res, &res_len, conn, msg);
- is_r99 = true;
- } else {
- rc = parse_gsm_auth_resp(res, &res_len, conn, msg);
- is_r99 = false;
- }
-
- if (rc) {
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- DEBUGP(DMM, "%s: MM %s AUTHENTICATION RESPONSE (%s = %s)\n",
- vlr_subscr_name(conn->vsub),
- is_r99 ? "R99" : "GSM", is_r99 ? "res" : "sres",
- osmo_hexdump_nospc(res, res_len));
-
- return vlr_subscr_rx_auth_resp(conn->vsub, is_r99,
- conn->via_ran == RAN_UTRAN_IU,
- res, res_len);
-}
-
-static int gsm48_rx_mm_auth_fail(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t cause;
- uint8_t auts_tag;
- uint8_t auts_len;
- uint8_t *auts;
-
- if (!conn->vsub) {
- LOGP(DMM, LOGL_ERROR,
- "MM R99 AUTHENTICATION FAILURE: invalid: no subscriber\n");
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- if (msgb_l3len(msg) < sizeof(*gh) + 1) {
- LOGP(DMM, LOGL_ERROR,
- "%s: MM R99 AUTHENTICATION FAILURE:"
- " l3 length invalid: %u\n",
- vlr_subscr_name(conn->vsub), msgb_l3len(msg));
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- cause = gh->data[0];
-
- if (cause != GSM48_REJECT_SYNCH_FAILURE) {
- LOGP(DMM, LOGL_INFO,
- "%s: MM R99 AUTHENTICATION FAILURE: cause 0x%0x\n",
- vlr_subscr_name(conn->vsub), cause);
- vlr_subscr_rx_auth_fail(conn->vsub, NULL);
- return 0;
- }
-
- /* This is a Synch Failure procedure, which should pass an AUTS to
- * resynchronize the sequence nr with the HLR. Expecting exactly one
- * TLV with 14 bytes of AUTS. */
-
- if (msgb_l3len(msg) < sizeof(*gh) + 1 + 2) {
- LOGP(DMM, LOGL_INFO,
- "%s: MM R99 AUTHENTICATION FAILURE:"
- " invalid Synch Failure: missing AUTS IE\n",
- vlr_subscr_name(conn->vsub));
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- auts_tag = gh->data[1];
- auts_len = gh->data[2];
- auts = &gh->data[3];
-
- if (auts_tag != GSM48_IE_AUTS
- || auts_len != 14) {
- LOGP(DMM, LOGL_INFO,
- "%s: MM R99 AUTHENTICATION FAILURE:"
- " invalid Synch Failure:"
- " expected AUTS IE 0x%02x of 14 bytes,"
- " got IE 0x%02x of %u bytes\n",
- vlr_subscr_name(conn->vsub),
- GSM48_IE_AUTS, auts_tag, auts_len);
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- if (msgb_l3len(msg) < sizeof(*gh) + 1 + 2 + auts_len) {
- LOGP(DMM, LOGL_INFO,
- "%s: MM R99 AUTHENTICATION FAILURE:"
- " invalid Synch Failure msg: message truncated (%u)\n",
- vlr_subscr_name(conn->vsub), msgb_l3len(msg));
- msc_subscr_conn_close(conn, GSM_CAUSE_AUTH_FAILED);
- return -EINVAL;
- }
-
- /* We have an AUTS IE with exactly 14 bytes of AUTS and the msgb is
- * large enough. */
-
- DEBUGP(DMM, "%s: MM R99 AUTHENTICATION SYNCH (AUTS = %s)\n",
- vlr_subscr_name(conn->vsub), osmo_hexdump_nospc(auts, 14));
-
- return vlr_subscr_rx_auth_fail(conn->vsub, auts);
-}
-
-static int gsm48_rx_mm_tmsi_reall_compl(struct gsm_subscriber_connection *conn)
-{
- DEBUGP(DMM, "TMSI Reallocation Completed. Subscriber: %s\n",
- vlr_subscr_name(conn->vsub));
- if (!conn->vsub) {
- LOGP(DMM, LOGL_ERROR,
- "Rx MM TMSI Reallocation Complete: invalid: no subscriber\n");
- return -EINVAL;
- }
- return vlr_subscr_rx_tmsi_reall_compl(conn->vsub);
-}
-
-/* Receive a GSM 04.08 Mobility Management (MM) message */
-static int gsm0408_rcv_mm(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- int rc = 0;
-
- switch (gsm48_hdr_msg_type(gh)) {
- case GSM48_MT_MM_LOC_UPD_REQUEST:
- rc = mm_rx_loc_upd_req(conn, msg);
- break;
- case GSM48_MT_MM_ID_RESP:
- rc = mm_rx_id_resp(conn, msg);
- break;
- case GSM48_MT_MM_CM_SERV_REQ:
- rc = gsm48_rx_mm_serv_req(conn, msg);
- break;
- case GSM48_MT_MM_STATUS:
- rc = gsm48_rx_mm_status(msg);
- break;
- case GSM48_MT_MM_TMSI_REALL_COMPL:
- rc = gsm48_rx_mm_tmsi_reall_compl(conn);
- break;
- case GSM48_MT_MM_IMSI_DETACH_IND:
- rc = gsm48_rx_mm_imsi_detach_ind(conn, msg);
- break;
- case GSM48_MT_MM_CM_REEST_REQ:
- DEBUGP(DMM, "CM REESTABLISH REQUEST: Not implemented\n");
- break;
- case GSM48_MT_MM_AUTH_RESP:
- rc = gsm48_rx_mm_auth_resp(conn, msg);
- break;
- case GSM48_MT_MM_AUTH_FAIL:
- rc = gsm48_rx_mm_auth_fail(conn, msg);
- break;
- default:
- LOGP(DMM, LOGL_NOTICE, "Unknown GSM 04.08 MM msg type 0x%02x\n",
- gh->msg_type);
- break;
- }
-
- return rc;
-}
-
-static uint8_t *gsm48_cm2_get_mi(uint8_t *classmark2_lv, unsigned int tot_len)
-{
- /* Check the size for the classmark */
- if (tot_len < 1 + *classmark2_lv)
- return NULL;
-
- uint8_t *mi_lv = classmark2_lv + *classmark2_lv + 1;
- if (tot_len < 2 + *classmark2_lv + mi_lv[0])
- return NULL;
-
- return mi_lv;
-}
-
-/* Receive a PAGING RESPONSE message from the MS */
-static int gsm48_rx_rr_pag_resp(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- static const enum subscr_conn_from conn_from_paging_resp =
- SUBSCR_CONN_FROM_PAGING_RESP;
- struct gsm_network *net = conn->network;
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct gsm48_pag_resp *resp;
- uint8_t *classmark2_lv = gh->data + 1;
- uint8_t *mi_lv;
- uint8_t mi_type;
- char mi_string[GSM48_MI_SIZE];
- int rc = 0;
- struct osmo_location_area_id lai;
- bool is_utran;
-
- lai.plmn.mcc = conn->network->country_code;
- lai.plmn.mnc = conn->network->network_code;
- lai.lac = conn->lac;
-
- resp = (struct gsm48_pag_resp *) &gh->data[0];
- gsm48_paging_extract_mi(resp, msgb_l3len(msg) - sizeof(*gh),
- mi_string, &mi_type);
- DEBUGP(DRR, "PAGING RESPONSE: MI(%s)=%s\n",
- gsm48_mi_type_name(mi_type), mi_string);
-
- mi_lv = gsm48_cm2_get_mi(classmark2_lv, msgb_l3len(msg) - sizeof(*gh));
- if (!mi_lv) {
- /* FIXME */
- return -1;
- }
-
- rc = msc_create_conn_fsm(conn, mi_string);
- if (rc)
- /* logging already happened in msc_create_conn_fsm() */
- return rc;
-
- memcpy(conn->classmark.classmark2, classmark2_lv+1, *classmark2_lv);
- conn->classmark.classmark2_len = *classmark2_lv;
-
- is_utran = (conn->via_ran == RAN_UTRAN_IU);
- vlr_proc_acc_req(conn->conn_fsm,
- SUBSCR_CONN_E_ACCEPTED,
- SUBSCR_CONN_E_CN_CLOSE,
- (void*)&conn_from_paging_resp,
- net->vlr, conn,
- VLR_PR_ARQ_T_PAGING_RESP, mi_lv, &lai,
- is_utran || conn->network->authentication_required,
- is_utran? VLR_CIPH_A5_3
- : conn->network->a5_encryption,
- classmark_is_r99(&conn->classmark),
- is_utran);
-
- return 0;
-}
-
-static int gsm48_rx_rr_app_info(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t apdu_id_flags;
- uint8_t apdu_len;
- uint8_t *apdu_data;
-
- apdu_id_flags = gh->data[0];
- apdu_len = gh->data[1];
- apdu_data = gh->data+2;
-
- DEBUGP(DRR, "RX APPLICATION INFO id/flags=0x%02x apdu_len=%u apdu=%s\n",
- apdu_id_flags, apdu_len, osmo_hexdump(apdu_data, apdu_len));
-
- /* we're not using the app info blob anywhere, so ignore. */
-#if 0
- return db_apdu_blob_store(conn->subscr, apdu_id_flags, apdu_len, apdu_data);
-#else
- return 0;
-#endif
-}
-
-/* Receive a GSM 04.08 Radio Resource (RR) message */
-static int gsm0408_rcv_rr(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- int rc = 0;
-
- switch (gh->msg_type) {
- case GSM48_MT_RR_PAG_RESP:
- rc = gsm48_rx_rr_pag_resp(conn, msg);
- break;
- case GSM48_MT_RR_APP_INFO:
- rc = gsm48_rx_rr_app_info(conn, msg);
- break;
- default:
- LOGP(DRR, LOGL_NOTICE, "MSC: Unimplemented %s GSM 04.08 RR "
- "message\n", gsm48_rr_msg_name(gh->msg_type));
- break;
- }
-
- return rc;
-}
-
-int gsm48_send_rr_app_info(struct gsm_subscriber_connection *conn, uint8_t apdu_id,
- uint8_t apdu_len, const uint8_t *apdu)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 APP INF");
- struct gsm48_hdr *gh;
-
- DEBUGP(DRR, "TX APPLICATION INFO id=0x%02x, len=%u\n",
- apdu_id, apdu_len);
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh) + 2 + apdu_len);
- gh->proto_discr = GSM48_PDISC_RR;
- gh->msg_type = GSM48_MT_RR_APP_INFO;
- gh->data[0] = apdu_id;
- gh->data[1] = apdu_len;
- memcpy(gh->data+2, apdu, apdu_len);
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-/* FIXME: this count_statistics is a state machine behaviour. we should convert
- * the complete call control into a state machine. Afterwards we can move this
- * code into state transitions.
- */
-static void count_statistics(struct gsm_trans *trans, int new_state)
-{
- int old_state = trans->cc.state;
- struct rate_ctr_group *msc = trans->net->msc_ctrs;
-
- if (old_state == new_state)
- return;
-
- /* state incoming */
- switch (new_state) {
- case GSM_CSTATE_ACTIVE:
- osmo_counter_inc(trans->net->active_calls);
- rate_ctr_inc(&msc->ctr[MSC_CTR_CALL_ACTIVE]);
- break;
- }
-
- /* state outgoing */
- switch (old_state) {
- case GSM_CSTATE_ACTIVE:
- osmo_counter_dec(trans->net->active_calls);
- if (new_state == GSM_CSTATE_DISCONNECT_REQ ||
- new_state == GSM_CSTATE_DISCONNECT_IND)
- rate_ctr_inc(&msc->ctr[MSC_CTR_CALL_COMPLETE]);
- else
- rate_ctr_inc(&msc->ctr[MSC_CTR_CALL_INCOMPLETE]);
- break;
- }
-}
-
-/* Call Control */
-
-/* The entire call control code is written in accordance with Figure 7.10c
- * for 'very early assignment', i.e. we allocate a TCH/F during IMMEDIATE
- * ASSIGN, then first use that TCH/F for signalling and later MODE MODIFY
- * it for voice */
-
-static void new_cc_state(struct gsm_trans *trans, int state)
-{
- if (state > 31 || state < 0)
- return;
-
- DEBUGP(DCC, "new state %s -> %s\n",
- gsm48_cc_state_name(trans->cc.state),
- gsm48_cc_state_name(state));
-
- count_statistics(trans, state);
- trans->cc.state = state;
-}
-
-static int gsm48_cc_tx_status(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC STATUS");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- uint8_t *cause, *call_state;
-
- gh->msg_type = GSM48_MT_CC_STATUS;
-
- cause = msgb_put(msg, 3);
- cause[0] = 2;
- cause[1] = GSM48_CAUSE_CS_GSM | GSM48_CAUSE_LOC_USER;
- cause[2] = 0x80 | 30; /* response to status inquiry */
-
- call_state = msgb_put(msg, 1);
- call_state[0] = 0xc0 | 0x00;
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_tx_simple(struct gsm_subscriber_connection *conn,
- uint8_t pdisc, uint8_t msg_type)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 TX SIMPLE");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->proto_discr = pdisc;
- gh->msg_type = msg_type;
-
- return gsm48_conn_sendmsg(msg, conn, NULL);
-}
-
-static void gsm48_stop_cc_timer(struct gsm_trans *trans)
-{
- if (osmo_timer_pending(&trans->cc.timer)) {
- DEBUGP(DCC, "stopping pending timer T%x\n", trans->cc.Tcurrent);
- osmo_timer_del(&trans->cc.timer);
- trans->cc.Tcurrent = 0;
- }
-}
-
-static int mncc_recvmsg(struct gsm_network *net, struct gsm_trans *trans,
- int msg_type, struct gsm_mncc *mncc)
-{
- struct msgb *msg;
- unsigned char *data;
-
- DEBUGP(DMNCC, "transmit message %s\n", get_mncc_name(msg_type));
-
-#if BEFORE_MSCSPLIT
- /* Re-enable this log output once we can obtain this information via
- * A-interface, see OS#2391. */
- if (trans)
- if (trans->conn && trans->conn->lchan)
- DEBUGP(DCC, "(bts %d trx %d ts %d ti %x sub %s) "
- "Sending '%s' to MNCC.\n",
- trans->conn->lchan->ts->trx->bts->nr,
- trans->conn->lchan->ts->trx->nr,
- trans->conn->lchan->ts->nr, trans->transaction_id,
- vlr_subscr_msisdn_or_name(trans->vsub),
- get_mncc_name(msg_type));
- else
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub %s) "
- "Sending '%s' to MNCC.\n",
- vlr_subscr_msisdn_or_name(trans->vsub),
- get_mncc_name(msg_type));
- else
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub -) "
- "Sending '%s' to MNCC.\n", get_mncc_name(msg_type));
-#else
- DEBUGP(DCC, "Sending '%s' to MNCC.\n", get_mncc_name(msg_type));
-#endif
-
- mncc->msg_type = msg_type;
-
- msg = msgb_alloc(sizeof(struct gsm_mncc), "MNCC");
- if (!msg)
- return -ENOMEM;
-
- data = msgb_put(msg, sizeof(struct gsm_mncc));
- memcpy(data, mncc, sizeof(struct gsm_mncc));
-
- cc_tx_to_mncc(net, msg);
-
- return 0;
-}
-
-int mncc_release_ind(struct gsm_network *net, struct gsm_trans *trans,
- uint32_t callref, int location, int value)
-{
- struct gsm_mncc rel;
-
- memset(&rel, 0, sizeof(rel));
- rel.callref = callref;
- mncc_set_cause(&rel, location, value);
- if (trans && trans->cc.state == GSM_CSTATE_RELEASE_REQ)
- return mncc_recvmsg(net, trans, MNCC_REL_CNF, &rel);
- return mncc_recvmsg(net, trans, MNCC_REL_IND, &rel);
-}
-
-/* Call Control Specific transaction release.
- * gets called by trans_free, DO NOT CALL YOURSELF! */
-void _gsm48_cc_trans_free(struct gsm_trans *trans)
-{
- gsm48_stop_cc_timer(trans);
-
- /* Make sure call also gets released on the mgcp side */
- msc_call_release(trans);
-
- /* send release to L4, if callref still exists */
- if (trans->callref) {
- /* Ressource unavailable */
- mncc_release_ind(trans->net, trans, trans->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- }
- if (trans->cc.state != GSM_CSTATE_NULL)
- new_cc_state(trans, GSM_CSTATE_NULL);
-}
-
-static int gsm48_cc_tx_setup(struct gsm_trans *trans, void *arg);
-
-/* call-back from paging the B-end of the connection */
-static int setup_trig_pag_evt(unsigned int hooknum, unsigned int event,
- struct msgb *msg, void *_conn, void *_transt)
-{
- struct gsm_subscriber_connection *conn = _conn;
- struct gsm_trans *transt = _transt;
-
- OSMO_ASSERT(!transt->conn);
-
- switch (event) {
- case GSM_PAGING_SUCCEEDED:
- DEBUGP(DCC, "Paging subscr %s succeeded!\n",
- vlr_subscr_msisdn_or_name(transt->vsub));
- OSMO_ASSERT(conn);
- /* Assign conn */
- transt->conn = conn;
- /* send SETUP request to called party */
- gsm48_cc_tx_setup(transt, &transt->cc.msg);
- break;
- case GSM_PAGING_EXPIRED:
- case GSM_PAGING_BUSY:
- DEBUGP(DCC, "Paging subscr %s expired!\n",
- vlr_subscr_msisdn_or_name(transt->vsub));
- /* Temporarily out of order */
- mncc_release_ind(transt->net, transt,
- transt->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_DEST_OOO);
- transt->callref = 0;
- transt->paging_request = NULL;
- trans_free(transt);
- break;
- default:
- LOGP(DCC, LOGL_ERROR, "Unknown paging event %d\n", event);
- break;
- }
-
- transt->paging_request = NULL;
- return 0;
-}
-
-/* bridge channels of two transactions */
-static int tch_bridge(struct gsm_network *net, struct gsm_mncc_bridge *bridge)
-{
- struct gsm_trans *trans1 = trans_find_by_callref(net, bridge->callref[0]);
- struct gsm_trans *trans2 = trans_find_by_callref(net, bridge->callref[1]);
-
- if (!trans1 || !trans2)
- return -EIO;
-
- if (!trans1->conn || !trans2->conn)
- return -EIO;
-
- /* Which subscriber do we want to track trans1 or trans2? */
- log_set_context(LOG_CTX_VLR_SUBSCR, trans1->vsub);
-
- return msc_call_bridge(trans1, trans2);
-}
-
-static int gsm48_cc_rx_status_enq(struct gsm_trans *trans, struct msgb *msg)
-{
- DEBUGP(DCC, "-> STATUS ENQ\n");
- return gsm48_cc_tx_status(trans, msg);
-}
-
-static int gsm48_cc_tx_release(struct gsm_trans *trans, void *arg);
-static int gsm48_cc_tx_disconnect(struct gsm_trans *trans, void *arg);
-
-static void gsm48_cc_timeout(void *arg)
-{
- struct gsm_trans *trans = arg;
- int disconnect = 0, release = 0;
- int mo_cause = GSM48_CC_CAUSE_RECOVERY_TIMER;
- int mo_location = GSM48_CAUSE_LOC_USER;
- int l4_cause = GSM48_CC_CAUSE_NORMAL_UNSPEC;
- int l4_location = GSM48_CAUSE_LOC_PRN_S_LU;
- struct gsm_mncc mo_rel, l4_rel;
-
- memset(&mo_rel, 0, sizeof(struct gsm_mncc));
- mo_rel.callref = trans->callref;
- memset(&l4_rel, 0, sizeof(struct gsm_mncc));
- l4_rel.callref = trans->callref;
-
- switch(trans->cc.Tcurrent) {
- case 0x303:
- release = 1;
- l4_cause = GSM48_CC_CAUSE_USER_NOTRESPOND;
- break;
- case 0x310:
- disconnect = 1;
- l4_cause = GSM48_CC_CAUSE_USER_NOTRESPOND;
- break;
- case 0x313:
- disconnect = 1;
- /* unknown, did not find it in the specs */
- break;
- case 0x301:
- disconnect = 1;
- l4_cause = GSM48_CC_CAUSE_USER_NOTRESPOND;
- break;
- case 0x308:
- if (!trans->cc.T308_second) {
- /* restart T308 a second time */
- gsm48_cc_tx_release(trans, &trans->cc.msg);
- trans->cc.T308_second = 1;
- break; /* stay in release state */
- }
- trans_free(trans);
- return;
-// release = 1;
-// l4_cause = 14;
-// break;
- case 0x306:
- release = 1;
- mo_cause = trans->cc.msg.cause.value;
- mo_location = trans->cc.msg.cause.location;
- break;
- case 0x323:
- disconnect = 1;
- break;
- default:
- release = 1;
- }
-
- if (release && trans->callref) {
- /* process release towards layer 4 */
- mncc_release_ind(trans->net, trans, trans->callref,
- l4_location, l4_cause);
- trans->callref = 0;
- }
-
- if (disconnect && trans->callref) {
- /* process disconnect towards layer 4 */
- mncc_set_cause(&l4_rel, l4_location, l4_cause);
- mncc_recvmsg(trans->net, trans, MNCC_DISC_IND, &l4_rel);
- }
-
- /* process disconnect towards mobile station */
- if (disconnect || release) {
- mncc_set_cause(&mo_rel, mo_location, mo_cause);
- mo_rel.cause.diag[0] = ((trans->cc.Tcurrent & 0xf00) >> 8) + '0';
- mo_rel.cause.diag[1] = ((trans->cc.Tcurrent & 0x0f0) >> 4) + '0';
- mo_rel.cause.diag[2] = (trans->cc.Tcurrent & 0x00f) + '0';
- mo_rel.cause.diag_len = 3;
-
- if (disconnect)
- gsm48_cc_tx_disconnect(trans, &mo_rel);
- if (release)
- gsm48_cc_tx_release(trans, &mo_rel);
- }
-
-}
-
-/* disconnect both calls from the bridge */
-static inline void disconnect_bridge(struct gsm_network *net,
- struct gsm_mncc_bridge *bridge, int err)
-{
- struct gsm_trans *trans0 = trans_find_by_callref(net, bridge->callref[0]);
- struct gsm_trans *trans1 = trans_find_by_callref(net, bridge->callref[1]);
- struct gsm_mncc mx_rel;
- if (!trans0 || !trans1)
- return;
-
- DEBUGP(DCC, "Failed to bridge TCH for calls %x <-> %x :: %s \n",
- trans0->callref, trans1->callref, strerror(err));
-
- memset(&mx_rel, 0, sizeof(struct gsm_mncc));
- mncc_set_cause(&mx_rel, GSM48_CAUSE_LOC_INN_NET,
- GSM48_CC_CAUSE_CHAN_UNACCEPT);
-
- mx_rel.callref = trans0->callref;
- gsm48_cc_tx_disconnect(trans0, &mx_rel);
-
- mx_rel.callref = trans1->callref;
- gsm48_cc_tx_disconnect(trans1, &mx_rel);
-}
-
-static void gsm48_start_cc_timer(struct gsm_trans *trans, int current,
- int sec, int micro)
-{
- DEBUGP(DCC, "starting timer T%x with %d seconds\n", current, sec);
- osmo_timer_setup(&trans->cc.timer, gsm48_cc_timeout, trans);
- osmo_timer_schedule(&trans->cc.timer, sec, micro);
- trans->cc.Tcurrent = current;
-}
-
-static int gsm48_cc_rx_setup(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t msg_type = gsm48_hdr_msg_type(gh);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc setup;
-
- memset(&setup, 0, sizeof(struct gsm_mncc));
- setup.callref = trans->callref;
-
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* emergency setup is identified by msg_type */
- if (msg_type == GSM48_MT_CC_EMERG_SETUP)
- setup.emergency = 1;
-
- /* use subscriber as calling party number */
- setup.fields |= MNCC_F_CALLING;
- osmo_strlcpy(setup.calling.number, trans->vsub->msisdn, sizeof(setup.calling.number));
- osmo_strlcpy(setup.imsi, trans->vsub->imsi, sizeof(setup.imsi));
-
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_BEARER_CAP)) {
- setup.fields |= MNCC_F_BEARER_CAP;
- gsm48_decode_bearer_cap(&setup.bearer_cap,
- TLVP_VAL(&tp, GSM48_IE_BEARER_CAP)-1);
-
- /* Create a copy of the bearer capability
- * in the transaction struct, so we can use
- * this information later */
- memcpy(&trans->bearer_cap,&setup.bearer_cap,
- sizeof(trans->bearer_cap));
- }
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- setup.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&setup.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* called party bcd number */
- if (TLVP_PRESENT(&tp, GSM48_IE_CALLED_BCD)) {
- setup.fields |= MNCC_F_CALLED;
- gsm48_decode_called(&setup.called,
- TLVP_VAL(&tp, GSM48_IE_CALLED_BCD)-1);
- }
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- setup.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&setup.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- setup.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&setup.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
- /* CLIR suppression */
- if (TLVP_PRESENT(&tp, GSM48_IE_CLIR_SUPP))
- setup.clir.sup = 1;
- /* CLIR invocation */
- if (TLVP_PRESENT(&tp, GSM48_IE_CLIR_INVOC))
- setup.clir.inv = 1;
- /* cc cap */
- if (TLVP_PRESENT(&tp, GSM48_IE_CC_CAP)) {
- setup.fields |= MNCC_F_CCCAP;
- gsm48_decode_cccap(&setup.cccap,
- TLVP_VAL(&tp, GSM48_IE_CC_CAP)-1);
- }
-
- new_cc_state(trans, GSM_CSTATE_INITIATED);
-
- LOGP(DCC, LOGL_INFO, "Subscriber %s (%s) sends SETUP to %s\n",
- vlr_subscr_name(trans->vsub), trans->vsub->msisdn,
- setup.called.number);
-
- rate_ctr_inc(&trans->net->msc_ctrs->ctr[MSC_CTR_CALL_MO_SETUP]);
-
- /* indicate setup to MNCC */
- mncc_recvmsg(trans->net, trans, MNCC_SETUP_IND, &setup);
-
- /* MNCC code will modify the channel asynchronously, we should
- * ipaccess-bind only after the modification has been made to the
- * lchan->tch_mode */
- return 0;
-}
-
-static int gsm48_cc_tx_setup(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC STUP");
- struct gsm48_hdr *gh;
- struct gsm_mncc *setup = arg;
- int rc, trans_id;
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- /* transaction id must not be assigned */
- if (trans->transaction_id != 0xff) { /* unasssigned */
- DEBUGP(DCC, "TX Setup with assigned transaction. "
- "This is not allowed!\n");
- /* Temporarily out of order */
- rc = mncc_release_ind(trans->net, trans, trans->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- trans->callref = 0;
- trans_free(trans);
- return rc;
- }
-
- /* Get free transaction_id */
- trans_id = trans_assign_trans_id(trans->net, trans->vsub,
- GSM48_PDISC_CC, 0);
- if (trans_id < 0) {
- /* no free transaction ID */
- rc = mncc_release_ind(trans->net, trans, trans->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- trans->callref = 0;
- trans_free(trans);
- return rc;
- }
- trans->transaction_id = trans_id;
-
- gh->msg_type = GSM48_MT_CC_SETUP;
-
- gsm48_start_cc_timer(trans, 0x303, GSM48_T303);
-
- /* bearer capability */
- if (setup->fields & MNCC_F_BEARER_CAP)
- gsm48_encode_bearer_cap(msg, 0, &setup->bearer_cap);
- /* facility */
- if (setup->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &setup->facility);
- /* progress */
- if (setup->fields & MNCC_F_PROGRESS)
- gsm48_encode_progress(msg, 0, &setup->progress);
- /* calling party BCD number */
- if (setup->fields & MNCC_F_CALLING)
- gsm48_encode_calling(msg, &setup->calling);
- /* called party BCD number */
- if (setup->fields & MNCC_F_CALLED)
- gsm48_encode_called(msg, &setup->called);
- /* user-user */
- if (setup->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &setup->useruser);
- /* redirecting party BCD number */
- if (setup->fields & MNCC_F_REDIRECTING)
- gsm48_encode_redirecting(msg, &setup->redirecting);
- /* signal */
- if (setup->fields & MNCC_F_SIGNAL)
- gsm48_encode_signal(msg, setup->signal);
-
- new_cc_state(trans, GSM_CSTATE_CALL_PRESENT);
-
- rate_ctr_inc(&trans->net->msc_ctrs->ctr[MSC_CTR_CALL_MT_SETUP]);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_call_conf(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc call_conf;
- int rc;
-
- gsm48_stop_cc_timer(trans);
- gsm48_start_cc_timer(trans, 0x310, GSM48_T310);
-
- memset(&call_conf, 0, sizeof(struct gsm_mncc));
- call_conf.callref = trans->callref;
-
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
-#if 0
- /* repeat */
- if (TLVP_PRESENT(&tp, GSM48_IE_REPEAT_CIR))
- call_conf.repeat = 1;
- if (TLVP_PRESENT(&tp, GSM48_IE_REPEAT_SEQ))
- call_conf.repeat = 2;
-#endif
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_BEARER_CAP)) {
- call_conf.fields |= MNCC_F_BEARER_CAP;
- gsm48_decode_bearer_cap(&call_conf.bearer_cap,
- TLVP_VAL(&tp, GSM48_IE_BEARER_CAP)-1);
-
- /* Create a copy of the bearer capability
- * in the transaction struct, so we can use
- * this information later */
- memcpy(&trans->bearer_cap,&call_conf.bearer_cap,
- sizeof(trans->bearer_cap));
- }
- /* cause */
- if (TLVP_PRESENT(&tp, GSM48_IE_CAUSE)) {
- call_conf.fields |= MNCC_F_CAUSE;
- gsm48_decode_cause(&call_conf.cause,
- TLVP_VAL(&tp, GSM48_IE_CAUSE)-1);
- }
- /* cc cap */
- if (TLVP_PRESENT(&tp, GSM48_IE_CC_CAP)) {
- call_conf.fields |= MNCC_F_CCCAP;
- gsm48_decode_cccap(&call_conf.cccap,
- TLVP_VAL(&tp, GSM48_IE_CC_CAP)-1);
- }
-
- /* IMSI of called subscriber */
- osmo_strlcpy(call_conf.imsi, trans->vsub->imsi, sizeof(call_conf.imsi));
-
- new_cc_state(trans, GSM_CSTATE_MO_TERM_CALL_CONF);
-
- /* Assign call (if not done yet) */
- if (trans->assignment_done == false) {
- rc = msc_call_assignment(trans);
- trans->assignment_done = true;
- }
- else
- rc = 0;
-
- /* don't continue, if there were problems with
- * the call assignment. */
- if (rc)
- return rc;
-
- return mncc_recvmsg(trans->net, trans, MNCC_CALL_CONF_IND,
- &call_conf);
-}
-
-static int gsm48_cc_tx_call_proc_and_assign(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *proceeding = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC PROC");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- int rc;
-
- gh->msg_type = GSM48_MT_CC_CALL_PROC;
-
- new_cc_state(trans, GSM_CSTATE_MO_CALL_PROC);
-
- /* bearer capability */
- if (proceeding->fields & MNCC_F_BEARER_CAP)
- gsm48_encode_bearer_cap(msg, 0, &proceeding->bearer_cap);
- /* facility */
- if (proceeding->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &proceeding->facility);
- /* progress */
- if (proceeding->fields & MNCC_F_PROGRESS)
- gsm48_encode_progress(msg, 0, &proceeding->progress);
-
- rc = gsm48_conn_sendmsg(msg, trans->conn, trans);
- if (rc)
- return rc;
-
- /* Assign call (if not done yet) */
- if (trans->assignment_done == false) {
- rc = msc_call_assignment(trans);
- trans->assignment_done = true;
- }
- else
- rc = 0;
-
- return rc;
-}
-
-static int gsm48_cc_rx_alerting(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc alerting;
-
- gsm48_stop_cc_timer(trans);
- gsm48_start_cc_timer(trans, 0x301, GSM48_T301);
-
- memset(&alerting, 0, sizeof(struct gsm_mncc));
- alerting.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- alerting.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&alerting.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
-
- /* progress */
- if (TLVP_PRESENT(&tp, GSM48_IE_PROGR_IND)) {
- alerting.fields |= MNCC_F_PROGRESS;
- gsm48_decode_progress(&alerting.progress,
- TLVP_VAL(&tp, GSM48_IE_PROGR_IND)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- alerting.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&alerting.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- new_cc_state(trans, GSM_CSTATE_CALL_RECEIVED);
-
- return mncc_recvmsg(trans->net, trans, MNCC_ALERT_IND,
- &alerting);
-}
-
-static int gsm48_cc_tx_alerting(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *alerting = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC ALERT");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_ALERTING;
-
- /* facility */
- if (alerting->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &alerting->facility);
- /* progress */
- if (alerting->fields & MNCC_F_PROGRESS)
- gsm48_encode_progress(msg, 0, &alerting->progress);
- /* user-user */
- if (alerting->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &alerting->useruser);
-
- new_cc_state(trans, GSM_CSTATE_CALL_DELIVERED);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_progress(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *progress = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC PROGRESS");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_PROGRESS;
-
- /* progress */
- gsm48_encode_progress(msg, 1, &progress->progress);
- /* user-user */
- if (progress->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &progress->useruser);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_connect(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *connect = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSN 04.08 CC CON");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_CONNECT;
-
- gsm48_stop_cc_timer(trans);
- gsm48_start_cc_timer(trans, 0x313, GSM48_T313);
-
- /* facility */
- if (connect->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &connect->facility);
- /* progress */
- if (connect->fields & MNCC_F_PROGRESS)
- gsm48_encode_progress(msg, 0, &connect->progress);
- /* connected number */
- if (connect->fields & MNCC_F_CONNECTED)
- gsm48_encode_connected(msg, &connect->connected);
- /* user-user */
- if (connect->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &connect->useruser);
-
- new_cc_state(trans, GSM_CSTATE_CONNECT_IND);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_connect(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc connect;
-
- gsm48_stop_cc_timer(trans);
-
- memset(&connect, 0, sizeof(struct gsm_mncc));
- connect.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* use subscriber as connected party number */
- connect.fields |= MNCC_F_CONNECTED;
- osmo_strlcpy(connect.connected.number, trans->vsub->msisdn, sizeof(connect.connected.number));
- osmo_strlcpy(connect.imsi, trans->vsub->imsi, sizeof(connect.imsi));
-
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- connect.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&connect.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- connect.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&connect.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- connect.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&connect.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- new_cc_state(trans, GSM_CSTATE_CONNECT_REQUEST);
- rate_ctr_inc(&trans->net->msc_ctrs->ctr[MSC_CTR_CALL_MT_CONNECT]);
-
- return mncc_recvmsg(trans->net, trans, MNCC_SETUP_CNF, &connect);
-}
-
-
-static int gsm48_cc_rx_connect_ack(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm_mncc connect_ack;
-
- gsm48_stop_cc_timer(trans);
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
- rate_ctr_inc(&trans->net->msc_ctrs->ctr[MSC_CTR_CALL_MO_CONNECT_ACK]);
-
- memset(&connect_ack, 0, sizeof(struct gsm_mncc));
- connect_ack.callref = trans->callref;
-
- return mncc_recvmsg(trans->net, trans, MNCC_SETUP_COMPL_IND,
- &connect_ack);
-}
-
-static int gsm48_cc_tx_connect_ack(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC CON ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_CONNECT_ACK;
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_disconnect(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc disc;
-
- gsm48_stop_cc_timer(trans);
-
- new_cc_state(trans, GSM_CSTATE_DISCONNECT_REQ);
-
- memset(&disc, 0, sizeof(struct gsm_mncc));
- disc.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_CAUSE, 0);
- /* cause */
- if (TLVP_PRESENT(&tp, GSM48_IE_CAUSE)) {
- disc.fields |= MNCC_F_CAUSE;
- gsm48_decode_cause(&disc.cause,
- TLVP_VAL(&tp, GSM48_IE_CAUSE)-1);
- }
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- disc.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&disc.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- disc.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&disc.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- disc.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&disc.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- return mncc_recvmsg(trans->net, trans, MNCC_DISC_IND, &disc);
-
-}
-
-static struct gsm_mncc_cause default_cause = {
- .location = GSM48_CAUSE_LOC_PRN_S_LU,
- .coding = 0,
- .rec = 0,
- .rec_val = 0,
- .value = GSM48_CC_CAUSE_NORMAL_UNSPEC,
- .diag_len = 0,
- .diag = { 0 },
-};
-
-static int gsm48_cc_tx_disconnect(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *disc = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC DISC");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_DISCONNECT;
-
- gsm48_stop_cc_timer(trans);
- gsm48_start_cc_timer(trans, 0x306, GSM48_T306);
-
- /* cause */
- if (disc->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 1, &disc->cause);
- else
- gsm48_encode_cause(msg, 1, &default_cause);
-
- /* facility */
- if (disc->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &disc->facility);
- /* progress */
- if (disc->fields & MNCC_F_PROGRESS)
- gsm48_encode_progress(msg, 0, &disc->progress);
- /* user-user */
- if (disc->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &disc->useruser);
-
- /* store disconnect cause for T306 expiry */
- memcpy(&trans->cc.msg, disc, sizeof(struct gsm_mncc));
-
- new_cc_state(trans, GSM_CSTATE_DISCONNECT_IND);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_release(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc rel;
- int rc;
-
- gsm48_stop_cc_timer(trans);
-
- memset(&rel, 0, sizeof(struct gsm_mncc));
- rel.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* cause */
- if (TLVP_PRESENT(&tp, GSM48_IE_CAUSE)) {
- rel.fields |= MNCC_F_CAUSE;
- gsm48_decode_cause(&rel.cause,
- TLVP_VAL(&tp, GSM48_IE_CAUSE)-1);
- }
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- rel.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&rel.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- rel.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&rel.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- rel.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&rel.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- if (trans->cc.state == GSM_CSTATE_RELEASE_REQ) {
- /* release collision 5.4.5 */
- rc = mncc_recvmsg(trans->net, trans, MNCC_REL_CNF, &rel);
- } else {
- rc = gsm48_tx_simple(trans->conn,
- GSM48_PDISC_CC | (trans->transaction_id << 4),
- GSM48_MT_CC_RELEASE_COMPL);
- rc = mncc_recvmsg(trans->net, trans, MNCC_REL_IND, &rel);
- }
-
- new_cc_state(trans, GSM_CSTATE_NULL);
-
- trans->callref = 0;
- trans_free(trans);
-
- return rc;
-}
-
-static int gsm48_cc_tx_release(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *rel = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC REL");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_RELEASE;
-
- gsm48_stop_cc_timer(trans);
- gsm48_start_cc_timer(trans, 0x308, GSM48_T308);
-
- /* cause */
- if (rel->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 0, &rel->cause);
- /* facility */
- if (rel->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &rel->facility);
- /* user-user */
- if (rel->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &rel->useruser);
-
- trans->cc.T308_second = 0;
- memcpy(&trans->cc.msg, rel, sizeof(struct gsm_mncc));
-
- if (trans->cc.state != GSM_CSTATE_RELEASE_REQ)
- new_cc_state(trans, GSM_CSTATE_RELEASE_REQ);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_release_compl(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc rel;
- int rc = 0;
-
- gsm48_stop_cc_timer(trans);
-
- memset(&rel, 0, sizeof(struct gsm_mncc));
- rel.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* cause */
- if (TLVP_PRESENT(&tp, GSM48_IE_CAUSE)) {
- rel.fields |= MNCC_F_CAUSE;
- gsm48_decode_cause(&rel.cause,
- TLVP_VAL(&tp, GSM48_IE_CAUSE)-1);
- }
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- rel.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&rel.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- rel.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&rel.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- rel.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&rel.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- if (trans->callref) {
- switch (trans->cc.state) {
- case GSM_CSTATE_CALL_PRESENT:
- rc = mncc_recvmsg(trans->net, trans,
- MNCC_REJ_IND, &rel);
- break;
- case GSM_CSTATE_RELEASE_REQ:
- rc = mncc_recvmsg(trans->net, trans,
- MNCC_REL_CNF, &rel);
- break;
- default:
- rc = mncc_recvmsg(trans->net, trans,
- MNCC_REL_IND, &rel);
- }
- }
-
- trans->callref = 0;
- trans_free(trans);
-
- return rc;
-}
-
-static int gsm48_cc_tx_release_compl(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *rel = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC REL COMPL");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- int ret;
-
- gh->msg_type = GSM48_MT_CC_RELEASE_COMPL;
-
- trans->callref = 0;
-
- gsm48_stop_cc_timer(trans);
-
- /* cause */
- if (rel->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 0, &rel->cause);
- /* facility */
- if (rel->fields & MNCC_F_FACILITY)
- gsm48_encode_facility(msg, 0, &rel->facility);
- /* user-user */
- if (rel->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 0, &rel->useruser);
-
- ret = gsm48_conn_sendmsg(msg, trans->conn, trans);
-
- trans_free(trans);
-
- return ret;
-}
-
-static int gsm48_cc_rx_facility(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc fac;
-
- memset(&fac, 0, sizeof(struct gsm_mncc));
- fac.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_FACILITY, 0);
- /* facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_FACILITY)) {
- fac.fields |= MNCC_F_FACILITY;
- gsm48_decode_facility(&fac.facility,
- TLVP_VAL(&tp, GSM48_IE_FACILITY)-1);
- }
- /* ss-version */
- if (TLVP_PRESENT(&tp, GSM48_IE_SS_VERS)) {
- fac.fields |= MNCC_F_SSVERSION;
- gsm48_decode_ssversion(&fac.ssversion,
- TLVP_VAL(&tp, GSM48_IE_SS_VERS)-1);
- }
-
- return mncc_recvmsg(trans->net, trans, MNCC_FACILITY_IND, &fac);
-}
-
-static int gsm48_cc_tx_facility(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *fac = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC FAC");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_FACILITY;
-
- /* facility */
- gsm48_encode_facility(msg, 1, &fac->facility);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_hold(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm_mncc hold;
-
- memset(&hold, 0, sizeof(struct gsm_mncc));
- hold.callref = trans->callref;
- return mncc_recvmsg(trans->net, trans, MNCC_HOLD_IND, &hold);
-}
-
-static int gsm48_cc_tx_hold_ack(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC HLD ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_HOLD_ACK;
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_hold_rej(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *hold_rej = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC HLD REJ");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_HOLD_REJ;
-
- /* cause */
- if (hold_rej->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 1, &hold_rej->cause);
- else
- gsm48_encode_cause(msg, 1, &default_cause);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_retrieve(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm_mncc retrieve;
-
- memset(&retrieve, 0, sizeof(struct gsm_mncc));
- retrieve.callref = trans->callref;
- return mncc_recvmsg(trans->net, trans, MNCC_RETRIEVE_IND,
- &retrieve);
-}
-
-static int gsm48_cc_tx_retrieve_ack(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC RETR ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_RETR_ACK;
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_retrieve_rej(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *retrieve_rej = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC RETR REJ");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_RETR_REJ;
-
- /* cause */
- if (retrieve_rej->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 1, &retrieve_rej->cause);
- else
- gsm48_encode_cause(msg, 1, &default_cause);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_start_dtmf(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc dtmf;
-
- memset(&dtmf, 0, sizeof(struct gsm_mncc));
- dtmf.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- /* keypad facility */
- if (TLVP_PRESENT(&tp, GSM48_IE_KPD_FACILITY)) {
- dtmf.fields |= MNCC_F_KEYPAD;
- gsm48_decode_keypad(&dtmf.keypad,
- TLVP_VAL(&tp, GSM48_IE_KPD_FACILITY)-1);
- }
-
- return mncc_recvmsg(trans->net, trans, MNCC_START_DTMF_IND, &dtmf);
-}
-
-static int gsm48_cc_tx_start_dtmf_ack(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *dtmf = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 DTMF ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_START_DTMF_ACK;
-
- /* keypad */
- if (dtmf->fields & MNCC_F_KEYPAD)
- gsm48_encode_keypad(msg, dtmf->keypad);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_start_dtmf_rej(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *dtmf = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 DTMF REJ");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_START_DTMF_REJ;
-
- /* cause */
- if (dtmf->fields & MNCC_F_CAUSE)
- gsm48_encode_cause(msg, 1, &dtmf->cause);
- else
- gsm48_encode_cause(msg, 1, &default_cause);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_stop_dtmf_ack(struct gsm_trans *trans, void *arg)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 DTMF STP ACK");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_STOP_DTMF_ACK;
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_stop_dtmf(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm_mncc dtmf;
-
- memset(&dtmf, 0, sizeof(struct gsm_mncc));
- dtmf.callref = trans->callref;
-
- return mncc_recvmsg(trans->net, trans, MNCC_STOP_DTMF_IND, &dtmf);
-}
-
-static int gsm48_cc_rx_modify(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc modify;
-
- memset(&modify, 0, sizeof(struct gsm_mncc));
- modify.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_BEARER_CAP, 0);
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_BEARER_CAP)) {
- modify.fields |= MNCC_F_BEARER_CAP;
- gsm48_decode_bearer_cap(&modify.bearer_cap,
- TLVP_VAL(&tp, GSM48_IE_BEARER_CAP)-1);
-
- /* Create a copy of the bearer capability
- * in the transaction struct, so we can use
- * this information later */
- memcpy(&trans->bearer_cap,&modify.bearer_cap,
- sizeof(trans->bearer_cap));
- }
-
- new_cc_state(trans, GSM_CSTATE_MO_ORIG_MODIFY);
-
- return mncc_recvmsg(trans->net, trans, MNCC_MODIFY_IND, &modify);
-}
-
-static int gsm48_cc_tx_modify(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *modify = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC MOD");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_MODIFY;
-
- gsm48_start_cc_timer(trans, 0x323, GSM48_T323);
-
- /* bearer capability */
- gsm48_encode_bearer_cap(msg, 1, &modify->bearer_cap);
-
- new_cc_state(trans, GSM_CSTATE_MO_TERM_MODIFY);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_modify_complete(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc modify;
-
- gsm48_stop_cc_timer(trans);
-
- memset(&modify, 0, sizeof(struct gsm_mncc));
- modify.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_BEARER_CAP, 0);
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_BEARER_CAP)) {
- modify.fields |= MNCC_F_BEARER_CAP;
- gsm48_decode_bearer_cap(&modify.bearer_cap,
- TLVP_VAL(&tp, GSM48_IE_BEARER_CAP)-1);
-
- /* Create a copy of the bearer capability
- * in the transaction struct, so we can use
- * this information later */
- memcpy(&trans->bearer_cap,&modify.bearer_cap,
- sizeof(trans->bearer_cap));
- }
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
-
- return mncc_recvmsg(trans->net, trans, MNCC_MODIFY_CNF, &modify);
-}
-
-static int gsm48_cc_tx_modify_complete(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *modify = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC MOD COMPL");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_MODIFY_COMPL;
-
- /* bearer capability */
- gsm48_encode_bearer_cap(msg, 1, &modify->bearer_cap);
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_modify_reject(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc modify;
-
- gsm48_stop_cc_timer(trans);
-
- memset(&modify, 0, sizeof(struct gsm_mncc));
- modify.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_BEARER_CAP, GSM48_IE_CAUSE);
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_BEARER_CAP)) {
- modify.fields |= GSM48_IE_BEARER_CAP;
- gsm48_decode_bearer_cap(&modify.bearer_cap,
- TLVP_VAL(&tp, GSM48_IE_BEARER_CAP)-1);
-
- /* Create a copy of the bearer capability
- * in the transaction struct, so we can use
- * this information later */
- memcpy(&trans->bearer_cap,&modify.bearer_cap,
- sizeof(trans->bearer_cap));
- }
- /* cause */
- if (TLVP_PRESENT(&tp, GSM48_IE_CAUSE)) {
- modify.fields |= MNCC_F_CAUSE;
- gsm48_decode_cause(&modify.cause,
- TLVP_VAL(&tp, GSM48_IE_CAUSE)-1);
- }
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
-
- return mncc_recvmsg(trans->net, trans, MNCC_MODIFY_REJ, &modify);
-}
-
-static int gsm48_cc_tx_modify_reject(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *modify = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC MOD REJ");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_MODIFY_REJECT;
-
- /* bearer capability */
- gsm48_encode_bearer_cap(msg, 1, &modify->bearer_cap);
- /* cause */
- gsm48_encode_cause(msg, 1, &modify->cause);
-
- new_cc_state(trans, GSM_CSTATE_ACTIVE);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_tx_notify(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *notify = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 CC NOT");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_NOTIFY;
-
- /* notify */
- gsm48_encode_notify(msg, notify->notify);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_notify(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
-// struct tlv_parsed tp;
- struct gsm_mncc notify;
-
- memset(&notify, 0, sizeof(struct gsm_mncc));
- notify.callref = trans->callref;
-// tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len);
- if (payload_len >= 1)
- gsm48_decode_notify(&notify.notify, gh->data);
-
- return mncc_recvmsg(trans->net, trans, MNCC_NOTIFY_IND, &notify);
-}
-
-static int gsm48_cc_tx_userinfo(struct gsm_trans *trans, void *arg)
-{
- struct gsm_mncc *user = arg;
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 USR INFO");
- struct gsm48_hdr *gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
-
- gh->msg_type = GSM48_MT_CC_USER_INFO;
-
- /* user-user */
- if (user->fields & MNCC_F_USERUSER)
- gsm48_encode_useruser(msg, 1, &user->useruser);
- /* more data */
- if (user->more)
- gsm48_encode_more(msg);
-
- return gsm48_conn_sendmsg(msg, trans->conn, trans);
-}
-
-static int gsm48_cc_rx_userinfo(struct gsm_trans *trans, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- struct gsm_mncc user;
-
- memset(&user, 0, sizeof(struct gsm_mncc));
- user.callref = trans->callref;
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, GSM48_IE_USER_USER, 0);
- /* user-user */
- if (TLVP_PRESENT(&tp, GSM48_IE_USER_USER)) {
- user.fields |= MNCC_F_USERUSER;
- gsm48_decode_useruser(&user.useruser,
- TLVP_VAL(&tp, GSM48_IE_USER_USER)-1);
- }
- /* more data */
- if (TLVP_PRESENT(&tp, GSM48_IE_MORE_DATA))
- user.more = 1;
-
- return mncc_recvmsg(trans->net, trans, MNCC_USERINFO_IND, &user);
-}
-
-static void mncc_recv_rtp(struct gsm_network *net, uint32_t callref,
- int cmd, uint32_t addr, uint16_t port, uint32_t payload_type,
- uint32_t payload_msg_type)
-{
- uint8_t data[sizeof(struct gsm_mncc)];
- struct gsm_mncc_rtp *rtp;
-
- memset(&data, 0, sizeof(data));
- rtp = (struct gsm_mncc_rtp *) &data[0];
-
- rtp->callref = callref;
- rtp->msg_type = cmd;
- rtp->ip = addr;
- rtp->port = port;
- rtp->payload_type = payload_type;
- rtp->payload_msg_type = payload_msg_type;
- mncc_recvmsg(net, NULL, cmd, (struct gsm_mncc *)data);
-}
-
-static void mncc_recv_rtp_sock(struct gsm_network *net, struct gsm_trans *trans, int cmd)
-{
- int msg_type;
-
- /* FIXME This has to be set to some meaningful value.
- * Possible options are:
- * GSM_TCHF_FRAME, GSM_TCHF_FRAME_EFR,
- * GSM_TCHH_FRAME, GSM_TCH_FRAME_AMR
- * (0 if unknown) */
- msg_type = GSM_TCHF_FRAME;
-
- uint32_t addr = mgcpgw_client_remote_addr_n(net->mgcpgw.client);
- uint16_t port = trans->conn->rtp.port_cn;
-
- /* FIXME: This has to be set to some meaningful value,
- * before the MSC-Split, this value was pulled from
- * lchan->abis_ip.rtp_payload */
- uint32_t payload_type = 0;
-
- return mncc_recv_rtp(net, trans->callref, cmd,
- addr,
- port,
- payload_type,
- msg_type);
-}
-
-static void mncc_recv_rtp_err(struct gsm_network *net, uint32_t callref, int cmd)
-{
- return mncc_recv_rtp(net, callref, cmd, 0, 0, 0, 0);
-}
-
-static int tch_rtp_create(struct gsm_network *net, uint32_t callref)
-{
- struct gsm_trans *trans;
- int rc;
-
- /* Find callref */
- trans = trans_find_by_callref(net, callref);
- if (!trans) {
- LOGP(DMNCC, LOGL_ERROR, "RTP create for non-existing trans\n");
- mncc_recv_rtp_err(net, callref, MNCC_RTP_CREATE);
- return -EIO;
- }
- log_set_context(LOG_CTX_VLR_SUBSCR, trans->vsub);
- if (!trans->conn) {
- LOGP(DMNCC, LOGL_NOTICE, "RTP create for trans without conn\n");
- mncc_recv_rtp_err(net, callref, MNCC_RTP_CREATE);
- return 0;
- }
-
- trans->conn->mncc_rtp_bridge = 1;
-
- /* When we call msc_call_assignment() we will trigger, depending
- * on the RAN type the call assignment on the A or Iu interface.
- * msc_call_assignment() also takes care about sending the CRCX
- * command to the MGCP-GW. The CRCX will return the port number,
- * where the PBX (e.g. Asterisk) will send its RTP stream to. We
- * have to return this port number back to the MNCC by sending
- * it back with the TCH_RTP_CREATE message. To make sure that
- * this message is sent AFTER the response to CRCX from the
- * MGCP-GW has arrived, we need will instruct msc_call_assignment()
- * to take care of this by setting trans->tch_rtp_create to true.
- * This will make sure that gsm48_tch_rtp_create() (below) is
- * called as soon as the local port number has become known. */
- trans->tch_rtp_create = true;
-
- /* Assign call (if not done yet) */
- if (trans->assignment_done == false) {
- rc = msc_call_assignment(trans);
- trans->assignment_done = true;
- }
- else
- rc = 0;
-
- return rc;
-}
-
-/* Trigger TCH_RTP_CREATE acknowledgement */
-int gsm48_tch_rtp_create(struct gsm_trans *trans)
-{
- /* This function is called as soon as the port, on which the
- * mgcp-gw expects the incoming RTP stream from the remote
- * end (e.g. Asterisk) is known. */
-
- struct gsm_subscriber_connection *conn = trans->conn;
- struct gsm_network *network = conn->network;
-
- mncc_recv_rtp_sock(network, trans, MNCC_RTP_CREATE);
- return 0;
-}
-
-static int tch_rtp_connect(struct gsm_network *net, void *arg)
-{
- struct gsm_trans *trans;
- struct gsm_mncc_rtp *rtp = arg;
-
- /* Find callref */
- trans = trans_find_by_callref(net, rtp->callref);
- if (!trans) {
- LOGP(DMNCC, LOGL_ERROR, "RTP connect for non-existing trans\n");
- mncc_recv_rtp_err(net, rtp->callref, MNCC_RTP_CONNECT);
- return -EIO;
- }
- log_set_context(LOG_CTX_VLR_SUBSCR, trans->vsub);
- if (!trans->conn) {
- LOGP(DMNCC, LOGL_ERROR, "RTP connect for trans without conn\n");
- mncc_recv_rtp_err(net, rtp->callref, MNCC_RTP_CONNECT);
- return 0;
- }
-
- msc_call_connect(trans,rtp->port,rtp->ip);
- return 0;
-}
-
-static struct downstate {
- uint32_t states;
- int type;
- int (*rout) (struct gsm_trans *trans, void *arg);
-} downstatelist[] = {
- /* mobile originating call establishment */
- {SBIT(GSM_CSTATE_INITIATED), /* 5.2.1.2 */
- MNCC_CALL_PROC_REQ, gsm48_cc_tx_call_proc_and_assign},
- {SBIT(GSM_CSTATE_INITIATED) | SBIT(GSM_CSTATE_MO_CALL_PROC), /* 5.2.1.2 | 5.2.1.5 */
- MNCC_ALERT_REQ, gsm48_cc_tx_alerting},
- {SBIT(GSM_CSTATE_INITIATED) | SBIT(GSM_CSTATE_MO_CALL_PROC) | SBIT(GSM_CSTATE_CALL_DELIVERED), /* 5.2.1.2 | 5.2.1.6 | 5.2.1.6 */
- MNCC_SETUP_RSP, gsm48_cc_tx_connect},
- {SBIT(GSM_CSTATE_MO_CALL_PROC), /* 5.2.1.4.2 */
- MNCC_PROGRESS_REQ, gsm48_cc_tx_progress},
- /* mobile terminating call establishment */
- {SBIT(GSM_CSTATE_NULL), /* 5.2.2.1 */
- MNCC_SETUP_REQ, gsm48_cc_tx_setup},
- {SBIT(GSM_CSTATE_CONNECT_REQUEST),
- MNCC_SETUP_COMPL_REQ, gsm48_cc_tx_connect_ack},
- /* signalling during call */
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_NOTIFY_REQ, gsm48_cc_tx_notify},
- {ALL_STATES - SBIT(GSM_CSTATE_NULL) - SBIT(GSM_CSTATE_RELEASE_REQ),
- MNCC_FACILITY_REQ, gsm48_cc_tx_facility},
- {ALL_STATES,
- MNCC_START_DTMF_RSP, gsm48_cc_tx_start_dtmf_ack},
- {ALL_STATES,
- MNCC_START_DTMF_REJ, gsm48_cc_tx_start_dtmf_rej},
- {ALL_STATES,
- MNCC_STOP_DTMF_RSP, gsm48_cc_tx_stop_dtmf_ack},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_HOLD_CNF, gsm48_cc_tx_hold_ack},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_HOLD_REJ, gsm48_cc_tx_hold_rej},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_RETRIEVE_CNF, gsm48_cc_tx_retrieve_ack},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_RETRIEVE_REJ, gsm48_cc_tx_retrieve_rej},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_MODIFY_REQ, gsm48_cc_tx_modify},
- {SBIT(GSM_CSTATE_MO_ORIG_MODIFY),
- MNCC_MODIFY_RSP, gsm48_cc_tx_modify_complete},
- {SBIT(GSM_CSTATE_MO_ORIG_MODIFY),
- MNCC_MODIFY_REJ, gsm48_cc_tx_modify_reject},
- {SBIT(GSM_CSTATE_ACTIVE),
- MNCC_USERINFO_REQ, gsm48_cc_tx_userinfo},
- /* clearing */
- {SBIT(GSM_CSTATE_INITIATED),
- MNCC_REJ_REQ, gsm48_cc_tx_release_compl},
- {ALL_STATES - SBIT(GSM_CSTATE_NULL) - SBIT(GSM_CSTATE_DISCONNECT_IND) - SBIT(GSM_CSTATE_RELEASE_REQ) - SBIT(GSM_CSTATE_DISCONNECT_REQ), /* 5.4.4 */
- MNCC_DISC_REQ, gsm48_cc_tx_disconnect},
- {ALL_STATES - SBIT(GSM_CSTATE_NULL) - SBIT(GSM_CSTATE_RELEASE_REQ), /* 5.4.3.2 */
- MNCC_REL_REQ, gsm48_cc_tx_release},
-};
-
-#define DOWNSLLEN \
- (sizeof(downstatelist) / sizeof(struct downstate))
-
-
-int mncc_tx_to_cc(struct gsm_network *net, int msg_type, void *arg)
-{
- int i, rc = 0;
- struct gsm_trans *trans = NULL, *transt;
- struct gsm_subscriber_connection *conn = NULL;
- struct gsm_mncc *data = arg, rel;
-
- DEBUGP(DMNCC, "receive message %s\n", get_mncc_name(msg_type));
-
- /* handle special messages */
- switch(msg_type) {
- case MNCC_BRIDGE:
- rc = tch_bridge(net, arg);
- if (rc < 0)
- disconnect_bridge(net, arg, -rc);
- return rc;
- case MNCC_RTP_CREATE:
- return tch_rtp_create(net, data->callref);
- case MNCC_RTP_CONNECT:
- return tch_rtp_connect(net, arg);
- case MNCC_RTP_FREE:
- /* unused right now */
- return -EIO;
-
- case MNCC_FRAME_DROP:
- case MNCC_FRAME_RECV:
- case GSM_TCHF_FRAME:
- case GSM_TCHF_FRAME_EFR:
- case GSM_TCHH_FRAME:
- case GSM_TCH_FRAME_AMR:
- LOGP(DMNCC, LOGL_ERROR, "RTP streams must be handled externally; %s not supported.\n",
- get_mncc_name(msg_type));
- return -ENOTSUP;
- }
-
- memset(&rel, 0, sizeof(struct gsm_mncc));
- rel.callref = data->callref;
-
- /* Find callref */
- trans = trans_find_by_callref(net, data->callref);
-
- /* Callref unknown */
- if (!trans) {
- struct vlr_subscr *vsub;
-
- if (msg_type != MNCC_SETUP_REQ) {
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub %s) "
- "Received '%s' from MNCC with "
- "unknown callref %d\n", data->called.number,
- get_mncc_name(msg_type), data->callref);
- /* Invalid call reference */
- return mncc_release_ind(net, NULL, data->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_INVAL_TRANS_ID);
- }
- if (!data->called.number[0] && !data->imsi[0]) {
- DEBUGP(DCC, "(bts - trx - ts - ti) "
- "Received '%s' from MNCC with "
- "no number or IMSI\n", get_mncc_name(msg_type));
- /* Invalid number */
- return mncc_release_ind(net, NULL, data->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_INV_NR_FORMAT);
- }
- /* New transaction due to setup, find subscriber */
- if (data->called.number[0])
- vsub = vlr_subscr_find_by_msisdn(net->vlr,
- data->called.number);
- else
- vsub = vlr_subscr_find_by_imsi(net->vlr, data->imsi);
-
- /* update the subscriber we deal with */
- log_set_context(LOG_CTX_VLR_SUBSCR, vsub);
-
- /* If subscriber is not found */
- if (!vsub) {
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub %s) "
- "Received '%s' from MNCC with "
- "unknown subscriber %s\n", data->called.number,
- get_mncc_name(msg_type), data->called.number);
- /* Unknown subscriber */
- return mncc_release_ind(net, NULL, data->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_UNASSIGNED_NR);
- }
- /* If subscriber is not "attached" */
- if (!vsub->lac) {
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub %s) "
- "Received '%s' from MNCC with "
- "detached subscriber %s\n", data->called.number,
- get_mncc_name(msg_type), data->called.number);
- vlr_subscr_put(vsub);
- /* Temporarily out of order */
- return mncc_release_ind(net, NULL, data->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_DEST_OOO);
- }
- /* Create transaction */
- trans = trans_alloc(net, vsub, GSM48_PDISC_CC, 0xff, data->callref);
- if (!trans) {
- DEBUGP(DCC, "No memory for trans.\n");
- vlr_subscr_put(vsub);
- /* Ressource unavailable */
- mncc_release_ind(net, NULL, data->callref,
- GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- return -ENOMEM;
- }
-
- /* Find conn */
- conn = connection_for_subscr(vsub);
-
- /* If subscriber has no conn */
- if (!conn) {
- /* find transaction with this subscriber already paging */
- llist_for_each_entry(transt, &net->trans_list, entry) {
- /* Transaction of our conn? */
- if (transt == trans ||
- transt->vsub != vsub)
- continue;
- DEBUGP(DCC, "(bts - trx - ts - ti -- sub %s) "
- "Received '%s' from MNCC with "
- "unallocated channel, paging already "
- "started for lac %d.\n",
- data->called.number,
- get_mncc_name(msg_type), vsub->lac);
- vlr_subscr_put(vsub);
- trans_free(trans);
- return 0;
- }
- /* store setup information until paging succeeds */
- memcpy(&trans->cc.msg, data, sizeof(struct gsm_mncc));
-
- /* Request a channel */
- trans->paging_request = subscr_request_conn(
- vsub,
- setup_trig_pag_evt,
- trans,
- "MNCC: establish call");
- if (!trans->paging_request) {
- LOGP(DCC, LOGL_ERROR, "Failed to allocate paging token.\n");
- vlr_subscr_put(vsub);
- trans_free(trans);
- return 0;
- }
- vlr_subscr_put(vsub);
- return 0;
- }
-
- /* Assign conn */
- trans->conn = msc_subscr_conn_get(conn);
- vlr_subscr_put(vsub);
- } else {
- /* update the subscriber we deal with */
- log_set_context(LOG_CTX_VLR_SUBSCR, trans->vsub);
- }
-
- if (trans->conn)
- conn = trans->conn;
-
- /* if paging did not respond yet */
- if (!conn) {
- DEBUGP(DCC, "(sub %s) "
- "Received '%s' from MNCC in paging state\n",
- vlr_subscr_msisdn_or_name(trans->vsub),
- get_mncc_name(msg_type));
- mncc_set_cause(&rel, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_NORM_CALL_CLEAR);
- if (msg_type == MNCC_REL_REQ)
- rc = mncc_recvmsg(net, trans, MNCC_REL_CNF, &rel);
- else
- rc = mncc_recvmsg(net, trans, MNCC_REL_IND, &rel);
- trans->callref = 0;
- trans_free(trans);
- return rc;
- }
-
- DEBUGP(DCC, "(ti %02x sub %s) "
- "Received '%s' from MNCC in state %d (%s)\n",
- trans->transaction_id,
- vlr_subscr_msisdn_or_name(trans->conn->vsub),
- get_mncc_name(msg_type), trans->cc.state,
- gsm48_cc_state_name(trans->cc.state));
-
- /* Find function for current state and message */
- for (i = 0; i < DOWNSLLEN; i++)
- if ((msg_type == downstatelist[i].type)
- && ((1 << trans->cc.state) & downstatelist[i].states))
- break;
- if (i == DOWNSLLEN) {
- DEBUGP(DCC, "Message unhandled at this state.\n");
- return 0;
- }
-
- rc = downstatelist[i].rout(trans, arg);
-
- return rc;
-}
-
-
-static struct datastate {
- uint32_t states;
- int type;
- int (*rout) (struct gsm_trans *trans, struct msgb *msg);
-} datastatelist[] = {
- /* mobile originating call establishment */
- {SBIT(GSM_CSTATE_NULL), /* 5.2.1.2 */
- GSM48_MT_CC_SETUP, gsm48_cc_rx_setup},
- {SBIT(GSM_CSTATE_NULL), /* 5.2.1.2 */
- GSM48_MT_CC_EMERG_SETUP, gsm48_cc_rx_setup},
- {SBIT(GSM_CSTATE_CONNECT_IND), /* 5.2.1.2 */
- GSM48_MT_CC_CONNECT_ACK, gsm48_cc_rx_connect_ack},
- /* mobile terminating call establishment */
- {SBIT(GSM_CSTATE_CALL_PRESENT), /* 5.2.2.3.2 */
- GSM48_MT_CC_CALL_CONF, gsm48_cc_rx_call_conf},
- {SBIT(GSM_CSTATE_CALL_PRESENT) | SBIT(GSM_CSTATE_MO_TERM_CALL_CONF), /* ???? | 5.2.2.3.2 */
- GSM48_MT_CC_ALERTING, gsm48_cc_rx_alerting},
- {SBIT(GSM_CSTATE_CALL_PRESENT) | SBIT(GSM_CSTATE_MO_TERM_CALL_CONF) | SBIT(GSM_CSTATE_CALL_RECEIVED), /* (5.2.2.6) | 5.2.2.6 | 5.2.2.6 */
- GSM48_MT_CC_CONNECT, gsm48_cc_rx_connect},
- /* signalling during call */
- {ALL_STATES - SBIT(GSM_CSTATE_NULL),
- GSM48_MT_CC_FACILITY, gsm48_cc_rx_facility},
- {SBIT(GSM_CSTATE_ACTIVE),
- GSM48_MT_CC_NOTIFY, gsm48_cc_rx_notify},
- {ALL_STATES,
- GSM48_MT_CC_START_DTMF, gsm48_cc_rx_start_dtmf},
- {ALL_STATES,
- GSM48_MT_CC_STOP_DTMF, gsm48_cc_rx_stop_dtmf},
- {ALL_STATES,
- GSM48_MT_CC_STATUS_ENQ, gsm48_cc_rx_status_enq},
- {SBIT(GSM_CSTATE_ACTIVE),
- GSM48_MT_CC_HOLD, gsm48_cc_rx_hold},
- {SBIT(GSM_CSTATE_ACTIVE),
- GSM48_MT_CC_RETR, gsm48_cc_rx_retrieve},
- {SBIT(GSM_CSTATE_ACTIVE),
- GSM48_MT_CC_MODIFY, gsm48_cc_rx_modify},
- {SBIT(GSM_CSTATE_MO_TERM_MODIFY),
- GSM48_MT_CC_MODIFY_COMPL, gsm48_cc_rx_modify_complete},
- {SBIT(GSM_CSTATE_MO_TERM_MODIFY),
- GSM48_MT_CC_MODIFY_REJECT, gsm48_cc_rx_modify_reject},
- {SBIT(GSM_CSTATE_ACTIVE),
- GSM48_MT_CC_USER_INFO, gsm48_cc_rx_userinfo},
- /* clearing */
- {ALL_STATES - SBIT(GSM_CSTATE_NULL) - SBIT(GSM_CSTATE_RELEASE_REQ), /* 5.4.3.2 */
- GSM48_MT_CC_DISCONNECT, gsm48_cc_rx_disconnect},
- {ALL_STATES - SBIT(GSM_CSTATE_NULL), /* 5.4.4.1.2.2 */
- GSM48_MT_CC_RELEASE, gsm48_cc_rx_release},
- {ALL_STATES, /* 5.4.3.4 */
- GSM48_MT_CC_RELEASE_COMPL, gsm48_cc_rx_release_compl},
-};
-
-#define DATASLLEN \
- (sizeof(datastatelist) / sizeof(struct datastate))
-
-static int gsm0408_rcv_cc(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t msg_type = gsm48_hdr_msg_type(gh);
- uint8_t transaction_id = gsm48_hdr_trans_id_flip_ti(gh);
- struct gsm_trans *trans = NULL;
- int i, rc = 0;
-
- if (msg_type & 0x80) {
- DEBUGP(DCC, "MSG 0x%2x not defined for PD error\n", msg_type);
- return -EINVAL;
- }
-
- if (!conn->vsub) {
- LOGP(DCC, LOGL_ERROR, "Invalid conn: no subscriber\n");
- return -EINVAL;
- }
-
- /* Find transaction */
- trans = trans_find_by_id(conn, GSM48_PDISC_CC, transaction_id);
-
-#if BEFORE_MSCSPLIT
- /* Re-enable this log output once we can obtain this information via
- * A-interface, see OS#2391. */
- DEBUGP(DCC, "(bts %d trx %d ts %d ti %x sub %s) "
- "Received '%s' from MS in state %d (%s)\n",
- conn->bts->nr, conn->lchan->ts->trx->nr, conn->lchan->ts->nr,
- transaction_id, vlr_subscr_msisdn_or_name(conn->vsub),
- gsm48_cc_msg_name(msg_type), trans?(trans->cc.state):0,
- gsm48_cc_state_name(trans?(trans->cc.state):0));
-#endif
-
- /* Create transaction */
- if (!trans) {
- DEBUGP(DCC, "Unknown transaction ID %x, "
- "creating new trans.\n", transaction_id);
- /* Create transaction */
- trans = trans_alloc(conn->network, conn->vsub,
- GSM48_PDISC_CC,
- transaction_id, new_callref++);
- if (!trans) {
- DEBUGP(DCC, "No memory for trans.\n");
- rc = gsm48_tx_simple(conn,
- GSM48_PDISC_CC | (transaction_id << 4),
- GSM48_MT_CC_RELEASE_COMPL);
- return -ENOMEM;
- }
- /* Assign transaction */
- trans->conn = msc_subscr_conn_get(conn);
- cm_service_request_concludes(conn, msg);
- }
-
- /* find function for current state and message */
- for (i = 0; i < DATASLLEN; i++)
- if ((msg_type == datastatelist[i].type)
- && ((1 << trans->cc.state) & datastatelist[i].states))
- break;
- if (i == DATASLLEN) {
- DEBUGP(DCC, "Message unhandled at this state.\n");
- return 0;
- }
-
- assert(trans->vsub);
-
- rc = datastatelist[i].rout(trans, msg);
-
- msc_subscr_conn_communicating(conn);
- return rc;
-}
-
-static bool msg_is_initially_permitted(const struct gsm48_hdr *hdr)
-{
- uint8_t pdisc = gsm48_hdr_pdisc(hdr);
- uint8_t msg_type = gsm48_hdr_msg_type(hdr);
-
- switch (pdisc) {
- case GSM48_PDISC_MM:
- switch (msg_type) {
- case GSM48_MT_MM_LOC_UPD_REQUEST:
- case GSM48_MT_MM_CM_SERV_REQ:
- case GSM48_MT_MM_AUTH_RESP:
- case GSM48_MT_MM_AUTH_FAIL:
- case GSM48_MT_MM_ID_RESP:
- case GSM48_MT_MM_TMSI_REALL_COMPL:
- case GSM48_MT_MM_IMSI_DETACH_IND:
- return true;
- default:
- break;
- }
- break;
- case GSM48_PDISC_RR:
- switch (msg_type) {
- case GSM48_MT_RR_CIPH_M_COMPL:
- case GSM48_MT_RR_PAG_RESP:
- return true;
- default:
- break;
- }
- break;
- default:
- break;
- }
-
- return false;
-}
-
-void cm_service_request_concludes(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
-
- /* If a CM Service Request was received before, this is the request the
- * conn was opened for. No need to wait for further messages. */
-
- if (!conn->received_cm_service_request)
- return;
-
- if (log_check_level(DMM, LOGL_DEBUG)) {
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gsm48_hdr_pdisc(gh);
- uint8_t msg_type = gsm48_hdr_msg_type(gh);
-
- DEBUGP(DMM, "%s: rx msg %s:"
- " received_cm_service_request changes to false\n",
- vlr_subscr_name(conn->vsub),
- gsm48_pdisc_msgtype_name(pdisc, msg_type));
- }
- conn->received_cm_service_request = false;
-}
-
-
-/* Main entry point for GSM 04.08/44.008 Layer 3 data (e.g. from the BSC). */
-int gsm0408_dispatch(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gsm48_hdr_pdisc(gh);
- int rc = 0;
-
- OSMO_ASSERT(conn);
- OSMO_ASSERT(msg);
-
- LOGP(DRLL, LOGL_DEBUG, "Dispatching 04.08 message %s (0x%x:0x%x)\n",
- gsm48_pdisc_msgtype_name(pdisc, gsm48_hdr_msg_type(gh)),
- pdisc, gsm48_hdr_msg_type(gh));
-
- if (!msc_subscr_conn_is_accepted(conn)
- && !msg_is_initially_permitted(gh)) {
- LOGP(DRLL, LOGL_ERROR,
- "subscr %s: Message not permitted for initial conn: %s\n",
- vlr_subscr_name(conn->vsub),
- gsm48_pdisc_msgtype_name(pdisc, gsm48_hdr_msg_type(gh)));
- return -EACCES;
- }
-
- if (conn->vsub && conn->vsub->cs.attached_via_ran != conn->via_ran) {
- LOGP(DMM, LOGL_ERROR,
- "%s: Illegal situation: RAN type mismatch:"
- " attached via %s, received message via %s\n",
- vlr_subscr_name(conn->vsub),
- ran_type_name(conn->vsub->cs.attached_via_ran),
- ran_type_name(conn->via_ran));
- return -EACCES;
- }
-
-#if 0
- if (silent_call_reroute(conn, msg))
- return silent_call_rx(conn, msg);
-#endif
-
- switch (pdisc) {
- case GSM48_PDISC_CC:
- rc = gsm0408_rcv_cc(conn, msg);
- break;
- case GSM48_PDISC_MM:
- rc = gsm0408_rcv_mm(conn, msg);
- break;
- case GSM48_PDISC_RR:
- rc = gsm0408_rcv_rr(conn, msg);
- break;
- case GSM48_PDISC_SMS:
- rc = gsm0411_rcv_sms(conn, msg);
- break;
- case GSM48_PDISC_MM_GPRS:
- case GSM48_PDISC_SM_GPRS:
- LOGP(DRLL, LOGL_NOTICE, "Unimplemented "
- "GSM 04.08 discriminator 0x%02x\n", pdisc);
- rc = -ENOTSUP;
- break;
- case GSM48_PDISC_NC_SS:
- rc = handle_rcv_ussd(conn, msg);
- break;
- case GSM48_PDISC_TEST:
- rc = gsm0414_rcv_test(conn, msg);
- break;
- default:
- LOGP(DRLL, LOGL_NOTICE, "Unknown "
- "GSM 04.08 discriminator 0x%02x\n", pdisc);
- rc = -EINVAL;
- break;
- }
-
- return rc;
-}
-
-/***********************************************************************
- * VLR integration
- ***********************************************************************/
-
-/* VLR asks us to send an authentication request */
-static int msc_vlr_tx_auth_req(void *msc_conn_ref, struct gsm_auth_tuple *at,
- bool send_autn)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return gsm48_tx_mm_auth_req(conn, at->vec.rand,
- send_autn? at->vec.autn : NULL,
- at->key_seq);
-}
-
-/* VLR asks us to send an authentication reject */
-static int msc_vlr_tx_auth_rej(void *msc_conn_ref)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return gsm48_tx_mm_auth_rej(conn);
-}
-
-/* VLR asks us to transmit an Identity Request of given type */
-static int msc_vlr_tx_id_req(void *msc_conn_ref, uint8_t mi_type)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return mm_tx_identity_req(conn, mi_type);
-}
-
-/* VLR asks us to transmit a Location Update Accept */
-static int msc_vlr_tx_lu_acc(void *msc_conn_ref, uint32_t send_tmsi)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return gsm0408_loc_upd_acc(conn, send_tmsi);
-}
-
-/* VLR asks us to transmit a Location Update Reject */
-static int msc_vlr_tx_lu_rej(void *msc_conn_ref, uint8_t cause)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return gsm0408_loc_upd_rej(conn, cause);
-}
-
-/* VLR asks us to transmit a CM Service Accept */
-static int msc_vlr_tx_cm_serv_acc(void *msc_conn_ref)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return msc_gsm48_tx_mm_serv_ack(conn);
-}
-
-static int msc_vlr_tx_common_id(void *msc_conn_ref)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- return msc_tx_common_id(conn);
-}
-
-/* VLR asks us to transmit a CM Service Reject */
-static int msc_vlr_tx_cm_serv_rej(void *msc_conn_ref, enum vlr_proc_arq_result result)
-{
- uint8_t cause;
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- conn->received_cm_service_request = false;
-
- switch (result) {
- default:
- case VLR_PR_ARQ_RES_NONE:
- case VLR_PR_ARQ_RES_SYSTEM_FAILURE:
- case VLR_PR_ARQ_RES_UNKNOWN_ERROR:
- cause = GSM48_REJECT_NETWORK_FAILURE;
- break;
- case VLR_PR_ARQ_RES_ILLEGAL_SUBSCR:
- cause = GSM48_REJECT_LOC_NOT_ALLOWED;
- break;
- case VLR_PR_ARQ_RES_UNIDENT_SUBSCR:
- cause = GSM48_REJECT_INVALID_MANDANTORY_INF;
- break;
- case VLR_PR_ARQ_RES_ROAMING_NOTALLOWED:
- cause = GSM48_REJECT_ROAMING_NOT_ALLOWED;
- break;
- case VLR_PR_ARQ_RES_ILLEGAL_EQUIP:
- cause = GSM48_REJECT_ILLEGAL_MS;
- break;
- case VLR_PR_ARQ_RES_TIMEOUT:
- cause = GSM48_REJECT_CONGESTION;
- break;
- };
-
- return msc_gsm48_tx_mm_serv_rej(conn, cause);
-}
-
-/* VLR asks us to start using ciphering */
-static int msc_vlr_set_ciph_mode(void *msc_conn_ref,
- enum vlr_ciph ciph,
- bool retrieve_imeisv)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- struct vlr_subscr *vsub;
- struct gsm_auth_tuple *tuple;
-
- if (!conn || !conn->vsub) {
- LOGP(DMM, LOGL_ERROR, "Cannot send Ciphering Mode Command to"
- " NULL conn/subscriber");
- return -EINVAL;
- }
-
- vsub = conn->vsub;
- tuple = vsub->last_tuple;
-
- if (!tuple) {
- LOGP(DMM, LOGL_ERROR, "subscr %s: Cannot send Ciphering Mode"
- " Command: no auth tuple available\n",
- vlr_subscr_name(vsub));
- return -EINVAL;
- }
-
- switch (conn->via_ran) {
- case RAN_GERAN_A:
- DEBUGP(DMM, "-> CIPHER MODE COMMAND %s\n",
- vlr_subscr_name(conn->vsub));
- return a_iface_tx_cipher_mode(conn, ciph, tuple->vec.kc, 8,
- retrieve_imeisv);
- case RAN_UTRAN_IU:
-#ifdef BUILD_IU
- DEBUGP(DMM, "-> SECURITY MODE CONTROL %s\n",
- vlr_subscr_name(conn->vsub));
- return ranap_iu_tx_sec_mode_cmd(conn->iu.ue_ctx, &tuple->vec, 0, 1);
-#else
- LOGP(DMM, LOGL_ERROR, "Cannot send Security Mode Control over RAN_UTRAN_IU,"
- " built without Iu support\n");
- return -ENOTSUP;
-#endif
-
- default:
- break;
- }
- LOGP(DMM, LOGL_ERROR,
- "%s: cannot start ciphering, unknown RAN type %d\n",
- vlr_subscr_name(conn->vsub), conn->via_ran);
- return -ENOTSUP;
-}
-
-void msc_rx_sec_mode_compl(struct gsm_subscriber_connection *conn)
-{
- struct vlr_ciph_result vlr_res = {};
-
- if (!conn || !conn->vsub) {
- LOGP(DMM, LOGL_ERROR,
- "Rx Security Mode Complete for invalid conn\n");
- return;
- }
-
- DEBUGP(DMM, "<- SECURITY MODE COMPLETE %s\n",
- vlr_subscr_name(conn->vsub));
-
- vlr_res.cause = VLR_CIPH_COMPL;
- vlr_subscr_rx_ciph_res(conn->vsub, &vlr_res);
-}
-
-/* VLR informs us that the subscriber data has somehow been modified */
-static void msc_vlr_subscr_update(struct vlr_subscr *subscr)
-{
- /* FIXME */
-}
-
-/* VLR informs us that the subscriber has been associated with a conn */
-static void msc_vlr_subscr_assoc(void *msc_conn_ref,
- struct vlr_subscr *vsub)
-{
- struct gsm_subscriber_connection *conn = msc_conn_ref;
- OSMO_ASSERT(!conn->vsub);
- conn->vsub = vlr_subscr_get(vsub);
- conn->vsub->cs.attached_via_ran = conn->via_ran;
-}
-
-/* operations that we need to implement for libvlr */
-static const struct vlr_ops msc_vlr_ops = {
- .tx_auth_req = msc_vlr_tx_auth_req,
- .tx_auth_rej = msc_vlr_tx_auth_rej,
- .tx_id_req = msc_vlr_tx_id_req,
- .tx_lu_acc = msc_vlr_tx_lu_acc,
- .tx_lu_rej = msc_vlr_tx_lu_rej,
- .tx_cm_serv_acc = msc_vlr_tx_cm_serv_acc,
- .tx_cm_serv_rej = msc_vlr_tx_cm_serv_rej,
- .set_ciph_mode = msc_vlr_set_ciph_mode,
- .tx_common_id = msc_vlr_tx_common_id,
- .subscr_update = msc_vlr_subscr_update,
- .subscr_assoc = msc_vlr_subscr_assoc,
-};
-
-/* Allocate net->vlr so that the VTY may configure the VLR's data structures */
-int msc_vlr_alloc(struct gsm_network *net)
-{
- net->vlr = vlr_alloc(net, &msc_vlr_ops);
- if (!net->vlr)
- return -ENOMEM;
- net->vlr->user_ctx = net;
- return 0;
-}
-
-/* Launch the VLR, i.e. its GSUP connection */
-int msc_vlr_start(struct gsm_network *net)
-{
- OSMO_ASSERT(net->vlr);
- return vlr_start("MSC", net->vlr, net->gsup_server_addr_str,
- net->gsup_server_port);
-}
diff --git a/src/libmsc/gsm_04_11.c b/src/libmsc/gsm_04_11.c
deleted file mode 100644
index 574fe281d..000000000
--- a/src/libmsc/gsm_04_11.c
+++ /dev/null
@@ -1,1189 +0,0 @@
-/* Point-to-Point (PP) Short Message Service (SMS)
- * Support on Mobile Radio Interface
- * 3GPP TS 04.11 version 7.1.0 Release 1998 / ETSI TS 100 942 V7.1.0 */
-
-/* (C) 2008 by Daniel Willmann <daniel@totalueberwachung.de>
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2010-2012 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010 by On-Waves
- * (C) 2011 by Andreas Eversberg <jolly@eversberg.eu>
- *
- * 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/>.
- *
- */
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <time.h>
-#include <netinet/in.h>
-
-#include "bscconfig.h"
-
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-
-#include <osmocom/gsm/gsm_utils.h>
-#include <osmocom/gsm/gsm0411_utils.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/db.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/signal.h>
-#include <openbsc/db.h>
-#include <openbsc/transaction.h>
-#include <openbsc/paging.h>
-#include <openbsc/bsc_rll.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/vlr.h>
-
-#ifdef BUILD_SMPP
-#include "smpp_smsc.h"
-#endif
-
-void *tall_gsms_ctx;
-static uint32_t new_callref = 0x40000001;
-
-
-struct gsm_sms *sms_alloc(void)
-{
- return talloc_zero(tall_gsms_ctx, struct gsm_sms);
-}
-
-void sms_free(struct gsm_sms *sms)
-{
- /* drop references to subscriber structure */
- if (sms->receiver)
- vlr_subscr_put(sms->receiver);
-#ifdef BUILD_SMPP
- if (sms->smpp.esme)
- smpp_esme_put(sms->smpp.esme);
-#endif
-
- talloc_free(sms);
-}
-
-struct gsm_sms *sms_from_text(struct vlr_subscr *receiver,
- struct vlr_subscr *sender,
- int dcs, const char *text)
-{
- struct gsm_sms *sms = sms_alloc();
-
- if (!sms)
- return NULL;
-
- sms->receiver = vlr_subscr_get(receiver);
- osmo_strlcpy(sms->text, text, sizeof(sms->text));
-
- osmo_strlcpy(sms->src.addr, sender->msisdn, sizeof(sms->src.addr));
- sms->reply_path_req = 0;
- sms->status_rep_req = 0;
- sms->ud_hdr_ind = 0;
- sms->protocol_id = 0; /* implicit */
- sms->data_coding_scheme = dcs;
- osmo_strlcpy(sms->dst.addr, receiver->msisdn, sizeof(sms->dst.addr));
- /* Generate user_data */
- sms->user_data_len = gsm_7bit_encode_n(sms->user_data, sizeof(sms->user_data),
- sms->text, NULL);
-
- return sms;
-}
-
-
-static void send_signal(int sig_no,
- struct gsm_trans *trans,
- struct gsm_sms *sms,
- int paging_result)
-{
- struct sms_signal_data sig;
- sig.trans = trans;
- sig.sms = sms;
- sig.paging_result = paging_result;
- osmo_signal_dispatch(SS_SMS, sig_no, &sig);
-}
-
-static int gsm411_sendmsg(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- DEBUGP(DLSMS, "GSM4.11 TX %s\n", osmo_hexdump(msg->data, msg->len));
- msg->l3h = msg->data;
- return msc_tx_dtap(conn, msg);
-}
-
-/* Prefix msg with a 04.08/04.11 CP header */
-static int gsm411_cp_sendmsg(struct msgb *msg, struct gsm_trans *trans,
- uint8_t msg_type)
-{
- struct gsm48_hdr *gh;
-
- gh = (struct gsm48_hdr *) msgb_push(msg, sizeof(*gh));
- /* Outgoing needs the highest bit set */
- gh->proto_discr = trans->protocol | (trans->transaction_id<<4);
- gh->msg_type = msg_type;
-
- DEBUGP(DLSMS, "sending CP message (trans=%x)\n", trans->transaction_id);
-
- return gsm411_sendmsg(trans->conn, msg);
-}
-
-/* mm_send: receive MMCCSMS sap message from SMC */
-static int gsm411_mm_send(struct gsm411_smc_inst *inst, int msg_type,
- struct msgb *msg, int cp_msg_type)
-{
- struct gsm_trans *trans =
- container_of(inst, struct gsm_trans, sms.smc_inst);
- int rc = 0;
-
- switch (msg_type) {
- case GSM411_MMSMS_EST_REQ:
- /* recycle msg */
- rc = gsm411_smc_recv(inst, GSM411_MMSMS_EST_CNF, msg, 0);
- msgb_free(msg); /* upper layer does not free msg */
- break;
- case GSM411_MMSMS_DATA_REQ:
- rc = gsm411_cp_sendmsg(msg, trans, cp_msg_type);
- break;
- case GSM411_MMSMS_REL_REQ:
- DEBUGP(DLSMS, "Got MMSMS_REL_REQ, destroying transaction.\n");
- msgb_free(msg);
- trans_free(trans);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Unhandled MMCCSMS msg 0x%x\n", msg_type);
- msgb_free(msg);
- rc = -EINVAL;
- }
-
- return rc;
-}
-
-/* mm_send: receive MNCCSMS sap message from SMR */
-int gsm411_mn_send(struct gsm411_smr_inst *inst, int msg_type,
- struct msgb *msg)
-{
- struct gsm_trans *trans =
- container_of(inst, struct gsm_trans, sms.smr_inst);
-
- /* forward to SMC */
- return gsm411_smc_send(&trans->sms.smc_inst, msg_type, msg);
-}
-
-static int gsm340_rx_sms_submit(struct gsm_sms *gsms)
-{
- if (db_sms_store(gsms) != 0) {
- LOGP(DLSMS, LOGL_ERROR, "Failed to store SMS in Database\n");
- return GSM411_RP_CAUSE_MO_NET_OUT_OF_ORDER;
- }
- /* dispatch a signal to tell higher level about it */
- send_signal(S_SMS_SUBMITTED, NULL, gsms, 0);
-
- return 0;
-}
-
-/* generate a TPDU address field compliant with 03.40 sec. 9.1.2.5 */
-static int gsm340_gen_oa_sub(uint8_t *oa, unsigned int oa_len,
- const struct gsm_sms_addr *src)
-{
- /* network specific, private numbering plan */
- return gsm340_gen_oa(oa, oa_len, src->ton, src->npi, src->addr);
-}
-
-/* generate a msgb containing an 03.40 9.2.2.1 SMS-DELIVER TPDU derived from
- * struct gsm_sms, returns total size of TPDU */
-static int gsm340_gen_sms_deliver_tpdu(struct msgb *msg, struct gsm_sms *sms)
-{
- uint8_t *smsp;
- uint8_t oa[12]; /* max len per 03.40 */
- uint8_t octet_len;
- unsigned int old_msg_len = msg->len;
- int oa_len;
-
- /* generate first octet with masked bits */
- smsp = msgb_put(msg, 1);
- /* TP-MTI (message type indicator) */
- *smsp = GSM340_SMS_DELIVER_SC2MS;
- /* TP-MMS (more messages to send) */
- if (0 /* FIXME */)
- *smsp |= 0x04;
- /* TP-SRI(deliver)/SRR(submit) */
- if (sms->status_rep_req)
- *smsp |= 0x20;
- /* TP-UDHI (indicating TP-UD contains a header) */
- if (sms->ud_hdr_ind)
- *smsp |= 0x40;
-
- /* generate originator address */
- oa_len = gsm340_gen_oa_sub(oa, sizeof(oa), &sms->src);
- if (oa_len < 0)
- return -ENOSPC;
-
- smsp = msgb_put(msg, oa_len);
- memcpy(smsp, oa, oa_len);
-
- /* generate TP-PID */
- smsp = msgb_put(msg, 1);
- *smsp = sms->protocol_id;
-
- /* generate TP-DCS */
- smsp = msgb_put(msg, 1);
- *smsp = sms->data_coding_scheme;
-
- /* generate TP-SCTS */
- smsp = msgb_put(msg, 7);
- gsm340_gen_scts(smsp, time(NULL));
-
- /* generate TP-UDL */
- smsp = msgb_put(msg, 1);
- *smsp = sms->user_data_len;
-
- /* generate TP-UD */
- switch (gsm338_get_sms_alphabet(sms->data_coding_scheme)) {
- case DCS_7BIT_DEFAULT:
- octet_len = sms->user_data_len*7/8;
- if (sms->user_data_len*7%8 != 0)
- octet_len++;
- /* Warning, user_data_len indicates the amount of septets
- * (characters), we need amount of octets occupied */
- smsp = msgb_put(msg, octet_len);
- memcpy(smsp, sms->user_data, octet_len);
- break;
- case DCS_UCS2:
- case DCS_8BIT_DATA:
- smsp = msgb_put(msg, sms->user_data_len);
- memcpy(smsp, sms->user_data, sms->user_data_len);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Unhandled Data Coding Scheme: 0x%02X\n",
- sms->data_coding_scheme);
- break;
- }
-
- return msg->len - old_msg_len;
-}
-
-/* As defined by GSM 03.40, Section 9.2.2.3. */
-static int gsm340_gen_sms_status_report_tpdu(struct msgb *msg,
- struct gsm_sms *sms)
-{
- unsigned int old_msg_len = msg->len;
- uint8_t oa[12]; /* max len per 03.40 */
- uint8_t *smsp;
- int oa_len;
-
- /* generate first octet with masked bits */
- smsp = msgb_put(msg, 1);
- /* TP-MTI (message type indicator) */
- *smsp = GSM340_SMS_STATUS_REP_SC2MS;
- /* TP-MMS (more messages to send) */
- if (0 /* FIXME */)
- *smsp |= 0x04;
- /* TP-MR (message reference) */
- smsp = msgb_put(msg, 1);
- *smsp = sms->msg_ref;
-
- /* generate recipient address */
- oa_len = gsm340_gen_oa_sub(oa, sizeof(oa), &sms->src);
- if (oa_len < 0)
- return -ENOSPC;
-
- smsp = msgb_put(msg, oa_len);
- memcpy(smsp, oa, oa_len);
-
- /* generate TP-SCTS (Service centre timestamp) */
- smsp = msgb_put(msg, 7);
- gsm340_gen_scts(smsp, sms->created);
-
- /* generate TP-DT (Discharge time, in TP-SCTS format). */
- smsp = msgb_put(msg, 7);
- gsm340_gen_scts(smsp, sms->created);
-
- /* TP-ST (status) */
- smsp = msgb_put(msg, 1);
- /* From GSM 03.40, Section 9.2.3.15, 0x00 means OK. */
- *smsp = 0x00;
-
- LOGP(DLSMS, LOGL_INFO, "sending status report for SMS reference %x\n",
- sms->msg_ref);
-
- return msg->len - old_msg_len;
-}
-
-static int sms_route_mt_sms(struct gsm_subscriber_connection *conn,
- struct gsm_sms *gsms)
-{
- int rc;
-
-#ifdef BUILD_SMPP
- int smpp_first = smpp_route_smpp_first(gsms, conn);
-
- /*
- * Route through SMPP first before going to the local database. In case
- * of a unroutable message and no local subscriber, SMPP will be tried
- * twice. In case of an unknown subscriber continue with the normal
- * delivery of the SMS.
- */
- if (smpp_first) {
- rc = smpp_try_deliver(gsms, conn);
- if (rc == GSM411_RP_CAUSE_MO_NUM_UNASSIGNED)
- /* unknown subscriber, try local */
- goto try_local;
- if (rc < 0) {
- LOGP(DLSMS, LOGL_ERROR, "%s: SMS delivery error: %d.",
- vlr_subscr_name(conn->vsub), rc);
- rc = GSM411_RP_CAUSE_MO_TEMP_FAIL;
- /* rc will be logged by gsm411_send_rp_error() */
- rate_ctr_inc(&conn->bts->network->msc_ctrs->ctr[
- MSC_CTR_SMS_DELIVER_UNKNOWN_ERROR]);
- }
- return rc;
- }
-
-try_local:
-#endif
-
- /* determine gsms->receiver based on dialled number */
- gsms->receiver = vlr_subscr_find_by_msisdn(conn->network->vlr,
- gsms->dst.addr);
- if (!gsms->receiver) {
-#ifdef BUILD_SMPP
- /* Avoid a second look-up */
- if (smpp_first) {
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_SMS_NO_RECEIVER]);
- return GSM411_RP_CAUSE_MO_NUM_UNASSIGNED;
- }
-
- rc = smpp_try_deliver(gsms, conn);
- if (rc == GSM411_RP_CAUSE_MO_NUM_UNASSIGNED) {
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_SMS_NO_RECEIVER]);
- } else if (rc < 0) {
- LOGP(DLSMS, LOGL_ERROR, "%s: SMS delivery error: %d.",
- vlr_subscr_name(conn->vsub), rc);
- rc = GSM411_RP_CAUSE_MO_TEMP_FAIL;
- /* rc will be logged by gsm411_send_rp_error() */
- rate_ctr_inc(&conn->bts->network->msc_ctrs->ctr[
- MSC_CTR_SMS_DELIVER_UNKNOWN_ERROR]);
- }
-#else
- rc = GSM411_RP_CAUSE_MO_NUM_UNASSIGNED;
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_SMS_NO_RECEIVER]);
-#endif
- }
-
- return rc;
-}
-
-
-/* process an incoming TPDU (called from RP-DATA)
- * return value > 0: RP CAUSE for ERROR; < 0: silent error; 0 = success */
-static int gsm340_rx_tpdu(struct gsm_trans *trans, struct msgb *msg,
- uint32_t gsm411_msg_ref)
-{
- struct gsm_subscriber_connection *conn = trans->conn;
- uint8_t *smsp = msgb_sms(msg);
- struct gsm_sms *gsms;
- unsigned int sms_alphabet;
- uint8_t sms_mti, sms_vpf;
- uint8_t *sms_vp;
- uint8_t da_len_bytes;
- uint8_t address_lv[12]; /* according to 03.40 / 9.1.2.5 */
- int rc = 0;
-
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_SMS_SUBMITTED]);
-
- gsms = sms_alloc();
- if (!gsms)
- return GSM411_RP_CAUSE_MO_NET_OUT_OF_ORDER;
-
- /* invert those fields where 0 means active/present */
- sms_mti = *smsp & 0x03;
- sms_vpf = (*smsp & 0x18) >> 3;
- gsms->status_rep_req = (*smsp & 0x20) >> 5;
- gsms->ud_hdr_ind = (*smsp & 0x40);
- /*
- * Not evaluating MMS (More Messages to Send) because the
- * lchan stays open anyway.
- * Not evaluating RP (Reply Path) because we're not aware of its
- * benefits.
- */
-
- smsp++;
- gsms->msg_ref = *smsp++;
-
- gsms->gsm411.transaction_id = trans->transaction_id;
- gsms->gsm411.msg_ref = gsm411_msg_ref;
-
- /* length in bytes of the destination address */
- da_len_bytes = 2 + *smsp/2 + *smsp%2;
- if (da_len_bytes > 12) {
- LOGP(DLSMS, LOGL_ERROR, "Destination Address > 12 bytes ?!?\n");
- rc = GSM411_RP_CAUSE_SEMANT_INC_MSG;
- goto out;
- } else if (da_len_bytes < 4) {
- LOGP(DLSMS, LOGL_ERROR, "Destination Address < 4 bytes ?!?\n");
- rc = GSM411_RP_CAUSE_SEMANT_INC_MSG;
- goto out;
- }
- memset(address_lv, 0, sizeof(address_lv));
- memcpy(address_lv, smsp, da_len_bytes);
- /* mangle first byte to reflect length in bytes, not digits */
- address_lv[0] = da_len_bytes - 1;
-
- gsms->dst.ton = (address_lv[1] >> 4) & 7;
- gsms->dst.npi = address_lv[1] & 0xF;
- /* convert to real number */
- gsm48_decode_bcd_number(gsms->dst.addr,
- sizeof(gsms->dst.addr), address_lv, 1);
- smsp += da_len_bytes;
-
- gsms->protocol_id = *smsp++;
- gsms->data_coding_scheme = *smsp++;
-
- sms_alphabet = gsm338_get_sms_alphabet(gsms->data_coding_scheme);
- if (sms_alphabet == 0xffffffff) {
- rc = GSM411_RP_CAUSE_MO_NET_OUT_OF_ORDER;
- goto out;
- }
-
- switch (sms_vpf) {
- case GSM340_TP_VPF_RELATIVE:
- sms_vp = smsp++;
- break;
- case GSM340_TP_VPF_ABSOLUTE:
- case GSM340_TP_VPF_ENHANCED:
- sms_vp = smsp;
- /* the additional functionality indicator... */
- if (sms_vpf == GSM340_TP_VPF_ENHANCED && *smsp & (1<<7))
- smsp++;
- smsp += 7;
- break;
- case GSM340_TP_VPF_NONE:
- sms_vp = 0;
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE,
- "SMS Validity period not implemented: 0x%02x\n", sms_vpf);
- rc = GSM411_RP_CAUSE_MO_NET_OUT_OF_ORDER;
- goto out;
- }
- gsms->user_data_len = *smsp++;
- if (gsms->user_data_len) {
- memcpy(gsms->user_data, smsp, gsms->user_data_len);
-
- switch (sms_alphabet) {
- case DCS_7BIT_DEFAULT:
- gsm_7bit_decode_n(gsms->text, sizeof(gsms->text), smsp,
- gsms->user_data_len);
- break;
- case DCS_8BIT_DATA:
- case DCS_UCS2:
- case DCS_NONE:
- break;
- }
- }
-
- osmo_strlcpy(gsms->src.addr, conn->vsub->msisdn, sizeof(gsms->src.addr));
-
- LOGP(DLSMS, LOGL_INFO, "RX SMS: Sender: %s, MTI: 0x%02x, VPF: 0x%02x, "
- "MR: 0x%02x PID: 0x%02x, DCS: 0x%02x, DA: %s, "
- "UserDataLength: 0x%02x, UserData: \"%s\"\n",
- vlr_subscr_name(conn->vsub), sms_mti, sms_vpf, gsms->msg_ref,
- gsms->protocol_id, gsms->data_coding_scheme, gsms->dst.addr,
- gsms->user_data_len,
- sms_alphabet == DCS_7BIT_DEFAULT ? gsms->text :
- osmo_hexdump(gsms->user_data, gsms->user_data_len));
-
- gsms->validity_minutes = gsm340_validity_period(sms_vpf, sms_vp);
-
- /* FIXME: This looks very wrong */
- send_signal(0, NULL, gsms, 0);
-
- rc = sms_route_mt_sms(conn, gsms);
-
- /* This SMS got routed through SMPP or no receiver exists. */
- if (!gsms->receiver)
- return rc;
-
- switch (sms_mti) {
- case GSM340_SMS_SUBMIT_MS2SC:
- /* MS is submitting a SMS */
- rc = gsm340_rx_sms_submit(gsms);
- break;
- case GSM340_SMS_COMMAND_MS2SC:
- case GSM340_SMS_DELIVER_REP_MS2SC:
- LOGP(DLSMS, LOGL_NOTICE, "Unimplemented MTI 0x%02x\n", sms_mti);
- rc = GSM411_RP_CAUSE_IE_NOTEXIST;
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Undefined MTI 0x%02x\n", sms_mti);
- rc = GSM411_RP_CAUSE_IE_NOTEXIST;
- break;
- }
-out:
- sms_free(gsms);
-
- return rc;
-}
-
-/* Prefix msg with a RP-DATA header and send as SMR DATA */
-static int gsm411_rp_sendmsg(struct gsm411_smr_inst *inst, struct msgb *msg,
- uint8_t rp_msg_type, uint8_t rp_msg_ref,
- int rl_msg_type)
-{
- struct gsm411_rp_hdr *rp;
- uint8_t len = msg->len;
-
- /* GSM 04.11 RP-DATA header */
- rp = (struct gsm411_rp_hdr *)msgb_push(msg, sizeof(*rp));
- rp->len = len + 2;
- rp->msg_type = rp_msg_type;
- rp->msg_ref = rp_msg_ref;
-
- return gsm411_smr_send(inst, rl_msg_type, msg);
-}
-
-int gsm411_send_rp_ack(struct gsm_trans *trans, uint8_t msg_ref)
-{
- struct msgb *msg = gsm411_msgb_alloc();
-
- DEBUGP(DLSMS, "TX: SMS RP ACK\n");
-
- return gsm411_rp_sendmsg(&trans->sms.smr_inst, msg, GSM411_MT_RP_ACK_MT,
- msg_ref, GSM411_SM_RL_REPORT_REQ);
-}
-
-int gsm411_send_rp_error(struct gsm_trans *trans, uint8_t msg_ref,
- uint8_t cause)
-{
- struct msgb *msg = gsm411_msgb_alloc();
-
- msgb_tv_put(msg, 1, cause);
-
- LOGP(DLSMS, LOGL_NOTICE, "TX: SMS RP ERROR, cause %d (%s)\n", cause,
- get_value_string(gsm411_rp_cause_strs, cause));
-
- return gsm411_rp_sendmsg(&trans->sms.smr_inst, msg,
- GSM411_MT_RP_ERROR_MT, msg_ref, GSM411_SM_RL_REPORT_REQ);
-}
-
-/* Receive a 04.11 TPDU inside RP-DATA / user data */
-static int gsm411_rx_rp_ud(struct msgb *msg, struct gsm_trans *trans,
- struct gsm411_rp_hdr *rph,
- uint8_t src_len, uint8_t *src,
- uint8_t dst_len, uint8_t *dst,
- uint8_t tpdu_len, uint8_t *tpdu)
-{
- int rc = 0;
-
- if (src_len && src)
- LOGP(DLSMS, LOGL_ERROR, "RP-DATA (MO) with SRC ?!?\n");
-
- if (!dst_len || !dst || !tpdu_len || !tpdu) {
- LOGP(DLSMS, LOGL_ERROR,
- "RP-DATA (MO) without DST or TPDU ?!?\n");
- gsm411_send_rp_error(trans, rph->msg_ref,
- GSM411_RP_CAUSE_INV_MAND_INF);
- return -EIO;
- }
- msg->l4h = tpdu;
-
- DEBUGP(DLSMS, "DST(%u,%s)\n", dst_len, osmo_hexdump(dst, dst_len));
-
- rc = gsm340_rx_tpdu(trans, msg, rph->msg_ref);
- if (rc == 0)
- return gsm411_send_rp_ack(trans, rph->msg_ref);
- else if (rc > 0)
- return gsm411_send_rp_error(trans, rph->msg_ref, rc);
- else
- return rc;
-}
-
-/* Receive a 04.11 RP-DATA message in accordance with Section 7.3.1.2 */
-static int gsm411_rx_rp_data(struct msgb *msg, struct gsm_trans *trans,
- struct gsm411_rp_hdr *rph)
-{
- uint8_t src_len, dst_len, rpud_len;
- uint8_t *src = NULL, *dst = NULL , *rp_ud = NULL;
-
- /* in the MO case, this should always be zero length */
- src_len = rph->data[0];
- if (src_len)
- src = &rph->data[1];
-
- dst_len = rph->data[1+src_len];
- if (dst_len)
- dst = &rph->data[1+src_len+1];
-
- rpud_len = rph->data[1+src_len+1+dst_len];
- if (rpud_len)
- rp_ud = &rph->data[1+src_len+1+dst_len+1];
-
- DEBUGP(DLSMS, "RX_RP-DATA: src_len=%u, dst_len=%u ud_len=%u\n",
- src_len, dst_len, rpud_len);
- return gsm411_rx_rp_ud(msg, trans, rph, src_len, src, dst_len, dst,
- rpud_len, rp_ud);
-}
-
-static struct gsm_sms *sms_report_alloc(struct gsm_sms *sms)
-{
- struct gsm_sms *sms_report;
- int len;
-
- sms_report = sms_alloc();
- OSMO_ASSERT(sms_report);
-
- sms_report->msg_ref = sms->msg_ref;
- sms_report->protocol_id = sms->protocol_id;
- sms_report->data_coding_scheme = GSM338_DCS_1111_8BIT_DATA;
-
- /* Invert address to send status report back to origin. */
- sms_report->src = sms->dst;
- sms_report->dst = sms->src;
-
- /* As specified by Appendix B. Delivery Receipt Format.
- * TODO: Many fields in this string are just set with dummy values,
- * revisit this.
- */
- len = snprintf((char *)sms_report->user_data,
- sizeof(sms_report->user_data),
- "id:%.08llu sub:000 dlvrd:000 submit date:YYMMDDhhmm done date:YYMMDDhhmm stat:DELIVRD err:000 text:%.20s",
- sms->id, sms->text);
- sms_report->user_data_len = len;
- LOGP(DLSMS, LOGL_NOTICE, "%s\n", sms_report->user_data);
-
- /* This represents a sms report. */
- sms_report->is_report = true;
-
- return sms_report;
-}
-
-static void sms_status_report(struct gsm_sms *gsms,
- struct gsm_subscriber_connection *conn)
-{
- struct gsm_sms *sms_report;
- int rc;
-
- sms_report = sms_report_alloc(gsms);
-
- rc = sms_route_mt_sms(conn, sms_report);
- if (rc < 0) {
- LOGP(DLSMS, LOGL_ERROR,
- "Failed to send status report! err=%d\n", rc);
- }
-
- /* No route via SMPP, send the GSM 03.40 status-report now. */
- if (gsms->receiver)
- gsm340_rx_sms_submit(sms_report);
-
- LOGP(DLSMS, LOGL_NOTICE, "Status report has been sent\n");
-
- sms_free(sms_report);
-}
-
-/* Receive a 04.11 RP-ACK message (response to RP-DATA from us) */
-static int gsm411_rx_rp_ack(struct msgb *msg, struct gsm_trans *trans,
- struct gsm411_rp_hdr *rph)
-{
- struct gsm_sms *sms = trans->sms.sms;
-
- /* Acnkowledgement to MT RP_DATA, i.e. the MS confirms it
- * successfully received a SMS. We can now safely mark it as
- * transmitted */
-
- if (!sms) {
- LOGP(DLSMS, LOGL_ERROR, "RX RP-ACK but no sms in transaction?!?\n");
- return gsm411_send_rp_error(trans, rph->msg_ref,
- GSM411_RP_CAUSE_PROTOCOL_ERR);
- }
-
- /* mark this SMS as sent in database */
- db_sms_mark_delivered(sms);
-
- send_signal(S_SMS_DELIVERED, trans, sms, 0);
-
- if (sms->status_rep_req)
- sms_status_report(sms, trans->conn);
-
- sms_free(sms);
- trans->sms.sms = NULL;
-
- return 0;
-}
-
-static int gsm411_rx_rp_error(struct msgb *msg, struct gsm_trans *trans,
- struct gsm411_rp_hdr *rph)
-{
- struct gsm_network *net = trans->conn->network;
- struct gsm_sms *sms = trans->sms.sms;
- uint8_t cause_len = rph->data[0];
- uint8_t cause = rph->data[1];
-
- /* Error in response to MT RP_DATA, i.e. the MS did not
- * successfully receive the SMS. We need to investigate
- * the cause and take action depending on it */
-
- LOGP(DLSMS, LOGL_NOTICE, "%s: RX SMS RP-ERROR, cause %d:%d (%s)\n",
- vlr_subscr_name(trans->conn->vsub), cause_len, cause,
- get_value_string(gsm411_rp_cause_strs, cause));
-
- if (!sms) {
- LOGP(DLSMS, LOGL_ERROR,
- "RX RP-ERR, but no sms in transaction?!?\n");
- return -EINVAL;
-#if 0
- return gsm411_send_rp_error(trans, rph->msg_ref,
- GSM411_RP_CAUSE_PROTOCOL_ERR);
-#endif
- }
-
- if (cause == GSM411_RP_CAUSE_MT_MEM_EXCEEDED) {
- /* MS has not enough memory to store the message. We need
- * to store this in our database and wait for a SMMA message */
- /* FIXME */
- send_signal(S_SMS_MEM_EXCEEDED, trans, sms, 0);
- rate_ctr_inc(&net->msc_ctrs->ctr[MSC_CTR_SMS_RP_ERR_MEM]);
- } else {
- send_signal(S_SMS_UNKNOWN_ERROR, trans, sms, 0);
- rate_ctr_inc(&net->msc_ctrs->ctr[MSC_CTR_SMS_RP_ERR_OTHER]);
- }
-
- sms_free(sms);
- trans->sms.sms = NULL;
-
- return 0;
-}
-
-static int gsm411_rx_rp_smma(struct msgb *msg, struct gsm_trans *trans,
- struct gsm411_rp_hdr *rph)
-{
- int rc;
-
- rc = gsm411_send_rp_ack(trans, rph->msg_ref);
-
- /* MS tells us that it has memory for more SMS, we need
- * to check if we have any pending messages for it and then
- * transfer those */
- send_signal(S_SMS_SMMA, trans, NULL, 0);
-
- return rc;
-}
-
-/* receive RL DATA */
-static int gsm411_rx_rl_data(struct msgb *msg, struct gsm48_hdr *gh,
- struct gsm_trans *trans)
-{
- struct gsm411_rp_hdr *rp_data = (struct gsm411_rp_hdr*)&gh->data;
- uint8_t msg_type = rp_data->msg_type & 0x07;
- int rc = 0;
-
- switch (msg_type) {
- case GSM411_MT_RP_DATA_MO:
- DEBUGP(DLSMS, "RX SMS RP-DATA (MO)\n");
- rc = gsm411_rx_rp_data(msg, trans, rp_data);
- break;
- case GSM411_MT_RP_SMMA_MO:
- DEBUGP(DLSMS, "RX SMS RP-SMMA\n");
- rc = gsm411_rx_rp_smma(msg, trans, rp_data);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Invalid RP type 0x%02x\n", msg_type);
- rc = -EINVAL;
- break;
- }
-
- return rc;
-}
-
-/* receive RL REPORT */
-static int gsm411_rx_rl_report(struct msgb *msg, struct gsm48_hdr *gh,
- struct gsm_trans *trans)
-{
- struct gsm411_rp_hdr *rp_data = (struct gsm411_rp_hdr*)&gh->data;
- uint8_t msg_type = rp_data->msg_type & 0x07;
- int rc = 0;
-
- switch (msg_type) {
- case GSM411_MT_RP_ACK_MO:
- DEBUGP(DLSMS, "RX SMS RP-ACK (MO)\n");
- rc = gsm411_rx_rp_ack(msg, trans, rp_data);
- break;
- case GSM411_MT_RP_ERROR_MO:
- DEBUGP(DLSMS, "RX SMS RP-ERROR (MO)\n");
- rc = gsm411_rx_rp_error(msg, trans, rp_data);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Invalid RP type 0x%02x\n", msg_type);
- rc = -EINVAL;
- break;
- }
-
- return rc;
-}
-
-/* receive SM-RL sap message from SMR
- * NOTE: Message is freed by sender
- */
-int gsm411_rl_recv(struct gsm411_smr_inst *inst, int msg_type,
- struct msgb *msg)
-{
- struct gsm_trans *trans =
- container_of(inst, struct gsm_trans, sms.smr_inst);
- struct gsm48_hdr *gh = msgb_l3(msg);
- int rc = 0;
-
- switch (msg_type) {
- case GSM411_SM_RL_DATA_IND:
- rc = gsm411_rx_rl_data(msg, gh, trans);
- break;
- case GSM411_SM_RL_REPORT_IND:
- if (gh)
- rc = gsm411_rx_rl_report(msg, gh, trans);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Unhandled SM-RL message 0x%x\n", msg_type);
- rc = -EINVAL;
- }
-
- return rc;
-}
-
-/* receive MNCCSMS sap message from SMC
- * NOTE: Message is freed by sender
- */
-static int gsm411_mn_recv(struct gsm411_smc_inst *inst, int msg_type,
- struct msgb *msg)
-{
- struct gsm_trans *trans =
- container_of(inst, struct gsm_trans, sms.smc_inst);
- struct gsm48_hdr *gh = msgb_l3(msg);
- int rc = 0;
-
- switch (msg_type) {
- case GSM411_MNSMS_EST_IND:
- case GSM411_MNSMS_DATA_IND:
- DEBUGP(DLSMS, "MNSMS-DATA/EST-IND\n");
- rc = gsm411_smr_recv(&trans->sms.smr_inst, msg_type, msg);
- break;
- case GSM411_MNSMS_ERROR_IND:
- if (gh)
- DEBUGP(DLSMS, "MNSMS-ERROR-IND, cause %d (%s)\n",
- gh->data[0],
- get_value_string(gsm411_cp_cause_strs,
- gh->data[0]));
- else
- DEBUGP(DLSMS, "MNSMS-ERROR-IND, no cause\n");
- rc = gsm411_smr_recv(&trans->sms.smr_inst, msg_type, msg);
- break;
- default:
- LOGP(DLSMS, LOGL_NOTICE, "Unhandled MNCCSMS msg 0x%x\n", msg_type);
- rc = -EINVAL;
- }
-
- return rc;
-}
-
-/* Entry point for incoming GSM48_PDISC_SMS from abis_rsl.c */
-int gsm0411_rcv_sms(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t msg_type = gh->msg_type;
- uint8_t transaction_id = gsm48_hdr_trans_id_flip_ti(gh);
- struct gsm_trans *trans;
- int new_trans = 0;
- int rc = 0;
-
- if (!conn->vsub)
- return -EIO;
- /* FIXME: send some error message */
-
- DEBUGP(DLSMS, "receiving data (trans_id=%x, msg_type=%s)\n", transaction_id,
- gsm48_pdisc_msgtype_name(gsm48_hdr_pdisc(gh), gsm48_hdr_msg_type(gh)));
-
- trans = trans_find_by_id(conn, GSM48_PDISC_SMS, transaction_id);
-
- /*
- * A transaction we created but don't know about?
- */
- if (!trans && (transaction_id & 0x8) == 0) {
- LOGP(DLSMS, LOGL_ERROR, "trans_id=%x allocated by us but known "
- "to us anymore. We are ignoring it, maybe a CP-ERROR "
- "from a MS?\n",
- transaction_id);
- return -EINVAL;
- }
-
- if (!trans) {
- DEBUGP(DLSMS, " -> (new transaction)\n");
- trans = trans_alloc(conn->network, conn->vsub,
- GSM48_PDISC_SMS,
- transaction_id, new_callref++);
- if (!trans) {
- DEBUGP(DLSMS, " -> No memory for trans\n");
- /* FIXME: send some error message */
- return -ENOMEM;
- }
- gsm411_smc_init(&trans->sms.smc_inst, 0, 1,
- gsm411_mn_recv, gsm411_mm_send);
- gsm411_smr_init(&trans->sms.smr_inst, 0, 1,
- gsm411_rl_recv, gsm411_mn_send);
-
- trans->conn = msc_subscr_conn_get(conn);
-
- new_trans = 1;
- cm_service_request_concludes(conn, msg);
- }
-
- /* 5.4: For MO, if a CP-DATA is received for a new
- * transaction, equals reception of an implicit
- * last CP-ACK for previous transaction */
- if (trans->sms.smc_inst.cp_state == GSM411_CPS_IDLE
- && msg_type == GSM411_MT_CP_DATA) {
- int i;
- struct gsm_trans *ptrans;
-
- /* Scan through all remote initiated transactions */
- for (i=8; i<15; i++) {
- if (i == transaction_id)
- continue;
-
- ptrans = trans_find_by_id(conn, GSM48_PDISC_SMS, i);
- if (!ptrans)
- continue;
-
- DEBUGP(DLSMS, "Implicit CP-ACK for trans_id=%x\n", i);
-
- /* Finish it for good */
- trans_free(ptrans);
- }
- }
-
- msc_subscr_conn_communicating(conn);
-
- gsm411_smc_recv(&trans->sms.smc_inst,
- (new_trans) ? GSM411_MMSMS_EST_IND : GSM411_MMSMS_DATA_IND,
- msg, msg_type);
-
- return rc;
-}
-
-/* Take a SMS in gsm_sms structure and send it through an already
- * existing conn. We also assume that the caller ensured this conn already
- * has a SAPI3 RLL connection! */
-int gsm411_send_sms(struct gsm_subscriber_connection *conn, struct gsm_sms *sms)
-{
- struct msgb *msg = gsm411_msgb_alloc();
- struct gsm_trans *trans;
- uint8_t *data, *rp_ud_len;
- uint8_t msg_ref = sms_next_rp_msg_ref(&conn->next_rp_ref);
- int transaction_id;
- int rc;
-
- transaction_id =
- trans_assign_trans_id(conn->network, conn->vsub,
- GSM48_PDISC_SMS, 0);
- if (transaction_id == -1) {
- LOGP(DLSMS, LOGL_ERROR, "No available transaction ids\n");
- send_signal(S_SMS_UNKNOWN_ERROR, NULL, sms, 0);
- sms_free(sms);
- msgb_free(msg);
- return -EBUSY;
- }
-
- DEBUGP(DLSMS, "%s()\n", __func__);
-
- /* FIXME: allocate transaction with message reference */
- trans = trans_alloc(conn->network, conn->vsub,
- GSM48_PDISC_SMS,
- transaction_id, new_callref++);
- if (!trans) {
- LOGP(DLSMS, LOGL_ERROR, "No memory for trans\n");
- send_signal(S_SMS_UNKNOWN_ERROR, NULL, sms, 0);
- sms_free(sms);
- msgb_free(msg);
- /* FIXME: send some error message */
- return -ENOMEM;
- }
- gsm411_smc_init(&trans->sms.smc_inst, sms->id, 1,
- gsm411_mn_recv, gsm411_mm_send);
- gsm411_smr_init(&trans->sms.smr_inst, sms->id, 1,
- gsm411_rl_recv, gsm411_mn_send);
- trans->sms.sms = sms;
-
- trans->conn = msc_subscr_conn_get(conn);
-
- /* Hardcode SMSC Originating Address for now */
- data = (uint8_t *)msgb_put(msg, 8);
- data[0] = 0x07; /* originator length == 7 */
- data[1] = 0x91; /* type of number: international, ISDN */
- data[2] = 0x44; /* 447785016005 */
- data[3] = 0x77;
- data[4] = 0x58;
- data[5] = 0x10;
- data[6] = 0x06;
- data[7] = 0x50;
-
- /* Hardcoded Destination Address */
- data = (uint8_t *)msgb_put(msg, 1);
- data[0] = 0; /* destination length == 0 */
-
- /* obtain a pointer for the rp_ud_len, so we can fill it later */
- rp_ud_len = (uint8_t *)msgb_put(msg, 1);
-
- if (sms->is_report) {
- /* generate the 03.40 SMS-STATUS-REPORT TPDU */
- rc = gsm340_gen_sms_status_report_tpdu(msg, sms);
- } else {
- /* generate the 03.40 SMS-DELIVER TPDU */
- rc = gsm340_gen_sms_deliver_tpdu(msg, sms);
- }
- if (rc < 0) {
- send_signal(S_SMS_UNKNOWN_ERROR, trans, sms, 0);
- sms_free(sms);
- trans->sms.sms = NULL;
- trans_free(trans);
- msgb_free(msg);
- return rc;
- }
-
- *rp_ud_len = rc;
-
- DEBUGP(DLSMS, "TX: SMS DELIVER\n");
-
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_SMS_DELIVERED]);
- db_sms_inc_deliver_attempts(trans->sms.sms);
-
- return gsm411_rp_sendmsg(&trans->sms.smr_inst, msg,
- GSM411_MT_RP_DATA_MT, msg_ref, GSM411_SM_RL_DATA_REQ);
-}
-
-/* paging callback. Here we get called if paging a subscriber has
- * succeeded or failed. */
-static int paging_cb_send_sms(unsigned int hooknum, unsigned int event,
- struct msgb *msg, void *_conn, void *_sms)
-{
- struct gsm_subscriber_connection *conn = _conn;
- struct gsm_sms *sms = _sms;
- int rc = 0;
-
- DEBUGP(DLSMS, "paging_cb_send_sms(hooknum=%u, event=%u, msg=%p,"
- "conn=%p, sms=%p/id: %llu)\n", hooknum, event, msg, conn, sms, sms->id);
-
- if (hooknum != GSM_HOOK_RR_PAGING)
- return -EINVAL;
-
- switch (event) {
- case GSM_PAGING_SUCCEEDED:
- gsm411_send_sms(conn, sms);
- break;
- case GSM_PAGING_EXPIRED:
- case GSM_PAGING_OOM:
- case GSM_PAGING_BUSY:
- send_signal(S_SMS_UNKNOWN_ERROR, NULL, sms, event);
- sms_free(sms);
- rc = -ETIMEDOUT;
- break;
- default:
- LOGP(DLSMS, LOGL_ERROR, "Unhandled paging event: %d\n", event);
- }
-
- return rc;
-}
-
-/* high-level function to send a SMS to a given subscriber. The function
- * will take care of paging the subscriber, establishing the RLL SAPI3
- * connection, etc. */
-int gsm411_send_sms_subscr(struct vlr_subscr *vsub,
- struct gsm_sms *sms)
-{
- struct gsm_subscriber_connection *conn;
- void *res;
-
- /* check if we already have an open conn to the subscriber.
- * if yes, send the SMS this way */
- conn = connection_for_subscr(vsub);
- if (conn) {
- LOGP(DLSMS, LOGL_DEBUG, "Sending SMS via already open connection %p to %s\n",
- conn, vlr_subscr_name(vsub));
- return gsm411_send_sms(conn, sms);
- }
-
- /* if not, we have to start paging */
- LOGP(DLSMS, LOGL_DEBUG, "Sending SMS: no connection open, start paging %s\n",
- vlr_subscr_name(vsub));
- res = subscr_request_conn(vsub, paging_cb_send_sms, sms, "send SMS");
- if (!res) {
- send_signal(S_SMS_UNKNOWN_ERROR, NULL, sms, GSM_PAGING_BUSY);
- sms_free(sms);
- }
- return 0;
-}
-
-void _gsm411_sms_trans_free(struct gsm_trans *trans)
-{
- /* cleanup SMS instance */
- gsm411_smr_clear(&trans->sms.smr_inst);
- trans->sms.smr_inst.rl_recv = NULL;
- trans->sms.smr_inst.mn_send = NULL;
-
- gsm411_smc_clear(&trans->sms.smc_inst);
- trans->sms.smc_inst.mn_recv = NULL;
- trans->sms.smc_inst.mm_send = NULL;
-
- if (trans->sms.sms) {
- LOGP(DLSMS, LOGL_ERROR, "Transaction contains SMS.\n");
- send_signal(S_SMS_UNKNOWN_ERROR, trans, trans->sms.sms, 0);
- sms_free(trans->sms.sms);
- trans->sms.sms = NULL;
- }
-}
-
-/* Process incoming SAPI N-REJECT from BSC */
-void gsm411_sapi_n_reject(struct gsm_subscriber_connection *conn)
-{
- struct gsm_network *net;
- struct gsm_trans *trans, *tmp;
-
- net = conn->network;
-
- llist_for_each_entry_safe(trans, tmp, &net->trans_list, entry) {
- struct gsm_sms *sms;
-
- if (trans->conn != conn)
- continue;
- if (trans->protocol != GSM48_PDISC_SMS)
- continue;
-
- sms = trans->sms.sms;
- if (!sms) {
- LOGP(DLSMS, LOGL_ERROR, "SAPI Reject but no SMS.\n");
- continue;
- }
-
- send_signal(S_SMS_UNKNOWN_ERROR, trans, sms, 0);
- sms_free(sms);
- trans->sms.sms = NULL;
- trans_free(trans);
- }
-}
-
diff --git a/src/libmsc/gsm_04_80.c b/src/libmsc/gsm_04_80.c
deleted file mode 100644
index bec1d26f4..000000000
--- a/src/libmsc/gsm_04_80.c
+++ /dev/null
@@ -1,155 +0,0 @@
-/* GSM Mobile Radio Interface Layer 3 messages on the A-bis interface
- * 3GPP TS 04.08 version 7.21.0 Release 1998 / ETSI TS 100 940 V7.21.0 */
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2008, 2009, 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009 by Mike Haben <michael.haben@btinternet.com>
- *
- * 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/>.
- *
- */
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/msc_ifaces.h>
-
-#include <osmocom/gsm/gsm0480.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/gsm/tlv.h>
-
-static inline unsigned char *msgb_wrap_with_TL(struct msgb *msgb, uint8_t tag)
-{
- uint8_t *data = msgb_push(msgb, 2);
-
- data[0] = tag;
- data[1] = msgb->len - 2;
- return data;
-}
-
-static inline unsigned char *msgb_push_TLV1(struct msgb *msgb, uint8_t tag,
- uint8_t value)
-{
- uint8_t *data = msgb_push(msgb, 3);
-
- data[0] = tag;
- data[1] = 1;
- data[2] = value;
- return data;
-}
-
-
-/* Send response to a mobile-originated ProcessUnstructuredSS-Request */
-int gsm0480_send_ussd_response(struct gsm_subscriber_connection *conn,
- const struct msgb *in_msg, const char *response_text,
- const struct ss_request *req)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 USSD RSP");
- struct gsm48_hdr *gh;
- uint8_t *ptr8;
- int response_len;
-
- /* First put the payload text into the message */
- ptr8 = msgb_put(msg, 0);
- gsm_7bit_encode_n_ussd(ptr8, msgb_tailroom(msg), response_text, &response_len);
- msgb_put(msg, response_len);
-
- /* Then wrap it as an Octet String */
- msgb_wrap_with_TL(msg, ASN1_OCTET_STRING_TAG);
-
- /* Pre-pend the DCS octet string */
- msgb_push_TLV1(msg, ASN1_OCTET_STRING_TAG, 0x0F);
-
- /* Then wrap these as a Sequence */
- msgb_wrap_with_TL(msg, GSM_0480_SEQUENCE_TAG);
-
- /* Pre-pend the operation code */
- msgb_push_TLV1(msg, GSM0480_OPERATION_CODE,
- GSM0480_OP_CODE_PROCESS_USS_REQ);
-
- /* Wrap the operation code and IA5 string as a sequence */
- msgb_wrap_with_TL(msg, GSM_0480_SEQUENCE_TAG);
-
- /* Pre-pend the invoke ID */
- msgb_push_TLV1(msg, GSM0480_COMPIDTAG_INVOKE_ID, req->invoke_id);
-
- /* Wrap this up as a Return Result component */
- msgb_wrap_with_TL(msg, GSM0480_CTYPE_RETURN_RESULT);
-
- /* Wrap the component in a Facility message */
- msgb_wrap_with_TL(msg, GSM0480_IE_FACILITY);
-
- /* And finally pre-pend the L3 header */
- gh = (struct gsm48_hdr *) msgb_push(msg, sizeof(*gh));
- gh->proto_discr = GSM48_PDISC_NC_SS | req->transaction_id
- | (1<<7); /* TI direction = 1 */
- gh->msg_type = GSM0480_MTYPE_RELEASE_COMPLETE;
-
- return msc_tx_dtap(conn, msg);
-}
-
-int gsm0480_send_ussd_reject(struct gsm_subscriber_connection *conn,
- const struct msgb *in_msg,
- const struct ss_request *req)
-{
- struct msgb *msg = gsm48_msgb_alloc_name("GSM 04.08 USSD REJ");
- struct gsm48_hdr *gh;
-
- /* First insert the problem code */
- msgb_push_TLV1(msg, GSM_0480_PROBLEM_CODE_TAG_GENERAL,
- GSM_0480_GEN_PROB_CODE_UNRECOGNISED);
-
- /* Before it insert the invoke ID */
- msgb_push_TLV1(msg, GSM0480_COMPIDTAG_INVOKE_ID, req->invoke_id);
-
- /* Wrap this up as a Reject component */
- msgb_wrap_with_TL(msg, GSM0480_CTYPE_REJECT);
-
- /* Wrap the component in a Facility message */
- msgb_wrap_with_TL(msg, GSM0480_IE_FACILITY);
-
- /* And finally pre-pend the L3 header */
- gh = (struct gsm48_hdr *) msgb_push(msg, sizeof(*gh));
- gh->proto_discr = GSM48_PDISC_NC_SS;
- gh->proto_discr |= req->transaction_id | (1<<7); /* TI direction = 1 */
- gh->msg_type = GSM0480_MTYPE_RELEASE_COMPLETE;
-
- return msc_tx_dtap(conn, msg);
-}
-
-int msc_send_ussd_notify(struct gsm_subscriber_connection *conn, int level, const char *text)
-{
- struct msgb *msg = gsm0480_create_ussd_notify(level, text);
- if (!msg)
- return -1;
- return msc_tx_dtap(conn, msg);
-}
-
-int msc_send_ussd_release_complete(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg = gsm0480_create_ussd_release_complete();
- if (!msg)
- return -1;
- return msc_tx_dtap(conn, msg);
-}
diff --git a/src/libmsc/gsm_subscriber.c b/src/libmsc/gsm_subscriber.c
deleted file mode 100644
index 09540c16c..000000000
--- a/src/libmsc/gsm_subscriber.c
+++ /dev/null
@@ -1,190 +0,0 @@
-/* The concept of a subscriber for the MSC, roughly HLR/VLR functionality */
-
-/* (C) 2008 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009,2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- *
- * 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/>.
- *
- */
-
-#include "../../bscconfig.h"
-
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <string.h>
-#include <assert.h>
-#include <time.h>
-#include <stdbool.h>
-
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/vty/vty.h>
-
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-#else
-#include <openbsc/iu_dummy.h>
-#endif
-
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/debug.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-#include <openbsc/db.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/vlr.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/a_iface.h>
-
-int subscr_paging_dispatch(unsigned int hooknum, unsigned int event,
- struct msgb *msg, void *data, void *param)
-{
- struct subscr_request *request, *tmp;
- struct gsm_subscriber_connection *conn = data;
- struct vlr_subscr *vsub = param;
- struct paging_signal_data sig_data;
-
- OSMO_ASSERT(vsub);
- OSMO_ASSERT(hooknum == GSM_HOOK_RR_PAGING);
- OSMO_ASSERT(!(conn && (conn->vsub != vsub)));
- OSMO_ASSERT(!((event == GSM_PAGING_SUCCEEDED) && !conn));
-
- LOGP(DPAG, LOGL_DEBUG, "Paging %s for %s (event=%d)\n",
- event == GSM_PAGING_SUCCEEDED ? "success" : "failure",
- vlr_subscr_name(vsub), event);
-
- if (!vsub->cs.is_paging) {
- LOGP(DPAG, LOGL_ERROR,
- "Paging Response received for subscriber"
- " that is not paging.\n");
- return -EINVAL;
- }
-
- if (event == GSM_PAGING_SUCCEEDED)
- msc_stop_paging(vsub);
-
- /* Inform parts of the system we don't know */
- sig_data.vsub = vsub;
- sig_data.conn = conn;
- sig_data.paging_result = event;
- osmo_signal_dispatch(SS_PAGING,
- event == GSM_PAGING_SUCCEEDED ?
- S_PAGING_SUCCEEDED : S_PAGING_EXPIRED,
- &sig_data);
-
- llist_for_each_entry_safe(request, tmp, &vsub->cs.requests, entry) {
- llist_del(&request->entry);
- if (request->cbfn) {
- LOGP(DPAG, LOGL_DEBUG, "Calling paging cbfn.\n");
- request->cbfn(hooknum, event, msg, data, request->param);
- } else
- LOGP(DPAG, LOGL_DEBUG, "Paging without action.\n");
- talloc_free(request);
- }
-
- /* balanced with the moment we start paging */
- vsub->cs.is_paging = false;
- vlr_subscr_put(vsub);
- return 0;
-}
-
-int msc_paging_request(struct vlr_subscr *vsub)
-{
- /* The subscriber was last seen in subscr->lac. Find out which
- * BSCs/RNCs are responsible and send them a paging request via open
- * SCCP connections (if any). */
- /* TODO Implementing only RNC paging, since this is code on the iu branch.
- * Need to add BSC paging at some point. */
- switch (vsub->cs.attached_via_ran) {
- case RAN_GERAN_A:
- return a_iface_tx_paging(vsub->imsi, vsub->tmsi, vsub->lac);
- case RAN_UTRAN_IU:
- return ranap_iu_page_cs(vsub->imsi,
- vsub->tmsi == GSM_RESERVED_TMSI?
- NULL : &vsub->tmsi,
- vsub->lac);
- default:
- break;
- }
-
- LOGP(DPAG, LOGL_ERROR, "%s: Cannot page, subscriber not attached\n",
- vlr_subscr_name(vsub));
- return -EINVAL;
-}
-
-/*! \brief Start a paging request for vsub, call cbfn(param) when done.
- * \param vsub subscriber to page.
- * \param cbfn function to call when the conn is established.
- * \param param caller defined param to pass to cbfn().
- * \param label human readable label of the request kind used for logging.
- */
-struct subscr_request *subscr_request_conn(struct vlr_subscr *vsub,
- gsm_cbfn *cbfn, void *param,
- const char *label)
-{
- int rc;
- struct subscr_request *request;
-
- /* Start paging.. we know it is async so we can do it before */
- if (!vsub->cs.is_paging) {
- LOGP(DMM, LOGL_DEBUG, "Subscriber %s not paged yet, start paging.\n",
- vlr_subscr_name(vsub));
- rc = msc_paging_request(vsub);
- if (rc <= 0) {
- LOGP(DMM, LOGL_ERROR, "Subscriber %s paging failed: %d\n",
- vlr_subscr_name(vsub), rc);
- return NULL;
- }
- /* reduced on the first paging callback */
- vlr_subscr_get(vsub);
- vsub->cs.is_paging = true;
- } else {
- LOGP(DMM, LOGL_DEBUG, "Subscriber %s already paged.\n",
- vlr_subscr_name(vsub));
- }
-
- /* TODO: Stop paging in case of memory allocation failure */
- request = talloc_zero(vsub, struct subscr_request);
- if (!request)
- return NULL;
-
- request->cbfn = cbfn;
- request->param = param;
- llist_add_tail(&request->entry, &vsub->cs.requests);
- return request;
-}
-
-void subscr_remove_request(struct subscr_request *request)
-{
- llist_del(&request->entry);
- talloc_free(request);
-}
-
-struct gsm_subscriber_connection *connection_for_subscr(struct vlr_subscr *vsub)
-{
- struct gsm_network *net = vsub->vlr->user_ctx;
- struct gsm_subscriber_connection *conn;
-
- llist_for_each_entry(conn, &net->subscr_conns, entry) {
- if (conn->vsub == vsub)
- return conn;
- }
-
- return NULL;
-}
diff --git a/src/libmsc/iucs.c b/src/libmsc/iucs.c
deleted file mode 100644
index 04b9ece7d..000000000
--- a/src/libmsc/iucs.c
+++ /dev/null
@@ -1,189 +0,0 @@
-/* Code to manage MSC subscriber connections over IuCS interface */
-
-/*
- * (C) 2016,2017 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>
- *
- * Author: Neels Hofmeyr <nhofmeyr@sysmocom.de>
- *
- * 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/>.
- *
- */
-
-#include <inttypes.h>
-
-#include <osmocom/core/logging.h>
-#include <osmocom/ranap/iu_client.h>
-#include <openbsc/debug.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/vlr.h>
-
-/* For A-interface see libbsc/bsc_api.c subscr_con_allocate() */
-static struct gsm_subscriber_connection *subscr_conn_allocate_iu(struct gsm_network *network,
- struct ranap_ue_conn_ctx *ue,
- uint16_t lac)
-{
- struct gsm_subscriber_connection *conn;
-
- DEBUGP(DIUCS, "Allocating IuCS subscriber conn: lac %d, conn_id %" PRIx32 "\n",
- lac, ue->conn_id);
-
- conn = talloc_zero(network, struct gsm_subscriber_connection);
- if (!conn)
- return NULL;
-
- conn->network = network;
- conn->via_ran = RAN_UTRAN_IU;
- conn->iu.ue_ctx = ue;
- conn->iu.ue_ctx->rab_assign_addr_enc = network->iu.rab_assign_addr_enc;
- conn->lac = lac;
-
- llist_add_tail(&conn->entry, &network->subscr_conns);
- return conn;
-}
-
-static int same_ue_conn(struct ranap_ue_conn_ctx *a, struct ranap_ue_conn_ctx *b)
-{
- if (a == b)
- return 1;
- return (a->conn_id == b->conn_id);
-}
-
-static inline void log_subscribers(struct gsm_network *network)
-{
- if (!log_check_level(DIUCS, LOGL_DEBUG))
- return;
-
- struct gsm_subscriber_connection *conn;
- int i = 0;
- llist_for_each_entry(conn, &network->subscr_conns, entry) {
- DEBUGP(DIUCS, "%3d: %s", i, vlr_subscr_name(conn->vsub));
- switch (conn->via_ran) {
- case RAN_UTRAN_IU:
- DEBUGPC(DIUCS, " Iu");
- if (conn->iu.ue_ctx) {
- DEBUGPC(DIUCS, " conn_id %d",
- conn->iu.ue_ctx->conn_id
- );
- }
- break;
- case RAN_GERAN_A:
- DEBUGPC(DIUCS, " A");
- /* TODO log A-interface connection details */
- break;
- case RAN_UNKNOWN:
- DEBUGPC(DIUCS, " ?");
- break;
- default:
- DEBUGPC(DIUCS, " invalid");
- break;
- }
- DEBUGPC(DIUCS, "\n");
- i++;
- }
- DEBUGP(DIUCS, "subscribers registered: %d\n", i);
-}
-
-/* Return an existing IuCS subscriber connection record for the given
- * connection IDs, or return NULL if not found. */
-struct gsm_subscriber_connection *subscr_conn_lookup_iu(
- struct gsm_network *network,
- struct ranap_ue_conn_ctx *ue)
-{
- struct gsm_subscriber_connection *conn;
-
- DEBUGP(DIUCS, "Looking for IuCS subscriber: conn_id %" PRIx32 "\n",
- ue->conn_id);
- log_subscribers(network);
-
- llist_for_each_entry(conn, &network->subscr_conns, entry) {
- if (conn->via_ran != RAN_UTRAN_IU)
- continue;
- if (!same_ue_conn(conn->iu.ue_ctx, ue))
- continue;
- DEBUGP(DIUCS, "Found IuCS subscriber for conn_id %" PRIx32 "\n",
- ue->conn_id);
- return conn;
- }
- DEBUGP(DIUCS, "No IuCS subscriber found for conn_id %" PRIx32 "\n",
- ue->conn_id);
- return NULL;
-}
-
-/* Receive MM/CC/... message from IuCS (SCCP user SAP).
- * msg->dst must reference a struct ranap_ue_conn_ctx, which identifies the peer that
- * sent the msg.
- *
- * For A-interface see libbsc/bsc_api.c gsm0408_rcvmsg(). */
-int gsm0408_rcvmsg_iucs(struct gsm_network *network, struct msgb *msg,
- uint16_t *lac)
-{
- int rc;
- struct ranap_ue_conn_ctx *ue_ctx;
- struct gsm_subscriber_connection *conn;
-
- ue_ctx = (struct ranap_ue_conn_ctx*)msg->dst;
-
- /* TODO: are there message types that could allow us to skip this
- * search? */
- conn = subscr_conn_lookup_iu(network, ue_ctx);
-
- if (conn && lac && (conn->lac != *lac)) {
- LOGP(DIUCS, LOGL_ERROR, "IuCS subscriber has changed LAC"
- " within the same connection, discarding connection:"
- " %s from LAC %d to %d\n",
- vlr_subscr_name(conn->vsub), conn->lac, *lac);
- /* Deallocate conn with previous LAC */
- msc_subscr_conn_close(conn, GSM_CAUSE_INV_MAND_INFO);
- /* At this point we could be tolerant and allocate a new
- * connection, but changing the LAC within the same connection
- * is shifty. Rather cancel everything. */
- return -1;
- }
-
- if (conn) {
- /* Make sure we don't receive RR over IuCS; otherwise all
- * messages handled by gsm0408_dispatch() are of interest (CC,
- * MM, SMS, NS_SS, maybe even MM_GPRS and SM_GPRS). */
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gh->proto_discr & 0x0f;
- OSMO_ASSERT(pdisc != GSM48_PDISC_RR);
-
- msc_dtap(conn, ue_ctx->conn_id, msg);
- rc = 0;
- } else {
- /* allocate a new connection */
-
- if (!lac) {
- LOGP(DIUCS, LOGL_ERROR, "New IuCS subscriber"
- " but no LAC available. Expecting an InitialUE"
- " message containing a LAI IE."
- " Dropping connection.\n");
- return -1;
- }
-
- conn = subscr_conn_allocate_iu(network, ue_ctx, *lac);
- if (!conn)
- abort();
-
- /* ownership of conn hereby goes to the MSC: */
- rc = msc_compl_l3(conn, msg, 0);
- }
-
- return rc;
-}
diff --git a/src/libmsc/iucs_ranap.c b/src/libmsc/iucs_ranap.c
deleted file mode 100644
index 45de1caca..000000000
--- a/src/libmsc/iucs_ranap.c
+++ /dev/null
@@ -1,104 +0,0 @@
-/* Implementation of RANAP messages to/from an MSC via an Iu-CS interface.
- * This keeps direct RANAP dependencies out of libmsc. */
-
-/* (C) 2016 by sysmocom s.m.f.c. GmbH <info@sysmocom.de>
- *
- * 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/>.
- *
- */
-
-#include "../../bscconfig.h"
-
-#ifdef BUILD_IU
-
-#include <osmocom/core/logging.h>
-
-#include <osmocom/ranap/ranap_ies_defs.h>
-#include <osmocom/ranap/iu_client.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/iucs.h>
-#include <openbsc/vlr.h>
-#include <openbsc/iucs_ranap.h>
-#include <openbsc/osmo_msc.h>
-
-/* To continue authorization after a Security Mode Complete */
-int gsm0408_authorize(struct gsm_subscriber_connection *conn);
-
-static int iucs_rx_rab_assign(struct gsm_subscriber_connection *conn,
- RANAP_RAB_SetupOrModifiedItemIEs_t *setup_ies)
-{
- uint8_t rab_id;
- RANAP_RAB_SetupOrModifiedItem_t *item = &setup_ies->raB_SetupOrModifiedItem;
-
- rab_id = item->rAB_ID.buf[0];
-
- LOGP(DIUCS, LOGL_NOTICE,
- "Received RAB assignment event for %s rab_id=%hhd\n",
- vlr_subscr_name(conn->vsub), rab_id);
-
- return 0;
-}
-
-int iucs_rx_sec_mode_compl(struct gsm_subscriber_connection *conn,
- RANAP_SecurityModeCompleteIEs_t *ies)
-{
- OSMO_ASSERT(conn->via_ran == RAN_UTRAN_IU);
-
- /* TODO evalute ies */
-
- msc_rx_sec_mode_compl(conn);
- return 0;
-}
-
-int iucs_rx_ranap_event(struct gsm_network *network,
- struct ranap_ue_conn_ctx *ue_ctx, int type, void *data)
-{
- struct gsm_subscriber_connection *conn;
-
- conn = subscr_conn_lookup_iu(network, ue_ctx);
-
- if (!conn) {
- LOGP(DRANAP, LOGL_ERROR, "Cannot find subscriber for IU event %u\n", type);
- return -1;
- }
-
- switch (type) {
- case RANAP_IU_EVENT_IU_RELEASE:
- case RANAP_IU_EVENT_LINK_INVALIDATED:
- LOGP(DIUCS, LOGL_INFO, "IuCS release for %s\n",
- vlr_subscr_name(conn->vsub));
- msc_subscr_conn_close(conn, 0);
- return 0;
-
- case RANAP_IU_EVENT_SECURITY_MODE_COMPLETE:
- LOGP(DIUCS, LOGL_INFO, "IuCS security mode complete for %s\n",
- vlr_subscr_name(conn->vsub));
- return iucs_rx_sec_mode_compl(conn,
- (RANAP_SecurityModeCompleteIEs_t*)data);
- case RANAP_IU_EVENT_RAB_ASSIGN:
- return iucs_rx_rab_assign(conn,
- (RANAP_RAB_SetupOrModifiedItemIEs_t*)data);
- default:
- LOGP(DIUCS, LOGL_NOTICE, "Unknown message received:"
- " RANAP event: %i\n", type);
- return -1;
- }
-}
-
-#endif /* BUILD_IU */
diff --git a/src/libmsc/meas_feed.c b/src/libmsc/meas_feed.c
deleted file mode 100644
index 1e7b4cd51..000000000
--- a/src/libmsc/meas_feed.c
+++ /dev/null
@@ -1,168 +0,0 @@
-/* UDP-Feed of measurement reports */
-
-#include <unistd.h>
-
-#include <sys/socket.h>
-
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/socket.h>
-#include <osmocom/core/write_queue.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/vty.h>
-
-#include <openbsc/meas_rep.h>
-#include <openbsc/signal.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/meas_feed.h>
-#include <openbsc/vty.h>
-#include <openbsc/vlr.h>
-
-#include "meas_feed.h"
-
-struct meas_feed_state {
- struct osmo_wqueue wqueue;
- char scenario[31+1];
- char *dst_host;
- uint16_t dst_port;
-};
-
-
-static struct meas_feed_state g_mfs;
-
-static int process_meas_rep(struct gsm_meas_rep *mr)
-{
- struct msgb *msg;
- struct meas_feed_meas *mfm;
- struct vlr_subscr *vsub;
-
- /* ignore measurements as long as we don't know who it is */
- if (!mr->lchan || !mr->lchan->conn || !mr->lchan->conn->vsub)
- return 0;
-
- vsub = mr->lchan->conn->vsub;
-
- msg = msgb_alloc(sizeof(struct meas_feed_meas), "Meas. Feed");
- if (!msg)
- return 0;
-
- /* fill in the header */
- mfm = (struct meas_feed_meas *) msgb_put(msg, sizeof(*mfm));
- mfm->hdr.msg_type = MEAS_FEED_MEAS;
- mfm->hdr.version = MEAS_FEED_VERSION;
-
- /* fill in MEAS_FEED_MEAS specific header */
- osmo_strlcpy(mfm->imsi, vsub->imsi, sizeof(mfm->imsi));
- osmo_strlcpy(mfm->name, vsub->name, sizeof(mfm->name));
- osmo_strlcpy(mfm->scenario, g_mfs.scenario, sizeof(mfm->scenario));
-
- /* copy the entire measurement report */
- memcpy(&mfm->mr, mr, sizeof(mfm->mr));
-
- /* copy channel information */
- /* we assume that the measurement report always belong to some timeslot */
- mfm->lchan_type = (uint8_t)mr->lchan->type;
- mfm->pchan_type = (uint8_t)mr->lchan->ts->pchan;
- mfm->bts_nr = mr->lchan->ts->trx->bts->nr;
- mfm->trx_nr = mr->lchan->ts->trx->nr;
- mfm->ts_nr = mr->lchan->ts->nr;
- mfm->ss_nr = mr->lchan->nr;
-
- /* and send it to the socket */
- if (osmo_wqueue_enqueue(&g_mfs.wqueue, msg) != 0)
- msgb_free(msg);
-
- return 0;
-}
-
-static int meas_feed_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct lchan_signal_data *sdata = signal_data;
-
- if (subsys != SS_LCHAN)
- return 0;
-
- if (signal == S_LCHAN_MEAS_REP)
- process_meas_rep(sdata->mr);
-
- return 0;
-}
-
-static int feed_write_cb(struct osmo_fd *ofd, struct msgb *msg)
-{
- return write(ofd->fd, msgb_data(msg), msgb_length(msg));
-}
-
-static int feed_read_cb(struct osmo_fd *ofd)
-{
- int rc;
- char buf[256];
-
- rc = read(ofd->fd, buf, sizeof(buf));
- ofd->fd &= ~BSC_FD_READ;
-
- return rc;
-}
-
-int meas_feed_cfg_set(const char *dst_host, uint16_t dst_port)
-{
- int rc;
- int already_initialized = 0;
-
- if (g_mfs.wqueue.bfd.fd)
- already_initialized = 1;
-
-
- if (already_initialized &&
- !strcmp(dst_host, g_mfs.dst_host) &&
- dst_port == g_mfs.dst_port)
- return 0;
-
- if (!already_initialized) {
- osmo_wqueue_init(&g_mfs.wqueue, 10);
- g_mfs.wqueue.write_cb = feed_write_cb;
- g_mfs.wqueue.read_cb = feed_read_cb;
- osmo_signal_register_handler(SS_LCHAN, meas_feed_sig_cb, NULL);
- }
-
- if (already_initialized) {
- osmo_wqueue_clear(&g_mfs.wqueue);
- osmo_fd_unregister(&g_mfs.wqueue.bfd);
- close(g_mfs.wqueue.bfd.fd);
- /* don't set to zero, as that would mean 'not yet initialized' */
- g_mfs.wqueue.bfd.fd = -1;
- }
- rc = osmo_sock_init_ofd(&g_mfs.wqueue.bfd, AF_UNSPEC, SOCK_DGRAM,
- IPPROTO_UDP, dst_host, dst_port,
- OSMO_SOCK_F_CONNECT);
- if (rc < 0)
- return rc;
-
- g_mfs.wqueue.bfd.when &= ~BSC_FD_READ;
-
- if (g_mfs.dst_host)
- talloc_free(g_mfs.dst_host);
- g_mfs.dst_host = talloc_strdup(NULL, dst_host);
- g_mfs.dst_port = dst_port;
-
- return 0;
-}
-
-void meas_feed_cfg_get(char **host, uint16_t *port)
-{
- *port = g_mfs.dst_port;
- *host = g_mfs.dst_host;
-}
-
-void meas_feed_scenario_set(const char *name)
-{
- osmo_strlcpy(g_mfs.scenario, name, sizeof(g_mfs.scenario));
-}
-
-const char *meas_feed_scenario_get(void)
-{
- return g_mfs.scenario;
-}
diff --git a/src/libmsc/meas_feed.h b/src/libmsc/meas_feed.h
deleted file mode 100644
index 782a9616c..000000000
--- a/src/libmsc/meas_feed.h
+++ /dev/null
@@ -1,12 +0,0 @@
-#ifndef _INT_MEAS_FEED_H
-#define _INT_MEAS_FEED_H
-
-#include <stdint.h>
-
-int meas_feed_cfg_set(const char *dst_host, uint16_t dst_port);
-void meas_feed_cfg_get(char **host, uint16_t *port);
-
-void meas_feed_scenario_set(const char *name);
-const char *meas_feed_scenario_get(void);
-
-#endif /* _INT_MEAS_FEED_H */
diff --git a/src/libmsc/mncc.c b/src/libmsc/mncc.c
deleted file mode 100644
index 8110eadca..000000000
--- a/src/libmsc/mncc.c
+++ /dev/null
@@ -1,107 +0,0 @@
-/* mncc.c - utility routines for the MNCC API between the 04.08
- * message parsing and the actual Call Control logic */
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009 by Andreas Eversberg <Andreas.Eversberg@versatel.de>
- * 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/>.
- *
- */
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/debug.h>
-#include <openbsc/mncc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/transaction.h>
-#include <openbsc/rtp_proxy.h>
-
-
-static const struct value_string mncc_names[] = {
- { MNCC_SETUP_REQ, "MNCC_SETUP_REQ" },
- { MNCC_SETUP_IND, "MNCC_SETUP_IND" },
- { MNCC_SETUP_RSP, "MNCC_SETUP_RSP" },
- { MNCC_SETUP_CNF, "MNCC_SETUP_CNF" },
- { MNCC_SETUP_COMPL_REQ, "MNCC_SETUP_COMPL_REQ" },
- { MNCC_SETUP_COMPL_IND, "MNCC_SETUP_COMPL_IND" },
- { MNCC_CALL_CONF_IND, "MNCC_CALL_CONF_IND" },
- { MNCC_CALL_PROC_REQ, "MNCC_CALL_PROC_REQ" },
- { MNCC_PROGRESS_REQ, "MNCC_PROGRESS_REQ" },
- { MNCC_ALERT_REQ, "MNCC_ALERT_REQ" },
- { MNCC_ALERT_IND, "MNCC_ALERT_IND" },
- { MNCC_NOTIFY_REQ, "MNCC_NOTIFY_REQ" },
- { MNCC_NOTIFY_IND, "MNCC_NOTIFY_IND" },
- { MNCC_DISC_REQ, "MNCC_DISC_REQ" },
- { MNCC_DISC_IND, "MNCC_DISC_IND" },
- { MNCC_REL_REQ, "MNCC_REL_REQ" },
- { MNCC_REL_IND, "MNCC_REL_IND" },
- { MNCC_REL_CNF, "MNCC_REL_CNF" },
- { MNCC_FACILITY_REQ, "MNCC_FACILITY_REQ" },
- { MNCC_FACILITY_IND, "MNCC_FACILITY_IND" },
- { MNCC_START_DTMF_IND, "MNCC_START_DTMF_IND" },
- { MNCC_START_DTMF_RSP, "MNCC_START_DTMF_RSP" },
- { MNCC_START_DTMF_REJ, "MNCC_START_DTMF_REJ" },
- { MNCC_STOP_DTMF_IND, "MNCC_STOP_DTMF_IND" },
- { MNCC_STOP_DTMF_RSP, "MNCC_STOP_DTMF_RSP" },
- { MNCC_MODIFY_REQ, "MNCC_MODIFY_REQ" },
- { MNCC_MODIFY_IND, "MNCC_MODIFY_IND" },
- { MNCC_MODIFY_RSP, "MNCC_MODIFY_RSP" },
- { MNCC_MODIFY_CNF, "MNCC_MODIFY_CNF" },
- { MNCC_MODIFY_REJ, "MNCC_MODIFY_REJ" },
- { MNCC_HOLD_IND, "MNCC_HOLD_IND" },
- { MNCC_HOLD_CNF, "MNCC_HOLD_CNF" },
- { MNCC_HOLD_REJ, "MNCC_HOLD_REJ" },
- { MNCC_RETRIEVE_IND, "MNCC_RETRIEVE_IND" },
- { MNCC_RETRIEVE_CNF, "MNCC_RETRIEVE_CNF" },
- { MNCC_RETRIEVE_REJ, "MNCC_RETRIEVE_REJ" },
- { MNCC_USERINFO_REQ, "MNCC_USERINFO_REQ" },
- { MNCC_USERINFO_IND, "MNCC_USERINFO_IND" },
- { MNCC_REJ_REQ, "MNCC_REJ_REQ" },
- { MNCC_REJ_IND, "MNCC_REJ_IND" },
- { MNCC_BRIDGE, "MNCC_BRIDGE" },
- { MNCC_FRAME_RECV, "MNCC_FRAME_RECV" },
- { MNCC_FRAME_DROP, "MNCC_FRAME_DROP" },
- { MNCC_LCHAN_MODIFY, "MNCC_LCHAN_MODIFY" },
- { MNCC_RTP_CREATE, "MNCC_RTP_CREATE" },
- { MNCC_RTP_CONNECT, "MNCC_RTP_CONNECT" },
- { MNCC_RTP_FREE, "MNCC_RTP_FREE" },
- { GSM_TCHF_FRAME, "GSM_TCHF_FRAME" },
- { GSM_TCHF_FRAME_EFR, "GSM_TCHF_FRAME_EFR" },
- { GSM_TCHH_FRAME, "GSM_TCHH_FRAME" },
- { GSM_TCH_FRAME_AMR, "GSM_TCH_FRAME_AMR" },
- { GSM_BAD_FRAME, "GSM_BAD_FRAME" },
- { 0, NULL },
-};
-
-const char *get_mncc_name(int value)
-{
- return get_value_string(mncc_names, value);
-}
-
-void mncc_set_cause(struct gsm_mncc *data, int loc, int val)
-{
- data->fields |= MNCC_F_CAUSE;
- data->cause.location = loc;
- data->cause.value = val;
-}
-
diff --git a/src/libmsc/mncc_builtin.c b/src/libmsc/mncc_builtin.c
deleted file mode 100644
index ac6e7345d..000000000
--- a/src/libmsc/mncc_builtin.c
+++ /dev/null
@@ -1,383 +0,0 @@
-/* mncc_builtin.c - default, minimal built-in MNCC Application for
- * standalone bsc_hack (network-in-the-box mode) */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009 by Andreas Eversberg <Andreas.Eversberg@versatel.de>
- * All Rights Reserved
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 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 General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with this program; if not, write to the Free Software Foundation, Inc.,
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/debug.h>
-#include <openbsc/mncc.h>
-#include <openbsc/mncc_int.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/transaction.h>
-#include <openbsc/rtp_proxy.h>
-
-void *tall_call_ctx;
-
-static LLIST_HEAD(call_list);
-
-static uint32_t new_callref = 0x00000001;
-
-struct mncc_int mncc_int = {
- .def_codec = { GSM48_CMODE_SPEECH_V1, GSM48_CMODE_SPEECH_V1 },
-};
-
-static void free_call(struct gsm_call *call)
-{
- llist_del(&call->entry);
- DEBUGP(DMNCC, "(call %x) Call removed.\n", call->callref);
- talloc_free(call);
-}
-
-
-static struct gsm_call *get_call_ref(uint32_t callref)
-{
- struct gsm_call *callt;
-
- llist_for_each_entry(callt, &call_list, entry) {
- if (callt->callref == callref)
- return callt;
- }
- return NULL;
-}
-
-/* on incoming call, look up database and send setup to remote subscr. */
-static int mncc_setup_ind(struct gsm_call *call, int msg_type,
- struct gsm_mncc *setup)
-{
- struct gsm_mncc mncc;
- struct gsm_call *remote;
-
- memset(&mncc, 0, sizeof(struct gsm_mncc));
- mncc.callref = call->callref;
-
- /* already have remote call */
- if (call->remote_ref)
- return 0;
-
- /* transfer mode 1 would be packet mode, which was never specified */
- if (setup->bearer_cap.mode != 0) {
- LOGP(DMNCC, LOGL_NOTICE, "(call %x) We don't support "
- "packet mode\n", call->callref);
- mncc_set_cause(&mncc, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_BEARER_CA_UNAVAIL);
- goto out_reject;
- }
-
- /* we currently only do speech */
- if (setup->bearer_cap.transfer != GSM_MNCC_BCAP_SPEECH) {
- LOGP(DMNCC, LOGL_NOTICE, "(call %x) We only support "
- "voice calls\n", call->callref);
- mncc_set_cause(&mncc, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_BEARER_CA_UNAVAIL);
- goto out_reject;
- }
-
- /* create remote call */
- if (!(remote = talloc_zero(tall_call_ctx, struct gsm_call))) {
- mncc_set_cause(&mncc, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- goto out_reject;
- }
- llist_add_tail(&remote->entry, &call_list);
- remote->net = call->net;
- remote->callref = new_callref++;
- DEBUGP(DMNCC, "(call %x) Creating new remote instance %x.\n",
- call->callref, remote->callref);
-
- /* link remote call */
- call->remote_ref = remote->callref;
- remote->remote_ref = call->callref;
-
- /* send call proceeding */
- memset(&mncc, 0, sizeof(struct gsm_mncc));
- mncc.callref = call->callref;
- DEBUGP(DMNCC, "(call %x) Accepting call.\n", call->callref);
- mncc_tx_to_cc(call->net, MNCC_CALL_PROC_REQ, &mncc);
-
- /* modify mode */
- memset(&mncc, 0, sizeof(struct gsm_mncc));
- mncc.callref = call->callref;
- DEBUGP(DMNCC, "(call %x) Modify channel mode\n", call->callref);
- mncc_tx_to_cc(call->net, MNCC_LCHAN_MODIFY, &mncc);
-
- /* send setup to remote */
-// setup->fields |= MNCC_F_SIGNAL;
-// setup->signal = GSM48_SIGNAL_DIALTONE;
- setup->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Forwarding SETUP to remote.\n", call->callref);
- return mncc_tx_to_cc(remote->net, MNCC_SETUP_REQ, setup);
-
-out_reject:
- mncc_tx_to_cc(call->net, MNCC_REJ_REQ, &mncc);
- free_call(call);
- return 0;
-}
-
-static int mncc_alert_ind(struct gsm_call *call, int msg_type,
- struct gsm_mncc *alert)
-{
- struct gsm_call *remote;
-
- /* send alerting to remote */
- if (!(remote = get_call_ref(call->remote_ref)))
- return 0;
- alert->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Forwarding ALERT to remote.\n", call->callref);
- return mncc_tx_to_cc(remote->net, MNCC_ALERT_REQ, alert);
-}
-
-static int mncc_notify_ind(struct gsm_call *call, int msg_type,
- struct gsm_mncc *notify)
-{
- struct gsm_call *remote;
-
- /* send notify to remote */
- if (!(remote = get_call_ref(call->remote_ref)))
- return 0;
- notify->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Forwarding NOTIF to remote.\n", call->callref);
- return mncc_tx_to_cc(remote->net, MNCC_NOTIFY_REQ, notify);
-}
-
-static int mncc_setup_cnf(struct gsm_call *call, int msg_type,
- struct gsm_mncc *connect)
-{
- struct gsm_mncc connect_ack, frame_recv;
- struct gsm_network *net = call->net;
- struct gsm_call *remote;
- struct gsm_mncc_bridge bridge = { .msg_type = MNCC_BRIDGE };
-
- /* acknowledge connect */
- memset(&connect_ack, 0, sizeof(struct gsm_mncc));
- connect_ack.callref = call->callref;
- DEBUGP(DMNCC, "(call %x) Acknowledge SETUP.\n", call->callref);
- mncc_tx_to_cc(call->net, MNCC_SETUP_COMPL_REQ, &connect_ack);
-
- /* send connect message to remote */
- if (!(remote = get_call_ref(call->remote_ref)))
- return 0;
- connect->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Sending CONNECT to remote.\n", call->callref);
- mncc_tx_to_cc(remote->net, MNCC_SETUP_RSP, connect);
-
- /* bridge tch */
- bridge.callref[0] = call->callref;
- bridge.callref[1] = call->remote_ref;
- DEBUGP(DMNCC, "(call %x) Bridging with remote.\n", call->callref);
-
- /* proxy mode */
- if (!net->handover.active) {
- /* in the no-handover case, we can bridge, i.e. use
- * the old RTP proxy code */
- return mncc_tx_to_cc(call->net, MNCC_BRIDGE, &bridge);
- } else {
- /* in case of handover, we need to re-write the RTP
- * SSRC, sequence and timestamp values and thus
- * need to enable RTP receive for both directions */
- memset(&frame_recv, 0, sizeof(struct gsm_mncc));
- frame_recv.callref = call->callref;
- mncc_tx_to_cc(call->net, MNCC_FRAME_RECV, &frame_recv);
- frame_recv.callref = call->remote_ref;
- return mncc_tx_to_cc(call->net, MNCC_FRAME_RECV, &frame_recv);
- }
-}
-
-static int mncc_disc_ind(struct gsm_call *call, int msg_type,
- struct gsm_mncc *disc)
-{
- struct gsm_call *remote;
-
- /* send release */
- DEBUGP(DMNCC, "(call %x) Releasing call with cause %d\n",
- call->callref, disc->cause.value);
- mncc_tx_to_cc(call->net, MNCC_REL_REQ, disc);
-
- /* send disc to remote */
- if (!(remote = get_call_ref(call->remote_ref))) {
- return 0;
- }
- disc->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Disconnecting remote with cause %d\n",
- remote->callref, disc->cause.value);
- return mncc_tx_to_cc(remote->net, MNCC_DISC_REQ, disc);
-}
-
-static int mncc_rel_ind(struct gsm_call *call, int msg_type, struct gsm_mncc *rel)
-{
- struct gsm_call *remote;
-
- /* send release to remote */
- if (!(remote = get_call_ref(call->remote_ref))) {
- free_call(call);
- return 0;
- }
-
- rel->callref = remote->callref;
- DEBUGP(DMNCC, "(call %x) Releasing remote with cause %d\n",
- call->callref, rel->cause.value);
-
- /*
- * Release this side of the call right now. Otherwise we end up
- * in this method for the other call and will also try to release
- * it and then we will end up with a double free and a crash
- */
- free_call(call);
- mncc_tx_to_cc(remote->net, MNCC_REL_REQ, rel);
-
- return 0;
-}
-
-static int mncc_rel_cnf(struct gsm_call *call, int msg_type, struct gsm_mncc *rel)
-{
- free_call(call);
- return 0;
-}
-
-/* Internal MNCC handler input function (from CC -> MNCC -> here) */
-int int_mncc_recv(struct gsm_network *net, struct msgb *msg)
-{
- void *arg = msgb_data(msg);
- struct gsm_mncc *data = arg;
- int msg_type = data->msg_type;
- int callref;
- struct gsm_call *call = NULL, *callt;
- int rc = 0;
-
- /* Special messages */
- switch(msg_type) {
- }
-
- /* find callref */
- callref = data->callref;
- llist_for_each_entry(callt, &call_list, entry) {
- if (callt->callref == callref) {
- call = callt;
- break;
- }
- }
-
- /* create callref, if setup is received */
- if (!call) {
- if (msg_type != MNCC_SETUP_IND)
- goto out_free; /* drop */
- /* create call */
- if (!(call = talloc_zero(tall_call_ctx, struct gsm_call))) {
- struct gsm_mncc rel;
-
- memset(&rel, 0, sizeof(struct gsm_mncc));
- rel.callref = callref;
- mncc_set_cause(&rel, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_RESOURCE_UNAVAIL);
- mncc_tx_to_cc(net, MNCC_REL_REQ, &rel);
- goto out_free;
- }
- llist_add_tail(&call->entry, &call_list);
- call->net = net;
- call->callref = callref;
- DEBUGP(DMNCC, "(call %x) Call created.\n", call->callref);
- }
-
- if (mncc_is_data_frame(msg_type)) {
- LOGP(DMNCC, LOGL_ERROR, "(call %x) Received data frame, which is not supported.\n",
- call->callref);
- goto out_free;
- }
-
- DEBUGP(DMNCC, "(call %x) Received message %s\n", call->callref,
- get_mncc_name(msg_type));
-
- switch(msg_type) {
- case MNCC_SETUP_IND:
- rc = mncc_setup_ind(call, msg_type, arg);
- break;
- case MNCC_SETUP_CNF:
- rc = mncc_setup_cnf(call, msg_type, arg);
- break;
- case MNCC_SETUP_COMPL_IND:
- break;
- case MNCC_CALL_CONF_IND:
- /* we now need to MODIFY the channel */
- mncc_tx_to_cc(call->net, MNCC_LCHAN_MODIFY, data);
- break;
- case MNCC_ALERT_IND:
- rc = mncc_alert_ind(call, msg_type, arg);
- break;
- case MNCC_NOTIFY_IND:
- rc = mncc_notify_ind(call, msg_type, arg);
- break;
- case MNCC_DISC_IND:
- rc = mncc_disc_ind(call, msg_type, arg);
- break;
- case MNCC_REL_IND:
- case MNCC_REJ_IND:
- rc = mncc_rel_ind(call, msg_type, arg);
- break;
- case MNCC_REL_CNF:
- rc = mncc_rel_cnf(call, msg_type, arg);
- break;
- case MNCC_FACILITY_IND:
- break;
- case MNCC_START_DTMF_IND:
- rc = mncc_tx_to_cc(net, MNCC_START_DTMF_REJ, data);
- break;
- case MNCC_STOP_DTMF_IND:
- rc = mncc_tx_to_cc(net, MNCC_STOP_DTMF_RSP, data);
- break;
- case MNCC_MODIFY_IND:
- mncc_set_cause(data, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_SERV_OPT_UNIMPL);
- DEBUGP(DMNCC, "(call %x) Rejecting MODIFY with cause %d\n",
- call->callref, data->cause.value);
- rc = mncc_tx_to_cc(net, MNCC_MODIFY_REJ, data);
- break;
- case MNCC_MODIFY_CNF:
- break;
- case MNCC_HOLD_IND:
- mncc_set_cause(data, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_SERV_OPT_UNIMPL);
- DEBUGP(DMNCC, "(call %x) Rejecting HOLD with cause %d\n",
- call->callref, data->cause.value);
- rc = mncc_tx_to_cc(net, MNCC_HOLD_REJ, data);
- break;
- case MNCC_RETRIEVE_IND:
- mncc_set_cause(data, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_SERV_OPT_UNIMPL);
- DEBUGP(DMNCC, "(call %x) Rejecting RETRIEVE with cause %d\n",
- call->callref, data->cause.value);
- rc = mncc_tx_to_cc(net, MNCC_RETRIEVE_REJ, data);
- break;
- default:
- LOGP(DMNCC, LOGL_NOTICE, "(call %x) Message unhandled\n", callref);
- break;
- }
-
-out_free:
- msgb_free(msg);
-
- return rc;
-}
diff --git a/src/libmsc/mncc_sock.c b/src/libmsc/mncc_sock.c
deleted file mode 100644
index 0c696f2d9..000000000
--- a/src/libmsc/mncc_sock.c
+++ /dev/null
@@ -1,317 +0,0 @@
-/* mncc_sock.c: Tie the MNCC interface to a unix domain socket */
-
-/* (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009 by Andreas Eversberg <Andreas.Eversberg@versatel.de>
- * (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 General Public License as published by
- * the Free Software Foundation; either version 2 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 General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with this program; if not, write to the Free Software Foundation, Inc.,
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- *
- */
-
-#include <stdio.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-#include <assert.h>
-#include <sys/socket.h>
-#include <sys/un.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/socket.h>
-#include <osmocom/gsm/protocol/gsm_04_08.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/mncc.h>
-#include <openbsc/gsm_data.h>
-
-struct mncc_sock_state {
- struct gsm_network *net;
- struct osmo_fd listen_bfd; /* fd for listen socket */
- struct osmo_fd conn_bfd; /* fd for connection to lcr */
-};
-
-/* input from CC code into mncc_sock */
-int mncc_sock_from_cc(struct gsm_network *net, struct msgb *msg)
-{
- struct gsm_mncc *mncc_in = (struct gsm_mncc *) msgb_data(msg);
- int msg_type = mncc_in->msg_type;
-
- /* Check if we currently have a MNCC handler connected */
- if (net->mncc_state->conn_bfd.fd < 0) {
- LOGP(DMNCC, LOGL_ERROR, "mncc_sock receives %s for external CC app "
- "but socket is gone\n", get_mncc_name(msg_type));
- if (!mncc_is_data_frame(msg_type)) {
- /* release the request */
- struct gsm_mncc mncc_out;
- memset(&mncc_out, 0, sizeof(mncc_out));
- mncc_out.callref = mncc_in->callref;
- mncc_set_cause(&mncc_out, GSM48_CAUSE_LOC_PRN_S_LU,
- GSM48_CC_CAUSE_TEMP_FAILURE);
- mncc_tx_to_cc(net, MNCC_REL_REQ, &mncc_out);
- }
- /* free the original message */
- msgb_free(msg);
- return -1;
- }
-
- /* FIXME: check for some maximum queue depth? */
-
- /* Actually enqueue the message and mark socket write need */
- msgb_enqueue(&net->upqueue, msg);
- net->mncc_state->conn_bfd.when |= BSC_FD_WRITE;
- return 0;
-}
-
-static void mncc_sock_close(struct mncc_sock_state *state)
-{
- struct osmo_fd *bfd = &state->conn_bfd;
-
- LOGP(DMNCC, LOGL_NOTICE, "MNCC Socket has LOST connection\n");
-
- close(bfd->fd);
- bfd->fd = -1;
- osmo_fd_unregister(bfd);
-
- /* re-enable the generation of ACCEPT for new connections */
- state->listen_bfd.when |= BSC_FD_READ;
-
- /* release all exisitng calls */
- gsm0408_clear_all_trans(state->net, GSM48_PDISC_CC);
-
- /* flush the queue */
- while (!llist_empty(&state->net->upqueue)) {
- struct msgb *msg = msgb_dequeue(&state->net->upqueue);
- msgb_free(msg);
- }
-}
-
-static int mncc_sock_read(struct osmo_fd *bfd)
-{
- struct mncc_sock_state *state = (struct mncc_sock_state *)bfd->data;
- struct gsm_mncc *mncc_prim;
- struct msgb *msg;
- int rc;
-
- msg = msgb_alloc(sizeof(*mncc_prim)+256, "mncc_sock_rx");
- if (!msg)
- return -ENOMEM;
-
- mncc_prim = (struct gsm_mncc *) msg->tail;
-
- rc = recv(bfd->fd, msg->tail, msgb_tailroom(msg), 0);
- if (rc == 0)
- goto close;
-
- if (rc < 0) {
- if (errno == EAGAIN)
- return 0;
- goto close;
- }
-
- rc = mncc_tx_to_cc(state->net, mncc_prim->msg_type, mncc_prim);
-
- /* as we always synchronously process the message in mncc_send() and
- * its callbacks, we can free the message here. */
- msgb_free(msg);
-
- return rc;
-
-close:
- msgb_free(msg);
- mncc_sock_close(state);
- return -1;
-}
-
-static int mncc_sock_write(struct osmo_fd *bfd)
-{
- struct mncc_sock_state *state = bfd->data;
- struct gsm_network *net = state->net;
- int rc;
-
- while (!llist_empty(&net->upqueue)) {
- struct msgb *msg, *msg2;
- struct gsm_mncc *mncc_prim;
-
- /* peek at the beginning of the queue */
- msg = llist_entry(net->upqueue.next, struct msgb, list);
- mncc_prim = (struct gsm_mncc *)msg->data;
-
- bfd->when &= ~BSC_FD_WRITE;
-
- /* bug hunter 8-): maybe someone forgot msgb_put(...) ? */
- if (!msgb_length(msg)) {
- LOGP(DMNCC, LOGL_ERROR, "message type (%d) with ZERO "
- "bytes!\n", mncc_prim->msg_type);
- goto dontsend;
- }
-
- /* try to send it over the socket */
- rc = write(bfd->fd, msgb_data(msg), msgb_length(msg));
- if (rc == 0)
- goto close;
- if (rc < 0) {
- if (errno == EAGAIN) {
- bfd->when |= BSC_FD_WRITE;
- break;
- }
- goto close;
- }
-
-dontsend:
- /* _after_ we send it, we can deueue */
- msg2 = msgb_dequeue(&net->upqueue);
- assert(msg == msg2);
- msgb_free(msg);
- }
- return 0;
-
-close:
- mncc_sock_close(state);
-
- return -1;
-}
-
-static int mncc_sock_cb(struct osmo_fd *bfd, unsigned int flags)
-{
- int rc = 0;
-
- if (flags & BSC_FD_READ)
- rc = mncc_sock_read(bfd);
- if (rc < 0)
- return rc;
-
- if (flags & BSC_FD_WRITE)
- rc = mncc_sock_write(bfd);
-
- return rc;
-}
-
-/**
- * Send a version indication to the remote.
- */
-static void queue_hello(struct mncc_sock_state *mncc)
-{
- struct gsm_mncc_hello *hello;
- struct msgb *msg;
-
- msg = msgb_alloc(512, "mncc hello");
- if (!msg) {
- LOGP(DMNCC, LOGL_ERROR, "Failed to allocate hello.\n");
- mncc_sock_close(mncc);
- return;
- }
-
- hello = (struct gsm_mncc_hello *) msgb_put(msg, sizeof(*hello));
- hello->msg_type = MNCC_SOCKET_HELLO;
- hello->version = MNCC_SOCK_VERSION;
- hello->mncc_size = sizeof(struct gsm_mncc);
- hello->data_frame_size = sizeof(struct gsm_data_frame);
- hello->called_offset = offsetof(struct gsm_mncc, called);
- hello->signal_offset = offsetof(struct gsm_mncc, signal);
- hello->emergency_offset = offsetof(struct gsm_mncc, emergency);
-
- msgb_enqueue(&mncc->net->upqueue, msg);
- mncc->conn_bfd.when |= BSC_FD_WRITE;
-}
-
-/* accept a new connection */
-static int mncc_sock_accept(struct osmo_fd *bfd, unsigned int flags)
-{
- struct mncc_sock_state *state = (struct mncc_sock_state *)bfd->data;
- struct osmo_fd *conn_bfd = &state->conn_bfd;
- struct sockaddr_un un_addr;
- socklen_t len;
- int rc;
-
- len = sizeof(un_addr);
- rc = accept(bfd->fd, (struct sockaddr *) &un_addr, &len);
- if (rc < 0) {
- LOGP(DMNCC, LOGL_ERROR, "Failed to accept a new connection\n");
- return -1;
- }
-
- if (conn_bfd->fd >= 0) {
- LOGP(DMNCC, LOGL_NOTICE, "MNCC app connects but we already have "
- "another active connection ?!?\n");
- /* We already have one MNCC app connected, this is all we support */
- state->listen_bfd.when &= ~BSC_FD_READ;
- close(rc);
- return 0;
- }
-
- conn_bfd->fd = rc;
- conn_bfd->when = BSC_FD_READ;
- conn_bfd->cb = mncc_sock_cb;
- conn_bfd->data = state;
-
- if (osmo_fd_register(conn_bfd) != 0) {
- LOGP(DMNCC, LOGL_ERROR, "Failed to register new connection fd\n");
- close(conn_bfd->fd);
- conn_bfd->fd = -1;
- return -1;
- }
-
- LOGP(DMNCC, LOGL_NOTICE, "MNCC Socket has connection with external "
- "call control application\n");
-
- queue_hello(state);
- return 0;
-}
-
-
-int mncc_sock_init(struct gsm_network *net, const char *sock_path)
-{
- struct mncc_sock_state *state;
- struct osmo_fd *bfd;
- int rc;
-
- state = talloc_zero(tall_bsc_ctx, struct mncc_sock_state);
- if (!state)
- return -ENOMEM;
-
- state->net = net;
- state->conn_bfd.fd = -1;
-
- bfd = &state->listen_bfd;
-
- bfd->fd = osmo_sock_unix_init(SOCK_SEQPACKET, 0, sock_path,
- OSMO_SOCK_F_BIND);
- if (bfd->fd < 0) {
- LOGP(DMNCC, LOGL_ERROR, "Could not create unix socket: %s: %s\n",
- sock_path, strerror(errno));
- talloc_free(state);
- return -1;
- }
-
- bfd->when = BSC_FD_READ;
- bfd->cb = mncc_sock_accept;
- bfd->data = state;
-
- rc = osmo_fd_register(bfd);
- if (rc < 0) {
- LOGP(DMNCC, LOGL_ERROR, "Could not register listen fd: %d\n", rc);
- close(bfd->fd);
- talloc_free(state);
- return rc;
- }
-
- net->mncc_state = state;
-
- LOGP(DMNCC, LOGL_NOTICE, "MNCC socket at %s\n", sock_path);
- return 0;
-}
diff --git a/src/libmsc/msc_ifaces.c b/src/libmsc/msc_ifaces.c
deleted file mode 100644
index 161a10019..000000000
--- a/src/libmsc/msc_ifaces.c
+++ /dev/null
@@ -1,423 +0,0 @@
-/* Implementation for MSC decisions which interface to send messages out on. */
-
-/* (C) 2016 by sysmocom s.m.f.c GmbH <info@sysmocom.de>
- *
- * 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/>.
- */
-
-#include <osmocom/core/logging.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/transaction.h>
-#include <osmocom/legacy_mgcp/mgcp.h>
-#include <osmocom/legacy_mgcp/mgcpgw_client.h>
-#include <openbsc/vlr.h>
-#include <openbsc/a_iface.h>
-
-#include "../../bscconfig.h"
-
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-extern struct msgb *ranap_new_msg_rab_assign_voice(uint8_t rab_id,
- uint32_t rtp_ip,
- uint16_t rtp_port,
- bool use_x213_nsap);
-#else
-#include <openbsc/iu_dummy.h>
-#endif /* BUILD_IU */
-
-static int msc_tx(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- if (!conn)
- return -EINVAL;
- if (!msg)
- return -EINVAL;
-
- DEBUGP(DMSC, "msc_tx %u bytes to %s via %s\n",
- msg->len, vlr_subscr_name(conn->vsub),
- ran_type_name(conn->via_ran));
- switch (conn->via_ran) {
- case RAN_GERAN_A:
- msg->dst = conn;
- return a_iface_tx_dtap(msg);
-
- case RAN_UTRAN_IU:
- msg->dst = conn->iu.ue_ctx;
- return ranap_iu_tx(msg, 0);
-
- default:
- LOGP(DMSC, LOGL_ERROR,
- "msc_tx(): conn->via_ran invalid (%d)\n",
- conn->via_ran);
- return -1;
- }
-}
-
-
-int msc_tx_dtap(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- return msc_tx(conn, msg);
-}
-
-
-/* 9.2.5 CM service accept */
-int msc_gsm48_tx_mm_serv_ack(struct gsm_subscriber_connection *conn)
-{
- struct msgb *msg;
- struct gsm48_hdr *gh;
-
- if (!conn)
- return -EINVAL;
-
- msg = gsm48_msgb_alloc_name("GSM 04.08 SERV ACC");
-
- gh = (struct gsm48_hdr *) msgb_put(msg, sizeof(*gh));
- gh->proto_discr = GSM48_PDISC_MM;
- gh->msg_type = GSM48_MT_MM_CM_SERV_ACC;
-
- DEBUGP(DMM, "-> CM SERVICE ACCEPT %s\n",
- vlr_subscr_name(conn->vsub));
-
- return msc_tx_dtap(conn, msg);
-}
-
-/* 9.2.6 CM service reject */
-int msc_gsm48_tx_mm_serv_rej(struct gsm_subscriber_connection *conn,
- enum gsm48_reject_value value)
-{
- struct msgb *msg;
-
- if (!conn)
- return -EINVAL;
-
- conn->received_cm_service_request = false;
-
- msg = gsm48_create_mm_serv_rej(value);
- if (!msg) {
- LOGP(DMM, LOGL_ERROR, "Failed to allocate CM Service Reject.\n");
- return -1;
- }
-
- DEBUGP(DMM, "-> CM SERVICE Reject cause: %d\n", value);
-
- return msc_tx_dtap(conn, msg);
-}
-
-int msc_tx_common_id(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return -EINVAL;
-
- /* Common ID is only sent over IuCS */
- if (conn->via_ran != RAN_UTRAN_IU) {
- LOGP(DMM, LOGL_INFO,
- "%s: Asked to transmit Common ID, but skipping"
- " because this is not on UTRAN\n",
- vlr_subscr_name(conn->vsub));
- return 0;
- }
-
- DEBUGP(DIUCS, "%s: tx CommonID %s\n",
- vlr_subscr_name(conn->vsub), conn->vsub->imsi);
- return ranap_iu_tx_common_id(conn->iu.ue_ctx, conn->vsub->imsi);
-}
-
-static int iu_rab_act_cs(struct ranap_ue_conn_ctx *uectx, uint8_t rab_id,
- uint32_t rtp_ip, uint16_t rtp_port)
-{
-#ifdef BUILD_IU
- struct msgb *msg;
- bool use_x213_nsap;
- uint32_t conn_id = uectx->conn_id;
-
- use_x213_nsap = (uectx->rab_assign_addr_enc == RANAP_NSAP_ADDR_ENC_X213);
-
- LOGP(DIUCS, LOGL_DEBUG, "Assigning RAB: conn_id=%u, rab_id=%d,"
- " rtp=%x:%u, use_x213_nsap=%d\n", conn_id, rab_id, rtp_ip,
- rtp_port, use_x213_nsap);
-
- msg = ranap_new_msg_rab_assign_voice(rab_id, rtp_ip, rtp_port,
- use_x213_nsap);
- msg->l2h = msg->data;
-
- if (ranap_iu_rab_act(uectx, msg))
- LOGP(DIUCS, LOGL_ERROR, "Failed to send RAB Assignment:"
- " conn_id=%d rab_id=%d rtp=%x:%u\n",
- conn_id, rab_id, rtp_ip, rtp_port);
- return 0;
-#else
- LOGP(DMSC, LOGL_ERROR, "Cannot send Iu RAB Assignment: built without Iu support\n");
- return -ENOTSUP;
-#endif
-}
-
-static void mgcp_response_rab_act_cs_crcx(struct mgcp_response *r, void *priv)
-{
- struct gsm_trans *trans = priv;
- struct gsm_subscriber_connection *conn = trans->conn;
- uint32_t rtp_ip;
- int rc;
-
- if (r->head.response_code != 200) {
- LOGP(DMGCP, LOGL_ERROR,
- "MGCPGW response yields error: %d %s\n",
- r->head.response_code, r->head.comment);
- goto rab_act_cs_error;
- }
-
- rc = mgcp_response_parse_params(r);
- if (rc) {
- LOGP(DMGCP, LOGL_ERROR,
- "Cannot parse MGCP response, for %s\n",
- vlr_subscr_name(trans->vsub));
- goto rab_act_cs_error;
- }
-
- conn->rtp.port_cn = r->audio_port;
-
- rtp_ip = mgcpgw_client_remote_addr_n(conn->network->mgcpgw.client);
-
- if (trans->conn->via_ran == RAN_UTRAN_IU) {
- /* Assign a voice channel via RANAP on 3G */
- if (iu_rab_act_cs(conn->iu.ue_ctx, conn->iu.rab_id, rtp_ip, conn->rtp.port_subscr))
- goto rab_act_cs_error;
- } else if (trans->conn->via_ran == RAN_GERAN_A) {
- /* Assign a voice channel via A on 2G */
- if (a_iface_tx_assignment(trans))
- goto rab_act_cs_error;
- } else
- goto rab_act_cs_error;
-
- /* Respond back to MNCC (if requested) */
- if (trans->tch_rtp_create) {
- if (gsm48_tch_rtp_create(trans))
- goto rab_act_cs_error;
- }
- return;
-
-rab_act_cs_error:
- /* FIXME abort call, invalidate conn, ... */
- LOGP(DMSC, LOGL_ERROR, "%s: failure during assignment\n",
- vlr_subscr_name(trans->vsub));
- return;
-}
-
-int msc_call_assignment(struct gsm_trans *trans)
-{
- struct gsm_subscriber_connection *conn;
- struct mgcpgw_client *mgcp;
- struct msgb *msg;
- uint16_t bts_base;
-
- if (!trans)
- return -EINVAL;
- if (!trans->conn)
- return -EINVAL;
-
- conn = trans->conn;
- mgcp = conn->network->mgcpgw.client;
-
-#ifdef BUILD_IU
- /* FIXME: HACK. where to scope the RAB Id? At the conn / subscriber / ranap_ue_conn_ctx? */
- static uint8_t next_iu_rab_id = 1;
- if (conn->via_ran == RAN_UTRAN_IU)
- conn->iu.rab_id = next_iu_rab_id ++;
-#endif
-
- conn->rtp.mgcp_rtp_endpoint =
- mgcpgw_client_next_endpoint(conn->network->mgcpgw.client);
-
- /* This will calculate the port we assign to the BTS via AoIP
- * assignment command (or rab-assignment on 3G) The BTS will send
- * its RTP traffic to that port on the MGCPGW side. The MGCPGW only
- * gets the endpoint ID via the CRCX. It will do the same calculation
- * on his side too to get knowledge of the rtp port. */
- bts_base = mgcpgw_client_conf_actual(mgcp)->bts_base;
- conn->rtp.port_subscr = bts_base + 2 * conn->rtp.mgcp_rtp_endpoint;
-
- /* Establish the RTP stream first as looping back to the originator.
- * The MDCX will patch through to the counterpart. TODO: play a ring
- * tone instead. */
- msg = mgcp_msg_crcx(mgcp, conn->rtp.mgcp_rtp_endpoint,
- conn->rtp.mgcp_rtp_endpoint, MGCP_CONN_LOOPBACK);
- return mgcpgw_client_tx(mgcp, msg, mgcp_response_rab_act_cs_crcx, trans);
-}
-
-static void mgcp_response_bridge_mdcx(struct mgcp_response *r, void *priv);
-
-static void mgcp_bridge(struct gsm_trans *from, struct gsm_trans *to,
- enum bridge_state state,
- enum mgcp_connection_mode mode)
-{
- struct gsm_subscriber_connection *conn1 = from->conn;
- struct gsm_subscriber_connection *conn2 = to->conn;
- struct mgcpgw_client *mgcp = conn1->network->mgcpgw.client;
- const char *ip;
- struct msgb *msg;
-
- OSMO_ASSERT(mgcp);
-
- from->bridge.peer = to;
- from->bridge.state = state;
-
- /* Loop back to the same MGCP GW */
- ip = mgcpgw_client_remote_addr_str(mgcp);
-
- msg = mgcp_msg_mdcx(mgcp,
- conn1->rtp.mgcp_rtp_endpoint,
- ip, conn2->rtp.port_cn,
- mode);
- if (mgcpgw_client_tx(mgcp, msg, mgcp_response_bridge_mdcx, from))
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to send MDCX message for %s\n",
- vlr_subscr_name(from->vsub));
-}
-
-static void mgcp_response_bridge_mdcx(struct mgcp_response *r, void *priv)
-{
- struct gsm_trans *trans = priv;
- struct gsm_trans *peer = trans->bridge.peer;
-
- switch (trans->bridge.state) {
- case BRIDGE_STATE_LOOPBACK_PENDING:
- trans->bridge.state = BRIDGE_STATE_LOOPBACK_ESTABLISHED;
-
- switch (peer->bridge.state) {
- case BRIDGE_STATE_LOOPBACK_PENDING:
- /* Wait until the other is done as well. */
- return;
- case BRIDGE_STATE_LOOPBACK_ESTABLISHED:
- /* Now that both are in loopback, switch both to
- * forwarding. */
- mgcp_bridge(trans, peer, BRIDGE_STATE_BRIDGE_PENDING,
- MGCP_CONN_RECV_SEND);
- mgcp_bridge(peer, trans, BRIDGE_STATE_BRIDGE_PENDING,
- MGCP_CONN_RECV_SEND);
- break;
- default:
- LOGP(DMGCP, LOGL_ERROR,
- "Unexpected bridge state: %d for %s\n",
- trans->bridge.state, vlr_subscr_name(trans->vsub));
- break;
- }
- break;
-
- case BRIDGE_STATE_BRIDGE_PENDING:
- trans->bridge.state = BRIDGE_STATE_BRIDGE_ESTABLISHED;
- break;
-
- default:
- LOGP(DMGCP, LOGL_ERROR,
- "Unexpected bridge state: %d for %s\n",
- trans->bridge.state, vlr_subscr_name(trans->vsub));
- break;
- }
-}
-
-int msc_call_connect(struct gsm_trans *trans, uint16_t port, uint32_t ip)
-{
- /* With this function we inform the MGCP-GW where (ip/port) it
- * has to send its outgoing voic traffic. The receiving end will
- * usually be a PBX (e.g. Asterisk). The IP-Address we tell, will
- * not only be used to direct the traffic, it will also be used
- * as a filter to make sure only RTP packets from the right
- * remote end will reach the BSS. This is also the reason why
- * inbound audio will not work until this step is performed */
-
- /* NOTE: This function is used when msc_call_bridge(), is not
- * applicable. This is usually the case when an external MNCC
- * is in use */
-
- struct gsm_subscriber_connection *conn;
- struct mgcpgw_client *mgcp;
- struct msgb *msg;
-
- if (!trans)
- return -EINVAL;
- if (!trans->conn)
- return -EINVAL;
- if (!trans->conn->network)
- return -EINVAL;
- if (!trans->conn->network->mgcpgw.client)
- return -EINVAL;
-
- mgcp = trans->conn->network->mgcpgw.client;
-
- struct in_addr ip_addr;
- ip_addr.s_addr = ntohl(ip);
-
- conn = trans->conn;
-
- msg = mgcp_msg_mdcx(mgcp,
- conn->rtp.mgcp_rtp_endpoint,
- inet_ntoa(ip_addr), port, MGCP_CONN_RECV_SEND);
- if (mgcpgw_client_tx(mgcp, msg, NULL, trans))
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to send MDCX message for %s\n",
- vlr_subscr_name(trans->vsub));
-
- return 0;
-}
-
-int msc_call_bridge(struct gsm_trans *trans1, struct gsm_trans *trans2)
-{
- if (!trans1)
- return -EINVAL;
- if (!trans2)
- return -EINVAL;
-
- /* First setup as loopback and configure the counterparts' endpoints,
- * so that when transmission starts the originating addresses are
- * already known to be valid. The mgcp callback will continue. */
- mgcp_bridge(trans1, trans2, BRIDGE_STATE_LOOPBACK_PENDING,
- MGCP_CONN_LOOPBACK);
- mgcp_bridge(trans2, trans1, BRIDGE_STATE_LOOPBACK_PENDING,
- MGCP_CONN_LOOPBACK);
-
- return 0;
-}
-
-void msc_call_release(struct gsm_trans *trans)
-{
- struct msgb *msg;
- struct gsm_subscriber_connection *conn;
- struct mgcpgw_client *mgcp;
-
- if (!trans)
- return;
- if (!trans->conn)
- return;
- if (!trans->conn->network)
- return;
-
- conn = trans->conn;
- mgcp = conn->network->mgcpgw.client;
-
- /* Send DLCX */
- msg = mgcp_msg_dlcx(mgcp, conn->rtp.mgcp_rtp_endpoint,
- conn->rtp.mgcp_rtp_endpoint);
- if (mgcpgw_client_tx(mgcp, msg, NULL, NULL))
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to send DLCX message for %s\n",
- vlr_subscr_name(trans->vsub));
-
- /* Release endpoint id */
- mgcpgw_client_release_endpoint(conn->rtp.mgcp_rtp_endpoint, mgcp);
-}
diff --git a/src/libmsc/msc_vty.c b/src/libmsc/msc_vty.c
deleted file mode 100644
index 50679aa01..000000000
--- a/src/libmsc/msc_vty.c
+++ /dev/null
@@ -1,162 +0,0 @@
-/* MSC interface to quagga VTY */
-/* (C) 2016 by sysmocom s.m.f.c. GmbH <info@sysmocom.de>
- * Based on OpenBSC interface to quagga VTY (libmsc/vty_interface_layer3.c)
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2011 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/>.
- *
- */
-
-/* NOTE: I would have liked to call this the MSC_NODE instead of the MSC_NODE,
- * but MSC_NODE already exists to configure a remote MSC for osmo-bsc. */
-
-#include "../../bscconfig.h"
-
-#include <inttypes.h>
-
-#include <osmocom/vty/command.h>
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-#endif
-
-#include <openbsc/vty.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/vlr.h>
-
-static struct cmd_node msc_node = {
- MSC_NODE,
- "%s(config-msc)# ",
- 1,
-};
-
-DEFUN(cfg_msc, cfg_msc_cmd,
- "msc", "Configure MSC options")
-{
- vty->node = MSC_NODE;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_assign_tmsi, cfg_msc_assign_tmsi_cmd,
- "assign-tmsi",
- "Assign TMSI during Location Updating.\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->vlr->cfg.assign_tmsi = true;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_no_assign_tmsi, cfg_msc_no_assign_tmsi_cmd,
- "no assign-tmsi",
- NO_STR "Assign TMSI during Location Updating.\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->vlr->cfg.assign_tmsi = false;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_cs7_instance_a,
- cfg_msc_cs7_instance_a_cmd,
- "cs7-instance-a <0-15>",
- "Set SS7 to be used by the A-Interface.\n" "SS7 instance reference number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->a.cs7_instance = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_cs7_instance_iu,
- cfg_msc_cs7_instance_iu_cmd,
- "cs7-instance-iu <0-15>",
- "Set SS7 to be used by the Iu-Interface.\n" "SS7 instance reference number\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->iu.cs7_instance = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-static int config_write_msc(struct vty *vty)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- vty_out(vty, "msc%s", VTY_NEWLINE);
- vty_out(vty, " %sassign-tmsi%s",
- gsmnet->vlr->cfg.assign_tmsi? "" : "no ", VTY_NEWLINE);
-
- vty_out(vty, " cs7-instance-a %u%s", gsmnet->a.cs7_instance,
- VTY_NEWLINE);
- vty_out(vty, " cs7-instance-iu %u%s", gsmnet->iu.cs7_instance,
- VTY_NEWLINE);
-
- mgcpgw_client_config_write(vty, " ");
-#ifdef BUILD_IU
- ranap_iu_vty_config_write(vty, " ");
-#endif
-
- return CMD_SUCCESS;
-}
-
-static int config_write_net(struct vty *vty)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- vty_out(vty, "network%s", VTY_NEWLINE);
- vty_out(vty, " network country code %u%s", gsmnet->country_code, VTY_NEWLINE);
- vty_out(vty, " mobile network code %u%s", gsmnet->network_code, VTY_NEWLINE);
- vty_out(vty, " short name %s%s", gsmnet->name_short, VTY_NEWLINE);
- vty_out(vty, " long name %s%s", gsmnet->name_long, VTY_NEWLINE);
- vty_out(vty, " auth policy %s%s", gsm_auth_policy_name(gsmnet->auth_policy), VTY_NEWLINE);
- vty_out(vty, " location updating reject cause %u%s",
- gsmnet->reject_cause, VTY_NEWLINE);
- vty_out(vty, " encryption a5 %u%s", gsmnet->a5_encryption, VTY_NEWLINE);
- vty_out(vty, " rrlp mode %s%s", rrlp_mode_name(gsmnet->rrlp.mode),
- VTY_NEWLINE);
- vty_out(vty, " mm info %u%s", gsmnet->send_mm_info, VTY_NEWLINE);
- if (gsmnet->tz.override != 0) {
- if (gsmnet->tz.dst)
- vty_out(vty, " timezone %d %d %d%s",
- gsmnet->tz.hr, gsmnet->tz.mn, gsmnet->tz.dst,
- VTY_NEWLINE);
- else
- vty_out(vty, " timezone %d %d%s",
- gsmnet->tz.hr, gsmnet->tz.mn, VTY_NEWLINE);
- }
- if (gsmnet->t3212 == 0)
- vty_out(vty, " no periodic location update%s", VTY_NEWLINE);
- else
- vty_out(vty, " periodic location update %u%s",
- gsmnet->t3212 * 6, VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-void msc_vty_init(struct gsm_network *msc_network)
-{
- common_cs_vty_init(msc_network, config_write_net);
-
- install_element(CONFIG_NODE, &cfg_msc_cmd);
- install_node(&msc_node, config_write_msc);
- vty_install_default(MSC_NODE);
- install_element(MSC_NODE, &cfg_msc_assign_tmsi_cmd);
- install_element(MSC_NODE, &cfg_msc_no_assign_tmsi_cmd);
- install_element(MSC_NODE, &cfg_msc_cs7_instance_a_cmd);
- install_element(MSC_NODE, &cfg_msc_cs7_instance_iu_cmd);
-
- mgcpgw_client_vty_init(msc_network, MSC_NODE, &msc_network->mgcpgw.conf);
-#ifdef BUILD_IU
- ranap_iu_vty_init(MSC_NODE, &msc_network->iu.rab_assign_addr_enc);
-#endif
-}
diff --git a/src/libmsc/osmo_msc.c b/src/libmsc/osmo_msc.c
deleted file mode 100644
index 4d24f22a6..000000000
--- a/src/libmsc/osmo_msc.c
+++ /dev/null
@@ -1,387 +0,0 @@
-/* main MSC management code... */
-
-/*
- * (C) 2010,2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010 by On-Waves
- *
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_msc.h>
-#include <openbsc/bsc_api.h>
-#include <openbsc/debug.h>
-#include <openbsc/transaction.h>
-#include <openbsc/db.h>
-#include <openbsc/vlr.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/a_iface.h>
-
-#include <openbsc/gsm_04_11.h>
-
-#include "../../bscconfig.h"
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-#else
-#include <openbsc/iu_dummy.h>
-#endif
-
-/* Receive a SAPI-N-REJECT from BSC */
-void msc_sapi_n_reject(struct gsm_subscriber_connection *conn, int dlci)
-{
- int sapi = dlci & 0x7;
-
- if (sapi == UM_SAPI_SMS)
- gsm411_sapi_n_reject(conn);
-}
-
-static void subscr_conn_bump(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return;
- if (!conn->conn_fsm)
- return;
- if (!(conn->conn_fsm->state == SUBSCR_CONN_S_ACCEPTED
- || conn->conn_fsm->state == SUBSCR_CONN_S_COMMUNICATING)) {
- DEBUGP(DMM, "%s: bump: conn still being established (%s)\n",
- vlr_subscr_name(conn->vsub),
- osmo_fsm_inst_state_name(conn->conn_fsm));
- return;
- }
- osmo_fsm_inst_dispatch(conn->conn_fsm, SUBSCR_CONN_E_BUMP, NULL);
-}
-
-/* receive a Level 3 Complete message and return MSC_CONN_ACCEPT or
- * MSC_CONN_REJECT */
-int msc_compl_l3(struct gsm_subscriber_connection *conn,
- struct msgb *msg, uint16_t chosen_channel)
-{
- msc_subscr_conn_get(conn);
- gsm0408_dispatch(conn, msg);
-
- /* Bump whether the conn wants to be closed */
- subscr_conn_bump(conn);
-
- /* If this should be kept, the conn->conn_fsm has placed a use_count */
- msc_subscr_conn_put(conn);
-
- /* Always return acceptance, because even if the conn was not accepted,
- * we assumed ownership of it and the caller shall not interfere with
- * that. We may even already have discarded the conn. */
- return MSC_CONN_ACCEPT;
-
-#if 0
- /*
- * If this is a silent call we want the channel to remain open as long as
- * possible and this is why we accept this connection regardless of any
- * pending transaction or ongoing operation.
- */
- if (conn->silent_call)
- return MSC_CONN_ACCEPT;
- if (conn->loc_operation || conn->sec_operation || conn->anch_operation)
- return MSC_CONN_ACCEPT;
- if (trans_has_conn(conn))
- return MSC_CONN_ACCEPT;
-
- LOGP(DRR, LOGL_INFO, "MSC Complete L3: Rejecting connection.\n");
- return MSC_CONN_REJECT;
-#endif
-}
-
-/* Receive a DTAP message from BSC */
-void msc_dtap(struct gsm_subscriber_connection *conn, uint8_t link_id, struct msgb *msg)
-{
- msc_subscr_conn_get(conn);
- gsm0408_dispatch(conn, msg);
-
- /* Bump whether the conn wants to be closed */
- subscr_conn_bump(conn);
- msc_subscr_conn_put(conn);
-}
-
-/* Receive an ASSIGNMENT COMPLETE from BSC */
-void msc_assign_compl(struct gsm_subscriber_connection *conn,
- uint8_t rr_cause, uint8_t chosen_channel,
- uint8_t encr_alg_id, uint8_t speec)
-{
- LOGP(DRR, LOGL_DEBUG, "MSC assign complete (do nothing).\n");
-}
-
-/* Receive an ASSIGNMENT FAILURE from BSC */
-void msc_assign_fail(struct gsm_subscriber_connection *conn,
- uint8_t cause, uint8_t *rr_cause)
-{
- LOGP(DRR, LOGL_DEBUG, "MSC assign failure (do nothing).\n");
-}
-
-/* Receive a CLASSMARK CHANGE from BSC */
-void msc_classmark_chg(struct gsm_subscriber_connection *conn,
- const uint8_t *cm2, uint8_t cm2_len,
- const uint8_t *cm3, uint8_t cm3_len)
-{
- if (cm2 && cm2_len) {
- if (cm2_len > sizeof(conn->classmark.classmark2)) {
- LOGP(DRR, LOGL_NOTICE, "%s: classmark2 is %u bytes, truncating at %zu bytes\n",
- vlr_subscr_name(conn->vsub), cm2_len, sizeof(conn->classmark.classmark2));
- cm2_len = sizeof(conn->classmark.classmark2);
- }
- conn->classmark.classmark2_len = cm2_len;
- memcpy(conn->classmark.classmark2, cm2, cm2_len);
- }
- if (cm3 && cm3_len) {
- if (cm3_len > sizeof(conn->classmark.classmark3)) {
- LOGP(DRR, LOGL_NOTICE, "%s: classmark3 is %u bytes, truncating at %zu bytes\n",
- vlr_subscr_name(conn->vsub), cm3_len, sizeof(conn->classmark.classmark3));
- cm3_len = sizeof(conn->classmark.classmark3);
- }
- conn->classmark.classmark3_len = cm3_len;
- memcpy(conn->classmark.classmark3, cm3, cm3_len);
- }
-}
-
-/* Receive a CIPHERING MODE COMPLETE from BSC */
-void msc_cipher_mode_compl(struct gsm_subscriber_connection *conn,
- struct msgb *msg, uint8_t alg_id)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh);
- struct tlv_parsed tp;
- uint8_t mi_type;
- char imeisv[GSM48_MI_SIZE] = "";
- struct vlr_ciph_result ciph_res = { .cause = VLR_CIPH_REJECT };
-
- if (!gh) {
- LOGP(DRR, LOGL_ERROR, "invalid: msgb without l3 header\n");
- return;
- }
-
- if (!conn) {
- LOGP(DRR, LOGL_ERROR,
- "invalid: rx Ciphering Mode Complete on NULL conn\n");
- return;
- }
- if (!conn->vsub) {
- LOGP(DRR, LOGL_ERROR,
- "invalid: rx Ciphering Mode Complete for NULL subscr\n");
- return;
- }
-
- DEBUGP(DRR, "%s: CIPHERING MODE COMPLETE\n",
- vlr_subscr_name(conn->vsub));
-
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
-
- /* bearer capability */
- if (TLVP_PRESENT(&tp, GSM48_IE_MOBILE_ID)) {
- mi_type = TLVP_VAL(&tp, GSM48_IE_MOBILE_ID)[0] & GSM_MI_TYPE_MASK;
- if (mi_type == GSM_MI_TYPE_IMEISV
- && TLVP_LEN(&tp, GSM48_IE_MOBILE_ID) > 0) {
- gsm48_mi_to_string(imeisv, sizeof(imeisv),
- TLVP_VAL(&tp, GSM48_IE_MOBILE_ID),
- TLVP_LEN(&tp, GSM48_IE_MOBILE_ID));
- ciph_res.imeisv = imeisv;
- }
- }
-
- ciph_res.cause = VLR_CIPH_COMPL;
- vlr_subscr_rx_ciph_res(conn->vsub, &ciph_res);
-}
-
-struct gsm_subscriber_connection *msc_subscr_con_allocate(struct gsm_network *network)
-{
- struct gsm_subscriber_connection *conn;
-
- conn = talloc_zero(network, struct gsm_subscriber_connection);
- if (!conn)
- return NULL;
-
- conn->network = network;
- llist_add_tail(&conn->entry, &network->subscr_conns);
- return conn;
-}
-
-void msc_subscr_cleanup(struct vlr_subscr *vsub)
-{
- if (!vsub)
- return;
- vsub->lu_fsm = NULL;
-}
-
-void msc_subscr_con_cleanup(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return;
-
- if (conn->vsub) {
- DEBUGP(DRLL, "subscr %s: Freeing subscriber connection\n",
- vlr_subscr_name(conn->vsub));
- msc_subscr_cleanup(conn->vsub);
- vlr_subscr_put(conn->vsub);
- conn->vsub = NULL;
- } else
- DEBUGP(DRLL, "Freeing subscriber connection"
- " with NULL subscriber\n");
-
- if (!conn->conn_fsm)
- return;
-
- osmo_fsm_inst_term(conn->conn_fsm,
- (conn->conn_fsm->state == SUBSCR_CONN_S_RELEASED)
- ? OSMO_FSM_TERM_REGULAR
- : OSMO_FSM_TERM_ERROR,
- NULL);
-}
-
-void msc_subscr_con_free(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return;
-
- msc_subscr_con_cleanup(conn);
-
- llist_del(&conn->entry);
- talloc_free(conn);
-}
-
-/* Receive a CLEAR REQUEST from BSC */
-int msc_clear_request(struct gsm_subscriber_connection *conn, uint32_t cause)
-{
- msc_subscr_conn_close(conn, cause);
- return 1;
-}
-
-/* MSC-level operations to be called by libbsc in NITB */
-static struct bsc_api msc_handler = {
- .sapi_n_reject = msc_sapi_n_reject,
- .compl_l3 = msc_compl_l3,
- .dtap = msc_dtap,
- .clear_request = msc_clear_request,
- .assign_compl = msc_assign_compl,
- .assign_fail = msc_assign_fail,
- .classmark_chg = msc_classmark_chg,
- .cipher_mode_compl = msc_cipher_mode_compl,
- .conn_cleanup = msc_subscr_con_cleanup,
-};
-
-struct bsc_api *msc_bsc_api() {
- return &msc_handler;
-}
-
-static void msc_subscr_conn_release_all(struct gsm_subscriber_connection *conn, uint32_t cause)
-{
- if (conn->in_release)
- return;
- conn->in_release = true;
-
- /* If we're closing in a middle of a trans, we need to clean up */
- trans_conn_closed(conn);
-
- switch (conn->via_ran) {
- case RAN_UTRAN_IU:
- ranap_iu_tx_release(conn->iu.ue_ctx, NULL);
- /* FIXME: keep the conn until the Iu Release Outcome is
- * received from the UE, or a timeout expires. For now, the log
- * says "unknown UE" for each release outcome. */
- break;
- case RAN_GERAN_A:
- a_iface_tx_clear_cmd(conn);
- break;
- default:
- LOGP(DMM, LOGL_ERROR, "%s: Unknown RAN type, cannot tx release/clear\n",
- vlr_subscr_name(conn->vsub));
- break;
- }
-}
-
-/* If the conn->conn_fsm is still present, dispatch SUBSCR_CONN_E_CN_CLOSE
- * event to gracefully terminate the connection. If the conn_fsm is already
- * cleared, call msc_subscr_conn_release_all() to take release actions.
- * \param cause a GSM_CAUSE_* constant, e.g. GSM_CAUSE_AUTH_FAILED.
- */
-void msc_subscr_conn_close(struct gsm_subscriber_connection *conn,
- uint32_t cause)
-{
- if (!conn)
- return;
- if (conn->in_release) {
- DEBUGP(DMM, "msc_subscr_conn_close(vsub=%s, cause=%u):"
- " already dispatching release, ignore.\n",
- vlr_subscr_name(conn->vsub), cause);
- return;
- }
- if (!conn->conn_fsm) {
- DEBUGP(DMM, "msc_subscr_conn_close(vsub=%s, cause=%u): no conn fsm,"
- " releasing directly without release event.\n",
- vlr_subscr_name(conn->vsub), cause);
- /* In case of an IMSI Detach, we don't have conn_fsm. Release
- * anyway to ensure a timely Iu Release / BSSMAP Clear. */
- msc_subscr_conn_release_all(conn, cause);
- return;
- }
- if (conn->conn_fsm->state == SUBSCR_CONN_S_RELEASED) {
- DEBUGP(DMM, "msc_subscr_conn_close(vsub=%s, cause=%u):"
- " conn fsm already releasing, ignore.\n",
- vlr_subscr_name(conn->vsub), cause);
- return;
- }
- osmo_fsm_inst_dispatch(conn->conn_fsm, SUBSCR_CONN_E_CN_CLOSE, &cause);
-}
-
-/* increment the ref-count. Needs to be called by every user */
-struct gsm_subscriber_connection *
-_msc_subscr_conn_get(struct gsm_subscriber_connection *conn,
- const char *file, int line)
-{
- OSMO_ASSERT(conn);
-
- if (conn->in_release)
- return NULL;
-
- conn->use_count++;
- LOGPSRC(DREF, LOGL_DEBUG, file, line,
- "%s: MSC conn use + 1 == %u\n",
- vlr_subscr_name(conn->vsub), conn->use_count);
-
- return conn;
-}
-
-/* decrement the ref-count. Once it reaches zero, we release */
-void _msc_subscr_conn_put(struct gsm_subscriber_connection *conn,
- const char *file, int line)
-{
- OSMO_ASSERT(conn);
-
- if (conn->use_count == 0) {
- LOGPSRC(DREF, LOGL_ERROR, file, line,
- "%s: MSC conn use - 1 failed: is already 0\n",
- vlr_subscr_name(conn->vsub));
- return;
- }
-
- conn->use_count--;
- LOGPSRC(DREF, LOGL_DEBUG, file, line,
- "%s: MSC conn use - 1 == %u\n",
- vlr_subscr_name(conn->vsub), conn->use_count);
-
- if (conn->use_count == 0)
- msc_subscr_con_free(conn);
-}
-
-void msc_stop_paging(struct vlr_subscr *vsub)
-{
- DEBUGP(DPAG, "Paging can stop for %s\n", vlr_subscr_name(vsub));
- /* tell BSCs and RNCs to stop paging? How? */
-}
diff --git a/src/libmsc/rrlp.c b/src/libmsc/rrlp.c
deleted file mode 100644
index cd3da066b..000000000
--- a/src/libmsc/rrlp.c
+++ /dev/null
@@ -1,104 +0,0 @@
-/* Radio Resource LCS (Location) Protocol, GMS TS 04.31 */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/signal.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/chan_alloc.h>
-
-/* RRLP msPositionReq, nsBased,
- * Accuracy=60, Method=gps, ResponseTime=2, oneSet */
-static const uint8_t ms_based_pos_req[] = { 0x40, 0x01, 0x78, 0xa8 };
-
-/* RRLP msPositionReq, msBasedPref,
- Accuracy=60, Method=gpsOrEOTD, ResponseTime=5, multipleSets */
-static const uint8_t ms_pref_pos_req[] = { 0x40, 0x02, 0x79, 0x50 };
-
-/* RRLP msPositionReq, msAssistedPref,
- Accuracy=60, Method=gpsOrEOTD, ResponseTime=5, multipleSets */
-static const uint8_t ass_pref_pos_req[] = { 0x40, 0x03, 0x79, 0x50 };
-
-static int send_rrlp_req(struct gsm_subscriber_connection *conn)
-{
- struct gsm_network *net = conn->network;
- const uint8_t *req;
-
- switch (net->rrlp.mode) {
- case RRLP_MODE_MS_BASED:
- req = ms_based_pos_req;
- break;
- case RRLP_MODE_MS_PREF:
- req = ms_pref_pos_req;
- break;
- case RRLP_MODE_ASS_PREF:
- req = ass_pref_pos_req;
- break;
- case RRLP_MODE_NONE:
- default:
- return 0;
- }
-
- return gsm48_send_rr_app_info(conn, 0x00,
- sizeof(ms_based_pos_req), req);
-}
-
-static int subscr_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct vlr_subscr *vsub;
- struct gsm_subscriber_connection *conn;
-
- switch (signal) {
- case S_SUBSCR_ATTACHED:
- /* A subscriber has attached. */
- vsub = signal_data;
- conn = connection_for_subscr(vsub);
- if (!conn)
- break;
- send_rrlp_req(conn);
- break;
- }
- return 0;
-}
-
-static int paging_sig_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct paging_signal_data *psig_data = signal_data;
-
- switch (signal) {
- case S_PAGING_SUCCEEDED:
- /* A subscriber has attached. */
- send_rrlp_req(psig_data->conn);
- break;
- case S_PAGING_EXPIRED:
- break;
- }
- return 0;
-}
-
-void on_dso_load_rrlp(void)
-{
- osmo_signal_register_handler(SS_SUBSCR, subscr_sig_cb, NULL);
- osmo_signal_register_handler(SS_PAGING, paging_sig_cb, NULL);
-}
diff --git a/src/libmsc/silent_call.c b/src/libmsc/silent_call.c
deleted file mode 100644
index 7af7a8055..000000000
--- a/src/libmsc/silent_call.c
+++ /dev/null
@@ -1,165 +0,0 @@
-/* GSM silent call feature */
-
-/*
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <unistd.h>
-#include <errno.h>
-
-#include <osmocom/core/msgb.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <openbsc/paging.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/osmo_msc.h>
-
-/* paging of the requested subscriber has completed */
-static int paging_cb_silent(unsigned int hooknum, unsigned int event,
- struct msgb *msg, void *_conn, void *_data)
-{
- struct gsm_subscriber_connection *conn = _conn;
- struct scall_signal_data sigdata;
- int rc = 0;
-
- if (hooknum != GSM_HOOK_RR_PAGING)
- return -EINVAL;
-
- DEBUGP(DLSMS, "paging_cb_silent: ");
-
- sigdata.conn = conn;
- sigdata.data = _data;
-
- switch (event) {
- case GSM_PAGING_SUCCEEDED:
-#if BEFORE_MSCSPLIT
- /* Re-enable this log output once we can obtain this information via
- * A-interface, see OS#2391. */
- DEBUGPC(DLSMS, "success, using Timeslot %u on ARFCN %u\n",
- conn->lchan->ts->nr, conn->lchan->ts->trx->arfcn);
-#endif
- conn->silent_call = 1;
- msc_subscr_conn_get(conn);
- /* increment lchan reference count */
- osmo_signal_dispatch(SS_SCALL, S_SCALL_SUCCESS, &sigdata);
- break;
- case GSM_PAGING_EXPIRED:
- case GSM_PAGING_BUSY:
- case GSM_PAGING_OOM:
- DEBUGP(DLSMS, "expired\n");
- osmo_signal_dispatch(SS_SCALL, S_SCALL_EXPIRED, &sigdata);
- break;
- default:
- rc = -EINVAL;
- break;
- }
-
- return rc;
-}
-
-#if 0
-/* receive a layer 3 message from a silent call */
-int silent_call_rx(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- /* FIXME: do something like sending it through a UDP port */
- LOGP(DLSMS, LOGL_NOTICE, "Discarding L3 message from a silent call.\n");
- return 0;
-}
-#endif
-
-struct msg_match {
- uint8_t pdisc;
- uint8_t msg_type;
-};
-
-/* list of messages that are handled inside OpenBSC, even in a silent call */
-static const struct msg_match silent_call_accept[] = {
- { GSM48_PDISC_MM, GSM48_MT_MM_LOC_UPD_REQUEST },
- { GSM48_PDISC_MM, GSM48_MT_MM_CM_SERV_REQ },
-};
-
-#if 0
-/* decide if we need to reroute a message as part of a silent call */
-int silent_call_reroute(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gsm48_hdr_pdisc(gh);
- uint8_t msg_type = gsm48_hdr_msg_type(gh);
- int i;
-
- /* if we're not part of a silent call, never reroute */
- if (!conn->silent_call)
- return 0;
-
- /* check if we are a special message that is handled in openbsc */
- for (i = 0; i < ARRAY_SIZE(silent_call_accept); i++) {
- if (silent_call_accept[i].pdisc == pdisc &&
- silent_call_accept[i].msg_type == msg_type)
- return 0;
- }
-
- /* otherwise, reroute */
- LOGP(DLSMS, LOGL_INFO, "Rerouting L3 message from a silent call.\n");
- return 1;
-}
-#endif
-
-
-/* initiate a silent call with a given subscriber */
-int gsm_silent_call_start(struct vlr_subscr *vsub, void *data, int type)
-{
- struct subscr_request *req;
-
- /* FIXME the VTY command allows selecting a silent call channel type.
- * This doesn't apply to the situation after MSCSPLIT with an
- * A-interface. */
- req = subscr_request_conn(vsub, paging_cb_silent, data,
- "establish silent call");
- return req != NULL;
-}
-
-/* end a silent call with a given subscriber */
-int gsm_silent_call_stop(struct vlr_subscr *vsub)
-{
- struct gsm_subscriber_connection *conn;
-
- conn = connection_for_subscr(vsub);
- if (!conn)
- return -EINVAL;
-
- /* did we actually establish a silent call for this guy? */
- if (!conn->silent_call)
- return -EINVAL;
-
-#if BEFORE_MSCSPLIT
- /* Re-enable this log output once we can obtain this information via
- * A-interface, see OS#2391. */
- DEBUGPC(DLSMS, "Stopping silent call using Timeslot %u on ARFCN %u\n",
- conn->lchan->ts->nr, conn->lchan->ts->trx->arfcn);
-#endif
-
- conn->silent_call = 0;
- msc_subscr_conn_put(conn);
-
- return 0;
-}
diff --git a/src/libmsc/smpp_openbsc.c b/src/libmsc/smpp_openbsc.c
deleted file mode 100644
index 431cb4dfd..000000000
--- a/src/libmsc/smpp_openbsc.c
+++ /dev/null
@@ -1,794 +0,0 @@
-/* OpenBSC SMPP 3.4 interface, SMSC-side implementation */
-
-/* (C) 2012-2013 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- */
-
-
-#include <stdio.h>
-#include <unistd.h>
-#include <string.h>
-#include <stdint.h>
-#include <errno.h>
-
-#include <smpp34.h>
-#include <smpp34_structs.h>
-#include <smpp34_params.h>
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-#include <osmocom/gsm/protocol/smpp34_osmocom.h>
-
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/debug.h>
-#include <openbsc/db.h>
-#include <openbsc/gsm_04_11.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/transaction.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/vlr.h>
-
-#include "smpp_smsc.h"
-
-/*! \brief find vlr_subscr for a given SMPP NPI/TON/Address */
-static struct vlr_subscr *subscr_by_dst(struct gsm_network *net,
- uint8_t npi, uint8_t ton,
- const char *addr)
-{
- struct vlr_subscr *vsub = NULL;
-
- switch (npi) {
- case NPI_Land_Mobile_E212:
- vsub = vlr_subscr_find_by_imsi(net->vlr, addr);
- break;
- case NPI_ISDN_E163_E164:
- case NPI_Private:
- vsub = vlr_subscr_find_by_msisdn(net->vlr, addr);
- break;
- default:
- LOGP(DSMPP, LOGL_NOTICE, "Unsupported NPI: %u\n", npi);
- break;
- }
-
- log_set_context(LOG_CTX_VLR_SUBSCR, vsub);
- return vsub;
-}
-
-static int smpp34_submit_tlv_msg_payload(const struct tlv_t *t,
- const struct submit_sm_t *submit,
- const uint8_t **sms_msg,
- unsigned int *sms_msg_len)
-{
- if (submit->sm_length) {
- LOGP(DLSMS, LOGL_ERROR,
- "SMPP cannot have payload in TLV _and_ in the header\n");
- return -1;
- }
- *sms_msg = t->value.octet;
- *sms_msg_len = t->length;
-
- return 0;
-}
-
-/*! \brief convert from submit_sm_t to gsm_sms */
-static int submit_to_sms(struct gsm_sms **psms, struct gsm_network *net,
- const struct submit_sm_t *submit)
-{
- const uint8_t *sms_msg = NULL;
- unsigned int sms_msg_len = 0;
- struct vlr_subscr *dest;
- uint16_t msg_ref = 0;
- struct gsm_sms *sms;
- struct tlv_t *t;
- int mode;
-
- dest = subscr_by_dst(net, submit->dest_addr_npi,
- submit->dest_addr_ton,
- (const char *)submit->destination_addr);
- if (!dest) {
- LOGP(DLSMS, LOGL_NOTICE, "SMPP SUBMIT-SM for unknown subscriber: "
- "%s (NPI=%u)\n", submit->destination_addr,
- submit->dest_addr_npi);
- return ESME_RINVDSTADR;
- }
-
- smpp34_tlv_for_each(t, submit->tlv) {
- switch (t->tag) {
- case TLVID_message_payload:
- if (smpp34_submit_tlv_msg_payload(t, submit, &sms_msg,
- &sms_msg_len) < 0) {
- vlr_subscr_put(dest);
- return ESME_ROPTPARNOTALLWD;
- }
- break;
- case TLVID_user_message_reference:
- msg_ref = t->value.val16;
- break;
- default:
- break;
- }
- }
-
- if (!sms_msg) {
- if (submit->sm_length > 0 && submit->sm_length < 255) {
- sms_msg = submit->short_message;
- sms_msg_len = submit->sm_length;
- } else {
- LOGP(DLSMS, LOGL_ERROR,
- "SMPP neither message payload nor valid sm_length.\n");
- vlr_subscr_put(dest);
- return ESME_RINVPARLEN;
- }
- }
-
- sms = sms_alloc();
- sms->source = SMS_SOURCE_SMPP;
- sms->smpp.sequence_nr = submit->sequence_number;
- sms->status_rep_req = submit->registered_delivery;
- sms->msg_ref = msg_ref;
-
- /* fill in the destination address */
- sms->receiver = dest;
- sms->dst.ton = submit->dest_addr_ton;
- sms->dst.npi = submit->dest_addr_npi;
- osmo_strlcpy(sms->dst.addr, dest->msisdn, sizeof(sms->dst.addr));
-
- /* fill in the source address */
- sms->src.ton = submit->source_addr_ton;
- sms->src.npi = submit->source_addr_npi;
- osmo_strlcpy(sms->src.addr, (char *)submit->source_addr,
- sizeof(sms->src.addr));
-
- if (submit->esm_class == SMPP34_DELIVERY_ACK)
- sms->is_report = true;
-
- if (submit->esm_class & SMPP34_UDHI_IND)
- sms->ud_hdr_ind = 1;
-
- if (submit->esm_class & SMPP34_REPLY_PATH) {
- sms->reply_path_req = 1;
-#warning Implement reply path
- }
-
- if (submit->data_coding == 0x00 || /* SMSC default */
- submit->data_coding == 0x01) { /* GSM default alphabet */
- sms->data_coding_scheme = GSM338_DCS_1111_7BIT;
- mode = MODE_7BIT;
- } else if ((submit->data_coding & 0xFC) == 0xF0) { /* 03.38 DCS default */
- /* pass DCS 1:1 through from SMPP to GSM */
- sms->data_coding_scheme = submit->data_coding;
- mode = MODE_7BIT;
- } else if (submit->data_coding == 0x02 ||
- submit->data_coding == 0x04) {
- /* 8-bit binary */
- sms->data_coding_scheme = GSM338_DCS_1111_8BIT_DATA;
- mode = MODE_8BIT;
- } else if ((submit->data_coding & 0xFC) == 0xF4) { /* 03.38 DCS 8bit */
- /* pass DCS 1:1 through from SMPP to GSM */
- sms->data_coding_scheme = submit->data_coding;
- mode = MODE_8BIT;
- } else if (submit->data_coding == 0x08) {
- /* UCS-2 */
- sms->data_coding_scheme = (2 << 2);
- mode = MODE_8BIT;
- } else {
- sms_free(sms);
- LOGP(DLSMS, LOGL_ERROR, "SMPP Unknown Data Coding 0x%02x\n",
- submit->data_coding);
- return ESME_RUNKNOWNERR;
- }
-
- if (mode == MODE_7BIT) {
- uint8_t ud_len = 0, padbits = 0;
- sms->data_coding_scheme = GSM338_DCS_1111_7BIT;
- if (sms->ud_hdr_ind) {
- ud_len = *sms_msg + 1;
- printf("copying %u bytes user data...\n", ud_len);
- memcpy(sms->user_data, sms_msg,
- OSMO_MIN(ud_len, sizeof(sms->user_data)));
- sms_msg += ud_len;
- sms_msg_len -= ud_len;
- padbits = 7 - (ud_len % 7);
- }
- gsm_septets2octets(sms->user_data+ud_len, sms_msg,
- sms_msg_len, padbits);
- sms->user_data_len = (ud_len*8 + padbits)/7 + sms_msg_len;/* SEPTETS */
- /* FIXME: sms->text */
- } else {
- memcpy(sms->user_data, sms_msg, sms_msg_len);
- sms->user_data_len = sms_msg_len;
- }
-
- *psms = sms;
- return ESME_ROK;
-}
-
-/*! \brief handle incoming libsmpp34 ssubmit_sm_t from remote ESME */
-int handle_smpp_submit(struct osmo_esme *esme, struct submit_sm_t *submit,
- struct submit_sm_resp_t *submit_r)
-{
- struct gsm_sms *sms;
- struct gsm_network *net = esme->smsc->priv;
- struct sms_signal_data sig;
- int rc = -1;
-
- rc = submit_to_sms(&sms, net, submit);
- if (rc != ESME_ROK) {
- submit_r->command_status = rc;
- return 0;
- }
- smpp_esme_get(esme);
- sms->smpp.esme = esme;
- sms->protocol_id = submit->protocol_id;
-
- switch (submit->esm_class & SMPP34_MSG_MODE_MASK) {
- case 0: /* default */
- case 1: /* datagram */
- case 3: /* store-and-forward */
- rc = db_sms_store(sms);
- sms_free(sms);
- sms = NULL;
- if (rc < 0) {
- LOGP(DLSMS, LOGL_ERROR, "SMPP SUBMIT-SM: Unable to "
- "store SMS in database\n");
- submit_r->command_status = ESME_RSYSERR;
- return 0;
- }
- strcpy((char *)submit_r->message_id, "msg_id_not_implemented");
- LOGP(DLSMS, LOGL_INFO, "SMPP SUBMIT-SM: Stored in DB\n");
-
- memset(&sig, 0, sizeof(sig));
- osmo_signal_dispatch(SS_SMS, S_SMS_SUBMITTED, &sig);
- rc = 0;
- break;
- case 2: /* forward (i.e. transaction) mode */
- LOGP(DLSMS, LOGL_DEBUG, "SMPP SUBMIT-SM: Forwarding in "
- "real time (Transaction/Forward mode)\n");
- sms->smpp.transaction_mode = 1;
- gsm411_send_sms_subscr(sms->receiver, sms);
- rc = 1; /* don't send any response yet */
- break;
- }
- return rc;
-}
-
-static void alert_all_esme(struct smsc *smsc, struct vlr_subscr *vsub,
- uint8_t smpp_avail_status)
-{
- struct osmo_esme *esme;
-
- llist_for_each_entry(esme, &smsc->esme_list, list) {
- /* we currently send an alert notification to each ESME that is
- * connected, and do not require a (non-existant) delivery
- * pending flag to be set before, FIXME: make this VTY
- * configurable */
- if (esme->acl && esme->acl->deliver_src_imsi) {
- smpp_tx_alert(esme, TON_Subscriber_Number,
- NPI_Land_Mobile_E212,
- vsub->imsi, smpp_avail_status);
- } else {
- smpp_tx_alert(esme, TON_Network_Specific,
- NPI_ISDN_E163_E164,
- vsub->msisdn, smpp_avail_status);
- }
- }
-}
-
-
-/*! \brief signal handler for status of attempted SMS deliveries */
-static int smpp_sms_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct sms_signal_data *sig_sms = signal_data;
- struct gsm_sms *sms = sig_sms->sms;
- struct smsc *smsc = handler_data;
- int rc = 0;
-
- if (!sms)
- return 0;
-
- if (sms->source != SMS_SOURCE_SMPP)
- return 0;
-
- switch (signal) {
- case S_SMS_MEM_EXCEEDED:
- /* fall-through: There is no ESME_Rxxx result code to
- * indicate a MEMORY EXCEEDED in transaction mode back
- * to the ESME */
- case S_SMS_UNKNOWN_ERROR:
- if (sms->smpp.transaction_mode) {
- /* Send back the SUBMIT-SM response with apropriate error */
- LOGP(DLSMS, LOGL_INFO, "SMPP SUBMIT-SM: Error\n");
- rc = smpp_tx_submit_r(sms->smpp.esme,
- sms->smpp.sequence_nr,
- ESME_RDELIVERYFAILURE,
- sms->smpp.msg_id);
- }
- break;
- case S_SMS_DELIVERED:
- /* SMS layer tells us the delivery has been completed */
- if (sms->smpp.transaction_mode) {
- /* Send back the SUBMIT-SM response */
- LOGP(DLSMS, LOGL_INFO, "SMPP SUBMIT-SM: Success\n");
- rc = smpp_tx_submit_r(sms->smpp.esme,
- sms->smpp.sequence_nr,
- ESME_ROK, sms->smpp.msg_id);
- }
- break;
- case S_SMS_SMMA:
- if (!sig_sms->trans || !sig_sms->trans->vsub) {
- /* SMMA without a subscriber? strange... */
- LOGP(DLSMS, LOGL_NOTICE, "SMMA without subscriber?\n");
- break;
- }
-
- /* There's no real 1:1 match for SMMA in SMPP. However,
- * an ALERT NOTIFICATION seems to be the most logical
- * choice */
- alert_all_esme(smsc, sig_sms->trans->vsub, 0);
- break;
- }
-
- return rc;
-}
-
-/*! \brief signal handler for subscriber related signals */
-static int smpp_subscr_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct vlr_subscr *vsub = signal_data;
- struct smsc *smsc = handler_data;
- uint8_t smpp_avail_status;
-
- /* determine the smpp_avail_status depending on attach/detach */
- switch (signal) {
- case S_SUBSCR_ATTACHED:
- smpp_avail_status = 0;
- break;
- case S_SUBSCR_DETACHED:
- smpp_avail_status = 2;
- break;
- default:
- return 0;
- }
-
- alert_all_esme(smsc, vsub, smpp_avail_status);
-
- return 0;
-}
-
-/* GSM 03.38 6.2.1 Character expanding (no decode!) */
-static int gsm_7bit_expand(char *text, const uint8_t *user_data, uint8_t septet_l, uint8_t ud_hdr_ind)
-{
- int i = 0;
- int shift = 0;
- uint8_t c;
-
- /* skip the user data header */
- if (ud_hdr_ind) {
- /* get user data header length + 1 (for the 'user data header length'-field) */
- shift = ((user_data[0] + 1) * 8) / 7;
- if ((((user_data[0] + 1) * 8) % 7) != 0)
- shift++;
- septet_l = septet_l - shift;
- }
-
- for (i = 0; i < septet_l; i++) {
- c =
- ((user_data[((i + shift) * 7 + 7) >> 3] <<
- (7 - (((i + shift) * 7 + 7) & 7))) |
- (user_data[((i + shift) * 7) >> 3] >>
- (((i + shift) * 7) & 7))) & 0x7f;
-
- *(text++) = c;
- }
-
- *text = '\0';
-
- return i;
-}
-
-
-/* FIXME: libsmpp34 helpers, they should be part of libsmpp34! */
-void append_tlv(tlv_t **req_tlv, uint16_t tag,
- const uint8_t *data, uint16_t len)
-{
- tlv_t tlv;
-
- memset(&tlv, 0, sizeof(tlv));
- tlv.tag = tag;
- tlv.length = len;
- memcpy(tlv.value.octet, data, tlv.length);
- build_tlv(req_tlv, &tlv);
-}
-void append_tlv_u8(tlv_t **req_tlv, uint16_t tag, uint8_t val)
-{
- tlv_t tlv;
-
- memset(&tlv, 0, sizeof(tlv));
- tlv.tag = tag;
- tlv.length = 1;
- tlv.value.val08 = val;
- build_tlv(req_tlv, &tlv);
-}
-void append_tlv_u16(tlv_t **req_tlv, uint16_t tag, uint16_t val)
-{
- tlv_t tlv;
-
- memset(&tlv, 0, sizeof(tlv));
- tlv.tag = tag;
- tlv.length = 2;
- tlv.value.val16 = val;
- build_tlv(req_tlv, &tlv);
-}
-
-#if BEFORE_MSCSPLIT
-/* We currently have no lchan information. Re-add after A-interface, see OS#2390. */
-/* Append the Osmocom vendor-specific additional TLVs to a SMPP msg */
-static void append_osmo_tlvs(tlv_t **req_tlv, const struct gsm_lchan *lchan)
-{
- int idx = calc_initial_idx(ARRAY_SIZE(lchan->meas_rep),
- lchan->meas_rep_idx, 1);
- const struct gsm_meas_rep *mr = &lchan->meas_rep[idx];
- const struct gsm_meas_rep_unidir *ul_meas = &mr->ul;
- const struct gsm_meas_rep_unidir *dl_meas = &mr->dl;
-
- /* Osmocom vendor-specific SMPP34 extensions */
- append_tlv_u16(req_tlv, TLVID_osmo_arfcn, lchan->ts->trx->arfcn);
- if (mr->flags & MEAS_REP_F_MS_L1) {
- uint8_t ms_dbm;
- append_tlv_u8(req_tlv, TLVID_osmo_ta, mr->ms_l1.ta);
- ms_dbm = ms_pwr_dbm(lchan->ts->trx->bts->band, mr->ms_l1.pwr);
- append_tlv_u8(req_tlv, TLVID_osmo_ms_l1_txpwr, ms_dbm);
- } else if (mr->flags & MEAS_REP_F_MS_TO) /* Save Timing Offset field = MS Timing Offset + 63 */
- append_tlv_u8(req_tlv, TLVID_osmo_ta, mr->ms_timing_offset + 63);
-
- append_tlv_u16(req_tlv, TLVID_osmo_rxlev_ul,
- rxlev2dbm(ul_meas->full.rx_lev));
- append_tlv_u8(req_tlv, TLVID_osmo_rxqual_ul, ul_meas->full.rx_qual);
-
- if (mr->flags & MEAS_REP_F_DL_VALID) {
- append_tlv_u16(req_tlv, TLVID_osmo_rxlev_dl,
- rxlev2dbm(dl_meas->full.rx_lev));
- append_tlv_u8(req_tlv, TLVID_osmo_rxqual_dl,
- dl_meas->full.rx_qual);
- }
-
- if (lchan->conn && lchan->conn->vsub) {
- struct vlr_subscr *vsub = lchan->conn->vsub;
- size_t imei_len = strlen(vsub->imei);
- if (imei_len)
- append_tlv(req_tlv, TLVID_osmo_imei,
- (uint8_t *)vsub->imei, imei_len+1);
- }
-}
-#endif
-
-struct {
- uint32_t smpp_status_code;
- uint8_t gsm411_cause;
-} smpp_to_gsm411_err_array[] = {
-
- /* Seems like most phones don't care about the failure cause,
- * although some will display a different notification for
- * GSM411_RP_CAUSE_MO_NUM_UNASSIGNED
- * Some provoke a display of "Try again later"
- * while others a more definitive "Message sending failed"
- */
-
- { ESME_RSYSERR, GSM411_RP_CAUSE_MO_DEST_OUT_OF_ORDER },
- { ESME_RINVDSTADR, GSM411_RP_CAUSE_MO_NUM_UNASSIGNED },
- { ESME_RMSGQFUL, GSM411_RP_CAUSE_MO_CONGESTION },
- { ESME_RINVSRCADR, GSM411_RP_CAUSE_MO_SMS_REJECTED },
- { ESME_RINVMSGID, GSM411_RP_CAUSE_INV_TRANS_REF }
-};
-
-static int smpp_to_gsm411_err(uint32_t smpp_status_code, int *gsm411_cause)
-{
- int i;
- for (i = 0; i < ARRAY_SIZE(smpp_to_gsm411_err_array); i++) {
- if (smpp_to_gsm411_err_array[i].smpp_status_code != smpp_status_code)
- continue;
- *gsm411_cause = smpp_to_gsm411_err_array[i].gsm411_cause;
- return 0;
- }
- return -1;
-}
-
-static void smpp_cmd_free(struct osmo_smpp_cmd *cmd)
-{
- osmo_timer_del(&cmd->response_timer);
- llist_del(&cmd->list);
- vlr_subscr_put(cmd->vsub);
- talloc_free(cmd);
-}
-
-void smpp_cmd_flush_pending(struct osmo_esme *esme)
-{
- struct osmo_smpp_cmd *cmd, *next;
-
- llist_for_each_entry_safe(cmd, next, &esme->smpp_cmd_list, list)
- smpp_cmd_free(cmd);
-}
-
-void smpp_cmd_ack(struct osmo_smpp_cmd *cmd)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_trans *trans;
-
- if (cmd->is_report)
- goto out;
-
- conn = connection_for_subscr(cmd->vsub);
- if (!conn) {
- LOGP(DSMPP, LOGL_ERROR, "No connection to subscriber anymore\n");
- goto out;
- }
-
- trans = trans_find_by_id(conn, GSM48_PDISC_SMS, cmd->gsm411_trans_id);
- if (!trans) {
- LOGP(DSMPP, LOGL_ERROR, "GSM transaction %u is gone\n",
- cmd->gsm411_trans_id);
- goto out;
- }
-
- gsm411_send_rp_ack(trans, cmd->gsm411_msg_ref);
-out:
- smpp_cmd_free(cmd);
-}
-
-void smpp_cmd_err(struct osmo_smpp_cmd *cmd, uint32_t status)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_trans *trans;
- int gsm411_cause;
-
- if (cmd->is_report)
- goto out;
-
- conn = connection_for_subscr(cmd->vsub);
- if (!conn) {
- LOGP(DSMPP, LOGL_ERROR, "No connection to subscriber anymore\n");
- goto out;
- }
-
- trans = trans_find_by_id(conn, GSM48_PDISC_SMS, cmd->gsm411_trans_id);
- if (!trans) {
- LOGP(DSMPP, LOGL_ERROR, "GSM transaction %u is gone\n",
- cmd->gsm411_trans_id);
- goto out;
- }
-
- if (smpp_to_gsm411_err(status, &gsm411_cause) < 0)
- gsm411_cause = GSM411_RP_CAUSE_MO_NET_OUT_OF_ORDER;
-
- gsm411_send_rp_error(trans, cmd->gsm411_msg_ref, gsm411_cause);
-out:
- smpp_cmd_free(cmd);
-}
-
-static void smpp_deliver_sm_cb(void *data)
-{
- smpp_cmd_err(data, ESME_RSYSERR);
-}
-
-static int smpp_cmd_enqueue(struct osmo_esme *esme,
- struct vlr_subscr *vsub, struct gsm_sms *sms,
- uint32_t sequence_number)
-{
- struct osmo_smpp_cmd *cmd;
-
- cmd = talloc_zero(esme, struct osmo_smpp_cmd);
- if (!cmd)
- return -1;
-
- cmd->sequence_nr = sequence_number;
- cmd->is_report = sms->is_report;
- cmd->gsm411_msg_ref = sms->gsm411.msg_ref;
- cmd->gsm411_trans_id = sms->gsm411.transaction_id;
- cmd->vsub = vlr_subscr_get(vsub);
-
- /* FIXME: No predefined value for this response_timer as specified by
- * SMPP 3.4 specs, section 7.2. Make this configurable? Don't forget
- * lchan keeps busy until we get a reply to this SMPP command. Too high
- * value may exhaust resources.
- */
- osmo_timer_setup(&cmd->response_timer, smpp_deliver_sm_cb, cmd);
- osmo_timer_schedule(&cmd->response_timer, 5, 0);
- llist_add_tail(&cmd->list, &esme->smpp_cmd_list);
-
- return 0;
-}
-
-struct osmo_smpp_cmd *smpp_cmd_find_by_seqnum(struct osmo_esme *esme,
- uint32_t sequence_nr)
-{
- struct osmo_smpp_cmd *cmd;
-
- llist_for_each_entry(cmd, &esme->smpp_cmd_list, list) {
- if (cmd->sequence_nr == sequence_nr)
- return cmd;
- }
- return NULL;
-}
-
-static int deliver_to_esme(struct osmo_esme *esme, struct gsm_sms *sms,
- struct gsm_subscriber_connection *conn)
-{
- struct deliver_sm_t deliver;
- int mode, ret;
- uint8_t dcs;
-
- memset(&deliver, 0, sizeof(deliver));
- deliver.command_length = 0;
- deliver.command_id = DELIVER_SM;
- deliver.command_status = ESME_ROK;
-
- strcpy((char *)deliver.service_type, "CMT");
- if (esme->acl && esme->acl->deliver_src_imsi) {
- deliver.source_addr_ton = TON_Subscriber_Number;
- deliver.source_addr_npi = NPI_Land_Mobile_E212;
- snprintf((char *)deliver.source_addr,
- sizeof(deliver.source_addr), "%s",
- conn->vsub->imsi);
- } else {
- deliver.source_addr_ton = TON_Network_Specific;
- deliver.source_addr_npi = NPI_ISDN_E163_E164;
- snprintf((char *)deliver.source_addr,
- sizeof(deliver.source_addr), "%s",
- conn->vsub->msisdn);
- }
-
- deliver.dest_addr_ton = sms->dst.ton;
- deliver.dest_addr_npi = sms->dst.npi;
- memcpy(deliver.destination_addr, sms->dst.addr,
- sizeof(deliver.destination_addr));
-
- if (sms->is_report)
- deliver.esm_class = SMPP34_DELIVERY_RECEIPT;
- else
- deliver.esm_class = SMPP34_DATAGRAM_MODE;
-
- if (sms->ud_hdr_ind)
- deliver.esm_class |= SMPP34_UDHI_IND;
- if (sms->reply_path_req)
- deliver.esm_class |= SMPP34_REPLY_PATH;
-
- deliver.protocol_id = sms->protocol_id;
- deliver.priority_flag = 0;
- if (sms->status_rep_req)
- deliver.registered_delivery = SMPP34_DELIVERY_RECEIPT_ON;
-
- /* Figure out SMPP DCS from TP-DCS */
- dcs = sms->data_coding_scheme;
- if (smpp_determine_scheme(dcs, &deliver.data_coding, &mode) == -1)
- return -1;
-
- /* Transparently pass on DCS via SMPP if requested */
- if (esme->acl && esme->acl->dcs_transparent)
- deliver.data_coding = dcs;
-
- if (mode == MODE_7BIT) {
- uint8_t *dst = deliver.short_message;
-
- /* SMPP has this strange notion of putting 7bit SMS in
- * an octet-aligned mode */
- if (sms->ud_hdr_ind) {
- /* length (bytes) of UDH inside UD */
- uint8_t udh_len = sms->user_data[0] + 1;
-
- /* copy over the UDH */
- memcpy(dst, sms->user_data, udh_len);
- dst += udh_len;
- deliver.sm_length = udh_len;
- }
- /* add decoded text */
- deliver.sm_length += gsm_7bit_expand((char *)dst, sms->user_data, sms->user_data_len, sms->ud_hdr_ind);
- } else {
- deliver.sm_length = sms->user_data_len;
- memcpy(deliver.short_message, sms->user_data, deliver.sm_length);
- }
-
-#if BEFORE_MSCSPLIT
- /* We currently have no lchan information. Re-add after A-interface, see OS#2390. */
- if (esme->acl && esme->acl->osmocom_ext && conn->lchan)
- append_osmo_tlvs(&deliver.tlv, conn->lchan);
-#endif
-
- append_tlv_u16(&deliver.tlv, TLVID_user_message_reference,
- sms->msg_ref);
-
- ret = smpp_tx_deliver(esme, &deliver);
- if (ret < 0)
- return ret;
-
- return smpp_cmd_enqueue(esme, conn->vsub, sms,
- deliver.sequence_number);
-}
-
-static struct smsc *g_smsc;
-
-int smpp_route_smpp_first(struct gsm_sms *sms, struct gsm_subscriber_connection *conn)
-{
- return g_smsc->smpp_first;
-}
-
-int smpp_try_deliver(struct gsm_sms *sms,
- struct gsm_subscriber_connection *conn)
-{
- struct osmo_esme *esme;
- struct osmo_smpp_addr dst;
- int rc;
-
- memset(&dst, 0, sizeof(dst));
- dst.ton = sms->dst.ton;
- dst.npi = sms->dst.npi;
- memcpy(dst.addr, sms->dst.addr, sizeof(dst.addr));
-
- rc = smpp_route(g_smsc, &dst, &esme);
- if (!rc)
- rc = deliver_to_esme(esme, sms, conn);
-
- return rc;
-}
-
-struct smsc *smsc_from_vty(struct vty *v)
-{
- /* FIXME: this is ugly */
- return g_smsc;
-}
-
-/*! \brief Allocate the OpenBSC SMPP interface struct and init VTY. */
-int smpp_openbsc_alloc_init(void *ctx)
-{
- g_smsc = smpp_smsc_alloc_init(ctx);
- if (!g_smsc) {
- LOGP(DSMPP, LOGL_FATAL, "Cannot allocate smsc struct\n");
- return -1;
- }
- return smpp_vty_init();
-}
-
-/*! \brief Launch the OpenBSC SMPP interface with the parameters set from VTY.
- */
-int smpp_openbsc_start(struct gsm_network *net)
-{
- int rc;
- g_smsc->priv = net;
-
- /* If a VTY configuration has taken place, the values have been stored
- * in the smsc struct. Otherwise, use the defaults (NULL -> any, 0 ->
- * default SMPP port, see smpp_smsc_bind()). */
- rc = smpp_smsc_start(g_smsc, g_smsc->bind_addr, g_smsc->listen_port);
- if (rc < 0)
- return rc;
-
- rc = osmo_signal_register_handler(SS_SMS, smpp_sms_cb, g_smsc);
- if (rc < 0)
- return rc;
- rc = osmo_signal_register_handler(SS_SUBSCR, smpp_subscr_cb, g_smsc);
- if (rc < 0)
- return rc;
-
- return 0;
-}
-
diff --git a/src/libmsc/smpp_smsc.c b/src/libmsc/smpp_smsc.c
deleted file mode 100644
index 04afc49bb..000000000
--- a/src/libmsc/smpp_smsc.c
+++ /dev/null
@@ -1,1037 +0,0 @@
-/* SMPP 3.4 interface, SMSC-side implementation */
-/* (C) 2012 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- */
-
-
-#include <stdio.h>
-#include <unistd.h>
-#include <string.h>
-#include <stdint.h>
-#include <errno.h>
-#include <limits.h>
-
-#include <sys/socket.h>
-#include <netinet/in.h>
-
-#include <smpp34.h>
-#include <smpp34_structs.h>
-#include <smpp34_params.h>
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/socket.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/core/write_queue.h>
-#include <osmocom/core/talloc.h>
-
-#include "smpp_smsc.h"
-
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-
-/*! \brief Ugly wrapper. libsmpp34 should do this itself! */
-#define SMPP34_UNPACK(rc, type, str, data, len) \
- memset(str, 0, sizeof(*str)); \
- rc = smpp34_unpack(type, str, data, len)
-
-enum emse_bind {
- ESME_BIND_RX = 0x01,
- ESME_BIND_TX = 0x02,
-};
-
-const struct value_string smpp_status_strs[] = {
- { ESME_ROK, "No Error" },
- { ESME_RINVMSGLEN, "Message Length is invalid" },
- { ESME_RINVCMDLEN, "Command Length is invalid" },
- { ESME_RINVCMDID, "Invalid Command ID" },
- { ESME_RINVBNDSTS, "Incorrect BIND Status for given command" },
- { ESME_RALYBND, "ESME Already in Bound State" },
- { ESME_RINVPRTFLG, "Invalid Priority Flag" },
- { ESME_RINVREGDLVFLG, "Invalid Registered Delivery Flag" },
- { ESME_RSYSERR, "System Error" },
- { ESME_RINVSRCADR, "Invalid Source Address" },
- { ESME_RINVDSTADR, "Invalid Destination Address" },
- { ESME_RINVMSGID, "Message ID is invalid" },
- { ESME_RBINDFAIL, "Bind failed" },
- { ESME_RINVPASWD, "Invalid Password" },
- { ESME_RINVSYSID, "Invalid System ID" },
- { ESME_RCANCELFAIL, "Cancel SM Failed" },
- { ESME_RREPLACEFAIL, "Replace SM Failed" },
- { ESME_RMSGQFUL, "Message Queue Full" },
- { ESME_RINVSERTYP, "Invalid Service Type" },
- { ESME_RINVNUMDESTS, "Invalid number of destinations" },
- { ESME_RINVDLNAME, "Invalid Distribution List name" },
- { ESME_RINVDESTFLAG, "Destination flag is invalid" },
- { ESME_RINVSUBREP, "Invalid submit with replace request" },
- { ESME_RINVESMCLASS, "Invalid esm_class field data" },
- { ESME_RCNTSUBDL, "Cannot Submit to Distribution List" },
- { ESME_RSUBMITFAIL, "submit_sm or submit_multi failed" },
- { ESME_RINVSRCTON, "Invalid Source address TON" },
- { ESME_RINVSRCNPI, "Invalid Sourec address NPI" },
- { ESME_RINVDSTTON, "Invalid Destination address TON" },
- { ESME_RINVDSTNPI, "Invalid Desetination address NPI" },
- { ESME_RINVSYSTYP, "Invalid system_type field" },
- { ESME_RINVREPFLAG, "Invalid replace_if_present field" },
- { ESME_RINVNUMMSGS, "Invalid number of messages" },
- { ESME_RTHROTTLED, "Throttling error (ESME has exceeded message limits)" },
- { ESME_RINVSCHED, "Invalid Scheduled Delivery Time" },
- { ESME_RINVEXPIRY, "Invalid message validity period (Expiry time)" },
- { ESME_RINVDFTMSGID, "Predefined Message Invalid or Not Found" },
- { ESME_RX_T_APPN, "ESME Receiver Temporary App Error Code" },
- { ESME_RX_P_APPN, "ESME Receiver Permanent App Error Code" },
- { ESME_RX_R_APPN, "ESME Receiver Reject Message Error Code" },
- { ESME_RQUERYFAIL, "query_sm request failed" },
- { ESME_RINVOPTPARSTREAM,"Error in the optional part of the PDU Body" },
- { ESME_ROPTPARNOTALLWD, "Optional Parameter not allowed" },
- { ESME_RINVPARLEN, "Invalid Parameter Length" },
- { ESME_RMISSINGOPTPARAM,"Expected Optional Parameter missing" },
- { ESME_RINVOPTPARAMVAL, "Invalid Optional Parameter Value" },
- { ESME_RDELIVERYFAILURE,"Delivery Failure (used for data_sm_resp)" },
- { ESME_RUNKNOWNERR, "Unknown Error" },
- { 0, NULL }
-};
-
-/*! \brief compare if two SMPP addresses are equal */
-int smpp_addr_eq(const struct osmo_smpp_addr *a,
- const struct osmo_smpp_addr *b)
-{
- if (a->ton == b->ton &&
- a->npi == b->npi &&
- !strcmp(a->addr, b->addr))
- return 1;
-
- return 0;
-}
-
-
-struct osmo_smpp_acl *smpp_acl_by_system_id(struct smsc *smsc,
- const char *sys_id)
-{
- struct osmo_smpp_acl *acl;
-
- llist_for_each_entry(acl, &smsc->acl_list, list) {
- if (!strcmp(acl->system_id, sys_id))
- return acl;
- }
-
- return NULL;
-}
-
-struct osmo_smpp_acl *smpp_acl_alloc(struct smsc *smsc, const char *sys_id)
-{
- struct osmo_smpp_acl *acl;
-
- if (strlen(sys_id) > SMPP_SYS_ID_LEN)
- return NULL;
-
- if (smpp_acl_by_system_id(smsc, sys_id))
- return NULL;
-
- acl = talloc_zero(smsc, struct osmo_smpp_acl);
- if (!acl)
- return NULL;
-
- acl->smsc = smsc;
- strcpy(acl->system_id, sys_id);
- INIT_LLIST_HEAD(&acl->route_list);
-
- llist_add_tail(&acl->list, &smsc->acl_list);
-
- return acl;
-}
-
-void smpp_acl_delete(struct osmo_smpp_acl *acl)
-{
- struct osmo_smpp_route *r, *r2;
-
- llist_del(&acl->list);
-
- /* kill any active ESMEs */
- if (acl->esme) {
- struct osmo_esme *esme = acl->esme;
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- esme->wqueue.bfd.fd = -1;
- esme->acl = NULL;
- smpp_esme_put(esme);
- }
-
- /* delete all routes for this ACL */
- llist_for_each_entry_safe(r, r2, &acl->route_list, list) {
- llist_del(&r->list);
- llist_del(&r->global_list);
- talloc_free(r);
- }
-
- talloc_free(acl);
-}
-
-static struct osmo_smpp_route *route_alloc(struct osmo_smpp_acl *acl)
-{
- struct osmo_smpp_route *r;
-
- r = talloc_zero(acl, struct osmo_smpp_route);
- if (!r)
- return NULL;
-
- llist_add_tail(&r->list, &acl->route_list);
- llist_add_tail(&r->global_list, &acl->smsc->route_list);
-
- return r;
-}
-
-int smpp_route_pfx_add(struct osmo_smpp_acl *acl,
- const struct osmo_smpp_addr *pfx)
-{
- struct osmo_smpp_route *r;
-
- llist_for_each_entry(r, &acl->route_list, list) {
- if (r->type == SMPP_ROUTE_PREFIX &&
- smpp_addr_eq(&r->u.prefix, pfx))
- return -EEXIST;
- }
-
- r = route_alloc(acl);
- if (!r)
- return -ENOMEM;
- r->type = SMPP_ROUTE_PREFIX;
- r->acl = acl;
- memcpy(&r->u.prefix, pfx, sizeof(r->u.prefix));
-
- return 0;
-}
-
-int smpp_route_pfx_del(struct osmo_smpp_acl *acl,
- const struct osmo_smpp_addr *pfx)
-{
- struct osmo_smpp_route *r, *r2;
-
- llist_for_each_entry_safe(r, r2, &acl->route_list, list) {
- if (r->type == SMPP_ROUTE_PREFIX &&
- smpp_addr_eq(&r->u.prefix, pfx)) {
- llist_del(&r->list);
- talloc_free(r);
- return 0;
- }
- }
-
- return -ENODEV;
-}
-
-
-/*! \brief increaes the use/reference count */
-void smpp_esme_get(struct osmo_esme *esme)
-{
- esme->use++;
-}
-
-static void esme_destroy(struct osmo_esme *esme)
-{
- osmo_wqueue_clear(&esme->wqueue);
- if (esme->wqueue.bfd.fd >= 0) {
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- }
- smpp_cmd_flush_pending(esme);
- llist_del(&esme->list);
- talloc_free(esme);
-}
-
-static uint32_t esme_inc_seq_nr(struct osmo_esme *esme)
-{
- esme->own_seq_nr++;
- if (esme->own_seq_nr > 0x7fffffff)
- esme->own_seq_nr = 1;
-
- return esme->own_seq_nr;
-}
-
-/*! \brief decrease the use/reference count, free if it is 0 */
-void smpp_esme_put(struct osmo_esme *esme)
-{
- esme->use--;
- if (esme->use <= 0)
- esme_destroy(esme);
-}
-
-/*! \brief try to find a SMPP route (ESME) for given destination */
-int smpp_route(const struct smsc *smsc, const struct osmo_smpp_addr *dest, struct osmo_esme **pesme)
-{
- struct osmo_smpp_route *r;
- struct osmo_smpp_acl *acl = NULL;
-
- DEBUGP(DSMPP, "Looking up route for (%u/%u/%s)\n",
- dest->ton, dest->npi, dest->addr);
-
- /* search for a specific route */
- llist_for_each_entry(r, &smsc->route_list, global_list) {
- switch (r->type) {
- case SMPP_ROUTE_PREFIX:
- DEBUGP(DSMPP, "Checking prefix route (%u/%u/%s)->%s\n",
- r->u.prefix.ton, r->u.prefix.npi, r->u.prefix.addr,
- r->acl->system_id);
- if (r->u.prefix.ton == dest->ton &&
- r->u.prefix.npi == dest->npi &&
- !strncmp(r->u.prefix.addr, dest->addr,
- strlen(r->u.prefix.addr))) {
- DEBUGP(DSMPP, "Found prefix route ACL\n");
- acl = r->acl;
- }
- break;
- default:
- break;
- }
-
- if (acl)
- break;
- }
-
- if (!acl) {
- /* check for default route */
- if (smsc->def_route) {
- DEBUGP(DSMPP, "Using existing default route\n");
- acl = smsc->def_route;
- }
- }
-
- if (acl && acl->esme) {
- struct osmo_esme *esme;
- DEBUGP(DSMPP, "ACL even has ESME, we can route to it!\n");
- esme = acl->esme;
- if (esme->bind_flags & ESME_BIND_RX) {
- *pesme = esme;
- return 0;
- } else
- LOGP(DSMPP, LOGL_NOTICE, "[%s] is matching route, "
- "but not bound for Rx, discarding MO SMS\n",
- esme->system_id);
- }
-
- *pesme = NULL;
- if (acl)
- return GSM48_CC_CAUSE_NETWORK_OOO;
- else
- return GSM48_CC_CAUSE_UNASSIGNED_NR;
-}
-
-
-/*! \brief initialize the libsmpp34 data structure for a response */
-#define INIT_RESP(type, resp, req) { \
- memset((resp), 0, sizeof(*(resp))); \
- (resp)->command_length = 0; \
- (resp)->command_id = type; \
- (resp)->command_status = ESME_ROK; \
- (resp)->sequence_number = (req)->sequence_number; \
-}
-
-/*! \brief pack a libsmpp34 data strcutrure and send it to the ESME */
-#define PACK_AND_SEND(esme, ptr) pack_and_send(esme, (ptr)->command_id, ptr)
-static int pack_and_send(struct osmo_esme *esme, uint32_t type, void *ptr)
-{
- struct msgb *msg = msgb_alloc(4096, "SMPP_Tx");
- int rc, rlen;
- if (!msg)
- return -ENOMEM;
-
- rc = smpp34_pack(type, msg->tail, msgb_tailroom(msg), &rlen, ptr);
- if (rc != 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error during smpp34_pack(): %s\n",
- esme->system_id, smpp34_strerror);
- msgb_free(msg);
- return -EINVAL;
- }
- msgb_put(msg, rlen);
-
- if (osmo_wqueue_enqueue(&esme->wqueue, msg) != 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Write queue full. Dropping message\n",
- esme->system_id);
- msgb_free(msg);
- return -EAGAIN;
- }
- return 0;
-}
-
-/*! \brief transmit a generic NACK to a remote ESME */
-static int smpp_tx_gen_nack(struct osmo_esme *esme, uint32_t seq, uint32_t status)
-{
- struct generic_nack_t nack;
- char buf[SMALL_BUFF];
-
- nack.command_length = 0;
- nack.command_id = GENERIC_NACK;
- nack.sequence_number = seq;
- nack.command_status = status;
-
- LOGP(DSMPP, LOGL_ERROR, "[%s] Tx GENERIC NACK: %s\n",
- esme->system_id, str_command_status(status, buf));
-
- return PACK_AND_SEND(esme, &nack);
-}
-
-/*! \brief retrieve SMPP command ID from a msgb */
-static inline uint32_t smpp_msgb_cmdid(struct msgb *msg)
-{
- uint8_t *tmp = msgb_data(msg) + 4;
- return ntohl(*(uint32_t *)tmp);
-}
-
-/*! \brief retrieve SMPP sequence number from a msgb */
-static inline uint32_t smpp_msgb_seq(struct msgb *msg)
-{
- uint8_t *tmp = msgb_data(msg);
- return ntohl(*(uint32_t *)tmp);
-}
-
-/*! \brief handle an incoming SMPP generic NACK */
-static int smpp_handle_gen_nack(struct osmo_esme *esme, struct msgb *msg)
-{
- struct generic_nack_t nack;
- char buf[SMALL_BUFF];
- int rc;
-
- SMPP34_UNPACK(rc, GENERIC_NACK, &nack, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- LOGP(DSMPP, LOGL_ERROR, "[%s] Rx GENERIC NACK: %s\n",
- esme->system_id, str_command_status(nack.command_status, buf));
-
- return 0;
-}
-
-static int _process_bind(struct osmo_esme *esme, uint8_t if_version,
- uint32_t bind_flags, const char *sys_id,
- const char *passwd)
-{
- struct osmo_smpp_acl *acl;
-
- if (if_version != SMPP_VERSION)
- return ESME_RSYSERR;
-
- if (esme->bind_flags)
- return ESME_RALYBND;
-
- esme->smpp_version = if_version;
- snprintf(esme->system_id, sizeof(esme->system_id), "%s", sys_id);
-
- acl = smpp_acl_by_system_id(esme->smsc, esme->system_id);
- if (!esme->smsc->accept_all) {
- if (!acl) {
- /* This system is unknown */
- return ESME_RINVSYSID;
- } else {
- if (strlen(acl->passwd) &&
- strcmp(acl->passwd, passwd)) {
- return ESME_RINVPASWD;
- }
- }
- }
- if (acl) {
- esme->acl = acl;
- acl->esme = esme;
- }
-
- esme->bind_flags = bind_flags;
-
- return ESME_ROK;
-}
-
-
-/*! \brief handle an incoming SMPP BIND RECEIVER */
-static int smpp_handle_bind_rx(struct osmo_esme *esme, struct msgb *msg)
-{
- struct bind_receiver_t bind;
- struct bind_receiver_resp_t bind_r;
- int rc;
-
- SMPP34_UNPACK(rc, BIND_RECEIVER, &bind, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- INIT_RESP(BIND_TRANSMITTER_RESP, &bind_r, &bind);
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx BIND Rx from (Version %02x)\n",
- bind.system_id, bind.interface_version);
-
- rc = _process_bind(esme, bind.interface_version, ESME_BIND_RX,
- (const char *)bind.system_id, (const char *)bind.password);
- bind_r.command_status = rc;
-
- return PACK_AND_SEND(esme, &bind_r);
-}
-
-/*! \brief handle an incoming SMPP BIND TRANSMITTER */
-static int smpp_handle_bind_tx(struct osmo_esme *esme, struct msgb *msg)
-{
- struct bind_transmitter_t bind;
- struct bind_transmitter_resp_t bind_r;
- struct tlv_t tlv;
- int rc;
-
- SMPP34_UNPACK(rc, BIND_TRANSMITTER, &bind, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- INIT_RESP(BIND_TRANSMITTER_RESP, &bind_r, &bind);
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx BIND Tx (Version %02x)\n",
- bind.system_id, bind.interface_version);
-
- rc = _process_bind(esme, bind.interface_version, ESME_BIND_TX,
- (const char *)bind.system_id, (const char *)bind.password);
- bind_r.command_status = rc;
-
- /* build response */
- snprintf((char *)bind_r.system_id, sizeof(bind_r.system_id), "%s",
- esme->smsc->system_id);
-
- /* add interface version TLV */
- tlv.tag = TLVID_sc_interface_version;
- tlv.length = sizeof(uint8_t);
- tlv.value.val16 = esme->smpp_version;
- build_tlv(&bind_r.tlv, &tlv);
-
- return PACK_AND_SEND(esme, &bind_r);
-}
-
-/*! \brief handle an incoming SMPP BIND TRANSCEIVER */
-static int smpp_handle_bind_trx(struct osmo_esme *esme, struct msgb *msg)
-{
- struct bind_transceiver_t bind;
- struct bind_transceiver_resp_t bind_r;
- int rc;
-
- SMPP34_UNPACK(rc, BIND_TRANSCEIVER, &bind, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- INIT_RESP(BIND_TRANSCEIVER_RESP, &bind_r, &bind);
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx BIND Trx (Version %02x)\n",
- bind.system_id, bind.interface_version);
-
- rc = _process_bind(esme, bind.interface_version, ESME_BIND_RX|ESME_BIND_TX,
- (const char *)bind.system_id, (const char *)bind.password);
- bind_r.command_status = rc;
-
- return PACK_AND_SEND(esme, &bind_r);
-}
-
-/*! \brief handle an incoming SMPP UNBIND */
-static int smpp_handle_unbind(struct osmo_esme *esme, struct msgb *msg)
-{
- struct unbind_t unbind;
- struct unbind_resp_t unbind_r;
- int rc;
-
- SMPP34_UNPACK(rc, UNBIND, &unbind, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- INIT_RESP(UNBIND_RESP, &unbind_r, &unbind);
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx UNBIND\n", esme->system_id);
-
- if (esme->bind_flags == 0) {
- unbind_r.command_status = ESME_RINVBNDSTS;
- goto err;
- }
-
- esme->bind_flags = 0;
-err:
- return PACK_AND_SEND(esme, &unbind_r);
-}
-
-/*! \brief handle an incoming SMPP ENQUIRE LINK */
-static int smpp_handle_enq_link(struct osmo_esme *esme, struct msgb *msg)
-{
- struct enquire_link_t enq;
- struct enquire_link_resp_t enq_r;
- int rc;
-
- SMPP34_UNPACK(rc, ENQUIRE_LINK, &enq, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- LOGP(DSMPP, LOGL_DEBUG, "[%s] Rx Enquire Link\n", esme->system_id);
-
- INIT_RESP(ENQUIRE_LINK_RESP, &enq_r, &enq);
-
- LOGP(DSMPP, LOGL_DEBUG, "[%s] Tx Enquire Link Response\n", esme->system_id);
-
- return PACK_AND_SEND(esme, &enq_r);
-}
-
-/*! \brief send a SUBMIT-SM RESPONSE to a remote ESME */
-int smpp_tx_submit_r(struct osmo_esme *esme, uint32_t sequence_nr,
- uint32_t command_status, char *msg_id)
-{
- struct submit_sm_resp_t submit_r;
-
- memset(&submit_r, 0, sizeof(submit_r));
- submit_r.command_length = 0;
- submit_r.command_id = SUBMIT_SM_RESP;
- submit_r.command_status = command_status;
- submit_r.sequence_number= sequence_nr;
- snprintf((char *) submit_r.message_id, sizeof(submit_r.message_id), "%s", msg_id);
-
- return PACK_AND_SEND(esme, &submit_r);
-}
-
-static const struct value_string smpp_avail_strs[] = {
- { 0, "Available" },
- { 1, "Denied" },
- { 2, "Unavailable" },
- { 0, NULL }
-};
-
-/*! \brief send an ALERT_NOTIFICATION to a remote ESME */
-int smpp_tx_alert(struct osmo_esme *esme, uint8_t ton, uint8_t npi,
- const char *addr, uint8_t avail_status)
-{
- struct alert_notification_t alert;
- struct tlv_t tlv;
-
- memset(&alert, 0, sizeof(alert));
- alert.command_length = 0;
- alert.command_id = ALERT_NOTIFICATION;
- alert.command_status = ESME_ROK;
- alert.sequence_number = esme_inc_seq_nr(esme);
- alert.source_addr_ton = ton;
- alert.source_addr_npi = npi;
- snprintf((char *)alert.source_addr, sizeof(alert.source_addr), "%s", addr);
-
- tlv.tag = TLVID_ms_availability_status;
- tlv.length = sizeof(uint8_t);
- tlv.value.val08 = avail_status;
- build_tlv(&alert.tlv, &tlv);
-
- LOGP(DSMPP, LOGL_DEBUG, "[%s] Tx ALERT_NOTIFICATION (%s/%u/%u): %s\n",
- esme->system_id, alert.source_addr, alert.source_addr_ton,
- alert.source_addr_npi,
- get_value_string(smpp_avail_strs, avail_status));
-
- return PACK_AND_SEND(esme, &alert);
-}
-
-/* \brief send a DELIVER-SM message to given ESME */
-int smpp_tx_deliver(struct osmo_esme *esme, struct deliver_sm_t *deliver)
-{
- deliver->sequence_number = esme_inc_seq_nr(esme);
-
- LOGP(DSMPP, LOGL_DEBUG, "[%s] Tx DELIVER-SM (from %s)\n",
- esme->system_id, deliver->source_addr);
-
- return PACK_AND_SEND(esme, deliver);
-}
-
-/*! \brief handle an incoming SMPP DELIVER-SM RESPONSE */
-static int smpp_handle_deliver_resp(struct osmo_esme *esme, struct msgb *msg)
-{
- struct deliver_sm_resp_t deliver_r;
- struct osmo_smpp_cmd *cmd;
- int rc;
-
- memset(&deliver_r, 0, sizeof(deliver_r));
- SMPP34_UNPACK(rc, DELIVER_SM_RESP, &deliver_r, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- cmd = smpp_cmd_find_by_seqnum(esme, deliver_r.sequence_number);
- if (!cmd) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Rx DELIVER-SM RESP !? (%s)\n",
- esme->system_id, get_value_string(smpp_status_strs,
- deliver_r.command_status));
- return -1;
- }
-
- if (deliver_r.command_status == ESME_ROK)
- smpp_cmd_ack(cmd);
- else
- smpp_cmd_err(cmd, deliver_r.command_status);
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx DELIVER-SM RESP (%s)\n",
- esme->system_id, get_value_string(smpp_status_strs,
- deliver_r.command_status));
-
- return 0;
-}
-
-/*! \brief handle an incoming SMPP SUBMIT-SM */
-static int smpp_handle_submit(struct osmo_esme *esme, struct msgb *msg)
-{
- struct submit_sm_t submit;
- struct submit_sm_resp_t submit_r;
- int rc;
-
- memset(&submit, 0, sizeof(submit));
- SMPP34_UNPACK(rc, SUBMIT_SM, &submit, msgb_data(msg),
- msgb_length(msg));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error in smpp34_unpack():%s\n",
- esme->system_id, smpp34_strerror);
- return rc;
- }
-
- INIT_RESP(SUBMIT_SM_RESP, &submit_r, &submit);
-
- if (!(esme->bind_flags & ESME_BIND_TX)) {
- submit_r.command_status = ESME_RINVBNDSTS;
- return PACK_AND_SEND(esme, &submit_r);
- }
-
- LOGP(DSMPP, LOGL_INFO, "[%s] Rx SUBMIT-SM (%s/%u/%u)\n",
- esme->system_id, submit.destination_addr,
- submit.dest_addr_ton, submit.dest_addr_npi);
-
- INIT_RESP(SUBMIT_SM_RESP, &submit_r, &submit);
-
- rc = handle_smpp_submit(esme, &submit, &submit_r);
- if (rc == 0)
- return PACK_AND_SEND(esme, &submit_r);
-
- return rc;
-}
-
-/*! \brief one complete SMPP PDU from the ESME has been received */
-static int smpp_pdu_rx(struct osmo_esme *esme, struct msgb *msg __uses)
-{
- uint32_t cmd_id = smpp_msgb_cmdid(msg);
- int rc = 0;
-
- LOGP(DSMPP, LOGL_DEBUG, "[%s] smpp_pdu_rx(%s)\n", esme->system_id,
- osmo_hexdump(msgb_data(msg), msgb_length(msg)));
-
- switch (cmd_id) {
- case GENERIC_NACK:
- rc = smpp_handle_gen_nack(esme, msg);
- break;
- case BIND_RECEIVER:
- rc = smpp_handle_bind_rx(esme, msg);
- break;
- case BIND_TRANSMITTER:
- rc = smpp_handle_bind_tx(esme, msg);
- break;
- case BIND_TRANSCEIVER:
- rc = smpp_handle_bind_trx(esme, msg);
- break;
- case UNBIND:
- rc = smpp_handle_unbind(esme, msg);
- break;
- case ENQUIRE_LINK:
- rc = smpp_handle_enq_link(esme, msg);
- break;
- case SUBMIT_SM:
- rc = smpp_handle_submit(esme, msg);
- break;
- case DELIVER_SM_RESP:
- rc = smpp_handle_deliver_resp(esme, msg);
- break;
- case DELIVER_SM:
- break;
- case DATA_SM:
- break;
- case CANCEL_SM:
- case QUERY_SM:
- case REPLACE_SM:
- case SUBMIT_MULTI:
- LOGP(DSMPP, LOGL_NOTICE, "[%s] Unimplemented PDU Command "
- "0x%08x\n", esme->system_id, cmd_id);
- break;
- default:
- LOGP(DSMPP, LOGL_ERROR, "[%s] Unknown PDU Command 0x%08x\n",
- esme->system_id, cmd_id);
- rc = smpp_tx_gen_nack(esme, smpp_msgb_seq(msg), ESME_RINVCMDID);
- break;
- }
-
- return rc;
-}
-
-/* This macro should be called after a call to read() in the read_cb of an
- * osmo_fd to properly check for errors.
- * rc is the return value of read, err_label is the label to jump to in case of
- * an error. The code there should handle closing the connection.
- * FIXME: This code should go in libosmocore utils.h so it can be used by other
- * projects as well.
- * */
-#define OSMO_FD_CHECK_READ(rc, err_label) \
- if (rc < 0) { \
- /* EINTR is a non-fatal error, just try again */ \
- if (errno == EINTR) \
- return 0; \
- goto err_label; \
- } else if (rc == 0) { \
- goto err_label; \
- }
-
-/* !\brief call-back when per-ESME TCP socket has some data to be read */
-static int esme_link_read_cb(struct osmo_fd *ofd)
-{
- struct osmo_esme *esme = ofd->data;
- uint32_t len;
- uint8_t *lenptr = (uint8_t *) &len;
- uint8_t *cur;
- struct msgb *msg;
- ssize_t rdlen, rc;
-
- switch (esme->read_state) {
- case READ_ST_IN_LEN:
- rdlen = sizeof(uint32_t) - esme->read_idx;
- rc = read(ofd->fd, lenptr + esme->read_idx, rdlen);
- if (rc < 0)
- LOGP(DSMPP, LOGL_ERROR, "[%s] read returned %zd (%s)\n",
- esme->system_id, rc, strerror(errno));
- OSMO_FD_CHECK_READ(rc, dead_socket);
-
- esme->read_idx += rc;
-
- if (esme->read_idx >= sizeof(uint32_t)) {
- esme->read_len = ntohl(len);
- if (esme->read_len < 8 || esme->read_len > UINT16_MAX) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] length invalid %u\n",
- esme->system_id, esme->read_len);
- goto dead_socket;
- }
-
- msg = msgb_alloc(esme->read_len, "SMPP Rx");
- if (!msg)
- return -ENOMEM;
- esme->read_msg = msg;
- cur = msgb_put(msg, sizeof(uint32_t));
- memcpy(cur, lenptr, sizeof(uint32_t));
- esme->read_state = READ_ST_IN_MSG;
- esme->read_idx = sizeof(uint32_t);
- }
- break;
- case READ_ST_IN_MSG:
- msg = esme->read_msg;
- rdlen = esme->read_len - esme->read_idx;
- rc = read(ofd->fd, msg->tail, OSMO_MIN(rdlen, msgb_tailroom(msg)));
- if (rc < 0)
- LOGP(DSMPP, LOGL_ERROR, "[%s] read returned %zd (%s)\n",
- esme->system_id, rc, strerror(errno));
- OSMO_FD_CHECK_READ(rc, dead_socket);
-
- esme->read_idx += rc;
- msgb_put(msg, rc);
-
- if (esme->read_idx >= esme->read_len) {
- rc = smpp_pdu_rx(esme, esme->read_msg);
- msgb_free(esme->read_msg);
- esme->read_msg = NULL;
- esme->read_idx = 0;
- esme->read_len = 0;
- esme->read_state = READ_ST_IN_LEN;
- }
- break;
- }
-
- return 0;
-dead_socket:
- msgb_free(esme->read_msg);
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- esme->wqueue.bfd.fd = -1;
- smpp_esme_put(esme);
-
- return 0;
-}
-
-/* call-back of write queue once it wishes to write a message to the socket */
-static int esme_link_write_cb(struct osmo_fd *ofd, struct msgb *msg)
-{
- struct osmo_esme *esme = ofd->data;
- int rc;
-
- rc = write(ofd->fd, msgb_data(msg), msgb_length(msg));
- if (rc == 0) {
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- esme->wqueue.bfd.fd = -1;
- smpp_esme_put(esme);
- } else if (rc < msgb_length(msg)) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Short write\n", esme->system_id);
- return -1;
- }
-
- return 0;
-}
-
-/* callback for already-accepted new TCP socket */
-static int link_accept_cb(struct smsc *smsc, int fd,
- struct sockaddr_storage *s, socklen_t s_len)
-{
- struct osmo_esme *esme = talloc_zero(smsc, struct osmo_esme);
- if (!esme) {
- close(fd);
- return -ENOMEM;
- }
-
- INIT_LLIST_HEAD(&esme->smpp_cmd_list);
- smpp_esme_get(esme);
- esme->own_seq_nr = rand();
- esme_inc_seq_nr(esme);
- esme->smsc = smsc;
- osmo_wqueue_init(&esme->wqueue, 10);
- esme->wqueue.bfd.fd = fd;
- esme->wqueue.bfd.data = esme;
- esme->wqueue.bfd.when = BSC_FD_READ;
-
- if (osmo_fd_register(&esme->wqueue.bfd) != 0) {
- close(fd);
- talloc_free(esme);
- return -EIO;
- }
-
- esme->wqueue.read_cb = esme_link_read_cb;
- esme->wqueue.write_cb = esme_link_write_cb;
-
- esme->sa_len = OSMO_MIN(sizeof(esme->sa), s_len);
- memcpy(&esme->sa, s, esme->sa_len);
-
- llist_add_tail(&esme->list, &smsc->esme_list);
-
- return 0;
-}
-
-/* callback of listening TCP socket */
-static int smsc_fd_cb(struct osmo_fd *ofd, unsigned int what)
-{
- int rc;
- struct sockaddr_storage sa;
- socklen_t sa_len = sizeof(sa);
-
- rc = accept(ofd->fd, (struct sockaddr *)&sa, &sa_len);
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "Accept returns %d (%s)\n",
- rc, strerror(errno));
- return rc;
- }
- return link_accept_cb(ofd->data, rc, &sa, sa_len);
-}
-
-/*! \brief allocate and initialize an smsc struct from talloc context ctx. */
-struct smsc *smpp_smsc_alloc_init(void *ctx)
-{
- struct smsc *smsc = talloc_zero(ctx, struct smsc);
-
- INIT_LLIST_HEAD(&smsc->esme_list);
- INIT_LLIST_HEAD(&smsc->acl_list);
- INIT_LLIST_HEAD(&smsc->route_list);
-
- smsc->listen_ofd.data = smsc;
- smsc->listen_ofd.cb = smsc_fd_cb;
-
- return smsc;
-}
-
-/*! \brief Set the SMPP address and port without binding. */
-int smpp_smsc_conf(struct smsc *smsc, const char *bind_addr, uint16_t port)
-{
- talloc_free((void*)smsc->bind_addr);
- smsc->bind_addr = NULL;
- if (bind_addr) {
- smsc->bind_addr = talloc_strdup(smsc, bind_addr);
- if (!smsc->bind_addr)
- return -ENOMEM;
- }
- smsc->listen_port = port;
- return 0;
-}
-
-/*! \brief Bind to given address and port and accept connections.
- * \param[in] bind_addr Local IP address, may be NULL for any.
- * \param[in] port TCP port number, may be 0 for default SMPP (2775).
- */
-int smpp_smsc_start(struct smsc *smsc, const char *bind_addr, uint16_t port)
-{
- int rc;
-
- /* default port for SMPP */
- if (!port)
- port = 2775;
-
- smpp_smsc_stop(smsc);
-
- LOGP(DSMPP, LOGL_NOTICE, "SMPP at %s %d\n",
- bind_addr? bind_addr : "0.0.0.0", port);
-
- rc = osmo_sock_init_ofd(&smsc->listen_ofd, AF_UNSPEC, SOCK_STREAM,
- IPPROTO_TCP, bind_addr, port,
- OSMO_SOCK_F_BIND);
- if (rc < 0)
- return rc;
-
- /* store new address and port */
- rc = smpp_smsc_conf(smsc, bind_addr, port);
- if (rc)
- smpp_smsc_stop(smsc);
- return rc;
-}
-
-/*! \brief Change a running connection to a different address/port, and upon
- * error switch back to the running configuration. */
-int smpp_smsc_restart(struct smsc *smsc, const char *bind_addr, uint16_t port)
-{
- int rc;
-
- rc = smpp_smsc_start(smsc, bind_addr, port);
- if (rc)
- /* if there is an error, try to re-bind to the old port */
- return smpp_smsc_start(smsc, smsc->bind_addr, smsc->listen_port);
- return 0;
-}
-
-/*! /brief Close SMPP connection. */
-void smpp_smsc_stop(struct smsc *smsc)
-{
- if (smsc->listen_ofd.fd > 0) {
- close(smsc->listen_ofd.fd);
- smsc->listen_ofd.fd = 0;
- osmo_fd_unregister(&smsc->listen_ofd);
- }
-}
diff --git a/src/libmsc/smpp_smsc.h b/src/libmsc/smpp_smsc.h
deleted file mode 100644
index 755e68577..000000000
--- a/src/libmsc/smpp_smsc.h
+++ /dev/null
@@ -1,167 +0,0 @@
-#ifndef _SMPP_SMSC_H
-#define _SMPP_SMSC_H
-
-#include <sys/socket.h>
-#include <netinet/in.h>
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/write_queue.h>
-#include <osmocom/core/timer.h>
-
-#include <smpp34.h>
-#include <smpp34_structs.h>
-#include <smpp34_params.h>
-
-#define SMPP_SYS_ID_LEN 16
-#define SMPP_PASSWD_LEN 16
-
-#define MODE_7BIT 7
-#define MODE_8BIT 8
-
-enum esme_read_state {
- READ_ST_IN_LEN = 0,
- READ_ST_IN_MSG = 1,
-};
-
-struct osmo_smpp_acl;
-
-struct osmo_smpp_addr {
- uint8_t ton;
- uint8_t npi;
- char addr[21+1];
-};
-
-struct osmo_esme {
- struct llist_head list;
- struct smsc *smsc;
- struct osmo_smpp_acl *acl;
- int use;
-
- struct llist_head smpp_cmd_list;
-
- uint32_t own_seq_nr;
-
- struct osmo_wqueue wqueue;
- struct sockaddr_storage sa;
- socklen_t sa_len;
-
- enum esme_read_state read_state;
- uint32_t read_len;
- uint32_t read_idx;
- struct msgb *read_msg;
-
- uint8_t smpp_version;
- char system_id[SMPP_SYS_ID_LEN+1];
-
- uint8_t bind_flags;
-};
-
-struct osmo_smpp_acl {
- struct llist_head list;
- struct smsc *smsc;
- struct osmo_esme *esme;
- char *description;
- char system_id[SMPP_SYS_ID_LEN+1];
- char passwd[SMPP_PASSWD_LEN+1];
- int default_route;
- int deliver_src_imsi;
- int osmocom_ext;
- int dcs_transparent;
- struct llist_head route_list;
-};
-
-enum osmo_smpp_rtype {
- SMPP_ROUTE_NONE,
- SMPP_ROUTE_PREFIX,
-};
-
-struct osmo_smpp_route {
- struct llist_head list; /*!< in acl.route_list */
- struct llist_head global_list; /*!< in smsc->route_list */
- struct osmo_smpp_acl *acl;
- enum osmo_smpp_rtype type;
- union {
- struct osmo_smpp_addr prefix;
- } u;
-};
-
-struct osmo_smpp_cmd {
- struct llist_head list;
- struct vlr_subscr *vsub;
- uint32_t sequence_nr;
- uint32_t gsm411_msg_ref;
- uint8_t gsm411_trans_id;
- bool is_report;
- struct osmo_timer_list response_timer;
-};
-
-struct osmo_smpp_cmd *smpp_cmd_find_by_seqnum(struct osmo_esme *esme,
- uint32_t sequence_number);
-void smpp_cmd_ack(struct osmo_smpp_cmd *cmd);
-void smpp_cmd_err(struct osmo_smpp_cmd *cmd, uint32_t status);
-void smpp_cmd_flush_pending(struct osmo_esme *esme);
-
-struct smsc {
- struct osmo_fd listen_ofd;
- struct llist_head esme_list;
- struct llist_head acl_list;
- struct llist_head route_list;
- const char *bind_addr;
- uint16_t listen_port;
- char system_id[SMPP_SYS_ID_LEN+1];
- int accept_all;
- int smpp_first;
- struct osmo_smpp_acl *def_route;
- void *priv;
-};
-
-int smpp_addr_eq(const struct osmo_smpp_addr *a,
- const struct osmo_smpp_addr *b);
-
-struct smsc *smpp_smsc_alloc_init(void *ctx);
-int smpp_smsc_conf(struct smsc *smsc, const char *bind_addr, uint16_t port);
-int smpp_smsc_start(struct smsc *smsc, const char *bind_addr, uint16_t port);
-int smpp_smsc_restart(struct smsc *smsc, const char *bind_addr, uint16_t port);
-void smpp_smsc_stop(struct smsc *smsc);
-
-void smpp_esme_get(struct osmo_esme *esme);
-void smpp_esme_put(struct osmo_esme *esme);
-
-int smpp_route(const struct smsc *smsc, const struct osmo_smpp_addr *dest, struct osmo_esme **emse);
-
-struct osmo_smpp_acl *smpp_acl_alloc(struct smsc *smsc, const char *sys_id);
-struct osmo_smpp_acl *smpp_acl_by_system_id(struct smsc *smsc,
- const char *sys_id);
-void smpp_acl_delete(struct osmo_smpp_acl *acl);
-
-int smpp_tx_submit_r(struct osmo_esme *esme, uint32_t sequence_nr,
- uint32_t command_status, char *msg_id);
-
-int smpp_tx_alert(struct osmo_esme *esme, uint8_t ton, uint8_t npi,
- const char *addr, uint8_t avail_status);
-
-int smpp_tx_deliver(struct osmo_esme *esme, struct deliver_sm_t *deliver);
-
-int handle_smpp_submit(struct osmo_esme *esme, struct submit_sm_t *submit,
- struct submit_sm_resp_t *submit_r);
-
-int smpp_route_pfx_add(struct osmo_smpp_acl *acl,
- const struct osmo_smpp_addr *pfx);
-int smpp_route_pfx_del(struct osmo_smpp_acl *acl,
- const struct osmo_smpp_addr *pfx);
-
-int smpp_vty_init(void);
-
-int smpp_determine_scheme(uint8_t dcs, uint8_t *data_coding, int *mode);
-
-
-
-struct gsm_sms;
-struct gsm_subscriber_connection;
-
-int smpp_route_smpp_first(struct gsm_sms *sms,
- struct gsm_subscriber_connection *conn);
-int smpp_try_deliver(struct gsm_sms *sms,
- struct gsm_subscriber_connection *conn);
-#endif
diff --git a/src/libmsc/smpp_utils.c b/src/libmsc/smpp_utils.c
deleted file mode 100644
index d0850d8c1..000000000
--- a/src/libmsc/smpp_utils.c
+++ /dev/null
@@ -1,62 +0,0 @@
-
-/* (C) 2012-2013 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- */
-
-
-#include "smpp_smsc.h"
-#include <openbsc/debug.h>
-
-
-int smpp_determine_scheme(uint8_t dcs, uint8_t *data_coding, int *mode)
-{
- if ((dcs & 0xF0) == 0xF0) {
- if (dcs & 0x04) {
- /* bit 2 == 1: 8bit data */
- *data_coding = 0x02;
- *mode = MODE_8BIT;
- } else {
- /* bit 2 == 0: default alphabet */
- *data_coding = 0x01;
- *mode = MODE_7BIT;
- }
- } else if ((dcs & 0xE0) == 0) {
- switch (dcs & 0xC) {
- case 0:
- *data_coding = 0x01;
- *mode = MODE_7BIT;
- break;
- case 4:
- *data_coding = 0x02;
- *mode = MODE_8BIT;
- break;
- case 8:
- *data_coding = 0x08; /* UCS-2 */
- *mode = MODE_8BIT;
- break;
- default:
- goto unknown_mo;
- }
- } else {
-unknown_mo:
- LOGP(DLSMS, LOGL_ERROR, "SMPP MO Unknown Data Coding 0x%02x\n", dcs);
- return -1;
- }
-
- return 0;
-
-}
diff --git a/src/libmsc/smpp_vty.c b/src/libmsc/smpp_vty.c
deleted file mode 100644
index 13467f182..000000000
--- a/src/libmsc/smpp_vty.c
+++ /dev/null
@@ -1,612 +0,0 @@
-/* SMPP vty interface */
-
-/* (C) 2012 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <ctype.h>
-#include <string.h>
-#include <errno.h>
-#include <netdb.h>
-#include <sys/socket.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/buffer.h>
-#include <osmocom/vty/vty.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/talloc.h>
-
-#include <openbsc/vty.h>
-
-#include "smpp_smsc.h"
-
-struct smsc *smsc_from_vty(struct vty *v);
-
-static struct cmd_node smpp_node = {
- SMPP_NODE,
- "%s(config-smpp)# ",
- 1,
-};
-
-static struct cmd_node esme_node = {
- SMPP_ESME_NODE,
- "%s(config-smpp-esme)# ",
- 1,
-};
-
-DEFUN(cfg_smpp, cfg_smpp_cmd,
- "smpp", "Configure SMPP SMS Interface")
-{
- vty->node = SMPP_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_smpp_first, cfg_smpp_first_cmd,
- "smpp-first",
- "Try SMPP routes before the subscriber DB\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- smsc->smpp_first = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_no_smpp_first, cfg_no_smpp_first_cmd,
- "no smpp-first",
- NO_STR "Try SMPP before routes before the subscriber DB\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- smsc->smpp_first = 0;
- return CMD_SUCCESS;
-}
-
-static int smpp_local_tcp(struct vty *vty,
- const char *bind_addr, uint16_t port)
-{
- struct smsc *smsc = smsc_from_vty(vty);
- int is_running = smsc->listen_ofd.fd > 0;
- int same_bind_addr;
- int rc;
-
- /* If it is not up yet, don't rebind, just set values. */
- if (!is_running) {
- rc = smpp_smsc_conf(smsc, bind_addr, port);
- if (rc < 0) {
- vty_out(vty, "%% Cannot configure new address:port%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- return CMD_SUCCESS;
- }
-
- rc = smpp_smsc_restart(smsc, bind_addr, port);
- if (rc < 0) {
- vty_out(vty, "%% Cannot bind to new port %s:%u nor to"
- " old port %s:%u%s",
- bind_addr? bind_addr : "0.0.0.0",
- port,
- smsc->bind_addr? smsc->bind_addr : "0.0.0.0",
- smsc->listen_port,
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- same_bind_addr = (bind_addr == smsc->bind_addr)
- || (bind_addr && smsc->bind_addr
- && (strcmp(bind_addr, smsc->bind_addr) == 0));
-
- if (!same_bind_addr || port != smsc->listen_port) {
- vty_out(vty, "%% Cannot bind to new port %s:%u, staying on"
- " old port %s:%u%s",
- bind_addr? bind_addr : "0.0.0.0",
- port,
- smsc->bind_addr? smsc->bind_addr : "0.0.0.0",
- smsc->listen_port,
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_smpp_port, cfg_smpp_port_cmd,
- "local-tcp-port <1-65535>",
- "Set the local TCP port on which we listen for SMPP\n"
- "TCP port number")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- uint16_t port = atoi(argv[0]);
- return smpp_local_tcp(vty, smsc->bind_addr, port);
-}
-
-DEFUN(cfg_smpp_addr_port, cfg_smpp_addr_port_cmd,
- "local-tcp-ip A.B.C.D <1-65535>",
- "Set the local IP address and TCP port on which we listen for SMPP\n"
- "Local IP address\n"
- "TCP port number")
-{
- const char *bind_addr = argv[0];
- uint16_t port = atoi(argv[1]);
- return smpp_local_tcp(vty, bind_addr, port);
-}
-
-DEFUN(cfg_smpp_sys_id, cfg_smpp_sys_id_cmd,
- "system-id ID",
- "Set the System ID of this SMSC\n"
- "Alphanumeric SMSC System ID\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
-
- if (strlen(argv[0])+1 > sizeof(smsc->system_id))
- return CMD_WARNING;
-
- strcpy(smsc->system_id, argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_smpp_policy, cfg_smpp_policy_cmd,
- "policy (accept-all|closed)",
- "Set the authentication policy of this SMSC\n"
- "Accept all SMPP connections independeint of system ID / passwd\n"
- "Accept only SMPP connections from ESMEs explicitly configured")
-{
- struct smsc *smsc = smsc_from_vty(vty);
-
- if (!strcmp(argv[0], "accept-all"))
- smsc->accept_all = 1;
- else
- smsc->accept_all = 0;
-
- return CMD_SUCCESS;
-}
-
-
-static int config_write_smpp(struct vty *vty)
-{
- struct smsc *smsc = smsc_from_vty(vty);
-
- vty_out(vty, "smpp%s", VTY_NEWLINE);
- if (smsc->bind_addr)
- vty_out(vty, " local-tcp-ip %s %u%s", smsc->bind_addr,
- smsc->listen_port, VTY_NEWLINE);
- else
- vty_out(vty, " local-tcp-port %u%s", smsc->listen_port,
- VTY_NEWLINE);
- if (strlen(smsc->system_id) > 0)
- vty_out(vty, " system-id %s%s", smsc->system_id, VTY_NEWLINE);
- vty_out(vty, " policy %s%s",
- smsc->accept_all ? "accept-all" : "closed", VTY_NEWLINE);
- vty_out(vty, " %ssmpp-first%s",
- smsc->smpp_first ? "" : "no ", VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme, cfg_esme_cmd,
- "esme NAME",
- "Configure a particular ESME\n"
- "Alphanumeric System ID of the ESME to be configured\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- struct osmo_smpp_acl *acl;
- const char *id = argv[0];
-
- if (strlen(id) > 16) {
- vty_out(vty, "%% System ID cannot be more than 16 "
- "characters long%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
- acl = smpp_acl_by_system_id(smsc, id);
- if (!acl) {
- acl = smpp_acl_alloc(smsc, id);
- if (!acl)
- return CMD_WARNING;
- }
-
- vty->index = acl;
- vty->index_sub = &acl->description;
- vty->node = SMPP_ESME_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_no_esme, cfg_no_esme_cmd,
- "no esme NAME",
- NO_STR "Remove ESME configuration\n"
- "Alphanumeric System ID of the ESME to be removed\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- struct osmo_smpp_acl *acl;
- const char *id = argv[0];
-
- acl = smpp_acl_by_system_id(smsc, id);
- if (!acl) {
- vty_out(vty, "%% ESME with system id '%s' unknown%s",
- id, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* FIXME: close the connection, free data structure, etc. */
-
- smpp_acl_delete(acl);
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(cfg_esme_passwd, cfg_esme_passwd_cmd,
- "password PASSWORD",
- "Set the password for this ESME\n"
- "Alphanumeric password string\n")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- if (strlen(argv[0])+1 > sizeof(acl->passwd))
- return CMD_WARNING;
-
- strcpy(acl->passwd, argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_no_passwd, cfg_esme_no_passwd_cmd,
- "no password",
- NO_STR "Remove the password for this ESME\n")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- memset(acl->passwd, 0, sizeof(acl->passwd));
-
- return CMD_SUCCESS;
-}
-
-static int osmo_is_digits(const char *str)
-{
- int i;
- for (i = 0; i < strlen(str); i++) {
- if (!isdigit(str[i]))
- return 0;
- }
- return 1;
-}
-
-static const struct value_string route_errstr[] = {
- { -EEXIST, "Route already exists" },
- { -ENODEV, "Route does not exist" },
- { -ENOMEM, "No memory" },
- { -EINVAL, "Invalid" },
- { 0, NULL }
-};
-
-static const struct value_string smpp_ton_str_short[] = {
- { TON_Unknown, "unknown" },
- { TON_International, "international" },
- { TON_National, "national" },
- { TON_Network_Specific, "network" },
- { TON_Subscriber_Number,"subscriber" },
- { TON_Alphanumeric, "alpha" },
- { TON_Abbreviated, "abbrev" },
- { 0, NULL }
-};
-
-static const struct value_string smpp_npi_str_short[] = {
- { NPI_Unknown, "unknown" },
- { NPI_ISDN_E163_E164, "isdn" },
- { NPI_Data_X121, "x121" },
- { NPI_Telex_F69, "f69" },
- { NPI_Land_Mobile_E212, "e212" },
- { NPI_National, "national" },
- { NPI_Private, "private" },
- { NPI_ERMES, "ermes" },
- { NPI_Internet_IP, "ip" },
- { NPI_WAP_Client_Id, "wap" },
- { 0, NULL }
-};
-
-
-#define SMPP_ROUTE_STR "Configure a route for MO-SMS to be sent to this ESME\n"
-#define SMPP_ROUTE_P_STR SMPP_ROUTE_STR "Prefix-match route\n"
-#define SMPP_PREFIX_STR "Destination number prefix\n"
-
-#define TON_CMD "(unknown|international|national|network|subscriber|alpha|abbrev)"
-#define NPI_CMD "(unknown|isdn|x121|f69|e212|national|private|ermes|ip|wap)"
-#define TON_STR "Unknown type-of-number\n" \
- "International type-of-number\n" \
- "National type-of-number\n" \
- "Network specific type-of-number\n" \
- "Subscriber type-of-number\n" \
- "Alphanumeric type-of-number\n" \
- "Abbreviated type-of-number\n"
-#define NPI_STR "Unknown numbering plan\n" \
- "ISDN (E.164) numbering plan\n" \
- "X.121 numbering plan\n" \
- "F.69 numbering plan\n" \
- "E.212 numbering plan\n" \
- "National numbering plan\n" \
- "Private numbering plan\n" \
- "ERMES numbering plan\n" \
- "IP numbering plan\n" \
- "WAP numbeing plan\n"
-
-DEFUN(cfg_esme_route_pfx, cfg_esme_route_pfx_cmd,
- "route prefix " TON_CMD " " NPI_CMD " PREFIX",
- SMPP_ROUTE_P_STR TON_STR NPI_STR SMPP_PREFIX_STR)
-{
- struct osmo_smpp_acl *acl = vty->index;
- struct osmo_smpp_addr pfx;
- int rc;
-
- /* check if DESTINATION is all-digits */
- if (!osmo_is_digits(argv[2])) {
- vty_out(vty, "%% PREFIX has to be numeric%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- pfx.ton = get_string_value(smpp_ton_str_short, argv[0]);
- pfx.npi = get_string_value(smpp_npi_str_short, argv[1]);
- snprintf(pfx.addr, sizeof(pfx.addr), "%s", argv[2]);
-
- rc = smpp_route_pfx_add(acl, &pfx);
- if (rc < 0) {
- vty_out(vty, "%% error adding prefix route: %s%s",
- get_value_string(route_errstr, rc), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_no_route_pfx, cfg_esme_no_route_pfx_cmd,
- "no route prefix " TON_CMD " " NPI_CMD " PREFIX",
- NO_STR SMPP_ROUTE_P_STR TON_STR NPI_STR SMPP_PREFIX_STR)
-{
- struct osmo_smpp_acl *acl = vty->index;
- struct osmo_smpp_addr pfx;
- int rc;
-
- /* check if DESTINATION is all-digits */
- if (!osmo_is_digits(argv[2])) {
- vty_out(vty, "%% PREFIX has to be numeric%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- pfx.ton = get_string_value(smpp_ton_str_short, argv[0]);
- pfx.npi = get_string_value(smpp_npi_str_short, argv[1]);
- snprintf(pfx.addr, sizeof(pfx.addr), "%s", argv[2]);
-
- rc = smpp_route_pfx_del(acl, &pfx);
- if (rc < 0) {
- vty_out(vty, "%% error removing prefix route: %s%s",
- get_value_string(route_errstr, rc), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-
-}
-
-
-DEFUN(cfg_esme_defaultroute, cfg_esme_defaultroute_cmd,
- "default-route",
- "Set this ESME as default-route for all SMS to unknown destinations")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->default_route = 1;
-
- if (!acl->smsc->def_route)
- acl->smsc->def_route = acl;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_no_esme_defaultroute, cfg_esme_no_defaultroute_cmd,
- "no default-route", NO_STR
- "Remove this ESME as default-route for all SMS to unknown destinations")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->default_route = 0;
-
- /* remove currently active default route, if it was created by
- * this ACL */
- if (acl->smsc->def_route && acl->smsc->def_route == acl)
- acl->smsc->def_route = NULL;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_del_src_imsi, cfg_esme_del_src_imsi_cmd,
- "deliver-src-imsi",
- "Enable the use of IMSI as source address in DELIVER")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->deliver_src_imsi = 1;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_no_del_src_imsi, cfg_esme_no_del_src_imsi_cmd,
- "no deliver-src-imsi", NO_STR
- "Disable the use of IMSI as source address in DELIVER")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->deliver_src_imsi = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_osmo_ext, cfg_esme_osmo_ext_cmd,
- "osmocom-extensions",
- "Enable the use of Osmocom SMPP Extensions for this ESME")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->osmocom_ext = 1;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_no_osmo_ext, cfg_esme_no_osmo_ext_cmd,
- "no osmocom-extensions", NO_STR
- "Disable the use of Osmocom SMPP Extensions for this ESME")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->osmocom_ext = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_dcs_transp, cfg_esme_dcs_transp_cmd,
- "dcs-transparent",
- "Enable the transparent pass-through of TP-DCS to SMPP DataCoding")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->dcs_transparent = 1;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_esme_no_dcs_transp, cfg_esme_no_dcs_transp_cmd,
- "no dcs-transparent", NO_STR
- "Disable the transparent pass-through of TP-DCS to SMPP DataCoding")
-{
- struct osmo_smpp_acl *acl = vty->index;
-
- acl->dcs_transparent = 0;
-
- return CMD_SUCCESS;
-}
-
-
-static void dump_one_esme(struct vty *vty, struct osmo_esme *esme)
-{
- char host[128], serv[128];
-
- host[0] = 0;
- serv[0] = 0;
- getnameinfo((const struct sockaddr *) &esme->sa, esme->sa_len,
- host, sizeof(host), serv, sizeof(serv), NI_NUMERICSERV);
-
- vty_out(vty, "ESME System ID: %s, Password: %s, SMPP Version %02x%s",
- esme->system_id, esme->acl ? esme->acl->passwd : "",
- esme->smpp_version, VTY_NEWLINE);
- vty_out(vty, " Connected from: %s:%s%s", host, serv, VTY_NEWLINE);
- if (esme->smsc->def_route == esme->acl)
- vty_out(vty, " Is current default route%s", VTY_NEWLINE);
-}
-
-DEFUN(show_esme, show_esme_cmd,
- "show smpp esme",
- SHOW_STR "SMPP Interface\n" "SMPP Extrenal SMS Entity\n")
-{
- struct smsc *smsc = smsc_from_vty(vty);
- struct osmo_esme *esme;
-
- llist_for_each_entry(esme, &smsc->esme_list, list)
- dump_one_esme(vty, esme);
-
- return CMD_SUCCESS;
-}
-
-static void write_esme_route_single(struct vty *vty, struct osmo_smpp_route *r)
-{
- switch (r->type) {
- case SMPP_ROUTE_PREFIX:
- vty_out(vty, " route prefix %s ",
- get_value_string(smpp_ton_str_short, r->u.prefix.ton));
- vty_out(vty, "%s %s%s",
- get_value_string(smpp_npi_str_short, r->u.prefix.npi),
- r->u.prefix.addr, VTY_NEWLINE);
- break;
- case SMPP_ROUTE_NONE:
- break;
- }
-}
-
-static void config_write_esme_single(struct vty *vty, struct osmo_smpp_acl *acl)
-{
- struct osmo_smpp_route *r;
-
- vty_out(vty, " esme %s%s", acl->system_id, VTY_NEWLINE);
- if (strlen(acl->passwd))
- vty_out(vty, " password %s%s", acl->passwd, VTY_NEWLINE);
- if (acl->default_route)
- vty_out(vty, " default-route%s", VTY_NEWLINE);
- if (acl->deliver_src_imsi)
- vty_out(vty, " deliver-src-imsi%s", VTY_NEWLINE);
- if (acl->osmocom_ext)
- vty_out(vty, " osmocom-extensions%s", VTY_NEWLINE);
- if (acl->dcs_transparent)
- vty_out(vty, " dcs-transparent%s", VTY_NEWLINE);
-
- llist_for_each_entry(r, &acl->route_list, list)
- write_esme_route_single(vty, r);
-}
-
-static int config_write_esme(struct vty *v)
-{
- struct smsc *smsc = smsc_from_vty(v);
- struct osmo_smpp_acl *acl;
-
- llist_for_each_entry(acl, &smsc->acl_list, list)
- config_write_esme_single(v, acl);
-
- return CMD_SUCCESS;
-}
-
-int smpp_vty_init(void)
-{
- install_node(&smpp_node, config_write_smpp);
- vty_install_default(SMPP_NODE);
- install_element(CONFIG_NODE, &cfg_smpp_cmd);
-
- install_element(SMPP_NODE, &cfg_smpp_first_cmd);
- install_element(SMPP_NODE, &cfg_no_smpp_first_cmd);
- install_element(SMPP_NODE, &cfg_smpp_port_cmd);
- install_element(SMPP_NODE, &cfg_smpp_addr_port_cmd);
- install_element(SMPP_NODE, &cfg_smpp_sys_id_cmd);
- install_element(SMPP_NODE, &cfg_smpp_policy_cmd);
- install_element(SMPP_NODE, &cfg_esme_cmd);
- install_element(SMPP_NODE, &cfg_no_esme_cmd);
-
- install_node(&esme_node, config_write_esme);
- vty_install_default(SMPP_ESME_NODE);
- install_element(SMPP_ESME_NODE, &cfg_esme_passwd_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_passwd_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_route_pfx_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_route_pfx_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_defaultroute_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_defaultroute_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_del_src_imsi_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_del_src_imsi_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_osmo_ext_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_osmo_ext_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_dcs_transp_cmd);
- install_element(SMPP_ESME_NODE, &cfg_esme_no_dcs_transp_cmd);
-
- install_element_ve(&show_esme_cmd);
-
- return 0;
-}
diff --git a/src/libmsc/sms_queue.c b/src/libmsc/sms_queue.c
deleted file mode 100644
index fe7a608be..000000000
--- a/src/libmsc/sms_queue.c
+++ /dev/null
@@ -1,578 +0,0 @@
-/* SMS queue to continously attempt to deliver SMS */
-/*
- * (C) 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-/**
- * The difficulty of such a queue is to send a lot of SMS without
- * overloading the paging subsystem and the database and other users
- * of the MSC. To make the best use we would need to know the number
- * of pending paging requests, then throttle the number of SMS we
- * want to send and such.
- * We will start with a very simple SMS Queue and then try to speed
- * things up by collecting data from other parts of the system.
- */
-
-#include <limits.h>
-
-#include <openbsc/sms_queue.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/db.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_04_11.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/signal.h>
-#include <openbsc/vlr.h>
-
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/vty/vty.h>
-
-/*
- * One pending SMS that we wait for.
- */
-struct gsm_sms_pending {
- struct llist_head entry;
-
- struct vlr_subscr *vsub;
- unsigned long long sms_id;
- int failed_attempts;
- int resend;
-};
-
-struct gsm_sms_queue {
- struct osmo_timer_list resend_pending;
- struct osmo_timer_list push_queue;
- struct gsm_network *network;
- int max_fail;
- int max_pending;
- int pending;
-
- struct llist_head pending_sms;
-
- char last_msisdn[GSM_EXTENSION_LENGTH+1];
-};
-
-static int sms_subscr_cb(unsigned int, unsigned int, void *, void *);
-static int sms_sms_cb(unsigned int, unsigned int, void *, void *);
-
-static struct gsm_sms_pending *sms_find_pending(struct gsm_sms_queue *smsq,
- struct gsm_sms *sms)
-{
- struct gsm_sms_pending *pending;
-
- llist_for_each_entry(pending, &smsq->pending_sms, entry) {
- if (pending->sms_id == sms->id)
- return pending;
- }
-
- return NULL;
-}
-
-static int sms_is_in_pending(struct gsm_sms_queue *smsq, struct gsm_sms *sms)
-{
- return sms_find_pending(smsq, sms) != NULL;
-}
-
-static struct gsm_sms_pending *sms_subscriber_find_pending(
- struct gsm_sms_queue *smsq,
- struct vlr_subscr *vsub)
-{
- struct gsm_sms_pending *pending;
-
- llist_for_each_entry(pending, &smsq->pending_sms, entry) {
- if (pending->vsub == vsub)
- return pending;
- }
-
- return NULL;
-}
-
-static int sms_subscriber_is_pending(struct gsm_sms_queue *smsq,
- struct vlr_subscr *vsub)
-{
- return sms_subscriber_find_pending(smsq, vsub) != NULL;
-}
-
-static struct gsm_sms_pending *sms_pending_from(struct gsm_sms_queue *smsq,
- struct gsm_sms *sms)
-{
- struct gsm_sms_pending *pending;
-
- pending = talloc_zero(smsq, struct gsm_sms_pending);
- if (!pending)
- return NULL;
-
- pending->vsub = vlr_subscr_get(sms->receiver);
- pending->sms_id = sms->id;
- return pending;
-}
-
-static void sms_pending_free(struct gsm_sms_pending *pending)
-{
- vlr_subscr_put(pending->vsub);
- llist_del(&pending->entry);
- talloc_free(pending);
-}
-
-static void sms_pending_resend(struct gsm_sms_pending *pending)
-{
- struct gsm_network *net = pending->vsub->vlr->user_ctx;
- struct gsm_sms_queue *smsq;
- LOGP(DLSMS, LOGL_DEBUG,
- "Scheduling resend of SMS %llu.\n", pending->sms_id);
-
- pending->resend = 1;
-
- smsq = net->sms_queue;
- if (osmo_timer_pending(&smsq->resend_pending))
- return;
-
- osmo_timer_schedule(&smsq->resend_pending, 1, 0);
-}
-
-static void sms_pending_failed(struct gsm_sms_pending *pending, int paging_error)
-{
- struct gsm_network *net = pending->vsub->vlr->user_ctx;
- struct gsm_sms_queue *smsq;
-
- LOGP(DLSMS, LOGL_NOTICE, "Sending SMS %llu failed %d times.\n",
- pending->sms_id, pending->failed_attempts);
-
- smsq = net->sms_queue;
- if (++pending->failed_attempts < smsq->max_fail)
- return sms_pending_resend(pending);
-
- sms_pending_free(pending);
- smsq->pending -= 1;
- sms_queue_trigger(smsq);
-}
-
-/*
- * Resend all SMS that are scheduled for a resend. This is done to
- * avoid an immediate failure.
- */
-static void sms_resend_pending(void *_data)
-{
- struct gsm_sms_pending *pending, *tmp;
- struct gsm_sms_queue *smsq = _data;
-
- llist_for_each_entry_safe(pending, tmp, &smsq->pending_sms, entry) {
- struct gsm_sms *sms;
- if (!pending->resend)
- continue;
-
- sms = db_sms_get(smsq->network, pending->sms_id);
-
- /* the sms is gone? Move to the next */
- if (!sms) {
- sms_pending_free(pending);
- smsq->pending -= 1;
- sms_queue_trigger(smsq);
- } else {
- pending->resend = 0;
- gsm411_send_sms_subscr(sms->receiver, sms);
- }
- }
-}
-
-/* Find the next pending SMS by cycling through the recipients. We could also
- * cycle through the pending SMS, but that might cause us to keep trying to
- * send SMS to the same few subscribers repeatedly while not servicing other
- * subscribers for a long time. By walking the list of recipient MSISDNs, we
- * ensure that all subscribers get their fair time to receive SMS. */
-struct gsm_sms *smsq_take_next_sms(struct gsm_network *net,
- char *last_msisdn,
- size_t last_msisdn_buflen)
-{
- struct gsm_sms *sms;
- int wrapped = 0;
- int sanity = 100;
- char started_with_msisdn[last_msisdn_buflen];
-
- osmo_strlcpy(started_with_msisdn, last_msisdn,
- sizeof(started_with_msisdn));
-
- while (wrapped < 2 && (--sanity)) {
- /* If we wrapped around and passed the first msisdn, we're
- * through the entire SMS DB; end it. */
- if (wrapped && strcmp(last_msisdn, started_with_msisdn) >= 0)
- break;
-
- sms = db_sms_get_next_unsent_rr_msisdn(net, last_msisdn, 9);
- if (!sms) {
- last_msisdn[0] = '\0';
- wrapped ++;
- continue;
- }
-
- /* Whatever happens, next time around service another recipient
- */
- osmo_strlcpy(last_msisdn, sms->dst.addr, last_msisdn_buflen);
-
- /* Is the subscriber attached? If not, go to next SMS */
- if (!sms->receiver || !sms->receiver->lu_complete)
- continue;
-
- return sms;
- }
-
- DEBUGP(DLSMS, "SMS queue: no SMS to be sent\n");
- return NULL;
-}
-
-/**
- * I will submit up to max_pending - pending SMS to the
- * subsystem.
- */
-static void sms_submit_pending(void *_data)
-{
- struct gsm_sms_queue *smsq = _data;
- int attempts = smsq->max_pending - smsq->pending;
- int initialized = 0;
- unsigned long long first_sub = 0;
- int attempted = 0, rounds = 0;
-
- LOGP(DLSMS, LOGL_DEBUG, "Attempting to send %d SMS\n", attempts);
-
- do {
- struct gsm_sms_pending *pending;
- struct gsm_sms *sms;
-
-
- sms = smsq_take_next_sms(smsq->network, smsq->last_msisdn,
- sizeof(smsq->last_msisdn));
- if (!sms) {
- LOGP(DLSMS, LOGL_DEBUG, "Sending SMS done (%d attempted)\n",
- attempted);
- break;
- }
-
- rounds += 1;
- LOGP(DLSMS, LOGL_DEBUG, "Sending SMS round %d\n", rounds);
-
- /*
- * This code needs to detect a loop. It assumes that no SMS
- * will vanish during the time this is executed. We will remember
- * the id of the first GSM subscriber we see and then will
- * compare this. The Database code should make sure that we will
- * see all other subscribers first before seeing this one again.
- *
- * It is always scary to have an infinite loop like this.
- */
- if (!initialized) {
- first_sub = sms->receiver->id;
- initialized = 1;
- } else if (first_sub == sms->receiver->id) {
- LOGP(DLSMS, LOGL_DEBUG, "Sending SMS done (loop) (%d attempted)\n",
- attempted);
- sms_free(sms);
- break;
- }
-
- /* no need to send a pending sms */
- if (sms_is_in_pending(smsq, sms)) {
- LOGP(DLSMS, LOGL_DEBUG,
- "SMSqueue with pending sms: %llu. Skipping\n", sms->id);
- sms_free(sms);
- continue;
- }
-
- /* no need to send a SMS with the same receiver */
- if (sms_subscriber_is_pending(smsq, sms->receiver)) {
- LOGP(DLSMS, LOGL_DEBUG,
- "SMSqueue with pending sub: %llu. Skipping\n", sms->receiver->id);
- sms_free(sms);
- continue;
- }
-
- pending = sms_pending_from(smsq, sms);
- if (!pending) {
- LOGP(DLSMS, LOGL_ERROR,
- "Failed to create pending SMS entry.\n");
- sms_free(sms);
- continue;
- }
-
- attempted += 1;
- smsq->pending += 1;
- llist_add_tail(&pending->entry, &smsq->pending_sms);
- gsm411_send_sms_subscr(sms->receiver, sms);
- } while (attempted < attempts && rounds < 1000);
-
- LOGP(DLSMS, LOGL_DEBUG, "SMSqueue added %d messages in %d rounds\n", attempted, rounds);
-}
-
-/**
- * Send the next SMS or trigger the queue
- */
-static void sms_send_next(struct vlr_subscr *vsub)
-{
- struct gsm_network *net = vsub->vlr->user_ctx;
- struct gsm_sms_queue *smsq = net->sms_queue;
- struct gsm_sms_pending *pending;
- struct gsm_sms *sms;
-
- /* the subscriber should not be in the queue */
- OSMO_ASSERT(!sms_subscriber_is_pending(smsq, vsub));
-
- /* check for more messages for this subscriber */
- sms = db_sms_get_unsent_for_subscr(vsub, UINT_MAX);
- if (!sms)
- goto no_pending_sms;
-
- /* The sms should not be scheduled right now */
- OSMO_ASSERT(!sms_is_in_pending(smsq, sms));
-
- /* Remember that we deliver this SMS and send it */
- pending = sms_pending_from(smsq, sms);
- if (!pending) {
- LOGP(DLSMS, LOGL_ERROR,
- "Failed to create pending SMS entry.\n");
- sms_free(sms);
- goto no_pending_sms;
- }
-
- smsq->pending += 1;
- llist_add_tail(&pending->entry, &smsq->pending_sms);
- gsm411_send_sms_subscr(sms->receiver, sms);
- return;
-
-no_pending_sms:
- /* Try to send the SMS to avoid the queue being stuck */
- sms_submit_pending(net->sms_queue);
-}
-
-/*
- * Kick off the queue again.
- */
-int sms_queue_trigger(struct gsm_sms_queue *smsq)
-{
- LOGP(DLSMS, LOGL_DEBUG, "Triggering SMS queue\n");
- if (osmo_timer_pending(&smsq->push_queue))
- return 0;
-
- osmo_timer_schedule(&smsq->push_queue, 1, 0);
- return 0;
-}
-
-int sms_queue_start(struct gsm_network *network, int max_pending)
-{
- struct gsm_sms_queue *sms = talloc_zero(network, struct gsm_sms_queue);
- if (!sms) {
- LOGP(DMSC, LOGL_ERROR, "Failed to create the SMS queue.\n");
- return -1;
- }
-
- osmo_signal_register_handler(SS_SUBSCR, sms_subscr_cb, network);
- osmo_signal_register_handler(SS_SMS, sms_sms_cb, network);
-
- network->sms_queue = sms;
- INIT_LLIST_HEAD(&sms->pending_sms);
- sms->max_fail = 1;
- sms->network = network;
- sms->max_pending = max_pending;
- osmo_timer_setup(&sms->push_queue, sms_submit_pending, sms);
- osmo_timer_setup(&sms->resend_pending, sms_resend_pending, sms);
-
- sms_submit_pending(sms);
-
- return 0;
-}
-
-static int sub_ready_for_sm(struct gsm_network *net, struct vlr_subscr *vsub)
-{
- struct gsm_sms *sms;
- struct gsm_sms_pending *pending;
- struct gsm_subscriber_connection *conn;
-
- /*
- * The code used to be very clever and tried to submit
- * a SMS during the Location Updating Request. This has
- * two issues:
- * 1.) The Phone might not be ready yet, e.g. the C155
- * will not respond to the Submit when it is booting.
- * 2.) The queue is already trying to submit SMS to the
- * user and by not responding to the paging request
- * we will set the LAC back to 0. We would have to
- * stop the paging and move things over.
- *
- * We need to be careful in what we try here.
- */
-
- /* check if we have pending requests */
- pending = sms_subscriber_find_pending(net->sms_queue, vsub);
- if (pending) {
- LOGP(DMSC, LOGL_NOTICE,
- "Pending paging while subscriber %llu attached.\n",
- vsub->id);
- return 0;
- }
-
- conn = connection_for_subscr(vsub);
- if (!conn)
- return -1;
-
- /* Now try to deliver any pending SMS to this sub */
- sms = db_sms_get_unsent_for_subscr(vsub, UINT_MAX);
- if (!sms)
- return -1;
- gsm411_send_sms(conn, sms);
- return 0;
-}
-
-static int sms_subscr_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct vlr_subscr *vsub = signal_data;
-
- if (signal != S_SUBSCR_ATTACHED)
- return 0;
-
- /* this is readyForSM */
- return sub_ready_for_sm(handler_data, vsub);
-}
-
-static int sms_sms_cb(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_network *network = handler_data;
- struct sms_signal_data *sig_sms = signal_data;
- struct gsm_sms_pending *pending;
- struct vlr_subscr *vsub;
-
- /* We got a new SMS and maybe should launch the queue again. */
- if (signal == S_SMS_SUBMITTED || signal == S_SMS_SMMA) {
- /* TODO: For SMMA we might want to re-use the radio connection. */
- sms_queue_trigger(network->sms_queue);
- return 0;
- }
-
- if (!sig_sms->sms)
- return -1;
-
-
- /*
- * Find the entry of our queue. The SMS subsystem will submit
- * sms that are not in our control as we just have a channel
- * open anyway.
- */
- pending = sms_find_pending(network->sms_queue, sig_sms->sms);
- if (!pending)
- return 0;
-
- switch (signal) {
- case S_SMS_DELIVERED:
- /* Remember the subscriber and clear the pending entry */
- network->sms_queue->pending -= 1;
- vsub = vlr_subscr_get(pending->vsub);
- sms_pending_free(pending);
- /* Attempt to send another SMS to this subscriber */
- sms_send_next(vsub);
- vlr_subscr_put(vsub);
- break;
- case S_SMS_MEM_EXCEEDED:
- network->sms_queue->pending -= 1;
- sms_pending_free(pending);
- sms_queue_trigger(network->sms_queue);
- break;
- case S_SMS_UNKNOWN_ERROR:
- /*
- * There can be many reasons for this failure. E.g. the paging
- * timed out, the subscriber was not paged at all, or there was
- * a protocol error. The current strategy is to try sending the
- * next SMS for busy/oom and to retransmit when we have paged.
- *
- * When the paging expires three times we will disable the
- * subscriber. If we have some kind of other transmit error we
- * should flag the SMS as bad.
- */
- switch (sig_sms->paging_result) {
- case 0:
- /* BAD SMS? */
- db_sms_inc_deliver_attempts(sig_sms->sms);
- sms_pending_failed(pending, 0);
- break;
- case GSM_PAGING_EXPIRED:
- sms_pending_failed(pending, 1);
- break;
-
- case GSM_PAGING_OOM:
- case GSM_PAGING_BUSY:
- network->sms_queue->pending -= 1;
- sms_pending_free(pending);
- sms_queue_trigger(network->sms_queue);
- break;
- default:
- LOGP(DLSMS, LOGL_ERROR, "Unhandled result: %d\n",
- sig_sms->paging_result);
- }
- break;
- default:
- LOGP(DLSMS, LOGL_ERROR, "Unhandled result: %d\n",
- sig_sms->paging_result);
- }
-
- return 0;
-}
-
-/* VTY helper functions */
-int sms_queue_stats(struct gsm_sms_queue *smsq, struct vty *vty)
-{
- struct gsm_sms_pending *pending;
-
- vty_out(vty, "SMSqueue with max_pending: %d pending: %d%s",
- smsq->max_pending, smsq->pending, VTY_NEWLINE);
-
- llist_for_each_entry(pending, &smsq->pending_sms, entry)
- vty_out(vty, " SMS Pending for Subscriber: %llu SMS: %llu Failed: %d.%s",
- pending->vsub->id, pending->sms_id,
- pending->failed_attempts, VTY_NEWLINE);
- return 0;
-}
-
-int sms_queue_set_max_pending(struct gsm_sms_queue *smsq, int max_pending)
-{
- LOGP(DLSMS, LOGL_NOTICE, "SMSqueue old max: %d new: %d\n",
- smsq->max_pending, max_pending);
- smsq->max_pending = max_pending;
- return 0;
-}
-
-int sms_queue_set_max_failure(struct gsm_sms_queue *smsq, int max_fail)
-{
- LOGP(DLSMS, LOGL_NOTICE, "SMSqueue max failure old: %d new: %d\n",
- smsq->max_fail, max_fail);
- smsq->max_fail = max_fail;
- return 0;
-}
-
-int sms_queue_clear(struct gsm_sms_queue *smsq)
-{
- struct gsm_sms_pending *pending, *tmp;
-
- llist_for_each_entry_safe(pending, tmp, &smsq->pending_sms, entry) {
- LOGP(DLSMS, LOGL_NOTICE,
- "SMSqueue clearing for sub %llu\n", pending->vsub->id);
- sms_pending_free(pending);
- }
-
- smsq->pending = 0;
- return 0;
-}
diff --git a/src/libmsc/subscr_conn.c b/src/libmsc/subscr_conn.c
deleted file mode 100644
index bcab8e48c..000000000
--- a/src/libmsc/subscr_conn.c
+++ /dev/null
@@ -1,359 +0,0 @@
-/* MSC subscriber connection implementation */
-
-/*
- * (C) 2016 by sysmocom s.m.f.c. <info@sysmocom.de>
- * All Rights Reserved
- *
- * Author: Neels Hofmeyr
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/logging.h>
-#include <osmocom/core/fsm.h>
-#include <osmocom/core/signal.h>
-
-#include <openbsc/osmo_msc.h>
-#include <openbsc/vlr.h>
-#include <openbsc/debug.h>
-#include <openbsc/transaction.h>
-#include <openbsc/signal.h>
-#include <openbsc/a_iface.h>
-
-#define SUBSCR_CONN_TIMEOUT 5 /* seconds */
-
-static const struct value_string subscr_conn_fsm_event_names[] = {
- OSMO_VALUE_STRING(SUBSCR_CONN_E_INVALID),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_START),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_ACCEPTED),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_COMMUNICATING),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_BUMP),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_MO_CLOSE),
- OSMO_VALUE_STRING(SUBSCR_CONN_E_CN_CLOSE),
- { 0, NULL }
-};
-
-const struct value_string subscr_conn_from_names[] = {
- OSMO_VALUE_STRING(SUBSCR_CONN_FROM_INVALID),
- OSMO_VALUE_STRING(SUBSCR_CONN_FROM_LU),
- OSMO_VALUE_STRING(SUBSCR_CONN_FROM_CM_SERVICE_REQ),
- OSMO_VALUE_STRING(SUBSCR_CONN_FROM_PAGING_RESP),
- { 0, NULL }
-};
-
-static void paging_event(struct gsm_subscriber_connection *conn,
- enum gsm_paging_event pe)
-{
- subscr_paging_dispatch(GSM_HOOK_RR_PAGING, pe, NULL, conn, conn->vsub);
-}
-
-void subscr_conn_fsm_init(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- OSMO_ASSERT(event == SUBSCR_CONN_E_START);
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_NEW,
- SUBSCR_CONN_TIMEOUT, 0);
-}
-
-void subscr_conn_fsm_new(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct gsm_subscriber_connection *conn = fi->priv;
- enum subscr_conn_from from = SUBSCR_CONN_FROM_INVALID;
- bool success;
-
- if (data) {
- from = *(enum subscr_conn_from*)data;
- LOGPFSM(fi, "%s\n", subscr_conn_from_name(from));
- }
-
- /* If accepted, transition the state, all other cases mean failure. */
- switch (event) {
- case SUBSCR_CONN_E_ACCEPTED:
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_ACCEPTED,
- SUBSCR_CONN_TIMEOUT, 0);
- break;
-
- case SUBSCR_CONN_E_MO_CLOSE:
- case SUBSCR_CONN_E_CN_CLOSE:
- if (data)
- LOGPFSM(fi, "Close event, cause %u\n",
- *(uint32_t*)data);
- /* will release further below, see
- * 'if (fi->state != SUBSCR_CONN_S_ACCEPTED)' */
- break;
-
- default:
- LOGPFSML(fi, LOGL_ERROR,
- "Unexpected event: %d %s\n", event,
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-
- success = (fi->state == SUBSCR_CONN_S_ACCEPTED);
-
- if (from == SUBSCR_CONN_FROM_LU)
- rate_ctr_inc(&conn->network->msc_ctrs->ctr[
- success ? MSC_CTR_LOC_UPDATE_COMPLETED
- : MSC_CTR_LOC_UPDATE_FAILED]);
-
- /* signal paging success or failure in case this was a paging */
- if (from == SUBSCR_CONN_FROM_PAGING_RESP)
- paging_event(conn,
- success ? GSM_PAGING_SUCCEEDED
- : GSM_PAGING_EXPIRED);
-
- /* FIXME rate counters */
- /*rate_ctr_inc(&conn->network->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_COMPLETED]);*/
-
- /* On failure, discard the conn */
- if (!success) {
- /* TODO: on MO_CLOSE or CN_CLOSE, first go to RELEASING and
- * await BSC/RNC confirmation? */
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_RELEASED, 0, 0);
- return;
- }
-
- if (from == SUBSCR_CONN_FROM_CM_SERVICE_REQ) {
- conn->received_cm_service_request = true;
- LOGPFSML(fi, LOGL_DEBUG, "received_cm_service_request = true\n");
- }
-
- osmo_fsm_inst_dispatch(fi, SUBSCR_CONN_E_BUMP, data);
-}
-
-static void subscr_conn_fsm_bump(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct gsm_subscriber_connection *conn = fi->priv;
- struct gsm_trans *trans;
-
- if (conn->silent_call) {
- LOGPFSML(fi, LOGL_DEBUG, "bump: silent call still active\n");
- return;
- }
-
- if (conn->received_cm_service_request) {
- LOGPFSML(fi, LOGL_DEBUG, "bump: still awaiting first request after a CM Service Request\n");
- return;
- }
-
- if (conn->vsub && !llist_empty(&conn->vsub->cs.requests)) {
- struct subscr_request *sr;
- if (!log_check_level(fi->fsm->log_subsys, LOGL_DEBUG)) {
- llist_for_each_entry(sr, &conn->vsub->cs.requests, entry) {
- LOGPFSML(fi, LOGL_DEBUG, "bump: still active: %s\n",
- sr->label);
- }
- }
- return;
- }
-
- if ((trans = trans_has_conn(conn))) {
- LOGPFSML(fi, LOGL_DEBUG,
- "bump: connection still has active transaction: %s\n",
- gsm48_pdisc_name(trans->protocol));
- return;
- }
-
- LOGPFSML(fi, LOGL_DEBUG, "bump: releasing conn\n");
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_RELEASED, 0, 0);
-}
-
-static void subscr_conn_fsm_accepted_enter(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- struct gsm_subscriber_connection *conn = fi->priv;
- osmo_signal_dispatch(SS_SUBSCR, S_SUBSCR_ATTACHED, conn->vsub);
-}
-
-static void subscr_conn_fsm_accepted(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- switch (event) {
- case SUBSCR_CONN_E_COMMUNICATING:
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_COMMUNICATING, 0, 0);
- return;
-
- case SUBSCR_CONN_E_BUMP:
- subscr_conn_fsm_bump(fi, event, data);
- return;
-
- default:
- break;
- }
- /* Whatever unexpected happens in the accepted state, it means release.
- * Even if an unexpected event is passed, the safest thing to do is
- * discard the conn. We don't expect another SUBSCR_CONN_E_ACCEPTED. */
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_RELEASED, 0, 0);
-}
-
-static void subscr_conn_fsm_communicating(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- switch (event) {
- case SUBSCR_CONN_E_COMMUNICATING:
- /* no-op */
- return;
-
- case SUBSCR_CONN_E_BUMP:
- subscr_conn_fsm_bump(fi, event, data);
- return;
-
- default:
- break;
- }
- /* Whatever unexpected happens in the accepted state, it means release.
- * Even if an unexpected event is passed, the safest thing to do is
- * discard the conn. We don't expect another SUBSCR_CONN_E_ACCEPTED. */
- osmo_fsm_inst_state_chg(fi, SUBSCR_CONN_S_RELEASED, 0, 0);
-}
-
-static void subscr_conn_fsm_cleanup(struct osmo_fsm_inst *fi,
- enum osmo_fsm_term_cause cause)
-{
- struct gsm_subscriber_connection *conn = fi->priv;
- fi->priv = NULL;
-
- if (!conn)
- return;
- conn->conn_fsm = NULL;
- msc_subscr_conn_close(conn, cause);
- msc_subscr_conn_put(conn);
-}
-
-int subscr_conn_fsm_timeout(struct osmo_fsm_inst *fi)
-{
- struct gsm_subscriber_connection *conn = fi->priv;
- if (conn)
- vlr_subscr_conn_timeout(conn->vsub);
- osmo_fsm_inst_dispatch(fi, SUBSCR_CONN_E_CN_CLOSE, NULL);
- return 0;
-}
-
-static void subscr_conn_fsm_release(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
-}
-
-#define S(x) (1 << (x))
-
-static const struct osmo_fsm_state subscr_conn_fsm_states[] = {
- [SUBSCR_CONN_S_INIT] = {
- .name = OSMO_STRINGIFY(SUBSCR_CONN_S_INIT),
- .in_event_mask = S(SUBSCR_CONN_E_START),
- .out_state_mask = S(SUBSCR_CONN_S_NEW),
- .action = subscr_conn_fsm_init,
- },
- [SUBSCR_CONN_S_NEW] = {
- .name = OSMO_STRINGIFY(SUBSCR_CONN_S_NEW),
- .in_event_mask = S(SUBSCR_CONN_E_ACCEPTED) |
- S(SUBSCR_CONN_E_MO_CLOSE) |
- S(SUBSCR_CONN_E_CN_CLOSE),
- .out_state_mask = S(SUBSCR_CONN_S_ACCEPTED) |
- S(SUBSCR_CONN_S_RELEASED),
- .action = subscr_conn_fsm_new,
- },
- [SUBSCR_CONN_S_ACCEPTED] = {
- .name = OSMO_STRINGIFY(SUBSCR_CONN_S_ACCEPTED),
- /* allow everything to release for any odd behavior */
- .in_event_mask = S(SUBSCR_CONN_E_COMMUNICATING) |
- S(SUBSCR_CONN_E_BUMP) |
- S(SUBSCR_CONN_E_ACCEPTED) |
- S(SUBSCR_CONN_E_MO_CLOSE) |
- S(SUBSCR_CONN_E_CN_CLOSE),
- .out_state_mask = S(SUBSCR_CONN_S_RELEASED) |
- S(SUBSCR_CONN_S_COMMUNICATING),
- .onenter = subscr_conn_fsm_accepted_enter,
- .action = subscr_conn_fsm_accepted,
- },
- [SUBSCR_CONN_S_COMMUNICATING] = {
- .name = OSMO_STRINGIFY(SUBSCR_CONN_S_COMMUNICATING),
- /* allow everything to release for any odd behavior */
- .in_event_mask = S(SUBSCR_CONN_E_BUMP) |
- S(SUBSCR_CONN_E_ACCEPTED) |
- S(SUBSCR_CONN_E_COMMUNICATING) |
- S(SUBSCR_CONN_E_MO_CLOSE) |
- S(SUBSCR_CONN_E_CN_CLOSE),
- .out_state_mask = S(SUBSCR_CONN_S_RELEASED),
- .action = subscr_conn_fsm_communicating,
- },
- [SUBSCR_CONN_S_RELEASED] = {
- .name = OSMO_STRINGIFY(SUBSCR_CONN_S_RELEASED),
- .onenter = subscr_conn_fsm_release,
- },
-};
-
-static struct osmo_fsm subscr_conn_fsm = {
- .name = "Subscr_Conn",
- .states = subscr_conn_fsm_states,
- .num_states = ARRAY_SIZE(subscr_conn_fsm_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DMM,
- .event_names = subscr_conn_fsm_event_names,
- .cleanup = subscr_conn_fsm_cleanup,
- .timer_cb = subscr_conn_fsm_timeout,
-};
-
-int msc_create_conn_fsm(struct gsm_subscriber_connection *conn, const char *id)
-{
- struct osmo_fsm_inst *fi;
- OSMO_ASSERT(conn);
-
- if (conn->conn_fsm) {
- LOGP(DMM, LOGL_ERROR,
- "%s: Error: connection already in use\n", id);
- return -EINVAL;
- }
-
- /* Allocate the FSM not with the subscr_conn. Semantically it would
- * make sense, but in subscr_conn_fsm_cleanup(), we want to discard the
- * subscriber connection. If the FSM is freed along with the subscriber
- * connection, then in _osmo_fsm_inst_term() the osmo_fsm_inst_free()
- * that follows the cleanup() call would run into a double free. */
- fi = osmo_fsm_inst_alloc(&subscr_conn_fsm, conn->network,
- msc_subscr_conn_get(conn),
- LOGL_DEBUG, id);
-
- if (!fi) {
- LOGP(DMM, LOGL_ERROR,
- "%s: Failed to allocate subscr conn master FSM\n", id);
- return -ENOMEM;
- }
- conn->conn_fsm = fi;
- osmo_fsm_inst_dispatch(conn->conn_fsm, SUBSCR_CONN_E_START, NULL);
- return 0;
-}
-
-bool msc_subscr_conn_is_accepted(struct gsm_subscriber_connection *conn)
-{
- if (!conn)
- return false;
- if (!conn->vsub)
- return false;
- if (!conn->conn_fsm)
- return false;
- if (!(conn->conn_fsm->state == SUBSCR_CONN_S_ACCEPTED
- || conn->conn_fsm->state == SUBSCR_CONN_S_COMMUNICATING))
- return false;
- return true;
-}
-
-void msc_subscr_conn_communicating(struct gsm_subscriber_connection *conn)
-{
- OSMO_ASSERT(conn);
- osmo_fsm_inst_dispatch(conn->conn_fsm, SUBSCR_CONN_E_COMMUNICATING,
- NULL);
-}
-
-void msc_subscr_conn_init(void)
-{
- osmo_fsm_register(&subscr_conn_fsm);
-}
diff --git a/src/libmsc/transaction.c b/src/libmsc/transaction.c
deleted file mode 100644
index 28e0914a8..000000000
--- a/src/libmsc/transaction.c
+++ /dev/null
@@ -1,221 +0,0 @@
-/* GSM 04.07 Transaction handling */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <openbsc/transaction.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/mncc.h>
-#include <openbsc/debug.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/gsm_04_08.h>
-#include <openbsc/mncc.h>
-#include <openbsc/paging.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/vlr.h>
-
-void *tall_trans_ctx;
-
-void _gsm48_cc_trans_free(struct gsm_trans *trans);
-
-/*! Find a transaction in connection for given protocol + transaction ID
- * \param[in] conn Connection in whihc we want to find transaction
- * \param[in] proto Protocol of transaction
- * \param[in] trans_id Transaction ID of transaction
- * \returns Matching transaction, if any
- */
-struct gsm_trans *trans_find_by_id(struct gsm_subscriber_connection *conn,
- uint8_t proto, uint8_t trans_id)
-{
- struct gsm_trans *trans;
- struct gsm_network *net = conn->network;
- struct vlr_subscr *vsub = conn->vsub;
-
- llist_for_each_entry(trans, &net->trans_list, entry) {
- if (trans->vsub == vsub &&
- trans->protocol == proto &&
- trans->transaction_id == trans_id)
- return trans;
- }
- return NULL;
-}
-
-/*! Find a transaction by call reference
- * \param[in] net Network in which we should search
- * \param[in] callref Call Reference of transaction
- * \returns Matching transaction, if any
- */
-struct gsm_trans *trans_find_by_callref(struct gsm_network *net,
- uint32_t callref)
-{
- struct gsm_trans *trans;
-
- llist_for_each_entry(trans, &net->trans_list, entry) {
- if (trans->callref == callref)
- return trans;
- }
- return NULL;
-}
-
-/*! Allocate a new transaction and add it to network list
- * \param[in] net Netwokr in which we allocate transaction
- * \param[in] subscr Subscriber for which we allocate transaction
- * \param[in] protocol Protocol (CC/SMS/...)
- * \param[in] callref Call Reference
- * \returns Transaction
- */
-struct gsm_trans *trans_alloc(struct gsm_network *net,
- struct vlr_subscr *vsub,
- uint8_t protocol, uint8_t trans_id,
- uint32_t callref)
-{
- struct gsm_trans *trans;
-
- DEBUGP(DCC, "subscr=%p, net=%p\n", vsub, net);
-
- /* a valid subscriber is indispensable */
- if (vsub == NULL) {
- LOGP(DCC, LOGL_NOTICE,
- "unable to alloc transaction, invalid subscriber (NULL)\n");
- return NULL;
- }
-
- trans = talloc_zero(tall_trans_ctx, struct gsm_trans);
- if (!trans)
- return NULL;
-
- trans->vsub = vlr_subscr_get(vsub);
-
- trans->protocol = protocol;
- trans->transaction_id = trans_id;
- trans->callref = callref;
-
- trans->net = net;
- llist_add_tail(&trans->entry, &net->trans_list);
-
- return trans;
-}
-
-/*! Release a transaction
- * \param[in] trans Transaction to be released
- */
-void trans_free(struct gsm_trans *trans)
-{
- switch (trans->protocol) {
- case GSM48_PDISC_CC:
- _gsm48_cc_trans_free(trans);
- break;
- case GSM48_PDISC_SMS:
- _gsm411_sms_trans_free(trans);
- break;
- }
-
- if (trans->paging_request) {
- subscr_remove_request(trans->paging_request);
- trans->paging_request = NULL;
- }
-
- if (trans->vsub) {
- vlr_subscr_put(trans->vsub);
- trans->vsub = NULL;
- }
-
- llist_del(&trans->entry);
-
- if (trans->conn)
- msc_subscr_conn_put(trans->conn);
-
- trans->conn = NULL;
- talloc_free(trans);
-}
-
-/*! allocate an unused transaction ID for the given subscriber
- * in the given protocol using the ti_flag specified
- * \param[in] net GSM network
- * \param[in] subscr Subscriber for which to find ID
- * \param[in] protocol Protocol for whihc to find ID
- * \param[in] ti_flag FIXME
- */
-int trans_assign_trans_id(struct gsm_network *net, struct vlr_subscr *vsub,
- uint8_t protocol, uint8_t ti_flag)
-{
- struct gsm_trans *trans;
- unsigned int used_tid_bitmask = 0;
- int i, j, h;
-
- if (ti_flag)
- ti_flag = 0x8;
-
- /* generate bitmask of already-used TIDs for this (subscr,proto) */
- llist_for_each_entry(trans, &net->trans_list, entry) {
- if (trans->vsub != vsub ||
- trans->protocol != protocol ||
- trans->transaction_id == 0xff)
- continue;
- used_tid_bitmask |= (1 << trans->transaction_id);
- }
-
- /* find a new one, trying to go in a 'circular' pattern */
- for (h = 6; h > 0; h--)
- if (used_tid_bitmask & (1 << (h | ti_flag)))
- break;
- for (i = 0; i < 7; i++) {
- j = ((h + i) % 7) | ti_flag;
- if ((used_tid_bitmask & (1 << j)) == 0)
- return j;
- }
-
- return -1;
-}
-
-/*! Check if we have any transaction for given connection
- * \param[in] conn Connection to check
- * \returns 1 in case there is a transaction, 0 otherwise
- */
-struct gsm_trans *trans_has_conn(const struct gsm_subscriber_connection *conn)
-{
- struct gsm_trans *trans;
-
- llist_for_each_entry(trans, &conn->network->trans_list, entry)
- if (trans->conn == conn)
- return trans;
-
- return NULL;
-}
-
-/*! Free all transactions associated with a connection, presumably when the
- * conn is being closed. The transaction code will inform the CC or SMS
- * facilities, which will then send the necessary release indications.
- * \param[in] conn Connection that is going to be closed.
- */
-void trans_conn_closed(struct gsm_subscriber_connection *conn)
-{
- struct gsm_trans *trans;
-
- /* As part of the CC REL_IND the remote leg might be released and this
- * will trigger another call to trans_free. This is something the llist
- * macro can not handle and we need to re-iterate the list every time.
- */
-restart:
- llist_for_each_entry(trans, &conn->network->trans_list, entry) {
- if (trans->conn == conn) {
- trans_free(trans);
- goto restart;
- }
- }
-}
diff --git a/src/libmsc/ussd.c b/src/libmsc/ussd.c
deleted file mode 100644
index 81a356690..000000000
--- a/src/libmsc/ussd.c
+++ /dev/null
@@ -1,103 +0,0 @@
-/* Network-specific handling of mobile-originated USSDs. */
-
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2008, 2009 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009 by Mike Haben <michael.haben@btinternet.com>
- *
- * 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/>.
- *
- */
-
-/* This module defines the network-specific handling of mobile-originated
- USSD messages. */
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <errno.h>
-
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/debug.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/vlr.h>
-
-/* Declarations of USSD strings to be recognised */
-const char USSD_TEXT_OWN_NUMBER[] = "*#100#";
-
-/* Forward declarations of network-specific handler functions */
-static int send_own_number(struct gsm_subscriber_connection *conn, const struct msgb *msg, const struct ss_request *req);
-
-
-/* Entrypoint - handler function common to all mobile-originated USSDs */
-int handle_rcv_ussd(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- int rc;
- struct ss_request req;
- struct gsm48_hdr *gh;
-
- /* TODO: Use subscriber_connection ref-counting if we ever want
- * to keep the connection alive due ot ongoing USSD exchange.
- * As we answer everytying synchronously so far, there's no need
- * yet */
-
- cm_service_request_concludes(conn, msg);
-
- memset(&req, 0, sizeof(req));
- gh = msgb_l3(msg);
- rc = gsm0480_decode_ss_request(gh, msgb_l3len(msg), &req);
- if (!rc) {
- DEBUGP(DMM, "Unhandled SS\n");
- rc = gsm0480_send_ussd_reject(conn, msg, &req);
- return rc;
- }
-
- /* Interrogation or releaseComplete? */
- if (req.ussd_text[0] == '\0' || req.ussd_text[0] == 0xFF) {
- if (req.ss_code > 0) {
- /* Assume interrogateSS or modification of it and reject */
- rc = gsm0480_send_ussd_reject(conn, msg, &req);
- return rc;
- }
- /* Still assuming a Release-Complete and returning */
- return 0;
- }
-
- msc_subscr_conn_communicating(conn);
- if (!strcmp(USSD_TEXT_OWN_NUMBER, (const char *)req.ussd_text)) {
- DEBUGP(DMM, "USSD: Own number requested\n");
- rc = send_own_number(conn, msg, &req);
- } else {
- DEBUGP(DMM, "Unhandled USSD %s\n", req.ussd_text);
- rc = gsm0480_send_ussd_reject(conn, msg, &req);
- }
-
- return rc;
-}
-
-/* A network-specific handler function */
-static int send_own_number(struct gsm_subscriber_connection *conn, const struct msgb *msg, const struct ss_request *req)
-{
- char *own_number = conn->vsub->msisdn;
- char response_string[GSM_EXTENSION_LENGTH + 20];
-
- DEBUGP(DMM, "%s: MSISDN = %s\n", vlr_subscr_name(conn->vsub),
- own_number);
-
- /* Need trailing CR as EOT character */
- snprintf(response_string, sizeof(response_string), "Your extension is %s\r", own_number);
- return gsm0480_send_ussd_response(conn, msg, response_string, req);
-}
diff --git a/src/libmsc/vty_interface_layer3.c b/src/libmsc/vty_interface_layer3.c
deleted file mode 100644
index 864597d6c..000000000
--- a/src/libmsc/vty_interface_layer3.c
+++ /dev/null
@@ -1,979 +0,0 @@
-/* OpenBSC interface to quagga VTY */
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2011 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/>.
- *
- */
-
-#include <stdlib.h>
-#include <limits.h>
-#include <unistd.h>
-#include <time.h>
-#include <inttypes.h>
-
-#include <osmocom/vty/command.h>
-#include <osmocom/vty/buffer.h>
-#include <osmocom/vty/vty.h>
-
-#include <arpa/inet.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/silent_call.h>
-#include <openbsc/gsm_04_11.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <osmocom/core/utils.h>
-#include <openbsc/db.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/signal.h>
-#include <openbsc/debug.h>
-#include <openbsc/vty.h>
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/gsm_04_14.h>
-#include <openbsc/chan_alloc.h>
-#include <openbsc/sms_queue.h>
-#include <openbsc/mncc_int.h>
-#include <openbsc/handover.h>
-#include <openbsc/vlr.h>
-
-#include <osmocom/vty/logging.h>
-
-#include <openbsc/osmo_msc.h>
-
-#include "meas_feed.h"
-
-extern struct gsm_network *gsmnet_from_vty(struct vty *v);
-
-static void subscr_dump_full_vty(struct vty *vty, struct vlr_subscr *vsub)
-{
- int reqs;
- struct llist_head *entry;
- char expire_time[200];
-
- if (strlen(vsub->name))
- vty_out(vty, " Name: '%s'%s", vsub->name, VTY_NEWLINE);
- if (strlen(vsub->msisdn))
- vty_out(vty, " Extension: %s%s", vsub->msisdn,
- VTY_NEWLINE);
- vty_out(vty, " LAC: %d/0x%x%s",
- vsub->lac, vsub->lac, VTY_NEWLINE);
- vty_out(vty, " IMSI: %s%s", vsub->imsi, VTY_NEWLINE);
- if (vsub->tmsi != GSM_RESERVED_TMSI)
- vty_out(vty, " TMSI: %08X%s", vsub->tmsi,
- VTY_NEWLINE);
- if (vsub->tmsi_new != GSM_RESERVED_TMSI)
- vty_out(vty, " new TMSI: %08X%s", vsub->tmsi_new,
- VTY_NEWLINE);
-
-#if 0
- /* TODO: add this to vlr_subscr? */
- if (vsub->auth_info.auth_algo != AUTH_ALGO_NONE) {
- struct gsm_auth_info *i = &vsub->auth_info;
- vty_out(vty, " A3A8 algorithm id: %d%s",
- i->auth_algo, VTY_NEWLINE);
- vty_out(vty, " A3A8 Ki: %s%s",
- osmo_hexdump(i->a3a8_ki, i->a3a8_ki_len),
- VTY_NEWLINE);
- }
-#endif
-
- if (vsub->last_tuple) {
- struct gsm_auth_tuple *t = vsub->last_tuple;
- vty_out(vty, " A3A8 last tuple (used %d times):%s",
- t->use_count, VTY_NEWLINE);
- vty_out(vty, " seq # : %d%s",
- t->key_seq, VTY_NEWLINE);
- vty_out(vty, " RAND : %s%s",
- osmo_hexdump(t->vec.rand, sizeof(t->vec.rand)),
- VTY_NEWLINE);
- vty_out(vty, " SRES : %s%s",
- osmo_hexdump(t->vec.sres, sizeof(t->vec.sres)),
- VTY_NEWLINE);
- vty_out(vty, " Kc : %s%s",
- osmo_hexdump(t->vec.kc, sizeof(t->vec.kc)),
- VTY_NEWLINE);
- }
-
- /* print the expiration time of a subscriber */
- strftime(expire_time, sizeof(expire_time),
- "%a, %d %b %Y %T %z", localtime(&vsub->expire_lu));
- expire_time[sizeof(expire_time) - 1] = '\0';
- vty_out(vty, " Expiration Time: %s%s", expire_time, VTY_NEWLINE);
-
- reqs = 0;
- llist_for_each(entry, &vsub->cs.requests)
- reqs += 1;
- vty_out(vty, " Paging: %s paging for %d requests%s",
- vsub->cs.is_paging ? "is" : "not", reqs, VTY_NEWLINE);
- vty_out(vty, " Use count: %u%s", vsub->use_count, VTY_NEWLINE);
-}
-
-
-/* Subscriber */
-DEFUN(show_subscr_cache,
- show_subscr_cache_cmd,
- "show subscriber cache",
- SHOW_STR "Show information about subscribers\n"
- "Display contents of subscriber cache\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub;
- int count = 0;
-
- llist_for_each_entry(vsub, &gsmnet->vlr->subscribers, list) {
- if (++count > 100) {
- vty_out(vty, "%% More than %d subscribers in cache,"
- " stopping here.%s", count-1, VTY_NEWLINE);
- break;
- }
- vty_out(vty, " Subscriber:%s", VTY_NEWLINE);
- subscr_dump_full_vty(vty, vsub);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(sms_send_pend,
- sms_send_pend_cmd,
- "sms send pending",
- "SMS related commands\n" "SMS Sending related commands\n"
- "Send all pending SMS")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct gsm_sms *sms;
- unsigned long long sms_id = 0;
-
- while (1) {
- sms = db_sms_get_next_unsent(gsmnet, sms_id, UINT_MAX);
- if (!sms)
- break;
-
- if (sms->receiver)
- gsm411_send_sms_subscr(sms->receiver, sms);
-
- sms_id = sms->id + 1;
- }
-
- return CMD_SUCCESS;
-}
-
-static int _send_sms_str(struct vlr_subscr *receiver,
- struct vlr_subscr *sender,
- char *str, uint8_t tp_pid)
-{
- struct gsm_network *net = receiver->vlr->user_ctx;
- struct gsm_sms *sms;
-
- sms = sms_from_text(receiver, sender, 0, str);
- sms->protocol_id = tp_pid;
-
- /* store in database for the queue */
- if (db_sms_store(sms) != 0) {
- LOGP(DLSMS, LOGL_ERROR, "Failed to store SMS in Database\n");
- sms_free(sms);
- return CMD_WARNING;
- }
- LOGP(DLSMS, LOGL_DEBUG, "SMS stored in DB\n");
-
- sms_free(sms);
- sms_queue_trigger(net->sms_queue);
- return CMD_SUCCESS;
-}
-
-static struct vlr_subscr *get_vsub_by_argv(struct gsm_network *gsmnet,
- const char *type,
- const char *id)
-{
- if (!strcmp(type, "extension") || !strcmp(type, "msisdn"))
- return vlr_subscr_find_by_msisdn(gsmnet->vlr, id);
- else if (!strcmp(type, "imsi") || !strcmp(type, "id"))
- return vlr_subscr_find_by_imsi(gsmnet->vlr, id);
- else if (!strcmp(type, "tmsi"))
- return vlr_subscr_find_by_tmsi(gsmnet->vlr, atoi(id));
-
- return NULL;
-}
-#define SUBSCR_TYPES "(extension|imsi|tmsi|id)"
-#define SUBSCR_HELP "Operations on a Subscriber\n" \
- "Identify subscriber by extension (phone number)\n" \
- "Identify subscriber by IMSI\n" \
- "Identify subscriber by TMSI\n" \
- "Identify subscriber by database ID\n" \
- "Identifier for the subscriber\n"
-
-DEFUN(show_subscr,
- show_subscr_cmd,
- "show subscriber " SUBSCR_TYPES " ID",
- SHOW_STR SUBSCR_HELP)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0],
- argv[1]);
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- subscr_dump_full_vty(vty, vsub);
-
- vlr_subscr_put(vsub);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(subscriber_create,
- subscriber_create_cmd,
- "subscriber create imsi ID",
- "Operations on a Subscriber\n" \
- "Create new subscriber\n" \
- "Identify the subscriber by his IMSI\n" \
- "Identifier for the subscriber\n")
-{
- vty_out(vty, "%% 'subscriber create' now needs to be done at osmo-hlr%s",
- VTY_NEWLINE);
- return CMD_WARNING;
-}
-
-DEFUN(subscriber_send_pending_sms,
- subscriber_send_pending_sms_cmd,
- "subscriber " SUBSCR_TYPES " ID sms pending-send",
- SUBSCR_HELP "SMS Operations\n" "Send pending SMS\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub;
- struct gsm_sms *sms;
-
- vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- sms = db_sms_get_unsent_for_subscr(vsub, UINT_MAX);
- if (sms)
- gsm411_send_sms_subscr(sms->receiver, sms);
-
- vlr_subscr_put(vsub);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(subscriber_send_sms,
- subscriber_send_sms_cmd,
- "subscriber " SUBSCR_TYPES " ID sms sender " SUBSCR_TYPES " SENDER_ID send .LINE",
- SUBSCR_HELP "SMS Operations\n" SUBSCR_HELP "Send SMS\n" "Actual SMS Text\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- struct vlr_subscr *sender = get_vsub_by_argv(gsmnet, argv[2], argv[3]);
- char *str;
- int rc;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- rc = CMD_WARNING;
- goto err;
- }
-
- if (!sender) {
- vty_out(vty, "%% No sender found for %s %s%s",
- argv[2], argv[3], VTY_NEWLINE);
- rc = CMD_WARNING;
- goto err;
- }
-
- str = argv_concat(argv, argc, 4);
- rc = _send_sms_str(vsub, sender, str, 0);
- talloc_free(str);
-
-err:
- if (sender)
- vlr_subscr_put(sender);
-
- if (vsub)
- vlr_subscr_put(vsub);
-
- return rc;
-}
-
-DEFUN(subscriber_silent_sms,
- subscriber_silent_sms_cmd,
-
- "subscriber " SUBSCR_TYPES " ID silent-sms sender " SUBSCR_TYPES " SENDER_ID send .LINE",
- SUBSCR_HELP "Silent SMS Operations\n" SUBSCR_HELP "Send SMS\n" "Actual SMS Text\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- struct vlr_subscr *sender = get_vsub_by_argv(gsmnet, argv[2], argv[3]);
- char *str;
- int rc;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- rc = CMD_WARNING;
- goto err;
- }
-
- if (!sender) {
- vty_out(vty, "%% No sender found for %s %s%s",
- argv[2], argv[3], VTY_NEWLINE);
- rc = CMD_WARNING;
- goto err;
- }
-
- str = argv_concat(argv, argc, 4);
- rc = _send_sms_str(vsub, sender, str, 64);
- talloc_free(str);
-
-err:
- if (sender)
- vlr_subscr_put(sender);
-
- if (vsub)
- vlr_subscr_put(vsub);
-
- return rc;
-}
-
-#define CHAN_TYPES "(any|tch/f|tch/any|sdcch)"
-#define CHAN_TYPE_HELP \
- "Any channel\n" \
- "TCH/F channel\n" \
- "Any TCH channel\n" \
- "SDCCH channel\n"
-
-DEFUN(subscriber_silent_call_start,
- subscriber_silent_call_start_cmd,
- "subscriber " SUBSCR_TYPES " ID silent-call start (any|tch/f|tch/any|sdcch)",
- SUBSCR_HELP "Silent call operation\n" "Start silent call\n"
- CHAN_TYPE_HELP)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- int rc, type;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (!strcmp(argv[2], "tch/f"))
- type = RSL_CHANNEED_TCH_F;
- else if (!strcmp(argv[2], "tch/any"))
- type = RSL_CHANNEED_TCH_ForH;
- else if (!strcmp(argv[2], "sdcch"))
- type = RSL_CHANNEED_SDCCH;
- else
- type = RSL_CHANNEED_ANY; /* Defaults to ANY */
-
- rc = gsm_silent_call_start(vsub, vty, type);
- if (rc <= 0) {
- vty_out(vty, "%% Subscriber not attached%s",
- VTY_NEWLINE);
- vlr_subscr_put(vsub);
- return CMD_WARNING;
- }
-
- vlr_subscr_put(vsub);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(subscriber_silent_call_stop,
- subscriber_silent_call_stop_cmd,
- "subscriber " SUBSCR_TYPES " ID silent-call stop",
- SUBSCR_HELP "Silent call operation\n" "Stop silent call\n"
- CHAN_TYPE_HELP)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- int rc;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- rc = gsm_silent_call_stop(vsub);
- if (rc < 0) {
- vlr_subscr_put(vsub);
- return CMD_WARNING;
- }
-
- vlr_subscr_put(vsub);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(subscriber_ussd_notify,
- subscriber_ussd_notify_cmd,
- "subscriber " SUBSCR_TYPES " ID ussd-notify (0|1|2) .TEXT",
- SUBSCR_HELP "Send a USSD notify to the subscriber\n"
- "Alerting Level 0\n"
- "Alerting Level 1\n"
- "Alerting Level 2\n"
- "Text of USSD message to send\n")
-{
- char *text;
- struct gsm_subscriber_connection *conn;
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- int level;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- level = atoi(argv[2]);
- text = argv_concat(argv, argc, 3);
- if (!text) {
- vlr_subscr_put(vsub);
- return CMD_WARNING;
- }
-
- conn = connection_for_subscr(vsub);
- if (!conn) {
- vty_out(vty, "%% An active connection is required for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- vlr_subscr_put(vsub);
- talloc_free(text);
- return CMD_WARNING;
- }
-
- msc_send_ussd_notify(conn, level, text);
- msc_send_ussd_release_complete(conn);
-
- vlr_subscr_put(vsub);
- talloc_free(text);
- return CMD_SUCCESS;
-}
-
-static int loop_by_char(uint8_t ch)
-{
- switch (ch) {
- case 'a':
- return GSM414_LOOP_A;
- case 'b':
- return GSM414_LOOP_B;
- case 'c':
- return GSM414_LOOP_C;
- case 'd':
- return GSM414_LOOP_D;
- case 'e':
- return GSM414_LOOP_E;
- case 'f':
- return GSM414_LOOP_F;
- case 'i':
- return GSM414_LOOP_I;
- }
- return -1;
-}
-
-DEFUN(subscriber_mstest_close,
- subscriber_mstest_close_cmd,
- "subscriber " SUBSCR_TYPES " ID ms-test close-loop (a|b|c|d|e|f|i)",
- SUBSCR_HELP "Send a TS 04.14 MS Test Command to subscriber\n"
- "Close a TCH Loop inside the MS\n"
- "Loop Type A\n"
- "Loop Type B\n"
- "Loop Type C\n"
- "Loop Type D\n"
- "Loop Type E\n"
- "Loop Type F\n"
- "Loop Type I\n")
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
- const char *loop_str;
- int loop_mode;
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- loop_str = argv[2];
- loop_mode = loop_by_char(loop_str[0]);
-
- conn = connection_for_subscr(vsub);
- if (!conn) {
- vty_out(vty, "%% An active connection is required for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- vlr_subscr_put(vsub);
- return CMD_WARNING;
- }
-
- gsm0414_tx_close_tch_loop_cmd(conn, loop_mode);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(subscriber_mstest_open,
- subscriber_mstest_open_cmd,
- "subscriber " SUBSCR_TYPES " ID ms-test open-loop",
- SUBSCR_HELP "Send a TS 04.14 MS Test Command to subscriber\n"
- "Open a TCH Loop inside the MS\n")
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0], argv[1]);
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- conn = connection_for_subscr(vsub);
- if (!conn) {
- vty_out(vty, "%% An active connection is required for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- vlr_subscr_put(vsub);
- return CMD_WARNING;
- }
-
- gsm0414_tx_open_loop_cmd(conn);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(ena_subscr_expire,
- ena_subscr_expire_cmd,
- "subscriber " SUBSCR_TYPES " ID expire",
- SUBSCR_HELP "Expire the subscriber Now\n")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct vlr_subscr *vsub = get_vsub_by_argv(gsmnet, argv[0],
- argv[1]);
-
- if (!vsub) {
- vty_out(vty, "%% No subscriber found for %s %s%s",
- argv[0], argv[1], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- if (vsub->lu_complete) {
- vsub->lu_complete = false;
- vlr_subscr_put(vsub);
- vty_out(vty, "%% VLR released subscriber %s%s",
- vlr_subscr_name(vsub), VTY_NEWLINE);
- }
-
- if (vsub->use_count > 1)
- vty_out(vty, "%% Subscriber %s is still in use,"
- " should be released soon%s",
- vlr_subscr_name(vsub), VTY_NEWLINE);
-
- vlr_subscr_put(vsub);
- return CMD_SUCCESS;
-}
-
-#define A3A8_ALG_TYPES "(none|xor|comp128v1)"
-#define A3A8_ALG_HELP \
- "Use No A3A8 algorithm\n" \
- "Use XOR algorithm\n" \
- "Use COMP128v1 algorithm\n"
-
-DEFUN(ena_subscr_a3a8,
- ena_subscr_a3a8_cmd,
- "subscriber " SUBSCR_TYPES " ID a3a8 " A3A8_ALG_TYPES " [KI]",
- SUBSCR_HELP "Set a3a8 parameters for the subscriber\n"
- A3A8_ALG_HELP "Encryption Key Ki\n")
-{
- vty_out(vty, "%% 'subscriber a3a8' is no longer supported.%s"
- "%% This is now up to osmo-hlr.%s",
- VTY_NEWLINE, VTY_NEWLINE);
- return CMD_WARNING;
-}
-
-DEFUN(subscriber_update,
- subscriber_update_cmd,
- "subscriber " SUBSCR_TYPES " ID update",
- SUBSCR_HELP "Update the subscriber data from the dabase.\n")
-{
- vty_out(vty, "%% 'subscriber update' is no longer supported.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
-}
-
-static int scall_cbfn(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct scall_signal_data *sigdata = signal_data;
- struct vty *vty = sigdata->data;
-
- switch (signal) {
- case S_SCALL_SUCCESS:
- vty_out(vty, "%% silent call success%s", VTY_NEWLINE);
- break;
- case S_SCALL_EXPIRED:
- vty_out(vty, "%% silent call expired paging%s", VTY_NEWLINE);
- break;
- }
- return 0;
-}
-
-DEFUN(show_stats,
- show_stats_cmd,
- "show statistics",
- SHOW_STR "Display network statistics\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- vty_out(vty, "Location Update : %lu attach, %lu normal, %lu periodic%s",
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_ATTACH].current,
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_NORMAL].current,
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_PERIODIC].current,
- VTY_NEWLINE);
- vty_out(vty, "IMSI Detach Indications : %lu%s",
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_TYPE_DETACH].current,
- VTY_NEWLINE);
- vty_out(vty, "Location Updating Results: %lu completed, %lu failed%s",
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_COMPLETED].current,
- net->msc_ctrs->ctr[MSC_CTR_LOC_UPDATE_FAILED].current,
- VTY_NEWLINE);
- vty_out(vty, "Handover : %lu attempted, %lu no_channel, %lu timeout, "
- "%lu completed, %lu failed%s",
- net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_ATTEMPTED].current,
- net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_NO_CHANNEL].current,
- net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_TIMEOUT].current,
- net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_COMPLETED].current,
- net->bsc_ctrs->ctr[BSC_CTR_HANDOVER_FAILED].current,
- VTY_NEWLINE);
- vty_out(vty, "SMS MO : %lu submitted, %lu no receiver%s",
- net->msc_ctrs->ctr[MSC_CTR_SMS_SUBMITTED].current,
- net->msc_ctrs->ctr[MSC_CTR_SMS_NO_RECEIVER].current,
- VTY_NEWLINE);
- vty_out(vty, "SMS MT : %lu delivered, %lu no memory, %lu other error%s",
- net->msc_ctrs->ctr[MSC_CTR_SMS_DELIVERED].current,
- net->msc_ctrs->ctr[MSC_CTR_SMS_RP_ERR_MEM].current,
- net->msc_ctrs->ctr[MSC_CTR_SMS_RP_ERR_OTHER].current,
- VTY_NEWLINE);
- vty_out(vty, "MO Calls : %lu setup, %lu connect ack%s",
- net->msc_ctrs->ctr[MSC_CTR_CALL_MO_SETUP].current,
- net->msc_ctrs->ctr[MSC_CTR_CALL_MO_CONNECT_ACK].current,
- VTY_NEWLINE);
- vty_out(vty, "MT Calls : %lu setup, %lu connect%s",
- net->msc_ctrs->ctr[MSC_CTR_CALL_MT_SETUP].current,
- net->msc_ctrs->ctr[MSC_CTR_CALL_MT_CONNECT].current,
- VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_smsqueue,
- show_smsqueue_cmd,
- "show sms-queue",
- SHOW_STR "Display SMSqueue statistics\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- sms_queue_stats(net->sms_queue, vty);
- return CMD_SUCCESS;
-}
-
-DEFUN(smsqueue_trigger,
- smsqueue_trigger_cmd,
- "sms-queue trigger",
- "SMS Queue\n" "Trigger sending messages\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- sms_queue_trigger(net->sms_queue);
- return CMD_SUCCESS;
-}
-
-DEFUN(smsqueue_max,
- smsqueue_max_cmd,
- "sms-queue max-pending <1-500>",
- "SMS Queue\n" "SMS to deliver in parallel\n" "Amount\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- sms_queue_set_max_pending(net->sms_queue, atoi(argv[0]));
- return CMD_SUCCESS;
-}
-
-DEFUN(smsqueue_clear,
- smsqueue_clear_cmd,
- "sms-queue clear",
- "SMS Queue\n" "Clear the queue of pending SMS\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- sms_queue_clear(net->sms_queue);
- return CMD_SUCCESS;
-}
-
-DEFUN(smsqueue_fail,
- smsqueue_fail_cmd,
- "sms-queue max-failure <1-500>",
- "SMS Queue\n" "Maximum amount of delivery failures\n" "Amount\n")
-{
- struct gsm_network *net = gsmnet_from_vty(vty);
-
- sms_queue_set_max_failure(net->sms_queue, atoi(argv[0]));
- return CMD_SUCCESS;
-}
-
-
-DEFUN(cfg_mncc_int, cfg_mncc_int_cmd,
- "mncc-int", "Configure internal MNCC handler")
-{
- vty->node = MNCC_INT_NODE;
-
- return CMD_SUCCESS;
-}
-
-static struct cmd_node mncc_int_node = {
- MNCC_INT_NODE,
- "%s(config-mncc-int)# ",
- 1,
-};
-
-static const struct value_string tchf_codec_names[] = {
- { GSM48_CMODE_SPEECH_V1, "fr" },
- { GSM48_CMODE_SPEECH_EFR, "efr" },
- { GSM48_CMODE_SPEECH_AMR, "amr" },
- { 0, NULL }
-};
-
-static const struct value_string tchh_codec_names[] = {
- { GSM48_CMODE_SPEECH_V1, "hr" },
- { GSM48_CMODE_SPEECH_AMR, "amr" },
- { 0, NULL }
-};
-
-static int config_write_mncc_int(struct vty *vty)
-{
- uint16_t meas_port;
- char *meas_host;
- const char *meas_scenario;
-
- meas_feed_cfg_get(&meas_host, &meas_port);
- meas_scenario = meas_feed_scenario_get();
-
- vty_out(vty, "mncc-int%s", VTY_NEWLINE);
- vty_out(vty, " default-codec tch-f %s%s",
- get_value_string(tchf_codec_names, mncc_int.def_codec[0]),
- VTY_NEWLINE);
- vty_out(vty, " default-codec tch-h %s%s",
- get_value_string(tchh_codec_names, mncc_int.def_codec[1]),
- VTY_NEWLINE);
- if (meas_port)
- vty_out(vty, " meas-feed destination %s %u%s",
- meas_host, meas_port, VTY_NEWLINE);
- if (strlen(meas_scenario) > 0)
- vty_out(vty, " meas-feed scenario %s%s",
- meas_scenario, VTY_NEWLINE);
-
-
- return CMD_SUCCESS;
-}
-
-DEFUN(mnccint_def_codec_f,
- mnccint_def_codec_f_cmd,
- "default-codec tch-f (fr|efr|amr)",
- "Set default codec\n" "Codec for TCH/F\n"
- "Full-Rate\n" "Enhanced Full-Rate\n" "Adaptive Multi-Rate\n")
-{
- mncc_int.def_codec[0] = get_string_value(tchf_codec_names, argv[0]);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(mnccint_def_codec_h,
- mnccint_def_codec_h_cmd,
- "default-codec tch-h (hr|amr)",
- "Set default codec\n" "Codec for TCH/H\n"
- "Half-Rate\n" "Adaptive Multi-Rate\n")
-{
- mncc_int.def_codec[1] = get_string_value(tchh_codec_names, argv[0]);
-
- return CMD_SUCCESS;
-}
-
-#define OBSOLETE_MSG "Obsolete\n"
-/* this is just for backwards compatibility as the sms code moved into
- * libosmocore and old config files no longer parse... */
-DEFUN_DEPRECATED(log_level_sms, log_level_sms_cmd,
- "logging level sms (everything|debug|info|notice|error|fatal)",
- ".HIDDEN\n" OBSOLETE_MSG OBSOLETE_MSG OBSOLETE_MSG OBSOLETE_MSG
- OBSOLETE_MSG OBSOLETE_MSG OBSOLETE_MSG OBSOLETE_MSG)
-{
- vty_out(vty, "%% 'logging level sms' is now called 'logging level "
- "lsms', please update your config %s", VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-#define MEAS_STR "Measurement export related\n"
-DEFUN(mnccint_meas_feed, mnccint_meas_feed_cmd,
- "meas-feed destination ADDR <0-65535>",
- MEAS_STR "destination\n" "address or hostname\n" "port number\n")
-{
- int rc;
-
- rc = meas_feed_cfg_set(argv[0], atoi(argv[1]));
- if (rc < 0)
- return CMD_WARNING;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(meas_feed_scenario, meas_feed_scenario_cmd,
- "meas-feed scenario NAME",
- MEAS_STR "scenario\n" "Name up to 31 characters included in report\n")
-{
- meas_feed_scenario_set(argv[0]);
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(logging_fltr_imsi,
- logging_fltr_imsi_cmd,
- "logging filter imsi IMSI",
- LOGGING_STR FILTER_STR
- "Filter log messages by IMSI\n" "IMSI to be used as filter\n")
-{
- struct vlr_subscr *vlr_subscr;
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- struct log_target *tgt = osmo_log_vty2tgt(vty);
- const char *imsi = argv[0];
-
- if (!tgt)
- return CMD_WARNING;
-
- vlr_subscr = vlr_subscr_find_by_imsi(gsmnet->vlr, imsi);
-
- if (!vlr_subscr) {
- vty_out(vty, "%%no subscriber with IMSI(%s)%s",
- argv[0], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- log_set_filter_vlr_subscr(tgt, vlr_subscr);
- return CMD_SUCCESS;
-}
-
-static struct cmd_node hlr_node = {
- HLR_NODE,
- "%s(config-hlr)# ",
- 1,
-};
-
-DEFUN(cfg_hlr, cfg_hlr_cmd,
- "hlr", "Configure connection to the HLR")
-{
- vty->node = HLR_NODE;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_hlr_remote_ip, cfg_hlr_remote_ip_cmd, "remote-ip A.B.C.D",
- "Remote GSUP address of the HLR\n"
- "Remote GSUP address (default: " MSC_HLR_REMOTE_IP_DEFAULT ")")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- talloc_free((void*)gsmnet->gsup_server_addr_str);
- gsmnet->gsup_server_addr_str = talloc_strdup(gsmnet, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_hlr_remote_port, cfg_hlr_remote_port_cmd, "remote-port <1-65535>",
- "Remote GSUP port of the HLR\n"
- "Remote GSUP port (default: " OSMO_STRINGIFY(MSC_HLR_REMOTE_PORT_DEFAULT) ")")
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
- gsmnet->gsup_server_port = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-static int config_write_hlr(struct vty *vty)
-{
- struct gsm_network *gsmnet = gsmnet_from_vty(vty);
-
- vty_out(vty, "hlr%s", VTY_NEWLINE);
- vty_out(vty, " remote-ip %s%s",
- gsmnet->gsup_server_addr_str, VTY_NEWLINE);
- vty_out(vty, " remote-port %u%s",
- gsmnet->gsup_server_port, VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-int bsc_vty_init_extra(void)
-{
- osmo_signal_register_handler(SS_SCALL, scall_cbfn, NULL);
-
- install_element_ve(&show_subscr_cmd);
- install_element_ve(&show_subscr_cache_cmd);
-
- install_element_ve(&sms_send_pend_cmd);
-
- install_element_ve(&subscriber_create_cmd);
- install_element_ve(&subscriber_send_sms_cmd);
- install_element_ve(&subscriber_silent_sms_cmd);
- install_element_ve(&subscriber_silent_call_start_cmd);
- install_element_ve(&subscriber_silent_call_stop_cmd);
- install_element_ve(&subscriber_ussd_notify_cmd);
- install_element_ve(&subscriber_mstest_close_cmd);
- install_element_ve(&subscriber_mstest_open_cmd);
- install_element_ve(&subscriber_update_cmd);
- install_element_ve(&show_stats_cmd);
- install_element_ve(&show_smsqueue_cmd);
- install_element_ve(&logging_fltr_imsi_cmd);
-
- install_element(ENABLE_NODE, &ena_subscr_expire_cmd);
- install_element(ENABLE_NODE, &ena_subscr_a3a8_cmd);
- install_element(ENABLE_NODE, &smsqueue_trigger_cmd);
- install_element(ENABLE_NODE, &smsqueue_max_cmd);
- install_element(ENABLE_NODE, &smsqueue_clear_cmd);
- install_element(ENABLE_NODE, &smsqueue_fail_cmd);
- install_element(ENABLE_NODE, &subscriber_send_pending_sms_cmd);
- install_element(ENABLE_NODE, &meas_feed_scenario_cmd);
-
- install_element(CONFIG_NODE, &cfg_mncc_int_cmd);
- install_node(&mncc_int_node, config_write_mncc_int);
- vty_install_default(MNCC_INT_NODE);
- install_element(MNCC_INT_NODE, &mnccint_def_codec_f_cmd);
- install_element(MNCC_INT_NODE, &mnccint_def_codec_h_cmd);
- install_element(MNCC_INT_NODE, &mnccint_meas_feed_cmd);
- install_element(MNCC_INT_NODE, &meas_feed_scenario_cmd);
-
- install_element(CFG_LOG_NODE, &log_level_sms_cmd);
- install_element(CFG_LOG_NODE, &logging_fltr_imsi_cmd);
-
- install_element(CONFIG_NODE, &cfg_hlr_cmd);
- install_node(&hlr_node, config_write_hlr);
- install_element(HLR_NODE, &cfg_hlr_remote_ip_cmd);
- install_element(HLR_NODE, &cfg_hlr_remote_port_cmd);
-
- return 0;
-}
diff --git a/src/libtrau/Makefile.am b/src/libtrau/Makefile.am
deleted file mode 100644
index 46becd6aa..000000000
--- a/src/libtrau/Makefile.am
+++ /dev/null
@@ -1,31 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(LIBOSMONETIF_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOABIS_LIBS) \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-noinst_LIBRARIES = \
- libtrau.a \
- $(NULL)
-
-libtrau_a_SOURCES = \
- rtp_proxy.c \
- trau_mux.c \
- trau_upqueue.c \
- $(NULL)
diff --git a/src/libtrau/rtp_proxy.c b/src/libtrau/rtp_proxy.c
deleted file mode 100644
index 6b38ee5fe..000000000
--- a/src/libtrau/rtp_proxy.c
+++ /dev/null
@@ -1,764 +0,0 @@
-/* RTP proxy handling for ip.access nanoBTS */
-
-/* (C) 2009-2013 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <errno.h>
-#include <unistd.h>
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <sys/time.h> /* gettimeofday() */
-#include <unistd.h> /* get..() */
-#include <time.h> /* clock() */
-#include <sys/utsname.h> /* uname() */
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <openbsc/gsm_data.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/select.h>
-#include <openbsc/debug.h>
-#include <openbsc/rtp_proxy.h>
-#include <openbsc/mncc.h>
-#include <openbsc/trau_upqueue.h>
-
-#include <osmocom/netif/rtp.h>
-
-/* attempt to determine byte order */
-#include <sys/param.h>
-#include <limits.h>
-
-static LLIST_HEAD(rtp_sockets);
-
-/* should we mangle the CNAME inside SDES of RTCP packets? We disable
- * this by default, as it seems to be not needed */
-static int mangle_rtcp_cname = 0;
-
-enum rtp_bfd_priv {
- RTP_PRIV_NONE,
- RTP_PRIV_RTP,
- RTP_PRIV_RTCP
-};
-
-#define RTP_ALLOC_SIZE 1500
-
-#define RTCP_TYPE_SDES 202
-
-#define RTCP_IE_CNAME 1
-
-
-#define RTP_VERSION 2
-
-/* 33 for FR, all other codecs have smaller size */
-#define MAX_RTP_PAYLOAD_LEN 33
-
-/* decode an rtp frame and create a new buffer with payload */
-static int rtp_decode(struct msgb *msg, uint32_t callref, struct msgb **data)
-{
- struct msgb *new_msg;
- struct gsm_data_frame *frame;
- struct rtp_hdr *rtph = (struct rtp_hdr *)msg->data;
- struct rtp_x_hdr *rtpxh;
- uint8_t *payload, *payload_out;
- int payload_len;
- int msg_type;
- int x_len;
-
- if (msg->len < 12) {
- DEBUGPC(DLMUX, "received RTP frame too short (len = %d)\n",
- msg->len);
- return -EINVAL;
- }
- if (rtph->version != RTP_VERSION) {
- DEBUGPC(DLMUX, "received RTP version %d not supported.\n",
- rtph->version);
- return -EINVAL;
- }
- payload = msg->data + sizeof(struct rtp_hdr) + (rtph->csrc_count << 2);
- payload_len = msg->len - sizeof(struct rtp_hdr) - (rtph->csrc_count << 2);
- if (payload_len < 0) {
- DEBUGPC(DLMUX, "received RTP frame too short (len = %d, "
- "csrc count = %d)\n", msg->len, rtph->csrc_count);
- return -EINVAL;
- }
- if (rtph->extension) {
- if (payload_len < sizeof(struct rtp_x_hdr)) {
- DEBUGPC(DLMUX, "received RTP frame too short for "
- "extension header\n");
- return -EINVAL;
- }
- rtpxh = (struct rtp_x_hdr *)payload;
- x_len = ntohs(rtpxh->length) * 4 + sizeof(struct rtp_x_hdr);
- payload += x_len;
- payload_len -= x_len;
- if (payload_len < 0) {
- DEBUGPC(DLMUX, "received RTP frame too short, "
- "extension header exceeds frame length\n");
- return -EINVAL;
- }
- }
- if (rtph->padding) {
- if (payload_len < 1) {
- DEBUGPC(DLMUX, "received RTP frame too short for "
- "padding length\n");
- return -EINVAL;
- }
- payload_len -= payload[payload_len - 1];
- if (payload_len < 0) {
- DEBUGPC(DLMUX, "received RTP frame with padding "
- "greater than payload\n");
- return -EINVAL;
- }
- }
-
- switch (rtph->payload_type) {
- case RTP_PT_GSM_FULL:
- msg_type = GSM_TCHF_FRAME;
- if (payload_len != RTP_LEN_GSM_FULL) {
- DEBUGPC(DLMUX, "received RTP full rate frame with "
- "payload length != %d (len = %d)\n",
- RTP_LEN_GSM_FULL, payload_len);
- return -EINVAL;
- }
- break;
- case RTP_PT_GSM_EFR:
- msg_type = GSM_TCHF_FRAME_EFR;
- if (payload_len != RTP_LEN_GSM_EFR) {
- DEBUGPC(DLMUX, "received RTP extended full rate frame "
- "with payload length != %d (len = %d)\n",
- RTP_LEN_GSM_EFR, payload_len);
- return -EINVAL;
- }
- break;
- case RTP_PT_GSM_HALF:
- msg_type = GSM_TCHH_FRAME;
- if (payload_len != RTP_LEN_GSM_HALF) {
- DEBUGPC(DLMUX, "received RTP half rate frame with "
- "payload length != %d (len = %d)\n",
- RTP_LEN_GSM_HALF, payload_len);
- return -EINVAL;
- }
- break;
- case RTP_PT_AMR:
- msg_type = GSM_TCH_FRAME_AMR;
- break;
- default:
- DEBUGPC(DLMUX, "received RTP frame with unknown payload "
- "type %d\n", rtph->payload_type);
- return -EINVAL;
- }
-
- if (payload_len > MAX_RTP_PAYLOAD_LEN ||
- (rtph->payload_type == RTP_PT_AMR &&
- payload_len > MAX_RTP_PAYLOAD_LEN - 1)) {
- DEBUGPC(DLMUX, "RTP payload too large (%d octets)\n",
- payload_len);
- return -EINVAL;
- }
-
- /* always allocate for the maximum possible size to avoid
- * fragmentation */
- new_msg = msgb_alloc(sizeof(struct gsm_data_frame) +
- MAX_RTP_PAYLOAD_LEN+1, "GSM-DATA (TCH)");
-
- if (!new_msg)
- return -ENOMEM;
- frame = (struct gsm_data_frame *) msgb_put(new_msg, sizeof(struct gsm_data_frame));
- frame->msg_type = msg_type;
- frame->callref = callref;
- if (rtph->payload_type == RTP_PT_AMR) {
- /* for FR/HR/EFR the length is implicit. In AMR, we
- * need to make it explicit by using the first byte of
- * the data[] buffer as length byte */
- uint8_t *data0 = msgb_put(new_msg, 1);
- *data0 = payload_len;
- }
- payload_out = msgb_put(new_msg, payload_len);
- memcpy(payload_out, payload, payload_len);
-
- *data = new_msg;
- return 0;
-}
-
-/*! \brief encode and send a rtp frame
- * \param[in] rs RTP socket through which we shall send
- * \param[in] frame GSM RTP frame to be sent
- */
-int rtp_send_frame(struct rtp_socket *rs, struct gsm_data_frame *frame)
-{
- struct rtp_sub_socket *rss = &rs->rtp;
- struct msgb *msg;
- struct rtp_hdr *rtph;
- uint8_t *payload;
- int payload_type;
- int payload_len;
- int duration; /* in samples */
- int is_bfi = 0;
-
- if (rs->tx_action != RTP_SEND_DOWNSTREAM) {
- /* initialize sequences */
- rs->tx_action = RTP_SEND_DOWNSTREAM;
- rs->transmit.ssrc = rand();
- rs->transmit.sequence = random();
- rs->transmit.timestamp = random();
- }
-
- switch (frame->msg_type) {
- case GSM_TCHF_FRAME:
- payload_type = RTP_PT_GSM_FULL;
- payload_len = RTP_LEN_GSM_FULL;
- duration = RTP_GSM_DURATION;
- break;
- case GSM_TCHF_FRAME_EFR:
- payload_type = RTP_PT_GSM_EFR;
- payload_len = RTP_LEN_GSM_EFR;
- duration = RTP_GSM_DURATION;
- break;
- case GSM_TCHH_FRAME:
- payload_type = RTP_PT_GSM_HALF;
- payload_len = RTP_LEN_GSM_HALF;
- duration = RTP_GSM_DURATION;
- break;
- case GSM_TCH_FRAME_AMR:
- payload_type = RTP_PT_AMR;
- payload_len = frame->data[0];
- duration = RTP_GSM_DURATION;
- break;
- case GSM_BAD_FRAME:
- payload_type = 0;
- payload_len = 0;
- duration = RTP_GSM_DURATION;
- is_bfi = 1;
- break;
- default:
- DEBUGPC(DLMUX, "unsupported message type %d\n",
- frame->msg_type);
- return -EINVAL;
- }
-
- if (payload_len > MAX_RTP_PAYLOAD_LEN) {
- DEBUGPC(DLMUX, "RTP payload too large (%d octets)\n",
- payload_len);
- return -EINVAL;
- }
-
- if (is_bfi) {
- /* In case of a bad frame, just count and drop packet. */
- rs->transmit.timestamp += duration;
- rs->transmit.sequence++;
- return 0;
- }
-
- msg = msgb_alloc(sizeof(struct rtp_hdr) + payload_len, "RTP-GSM");
- if (!msg)
- return -ENOMEM;
- rtph = (struct rtp_hdr *) msgb_put(msg, sizeof(struct rtp_hdr));
- rtph->version = RTP_VERSION;
- rtph->padding = 0;
- rtph->extension = 0;
- rtph->csrc_count = 0;
- rtph->marker = 0;
- rtph->payload_type = payload_type;
- rtph->sequence = htons(rs->transmit.sequence++);
- rtph->timestamp = htonl(rs->transmit.timestamp);
- rs->transmit.timestamp += duration;
- rtph->ssrc = htonl(rs->transmit.ssrc);
-
- payload = msgb_put(msg, payload_len);
- if (frame->msg_type == GSM_TCH_FRAME_AMR)
- memcpy(payload, frame->data + 1, payload_len);
- else
- memcpy(payload, frame->data, payload_len);
- msgb_enqueue(&rss->tx_queue, msg);
- rss->bfd.when |= BSC_FD_WRITE;
-
- return 0;
-}
-
-/* iterate over all chunks in one RTCP message, look for CNAME IEs and
- * replace all of those with 'new_cname' */
-static int rtcp_sdes_cname_mangle(struct msgb *msg, struct rtcp_hdr *rh,
- uint16_t *rtcp_len, const char *new_cname)
-{
- uint8_t *rtcp_end;
- uint8_t *cur = (uint8_t *) rh;
- uint8_t tag, len = 0;
-
- rtcp_end = cur + *rtcp_len;
- /* move cur to end of RTP header */
- cur += sizeof(*rh);
-
- /* iterate over Chunks */
- while (cur+4 < rtcp_end) {
- /* skip four bytes SSRC/CSRC */
- cur += 4;
-
- /* iterate over IE's inside the chunk */
- while (cur+1 < rtcp_end) {
- tag = *cur++;
- if (tag == 0) {
- /* end of chunk, skip additional zero */
- while ((*cur++ == 0) && (cur < rtcp_end)) { }
- break;
- }
- len = *cur++;
-
- if (tag == RTCP_IE_CNAME) {
- /* we've found the CNAME, lets mangle it */
- if (len < strlen(new_cname)) {
- /* we need to make more space */
- int increase = strlen(new_cname) - len;
-
- msgb_push(msg, increase);
- memmove(cur+len+increase, cur+len,
- rtcp_end - (cur+len));
- /* FIXME: we have to respect RTCP
- * padding/alignment rules! */
- len += increase;
- *(cur-1) += increase;
- rtcp_end += increase;
- *rtcp_len += increase;
- }
- /* copy new CNAME into message */
- memcpy(cur, new_cname, strlen(new_cname));
- /* FIXME: zero the padding in case new CNAME
- * is smaller than old one !!! */
- }
- cur += len;
- }
- }
-
- return 0;
-}
-
-static int rtcp_mangle(struct msgb *msg, struct rtp_socket *rs)
-{
- struct rtp_sub_socket *rss = &rs->rtcp;
- struct rtcp_hdr *rtph;
- uint16_t old_len;
- int rc;
-
- if (!mangle_rtcp_cname)
- return 0;
-
- printf("RTCP\n");
- /* iterate over list of RTCP messages */
- rtph = (struct rtcp_hdr *)msg->data;
- while ((void *)rtph + sizeof(*rtph) <= (void *)msg->data + msg->len) {
- old_len = (ntohs(rtph->length) + 1) * 4;
- if ((void *)rtph + old_len > (void *)msg->data + msg->len) {
- DEBUGPC(DLMUX, "received RTCP packet too short for "
- "length element\n");
- return -EINVAL;
- }
- if (rtph->type == RTCP_TYPE_SDES) {
- char new_cname[255];
- osmo_strlcpy(new_cname,
- inet_ntoa(rss->sin_local.sin_addr),
- sizeof(new_cname));
- rc = rtcp_sdes_cname_mangle(msg, rtph, &old_len,
- new_cname);
- if (rc < 0)
- return rc;
- }
- rtph = (void *)rtph + old_len;
- }
-
- return 0;
-}
-
-/* read from incoming RTP/RTCP socket */
-static int rtp_socket_read(struct rtp_socket *rs, struct rtp_sub_socket *rss)
-{
- int rc;
- struct msgb *msg = msgb_alloc(RTP_ALLOC_SIZE, "RTP/RTCP");
- struct msgb *new_msg;
- struct rtp_sub_socket *other_rss;
-
- if (!msg)
- return -ENOMEM;
-
- rc = read(rss->bfd.fd, msg->data, RTP_ALLOC_SIZE);
- if (rc == 0) {
- rss->bfd.when &= ~BSC_FD_READ;
- goto out_free;
- } else if (rc < 0) {
- /* Ignore "connection refused". this happens, If we open the
- * socket faster than the remote side. */
- if (errno == ECONNREFUSED)
- goto out_free;
- DEBUGPC(DLMUX, "Read of RTP socket (%p) failed (errno %d, "
- "%s)\n", rs, errno, strerror(errno));
- rss->bfd.when &= ~BSC_FD_READ;
- goto out_free;
- }
-
- msgb_put(msg, rc);
-
- switch (rs->rx_action) {
- case RTP_PROXY:
- if (!rs->proxy.other_sock) {
- rc = -EIO;
- goto out_free;
- }
- if (rss->bfd.priv_nr == RTP_PRIV_RTP)
- other_rss = &rs->proxy.other_sock->rtp;
- else if (rss->bfd.priv_nr == RTP_PRIV_RTCP) {
- other_rss = &rs->proxy.other_sock->rtcp;
- /* modify RTCP SDES CNAME */
- rc = rtcp_mangle(msg, rs);
- if (rc < 0)
- goto out_free;
- } else {
- rc = -EINVAL;
- goto out_free;
- }
- msgb_enqueue(&other_rss->tx_queue, msg);
- other_rss->bfd.when |= BSC_FD_WRITE;
- break;
-
- case RTP_RECV_UPSTREAM:
- if (!rs->receive.callref || !rs->receive.net) {
- rc = -EIO;
- goto out_free;
- }
- if (rss->bfd.priv_nr == RTP_PRIV_RTCP) {
- if (!mangle_rtcp_cname) {
- msgb_free(msg);
- break;
- }
- /* modify RTCP SDES CNAME */
- rc = rtcp_mangle(msg, rs);
- if (rc < 0)
- goto out_free;
- msgb_enqueue(&rss->tx_queue, msg);
- rss->bfd.when |= BSC_FD_WRITE;
- break;
- }
- if (rss->bfd.priv_nr != RTP_PRIV_RTP) {
- rc = -EINVAL;
- goto out_free;
- }
- rc = rtp_decode(msg, rs->receive.callref, &new_msg);
- if (rc < 0)
- goto out_free;
- msgb_free(msg);
- trau_tx_to_mncc(rs->receive.net, new_msg);
- break;
-
- case RTP_NONE: /* if socket exists, but disabled by app */
- msgb_free(msg);
- break;
- }
-
- return 0;
-
-out_free:
- msgb_free(msg);
- return rc;
-}
-
-/* \brief write from tx_queue to RTP/RTCP socket */
-static int rtp_socket_write(struct rtp_socket *rs, struct rtp_sub_socket *rss)
-{
- struct msgb *msg;
- int written;
-
- msg = msgb_dequeue(&rss->tx_queue);
- if (!msg) {
- rss->bfd.when &= ~BSC_FD_WRITE;
- return 0;
- }
-
- written = write(rss->bfd.fd, msg->data, msg->len);
- if (written < msg->len) {
- LOGP(DLMIB, LOGL_ERROR, "short write");
- msgb_free(msg);
- return -EIO;
- }
-
- msgb_free(msg);
-
- return 0;
-}
-
-
-/*! \brief callback for the select.c:bfd_* layer */
-static int rtp_bfd_cb(struct osmo_fd *bfd, unsigned int flags)
-{
- struct rtp_socket *rs = bfd->data;
- struct rtp_sub_socket *rss;
-
- switch (bfd->priv_nr) {
- case RTP_PRIV_RTP:
- rss = &rs->rtp;
- break;
- case RTP_PRIV_RTCP:
- rss = &rs->rtcp;
- break;
- default:
- return -EINVAL;
- }
-
- if (flags & BSC_FD_READ)
- rtp_socket_read(rs, rss);
-
- if (flags & BSC_FD_WRITE)
- rtp_socket_write(rs, rss);
-
- return 0;
-}
-
-/*! \brief initialize one rtp sub-socket */
-static void init_rss(struct rtp_sub_socket *rss,
- struct rtp_socket *rs, int fd, int priv_nr)
-{
- /* initialize bfd */
- rss->bfd.fd = fd;
- rss->bfd.data = rs;
- rss->bfd.priv_nr = priv_nr;
- rss->bfd.cb = rtp_bfd_cb;
-}
-
-/*! \brief create a new RTP/RTCP socket and bind it */
-struct rtp_socket *rtp_socket_create(void)
-{
- int rc;
- struct rtp_socket *rs;
-
- DEBUGP(DLMUX, "rtp_socket_create(): ");
-
- rs = talloc_zero(tall_bsc_ctx, struct rtp_socket);
- if (!rs)
- return NULL;
-
- INIT_LLIST_HEAD(&rs->rtp.tx_queue);
- INIT_LLIST_HEAD(&rs->rtcp.tx_queue);
-
- rc = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
- if (rc < 0)
- goto out_free;
-
- init_rss(&rs->rtp, rs, rc, RTP_PRIV_RTP);
- rc = osmo_fd_register(&rs->rtp.bfd);
- if (rc < 0)
- goto out_rtp_socket;
-
- rc = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
- if (rc < 0)
- goto out_rtp_bfd;
-
- init_rss(&rs->rtcp, rs, rc, RTP_PRIV_RTCP);
- rc = osmo_fd_register(&rs->rtcp.bfd);
- if (rc < 0)
- goto out_rtcp_socket;
-
- DEBUGPC(DLMUX, "success\n");
-
- rc = rtp_socket_bind(rs, INADDR_ANY);
- if (rc < 0)
- goto out_rtcp_bfd;
-
- return rs;
-
-out_rtcp_bfd:
- osmo_fd_unregister(&rs->rtcp.bfd);
-out_rtcp_socket:
- close(rs->rtcp.bfd.fd);
-out_rtp_bfd:
- osmo_fd_unregister(&rs->rtp.bfd);
-out_rtp_socket:
- close(rs->rtp.bfd.fd);
-out_free:
- talloc_free(rs);
- DEBUGPC(DLMUX, "failed\n");
- return NULL;
-}
-
-static int rtp_sub_socket_bind(struct rtp_sub_socket *rss, uint32_t ip,
- uint16_t port)
-{
- int rc;
- socklen_t alen = sizeof(rss->sin_local);
-
- rss->sin_local.sin_family = AF_INET;
- rss->sin_local.sin_addr.s_addr = htonl(ip);
- rss->sin_local.sin_port = htons(port);
- rss->bfd.when |= BSC_FD_READ;
-
- rc = bind(rss->bfd.fd, (struct sockaddr *)&rss->sin_local,
- sizeof(rss->sin_local));
- if (rc < 0)
- return rc;
-
- /* retrieve the address we actually bound to, in case we
- * passed INADDR_ANY as IP address */
- return getsockname(rss->bfd.fd, (struct sockaddr *)&rss->sin_local,
- &alen);
-}
-
-#define RTP_PORT_BASE 30000
-static unsigned int next_udp_port = RTP_PORT_BASE;
-
-/*! \brief bind a RTP socket to a specific local address
- * \param[in] rs RTP socket to be bound
- * \param[in] ip local IP address to which socket is to be bound
- */
-int rtp_socket_bind(struct rtp_socket *rs, uint32_t ip)
-{
- int rc = -EIO;
- struct in_addr ia;
-
- ia.s_addr = htonl(ip);
- DEBUGP(DLMUX, "rtp_socket_bind(rs=%p, IP=%s): ", rs,
- inet_ntoa(ia));
-
- /* try to bind to a consecutive pair of ports */
- for (next_udp_port = next_udp_port % 0xffff;
- next_udp_port < 0xffff; next_udp_port += 2) {
- rc = rtp_sub_socket_bind(&rs->rtp, ip, next_udp_port);
- if (rc != 0)
- continue;
-
- rc = rtp_sub_socket_bind(&rs->rtcp, ip, next_udp_port+1);
- if (rc == 0)
- break;
- }
- if (rc < 0) {
- DEBUGPC(DLMUX, "failed\n");
- return rc;
- }
-
- ia.s_addr = rs->rtp.sin_local.sin_addr.s_addr;
- DEBUGPC(DLMUX, "BOUND_IP=%s, BOUND_PORT=%u\n",
- inet_ntoa(ia), ntohs(rs->rtp.sin_local.sin_port));
- return ntohs(rs->rtp.sin_local.sin_port);
-}
-
-static int rtp_sub_socket_connect(struct rtp_sub_socket *rss,
- uint32_t ip, uint16_t port)
-{
- int rc;
- socklen_t alen = sizeof(rss->sin_local);
-
- rss->sin_remote.sin_family = AF_INET;
- rss->sin_remote.sin_addr.s_addr = htonl(ip);
- rss->sin_remote.sin_port = htons(port);
-
- rc = connect(rss->bfd.fd, (struct sockaddr *) &rss->sin_remote,
- sizeof(rss->sin_remote));
- if (rc < 0)
- return rc;
-
- return getsockname(rss->bfd.fd, (struct sockaddr *)&rss->sin_local,
- &alen);
-}
-
-/*! \brief 'connect' a RTP socket to a remote peer
- * \param[in] rs RTP socket to be connected
- * \param[in] ip remote IP address to which to connect
- * \param[in] port remote UDP port number to which to connect
- */
-int rtp_socket_connect(struct rtp_socket *rs, uint32_t ip, uint16_t port)
-{
- int rc;
- struct in_addr ia;
-
- ia.s_addr = htonl(ip);
- DEBUGP(DLMUX, "rtp_socket_connect(rs=%p, ip=%s, port=%u)\n",
- rs, inet_ntoa(ia), port);
-
- rc = rtp_sub_socket_connect(&rs->rtp, ip, port);
- if (rc < 0)
- return rc;
-
- return rtp_sub_socket_connect(&rs->rtcp, ip, port+1);
-}
-
-/*! \brief bind two RTP/RTCP sockets together in the proxy
- * \param[in] this First RTP socket
- * \param[in] other Second RTP socket
- */
-int rtp_socket_proxy(struct rtp_socket *this, struct rtp_socket *other)
-{
- DEBUGP(DLMUX, "rtp_socket_proxy(this=%p, other=%p)\n",
- this, other);
-
- this->rx_action = RTP_PROXY;
- this->proxy.other_sock = other;
-
- other->rx_action = RTP_PROXY;
- other->proxy.other_sock = this;
-
- return 0;
-}
-
-/*! \brief bind RTP/RTCP socket to application, disabling proxy
- * \param[in] this RTP socket
- * \param[in] net gsm_network argument to trau_tx_to_mncc()
- * \param[in] callref callref argument to trau_tx_to_mncc()
- */
-int rtp_socket_upstream(struct rtp_socket *this, struct gsm_network *net,
- uint32_t callref)
-{
- DEBUGP(DLMUX, "rtp_socket_proxy(this=%p, callref=%u)\n",
- this, callref);
-
- if (callref) {
- this->rx_action = RTP_RECV_UPSTREAM;
- this->receive.net = net;
- this->receive.callref = callref;
- } else
- this->rx_action = RTP_NONE;
-
- return 0;
-}
-
-static void free_tx_queue(struct rtp_sub_socket *rss)
-{
- struct msgb *msg;
-
- while ((msg = msgb_dequeue(&rss->tx_queue)))
- msgb_free(msg);
-}
-
-/*! \brief Free/release a previously allocated RTP socket
- * \param[in[] rs RTP/RTCP socket to be released
- */
-int rtp_socket_free(struct rtp_socket *rs)
-{
- DEBUGP(DLMUX, "rtp_socket_free(rs=%p)\n", rs);
-
- /* make sure we don't leave references dangling to us */
- if (rs->rx_action == RTP_PROXY &&
- rs->proxy.other_sock)
- rs->proxy.other_sock->proxy.other_sock = NULL;
-
- osmo_fd_unregister(&rs->rtp.bfd);
- close(rs->rtp.bfd.fd);
- free_tx_queue(&rs->rtp);
-
- osmo_fd_unregister(&rs->rtcp.bfd);
- close(rs->rtcp.bfd.fd);
- free_tx_queue(&rs->rtcp);
-
- talloc_free(rs);
-
- return 0;
-}
diff --git a/src/libtrau/trau_mux.c b/src/libtrau/trau_mux.c
deleted file mode 100644
index b37c7650e..000000000
--- a/src/libtrau/trau_mux.c
+++ /dev/null
@@ -1,547 +0,0 @@
-/* Simple TRAU frame reflector to route voice calls */
-
-/* (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <errno.h>
-#include <stdlib.h>
-#include <string.h>
-
-#include <openbsc/gsm_data.h>
-#include <osmocom/abis/trau_frame.h>
-#include <openbsc/trau_mux.h>
-#include <osmocom/abis/subchan_demux.h>
-#include <osmocom/abis/e1_input.h>
-#include <openbsc/debug.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/trau_upqueue.h>
-#include <osmocom/core/crcgen.h>
-#include <openbsc/transaction.h>
-
-/* this corresponds to the bit-lengths of the individual codec
- * parameters as indicated in Table 1.1 of TS 06.10 */
-static const uint8_t gsm_fr_map[] = {
- 6, 6, 5, 5, 4, 4, 3, 3,
- 7, 2, 2, 6, 3, 3, 3, 3,
- 3, 3, 3, 3, 3, 3, 3, 3,
- 3, 7, 2, 2, 6, 3, 3, 3,
- 3, 3, 3, 3, 3, 3, 3, 3,
- 3, 3, 7, 2, 2, 6, 3, 3,
- 3, 3, 3, 3, 3, 3, 3, 3,
- 3, 3, 3, 7, 2, 2, 6, 3,
- 3, 3, 3, 3, 3, 3, 3, 3,
- 3, 3, 3, 3
-};
-
-
-/*
- * EFR TRAU parity
- *
- * g(x) = x^3 + x^1 + 1
- */
-static const struct osmo_crc8gen_code gsm0860_efr_crc3 = {
- .bits = 3,
- .poly = 0x3,
- .init = 0x0,
- .remainder = 0x7,
-};
-
-/* EFR parity bits */
-static inline void efr_parity_bits_1(ubit_t *check_bits, const ubit_t *d_bits)
-{
- memcpy(check_bits + 0 , d_bits + 0, 22);
- memcpy(check_bits + 22 , d_bits + 24, 3);
- check_bits[25] = d_bits[28];
-}
-
-static inline void efr_parity_bits_2(ubit_t *check_bits, const ubit_t *d_bits)
-{
- memcpy(check_bits + 0 , d_bits + 42, 10);
- memcpy(check_bits + 10 , d_bits + 90, 2);
-}
-
-static inline void efr_parity_bits_3(ubit_t *check_bits, const ubit_t *d_bits)
-{
- memcpy(check_bits + 0 , d_bits + 98, 5);
- check_bits[5] = d_bits[104];
- memcpy(check_bits + 6 , d_bits + 143, 2);
-}
-
-static inline void efr_parity_bits_4(ubit_t *check_bits, const ubit_t *d_bits)
-{
- memcpy(check_bits + 0 , d_bits + 151, 10);
- memcpy(check_bits + 10 , d_bits + 199, 2);
-}
-
-static inline void efr_parity_bits_5(ubit_t *check_bits, const ubit_t *d_bits)
-{
- memcpy(check_bits + 0 , d_bits + 207, 5);
- check_bits[5] = d_bits[213];
- memcpy(check_bits + 6 , d_bits + 252, 2);
-}
-
-struct map_entry {
- struct llist_head list;
- struct gsm_e1_subslot src, dst;
-};
-
-struct upqueue_entry {
- struct llist_head list;
- struct gsm_network *net;
- struct gsm_e1_subslot src;
- uint32_t callref;
-};
-
-static LLIST_HEAD(ss_map);
-static LLIST_HEAD(ss_upqueue);
-
-void *tall_map_ctx, *tall_upq_ctx;
-
-/* map one particular subslot to another subslot */
-int trau_mux_map(const struct gsm_e1_subslot *src,
- const struct gsm_e1_subslot *dst)
-{
- struct map_entry *me;
-
- me = talloc(tall_map_ctx, struct map_entry);
- if (!me) {
- LOGP(DLMIB, LOGL_FATAL, "Out of memory\n");
- return -ENOMEM;
- }
-
- DEBUGP(DCC, "Setting up TRAU mux map between (e1=%u,ts=%u,ss=%u) "
- "and (e1=%u,ts=%u,ss=%u)\n",
- src->e1_nr, src->e1_ts, src->e1_ts_ss,
- dst->e1_nr, dst->e1_ts, dst->e1_ts_ss);
-
- /* make sure to get rid of any stale old mappings */
- trau_mux_unmap(src, 0);
- trau_mux_unmap(dst, 0);
-
- memcpy(&me->src, src, sizeof(me->src));
- memcpy(&me->dst, dst, sizeof(me->dst));
- llist_add(&me->list, &ss_map);
-
- return 0;
-}
-
-int trau_mux_map_lchan(const struct gsm_lchan *src,
- const struct gsm_lchan *dst)
-{
- struct gsm_e1_subslot *src_ss, *dst_ss;
-
- src_ss = &src->ts->e1_link;
- dst_ss = &dst->ts->e1_link;
-
- return trau_mux_map(src_ss, dst_ss);
-}
-
-
-/* unmap one particular subslot from another subslot */
-int trau_mux_unmap(const struct gsm_e1_subslot *ss, uint32_t callref)
-{
- struct map_entry *me, *me2;
- struct upqueue_entry *ue, *ue2;
-
- if (ss)
- llist_for_each_entry_safe(me, me2, &ss_map, list) {
- if (!memcmp(&me->src, ss, sizeof(*ss)) ||
- !memcmp(&me->dst, ss, sizeof(*ss))) {
- llist_del(&me->list);
- return 0;
- }
- }
- llist_for_each_entry_safe(ue, ue2, &ss_upqueue, list) {
- if (ue->callref == callref) {
- llist_del(&ue->list);
- return 0;
- }
- if (ss && !memcmp(&ue->src, ss, sizeof(*ss))) {
- llist_del(&ue->list);
- return 0;
- }
- }
- return -ENOENT;
-}
-
-/* look-up an enty in the TRAU mux map */
-static struct gsm_e1_subslot *
-lookup_trau_mux_map(const struct gsm_e1_subslot *src)
-{
- struct map_entry *me;
-
- llist_for_each_entry(me, &ss_map, list) {
- if (!memcmp(&me->src, src, sizeof(*src)))
- return &me->dst;
- if (!memcmp(&me->dst, src, sizeof(*src)))
- return &me->src;
- }
- return NULL;
-}
-
-/* look-up an enty in the TRAU upqueue */
-struct upqueue_entry *
-lookup_trau_upqueue(const struct gsm_e1_subslot *src)
-{
- struct upqueue_entry *ue;
-
- llist_for_each_entry(ue, &ss_upqueue, list) {
- if (!memcmp(&ue->src, src, sizeof(*src)))
- return ue;
- }
- return NULL;
-}
-
-static const uint8_t c_bits_check_fr[] = { 0, 0, 0, 1, 0 };
-static const uint8_t c_bits_check_efr[] = { 1, 1, 0, 1, 0 };
-
-struct msgb *trau_decode_fr(uint32_t callref,
- const struct decoded_trau_frame *tf)
-{
- struct msgb *msg;
- struct gsm_data_frame *frame;
- unsigned char *data;
- int i, j, k, l, o;
-
- msg = msgb_alloc(sizeof(struct gsm_data_frame) + 33,
- "GSM-DATA");
- if (!msg)
- return NULL;
-
- frame = (struct gsm_data_frame *)msg->data;
- memset(frame, 0, sizeof(struct gsm_data_frame));
- data = frame->data;
- data[0] = 0xd << 4;
- /* reassemble d-bits */
- i = 0; /* counts bits */
- j = 4; /* counts output bits */
- k = gsm_fr_map[0]-1; /* current number bit in element */
- l = 0; /* counts element bits */
- o = 0; /* offset input bits */
- while (i < 260) {
- data[j/8] |= (tf->d_bits[k+o] << (7-(j%8)));
- /* to avoid out-of-bounds access in gsm_fr_map[++l] */
- if (i == 259)
- break;
- if (--k < 0) {
- o += gsm_fr_map[l];
- k = gsm_fr_map[++l]-1;
- }
- i++;
- j++;
- }
- if (tf->c_bits[11]) /* BFI */
- frame->msg_type = GSM_BAD_FRAME;
- else
- frame->msg_type = GSM_TCHF_FRAME;
- frame->callref = callref;
- msgb_put(msg, sizeof(struct gsm_data_frame) + 33);
-
- return msg;
-}
-
-struct msgb *trau_decode_efr(uint32_t callref,
- const struct decoded_trau_frame *tf)
-{
- struct msgb *msg;
- struct gsm_data_frame *frame;
- unsigned char *data;
- int i, j, rc;
- ubit_t check_bits[26];
-
- msg = msgb_alloc(sizeof(struct gsm_data_frame) + 31,
- "GSM-DATA");
- if (!msg)
- return NULL;
-
- frame = (struct gsm_data_frame *)msg->data;
- memset(frame, 0, sizeof(struct gsm_data_frame));
- frame->msg_type = GSM_TCHF_FRAME_EFR;
- frame->callref = callref;
- msgb_put(msg, sizeof(struct gsm_data_frame) + 31);
-
- if (tf->c_bits[11]) /* BFI */
- goto bad_frame;
-
- data = frame->data;
- data[0] = 0xc << 4;
- /* reassemble d-bits */
- for (i = 1, j = 4; i < 39; i++, j++)
- data[j/8] |= (tf->d_bits[i] << (7-(j%8)));
- efr_parity_bits_1(check_bits, tf->d_bits);
- rc = osmo_crc8gen_check_bits(&gsm0860_efr_crc3, check_bits, 26,
- tf->d_bits + 39);
- if (rc)
- goto bad_frame;
- for (i = 42, j = 42; i < 95; i++, j++)
- data[j/8] |= (tf->d_bits[i] << (7-(j%8)));
- efr_parity_bits_2(check_bits, tf->d_bits);
- rc = osmo_crc8gen_check_bits(&gsm0860_efr_crc3, check_bits, 12,
- tf->d_bits + 95);
- if (rc)
- goto bad_frame;
- for (i = 98, j = 95; i < 148; i++, j++)
- data[j/8] |= (tf->d_bits[i] << (7-(j%8)));
- efr_parity_bits_3(check_bits, tf->d_bits);
- rc = osmo_crc8gen_check_bits(&gsm0860_efr_crc3, check_bits, 8,
- tf->d_bits + 148);
- if (rc)
- goto bad_frame;
- for (i = 151, j = 145; i < 204; i++, j++)
- data[j/8] |= (tf->d_bits[i] << (7-(j%8)));
- efr_parity_bits_4(check_bits, tf->d_bits);
- rc = osmo_crc8gen_check_bits(&gsm0860_efr_crc3, check_bits, 12,
- tf->d_bits + 204);
- if (rc)
- goto bad_frame;
- for (i = 207, j = 198; i < 257; i++, j++)
- data[j/8] |= (tf->d_bits[i] << (7-(j%8)));
- efr_parity_bits_5(check_bits, tf->d_bits);
- rc = osmo_crc8gen_check_bits(&gsm0860_efr_crc3, check_bits, 8,
- tf->d_bits + 257);
- if (rc)
- goto bad_frame;
-
- return msg;
-
-bad_frame:
- frame->msg_type = GSM_BAD_FRAME;
-
- return msg;
-}
-
-/* we get called by subchan_demux */
-int trau_mux_input(struct gsm_e1_subslot *src_e1_ss,
- const uint8_t *trau_bits, int num_bits)
-{
- struct decoded_trau_frame tf;
- uint8_t trau_bits_out[TRAU_FRAME_BITS];
- struct gsm_e1_subslot *dst_e1_ss = lookup_trau_mux_map(src_e1_ss);
- struct subch_mux *mx;
- struct upqueue_entry *ue;
- int rc;
-
- /* decode TRAU, change it to downlink, re-encode */
- rc = decode_trau_frame(&tf, trau_bits);
- if (rc)
- return rc;
-
- if (!dst_e1_ss) {
- struct msgb *msg = NULL;
- /* frame shall be sent to upqueue */
- if (!(ue = lookup_trau_upqueue(src_e1_ss)))
- return -EINVAL;
- if (!ue->callref)
- return -EINVAL;
- if (!memcmp(tf.c_bits, c_bits_check_fr, 5))
- msg = trau_decode_fr(ue->callref, &tf);
- else if (!memcmp(tf.c_bits, c_bits_check_efr, 5))
- msg = trau_decode_efr(ue->callref, &tf);
- else {
- DEBUGPC(DLMUX, "illegal trau (C1-C5) %s\n",
- osmo_hexdump(tf.c_bits, 5));
- DEBUGPC(DLMUX, "test trau (C1-C5) %s\n",
- osmo_hexdump(c_bits_check_efr, 5));
- return -EINVAL;
- }
- if (!msg)
- return -ENOMEM;
- trau_tx_to_mncc(ue->net, msg);
-
- return 0;
- }
-
- mx = e1inp_get_mux(dst_e1_ss->e1_nr, dst_e1_ss->e1_ts);
- if (!mx)
- return -EINVAL;
-
- trau_frame_up2down(&tf);
- encode_trau_frame(trau_bits_out, &tf);
-
- /* and send it to the muxer */
- return subchan_mux_enqueue(mx, dst_e1_ss->e1_ts_ss, trau_bits_out,
- TRAU_FRAME_BITS);
-}
-
-/* callback when a TRAU frame was received */
-int subch_cb(struct subch_demux *dmx, int ch, uint8_t *data, int len,
- void *_priv)
-{
- struct e1inp_ts *e1i_ts = _priv;
- struct gsm_e1_subslot src_ss;
-
- src_ss.e1_nr = e1i_ts->line->num;
- src_ss.e1_ts = e1i_ts->num;
- src_ss.e1_ts_ss = ch;
-
- return trau_mux_input(&src_ss, data, len);
-}
-
-/* add receiver instance for lchan and callref */
-int trau_recv_lchan(struct gsm_lchan *lchan, uint32_t callref)
-{
- struct gsm_e1_subslot *src_ss;
- struct upqueue_entry *ue;
-
- ue = talloc(tall_upq_ctx, struct upqueue_entry);
- if (!ue)
- return -ENOMEM;
-
- src_ss = &lchan->ts->e1_link;
-
- DEBUGP(DCC, "Setting up TRAU receiver (e1=%u,ts=%u,ss=%u) "
- "and (callref 0x%x)\n",
- src_ss->e1_nr, src_ss->e1_ts, src_ss->e1_ts_ss,
- callref);
-
- /* make sure to get rid of any stale old mappings */
- trau_mux_unmap(src_ss, callref);
-
- memcpy(&ue->src, src_ss, sizeof(ue->src));
- ue->net = lchan->ts->trx->bts->network;
- ue->callref = callref;
- llist_add(&ue->list, &ss_upqueue);
-
- return 0;
-}
-
-void trau_encode_fr(struct decoded_trau_frame *tf,
- const unsigned char *data)
-{
- int i, j, k, l, o;
-
- /* set c-bits and t-bits */
- tf->c_bits[0] = 1;
- tf->c_bits[1] = 1;
- tf->c_bits[2] = 1;
- tf->c_bits[3] = 0;
- tf->c_bits[4] = 0;
- memset(&tf->c_bits[5], 0, 6);
- memset(&tf->c_bits[11], 1, 10);
- memset(&tf->t_bits[0], 1, 4);
- /* reassemble d-bits */
- i = 0; /* counts bits */
- j = 4; /* counts input bits */
- k = gsm_fr_map[0]-1; /* current number bit in element */
- l = 0; /* counts element bits */
- o = 0; /* offset output bits */
- while (i < 260) {
- tf->d_bits[k+o] = (data[j/8] >> (7-(j%8))) & 1;
- /* to avoid out-of-bounds access in gsm_fr_map[++l] */
- if (i == 259)
- break;
- if (--k < 0) {
- o += gsm_fr_map[l];
- k = gsm_fr_map[++l]-1;
- }
- i++;
- j++;
- }
-}
-
-void trau_encode_efr(struct decoded_trau_frame *tf,
- const unsigned char *data)
-{
- int i, j;
- ubit_t check_bits[26];
-
- /* set c-bits and t-bits */
- tf->c_bits[0] = 1;
- tf->c_bits[1] = 1;
- tf->c_bits[2] = 0;
- tf->c_bits[3] = 1;
- tf->c_bits[4] = 0;
- memset(&tf->c_bits[5], 0, 6);
- memset(&tf->c_bits[11], 1, 10);
- memset(&tf->t_bits[0], 1, 4);
- /* reassemble d-bits */
- tf->d_bits[0] = 1;
- for (i = 1, j = 4; i < 39; i++, j++)
- tf->d_bits[i] = (data[j/8] >> (7-(j%8))) & 1;
- efr_parity_bits_1(check_bits, tf->d_bits);
- osmo_crc8gen_set_bits(&gsm0860_efr_crc3, check_bits, 26,
- tf->d_bits + 39);
- for (i = 42, j = 42; i < 95; i++, j++)
- tf->d_bits[i] = (data[j/8] >> (7-(j%8))) & 1;
- efr_parity_bits_2(check_bits, tf->d_bits);
- osmo_crc8gen_set_bits(&gsm0860_efr_crc3, check_bits, 12,
- tf->d_bits + 95);
- for (i = 98, j = 95; i < 148; i++, j++)
- tf->d_bits[i] = (data[j/8] >> (7-(j%8))) & 1;
- efr_parity_bits_3(check_bits, tf->d_bits);
- osmo_crc8gen_set_bits(&gsm0860_efr_crc3, check_bits, 8,
- tf->d_bits + 148);
- for (i = 151, j = 145; i < 204; i++, j++)
- tf->d_bits[i] = (data[j/8] >> (7-(j%8))) & 1;
- efr_parity_bits_4(check_bits, tf->d_bits);
- osmo_crc8gen_set_bits(&gsm0860_efr_crc3, check_bits, 12,
- tf->d_bits + 204);
- for (i = 207, j = 198; i < 257; i++, j++)
- tf->d_bits[i] = (data[j/8] >> (7-(j%8))) & 1;
- efr_parity_bits_5(check_bits, tf->d_bits);
- osmo_crc8gen_set_bits(&gsm0860_efr_crc3, check_bits, 8,
- tf->d_bits + 257);
-}
-
-int trau_send_frame(struct gsm_lchan *lchan, struct gsm_data_frame *frame)
-{
- uint8_t trau_bits_out[TRAU_FRAME_BITS];
- struct gsm_e1_subslot *dst_e1_ss = &lchan->ts->e1_link;
- struct subch_mux *mx;
- struct decoded_trau_frame tf;
-
- mx = e1inp_get_mux(dst_e1_ss->e1_nr, dst_e1_ss->e1_ts);
- if (!mx)
- return -EINVAL;
-
- switch (frame->msg_type) {
- case GSM_TCHF_FRAME:
- trau_encode_fr(&tf, frame->data);
- break;
- case GSM_TCHF_FRAME_EFR:
- trau_encode_efr(&tf, frame->data);
- break;
- default:
- DEBUGPC(DLMUX, "unsupported message type %d\n",
- frame->msg_type);
- return -EINVAL;
- }
-
- encode_trau_frame(trau_bits_out, &tf);
-
- /* and send it to the muxer */
- return subchan_mux_enqueue(mx, dst_e1_ss->e1_ts_ss, trau_bits_out,
- TRAU_FRAME_BITS);
-}
-
-/* switch trau muxer to new lchan */
-int switch_trau_mux(struct gsm_lchan *old_lchan, struct gsm_lchan *new_lchan)
-{
- struct gsm_network *net = old_lchan->ts->trx->bts->network;
- struct gsm_trans *trans;
-
- /* look up transaction with TCH frame receive enabled */
- llist_for_each_entry(trans, &net->trans_list, entry) {
- if (trans->conn && trans->conn->lchan == old_lchan && trans->tch_recv) {
- /* switch */
- trau_recv_lchan(new_lchan, trans->callref);
- }
- }
-
- return 0;
-}
diff --git a/src/libtrau/trau_upqueue.c b/src/libtrau/trau_upqueue.c
deleted file mode 100644
index f8edaf0ff..000000000
--- a/src/libtrau/trau_upqueue.c
+++ /dev/null
@@ -1,27 +0,0 @@
-/* trau_upqueue.c - Pass msgb's up the chain */
-
-/* (C) 2010 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-
-#include <openbsc/mncc.h>
-#include <openbsc/gsm_data.h>
-
-void trau_tx_to_mncc(struct gsm_network *net, struct msgb *msg)
-{
- net->mncc_recv(net, msg);
-}
diff --git a/src/libvlr/Makefile.am b/src/libvlr/Makefile.am
deleted file mode 100644
index 17ad4111f..000000000
--- a/src/libvlr/Makefile.am
+++ /dev/null
@@ -1,19 +0,0 @@
-AM_CPPFLAGS = $(all_includes) -I$(top_srcdir)/include -I$(top_builddir)
-AM_CFLAGS=-Wall $(LIBOSMOCORE_CFLAGS) $(LIBOSMOVTY_CFLAGS) \
- $(COVERAGE_CFLAGS) $(LIBCRYPTO_CFLAGS)
-
-noinst_HEADERS = \
- vlr_access_req_fsm.h \
- vlr_auth_fsm.h \
- vlr_core.h \
- vlr_lu_fsm.h \
- $(NULL)
-
-noinst_LIBRARIES = libvlr.a
-
-libvlr_a_SOURCES = \
- vlr.c \
- vlr_access_req_fsm.c \
- vlr_auth_fsm.c \
- vlr_lu_fsm.c \
- $(NULL)
diff --git a/src/libvlr/vlr.c b/src/libvlr/vlr.c
deleted file mode 100644
index d95d1b7ec..000000000
--- a/src/libvlr/vlr.c
+++ /dev/null
@@ -1,1112 +0,0 @@
-/* Osmocom Visitor Location Register (VLR) code base */
-
-/* (C) 2016 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/fsm.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/protocol/gsm_04_08_gprs.h>
-#include <osmocom/gsm/gsup.h>
-#include <osmocom/gsm/apn.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/gsup_client.h>
-#include <openbsc/vlr.h>
-#include <openbsc/gprs_sgsn.h>
-#include <openbsc/gprs_utils.h>
-#include <openbsc/debug.h>
-
-#include <openssl/rand.h>
-
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <limits.h>
-
-#include "vlr_core.h"
-#include "vlr_auth_fsm.h"
-#include "vlr_lu_fsm.h"
-#include "vlr_access_req_fsm.h"
-
-#define SGSN_SUBSCR_MAX_RETRIES 3
-#define SGSN_SUBSCR_RETRY_INTERVAL 10
-
-/***********************************************************************
- * Convenience functions
- ***********************************************************************/
-
-const struct value_string vlr_ciph_names[] = {
- OSMO_VALUE_STRING(VLR_CIPH_NONE),
- OSMO_VALUE_STRING(VLR_CIPH_A5_1),
- OSMO_VALUE_STRING(VLR_CIPH_A5_2),
- OSMO_VALUE_STRING(VLR_CIPH_A5_3),
- { 0, NULL }
-};
-
-uint32_t vlr_timer(struct vlr_instance *vlr, uint32_t timer)
-{
- uint32_t tidx = 0xffffffff;
-
- switch (timer) {
- case 3270:
- tidx = VLR_T_3270;
- break;
- case 3260:
- tidx = VLR_T_3260;
- break;
- case 3250:
- tidx = VLR_T_3250;
- break;
- }
-
- OSMO_ASSERT(tidx < sizeof(vlr->cfg.timer));
- return vlr->cfg.timer[tidx];
-}
-
-struct vlr_subscr *_vlr_subscr_find_by_imsi(struct vlr_instance *vlr,
- const char *imsi,
- const char *file, int line)
-{
- struct vlr_subscr *vsub;
-
- if (!imsi || !*imsi)
- return NULL;
-
- llist_for_each_entry(vsub, &vlr->subscribers, list) {
- if (vlr_subscr_matches_imsi(vsub, imsi))
- return _vlr_subscr_get(vsub, file, line);
- }
- return NULL;
-}
-
-struct vlr_subscr *_vlr_subscr_find_by_tmsi(struct vlr_instance *vlr,
- uint32_t tmsi,
- const char *file, int line)
-{
- struct vlr_subscr *vsub;
-
- if (tmsi == GSM_RESERVED_TMSI)
- return NULL;
-
- llist_for_each_entry(vsub, &vlr->subscribers, list) {
- if (vlr_subscr_matches_tmsi(vsub, tmsi))
- return _vlr_subscr_get(vsub, file, line);
- }
- return NULL;
-}
-
-struct vlr_subscr *_vlr_subscr_find_by_msisdn(struct vlr_instance *vlr,
- const char *msisdn,
- const char *file, int line)
-{
- struct vlr_subscr *vsub;
-
- if (!msisdn || !*msisdn)
- return NULL;
-
- llist_for_each_entry(vsub, &vlr->subscribers, list) {
- if (vlr_subscr_matches_msisdn(vsub, msisdn))
- return _vlr_subscr_get(vsub, file, line);
- }
- return NULL;
-}
-
-/* Transmit GSUP message to HLR */
-static int vlr_tx_gsup_message(struct vlr_instance *vlr,
- struct osmo_gsup_message *gsup_msg)
-{
- struct msgb *msg = gsup_client_msgb_alloc();
-
- osmo_gsup_encode(msg, gsup_msg);
-
- if (!vlr->gsup_client) {
- LOGP(DVLR, LOGL_NOTICE, "GSUP link is down, cannot "
- "send GSUP: %s\n", msgb_hexdump(msg));
- msgb_free(msg);
- return -ENOTSUP;
- }
-
- LOGP(DVLR, LOGL_DEBUG, "GSUP tx: %s\n",
- osmo_hexdump_nospc(msg->data, msg->len));
-
- return gsup_client_send(vlr->gsup_client, msg);
-}
-
-/* Transmit GSUP message for subscriber to HLR, using IMSI from subscriber */
-static int vlr_subscr_tx_gsup_message(struct vlr_subscr *vsub,
- struct osmo_gsup_message *gsup_msg)
-{
- struct vlr_instance *vlr = vsub->vlr;
-
- if (strlen(gsup_msg->imsi) == 0)
- osmo_strlcpy(gsup_msg->imsi, vsub->imsi, sizeof(gsup_msg->imsi));
-
- return vlr_tx_gsup_message(vlr, gsup_msg);
-}
-
-/* Transmit GSUP error in response to original message */
-static int vlr_tx_gsup_error_reply(struct vlr_instance *vlr,
- struct osmo_gsup_message *gsup_orig,
- enum gsm48_gmm_cause cause)
-{
- struct osmo_gsup_message gsup_reply = {0};
-
- osmo_strlcpy(gsup_reply.imsi, gsup_orig->imsi, sizeof(gsup_reply.imsi));
- gsup_reply.cause = cause;
- gsup_reply.message_type =
- OSMO_GSUP_TO_MSGT_ERROR(gsup_orig->message_type);
-
- return vlr_tx_gsup_message(vlr, &gsup_reply);
-}
-
-struct vlr_subscr *_vlr_subscr_get(struct vlr_subscr *sub, const char *file, int line)
-{
- if (!sub)
- return NULL;
- OSMO_ASSERT(sub->use_count < INT_MAX);
- sub->use_count++;
- LOGPSRC(DREF, LOGL_DEBUG, file, line,
- "VLR subscr %s usage increases to: %d\n",
- vlr_subscr_name(sub), sub->use_count);
- return sub;
-}
-
-struct vlr_subscr *_vlr_subscr_put(struct vlr_subscr *sub, const char *file, int line)
-{
- if (!sub)
- return NULL;
- sub->use_count--;
- LOGPSRC(DREF, sub->use_count >= 0? LOGL_DEBUG : LOGL_ERROR,
- file, line,
- "VLR subscr %s usage decreases to: %d\n",
- vlr_subscr_name(sub), sub->use_count);
- if (sub->use_count <= 0)
- vlr_subscr_free(sub);
- return NULL;
-}
-
-/* Allocate a new subscriber and insert it into list */
-static struct vlr_subscr *_vlr_subscr_alloc(struct vlr_instance *vlr)
-{
- struct vlr_subscr *vsub;
- int i;
-
- vsub = talloc_zero(vlr, struct vlr_subscr);
- vsub->vlr = vlr;
- vsub->tmsi = GSM_RESERVED_TMSI;
- vsub->tmsi_new = GSM_RESERVED_TMSI;
-
- for (i = 0; i < ARRAY_SIZE(vsub->auth_tuples); i++)
- vsub->auth_tuples[i].key_seq = GSM_KEY_SEQ_INVAL;
-
- INIT_LLIST_HEAD(&vsub->cs.requests);
- INIT_LLIST_HEAD(&vsub->ps.pdp_list);
-
- llist_add_tail(&vsub->list, &vlr->subscribers);
- return vsub;
-}
-
-struct vlr_subscr *vlr_subscr_alloc(struct vlr_instance *vlr)
-{
- return vlr_subscr_get(_vlr_subscr_alloc(vlr));
-}
-
-/* Send a GSUP Purge MS request.
- * TODO: this should be sent to the *previous* VLR when this VLR is "taking"
- * this subscriber, not to the HLR? */
-int vlr_subscr_purge(struct vlr_subscr *vsub)
-{
- struct osmo_gsup_message gsup_msg = {0};
-
- gsup_msg.message_type = OSMO_GSUP_MSGT_PURGE_MS_REQUEST;
-
- /* provide HLR number in case we know it */
- gsup_msg.hlr_enc_len = vsub->hlr.len;
- gsup_msg.hlr_enc = vsub->hlr.buf;
-
- return vlr_subscr_tx_gsup_message(vsub, &gsup_msg);
-}
-
-void vlr_subscr_cancel(struct vlr_subscr *vsub, enum gsm48_gmm_cause cause)
-{
- if (!vsub)
- return;
-
- if (vsub->lu_fsm) {
- if (vsub->lu_fsm->state == VLR_ULA_S_WAIT_HLR_UPD)
- osmo_fsm_inst_dispatch(vsub->lu_fsm,
- VLR_ULA_E_HLR_LU_RES,
- (void*)&cause);
- else
- osmo_fsm_inst_term(vsub->lu_fsm, OSMO_FSM_TERM_ERROR,
- 0);
- }
-
- if (vsub->proc_arq_fsm)
- osmo_fsm_inst_term(vsub->proc_arq_fsm, OSMO_FSM_TERM_ERROR, 0);
-}
-
-/* Call vlr_subscr_cancel(), then completely drop the entry from the VLR */
-void vlr_subscr_free(struct vlr_subscr *vsub)
-{
- llist_del(&vsub->list);
- DEBUGP(DREF, "freeing VLR subscr %s\n", vlr_subscr_name(vsub));
- talloc_free(vsub);
-}
-
-/* Generate a new TMSI and store in vsub->tmsi_new.
- * Search all known subscribers to ensure that the TMSI is unique. */
-int vlr_subscr_alloc_tmsi(struct vlr_subscr *vsub)
-{
- struct vlr_instance *vlr = vsub->vlr;
- uint32_t tmsi;
- int tried;
-
- for (tried = 0; tried < 100; tried++) {
- if (RAND_bytes((uint8_t *) &tmsi, sizeof(tmsi)) != 1) {
- LOGP(DVLR, LOGL_ERROR, "RAND_bytes failed\n");
- return -1;
- }
- /* throw the dice again, if the TSMI doesn't fit */
- if (tmsi == GSM_RESERVED_TMSI)
- continue;
-
- /* Section 2.4 of 23.003: MSC has two MSB 00/01/10, SGSN 11 */
- if (vlr->cfg.is_ps) {
- /* SGSN */
- tmsi |= 0xC000000;
- } else {
- /* MSC */
- if ((tmsi & 0xC0000000) == 0xC0000000)
- tmsi &= ~0xC0000000;
- }
-
- /* If this TMSI is already in use, try another one. */
- if (vlr_subscr_find_by_tmsi(vlr, tmsi))
- continue;
-
- vsub->tmsi_new = tmsi;
- return 0;
- }
-
- LOGP(DVLR, LOGL_ERROR, "subscr %s: unable to generate valid TMSI"
- " after %d tries\n", vlr_subscr_name(vsub), tried);
- return -1;
-}
-
-/* Find subscriber by IMSI, or create new subscriber if not found.
- * \param[in] vlr VLR instace.
- * \param[in] imsi IMSI string.
- * \param[out] created if non-NULL, returns whether a new entry was created. */
-struct vlr_subscr *_vlr_subscr_find_or_create_by_imsi(struct vlr_instance *vlr,
- const char *imsi,
- bool *created,
- const char *file,
- int line)
-{
- struct vlr_subscr *vsub;
- vsub = _vlr_subscr_find_by_imsi(vlr, imsi, file, line);
- if (vsub) {
- if (created)
- *created = false;
- return vsub;
- }
-
- vsub = _vlr_subscr_get(_vlr_subscr_alloc(vlr), file, line);
- if (!vsub)
- return NULL;
- vlr_subscr_set_imsi(vsub, imsi);
- LOGP(DVLR, LOGL_INFO, "New subscr, IMSI: %s\n", vsub->imsi);
- if (created)
- *created = true;
- return vsub;
-}
-
-/* Find subscriber by TMSI, or create new subscriber if not found.
- * \param[in] vlr VLR instace.
- * \param[in] tmsi TMSI.
- * \param[out] created if non-NULL, returns whether a new entry was created. */
-struct vlr_subscr *_vlr_subscr_find_or_create_by_tmsi(struct vlr_instance *vlr,
- uint32_t tmsi,
- bool *created,
- const char *file,
- int line)
-{
- struct vlr_subscr *vsub;
- vsub = _vlr_subscr_find_by_tmsi(vlr, tmsi, file, line);
- if (vsub) {
- if (created)
- *created = false;
- return vsub;
- }
-
- vsub = _vlr_subscr_get(_vlr_subscr_alloc(vlr), file, line);
- if (!vsub)
- return NULL;
- vsub->tmsi = tmsi;
- LOGP(DVLR, LOGL_INFO, "New subscr, TMSI: 0x%08x\n", vsub->tmsi);
- if (created)
- *created = true;
- return vsub;
-}
-
-void vlr_subscr_set_imsi(struct vlr_subscr *vsub, const char *imsi)
-{
- if (!vsub)
- return;
- osmo_strlcpy(vsub->imsi, imsi, sizeof(vsub->imsi));
- vsub->id = atoll(vsub->imsi);
- DEBUGP(DVLR, "set IMSI on subscriber; IMSI=%s id=%llu\n",
- vsub->imsi, vsub->id);
-}
-
-void vlr_subscr_set_imei(struct vlr_subscr *vsub, const char *imei)
-{
- if (!vsub)
- return;
- osmo_strlcpy(vsub->imei, imei, sizeof(vsub->imei));
- DEBUGP(DVLR, "set IMEI on subscriber; IMSI=%s IMEI=%s\n",
- vsub->imsi, vsub->imei);
-}
-
-void vlr_subscr_set_imeisv(struct vlr_subscr *vsub, const char *imeisv)
-{
- if (!vsub)
- return;
- osmo_strlcpy(vsub->imeisv, imeisv, sizeof(vsub->imeisv));
- DEBUGP(DVLR, "set IMEISV on subscriber; IMSI=%s IMEISV=%s\n",
- vsub->imsi, vsub->imeisv);
-}
-
-/* Safely copy the given MSISDN string to vsub->msisdn */
-void vlr_subscr_set_msisdn(struct vlr_subscr *vsub, const char *msisdn)
-{
- if (!vsub)
- return;
- osmo_strlcpy(vsub->msisdn, msisdn, sizeof(vsub->msisdn));
- DEBUGP(DVLR, "set MSISDN on subscriber; IMSI=%s MSISDN=%s\n",
- vsub->imsi, vsub->msisdn);
-}
-
-bool vlr_subscr_matches_imsi(struct vlr_subscr *vsub, const char *imsi)
-{
- return vsub && imsi && vsub->imsi[0] && !strcmp(vsub->imsi, imsi);
-}
-
-bool vlr_subscr_matches_tmsi(struct vlr_subscr *vsub, uint32_t tmsi)
-{
- return vsub && tmsi != GSM_RESERVED_TMSI
- && (vsub->tmsi == tmsi || vsub->tmsi_new == tmsi);
-}
-
-bool vlr_subscr_matches_msisdn(struct vlr_subscr *vsub, const char *msisdn)
-{
- return vsub && msisdn && vsub->msisdn[0]
- && !strcmp(vsub->msisdn, msisdn);
-}
-
-bool vlr_subscr_matches_imei(struct vlr_subscr *vsub, const char *imei)
-{
- return vsub && imei && vsub->imei[0]
- && !strcmp(vsub->imei, imei);
-}
-
-/* Send updated subscriber information to HLR */
-int vlr_subscr_changed(struct vlr_subscr *vsub)
-{
- /* FIXME */
- LOGP(DVLR, LOGL_ERROR, "Not implemented: %s\n", __func__);
- return 0;
-}
-
-/***********************************************************************
- * PDP context data
- ***********************************************************************/
-
-struct sgsn_subscriber_pdp_data *
-vlr_subscr_pdp_data_alloc(struct vlr_subscr *vsub)
-{
- struct sgsn_subscriber_pdp_data* pdata;
-
- pdata = talloc_zero(vsub, struct sgsn_subscriber_pdp_data);
-
- llist_add_tail(&pdata->list, &vsub->ps.pdp_list);
-
- return pdata;
-}
-
-static int vlr_subscr_pdp_data_clear(struct vlr_subscr *vsub)
-{
- struct sgsn_subscriber_pdp_data *pdp, *pdp2;
- int count = 0;
-
- llist_for_each_entry_safe(pdp, pdp2, &vsub->ps.pdp_list, list) {
- llist_del(&pdp->list);
- talloc_free(pdp);
- count += 1;
- }
-
- return count;
-}
-
-static struct sgsn_subscriber_pdp_data *
-vlr_subscr_pdp_data_get_by_id(struct vlr_subscr *vsub, unsigned context_id)
-{
- struct sgsn_subscriber_pdp_data *pdp;
-
- llist_for_each_entry(pdp, &vsub->ps.pdp_list, list) {
- if (pdp->context_id == context_id)
- return pdp;
- }
-
- return NULL;
-}
-
-/***********************************************************************
- * Actual Implementation
- ***********************************************************************/
-
-static int vlr_rx_gsup_unknown_imsi(struct vlr_instance *vlr,
- struct osmo_gsup_message *gsup_msg)
-{
- if (OSMO_GSUP_IS_MSGT_REQUEST(gsup_msg->message_type)) {
- vlr_tx_gsup_error_reply(vlr, gsup_msg,
- GMM_CAUSE_IMSI_UNKNOWN);
- LOGP(DVLR, LOGL_NOTICE,
- "Unknown IMSI %s, discarding GSUP request "
- "of type 0x%02x\n",
- gsup_msg->imsi, gsup_msg->message_type);
- } else if (OSMO_GSUP_IS_MSGT_ERROR(gsup_msg->message_type)) {
- LOGP(DVLR, LOGL_NOTICE,
- "Unknown IMSI %s, discarding GSUP error "
- "of type 0x%02x, cause '%s' (%d)\n",
- gsup_msg->imsi, gsup_msg->message_type,
- get_value_string(gsm48_gmm_cause_names, gsup_msg->cause),
- gsup_msg->cause);
- } else {
- LOGP(DVLR, LOGL_NOTICE,
- "Unknown IMSI %s, discarding GSUP response "
- "of type 0x%02x\n",
- gsup_msg->imsi, gsup_msg->message_type);
- }
-
- return -GMM_CAUSE_IMSI_UNKNOWN;
-}
-
-static int vlr_rx_gsup_purge_no_subscr(struct vlr_instance *vlr,
- struct osmo_gsup_message *gsup_msg)
-{
- if (OSMO_GSUP_IS_MSGT_ERROR(gsup_msg->message_type)) {
- LOGGSUPP(LOGL_NOTICE, gsup_msg,
- "Purge MS has failed with cause '%s' (%d)\n",
- get_value_string(gsm48_gmm_cause_names, gsup_msg->cause),
- gsup_msg->cause);
- return -gsup_msg->cause;
- }
- LOGGSUPP(LOGL_INFO, gsup_msg, "Completing purge MS\n");
- return 0;
-}
-
-/* VLR internal call to request UpdateLocation from HLR */
-int vlr_subscr_req_lu(struct vlr_subscr *vsub, bool is_ps)
-{
- struct osmo_gsup_message gsup_msg = {0};
- int rc;
-
- gsup_msg.message_type = OSMO_GSUP_MSGT_UPDATE_LOCATION_REQUEST;
- rc = vlr_subscr_tx_gsup_message(vsub, &gsup_msg);
-
- return rc;
-}
-
-/* VLR internal call to request tuples from HLR */
-int vlr_subscr_req_sai(struct vlr_subscr *vsub,
- const uint8_t *auts, const uint8_t *auts_rand)
-{
- struct osmo_gsup_message gsup_msg = {0};
-
- gsup_msg.message_type = OSMO_GSUP_MSGT_SEND_AUTH_INFO_REQUEST;
- gsup_msg.auts = auts;
- gsup_msg.rand = auts_rand;
-
- return vlr_subscr_tx_gsup_message(vsub, &gsup_msg);
-}
-
-/* Tell HLR that authentication failure occurred */
-int vlr_subscr_tx_auth_fail_rep(struct vlr_subscr *vsub)
-{
- struct osmo_gsup_message gsup_msg = {0};
-
- gsup_msg.message_type = OSMO_GSUP_MSGT_AUTH_FAIL_REPORT;
- osmo_strlcpy(gsup_msg.imsi, vsub->imsi, sizeof(gsup_msg.imsi));
- return vlr_tx_gsup_message(vsub->vlr, &gsup_msg);
-}
-
-/* Update the subscriber with GSUP-received auth tuples */
-void vlr_subscr_update_tuples(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup)
-{
- unsigned int i;
- unsigned int got_tuples;
-
- if (gsup->num_auth_vectors) {
- memset(&vsub->auth_tuples, 0, sizeof(vsub->auth_tuples));
- for (i = 0; i < ARRAY_SIZE(vsub->auth_tuples); i++)
- vsub->auth_tuples[i].key_seq = GSM_KEY_SEQ_INVAL;
- }
-
- got_tuples = 0;
- for (i = 0; i < gsup->num_auth_vectors; i++) {
- size_t key_seq = i;
-
- if (key_seq >= ARRAY_SIZE(vsub->auth_tuples)) {
- LOGVSUBP(LOGL_NOTICE, vsub,
- "Skipping auth tuple wih invalid cksn %zu\n",
- key_seq);
- continue;
- }
- vsub->auth_tuples[i].vec = gsup->auth_vectors[i];
- vsub->auth_tuples[i].key_seq = key_seq;
- got_tuples ++;
- }
-
- LOGVSUBP(LOGL_DEBUG, vsub, "Received %u auth tuples\n", got_tuples);
-
- if (!got_tuples) {
- /* FIXME what now? */
- // vlr_subscr_cancel(vsub, GMM_CAUSE_GSM_AUTH_UNACCEPT); ?
- }
-
- /* New tuples means last_tuple becomes invalid */
- vsub->last_tuple = NULL;
-}
-
-/* Handle SendAuthInfo Result/Error from HLR */
-static int vlr_subscr_handle_sai_res(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup)
-{
- struct osmo_fsm_inst *auth_fi = vsub->auth_fsm;
- void *data = (void *) gsup;
-
- switch (gsup->message_type) {
- case OSMO_GSUP_MSGT_SEND_AUTH_INFO_RESULT:
- osmo_fsm_inst_dispatch(auth_fi, VLR_AUTH_E_HLR_SAI_ACK, data);
- break;
- case OSMO_GSUP_MSGT_SEND_AUTH_INFO_ERROR:
- osmo_fsm_inst_dispatch(auth_fi, VLR_AUTH_E_HLR_SAI_NACK, data);
- break;
- default:
- return -1;
- }
-
- return 0;
-}
-
-static int decode_bcd_number_safe(char *output, int output_len,
- const uint8_t *bcd_lv, int input_len,
- int h_len)
-{
- uint8_t len;
- OSMO_ASSERT(output_len >= 1);
- *output = '\0';
- if (input_len < 1)
- return -EIO;
- len = bcd_lv[0];
- if (input_len < len)
- return -EIO;
- return gsm48_decode_bcd_number(output, output_len, bcd_lv, h_len);
-}
-
-static void vlr_subscr_gsup_insert_data(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup_msg)
-{
- unsigned idx;
- int rc;
-
- if (gsup_msg->msisdn_enc) {
- decode_bcd_number_safe(vsub->msisdn, sizeof(vsub->msisdn),
- gsup_msg->msisdn_enc,
- gsup_msg->msisdn_enc_len, 0);
- LOGP(DVLR, LOGL_DEBUG, "IMSI:%s has MSISDN:%s\n",
- vsub->imsi, vsub->msisdn);
- }
-
- if (gsup_msg->hlr_enc) {
- if (gsup_msg->hlr_enc_len > sizeof(vsub->hlr.buf)) {
- LOGP(DVLR, LOGL_ERROR, "HLR-Number too long (%zu)\n",
- gsup_msg->hlr_enc_len);
- vsub->hlr.len = 0;
- } else {
- memcpy(vsub->hlr.buf, gsup_msg->hlr_enc,
- gsup_msg->hlr_enc_len);
- vsub->hlr.len = gsup_msg->hlr_enc_len;
- }
- }
-
- if (gsup_msg->pdp_info_compl) {
- rc = vlr_subscr_pdp_data_clear(vsub);
- if (rc > 0)
- LOGP(DVLR, LOGL_INFO, "Cleared existing PDP info\n");
- }
-
- for (idx = 0; idx < gsup_msg->num_pdp_infos; idx++) {
- const struct osmo_gsup_pdp_info *pdp_info = &gsup_msg->pdp_infos[idx];
- size_t ctx_id = pdp_info->context_id;
- struct sgsn_subscriber_pdp_data *pdp_data;
-
- if (pdp_info->apn_enc_len >= sizeof(pdp_data->apn_str)-1) {
- LOGVSUBP(LOGL_ERROR, vsub,
- "APN too long, context id = %zu, APN = %s\n",
- ctx_id, osmo_hexdump(pdp_info->apn_enc,
- pdp_info->apn_enc_len));
- continue;
- }
-
- if (pdp_info->qos_enc_len > sizeof(pdp_data->qos_subscribed)) {
- LOGVSUBP(LOGL_ERROR, vsub,
- "QoS info too long (%zu)\n",
- pdp_info->qos_enc_len);
- continue;
- }
-
- LOGVSUBP(LOGL_INFO, vsub,
- "Will set PDP info, context id = %zu, APN = %s\n",
- ctx_id, osmo_hexdump(pdp_info->apn_enc, pdp_info->apn_enc_len));
-
- /* Set PDP info [ctx_id] */
- pdp_data = vlr_subscr_pdp_data_get_by_id(vsub, ctx_id);
- if (!pdp_data) {
- pdp_data = vlr_subscr_pdp_data_alloc(vsub);
- pdp_data->context_id = ctx_id;
- }
-
- OSMO_ASSERT(pdp_data != NULL);
- pdp_data->pdp_type = pdp_info->pdp_type;
- osmo_apn_to_str(pdp_data->apn_str,
- pdp_info->apn_enc, pdp_info->apn_enc_len);
- memcpy(pdp_data->qos_subscribed, pdp_info->qos_enc, pdp_info->qos_enc_len);
- pdp_data->qos_subscribed_len = pdp_info->qos_enc_len;
- }
-}
-
-
-/* Handle InsertSubscrData Result from HLR */
-static int vlr_subscr_handle_isd_req(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup)
-{
- struct osmo_gsup_message gsup_reply = {0};
-
- vlr_subscr_gsup_insert_data(vsub, gsup);
- vsub->vlr->ops.subscr_update(vsub);
-
- gsup_reply.message_type = OSMO_GSUP_MSGT_INSERT_DATA_RESULT;
- return vlr_subscr_tx_gsup_message(vsub, &gsup_reply);
-}
-
-/* Handle UpdateLocation Result from HLR */
-static int vlr_subscr_handle_lu_res(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup)
-{
- if (!vsub->lu_fsm) {
- LOGVSUBP(LOGL_ERROR, vsub, "Rx GSUP LU Result "
- "without LU in progress\n");
- return -ENODEV;
- }
-
- /* contrary to MAP, we allow piggy-backing subscriber data onto the
- * UPDATE LOCATION RESULT, and don't mandate the use of a separate
- * nested INSERT SUBSCRIBER DATA transaction */
- vlr_subscr_gsup_insert_data(vsub, gsup);
-
- osmo_fsm_inst_dispatch(vsub->lu_fsm, VLR_ULA_E_HLR_LU_RES, NULL);
-
- return 0;
-}
-
-/* Handle UpdateLocation Result from HLR */
-static int vlr_subscr_handle_lu_err(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup)
-{
- if (!vsub->lu_fsm) {
- LOGVSUBP(LOGL_ERROR, vsub, "Rx GSUP LU Error "
- "without LU in progress\n");
- return -ENODEV;
- }
-
- LOGVSUBP(LOGL_DEBUG, vsub, "UpdateLocation failed; gmm_cause: %s\n",
- get_value_string(gsm48_gmm_cause_names, gsup->cause));
-
- osmo_fsm_inst_dispatch(vsub->lu_fsm, VLR_ULA_E_HLR_LU_RES,
- (void *)&gsup->cause);
-
- return 0;
-}
-
-/* Handle LOCATION CANCEL request from HLR */
-static int vlr_subscr_handle_cancel_req(struct vlr_subscr *vsub,
- struct osmo_gsup_message *gsup_msg)
-{
- struct osmo_gsup_message gsup_reply = {0};
- int is_update_procedure = !gsup_msg->cancel_type ||
- gsup_msg->cancel_type == OSMO_GSUP_CANCEL_TYPE_UPDATE;
-
- LOGVSUBP(LOGL_INFO, vsub, "Cancelling MS subscriber (%s)\n",
- is_update_procedure ?
- "update procedure" : "subscription withdraw");
-
- gsup_reply.message_type = OSMO_GSUP_MSGT_LOCATION_CANCEL_RESULT;
- vlr_subscr_tx_gsup_message(vsub, &gsup_reply);
-
- vlr_subscr_cancel(vsub, gsup_msg->cause);
-
- return 0;
-}
-
-/* Incoming handler for GSUP from HLR.
- * Keep this function non-static for direct invocation by unit tests. */
-int vlr_gsupc_read_cb(struct gsup_client *gsupc, struct msgb *msg)
-{
- struct vlr_instance *vlr = (struct vlr_instance *) gsupc->data;
- struct vlr_subscr *vsub;
- struct osmo_gsup_message gsup;
- int rc;
-
- DEBUGP(DVLR, "GSUP rx %u: %s\n", msgb_l2len(msg),
- osmo_hexdump_nospc(msgb_l2(msg), msgb_l2len(msg)));
-
- rc = osmo_gsup_decode(msgb_l2(msg), msgb_l2len(msg), &gsup);
- if (rc < 0) {
- LOGP(DVLR, LOGL_ERROR,
- "decoding GSUP message fails with error '%s' (%d)\n",
- get_value_string(gsm48_gmm_cause_names, -rc), -rc);
- return rc;
- }
-
- if (!gsup.imsi[0]) {
- LOGP(DVLR, LOGL_ERROR, "Missing IMSI in GSUP message\n");
- if (OSMO_GSUP_IS_MSGT_REQUEST(gsup.message_type))
- vlr_tx_gsup_error_reply(vlr, &gsup,
- GMM_CAUSE_INV_MAND_INFO);
- return -GMM_CAUSE_INV_MAND_INFO;
- }
-
- vsub = vlr_subscr_find_by_imsi(vlr, gsup.imsi);
- if (!vsub) {
- switch (gsup.message_type) {
- case OSMO_GSUP_MSGT_PURGE_MS_RESULT:
- case OSMO_GSUP_MSGT_PURGE_MS_ERROR:
- return vlr_rx_gsup_purge_no_subscr(vlr, &gsup);
- default:
- return vlr_rx_gsup_unknown_imsi(vlr, &gsup);
- }
- }
-
- switch (gsup.message_type) {
- case OSMO_GSUP_MSGT_SEND_AUTH_INFO_RESULT:
- case OSMO_GSUP_MSGT_SEND_AUTH_INFO_ERROR:
- rc = vlr_subscr_handle_sai_res(vsub, &gsup);
- break;
- case OSMO_GSUP_MSGT_INSERT_DATA_REQUEST:
- rc = vlr_subscr_handle_isd_req(vsub, &gsup);
- break;
- case OSMO_GSUP_MSGT_LOCATION_CANCEL_REQUEST:
- rc = vlr_subscr_handle_cancel_req(vsub, &gsup);
- break;
- case OSMO_GSUP_MSGT_UPDATE_LOCATION_RESULT:
- rc = vlr_subscr_handle_lu_res(vsub, &gsup);
- break;
- case OSMO_GSUP_MSGT_UPDATE_LOCATION_ERROR:
- rc = vlr_subscr_handle_lu_err(vsub, &gsup);
- break;
- case OSMO_GSUP_MSGT_PURGE_MS_ERROR:
- case OSMO_GSUP_MSGT_PURGE_MS_RESULT:
- case OSMO_GSUP_MSGT_DELETE_DATA_REQUEST:
- LOGVSUBP(LOGL_ERROR, vsub,
- "Rx GSUP msg_type=%d not yet implemented\n",
- gsup.message_type);
- rc = -GMM_CAUSE_MSGT_NOTEXIST_NOTIMPL;
- break;
- default:
- LOGVSUBP(LOGL_ERROR, vsub,
- "Rx GSUP msg_type=%d not valid at VLR/SGSN side\n",
- gsup.message_type);
- rc = -GMM_CAUSE_MSGT_NOTEXIST_NOTIMPL;
- break;
- }
-
- vlr_subscr_put(vsub);
- return rc;
-}
-
-/* MSC->VLR: Subscriber has provided IDENTITY RESPONSE */
-int vlr_subscr_rx_id_resp(struct vlr_subscr *vsub,
- const uint8_t *mi, size_t mi_len)
-{
- char mi_string[GSM48_MI_SIZE];
- uint8_t mi_type = mi[0] & GSM_MI_TYPE_MASK;
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), mi, mi_len);
-
- /* update the vlr_subscr with the given identity */
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- if (vsub->imsi[0]
- && !vlr_subscr_matches_imsi(vsub, mi_string)) {
- LOGVSUBP(LOGL_ERROR, vsub, "IMSI in ID RESP differs:"
- " %s\n", mi_string);
- } else
- vlr_subscr_set_imsi(vsub, mi_string);
- break;
- case GSM_MI_TYPE_IMEI:
- vlr_subscr_set_imei(vsub, mi_string);
- break;
- case GSM_MI_TYPE_IMEISV:
- vlr_subscr_set_imeisv(vsub, mi_string);
- break;
- }
-
- if (vsub->auth_fsm) {
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- osmo_fsm_inst_dispatch(vsub->auth_fsm,
- VLR_AUTH_E_MS_ID_IMSI, mi_string);
- break;
- }
- }
-
- if (vsub->lu_fsm) {
- uint32_t event = 0;
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- event = VLR_ULA_E_ID_IMSI;
- break;
- case GSM_MI_TYPE_IMEI:
- event = VLR_ULA_E_ID_IMEI;
- break;
- case GSM_MI_TYPE_IMEISV:
- event = VLR_ULA_E_ID_IMEISV;
- break;
- default:
- OSMO_ASSERT(0);
- break;
- }
- osmo_fsm_inst_dispatch(vsub->lu_fsm, event, mi_string);
- } else {
- LOGVSUBP(LOGL_NOTICE, vsub, "gratuitous ID RESPONSE?!?\n");
- }
-
- return 0;
-}
-
-/* MSC->VLR: Subscriber has provided IDENTITY RESPONSE */
-int vlr_subscr_rx_tmsi_reall_compl(struct vlr_subscr *vsub)
-{
- if (vsub->lu_fsm) {
- return osmo_fsm_inst_dispatch(vsub->lu_fsm,
- VLR_ULA_E_NEW_TMSI_ACK, NULL);
- } else if (vsub->proc_arq_fsm) {
- return osmo_fsm_inst_dispatch(vsub->proc_arq_fsm,
- PR_ARQ_E_TMSI_ACK, NULL);
- } else {
- LOGVSUBP(LOGL_NOTICE, vsub,
- "gratuitous TMSI REALLOC COMPL");
- return -EINVAL;
- }
-}
-
-int vlr_subscr_rx_imsi_detach(struct vlr_subscr *vsub)
-{
- /* paranoia: should any LU or PARQ FSMs still be running, stop them. */
- vlr_subscr_cancel(vsub, GMM_CAUSE_IMPL_DETACHED);
-
- vsub->imsi_detached_flag = true;
- if (vsub->lu_complete) {
- vsub->lu_complete = false;
- /* balancing the get from vlr_lu_compl_fsm_success() */
- vlr_subscr_put(vsub);
- }
- return 0;
-}
-
-/* Tear down any running FSMs due to MSC connection timeout.
- * Visit all vsub->*_fsm pointers and give them a queue to send a final reject
- * message before the entire connection is torn down.
- * \param[in] vsub subscriber to tear down
- */
-void vlr_subscr_conn_timeout(struct vlr_subscr *vsub)
-{
- if (!vsub)
- return;
-
- vlr_loc_update_conn_timeout(vsub->lu_fsm);
- vlr_parq_conn_timeout(vsub->proc_arq_fsm);
-}
-
-struct vlr_instance *vlr_alloc(void *ctx, const struct vlr_ops *ops)
-{
- struct vlr_instance *vlr = talloc_zero(ctx, struct vlr_instance);
- OSMO_ASSERT(vlr);
-
- /* Some of these are needed only on UTRAN, but in case the caller wants
- * only GERAN, she should just provide dummy callbacks. */
- OSMO_ASSERT(ops->tx_auth_req);
- OSMO_ASSERT(ops->tx_auth_rej);
- OSMO_ASSERT(ops->tx_id_req);
- OSMO_ASSERT(ops->tx_lu_acc);
- OSMO_ASSERT(ops->tx_lu_rej);
- OSMO_ASSERT(ops->tx_cm_serv_acc);
- OSMO_ASSERT(ops->tx_cm_serv_rej);
- OSMO_ASSERT(ops->set_ciph_mode);
- OSMO_ASSERT(ops->tx_common_id);
- OSMO_ASSERT(ops->subscr_update);
- OSMO_ASSERT(ops->subscr_assoc);
-
- INIT_LLIST_HEAD(&vlr->subscribers);
- INIT_LLIST_HEAD(&vlr->operations);
- memcpy(&vlr->ops, ops, sizeof(vlr->ops));
-
- /* osmo_auth_fsm.c */
- osmo_fsm_register(&vlr_auth_fsm);
- /* osmo_lu_fsm.c */
- vlr_lu_fsm_init();
- /* vlr_access_request_fsm.c */
- vlr_parq_fsm_init();
-
- return vlr;
-}
-
-int vlr_start(const char *gsup_unit_name, struct vlr_instance *vlr,
- const char *gsup_server_addr_str, uint16_t gsup_server_port)
-{
- OSMO_ASSERT(vlr);
-
- vlr->gsup_client = gsup_client_create(gsup_unit_name,
- gsup_server_addr_str,
- gsup_server_port,
- &vlr_gsupc_read_cb, NULL);
- if (!vlr->gsup_client)
- return -ENOMEM;
- vlr->gsup_client->data = vlr;
-
- return 0;
-}
-
-/* MSC->VLR: Subscribre has disconnected */
-int vlr_subscr_disconnected(struct vlr_subscr *vsub)
-{
- /* This corresponds to a MAP-ABORT from MSC->VLR on a classic B
- * interface */
- osmo_fsm_inst_term(vsub->lu_fsm, OSMO_FSM_TERM_REQUEST, NULL);
- osmo_fsm_inst_term(vsub->auth_fsm, OSMO_FSM_TERM_REQUEST, NULL);
- vsub->msc_conn_ref = NULL;
-
- return 0;
-}
-
-/* MSC->VLR: Receive Authentication Failure from Subscriber */
-int vlr_subscr_rx_auth_fail(struct vlr_subscr *vsub, const uint8_t *auts)
-{
- struct vlr_auth_resp_par par = {0};
- par.auts = auts;
-
- osmo_fsm_inst_dispatch(vsub->auth_fsm, VLR_AUTH_E_MS_AUTH_FAIL, &par);
- return 0;
-}
-
-/* MSC->VLR: Receive Authentication Response from MS
- * \returns 1 in case of success, 0 in case of delay, -1 on auth error */
-int vlr_subscr_rx_auth_resp(struct vlr_subscr *vsub, bool is_r99,
- bool is_utran, const uint8_t *res, uint8_t res_len)
-{
- struct osmo_fsm_inst *auth_fi = vsub->auth_fsm;
- struct vlr_auth_resp_par par;
-
- par.is_r99 = is_r99;
- par.is_utran = is_utran;
- par.res = res;
- par.res_len = res_len;
- osmo_fsm_inst_dispatch(auth_fi, VLR_AUTH_E_MS_AUTH_RESP, (void *) &par);
-
- return 0;
-}
-
-/* MSC->VLR: Receive result of Ciphering Mode Command from MS */
-void vlr_subscr_rx_ciph_res(struct vlr_subscr *vsub, struct vlr_ciph_result *res)
-{
- if (vsub->lu_fsm && vsub->lu_fsm->state == VLR_ULA_S_WAIT_CIPH)
- osmo_fsm_inst_dispatch(vsub->lu_fsm, VLR_ULA_E_CIPH_RES, res);
- if (vsub->proc_arq_fsm
- && vsub->proc_arq_fsm->state == PR_ARQ_S_WAIT_CIPH)
- osmo_fsm_inst_dispatch(vsub->proc_arq_fsm, PR_ARQ_E_CIPH_RES,
- res);
-}
-
-/* Internal evaluation of requested ciphering mode.
- * Send set_ciph_mode() to MSC depending on the ciph_mode argument.
- * \param[in] vlr VLR instance.
- * \param[in] fi Calling FSM instance, for logging.
- * \param[in] msc_conn_ref MSC conn to send to.
- * \param[in] ciph_mode Ciphering config, to decide whether to do ciphering.
- * \returns 0 if no ciphering is needed or message was sent successfully,
- * or a negative value if ciph_mode is invalid or sending failed.
- */
-int vlr_set_ciph_mode(struct vlr_instance *vlr,
- struct osmo_fsm_inst *fi,
- void *msc_conn_ref,
- enum vlr_ciph ciph_mode,
- bool retrieve_imeisv)
-{
- switch (ciph_mode) {
- case VLR_CIPH_NONE:
- return 0;
-
- case VLR_CIPH_A5_1:
- case VLR_CIPH_A5_3:
- return vlr->ops.set_ciph_mode(msc_conn_ref,
- ciph_mode,
- retrieve_imeisv);
-
- case VLR_CIPH_A5_2:
- /* TODO policy by user config? */
- LOGPFSML(fi, LOGL_ERROR, "A5/2 ciphering is not allowed\n");
- return -EINVAL;
-
- default:
- LOGPFSML(fi, LOGL_ERROR, "unknown ciphering value: %d\n",
- ciph_mode);
- return -EINVAL;
- }
-}
-
-void log_set_filter_vlr_subscr(struct log_target *target,
- struct vlr_subscr *vlr_subscr)
-{
- struct vlr_subscr **fsub = (void*)&target->filter_data[LOG_FLT_VLR_SUBSCR];
-
- /* free the old data */
- if (*fsub) {
- vlr_subscr_put(*fsub);
- *fsub = NULL;
- }
-
- if (vlr_subscr) {
- target->filter_map |= (1 << LOG_FLT_VLR_SUBSCR);
- *fsub = vlr_subscr_get(vlr_subscr);
- } else
- target->filter_map &= ~(1 << LOG_FLT_VLR_SUBSCR);
-}
diff --git a/src/libvlr/vlr_access_req_fsm.c b/src/libvlr/vlr_access_req_fsm.c
deleted file mode 100644
index f9ed0b57d..000000000
--- a/src/libvlr/vlr_access_req_fsm.c
+++ /dev/null
@@ -1,795 +0,0 @@
-/* Osmocom Visitor Location Register (VLR): Access Request FSMs */
-
-/* (C) 2016 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/fsm.h>
-#include <osmocom/gsm/gsup.h>
-#include <openbsc/vlr.h>
-#include <openbsc/debug.h>
-
-#include "vlr_core.h"
-#include "vlr_auth_fsm.h"
-#include "vlr_lu_fsm.h"
-#include "vlr_access_req_fsm.h"
-
-#define S(x) (1 << (x))
-
-/***********************************************************************
- * Process_Access_Request_VLR, TS 29.002 Chapter 25.4.2
- ***********************************************************************/
-
-const struct value_string vlr_proc_arq_result_names[] = {
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_NONE),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_SYSTEM_FAILURE),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_ILLEGAL_SUBSCR),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_UNIDENT_SUBSCR),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_ROAMING_NOTALLOWED),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_ILLEGAL_EQUIP),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_UNKNOWN_ERROR),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_TIMEOUT),
- OSMO_VALUE_STRING(VLR_PR_ARQ_RES_PASSED),
- { 0, NULL }
-};
-
-static const struct value_string proc_arq_vlr_event_names[] = {
- OSMO_VALUE_STRING(PR_ARQ_E_START),
- OSMO_VALUE_STRING(PR_ARQ_E_ID_IMSI),
- OSMO_VALUE_STRING(PR_ARQ_E_AUTH_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_CIPH_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_UPD_LOC_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_TRACE_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_IMEI_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_PRES_RES),
- OSMO_VALUE_STRING(PR_ARQ_E_TMSI_ACK),
- { 0, NULL }
-};
-
-struct proc_arq_priv {
- struct vlr_instance *vlr;
- struct vlr_subscr *vsub;
- void *msc_conn_ref;
- struct osmo_fsm_inst *ul_child_fsm;
- struct osmo_fsm_inst *sub_pres_vlr_fsm;
- uint32_t parent_event_success;
- uint32_t parent_event_failure;
- void *parent_event_data;
-
- enum vlr_parq_type type;
- enum vlr_proc_arq_result result;
- bool by_tmsi;
- char imsi[16];
- uint32_t tmsi;
- struct osmo_location_area_id lai;
- bool authentication_required;
- enum vlr_ciph ciphering_required;
- bool is_r99;
- bool is_utran;
- bool implicitly_accepted_parq_by_ciphering_cmd;
-};
-
-static void assoc_par_with_subscr(struct osmo_fsm_inst *fi, struct vlr_subscr *vsub)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_instance *vlr = par->vlr;
-
- vsub->msc_conn_ref = par->msc_conn_ref;
- par->vsub = vsub;
- /* Tell MSC to associate this subscriber with the given
- * connection */
- vlr->ops.subscr_assoc(par->msc_conn_ref, par->vsub);
-}
-
-#define proc_arq_fsm_done(fi, res) _proc_arq_fsm_done(fi, res, __FILE__, __LINE__)
-static void _proc_arq_fsm_done(struct osmo_fsm_inst *fi,
- enum vlr_proc_arq_result res,
- const char *file, int line)
-{
- struct proc_arq_priv *par = fi->priv;
- LOGPFSMSRC(fi, file, line, "proc_arq_fsm_done(%s)\n",
- vlr_proc_arq_result_name(res));
- par->result = res;
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_DONE, 0, 0);
-}
-
-static void proc_arq_vlr_dispatch_result(struct osmo_fsm_inst *fi,
- uint32_t prev_state)
-{
- struct proc_arq_priv *par = fi->priv;
- bool success;
- int rc;
- LOGPFSM(fi, "Process Access Request result: %s\n",
- vlr_proc_arq_result_name(par->result));
-
- success = (par->result == VLR_PR_ARQ_RES_PASSED);
-
- /* It would be logical to first dispatch the success event to the
- * parent FSM, but that could start actions that send messages to the
- * MS. Rather send the CM Service Accept message first and then signal
- * success. Since messages are handled synchronously, the success event
- * will be processed before we handle new incoming data from the MS. */
-
- if (par->type == VLR_PR_ARQ_T_CM_SERV_REQ) {
- if (success
- && !par->implicitly_accepted_parq_by_ciphering_cmd) {
- rc = par->vlr->ops.tx_cm_serv_acc(par->msc_conn_ref);
- if (rc) {
- LOGPFSML(fi, LOGL_ERROR,
- "Failed to send CM Service Accept\n");
- success = false;
- }
- }
- if (!success) {
- rc = par->vlr->ops.tx_cm_serv_rej(par->msc_conn_ref,
- par->result);
- if (rc)
- LOGPFSML(fi, LOGL_ERROR,
- "Failed to send CM Service Reject\n");
- }
- }
-
- /* For VLR_PR_ARQ_T_PAGING_RESP, there is nothing to send. The conn_fsm
- * will start handling pending paging transactions. */
-
- if (!fi->proc.parent) {
- LOGPFSML(fi, LOGL_ERROR, "No parent FSM");
- return;
- }
- osmo_fsm_inst_dispatch(fi->proc.parent,
- success ? par->parent_event_success
- : par->parent_event_failure,
- par->parent_event_data);
-}
-
-void proc_arq_vlr_cleanup(struct osmo_fsm_inst *fi,
- enum osmo_fsm_term_cause cause)
-{
- struct proc_arq_priv *par = fi->priv;
- if (par->vsub && par->vsub->proc_arq_fsm == fi)
- par->vsub->proc_arq_fsm = NULL;
-}
-
-static void _proc_arq_vlr_post_imei(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- /* See 3GPP TS 29.002 Proc_Acc_Req_VLR3. */
- /* TODO: Identity := IMSI */
- if (0 /* TODO: TMSI reallocation at access: vlr->cfg.alloc_tmsi_arq */) {
- vlr_subscr_alloc_tmsi(vsub);
- /* TODO: forward TMSI to MS, wait for TMSI
- * REALLOC COMPLETE */
- /* TODO: Freeze old TMSI */
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_TMSI_ACK, 0, 0);
- return;
- }
-
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_PASSED);
-}
-
-static void _proc_arq_vlr_post_trace(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
- struct vlr_instance *vlr = vsub->vlr;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- /* Node 3 */
- /* See 3GPP TS 29.002 Proc_Acc_Req_VLR3. */
- if (0 /* IMEI check required */) {
- /* Chck_IMEI_VLR */
- vlr->ops.tx_id_req(par->msc_conn_ref, GSM_MI_TYPE_IMEI);
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_CHECK_IMEI,
- vlr_timer(vlr, 3270), 3270);
- } else
- _proc_arq_vlr_post_imei(fi);
-}
-
-/* After Subscriber_Present_VLR */
-static void _proc_arq_vlr_post_pres(struct osmo_fsm_inst *fi)
-{
- LOGPFSM(fi, "%s()\n", __func__);
- /* See 3GPP TS 29.002 Proc_Acc_Req_VLR3. */
- if (0 /* TODO: tracing required */) {
- /* TODO: Trace_Subscriber_Activity_VLR */
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_TRACE_SUB, 0, 0);
- }
- _proc_arq_vlr_post_trace(fi);
-}
-
-/* After Update_Location_Child_VLR */
-static void _proc_arq_vlr_node2_post_vlr(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- if (!vsub->sub_dataconf_by_hlr_ind) {
- /* Set User Error: Unidentified Subscriber */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_UNIDENT_SUBSCR);
- return;
- }
- /* We don't feature location area specific blocking (yet). */
- if (0 /* roaming not allowed in LA */) {
- /* Set User Error: Roaming not allowed in this LA */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_ROAMING_NOTALLOWED);
- return;
- }
- vsub->imsi_detached_flag = false;
- if (vsub->ms_not_reachable_flag) {
- /* Start Subscriber_Present_VLR */
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_SUB_PRES, 0, 0);
- par->sub_pres_vlr_fsm = sub_pres_vlr_fsm_start(fi, vsub,
- PR_ARQ_E_PRES_RES);
- return;
- }
- _proc_arq_vlr_post_pres(fi);
-}
-
-static void _proc_arq_vlr_node2_post_ciph(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- if (par->is_utran) {
- int rc;
- rc = par->vlr->ops.tx_common_id(par->msc_conn_ref);
- if (rc)
- LOGPFSML(fi, LOGL_ERROR,
- "Error while sending Common ID (%d)\n", rc);
- }
-
- vsub->conf_by_radio_contact_ind = true;
- if (vsub->loc_conf_in_hlr_ind == false) {
- /* start Update_Location_Child_VLR. WE use
- * Update_HLR_VLR instead, the differences appear
- * insignificant for now. */
- par->ul_child_fsm = upd_hlr_vlr_proc_start(fi, vsub,
- PR_ARQ_E_UPD_LOC_RES);
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_UPD_LOC_CHILD, 0, 0);
- return;
- }
- _proc_arq_vlr_node2_post_vlr(fi);
-}
-
-static bool is_ciph_required(struct proc_arq_priv *par)
-{
- return par->ciphering_required != VLR_CIPH_NONE;
-}
-
-static void _proc_arq_vlr_node2(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- if (!is_ciph_required(par)) {
- _proc_arq_vlr_node2_post_ciph(fi);
- return;
- }
-
- if (vlr_set_ciph_mode(vsub->vlr, fi, par->msc_conn_ref,
- par->ciphering_required,
- vsub->vlr->cfg.retrieve_imeisv_ciphered)) {
- LOGPFSML(fi, LOGL_ERROR,
- "Failed to send Ciphering Mode Command\n");
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_SYSTEM_FAILURE);
- return;
- }
-
- par->implicitly_accepted_parq_by_ciphering_cmd = true;
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_CIPH, 0, 0);
-}
-
-static bool is_auth_required(struct proc_arq_priv *par)
-{
- /* The cases where the authentication procedure should be used
- * are defined in 3GPP TS 33.102 */
- /* For now we use a default value passed in to vlr_lu_fsm(). */
- return par->authentication_required
- || (par->ciphering_required != VLR_CIPH_NONE);
-}
-
-/* after the IMSI is known */
-static void proc_arq_vlr_fn_post_imsi(struct osmo_fsm_inst *fi)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- OSMO_ASSERT(vsub);
-
- /* TODO: Identity IMEI -> System Failure */
- if (is_auth_required(par)) {
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_AUTH,
- 0, 0);
- vsub->auth_fsm = auth_fsm_start(vsub, fi->log_level, fi,
- PR_ARQ_E_AUTH_RES,
- par->is_r99,
- par->is_utran);
- } else {
- _proc_arq_vlr_node2(fi);
- }
-}
-
-static void proc_arq_vlr_fn_init(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_instance *vlr = par->vlr;
- struct vlr_subscr *vsub = NULL;
-
- OSMO_ASSERT(event == PR_ARQ_E_START);
-
- /* Obtain_Identity_VLR */
- if (!par->by_tmsi) {
- /* IMSI was included */
- vsub = vlr_subscr_find_by_imsi(par->vlr, par->imsi);
- } else {
- /* TMSI was included */
- vsub = vlr_subscr_find_by_tmsi(par->vlr, par->tmsi);
- }
- if (vsub) {
- log_set_context(LOG_CTX_VLR_SUBSCR, vsub);
- if (vsub->proc_arq_fsm && fi != vsub->proc_arq_fsm) {
- LOGPFSML(fi, LOGL_ERROR,
- "Another proc_arq_fsm is already"
- " associated with subscr %s,"
- " terminating the other FSM.\n",
- vlr_subscr_name(vsub));
- proc_arq_fsm_done(vsub->proc_arq_fsm,
- VLR_PR_ARQ_RES_SYSTEM_FAILURE);
- }
- vsub->proc_arq_fsm = fi;
- assoc_par_with_subscr(fi, vsub);
- proc_arq_vlr_fn_post_imsi(fi);
- vlr_subscr_put(vsub);
- return;
- }
- /* No VSUB could be resolved. What now? */
-
- if (!par->by_tmsi) {
- /* We couldn't find a subscriber even by IMSI,
- * Set User Error: Unidentified Subscriber */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_UNIDENT_SUBSCR);
- return;
- } else {
- /* TMSI was included, are we permitted to use it? */
- if (vlr->cfg.parq_retrieve_imsi) {
- /* Obtain_IMSI_VLR */
- osmo_fsm_inst_state_chg(fi, PR_ARQ_S_WAIT_OBTAIN_IMSI,
- vlr_timer(vlr, 3270), 3270);
- return;
- } else {
- /* Set User Error: Unidentified Subscriber */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_UNIDENT_SUBSCR);
- return;
- }
- }
-}
-
-/* ID REQ(IMSI) has returned */
-static void proc_arq_vlr_fn_w_obt_imsi(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_instance *vlr = par->vlr;
- struct vlr_subscr *vsub;
-
- OSMO_ASSERT(event == PR_ARQ_E_ID_IMSI);
-
- vsub = vlr_subscr_find_by_imsi(vlr, par->imsi);
- if (!vsub) {
- /* Set User Error: Unidentified Subscriber */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_UNIDENT_SUBSCR);
- return;
- }
- assoc_par_with_subscr(fi, vsub);
- proc_arq_vlr_fn_post_imsi(fi);
- vlr_subscr_put(vsub);
-}
-
-/* Authenticate_VLR has completed */
-static void proc_arq_vlr_fn_w_auth(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- enum vlr_auth_fsm_result res;
- enum vlr_proc_arq_result ret;
-
- OSMO_ASSERT(event == PR_ARQ_E_AUTH_RES);
-
- res = data ? *(enum vlr_auth_fsm_result*)data : -1;
- LOGPFSM(fi, "got %s\n", vlr_auth_fsm_result_name(res));
-
- switch (res) {
- case VLR_AUTH_RES_PASSED:
- /* Node 2 */
- _proc_arq_vlr_node2(fi);
- return;
- case VLR_AUTH_RES_ABORTED:
- /* Error */
- ret = VLR_PR_ARQ_RES_UNKNOWN_ERROR;
- break;
- case VLR_AUTH_RES_UNKNOWN_SUBSCR:
- /* Set User Error: Unidentified Subscriber */
- ret = VLR_PR_ARQ_RES_UNIDENT_SUBSCR;
- break;
- case VLR_AUTH_RES_AUTH_FAILED:
- /* Set User Error: Illegal Subscriber */
- ret = VLR_PR_ARQ_RES_ILLEGAL_SUBSCR;
- break;
- case VLR_AUTH_RES_PROC_ERR:
- /* Set User Error: System failure */
- ret = VLR_PR_ARQ_RES_SYSTEM_FAILURE;
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "Unexpected vlr_auth_fsm_result value: %d (data=%p)\n", res, data);
- ret = VLR_PR_ARQ_RES_UNKNOWN_ERROR;
- break;
- }
-
- /* send process_access_req response to caller, enter error state */
- proc_arq_fsm_done(fi, ret);
-}
-
-static void proc_arq_vlr_fn_w_ciph(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct proc_arq_priv *par = fi->priv;
- struct vlr_subscr *vsub = par->vsub;
- struct vlr_ciph_result res = { .cause = VLR_CIPH_REJECT };
-
- OSMO_ASSERT(event == PR_ARQ_E_CIPH_RES);
-
- if (!data)
- LOGPFSML(fi, LOGL_ERROR, "invalid ciphering result: NULL\n");
- else
- res = *(struct vlr_ciph_result*)data;
-
- switch (res.cause) {
- case VLR_CIPH_COMPL:
- break;
- case VLR_CIPH_REJECT:
- LOGPFSM(fi, "ciphering rejected\n");
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_ILLEGAL_SUBSCR);
- return;
- default:
- LOGPFSML(fi, LOGL_ERROR, "invalid ciphering result: %d\n",
- res.cause);
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_ILLEGAL_SUBSCR);
- return;
- }
-
-
- if (res.imeisv) {
- LOGPFSM(fi, "got IMEISV: %s\n", res.imeisv);
- vlr_subscr_set_imeisv(vsub, res.imeisv);
- }
- _proc_arq_vlr_node2_post_ciph(fi);
-}
-
-/* Update_Location_Child_VLR has completed */
-static void proc_arq_vlr_fn_w_upd_loc(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- OSMO_ASSERT(event == PR_ARQ_E_UPD_LOC_RES);
-
- _proc_arq_vlr_node2_post_vlr(fi);
-}
-
-/* Subscriber_Present_VLR has completed */
-static void proc_arq_vlr_fn_w_pres(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- OSMO_ASSERT(event == PR_ARQ_E_PRES_RES);
-
- _proc_arq_vlr_post_pres(fi);
-}
-
-static void proc_arq_vlr_fn_w_trace(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- OSMO_ASSERT(event == PR_ARQ_E_TRACE_RES);
-
- _proc_arq_vlr_post_trace(fi);
-}
-
-/* we have received the ID RESPONSE (IMEI) */
-static void proc_arq_vlr_fn_w_imei(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- OSMO_ASSERT(event == PR_ARQ_E_IMEI_RES);
-
- _proc_arq_vlr_post_imei(fi);
-}
-
-/* MSC tells us that MS has acknowleded TMSI re-allocation */
-static void proc_arq_vlr_fn_w_tmsi(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- OSMO_ASSERT(event == PR_ARQ_E_TMSI_ACK);
-
- /* FIXME: check confirmation? unfreeze? */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_PASSED);
-}
-
-static const struct osmo_fsm_state proc_arq_vlr_states[] = {
- [PR_ARQ_S_INIT] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_INIT),
- .in_event_mask = S(PR_ARQ_E_START),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_OBTAIN_IMSI) |
- S(PR_ARQ_S_WAIT_AUTH) |
- S(PR_ARQ_S_WAIT_UPD_LOC_CHILD) |
- S(PR_ARQ_S_WAIT_SUB_PRES) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_init,
- },
- [PR_ARQ_S_WAIT_OBTAIN_IMSI] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_OBTAIN_IMSI),
- .in_event_mask = S(PR_ARQ_E_ID_IMSI),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_AUTH) |
- S(PR_ARQ_S_WAIT_UPD_LOC_CHILD) |
- S(PR_ARQ_S_WAIT_SUB_PRES) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_obt_imsi,
- },
- [PR_ARQ_S_WAIT_AUTH] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_AUTH),
- .in_event_mask = S(PR_ARQ_E_AUTH_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_CIPH) |
- S(PR_ARQ_S_WAIT_UPD_LOC_CHILD) |
- S(PR_ARQ_S_WAIT_SUB_PRES) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_auth,
- },
- [PR_ARQ_S_WAIT_CIPH] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_CIPH),
- .in_event_mask = S(PR_ARQ_E_CIPH_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_UPD_LOC_CHILD) |
- S(PR_ARQ_S_WAIT_SUB_PRES) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_ciph,
- },
- [PR_ARQ_S_WAIT_UPD_LOC_CHILD] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_UPD_LOC_CHILD),
- .in_event_mask = S(PR_ARQ_E_UPD_LOC_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_SUB_PRES) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_upd_loc,
- },
- [PR_ARQ_S_WAIT_SUB_PRES] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_SUB_PRES),
- .in_event_mask = S(PR_ARQ_E_PRES_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_TRACE_SUB) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_pres,
- },
- [PR_ARQ_S_WAIT_TRACE_SUB] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_TRACE_SUB),
- .in_event_mask = S(PR_ARQ_E_TRACE_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_CHECK_IMEI) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_trace,
- },
- [PR_ARQ_S_WAIT_CHECK_IMEI] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_CHECK_IMEI),
- .in_event_mask = S(PR_ARQ_E_IMEI_RES),
- .out_state_mask = S(PR_ARQ_S_DONE) |
- S(PR_ARQ_S_WAIT_TMSI_ACK),
- .action = proc_arq_vlr_fn_w_imei,
- },
- [PR_ARQ_S_WAIT_TMSI_ACK] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_WAIT_TMSI_ACK),
- .in_event_mask = S(PR_ARQ_E_TMSI_ACK),
- .out_state_mask = S(PR_ARQ_S_DONE),
- .action = proc_arq_vlr_fn_w_tmsi,
- },
- [PR_ARQ_S_DONE] = {
- .name = OSMO_STRINGIFY(PR_ARQ_S_DONE),
- .onenter = proc_arq_vlr_dispatch_result,
- },
-};
-
-static struct osmo_fsm proc_arq_vlr_fsm = {
- .name = "Process_Access_Request_VLR",
- .states = proc_arq_vlr_states,
- .num_states = ARRAY_SIZE(proc_arq_vlr_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = proc_arq_vlr_event_names,
- .cleanup = proc_arq_vlr_cleanup,
-};
-
-void
-vlr_proc_acc_req(struct osmo_fsm_inst *parent,
- uint32_t parent_event_success,
- uint32_t parent_event_failure,
- void *parent_event_data,
- struct vlr_instance *vlr, void *msc_conn_ref,
- enum vlr_parq_type type, const uint8_t *mi_lv,
- const struct osmo_location_area_id *lai,
- bool authentication_required,
- enum vlr_ciph ciphering_required,
- bool is_r99, bool is_utran)
-{
- struct osmo_fsm_inst *fi;
- struct proc_arq_priv *par;
- char mi_string[GSM48_MI_SIZE];
- uint8_t mi_type;
-
- fi = osmo_fsm_inst_alloc_child(&proc_arq_vlr_fsm, parent,
- parent_event_failure);
- if (!fi)
- return;
-
- par = talloc_zero(fi, struct proc_arq_priv);
- fi->priv = par;
- par->vlr = vlr;
- par->msc_conn_ref = msc_conn_ref;
- par->type = type;
- par->lai = *lai;
- par->parent_event_success = parent_event_success;
- par->parent_event_failure = parent_event_failure;
- par->parent_event_data = parent_event_data;
- par->authentication_required = authentication_required;
- par->ciphering_required = ciphering_required;
- par->is_r99 = is_r99;
- par->is_utran = is_utran;
-
- LOGPFSM(fi, "rev=%s net=%s%s%s\n",
- is_r99 ? "R99" : "GSM",
- is_utran ? "UTRAN" : "GERAN",
- (authentication_required || ciphering_required)?
- " Auth" : " (no Auth)",
- (authentication_required || ciphering_required)?
- (ciphering_required? "+Ciph" : " (no Ciph)")
- : "");
-
- if (is_utran && !authentication_required)
- LOGPFSML(fi, LOGL_ERROR,
- "Authentication off on UTRAN network. Good luck.\n");
-
- gsm48_mi_to_string(mi_string, sizeof(mi_string), mi_lv+1, mi_lv[0]);
- mi_type = mi_lv[1] & GSM_MI_TYPE_MASK;
- switch (mi_type) {
- case GSM_MI_TYPE_IMSI:
- strncpy(par->imsi, mi_string, sizeof(par->imsi)-1);
- par->imsi[sizeof(par->imsi)-1] = '\0';
- par->by_tmsi = false;
- break;
- case GSM_MI_TYPE_TMSI:
- par->by_tmsi = true;
- par->tmsi = osmo_load32be(mi_lv+2);
- break;
- case GSM_MI_TYPE_IMEI:
- /* TODO: IMEI (emergency call) */
- default:
- /* FIXME: directly send reject? */
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_UNIDENT_SUBSCR);
- return;
- }
-
- osmo_fsm_inst_dispatch(fi, PR_ARQ_E_START, NULL);
-}
-
-/* Gracefully terminate an FSM created by vlr_proc_acc_req() in case of
- * external timeout (i.e. from MSC). */
-void vlr_parq_conn_timeout(struct osmo_fsm_inst *fi)
-{
- if (!fi || fi->state == PR_ARQ_S_DONE)
- return;
- LOGPFSM(fi, "Connection timed out\n");
- proc_arq_fsm_done(fi, VLR_PR_ARQ_RES_TIMEOUT);
-}
-
-
-#if 0
-/***********************************************************************
- * Update_Location_Child_VLR, TS 29.002 Chapter 25.4.4
- ***********************************************************************/
-
-enum upd_loc_child_vlr_state {
- ULC_S_IDLE,
- ULC_S_WAIT_HLR_RESP,
- ULC_S_DONE,
-};
-
-enum upd_loc_child_vlr_event {
- ULC_E_START,
-};
-
-static const struct value_string upd_loc_child_vlr_event_names[] = {
- { ULC_E_START, "START" },
- { 0, NULL }
-};
-
-static void upd_loc_child_f_idle(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- OSMO_ASSERT(event == ULC_E_START);
-
- /* send update location */
-}
-
-static void upd_loc_child_f_w_hlr(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
-}
-
-static const struct osmo_fsm_state upd_loc_child_vlr_states[] = {
- [ULC_S_IDLE] = {
- .in_event_mask = ,
- .out_state_mask = S(ULC_S_WAIT_HLR_RESP) |
- S(ULC_S_DONE),
- .name = "IDLE",
- .action = upd_loc_child_f_idle,
- },
- [ULC_S_WAIT_HLR_RESP] = {
- .in_event_mask = ,
- .out_state_mask = S(ULC_S_DONE),
- .name = "WAIT-HLR-RESP",
- .action = upd_loc_child_f_w_hlr,
- },
- [ULC_S_DONE] = {
- .name = "DONE",
- },
-};
-
-static struct osmo_fsm upd_loc_child_vlr_fsm = {
- .name = "Update_Location_Child_VLR",
- .states = upd_loc_child_vlr_states,
- .num_states = ARRAY_SIZE(upd_loc_child_vlr_states),
- .log_subsys = DVLR,
- .event_names = upd_loc_child_vlr_event_names,
-};
-#endif
-
-void vlr_parq_fsm_init(void)
-{
- //osmo_fsm_register(&upd_loc_child_vlr_fsm);
- osmo_fsm_register(&proc_arq_vlr_fsm);
-}
diff --git a/src/libvlr/vlr_access_req_fsm.h b/src/libvlr/vlr_access_req_fsm.h
deleted file mode 100644
index 8386da6f2..000000000
--- a/src/libvlr/vlr_access_req_fsm.h
+++ /dev/null
@@ -1,17 +0,0 @@
-#pragma once
-
-enum proc_arq_vlr_state {
- PR_ARQ_S_INIT,
- /* Waiting for Obtain_Identity_VLR (IMSI) result */
- PR_ARQ_S_WAIT_OBTAIN_IMSI,
- /* Waiting for Authenticate_VLR result */
- PR_ARQ_S_WAIT_AUTH,
- PR_ARQ_S_WAIT_CIPH,
- PR_ARQ_S_WAIT_UPD_LOC_CHILD,
- PR_ARQ_S_WAIT_SUB_PRES,
- PR_ARQ_S_WAIT_TRACE_SUB,
- PR_ARQ_S_WAIT_CHECK_IMEI,
- PR_ARQ_S_WAIT_TMSI_ACK,
- PR_ARQ_S_WAIT_CECK_CONF,
- PR_ARQ_S_DONE,
-};
diff --git a/src/libvlr/vlr_auth_fsm.c b/src/libvlr/vlr_auth_fsm.c
deleted file mode 100644
index 0eb86e749..000000000
--- a/src/libvlr/vlr_auth_fsm.c
+++ /dev/null
@@ -1,605 +0,0 @@
-/* Osmocom Visitor Location Register (VLR) Autentication FSM */
-
-/* (C) 2016 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-
-#include <osmocom/core/fsm.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/gsup.h>
-#include <openbsc/vlr.h>
-#include <openbsc/debug.h>
-
-#include "vlr_core.h"
-#include "vlr_auth_fsm.h"
-
-#define S(x) (1 << (x))
-
-static const struct value_string fsm_auth_event_names[] = {
- OSMO_VALUE_STRING(VLR_AUTH_E_START),
- OSMO_VALUE_STRING(VLR_AUTH_E_HLR_SAI_ACK),
- OSMO_VALUE_STRING(VLR_AUTH_E_HLR_SAI_NACK),
- OSMO_VALUE_STRING(VLR_AUTH_E_HLR_SAI_ABORT),
- OSMO_VALUE_STRING(VLR_AUTH_E_MS_AUTH_RESP),
- OSMO_VALUE_STRING(VLR_AUTH_E_MS_AUTH_FAIL),
- OSMO_VALUE_STRING(VLR_AUTH_E_MS_ID_IMSI),
- { 0, NULL }
-};
-
-const struct value_string vlr_auth_fsm_result_names[] = {
- OSMO_VALUE_STRING(VLR_AUTH_RES_ABORTED),
- OSMO_VALUE_STRING(VLR_AUTH_RES_UNKNOWN_SUBSCR),
- OSMO_VALUE_STRING(VLR_AUTH_RES_PROC_ERR),
- OSMO_VALUE_STRING(VLR_AUTH_RES_AUTH_FAILED),
- OSMO_VALUE_STRING(VLR_AUTH_RES_PASSED),
- {0, NULL}
-};
-
-/* private state of the auth_fsm_instance */
-struct auth_fsm_priv {
- struct vlr_subscr *vsub;
- bool by_imsi;
- bool is_r99;
- bool is_utran;
- bool auth_requested;
-
- int auth_tuple_max_use_count; /* see vlr->cfg instead */
-};
-
-/***********************************************************************
- * Utility functions
- ***********************************************************************/
-
-/* Always use either vlr_subscr_get_auth_tuple() or vlr_subscr_has_auth_tuple()
- * instead, to ensure proper use count.
- * Return an auth tuple with the lowest use_count among the auth tuples. If
- * max_use_count >= 0, return NULL if all available auth tuples have a use
- * count > max_use_count. If max_use_count is negative, return a currently
- * least used auth tuple without enforcing a maximum use count. If there are
- * no auth tuples, return NULL.
- */
-static struct gsm_auth_tuple *
-_vlr_subscr_next_auth_tuple(struct vlr_subscr *vsub, int max_use_count)
-{
- unsigned int count;
- unsigned int idx;
- struct gsm_auth_tuple *at = NULL;
- unsigned int key_seq = GSM_KEY_SEQ_INVAL;
-
- if (!vsub)
- return NULL;
-
- if (vsub->last_tuple)
- key_seq = vsub->last_tuple->key_seq;
-
- if (key_seq == GSM_KEY_SEQ_INVAL)
- /* Start with 0 after increment modulo array size */
- idx = ARRAY_SIZE(vsub->auth_tuples) - 1;
- else
- idx = key_seq;
-
- for (count = ARRAY_SIZE(vsub->auth_tuples); count > 0; count--) {
- idx = (idx + 1) % ARRAY_SIZE(vsub->auth_tuples);
-
- if (vsub->auth_tuples[idx].key_seq == GSM_KEY_SEQ_INVAL)
- continue;
-
- if (!at || vsub->auth_tuples[idx].use_count < at->use_count)
- at = &vsub->auth_tuples[idx];
- }
-
- if (!at || (max_use_count >= 0 && at->use_count > max_use_count))
- return NULL;
-
- return at;
-}
-
-/* Return an auth tuple and increment its use count. */
-static struct gsm_auth_tuple *
-vlr_subscr_get_auth_tuple(struct vlr_subscr *vsub, int max_use_count)
-{
- struct gsm_auth_tuple *at = _vlr_subscr_next_auth_tuple(vsub,
- max_use_count);
- if (!at)
- return NULL;
- at->use_count++;
- return at;
-}
-
-/* Return whether an auth tuple with the given max_use_count is available. */
-static bool vlr_subscr_has_auth_tuple(struct vlr_subscr *vsub,
- int max_use_count)
-{
- return _vlr_subscr_next_auth_tuple(vsub, max_use_count) != NULL;
-}
-
-static bool check_auth_resp(struct vlr_subscr *vsub, bool is_r99,
- bool is_utran, const uint8_t *res,
- uint8_t res_len)
-{
- struct gsm_auth_tuple *at = vsub->last_tuple;
- struct osmo_auth_vector *vec = &at->vec;
- bool check_umts;
- OSMO_ASSERT(at);
-
- LOGVSUBP(LOGL_DEBUG, vsub, "received res: %s\n",
- osmo_hexdump(res, res_len));
-
- /* RES must be present and at least 32bit */
- if (!res || res_len < sizeof(vec->sres)) {
- LOGVSUBP(LOGL_NOTICE, vsub, "AUTH RES missing or too short "
- "(%u)\n", res_len);
- goto out_false;
- }
-
- check_umts = false;
- if (is_r99 && (vec->auth_types & OSMO_AUTH_TYPE_UMTS)) {
- check_umts = true;
- /* We have a R99 capable UE and have a UMTS AKA capable USIM.
- * However, the ME may still choose to only perform GSM AKA, as
- * long as the bearer is GERAN */
- if (res_len != vec->res_len) {
- if (is_utran) {
- LOGVSUBP(LOGL_NOTICE, vsub,
- "AUTH via UTRAN but "
- "res_len(%u) != vec->res_len(%u)\n",
- res_len, vec->res_len);
- goto out_false;
- }
- check_umts = false;
- }
- }
-
- if (check_umts) {
- if (res_len != vec->res_len
- || memcmp(res, vec->res, res_len)) {
- LOGVSUBP(LOGL_INFO, vsub, "UMTS AUTH failure:"
- " mismatching res (expected res=%s)\n",
- osmo_hexdump(vec->res, vec->res_len));
- goto out_false;
- }
-
- LOGVSUBP(LOGL_INFO, vsub, "AUTH established UMTS security"
- " context\n");
- vsub->sec_ctx = VLR_SEC_CTX_UMTS;
- return true;
- } else {
- if (res_len != sizeof(vec->sres)
- || memcmp(res, vec->sres, sizeof(vec->sres))) {
- LOGVSUBP(LOGL_INFO, vsub, "GSM AUTH failure:"
- " mismatching sres (expected sres=%s)\n",
- osmo_hexdump(vec->sres, sizeof(vec->sres)));
- goto out_false;
- }
-
- LOGVSUBP(LOGL_INFO, vsub, "AUTH established GSM security"
- " context\n");
- vsub->sec_ctx = VLR_SEC_CTX_GSM;
- return true;
- }
-
-out_false:
- vsub->sec_ctx = VLR_SEC_CTX_NONE;
- return false;
-}
-
-static void auth_fsm_onenter_failed(struct osmo_fsm_inst *fi, uint32_t prev_state)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
-
- /* If authentication hasn't even started, e.g. the HLR sent no auth
- * info, then we also don't need to tell the HLR about an auth failure.
- */
- if (afp->auth_requested)
- vlr_subscr_tx_auth_fail_rep(vsub);
-}
-
-static bool is_umts_auth(struct auth_fsm_priv *afp,
- uint32_t auth_types)
-{
- if (!afp->is_r99)
- return false;
- if (!(auth_types & OSMO_AUTH_TYPE_UMTS))
- return false;
- return true;
-}
-
-/* Terminate the Auth FSM Instance and notify parent */
-static void auth_fsm_term(struct osmo_fsm_inst *fi, enum vlr_auth_fsm_result res)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
-
- LOGPFSM(fi, "Authentication terminating with result %s\n",
- vlr_auth_fsm_result_name(res));
-
- /* Do one final state transition (mostly for logging purpose) */
- if (res == VLR_AUTH_RES_PASSED)
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_AUTHENTICATED, 0, 0);
- else
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_AUTH_FAILED, 0, 0);
-
- /* return the result to the parent FSM */
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, &res);
- vsub->auth_fsm = NULL;
-}
-
-/* back-end function transmitting authentication. Caller ensures we have valid
- * tuple */
-static int _vlr_subscr_authenticate(struct osmo_fsm_inst *fi)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- struct gsm_auth_tuple *at;
-
- /* Caller ensures we have vectors available */
- at = vlr_subscr_get_auth_tuple(vsub, afp->auth_tuple_max_use_count);
- if (!at) {
- LOGPFSML(fi, LOGL_ERROR, "A previous check ensured that an"
- " auth tuple was available, but now there is in fact"
- " none.\n");
- auth_fsm_term(fi, VLR_AUTH_RES_PROC_ERR);
- return -1;
- }
-
- LOGPFSM(fi, "got auth tuple: use_count=%d key_seq=%d\n",
- at->use_count, at->key_seq);
-
- OSMO_ASSERT(at);
-
- /* Transmit auth req to subscriber */
- afp->auth_requested = true;
- vsub->last_tuple = at;
- vsub->vlr->ops.tx_auth_req(vsub->msc_conn_ref, at,
- is_umts_auth(afp, at->vec.auth_types));
- return 0;
-}
-
-/***********************************************************************
- * FSM State Action functions
- ***********************************************************************/
-
-/* Initial State of TS 23.018 AUT_VLR */
-static void auth_fsm_needs_auth(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
-
- OSMO_ASSERT(event == VLR_AUTH_E_START);
-
- /* Start off with the default max_use_count, possibly change that if we
- * need to re-use an old tuple. */
- afp->auth_tuple_max_use_count = vsub->vlr->cfg.auth_tuple_max_use_count;
-
- /* Check if we have vectors available */
- if (!vlr_subscr_has_auth_tuple(vsub, afp->auth_tuple_max_use_count)) {
- /* Obtain_Authentication_Sets_VLR */
- vlr_subscr_req_sai(vsub, NULL, NULL);
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_NEEDS_AUTH_WAIT_AI,
- GSM_29002_TIMER_M, 0);
- } else {
- /* go straight ahead with sending auth request */
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_WAIT_RESP,
- vlr_timer(vsub->vlr, 3260), 3260);
- _vlr_subscr_authenticate(fi);
- }
-}
-
-/* Waiting for Authentication Info from HLR */
-static void auth_fsm_wait_ai(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- struct osmo_gsup_message *gsup = data;
-
- if (event == VLR_AUTH_E_HLR_SAI_NACK)
- LOGPFSM(fi, "GSUP: rx Auth Info Error cause: %d: %s\n",
- gsup->cause,
- get_value_string(gsm48_gmm_cause_names, gsup->cause));
-
- /* We are in what corresponds to the
- * Wait_For_Authentication_Sets state of TS 23.018 OAS_VLR */
- if ((event == VLR_AUTH_E_HLR_SAI_ACK && !gsup->num_auth_vectors)
- || (event == VLR_AUTH_E_HLR_SAI_NACK &&
- gsup->cause != GMM_CAUSE_IMSI_UNKNOWN)
- || (event == VLR_AUTH_E_HLR_SAI_ABORT)) {
- if (vsub->vlr->cfg.auth_reuse_old_sets_on_error
- && vlr_subscr_has_auth_tuple(vsub, -1)) {
- /* To re-use an old tuple, disable the max_use_count
- * constraint. */
- afp->auth_tuple_max_use_count = -1;
- goto pass;
- }
- /* result = procedure error */
- auth_fsm_term(fi, VLR_AUTH_RES_PROC_ERR);
- return;
- }
-
- switch (event) {
- case VLR_AUTH_E_HLR_SAI_ACK:
- vlr_subscr_update_tuples(vsub, gsup);
- goto pass;
- break;
- case VLR_AUTH_E_HLR_SAI_NACK:
- auth_fsm_term(fi,
- gsup->cause == GMM_CAUSE_IMSI_UNKNOWN?
- VLR_AUTH_RES_UNKNOWN_SUBSCR
- : VLR_AUTH_RES_PROC_ERR);
- break;
- }
-
- return;
-pass:
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_WAIT_RESP,
- vlr_timer(vsub->vlr, 3260), 3260);
- _vlr_subscr_authenticate(fi);
-}
-
-/* Waiting for Authentication Response from MS */
-static void auth_fsm_wait_auth_resp(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- struct vlr_instance *vlr = vsub->vlr;
- struct vlr_auth_resp_par *par = data;
- int rc;
-
- switch (event) {
- case VLR_AUTH_E_MS_AUTH_RESP:
- rc = check_auth_resp(vsub, par->is_r99, par->is_utran,
- par->res, par->res_len);
- if (rc == false) {
- if (!afp->by_imsi) {
- vlr->ops.tx_id_req(vsub->msc_conn_ref,
- GSM_MI_TYPE_IMSI);
- osmo_fsm_inst_state_chg(fi,
- VLR_SUB_AS_WAIT_ID_IMSI,
- vlr_timer(vlr, 3270), 3270);
- } else {
- auth_fsm_term(fi, VLR_AUTH_RES_AUTH_FAILED);
- }
- } else {
- auth_fsm_term(fi, VLR_AUTH_RES_PASSED);
- }
- break;
- case VLR_AUTH_E_MS_AUTH_FAIL:
- if (par->auts) {
- /* First failure, start re-sync attempt */
- vlr_subscr_req_sai(vsub, par->auts,
- vsub->last_tuple->vec.rand);
- osmo_fsm_inst_state_chg(fi,
- VLR_SUB_AS_NEEDS_AUTH_WAIT_SAI_RESYNC,
- GSM_29002_TIMER_M, 0);
- } else
- auth_fsm_term(fi, VLR_AUTH_RES_AUTH_FAILED);
- break;
- }
-}
-
-/* Waiting for Authentication Info from HLR (resync case) */
-static void auth_fsm_wait_ai_resync(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- struct osmo_gsup_message *gsup = data;
-
- /* We are in what corresponds to the
- * Wait_For_Authentication_Sets state of TS 23.018 OAS_VLR */
- if ((event == VLR_AUTH_E_HLR_SAI_ACK && !gsup->num_auth_vectors) ||
- (event == VLR_AUTH_E_HLR_SAI_NACK &&
- gsup->cause != GMM_CAUSE_IMSI_UNKNOWN) ||
- (event == VLR_AUTH_E_HLR_SAI_ABORT)) {
- /* result = procedure error */
- auth_fsm_term(fi, VLR_AUTH_RES_PROC_ERR);
- }
- switch (event) {
- case VLR_AUTH_E_HLR_SAI_ACK:
- vlr_subscr_update_tuples(vsub, gsup);
- goto pass;
- break;
- case VLR_AUTH_E_HLR_SAI_NACK:
- auth_fsm_term(fi,
- gsup->cause == GMM_CAUSE_IMSI_UNKNOWN?
- VLR_AUTH_RES_UNKNOWN_SUBSCR
- : VLR_AUTH_RES_PROC_ERR);
- break;
- }
-
- return;
-pass:
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_WAIT_RESP_RESYNC,
- vlr_timer(vsub->vlr, 3260), 3260);
- _vlr_subscr_authenticate(fi);
-}
-
-/* Waiting for AUTH RESP from MS (re-sync case) */
-static void auth_fsm_wait_auth_resp_resync(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- struct vlr_auth_resp_par *par = data;
- struct vlr_instance *vlr = vsub->vlr;
- int rc;
-
- switch (event) {
- case VLR_AUTH_E_MS_AUTH_RESP:
- rc = check_auth_resp(vsub, par->is_r99, par->is_utran,
- par->res, par->res_len);
- if (rc == false) {
- if (!afp->by_imsi) {
- vlr->ops.tx_id_req(vsub->msc_conn_ref,
- GSM_MI_TYPE_IMSI);
- osmo_fsm_inst_state_chg(fi,
- VLR_SUB_AS_WAIT_ID_IMSI,
- vlr_timer(vlr, 3270), 3270);
- } else {
- /* Result = Aborted */
- auth_fsm_term(fi, VLR_AUTH_RES_ABORTED);
- }
- } else {
- /* Result = Pass */
- auth_fsm_term(fi, VLR_AUTH_RES_PASSED);
- }
- break;
- case VLR_AUTH_E_MS_AUTH_FAIL:
- /* Second failure: Result = Fail */
- auth_fsm_term(fi, VLR_AUTH_RES_AUTH_FAILED);
- break;
- }
-}
-
-/* AUT_VLR waiting for Obtain_IMSI_VLR result */
-static void auth_fsm_wait_imsi(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct auth_fsm_priv *afp = fi->priv;
- struct vlr_subscr *vsub = afp->vsub;
- const char *mi_string = data;
-
- switch (event) {
- case VLR_AUTH_E_MS_ID_IMSI:
- if (vsub->imsi[0]
- && !vlr_subscr_matches_imsi(vsub, mi_string)) {
- LOGVSUBP(LOGL_ERROR, vsub, "IMSI in ID RESP differs:"
- " %s\n", mi_string);
- } else {
- strncpy(vsub->imsi, mi_string, sizeof(vsub->imsi));
- vsub->imsi[sizeof(vsub->imsi)-1] = '\0';
- }
- /* retry with identity=IMSI */
- afp->by_imsi = true;
- osmo_fsm_inst_state_chg(fi, VLR_SUB_AS_NEEDS_AUTH, 0, 0);
- osmo_fsm_inst_dispatch(fi, VLR_AUTH_E_START, NULL);
- break;
- }
-}
-
-static const struct osmo_fsm_state auth_fsm_states[] = {
- [VLR_SUB_AS_NEEDS_AUTH] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_NEEDS_AUTH),
- .in_event_mask = S(VLR_AUTH_E_START),
- .out_state_mask = S(VLR_SUB_AS_NEEDS_AUTH_WAIT_AI) |
- S(VLR_SUB_AS_WAIT_RESP),
- .action = auth_fsm_needs_auth,
- },
- [VLR_SUB_AS_NEEDS_AUTH_WAIT_AI] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_NEEDS_AUTH_WAIT_AI),
- .in_event_mask = S(VLR_AUTH_E_HLR_SAI_ACK) |
- S(VLR_AUTH_E_HLR_SAI_NACK),
- .out_state_mask = S(VLR_SUB_AS_AUTH_FAILED) |
- S(VLR_SUB_AS_WAIT_RESP),
- .action = auth_fsm_wait_ai,
- },
- [VLR_SUB_AS_WAIT_RESP] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_WAIT_RESP),
- .in_event_mask = S(VLR_AUTH_E_MS_AUTH_RESP) |
- S(VLR_AUTH_E_MS_AUTH_FAIL),
- .out_state_mask = S(VLR_SUB_AS_WAIT_ID_IMSI) |
- S(VLR_SUB_AS_AUTH_FAILED) |
- S(VLR_SUB_AS_AUTHENTICATED) |
- S(VLR_SUB_AS_NEEDS_AUTH_WAIT_SAI_RESYNC),
- .action = auth_fsm_wait_auth_resp,
- },
- [VLR_SUB_AS_NEEDS_AUTH_WAIT_SAI_RESYNC] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_NEEDS_AUTH_WAIT_SAI_RESYNC),
- .in_event_mask = S(VLR_AUTH_E_HLR_SAI_ACK) |
- S(VLR_AUTH_E_HLR_SAI_NACK),
- .out_state_mask = S(VLR_SUB_AS_AUTH_FAILED) |
- S(VLR_SUB_AS_WAIT_RESP_RESYNC),
- .action = auth_fsm_wait_ai_resync,
- },
- [VLR_SUB_AS_WAIT_RESP_RESYNC] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_WAIT_RESP_RESYNC),
- .in_event_mask = S(VLR_AUTH_E_MS_AUTH_RESP) |
- S(VLR_AUTH_E_MS_AUTH_FAIL),
- .out_state_mask = S(VLR_SUB_AS_AUTH_FAILED) |
- S(VLR_SUB_AS_AUTHENTICATED),
- .action = auth_fsm_wait_auth_resp_resync,
- },
- [VLR_SUB_AS_WAIT_ID_IMSI] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_WAIT_ID_IMSI),
- .in_event_mask = S(VLR_AUTH_E_MS_ID_IMSI),
- .out_state_mask = S(VLR_SUB_AS_NEEDS_AUTH),
- .action = auth_fsm_wait_imsi,
- },
- [VLR_SUB_AS_AUTHENTICATED] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_AUTHENTICATED),
- .in_event_mask = 0,
- .out_state_mask = 0,
- },
- [VLR_SUB_AS_AUTH_FAILED] = {
- .name = OSMO_STRINGIFY(VLR_SUB_AS_AUTH_FAILED),
- .in_event_mask = 0,
- .out_state_mask = 0,
- .onenter = auth_fsm_onenter_failed,
- },
-};
-
-struct osmo_fsm vlr_auth_fsm = {
- .name = "VLR_Authenticate",
- .states = auth_fsm_states,
- .num_states = ARRAY_SIZE(auth_fsm_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = fsm_auth_event_names,
-};
-
-/***********************************************************************
- * User API (for SGSN/MSC code)
- ***********************************************************************/
-
-/* MSC->VLR: Start Procedure Authenticate_VLR (TS 23.012 Ch. 4.1.2.2) */
-struct osmo_fsm_inst *auth_fsm_start(struct vlr_subscr *vsub,
- uint32_t log_level,
- struct osmo_fsm_inst *parent,
- uint32_t parent_term_event,
- bool is_r99,
- bool is_utran)
-{
- struct osmo_fsm_inst *fi;
- struct auth_fsm_priv *afp;
-
- fi = osmo_fsm_inst_alloc_child(&vlr_auth_fsm, parent,
- parent_term_event);
-
-
- afp = talloc_zero(fi, struct auth_fsm_priv);
- if (!afp) {
- osmo_fsm_inst_dispatch(parent, parent_term_event, 0);
- return NULL;
- }
-
- afp->vsub = vsub;
- if (vsub->imsi[0])
- afp->by_imsi = true;
- afp->is_r99 = is_r99;
- afp->is_utran = is_utran;
- fi->priv = afp;
- vsub->auth_fsm = fi;
-
- osmo_fsm_inst_dispatch(fi, VLR_AUTH_E_START, NULL);
-
- return fi;
-}
diff --git a/src/libvlr/vlr_auth_fsm.h b/src/libvlr/vlr_auth_fsm.h
deleted file mode 100644
index 226435f83..000000000
--- a/src/libvlr/vlr_auth_fsm.h
+++ /dev/null
@@ -1,52 +0,0 @@
-#pragma once
-
-#include <osmocom/core/utils.h>
-
-/* Parameters to VLR_AUTH_E_MS_AUTH_RESP */
-struct vlr_auth_resp_par {
- bool is_r99;
- bool is_utran;
- const uint8_t *res;
- unsigned int res_len;
- const uint8_t *auts;
-};
-
-/* Result communicated back to parent FMS */
-enum vlr_auth_fsm_result {
- VLR_AUTH_RES_ABORTED,
- VLR_AUTH_RES_UNKNOWN_SUBSCR,
- VLR_AUTH_RES_PROC_ERR,
- VLR_AUTH_RES_AUTH_FAILED,
- VLR_AUTH_RES_PASSED,
-};
-
-extern const struct value_string vlr_auth_fsm_result_names[];
-static inline const char *vlr_auth_fsm_result_name(enum vlr_auth_fsm_result val)
-{
- return get_value_string(vlr_auth_fsm_result_names, val);
-}
-
-enum vlr_fsm_auth_event {
- VLR_AUTH_E_START,
- /* TS 23.018 OAS_VLR1(2): SendAuthInfo ACK from HLR */
- VLR_AUTH_E_HLR_SAI_ACK,
- /* TS 23.018 OAS_VLR1(2): SendAuthInfo NACK from HLR */
- VLR_AUTH_E_HLR_SAI_NACK,
- /* FIXME: merge with NACK? */
- VLR_AUTH_E_HLR_SAI_ABORT,
- /* Authentication Response from MS */
- VLR_AUTH_E_MS_AUTH_RESP,
- /* Authentication Failure from MS */
- VLR_AUTH_E_MS_AUTH_FAIL,
- /* Identity Response (IMSI) from MS */
- VLR_AUTH_E_MS_ID_IMSI,
-};
-
-struct osmo_fsm vlr_auth_fsm;
-
-struct osmo_fsm_inst *auth_fsm_start(struct vlr_subscr *vsub,
- uint32_t log_level,
- struct osmo_fsm_inst *parent,
- uint32_t parent_term_event,
- bool is_r99,
- bool is_utran);
diff --git a/src/libvlr/vlr_core.h b/src/libvlr/vlr_core.h
deleted file mode 100644
index 0e63c7e69..000000000
--- a/src/libvlr/vlr_core.h
+++ /dev/null
@@ -1,21 +0,0 @@
-#pragma once
-
-#include <openbsc/vlr.h>
-
-#define LOGGSUPP(level, gsup, fmt, args...) \
- LOGP(DVLR, level, "GSUP(%s) " fmt, \
- (gsup)->imsi, \
- ## args)
-
-#define LOGVSUBP(level, vsub, fmt, args...) \
- LOGP(DVLR, level, "SUBSCR(%s) " fmt, \
- vlr_subscr_name(vsub), ## args)
-
-
-const char *vlr_subscr_name(struct vlr_subscr *vsub);
-int vlr_subscr_req_lu(struct vlr_subscr *vsub, bool is_ps);
-int vlr_subscr_req_sai(struct vlr_subscr *vsub, const uint8_t *auts,
- const uint8_t *auts_rand);
-struct vlr_subscr *vlr_subscr_alloc(struct vlr_instance *vlr);
-void vlr_subscr_update_tuples(struct vlr_subscr *vsub,
- const struct osmo_gsup_message *gsup);
diff --git a/src/libvlr/vlr_lu_fsm.c b/src/libvlr/vlr_lu_fsm.c
deleted file mode 100644
index 94bea560f..000000000
--- a/src/libvlr/vlr_lu_fsm.c
+++ /dev/null
@@ -1,1449 +0,0 @@
-/* Osmocom Visitor Location Register (VLR): Location Update FSMs */
-
-/* (C) 2016 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/fsm.h>
-#include <osmocom/gsm/gsup.h>
-#include <openbsc/vlr.h>
-#include <openbsc/debug.h>
-
-#include "vlr_core.h"
-#include "vlr_auth_fsm.h"
-#include "vlr_lu_fsm.h"
-
-#define S(x) (1 << (x))
-
-#define LU_TIMEOUT_LONG 30
-
-enum vlr_fsm_result {
- VLR_FSM_RESULT_NONE,
- VLR_FSM_RESULT_SUCCESS,
- VLR_FSM_RESULT_FAILURE,
-};
-
-
-/***********************************************************************
- * Update_HLR_VLR, TS 23.012 Chapter 4.1.2.4
- ***********************************************************************/
-
-enum upd_hlr_vlr_state {
- UPD_HLR_VLR_S_INIT,
- UPD_HLR_VLR_S_WAIT_FOR_DATA,
- UPD_HLR_VLR_S_DONE,
-};
-
-enum upd_hlr_vlr_evt {
- UPD_HLR_VLR_E_START,
- UPD_HLR_VLR_E_INS_SUB_DATA,
- UPD_HLR_VLR_E_ACT_TRACE_MODE,
- UPD_HLR_VLR_E_FW_CHECK_SS_IND,
- UPD_HLR_VLR_E_UPD_LOC_ACK,
- UPD_HLR_VLR_E_UPD_LOC_NACK,
-};
-
-static const struct value_string upd_hlr_vlr_event_names[] = {
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_START),
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_INS_SUB_DATA),
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_ACT_TRACE_MODE),
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_FW_CHECK_SS_IND),
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_UPD_LOC_ACK),
- OSMO_VALUE_STRING(UPD_HLR_VLR_E_UPD_LOC_NACK),
- { 0, NULL }
-};
-
-static void upd_hlr_vlr_fsm_init(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct vlr_subscr *vsub = fi->priv;
-
- OSMO_ASSERT(event == UPD_HLR_VLR_E_START);
-
- /* Send UpdateLocation to HLR */
- vlr_subscr_req_lu(vsub, vsub->vlr->cfg.is_ps);
- osmo_fsm_inst_state_chg(fi, UPD_HLR_VLR_S_WAIT_FOR_DATA,
- LU_TIMEOUT_LONG, 0);
-}
-
-static void upd_hlr_vlr_fsm_wait_data(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct vlr_subscr *vsub = fi->priv;
-
- switch (event) {
- case UPD_HLR_VLR_E_INS_SUB_DATA:
- /* FIXME: Insert_Subscr_Data_VLR */
- break;
- case UPD_HLR_VLR_E_ACT_TRACE_MODE:
- /* TODO: Activate_Tracing_VLR */
- break;
- case UPD_HLR_VLR_E_FW_CHECK_SS_IND:
- /* TODO: Forward Check SS Ind to MSC */
- break;
- case UPD_HLR_VLR_E_UPD_LOC_ACK:
- /* Inside Update_HLR_VLR after UpdateLocationAck */
- vsub->sub_dataconf_by_hlr_ind = true;
- vsub->loc_conf_in_hlr_ind = true;
- osmo_fsm_inst_state_chg(fi, UPD_HLR_VLR_S_DONE, 0, 0);
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
- break;
- case UPD_HLR_VLR_E_UPD_LOC_NACK:
- /* Inside Update_HLR_VLR after UpdateLocationNack */
- /* TODO: Check_User_Error_In_Serving_Network_Entity */
- vsub->sub_dataconf_by_hlr_ind = false;
- vsub->loc_conf_in_hlr_ind = false;
- osmo_fsm_inst_state_chg(fi, UPD_HLR_VLR_S_DONE, 0, 0);
- /* Data is a pointer to a gsm48_gmm_cause which we
- * simply pass through */
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, data);
- break;
- }
-}
-
-static const struct osmo_fsm_state upd_hlr_vlr_states[] = {
- [UPD_HLR_VLR_S_INIT] = {
- .in_event_mask = S(UPD_HLR_VLR_E_START),
- .out_state_mask = S(UPD_HLR_VLR_S_WAIT_FOR_DATA),
- .name = OSMO_STRINGIFY(UPD_HLR_VLR_S_INIT),
- .action = upd_hlr_vlr_fsm_init,
- },
- [UPD_HLR_VLR_S_WAIT_FOR_DATA] = {
- .in_event_mask = S(UPD_HLR_VLR_E_INS_SUB_DATA) |
- S(UPD_HLR_VLR_E_ACT_TRACE_MODE) |
- S(UPD_HLR_VLR_E_FW_CHECK_SS_IND) |
- S(UPD_HLR_VLR_E_UPD_LOC_ACK) |
- S(UPD_HLR_VLR_E_UPD_LOC_NACK),
- .out_state_mask = S(UPD_HLR_VLR_S_DONE),
- .name = OSMO_STRINGIFY(UPD_HLR_VLR_S_WAIT_FOR_DATA),
- .action = upd_hlr_vlr_fsm_wait_data,
- },
- [UPD_HLR_VLR_S_DONE] = {
- .name = OSMO_STRINGIFY(UPD_HLR_VLR_S_DONE),
- },
-};
-
-static struct osmo_fsm upd_hlr_vlr_fsm = {
- .name = "upd_hlr_vlr_fsm",
- .states = upd_hlr_vlr_states,
- .num_states = ARRAY_SIZE(upd_hlr_vlr_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = upd_hlr_vlr_event_names,
-};
-
-struct osmo_fsm_inst *
-upd_hlr_vlr_proc_start(struct osmo_fsm_inst *parent,
- struct vlr_subscr *vsub,
- uint32_t parent_event)
-{
- struct osmo_fsm_inst *fi;
-
- fi = osmo_fsm_inst_alloc_child(&upd_hlr_vlr_fsm, parent,
- parent_event);
- if (!fi)
- return NULL;
-
- fi->priv = vsub;
- osmo_fsm_inst_dispatch(fi, UPD_HLR_VLR_E_START, NULL);
-
- return fi;
-}
-
-
-/***********************************************************************
- * Subscriber_Present_VLR, TS 29.002 Chapter 25.10.1
- ***********************************************************************/
-
-enum sub_pres_vlr_state {
- SUB_PRES_VLR_S_INIT,
- SUB_PRES_VLR_S_WAIT_FOR_HLR,
- SUB_PRES_VLR_S_DONE,
-};
-
-enum sub_pres_vlr_event {
- SUB_PRES_VLR_E_START,
- SUB_PRES_VLR_E_READY_SM_CNF,
- SUB_PRES_VLR_E_READY_SM_ERR,
-};
-
-static const struct value_string sub_pres_vlr_event_names[] = {
- OSMO_VALUE_STRING(SUB_PRES_VLR_E_START),
- OSMO_VALUE_STRING(SUB_PRES_VLR_E_READY_SM_CNF),
- OSMO_VALUE_STRING(SUB_PRES_VLR_E_READY_SM_ERR),
- { 0, NULL }
-};
-
-static void sub_pres_vlr_fsm_init(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct vlr_subscr *vsub = fi->priv;
- OSMO_ASSERT(event == SUB_PRES_VLR_E_START);
-
- if (!vsub->ms_not_reachable_flag) {
- osmo_fsm_inst_state_chg(fi, SUB_PRES_VLR_S_DONE, 0, 0);
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
- return;
- }
- /* FIXME: Send READY_FOR_SM via GSUP */
- osmo_fsm_inst_state_chg(fi, SUB_PRES_VLR_S_WAIT_FOR_HLR,
- LU_TIMEOUT_LONG, 0);
-}
-
-static void sub_pres_vlr_fsm_wait_hlr(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct vlr_subscr *vsub = fi->priv;
-
- switch (event) {
- case SUB_PRES_VLR_E_READY_SM_CNF:
- vsub->ms_not_reachable_flag = false;
- break;
- case SUB_PRES_VLR_E_READY_SM_ERR:
- break;
- }
- osmo_fsm_inst_state_chg(fi, SUB_PRES_VLR_S_DONE, 0, 0);
- osmo_fsm_inst_term(fi, OSMO_FSM_TERM_REGULAR, NULL);
-}
-
-static const struct osmo_fsm_state sub_pres_vlr_states[] = {
- [SUB_PRES_VLR_S_INIT] = {
- .in_event_mask = S(SUB_PRES_VLR_E_START),
- .out_state_mask = S(SUB_PRES_VLR_S_WAIT_FOR_HLR) |
- S(SUB_PRES_VLR_S_DONE),
- .name = OSMO_STRINGIFY(SUB_PRES_VLR_S_INIT),
- .action = sub_pres_vlr_fsm_init,
- },
- [SUB_PRES_VLR_S_WAIT_FOR_HLR] = {
- .in_event_mask = S(SUB_PRES_VLR_E_READY_SM_CNF) |
- S(SUB_PRES_VLR_E_READY_SM_ERR),
- .out_state_mask = S(SUB_PRES_VLR_S_DONE),
- .name = OSMO_STRINGIFY(SUB_PRES_VLR_S_WAIT_FOR_HLR),
- .action = sub_pres_vlr_fsm_wait_hlr,
- },
- [SUB_PRES_VLR_S_DONE] = {
- .name = OSMO_STRINGIFY(SUB_PRES_VLR_S_DONE),
- },
-};
-
-static struct osmo_fsm sub_pres_vlr_fsm = {
- .name = "sub_pres_vlr_fsm",
- .states = sub_pres_vlr_states,
- .num_states = ARRAY_SIZE(sub_pres_vlr_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = sub_pres_vlr_event_names,
-};
-
-struct osmo_fsm_inst *sub_pres_vlr_fsm_start(struct osmo_fsm_inst *parent,
- struct vlr_subscr *vsub,
- uint32_t term_event)
-{
- struct osmo_fsm_inst *fi;
-
- fi = osmo_fsm_inst_alloc_child(&sub_pres_vlr_fsm, parent,
- term_event);
- if (!fi)
- return NULL;
-
- fi->priv = vsub;
- osmo_fsm_inst_dispatch(fi, SUB_PRES_VLR_E_START, NULL);
-
- return fi;
-}
-
-/***********************************************************************
- * Location_Update_Completion_VLR, TS 23.012 Chapter 4.1.2.3
- ***********************************************************************/
-
-enum lu_compl_vlr_state {
- LU_COMPL_VLR_S_INIT,
- LU_COMPL_VLR_S_WAIT_SUB_PRES,
- LU_COMPL_VLR_S_WAIT_IMEI,
- LU_COMPL_VLR_S_WAIT_IMEI_TMSI,
- LU_COMPL_VLR_S_WAIT_TMSI_CNF,
- LU_COMPL_VLR_S_DONE,
-};
-
-enum lu_compl_vlr_event {
- LU_COMPL_VLR_E_START,
- LU_COMPL_VLR_E_SUB_PRES_COMPL,
- LU_COMPL_VLR_E_IMEI_CHECK_ACK,
- LU_COMPL_VLR_E_IMEI_CHECK_NACK,
- LU_COMPL_VLR_E_NEW_TMSI_ACK,
-};
-
-static const struct value_string lu_compl_vlr_event_names[] = {
- OSMO_VALUE_STRING(LU_COMPL_VLR_E_START),
- OSMO_VALUE_STRING(LU_COMPL_VLR_E_SUB_PRES_COMPL),
- OSMO_VALUE_STRING(LU_COMPL_VLR_E_IMEI_CHECK_ACK),
- OSMO_VALUE_STRING(LU_COMPL_VLR_E_IMEI_CHECK_NACK),
- OSMO_VALUE_STRING(LU_COMPL_VLR_E_NEW_TMSI_ACK),
- { 0, NULL }
-};
-
-struct lu_compl_vlr_priv {
- struct vlr_subscr *vsub;
- void *msc_conn_ref;
- struct osmo_fsm_inst *sub_pres_vlr_fsm;
- uint32_t parent_event_success;
- uint32_t parent_event_failure;
- void *parent_event_data;
- enum vlr_fsm_result result;
- uint8_t cause;
- bool assign_tmsi;
-};
-
-static void _vlr_lu_compl_fsm_done(struct osmo_fsm_inst *fi,
- enum vlr_fsm_result result,
- uint8_t cause)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- lcvp->result = result;
- lcvp->cause = cause;
- osmo_fsm_inst_state_chg(fi, LU_COMPL_VLR_S_DONE, 0, 0);
-}
-
-static void vlr_lu_compl_fsm_success(struct osmo_fsm_inst *fi)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
- if (!vsub->lu_complete) {
- vsub->lu_complete = true;
- /* Balanced by vlr_subscr_rx_imsi_detach() */
- vlr_subscr_get(vsub);
- }
- _vlr_lu_compl_fsm_done(fi, VLR_FSM_RESULT_SUCCESS, 0);
-}
-
-static void vlr_lu_compl_fsm_failure(struct osmo_fsm_inst *fi, uint8_t cause)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- lcvp->vsub->vlr->ops.tx_lu_rej(lcvp->msc_conn_ref, cause);
- _vlr_lu_compl_fsm_done(fi, VLR_FSM_RESULT_FAILURE, cause);
-}
-
-static void vlr_lu_compl_fsm_dispatch_result(struct osmo_fsm_inst *fi,
- uint32_t prev_state)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- if (!fi->proc.parent) {
- LOGPFSML(fi, LOGL_ERROR, "No parent FSM\n");
- return;
- }
- osmo_fsm_inst_dispatch(fi->proc.parent,
- (lcvp->result == VLR_FSM_RESULT_SUCCESS)
- ? lcvp->parent_event_success
- : lcvp->parent_event_failure,
- &lcvp->cause);
-}
-
-static void lu_compl_vlr_init(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
- struct vlr_instance *vlr;
- OSMO_ASSERT(vsub);
- vlr = vsub->vlr;
- OSMO_ASSERT(vlr);
-
- OSMO_ASSERT(event == LU_COMPL_VLR_E_START);
-
- /* TODO: National Roaming restrictions? */
- /* TODO: Roaming restriction due to unsupported feature in subscriber
- * data? */
- /* TODO: Regional subscription restriction? */
- /* TODO: Administrative restriction of subscribres' access feature? */
- /* TODO: AccessRestrictuionData parameter available? */
- /* TODO: AccessRestrictionData permits RAT? */
- /* Node 1 */
- /* TODO: Autonomous CSG supported in VPLMN and allowed by HPLMN? */
- /* TODO: Hybrid Cel / CSG Cell */
- /* Node 2 */
- vsub->la_allowed = true;
- vsub->imsi_detached_flag = false;
- /* Start Subscriber_Present_VLR Procedure */
- osmo_fsm_inst_state_chg(fi, LU_COMPL_VLR_S_WAIT_SUB_PRES,
- LU_TIMEOUT_LONG, 0);
-
- lcvp->sub_pres_vlr_fsm = sub_pres_vlr_fsm_start(fi, vsub,
- LU_COMPL_VLR_E_SUB_PRES_COMPL);
-
-}
-
-static void lu_compl_vlr_new_tmsi(struct osmo_fsm_inst *fi)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
- struct vlr_instance *vlr = vsub->vlr;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- if (vlr_subscr_alloc_tmsi(vsub)) {
- vlr_lu_compl_fsm_failure(fi,
- GSM48_REJECT_SRV_OPT_TMP_OUT_OF_ORDER);
- return;
- }
-
- osmo_fsm_inst_state_chg(fi, LU_COMPL_VLR_S_WAIT_TMSI_CNF,
- vlr_timer(vlr, 3250), 3250);
-
- vlr->ops.tx_lu_acc(lcvp->msc_conn_ref, vsub->tmsi_new);
-}
-
-/* After completion of Subscriber_Present_VLR */
-static void lu_compl_vlr_wait_subscr_pres(struct osmo_fsm_inst *fi,
- uint32_t event,
- void *data)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
- struct vlr_instance *vlr = vsub->vlr;
-
- OSMO_ASSERT(event == LU_COMPL_VLR_E_SUB_PRES_COMPL);
-
- lcvp->sub_pres_vlr_fsm = NULL;
-
- /* TODO: Trace_Subscriber_Activity_VLR */
-
- if (vlr->cfg.check_imei_rqd) {
- /* Check IMEI VLR */
- osmo_fsm_inst_state_chg(fi,
- lcvp->assign_tmsi ?
- LU_COMPL_VLR_S_WAIT_IMEI_TMSI
- : LU_COMPL_VLR_S_WAIT_IMEI,
- vlr_timer(vlr, 3270), 3270);
- vlr->ops.tx_id_req(lcvp->msc_conn_ref, GSM_MI_TYPE_IMEI);
- return;
- }
-
- /* Do we need to allocate a TMSI? */
- if (lcvp->assign_tmsi) {
- lu_compl_vlr_new_tmsi(fi);
- return;
- }
-
- /* Location Updating Accept */
- vlr->ops.tx_lu_acc(lcvp->msc_conn_ref, GSM_RESERVED_TMSI);
- vlr_lu_compl_fsm_success(fi);
-}
-
-/* Waiting for completion of CHECK_IMEI_VLR */
-static void lu_compl_vlr_wait_imei(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
- struct vlr_instance *vlr = vsub->vlr;
-
- switch (event) {
- case LU_COMPL_VLR_E_IMEI_CHECK_ACK:
- if (!vsub->imei[0]) {
- /* Abort: Do nothing */
- vlr_lu_compl_fsm_failure(fi,
- GSM48_REJECT_PROTOCOL_ERROR);
- return;
- }
- /* Pass */
- break;
-
- case LU_COMPL_VLR_E_IMEI_CHECK_NACK:
- vlr_lu_compl_fsm_failure(fi, GSM48_REJECT_ILLEGAL_ME);
- /* FIXME: IMEI Check Fail to VLR Application (Detach IMSI VLR) */
- return;
- }
-
- /* IMEI is available. Allocate TMSI if needed. */
- if (lcvp->assign_tmsi) {
- if (fi->state != LU_COMPL_VLR_S_WAIT_IMEI_TMSI)
- LOGPFSML(fi, LOGL_ERROR,
- "TMSI required, expected to be in state"
- " LU_COMPL_VLR_S_WAIT_IMEI_TMSI,"
- " am in %s instead\n",
- osmo_fsm_state_name(fi->fsm, fi->state));
- /* Logged an error, continue anyway. */
-
- lu_compl_vlr_new_tmsi(fi);
-
- /* Wait for TMSI ack */
- return;
- }
-
- /* No TMSI needed, accept now. */
- vlr->ops.tx_lu_acc(lcvp->msc_conn_ref, GSM_RESERVED_TMSI);
- vlr_lu_compl_fsm_success(fi);
-}
-
-/* Waiting for TMSI confirmation */
-static void lu_compl_vlr_wait_tmsi(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_compl_vlr_priv *lcvp = fi->priv;
- struct vlr_subscr *vsub = lcvp->vsub;
-
- OSMO_ASSERT(event == LU_COMPL_VLR_E_NEW_TMSI_ACK);
-
- if (!vsub || vsub->tmsi_new == GSM_RESERVED_TMSI) {
- LOGPFSML(fi, LOGL_ERROR, "TMSI Realloc Compl implies that"
- " the subscriber has a new TMSI allocated, but"
- " the new TMSI is unset.\n");
- vlr_lu_compl_fsm_failure(fi, GSM48_REJECT_NETWORK_FAILURE);
- return;
- }
-
- vsub->tmsi = vsub->tmsi_new;
- vsub->tmsi_new = GSM_RESERVED_TMSI;
-
- vlr_lu_compl_fsm_success(fi);
-}
-
-static const struct osmo_fsm_state lu_compl_vlr_states[] = {
- [LU_COMPL_VLR_S_INIT] = {
- .in_event_mask = S(LU_COMPL_VLR_E_START),
- .out_state_mask = S(LU_COMPL_VLR_S_DONE) |
- S(LU_COMPL_VLR_S_WAIT_SUB_PRES) |
- S(LU_COMPL_VLR_S_WAIT_IMEI),
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_INIT),
- .action = lu_compl_vlr_init,
- },
- [LU_COMPL_VLR_S_WAIT_SUB_PRES] = {
- .in_event_mask = S(LU_COMPL_VLR_E_SUB_PRES_COMPL),
- .out_state_mask = S(LU_COMPL_VLR_S_WAIT_IMEI) |
- S(LU_COMPL_VLR_S_WAIT_IMEI_TMSI) |
- S(LU_COMPL_VLR_S_WAIT_TMSI_CNF) |
- S(LU_COMPL_VLR_S_DONE),
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_WAIT_SUB_PRES),
- .action = lu_compl_vlr_wait_subscr_pres,
- },
- [LU_COMPL_VLR_S_WAIT_IMEI] = {
- .in_event_mask = S(LU_COMPL_VLR_E_IMEI_CHECK_ACK) |
- S(LU_COMPL_VLR_E_IMEI_CHECK_NACK),
- .out_state_mask = S(LU_COMPL_VLR_S_DONE),
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_WAIT_IMEI),
- .action = lu_compl_vlr_wait_imei,
- },
- [LU_COMPL_VLR_S_WAIT_IMEI_TMSI] = {
- .in_event_mask = S(LU_COMPL_VLR_E_IMEI_CHECK_ACK) |
- S(LU_COMPL_VLR_E_IMEI_CHECK_NACK),
- .out_state_mask = S(LU_COMPL_VLR_S_DONE) |
- S(LU_COMPL_VLR_S_WAIT_TMSI_CNF),
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_WAIT_IMEI_TMSI),
- .action = lu_compl_vlr_wait_imei,
- },
- [LU_COMPL_VLR_S_WAIT_TMSI_CNF] = {
- .in_event_mask = S(LU_COMPL_VLR_E_NEW_TMSI_ACK),
- .out_state_mask = S(LU_COMPL_VLR_S_DONE),
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_WAIT_TMSI_CNF),
- .action = lu_compl_vlr_wait_tmsi,
- },
- [LU_COMPL_VLR_S_DONE] = {
- .name = OSMO_STRINGIFY(LU_COMPL_VLR_S_DONE),
- .onenter = vlr_lu_compl_fsm_dispatch_result,
- },
-};
-
-static struct osmo_fsm lu_compl_vlr_fsm = {
- .name = "lu_compl_vlr_fsm",
- .states = lu_compl_vlr_states,
- .num_states = ARRAY_SIZE(lu_compl_vlr_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = lu_compl_vlr_event_names,
-};
-
-struct osmo_fsm_inst *
-lu_compl_vlr_proc_alloc(struct osmo_fsm_inst *parent,
- struct vlr_subscr *vsub,
- void *msc_conn_ref,
- uint32_t parent_event_success,
- uint32_t parent_event_failure,
- bool assign_tmsi)
-{
- struct osmo_fsm_inst *fi;
- struct lu_compl_vlr_priv *lcvp;
-
- fi = osmo_fsm_inst_alloc_child(&lu_compl_vlr_fsm, parent,
- parent_event_failure);
- if (!fi)
- return NULL;
-
- lcvp = talloc_zero(fi, struct lu_compl_vlr_priv);
- lcvp->vsub = vsub;
- lcvp->msc_conn_ref = msc_conn_ref;
- lcvp->parent_event_success = parent_event_success;
- lcvp->parent_event_failure = parent_event_failure;
- lcvp->assign_tmsi = assign_tmsi;
- fi->priv = lcvp;
-
- return fi;
-}
-
-
-/***********************************************************************
- * Update_Location_Area_VLR, TS 23.012 Chapter 4.1.2.1
- ***********************************************************************/
-
-static const struct value_string fsm_lu_event_names[] = {
- OSMO_VALUE_STRING(VLR_ULA_E_UPDATE_LA),
- OSMO_VALUE_STRING(VLR_ULA_E_SEND_ID_ACK),
- OSMO_VALUE_STRING(VLR_ULA_E_SEND_ID_NACK),
- OSMO_VALUE_STRING(VLR_ULA_E_AUTH_RES),
- OSMO_VALUE_STRING(VLR_ULA_E_CIPH_RES),
- OSMO_VALUE_STRING(VLR_ULA_E_ID_IMSI),
- OSMO_VALUE_STRING(VLR_ULA_E_ID_IMEI),
- OSMO_VALUE_STRING(VLR_ULA_E_ID_IMEISV),
- OSMO_VALUE_STRING(VLR_ULA_E_HLR_LU_RES),
- OSMO_VALUE_STRING(VLR_ULA_E_UPD_HLR_COMPL),
- OSMO_VALUE_STRING(VLR_ULA_E_LU_COMPL_SUCCESS),
- OSMO_VALUE_STRING(VLR_ULA_E_LU_COMPL_FAILURE),
- OSMO_VALUE_STRING(VLR_ULA_E_NEW_TMSI_ACK),
- { 0, NULL }
-};
-
-struct lu_fsm_priv {
- struct vlr_instance *vlr;
- struct vlr_subscr *vsub;
- void *msc_conn_ref;
- struct osmo_fsm_inst *upd_hlr_vlr_fsm;
- struct osmo_fsm_inst *lu_compl_vlr_fsm;
- uint32_t parent_event_success;
- uint32_t parent_event_failure;
- void *parent_event_data;
- enum vlr_fsm_result result;
- uint8_t rej_cause;
-
- enum vlr_lu_type type;
- bool lu_by_tmsi;
- char imsi[16];
- uint32_t tmsi;
- struct osmo_location_area_id old_lai;
- struct osmo_location_area_id new_lai;
- bool authentication_required;
- enum vlr_ciph ciphering_required;
- bool is_r99;
- bool is_utran;
- bool assign_tmsi;
-};
-
-
-/* Determine if given location area is served by this VLR */
-static bool lai_in_this_vlr(struct vlr_instance *vlr,
- const struct osmo_location_area_id *lai)
-{
- /* TODO: VLR needs to keep a locally configued list of LAIs */
- return true;
-}
-
-/* Determine if authentication is required */
-static bool is_auth_required(struct lu_fsm_priv *lfp)
-{
- /* The cases where the authentication procedure should be used
- * are defined in 3GPP TS 33.102 */
- /* For now we use a default value passed in to vlr_lu_fsm(). */
- return lfp->authentication_required
- || (lfp->ciphering_required != VLR_CIPH_NONE);
-}
-
-/* Determine if ciphering is required */
-static bool is_ciph_required(struct lu_fsm_priv *lfp)
-{
- return lfp->ciphering_required != VLR_CIPH_NONE;
-}
-
-/* Determine if a HLR Update is required */
-static bool hlr_update_needed(struct vlr_subscr *vsub)
-{
- /* TODO: properly decide this, rather than always assuming we
- * need to update the HLR. */
- return true;
-}
-
-static void lu_fsm_dispatch_result(struct osmo_fsm_inst *fi,
- uint32_t prev_state)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- if (!fi->proc.parent) {
- LOGPFSML(fi, LOGL_ERROR, "No parent FSM\n");
- return;
- }
- osmo_fsm_inst_dispatch(fi->proc.parent,
- (lfp->result == VLR_FSM_RESULT_SUCCESS)
- ? lfp->parent_event_success
- : lfp->parent_event_failure,
- lfp->parent_event_data);
-}
-
-static void _lu_fsm_done(struct osmo_fsm_inst *fi,
- enum vlr_fsm_result result)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- lfp->result = result;
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_DONE, 0, 0);
-}
-
-static void lu_fsm_success(struct osmo_fsm_inst *fi)
-{
- _lu_fsm_done(fi, VLR_FSM_RESULT_SUCCESS);
-}
-
-static void lu_fsm_failure(struct osmo_fsm_inst *fi, uint8_t rej_cause)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- if (rej_cause)
- lfp->vlr->ops.tx_lu_rej(lfp->msc_conn_ref, rej_cause);
- _lu_fsm_done(fi, VLR_FSM_RESULT_FAILURE);
-}
-
-static void vlr_loc_upd_start_lu_compl_fsm(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- lfp->lu_compl_vlr_fsm =
- lu_compl_vlr_proc_alloc(fi, lfp->vsub, lfp->msc_conn_ref,
- VLR_ULA_E_LU_COMPL_SUCCESS,
- VLR_ULA_E_LU_COMPL_FAILURE,
- lfp->assign_tmsi);
-
- osmo_fsm_inst_dispatch(lfp->lu_compl_vlr_fsm, LU_COMPL_VLR_E_START, NULL);
-}
-
-static void lu_fsm_discard_lu_compl_fsm(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- if (!lfp->lu_compl_vlr_fsm)
- return;
- osmo_fsm_inst_term(lfp->lu_compl_vlr_fsm, OSMO_FSM_TERM_PARENT, NULL);
-}
-
-/* 4.1.2.1 Node 4 */
-static void vlr_loc_upd_node_4(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
- bool hlr_unknown = false;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- if (hlr_unknown) {
- /* FIXME: Delete subscriber record */
- /* LU REJ: Roaming not allowed */
- lu_fsm_failure(fi, GSM48_REJECT_ROAMING_NOT_ALLOWED);
- } else {
- /* Update_HLR_VLR */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_HLR_UPD,
- LU_TIMEOUT_LONG, 0);
- lfp->upd_hlr_vlr_fsm =
- upd_hlr_vlr_proc_start(fi, vsub, VLR_ULA_E_UPD_HLR_COMPL);
- }
-}
-
-/* 4.1.2.1 Node B */
-static void vlr_loc_upd_node_b(struct osmo_fsm_inst *fi)
-{
- LOGPFSM(fi, "%s()\n", __func__);
-
- /* OsmoHLR does not support PgA, neither stores the IMEISV, so we have no need to update the HLR
- * with either. TODO: depend on actual HLR configuration. See 3GPP TS 23.012 Release 14, process
- * Update_Location_Area_VLR (ULA_VLR2). */
- if (0) { /* IMEISV or PgA to send */
- vlr_loc_upd_node_4(fi);
- } else {
- /* Location_Update_Completion */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_LU_COMPL,
- LU_TIMEOUT_LONG, 0);
- vlr_loc_upd_start_lu_compl_fsm(fi);
- }
-}
-
-/* Non-standard: after Ciphering Mode Complete (or no ciph required) */
-static void vlr_loc_upd_post_ciph(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- OSMO_ASSERT(vsub);
-
- if (lfp->is_utran) {
- int rc;
- rc = lfp->vlr->ops.tx_common_id(lfp->msc_conn_ref);
- if (rc)
- LOGPFSML(fi, LOGL_ERROR,
- "Error while sending Common ID (%d)\n", rc);
- }
-
- vsub->conf_by_radio_contact_ind = true;
- /* Update LAI */
- vsub->cgi.lai = lfp->new_lai;
- vsub->dormant_ind = false;
- vsub->cancel_loc_rx = false;
- if (hlr_update_needed(vsub)) {
- vlr_loc_upd_node_4(fi);
- } else {
- /* TODO: ADD Support */
- /* TODO: Node A: PgA Support */
- vlr_loc_upd_node_b(fi);
- }
-}
-
-/* 4.1.2.1 after Authentication successful (or no auth rqd) */
-static void vlr_loc_upd_post_auth(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- OSMO_ASSERT(vsub);
-
- if (!is_ciph_required(lfp)) {
- vlr_loc_upd_post_ciph(fi);
- return;
- }
-
- if (vlr_set_ciph_mode(vsub->vlr, fi, lfp->msc_conn_ref,
- lfp->ciphering_required,
- vsub->vlr->cfg.retrieve_imeisv_ciphered)) {
- LOGPFSML(fi, LOGL_ERROR,
- "Failed to send Ciphering Mode Command\n");
- vlr_lu_compl_fsm_failure(fi, GSM48_REJECT_NETWORK_FAILURE);
- return;
- }
-
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_CIPH, LU_TIMEOUT_LONG, 0);
-}
-
-static void vlr_loc_upd_node1(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- OSMO_ASSERT(vsub);
-
- if (is_auth_required(lfp)) {
- /* Authenticate_VLR */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_AUTH,
- LU_TIMEOUT_LONG, 0);
- vsub->auth_fsm = auth_fsm_start(lfp->vsub, fi->log_level,
- fi, VLR_ULA_E_AUTH_RES,
- lfp->is_r99,
- lfp->is_utran);
- } else {
- /* no need for authentication */
- vlr_loc_upd_post_auth(fi);
- }
-}
-
-static void vlr_loc_upd_want_imsi(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_instance *vlr = lfp->vlr;
-
- LOGPFSM(fi, "%s()\n", __func__);
-
- OSMO_ASSERT(lfp->vsub);
-
- /* Obtain_IMSI_VLR */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_IMSI,
- vlr_timer(vlr, 3270), 3270);
- vlr->ops.tx_id_req(lfp->msc_conn_ref, GSM_MI_TYPE_IMSI);
- /* will continue at vlr_loc_upd_node1() once IMSI arrives */
-}
-
-static int assoc_lfp_with_sub(struct osmo_fsm_inst *fi, struct vlr_subscr *vsub)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_instance *vlr = lfp->vlr;
-
- if (vsub->lu_fsm) {
- LOGPFSML(fi, LOGL_ERROR,
- "A Location Updating process is already pending for"
- " this subscriber. Aborting.\n");
- /* Also get rid of the other pending LU attempt? */
- /*lu_fsm_failure(vsub->lu_fsm, GSM48_REJECT_CONGESTION);*/
- lu_fsm_failure(fi, GSM48_REJECT_CONGESTION);
- return -EINVAL;
- }
- vsub->lu_fsm = fi;
- vsub->msc_conn_ref = lfp->msc_conn_ref;
- /* FIXME: send new LAC to HLR? */
- vsub->lac = lfp->new_lai.lac;
- lfp->vsub = vsub;
- /* Tell MSC to associate this subscriber with the given
- * connection */
- vlr->ops.subscr_assoc(lfp->msc_conn_ref, lfp->vsub);
- return 0;
-}
-
-static const char *lai_name(struct osmo_location_area_id *lai)
-{
- static char buf[64];
- snprintf(buf, sizeof(buf),"MCC:%u, MNC:%u, LAC:%u",
- lai->plmn.mcc, lai->plmn.mnc, lai->lac);
- return buf;
-}
-
-static int _lu_fsm_associate_vsub(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_instance *vlr = lfp->vlr;
- struct vlr_subscr *vsub = NULL;
-
- if (!lfp->imsi[0]) {
- /* TMSI was used */
- lfp->lu_by_tmsi = true;
- /* TMSI clash: if a different subscriber already has this TMSI,
- * we will find that other subscriber in the VLR. So the IMSIs
- * would mismatch, but we don't know about it. Theoretically,
- * an authentication process would thwart any attempt to use
- * someone else's TMSI.
- * TODO: Otherwise we can ask for the IMSI and verify that it
- * matches the IMSI on record. */
- vsub = vlr_subscr_find_or_create_by_tmsi(vlr, lfp->tmsi, NULL);
-
- if (!vsub) {
- LOGPFSML(fi, LOGL_ERROR, "VLR subscriber allocation failed\n");
- lu_fsm_failure(fi, GSM48_REJECT_SRV_OPT_TMP_OUT_OF_ORDER);
- return -1;
- }
-
- vsub->sub_dataconf_by_hlr_ind = false;
- if (assoc_lfp_with_sub(fi, vsub)) {
- vlr_subscr_put(vsub);
- return -1; /* error, fsm failure invoked in assoc_lfp_with_sub() */
- }
- vlr_subscr_put(vsub);
- } else {
- /* IMSI was used */
- vsub = vlr_subscr_find_or_create_by_imsi(vlr, lfp->imsi, NULL);
-
- if (!vsub) {
- LOGPFSML(fi, LOGL_ERROR, "VLR subscriber allocation failed\n");
- lu_fsm_failure(fi, GSM48_REJECT_SRV_OPT_TMP_OUT_OF_ORDER);
- vlr_subscr_put(vsub);
- return -1;
- }
-
- vsub->sub_dataconf_by_hlr_ind = false;
- if (assoc_lfp_with_sub(fi, vsub)) {
- vlr_subscr_put(vsub);
- return -1; /* error, fsm failure invoked in assoc_lfp_with_sub() */
- }
- vlr_subscr_put(vsub);
- }
- return 0;
-}
-
-/* 4.1.2.1: Subscriber (via MSC/SGSN) requests location update */
-static void _start_lu_main(struct osmo_fsm_inst *fi)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_instance *vlr = lfp->vlr;
-
- /* TODO: PUESBINE related handling */
-
- /* Is previous LAI in this VLR? */
- if (!lai_in_this_vlr(vlr, &lfp->old_lai)) {
-#if 0
- /* FIXME: check previous VLR, (3) */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_PVLR,
- LU_TIMEOUT_LONG, 0);
- return;
-#endif
- LOGPFSML(fi, LOGL_NOTICE, "LAI change from %s,"
- " but checking previous VLR not implemented\n",
- lai_name(&lfp->old_lai));
- }
-
- /* If this is a TMSI based LU, we may not have the IMSI. Make sure that
- * we know the IMSI, either on record, or request it. */
- if (!lfp->vsub->imsi[0])
- vlr_loc_upd_want_imsi(fi);
- else
- vlr_loc_upd_node1(fi);
-}
-
-static void lu_fsm_idle(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_instance *vlr = lfp->vlr;
-
- OSMO_ASSERT(event == VLR_ULA_E_UPDATE_LA);
-
- if (_lu_fsm_associate_vsub(fi))
- return; /* error. FSM already terminated. */
-
- OSMO_ASSERT(lfp->vsub);
-
- /* See 3GPP TS 23.012, procedure Retrieve_IMEISV_If_Required */
- if ((!vlr->cfg.retrieve_imeisv_early)
- || (lfp->type == VLR_LU_TYPE_PERIODIC && lfp->vsub->imeisv[0])) {
- /* R_IMEISV_IR1 passed */
- _start_lu_main(fi);
- } else {
- vlr->ops.tx_id_req(lfp->msc_conn_ref, GSM_MI_TYPE_IMEISV);
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_IMEISV,
- vlr_timer(vlr, 3270), 3270);
- }
-}
-
-static void lu_fsm_wait_imeisv(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- switch (event) {
- case VLR_ULA_E_ID_IMEISV:
- /* IMEISV was copied in vlr_subscr_rx_id_resp(), and that's
- * where we received this event from. */
- _start_lu_main(fi);
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-/* Wait for response from Send_Identification to PVLR */
-static void lu_fsm_wait_pvlr(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- switch (event) {
- case VLR_ULA_E_SEND_ID_ACK:
- vlr_loc_upd_node1(fi);
- break;
- case VLR_ULA_E_SEND_ID_NACK:
- vlr_loc_upd_want_imsi(fi);
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-/* Wait for result of Authenticate_VLR procedure */
-static void lu_fsm_wait_auth(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- enum vlr_auth_fsm_result *res = data;
- uint8_t rej_cause = 0;
-
- OSMO_ASSERT(event == VLR_ULA_E_AUTH_RES);
-
- lfp->upd_hlr_vlr_fsm = NULL;
-
- if (res) {
- switch (*res) {
- case VLR_AUTH_RES_PASSED:
- /* Result == Pass */
- vlr_loc_upd_post_auth(fi);
- return;
- case VLR_AUTH_RES_ABORTED:
- /* go to Idle with no response */
- rej_cause = 0;
- break;
- case VLR_AUTH_RES_UNKNOWN_SUBSCR:
- /* FIXME: delete subscribe record */
- rej_cause = GSM48_REJECT_IMSI_UNKNOWN_IN_HLR;
- break;
- case VLR_AUTH_RES_AUTH_FAILED:
- /* cause = illegal subscriber */
- rej_cause = GSM48_REJECT_ILLEGAL_MS;
- break;
- case VLR_AUTH_RES_PROC_ERR:
- /* cause = system failure */
- rej_cause = GSM48_REJECT_NETWORK_FAILURE;
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
- } else
- rej_cause = GSM48_REJECT_NETWORK_FAILURE;
-
- lu_fsm_failure(fi, rej_cause);
-}
-
-static void lu_fsm_wait_ciph(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
- struct vlr_ciph_result res = { .cause = VLR_CIPH_REJECT };
-
- OSMO_ASSERT(event == VLR_ULA_E_CIPH_RES);
-
- if (!data)
- LOGPFSML(fi, LOGL_ERROR, "invalid ciphering result: NULL\n");
- else
- res = *(struct vlr_ciph_result*)data;
-
- switch (res.cause) {
- case VLR_CIPH_COMPL:
- break;
- case VLR_CIPH_REJECT:
- LOGPFSM(fi, "ciphering rejected\n");
- lu_fsm_failure(fi, GSM48_REJECT_INVALID_MANDANTORY_INF);
- return;
- default:
- LOGPFSML(fi, LOGL_ERROR, "invalid ciphering result: %d\n",
- res.cause);
- lu_fsm_failure(fi, GSM48_REJECT_INVALID_MANDANTORY_INF);
- return;
- }
-
- if (res.imeisv) {
- LOGPFSM(fi, "got IMEISV: %s\n", res.imeisv);
- vlr_subscr_set_imeisv(vsub, res.imeisv);
- }
- vlr_loc_upd_post_ciph(fi);
-}
-
-static void lu_fsm_wait_imsi(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
- char *mi_string = data;
-
- switch (event) {
- case VLR_ULA_E_ID_IMSI:
- vlr_subscr_set_imsi(vsub, mi_string);
- vlr_loc_upd_node1(fi);
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-/* At the end of Update_HLR_VLR */
-static void lu_fsm_wait_hlr_ul_res(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
-
- switch (event) {
- case VLR_ULA_E_HLR_LU_RES:
- /* pass-through this event to Update_HLR_VLR */
- if (data == NULL)
- osmo_fsm_inst_dispatch(lfp->upd_hlr_vlr_fsm, UPD_HLR_VLR_E_UPD_LOC_ACK, NULL);
- else
- osmo_fsm_inst_dispatch(lfp->upd_hlr_vlr_fsm, UPD_HLR_VLR_E_UPD_LOC_NACK, data);
- break;
- case VLR_ULA_E_UPD_HLR_COMPL:
- if (data == NULL) {
- /* successful case */
- osmo_fsm_inst_state_chg(fi, VLR_ULA_S_WAIT_LU_COMPL,
- LU_TIMEOUT_LONG, 0);
- vlr_loc_upd_start_lu_compl_fsm(fi);
- /* continue in MSC ?!? */
- } else {
- /* unsuccessful case */
- enum gsm48_gmm_cause cause =
- *(enum gsm48_gmm_cause *)data;
- /* Ignoring standalone mode for now. */
- if (0 /* procedure_error && vlr->cfg.standalone_mode */) {
- osmo_fsm_inst_state_chg(fi,
- VLR_ULA_S_WAIT_LU_COMPL_STANDALONE,
- LU_TIMEOUT_LONG, 0);
- vlr_loc_upd_start_lu_compl_fsm(fi);
- } else {
- lu_fsm_failure(fi, cause);
- }
- }
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-/* Wait for end of Location_Update_Completion_VLR */
-static void lu_fsm_wait_lu_compl(struct osmo_fsm_inst *fi, uint32_t event,
- void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- uint8_t cause;
-
- switch (event) {
- case VLR_ULA_E_NEW_TMSI_ACK:
- osmo_fsm_inst_dispatch(lfp->lu_compl_vlr_fsm,
- LU_COMPL_VLR_E_NEW_TMSI_ACK, NULL);
- break;
- case VLR_ULA_E_ID_IMEI:
- osmo_fsm_inst_dispatch(lfp->lu_compl_vlr_fsm,
- LU_COMPL_VLR_E_IMEI_CHECK_ACK, NULL);
- break;
- case VLR_ULA_E_LU_COMPL_SUCCESS:
- lu_fsm_discard_lu_compl_fsm(fi);
-
- /* Update Register */
- /* TODO: Set_Notification_Type 23.078 */
- /* TODO: Notify_gsmSCF 23.078 */
- /* TODO: Authenticated Radio Contact Established -> ARC */
- lu_fsm_success(fi);
- break;
- case VLR_ULA_E_LU_COMPL_FAILURE:
- cause = GSM48_REJECT_NETWORK_FAILURE;
- if (data)
- cause = *(uint8_t*)data;
- lu_fsm_discard_lu_compl_fsm(fi);
- lu_fsm_failure(fi, cause);
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-/* Wait for end of Location_Update_Completion_VLR (standalone case) */
-static void lu_fsm_wait_lu_compl_standalone(struct osmo_fsm_inst *fi,
- uint32_t event, void *data)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
- uint8_t cause;
-
- switch (event) {
- case VLR_ULA_E_NEW_TMSI_ACK:
- osmo_fsm_inst_dispatch(lfp->lu_compl_vlr_fsm,
- LU_COMPL_VLR_E_NEW_TMSI_ACK, NULL);
- break;
- case VLR_ULA_E_LU_COMPL_SUCCESS:
- lu_fsm_discard_lu_compl_fsm(fi);
- vsub->sub_dataconf_by_hlr_ind = false;
- lu_fsm_success(fi);
- break;
- case VLR_ULA_E_LU_COMPL_FAILURE:
- vsub->sub_dataconf_by_hlr_ind = false;
- cause = GSM48_REJECT_NETWORK_FAILURE;
- if (data)
- cause = *(uint8_t*)data;
- lu_fsm_discard_lu_compl_fsm(fi);
- lu_fsm_failure(fi, cause);
- break;
- default:
- LOGPFSML(fi, LOGL_ERROR, "event without effect: %s\n",
- osmo_fsm_event_name(fi->fsm, event));
- break;
- }
-}
-
-static const struct osmo_fsm_state vlr_lu_fsm_states[] = {
- [VLR_ULA_S_IDLE] = {
- .in_event_mask = S(VLR_ULA_E_UPDATE_LA),
- .out_state_mask = S(VLR_ULA_S_WAIT_IMEISV) |
- S(VLR_ULA_S_WAIT_PVLR) |
- S(VLR_ULA_S_WAIT_IMSI) |
- S(VLR_ULA_S_WAIT_AUTH) |
- S(VLR_ULA_S_WAIT_HLR_UPD) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_IDLE),
- .action = lu_fsm_idle,
- },
- [VLR_ULA_S_WAIT_IMEISV] = {
- .in_event_mask = S(VLR_ULA_E_ID_IMEISV),
- .out_state_mask = S(VLR_ULA_S_WAIT_PVLR) |
- S(VLR_ULA_S_WAIT_IMSI) |
- S(VLR_ULA_S_WAIT_AUTH) |
- S(VLR_ULA_S_WAIT_HLR_UPD) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_IMEISV),
- .action = lu_fsm_wait_imeisv,
- },
- [VLR_ULA_S_WAIT_PVLR] = {
- .in_event_mask = S(VLR_ULA_E_SEND_ID_ACK) |
- S(VLR_ULA_E_SEND_ID_NACK),
- .out_state_mask = S(VLR_ULA_S_WAIT_IMSI) |
- S(VLR_ULA_S_WAIT_AUTH) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_PVLR),
- .action = lu_fsm_wait_pvlr,
- },
- [VLR_ULA_S_WAIT_AUTH] = {
- .in_event_mask = S(VLR_ULA_E_AUTH_RES),
- .out_state_mask = S(VLR_ULA_S_WAIT_CIPH) |
- S(VLR_ULA_S_WAIT_LU_COMPL) |
- S(VLR_ULA_S_WAIT_HLR_UPD) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_AUTH),
- .action = lu_fsm_wait_auth,
- },
- [VLR_ULA_S_WAIT_CIPH] = {
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_CIPH),
- .in_event_mask = S(VLR_ULA_E_CIPH_RES),
- .out_state_mask = S(VLR_ULA_S_WAIT_LU_COMPL) |
- S(VLR_ULA_S_WAIT_HLR_UPD) |
- S(VLR_ULA_S_DONE),
- .action = lu_fsm_wait_ciph,
- },
- [VLR_ULA_S_WAIT_IMSI] = {
- .in_event_mask = S(VLR_ULA_E_ID_IMSI),
- .out_state_mask = S(VLR_ULA_S_WAIT_AUTH) |
- S(VLR_ULA_S_WAIT_HLR_UPD) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_IMSI),
- .action = lu_fsm_wait_imsi,
- },
- [VLR_ULA_S_WAIT_HLR_UPD] = {
- .in_event_mask = S(VLR_ULA_E_HLR_LU_RES) |
- S(VLR_ULA_E_UPD_HLR_COMPL),
- .out_state_mask = S(VLR_ULA_S_WAIT_LU_COMPL) |
- S(VLR_ULA_S_WAIT_LU_COMPL_STANDALONE) |
- S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_HLR_UPD),
- .action = lu_fsm_wait_hlr_ul_res,
- },
- [VLR_ULA_S_WAIT_LU_COMPL] = {
- .in_event_mask = S(VLR_ULA_E_LU_COMPL_SUCCESS) |
- S(VLR_ULA_E_LU_COMPL_FAILURE) |
- S(VLR_ULA_E_NEW_TMSI_ACK) |
- S(VLR_ULA_E_ID_IMEI) |
- S(VLR_ULA_E_ID_IMEISV),
- .out_state_mask = S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_LU_COMPL),
- .action = lu_fsm_wait_lu_compl,
- },
- [VLR_ULA_S_WAIT_LU_COMPL_STANDALONE] = {
- .in_event_mask = S(VLR_ULA_E_LU_COMPL_SUCCESS) |
- S(VLR_ULA_E_LU_COMPL_FAILURE) |
- S(VLR_ULA_E_NEW_TMSI_ACK),
- .out_state_mask = S(VLR_ULA_S_DONE),
- .name = OSMO_STRINGIFY(VLR_ULA_S_WAIT_LU_COMPL_STANDALONE),
- .action = lu_fsm_wait_lu_compl_standalone,
- },
- [VLR_ULA_S_DONE] = {
- .name = OSMO_STRINGIFY(VLR_ULA_S_DONE),
- .onenter = lu_fsm_dispatch_result,
- },
-};
-
-static void fsm_lu_cleanup(struct osmo_fsm_inst *fi, enum osmo_fsm_term_cause cause)
-{
- struct lu_fsm_priv *lfp = fi->priv;
- struct vlr_subscr *vsub = lfp->vsub;
-
- LOGPFSM(fi, "fsm_lu_cleanup called with cause %s\n",
- osmo_fsm_term_cause_name(cause));
- if (vsub && vsub->lu_fsm == fi)
- vsub->lu_fsm = NULL;
-}
-
-static struct osmo_fsm vlr_lu_fsm = {
- .name = "vlr_lu_fsm",
- .states = vlr_lu_fsm_states,
- .num_states = ARRAY_SIZE(vlr_lu_fsm_states),
- .allstate_event_mask = 0,
- .allstate_action = NULL,
- .log_subsys = DVLR,
- .event_names = fsm_lu_event_names,
- .cleanup = fsm_lu_cleanup,
-};
-
-struct osmo_fsm_inst *
-vlr_loc_update(struct osmo_fsm_inst *parent,
- uint32_t parent_event_success,
- uint32_t parent_event_failure,
- void *parent_event_data,
- struct vlr_instance *vlr, void *msc_conn_ref,
- enum vlr_lu_type type, uint32_t tmsi, const char *imsi,
- const struct osmo_location_area_id *old_lai,
- const struct osmo_location_area_id *new_lai,
- bool authentication_required,
- enum vlr_ciph ciphering_required,
- bool is_r99, bool is_utran,
- bool assign_tmsi)
-{
- struct osmo_fsm_inst *fi;
- struct lu_fsm_priv *lfp;
-
- fi = osmo_fsm_inst_alloc_child(&vlr_lu_fsm, parent, parent_event_failure);
- if (!fi)
- return NULL;
-
- lfp = talloc_zero(fi, struct lu_fsm_priv);
- lfp->vlr = vlr;
- lfp->msc_conn_ref = msc_conn_ref;
- lfp->tmsi = tmsi;
- lfp->type = type;
- lfp->old_lai = *old_lai;
- lfp->new_lai = *new_lai;
- lfp->lu_by_tmsi = true;
- lfp->parent_event_success = parent_event_success;
- lfp->parent_event_failure = parent_event_failure;
- lfp->parent_event_data = parent_event_data;
- lfp->authentication_required = authentication_required;
- lfp->ciphering_required = ciphering_required;
- lfp->is_r99 = is_r99;
- lfp->is_utran = is_utran;
- lfp->assign_tmsi = assign_tmsi;
- if (imsi) {
- strncpy(lfp->imsi, imsi, sizeof(lfp->imsi)-1);
- lfp->imsi[sizeof(lfp->imsi)-1] = '\0';
- lfp->lu_by_tmsi = false;
- }
- fi->priv = lfp;
-
- LOGPFSM(fi, "rev=%s net=%s%s%s\n",
- is_r99 ? "R99" : "GSM",
- is_utran ? "UTRAN" : "GERAN",
- (authentication_required || ciphering_required)?
- " Auth" : " (no Auth)",
- (authentication_required || ciphering_required)?
- (ciphering_required? "+Ciph" : " (no Ciph)")
- : "");
-
- if (is_utran && !authentication_required)
- LOGPFSML(fi, LOGL_ERROR,
- "Authentication off on UTRAN network. Good luck.\n");
-
- osmo_fsm_inst_dispatch(fi, VLR_ULA_E_UPDATE_LA, NULL);
-
- return fi;
-}
-
-/* Gracefully terminate an FSM created by vlr_loc_update() in case of external
- * timeout (i.e. from MSC). */
-void vlr_loc_update_conn_timeout(struct osmo_fsm_inst *fi)
-{
- if (!fi || fi->state == VLR_ULA_S_DONE)
- return;
- LOGPFSM(fi, "Connection timed out\n");
- lu_fsm_failure(fi, GSM48_REJECT_CONGESTION);
-}
-
-void vlr_lu_fsm_init(void)
-{
- osmo_fsm_register(&vlr_lu_fsm);
- osmo_fsm_register(&upd_hlr_vlr_fsm);
- osmo_fsm_register(&sub_pres_vlr_fsm);
- osmo_fsm_register(&lu_compl_vlr_fsm);
-}
diff --git a/src/libvlr/vlr_lu_fsm.h b/src/libvlr/vlr_lu_fsm.h
deleted file mode 100644
index 5cf13c77e..000000000
--- a/src/libvlr/vlr_lu_fsm.h
+++ /dev/null
@@ -1,18 +0,0 @@
-#pragma once
-
-#include <osmocom/core/fsm.h>
-
-enum vlr_lu_state {
- VLR_ULA_S_IDLE,
- VLR_ULA_S_WAIT_IMEISV,
- VLR_ULA_S_WAIT_PVLR, /* Waiting for ID from PVLR */
- VLR_ULA_S_WAIT_AUTH, /* Waiting for Authentication */
- VLR_ULA_S_WAIT_CIPH, /* Waiting for Ciphering Complete */
- VLR_ULA_S_WAIT_IMSI, /* Waiting for IMSI from MS */
- VLR_ULA_S_WAIT_HLR_UPD, /* Waiting for end of HLR update */
- VLR_ULA_S_WAIT_LU_COMPL,/* Waiting for LU complete */
- VLR_ULA_S_WAIT_LU_COMPL_STANDALONE, /* Standalone VLR */
- VLR_ULA_S_DONE
-};
-
-void vlr_lu_fsm_init(void);
diff --git a/src/osmo-bsc/Makefile.am b/src/osmo-bsc/Makefile.am
deleted file mode 100644
index 5642fb2ed..000000000
--- a/src/osmo-bsc/Makefile.am
+++ /dev/null
@@ -1,57 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOCTRL_CFLAGS) \
- $(LIBOSMONETIF_CFLAGS) \
- $(LIBOSMOSCCP_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(LIBOSMOSIGTRAN_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-bin_PROGRAMS = \
- osmo-bsc \
- $(NULL)
-
-osmo_bsc_SOURCES = \
- osmo_bsc_main.c \
- osmo_bsc_vty.c \
- osmo_bsc_api.c \
- osmo_bsc_grace.c \
- osmo_bsc_msc.c \
- osmo_bsc_sigtran.c \
- osmo_bsc_filter.c \
- osmo_bsc_bssap.c \
- osmo_bsc_audio.c \
- osmo_bsc_ctrl.c \
- $(NULL)
-
-# once again since TRAU uses CC symbol :(
-osmo_bsc_LDADD = \
- $(top_builddir)/src/libfilter/libfilter.a \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libcommon-cs/libcommon-cs.a \
- $(top_builddir)/src/libmsc/libmsc.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOSCCP_LIBS) \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOVTY_LIBS) \
- $(LIBOSMOCTRL_LIBS) \
- $(COVERAGE_LDFLAGS) \
- $(LIBOSMOABIS_LIBS) \
- $(LIBOSMOSIGTRAN_LIBS) \
- $(NULL)
diff --git a/src/osmo-bsc/osmo_bsc_api.c b/src/osmo-bsc/osmo_bsc_api.c
deleted file mode 100644
index f7343f743..000000000
--- a/src/osmo-bsc/osmo_bsc_api.c
+++ /dev/null
@@ -1,569 +0,0 @@
-/* (C) 2009-2015 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/debug.h>
-
-#include <openbsc/gsm_04_80.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/gsm0808.h>
-
-#include <osmocom/sccp/sccp.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-
-#define return_when_not_connected(conn) \
- if (!conn->sccp_con) {\
- LOGP(DMSC, LOGL_ERROR, "MSC Connection not present.\n"); \
- return; \
- }
-
-#define return_when_not_connected_val(conn, ret) \
- if (!conn->sccp_con) {\
- LOGP(DMSC, LOGL_ERROR, "MSC Connection not present.\n"); \
- return ret; \
- }
-
-#define queue_msg_or_return(resp) \
- if (!resp) { \
- LOGP(DMSC, LOGL_ERROR, "Failed to allocate response.\n"); \
- return; \
- } \
- osmo_bsc_sigtran_send(conn->sccp_con, resp);
-
-static int bsc_clear_request(struct gsm_subscriber_connection *conn, uint32_t cause);
-static int complete_layer3(struct gsm_subscriber_connection *conn,
- struct msgb *msg, struct bsc_msc_data *msc);
-
-static uint16_t get_network_code_for_msc(struct bsc_msc_data *msc)
-{
- if (msc->core_mnc != -1)
- return msc->core_mnc;
- return msc->network->network_code;
-}
-
-static uint16_t get_country_code_for_msc(struct bsc_msc_data *msc)
-{
- if (msc->core_mcc != -1)
- return msc->core_mcc;
- return msc->network->country_code;
-}
-
-static uint16_t get_lac_for_msc(struct bsc_msc_data *msc, struct gsm_bts *bts)
-{
- if (msc->core_lac != -1)
- return msc->core_lac;
- return bts->location_area_code;
-}
-
-static uint16_t get_ci_for_msc(struct bsc_msc_data *msc, struct gsm_bts *bts)
-{
- if (msc->core_ci != -1)
- return msc->core_ci;
- return bts->cell_identity;
-}
-
-static void bsc_maybe_lu_reject(struct gsm_subscriber_connection *conn, int con_type, int cause)
-{
- struct msgb *msg;
-
- /* ignore cm service request or such */
- if (con_type != FLT_CON_TYPE_LU)
- return;
-
- msg = gsm48_create_loc_upd_rej(cause);
- if (!msg) {
- LOGP(DMM, LOGL_ERROR, "Failed to create msg for LOCATION UPDATING REJECT.\n");
- return;
- }
-
- msg->lchan = conn->lchan;
- gsm0808_submit_dtap(conn, msg, 0, 0);
-}
-
-static int bsc_filter_initial(struct osmo_bsc_data *bsc,
- struct bsc_msc_data *msc,
- struct gsm_subscriber_connection *conn,
- struct msgb *msg, char **imsi, int *con_type,
- int *lu_cause)
-{
- struct bsc_filter_request req;
- struct bsc_filter_reject_cause cause;
- struct gsm48_hdr *gh = msgb_l3(msg);
- int rc;
-
- req.ctx = conn;
- req.black_list = NULL;
- req.access_lists = bsc_access_lists();
- req.local_lst_name = msc->acc_lst_name;
- req.global_lst_name = conn->bts->network->bsc_data->acc_lst_name;
- req.bsc_nr = 0;
-
- rc = bsc_msg_filter_initial(gh, msgb_l3len(msg), &req,
- con_type, imsi, &cause);
- *lu_cause = cause.lu_reject_cause;
- return rc;
-}
-
-static int bsc_filter_data(struct gsm_subscriber_connection *conn,
- struct msgb *msg, int *lu_cause)
-{
- struct bsc_filter_request req;
- struct gsm48_hdr *gh = msgb_l3(msg);
- struct bsc_filter_reject_cause cause;
- int rc;
-
- req.ctx = conn;
- req.black_list = NULL;
- req.access_lists = bsc_access_lists();
- req.local_lst_name = conn->sccp_con->msc->acc_lst_name;
- req.global_lst_name = conn->bts->network->bsc_data->acc_lst_name;
- req.bsc_nr = 0;
-
- rc = bsc_msg_filter_data(gh, msgb_l3len(msg), &req,
- &conn->sccp_con->filter_state,
- &cause);
- *lu_cause = cause.lu_reject_cause;
- return rc;
-}
-
-static void bsc_sapi_n_reject(struct gsm_subscriber_connection *conn, int dlci)
-{
- struct msgb *resp;
- return_when_not_connected(conn);
-
- LOGP(DMSC, LOGL_NOTICE, "Tx MSC SAPI N REJECT DLCI=0x%02x\n", dlci);
-
- resp = gsm0808_create_sapi_reject(dlci);
- queue_msg_or_return(resp);
-}
-
-static void bsc_cipher_mode_compl(struct gsm_subscriber_connection *conn,
- struct msgb *msg, uint8_t chosen_encr)
-{
- struct msgb *resp;
- return_when_not_connected(conn);
-
- LOGP(DMSC, LOGL_DEBUG, "CIPHER MODE COMPLETE from MS, forwarding to MSC\n");
- resp = gsm0808_create_cipher_complete(msg, chosen_encr);
- queue_msg_or_return(resp);
-}
-
-static void bsc_send_ussd_no_srv(struct gsm_subscriber_connection *conn,
- struct msgb *msg, const char *text)
-{
- struct gsm48_hdr *gh;
- int8_t pdisc;
- uint8_t mtype;
- int drop_message = 1;
-
- if (!text)
- return;
-
- if (!msg || msgb_l3len(msg) < sizeof(*gh))
- return;
-
- gh = msgb_l3(msg);
- pdisc = gsm48_hdr_pdisc(gh);
- mtype = gsm48_hdr_msg_type(gh);
-
- /* Is CM service request? */
- if (pdisc == GSM48_PDISC_MM && mtype == GSM48_MT_MM_CM_SERV_REQ) {
- struct gsm48_service_request *cm;
-
- cm = (struct gsm48_service_request *) &gh->data[0];
-
- /* Is type SMS or call? */
- if (cm->cm_service_type == GSM48_CMSERV_SMS)
- drop_message = 0;
- else if (cm->cm_service_type == GSM48_CMSERV_MO_CALL_PACKET)
- drop_message = 0;
- }
-
- if (drop_message) {
- LOGP(DMSC, LOGL_DEBUG, "Skipping (not sending) USSD message: '%s'\n", text);
- return;
- }
-
- LOGP(DMSC, LOGL_INFO, "Sending CM Service Accept\n");
- gsm48_tx_mm_serv_ack(conn);
-
- LOGP(DMSC, LOGL_INFO, "Sending USSD message: '%s'\n", text);
- bsc_send_ussd_notify(conn, 1, text);
- bsc_send_ussd_release_complete(conn);
-}
-
-/*
- * Instruct to reserve data for a new connectiom, create the complete
- * layer three message, send it to open the connection.
- */
-static int bsc_compl_l3(struct gsm_subscriber_connection *conn, struct msgb *msg,
- uint16_t chosen_channel)
-{
- struct bsc_msc_data *msc;
-
- LOGP(DMSC, LOGL_INFO, "Tx MSC COMPL L3\n");
-
- /* find the MSC link we want to use */
- msc = bsc_find_msc(conn, msg);
- if (!msc) {
- LOGP(DMSC, LOGL_ERROR, "Failed to find a MSC for a connection.\n");
- bsc_send_ussd_no_srv(conn, msg,
- conn->bts->network->bsc_data->ussd_no_msc_txt);
- return -1;
- }
-
- return complete_layer3(conn, msg, msc);
-}
-
-static int complete_layer3(struct gsm_subscriber_connection *conn,
- struct msgb *msg, struct bsc_msc_data *msc)
-{
- int con_type, rc, lu_cause;
- char *imsi = NULL;
- struct timeval tv;
- struct msgb *resp;
- uint16_t network_code;
- uint16_t country_code;
- uint16_t lac;
- uint16_t ci;
- enum bsc_con ret;
- int send_ping = msc->advanced_ping;
-
- /* Advanced ping/pong handling */
- if (osmo_timer_pending(&msc->pong_timer))
- send_ping = 0;
- if (msc->ping_timeout <= 0)
- send_ping = 0;
- if (send_ping && osmo_timer_remaining(&msc->ping_timer, NULL, &tv) == -1)
- send_ping = 0;
-
- /* Check the filter */
- rc = bsc_filter_initial(msc->network->bsc_data, msc, conn, msg,
- &imsi, &con_type, &lu_cause);
- if (rc < 0) {
- bsc_maybe_lu_reject(conn, con_type, lu_cause);
- return BSC_API_CONN_POL_REJECT;
- }
-
- /* allocate resource for a new connection */
- //ret = bsc_create_new_connection(conn, msc, send_ping);
- ret = osmo_bsc_sigtran_new_conn(conn, msc);
-
- if (ret != BSC_CON_SUCCESS) {
- /* allocation has failed */
- if (ret == BSC_CON_REJECT_NO_LINK)
- bsc_send_ussd_no_srv(conn, msg, msc->ussd_msc_lost_txt);
- else if (ret == BSC_CON_REJECT_RF_GRACE)
- bsc_send_ussd_no_srv(conn, msg, msc->ussd_grace_txt);
-
- return BSC_API_CONN_POL_REJECT;
- }
-
- if (imsi)
- conn->sccp_con->filter_state.imsi = talloc_steal(conn, imsi);
- conn->sccp_con->filter_state.con_type = con_type;
-
- /* check return value, if failed check msg for and send USSD */
-
- network_code = get_network_code_for_msc(conn->sccp_con->msc);
- country_code = get_country_code_for_msc(conn->sccp_con->msc);
- lac = get_lac_for_msc(conn->sccp_con->msc, conn->bts);
- ci = get_ci_for_msc(conn->sccp_con->msc, conn->bts);
-
- bsc_scan_bts_msg(conn, msg);
-
- resp = gsm0808_create_layer3(msg, network_code, country_code, lac, ci);
- if (!resp) {
- LOGP(DMSC, LOGL_DEBUG, "Failed to create layer3 message.\n");
- sccp_connection_free(conn->sccp_con->sccp);
- osmo_bsc_sigtran_del_conn(conn->sccp_con);
- return BSC_API_CONN_POL_REJECT;
- }
-
- if (osmo_bsc_sigtran_open_conn(conn->sccp_con, resp) != 0) {
- sccp_connection_free(conn->sccp_con->sccp);
- osmo_bsc_sigtran_del_conn(conn->sccp_con);
- msgb_free(resp);
- return BSC_API_CONN_POL_REJECT;
- }
-
- return BSC_API_CONN_POL_ACCEPT;
-}
-
-/*
- * Plastic surgery... we want to give up the current connection
- */
-static int move_to_msc(struct gsm_subscriber_connection *_conn,
- struct msgb *msg, struct bsc_msc_data *msc)
-{
- struct osmo_bsc_sccp_con *old_con = _conn->sccp_con;
-
- /*
- * 1. Give up the old connection.
- * This happens by sending a clear request to the MSC,
- * it should end with the MSC releasing the connection.
- */
- old_con->conn = NULL;
- bsc_clear_request(_conn, 0);
-
- /*
- * 2. Attempt to create a new connection to the local
- * MSC. If it fails the caller will need to handle this
- * properly.
- */
- _conn->sccp_con = NULL;
- if (complete_layer3(_conn, msg, msc) != BSC_API_CONN_POL_ACCEPT) {
- gsm0808_clear(_conn);
- bsc_subscr_con_free(_conn);
- return 1;
- }
-
- return 2;
-}
-
-static int handle_cc_setup(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gsm48_hdr_pdisc(gh);
- uint8_t mtype = gsm48_hdr_msg_type(gh);
-
- struct bsc_msc_data *msc;
- struct gsm_mncc_number called;
- struct tlv_parsed tp;
- unsigned payload_len;
-
- char _dest_nr[35];
-
- /*
- * Do we have a setup message here? if not return fast.
- */
- if (pdisc != GSM48_PDISC_CC || mtype != GSM48_MT_CC_SETUP)
- return 0;
-
- payload_len = msgb_l3len(msg) - sizeof(*gh);
-
- tlv_parse(&tp, &gsm48_att_tlvdef, gh->data, payload_len, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM48_IE_CALLED_BCD)) {
- LOGP(DMSC, LOGL_ERROR, "Called BCD not present in setup.\n");
- return -1;
- }
-
- memset(&called, 0, sizeof(called));
- gsm48_decode_called(&called,
- TLVP_VAL(&tp, GSM48_IE_CALLED_BCD) - 1);
-
- if (called.plan != 1 && called.plan != 0)
- return 0;
-
- if (called.plan == 1 && called.type == 1) {
- _dest_nr[0] = _dest_nr[1] = '0';
- memcpy(_dest_nr + 2, called.number, sizeof(called.number));
- } else
- memcpy(_dest_nr, called.number, sizeof(called.number));
-
- /*
- * Check if the connection should be moved...
- */
- llist_for_each_entry(msc, &conn->bts->network->bsc_data->mscs, entry) {
- if (msc->type != MSC_CON_TYPE_LOCAL)
- continue;
- if (!msc->local_pref)
- continue;
- if (regexec(&msc->local_pref_reg, _dest_nr, 0, NULL, 0) != 0)
- continue;
-
- return move_to_msc(conn, msg, msc);
- }
-
- return 0;
-}
-
-
-static void bsc_dtap(struct gsm_subscriber_connection *conn, uint8_t link_id, struct msgb *msg)
-{
- int lu_cause;
- struct msgb *resp;
- return_when_not_connected(conn);
-
- LOGP(DMSC, LOGL_INFO, "Tx MSC DTAP LINK_ID=0x%02x\n", link_id);
-
- /*
- * We might want to move this connection to a new MSC. Ask someone
- * to handle it. If it was handled we will return.
- */
- if (handle_cc_setup(conn, msg) >= 1)
- return;
-
- /* Check the filter */
- if (bsc_filter_data(conn, msg, &lu_cause) < 0) {
- bsc_maybe_lu_reject(conn,
- conn->sccp_con->filter_state.con_type,
- lu_cause);
- bsc_clear_request(conn, 0);
- return;
- }
-
- bsc_scan_bts_msg(conn, msg);
-
- resp = gsm0808_create_dtap(msg, link_id);
- queue_msg_or_return(resp);
-}
-
-static void bsc_assign_compl(struct gsm_subscriber_connection *conn, uint8_t rr_cause,
- uint8_t chosen_channel, uint8_t encr_alg_id,
- uint8_t speech_model)
-{
- struct msgb *resp;
- return_when_not_connected(conn);
-
- if (is_ipaccess_bts(conn->bts) && conn->sccp_con->rtp_ip) {
- /* NOTE: In a network that makes use of an IPA base station
- * and AoIP, we have to wait until the BTS reports its RTP
- * IP/Port combination back to BSC via RSL. Unfortunately, the
- * IPA protocol sends its Abis assignment complete message
- * before it sends its RTP IP/Port via IPACC. So we will now
- * postpone the AoIP assignment completed message until we
- * know the RTP IP/Port combination. */
- LOGP(DMSC, LOGL_INFO, "POSTPONE MSC ASSIGN COMPL\n");
- conn->lchan->abis_ip.ass_compl.rr_cause = rr_cause;
- conn->lchan->abis_ip.ass_compl.chosen_channel = chosen_channel;
- conn->lchan->abis_ip.ass_compl.encr_alg_id = encr_alg_id;
- conn->lchan->abis_ip.ass_compl.speech_mode = speech_model;
- conn->lchan->abis_ip.ass_compl.valid = true;
-
- } else {
- /* NOTE: Send the A assignment complete message immediately. */
- LOGP(DMSC, LOGL_INFO, "Tx MSC ASSIGN COMPL\n");
- resp = gsm0808_create_assignment_completed(rr_cause, chosen_channel,
- encr_alg_id, speech_model);
- queue_msg_or_return(resp);
- }
-}
-
-static void bsc_assign_fail(struct gsm_subscriber_connection *conn,
- uint8_t cause, uint8_t *rr_cause)
-{
- struct msgb *resp;
- return_when_not_connected(conn);
-
- LOGP(DMSC, LOGL_INFO, "Tx MSC ASSIGN FAIL\n");
-
- resp = gsm0808_create_assignment_failure(cause, rr_cause);
- queue_msg_or_return(resp);
-}
-
-static int bsc_clear_request(struct gsm_subscriber_connection *conn, uint32_t cause)
-{
- struct osmo_bsc_sccp_con *sccp;
- struct msgb *resp;
- return_when_not_connected_val(conn, 1);
-
- LOGP(DMSC, LOGL_INFO, "Tx MSC CLEAR REQUEST\n");
-
- /*
- * Remove the connection from BSC<->SCCP part, the SCCP part
- * will either be cleared by channel release or MSC disconnect
- */
- sccp = conn->sccp_con;
- sccp->conn = NULL;
- conn->sccp_con = NULL;
-
- resp = gsm0808_create_clear_rqst(GSM0808_CAUSE_RADIO_INTERFACE_FAILURE);
- if (!resp) {
- LOGP(DMSC, LOGL_ERROR, "Failed to allocate response.\n");
- return 1;
- }
-
- osmo_bsc_sigtran_send(sccp, resp);
- return 1;
-}
-
-static void bsc_cm_update(struct gsm_subscriber_connection *conn,
- const uint8_t *cm2, uint8_t cm2_len,
- const uint8_t *cm3, uint8_t cm3_len)
-{
- struct msgb *resp;
- return_when_not_connected(conn);
-
- resp = gsm0808_create_classmark_update(cm2, cm2_len, cm3, cm3_len);
-
- queue_msg_or_return(resp);
-}
-
-static void bsc_mr_config(struct gsm_subscriber_connection *conn,
- struct gsm_lchan *lchan, int full_rate)
-{
- struct bsc_msc_data *msc;
- struct gsm48_multi_rate_conf *ms_conf, *bts_conf;
-
- if (!conn->sccp_con) {
- LOGP(DMSC, LOGL_ERROR,
- "No msc data available on conn %p. Audio will be broken.\n",
- conn);
- return;
- }
-
- msc = conn->sccp_con->msc;
-
- /* initialize the data structure */
- lchan->mr_ms_lv[0] = sizeof(*ms_conf);
- lchan->mr_bts_lv[0] = sizeof(*bts_conf);
- ms_conf = (struct gsm48_multi_rate_conf *) &lchan->mr_ms_lv[1];
- bts_conf = (struct gsm48_multi_rate_conf *) &lchan->mr_bts_lv[1];
- memset(ms_conf, 0, sizeof(*ms_conf));
- memset(bts_conf, 0, sizeof(*bts_conf));
-
- bts_conf->ver = ms_conf->ver = 1;
- bts_conf->icmi = ms_conf->icmi = 1;
-
- /* maybe gcc see's it is copy of _one_ byte */
- bts_conf->m4_75 = ms_conf->m4_75 = msc->amr_conf.m4_75;
- bts_conf->m5_15 = ms_conf->m5_15 = msc->amr_conf.m5_15;
- bts_conf->m5_90 = ms_conf->m5_90 = msc->amr_conf.m5_90;
- bts_conf->m6_70 = ms_conf->m6_70 = msc->amr_conf.m6_70;
- bts_conf->m7_40 = ms_conf->m7_40 = msc->amr_conf.m7_40;
- bts_conf->m7_95 = ms_conf->m7_95 = msc->amr_conf.m7_95;
- if (full_rate) {
- bts_conf->m10_2 = ms_conf->m10_2 = msc->amr_conf.m10_2;
- bts_conf->m12_2 = ms_conf->m12_2 = msc->amr_conf.m12_2;
- }
-
- /* now copy this into the bts structure */
- memcpy(lchan->mr_bts_lv, lchan->mr_ms_lv, sizeof(lchan->mr_ms_lv));
-}
-
-static struct bsc_api bsc_handler = {
- .sapi_n_reject = bsc_sapi_n_reject,
- .cipher_mode_compl = bsc_cipher_mode_compl,
- .compl_l3 = bsc_compl_l3,
- .dtap = bsc_dtap,
- .assign_compl = bsc_assign_compl,
- .assign_fail = bsc_assign_fail,
- .clear_request = bsc_clear_request,
- .classmark_chg = bsc_cm_update,
- .mr_config = bsc_mr_config,
-};
-
-struct bsc_api *osmo_bsc_api()
-{
- return &bsc_handler;
-}
diff --git a/src/osmo-bsc/osmo_bsc_audio.c b/src/osmo-bsc/osmo_bsc_audio.c
deleted file mode 100644
index b4ffa88f1..000000000
--- a/src/osmo-bsc/osmo_bsc_audio.c
+++ /dev/null
@@ -1,141 +0,0 @@
-/*
- * ipaccess audio handling
- *
- * (C) 2009-2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2010 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/abis_rsl.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/signal.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/gsm0808_utils.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-
-#include <arpa/inet.h>
-
-/* Generate and send assignment complete message */
-static int send_aoip_ass_compl(struct gsm_subscriber_connection *conn, struct gsm_lchan *lchan)
-{
- struct msgb *resp;
- struct sockaddr_storage rtp_addr;
- struct sockaddr_in rtp_addr_in;
- struct gsm0808_speech_codec sc;
-
- OSMO_ASSERT(lchan->abis_ip.ass_compl.valid == true);
-
- /* Package RTP-Address data */
- memset(&rtp_addr_in, 0, sizeof(rtp_addr_in));
- rtp_addr_in.sin_family = AF_INET;
- rtp_addr_in.sin_port = htons(lchan->abis_ip.bound_port);
- rtp_addr_in.sin_addr.s_addr = htonl(lchan->abis_ip.bound_ip);
- memset(&rtp_addr, 0, sizeof(rtp_addr));
- memcpy(&rtp_addr, &rtp_addr_in, sizeof(rtp_addr_in));
-
- /* Extrapolate speech codec from speech mode */
- gsm0808_speech_codec_from_chan_type(&sc, lchan->abis_ip.ass_compl.speech_mode);
-
- /* Generate message */
- resp = gsm0808_create_ass_compl(lchan->abis_ip.ass_compl.rr_cause,
- lchan->abis_ip.ass_compl.chosen_channel,
- lchan->abis_ip.ass_compl.encr_alg_id,
- lchan->abis_ip.ass_compl.speech_mode,
- &rtp_addr,
- &sc,
- NULL);
-
- if (!resp) {
- LOGP(DMSC, LOGL_ERROR, "Failed to generate assignment completed message!\n"); \
- return -EINVAL;
- }
-
- return osmo_bsc_sigtran_send(conn->sccp_con, resp);
-}
-
-static int handle_abisip_signal(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct gsm_subscriber_connection *con;
- struct gsm_lchan *lchan = signal_data;
- int rc;
- uint32_t rtp_ip;
-
- if (subsys != SS_ABISIP)
- return 0;
-
- con = lchan->conn;
- if (!con || !con->sccp_con)
- return 0;
-
- switch (signal) {
- case S_ABISIP_CRCX_ACK:
- /*
- * TODO: handle handover here... then the audio should go to
- * the old mgcp port..
- */
-
- /* we can ask it to connect now */
- LOGP(DMSC, LOGL_DEBUG, "Connecting BTS to port: %d conn: %d\n",
- con->sccp_con->rtp_port, lchan->abis_ip.conn_id);
-
- /* If AoIP is in use, the rtp_ip, which has been communicated
- * via the A interface as connect_ip */
- if(con->sccp_con->rtp_ip)
- rtp_ip = con->sccp_con->rtp_ip;
- else
- rtp_ip = ntohl(INADDR_ANY);
-
- rc = rsl_ipacc_mdcx(lchan, rtp_ip,
- con->sccp_con->rtp_port,
- lchan->abis_ip.rtp_payload2);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "Failed to send MDCX: %d\n", rc);
- return rc;
- }
- break;
-
- case S_ABISIP_MDCX_ACK:
- if (con->ho_lchan) {
- /* NOTE: When an ho_lchan exists, the MDCX is part of an
- * handover operation (intra-bsc). This means we will not
- * inform the MSC about the event, which means that no
- * assignment complete message is transmitted */
- LOGP(DMSC, LOGL_INFO," RTP connection handover complete\n");
- } else if (is_ipaccess_bts(con->bts) && con->sccp_con->rtp_ip) {
- /* NOTE: This is only relevant on AoIP networks with
- * IPA based base stations. See also osmo_bsc_api.c,
- * function bsc_assign_compl() */
- LOGP(DMSC, LOGL_INFO, "Tx MSC ASSIGN COMPL (POSTPONED)\n");
- if (send_aoip_ass_compl(con, lchan) != 0)
- return -EINVAL;
- }
- break;
- break;
- }
-
- return 0;
-}
-
-int osmo_bsc_audio_init(struct gsm_network *net)
-{
- osmo_signal_register_handler(SS_ABISIP, handle_abisip_signal, net);
- return 0;
-}
diff --git a/src/osmo-bsc/osmo_bsc_bssap.c b/src/osmo-bsc/osmo_bsc_bssap.c
deleted file mode 100644
index 9a5288bdc..000000000
--- a/src/osmo-bsc/osmo_bsc_bssap.c
+++ /dev/null
@@ -1,721 +0,0 @@
-/* GSM 08.08 BSSMAP handling */
-/* (C) 2009-2012 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2012 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/osmo_bsc_grace.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/bsc_subscriber.h>
-#include <osmocom/legacy_mgcp/mgcp.h>
-#include <openbsc/paging.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/gsm0808_utils.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-#include <openbsc/a_reset.h>
-#include <osmocom/core/byteswap.h>
-
-#define IP_V4_ADDR_LEN 4
-
-/*
- * helpers for the assignment command
- */
-
-/* Helper function for match_codec_pref(), looks up a matching permitted speech
- * value for a given msc audio codec pref */
-enum gsm0808_permitted_speech audio_support_to_gsm88(struct gsm_audio_support
- *audio)
-{
- if (audio->hr) {
- switch (audio->ver) {
- case 1:
- return GSM0808_PERM_HR1;
- break;
- case 2:
- return GSM0808_PERM_HR2;
- break;
- case 3:
- return GSM0808_PERM_HR3;
- break;
- default:
- LOGP(DMSC, LOGL_ERROR, "Wrong speech mode: %d\n",
- audio->ver);
- return GSM0808_PERM_FR1;
- }
- } else {
- switch (audio->ver) {
- case 1:
- return GSM0808_PERM_FR1;
- break;
- case 2:
- return GSM0808_PERM_FR2;
- break;
- case 3:
- return GSM0808_PERM_FR3;
- break;
- default:
- LOGP(DMSC, LOGL_ERROR, "Wrong speech mode: %d\n",
- audio->ver);
- return GSM0808_PERM_HR1;
- }
- }
-}
-
-/* Helper function for match_codec_pref(), looks up a matching chan mode for
- * a given permitted speech value */
-enum gsm48_chan_mode gsm88_to_chan_mode(enum gsm0808_permitted_speech speech)
-{
- switch (speech) {
- case GSM0808_PERM_HR1:
- case GSM0808_PERM_FR1:
- return GSM48_CMODE_SPEECH_V1;
- break;
- case GSM0808_PERM_HR2:
- case GSM0808_PERM_FR2:
- return GSM48_CMODE_SPEECH_EFR;
- break;
- case GSM0808_PERM_HR3:
- case GSM0808_PERM_FR3:
- return GSM48_CMODE_SPEECH_AMR;
- break;
- default:
- LOGP(DMSC, LOGL_FATAL,
- "Unsupported permitted speech selected, assuming AMR as channel mode...\n");
- return GSM48_CMODE_SPEECH_AMR;
- }
-}
-
-/* Helper function for match_codec_pref(), tests if a given audio support
- * matches one of the permitted speech settings of the channel type element.
- * The matched permitted speech value is then also compared against the
- * speech codec list. (optional, only relevant for AoIP) */
-static bool test_codec_pref(const struct gsm0808_channel_type *ct,
- const struct gsm0808_speech_codec_list *scl,
- uint8_t perm_spch)
-{
- unsigned int i;
- bool match = false;
- struct gsm0808_speech_codec sc;
- int rc;
-
- /* Try to finde the given permitted speech value in the
- * codec list of the channel type element */
- for (i = 0; i < ct->perm_spch_len; i++) {
- if (ct->perm_spch[i] == perm_spch) {
- match = true;
- break;
- }
- }
-
- /* If we do not have a speech codec list to test against,
- * we just exit early (will be always the case in non-AoIP networks) */
- if (!scl)
- return match;
-
- /* If we failed to match until here, there is no
- * point in testing further */
- if (match == false)
- return false;
-
- /* Extrapolate speech codec data */
- rc = gsm0808_speech_codec_from_chan_type(&sc, perm_spch);
- if (rc < 0)
- return false;
-
- /* Try to find extrapolated speech codec data in
- * the speech codec list */
- for (i = 0; i < scl->len; i++) {
- if (memcmp(&sc, &scl->codec[i], sizeof(sc)) == 0)
- return true;
- }
-
- return false;
-}
-
-/* Helper function for bssmap_handle_assignm_req(), matches the codec
- * preferences from the MSC with the codec preferences */
-static int match_codec_pref(int *full_rate, enum gsm48_chan_mode *chan_mode,
- const struct gsm0808_channel_type *ct,
- const struct gsm0808_speech_codec_list *scl,
- const struct bsc_msc_data *msc)
-{
- unsigned int i;
- uint8_t perm_spch;
- bool match = false;
-
- for (i = 0; i < msc->audio_length; i++) {
- perm_spch = audio_support_to_gsm88(msc->audio_support[i]);
- if (test_codec_pref(ct, scl, perm_spch)) {
- match = true;
- break;
- }
- }
-
- /* Exit without result, in case no match can be deteched */
- if (!match) {
- *full_rate = -1;
- *chan_mode = GSM48_CMODE_SIGN;
- return -1;
- }
-
- /* Check if the result is a half or full rate codec */
- if (perm_spch == GSM0808_PERM_HR1 || perm_spch == GSM0808_PERM_HR2
- || perm_spch == GSM0808_PERM_HR3 || perm_spch == GSM0808_PERM_HR4
- || perm_spch == GSM0808_PERM_HR6)
- *full_rate = 0;
- else
- *full_rate = 1;
-
- /* Lookup a channel mode for the selected codec */
- *chan_mode = gsm88_to_chan_mode(perm_spch);
-
- return 0;
-}
-
-static int bssmap_handle_reset_ack(struct bsc_msc_data *msc,
- struct msgb *msg, unsigned int length)
-{
- LOGP(DMSC, LOGL_NOTICE, "RESET ACK from MSC: %s\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance),
- &msc->a.msc_addr));
-
- /* Inform the FSM that controls the RESET/RESET-ACK procedure
- * that we have successfully received the reset-ack message */
- a_reset_ack_confirm(msc->a.reset);
-
- return 0;
-}
-
-/* Handle MSC sided reset */
-static int bssmap_handle_reset(struct bsc_msc_data *msc,
- struct msgb *msg, unsigned int length)
-{
- LOGP(DMSC, LOGL_NOTICE, "RESET from MSC: %s\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance),
- &msc->a.msc_addr));
-
- /* Instruct the bsc to close all open sigtran connections and to
- * close all active channels on the BTS side as well */
- osmo_bsc_sigtran_reset(msc);
-
- /* Inform the MSC that we have received the reset request and
- * that we acted accordingly */
- osmo_bsc_sigtran_tx_reset_ack(msc);
-
- return 0;
-}
-
-/* GSM 08.08 § 3.2.1.19 */
-static int bssmap_handle_paging(struct bsc_msc_data *msc,
- struct msgb *msg, unsigned int payload_length)
-{
- struct bsc_subscr *subscr;
- struct tlv_parsed tp;
- char mi_string[GSM48_MI_SIZE];
- uint32_t tmsi = GSM_RESERVED_TMSI;
- unsigned int lac = GSM_LAC_RESERVED_ALL_BTS;
- uint8_t data_length;
- const uint8_t *data;
- uint8_t chan_needed = RSL_CHANNEED_ANY;
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l4h + 1, payload_length - 1, 0, 0);
-
- if (!TLVP_PRESENT(&tp, GSM0808_IE_IMSI)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory IMSI not present.\n");
- return -1;
- } else if ((TLVP_VAL(&tp, GSM0808_IE_IMSI)[0] & GSM_MI_TYPE_MASK) != GSM_MI_TYPE_IMSI) {
- LOGP(DMSC, LOGL_ERROR, "Wrong content in the IMSI\n");
- return -1;
- }
-
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory CELL IDENTIFIER LIST not present.\n");
- return -1;
- }
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_TMSI) &&
- TLVP_LEN(&tp, GSM0808_IE_TMSI) == 4) {
- tmsi = ntohl(tlvp_val32_unal(&tp, GSM0808_IE_TMSI));
- }
-
- /*
- * parse the IMSI
- */
- gsm48_mi_to_string(mi_string, sizeof(mi_string),
- TLVP_VAL(&tp, GSM0808_IE_IMSI), TLVP_LEN(&tp, GSM0808_IE_IMSI));
-
- /*
- * parse the cell identifier list
- */
- data_length = TLVP_LEN(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST);
- data = TLVP_VAL(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST);
-
- /*
- * Support paging to all network or one BTS at one LAC
- */
- if (data_length == 3 && data[0] == CELL_IDENT_LAC) {
- lac = osmo_load16be(&data[1]);
- } else if (data_length > 1 || (data[0] & 0x0f) != CELL_IDENT_BSS) {
- LOGP(DMSC, LOGL_ERROR, "Unsupported Cell Identifier List: %s\n", osmo_hexdump(data, data_length));
- return -1;
- }
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_CHANNEL_NEEDED) && TLVP_LEN(&tp, GSM0808_IE_CHANNEL_NEEDED) == 1)
- chan_needed = TLVP_VAL(&tp, GSM0808_IE_CHANNEL_NEEDED)[0] & 0x03;
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_EMLPP_PRIORITY)) {
- LOGP(DMSC, LOGL_ERROR, "eMLPP is not handled\n");
- }
-
- subscr = bsc_subscr_find_or_create_by_imsi(msc->network->bsc_subscribers,
- mi_string);
- if (!subscr) {
- LOGP(DMSC, LOGL_ERROR, "Failed to allocate a subscriber for %s\n", mi_string);
- return -1;
- }
-
- subscr->lac = lac;
- subscr->tmsi = tmsi;
-
- LOGP(DMSC, LOGL_INFO, "Paging request from MSC IMSI: '%s' TMSI: '0x%x/%u' LAC: 0x%x\n", mi_string, tmsi, tmsi, lac);
- bsc_grace_paging_request(msc->network->bsc_data->rf_ctrl->policy,
- subscr, chan_needed, msc);
- return 0;
-}
-
-/*
- * GSM 08.08 § 3.1.9.1 and 3.2.1.21...
- * release our gsm_subscriber_connection and send message
- */
-static int bssmap_handle_clear_command(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int payload_length)
-{
- struct msgb *resp;
-
- /* TODO: handle the cause of this package */
-
- if (conn->conn) {
- LOGP(DMSC, LOGL_INFO, "Releasing all transactions on %p\n", conn);
- gsm0808_clear(conn->conn);
- bsc_subscr_con_free(conn->conn);
- conn->conn = NULL;
- }
-
- /* send the clear complete message */
- resp = gsm0808_create_clear_complete();
- if (!resp) {
- LOGP(DMSC, LOGL_ERROR, "Sending clear complete failed.\n");
- return -1;
- }
-
- osmo_bsc_sigtran_send(conn, resp);
- return 0;
-}
-
-/*
- * GSM 08.08 § 3.4.7 cipher mode handling. We will have to pick
- * the cipher to be used for this. In case we are already using
- * a cipher we will have to send cipher mode reject to the MSC,
- * otherwise we will have to pick something that we and the MS
- * is supporting. Currently we are doing it in a rather static
- * way by picking one ecnryption or no encrytpion.
- */
-static int bssmap_handle_cipher_mode(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int payload_length)
-{
- uint16_t len;
- struct gsm_network *network = NULL;
- const uint8_t *data;
- struct tlv_parsed tp;
- struct msgb *resp;
- int reject_cause = -1;
- int include_imeisv = 1;
-
- if (!conn->conn) {
- LOGP(DMSC, LOGL_ERROR, "No lchan/msc_data in cipher mode command.\n");
- goto reject;
- }
-
- if (conn->ciphering_handled) {
- LOGP(DMSC, LOGL_ERROR, "Already seen ciphering command. Protocol Error.\n");
- goto reject;
- }
-
- conn->ciphering_handled = 1;
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l4h + 1, payload_length - 1, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_ENCRYPTION_INFORMATION)) {
- LOGP(DMSC, LOGL_ERROR, "IE Encryption Information missing.\n");
- goto reject;
- }
-
- /*
- * check if our global setting is allowed
- * - Currently we check for A5/0 and A5/1
- * - Copy the key if that is necessary
- * - Otherwise reject
- */
- len = TLVP_LEN(&tp, GSM0808_IE_ENCRYPTION_INFORMATION);
- if (len < 1) {
- LOGP(DMSC, LOGL_ERROR, "IE Encryption Information is too short.\n");
- goto reject;
- }
-
- network = conn->conn->bts->network;
- data = TLVP_VAL(&tp, GSM0808_IE_ENCRYPTION_INFORMATION);
-
- if (TLVP_PRESENT(&tp, GSM0808_IE_CIPHER_RESPONSE_MODE))
- include_imeisv = TLVP_VAL(&tp, GSM0808_IE_CIPHER_RESPONSE_MODE)[0] & 0x1;
-
- if (network->a5_encryption == 0 && (data[0] & 0x1) == 0x1) {
- gsm0808_cipher_mode(conn->conn, 0, NULL, 0, include_imeisv);
- } else if (network->a5_encryption != 0 && (data[0] & 0x2) == 0x2) {
- gsm0808_cipher_mode(conn->conn, 1, &data[1], len - 1, include_imeisv);
- } else {
- LOGP(DMSC, LOGL_ERROR, "Can not select encryption...\n");
- goto reject;
- }
-
- return 0;
-
-reject:
- resp = gsm0808_create_cipher_reject(reject_cause);
- if (!resp) {
- LOGP(DMSC, LOGL_ERROR, "Sending the cipher reject failed.\n");
- return -1;
- }
-
- osmo_bsc_sigtran_send(conn, resp);
- return -1;
-}
-
-/*
- * Handle the assignment request message.
- *
- * See §3.2.1.1 for the message type
- */
-static int bssmap_handle_assignm_req(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int length)
-{
- struct msgb *resp;
- struct bsc_msc_data *msc;
- struct tlv_parsed tp;
- uint8_t timeslot = 0;
- uint8_t multiplex = 0;
- enum gsm48_chan_mode chan_mode = GSM48_CMODE_SIGN;
- int port, full_rate = -1;
- bool aoip = false;
- struct sockaddr_storage rtp_addr;
- struct sockaddr_in *rtp_addr_in;
- struct gsm0808_channel_type ct;
- struct gsm0808_speech_codec_list scl;
- struct gsm0808_speech_codec_list *scl_ptr = NULL;
- int rc;
- const uint8_t *data;
- char len;
-
- if (!conn->conn) {
- LOGP(DMSC, LOGL_ERROR,
- "No lchan/msc_data in cipher mode command.\n");
- return -1;
- }
-
- msc = conn->msc;
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l4h + 1, length - 1, 0, 0);
-
- /* Check for channel type element, if its missing, immediately reject */
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CHANNEL_TYPE)) {
- LOGP(DMSC, LOGL_ERROR, "Mandatory channel type not present.\n");
- goto reject;
- }
-
- /* Detect if a CIC code is present, if so, we use the classic ip.access
- * method to calculate the RTP port */
- if (TLVP_PRESENT(&tp, GSM0808_IE_CIRCUIT_IDENTITY_CODE)) {
- conn->cic =
- osmo_load16be(TLVP_VAL
- (&tp, GSM0808_IE_CIRCUIT_IDENTITY_CODE));
- timeslot = conn->cic & 0x1f;
- multiplex = (conn->cic & ~0x1f) >> 5;
- } else if (TLVP_PRESENT(&tp, GSM0808_IE_AOIP_TRASP_ADDR)) {
- /* Decode AoIP transport address element */
- data = TLVP_VAL(&tp, GSM0808_IE_AOIP_TRASP_ADDR);
- len = TLVP_LEN(&tp, GSM0808_IE_AOIP_TRASP_ADDR);
- rc = gsm0808_dec_aoip_trasp_addr(&rtp_addr, data, len);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR,
- "Unable to decode aoip transport address.\n");
- goto reject;
- }
- aoip = true;
- } else {
- LOGP(DMSC, LOGL_ERROR,
- "transport address missing. Audio routing will not work.\n");
- goto reject;
- }
-
- /* Decode speech codec list (AoIP) */
- if (aoip) {
- /* Check for speech codec list element */
- if (!TLVP_PRESENT(&tp, GSM0808_IE_SPEECH_CODEC_LIST)) {
- LOGP(DMSC, LOGL_ERROR,
- "Mandatory speech codec list not present.\n");
- goto reject;
- }
-
- /* Decode Speech Codec list */
- data = TLVP_VAL(&tp, GSM0808_IE_SPEECH_CODEC_LIST);
- len = TLVP_LEN(&tp, GSM0808_IE_SPEECH_CODEC_LIST);
- rc = gsm0808_dec_speech_codec_list(&scl, data, len);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR,
- "Unable to decode speech codec list\n");
- goto reject;
- }
- scl_ptr = &scl;
- }
-
- /* Decode Channel Type element */
- data = TLVP_VAL(&tp, GSM0808_IE_CHANNEL_TYPE);
- len = TLVP_LEN(&tp, GSM0808_IE_CHANNEL_TYPE);
- rc = gsm0808_dec_channel_type(&ct, data, len);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "unable to decode channel type.\n");
- goto reject;
- }
-
- /* Currently we only support a limited subset of all
- * possible channel types. The limitation ends by not using
- * multi-slot, limiting the channel coding to speech */
- if (ct.ch_indctr != GSM0808_CHAN_SPEECH) {
- LOGP(DMSC, LOGL_ERROR,
- "Unsupported channel type, currently only speech is supported!\n");
- goto reject;
- }
-
- /* Match codec information from the assignment command against the
- * local preferences of the BSC */
- rc = match_codec_pref(&full_rate, &chan_mode, &ct, scl_ptr, msc);
- if (rc < 0) {
- LOGP(DMSC, LOGL_ERROR, "No supported audio type found.\n");
- goto reject;
- }
-
- if (aoip == false) {
- /* map it to a MGCP Endpoint and a RTP port */
- port = mgcp_timeslot_to_endpoint(multiplex, timeslot);
- conn->rtp_port = rtp_calculate_port(port, msc->rtp_base);
- conn->rtp_ip = 0;
- } else {
- /* use address / port supplied with the AoIP
- * transport address element */
- if (rtp_addr.ss_family == AF_INET) {
- rtp_addr_in = (struct sockaddr_in *)&rtp_addr;
- conn->rtp_port = osmo_ntohs(rtp_addr_in->sin_port);
- memcpy(&conn->rtp_ip, &rtp_addr_in->sin_addr.s_addr,
- IP_V4_ADDR_LEN);
- conn->rtp_ip = osmo_ntohl(conn->rtp_ip);
- } else {
- LOGP(DMSC, LOGL_ERROR,
- "Unsopported addressing scheme. (supports only IPV4)\n");
- goto reject;
- }
- }
-
- return gsm0808_assign_req(conn->conn, chan_mode, full_rate);
-
-reject:
- resp =
- gsm0808_create_assignment_failure
- (GSM0808_CAUSE_NO_RADIO_RESOURCE_AVAILABLE, NULL);
- if (!resp) {
- LOGP(DMSC, LOGL_ERROR, "Channel allocation failure.\n");
- return -1;
- }
-
- osmo_bsc_sigtran_send(conn, resp);
- return -1;
-}
-
-static int bssmap_rcvmsg_udt(struct bsc_msc_data *msc,
- struct msgb *msg, unsigned int length)
-{
- int ret = 0;
-
- if (length < 1) {
- LOGP(DMSC, LOGL_ERROR, "Not enough room: %d\n", length);
- return -1;
- }
-
- LOGP(DMSC, LOGL_INFO, "Rx MSC UDT BSSMAP %s\n",
- gsm0808_bssmap_name(msg->l4h[0]));
-
- switch (msg->l4h[0]) {
- case BSS_MAP_MSG_RESET_ACKNOWLEDGE:
- ret = bssmap_handle_reset_ack(msc, msg, length);
- break;
- case BSS_MAP_MSG_RESET:
- ret = bssmap_handle_reset(msc, msg, length);
- break;
- case BSS_MAP_MSG_PAGING:
- ret = bssmap_handle_paging(msc, msg, length);
- break;
- }
-
- return ret;
-}
-
-static int bssmap_rcvmsg_dt1(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int length)
-{
- int ret = 0;
-
- if (length < 1) {
- LOGP(DMSC, LOGL_ERROR, "Not enough room: %d\n", length);
- return -1;
- }
-
- LOGP(DMSC, LOGL_INFO, "Rx MSC DT1 BSSMAP %s\n",
- gsm0808_bssmap_name(msg->l4h[0]));
-
- switch (msg->l4h[0]) {
- case BSS_MAP_MSG_CLEAR_CMD:
- ret = bssmap_handle_clear_command(conn, msg, length);
- break;
- case BSS_MAP_MSG_CIPHER_MODE_CMD:
- ret = bssmap_handle_cipher_mode(conn, msg, length);
- break;
- case BSS_MAP_MSG_ASSIGMENT_RQST:
- ret = bssmap_handle_assignm_req(conn, msg, length);
- break;
- default:
- LOGP(DMSC, LOGL_NOTICE, "Unimplemented msg type: %s\n",
- gsm0808_bssmap_name(msg->l4h[0]));
- break;
- }
-
- return ret;
-}
-
-static int dtap_rcvmsg(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int length)
-{
- struct dtap_header *header;
- struct msgb *gsm48;
- uint8_t *data;
- int rc, dtap_rc;
-
- LOGP(DMSC, LOGL_DEBUG, "Rx MSC DTAP: %s\n",
- osmo_hexdump(msg->l3h, length));
-
- if (!conn->conn) {
- LOGP(DMSC, LOGL_ERROR, "No subscriber connection available\n");
- return -1;
- }
-
- header = (struct dtap_header *) msg->l3h;
- if (sizeof(*header) >= length) {
- LOGP(DMSC, LOGL_ERROR, "The DTAP header does not fit. Wanted: %zu got: %u\n", sizeof(*header), length);
- LOGP(DMSC, LOGL_ERROR, "hex: %s\n", osmo_hexdump(msg->l3h, length));
- return -1;
- }
-
- if (header->length > length - sizeof(*header)) {
- LOGP(DMSC, LOGL_ERROR, "The DTAP l4 information does not fit: header: %u length: %u\n", header->length, length);
- LOGP(DMSC, LOGL_ERROR, "hex: %s\n", osmo_hexdump(msg->l3h, length));
- return -1;
- }
-
- LOGP(DMSC, LOGL_INFO, "Rx MSC DTAP, SAPI: %u CHAN: %u\n", header->link_id & 0x07, header->link_id & 0xC0);
-
- /* forward the data */
- gsm48 = gsm48_msgb_alloc_name("GSM 04.08 DTAP RCV");
- if (!gsm48) {
- LOGP(DMSC, LOGL_ERROR, "Allocation of the message failed.\n");
- return -1;
- }
-
- gsm48->l3h = gsm48->data;
- data = msgb_put(gsm48, length - sizeof(*header));
- memcpy(data, msg->l3h + sizeof(*header), length - sizeof(*header));
-
- /* pass it to the filter for extra actions */
- rc = bsc_scan_msc_msg(conn->conn, gsm48);
- dtap_rc = gsm0808_submit_dtap(conn->conn, gsm48, header->link_id, 1);
- if (rc == BSS_SEND_USSD)
- bsc_send_welcome_ussd(conn->conn);
- return dtap_rc;
-}
-
-int bsc_handle_udt(struct bsc_msc_data *msc,
- struct msgb *msgb, unsigned int length)
-{
- struct bssmap_header *bs;
-
- LOGP(DMSC, LOGL_DEBUG, "Rx MSC UDT: %s\n",
- osmo_hexdump(msgb->l3h, length));
-
- if (length < sizeof(*bs)) {
- LOGP(DMSC, LOGL_ERROR, "The header is too short.\n");
- return -1;
- }
-
- bs = (struct bssmap_header *) msgb->l3h;
- if (bs->length < length - sizeof(*bs))
- return -1;
-
- switch (bs->type) {
- case BSSAP_MSG_BSS_MANAGEMENT:
- msgb->l4h = &msgb->l3h[sizeof(*bs)];
- bssmap_rcvmsg_udt(msc, msgb, length - sizeof(*bs));
- break;
- default:
- LOGP(DMSC, LOGL_NOTICE, "Unimplemented msg type: %s\n",
- gsm0808_bssmap_name(bs->type));
- }
-
- return 0;
-}
-
-int bsc_handle_dt(struct osmo_bsc_sccp_con *conn,
- struct msgb *msg, unsigned int len)
-{
- if (len < sizeof(struct bssmap_header)) {
- LOGP(DMSC, LOGL_ERROR, "The header is too short.\n");
- }
-
- switch (msg->l3h[0]) {
- case BSSAP_MSG_BSS_MANAGEMENT:
- msg->l4h = &msg->l3h[sizeof(struct bssmap_header)];
- bssmap_rcvmsg_dt1(conn, msg, len - sizeof(struct bssmap_header));
- break;
- case BSSAP_MSG_DTAP:
- dtap_rcvmsg(conn, msg, len);
- break;
- default:
- LOGP(DMSC, LOGL_NOTICE, "Unimplemented BSSAP msg type: %s\n",
- gsm0808_bssap_name(msg->l3h[0]));
- }
-
- return -1;
-}
diff --git a/src/osmo-bsc/osmo_bsc_ctrl.c b/src/osmo-bsc/osmo_bsc_ctrl.c
deleted file mode 100644
index c23ed2187..000000000
--- a/src/osmo-bsc/osmo_bsc_ctrl.c
+++ /dev/null
@@ -1,680 +0,0 @@
-/* (C) 2011 by Daniel Willmann <daniel@totalueberwachung.de>
- * (C) 2011 by Holger Hans Peter Freyther
- * (C) 2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/gsm_04_80.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/signal.h>
-#include <osmocom/core/talloc.h>
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-#include <unistd.h>
-
-void osmo_bsc_send_trap(struct ctrl_cmd *cmd, struct bsc_msc_connection *msc_con)
-{
- struct ctrl_cmd *trap;
- struct ctrl_handle *ctrl;
- struct bsc_msc_data *msc_data;
-
- msc_data = (struct bsc_msc_data *) msc_con->write_queue.bfd.data;
- ctrl = msc_data->network->ctrl;
-
- trap = ctrl_cmd_trap(cmd);
- if (!trap) {
- LOGP(DCTRL, LOGL_ERROR, "Failed to create trap.\n");
- return;
- }
-
- ctrl_cmd_send_to_all(ctrl, trap);
- ctrl_cmd_send(&msc_con->write_queue, trap);
-
- talloc_free(trap);
-}
-
-CTRL_CMD_DEFINE_RO(msc_connection_status, "msc_connection_status");
-static int msc_connection_status = 0;
-
-static int get_msc_connection_status(struct ctrl_cmd *cmd, void *data)
-{
- if (msc_connection_status)
- cmd->reply = "connected";
- else
- cmd->reply = "disconnected";
- return CTRL_CMD_REPLY;
-}
-
-static int msc_connection_status_trap_cb(unsigned int subsys, unsigned int signal, void *handler_data, void *signal_data)
-{
- struct ctrl_cmd *cmd;
- struct gsm_network *gsmnet = (struct gsm_network *)handler_data;
-
- if (signal == S_MSC_LOST && msc_connection_status == 1) {
- LOGP(DCTRL, LOGL_DEBUG, "MSC connection lost, sending TRAP.\n");
- msc_connection_status = 0;
- } else if (signal == S_MSC_CONNECTED && msc_connection_status == 0) {
- LOGP(DCTRL, LOGL_DEBUG, "MSC connection (re)established, sending TRAP.\n");
- msc_connection_status = 1;
- } else {
- return 0;
- }
-
- cmd = ctrl_cmd_create(tall_bsc_ctx, CTRL_TYPE_TRAP);
- if (!cmd) {
- LOGP(DCTRL, LOGL_ERROR, "Trap creation failed.\n");
- return 0;
- }
-
- cmd->id = "0";
- cmd->variable = "msc_connection_status";
-
- get_msc_connection_status(cmd, NULL);
-
- ctrl_cmd_send_to_all(gsmnet->ctrl, cmd);
-
- talloc_free(cmd);
-
- return 0;
-}
-
-CTRL_CMD_DEFINE_RO(bts_connection_status, "bts_connection_status");
-static int bts_connection_status = 0;
-
-static int get_bts_connection_status(struct ctrl_cmd *cmd, void *data)
-{
- if (bts_connection_status)
- cmd->reply = "connected";
- else
- cmd->reply = "disconnected";
- return CTRL_CMD_REPLY;
-}
-
-static int bts_connection_status_trap_cb(unsigned int subsys, unsigned int signal, void *handler_data, void *signal_data)
-{
- struct ctrl_cmd *cmd;
- struct gsm_network *gsmnet = (struct gsm_network *)handler_data;
- struct gsm_bts *bts;
- int bts_current_status;
-
- if (signal != S_L_INP_TEI_DN && signal != S_L_INP_TEI_UP) {
- return 0;
- }
-
- bts_current_status = 0;
- /* Check if OML on at least one BTS is up */
- llist_for_each_entry(bts, &gsmnet->bts_list, list) {
- if (bts->oml_link) {
- bts_current_status = 1;
- break;
- }
- }
- if (bts_connection_status == 0 && bts_current_status == 1) {
- LOGP(DCTRL, LOGL_DEBUG, "BTS connection (re)established, sending TRAP.\n");
- } else if (bts_connection_status == 1 && bts_current_status == 0) {
- LOGP(DCTRL, LOGL_DEBUG, "No more BTS connected, sending TRAP.\n");
- } else {
- return 0;
- }
-
- cmd = ctrl_cmd_create(tall_bsc_ctx, CTRL_TYPE_TRAP);
- if (!cmd) {
- LOGP(DCTRL, LOGL_ERROR, "Trap creation failed.\n");
- return 0;
- }
-
- bts_connection_status = bts_current_status;
-
- cmd->id = "0";
- cmd->variable = "bts_connection_status";
-
- get_bts_connection_status(cmd, NULL);
-
- ctrl_cmd_send_to_all(gsmnet->ctrl, cmd);
-
- talloc_free(cmd);
-
- return 0;
-}
-
-static int get_bts_loc(struct ctrl_cmd *cmd, void *data);
-
-static void generate_location_state_trap(struct gsm_bts *bts, struct bsc_msc_connection *msc_con)
-{
- struct ctrl_cmd *cmd;
- const char *oper, *admin, *policy;
-
- cmd = ctrl_cmd_create(msc_con, CTRL_TYPE_TRAP);
- if (!cmd) {
- LOGP(DCTRL, LOGL_ERROR, "Failed to create TRAP command.\n");
- return;
- }
-
- cmd->id = "0";
- cmd->variable = talloc_asprintf(cmd, "bts.%i.location-state", bts->nr);
-
- /* Prepare the location reply */
- cmd->node = bts;
- get_bts_loc(cmd, NULL);
-
- oper = osmo_bsc_rf_get_opstate_name(osmo_bsc_rf_get_opstate_by_bts(bts));
- admin = osmo_bsc_rf_get_adminstate_name(osmo_bsc_rf_get_adminstate_by_bts(bts));
- policy = osmo_bsc_rf_get_policy_name(osmo_bsc_rf_get_policy_by_bts(bts));
-
- cmd->reply = talloc_asprintf_append(cmd->reply,
- ",%s,%s,%s,%d,%d",
- oper, admin, policy,
- bts->network->country_code,
- bts->network->network_code);
-
- osmo_bsc_send_trap(cmd, msc_con);
- talloc_free(cmd);
-}
-
-void bsc_gen_location_state_trap(struct gsm_bts *bts)
-{
- struct bsc_msc_data *msc;
-
- llist_for_each_entry(msc, &bts->network->bsc_data->mscs, entry)
- generate_location_state_trap(bts, msc->msc_con);
-}
-
-static int location_equal(struct bts_location *a, struct bts_location *b)
-{
- return ((a->tstamp == b->tstamp) && (a->valid == b->valid) && (a->lat == b->lat) &&
- (a->lon == b->lon) && (a->height == b->height));
-}
-
-static void cleanup_locations(struct llist_head *locations)
-{
- struct bts_location *myloc, *tmp;
- int invalpos = 0, i = 0;
-
- LOGP(DCTRL, LOGL_DEBUG, "Checking position list.\n");
- llist_for_each_entry_safe(myloc, tmp, locations, list) {
- i++;
- if (i > 3) {
- LOGP(DCTRL, LOGL_DEBUG, "Deleting old position.\n");
- llist_del(&myloc->list);
- talloc_free(myloc);
- } else if (myloc->valid == BTS_LOC_FIX_INVALID) {
- /* Only capture the newest of subsequent invalid positions */
- invalpos++;
- if (invalpos > 1) {
- LOGP(DCTRL, LOGL_DEBUG, "Deleting subsequent invalid position.\n");
- invalpos--;
- i--;
- llist_del(&myloc->list);
- talloc_free(myloc);
- }
- } else {
- invalpos = 0;
- }
- }
- LOGP(DCTRL, LOGL_DEBUG, "Found %i positions.\n", i);
-}
-
-CTRL_CMD_DEFINE(bts_loc, "location");
-static int get_bts_loc(struct ctrl_cmd *cmd, void *data)
-{
- struct bts_location *curloc;
- struct gsm_bts *bts = (struct gsm_bts *) cmd->node;
- if (!bts) {
- cmd->reply = "bts not found.";
- return CTRL_CMD_ERROR;
- }
-
- if (llist_empty(&bts->loc_list)) {
- cmd->reply = talloc_asprintf(cmd, "0,invalid,0,0,0");
- return CTRL_CMD_REPLY;
- } else {
- curloc = llist_entry(bts->loc_list.next, struct bts_location, list);
- }
-
- cmd->reply = talloc_asprintf(cmd, "%lu,%s,%f,%f,%f", curloc->tstamp,
- get_value_string(bts_loc_fix_names, curloc->valid), curloc->lat, curloc->lon, curloc->height);
- if (!cmd->reply) {
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
- }
-
- return CTRL_CMD_REPLY;
-}
-
-static int set_bts_loc(struct ctrl_cmd *cmd, void *data)
-{
- char *saveptr, *lat, *lon, *height, *tstamp, *valid, *tmp;
- struct bts_location *curloc, *lastloc;
- int ret;
- struct gsm_bts *bts = (struct gsm_bts *) cmd->node;
- if (!bts) {
- cmd->reply = "bts not found.";
- return CTRL_CMD_ERROR;
- }
-
- tmp = talloc_strdup(cmd, cmd->value);
- if (!tmp)
- goto oom;
-
- curloc = talloc_zero(tall_bsc_ctx, struct bts_location);
- if (!curloc) {
- talloc_free(tmp);
- goto oom;
- }
- INIT_LLIST_HEAD(&curloc->list);
-
-
- tstamp = strtok_r(tmp, ",", &saveptr);
- valid = strtok_r(NULL, ",", &saveptr);
- lat = strtok_r(NULL, ",", &saveptr);
- lon = strtok_r(NULL, ",", &saveptr);
- height = strtok_r(NULL, "\0", &saveptr);
-
- curloc->tstamp = atol(tstamp);
- curloc->valid = get_string_value(bts_loc_fix_names, valid);
- curloc->lat = atof(lat);
- curloc->lon = atof(lon);
- curloc->height = atof(height);
- talloc_free(tmp);
-
- lastloc = llist_entry(bts->loc_list.next, struct bts_location, list);
-
- /* Add location to the end of the list */
- llist_add(&curloc->list, &bts->loc_list);
-
- ret = get_bts_loc(cmd, data);
-
- if (!location_equal(curloc, lastloc))
- bsc_gen_location_state_trap(bts);
-
- cleanup_locations(&bts->loc_list);
-
- return ret;
-
-oom:
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
-}
-
-static int verify_bts_loc(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- char *saveptr, *latstr, *lonstr, *heightstr, *tstampstr, *validstr, *tmp;
- time_t tstamp;
- int valid;
- double lat, lon, height __attribute__((unused));
-
- tmp = talloc_strdup(cmd, value);
- if (!tmp)
- return 1;
-
- tstampstr = strtok_r(tmp, ",", &saveptr);
- validstr = strtok_r(NULL, ",", &saveptr);
- latstr = strtok_r(NULL, ",", &saveptr);
- lonstr = strtok_r(NULL, ",", &saveptr);
- heightstr = strtok_r(NULL, "\0", &saveptr);
-
- if ((tstampstr == NULL) || (validstr == NULL) || (latstr == NULL) ||
- (lonstr == NULL) || (heightstr == NULL))
- goto err;
-
- tstamp = atol(tstampstr);
- valid = get_string_value(bts_loc_fix_names, validstr);
- lat = atof(latstr);
- lon = atof(lonstr);
- height = atof(heightstr);
- talloc_free(tmp);
- tmp = NULL;
-
- if (((tstamp == 0) && (valid != BTS_LOC_FIX_INVALID)) || (lat < -90) || (lat > 90) ||
- (lon < -180) || (lon > 180) || (valid < 0)) {
- goto err;
- }
-
- return 0;
-
-err:
- talloc_free(tmp);
- cmd->reply = talloc_strdup(cmd, "The format is <unixtime>,(invalid|fix2d|fix3d),<lat>,<lon>,<height>");
- return 1;
-}
-
-CTRL_CMD_DEFINE(net_timezone, "timezone");
-static int get_net_timezone(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net = (struct gsm_network*)cmd->node;
-
- struct gsm_tz *tz = &net->tz;
- if (tz->override)
- cmd->reply = talloc_asprintf(cmd, "%d,%d,%d",
- tz->hr, tz->mn, tz->dst);
- else
- cmd->reply = talloc_asprintf(cmd, "off");
-
- if (!cmd->reply) {
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
- }
-
- return CTRL_CMD_REPLY;
-}
-
-static int set_net_timezone(struct ctrl_cmd *cmd, void *data)
-{
- char *saveptr, *hourstr, *minstr, *dststr, *tmp = 0;
- int override;
- struct gsm_network *net = (struct gsm_network*)cmd->node;
-
- tmp = talloc_strdup(cmd, cmd->value);
- if (!tmp)
- goto oom;
-
- hourstr = strtok_r(tmp, ",", &saveptr);
- minstr = strtok_r(NULL, ",", &saveptr);
- dststr = strtok_r(NULL, ",", &saveptr);
-
- override = 0;
-
- if (hourstr != NULL)
- override = strcasecmp(hourstr, "off") != 0;
-
- struct gsm_tz *tz = &net->tz;
- tz->override = override;
-
- if (override) {
- tz->hr = hourstr ? atol(hourstr) : 0;
- tz->mn = minstr ? atol(minstr) : 0;
- tz->dst = dststr ? atol(dststr) : 0;
- }
-
- talloc_free(tmp);
- tmp = NULL;
-
- return get_net_timezone(cmd, data);
-
-oom:
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
-}
-
-static int verify_net_timezone(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- char *saveptr, *hourstr, *minstr, *dststr, *tmp;
- int override, tz_hours, tz_mins, tz_dst;
-
- tmp = talloc_strdup(cmd, value);
- if (!tmp)
- return 1;
-
- hourstr = strtok_r(tmp, ",", &saveptr);
- minstr = strtok_r(NULL, ",", &saveptr);
- dststr = strtok_r(NULL, ",", &saveptr);
-
- if (hourstr == NULL)
- goto err;
-
- override = strcasecmp(hourstr, "off") != 0;
-
- if (!override) {
- talloc_free(tmp);
- return 0;
- }
-
- if (minstr == NULL || dststr == NULL)
- goto err;
-
- tz_hours = atol(hourstr);
- tz_mins = atol(minstr);
- tz_dst = atol(dststr);
-
- talloc_free(tmp);
- tmp = NULL;
-
- if ((tz_hours < -19) || (tz_hours > 19) ||
- (tz_mins < 0) || (tz_mins >= 60) || (tz_mins % 15 != 0) ||
- (tz_dst < 0) || (tz_dst > 2))
- goto err;
-
- return 0;
-
-err:
- talloc_free(tmp);
- cmd->reply = talloc_strdup(cmd, "The format is <hours>,<mins>,<dst> or 'off' where -19 <= hours <= 19, mins in {0, 15, 30, 45}, and 0 <= dst <= 2");
- return 1;
-}
-
-CTRL_CMD_DEFINE(net_notification, "notification");
-static int get_net_notification(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "There is nothing to read";
- return CTRL_CMD_ERROR;
-}
-
-static int set_net_notification(struct ctrl_cmd *cmd, void *data)
-{
- struct ctrl_cmd *trap;
- struct gsm_network *net;
-
- net = cmd->node;
-
- trap = ctrl_cmd_create(tall_bsc_ctx, CTRL_TYPE_TRAP);
- if (!trap) {
- LOGP(DCTRL, LOGL_ERROR, "Trap creation failed\n");
- goto handled;
- }
-
- trap->id = "0";
- trap->variable = "notification";
- trap->reply = talloc_strdup(trap, cmd->value);
-
- /*
- * This should only be sent to local systems. In the future
- * we might even ask for systems to register to receive
- * the notifications.
- */
- ctrl_cmd_send_to_all(net->ctrl, trap);
- talloc_free(trap);
-
-handled:
- return CTRL_CMD_HANDLED;
-}
-
-static int verify_net_notification(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- return 0;
-}
-
-CTRL_CMD_DEFINE(net_inform_msc, "inform-msc-v1");
-static int get_net_inform_msc(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "There is nothing to read";
- return CTRL_CMD_ERROR;
-}
-
-static int set_net_inform_msc(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_network *net;
- struct bsc_msc_data *msc;
-
- net = cmd->node;
- llist_for_each_entry(msc, &net->bsc_data->mscs, entry) {
- struct ctrl_cmd *trap;
-
- trap = ctrl_cmd_create(tall_bsc_ctx, CTRL_TYPE_TRAP);
- if (!trap) {
- LOGP(DCTRL, LOGL_ERROR, "Trap creation failed\n");
- continue;
- }
-
- trap->id = "0";
- trap->variable = "inform-msc-v1";
- trap->reply = talloc_strdup(trap, cmd->value);
- ctrl_cmd_send(&msc->msc_con->write_queue, trap);
- talloc_free(trap);
- }
-
-
- return CTRL_CMD_HANDLED;
-}
-
-static int verify_net_inform_msc(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- return 0;
-}
-
-CTRL_CMD_DEFINE(net_ussd_notify, "ussd-notify-v1");
-static int get_net_ussd_notify(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "There is nothing to read";
- return CTRL_CMD_ERROR;
-}
-
-static int set_net_ussd_notify(struct ctrl_cmd *cmd, void *data)
-{
- struct gsm_subscriber_connection *conn;
- struct gsm_network *net;
- char *saveptr = NULL;
- char *cic_str, *alert_str, *text_str;
- int cic, alert;
-
- /* Verify has done the test for us */
- cic_str = strtok_r(cmd->value, ",", &saveptr);
- alert_str = strtok_r(NULL, ",", &saveptr);
- text_str = strtok_r(NULL, ",", &saveptr);
-
- if (!cic_str || !alert_str || !text_str) {
- cmd->reply = "Programming issue. How did this pass verify?";
- return CTRL_CMD_ERROR;
- }
-
- cmd->reply = "No connection found";
-
- cic = atoi(cic_str);
- alert = atoi(alert_str);
-
- net = cmd->node;
- llist_for_each_entry(conn, &net->subscr_conns, entry) {
- if (!conn->sccp_con)
- continue;
-
- if (conn->sccp_con->cic != cic)
- continue;
-
- /*
- * This is a hack. My E71 does not like to immediately
- * receive a release complete on a TCH. So schedule a
- * release complete to clear any previous attempt. The
- * right thing would be to track invokeId and only send
- * the release complete when we get a returnResultLast
- * for this invoke id.
- */
- bsc_send_ussd_release_complete(conn);
- bsc_send_ussd_notify(conn, alert, text_str);
- cmd->reply = "Found a connection";
- break;
- }
-
- return CTRL_CMD_REPLY;
-}
-
-static int verify_net_ussd_notify(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- char *saveptr = NULL;
- char *inp, *cic, *alert, *text;
-
- OSMO_ASSERT(cmd);
- inp = talloc_strdup(cmd, value);
-
- cic = strtok_r(inp, ",", &saveptr);
- alert = strtok_r(NULL, ",", &saveptr);
- text = strtok_r(NULL, ",", &saveptr);
-
- talloc_free(inp);
- if (!cic || !alert || !text)
- return 1;
- return 0;
-}
-
-static int msc_signal_handler(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct msc_signal_data *msc;
- struct gsm_network *net;
- struct gsm_bts *bts;
-
- if (subsys != SS_MSC)
- return 0;
- if (signal != S_MSC_AUTHENTICATED)
- return 0;
-
- msc = signal_data;
-
- net = msc->data->network;
- llist_for_each_entry(bts, &net->bts_list, list)
- generate_location_state_trap(bts, msc->data->msc_con);
-
- return 0;
-}
-
-int bsc_ctrl_cmds_install(struct gsm_network *net)
-{
- int rc;
-
- rc = bsc_base_ctrl_cmds_install();
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_BTS, &cmd_bts_loc);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_timezone);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_msc_connection_status);
- if (rc)
- goto end;
- rc = osmo_signal_register_handler(SS_MSC, &msc_connection_status_trap_cb, net);
- if (rc)
- goto end;
- rc = osmo_signal_register_handler(SS_MSC, msc_signal_handler, NULL);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_bts_connection_status);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_notification);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_inform_msc);
- if (rc)
- goto end;
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_ussd_notify);
- if (rc)
- goto end;
- rc = osmo_signal_register_handler(SS_L_INPUT, &bts_connection_status_trap_cb, net);
-
-end:
- return rc;
-}
diff --git a/src/osmo-bsc/osmo_bsc_filter.c b/src/osmo-bsc/osmo_bsc_filter.c
deleted file mode 100644
index 2c84b169f..000000000
--- a/src/osmo-bsc/osmo_bsc_filter.c
+++ /dev/null
@@ -1,381 +0,0 @@
-/* (C) 2009-2011 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/gsm_subscriber.h>
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/debug.h>
-#include <openbsc/paging.h>
-
-#include <stdlib.h>
-
-static void handle_lu_request(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh;
- struct gsm48_loc_upd_req *lu;
- struct gsm48_loc_area_id lai;
- struct gsm_network *net;
-
- if (msgb_l3len(msg) < sizeof(*gh) + sizeof(*lu)) {
- LOGP(DMSC, LOGL_ERROR, "LU too small to look at: %u\n", msgb_l3len(msg));
- return;
- }
-
- net = conn->bts->network;
-
- gh = msgb_l3(msg);
- lu = (struct gsm48_loc_upd_req *) gh->data;
-
- gsm48_generate_lai(&lai, net->country_code, net->network_code,
- conn->bts->location_area_code);
-
- if (memcmp(&lai, &lu->lai, sizeof(lai)) != 0) {
- LOGP(DMSC, LOGL_DEBUG, "Marking con for welcome USSD.\n");
- conn->sccp_con->new_subscriber = 1;
- }
-}
-
-/* extract a subscriber from the paging response */
-static struct bsc_subscr *extract_sub(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- uint8_t mi_type;
- char mi_string[GSM48_MI_SIZE];
- struct gsm48_hdr *gh;
- struct gsm48_pag_resp *resp;
- struct bsc_subscr *subscr;
-
- if (msgb_l3len(msg) < sizeof(*gh) + sizeof(*resp)) {
- LOGP(DMSC, LOGL_ERROR, "PagingResponse too small: %u\n", msgb_l3len(msg));
- return NULL;
- }
-
- gh = msgb_l3(msg);
- resp = (struct gsm48_pag_resp *) &gh->data[0];
-
- gsm48_paging_extract_mi(resp, msgb_l3len(msg) - sizeof(*gh),
- mi_string, &mi_type);
- DEBUGP(DRR, "PAGING RESPONSE: MI(%s)=%s\n",
- gsm48_mi_type_name(mi_type), mi_string);
-
- switch (mi_type) {
- case GSM_MI_TYPE_TMSI:
- subscr = bsc_subscr_find_by_tmsi(conn->network->bsc_subscribers,
- tmsi_from_string(mi_string));
- break;
- case GSM_MI_TYPE_IMSI:
- subscr = bsc_subscr_find_by_imsi(conn->network->bsc_subscribers,
- mi_string);
- break;
- default:
- subscr = NULL;
- break;
- }
-
- return subscr;
-}
-
-/* we will need to stop the paging request */
-static int handle_page_resp(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct bsc_subscr *subscr = extract_sub(conn, msg);
-
- if (!subscr) {
- LOGP(DMSC, LOGL_ERROR, "Non active subscriber got paged.\n");
- return -1;
- }
-
- paging_request_stop(&conn->network->bts_list, conn->bts, subscr, conn,
- msg);
- bsc_subscr_put(subscr);
- return 0;
-}
-
-static int is_cm_service_for_emerg(struct msgb *msg)
-{
- struct gsm48_service_request *cm;
- struct gsm48_hdr *gh = msgb_l3(msg);
-
- if (msgb_l3len(msg) < sizeof(*gh) + sizeof(*cm)) {
- LOGP(DMSC, LOGL_ERROR, "CM ServiceRequest does not fit.\n");
- return 0;
- }
-
- cm = (struct gsm48_service_request *) &gh->data[0];
- return cm->cm_service_type == GSM48_CMSERV_EMERGENCY;
-}
-
-struct bsc_msc_data *bsc_find_msc(struct gsm_subscriber_connection *conn,
- struct msgb *msg)
-{
- struct gsm48_hdr *gh;
- int8_t pdisc;
- uint8_t mtype;
- struct osmo_bsc_data *bsc;
- struct bsc_msc_data *msc, *pag_msc;
- struct bsc_subscr *subscr;
- int is_emerg = 0;
-
- bsc = conn->bts->network->bsc_data;
-
- if (msgb_l3len(msg) < sizeof(*gh)) {
- LOGP(DMSC, LOGL_ERROR, "There is no GSM48 header here.\n");
- return NULL;
- }
-
- gh = msgb_l3(msg);
- pdisc = gsm48_hdr_pdisc(gh);
- mtype = gsm48_hdr_msg_type(gh);
-
- /*
- * We are asked to select a MSC here but they are not equal. We
- * want to respond to a paging request on the MSC where we got the
- * request from. This is where we need to decide where this connection
- * will go.
- */
- if (pdisc == GSM48_PDISC_RR && mtype == GSM48_MT_RR_PAG_RESP)
- goto paging;
- else if (pdisc == GSM48_PDISC_MM && mtype == GSM48_MT_MM_CM_SERV_REQ) {
- is_emerg = is_cm_service_for_emerg(msg);
- goto round_robin;
- } else
- goto round_robin;
-
-round_robin:
- llist_for_each_entry(msc, &bsc->mscs, entry) {
- if (!msc->msc_con->is_authenticated)
- continue;
- if (!is_emerg && msc->type != MSC_CON_TYPE_NORMAL)
- continue;
- if (is_emerg && !msc->allow_emerg)
- continue;
-
- /* force round robin by moving it to the end */
- llist_move_tail(&msc->entry, &bsc->mscs);
- return msc;
- }
-
- return NULL;
-
-paging:
- subscr = extract_sub(conn, msg);
-
- if (!subscr) {
- LOGP(DMSC, LOGL_ERROR, "Got paged but no subscriber found.\n");
- return NULL;
- }
-
- pag_msc = paging_get_data(conn->bts, subscr);
- bsc_subscr_put(subscr);
-
- llist_for_each_entry(msc, &bsc->mscs, entry) {
- if (msc != pag_msc)
- continue;
-
- /*
- * We don't check if the MSC is connected. In case it
- * is not the connection will be dropped.
- */
-
- /* force round robin by moving it to the end */
- llist_move_tail(&msc->entry, &bsc->mscs);
- return msc;
- }
-
- LOGP(DMSC, LOGL_ERROR, "Got paged but no request found.\n");
- return NULL;
-}
-
-
-/**
- * This is used to scan a message for extra functionality of the BSC. This
- * includes scanning for location updating requests/acceptd and then send
- * a welcome USSD message to the subscriber.
- */
-int bsc_scan_bts_msg(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct gsm48_hdr *gh = msgb_l3(msg);
- uint8_t pdisc = gsm48_hdr_pdisc(gh);
- uint8_t mtype = gsm48_hdr_msg_type(gh);
-
- if (pdisc == GSM48_PDISC_MM) {
- if (mtype == GSM48_MT_MM_LOC_UPD_REQUEST)
- handle_lu_request(conn, msg);
- } else if (pdisc == GSM48_PDISC_RR) {
- if (mtype == GSM48_MT_RR_PAG_RESP)
- handle_page_resp(conn, msg);
- }
-
- return 0;
-}
-
-static int send_welcome_ussd(struct gsm_subscriber_connection *conn)
-{
- struct osmo_bsc_sccp_con *bsc_con;
-
- bsc_con = conn->sccp_con;
- if (!bsc_con) {
- LOGP(DMSC, LOGL_DEBUG, "No SCCP connection associated.\n");
- return 0;
- }
-
- if (!bsc_con->msc->ussd_welcome_txt) {
- LOGP(DMSC, LOGL_DEBUG, "No USSD Welcome text defined.\n");
- return 0;
- }
-
- return BSS_SEND_USSD;
-}
-
-int bsc_send_welcome_ussd(struct gsm_subscriber_connection *conn)
-{
- bsc_send_ussd_notify(conn, 1, conn->sccp_con->msc->ussd_welcome_txt);
- bsc_send_ussd_release_complete(conn);
-
- return 0;
-}
-
-static int bsc_patch_mm_info(struct gsm_subscriber_connection *conn,
- uint8_t *data, unsigned int length)
-{
- struct tlv_parsed tp;
- int parse_res;
- struct gsm_bts *bts = conn->bts;
- int tzunits;
- uint8_t tzbsd = 0;
- uint8_t dst = 0;
-
- parse_res = tlv_parse(&tp, &gsm48_mm_att_tlvdef, data, length, 0, 0);
- if (parse_res <= 0 && parse_res != -3)
- /* FIXME: -3 means unknown IE error, so this accepts messages
- * with unknown IEs. But parsing has aborted with the unknown
- * IE and the message is broken or parsed incompletely. */
- return 0;
-
- /* Is TZ patching enabled? */
- struct gsm_tz *tz = &bts->network->tz;
- if (!tz->override)
- return 0;
-
- /* Convert tz.hr and tz.mn to units */
- if (tz->hr < 0) {
- tzunits = -tz->hr*4;
- tzbsd |= 0x08;
- } else
- tzunits = tz->hr*4;
-
- tzunits = tzunits + (tz->mn/15);
-
- tzbsd |= (tzunits % 10)*0x10 + (tzunits / 10);
-
- /* Convert DST value */
- if (tz->dst >= 0 && tz->dst <= 2)
- dst = tz->dst;
-
- if (TLVP_PRESENT(&tp, GSM48_IE_UTC)) {
- LOGP(DMSC, LOGL_DEBUG,
- "Changing 'Local time zone' from 0x%02x to 0x%02x.\n",
- TLVP_VAL(&tp, GSM48_IE_UTC)[6], tzbsd);
- ((uint8_t *)(TLVP_VAL(&tp, GSM48_IE_UTC)))[0] = tzbsd;
- }
- if (TLVP_PRESENT(&tp, GSM48_IE_NET_TIME_TZ)) {
- LOGP(DMSC, LOGL_DEBUG,
- "Changing 'Universal time and local time zone' TZ from "
- "0x%02x to 0x%02x.\n",
- TLVP_VAL(&tp, GSM48_IE_NET_TIME_TZ)[6], tzbsd);
- ((uint8_t *)(TLVP_VAL(&tp, GSM48_IE_NET_TIME_TZ)))[6] = tzbsd;
- }
-#ifdef GSM48_IE_NET_DST
- if (TLVP_PRESENT(&tp, GSM48_IE_NET_DST)) {
- LOGP(DMSC, LOGL_DEBUG,
- "Changing 'Network daylight saving time' from "
- "0x%02x to 0x%02x.\n",
- TLVP_VAL(&tp, GSM48_IE_NET_DST)[0], dst);
- ((uint8_t *)(TLVP_VAL(&tp, GSM48_IE_NET_DST)))[0] = dst;
- }
-#endif
-
- return 0;
-}
-
-static int has_core_identity(struct bsc_msc_data *msc)
-{
- if (msc->core_mnc != -1)
- return 1;
- if (msc->core_mcc != -1)
- return 1;
- if (msc->core_lac != -1)
- return 1;
- if (msc->core_ci != -1)
- return 1;
- return 0;
-}
-
-/**
- * Messages coming back from the MSC.
- */
-int bsc_scan_msc_msg(struct gsm_subscriber_connection *conn, struct msgb *msg)
-{
- struct bsc_msc_data *msc;
- struct gsm_network *net;
- struct gsm48_loc_area_id *lai;
- struct gsm48_hdr *gh;
- uint8_t pdisc;
- uint8_t mtype;
- int length = msgb_l3len(msg);
-
- if (length < sizeof(*gh)) {
- LOGP(DMSC, LOGL_ERROR, "GSM48 header does not fit.\n");
- return -1;
- }
-
- gh = (struct gsm48_hdr *) msgb_l3(msg);
- length -= (const char *)&gh->data[0] - (const char *)gh;
-
- pdisc = gsm48_hdr_pdisc(gh);
- if (pdisc != GSM48_PDISC_MM)
- return 0;
-
- mtype = gsm48_hdr_msg_type(gh);
- net = conn->bts->network;
- msc = conn->sccp_con->msc;
-
- if (mtype == GSM48_MT_MM_LOC_UPD_ACCEPT) {
- if (has_core_identity(msc)) {
- if (msgb_l3len(msg) >= sizeof(*gh) + sizeof(*lai)) {
- /* overwrite LAI in the message */
- lai = (struct gsm48_loc_area_id *) &gh->data[0];
- gsm48_generate_lai(lai, net->country_code,
- net->network_code,
- conn->bts->location_area_code);
- }
- }
-
- if (conn->sccp_con->new_subscriber)
- return send_welcome_ussd(conn);
- return 0;
- } else if (mtype == GSM48_MT_MM_INFO) {
- bsc_patch_mm_info(conn, &gh->data[0], length);
- }
-
- return 0;
-}
diff --git a/src/osmo-bsc/osmo_bsc_grace.c b/src/osmo-bsc/osmo_bsc_grace.c
deleted file mode 100644
index 63afa20d0..000000000
--- a/src/osmo-bsc/osmo_bsc_grace.c
+++ /dev/null
@@ -1,169 +0,0 @@
-/*
- * (C) 2010-2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2013 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/osmo_bsc_grace.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/gsm_04_80.h>
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/paging.h>
-#include <openbsc/signal.h>
-
-int bsc_grace_allow_new_connection(struct gsm_network *network, struct gsm_bts *bts)
-{
- if (bts->excl_from_rf_lock)
- return 1;
- return network->bsc_data->rf_ctrl->policy == S_RF_ON;
-}
-
-
-static int normal_paging(struct bsc_subscr *subscr, int chan_needed,
- struct bsc_msc_data *msc)
-{
- /* we can't page by lac.. we need to page everything */
- if (msc->core_lac != -1) {
- struct gsm_bts *bts;
-
- llist_for_each_entry(bts, &msc->network->bts_list, list)
- paging_request_bts(bts, subscr, chan_needed, NULL, msc);
-
- return 0;
- }
-
- return paging_request(msc->network, subscr, chan_needed, NULL, msc);
-}
-
-static int locked_paging(struct bsc_subscr *subscr, int chan_needed,
- struct bsc_msc_data *msc)
-{
- struct gsm_bts *bts = NULL;
-
- /*
- * Check if there is any BTS that is on for the given lac. Start
- * with NULL and iterate through all bts.
- */
- llist_for_each_entry(bts, &msc->network->bts_list, list) {
- /*
- * continue if the BTS is not excluded from the lock
- */
- if (!bts->excl_from_rf_lock)
- continue;
-
- /* in case of no lac patching is in place, check the BTS */
- if (msc->core_lac == -1 && subscr->lac != bts->location_area_code)
- continue;
-
- /*
- * now page on this bts
- */
- paging_request_bts(bts, subscr, chan_needed, NULL, msc);
- };
-
- /* All bts are either off or in the grace period */
- return 0;
-}
-
-/**
- * Try to not page if everything the cell is not on.
- */
-int bsc_grace_paging_request(enum signal_rf rf_policy,
- struct bsc_subscr *subscr,
- int chan_needed,
- struct bsc_msc_data *msc)
-{
- if (rf_policy == S_RF_ON)
- return normal_paging(subscr, chan_needed, msc);
- return locked_paging(subscr, chan_needed, msc);
-}
-
-static int handle_sub(struct gsm_lchan *lchan, const char *text)
-{
- struct gsm_subscriber_connection *conn;
-
- /* only send it to TCH */
- if (lchan->type != GSM_LCHAN_TCH_H && lchan->type != GSM_LCHAN_TCH_F)
- return -1;
-
- /* only send on the primary channel */
- conn = lchan->conn;
- if (!conn)
- return -1;
-
- if (conn->lchan != lchan)
- return -1;
-
- /* only when active */
- if (lchan->state != LCHAN_S_ACTIVE)
- return -1;
-
- bsc_send_ussd_notify(conn, 0, text);
- bsc_send_ussd_release_complete(conn);
-
- return 0;
-}
-
-/*
- * The place to handle the grace mode. Right now we will send
- * USSD messages to the subscriber, in the future we might start
- * a timer to have different modes for the grace period.
- */
-static int handle_grace(struct gsm_network *network)
-{
- int ts_nr, lchan_nr;
- struct gsm_bts *bts;
- struct gsm_bts_trx *trx;
-
- if (!network->bsc_data->mid_call_txt)
- return 0;
-
- llist_for_each_entry(bts, &network->bts_list, list) {
- llist_for_each_entry(trx, &bts->trx_list, list) {
- for (ts_nr = 0; ts_nr < TRX_NR_TS; ++ts_nr) {
- struct gsm_bts_trx_ts *ts = &trx->ts[ts_nr];
- for (lchan_nr = 0; lchan_nr < TS_MAX_LCHAN; ++lchan_nr) {
- handle_sub(&ts->lchan[lchan_nr],
- network->bsc_data->mid_call_txt);
- }
- }
- }
- }
- return 0;
-}
-
-static int handle_rf_signal(unsigned int subsys, unsigned int signal,
- void *handler_data, void *signal_data)
-{
- struct rf_signal_data *sig;
-
- if (subsys != SS_RF)
- return -1;
-
- sig = signal_data;
-
- if (signal == S_RF_GRACE)
- handle_grace(sig->net);
-
- return 0;
-}
-
-static __attribute__((constructor)) void on_dso_load_grace(void)
-{
- osmo_signal_register_handler(SS_RF, handle_rf_signal, NULL);
-}
diff --git a/src/osmo-bsc/osmo_bsc_main.c b/src/osmo-bsc/osmo_bsc_main.c
deleted file mode 100644
index cf188a9e0..000000000
--- a/src/osmo-bsc/osmo_bsc_main.c
+++ /dev/null
@@ -1,307 +0,0 @@
-/* (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2011 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bss.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/signal.h>
-#include <openbsc/vty.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/ctrl.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <osmocom/ctrl/control_if.h>
-#include <osmocom/ctrl/ports.h>
-#include <osmocom/ctrl/control_vty.h>
-
-#include <osmocom/core/application.h>
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/stats.h>
-#include <osmocom/gsm/protocol/gsm_12_21.h>
-
-#include <osmocom/abis/abis.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#define _GNU_SOURCE
-#include <getopt.h>
-
-#include <signal.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-#include <unistd.h>
-
-
-#include "../../bscconfig.h"
-
-struct gsm_network *bsc_gsmnet = 0;
-static const char *config_file = "openbsc.cfg";
-static const char *rf_ctrl = NULL;
-extern const char *openbsc_copyright;
-static int daemonize = 0;
-static struct llist_head access_lists;
-
-struct llist_head *bsc_access_lists(void)
-{
- return &access_lists;
-}
-
-static void print_usage()
-{
- printf("Usage: osmo-bsc\n");
-}
-
-static void print_help()
-{
- printf(" Some useful help...\n");
- printf(" -h --help this text\n");
- printf(" -D --daemonize Fork the process into a background daemon\n");
- printf(" -d option --debug=DRLL:DCC:DMM:DRR:DRSL:DNM enable debugging\n");
- printf(" -s --disable-color\n");
- printf(" -T --timestamp. Print a timestamp in the debug output.\n");
- printf(" -c --config-file filename The config file to use.\n");
- printf(" -l --local=IP. The local address of the MGCP.\n");
- printf(" -e --log-level number. Set a global loglevel.\n");
- printf(" -r --rf-ctl NAME. A unix domain socket to listen for cmds.\n");
- printf(" -t --testmode. A special mode to provoke failures at the MSC.\n");
-}
-
-static void handle_options(int argc, char **argv)
-{
- while (1) {
- int option_index = 0, c;
- static struct option long_options[] = {
- {"help", 0, 0, 'h'},
- {"debug", 1, 0, 'd'},
- {"daemonize", 0, 0, 'D'},
- {"config-file", 1, 0, 'c'},
- {"disable-color", 0, 0, 's'},
- {"timestamp", 0, 0, 'T'},
- {"local", 1, 0, 'l'},
- {"log-level", 1, 0, 'e'},
- {"rf-ctl", 1, 0, 'r'},
- {"testmode", 0, 0, 't'},
- {0, 0, 0, 0}
- };
-
- c = getopt_long(argc, argv, "hd:DsTc:e:r:t",
- long_options, &option_index);
- if (c == -1)
- break;
-
- switch (c) {
- case 'h':
- print_usage();
- print_help();
- exit(0);
- case 's':
- log_set_use_color(osmo_stderr_target, 0);
- break;
- case 'd':
- log_parse_category_mask(osmo_stderr_target, optarg);
- break;
- case 'D':
- daemonize = 1;
- break;
- case 'c':
- config_file = optarg;
- break;
- case 'T':
- log_set_print_timestamp(osmo_stderr_target, 1);
- break;
- case 'e':
- log_set_log_level(osmo_stderr_target, atoi(optarg));
- break;
- case 'r':
- rf_ctrl = optarg;
- break;
- default:
- /* ignore */
- break;
- }
- }
-}
-
-extern int bsc_vty_go_parent(struct vty *vty);
-
-static struct vty_app_info vty_info = {
- .name = "OsmoBSC",
- .version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
-};
-
-extern int bsc_shutdown_net(struct gsm_network *net);
-static void signal_handler(int signal)
-{
- struct bsc_msc_data *msc;
-
- fprintf(stdout, "signal %u received\n", signal);
-
- switch (signal) {
- case SIGINT:
- case SIGTERM:
- bsc_shutdown_net(bsc_gsmnet);
- osmo_signal_dispatch(SS_L_GLOBAL, S_L_GLOBAL_SHUTDOWN, NULL);
- sleep(3);
- exit(0);
- break;
- case SIGABRT:
- /* in case of abort, we want to obtain a talloc report
- * and then return to the caller, who will abort the process */
- case SIGUSR1:
- talloc_report(tall_vty_ctx, stderr);
- talloc_report_full(tall_bsc_ctx, stderr);
- break;
- case SIGUSR2:
- if (!bsc_gsmnet->bsc_data)
- return;
- llist_for_each_entry(msc, &bsc_gsmnet->bsc_data->mscs, entry)
- bsc_msc_lost(msc->msc_con);
- break;
- default:
- break;
- }
-}
-
-int main(int argc, char **argv)
-{
- struct bsc_msc_data *msc;
- struct osmo_bsc_data *data;
- int rc;
-
- tall_bsc_ctx = talloc_named_const(NULL, 1, "openbsc");
- msgb_talloc_ctx_init(tall_bsc_ctx, 0);
-
- /* Allocate global gsm_network struct */
- rc = bsc_network_alloc(NULL);
- if (rc) {
- fprintf(stderr, "Allocation failed. exiting.\n");
- exit(1);
- }
-
- osmo_init_logging(&log_info);
- osmo_stats_init(tall_bsc_ctx);
-
- bts_init();
- libosmo_abis_init(tall_bsc_ctx);
-
- /* enable filters */
-
- /* This needs to precede handle_options() */
- vty_info.copyright = openbsc_copyright;
- vty_init(&vty_info);
- bsc_vty_init(bsc_gsmnet);
- bsc_msg_lst_vty_init(tall_bsc_ctx, &access_lists, BSC_NODE);
- ctrl_vty_init(tall_bsc_ctx);
-
- /* Initalize SS7 */
- osmo_ss7_init();
- osmo_ss7_vty_init_asp(tall_bsc_ctx);
-
- INIT_LLIST_HEAD(&access_lists);
-
- /* parse options */
- handle_options(argc, argv);
-
- /* seed the PRNG */
- srand(time(NULL));
-
- /* initialize SCCP */
- sccp_set_log_area(DSCCP);
-
- /* Read the config */
- rc = bsc_network_configure(config_file);
- if (rc < 0) {
- fprintf(stderr, "Bootstrapping the network failed. exiting.\n");
- exit(1);
- }
- bsc_api_init(bsc_gsmnet, osmo_bsc_api());
-
- /* start control interface after reading config for
- * ctrl_vty_get_bind_addr() */
- bsc_gsmnet->ctrl = bsc_controlif_setup(bsc_gsmnet,
- ctrl_vty_get_bind_addr(),
- OSMO_CTRL_PORT_NITB_BSC);
- if (!bsc_gsmnet->ctrl) {
- fprintf(stderr, "Failed to init the control interface. Exiting.\n");
- exit(1);
- }
-
- rc = bsc_ctrl_cmds_install(bsc_gsmnet);
- if (rc < 0) {
- fprintf(stderr, "Failed to install control commands. Exiting.\n");
- exit(1);
- }
-
- data = bsc_gsmnet->bsc_data;
- if (rf_ctrl)
- osmo_talloc_replace_string(data, &data->rf_ctrl_name, rf_ctrl);
-
- data->rf_ctrl = osmo_bsc_rf_create(data->rf_ctrl_name, bsc_gsmnet);
- if (!data->rf_ctrl) {
- fprintf(stderr, "Failed to create the RF service.\n");
- exit(1);
- }
-
- llist_for_each_entry(msc, &bsc_gsmnet->bsc_data->mscs, entry) {
- if (osmo_bsc_msc_init(msc) != 0) {
- LOGP(DNAT, LOGL_ERROR, "Failed to start up. Exiting.\n");
- exit(1);
- }
- }
-
- if (osmo_bsc_sigtran_init(&bsc_gsmnet->bsc_data->mscs) != 0) {
- LOGP(DNM, LOGL_ERROR, "Failed to initalize sigtran backhaul.\n");
- exit(1);
- }
-
- if (osmo_bsc_audio_init(bsc_gsmnet) != 0) {
- LOGP(DMSC, LOGL_ERROR, "Failed to register audio support.\n");
- exit(1);
- }
-
- signal(SIGINT, &signal_handler);
- signal(SIGTERM, &signal_handler);
- signal(SIGABRT, &signal_handler);
- signal(SIGUSR1, &signal_handler);
- signal(SIGUSR2, &signal_handler);
- osmo_init_ignore_signals();
-
- if (daemonize) {
- rc = osmo_daemonize();
- if (rc < 0) {
- perror("Error during daemonize");
- exit(1);
- }
- }
-
- while (1) {
- osmo_select_main(0);
- }
-
- return 0;
-}
diff --git a/src/osmo-bsc/osmo_bsc_msc.c b/src/osmo-bsc/osmo_bsc_msc.c
deleted file mode 100644
index 351fd2ced..000000000
--- a/src/osmo-bsc/osmo_bsc_msc.c
+++ /dev/null
@@ -1,600 +0,0 @@
-/*
- * Handle the connection to the MSC. This include ping/timeout/reconnect
- * (C) 2008-2009 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2015 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2009-2015 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <osmocom/ctrl/control_cmd.h>
-#include <osmocom/ctrl/control_if.h>
-#include <osmocom/crypt/auth.h>
-#include <openbsc/debug.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/signal.h>
-
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/gsm/gsm0808.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <osmocom/abis/ipa.h>
-
-#include <sys/socket.h>
-#include <netinet/tcp.h>
-#include <unistd.h>
-
-#if 0
-static void initialize_if_needed(struct bsc_msc_connection *conn);
-static void send_lacs(struct gsm_network *net, struct bsc_msc_connection *conn);
-static void send_id_get_response(struct bsc_msc_data *data, int fd, struct msgb *inp);
-static void send_ping(struct bsc_msc_data *data);
-static void schedule_ping_pong(struct bsc_msc_data *data);
-
-/*
- * MGCP forwarding code
- */
-
-#endif
-static int mgcp_do_read(struct osmo_fd *fd)
-{
- struct bsc_msc_data *data = (struct bsc_msc_data *) fd->data;
- struct msgb *mgcp;
- int ret;
-
- mgcp = msgb_alloc_headroom(4096, 128, "mgcp_from_gw");
- if (!mgcp) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to allocate MGCP message.\n");
- return -1;
- }
-
- ret = read(fd->fd, mgcp->data, 4096 - 128);
- if (ret <= 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to read: %d/%s\n", errno, strerror(errno));
- msgb_free(mgcp);
- return -1;
- } else if (ret > 4096 - 128) {
- LOGP(DMGCP, LOGL_ERROR, "Too much data: %d\n", ret);
- msgb_free(mgcp);
- return -1;
- }
-
- mgcp->l2h = msgb_put(mgcp, ret);
- msc_queue_write(data->msc_con, mgcp, IPAC_PROTO_MGCP_OLD);
- return 0;
-}
-
-static int mgcp_do_write(struct osmo_fd *fd, struct msgb *msg)
-{
- int ret;
-
- LOGP(DMGCP, LOGL_DEBUG, "Sending msg to MGCP GW size: %u\n", msg->len);
-
- ret = write(fd->fd, msg->data, msg->len);
- if (ret != msg->len)
- LOGP(DMGCP, LOGL_ERROR, "Failed to forward message to MGCP GW (%s).\n", strerror(errno));
-
- return ret;
-}
-
-#if 0
-static void mgcp_forward(struct bsc_msc_data *data, struct msgb *msg)
-{
- struct msgb *mgcp;
-
- if (msgb_l2len(msg) > 4096) {
- LOGP(DMGCP, LOGL_ERROR, "Can not forward too big message.\n");
- return;
- }
-
- mgcp = msgb_alloc(4096, "mgcp_to_gw");
- if (!mgcp) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to send message.\n");
- return;
- }
-
- msgb_put(mgcp, msgb_l2len(msg));
- memcpy(mgcp->data, msg->l2h, mgcp->len);
- if (osmo_wqueue_enqueue(&data->mgcp_agent, mgcp) != 0) {
- LOGP(DMGCP, LOGL_FATAL, "Could not queue message to MGCP GW.\n");
- msgb_free(mgcp);
- }
-}
-#endif
-
-static int mgcp_create_port(struct bsc_msc_data *data)
-{
- int on;
- struct sockaddr_in addr;
-
- data->mgcp_agent.bfd.fd = socket(AF_INET, SOCK_DGRAM, 0);
- if (data->mgcp_agent.bfd.fd < 0) {
- LOGP(DMGCP, LOGL_FATAL, "Failed to create UDP socket errno: %d\n", errno);
- return -1;
- }
-
- on = 1;
- setsockopt(data->mgcp_agent.bfd.fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
-
- /* try to bind the socket */
- memset(&addr, 0, sizeof(addr));
- addr.sin_family = AF_INET;
- addr.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
- addr.sin_port = 0;
-
- if (bind(data->mgcp_agent.bfd.fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
- LOGP(DMGCP, LOGL_FATAL, "Failed to bind to any port.\n");
- close(data->mgcp_agent.bfd.fd);
- data->mgcp_agent.bfd.fd = -1;
- return -1;
- }
-
- /* connect to the remote */
- addr.sin_port = htons(2427);
- if (connect(data->mgcp_agent.bfd.fd, (struct sockaddr *) & addr, sizeof(addr)) < 0) {
- LOGP(DMGCP, LOGL_FATAL, "Failed to connect to local MGCP GW. %s\n", strerror(errno));
- close(data->mgcp_agent.bfd.fd);
- data->mgcp_agent.bfd.fd = -1;
- return -1;
- }
-
- osmo_wqueue_init(&data->mgcp_agent, 10);
- data->mgcp_agent.bfd.when = BSC_FD_READ;
- data->mgcp_agent.bfd.data = data;
- data->mgcp_agent.read_cb = mgcp_do_read;
- data->mgcp_agent.write_cb = mgcp_do_write;
-
- if (osmo_fd_register(&data->mgcp_agent.bfd) != 0) {
- LOGP(DMGCP, LOGL_FATAL, "Failed to register BFD\n");
- close(data->mgcp_agent.bfd.fd);
- data->mgcp_agent.bfd.fd = -1;
- return -1;
- }
-
- return 0;
-}
-
-
-/*
- * Send data to the network
- */
-int msc_queue_write(struct bsc_msc_connection *conn, struct msgb *msg, int proto)
-{
- ipa_prepend_header(msg, proto);
- if (osmo_wqueue_enqueue(&conn->write_queue, msg) != 0) {
- LOGP(DMSC, LOGL_FATAL, "Failed to queue IPA/%d\n", proto);
- msgb_free(msg);
- return -1;
- }
-
- return 0;
-}
-
-#if 0
-int msc_queue_write_with_ping(struct bsc_msc_connection *conn,
- struct msgb *msg, int proto)
-{
- struct bsc_msc_data *data;
- uint8_t val;
-
- /* prepend the header */
- ipa_prepend_header(msg, proto);
- if (osmo_wqueue_enqueue(&conn->write_queue, msg) != 0) {
- LOGP(DMSC, LOGL_FATAL, "Failed to queue IPA/%d\n", proto);
- msgb_free(msg);
- return -1;
- }
-
- /* add the ping as the other message */
- val = IPAC_MSGT_PING;
- msgb_l16tv_put(msg, 1, IPAC_PROTO_IPACCESS, &val);
-
- data = (struct bsc_msc_data *) conn->write_queue.bfd.data;
- schedule_ping_pong(data);
- return 0;
-}
-
-static int msc_alink_do_write(struct osmo_fd *fd, struct msgb *msg)
-{
- int ret;
-
- LOGP(DMSC, LOGL_DEBUG, "Sending SCCP to MSC: %u\n", msgb_l2len(msg));
- LOGP(DLMI, LOGL_DEBUG, "MSC TX %s\n", osmo_hexdump(msg->data, msg->len));
-
- ret = write(fd->fd, msg->data, msg->len);
- if (ret < msg->len)
- perror("MSC: Failed to send SCCP");
-
- return ret;
-}
-
-static void handle_ctrl(struct bsc_msc_data *msc, struct msgb *msg)
-{
- int ret;
- struct ctrl_cmd *cmd;
-
- cmd = ctrl_cmd_parse(msc->msc_con, msg);
- if (!cmd) {
- LOGP(DMSC, LOGL_ERROR, "Failed to parse control message.\n");
- cmd = talloc_zero(msc->msc_con, struct ctrl_cmd);
- if (!cmd) {
- LOGP(DMSC, LOGL_ERROR, "OOM!\n");
- return;
- }
- cmd->type = CTRL_TYPE_ERROR;
- cmd->id = "err";
- cmd->reply = "Failed to parse control message.";
-
- ctrl_cmd_send(&msc->msc_con->write_queue, cmd);
- talloc_free(cmd);
-
- return;
- }
-
- ret = ctrl_cmd_handle(msc->network->ctrl, cmd, msc->network);
- if (ret != CTRL_CMD_HANDLED)
- ctrl_cmd_send(&msc->msc_con->write_queue, cmd);
- talloc_free(cmd);
-}
-
-static void osmo_ext_handle(struct bsc_msc_data *msc, struct msgb *msg)
-{
- struct ipaccess_head *hh;
- struct ipaccess_head_ext *hh_ext;
-
- hh = (struct ipaccess_head *) msg->data;
- hh_ext = (struct ipaccess_head_ext *) hh->data;
- if (msg->len < sizeof(*hh) + sizeof(*hh_ext)) {
- LOGP(DMSC, LOGL_ERROR, "Packet too short for extended header.\n");
- return;
- }
-
- msg->l2h = hh_ext->data;
- if (hh_ext->proto == IPAC_PROTO_EXT_MGCP)
- mgcp_forward(msc, msg);
- else if (hh_ext->proto == IPAC_PROTO_EXT_LAC)
- send_lacs(msc->network, msc->msc_con);
- else if (hh_ext->proto == IPAC_PROTO_EXT_CTRL)
- handle_ctrl(msc, msg);
-}
-
-static int ipaccess_a_fd_cb(struct osmo_fd *bfd)
-{
- struct msgb *msg = NULL;
- struct ipaccess_head *hh;
- struct bsc_msc_data *data = (struct bsc_msc_data *) bfd->data;
- int ret;
-
- ret = ipa_msg_recv_buffered(bfd->fd, &msg, &data->msc_con->pending_msg);
- if (ret <= 0) {
- if (ret == -EAGAIN)
- return 0;
- if (ret == 0) {
- LOGP(DMSC, LOGL_ERROR, "The connection to the MSC was lost.\n");
- bsc_msc_lost(data->msc_con);
- return -1;
- }
-
- LOGP(DMSC, LOGL_ERROR, "Failed to parse ip access message: %d\n", ret);
- return -1;
- }
-
- LOGP(DLMI, LOGL_DEBUG, "From MSC: %s proto: %d\n", osmo_hexdump(msg->data, msg->len), msg->l2h[0]);
-
- /* handle base message handling */
- hh = (struct ipaccess_head *) msg->data;
-
- /* initialize the networking. This includes sending a GSM08.08 message */
- msg->cb[0] = (unsigned long) data;
- if (hh->proto == IPAC_PROTO_IPACCESS) {
- ipa_ccm_rcvmsg_base(msg, bfd);
- if (msg->l2h[0] == IPAC_MSGT_ID_ACK)
- initialize_if_needed(data->msc_con);
- else if (msg->l2h[0] == IPAC_MSGT_ID_GET) {
- send_id_get_response(data, bfd->fd, msg);
- } else if (msg->l2h[0] == IPAC_MSGT_PONG) {
- osmo_timer_del(&data->pong_timer);
- }
- } else if (hh->proto == IPAC_PROTO_SCCP) {
- sccp_system_incoming_ctx(msg, data->msc_con);
- } else if (hh->proto == IPAC_PROTO_MGCP_OLD) {
- mgcp_forward(data, msg);
- } else if (hh->proto == IPAC_PROTO_OSMO) {
- osmo_ext_handle(data, msg);
- }
-
- msgb_free(msg);
- return 0;
-}
-
-static void send_ping(struct bsc_msc_data *data)
-{
- struct msgb *msg;
-
- msg = msgb_alloc_headroom(4096, 128, "ping");
- if (!msg) {
- LOGP(DMSC, LOGL_ERROR, "Failed to create PING.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, 1);
- msg->l2h[0] = IPAC_MSGT_PING;
-
- msc_queue_write(data->msc_con, msg, IPAC_PROTO_IPACCESS);
-}
-
-static void schedule_ping_pong(struct bsc_msc_data *data)
-{
- /* send another ping in 20 seconds */
- osmo_timer_schedule(&data->ping_timer, data->ping_timeout, 0);
-
- /* also start a pong timer */
- osmo_timer_schedule(&data->pong_timer, data->pong_timeout, 0);
-}
-
-static void msc_ping_timeout_cb(void *_data)
-{
- struct bsc_msc_data *data = (struct bsc_msc_data *) _data;
- if (data->ping_timeout <= 0)
- return;
-
- send_ping(data);
- schedule_ping_pong(data);
-}
-
-static void msc_pong_timeout_cb(void *_data)
-{
-// struct bsc_msc_data *data = (struct bsc_msc_data *) _data;
-
- LOGP(DMSC, LOGL_ERROR, "MSC didn't answer PING. Closing connection.\n");
-// bsc_msc_lost(data->msc_con);
-}
-
-static void msc_connection_connected(struct bsc_msc_connection *con)
-{
- struct msc_signal_data sig;
- struct bsc_msc_data *data;
- int ret, on;
- on = 1;
-// ret = setsockopt(con->write_queue.bfd.fd, IPPROTO_TCP, TCP_NODELAY, &on, sizeof(on));
-// if (ret != 0)
-// LOGP(DMSC, LOGL_ERROR, "Failed to set TCP_NODELAY: %s\n", strerror(errno));
-
-// data = (struct bsc_msc_data *) con->write_queue.bfd.data;
-// msc_ping_timeout_cb(data);
-
- sig.data = data;
- osmo_signal_dispatch(SS_MSC, S_MSC_CONNECTED, &sig);
-}
-
-/*
- * The connection to the MSC was lost and we will need to free all
- * resources and then attempt to reconnect.
- */
-static void msc_connection_was_lost(struct bsc_msc_connection *msc)
-{
-// struct msc_signal_data sig;
-// struct bsc_msc_data *data;
-
- LOGP(DMSC, LOGL_ERROR, "Lost MSC connection. Freing stuff.\n");
-
-// data = (struct bsc_msc_data *) msc->write_queue.bfd.data;
-// osmo_timer_del(&data->ping_timer);
-// osmo_timer_del(&data->pong_timer);
-//
-// sig.data = data;
-// osmo_signal_dispatch(SS_MSC, S_MSC_LOST, &sig);
-
- msc->is_authenticated = 0;
-// bsc_msc_schedule_connect(msc);
-}
-
-static void send_lacs(struct gsm_network *net, struct bsc_msc_connection *conn)
-{
- struct ipac_ext_lac_cmd *lac;
- struct gsm_bts *bts;
- struct msgb *msg;
- int lacs = 0;
-
- if (llist_empty(&net->bts_list)) {
- LOGP(DMSC, LOGL_ERROR, "No BTSs configured. Not sending LACs.\n");
- return;
- }
-
- msg = msgb_alloc_headroom(4096, 128, "LAC Command");
- if (!msg) {
- LOGP(DMSC, LOGL_ERROR, "Failed to create the LAC command.\n");
- return;
- }
-
- lac = (struct ipac_ext_lac_cmd *) msgb_put(msg, sizeof(*lac));
- lac->add_remove = 1;
-
- llist_for_each_entry(bts, &net->bts_list, list) {
- if (lacs++ == 0)
- lac->lac = htons(bts->location_area_code);
- else
- msgb_put_u16(msg, htons(bts->location_area_code));
- }
-
- lac->nr_extra_lacs = lacs - 1;
- ipa_prepend_header_ext(msg, IPAC_PROTO_EXT_LAC);
- msc_queue_write(conn, msg, IPAC_PROTO_OSMO);
-}
-
-static void initialize_if_needed(struct bsc_msc_connection *conn)
-{
- struct msgb *msg;
-
- if (!conn->is_authenticated) {
- /* send a gsm 08.08 reset message from here */
- msg = gsm0808_create_reset();
- if (!msg) {
- LOGP(DMSC, LOGL_ERROR, "Failed to create the reset message.\n");
- return;
- }
-
- sccp_write(msg, &sccp_ssn_bssap, &sccp_ssn_bssap, 0, conn);
- msgb_free(msg);
- conn->is_authenticated = 1;
- }
-}
-
-static int answer_challenge(struct bsc_msc_data *data, struct msgb *inp, struct osmo_auth_vector *vec)
-{
- int ret;
- struct tlv_parsed tvp;
- const uint8_t *mrand;
- uint8_t mrand_len;
- struct osmo_sub_auth_data auth = {
- .type = OSMO_AUTH_TYPE_GSM,
- .algo = OSMO_AUTH_ALG_MILENAGE,
- };
-
- ret = ipa_ccm_idtag_parse_off(&tvp,
- inp->l2h + 1,
- msgb_l2len(inp) - 1, 1);
- if (ret < 0) {
- LOGP(DMSC, LOGL_ERROR, "ignoring IPA response "
- "message with malformed TLVs: %s\n", osmo_hexdump(inp->l2h + 1,
- msgb_l2len(inp) - 1));
- return 0;
- }
-
- mrand = TLVP_VAL(&tvp, 0x23);
- mrand_len = TLVP_LEN(&tvp, 0x23);
- if (mrand_len != 16) {
- LOGP(DMSC, LOGL_ERROR,
- "RAND is not 16 bytes. Was %d\n",
- mrand_len);
- return 0;
- }
-
- /* copy the key */
- memcpy(auth.u.umts.opc, data->bsc_key, 16);
- memcpy(auth.u.umts.k, data->bsc_key, 16);
- memset(auth.u.umts.amf, 0, 2);
- auth.u.umts.sqn = 0;
-
- /* generate the result */
- memset(vec, 0, sizeof(*vec));
- osmo_auth_gen_vec(vec, &auth, mrand);
- return 1;
-}
-
-
-static void send_id_get_response(struct bsc_msc_data *data, int fd, struct msgb *inp)
-{
- struct msc_signal_data sig;
- struct msgb *msg;
- struct osmo_auth_vector vec;
- int valid = 0;
-
- if (data->bsc_key_present)
- valid = answer_challenge(data, inp, &vec);
-
- msg = bsc_msc_id_get_resp(valid, data->bsc_token,
- vec.res, valid ? vec.res_len : 0);
- if (!msg)
- return;
- msc_queue_write(data->msc_con, msg, IPAC_PROTO_IPACCESS);
-
- sig.data = data;
- osmo_signal_dispatch(SS_MSC, S_MSC_AUTHENTICATED, &sig);
-}
-
-#endif
-
-int osmo_bsc_msc_init(struct bsc_msc_data *data)
-{
- if (mgcp_create_port(data) != 0)
- return -1;
-
- data->msc_con = bsc_msc_create(data, &data->dests);
- if (!data->msc_con) {
- LOGP(DMSC, LOGL_ERROR, "Creating the MSC network connection failed.\n");
- return -1;
- }
-
-// osmo_timer_setup(&data->ping_timer, msc_ping_timeout_cb, data);
-// osmo_timer_setup(&data->pong_timer, msc_pong_timeout_cb, data);
-
- data->msc_con->write_queue.bfd.data = data;
-// data->msc_con->connection_loss = msc_connection_was_lost;
-// data->msc_con->connected = msc_connection_connected;
-// data->msc_con->write_queue.read_cb = ipaccess_a_fd_cb;
-// data->msc_con->write_queue.write_cb = msc_alink_do_write;
-// bsc_msc_connect(data->msc_con);
-
- data->msc_con->is_connected = 1;
- data->msc_con->is_authenticated = 1;
-
-
- return 0;
-}
-
-
-struct bsc_msc_data *osmo_msc_data_find(struct gsm_network *net, int nr)
-{
- struct bsc_msc_data *msc_data;
-
- llist_for_each_entry(msc_data, &net->bsc_data->mscs, entry)
- if (msc_data->nr == nr)
- return msc_data;
- return NULL;
-}
-
-struct bsc_msc_data *osmo_msc_data_alloc(struct gsm_network *net, int nr)
-{
- struct bsc_msc_data *msc_data;
-
- /* check if there is already one */
- msc_data = osmo_msc_data_find(net, nr);
- if (msc_data)
- return msc_data;
-
- msc_data = talloc_zero(net, struct bsc_msc_data);
- if (!msc_data)
- return NULL;
-
- llist_add_tail(&msc_data->entry, &net->bsc_data->mscs);
-
- /* Init back pointer */
- msc_data->network = net;
-
- INIT_LLIST_HEAD(&msc_data->dests);
- msc_data->ping_timeout = 20;
- msc_data->pong_timeout = 5;
- msc_data->core_mnc = -1;
- msc_data->core_mcc = -1;
- msc_data->core_ci = -1;
- msc_data->core_lac = -1;
- msc_data->rtp_base = 4000;
-
- msc_data->nr = nr;
- msc_data->allow_emerg = 1;
-
- /* Defaults for the audio setup */
- msc_data->amr_conf.m5_90 = 1;
-
- return msc_data;
-}
-
diff --git a/src/osmo-bsc/osmo_bsc_reset.c b/src/osmo-bsc/osmo_bsc_reset.c
deleted file mode 100644
index 0baf08089..000000000
--- a/src/osmo-bsc/osmo_bsc_reset.c
+++ /dev/null
@@ -1,190 +0,0 @@
-/* (C) 2017 by sysmocom s.f.m.c. GmbH
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/logging.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/timer.h>
-#include <osmocom/core/fsm.h>
-#include <unistd.h>
-#include <errno.h>
-#include <string.h>
-#include <openbsc/debug.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-
-#define RESET_RESEND_INTERVAL 2 /* sec */
-#define RESET_RESEND_TIMER_NO 1234 /* FIXME: dig out the real timer number */
-#define BAD_CONNECTION_THRESOLD 3 /* connection failures */
-
-enum fsm_states {
- ST_DISC, /* Disconnected from MSC */
- ST_CONN, /* We have a confirmed connection to the MSC */
-};
-
-static const struct value_string fsm_state_names[] = {
- {ST_DISC, "ST_DISC (disconnected)"},
- {ST_CONN, "ST_CONN (connected)"},
- {0, NULL},
-};
-
-enum fsm_evt {
- EV_RESET_ACK, /* got reset acknowlegement from the MSC */
- EV_N_DISCONNECT, /* lost a connection */
- EV_N_CONNECT, /* made a successful connection */
-};
-
-static const struct value_string fsm_evt_names[] = {
- {EV_RESET_ACK, "EV_RESET_ACK"},
- {EV_N_DISCONNECT, "EV_N_DISCONNECT"},
- {EV_N_CONNECT, "EV_N_CONNECT"},
- {0, NULL},
-};
-
-/* Disconnected state */
-static void fsm_disc_cb(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct bsc_msc_data *msc = (struct bsc_msc_data *)data;
-
- LOGP(DMSC, LOGL_NOTICE, "fsm-state (msc-reset): %s, fsm-event: %s, MSC No.: %i\n",
- get_value_string(fsm_state_names, ST_DISC), get_value_string(fsm_evt_names, event), msc->nr);
- msc->msc_con->msc_conn_loss_count = 0;
- osmo_fsm_inst_state_chg(fi, ST_CONN, 0, 0);
-}
-
-/* Connected state */
-static void fsm_conn_cb(struct osmo_fsm_inst *fi, uint32_t event, void *data)
-{
- struct bsc_msc_data *msc = (struct bsc_msc_data *)data;
-
- LOGP(DMSC, LOGL_NOTICE, "fsm-state (msc-reset): %s, fsm-event: %s, MSC No.: %i\n",
- get_value_string(fsm_state_names, ST_CONN), get_value_string(fsm_evt_names, event), msc->nr);
-
- OSMO_ASSERT(msc);
-
- switch (event) {
- case EV_N_DISCONNECT:
- if (msc->msc_con->msc_conn_loss_count >= BAD_CONNECTION_THRESOLD) {
- LOGP(DMSC, LOGL_NOTICE, "SIGTRAN connection to MSC No.: %i down, reconnecting...\n", msc->nr);
- osmo_fsm_inst_state_chg(fi, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
- } else
- msc->msc_con->msc_conn_loss_count++;
- break;
- case EV_N_CONNECT:
- msc->msc_con->msc_conn_loss_count = 0;
- break;
- }
-}
-
-/* Timer callback to retransmit the reset signal */
-static int fsm_reset_ack_timeout_cb(struct osmo_fsm_inst *fi)
-{
- struct bsc_msc_data *msc = (struct bsc_msc_data *)fi->priv;
-
- LOGP(DMSC, LOGL_NOTICE, "reset-ack timeout (T%i) in state %s, MSC No.: %i, resending...\n", fi->T,
- get_value_string(fsm_state_names, fi->state), msc->nr);
-
- osmo_bsc_sigtran_reset(msc);
- osmo_bsc_sigtran_tx_reset(msc);
-
- osmo_fsm_inst_state_chg(fi, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
- return 0;
-}
-
-static struct osmo_fsm_state fsm_states[] = {
- [ST_DISC] = {
- .in_event_mask = (1 << EV_RESET_ACK),
- .out_state_mask = (1 << ST_DISC) | (1 << ST_CONN),
- .name = "DISC",
- .action = fsm_disc_cb,
- },
- [ST_CONN] = {
- .in_event_mask = (1 << EV_N_DISCONNECT) | (1 << EV_N_CONNECT),
- .out_state_mask = (1 << ST_DISC) | (1 << ST_CONN),
- .name = "CONN",
- .action = fsm_conn_cb,
- },
-};
-
-/* State machine definition */
-static struct osmo_fsm fsm = {
- .name = "FSM RESET",
- .states = fsm_states,
- .num_states = ARRAY_SIZE(fsm_states),
- .log_subsys = DMSC,
- .timer_cb = fsm_reset_ack_timeout_cb,
-};
-
-/* Create and start state machine which handles the reset/reset-ack procedure */
-void start_reset_fsm(struct bsc_msc_data *msc)
-{
- OSMO_ASSERT(msc);
- OSMO_ASSERT(msc->msc_con);
-
- osmo_fsm_register(&fsm);
- msc->msc_con->fsm_reset = osmo_fsm_inst_alloc(&fsm, NULL, NULL, LOGL_DEBUG, "FSM RESET INST");
- OSMO_ASSERT(msc->msc_con->fsm_reset);
-
- msc->msc_con->fsm_reset->priv = msc;
-
- /* kick off reset-ack sending mechanism */
- osmo_fsm_inst_state_chg(msc->msc_con->fsm_reset, ST_DISC, RESET_RESEND_INTERVAL, RESET_RESEND_TIMER_NO);
-}
-
-/* Confirm that we sucessfully received a reset acknowlege message */
-void reset_ack_confirm(struct bsc_msc_data *msc)
-{
- OSMO_ASSERT(msc);
- OSMO_ASSERT(msc->msc_con);
- OSMO_ASSERT(msc->msc_con->fsm_reset);
-
- osmo_fsm_inst_dispatch(msc->msc_con->fsm_reset, EV_RESET_ACK, msc);
-}
-
-/* Report a failed connection */
-void report_conn_fail(struct bsc_msc_data *msc)
-{
- OSMO_ASSERT(msc);
- OSMO_ASSERT(msc->msc_con);
- OSMO_ASSERT(msc->msc_con->fsm_reset);
-
- osmo_fsm_inst_dispatch(msc->msc_con->fsm_reset, EV_N_DISCONNECT, msc);
-}
-
-/* Report a successful connection */
-void report_conn_success(struct bsc_msc_data *msc)
-{
- OSMO_ASSERT(msc);
- OSMO_ASSERT(msc->msc_con);
- OSMO_ASSERT(msc->msc_con->fsm_reset);
-
- osmo_fsm_inst_dispatch(msc->msc_con->fsm_reset, EV_N_CONNECT, msc);
-}
-
-/* Check if we have a connection to a specified msc */
-bool sccp_conn_ready(struct bsc_msc_data *msc)
-{
- OSMO_ASSERT(msc);
- OSMO_ASSERT(msc->msc_con);
- OSMO_ASSERT(msc->msc_con->fsm_reset);
- if (msc->msc_con->fsm_reset->state == ST_CONN)
- return true;
-
- return false;
-}
diff --git a/src/osmo-bsc/osmo_bsc_sigtran.c b/src/osmo-bsc/osmo_bsc_sigtran.c
deleted file mode 100644
index 0f6ca334f..000000000
--- a/src/osmo-bsc/osmo_bsc_sigtran.c
+++ /dev/null
@@ -1,561 +0,0 @@
-/* (C) 2017 by sysmocom s.f.m.c. GmbH
- * All Rights Reserved
- *
- * Author: Philipp Maier
- *
- * 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/>.
- *
- */
-
-#include <osmocom/core/utils.h>
-#include <osmocom/core/logging.h>
-#include <osmocom/sigtran/osmo_ss7.h>
-#include <osmocom/sigtran/sccp_sap.h>
-#include <osmocom/sccp/sccp_types.h>
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/core/msgb.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/osmo_bsc_grace.h>
-#include <openbsc/osmo_bsc_sigtran.h>
-#include <openbsc/a_reset.h>
-#include <openbsc/gsm_04_80.h>
-
-/* A pointer to a list with all involved MSCs
- * (a copy of the pointer location submitted with osmo_bsc_sigtran_init() */
-static struct llist_head *msc_list;
-
-#define RESET_INTERVAL 1 /* sek */
-#define SCCP_MSG_MAXSIZE 1024
-#define CS7_POINTCODE_DEFAULT_OFFSET 2
-
-/* Internal list with connections we currently maintain. This
- * list is of type struct osmo_bsc_sccp_con */
-static LLIST_HEAD(active_connections);
-
-/* The SCCP stack will not assign connection IDs to us automatically, we
- * will do this ourselves using a counter variable, that counts one up
- * for every new connection */
-static uint32_t conn_id_counter;
-
-/* Helper function to Check if the given connection id is already assigned */
-static struct osmo_bsc_sccp_con *get_bsc_conn_by_conn_id(int conn_id)
-{
- conn_id &= 0xFFFFFF;
- struct osmo_bsc_sccp_con *bsc_con;
-
- llist_for_each_entry(bsc_con, &active_connections, entry) {
- if (bsc_con->conn_id == conn_id)
- return bsc_con;
- }
-
- return NULL;
-}
-
-/* Pick a free connection id */
-static int pick_free_conn_id(const struct bsc_msc_data *msc)
-{
- int conn_id = conn_id_counter;
- int i;
-
- for (i = 0; i < 0xFFFFFF; i++) {
- conn_id++;
- conn_id &= 0xFFFFFF;
- if (get_bsc_conn_by_conn_id(conn_id) == false) {
- conn_id_counter = conn_id;
- return conn_id;
- }
- }
-
- return -1;
-}
-
-/* Send reset to MSC */
-static void osmo_bsc_sigtran_tx_reset(const struct bsc_msc_data *msc)
-{
- struct osmo_ss7_instance *ss7;
- struct msgb *msg;
-
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Sending RESET to MSC: %s\n", osmo_sccp_addr_name(ss7, &msc->a.msc_addr));
- msg = gsm0808_create_reset();
- osmo_sccp_tx_unitdata_msg(msc->a.sccp_user, &msc->a.bsc_addr,
- &msc->a.msc_addr, msg);
-}
-
-/* Send reset-ack to MSC */
-void osmo_bsc_sigtran_tx_reset_ack(const struct bsc_msc_data *msc)
-{
- struct osmo_ss7_instance *ss7;
- struct msgb *msg;
- OSMO_ASSERT(msc);
-
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Sending RESET ACK to MSC: %s\n", osmo_sccp_addr_name(ss7, &msc->a.msc_addr));
- msg = gsm0808_create_reset_ack();
- osmo_sccp_tx_unitdata_msg(msc->a.sccp_user, &msc->a.bsc_addr,
- &msc->a.msc_addr, msg);
-}
-
-/* Find an MSC by its sigtran point code */
-static struct bsc_msc_data *get_msc_by_addr(const struct osmo_sccp_addr *msc_addr)
-{
- struct osmo_ss7_instance *ss7;
- struct bsc_msc_data *msc;
- llist_for_each_entry(msc, msc_list, entry) {
- if (memcmp(msc_addr, &msc->a.msc_addr, sizeof(*msc_addr)) == 0)
- return msc;
- }
-
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_ERROR, "Unable to find MSC data under address: %s\n", osmo_sccp_addr_name(ss7, msc_addr));
- return NULL;
-}
-
-/* Send data to MSC, use the connection id which MSC it is */
-static int handle_data_from_msc(int conn_id, struct msgb *msg)
-{
- struct osmo_bsc_sccp_con *bsc_con = get_bsc_conn_by_conn_id(conn_id);
- int rc = -EINVAL;
-
- if (bsc_con) {
- msg->l3h = msgb_l2(msg);
- rc = bsc_handle_dt(bsc_con, msg, msgb_l2len(msg));
- } else
- LOGP(DMSC, LOGL_NOTICE, "incoming data from unknown connection id: %i\n", conn_id);
-
- return rc;
-}
-
-/* Sent unitdata to MSC, use the point code to determine which MSC it is */
-static int handle_unitdata_from_msc(const struct osmo_sccp_addr *msc_addr, struct msgb *msg,
- const struct osmo_sccp_user *scu)
-{
- struct osmo_ss7_instance *ss7;
- struct bsc_msc_data *msc = get_msc_by_addr(msc_addr);
- int rc = -EINVAL;
-
- if (msc) {
- msg->l3h = msgb_l2(msg);
- rc = bsc_handle_udt(msc, msg, msgb_l2len(msg));
- } else {
- ss7 = osmo_sccp_get_ss7(osmo_sccp_get_sccp(scu));
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "incoming unitdata data from unknown remote address: %s\n",
- osmo_sccp_addr_name(ss7, msc_addr));
- }
- return rc;
-}
-
-/* Callback function, called by the SSCP stack when data arrives */
-static int sccp_sap_up(struct osmo_prim_hdr *oph, void *_scu)
-{
- struct osmo_scu_prim *scu_prim = (struct osmo_scu_prim *)oph;
- struct osmo_sccp_user *scu = _scu;
- struct osmo_bsc_sccp_con *bsc_con;
- int rc = 0;
-
- switch (OSMO_PRIM_HDR(&scu_prim->oph)) {
- case OSMO_PRIM(OSMO_SCU_PRIM_N_UNITDATA, PRIM_OP_INDICATION):
- /* Handle inbound UNITDATA */
- DEBUGP(DMSC, "N-UNITDATA.ind(%s)\n", osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
- rc = handle_unitdata_from_msc(&scu_prim->u.unitdata.calling_addr, oph->msg, scu);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_CONNECT, PRIM_OP_INDICATION):
- /* Handle (Reject) inbound connections */
- DEBUGP(DMSC, "N-CONNECT.ind(X->%u)\n", scu_prim->u.connect.conn_id);
- LOGP(DMSC, LOGL_DEBUG, "Rejecting inbound SCCP connection...\n");
- rc = osmo_sccp_tx_disconn(scu, scu_prim->u.connect.conn_id, &scu_prim->u.connect.called_addr, 0);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_CONNECT, PRIM_OP_CONFIRM):
- /* Handle outbound connection confirmation */
- if (msgb_l2len(oph->msg) > 0) {
- DEBUGP(DMSC, "N-CONNECT.cnf(%u, %s)\n", scu_prim->u.connect.conn_id,
- osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
- rc = handle_data_from_msc(scu_prim->u.connect.conn_id, oph->msg);
- } else
- DEBUGP(DRANAP, "N-CONNECT.cnf(%u)\n", scu_prim->u.connect.conn_id);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_DATA, PRIM_OP_INDICATION):
- /* Handle incoming connection oriented data */
- DEBUGP(DMSC, "N-DATA.ind(%u, %s)\n", scu_prim->u.data.conn_id,
- osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)));
-
- /* Incoming data is a sign of a vital connection */
- bsc_con = get_bsc_conn_by_conn_id(scu_prim->u.disconnect.conn_id);
- if (bsc_con)
- a_reset_conn_success(bsc_con->msc->a.reset);
-
- rc = handle_data_from_msc(scu_prim->u.data.conn_id, oph->msg);
- break;
-
- case OSMO_PRIM(OSMO_SCU_PRIM_N_DISCONNECT, PRIM_OP_INDICATION):
- /* indication of disconnect */
- if (msgb_l2len(oph->msg) > 0) {
- DEBUGP(DMSC, "N-DISCONNECT.ind(%u, %s, cause=%i)\n", scu_prim->u.disconnect.conn_id,
- osmo_hexdump(msgb_l2(oph->msg), msgb_l2len(oph->msg)), scu_prim->u.disconnect.cause);
- handle_data_from_msc(scu_prim->u.disconnect.conn_id, oph->msg);
- } else
- DEBUGP(DRANAP, "N-DISCONNECT.ind(%u, cause=%i)\n", scu_prim->u.disconnect.conn_id,
- scu_prim->u.disconnect.cause);
-
- bsc_con = get_bsc_conn_by_conn_id(scu_prim->u.disconnect.conn_id);
- if (bsc_con) {
- /* We might have a connectivity problem. Maybe we need to go
- * through the reset procedure again? */
- if (scu_prim->u.disconnect.cause == 0)
- a_reset_conn_fail(bsc_con->msc->a.reset);
-
- rc = osmo_bsc_sigtran_del_conn(bsc_con);
- }
- break;
-
- default:
- LOGP(DMSC, LOGL_ERROR, "Unhandled SIGTRAN primitive: %u:%u\n", oph->primitive, oph->operation);
- break;
- }
-
- msgb_free(oph->msg);
- return rc;
-}
-
-/* Allocate resources to make a new connection oriented sigtran connection
- * (not the connection ittself!) */
-enum bsc_con osmo_bsc_sigtran_new_conn(struct gsm_subscriber_connection *conn, struct bsc_msc_data *msc)
-{
- struct osmo_ss7_instance *ss7;
- struct osmo_bsc_sccp_con *bsc_con;
- int conn_id;
-
- OSMO_ASSERT(conn);
- OSMO_ASSERT(msc);
-
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Initializing resources for new SIGTRAN connection to MSC: %s...\n",
- osmo_sccp_addr_name(ss7, &msc->a.msc_addr));
-
- if (a_reset_conn_ready(msc->a.reset) == false) {
- LOGP(DMSC, LOGL_ERROR, "MSC is not connected. Dropping.\n");
- return BSC_CON_REJECT_NO_LINK;
- }
-
- if (!bsc_grace_allow_new_connection(conn->bts->network, conn->bts)) {
- LOGP(DMSC, LOGL_NOTICE, "BSC in grace period. No new connections.\n");
- return BSC_CON_REJECT_RF_GRACE;
- }
-
- bsc_con = talloc_zero(conn->bts, struct osmo_bsc_sccp_con);
- if (!bsc_con) {
- LOGP(DMSC, LOGL_ERROR, "Failed to allocate new SIGTRAN connection.\n");
- return BSC_CON_NO_MEM;
- }
-
- bsc_con->msc = msc;
- bsc_con->conn = conn;
- llist_add_tail(&bsc_con->entry, &active_connections);
- conn->sccp_con = bsc_con;
-
- /* Pick a free connection id */
- conn_id = pick_free_conn_id(msc);
- if (conn_id < 0)
- return BSC_CON_REJECT_NO_LINK;
- bsc_con->conn_id = conn_id;
-
- LOGP(DMSC, LOGL_NOTICE, "Allocated new connection id: %i\n", conn_id);
-
- return BSC_CON_SUCCESS;
-}
-
-/* Open a new connection oriented sigtran connection */
-int osmo_bsc_sigtran_open_conn(const struct osmo_bsc_sccp_con *conn, struct msgb *msg)
-{
- struct osmo_ss7_instance *ss7;
- struct bsc_msc_data *msc;
- int conn_id;
- int rc;
-
- OSMO_ASSERT(conn);
- OSMO_ASSERT(msg);
- OSMO_ASSERT(conn->msc);
-
- msc = conn->msc;
-
- if (a_reset_conn_ready(msc->a.reset) == false) {
- LOGP(DMSC, LOGL_ERROR, "MSC is not connected. Dropping.\n");
- return -EINVAL;
- }
-
- conn_id = conn->conn_id;
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_NOTICE, "Opening new SIGTRAN connection (id=%i) to MSC: %s\n", conn_id,
- osmo_sccp_addr_name(ss7, &msc->a.msc_addr));
-
- rc = osmo_sccp_tx_conn_req_msg(msc->a.sccp_user, conn_id, &msc->a.bsc_addr,
- &msc->a.msc_addr, msg);
-
- return rc;
-}
-
-/* Send data to MSC */
-int osmo_bsc_sigtran_send(const struct osmo_bsc_sccp_con *conn, struct msgb *msg)
-{
- struct osmo_ss7_instance *ss7;
- int conn_id;
- int rc;
- struct bsc_msc_data *msc;
-
- OSMO_ASSERT(conn);
- OSMO_ASSERT(msg);
- OSMO_ASSERT(conn->msc);
-
- msc = conn->msc;
-
- if (a_reset_conn_ready(msc->a.reset) == false) {
- LOGP(DMSC, LOGL_ERROR, "MSC is not connected. Dropping.\n");
- return -EINVAL;
- }
-
- conn_id = conn->conn_id;
-
- ss7 = osmo_ss7_instance_find(msc->a.cs7_instance);
- OSMO_ASSERT(ss7);
- LOGP(DMSC, LOGL_DEBUG, "Sending connection (id=%i) oriented data to MSC: %si\n",
- conn_id, osmo_sccp_addr_name(ss7, &msc->a.msc_addr));
-
- rc = osmo_sccp_tx_data_msg(msc->a.sccp_user, conn_id, msg);
-
- return rc;
-}
-
-/* Delete a connection from the list with open connections
- * (called by osmo_bsc_api.c on failing open connections and
- * locally, when a connection is closed by the MSC */
-int osmo_bsc_sigtran_del_conn(struct osmo_bsc_sccp_con *conn)
-{
- if (!conn)
- return 0;
-
- if (conn->conn) {
- LOGP(DMSC, LOGL_ERROR,
- "sccp connection (id=%i) not cleared (gsm subscriber connection still active) -- forcefully clearing it now!\n",
- conn->conn_id);
- bsc_subscr_con_free(conn->conn);
- conn->conn = NULL;
-
- /* This bahaviour might be caused by a bad connection. Maybe we
- * will have to go through the reset procedure again */
- a_reset_conn_fail(conn->msc->a.reset);
- }
-
- llist_del(&conn->entry);
- talloc_free(conn);
-
- return 0;
-}
-
-/* Send an USSD notification in case we loose the connection to the MSC */
-static void bsc_notify_msc_lost(const struct osmo_bsc_sccp_con *conn)
-{
- struct gsm_subscriber_connection *subscr_conn;
-
- /* Check if sccp conn is still present */
- if (!conn)
- return;
- subscr_conn = conn->conn;
-
- /* send USSD notification if string configured and conn->data is set */
- if (!subscr_conn)
- return;
-
- /* check for config string */
- if (!conn->msc->ussd_msc_lost_txt)
- return;
- if (conn->msc->ussd_msc_lost_txt[0] == '\0')
- return;
-
- /* send USSD notification */
- bsc_send_ussd_notify(subscr_conn, 1, subscr_conn->sccp_con->msc->ussd_msc_lost_txt);
- bsc_send_ussd_release_complete(subscr_conn);
-}
-
-/* Close all open sigtran connections and channels */
-void osmo_bsc_sigtran_reset(const struct bsc_msc_data *msc)
-{
- struct osmo_bsc_sccp_con *conn;
- struct osmo_bsc_sccp_con *conn_temp;
- OSMO_ASSERT(msc);
-
- /* Close all open connections */
- llist_for_each_entry_safe(conn, conn_temp, &active_connections, entry) {
-
- /* We only may close connections which actually belong to this
- * MSC. All other open connections are left untouched */
- if (conn->msc == msc) {
- /* Notify active connection users via USSD that the MSC is down */
- bsc_notify_msc_lost(conn);
-
- /* Take down all occopied RF channels */
- if (conn->conn)
- gsm0808_clear(conn->conn);
-
- /* Disconnect all Sigtran connections */
- osmo_sccp_tx_disconn(msc->a.sccp_user, conn->conn_id, &msc->a.bsc_addr, 0);
-
- /* Delete subscriber connection */
- osmo_bsc_sigtran_del_conn(conn);
- }
- }
-}
-
-/* Callback function: Close all open connections */
-static void osmo_bsc_sigtran_reset_cb(const void *priv)
-{
- struct bsc_msc_data *msc = (struct bsc_msc_data*) priv;
-
- /* Shut down all ongoing traffic */
- osmo_bsc_sigtran_reset(msc);
-
- /* Send reset to MSC */
- osmo_bsc_sigtran_tx_reset(msc);
-}
-
-/* Default point-code to be used as local address (BSC) */
-#define BSC_DEFAULT_PC "0.23.3"
-
-/* Default point-code to be used as remote address (MSC) */
-#define MSC_DEFAULT_PC "0.23.1"
-
-/* Initalize osmo sigtran backhaul */
-int osmo_bsc_sigtran_init(struct llist_head *mscs)
-{
- bool free_attempt_used = false;
- bool fail_on_next_invalid_cfg = false;
-
- struct bsc_msc_data *msc;
- char msc_name[32];
- uint32_t default_pc;
-
- OSMO_ASSERT(mscs);
- msc_list = mscs;
-
- llist_for_each_entry(msc, msc_list, entry) {
- snprintf(msc_name, sizeof(msc_name), "msc-%u", msc->nr);
- LOGP(DMSC, LOGL_NOTICE, "Initializing SCCP connection to MSC %s\n", msc_name);
-
- /* Check if the VTY could determine a valid CS7 instance,
- * use safe default in case none is set */
- if (msc->a.cs7_instance_valid == false) {
- msc->a.cs7_instance = 0;
- if (fail_on_next_invalid_cfg)
- goto fail_auto_cofiguration;
- free_attempt_used = true;
- }
- LOGP(DMSC, LOGL_NOTICE, "CS7 Instance identifier, A-Interface: %u\n", msc->a.cs7_instance);
-
- /* Pre-Check if there is an ss7 instance present */
- if (osmo_ss7_instance_find(msc->a.cs7_instance) == NULL) {
- if (fail_on_next_invalid_cfg)
- goto fail_auto_cofiguration;
- free_attempt_used = true;
- }
-
- /* SS7 Protocol stack */
- default_pc = osmo_ss7_pointcode_parse(NULL, BSC_DEFAULT_PC);
- msc->a.sccp =
- osmo_sccp_simple_client_on_ss7_id(msc, msc->a.cs7_instance, msc_name, default_pc,
- OSMO_SS7_ASP_PROT_M3UA, 0, NULL, 0, NULL);
- if (!msc->a.sccp)
- return -EINVAL;
-
- /* Check if the sccp-address fullfills minimum requirements (SSN+PC is present,
- * automatically recover addresses if the addresses are not set up properly) */
- if (!osmo_sccp_check_addr(&msc->a.bsc_addr, OSMO_SCCP_ADDR_T_SSN | OSMO_SCCP_ADDR_T_PC)) {
- if (fail_on_next_invalid_cfg)
- goto fail_auto_cofiguration;
- free_attempt_used = true;
-
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: invalid or missing local (BSC) SCCP address (a.bsc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.bsc_addr));
- osmo_sccp_local_addr_by_instance(&msc->a.bsc_addr, msc->a.sccp, SCCP_SSN_BSSAP);
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: using automatically generated local (BSC) SCCP address (a.bsc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.bsc_addr));
- } else {
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: using local (BSC) automatically SCCP address (a.msc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.bsc_addr));
- }
-
- if (!osmo_sccp_check_addr(&msc->a.msc_addr, OSMO_SCCP_ADDR_T_SSN | OSMO_SCCP_ADDR_T_PC)) {
- if (fail_on_next_invalid_cfg)
- goto fail_auto_cofiguration;
- free_attempt_used = true;
-
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: invalid or missing remote (MSC) SCCP address for the MSC (a.msc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.msc_addr));
- osmo_sccp_local_addr_by_instance(&msc->a.msc_addr, msc->a.sccp, SCCP_SSN_BSSAP);
- msc->a.msc_addr.pc = osmo_ss7_pointcode_parse(NULL, MSC_DEFAULT_PC);
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: using automatically generated remote (MSC) SCCP address (a.msc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.msc_addr));
- free_attempt_used = true;
- } else {
- LOGP(DMSC, LOGL_NOTICE,
- "A-interface: using remote (MSC) automatically SCCP address (a.msc_addr=%s)\n",
- osmo_sccp_addr_name(osmo_ss7_instance_find(msc->a.cs7_instance), &msc->a.msc_addr));
- }
-
- /* Bind SCCP user */
- msc->a.sccp_user = osmo_sccp_user_bind(msc->a.sccp, msc_name, sccp_sap_up, msc->a.bsc_addr.ssn);
- if (!msc->a.sccp_user)
- return -EINVAL;
-
- /* Start MSC-Reset procedure */
- msc->a.reset = a_reset_alloc(msc, msc_name, osmo_bsc_sigtran_reset_cb, msc);
- if (!msc->a.reset)
- return -EINVAL;
-
- /* If we have detected that the SS7 configuration of the MSC we have just initalized
- * was incomplete or completely missing, we can not tolerate another incomplete
- * configuration. The reson for this is that we do only specify exactly one default
- * pointcode pair. We also specify localhost as default IP-Address. If we have wanted
- * to support multiple MSCs with automatic configuration we would be forced to invent
- * a complex ruleset how to allocate the pointcodes and respective IP-Addresses.
- * Furthermore, the situation where a single BSC is connected to multiple MSCs
- * is a very rare situation anyway. In this case we expect the user to experienced
- * enough to create a valid SS7/CS7 VTY configuration that does not lack any
- * components */
- if (free_attempt_used)
- fail_on_next_invalid_cfg = true;
- }
-
- return 0;
-
-fail_auto_cofiguration:
- LOGP(DMSC, LOGL_ERROR,
- "A-interface: More than one invalid/inclomplete configuration detected, unable to revover - check config file!\n");
- return -EINVAL;
-}
diff --git a/src/osmo-bsc/osmo_bsc_vty.c b/src/osmo-bsc/osmo_bsc_vty.c
deleted file mode 100644
index 8edcbf390..000000000
--- a/src/osmo-bsc/osmo_bsc_vty.c
+++ /dev/null
@@ -1,1039 +0,0 @@
-/* Osmo BSC VTY Configuration */
-/* (C) 2009-2015 by Holger Hans Peter Freyther
- * (C) 2009-2014 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/osmo_bsc.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/vty.h>
-#include <openbsc/bsc_subscriber.h>
-#include <openbsc/debug.h>
-#include <openbsc/bsc_msg_filter.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/sccp/sccp_types.h>
-
-#include <time.h>
-
-
-#define IPA_STR "IP.ACCESS specific\n"
-
-extern struct gsm_network *bsc_gsmnet;
-
-static struct osmo_bsc_data *osmo_bsc_data(struct vty *vty)
-{
- return bsc_gsmnet->bsc_data;
-}
-
-static struct bsc_msc_data *bsc_msc_data(struct vty *vty)
-{
- return vty->index;
-}
-
-static struct cmd_node bsc_node = {
- BSC_NODE,
- "%s(config-bsc)# ",
- 1,
-};
-
-static struct cmd_node msc_node = {
- MSC_NODE,
- "%s(config-msc)# ",
- 1,
-};
-
-DEFUN(cfg_net_msc, cfg_net_msc_cmd,
- "msc [<0-1000>]", "Configure MSC details\n" "MSC connection to configure\n")
-{
- int index = argc == 1 ? atoi(argv[0]) : 0;
- struct bsc_msc_data *msc;
-
- msc = osmo_msc_data_alloc(bsc_gsmnet, index);
- if (!msc) {
- vty_out(vty, "%%Failed to allocate MSC data.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty->index = msc;
- vty->node = MSC_NODE;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc, cfg_net_bsc_cmd,
- "bsc", "Configure BSC\n")
-{
- vty->node = BSC_NODE;
- return CMD_SUCCESS;
-}
-
-static void write_msc_amr_options(struct vty *vty, struct bsc_msc_data *msc)
-{
-#define WRITE_AMR(vty, msc, name, var) \
- vty_out(vty, " amr-config %s %s%s", \
- name, msc->amr_conf.var ? "allowed" : "forbidden", \
- VTY_NEWLINE);
-
- WRITE_AMR(vty, msc, "12_2k", m12_2);
- WRITE_AMR(vty, msc, "10_2k", m10_2);
- WRITE_AMR(vty, msc, "7_95k", m7_95);
- WRITE_AMR(vty, msc, "7_40k", m7_40);
- WRITE_AMR(vty, msc, "6_70k", m6_70);
- WRITE_AMR(vty, msc, "5_90k", m5_90);
- WRITE_AMR(vty, msc, "5_15k", m5_15);
- WRITE_AMR(vty, msc, "4_75k", m4_75);
-#undef WRITE_AMR
-}
-
-static void write_msc(struct vty *vty, struct bsc_msc_data *msc)
-{
- struct bsc_msc_dest *dest;
-
- vty_out(vty, "msc %d%s", msc->nr, VTY_NEWLINE);
- if (msc->bsc_token)
- vty_out(vty, " token %s%s", msc->bsc_token, VTY_NEWLINE);
- if (msc->bsc_key_present)
- vty_out(vty, " auth-key %s%s",
- osmo_hexdump(msc->bsc_key, sizeof(msc->bsc_key)), VTY_NEWLINE);
- if (msc->core_mnc != -1)
- vty_out(vty, " core-mobile-network-code %d%s",
- msc->core_mnc, VTY_NEWLINE);
- if (msc->core_mcc != -1)
- vty_out(vty, " core-mobile-country-code %d%s",
- msc->core_mcc, VTY_NEWLINE);
- if (msc->core_lac != -1)
- vty_out(vty, " core-location-area-code %d%s",
- msc->core_lac, VTY_NEWLINE);
- if (msc->core_ci != -1)
- vty_out(vty, " core-cell-identity %d%s",
- msc->core_ci, VTY_NEWLINE);
- vty_out(vty, " ip.access rtp-base %d%s", msc->rtp_base, VTY_NEWLINE);
-
- if (msc->ping_timeout == -1)
- vty_out(vty, " no timeout-ping%s", VTY_NEWLINE);
- else {
- vty_out(vty, " timeout-ping %d%s", msc->ping_timeout, VTY_NEWLINE);
- vty_out(vty, " timeout-pong %d%s", msc->pong_timeout, VTY_NEWLINE);
- if (msc->advanced_ping)
- vty_out(vty, " timeout-ping advanced%s", VTY_NEWLINE);
- else
- vty_out(vty, " no timeout-ping advanced%s", VTY_NEWLINE);
- }
-
- if (msc->ussd_welcome_txt)
- vty_out(vty, " bsc-welcome-text %s%s", msc->ussd_welcome_txt, VTY_NEWLINE);
- else
- vty_out(vty, " no bsc-welcome-text%s", VTY_NEWLINE);
-
- if (msc->ussd_msc_lost_txt && msc->ussd_msc_lost_txt[0])
- vty_out(vty, " bsc-msc-lost-text %s%s", msc->ussd_msc_lost_txt, VTY_NEWLINE);
- else
- vty_out(vty, " no bsc-msc-lost-text%s", VTY_NEWLINE);
-
- if (msc->ussd_grace_txt && msc->ussd_grace_txt[0])
- vty_out(vty, " bsc-grace-text %s%s", msc->ussd_grace_txt, VTY_NEWLINE);
- else
- vty_out(vty, " no bsc-grace-text%s", VTY_NEWLINE);
-
- if (msc->audio_length != 0) {
- int i;
-
- vty_out(vty, " codec-list ");
- for (i = 0; i < msc->audio_length; ++i) {
- if (i != 0)
- vty_out(vty, " ");
-
- if (msc->audio_support[i]->hr)
- vty_out(vty, "hr%.1u", msc->audio_support[i]->ver);
- else
- vty_out(vty, "fr%.1u", msc->audio_support[i]->ver);
- }
- vty_out(vty, "%s", VTY_NEWLINE);
-
- }
-
- llist_for_each_entry(dest, &msc->dests, list)
- vty_out(vty, " dest %s %d %d%s", dest->ip, dest->port,
- dest->dscp, VTY_NEWLINE);
-
- vty_out(vty, " type %s%s", msc->type == MSC_CON_TYPE_NORMAL ?
- "normal" : "local", VTY_NEWLINE);
- vty_out(vty, " allow-emergency %s%s", msc->allow_emerg ?
- "allow" : "deny", VTY_NEWLINE);
-
- if (msc->local_pref)
- vty_out(vty, " local-prefix %s%s", msc->local_pref, VTY_NEWLINE);
-
- if (msc->acc_lst_name)
- vty_out(vty, " access-list-name %s%s", msc->acc_lst_name, VTY_NEWLINE);
-
- /* write amr options */
- write_msc_amr_options(vty, msc);
-
- /* write sccp connection configuration */
- if (msc->a.bsc_addr_name) {
- vty_out(vty, " bsc-addr %s%s",
- msc->a.bsc_addr_name, VTY_NEWLINE);
- }
- if (msc->a.msc_addr_name) {
- vty_out(vty, " msc-addr %s%s",
- msc->a.msc_addr_name, VTY_NEWLINE);
- }
-}
-
-static int config_write_msc(struct vty *vty)
-{
- struct bsc_msc_data *msc;
- struct osmo_bsc_data *bsc = osmo_bsc_data(vty);
-
- llist_for_each_entry(msc, &bsc->mscs, entry)
- write_msc(vty, msc);
-
- return CMD_SUCCESS;
-}
-
-static int config_write_bsc(struct vty *vty)
-{
- struct osmo_bsc_data *bsc = osmo_bsc_data(vty);
-
- vty_out(vty, "bsc%s", VTY_NEWLINE);
- if (bsc->mid_call_txt)
- vty_out(vty, " mid-call-text %s%s", bsc->mid_call_txt, VTY_NEWLINE);
- vty_out(vty, " mid-call-timeout %d%s", bsc->mid_call_timeout, VTY_NEWLINE);
- if (bsc->rf_ctrl_name)
- vty_out(vty, " bsc-rf-socket %s%s",
- bsc->rf_ctrl_name, VTY_NEWLINE);
-
- if (bsc->auto_off_timeout != -1)
- vty_out(vty, " bsc-auto-rf-off %d%s",
- bsc->auto_off_timeout, VTY_NEWLINE);
-
- if (bsc->ussd_no_msc_txt && bsc->ussd_no_msc_txt[0])
- vty_out(vty, " missing-msc-text %s%s", bsc->ussd_no_msc_txt, VTY_NEWLINE);
- else
- vty_out(vty, " no missing-msc-text%s", VTY_NEWLINE);
- if (bsc->acc_lst_name)
- vty_out(vty, " access-list-name %s%s", bsc->acc_lst_name, VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_token,
- cfg_net_bsc_token_cmd,
- "token TOKEN",
- "A token for the BSC to be sent to the MSC\n" "A token\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- osmo_talloc_replace_string(osmo_bsc_data(vty), &data->bsc_token, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_key,
- cfg_net_bsc_key_cmd,
- "auth-key KEY",
- "Authentication (secret) key configuration\n"
- "Security key\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- osmo_hexparse(argv[0], data->bsc_key, sizeof(data->bsc_key));
- data->bsc_key_present = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_no_bsc_key, cfg_net_bsc_no_key_cmd,
- "no auth-key",
- NO_STR "Authentication (secret) key configuration\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- memset(data->bsc_key, 0, sizeof(data->bsc_key));
- data->bsc_key_present = 0;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_ncc,
- cfg_net_bsc_ncc_cmd,
- "core-mobile-network-code <1-999>",
- "Use this network code for the core network\n" "MNC value\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->core_mnc = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_mcc,
- cfg_net_bsc_mcc_cmd,
- "core-mobile-country-code <1-999>",
- "Use this country code for the core network\n" "MCC value\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->core_mcc = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_lac,
- cfg_net_bsc_lac_cmd,
- "core-location-area-code <0-65535>",
- "Use this location area code for the core network\n" "LAC value\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->core_lac = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_ci,
- cfg_net_bsc_ci_cmd,
- "core-cell-identity <0-65535>",
- "Use this cell identity for the core network\n" "CI value\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->core_ci = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_rtp_base,
- cfg_net_bsc_rtp_base_cmd,
- "ip.access rtp-base <1-65000>",
- IPA_STR
- "Set the rtp-base port for the RTP stream\n"
- "Port number\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->rtp_base = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_codec_list,
- cfg_net_bsc_codec_list_cmd,
- "codec-list .LIST",
- "Set the allowed audio codecs\n"
- "List of audio codecs, e.g. fr3 fr1 hr3\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- int saw_fr, saw_hr;
- int i;
-
- saw_fr = saw_hr = 0;
-
- /* free the old list... if it exists */
- if (data->audio_support) {
- talloc_free(data->audio_support);
- data->audio_support = NULL;
- data->audio_length = 0;
- }
-
- /* create a new array */
- data->audio_support =
- talloc_zero_array(osmo_bsc_data(vty), struct gsm_audio_support *, argc);
- data->audio_length = argc;
-
- for (i = 0; i < argc; ++i) {
- /* check for hrX or frX */
- if (strlen(argv[i]) != 3
- || argv[i][1] != 'r'
- || (argv[i][0] != 'h' && argv[i][0] != 'f')
- || argv[i][2] < 0x30
- || argv[i][2] > 0x39)
- goto error;
-
- data->audio_support[i] = talloc_zero(data->audio_support,
- struct gsm_audio_support);
- data->audio_support[i]->ver = atoi(argv[i] + 2);
-
- if (strncmp("hr", argv[i], 2) == 0) {
- data->audio_support[i]->hr = 1;
- saw_hr = 1;
- } else if (strncmp("fr", argv[i], 2) == 0) {
- data->audio_support[i]->hr = 0;
- saw_fr = 1;
- }
-
- if (saw_hr && saw_fr) {
- vty_out(vty, "Can not have full-rate and half-rate codec.%s",
- VTY_NEWLINE);
- return CMD_ERR_INCOMPLETE;
- }
- }
-
- return CMD_SUCCESS;
-
-error:
- vty_out(vty, "Codec name must be hrX or frX. Was '%s'%s",
- argv[i], VTY_NEWLINE);
- return CMD_ERR_INCOMPLETE;
-}
-
-DEFUN(cfg_net_msc_dest,
- cfg_net_msc_dest_cmd,
- "dest A.B.C.D <1-65000> <0-255>",
- "Add a destination to a MUX/MSC\n"
- "IP Address\n" "Port\n" "DSCP\n")
-{
- struct bsc_msc_dest *dest;
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- dest = talloc_zero(osmo_bsc_data(vty), struct bsc_msc_dest);
- if (!dest) {
- vty_out(vty, "%%Failed to create structure.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- dest->ip = talloc_strdup(dest, argv[0]);
- if (!dest->ip) {
- vty_out(vty, "%%Failed to copy dest ip.%s", VTY_NEWLINE);
- talloc_free(dest);
- return CMD_WARNING;
- }
-
- dest->port = atoi(argv[1]);
- dest->dscp = atoi(argv[2]);
- llist_add_tail(&dest->list, &data->dests);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_no_dest,
- cfg_net_msc_no_dest_cmd,
- "no dest A.B.C.D <1-65000> <0-255>",
- NO_STR "Remove a destination to a MUX/MSC\n"
- "IP Address\n" "Port\n" "DSCP\n")
-{
- struct bsc_msc_dest *dest, *tmp;
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- int port = atoi(argv[1]);
- int dscp = atoi(argv[2]);
-
- llist_for_each_entry_safe(dest, tmp, &data->dests, list) {
- if (port != dest->port || dscp != dest->dscp
- || strcmp(dest->ip, argv[0]) != 0)
- continue;
-
- llist_del(&dest->list);
- talloc_free(dest);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_no_ping_time,
- cfg_net_msc_no_ping_time_cmd,
- "no timeout-ping",
- NO_STR "Disable the ping/pong handling on A-link\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->ping_timeout = -1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_ping_time,
- cfg_net_msc_ping_time_cmd,
- "timeout-ping <1-2147483647>",
- "Set the PING interval, negative for not sending PING\n"
- "Timeout in seconds\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->ping_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_pong_time,
- cfg_net_msc_pong_time_cmd,
- "timeout-pong <1-2147483647>",
- "Set the time to wait for a PONG\n" "Timeout in seconds\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->pong_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_advanced_ping,
- cfg_net_msc_advanced_ping_cmd,
- "timeout-ping advanced",
- "Ping timeout handling\nEnable advanced mode during SCCP\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- if (data->ping_timeout == -1) {
- vty_out(vty, "%%ping handling is disabled. Enable it first.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- data->advanced_ping = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_no_net_msc_advanced_ping,
- cfg_no_net_msc_advanced_ping_cmd,
- "no timeout-ping advanced",
- NO_STR "Ping timeout handling\nEnable advanced mode during SCCP\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->advanced_ping = 0;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_welcome_ussd,
- cfg_net_msc_welcome_ussd_cmd,
- "bsc-welcome-text .TEXT",
- "Set the USSD notification to be sent\n" "Text to be sent\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- char *str = argv_concat(argv, argc, 0);
- if (!str)
- return CMD_WARNING;
-
- osmo_talloc_replace_string(osmo_bsc_data(vty), &data->ussd_welcome_txt, str);
- talloc_free(str);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_no_welcome_ussd,
- cfg_net_msc_no_welcome_ussd_cmd,
- "no bsc-welcome-text",
- NO_STR "Clear the USSD notification to be sent\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- talloc_free(data->ussd_welcome_txt);
- data->ussd_welcome_txt = NULL;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_lost_ussd,
- cfg_net_msc_lost_ussd_cmd,
- "bsc-msc-lost-text .TEXT",
- "Set the USSD notification to be sent on MSC connection loss\n" "Text to be sent\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- char *str = argv_concat(argv, argc, 0);
- if (!str)
- return CMD_WARNING;
-
- osmo_talloc_replace_string(osmo_bsc_data(vty), &data->ussd_msc_lost_txt, str);
- talloc_free(str);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_no_lost_ussd,
- cfg_net_msc_no_lost_ussd_cmd,
- "no bsc-msc-lost-text",
- NO_STR "Clear the USSD notification to be sent on MSC connection loss\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- talloc_free(data->ussd_msc_lost_txt);
- data->ussd_msc_lost_txt = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_grace_ussd,
- cfg_net_msc_grace_ussd_cmd,
- "bsc-grace-text .TEXT",
- "Set the USSD notification to be sent when the MSC has entered the grace period\n" "Text to be sent\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- char *str = argv_concat(argv, argc, 0);
- if (!str)
- return CMD_WARNING;
-
- osmo_talloc_replace_string(osmo_bsc_data(vty), &data->ussd_grace_txt, str);
- talloc_free(str);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_no_grace_ussd,
- cfg_net_msc_no_grace_ussd_cmd,
- "no bsc-grace-text",
- NO_STR "Clear the USSD notification to be sent when the MSC has entered the grace period\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- talloc_free(data->ussd_grace_txt);
- data->ussd_grace_txt = NULL;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_missing_msc_ussd,
- cfg_net_bsc_missing_msc_ussd_cmd,
- "missing-msc-text .TEXT",
- "Set the USSD notification to be send when a MSC has not been found.\n" "Text to be sent\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
- char *txt = argv_concat(argv, argc, 0);
- if (!txt)
- return CMD_WARNING;
-
- osmo_talloc_replace_string(data, &data->ussd_no_msc_txt, txt);
- talloc_free(txt);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_no_missing_msc_text,
- cfg_net_bsc_no_missing_msc_text_cmd,
- "no missing-msc-text",
- NO_STR "Clear the USSD notification to be send when a MSC has not been found.\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
-
- talloc_free(data->ussd_no_msc_txt);
- data->ussd_no_msc_txt = 0;
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(cfg_net_msc_type,
- cfg_net_msc_type_cmd,
- "type (normal|local)",
- "Select the MSC type\n"
- "Plain GSM MSC\n" "Special MSC for local call routing\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
-
- if (strcmp(argv[0], "normal") == 0)
- data->type = MSC_CON_TYPE_NORMAL;
- else if (strcmp(argv[0], "local") == 0)
- data->type = MSC_CON_TYPE_LOCAL;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_emerg,
- cfg_net_msc_emerg_cmd,
- "allow-emergency (allow|deny)",
- "Allow CM ServiceRequests with type emergency\n"
- "Allow\n" "Deny\n")
-{
- struct bsc_msc_data *data = bsc_msc_data(vty);
- data->allow_emerg = strcmp("allow", argv[0]) == 0;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_msc_local_prefix,
- cfg_net_msc_local_prefix_cmd,
- "local-prefix REGEXP",
- "Prefix for local numbers\n" "REGEXP used\n")
-{
- struct bsc_msc_data *msc = bsc_msc_data(vty);
-
- if (gsm_parse_reg(msc, &msc->local_pref_reg, &msc->local_pref, argc, argv) != 0) {
- vty_out(vty, "%%Failed to parse the regexp: '%s'%s",
- argv[0], VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
-}
-
-#define AMR_CONF_STR "AMR Multirate Configuration\n"
-#define AMR_COMMAND(name) \
- DEFUN(cfg_net_msc_amr_##name, \
- cfg_net_msc_amr_##name##_cmd, \
- "amr-config " #name "k (allowed|forbidden)", \
- AMR_CONF_STR "Bitrate\n" "Allowed\n" "Forbidden\n") \
-{ \
- struct bsc_msc_data *msc = bsc_msc_data(vty); \
- \
- msc->amr_conf.m##name = strcmp(argv[0], "allowed") == 0; \
- return CMD_SUCCESS; \
-}
-
-AMR_COMMAND(12_2)
-AMR_COMMAND(10_2)
-AMR_COMMAND(7_95)
-AMR_COMMAND(7_40)
-AMR_COMMAND(6_70)
-AMR_COMMAND(5_90)
-AMR_COMMAND(5_15)
-AMR_COMMAND(4_75)
-
-DEFUN(cfg_msc_acc_lst_name,
- cfg_msc_acc_lst_name_cmd,
- "access-list-name NAME",
- "Set the name of the access list to use.\n"
- "The name of the to be used access list.")
-{
- struct bsc_msc_data *msc = bsc_msc_data(vty);
-
- osmo_talloc_replace_string(msc, &msc->acc_lst_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_no_acc_lst_name,
- cfg_msc_no_acc_lst_name_cmd,
- "no access-list-name",
- NO_STR "Remove the access list from the NAT.\n")
-{
- struct bsc_msc_data *msc = bsc_msc_data(vty);
-
- if (msc->acc_lst_name) {
- talloc_free(msc->acc_lst_name);
- msc->acc_lst_name = NULL;
- }
-
- return CMD_SUCCESS;
-}
-
-/* Make sure only standard SSN numbers are used. If no ssn number is
- * configured, silently apply the default SSN */
-static void enforce_standard_ssn(struct vty *vty, struct osmo_sccp_addr *addr)
-{
- if (addr->presence & OSMO_SCCP_ADDR_T_SSN) {
- if (addr->ssn != SCCP_SSN_BSSAP)
- vty_out(vty,
- "setting an SSN (%u) different from the standard (%u) is not allowd, will use standard SSN for address: %s%s",
- addr->ssn, SCCP_SSN_BSSAP, osmo_sccp_addr_dump(addr), VTY_NEWLINE);
- }
-
- addr->presence |= OSMO_SCCP_ADDR_T_SSN;
- addr->ssn = SCCP_SSN_BSSAP;
-}
-
-DEFUN(cfg_msc_cs7_bsc_addr,
- cfg_msc_cs7_bsc_addr_cmd,
- "bsc-addr NAME",
- "Calling Address (local address of this BSC)\n" "SCCP address name\n")
-{
- struct bsc_msc_data *msc = bsc_msc_data(vty);
- const char *bsc_addr_name = argv[0];
- struct osmo_ss7_instance *ss7;
-
- ss7 = osmo_sccp_addr_by_name(&msc->a.bsc_addr, bsc_addr_name);
- if (!ss7) {
- vty_out(vty, "No sccp address %s found%s", bsc_addr_name,
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* Prevent mixing addresses from different CS7/SS7 instances */
- if (msc->a.cs7_instance_valid) {
- if (msc->a.cs7_instance != ss7->cfg.id) {
- vty_out(vty,
- "SCCP address %s from different CS7 instance%s",
- bsc_addr_name, VTY_NEWLINE);
- return CMD_WARNING;
- }
- }
-
- msc->a.cs7_instance = ss7->cfg.id;
- msc->a.cs7_instance_valid = true;
- enforce_standard_ssn(vty, &msc->a.bsc_addr);
- msc->a.bsc_addr_name = talloc_strdup(msc, bsc_addr_name);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_msc_cs7_msc_addr,
- cfg_msc_cs7_msc_addr_cmd,
- "msc-addr NAME",
- "Called Address (remote address of the MSC)\n" "SCCP address name\n")
-{
- struct bsc_msc_data *msc = bsc_msc_data(vty);
- const char *msc_addr_name = argv[0];
- struct osmo_ss7_instance *ss7;
-
- ss7 = osmo_sccp_addr_by_name(&msc->a.msc_addr, msc_addr_name);
- if (!ss7) {
- vty_out(vty, "No sccp address %s found%s", msc_addr_name,
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* Prevent mixing addresses from different CS7/SS7 instances */
- if (msc->a.cs7_instance_valid) {
- if (msc->a.cs7_instance != ss7->cfg.id) {
- vty_out(vty,
- "SCCP address %s from different CS7 instance%s",
- msc_addr_name, VTY_NEWLINE);
- return CMD_WARNING;
- }
- }
-
- msc->a.cs7_instance = ss7->cfg.id;
- msc->a.cs7_instance_valid = true;
- enforce_standard_ssn(vty, &msc->a.msc_addr);
- msc->a.msc_addr_name = talloc_strdup(msc, msc_addr_name);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_mid_call_text,
- cfg_net_bsc_mid_call_text_cmd,
- "mid-call-text .TEXT",
- "Set the USSD notification to be send.\n" "Text to be sent\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
- char *txt = argv_concat(argv, argc, 0);
- if (!txt)
- return CMD_WARNING;
-
- osmo_talloc_replace_string(data, &data->mid_call_txt, txt);
- talloc_free(txt);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_bsc_mid_call_timeout,
- cfg_net_bsc_mid_call_timeout_cmd,
- "mid-call-timeout NR",
- "Switch from Grace to Off in NR seconds.\n" "Timeout in seconds\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
- data->mid_call_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_rf_socket,
- cfg_net_rf_socket_cmd,
- "bsc-rf-socket PATH",
- "Set the filename for the RF control interface.\n" "RF Control path\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
-
- osmo_talloc_replace_string(data, &data->rf_ctrl_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_rf_off_time,
- cfg_net_rf_off_time_cmd,
- "bsc-auto-rf-off <1-65000>",
- "Disable RF on MSC Connection\n" "Timeout\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
- data->auto_off_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_net_no_rf_off_time,
- cfg_net_no_rf_off_time_cmd,
- "no bsc-auto-rf-off",
- NO_STR "Disable RF on MSC Connection\n")
-{
- struct osmo_bsc_data *data = osmo_bsc_data(vty);
- data->auto_off_timeout = -1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_acc_lst_name,
- cfg_bsc_acc_lst_name_cmd,
- "access-list-name NAME",
- "Set the name of the access list to use.\n"
- "The name of the to be used access list.")
-{
- struct osmo_bsc_data *bsc = osmo_bsc_data(vty);
-
- osmo_talloc_replace_string(bsc, &bsc->acc_lst_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_no_acc_lst_name,
- cfg_bsc_no_acc_lst_name_cmd,
- "no access-list-name",
- NO_STR "Remove the access list from the BSC\n")
-{
- struct osmo_bsc_data *bsc = osmo_bsc_data(vty);
-
- if (bsc->acc_lst_name) {
- talloc_free(bsc->acc_lst_name);
- bsc->acc_lst_name = NULL;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_statistics,
- show_statistics_cmd,
- "show statistics",
- SHOW_STR "Statistics about the BSC\n")
-{
- openbsc_vty_print_statistics(vty, bsc_gsmnet);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_mscs,
- show_mscs_cmd,
- "show mscs",
- SHOW_STR "MSC Connections and State\n")
-{
- struct bsc_msc_data *msc;
- llist_for_each_entry(msc, &bsc_gsmnet->bsc_data->mscs, entry) {
- vty_out(vty, "MSC Nr: %d is connected: %d auth: %d.%s",
- msc->nr,
- msc->msc_con ? msc->msc_con->is_connected : -1,
- msc->msc_con ? msc->msc_con->is_authenticated : -1,
- VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_pos,
- show_pos_cmd,
- "show position",
- SHOW_STR "Position information of the BTS\n")
-{
- struct gsm_bts *bts;
- struct bts_location *curloc;
- struct tm time;
- char timestr[50];
-
- llist_for_each_entry(bts, &bsc_gsmnet->bts_list, list) {
- if (llist_empty(&bts->loc_list)) {
- vty_out(vty, "BTS Nr: %d position invalid%s", bts->nr,
- VTY_NEWLINE);
- continue;
- }
- curloc = llist_entry(bts->loc_list.next, struct bts_location, list);
- if (gmtime_r(&curloc->tstamp, &time) == NULL) {
- vty_out(vty, "Time conversion failed for BTS %d%s", bts->nr,
- VTY_NEWLINE);
- continue;
- }
- if (asctime_r(&time, timestr) == NULL) {
- vty_out(vty, "Time conversion failed for BTS %d%s", bts->nr,
- VTY_NEWLINE);
- continue;
- }
- /* Last character in asctime is \n */
- timestr[strlen(timestr)-1] = 0;
-
- vty_out(vty, "BTS Nr: %d position: %s time: %s%s", bts->nr,
- get_value_string(bts_loc_fix_names, curloc->valid), timestr,
- VTY_NEWLINE);
- vty_out(vty, " lat: %f lon: %f height: %f%s", curloc->lat, curloc->lon,
- curloc->height, VTY_NEWLINE);
- }
- return CMD_SUCCESS;
-}
-
-DEFUN(gen_position_trap,
- gen_position_trap_cmd,
- "generate-location-state-trap <0-255>",
- "Generate location state report\n"
- "BTS to report\n")
-{
- int bts_nr;
- struct gsm_bts *bts;
- struct gsm_network *net = bsc_gsmnet;
-
- bts_nr = atoi(argv[0]);
- if (bts_nr >= net->num_bts) {
- vty_out(vty, "%% can't find BTS '%s'%s", argv[0],
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bts = gsm_bts_num(net, bts_nr);
- bsc_gen_location_state_trap(bts);
- return CMD_SUCCESS;
-}
-
-DEFUN(logging_fltr_imsi,
- logging_fltr_imsi_cmd,
- "logging filter imsi IMSI",
- LOGGING_STR FILTER_STR
- "Filter log messages by IMSI\n" "IMSI to be used as filter\n")
-{
- struct bsc_subscr *bsc_subscr;
- struct log_target *tgt = osmo_log_vty2tgt(vty);
- const char *imsi = argv[0];
-
- bsc_subscr = bsc_subscr_find_by_imsi(bsc_gsmnet->bsc_subscribers, imsi);
-
- if (!bsc_subscr) {
- vty_out(vty, "%%no subscriber with IMSI(%s)%s",
- imsi, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- log_set_filter_bsc_subscr(tgt, bsc_subscr);
- return CMD_SUCCESS;
-}
-
-int bsc_vty_init_extra(void)
-{
- install_element(CONFIG_NODE, &cfg_net_msc_cmd);
- install_element(CONFIG_NODE, &cfg_net_bsc_cmd);
-
- install_node(&bsc_node, config_write_bsc);
- vty_install_default(BSC_NODE);
- install_element(BSC_NODE, &cfg_net_bsc_mid_call_text_cmd);
- install_element(BSC_NODE, &cfg_net_bsc_mid_call_timeout_cmd);
- install_element(BSC_NODE, &cfg_net_rf_socket_cmd);
- install_element(BSC_NODE, &cfg_net_rf_off_time_cmd);
- install_element(BSC_NODE, &cfg_net_no_rf_off_time_cmd);
- install_element(BSC_NODE, &cfg_net_bsc_missing_msc_ussd_cmd);
- install_element(BSC_NODE, &cfg_net_bsc_no_missing_msc_text_cmd);
- install_element(BSC_NODE, &cfg_bsc_acc_lst_name_cmd);
- install_element(BSC_NODE, &cfg_bsc_no_acc_lst_name_cmd);
-
- install_node(&msc_node, config_write_msc);
- vty_install_default(MSC_NODE);
- install_element(MSC_NODE, &cfg_net_bsc_token_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_key_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_no_key_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_ncc_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_mcc_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_lac_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_ci_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_rtp_base_cmd);
- install_element(MSC_NODE, &cfg_net_bsc_codec_list_cmd);
- install_element(MSC_NODE, &cfg_net_msc_dest_cmd);
- install_element(MSC_NODE, &cfg_net_msc_no_dest_cmd);
- install_element(MSC_NODE, &cfg_net_msc_no_ping_time_cmd);
- install_element(MSC_NODE, &cfg_net_msc_ping_time_cmd);
- install_element(MSC_NODE, &cfg_net_msc_pong_time_cmd);
- install_element(MSC_NODE, &cfg_net_msc_advanced_ping_cmd);
- install_element(MSC_NODE, &cfg_no_net_msc_advanced_ping_cmd);
- install_element(MSC_NODE, &cfg_net_msc_welcome_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_no_welcome_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_lost_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_no_lost_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_grace_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_no_grace_ussd_cmd);
- install_element(MSC_NODE, &cfg_net_msc_type_cmd);
- install_element(MSC_NODE, &cfg_net_msc_emerg_cmd);
- install_element(MSC_NODE, &cfg_net_msc_local_prefix_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_12_2_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_10_2_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_7_95_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_7_40_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_6_70_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_5_90_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_5_15_cmd);
- install_element(MSC_NODE, &cfg_net_msc_amr_4_75_cmd);
- install_element(MSC_NODE, &cfg_msc_acc_lst_name_cmd);
- install_element(MSC_NODE, &cfg_msc_no_acc_lst_name_cmd);
- install_element(MSC_NODE, &cfg_msc_cs7_bsc_addr_cmd);
- install_element(MSC_NODE, &cfg_msc_cs7_msc_addr_cmd);
-
- install_element_ve(&show_statistics_cmd);
- install_element_ve(&show_mscs_cmd);
- install_element_ve(&show_pos_cmd);
- install_element_ve(&logging_fltr_imsi_cmd);
-
- install_element(ENABLE_NODE, &gen_position_trap_cmd);
-
- install_element(CFG_LOG_NODE, &logging_fltr_imsi_cmd);
-
- return 0;
-}
diff --git a/src/osmo-bsc_nat/Makefile.am b/src/osmo-bsc_nat/Makefile.am
deleted file mode 100644
index 1eec7aa1c..000000000
--- a/src/osmo-bsc_nat/Makefile.am
+++ /dev/null
@@ -1,61 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOCTRL_CFLAGS) \
- $(LIBOSMOSCCP_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(LIBOSMONETIF_CFLAGS) \
- $(LIBOSMOLEGACYMGCP_CFLAGS) \
- $(LIBCRYPTO_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-bin_PROGRAMS = \
- osmo-bsc_nat \
- $(NULL)
-
-osmo_bsc_nat_SOURCES = \
- bsc_filter.c \
- bsc_mgcp_utils.c \
- bsc_nat.c \
- bsc_nat_utils.c \
- bsc_nat_vty.c \
- bsc_sccp.c \
- bsc_ussd.c \
- bsc_nat_ctrl.c \
- bsc_nat_rewrite.c \
- bsc_nat_rewrite_trie.c \
- bsc_nat_filter.c \
- $(NULL)
-
-osmo_bsc_nat_LDADD = \
- $(top_builddir)/src/libfilter/libfilter.a \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libcommon-cs/libcommon-cs.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOSCCP_LIBS) \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOVTY_LIBS) \
- $(LIBOSMOCTRL_LIBS) \
- $(LIBOSMOABIS_LIBS) \
- $(LIBOSMONETIF_LIBS) \
- $(LIBOSMOSIGTRAN_LIBS) \
- $(LIBOSMOLEGACYMGCP_LIBS) \
- $(LIBCRYPTO_LIBS) \
- $(LIBRARY_GSM) \
- -lrt \
- $(NULL)
diff --git a/src/osmo-bsc_nat/bsc_filter.c b/src/osmo-bsc_nat/bsc_filter.c
deleted file mode 100644
index 6a9e99fb8..000000000
--- a/src/osmo-bsc_nat/bsc_filter.c
+++ /dev/null
@@ -1,218 +0,0 @@
-/* BSC Multiplexer/NAT */
-
-/*
- * (C) 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/debug.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-
-#include <osmocom/sccp/sccp.h>
-
-/*
- * The idea is to have a simple struct describing a IPA packet with
- * SCCP SSN and the GSM 08.08 payload and decide. We will both have
- * a white and a blacklist of packets we want to handle.
- *
- * TODO: Implement a "NOT" in the filter language.
- */
-
-#define ALLOW_ANY -1
-
-#define FILTER_TO_BSC 1
-#define FILTER_TO_MSC 2
-#define FILTER_TO_BOTH 3
-
-
-struct bsc_pkt_filter {
- int ipa_proto;
- int dest_ssn;
- int bssap;
- int gsm;
- int filter_dir;
-};
-
-static struct bsc_pkt_filter black_list[] = {
- /* filter reset messages to the MSC */
- { IPAC_PROTO_SCCP, SCCP_SSN_BSSAP, 0, BSS_MAP_MSG_RESET, FILTER_TO_MSC },
-
- /* filter reset ack messages to the BSC */
- { IPAC_PROTO_SCCP, SCCP_SSN_BSSAP, 0, BSS_MAP_MSG_RESET_ACKNOWLEDGE, FILTER_TO_BSC },
-
- /* filter ip access */
- { IPAC_PROTO_IPACCESS, ALLOW_ANY, ALLOW_ANY, ALLOW_ANY, FILTER_TO_MSC },
-};
-
-static struct bsc_pkt_filter white_list[] = {
- /* allow IPAC_PROTO_SCCP messages to both sides */
- { IPAC_PROTO_SCCP, ALLOW_ANY, ALLOW_ANY, ALLOW_ANY, FILTER_TO_BOTH },
-
- /* allow MGCP messages to both sides */
- { IPAC_PROTO_MGCP_OLD, ALLOW_ANY, ALLOW_ANY, ALLOW_ANY, FILTER_TO_BOTH },
-};
-
-struct bsc_nat_parsed *bsc_nat_parse(struct msgb *msg)
-{
- struct sccp_parse_result result;
- struct bsc_nat_parsed *parsed;
- struct ipaccess_head *hh;
-
- /* quick fail */
- if (msg->len < 4)
- return NULL;
-
- parsed = talloc_zero(msg, struct bsc_nat_parsed);
- if (!parsed)
- return NULL;
-
- /* more init */
- parsed->ipa_proto = parsed->called_ssn = parsed->calling_ssn = -1;
- parsed->sccp_type = parsed->bssap = parsed->gsm_type = -1;
-
- /* start parsing */
- hh = (struct ipaccess_head *) msg->data;
- parsed->ipa_proto = hh->proto;
-
- msg->l2h = &hh->data[0];
-
- /* do a size check on the input */
- if (ntohs(hh->len) != msgb_l2len(msg)) {
- LOGP(DLINP, LOGL_ERROR, "Wrong input length?\n");
- talloc_free(parsed);
- return NULL;
- }
-
- /* analyze sccp down here */
- if (parsed->ipa_proto == IPAC_PROTO_SCCP) {
- memset(&result, 0, sizeof(result));
- if (sccp_parse_header(msg, &result) != 0) {
- talloc_free(parsed);
- return 0;
- }
-
- if (msg->l3h && msgb_l3len(msg) < 3) {
- LOGP(DNAT, LOGL_ERROR, "Not enough space or GSM payload\n");
- talloc_free(parsed);
- return 0;
- }
-
- parsed->sccp_type = sccp_determine_msg_type(msg);
- parsed->src_local_ref = result.source_local_reference;
- parsed->dest_local_ref = result.destination_local_reference;
- if (parsed->dest_local_ref)
- parsed->original_dest_ref = *parsed->dest_local_ref;
- parsed->called_ssn = result.called.ssn;
- parsed->calling_ssn = result.calling.ssn;
-
- /* in case of connection confirm we have no payload */
- if (msg->l3h) {
- parsed->bssap = msg->l3h[0];
- parsed->gsm_type = msg->l3h[2];
- }
- }
-
- return parsed;
-}
-
-int bsc_nat_filter_ipa(int dir, struct msgb *msg, struct bsc_nat_parsed *parsed)
-{
- int i;
-
- /* go through the blacklist now */
- for (i = 0; i < ARRAY_SIZE(black_list); ++i) {
- /* ignore the rule? */
- if (black_list[i].filter_dir != FILTER_TO_BOTH
- && black_list[i].filter_dir != dir)
- continue;
-
- /* the proto is not blacklisted */
- if (black_list[i].ipa_proto != ALLOW_ANY
- && black_list[i].ipa_proto != parsed->ipa_proto)
- continue;
-
- if (parsed->ipa_proto == IPAC_PROTO_SCCP) {
- /* the SSN is not blacklisted */
- if (black_list[i].dest_ssn != ALLOW_ANY
- && black_list[i].dest_ssn != parsed->called_ssn)
- continue;
-
- /* bssap */
- if (black_list[i].bssap != ALLOW_ANY
- && black_list[i].bssap != parsed->bssap)
- continue;
-
- /* gsm */
- if (black_list[i].gsm != ALLOW_ANY
- && black_list[i].gsm != parsed->gsm_type)
- continue;
-
- /* blacklisted */
- LOGP(DNAT, LOGL_INFO, "Blacklisted with rule %d\n", i);
- return 1;
- } else {
- /* blacklisted, we have no content sniffing yet */
- LOGP(DNAT, LOGL_INFO, "Blacklisted with rule %d\n", i);
- return 1;
- }
- }
-
- /* go through the whitelust now */
- for (i = 0; i < ARRAY_SIZE(white_list); ++i) {
- /* ignore the rule? */
- if (white_list[i].filter_dir != FILTER_TO_BOTH
- && white_list[i].filter_dir != dir)
- continue;
-
- /* the proto is not whitelisted */
- if (white_list[i].ipa_proto != ALLOW_ANY
- && white_list[i].ipa_proto != parsed->ipa_proto)
- continue;
-
- if (parsed->ipa_proto == IPAC_PROTO_SCCP) {
- /* the SSN is not whitelisted */
- if (white_list[i].dest_ssn != ALLOW_ANY
- && white_list[i].dest_ssn != parsed->called_ssn)
- continue;
-
- /* bssap */
- if (white_list[i].bssap != ALLOW_ANY
- && white_list[i].bssap != parsed->bssap)
- continue;
-
- /* gsm */
- if (white_list[i].gsm != ALLOW_ANY
- && white_list[i].gsm != parsed->gsm_type)
- continue;
-
- /* whitelisted */
- LOGP(DNAT, LOGL_INFO, "Whitelisted with rule %d\n", i);
- return 0;
- } else {
- /* whitelisted */
- return 0;
- }
- }
-
- return 1;
-}
diff --git a/src/osmo-bsc_nat/bsc_mgcp_utils.c b/src/osmo-bsc_nat/bsc_mgcp_utils.c
deleted file mode 100644
index 49050fc89..000000000
--- a/src/osmo-bsc_nat/bsc_mgcp_utils.c
+++ /dev/null
@@ -1,1151 +0,0 @@
-/**
- * This file contains helper routines for MGCP Gateway handling.
- *
- * The first thing to remember is that each BSC has its own namespace/range
- * of endpoints. Whenever a BSSMAP ASSIGNMENT REQUEST is received this code
- * will be called to select an endpoint on the BSC. The mapping from original
- * multiplex/timeslot to BSC multiplex'/timeslot' will be stored.
- *
- * The second part is to take messages on the public MGCP GW interface
- * and forward them to the right BSC. This requires the MSC to first
- * assign the timeslot. This assumption has been true so far. We are using
- * the policy_cb of the MGCP protocol code to decide if the request should
- * be immediately answered or delayed. An extension "Z: noanswer" is used
- * to request the BSC to not respond. This is saving some bytes of bandwidth
- * and as we are using TCP to forward the message we know it will arrive.
- * The mgcp_do_read method reads these messages and hands them to the protocol
- * parsing code which will call the mentioned policy_cb. The bsc_mgcp_forward
- * method is used on the way back from the BSC to the network.
- *
- * The third part is to patch messages forwarded to the BSC. This includes
- * the endpoint number, the ports to be used inside the SDP file and maybe
- * some other bits.
- *
- */
-/*
- * (C) 2010-2012 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2012 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_callstats.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-#include <osmocom/legacy_mgcp/mgcp.h>
-#include <osmocom/legacy_mgcp/mgcp_internal.h>
-#include <openbsc/osmux.h>
-
-#include <osmocom/ctrl/control_cmd.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-
-#include <netinet/in.h>
-#include <arpa/inet.h>
-
-#include <errno.h>
-#include <unistd.h>
-
-static void send_direct(struct bsc_nat *nat, struct msgb *output)
-{
- if (osmo_wqueue_enqueue(&nat->mgcp_cfg->gw_fd, output) != 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to queue MGCP msg.\n");
- msgb_free(output);
- }
-}
-
-static void mgcp_queue_for_call_agent(struct bsc_nat *nat, struct msgb *output)
-{
- if (nat->mgcp_ipa)
- bsc_nat_send_mgcp_to_msc(nat, output);
- else
- send_direct(nat, output);
-}
-
-int bsc_mgcp_nr_multiplexes(int max_endpoints)
-{
- int div = max_endpoints / 32;
-
- if ((max_endpoints % 32) != 0)
- div += 1;
-
- return div;
-}
-
-static int bsc_init_endps_if_needed(struct bsc_connection *con)
-{
- int multiplexes;
-
- /* we have done that */
- if (con->_endpoint_status)
- return 0;
-
- /* we have no config... */
- if (!con->cfg)
- return -1;
-
- multiplexes = bsc_mgcp_nr_multiplexes(con->cfg->max_endpoints);
- con->number_multiplexes = multiplexes;
- con->max_endpoints = con->cfg->max_endpoints;
- con->_endpoint_status = talloc_zero_array(con, char, 32 * multiplexes + 1);
- return con->_endpoint_status == NULL;
-}
-
-static int bsc_assign_endpoint(struct bsc_connection *bsc, struct nat_sccp_connection *con)
-{
- int multiplex;
- int timeslot;
- const int number_endpoints = bsc->max_endpoints;
- int i;
-
- mgcp_endpoint_to_timeslot(bsc->last_endpoint, &multiplex, &timeslot);
- timeslot += 1;
-
- for (i = 0; i < number_endpoints; ++i) {
- int endpoint;
-
- /* Wrap around timeslots */
- if (timeslot == 0)
- timeslot = 1;
-
- if (timeslot == 0x1f) {
- timeslot = 1;
- multiplex += 1;
- }
-
- /* Wrap around the multiplex */
- if (multiplex >= bsc->number_multiplexes)
- multiplex = 0;
-
- endpoint = mgcp_timeslot_to_endpoint(multiplex, timeslot);
-
- /* Now check if we are allowed to assign this one */
- if (endpoint >= bsc->max_endpoints) {
- multiplex = 0;
- timeslot = 1;
- endpoint = mgcp_timeslot_to_endpoint(multiplex, timeslot);
- }
-
-
- if (bsc->_endpoint_status[endpoint] == 0) {
- bsc->_endpoint_status[endpoint] = 1;
- con->bsc_endp = endpoint;
- bsc->last_endpoint = endpoint;
- return 0;
- }
-
- timeslot += 1;
- }
-
- return -1;
-}
-
-static uint16_t create_cic(int endpoint)
-{
- int timeslot, multiplex;
-
- mgcp_endpoint_to_timeslot(endpoint, &multiplex, &timeslot);
- return (multiplex << 5) | (timeslot & 0x1f);
-}
-
-int bsc_mgcp_assign_patch(struct nat_sccp_connection *con, struct msgb *msg)
-{
- struct nat_sccp_connection *mcon;
- struct tlv_parsed tp;
- uint16_t cic;
- uint8_t timeslot;
- uint8_t multiplex;
- unsigned int endp;
-
- if (!msg->l3h) {
- LOGP(DNAT, LOGL_ERROR, "Assignment message should have l3h pointer.\n");
- return -1;
- }
-
- if (msgb_l3len(msg) < 3) {
- LOGP(DNAT, LOGL_ERROR, "Assignment message has not enough space for GSM0808.\n");
- return -1;
- }
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 3, msgb_l3len(msg) - 3, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CIRCUIT_IDENTITY_CODE)) {
- LOGP(DNAT, LOGL_ERROR, "Circuit identity code not found in assignment message.\n");
- return -1;
- }
-
- cic = ntohs(tlvp_val16_unal(&tp, GSM0808_IE_CIRCUIT_IDENTITY_CODE));
- timeslot = cic & 0x1f;
- multiplex = (cic & ~0x1f) >> 5;
-
-
- endp = mgcp_timeslot_to_endpoint(multiplex, timeslot);
-
- if (endp >= con->bsc->nat->mgcp_cfg->trunk.number_endpoints) {
- LOGP(DNAT, LOGL_ERROR,
- "MSC attempted to assign bad endpoint 0x%x\n",
- endp);
- return -1;
- }
-
- /* find stale connections using that endpoint */
- llist_for_each_entry(mcon, &con->bsc->nat->sccp_connections, list_entry) {
- if (mcon->msc_endp == endp) {
- LOGP(DNAT, LOGL_ERROR,
- "Endpoint %d was assigned to 0x%x and now 0x%x\n",
- endp,
- sccp_src_ref_to_int(&mcon->patched_ref),
- sccp_src_ref_to_int(&con->patched_ref));
- bsc_mgcp_dlcx(mcon);
- }
- }
-
- con->msc_endp = endp;
- if (bsc_init_endps_if_needed(con->bsc) != 0)
- return -1;
- if (bsc_assign_endpoint(con->bsc, con) != 0)
- return -1;
-
- /*
- * now patch the message for the new CIC...
- * still assumed to be one multiplex only
- */
- cic = htons(create_cic(con->bsc_endp));
- memcpy((uint8_t *) TLVP_VAL(&tp, GSM0808_IE_CIRCUIT_IDENTITY_CODE),
- &cic, sizeof(cic));
-
- return 0;
-}
-
-static void bsc_mgcp_free_endpoint(struct bsc_nat *nat, int i)
-{
- if (nat->bsc_endpoints[i].transaction_id) {
- talloc_free(nat->bsc_endpoints[i].transaction_id);
- nat->bsc_endpoints[i].transaction_id = NULL;
- }
-
- nat->bsc_endpoints[i].transaction_state = 0;
- nat->bsc_endpoints[i].bsc = NULL;
-}
-
-void bsc_mgcp_free_endpoints(struct bsc_nat *nat)
-{
- int i;
-
- for (i = 1; i < nat->mgcp_cfg->trunk.number_endpoints; ++i){
- bsc_mgcp_free_endpoint(nat, i);
- mgcp_release_endp(&nat->mgcp_cfg->trunk.endpoints[i]);
- }
-}
-
-/* send a MDCX where we do not want a response */
-static void bsc_mgcp_send_mdcx(struct bsc_connection *bsc, int port, struct mgcp_endpoint *endp)
-{
- char buf[2096];
- int len;
-
- len = snprintf(buf, sizeof(buf),
- "MDCX 23 %x@mgw MGCP 1.0\r\n"
- "Z: noanswer\r\n"
- "\r\n"
- "c=IN IP4 %s\r\n"
- "m=audio %d RTP/AVP 255\r\n",
- port, mgcp_bts_src_addr(endp),
- endp->bts_end.local_port);
- if (len < 0) {
- LOGP(DMGCP, LOGL_ERROR, "snprintf for MDCX failed.\n");
- return;
- }
-
- bsc_write_mgcp(bsc, (uint8_t *) buf, len);
-}
-
-static void bsc_mgcp_send_dlcx(struct bsc_connection *bsc, int endpoint, int trans)
-{
- char buf[2096];
- int len;
-
- /*
- * The following is a bit of a spec violation. According to the
- * MGCP grammar the transaction id is are upto 9 digits but we
- * prefix it with an alpha numeric value so we can easily recognize
- * it as a response.
- */
- len = snprintf(buf, sizeof(buf),
- "DLCX nat-%u %x@mgw MGCP 1.0\r\n",
- trans, endpoint);
- if (len < 0) {
- LOGP(DMGCP, LOGL_ERROR, "snprintf for DLCX failed.\n");
- return;
- }
-
- bsc_write_mgcp(bsc, (uint8_t *) buf, len);
-}
-
-void bsc_mgcp_init(struct nat_sccp_connection *con)
-{
- con->msc_endp = -1;
- con->bsc_endp = -1;
-}
-
-/**
- * This code will remember the network side of the audio statistics and
- * once the internal DLCX response arrives this can be combined with the
- * the BSC side and forwarded as a trap.
- */
-static void remember_pending_dlcx(struct nat_sccp_connection *con, uint32_t transaction)
-{
- struct bsc_nat_call_stats *stats;
- struct bsc_connection *bsc = con->bsc;
- struct mgcp_endpoint *endp;
-
- stats = talloc_zero(bsc, struct bsc_nat_call_stats);
- if (!stats) {
- LOGP(DNAT, LOGL_NOTICE,
- "Failed to allocate statistics for endpoint 0x%x\n",
- con->msc_endp);
- return;
- }
-
- /* take the endpoint here */
- endp = &bsc->nat->mgcp_cfg->trunk.endpoints[con->msc_endp];
-
- stats->remote_ref = con->remote_ref;
- stats->src_ref = con->patched_ref;
-
- stats->ci = endp->ci;
- stats->bts_rtp_port = endp->bts_end.rtp_port;
- stats->bts_addr = endp->bts_end.addr;
- stats->net_rtp_port = endp->net_end.rtp_port;
- stats->net_addr = endp->net_end.addr;
-
- stats->net_ps = endp->net_end.packets;
- stats->net_os = endp->net_end.octets;
- stats->bts_pr = endp->bts_end.packets;
- stats->bts_or = endp->bts_end.octets;
- mgcp_state_calc_loss(&endp->bts_state, &endp->bts_end,
- &stats->bts_expected, &stats->bts_loss);
- stats->bts_jitter = mgcp_state_calc_jitter(&endp->bts_state);
-
- stats->trans_id = transaction;
- stats->msc_endpoint = con->msc_endp;
-
- /*
- * Too many pending requests.. let's remove the first two items.
- */
- if (!llist_empty(&bsc->pending_dlcx) &&
- bsc->pending_dlcx_count >= bsc->cfg->max_endpoints * 3) {
- struct bsc_nat_call_stats *tmp;
- LOGP(DNAT, LOGL_ERROR,
- "Too many(%d) pending DLCX responses on BSC: %d\n",
- bsc->pending_dlcx_count, bsc->cfg->nr);
- bsc->pending_dlcx_count -= 1;
- tmp = (struct bsc_nat_call_stats *) bsc->pending_dlcx.next;
- llist_del(&tmp->entry);
- talloc_free(tmp);
- }
-
- bsc->pending_dlcx_count += 1;
- llist_add_tail(&stats->entry, &bsc->pending_dlcx);
-}
-
-void bsc_mgcp_dlcx(struct nat_sccp_connection *con)
-{
- /* send a DLCX down the stream */
- if (con->bsc_endp != -1 && con->bsc->_endpoint_status) {
- LOGP(DNAT, LOGL_NOTICE,
- "Endpoint 0x%x was allocated for bsc: %d. Freeing it.\n",
- con->bsc_endp, con->bsc->cfg->nr);
- if (con->bsc->_endpoint_status[con->bsc_endp] != 1)
- LOGP(DNAT, LOGL_ERROR, "Endpoint 0x%x was not in use\n", con->bsc_endp);
- remember_pending_dlcx(con, con->bsc->next_transaction);
- con->bsc->_endpoint_status[con->bsc_endp] = 0;
- bsc_mgcp_send_dlcx(con->bsc, con->bsc_endp, con->bsc->next_transaction++);
- bsc_mgcp_free_endpoint(con->bsc->nat, con->msc_endp);
- }
-
- bsc_mgcp_init(con);
-
-}
-
-/*
- * Search for the pending request
- */
-static void handle_dlcx_response(struct bsc_connection *bsc, struct msgb *msg,
- int code, const char *transaction)
-{
- uint32_t trans_id = UINT32_MAX;
- uint32_t b_ps, b_os, n_pr, n_or, jitter;
- int loss;
- struct bsc_nat_call_stats *tmp, *stat = NULL;
- struct ctrl_cmd *cmd;
-
- /* parse the transaction identifier */
- int rc = sscanf(transaction, "nat-%u", &trans_id);
- if (rc != 1) {
- LOGP(DNAT, LOGL_ERROR, "Can not parse transaction id: '%s'\n",
- transaction);
- return;
- }
-
- /* find the answer for the request we made */
- llist_for_each_entry(tmp, &bsc->pending_dlcx, entry) {
- if (trans_id != tmp->trans_id)
- continue;
-
- stat = tmp;
- break;
- }
-
- if (!stat) {
- LOGP(DNAT, LOGL_ERROR,
- "Can not find transaction for: %u\n", trans_id);
- return;
- }
-
- /* attempt to parse the data now */
- rc = mgcp_parse_stats(msg, &b_ps, &b_os, &n_pr, &n_or, &loss, &jitter);
- if (rc != 0)
- LOGP(DNAT, LOGL_ERROR,
- "Can not parse connection statistics: %d\n", rc);
-
- /* send a trap now */
- cmd = ctrl_cmd_create(bsc, CTRL_TYPE_TRAP);
- if (!cmd) {
- LOGP(DNAT, LOGL_ERROR,
- "Creating a ctrl cmd failed.\n");
- goto free_stat;
- }
-
- cmd->id = "0";
- cmd->variable = talloc_asprintf(cmd, "net.0.bsc.%d.call_stats.v2",
- bsc->cfg->nr);
- cmd->reply = talloc_asprintf(cmd,
- "mg_ip_addr=%s,mg_port=%d,",
- inet_ntoa(stat->net_addr),
- stat->net_rtp_port);
- cmd->reply = talloc_asprintf_append(cmd->reply,
- "endpoint_ip_addr=%s,endpoint_port=%d,",
- inet_ntoa(stat->bts_addr),
- stat->bts_rtp_port);
- cmd->reply = talloc_asprintf_append(cmd->reply,
- "nat_pkt_in=%u,nat_pkt_out=%u,"
- "nat_bytes_in=%u,nat_bytes_out=%u,"
- "nat_jitter=%u,nat_pkt_lost=%d,",
- stat->bts_pr, stat->net_ps,
- stat->bts_or, stat->net_os,
- stat->bts_jitter, stat->bts_loss);
- cmd->reply = talloc_asprintf_append(cmd->reply,
- "bsc_pkt_in=%u,bsc_pkt_out=%u,"
- "bsc_bytes_in=%u,bsc_bytes_out=%u,"
- "bsc_jitter=%u,bsc_pkt_lost=%d,",
- n_pr, b_ps,
- n_or, b_os,
- jitter, loss);
- cmd->reply = talloc_asprintf_append(cmd->reply,
- "sccp_src_ref=%u,sccp_dst_ref=%u",
- sccp_src_ref_to_int(&stat->src_ref),
- sccp_src_ref_to_int(&stat->remote_ref));
-
- /* send it and be done */
- ctrl_cmd_send_to_all(bsc->nat->ctrl, cmd);
- talloc_free(cmd);
-
-free_stat:
- bsc->pending_dlcx_count -= 1;
- llist_del(&stat->entry);
- talloc_free(stat);
-}
-
-
-struct nat_sccp_connection *bsc_mgcp_find_con(struct bsc_nat *nat, int endpoint)
-{
- struct nat_sccp_connection *con = NULL;
- struct nat_sccp_connection *sccp;
-
- llist_for_each_entry(sccp, &nat->sccp_connections, list_entry) {
- if (sccp->msc_endp == -1)
- continue;
- if (sccp->msc_endp != endpoint)
- continue;
-
- con = sccp;
- }
-
- if (con)
- return con;
-
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to find the connection for endpoint: 0x%x\n", endpoint);
- return NULL;
-}
-
-static int nat_osmux_only(struct mgcp_config *mgcp_cfg, struct bsc_config *bsc_cfg)
-{
- if (mgcp_cfg->osmux == OSMUX_USAGE_ONLY)
- return 1;
- if (bsc_cfg->osmux == OSMUX_USAGE_ONLY)
- return 1;
- return 0;
-}
-
-static int bsc_mgcp_policy_cb(struct mgcp_trunk_config *tcfg, int endpoint, int state, const char *transaction_id)
-{
- struct bsc_nat *nat;
- struct bsc_endpoint *bsc_endp;
- struct nat_sccp_connection *sccp;
- struct mgcp_endpoint *mgcp_endp;
- struct msgb *bsc_msg;
-
- nat = tcfg->cfg->data;
- bsc_endp = &nat->bsc_endpoints[endpoint];
- mgcp_endp = &nat->mgcp_cfg->trunk.endpoints[endpoint];
-
- if (bsc_endp->transaction_id) {
- LOGP(DMGCP, LOGL_ERROR, "Endpoint 0x%x had pending transaction: '%s'\n",
- endpoint, bsc_endp->transaction_id);
- talloc_free(bsc_endp->transaction_id);
- bsc_endp->transaction_id = NULL;
- bsc_endp->transaction_state = 0;
- }
- bsc_endp->bsc = NULL;
-
- sccp = bsc_mgcp_find_con(nat, endpoint);
-
- if (!sccp) {
- LOGP(DMGCP, LOGL_ERROR, "Did not find BSC for change on endpoint: 0x%x state: %d\n", endpoint, state);
-
- switch (state) {
- case MGCP_ENDP_CRCX:
- return MGCP_POLICY_REJECT;
- break;
- case MGCP_ENDP_DLCX:
- return MGCP_POLICY_CONT;
- break;
- case MGCP_ENDP_MDCX:
- return MGCP_POLICY_CONT;
- break;
- default:
- LOGP(DMGCP, LOGL_FATAL, "Unhandled state: %d\n", state);
- return MGCP_POLICY_CONT;
- break;
- }
- }
-
- /* Allocate a Osmux circuit ID */
- if (state == MGCP_ENDP_CRCX) {
- if (nat->mgcp_cfg->osmux && sccp->bsc->cfg->osmux) {
- osmux_allocate_cid(mgcp_endp);
- if (mgcp_endp->osmux.allocated_cid < 0 &&
- nat_osmux_only(nat->mgcp_cfg, sccp->bsc->cfg)) {
- LOGP(DMGCP, LOGL_ERROR,
- "Rejecting usage of endpoint\n");
- return MGCP_POLICY_REJECT;
- }
- }
- }
-
- /* we need to generate a new and patched message */
- bsc_msg = bsc_mgcp_rewrite((char *) nat->mgcp_msg, nat->mgcp_length,
- sccp->bsc_endp, mgcp_bts_src_addr(mgcp_endp),
- mgcp_endp->bts_end.local_port,
- mgcp_endp->osmux.allocated_cid,
- &mgcp_endp->net_end.codec.payload_type,
- nat->sdp_ensure_amr_mode_set);
- if (!bsc_msg) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to patch the msg.\n");
- return MGCP_POLICY_CONT;
- }
-
-
- bsc_endp->transaction_id = talloc_strdup(nat, transaction_id);
- bsc_endp->transaction_state = state;
- bsc_endp->bsc = sccp->bsc;
-
- /* we need to update some bits */
- if (state == MGCP_ENDP_CRCX) {
- struct sockaddr_in sock;
-
- /* Annotate the allocated Osmux CID until the bsc confirms that
- * it agrees to use Osmux for this voice flow.
- */
- if (mgcp_endp->osmux.allocated_cid >= 0 &&
- mgcp_endp->osmux.state != OSMUX_STATE_ENABLED) {
- mgcp_endp->osmux.state = OSMUX_STATE_NEGOTIATING;
- mgcp_endp->osmux.cid = mgcp_endp->osmux.allocated_cid;
- }
-
- socklen_t len = sizeof(sock);
- if (getpeername(sccp->bsc->write_queue.bfd.fd, (struct sockaddr *) &sock, &len) != 0) {
- LOGP(DMGCP, LOGL_ERROR, "Can not get the peername...%d/%s\n",
- errno, strerror(errno));
- } else {
- mgcp_endp->bts_end.addr = sock.sin_addr;
- }
-
- /* send the message and a fake MDCX to force sending of a dummy packet */
- bsc_write(sccp->bsc, bsc_msg, IPAC_PROTO_MGCP_OLD);
- bsc_mgcp_send_mdcx(sccp->bsc, sccp->bsc_endp, mgcp_endp);
- return MGCP_POLICY_DEFER;
- } else if (state == MGCP_ENDP_DLCX) {
- /* we will free the endpoint now and send a DLCX to the BSC */
- msgb_free(bsc_msg);
- bsc_mgcp_dlcx(sccp);
-
- /* libmgcp clears the MGCP endpoint for us */
- if (mgcp_endp->osmux.state == OSMUX_STATE_ENABLED)
- osmux_release_cid(mgcp_endp);
-
- return MGCP_POLICY_CONT;
- } else {
- bsc_write(sccp->bsc, bsc_msg, IPAC_PROTO_MGCP_OLD);
- return MGCP_POLICY_DEFER;
- }
-}
-
-/*
- * We do have a failure, free data downstream..
- */
-static void free_chan_downstream(struct mgcp_endpoint *endp, struct bsc_endpoint *bsc_endp,
- struct bsc_connection *bsc)
-{
- LOGP(DMGCP, LOGL_ERROR, "No CI, freeing endpoint 0x%x in state %d\n",
- ENDPOINT_NUMBER(endp), bsc_endp->transaction_state);
-
- /* if a CRCX failed... send a DLCX down the stream */
- if (bsc_endp->transaction_state == MGCP_ENDP_CRCX) {
- struct nat_sccp_connection *con;
- con = bsc_mgcp_find_con(bsc->nat, ENDPOINT_NUMBER(endp));
- if (!con) {
- LOGP(DMGCP, LOGL_ERROR,
- "No SCCP connection for endp 0x%x\n",
- ENDPOINT_NUMBER(endp));
- } else {
- if (con->bsc == bsc) {
- bsc_mgcp_send_dlcx(bsc, con->bsc_endp, con->bsc->next_transaction++);
- } else {
- LOGP(DMGCP, LOGL_ERROR,
- "Endpoint belongs to a different BSC\n");
- }
- }
- }
-
- bsc_mgcp_free_endpoint(bsc->nat, ENDPOINT_NUMBER(endp));
- mgcp_release_endp(endp);
-}
-
-static void bsc_mgcp_osmux_confirm(struct mgcp_endpoint *endp, const char *str)
-{
- unsigned int osmux_cid;
- char *res;
-
- res = strstr(str, "X-Osmux: ");
- if (!res) {
- LOGP(DMGCP, LOGL_INFO,
- "BSC doesn't want to use Osmux, failing back to RTP\n");
- goto err;
- }
-
- if (sscanf(res, "X-Osmux: %u", &osmux_cid) != 1) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to parse Osmux CID '%s'\n",
- str);
- goto err;
- }
-
- if (endp->osmux.cid != osmux_cid) {
- LOGP(DMGCP, LOGL_ERROR,
- "BSC sent us wrong CID %u, we expected %u",
- osmux_cid, endp->osmux.cid);
- goto err;
- }
-
- LOGP(DMGCP, LOGL_NOTICE, "bsc accepted to use Osmux (cid=%u)\n",
- osmux_cid);
- endp->osmux.state = OSMUX_STATE_ACTIVATING;
- return;
-err:
- osmux_release_cid(endp);
- endp->osmux.state = OSMUX_STATE_DISABLED;
-}
-
-/*
- * We have received a msg from the BSC. We will see if we know
- * this transaction and if it belongs to the BSC. Then we will
- * need to patch the content to point to the local network and we
- * need to update the I: that was assigned by the BSS.
- *
- * Only responses to CRCX and DLCX should arrive here. The DLCX
- * needs to be handled specially to combine the two statistics.
- */
-void bsc_mgcp_forward(struct bsc_connection *bsc, struct msgb *msg)
-{
- struct msgb *output;
- struct bsc_endpoint *bsc_endp = NULL;
- struct mgcp_endpoint *endp = NULL;
- int i, code;
- char transaction_id[60];
-
- /* Some assumption that our buffer is big enough.. and null terminate */
- if (msgb_l2len(msg) > 2000) {
- LOGP(DMGCP, LOGL_ERROR, "MGCP message too long.\n");
- return;
- }
-
- msg->l2h[msgb_l2len(msg)] = '\0';
-
- if (bsc_mgcp_parse_response((const char *) msg->l2h, &code, transaction_id) != 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to parse response code.\n");
- return;
- }
-
- for (i = 1; i < bsc->nat->mgcp_cfg->trunk.number_endpoints; ++i) {
- if (bsc->nat->bsc_endpoints[i].bsc != bsc)
- continue;
- /* no one listening? a bug? */
- if (!bsc->nat->bsc_endpoints[i].transaction_id)
- continue;
- if (strcmp(transaction_id, bsc->nat->bsc_endpoints[i].transaction_id) != 0)
- continue;
-
- endp = &bsc->nat->mgcp_cfg->trunk.endpoints[i];
- bsc_endp = &bsc->nat->bsc_endpoints[i];
- break;
- }
-
- if (!bsc_endp && strncmp("nat-", transaction_id, 4) == 0) {
- handle_dlcx_response(bsc, msg, code, transaction_id);
- return;
- }
-
- if (!bsc_endp) {
- LOGP(DMGCP, LOGL_ERROR, "Could not find active endpoint: %s for msg: '%s'\n",
- transaction_id, (const char *) msg->l2h);
- return;
- }
-
- endp->ci = bsc_mgcp_extract_ci((const char *) msg->l2h);
- if (endp->ci == CI_UNUSED) {
- free_chan_downstream(endp, bsc_endp, bsc);
- return;
- }
-
- if (endp->osmux.state == OSMUX_STATE_NEGOTIATING)
- bsc_mgcp_osmux_confirm(endp, (const char *) msg->l2h);
-
- /* If we require osmux and it is disabled.. fail */
- if (nat_osmux_only(bsc->nat->mgcp_cfg, bsc->cfg) &&
- endp->osmux.state == OSMUX_STATE_DISABLED) {
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to activate osmux endpoint 0x%x\n",
- ENDPOINT_NUMBER(endp));
- free_chan_downstream(endp, bsc_endp, bsc);
- return;
- }
-
- /* free some stuff */
- talloc_free(bsc_endp->transaction_id);
- bsc_endp->transaction_id = NULL;
- bsc_endp->transaction_state = 0;
-
- /*
- * rewrite the information. In case the endpoint was deleted
- * there should be nothing for us to rewrite so putting endp->rtp_port
- * with the value of 0 should be no problem.
- */
- output = bsc_mgcp_rewrite((char * ) msg->l2h, msgb_l2len(msg), -1,
- mgcp_net_src_addr(endp),
- endp->net_end.local_port, -1,
- &endp->bts_end.codec.payload_type,
- bsc->nat->sdp_ensure_amr_mode_set);
- if (!output) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to rewrite MGCP msg.\n");
- return;
- }
-
- mgcp_queue_for_call_agent(bsc->nat, output);
-}
-
-int bsc_mgcp_parse_response(const char *str, int *code, char transaction[60])
-{
- int rc;
- /* we want to parse two strings */
- rc = sscanf(str, "%3d %59s\n", code, transaction) != 2;
- transaction[59] = '\0';
- return rc;
-}
-
-uint32_t bsc_mgcp_extract_ci(const char *str)
-{
- unsigned int ci;
- char *res = strstr(str, "I: ");
- if (!res) {
- LOGP(DMGCP, LOGL_ERROR, "No CI in msg '%s'\n", str);
- return CI_UNUSED;
- }
-
- if (sscanf(res, "I: %u", &ci) != 1) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to parse CI in msg '%s'\n", str);
- return CI_UNUSED;
- }
-
- return ci;
-}
-
-/**
- * Create a new MGCPCommand based on the input and endpoint from a message
- */
-static void patch_mgcp(struct msgb *output, const char *op, const char *tok,
- int endp, int len, int cr, int osmux_cid)
-{
- int slen;
- int ret;
- char buf[40];
- char osmux_extension[strlen("\nX-Osmux: 255") + 1];
-
- buf[0] = buf[39] = '\0';
- ret = sscanf(tok, "%*s %s", buf);
- if (ret != 1) {
- LOGP(DMGCP, LOGL_ERROR,
- "Failed to find Endpoint in: %s\n", tok);
- return;
- }
-
- if (osmux_cid >= 0)
- sprintf(osmux_extension, "\nX-Osmux: %u", osmux_cid & 0xff);
- else
- osmux_extension[0] = '\0';
-
- slen = sprintf((char *) output->l3h, "%s %s %x@mgw MGCP 1.0%s%s",
- op, buf, endp, osmux_extension, cr ? "\r\n" : "\n");
- output->l3h = msgb_put(output, slen);
-}
-
-/* we need to replace some strings... */
-struct msgb *bsc_mgcp_rewrite(char *input, int length, int endpoint,
- const char *ip, int port, int osmux_cid,
- int *first_payload_type, int ensure_mode_set)
-{
- static const char crcx_str[] = "CRCX ";
- static const char dlcx_str[] = "DLCX ";
- static const char mdcx_str[] = "MDCX ";
-
- static const char ip_str[] = "c=IN IP4 ";
- static const char aud_str[] = "m=audio ";
- static const char fmt_str[] = "a=fmtp:";
-
- char buf[128];
- char *running, *token;
- struct msgb *output;
-
- /* keep state to add the a=fmtp line */
- int found_fmtp = 0;
- int payload = -1;
- int cr = 1;
-
- if (length > 4096 - 256) {
- LOGP(DMGCP, LOGL_ERROR, "Input is too long.\n");
- return NULL;
- }
-
- output = msgb_alloc_headroom(4096, 128, "MGCP rewritten");
- if (!output) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to allocate new MGCP msg.\n");
- return NULL;
- }
-
- running = input;
- output->l2h = output->data;
- output->l3h = output->l2h;
- for (token = strsep(&running, "\n"); running; token = strsep(&running, "\n")) {
- int len = strlen(token);
- cr = len > 0 && token[len - 1] == '\r';
-
- if (strncmp(crcx_str, token, (sizeof crcx_str) - 1) == 0) {
- patch_mgcp(output, "CRCX", token, endpoint, len, cr, osmux_cid);
- } else if (strncmp(dlcx_str, token, (sizeof dlcx_str) - 1) == 0) {
- patch_mgcp(output, "DLCX", token, endpoint, len, cr, -1);
- } else if (strncmp(mdcx_str, token, (sizeof mdcx_str) - 1) == 0) {
- patch_mgcp(output, "MDCX", token, endpoint, len, cr, -1);
- } else if (strncmp(ip_str, token, (sizeof ip_str) - 1) == 0) {
- output->l3h = msgb_put(output, strlen(ip_str));
- memcpy(output->l3h, ip_str, strlen(ip_str));
- output->l3h = msgb_put(output, strlen(ip));
- memcpy(output->l3h, ip, strlen(ip));
-
- if (cr) {
- output->l3h = msgb_put(output, 2);
- output->l3h[0] = '\r';
- output->l3h[1] = '\n';
- } else {
- output->l3h = msgb_put(output, 1);
- output->l3h[0] = '\n';
- }
- } else if (strncmp(aud_str, token, (sizeof aud_str) - 1) == 0) {
- int offset;
- if (sscanf(token, "m=audio %*d RTP/AVP %n%d", &offset, &payload) != 1) {
- LOGP(DMGCP, LOGL_ERROR, "Could not parsed audio line.\n");
- msgb_free(output);
- return NULL;
- }
-
- snprintf(buf, sizeof(buf)-1, "m=audio %d RTP/AVP %s\n",
- port, &token[offset]);
- buf[sizeof(buf)-1] = '\0';
-
- output->l3h = msgb_put(output, strlen(buf));
- memcpy(output->l3h, buf, strlen(buf));
- } else if (strncmp(fmt_str, token, (sizeof fmt_str) - 1) == 0) {
- found_fmtp = 1;
- goto copy;
- } else {
-copy:
- output->l3h = msgb_put(output, len + 1);
- memcpy(output->l3h, token, len);
- output->l3h[len] = '\n';
- }
- }
-
- /*
- * the above code made sure that we have 128 bytes lefts. So we can
- * safely append another line.
- */
- if (ensure_mode_set && !found_fmtp && payload != -1) {
- snprintf(buf, sizeof(buf) - 1, "a=fmtp:%d mode-set=2%s",
- payload, cr ? "\r\n" : "\n");
- buf[sizeof(buf) - 1] = '\0';
- output->l3h = msgb_put(output, strlen(buf));
- memcpy(output->l3h, buf, strlen(buf));
- }
-
- if (payload != -1 && first_payload_type)
- *first_payload_type = payload;
-
- return output;
-}
-
-/*
- * This comes from the MSC and we will now parse it. The caller needs
- * to free the msgb.
- */
-void bsc_nat_handle_mgcp(struct bsc_nat *nat, struct msgb *msg)
-{
- struct msgb *resp;
-
- if (!nat->mgcp_ipa) {
- LOGP(DMGCP, LOGL_ERROR, "MGCP message not allowed on IPA.\n");
- return;
- }
-
- if (msgb_l2len(msg) > sizeof(nat->mgcp_msg) - 1) {
- LOGP(DMGCP, LOGL_ERROR, "MGCP msg too big for handling.\n");
- return;
- }
-
- memcpy(nat->mgcp_msg, msg->l2h, msgb_l2len(msg));
- nat->mgcp_length = msgb_l2len(msg);
- nat->mgcp_msg[nat->mgcp_length] = '\0';
-
- /* now handle the message */
- resp = mgcp_handle_message(nat->mgcp_cfg, msg);
-
- /* we do have a direct answer... e.g. AUEP */
- if (resp)
- mgcp_queue_for_call_agent(nat, resp);
-
- return;
-}
-
-static int mgcp_do_read(struct osmo_fd *fd)
-{
- struct bsc_nat *nat;
- struct msgb *msg, *resp;
- int rc;
-
- nat = fd->data;
-
- rc = read(fd->fd, nat->mgcp_msg, sizeof(nat->mgcp_msg) - 1);
- if (rc <= 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to read errno: %d\n", errno);
- return -1;
- }
-
- nat->mgcp_msg[rc] = '\0';
- nat->mgcp_length = rc;
-
- msg = msgb_alloc(sizeof(nat->mgcp_msg), "MGCP GW Read");
- if (!msg) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to create buffer.\n");
- return -1;
- }
-
- msg->l2h = msgb_put(msg, rc);
- memcpy(msg->l2h, nat->mgcp_msg, msgb_l2len(msg));
- resp = mgcp_handle_message(nat->mgcp_cfg, msg);
- msgb_free(msg);
-
- /* we do have a direct answer... e.g. AUEP */
- if (resp)
- mgcp_queue_for_call_agent(nat, resp);
-
- return 0;
-}
-
-static int mgcp_do_write(struct osmo_fd *bfd, struct msgb *msg)
-{
- int rc;
-
- rc = write(bfd->fd, msg->data, msg->len);
-
- if (rc != msg->len) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to write msg to MGCP CallAgent.\n");
- return -1;
- }
-
- return rc;
-}
-
-static int init_mgcp_socket(struct bsc_nat *nat, struct mgcp_config *cfg)
-{
- struct sockaddr_in addr;
- int on;
-
- cfg->gw_fd.bfd.fd = socket(AF_INET, SOCK_DGRAM, 0);
- if (cfg->gw_fd.bfd.fd < 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to create MGCP socket. errno: %d\n", errno);
- return -1;
- }
-
- on = 1;
- setsockopt(cfg->gw_fd.bfd.fd, SOL_SOCKET, SO_REUSEADDR, &on, sizeof(on));
-
- memset(&addr, 0, sizeof(addr));
- addr.sin_family = AF_INET;
- addr.sin_port = htons(cfg->source_port);
- inet_aton(cfg->source_addr, &addr.sin_addr);
-
- if (bind(cfg->gw_fd.bfd.fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to bind on %s:%d errno: %d\n",
- cfg->source_addr, cfg->source_port, errno);
- close(cfg->gw_fd.bfd.fd);
- cfg->gw_fd.bfd.fd = -1;
- return -1;
- }
-
- addr.sin_port = htons(2727);
- inet_aton(cfg->call_agent_addr, &addr.sin_addr);
- if (connect(cfg->gw_fd.bfd.fd, (struct sockaddr *) &addr, sizeof(addr)) < 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to connect to: '%s'. errno: %d\n",
- cfg->call_agent_addr, errno);
- close(cfg->gw_fd.bfd.fd);
- cfg->gw_fd.bfd.fd = -1;
- return -1;
- }
-
- osmo_wqueue_init(&cfg->gw_fd, 10);
- cfg->gw_fd.bfd.when = BSC_FD_READ;
- cfg->gw_fd.bfd.data = nat;
- cfg->gw_fd.read_cb = mgcp_do_read;
- cfg->gw_fd.write_cb = mgcp_do_write;
-
- if (osmo_fd_register(&cfg->gw_fd.bfd) != 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to register MGCP fd.\n");
- close(cfg->gw_fd.bfd.fd);
- cfg->gw_fd.bfd.fd = -1;
- return -1;
- }
-
- return 0;
-}
-
-int bsc_mgcp_nat_init(struct bsc_nat *nat)
-{
- struct mgcp_config *cfg = nat->mgcp_cfg;
-
- if (!cfg->call_agent_addr) {
- LOGP(DMGCP, LOGL_ERROR, "The BSC nat requires the call agent ip to be set.\n");
- return -1;
- }
-
- if (cfg->bts_ip) {
- LOGP(DMGCP, LOGL_ERROR, "Do not set the BTS ip for the nat.\n");
- return -1;
- }
-
- /* initialize the MGCP socket */
- if (!nat->mgcp_ipa) {
- int rc = init_mgcp_socket(nat, cfg);
- if (rc != 0)
- return rc;
- }
-
-
- /* some more MGCP config handling */
- cfg->data = nat;
- cfg->policy_cb = bsc_mgcp_policy_cb;
-
- if (cfg->bts_ip)
- talloc_free(cfg->bts_ip);
- cfg->bts_ip = "";
-
- nat->bsc_endpoints = talloc_zero_array(nat,
- struct bsc_endpoint,
- cfg->trunk.number_endpoints + 1);
- if (!nat->bsc_endpoints) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to allocate nat endpoints\n");
- close(cfg->gw_fd.bfd.fd);
- cfg->gw_fd.bfd.fd = -1;
- return -1;
- }
-
- if (mgcp_reset_transcoder(cfg) < 0) {
- LOGP(DMGCP, LOGL_ERROR, "Failed to send packet to the transcoder.\n");
- talloc_free(nat->bsc_endpoints);
- nat->bsc_endpoints = NULL;
- close(cfg->gw_fd.bfd.fd);
- cfg->gw_fd.bfd.fd = -1;
- return -1;
- }
-
- return 0;
-}
-
-void bsc_mgcp_clear_endpoints_for(struct bsc_connection *bsc)
-{
- struct rate_ctr *ctr = NULL;
- int i;
-
- if (bsc->cfg)
- ctr = &bsc->cfg->stats.ctrg->ctr[BCFG_CTR_DROPPED_CALLS];
-
- for (i = 1; i < bsc->nat->mgcp_cfg->trunk.number_endpoints; ++i) {
- struct bsc_endpoint *bsc_endp = &bsc->nat->bsc_endpoints[i];
-
- if (bsc_endp->bsc != bsc)
- continue;
-
- if (ctr)
- rate_ctr_inc(ctr);
-
- bsc_mgcp_free_endpoint(bsc->nat, i);
- mgcp_release_endp(&bsc->nat->mgcp_cfg->trunk.endpoints[i]);
- }
-}
diff --git a/src/osmo-bsc_nat/bsc_nat.c b/src/osmo-bsc_nat/bsc_nat.c
deleted file mode 100644
index 401288d84..000000000
--- a/src/osmo-bsc_nat/bsc_nat.c
+++ /dev/null
@@ -1,1739 +0,0 @@
-/* BSC Multiplexer/NAT */
-
-/*
- * (C) 2010-2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2013 by On-Waves
- * (C) 2009 by Harald Welte <laforge@gnumonks.org>
- * 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/>.
- *
- */
-#include <sys/socket.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <netinet/in.h>
-#include <netinet/tcp.h>
-#include <arpa/inet.h>
-
-#include <errno.h>
-#include <signal.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <time.h>
-#include <unistd.h>
-#include <fcntl.h>
-#include <libgen.h>
-
-#define _GNU_SOURCE
-#include <getopt.h>
-
-#include <openbsc/debug.h>
-#include <openbsc/bsc_msc.h>
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/abis_nm.h>
-#include <openbsc/socket.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <osmocom/ctrl/control_if.h>
-#include <osmocom/ctrl/ports.h>
-#include <osmocom/ctrl/control_vty.h>
-
-#include <osmocom/crypt/auth.h>
-
-#include <osmocom/core/application.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/stats.h>
-
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-
-#include <osmocom/vty/telnet_interface.h>
-#include <osmocom/vty/vty.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/stats.h>
-#include <osmocom/vty/ports.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <osmocom/abis/ipa.h>
-
-#include <openssl/rand.h>
-
-#include "../../bscconfig.h"
-
-#define SCCP_CLOSE_TIME 20
-#define SCCP_CLOSE_TIME_TIMEOUT 19
-
-static const char *config_file = "bsc-nat.cfg";
-static struct in_addr local_addr;
-static struct osmo_fd bsc_listen;
-static const char *msc_ip = NULL;
-static struct osmo_timer_list sccp_close;
-static int daemonize = 0;
-
-const char *openbsc_copyright =
- "Copyright (C) 2010 Holger Hans Peter Freyther and On-Waves\r\n"
- "License AGPLv3+: GNU AGPL version 3 or later <http://gnu.org/licenses/agpl-3.0.html>\r\n"
- "This is free software: you are free to change and redistribute it.\r\n"
- "There is NO WARRANTY, to the extent permitted by law.\r\n";
-
-static struct bsc_nat *nat;
-static void bsc_send_data(struct bsc_connection *bsc, const uint8_t *data, unsigned int length, int);
-static void msc_send_reset(struct bsc_msc_connection *con);
-static void bsc_stat_reject(int filter, struct bsc_connection *bsc, int normal);
-
-struct bsc_config *bsc_config_num(struct bsc_nat *nat, int num)
-{
- struct bsc_config *conf;
-
- llist_for_each_entry(conf, &nat->bsc_configs, entry)
- if (conf->nr == num)
- return conf;
-
- return NULL;
-}
-
-static void queue_for_msc(struct bsc_msc_connection *con, struct msgb *msg)
-{
- if (!con) {
- LOGP(DLINP, LOGL_ERROR, "No MSC Connection assigned. Check your code.\n");
- msgb_free(msg);
- return;
- }
-
-
- if (osmo_wqueue_enqueue(&con->write_queue, msg) != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to enqueue the write.\n");
- msgb_free(msg);
- }
-}
-
-static void send_reset_ack(struct bsc_connection *bsc)
-{
- static const uint8_t gsm_reset_ack[] = {
- 0x09, 0x00, 0x03, 0x07, 0x0b, 0x04, 0x43, 0x01,
- 0x00, 0xfe, 0x04, 0x43, 0x5c, 0x00, 0xfe, 0x03,
- 0x00, 0x01, 0x31,
- };
-
- bsc_send_data(bsc, gsm_reset_ack, sizeof(gsm_reset_ack), IPAC_PROTO_SCCP);
-}
-
-static void send_ping(struct bsc_connection *bsc)
-{
- static const uint8_t id_ping[] = {
- IPAC_MSGT_PING,
- };
-
- bsc_send_data(bsc, id_ping, sizeof(id_ping), IPAC_PROTO_IPACCESS);
-}
-
-static void send_pong(struct bsc_connection *bsc)
-{
- static const uint8_t id_pong[] = {
- IPAC_MSGT_PONG,
- };
-
- bsc_send_data(bsc, id_pong, sizeof(id_pong), IPAC_PROTO_IPACCESS);
-}
-
-static void bsc_pong_timeout(void *_bsc)
-{
- struct bsc_connection *bsc = _bsc;
-
- LOGP(DNAT, LOGL_ERROR, "BSC Nr: %d PONG timeout.\n", bsc->cfg->nr);
- bsc_close_connection(bsc);
-}
-
-static void bsc_ping_timeout(void *_bsc)
-{
- struct bsc_connection *bsc = _bsc;
-
- if (bsc->nat->ping_timeout < 0)
- return;
-
- send_ping(bsc);
-
- /* send another ping in 20 seconds */
- osmo_timer_schedule(&bsc->ping_timeout, bsc->nat->ping_timeout, 0);
-
- /* also start a pong timer */
- osmo_timer_schedule(&bsc->pong_timeout, bsc->nat->pong_timeout, 0);
-}
-
-static void start_ping_pong(struct bsc_connection *bsc)
-{
- osmo_timer_setup(&bsc->pong_timeout, bsc_pong_timeout, bsc);
- osmo_timer_setup(&bsc->ping_timeout, bsc_ping_timeout, bsc);
-
- bsc_ping_timeout(bsc);
-}
-
-static void send_id_ack(struct bsc_connection *bsc)
-{
- static const uint8_t id_ack[] = {
- IPAC_MSGT_ID_ACK
- };
-
- bsc_send_data(bsc, id_ack, sizeof(id_ack), IPAC_PROTO_IPACCESS);
-}
-
-static void send_id_req(struct bsc_nat *nat, struct bsc_connection *bsc)
-{
- static const uint8_t s_id_req[] = {
- IPAC_MSGT_ID_GET,
- 0x01, IPAC_IDTAG_UNIT,
- 0x01, IPAC_IDTAG_MACADDR,
- 0x01, IPAC_IDTAG_LOCATION1,
- 0x01, IPAC_IDTAG_LOCATION2,
- 0x01, IPAC_IDTAG_EQUIPVERS,
- 0x01, IPAC_IDTAG_SWVERSION,
- 0x01, IPAC_IDTAG_UNITNAME,
- 0x01, IPAC_IDTAG_SERNR,
- };
-
- uint8_t *mrand;
- uint8_t id_req[sizeof(s_id_req) + (2+16)];
- uint8_t *buf = &id_req[sizeof(s_id_req)];
-
- /* copy the static data */
- memcpy(id_req, s_id_req, sizeof(s_id_req));
-
- /* put the RAND with length, tag, value */
- buf = v_put(buf, 0x11);
- buf = v_put(buf, 0x23);
- mrand = bsc->last_rand;
-
- if (RAND_bytes(mrand, 16) != 1)
- goto failed_random;
-
- memcpy(buf, mrand, 16);
- buf += 16;
-
- bsc_send_data(bsc, id_req, sizeof(id_req), IPAC_PROTO_IPACCESS);
- return;
-
-failed_random:
- /* the timeout will trigger and close this connection */
- LOGP(DNAT, LOGL_ERROR, "Failed to read from urandom.\n");
- return;
-}
-
-static struct msgb *nat_create_rlsd(struct nat_sccp_connection *conn)
-{
- struct sccp_connection_released *rel;
- struct msgb *msg;
-
- msg = msgb_alloc_headroom(4096, 128, "rlsd");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate released.\n");
- return NULL;
- }
-
- msg->l2h = msgb_put(msg, sizeof(*rel));
- rel = (struct sccp_connection_released *) msg->l2h;
- rel->type = SCCP_MSG_TYPE_RLSD;
- rel->release_cause = SCCP_RELEASE_CAUSE_SCCP_FAILURE;
- rel->destination_local_reference = conn->remote_ref;
- rel->source_local_reference = conn->patched_ref;
-
- return msg;
-}
-
-static void nat_send_rlsd_ussd(struct bsc_nat *nat, struct nat_sccp_connection *conn)
-{
- struct msgb *msg;
-
- if (!nat->ussd_con)
- return;
-
- msg = nat_create_rlsd(conn);
- if (!msg)
- return;
-
- bsc_do_write(&nat->ussd_con->queue, msg, IPAC_PROTO_SCCP);
-}
-
-static void nat_send_rlsd_msc(struct nat_sccp_connection *conn)
-{
- struct msgb *msg;
-
- msg = nat_create_rlsd(conn);
- if (!msg)
- return;
-
- ipa_prepend_header(msg, IPAC_PROTO_SCCP);
- queue_for_msc(conn->msc_con, msg);
-}
-
-static void nat_send_rlsd_bsc(struct nat_sccp_connection *conn)
-{
- struct msgb *msg;
- struct sccp_connection_released *rel;
-
- msg = msgb_alloc_headroom(4096, 128, "rlsd");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate clear command.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, sizeof(*rel));
- rel = (struct sccp_connection_released *) msg->l2h;
- rel->type = SCCP_MSG_TYPE_RLSD;
- rel->release_cause = SCCP_RELEASE_CAUSE_SCCP_FAILURE;
- rel->destination_local_reference = conn->real_ref;
- rel->source_local_reference = conn->remote_ref;
-
- bsc_write(conn->bsc, msg, IPAC_PROTO_SCCP);
-}
-
-static struct msgb *nat_creat_clrc(struct nat_sccp_connection *conn, uint8_t cause)
-{
- struct msgb *msg;
- struct msgb *sccp;
-
- msg = gsm0808_create_clear_command(cause);
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate clear command.\n");
- return NULL;
- }
-
- sccp = sccp_create_dt1(&conn->real_ref, msg->data, msg->len);
- if (!sccp) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate SCCP msg.\n");
- msgb_free(msg);
- return NULL;
- }
-
- msgb_free(msg);
- return sccp;
-}
-
-static int nat_send_clrc_bsc(struct nat_sccp_connection *conn)
-{
- struct msgb *sccp;
-
- sccp = nat_creat_clrc(conn, 0x20);
- if (!sccp)
- return -1;
- return bsc_write(conn->bsc, sccp, IPAC_PROTO_SCCP);
-}
-
-static void nat_send_rlc(struct bsc_msc_connection *msc_con,
- struct sccp_source_reference *src,
- struct sccp_source_reference *dst)
-{
- struct sccp_connection_release_complete *rlc;
- struct msgb *msg;
-
- msg = msgb_alloc_headroom(4096, 128, "rlc");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to sccp rlc.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, sizeof(*rlc));
- rlc = (struct sccp_connection_release_complete *) msg->l2h;
- rlc->type = SCCP_MSG_TYPE_RLC;
- rlc->destination_local_reference = *dst;
- rlc->source_local_reference = *src;
-
- ipa_prepend_header(msg, IPAC_PROTO_SCCP);
-
- queue_for_msc(msc_con, msg);
-}
-
-static void send_mgcp_reset(struct bsc_connection *bsc)
-{
- static const uint8_t mgcp_reset[] = {
- "RSIP 1 13@mgw MGCP 1.0\r\n"
- };
-
- bsc_write_mgcp(bsc, mgcp_reset, sizeof mgcp_reset - 1);
-}
-
-void bsc_nat_send_mgcp_to_msc(struct bsc_nat *nat, struct msgb *msg)
-{
- ipa_prepend_header(msg, IPAC_PROTO_MGCP_OLD);
- queue_for_msc(nat->msc_con, msg);
-}
-
-/*
- * Below is the handling of messages coming
- * from the MSC and need to be forwarded to
- * a real BSC.
- */
-static void initialize_msc_if_needed(struct bsc_msc_connection *msc_con)
-{
- if (msc_con->first_contact)
- return;
-
- msc_con->first_contact = 1;
- msc_send_reset(msc_con);
-}
-
-static void send_id_get_response(struct bsc_msc_connection *msc_con)
-{
- struct msgb *msg = bsc_msc_id_get_resp(0, nat->token, NULL, 0);
- if (!msg)
- return;
-
- ipa_prepend_header(msg, IPAC_PROTO_IPACCESS);
- queue_for_msc(msc_con, msg);
-}
-
-/*
- * Currently we are lacking refcounting so we need to copy each message.
- */
-static void bsc_send_data(struct bsc_connection *bsc, const uint8_t *data, unsigned int length, int proto)
-{
- struct msgb *msg;
-
- if (length > 4096 - 128) {
- LOGP(DLINP, LOGL_ERROR, "Can not send message of that size.\n");
- return;
- }
-
- msg = msgb_alloc_headroom(4096, 128, "to-bsc");
- if (!msg) {
- LOGP(DLINP, LOGL_ERROR, "Failed to allocate memory for BSC msg.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, length);
- memcpy(msg->data, data, length);
-
- bsc_write(bsc, msg, proto);
-}
-
-/*
- * Update the release statistics
- */
-static void bsc_stat_reject(int filter, struct bsc_connection *bsc, int normal)
-{
- if (!bsc->cfg) {
- LOGP(DNAT, LOGL_ERROR, "BSC is not authenticated.");
- return;
- }
-
- if (filter >= 0) {
- LOGP(DNAT, LOGL_ERROR, "Connection was not rejected");
- return;
- }
-
- if (filter == -1)
- rate_ctr_inc(&bsc->cfg->stats.ctrg->ctr[BCFG_CTR_ILL_PACKET]);
- else if (normal)
- rate_ctr_inc(&bsc->cfg->stats.ctrg->ctr[BCFG_CTR_REJECTED_MSG]);
- else
- rate_ctr_inc(&bsc->cfg->stats.ctrg->ctr[BCFG_CTR_REJECTED_CR]);
-}
-
-/*
- * Release an established connection. We will have to release it to the BSC
- * and to the network and we do it the following way.
- * 1.) Give up on the MSC side
- * 1.1) Send a RLSD message, it is a bit non standard but should work, we
- * ignore the RLC... we might complain about it. Other options would
- * be to send a Release Request, handle the Release Complete..
- * 1.2) Mark the data structure to be con_local and wait for 2nd
- *
- * 2.) Give up on the BSC side
- * 2.1) Depending on the con type reject the service, or just close it
- */
-static void bsc_send_con_release(struct bsc_connection *bsc,
- struct nat_sccp_connection *con,
- struct bsc_filter_reject_cause *cause)
-{
- struct msgb *rlsd;
- /* 1. release the network */
- rlsd = sccp_create_rlsd(&con->patched_ref, &con->remote_ref,
- SCCP_RELEASE_CAUSE_END_USER_ORIGINATED);
- if (!rlsd)
- LOGP(DNAT, LOGL_ERROR, "Failed to create RLSD message.\n");
- else {
- ipa_prepend_header(rlsd, IPAC_PROTO_SCCP);
- queue_for_msc(con->msc_con, rlsd);
- }
- con->con_local = NAT_CON_END_LOCAL;
- con->msc_con = NULL;
-
- /* 2. release the BSC side */
- if (con->filter_state.con_type == FLT_CON_TYPE_LU) {
- struct msgb *payload, *udt;
- payload = gsm48_create_loc_upd_rej(cause->lu_reject_cause);
-
- if (payload) {
- gsm0808_prepend_dtap_header(payload, 0);
- udt = sccp_create_dt1(&con->real_ref, payload->data, payload->len);
- if (udt)
- bsc_write(bsc, udt, IPAC_PROTO_SCCP);
- else
- LOGP(DNAT, LOGL_ERROR, "Failed to create DT1\n");
-
- msgb_free(payload);
- } else {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate LU Reject.\n");
- }
- }
-
- nat_send_clrc_bsc(con);
-
- rlsd = sccp_create_rlsd(&con->remote_ref, &con->real_ref,
- SCCP_RELEASE_CAUSE_END_USER_ORIGINATED);
- if (!rlsd) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate RLSD for the BSC.\n");
- sccp_connection_destroy(con);
- return;
- }
-
- con->filter_state.con_type = FLT_CON_TYPE_LOCAL_REJECT;
- bsc_write(bsc, rlsd, IPAC_PROTO_SCCP);
-}
-
-static void bsc_send_con_refuse(struct bsc_connection *bsc,
- struct bsc_nat_parsed *parsed, int con_type,
- struct bsc_filter_reject_cause *cause)
-{
- struct msgb *payload;
- struct msgb *refuse;
-
- if (con_type == FLT_CON_TYPE_LU)
- payload = gsm48_create_loc_upd_rej(cause->lu_reject_cause);
- else if (con_type == FLT_CON_TYPE_CM_SERV_REQ || con_type == FLT_CON_TYPE_SSA)
- payload = gsm48_create_mm_serv_rej(cause->cm_reject_cause);
- else {
- LOGP(DNAT, LOGL_ERROR, "Unknown connection type: %d\n", con_type);
- payload = NULL;
- }
-
- /*
- * Some BSCs do not handle the payload inside a SCCP CREF msg
- * so we will need to:
- * 1.) Allocate a local connection and mark it as local..
- * 2.) queue data for downstream.. and the RLC should delete everything
- */
- if (payload) {
- struct msgb *cc, *udt, *clear, *rlsd;
- struct nat_sccp_connection *con;
- con = create_sccp_src_ref(bsc, parsed);
- if (!con)
- goto send_refuse;
-
- /* declare it local and assign a unique remote_ref */
- con->filter_state.con_type = FLT_CON_TYPE_LOCAL_REJECT;
- con->con_local = NAT_CON_END_LOCAL;
- con->has_remote_ref = 1;
- con->remote_ref = con->patched_ref;
-
- /* 1. create a confirmation */
- cc = sccp_create_cc(&con->remote_ref, &con->real_ref);
- if (!cc)
- goto send_refuse;
-
- /* 2. create the DT1 */
- gsm0808_prepend_dtap_header(payload, 0);
- udt = sccp_create_dt1(&con->real_ref, payload->data, payload->len);
- if (!udt) {
- msgb_free(cc);
- goto send_refuse;
- }
-
- /* 3. send a Clear Command */
- clear = nat_creat_clrc(con, 0x20);
- if (!clear) {
- msgb_free(cc);
- msgb_free(udt);
- goto send_refuse;
- }
-
- /* 4. send a RLSD */
- rlsd = sccp_create_rlsd(&con->remote_ref, &con->real_ref,
- SCCP_RELEASE_CAUSE_END_USER_ORIGINATED);
- if (!rlsd) {
- msgb_free(cc);
- msgb_free(udt);
- msgb_free(clear);
- goto send_refuse;
- }
-
- bsc_write(bsc, cc, IPAC_PROTO_SCCP);
- bsc_write(bsc, udt, IPAC_PROTO_SCCP);
- bsc_write(bsc, clear, IPAC_PROTO_SCCP);
- bsc_write(bsc, rlsd, IPAC_PROTO_SCCP);
- msgb_free(payload);
- return;
- }
-
-
-send_refuse:
- if (payload)
- msgb_free(payload);
-
- refuse = sccp_create_refuse(parsed->src_local_ref,
- SCCP_REFUSAL_SCCP_FAILURE, NULL, 0);
- if (!refuse) {
- LOGP(DNAT, LOGL_ERROR,
- "Creating refuse msg failed for SCCP 0x%x on BSC Nr: %d.\n",
- sccp_src_ref_to_int(parsed->src_local_ref), bsc->cfg->nr);
- return;
- }
-
- bsc_write(bsc, refuse, IPAC_PROTO_SCCP);
-}
-
-static void bsc_nat_send_paging(struct bsc_connection *bsc, struct msgb *msg)
-{
- if (bsc->cfg->forbid_paging) {
- LOGP(DNAT, LOGL_DEBUG, "Paging forbidden for BTS: %d\n", bsc->cfg->nr);
- return;
- }
-
- bsc_send_data(bsc, msg->l2h, msgb_l2len(msg), IPAC_PROTO_SCCP);
-}
-
-static void bsc_nat_handle_paging(struct bsc_nat *nat, struct msgb *msg)
-{
- struct bsc_connection *bsc;
- const uint8_t *paging_start;
- int paging_length, i, ret;
-
- ret = bsc_nat_find_paging(msg, &paging_start, &paging_length);
- if (ret != 0) {
- LOGP(DNAT, LOGL_ERROR, "Could not parse paging message: %d\n", ret);
- return;
- }
-
- /* This is quite expensive now */
- for (i = 0; i < paging_length; i += 2) {
- unsigned int _lac = ntohs(*(unsigned int *) &paging_start[i]);
- unsigned int paged = 0;
- llist_for_each_entry(bsc, &nat->bsc_connections, list_entry) {
- if (!bsc->cfg)
- continue;
- if (!bsc->authenticated)
- continue;
- if (!bsc_config_handles_lac(bsc->cfg, _lac))
- continue;
- bsc_nat_send_paging(bsc, msg);
- paged += 1;
- }
-
- /* highlight a possible config issue */
- if (paged == 0)
- LOGP(DNAT, LOGL_ERROR, "No BSC for LAC %d/0x%d\n", _lac, _lac);
-
- }
-}
-
-
-/*
- * Update the auth status. This can be either a CIPHER MODE COMMAND or
- * a CM Serivce Accept. Maybe also LU Accept or such in the future.
- */
-static void update_con_authorize(struct nat_sccp_connection *con,
- struct bsc_nat_parsed *parsed,
- struct msgb *msg)
-{
- if (!con)
- return;
- if (con->authorized)
- return;
-
- if (parsed->bssap == BSSAP_MSG_BSS_MANAGEMENT &&
- parsed->gsm_type == BSS_MAP_MSG_CIPHER_MODE_CMD) {
- con->authorized = 1;
- } else if (parsed->bssap == BSSAP_MSG_DTAP) {
- uint8_t msg_type, proto;
- uint32_t len;
- struct gsm48_hdr *hdr48;
- hdr48 = bsc_unpack_dtap(parsed, msg, &len);
- if (!hdr48)
- return;
-
- proto = gsm48_hdr_pdisc(hdr48);
- msg_type = gsm48_hdr_msg_type(hdr48);
- if (proto == GSM48_PDISC_MM &&
- msg_type == GSM48_MT_MM_CM_SERV_ACC)
- con->authorized = 1;
- }
-}
-
-static int forward_sccp_to_bts(struct bsc_msc_connection *msc_con, struct msgb *msg)
-{
- struct nat_sccp_connection *con = NULL;
- struct bsc_connection *bsc;
- struct bsc_nat_parsed *parsed;
- int proto;
-
- /* filter, drop, patch the message? */
- parsed = bsc_nat_parse(msg);
- if (!parsed) {
- LOGP(DNAT, LOGL_ERROR, "Can not parse msg from BSC.\n");
- return -1;
- }
-
- if (bsc_nat_filter_ipa(DIR_BSC, msg, parsed))
- goto exit;
-
- proto = parsed->ipa_proto;
-
- /* Route and modify the SCCP packet */
- if (proto == IPAC_PROTO_SCCP) {
- switch (parsed->sccp_type) {
- case SCCP_MSG_TYPE_UDT:
- /* forward UDT messages to every BSC */
- goto send_to_all;
- break;
- case SCCP_MSG_TYPE_RLSD:
- case SCCP_MSG_TYPE_CREF:
- case SCCP_MSG_TYPE_DT1:
- case SCCP_MSG_TYPE_IT:
- con = patch_sccp_src_ref_to_bsc(msg, parsed, nat);
- if (parsed->gsm_type == BSS_MAP_MSG_ASSIGMENT_RQST) {
- osmo_counter_inc(nat->stats.sccp.calls);
-
- if (con) {
- struct rate_ctr_group *ctrg;
- ctrg = con->bsc->cfg->stats.ctrg;
- rate_ctr_inc(&ctrg->ctr[BCFG_CTR_SCCP_CALLS]);
- if (bsc_mgcp_assign_patch(con, msg) != 0)
- LOGP(DNAT, LOGL_ERROR, "Failed to assign...\n");
- } else
- LOGP(DNAT, LOGL_ERROR, "Assignment command but no BSC.\n");
- } else if (con && con->con_local == NAT_CON_END_USSD &&
- parsed->gsm_type == BSS_MAP_MSG_CLEAR_CMD) {
- LOGP(DNAT, LOGL_NOTICE, "Clear Command for USSD Connection. Ignoring.\n");
- con = NULL;
- }
- break;
- case SCCP_MSG_TYPE_CC:
- con = patch_sccp_src_ref_to_bsc(msg, parsed, nat);
- if (!con || update_sccp_src_ref(con, parsed) != 0)
- goto exit;
- break;
- case SCCP_MSG_TYPE_RLC:
- LOGP(DNAT, LOGL_ERROR, "Unexpected release complete from MSC.\n");
- goto exit;
- break;
- case SCCP_MSG_TYPE_CR:
- /* MSC never opens a SCCP connection, fall through */
- default:
- goto exit;
- }
-
- if (!con && parsed->sccp_type == SCCP_MSG_TYPE_RLSD) {
- LOGP(DNAT, LOGL_NOTICE, "Sending fake RLC on RLSD message to network.\n");
- /* Exchange src/dest for the reply */
- nat_send_rlc(msc_con, &parsed->original_dest_ref,
- parsed->src_local_ref);
- } else if (!con)
- LOGP(DNAT, LOGL_ERROR, "Unknown connection for msg type: 0x%x from the MSC.\n", parsed->sccp_type);
- }
-
- if (!con) {
- talloc_free(parsed);
- return -1;
- }
- if (!con->bsc->authenticated) {
- talloc_free(parsed);
- LOGP(DNAT, LOGL_ERROR, "Selected BSC not authenticated.\n");
- return -1;
- }
-
- update_con_authorize(con, parsed, msg);
- talloc_free(parsed);
-
- bsc_send_data(con->bsc, msg->l2h, msgb_l2len(msg), proto);
- return 0;
-
-send_to_all:
- /*
- * Filter Paging from the network. We do not want to send a PAGING
- * Command to every BSC in our network. We will analys the PAGING
- * message and then send it to the authenticated messages...
- */
- if (parsed->ipa_proto == IPAC_PROTO_SCCP && parsed->gsm_type == BSS_MAP_MSG_PAGING) {
- bsc_nat_handle_paging(nat, msg);
- goto exit;
- }
- /* currently send this to every BSC connected */
- llist_for_each_entry(bsc, &nat->bsc_connections, list_entry) {
- if (!bsc->authenticated)
- continue;
-
- bsc_send_data(bsc, msg->l2h, msgb_l2len(msg), parsed->ipa_proto);
- }
-
-exit:
- talloc_free(parsed);
- return 0;
-}
-
-static void msc_connection_was_lost(struct bsc_msc_connection *con)
-{
- struct bsc_connection *bsc, *tmp;
-
- LOGP(DMSC, LOGL_ERROR, "Closing all connections downstream.\n");
- llist_for_each_entry_safe(bsc, tmp, &nat->bsc_connections, list_entry)
- bsc_close_connection(bsc);
-
- bsc_mgcp_free_endpoints(nat);
- bsc_msc_schedule_connect(con);
-}
-
-static void msc_connection_connected(struct bsc_msc_connection *con)
-{
- osmo_counter_inc(nat->stats.msc.reconn);
-}
-
-static void msc_send_reset(struct bsc_msc_connection *msc_con)
-{
- static const uint8_t reset[] = {
- 0x00, 0x12, 0xfd,
- 0x09, 0x00, 0x03, 0x05, 0x07, 0x02, 0x42, 0xfe,
- 0x02, 0x42, 0xfe, 0x06, 0x00, 0x04, 0x30, 0x04,
- 0x01, 0x20
- };
-
- struct msgb *msg;
-
- msg = msgb_alloc_headroom(4096, 128, "08.08 reset");
- if (!msg) {
- LOGP(DMSC, LOGL_ERROR, "Failed to allocate reset msg.\n");
- return;
- }
-
- msg->l2h = msgb_put(msg, sizeof(reset));
- memcpy(msg->l2h, reset, msgb_l2len(msg));
-
- queue_for_msc(msc_con, msg);
-
- LOGP(DMSC, LOGL_NOTICE, "Scheduled GSM0808 reset msg for the MSC.\n");
-}
-
-static int ipaccess_msc_read_cb(struct osmo_fd *bfd)
-{
- struct bsc_msc_connection *msc_con;
- struct msgb *msg = NULL;
- struct ipaccess_head *hh;
- int ret;
-
- msc_con = (struct bsc_msc_connection *) bfd->data;
-
- ret = ipa_msg_recv_buffered(bfd->fd, &msg, &msc_con->pending_msg);
- if (ret <= 0) {
- if (ret == -EAGAIN)
- return 0;
- if (ret == 0)
- LOGP(DNAT, LOGL_FATAL,
- "The connection the MSC(%s) was lost, exiting\n",
- msc_con->name);
- else
- LOGP(DNAT, LOGL_ERROR,
- "Failed to parse ip access message on %s: %d\n",
- msc_con->name, ret);
-
- bsc_msc_lost(msc_con);
- return -1;
- }
-
- LOGP(DNAT, LOGL_DEBUG,
- "MSG from MSC(%s): %s proto: %d\n", msc_con->name,
- osmo_hexdump(msg->data, msg->len), msg->l2h[0]);
-
- /* handle base message handling */
- hh = (struct ipaccess_head *) msg->data;
-
- /* initialize the networking. This includes sending a GSM08.08 message */
- if (hh->proto == IPAC_PROTO_IPACCESS) {
- ipa_ccm_rcvmsg_base(msg, bfd);
- if (msg->l2h[0] == IPAC_MSGT_ID_ACK)
- initialize_msc_if_needed(msc_con);
- else if (msg->l2h[0] == IPAC_MSGT_ID_GET)
- send_id_get_response(msc_con);
- } else if (hh->proto == IPAC_PROTO_SCCP) {
- forward_sccp_to_bts(msc_con, msg);
- } else if (hh->proto == IPAC_PROTO_MGCP_OLD) {
- bsc_nat_handle_mgcp(nat, msg);
- }
-
- msgb_free(msg);
- return 0;
-}
-
-static int ipaccess_msc_write_cb(struct osmo_fd *bfd, struct msgb *msg)
-{
- int rc;
- rc = write(bfd->fd, msg->data, msg->len);
-
- if (rc != msg->len) {
- LOGP(DNAT, LOGL_ERROR, "Failed to write MSG to MSC.\n");
- return -1;
- }
-
- return rc;
-}
-
-/*
- * Below is the handling of messages coming
- * from the BSC and need to be forwarded to
- * a real BSC.
- */
-
-/*
- * Remove the connection from the connections list,
- * remove it from the patching of SCCP header lists
- * as well. Maybe in the future even close connection..
- */
-void bsc_close_connection(struct bsc_connection *connection)
-{
- struct nat_sccp_connection *sccp_patch, *tmp;
- struct bsc_cmd_list *cmd_entry, *cmd_tmp;
- struct rate_ctr *ctr = NULL;
-
- /* stop the timeout timer */
- osmo_timer_del(&connection->id_timeout);
- osmo_timer_del(&connection->ping_timeout);
- osmo_timer_del(&connection->pong_timeout);
-
- if (connection->cfg)
- ctr = &connection->cfg->stats.ctrg->ctr[BCFG_CTR_DROPPED_SCCP];
-
- /* remove all SCCP connections */
- llist_for_each_entry_safe(sccp_patch, tmp, &nat->sccp_connections, list_entry) {
- if (sccp_patch->bsc != connection)
- continue;
-
- if (ctr)
- rate_ctr_inc(ctr);
- if (sccp_patch->has_remote_ref) {
- if (sccp_patch->con_local == NAT_CON_END_MSC)
- nat_send_rlsd_msc(sccp_patch);
- else if (sccp_patch->con_local == NAT_CON_END_USSD)
- nat_send_rlsd_ussd(nat, sccp_patch);
- }
-
- sccp_connection_destroy(sccp_patch);
- }
-
- /* Reply to all outstanding commands */
- llist_for_each_entry_safe(cmd_entry, cmd_tmp, &connection->cmd_pending, list_entry) {
- cmd_entry->cmd->type = CTRL_TYPE_ERROR;
- cmd_entry->cmd->reply = "BSC closed the connection";
- ctrl_cmd_send(&cmd_entry->ccon->write_queue, cmd_entry->cmd);
- bsc_nat_ctrl_del_pending(cmd_entry);
- }
-
- /* close endpoints allocated by this BSC */
- bsc_mgcp_clear_endpoints_for(connection);
-
- osmo_fd_unregister(&connection->write_queue.bfd);
- close(connection->write_queue.bfd.fd);
- osmo_wqueue_clear(&connection->write_queue);
- llist_del(&connection->list_entry);
-
- if (connection->pending_msg) {
- LOGP(DNAT, LOGL_ERROR, "Dropping partial message on connection %d.\n",
- connection->cfg ? connection->cfg->nr : -1);
- msgb_free(connection->pending_msg);
- connection->pending_msg = NULL;
- }
-
- talloc_free(connection);
-}
-
-static void bsc_maybe_close(struct bsc_connection *bsc)
-{
- struct nat_sccp_connection *sccp;
- if (!bsc->nat->blocked)
- return;
-
- /* are there any connections left */
- llist_for_each_entry(sccp, &bsc->nat->sccp_connections, list_entry)
- if (sccp->bsc == bsc)
- return;
-
- /* nothing left, close the BSC */
- LOGP(DNAT, LOGL_NOTICE, "Cleaning up BSC %d in blocking mode.\n",
- bsc->cfg ? bsc->cfg->nr : -1);
- bsc_close_connection(bsc);
-}
-
-static void ipaccess_close_bsc(void *data)
-{
- struct sockaddr_in sock;
- socklen_t len = sizeof(sock);
- struct bsc_connection *conn = data;
-
-
- getpeername(conn->write_queue.bfd.fd, (struct sockaddr *) &sock, &len);
- LOGP(DNAT, LOGL_ERROR, "BSC on %s didn't respond to identity request. Closing.\n",
- inet_ntoa(sock.sin_addr));
- bsc_close_connection(conn);
-}
-
-static int verify_key(struct bsc_connection *conn, struct bsc_config *conf, const uint8_t *key, const int keylen)
-{
- struct osmo_auth_vector vec;
-
- struct osmo_sub_auth_data auth = {
- .type = OSMO_AUTH_TYPE_GSM,
- .algo = OSMO_AUTH_ALG_MILENAGE,
- };
-
- /* expect a specific keylen */
- if (keylen != 8) {
- LOGP(DNAT, LOGL_ERROR, "Key length is wrong: %d for bsc nr %d\n",
- keylen, conf->nr);
- return 0;
- }
-
- memcpy(auth.u.umts.opc, conf->key, 16);
- memcpy(auth.u.umts.k, conf->key, 16);
- memset(auth.u.umts.amf, 0, 2);
- auth.u.umts.sqn = 0;
-
- memset(&vec, 0, sizeof(vec));
- osmo_auth_gen_vec(&vec, &auth, conn->last_rand);
-
- if (vec.res_len != 8) {
- LOGP(DNAT, LOGL_ERROR, "Res length is wrong: %d for bsc nr %d\n",
- vec.res_len, conf->nr);
- return 0;
- }
-
- return osmo_constant_time_cmp(vec.res, key, 8) == 0;
-}
-
-static void ipaccess_auth_bsc(struct tlv_parsed *tvp, struct bsc_connection *bsc)
-{
- struct bsc_config *conf;
- const char *token = (const char *) TLVP_VAL(tvp, IPAC_IDTAG_UNITNAME);
- int len = TLVP_LEN(tvp, IPAC_IDTAG_UNITNAME);
- const uint8_t *xres = TLVP_VAL(tvp, 0x24);
- const int xlen = TLVP_LEN(tvp, 0x24);
-
- if (bsc->cfg) {
- LOGP(DNAT, LOGL_ERROR, "Reauth on fd %d bsc nr %d\n",
- bsc->write_queue.bfd.fd, bsc->cfg->nr);
- return;
- }
-
- if (len <= 0) {
- LOGP(DNAT, LOGL_ERROR, "Token with length zero on fd: %d\n",
- bsc->write_queue.bfd.fd);
- return;
- }
-
- if (token[len - 1] != '\0') {
- LOGP(DNAT, LOGL_ERROR, "Token not null terminated on fd: %d\n",
- bsc->write_queue.bfd.fd);
- return;
- }
-
- /*
- * New systems have fixed the structure of the message but
- * we need to support old ones too.
- */
- if (len >= 2 && token[len - 2] == '\0')
- len -= 1;
-
- conf = bsc_config_by_token(bsc->nat, token, len);
- if (!conf) {
- LOGP(DNAT, LOGL_ERROR,
- "No bsc found for token '%s' len %d on fd: %d.\n", token,
- bsc->write_queue.bfd.fd, len);
- bsc_close_connection(bsc);
- return;
- }
-
- /* We have set a key and expect it to be present */
- if (conf->key_present && !verify_key(bsc, conf, xres, xlen - 1)) {
- LOGP(DNAT, LOGL_ERROR,
- "Wrong key for bsc nr %d fd: %d.\n", conf->nr,
- bsc->write_queue.bfd.fd);
- bsc_close_connection(bsc);
- return;
- }
-
- rate_ctr_inc(&conf->stats.ctrg->ctr[BCFG_CTR_NET_RECONN]);
- bsc->authenticated = 1;
- bsc->cfg = conf;
- osmo_timer_del(&bsc->id_timeout);
- LOGP(DNAT, LOGL_NOTICE, "Authenticated bsc nr: %d on fd %d\n",
- conf->nr, bsc->write_queue.bfd.fd);
- start_ping_pong(bsc);
-}
-
-static void handle_con_stats(struct nat_sccp_connection *con)
-{
- struct rate_ctr_group *ctrg;
- int id = bsc_conn_type_to_ctr(con);
-
- if (id == -1)
- return;
-
- if (!con->bsc || !con->bsc->cfg)
- return;
-
- ctrg = con->bsc->cfg->stats.ctrg;
- rate_ctr_inc(&ctrg->ctr[id]);
-}
-
-static int forward_sccp_to_msc(struct bsc_connection *bsc, struct msgb *msg)
-{
- int con_filter = 0;
- char *imsi = NULL;
- struct bsc_msc_connection *con_msc = NULL;
- struct bsc_connection *con_bsc = NULL;
- int con_type;
- struct bsc_nat_parsed *parsed;
- struct bsc_filter_reject_cause cause;
-
- /* Parse and filter messages */
- parsed = bsc_nat_parse(msg);
- if (!parsed) {
- LOGP(DNAT, LOGL_ERROR, "Can not parse msg from BSC.\n");
- msgb_free(msg);
- return -1;
- }
-
- if (bsc_nat_filter_ipa(DIR_MSC, msg, parsed))
- goto exit;
-
- /*
- * check authentication after filtering to not reject auth
- * responses coming from the BSC. We have to make sure that
- * nothing from the exit path will forward things to the MSC
- */
- if (!bsc->authenticated) {
- LOGP(DNAT, LOGL_ERROR, "BSC is not authenticated.\n");
- msgb_free(msg);
- return -1;
- }
-
-
- /* modify the SCCP entries */
- if (parsed->ipa_proto == IPAC_PROTO_SCCP) {
- int filter;
- struct nat_sccp_connection *con;
- switch (parsed->sccp_type) {
- case SCCP_MSG_TYPE_CR:
- memset(&cause, 0, sizeof(cause));
- filter = bsc_nat_filter_sccp_cr(bsc, msg, parsed,
- &con_type, &imsi, &cause);
- if (filter < 0) {
- if (imsi)
- bsc_nat_inform_reject(bsc, imsi);
- bsc_stat_reject(filter, bsc, 0);
- goto exit3;
- }
-
- if (!create_sccp_src_ref(bsc, parsed))
- goto exit2;
- con = patch_sccp_src_ref_to_msc(msg, parsed, bsc);
- OSMO_ASSERT(con);
- con->msc_con = bsc->nat->msc_con;
- con_msc = con->msc_con;
- con->filter_state.con_type = con_type;
- con->filter_state.imsi_checked = filter;
- bsc_nat_extract_lac(bsc, con, parsed, msg);
- if (imsi)
- con->filter_state.imsi = talloc_steal(con, imsi);
- imsi = NULL;
- con_bsc = con->bsc;
- handle_con_stats(con);
- break;
- case SCCP_MSG_TYPE_RLSD:
- case SCCP_MSG_TYPE_CREF:
- case SCCP_MSG_TYPE_DT1:
- case SCCP_MSG_TYPE_CC:
- case SCCP_MSG_TYPE_IT:
- con = patch_sccp_src_ref_to_msc(msg, parsed, bsc);
- if (con) {
- /* only filter non local connections */
- if (!con->con_local) {
- memset(&cause, 0, sizeof(cause));
- filter = bsc_nat_filter_dt(bsc, msg,
- con, parsed, &cause);
- if (filter < 0) {
- if (con->filter_state.imsi)
- bsc_nat_inform_reject(bsc,
- con->filter_state.imsi);
- bsc_stat_reject(filter, bsc, 1);
- bsc_send_con_release(bsc, con, &cause);
- con = NULL;
- goto exit2;
- }
-
- /* hand data to a side channel */
- if (bsc_ussd_check(con, parsed, msg) == 1)
- con->con_local = NAT_CON_END_USSD;
-
- /*
- * Optionally rewrite setup message. This can
- * replace the msg and the parsed structure becomes
- * invalid.
- */
- msg = bsc_nat_rewrite_msg(bsc->nat, msg, parsed,
- con->filter_state.imsi);
- talloc_free(parsed);
- parsed = NULL;
- } else if (con->con_local == NAT_CON_END_USSD) {
- bsc_ussd_check(con, parsed, msg);
- }
-
- con_bsc = con->bsc;
- con_msc = con->msc_con;
- con_filter = con->con_local;
- }
-
- break;
- case SCCP_MSG_TYPE_RLC:
- con = patch_sccp_src_ref_to_msc(msg, parsed, bsc);
- if (con) {
- con_bsc = con->bsc;
- con_msc = con->msc_con;
- con_filter = con->con_local;
- }
- remove_sccp_src_ref(bsc, msg, parsed);
- bsc_maybe_close(bsc);
- break;
- case SCCP_MSG_TYPE_UDT:
- /* simply forward everything */
- con = NULL;
- break;
- default:
- LOGP(DNAT, LOGL_ERROR, "Not forwarding to msc sccp type: 0x%x\n", parsed->sccp_type);
- con = NULL;
- goto exit2;
- break;
- }
- } else if (parsed->ipa_proto == IPAC_PROTO_MGCP_OLD) {
- bsc_mgcp_forward(bsc, msg);
- goto exit2;
- } else {
- LOGP(DNAT, LOGL_ERROR, "Not forwarding unknown stream id: 0x%x\n", parsed->ipa_proto);
- goto exit2;
- }
-
- if (con_msc && con_bsc != bsc) {
- LOGP(DNAT, LOGL_ERROR, "The connection belongs to a different BTS: input: %d con: %d\n",
- bsc->cfg->nr, con_bsc->cfg->nr);
- goto exit2;
- }
-
- /* do not forward messages to the MSC */
- if (con_filter)
- goto exit2;
-
- if (!con_msc) {
- LOGP(DNAT, LOGL_ERROR, "Not forwarding data bsc_nr: %d ipa: %d type: 0x%x\n",
- bsc->cfg->nr,
- parsed ? parsed->ipa_proto : -1,
- parsed ? parsed->sccp_type : -1);
- goto exit2;
- }
-
- /* send the non-filtered but maybe modified msg */
- queue_for_msc(con_msc, msg);
- if (parsed)
- talloc_free(parsed);
- return 0;
-
-exit:
- /* if we filter out the reset send an ack to the BSC */
- if (parsed->bssap == 0 && parsed->gsm_type == BSS_MAP_MSG_RESET) {
- send_reset_ack(bsc);
- send_reset_ack(bsc);
- } else if (parsed->ipa_proto == IPAC_PROTO_IPACCESS) {
- /* do we know who is handling this? */
- if (msg->l2h[0] == IPAC_MSGT_ID_RESP && msgb_l2len(msg) > 2) {
- struct tlv_parsed tvp;
- int ret;
- ret = ipa_ccm_idtag_parse_off(&tvp,
- (unsigned char *) msg->l2h + 2,
- msgb_l2len(msg) - 2, 0);
- if (ret < 0) {
- LOGP(DNAT, LOGL_ERROR, "ignoring IPA response "
- "message with malformed TLVs\n");
- return ret;
- }
- if (TLVP_PRESENT(&tvp, IPAC_IDTAG_UNITNAME))
- ipaccess_auth_bsc(&tvp, bsc);
- }
-
- goto exit2;
- }
-
-exit2:
- if (imsi)
- talloc_free(imsi);
- talloc_free(parsed);
- msgb_free(msg);
- return -1;
-
-exit3:
- /* send a SCCP Connection Refused */
- if (imsi)
- talloc_free(imsi);
- bsc_send_con_refuse(bsc, parsed, con_type, &cause);
- talloc_free(parsed);
- msgb_free(msg);
- return -1;
-}
-
-static int ipaccess_bsc_read_cb(struct osmo_fd *bfd)
-{
- struct bsc_connection *bsc = bfd->data;
- struct msgb *msg = NULL;
- struct ipaccess_head *hh;
- struct ipaccess_head_ext *hh_ext;
- int ret;
-
- ret = ipa_msg_recv_buffered(bfd->fd, &msg, &bsc->pending_msg);
- if (ret <= 0) {
- if (ret == -EAGAIN)
- return 0;
- if (ret == 0)
- LOGP(DNAT, LOGL_ERROR,
- "The connection to the BSC Nr: %d was lost. Cleaning it\n",
- bsc->cfg ? bsc->cfg->nr : -1);
- else
- LOGP(DNAT, LOGL_ERROR,
- "Stream error on BSC Nr: %d. Failed to parse ip access message: %d (%s)\n",
- bsc->cfg ? bsc->cfg->nr : -1, ret, strerror(-ret));
-
- bsc_close_connection(bsc);
- return -1;
- }
-
-
- LOGP(DNAT, LOGL_DEBUG, "MSG from BSC: %s proto: %d\n", osmo_hexdump(msg->data, msg->len), msg->l2h[0]);
-
- /* Handle messages from the BSC */
- hh = (struct ipaccess_head *) msg->data;
-
- /* stop the pong timeout */
- if (hh->proto == IPAC_PROTO_IPACCESS) {
- if (msg->l2h[0] == IPAC_MSGT_PONG) {
- osmo_timer_del(&bsc->pong_timeout);
- msgb_free(msg);
- return 0;
- } else if (msg->l2h[0] == IPAC_MSGT_PING) {
- send_pong(bsc);
- msgb_free(msg);
- return 0;
- }
- /* Message contains the ipaccess_head_ext header, investigate further */
- } else if (hh->proto == IPAC_PROTO_OSMO &&
- msg->len > sizeof(*hh) + sizeof(*hh_ext)) {
-
- hh_ext = (struct ipaccess_head_ext *) hh->data;
- /* l2h is where the actual command data is expected */
- msg->l2h = hh_ext->data;
-
- if (hh_ext->proto == IPAC_PROTO_EXT_CTRL)
- return bsc_nat_handle_ctrlif_msg(bsc, msg);
- }
-
- /* FIXME: Currently no PONG is sent to the BSC */
- /* FIXME: Currently no ID ACK is sent to the BSC */
- forward_sccp_to_msc(bsc, msg);
-
- return 0;
-}
-
-static int ipaccess_listen_bsc_cb(struct osmo_fd *bfd, unsigned int what)
-{
- struct bsc_connection *bsc;
- int fd, rc, on;
- struct sockaddr_in sa;
- socklen_t sa_len = sizeof(sa);
-
- if (!(what & BSC_FD_READ))
- return 0;
-
- fd = accept(bfd->fd, (struct sockaddr *) &sa, &sa_len);
- if (fd < 0) {
- perror("accept");
- return fd;
- }
-
- /* count the reconnect */
- osmo_counter_inc(nat->stats.bsc.reconn);
-
- /*
- * if we are not connected to a msc... just close the socket
- */
- if (!bsc_nat_msc_is_connected(nat)) {
- LOGP(DNAT, LOGL_NOTICE, "Disconnecting BSC due lack of MSC connection.\n");
- close(fd);
- return 0;
- }
-
- if (nat->blocked) {
- LOGP(DNAT, LOGL_NOTICE, "Disconnecting BSC due NAT being blocked.\n");
- close(fd);
- return 0;
- }
-
- on = 1;
- rc = setsockopt(fd, IPPROTO_TCP, TCP_NODELAY, &on, sizeof(on));
- if (rc != 0)
- LOGP(DNAT, LOGL_ERROR, "Failed to set TCP_NODELAY: %s\n", strerror(errno));
-
- rc = setsockopt(fd, IPPROTO_IP, IP_TOS,
- &nat->bsc_ip_dscp, sizeof(nat->bsc_ip_dscp));
- if (rc != 0)
- LOGP(DNAT, LOGL_ERROR, "Failed to set IP_TOS: %s\n", strerror(errno));
-
- /* todo... do something with the connection */
- /* todo... use GNUtls to see if we want to trust this as a BTS */
-
- /*
- *
- */
- bsc = bsc_connection_alloc(nat);
- if (!bsc) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate BSC struct.\n");
- close(fd);
- return -1;
- }
-
- bsc->write_queue.bfd.data = bsc;
- bsc->write_queue.bfd.fd = fd;
- bsc->write_queue.read_cb = ipaccess_bsc_read_cb;
- bsc->write_queue.write_cb = bsc_write_cb;
- bsc->write_queue.bfd.when = BSC_FD_READ;
- if (osmo_fd_register(&bsc->write_queue.bfd) < 0) {
- LOGP(DNAT, LOGL_ERROR, "Failed to register BSC fd.\n");
- close(fd);
- talloc_free(bsc);
- return -2;
- }
-
- LOGP(DNAT, LOGL_NOTICE, "BSC connection on %d with IP: %s\n",
- fd, inet_ntoa(sa.sin_addr));
-
- llist_add(&bsc->list_entry, &nat->bsc_connections);
- bsc->last_id = 0;
-
- send_id_ack(bsc);
- send_id_req(nat, bsc);
- send_mgcp_reset(bsc);
-
- /*
- * start the hangup timer
- */
- osmo_timer_setup(&bsc->id_timeout, ipaccess_close_bsc, bsc);
- osmo_timer_schedule(&bsc->id_timeout, nat->auth_timeout, 0);
- return 0;
-}
-
-static void print_usage()
-{
- printf("Usage: bsc_nat\n");
-}
-
-static void print_help()
-{
- printf(" Some useful help...\n");
- printf(" -h --help this text\n");
- printf(" -d option --debug=DRLL:DCC:DMM:DRR:DRSL:DNM enable debugging\n");
- printf(" -D --daemonize Fork the process into a background daemon\n");
- printf(" -s --disable-color\n");
- printf(" -c --config-file filename The config file to use.\n");
- printf(" -m --msc=IP. The address of the MSC.\n");
- printf(" -l --local=IP. The local address of this BSC.\n");
-}
-
-static void handle_options(int argc, char **argv)
-{
- while (1) {
- int option_index = 0, c;
- static struct option long_options[] = {
- {"help", 0, 0, 'h'},
- {"debug", 1, 0, 'd'},
- {"daemonize", 0, 0, 'D'},
- {"config-file", 1, 0, 'c'},
- {"disable-color", 0, 0, 's'},
- {"timestamp", 0, 0, 'T'},
- {"msc", 1, 0, 'm'},
- {"local", 1, 0, 'l'},
- {0, 0, 0, 0}
- };
-
- c = getopt_long(argc, argv, "hd:sTPc:m:l:D",
- long_options, &option_index);
- if (c == -1)
- break;
-
- switch (c) {
- case 'h':
- print_usage();
- print_help();
- exit(0);
- case 's':
- log_set_use_color(osmo_stderr_target, 0);
- break;
- case 'd':
- log_parse_category_mask(osmo_stderr_target, optarg);
- break;
- case 'D':
- daemonize = 1;
- break;
- case 'c':
- config_file = optarg;
- break;
- case 'T':
- log_set_print_timestamp(osmo_stderr_target, 1);
- break;
- case 'm':
- msc_ip = optarg;
- break;
- case 'l':
- inet_aton(optarg, &local_addr);
- break;
- default:
- /* ignore */
- break;
- }
- }
-}
-
-static void signal_handler(int signal)
-{
- switch (signal) {
- case SIGABRT:
- /* in case of abort, we want to obtain a talloc report
- * and then return to the caller, who will abort the process */
- case SIGUSR1:
- talloc_report_full(tall_bsc_ctx, stderr);
- break;
- default:
- break;
- }
-}
-
-static void sccp_close_unconfirmed(void *_data)
-{
- int destroyed = 0;
- struct bsc_connection *bsc, *bsc_tmp;
- struct nat_sccp_connection *conn, *tmp1;
- struct timespec now;
- clock_gettime(CLOCK_MONOTONIC, &now);
-
- llist_for_each_entry_safe(conn, tmp1, &nat->sccp_connections, list_entry) {
- if (conn->has_remote_ref)
- continue;
-
- int diff = (now.tv_sec - conn->creation_time.tv_sec) / 60;
- if (diff < SCCP_CLOSE_TIME_TIMEOUT)
- continue;
-
- LOGP(DNAT, LOGL_ERROR,
- "SCCP connection 0x%x/0x%x was never confirmed on bsc nr. %d\n",
- sccp_src_ref_to_int(&conn->real_ref),
- sccp_src_ref_to_int(&conn->patched_ref),
- conn->bsc->cfg->nr);
- sccp_connection_destroy(conn);
- destroyed = 1;
- }
-
- if (!destroyed)
- goto out;
-
- /* now close out any BSC */
- llist_for_each_entry_safe(bsc, bsc_tmp, &nat->bsc_connections, list_entry)
- bsc_maybe_close(bsc);
-
-out:
- osmo_timer_schedule(&sccp_close, SCCP_CLOSE_TIME, 0);
-}
-
-extern void *tall_ctr_ctx;
-static void talloc_init_ctx()
-{
- tall_bsc_ctx = talloc_named_const(NULL, 0, "nat");
- msgb_talloc_ctx_init(tall_bsc_ctx, 0);
- tall_ctr_ctx = talloc_named_const(tall_bsc_ctx, 0, "counter");
-}
-
-extern int bsc_vty_go_parent(struct vty *vty);
-
-static struct vty_app_info vty_info = {
- .name = "OsmoBSCNAT",
- .version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
-};
-
-
-int main(int argc, char **argv)
-{
- int rc;
-
- talloc_init_ctx();
-
- osmo_init_logging(&log_info);
-
- nat = bsc_nat_alloc();
- if (!nat) {
- fprintf(stderr, "Failed to allocate the BSC nat.\n");
- return -4;
- }
-
- nat->mgcp_cfg = mgcp_config_alloc();
- if (!nat->mgcp_cfg) {
- fprintf(stderr, "Failed to allocate MGCP cfg.\n");
- return -5;
- }
-
- /* We need to add mode-set for amr codecs */
- nat->sdp_ensure_amr_mode_set = 1;
-
- vty_info.copyright = openbsc_copyright;
- vty_init(&vty_info);
- logging_vty_add_cmds(NULL);
- osmo_stats_vty_add_cmds(&log_info);
- bsc_nat_vty_init(nat);
- ctrl_vty_init(tall_bsc_ctx);
-
-
- /* parse options */
- local_addr.s_addr = INADDR_ANY;
- handle_options(argc, argv);
-
- nat->include_base = dirname(talloc_strdup(tall_bsc_ctx, config_file));
-
- rate_ctr_init(tall_bsc_ctx);
- osmo_stats_init(tall_bsc_ctx);
-
- /* Ensure that forced enpoint allocation is turned on by default */
- nat->mgcp_cfg->trunk.force_realloc = 1;
-
- /* init vty and parse */
- if (mgcp_parse_config(config_file, nat->mgcp_cfg, MGCP_BSC_NAT) < 0) {
- fprintf(stderr, "Failed to parse the config file: '%s'\n", config_file);
- return -3;
- }
-
- /* start telnet after reading config for vty_get_bind_addr() */
- if (telnet_init_dynif(tall_bsc_ctx, NULL, vty_get_bind_addr(),
- OSMO_VTY_PORT_BSC_NAT)) {
- fprintf(stderr, "Creating VTY telnet line failed\n");
- return -5;
- }
-
- /* over rule the VTY config for MSC IP */
- if (msc_ip)
- bsc_nat_set_msc_ip(nat, msc_ip);
-
- /* seed the PRNG */
- srand(time(NULL));
-
- LOGP(DNAT, LOGL_NOTICE, "BSCs configured from %s\n", nat->resolved_path);
-
- /*
- * Setup the MGCP code..
- */
- if (bsc_mgcp_nat_init(nat) != 0)
- return -4;
-
- /* connect to the MSC */
- nat->msc_con = bsc_msc_create(nat, &nat->dests);
- if (!nat->msc_con) {
- fprintf(stderr, "Creating a bsc_msc_connection failed.\n");
- exit(1);
- }
-
- /* start control interface after reading config for
- * ctrl_vty_get_bind_addr() */
- nat->ctrl = bsc_nat_controlif_setup(nat, ctrl_vty_get_bind_addr(),
- OSMO_CTRL_PORT_BSC_NAT);
- if (!nat->ctrl) {
- fprintf(stderr, "Creating the control interface failed.\n");
- exit(1);
- }
-
- nat->msc_con->name = "main MSC";
- nat->msc_con->connection_loss = msc_connection_was_lost;
- nat->msc_con->connected = msc_connection_connected;
- nat->msc_con->write_queue.read_cb = ipaccess_msc_read_cb;
- nat->msc_con->write_queue.write_cb = ipaccess_msc_write_cb;;
- nat->msc_con->write_queue.bfd.data = nat->msc_con;
- bsc_msc_connect(nat->msc_con);
-
- /* wait for the BSC */
- rc = make_sock(&bsc_listen, IPPROTO_TCP, ntohl(local_addr.s_addr),
- 5000, 0, ipaccess_listen_bsc_cb, nat);
- if (rc != 0) {
- fprintf(stderr, "Failed to listen for BSC.\n");
- exit(1);
- }
-
- rc = bsc_ussd_init(nat);
- if (rc != 0) {
- LOGP(DNAT, LOGL_ERROR, "Failed to bind the USSD socket.\n");
- exit(1);
- }
-
- signal(SIGABRT, &signal_handler);
- signal(SIGUSR1, &signal_handler);
- osmo_init_ignore_signals();
-
- if (daemonize) {
- rc = osmo_daemonize();
- if (rc < 0) {
- perror("Error during daemonize");
- exit(1);
- }
- }
-
- /* recycle timer */
- sccp_set_log_area(DSCCP);
- osmo_timer_setup(&sccp_close, sccp_close_unconfirmed, NULL);
- osmo_timer_schedule(&sccp_close, SCCP_CLOSE_TIME, 0);
-
- while (1) {
- osmo_select_main(0);
- }
-
- return 0;
-}
-
-/* Close all connections handed out to the USSD module */
-int bsc_ussd_close_connections(struct bsc_nat *nat)
-{
- struct nat_sccp_connection *con;
- llist_for_each_entry(con, &nat->sccp_connections, list_entry) {
- if (con->con_local != NAT_CON_END_USSD)
- continue;
- if (!con->bsc)
- continue;
-
- nat_send_clrc_bsc(con);
- nat_send_rlsd_bsc(con);
- }
-
- return 0;
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_ctrl.c b/src/osmo-bsc_nat/bsc_nat_ctrl.c
deleted file mode 100644
index ff6a73978..000000000
--- a/src/osmo-bsc_nat/bsc_nat_ctrl.c
+++ /dev/null
@@ -1,525 +0,0 @@
-/*
- * (C) 2011-2012 by Holger Hans Peter Freyther
- * (C) 2011-2012 by On-Waves
- * (C) 2011 by Daniel Willmann
- * 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/>.
- *
- */
-
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/ctrl/control_cmd.h>
-#include <osmocom/ctrl/control_if.h>
-#include <osmocom/ctrl/ports.h>
-
-#include <osmocom/vty/misc.h>
-
-#include <openbsc/ctrl.h>
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/vty.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-
-#include <unistd.h>
-#include <string.h>
-#include <errno.h>
-
-
-#define NAT_MAX_CTRL_ID 65535
-
-static struct bsc_nat *g_nat;
-
-static int bsc_id_unused(int id, struct bsc_connection *bsc)
-{
- struct bsc_cmd_list *pending;
-
- llist_for_each_entry(pending, &bsc->cmd_pending, list_entry) {
- if (pending->nat_id == id)
- return 0;
- }
- return 1;
-}
-
-static int get_next_free_bsc_id(struct bsc_connection *bsc)
-{
- int new_id, overflow = 0;
-
- new_id = bsc->last_id;
-
- do {
- new_id++;
- if (new_id == NAT_MAX_CTRL_ID) {
- new_id = 1;
- overflow++;
- }
-
- if (bsc_id_unused(new_id, bsc)) {
- bsc->last_id = new_id;
- return new_id;
- }
- } while (overflow != 2);
-
- return -1;
-}
-
-void bsc_nat_ctrl_del_pending(struct bsc_cmd_list *pending)
-{
- llist_del(&pending->list_entry);
- osmo_timer_del(&pending->timeout);
- talloc_free(pending->cmd);
- talloc_free(pending);
-}
-
-static struct bsc_cmd_list *bsc_get_pending(struct bsc_connection *bsc, char *id_str)
-{
- struct bsc_cmd_list *cmd_entry;
- int id = atoi(id_str);
- if (id == 0)
- return NULL;
-
- llist_for_each_entry(cmd_entry, &bsc->cmd_pending, list_entry) {
- if (cmd_entry->nat_id == id) {
- return cmd_entry;
- }
- }
- return NULL;
-}
-
-int bsc_nat_handle_ctrlif_msg(struct bsc_connection *bsc, struct msgb *msg)
-{
- struct ctrl_cmd *cmd;
- struct bsc_cmd_list *pending;
- char *var, *id;
-
- cmd = ctrl_cmd_parse(bsc, msg);
- msgb_free(msg);
-
- if (!cmd) {
- cmd = talloc_zero(bsc, struct ctrl_cmd);
- if (!cmd) {
- LOGP(DNAT, LOGL_ERROR, "OOM!\n");
- return -ENOMEM;
- }
- cmd->type = CTRL_TYPE_ERROR;
- cmd->id = "err";
- cmd->reply = "Failed to parse command.";
- goto err;
- }
-
- if (bsc->cfg && !llist_empty(&bsc->cfg->lac_list)) {
- if (cmd->variable) {
- var = talloc_asprintf(cmd, "net.0.bsc.%i.%s", bsc->cfg->nr,
- cmd->variable);
- if (!var) {
- cmd->type = CTRL_TYPE_ERROR;
- cmd->reply = "OOM";
- goto err;
- }
- talloc_free(cmd->variable);
- cmd->variable = var;
- }
-
- /* We have to handle TRAPs before matching pending */
- if (cmd->type == CTRL_TYPE_TRAP) {
- ctrl_cmd_send_to_all(bsc->nat->ctrl, cmd);
- talloc_free(cmd);
- return 0;
- }
-
- /* Find the pending command */
- pending = bsc_get_pending(bsc, cmd->id);
- if (pending) {
- id = talloc_strdup(cmd, pending->cmd->id);
- if (!id) {
- cmd->type = CTRL_TYPE_ERROR;
- cmd->reply = "OOM";
- goto err;
- }
- cmd->id = id;
- ctrl_cmd_send(&pending->ccon->write_queue, cmd);
- bsc_nat_ctrl_del_pending(pending);
- } else {
- /* We need to handle TRAPS here */
- if ((cmd->type != CTRL_TYPE_ERROR) &&
- (cmd->type != CTRL_TYPE_TRAP)) {
- LOGP(DNAT, LOGL_NOTICE, "Got control message "
- "from BSC without pending entry\n");
- cmd->type = CTRL_TYPE_ERROR;
- cmd->reply = "No request outstanding";
- goto err;
- }
- }
- }
- talloc_free(cmd);
- return 0;
-err:
- ctrl_cmd_send(&bsc->write_queue, cmd);
- talloc_free(cmd);
- return 0;
-}
-
-static void pending_timeout_cb(void *data)
-{
- struct bsc_cmd_list *pending = data;
- LOGP(DNAT, LOGL_ERROR, "Command timed out\n");
- pending->cmd->type = CTRL_TYPE_ERROR;
- pending->cmd->reply = "Command timed out";
- ctrl_cmd_send(&pending->ccon->write_queue, pending->cmd);
-
- bsc_nat_ctrl_del_pending(pending);
-}
-
-static void ctrl_conn_closed_cb(struct ctrl_connection *connection)
-{
- struct bsc_connection *bsc;
- struct bsc_cmd_list *pending, *tmp;
-
- llist_for_each_entry(bsc, &g_nat->bsc_connections, list_entry) {
- llist_for_each_entry_safe(pending, tmp, &bsc->cmd_pending, list_entry) {
- if (pending->ccon == connection)
- bsc_nat_ctrl_del_pending(pending);
- }
- }
-}
-
-static int extract_bsc_nr_variable(char *variable, unsigned int *nr, char **bsc_variable)
-{
- char *nr_str, *tmp, *saveptr = NULL;
-
- tmp = strtok_r(variable, ".", &saveptr);
- tmp = strtok_r(NULL, ".", &saveptr);
- tmp = strtok_r(NULL, ".", &saveptr);
- nr_str = strtok_r(NULL, ".", &saveptr);
- if (!nr_str)
- return 0;
- *nr = atoi(nr_str);
-
- tmp = strtok_r(NULL, "\0", &saveptr);
- if (!tmp)
- return 0;
-
- *bsc_variable = tmp;
- return 1;
-}
-
-static int forward_to_bsc(struct ctrl_cmd *cmd)
-{
- int ret = CTRL_CMD_HANDLED;
- struct ctrl_cmd *bsc_cmd = NULL;
- struct bsc_connection *bsc;
- struct bsc_cmd_list *pending;
- unsigned int nr;
- char *bsc_variable;
-
- /* Skip over the beginning (bsc.) */
- if (!extract_bsc_nr_variable(cmd->variable, &nr, &bsc_variable)) {
- cmd->reply = "command incomplete";
- goto err;
- }
-
-
- llist_for_each_entry(bsc, &g_nat->bsc_connections, list_entry) {
- if (!bsc->cfg)
- continue;
- if (!bsc->authenticated)
- continue;
- if (bsc->cfg->nr == nr) {
- /* Add pending command to list */
- pending = talloc_zero(bsc, struct bsc_cmd_list);
- if (!pending) {
- cmd->reply = "OOM";
- goto err;
- }
-
- pending->nat_id = get_next_free_bsc_id(bsc);
- if (pending->nat_id < 0) {
- cmd->reply = "No free ID found";
- goto err;
- }
-
- bsc_cmd = ctrl_cmd_cpy(bsc, cmd);
- if (!bsc_cmd) {
- cmd->reply = "Could not forward command";
- goto err;
- }
-
- talloc_free(bsc_cmd->id);
- bsc_cmd->id = talloc_asprintf(bsc_cmd, "%i", pending->nat_id);
- if (!bsc_cmd->id) {
- cmd->reply = "OOM";
- goto err;
- }
-
- talloc_free(bsc_cmd->variable);
- bsc_cmd->variable = talloc_strdup(bsc_cmd, bsc_variable);
- if (!bsc_cmd->variable) {
- cmd->reply = "OOM";
- goto err;
- }
-
- if (ctrl_cmd_send(&bsc->write_queue, bsc_cmd)) {
- cmd->reply = "Sending failed";
- goto err;
- }
- pending->ccon = cmd->ccon;
- pending->ccon->closed_cb = ctrl_conn_closed_cb;
- pending->cmd = cmd;
-
- /* Setup the timeout */
- osmo_timer_setup(&pending->timeout, pending_timeout_cb,
- pending);
- /* TODO: Make timeout configurable */
- osmo_timer_schedule(&pending->timeout, 10, 0);
- llist_add_tail(&pending->list_entry, &bsc->cmd_pending);
-
- goto done;
- }
- }
- /* We end up here if there's no bsc to handle our LAC */
- cmd->reply = "no BSC with this nr";
-err:
- ret = CTRL_CMD_ERROR;
-done:
- talloc_free(bsc_cmd);
- return ret;
-
-}
-
-
-CTRL_CMD_DEFINE(fwd_cmd, "net 0 bsc *");
-static int get_fwd_cmd(struct ctrl_cmd *cmd, void *data)
-{
- return forward_to_bsc(cmd);
-}
-
-static int set_fwd_cmd(struct ctrl_cmd *cmd, void *data)
-{
- return forward_to_bsc(cmd);
-}
-
-static int verify_fwd_cmd(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- return 0;
-}
-
-static int extract_bsc_cfg_variable(struct ctrl_cmd *cmd, struct bsc_config **cfg,
- char **bsc_variable)
-{
- unsigned int nr;
-
- if (!extract_bsc_nr_variable(cmd->variable, &nr, bsc_variable)) {
- cmd->reply = "command incomplete";
- return 0;
- }
-
- *cfg = bsc_config_num(g_nat, nr);
- if (!*cfg) {
- cmd->reply = "Unknown BSC";
- return 0;
- }
-
- return 1;
-}
-
-CTRL_CMD_DEFINE(net_cfg_cmd, "net 0 bsc_cfg *");
-static int get_net_cfg_cmd(struct ctrl_cmd *cmd, void *data)
-{
- char *bsc_variable;
- struct bsc_config *bsc_cfg;
-
- if (!extract_bsc_cfg_variable(cmd, &bsc_cfg, &bsc_variable))
- return CTRL_CMD_ERROR;
-
- if (strcmp(bsc_variable, "access-list-name") == 0) {
- cmd->reply = talloc_asprintf(cmd, "%s",
- bsc_cfg->acc_lst_name ? bsc_cfg->acc_lst_name : "");
- return CTRL_CMD_REPLY;
- }
-
- cmd->reply = "unknown command";
- return CTRL_CMD_ERROR;
-}
-
-static int set_net_cfg_cmd(struct ctrl_cmd *cmd, void *data)
-{
- char *bsc_variable;
- struct bsc_config *bsc_cfg;
-
- if (!extract_bsc_cfg_variable(cmd, &bsc_cfg, &bsc_variable))
- return CTRL_CMD_ERROR;
-
- if (strcmp(bsc_variable, "access-list-name") == 0) {
- osmo_talloc_replace_string(bsc_cfg, &bsc_cfg->acc_lst_name, cmd->value);
- cmd->reply = talloc_asprintf(cmd, "%s",
- bsc_cfg->acc_lst_name ? bsc_cfg->acc_lst_name : "");
- return CTRL_CMD_REPLY;
- } else if (strcmp(bsc_variable, "no-access-list-name") == 0) {
- talloc_free(bsc_cfg->acc_lst_name);
- bsc_cfg->acc_lst_name = NULL;
- cmd->reply = "";
- return CTRL_CMD_REPLY;
- }
-
- cmd->reply = "unknown command";
- return CTRL_CMD_ERROR;
-}
-
-static int verify_net_cfg_cmd(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- return 0;
-}
-
-CTRL_CMD_DEFINE(net_cfg_acc_cmd, "net 0 add allow access-list *");
-static const char *extract_acc_name(const char *var)
-{
- char *str;
-
- str = strstr(var, "net.0.add.allow.access-list.");
- if (!str)
- return NULL;
- str += strlen("net.0.add.allow.access-list.");
- if (strlen(str) == 0)
- return NULL;
- return str;
-}
-
-static int get_net_cfg_acc_cmd(struct ctrl_cmd *cmd, void *data)
-{
- cmd->reply = "Append only";
- return CTRL_CMD_ERROR;
-}
-
-static int set_net_cfg_acc_cmd(struct ctrl_cmd *cmd, void *data)
-{
- const char *access_name = extract_acc_name(cmd->variable);
- struct bsc_msg_acc_lst *acc;
- struct bsc_msg_acc_lst_entry *entry;
- const char *value = cmd->value;
- int rc;
-
- /* Should have been caught by verify_net_cfg_acc_cmd */
- acc = bsc_msg_acc_lst_find(&g_nat->access_lists, access_name);
- if (!acc) {
- cmd->reply = "Access list not found";
- return CTRL_CMD_ERROR;
- }
-
- entry = bsc_msg_acc_lst_entry_create(acc);
- if (!entry) {
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
- }
-
- rc = gsm_parse_reg(acc, &entry->imsi_allow_re, &entry->imsi_allow, 1, &value);
- if (rc != 0) {
- cmd->reply = "Failed to compile expression";
- return CTRL_CMD_ERROR;
- }
-
- cmd->reply = "IMSI allow added to access list";
- return CTRL_CMD_REPLY;
-}
-
-static int verify_net_cfg_acc_cmd(struct ctrl_cmd *cmd, const char *value, void *data)
-{
- const char *access_name = extract_acc_name(cmd->variable);
- struct bsc_msg_acc_lst *acc = bsc_msg_acc_lst_find(&g_nat->access_lists, access_name);
-
- if (!acc) {
- cmd->reply = "Access list not known";
- return -1;
- }
-
- return 0;
-}
-
-CTRL_CMD_DEFINE_WO_NOVRF(net_save_cmd, "net 0 save-configuration");
-
-static int set_net_save_cmd(struct ctrl_cmd *cmd, void *data)
-{
- int rc = osmo_vty_save_config_file();
- cmd->reply = talloc_asprintf(cmd, "%d", rc);
- if (!cmd->reply) {
- cmd->reply = "OOM";
- return CTRL_CMD_ERROR;
- }
-
- return CTRL_CMD_REPLY;
-}
-
-struct ctrl_handle *bsc_nat_controlif_setup(struct bsc_nat *nat,
- const char *bind_addr, int port)
-{
- struct ctrl_handle *ctrl;
- int rc;
-
-
- ctrl = bsc_controlif_setup(NULL, bind_addr, OSMO_CTRL_PORT_BSC_NAT);
- if (!ctrl) {
- fprintf(stderr, "Failed to initialize the control interface. Exiting.\n");
- return NULL;
- }
-
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_fwd_cmd);
- if (rc) {
- fprintf(stderr, "Failed to install the control command. Exiting.\n");
- goto error;
- }
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_cfg_cmd);
- if (rc) {
- fprintf(stderr, "Failed to install the net cfg command. Exiting.\n");
- goto error;
- }
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_cfg_acc_cmd);
- if (rc) {
- fprintf(stderr, "Failed to install the net acc command. Exiting.\n");
- goto error;
- }
- rc = ctrl_cmd_install(CTRL_NODE_ROOT, &cmd_net_save_cmd);
- if (rc) {
- fprintf(stderr, "Failed to install the net save command. Exiting.\n");
- goto error;
- }
-
- g_nat = nat;
- return ctrl;
-
-error:
- osmo_fd_unregister(&ctrl->listen_fd);
- close(ctrl->listen_fd.fd);
- talloc_free(ctrl);
- return NULL;
-}
-
-void bsc_nat_inform_reject(struct bsc_connection *conn, const char *imsi)
-{
- struct ctrl_cmd *cmd;
-
- cmd = ctrl_cmd_create(conn, CTRL_TYPE_TRAP);
- if (!cmd) {
- LOGP(DCTRL, LOGL_ERROR, "Failed to create TRAP command.\n");
- return;
- }
-
- cmd->id = "0";
- cmd->variable = talloc_asprintf(cmd, "net.0.bsc.%d.notification-rejection-v1",
- conn->cfg->nr);
- cmd->reply = talloc_asprintf(cmd, "imsi=%s", imsi);
-
- ctrl_cmd_send_to_all(conn->cfg->nat->ctrl, cmd);
- talloc_free(cmd);
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_filter.c b/src/osmo-bsc_nat/bsc_nat_filter.c
deleted file mode 100644
index e73529097..000000000
--- a/src/osmo-bsc_nat/bsc_nat_filter.c
+++ /dev/null
@@ -1,119 +0,0 @@
-/*
- * (C) 2010-2015 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2012 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/debug.h>
-
-#include <osmocom/gsm/gsm0808.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-
-#include <osmocom/sccp/sccp.h>
-
-/* Filter out CR data... */
-int bsc_nat_filter_sccp_cr(struct bsc_connection *bsc, struct msgb *msg,
- struct bsc_nat_parsed *parsed, int *con_type,
- char **imsi, struct bsc_filter_reject_cause *cause)
-{
- struct bsc_filter_request req;
- struct tlv_parsed tp;
- struct gsm48_hdr *hdr48;
- int hdr48_len;
- int len;
-
- *con_type = FLT_CON_TYPE_NONE;
- cause->cm_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- cause->lu_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- *imsi = NULL;
-
- if (parsed->gsm_type != BSS_MAP_MSG_COMPLETE_LAYER_3) {
- LOGP(DNAT, LOGL_ERROR,
- "Rejecting CR message due wrong GSM Type %d\n", parsed->gsm_type);
- return -1;
- }
-
- /* the parsed has had some basic l3 length check */
- len = msg->l3h[1];
- if (msgb_l3len(msg) - 3 < len) {
- LOGP(DNAT, LOGL_ERROR,
- "The CR Data has not enough space...\n");
- return -1;
- }
-
- msg->l4h = &msg->l3h[3];
- len -= 1;
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l4h, len, 0, 0);
-
- if (!TLVP_PRESENT(&tp, GSM0808_IE_LAYER_3_INFORMATION)) {
- LOGP(DNAT, LOGL_ERROR, "CR Data does not contain layer3 information.\n");
- return -1;
- }
-
- hdr48_len = TLVP_LEN(&tp, GSM0808_IE_LAYER_3_INFORMATION);
-
- if (hdr48_len < sizeof(*hdr48)) {
- LOGP(DNAT, LOGL_ERROR, "GSM48 header does not fit.\n");
- return -1;
- }
-
- hdr48 = (struct gsm48_hdr *) TLVP_VAL(&tp, GSM0808_IE_LAYER_3_INFORMATION);
- req.ctx = bsc;
- req.black_list = &bsc->nat->imsi_black_list;
- req.access_lists = &bsc->nat->access_lists;
- req.local_lst_name = bsc->cfg->acc_lst_name;
- req.global_lst_name = bsc->nat->acc_lst_name;
- req.bsc_nr = bsc->cfg->nr;
- return bsc_msg_filter_initial(hdr48, hdr48_len, &req, con_type, imsi, cause);
-}
-
-int bsc_nat_filter_dt(struct bsc_connection *bsc, struct msgb *msg,
- struct nat_sccp_connection *con, struct bsc_nat_parsed *parsed,
- struct bsc_filter_reject_cause *cause)
-{
- uint32_t len;
- struct gsm48_hdr *hdr48;
- struct bsc_filter_request req;
-
- cause->cm_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
- cause->lu_reject_cause = GSM48_REJECT_PLMN_NOT_ALLOWED;
-
- if (con->filter_state.imsi_checked)
- return 0;
-
- /* only care about DTAP messages */
- if (parsed->bssap != BSSAP_MSG_DTAP)
- return 0;
-
- hdr48 = bsc_unpack_dtap(parsed, msg, &len);
- if (!hdr48)
- return -1;
-
- req.ctx = con;
- req.black_list = &bsc->nat->imsi_black_list;
- req.access_lists = &bsc->nat->access_lists;
- req.local_lst_name = bsc->cfg->acc_lst_name;
- req.global_lst_name = bsc->nat->acc_lst_name;
- req.bsc_nr = bsc->cfg->nr;
- return bsc_msg_filter_data(hdr48, len, &req, &con->filter_state, cause);
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_rewrite.c b/src/osmo-bsc_nat/bsc_nat_rewrite.c
deleted file mode 100644
index e7c387c22..000000000
--- a/src/osmo-bsc_nat/bsc_nat_rewrite.c
+++ /dev/null
@@ -1,714 +0,0 @@
-/*
- * Message rewriting functionality
- */
-/*
- * (C) 2010-2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2013 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/nat_rewrite_trie.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/ipa.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-
-#include <osmocom/sccp/sccp.h>
-
-static char *trie_lookup(struct nat_rewrite *trie, const char *number,
- regoff_t off, void *ctx)
-{
- struct nat_rewrite_rule *rule;
-
- if (!trie) {
- LOGP(DCC, LOGL_ERROR,
- "Asked to do a table lookup but no table.\n");
- return NULL;
- }
-
- rule = nat_rewrite_lookup(trie, number);
- if (!rule) {
- LOGP(DCC, LOGL_DEBUG,
- "Couldn't find a prefix rule for %s\n", number);
- return NULL;
- }
-
- return talloc_asprintf(ctx, "%s%s", rule->rewrite, &number[off]);
-}
-
-static char *match_and_rewrite_number(void *ctx, const char *number,
- const char *imsi, struct llist_head *list,
- struct nat_rewrite *trie)
-{
- struct bsc_nat_num_rewr_entry *entry;
- char *new_number = NULL;
-
- /* need to find a replacement and then fix it */
- llist_for_each_entry(entry, list, list) {
- regmatch_t matches[2];
-
- /* check the IMSI match */
- if (regexec(&entry->msisdn_reg, imsi, 0, NULL, 0) != 0)
- continue;
-
- /* this regexp matches... */
- if (regexec(&entry->num_reg, number, 2, matches, 0) == 0
- && matches[1].rm_eo != -1) {
- if (entry->is_prefix_lookup)
- new_number = trie_lookup(trie, number,
- matches[1].rm_so, ctx);
- else
- new_number = talloc_asprintf(ctx, "%s%s",
- entry->replace,
- &number[matches[1].rm_so]);
- }
-
- if (new_number)
- break;
- }
-
- return new_number;
-}
-
-static char *rewrite_isdn_number(struct bsc_nat *nat, struct llist_head *rewr_list,
- void *ctx, const char *imsi,
- struct gsm_mncc_number *called)
-{
- char int_number[sizeof(called->number) + 2];
- char *number = called->number;
-
- if (llist_empty(&nat->num_rewr)) {
- LOGP(DCC, LOGL_DEBUG, "Rewrite rules empty.\n");
- return NULL;
- }
-
- /* only ISDN plan */
- if (called->plan != 1) {
- LOGP(DCC, LOGL_DEBUG, "Called plan is not 1 it was %d\n",
- called->plan);
- return NULL;
- }
-
- /* international, prepend */
- if (called->type == 1) {
- int_number[0] = '+';
- memcpy(&int_number[1], number, strlen(number) + 1);
- number = int_number;
- }
-
- return match_and_rewrite_number(ctx, number,
- imsi, rewr_list, nat->num_rewr_trie);
-}
-
-static void update_called_number(struct gsm_mncc_number *called,
- const char *chosen_number)
-{
- if (strncmp(chosen_number, "00", 2) == 0) {
- called->type = 1;
- osmo_strlcpy(called->number, chosen_number + 2,
- sizeof(called->number));
- } else {
- /* rewrite international to unknown */
- if (called->type == 1)
- called->type = 0;
- osmo_strlcpy(called->number, chosen_number,
- sizeof(called->number));
- }
-}
-
-/**
- * Rewrite non global numbers... according to rules based on the IMSI
- */
-static struct msgb *rewrite_setup(struct bsc_nat *nat, struct msgb *msg,
- struct bsc_nat_parsed *parsed, const char *imsi,
- struct gsm48_hdr *hdr48, const uint32_t len)
-{
- struct tlv_parsed tp;
- unsigned int payload_len;
- struct gsm_mncc_number called;
- struct msgb *out;
- char *new_number_pre = NULL, *new_number_post = NULL, *chosen_number;
- uint8_t *outptr;
- const uint8_t *msgptr;
- int sec_len;
-
- /* decode and rewrite the message */
- payload_len = len - sizeof(*hdr48);
- tlv_parse(&tp, &gsm48_att_tlvdef, hdr48->data, payload_len, 0, 0);
-
- /* no number, well let us ignore it */
- if (!TLVP_PRESENT(&tp, GSM48_IE_CALLED_BCD))
- return NULL;
-
- memset(&called, 0, sizeof(called));
- gsm48_decode_called(&called,
- TLVP_VAL(&tp, GSM48_IE_CALLED_BCD) - 1);
-
- /* check if it looks international and stop */
- LOGP(DCC, LOGL_DEBUG,
- "Pre-Rewrite for IMSI(%s) Plan(%d) Type(%d) Number(%s)\n",
- imsi, called.plan, called.type, called.number);
- new_number_pre = rewrite_isdn_number(nat, &nat->num_rewr, msg, imsi, &called);
-
- if (!new_number_pre) {
- LOGP(DCC, LOGL_DEBUG, "No IMSI(%s) match found, returning message.\n",
- imsi);
- return NULL;
- }
-
- if (strlen(new_number_pre) > sizeof(called.number)) {
- LOGP(DCC, LOGL_ERROR, "Number %s is too long for structure.\n",
- new_number_pre);
- talloc_free(new_number_pre);
- return NULL;
- }
- update_called_number(&called, new_number_pre);
-
- /* another run through the re-write engine with other rules */
- LOGP(DCC, LOGL_DEBUG,
- "Post-Rewrite for IMSI(%s) Plan(%d) Type(%d) Number(%s)\n",
- imsi, called.plan, called.type, called.number);
- new_number_post = rewrite_isdn_number(nat, &nat->num_rewr_post, msg,
- imsi, &called);
- chosen_number = new_number_post ? new_number_post : new_number_pre;
-
-
- if (strlen(chosen_number) > sizeof(called.number)) {
- LOGP(DCC, LOGL_ERROR, "Number %s is too long for structure.\n",
- chosen_number);
- talloc_free(new_number_pre);
- talloc_free(new_number_post);
- return NULL;
- }
-
- /*
- * Need to create a new message now based on the old onew
- * with a new number. We can sadly not patch this in place
- * so we will need to regenerate it.
- */
-
- out = msgb_alloc_headroom(4096, 128, "changed-setup");
- if (!out) {
- LOGP(DCC, LOGL_ERROR, "Failed to allocate.\n");
- talloc_free(new_number_pre);
- talloc_free(new_number_post);
- return NULL;
- }
-
- /* copy the header */
- outptr = msgb_put(out, sizeof(*hdr48));
- memcpy(outptr, hdr48, sizeof(*hdr48));
-
- /* copy everything up to the number */
- sec_len = TLVP_VAL(&tp, GSM48_IE_CALLED_BCD) - 2 - &hdr48->data[0];
- outptr = msgb_put(out, sec_len);
- memcpy(outptr, &hdr48->data[0], sec_len);
-
- /* create the new number */
- update_called_number(&called, chosen_number);
- LOGP(DCC, LOGL_DEBUG,
- "Chosen number for IMSI(%s) is Plan(%d) Type(%d) Number(%s)\n",
- imsi, called.plan, called.type, called.number);
- gsm48_encode_called(out, &called);
-
- /* copy thre rest */
- msgptr = TLVP_VAL(&tp, GSM48_IE_CALLED_BCD) +
- TLVP_LEN(&tp, GSM48_IE_CALLED_BCD);
- sec_len = payload_len - (msgptr - &hdr48->data[0]);
- outptr = msgb_put(out, sec_len);
- memcpy(outptr, msgptr, sec_len);
-
- talloc_free(new_number_pre);
- talloc_free(new_number_post);
- return out;
-}
-
-/**
- * Find a new SMSC address, returns an allocated string that needs to be
- * freed or is NULL.
- */
-static char *find_new_smsc(struct bsc_nat *nat, void *ctx, const char *imsi,
- const char *smsc_addr, const char *dest_nr)
-{
- struct bsc_nat_num_rewr_entry *entry;
- char *new_number = NULL;
- uint8_t dest_match = llist_empty(&nat->tpdest_match);
-
- /* We will find a new number now */
- llist_for_each_entry(entry, &nat->smsc_rewr, list) {
- regmatch_t matches[2];
-
- /* check the IMSI match */
- if (regexec(&entry->msisdn_reg, imsi, 0, NULL, 0) != 0)
- continue;
-
- /* this regexp matches... */
- if (regexec(&entry->num_reg, smsc_addr, 2, matches, 0) == 0 &&
- matches[1].rm_eo != -1)
- new_number = talloc_asprintf(ctx, "%s%s",
- entry->replace,
- &smsc_addr[matches[1].rm_so]);
- if (new_number)
- break;
- }
-
- if (!new_number)
- return NULL;
-
- /*
- * now match the number against another list
- */
- llist_for_each_entry(entry, &nat->tpdest_match, list) {
- /* check the IMSI match */
- if (regexec(&entry->msisdn_reg, imsi, 0, NULL, 0) != 0)
- continue;
-
- if (regexec(&entry->num_reg, dest_nr, 0, NULL, 0) == 0) {
- dest_match = 1;
- break;
- }
- }
-
- if (!dest_match) {
- talloc_free(new_number);
- return NULL;
- }
-
- return new_number;
-}
-
-/**
- * Clear the TP-SRR from the TPDU header
- */
-static uint8_t sms_new_tpdu_hdr(struct bsc_nat *nat, const char *imsi,
- const char *dest_nr, uint8_t hdr)
-{
- struct bsc_nat_num_rewr_entry *entry;
-
- /* We will find a new number now */
- llist_for_each_entry(entry, &nat->sms_clear_tp_srr, list) {
- /* check the IMSI match */
- if (regexec(&entry->msisdn_reg, imsi, 0, NULL, 0) != 0)
- continue;
- if (regexec(&entry->num_reg, dest_nr, 0, NULL, 0) != 0)
- continue;
-
- /* matched phone number and imsi */
- return hdr & ~0x20;
- }
-
- return hdr;
-}
-
-/**
- * Check if we need to rewrite the number. For this SMS.
- */
-static char *sms_new_dest_nr(struct bsc_nat *nat, void *ctx,
- const char *imsi, const char *dest_nr)
-{
- return match_and_rewrite_number(ctx, dest_nr, imsi,
- &nat->sms_num_rewr, NULL);
-}
-
-/**
- * This is a helper for GSM 04.11 8.2.5.2 Destination address element
- */
-void sms_encode_addr_element(struct msgb *out, const char *new_number,
- int format, int tp_data)
-{
- uint8_t new_addr_len;
- uint8_t new_addr[26];
-
- /*
- * Copy the new number. We let libosmocore encode it, then set
- * the extension followed after the length. Depending on if
- * we want to write RP we will let the TLV code add the
- * length for us or we need to use strlen... This is not very clear
- * as of 03.40 and 04.11.
- */
- new_addr_len = gsm48_encode_bcd_number(new_addr, ARRAY_SIZE(new_addr),
- 1, new_number);
- new_addr[1] = format;
- if (tp_data) {
- uint8_t *data = msgb_put(out, new_addr_len);
- memcpy(data, new_addr, new_addr_len);
- data[0] = strlen(new_number);
- } else {
- msgb_lv_put(out, new_addr_len - 1, new_addr + 1);
- }
-}
-
-static struct msgb *sms_create_new(uint8_t type, uint8_t ref,
- struct gsm48_hdr *old_hdr48,
- const uint8_t *orig_addr_ptr,
- int orig_addr_len, const char *new_number,
- const uint8_t *data_ptr, int data_len,
- uint8_t tpdu_first_byte,
- const int old_dest_len, const char *new_dest_nr)
-{
- struct gsm48_hdr *new_hdr48;
- struct msgb *out;
-
- /*
- * We need to re-create the patched structure. This is why we have
- * saved the above pointers.
- */
- out = msgb_alloc_headroom(4096, 128, "changed-smsc");
- if (!out) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate.\n");
- return NULL;
- }
-
- out->l2h = out->data;
- msgb_v_put(out, GSM411_MT_RP_DATA_MO);
- msgb_v_put(out, ref);
- msgb_lv_put(out, orig_addr_len, orig_addr_ptr);
-
- sms_encode_addr_element(out, new_number, 0x91, 0);
-
-
- /* Patch the TPDU from here on */
-
- /**
- * Do we need to put a new TP-Destination-Address (TP-DA) here or
- * can we copy the old thing? For the TP-DA we need to find out the
- * new size.
- */
- if (new_dest_nr) {
- uint8_t *data, *new_size;
-
- /* reserve the size and write the header */
- new_size = msgb_put(out, 1);
- out->l3h = new_size + 1;
- msgb_v_put(out, tpdu_first_byte);
- msgb_v_put(out, data_ptr[1]);
-
- /* encode the new number and put it */
- if (strncmp(new_dest_nr, "00", 2) == 0)
- sms_encode_addr_element(out, new_dest_nr + 2, 0x91, 1);
- else
- sms_encode_addr_element(out, new_dest_nr, 0x81, 1);
-
- /* Copy the rest after the TP-DS */
- data = msgb_put(out, data_len - 2 - 1 - old_dest_len);
- memcpy(data, &data_ptr[2 + 1 + old_dest_len], data_len - 2 - 1 - old_dest_len);
-
- /* fill in the new size */
- new_size[0] = msgb_l3len(out);
- } else {
- msgb_v_put(out, data_len);
- msgb_tv_fixed_put(out, tpdu_first_byte, data_len - 1, &data_ptr[1]);
- }
-
- /* prepend GSM 04.08 header */
- new_hdr48 = (struct gsm48_hdr *) msgb_push(out, sizeof(*new_hdr48) + 1);
- memcpy(new_hdr48, old_hdr48, sizeof(*old_hdr48));
- new_hdr48->data[0] = msgb_l2len(out);
-
- return out;
-}
-
-/**
- * Parse the SMS and check if it needs to be rewritten
- */
-static struct msgb *rewrite_sms(struct bsc_nat *nat, struct msgb *msg,
- struct bsc_nat_parsed *parsed, const char *imsi,
- struct gsm48_hdr *hdr48, const uint32_t len)
-{
- unsigned int payload_len;
- unsigned int cp_len;
-
- uint8_t ref;
- uint8_t orig_addr_len, *orig_addr_ptr;
- uint8_t dest_addr_len, *dest_addr_ptr;
- uint8_t data_len, *data_ptr;
- char smsc_addr[30];
-
-
- uint8_t dest_len, orig_dest_len;
- char _dest_nr[30];
- char *dest_nr;
- char *new_dest_nr;
-
- char *new_number = NULL;
- uint8_t tpdu_hdr;
- struct msgb *out;
-
- payload_len = len - sizeof(*hdr48);
- if (payload_len < 1) {
- LOGP(DNAT, LOGL_ERROR, "SMS too short for things. %d\n", payload_len);
- return NULL;
- }
-
- cp_len = hdr48->data[0];
- if (payload_len + 1 < cp_len) {
- LOGP(DNAT, LOGL_ERROR, "SMS RPDU can not fit in: %d %d\n", cp_len, payload_len);
- return NULL;
- }
-
- if (hdr48->data[1] != GSM411_MT_RP_DATA_MO)
- return NULL;
-
- if (cp_len < 5) {
- LOGP(DNAT, LOGL_ERROR, "RD-DATA can not fit in the CP len: %d\n", cp_len);
- return NULL;
- }
-
- /* RP */
- ref = hdr48->data[2];
- orig_addr_len = hdr48->data[3];
- orig_addr_ptr = &hdr48->data[4];
-
- /* the +1 is for checking if the following element has some space */
- if (cp_len < 3 + orig_addr_len + 1) {
- LOGP(DNAT, LOGL_ERROR, "RP-Originator addr does not fit: %d\n", orig_addr_len);
- return NULL;
- }
-
- dest_addr_len = hdr48->data[3 + orig_addr_len + 1];
- dest_addr_ptr = &hdr48->data[3 + orig_addr_len + 2];
-
- if (cp_len < 3 + orig_addr_len + 1 + dest_addr_len + 1) {
- LOGP(DNAT, LOGL_ERROR, "RP-Destination addr does not fit: %d\n", dest_addr_len);
- return NULL;
- }
- gsm48_decode_bcd_number(smsc_addr, ARRAY_SIZE(smsc_addr), dest_addr_ptr - 1, 1);
-
- data_len = hdr48->data[3 + orig_addr_len + 1 + dest_addr_len + 1];
- data_ptr = &hdr48->data[3 + orig_addr_len + 1 + dest_addr_len + 2];
-
- if (cp_len < 3 + orig_addr_len + 1 + dest_addr_len + 1 + data_len) {
- LOGP(DNAT, LOGL_ERROR, "RP-Data does not fit: %d\n", data_len);
- return NULL;
- }
-
- if (data_len < 3) {
- LOGP(DNAT, LOGL_ERROR, "SMS-SUBMIT is too short.\n");
- return NULL;
- }
-
- /* TP-PDU starts here */
- if ((data_ptr[0] & 0x03) != GSM340_SMS_SUBMIT_MS2SC)
- return NULL;
-
- /*
- * look into the phone number. The length is in semi-octets, we will
- * need to add the byte for the number type as well.
- */
- orig_dest_len = data_ptr[2];
- dest_len = ((orig_dest_len + 1) / 2) + 1;
- if (data_len < dest_len + 3 || dest_len < 2) {
- LOGP(DNAT, LOGL_ERROR, "SMS-SUBMIT can not have TP-DestAddr.\n");
- return NULL;
- }
-
- if ((data_ptr[3] & 0x80) == 0) {
- LOGP(DNAT, LOGL_ERROR, "TP-DestAddr has extension. Not handled.\n");
- return NULL;
- }
-
- if ((data_ptr[3] & 0x0F) == 0) {
- LOGP(DNAT, LOGL_ERROR, "TP-DestAddr is of unknown type.\n");
- return NULL;
- }
-
- /**
- * Besides of what I think I read in GSM 03.40 and 04.11 the TP-DA
- * contains the semi-octets as length (strlen), change it to the
- * the number of bytes, but then change it back.
- */
- data_ptr[2] = dest_len;
- gsm48_decode_bcd_number(_dest_nr + 2, ARRAY_SIZE(_dest_nr) - 2,
- &data_ptr[2], 1);
- data_ptr[2] = orig_dest_len;
- if ((data_ptr[3] & 0x70) == 0x10) {
- _dest_nr[0] = _dest_nr[1] = '0';
- dest_nr = &_dest_nr[0];
- } else {
- dest_nr = &_dest_nr[2];
- }
-
- /**
- * Call functions to rewrite the data
- */
- tpdu_hdr = sms_new_tpdu_hdr(nat, imsi, dest_nr, data_ptr[0]);
- new_number = find_new_smsc(nat, msg, imsi, smsc_addr, dest_nr);
- new_dest_nr = sms_new_dest_nr(nat, msg, imsi, dest_nr);
-
- if (tpdu_hdr == data_ptr[0] && !new_number && !new_dest_nr)
- return NULL;
-
- out = sms_create_new(GSM411_MT_RP_DATA_MO, ref, hdr48,
- orig_addr_ptr, orig_addr_len,
- new_number ? new_number : smsc_addr,
- data_ptr, data_len, tpdu_hdr,
- dest_len, new_dest_nr);
- talloc_free(new_number);
- talloc_free(new_dest_nr);
- return out;
-}
-
-struct msgb *bsc_nat_rewrite_msg(struct bsc_nat *nat, struct msgb *msg, struct bsc_nat_parsed *parsed, const char *imsi)
-{
- struct gsm48_hdr *hdr48;
- uint32_t len;
- uint8_t msg_type, proto;
- struct msgb *new_msg = NULL, *sccp;
- uint8_t link_id;
-
- if (!imsi || strlen(imsi) < 5)
- return msg;
-
- /* only care about DTAP messages */
- if (parsed->bssap != BSSAP_MSG_DTAP)
- return msg;
- if (!parsed->dest_local_ref)
- return msg;
-
- hdr48 = bsc_unpack_dtap(parsed, msg, &len);
- if (!hdr48)
- return msg;
-
- link_id = msg->l3h[1];
- proto = gsm48_hdr_pdisc(hdr48);
- msg_type = gsm48_hdr_msg_type(hdr48);
-
- if (proto == GSM48_PDISC_CC && msg_type == GSM48_MT_CC_SETUP)
- new_msg = rewrite_setup(nat, msg, parsed, imsi, hdr48, len);
- else if (proto == GSM48_PDISC_SMS && msg_type == GSM411_MT_CP_DATA)
- new_msg = rewrite_sms(nat, msg, parsed, imsi, hdr48, len);
-
- if (!new_msg)
- return msg;
-
- /* wrap with DTAP, SCCP, then IPA. TODO: Stop copying */
- gsm0808_prepend_dtap_header(new_msg, link_id);
- sccp = sccp_create_dt1(parsed->dest_local_ref, new_msg->data, new_msg->len);
- talloc_free(new_msg);
-
- if (!sccp) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate.\n");
- return msg;
- }
-
- ipa_prepend_header(sccp, IPAC_PROTO_SCCP);
-
- /* the parsed hangs off from msg but it needs to survive */
- talloc_steal(sccp, parsed);
- msgb_free(msg);
- return sccp;
-}
-
-static void num_rewr_free_data(struct bsc_nat_num_rewr_entry *entry)
-{
- regfree(&entry->msisdn_reg);
- regfree(&entry->num_reg);
- talloc_free(entry->replace);
-}
-
-void bsc_nat_num_rewr_entry_adapt(void *ctx, struct llist_head *head,
- const struct osmo_config_list *list)
-{
- struct bsc_nat_num_rewr_entry *entry, *tmp;
- struct osmo_config_entry *cfg_entry;
-
- /* free the old data */
- llist_for_each_entry_safe(entry, tmp, head, list) {
- num_rewr_free_data(entry);
- llist_del(&entry->list);
- talloc_free(entry);
- }
-
-
- if (!list)
- return;
-
- llist_for_each_entry(cfg_entry, &list->entry, list) {
- char *regexp;
- if (cfg_entry->text[0] == '+') {
- LOGP(DNAT, LOGL_ERROR,
- "Plus is not allowed in the number\n");
- continue;
- }
-
- entry = talloc_zero(ctx, struct bsc_nat_num_rewr_entry);
- if (!entry) {
- LOGP(DNAT, LOGL_ERROR,
- "Allocation of the num_rewr entry failed.\n");
- continue;
- }
-
- entry->replace = talloc_strdup(entry, cfg_entry->text);
- if (!entry->replace) {
- LOGP(DNAT, LOGL_ERROR,
- "Failed to copy the replacement text.\n");
- talloc_free(entry);
- continue;
- }
-
- if (strcmp("prefix_lookup", entry->replace) == 0)
- entry->is_prefix_lookup = 1;
-
- /* we will now build a regexp string */
- if (cfg_entry->mcc[0] == '^') {
- regexp = talloc_strdup(entry, cfg_entry->mcc);
- } else {
- regexp = talloc_asprintf(entry, "^%s%s",
- cfg_entry->mcc[0] == '*' ?
- "[0-9][0-9][0-9]" : cfg_entry->mcc,
- cfg_entry->mnc[0] == '*' ?
- "[0-9][0-9]" : cfg_entry->mnc);
- }
-
- if (!regexp) {
- LOGP(DNAT, LOGL_ERROR, "Failed to create a regexp string.\n");
- talloc_free(entry);
- continue;
- }
-
- if (regcomp(&entry->msisdn_reg, regexp, 0) != 0) {
- LOGP(DNAT, LOGL_ERROR,
- "Failed to compile regexp '%s'\n", regexp);
- talloc_free(regexp);
- talloc_free(entry);
- continue;
- }
-
- talloc_free(regexp);
- if (regcomp(&entry->num_reg, cfg_entry->option, REG_EXTENDED) != 0) {
- LOGP(DNAT, LOGL_ERROR,
- "Failed to compile regexp '%s'\n", cfg_entry->option);
- regfree(&entry->msisdn_reg);
- talloc_free(entry);
- continue;
- }
-
- /* we have copied the number */
- llist_add_tail(&entry->list, head);
- }
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_rewrite_trie.c b/src/osmo-bsc_nat/bsc_nat_rewrite_trie.c
deleted file mode 100644
index 633fa87d0..000000000
--- a/src/osmo-bsc_nat/bsc_nat_rewrite_trie.c
+++ /dev/null
@@ -1,259 +0,0 @@
-/* Handling for loading a re-write file/database */
-/*
- * (C) 2013 by On-Waves
- * (C) 2013 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-#include <openbsc/nat_rewrite_trie.h>
-#include <openbsc/debug.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-
-#include <assert.h>
-#include <stdio.h>
-#include <string.h>
-#include <ctype.h>
-
-#define CHECK_IS_DIGIT_OR_FAIL(prefix, pos) \
- if (!isdigit(prefix[pos]) && prefix[pos] != '+') { \
- LOGP(DNAT, LOGL_ERROR, \
- "Prefix(%s) contains non ascii text at(%d=%c)\n", \
- prefix, pos, prefix[pos]); \
- goto fail; \
- }
-#define TO_INT(c) \
- ((c) == '+' ? 10 : ((c - '0') % 10))
-
-static void insert_rewrite_node(struct nat_rewrite_rule *rule, struct nat_rewrite *root)
-{
- struct nat_rewrite_rule *new = &root->rule;
-
- const int len = strlen(rule->prefix);
- int i;
-
- if (len <= 0) {
- LOGP(DNAT, LOGL_ERROR, "An empty prefix does not make sense.\n");
- goto fail;
- }
-
- for (i = 0; i < len - 1; ++i) {
- int pos;
-
- /* check if the input is valid */
- CHECK_IS_DIGIT_OR_FAIL(rule->prefix, i);
-
- /* check if the next node is already valid */
- pos = TO_INT(rule->prefix[i]);
- if (!new->rules[pos]) {
- new->rules[pos] = talloc_zero(root, struct nat_rewrite_rule);
- if (!new->rules[pos]) {
- LOGP(DNAT, LOGL_ERROR,
- "Failed to allocate memory.\n");
- goto fail;
- }
-
- new->rules[pos]->empty = 1;
- }
-
- /* we continue here */
- new = new->rules[pos];
- }
-
- /* new now points to the place where we want to add it */
- int pos;
-
- /* check if the input is valid */
- CHECK_IS_DIGIT_OR_FAIL(rule->prefix, (len - 1));
-
- /* check if the next node is already valid */
- pos = TO_INT(rule->prefix[len - 1]);
- if (!new->rules[pos])
- new->rules[pos] = rule;
- else if (new->rules[pos]->empty) {
- /* copy over entries */
- new->rules[pos]->empty = 0;
- memcpy(new->rules[pos]->prefix, rule->prefix, sizeof(rule->prefix));
- memcpy(new->rules[pos]->rewrite, rule->rewrite, sizeof(rule->rewrite));
- talloc_free(rule);
- } else {
- LOGP(DNAT, LOGL_ERROR,
- "Prefix(%s) is already installed\n", rule->prefix);
- goto fail;
- }
-
- root->prefixes += 1;
- return;
-
-fail:
- talloc_free(rule);
- return;
-}
-
-static void handle_line(struct nat_rewrite *rewrite, char *line)
-{
- char *split;
- struct nat_rewrite_rule *rule;
- size_t size_prefix, size_end, len;
-
-
- /* Find the ',' in the line */
- len = strlen(line);
- split = strstr(line, ",");
- if (!split) {
- LOGP(DNAT, LOGL_ERROR, "Line doesn't contain ','\n");
- return;
- }
-
- /* Check if there is space for the rewrite rule */
- size_prefix = split - line;
- if (len - size_prefix <= 2) {
- LOGP(DNAT, LOGL_ERROR, "No rewrite available.\n");
- return;
- }
-
- /* Continue after the ',' to the end */
- split = &line[size_prefix + 1];
- size_end = strlen(split) - 1;
-
- /* Check if both strings can fit into the static array */
- if (size_prefix > sizeof(rule->prefix) - 1) {
- LOGP(DNAT, LOGL_ERROR,
- "Prefix is too long with %zu\n", size_prefix);
- return;
- }
-
- if (size_end > sizeof(rule->rewrite) - 1) {
- LOGP(DNAT, LOGL_ERROR,
- "Rewrite is too long with %zu on %s\n",
- size_end, &line[size_prefix + 1]);
- return;
- }
-
- /* Now create the entry and insert it into the trie */
- rule = talloc_zero(rewrite, struct nat_rewrite_rule);
- if (!rule) {
- LOGP(DNAT, LOGL_ERROR, "Can not allocate memory\n");
- return;
- }
-
- memcpy(rule->prefix, line, size_prefix);
- assert(size_prefix < sizeof(rule->prefix));
- rule->prefix[size_prefix] = '\0';
-
- memcpy(rule->rewrite, split, size_end);
- assert(size_end < sizeof(rule->rewrite));
- rule->rewrite[size_end] = '\0';
-
- /* now insert and balance the tree */
- insert_rewrite_node(rule, rewrite);
-}
-
-struct nat_rewrite *nat_rewrite_parse(void *ctx, const char *filename)
-{
- FILE *file;
- char *line = NULL;
- size_t n = 0;
- struct nat_rewrite *res;
-
- file = fopen(filename, "r");
- if (!file)
- return NULL;
-
- res = talloc_zero(ctx, struct nat_rewrite);
- if (!res) {
- fclose(file);
- return NULL;
- }
-
- /* mark the root as empty */
- res->rule.empty = 1;
-
- while (getline(&line, &n, file) != -1) {
- handle_line(res, line);
- }
-
- free(line);
- fclose(file);
- return res;
-}
-
-/**
- * Simple find that tries to do a longest match...
- */
-struct nat_rewrite_rule *nat_rewrite_lookup(struct nat_rewrite *rewrite,
- const char *prefix)
-{
- struct nat_rewrite_rule *rule = &rewrite->rule;
- struct nat_rewrite_rule *last = NULL;
- const int len = OSMO_MIN(strlen(prefix), (sizeof(rule->prefix) - 1));
- int i;
-
- for (i = 0; rule && i < len; ++i) {
- int pos;
-
- CHECK_IS_DIGIT_OR_FAIL(prefix, i);
- pos = TO_INT(prefix[i]);
-
- rule = rule->rules[pos];
- if (rule && !rule->empty)
- last = rule;
- }
-
- return last;
-
-fail:
- return NULL;
-}
-
-static void nat_rewrite_dump_rec(struct nat_rewrite_rule *rule)
-{
- int i;
- if (!rule->empty)
- printf("%s,%s\n", rule->prefix, rule->rewrite);
-
- for (i = 0; i < ARRAY_SIZE(rule->rules); ++i) {
- if (!rule->rules[i])
- continue;
- nat_rewrite_dump_rec(rule->rules[i]);
- }
-}
-
-void nat_rewrite_dump(struct nat_rewrite *rewrite)
-{
- nat_rewrite_dump_rec(&rewrite->rule);
-}
-
-static void nat_rewrite_dump_rec_vty(struct vty *vty, struct nat_rewrite_rule *rule)
-{
- int i;
- if (!rule->empty)
- vty_out(vty, "%s,%s%s", rule->prefix, rule->rewrite, VTY_NEWLINE);
-
- for (i = 0; i < ARRAY_SIZE(rule->rules); ++i) {
- if (!rule->rules[i])
- continue;
- nat_rewrite_dump_rec_vty(vty, rule->rules[i]);
- }
-}
-
-void nat_rewrite_dump_vty(struct vty *vty, struct nat_rewrite *rewrite)
-{
- nat_rewrite_dump_rec_vty(vty, &rewrite->rule);
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_utils.c b/src/osmo-bsc_nat/bsc_nat_utils.c
deleted file mode 100644
index c12b29f1f..000000000
--- a/src/osmo-bsc_nat/bsc_nat_utils.c
+++ /dev/null
@@ -1,535 +0,0 @@
-
-/* BSC Multiplexer/NAT Utilities */
-
-/*
- * (C) 2010-2011 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/bsc_msc.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/debug.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/vty.h>
-
-#include <osmocom/core/linuxlist.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/stats.h>
-#include <osmocom/gsm/gsm0808.h>
-#include <osmocom/gsm/ipa.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/protocol/gsm_04_11.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <netinet/in.h>
-#include <arpa/inet.h>
-#include <unistd.h>
-
-static const struct rate_ctr_desc bsc_cfg_ctr_description[] = {
- [BCFG_CTR_SCCP_CONN] = { "sccp.conn", "SCCP Connections "},
- [BCFG_CTR_SCCP_CALLS] = { "sccp.calls", "SCCP Assignment Commands "},
- [BCFG_CTR_NET_RECONN] = { "net.reconnects", "Network reconnects "},
- [BCFG_CTR_DROPPED_SCCP] = { "dropped.sccp", "Dropped SCCP connections."},
- [BCFG_CTR_DROPPED_CALLS] = { "dropped.calls", "Dropped active calls. "},
- [BCFG_CTR_REJECTED_CR] = { "rejected.cr", "Rejected CR due filter "},
- [BCFG_CTR_REJECTED_MSG] = { "rejected.msg", "Rejected MSG due filter "},
- [BCFG_CTR_ILL_PACKET] = { "rejected.ill", "Rejected due parse error "},
- [BCFG_CTR_CON_TYPE_LU] = { "conn.lu", "Conn Location Update "},
- [BCFG_CTR_CON_CMSERV_RQ] = { "conn.rq", "Conn CM Service Req "},
- [BCFG_CTR_CON_PAG_RESP] = { "conn.pag", "Conn Paging Response "},
- [BCFG_CTR_CON_SSA] = { "conn.ssa", "Conn USSD "},
- [BCFG_CTR_CON_OTHER] = { "conn.other", "Conn Other "},
-};
-
-static const struct rate_ctr_group_desc bsc_cfg_ctrg_desc = {
- .group_name_prefix = "nat.bsc",
- .group_description = "NAT BSC Statistics",
- .num_ctr = ARRAY_SIZE(bsc_cfg_ctr_description),
- .ctr_desc = bsc_cfg_ctr_description,
- .class_id = OSMO_STATS_CLASS_PEER,
-};
-
-struct bsc_nat *bsc_nat_alloc(void)
-{
- struct bsc_nat *nat = talloc_zero(tall_bsc_ctx, struct bsc_nat);
- if (!nat)
- return NULL;
-
- nat->main_dest = talloc_zero(nat, struct bsc_msc_dest);
- if (!nat->main_dest) {
- talloc_free(nat);
- return NULL;
- }
-
- INIT_LLIST_HEAD(&nat->sccp_connections);
- INIT_LLIST_HEAD(&nat->bsc_connections);
- INIT_LLIST_HEAD(&nat->paging_groups);
- INIT_LLIST_HEAD(&nat->bsc_configs);
- INIT_LLIST_HEAD(&nat->access_lists);
- INIT_LLIST_HEAD(&nat->dests);
- INIT_LLIST_HEAD(&nat->num_rewr);
- INIT_LLIST_HEAD(&nat->num_rewr_post);
- INIT_LLIST_HEAD(&nat->smsc_rewr);
- INIT_LLIST_HEAD(&nat->tpdest_match);
- INIT_LLIST_HEAD(&nat->sms_clear_tp_srr);
- INIT_LLIST_HEAD(&nat->sms_num_rewr);
-
- nat->stats.sccp.conn = osmo_counter_alloc("nat.sccp.conn");
- nat->stats.sccp.calls = osmo_counter_alloc("nat.sccp.calls");
- nat->stats.bsc.reconn = osmo_counter_alloc("nat.bsc.conn");
- nat->stats.bsc.auth_fail = osmo_counter_alloc("nat.bsc.auth_fail");
- nat->stats.msc.reconn = osmo_counter_alloc("nat.msc.conn");
- nat->stats.ussd.reconn = osmo_counter_alloc("nat.ussd.conn");
- nat->auth_timeout = 2;
- nat->ping_timeout = 20;
- nat->pong_timeout = 5;
-
- llist_add(&nat->main_dest->list, &nat->dests);
- nat->main_dest->ip = talloc_strdup(nat, "127.0.0.1");
- nat->main_dest->port = 5000;
-
- return nat;
-}
-
-void bsc_nat_free(struct bsc_nat *nat)
-{
- struct bsc_config *cfg, *tmp;
- struct bsc_msg_acc_lst *lst, *tmp_lst;
-
- llist_for_each_entry_safe(cfg, tmp, &nat->bsc_configs, entry)
- bsc_config_free(cfg);
- llist_for_each_entry_safe(lst, tmp_lst, &nat->access_lists, list)
- bsc_msg_acc_lst_delete(lst);
-
- bsc_nat_num_rewr_entry_adapt(nat, &nat->num_rewr, NULL);
- bsc_nat_num_rewr_entry_adapt(nat, &nat->num_rewr_post, NULL);
- bsc_nat_num_rewr_entry_adapt(nat, &nat->sms_clear_tp_srr, NULL);
- bsc_nat_num_rewr_entry_adapt(nat, &nat->sms_num_rewr, NULL);
- bsc_nat_num_rewr_entry_adapt(nat, &nat->tpdest_match, NULL);
-
- osmo_counter_free(nat->stats.sccp.conn);
- osmo_counter_free(nat->stats.sccp.calls);
- osmo_counter_free(nat->stats.bsc.reconn);
- osmo_counter_free(nat->stats.bsc.auth_fail);
- osmo_counter_free(nat->stats.msc.reconn);
- osmo_counter_free(nat->stats.ussd.reconn);
- talloc_free(nat->mgcp_cfg);
- talloc_free(nat);
-}
-
-void bsc_nat_set_msc_ip(struct bsc_nat *nat, const char *ip)
-{
- osmo_talloc_replace_string(nat, &nat->main_dest->ip, ip);
-}
-
-struct bsc_connection *bsc_connection_alloc(struct bsc_nat *nat)
-{
- struct bsc_connection *con = talloc_zero(nat, struct bsc_connection);
- if (!con)
- return NULL;
-
- con->nat = nat;
- osmo_wqueue_init(&con->write_queue, 100);
- INIT_LLIST_HEAD(&con->cmd_pending);
- INIT_LLIST_HEAD(&con->pending_dlcx);
- return con;
-}
-
-struct bsc_config *bsc_config_alloc(struct bsc_nat *nat, const char *token,
- unsigned int number)
-{
- struct bsc_config *conf = talloc_zero(nat, struct bsc_config);
- if (!conf)
- return NULL;
-
- conf->token = talloc_strdup(conf, token);
- conf->nr = number;
- conf->nat = nat;
- conf->max_endpoints = 32;
- conf->paging_group = PAGIN_GROUP_UNASSIGNED;
-
- INIT_LLIST_HEAD(&conf->lac_list);
-
- llist_add_tail(&conf->entry, &nat->bsc_configs);
- ++nat->num_bsc;
-
- conf->stats.ctrg = rate_ctr_group_alloc(conf, &bsc_cfg_ctrg_desc, conf->nr);
- if (!conf->stats.ctrg) {
- llist_del(&conf->entry);
- talloc_free(conf);
- return NULL;
- }
-
- return conf;
-}
-
-struct bsc_config *bsc_config_by_token(struct bsc_nat *nat, const char *token, int len)
-{
- struct bsc_config *conf;
-
- llist_for_each_entry(conf, &nat->bsc_configs, entry) {
- /*
- * Add the '\0' of the token for the memcmp, the IPA messages
- * for some reason added null termination.
- */
- const int token_len = strlen(conf->token) + 1;
-
- if (token_len == len && memcmp(conf->token, token, token_len) == 0)
- return conf;
- }
-
- return NULL;
-}
-
-void bsc_config_free(struct bsc_config *cfg)
-{
- llist_del(&cfg->entry);
- rate_ctr_group_free(cfg->stats.ctrg);
- cfg->nat->num_bsc--;
- OSMO_ASSERT(cfg->nat->num_bsc >= 0)
- talloc_free(cfg);
-}
-
-static void _add_lac(void *ctx, struct llist_head *list, int _lac)
-{
- struct bsc_lac_entry *lac;
-
- llist_for_each_entry(lac, list, entry)
- if (lac->lac == _lac)
- return;
-
- lac = talloc_zero(ctx, struct bsc_lac_entry);
- if (!lac) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate.\n");
- return;
- }
-
- lac->lac = _lac;
- llist_add_tail(&lac->entry, list);
-}
-
-static void _del_lac(struct llist_head *list, int _lac)
-{
- struct bsc_lac_entry *lac;
-
- llist_for_each_entry(lac, list, entry)
- if (lac->lac == _lac) {
- llist_del(&lac->entry);
- talloc_free(lac);
- return;
- }
-}
-
-void bsc_config_add_lac(struct bsc_config *cfg, int _lac)
-{
- _add_lac(cfg, &cfg->lac_list, _lac);
-}
-
-void bsc_config_del_lac(struct bsc_config *cfg, int _lac)
-{
- _del_lac(&cfg->lac_list, _lac);
-}
-
-struct bsc_nat_paging_group *bsc_nat_paging_group_create(struct bsc_nat *nat, int group)
-{
- struct bsc_nat_paging_group *pgroup;
-
- pgroup = talloc_zero(nat, struct bsc_nat_paging_group);
- if (!pgroup) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate a paging group.\n");
- return NULL;
- }
-
- pgroup->nr = group;
- INIT_LLIST_HEAD(&pgroup->lists);
- llist_add_tail(&pgroup->entry, &nat->paging_groups);
- return pgroup;
-}
-
-void bsc_nat_paging_group_delete(struct bsc_nat_paging_group *pgroup)
-{
- llist_del(&pgroup->entry);
- talloc_free(pgroup);
-}
-
-struct bsc_nat_paging_group *bsc_nat_paging_group_num(struct bsc_nat *nat, int group)
-{
- struct bsc_nat_paging_group *pgroup;
-
- llist_for_each_entry(pgroup, &nat->paging_groups, entry)
- if (pgroup->nr == group)
- return pgroup;
-
- return NULL;
-}
-
-void bsc_nat_paging_group_add_lac(struct bsc_nat_paging_group *pgroup, int lac)
-{
- _add_lac(pgroup, &pgroup->lists, lac);
-}
-
-void bsc_nat_paging_group_del_lac(struct bsc_nat_paging_group *pgroup, int lac)
-{
- _del_lac(&pgroup->lists, lac);
-}
-
-int bsc_config_handles_lac(struct bsc_config *cfg, int lac_nr)
-{
- struct bsc_nat_paging_group *pgroup;
- struct bsc_lac_entry *entry;
-
- llist_for_each_entry(entry, &cfg->lac_list, entry)
- if (entry->lac == lac_nr)
- return 1;
-
- /* now lookup the paging group */
- pgroup = bsc_nat_paging_group_num(cfg->nat, cfg->paging_group);
- if (!pgroup)
- return 0;
-
- llist_for_each_entry(entry, &pgroup->lists, entry)
- if (entry->lac == lac_nr)
- return 1;
-
- return 0;
-}
-
-void sccp_connection_destroy(struct nat_sccp_connection *conn)
-{
- LOGP(DNAT, LOGL_DEBUG, "Destroy 0x%x <-> 0x%x mapping for con %p\n",
- sccp_src_ref_to_int(&conn->real_ref),
- sccp_src_ref_to_int(&conn->patched_ref), conn->bsc);
- bsc_mgcp_dlcx(conn);
- llist_del(&conn->list_entry);
- talloc_free(conn);
-}
-
-
-int bsc_nat_find_paging(struct msgb *msg,
- const uint8_t **out_data, int *out_leng)
-{
- int data_length;
- const uint8_t *data;
- struct tlv_parsed tp;
-
- if (!msg->l3h || msgb_l3len(msg) < 3) {
- LOGP(DNAT, LOGL_ERROR, "Paging message is too short.\n");
- return -1;
- }
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 3, msgb_l3len(msg) - 3, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST)) {
- LOGP(DNAT, LOGL_ERROR, "No CellIdentifier List inside paging msg.\n");
- return -2;
- }
-
- data_length = TLVP_LEN(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST);
- data = TLVP_VAL(&tp, GSM0808_IE_CELL_IDENTIFIER_LIST);
-
- /* No need to try a different BSS */
- if (data[0] == CELL_IDENT_BSS) {
- return -3;
- } else if (data[0] != CELL_IDENT_LAC) {
- LOGP(DNAT, LOGL_ERROR, "Unhandled cell ident discrminator: %d\n", data[0]);
- return -4;
- }
-
- *out_data = &data[1];
- *out_leng = data_length - 1;
- return 0;
-}
-
-int bsc_write_mgcp(struct bsc_connection *bsc, const uint8_t *data, unsigned int length)
-{
- struct msgb *msg;
-
- if (length > 4096 - 128) {
- LOGP(DLINP, LOGL_ERROR, "Can not send message of that size.\n");
- return -1;
- }
-
- msg = msgb_alloc_headroom(4096, 128, "to-bsc");
- if (!msg) {
- LOGP(DLINP, LOGL_ERROR, "Failed to allocate memory for BSC msg.\n");
- return -1;
- }
-
- /* copy the data */
- msg->l3h = msgb_put(msg, length);
- memcpy(msg->l3h, data, length);
-
- return bsc_write(bsc, msg, IPAC_PROTO_MGCP_OLD);
-}
-
-int bsc_write(struct bsc_connection *bsc, struct msgb *msg, int proto)
-{
- return bsc_do_write(&bsc->write_queue, msg, proto);
-}
-
-int bsc_do_write(struct osmo_wqueue *queue, struct msgb *msg, int proto)
-{
- /* prepend the header */
- ipa_prepend_header(msg, proto);
- return bsc_write_msg(queue, msg);
-}
-
-int bsc_write_msg(struct osmo_wqueue *queue, struct msgb *msg)
-{
- if (osmo_wqueue_enqueue(queue, msg) != 0) {
- LOGP(DLINP, LOGL_ERROR, "Failed to enqueue the write.\n");
- msgb_free(msg);
- return -1;
- }
-
- return 0;
-}
-
-struct gsm48_hdr *bsc_unpack_dtap(struct bsc_nat_parsed *parsed,
- struct msgb *msg, uint32_t *len)
-{
- /* gsm_type is actually the size of the dtap */
- *len = parsed->gsm_type;
- if (*len < msgb_l3len(msg) - 3) {
- LOGP(DNAT, LOGL_ERROR, "Not enough space for DTAP.\n");
- return NULL;
- }
-
- if (msgb_l3len(msg) - 3 < msg->l3h[2]) {
- LOGP(DNAT, LOGL_ERROR,
- "GSM48 payload does not fit: %d %d\n",
- msg->l3h[2], msgb_l3len(msg) - 3);
- return NULL;
- }
-
- msg->l4h = &msg->l3h[3];
- return (struct gsm48_hdr *) msg->l4h;
-}
-
-static const char *con_types [] = {
- [FLT_CON_TYPE_NONE] = "n/a",
- [FLT_CON_TYPE_LU] = "Location Update",
- [FLT_CON_TYPE_CM_SERV_REQ] = "CM Serv Req",
- [FLT_CON_TYPE_PAG_RESP] = "Paging Response",
- [FLT_CON_TYPE_SSA] = "Supplementar Service Activation",
- [FLT_CON_TYPE_LOCAL_REJECT] = "Local Reject",
- [FLT_CON_TYPE_OTHER] = "Other",
-};
-
-const char *bsc_con_type_to_string(int type)
-{
- return con_types[type];
-}
-
-int bsc_nat_msc_is_connected(struct bsc_nat *nat)
-{
- return nat->msc_con->is_connected;
-}
-
-static const int con_to_ctr[] = {
- [FLT_CON_TYPE_NONE] = -1,
- [FLT_CON_TYPE_LU] = BCFG_CTR_CON_TYPE_LU,
- [FLT_CON_TYPE_CM_SERV_REQ] = BCFG_CTR_CON_CMSERV_RQ,
- [FLT_CON_TYPE_PAG_RESP] = BCFG_CTR_CON_PAG_RESP,
- [FLT_CON_TYPE_SSA] = BCFG_CTR_CON_SSA,
- [FLT_CON_TYPE_LOCAL_REJECT] = -1,
- [FLT_CON_TYPE_OTHER] = BCFG_CTR_CON_OTHER,
-};
-
-int bsc_conn_type_to_ctr(struct nat_sccp_connection *conn)
-{
- return con_to_ctr[conn->filter_state.con_type];
-}
-
-int bsc_write_cb(struct osmo_fd *bfd, struct msgb *msg)
-{
- int rc;
-
- rc = write(bfd->fd, msg->data, msg->len);
- if (rc != msg->len)
- LOGP(DNAT, LOGL_ERROR, "Failed to write message to the BSC.\n");
-
- return rc;
-}
-
-static void extract_lac(const uint8_t *data, uint16_t *lac, uint16_t *ci)
-{
- memcpy(lac, &data[0], sizeof(*lac));
- memcpy(ci, &data[2], sizeof(*ci));
-
- *lac = ntohs(*lac);
- *ci = ntohs(*ci);
-}
-
-int bsc_nat_extract_lac(struct bsc_connection *bsc,
- struct nat_sccp_connection *con,
- struct bsc_nat_parsed *parsed, struct msgb *msg)
-{
- int data_length;
- const uint8_t *data;
- struct tlv_parsed tp;
- uint16_t lac, ci;
-
- if (parsed->gsm_type != BSS_MAP_MSG_COMPLETE_LAYER_3) {
- LOGP(DNAT, LOGL_ERROR, "Can only extract LAC from Complete Layer3\n");
- return -1;
- }
-
- if (!msg->l3h || msgb_l3len(msg) < 3) {
- LOGP(DNAT, LOGL_ERROR, "Complete Layer3 mssage is too short.\n");
- return -1;
- }
-
- tlv_parse(&tp, gsm0808_att_tlvdef(), msg->l3h + 3, msgb_l3len(msg) - 3, 0, 0);
- if (!TLVP_PRESENT(&tp, GSM0808_IE_CELL_IDENTIFIER)) {
- LOGP(DNAT, LOGL_ERROR, "No CellIdentifier List inside paging msg.\n");
- return -2;
- }
-
- data_length = TLVP_LEN(&tp, GSM0808_IE_CELL_IDENTIFIER);
- data = TLVP_VAL(&tp, GSM0808_IE_CELL_IDENTIFIER);
-
- /* Attemt to get the LAC/CI from it */
- if (data[0] == CELL_IDENT_WHOLE_GLOBAL) {
- if (data_length != 8) {
- LOGP(DNAT, LOGL_ERROR,
- "Ident too short: %d\n", data_length);
- return -3;
- }
- extract_lac(&data[1 + 3], &lac, &ci);
- } else if (data[0] == CELL_IDENT_LAC_AND_CI) {
- if (data_length != 5) {
- LOGP(DNAT, LOGL_ERROR,
- "Ident too short: %d\n", data_length);
- return -3;
- }
- extract_lac(&data[1], &lac, &ci);
- } else {
- LOGP(DNAT, LOGL_ERROR,
- "Unhandled cell identifier: %d\n", data[0]);
- return -1;
- }
-
- con->lac = lac;
- con->ci = ci;
- return 0;
-}
diff --git a/src/osmo-bsc_nat/bsc_nat_vty.c b/src/osmo-bsc_nat/bsc_nat_vty.c
deleted file mode 100644
index fed530676..000000000
--- a/src/osmo-bsc_nat/bsc_nat_vty.c
+++ /dev/null
@@ -1,1336 +0,0 @@
-/* OpenBSC NAT interface to quagga VTY */
-/* (C) 2010-2015 by Holger Hans Peter Freyther
- * (C) 2010-2015 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/vty.h>
-#include <openbsc/gsm_data.h>
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/bsc_msc.h>
-#include <openbsc/gsm_04_08.h>
-#include <osmocom/legacy_mgcp/mgcp.h>
-#include <openbsc/vty.h>
-#include <openbsc/nat_rewrite_trie.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/rate_ctr.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/vty/logging.h>
-#include <osmocom/vty/misc.h>
-#include <openbsc/osmux.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <stdlib.h>
-#include <stdbool.h>
-
-static struct bsc_nat *_nat;
-
-
-#define BSC_STR "Information about BSCs\n"
-#define MGCP_STR "MGCP related status\n"
-#define PAGING_STR "Paging\n"
-#define SMSC_REWRITE "SMSC Rewriting\n"
-
-static struct cmd_node nat_node = {
- NAT_NODE,
- "%s(config-nat)# ",
- 1,
-};
-
-static struct cmd_node bsc_node = {
- NAT_BSC_NODE,
- "%s(config-nat-bsc)# ",
- 1,
-};
-
-static struct cmd_node pgroup_node = {
- PGROUP_NODE,
- "%s(config-nat-paging-group)# ",
- 1,
-};
-
-static int config_write_pgroup(struct vty *vty)
-{
- return CMD_SUCCESS;
-}
-
-static void dump_lac(struct vty *vty, struct llist_head *head)
-{
- struct bsc_lac_entry *lac;
- llist_for_each_entry(lac, head, entry)
- vty_out(vty, " location_area_code %u%s", lac->lac, VTY_NEWLINE);
-}
-
-
-static void write_pgroup_lst(struct vty *vty, struct bsc_nat_paging_group *pgroup)
-{
- vty_out(vty, " paging-group %d%s", pgroup->nr, VTY_NEWLINE);
- dump_lac(vty, &pgroup->lists);
-}
-
-static int config_write_nat(struct vty *vty)
-{
- struct bsc_msg_acc_lst *lst;
- struct bsc_nat_paging_group *pgroup;
-
- vty_out(vty, "nat%s", VTY_NEWLINE);
- vty_out(vty, " msc ip %s%s", _nat->main_dest->ip, VTY_NEWLINE);
- vty_out(vty, " msc port %d%s", _nat->main_dest->port, VTY_NEWLINE);
- vty_out(vty, " timeout auth %d%s", _nat->auth_timeout, VTY_NEWLINE);
- vty_out(vty, " timeout ping %d%s", _nat->ping_timeout, VTY_NEWLINE);
- vty_out(vty, " timeout pong %d%s", _nat->pong_timeout, VTY_NEWLINE);
- if (_nat->include_file)
- vty_out(vty, " bscs-config-file %s%s", _nat->include_file, VTY_NEWLINE);
- if (_nat->token)
- vty_out(vty, " token %s%s", _nat->token, VTY_NEWLINE);
- vty_out(vty, " ip-dscp %d%s", _nat->bsc_ip_dscp, VTY_NEWLINE);
- if (_nat->acc_lst_name)
- vty_out(vty, " access-list-name %s%s", _nat->acc_lst_name, VTY_NEWLINE);
- if (_nat->imsi_black_list_fn)
- vty_out(vty, " imsi-black-list-file-name %s%s",
- _nat->imsi_black_list_fn, VTY_NEWLINE);
- if (_nat->ussd_lst_name)
- vty_out(vty, " ussd-list-name %s%s", _nat->ussd_lst_name, VTY_NEWLINE);
- if (_nat->ussd_query)
- vty_out(vty, " ussd-query %s%s", _nat->ussd_query, VTY_NEWLINE);
- if (_nat->ussd_token)
- vty_out(vty, " ussd-token %s%s", _nat->ussd_token, VTY_NEWLINE);
- if (_nat->ussd_local)
- vty_out(vty, " ussd-local-ip %s%s", _nat->ussd_local, VTY_NEWLINE);
-
- if (_nat->num_rewr_name)
- vty_out(vty, " number-rewrite %s%s", _nat->num_rewr_name, VTY_NEWLINE);
- if (_nat->num_rewr_post_name)
- vty_out(vty, " number-rewrite-post %s%s",
- _nat->num_rewr_post_name, VTY_NEWLINE);
-
- if (_nat->smsc_rewr_name)
- vty_out(vty, " rewrite-smsc addr %s%s",
- _nat->smsc_rewr_name, VTY_NEWLINE);
- if (_nat->tpdest_match_name)
- vty_out(vty, " rewrite-smsc tp-dest-match %s%s",
- _nat->tpdest_match_name, VTY_NEWLINE);
- if (_nat->sms_clear_tp_srr_name)
- vty_out(vty, " sms-clear-tp-srr %s%s",
- _nat->sms_clear_tp_srr_name, VTY_NEWLINE);
- if (_nat->sms_num_rewr_name)
- vty_out(vty, " sms-number-rewrite %s%s",
- _nat->sms_num_rewr_name, VTY_NEWLINE);
- if (_nat->num_rewr_trie_name)
- vty_out(vty, " prefix-tree %s%s",
- _nat->num_rewr_trie_name, VTY_NEWLINE);
-
- llist_for_each_entry(lst, &_nat->access_lists, list)
- bsc_msg_acc_lst_write(vty, lst);
- llist_for_each_entry(pgroup, &_nat->paging_groups, entry)
- write_pgroup_lst(vty, pgroup);
- if (_nat->mgcp_ipa)
- vty_out(vty, " use-msc-ipa-for-mgcp%s", VTY_NEWLINE);
- vty_out(vty, " %ssdp-ensure-amr-mode-set%s",
- _nat->sdp_ensure_amr_mode_set ? "" : "no ", VTY_NEWLINE);
-
- return CMD_SUCCESS;
-}
-
-static void config_write_bsc_single(struct vty *vty, struct bsc_config *bsc)
-{
- vty_out(vty, " bsc %u%s", bsc->nr, VTY_NEWLINE);
- vty_out(vty, " token %s%s", bsc->token, VTY_NEWLINE);
- if (bsc->key_present)
- vty_out(vty, " auth-key %s%s", osmo_hexdump(bsc->key, 16), VTY_NEWLINE);
- dump_lac(vty, &bsc->lac_list);
- if (bsc->description)
- vty_out(vty, " description %s%s", bsc->description, VTY_NEWLINE);
- if (bsc->acc_lst_name)
- vty_out(vty, " access-list-name %s%s", bsc->acc_lst_name, VTY_NEWLINE);
- vty_out(vty, " max-endpoints %d%s", bsc->max_endpoints, VTY_NEWLINE);
- if (bsc->paging_group != -1)
- vty_out(vty, " paging group %d%s", bsc->paging_group, VTY_NEWLINE);
- vty_out(vty, " paging forbidden %d%s", bsc->forbid_paging, VTY_NEWLINE);
- switch (bsc->osmux) {
- case OSMUX_USAGE_ON:
- vty_out(vty, " osmux on%s", VTY_NEWLINE);
- break;
- case OSMUX_USAGE_ONLY:
- vty_out(vty, " osmux only%s", VTY_NEWLINE);
- break;
- }
-}
-
-static int config_write_bsc(struct vty *vty)
-{
- struct bsc_config *bsc;
-
- llist_for_each_entry(bsc, &_nat->bsc_configs, entry)
- config_write_bsc_single(vty, bsc);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_bscs, show_bscs_cmd, "show bscs-config",
- SHOW_STR "Show configured BSCs\n"
- "Both from included file and vty\n")
-{
- vty_out(vty, "BSCs configuration loaded from %s:%s", _nat->resolved_path,
- VTY_NEWLINE);
- return config_write_bsc(vty);
-}
-
-DEFUN(show_sccp, show_sccp_cmd, "show sccp connections",
- SHOW_STR "Display information about SCCP\n"
- "All active connections\n")
-{
- struct nat_sccp_connection *con;
- vty_out(vty, "Listing all open SCCP connections%s", VTY_NEWLINE);
-
- llist_for_each_entry(con, &_nat->sccp_connections, list_entry) {
- vty_out(vty, "For BSC Nr: %d BSC ref: 0x%x; MUX ref: 0x%x; Network has ref: %d ref: 0x%x MSC/BSC mux: 0x%x/0x%x type: %s%s",
- con->bsc->cfg ? con->bsc->cfg->nr : -1,
- sccp_src_ref_to_int(&con->real_ref),
- sccp_src_ref_to_int(&con->patched_ref),
- con->has_remote_ref,
- sccp_src_ref_to_int(&con->remote_ref),
- con->msc_endp, con->bsc_endp,
- bsc_con_type_to_string(con->filter_state.con_type),
- VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_nat_bsc, show_nat_bsc_cmd, "show nat num-bscs-configured",
- SHOW_STR "Display NAT configuration details\n"
- "BSCs-related\n")
-{
- vty_out(vty, "%d BSCs configured%s", _nat->num_bsc, VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_bsc, show_bsc_cmd, "show bsc connections",
- SHOW_STR BSC_STR
- "All active connections\n")
-{
- struct bsc_connection *con;
- struct sockaddr_in sock;
- socklen_t len = sizeof(sock);
-
- llist_for_each_entry(con, &_nat->bsc_connections, list_entry) {
- getpeername(con->write_queue.bfd.fd, (struct sockaddr *) &sock, &len);
- vty_out(vty, "BSC nr: %d auth: %d fd: %d peername: %s pending-stats: %u%s",
- con->cfg ? con->cfg->nr : -1,
- con->authenticated, con->write_queue.bfd.fd,
- inet_ntoa(sock.sin_addr), con->pending_dlcx_count,
- VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_bsc_mgcp, show_bsc_mgcp_cmd, "show bsc mgcp NR",
- SHOW_STR BSC_STR MGCP_STR "Identifier of the BSC\n")
-{
- struct bsc_connection *con;
- int nr = atoi(argv[0]);
- int i, j, endp;
-
- llist_for_each_entry(con, &_nat->bsc_connections, list_entry) {
- int max;
- if (!con->cfg)
- continue;
- if (con->cfg->nr != nr)
- continue;
-
- /* this bsc has no audio endpoints yet */
- if (!con->_endpoint_status)
- continue;
-
- vty_out(vty, "MGCP Status for %d%s", con->cfg->nr, VTY_NEWLINE);
- max = bsc_mgcp_nr_multiplexes(con->max_endpoints);
- for (i = 0; i < max; ++i) {
- for (j = 1; j < 32; ++j) {
- endp = mgcp_timeslot_to_endpoint(i, j);
- vty_out(vty, " Endpoint 0x%x %s%s", endp,
- con->_endpoint_status[endp] == 0
- ? "free" : "allocated",
- VTY_NEWLINE);
- }
- }
- break;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_bsc_cfg, show_bsc_cfg_cmd, "show bsc config",
- SHOW_STR BSC_STR "Configuration of BSCs\n")
-{
- struct bsc_config *conf;
- llist_for_each_entry(conf, &_nat->bsc_configs, entry) {
- vty_out(vty, "BSC token: '%s' nr: %u%s",
- conf->token, conf->nr, VTY_NEWLINE);
- if (conf->acc_lst_name)
- vty_out(vty, " access-list: %s%s",
- conf->acc_lst_name, VTY_NEWLINE);
- vty_out(vty, " paging forbidden: %d%s",
- conf->forbid_paging, VTY_NEWLINE);
- if (conf->description)
- vty_out(vty, " description: %s%s", conf->description, VTY_NEWLINE);
- else
- vty_out(vty, " No description.%s", VTY_NEWLINE);
-
- }
-
- return CMD_SUCCESS;
-}
-
-static void dump_stat_total(struct vty *vty, struct bsc_nat *nat)
-{
- vty_out(vty, "NAT statistics%s", VTY_NEWLINE);
- vty_out(vty, " SCCP Connections %lu total, %lu calls%s",
- osmo_counter_get(nat->stats.sccp.conn),
- osmo_counter_get(nat->stats.sccp.calls), VTY_NEWLINE);
- vty_out(vty, " MSC Connections %lu%s",
- osmo_counter_get(nat->stats.msc.reconn), VTY_NEWLINE);
- vty_out(vty, " MSC Connected: %d%s",
- bsc_nat_msc_is_connected(nat), VTY_NEWLINE);
- vty_out(vty, " BSC Connections %lu total, %lu auth failed.%s",
- osmo_counter_get(nat->stats.bsc.reconn),
- osmo_counter_get(nat->stats.bsc.auth_fail), VTY_NEWLINE);
-}
-
-static void dump_stat_bsc(struct vty *vty, struct bsc_config *conf)
-{
- int connected = 0;
- struct bsc_connection *con;
-
- vty_out(vty, " BSC nr: %d%s",
- conf->nr, VTY_NEWLINE);
- vty_out_rate_ctr_group(vty, " ", conf->stats.ctrg);
-
- llist_for_each_entry(con, &conf->nat->bsc_connections, list_entry) {
- if (con->cfg != conf)
- continue;
- connected = 1;
- break;
- }
-
- vty_out(vty, " Connected: %d%s", connected, VTY_NEWLINE);
-}
-
-DEFUN(show_stats,
- show_stats_cmd,
- "show statistics [NR]",
- SHOW_STR "Display network statistics\n"
- "Number of the BSC\n")
-{
- struct bsc_config *conf;
-
- int nr = -1;
-
- if (argc == 1)
- nr = atoi(argv[0]);
-
- dump_stat_total(vty, _nat);
- llist_for_each_entry(conf, &_nat->bsc_configs, entry) {
- if (argc == 1 && nr != conf->nr)
- continue;
- dump_stat_bsc(vty, conf);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_stats_lac,
- show_stats_lac_cmd,
- "show statistics-by-lac <0-65535>",
- SHOW_STR "Display network statistics by lac\n"
- "The lac of the BSC\n")
-{
- int lac;
- struct bsc_config *conf;
-
- lac = atoi(argv[0]);
-
- dump_stat_total(vty, _nat);
- llist_for_each_entry(conf, &_nat->bsc_configs, entry) {
- if (!bsc_config_handles_lac(conf, lac))
- continue;
- dump_stat_bsc(vty, conf);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_msc,
- show_msc_cmd,
- "show msc connection",
- SHOW_STR "MSC related information\n"
- "Status of the A-link connection\n")
-{
- if (!_nat->msc_con) {
- vty_out(vty, "The MSC is not yet configured.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty_out(vty, "MSC is connected: %d%s",
- bsc_nat_msc_is_connected(_nat), VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(close_bsc,
- close_bsc_cmd,
- "close bsc connection BSC_NR",
- "Close\n" "A-link\n" "Connection\n" "Identifier of the BSC\n")
-{
- struct bsc_connection *bsc;
- int bsc_nr = atoi(argv[0]);
-
- llist_for_each_entry(bsc, &_nat->bsc_connections, list_entry) {
- if (!bsc->cfg || bsc->cfg->nr != bsc_nr)
- continue;
- bsc_close_connection(bsc);
- break;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat, cfg_nat_cmd, "nat", "Configure the NAT")
-{
- vty->index = _nat;
- vty->node = NAT_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_msc_ip,
- cfg_nat_msc_ip_cmd,
- "msc ip A.B.C.D",
- "MSC related configuration\n"
- "Configure the IP address\n" IP_STR)
-{
- bsc_nat_set_msc_ip(_nat, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_msc_port,
- cfg_nat_msc_port_cmd,
- "msc port <1-65500>",
- "MSC related configuration\n"
- "Configure the port\n"
- "Port number\n")
-{
- _nat->main_dest->port = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_auth_time,
- cfg_nat_auth_time_cmd,
- "timeout auth <1-256>",
- "Timeout configuration\n"
- "Authentication timeout\n"
- "Timeout in seconds\n")
-{
- _nat->auth_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_ping_time,
- cfg_nat_ping_time_cmd,
- "timeout ping NR",
- "Timeout configuration\n"
- "Time between two pings\n"
- "Timeout in seconds\n")
-{
- _nat->ping_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_pong_time,
- cfg_nat_pong_time_cmd,
- "timeout pong NR",
- "Timeout configuration\n"
- "Waiting for pong timeout\n"
- "Timeout in seconds\n")
-{
- _nat->pong_timeout = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_token, cfg_nat_token_cmd,
- "token TOKEN",
- "Authentication token configuration\n"
- "Token of the BSC, currently transferred in cleartext\n")
-{
- osmo_talloc_replace_string(_nat, &_nat->token, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_bsc_ip_dscp, cfg_nat_bsc_ip_dscp_cmd,
- "ip-dscp <0-255>",
- "Set the IP DSCP for the BSCs to use\n" "Set the IP_TOS attribute")
-{
- _nat->bsc_ip_dscp = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-ALIAS_DEPRECATED(cfg_nat_bsc_ip_dscp, cfg_nat_bsc_ip_tos_cmd,
- "ip-tos <0-255>",
- "Use ip-dscp in the future.\n" "Set the DSCP\n")
-
-
-DEFUN(cfg_nat_acc_lst_name,
- cfg_nat_acc_lst_name_cmd,
- "access-list-name NAME",
- "Set the name of the access list to use.\n"
- "The name of the to be used access list.")
-{
- osmo_talloc_replace_string(_nat, &_nat->acc_lst_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_include,
- cfg_nat_include_cmd,
- "bscs-config-file NAME",
- "Set the filename of the BSC configuration to include.\n"
- "The filename to be included.")
-{
- char *path;
- int rc;
- struct bsc_config *cf1, *cf2;
- struct bsc_connection *con1, *con2;
-
- if ('/' == argv[0][0])
- osmo_talloc_replace_string(_nat, &_nat->resolved_path, argv[0]);
- else {
- path = talloc_asprintf(_nat, "%s/%s", _nat->include_base,
- argv[0]);
- osmo_talloc_replace_string(_nat, &_nat->resolved_path, path);
- talloc_free(path);
- }
-
- llist_for_each_entry_safe(cf1, cf2, &_nat->bsc_configs, entry) {
- cf1->remove = true;
- cf1->token_updated = false;
- }
-
- rc = vty_read_config_file(_nat->resolved_path, NULL);
- if (rc < 0) {
- vty_out(vty, "Failed to parse the config file %s: %s%s",
- _nat->resolved_path, strerror(-rc), VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- osmo_talloc_replace_string(_nat, &_nat->include_file, argv[0]);
-
- llist_for_each_entry_safe(con1, con2, &_nat->bsc_connections,
- list_entry) {
- if (con1->cfg)
- if (con1->cfg->token_updated || con1->cfg->remove)
- bsc_close_connection(con1);
- }
-
- llist_for_each_entry_safe(cf1, cf2, &_nat->bsc_configs, entry) {
- if (cf1->remove)
- bsc_config_free(cf1);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_no_acc_lst_name,
- cfg_nat_no_acc_lst_name_cmd,
- "no access-list-name",
- NO_STR "Remove the access list from the NAT.\n")
-{
- if (_nat->acc_lst_name) {
- talloc_free(_nat->acc_lst_name);
- _nat->acc_lst_name = NULL;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_imsi_black_list_fn,
- cfg_nat_imsi_black_list_fn_cmd,
- "imsi-black-list-file-name NAME",
- "IMSI black listing\n" "Filename IMSI and reject-cause\n")
-{
-
- osmo_talloc_replace_string(_nat, &_nat->imsi_black_list_fn, argv[0]);
- if (_nat->imsi_black_list_fn) {
- int rc;
- struct osmo_config_list *rewr = NULL;
- rewr = osmo_config_list_parse(_nat, _nat->imsi_black_list_fn);
- rc = bsc_filter_barr_adapt(_nat, &_nat->imsi_black_list, rewr);
- if (rc != 0) {
- vty_out(vty, "%%There was an error parsing the list."
- " Please see the error log.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- return CMD_SUCCESS;
- }
-
- bsc_filter_barr_adapt(_nat, &_nat->imsi_black_list, NULL);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_no_imsi_black_list_fn,
- cfg_nat_no_imsi_black_list_fn_cmd,
- "no imsi-black-list-file-name",
- NO_STR "Remove the imsi-black-list\n")
-{
- talloc_free(_nat->imsi_black_list_fn);
- _nat->imsi_black_list_fn = NULL;
- bsc_filter_barr_adapt(_nat, &_nat->imsi_black_list, NULL);
- return CMD_SUCCESS;
-}
-
-static int replace_rules(struct bsc_nat *nat, char **name,
- struct llist_head *head, const char *file)
-{
- struct osmo_config_list *rewr = NULL;
-
- osmo_talloc_replace_string(nat, name, file);
- if (*name) {
- rewr = osmo_config_list_parse(nat, *name);
- bsc_nat_num_rewr_entry_adapt(nat, head, rewr);
- talloc_free(rewr);
- return CMD_SUCCESS;
- } else {
- bsc_nat_num_rewr_entry_adapt(nat, head, NULL);
- return CMD_SUCCESS;
- }
-}
-
-DEFUN(cfg_nat_number_rewrite,
- cfg_nat_number_rewrite_cmd,
- "number-rewrite FILENAME",
- "Set the file with rewriting rules.\n" "Filename")
-{
- return replace_rules(_nat, &_nat->num_rewr_name,
- &_nat->num_rewr, argv[0]);
-}
-
-DEFUN(cfg_nat_no_number_rewrite,
- cfg_nat_no_number_rewrite_cmd,
- "no number-rewrite",
- NO_STR "Set the file with rewriting rules.\n")
-{
- talloc_free(_nat->num_rewr_name);
- _nat->num_rewr_name = NULL;
-
- bsc_nat_num_rewr_entry_adapt(NULL, &_nat->num_rewr, NULL);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_number_rewrite_post,
- cfg_nat_number_rewrite_post_cmd,
- "number-rewrite-post FILENAME",
- "Set the file with post-routing rewriting rules.\n" "Filename")
-{
- return replace_rules(_nat, &_nat->num_rewr_post_name,
- &_nat->num_rewr_post, argv[0]);
-}
-
-DEFUN(cfg_nat_no_number_rewrite_post,
- cfg_nat_no_number_rewrite_post_cmd,
- "no number-rewrite-post",
- NO_STR "Set the file with post-routing rewriting rules.\n")
-{
- talloc_free(_nat->num_rewr_post_name);
- _nat->num_rewr_post_name = NULL;
-
- bsc_nat_num_rewr_entry_adapt(NULL, &_nat->num_rewr_post, NULL);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_smsc_addr,
- cfg_nat_smsc_addr_cmd,
- "rewrite-smsc addr FILENAME",
- SMSC_REWRITE
- "The SMSC Address to match and replace in RP-DATA\n"
- "File with rules for the SMSC Address replacing\n")
-{
- return replace_rules(_nat, &_nat->smsc_rewr_name,
- &_nat->smsc_rewr, argv[0]);
-}
-
-DEFUN(cfg_nat_smsc_tpdest,
- cfg_nat_smsc_tpdest_cmd,
- "rewrite-smsc tp-dest-match FILENAME",
- SMSC_REWRITE
- "Match TP-Destination of a SMS.\n"
- "File with rules for matching MSISDN and TP-DEST\n")
-{
- return replace_rules(_nat, &_nat->tpdest_match_name,
- &_nat->tpdest_match, argv[0]);
-}
-
-DEFUN(cfg_nat_sms_clear_tpsrr,
- cfg_nat_sms_clear_tpsrr_cmd,
- "sms-clear-tp-srr FILENAME",
- "SMS TPDU Sender Report Request clearing\n"
- "Files with rules for matching MSISDN\n")
-{
- return replace_rules(_nat, &_nat->sms_clear_tp_srr_name,
- &_nat->sms_clear_tp_srr, argv[0]);
-}
-
-DEFUN(cfg_nat_no_sms_clear_tpsrr,
- cfg_nat_no_sms_clear_tpsrr_cmd,
- "no sms-clear-tp-srr",
- NO_STR
- "SMS TPDU Sender Report Request clearing\n")
-{
- talloc_free(_nat->sms_clear_tp_srr_name);
- _nat->sms_clear_tp_srr_name = NULL;
-
- bsc_nat_num_rewr_entry_adapt(NULL, &_nat->sms_clear_tp_srr, NULL);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_sms_number_rewrite,
- cfg_nat_sms_number_rewrite_cmd,
- "sms-number-rewrite FILENAME",
- "SMS TP-DA Number rewriting\n"
- "Files with rules for matching MSISDN\n")
-{
- return replace_rules(_nat, &_nat->sms_num_rewr_name,
- &_nat->sms_num_rewr, argv[0]);
-}
-
-DEFUN(cfg_nat_no_sms_number_rewrite,
- cfg_nat_no_sms_number_rewrite_cmd,
- "no sms-number-rewrite",
- NO_STR "Disable SMS TP-DA rewriting\n")
-{
- talloc_free(_nat->sms_num_rewr_name);
- _nat->sms_num_rewr_name = NULL;
-
- bsc_nat_num_rewr_entry_adapt(NULL, &_nat->sms_num_rewr, NULL);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_prefix_trie,
- cfg_nat_prefix_trie_cmd,
- "prefix-tree FILENAME",
- "Prefix tree for number rewriting\n" "File to load\n")
-{
- /* give up the old data */
- talloc_free(_nat->num_rewr_trie);
- _nat->num_rewr_trie = NULL;
-
- /* replace the file name */
- osmo_talloc_replace_string(_nat, &_nat->num_rewr_trie_name, argv[0]);
- if (!_nat->num_rewr_trie_name) {
- vty_out(vty, "%% prefix-tree no filename is present.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- _nat->num_rewr_trie = nat_rewrite_parse(_nat, _nat->num_rewr_trie_name);
- if (!_nat->num_rewr_trie) {
- vty_out(vty, "%% prefix-tree parsing has failed.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty_out(vty, "%% prefix-tree loaded %zu rules.%s",
- _nat->num_rewr_trie->prefixes, VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_no_prefix_trie, cfg_nat_no_prefix_trie_cmd,
- "no prefix-tree",
- NO_STR "Prefix tree for number rewriting\n")
-{
- talloc_free(_nat->num_rewr_trie);
- _nat->num_rewr_trie = NULL;
- talloc_free(_nat->num_rewr_trie_name);
- _nat->num_rewr_trie_name = NULL;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(show_prefix_tree, show_prefix_tree_cmd,
- "show prefix-tree",
- SHOW_STR "Prefix tree for number rewriting\n")
-{
- if (!_nat->num_rewr_trie) {
- vty_out(vty, "%% there is now prefix tree loaded.%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- nat_rewrite_dump_vty(vty, _nat->num_rewr_trie);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_ussd_lst_name,
- cfg_nat_ussd_lst_name_cmd,
- "ussd-list-name NAME",
- "Set the name of the access list to check for IMSIs for USSD message\n"
- "The name of the access list for HLR USSD handling")
-{
- osmo_talloc_replace_string(_nat, &_nat->ussd_lst_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_ussd_query,
- cfg_nat_ussd_query_cmd,
- "ussd-query REGEXP",
- "Set the USSD query to match with the ussd-list-name\n"
- "The query to match")
-{
- if (gsm_parse_reg(_nat, &_nat->ussd_query_re, &_nat->ussd_query, argc, argv) != 0)
- return CMD_WARNING;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_ussd_token,
- cfg_nat_ussd_token_cmd,
- "ussd-token TOKEN",
- "Set the token used to identify the USSD module\n" "Secret key\n")
-{
- osmo_talloc_replace_string(_nat, &_nat->ussd_token, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_ussd_local,
- cfg_nat_ussd_local_cmd,
- "ussd-local-ip A.B.C.D",
- "Set the IP to listen for the USSD Provider\n" "IP Address\n")
-{
- osmo_talloc_replace_string(_nat, &_nat->ussd_local, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_use_ipa_for_mgcp,
- cfg_nat_use_ipa_for_mgcp_cmd,
- "use-msc-ipa-for-mgcp",
- "This needs to be set at start. Handle MGCP messages through "
- "the IPA protocol and not through the UDP socket.\n")
-{
- if (_nat->mgcp_cfg->data)
- vty_out(vty,
- "%%the setting will not be applied right now.%s",
- VTY_NEWLINE);
- _nat->mgcp_ipa = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_sdp_amr_mode_set,
- cfg_nat_sdp_amr_mode_set_cmd,
- "sdp-ensure-amr-mode-set",
- "Ensure that SDP records include a mode-set\n")
-{
- _nat->sdp_ensure_amr_mode_set = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_no_sdp_amr_mode_set,
- cfg_nat_no_sdp_amr_mode_set_cmd,
- "no sdp-ensure-amr-mode-set",
- NO_STR "Ensure that SDP records include a mode-set\n")
-{
- _nat->sdp_ensure_amr_mode_set = 0;
- return CMD_SUCCESS;
-}
-
-/* per BSC configuration */
-DEFUN(cfg_bsc, cfg_bsc_cmd, "bsc BSC_NR",
- "BSC configuration\n" "Identifier of the BSC\n")
-{
- int bsc_nr = atoi(argv[0]);
- struct bsc_config *bsc = bsc_config_num(_nat, bsc_nr);
-
- /* allocate a new one */
- if (!bsc)
- bsc = bsc_config_alloc(_nat, "unknown", bsc_nr);
-
- if (!bsc)
- return CMD_WARNING;
-
- bsc->remove = false;
- vty->index = bsc;
- vty->node = NAT_BSC_NODE;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_token, cfg_bsc_token_cmd, "token TOKEN",
- "Authentication token configuration\n"
- "Token of the BSC, currently transferred in cleartext\n")
-{
- struct bsc_config *conf = vty->index;
-
- if (strncmp(conf->token, argv[0], 128) != 0)
- conf->token_updated = true;
-
- osmo_talloc_replace_string(conf, &conf->token, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_auth_key, cfg_bsc_auth_key_cmd,
- "auth-key KEY",
- "Authentication (secret) key configuration\n"
- "Non null security key\n")
-{
- struct bsc_config *conf = vty->index;
-
- memset(conf->key, 0, sizeof(conf->key));
- osmo_hexparse(argv[0], conf->key, sizeof(conf->key));
- conf->key_present = 1;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_no_auth_key, cfg_bsc_no_auth_key_cmd,
- "no auth-key",
- NO_STR "Authentication (secret) key configuration\n")
-{
- struct bsc_config *conf = vty->index;
-
- memset(conf->key, 0, sizeof(conf->key));
- conf->key_present = 0;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_lac, cfg_bsc_lac_cmd, "location_area_code <0-65535>",
- "Add the Location Area Code (LAC) of this BSC\n" "LAC\n")
-{
- struct bsc_config *tmp;
- struct bsc_config *conf = vty->index;
-
- int lac = atoi(argv[0]);
-
- if (lac == GSM_LAC_RESERVED_DETACHED || lac == GSM_LAC_RESERVED_ALL_BTS) {
- vty_out(vty, "%% LAC %d is reserved by GSM 04.08%s",
- lac, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- /* verify that the LACs are unique */
- llist_for_each_entry(tmp, &_nat->bsc_configs, entry) {
- if (bsc_config_handles_lac(tmp, lac)) {
- if (tmp->nr != conf->nr) {
- vty_out(vty, "%% LAC %d is already used.%s", lac,
- VTY_NEWLINE);
- return CMD_ERR_INCOMPLETE;
- }
- }
- }
-
- bsc_config_add_lac(conf, lac);
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_no_lac, cfg_bsc_no_lac_cmd,
- "no location_area_code <0-65535>",
- NO_STR "Remove the Location Area Code (LAC) of this BSC\n" "LAC\n")
-{
- int lac = atoi(argv[0]);
- struct bsc_config *conf = vty->index;
-
- bsc_config_del_lac(conf, lac);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_bar_lst,
- show_bar_lst_cmd,
- "show imsi-black-list",
- SHOW_STR "IMSIs barred from the network\n")
-{
- struct rb_node *node;
-
- vty_out(vty, "IMSIs barred from the network:%s", VTY_NEWLINE);
-
- for (node = rb_first(&_nat->imsi_black_list); node; node = rb_next(node)) {
- struct bsc_filter_barr_entry *entry;
- entry = rb_entry(node, struct bsc_filter_barr_entry, node);
-
- vty_out(vty, " IMSI(%s) CM-Reject-Cause(%d) LU-Reject-Cause(%d)%s",
- entry->imsi, entry->cm_reject_cause, entry->lu_reject_cause,
- VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-
-DEFUN(cfg_bsc_acc_lst_name,
- cfg_bsc_acc_lst_name_cmd,
- "access-list-name NAME",
- "Set the name of the access list to use.\n"
- "The name of the to be used access list.")
-{
- struct bsc_config *conf = vty->index;
-
- osmo_talloc_replace_string(conf, &conf->acc_lst_name, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_no_acc_lst_name,
- cfg_bsc_no_acc_lst_name_cmd,
- "no access-list-name",
- NO_STR "Do not use an access-list for the BSC.\n")
-{
- struct bsc_config *conf = vty->index;
-
- if (conf->acc_lst_name) {
- talloc_free(conf->acc_lst_name);
- conf->acc_lst_name = NULL;
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_max_endps, cfg_bsc_max_endps_cmd,
- "max-endpoints <1-1024>",
- "Highest endpoint to use (exclusively)\n" "Number of ports\n")
-{
- struct bsc_config *conf = vty->index;
-
- conf->max_endpoints = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_paging,
- cfg_bsc_paging_cmd,
- "paging forbidden (0|1)",
- PAGING_STR "Forbid sending PAGING REQUESTS to the BSC.\n"
- "Do not forbid\n" "Forbid\n")
-{
- struct bsc_config *conf = vty->index;
-
- if (strcmp("1", argv[0]) == 0)
- conf->forbid_paging = 1;
- else
- conf->forbid_paging = 0;
-
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_desc,
- cfg_bsc_desc_cmd,
- "description DESC",
- "Provide a description for the given BSC.\n" "Description\n")
-{
- struct bsc_config *conf = vty->index;
-
- osmo_talloc_replace_string(conf, &conf->description, argv[0]);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_bsc_paging_grp,
- cfg_bsc_paging_grp_cmd,
- "paging group <0-1000>",
- PAGING_STR "Use a paging group\n" "Paging Group to use\n")
-{
- struct bsc_config *conf = vty->index;
- conf->paging_group = atoi(argv[0]);
- return CMD_SUCCESS;
-}
-
-ALIAS_DEPRECATED(cfg_bsc_paging_grp, cfg_bsc_old_grp_cmd,
- "paging-group <0-1000>",
- "Use a paging group\n" "Paging Group to use\n")
-
-DEFUN(cfg_bsc_no_paging_grp,
- cfg_bsc_no_paging_grp_cmd,
- "no paging group",
- NO_STR PAGING_STR "Disable the usage of a paging group.\n")
-{
- struct bsc_config *conf = vty->index;
- conf->paging_group = PAGIN_GROUP_UNASSIGNED;
- return CMD_SUCCESS;
-}
-
-DEFUN(test_regex, test_regex_cmd,
- "test regex PATTERN STRING",
- "Test utilities\n"
- "Regexp testing\n" "The regexp pattern\n"
- "The string to match\n")
-{
- regex_t reg;
- char *str = NULL;
-
- memset(&reg, 0, sizeof(reg));
- if (gsm_parse_reg(_nat, &reg, &str, 1, argv) != 0)
- return CMD_WARNING;
-
- vty_out(vty, "String matches allow pattern: %d%s",
- regexec(&reg, argv[1], 0, NULL, 0) == 0, VTY_NEWLINE);
-
- talloc_free(str);
- regfree(&reg);
- return CMD_SUCCESS;
-}
-
-DEFUN(set_last_endp, set_last_endp_cmd,
- "set bsc last-used-endpoint <0-9999999999> <0-1024>",
- "Set a value\n" "Operate on a BSC\n"
- "Last used endpoint for an assignment\n" "BSC configuration number\n"
- "Endpoint number used\n")
-{
- struct bsc_connection *con;
- int nr = atoi(argv[0]);
- int endp = atoi(argv[1]);
-
-
- llist_for_each_entry(con, &_nat->bsc_connections, list_entry) {
- if (!con->cfg)
- continue;
- if (con->cfg->nr != nr)
- continue;
-
- con->last_endpoint = endp;
- vty_out(vty, "Updated the last endpoint for %d to %d.%s",
- con->cfg->nr, con->last_endpoint, VTY_NEWLINE);
- }
-
- return CMD_SUCCESS;
-}
-
-DEFUN(block_new_conn, block_new_conn_cmd,
- "nat-block (block|unblock)",
- "Block the NAT for new connections\n"
- "Block\n" "Unblock\n")
-{
- _nat->blocked = argv[0][0] == 'b';
- vty_out(vty, "%%Going to %s the NAT.%s",
- _nat->blocked ? "block" : "unblock", VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-/* paging group */
-DEFUN(cfg_nat_pgroup, cfg_nat_pgroup_cmd,
- "paging-group <0-1000>",
- "Create a Paging Group\n" "Number of the Group\n")
-{
- int group = atoi(argv[0]);
- struct bsc_nat_paging_group *pgroup;
- pgroup = bsc_nat_paging_group_num(_nat, group);
- if (!pgroup)
- pgroup = bsc_nat_paging_group_create(_nat, group);
- if (!pgroup) {
- vty_out(vty, "Failed to create the group.%s", VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- vty->index = pgroup;
- vty->node = PGROUP_NODE;
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_nat_no_pgroup, cfg_nat_no_pgroup_cmd,
- "no paging-group <0-1000>",
- NO_STR "Delete paging-group\n" "Paging-group number\n")
-{
- int group = atoi(argv[0]);
- struct bsc_nat_paging_group *pgroup;
- pgroup = bsc_nat_paging_group_num(_nat, group);
- if (!pgroup) {
- vty_out(vty, "No such paging group %d.%s", group, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bsc_nat_paging_group_delete(pgroup);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_pgroup_lac, cfg_pgroup_lac_cmd,
- "location_area_code <0-65535>",
- "Add the Location Area Code (LAC)\n" "LAC\n")
-{
- struct bsc_nat_paging_group *pgroup = vty->index;
-
- int lac = atoi(argv[0]);
- if (lac == GSM_LAC_RESERVED_DETACHED || lac == GSM_LAC_RESERVED_ALL_BTS) {
- vty_out(vty, "%% LAC %d is reserved by GSM 04.08%s",
- lac, VTY_NEWLINE);
- return CMD_WARNING;
- }
-
- bsc_nat_paging_group_add_lac(pgroup, lac);
- return CMD_SUCCESS;
-}
-
-DEFUN(cfg_pgroup_no_lac, cfg_pgroup_no_lac_cmd,
- "no location_area_code <0-65535>",
- NO_STR "Remove the Location Area Code (LAC)\n" "LAC\n")
-{
- int lac = atoi(argv[0]);
- struct bsc_nat_paging_group *pgroup = vty->index;
-
- bsc_nat_paging_group_del_lac(pgroup, lac);
- return CMD_SUCCESS;
-}
-
-DEFUN(show_ussd_connection,
- show_ussd_connection_cmd,
- "show ussd-connection",
- SHOW_STR "USSD connection related information\n")
-{
- vty_out(vty, "The USSD side channel provider is %sconnected and %sauthorized.%s",
- _nat->ussd_con ? "" : "not ",
- _nat->ussd_con && _nat->ussd_con->authorized? "" : "not ",
- VTY_NEWLINE);
- return CMD_SUCCESS;
-}
-
-#define OSMUX_STR "RTP multiplexing\n"
-DEFUN(cfg_bsc_osmux,
- cfg_bsc_osmux_cmd,
- "osmux (on|off|only)",
- OSMUX_STR "Enable OSMUX\n" "Disable OSMUX\n" "Only OSMUX\n")
-{
- struct bsc_config *conf = vty->index;
- int old = conf->osmux;
-
- if (strcmp(argv[0], "on") == 0)
- conf->osmux = OSMUX_USAGE_ON;
- else if (strcmp(argv[0], "off") == 0)
- conf->osmux = OSMUX_USAGE_OFF;
- else if (strcmp(argv[0], "only") == 0)
- conf->osmux = OSMUX_USAGE_ONLY;
-
- if (old == 0 && conf->osmux > 0 && !conf->nat->mgcp_cfg->osmux_init) {
- LOGP(DLMGCP, LOGL_NOTICE, "Setting up OSMUX socket\n");
- if (osmux_init(OSMUX_ROLE_BSC_NAT, conf->nat->mgcp_cfg) < 0) {
- LOGP(DLMGCP, LOGL_ERROR, "Cannot init OSMUX\n");
- vty_out(vty, "%% failed to create Osmux socket%s",
- VTY_NEWLINE);
- return CMD_WARNING;
- }
- } else if (old > 0 && conf->osmux == 0) {
- LOGP(DLMGCP, LOGL_NOTICE, "Disabling OSMUX socket\n");
- /* Don't stop the socket, we may already have ongoing voice
- * flows already using Osmux. This just switch indicates that
- * new upcoming flows should use RTP.
- */
- }
-
- return CMD_SUCCESS;
-}
-
-int bsc_nat_vty_init(struct bsc_nat *nat)
-{
- _nat = nat;
-
- /* show commands */
- install_element_ve(&show_sccp_cmd);
- install_element_ve(&show_bsc_cmd);
- install_element_ve(&show_nat_bsc_cmd);
- install_element_ve(&show_bsc_cfg_cmd);
- install_element_ve(&show_stats_cmd);
- install_element_ve(&show_stats_lac_cmd);
- install_element_ve(&close_bsc_cmd);
- install_element_ve(&show_msc_cmd);
- install_element_ve(&test_regex_cmd);
- install_element_ve(&show_bsc_mgcp_cmd);
- install_element_ve(&show_bscs_cmd);
- install_element_ve(&show_bar_lst_cmd);
- install_element_ve(&show_prefix_tree_cmd);
- install_element_ve(&show_ussd_connection_cmd);
-
- install_element(ENABLE_NODE, &set_last_endp_cmd);
- install_element(ENABLE_NODE, &block_new_conn_cmd);
-
- /* nat group */
- install_element(CONFIG_NODE, &cfg_nat_cmd);
- install_node(&nat_node, config_write_nat);
- vty_install_default(NAT_NODE);
- install_element(NAT_NODE, &cfg_nat_msc_ip_cmd);
- install_element(NAT_NODE, &cfg_nat_msc_port_cmd);
- install_element(NAT_NODE, &cfg_nat_auth_time_cmd);
- install_element(NAT_NODE, &cfg_nat_ping_time_cmd);
- install_element(NAT_NODE, &cfg_nat_pong_time_cmd);
- install_element(NAT_NODE, &cfg_nat_token_cmd);
- install_element(NAT_NODE, &cfg_nat_bsc_ip_dscp_cmd);
- install_element(NAT_NODE, &cfg_nat_bsc_ip_tos_cmd);
- install_element(NAT_NODE, &cfg_nat_acc_lst_name_cmd);
- install_element(NAT_NODE, &cfg_nat_no_acc_lst_name_cmd);
- install_element(NAT_NODE, &cfg_nat_include_cmd);
- install_element(NAT_NODE, &cfg_nat_imsi_black_list_fn_cmd);
- install_element(NAT_NODE, &cfg_nat_no_imsi_black_list_fn_cmd);
- install_element(NAT_NODE, &cfg_nat_ussd_lst_name_cmd);
- install_element(NAT_NODE, &cfg_nat_ussd_query_cmd);
- install_element(NAT_NODE, &cfg_nat_ussd_token_cmd);
- install_element(NAT_NODE, &cfg_nat_ussd_local_cmd);
- install_element(NAT_NODE, &cfg_nat_use_ipa_for_mgcp_cmd);
-
- bsc_msg_lst_vty_init(nat, &nat->access_lists, NAT_NODE);
-
- /* number rewriting */
- install_element(NAT_NODE, &cfg_nat_number_rewrite_cmd);
- install_element(NAT_NODE, &cfg_nat_no_number_rewrite_cmd);
- install_element(NAT_NODE, &cfg_nat_number_rewrite_post_cmd);
- install_element(NAT_NODE, &cfg_nat_no_number_rewrite_post_cmd);
- install_element(NAT_NODE, &cfg_nat_smsc_addr_cmd);
- install_element(NAT_NODE, &cfg_nat_smsc_tpdest_cmd);
- install_element(NAT_NODE, &cfg_nat_sms_clear_tpsrr_cmd);
- install_element(NAT_NODE, &cfg_nat_no_sms_clear_tpsrr_cmd);
- install_element(NAT_NODE, &cfg_nat_sms_number_rewrite_cmd);
- install_element(NAT_NODE, &cfg_nat_no_sms_number_rewrite_cmd);
- install_element(NAT_NODE, &cfg_nat_prefix_trie_cmd);
- install_element(NAT_NODE, &cfg_nat_no_prefix_trie_cmd);
-
- install_element(NAT_NODE, &cfg_nat_sdp_amr_mode_set_cmd);
- install_element(NAT_NODE, &cfg_nat_no_sdp_amr_mode_set_cmd);
-
- install_element(NAT_NODE, &cfg_nat_pgroup_cmd);
- install_element(NAT_NODE, &cfg_nat_no_pgroup_cmd);
- install_node(&pgroup_node, config_write_pgroup);
- vty_install_default(PGROUP_NODE);
- install_element(PGROUP_NODE, &cfg_pgroup_lac_cmd);
- install_element(PGROUP_NODE, &cfg_pgroup_no_lac_cmd);
-
- /* BSC subgroups */
- install_element(NAT_NODE, &cfg_bsc_cmd);
- install_node(&bsc_node, NULL);
- vty_install_default(NAT_BSC_NODE);
- install_element(NAT_BSC_NODE, &cfg_bsc_token_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_auth_key_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_no_auth_key_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_lac_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_no_lac_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_paging_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_desc_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_acc_lst_name_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_no_acc_lst_name_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_max_endps_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_old_grp_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_paging_grp_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_no_paging_grp_cmd);
- install_element(NAT_BSC_NODE, &cfg_bsc_osmux_cmd);
-
- mgcp_vty_init();
-
- return 0;
-}
-
-
-/* called by the telnet interface... we have our own init above */
-int bsc_vty_init(struct gsm_network *network)
-{
- logging_vty_add_cmds(NULL);
- return 0;
-}
diff --git a/src/osmo-bsc_nat/bsc_sccp.c b/src/osmo-bsc_nat/bsc_sccp.c
deleted file mode 100644
index c6c265f7a..000000000
--- a/src/osmo-bsc_nat/bsc_sccp.c
+++ /dev/null
@@ -1,247 +0,0 @@
-/* SCCP patching and handling routines */
-/*
- * (C) 2010 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/debug.h>
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <osmocom/core/talloc.h>
-
-#include <string.h>
-#include <time.h>
-
-static int equal(struct sccp_source_reference *ref1, struct sccp_source_reference *ref2)
-{
- return memcmp(ref1, ref2, sizeof(*ref1)) == 0;
-}
-
-/*
- * SCCP patching below
- */
-
-/* check if we are using this ref for patched already */
-static int sccp_ref_is_free(struct sccp_source_reference *ref, struct bsc_nat *nat)
-{
- struct nat_sccp_connection *conn;
-
- llist_for_each_entry(conn, &nat->sccp_connections, list_entry) {
- if (equal(ref, &conn->patched_ref))
- return -1;
- }
-
- return 0;
-}
-
-/* copied from sccp.c */
-static int assign_src_local_reference(struct sccp_source_reference *ref, struct bsc_nat *nat)
-{
- static uint32_t last_ref = 0x50000;
- int wrapped = 0;
-
- do {
- struct sccp_source_reference reference;
- reference.octet1 = (last_ref >> 0) & 0xff;
- reference.octet2 = (last_ref >> 8) & 0xff;
- reference.octet3 = (last_ref >> 16) & 0xff;
-
- ++last_ref;
- /* do not use the reversed word and wrap around */
- if ((last_ref & 0x00FFFFFF) == 0x00FFFFFF) {
- LOGP(DNAT, LOGL_NOTICE, "Wrapped searching for a free code\n");
- last_ref = 0;
- ++wrapped;
- }
-
- if (sccp_ref_is_free(&reference, nat) == 0) {
- *ref = reference;
- return 0;
- }
- } while (wrapped != 2);
-
- LOGP(DNAT, LOGL_ERROR, "Finding a free reference failed\n");
- return -1;
-}
-
-struct nat_sccp_connection *create_sccp_src_ref(struct bsc_connection *bsc,
- struct bsc_nat_parsed *parsed)
-{
- struct nat_sccp_connection *conn;
-
- /* Some commercial BSCs like to reassign there SRC ref */
- llist_for_each_entry(conn, &bsc->nat->sccp_connections, list_entry) {
- if (conn->bsc != bsc)
- continue;
- if (!equal(parsed->src_local_ref, &conn->real_ref))
- continue;
-
- /* the BSC has reassigned the SRC ref and we failed to keep track */
- memset(&conn->remote_ref, 0, sizeof(conn->remote_ref));
- if (assign_src_local_reference(&conn->patched_ref, bsc->nat) != 0) {
- LOGP(DNAT, LOGL_ERROR, "BSC %d reused src ref: %d and we failed to generate a new id.\n",
- bsc->cfg->nr, sccp_src_ref_to_int(parsed->src_local_ref));
- bsc_mgcp_dlcx(conn);
- llist_del(&conn->list_entry);
- talloc_free(conn);
- return NULL;
- } else {
- clock_gettime(CLOCK_MONOTONIC, &conn->creation_time);
- bsc_mgcp_dlcx(conn);
- return conn;
- }
- }
-
-
- conn = talloc_zero(bsc->nat, struct nat_sccp_connection);
- if (!conn) {
- LOGP(DNAT, LOGL_ERROR, "Memory allocation failure.\n");
- return NULL;
- }
-
- conn->bsc = bsc;
- clock_gettime(CLOCK_MONOTONIC, &conn->creation_time);
- conn->real_ref = *parsed->src_local_ref;
- if (assign_src_local_reference(&conn->patched_ref, bsc->nat) != 0) {
- LOGP(DNAT, LOGL_ERROR, "Failed to assign a ref.\n");
- talloc_free(conn);
- return NULL;
- }
-
- bsc_mgcp_init(conn);
- llist_add_tail(&conn->list_entry, &bsc->nat->sccp_connections);
- rate_ctr_inc(&bsc->cfg->stats.ctrg->ctr[BCFG_CTR_SCCP_CONN]);
- osmo_counter_inc(bsc->cfg->nat->stats.sccp.conn);
-
- LOGP(DNAT, LOGL_DEBUG, "Created 0x%x <-> 0x%x mapping for con %p\n",
- sccp_src_ref_to_int(&conn->real_ref),
- sccp_src_ref_to_int(&conn->patched_ref), bsc);
-
- return conn;
-}
-
-int update_sccp_src_ref(struct nat_sccp_connection *sccp, struct bsc_nat_parsed *parsed)
-{
- if (!parsed->dest_local_ref || !parsed->src_local_ref) {
- LOGP(DNAT, LOGL_ERROR, "CC MSG should contain both local and dest address.\n");
- return -1;
- }
-
- sccp->remote_ref = *parsed->src_local_ref;
- sccp->has_remote_ref = 1;
- LOGP(DNAT, LOGL_DEBUG, "Updating 0x%x to remote 0x%x on %p\n",
- sccp_src_ref_to_int(&sccp->patched_ref),
- sccp_src_ref_to_int(&sccp->remote_ref), sccp->bsc);
-
- return 0;
-}
-
-void remove_sccp_src_ref(struct bsc_connection *bsc, struct msgb *msg, struct bsc_nat_parsed *parsed)
-{
- struct nat_sccp_connection *conn;
-
- llist_for_each_entry(conn, &bsc->nat->sccp_connections, list_entry) {
- if (equal(parsed->src_local_ref, &conn->patched_ref)) {
- sccp_connection_destroy(conn);
- return;
- }
- }
-
- LOGP(DNAT, LOGL_ERROR, "Can not remove connection: 0x%x\n",
- sccp_src_ref_to_int(parsed->src_local_ref));
-}
-
-/*
- * We have a message from the MSC to the BSC. The MSC is using
- * an address that was assigned by the MUX, we need to update the
- * dest reference to the real network.
- */
-struct nat_sccp_connection *patch_sccp_src_ref_to_bsc(struct msgb *msg,
- struct bsc_nat_parsed *parsed,
- struct bsc_nat *nat)
-{
- struct nat_sccp_connection *conn;
-
- if (!parsed->dest_local_ref) {
- LOGP(DNAT, LOGL_ERROR, "MSG should contain dest_local_ref.\n");
- return NULL;
- }
-
-
- llist_for_each_entry(conn, &nat->sccp_connections, list_entry) {
- if (!equal(parsed->dest_local_ref, &conn->patched_ref))
- continue;
-
- /* Change the dest address to the real one */
- *parsed->dest_local_ref = conn->real_ref;
- return conn;
- }
-
- return NULL;
-}
-
-/*
- * These are message to the MSC. We will need to find the BSC
- * Connection by either the SRC or the DST local reference.
- *
- * In case of a CR we need to work by the SRC local reference
- * in all other cases we need to work by the destination local
- * reference..
- */
-struct nat_sccp_connection *patch_sccp_src_ref_to_msc(struct msgb *msg,
- struct bsc_nat_parsed *parsed,
- struct bsc_connection *bsc)
-{
- struct nat_sccp_connection *conn;
-
- llist_for_each_entry(conn, &bsc->nat->sccp_connections, list_entry) {
- if (conn->bsc != bsc)
- continue;
-
- if (parsed->src_local_ref) {
- if (equal(parsed->src_local_ref, &conn->real_ref)) {
- *parsed->src_local_ref = conn->patched_ref;
- return conn;
- }
- } else if (parsed->dest_local_ref) {
- if (equal(parsed->dest_local_ref, &conn->remote_ref))
- return conn;
- } else {
- LOGP(DNAT, LOGL_ERROR, "Header has neither loc/dst ref.\n");
- return NULL;
- }
- }
-
- return NULL;
-}
-
-struct nat_sccp_connection *bsc_nat_find_con_by_bsc(struct bsc_nat *nat,
- struct sccp_source_reference *ref)
-{
- struct nat_sccp_connection *conn;
-
- llist_for_each_entry(conn, &nat->sccp_connections, list_entry) {
- if (equal(ref, &conn->real_ref))
- return conn;
- }
-
- return NULL;
-}
diff --git a/src/osmo-bsc_nat/bsc_ussd.c b/src/osmo-bsc_nat/bsc_ussd.c
deleted file mode 100644
index 9769bbd39..000000000
--- a/src/osmo-bsc_nat/bsc_ussd.c
+++ /dev/null
@@ -1,454 +0,0 @@
-/* USSD Filter Code */
-
-/*
- * (C) 2010-2011 by Holger Hans Peter Freyther <zecke@selfish.org>
- * (C) 2010-2011 by On-Waves
- * 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/>.
- *
- */
-
-#include <openbsc/bsc_nat.h>
-#include <openbsc/bsc_nat_sccp.h>
-#include <openbsc/bsc_msg_filter.h>
-#include <openbsc/ipaccess.h>
-#include <openbsc/socket.h>
-#include <openbsc/debug.h>
-
-#include <osmocom/gsm/protocol/gsm_08_08.h>
-#include <osmocom/gsm/gsm0480.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/gsm/tlv.h>
-#include <osmocom/gsm/ipa.h>
-
-#include <osmocom/sccp/sccp.h>
-
-#include <osmocom/abis/ipa.h>
-
-#include <sys/socket.h>
-#include <string.h>
-#include <unistd.h>
-
-#define USSD_LAC_IE 0
-#define USSD_CI_IE 1
-
-static void ussd_auth_con(struct tlv_parsed *, struct bsc_nat_ussd_con *);
-
-static struct bsc_nat_ussd_con *bsc_nat_ussd_alloc(struct bsc_nat *nat)
-{
- struct bsc_nat_ussd_con *con;
-
- con = talloc_zero(nat, struct bsc_nat_ussd_con);
- if (!con)
- return NULL;
-
- con->nat = nat;
- return con;
-}
-
-static void bsc_nat_ussd_destroy(struct bsc_nat_ussd_con *con)
-{
- if (con->nat->ussd_con == con) {
- bsc_ussd_close_connections(con->nat);
- con->nat->ussd_con = NULL;
- }
-
- close(con->queue.bfd.fd);
- osmo_fd_unregister(&con->queue.bfd);
- osmo_timer_del(&con->auth_timeout);
- osmo_wqueue_clear(&con->queue);
-
- msgb_free(con->pending_msg);
- talloc_free(con);
-}
-
-static void ussd_pong(struct bsc_nat_ussd_con *conn)
-{
- struct msgb *msg;
-
- msg = msgb_alloc_headroom(4096, 128, "pong message");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate pong msg\n");
- return;
- }
-
- msgb_v_put(msg, IPAC_MSGT_PONG);
- bsc_do_write(&conn->queue, msg, IPAC_PROTO_IPACCESS);
-}
-
-static int forward_sccp(struct bsc_nat *nat, struct msgb *msg)
-{
- struct nat_sccp_connection *con;
- struct bsc_nat_parsed *parsed;
-
-
- parsed = bsc_nat_parse(msg);
- if (!parsed) {
- LOGP(DNAT, LOGL_ERROR, "Can not parse msg from USSD.\n");
- msgb_free(msg);
- return -1;
- }
-
- if (!parsed->dest_local_ref) {
- LOGP(DNAT, LOGL_ERROR, "No destination local reference.\n");
- msgb_free(msg);
- return -1;
- }
-
- con = bsc_nat_find_con_by_bsc(nat, parsed->dest_local_ref);
- if (!con || !con->bsc) {
- LOGP(DNAT, LOGL_ERROR, "No active connection found.\n");
- msgb_free(msg);
- return -1;
- }
-
- talloc_free(parsed);
- bsc_write_msg(&con->bsc->write_queue, msg);
- return 0;
-}
-
-static int ussd_read_cb(struct osmo_fd *bfd)
-{
- struct bsc_nat_ussd_con *conn = bfd->data;
- struct msgb *msg = NULL;
- struct ipaccess_head *hh;
- int ret;
-
- ret = ipa_msg_recv_buffered(bfd->fd, &msg, &conn->pending_msg);
- if (ret <= 0) {
- if (ret == -EAGAIN)
- return 0;
- LOGP(DNAT, LOGL_ERROR, "USSD Connection was lost.\n");
- bsc_nat_ussd_destroy(conn);
- return -1;
- }
-
- LOGP(DNAT, LOGL_NOTICE, "MSG from USSD: %s proto: %d\n",
- osmo_hexdump(msg->data, msg->len), msg->l2h[0]);
- hh = (struct ipaccess_head *) msg->data;
-
- if (hh->proto == IPAC_PROTO_IPACCESS) {
- if (msg->l2h[0] == IPAC_MSGT_ID_RESP) {
- struct tlv_parsed tvp;
- int ret;
- ret = ipa_ccm_idtag_parse(&tvp,
- (unsigned char *) msg->l2h + 2,
- msgb_l2len(msg) - 2);
- if (ret < 0) {
- LOGP(DNAT, LOGL_ERROR, "ignoring IPA response "
- "message with malformed TLVs\n");
- msgb_free(msg);
- return ret;
- }
- if (TLVP_PRESENT(&tvp, IPAC_IDTAG_UNITNAME))
- ussd_auth_con(&tvp, conn);
- } else if (msg->l2h[0] == IPAC_MSGT_PING) {
- LOGP(DNAT, LOGL_DEBUG, "Got USSD ping request.\n");
- ussd_pong(conn);
- } else {
- LOGP(DNAT, LOGL_NOTICE, "Got unknown IPACCESS message 0x%02x.\n", msg->l2h[0]);
- }
-
- msgb_free(msg);
- } else if (hh->proto == IPAC_PROTO_SCCP) {
- forward_sccp(conn->nat, msg);
- } else {
- msgb_free(msg);
- }
-
- return 0;
-}
-
-static void ussd_auth_cb(void *_data)
-{
- LOGP(DNAT, LOGL_ERROR, "USSD module didn't authenticate\n");
- bsc_nat_ussd_destroy((struct bsc_nat_ussd_con *) _data);
-}
-
-static void ussd_auth_con(struct tlv_parsed *tvp, struct bsc_nat_ussd_con *conn)
-{
- const char *token;
- int len;
- if (!conn->nat->ussd_token) {
- LOGP(DNAT, LOGL_ERROR, "No USSD token set. Closing\n");
- bsc_nat_ussd_destroy(conn);
- return;
- }
-
- token = (const char *) TLVP_VAL(tvp, IPAC_IDTAG_UNITNAME);
- len = TLVP_LEN(tvp, IPAC_IDTAG_UNITNAME);
-
- /* last byte should be a NULL */
- if (strlen(conn->nat->ussd_token) != len - 1)
- goto disconnect;
- /* compare everything including the null byte */
- if (memcmp(conn->nat->ussd_token, token, len) != 0)
- goto disconnect;
-
- /* it is authenticated now */
- if (conn->nat->ussd_con && conn->nat->ussd_con != conn)
- bsc_nat_ussd_destroy(conn->nat->ussd_con);
-
- LOGP(DNAT, LOGL_ERROR, "USSD token specified. USSD provider is connected.\n");
- osmo_timer_del(&conn->auth_timeout);
- conn->authorized = 1;
- conn->nat->ussd_con = conn;
- return;
-
-disconnect:
- LOGP(DNAT, LOGL_ERROR, "Wrong USSD token by client: %d\n",
- conn->queue.bfd.fd);
- bsc_nat_ussd_destroy(conn);
-}
-
-static void ussd_start_auth(struct bsc_nat_ussd_con *conn)
-{
- struct msgb *msg;
-
- osmo_timer_setup(&conn->auth_timeout, ussd_auth_cb, conn);
- osmo_timer_schedule(&conn->auth_timeout, conn->nat->auth_timeout, 0);
-
- msg = msgb_alloc_headroom(4096, 128, "auth message");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate auth msg\n");
- return;
- }
-
- msgb_v_put(msg, IPAC_MSGT_ID_GET);
- bsc_do_write(&conn->queue, msg, IPAC_PROTO_IPACCESS);
-}
-
-static int ussd_listen_cb(struct osmo_fd *bfd, unsigned int what)
-{
- struct bsc_nat_ussd_con *conn;
- struct bsc_nat *nat;
- struct sockaddr_in sa;
- socklen_t sa_len = sizeof(sa);
- int fd;
-
- if (!(what & BSC_FD_READ))
- return 0;
-
- fd = accept(bfd->fd, (struct sockaddr *) &sa, &sa_len);
- if (fd < 0) {
- perror("accept");
- return fd;
- }
-
- nat = (struct bsc_nat *) bfd->data;
- osmo_counter_inc(nat->stats.ussd.reconn);
-
- conn = bsc_nat_ussd_alloc(nat);
- if (!conn) {
- LOGP(DNAT, LOGL_ERROR, "Failed to allocate USSD con struct.\n");
- close(fd);
- return -1;
- }
-
- osmo_wqueue_init(&conn->queue, 10);
- conn->queue.bfd.data = conn;
- conn->queue.bfd.fd = fd;
- conn->queue.bfd.when = BSC_FD_READ;
- conn->queue.read_cb = ussd_read_cb;
- conn->queue.write_cb = bsc_write_cb;
-
- if (osmo_fd_register(&conn->queue.bfd) < 0) {
- LOGP(DNAT, LOGL_ERROR, "Failed to register USSD fd.\n");
- bsc_nat_ussd_destroy(conn);
- return -1;
- }
-
- LOGP(DNAT, LOGL_NOTICE, "USSD Connection on %d with IP: %s\n",
- fd, inet_ntoa(sa.sin_addr));
-
- /* do authentication */
- ussd_start_auth(conn);
- return 0;
-}
-
-int bsc_ussd_init(struct bsc_nat *nat)
-{
- struct in_addr addr;
-
- addr.s_addr = INADDR_ANY;
- if (nat->ussd_local)
- inet_aton(nat->ussd_local, &addr);
-
- nat->ussd_listen.data = nat;
- return make_sock(&nat->ussd_listen, IPPROTO_TCP,
- ntohl(addr.s_addr), 5001, 0, ussd_listen_cb, nat);
-}
-
-static int forward_ussd_simple(struct nat_sccp_connection *con, struct msgb *input)
-{
- struct msgb *copy;
- struct bsc_nat_ussd_con *ussd;
-
- if (!con->bsc->nat->ussd_con)
- return -1;
-
- copy = msgb_alloc_headroom(4096, 128, "forward bts");
- if (!copy) {
- LOGP(DNAT, LOGL_ERROR, "Allocation failed, not forwarding.\n");
- return -1;
- }
-
- /* copy the data into the copy */
- copy->l2h = msgb_put(copy, msgb_l2len(input));
- memcpy(copy->l2h, input->l2h, msgb_l2len(input));
-
- /* send it out */
- ussd = con->bsc->nat->ussd_con;
- bsc_do_write(&ussd->queue, copy, IPAC_PROTO_SCCP);
- return 0;
-}
-
-static int forward_ussd(struct nat_sccp_connection *con, const struct ussd_request *req,
- struct msgb *input)
-{
- struct msgb *msg, *copy;
- struct ipac_msgt_sccp_state *state;
- struct bsc_nat_ussd_con *ussd;
- uint16_t lac, ci;
-
- if (!con->bsc->nat->ussd_con)
- return -1;
-
- msg = msgb_alloc_headroom(4096, 128, "forward ussd");
- if (!msg) {
- LOGP(DNAT, LOGL_ERROR, "Allocation failed, not forwarding.\n");
- return -1;
- }
-
- copy = msgb_alloc_headroom(4096, 128, "forward bts");
- if (!copy) {
- LOGP(DNAT, LOGL_ERROR, "Allocation failed, not forwarding.\n");
- msgb_free(msg);
- return -1;
- }
-
- copy->l2h = msgb_put(copy, msgb_l2len(input));
- memcpy(copy->l2h, input->l2h, msgb_l2len(input));
-
- msg->l2h = msgb_put(msg, 1);
- msg->l2h[0] = IPAC_MSGT_SCCP_OLD;
-
- /* fill out the data */
- state = (struct ipac_msgt_sccp_state *) msgb_put(msg, sizeof(*state));
- state->trans_id = req->transaction_id;
- state->invoke_id = req->invoke_id;
- memcpy(&state->src_ref, &con->remote_ref, sizeof(con->remote_ref));
- memcpy(&state->dst_ref, &con->real_ref, sizeof(con->real_ref));
- memcpy(state->imsi, con->filter_state.imsi, strlen(con->filter_state.imsi));
-
- /* add additional tag/values */
- lac = htons(con->lac);
- ci = htons(con->ci);
- msgb_tv_fixed_put(msg, USSD_LAC_IE, sizeof(lac), (const uint8_t *) &lac);
- msgb_tv_fixed_put(msg, USSD_CI_IE, sizeof(ci), (const uint8_t *) &ci);
-
- ussd = con->bsc->nat->ussd_con;
- bsc_do_write(&ussd->queue, msg, IPAC_PROTO_IPACCESS);
- bsc_do_write(&ussd->queue, copy, IPAC_PROTO_SCCP);
-
- return 0;
-}
-
-int bsc_ussd_check(struct nat_sccp_connection *con, struct bsc_nat_parsed *parsed,
- struct msgb *msg)
-{
- uint32_t len;
- uint8_t msg_type;
- uint8_t proto;
- uint8_t ti;
- struct gsm48_hdr *hdr48;
- struct bsc_msg_acc_lst *lst;
- struct ussd_request req;
-
- /*
- * various checks to avoid the decoding work. Right now we only want to
- * decode if the connection was created for USSD, we do have a USSD access
- * list, a query, a IMSI and such...
- */
- if (con->filter_state.con_type != FLT_CON_TYPE_SSA)
- return 0;
-
- if (!con->filter_state.imsi)
- return 0;
-
- /* We have not verified the IMSI yet */
- if (!con->authorized)
- return 0;
-
- if (!con->bsc->nat->ussd_lst_name)
- return 0;
- if (!con->bsc->nat->ussd_query)
- return 0;
-
- if (parsed->bssap != BSSAP_MSG_DTAP)
- return 0;
-
- if (strlen(con->filter_state.imsi) > GSM23003_IMSI_MAX_DIGITS)
- return 0;
-
- hdr48 = bsc_unpack_dtap(parsed, msg, &len);
- if (!hdr48)
- return 0;
-
- proto = gsm48_hdr_pdisc(hdr48);
- msg_type = gsm48_hdr_msg_type(hdr48);
- ti = gsm48_hdr_trans_id_no_ti(hdr48);
- if (proto != GSM48_PDISC_NC_SS)
- return 0;
-
- if (msg_type == GSM0480_MTYPE_REGISTER) {
-
- /* now check if it is a IMSI we care about */
- lst = bsc_msg_acc_lst_find(&con->bsc->nat->access_lists,
- con->bsc->nat->ussd_lst_name);
- if (!lst)
- return 0;
-
- if (bsc_msg_acc_lst_check_allow(lst, con->filter_state.imsi) != 0)
- return 0;
-
- /* now decode the message and see if we really want to handle it */
- memset(&req, 0, sizeof(req));
- if (gsm0480_decode_ussd_request(hdr48, len, &req) != 1)
- return 0;
- if (req.text[0] == 0xff)
- return 0;
-
- if (regexec(&con->bsc->nat->ussd_query_re,
- req.text, 0, NULL, 0) == REG_NOMATCH)
- return 0;
-
- /* found a USSD query for our subscriber */
- LOGP(DNAT, LOGL_NOTICE, "Found USSD query for %s\n",
- con->filter_state.imsi);
- con->ussd_ti[ti] = 1;
- if (forward_ussd(con, &req, msg) != 0)
- return 0;
- return 1;
- } else if (msg_type == GSM0480_MTYPE_FACILITY && con->ussd_ti[ti]) {
- LOGP(DNAT, LOGL_NOTICE, "Forwarding message part of TI: %d %s\n",
- ti, con->filter_state.imsi);
- if (forward_ussd_simple(con, msg) != 0)
- return 0;
- return 1;
- }
-
- return 0;
-}
diff --git a/src/osmo-msc/Makefile.am b/src/osmo-msc/Makefile.am
deleted file mode 100644
index 0d4876fa9..000000000
--- a/src/osmo-msc/Makefile.am
+++ /dev/null
@@ -1,58 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(COVERAGE_CFLAGS) \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOVTY_CFLAGS) \
- $(LIBOSMOCTRL_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(LIBSMPP34_CFLAGS) \
- $(LIBCRYPTO_CFLAGS) \
- $(LIBOSMORANAP_CFLAGS) \
- $(LIBASN1C_CFLAGS) \
- $(LIBOSMOSIGTRAN_CFLAGS) \
- $(LIBOSMOLEGACYMGCP_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-bin_PROGRAMS = \
- osmo-msc \
- $(NULL)
-
-osmo_msc_SOURCES = \
- msc_main.c \
- $(NULL)
-
-osmo_msc_LDADD = \
- $(top_builddir)/src/libmsc/libmsc.a \
- $(top_builddir)/src/libvlr/libvlr.a \
- $(top_builddir)/src/libcommon-cs/libcommon-cs.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOVTY_LIBS) \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOCTRL_LIBS) \
- $(LIBOSMOABIS_LIBS) \
- $(LIBSMPP34_LIBS) \
- $(LIBCRYPTO_LIBS) \
- $(LIBOSMOSIGTRAN_LIBS) \
- $(LIBOSMOLEGACYMGCP_LIBS) \
- $(LIBRARY_GSM) \
- -ldbi \
- $(NULL)
-if BUILD_IU
-osmo_msc_LDADD += \
- $(LIBOSMORANAP_LIBS) \
- $(LIBASN1C_LIBS) \
- $(NULL)
-endif
diff --git a/src/osmo-msc/msc_main.c b/src/osmo-msc/msc_main.c
deleted file mode 100644
index 30b11d983..000000000
--- a/src/osmo-msc/msc_main.c
+++ /dev/null
@@ -1,589 +0,0 @@
-/* OsmoMSC - Circuit-Switched Core Network (MSC+VLR+HLR+SMSC) implementation
- */
-
-/* (C) 2016 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>
- * All Rights Reserved
- *
- * Based on OsmoNITB:
- * (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>
- * (C) 2009-2012 by Holger Hans Peter Freyther <zecke@selfish.org>
- * 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/>.
- *
- */
-
-#include <unistd.h>
-#include <time.h>
-#include <errno.h>
-#include <signal.h>
-#include <fcntl.h>
-#include <sys/stat.h>
-
-#define _GNU_SOURCE
-#include <getopt.h>
-
-/* build switches from the configure script */
-#include "../../bscconfig.h"
-
-#include <openbsc/db.h>
-#include <osmocom/core/application.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/stats.h>
-#include <openbsc/debug.h>
-#include <osmocom/abis/abis.h>
-#include <osmocom/abis/e1_input.h>
-#include <osmocom/core/talloc.h>
-#include <openbsc/signal.h>
-#include <openbsc/osmo_msc.h>
-#include <openbsc/bsc_msc_data.h>
-#include <openbsc/sms_queue.h>
-#include <osmocom/vty/telnet_interface.h>
-#include <osmocom/vty/ports.h>
-#include <osmocom/vty/logging.h>
-#include <openbsc/vty.h>
-#include <openbsc/bss.h>
-#include <openbsc/mncc.h>
-#include <openbsc/handover_decision.h>
-#include <openbsc/rrlp.h>
-#include <osmocom/ctrl/control_if.h>
-#include <osmocom/ctrl/control_vty.h>
-#include <osmocom/ctrl/ports.h>
-#include <openbsc/ctrl.h>
-#include <openbsc/osmo_bsc_rf.h>
-#include <openbsc/smpp.h>
-#include <osmocom/sigtran/osmo_ss7.h>
-#include <osmocom/legacy_mgcp/mgcpgw_client.h>
-
-#ifdef BUILD_IU
-#include <osmocom/ranap/iu_client.h>
-#endif
-
-#include <openbsc/msc_ifaces.h>
-#include <openbsc/iucs.h>
-#include <openbsc/iucs_ranap.h>
-#include <openbsc/a_iface.h>
-
-static const char * const osmomsc_copyright =
- "OsmoMSC - Osmocom Circuit-Switched Core Network implementation\r\n"
- "Copyright (C) 2016 by sysmocom s.f.m.c. GmbH <info@sysmocom.de>\r\n"
- "Based on OsmoNITB:\r\n"
- " (C) 2008-2010 by Harald Welte <laforge@gnumonks.org>\r\n"
- " (C) 2009-2012 by Holger Hans Peter Freyther <zecke@selfish.org>\r\n"
- "Contributions by Daniel Willmann, Jan Lübbe, Stefan Schmidt\r\n"
- "Dieter Spaar, Andreas Eversberg, Sylvain Munaut, Neels Hofmeyr\r\n\r\n"
- "License AGPLv3+: GNU AGPL version 3 or later <http://gnu.org/licenses/agpl-3.0.html>\r\n"
- "This is free software: you are free to change and redistribute it.\r\n"
- "There is NO WARRANTY, to the extent permitted by law.\r\n";
-
-void *tall_msc_ctx = NULL;
-
-/* satisfy deps from libbsc legacy.
- TODO double check these */
-void *tall_fle_ctx = NULL;
-void *tall_paging_ctx = NULL;
-void *tall_map_ctx = NULL;
-void *tall_upq_ctx = NULL;
-/* end deps from libbsc legacy. */
-
-static struct {
- const char *database_name;
- const char *config_file;
- int daemonize;
- const char *mncc_sock_path;
- int use_db_counter;
-} msc_cmdline_config = {
- "sms.db",
- "osmo-msc.cfg",
- 0,
- 0,
- 1
-};
-
-/* timer to store statistics */
-#define DB_SYNC_INTERVAL 60, 0
-#define EXPIRE_INTERVAL 10, 0
-
-static struct osmo_timer_list db_sync_timer;
-
-static void create_pcap_file(char *file)
-{
- mode_t mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
- int fd = open(file, O_WRONLY|O_TRUNC|O_CREAT, mode);
-
- if (fd < 0) {
- perror("Failed to open file for pcap");
- return;
- }
-
- e1_set_pcap_fd(fd);
-}
-
-static void print_usage()
-{
- printf("Usage: osmo-nitb\n");
-}
-
-static void print_help()
-{
- printf(" Some useful help...\n");
- printf(" -h --help This text.\n");
- printf(" -d option --debug=DRLL:DCC:DMM:DRR:DRSL:DNM Enable debugging.\n");
- printf(" -D --daemonize Fork the process into a background daemon.\n");
- printf(" -c --config-file filename The config file to use.\n");
- printf(" -s --disable-color\n");
- printf(" -l --database db-name The database to use.\n");
- printf(" -T --timestamp Prefix every log line with a timestamp.\n");
- printf(" -V --version Print the version of OpenBSC.\n");
- printf(" -P --rtp-proxy Enable the RTP Proxy code inside OpenBSC.\n");
- printf(" -e --log-level number Set a global loglevel.\n");
- printf(" -M --mncc-sock-path PATH Disable built-in MNCC handler and offer socket.\n");
- printf(" -m --mncc-sock Same as `-M /tmp/bsc_mncc' (deprecated).\n");
- printf(" -C --no-dbcounter Disable regular syncing of counters to database.\n");
- printf(" -r --rf-ctl PATH A unix domain socket to listen for cmds.\n");
- printf(" -p --pcap PATH Write abis communication to pcap trace file.\n");
-}
-
-static void handle_options(int argc, char **argv)
-{
- while (1) {
- int option_index = 0, c;
- static struct option long_options[] = {
- {"help", 0, 0, 'h'},
- {"debug", 1, 0, 'd'},
- {"daemonize", 0, 0, 'D'},
- {"config-file", 1, 0, 'c'},
- {"disable-color", 0, 0, 's'},
- {"database", 1, 0, 'l'},
- {"pcap", 1, 0, 'p'},
- {"timestamp", 0, 0, 'T'},
- {"version", 0, 0, 'V' },
- {"rtp-proxy", 0, 0, 'P'},
- {"log-level", 1, 0, 'e'},
- {"mncc-sock", 0, 0, 'm'},
- {"mncc-sock-path", 1, 0, 'M'},
- {"no-dbcounter", 0, 0, 'C'},
- {0, 0, 0, 0}
- };
-
- c = getopt_long(argc, argv, "hd:Dsl:ap:TPVc:e:mCM:",
- long_options, &option_index);
- if (c == -1)
- break;
-
- switch (c) {
- case 'h':
- print_usage();
- print_help();
- exit(0);
- case 's':
- log_set_use_color(osmo_stderr_target, 0);
- break;
- case 'd':
- log_parse_category_mask(osmo_stderr_target, optarg);
- break;
- case 'D':
- msc_cmdline_config.daemonize = 1;
- break;
- case 'l':
- msc_cmdline_config.database_name = optarg;
- break;
- case 'c':
- msc_cmdline_config.config_file = optarg;
- break;
- case 'p':
- create_pcap_file(optarg);
- break;
- case 'T':
- log_set_print_timestamp(osmo_stderr_target, 1);
- break;
-#if BEFORE_MSCSPLIT
- case 'P':
- ipacc_rtp_direct = 0;
- break;
-#endif
- case 'e':
- log_set_log_level(osmo_stderr_target, atoi(optarg));
- break;
- case 'M':
- msc_cmdline_config.mncc_sock_path = optarg;
- break;
- case 'm':
- msc_cmdline_config.mncc_sock_path = "/tmp/bsc_mncc";
- break;
- case 'C':
- msc_cmdline_config.use_db_counter = 0;
- break;
- case 'V':
- print_version(1);
- exit(0);
- break;
- default:
- /* catch unknown options *as well as* missing arguments. */
- fprintf(stderr, "Error in command line options. Exiting.\n");
- exit(-1);
- }
- }
-}
-
-struct gsm_network *msc_network_alloc(void *ctx,
- mncc_recv_cb_t mncc_recv)
-{
- struct gsm_network *net = gsm_network_init(ctx, 1, 1, mncc_recv);
- if (!net)
- return NULL;
-
- net->name_long = talloc_strdup(net, "OsmoMSC");
- net->name_short = talloc_strdup(net, "OsmoMSC");
-
- net->gsup_server_addr_str = talloc_strdup(net,
- MSC_HLR_REMOTE_IP_DEFAULT);
- net->gsup_server_port = MSC_HLR_REMOTE_PORT_DEFAULT;
-
- mgcpgw_client_conf_init(&net->mgcpgw.conf);
-
- return net;
-}
-
-void msc_network_shutdown(struct gsm_network *net)
-{
- /* nothing here yet */
-}
-
-static struct gsm_network *msc_network = NULL;
-
-extern void *tall_vty_ctx;
-static void signal_handler(int signal)
-{
- fprintf(stdout, "signal %u received\n", signal);
-
- switch (signal) {
- case SIGINT:
- case SIGTERM:
- msc_network_shutdown(msc_network);
- osmo_signal_dispatch(SS_L_GLOBAL, S_L_GLOBAL_SHUTDOWN, NULL);
- sleep(3);
- exit(0);
- break;
- case SIGABRT:
- osmo_generate_backtrace();
- /* in case of abort, we want to obtain a talloc report
- * and then return to the caller, who will abort the process */
- case SIGUSR1:
- talloc_report(tall_vty_ctx, stderr);
- talloc_report_full(tall_msc_ctx, stderr);
- break;
- case SIGUSR2:
- talloc_report_full(tall_vty_ctx, stderr);
- break;
- default:
- break;
- }
-}
-
-/* timer handling */
-static int _db_store_counter(struct osmo_counter *counter, void *data)
-{
- return db_store_counter(counter);
-}
-
-static void db_sync_timer_cb(void *data)
-{
- /* store counters to database and re-schedule */
- osmo_counters_for_each(_db_store_counter, NULL);
- osmo_timer_schedule(&db_sync_timer, DB_SYNC_INTERVAL);
-}
-
-extern int bsc_vty_go_parent(struct vty *vty);
-
-static struct vty_app_info msc_vty_info = {
- .name = "OsmoMSC",
- .version = PACKAGE_VERSION,
- .go_parent_cb = bsc_vty_go_parent,
- .is_config_node = bsc_vty_is_config_node,
-};
-
-#ifdef BUILD_IU
-static int rcvmsg_iu_cs(struct msgb *msg, struct gprs_ra_id *ra_id, uint16_t *sai)
-{
- DEBUGP(DIUCS, "got IuCS message"
- " %d bytes: %s\n",
- msg->len, osmo_hexdump(msg->data, msg->len));
- if (ra_id) {
- DEBUGP(DIUCS, "got IuCS message on"
- " MNC %d MCC %d LAC %d RAC %d\n",
- ra_id->mnc, ra_id->mcc, ra_id->lac, ra_id->rac);
- }
-
- return gsm0408_rcvmsg_iucs(msc_network, msg, ra_id? &ra_id->lac : NULL);
-}
-
-static int rx_iu_event(struct ranap_ue_conn_ctx *ctx, enum ranap_iu_event_type type,
- void *data)
-{
- DEBUGP(DIUCS, "got IuCS event %u: %s\n", type,
- ranap_iu_event_type_str(type));
-
- return iucs_rx_ranap_event(msc_network, ctx, type, data);
-}
-#endif
-
-#define DEFAULT_M3UA_REMOTE_IP "127.0.0.1"
-#define DEFAULT_PC_A "0.23.1"
-#define DEFAULT_PC_IU "0.23.2"
-#define DEFAULT_PC_A_IU DEFAULT_PC_A
-
-static struct osmo_sccp_instance *sccp_setup(void *ctx, uint32_t cs7_instance,
- const char *label, const char *default_pc_str)
-{
- int default_pc = osmo_ss7_pointcode_parse(NULL, default_pc_str);
- if (default_pc < 0)
- return NULL;
-
- return osmo_sccp_simple_client_on_ss7_id(ctx, cs7_instance, label, default_pc,
- OSMO_SS7_ASP_PROT_M3UA,
- 0, NULL, /* local: use arbitrary port and 0.0.0.0. */
- 0, /* remote: use protocol default port */
- DEFAULT_M3UA_REMOTE_IP);
- /* Note: If a differing remote IP is to be used, it was already entered in the vty config at
- * 'cs7' / 'asp' / 'remote-ip', and this default remote IP has no effect.
- * Similarly, 'cs7' / 'listen' can specify the local IP address. */
-}
-
-static int ss7_setup(void *ctx)
-{
- uint32_t cs7_instance_a = msc_network->a.cs7_instance;
-#if BUILD_IU
- uint32_t cs7_instance_iu = msc_network->iu.cs7_instance;
-
- if (cs7_instance_a == cs7_instance_iu) {
- /* Create one single SCCP instance which will be used for both,
- * Iu and A at the same time, under the same point-code */
- LOGP(DMSC, LOGL_NOTICE, "CS7 Instance identifiers: A = Iu = %u\n", cs7_instance_a);
-
- msc_network->a.sccp = sccp_setup(ctx, cs7_instance_a, "OsmoMSC-A-Iu", DEFAULT_PC_A_IU);
- if (!msc_network->a.sccp)
- return -EINVAL;
-
- msc_network->iu.sccp = msc_network->a.sccp;
- } else {
- /* Create two separate SCCP instances to run A and Iu independently on different
- * pointcodes */
- LOGP(DMSC, LOGL_NOTICE, "CS7 Instance identifiers: A = %u, Iu = %u\n",
- cs7_instance_a, cs7_instance_iu);
-
- msc_network->a.sccp = sccp_setup(ctx, cs7_instance_a, "OsmoMSC-A", DEFAULT_PC_A);
- if (!msc_network->a.sccp)
- return -EINVAL;
-
- msc_network->iu.sccp = sccp_setup(ctx, cs7_instance_iu, "OsmoMSC-Iu", DEFAULT_PC_IU);
- if (!msc_network->iu.sccp)
- return -EINVAL;
- }
-#else
- /* No Iu support, just open up an A instance */
- msc_network->a.sccp = sccp_setup(ctx, cs7_instance_a, "OsmoMSC-A", DEFAULT_PC_A);
- if (!msc_network->a.sccp)
- return -EINVAL;
-#endif
-
- return 0;
-}
-
-int main(int argc, char **argv)
-{
- int rc;
-
- msc_vty_info.copyright = osmomsc_copyright;
-
- tall_msc_ctx = talloc_named_const(NULL, 1, "osmo_msc");
- talloc_ctx_init(tall_msc_ctx);
-
- osmo_init_logging(&log_info);
- osmo_stats_init(tall_msc_ctx);
-
- /* For --version, vty_init() must be called before handling options */
- vty_init(&msc_vty_info);
-
- osmo_ss7_init();
- osmo_ss7_vty_init_asp(tall_msc_ctx);
-
- /* Parse options */
- handle_options(argc, argv);
-
- /* Allocate global gsm_network struct; choose socket/internal MNCC */
- msc_network = msc_network_alloc(tall_msc_ctx,
- msc_cmdline_config.mncc_sock_path?
- mncc_sock_from_cc
- : int_mncc_recv);
- if (!msc_network)
- return -ENOMEM;
-
- if (msc_vlr_alloc(msc_network)) {
- fprintf(stderr, "Failed to allocate VLR\n");
- exit(1);
- }
-
- ctrl_vty_init(tall_msc_ctx);
- logging_vty_add_cmds(&log_info);
- msc_vty_init(msc_network);
- bsc_vty_init_extra();
-
-#ifdef BUILD_SMPP
- if (smpp_openbsc_alloc_init(tall_msc_ctx) < 0)
- return -1;
-#endif
-
- /*
- * For osmo-nitb, skip TCH/F for now, because otherwise dyn TS
- * always imply the possibility to have a mix of TCH/F and
- * TCH/H channels; if two phones request a TCH/F and a TCH/H,
- * respectively, they cannot call each other. If we deny TCH/F,
- * they will both fall back to TCH/H, and dynamic channels are
- * usable. See OS#1778.
- *
- * A third-party MSC may well be able to handle a TCH/H TCH/F
- * mismatch. Moreover, this option may be overwritten in the
- * config file or in VTY.
- */
- msc_network->dyn_ts_allow_tch_f = false;
-
- rc = vty_read_config_file(msc_cmdline_config.config_file, NULL);
- if (rc < 0) {
- LOGP(DNM, LOGL_FATAL, "Failed to parse the config file: '%s'\n",
- msc_cmdline_config.config_file);
- return 1;
- }
-
- /* Initialize MNCC socket if appropriate */
- if (msc_cmdline_config.mncc_sock_path) {
- rc = mncc_sock_init(msc_network,
- msc_cmdline_config.mncc_sock_path);
- if (rc) {
- fprintf(stderr, "MNCC socket initialization failed. exiting.\n");
- exit(1);
- }
- } else
- DEBUGP(DMNCC, "Using internal MNCC handler.\n");
-
- /* start telnet after reading config for vty_get_bind_addr() */
- rc = telnet_init_dynif(tall_msc_ctx, &msc_network,
- vty_get_bind_addr(), OSMO_VTY_PORT_MSC);
- if (rc < 0)
- return 2;
-
- /* BSC stuff is to be split behind an A-interface to be used with
- * OsmoBSC, but there is no need to remove it yet. Most of the
- * following code until iu_init() is legacy. */
-
-#ifdef BUILD_SMPP
- smpp_openbsc_start(msc_network);
-#endif
-
- /* start control interface after reading config for
- * ctrl_vty_get_bind_addr() */
- msc_network->ctrl = ctrl_interface_setup_dynip(msc_network, ctrl_vty_get_bind_addr(),
- OSMO_CTRL_PORT_MSC, NULL);
- if (!msc_network->ctrl) {
- printf("Failed to initialize control interface. Exiting.\n");
- return -1;
- }
-
-#if 0
-TODO: we probably want some of the _net_ ctrl commands from bsc_base_ctrl_cmds_install().
- if (bsc_base_ctrl_cmds_install() != 0) {
- printf("Failed to initialize the BSC control commands.\n");
- return -1;
- }
-#endif
-
- if (msc_ctrl_cmds_install(msc_network) != 0) {
- printf("Failed to initialize the MSC control commands.\n");
- return -1;
- }
-
- /* seed the PRNG */
- srand(time(NULL));
- /* TODO: is this used for crypto?? Improve randomness, at least we
- * should try to use the nanoseconds part of the current time. */
-
- if (db_init(msc_cmdline_config.database_name)) {
- printf("DB: Failed to init database: %s\n",
- msc_cmdline_config.database_name);
- return 4;
- }
-
- osmo_fsm_log_addr(true);
- if (msc_vlr_start(msc_network)) {
- fprintf(stderr, "Failed to start VLR\n");
- exit(1);
- }
-
- msc_subscr_conn_init();
-
- if (db_prepare()) {
- printf("DB: Failed to prepare database.\n");
- return 5;
- }
-
- /* setup the timer */
- osmo_timer_setup(&db_sync_timer, db_sync_timer_cb, NULL);
- if (msc_cmdline_config.use_db_counter)
- osmo_timer_schedule(&db_sync_timer, DB_SYNC_INTERVAL);
-
- signal(SIGINT, &signal_handler);
- signal(SIGTERM, &signal_handler);
- signal(SIGABRT, &signal_handler);
- signal(SIGUSR1, &signal_handler);
- signal(SIGUSR2, &signal_handler);
- osmo_init_ignore_signals();
-
- /* start the SMS queue */
- if (sms_queue_start(msc_network, 20) != 0)
- return -1;
-
- msc_network->mgcpgw.client = mgcpgw_client_init(
- msc_network, &msc_network->mgcpgw.conf);
-
- if (mgcpgw_client_connect(msc_network->mgcpgw.client)) {
- printf("MGCPGW connect failed\n");
- return 7;
- }
-
- if (ss7_setup(tall_msc_ctx)) {
- printf("Setting up SCCP client failed.\n");
- return 8;
- }
-
-#ifdef BUILD_IU
- /* Set up IuCS */
- ranap_iu_init(tall_msc_ctx, DRANAP, "OsmoMSC-IuCS", msc_network->iu.sccp, rcvmsg_iu_cs, rx_iu_event);
-#endif
-
- /* Set up A interface */
- a_init(msc_network->a.sccp, msc_network);
-
- if (msc_cmdline_config.daemonize) {
- rc = osmo_daemonize();
- if (rc < 0) {
- perror("Error during daemonize");
- return 6;
- }
- }
-
- while (1) {
- log_reset_context();
- osmo_select_main(0);
- }
-}
diff --git a/src/utils/Makefile.am b/src/utils/Makefile.am
deleted file mode 100644
index 26494e13d..000000000
--- a/src/utils/Makefile.am
+++ /dev/null
@@ -1,147 +0,0 @@
-AM_CPPFLAGS = \
- $(all_includes) \
- -I$(top_srcdir)/include \
- -I$(top_builddir) \
- $(NULL)
-
-AM_CFLAGS = \
- -Wall \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(COVERAGE_CFLAGS) \
- $(SQLITE3_CFLAGS) \
- $(LIBSMPP34_CFLAGS) \
- $(NULL)
-
-AM_LDFLAGS = \
- $(COVERAGE_LDFLAGS) \
- $(NULL)
-
-noinst_HEADERS = \
- meas_db.h \
- $(NULL)
-
-bin_PROGRAMS = \
- bs11_config \
- isdnsync \
- meas_json \
- $(NULL)
-if HAVE_SQLITE3
-bin_PROGRAMS += \
- osmo-meas-udp2db \
- $(NULL)
-if HAVE_PCAP
-bin_PROGRAMS += \
- osmo-meas-pcap2db \
- $(NULL)
-endif
-endif
-if HAVE_LIBCDK
-bin_PROGRAMS += \
- meas_vis \
- $(NULL)
-endif
-
-if BUILD_SMPP
-noinst_PROGRAMS = \
- smpp_mirror \
- $(NULL)
-endif
-
-bs11_config_SOURCES = \
- bs11_config.c \
- $(NULL)
-
-bs11_config_LDADD = \
- $(top_builddir)/src/libbsc/libbsc.a \
- $(top_builddir)/src/libcommon-cs/libcommon-cs.a \
- $(top_builddir)/src/libtrau/libtrau.a \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBOSMOABIS_LIBS) \
- $(NULL)
-
-isdnsync_SOURCES = \
- isdnsync.c \
- $(NULL)
-
-smpp_mirror_SOURCES = \
- smpp_mirror.c \
- $(NULL)
-
-smpp_mirror_LDADD = \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(LIBSMPP34_LIBS) \
- $(NULL)
-
-meas_vis_SOURCES = \
- meas_vis.c \
- $(NULL)
-
-meas_vis_LDADD = \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- -lcdk \
- -lncurses \
- $(NULL)
-
-meas_vis_CFLAGS = \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(NULL)
-
-osmo_meas_pcap2db_SOURCES = \
- meas_pcap2db.c \
- meas_db.c \
- $(NULL)
-
-osmo_meas_pcap2db_LDADD = \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(SQLITE3_LIBS) \
- -lpcap \
- $(NULL)
-
-osmo_meas_pcap2db_CFLAGS = \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(NULL)
-
-osmo_meas_udp2db_SOURCES = \
- meas_udp2db.c \
- meas_db.c \
- $(NULL)
-
-osmo_meas_udp2db_LDADD = \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(SQLITE3_LIBS) \
- $(NULL)
-
-osmo_meas_udp2db_CFLAGS = \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(NULL)
-
-meas_json_SOURCES = \
- meas_json.c \
- $(NULL)
-
-meas_json_LDADD = \
- $(top_builddir)/src/libcommon/libcommon.a \
- $(LIBOSMOCORE_LIBS) \
- $(LIBOSMOGSM_LIBS) \
- $(NULL)
-
-meas_json_CFLAGS = \
- $(LIBOSMOCORE_CFLAGS) \
- $(LIBOSMOGSM_CFLAGS) \
- $(LIBOSMOABIS_CFLAGS) \
- $(NULL)
-
diff --git a/src/utils/bs11_config.c b/src/utils/bs11_config.c
deleted file mode 100644
index a0f3cb757..000000000
--- a/src/utils/bs11_config.c
+++ /dev/null
@@ -1,953 +0,0 @@
-/* Siemens BS-11 microBTS configuration tool */
-
-/* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org>
- * All Rights Reserved
- *
- * This software is based on ideas (but not code) of BS11Config
- * (C) 2009 by Dieter Spaar <spaar@mirider.augusta.de>
- *
- * 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/>.
- *
- */
-
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <errno.h>
-#include <string.h>
-#include <getopt.h>
-#include <fcntl.h>
-#include <signal.h>
-
-#include <sys/stat.h>
-
-#include <openbsc/common_bsc.h>
-#include <openbsc/abis_nm.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/tlv.h>
-#include <openbsc/debug.h>
-#include <osmocom/core/select.h>
-#include <openbsc/rs232.h>
-#include <osmocom/core/application.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/abis/abis.h>
-#include <osmocom/abis/e1_input.h>
-
-static void *tall_bs11cfg_ctx;
-static struct e1inp_sign_link *oml_link;
-
-/* state of our bs11_config application */
-enum bs11cfg_state {
- STATE_NONE,
- STATE_LOGON_WAIT,
- STATE_LOGON_ACK,
- STATE_SWLOAD,
- STATE_QUERY,
-};
-static enum bs11cfg_state bs11cfg_state = STATE_NONE;
-static char *command, *value;
-struct osmo_timer_list status_timer;
-
-static const uint8_t obj_li_attr[] = {
- NM_ATT_BS11_BIT_ERR_THESH, 0x09, 0x00,
- NM_ATT_BS11_L1_PROT_TYPE, 0x00,
- NM_ATT_BS11_LINE_CFG, 0x00,
-};
-static const uint8_t obj_bbsig0_attr[] = {
- NM_ATT_BS11_RSSI_OFFS, 0x02, 0x00, 0x00,
- NM_ATT_BS11_DIVERSITY, 0x01, 0x00,
-};
-static const uint8_t obj_pa0_attr[] = {
- NM_ATT_BS11_TXPWR, 0x01, BS11_TRX_POWER_GSM_30mW,
-};
-static const char *trx1_password = "1111111111";
-#define TEI_OML 25
-
-/* dummy function to keep gsm_data.c happy */
-struct osmo_counter *osmo_counter_alloc(const char *name)
-{
- return NULL;
-}
-
-int handle_serial_msg(struct msgb *rx_msg);
-
-/* create all objects for an initial configuration */
-static int create_objects(struct gsm_bts *bts)
-{
- fprintf(stdout, "Crating Objects for minimal config\n");
- abis_nm_bs11_create_object(bts, BS11_OBJ_LI, 0, sizeof(obj_li_attr),
- obj_li_attr);
- abis_nm_bs11_create_object(bts, BS11_OBJ_GPSU, 0, 0, NULL);
- abis_nm_bs11_create_object(bts, BS11_OBJ_ALCO, 0, 0, NULL);
- abis_nm_bs11_create_object(bts, BS11_OBJ_CCLK, 0, 0, NULL);
- abis_nm_bs11_create_object(bts, BS11_OBJ_BBSIG, 0,
- sizeof(obj_bbsig0_attr), obj_bbsig0_attr);
- abis_nm_bs11_create_object(bts, BS11_OBJ_PA, 0,
- sizeof(obj_pa0_attr), obj_pa0_attr);
- abis_nm_bs11_create_envaBTSE(bts, 0);
- abis_nm_bs11_create_envaBTSE(bts, 1);
- abis_nm_bs11_create_envaBTSE(bts, 2);
- abis_nm_bs11_create_envaBTSE(bts, 3);
-
- abis_nm_bs11_conn_oml_tei(bts, 0, 1, 0xff, TEI_OML);
-
- abis_nm_bs11_set_trx_power(bts->c0, BS11_TRX_POWER_GSM_30mW);
-
- sleep(1);
-
- abis_nm_bs11_set_trx1_pw(bts, trx1_password);
-
- sleep(1);
-
- return 0;
-}
-
-static int create_trx1(struct gsm_bts *bts)
-{
- uint8_t bbsig1_attr[sizeof(obj_bbsig0_attr)+12];
- uint8_t *cur = bbsig1_attr;
- struct gsm_bts_trx *trx = gsm_bts_trx_num(bts, 1);
-
- if (!trx)
- trx = gsm_bts_trx_alloc(bts);
-
- fprintf(stdout, "Crating Objects for TRX1\n");
-
- abis_nm_bs11_set_trx1_pw(bts, trx1_password);
-
- sleep(1);
-
- cur = tlv_put(cur, NM_ATT_BS11_PASSWORD, 10,
- (uint8_t *)trx1_password);
- memcpy(cur, obj_bbsig0_attr, sizeof(obj_bbsig0_attr));
- abis_nm_bs11_create_object(bts, BS11_OBJ_BBSIG, 1,
- sizeof(bbsig1_attr), bbsig1_attr);
- abis_nm_bs11_create_object(bts, BS11_OBJ_PA, 1,
- sizeof(obj_pa0_attr), obj_pa0_attr);
- abis_nm_bs11_set_trx_power(trx, BS11_TRX_POWER_GSM_30mW);
-
- return 0;
-}
-
-static char *serial_port = "/dev/ttyUSB0";
-static char *fname_safety = "BTSBMC76.SWI";
-static char *fname_software = "HS011106.SWL";
-static int delay_ms = 0;
-static int win_size = 8;
-static int param_disconnect = 0;
-static int param_restart = 0;
-static int param_forced = 0;
-static struct gsm_bts *g_bts;
-
-static int file_is_readable(const char *fname)
-{
- int rc;
- struct stat st;
-
- rc = stat(fname, &st);
- if (rc < 0)
- return 0;
-
- if (S_ISREG(st.st_mode) && (st.st_mode & S_IRUSR))
- return 1;
-
- return 0;
-}
-
-static int percent;
-static int percent_old;
-
-/* callback function passed to the ABIS OML code */
-static int swload_cbfn(unsigned int hook, unsigned int event, struct msgb *msg,
- void *data, void *param)
-{
- if (hook != GSM_HOOK_NM_SWLOAD)
- return 0;
-
- switch (event) {
- case NM_MT_LOAD_INIT_ACK:
- fprintf(stdout, "Software Load Initiate ACK\n");
- break;
- case NM_MT_LOAD_INIT_NACK:
- fprintf(stderr, "ERROR: Software Load Initiate NACK\n");
- exit(5);
- break;
- case NM_MT_LOAD_END_ACK:
- if (data) {
- /* we did a safety load and must activate it */
- abis_nm_software_activate(g_bts, fname_safety,
- swload_cbfn, g_bts);
- sleep(5);
- }
- break;
- case NM_MT_LOAD_END_NACK:
- fprintf(stderr, "ERROR: Software Load End NACK\n");
- exit(3);
- break;
- case NM_MT_ACTIVATE_SW_NACK:
- fprintf(stderr, "ERROR: Activate Software NACK\n");
- exit(4);
- break;
- case NM_MT_ACTIVATE_SW_ACK:
- bs11cfg_state = STATE_NONE;
-
- break;
- case NM_MT_LOAD_SEG_ACK:
- percent = abis_nm_software_load_status(g_bts);
- if (percent > percent_old)
- printf("Software Download Progress: %d%%\n", percent);
- percent_old = percent;
- break;
- }
- return 0;
-}
-
-static const struct value_string bs11_linkst_names[] = {
- { 0, "Down" },
- { 1, "Up" },
- { 2, "Restoring" },
- { 0, NULL }
-};
-
-static const char *linkstate_name(uint8_t linkstate)
-{
- return get_value_string(bs11_linkst_names, linkstate);
-}
-
-static const struct value_string mbccu_load_names[] = {
- { 0, "No Load" },
- { 1, "Load BTSCAC" },
- { 2, "Load BTSDRX" },
- { 3, "Load BTSBBX" },
- { 4, "Load BTSARC" },
- { 5, "Load" },
- { 0, NULL }
-};
-
-static const char *mbccu_load_name(uint8_t linkstate)
-{
- return get_value_string(mbccu_load_names, linkstate);
-}
-
-static const char *bts_phase_name(uint8_t phase)
-{
- switch (phase) {
- case BS11_STATE_WARM_UP:
- case BS11_STATE_WARM_UP_2:
- return "Warm Up";
- break;
- case BS11_STATE_LOAD_SMU_SAFETY:
- return "Load SMU Safety";
- break;
- case BS11_STATE_LOAD_SMU_INTENDED:
- return "Load SMU Intended";
- break;
- case BS11_STATE_LOAD_MBCCU:
- return "Load MBCCU";
- break;
- case BS11_STATE_SOFTWARE_RQD:
- return "Software required";
- break;
- case BS11_STATE_WAIT_MIN_CFG:
- case BS11_STATE_WAIT_MIN_CFG_2:
- return "Wait minimal config";
- break;
- case BS11_STATE_MAINTENANCE:
- return "Maintenance";
- break;
- case BS11_STATE_NORMAL:
- return "Normal";
- break;
- case BS11_STATE_ABIS_LOAD:
- return "Abis load";
- break;
- default:
- return "Unknown";
- break;
- }
-}
-
-static const char *trx_power_name(uint8_t pwr)
-{
- switch (pwr) {
- case BS11_TRX_POWER_GSM_2W:
- return "2W (GSM)";
- case BS11_TRX_POWER_GSM_250mW:
- return "250mW (GSM)";
- case BS11_TRX_POWER_GSM_80mW:
- return "80mW (GSM)";
- case BS11_TRX_POWER_GSM_30mW:
- return "30mW (GSM)";
- case BS11_TRX_POWER_DCS_3W:
- return "3W (DCS)";
- case BS11_TRX_POWER_DCS_1W6:
- return "1.6W (DCS)";
- case BS11_TRX_POWER_DCS_500mW:
- return "500mW (DCS)";
- case BS11_TRX_POWER_DCS_160mW:
- return "160mW (DCS)";
- default:
- return "unknown value";
- }
-}
-
-static const char *pll_mode_name(uint8_t mode)
-{
- switch (mode) {
- case BS11_LI_PLL_LOCKED:
- return "E1 Locked";
- case BS11_LI_PLL_STANDALONE:
- return "Standalone";
- default:
- return "unknown";
- }
-}
-
-static const char *cclk_acc_name(uint8_t acc)
-{
- switch (acc) {
- case 0:
- /* Out of the demanded +/- 0.05ppm */
- return "Medium";
- case 1:
- /* Synchronized with Abis, within demanded tolerance +/- 0.05ppm */
- return "High";
- default:
- return "unknown";
- }
-}
-
-static const char *bport_lcfg_name(uint8_t lcfg)
-{
- switch (lcfg) {
- case BS11_LINE_CFG_STAR:
- return "Star";
- case BS11_LINE_CFG_MULTIDROP:
- return "Multi-Drop";
- default:
- return "unknown";
- }
-}
-
-static const char *obj_name(struct abis_om_fom_hdr *foh)
-{
- static char retbuf[256];
-
- retbuf[0] = 0;
-
- switch (foh->obj_class) {
- case NM_OC_BS11:
- strcat(retbuf, "BS11 ");
- switch (foh->obj_inst.bts_nr) {
- case BS11_OBJ_PA:
- sprintf(retbuf+strlen(retbuf), "Power Amplifier %d ",
- foh->obj_inst.ts_nr);
- break;
- case BS11_OBJ_LI:
- sprintf(retbuf+strlen(retbuf), "Line Interface ");
- break;
- case BS11_OBJ_CCLK:
- sprintf(retbuf+strlen(retbuf), "CCLK ");
- break;
- }
- break;
- case NM_OC_SITE_MANAGER:
- strcat(retbuf, "SITE MANAGER ");
- break;
- case NM_OC_BS11_BPORT:
- sprintf(retbuf+strlen(retbuf), "BPORT%u ",
- foh->obj_inst.bts_nr);
- break;
- }
- return retbuf;
-}
-
-static void print_state(struct tlv_parsed *tp)
-{
- if (TLVP_PRESENT(tp, NM_ATT_BS11_BTS_STATE)) {
- uint8_t phase, mbccu;
- if (TLVP_LEN(tp, NM_ATT_BS11_BTS_STATE) >= 1) {
- phase = *TLVP_VAL(tp, NM_ATT_BS11_BTS_STATE);
- printf("PHASE: %u %-20s ", phase & 0xf,
- bts_phase_name(phase));
- }
- if (TLVP_LEN(tp, NM_ATT_BS11_BTS_STATE) >= 2) {
- mbccu = *(TLVP_VAL(tp, NM_ATT_BS11_BTS_STATE)+1);
- printf("MBCCU0: %-11s MBCCU1: %-11s ",
- mbccu_load_name(mbccu & 0xf), mbccu_load_name(mbccu >> 4));
- }
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_E1_STATE) &&
- TLVP_LEN(tp, NM_ATT_BS11_E1_STATE) >= 1) {
- uint8_t e1_state = *TLVP_VAL(tp, NM_ATT_BS11_E1_STATE);
- printf("Abis-link: %-9s ", linkstate_name(e1_state & 0xf));
- }
- printf("\n");
-}
-
-static int print_attr(struct tlv_parsed *tp)
-{
- if (TLVP_PRESENT(tp, NM_ATT_BS11_ESN_PCB_SERIAL)) {
- printf("\tBS-11 ESN PCB Serial Number: %s\n",
- TLVP_VAL(tp, NM_ATT_BS11_ESN_PCB_SERIAL));
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_ESN_HW_CODE_NO)) {
- printf("\tBS-11 ESN Hardware Code Number: %s\n",
- TLVP_VAL(tp, NM_ATT_BS11_ESN_HW_CODE_NO)+6);
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_ESN_FW_CODE_NO)) {
- printf("\tBS-11 ESN Firmware Code Number: %s\n",
- TLVP_VAL(tp, NM_ATT_BS11_ESN_FW_CODE_NO)+6);
- }
-#if 0
- if (TLVP_PRESENT(tp, NM_ATT_BS11_BOOT_SW_VERS)) {
- printf("BS-11 Boot Software Version: %s\n",
- TLVP_VAL(tp, NM_ATT_BS11_BOOT_SW_VERS)+6);
- }
-#endif
- if (TLVP_PRESENT(tp, NM_ATT_ABIS_CHANNEL) &&
- TLVP_LEN(tp, NM_ATT_ABIS_CHANNEL) >= 3) {
- const uint8_t *chan = TLVP_VAL(tp, NM_ATT_ABIS_CHANNEL);
- printf("\tE1 Channel: Port=%u Timeslot=%u ",
- chan[0], chan[1]);
- if (chan[2] == 0xff)
- printf("(Full Slot)\n");
- else
- printf("Subslot=%u\n", chan[2]);
- }
- if (TLVP_PRESENT(tp, NM_ATT_TEI))
- printf("\tTEI: %d\n", *TLVP_VAL(tp, NM_ATT_TEI));
- if (TLVP_PRESENT(tp, NM_ATT_BS11_TXPWR) &&
- TLVP_LEN(tp, NM_ATT_BS11_TXPWR) >= 1) {
- printf("\tTRX Power: %s\n",
- trx_power_name(*TLVP_VAL(tp, NM_ATT_BS11_TXPWR)));
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_PLL_MODE) &&
- TLVP_LEN(tp, NM_ATT_BS11_PLL_MODE) >= 1) {
- printf("\tPLL Mode: %s\n",
- pll_mode_name(*TLVP_VAL(tp, NM_ATT_BS11_PLL_MODE)));
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_PLL) &&
- TLVP_LEN(tp, NM_ATT_BS11_PLL) >= 4) {
- const uint8_t *vp = TLVP_VAL(tp, NM_ATT_BS11_PLL);
- printf("\tPLL Set Value=%d, Work Value=%d\n",
- vp[0] << 8 | vp[1], vp[2] << 8 | vp[3]);
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_CCLK_ACCURACY) &&
- TLVP_LEN(tp, NM_ATT_BS11_CCLK_ACCURACY) >= 1) {
- const uint8_t *acc = TLVP_VAL(tp, NM_ATT_BS11_CCLK_ACCURACY);
- printf("\tCCLK Accuracy: %s (%d)\n", cclk_acc_name(*acc), *acc);
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_CCLK_TYPE) &&
- TLVP_LEN(tp, NM_ATT_BS11_CCLK_TYPE) >= 1) {
- const uint8_t *acc = TLVP_VAL(tp, NM_ATT_BS11_CCLK_TYPE);
- printf("\tCCLK Type=%d\n", *acc);
- }
- if (TLVP_PRESENT(tp, NM_ATT_BS11_LINE_CFG) &&
- TLVP_LEN(tp, NM_ATT_BS11_LINE_CFG) >= 1) {
- const uint8_t *lcfg = TLVP_VAL(tp, NM_ATT_BS11_LINE_CFG);
- printf("\tLine Configuration: %s (%d)\n",
- bport_lcfg_name(*lcfg), *lcfg);
- }
-
-
-
- return 0;
-}
-
-static void cmd_query(void)
-{
- struct gsm_bts_trx *trx = g_bts->c0;
-
- bs11cfg_state = STATE_QUERY;
- abis_nm_bs11_get_serno(g_bts);
- abis_nm_bs11_get_oml_tei_ts(g_bts);
- abis_nm_bs11_get_pll_mode(g_bts);
- abis_nm_bs11_get_cclk(g_bts);
- abis_nm_bs11_get_trx_power(trx);
- trx = gsm_bts_trx_num(g_bts, 1);
- if (trx)
- abis_nm_bs11_get_trx_power(trx);
- abis_nm_bs11_get_bport_line_cfg(g_bts, 0);
- abis_nm_bs11_get_bport_line_cfg(g_bts, 1);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
-}
-
-/* handle a response from the BTS to a GET STATE command */
-static int handle_state_resp(enum abis_bs11_phase state)
-{
- int rc = 0;
-
- switch (state) {
- case BS11_STATE_WARM_UP:
- case BS11_STATE_LOAD_SMU_SAFETY:
- case BS11_STATE_LOAD_SMU_INTENDED:
- case BS11_STATE_LOAD_MBCCU:
- break;
- case BS11_STATE_SOFTWARE_RQD:
- bs11cfg_state = STATE_SWLOAD;
- /* send safety load. Use g_bts as private 'param'
- * argument, so our swload_cbfn can distinguish
- * a safety load from a regular software */
- if (file_is_readable(fname_safety))
- rc = abis_nm_software_load(g_bts, 0xff, fname_safety,
- win_size, param_forced,
- swload_cbfn, g_bts);
- else
- fprintf(stderr, "No valid Safety Load file \"%s\"\n",
- fname_safety);
- break;
- case BS11_STATE_WAIT_MIN_CFG:
- case BS11_STATE_WAIT_MIN_CFG_2:
- bs11cfg_state = STATE_SWLOAD;
- rc = create_objects(g_bts);
- break;
- case BS11_STATE_MAINTENANCE:
- if (command) {
- if (!strcmp(command, "disconnect"))
- abis_nm_bs11_factory_logon(g_bts, 0);
- else if (!strcmp(command, "reconnect"))
- rc = abis_nm_bs11_bsc_disconnect(g_bts, 1);
- else if (!strcmp(command, "software")
- && bs11cfg_state != STATE_SWLOAD) {
- bs11cfg_state = STATE_SWLOAD;
- /* send software (FIXME: over A-bis?) */
- if (file_is_readable(fname_software))
- rc = abis_nm_bs11_load_swl(g_bts, fname_software,
- win_size, param_forced,
- swload_cbfn);
- else
- fprintf(stderr, "No valid Software file \"%s\"\n",
- fname_software);
- } else if (!strcmp(command, "delete-trx1")) {
- printf("Locing BBSIG and PA objects of TRX1\n");
- abis_nm_chg_adm_state(g_bts, NM_OC_BS11,
- BS11_OBJ_BBSIG, 0, 1,
- NM_STATE_LOCKED);
- abis_nm_chg_adm_state(g_bts, NM_OC_BS11,
- BS11_OBJ_PA, 0, 1,
- NM_STATE_LOCKED);
- sleep(1);
- printf("Deleting BBSIG and PA objects of TRX1\n");
- abis_nm_bs11_delete_object(g_bts, BS11_OBJ_BBSIG, 1);
- abis_nm_bs11_delete_object(g_bts, BS11_OBJ_PA, 1);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "create-trx1")) {
- create_trx1(g_bts);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "pll-e1-locked")) {
- abis_nm_bs11_set_pll_locked(g_bts, 1);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "pll-standalone")) {
- abis_nm_bs11_set_pll_locked(g_bts, 0);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "pll-setvalue")) {
- abis_nm_bs11_set_pll(g_bts, atoi(value));
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "pll-workvalue")) {
- /* To set the work value we need to login as FIELD */
- abis_nm_bs11_factory_logon(g_bts, 0);
- sleep(1);
- abis_nm_bs11_infield_logon(g_bts, 1);
- sleep(1);
- abis_nm_bs11_set_pll(g_bts, atoi(value));
- sleep(1);
- abis_nm_bs11_infield_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "oml-tei")) {
- abis_nm_bs11_conn_oml_tei(g_bts, 0, 1, 0xff, TEI_OML);
- command = NULL;
- } else if (!strcmp(command, "restart")) {
- abis_nm_bs11_restart(g_bts);
- command = NULL;
- } else if (!strcmp(command, "query")) {
- cmd_query();
- } else if (!strcmp(command, "create-bport1")) {
- abis_nm_bs11_create_bport(g_bts, 1);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "delete-bport1")) {
- abis_nm_chg_adm_state(g_bts, NM_OC_BS11_BPORT, 1, 0xff, 0xff, NM_STATE_LOCKED);
- sleep(1);
- abis_nm_bs11_delete_bport(g_bts, 1);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "bport0-star")) {
- abis_nm_bs11_set_bport_line_cfg(g_bts, 0, BS11_LINE_CFG_STAR);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "bport0-multidrop")) {
- abis_nm_bs11_set_bport_line_cfg(g_bts, 0, BS11_LINE_CFG_MULTIDROP);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- } else if (!strcmp(command, "bport1-multidrop")) {
- abis_nm_bs11_set_bport_line_cfg(g_bts, 1, BS11_LINE_CFG_MULTIDROP);
- sleep(1);
- abis_nm_bs11_factory_logon(g_bts, 0);
- command = NULL;
- }
-
- }
- break;
- case BS11_STATE_NORMAL:
- if (command) {
- if (!strcmp(command, "reconnect"))
- abis_nm_bs11_factory_logon(g_bts, 0);
- else if (!strcmp(command, "disconnect"))
- abis_nm_bs11_bsc_disconnect(g_bts, 0);
- else if (!strcmp(command, "query")) {
- cmd_query();
- }
- } else if (param_disconnect) {
- param_disconnect = 0;
- abis_nm_bs11_bsc_disconnect(g_bts, 0);
- if (param_restart) {
- param_restart = 0;
- abis_nm_bs11_restart(g_bts);
- }
- }
- break;
- default:
- break;
- }
- return rc;
-}
-
-/* handle a fully-received message/packet from the RS232 port */
-static int abis_nm_bs11cfg_rcvmsg(struct msgb *rx_msg)
-{
- struct e1inp_sign_link *link = rx_msg->dst;
- struct abis_om_hdr *oh;
- struct abis_om_fom_hdr *foh;
- struct tlv_parsed tp;
- int rc = -1;
-
-#if 0
- const uint8_t too_fast[] = { 0x12, 0x80, 0x00, 0x00, 0x02, 0x02 };
-
- if (rx_msg->len < LAPD_HDR_LEN
- + sizeof(struct abis_om_fom_hdr)
- + sizeof(struct abis_om_hdr)) {
- if (!memcmp(rx_msg->data + 2, too_fast,
- sizeof(too_fast))) {
- fprintf(stderr, "BS11 tells us we're too "
- "fast, try --delay bigger than %u\n",
- delay_ms);
- return -E2BIG;
- } else
- fprintf(stderr, "unknown BS11 message\n");
- }
-#endif
-
- oh = (struct abis_om_hdr *) msgb_l2(rx_msg);
- foh = (struct abis_om_fom_hdr *) oh->data;
- switch (foh->msg_type) {
- case NM_MT_BS11_LMT_LOGON_ACK:
- printf("LMT LOGON: ACK\n\n");
- if (bs11cfg_state == STATE_NONE)
- bs11cfg_state = STATE_LOGON_ACK;
- rc = abis_nm_bs11_get_state(g_bts);
- break;
- case NM_MT_BS11_LMT_LOGOFF_ACK:
- printf("LMT LOGOFF: ACK\n");
- exit(0);
- break;
- case NM_MT_BS11_GET_STATE_ACK:
- rc = abis_nm_tlv_parse(&tp, g_bts, foh->data, oh->length-sizeof(*foh));
- print_state(&tp);
- if (TLVP_PRESENT(&tp, NM_ATT_BS11_BTS_STATE) &&
- TLVP_LEN(&tp, NM_ATT_BS11_BTS_STATE) >= 1)
- rc = handle_state_resp(*TLVP_VAL(&tp, NM_ATT_BS11_BTS_STATE));
- break;
- case NM_MT_GET_ATTR_RESP:
- printf("\n%sATTRIBUTES:\n", obj_name(foh));
- abis_nm_tlv_parse(&tp, g_bts, foh->data, oh->length-sizeof(*foh));
- rc = print_attr(&tp);
- //osmo_hexdump(foh->data, oh->length-sizeof(*foh));
- break;
- case NM_MT_BS11_SET_ATTR_ACK:
- printf("SET ATTRIBUTE ObjClass=0x%02x ObjInst=(%d,%d,%d) ACK\n",
- foh->obj_class, foh->obj_inst.bts_nr,
- foh->obj_inst.trx_nr, foh->obj_inst.ts_nr);
- rc = 0;
- break;
- case NM_MT_BS11_SET_ATTR_NACK:
- printf("SET ATTRIBUTE ObjClass=0x%02x ObjInst=(%d,%d,%d) NACK\n",
- foh->obj_class, foh->obj_inst.bts_nr,
- foh->obj_inst.trx_nr, foh->obj_inst.ts_nr);
- break;
- case NM_MT_GET_ATTR_NACK:
- printf("\n%sGET ATTR NACK\n", obj_name(foh));
- break;
- case NM_MT_BS11_CREATE_OBJ_ACK:
- printf("\n%sCREATE OBJECT ACK\n", obj_name(foh));
- break;
- case NM_MT_BS11_CREATE_OBJ_NACK:
- printf("\n%sCREATE OBJECT NACK\n", obj_name(foh));
- break;
- case NM_MT_BS11_DELETE_OBJ_ACK:
- printf("\n%sDELETE OBJECT ACK\n", obj_name(foh));
- break;
- case NM_MT_BS11_DELETE_OBJ_NACK:
- printf("\n%sDELETE OBJECT NACK\n", obj_name(foh));
- break;
- default:
- rc = abis_nm_rcvmsg(rx_msg);
- }
- if (rc < 0) {
- perror("ERROR in main loop");
- //break;
- }
- /* flush the queue of pending messages to be sent. */
- abis_nm_queue_send_next(link->trx->bts);
- if (rc == 1)
- return rc;
-
- switch (bs11cfg_state) {
- case STATE_NONE:
- abis_nm_bs11_factory_logon(g_bts, 1);
- break;
- case STATE_LOGON_ACK:
- osmo_timer_schedule(&status_timer, 5, 0);
- break;
- default:
- break;
- }
-
- return rc;
-}
-
-void status_timer_cb(void *data)
-{
- abis_nm_bs11_get_state(g_bts);
-}
-
-static void print_banner(void)
-{
- printf("bs11_config (C) 2009-2010 by Harald Welte and Dieter Spaar\n");
- printf("This is FREE SOFTWARE with ABSOLUTELY NO WARRANTY\n\n");
-}
-
-static void print_help(void)
-{
- printf("bs11_config [options] [command]\n");
- printf("\nSupported options:\n");
- printf("\t-h --help\t\t\tPrint this help text\n");
- printf("\t-p --port </dev/ttyXXX>\t\tSpecify serial port\n");
- printf("\t-s --software <file>\t\tSpecify Software file\n");
- printf("\t-S --safety <file>\t\tSpecify Safety Load file\n");
- printf("\t-d --delay <ms>\t\t\tSpecify delay in milliseconds\n");
- printf("\t-D --disconnect\t\t\tDisconnect BTS from BSC\n");
- printf("\t-w --win-size <num>\t\tSpecify Window Size\n");
- printf("\t-f --forced\t\t\tForce Software Load\n");
- printf("\nSupported commands:\n");
- printf("\tquery\t\t\tQuery the BS-11 about serial number and configuration\n");
- printf("\tdisconnect\t\tDisconnect A-bis link (go into administrative state)\n");
- printf("\tresconnect\t\tReconnect A-bis link (go into normal state)\n");
- printf("\trestart\t\t\tRestart the BTS\n");
- printf("\tsoftware\t\tDownload Software (only in administrative state)\n");
- printf("\tcreate-trx1\t\tCreate objects for TRX1 (Danger: Your BS-11 might overheat)\n");
- printf("\tdelete-trx1\t\tDelete objects for TRX1\n");
- printf("\tpll-e1-locked\t\tSet the PLL to be locked to E1 clock\n");
- printf("\tpll-standalone\t\tSet the PLL to be in standalone mode\n");
- printf("\tpll-setvalue <value>\tSet the PLL set value\n");
- printf("\tpll-workvalue <value>\tSet the PLL work value\n");
- printf("\toml-tei\t\t\tSet OML E1 TS and TEI\n");
- printf("\tbport0-star\t\tSet BPORT0 line config to star\n");
- printf("\tbport0-multidrop\tSet BPORT0 line config to multidrop\n");
- printf("\tbport1-multidrop\tSet BPORT1 line config to multidrop\n");
- printf("\tcreate-bport1\t\tCreate BPORT1 object\n");
- printf("\tdelete-bport1\t\tDelete BPORT1 object\n");
-}
-
-static void handle_options(int argc, char **argv)
-{
- int option_index = 0;
- print_banner();
-
- while (1) {
- int c;
- static struct option long_options[] = {
- { "help", 0, 0, 'h' },
- { "port", 1, 0, 'p' },
- { "software", 1, 0, 's' },
- { "safety", 1, 0, 'S' },
- { "delay", 1, 0, 'd' },
- { "disconnect", 0, 0, 'D' },
- { "win-size", 1, 0, 'w' },
- { "forced", 0, 0, 'f' },
- { "restart", 0, 0, 'r' },
- { "debug", 1, 0, 'b'},
- };
-
- c = getopt_long(argc, argv, "hp:s:S:td:Dw:fra:",
- long_options, &option_index);
-
- if (c == -1)
- break;
-
- switch (c) {
- case 'h':
- print_help();
- exit(0);
- case 'p':
- serial_port = optarg;
- break;
- case 'b':
- log_parse_category_mask(osmo_stderr_target, optarg);
- break;
- case 's':
- fname_software = optarg;
- break;
- case 'S':
- fname_safety = optarg;
- break;
- case 'd':
- delay_ms = atoi(optarg);
- break;
- case 'w':
- win_size = atoi(optarg);
- break;
- case 'D':
- param_disconnect = 1;
- break;
- case 'f':
- param_forced = 1;
- break;
- case 'r':
- param_disconnect = 1;
- param_restart = 1;
- break;
- default:
- break;
- }
- }
- if (optind < argc) {
- command = argv[optind];
- if (optind+1 < argc)
- value = argv[optind+1];
- }
-
-}
-
-static int num_sigint;
-
-static void signal_handler(int signal)
-{
- fprintf(stdout, "\nsignal %u received\n", signal);
-
- switch (signal) {
- case SIGINT:
- num_sigint++;
- abis_nm_bs11_factory_logon(g_bts, 0);
- if (num_sigint >= 3)
- exit(0);
- break;
- }
-}
-
-static int bs11cfg_sign_link(struct msgb *msg)
-{
- msg->dst = oml_link;
- return abis_nm_bs11cfg_rcvmsg(msg);
-}
-
-struct e1inp_line_ops bs11cfg_e1inp_line_ops = {
- .sign_link = bs11cfg_sign_link,
-};
-
-extern int bts_model_bs11_init(void);
-int main(int argc, char **argv)
-{
- struct gsm_network *gsmnet;
- struct e1inp_line *line;
-
- tall_bs11cfg_ctx = talloc_named_const(NULL, 0, "bs11-config");
- msgb_talloc_ctx_init(tall_bs11cfg_ctx, 0);
-
- osmo_init_logging(&log_info);
- handle_options(argc, argv);
- bts_model_bs11_init();
-
- gsmnet = bsc_network_init(tall_bs11cfg_ctx, 1, 1, NULL);
- if (!gsmnet) {
- fprintf(stderr, "Unable to allocate gsm network\n");
- exit(1);
- }
- g_bts = gsm_bts_alloc_register(gsmnet, GSM_BTS_TYPE_BS11,
- HARDCODED_BSIC);
-
- /* Override existing OML callback handler to set our own. */
- g_bts->model->oml_rcvmsg = abis_nm_bs11cfg_rcvmsg;
-
- libosmo_abis_init(tall_bs11cfg_ctx);
-
- /* Initialize virtual E1 line over rs232. */
- line = talloc_zero(tall_bs11cfg_ctx, struct e1inp_line);
- if (!line) {
- fprintf(stderr, "Unable to allocate memory for virtual E1 line\n");
- exit(1);
- }
- /* set the serial port. */
- bs11cfg_e1inp_line_ops.cfg.rs232.port = serial_port;
- bs11cfg_e1inp_line_ops.cfg.rs232.delay = delay_ms;
-
- line->driver = e1inp_driver_find("rs232");
- if (!line->driver) {
- fprintf(stderr, "cannot find `rs232' driver, giving up.\n");
- exit(1);
- }
- e1inp_line_bind_ops(line, &bs11cfg_e1inp_line_ops);
-
- /* configure and create signalling link for OML. */
- e1inp_ts_config_sign(&line->ts[0], line);
- g_bts->oml_link = oml_link =
- e1inp_sign_link_create(&line->ts[0], E1INP_SIGN_OML,
- g_bts->c0, TEI_OML, 0);
-
- e1inp_line_update(line);
-
- signal(SIGINT, &signal_handler);
-
- abis_nm_bs11_factory_logon(g_bts, 1);
- //abis_nm_bs11_get_serno(g_bts);
-
- osmo_timer_setup(&status_timer, status_timer_cb, NULL);
-
- while (1) {
- if (osmo_select_main(0) < 0)
- break;
- }
-
- abis_nm_bs11_factory_logon(g_bts, 0);
-
- exit(0);
-}
diff --git a/src/utils/isdnsync.c b/src/utils/isdnsync.c
deleted file mode 100644
index cc8ff6723..000000000
--- a/src/utils/isdnsync.c
+++ /dev/null
@@ -1,189 +0,0 @@
-/* isdnsync.c
- *
- * Author Andreas Eversberg <jolly@eversberg.eu>
- *
- * 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/>.
- *
- */
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-#include <sys/ioctl.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <errno.h>
-#include <sys/socket.h>
-#include "mISDNif.h"
-#define MISDN_OLD_AF_COMPATIBILITY
-#define AF_COMPATIBILITY_FUNC
-#include "compat_af_isdn.h"
-
-int card = 0;
-int sock = -1;
-
-int mISDN_open(void)
-{
- int fd, ret;
- struct mISDN_devinfo devinfo;
- struct sockaddr_mISDN l2addr;
-
- fd = socket(PF_ISDN, SOCK_RAW, ISDN_P_BASE);
- if (fd < 0) {
- fprintf(stderr, "could not open socket (%s)\n", strerror(errno));
- return fd;
- }
- devinfo.id = card;
- ret = ioctl(fd, IMGETDEVINFO, &devinfo);
- if (ret < 0) {
- fprintf(stderr,"could not send IOCTL IMGETCOUNT (%s)\n", strerror(errno));
- close(fd);
- return ret;
- }
- close(fd);
- if (!(devinfo.Dprotocols & (1 << ISDN_P_TE_S0))
- && !(devinfo.Dprotocols & (1 << ISDN_P_TE_E1))) {
- fprintf(stderr,"Interface does not support TE mode (%s)\n", strerror(errno));
- return ret;
- }
- fd = socket(PF_ISDN, SOCK_DGRAM, ISDN_P_LAPD_TE);
- if (fd < 0) {
- fprintf(stderr,"could not open ISDN_P_LAPD_TE socket (%s)\n", strerror(errno));
- return fd;
- }
- l2addr.family = AF_ISDN;
- l2addr.dev = card;
- l2addr.channel = 0;
- l2addr.sapi = 0;
- l2addr.tei = 0;
- ret = bind(fd, (struct sockaddr *)&l2addr, sizeof(l2addr));
- if (ret < 0) {
- fprintf(stderr,"could not bind socket for card %d (%s)\n", card, strerror(errno));
- close(fd);
- return ret;
- }
- sock = fd;
-
- return sock;
-}
-
-
-void mISDN_handle(void)
-{
- int ret;
- fd_set rfd;
- struct timeval tv;
- struct sockaddr_mISDN addr;
- socklen_t alen;
- unsigned char buffer[2048];
- struct mISDNhead *hh = (struct mISDNhead *)buffer;
- int l1 = 0, l2 = 0, tei = 0;
-
- while(1) {
-again:
- FD_ZERO(&rfd);
- FD_SET(sock, &rfd);
- tv.tv_sec = 2;
- tv.tv_usec = 0;
- ret = select(sock+1, &rfd, NULL, NULL, &tv);
- if (ret < 0) {
- if (errno == EINTR)
- continue;
- fprintf(stderr, "%s aborted: %s\n", __FUNCTION__, strerror(errno));
- break;
- }
- if (FD_ISSET(sock, &rfd)) {
- alen = sizeof(addr);
- ret = recvfrom(sock, buffer, sizeof(buffer), 0, (struct sockaddr *) &addr, &alen);
- if (ret < 0) {
- fprintf(stderr, "%s read socket error %s\n", __FUNCTION__, strerror(errno));
- } else if (ret < MISDN_HEADER_LEN) {
- fprintf(stderr, "%s read socket shor frame\n", __FUNCTION__);
- } else {
- switch(hh->prim) {
- case MPH_ACTIVATE_IND:
- case PH_ACTIVATE_IND:
- if (!l1) {
- printf("PH_ACTIVATE\n");
- printf("*** Sync available from interface :-)\n");
- l1 = 1;
- }
- goto again;
- break;
- case MPH_DEACTIVATE_IND:
- case PH_DEACTIVATE_IND:
- if (l1) {
- printf("PH_DEACTIVATE\n");
- printf("*** Lost sync on interface :-(\n");
- l1 = 0;
- }
- goto again;
- break;
- case DL_ESTABLISH_IND:
- case DL_ESTABLISH_CNF:
- printf("DL_ESTABLISH\n");
- l2 = 1;
- goto again;
- break;
- case DL_RELEASE_IND:
- case DL_RELEASE_CNF:
- printf("DL_RELEASE\n");
- l2 = 0;
- goto again;
- break;
- case DL_INFORMATION_IND:
- printf("DL_INFORMATION (tei %d sapi %d)\n", addr.tei, addr.sapi);
- tei = 1;
- break;
- default:
-// printf("prim %x\n", hh->prim);
- goto again;
- }
- }
- }
- if (tei && !l2) {
- hh->prim = DL_ESTABLISH_REQ;
- printf("-> activating layer 2\n");
- sendto(sock, buffer, MISDN_HEADER_LEN, 0, (struct sockaddr *) &addr, alen);
- }
- }
-}
-
-int main(int argc, char *argv[])
-{
- int ret;
-
- if (argc <= 1)
- {
- printf("Usage: %s <card>\n\n", argv[0]);
- printf("Opens given card number in TE-mode PTP and tries to keep layer 2 established.\n");
- printf("This keeps layer 1 activated to retrieve a steady sync signal from network.\n");
- return(0);
- }
-
- card = atoi(argv[1]);
-
- init_af_isdn();
-
- if ((ret = mISDN_open() < 0))
- return(ret);
-
- mISDN_handle();
-
- close(sock);
-
- return 0;
-}
diff --git a/src/utils/meas_db.c b/src/utils/meas_db.c
deleted file mode 100644
index d81efcade..000000000
--- a/src/utils/meas_db.c
+++ /dev/null
@@ -1,330 +0,0 @@
-/* Routines for storing measurement reports in SQLite3 database */
-
-/* (C) 2012 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <stdint.h>
-#include <errno.h>
-#include <string.h>
-
-#include <sqlite3.h>
-
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/gsm/gsm_utils.h>
-#include <openbsc/meas_rep.h>
-
-#include "meas_db.h"
-
-#define INS_MR "INSERT INTO meas_rep (time, imsi, name, scenario, nr, bs_power, ms_timing_offset, fpc, ms_l1_pwr, ms_l1_ta) VALUES (?,?,?,?,?,?,?,?,?,?)"
-#define INS_UD "INSERT INTO meas_rep_unidir (meas_id, rx_lev_full, rx_lev_sub, rx_qual_full, rx_qual_sub, dtx, uplink) VALUES (?,?,?,?,?,?,?)"
-#define UPD_MR "UPDATE meas_rep SET ul_unidir=?, dl_unidir=? WHERE id=?"
-
-struct meas_db_state {
- sqlite3 *db;
- sqlite3_stmt *stmt_ins_ud;
- sqlite3_stmt *stmt_ins_mr;
- sqlite3_stmt *stmt_upd_mr;
-};
-
-/* macros to check for SQLite3 result codes */
-#define _SCK_OK(db, call, exp) \
- do { \
- int rc = call; \
- if (rc != exp) { \
- fprintf(stderr,"SQL Error in line %u: %s\n", \
- __LINE__, sqlite3_errmsg(db)); \
- goto err_io; \
- } \
- } while (0)
-#define SCK_OK(db, call) _SCK_OK(db, call, SQLITE_OK)
-#define SCK_DONE(db, call) _SCK_OK(db, call, SQLITE_DONE)
-
-static int _insert_ud(struct meas_db_state *st, unsigned long meas_id, int dtx,
- int uplink, const struct gsm_meas_rep_unidir *ud)
-{
- unsigned long rowid;
-
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 1, meas_id));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 2,
- rxlev2dbm(ud->full.rx_lev)));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 3,
- rxlev2dbm(ud->sub.rx_lev)));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 4, ud->full.rx_qual));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 5, ud->sub.rx_qual));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 6, dtx));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_ud, 7, uplink));
-
- SCK_DONE(st->db, sqlite3_step(st->stmt_ins_ud));
-
- SCK_OK(st->db, sqlite3_reset(st->stmt_ins_ud));
-
- return sqlite3_last_insert_rowid(st->db);
-err_io:
- exit(1);
-}
-
-/* insert a measurement report into the database */
-int meas_db_insert(struct meas_db_state *st, const char *imsi,
- const char *name, unsigned long timestamp,
- const char *scenario,
- const struct gsm_meas_rep *mr)
-{
- int rc;
- sqlite3_int64 rowid, ul_rowid, dl_rowid;
-
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 1, timestamp));
-
- if (imsi)
- SCK_OK(st->db, sqlite3_bind_text(st->stmt_ins_mr, 2,
- imsi, -1, SQLITE_STATIC));
- else
- SCK_OK(st->db, sqlite3_bind_null(st->stmt_ins_mr, 2));
-
- if (name)
- SCK_OK(st->db, sqlite3_bind_text(st->stmt_ins_mr, 3,
- name, -1, SQLITE_STATIC));
- else
- SCK_OK(st->db, sqlite3_bind_null(st->stmt_ins_mr, 3));
-
- if (scenario)
- SCK_OK(st->db, sqlite3_bind_text(st->stmt_ins_mr, 4,
- scenario, -1, SQLITE_STATIC));
- else
- SCK_OK(st->db, sqlite3_bind_null(st->stmt_ins_mr, 4));
-
-
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 5, mr->nr));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 6, mr->bs_power));
-
- if (mr->flags & MEAS_REP_F_MS_TO)
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 7, mr->ms_timing_offset));
- else
- SCK_OK(st->db, sqlite3_bind_null(st->stmt_ins_mr, 7));
-
- if (mr->flags & MEAS_REP_F_FPC)
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 8, 1));
- else
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 8, 0));
-
- if (mr->flags & MEAS_REP_F_MS_L1) {
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 9,
- mr->ms_l1.pwr));
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_ins_mr, 10,
- mr->ms_l1.ta));
- }
-
- SCK_DONE(st->db, sqlite3_step(st->stmt_ins_mr));
- SCK_OK(st->db, sqlite3_reset(st->stmt_ins_mr));
-
- rowid = sqlite3_last_insert_rowid(st->db);
-
- /* insert uplink measurement */
- ul_rowid = _insert_ud(st, rowid, mr->flags & MEAS_REP_F_UL_DTX,
- 1, &mr->ul);
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_upd_mr, 1, ul_rowid));
-
- /* insert downlink measurement, if present */
- if (mr->flags & MEAS_REP_F_DL_VALID) {
- dl_rowid = _insert_ud(st, rowid, mr->flags & MEAS_REP_F_DL_DTX,
- 0, &mr->dl);
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_upd_mr, 2, dl_rowid));
- } else
- SCK_OK(st->db, sqlite3_bind_null(st->stmt_upd_mr, 2));
-
- /* update meas_rep with the id's of the unidirectional
- * measurements */
- SCK_OK(st->db, sqlite3_bind_int(st->stmt_upd_mr, 3, rowid));
- SCK_DONE(st->db, sqlite3_step(st->stmt_upd_mr));
- SCK_OK(st->db, sqlite3_reset(st->stmt_upd_mr));
-
- return 0;
-
-err_io:
- return -EIO;
-}
-
-int meas_db_begin(struct meas_db_state *st)
-{
- SCK_OK(st->db, sqlite3_exec(st->db, "BEGIN", NULL, NULL, NULL));
-
- return 0;
-
-err_io:
- return -EIO;
-}
-
-int meas_db_commit(struct meas_db_state *st)
-{
- SCK_OK(st->db, sqlite3_exec(st->db, "COMMIT", NULL, NULL, NULL));
-
- return 0;
-
-err_io:
- return -EIO;
-}
-
-static const char *create_stmts[] = {
- "CREATE TABLE IF NOT EXISTS meas_rep ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT,"
- "time TIMESTAMP,"
- "imsi TEXT,"
- "name TEXT,"
- "scenario TEXT,"
- "nr INTEGER,"
- "bs_power INTEGER NOT NULL,"
- "ms_timing_offset INTEGER,"
- "fpc INTEGER NOT NULL DEFAULT 0,"
- "ul_unidir INTEGER REFERENCES meas_rep_unidir(id),"
- "dl_unidir INTEGER REFERENCES meas_rep_unidir(id),"
- "ms_l1_pwr INTEGER,"
- "ms_l1_ta INTEGER"
- ")",
- "CREATE TABLE IF NOT EXISTS meas_rep_unidir ("
- "id INTEGER PRIMARY KEY AUTOINCREMENT,"
- "meas_id INTEGER NOT NULL REFERENCES meas_rep(id),"
- "rx_lev_full INTEGER NOT NULL,"
- "rx_lev_sub INTEGER NOT NULL,"
- "rx_qual_full INTEGER NOT NULL,"
- "rx_qual_sub INTEGER NOT NULL,"
- "dtx BOOLEAN NOT NULL DEFAULT 0,"
- "uplink BOOLEAN NOT NULL"
- ")",
- "CREATE VIEW IF NOT EXISTS path_loss AS "
- "SELECT "
- "meas_rep.id, "
- "datetime(time,'unixepoch') AS timestamp, "
- "imsi, "
- "name, "
- "scenario, "
- "ms_timing_offset, "
- "ms_l1_ta, "
- "fpc, "
- "ms_l1_pwr, "
- "ud_ul.rx_lev_full AS ul_rx_lev_full, "
- "ms_l1_pwr-ud_ul.rx_lev_full AS ul_path_loss_full, "
- "ud_ul.rx_lev_sub ul_rx_lev_sub, "
- "ms_l1_pwr-ud_ul.rx_lev_sub AS ul_path_loss_sub, "
- "ud_ul.rx_qual_full AS ul_rx_qual_full, "
- "ud_ul.rx_qual_sub AS ul_rx_qual_sub, "
- "bs_power, "
- "ud_dl.rx_lev_full AS dl_rx_lev_full, "
- "bs_power-ud_dl.rx_lev_full AS dl_path_loss_full, "
- "ud_dl.rx_lev_sub AS dl_rx_lev_sub, "
- "bs_power-ud_dl.rx_lev_sub AS dl_path_loss_sub, "
- "ud_dl.rx_qual_full AS dl_rx_qual_full, "
- "ud_dl.rx_qual_sub AS dl_rx_qual_sub "
- "FROM "
- "meas_rep, "
- "meas_rep_unidir AS ud_dl, "
- "meas_rep_unidir AS ud_ul "
- "WHERE "
- "ud_ul.id = meas_rep.ul_unidir AND "
- "ud_dl.id = meas_rep.dl_unidir",
- "CREATE VIEW IF NOT EXISTS overview AS "
- "SELECT "
- "id,"
- "timestamp,"
- "imsi,"
- "name,"
- "scenario,"
- "ms_l1_pwr,"
- "ul_rx_lev_full,"
- "ul_path_loss_full,"
- "ul_rx_qual_full,"
- "bs_power,"
- "dl_rx_lev_full,"
- "dl_path_loss_full,"
- "dl_rx_qual_full "
- "FROM path_loss",
-};
-
-static int check_create_tbl(struct meas_db_state *st)
-{
- int i, rc;
-
- for (i = 0; i < ARRAY_SIZE(create_stmts); i++) {
- SCK_OK(st->db, sqlite3_exec(st->db, create_stmts[i],
- NULL, NULL, NULL));
- }
-
- return 0;
-err_io:
- return -EIO;
-}
-
-
-#define PREP_CHK(db, stmt, ptr) \
- do { \
- int rc; \
- rc = sqlite3_prepare_v2(db, stmt, strlen(stmt)+1, \
- ptr, NULL); \
- if (rc != SQLITE_OK) { \
- fprintf(stderr, "Error during prepare of '%s': %s\n", \
- stmt, sqlite3_errmsg(db)); \
- goto err_io; \
- } \
- } while (0)
-
-struct meas_db_state *meas_db_open(void *ctx, const char *fname)
-{
- int rc;
- struct meas_db_state *st = talloc_zero(ctx, struct meas_db_state);
-
- if (!st)
- return NULL;
-
- rc = sqlite3_open_v2(fname, &st->db,
- SQLITE_OPEN_READWRITE|SQLITE_OPEN_CREATE,
- NULL);
- if (rc != SQLITE_OK) {
- fprintf(stderr, "Unable to open DB: %s\n",
- sqlite3_errmsg(st->db));
- goto err_io;
- }
-
- rc = check_create_tbl(st);
-
- PREP_CHK(st->db, INS_MR, &st->stmt_ins_mr);
- PREP_CHK(st->db, INS_UD, &st->stmt_ins_ud);
- PREP_CHK(st->db, UPD_MR, &st->stmt_upd_mr);
-
- return st;
-err_io:
- talloc_free(st);
- return NULL;
-}
-
-void meas_db_close(struct meas_db_state *st)
-{
- if (sqlite3_finalize(st->stmt_ins_mr) != SQLITE_OK)
- fprintf(stderr, "DB insert measurement report finalize error: %s\n",
- sqlite3_errmsg(st->db));
- if (sqlite3_finalize(st->stmt_ins_ud) != SQLITE_OK)
- fprintf(stderr, "DB insert unidir finalize error: %s\n",
- sqlite3_errmsg(st->db));
- if (sqlite3_finalize(st->stmt_upd_mr) != SQLITE_OK)
- fprintf(stderr, "DB update measurement report finalize error: %s\n",
- sqlite3_errmsg(st->db));
- if (sqlite3_close(st->db) != SQLITE_OK)
- fprintf(stderr, "Unable to close DB, abandoning.\n");
-
- talloc_free(st);
-
-}
diff --git a/src/utils/meas_db.h b/src/utils/meas_db.h
deleted file mode 100644
index 889e9022f..000000000
--- a/src/utils/meas_db.h
+++ /dev/null
@@ -1,17 +0,0 @@
-#ifndef OPENBSC_MEAS_DB_H
-#define OPENBSC_MEAS_DB_H
-
-struct meas_db_state;
-
-struct meas_db_state *meas_db_open(void *ctx, const char *fname);
-void meas_db_close(struct meas_db_state *st);
-
-int meas_db_begin(struct meas_db_state *st);
-int meas_db_commit(struct meas_db_state *st);
-
-int meas_db_insert(struct meas_db_state *st, const char *imsi,
- const char *name, unsigned long timestamp,
- const char *scenario,
- const struct gsm_meas_rep *mr);
-
-#endif
diff --git a/src/utils/meas_json.c b/src/utils/meas_json.c
deleted file mode 100644
index 51eb6c74e..000000000
--- a/src/utils/meas_json.c
+++ /dev/null
@@ -1,190 +0,0 @@
-/* Convert measurement report feed into JSON feed printed to stdout.
- * Each measurement report is printed as a separae JSON root entry.
- * All measurement reports are separated by a new line.
- */
-
-/* (C) 2015 by Alexander Chemeris <Alexander.Chemeris@fairwaves.co>
- * With parts of code adopted from different places in OpenBSC.
- *
- * 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/>.
- *
- */
-#include <string.h>
-#include <errno.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <time.h>
-
-#include <netinet/in.h>
-
-#include <osmocom/core/socket.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/select.h>
-
-#include <osmocom/gsm/gsm_utils.h>
-
-#include <openbsc/gsm_data.h>
-#include <openbsc/gsm_data_shared.h>
-#include <openbsc/meas_feed.h>
-
-static void print_meas_rep_uni_json(struct gsm_meas_rep_unidir *mru)
-{
- printf("\"RXL-FULL\":%d, \"RXL-SUB\":%d, ",
- rxlev2dbm(mru->full.rx_lev),
- rxlev2dbm(mru->sub.rx_lev));
- printf("\"RXQ-FULL\":%d, \"RXQ-SUB\":%d",
- mru->full.rx_qual, mru->sub.rx_qual);
-}
-
-static void print_meas_rep_json(struct gsm_meas_rep *mr)
-{
- int i;
-
- printf("\"NR\":%d", mr->nr);
-
- if (mr->flags & MEAS_REP_F_DL_DTX)
- printf(", \"DTXd\":true");
-
- printf(", \"UL_MEAS\":{");
- print_meas_rep_uni_json(&mr->ul);
- printf("}");
- printf(", \"BS_POWER\":%d", mr->bs_power);
- if (mr->flags & MEAS_REP_F_MS_TO)
- printf(", \"MS_TO\":%d", mr->ms_timing_offset);
-
- if (mr->flags & MEAS_REP_F_MS_L1) {
- printf(", \"L1_MS_PWR\":%d", mr->ms_l1.pwr);
- printf(", \"L1_FPC\":%s",
- mr->flags & MEAS_REP_F_FPC ? "true" : "false");
- printf(", \"L1_TA\":%u", mr->ms_l1.ta);
- }
-
- if (mr->flags & MEAS_REP_F_UL_DTX)
- printf(", \"DTXu\":true");
- if (mr->flags & MEAS_REP_F_BA1)
- printf(", \"BA1\":true");
- if (mr->flags & MEAS_REP_F_DL_VALID) {
- printf(", \"DL_MEAS\":{");
- print_meas_rep_uni_json(&mr->dl);
- printf("}");
- }
-
- if (mr->num_cell == 7)
- return;
- printf(", \"NUM_NEIGH\":%u, \"NEIGH\":[", mr->num_cell);
- for (i = 0; i < mr->num_cell; i++) {
- struct gsm_meas_rep_cell *mrc = &mr->cell[i];
- if (i!=0) printf(", ");
- printf("{\"IDX\":%u, \"ARFCN\":%u, \"BSIC\":%u, \"POWER\":%d}",
- mrc->neigh_idx, mrc->arfcn, mrc->bsic, rxlev2dbm(mrc->rxlev));
- }
- printf("]");
-}
-
-static void print_chan_info_json(struct meas_feed_meas *mfm)
-{
- printf("\"lchan_type\":\"%s\", \"pchan_type\":\"%s\", "
- "\"bts_nr\":%d, \"trx_nr\":%d, \"ts_nr\":%d, \"ss_nr\":%d",
- gsm_lchant_name(mfm->lchan_type), gsm_pchan_name(mfm->pchan_type),
- mfm->bts_nr, mfm->trx_nr, mfm->ts_nr, mfm->ss_nr);
-}
-
-static void print_meas_feed_json(struct meas_feed_meas *mfm)
-{
- time_t now = time(NULL);
-
- printf("{");
- printf("\"time\":%ld, \"imsi\":\"%s\", \"name\":\"%s\", \"scenario\":\"%s\", ",
- now, mfm->imsi, mfm->name, mfm->scenario);
-
- switch (mfm->hdr.version) {
- case 1:
- printf("\"chan_info\":{");
- print_chan_info_json(mfm);
- printf("}, ");
- /* no break, fall to version 0 */
- case 0:
- printf("\"meas_rep\":{");
- print_meas_rep_json(&mfm->mr);
- printf("}");
- break;
- }
-
- printf("}\n");
-
-}
-
-static int handle_meas(struct msgb *msg)
-{
- struct meas_feed_meas *mfm = (struct meas_feed_meas *) msgb_data(msg);
-
- print_meas_feed_json(mfm);
-
- return 0;
-}
-
-static int handle_msg(struct msgb *msg)
-{
- struct meas_feed_hdr *mfh = (struct meas_feed_hdr *) msgb_data(msg);
-
- if (mfh->version != MEAS_FEED_VERSION)
- return -EINVAL;
-
- switch (mfh->msg_type) {
- case MEAS_FEED_MEAS:
- handle_meas(msg);
- break;
- default:
- break;
- }
- return 0;
-}
-
-static int udp_fd_cb(struct osmo_fd *ofd, unsigned int what)
-{
- int rc;
-
- if (what & BSC_FD_READ) {
- struct msgb *msg = msgb_alloc(1024, "UDP Rx");
-
- rc = read(ofd->fd, msgb_data(msg), msgb_tailroom(msg));
- if (rc < 0)
- return rc;
- msgb_put(msg, rc);
- handle_msg(msg);
- msgb_free(msg);
- }
-
- return 0;
-}
-
-int main(int argc, char **argv)
-{
- int rc;
- struct osmo_fd udp_ofd;
-
- udp_ofd.cb = udp_fd_cb;
- rc = osmo_sock_init_ofd(&udp_ofd, AF_INET, SOCK_DGRAM, IPPROTO_UDP, NULL, 8888, OSMO_SOCK_F_BIND);
- if (rc < 0)
- exit(1);
-
- while (1) {
- osmo_select_main(0);
- };
-
- exit(0);
-}
diff --git a/src/utils/meas_pcap2db.c b/src/utils/meas_pcap2db.c
deleted file mode 100644
index b874ac403..000000000
--- a/src/utils/meas_pcap2db.c
+++ /dev/null
@@ -1,138 +0,0 @@
-/* read PCAP file with meas_feed data and write it to sqlite3 database */
-
-/* (C) 2012 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <string.h>
-#include <errno.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-
-#include <netinet/in.h>
-#include <netinet/ip.h>
-#include <netinet/udp.h>
-
-#include <osmocom/core/socket.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/gsm/gsm_utils.h>
-
-#include <openbsc/meas_feed.h>
-
-#include <pcap/pcap.h>
-
-#include "meas_db.h"
-
-static struct meas_db_state *db;
-
-static void handle_mfm(const struct pcap_pkthdr *h,
- const struct meas_feed_meas *mfm)
-{
- const char *scenario;
-
- if (strlen(mfm->scenario))
- scenario = mfm->scenario;
- else
- scenario = NULL;
-
- meas_db_insert(db, mfm->imsi, mfm->name, h->ts.tv_sec,
- scenario, &mfm->mr);
-}
-
-static void pcap_cb(u_char *user, const struct pcap_pkthdr *h,
- const u_char *bytes)
-{
- const char *cur = bytes;
- const struct iphdr *ip;
- const struct udphdr *udp;
- const struct meas_feed_meas *mfm;
- uint16_t udplen;
-
- if (h->caplen < 14+20+8)
- return;
-
- /* Check if there is IPv4 in the Ethernet */
- if (cur[12] != 0x08 || cur[13] != 0x00)
- return;
-
- cur += 14; /* ethernet header */
- ip = (struct iphdr *) cur;
-
- if (ip->version != 4)
- return;
- cur += ip->ihl * 4;
-
- if (ip->protocol != IPPROTO_UDP)
- return;
-
- udp = (struct udphdr *) cur;
-
- if (udp->dest != htons(8888))
- return;
-
- udplen = ntohs(udp->len);
- if (udplen != sizeof(*udp) + sizeof(*mfm))
- return;
- cur += sizeof(*udp);
-
- mfm = (const struct meas_feed_meas *) cur;
-
- handle_mfm(h, mfm);
-}
-
-int main(int argc, char **argv)
-{
- char errbuf[PCAP_ERRBUF_SIZE+1];
- char *pcap_fname, *db_fname;
- pcap_t *pc;
- int rc;
-
- if (argc < 3) {
- fprintf(stderr, "You need to specify PCAP and database file\n");
- exit(2);
- }
-
- pcap_fname = argv[1];
- db_fname = argv[2];
-
- pc = pcap_open_offline(pcap_fname, errbuf);
- if (!pc) {
- fprintf(stderr, "Cannot open %s: %s\n", pcap_fname, errbuf);
- exit(1);
- }
-
- db = meas_db_open(NULL, db_fname);
- if (!db)
- exit(0);
-
- rc = meas_db_begin(db);
- if (rc < 0) {
- fprintf(stderr, "Error during BEGIN\n");
- exit(1);
- }
-
- pcap_loop(pc, 0 , pcap_cb, NULL);
-
- meas_db_commit(db);
-
- exit(0);
-}
diff --git a/src/utils/meas_udp2db.c b/src/utils/meas_udp2db.c
deleted file mode 100644
index 5032d0c3e..000000000
--- a/src/utils/meas_udp2db.c
+++ /dev/null
@@ -1,126 +0,0 @@
-/* liesten to meas_feed on UDP and write it to sqlite3 database */
-
-/* (C) 2012 by Harald Welte <laforge@gnumonks.org>
- *
- * 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/>.
- *
- */
-
-#include <string.h>
-#include <errno.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <time.h>
-
-#include <netinet/in.h>
-
-#include <osmocom/core/socket.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/gsm/gsm_utils.h>
-
-#include <openbsc/meas_feed.h>
-
-#include "meas_db.h"
-
-static struct osmo_fd udp_ofd;
-static struct meas_db_state *db;
-
-static int handle_msg(struct msgb *msg)
-{
- struct meas_feed_hdr *mfh = (struct meas_feed_hdr *) msgb_data(msg);
- struct meas_feed_meas *mfm = (struct meas_feed_meas *) msgb_data(msg);
- const char *scenario;
- time_t now = time(NULL);
-
- if (mfh->version != MEAS_FEED_VERSION)
- return -EINVAL;
-
- if (mfh->msg_type != MEAS_FEED_MEAS)
- return -EINVAL;
-
- if (strlen(mfm->scenario))
- scenario = mfm->scenario;
- else
- scenario = NULL;
-
- meas_db_insert(db, mfm->imsi, mfm->name, now,
- scenario, &mfm->mr);
-
- return 0;
-}
-
-static int udp_fd_cb(struct osmo_fd *ofd, unsigned int what)
-{
- int rc;
-
- if (what & BSC_FD_READ) {
- struct msgb *msg = msgb_alloc(1024, "UDP Rx");
-
- rc = read(ofd->fd, msgb_data(msg), msgb_tailroom(msg));
- if (rc < 0)
- return rc;
- msgb_put(msg, rc);
- handle_msg(msg);
- msgb_free(msg);
- }
-
- return 0;
-}
-
-int main(int argc, char **argv)
-{
- char *db_fname;
- int rc;
-
- msgb_talloc_ctx_init(NULL, 0);
-
- if (argc < 2) {
- fprintf(stderr, "You have to specify the database file name\n");
- exit(2);
- }
-
- db_fname = argv[1];
-
- udp_ofd.cb = udp_fd_cb;
- rc = osmo_sock_init_ofd(&udp_ofd, AF_INET, SOCK_DGRAM,
- IPPROTO_UDP, NULL, 8888, OSMO_SOCK_F_BIND);
- if (rc < 0) {
- fprintf(stderr, "Unable to create UDP listen socket\n");
- exit(1);
- }
-
- db = meas_db_open(NULL, db_fname);
- if (!db) {
- fprintf(stderr, "Unable to open database\n");
- exit(1);
- }
-
- /* FIXME: timer-based BEGIN/COMMIT */
-
- while (1) {
- osmo_select_main(0);
- };
-
- meas_db_close(db);
-
- exit(0);
-}
-
diff --git a/src/utils/meas_vis.c b/src/utils/meas_vis.c
deleted file mode 100644
index 77194ded4..000000000
--- a/src/utils/meas_vis.c
+++ /dev/null
@@ -1,310 +0,0 @@
-#include <string.h>
-#include <errno.h>
-#include <unistd.h>
-#include <stdlib.h>
-#include <stdio.h>
-
-#include <netinet/in.h>
-
-#include <cdk/cdk.h>
-
-#include <osmocom/core/socket.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/talloc.h>
-
-#include <osmocom/gsm/gsm_utils.h>
-
-#include <openbsc/meas_feed.h>
-
-struct ms_state_uni {
- CDKSLIDER *cdk;
- CDKLABEL *cdk_label;
-
- time_t last_update;
- char label[32];
- char *_lbl[1];
-};
-
-
-struct ms_state {
- struct llist_head list;
-
- char name[31+1];
- char imsi[15+1];
- struct gsm_meas_rep mr;
-
- struct ms_state_uni ul;
- struct ms_state_uni dl;
-};
-
-struct state {
- struct osmo_fd udp_ofd;
- struct llist_head ms_list;
-
- CDKSCREEN *cdkscreen;
- WINDOW *curses_win;
-
- CDKLABEL *cdk_title;
- char *title;
-
- CDKLABEL *cdk_header;
- char header[256];
-};
-
-static struct state g_st;
-
-struct ms_state *find_ms(const char *imsi)
-{
- struct ms_state *ms;
-
- llist_for_each_entry(ms, &g_st.ms_list, list) {
- if (!strcmp(ms->imsi, imsi))
- return ms;
- }
- return NULL;
-}
-
-static struct ms_state *find_alloc_ms(const char *imsi)
-{
- struct ms_state *ms;
-
- ms = find_ms(imsi);
- if (!ms) {
- ms = talloc_zero(NULL, struct ms_state);
- osmo_strlcpy(ms->imsi, imsi, sizeof(ms->imsi));
- ms->ul._lbl[0] = ms->ul.label;
- ms->dl._lbl[0] = ms->dl.label;
- llist_add_tail(&ms->list, &g_st.ms_list);
- }
-
- return ms;
-}
-
-static int handle_meas(struct msgb *msg)
-{
- struct meas_feed_meas *mfm = (struct meas_feed_meas *) msgb_data(msg);
- struct ms_state *ms = find_alloc_ms(mfm->imsi);
- time_t now = time(NULL);
-
- osmo_strlcpy(ms->name, mfm->name, sizeof(ms->name));
- memcpy(&ms->mr, &mfm->mr, sizeof(ms->mr));
- ms->ul.last_update = now;
- if (ms->mr.flags & MEAS_REP_F_DL_VALID)
- ms->dl.last_update = now;
-
- /* move to head of list */
- llist_del(&ms->list);
- llist_add(&ms->list, &g_st.ms_list);
-
- return 0;
-}
-
-static int handle_msg(struct msgb *msg)
-{
- struct meas_feed_hdr *mfh = (struct meas_feed_hdr *) msgb_data(msg);
-
- if (mfh->version != MEAS_FEED_VERSION)
- return -EINVAL;
-
- switch (mfh->msg_type) {
- case MEAS_FEED_MEAS:
- handle_meas(msg);
- break;
- default:
- break;
- }
-
- return 0;
-}
-
-static int udp_fd_cb(struct osmo_fd *ofd, unsigned int what)
-{
- int rc;
-
- if (what & BSC_FD_READ) {
- struct msgb *msg = msgb_alloc(1024, "UDP Rx");
-
- rc = read(ofd->fd, msgb_data(msg), msgb_tailroom(msg));
- if (rc < 0)
- return rc;
- msgb_put(msg, rc);
- handle_msg(msg);
- msgb_free(msg);
- }
-
- return 0;
-}
-
-
-static void destroy_dir(struct ms_state_uni *uni)
-{
- if (uni->cdk) {
- destroyCDKSlider(uni->cdk);
- uni->cdk = NULL;
- }
- if (uni->cdk_label) {
- destroyCDKLabel(uni->cdk_label);
- uni->cdk_label = NULL;
- }
-}
-
-#define DIR_UL 0
-#define DIR_DL 1
-static const char *dir_str[2] = {
- [DIR_UL] = "UL",
- [DIR_DL] = "DL",
-};
-
-static int colpair_by_qual(uint8_t rx_qual)
-{
- if (rx_qual == 0)
- return 24;
- else if (rx_qual <= 4)
- return 32;
- else
- return 16;
-}
-
-static int colpair_by_lev(int rx_lev)
-{
- if (rx_lev < -95)
- return 16;
- else if (rx_lev < -80)
- return 32;
- else
- return 24;
-}
-
-
-void write_uni(struct ms_state *ms, struct ms_state_uni *msu,
- struct gsm_rx_lev_qual *lq, int dir, int row)
-{
-
- char label[128];
- time_t now = time(NULL);
- int qual_col = colpair_by_qual(lq->rx_qual);
- int lev_col = colpair_by_lev(rxlev2dbm(lq->rx_lev));
- int color, pwr;
-
- if (dir == DIR_UL) {
- pwr = ms->mr.ms_l1.pwr;
- } else {
- pwr = ms->mr.bs_power;
- }
-
- color = A_REVERSE | COLOR_PAIR(lev_col) | ' ';
- snprintf(label, sizeof(label), "%s %s ", ms->imsi, dir_str[dir]);
- msu->cdk = newCDKSlider(g_st.cdkscreen, 0, row, NULL, label, color,
- COLS-40, rxlev2dbm(lq->rx_lev), -110, -47,
- 1, 2, FALSE, FALSE);
- //IsVisibleObj(ms->ul.cdk) = FALSE;
- snprintf(msu->label, sizeof(msu->label), "</%d>%1d<!%d> %3d %2u %2d %4u",
- qual_col, lq->rx_qual, qual_col, pwr,
- ms->mr.ms_l1.ta, ms->mr.ms_timing_offset,
- now - msu->last_update);
- msu->cdk_label = newCDKLabel(g_st.cdkscreen, RIGHT, row,
- msu->_lbl, 1, FALSE, FALSE);
-}
-
-static void update_sliders(void)
-{
- int num_vis_sliders = 0;
- struct ms_state *ms;
-#define HEADER_LINES 2
-
- /* remove all sliders */
- llist_for_each_entry(ms, &g_st.ms_list, list) {
- destroy_dir(&ms->ul);
- destroy_dir(&ms->dl);
-
- }
-
- llist_for_each_entry(ms, &g_st.ms_list, list) {
- struct gsm_rx_lev_qual *lq;
- unsigned int row = HEADER_LINES + num_vis_sliders*3;
-
- if (ms->mr.flags & MEAS_REP_F_UL_DTX)
- lq = &ms->mr.ul.sub;
- else
- lq = &ms->mr.ul.full;
- write_uni(ms, &ms->ul, lq, DIR_UL, row);
-
- if (ms->mr.flags & MEAS_REP_F_DL_DTX)
- lq = &ms->mr.dl.sub;
- else
- lq = &ms->mr.dl.full;
- write_uni(ms, &ms->dl, lq, DIR_DL, row+1);
-
- num_vis_sliders++;
- if (num_vis_sliders >= LINES/3)
- break;
- }
-
- refreshCDKScreen(g_st.cdkscreen);
-
-}
-
-const struct value_string col_strs[] = {
- { COLOR_WHITE, "white" },
- { COLOR_RED, "red" },
- { COLOR_GREEN, "green" },
- { COLOR_YELLOW, "yellow" },
- { COLOR_BLUE, "blue" },
- { COLOR_MAGENTA,"magenta" },
- { COLOR_CYAN, "cyan" },
- { COLOR_BLACK, "black" },
- { 0, NULL }
-};
-
-int main(int argc, char **argv)
-{
- int rc;
- char *header[1];
- char *title[1];
-
- msgb_talloc_ctx_init(NULL, 0);
-
- printf("sizeof(gsm_meas_rep)=%u\n", sizeof(struct gsm_meas_rep));
- printf("sizeof(meas_feed_meas)=%u\n", sizeof(struct meas_feed_meas));
-
- INIT_LLIST_HEAD(&g_st.ms_list);
- g_st.curses_win = initscr();
- g_st.cdkscreen = initCDKScreen(g_st.curses_win);
- initCDKColor();
-
- g_st.title = "OpenBSC link quality monitor";
- title[0] = g_st.title;
- g_st.cdk_title = newCDKLabel(g_st.cdkscreen, CENTER, 0, title, 1, FALSE, FALSE);
-
- snprintf(g_st.header, sizeof(g_st.header), "Q Pwr TA TO Time");
- header[0] = g_st.header;
- g_st.cdk_header = newCDKLabel(g_st.cdkscreen, RIGHT, 1, header, 1, FALSE, FALSE);
-
-#if 0
- int i;
- for (i = 0; i < 64; i++) {
- short f, b;
- pair_content(i, &f, &b);
- attron(COLOR_PAIR(i));
- printw("%u: %u (%s) ", i, f, get_value_string(col_strs, f));
- printw("%u (%s)\n\r", b, get_value_string(col_strs, b));
- }
- refresh();
- getch();
- exit(0);
-#endif
-
- g_st.udp_ofd.cb = udp_fd_cb;
- rc = osmo_sock_init_ofd(&g_st.udp_ofd, AF_INET, SOCK_DGRAM, IPPROTO_UDP, NULL, 8888, OSMO_SOCK_F_BIND);
- if (rc < 0)
- exit(1);
-
- while (1) {
- osmo_select_main(0);
- update_sliders();
- };
-
- exit(0);
-}
diff --git a/src/utils/smpp_mirror.c b/src/utils/smpp_mirror.c
deleted file mode 100644
index c5705059b..000000000
--- a/src/utils/smpp_mirror.c
+++ /dev/null
@@ -1,359 +0,0 @@
-#include <stdio.h>
-#include <unistd.h>
-#include <stdint.h>
-#include <errno.h>
-#include <string.h>
-
-#include <netinet/in.h>
-
-#include <smpp34.h>
-#include <smpp34_structs.h>
-#include <smpp34_params.h>
-
-#include <osmocom/core/application.h>
-#include <osmocom/core/utils.h>
-#include <osmocom/core/msgb.h>
-#include <osmocom/core/talloc.h>
-#include <osmocom/core/select.h>
-#include <osmocom/core/socket.h>
-#include <osmocom/core/write_queue.h>
-
-#include <openbsc/debug.h>
-
-/* FIXME: merge with smpp_smsc.c */
-#define SMPP_SYS_ID_LEN 16
-enum esme_read_state {
- READ_ST_IN_LEN = 0,
- READ_ST_IN_MSG = 1,
-};
-/* FIXME: merge with smpp_smsc.c */
-
-struct esme {
- struct osmo_fd ofd;
-
- uint32_t own_seq_nr;
-
- struct osmo_wqueue wqueue;
- enum esme_read_state read_state;
- uint32_t read_len;
- uint32_t read_idx;
- struct msgb *read_msg;
-
- uint8_t smpp_version;
- char system_id[SMPP_SYS_ID_LEN+1];
- char password[SMPP_SYS_ID_LEN+1];
-};
-
-/* FIXME: merge with smpp_smsc.c */
-#define SMPP34_UNPACK(rc, type, str, data, len) \
- memset(str, 0, sizeof(*str)); \
- rc = smpp34_unpack(type, str, data, len)
-#define INIT_RESP(type, resp, req) { \
- memset((resp), 0, sizeof(*(resp))); \
- (resp)->command_length = 0; \
- (resp)->command_id = type; \
- (resp)->command_status = ESME_ROK; \
- (resp)->sequence_number = (req)->sequence_number; \
-}
-#define PACK_AND_SEND(esme, ptr) pack_and_send(esme, (ptr)->command_id, ptr)
-static inline uint32_t smpp_msgb_cmdid(struct msgb *msg)
-{
- uint8_t *tmp = msgb_data(msg) + 4;
- return ntohl(*(uint32_t *)tmp);
-}
-static uint32_t esme_inc_seq_nr(struct esme *esme)
-{
- esme->own_seq_nr++;
- if (esme->own_seq_nr > 0x7fffffff)
- esme->own_seq_nr = 1;
-
- return esme->own_seq_nr;
-}
-static int pack_and_send(struct esme *esme, uint32_t type, void *ptr)
-{
- struct msgb *msg = msgb_alloc(4096, "SMPP_Tx");
- int rc, rlen;
- if (!msg)
- return -ENOMEM;
-
- rc = smpp34_pack(type, msg->tail, msgb_tailroom(msg), &rlen, ptr);
- if (rc != 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Error during smpp34_pack(): %s\n",
- esme->system_id, smpp34_strerror);
- msgb_free(msg);
- return -EINVAL;
- }
- msgb_put(msg, rlen);
-
- if (osmo_wqueue_enqueue(&esme->wqueue, msg) != 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Write queue full. Dropping message\n",
- esme->system_id);
- msgb_free(msg);
- return -EAGAIN;
- }
- return 0;
-}
-/* FIXME: merge with smpp_smsc.c */
-
-static struct tlv_t *find_tlv(struct tlv_t *head, uint16_t tag)
-{
- struct tlv_t *t;
-
- for (t = head; t != NULL; t = t->next) {
- if (t->tag == tag)
- return t;
- }
- return NULL;
-}
-
-static int smpp_handle_deliver(struct esme *esme, struct msgb *msg)
-{
- struct deliver_sm_t deliver;
- struct deliver_sm_resp_t deliver_r;
- struct submit_sm_t submit;
- tlv_t *t;
- int rc;
-
- memset(&deliver, 0, sizeof(deliver));
- SMPP34_UNPACK(rc, DELIVER_SM, &deliver, msgb_data(msg), msgb_length(msg));
- if (rc < 0)
- return rc;
-
- INIT_RESP(DELIVER_SM_RESP, &deliver_r, &deliver);
-
- PACK_AND_SEND(esme, &deliver_r);
-
- memset(&submit, 0, sizeof(submit));
- submit.command_id = SUBMIT_SM;
- submit.command_status = ESME_ROK;
- submit.sequence_number = esme_inc_seq_nr(esme);
-
- submit.dest_addr_ton = deliver.source_addr_ton;
- submit.dest_addr_npi = deliver.source_addr_npi;
- memcpy(submit.destination_addr, deliver.source_addr,
- OSMO_MIN(sizeof(submit.destination_addr),
- sizeof(deliver.source_addr)));
-
- submit.source_addr_ton = deliver.dest_addr_ton;
- submit.source_addr_npi = deliver.dest_addr_npi;
- memcpy(submit.source_addr, deliver.destination_addr,
- OSMO_MIN(sizeof(submit.source_addr),
- sizeof(deliver.destination_addr)));
-
- /* Mirror delivery receipts as a delivery acknowledgements. */
- if (deliver.esm_class == 0x04) {
- LOGP(DSMPP, LOGL_DEBUG, "%s\n", deliver.short_message);
- submit.esm_class = 0x08;
- } else {
- submit.esm_class = deliver.esm_class;
- }
-
- submit.registered_delivery = deliver.registered_delivery;
- submit.protocol_id = deliver.protocol_id;
- submit.priority_flag = deliver.priority_flag;
- memcpy(submit.schedule_delivery_time, deliver.schedule_delivery_time,
- OSMO_MIN(sizeof(submit.schedule_delivery_time),
- sizeof(deliver.schedule_delivery_time)));
- memcpy(submit.validity_period, deliver.validity_period,
- OSMO_MIN(sizeof(submit.validity_period),
- sizeof(deliver.validity_period)));
- submit.registered_delivery = deliver.registered_delivery;
- submit.replace_if_present_flag = deliver.replace_if_present_flag;
- submit.data_coding = deliver.data_coding;
- submit.sm_default_msg_id = deliver.sm_default_msg_id;
- submit.sm_length = deliver.sm_length;
- memcpy(submit.short_message, deliver.short_message,
- OSMO_MIN(sizeof(submit.short_message),
- sizeof(deliver.short_message)));
-
- /* FIXME: More TLV? */
- t = find_tlv(deliver.tlv, TLVID_user_message_reference);
- if (t) {
- tlv_t tlv;
-
- memset(&tlv, 0, sizeof(tlv));
- tlv.tag = TLVID_user_message_reference;
- tlv.length = 2;
- tlv.value.val16 = t->value.val16;
- build_tlv(&submit.tlv, &tlv);
- }
-
- return PACK_AND_SEND(esme, &submit);
-}
-
-static int bind_transceiver(struct esme *esme)
-{
- struct bind_transceiver_t bind;
-
- memset(&bind, 0, sizeof(bind));
- bind.command_id = BIND_TRANSCEIVER;
- bind.sequence_number = esme_inc_seq_nr(esme);
- snprintf((char *)bind.system_id, sizeof(bind.system_id), "%s", esme->system_id);
- snprintf((char *)bind.password, sizeof(bind.password), "%s", esme->password);
- snprintf((char *)bind.system_type, sizeof(bind.system_type), "mirror");
- bind.interface_version = esme->smpp_version;
-
- return PACK_AND_SEND(esme, &bind);
-}
-
-static int smpp_pdu_rx(struct esme *esme, struct msgb *msg)
-{
- uint32_t cmd_id = smpp_msgb_cmdid(msg);
- int rc;
-
- switch (cmd_id) {
- case DELIVER_SM:
- rc = smpp_handle_deliver(esme, msg);
- break;
- default:
- LOGP(DSMPP, LOGL_NOTICE, "unhandled case %d\n", cmd_id);
- rc = 0;
- break;
- }
-
- return rc;
-}
-
-/* FIXME: merge with smpp_smsc.c */
-static int esme_read_cb(struct osmo_fd *ofd)
-{
- struct esme *esme = ofd->data;
- uint32_t len;
- uint8_t *lenptr = (uint8_t *) &len;
- uint8_t *cur;
- struct msgb *msg;
- int rdlen;
- int rc;
-
- switch (esme->read_state) {
- case READ_ST_IN_LEN:
- rdlen = sizeof(uint32_t) - esme->read_idx;
- rc = read(ofd->fd, lenptr + esme->read_idx, rdlen);
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] read returned %d\n",
- esme->system_id, rc);
- } else if (rc == 0) {
- goto dead_socket;
- } else
- esme->read_idx += rc;
- if (esme->read_idx >= sizeof(uint32_t)) {
- esme->read_len = ntohl(len);
- msg = msgb_alloc(esme->read_len, "SMPP Rx");
- if (!msg)
- return -ENOMEM;
- esme->read_msg = msg;
- cur = msgb_put(msg, sizeof(uint32_t));
- memcpy(cur, lenptr, sizeof(uint32_t));
- esme->read_state = READ_ST_IN_MSG;
- esme->read_idx = sizeof(uint32_t);
- }
- break;
- case READ_ST_IN_MSG:
- msg = esme->read_msg;
- rdlen = esme->read_len - esme->read_idx;
- rc = read(ofd->fd, msg->tail, OSMO_MIN(rdlen, msgb_tailroom(msg)));
- if (rc < 0) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] read returned %d\n",
- esme->system_id, rc);
- } else if (rc == 0) {
- goto dead_socket;
- } else {
- esme->read_idx += rc;
- msgb_put(msg, rc);
- }
-
- if (esme->read_idx >= esme->read_len) {
- rc = smpp_pdu_rx(esme, esme->read_msg);
- esme->read_msg = NULL;
- esme->read_idx = 0;
- esme->read_len = 0;
- esme->read_state = READ_ST_IN_LEN;
- }
- break;
- }
-
- return 0;
-dead_socket:
- msgb_free(esme->read_msg);
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- esme->wqueue.bfd.fd = -1;
- exit(2342);
-
- return 0;
-}
-
-static int esme_write_cb(struct osmo_fd *ofd, struct msgb *msg)
-{
- struct esme *esme = ofd->data;
- int rc;
-
- rc = write(ofd->fd, msgb_data(msg), msgb_length(msg));
- if (rc == 0) {
- osmo_fd_unregister(&esme->wqueue.bfd);
- close(esme->wqueue.bfd.fd);
- esme->wqueue.bfd.fd = -1;
- exit(99);
- } else if (rc < msgb_length(msg)) {
- LOGP(DSMPP, LOGL_ERROR, "[%s] Short write\n", esme->system_id);
- return 0;
- }
-
- return 0;
-}
-
-static int smpp_esme_init(struct esme *esme, const char *host, uint16_t port)
-{
- int rc;
-
- if (port == 0)
- port = 2775;
-
- esme->own_seq_nr = rand();
- esme_inc_seq_nr(esme);
- osmo_wqueue_init(&esme->wqueue, 10);
- esme->wqueue.bfd.data = esme;
- esme->wqueue.read_cb = esme_read_cb;
- esme->wqueue.write_cb = esme_write_cb;
-
- rc = osmo_sock_init_ofd(&esme->wqueue.bfd, AF_UNSPEC, SOCK_STREAM,
- IPPROTO_TCP, host, port, OSMO_SOCK_F_CONNECT);
- if (rc < 0)
- return rc;
-
- return bind_transceiver(esme);
-}
-
-
-int main(int argc, char **argv)
-{
- struct esme esme;
- char *host = "localhost";
- int port = 0;
- int rc;
-
- msgb_talloc_ctx_init(NULL, 0);
-
- memset(&esme, 0, sizeof(esme));
-
- osmo_init_logging(&log_info);
-
- snprintf((char *) esme.system_id, sizeof(esme.system_id), "mirror");
- snprintf((char *) esme.password, sizeof(esme.password), "mirror");
- esme.smpp_version = 0x34;
-
- if (argc >= 2)
- host = argv[1];
- if (argc >= 3)
- port = atoi(argv[2]);
-
- rc = smpp_esme_init(&esme, host, port);
- if (rc < 0)
- exit(1);
-
- while (1) {
- osmo_select_main(0);
- }
-
- exit(0);
-}