/* Copied from gprs_bssgp_pcu.cpp * * Copyright (C) 2012 Ivan Klyuchnikov * Copyright (C) 2012 Andreas Eversberg * 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 #include #include #include #include #include #include #include #include #include #include #include #include #include extern "C" { #include #include #include #include #include #include #include #include #include } #include #include extern void *tall_pcu_ctx; static unsigned int next_tbf_ctr_group_id = 0; /* Incrementing group id */ static void tbf_timer_cb(void *_tbf); const struct value_string gprs_rlcmac_tbf_poll_state_names[] = { OSMO_VALUE_STRING(GPRS_RLCMAC_POLL_NONE), OSMO_VALUE_STRING(GPRS_RLCMAC_POLL_SCHED), /* a polling was scheduled */ { 0, NULL } }; const struct value_string gprs_rlcmac_tbf_dl_ass_state_names[] = { OSMO_VALUE_STRING(GPRS_RLCMAC_DL_ASS_NONE), OSMO_VALUE_STRING(GPRS_RLCMAC_DL_ASS_SEND_ASS), OSMO_VALUE_STRING(GPRS_RLCMAC_DL_ASS_WAIT_ACK), { 0, NULL } }; const struct value_string gprs_rlcmac_tbf_ul_ass_state_names[] = { OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ASS_NONE), OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ASS_SEND_ASS), OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ASS_SEND_ASS_REJ), OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ASS_WAIT_ACK), { 0, NULL } }; const struct value_string gprs_rlcmac_tbf_ul_ack_state_names[] = { OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ACK_NONE), OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ACK_SEND_ACK), /* send acknowledge on next RTS */ OSMO_VALUE_STRING(GPRS_RLCMAC_UL_ACK_WAIT_ACK), /* wait for PACKET CONTROL ACK */ { 0, NULL } }; static const struct value_string tbf_counters_names[] = { OSMO_VALUE_STRING(N3101), OSMO_VALUE_STRING(N3103), OSMO_VALUE_STRING(N3105), { 0, NULL } }; static const struct value_string tbf_timers_names[] = { OSMO_VALUE_STRING(T0), OSMO_VALUE_STRING(T3169), OSMO_VALUE_STRING(T3191), OSMO_VALUE_STRING(T3193), OSMO_VALUE_STRING(T3195), { 0, NULL } }; static const struct rate_ctr_desc tbf_ctr_description[] = { { "rlc:nacked", "RLC Nacked " }, }; static const struct rate_ctr_desc tbf_dl_gprs_ctr_description[] = { { "gprs:downlink:cs1", "CS1 " }, { "gprs:downlink:cs2", "CS2 " }, { "gprs:downlink:cs3", "CS3 " }, { "gprs:downlink:cs4", "CS4 " }, }; static const struct rate_ctr_desc tbf_dl_egprs_ctr_description[] = { { "egprs:downlink:mcs1", "MCS1 " }, { "egprs:downlink:mcs2", "MCS2 " }, { "egprs:downlink:mcs3", "MCS3 " }, { "egprs:downlink:mcs4", "MCS4 " }, { "egprs:downlink:mcs5", "MCS5 " }, { "egprs:downlink:mcs6", "MCS6 " }, { "egprs:downlink:mcs7", "MCS7 " }, { "egprs:downlink:mcs8", "MCS8 " }, { "egprs:downlink:mcs9", "MCS9 " }, }; static const struct rate_ctr_desc tbf_ul_gprs_ctr_description[] = { { "gprs:uplink:cs1", "CS1 " }, { "gprs:uplink:cs2", "CS2 " }, { "gprs:uplink:cs3", "CS3 " }, { "gprs:uplink:cs4", "CS4 " }, }; static const struct rate_ctr_desc tbf_ul_egprs_ctr_description[] = { { "egprs:uplink:mcs1", "MCS1 " }, { "egprs:uplink:mcs2", "MCS2 " }, { "egprs:uplink:mcs3", "MCS3 " }, { "egprs:uplink:mcs4", "MCS4 " }, { "egprs:uplink:mcs5", "MCS5 " }, { "egprs:uplink:mcs6", "MCS6 " }, { "egprs:uplink:mcs7", "MCS7 " }, { "egprs:uplink:mcs8", "MCS8 " }, { "egprs:uplink:mcs9", "MCS9 " }, }; static const struct rate_ctr_group_desc tbf_ctrg_desc = { "pcu:tbf", "TBF Statistics", OSMO_STATS_CLASS_SUBSCRIBER, ARRAY_SIZE(tbf_ctr_description), tbf_ctr_description, }; static const struct rate_ctr_group_desc tbf_dl_gprs_ctrg_desc = { "tbf:gprs", "Data Blocks", OSMO_STATS_CLASS_SUBSCRIBER, ARRAY_SIZE(tbf_dl_gprs_ctr_description), tbf_dl_gprs_ctr_description, }; static const struct rate_ctr_group_desc tbf_dl_egprs_ctrg_desc = { "tbf:egprs", "Data Blocks", OSMO_STATS_CLASS_SUBSCRIBER, ARRAY_SIZE(tbf_dl_egprs_ctr_description), tbf_dl_egprs_ctr_description, }; static const struct rate_ctr_group_desc tbf_ul_gprs_ctrg_desc = { "tbf:gprs", "Data Blocks", OSMO_STATS_CLASS_SUBSCRIBER, ARRAY_SIZE(tbf_ul_gprs_ctr_description), tbf_ul_gprs_ctr_description, }; static const struct rate_ctr_group_desc tbf_ul_egprs_ctrg_desc = { "tbf:egprs", "Data Blocks", OSMO_STATS_CLASS_SUBSCRIBER, ARRAY_SIZE(tbf_ul_egprs_ctr_description), tbf_ul_egprs_ctr_description, }; gprs_rlcmac_tbf::Meas::Meas() : rssi_sum(0), rssi_num(0) { timespecclear(&rssi_tv); } gprs_rlcmac_tbf::gprs_rlcmac_tbf(BTS *bts_, gprs_rlcmac_tbf_direction dir) : state_flags(0), direction(dir), trx(NULL), first_ts(0), first_common_ts(0), control_ts(0xff), poll_fn(0), poll_ts(0), fT(0), num_fT_exp(0), was_releasing(0), upgrade_to_multislot(0), bts(bts_), m_tfi(0), m_created_ts(0), m_ctrs(NULL), m_ms(NULL), m_ta(GSM48_TA_INVALID), m_ms_class(0), state(GPRS_RLCMAC_NULL), dl_ass_state(GPRS_RLCMAC_DL_ASS_NONE), ul_ass_state(GPRS_RLCMAC_UL_ASS_NONE), ul_ack_state(GPRS_RLCMAC_UL_ACK_NONE), poll_state(GPRS_RLCMAC_POLL_NONE), m_list(this), m_ms_list(this), m_egprs_enabled(false) { /* The classes of these members do not have proper constructors yet. * Just set them to 0 like talloc_zero did */ memset(&pdch, 0, sizeof(pdch)); memset(&T, 0, sizeof(T)); memset(&N, 0, sizeof(N)); memset(&gsm_timer, 0, sizeof(gsm_timer)); m_rlc.init(); m_llc.init(); m_name_buf[0] = '\0'; } gprs_rlcmac_bts *gprs_rlcmac_tbf::bts_data() const { return bts->bts_data(); } uint32_t gprs_rlcmac_tbf::tlli() const { return m_ms ? m_ms->tlli() : 0; } const char *gprs_rlcmac_tbf::imsi() const { static const char nullc = 0; return m_ms ? m_ms->imsi() : &nullc; } void gprs_rlcmac_tbf::assign_imsi(const char *imsi_) { GprsMs *old_ms; if (!imsi_ || !m_ms) { LOGPTBF(this, LOGL_ERROR, "failed to assign IMSI: missing IMSI or MS object\n"); return; } if (strcmp(imsi_, imsi()) == 0) return; /* really change the IMSI */ old_ms = bts->ms_store().get_ms(0, 0, imsi_); if (old_ms) { /* We cannot find m_ms by IMSI since we know that it has a * different IMSI */ OSMO_ASSERT(old_ms != m_ms); LOGPTBF(this, LOGL_INFO, "IMSI '%s' was already assigned to another " "MS object: TLLI = 0x%08x, that IMSI will be removed\n", imsi_, old_ms->tlli()); merge_and_clear_ms(old_ms); } m_ms->set_imsi(imsi_); } uint8_t gprs_rlcmac_tbf::ta() const { return m_ms ? m_ms->ta() : m_ta; } void gprs_rlcmac_tbf::set_ta(uint8_t ta) { if (ms()) ms()->set_ta(ta); if (gsm48_ta_is_valid(ta)) m_ta = ta; } uint8_t gprs_rlcmac_tbf::ms_class() const { return m_ms ? m_ms->ms_class() : m_ms_class; } void gprs_rlcmac_tbf::set_ms_class(uint8_t ms_class_) { if (ms()) ms()->set_ms_class(ms_class_); m_ms_class = ms_class_; } GprsCodingScheme gprs_rlcmac_tbf::current_cs() const { GprsCodingScheme cs; if (direction == GPRS_RLCMAC_UL_TBF) cs = m_ms ? m_ms->current_cs_ul() : GprsCodingScheme(); else cs = m_ms ? m_ms->current_cs_dl() : GprsCodingScheme(); return cs; } gprs_llc_queue *gprs_rlcmac_tbf::llc_queue() { return m_ms ? m_ms->llc_queue() : NULL; } const gprs_llc_queue *gprs_rlcmac_tbf::llc_queue() const { return m_ms ? m_ms->llc_queue() : NULL; } size_t gprs_rlcmac_tbf::llc_queue_size() const { /* m_ms->llc_queue() never returns NULL: GprsMs::m_llc_queue is a * member instance. */ return m_ms ? m_ms->llc_queue()->size() : 0; } void gprs_rlcmac_tbf::set_ms(GprsMs *ms) { if (m_ms == ms) return; if (m_ms) { /* Save the TA locally. This will also be called, if the MS * object detaches itself from the TBF, for instance if * attach_tbf() is called */ m_ta = m_ms->ta(); m_ms->detach_tbf(this); } m_ms = ms; if (m_ms) m_ms->attach_tbf(this); } void gprs_rlcmac_tbf::merge_and_clear_ms(GprsMs *old_ms) { if (old_ms == ms()) return; GprsMs::Guard guard_old(old_ms); /* Clean up the old MS object */ /* TODO: Use timer? */ if (old_ms->ul_tbf() && !old_ms->ul_tbf()->timers_pending(T_MAX)) { if (old_ms->ul_tbf() == this) { LOGPTBF(this, LOGL_ERROR, "is referred by the old MS and will not be deleted\n"); set_ms(NULL); } else { tbf_free(old_ms->ul_tbf()); } } if (old_ms->dl_tbf() && !old_ms->dl_tbf()->timers_pending(T_MAX)) { if (old_ms->dl_tbf() == this) { LOGPTBF(this, LOGL_ERROR, "is referred by the old MS and will not be deleted\n"); set_ms(NULL); } else { tbf_free(old_ms->dl_tbf()); } } ms()->merge_old_ms(old_ms); } void gprs_rlcmac_tbf::update_ms(uint32_t tlli, enum gprs_rlcmac_tbf_direction dir) { if (!ms()) return; if (!tlli) return; /* TODO: When the TLLI does not match the ms, check if there is another * MS object that belongs to that TLLI and if yes make sure one of them * gets deleted. This is the same problem that can arise with * assign_imsi() so there should be a unified solution */ if (!ms()->check_tlli(tlli)) { GprsMs *old_ms; old_ms = bts->ms_store().get_ms(tlli, 0, NULL); if (old_ms) merge_and_clear_ms(old_ms); } if (dir == GPRS_RLCMAC_UL_TBF) ms()->set_tlli(tlli); else ms()->confirm_tlli(tlli); } gprs_rlcmac_ul_tbf *tbf_alloc_ul(struct gprs_rlcmac_bts *bts, int8_t use_trx, uint8_t ms_class, uint8_t egprs_ms_class, uint32_t tlli, uint8_t ta, GprsMs *ms) { struct gprs_rlcmac_ul_tbf *tbf; /* FIXME: Copy and paste with tbf_new_dl_assignment */ /* create new TBF, use same TRX as DL TBF */ /* use multislot class of downlink TBF */ tbf = tbf_alloc_ul_tbf(bts, ms, use_trx, ms_class, egprs_ms_class, false); if (!tbf) { LOGP(DTBF, LOGL_NOTICE, "No PDCH resource\n"); /* FIXME: send reject */ return NULL; } tbf->m_contention_resolution_done = 1; TBF_SET_ASS_ON(tbf, GPRS_RLCMAC_FLAG_PACCH, false); T_START(tbf, T3169, bts->t3169, 0, "allocation (UL-TBF)", true); tbf->update_ms(tlli, GPRS_RLCMAC_UL_TBF); OSMO_ASSERT(tbf->ms()); tbf->ms()->set_ta(ta); return tbf; } static void tbf_unlink_pdch(struct gprs_rlcmac_tbf *tbf) { int ts; for (ts = 0; ts < 8; ts++) { if (!tbf->pdch[ts]) continue; tbf->pdch[ts]->detach_tbf(tbf); tbf->pdch[ts] = NULL; } } void tbf_free(struct gprs_rlcmac_tbf *tbf) { /* update counters */ if (tbf->direction == GPRS_RLCMAC_UL_TBF) { gprs_rlcmac_ul_tbf *ul_tbf = as_ul_tbf(tbf); tbf->bts->tbf_ul_freed(); if (tbf->state_is(GPRS_RLCMAC_FLOW)) tbf->bts->tbf_ul_aborted(); rate_ctr_group_free(ul_tbf->m_ul_egprs_ctrs); rate_ctr_group_free(ul_tbf->m_ul_gprs_ctrs); } else { gprs_rlcmac_dl_tbf *dl_tbf = as_dl_tbf(tbf); if (tbf->is_egprs_enabled()) { rate_ctr_group_free(dl_tbf->m_dl_egprs_ctrs); } else { rate_ctr_group_free(dl_tbf->m_dl_gprs_ctrs); } tbf->bts->tbf_dl_freed(); if (tbf->state_is(GPRS_RLCMAC_FLOW)) tbf->bts->tbf_dl_aborted(); } /* Give final measurement report */ gprs_rlcmac_rssi_rep(tbf); if (tbf->direction == GPRS_RLCMAC_DL_TBF) { gprs_rlcmac_dl_tbf *dl_tbf = as_dl_tbf(tbf); dl_tbf->abort(); dl_tbf->cleanup(); } LOGPTBF(tbf, LOGL_INFO, "free\n"); tbf->check_pending_ass(); tbf->stop_timers("freeing TBF"); /* TODO: Could/Should generate bssgp_tx_llc_discarded */ tbf_unlink_pdch(tbf); llist_del(&tbf->list()); if (tbf->ms()) tbf->set_ms(NULL); rate_ctr_group_free(tbf->m_ctrs); LOGP(DTBF, LOGL_DEBUG, "********** %s-TBF ends here **********\n", (tbf->direction != GPRS_RLCMAC_UL_TBF) ? "DL" : "UL"); talloc_free(tbf); } uint16_t egprs_window_size(const struct gprs_rlcmac_bts *bts_data, uint8_t slots) { uint8_t num_pdch = pcu_bitcount(slots); return OSMO_MIN((num_pdch != 1) ? (128 * num_pdch) : 192, OSMO_MAX(64, (bts_data->ws_base + num_pdch * bts_data->ws_pdch) / 32 * 32)); } int gprs_rlcmac_tbf::update() { struct gprs_rlcmac_bts *bts_data = bts->bts_data(); int rc; if (direction != GPRS_RLCMAC_DL_TBF) return -EINVAL; LOGP(DTBF, LOGL_DEBUG, "********** DL-TBF update **********\n"); tbf_unlink_pdch(this); rc = bts_data->alloc_algorithm(bts_data, ms(), this, false, -1); /* if no resource */ if (rc < 0) { LOGPTBF(this, LOGL_ERROR, "No resource after update???\n"); return -rc; } if (is_egprs_enabled()) { gprs_rlcmac_dl_tbf *dl_tbf = as_dl_tbf(this); if (dl_tbf) dl_tbf->set_window_size(); } return 0; } int tbf_assign_control_ts(struct gprs_rlcmac_tbf *tbf) { if (tbf->control_ts == 0xff) LOGPTBF(tbf, LOGL_INFO, "Setting Control TS %d\n", tbf->first_common_ts); else if (tbf->control_ts != tbf->first_common_ts) LOGPTBF(tbf, LOGL_INFO, "Changing Control TS %d\n", tbf->first_common_ts); tbf->control_ts = tbf->first_common_ts; return 0; } const char *gprs_rlcmac_tbf::tbf_state_name[] = { "NULL", "ASSIGN", "FLOW", "FINISHED", "WAIT RELEASE", "RELEASING", }; void gprs_rlcmac_tbf::n_reset(enum tbf_counters n) { if (n >= N_MAX) { LOGPTBF(this, LOGL_ERROR, "attempting to reset unknown counter %s\n", get_value_string(tbf_counters_names, n)); return; } N[n] = 0; } /* Increment counter and check for MAX value (return true if we hit it) */ bool gprs_rlcmac_tbf::n_inc(enum tbf_counters n) { uint8_t chk; if (n >= N_MAX) { LOGPTBF(this, LOGL_ERROR, "attempting to increment unknown counter %s\n", get_value_string(tbf_counters_names, n)); return true; } N[n]++; switch(n) { case N3101: chk = bts->bts_data()->n3101; break; case N3103: chk = bts->bts_data()->n3103; break; case N3105: chk = bts->bts_data()->n3105; break; default: LOGPTBF(this, LOGL_ERROR, "unhandled counter %s\n", get_value_string(tbf_counters_names, n)); return true; } if (N[n] == chk) { LOGPTBF(this, LOGL_NOTICE, "%s exceeded MAX (%u)\n", get_value_string(tbf_counters_names, n), chk); return true; } return false; } void gprs_rlcmac_tbf::t_stop(enum tbf_timers t, const char *reason) { if (t >= T_MAX) { LOGPTBF(this, LOGL_ERROR, "attempting to stop unknown timer %s [%s]\n", get_value_string(tbf_timers_names, t), reason); return; } if (osmo_timer_pending(&T[t])) { LOGPTBF(this, LOGL_DEBUG, "stopping timer %s [%s]\n", get_value_string(tbf_timers_names, t), reason); osmo_timer_del(&T[t]); } } /* check if any of T31xx timer(s) are pending */ bool gprs_rlcmac_tbf::timers_pending(enum tbf_timers t) { uint8_t i; if (t != T_MAX) return osmo_timer_pending(&T[t]); /* we don't start with T0 because it's internal timer which requires special handling */ for (i = T3169; i < T_MAX; i++) if (osmo_timer_pending(&T[i])) return true; return false; } void gprs_rlcmac_tbf::stop_timers(const char *reason) { uint8_t i; /* we start with T0 because timer reset does not require any special handling */ for (i = T0; i < T_MAX; i++) t_stop((enum tbf_timers)i, reason); } static inline void tbf_timeout_free(struct gprs_rlcmac_tbf *tbf, enum tbf_timers t, bool run_diag) { LOGPTBF(tbf, LOGL_NOTICE, "%s timeout expired, freeing TBF\n", get_value_string(tbf_timers_names, t)); if (run_diag) tbf->rlcmac_diag(); tbf_free(tbf); } #define T_CBACK(t, diag) static void cb_##t(void *_tbf) { tbf_timeout_free((struct gprs_rlcmac_tbf *)_tbf, t, diag); } T_CBACK(T3169, true) T_CBACK(T3191, true) T_CBACK(T3193, false) T_CBACK(T3195, true) void gprs_rlcmac_tbf::t_start(enum tbf_timers t, uint32_t sec, uint32_t microsec, const char *reason, bool force, const char *file, unsigned line) { int current_fn = get_current_fn(); if (t >= T_MAX) { LOGPSRC(DTBF, LOGL_ERROR, file, line, "%s attempting to start unknown timer %s [%s], cur_fn=%d\n", tbf_name(this), get_value_string(tbf_timers_names, t), reason, current_fn); return; } if (!force && osmo_timer_pending(&T[t])) return; LOGPSRC(DTBF, LOGL_DEBUG, file, line, "%s %sstarting timer %s [%s] with %u sec. %u microsec, cur_fn=%d\n", tbf_name(this), osmo_timer_pending(&T[t]) ? "re" : "", get_value_string(tbf_timers_names, t), reason, sec, microsec, current_fn); T[t].data = this; switch(t) { case T0: T[t].cb = tbf_timer_cb; break; case T3169: T[t].cb = cb_T3169; break; case T3191: T[t].cb = cb_T3191; break; case T3193: T[t].cb = cb_T3193; break; case T3195: T[t].cb = cb_T3195; break; default: LOGPSRC(DTBF, LOGL_ERROR, file, line, "%s attempting to set callback for unknown timer %s [%s], cur_fn=%d\n", tbf_name(this), get_value_string(tbf_timers_names, t), reason, current_fn); } osmo_timer_schedule(&T[t], sec, microsec); } int gprs_rlcmac_tbf::check_polling(uint32_t fn, uint8_t ts, uint32_t *poll_fn_, unsigned int *rrbp_) { uint32_t new_poll_fn = next_fn(fn, 13); if (!is_control_ts(ts)) { LOGPTBF(this, LOGL_DEBUG, "Polling cannot be " "scheduled in this TS %d (first control TS %d)\n", ts, control_ts); return -EINVAL; } if (poll_state != GPRS_RLCMAC_POLL_NONE) { LOGPTBF(this, LOGL_DEBUG, "Polling is already scheduled\n"); return -EBUSY; } if (bts->sba()->find(trx->trx_no, ts, next_fn(fn, 13))) { LOGPTBF(this, LOGL_DEBUG, "Polling is already scheduled " "for single block allocation at FN %d TS %d ...\n", new_poll_fn, ts); return -EBUSY; } *poll_fn_ = new_poll_fn; *rrbp_ = 0; return 0; } void gprs_rlcmac_tbf::set_polling(uint32_t new_poll_fn, uint8_t ts, enum gprs_rlcmac_tbf_poll_type t) { const char *chan = "UNKNOWN"; if (state_flags & (1 << (GPRS_RLCMAC_FLAG_CCCH))) chan = "CCCH"; if (state_flags & (1 << (GPRS_RLCMAC_FLAG_PACCH))) chan = "PACCH"; if ((state_flags & (1 << (GPRS_RLCMAC_FLAG_PACCH))) && (state_flags & (1 << (GPRS_RLCMAC_FLAG_CCCH)))) LOGPTBFDL(this, LOGL_ERROR, "Attempt to schedule polling on %s (FN=%d, TS=%d) with both CCCH and PACCH flags set - FIXME!\n", chan, poll_fn, poll_ts); /* schedule polling */ poll_state = GPRS_RLCMAC_POLL_SCHED; poll_fn = new_poll_fn; poll_ts = ts; switch (t) { case GPRS_RLCMAC_POLL_UL_ASS: ul_ass_state = GPRS_RLCMAC_UL_ASS_WAIT_ACK; LOGPTBFDL(this, LOGL_INFO, "Scheduled UL Assignment polling on %s (FN=%d, TS=%d)\n", chan, poll_fn, poll_ts); break; case GPRS_RLCMAC_POLL_DL_ASS: dl_ass_state = GPRS_RLCMAC_DL_ASS_WAIT_ACK; LOGPTBFDL(this, LOGL_INFO, "Scheduled DL Assignment polling on %s (FN=%d, TS=%d)\n", chan, poll_fn, poll_ts); break; case GPRS_RLCMAC_POLL_UL_ACK: ul_ack_state = GPRS_RLCMAC_UL_ACK_WAIT_ACK; LOGPTBFUL(this, LOGL_DEBUG, "Scheduled UL Acknowledgement polling on %s (FN=%d, TS=%d)\n", chan, poll_fn, poll_ts); break; case GPRS_RLCMAC_POLL_DL_ACK: LOGPTBFDL(this, LOGL_DEBUG, "Scheduled DL Acknowledgement polling on %s (FN=%d, TS=%d)\n", chan, poll_fn, poll_ts); break; } } void gprs_rlcmac_tbf::poll_timeout() { gprs_rlcmac_ul_tbf *ul_tbf = as_ul_tbf(this); LOGPTBF(this, LOGL_NOTICE, "poll timeout for FN=%d, TS=%d (curr FN %d)\n", poll_fn, poll_ts, bts->current_frame_number()); poll_state = GPRS_RLCMAC_POLL_NONE; if (n_inc(N3101)) { TBF_SET_STATE(this, GPRS_RLCMAC_RELEASING); T_START(this, T3169, bts->bts_data()->t3169, 0, "MAX N3101 reached", false); return; } if (ul_tbf && ul_tbf->handle_ctrl_ack()) { if (!ul_tbf->ctrl_ack_to_toggle()) { LOGPTBF(this, LOGL_NOTICE, "Timeout for polling PACKET CONTROL ACK for PACKET UPLINK ACK\n"); rlcmac_diag(); } bts->rlc_ack_timedout(); bts->pkt_ul_ack_nack_poll_timedout(); if (state_is(GPRS_RLCMAC_FINISHED)) { if (ul_tbf->n_inc(N3103)) { bts->pkt_ul_ack_nack_poll_failed(); TBF_SET_STATE(ul_tbf, GPRS_RLCMAC_RELEASING); T_START(ul_tbf, T3169, ul_tbf->bts->bts_data()->t3169, 0, "MAX N3103 reached", false); return; } /* reschedule UL ack */ ul_tbf->ul_ack_state = GPRS_RLCMAC_UL_ACK_SEND_ACK; } } else if (ul_ass_state == GPRS_RLCMAC_UL_ASS_WAIT_ACK) { if (!(state_flags & (1 << GPRS_RLCMAC_FLAG_TO_UL_ASS))) { LOGPTBF(this, LOGL_NOTICE, "Timeout for polling PACKET CONTROL ACK for PACKET UPLINK ASSIGNMENT.\n"); rlcmac_diag(); state_flags |= (1 << GPRS_RLCMAC_FLAG_TO_UL_ASS); } ul_ass_state = GPRS_RLCMAC_UL_ASS_NONE; bts->rlc_ass_timedout(); bts->pua_poll_timedout(); if (n_inc(N3105)) { TBF_SET_STATE(this, GPRS_RLCMAC_RELEASING); T_START(this, T3195, bts_data()->t3195, 0, "MAX N3105 reached", true); bts->rlc_ass_failed(); bts->pua_poll_failed(); return; } /* reschedule UL assignment */ ul_ass_state = GPRS_RLCMAC_UL_ASS_SEND_ASS; } else if (dl_ass_state == GPRS_RLCMAC_DL_ASS_WAIT_ACK) { if (!(state_flags & (1 << GPRS_RLCMAC_FLAG_TO_DL_ASS))) { LOGPTBF(this, LOGL_NOTICE, "Timeout for polling PACKET CONTROL ACK for PACKET DOWNLINK ASSIGNMENT.\n"); rlcmac_diag(); state_flags |= (1 << GPRS_RLCMAC_FLAG_TO_DL_ASS); } dl_ass_state = GPRS_RLCMAC_DL_ASS_NONE; bts->rlc_ass_timedout(); bts->pda_poll_timedout(); if (n_inc(N3105)) { TBF_SET_STATE(this, GPRS_RLCMAC_RELEASING); T_START(this, T3195, bts_data()->t3195, 0, "MAX N3105 reached", true); bts->rlc_ass_failed(); bts->pda_poll_failed(); return; } /* reschedule DL assignment */ dl_ass_state = GPRS_RLCMAC_DL_ASS_SEND_ASS; } else if (direction == GPRS_RLCMAC_DL_TBF) { gprs_rlcmac_dl_tbf *dl_tbf = as_dl_tbf(this); if (!(dl_tbf->state_flags & (1 << GPRS_RLCMAC_FLAG_TO_DL_ACK))) { LOGPTBF(this, LOGL_NOTICE, "Timeout for polling PACKET DOWNLINK ACK.\n"); dl_tbf->rlcmac_diag(); dl_tbf->state_flags |= (1 << GPRS_RLCMAC_FLAG_TO_DL_ACK); } if (dl_tbf->state_is(GPRS_RLCMAC_RELEASING)) bts->rlc_rel_timedout(); else { bts->rlc_ack_timedout(); bts->pkt_dl_ack_nack_poll_timedout(); } if (dl_tbf->n_inc(N3105)) { TBF_SET_STATE(dl_tbf, GPRS_RLCMAC_RELEASING); T_START(dl_tbf, T3195, dl_tbf->bts_data()->t3195, 0, "MAX N3105 reached", true); bts->pkt_dl_ack_nack_poll_failed(); bts->rlc_ack_failed(); return; } /* resend IMM.ASS on CCCH on timeout */ if ((dl_tbf->state_flags & (1 << GPRS_RLCMAC_FLAG_CCCH)) && !(dl_tbf->state_flags & (1 << GPRS_RLCMAC_FLAG_DL_ACK))) { LOGPTBF(dl_tbf, LOGL_DEBUG, "Re-send dowlink assignment on PCH (IMSI=%s)\n", imsi()); /* send immediate assignment */ dl_tbf->bts->snd_dl_ass(dl_tbf, false, imsi()); dl_tbf->m_wait_confirm = 1; } } else LOGPTBF(this, LOGL_ERROR, "Poll Timeout, but no event!\n"); } static int setup_tbf(struct gprs_rlcmac_tbf *tbf, GprsMs *ms, int8_t use_trx, uint8_t ms_class, uint8_t egprs_ms_class, bool single_slot) { int rc; struct gprs_rlcmac_bts *bts; if (!tbf) return -1; bts = tbf->bts->bts_data(); if (ms->mode() == GprsCodingScheme::EGPRS) ms_class = egprs_ms_class; tbf->m_created_ts = time(NULL); tbf->set_ms_class(ms_class); /* select algorithm */ rc = bts->alloc_algorithm(bts, ms, tbf, single_slot, use_trx); /* if no resource */ if (rc < 0) { return -1; } /* assign control ts */ rc = tbf_assign_control_ts(tbf); /* if no resource */ if (rc < 0) { return -1; } /* set timestamp */ osmo_clock_gettime(CLOCK_MONOTONIC, &tbf->meas.rssi_tv); tbf->set_ms(ms); LOGPTBF(tbf, LOGL_INFO, "Allocated: trx = %d, ul_slots = %02x, dl_slots = %02x\n", tbf->trx->trx_no, tbf->ul_slots(), tbf->dl_slots()); tbf->m_ctrs = rate_ctr_group_alloc(tbf, &tbf_ctrg_desc, next_tbf_ctr_group_id++); if (!tbf->m_ctrs) { LOGPTBF(tbf, LOGL_ERROR, "Couldn't allocate TBF counters\n"); return -1; } return 0; } gprs_rlcmac_ul_tbf::gprs_rlcmac_ul_tbf(BTS *bts_) : gprs_rlcmac_tbf(bts_, GPRS_RLCMAC_UL_TBF), m_rx_counter(0), m_contention_resolution_done(0), m_final_ack_sent(0), m_ul_gprs_ctrs(NULL), m_ul_egprs_ctrs(NULL) { memset(&m_usf, 0, sizeof(m_usf)); } static int ul_tbf_dtor(struct gprs_rlcmac_ul_tbf *tbf) { tbf->~gprs_rlcmac_ul_tbf(); return 0; } static void setup_egprs_mode(gprs_rlcmac_bts *bts, GprsMs *ms) { if (GprsCodingScheme::getEgprsByNum(bts->max_mcs_ul).isEgprsGmsk() && GprsCodingScheme::getEgprsByNum(bts->max_mcs_dl).isEgprsGmsk() && ms->mode() != GprsCodingScheme::EGPRS) { ms->set_mode(GprsCodingScheme::EGPRS_GMSK); } else { ms->set_mode(GprsCodingScheme::EGPRS); } } struct gprs_rlcmac_ul_tbf *tbf_alloc_ul_tbf(struct gprs_rlcmac_bts *bts, GprsMs *ms, int8_t use_trx, uint8_t ms_class, uint8_t egprs_ms_class, bool single_slot) { struct gprs_rlcmac_ul_tbf *tbf; int rc; if (egprs_ms_class == 0 && bts->egprs_enabled) { LOGP(DTBF, LOGL_NOTICE, "Not accepting non-EGPRS phone in EGPRS-only mode\n"); bts->bts->tbf_failed_egprs_only(); return NULL; } LOGP(DTBF, LOGL_DEBUG, "********** UL-TBF starts here **********\n"); LOGP(DTBF, LOGL_INFO, "Allocating UL TBF: MS_CLASS=%d/%d\n", ms_class, egprs_ms_class); tbf = talloc(tall_pcu_ctx, struct gprs_rlcmac_ul_tbf); if (!tbf) return NULL; talloc_set_destructor(tbf, ul_tbf_dtor); new (tbf) gprs_rlcmac_ul_tbf(bts->bts); if (!ms) ms = bts->bts->ms_alloc(ms_class, egprs_ms_class); if (egprs_ms_class > 0 && bts->egprs_enabled) { tbf->enable_egprs(); setup_egprs_mode(bts, ms); LOGPTBF(tbf, LOGL_INFO, "Enabled EGPRS, mode %s\n", GprsCodingScheme::modeName(ms->mode())); } rc = setup_tbf(tbf, ms, use_trx, ms_class, egprs_ms_class, single_slot); if (tbf->is_egprs_enabled()) tbf->set_window_size(); /* if no resource */ if (rc < 0) { talloc_free(tbf); return NULL; } tbf->m_ul_egprs_ctrs = rate_ctr_group_alloc(tbf, &tbf_ul_egprs_ctrg_desc, tbf->m_ctrs->idx); tbf->m_ul_gprs_ctrs = rate_ctr_group_alloc(tbf, &tbf_ul_gprs_ctrg_desc, tbf->m_ctrs->idx); if (!tbf->m_ul_egprs_ctrs || !tbf->m_ul_gprs_ctrs) { LOGPTBF(tbf, LOGL_ERROR, "Couldn't allocate TBF UL counters\n"); talloc_free(tbf); return NULL; } llist_add(&tbf->list(), &bts->bts->ul_tbfs()); tbf->bts->tbf_ul_created(); return tbf; } gprs_rlcmac_dl_tbf::BandWidth::BandWidth() : dl_bw_octets(0), dl_throughput(0), dl_loss_lost(0), dl_loss_received(0) { timespecclear(&dl_bw_tv); timespecclear(&dl_loss_tv); } gprs_rlcmac_dl_tbf::gprs_rlcmac_dl_tbf(BTS *bts_) : gprs_rlcmac_tbf(bts_, GPRS_RLCMAC_DL_TBF), m_tx_counter(0), m_wait_confirm(0), m_dl_ack_requested(false), m_last_dl_poll_fn(0), m_last_dl_drained_fn(0), m_dl_gprs_ctrs(NULL), m_dl_egprs_ctrs(NULL) { memset(&m_llc_timer, 0, sizeof(m_llc_timer)); } static int dl_tbf_dtor(struct gprs_rlcmac_dl_tbf *tbf) { tbf->~gprs_rlcmac_dl_tbf(); return 0; } struct gprs_rlcmac_dl_tbf *tbf_alloc_dl_tbf(struct gprs_rlcmac_bts *bts, GprsMs *ms, int8_t use_trx, uint8_t ms_class, uint8_t egprs_ms_class, bool single_slot) { struct gprs_rlcmac_dl_tbf *tbf; int rc; if (egprs_ms_class == 0 && bts->egprs_enabled) { if (ms_class > 0) { LOGP(DTBF, LOGL_NOTICE, "Not accepting non-EGPRS phone in EGPRS-only mode\n"); bts->bts->tbf_failed_egprs_only(); return NULL; } egprs_ms_class = 1; } LOGP(DTBF, LOGL_DEBUG, "********** DL-TBF starts here **********\n"); LOGP(DTBF, LOGL_INFO, "Allocating DL TBF: MS_CLASS=%d/%d\n", ms_class, egprs_ms_class); tbf = talloc(tall_pcu_ctx, struct gprs_rlcmac_dl_tbf); if (!tbf) return NULL; talloc_set_destructor(tbf, dl_tbf_dtor); new (tbf) gprs_rlcmac_dl_tbf(bts->bts); if (!ms) ms = bts->bts->ms_alloc(ms_class, egprs_ms_class); if (egprs_ms_class > 0 && bts->egprs_enabled) { tbf->enable_egprs(); setup_egprs_mode(bts, ms); LOGPTBF(tbf, LOGL_INFO, "Enabled EGPRS, mode %s\n", GprsCodingScheme::modeName(ms->mode())); } rc = setup_tbf(tbf, ms, use_trx, ms_class, 0, single_slot); /* if no resource */ if (rc < 0) { talloc_free(tbf); return NULL; } if (tbf->is_egprs_enabled()) { tbf->set_window_size(); tbf->m_dl_egprs_ctrs = rate_ctr_group_alloc(tbf, &tbf_dl_egprs_ctrg_desc, tbf->m_ctrs->idx); if (!tbf->m_dl_egprs_ctrs) { LOGPTBF(tbf, LOGL_ERROR, "Couldn't allocate EGPRS DL counters\n"); talloc_free(tbf); return NULL; } } else { tbf->m_dl_gprs_ctrs = rate_ctr_group_alloc(tbf, &tbf_dl_gprs_ctrg_desc, tbf->m_ctrs->idx); if (!tbf->m_dl_gprs_ctrs) { LOGPTBF(tbf, LOGL_ERROR, "Couldn't allocate GPRS DL counters\n"); talloc_free(tbf); return NULL; } } llist_add(&tbf->list(), &bts->bts->dl_tbfs()); tbf->bts->tbf_dl_created(); tbf->m_last_dl_poll_fn = -1; tbf->m_last_dl_drained_fn = -1; osmo_clock_gettime(CLOCK_MONOTONIC, &tbf->m_bw.dl_bw_tv); osmo_clock_gettime(CLOCK_MONOTONIC, &tbf->m_bw.dl_loss_tv); return tbf; } static void tbf_timer_cb(void *_tbf) { struct gprs_rlcmac_tbf *tbf = (struct gprs_rlcmac_tbf *)_tbf; tbf->handle_timeout(); } void gprs_rlcmac_tbf::handle_timeout() { int current_fn = get_current_fn(); LOGPTBF(this, LOGL_DEBUG, "timer 0 expired. cur_fn=%d\n", current_fn); /* assignment */ if ((state_flags & (1 << GPRS_RLCMAC_FLAG_PACCH))) { if (state_is(GPRS_RLCMAC_ASSIGN)) { LOGPTBF(this, LOGL_NOTICE, "releasing due to PACCH assignment timeout.\n"); tbf_free(this); return; } else LOGPTBF(this, LOGL_ERROR, "Error: TBF is not in assign state\n"); } if ((state_flags & (1 << GPRS_RLCMAC_FLAG_CCCH))) { gprs_rlcmac_dl_tbf *dl_tbf = as_dl_tbf(this); dl_tbf->m_wait_confirm = 0; if (dl_tbf->state_is(GPRS_RLCMAC_ASSIGN)) { tbf_assign_control_ts(dl_tbf); if (!dl_tbf->upgrade_to_multislot) { /* change state to FLOW, so scheduler * will start transmission */ TBF_SET_STATE(dl_tbf, GPRS_RLCMAC_FLOW); return; } /* This tbf can be upgraded to use multiple DL * timeslots and now that there is already one * slot assigned send another DL assignment via * PDCH. */ /* keep to flags */ dl_tbf->state_flags &= GPRS_RLCMAC_FLAG_TO_MASK; dl_tbf->update(); dl_tbf->trigger_ass(dl_tbf); } else LOGPTBF(dl_tbf, LOGL_NOTICE, "Continue flow after IMM.ASS confirm\n"); } } int gprs_rlcmac_tbf::rlcmac_diag() { if ((state_flags & (1 << GPRS_RLCMAC_FLAG_CCCH))) LOGPTBF(this, LOGL_NOTICE, "Assignment was on CCCH\n"); if ((state_flags & (1 << GPRS_RLCMAC_FLAG_PACCH))) LOGPTBF(this, LOGL_NOTICE, "Assignment was on PACCH\n"); if ((state_flags & (1 << GPRS_RLCMAC_FLAG_UL_DATA))) LOGPTBF(this, LOGL_NOTICE, "Uplink data was received\n"); else if (direction == GPRS_RLCMAC_UL_TBF) LOGPTBF(this, LOGL_NOTICE, "No uplink data received yet\n"); if ((state_flags & (1 << GPRS_RLCMAC_FLAG_DL_ACK))) LOGPTBF(this, LOGL_NOTICE, "Downlink ACK was received\n"); else if (direction == GPRS_RLCMAC_DL_TBF) LOGPTBF(this, LOGL_NOTICE, "No downlink ACK received yet\n"); return 0; } struct msgb *gprs_rlcmac_tbf::create_dl_ass(uint32_t fn, uint8_t ts) { struct msgb *msg; struct gprs_rlcmac_dl_tbf *new_dl_tbf = NULL; int poll_ass_dl = 1; unsigned int rrbp = 0; uint32_t new_poll_fn = 0; int rc; bool old_tfi_is_valid = is_tfi_assigned(); if (direction == GPRS_RLCMAC_DL_TBF && !is_control_ts(ts)) { LOGPTBF(this, LOGL_NOTICE, "Cannot poll for downlink assigment, because MS cannot reply. (TS=%d, first common TS=%d)\n", ts, first_common_ts); poll_ass_dl = 0; } if (poll_ass_dl) { if (poll_state == GPRS_RLCMAC_POLL_SCHED && ul_ass_state == GPRS_RLCMAC_UL_ASS_WAIT_ACK) { LOGPTBF(this, LOGL_DEBUG, "Polling is already scheduled, so we must wait for the uplink assignment...\n"); return NULL; } rc = check_polling(fn, ts, &new_poll_fn, &rrbp); if (rc < 0) return NULL; } /* on uplink TBF we get the downlink TBF to be assigned. */ if (direction == GPRS_RLCMAC_UL_TBF) { gprs_rlcmac_ul_tbf *ul_tbf = as_ul_tbf(this); /* be sure to check first, if contention resolution is done, * otherwise we cannot send the assignment yet */ if (!ul_tbf->m_contention_resolution_done) { LOGPTBF(this, LOGL_DEBUG, "Cannot assign DL TBF now, because contention resolution is not finished.\n"); return NULL; } } if (ms()) new_dl_tbf = ms()->dl_tbf(); if (!new_dl_tbf) { LOGPTBFDL(this, LOGL_ERROR, "We have a schedule for downlink assignment, but there is no downlink TBF\n"); dl_ass_state = GPRS_RLCMAC_DL_ASS_NONE; return NULL; } if (new_dl_tbf == as_dl_tbf(this)) LOGPTBF(this, LOGL_DEBUG, "New and old TBF are the same.\n"); if (old_tfi_is_valid && !new_dl_tbf->is_tlli_valid()) { LOGPTBF(this, LOGL_ERROR, "The old TFI is not assigned and there is no TLLI. New TBF %s\n", new_dl_tbf->name()); dl_ass_state = GPRS_RLCMAC_DL_ASS_NONE; return NULL; } new_dl_tbf->was_releasing = was_releasing; msg = msgb_alloc(23, "rlcmac_dl_ass"); if (!msg) return NULL; bitvec *ass_vec = bitvec_alloc(23, tall_pcu_ctx); if (!ass_vec) { msgb_free(msg); return NULL; } bitvec_unhex(ass_vec, DUMMY_VEC); LOGPTBF(new_dl_tbf, LOGL_INFO, "start Packet Downlink Assignment (PACCH)\n"); RlcMacDownlink_t * mac_control_block = (RlcMacDownlink_t *)talloc_zero(tall_pcu_ctx, RlcMacDownlink_t); Encoding::write_packet_downlink_assignment(mac_control_block, old_tfi_is_valid, m_tfi, (direction == GPRS_RLCMAC_DL_TBF), new_dl_tbf, poll_ass_dl, rrbp, bts_data()->alpha, bts_data()->gamma, -1, 0, is_egprs_enabled()); LOGP(DTBF, LOGL_DEBUG, "+++++++++++++++++++++++++ TX : Packet Downlink Assignment +++++++++++++++++++++++++\n"); encode_gsm_rlcmac_downlink(ass_vec, mac_control_block); LOGPC(DCSN1, LOGL_NOTICE, "\n"); LOGP(DTBF, LOGL_DEBUG, "------------------------- TX : Packet Downlink Assignment -------------------------\n"); bts->pkt_dl_assignemnt(); bitvec_pack(ass_vec, msgb_put(msg, 23)); bitvec_free(ass_vec); talloc_free(mac_control_block); if (poll_ass_dl) { set_polling(new_poll_fn, ts, GPRS_RLCMAC_POLL_DL_ASS); } else { dl_ass_state = GPRS_RLCMAC_DL_ASS_NONE; TBF_SET_STATE(new_dl_tbf, GPRS_RLCMAC_FLOW); tbf_assign_control_ts(new_dl_tbf); /* stop pending assignment timer */ new_dl_tbf->t_stop(T0, "assignment (DL-TBF)"); } return msg; } struct msgb *gprs_rlcmac_tbf::create_packet_access_reject() { struct msgb *msg; msg = msgb_alloc(23, "rlcmac_ul_ass_rej"); bitvec *packet_access_rej = bitvec_alloc(23, tall_pcu_ctx); bitvec_unhex(packet_access_rej, DUMMY_VEC); Encoding::write_packet_access_reject( packet_access_rej, tlli()); bts->pkt_access_reject(); bitvec_pack(packet_access_rej, msgb_put(msg, 23)); bitvec_free(packet_access_rej); ul_ass_state = GPRS_RLCMAC_UL_ASS_NONE; /* Start Tmr only if it is UL TBF */ if (direction == GPRS_RLCMAC_UL_TBF) T_START(this, T0, 0, T_REJ_PACCH_USEC, "reject (PACCH)", true); return msg; } struct msgb *gprs_rlcmac_tbf::create_ul_ass(uint32_t fn, uint8_t ts) { struct msgb *msg; struct gprs_rlcmac_ul_tbf *new_tbf = NULL; int rc; unsigned int rrbp; uint32_t new_poll_fn; if (poll_state == GPRS_RLCMAC_POLL_SCHED && ul_ass_state == GPRS_RLCMAC_UL_ASS_WAIT_ACK) { LOGPTBFUL(this, LOGL_DEBUG, "Polling is already scheduled, so we must wait for the uplink assignment...\n"); return NULL; } rc = check_polling(fn, ts, &new_poll_fn, &rrbp); if (rc < 0) return NULL; if (ms()) new_tbf = ms()->ul_tbf(); if (!new_tbf) { LOGPTBFUL(this, LOGL_ERROR, "We have a schedule for uplink assignment, but there is no uplink TBF\n"); ul_ass_state = GPRS_RLCMAC_UL_ASS_NONE; return NULL; } msg = msgb_alloc(23, "rlcmac_ul_ass"); if (!msg) return NULL; LOGPTBF(new_tbf, LOGL_INFO, "start Packet Uplink Assignment (PACCH)\n"); bitvec *ass_vec = bitvec_alloc(23, tall_pcu_ctx); if (!ass_vec) { msgb_free(msg); return NULL; } bitvec_unhex(ass_vec, DUMMY_VEC); Encoding::write_packet_uplink_assignment(bts_data(), ass_vec, m_tfi, (direction == GPRS_RLCMAC_DL_TBF), tlli(), is_tlli_valid(), new_tbf, 1, rrbp, bts_data()->alpha, bts_data()->gamma, -1, is_egprs_enabled()); bitvec_pack(ass_vec, msgb_put(msg, 23)); RlcMacDownlink_t * mac_control_block = (RlcMacDownlink_t *)talloc_zero(tall_pcu_ctx, RlcMacDownlink_t); LOGP(DTBF, LOGL_DEBUG, "+++++++++++++++++++++++++ TX : Packet Uplink Assignment +++++++++++++++++++++++++\n"); decode_gsm_rlcmac_downlink(ass_vec, mac_control_block); LOGPC(DCSN1, LOGL_NOTICE, "\n"); LOGP(DTBF, LOGL_DEBUG, "------------------------- TX : Packet Uplink Assignment -------------------------\n"); bts->pkt_ul_assignment(); bitvec_free(ass_vec); talloc_free(mac_control_block); set_polling(new_poll_fn, ts, GPRS_RLCMAC_POLL_UL_ASS); return msg; } void gprs_rlcmac_tbf::free_all(struct gprs_rlcmac_trx *trx) { for (uint8_t ts = 0; ts < 8; ts++) free_all(&trx->pdch[ts]); } void gprs_rlcmac_tbf::free_all(struct gprs_rlcmac_pdch *pdch) { for (uint8_t tfi = 0; tfi < 32; tfi++) { struct gprs_rlcmac_tbf *tbf; tbf = pdch->ul_tbf_by_tfi(tfi); if (tbf) tbf_free(tbf); tbf = pdch->dl_tbf_by_tfi(tfi); if (tbf) tbf_free(tbf); } } int gprs_rlcmac_tbf::establish_dl_tbf_on_pacch() { struct gprs_rlcmac_dl_tbf *new_tbf = NULL; bts->tbf_reused(); new_tbf = tbf_alloc_dl_tbf(bts->bts_data(), ms(), this->trx->trx_no, ms_class(), ms() ? ms()->egprs_ms_class() : 0, false); if (!new_tbf) { LOGP(DTBF, LOGL_NOTICE, "No PDCH resource\n"); return -1; } LOGPTBF(this, LOGL_DEBUG, "Trigger downlink assignment on PACCH\n"); new_tbf->trigger_ass(this); return 0; } int gprs_rlcmac_tbf::set_tlli_from_ul(uint32_t new_tlli) { struct gprs_rlcmac_tbf *dl_tbf = NULL; struct gprs_rlcmac_tbf *ul_tbf = NULL; GprsMs *old_ms; OSMO_ASSERT(direction == GPRS_RLCMAC_UL_TBF); old_ms = bts->ms_by_tlli(new_tlli); /* Keep the old MS object for the update_ms() */ GprsMs::Guard guard(old_ms); if (old_ms) { /* Get them before calling set_ms() */ dl_tbf = old_ms->dl_tbf(); ul_tbf = old_ms->ul_tbf(); if (!ms()) set_ms(old_ms); } if (dl_tbf && dl_tbf->ms() != ms()) { LOGPTBFUL(dl_tbf, LOGL_NOTICE, "Got RACH from TLLI=0x%08x while TBF still exists: killing pending DL TBF\n", new_tlli); tbf_free(dl_tbf); dl_tbf = NULL; } if (ul_tbf && ul_tbf->ms() != ms()) { LOGPTBFUL(ul_tbf, LOGL_NOTICE, "Got RACH from TLLI=0x%08x while TBF still exists: killing pending UL TBF\n", new_tlli); tbf_free(ul_tbf); ul_tbf = NULL; } /* The TLLI has been taken from an UL message */ update_ms(new_tlli, GPRS_RLCMAC_UL_TBF); #if 0 /* REMOVEME ??? */ if (ms()->need_dl_tbf()) establish_dl_tbf_on_pacch(); #endif return 1; } const char *tbf_name(gprs_rlcmac_tbf *tbf) { return tbf ? tbf->name() : "(no TBF)"; } const char *gprs_rlcmac_tbf::name() const { snprintf(m_name_buf, sizeof(m_name_buf) - 1, "TBF(TFI=%d TLLI=0x%08x DIR=%s STATE=%s%s)", m_tfi, tlli(), direction == GPRS_RLCMAC_UL_TBF ? "UL" : "DL", state_name(), is_egprs_enabled() ? " EGPRS" : "" ); m_name_buf[sizeof(m_name_buf) - 1] = '\0'; return m_name_buf; } void gprs_rlcmac_tbf::rotate_in_list() { llist_del(&list()); if (direction == GPRS_RLCMAC_UL_TBF) llist_add(&list(), &bts->ul_tbfs()); else llist_add(&list(), &bts->dl_tbfs()); } uint8_t gprs_rlcmac_tbf::tsc() const { return trx->pdch[first_ts].tsc; } uint8_t gprs_rlcmac_tbf::dl_slots() const { uint8_t slots = 0; size_t i; if (direction == GPRS_RLCMAC_UL_TBF) return 0; for (i = 0; i < ARRAY_SIZE(pdch); i += 1) if (pdch[i]) slots |= 1 << i; return slots; } uint8_t gprs_rlcmac_tbf::ul_slots() const { uint8_t slots = 0; size_t i; if (direction == GPRS_RLCMAC_DL_TBF) { if (control_ts < 8) slots |= 1 << control_ts; if (first_common_ts < 8) slots |= 1 << first_common_ts; return slots; } for (i = 0; i < ARRAY_SIZE(pdch); i += 1) if (pdch[i]) slots |= 1 << i; return slots; } bool gprs_rlcmac_tbf::is_control_ts(uint8_t ts) const { return ts == control_ts; } gprs_rlc_ul_window *gprs_rlcmac_ul_tbf::window() { return &m_window; } struct gprs_rlcmac_ul_tbf *handle_tbf_reject(struct gprs_rlcmac_bts *bts, GprsMs *ms, uint32_t tlli, uint8_t trx_no, uint8_t ts) { struct gprs_rlcmac_ul_tbf *ul_tbf = NULL; struct gprs_rlcmac_trx *trx = &bts->trx[trx_no]; ul_tbf = talloc(tall_pcu_ctx, struct gprs_rlcmac_ul_tbf); if (!ul_tbf) return ul_tbf; talloc_set_destructor(ul_tbf, ul_tbf_dtor); new (ul_tbf) gprs_rlcmac_ul_tbf(bts->bts); if (!ms) ms = bts->bts->ms_alloc(0, 0); ms->set_tlli(tlli); llist_add(&ul_tbf->list(), &bts->bts->ul_tbfs()); ul_tbf->bts->tbf_ul_created(); TBF_SET_ASS_ON(ul_tbf, GPRS_RLCMAC_FLAG_PACCH, false); ul_tbf->set_ms(ms); ul_tbf->update_ms(tlli, GPRS_RLCMAC_UL_TBF); TBF_SET_ASS_STATE_UL(ul_tbf, GPRS_RLCMAC_UL_ASS_SEND_ASS_REJ); ul_tbf->control_ts = ts; ul_tbf->trx = trx; ul_tbf->m_ctrs = rate_ctr_group_alloc(ul_tbf, &tbf_ctrg_desc, next_tbf_ctr_group_id++); ul_tbf->m_ul_egprs_ctrs = rate_ctr_group_alloc(ul_tbf, &tbf_ul_egprs_ctrg_desc, ul_tbf->m_ctrs->idx); ul_tbf->m_ul_gprs_ctrs = rate_ctr_group_alloc(ul_tbf, &tbf_ul_gprs_ctrg_desc, ul_tbf->m_ctrs->idx); if (!ul_tbf->m_ctrs || !ul_tbf->m_ul_egprs_ctrs || !ul_tbf->m_ul_gprs_ctrs) { LOGPTBF(ul_tbf, LOGL_ERROR, "Cound not allocate TBF UL rate counters\n"); talloc_free(ul_tbf); return NULL; } return ul_tbf; }