| /* 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 <osmocom/msc/debug.h> |
| #include <osmocom/msc/transaction.h> |
| #include <osmocom/msc/db.h> |
| #include <osmocom/msc/vlr.h> |
| #include <osmocom/msc/a_iface.h> |
| #include <osmocom/msc/gsm_04_08.h> |
| #include <osmocom/msc/gsm_04_11.h> |
| #include <osmocom/msc/msc_mgcp.h> |
| |
| #include "../../bscconfig.h" |
| #ifdef BUILD_IU |
| #include <osmocom/ranap/iu_client.h> |
| #else |
| #include <osmocom/msc/iu_dummy.h> |
| #endif |
| |
| struct gsm_network *gsm_network_init(void *ctx, mncc_recv_cb_t mncc_recv) |
| { |
| struct gsm_network *net; |
| |
| net = talloc_zero(ctx, struct gsm_network); |
| if (!net) |
| return NULL; |
| |
| net->plmn = (struct osmo_plmn_id){ .mcc=1, .mnc=1 }; |
| |
| /* Permit a compile-time default of A5/3 and A5/1 */ |
| net->a5_encryption_mask = (1 << 3) | (1 << 1); |
| |
| /* Use 30 min periodic update interval as sane default */ |
| net->t3212 = 5; |
| |
| net->mncc_guard_timeout = 180; |
| net->ncss_guard_timeout = 30; |
| |
| net->paging_response_timer = MSC_PAGING_RESPONSE_TIMER_DEFAULT; |
| |
| INIT_LLIST_HEAD(&net->trans_list); |
| INIT_LLIST_HEAD(&net->upqueue); |
| INIT_LLIST_HEAD(&net->ran_conns); |
| |
| /* 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->active_nc_ss = osmo_counter_alloc("msc.active_nc_ss"); |
| |
| net->mncc_recv = mncc_recv; |
| |
| INIT_LLIST_HEAD(&net->a.bscs); |
| |
| return net; |
| } |
| |
| void gsm_network_set_mncc_sock_path(struct gsm_network *net, const char *mncc_sock_path) |
| { |
| if (net->mncc_sock_path) |
| talloc_free(net->mncc_sock_path); |
| net->mncc_sock_path = mncc_sock_path ? talloc_strdup(net, mncc_sock_path) : NULL; |
| } |
| |
| /* Receive a SAPI-N-REJECT from BSC */ |
| void ran_conn_sapi_n_reject(struct ran_conn *conn, int dlci) |
| { |
| int sapi = dlci & 0x7; |
| |
| if (sapi == UM_SAPI_SMS) |
| gsm411_sapi_n_reject(conn); |
| } |
| |
| /* receive a Level 3 Complete message. |
| * Ownership of the conn is completely passed to the conn FSM, i.e. for both acceptance and rejection, |
| * the conn FSM shall decide when to release this conn. It may already be discarded before this exits. */ |
| void ran_conn_compl_l3(struct ran_conn *conn, |
| struct msgb *msg, uint16_t chosen_channel) |
| { |
| ran_conn_get(conn, RAN_CONN_USE_COMPL_L3); |
| gsm0408_dispatch(conn, msg); |
| ran_conn_put(conn, RAN_CONN_USE_COMPL_L3); |
| } |
| |
| /* Receive a DTAP message from BSC */ |
| void ran_conn_dtap(struct ran_conn *conn, struct msgb *msg) |
| { |
| ran_conn_get(conn, RAN_CONN_USE_DTAP); |
| gsm0408_dispatch(conn, msg); |
| |
| ran_conn_put(conn, RAN_CONN_USE_DTAP); |
| } |
| |
| /* Receive an ASSIGNMENT COMPLETE from BSC */ |
| void msc_assign_compl(struct ran_conn *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 ran_conn_assign_fail(struct ran_conn *conn, uint8_t cause, uint8_t *rr_cause) |
| { |
| LOGPFSMSL(conn->fi, DRR, LOGL_ERROR, "Assignment Failure: cause=%u rr_cause=%u.\n", |
| cause, rr_cause ? *rr_cause : 0); |
| msc_mgcp_ass_fail(conn); |
| } |
| |
| /* Receive a CLASSMARK CHANGE from BSC */ |
| void ran_conn_classmark_chg(struct ran_conn *conn, |
| const uint8_t *cm2, uint8_t cm2_len, |
| const uint8_t *cm3, uint8_t cm3_len) |
| { |
| struct gsm_classmark *cm; |
| |
| if (!conn->vsub) |
| cm = &conn->temporary_classmark; |
| else |
| cm = &conn->vsub->classmark; |
| |
| if (cm2 && cm2_len) { |
| if (cm2_len > sizeof(cm->classmark2)) { |
| LOGP(DRR, LOGL_NOTICE, "%s: classmark2 is %u bytes, truncating at %zu bytes\n", |
| vlr_subscr_name(conn->vsub), cm2_len, sizeof(cm->classmark2)); |
| cm2_len = sizeof(cm->classmark2); |
| } |
| cm->classmark2_len = cm2_len; |
| memcpy(cm->classmark2, cm2, cm2_len); |
| } |
| if (cm3 && cm3_len) { |
| if (cm3_len > sizeof(cm->classmark3)) { |
| LOGP(DRR, LOGL_NOTICE, "%s: classmark3 is %u bytes, truncating at %zu bytes\n", |
| vlr_subscr_name(conn->vsub), cm3_len, sizeof(cm->classmark3)); |
| cm3_len = sizeof(cm->classmark3); |
| } |
| cm->classmark3_len = cm3_len; |
| memcpy(cm->classmark3, cm3, cm3_len); |
| } |
| |
| /* bump subscr conn FSM in case it is waiting for a Classmark Update */ |
| if (conn->fi->state == RAN_CONN_S_WAIT_CLASSMARK_UPDATE) |
| osmo_fsm_inst_dispatch(conn->fi, RAN_CONN_E_CLASSMARK_UPDATE, NULL); |
| } |
| |
| /* Receive a CIPHERING MODE COMPLETE from BSC */ |
| void ran_conn_cipher_mode_compl(struct ran_conn *conn, struct msgb *msg, uint8_t alg_id) |
| { |
| struct vlr_ciph_result ciph_res = { .cause = VLR_CIPH_REJECT }; |
| |
| 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)); |
| |
| if (msg) { |
| struct gsm48_hdr *gh = msgb_l3(msg); |
| unsigned int payload_len = msgb_l3len(msg) - sizeof(*gh); |
| struct tlv_parsed tp; |
| uint8_t mi_type; |
| |
| if (!gh) { |
| LOGP(DRR, LOGL_ERROR, "invalid: msgb without l3 header\n"); |
| return; |
| } |
| |
| 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(ciph_res.imeisv, sizeof(ciph_res.imeisv), |
| TLVP_VAL(&tp, GSM48_IE_MOBILE_ID), |
| TLVP_LEN(&tp, GSM48_IE_MOBILE_ID)); |
| } |
| } |
| } |
| |
| conn->geran_encr.alg_id = alg_id; |
| |
| ciph_res.cause = VLR_CIPH_COMPL; |
| vlr_subscr_rx_ciph_res(conn->vsub, &ciph_res); |
| } |
| |
| /* Receive a CLEAR REQUEST from BSC */ |
| int ran_conn_clear_request(struct ran_conn *conn, uint32_t cause) |
| { |
| ran_conn_close(conn, cause); |
| return 1; |
| } |
| |
| 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? */ |
| } |