blob: b558a4a0add9761dd40ef9f3ba54f72acfd2ee13 [file] [log] [blame]
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +02001/* encoding.cpp
2 *
3 * Copyright (C) 2012 Ivan Klyuchnikov
4 * Copyright (C) 2012 Andreas Eversberg <jolly@eversberg.eu>
5 * Copyright (C) 2013 by Holger Hans Peter Freyther
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
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +020022#include <encoding.h>
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +020023#include <gprs_rlcmac.h>
Holger Hans Peter Freyther34bd8bd2013-10-19 21:10:38 +020024#include <bts.h>
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +020025#include <tbf.h>
26#include <gprs_debug.h>
27
Jacob Erlbeckf0e40392016-01-08 10:07:53 +010028#include <errno.h>
29#include <string.h>
30
Jacob Erlbeck18831c32016-02-01 15:23:35 +010031static void write_ia_rest_downlink(
32 bitvec * dest, unsigned& wp,
33 uint8_t tfi, uint32_t tlli, uint8_t polling,
34 uint32_t fn, uint8_t alpha, uint8_t gamma, int8_t ta_idx)
35{
36 // GSM 04.08 10.5.2.16 IA Rest Octets
37 bitvec_write_field_lh(dest, wp, 3, 2); // "HH"
38 bitvec_write_field(dest, wp, 1, 2); // "01" Packet Downlink Assignment
39 bitvec_write_field(dest, wp,tlli,32); // TLLI
40 bitvec_write_field(dest, wp,0x1,1); // switch TFI : on
41 bitvec_write_field(dest, wp,tfi,5); // TFI
42 bitvec_write_field(dest, wp,0x0,1); // RLC acknowledged mode
43 if (alpha) {
44 bitvec_write_field(dest, wp,0x1,1); // ALPHA = present
45 bitvec_write_field(dest, wp,alpha,4); // ALPHA
46 } else {
47 bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present
48 }
49 bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter
50 bitvec_write_field(dest, wp,polling,1); // Polling Bit
51 bitvec_write_field(dest, wp,!polling,1); // TA_VALID ???
52 if (ta_idx < 0) {
53 bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off
54 } else {
55 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on
56 bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX
57 }
58 if (polling) {
59 bitvec_write_field(dest, wp,0x1,1); // TBF Starting TIME present
60 bitvec_write_field(dest, wp,(fn / (26 * 51)) % 32,5); // T1'
61 bitvec_write_field(dest, wp,fn % 51,6); // T3
62 bitvec_write_field(dest, wp,fn % 26,5); // T2
63 } else {
64 bitvec_write_field(dest, wp,0x0,1); // TBF Starting TIME present
65 }
66 bitvec_write_field(dest, wp,0x0,1); // P0 not present
67 // bitvec_write_field(dest, wp,0x1,1); // P0 not present
68 // bitvec_write_field(dest, wp,0xb,4);
69}
70
71static void write_ia_rest_uplink(
72 struct gprs_rlcmac_bts *bts, bitvec * dest, unsigned& wp,
73 uint8_t tfi, uint8_t usf, uint32_t fn, uint8_t single_block,
74 uint8_t alpha, uint8_t gamma, int8_t ta_idx)
75{
76 // GMS 04.08 10.5.2.37b 10.5.2.16
77 bitvec_write_field_lh(dest, wp, 3, 2); // "HH"
78 bitvec_write_field(dest, wp, 0, 2); // "0" Packet Uplink Assignment
79 if (single_block) {
80 bitvec_write_field(dest, wp, 0, 1); // Block Allocation : Single Block Allocation
81 if (alpha) {
82 bitvec_write_field(dest, wp,0x1,1); // ALPHA = present
83 bitvec_write_field(dest, wp,alpha,4); // ALPHA = present
84 } else
85 bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present
86 bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter
87 if (ta_idx < 0) {
88 bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off
89 } else {
90 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on
91 bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX
92 }
93 bitvec_write_field(dest, wp, 1, 1); // TBF_STARTING_TIME_FLAG
94 bitvec_write_field(dest, wp,(fn / (26 * 51)) % 32,5); // T1'
95 bitvec_write_field(dest, wp,fn % 51,6); // T3
96 bitvec_write_field(dest, wp,fn % 26,5); // T2
97 } else {
98 bitvec_write_field(dest, wp, 1, 1); // Block Allocation : Not Single Block Allocation
99 bitvec_write_field(dest, wp, tfi, 5); // TFI_ASSIGNMENT Temporary Flow Identity
100 bitvec_write_field(dest, wp, 0, 1); // POLLING
101 bitvec_write_field(dest, wp, 0, 1); // ALLOCATION_TYPE: dynamic
102 bitvec_write_field(dest, wp, usf, 3); // USF
103 bitvec_write_field(dest, wp, 0, 1); // USF_GRANULARITY
104 bitvec_write_field(dest, wp, 0, 1); // "0" power control: Not Present
105 bitvec_write_field(dest, wp, bts->initial_cs_ul-1, 2); // CHANNEL_CODING_COMMAND
106 bitvec_write_field(dest, wp, 1, 1); // TLLI_BLOCK_CHANNEL_CODING
107 if (alpha) {
108 bitvec_write_field(dest, wp,0x1,1); // ALPHA = present
109 bitvec_write_field(dest, wp,alpha,4); // ALPHA
110 } else
111 bitvec_write_field(dest, wp,0x0,1); // ALPHA = not present
112 bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter
113 /* note: there is no choise for TAI and no starting time */
114 bitvec_write_field(dest, wp, 0, 1); // switch TIMING_ADVANCE_INDEX = off
115 bitvec_write_field(dest, wp, 0, 1); // TBF_STARTING_TIME_FLAG
116 }
117}
118
119/*
120 * Immediate assignment, sent on the CCCH/AGCH
121 * see GSM 04.08, 9.1.18 and GSM 44.018, 9.1.18 + 10.5.2.16
122 */
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +0200123int Encoding::write_immediate_assignment(
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200124 struct gprs_rlcmac_bts *bts,
125 bitvec * dest, uint8_t downlink, uint8_t ra,
126 uint32_t ref_fn, uint8_t ta, uint16_t arfcn, uint8_t ts, uint8_t tsc,
127 uint8_t tfi, uint8_t usf, uint32_t tlli,
128 uint8_t polling, uint32_t fn, uint8_t single_block, uint8_t alpha,
129 uint8_t gamma, int8_t ta_idx)
130{
131 unsigned wp = 0;
132 uint8_t plen;
133
134 bitvec_write_field(dest, wp,0x0,4); // Skip Indicator
135 bitvec_write_field(dest, wp,0x6,4); // Protocol Discriminator
136 bitvec_write_field(dest, wp,0x3F,8); // Immediate Assignment Message Type
137
138 // 10.5.2.25b Dedicated mode or TBF
139 bitvec_write_field(dest, wp,0x0,1); // spare
140 bitvec_write_field(dest, wp,0x0,1); // TMA : Two-message assignment: No meaning
141 bitvec_write_field(dest, wp,downlink,1); // Downlink : Downlink assignment to mobile in packet idle mode
142 bitvec_write_field(dest, wp,0x1,1); // T/D : TBF or dedicated mode: this message assigns a Temporary Block Flow (TBF).
143
144 bitvec_write_field(dest, wp,0x0,4); // Page Mode
145
146 // GSM 04.08 10.5.2.25a Packet Channel Description
147 bitvec_write_field(dest, wp,0x1,5); // Channel type
148 bitvec_write_field(dest, wp,ts,3); // TN
149 bitvec_write_field(dest, wp,tsc,3); // TSC
150 bitvec_write_field(dest, wp,0x0,3); // non-hopping RF channel configuraion
151 bitvec_write_field(dest, wp,arfcn,10); // ARFCN
152
153 //10.5.2.30 Request Reference
154 bitvec_write_field(dest, wp,ra,8); // RA
155 bitvec_write_field(dest, wp,(ref_fn / (26 * 51)) % 32,5); // T1'
156 bitvec_write_field(dest, wp,ref_fn % 51,6); // T3
157 bitvec_write_field(dest, wp,ref_fn % 26,5); // T2
158
159 // 10.5.2.40 Timing Advance
160 bitvec_write_field(dest, wp,0x0,2); // spare
161 bitvec_write_field(dest, wp,ta,6); // Timing Advance value
162
163 // No mobile allocation in non-hopping systems.
164 // A zero-length LV. Just write L=0.
165 bitvec_write_field(dest, wp,0,8);
166
167 if ((wp % 8)) {
168 LOGP(DRLCMACUL, LOGL_ERROR, "Length of IMM.ASS without rest "
169 "octets is not multiple of 8 bits, PLEASE FIX!\n");
170 exit (0);
171 }
172 plen = wp / 8;
173
174 if (downlink)
Jacob Erlbeck18831c32016-02-01 15:23:35 +0100175 write_ia_rest_downlink(dest, wp,
176 tfi, tlli, polling, fn,
177 alpha, gamma, ta_idx);
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200178 else
Jacob Erlbeck18831c32016-02-01 15:23:35 +0100179 write_ia_rest_uplink(bts, dest, wp,
180 tfi, usf, fn, single_block,
181 alpha, gamma, ta_idx);
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200182
183 return plen;
184}
185
186/* generate uplink assignment */
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +0200187void Encoding::write_packet_uplink_assignment(
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200188 struct gprs_rlcmac_bts *bts,
189 bitvec * dest, uint8_t old_tfi,
190 uint8_t old_downlink, uint32_t tlli, uint8_t use_tlli,
Jacob Erlbeckf2694b72016-01-26 21:46:26 +0100191 struct gprs_rlcmac_ul_tbf *tbf, uint8_t poll, uint8_t rrbp, uint8_t alpha,
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200192 uint8_t gamma, int8_t ta_idx, int8_t use_egprs)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200193{
194 // TODO We should use our implementation of encode RLC/MAC Control messages.
195 unsigned wp = 0;
196 uint8_t ts;
197
198 bitvec_write_field(dest, wp,0x1,2); // Payload Type
199 bitvec_write_field(dest, wp,0x0,2); // Uplink block with TDMA framenumber (N+13)
200 bitvec_write_field(dest, wp,poll,1); // Suppl/Polling Bit
201 bitvec_write_field(dest, wp,0x0,3); // Uplink state flag
202 bitvec_write_field(dest, wp,0xa,6); // MESSAGE TYPE
203
204 bitvec_write_field(dest, wp,0x0,2); // Page Mode
205
206 bitvec_write_field(dest, wp,0x0,1); // switch PERSIST_LEVEL: off
207 if (use_tlli) {
208 bitvec_write_field(dest, wp,0x2,2); // switch TLLI : on
209 bitvec_write_field(dest, wp,tlli,32); // TLLI
210 } else {
211 bitvec_write_field(dest, wp,0x0,1); // switch TFI : on
212 bitvec_write_field(dest, wp,old_downlink,1); // 0=UPLINK TFI, 1=DL TFI
213 bitvec_write_field(dest, wp,old_tfi,5); // TFI
214 }
215
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200216 if (!use_egprs) {
217 bitvec_write_field(dest, wp,0x0,1); // Message escape
Jacob Erlbeckcb728902016-01-05 15:33:03 +0100218 bitvec_write_field(dest, wp,tbf->current_cs().to_num()-1, 2); // CHANNEL_CODING_COMMAND
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200219 bitvec_write_field(dest, wp,0x1,1); // TLLI_BLOCK_CHANNEL_CODING
220 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_VALUE = on
221 bitvec_write_field(dest, wp,tbf->ta(),6); // TIMING_ADVANCE_VALUE
222 if (ta_idx < 0) {
223 bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off
224 } else {
225 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on
226 bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX
227 }
228
229 } else { /* EPGRS */
Jacob Erlbeck36df7742016-01-19 15:53:30 +0100230 unsigned int ws_enc = (tbf->m_window.ws() - 64) / 32;
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200231 bitvec_write_field(dest, wp,0x1,1); // Message escape
232 bitvec_write_field(dest, wp,0x0,2); // EGPRS message contents
233 bitvec_write_field(dest, wp,0x0,1); // No CONTENTION_RESOLUTION_TLLI
234 bitvec_write_field(dest, wp,0x0,1); // No COMPACT reduced MA
Jacob Erlbeckcb728902016-01-05 15:33:03 +0100235 bitvec_write_field(dest, wp,tbf->current_cs().to_num()-1, 4); // EGPRS Modulation and Coding IE
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200236 bitvec_write_field(dest, wp,0x0,1); // No RESEGMENT
Jacob Erlbeck36df7742016-01-19 15:53:30 +0100237 bitvec_write_field(dest, wp,ws_enc,5); // EGPRS Window Size
Jacob Erlbeck76d767c2015-09-28 18:54:32 +0200238 bitvec_write_field(dest, wp,0x0,1); // No Access Technologies Request
239 bitvec_write_field(dest, wp,0x0,1); // No ARAC RETRANSMISSION REQUEST
240 bitvec_write_field(dest, wp,0x1,1); // TLLI_BLOCK_CHANNEL_CODING
241 bitvec_write_field(dest, wp,0x0,1); // No BEP_PERIOD2
242
243 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_VALUE = on
244 bitvec_write_field(dest, wp,tbf->ta(),6); // TIMING_ADVANCE_VALUE
245 if (ta_idx < 0) {
246 bitvec_write_field(dest, wp,0x0,1); // switch TIMING_ADVANCE_INDEX = off
247 } else {
248 bitvec_write_field(dest, wp,0x1,1); // switch TIMING_ADVANCE_INDEX = on
249 bitvec_write_field(dest, wp,ta_idx,4); // TIMING_ADVANCE_INDEX
250 }
251
252 bitvec_write_field(dest, wp,0x0,1); // No Packet Extended Timing Advance
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200253 }
254
255#if 1
256 bitvec_write_field(dest, wp,0x1,1); // Frequency Parameters information elements = present
Holger Hans Peter Freyther8f399de2013-12-25 20:22:35 +0100257 bitvec_write_field(dest, wp,tbf->tsc(),3); // Training Sequence Code (TSC)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200258 bitvec_write_field(dest, wp,0x0,2); // ARFCN = present
Holger Hans Peter Freytherfc498c92013-10-27 13:38:54 +0100259 bitvec_write_field(dest, wp,tbf->trx->arfcn,10); // ARFCN
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200260#else
261 bitvec_write_field(dest, wp,0x0,1); // Frequency Parameters = off
262#endif
263
264 bitvec_write_field(dest, wp,0x1,2); // Dynamic Allocation
Jacob Erlbeckedfd7e32015-11-17 16:30:58 +0100265
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200266 bitvec_write_field(dest, wp,0x0,1); // Extended Dynamic Allocation = off
267 bitvec_write_field(dest, wp,0x0,1); // P0 = off
Jacob Erlbeckedfd7e32015-11-17 16:30:58 +0100268
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200269 bitvec_write_field(dest, wp,0x0,1); // USF_GRANULARITY
270 bitvec_write_field(dest, wp,0x1,1); // switch TFI : on
Holger Hans Peter Freyther34f6e5e2013-10-27 20:31:47 +0100271 bitvec_write_field(dest, wp,tbf->tfi(),5);// TFI
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200272
273 bitvec_write_field(dest, wp,0x0,1); //
274 bitvec_write_field(dest, wp,0x0,1); // TBF Starting Time = off
275 if (alpha || gamma) {
276 bitvec_write_field(dest, wp,0x1,1); // Timeslot Allocation with Power Control
277 bitvec_write_field(dest, wp,alpha,4); // ALPHA
278 } else
279 bitvec_write_field(dest, wp,0x0,1); // Timeslot Allocation
Jacob Erlbeckedfd7e32015-11-17 16:30:58 +0100280
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200281 for (ts = 0; ts < 8; ts++) {
282 if (tbf->pdch[ts]) {
283 bitvec_write_field(dest, wp,0x1,1); // USF_TN(i): on
Daniel Willmann7e994e32014-08-07 15:49:21 +0200284 bitvec_write_field(dest, wp,tbf->m_usf[ts],3); // USF_TN(i)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200285 if (alpha || gamma)
286 bitvec_write_field(dest, wp,gamma,5); // GAMMA power control parameter
287 } else
288 bitvec_write_field(dest, wp,0x0,1); // USF_TN(i): off
289 }
Jacob Erlbeckedfd7e32015-11-17 16:30:58 +0100290 // bitvec_write_field(dest, wp,0x0,1); // Measurement Mapping struct not present
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200291}
292
293
294/* generate downlink assignment */
Jacob Erlbeck166c9fc2016-01-07 16:04:29 +0100295void Encoding::write_packet_downlink_assignment(RlcMacDownlink_t * block,
Jacob Erlbeck6b356a52016-01-29 16:39:21 +0100296 bool old_tfi_is_valid, uint8_t old_tfi, uint8_t old_downlink,
297 struct gprs_rlcmac_tbf *tbf, uint8_t poll, uint8_t rrbp,
298 uint8_t alpha, uint8_t gamma, int8_t ta_idx,
Jacob Erlbeckf2694b72016-01-26 21:46:26 +0100299 uint8_t ta_ts, bool use_egprs)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200300{
301 // Packet downlink assignment TS 44.060 11.2.7
302
Jacob Erlbeck166c9fc2016-01-07 16:04:29 +0100303 PDA_AdditionsR99_t *pda_r99;
304
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200305 uint8_t tn;
Jacob Erlbeck36df7742016-01-19 15:53:30 +0100306 unsigned int ws_enc;
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200307
308 block->PAYLOAD_TYPE = 0x1; // RLC/MAC control block that does not include the optional octets of the RLC/MAC control header
Jacob Erlbeckf2694b72016-01-26 21:46:26 +0100309 block->RRBP = rrbp; // 0: N+13
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200310 block->SP = poll; // RRBP field is valid
311 block->USF = 0x0; // Uplink state flag
312
313 block->u.Packet_Downlink_Assignment.MESSAGE_TYPE = 0x2; // Packet Downlink Assignment
314 block->u.Packet_Downlink_Assignment.PAGE_MODE = 0x0; // Normal Paging
315
316 block->u.Packet_Downlink_Assignment.Exist_PERSISTENCE_LEVEL = 0x0; // PERSISTENCE_LEVEL: off
317
Jacob Erlbeck6b356a52016-01-29 16:39:21 +0100318 if (old_tfi_is_valid) {
319 block->u.Packet_Downlink_Assignment.ID.UnionType = 0x0; // TFI = on
320 block->u.Packet_Downlink_Assignment.ID.u.Global_TFI.UnionType = old_downlink; // 0=UPLINK TFI, 1=DL TFI
321 block->u.Packet_Downlink_Assignment.ID.u.Global_TFI.u.UPLINK_TFI = old_tfi; // TFI
322 } else {
323 block->u.Packet_Downlink_Assignment.ID.UnionType = 0x1; // TLLI
324 block->u.Packet_Downlink_Assignment.ID.u.TLLI = tbf->tlli();
325 }
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200326
327 block->u.Packet_Downlink_Assignment.MAC_MODE = 0x0; // Dynamic Allocation
328 block->u.Packet_Downlink_Assignment.RLC_MODE = 0x0; // RLC acknowledged mode
Daniel Willmann73191a42014-05-30 17:58:00 +0200329 block->u.Packet_Downlink_Assignment.CONTROL_ACK = tbf->was_releasing; // NW establishes no new DL TBF for the MS with running timer T3192
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200330 block->u.Packet_Downlink_Assignment.TIMESLOT_ALLOCATION = 0; // timeslot(s)
331 for (tn = 0; tn < 8; tn++) {
332 if (tbf->pdch[tn])
333 block->u.Packet_Downlink_Assignment.TIMESLOT_ALLOCATION |= 0x80 >> tn; // timeslot(s)
334 }
335
336 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_TIMING_ADVANCE_VALUE = 0x1; // TIMING_ADVANCE_VALUE = on
Jacob Erlbeck9200ce62015-05-22 17:48:04 +0200337 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_VALUE = tbf->ta(); // TIMING_ADVANCE_VALUE
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200338 if (ta_idx < 0) {
339 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_IndexAndtimeSlot = 0x0; // TIMING_ADVANCE_INDEX = off
340 } else {
341 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.Exist_IndexAndtimeSlot = 0x1; // TIMING_ADVANCE_INDEX = on
342 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_INDEX = ta_idx; // TIMING_ADVANCE_INDEX
343 block->u.Packet_Downlink_Assignment.Packet_Timing_Advance.TIMING_ADVANCE_TIMESLOT_NUMBER = ta_ts; // TIMING_ADVANCE_TS
344 }
345
346 block->u.Packet_Downlink_Assignment.Exist_P0_and_BTS_PWR_CTRL_MODE = 0x0; // POWER CONTROL = off
347
348 block->u.Packet_Downlink_Assignment.Exist_Frequency_Parameters = 0x1; // Frequency Parameters = on
Holger Hans Peter Freyther8f399de2013-12-25 20:22:35 +0100349 block->u.Packet_Downlink_Assignment.Frequency_Parameters.TSC = tbf->tsc(); // Training Sequence Code (TSC)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200350 block->u.Packet_Downlink_Assignment.Frequency_Parameters.UnionType = 0x0; // ARFCN = on
Holger Hans Peter Freytherfc498c92013-10-27 13:38:54 +0100351 block->u.Packet_Downlink_Assignment.Frequency_Parameters.u.ARFCN = tbf->trx->arfcn; // ARFCN
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200352
353 block->u.Packet_Downlink_Assignment.Exist_DOWNLINK_TFI_ASSIGNMENT = 0x1; // DOWNLINK TFI ASSIGNMENT = on
Holger Hans Peter Freyther34f6e5e2013-10-27 20:31:47 +0100354 block->u.Packet_Downlink_Assignment.DOWNLINK_TFI_ASSIGNMENT = tbf->tfi(); // TFI
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200355
356 block->u.Packet_Downlink_Assignment.Exist_Power_Control_Parameters = 0x1; // Power Control Parameters = on
357 block->u.Packet_Downlink_Assignment.Power_Control_Parameters.ALPHA = alpha; // ALPHA
358
359 for (tn = 0; tn < 8; tn++)
360 {
361 if (tbf->pdch[tn])
362 {
363 block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].Exist = 0x1; // Slot[i] = on
364 block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].GAMMA_TN = gamma; // GAMMA_TN
365 }
366 else
367 {
368 block->u.Packet_Downlink_Assignment.Power_Control_Parameters.Slot[tn].Exist = 0x0; // Slot[i] = off
369 }
370 }
371
372 block->u.Packet_Downlink_Assignment.Exist_TBF_Starting_Time = 0x0; // TBF Starting TIME = off
373 block->u.Packet_Downlink_Assignment.Exist_Measurement_Mapping = 0x0; // Measurement_Mapping = off
Jacob Erlbeck166c9fc2016-01-07 16:04:29 +0100374 if (!use_egprs) {
375 block->u.Packet_Downlink_Assignment.Exist_AdditionsR99 = 0x0; // AdditionsR99 = off
376 return;
377 }
Jacob Erlbeck36df7742016-01-19 15:53:30 +0100378
379 ws_enc = (tbf->window()->ws() - 64) / 32;
380
Jacob Erlbeck166c9fc2016-01-07 16:04:29 +0100381 block->u.Packet_Downlink_Assignment.Exist_AdditionsR99 = 0x1; // AdditionsR99 = on
382 pda_r99 = &block->u.Packet_Downlink_Assignment.AdditionsR99;
383 pda_r99->Exist_EGPRS_Params = 1;
Jacob Erlbeck36df7742016-01-19 15:53:30 +0100384 pda_r99->EGPRS_WindowSize = ws_enc; /* see TS 44.060, table 12.5.2.1 */
Jacob Erlbeck166c9fc2016-01-07 16:04:29 +0100385 pda_r99->LINK_QUALITY_MEASUREMENT_MODE = 0x0; /* no meas, see TS 44.060, table 11.2.7.2 */
386 pda_r99->Exist_BEP_PERIOD2 = 0; /* No extra EGPRS BEP PERIOD */
387 pda_r99->Exist_Packet_Extended_Timing_Advance = 0;
388 pda_r99->Exist_COMPACT_ReducedMA = 0;
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200389}
390
391/* generate paging request */
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +0200392int Encoding::write_paging_request(bitvec * dest, uint8_t *ptmsi, uint16_t ptmsi_len)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200393{
394 unsigned wp = 0;
395 int plen;
396
397 bitvec_write_field(dest, wp,0x0,4); // Skip Indicator
398 bitvec_write_field(dest, wp,0x6,4); // Protocol Discriminator
399 bitvec_write_field(dest, wp,0x21,8); // Paging Request Message Type
400
401 bitvec_write_field(dest, wp,0x0,4); // Page Mode
402 bitvec_write_field(dest, wp,0x0,4); // Channel Needed
403
404 // Mobile Identity
405 bitvec_write_field(dest, wp,ptmsi_len+1,8); // Mobile Identity length
406 bitvec_write_field(dest, wp,0xf,4); // unused
407 bitvec_write_field(dest, wp,0x4,4); // PTMSI type
408 for (int i = 0; i < ptmsi_len; i++)
409 {
410 bitvec_write_field(dest, wp,ptmsi[i],8); // PTMSI
411 }
412 if ((wp % 8)) {
413 LOGP(DRLCMACUL, LOGL_ERROR, "Length of PAG.REQ without rest "
414 "octets is not multiple of 8 bits, PLEASE FIX!\n");
415 exit (0);
416 }
417 plen = wp / 8;
418 bitvec_write_field(dest, wp,0x0,1); // "L" NLN(PCH) = off
419 bitvec_write_field(dest, wp,0x0,1); // "L" Priority1 = off
420 bitvec_write_field(dest, wp,0x1,1); // "L" Priority2 = off
421 bitvec_write_field(dest, wp,0x0,1); // "L" Group Call information = off
422 bitvec_write_field(dest, wp,0x0,1); // "H" Packet Page Indication 1 = packet paging procedure
423 bitvec_write_field(dest, wp,0x1,1); // "H" Packet Page Indication 2 = packet paging procedure
424
425 return plen;
426}
427
Daniel Willmann5241c1a2013-12-11 14:35:29 +0100428/**
429 * The index of the array show_rbb is the bit position inside the rbb
430 * (show_rbb[63] relates to BSN ssn-1)
431 */
432void Encoding::encode_rbb(const char *show_rbb, uint8_t *rbb)
433{
434 uint8_t rbb_byte = 0;
435
436 // RECEIVE_BLOCK_BITMAP
437 for (int i = 0; i < 64; i++) {
438 /* Set bit at the appropriate position (see 3GPP TS 04.60 9.1.8.1) */
439 if (show_rbb[i] == 'R')
440 rbb_byte |= 1<< (7-(i%8));
441
442 if((i%8) == 7) {
443 rbb[i/8] = rbb_byte;
444 rbb_byte = 0;
445 }
446 }
447}
448
Jacob Erlbeck37005a12015-12-22 14:58:34 +0100449static void write_packet_ack_nack_desc_gprs(
450 struct gprs_rlcmac_bts *bts, bitvec * dest, unsigned& wp,
451 gprs_rlc_ul_window *window, bool is_final)
452{
453 char rbb[65];
454
455 window->update_rbb(rbb);
456
457 rbb[64] = 0;
458 LOGP(DRLCMACUL, LOGL_DEBUG, "- V(N): \"%s\" R=Received "
459 "I=Invalid\n", rbb);
460
461 bitvec_write_field(dest, wp, is_final, 1); // FINAL_ACK_INDICATION
462 bitvec_write_field(dest, wp, window->ssn(), 7); // STARTING_SEQUENCE_NUMBER
463
464 for (int i = 0; i < 64; i++) {
465 /* Set bit at the appropriate position (see 3GPP TS 04.60 9.1.8.1) */
466 bool is_ack = (rbb[i] == 'R');
467 bitvec_write_field(dest, wp, is_ack, 1);
468 }
469}
470
471static void write_packet_uplink_ack_gprs(
472 struct gprs_rlcmac_bts *bts, bitvec * dest, unsigned& wp,
473 struct gprs_rlcmac_ul_tbf *tbf, bool is_final)
474{
475
Jacob Erlbeckcb728902016-01-05 15:33:03 +0100476 bitvec_write_field(dest, wp, tbf->current_cs().to_num() - 1, 2); // CHANNEL_CODING_COMMAND
Jacob Erlbeck37005a12015-12-22 14:58:34 +0100477 write_packet_ack_nack_desc_gprs(bts, dest, wp, &tbf->m_window, is_final);
478
479 bitvec_write_field(dest, wp, 1, 1); // 1: have CONTENTION_RESOLUTION_TLLI
480 bitvec_write_field(dest, wp, tbf->tlli(), 32); // CONTENTION_RESOLUTION_TLLI
481
482 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Packet Timing Advance
483 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Power Control Parameters
484 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Extension Bits
485 bitvec_write_field(dest, wp, 0, 1); // fixed 0
486 bitvec_write_field(dest, wp, 1, 1); // 1: have Additions R99
487 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Packet Extended Timing Advance
488 bitvec_write_field(dest, wp, 1, 1); // TBF_EST (enabled)
489 bitvec_write_field(dest, wp, 0, 1); // 0: don't have REL 5
490};
491
492static void write_packet_ack_nack_desc_egprs(
493 struct gprs_rlcmac_bts *bts, bitvec * dest, unsigned& wp,
494 gprs_rlc_ul_window *window, bool is_final)
495{
496 int urbb_len = 0;
497 int crbb_len = 0;
498 int len;
499 bool bow = true;
500 bool eow = true;
501 int ssn = window->mod_sns(window->v_q() + 1);
502 int num_blocks = window->mod_sns(window->v_r() - window->v_q());
503 int esn_crbb = window->mod_sns(ssn - 1);
504 int rest_bits = dest->data_len * 8 - wp;
505
506 if (num_blocks > 0)
507 /* V(Q) is NACK and omitted -> SSN = V(Q) + 1 */
508 num_blocks -= 1;
509
510 if (num_blocks > window->ws())
511 num_blocks = window->ws();
512
513 if (num_blocks > rest_bits) {
514 eow = false;
515 urbb_len = rest_bits;
516 /* TODO: use compression, start encoding bits and stop when the
517 * space is exhausted. Use the first combination that encodes
518 * all bits. If there is none, use the combination that encodes
519 * the largest number of bits (e.g. by setting num_blocks to the
520 * max and repeating the construction).
521 */
522 } else if (num_blocks > rest_bits - 9) {
523 /* union bit and length field take 9 bits */
524 eow = false;
525 urbb_len = rest_bits - 9;
526 /* TODO: use compression (see above) */
527 }
528
529 if (urbb_len + crbb_len == rest_bits)
530 len = -1;
531 else if (crbb_len == 0)
532 len = urbb_len + 15;
533 else
534 len = urbb_len + crbb_len + 23;
535
536 /* EGPRS Ack/Nack Description IE */
537 if (len < 0) {
538 bitvec_write_field(dest, wp, 0, 1); // 0: don't have length
539 } else {
540 bitvec_write_field(dest, wp, 1, 1); // 1: have length
541 bitvec_write_field(dest, wp, len, 8); // length
542 }
543
544 bitvec_write_field(dest, wp, is_final, 1); // FINAL_ACK_INDICATION
545 bitvec_write_field(dest, wp, bow, 1); // BEGINNING_OF_WINDOW
546 bitvec_write_field(dest, wp, eow, 1); // END_OF_WINDOW
547 bitvec_write_field(dest, wp, ssn, 11); // STARTING_SEQUENCE_NUMBER
548 bitvec_write_field(dest, wp, 0, 1); // 0: don't have CRBB
549
550 /* TODO: Add CRBB support */
551
552 LOGP(DRLCMACUL, LOGL_DEBUG,
553 " - EGPRS URBB, len = %d, SSN = %d, ESN_CRBB = %d, "
554 "SNS = %d, WS = %d, V(Q) = %d, V(R) = %d%s%s\n",
555 urbb_len, ssn, esn_crbb,
556 window->sns(), window->ws(), window->v_q(), window->v_r(),
557 bow ? ", BOW" : "", eow ? ", EOW" : "");
558 for (int i = urbb_len; i > 0; i--) {
559 /* Set bit at the appropriate position (see 3GPP TS 04.60 12.3.1) */
560 bool is_ack = window->m_v_n.is_received(esn_crbb + i);
561 bitvec_write_field(dest, wp, is_ack, 1);
562 }
563}
564
565static void write_packet_uplink_ack_egprs(
566 struct gprs_rlcmac_bts *bts, bitvec * dest, unsigned& wp,
567 struct gprs_rlcmac_ul_tbf *tbf, bool is_final)
568{
569 bitvec_write_field(dest, wp, 0, 2); // fixed 00
570 bitvec_write_field(dest, wp, 2, 4); // CHANNEL_CODING_COMMAND: MCS-3
571 // bitvec_write_field(dest, wp, tbf->current_cs() - 1, 4); // CHANNEL_CODING_COMMAND
572 bitvec_write_field(dest, wp, 0, 1); // 0: no RESEGMENT (nyi)
573 bitvec_write_field(dest, wp, 1, 1); // PRE_EMPTIVE_TRANSMISSION, TODO: This resembles GPRS, change it?
574 bitvec_write_field(dest, wp, 0, 1); // 0: no PRR_RETRANSMISSION_REQUEST, TODO: clarify
575 bitvec_write_field(dest, wp, 0, 1); // 0: no ARAC_RETRANSMISSION_REQUEST, TODO: clarify
576 bitvec_write_field(dest, wp, 1, 1); // 1: have CONTENTION_RESOLUTION_TLLI
577 bitvec_write_field(dest, wp, tbf->tlli(), 32); // CONTENTION_RESOLUTION_TLLI
578 bitvec_write_field(dest, wp, 1, 1); // TBF_EST (enabled)
579 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Packet Timing Advance
580 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Packet Extended Timing Advance
581 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Power Control Parameters
582 bitvec_write_field(dest, wp, 0, 1); // 0: don't have Extension Bits
583
584 write_packet_ack_nack_desc_egprs(bts, dest, wp, &tbf->m_window, is_final);
585
586 bitvec_write_field(dest, wp, 0, 1); // fixed 0
587 bitvec_write_field(dest, wp, 0, 1); // 0: don't have REL 5
588};
589
590void Encoding::write_packet_uplink_ack(
591 struct gprs_rlcmac_bts *bts, bitvec * dest,
Jacob Erlbeckf2694b72016-01-26 21:46:26 +0100592 struct gprs_rlcmac_ul_tbf *tbf, bool is_final,
593 uint8_t rrbp)
Jacob Erlbeck37005a12015-12-22 14:58:34 +0100594{
595 unsigned wp = 0;
596
597 LOGP(DRLCMACUL, LOGL_DEBUG, "Encoding Ack/Nack for %s "
598 "(final=%d)\n", tbf_name(tbf), is_final);
599
600 bitvec_write_field(dest, wp, 0x1, 2); // Payload Type
Jacob Erlbeckf2694b72016-01-26 21:46:26 +0100601 bitvec_write_field(dest, wp, rrbp, 2); // Uplink block with TDMA framenumber
Jacob Erlbeck37005a12015-12-22 14:58:34 +0100602 bitvec_write_field(dest, wp, is_final, 1); // Suppl/Polling Bit
603 bitvec_write_field(dest, wp, 0x0, 3); // Uplink state flag
604 bitvec_write_field(dest, wp, 0x9, 6); // MESSAGE TYPE Uplink Ack/Nack
605 bitvec_write_field(dest, wp, 0x0, 2); // Page Mode
606
607 bitvec_write_field(dest, wp, 0x0, 2); // fixed 00
608 bitvec_write_field(dest, wp, tbf->tfi(), 5); // Uplink TFI
609
610 if (tbf->is_egprs_enabled()) {
611 /* PU_AckNack_EGPRS = on */
612 bitvec_write_field(dest, wp, 1, 1); // 1: EGPRS
613 write_packet_uplink_ack_egprs(bts, dest, wp, tbf, is_final);
614 } else {
615 /* PU_AckNack_GPRS = on */
616 bitvec_write_field(dest, wp, 0, 1); // 0: GPRS
617 write_packet_uplink_ack_gprs(bts, dest, wp, tbf, is_final);
618 }
619
620 LOGP(DRLCMACUL, LOGL_DEBUG,
621 "Uplink Ack/Nack bit count %d, max %d, message = %s\n",
622 wp, dest->data_len * 8,
623 osmo_hexdump(dest->data, dest->data_len));
624}
625
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +0200626unsigned Encoding::write_packet_paging_request(bitvec * dest)
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200627{
628 unsigned wp = 0;
629
630 bitvec_write_field(dest, wp,0x1,2); // Payload Type
631 bitvec_write_field(dest, wp,0x0,3); // No polling
632 bitvec_write_field(dest, wp,0x0,3); // Uplink state flag
633 bitvec_write_field(dest, wp,0x22,6); // MESSAGE TYPE
634
635 bitvec_write_field(dest, wp,0x0,2); // Page Mode
636
637 bitvec_write_field(dest, wp,0x0,1); // No PERSISTENCE_LEVEL
638 bitvec_write_field(dest, wp,0x0,1); // No NLN
639
640 return wp;
641}
642
Holger Hans Peter Freyther63f29d62013-10-19 19:04:03 +0200643unsigned Encoding::write_repeated_page_info(bitvec * dest, unsigned& wp, uint8_t len,
Holger Hans Peter Freyther6ca0a902013-10-19 18:50:22 +0200644 uint8_t *identity, uint8_t chan_needed)
645{
646 bitvec_write_field(dest, wp,0x1,1); // Repeated Page info exists
647
648 bitvec_write_field(dest, wp,0x1,1); // RR connection paging
649
650 if ((identity[0] & 0x07) == 4) {
651 bitvec_write_field(dest, wp,0x0,1); // TMSI
652 identity++;
653 len--;
654 } else {
655 bitvec_write_field(dest, wp,0x0,1); // MI
656 bitvec_write_field(dest, wp,len,4); // MI len
657 }
658 while (len) {
659 bitvec_write_field(dest, wp,*identity++,8); // MI data
660 len--;
661 }
662 bitvec_write_field(dest, wp,chan_needed,2); // CHANNEL_NEEDED
663 bitvec_write_field(dest, wp,0x0,1); // No eMLPP_PRIORITY
664
665 return wp;
666}
667
Jacob Erlbeckf0e40392016-01-08 10:07:53 +0100668int Encoding::rlc_write_dl_data_header(const struct gprs_rlc_data_info *rlc,
669 uint8_t *data)
670{
671 struct gprs_rlc_dl_header_egprs_3 *egprs3;
672 struct rlc_dl_header *gprs;
673 unsigned int e_fbi_header;
674 GprsCodingScheme cs = rlc->cs;
675
676 switch(cs.headerTypeData()) {
677 case GprsCodingScheme::HEADER_GPRS_DATA:
678 gprs = static_cast<struct rlc_dl_header *>
679 ((void *)data);
680
681 gprs->usf = rlc->usf;
682 gprs->s_p = rlc->es_p != 0 ? 1 : 0;
683 gprs->rrbp = rlc->rrbp;
684 gprs->pt = 0;
685 gprs->tfi = rlc->tfi;
686 gprs->pr = rlc->pr;
687
688 gprs->fbi = rlc->block_info[0].cv == 0;
689 gprs->e = rlc->block_info[0].e;
690 gprs->bsn = rlc->block_info[0].bsn;
691 break;
692
693 case GprsCodingScheme::HEADER_EGPRS_DATA_TYPE_3:
694 egprs3 = static_cast<struct gprs_rlc_dl_header_egprs_3 *>
695 ((void *)data);
696
697 egprs3->usf = rlc->usf;
698 egprs3->es_p = rlc->es_p;
699 egprs3->rrbp = rlc->rrbp;
700 egprs3->tfi_a = rlc->tfi >> 0; /* 1 bit LSB */
701 egprs3->tfi_b = rlc->tfi >> 1; /* 4 bits */
702 egprs3->pr = rlc->pr;
703 egprs3->cps = rlc->cps;
704
705 egprs3->bsn1_a = rlc->block_info[0].bsn >> 0; /* 2 bits LSB */
706 egprs3->bsn1_b = rlc->block_info[0].bsn >> 2; /* 8 bits */
707 egprs3->bsn1_c = rlc->block_info[0].bsn >> 10; /* 1 bit */
708
709 egprs3->spb = rlc->block_info[0].spb;
710
711 e_fbi_header = rlc->block_info[0].e ? 0x01 : 0;
712 e_fbi_header |= rlc->block_info[0].cv == 0 ? 0x02 : 0; /* FBI */
713 e_fbi_header <<= 7;
714 data[3] = (data[3] & 0b01111111) | (e_fbi_header >> 0);
715 data[4] = (data[4] & 0b11111110) | (e_fbi_header >> 8);
716 break;
717
718 case GprsCodingScheme::HEADER_EGPRS_DATA_TYPE_1:
719 case GprsCodingScheme::HEADER_EGPRS_DATA_TYPE_2:
720 /* TODO: Support both header types */
721 /* fall through */
722 default:
723 LOGP(DRLCMACDL, LOGL_ERROR,
724 "Encoding of uplink %s data blocks not yet supported.\n",
725 cs.name());
726 return -ENOTSUP;
727 };
728
729 return 0;
730}
731
732/**
733 * \brief Copy LSB bitstream RLC data block from byte aligned buffer.
734 *
735 * Note that the bitstream is encoded in LSB first order, so the two octets
736 * 654321xx xxxxxx87 contain the octet 87654321 starting at bit position 3
737 * (LSB has bit position 1). This is a different order than the one used by
738 * CSN.1.
739 *
740 * \param data_block_idx The block index, 0..1 for header type 1, 0 otherwise
741 * \param src A pointer to the start of the RLC block (incl. the header)
742 * \param buffer A data area of a least the size of the RLC block
743 * \returns the number of bytes copied
744 */
745unsigned int Encoding::rlc_copy_from_aligned_buffer(
746 const struct gprs_rlc_data_info *rlc,
747 unsigned int data_block_idx,
748 uint8_t *dst, const uint8_t *buffer)
749{
750 unsigned int hdr_bytes;
751 unsigned int extra_bits;
752 unsigned int i;
753
754 uint8_t c, last_c;
755 const uint8_t *src;
756 const struct gprs_rlc_data_block_info *rdbi;
757
758 OSMO_ASSERT(data_block_idx < rlc->num_data_blocks);
759 rdbi = &rlc->block_info[data_block_idx];
760
761 hdr_bytes = rlc->data_offs_bits[data_block_idx] / 8;
762 extra_bits = (rlc->data_offs_bits[data_block_idx] % 8);
763
764 if (extra_bits == 0) {
765 /* It is aligned already */
766 memmove(dst + hdr_bytes, buffer, rdbi->data_len);
767 return rdbi->data_len;
768 }
769
770 src = buffer;
771 dst = dst + hdr_bytes;
772 last_c = *dst << (8 - extra_bits);
773
774 for (i = 0; i < rdbi->data_len; i++) {
775 c = src[i];
776 *(dst++) = (last_c >> (8 - extra_bits)) | (c << extra_bits);
777 last_c = c;
778 }
779
780 /* overwrite the lower extra_bits */
781 *dst = (*dst & (0xff << extra_bits)) | (last_c >> (8 - extra_bits));
782
783 return rdbi->data_len;
784}
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100785
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100786static Encoding::AppendResult rlc_data_to_dl_append_gprs(
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100787 struct gprs_rlc_data_block_info *rdbi,
788 gprs_llc *llc, int *offset, int *num_chunks,
789 uint8_t *data_block,
790 bool is_final)
791{
792 int chunk;
793 int space;
794 struct rlc_li_field *li;
795 uint8_t *delimiter, *data, *e_pointer;
796
797 data = data_block + *offset;
798 delimiter = data_block + *num_chunks;
799 e_pointer = (*num_chunks ? delimiter - 1 : NULL);
800
801 chunk = llc->chunk_size();
802 space = rdbi->data_len - *offset;
803
804 /* if chunk will exceed block limit */
805 if (chunk > space) {
806 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
807 "larger than space (%d) left in block: copy "
808 "only remaining space, and we are done\n",
809 chunk, space);
810 /* block is filled, so there is no extension */
811 if (e_pointer)
812 *e_pointer |= 0x01;
813 /* fill only space */
814 llc->consume(data, space);
815 /* return data block as message */
816 *offset = rdbi->data_len;
817 (*num_chunks)++;
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100818 return Encoding::AR_NEED_MORE_BLOCKS;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100819 }
820 /* if FINAL chunk would fit precisely in space left */
821 if (chunk == space && is_final)
822 {
823 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
824 "would exactly fit into space (%d): because "
825 "this is a final block, we don't add length "
826 "header, and we are done\n", chunk, space);
827 /* block is filled, so there is no extension */
828 if (e_pointer)
829 *e_pointer |= 0x01;
830 /* fill space */
831 llc->consume(data, space);
832 *offset = rdbi->data_len;
833 (*num_chunks)++;
834 rdbi->cv = 0;
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100835 return Encoding::AR_COMPLETED_BLOCK_FILLED;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100836 }
837 /* if chunk would fit exactly in space left */
838 if (chunk == space) {
839 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
840 "would exactly fit into space (%d): add length "
841 "header with LI=0, to make frame extend to "
842 "next block, and we are done\n", chunk, space);
843 /* make space for delimiter */
844 if (delimiter != data)
845 memmove(delimiter + 1, delimiter,
846 data - delimiter);
847 data++;
848 (*offset)++;
849 space--;
850 /* add LI with 0 length */
851 li = (struct rlc_li_field *)delimiter;
852 li->e = 1; /* not more extension */
853 li->m = 0; /* shall be set to 0, in case of li = 0 */
854 li->li = 0; /* chunk fills the complete space */
855 rdbi->e = 0; /* 0: extensions present */
856 // no need to set e_pointer nor increase delimiter
857 /* fill only space, which is 1 octet less than chunk */
858 llc->consume(data, space);
859 /* return data block as message */
860 *offset = rdbi->data_len;
861 (*num_chunks)++;
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100862 return Encoding::AR_NEED_MORE_BLOCKS;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100863 }
864
865 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d is less "
866 "than remaining space (%d): add length header to "
867 "to delimit LLC frame\n", chunk, space);
868 /* the LLC frame chunk ends in this block */
869 /* make space for delimiter */
870 if (delimiter != data)
871 memmove(delimiter + 1, delimiter, data - delimiter);
872 data++;
873 (*offset)++;
874 space--;
875 /* add LI to delimit frame */
876 li = (struct rlc_li_field *)delimiter;
877 li->e = 0; /* Extension bit, maybe set later */
878 li->m = 0; /* will be set later, if there is more LLC data */
879 li->li = chunk; /* length of chunk */
880 rdbi->e = 0; /* 0: extensions present */
881 (*num_chunks)++;
882 /* copy (rest of) LLC frame to space and reset later */
883 llc->consume(data, chunk);
884 data += chunk;
885 space -= chunk;
886 (*offset) += chunk;
887 /* if we have more data and we have space left */
888 if (space > 0 && !is_final) {
889 li->m = 1; /* we indicate more frames to follow */
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100890 return Encoding::AR_COMPLETED_SPACE_LEFT;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100891 }
892 /* if we don't have more LLC frames */
893 if (is_final) {
894 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Final block, so we "
895 "done.\n");
896 li->e = 1; /* we cannot extend */
897 rdbi->cv = 0;
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100898 return Encoding::AR_COMPLETED_BLOCK_FILLED;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +0100899 }
900 /* we have no space left */
901 LOGP(DRLCMACDL, LOGL_DEBUG, "-- No space left, so we are "
902 "done.\n");
903 li->e = 1; /* we cannot extend */
Jacob Erlbeck5058bd62016-01-13 10:51:25 +0100904 return Encoding::AR_COMPLETED_BLOCK_FILLED;
905}
906
Jacob Erlbecka88d0652016-01-13 11:28:10 +0100907static Encoding::AppendResult rlc_data_to_dl_append_egprs(
908 struct gprs_rlc_data_block_info *rdbi,
909 gprs_llc *llc, int *offset, int *num_chunks,
910 uint8_t *data_block,
911 bool is_final)
912{
913 int chunk;
914 int space;
915 struct rlc_li_field_egprs *li;
916 struct rlc_li_field_egprs *prev_li;
917 uint8_t *delimiter, *data;
918
919 data = data_block + *offset;
920 delimiter = data_block + *num_chunks;
921 prev_li = (struct rlc_li_field_egprs *)
922 (*num_chunks ? delimiter - 1 : NULL);
923
924 chunk = llc->chunk_size();
925 space = rdbi->data_len - *offset;
926
927 /* if chunk will exceed block limit */
928 if (chunk > space) {
929 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
930 "larger than space (%d) left in block: copy "
931 "only remaining space, and we are done\n",
932 chunk, space);
933 /* fill only space */
934 llc->consume(data, space);
935 /* return data block as message */
936 *offset = rdbi->data_len;
937 (*num_chunks)++;
938 return Encoding::AR_NEED_MORE_BLOCKS;
939 }
940 /* if FINAL chunk would fit precisely in space left */
941 if (chunk == space && is_final)
942 {
943 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
944 "would exactly fit into space (%d): because "
945 "this is a final block, we don't add length "
946 "header, and we are done\n", chunk, space);
947 /* fill space */
948 llc->consume(data, space);
949 *offset = rdbi->data_len;
950 (*num_chunks)++;
951 rdbi->cv = 0;
952 return Encoding::AR_COMPLETED_BLOCK_FILLED;
953 }
954 /* if chunk would fit exactly in space left */
955 if (chunk == space) {
956 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d "
957 "would exactly fit into space (%d): just copy "
958 "it, and we are done. The next block will have "
959 "to start with an empty chunk\n",
960 chunk, space);
961 /* fill space */
962 llc->consume(data, space);
963 *offset = rdbi->data_len;
964 (*num_chunks)++;
965 return Encoding::AR_NEED_MORE_BLOCKS;
966 }
967
968 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Chunk with length %d is less "
969 "than remaining space (%d): add length header to "
970 "to delimit LLC frame\n", chunk, space);
971 /* the LLC frame chunk ends in this block */
972 /* make space for delimiter */
973
974 if (delimiter != data)
975 memmove(delimiter + 1, delimiter, data - delimiter);
976
977 data += 1;
978 (*offset) += 1;
979 space -= 1;
980 /* add LI to delimit frame */
981 li = (struct rlc_li_field_egprs *)delimiter;
982 li->e = 1; /* Extension bit, maybe set later */
983 li->li = chunk; /* length of chunk */
984 /* tell previous extension header about the new one */
985 if (prev_li)
986 prev_li->e = 0;
987 rdbi->e = 0; /* 0: extensions present */
988 delimiter++;
989 prev_li = li;
990 (*num_chunks)++;
991 /* copy (rest of) LLC frame to space and reset later */
992 llc->consume(data, chunk);
993 data += chunk;
994 space -= chunk;
995 (*offset) += chunk;
996 /* if we have more data and we have space left */
997 if (space > 0) {
998 if (!is_final)
999 return Encoding::AR_COMPLETED_SPACE_LEFT;
1000
1001 /* we don't have more LLC frames */
1002 /* We will have to add another chunk with filling octets */
1003 LOGP(DRLCMACDL, LOGL_DEBUG,
1004 "-- There is remaining space (%d): add filling byte chunk\n",
1005 space);
1006
1007 if (delimiter != data)
1008 memmove(delimiter + 1, delimiter, data - delimiter);
1009
1010 data += 1;
1011 (*offset) += 1;
1012 space -= 1;
1013
1014 /* set filling bytes extension */
1015 li = (struct rlc_li_field_egprs *)delimiter;
1016 li->e = 1;
1017 li->li = 127;
1018
1019 /* tell previous extension header about the new one */
1020 if (prev_li)
1021 prev_li->e = 0;
1022
1023 delimiter++;
1024 (*num_chunks)++;
1025
1026 rdbi->cv = 0;
1027
1028 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Final block, so we "
1029 "are done.\n");
1030
1031 *offset = rdbi->data_len;
1032 return Encoding::AR_COMPLETED_BLOCK_FILLED;
1033 }
1034
1035 if (is_final) {
1036 /* we don't have more LLC frames */
1037 LOGP(DRLCMACDL, LOGL_DEBUG, "-- Final block, so we "
1038 "are done.\n");
1039 rdbi->cv = 0;
1040 return Encoding::AR_COMPLETED_BLOCK_FILLED;
1041 }
1042
1043 /* we have no space left */
1044 LOGP(DRLCMACDL, LOGL_DEBUG, "-- No space left, so we are "
1045 "done.\n");
1046 return Encoding::AR_COMPLETED_BLOCK_FILLED;
1047}
1048
Jacob Erlbeck5058bd62016-01-13 10:51:25 +01001049Encoding::AppendResult Encoding::rlc_data_to_dl_append(
1050 struct gprs_rlc_data_block_info *rdbi, GprsCodingScheme cs,
1051 gprs_llc *llc, int *offset, int *num_chunks,
1052 uint8_t *data_block,
1053 bool is_final)
1054{
1055 if (cs.isGprs())
1056 return rlc_data_to_dl_append_gprs(rdbi,
1057 llc, offset, num_chunks, data_block, is_final);
1058
Jacob Erlbecka88d0652016-01-13 11:28:10 +01001059 if (cs.isEgprs())
1060 return rlc_data_to_dl_append_egprs(rdbi,
1061 llc, offset, num_chunks, data_block, is_final);
1062
Jacob Erlbeck5058bd62016-01-13 10:51:25 +01001063 LOGP(DRLCMACDL, LOGL_ERROR, "%s data block encoding not implemented\n",
1064 cs.name());
1065
1066 return AR_NEED_MORE_BLOCKS;
Jacob Erlbeck14bb0942016-01-12 11:58:13 +01001067}