diff options
Diffstat (limited to 'gsmdecode/src/data_out.c')
| -rw-r--r-- | gsmdecode/src/data_out.c | 3508 |
1 files changed, 3508 insertions, 0 deletions
diff --git a/gsmdecode/src/data_out.c b/gsmdecode/src/data_out.c new file mode 100644 index 0000000..a419f58 --- /dev/null +++ b/gsmdecode/src/data_out.c @@ -0,0 +1,3508 @@ +/* + * TODO: memcpy for concatendated sms is unchecked. + */ +#include "common.h" +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +//#include <arpa/inet.h> +//#include <netinet/in.h> +#include "id_list.h" +#include "gsm_desc.h" + +#define OUTF(a...) do { \ + printf(" %3d: %02x ", (int)(data - start), data[0]); \ + printf(a); \ +} while (0) + +#define OUT(a...) do { \ + printf(a); \ +} while (0) + +#define RETTRUNK() do { \ + printf("%s:%d TRUNKATED (0x%p - 0x%p)\n", __func__, __LINE__, data, end); \ + return; \ +} while (0) + +extern struct _opt opt; + +static void l2_rrm(); +static void l2_sms(); +static void l2_cc(); +static void l2_RRsystemInfo1(); +static void l2_MccMncLac(); +static void l2_RRsystemInfo2(); +//static void l2_RRsystemInfo2ter(); +static void l2_RRsystemInfo3C(); +static void l2_RRsystemInfo4C(); +static void l2_RRsystemInfo6(); +static void l2_RRsystemInfo13C(); +static void l2_RRimmediateAssTBFC(); +static void l2_RRassignCommand(); +static void l2_RRassignComplete(); +static void l2_RRpagingrequest1(); +static void l2_RRpagingrequest2(); +static void l2_RRpagingrequest3(); +static void l2_RRimmediateAssignment(); +static void l2_RRimmAssTBFDirEncHoChaC(); +static void l2_MobId(); +static void l2_mmm(); +static void l2_HoppingChannel(); +static void l2_HoppingChannelC(); +static void l2_SingleChannel(); +static void l2_SingleChannelC(); +static void l2_HoppingChannelAssCom(); +static void l2_SingleChannelAssCom(); +static void l2_MobileAllocation(); +static void l2_BcchAllocation(); +static void l2_TmsiReallocCommand(); +static void l2_RachControlParameters(); +static void l2_bcc(); +static void l2_Bbis(); +static void l2_ChannelRelease(); +static void l2_MMcmServiceRequest(); +static void l2_RRciphModCmd(); +static void l2_RRciphModCompl(); +static void l2_RRpagingresponse(); +static void l2_RRclassmarkChange(); +static void l2_NonCallSS(); +static void l2_FacilityRegister(); +static void l2_FacilityInvoke(); +static void l2_Facility(); +static void l2_FacilityReturnResult(); +static void l2_UssRequest(); +static void l2_UssData(); +static void l2_CCReleaseComplete(); + +static void l2_ChannelNeeded(char *str, unsigned char ch); +static void l2_MNCC(const char *str, unsigned char a, unsigned char b, unsigned char c); + +static char *BitRow(unsigned char c, int pos); +static char *PageMode(unsigned char mode); +static char *BitRowFill(unsigned char c, unsigned char mask); + +static void dcch_address(); +static void dcch_control(); +static void ControlChannelDescription(); +static void CellOptionsBcch(); +static void CellSelectionParameters(); +static void RequestReference(); +static void TimingAdvance(); +static void StartingTime(); +static void TypeOfIdentity(); +static void l2_NeighbourCellDescription(); +static void CellIdentity(); +static void MSClassMarkTwo(); +static void MSClassMarkOne(); +static void ClassMarkThree(); +static void cpData(); +static void Address(const char *str); +static void TPAddress(const char *str); +static void ChannelDescriptionTwo(); +static void CCalerting(); +static void CCsetup(); +static void ProgressIndicator(); +static void Cause(); +static void SmsProtocolDataValidity(); +static void BearerCap(); +static void BCDNumber(); +static void AuthenticationRequest(); +static void AuthenticationResponse(); +static void sms_dcs(); +static void sms_udh(); +static void sms_default_alphabet(); +static void SmscTimestamp(); +static void simdatadownload(); +static void LocationUpdateRequest(); +static void MultiSupportTwo(); +static void MeasurmentReport(); + +static const unsigned char *start; +static const unsigned char *data; +static const unsigned char *end; + +struct _nfo +{ + unsigned int flags; + unsigned char seq_counter; + unsigned char sapi; +}; +#define GSMSP_NFO_SMS (0x01) +#define GSMSP_NFO_SEGMENTATION (0x02) +#define GSMSP_NFO_UDHI (0x04) +#define GSMSP_NFO_DEFAULTALPHABET (0x08) +#define GSMSP_NFO_SIMDATADL (0x10) /* Sim Data Download */ +#define GSMSP_NFO_SMSCON (0x20) /* Concatenated SMS */ +#define GSMSP_NFO_LASTSMSCHUNK (0x40) + +static struct _nfo nfo; + +#if 0 +struct _sms +{ + unsigned char buf[248 + 3]; + unsigned char *ptr; +}; +#endif + +/* For concatenating SMS'es */ +struct _sms_con +{ + unsigned char buf[8192]; + unsigned char *ptr; +}; + +struct _con +{ + unsigned char buf[248 + 3]; + unsigned char *ptr; +}; +/* Is initialized to 0 (do not remove from .bss) */ +static struct _sms_con sms_con; + +struct _con con[8]; +struct _con *conptr; + + + +/* + * B-format (and also A-Format) + */ +void +l2_data_out_B(int fn, const unsigned char *input_data, int len) +{ + const unsigned char *from; + data = input_data; + start = data; + end = data + len; + HEXDUMPF(data, 23 /*len*/, "Format B DATA\n"); + /* Need at least 3 octets */ + if (data + 2 >= end) + RETTRUNK(); + + memset(&nfo, 0, sizeof nfo); + dcch_address(); + data++; + dcch_control(); + data++; + /* FIXME: Why is extended length always set to 1? */ + OUTF("%s EL, Extended Length: %s\n", BitRow(data[0], 0), (data[0] & 1)?"y":"n"); + OUTF("%s M, segmentation: %c\n", BitRow(data[0], 1), ((data[0] >> 1) & 1)?'Y':'N'); + if ((data[0] >> 1) & 1) + nfo.flags |= GSMSP_NFO_SEGMENTATION; + + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xfc), data[0] >> 2); + if (data + (data[0] >> 2) < end) + end = data + (data[0] >> 2) + 1; + + data++; + if (data >= end) + return; + + /* Initialization. have to do this only once but there + * is no better place to do it atm + */ + if (conptr->ptr == NULL) + conptr->ptr = conptr->buf; + + /* Chunk of a fragmented. */ + /* All SMS type messages go into the same buffer. + * Other segmented messages are currently not supported. + */ + //if (nfo.flags & GSMSP_NFO_SMS) + if ((conptr->ptr > conptr->buf) || (nfo.flags & GSMSP_NFO_SEGMENTATION)) + { + from = data; + + if (conptr->ptr + (end - data) < conptr->buf + sizeof conptr->buf) + { + memcpy(conptr->ptr, data, end - data); + conptr->ptr += (end - data); + } else { + OUTF("ERROR, buffer to small!!!\n"); + OUTF("buf: %p, ptr %p, filled: %d len %d\n", conptr->buf, conptr->ptr, conptr->ptr - conptr->buf, end - from); + } + } + + if (nfo.flags & GSMSP_NFO_SEGMENTATION) + { + OUTF("-------- [MORE DATA FOLLOWS...]\n"); + /* More fragments follow. No need to decode yet */ + return; + } + + /* Here: segmentation == No */ + /* See if we get an SMS message and if this was the last fragment */ + if (conptr->ptr > conptr->buf) + { + start = conptr->buf; + data = conptr->buf; + end = conptr->ptr; + if (nfo.flags & GSMSP_NFO_SMS) + HEXDUMPF(data, end - data, "Format SMS data\n"); + else + HEXDUMPF(data, end - data, "Format Bbis (RR, MM or CC)\n"); + l2_Bbis(); + conptr->ptr = conptr->buf; + return; + } + + + l2_Bbis(); + +} + +static void +dcch_control() +{ + if ((data[0] & 0x03) != 3) + { + if ((data[0] & 1) == 0) + { + OUTF("-------0 Information Frame\n"); + OUTF("%s N(S), Sequence counter: %u\n", BitRowFill(data[0], 0x0e), (data[0] >> 1) & 0x07); + nfo.seq_counter = ((data[0] >> 1) & 0x07); + OUTF("%s P\n", BitRow(data[0], 4)); + } else if ((data[0] & 0x03) == 1) { + OUTF("------01 Supvervisory Frame\n"); + if (((data[0] >> 2) & 0x03) == 0) + OUTF("----00-- RR Frame (Receive ready)\n"); + else if (((data[0] >> 2) & 0x03) == 1) + OUTF("----01-- RNR Frame (Receive not ready)\n"); + else if (((data[0] >> 2) & 0x03) == 2) + OUTF("----10-- REJ Frame (REJect)\n"); + else + OUTF("----11-- UNKNOWN\n"); + OUTF("%s Poll/Final bit (P/F)\n", BitRow(data[0], 4)); + } + OUTF("%s N(R), Retransmission counter: %u\n", BitRowFill(data[0], 0xe0), (data[0] >> 5) & 0x07); + return; + } + OUTF("------11 Unnumbered Frame\n"); + switch (data[0] & 0xec) /* 11101100 */ + { + case 0x2c: /* 001-11-- According to J.Goeller this is SABM */ + case 0x6c: /* 011-11-- */ + OUTF("%s P\n", BitRow(data[0], 4)); + OUTF("011-11-- SABM frame (Set asynchonous balance mode)\n"); + break; + case 0x0c: /* 000-11-- */ + OUTF("%s F\n", BitRow(data[0], 4)); + OUTF("000-11-- DM frame (Disconnected mode)\n"); + break; + case 0x00: + OUTF("%s P\n", BitRow(data[0], 4)); + OUTF("000-00-- UI frame (Unnumbered information)\n"); + break; + case 0x40: + OUTF("%s P\n", BitRow(data[0], 4)); + OUTF("010-00-- DISC frame (DISConnect)\n"); + break; + case 0x60: + OUTF("%s P\n", BitRow(data[0], 4)); + OUTF("011-00-- UA frame (Unnumbered acknowledgement)\n"); + break; + default: + OUTF("%s P/F\n", BitRow(data[0], 4)); + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xec)); + break; + } +} + +static void +dcch_address() +{ + if (data[0] & 1) + OUTF("-------1 Extended Address: 1 octet long\n"); + else + OUTF("-------0 Extended Address: more octets follow\n"); + + if ((data[0] >> 1) & 1) + OUTF("------1- C/R: Command\n"); + else + OUTF("------0- C/R: Response\n"); + + if (data[0] & 1) + { + /* SAPI */ + nfo.sapi = (data[0] >> 2) & 0x07; + conptr = &con[nfo.sapi]; + switch ((data[0] >> 2) & 0x07) + { + case 0x03: + nfo.flags |= GSMSP_NFO_SMS; + OUTF("---011-- SAPI: SMS and SS\n"); + break; + case 0x00: + OUTF("---000-- SAPI: RR, MM and CC\n"); + break; + default: + OUTF("%s SAPI: UNKNWON\n", BitRowFill(data[0], 0x1c)); + break; + } + + switch ((data[0] >> 4 ) & 0x03) + { + case 0x00: + OUTF("%s Link Protocol Disciminator: GSM (not Cell Broadcasting)\n", BitRowFill(data[0], 0x60)); + break; + case 0x01: + OUTF("%s Link Protocol Disciminator: Cell Broadcasting (CBS)\n", BitRowFill(data[0], 0x60)); + break; + default: + OUTF("%s Link Protocol Disciminator: UNKNOWN %u\n", BitRowFill(data[0], 0x60), (data[0] >> 5) & 0x03); + } + } else { + switch ((data[0] >> 2)) + { + case 0x03: + nfo.flags |= GSMSP_NFO_SMS; + OUTF("000011-- SAPI: SMS and SS\n"); + break; + case 0x00: + OUTF("000000-- SAPI: RR, MM and CC\n"); + break; + default: + OUTF("%s SAPI: UNKNOWN\n", BitRowFill(data[0], 0xfc)); + break; + } + data++; + if (data >= end) + RETTRUNK(); + if (data[0] & 1) + OUTF("-------1 Extended Address: 1 octet long\n"); + else + OUTF("-------0 Extended Address: more octets follow [ERROR]\n"); + OUTF("%s Terminal Endpoint Identifier (TEI): %u\n", BitRowFill(data[0], 0xfe), data[0] >> 1); + } +} + +void +l2_data_out_Bbis(int fn, const unsigned char *input_data, int len) +{ + int i; + + + memset(&nfo, 0, sizeof nfo); + if (len <= 0) + return; + + data = input_data; + start = data; + + /* 2008-01-05: Motorola output has Length field wrongly set.. */ + if (opt.flags & FL_MOTOROLA) + i = data[0]; + else + i = data[0] >> 2; + if (len - 1 < i) + OUTF("WARN: packet to short\n"); + + len = MIN(len - 1, i); + + /* len = number of octets following the length field */ + end = data + len + 1; + + HEXDUMPF(data, 23 /*len*/, "Format Bbis DATA\n"); + if (len <= 0) + return; + + OUTF("%s Pseudo Length: %d\n", BitRowFill(data[0], 0xfc), data[0] >> 2); + data++; + l2_Bbis(); +} + +static void +l2_Bbis() /* GSM 04.07 11.2.3.2.1 */ +{ + if (data >= end) + RETTRUNK(); + + switch (data[0] >> 7) + { + case 1: + OUTF("1------- Direction: To originating site\n"); + break; + default: + OUTF("0------- Direction: From originating site\n"); + } + + OUTF("%s %d TransactionID\n", BitRowFill(data[0], 0x70), (data[0] >> 4) & 7); + + switch (data[0] & 0x0f) + { + case 0: + OUTF("----0000 Group Call Control [FIXME]\n"); + break; + case 1: + OUTF("----0001 Broadcast call control [FIXME]\n"); + data++; + l2_bcc(); + /* TS GSM 04.69 */ + break; + case 2: + OUTF("----0010 PDSS1 [FIXME]\n"); + break; + case 3: + OUTF("----0011 Call control. call related SS messages\n"); + data++; + l2_cc(); + /* TS 24.008 */ + break; + case 4: + OUTF("----01-- PDSS2 [FIXME]\n"); + break; + case 5: + OUTF("----0101 Mobile Management Message (non GPRS)\n"); + data++; + /* TS 24.008 */ + l2_mmm(); + break; + case 6: + OUTF("----0110 Radio Resouce Management\n"); + data++; + l2_rrm(); + break; + case 7: + OUTF("----0111 RFU [FIXME]\n"); + break; + case 8: + OUTF("----1000 GPRS Mobile Management\n"); + /* in GMMattachAccept */ + /* in GMMidentityRequest */ + OUTF("FIXME: possible IMEI in here\n"); + break; + case 9: + OUTF("----1001 SMS messages\n"); + data++; + l2_sms(); + /* TS 04.11 */ + break; + case 0x0a: + OUTF("----1011 GRPS session management messages [FIXME]\n"); + break; + case 0x0b: + OUTF("----1011 Non-call related SS message\n"); + data++; + l2_NonCallSS(); + /* GSM 04.80 */ + break; + case 0x0c: + OUTF("----1100 Location services [FIXME]\n"); + break; + case 0x0d: + OUTF("----1101 RFU [FIXME]\n"); + break; + case 0x0e: + OUTF("----1110 Extension of the PD to one octet length [FIXME]\n"); + break; + case 0x0f: + OUTF("----1111 Tests procedures describe in TS GSM 11.10 [FIXME]\n"); + break; + default: + OUTF("%s 0x%02x UNKNOWN\n", BitRowFill(data[0], 0x0f), data[0] & 0x0f); + } + +} + +/* + * Broadcast Call Control (04.69) + */ +static void +l2_bcc() +{ + if (data >= end) + RETTRUNK(); + + /* Message type 04.69:9.3*/ + switch (data[0] & 0x3f) + { + case 0x06: /* 0-000110 */ + OUTF("--000110 ???\n"); + break; + default: + OUTF("--?????? UNKNOWN [FIXME]\n"); + return; + } + + /* Call reference 04.69:9.4.1*/ + + /* Orig indication 04.69:9.5.5*/ + /* Spare half octet 04.69:9.4.5*/ + +} + +/* + * ProtDisc3 + */ +static void +l2_cc() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Send Sequence Number: %u\n", BitRowFill(data[0], 0xc0), data[0] >> 6); + + if ((data[0] & 0x3f) == 0x01) + { + OUTF("--000001 Call Alerting\n"); + data++; + CCalerting(); + } else if ((data[0] & 0x3f) == 0x02) { + OUTF("--000010 Call Proceesing\n"); + if (++data >= end) + return; + OUTF("FIXME %s\n", __func__); + } else if ((data[0] & 0x3f) == 0x07) { + OUTF("--000111 Call Connect\n"); + if (++data >= end) + return; + OUTF("FIXME %s\n", __func__); + } else if ((data[0] & 0x3f) == 0x08) { + OUTF("--001000 Call Confirmed\n"); + if (++data >= end) + return; + if (data[0] != 0x04) + return; + OUTF("--000010 Bearer Capability\n"); + data++; + BearerCap(); + } else if ((data[0] & 0x3f) == 0x05) { + OUTF("--000101 Call Setup\n"); + data++; + CCsetup(); + } else if ((data[0] & 0x3f) == 0x03) { + OUTF("--000011 Call Progress\n"); + data++; + ProgressIndicator(); + } else if ((data[0] & 0x3f) == 0x0f) { + OUTF("--001111 Connect Acknowledge\n"); + } else if ((data[0] & 0x3f) == 0x25) { + OUTF("--100101 Disconnect\n"); + data++; + Cause(); + } else if ((data[0] & 0x3f) == 0x2d) { + OUTF("--101101 CC Release\n"); + if (++data >= end) + RETTRUNK(); + if (data[0] == 0x08) + { + data++; + Cause(); + } + } else if ((data[0] & 0x3f) == 0x2a) { + OUTF("--101010 CC Release Complete\n"); + if (++data >= end) + RETTRUNK(); + if (data[0] == 0x08) + { + data++; + Cause(); + } + if (data >= end) + RETTRUNK(); + if (data[0] == 0x1c) + { + /* facility */ + OUTF("FIXME\n"); + } + } else { + OUTF("%s FIXME %s\n", BitRowFill(data[0], 0xff), __func__); + } +} + +/* + * ----0101 + * ProtDisc5 - Mobile Management message (non GPRS) + */ +static void +l2_mmm() +{ + if (data >= end) + return; + OUTF("%s SendSequenceNumber: %d\n", BitRowFill(data[0], 0xc0), data[0] >> 6); + switch (data[0] & 0x3f) + { + case 1: + //l2_MMimsiDetIndication(data + 1, end); + OUTF("--000001 Imsi Det Indication\n"); /* FIXME */ + OUTF("FIXME: Possible IMSI in here\n"); + OUTF("FIXME: Possible cipher mode here\n"); + break; + case 2: + OUTF("--000010 Location Update Accept\n"); /* FIXME */ + break; + case 4: + OUTF("--000100 Message Type: Location Updating Reject\n"); + break; + case 8: + OUTF("--001000 MM Location Update Request\n"); /* FIXME */ + data++; + LocationUpdateRequest(); + break; + case 0x12: + OUTF("--010010 Authentication Request\n"); + data++; + AuthenticationRequest(); + break; + case 0x14: + OUTF("--010100 Authentication Response\n"); + data++; + AuthenticationResponse(); + break; + case 0x18: + OUTF("--011000 MMIdentityRequest\n"); + data++; + TypeOfIdentity(); + break; + case 0x19: + OUTF("--011001 MMidentityResponse\n"); + data++; + l2_MobId(); + break; + case 0x1a: + OUTF("--011010 TMSI Realloc Command\n"); + data++; + l2_TmsiReallocCommand(); + break; + case 0x21: + OUTF("--100001 CM Service Accept\n"); + data++; + break; + case 0x24: /* --100100 */ + OUTF("--100100 MMcmServiceRequest\n"); + data++; + l2_MMcmServiceRequest(); + /* in multisupport2 and others! */ + break; + default: + OUTF("UNKNOWN\n"); + } +} + +/* + * ProtDisc6 - Radio Resource Management Messages + */ +static void +l2_rrm() +{ + if (data >= end) + return; + + switch (data[0] & 0x3f) + { + case 0x00: + OUTF("00000000 System Information Type 13\n"); + data++; + l2_RRsystemInfo13C(); + break; + case 0x06: + OUTF("00000110 System Information Type 5ter\n"); + data++; + l2_BcchAllocation(); + break; + case 0x0d: + OUTF("00001101 Channel Release\n"); + data++; + l2_ChannelRelease(); + break; + case 0x15: + OUTF("00010101 RR Measurement Report C\n"); + data++; + MeasurmentReport(); + break; + case 0x16: + OUTF("00010110 RRclassmarkChange\n"); + data++; + l2_RRclassmarkChange(); + break; + case 0x19: + OUTF("00011001 RRsystemInfo1\n"); + data++; + l2_RRsystemInfo1(); + break; + case 0x1a: + OUTF("00011010 RRsystemInfo2\n"); + data++; + l2_RRsystemInfo2(); + break; + case 0x1B: /* 0001 1011 */ + OUTF("00011011 RRsystemInfo3C\n"); + data++; + l2_RRsystemInfo3C(); + break; + case 0x1c: + OUTF("00011100 RRsystemInfo4-C\n"); + data++; + l2_RRsystemInfo4C(); + break; + case 0x1d: + /* From SDCCH */ + OUTF("00011101 Neighbour Cells Description\n"); + data++; + l2_NeighbourCellDescription(); + break; + case 0x1e: + /* From SDCCH */ + OUTF("00011110 System Information Type 6\n"); + data++; + l2_RRsystemInfo6(); + break; + case 0x21: + OUTF("00100001 Paging Request Type 1\n"); + data++; + l2_RRpagingrequest1(); + break; + case 0x22: + OUTF("00100010 Paging Request Type 2\n"); + data++; + l2_RRpagingrequest2(); + break; + case 0x24: + OUTF("00100100 Paging Request Type 3\n"); + data++; + l2_RRpagingrequest3(); + break; + case 0x27: + OUTF("0-100111 RRpagingResponse\n"); + OUTF("-x------ Send sequence number: %d\n", (data[0] >> 7) & 0x01); + data++; + l2_RRpagingresponse(); + break; + case 0x29: + OUTF("0-101001 RR Assign Complete\n"); + data++; + l2_RRassignComplete(); + break; + case 0x2e: + OUTF("00101110 RR Assign Command\n"); + data++; + l2_RRassignCommand(); + break; + case 0x32: + OUTF("00110010 RR Cipher Mode Complete\n"); + data++; + l2_RRciphModCompl(); + break; + case 0x35: + OUTF("00110101 RR Cipher Mode Command\n"); + data++; + l2_RRciphModCmd(); + break; + case 0x3f: + OUTF("0-111111 RRimmediateAssignment\n"); + OUTF("-x------ Send sequence number: %d\n", (data[0] >> 7) & 0x01); + data++; + l2_RRimmediateAssignment(); + break; + default: + OUTF("???????? UNKNOWN. FIXME\n"); + } +} +static void +l2_RRsystemInfo13C() +{ + if (data >= end); + return; + if (data[0] >> 7) + OUTF("1------- SI 13 Restoctet present\n"); + else + OUTF("0------- SI 13 Restoctet NOT present\n"); + OUTF("%s BCCH_CHANGE_MARK : %d\n", BitRowFill(data[0], 0x70), (data[0] >> 4) & 0x07); + switch (data[0] & 0x0f) + { + case 0x00: + OUTF("----0000 SI_CHANGE_FIELD : Update of unspecified SI messages\n"); + break; + case 0x01: + OUTF("----00001 SI_CHANGE_FIELD : Update of unspecified SI1 messages\n"); + break; + case 0x02: + OUTF("----0010 SI_CHANGE_FIELD : Update of unspecified SI2 messages\n"); + break; + case 0x03: + OUTF("----0011 SI_CHANGE_FIELD : Update of unspecified SI3,4,7,8 messages\n"); + break; + case 0x04: + OUTF("----0100 SI_CHANGE_FIELD : Update of unspecified SI9 messages\n"); + break; + default: + OUTF("----???? Unknown %d\n", data[0] & 0x0f); + break; + } + OUTF("FIXME: implement me\n"); + +} + +static void +l2_RRimmediateAssignment() +{ + if (data >= end) + return; + + /* Octect 4, 0x79 */ + OUTF("%s\n", PageMode(data[0] & 0x03)); + + if ((data[0] >> 6) & 0x01) + OUTF("-1------ Two messages assign.: 1. message of..(continue)\n"); + else + OUTF("-0------ No meaning\n"); + if ((data[0] >> 5) & 0x01) + OUTF("--1----- Assigns a resource identified in the IA rest octets.\n"); + else + OUTF("--0----- Downlink assig to MS: No meaning\n"); + if ((data[0] >> 4) & 0x01) + { + OUTF("---1---- Temporary Block Flow (TBF)\n"); + data++; + l2_RRimmediateAssTBFC(); + return; + } + else + OUTF("---0---- This messages assigns a dedicated mode resource\n"); + data++; + if (data >= end) + return; + + /* Channel Description */ + ChannelDescriptionTwo(); + + if (data >= end) + return; + if (((data[0] >> 2) & 0x07) == 0) + l2_SingleChannel(); + else if (((data[0] >> 4) & 0x01) == 1) + { + l2_HoppingChannel(); + } else { + OUTF("xxx0??xxx UNKNOWN %d\n", (data[0] >> 3) & 0x3); + } +} + +static void +l2_SingleChannel() +{ + l2_SingleChannelC(); + RequestReference(); + TimingAdvance(); + l2_MobileAllocation(); + if (data >= end) + return; +} + +static void +l2_SingleChannelC() +{ + int freq; + if (data + 1 >= end) + RETTRUNK(); + OUTF("%s Training seq. code: %d\n", BitRowFill(data[0], 0xe0), data[0] >> 5); + OUTF("---0---- Single channel\n"); + freq = (data[0] & 0x03) << 8; + data++; + freq |= data[0]; + OUTF("........ Absolute RF channel number: %u\n", freq); + data++; +} + +static void +l2_HoppingChannel() +{ + unsigned char maio = 0; + OUTF("%s Training seq. code : %d\n", BitRowFill(data[0], 0xe0), data[0] >> 5); + OUTF("---1---- HoppingChannel\n"); + maio = (data[0] & 0x0f) << 2; + data++; + if (data >= end) + RETTRUNK(); + maio |= (data[0] >> 6); + OUTF("........ MAIO %d\n", maio); + OUTF("%s Hopping Seq. Number: %d\n", BitRowFill(data[0], 0x3f), data[0] & 0x3f); + + data++; + RequestReference(); + TimingAdvance(); + l2_MobileAllocation(); + if (data >= end) + return; /* finished. not truncated! */ + + OUTF("FIXME, more data left here???\n"); +} + +static void +l2_HoppingChannelC() +{ + OUTF("FIXME-2\n"); +} + +static void +l2_MobileAllocation() +{ + int c = 64, pos; + char *str = "Mobile allocation RF chann."; + const unsigned char *thisend; + + if (data >= end) + RETTRUNK(); + OUTF("%s Length of Mobile Allocation: %d\n", BitRowFill(data[0], 0xff), data[0]); + thisend = data + data[0] + 1; + if (thisend > end) + { + OUTF("xxxxxxxx ERROR: Packet to short or length to long\n"); + thisend = end; + } + + data++; + /* If mobile allocation has length 0 */ + if (data >= thisend) + return; + + while (data < thisend) + { + pos = 7; + while (pos >= 0) + { + if ((data[0] >> pos) & 1) + OUTF("%s %s%d\n", BitRow(data[0], pos), str, c - (7 - pos)); + pos--; + + } + + c -= 8; + data++; + if (c <= 0) + break; + } +} + +/* + * From RRsystemInfo2 + */ +static void +l2_BcchAllocation() +{ + int c, pos; + char *str = "BCCH alloc. RF chan.: "; + +#if 0 + /* goeller script for Info2 outputs channels 128 + 127 + * but opengpa outputs bitmap format for info2. + * We do what opengpa does. (correct?) + */ + if ((data[0] >> 7)) + OUTF("1------- %s%d\n", str, 128); + if ((data[0] >> 6) & 1) + OUTF("-1------ %s%d\n", str, 127); +#endif + if ((data[0] >> 6) == 0x00) + OUTF("00------ Bitmap format: 0\n"); + else { + OUTF("%s Bitmap format: UNKNOWN [FIXME]\n", BitRowFill(data[0], 0xc0)); + return; + } + + if ((data[0] & 0x8e) == 0x8e) + { + /* From System Information Type 5ter */ + OUTF("1---111- Variable Bitmap SI5ter [FIXME]\n"); + return; + } + + if ((data[0] >> 5) & 1) + OUTF("--1----- Extension Indicator: The IE carries only a part of the BA\n"); + else + OUTF("--0----- Extension Indicator: The IE carries the complete BA\n"); + OUTF("---x---- BCCH alloc. seq. num: %d\n", (data[0] >> 4) & 1); + if ((data[0] >> 3) & 1) + OUTF("----1--- %s%d\n", str, 124); + if ((data[0] >> 2) & 1) + OUTF("-----1-- %s%d\n", str, 123); + if ((data[0] >> 1) & 1) + OUTF("------1- %s%d\n", str, 122); + if (data[0] & 1) + OUTF("-------1 %s%d\n", str, 121); + + data++; + c = 120; + while (data < end) + { + pos = 7; + while (pos >= 0) + { + if ((data[0] >> pos) & 1) + OUTF("%s %s%d\n", BitRow(data[0], pos), str, c - (7 - pos)); + pos--; + + } + + c -= 8; + data++; + if (c <= 0) + break; + } +} + +static void +l2_RRimmediateAssTBFC() +{ + if (data >= end) + return; + + /* GPRS Packet Channel Description */ + OUTF("%s Channel Type : %d\n", BitRowFill(data[0], 0xf8), data[0] >> 3); + OUTF("%s Time Slot Number : %d\n", BitRowFill(data[0], 0x07), data[0] & 0x07); + data++; + if (data >= end) + return; + + OUTF("%s Tranining Sequence Code: %d\n", BitRowFill(data[0], 0xe0), data[0] >> 5); + if ((data[0] >> 4) & 0x01) + { + OUTF("---1---- Direct Encoding of Hopping Channels\n"); + l2_RRimmAssTBFDirEncHoChaC(); + return; + } else { + OUTF("---0---- non-hopping RF channel config or indirect encoding of hopping RFCC\n"); + } + + if ((data[0] >> 3) & 0x01) + { + OUTF("----1--- indirect encoding of hopping RF channel config\n"); + } else { + OUTF("----0--- RRimmAssTBFaRFCN-C FIXME\n"); + return; + } + + data++; + if (data >= end) + RETTRUNK(); + OUTF("xxxxxxxx MAIO [FIXME]\n"); + + data++; + RequestReference(); + TimingAdvance(); + l2_MobileAllocation(); + if (data >= end) + RETTRUNK(); + OUTF("FIXME: implenet\n"); +} + +static void +l2_RRsystemInfo1() +{ + int ca; + + if (data + 1 >= end) + return; + switch (data[0] >> 6) + { + case 0x00: + OUTF("00------ Bitmap 0 format\n"); + break; + case 0x01: + OUTF("10------ Bitmap format: (FIXME)\n"); + break; + default: + OUTF("%s Bitmap %d format (FIXME)\n", BitRowFill(data[0], 0xc0), data[0] >> 6); + } + if ((data[0] >> 3) & 1) + OUTF("----1--- Cell Allocation : ARFCN 124\n"); + if ((data[0] >> 2) & 1) + OUTF("-----1-- Cell Allocation : ARFCN 123\n"); + if ((data[0] >> 1) & 1) + OUTF("------1- Cell Allocation : ARFCN 122\n"); + if (data[0] & 1) + OUTF("-------1 Cell Allocation : ARFCN 121\n"); + + ca = 120; + while (ca > 0) + { + data++; + if (data >= end) + return; + if ((data[0] >> 7) & 1) + OUTF("1------- Cell Allocation : ARFCN %d\n", ca); + if ((data[0] >> 6) & 1) + OUTF("-1------ Cell Allocation : ARFCN %d\n", ca - 1); + if ((data[0] >> 5) & 1) + OUTF("--1----- Cell Allocation : ARFCN %d\n", ca - 2); + if ((data[0] >> 4) & 1) + OUTF("---1---- Cell Allocation : ARFCN %d\n", ca - 3); + if ((data[0] >> 3) & 1) + OUTF("----1--- Cell Allocation : ARFCN %d\n", ca - 4); + if ((data[0] >> 2) & 1) + OUTF("-----1-- Cell Allocation : ARFCN %d\n", ca - 5); + if ((data[0] >> 1) & 1) + OUTF("------1- Cell Allocation : ARFCN %d\n", ca - 6); + if (data[0] & 1) + OUTF("-------1 Cell Allocation : ARFCN %d\n", ca - 7); + + ca -= 8; + } + + data++; + + l2_RachControlParameters(); + if (data >= end) + return; + OUTF("FIXME: NCH Position\n"); +} + +static void +l2_RachControlParameters() +{ + int ca = -1; + + if (data >= end) + return; + + if (((data[0] >> 6) & 0x03) == 0) + ca = 1; + else if (((data[0] >> 6) & 0x03) == 0x01) + ca = 2; + else if (((data[0] >> 6) & 0x03) == 0x02) + ca = 4; + else if (((data[0] >> 6) & 0x03) == 0x03) + ca = 7; + OUTF("%s Max. of retransmiss : %u\n", BitRowFill(data[0], 0xc0), ca); + if (((data[0] >> 2) & 0x0f) <= 9) + { + ca = ((data[0] >> 2) & 0x0f) + 3; + } else { + switch ((data[0] >> 2) & 0x0f) + { + case 10: /* --1010-- */ + ca = 14; + break; + case 11: + ca = 16; + break; + case 12: + ca = 20; + break; + case 13: + ca = 25; + break; + case 14: + ca = 32; + break; + case 15: + ca = 50; + break; + default: + ca = -1; + break; + } + } + OUTF("%s slots to spread TX : %u\n", BitRowFill(data[0], 0x3c), ca); + switch ((data[0] >> 1) & 0x01) + { + case 0: + OUTF("------0- The cell is barred : no\n"); + break; + case 1: + OUTF("------1- The cell is barred : yes\n"); + break; + } + + switch (data[0] & 0x01) + { + case 0: + OUTF("-------0 Call reestabl.i.cell: allowed\n"); + break; + case 1: + OUTF("-------1 Cell reestabl.i.cell: not allowed\n"); + } + + data++; + if (data >= end) + return; + switch ((data[0] >> 2) & 0x01) + { + case 0: + OUTF("-----0-- Emergency call EC 10: allowed\n"); + break; + case 1: + OUTF("-----1-- Emergency call EC 10: not allowed\n"); + break; + } + OUTF("%s Acc ctrl cl 11-15: 0 = permitted, 1 = forbidden\n", BitRowFill(data[0], 0xf8)); + OUTF("%s Acc ctrl cl 8- 9: 0 = permitted, 1 = forbidden\n", BitRowFill(data[0], 0x03)); + OUTF("%s Ordinary subscribers (8)\n", BitRowFill(data[0], 0x01)); + OUTF("%s Ordinary subscribers (9)\n", BitRowFill(data[0], 0x02)); + OUTF("%s Emergency call (10): %s\n", BitRowFill(data[0], 0x04), ((data[0] >> 4) & 1)?"Class 11-15 only":"Everyone"); + OUTF("%s Operator Specific (11)\n", BitRowFill(data[0], 0x08)); + OUTF("%s Security service (12)\n", BitRowFill(data[0], 0x10)); + OUTF("%s Public service (13)\n", BitRowFill(data[0], 0x20)); + OUTF("%s Emergency service (14)\n", BitRowFill(data[0], 0x40)); + OUTF("%s Network Operator (15)\n", BitRowFill(data[0], 0x80)); + data++; + if (data >= end) + RETTRUNK(); + OUTF("%s Acc ctrl cl 0- 7: 0 = permitted, 1 = forbidden\n", BitRowFill(data[0], 0xff)); + OUTF("%s Ordinary subscribers (0-7)\n", BitRowFill(data[0], 0xff)); + data++; +} + +static char * +BitRow(unsigned char c, int pos) +{ + unsigned char bit = 0; + static char buf[9]; + + if ((c >> pos) & 1) + bit = 1; + + if (pos == 0) + snprintf(buf, sizeof buf, "-------%d", bit); + else if (pos == 1) + snprintf(buf, sizeof buf, "------%d-", bit); + else if (pos == 2) + snprintf(buf, sizeof buf, "-----%d--", bit); + else if (pos == 3) + snprintf(buf, sizeof buf, "----%d---", bit); + else if (pos == 4) + snprintf(buf, sizeof buf, "---%d----", bit); + else if (pos == 5) + snprintf(buf, sizeof buf, "--%d-----", bit); + else if (pos == 6) + snprintf(buf, sizeof buf, "-%d------", bit); + else if (pos == 7) + snprintf(buf, sizeof buf, "%d-------", bit); + + return buf; +} + +static char * +BitRowFill(unsigned char c, unsigned char mask) +{ + static char buf[9]; + + memset(buf, '-', sizeof buf); + buf[sizeof buf - 1] = '\0'; + int i = 0; + while (i < 8) + { + if ((mask >> i) & 1) + { + if ((c >> i) & 1) + buf[7 - i] = '1'; + else + buf[7 - i] = '0'; + } + i++; + } + + return buf; +} + +static void +l2_RRsystemInfo2() +{ + if (data >= end) + RETTRUNK(); + + l2_BcchAllocation(); + if (data >= end) + RETTRUNK(); + + int c = 7; + while (c >= 0) + { + if ((data[0] >> c) & 1) + OUTF("%s BCCH carrier with NCC = %d is permitted for monitoring\n", BitRow(data[0], c), c); + c--; + } + data++; + if (data >= end) + RETTRUNK(); + + l2_RachControlParameters(); + + if (data > end) /* Note: not >= */ + RETTRUNK(); +} + +#if 0 +static void +l2_RRsystemInfo2ter() +{ + if (data >= end) + return; + if ((data[0] >> 7) == 0) + OUTF("%s Bitmap 0 format\n", BitRowFill(data[0], 0x8e)); + else { + /* 0x8e = 10001110 */ + if (((data[0] >> 1) & 0x07) == 0x04) + OUTF("1---100- 1024 range\nFIXME\n"); + else if (((data[0] >> 1) & 0x07) == 0x05) + OUTF("1---101- 512 range\nFIXME\n"); + else if (((data[0] >> 1) & 0x07) == 0x06) + OUTF("1---110- 128 range\nFIXME\n"); + else if (((data[0] >> 1) & 0x07) == 0x07) + OUTF("1---111- variable Bitmap\nFIXME\n"); + else + OUTF("1---xxx- UNKNOWN 0x%08x\n", data[0]); + } + OUTF("FIXME\n"); +} +#endif + + +/* + * RRsystemInfo4-C + */ +static void +l2_RRsystemInfo4C() +{ + if (data + 2 >= end) + RETTRUNK(); + l2_MccMncLac(); + CellSelectionParameters(); + l2_RachControlParameters(); + if (data + 1 >= end) + RETTRUNK(); + + if (data[0] != 0x64) + { + OUTF("UNKNWON\n"); + return; + } + OUTF("01100100 Channel Description\n"); + data++; + ChannelDescriptionTwo(); + if (data >= end) + RETTRUNK(); + //OUTF("%s Training sequence code: %d\n", BitRowFill(data[0], 0xe0), data[0] >> 5); + if (((data[0] >> 3) & 0x1) == 0) + { + l2_SingleChannelC(); + } else { + l2_HoppingChannelC(); + } + + if (data >= end) + return; + + if (data[0] != 0x72) + { + OUTF("UNKNOWN\n"); + return; + } + OUTF("01110010 CBCH Mobile Allocation\n"); + data++; + if (data >= end) + RETTRUNK(); + l2_MobileAllocation(); + +// OUTF("FIXME\n"); +} + +/* + * Output MCC, MNC and LAC. consume 5 bytes. + */ +static void +l2_MccMncLac() +{ + if (data + 2 >= end) + return; + unsigned short lac; + + l2_MNCC("Mobile Country Code", data[0] & 0x0f, (data[0] >> 4) & 0x0f, data[1] & 0x0f); + data++; + l2_MNCC("Mobile Network Code", data[1] & 0x0f, (data[1] >> 4) & 0x0f, (data[0] >> 4) & 0x0f); + data += 2; + + if (data + 1 >= end) + return; + + lac = data[0]; + lac = (lac << 8) | data[1]; + OUTF("%-8u [0x%02x%02x] Local Area Code\n", lac, data[0], data[1]); + data += 2; +} +/* + * RRsystemINfo3-C + */ +static void +l2_RRsystemInfo3C() +{ + CellIdentity(); + l2_MccMncLac(); + + ControlChannelDescription(); + CellOptionsBcch(); + CellSelectionParameters(); + l2_RachControlParameters(); + + /* FIXME: complete here */ +} + +static void +l2_RRsystemInfo6() +{ + CellIdentity(); + l2_MccMncLac(); + CellOptionsBcch(); + if (data >= end) + RETTRUNK(); + OUTF("%s Network Colour Code: %u\n", BitRowFill(data[0], 0xff), data[0]); +} + +static void +CellIdentity() +{ + unsigned short id; + + if (data + 1 >= end) + return; + + id = data[0]; + id = (id << 8) | data[1]; + OUTF("%-8u [0x%02x%02x] Cell identity\n", id, data[0], data[1]); + data += 2; +} + +static void +ControlChannelDescription() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Spare bit (should be 0)\n", BitRow(data[0], 7)); + if ((data[0] >> 6) & 1) + OUTF("-1------ MSs in the cell shall apply IMSI attach/detach procedure\n"); + else + OUTF("-0------ MSs in cell are not allowed attach/detach procedure\n"); + OUTF("%s Number of blocks: %u\n", BitRowFill(data[0], 0x38), (data[0] >> 3) & 0x07); + + switch (data[0] & 0x07) + { + case 0x00: + OUTF("-----000 1 basic physical channel for CCCH, not combined with SDCCHs\n"); + break; + case 0x01: + OUTF("-----001 1 basic physical channel for CCCH, combined with SDCCHs\n"); + break; + case 0x02: + OUTF("-----010 2 basic physical channel for CCCH, not combined with SDCCHs\n"); + break; + case 0x04: + OUTF("-----100 3 basic physical channel for CCCH, not combined with SDCCHs\n"); + break; + case 0x06: + OUTF("-----110 4 basic physical channel for CCCH, not combined with SDCCHs\n"); + break; + default: + OUTF("%s Unknown CCCH config (ERROR)\n", BitRowFill(data[0], 0x07)); + break; + } + + data++; + if (data >= end) + RETTRUNK(); + + OUTF("%s spare bits (should be 0)\n", BitRowFill(data[0], 0xf8)); + OUTF("%s %u multi frames period for paging request\n", BitRowFill(data[0], 0x07), (data[0] & 0x07) + 2); + + data++; + if (data >= end) + RETTRUNK(); + OUTF("%s T3212 TimeOut value: %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; +} + +static void +CellOptionsBcch() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s spare bit (should be 0)\n", BitRowFill(data[0], 0x80)); + if ((data[0] >> 6) & 1) + OUTF("-1------ Power control indicator is set\n"); + else + OUTF("-0------ Power control indicator is not set\n"); + + if (((data[0] >> 4) & 0x03) == 0x00) + OUTF("--00---- MSs may use uplink DTX\n"); + else if (((data[0] >> 4) & 0x03) == 0x01) + OUTF("--01---- MSs shall use uplink DTX\n"); + else if (((data[0] >> 4) & 0x03) == 0x02) + OUTF("--10---- MSs shall not use uplink DTX\n"); + else + OUTF("%s DTX UNKNOWN [ERROR]\n", BitRowFill(data[0], 0x30)); + + OUTF("%s Radio Link Timeout: %u\n", BitRowFill(data[0], 0x0f), ((data[0] & 0x0f) + 1 ) * 4); + data++; +} + +static void +l2_MNCC(const char *str, unsigned char a, unsigned char b, unsigned char c) +{ + char buf[128]; + char f[12]; + + snprintf(f, sizeof f, "%x%x%x", a, b, c); + /* Nokia netmonitor shows NC's like '30F' and '10F' */ + snprintf(buf, sizeof buf, "%-8s %s\n", f, str); + +#if 0 + buf[0] = '\0'; + if (a != 0x0f) + { + snprintf(buf, sizeof buf, "%x", a); + if (b != 0x0f) + { + snprintf(buf + 1, sizeof buf - 1, "%x", b); + if (c != 0x0f) + snprintf(buf + 2, sizeof buf - 2, "%x", c); + } + } + snprintf(buf + strlen(buf), sizeof buf - strlen(buf), " - %s\n", str); +#endif + + OUTF(buf); +} + +static char * +PageMode(unsigned char mode) +{ + switch (mode) + { + case 0: + return "------00 Page Mode: Normal paging"; + case 1: + return "------01 Page Mode: Extended paging"; + case 2: + return "------10 Page Mode: Paging reorganisation"; + case 3: + return "------11 Page Mode: reserved / same as before"; + } + + return "------?? UNKNOWN\n"; +} + +static void +l2_RRpagingrequest1() +{ + if (data >= end) + return; + + OUTF("%s\n", PageMode(data[0] & 0x3)); + + /* FIXME complete here */ + + data++; + if (data >= end) + return; + + l2_MobId(); + if (data >= end) + return; /* sometimes it's end here */ + if (data[0] == 0x17) + { + data++; + l2_MobId(); + return; + } + OUTF("ERR: wrong data\n"); +} + +static void +l2_ChannelNeeded(char *str, unsigned char ch) +{ + switch (ch) + { + case 0x00: + OUTF("%s Channel Needed: Any channel\n", str); + break; + case 0x01: + OUTF("%s Channel Needed: SDCCH\n", str); + break; + case 0x02: + OUTF("%s Channel Needed: TCH/F (Full rate)\n", str); + break; + case 0x03: + OUTF("%s Channel Needed: TCH/H or TCH/F (Dual rate)\n", str); + break; + } + +} + +static void +l2_RRpagingrequest2() +{ + if (data >= end) + return; + OUTF("%s\n", PageMode(data[0] & 0x03)); + + l2_ChannelNeeded("--xx---- (first)", (data[0] >> 4) & 0x03); + l2_ChannelNeeded("xx------ (second)", data[0] >> 6); + + data++; + if (data + 3 >= end) + RETTRUNK(); + OUTF("........ Mob. Ident 1 (P)TMSI: %02X%02X%02X%02X\n", data[0], data[1], data[2], data[3]); + data += 4; + if (data + 3 >= end) + RETTRUNK(); + OUTF("........ Mob. Ident 2 (P)TMSI: %02X%02X%02X%02X\n", data[0], data[1], data[2], data[3]); + data += 4; + if (data >= end) + RETTRUNK(); + + if (data[0] == 0x17) + { + data++; + l2_MobId(); + return; + } + + OUTF("FIXME, unknown\n"); +} + +static void +l2_RRpagingrequest3() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s\n", PageMode(data[0] & 0x03)); + l2_ChannelNeeded("--xx---- (first)", (data[0] >> 4) & 0x03); + l2_ChannelNeeded("xx------ (second)", data[0] >> 6); + data++; + + int c = 0; + while (c++ < 4) + { + if (data + 3 >= end) + RETTRUNK(); + OUTF("........ Mob. Ident %u (P)TMSI: %02X%02X%02X%02X\n", c, data[0], data[1], data[2], data[3]); + data += 4; + } +} + +static void +l2_MobId() +{ + const unsigned char *thisend = end; + unsigned char len = data[0]; + char odd = 0; + int bcd = 0; + + data++; + if (data >= end) + return; + + if ((data[0] >> 3) & 1) + odd = 1; + + switch (data[0] & 0x07) + { + case 0: + OUTF("-----000 Type of identity: No Identity\n"); + break; + case 1: + OUTF("-----001 Type of identity: IMSI\n"); + bcd = 1; + break; + case 2: + OUTF("-----010 Type of identity: IMEI\n"); + bcd = 1; + break; + case 3: + OUTF("-----011 Type of identity: IMEISV\n"); + bcd = 1; + break; + case 4: + OUTF("-----100 Type of identity: TMSI/P-TMSI\n"); + break; + default: + OUTF("-----000 Type of identity: UNKNOWN\n"); + return; + } + if (len <= 0) + return; + + /* Nokia Netmonitor never outputs the first value */ + //OUTF("%x", data[0] >> 4); + unsigned char c; + c = data[0] >> 4; + len--; + data++; + if (len <= 0) + return; + + OUTF("-------- ID(%d/%s): ", len, odd?"odd":"even"); + + if (data + len < thisend) + thisend = data + len; + if (bcd) + { + OUT("%X", c); + while (data < thisend) + { + if ((data + 1 == thisend) && (!odd)) + OUT("%X", data[0] & 0x0f); + else + OUT("%X%X", data[0] & 0x0f, (data[0] >> 4) & 0x0f); + data++; + } + } else { + while (data < thisend) + { + if ((data + 1 == thisend) && (odd)) + OUT("%X", (data[0] >> 4 ) & 0x0f); + else + OUT("%X%X", (data[0] >> 4) & 0x0f, data[0] & 0x0f); + data++; + } + } + OUT("\n"); +} + + +static void CellSelectionParameters() +{ + if (data >= end) + RETTRUNK(); + + switch (data[0] >> 5) + { + case 0: + OUTF("000----- Cell Reselect Hyst. : 0 db RXLEV\n"); + break; + case 1: + OUTF("001----- Cell Reselect Hyst. : 2 db RXLEV\n"); + break; + case 2: + OUTF("010----- Cell Reselect Hyst. : 4 db RXLEV\n"); + break; + case 3: + OUTF("011----- Cell Reselect Hyst. : 6 db RXLEV\n"); + break; + case 4: + OUTF("100----- Cell Reselect Hyst. : 8 db RXLEV\n"); + break; + case 5: + OUTF("101----- Cell Reselect Hyst. : 10 db RXLEV\n"); + break; + case 6: + OUTF("110----- Cell Reselect Hyst. : 12 db RXLEV\n"); + break; + case 7: + OUTF("111----- Cell Reselect Hyst. : 14 db RXLEV\n"); + break; + } + OUTF("---xxxxx Max Tx power level: %d\n", data[0] & 0x1f); + data++; + if (data >= end) + RETTRUNK(); + + if (data[0] >> 7) + OUTF("1------- Additional cells in SysInfo 16,17\n"); + else + OUTF("0------- No additional cells in SysInfo 7-8\n"); + if ((data[0] >> 6) & 1) + OUTF("-1------ New establishm cause: supported\n"); + else + OUTF("-0------ New establishm cause: not supported\n"); + OUTF("--xxxxxx RXLEV Access Min permitted = -110 + %ddB\n", data[0] & 0x3f); + data++; +} + +static void +l2_RRimmAssTBFDirEncHoChaC() +{ + unsigned char maio = (data[0] & 0x0f) << 4; + + data++; + if (data >= end) + RETTRUNK(); + maio |= (data[0] >> 6); + OUTF("xxxxxxxx MAIO: %u\n", maio); + OUTF("%s HSN: %u\n", BitRowFill(data[0], 0x3f), data[0] & 0x3f); + data++; + + RequestReference(); + + TimingAdvance(); + l2_MobileAllocation(); + + if (data >= end) + RETTRUNK(); + if (data[0] == 0x7c) + { + StartingTime(); + return; + } + OUTF("FIXME: implement me\n"); +} + +static void +RequestReference() +{ + if (data >= end) + RETTRUNK(); + + /* Request Reference */ + if ((data[0] >> 5) == 0) + OUTF("000----- Establishing Cause : All other cases\n"); + else if ((data[0] >> 5) == 0x01) + OUTF("001----- Establishing Cause : All other cases\n"); + else if ((data[0] >> 5) == 0x02) + OUTF("010----- Establishing Cause : All other cases\n"); + else if ((data[0] >> 5) == 0x03) + OUTF("011----- Establishing Cause : All other cases\n"); + else if ((data[0] >> 5) == 0x04) + OUTF("100----- Establishing Cause: Answer to paging\n"); + else if ((data[0] >> 5) == 0x05) + OUTF("101----- Establishing Cause: Emergency call\n"); + else if ((data[0] >> 5) == 0x07) + OUTF("111----- Establishing Cause: Other services req. by user\n"); +/* Random refernce must be 5 bit long ?! */ +// else if ((data[0] >> 4) == 0x05) +// OUTF("0101---- Establishing Cause: Originating data call from dual rate mobile station\n"); +// else if ((data[0] >> 4) == 0x02) +// OUTF("0010---- Establishing Cause: Answer to paging\n"); + else + OUTF("%s Establishing Cause: UNKNOWN [FIXME}\n", BitRowFill(data[0], 0xe0)); + + OUTF("---xxxxx Random Reference : %d\n", data[0] & 0x1f); + + data++; + if (data + 1>= end) + RETTRUNK(); + + OUTF("xxxxxxxx T1/T2/T3\n"); + data++; + OUTF("xxxxxxxx T1/T2/T3\n"); + data++; + /* END Request Reference */ +} + +static void +TimingAdvance() +{ + if (data >= end) + RETTRUNK(); + OUTF("--xxxxxx Timing advance value: %d\n", data[0] & 0x3f); + data++; +} + +static void +StartingTime() +{ + if (data >= end) + RETTRUNK(); + OUTF("01111100 Starting Time block\n"); + data++; + if (data >= end) + RETTRUNK(); + unsigned char t3; + OUTF("%s T1 Frame Number: %u\n", BitRowFill(data[0], 0xf8), data[0] >> 3); + t3 = (data[0] & 0x07) << 5; + data++; + if (data >= end) + RETTRUNK(); + t3 |= (data[0] >> 5); + OUTF("%s T2 Frame Number: %u\n", BitRowFill(data[0], 0x1f), data[0] & 0x1f); + OUTF("........ T3 Frame Number: %u\n", t3); +} + +/* + * RRsystemInfo5 + */ +static void +l2_NeighbourCellDescription() +{ + if (data >= end) + RETTRUNK(); + l2_BcchAllocation(); +} + + +static void +l2_ChannelRelease() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s\n", id_list_get(list_ChannelRelease, data[0])); + data++; +} + +static void +l2_MMcmServiceRequest() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s Ciphering key sequence: %u\n", BitRowFill(data[0], 0x70), (data[0] >> 4) & 0x07); + OUTF("%s\n", id_list_get(list_RequestServiceType, data[0] & 0x0f)); + data++; + MSClassMarkTwo(); + if (data >= end) + RETTRUNK(); + + if (data[0] == 0x20) + { + OUTF("FIXME: classmark3\n"); + return; + } + + l2_MobId(); +} + + +static void +MSClassMarkOne() +{ + if (data >= end) + RETTRUNK(); + + if (((data[0] >> 5) & 0x03) == 0) + OUTF("-00----- Revision Level: Phase 1\n"); + else if (((data[0] >> 5) & 0x03) == 1) + OUTF("-01----- Revision Level: Phase 2\n"); + else + OUTF("-xx----- Revision Level: Unknown\n"); + if (((data[0] >> 4) & 1) == 0) + OUTF("---0---- Controlled early classmark sending: Not implemented\n"); + else + OUTF("---1---- Controlled early classmark sending: Implemented\n"); + if ((data[0] >> 3) & 1) + OUTF("----1--- A5/1 not available\n"); + else + OUTF("----0--- A5/1 available\n"); + + OUTF("%s RF power class capability: Class %u\n", BitRowFill(data[0], 0x07), (data[0] & 0x07) + 1); + + data++; +} + +static void +MSClassMarkTwo() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s MS Classmark 2 length: %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; + MSClassMarkOne(); + + if ((data[0] >> 6) & 1) + OUTF("-1------ Pseudo Sync Capability: present\n"); + else + OUTF("-1------ Pseudo Sync Capability: not present\n"); + + if (((data[0] >> 4) & 0x03) == 0) + OUTF("--00---- SS Screening: Phase 1 default value\n"); + else if (((data[0] >> 4) & 0x03) == 1) + OUTF("--01---- SS Screening: Phase 2 error handling\n"); + else + OUTF("--xx---- SS Screening: UNKNOWN\n"); + + if ((data[0] >> 3) & 1) + OUTF("----1--- Mobile Terminated Point to Point SMS: supported\n"); + else + OUTF("----0--- Mobile Terminated Point to Point SMS: not supported\n"); + + if ((data[0] >> 2) & 1) + OUTF("-----1-- VoiceBroadcastService: supported\n"); + else + OUTF("-----0-- VoiceBroadcastService: not supported\n"); + + if ((data[0] >> 1) & 1) + OUTF("------1- VoiceGroupCallService: supported\n"); + else + OUTF("------0- VoiceGroupCallService: not supported\n"); + + if (data[0] & 1) + OUTF("-------1 MS supports E-GSM or R-GSM: supported\n"); + else + OUTF("-------0 MS supports E-GSM or R-GSM: not supported\n"); + + data++; + if (data >= end) + RETTRUNK(); + + + if ((data[0] >> 7) & 1) + OUTF("1------- CM3 option: supported\n"); + else + OUTF("0------- CM3 option: not supported\n"); + + if ((data[0] >> 5) & 1) + OUTF("--1----- LocationServiceValueAdded Capability: supported\n"); + else + OUTF("--0----- LocationServiceValueAdded Capability: not supported\n"); + + if ((data[0] >> 3) & 1) + OUTF("----1--- SoLSA Capability: supported\n"); + else + OUTF("----0--- SoLSA Capability: not supported\n"); + + if ((data[0] >> 1) & 1) + OUTF("------1- A5/3 available\n"); + else + OUTF("------0- A5/3 not available\n"); + + if (data[0] & 1) + OUTF("-------1 A5/2: available\n"); + else + OUTF("-------0 A5/2: not available\n"); + data++; +} + +static void +l2_RRciphModCmd() +{ + if (data >= end) + RETTRUNK(); + if (((data[0] >> 1) & 0x07) == 0x07) + OUTF("----111- Cipher: reserved [UNKNOWN]\n"); + else + OUTF("%s Cipher: A5/%u\n", BitRowFill(data[0], 0x0e), ((data[0] >> 1) & 0x07) + 1); + + + if (data[0] & 1) + OUTF("-------1 Start ciphering\n"); + else + OUTF("-------0 No ciphering\n"); + + if ((data[0] >> 4) & 1) + OUTF("---1---- Cipher Response: IMEISV shall be included\n"); + else + OUTF("---0---- Cipher Response: IMEISV shall not be included\n"); + data++; +} + +static void +l2_RRciphModCompl() +{ + if (data >= end) + RETTRUNK(); + + if (data[0] != 0x17) + return; + if (++data >= end) + RETTRUNK(); + l2_MobId(); +} + +static void +l2_TmsiReallocCommand() +{ + if (data >= end) + RETTRUNK(); + + l2_MccMncLac(); + l2_MobId(); +} + +static void +l2_sms() +{ + if (data >= end) + RETTRUNK(); + + if ((data[0] == 0x04)) + OUTF("00000100 Type: CP-ACK\n"); + else if (data[0] == 0x10) + OUTF("00010000 Type: CP-ERROR\n"); + else if (data[0] == 1) { + OUTF("00000001 Type: CP-DATA\n"); + data++; + cpData(); + } else + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); +} + +static void +cpDataUp() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Parameter %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + OUTF("%s Parameter %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + OUTF("%s Parameter %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; + Address("SMSC"); + if (data >= end) + RETTRUNK(); + + /* FIXME: Be more detailed here about message flags */ + OUTF("%s Message Flags: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data + 1 >= end) + RETTRUNK(); + int num = data[0] << 8; + OUTF("%s Reference Number [continue]\n", BitRowFill(data[0], 0xff)); + data++; + num |= data[0]; + OUTF("%s Reference Number: %u\n", BitRowFill(data[0], 0xff), num); + data++; + + /* Destination address */ + Address("Destination"); + SmsProtocolDataValidity(); + if (data >= end) + RETTRUNK(); +} + +/* From Network to MS */ +/* Called when a full 140 byte SMS is received */ +static void +cpData() +{ + int n_symbols; + if (data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; + if (data >= end) + RETTRUNK(); + if ((data[0] & 1) == 0) + { + //OUTF("xxxxxxx0 cpDataUp FIXME\n"); + //data++; + cpDataUp(); + return; + } + OUTF("%s reserved\n", BitRowFill(data[0], 0xf8)); + OUTF("%s Message Type Indicator(MTI): %s\n", BitRowFill(data[0], 0x07), id_list_get(list_MTI, data[0] & 0x07)); + if (++data >= end) + RETTRUNK(); + OUTF("%s Message Reference: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + return; /* Can happen that msg terminated here... */ + + /* RP-address */ + Address("SMSC"); + if (data >= end) + RETTRUNK(); + +#if 0 + OUTF("%s TP-MTI, TP-MMS, TP-SRI, TP-UDIH, TP-RP: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + OUTF("%s Reference number: %u\n", BitRowFill(data[0], 0xff), data[0]); + if ((data[0]) == 0x44) + { + OUTF("FIXME: ems_type\n"); + return; + } + if (++data >= end) + RETTRUNK(); + + OUTF("%s Parameter\n", BitRowFill(data[0], 0xff)); + data++; +#endif + + TPAddress("Destination"); + OUTF("%s TP-MTI: %s\n", BitRowFill(data[0], 0x03), id_list_get(list_TP_MTI, data[0] & 0x03)); + + /* SMS-DELIVER and SMS-STATUS-REPORT. + * This may be different for other SMS-types! (FIXME) */ + if ((data[0] >> 2) & 1) + OUTF("-----1-- More Messages (TP-MMS): No\n"); + else + OUTF("-----0-- More Messages (TP-MMS): Yes\n"); + OUTF("%s Status Report Indication (TP-SRI)\n", BitRowFill(data[0], 0x20)); + if ((data[0] >> 6) & 1) + { + OUTF("-1------ User Data Header Indicator (TP-UDHI): Yes\n"); + nfo.flags |= GSMSP_NFO_UDHI; + } else { + OUTF("-0------ User Data Header Indicator (TP-UDHI): No\n"); + } + OUTF("%s Reply Path (TP-RP)\n", BitRowFill(data[0], 0x80)); + /* SMS-DELIVER and SMS-STATUS-REPORT end */ + data++; + + /* FIXME: Why is TPAddress differently encoded as SMSC address? + * Am i doing something wrong or are the GSM people nuts? + */ + TPAddress("Originating (TP-OA)"); + + SmsProtocolDataValidity(); + + SmscTimestamp(); + if (data >= end) + RETTRUNK(); + n_symbols = data[0]; + OUTF("%s User Data Length (TP-UDL): %u symbols\n", BitRowFill(data[0], 0xff), data[0]); + + data++; +#if 0 + if ((data[0] >> 6) & 1) + { + OUTF("-1------ TP User Data Header Indicator (TP-UDHI): yes\n"); + data++; + OUTF("-------- FIXME: Decode header\n"); + data += (data[0] + 1); + /* FIXME: Skip over fill bits as well. GSM 03.40 9.2.3.24 */ + } else { + OUTF("-0------ TP User Data Header Indicator (TP-UDHI): no\n"); + //data++; /* Contains directly the data!!! */ + } +#endif + + if (sms_con.ptr == NULL) + sms_con.ptr = sms_con.buf; + + if (nfo.flags & GSMSP_NFO_UDHI) + sms_udh(); + if ((nfo.flags & GSMSP_NFO_SMSCON) && (!(nfo.flags & GSMSP_NFO_LASTSMSCHUNK))) + { + HEXDUMPF(data, end - data, "TP-UD\n"); + /* If this is a concatendated SMS then wait for rest of data */ + return; + } + if (sms_con.ptr > sms_con.buf) + { + /* was a concatenated sms. output concatendated TP-UD */ + data = sms_con.buf; + start = data; + end = sms_con.ptr; + } + + if (nfo.flags & GSMSP_NFO_DEFAULTALPHABET) + { + if (((end - data) * 8 ) / 7 < n_symbols) + n_symbols = ((end - data) * 8) / 7; + sms_default_alphabet(n_symbols); + } else if (nfo.flags & GSMSP_NFO_SIMDATADL) { + HEXDUMPF(data, end - data, "Format Sim Data Download\n"); + simdatadownload(); + } else { + HEXDUMPF(data, end - data, "TP-UD\n"); + } + /* Reset concatendating sms counter again */ + if ((sms_con.ptr > sms_con.buf) && (nfo.flags & GSMSP_NFO_LASTSMSCHUNK)) + { + memset(&sms_con, 0, sizeof sms_con); + } +} + +static unsigned char sms_default_alpha[] = "" +"@_$__________\r__" +"________________" +" !\"#_%&`()*+,-./" +"0123456789:;<=>?" +"_ABCDEFGHIJKLMNO" +"PQRSTUVWXYZ_____" +"_abcdefghijklmno" +"pqrstuvwxyz_____"; + +/* + * Len is the number of symbols (not number of bytes) + */ +static void +sms_default_alphabet(int len) +{ + unsigned char buf[512]; + unsigned char *ptr = buf; + unsigned char *buf_end = buf + sizeof buf; + + while (ptr < buf_end) + { + *ptr++ = sms_default_alpha[data[0] & 0x7f]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[0] >> 7) & 0x01) | ((data[1] & 0x3f) << 1)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[1] >> 6) & 0x03) | ((data[2] & 0x1f) << 2)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[2] >> 5) & 0x07) | ((data[3] & 0x0f) << 3)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[3] >> 4) & 0x0f) | ((data[4] & 0x07) << 4)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[4] >> 3) & 0x1f) | ((data[5] & 0x03) << 5)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[5] >> 2) & 0x3f) | ((data[6] & 0x01) << 6)]; + if (--len <= 0) break; + *ptr++ = sms_default_alpha[((data[6] >> 1) & 0x7f)]; + if (--len <= 0) break; + data += 7; + } + data = end; + *ptr = '\0'; + OUTF("-------- Content: %s\n", buf); +} + +/* User Data Header (GSM 03.40:9.2.3.24) */ +static void +sms_udh() +{ + int len_udh; + int len; + int seq_total; + const unsigned char *end_udh; + const unsigned char *next; + + if (data >= end) + RETTRUNK(); + len_udh = data[0]; + end_udh = data + data[0] + 1; + OUTF("%s User Data Header Length: %u octets\n", BitRowFill(data[0], 0xff), data[0]); + data++; + + if (end_udh > end) + end_udh = end; + + while (data < end_udh) + { + if ((data + 1 >= end_udh) || (data + data[1] + 2 > end_udh)) + { + OUTF("ERR: Short data\n"); + break; + } + next = data + data[1] + 2; + len = data[1]; + + if (data[0] == 0) { + OUTF("00000000 Concatenated short messages, 8-bit reference number\n"); + data++; + OUTF("-------- Length: %u\n", data[0]); + data++; + OUTF("-------- Message Reference Number: %.2X\n", data[0]); + data++; + OUTF("-------- Number of Segments: %.2X\n", data[0]); + seq_total = data[0]; + data++; + OUTF("-------- Seq Number: %.2X\n", data[0]); + //OUTF("DEBUG: %u += memcpy(%p, %p, %u)\n", sms_con.ptr - sms_con.buf, sms_con.ptr, end_udh, end-end_udh); + memcpy(sms_con.ptr, end_udh, end - end_udh); + sms_con.ptr += (end - end_udh); + + nfo.flags |= GSMSP_NFO_SMSCON; + if (data[0] == seq_total) + nfo.flags |= GSMSP_NFO_LASTSMSCHUNK; + data++; + } else if (data[0] == 1) + OUTF("00000001 Special SMS Message Indication\n"); + else if (data[0] == 4) { + OUTF("00000100 Application port address, 8 bit\n"); + OUTF("-------- Desitnation Port: %u (0x%.2X)\n", data[1], data[1]); + OUTF("-------- Source Port: %u (0x%.2X)\n", data[2], data[2]); + data += 3; + } else if (data[0] == 5) { + unsigned short dport, sport; + dport = (data[2] << 8) + data[3]; + sport = (data[4] << 8) + data[5]; + OUTF("00000101 Application port address, 16 bit\n"); + data++; + OUTF("-------- Length: %u\n", data[0]); + data++; + /* 0 - 15999 allocated by IANA + * 16000 - 16999 Available for allocation by application + * 17000 - 65535 reserved + */ + OUTF("-------- Destination Port: %u\n", dport); + data += 2; + OUTF("-------- Source Port: %u\n", sport); + data += 2; + } else if (data[0] == 6) + OUTF("00000110 SMSC Control Parameters\n"); + else if (data[0] == 7) + OUTF("00000111 UDH Source Indicator\n"); + else if (data[0] == 8) { + OUTF("00001000 Concatenated short messages, 16-bit reference number\n"); + data++; + OUTF("-------- Message Reference Number: %.4X\n", (data[0]<<8) + data[1]); + data += 2; + OUTF("-------- Number of Segments: %.2X\n", data[0]); + seq_total = data[0]; + data++; + OUTF("-------- Seq Number: %.2X\n", data[0]); + memcpy(sms_con.ptr, end_udh, end - end_udh); + sms_con.ptr += (end - end_udh); + + nfo.flags |= GSMSP_NFO_SMSCON; + if (data[0] == seq_total) + nfo.flags |= GSMSP_NFO_LASTSMSCHUNK; + data++; + } else if (data[0] == 9) + OUTF("00001001 Wireless Control Message Protocol\n"); + else if ((data[0] >= 0x70) && (data[0] <= 0x7f)) + OUTF("%s SIM Toolkit Security Header\n", BitRowFill(data[0], 0xff)); + else if ((data[0] >= 0x80) && (data[0] <= 0x9f)) + OUTF("%s SME to SME specific use\n", BitRowFill(data[0], 0xff)); + else if ((data[0] >= 0xc0) && (data[0] <= 0xdf)) + OUTF("%s SC specific use\n", BitRowFill(data[0], 0xff)); + else + OUTF("%s reserved\n", BitRowFill(data[0], 0xff)); + + data = next; + } + +} + +static void +TPAddress(const char *str) +{ + int len; + + if (data >= end) + RETTRUNK(); + + len = data[0]; + OUTF("%s %s Address Length: %u\n", BitRowFill(data[0], 0xff), str, data[0]); + data++; + if (len <= 0) + { + data++; + return; + } + if (data >= end) + RETTRUNK(); + if (data[0] >> 7) + OUTF("1------- Extension\n"); + + OUTF("%s\n", id_list_get(list_SMSCAddressType, (data[0] >> 4) & 0x07)); + OUTF("%s\n", id_list_get(list_SMSCAddressNumberingPlan, data[0] & 0x0f)); + data++; + + OUTF("-------- Number(%u): ", len); + while (len > 0) + { + if ((data[0] >> 4) == 0x0f) + OUT("%X", data[0] & 0x0f); + else + OUT("%X%X", data[0] & 0x0f, data[0] >> 4); + len -= 2; + data++; + } + OUT("\n"); +} + +static void +Address(const char *str) +{ + int len; + + if (data >= end) + RETTRUNK(); + len = data[0]; + OUTF("%s %s Address Length: %u\n", BitRowFill(data[0], 0xff), str, data[0]); + data++; + if (len <= 0) + { + data++; + return; + } + if (data >= end) + RETTRUNK(); + if (data[0] >> 7) + OUTF("1------- Extension\n"); + + OUTF("%s\n", id_list_get(list_SMSCAddressType, (data[0] >> 4) & 0x07)); + OUTF("%s\n", id_list_get(list_SMSCAddressNumberingPlan, data[0] & 0x0f)); + len--; + data++; + if (len <= 0) + return; + const unsigned char *thisend = data + len; + if (thisend > end) + thisend = end; + + OUTF("-------- Number(%d): ", len); + while (data < thisend) + { + if ((data[0] >> 4) == 0x0f) + OUT("%X", data[0] & 0x0f); + else + OUT("%X%X", data[0] & 0x0f, data[0] >> 4); + data++; + } + OUT("\n"); +} + + +static void +l2_RRpagingresponse() +{ + if (data >= end) + RETTRUNK(); + + if ((data[0] & 0x07) == 0x07) + OUTF("-----111 Cipher key sequence: Key not available!\n"); + else + OUTF("%s Ciphering key sequence: %u\n", BitRowFill(data[0], 0x07), data[0] & 0x07); + + OUTF("%s Ciphering key sequence: %u\n", BitRowFill(data[0], 0x70), (data[0] >> 4) & 0x07); + + data++; + MSClassMarkTwo(); + if (data >= end) + RETTRUNK(); + l2_MobId(); +} + +static void +l2_RRassignCommand() +{ + ChannelDescriptionTwo(); + if (data >= end) + RETTRUNK(); + + OUTF("%s Training seq. code: %d\n", BitRowFill(data[0], 0xe0), data[0] >> 5); + if (((data[0] >> 2) & 0x07) == 0x00) + l2_SingleChannelAssCom(); + else if (((data[0] >> 4) & 1) == 0x01) + l2_HoppingChannelAssCom(); + else + OUTF("xxx0??xxx UNKNOWN %d\n", (data[0] >> 3) & 0x3); +} + +static void +l2_RRassignComplete() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s\n", id_list_get(list_ChannelRelease, data[0])); + data++; +} + +static void +ChannelDescriptionTwo() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Timeslot number: %d\n", BitRowFill(data[0], 0x07), data[0] & 0x07); + OUTF("%s Channel Description: %s\n", BitRowFill(data[0], 0xf8), id_list_get(list_ChannelDescriptionTwo, data[0] >> 3)); + + data++; +} + +static void +l2_SingleChannelAssCom() +{ + int freq = (data[0] & 0x03) << 8; + + data++; + if (data >= end) + RETTRUNK(); + freq |= data[0]; + OUTF("........ Absolute RF channel number: %u\n", freq); + if (++data >= end) + RETTRUNK(); + OUTF("%s Power Level: %u\n", BitRowFill(data[0], 0x1f), data[0] & 0x1f); + if (++data >= end) + RETTRUNK(); + if (data[0] != 0x63) + return; + if (++data >= end) + RETTRUNK(); + OUTF("%s\n", id_list_get(list_ChannelMode, data[0])); +} + +static void +l2_HoppingChannelAssCom() +{ + OUTF("FIXME %s\n", __func__); +} + +static void +CCalerting() +{ + if (data >= end) + RETTRUNK(); + if (data[0] != 0x1e) + return; + + data++; + ProgressIndicator(); +} + +static void +ProgressIndicator() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s Length of IE Progress Indicator: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + OUTF("%s Coding: %s\n", BitRowFill(data[0], 0x60), id_list_get(list_CodingStandard, (data[0] >> 5) & 0x03)); + OUTF("%s Location: %s\n", BitRowFill(data[0], 0x0f), id_list_get(list_Location, data[0] & 0x0f)); + if (++data >= end) + RETTRUNK(); + OUTF("%s\n", id_list_get(list_Progress, data[0] & 0x7f)); + data++; +} + +static void +CCsetup() +{ + if (data >= end) + RETTRUNK(); + + while (data < end) + { + if (data[0] == 0x04) + { + OUTF("00000100 Bearer Capability\n"); + data++; + BearerCap(); + } else if (data[0] == 0x1e) { + OUTF("00011110 Progress Indicator\n"); + ProgressIndicator(); + return; + } else if (data[0] == 0x5e) { + OUTF("01011110 Called Party BCD Number\n"); + data++; + BCDNumber(); + } else { + OUTF("%s FIXME\n", BitRowFill(data[0], 0xff)); + break; + } + } + + data++; +} + +static void +Cause() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s Length of Cause: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + + OUTF("%s Coding: %s\n", BitRowFill(data[0], 0x60), id_list_get(list_CodingStandard, (data[0] >> 5) & 0x03)); + OUTF("%s Location: %s\n", BitRowFill(data[0], 0x0f), id_list_get(list_Location, data[0] & 0x0f)); + if (++data >= end) + RETTRUNK(); + + OUTF("%s Cause: %s\n", BitRowFill(data[0], 0x7f), id_list_get(list_Cause, data[0] & 0x7f)); + data++; +} + +static void +l2_RRclassmarkChange() +{ + if (data >= end) + RETTRUNK(); + MSClassMarkTwo(); + if (data >= end) + RETTRUNK(); + if (data[0] == 0x20) + { + OUTF("00100000 Class Mark 3\n"); + data++; + ClassMarkThree(); + } +} + +static void +MultiSupportTwo() +{ + int c = 0; + if (data + 1 >= end) + RETTRUNK(); + OUTF("0110---- P-GSM, E-GSM, R-GSM supported, DSC 1800 not supported\n"); + + for (c = 3; c >= 0; c--) + { + if ((data[0] >> c) & 0x1) + OUTF("%s A5/%d available\n", BitRowFill(data[0], 1<<c), 4+c); + else + OUTF("%s A5/%d not available\n", BitRowFill(data[0], 1<<c), 4+c); + } + data++; + OUTF("%s Associated Radio capability 1 Power Class: %d\n", BitRowFill(data[0], 0xf), data[0] & 0xf); + OUTF("%s Associated Radio capability 2 Power Class: %d\n", BitRowFill(data[0], 0xf0), data[0] >> 4); +} + +static void +ClassMarkThree() +{ + unsigned char c; + + if (data + 1 >= end) + RETTRUNK(); + OUTF("%s Length: %d\n", BitRowFill(data[0], 0xff), data[0]); + data++; + + c = data[0] >> 4; + if ((c == 0x5) || (c == 0x6)) + MultiSupportTwo(); + else + OUTF("FIXME\n"); +} + +static void +SmsProtocolDataValidity() +{ + unsigned char b7,b6,b5,b4; + + if (data >= end) + RETTRUNK(); + OUTF("%s Protocol Identifier: 0x%.2X\n", BitRowFill(data[0], 0xff), data[0]); + + b7 = (data[0] >> 7) & 0x1; + b6 = (data[0] >> 6) & 0x1; + b5 = (data[0] >> 5) & 0x1; + b4 = (data[0] >> 4) & 0x1; + + if ( !b7 && !b6 && b5) { + OUTF("001----- Telematic Interworking\n"); + } + if ( !b7 && b6 ) { + switch ( (data[0] & 0x3f ) ) { + case 0x1f: + OUTF("01011111 Return Call Message\n"); + break; + case 0x3d: + OUTF("01111101 ME Data Download\n"); + break; + case 0x3e: + OUTF("01111110 ME De-personalization SMS\n"); + break; + case 0x3f: + OUTF("01111111 SIM Data download\n"); + break; + default:break; + } + + } + + if (data[0] == 0x00) + OUTF("00000000 normal\n"); + + if (data[0] == 0x40) + OUTF("00101000 SMS PING\n"); + + if (data[0] == 0x7f) { + nfo.flags |= GSMSP_NFO_SIMDATADL; + // printf("set GSMSP_NFO_SIMDATADL=1\n"); + } else + nfo.flags &= ~GSMSP_NFO_SIMDATADL; + + data++; + sms_dcs(); +} + +static void +BearerCap() +{ + int len; + char extension = 0; + + if (data >= end) + RETTRUNK(); + + len = data[0]; + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (data + len > end) + len = end - data; + if (++data >= end) + RETTRUNK(); + + if ((data[0] >> 7) & 0x1) + { + extension = 1; + OUTF("1------- Extension: yes\n"); + } else { + OUTF("0------- Extension: no\n"); + // extenstion = 0; + } + + OUTF("%s Radio Channel: %s\n", BitRowFill(data[0], 0x60), id_list_get(list_RadioChannelReq, (data[0] >> 5) & 0x03)); + if ((data[0] >> 4) & 1) + OUTF("---1---- Coding Standard: reserved\n"); + else + OUTF("---0---- Coding Standard: GSM\n"); + if ((data[0] >> 3) & 1) + OUTF("----1--- Transfer Mode: Packet\n"); + else + OUTF("----0--- Transfer Mode: Circuit\n"); + + OUTF("%s Transfer Capability: %s\n", BitRowFill(data[0], 0x07), id_list_get(list_TransferCap, data[0] & 0x07)); + data++; + + if (extension) + { + OUTF("FIXME: Stuff missing here\n"); + /* FIXME: can be followed by antoher estension etc!*/ + } + + if ((data[0] >> 7) & 0x1) + { + extension = 1; + OUTF("1------- Extension: yes\n"); + } else { + OUTF("0------- Extension: no\n"); + // extenstion = 0; + } + + if ((data[0] >> 6) & 0x01) + OUTF("-1------ Compression: yes\n"); + else + OUTF("-0------ Compression: no\n"); + + OUTF("%s Duplex Mode: %s\n", BitRowFill(data[0], 0x8), id_list_get(list_Duplex, data[0] & 0x8)); + if ((data[0] >> 1) & 0x1) + OUTF("------1- Rate Request: Data 4.8 kb/s, full rate, n. transp. 6kb req\n"); + data++; + + if ((data[0] >> 7) & 0x1) + { + extension = 1; + OUTF("1------- Extension: yes\n"); + } else { + OUTF("0------- Extension: no\n"); + // extenstion = 0; + } + OUTF("%s Rate Adaptation: %s\n", BitRowFill(data[0], 0x18), id_list_get(list_Rate, data[0] & 0x18)); + OUTF("%s Signalling Access Protocol: %s\n", BitRowFill(data[0], 0x7), id_list_get(list_Signalling, data[0] & 0x7)); + data++; + if ((data[0] & 0x1) == 1) + OUTF("-------1 Asynchronous\n"); + else + OUTF("-------0 Synchronous\n"); + data++; + /* FIXME: some octets might continue here, depending + * on extension */ + OUTF("FIXME: some data might be in extentions\n"); +} + +static void +AuthenticationRequest() +{ + char rand[16 * 2 + 1]; + + if (data >= end) + RETTRUNK(); + + OUTF("%s Cipher Key Sequence Number: %u\n", BitRowFill(data[0], 0x07), data[0] & 0x07); + data++; + if (data + 16 > end) + RETTRUNK(); + + snprintf(rand, sizeof rand, "%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x", data[0], data[1], data[2], data[3], data[4], data[5], data[6], data[7], data[8], data[9], data[10], data[11], data[12], data[13], data[14], data[15]); + OUTF("-------- RAND: %s\n", rand); + data += 16; +} + +static void +LocationUpdateRequest() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Cipher Key Sequence Number: %d\n", BitRowFill(data[0], 0x70), (data[0] >> 4) & 0x7); + if (data[0] & 0x8) + OUTF("----1--- Follow-on request pending\n"); + else + OUTF("----0--- No follow-on request pending\n"); + OUTF("%s Location Update: %s\n", BitRowFill(data[0], 0x3), id_list_get(list_TypeOfLocationUpdate, data[0] & 0x03)); + data++; + l2_MccMncLac(); + MSClassMarkOne(); + l2_MobId(); +} + + +static void +AuthenticationResponse() +{ + char sres[4 * 2 + 1]; + + if (data + 4 > end) + RETTRUNK(); + snprintf(sres, sizeof sres, "%02x%02x%02x%02x", data[0], data[1], data[2], data[3]); + OUTF("-------- SRES: %s\n", sres); + data += 4; +} + + +static void +sms_dcs() +{ + if (data >= end) + RETTRUNK(); + + if (data[0] == 0) + { + OUTF("00000000 Default Data Coding Scheme (default Alphabet)\n"); + nfo.flags |= GSMSP_NFO_DEFAULTALPHABET; + data++; + return; + } + + if (((data[0] >> 6) & 0x03) == 0) + { + OUTF("00------ General Data Coding\n"); + if ((data[0] >> 5) & 1) + OUTF("--1----- Compressed (TS 03.42)\n"); + else + OUTF("--0----- Not compressed\n"); + if ((data[0] >> 4) & 1) + OUTF("---1---- Message class meaning: yes\n"); + else + OUTF("---0---- Message class meaning: no\n"); + + + OUTF("%s Coding: %s\n", BitRowFill(data[0], 0x0c), id_list_get(list_alphabet, (data[0] >> 5) & 0x03)); + /* If bit 4 is set then bit 0..1 have a Message Class meaning */ + if ((data[0] >> 4) & 1) + { + OUTF("%s Message Class: %s\n", BitRowFill(data[0], 0x03), id_list_get(list_MessageClassMeaning, data[0] & 0x03)); + } else { + + OUTF("%s Message Class: No meaning (see bit4)\n", BitRowFill(data[0], 0x03)); + } + } else if ((((data[0] >> 6) & 0x03) == 0x03) && (((data[0] >> 4) & 0x03) != 0x03)) { + if (((data[0] >> 4) & 0x0f) == 0x0c) { + OUTF("1100---- Message Waiting Indicator Group: Discard Message\n"); + } else if (((data[0] >> 4) & 0x0f) == 0x0d) { + OUTF("1101---- Message Waiting Indicator Group: Store Message\n"); + } else if (((data[0] >> 4) & 0x0f) == 0x0e) { + OUTF("1110---- Message Waiting Indicator Group: Store Message\n"); + } + OUTF("FIXME GSM 03.38\n"); + } else if (((data[0] >> 4) & 0x0f) == 0x0f) { + OUTF("1111---- Data Coding/Message Class\n"); + OUTF("%s reserved\n", BitRowFill(data[0], 0x08)); + if ((data[0] >> 2) & 1) + OUTF("-----1-- Message coding: 8 bit\n"); + else { + OUTF("-----0-- Message coding: default alphabet\n"); + nfo.flags |= GSMSP_NFO_DEFAULTALPHABET; + } + OUTF("%s Message Class: %s\n", BitRowFill(data[0], 0x03), id_list_get(list_MessageClassMeaning, data[0] & 0x03)); + } else { + OUTF("%s reserved\n", BitRowFill(data[0], 0xff)); + } + + data++; +} + +#define FlipBCD(val) ((val & 0x0f) << 4) | (val >> 4) + +static void +SmscTimestamp() +{ + if (data + 6 >= end) + RETTRUNK(); + + OUTF("-------- SMSC Timestamp: %02x-%02x-%02x %02x:%02x:%02x (TZ %02x)\n", FlipBCD(data[0]), FlipBCD(data[1]), FlipBCD(data[2]), FlipBCD(data[3]), FlipBCD(data[4]), FlipBCD(data[5]), FlipBCD(data[6])); + + data += 7; +} + + +static void +simdatadownload() +{ + unsigned char chl; /* command header length */ + int i; + + OUTF("-------- Length of CPL: 0x%.4X (%u)\n", (data[0]<<8)+data[1],(data[0]<<8)+data[1]); + data+=2; + chl = data[0]; + OUTF("-------- Command Header Length: 0x%.2X (%u)\n",chl,chl); + data++; + // SPI + OUTF("%s SPI : 0x%.2X\n",BitRowFill(data[0], 0xff), data[0]); + switch (data[0] & 0x3) { + case 0x00: + OUTF("------00 No RC, CC or DS\n"); + break; + case 0x01: + OUTF("------01 Redudancy Check\n"); + break; + case 0x02: + OUTF("------10 Cryptographic Checksum\n"); + break; + case 0x03: + OUTF("------11 Digital Signature\n"); + break; + default: break; + } + if ( ((data[0]>>2)& 0x01) ) + OUTF("-----1-- Ciphering\n"); + else + OUTF("-----0-- No Ciphering\n"); + + switch ( (data[0]>>3) & 0x03 ) { + case 0x00: + OUTF("---00--- No counter available\n"); + break; + case 0x01: + OUTF("---01--- Counter available; no replay or sequence checking\n"); + break; + case 0x02: + OUTF("---10--- Process if counter is higher\n"); + break; + case 0x03: + OUTF("---11--- Process if counter is 1 higher\n"); + break; + default:break; + } + data++; + OUTF("%s PoR : 0x%.2X\n", BitRowFill(data[0], 0xff), data[0]); //FIXME:implement me + switch (data[0] & 0x03) { + case 0x00: + OUTF("------00 No PoR-reply to sending entity\n"); + break; + case 0x01: + OUTF("------01 PoR required to be send to sending entity\n"); + break; + case 0x02: + OUTF("------10 PoR required only on error\n"); + break; + case 0x03: + OUTF("-------- reserved\n"); + break; + default:break; + } + switch ( (data[0]>>2) & 0x03) { + case 0x00: + OUTF("----00-- No RC/CC/DS applied to PoR\n"); + break; + case 0x01: + OUTF("----01-- PoR with simple RC\n"); + break; + case 0x02: + OUTF("----10-- PoR with CC\n"); + break; + case 0x03: + OUTF("----11-- PoR with DS\n"); + break; + default:break; + } + if ( (data[0]>>4) & 0x01 ) + OUTF("---1---- PoR via SMS-SUBMIT\n"); + else + OUTF("---0---- PoR via SMS-Deliver-Report\n"); + + + data++; + + // KIc + OUTF("%s KIc: 0x%.2X\n",BitRowFill(data[0], 0xff), data[0]); + + switch(data[0] & 0x03) { + case 0x00: + OUTF("------00 Algorithm known implicitly\n"); + break; + case 0x01: + OUTF("------01 DES\n"); + break; + case 0x02: + OUTF("------10 Reserved.\n"); + break; + case 0x03: + OUTF("------11 properietary Implementation\n"); + break; + default:break; + } + + switch ( (data[0]>>2) & 0x03) { + case 0x00: + OUTF("----00-- DES-CBC\n"); + break; + case 0x01: + OUTF("----01-- 3DES-outer-CBC 2 different Keys\n"); + break; + case 0x02: + OUTF("----10-- 3DES-outer-CBC 3 different Keys\n"); + break; + case 0x03: + OUTF("----11-- DES-ECB\n"); + break; + default:break; + } + OUTF("XXX----- Key Number: %.2X\n", data[0]>>4 ); + data++; + + // KId + OUTF("%s KId: 0x%.2X\n",BitRowFill(data[0], 0xff), data[0]); + + switch(data[0] & 0x03) { + case 0x00: + OUTF("------00 Algorithm known implicitly\n"); + break; + case 0x01: + OUTF("------01 DES\n"); + break; + case 0x02: + OUTF("------10 Reserved.\n"); + break; + case 0x03: + OUTF("------11 properietary Implementation\n"); + break; + default:break; + } + + switch ( (data[0]>>2) & 0x03) { + case 0x00: + OUTF("----00-- DES-CBC\n"); + break; + case 0x01: + OUTF("----01-- 3DES-outer-CBC 2 different Keys\n"); + break; + case 0x02: + OUTF("----10-- 3DES-outer-CBC 3 different Keys\n"); + break; + case 0x03: + OUTF("----11-- DES-ECB\n"); + break; + default:break; + } + OUTF("XXX----- Key Number: %.2X\n", data[0]>>5 ); + data++; + + OUTF("-------- Toolkit Application Reference (TAR): 0x%.2X 0x%.2X 0x%.2X\n", data[0],data[1],data[2]); + data+=3; + OUTF("-------- Counter (CNTR): 0x%.2X 0x%.2X 0x%.2X 0x%.2X 0x%.2X\n",data[0], data[1], data[2], data[3], data[4]); + data+=5; + + // print the remaining bytes of the header, may be redudancy check eg + for (i=0; i<chl-12;i++) { + OUTF("%s %.2X\n",BitRowFill(data[0], 0xff), data[0]); + data++; + } + +} + + +static void +TypeOfIdentity() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s Type of Identity: %s\n", BitRowFill(data[0], 0x07), id_list_get(list_TypeOfIdentity, data[0] & 0x07)); + data++; +} + +static void +l2_NonCallSS() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s SendSequenceNumber: %u\n", BitRowFill(data[0], 0xc0), data[0] >> 6); + if ((data[0] & 0x3f) == 0x3b) + { + OUTF("--111011 Facility Register\n"); + data++; + l2_FacilityRegister(); + } else if ((data[0] & 0x3f) == 0x2a) { + OUTF("--101010 CCReleaseComplete\n"); + data++; + l2_CCReleaseComplete(); + } else { + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0x3f)); + data++; + } +} + +static void +l2_FacilityRegister() +{ + if (data >= end) + RETTRUNK(); + + if (data[0] != 0x1c) + { + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00011100 Information Element: Facility\n"); + data++; + l2_Facility(); +} + +static void +l2_Facility() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + switch (data[0]) + { + case 0xa1: /* 10100001 */ + OUTF("10100001 Invoke\n"); + data++; + l2_FacilityInvoke(); + break; + case 0xa2: /* 10100010 */ + OUTF("10100010 ReturnResult\n"); + data++; + l2_FacilityReturnResult(); + break; + default: + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); + break; + } +} + +static void +l2_FacilityHeader() +{ + if (data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + if (data[0] != 0x02) + { + OUTF("%s Type: UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00000010 Type: Integer\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + OUTF("%s Invoke ID: %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; +} + +static void +l2_FacilityInvoke() +{ + l2_FacilityHeader(); + if (data >= end) + RETTRUNK(); + if (data[0] != 0x02) + { + OUTF("%s Type: UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00000010 Type: Integer\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + + switch (data[0]) + { + case 0x3b: + OUTF("00111011 Unstructured SS Request\n"); + data++; + l2_UssRequest(); + break; + case 0x13: + OUTF("00010011 Unsturcutred SS Data\n"); + data++; + l2_UssData(); + break; + default: + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); + break; + } +} + +static void +l2_UssRequest() +{ + if (data >= end) + RETTRUNK(); + + if (data[0] != 0x30) + { + OUTF("%s Sequence: UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00110000 Sequence: ussd-Arg\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + if (data[0] != 0x04) + { + OUTF("%s Octet String: UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00000100 Octet String\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + + OUTF("%s Coding Sheme Number: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + if (data[0] != 0x04) + { + OUTF("%s Octet String: UNKNOWN\n", BitRowFill(data[0], 0xff)); + return; + } + OUTF("00000100 Octet String\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); +} + +static void +l2_UssData() +{ + char buf[32]; + int len; + + if (data >= end) + RETTRUNK(); + if (data[0] != 0x16) + { + OUTF("%s UNKNWON\n", BitRowFill(data[0], 0xff)); + return; + } + if (++data >= end) + RETTRUNK(); + len = data[0]; + OUTF("%s Length: %d\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + if (data + len > end) + RETTRUNK(); + snprintf(buf, sizeof buf, "%s", data); + buf[len] = '\0'; + OUTF("-------- String: %s\n", buf); + data += len; +} + +static void +l2_CCReleaseComplete() +{ + if (data >= end) + RETTRUNK(); + if (data[0] == 0x08) + { + OUTF("00001000 Cause [FIXME]\n"); + data++; + return; + } else if (data[0] == 0x1c) { /* 00011100 */ + OUTF("00011100 Facility\n"); + data++; + l2_Facility(); + } else { + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); + data++; + return; + } +} + +static void +l2_FacilityReturnResult() +{ + l2_FacilityHeader(); + if (data >= end) + RETTRUNK(); + if (data[0] != 0x30) /* 00110000 */ + goto err; + OUTF("00110000 Sequence: Result Info\n"); + if (++data >= end) + RETTRUNK(); + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + if (++data >= end) + RETTRUNK(); + if (data[0] != 2) + goto err; + OUTF("00000010 Integer\n"); + if (++data >= end) + RETTRUNK(); + if (data[0] != 1) + goto err; + OUTF("00000001 Length: 1\n"); + if (++data >= end) + RETTRUNK(); + switch (data[0]) + { + case 0x13: + OUTF("00010011 Unsturcutred SS Data\n"); + data++; + l2_UssData(); + break; + default: + goto err; + } + + return; +err: + OUTF("%s UNKNOWN\n", BitRowFill(data[0], 0xff)); + data++; +} + +static void +MeasurmentReport() +{ + int c, max; + + if (data + 1 >= end) + RETTRUNK(); + + if ((data[0] >> 7) & 0x1) + OUTF("1------- BA used: yes\n"); + else + OUTF("0------- BA used: no\n"); + + if ((data[0] >> 6) & 0x1) + OUTF("-1------ Discontinous Transmission: yes\n"); + else + OUTF("-0------ Discontinous Transmission: no\n"); + OUTF("%s RxLev Full Serving Cell: %d dB\n", BitRowFill(data[0], 0x3f), -110 + (data[0] & 0x3f)); + data++; + if ((data[0] >> 7) & 0x1) + OUTF("1------- BA used: yes\n"); + else + OUTF("0------- BA used: no\n"); + if ((data[0] >> 6) & 0x1) + OUTF("-1------ MEAS Valid: no\n"); + else + OUTF("-0------ MEAS Valid: yes\n"); + OUTF("%s RxLev Sub Serving Cell: %d dB\n", BitRowFill(data[0], 0x3f), -110 + (data[0] & 0x3f)); + data++; + + OUTF("%s Rx Quality Full Serving Cell: %s\n", BitRowFill(data[0], 0x70), id_list_get(list_RxQual, (data[0] >> 3) & 0x07)); + OUTF("%s Rx Quality Sub Serving Cell: %s\n", BitRowFill(data[0], 0x7), id_list_get(list_RxQual, data[0] & 0x07)); + data++; + if (data >= end) + RETTRUNK(); + max = data[0] & 0x7; + OUTF("%s Number of neighbouring cell measurements: %d\n", BitRowFill(data[0], 0x7), data[0] & 0x7); + c = 1; + data++; + while (c <= max) + { + if (data + 2 >= end) + RETTRUNK(); + OUTF("%s RxLev Neighbour Cell %d: %d dB\n", BitRowFill(data[0], 0x3f), c, -100 + (data[0] & 0x3f)); + data++; + OUTF("%s Bcch Freq MCell %d: %d\n", BitRowFill(data[0], 0x1f), c, data[0] & 0x1f); + data++; + OUTF("%s BTS Identity Code: %d\n", BitRowFill(data[0], 0x3f), data[0] & 0x3f); + data++; + c++; + } + /* FIXME: I think something iswrong here */ + OUTF("FIXME\n"); +} + +static void +BCDNumber() +{ + if (data >= end) + RETTRUNK(); + + OUTF("%s Length: %u\n", BitRowFill(data[0], 0xff), data[0]); + data++; + OUTF("%s Type of number: %s\n", BitRowFill(data[0], 0x70), id_list_get(list_TypeNumber, data[0] & 0x70)); + //OUTF("%s Number plan: %s\n", BitRowFill(data[0], 0xf), id_list_get(list_data[0] & 0xf); +} + |