| /* gprs_bssgp_pcu.cpp |
| * |
| * Copyright (C) 2012 Ivan Klyuchnikov |
| * Copyright (C) 2013 by Holger Hans Peter Freyther |
| * |
| * 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., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
| */ |
| |
| #include <gprs_rlcmac.h> |
| #include <gprs_bssgp_pcu.h> |
| #include <gprs_bssgp_rim.h> |
| #include <pcu_l1_if.h> |
| #include <gprs_debug.h> |
| #include <bts.h> |
| #include <tbf.h> |
| #include <coding_scheme.h> |
| #include <pdch.h> |
| #include <decoding.h> |
| |
| #include <osmocom/gprs/gprs_ns2.h> |
| #include <osmocom/gsm/protocol/gsm_23_003.h> |
| #include <osmocom/gprs/protocol/gsm_08_16.h> |
| #include <osmocom/core/utils.h> |
| #include <osmocom/core/stats.h> |
| #include <osmocom/gsm/gsm48.h> |
| #include "coding_scheme.h" |
| #include "tbf_dl.h" |
| #include "llc.h" |
| #include "gprs_rlcmac.h" |
| |
| /* Tuning parameters for BSSGP flow control */ |
| #define FC_DEFAULT_LIFE_TIME_SECS 10 /* experimental value, 10s */ |
| #define FC_MS_BUCKET_SIZE_BY_BMAX(bmax) ((bmax) / 2 + 500) /* experimental */ |
| #define FC_FALLBACK_BVC_BUCKET_SIZE 2000 /* e.g. on R = 0, value taken from PCAP files */ |
| #define FC_MS_MAX_RX_SLOTS 4 /* limit MS default R to 4 TS per MS */ |
| |
| /* Constants for BSSGP flow control */ |
| #define FC_MAX_BUCKET_LEAK_RATE (6553500 / 8) /* Byte/s */ |
| #define FC_MAX_BUCKET_SIZE 6553500 /* Octets */ |
| |
| extern void *tall_pcu_ctx; |
| extern uint16_t spoof_mcc, spoof_mnc; |
| extern bool spoof_mnc_3_digits; |
| |
| static const struct rate_ctr_desc sgsn_ctr_description[] = { |
| [SGSN_CTR_RX_PAGING_CS] = { "rx_paging_cs", "Amount of paging CS requests received" }, |
| [SGSN_CTR_RX_PAGING_PS] = { "rx_paging_ps", "Amount of paging PS requests received" }, |
| }; |
| |
| static const struct rate_ctr_group_desc sgsn_ctrg_desc = { |
| .group_name_prefix = "pcu:sgsn", |
| .group_description = "SGSN Statistics", |
| .class_id = OSMO_STATS_CLASS_SUBSCRIBER, |
| .num_ctr = ARRAY_SIZE(sgsn_ctr_description), |
| .ctr_desc = sgsn_ctr_description, |
| }; |
| |
| static void bvc_timeout(void *_priv); |
| |
| static int parse_ra_cap(struct tlv_parsed *tp, MS_Radio_Access_capability_t *rac) |
| { |
| struct bitvec *block; |
| uint8_t cap_len; |
| uint8_t *cap; |
| |
| memset(rac, 0, sizeof(*rac)); |
| |
| if (!TLVP_PRESENT(tp, BSSGP_IE_MS_RADIO_ACCESS_CAP)) |
| return -EINVAL; |
| |
| cap_len = TLVP_LEN(tp, BSSGP_IE_MS_RADIO_ACCESS_CAP); |
| cap = (uint8_t *) TLVP_VAL(tp, BSSGP_IE_MS_RADIO_ACCESS_CAP); |
| |
| LOGP(DBSSGP, LOGL_DEBUG, "Got BSSGP RA Capability of size %d\n", cap_len); |
| |
| block = bitvec_alloc(cap_len, tall_pcu_ctx); |
| bitvec_unpack(block, cap); |
| |
| /* TS 24.008, 10.5.5.12a */ |
| decode_gsm_ra_cap(block, rac); |
| |
| bitvec_free(block); |
| return 0; |
| } |
| |
| static int gprs_bssgp_pcu_rx_dl_ud(struct msgb *msg, struct tlv_parsed *tp) |
| { |
| struct bssgp_ud_hdr *budh; |
| |
| uint32_t tlli; |
| uint32_t tlli_old = GSM_RESERVED_TMSI; |
| uint8_t *data; |
| uint16_t len; |
| uint8_t ms_class = 0; |
| uint8_t egprs_ms_class = 0; |
| int rc; |
| MS_Radio_Access_capability_t rac; |
| /* TODO: is it really necessary to initialize this as a "000" IMSI? It seems, the function should just return an |
| * error if no IMSI IE was found. */ |
| struct osmo_mobile_identity mi_imsi = { |
| .type = GSM_MI_TYPE_TMSI, |
| }; |
| OSMO_STRLCPY_ARRAY(mi_imsi.imsi, "000"); |
| |
| budh = (struct bssgp_ud_hdr *)msgb_bssgph(msg); |
| tlli = ntohl(budh->tlli); |
| |
| /* LLC_PDU is mandatory IE */ |
| if (!TLVP_PRESENT(tp, BSSGP_IE_LLC_PDU)) |
| { |
| LOGP(DBSSGP, LOGL_NOTICE, "BSSGP TLLI=0x%08x Rx UL-UD missing mandatory IE\n", tlli); |
| return bssgp_tx_status(BSSGP_CAUSE_MISSING_MAND_IE, NULL, msg); |
| } |
| |
| data = (uint8_t *) TLVP_VAL(tp, BSSGP_IE_LLC_PDU); |
| len = TLVP_LEN(tp, BSSGP_IE_LLC_PDU); |
| if (len > LLC_MAX_LEN) |
| { |
| LOGP(DBSSGP, LOGL_NOTICE, "BSSGP TLLI=0x%08x Rx UL-UD IE_LLC_PDU too large\n", tlli); |
| return bssgp_tx_status(BSSGP_CAUSE_COND_IE_ERR, NULL, msg); |
| } |
| |
| /* read IMSI. if no IMSI exists, use first paging block (any paging), |
| * because during attachment the IMSI might not be known, so the MS |
| * will listen to all paging blocks. */ |
| if (TLVP_PRESENT(tp, BSSGP_IE_IMSI)) |
| { |
| rc = osmo_mobile_identity_decode(&mi_imsi, TLVP_VAL(tp, BSSGP_IE_IMSI), TLVP_LEN(tp, BSSGP_IE_IMSI), |
| true); |
| if (rc < 0 || mi_imsi.type != GSM_MI_TYPE_IMSI) { |
| LOGP(DBSSGP, LOGL_NOTICE, "Failed to parse IMSI IE (rc=%d)\n", rc); |
| return bssgp_tx_status(BSSGP_CAUSE_COND_IE_ERR, NULL, msg); |
| } |
| } |
| |
| /* parse ms radio access capability */ |
| if (parse_ra_cap(tp, &rac) >= 0) { |
| /* Get the EGPRS class from the RA capability */ |
| ms_class = get_ms_class_by_capability(&rac); |
| egprs_ms_class = get_egprs_ms_class_by_capability(&rac); |
| LOGP(DBSSGP, LOGL_DEBUG, "Got downlink MS class %d/%d\n", |
| ms_class, egprs_ms_class); |
| } |
| |
| /* get lifetime */ |
| uint16_t delay_csec = 0xffff; |
| if (TLVP_PRESENT(tp, BSSGP_IE_PDU_LIFETIME)) |
| { |
| uint8_t lt_len = TLVP_LEN(tp, BSSGP_IE_PDU_LIFETIME); |
| if (lt_len == 2) |
| delay_csec = tlvp_val16be(tp, BSSGP_IE_PDU_LIFETIME); |
| else |
| LOGP(DBSSGP, LOGL_NOTICE, "BSSGP invalid length of " |
| "PDU_LIFETIME IE\n"); |
| } else |
| LOGP(DBSSGP, LOGL_NOTICE, "BSSGP missing mandatory " |
| "PDU_LIFETIME IE\n"); |
| |
| /* get optional TLLI old */ |
| if (TLVP_PRESENT(tp, BSSGP_IE_TLLI)) |
| { |
| uint8_t tlli_len = TLVP_LEN(tp, BSSGP_IE_PDU_LIFETIME); |
| if (tlli_len == 2) |
| tlli_old = tlvp_val16be(tp, BSSGP_IE_TLLI); |
| else |
| LOGP(DBSSGP, LOGL_NOTICE, "BSSGP invalid length of " |
| "TLLI (old) IE\n"); |
| } |
| |
| LOGP(DBSSGP, LOGL_INFO, "LLC [SGSN -> PCU] = TLLI: 0x%08x IMSI: %s len: %d\n", tlli, mi_imsi.imsi, len); |
| |
| return dl_tbf_handle(the_pcu->bssgp.bts, tlli, tlli_old, mi_imsi.imsi, |
| ms_class, egprs_ms_class, delay_csec, data, len); |
| } |
| |
| /* 3GPP TS 48.018 Table 10.3.2. Returns 0 on success, suggested BSSGP cause otherwise */ |
| static unsigned int get_paging_cs_mi(struct paging_req_cs *req, const struct tlv_parsed *tp) |
| { |
| int rc; |
| |
| req->chan_needed = tlvp_val8(tp, BSSGP_IE_CHAN_NEEDED, 0); |
| |
| if (!TLVP_PRESENT(tp, BSSGP_IE_IMSI)) { |
| LOGP(DBSSGP, LOGL_ERROR, "IMSI Mobile Identity mandatory IE not found\n"); |
| return BSSGP_CAUSE_MISSING_MAND_IE; |
| } |
| |
| rc = osmo_mobile_identity_decode(&req->mi_imsi, TLVP_VAL(tp, BSSGP_IE_IMSI), |
| TLVP_LEN(tp, BSSGP_IE_IMSI), true); |
| if (rc < 0 || req->mi_imsi.type != GSM_MI_TYPE_IMSI) { |
| LOGP(DBSSGP, LOGL_ERROR, "Invalid IMSI Mobile Identity\n"); |
| return BSSGP_CAUSE_INV_MAND_INF; |
| } |
| req->mi_imsi_present = true; |
| |
| /* TMSI is optional */ |
| req->mi_tmsi_present = false; |
| if (TLVP_PRESENT(tp, BSSGP_IE_TMSI)) { |
| /* Be safe against an evil SGSN - check the length */ |
| if (TLVP_LEN(tp, BSSGP_IE_TMSI) != GSM23003_TMSI_NUM_BYTES) { |
| LOGP(DBSSGP, LOGL_NOTICE, "TMSI IE has odd length (!= 4)\n"); |
| return BSSGP_CAUSE_COND_IE_ERR; |
| } |
| |
| /* NOTE: TMSI (unlike IMSI) IE comes without MI type header */ |
| req->mi_tmsi = (struct osmo_mobile_identity){ |
| .type = GSM_MI_TYPE_TMSI, |
| }; |
| req->mi_tmsi.tmsi = osmo_load32be(TLVP_VAL(tp, BSSGP_IE_TMSI)); |
| req->mi_tmsi_present = true; |
| } |
| |
| if (TLVP_PRESENT(tp, BSSGP_IE_TLLI)) |
| req->tlli = osmo_load32be(TLVP_VAL(tp, BSSGP_IE_TLLI)); |
| else |
| req->tlli = GSM_RESERVED_TMSI; |
| |
| return 0; |
| } |
| |
| static int gprs_bssgp_pcu_rx_paging_cs(struct msgb *msg, const struct tlv_parsed *tp) |
| { |
| struct paging_req_cs req; |
| struct gprs_rlcmac_bts *bts; |
| struct GprsMs *ms; |
| int rc; |
| |
| rate_ctr_inc(rate_ctr_group_get_ctr(the_pcu->bssgp.ctrs, SGSN_CTR_RX_PAGING_CS)); |
| |
| if ((rc = get_paging_cs_mi(&req, tp)) > 0) |
| return bssgp_tx_status((enum gprs_bssgp_cause) rc, NULL, msg); |
| |
| /* We need to page all BTSs since even if a BTS has a matching MS, it |
| * may have already moved to a newer BTS. On Each BTS, if the MS is |
| * known, then bts_add_paging() can optimize and page only on PDCHs the |
| * target MS is using. */ |
| llist_for_each_entry(bts, &the_pcu->bts_list, list) { |
| /* TODO: Match by TMSI before IMSI if present?! */ |
| ms = bts_ms_by_tlli(bts, req.tlli, req.tlli); |
| if (!ms && req.mi_imsi_present) |
| ms = bts_ms_by_imsi(bts, req.mi_imsi.imsi); |
| bts_add_paging(bts, &req, ms); |
| } |
| |
| return 0; |
| } |
| |
| /* Returns 0 on success, suggested BSSGP cause otherwise */ |
| static unsigned int get_paging_ps_mi(struct osmo_mobile_identity *mi, const struct tlv_parsed *tp) |
| { |
| /* Use TMSI (if present) or IMSI */ |
| if (TLVP_PRESENT(tp, BSSGP_IE_TMSI)) { |
| /* Be safe against an evil SGSN - check the length */ |
| if (TLVP_LEN(tp, BSSGP_IE_TMSI) != GSM23003_TMSI_NUM_BYTES) { |
| LOGP(DBSSGP, LOGL_NOTICE, "TMSI IE has odd length (!= 4)\n"); |
| return BSSGP_CAUSE_COND_IE_ERR; |
| } |
| |
| /* NOTE: TMSI (unlike IMSI) IE comes without MI type header */ |
| *mi = (struct osmo_mobile_identity){ |
| .type = GSM_MI_TYPE_TMSI, |
| }; |
| mi->tmsi = osmo_load32be(TLVP_VAL(tp, BSSGP_IE_TMSI)); |
| } else if (TLVP_PRESENT(tp, BSSGP_IE_IMSI)) { |
| int rc = osmo_mobile_identity_decode(mi, TLVP_VAL(tp, BSSGP_IE_IMSI), TLVP_LEN(tp, BSSGP_IE_IMSI), |
| true); |
| if (rc < 0 || mi->type != GSM_MI_TYPE_IMSI) { |
| LOGP(DBSSGP, LOGL_ERROR, "Invalid IMSI Mobile Identity\n"); |
| return BSSGP_CAUSE_COND_IE_ERR; |
| } |
| } else { |
| LOGP(DBSSGP, LOGL_ERROR, "Neither TMSI IE nor IMSI IE is present\n"); |
| return BSSGP_CAUSE_MISSING_COND_IE; |
| } |
| |
| return 0; |
| } |
| |
| static int gprs_bssgp_pcu_rx_paging_ps(struct msgb *msg, const struct tlv_parsed *tp) |
| { |
| struct osmo_mobile_identity mi_imsi; |
| struct osmo_mobile_identity paging_mi; |
| struct gprs_rlcmac_bts *bts; |
| uint16_t pgroup; |
| int rc; |
| |
| rate_ctr_inc(rate_ctr_group_get_ctr(the_pcu->bssgp.ctrs, SGSN_CTR_RX_PAGING_PS)); |
| |
| if (!TLVP_PRESENT(tp, BSSGP_IE_IMSI)) { |
| LOGP(DBSSGP, LOGL_ERROR, "No IMSI\n"); |
| return bssgp_tx_status(BSSGP_CAUSE_MISSING_MAND_IE, NULL, msg); |
| } |
| |
| rc = osmo_mobile_identity_decode(&mi_imsi, TLVP_VAL(tp, BSSGP_IE_IMSI), TLVP_LEN(tp, BSSGP_IE_IMSI), true); |
| if (rc < 0 || mi_imsi.type != GSM_MI_TYPE_IMSI) { |
| LOGP(DBSSGP, LOGL_NOTICE, "Failed to parse IMSI IE (rc=%d)\n", rc); |
| return bssgp_tx_status(BSSGP_CAUSE_INV_MAND_INF, NULL, msg); |
| } |
| pgroup = imsi2paging_group(mi_imsi.imsi); |
| if (pgroup > 999) { |
| LOGP(DBSSGP, LOGL_NOTICE, "Failed to compute IMSI %s paging group\n", mi_imsi.imsi); |
| return bssgp_tx_status(BSSGP_CAUSE_INV_MAND_INF, NULL, msg); |
| } |
| |
| if ((rc = get_paging_ps_mi(&paging_mi, tp)) > 0) |
| return bssgp_tx_status((enum gprs_bssgp_cause) rc, NULL, msg); |
| |
| /* FIXME: look if MS is attached a specific BTS and then only page on that one? */ |
| llist_for_each_entry(bts, &the_pcu->bts_list, list) { |
| gprs_rlcmac_paging_request(bts, &paging_mi, pgroup); |
| } |
| return 0; |
| } |
| |
| /* Receive a BSSGP PDU from a BSS on a PTP BVCI */ |
| static int gprs_bssgp_pcu_rx_ptp(struct msgb *msg, struct tlv_parsed *tp, struct bssgp_bvc_ctx *bctx) |
| { |
| struct bssgp_normal_hdr *bgph = (struct bssgp_normal_hdr *) msgb_bssgph(msg); |
| enum bssgp_pdu_type pdu_type = (enum bssgp_pdu_type) bgph->pdu_type; |
| int bvci = bctx ? bctx->bvci : -1; |
| unsigned rc = 0; |
| |
| if (!bctx) |
| return -EINVAL; |
| |
| /* If traffic is received on a BVC that is marked as blocked, the |
| * received PDU shall not be accepted and a STATUS PDU (Cause value: |
| * BVC Blocked) shall be sent to the peer entity on the signalling BVC */ |
| if (bctx->state & BVC_S_BLOCKED && pdu_type != BSSGP_PDUT_STATUS) |
| { |
| uint16_t bvci = msgb_bvci(msg); |
| LOGP(DBSSGP, LOGL_NOTICE, "rx BVC_S_BLOCKED\n"); |
| return bssgp_tx_status(BSSGP_CAUSE_BVCI_BLOCKED, &bvci, msg); |
| } |
| |
| switch (pdu_type) { |
| case BSSGP_PDUT_STATUS: |
| /* already handled in libosmogb */ |
| OSMO_ASSERT(0); |
| break; |
| case BSSGP_PDUT_DL_UNITDATA: |
| LOGP(DBSSGP, LOGL_DEBUG, "Rx BSSGP BVCI=%d (PTP) DL_UNITDATA\n", bvci); |
| if (the_pcu->bssgp.on_dl_unit_data) |
| the_pcu->bssgp.on_dl_unit_data(&the_pcu->bssgp, msg, tp); |
| gprs_bssgp_pcu_rx_dl_ud(msg, tp); |
| break; |
| case BSSGP_PDUT_FLOW_CONTROL_BVC_ACK: |
| case BSSGP_PDUT_FLOW_CONTROL_MS_ACK: |
| LOGP(DBSSGP, LOGL_DEBUG, "Rx BSSGP BVCI=%d (PTP) %s\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| break; |
| case BSSGP_PDUT_PAGING_CS: |
| gprs_bssgp_pcu_rx_paging_cs(msg, tp); |
| break; |
| case BSSGP_PDUT_PAGING_PS: |
| gprs_bssgp_pcu_rx_paging_ps(msg, tp); |
| break; |
| case BSSGP_PDUT_RA_CAPABILITY: |
| case BSSGP_PDUT_RA_CAPA_UPDATE_ACK: |
| LOGP(DBSSGP, LOGL_INFO, "Rx BSSGP BVCI=%d (PTP) PDU type %s not implemented\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| break; |
| /* See TS 08.18 5.4.1 */ |
| case BSSGP_PDUT_SUSPEND: |
| case BSSGP_PDUT_SUSPEND_ACK: |
| case BSSGP_PDUT_SUSPEND_NACK: |
| case BSSGP_PDUT_RESUME: |
| case BSSGP_PDUT_RESUME_ACK: |
| case BSSGP_PDUT_RESUME_NACK: |
| case BSSGP_PDUT_FLUSH_LL: |
| case BSSGP_PDUT_FLUSH_LL_ACK: |
| case BSSGP_PDUT_LLC_DISCARD: |
| case BSSGP_PDUT_BVC_BLOCK: |
| case BSSGP_PDUT_BVC_BLOCK_ACK: |
| case BSSGP_PDUT_BVC_UNBLOCK: |
| case BSSGP_PDUT_BVC_UNBLOCK_ACK: |
| case BSSGP_PDUT_BVC_RESET: |
| case BSSGP_PDUT_BVC_RESET_ACK: |
| case BSSGP_PDUT_SGSN_INVOKE_TRACE: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%u (PTP) PDU type %s unexpected at PTP\n", |
| bctx->bvci, bssgp_pdu_str(pdu_type)); |
| rc = bssgp_tx_status(BSSGP_CAUSE_PROTO_ERR_UNSPEC, NULL, msg); |
| break; |
| default: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%u (PTP) PDU type %s unknown\n", |
| bctx->bvci, bssgp_pdu_str(pdu_type)); |
| rc = bssgp_tx_status(BSSGP_CAUSE_PROTO_ERR_UNSPEC, NULL, msg); |
| break; |
| } |
| return rc; |
| } |
| |
| /* Receive a BSSGP PDU from a SGSN on a SIGNALLING BVCI */ |
| static int gprs_bssgp_pcu_rx_sign(struct msgb *msg, struct tlv_parsed *tp, struct bssgp_bvc_ctx *bctx) |
| { |
| struct bssgp_normal_hdr *bgph = (struct bssgp_normal_hdr *) msgb_bssgph(msg); |
| enum bssgp_pdu_type pdu_type = (enum bssgp_pdu_type) bgph->pdu_type; |
| int rc = 0; |
| int bvci = bctx ? bctx->bvci : msgb_bvci(msg); |
| switch (pdu_type) { |
| case BSSGP_PDUT_STATUS: |
| /* already handled in libosmogb */ |
| OSMO_ASSERT(0); |
| break; |
| case BSSGP_PDUT_SUSPEND_ACK: |
| case BSSGP_PDUT_RESUME_ACK: |
| case BSSGP_PDUT_BVC_BLOCK_ACK: |
| LOGP(DBSSGP, LOGL_DEBUG, "Rx BSSGP BVCI=%d (SIGN) %s\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| break; |
| case BSSGP_PDUT_BVC_RESET_ACK: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%d (SIGN) BVC_RESET_ACK\n", bvci); |
| if (!the_pcu->bssgp.bvc_sig_reset) |
| the_pcu->bssgp.bvc_sig_reset = 1; |
| else |
| the_pcu->bssgp.bvc_reset = 1; |
| bvc_timeout(NULL); |
| break; |
| case BSSGP_PDUT_PAGING_CS: |
| gprs_bssgp_pcu_rx_paging_cs(msg, tp); |
| break; |
| case BSSGP_PDUT_PAGING_PS: |
| gprs_bssgp_pcu_rx_paging_ps(msg, tp); |
| break; |
| case BSSGP_PDUT_BVC_UNBLOCK_ACK: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%d (SIGN) BVC_UNBLOCK_ACK\n", bvci); |
| the_pcu->bssgp.bvc_unblocked = 1; |
| if (the_pcu->bssgp.on_unblock_ack) |
| the_pcu->bssgp.on_unblock_ack(&the_pcu->bssgp); |
| bvc_timeout(NULL); |
| break; |
| case BSSGP_PDUT_SUSPEND_NACK: |
| case BSSGP_PDUT_RESUME_NACK: |
| case BSSGP_PDUT_FLUSH_LL: |
| case BSSGP_PDUT_SGSN_INVOKE_TRACE: |
| LOGP(DBSSGP, LOGL_INFO, "Rx BSSGP BVCI=%d (SIGN) PDU type %s not implemented\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| break; |
| /* See TS 08.18 5.4.1 */ |
| case BSSGP_PDUT_UL_UNITDATA: |
| case BSSGP_PDUT_DL_UNITDATA: |
| case BSSGP_PDUT_RA_CAPABILITY: |
| case BSSGP_PDUT_PTM_UNITDATA: |
| case BSSGP_PDUT_RA_CAPA_UDPATE: |
| case BSSGP_PDUT_RA_CAPA_UPDATE_ACK: |
| case BSSGP_PDUT_RADIO_STATUS: |
| case BSSGP_PDUT_FLOW_CONTROL_BVC: |
| case BSSGP_PDUT_FLOW_CONTROL_BVC_ACK: |
| case BSSGP_PDUT_FLOW_CONTROL_MS: |
| case BSSGP_PDUT_FLOW_CONTROL_MS_ACK: |
| case BSSGP_PDUT_DOWNLOAD_BSS_PFC: |
| case BSSGP_PDUT_CREATE_BSS_PFC: |
| case BSSGP_PDUT_CREATE_BSS_PFC_ACK: |
| case BSSGP_PDUT_CREATE_BSS_PFC_NACK: |
| case BSSGP_PDUT_MODIFY_BSS_PFC: |
| case BSSGP_PDUT_MODIFY_BSS_PFC_ACK: |
| case BSSGP_PDUT_DELETE_BSS_PFC: |
| case BSSGP_PDUT_DELETE_BSS_PFC_ACK: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%d (SIGN) PDU type %s unexpected at SIGN\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| break; |
| default: |
| LOGP(DBSSGP, LOGL_NOTICE, "Rx BSSGP BVCI=%d (SIGN) PDU type %s unknown\n", |
| bvci, bssgp_pdu_str(pdu_type)); |
| rc = bssgp_tx_status(BSSGP_CAUSE_PROTO_ERR_UNSPEC, NULL, msg); |
| break; |
| } |
| return rc; |
| } |
| |
| static int gprs_bssgp_pcu_rcvmsg(struct msgb *msg) |
| { |
| struct bssgp_normal_hdr *bgph = (struct bssgp_normal_hdr *) msgb_bssgph(msg); |
| struct bssgp_ud_hdr *budh = (struct bssgp_ud_hdr *) msgb_bssgph(msg); |
| struct tlv_parsed tp; |
| enum bssgp_pdu_type pdu_type = (enum bssgp_pdu_type) bgph->pdu_type; |
| uint16_t ns_bvci = msgb_bvci(msg), nsei = msgb_nsei(msg); |
| uint16_t bvci; |
| int data_len; |
| int rc = 0; |
| struct bssgp_bvc_ctx *bctx; |
| |
| switch (pdu_type) { |
| case BSSGP_PDUT_STATUS: |
| /* Pass the message to the generic BSSGP parser, which handles |
| * STATUS and RESET messages in either direction. */ |
| case BSSGP_PDUT_RAN_INFO: |
| case BSSGP_PDUT_RAN_INFO_REQ: |
| case BSSGP_PDUT_RAN_INFO_ACK: |
| case BSSGP_PDUT_RAN_INFO_ERROR: |
| case BSSGP_PDUT_RAN_INFO_APP_ERROR: |
| /* Also pass all RIM related messages to the generic BSSGP |
| * parser so that it can deliver primitive to the RIM SAP |
| * (SAP_BSSGP_RIM) */ |
| return bssgp_rcvmsg(msg); |
| default: |
| break; |
| } |
| |
| /* Identifiers from DOWN: NSEI, BVCI (both in msg->cb) */ |
| |
| /* UNITDATA BSSGP headers have TLLI in front */ |
| if (pdu_type != BSSGP_PDUT_UL_UNITDATA && pdu_type != BSSGP_PDUT_DL_UNITDATA) |
| { |
| data_len = msgb_bssgp_len(msg) - sizeof(*bgph); |
| rc = bssgp_tlv_parse(&tp, bgph->data, data_len); |
| } |
| else |
| { |
| data_len = msgb_bssgp_len(msg) - sizeof(*budh); |
| rc = bssgp_tlv_parse(&tp, budh->data, data_len); |
| } |
| if (rc < 0) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to parse BSSGP %s message. Invalid message was: %s\n", |
| bssgp_pdu_str(pdu_type), msgb_hexdump(msg)); |
| return bssgp_tx_status(BSSGP_CAUSE_INV_MAND_INF, NULL, msg); |
| } |
| |
| if (pdu_type == BSSGP_PDUT_BVC_RESET) { |
| if (ns_bvci != BVCI_SIGNALLING || !TLVP_PRESENT(&tp, BSSGP_IE_BVCI)) { |
| LOGP(DBSSGP, LOGL_ERROR, "Rx an invalid BVC-RESET %s\n", msgb_hexdump(msg)); |
| return bssgp_tx_status(BSSGP_CAUSE_INV_MAND_INF, NULL, msg); |
| } |
| |
| bvci = tlvp_val16be(&tp, BSSGP_IE_BVCI); |
| if (bvci != BVCI_SIGNALLING && bvci != the_pcu->bssgp.bctx->bvci) { |
| LOGP(DBSSGP, LOGL_ERROR, "Rx BVC-RESET for an unknown BVCI %d\n", bvci); |
| return bssgp_tx_status(BSSGP_CAUSE_UNKNOWN_BVCI, &bvci, msg); |
| } |
| |
| return bssgp_rcvmsg(msg); |
| } |
| |
| /* look-up or create the BTS context for this BVC */ |
| bctx = btsctx_by_bvci_nsei(ns_bvci, msgb_nsei(msg)); |
| |
| if (!bctx && ns_bvci != BVCI_SIGNALLING) |
| { |
| LOGP(DBSSGP, LOGL_NOTICE, "NSEI=%u/BVCI=%u Rejecting PDU type %s for unknown BVCI\n", |
| nsei, ns_bvci, bssgp_pdu_str(pdu_type)); |
| return bssgp_tx_status(BSSGP_CAUSE_UNKNOWN_BVCI, NULL, msg); |
| } |
| |
| if (bctx) |
| { |
| log_set_context(LOG_CTX_GB_BVC, bctx); |
| rate_ctr_inc(rate_ctr_group_get_ctr(bctx->ctrg, BSSGP_CTR_PKTS_IN)); |
| rate_ctr_add(rate_ctr_group_get_ctr(bctx->ctrg, BSSGP_CTR_BYTES_IN), msgb_bssgp_len(msg)); |
| } |
| |
| if (ns_bvci == BVCI_SIGNALLING) |
| { |
| LOGP(DBSSGP, LOGL_DEBUG, "rx BVCI_SIGNALLING gprs_bssgp_rx_sign\n"); |
| rc = gprs_bssgp_pcu_rx_sign(msg, &tp, bctx); |
| } |
| else if (ns_bvci == BVCI_PTM) |
| { |
| LOGP(DBSSGP, LOGL_DEBUG, "rx BVCI_PTM bssgp_tx_status\n"); |
| rc = bssgp_tx_status(BSSGP_CAUSE_PDU_INCOMP_FEAT, NULL, msg); |
| } |
| else |
| { |
| LOGP(DBSSGP, LOGL_DEBUG, "rx BVCI_PTP=%u gprs_bssgp_rx_ptp\n", ns_bvci); |
| rc = gprs_bssgp_pcu_rx_ptp(msg, &tp, bctx); |
| } |
| return rc; |
| } |
| |
| static void handle_nm_status(struct osmo_bssgp_prim *bp) |
| { |
| enum gprs_bssgp_cause cause; |
| |
| LOGP(DPCU, LOGL_DEBUG, |
| "Got NM-STATUS.ind, BVCI=%d, NSEI=%d\n", |
| bp->bvci, bp->nsei); |
| |
| if (!TLVP_PRESENT(bp->tp, BSSGP_IE_CAUSE)) |
| return; |
| |
| cause = (enum gprs_bssgp_cause)*TLVP_VAL(bp->tp, BSSGP_IE_CAUSE); |
| |
| if (cause != BSSGP_CAUSE_BVCI_BLOCKED && |
| cause != BSSGP_CAUSE_UNKNOWN_BVCI) |
| return; |
| |
| if (!TLVP_PRESENT(bp->tp, BSSGP_IE_BVCI)) |
| return; |
| |
| if (the_pcu->bssgp.bctx->bvci != bp->bvci) { |
| LOGP(DPCU, LOGL_NOTICE, |
| "Received BSSGP STATUS message for an unknown BVCI (%d), " |
| "ignored\n", |
| bp->bvci); |
| return; |
| } |
| |
| switch (cause) { |
| case BSSGP_CAUSE_BVCI_BLOCKED: |
| if (the_pcu->bssgp.bvc_unblocked) { |
| the_pcu->bssgp.bvc_unblocked = 0; |
| bvc_timeout(NULL); |
| } |
| break; |
| |
| case BSSGP_CAUSE_UNKNOWN_BVCI: |
| if (the_pcu->bssgp.bvc_reset) { |
| the_pcu->bssgp.bvc_reset = 0; |
| bvc_timeout(NULL); |
| } |
| break; |
| default: |
| break; |
| } |
| } |
| |
| int bssgp_prim_cb(struct osmo_prim_hdr *oph, void *ctx) |
| { |
| struct osmo_bssgp_prim *bp; |
| int rc; |
| enum gprs_bssgp_cause cause; |
| bp = container_of(oph, struct osmo_bssgp_prim, oph); |
| |
| switch (oph->sap) { |
| case SAP_BSSGP_NM: |
| switch (oph->primitive) { |
| case PRIM_NM_STATUS: |
| handle_nm_status(bp); |
| break; |
| case PRIM_NM_BVC_RESET: |
| /* received a BVC PTP reset */ |
| LOGP(DPCU, LOGL_INFO, "Rx BVC_RESET on bvci %d\n", bp->bvci); |
| /* Rx Reset from SGSN */ |
| if (bp->bvci == BVCI_SIGNALLING) { |
| if (TLVP_PRES_LEN(bp->tp, BSSGP_IE_CAUSE, 1)) |
| cause = (enum gprs_bssgp_cause)*TLVP_VAL(bp->tp, BSSGP_IE_CAUSE); |
| else { |
| LOGP(DBSSGP, LOGL_ERROR, "NSEI=%u BVC RESET without cause?!\n", bp->nsei); |
| break; |
| } |
| |
| rc = bssgp_tx_bvc_ptp_reset(bp->nsei, cause); |
| if (rc < 0) { |
| LOGP(DBSSGP, LOGL_ERROR, "NSEI=%u BVC PTP reset procedure failed: %d\n", bp->nsei, rc); |
| break; |
| } |
| the_pcu->bssgp.bvc_sig_reset = 1; |
| the_pcu->bssgp.bvc_reset = 0; |
| the_pcu->bssgp.bvc_unblocked = 0; |
| } else if (bp->bvci == the_pcu->bssgp.bctx->bvci) { |
| the_pcu->bssgp.bvc_reset = 1; |
| the_pcu->bssgp.bvc_unblocked = 0; |
| bvc_timeout(NULL); |
| } |
| break; |
| } |
| break; |
| case SAP_BSSGP_RIM: |
| return handle_rim(bp); |
| default: |
| break; |
| } |
| return 0; |
| } |
| |
| void gprs_ns_prim_status_cb(struct osmo_gprs_ns2_prim *nsp) |
| { |
| switch (nsp->u.status.cause) { |
| case GPRS_NS2_AFF_CAUSE_SNS_CONFIGURED: |
| LOGP(DPCU, LOGL_NOTICE, "NS-NSE %d SNS configured.\n", nsp->nsei); |
| break; |
| case GPRS_NS2_AFF_CAUSE_RECOVERY: |
| LOGP(DPCU, LOGL_NOTICE, "NS-NSE %d became available\n", nsp->nsei); |
| if (!the_pcu->bssgp.nsvc_unblocked) { |
| the_pcu->bssgp.bvc_sig_reset = 0; |
| the_pcu->bssgp.bvc_reset = 0; |
| the_pcu->bssgp.nsvc_unblocked = 1; |
| bvc_timeout(NULL); |
| } |
| break; |
| case GPRS_NS2_AFF_CAUSE_FAILURE: |
| LOGP(DPCU, LOGL_NOTICE, "NS-NSE %d became unavailable\n", nsp->nsei); |
| if (the_pcu->bssgp.nsvc_unblocked) { |
| the_pcu->bssgp.nsvc_unblocked = 0; |
| osmo_timer_del(&the_pcu->bssgp.bvc_timer); |
| the_pcu->bssgp.bvc_sig_reset = 0; |
| the_pcu->bssgp.bvc_reset = 0; |
| the_pcu->bssgp.bvc_unblocked = 0; |
| } |
| break; |
| case GPRS_NS2_AFF_CAUSE_SNS_FAILURE: |
| break; |
| default: |
| LOGP(DPCU, LOGL_DEBUG, |
| "NS: %s Unknown affecting cause %s / %d from NS\n", |
| get_value_string(osmo_prim_op_names, nsp->oph.operation), |
| gprs_ns2_aff_cause_prim_str(nsp->u.status.cause), nsp->u.status.cause); |
| break; |
| } |
| } |
| |
| /* called by the ns layer */ |
| int gprs_ns_prim_cb(struct osmo_prim_hdr *oph, void *ctx) |
| { |
| struct osmo_gprs_ns2_prim *nsp; |
| int rc = 0; |
| |
| if (oph->sap != SAP_NS) |
| return 0; |
| |
| nsp = container_of(oph, struct osmo_gprs_ns2_prim, oph); |
| |
| if (oph->operation != PRIM_OP_INDICATION) { |
| LOGP(DPCU, LOGL_NOTICE, "NS: %s Unknown prim %d from NS\n", |
| get_value_string(osmo_prim_op_names, oph->operation), |
| oph->operation); |
| goto out; |
| } |
| |
| switch (oph->primitive) { |
| case GPRS_NS2_PRIM_UNIT_DATA: |
| /* hand the message into the BSSGP implementation */ |
| /* add required msg fields for Gb layer */ |
| msgb_bssgph(oph->msg) = oph->msg->l3h; |
| msgb_bvci(oph->msg) = nsp->bvci; |
| msgb_nsei(oph->msg) = nsp->nsei; |
| rc = gprs_bssgp_pcu_rcvmsg(oph->msg); |
| break; |
| case GPRS_NS2_PRIM_STATUS: |
| gprs_ns_prim_status_cb(nsp); |
| break; |
| case GPRS_NS2_PRIM_CONGESTION: |
| break; |
| default: |
| LOGP(DPCU, LOGL_DEBUG, |
| "NS: %s Unknown prim %s / %d from NS\n", |
| get_value_string(osmo_prim_op_names, oph->operation), |
| gprs_ns2_prim_str((enum gprs_ns2_prim) oph->primitive), oph->primitive); |
| break; |
| } |
| |
| out: |
| if (oph->msg) |
| msgb_free(oph->msg); |
| |
| return rc; |
| } |
| |
| /* called by the bssgp layer to send NS PDUs */ |
| int gprs_gp_send_cb(void *ctx, struct msgb *msg) |
| { |
| struct gprs_ns2_inst *nsi = (struct gprs_ns2_inst *) ctx; |
| struct osmo_gprs_ns2_prim nsp = {}; |
| nsp.nsei = msgb_nsei(msg); |
| nsp.bvci = msgb_bvci(msg); |
| osmo_prim_init(&nsp.oph, SAP_NS, GPRS_NS2_PRIM_UNIT_DATA, |
| PRIM_OP_REQUEST, msg); |
| return gprs_ns2_recv_prim(nsi, &nsp.oph); |
| } |
| |
| static unsigned count_pdch(const struct gprs_rlcmac_bts *bts) |
| { |
| size_t trx_no, ts_no; |
| unsigned num_pdch = 0; |
| |
| for (trx_no = 0; trx_no < ARRAY_SIZE(bts->trx); ++trx_no) { |
| const struct gprs_rlcmac_trx *trx = &bts->trx[trx_no]; |
| |
| for (ts_no = 0; ts_no < ARRAY_SIZE(trx->pdch); ++ts_no) { |
| const struct gprs_rlcmac_pdch *pdch = &trx->pdch[ts_no]; |
| |
| if (pdch->m_is_enabled) |
| num_pdch += 1; |
| } |
| } |
| |
| return num_pdch; |
| } |
| |
| static uint32_t gprs_bssgp_max_leak_rate(enum CodingScheme cs, int num_pdch) |
| { |
| int bytes_per_rlc_block = mcs_max_data_block_bytes(cs) * num_data_blocks(mcs_header_type(cs)); |
| |
| /* n byte payload per 20ms */ |
| return bytes_per_rlc_block * (1000 / 20) * num_pdch; |
| } |
| |
| static uint32_t compute_bucket_size(struct gprs_rlcmac_bts *bts, |
| uint32_t leak_rate, uint32_t fallback) |
| { |
| uint32_t bucket_size = 0; |
| uint16_t bucket_time = the_pcu->vty.fc_bucket_time; |
| |
| if (bucket_time == 0) |
| bucket_time = the_pcu->vty.force_llc_lifetime; |
| |
| if (bucket_time == 0xffff) |
| bucket_size = FC_MAX_BUCKET_SIZE; |
| |
| if (bucket_size == 0 && bucket_time && leak_rate) |
| bucket_size = (uint64_t)leak_rate * bucket_time / 100; |
| |
| if (bucket_size == 0 && leak_rate) |
| bucket_size = leak_rate * FC_DEFAULT_LIFE_TIME_SECS; |
| |
| if (bucket_size == 0) |
| bucket_size = fallback; |
| |
| if (bucket_size > FC_MAX_BUCKET_SIZE) |
| bucket_size = FC_MAX_BUCKET_SIZE; |
| |
| return bucket_size; |
| } |
| |
| static uint32_t get_and_reset_avg_queue_delay(void) |
| { |
| struct timespec *delay_sum = &the_pcu->bssgp.queue_delay_sum; |
| uint32_t delay_sum_ms = delay_sum->tv_sec * 1000 + |
| delay_sum->tv_nsec / 1000000000; |
| uint32_t avg_delay_ms = 0; |
| |
| if (the_pcu->bssgp.queue_delay_count > 0) |
| avg_delay_ms = delay_sum_ms / the_pcu->bssgp.queue_delay_count; |
| |
| /* Reset accumulator */ |
| delay_sum->tv_sec = delay_sum->tv_nsec = 0; |
| the_pcu->bssgp.queue_delay_count = 0; |
| |
| return avg_delay_ms; |
| } |
| |
| static int get_and_reset_measured_leak_rate(int *usage_by_1000, unsigned num_pdch) |
| { |
| int rate; /* byte per second */ |
| |
| if (the_pcu->bssgp.queue_frames_sent == 0) |
| return -1; |
| |
| if (the_pcu->bssgp.queue_frames_recv == 0) |
| return -1; |
| |
| *usage_by_1000 = the_pcu->bssgp.queue_frames_recv * 1000 / |
| the_pcu->bssgp.queue_frames_sent; |
| |
| /* 20ms/num_pdch is the average RLC block duration, so the rate is |
| * calculated as: |
| * rate = bytes_recv / (block_dur * block_count) */ |
| rate = the_pcu->bssgp.queue_bytes_recv * 1000 * num_pdch / |
| (20 * the_pcu->bssgp.queue_frames_recv); |
| |
| the_pcu->bssgp.queue_frames_sent = 0; |
| the_pcu->bssgp.queue_bytes_recv = 0; |
| the_pcu->bssgp.queue_frames_recv = 0; |
| |
| return rate; |
| } |
| |
| static enum CodingScheme max_coding_scheme_dl(struct gprs_rlcmac_bts *bts) |
| { |
| int num = 0; |
| int i; |
| bool mcs_any = false; |
| |
| /* First check if we support any MCS: */ |
| for (i = 8; i >= 0; i--) { |
| if (bts->mcs_mask & (1 << i)) { |
| num = i + 1; |
| mcs_any = true; |
| break; |
| } |
| } |
| |
| if (mcs_any) { |
| if (!the_pcu->vty.cs_adj_enabled) { |
| if (bts->initial_mcs_dl) { |
| num = bts->initial_mcs_dl; |
| } else { |
| /* We found "num" for free in the loop above */ |
| } |
| } else if (bts_max_mcs_dl(bts)) { |
| num = bts_max_mcs_dl(bts); |
| } else { |
| num = 9; |
| } |
| |
| if (num) |
| return mcs_get_egprs_by_num(num); |
| } |
| |
| if (!the_pcu->vty.cs_adj_enabled) { |
| if (bts->initial_cs_dl) { |
| num = bts->initial_cs_dl; |
| } else { |
| for (i = 3; i >= 0; i--) { |
| if (bts->cs_mask & (1 << i)) { |
| num = i + 1; |
| break; |
| } |
| } |
| } |
| } else if (bts_max_cs_dl(bts)) { |
| num = bts_max_cs_dl(bts); |
| } |
| |
| if (!num) |
| num = 4; |
| |
| return mcs_get_gprs_by_num(num); |
| } |
| |
| static int gprs_bssgp_tx_fc_bvc(void) |
| { |
| struct gprs_rlcmac_bts *bts; |
| uint32_t bucket_size; /* oct */ |
| uint32_t ms_bucket_size; /* oct */ |
| uint32_t leak_rate; /* oct/s */ |
| uint32_t ms_leak_rate; /* oct/s */ |
| uint32_t avg_delay_ms; |
| int num_pdch = -1; |
| enum CodingScheme max_cs_dl; |
| |
| if (!the_pcu->bssgp.bctx) { |
| LOGP(DBSSGP, LOGL_ERROR, "No bctx\n"); |
| return -EIO; |
| } |
| |
| /* FIXME: This calculation needs to be redone to support multiple BTS */ |
| bts = llist_first_entry_or_null(&the_pcu->bts_list, struct gprs_rlcmac_bts, list); |
| if (!bts) { |
| LOGP(DBSSGP, LOGL_ERROR, "No bts\n"); |
| return -EIO; |
| } |
| |
| max_cs_dl = max_coding_scheme_dl(bts); |
| |
| bucket_size = the_pcu->vty.fc_bvc_bucket_size; |
| leak_rate = the_pcu->vty.fc_bvc_leak_rate; |
| ms_bucket_size = the_pcu->vty.fc_ms_bucket_size; |
| ms_leak_rate = the_pcu->vty.fc_ms_leak_rate; |
| |
| /* FIXME: This calculation is mostly wrong. It should be done based on |
| currently established TBF (and whether the related (egprs)_ms_class |
| as per which CS/MCS they support). */ |
| if (leak_rate == 0) { |
| int meas_rate; |
| int usage; /* in 0..1000 */ |
| |
| if (num_pdch < 0) |
| num_pdch = count_pdch(bts); |
| |
| meas_rate = get_and_reset_measured_leak_rate(&usage, num_pdch); |
| if (meas_rate > 0) { |
| leak_rate = gprs_bssgp_max_leak_rate(max_cs_dl, num_pdch); |
| leak_rate = |
| (meas_rate * usage + leak_rate * (1000 - usage)) / |
| 1000; |
| LOGP(DBSSGP, LOGL_DEBUG, |
| "Estimated BVC leak rate = %d " |
| "(measured %d, usage %d%%)\n", |
| leak_rate, meas_rate, usage/10); |
| } |
| } |
| |
| if (leak_rate == 0) { |
| if (num_pdch < 0) |
| num_pdch = count_pdch(bts); |
| |
| leak_rate = gprs_bssgp_max_leak_rate(max_cs_dl, num_pdch); |
| |
| LOGP(DBSSGP, LOGL_DEBUG, |
| "Computed BVC leak rate = %d, num_pdch = %d, cs = %s\n", |
| leak_rate, num_pdch, mcs_name(max_cs_dl)); |
| }; |
| |
| if (ms_leak_rate == 0) { |
| int ms_num_pdch; |
| int max_pdch = gprs_alloc_max_dl_slots_per_ms(bts, 0); |
| |
| if (num_pdch < 0) |
| num_pdch = count_pdch(bts); |
| |
| ms_num_pdch = num_pdch; |
| if (max_pdch > FC_MS_MAX_RX_SLOTS) |
| max_pdch = FC_MS_MAX_RX_SLOTS; |
| if (ms_num_pdch > max_pdch) |
| ms_num_pdch = max_pdch; |
| |
| ms_leak_rate = gprs_bssgp_max_leak_rate(max_cs_dl, ms_num_pdch); |
| |
| /* TODO: To properly support multiple TRX, the per MS leak rate |
| * should be derived from the max number of PDCH TS per TRX. |
| */ |
| LOGP(DBSSGP, LOGL_DEBUG, |
| "Computed MS default leak rate = %d, ms_num_pdch = %d, " |
| "cs = %s\n", |
| ms_leak_rate, ms_num_pdch, mcs_name(max_cs_dl)); |
| }; |
| |
| /* TODO: Force leak_rate to 0 on buffer bloat */ |
| |
| if (bucket_size == 0) |
| bucket_size = compute_bucket_size(bts, leak_rate, |
| FC_FALLBACK_BVC_BUCKET_SIZE); |
| |
| if (ms_bucket_size == 0) |
| ms_bucket_size = compute_bucket_size(bts, ms_leak_rate, |
| FC_MS_BUCKET_SIZE_BY_BMAX(bucket_size)); |
| |
| if (leak_rate > FC_MAX_BUCKET_LEAK_RATE) |
| leak_rate = FC_MAX_BUCKET_LEAK_RATE; |
| |
| if (ms_leak_rate > FC_MAX_BUCKET_LEAK_RATE) |
| ms_leak_rate = FC_MAX_BUCKET_LEAK_RATE; |
| |
| /* Avg queue delay monitoring */ |
| avg_delay_ms = get_and_reset_avg_queue_delay(); |
| |
| /* Update tag */ |
| the_pcu->bssgp.fc_tag += 1; |
| |
| LOGP(DBSSGP, LOGL_DEBUG, |
| "Sending FLOW CONTROL BVC, Bmax = %d, R = %d, Bmax_MS = %d, " |
| "R_MS = %d, avg_dly = %d\n", |
| bucket_size, leak_rate, ms_bucket_size, ms_leak_rate, |
| avg_delay_ms); |
| |
| return bssgp_tx_fc_bvc(the_pcu->bssgp.bctx, the_pcu->bssgp.fc_tag, |
| bucket_size, leak_rate, |
| ms_bucket_size, ms_leak_rate, |
| NULL, &avg_delay_ms); |
| } |
| |
| static void bvc_timeout(void *_priv) |
| { |
| unsigned long secs; |
| if (!the_pcu->bssgp.bvc_sig_reset) { |
| LOGP(DBSSGP, LOGL_INFO, "Sending reset on BVCI 0\n"); |
| bssgp_tx_bvc_reset(the_pcu->bssgp.bctx, 0, BSSGP_CAUSE_OML_INTERV); |
| secs = osmo_tdef_get(the_pcu->T_defs, -102, OSMO_TDEF_S, -1); |
| osmo_timer_schedule(&the_pcu->bssgp.bvc_timer, secs, 0); |
| return; |
| } |
| |
| if (!the_pcu->bssgp.bvc_reset) { |
| LOGP(DBSSGP, LOGL_INFO, "Sending reset on BVCI %d\n", |
| the_pcu->bssgp.bctx->bvci); |
| bssgp_tx_bvc_reset(the_pcu->bssgp.bctx, the_pcu->bssgp.bctx->bvci, BSSGP_CAUSE_OML_INTERV); |
| secs = osmo_tdef_get(the_pcu->T_defs, -102, OSMO_TDEF_S, -1); |
| osmo_timer_schedule(&the_pcu->bssgp.bvc_timer, secs, 0); |
| return; |
| } |
| |
| if (!the_pcu->bssgp.bvc_unblocked) { |
| LOGP(DBSSGP, LOGL_INFO, "Sending unblock on BVCI %d\n", |
| the_pcu->bssgp.bctx->bvci); |
| bssgp_tx_bvc_unblock(the_pcu->bssgp.bctx); |
| secs = osmo_tdef_get(the_pcu->T_defs, -101, OSMO_TDEF_S, -1); |
| osmo_timer_schedule(&the_pcu->bssgp.bvc_timer, secs, 0); |
| return; |
| } |
| |
| LOGP(DBSSGP, LOGL_DEBUG, "Sending flow control info on BVCI %d\n", |
| the_pcu->bssgp.bctx->bvci); |
| gprs_bssgp_tx_fc_bvc(); |
| osmo_timer_schedule(&the_pcu->bssgp.bvc_timer, the_pcu->vty.fc_interval, 0); |
| } |
| |
| /*! configure NS layer |
| * |
| * \param bts pointer to the bts object |
| * \param nsei the NSEI of the BSS |
| * \param local pointer to an array of local address to bind on. |
| * \param remote pointer to an array of remote address SGSNs. If dynamic IP-SNS is used remote is used as initial SGSN endpoints. |
| * \param nsvci pointer to an array of nsvcis |
| * \param valid bitmask. a 1 means the position in the array contains a valid entry for local, remote, nsvci |
| * \returns 0 if the configuration has succeeded. on error != 0 |
| */ |
| static int ns_configure_nse(struct gprs_rlcmac_bts *bts, |
| uint16_t nsei, |
| const struct osmo_sockaddr *local, |
| const struct osmo_sockaddr *remote, |
| const uint16_t *nsvci, |
| uint16_t valid) |
| { |
| unsigned int i; |
| int rc; |
| uint16_t binds = 0; |
| bool nsvcs = false; |
| struct gprs_ns2_vc *nsvc; |
| struct gprs_ns2_vc_bind *bind[PCU_IF_NUM_NSVC] = { }; |
| char name[16]; |
| bool sns_configured = false; |
| |
| if (!valid) |
| return -1; |
| |
| bts->nse = gprs_ns2_nse_by_nsei(the_pcu->nsi, nsei); |
| if (!bts->nse) |
| bts->nse = gprs_ns2_create_nse(the_pcu->nsi, nsei, |
| GPRS_NS2_LL_UDP, the_pcu->vty.ns_dialect); |
| if (!bts->nse) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to create NSE\n"); |
| return -1; |
| } |
| |
| for (i = 0; i < PCU_IF_NUM_NSVC; i++) { |
| if (!(valid & (1 << i))) |
| continue; |
| |
| if (!gprs_ns2_ip_bind_by_sockaddr(the_pcu->nsi, &local[i])) { |
| snprintf(name, sizeof(name), "pcu%u", i); |
| rc = gprs_ns2_ip_bind(the_pcu->nsi, name, &local[i], 0, &bind[i]); |
| if (rc < 0) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to bind to %s\n", osmo_sockaddr_to_str(&local[i])); |
| continue; |
| } |
| |
| if (the_pcu->vty.ns_dialect == GPRS_NS2_DIALECT_SNS) { |
| rc = gprs_ns2_sns_add_bind(bts->nse, bind[i]); |
| if (rc < 0) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to add bind %s to the NSE for IP-SNS\n", osmo_sockaddr_to_str(&local[i])); |
| continue; |
| } |
| } |
| |
| if (the_pcu->vty.ns_ip_dscp != -1) |
| gprs_ns2_ip_bind_set_dscp(bind[i], the_pcu->vty.ns_ip_dscp); |
| if (the_pcu->vty.ns_priority != -1) |
| gprs_ns2_ip_bind_set_priority(bind[i], the_pcu->vty.ns_priority); |
| } |
| |
| binds |= 1 << i; |
| } |
| |
| if (!binds) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to bind to any NS-VC\n"); |
| gprs_ns2_free_nses(the_pcu->nsi); |
| return -1; |
| } |
| |
| for (i = 0; i < PCU_IF_NUM_NSVC; i++) { |
| if (!(binds & (1 << i))) |
| continue; |
| |
| if (the_pcu->vty.ns_dialect == GPRS_NS2_DIALECT_SNS) { |
| rc = gprs_ns2_sns_add_endpoint(bts->nse, &remote[i]); |
| if (rc && rc != -EALREADY) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to add SNS endpoint %s!\n", osmo_sockaddr_to_str(&remote[i])); |
| return rc; |
| } else { |
| sns_configured = true; |
| } |
| } else { |
| nsvc = gprs_ns2_ip_connect(bind[i], &remote[i], bts->nse, nsvci[i]); |
| if (nsvc) |
| nsvcs = true; |
| else |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to connect to towards SGSN %s!\n", osmo_sockaddr_to_str(&remote[i])); |
| } |
| } |
| |
| if (the_pcu->vty.ns_dialect == GPRS_NS2_DIALECT_SNS) |
| return sns_configured ? 0 : -1; |
| else |
| return nsvcs ? 0 : -1; |
| } |
| |
| struct nsvc_cb { |
| const struct osmo_sockaddr *local; |
| const struct osmo_sockaddr *remote; |
| const uint16_t *nsvci; |
| /* [in] bitmask of valid nsvc in local/remote */ |
| uint16_t valid; |
| /* [out] bitmask of found nsvcs */ |
| uint16_t found; |
| }; |
| |
| static int ns_conf_vc_cb(struct gprs_ns2_vc *nsvc, void *ctx) |
| { |
| struct nsvc_cb *data = (struct nsvc_cb *) ctx; |
| unsigned int i; |
| |
| for (i = 0; i < PCU_IF_NUM_NSVC; i++) { |
| if (!(data->valid & (1 << i))) |
| continue; |
| if (data->found & (1 << i)) |
| continue; |
| |
| if (gprs_ns2_ip_vc_equal(nsvc, &data->local[i], |
| &data->remote[i], |
| data->nsvci[i])) { |
| data->found |= 1 << i; |
| return 0; |
| } |
| } |
| |
| /* Found an extra nsvc */ |
| LOGP(DBSSGP, LOGL_DEBUG, " Removing NSVC %s\n", gprs_ns2_ll_str(nsvc)); |
| gprs_ns2_free_nsvc(nsvc); |
| |
| return 0; |
| } |
| |
| /* update the ns configuration if needed */ |
| int gprs_ns_update_config(struct gprs_rlcmac_bts *bts, uint16_t nsei, |
| const struct osmo_sockaddr *local, |
| const struct osmo_sockaddr *remote, |
| uint16_t *nsvci, uint16_t valid) |
| { |
| int rc = 0; |
| if (!bts->nse) { |
| /* there shouldn't any previous state. */ |
| gprs_ns2_free_nses(the_pcu->nsi); |
| gprs_ns2_free_binds(the_pcu->nsi); |
| rc = ns_configure_nse(bts, nsei, local, remote, nsvci, valid); |
| } else if (nsei != gprs_ns2_nse_nsei(bts->nse)) { |
| /* the NSEI has changed */ |
| gprs_ns2_free_nses(the_pcu->nsi); |
| gprs_ns2_free_binds(the_pcu->nsi); |
| rc = ns_configure_nse(bts, nsei, local, remote, nsvci, valid); |
| } else if (the_pcu->vty.ns_dialect == GPRS_NS2_DIALECT_SNS) { |
| /* SNS: check if the initial nsvc is the same, if not recreate it */ |
| const struct osmo_sockaddr *initial = gprs_ns2_nse_sns_remote(bts->nse); |
| unsigned int i; |
| for (i = 0; i < PCU_IF_NUM_NSVC; i++) { |
| if (!(valid & (1 << i))) |
| continue; |
| |
| /* found the initial - everything should be fine */ |
| if (!osmo_sockaddr_cmp(initial, &remote[i])) |
| return 0; |
| } |
| |
| gprs_ns2_free_nses(the_pcu->nsi); |
| gprs_ns2_free_binds(the_pcu->nsi); |
| rc = ns_configure_nse(bts, nsei, local, remote, nsvci, valid); |
| } else { |
| /* check if all NSVC are still the same. */ |
| struct nsvc_cb data = { |
| .local = &local[0], |
| .remote = &remote[0], |
| .nsvci = &nsvci[0], |
| .valid = valid, |
| .found = 0, |
| }; |
| |
| /* search the current active nsvcs */ |
| gprs_ns2_nse_foreach_nsvc(bts->nse, &ns_conf_vc_cb, &data); |
| |
| /* we found all our valid nsvcs and might have removed all other nsvcs */ |
| if (valid == data.found) |
| return 0; |
| |
| /* remove all found nsvcs from the valid field */ |
| valid &= ~data.found; |
| rc = ns_configure_nse(bts, nsei, local, remote, nsvci, valid); |
| } |
| |
| if (rc) |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to connect!\n"); |
| |
| return rc; |
| } |
| |
| struct gprs_bssgp_pcu *gprs_bssgp_init( |
| struct gprs_rlcmac_bts *bts, |
| uint16_t nsei, uint16_t bvci, |
| uint16_t mcc, uint16_t mnc, bool mnc_3_digits, |
| uint16_t lac, uint16_t rac, uint16_t cell_id) |
| { |
| |
| /* if already created... return the current address */ |
| if (the_pcu->bssgp.bctx) |
| return &the_pcu->bssgp; |
| |
| the_pcu->bssgp.bts = bts; |
| the_pcu->bssgp.bctx = btsctx_alloc(bvci, nsei); |
| if (!the_pcu->bssgp.bctx) { |
| LOGP(DBSSGP, LOGL_ERROR, "Failed to create BSSGP context\n"); |
| the_pcu->bssgp.bts->nse = NULL; |
| return NULL; |
| } |
| the_pcu->bssgp.bctx->is_sgsn = false; |
| the_pcu->bssgp.bctx->ra_id.mcc = spoof_mcc ? : mcc; |
| if (spoof_mnc) { |
| the_pcu->bssgp.bctx->ra_id.mnc = spoof_mnc; |
| the_pcu->bssgp.bctx->ra_id.mnc_3_digits = spoof_mnc_3_digits; |
| } else { |
| the_pcu->bssgp.bctx->ra_id.mnc = mnc; |
| the_pcu->bssgp.bctx->ra_id.mnc_3_digits = mnc_3_digits; |
| } |
| the_pcu->bssgp.bctx->ra_id.lac = lac; |
| the_pcu->bssgp.bctx->ra_id.rac = rac; |
| the_pcu->bssgp.bctx->cell_id = cell_id; |
| |
| osmo_timer_setup(&the_pcu->bssgp.bvc_timer, bvc_timeout, bts); |
| |
| the_pcu->bssgp.ctrs = rate_ctr_group_alloc(the_pcu, &sgsn_ctrg_desc, 0); |
| OSMO_ASSERT(the_pcu->bssgp.ctrs) |
| |
| return &the_pcu->bssgp; |
| } |
| |
| void gprs_bssgp_destroy(struct gprs_rlcmac_bts *bts) |
| { |
| rate_ctr_group_free(the_pcu->bssgp.ctrs); |
| osmo_timer_del(&the_pcu->bssgp.bvc_timer); |
| |
| /* FIXME: blocking... */ |
| the_pcu->bssgp.nsvc_unblocked = 0; |
| the_pcu->bssgp.bvc_sig_reset = 0; |
| the_pcu->bssgp.bvc_reset = 0; |
| the_pcu->bssgp.bvc_unblocked = 0; |
| |
| bssgp_bvc_ctx_free(the_pcu->bssgp.bctx); |
| the_pcu->bssgp.bctx = NULL; |
| |
| gprs_ns2_free(the_pcu->nsi); |
| the_pcu->nsi = NULL; |
| bts->nse = NULL; |
| } |
| |
| void gprs_bssgp_update_frames_sent() |
| { |
| the_pcu->bssgp.queue_frames_sent += 1; |
| } |
| |
| void gprs_bssgp_update_bytes_received(unsigned bytes_recv, unsigned frames_recv) |
| { |
| the_pcu->bssgp.queue_bytes_recv += bytes_recv; |
| the_pcu->bssgp.queue_frames_recv += frames_recv; |
| } |
| |
| void gprs_bssgp_update_queue_delay(const struct timespec *tv_recv, |
| const struct timespec *tv_now) |
| { |
| struct timespec *delay_sum = &the_pcu->bssgp.queue_delay_sum; |
| struct timespec tv_delay; |
| |
| timespecsub(tv_now, tv_recv, &tv_delay); |
| timespecadd(delay_sum, &tv_delay, delay_sum); |
| |
| the_pcu->bssgp.queue_delay_count += 1; |
| } |