Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 1 | /* ip.access nanoBTS network listen mode */ |
| 2 | |
| 3 | /* (C) 2009-2010 by Harald Welte <laforge@gnumonks.org> |
| 4 | * |
| 5 | * All Rights Reserved |
| 6 | * |
| 7 | * This program is free software; you can redistribute it and/or modify |
| 8 | * it under the terms of the GNU General Public License as published by |
| 9 | * the Free Software Foundation; either version 2 of the License, or |
| 10 | * (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 along |
| 18 | * with this program; if not, write to the Free Software Foundation, Inc., |
| 19 | * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. |
| 20 | * |
| 21 | */ |
| 22 | |
| 23 | #include <unistd.h> |
| 24 | #include <stdio.h> |
| 25 | #include <stdlib.h> |
| 26 | #include <string.h> |
| 27 | #include <errno.h> |
| 28 | #include <stdint.h> |
| 29 | |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 30 | #include <arpa/inet.h> |
| 31 | |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 32 | #include <osmocore/talloc.h> |
| 33 | #include <osmocore/timer.h> |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 34 | #include <osmocore/rxlev_stat.h> |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 35 | |
| 36 | #include <openbsc/gsm_data.h> |
| 37 | #include <openbsc/abis_nm.h> |
| 38 | #include <openbsc/signal.h> |
| 39 | #include <openbsc/debug.h> |
| 40 | |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 41 | #define WHITELIST_MAX_SIZE ((NUM_ARFCNS*2)+2+1) |
| 42 | |
Harald Welte | c95cf10 | 2010-07-22 20:12:09 +0200 | [diff] [blame] | 43 | int ipac_rxlevstat2whitelist(uint16_t *buf, const struct rxlev_stats *st, uint8_t min_rxlev, |
| 44 | uint16_t max_num_arfcns) |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 45 | { |
| 46 | int i; |
| 47 | unsigned int num_arfcn = 0; |
| 48 | |
Harald Welte | c95cf10 | 2010-07-22 20:12:09 +0200 | [diff] [blame] | 49 | for (i = NUM_RXLEVS-1; i >= min_rxlev; i--) { |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 50 | int16_t arfcn = -1; |
| 51 | |
| 52 | while ((arfcn = rxlev_stat_get_next(st, i, arfcn)) >= 0) { |
| 53 | *buf++ = htons(arfcn); |
| 54 | num_arfcn++; |
Harald Welte | c95cf10 | 2010-07-22 20:12:09 +0200 | [diff] [blame] | 55 | |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 56 | } |
Harald Welte | c95cf10 | 2010-07-22 20:12:09 +0200 | [diff] [blame] | 57 | |
| 58 | if (num_arfcn > max_num_arfcns) |
| 59 | break; |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 60 | } |
| 61 | |
| 62 | return num_arfcn; |
| 63 | } |
| 64 | |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 65 | enum ipac_test_state { |
| 66 | IPAC_TEST_S_IDLE, |
| 67 | IPAC_TEST_S_RQD, |
| 68 | IPAC_TEST_S_EXEC, |
| 69 | IPAC_TEST_S_PARTIAL, |
| 70 | }; |
| 71 | |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 72 | int ipac_nwl_test_start(struct gsm_bts_trx *trx, uint8_t testnr, |
| 73 | const uint8_t *phys_conf, unsigned int phys_conf_len) |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 74 | { |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 75 | struct msgb *msg; |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 76 | |
| 77 | if (trx->ipaccess.test_state != IPAC_TEST_S_IDLE) { |
| 78 | fprintf(stderr, "Cannot start test in state %u\n", trx->ipaccess.test_state); |
| 79 | return -EINVAL; |
| 80 | } |
| 81 | |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 82 | switch (testnr) { |
| 83 | case NM_IPACC_TESTNO_CHAN_USAGE: |
Harald Welte | a0b0f36 | 2010-03-09 22:35:37 +0100 | [diff] [blame] | 84 | case NM_IPACC_TESTNO_BCCH_CHAN_USAGE: |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 85 | rxlev_stat_reset(&trx->ipaccess.rxlev_stat); |
| 86 | break; |
| 87 | } |
| 88 | |
| 89 | msg = msgb_alloc_headroom(phys_conf_len+256, 128, "OML"); |
| 90 | |
| 91 | if (phys_conf && phys_conf_len) { |
| 92 | uint8_t *payload; |
| 93 | /* first put the phys conf header */ |
| 94 | msgb_tv16_put(msg, NM_ATT_PHYS_CONF, phys_conf_len); |
| 95 | payload = msgb_put(msg, phys_conf_len); |
| 96 | memcpy(payload, phys_conf, phys_conf_len); |
| 97 | } |
| 98 | |
| 99 | abis_nm_perform_test(trx->bts, NM_OC_RADIO_CARRIER, 0, trx->nr, 0xff, |
| 100 | testnr, 1, msg); |
Harald Welte | a0b0f36 | 2010-03-09 22:35:37 +0100 | [diff] [blame] | 101 | trx->ipaccess.test_nr = testnr; |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 102 | |
| 103 | /* FIXME: start safety timer until when test is supposed to complete */ |
| 104 | |
| 105 | return 0; |
| 106 | } |
| 107 | |
| 108 | struct ipacc_ferr_elem { |
| 109 | int16_t freq_err; |
| 110 | uint8_t freq_qual; |
| 111 | uint8_t arfcn; |
| 112 | } __attribute__((packed)); |
| 113 | |
| 114 | struct ipacc_cusage_elem { |
| 115 | uint16_t arfcn:10, |
| 116 | rxlev:6; |
| 117 | } __attribute__ ((packed)); |
| 118 | |
| 119 | static int test_rep(void *_msg) |
| 120 | { |
| 121 | struct msgb *msg = _msg; |
| 122 | struct abis_om_fom_hdr *foh = msgb_l3(msg); |
| 123 | uint16_t test_rep_len, ferr_list_len; |
| 124 | struct ipacc_ferr_elem *ife; |
| 125 | struct ipac_bcch_info binfo; |
| 126 | int i, rc; |
| 127 | |
| 128 | DEBUGP(DNM, "TEST REPORT: "); |
| 129 | |
| 130 | if (foh->data[0] != NM_ATT_TEST_NO || |
| 131 | foh->data[2] != NM_ATT_TEST_REPORT) |
| 132 | return -EINVAL; |
| 133 | |
| 134 | DEBUGPC(DNM, "test_no=0x%02x ", foh->data[1]); |
| 135 | /* data[2] == NM_ATT_TEST_REPORT */ |
| 136 | /* data[3..4]: test_rep_len */ |
| 137 | test_rep_len = ntohs(*(uint16_t *) &foh->data[3]); |
| 138 | /* data[5]: ip.access test result */ |
| 139 | DEBUGPC(DNM, "tst_res=%s\n", ipacc_testres_name(foh->data[5])); |
| 140 | |
| 141 | /* data[6]: ip.access nested IE. 3 == freq_err_list */ |
| 142 | switch (foh->data[6]) { |
| 143 | case NM_IPAC_EIE_FREQ_ERR_LIST: |
| 144 | /* data[7..8]: length of ferr_list */ |
| 145 | ferr_list_len = ntohs(*(uint16_t *) &foh->data[7]); |
| 146 | |
| 147 | /* data[9...]: frequency error list elements */ |
| 148 | for (i = 0; i < ferr_list_len; i+= sizeof(*ife)) { |
| 149 | ife = (struct ipacc_ferr_elem *) (foh->data + 9 + i); |
| 150 | DEBUGP(DNM, "==> ARFCN %4u, Frequency Error %6hd\n", |
| 151 | ife->arfcn, ntohs(ife->freq_err)); |
| 152 | } |
| 153 | break; |
| 154 | case NM_IPAC_EIE_CHAN_USE_LIST: |
| 155 | /* data[7..8]: length of ferr_list */ |
| 156 | ferr_list_len = ntohs(*(uint16_t *) &foh->data[7]); |
| 157 | |
| 158 | /* data[9...]: channel usage list elements */ |
| 159 | for (i = 0; i < ferr_list_len; i+= 2) { |
| 160 | uint16_t *cu_ptr = (uint16_t *)(foh->data + 9 + i); |
| 161 | uint16_t cu = ntohs(*cu_ptr); |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 162 | uint16_t arfcn = cu & 0x3ff; |
| 163 | uint8_t rxlev = cu >> 10; |
| 164 | DEBUGP(DNM, "==> ARFCN %4u, RxLev %2u\n", arfcn, rxlev); |
| 165 | rxlev_stat_input(&msg->trx->ipaccess.rxlev_stat, |
| 166 | arfcn, rxlev); |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 167 | } |
| 168 | break; |
| 169 | case NM_IPAC_EIE_BCCH_INFO_TYPE: |
| 170 | break; |
| 171 | case NM_IPAC_EIE_BCCH_INFO: |
| 172 | rc = ipac_parse_bcch_info(&binfo, foh->data+6); |
| 173 | if (rc < 0) { |
| 174 | DEBUGP(DNM, "BCCH Info parsing failed\n"); |
| 175 | break; |
| 176 | } |
| 177 | DEBUGP(DNM, "==> ARFCN %u, RxLev %2u, RxQual %2u: %3d-%d, LAC %d CI %d\n", |
| 178 | binfo.arfcn, binfo.rx_lev, binfo.rx_qual, |
| 179 | binfo.cgi.mcc, binfo.cgi.mnc, |
| 180 | binfo.cgi.lac, binfo.cgi.ci); |
Harald Welte | 5eed0a2 | 2010-07-22 21:17:33 +0200 | [diff] [blame] | 181 | if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2) |
| 182 | DEBUGP(DNM, "BA SI2: %s\n", hexdump(binfo.ba_list_si2, sizeof(binfo.ba_list_si2))); |
| 183 | if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2bis) |
| 184 | DEBUGP(DNM, "BA SI2bis: %s\n", hexdump(binfo.ba_list_si2bis, sizeof(binfo.ba_list_si2bis))); |
| 185 | if (binfo.info_type & IPAC_BINF_NEIGH_BA_SI2ter) |
| 186 | DEBUGP(DNM, "BA SI2ter: %s\n", hexdump(binfo.ba_list_si2ter, sizeof(binfo.ba_list_si2ter))); |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 187 | break; |
| 188 | default: |
| 189 | break; |
| 190 | } |
| 191 | |
| 192 | switch (foh->data[5]) { |
| 193 | case NM_IPACC_TESTRES_SUCCESS: |
| 194 | case NM_IPACC_TESTRES_STOPPED: |
| 195 | case NM_IPACC_TESTRES_TIMEOUT: |
| 196 | case NM_IPACC_TESTRES_NO_CHANS: |
| 197 | msg->trx->ipaccess.test_state = IPAC_TEST_S_IDLE; |
| 198 | /* Send signal to notify higher layers of test completion */ |
Harald Welte | 887deab | 2010-03-06 11:38:05 +0100 | [diff] [blame] | 199 | DEBUGP(DNM, "dispatching S_IPAC_NWL_COMPLETE signal\n"); |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 200 | dispatch_signal(SS_IPAC_NWL, S_IPAC_NWL_COMPLETE, msg->trx); |
| 201 | break; |
| 202 | case NM_IPACC_TESTRES_PARTIAL: |
| 203 | msg->trx->ipaccess.test_state = IPAC_TEST_S_PARTIAL; |
| 204 | break; |
| 205 | } |
| 206 | |
| 207 | return 0; |
| 208 | } |
| 209 | |
| 210 | static int nwl_sig_cb(unsigned int subsys, unsigned int signal, |
| 211 | void *handler_data, void *signal_data) |
| 212 | { |
Harald Welte | 549faad | 2010-03-05 19:36:20 +0100 | [diff] [blame] | 213 | switch (signal) { |
| 214 | case S_NM_TEST_REP: |
| 215 | return test_rep(signal_data); |
| 216 | default: |
| 217 | break; |
| 218 | } |
| 219 | |
| 220 | return 0; |
| 221 | } |
| 222 | |
| 223 | void ipac_nwl_init(void) |
| 224 | { |
| 225 | register_signal_handler(SS_NM, nwl_sig_cb, NULL); |
| 226 | } |