blob: 89d7ab8c1b0cf912ba2b1190840607fd70847724 [file] [log] [blame]
Andreas Eversberg0aed6542012-06-23 10:33:16 +02001/* sysmo_l1_if.cpp
2 *
3 * Copyright (C) 2012 Andreas Eversberg <jolly@eversberg.eu>
4 *
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License
7 * as published by the Free Software Foundation; either version 2
8 * of the License, or (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program; if not, write to the Free Software
17 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18 */
19
20#include <stdio.h>
21#include <unistd.h>
22#include <stdlib.h>
23#include <string.h>
24#include <errno.h>
25#include <assert.h>
26#include <sys/socket.h>
27#include <sys/un.h>
28extern "C" {
29#include <osmocom/core/talloc.h>
30#include <osmocom/core/select.h>
31#include <osmocom/core/msgb.h>
32}
33
34#include <gprs_rlcmac.h>
35#include <pcu_l1_if.h>
36#include <gprs_debug.h>
Andreas Eversbergb3c6f6c2012-07-06 07:40:08 +020037#include <gprs_bssgp_pcu.h>
Andreas Eversberg0aed6542012-06-23 10:33:16 +020038#include "../../osmo-bts/include/osmo-bts/pcuif_proto.h"
39
40static int pcu_sock_send(struct msgb *msg);
41static void pcu_sock_timeout(void *_priv);
42
Andreas Eversberg0aed6542012-06-23 10:33:16 +020043// Variable for storage current FN.
44int frame_number;
45
46int get_current_fn()
47{
48 return frame_number;
49}
50
51void set_current_fn(int fn)
52{
53 frame_number = fn;
54}
55
56/*
57 * PCU messages
58 */
59
60struct msgb *pcu_msgb_alloc(uint8_t msg_type, uint8_t bts_nr)
61{
62 struct msgb *msg;
63 struct gsm_pcu_if *pcu_prim;
64
65 msg = msgb_alloc(sizeof(struct gsm_pcu_if), "pcu_sock_tx");
66 if (!msg)
67 return NULL;
68 msgb_put(msg, sizeof(struct gsm_pcu_if));
69 pcu_prim = (struct gsm_pcu_if *) msg->data;
70 pcu_prim->msg_type = msg_type;
71 pcu_prim->bts_nr = bts_nr;
72
73 return msg;
74}
75
76static int pcu_tx_act_req(uint8_t trx, uint8_t ts, uint8_t activate)
77{
78 struct msgb *msg;
79 struct gsm_pcu_if *pcu_prim;
80 struct gsm_pcu_if_act_req *act_req;
81
82 LOGP(DL1IF, LOGL_INFO, "Sending %s request: trx=%d ts=%d\n",
83 (activate) ? "activate" : "deactivate", trx, ts);
84
85 msg = pcu_msgb_alloc(PCU_IF_MSG_ACT_REQ, 0);
86 if (!msg)
87 return -ENOMEM;
88 pcu_prim = (struct gsm_pcu_if *) msg->data;
89 act_req = &pcu_prim->u.act_req;
90 act_req->activate = activate;
91 act_req->trx_nr = trx;
92 act_req->ts_nr = ts;
93
94 return pcu_sock_send(msg);
95}
96
97static int pcu_tx_data_req(uint8_t trx, uint8_t ts, uint8_t sapi,
98 uint16_t arfcn, uint32_t fn, uint8_t block_nr, uint8_t *data,
99 uint8_t len)
100{
101 struct msgb *msg;
102 struct gsm_pcu_if *pcu_prim;
103 struct gsm_pcu_if_data *data_req;
104
105 LOGP(DL1IF, LOGL_DEBUG, "Sending data request: trx=%d ts=%d sapi=%d "
106 "arfcn=%d fn=%d block=%d data=%s\n", trx, ts, sapi, arfcn, fn,
107 block_nr, osmo_hexdump(data, len));
108
109 msg = pcu_msgb_alloc(PCU_IF_MSG_DATA_REQ, 0);
110 if (!msg)
111 return -ENOMEM;
112 pcu_prim = (struct gsm_pcu_if *) msg->data;
113 data_req = &pcu_prim->u.data_req;
114
115 data_req->sapi = sapi;
116 data_req->fn = fn;
117 data_req->arfcn = arfcn;
118 data_req->trx_nr = trx;
119 data_req->ts_nr = ts;
120 data_req->block_nr = block_nr;
121 memcpy(data_req->data, data, len);
122 data_req->len = len;
123
124 return pcu_sock_send(msg);
125}
126
127void pcu_l1if_tx_pdtch(msgb *msg, uint8_t trx, uint8_t ts, uint16_t arfcn,
128 uint32_t fn, uint8_t block_nr)
129{
130 pcu_tx_data_req(trx, ts, PCU_IF_SAPI_PDTCH, arfcn, fn, block_nr,
131 msg->data, msg->len);
132 msgb_free(msg);
133}
134
135void pcu_l1if_tx_ptcch(msgb *msg, uint8_t trx, uint8_t ts, uint16_t arfcn,
136 uint32_t fn, uint8_t block_nr)
137{
138 pcu_tx_data_req(trx, ts, PCU_IF_SAPI_PTCCH, arfcn, fn, block_nr,
139 msg->data, msg->len);
140 msgb_free(msg);
141}
142
143void pcu_l1if_tx_agch(bitvec * block, int len)
144{
145 uint8_t data[24]; /* prefix PLEN */
146
147 /* FIXME: why does OpenBTS has no PLEN and no fill in message? */
148 bitvec_pack(block, data + 1);
149 data[0] = (len << 2) | 0x01;
150 pcu_tx_data_req(0, 0, PCU_IF_SAPI_AGCH, 0, 0, 0, data, 23);
151}
152
153static void pcu_l1if_tx_bcch(uint8_t *data, int len)
154{
155 pcu_tx_data_req(0, 0, PCU_IF_SAPI_BCCH, 0, 0, 0, data, len);
156}
157
158static int pcu_rx_data_ind(struct gsm_pcu_if_data *data_ind)
159{
160 int rc = 0;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200161
162 LOGP(DL1IF, LOGL_DEBUG, "Data indication received: sapi=%d arfcn=%d "
163 "block=%d data=%s\n", data_ind->sapi,
164 data_ind->arfcn, data_ind->block_nr,
165 osmo_hexdump(data_ind->data, data_ind->len));
166
167 switch (data_ind->sapi) {
168 case PCU_IF_SAPI_PDTCH:
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200169 rc = gprs_rlcmac_rcv_block(data_ind->data, data_ind->len,
170 data_ind->fn);
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200171 break;
172 default:
173 LOGP(DL1IF, LOGL_ERROR, "Received PCU data indication with "
174 "unsupported sapi %d\n", data_ind->sapi);
175 rc = -EINVAL;
176 }
177
178 return rc;
179}
180
181static int pcu_rx_rts_req(struct gsm_pcu_if_rts_req *rts_req)
182{
183 int rc = 0;
184
185 LOGP(DL1IF, LOGL_DEBUG, "RTS request received: trx=%d ts=%d sapi=%d "
186 "arfcn=%d fn=%d block=%d\n", rts_req->trx_nr, rts_req->ts_nr,
187 rts_req->sapi, rts_req->arfcn, rts_req->fn, rts_req->block_nr);
188
189 switch (rts_req->sapi) {
190 case PCU_IF_SAPI_PDTCH:
191 gprs_rlcmac_rcv_rts_block(rts_req->trx_nr, rts_req->ts_nr,
192 rts_req->arfcn, rts_req->fn, rts_req->block_nr);
193 break;
194 case PCU_IF_SAPI_PTCCH:
195 /* FIXME */
196 {
197 struct msgb *msg = msgb_alloc(23, "l1_prim");
198 memset(msgb_put(msg, 23), 0x2b, 23);
199 pcu_l1if_tx_ptcch(msg, rts_req->trx_nr, rts_req->ts_nr,
200 rts_req->arfcn, rts_req->fn, rts_req->block_nr);
201 }
202 break;
203 default:
204 LOGP(DL1IF, LOGL_ERROR, "Received PCU RTS request with "
205 "unsupported sapi %d\n", rts_req->sapi);
206 rc = -EINVAL;
207 }
208
209 return rc;
210}
211
212static int pcu_rx_rach_ind(struct gsm_pcu_if_rach_ind *rach_ind)
213{
214 int rc = 0;
215
216 LOGP(DL1IF, LOGL_INFO, "RACH request received: sapi=%d "
217 "qta=%d, ra=%d, fn=%d\n", rach_ind->sapi, rach_ind->qta,
218 rach_ind->ra, rach_ind->fn);
219
220 switch (rach_ind->sapi) {
221 case PCU_IF_SAPI_RACH:
222 rc = gprs_rlcmac_rcv_rach(rach_ind->ra, rach_ind->fn,
223 rach_ind->qta);
224 break;
225 default:
226 LOGP(DL1IF, LOGL_ERROR, "Received PCU rach request with "
227 "unsupported sapi %d\n", rach_ind->sapi);
228 rc = -EINVAL;
229 }
230
231 return rc;
232}
233
234static int pcu_rx_info_ind(struct gsm_pcu_if_info_ind *info_ind)
235{
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200236 struct gprs_rlcmac_bts *bts = gprs_rlcmac_bts;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200237 int rc = 0;
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200238 int trx, ts, tfi;
239 struct gprs_rlcmac_tbf *tbf;
Andreas Eversbergb3c6f6c2012-07-06 07:40:08 +0200240 int i;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200241
242 LOGP(DL1IF, LOGL_INFO, "Info indication received:\n");
243
244 if (!(info_ind->flags & PCU_IF_FLAG_ACTIVE)) {
245 LOGP(DL1IF, LOGL_NOTICE, "BTS not available\n");
Andreas Eversbergb3c6f6c2012-07-06 07:40:08 +0200246bssgp_failed:
Andreas Eversberge6228b32012-07-03 13:36:03 +0200247 /* free all TBF */
248 for (trx = 0; trx < 8; trx++) {
249 bts->trx[trx].arfcn = info_ind->trx[trx].arfcn;
250 for (ts = 0; ts < 8; ts++) {
251 for (tfi = 0; tfi < 32; tfi++) {
252 tbf = bts->trx[trx].pdch[ts].tbf[tfi];
253 if (tbf)
254 tbf_free(tbf);
255 }
256 }
257 }
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200258 return 0;
259 }
260 LOGP(DL1IF, LOGL_INFO, "BTS available\n");
Andreas Eversbergb3c6f6c2012-07-06 07:40:08 +0200261 LOGP(DL1IF, LOGL_INFO, " mcc=%d\n", info_ind->mcc);
262 LOGP(DL1IF, LOGL_INFO, " mnc=%d\n", info_ind->mnc);
263 LOGP(DL1IF, LOGL_INFO, " lac=%d\n", info_ind->lac);
264 LOGP(DL1IF, LOGL_INFO, " rac=%d\n", info_ind->rac);
265 LOGP(DL1IF, LOGL_INFO, " cell_id=%d\n", info_ind->cell_id);
266 LOGP(DL1IF, LOGL_INFO, " nsei=%d\n", info_ind->nsei);
267 LOGP(DL1IF, LOGL_INFO, " nse_timer=%d %d %d %d %d %d %d\n",
268 info_ind->nse_timer[0], info_ind->nse_timer[1],
269 info_ind->nse_timer[2], info_ind->nse_timer[3],
270 info_ind->nse_timer[4], info_ind->nse_timer[5],
271 info_ind->nse_timer[6]);
272 LOGP(DL1IF, LOGL_INFO, " cell_timer=%d %d %d %d %d %d %d %d %d %d %d\n",
273 info_ind->cell_timer[0], info_ind->cell_timer[1],
274 info_ind->cell_timer[2], info_ind->cell_timer[3],
275 info_ind->cell_timer[4], info_ind->cell_timer[5],
276 info_ind->cell_timer[6], info_ind->cell_timer[7],
277 info_ind->cell_timer[8], info_ind->cell_timer[9],
278 info_ind->cell_timer[10]);
279 LOGP(DL1IF, LOGL_INFO, " repeat_time=%d\n", info_ind->repeat_time);
280 LOGP(DL1IF, LOGL_INFO, " repeat_count=%d\n", info_ind->repeat_count);
281 LOGP(DL1IF, LOGL_INFO, " bvci=%d\n", info_ind->bvci);
282 LOGP(DL1IF, LOGL_INFO, " t3142=%d\n", info_ind->t3142);
283 LOGP(DL1IF, LOGL_INFO, " t3169=%d\n", info_ind->t3169);
284 LOGP(DL1IF, LOGL_INFO, " t3191=%d\n", info_ind->t3191);
285 LOGP(DL1IF, LOGL_INFO, " t3193=%d (ms)\n", info_ind->t3193_10ms * 10);
286 LOGP(DL1IF, LOGL_INFO, " t3195=%d\n", info_ind->t3195);
287 LOGP(DL1IF, LOGL_INFO, " n3101=%d\n", info_ind->n3101);
288 LOGP(DL1IF, LOGL_INFO, " n3103=%d\n", info_ind->n3103);
289 LOGP(DL1IF, LOGL_INFO, " n3105=%d\n", info_ind->n3105);
290 LOGP(DL1IF, LOGL_INFO, " cv_countdown=%d\n", info_ind->cv_countdown);
291 LOGP(DL1IF, LOGL_INFO, " dl_tbf_ext=%d\n", info_ind->dl_tbf_ext);
292 LOGP(DL1IF, LOGL_INFO, " ul_tbf_ext=%d\n", info_ind->ul_tbf_ext);
293 for (i = 0; i < 4; i++) {
294 if ((info_ind->flags & (PCU_IF_FLAG_CS1 << i)))
295 LOGP(DL1IF, LOGL_INFO, " Use CS%d\n", i+1);
296 }
297 for (i = 0; i < 9; i++) {
298 if ((info_ind->flags & (PCU_IF_FLAG_MCS1 << i)))
299 LOGP(DL1IF, LOGL_INFO, " Use MCS%d\n", i+1);
300 }
301 LOGP(DL1IF, LOGL_INFO, " initial_cs=%d\n", info_ind->initial_cs);
302 LOGP(DL1IF, LOGL_INFO, " initial_mcs=%d\n", info_ind->initial_mcs);
303 LOGP(DL1IF, LOGL_INFO, " nsvci=%d\n", info_ind->nsvci[0]);
304 LOGP(DL1IF, LOGL_INFO, " local_port=%d\n", info_ind->local_port[0]);
305 LOGP(DL1IF, LOGL_INFO, " remote_port=%d\n", info_ind->remote_port[0]);
306 LOGP(DL1IF, LOGL_INFO, " remote_ip=%d\n", info_ind->remote_ip[0]);
307
308 bts->cs1 = !!(info_ind->flags & PCU_IF_FLAG_CS1);
309 bts->cs2 = !!(info_ind->flags & PCU_IF_FLAG_CS2);
310 bts->cs3 = !!(info_ind->flags & PCU_IF_FLAG_CS3);
311 bts->cs4 = !!(info_ind->flags & PCU_IF_FLAG_CS4);
312 if (!bts->cs1 && !bts->cs2 && !bts->cs3 && !bts->cs4)
313 bts->cs1 = 1;
314 if (info_ind->t3142) { /* if timer values are set */
315 bts->t3142 = info_ind->t3142;
316 bts->t3169 = info_ind->t3169;
317 bts->t3191 = info_ind->t3191;
318 bts->t3193_msec = info_ind->t3193_10ms * 10;
319 bts->t3195 = info_ind->t3195;
320 bts->n3101 = info_ind->n3101;
321 bts->n3103 = info_ind->n3103;
322 bts->n3105 = info_ind->n3105;
323 }
324 if (info_ind->initial_cs < 1 || info_ind->initial_cs > 4)
325 bts->initial_cs = 1;
326 else
327 bts->initial_cs = info_ind->initial_cs;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200328
329 for (trx = 0; trx < 8; trx++) {
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200330 bts->trx[trx].arfcn = info_ind->trx[trx].arfcn;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200331 for (ts = 0; ts < 8; ts++) {
332 if ((info_ind->trx[trx].pdch_mask & (1 << ts))) {
333 /* FIXME: activate dynamically at RLCMAC */
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200334 if (!bts->trx[trx].pdch[ts].enable)
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200335 pcu_tx_act_req(trx, ts, 1);
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200336 bts->trx[trx].pdch[ts].enable = 1;
337 bts->trx[trx].pdch[ts].tsc =
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200338 info_ind->trx[trx].tsc[ts];
339 LOGP(DL1IF, LOGL_INFO, "PDCH: trx=%d ts=%d\n",
340 trx, ts);
341 } else {
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200342 if (bts->trx[trx].pdch[ts].enable)
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200343 pcu_tx_act_req(trx, ts, 0);
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200344 bts->trx[trx].pdch[ts].enable = 0;
345 /* kick all tbf FIXME: multislot */
346 for (tfi = 0; tfi < 32; tfi++) {
347 tbf = bts->trx[trx].pdch[ts].tbf[tfi];
348 if (tbf)
349 tbf_free(tbf);
350 }
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200351 }
352 }
353 }
354
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200355 return rc;
356}
357
Andreas Eversberge6228b32012-07-03 13:36:03 +0200358static int pcu_rx_time_ind(struct gsm_pcu_if_time_ind *time_ind)
359{
360 struct gprs_rlcmac_bts *bts = gprs_rlcmac_bts;
361 int trx, ts, tfi;
362 struct gprs_rlcmac_tbf *tbf;
363 uint32_t elapsed;
364 uint8_t fn13 = time_ind->fn % 13;
365
366 /* omit frame numbers not starting at a MAC block */
367 if (fn13 != 0 && fn13 != 4 && fn13 != 8)
368 return 0;
369
370 LOGP(DL1IF, LOGL_DEBUG, "Time indication received: %d\n",
371 time_ind->fn % 52);
372
373 set_current_fn(time_ind->fn);
374
375 /* check for poll timeout */
376 for (trx = 0; trx < 8; trx++) {
377 for (ts = 0; ts < 8; ts++) {
378 for (tfi = 0; tfi < 32; tfi++) {
379 tbf = bts->trx[trx].pdch[ts].tbf[tfi];
380 if (!tbf)
381 continue;
382 if (tbf->poll_state != GPRS_RLCMAC_POLL_SCHED)
383 continue;
384 elapsed = (frame_number - tbf->poll_fn)
385 % 2715648;
386 if (elapsed >= 20 && elapsed < 200)
387 gprs_rlcmac_poll_timeout(tbf);
388 }
389 }
390 }
391
392 return 0;
393}
394
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200395static int pcu_rx(uint8_t msg_type, struct gsm_pcu_if *pcu_prim)
396{
397 int rc = 0;
398
399 switch (msg_type) {
400 case PCU_IF_MSG_DATA_IND:
401 rc = pcu_rx_data_ind(&pcu_prim->u.data_ind);
402 break;
403 case PCU_IF_MSG_RTS_REQ:
404 rc = pcu_rx_rts_req(&pcu_prim->u.rts_req);
405 break;
406 case PCU_IF_MSG_RACH_IND:
407 rc = pcu_rx_rach_ind(&pcu_prim->u.rach_ind);
408 break;
409 case PCU_IF_MSG_INFO_IND:
410 rc = pcu_rx_info_ind(&pcu_prim->u.info_ind);
411 break;
Andreas Eversberge6228b32012-07-03 13:36:03 +0200412 case PCU_IF_MSG_TIME_IND:
413 rc = pcu_rx_time_ind(&pcu_prim->u.time_ind);
414 break;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200415 default:
416 LOGP(DL1IF, LOGL_ERROR, "Received unknwon PCU msg type %d\n",
417 msg_type);
418 rc = -EINVAL;
419 }
420
421 return rc;
422}
423
424/*
425 * SYSMO-PCU socket functions
426 */
427
428struct pcu_sock_state {
429 struct osmo_fd conn_bfd; /* fd for connection to lcr */
430 struct osmo_timer_list timer; /* socket connect retry timer */
431 struct llist_head upqueue; /* queue for sending messages */
432} *pcu_sock_state = NULL;
433
434static int pcu_sock_send(struct msgb *msg)
435{
436 struct pcu_sock_state *state = pcu_sock_state;
437 struct osmo_fd *conn_bfd;
438
439 if (!state) {
440 LOGP(DL1IF, LOGL_NOTICE, "PCU socket not created, dropping "
441 "message\n");
442 return -EINVAL;
443 }
444 conn_bfd = &state->conn_bfd;
445 if (conn_bfd->fd <= 0) {
446 LOGP(DL1IF, LOGL_NOTICE, "PCU socket not connected, dropping "
447 "message\n");
448 return -EIO;
449 }
450 msgb_enqueue(&state->upqueue, msg);
451 conn_bfd->when |= BSC_FD_WRITE;
452
453 return 0;
454}
455
456static void pcu_sock_close(struct pcu_sock_state *state)
457{
458 struct osmo_fd *bfd = &state->conn_bfd;
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200459 struct gprs_rlcmac_bts *bts = gprs_rlcmac_bts;
460 struct gprs_rlcmac_tbf *tbf;
461 uint8_t trx, ts, tfi;
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200462
463 LOGP(DL1IF, LOGL_NOTICE, "PCU socket has LOST connection\n");
464
465 close(bfd->fd);
466 bfd->fd = -1;
467 osmo_fd_unregister(bfd);
468
469 /* flush the queue */
470 while (!llist_empty(&state->upqueue)) {
471 struct msgb *msg = msgb_dequeue(&state->upqueue);
472 msgb_free(msg);
473 }
474
Andreas Eversberg5dac2f02012-06-27 15:52:04 +0200475 /* disable all slots, kick all TBFs */
476 for (trx = 0; trx < 8; trx++) {
477 for (ts = 0; ts < 8; ts++) {
478 bts->trx[trx].pdch[ts].enable = 0;
479 for (tfi = 0; tfi < 32; tfi++) {
480 tbf = bts->trx[trx].pdch[ts].tbf[tfi];
481 if (tbf)
482 tbf_free(tbf);
483 }
484 }
485 }
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200486
487 state->timer.cb = pcu_sock_timeout;
488 osmo_timer_schedule(&state->timer, 5, 0);
489}
490
491static int pcu_sock_read(struct osmo_fd *bfd)
492{
493 struct pcu_sock_state *state = (struct pcu_sock_state *)bfd->data;
494 struct gsm_pcu_if *pcu_prim;
495 struct msgb *msg;
496 int rc;
497
498 msg = msgb_alloc(sizeof(*pcu_prim), "pcu_sock_rx");
499 if (!msg)
500 return -ENOMEM;
501
502 pcu_prim = (struct gsm_pcu_if *) msg->tail;
503
504 rc = recv(bfd->fd, msg->tail, msgb_tailroom(msg), 0);
505 if (rc == 0)
506 goto close;
507
508 if (rc < 0) {
509 if (errno == EAGAIN)
510 return 0;
511 goto close;
512 }
513
514 rc = pcu_rx(pcu_prim->msg_type, pcu_prim);
515
516 /* as we always synchronously process the message in pcu_rx() and
517 * its callbacks, we can free the message here. */
518 msgb_free(msg);
519
520 return rc;
521
522close:
523 msgb_free(msg);
524 pcu_sock_close(state);
525 return -1;
526}
527
528static int pcu_sock_write(struct osmo_fd *bfd)
529{
530 struct pcu_sock_state *state = (struct pcu_sock_state *)bfd->data;
531 int rc;
532
533 while (!llist_empty(&state->upqueue)) {
534 struct msgb *msg, *msg2;
535 struct gsm_pcu_if *pcu_prim;
536
537 /* peek at the beginning of the queue */
538 msg = llist_entry(state->upqueue.next, struct msgb, list);
539 pcu_prim = (struct gsm_pcu_if *)msg->data;
540
541 bfd->when &= ~BSC_FD_WRITE;
542
543 /* bug hunter 8-): maybe someone forgot msgb_put(...) ? */
544 if (!msgb_length(msg)) {
545 LOGP(DL1IF, LOGL_ERROR, "message type (%d) with ZERO "
546 "bytes!\n", pcu_prim->msg_type);
547 goto dontsend;
548 }
549
550 /* try to send it over the socket */
551 rc = write(bfd->fd, msgb_data(msg), msgb_length(msg));
552 if (rc == 0)
553 goto close;
554 if (rc < 0) {
555 if (errno == EAGAIN) {
556 bfd->when |= BSC_FD_WRITE;
557 break;
558 }
559 goto close;
560 }
561
562dontsend:
563 /* _after_ we send it, we can deueue */
564 msg2 = msgb_dequeue(&state->upqueue);
565 assert(msg == msg2);
566 msgb_free(msg);
567 }
568 return 0;
569
570close:
571 pcu_sock_close(state);
572
573 return -1;
574}
575
576static int pcu_sock_cb(struct osmo_fd *bfd, unsigned int flags)
577{
578 int rc = 0;
579
580 if (flags & BSC_FD_READ)
581 rc = pcu_sock_read(bfd);
582 if (rc < 0)
583 return rc;
584
585 if (flags & BSC_FD_WRITE)
586 rc = pcu_sock_write(bfd);
587
588 return rc;
589}
590
591int pcu_l1if_open(void)
592{
593 struct pcu_sock_state *state;
594 struct osmo_fd *bfd;
595 struct sockaddr_un local;
596 unsigned int namelen;
597 int rc;
598
Andreas Eversberg0aed6542012-06-23 10:33:16 +0200599 state = pcu_sock_state;
600 if (!state) {
601 state = talloc_zero(NULL, struct pcu_sock_state);
602 if (!state)
603 return -ENOMEM;
604 INIT_LLIST_HEAD(&state->upqueue);
605 }
606
607 bfd = &state->conn_bfd;
608
609 bfd->fd = socket(AF_UNIX, SOCK_SEQPACKET, 0);
610 if (bfd->fd < 0) {
611 LOGP(DL1IF, LOGL_ERROR, "Failed to create PCU-SYSMO socket.\n");
612 talloc_free(state);
613 return -1;
614 }
615
616 local.sun_family = AF_UNIX;
617 strncpy(local.sun_path, "/tmp/pcu_bts", sizeof(local.sun_path));
618 local.sun_path[sizeof(local.sun_path) - 1] = '\0';
619
620 /* we use the same magic that X11 uses in Xtranssock.c for
621 * calculating the proper length of the sockaddr */
622#if defined(BSD44SOCKETS) || defined(__UNIXWARE__)
623 local.sun_len = strlen(local.sun_path);
624#endif
625#if defined(BSD44SOCKETS) || defined(SUN_LEN)
626 namelen = SUN_LEN(&local);
627#else
628 namelen = strlen(local.sun_path) +
629 offsetof(struct sockaddr_un, sun_path);
630#endif
631 rc = connect(bfd->fd, (struct sockaddr *) &local, namelen);
632 if (rc != 0) {
633 LOGP(DL1IF, LOGL_ERROR, "Failed to Connect the PCU-SYSMO "
634 "socket, delaying... '%s'\n", local.sun_path);
635 close(bfd->fd);
636 bfd->fd = -1;
637 state->timer.cb = pcu_sock_timeout;
638 osmo_timer_schedule(&state->timer, 5, 0);
639 return -1;
640 }
641
642 bfd->when = BSC_FD_READ;
643 bfd->cb = pcu_sock_cb;
644 bfd->data = state;
645
646 rc = osmo_fd_register(bfd);
647 if (rc < 0) {
648 LOGP(DL1IF, LOGL_ERROR, "Could not register PCU fd: %d\n", rc);
649 close(bfd->fd);
650 talloc_free(state);
651 return rc;
652 }
653
654 LOGP(DL1IF, LOGL_NOTICE, "PCU-SYSMO socket has been connected\n");
655
656 pcu_sock_state = state;
657
658 return 0;
659}
660
661void pcu_l1if_close(void)
662{
663 struct pcu_sock_state *state = pcu_sock_state;
664 struct osmo_fd *bfd;
665
666 if (!state)
667 return;
668
669 if (osmo_timer_pending(&state->timer))
670 osmo_timer_del(&state->timer);
671
672 bfd = &state->conn_bfd;
673 if (bfd->fd > 0)
674 pcu_sock_close(state);
675 talloc_free(state);
676 pcu_sock_state = NULL;
677}
678
679static void pcu_sock_timeout(void *_priv)
680{
681 pcu_l1if_open();
682}
683
684
685
686