/* GSM Network Management (OML) messages on the A-bis interface * 3GPP TS 12.21 version 8.0.0 Release 1999 / ETSI TS 100 623 V8.0.0 */ /* (C) 2008-2009 by Harald Welte * * All Rights Reserved * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License along * with this program; if not, write to the Free Software Foundation, Inc., * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. * */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #define OM_ALLOC_SIZE 1024 #define OM_HEADROOM_SIZE 128 /* unidirectional messages from BTS to BSC */ static const enum abis_nm_msgtype reports[] = { NM_MT_SW_ACTIVATED_REP, NM_MT_TEST_REP, NM_MT_STATECHG_EVENT_REP, NM_MT_FAILURE_EVENT_REP, }; /* messages without ACK/NACK */ static const enum abis_nm_msgtype no_ack_nack[] = { NM_MT_MEAS_RES_REQ, NM_MT_STOP_MEAS, NM_MT_START_MEAS, }; /* Messages related to software load */ static const enum abis_nm_msgtype sw_load_msgs[] = { NM_MT_LOAD_INIT_ACK, NM_MT_LOAD_INIT_NACK, NM_MT_LOAD_SEG_ACK, NM_MT_LOAD_ABORT, NM_MT_LOAD_END_ACK, NM_MT_LOAD_END_NACK, NM_MT_SW_ACT_REQ, NM_MT_ACTIVATE_SW_ACK, NM_MT_ACTIVATE_SW_NACK, NM_MT_SW_ACTIVATED_REP, }; /* Attributes that the BSC can set, not only get, according to Section 9.4 */ static const enum abis_nm_attr nm_att_settable[] = { NM_ATT_ADD_INFO, NM_ATT_ADD_TEXT, NM_ATT_DEST, NM_ATT_EVENT_TYPE, NM_ATT_FILE_DATA, NM_ATT_GET_ARI, NM_ATT_HW_CONF_CHG, NM_ATT_LIST_REQ_ATTR, NM_ATT_MDROP_LINK, NM_ATT_MDROP_NEXT, NM_ATT_NACK_CAUSES, NM_ATT_OUTST_ALARM, NM_ATT_PHYS_CONF, NM_ATT_PROB_CAUSE, NM_ATT_RAD_SUBC, NM_ATT_SOURCE, NM_ATT_SPEC_PROB, NM_ATT_START_TIME, NM_ATT_TEST_DUR, NM_ATT_TEST_NO, NM_ATT_TEST_REPORT, NM_ATT_WINDOW_SIZE, NM_ATT_SEVERITY, NM_ATT_MEAS_RES, NM_ATT_MEAS_TYPE, }; static int is_in_arr(enum abis_nm_msgtype mt, const enum abis_nm_msgtype *arr, int size) { int i; for (i = 0; i < size; i++) { if (arr[i] == mt) return 1; } return 0; } #if 0 /* is this msgtype the usual ACK/NACK type ? */ static int is_ack_nack(enum abis_nm_msgtype mt) { return !is_in_arr(mt, no_ack_nack, ARRAY_SIZE(no_ack_nack)); } #endif /* is this msgtype a report ? */ static int is_report(enum abis_nm_msgtype mt) { return is_in_arr(mt, reports, ARRAY_SIZE(reports)); } #define MT_ACK(x) (x+1) #define MT_NACK(x) (x+2) static void fill_om_hdr(struct abis_om_hdr *oh, u_int8_t len) { oh->mdisc = ABIS_OM_MDISC_FOM; oh->placement = ABIS_OM_PLACEMENT_ONLY; oh->sequence = 0; oh->length = len; } static void fill_om_fom_hdr(struct abis_om_hdr *oh, u_int8_t len, u_int8_t msg_type, u_int8_t obj_class, u_int8_t bts_nr, u_int8_t trx_nr, u_int8_t ts_nr) { struct abis_om_fom_hdr *foh = (struct abis_om_fom_hdr *) oh->data; fill_om_hdr(oh, len+sizeof(*foh)); foh->msg_type = msg_type; foh->obj_class = obj_class; foh->obj_inst.bts_nr = bts_nr; foh->obj_inst.trx_nr = trx_nr; foh->obj_inst.ts_nr = ts_nr; } static struct msgb *nm_msgb_alloc(void) { return msgb_alloc_headroom(OM_ALLOC_SIZE, OM_HEADROOM_SIZE); } /* Send a OML NM Message from BSC to BTS */ int abis_nm_sendmsg(struct gsm_bts *bts, struct msgb *msg) { return _abis_nm_sendmsg(msg); } static int abis_nm_rcvmsg_sw(struct msgb *mb); /* Receive a OML NM Message from BTS */ static int abis_nm_rcvmsg_fom(struct msgb *mb) { struct abis_om_fom_hdr *foh = msgb_l3(mb); u_int8_t mt = foh->msg_type; /* check for unsolicited message */ if (is_report(mt)) { DEBUGP(DNM, "reporting NM MT 0x%02x\n", mt); //nmh->cfg->report_cb(mb, foh); return 0; } if (is_in_arr(mt, sw_load_msgs, ARRAY_SIZE(sw_load_msgs))) return abis_nm_rcvmsg_sw(mb); #if 0 /* check if last message is to be acked */ if (is_ack_nack(nmh->last_msgtype)) { if (mt == MT_ACK(nmh->last_msgtype)) { fprintf(stderr, "received ACK (0x%x)\n", foh->msg_type); /* we got our ACK, continue sending the next msg */ } else if (mt == MT_NACK(nmh->last_msgtype)) { /* we got a NACK, signal this to the caller */ fprintf(stderr, "received NACK (0x%x)\n", foh->msg_type); /* FIXME: somehow signal this to the caller */ } else { /* really strange things happen */ return -EINVAL; } } #endif return 0; } /* High-Level API */ /* Entry-point where L2 OML from BTS enters the NM code */ int abis_nm_rcvmsg(struct msgb *msg) { int rc; struct abis_om_hdr *oh = msgb_l2(msg); /* Various consistency checks */ if (oh->placement != ABIS_OM_PLACEMENT_ONLY) { fprintf(stderr, "ABIS OML placement 0x%x not supported\n", oh->placement); return -EINVAL; } if (oh->sequence != 0) { fprintf(stderr, "ABIS OML sequence 0x%x != 0x00\n", oh->sequence); return -EINVAL; } #if 0 unsigned int l2_len = msg->tail - (u_int8_t *)msgb_l2(msg); unsigned int hlen = sizeof(*oh) + sizeof(struct abis_om_fom_hdr); if (oh->length + hlen > l2_len) { fprintf(stderr, "ABIS OML truncated message (%u > %u)\n", oh->length + sizeof(*oh), l2_len); return -EINVAL; } if (oh->length + hlen < l2_len) fprintf(stderr, "ABIS OML message with extra trailer?!? (oh->len=%d, sizeof_oh=%d l2_len=%d\n", oh->length, sizeof(*oh), l2_len); #endif msg->l3h = (unsigned char *)oh + sizeof(*oh); switch (oh->mdisc) { case ABIS_OM_MDISC_FOM: rc = abis_nm_rcvmsg_fom(msg); break; case ABIS_OM_MDISC_MMI: case ABIS_OM_MDISC_TRAU: case ABIS_OM_MDISC_MANUF: default: fprintf(stderr, "unknown ABIS OML message discriminator 0x%x\n", oh->mdisc); return -EINVAL; } msgb_free(msg); return rc; } #if 0 /* initialized all resources */ struct abis_nm_h *abis_nm_init(struct abis_nm_cfg *cfg) { struct abis_nm_h *nmh; nmh = malloc(sizeof(*nmh)); if (!nmh) return NULL; nmh->cfg = cfg; return nmh; } /* free all resources */ void abis_nm_fini(struct abis_nm_h *nmh) { free(nmh); } #endif /* Here we are trying to define a high-level API that can be used by * the actual BSC implementation. However, the architecture is currently * still under design. Ideally the calls to this API would be synchronous, * while the underlying stack behind the APi runs in a traditional select * based state machine. */ /* 6.2 Software Load: */ enum sw_state { SW_STATE_NONE, SW_STATE_WAIT_INITACK, SW_STATE_WAIT_SEGACK, SW_STATE_WAIT_ENDACK, SW_STATE_WAIT_ACTACK, SW_STATE_ERROR, }; struct abis_nm_sw { struct gsm_bts *bts; gsm_cbfn *cbfn; void *cb_data; /* this will become part of the SW LOAD INITIATE */ u_int8_t obj_class; u_int8_t obj_instance[3]; u_int8_t file_id[255]; u_int8_t file_id_len; u_int8_t file_version[255]; u_int8_t file_version_len; u_int8_t window_size; u_int8_t seg_in_window; int fd; FILE *stream; enum sw_state state; int last_seg; }; static struct abis_nm_sw g_sw; /* 6.2.1 / 8.3.1: Load Data Initiate */ static int sw_load_init(struct abis_nm_sw *sw) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); u_int8_t len = 3*2 + sw->file_id_len + sw->file_version_len; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, len, NM_MT_LOAD_INIT, sw->obj_class, sw->obj_instance[0], sw->obj_instance[1], sw->obj_instance[2]); /* FIXME: this is BS11 specific format */ msgb_tlv_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id); msgb_tlv_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len, sw->file_version); msgb_tv_put(msg, NM_ATT_WINDOW_SIZE, sw->window_size); return abis_nm_sendmsg(sw->bts, msg); } static int is_last_line(FILE *stream) { char next_seg_buf[256]; long pos; /* check if we're sending the last line */ pos = ftell(stream); if (!fgets(next_seg_buf, sizeof(next_seg_buf)-2, stream)) { fseek(stream, pos, SEEK_SET); return 1; } fseek(stream, pos, SEEK_SET); return 0; } /* 6.2.2 / 8.3.2 Load Data Segment */ static int sw_load_segment(struct abis_nm_sw *sw) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); char seg_buf[256]; char *line_buf = seg_buf+2; unsigned char *tlv; u_int8_t len; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); switch (sw->bts->type) { case GSM_BTS_TYPE_BS11: if (fgets(line_buf, sizeof(seg_buf)-2, sw->stream) == NULL) { perror("fgets reading segment"); return -EINVAL; } seg_buf[0] = 0x00; /* check if we're sending the last line */ sw->last_seg = is_last_line(sw->stream); if (sw->last_seg) seg_buf[1] = 0; else seg_buf[1] = 1 + sw->seg_in_window++; len = strlen(line_buf) + 2; tlv = msgb_put(msg, TLV_GROSS_LEN(len)); tlv_put(tlv, NM_ATT_BS11_FILE_DATA, len, (u_int8_t *)seg_buf); /* BS11 wants CR + LF in excess of the TLV length !?! */ tlv[1] -= 2; /* we only now know the exact length for the OM hdr */ len = strlen(line_buf)+2; break; default: /* FIXME: Other BTS types */ return -1; } fill_om_fom_hdr(oh, len, NM_MT_LOAD_SEG, sw->obj_class, sw->obj_instance[0], sw->obj_instance[1], sw->obj_instance[2]); return abis_nm_sendmsg(sw->bts, msg); } /* 6.2.4 / 8.3.4 Load Data End */ static int sw_load_end(struct abis_nm_sw *sw) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); u_int8_t len = 2*2 + sw->file_id_len + sw->file_version_len; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, len, NM_MT_LOAD_END, sw->obj_class, sw->obj_instance[0], sw->obj_instance[1], sw->obj_instance[2]); /* FIXME: this is BS11 specific format */ msgb_tlv_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id); msgb_tlv_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len, sw->file_version); return abis_nm_sendmsg(sw->bts, msg); } /* Activate the specified software into the BTS */ static int sw_activate(struct abis_nm_sw *sw) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); u_int8_t len = 2*2 + sw->file_id_len + sw->file_version_len; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, len, NM_MT_ACTIVATE_SW, sw->obj_class, sw->obj_instance[0], sw->obj_instance[1], sw->obj_instance[2]); /* FIXME: this is BS11 specific format */ msgb_tlv_put(msg, NM_ATT_FILE_ID, sw->file_id_len, sw->file_id); msgb_tlv_put(msg, NM_ATT_FILE_VERSION, sw->file_version_len, sw->file_version); return abis_nm_sendmsg(sw->bts, msg); } static int sw_open_file(struct abis_nm_sw *sw, const char *fname) { char file_id[12+1]; char file_version[80+1]; int rc; sw->fd = open(fname, O_RDONLY); if (sw->fd < 0) return sw->fd; switch (sw->bts->type) { case GSM_BTS_TYPE_BS11: sw->stream = fdopen(sw->fd, "r"); if (!sw->stream) { perror("fdopen"); return -1; } /* read first line and parse file ID and VERSION */ rc = fscanf(sw->stream, "@(#)%12s:%80s\r\n", file_id, file_version); if (rc != 2) { perror("parsing header line of software file"); return -1; } strcpy((char *)sw->file_id, file_id); sw->file_id_len = strlen(file_id); strcpy((char *)sw->file_version, file_version); sw->file_version_len = strlen(file_version); /* rewind to start of file */ rewind(sw->stream); break; default: /* We don't know how to treat them yet */ close(sw->fd); return -EINVAL; } return 0; } static void sw_close_file(struct abis_nm_sw *sw) { switch (sw->bts->type) { case GSM_BTS_TYPE_BS11: fclose(sw->stream); break; default: close(sw->fd); break; } } /* Fill the window */ static int sw_fill_window(struct abis_nm_sw *sw) { int rc; while (sw->seg_in_window < sw->window_size) { rc = sw_load_segment(sw); if (rc < 0) return rc; if (sw->last_seg) break; } return 0; } /* callback function from abis_nm_rcvmsg() handler */ static int abis_nm_rcvmsg_sw(struct msgb *mb) { struct abis_om_fom_hdr *foh = msgb_l3(mb); int rc = -1; struct abis_nm_sw *sw = &g_sw; enum sw_state old_state = sw->state; DEBUGP(DNM, "state %u, NM MT 0x%02x\n", sw->state, foh->msg_type); switch (sw->state) { case SW_STATE_WAIT_INITACK: switch (foh->msg_type) { case NM_MT_LOAD_INIT_ACK: /* fill window with segments */ if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_LOAD_INIT_ACK, mb, sw->cb_data, NULL); rc = sw_fill_window(sw); sw->state = SW_STATE_WAIT_SEGACK; break; case NM_MT_LOAD_INIT_NACK: DEBUGP(DNM, "Software Load Init NACK\n"); if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_LOAD_INIT_NACK, mb, sw->cb_data, NULL); sw->state = SW_STATE_ERROR; break; } break; case SW_STATE_WAIT_SEGACK: switch (foh->msg_type) { case NM_MT_LOAD_SEG_ACK: sw->seg_in_window = 0; if (!sw->last_seg) { /* fill window with more segments */ rc = sw_fill_window(sw); sw->state = SW_STATE_WAIT_SEGACK; } else { /* end the transfer */ sw->state = SW_STATE_WAIT_ENDACK; rc = sw_load_end(sw); } break; } break; case SW_STATE_WAIT_ENDACK: switch (foh->msg_type) { case NM_MT_LOAD_END_ACK: sw_close_file(sw); DEBUGP(DNM, "Software Load End (BTS %u)\n", sw->bts->nr); sw->state = SW_STATE_NONE; if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_LOAD_END_ACK, mb, sw->cb_data, NULL); break; case NM_MT_LOAD_END_NACK: DEBUGP(DNM, "Software Load End NACK\n"); sw->state = SW_STATE_ERROR; if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_LOAD_END_NACK, mb, sw->cb_data, NULL); break; } case SW_STATE_WAIT_ACTACK: switch (foh->msg_type) { case NM_MT_ACTIVATE_SW_ACK: /* we're done */ DEBUGP(DNM, "Activate Software DONE!\n"); sw->state = SW_STATE_NONE; rc = 0; if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_ACTIVATE_SW_ACK, mb, sw->cb_data, NULL); break; case NM_MT_ACTIVATE_SW_NACK: DEBUGP(DNM, "Activate Software NACK\n"); sw->state = SW_STATE_ERROR; if (sw->cbfn) sw->cbfn(GSM_HOOK_NM_SWLOAD, NM_MT_ACTIVATE_SW_NACK, mb, sw->cb_data, NULL); break; } case SW_STATE_NONE: case SW_STATE_ERROR: break; } if (rc) fprintf(stderr, "unexpected NM MT 0x%02x in state %u -> %u\n", foh->msg_type, old_state, sw->state); return rc; } /* Load the specified software into the BTS */ int abis_nm_software_load(struct gsm_bts *bts, const char *fname, u_int8_t win_size, gsm_cbfn *cbfn, void *cb_data) { struct abis_nm_sw *sw = &g_sw; int rc; DEBUGP(DNM, "Software Load (BTS %u, File \"%s\")\n", bts->nr, fname); if (sw->state != SW_STATE_NONE) return -EBUSY; sw->bts = bts; sw->obj_class = NM_OC_SITE_MANAGER; sw->obj_instance[0] = 0xff; sw->obj_instance[1] = 0xff; sw->obj_instance[2] = 0xff; sw->window_size = win_size; sw->state = SW_STATE_WAIT_INITACK; sw->cbfn = cbfn; sw->cb_data = cb_data; rc = sw_open_file(sw, fname); if (rc < 0) { sw->state = SW_STATE_NONE; return rc; } return sw_load_init(sw); } int abis_nm_software_load_status(struct gsm_bts *bts) { struct abis_nm_sw *sw = &g_sw; struct stat st; int rc, percent; rc = fstat(sw->fd, &st); if (rc < 0) { perror("ERROR during stat"); return rc; } percent = (ftell(sw->stream) * 100) / st.st_size; return percent; } /* Activate the specified software into the BTS */ int abis_nm_software_activate(struct gsm_bts *bts, const char *fname, gsm_cbfn *cbfn, void *cb_data) { struct abis_nm_sw *sw = &g_sw; int rc; DEBUGP(DNM, "Activating Software (BTS %u, File \"%s\")\n", bts->nr, fname); if (sw->state != SW_STATE_NONE) return -EBUSY; sw->bts = bts; sw->obj_class = NM_OC_SITE_MANAGER; sw->obj_instance[0] = 0xff; sw->obj_instance[1] = 0xff; sw->obj_instance[2] = 0xff; sw->state = SW_STATE_WAIT_ACTACK; sw->cbfn = cbfn; sw->cb_data = cb_data; /* Open the file in order to fill some sw struct members */ rc = sw_open_file(sw, fname); if (rc < 0) { sw->state = SW_STATE_NONE; return rc; } sw_close_file(sw); return sw_activate(sw); } static void fill_nm_channel(struct abis_nm_channel *ch, u_int8_t bts_port, u_int8_t ts_nr, u_int8_t subslot_nr) { ch->attrib = NM_ATT_ABIS_CHANNEL; ch->bts_port = bts_port; ch->timeslot = ts_nr; ch->subslot = subslot_nr; } int abis_nm_establish_tei(struct gsm_bts *bts, u_int8_t trx_nr, u_int8_t e1_port, u_int8_t e1_timeslot, u_int8_t e1_subslot, u_int8_t tei) { struct abis_om_hdr *oh; struct abis_nm_channel *ch; u_int8_t len = sizeof(*ch) + 2; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, len, NM_MT_ESTABLISH_TEI, NM_OC_RADIO_CARRIER, bts->bts_nr, trx_nr, 0xff); msgb_tv_put(msg, NM_ATT_TEI, tei); ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch)); fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot); return abis_nm_sendmsg(bts, msg); } /* connect signalling of one (BTS,TRX) to a particular timeslot on the E1 */ int abis_nm_conn_terr_sign(struct gsm_bts_trx *trx, u_int8_t e1_port, u_int8_t e1_timeslot, u_int8_t e1_subslot) { struct gsm_bts *bts = trx->bts; struct abis_om_hdr *oh; struct abis_nm_channel *ch; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, sizeof(*ch), NM_MT_CONN_TERR_SIGN, NM_OC_RADIO_CARRIER, bts->bts_nr, trx->nr, 0xff); ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch)); fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot); return abis_nm_sendmsg(bts, msg); } #if 0 int abis_nm_disc_terr_sign(struct abis_nm_h *h, struct abis_om_obj_inst *inst, struct abis_nm_abis_channel *chan) { } #endif int abis_nm_conn_terr_traf(struct gsm_bts_trx_ts *ts, u_int8_t e1_port, u_int8_t e1_timeslot, u_int8_t e1_subslot) { struct gsm_bts *bts = ts->trx->bts; struct abis_om_hdr *oh; struct abis_nm_channel *ch; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, sizeof(*ch), NM_MT_CONN_TERR_TRAF, NM_OC_BASEB_TRANSC, bts->bts_nr, ts->trx->nr, ts->nr); ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch)); fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot); return abis_nm_sendmsg(bts, msg); } #if 0 int abis_nm_disc_terr_traf(struct abis_nm_h *h, struct abis_om_obj_inst *inst, struct abis_nm_abis_channel *chan, u_int8_t subchan) { } #endif int abis_nm_set_channel_attr(struct gsm_bts_trx_ts *ts, u_int8_t chan_comb) { struct gsm_bts *bts = ts->trx->bts; struct abis_om_hdr *oh; u_int16_t arfcn = htons(ts->trx->arfcn); u_int8_t zero = 0x00; struct msgb *msg = nm_msgb_alloc(); u_int8_t len = 4 + 2 + 2 + 2 + 2 +3; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, len, NM_MT_SET_CHAN_ATTR, NM_OC_BASEB_TRANSC, bts->bts_nr, ts->trx->nr, ts->nr); /* FIXME: don't send ARFCN list, hopping sequence, mAIO, ...*/ msgb_tlv16_put(msg, NM_ATT_ARFCN_LIST, 1, &arfcn); msgb_tv_put(msg, NM_ATT_CHAN_COMB, chan_comb); msgb_tv_put(msg, NM_ATT_HSN, 0x00); msgb_tv_put(msg, NM_ATT_MAIO, 0x00); msgb_tv_put(msg, NM_ATT_TSC, 0x07); /* training sequence */ msgb_tlv_put(msg, 0x59, 1, &zero); return abis_nm_sendmsg(bts, msg); } int abis_nm_raw_msg(struct gsm_bts *bts, int len, u_int8_t *rawmsg) { struct msgb *msg = nm_msgb_alloc(); struct abis_om_hdr *oh; u_int8_t *data; oh = (struct abis_om_hdr *) msgb_put(msg, sizeof(*oh)); fill_om_hdr(oh, len); data = msgb_put(msg, len); memcpy(data, rawmsg, len); return abis_nm_sendmsg(bts, msg); } /* Siemens specific commands */ static int __simple_cmd(struct gsm_bts *bts, u_int8_t msg_type) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 0, msg_type, NM_OC_SITE_MANAGER, 0xff, 0xff, 0xff); return abis_nm_sendmsg(bts, msg); } int abis_nm_event_reports(struct gsm_bts *bts, int on) { if (on == 0) return __simple_cmd(bts, NM_MT_STOP_EVENT_REP); else return __simple_cmd(bts, NM_MT_REST_EVENT_REP); } /* Siemens (or BS-11) specific commands */ struct bs11_date_time { u_int16_t year; u_int8_t month; u_int8_t day; u_int8_t hour; u_int8_t min; u_int8_t sec; } __attribute__((packed)); void get_bs11_date_time(struct bs11_date_time *aet) { time_t t; struct tm *tm; t = time(NULL); tm = localtime(&t); aet->sec = tm->tm_sec; aet->min = tm->tm_min; aet->hour = tm->tm_hour; aet->day = tm->tm_mday; aet->month = tm->tm_mon; aet->year = htons(1900 + tm->tm_year); } int abis_nm_bs11_reset_resource(struct gsm_bts *bts) { return __simple_cmd(bts, NM_MT_BS11_RESET_RESOURCE); } int abis_nm_bs11_db_transmission(struct gsm_bts *bts, int begin) { if (begin) return __simple_cmd(bts, NM_MT_BS11_BEGIN_DB_TX); else return __simple_cmd(bts, NM_MT_BS11_END_DB_TX); } int abis_nm_bs11_create_object(struct gsm_bts *bts, enum abis_bs11_objtype type, u_int8_t idx, u_int8_t attr_len, const u_int8_t *attr) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); u_int8_t *cur; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, attr_len, NM_MT_BS11_CREATE_OBJ, NM_OC_BS11, type, 0, idx); cur = msgb_put(msg, attr_len); memcpy(cur, attr, attr_len); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_create_envaBTSE(struct gsm_bts *bts, u_int8_t idx) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); u_int8_t zero = 0x00; oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 3, NM_MT_BS11_CREATE_OBJ, NM_OC_BS11_ENVABTSE, 0, idx, 0xff); msgb_tlv_put(msg, 0x99, 1, &zero); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_create_bport(struct gsm_bts *bts, u_int8_t idx) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 0, NM_MT_BS11_CREATE_OBJ, NM_OC_BS11_BPORT, idx, 0, 0); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_set_oml_tei(struct gsm_bts *bts, u_int8_t tei) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 2, NM_MT_BS11_SET_ATTR, NM_OC_SITE_MANAGER, 0xff, 0xff, 0xff); msgb_tv_put(msg, NM_ATT_TEI, tei); return abis_nm_sendmsg(bts, msg); } /* like abis_nm_conn_terr_traf */ int abis_nm_bs11_conn_oml(struct gsm_bts *bts, u_int8_t e1_port, u_int8_t e1_timeslot, u_int8_t e1_subslot) { struct abis_om_hdr *oh; struct abis_nm_channel *ch; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, sizeof(*ch), NM_MT_BS11_SET_ATTR, NM_OC_SITE_MANAGER, 0xff, 0xff, 0xff); ch = (struct abis_nm_channel *) msgb_put(msg, sizeof(*ch)); fill_nm_channel(ch, e1_port, e1_timeslot, e1_subslot); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_set_trx_power(struct gsm_bts_trx *trx, u_int8_t level) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 3, NM_MT_BS11_SET_ATTR, NM_OC_BS11, BS11_OBJ_PA, 0x00, trx->nr); msgb_tlv_put(msg, NM_ATT_BS11_TXPWR, 1, &level); return abis_nm_sendmsg(trx->bts, msg); } //static const u_int8_t bs11_logon_c7[] = { 0x07, 0xd9, 0x01, 0x11, 0x0d, 0x10, 0x20 }; static const u_int8_t bs11_logon_c8[] = { 0x02 }; static const u_int8_t bs11_logon_c9[] = "FACTORY"; int abis_nm_bs11_factory_logon(struct gsm_bts *bts, int on) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); struct bs11_date_time bdt; get_bs11_date_time(&bdt); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); if (on) { u_int8_t len = 3*2 + sizeof(bdt) + sizeof(bs11_logon_c8) + sizeof(bs11_logon_c9); fill_om_fom_hdr(oh, len, NM_MT_BS11_LMT_LOGON, NM_OC_BS11_A3, 0xff, 0xff, 0xff); msgb_tlv_put(msg, NM_ATT_BS11_LMT_LOGIN_TIME, sizeof(bdt), &bdt); msgb_tlv_put(msg, NM_ATT_BS11_LMT_USER_ACC_LEV, sizeof(bs11_logon_c8), bs11_logon_c8); msgb_tlv_put(msg, NM_ATT_BS11_LMT_USER_NAME, sizeof(bs11_logon_c9), bs11_logon_c9); } else { fill_om_fom_hdr(oh, 0, NM_MT_BS11_LMT_LOGOFF, NM_OC_BS11_A3, 0xff, 0xff, 0xff); } return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_set_trx1_pw(struct gsm_bts *bts, const char *password) { struct abis_om_hdr *oh; struct msgb *msg; if (strlen(password) != 10) return -EINVAL; msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); fill_om_fom_hdr(oh, 2+strlen(password), NM_MT_BS11_SET_ATTR, NM_OC_BS11, BS11_OBJ_TRX1, 0x00, 0x00); msgb_tlv_put(msg, NM_ATT_BS11_PASSWORD, 10, (const u_int8_t *)password); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_get_state(struct gsm_bts *bts) { return __simple_cmd(bts, NM_MT_BS11_GET_STATE); } /* BS11 SWL */ struct abis_nm_bs11_sw { struct gsm_bts *bts; char swl_fname[PATH_MAX]; u_int8_t win_size; struct llist_head file_list; gsm_cbfn *user_cb; /* specified by the user */ }; static struct abis_nm_bs11_sw _g_bs11_sw, *g_bs11_sw = &_g_bs11_sw; struct file_list_entry { struct llist_head list; char fname[PATH_MAX]; }; struct file_list_entry *fl_dequeue(struct llist_head *queue) { struct llist_head *lh; if (llist_empty(queue)) return NULL; lh = queue->next; llist_del(lh); return llist_entry(lh, struct file_list_entry, list); } static int bs11_read_swl_file(struct abis_nm_bs11_sw *bs11_sw) { char linebuf[255]; struct llist_head *lh, *lh2; FILE *swl; int rc = 0; swl = fopen(bs11_sw->swl_fname, "r"); if (!swl) return -ENODEV; /* zero the stale file list, if any */ llist_for_each_safe(lh, lh2, &bs11_sw->file_list) { llist_del(lh); free(lh); } while (fgets(linebuf, sizeof(linebuf), swl)) { char file_id[12+1]; char file_version[80+1]; struct file_list_entry *fle; static char dir[PATH_MAX]; if (strlen(linebuf) < 4) continue; printf("linebuf='%s'\n", linebuf); rc = sscanf(linebuf+4, "%12s:%80s\r\n", file_id, file_version); if (rc < 0) { perror("ERR parsing SWL file"); rc = -EINVAL; goto out; } if (rc < 2) continue; fle = malloc(sizeof(*fle)); if (!fle) { rc = -ENOMEM; goto out; } memset(fle, 0, sizeof(*fle)); /* construct new filename */ strncpy(dir, bs11_sw->swl_fname, sizeof(dir)); strncat(fle->fname, dirname(dir), sizeof(fle->fname) - 1); strcat(fle->fname, "/"); strncat(fle->fname, file_id, sizeof(fle->fname) - 1 -strlen(fle->fname)); printf("fname='%s'\n", fle->fname); llist_add_tail(&fle->list, &bs11_sw->file_list); } out: fclose(swl); return rc; } /* bs11 swload specific callback, passed to abis_nm core swload */ static int bs11_swload_cbfn(unsigned int hook, unsigned int event, struct msgb *msg, void *data, void *param) { struct abis_nm_bs11_sw *bs11_sw = data; struct file_list_entry *fle; int rc = 0; printf("bs11_swload_cbfn(%u, %u, %p, %p, %p)\n", hook, event, msg, data, param); switch (event) { case NM_MT_LOAD_END_ACK: fle = fl_dequeue(&bs11_sw->file_list); if (fle) { /* start download the next file of our file list */ rc = abis_nm_software_load(bs11_sw->bts, fle->fname, bs11_sw->win_size, &bs11_swload_cbfn, bs11_sw); free(fle); } else { /* activate the SWL */ rc = abis_nm_software_activate(bs11_sw->bts, bs11_sw->swl_fname, bs11_swload_cbfn, bs11_sw); } break; case NM_MT_LOAD_END_NACK: case NM_MT_LOAD_INIT_ACK: case NM_MT_LOAD_INIT_NACK: case NM_MT_ACTIVATE_SW_NACK: case NM_MT_ACTIVATE_SW_ACK: default: /* fallthrough to the user callback */ rc = bs11_sw->user_cb(hook, event, msg, NULL, NULL); break; } return rc; } /* Siemens provides a SWL file that is a mere listing of all the other * files that are part of a software release. We need to upload first * the list file, and then each file that is listed in the list file */ int abis_nm_bs11_load_swl(struct gsm_bts *bts, const char *fname, u_int8_t win_size, gsm_cbfn *cbfn) { struct abis_nm_bs11_sw *bs11_sw = g_bs11_sw; struct file_list_entry *fle; int rc = 0; INIT_LLIST_HEAD(&bs11_sw->file_list); bs11_sw->bts = bts; bs11_sw->win_size = win_size; bs11_sw->user_cb = cbfn; strncpy(bs11_sw->swl_fname, fname, sizeof(bs11_sw->swl_fname)); rc = bs11_read_swl_file(bs11_sw); if (rc < 0) return rc; /* dequeue next item in file list */ fle = fl_dequeue(&bs11_sw->file_list); if (!fle) return -EINVAL; /* start download the next file of our file list */ rc = abis_nm_software_load(bts, fle->fname, win_size, bs11_swload_cbfn, bs11_sw); free(fle); return rc; } static u_int8_t req_attr_btse[] = { NM_ATT_ADM_STATE, NM_ATT_BS11_LMT_LOGON_SESSION, NM_ATT_BS11_LMT_LOGIN_TIME, NM_ATT_BS11_LMT_USER_ACC_LEV, NM_ATT_BS11_LMT_USER_NAME, 0xaf, NM_ATT_BS11_RX_OFFSET, NM_ATT_BS11_VENDOR_NAME, NM_ATT_BS11_SW_LOAD_INTENDED, NM_ATT_BS11_SW_LOAD_SAFETY, NM_ATT_BS11_SW_LOAD_STORED }; static u_int8_t req_attr_btsm[] = { NM_ATT_ABIS_CHANNEL, NM_ATT_TEI, NM_ATT_BS11_ABIS_EXT_TIME, NM_ATT_ADM_STATE, NM_ATT_AVAIL_STATUS, 0xce, NM_ATT_FILE_ID, NM_ATT_FILE_VERSION, NM_ATT_OPER_STATE, 0xe8, NM_ATT_BS11_ALL_TEST_CATG, NM_ATT_SW_DESCR, NM_ATT_GET_ARI }; static u_int8_t req_attr[] = { NM_ATT_ADM_STATE, NM_ATT_AVAIL_STATUS, 0xa8, NM_ATT_OPER_STATE, 0xd5, 0xa1, NM_ATT_BS11_ESN_FW_CODE_NO, NM_ATT_BS11_ESN_HW_CODE_NO, 0x42, NM_ATT_BS11_ESN_PCB_SERIAL }; int abis_nm_bs11_get_serno(struct gsm_bts *bts) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); /* SiemensHW CCTRL object */ fill_om_fom_hdr(oh, 2+sizeof(req_attr), NM_MT_GET_ATTR, NM_OC_BS11, 0x03, 0x00, 0x00); msgb_tlv_put(msg, NM_ATT_LIST_REQ_ATTR, sizeof(req_attr), req_attr); return abis_nm_sendmsg(bts, msg); } int abis_nm_bs11_set_ext_time(struct gsm_bts *bts) { struct abis_om_hdr *oh; struct msgb *msg = nm_msgb_alloc(); struct bs11_date_time aet; get_bs11_date_time(&aet); oh = (struct abis_om_hdr *) msgb_put(msg, ABIS_OM_FOM_HDR_SIZE); /* SiemensHW CCTRL object */ fill_om_fom_hdr(oh, 2+sizeof(aet), NM_MT_BS11_SET_ATTR, NM_OC_SITE_MANAGER, 0xff, 0xff, 0xff); msgb_tlv_put(msg, NM_ATT_BS11_ABIS_EXT_TIME, sizeof(aet), &aet); return abis_nm_sendmsg(bts, msg); }