| /* (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 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 <stdlib.h> |
| #include <stdio.h> |
| #include <string.h> |
| #include <errno.h> |
| #include <ctype.h> |
| |
| #include <netinet/in.h> |
| |
| #include <openbsc/gsm_data.h> |
| #include <osmocore/talloc.h> |
| #include <osmocore/gsm_utils.h> |
| #include <openbsc/abis_nm.h> |
| #include <osmocore/statistics.h> |
| |
| void *tall_bsc_ctx; |
| |
| static LLIST_HEAD(bts_models); |
| |
| void set_ts_e1link(struct gsm_bts_trx_ts *ts, u_int8_t e1_nr, |
| u_int8_t e1_ts, u_int8_t e1_ts_ss) |
| { |
| ts->e1_link.e1_nr = e1_nr; |
| ts->e1_link.e1_ts = e1_ts; |
| ts->e1_link.e1_ts_ss = e1_ts_ss; |
| } |
| |
| static const struct value_string pchan_names[] = { |
| { GSM_PCHAN_NONE, "NONE" }, |
| { GSM_PCHAN_CCCH, "CCCH" }, |
| { GSM_PCHAN_CCCH_SDCCH4,"CCCH+SDCCH4" }, |
| { GSM_PCHAN_TCH_F, "TCH/F" }, |
| { GSM_PCHAN_TCH_H, "TCH/H" }, |
| { GSM_PCHAN_SDCCH8_SACCH8C, "SDCCH8" }, |
| { GSM_PCHAN_PDCH, "PDCH" }, |
| { GSM_PCHAN_TCH_F_PDCH, "TCH/F_PDCH" }, |
| { GSM_PCHAN_UNKNOWN, "UNKNOWN" }, |
| { 0, NULL } |
| }; |
| |
| const char *gsm_pchan_name(enum gsm_phys_chan_config c) |
| { |
| return get_value_string(pchan_names, c); |
| } |
| |
| enum gsm_phys_chan_config gsm_pchan_parse(const char *name) |
| { |
| return get_string_value(pchan_names, name); |
| } |
| |
| static const struct value_string lchant_names[] = { |
| { GSM_LCHAN_NONE, "NONE" }, |
| { GSM_LCHAN_SDCCH, "SDCCH" }, |
| { GSM_LCHAN_TCH_F, "TCH/F" }, |
| { GSM_LCHAN_TCH_H, "TCH/H" }, |
| { GSM_LCHAN_UNKNOWN, "UNKNOWN" }, |
| { 0, NULL } |
| }; |
| |
| const char *gsm_lchant_name(enum gsm_chan_t c) |
| { |
| return get_value_string(lchant_names, c); |
| } |
| |
| static const struct value_string lchan_s_names[] = { |
| { LCHAN_S_NONE, "NONE" }, |
| { LCHAN_S_ACT_REQ, "ACTIVATION REQUESTED" }, |
| { LCHAN_S_ACTIVE, "ACTIVE" }, |
| { LCHAN_S_INACTIVE, "INACTIVE" }, |
| { LCHAN_S_REL_REQ, "RELEASE REQUESTED" }, |
| { LCHAN_S_REL_ERR, "RELEASE DUE ERROR" }, |
| { 0, NULL } |
| }; |
| |
| const char *gsm_lchans_name(enum gsm_lchan_state s) |
| { |
| return get_value_string(lchan_s_names, s); |
| } |
| |
| static const struct value_string chreq_names[] = { |
| { GSM_CHREQ_REASON_EMERG, "EMERGENCY" }, |
| { GSM_CHREQ_REASON_PAG, "PAGING" }, |
| { GSM_CHREQ_REASON_CALL, "CALL" }, |
| { GSM_CHREQ_REASON_LOCATION_UPD,"LOCATION_UPDATE" }, |
| { GSM_CHREQ_REASON_OTHER, "OTHER" }, |
| { 0, NULL } |
| }; |
| |
| const char *gsm_chreq_name(enum gsm_chreq_reason_t c) |
| { |
| return get_value_string(chreq_names, c); |
| } |
| |
| static struct gsm_bts_model *bts_model_find(enum gsm_bts_type type) |
| { |
| struct gsm_bts_model *model; |
| |
| llist_for_each_entry(model, &bts_models, list) { |
| if (model->type == type) |
| return model; |
| } |
| |
| return NULL; |
| } |
| |
| int gsm_bts_model_register(struct gsm_bts_model *model) |
| { |
| if (bts_model_find(model->type)) |
| return -EEXIST; |
| |
| tlv_def_patch(&model->nm_att_tlvdef, &nm_att_tlvdef); |
| llist_add_tail(&model->list, &bts_models); |
| return 0; |
| } |
| |
| |
| struct gsm_bts_trx *gsm_bts_trx_alloc(struct gsm_bts *bts) |
| { |
| struct gsm_bts_trx *trx = talloc_zero(bts, struct gsm_bts_trx); |
| int k; |
| |
| if (!trx) |
| return NULL; |
| |
| trx->bts = bts; |
| trx->nr = bts->num_trx++; |
| trx->nm_state.administrative = NM_STATE_UNLOCKED; |
| |
| for (k = 0; k < TRX_NR_TS; k++) { |
| struct gsm_bts_trx_ts *ts = &trx->ts[k]; |
| int l; |
| |
| ts->trx = trx; |
| ts->nr = k; |
| ts->pchan = GSM_PCHAN_NONE; |
| |
| for (l = 0; l < TS_MAX_LCHAN; l++) { |
| struct gsm_lchan *lchan; |
| lchan = &ts->lchan[l]; |
| |
| lchan->ts = ts; |
| lchan->nr = l; |
| lchan->type = GSM_LCHAN_NONE; |
| } |
| } |
| |
| if (trx->nr != 0) |
| trx->nominal_power = bts->c0->nominal_power; |
| |
| llist_add_tail(&trx->list, &bts->trx_list); |
| |
| return trx; |
| } |
| |
| static const uint8_t bts_nse_timer_default[] = { 3, 3, 3, 3, 30, 3, 10 }; |
| static const uint8_t bts_cell_timer_default[] = |
| { 3, 3, 3, 3, 3, 10, 3, 10, 3, 10, 3 }; |
| |
| struct gsm_bts *gsm_bts_alloc(struct gsm_network *net, enum gsm_bts_type type, |
| u_int8_t tsc, u_int8_t bsic) |
| { |
| struct gsm_bts *bts = talloc_zero(net, struct gsm_bts); |
| struct gsm_bts_model *model = bts_model_find(type); |
| int i; |
| |
| if (!bts) |
| return NULL; |
| |
| if (!model && type != GSM_BTS_TYPE_UNKNOWN) { |
| talloc_free(bts); |
| return NULL; |
| } |
| |
| bts->network = net; |
| bts->nr = net->num_bts++; |
| bts->type = type; |
| bts->model = model; |
| bts->tsc = tsc; |
| bts->bsic = bsic; |
| bts->num_trx = 0; |
| INIT_LLIST_HEAD(&bts->trx_list); |
| bts->ms_max_power = 15; /* dBm */ |
| bts->si_common.cell_sel_par.cell_resel_hyst = 2; /* 4 dB */ |
| bts->si_common.cell_sel_par.rxlev_acc_min = 0; |
| bts->si_common.neigh_list.data = bts->si_common.data.neigh_list; |
| bts->si_common.neigh_list.data_len = |
| sizeof(bts->si_common.data.neigh_list); |
| bts->si_common.cell_alloc.data = bts->si_common.data.cell_alloc; |
| bts->si_common.cell_alloc.data_len = |
| sizeof(bts->si_common.data.cell_alloc); |
| bts->si_common.rach_control.re = 1; /* no re-establishment */ |
| bts->si_common.rach_control.tx_integer = 9; /* 12 slots spread - 217/115 slots delay */ |
| bts->si_common.rach_control.max_trans = 3; /* 7 retransmissions */ |
| bts->si_common.rach_control.t2 = 4; /* no emergency calls */ |
| |
| for (i = 0; i < ARRAY_SIZE(bts->gprs.nsvc); i++) { |
| bts->gprs.nsvc[i].bts = bts; |
| bts->gprs.nsvc[i].id = i; |
| } |
| memcpy(&bts->gprs.nse.timer, bts_nse_timer_default, |
| sizeof(bts->gprs.nse.timer)); |
| memcpy(&bts->gprs.cell.timer, bts_cell_timer_default, |
| sizeof(bts->gprs.cell.timer)); |
| |
| /* create our primary TRX */ |
| bts->c0 = gsm_bts_trx_alloc(bts); |
| if (!bts->c0) { |
| talloc_free(bts); |
| return NULL; |
| } |
| bts->c0->ts[0].pchan = GSM_PCHAN_CCCH_SDCCH4; |
| |
| bts->rach_b_thresh = -1; |
| bts->rach_ldavg_slots = -1; |
| llist_add_tail(&bts->list, &net->bts_list); |
| |
| return bts; |
| } |
| |
| struct gsm_network *gsm_network_init(u_int16_t country_code, u_int16_t network_code, |
| int (*mncc_recv)(struct gsm_network *, int, void *)) |
| { |
| struct gsm_network *net; |
| |
| net = talloc_zero(tall_bsc_ctx, struct gsm_network); |
| if (!net) |
| return NULL; |
| |
| net->country_code = country_code; |
| net->network_code = network_code; |
| net->num_bts = 0; |
| net->reject_cause = GSM48_REJECT_ROAMING_NOT_ALLOWED; |
| net->T3101 = GSM_T3101_DEFAULT; |
| net->T3113 = GSM_T3113_DEFAULT; |
| /* FIXME: initialize all other timers! */ |
| |
| /* 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->trans_list); |
| INIT_LLIST_HEAD(&net->upqueue); |
| INIT_LLIST_HEAD(&net->bts_list); |
| |
| net->stats.chreq.total = counter_alloc("net.chreq.total"); |
| net->stats.chreq.no_channel = counter_alloc("net.chreq.no_channel"); |
| net->stats.handover.attempted = counter_alloc("net.handover.attempted"); |
| net->stats.handover.no_channel = counter_alloc("net.handover.no_channel"); |
| net->stats.handover.timeout = counter_alloc("net.handover.timeout"); |
| net->stats.handover.completed = counter_alloc("net.handover.completed"); |
| net->stats.handover.failed = counter_alloc("net.handover.failed"); |
| net->stats.loc_upd_type.attach = counter_alloc("net.loc_upd_type.attach"); |
| net->stats.loc_upd_type.normal = counter_alloc("net.loc_upd_type.normal"); |
| net->stats.loc_upd_type.periodic = counter_alloc("net.loc_upd_type.periodic"); |
| net->stats.loc_upd_type.detach = counter_alloc("net.imsi_detach.count"); |
| net->stats.loc_upd_resp.reject = counter_alloc("net.loc_upd_resp.reject"); |
| net->stats.loc_upd_resp.accept = counter_alloc("net.loc_upd_resp.accept"); |
| net->stats.paging.attempted = counter_alloc("net.paging.attempted"); |
| net->stats.paging.detached = counter_alloc("net.paging.detached"); |
| net->stats.paging.completed = counter_alloc("net.paging.completed"); |
| net->stats.paging.expired = counter_alloc("net.paging.expired"); |
| net->stats.sms.submitted = counter_alloc("net.sms.submitted"); |
| net->stats.sms.no_receiver = counter_alloc("net.sms.no_receiver"); |
| net->stats.sms.delivered = counter_alloc("net.sms.delivered"); |
| net->stats.sms.rp_err_mem = counter_alloc("net.sms.rp_err_mem"); |
| net->stats.sms.rp_err_other = counter_alloc("net.sms.rp_err_other"); |
| net->stats.call.dialled = counter_alloc("net.call.dialled"); |
| net->stats.call.alerted = counter_alloc("net.call.alerted"); |
| net->stats.call.connected = counter_alloc("net.call.connected"); |
| net->stats.chan.rf_fail = counter_alloc("net.chan.rf_fail"); |
| net->stats.chan.rll_err = counter_alloc("net.chan.rll_err"); |
| net->stats.bts.oml_fail = counter_alloc("net.bts.oml_fail"); |
| net->stats.bts.rsl_fail = counter_alloc("net.bts.rsl_fail"); |
| |
| net->mncc_recv = mncc_recv; |
| |
| return net; |
| } |
| |
| struct gsm_bts *gsm_bts_num(struct gsm_network *net, int num) |
| { |
| struct gsm_bts *bts; |
| |
| if (num >= net->num_bts) |
| return NULL; |
| |
| llist_for_each_entry(bts, &net->bts_list, list) { |
| if (bts->nr == num) |
| return bts; |
| } |
| |
| return NULL; |
| } |
| |
| /* Get reference to a neighbor cell on a given BCCH ARFCN */ |
| struct gsm_bts *gsm_bts_neighbor(const struct gsm_bts *bts, |
| u_int16_t arfcn, u_int8_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) { |
| if (neigh->c0->arfcn == arfcn && |
| neigh->bsic == bsic) |
| return neigh; |
| } |
| |
| return NULL; |
| } |
| |
| struct gsm_bts_trx *gsm_bts_trx_num(struct gsm_bts *bts, int num) |
| { |
| struct gsm_bts_trx *trx; |
| |
| if (num >= bts->num_trx) |
| return NULL; |
| |
| llist_for_each_entry(trx, &bts->trx_list, list) { |
| if (trx->nr == num) |
| return trx; |
| } |
| |
| return NULL; |
| } |
| |
| static char ts2str[255]; |
| |
| char *gsm_trx_name(struct gsm_bts_trx *trx) |
| { |
| snprintf(ts2str, sizeof(ts2str), "(bts=%d,trx=%d)", |
| trx->bts->nr, trx->nr); |
| |
| return ts2str; |
| } |
| |
| |
| char *gsm_ts_name(struct gsm_bts_trx_ts *ts) |
| { |
| snprintf(ts2str, sizeof(ts2str), "(bts=%d,trx=%d,ts=%d)", |
| ts->trx->bts->nr, ts->trx->nr, ts->nr); |
| |
| return ts2str; |
| } |
| |
| char *gsm_lchan_name(struct gsm_lchan *lchan) |
| { |
| struct gsm_bts_trx_ts *ts = lchan->ts; |
| |
| snprintf(ts2str, sizeof(ts2str), "(bts=%d,trx=%d,ts=%d,ss=%d)", |
| ts->trx->bts->nr, ts->trx->nr, ts->nr, lchan->nr); |
| |
| return ts2str; |
| } |
| |
| static const struct value_string bts_types[] = { |
| { GSM_BTS_TYPE_UNKNOWN, "unknown" }, |
| { GSM_BTS_TYPE_BS11, "bs11" }, |
| { GSM_BTS_TYPE_NANOBTS, "nanobts" }, |
| { 0, NULL } |
| }; |
| |
| enum gsm_bts_type parse_btstype(const char *arg) |
| { |
| return get_string_value(bts_types, arg); |
| } |
| |
| const char *btstype2str(enum gsm_bts_type type) |
| { |
| return get_value_string(bts_types, type); |
| } |
| |
| struct gsm_bts_trx *gsm_bts_trx_by_nr(struct gsm_bts *bts, int nr) |
| { |
| struct gsm_bts_trx *trx; |
| |
| llist_for_each_entry(trx, &bts->trx_list, list) { |
| if (trx->nr == nr) |
| return trx; |
| } |
| return NULL; |
| } |
| |
| /* Search for a BTS in the given Location Area; optionally start searching |
| * with start_bts (for continuing to search after the first result) */ |
| struct gsm_bts *gsm_bts_by_lac(struct gsm_network *net, unsigned int lac, |
| struct gsm_bts *start_bts) |
| { |
| int i; |
| struct gsm_bts *bts; |
| int skip = 0; |
| |
| if (start_bts) |
| skip = 1; |
| |
| for (i = 0; i < net->num_bts; i++) { |
| bts = gsm_bts_num(net, i); |
| |
| if (skip) { |
| if (start_bts == bts) |
| skip = 0; |
| continue; |
| } |
| |
| if (lac == GSM_LAC_RESERVED_ALL_BTS || bts->location_area_code == lac) |
| return bts; |
| } |
| return NULL; |
| } |
| |
| static const struct value_string auth_policy_names[] = { |
| { GSM_AUTH_POLICY_CLOSED, "closed" }, |
| { GSM_AUTH_POLICY_ACCEPT_ALL, "accept-all" }, |
| { GSM_AUTH_POLICY_TOKEN, "token" }, |
| { 0, NULL } |
| }; |
| |
| enum gsm_auth_policy gsm_auth_policy_parse(const char *arg) |
| { |
| return get_string_value(auth_policy_names, arg); |
| } |
| |
| const char *gsm_auth_policy_name(enum gsm_auth_policy policy) |
| { |
| return get_value_string(auth_policy_names, policy); |
| } |
| |
| void gprs_ra_id_by_bts(struct gprs_ra_id *raid, struct gsm_bts *bts) |
| { |
| raid->mcc = bts->network->country_code; |
| raid->mnc = bts->network->network_code; |
| raid->lac = bts->location_area_code; |
| raid->rac = bts->gprs.rac; |
| } |
| |
| int gsm48_ra_id_by_bts(u_int8_t *buf, struct gsm_bts *bts) |
| { |
| struct gprs_ra_id raid; |
| |
| gprs_ra_id_by_bts(&raid, bts); |
| |
| return gsm48_construct_ra(buf, &raid); |
| } |
| |
| static const struct value_string rrlp_mode_names[] = { |
| { RRLP_MODE_NONE, "none" }, |
| { RRLP_MODE_MS_BASED, "ms-based" }, |
| { RRLP_MODE_MS_PREF, "ms-preferred" }, |
| { RRLP_MODE_ASS_PREF, "ass-preferred" }, |
| { 0, NULL } |
| }; |
| |
| enum rrlp_mode rrlp_mode_parse(const char *arg) |
| { |
| return get_string_value(rrlp_mode_names, arg); |
| } |
| |
| const char *rrlp_mode_name(enum rrlp_mode mode) |
| { |
| return get_value_string(rrlp_mode_names, mode); |
| } |
| |
| static const struct value_string bts_gprs_mode_names[] = { |
| { BTS_GPRS_NONE, "none" }, |
| { BTS_GPRS_GPRS, "gprs" }, |
| { BTS_GPRS_EGPRS, "egprs" }, |
| { 0, NULL } |
| }; |
| |
| enum bts_gprs_mode bts_gprs_mode_parse(const char *arg) |
| { |
| return get_string_value(bts_gprs_mode_names, arg); |
| } |
| |
| const char *bts_gprs_mode_name(enum bts_gprs_mode mode) |
| { |
| return get_value_string(bts_gprs_mode_names, mode); |
| } |
| |
| 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; |
| } |
| |
| int gsm_set_bts_type(struct gsm_bts *bts, enum gsm_bts_type type) |
| { |
| struct gsm_bts_model *model; |
| |
| model = bts_model_find(type); |
| if (!model) |
| return -EINVAL; |
| |
| bts->type = type; |
| bts->model = model; |
| |
| switch (bts->type) { |
| case GSM_BTS_TYPE_NANOBTS: |
| /* Set the default OML Stream ID to 0xff */ |
| bts->oml_tei = 0xff; |
| bts->c0->nominal_power = 23; |
| break; |
| case GSM_BTS_TYPE_BS11: |
| break; |
| case GSM_BTS_TYPE_UNKNOWN: |
| break; |
| } |
| |
| return 0; |
| } |