Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 1 | /* gprs_rlcmac.cpp |
| 2 | * |
| 3 | * Copyright (C) 2012 Ivan Klyuchnikov |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 4 | * Copyright (C) 2012 Andreas Eversberg <jolly@eversberg.eu> |
Holger Hans Peter Freyther | d6bd91e | 2013-08-24 21:16:55 +0200 | [diff] [blame] | 5 | * Copyright (C) 2013 by Holger Hans Peter Freyther |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 6 | * |
| 7 | * This program is free software; you can redistribute it and/or |
| 8 | * modify it under the terms of the GNU General Public License |
| 9 | * as published by the Free Software Foundation; either version 2 |
| 10 | * of the License, or (at your option) any later version. |
| 11 | * |
| 12 | * This program is distributed in the hope that it will be useful, |
| 13 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 14 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 15 | * GNU General Public License for more details. |
| 16 | * |
| 17 | * You should have received a copy of the GNU General Public License |
| 18 | * along with this program; if not, write to the Free Software |
| 19 | * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. |
| 20 | */ |
| 21 | |
| 22 | #include <gprs_bssgp_pcu.h> |
| 23 | #include <pcu_l1_if.h> |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 24 | #include <gprs_rlcmac.h> |
Holger Hans Peter Freyther | 67ed34e | 2013-10-17 17:01:54 +0200 | [diff] [blame] | 25 | #include <bts.h> |
Holger Hans Peter Freyther | 099535a | 2013-10-16 17:42:31 +0200 | [diff] [blame] | 26 | #include <tbf.h> |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 27 | |
Andreas Eversberg | 53f4725 | 2012-07-15 07:10:10 +0200 | [diff] [blame] | 28 | |
Andreas Eversberg | 3b1332c | 2012-10-03 14:20:53 +0200 | [diff] [blame] | 29 | struct gprs_rlcmac_cs gprs_rlcmac_cs[] = { |
| 30 | /* frame length data block max payload */ |
| 31 | { 0, 0, 0 }, |
| 32 | { 23, 23, 20 }, /* CS-1 */ |
| 33 | { 34, 33, 30 }, /* CS-2 */ |
| 34 | { 40, 39, 36 }, /* CS-3 */ |
| 35 | { 54, 53, 50 }, /* CS-4 */ |
| 36 | }; |
| 37 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 38 | LLIST_HEAD(gprs_rlcmac_ul_tbfs); |
| 39 | LLIST_HEAD(gprs_rlcmac_dl_tbfs); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 40 | llist_head *gprs_rlcmac_tbfs_lists[] = { |
| 41 | &gprs_rlcmac_ul_tbfs, |
| 42 | &gprs_rlcmac_dl_tbfs, |
| 43 | NULL |
| 44 | }; |
Andreas Eversberg | 6681bb8 | 2012-07-25 08:48:44 +0200 | [diff] [blame] | 45 | extern void *tall_pcu_ctx; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 46 | |
Andreas Eversberg | b83e2a7 | 2012-10-07 15:26:00 +0200 | [diff] [blame] | 47 | #ifdef DEBUG_DIAGRAM |
| 48 | struct timeval diagram_time = {0,0}; |
| 49 | struct timeval diagram_last_tv = {0,0}; |
| 50 | |
| 51 | void debug_diagram(int diag, const char *format, ...) |
| 52 | { |
| 53 | va_list ap; |
| 54 | char debug[128]; |
| 55 | char line[1024]; |
| 56 | struct gprs_rlcmac_tbf *tbf, *tbf_a[16]; |
| 57 | int max_diag = -1, i; |
| 58 | uint64_t diff = 0; |
| 59 | |
| 60 | va_start(ap, format); |
| 61 | vsnprintf(debug, sizeof(debug) - 1, format, ap); |
| 62 | debug[19] = ' '; |
| 63 | debug[20] = '\0'; |
| 64 | va_end(ap); |
| 65 | |
| 66 | memset(tbf_a, 0, sizeof(tbf_a)); |
| 67 | llist_for_each_entry(tbf, &gprs_rlcmac_ul_tbfs, list) { |
| 68 | if (tbf->diag < 16) { |
| 69 | if (tbf->diag > max_diag) |
| 70 | max_diag = tbf->diag; |
| 71 | tbf_a[tbf->diag] = tbf; |
| 72 | } |
| 73 | } |
| 74 | llist_for_each_entry(tbf, &gprs_rlcmac_dl_tbfs, list) { |
| 75 | if (tbf->diag < 16) { |
| 76 | if (tbf->diag > max_diag) |
| 77 | max_diag = tbf->diag; |
| 78 | tbf_a[tbf->diag] = tbf; |
| 79 | } |
| 80 | } |
| 81 | |
| 82 | if (diagram_last_tv.tv_sec) { |
| 83 | diff = (uint64_t)(diagram_time.tv_sec - |
| 84 | diagram_last_tv.tv_sec) * 1000; |
| 85 | diff += diagram_time.tv_usec / 1000; |
| 86 | diff -= diagram_last_tv.tv_usec / 1000; |
| 87 | } |
| 88 | memcpy(&diagram_last_tv, &diagram_time, sizeof(struct timeval)); |
| 89 | |
| 90 | if (diff > 0) { |
| 91 | if (diff > 99999) |
| 92 | strcpy(line, " ... : "); |
| 93 | else |
| 94 | sprintf(line, "%3d.%03d: ", (int)(diff / 1000), |
| 95 | (int)(diff % 1000)); |
| 96 | for (i = 0; i <= max_diag; i++) { |
| 97 | if (tbf_a[i] == NULL) { |
| 98 | strcat(line, " "); |
| 99 | continue; |
| 100 | } |
| 101 | if (tbf_a[i]->diag_new) { |
| 102 | strcat(line, " | "); |
| 103 | continue; |
| 104 | } |
| 105 | strcat(line, " "); |
| 106 | } |
| 107 | puts(line); |
| 108 | } |
| 109 | strcpy(line, " : "); |
| 110 | for (i = 0; i <= max_diag; i++) { |
| 111 | if (tbf_a[i] == NULL) { |
| 112 | strcat(line, " "); |
| 113 | continue; |
| 114 | } |
| 115 | if (tbf_a[i]->diag != diag) { |
| 116 | strcat(line, " | "); |
| 117 | continue; |
| 118 | } |
| 119 | if (strlen(debug) < 19) { |
| 120 | strcat(line, " "); |
| 121 | memcpy(line + strlen(line) - 11 - strlen(debug) / 2, |
| 122 | debug, strlen(debug)); |
| 123 | } else |
| 124 | strcat(line, debug); |
| 125 | tbf_a[i]->diag_new = 1; |
| 126 | } |
| 127 | puts(line); |
| 128 | } |
| 129 | #endif |
| 130 | |
Holger Hans Peter Freyther | 483f77a | 2013-10-16 16:33:00 +0200 | [diff] [blame] | 131 | /* FIXME: spread resources over multiple TRX. Also add option to use same |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 132 | * TRX in case of existing TBF for TLLI in the other direction. */ |
Andreas Eversberg | 02d7cd2 | 2013-01-15 08:59:34 +0100 | [diff] [blame] | 133 | /* search for free TFI and return TFI, TRX */ |
Holger Hans Peter Freyther | d6bd91e | 2013-08-24 21:16:55 +0200 | [diff] [blame] | 134 | int tfi_find_free(struct gprs_rlcmac_bts *bts, enum gprs_rlcmac_tbf_direction dir, |
Holger Hans Peter Freyther | b67a8a3 | 2013-07-28 18:55:14 +0200 | [diff] [blame] | 135 | uint8_t *_trx, int8_t use_trx) |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 136 | { |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 137 | struct gprs_rlcmac_pdch *pdch; |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 138 | struct gprs_rlcmac_tbf **tbfp; |
| 139 | uint8_t trx_from, trx_to, trx, ts, tfi; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 140 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 141 | if (use_trx >= 0 && use_trx < 8) |
| 142 | trx_from = trx_to = use_trx; |
| 143 | else { |
| 144 | trx_from = 0; |
| 145 | trx_to = 7; |
| 146 | } |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 147 | |
| 148 | /* on TRX find first enabled TS */ |
| 149 | for (trx = trx_from; trx <= trx_to; trx++) { |
Andreas Eversberg | 02d7cd2 | 2013-01-15 08:59:34 +0100 | [diff] [blame] | 150 | for (ts = 0; ts < 8; ts++) { |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 151 | pdch = &bts->trx[trx].pdch[ts]; |
| 152 | if (!pdch->enable) |
| 153 | continue; |
| 154 | break; |
| 155 | } |
| 156 | if (ts < 8) |
| 157 | break; |
| 158 | } |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 159 | if (trx > trx_to) { |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 160 | LOGP(DRLCMAC, LOGL_NOTICE, "No PDCH available.\n"); |
| 161 | return -EINVAL; |
| 162 | } |
| 163 | |
| 164 | |
| 165 | LOGP(DRLCMAC, LOGL_DEBUG, "Searching for first unallocated TFI: " |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 166 | "TRX=%d first TS=%d\n", trx, ts); |
| 167 | if (dir == GPRS_RLCMAC_UL_TBF) |
Andreas Eversberg | adb2f18 | 2012-08-07 17:06:08 +0200 | [diff] [blame] | 168 | tbfp = bts->trx[trx].ul_tbf; |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 169 | else |
Andreas Eversberg | adb2f18 | 2012-08-07 17:06:08 +0200 | [diff] [blame] | 170 | tbfp = bts->trx[trx].dl_tbf; |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 171 | for (tfi = 0; tfi < 32; tfi++) { |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 172 | if (!tbfp[tfi]) |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 173 | break; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 174 | } |
| 175 | |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 176 | if (tfi < 32) { |
| 177 | LOGP(DRLCMAC, LOGL_DEBUG, " Found TFI=%d.\n", tfi); |
| 178 | *_trx = trx; |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 179 | return tfi; |
| 180 | } |
| 181 | LOGP(DRLCMAC, LOGL_NOTICE, "No TFI available.\n"); |
| 182 | |
| 183 | return -1; |
| 184 | } |
| 185 | |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 186 | /* starting time for assigning single slot |
| 187 | * This offset must be a multiple of 13. */ |
| 188 | #define AGCH_START_OFFSET 52 |
| 189 | |
| 190 | LLIST_HEAD(gprs_rlcmac_sbas); |
| 191 | |
Holger Hans Peter Freyther | 173a240 | 2013-10-16 21:47:45 +0200 | [diff] [blame] | 192 | int sba_alloc(struct gprs_rlcmac_bts *bts, |
| 193 | uint8_t *_trx, uint8_t *_ts, uint32_t *_fn, uint8_t ta) |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 194 | { |
| 195 | |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 196 | struct gprs_rlcmac_pdch *pdch; |
| 197 | struct gprs_rlcmac_sba *sba; |
| 198 | uint8_t trx, ts; |
| 199 | uint32_t fn; |
| 200 | |
| 201 | sba = talloc_zero(tall_pcu_ctx, struct gprs_rlcmac_sba); |
| 202 | if (!sba) |
| 203 | return -ENOMEM; |
| 204 | |
| 205 | for (trx = 0; trx < 8; trx++) { |
| 206 | for (ts = 0; ts < 8; ts++) { |
| 207 | pdch = &bts->trx[trx].pdch[ts]; |
| 208 | if (!pdch->enable) |
| 209 | continue; |
| 210 | break; |
| 211 | } |
| 212 | if (ts < 8) |
| 213 | break; |
| 214 | } |
| 215 | if (trx == 8) { |
| 216 | LOGP(DRLCMAC, LOGL_NOTICE, "No PDCH available.\n"); |
Holger Hans Peter Freyther | dcc9c39 | 2013-10-16 21:51:37 +0200 | [diff] [blame] | 217 | talloc_free(sba); |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 218 | return -EINVAL; |
| 219 | } |
| 220 | |
| 221 | fn = (pdch->last_rts_fn + AGCH_START_OFFSET) % 2715648; |
| 222 | |
| 223 | sba->trx = trx; |
| 224 | sba->ts = ts; |
| 225 | sba->fn = fn; |
| 226 | sba->ta = ta; |
| 227 | |
| 228 | llist_add(&sba->list, &gprs_rlcmac_sbas); |
| 229 | |
| 230 | *_trx = trx; |
| 231 | *_ts = ts; |
| 232 | *_fn = fn; |
| 233 | return 0; |
| 234 | } |
| 235 | |
| 236 | struct gprs_rlcmac_sba *sba_find(uint8_t trx, uint8_t ts, uint32_t fn) |
| 237 | { |
| 238 | struct gprs_rlcmac_sba *sba; |
| 239 | |
| 240 | llist_for_each_entry(sba, &gprs_rlcmac_sbas, list) { |
| 241 | if (sba->trx == trx && sba->ts == ts && sba->fn == fn) |
| 242 | return sba; |
| 243 | } |
| 244 | |
| 245 | return NULL; |
| 246 | } |
| 247 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 248 | /* received RLC/MAC block from L1 */ |
Holger Hans Peter Freyther | 698b612 | 2013-10-17 13:44:18 +0200 | [diff] [blame] | 249 | int gprs_rlcmac_rcv_block(struct gprs_rlcmac_bts *bts, |
| 250 | uint8_t trx, uint8_t ts, uint8_t *data, uint8_t len, |
Andreas Eversberg | 570b44b | 2013-03-16 16:15:01 +0100 | [diff] [blame] | 251 | uint32_t fn, int8_t rssi) |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 252 | { |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 253 | unsigned payload = data[0] >> 6; |
| 254 | bitvec *block; |
| 255 | int rc = 0; |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 256 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 257 | switch (payload) { |
| 258 | case GPRS_RLCMAC_DATA_BLOCK: |
Holger Hans Peter Freyther | 698b612 | 2013-10-17 13:44:18 +0200 | [diff] [blame] | 259 | rc = gprs_rlcmac_rcv_data_block_acknowledged(bts, trx, ts, data, |
Andreas Eversberg | 570b44b | 2013-03-16 16:15:01 +0100 | [diff] [blame] | 260 | len, rssi); |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 261 | break; |
| 262 | case GPRS_RLCMAC_CONTROL_BLOCK: |
| 263 | block = bitvec_alloc(len); |
| 264 | if (!block) |
| 265 | return -ENOMEM; |
| 266 | bitvec_unpack(block, data); |
Holger Hans Peter Freyther | 8d7a632 | 2013-10-17 15:23:49 +0200 | [diff] [blame] | 267 | rc = gprs_rlcmac_rcv_control_block(bts, block, trx, ts, fn); |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 268 | bitvec_free(block); |
| 269 | break; |
| 270 | case GPRS_RLCMAC_CONTROL_BLOCK_OPT: |
| 271 | LOGP(DRLCMAC, LOGL_NOTICE, "GPRS_RLCMAC_CONTROL_BLOCK_OPT block payload is not supported.\n"); |
Holger Hans Peter Freyther | 26da836 | 2013-10-16 16:34:09 +0200 | [diff] [blame] | 272 | break; |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 273 | default: |
Holger Hans Peter Freyther | 70862c9 | 2013-10-16 16:37:22 +0200 | [diff] [blame] | 274 | LOGP(DRLCMAC, LOGL_NOTICE, "Unknown RLCMAC block payload(%u).\n", payload); |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 275 | rc = -EINVAL; |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 276 | } |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 277 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 278 | return rc; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 279 | } |
| 280 | |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 281 | /* add paging to paging queue(s) */ |
Holger Hans Peter Freyther | 1af73f6 | 2013-10-17 15:51:39 +0200 | [diff] [blame] | 282 | int gprs_rlcmac_add_paging(struct gprs_rlcmac_bts *bts, |
| 283 | uint8_t chan_needed, uint8_t *identity_lv) |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 284 | { |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 285 | uint8_t l, trx, ts, any_tbf = 0; |
| 286 | struct gprs_rlcmac_tbf *tbf; |
| 287 | struct gprs_rlcmac_paging *pag; |
| 288 | uint8_t slot_mask[8]; |
| 289 | int8_t first_ts; /* must be signed */ |
| 290 | |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 291 | LOGP(DRLCMAC, LOGL_INFO, "Add RR paging: chan-needed=%d MI=%s\n", |
| 292 | chan_needed, osmo_hexdump(identity_lv + 1, identity_lv[0])); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 293 | |
| 294 | /* collect slots to page |
| 295 | * Mark slots for every TBF, but only mark one of it. |
| 296 | * Mark only the first slot found. |
| 297 | * Don't mark, if TBF uses a different slot that is already marked. */ |
| 298 | memset(slot_mask, 0, sizeof(slot_mask)); |
| 299 | for (l = 0; gprs_rlcmac_tbfs_lists[l]; l++) { |
| 300 | llist_for_each_entry(tbf, gprs_rlcmac_tbfs_lists[l], list) { |
| 301 | first_ts = -1; |
| 302 | for (ts = 0; ts < 8; ts++) { |
| 303 | if (tbf->pdch[ts]) { |
| 304 | /* remember the first slot found */ |
| 305 | if (first_ts < 0) |
| 306 | first_ts = ts; |
| 307 | /* break, if we already marked a slot */ |
Holger Hans Peter Freyther | 96efa70 | 2013-09-29 07:44:39 +0200 | [diff] [blame] | 308 | if ((slot_mask[tbf->trx_no] & (1 << ts))) |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 309 | break; |
| 310 | } |
| 311 | } |
| 312 | /* mark first slot found, if none is marked already */ |
| 313 | if (ts == 8 && first_ts >= 0) { |
| 314 | LOGP(DRLCMAC, LOGL_DEBUG, "- %s TBF=%d uses " |
| 315 | "TRX=%d TS=%d, so we mark\n", |
| 316 | (tbf->direction == GPRS_RLCMAC_UL_TBF) |
| 317 | ? "UL" : "DL", |
Holger Hans Peter Freyther | 96efa70 | 2013-09-29 07:44:39 +0200 | [diff] [blame] | 318 | tbf->tfi, tbf->trx_no, first_ts); |
| 319 | slot_mask[tbf->trx_no] |= (1 << first_ts); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 320 | } else |
| 321 | LOGP(DRLCMAC, LOGL_DEBUG, "- %s TBF=%d uses " |
| 322 | "already marked TRX=%d TS=%d\n", |
| 323 | (tbf->direction == GPRS_RLCMAC_UL_TBF) |
| 324 | ? "UL" : "DL", |
Holger Hans Peter Freyther | 96efa70 | 2013-09-29 07:44:39 +0200 | [diff] [blame] | 325 | tbf->tfi, tbf->trx_no, ts); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 326 | } |
| 327 | } |
| 328 | |
| 329 | /* Now we have a list of marked slots. Every TBF uses at least one |
| 330 | * of these slots. */ |
| 331 | |
| 332 | /* schedule paging to all marked slots */ |
| 333 | for (trx = 0; trx < 8; trx++) { |
| 334 | if (slot_mask[trx] == 0) |
| 335 | continue; |
| 336 | any_tbf = 1; |
| 337 | for (ts = 0; ts < 8; ts++) { |
| 338 | if ((slot_mask[trx] & (1 << ts))) { |
| 339 | /* schedule */ |
Andreas Eversberg | 6681bb8 | 2012-07-25 08:48:44 +0200 | [diff] [blame] | 340 | pag = talloc_zero(tall_pcu_ctx, |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 341 | struct gprs_rlcmac_paging); |
| 342 | if (!pag) |
| 343 | return -ENOMEM; |
| 344 | pag->chan_needed = chan_needed; |
| 345 | memcpy(pag->identity_lv, identity_lv, |
| 346 | identity_lv[0] + 1); |
| 347 | llist_add(&pag->list, |
| 348 | &bts->trx[trx].pdch[ts].paging_list); |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 349 | LOGP(DRLCMAC, LOGL_INFO, "Paging on PACCH of " |
| 350 | "TRX=%d TS=%d\n", trx, ts); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 351 | } |
| 352 | } |
| 353 | } |
| 354 | |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 355 | if (!any_tbf) |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 356 | LOGP(DRLCMAC, LOGL_INFO, "No paging, because no TBF\n"); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 357 | |
| 358 | return 0; |
| 359 | } |
| 360 | |
| 361 | struct gprs_rlcmac_paging *gprs_rlcmac_dequeue_paging( |
| 362 | struct gprs_rlcmac_pdch *pdch) |
| 363 | { |
| 364 | struct gprs_rlcmac_paging *pag; |
| 365 | |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 366 | if (llist_empty(&pdch->paging_list)) |
| 367 | return NULL; |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 368 | pag = llist_entry(pdch->paging_list.next, |
| 369 | struct gprs_rlcmac_paging, list); |
| 370 | llist_del(&pag->list); |
| 371 | |
| 372 | return pag; |
| 373 | } |
| 374 | |
| 375 | struct msgb *gprs_rlcmac_send_packet_paging_request( |
| 376 | struct gprs_rlcmac_pdch *pdch) |
| 377 | { |
| 378 | struct gprs_rlcmac_paging *pag; |
| 379 | struct msgb *msg; |
| 380 | unsigned wp = 0, len; |
| 381 | |
| 382 | /* no paging, no message */ |
| 383 | pag = gprs_rlcmac_dequeue_paging(pdch); |
| 384 | if (!pag) |
| 385 | return NULL; |
| 386 | |
| 387 | LOGP(DRLCMAC, LOGL_DEBUG, "Scheduling paging\n"); |
| 388 | |
| 389 | /* alloc message */ |
| 390 | msg = msgb_alloc(23, "pag ctrl block"); |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 391 | if (!msg) { |
| 392 | talloc_free(pag); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 393 | return NULL; |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 394 | } |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 395 | bitvec *pag_vec = bitvec_alloc(23); |
| 396 | if (!pag_vec) { |
| 397 | msgb_free(msg); |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 398 | talloc_free(pag); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 399 | return NULL; |
| 400 | } |
| 401 | wp = write_packet_paging_request(pag_vec); |
| 402 | |
| 403 | /* loop until message is full */ |
| 404 | while (pag) { |
| 405 | /* try to add paging */ |
| 406 | if ((pag->identity_lv[1] & 0x07) == 4) { |
| 407 | /* TMSI */ |
| 408 | LOGP(DRLCMAC, LOGL_DEBUG, "- TMSI=0x%08x\n", |
| 409 | ntohl(*((uint32_t *)(pag->identity_lv + 1)))); |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 410 | len = 1 + 1 + 1 + 32 + 2 + 1; |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 411 | if (pag->identity_lv[0] != 5) { |
| 412 | LOGP(DRLCMAC, LOGL_ERROR, "TMSI paging with " |
| 413 | "MI != 5 octets!\n"); |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 414 | goto continue_next; |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 415 | } |
| 416 | } else { |
| 417 | /* MI */ |
| 418 | LOGP(DRLCMAC, LOGL_DEBUG, "- MI=%s\n", |
| 419 | osmo_hexdump(pag->identity_lv + 1, |
| 420 | pag->identity_lv[0])); |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 421 | len = 1 + 1 + 1 + 4 + (pag->identity_lv[0]<<3) + 2 + 1; |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 422 | if (pag->identity_lv[0] > 8) { |
| 423 | LOGP(DRLCMAC, LOGL_ERROR, "Paging with " |
| 424 | "MI > 8 octets!\n"); |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 425 | goto continue_next; |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 426 | } |
| 427 | } |
| 428 | if (wp + len > 184) { |
| 429 | LOGP(DRLCMAC, LOGL_DEBUG, "- Does not fit, so schedule " |
| 430 | "next time\n"); |
| 431 | /* put back paging record, because does not fit */ |
| 432 | llist_add_tail(&pag->list, &pdch->paging_list); |
| 433 | break; |
| 434 | } |
| 435 | write_repeated_page_info(pag_vec, wp, pag->identity_lv[0], |
| 436 | pag->identity_lv + 1, pag->chan_needed); |
| 437 | |
Andreas Eversberg | 5cae087 | 2012-10-07 15:08:22 +0200 | [diff] [blame] | 438 | continue_next: |
| 439 | talloc_free(pag); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 440 | pag = gprs_rlcmac_dequeue_paging(pdch); |
| 441 | } |
| 442 | |
| 443 | bitvec_pack(pag_vec, msgb_put(msg, 23)); |
Andreas Eversberg | 6681bb8 | 2012-07-25 08:48:44 +0200 | [diff] [blame] | 444 | RlcMacDownlink_t * mac_control_block = (RlcMacDownlink_t *)talloc_zero(tall_pcu_ctx, RlcMacDownlink_t); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 445 | LOGP(DRLCMAC, LOGL_DEBUG, "+++++++++++++++++++++++++ TX : Packet Paging Request +++++++++++++++++++++++++\n"); |
| 446 | decode_gsm_rlcmac_downlink(pag_vec, mac_control_block); |
| 447 | LOGPC(DCSN1, LOGL_NOTICE, "\n"); |
| 448 | LOGP(DRLCMAC, LOGL_DEBUG, "------------------------- TX : Packet Paging Request -------------------------\n"); |
| 449 | bitvec_free(pag_vec); |
Andreas Eversberg | 6681bb8 | 2012-07-25 08:48:44 +0200 | [diff] [blame] | 450 | talloc_free(mac_control_block); |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 451 | |
| 452 | return msg; |
| 453 | } |
| 454 | |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 455 | // GSM 04.08 9.1.18 Immediate assignment |
Holger Hans Peter Freyther | ee7a535 | 2013-10-17 15:41:36 +0200 | [diff] [blame] | 456 | int write_immediate_assignment( |
| 457 | struct gprs_rlcmac_bts *bts, |
| 458 | bitvec * dest, uint8_t downlink, uint8_t ra, |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 459 | uint32_t ref_fn, uint8_t ta, uint16_t arfcn, uint8_t ts, uint8_t tsc, |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 460 | uint8_t tfi, uint8_t usf, uint32_t tlli, |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 461 | uint8_t polling, uint32_t fn, uint8_t single_block, uint8_t alpha, |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 462 | uint8_t gamma, int8_t ta_idx) |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 463 | { |
| 464 | unsigned wp = 0; |
Andreas Eversberg | 7b04501 | 2012-07-05 07:38:49 +0200 | [diff] [blame] | 465 | uint8_t plen; |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 466 | |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 467 | bitvec_write_field(dest, wp,0x0,4); // Skip Indicator |
| 468 | bitvec_write_field(dest, wp,0x6,4); // Protocol Discriminator |
| 469 | bitvec_write_field(dest, wp,0x3F,8); // Immediate Assignment Message Type |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 470 | |
| 471 | // 10.5.2.25b Dedicated mode or TBF |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 472 | bitvec_write_field(dest, wp,0x0,1); // spare |
| 473 | bitvec_write_field(dest, wp,0x0,1); // TMA : Two-message assignment: No meaning |
| 474 | bitvec_write_field(dest, wp,downlink,1); // Downlink : Downlink assignment to mobile in packet idle mode |
| 475 | bitvec_write_field(dest, wp,0x1,1); // T/D : TBF or dedicated mode: this message assigns a Temporary Block Flow (TBF). |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 476 | |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 477 | bitvec_write_field(dest, wp,0x0,4); // Page Mode |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 478 | |
| 479 | // GSM 04.08 10.5.2.25a Packet Channel Description |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 480 | bitvec_write_field(dest, wp,0x1,5); // Channel type |
Andreas Eversberg | 0aed654 | 2012-06-23 10:33:16 +0200 | [diff] [blame] | 481 | bitvec_write_field(dest, wp,ts,3); // TN |
| 482 | bitvec_write_field(dest, wp,tsc,3); // TSC |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 483 | bitvec_write_field(dest, wp,0x0,3); // non-hopping RF channel configuraion |
Andreas Eversberg | 0aed654 | 2012-06-23 10:33:16 +0200 | [diff] [blame] | 484 | bitvec_write_field(dest, wp,arfcn,10); // ARFCN |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 485 | |
| 486 | //10.5.2.30 Request Reference |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 487 | bitvec_write_field(dest, wp,ra,8); // RA |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 488 | bitvec_write_field(dest, wp,(ref_fn / (26 * 51)) % 32,5); // T1' |
| 489 | bitvec_write_field(dest, wp,ref_fn % 51,6); // T3 |
| 490 | bitvec_write_field(dest, wp,ref_fn % 26,5); // T2 |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 491 | |
| 492 | // 10.5.2.40 Timing Advance |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 493 | bitvec_write_field(dest, wp,0x0,2); // spare |
| 494 | bitvec_write_field(dest, wp,ta,6); // Timing Advance value |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 495 | |
| 496 | // No mobile allocation in non-hopping systems. |
| 497 | // A zero-length LV. Just write L=0. |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 498 | bitvec_write_field(dest, wp,0,8); |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 499 | |
Andreas Eversberg | 7b04501 | 2012-07-05 07:38:49 +0200 | [diff] [blame] | 500 | if ((wp % 8)) { |
| 501 | LOGP(DRLCMACUL, LOGL_ERROR, "Length of IMM.ASS without rest " |
| 502 | "octets is not multiple of 8 bits, PLEASE FIX!\n"); |
| 503 | exit (0); |
| 504 | } |
| 505 | plen = wp / 8; |
| 506 | |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 507 | if (downlink) |
| 508 | { |
| 509 | // GSM 04.08 10.5.2.16 IA Rest Octets |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 510 | bitvec_write_field(dest, wp, 3, 2); // "HH" |
| 511 | bitvec_write_field(dest, wp, 1, 2); // "01" Packet Downlink Assignment |
| 512 | bitvec_write_field(dest, wp,tlli,32); // TLLI |
| 513 | bitvec_write_field(dest, wp,0x1,1); // switch TFI : on |
| 514 | bitvec_write_field(dest, wp,tfi,5); // TFI |
| 515 | bitvec_write_field(dest, wp,0x0,1); // RLC acknowledged mode |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 516 | if (alpha) { |
| 517 | bitvec_write_field(dest, wp,0x1,1); // ALPHA = present |
| 518 | bitvec_write_field(dest, wp,alpha,4); // ALPHA |
| 519 | } else { |
| 520 | bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present |
| 521 | } |
| 522 | bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 523 | bitvec_write_field(dest, wp,polling,1); // Polling Bit |
| 524 | bitvec_write_field(dest, wp,!polling,1); // TA_VALID ??? |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 525 | if (ta_idx < 0) { |
| 526 | bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off |
| 527 | } else { |
| 528 | bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on |
| 529 | bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX |
| 530 | } |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 531 | if (polling) { |
| 532 | bitvec_write_field(dest, wp,0x1,1); // TBF Starting TIME present |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 533 | bitvec_write_field(dest, wp,(fn / (26 * 51)) % 32,5); // T1' |
| 534 | bitvec_write_field(dest, wp,fn % 51,6); // T3 |
| 535 | bitvec_write_field(dest, wp,fn % 26,5); // T2 |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 536 | } else { |
| 537 | bitvec_write_field(dest, wp,0x0,1); // TBF Starting TIME present |
| 538 | } |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 539 | bitvec_write_field(dest, wp,0x0,1); // P0 not present |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 540 | // bitvec_write_field(dest, wp,0x1,1); // P0 not present |
| 541 | // bitvec_write_field(dest, wp,0xb,4); |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 542 | } |
| 543 | else |
| 544 | { |
| 545 | // GMS 04.08 10.5.2.37b 10.5.2.16 |
Ivan Kluchnikov | 835f91e | 2012-04-30 18:00:36 +0400 | [diff] [blame] | 546 | bitvec_write_field(dest, wp, 3, 2); // "HH" |
| 547 | bitvec_write_field(dest, wp, 0, 2); // "0" Packet Uplink Assignment |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 548 | if (single_block) { |
| 549 | bitvec_write_field(dest, wp, 0, 1); // Block Allocation : Single Block Allocation |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 550 | if (alpha) { |
| 551 | bitvec_write_field(dest, wp,0x1,1); // ALPHA = present |
| 552 | bitvec_write_field(dest, wp,alpha,4); // ALPHA = present |
| 553 | } else |
| 554 | bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present |
| 555 | bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 556 | if (ta_idx < 0) { |
| 557 | bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off |
| 558 | } else { |
| 559 | bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on |
| 560 | bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX |
| 561 | } |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 562 | bitvec_write_field(dest, wp, 1, 1); // TBF_STARTING_TIME_FLAG |
| 563 | bitvec_write_field(dest, wp,(fn / (26 * 51)) % 32,5); // T1' |
| 564 | bitvec_write_field(dest, wp,fn % 51,6); // T3 |
| 565 | bitvec_write_field(dest, wp,fn % 26,5); // T2 |
| 566 | } else { |
| 567 | bitvec_write_field(dest, wp, 1, 1); // Block Allocation : Not Single Block Allocation |
| 568 | bitvec_write_field(dest, wp, tfi, 5); // TFI_ASSIGNMENT Temporary Flow Identity |
| 569 | bitvec_write_field(dest, wp, 0, 1); // POLLING |
| 570 | bitvec_write_field(dest, wp, 0, 1); // ALLOCATION_TYPE: dynamic |
| 571 | bitvec_write_field(dest, wp, usf, 3); // USF |
| 572 | bitvec_write_field(dest, wp, 0, 1); // USF_GRANULARITY |
| 573 | bitvec_write_field(dest, wp, 0, 1); // "0" power control: Not Present |
Andreas Eversberg | 499ff41 | 2012-10-03 14:21:36 +0200 | [diff] [blame] | 574 | bitvec_write_field(dest, wp, bts->initial_cs_ul-1, 2); // CHANNEL_CODING_COMMAND |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 575 | bitvec_write_field(dest, wp, 1, 1); // TLLI_BLOCK_CHANNEL_CODING |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 576 | if (alpha) { |
| 577 | bitvec_write_field(dest, wp,0x1,1); // ALPHA = present |
| 578 | bitvec_write_field(dest, wp,alpha,4); // ALPHA |
| 579 | } else |
| 580 | bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present |
| 581 | bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 582 | /* note: there is no choise for TAI and no starting time */ |
| 583 | bitvec_write_field(dest, wp, 0, 1); // switch TIMING_ADVANCE_INDEX = off |
Andreas Eversberg | 07e97cf | 2012-08-07 16:00:56 +0200 | [diff] [blame] | 584 | bitvec_write_field(dest, wp, 0, 1); // TBF_STARTING_TIME_FLAG |
| 585 | } |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 586 | } |
| 587 | |
Andreas Eversberg | 7b04501 | 2012-07-05 07:38:49 +0200 | [diff] [blame] | 588 | return plen; |
Ivan Kluchnikov | 5310d45 | 2012-04-17 22:00:31 +0400 | [diff] [blame] | 589 | } |
| 590 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 591 | /* generate uplink assignment */ |
Holger Hans Peter Freyther | 485860c | 2013-10-17 15:38:23 +0200 | [diff] [blame] | 592 | void write_packet_uplink_assignment( |
| 593 | struct gprs_rlcmac_bts *bts, |
| 594 | bitvec * dest, uint8_t old_tfi, |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 595 | uint8_t old_downlink, uint32_t tlli, uint8_t use_tlli, |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 596 | struct gprs_rlcmac_tbf *tbf, uint8_t poll, uint8_t alpha, |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 597 | uint8_t gamma, int8_t ta_idx) |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 598 | { |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 599 | // TODO We should use our implementation of encode RLC/MAC Control messages. |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 600 | unsigned wp = 0; |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 601 | uint8_t ts; |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 602 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 603 | bitvec_write_field(dest, wp,0x1,2); // Payload Type |
| 604 | bitvec_write_field(dest, wp,0x0,2); // Uplink block with TDMA framenumber (N+13) |
| 605 | bitvec_write_field(dest, wp,poll,1); // Suppl/Polling Bit |
| 606 | bitvec_write_field(dest, wp,0x0,3); // Uplink state flag |
| 607 | bitvec_write_field(dest, wp,0xa,6); // MESSAGE TYPE |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 608 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 609 | bitvec_write_field(dest, wp,0x0,2); // Page Mode |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 610 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 611 | bitvec_write_field(dest, wp,0x0,1); // switch PERSIST_LEVEL: off |
| 612 | if (use_tlli) { |
| 613 | bitvec_write_field(dest, wp,0x2,2); // switch TLLI : on |
| 614 | bitvec_write_field(dest, wp,tlli,32); // TLLI |
| 615 | } else { |
| 616 | bitvec_write_field(dest, wp,0x0,1); // switch TFI : on |
| 617 | bitvec_write_field(dest, wp,old_downlink,1); // 0=UPLINK TFI, 1=DL TFI |
| 618 | bitvec_write_field(dest, wp,old_tfi,5); // TFI |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 619 | } |
Ivan Kluchnikov | b2b8100 | 2012-06-04 21:57:02 +0400 | [diff] [blame] | 620 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 621 | bitvec_write_field(dest, wp,0x0,1); // Message escape |
Andreas Eversberg | 499ff41 | 2012-10-03 14:21:36 +0200 | [diff] [blame] | 622 | bitvec_write_field(dest, wp,bts->initial_cs_ul-1, 2); // CHANNEL_CODING_COMMAND |
Andreas Eversberg | dfa563c | 2012-07-06 08:13:59 +0200 | [diff] [blame] | 623 | bitvec_write_field(dest, wp,0x1,1); // TLLI_BLOCK_CHANNEL_CODING |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 624 | bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_VALUE = on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 625 | bitvec_write_field(dest, wp,tbf->ta,6); // TIMING_ADVANCE_VALUE |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 626 | if (ta_idx < 0) { |
| 627 | bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off |
| 628 | } else { |
| 629 | bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on |
| 630 | bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX |
| 631 | } |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 632 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 633 | #if 1 |
| 634 | bitvec_write_field(dest, wp,0x1,1); // Frequency Parameters information elements = present |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 635 | bitvec_write_field(dest, wp,tbf->tsc,3); // Training Sequence Code (TSC) |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 636 | bitvec_write_field(dest, wp,0x0,2); // ARFCN = present |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 637 | bitvec_write_field(dest, wp,tbf->arfcn,10); // ARFCN |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 638 | #else |
| 639 | bitvec_write_field(dest, wp,0x0,1); // Frequency Parameters = off |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 640 | #endif |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 641 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 642 | bitvec_write_field(dest, wp,0x1,2); // Dynamic Allocation |
Ivan Kluchnikov | e359423 | 2012-06-07 01:12:29 +0400 | [diff] [blame] | 643 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 644 | bitvec_write_field(dest, wp,0x0,1); // Extended Dynamic Allocation = off |
| 645 | bitvec_write_field(dest, wp,0x0,1); // P0 = off |
Ivan Kluchnikov | e359423 | 2012-06-07 01:12:29 +0400 | [diff] [blame] | 646 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 647 | bitvec_write_field(dest, wp,0x0,1); // USF_GRANULARITY |
| 648 | bitvec_write_field(dest, wp,0x1,1); // switch TFI : on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 649 | bitvec_write_field(dest, wp,tbf->tfi,5);// TFI |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 650 | |
| 651 | bitvec_write_field(dest, wp,0x0,1); // |
| 652 | bitvec_write_field(dest, wp,0x0,1); // TBF Starting Time = off |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 653 | if (alpha || gamma) { |
| 654 | bitvec_write_field(dest, wp,0x1,1); // Timeslot Allocation with Power Control |
| 655 | bitvec_write_field(dest, wp,alpha,4); // ALPHA |
| 656 | } else |
| 657 | bitvec_write_field(dest, wp,0x0,1); // Timeslot Allocation |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 658 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 659 | for (ts = 0; ts < 8; ts++) { |
| 660 | if (tbf->pdch[ts]) { |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 661 | bitvec_write_field(dest, wp,0x1,1); // USF_TN(i): on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 662 | bitvec_write_field(dest, wp,tbf->dir.ul.usf[ts],3); // USF_TN(i) |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 663 | if (alpha || gamma) |
| 664 | bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 665 | } else |
| 666 | bitvec_write_field(dest, wp,0x0,1); // USF_TN(i): off |
Ivan Kluchnikov | e359423 | 2012-06-07 01:12:29 +0400 | [diff] [blame] | 667 | } |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 668 | // bitvec_write_field(dest, wp,0x0,1); // Measurement Mapping struct not present |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 669 | } |
| 670 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 671 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 672 | /* generate downlink assignment */ |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 673 | void write_packet_downlink_assignment(RlcMacDownlink_t * block, uint8_t old_tfi, |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 674 | uint8_t old_downlink, struct gprs_rlcmac_tbf *tbf, uint8_t poll, |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 675 | uint8_t alpha, uint8_t gamma, int8_t ta_idx, uint8_t ta_ts) |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 676 | { |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 677 | // Packet downlink assignment TS 44.060 11.2.7 |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 678 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 679 | uint8_t tn; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 680 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 681 | block->PAYLOAD_TYPE = 0x1; // RLC/MAC control block that does not include the optional octets of the RLC/MAC control header |
| 682 | block->RRBP = 0x0; // N+13 |
| 683 | block->SP = poll; // RRBP field is valid |
| 684 | block->USF = 0x0; // Uplink state flag |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 685 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 686 | block->u.Packet_Downlink_Assignment.MESSAGE_TYPE = 0x2; // Packet Downlink Assignment |
| 687 | block->u.Packet_Downlink_Assignment.PAGE_MODE = 0x0; // Normal Paging |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 688 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 689 | block->u.Packet_Downlink_Assignment.Exist_PERSISTENCE_LEVEL = 0x0; // PERSISTENCE_LEVEL: off |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 690 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 691 | block->u.Packet_Downlink_Assignment.ID.UnionType = 0x0; // TFI = on |
| 692 | block->u.Packet_Downlink_Assignment.ID.u.Global_TFI.UnionType = old_downlink; // 0=UPLINK TFI, 1=DL TFI |
| 693 | block->u.Packet_Downlink_Assignment.ID.u.Global_TFI.u.UPLINK_TFI = old_tfi; // TFI |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 694 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 695 | block->u.Packet_Downlink_Assignment.MAC_MODE = 0x0; // Dynamic Allocation |
| 696 | block->u.Packet_Downlink_Assignment.RLC_MODE = 0x0; // RLC acknowledged mode |
| 697 | block->u.Packet_Downlink_Assignment.CONTROL_ACK = old_downlink; // NW establishes no new DL TBF for the MS with running timer T3192 |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 698 | block->u.Packet_Downlink_Assignment.TIMESLOT_ALLOCATION = 0; // timeslot(s) |
| 699 | for (tn = 0; tn < 8; tn++) { |
| 700 | if (tbf->pdch[tn]) |
| 701 | block->u.Packet_Downlink_Assignment.TIMESLOT_ALLOCATION |= 0x80 >> tn; // timeslot(s) |
| 702 | } |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 703 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 704 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_TIMING_ADVANCE_VALUE = 0x1; // TIMING_ADVANCE_VALUE = on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 705 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_VALUE = tbf->ta; // TIMING_ADVANCE_VALUE |
Andreas Eversberg | afdd9e1 | 2012-10-07 17:08:55 +0200 | [diff] [blame] | 706 | if (ta_idx < 0) { |
| 707 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_IndexAndtimeSlot = 0x0; // TIMING_ADVANCE_INDEX = off |
| 708 | } else { |
| 709 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_IndexAndtimeSlot = 0x1; // TIMING_ADVANCE_INDEX = on |
| 710 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_INDEX = ta_idx; // TIMING_ADVANCE_INDEX |
| 711 | block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_TIMESLOT_NUMBER = ta_ts; // TIMING_ADVANCE_TS |
| 712 | } |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 713 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 714 | block->u.Packet_Downlink_Assignment.Exist_P0_and_BTS_PWR_CTRL_MODE = 0x0; // POWER CONTROL = off |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 715 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 716 | block->u.Packet_Downlink_Assignment.Exist_Frequency_Parameters = 0x1; // Frequency Parameters = on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 717 | block->u.Packet_Downlink_Assignment.Frequency_Parameters.TSC = tbf->tsc; // Training Sequence Code (TSC) |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 718 | block->u.Packet_Downlink_Assignment.Frequency_Parameters.UnionType = 0x0; // ARFCN = on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 719 | block->u.Packet_Downlink_Assignment.Frequency_Parameters.u.ARFCN = tbf->arfcn; // ARFCN |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 720 | |
| 721 | block->u.Packet_Downlink_Assignment.Exist_DOWNLINK_TFI_ASSIGNMENT = 0x1; // DOWNLINK TFI ASSIGNMENT = on |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 722 | block->u.Packet_Downlink_Assignment.DOWNLINK_TFI_ASSIGNMENT = tbf->tfi; // TFI |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 723 | |
| 724 | block->u.Packet_Downlink_Assignment.Exist_Power_Control_Parameters = 0x1; // Power Control Parameters = on |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 725 | block->u.Packet_Downlink_Assignment.Power_Control_Parameters.ALPHA = alpha; // ALPHA |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 726 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 727 | for (tn = 0; tn < 8; tn++) |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 728 | { |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 729 | if (tbf->pdch[tn]) |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 730 | { |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 731 | block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].Exist = 0x1; // Slot[i] = on |
Andreas Eversberg | aafcbbb | 2012-09-27 09:20:45 +0200 | [diff] [blame] | 732 | block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].GAMMA_TN = gamma; // GAMMA_TN |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 733 | } |
| 734 | else |
| 735 | { |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 736 | block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].Exist = 0x0; // Slot[i] = off |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 737 | } |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 738 | } |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 739 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 740 | block->u.Packet_Downlink_Assignment.Exist_TBF_Starting_Time = 0x0; // TBF Starting TIME = off |
| 741 | block->u.Packet_Downlink_Assignment.Exist_Measurement_Mapping = 0x0; // Measurement_Mapping = off |
| 742 | block->u.Packet_Downlink_Assignment.Exist_AdditionsR99 = 0x0; // AdditionsR99 = off |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 743 | } |
| 744 | |
Andreas Eversberg | 8c3680d | 2012-10-08 12:30:56 +0200 | [diff] [blame] | 745 | /* generate paging request */ |
| 746 | int write_paging_request(bitvec * dest, uint8_t *ptmsi, uint16_t ptmsi_len) |
| 747 | { |
| 748 | unsigned wp = 0; |
| 749 | int plen; |
| 750 | |
| 751 | bitvec_write_field(dest, wp,0x0,4); // Skip Indicator |
| 752 | bitvec_write_field(dest, wp,0x6,4); // Protocol Discriminator |
| 753 | bitvec_write_field(dest, wp,0x21,8); // Paging Request Message Type |
| 754 | |
| 755 | bitvec_write_field(dest, wp,0x0,4); // Page Mode |
| 756 | bitvec_write_field(dest, wp,0x0,4); // Channel Needed |
| 757 | |
| 758 | // Mobile Identity |
| 759 | bitvec_write_field(dest, wp,ptmsi_len+1,8); // Mobile Identity length |
| 760 | bitvec_write_field(dest, wp,0xf,4); // unused |
| 761 | bitvec_write_field(dest, wp,0x4,4); // PTMSI type |
| 762 | for (int i = 0; i < ptmsi_len; i++) |
| 763 | { |
| 764 | bitvec_write_field(dest, wp,ptmsi[i],8); // PTMSI |
| 765 | } |
| 766 | if ((wp % 8)) { |
| 767 | LOGP(DRLCMACUL, LOGL_ERROR, "Length of PAG.REQ without rest " |
| 768 | "octets is not multiple of 8 bits, PLEASE FIX!\n"); |
| 769 | exit (0); |
| 770 | } |
| 771 | plen = wp / 8; |
| 772 | bitvec_write_field(dest, wp,0x0,1); // "L" NLN(PCH) = off |
| 773 | bitvec_write_field(dest, wp,0x0,1); // "L" Priority1 = off |
| 774 | bitvec_write_field(dest, wp,0x1,1); // "L" Priority2 = off |
| 775 | bitvec_write_field(dest, wp,0x0,1); // "L" Group Call information = off |
| 776 | bitvec_write_field(dest, wp,0x0,1); // "H" Packet Page Indication 1 = packet paging procedure |
| 777 | bitvec_write_field(dest, wp,0x1,1); // "H" Packet Page Indication 2 = packet paging procedure |
| 778 | |
| 779 | return plen; |
| 780 | } |
| 781 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 782 | /* generate uplink ack */ |
Holger Hans Peter Freyther | ae947fc | 2013-10-17 13:29:03 +0200 | [diff] [blame] | 783 | void write_packet_uplink_ack(struct gprs_rlcmac_bts *bts, |
| 784 | RlcMacDownlink_t * block, struct gprs_rlcmac_tbf *tbf, |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 785 | uint8_t final) |
| 786 | { |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 787 | // Packet Uplink Ack/Nack TS 44.060 11.2.28 |
| 788 | |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 789 | char show_v_n[65]; |
| 790 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 791 | uint8_t rbb = 0; |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 792 | uint16_t i, bbn; |
| 793 | uint16_t mod_sns_half = (tbf->sns >> 1) - 1; |
| 794 | char bit; |
| 795 | |
| 796 | LOGP(DRLCMACUL, LOGL_DEBUG, "Sending Ack/Nack for TBF=%d " |
| 797 | "(final=%d)\n", tbf->tfi, final); |
| 798 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 799 | block->PAYLOAD_TYPE = 0x1; // RLC/MAC control block that does not include the optional octets of the RLC/MAC control header |
| 800 | block->RRBP = 0x0; // N+13 |
| 801 | block->SP = final; // RRBP field is valid, if it is final ack |
| 802 | block->USF = 0x0; // Uplink state flag |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 803 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 804 | block->u.Packet_Uplink_Ack_Nack.MESSAGE_TYPE = 0x9; // Packet Downlink Assignment |
| 805 | block->u.Packet_Uplink_Ack_Nack.PAGE_MODE = 0x0; // Normal Paging |
| 806 | block->u.Packet_Uplink_Ack_Nack.UPLINK_TFI = tbf->tfi; // Uplink TFI |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 807 | |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 808 | block->u.Packet_Uplink_Ack_Nack.UnionType = 0x0; // PU_AckNack_GPRS = on |
Andreas Eversberg | 499ff41 | 2012-10-03 14:21:36 +0200 | [diff] [blame] | 809 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.CHANNEL_CODING_COMMAND = bts->initial_cs_ul - 1; // CS1 |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 810 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Ack_Nack_Description.FINAL_ACK_INDICATION = final; // FINAL ACK INDICATION |
| 811 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Ack_Nack_Description.STARTING_SEQUENCE_NUMBER = tbf->dir.ul.v_r; // STARTING_SEQUENCE_NUMBER |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 812 | // RECEIVE_BLOCK_BITMAP |
| 813 | for (i = 0, bbn = (tbf->dir.ul.v_r - 64) & mod_sns_half; i < 64; |
| 814 | i++, bbn = (bbn + 1) & mod_sns_half) { |
| 815 | bit = tbf->dir.ul.v_n[bbn]; |
| 816 | if (bit == 0) |
| 817 | bit = ' '; |
| 818 | show_v_n[i] = bit; |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 819 | if (bit == 'R') |
| 820 | rbb = (rbb << 1)|1; |
| 821 | else |
| 822 | rbb = (rbb << 1); |
| 823 | if((i%8) == 7) |
| 824 | { |
| 825 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Ack_Nack_Description.RECEIVED_BLOCK_BITMAP[i/8] = rbb; |
| 826 | rbb = 0; |
| 827 | } |
Ivan Kluchnikov | e359423 | 2012-06-07 01:12:29 +0400 | [diff] [blame] | 828 | } |
Andreas Eversberg | e6228b3 | 2012-07-03 13:36:03 +0200 | [diff] [blame] | 829 | show_v_n[64] = '\0'; |
| 830 | LOGP(DRLCMACUL, LOGL_DEBUG, "- V(N): \"%s\" R=Received " |
| 831 | "N=Not-Received\n", show_v_n); |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 832 | |
| 833 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.UnionType = 0x0; // Fixed Allocation Dummy = on |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 834 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.u.FixedAllocationDummy = 0x0; // Fixed Allocation Dummy |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 835 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Exist_AdditionsR99 = 0x0; // AdditionsR99 = off |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 836 | |
| 837 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Common_Uplink_Ack_Nack_Data.Exist_CONTENTION_RESOLUTION_TLLI = 0x1; |
Ivan Kluchnikov | ef7f28c | 2012-07-12 14:49:15 +0400 | [diff] [blame] | 838 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Common_Uplink_Ack_Nack_Data.CONTENTION_RESOLUTION_TLLI = tbf->tlli; |
Ivan Kluchnikov | 34460b8 | 2012-06-27 18:41:04 +0400 | [diff] [blame] | 839 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Common_Uplink_Ack_Nack_Data.Exist_Packet_Timing_Advance = 0x0; |
| 840 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Common_Uplink_Ack_Nack_Data.Exist_Extension_Bits = 0x0; |
| 841 | block->u.Packet_Uplink_Ack_Nack.u.PU_AckNack_GPRS_Struct.Common_Uplink_Ack_Nack_Data.Exist_Power_Control_Parameters = 0x0; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 842 | } |
| 843 | |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 844 | unsigned write_packet_paging_request(bitvec * dest) |
| 845 | { |
| 846 | unsigned wp = 0; |
| 847 | |
| 848 | bitvec_write_field(dest, wp,0x1,2); // Payload Type |
| 849 | bitvec_write_field(dest, wp,0x0,3); // No polling |
| 850 | bitvec_write_field(dest, wp,0x0,3); // Uplink state flag |
| 851 | bitvec_write_field(dest, wp,0x22,6); // MESSAGE TYPE |
| 852 | |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 853 | bitvec_write_field(dest, wp,0x0,2); // Page Mode |
| 854 | |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 855 | bitvec_write_field(dest, wp,0x0,1); // No PERSISTENCE_LEVEL |
| 856 | bitvec_write_field(dest, wp,0x0,1); // No NLN |
| 857 | |
| 858 | return wp; |
| 859 | } |
| 860 | |
| 861 | unsigned write_repeated_page_info(bitvec * dest, unsigned& wp, uint8_t len, |
| 862 | uint8_t *identity, uint8_t chan_needed) |
| 863 | { |
Andreas Eversberg | 3b7461c | 2012-07-20 11:19:59 +0200 | [diff] [blame] | 864 | bitvec_write_field(dest, wp,0x1,1); // Repeated Page info exists |
| 865 | |
Andreas Eversberg | 2b91464 | 2012-07-19 13:06:26 +0200 | [diff] [blame] | 866 | bitvec_write_field(dest, wp,0x1,1); // RR connection paging |
| 867 | |
| 868 | if ((identity[0] & 0x07) == 4) { |
| 869 | bitvec_write_field(dest, wp,0x0,1); // TMSI |
| 870 | identity++; |
| 871 | len--; |
| 872 | } else { |
| 873 | bitvec_write_field(dest, wp,0x0,1); // MI |
| 874 | bitvec_write_field(dest, wp,len,4); // MI len |
| 875 | } |
| 876 | while (len) { |
| 877 | bitvec_write_field(dest, wp,*identity++,8); // MI data |
| 878 | len--; |
| 879 | } |
| 880 | bitvec_write_field(dest, wp,chan_needed,2); // CHANNEL_NEEDED |
| 881 | bitvec_write_field(dest, wp,0x0,1); // No eMLPP_PRIORITY |
| 882 | |
| 883 | return wp; |
| 884 | } |
| 885 | |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 886 | /* Send Uplink unit-data to SGSN. */ |
Andreas Eversberg | 3e372d5 | 2012-07-06 09:28:15 +0200 | [diff] [blame] | 887 | int gprs_rlcmac_tx_ul_ud(gprs_rlcmac_tbf *tbf) |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 888 | { |
Andreas Eversberg | 9a91346 | 2012-09-23 06:42:38 +0200 | [diff] [blame] | 889 | uint8_t qos_profile[3]; |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 890 | struct msgb *llc_pdu; |
Andreas Eversberg | 5dac2f0 | 2012-06-27 15:52:04 +0200 | [diff] [blame] | 891 | unsigned msg_len = NS_HDR_LEN + BSSGP_HDR_LEN + tbf->llc_index; |
Holger Hans Peter Freyther | 90692f9 | 2013-07-13 12:51:16 +0200 | [diff] [blame] | 892 | struct bssgp_bvc_ctx *bctx = gprs_bssgp_pcu_current_bctx(); |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 893 | |
Andreas Eversberg | b0c7ea7 | 2012-07-13 14:46:03 +0200 | [diff] [blame] | 894 | LOGP(DBSSGP, LOGL_INFO, "LLC [PCU -> SGSN] TFI: %u TLLI: 0x%08x len=%d\n", tbf->tfi, tbf->tlli, tbf->llc_index); |
Andreas Eversberg | 3e372d5 | 2012-07-06 09:28:15 +0200 | [diff] [blame] | 895 | if (!bctx) { |
| 896 | LOGP(DBSSGP, LOGL_ERROR, "No bctx\n"); |
| 897 | return -EIO; |
| 898 | } |
Ivan Kluchnikov | c320d86 | 2012-03-18 15:04:48 +0400 | [diff] [blame] | 899 | |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 900 | llc_pdu = msgb_alloc_headroom(msg_len, msg_len,"llc_pdu"); |
Andreas Eversberg | 9a91346 | 2012-09-23 06:42:38 +0200 | [diff] [blame] | 901 | uint8_t *buf = msgb_push(llc_pdu, TL16V_GROSS_LEN(sizeof(uint8_t)*tbf->llc_index)); |
| 902 | tl16v_put(buf, BSSGP_IE_LLC_PDU, sizeof(uint8_t)*tbf->llc_index, tbf->llc_frame); |
| 903 | qos_profile[0] = QOS_PROFILE >> 16; |
| 904 | qos_profile[1] = QOS_PROFILE >> 8; |
| 905 | qos_profile[2] = QOS_PROFILE; |
| 906 | bssgp_tx_ul_ud(bctx, tbf->tlli, qos_profile, llc_pdu); |
Ivan Kluchnikov | 8ee6051 | 2012-03-05 19:24:57 +0400 | [diff] [blame] | 907 | |
Andreas Eversberg | 3e372d5 | 2012-07-06 09:28:15 +0200 | [diff] [blame] | 908 | return 0; |
Ivan Kluchnikov | c7e7f68 | 2012-06-29 22:53:15 +0400 | [diff] [blame] | 909 | } |
Andreas Eversberg | 8c3680d | 2012-10-08 12:30:56 +0200 | [diff] [blame] | 910 | |
| 911 | int gprs_rlcmac_paging_request(uint8_t *ptmsi, uint16_t ptmsi_len, |
| 912 | const char *imsi) |
| 913 | { |
| 914 | LOGP(DRLCMAC, LOGL_NOTICE, "TX: [PCU -> BTS] Paging Request (CCCH)\n"); |
| 915 | bitvec *paging_request = bitvec_alloc(23); |
| 916 | bitvec_unhex(paging_request, "2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b2b"); |
| 917 | int plen = write_paging_request(paging_request, ptmsi, ptmsi_len); |
| 918 | pcu_l1if_tx_pch(paging_request, plen, (char *)imsi); |
| 919 | bitvec_free(paging_request); |
| 920 | |
| 921 | return 0; |
| 922 | } |
Andreas Eversberg | a004e6a | 2013-05-13 16:45:21 +0200 | [diff] [blame] | 923 | |
| 924 | |
| 925 | /* |
| 926 | * timing advance memory |
| 927 | */ |
| 928 | |
| 929 | /* enable to debug timing advance memory */ |
| 930 | //#define DEBUG_TA |
| 931 | |
| 932 | static LLIST_HEAD(gprs_rlcmac_ta_list); |
| 933 | static int gprs_rlcmac_ta_num = 0; |
| 934 | |
| 935 | struct gprs_rlcmac_ta { |
| 936 | struct llist_head list; |
| 937 | uint32_t tlli; |
| 938 | uint8_t ta; |
| 939 | }; |
| 940 | |
| 941 | /* remember timing advance of a given TLLI */ |
| 942 | int remember_timing_advance(uint32_t tlli, uint8_t ta) |
| 943 | { |
| 944 | struct gprs_rlcmac_ta *ta_entry; |
| 945 | |
| 946 | /* check for existing entry */ |
| 947 | llist_for_each_entry(ta_entry, &gprs_rlcmac_ta_list, list) { |
| 948 | if (ta_entry->tlli == tlli) { |
| 949 | #ifdef DEBUG_TA |
| 950 | fprintf(stderr, "update %08x %d\n", tlli, ta); |
| 951 | #endif |
| 952 | ta_entry->ta = ta; |
| 953 | /* relink to end of list */ |
| 954 | llist_del(&ta_entry->list); |
| 955 | llist_add_tail(&ta_entry->list, &gprs_rlcmac_ta_list); |
| 956 | return 0; |
| 957 | } |
| 958 | } |
| 959 | |
| 960 | #ifdef DEBUG_TA |
| 961 | fprintf(stderr, "remember %08x %d\n", tlli, ta); |
| 962 | #endif |
| 963 | /* if list is full, remove oldest entry */ |
| 964 | if (gprs_rlcmac_ta_num == 30) { |
| 965 | ta_entry = llist_entry(gprs_rlcmac_ta_list.next, |
| 966 | struct gprs_rlcmac_ta, list); |
| 967 | llist_del(&ta_entry->list); |
| 968 | talloc_free(ta_entry); |
| 969 | gprs_rlcmac_ta_num--; |
| 970 | } |
| 971 | |
| 972 | /* create new TA entry */ |
| 973 | ta_entry = talloc_zero(tall_pcu_ctx, struct gprs_rlcmac_ta); |
| 974 | if (!ta_entry) |
| 975 | return -ENOMEM; |
| 976 | |
| 977 | ta_entry->tlli = tlli; |
| 978 | ta_entry->ta = ta; |
| 979 | llist_add_tail(&ta_entry->list, &gprs_rlcmac_ta_list); |
| 980 | gprs_rlcmac_ta_num++; |
| 981 | |
| 982 | return 0; |
| 983 | } |
| 984 | |
| 985 | int recall_timing_advance(uint32_t tlli) |
| 986 | { |
| 987 | struct gprs_rlcmac_ta *ta_entry; |
| 988 | uint8_t ta; |
| 989 | |
| 990 | llist_for_each_entry(ta_entry, &gprs_rlcmac_ta_list, list) { |
| 991 | if (ta_entry->tlli == tlli) { |
| 992 | ta = ta_entry->ta; |
| 993 | #ifdef DEBUG_TA |
| 994 | fprintf(stderr, "recall %08x %d\n", tlli, ta); |
| 995 | #endif |
| 996 | return ta; |
| 997 | } |
| 998 | } |
| 999 | #ifdef DEBUG_TA |
| 1000 | fprintf(stderr, "no entry for %08x\n", tlli); |
| 1001 | #endif |
| 1002 | |
| 1003 | return -EINVAL; |
| 1004 | } |
| 1005 | |
| 1006 | int flush_timing_advance(void) |
| 1007 | { |
| 1008 | struct gprs_rlcmac_ta *ta_entry; |
| 1009 | int count = 0; |
| 1010 | |
| 1011 | while (!llist_empty(&gprs_rlcmac_ta_list)) { |
| 1012 | ta_entry = llist_entry(gprs_rlcmac_ta_list.next, |
| 1013 | struct gprs_rlcmac_ta, list); |
| 1014 | #ifdef DEBUG_TA |
| 1015 | fprintf(stderr, "flush entry %08x %d\n", ta_entry->tlli, |
| 1016 | ta_entry->ta); |
| 1017 | #endif |
| 1018 | llist_del(&ta_entry->list); |
| 1019 | talloc_free(ta_entry); |
| 1020 | count++; |
| 1021 | } |
| 1022 | gprs_rlcmac_ta_num = 0; |
| 1023 | |
| 1024 | return count; |
| 1025 | } |
| 1026 | |