2 * Copyright (c) 1997, 2002 Hellmuth Michaelis. All rights reserved.
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
7 * 1. Redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer.
9 * 2. Redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution.
13 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
14 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
17 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25 *---------------------------------------------------------------------------
27 * layer3.c - decode and print layer 3 (Q.931) information
28 * -------------------------------------------------------
32 * last edit-date: [Tue Mar 26 14:39:02 2002]
34 *---------------------------------------------------------------------------*/
40 /* 0x00 */ /* call establishment group */
57 "CONNECT ACKNOWLEDGE",
79 "USER INFORMATION", /* call information phase */
92 "SUSPEND ACKNOWLEDGE",
101 "RETRIEVE ACKNOWLEDGE",
117 "DETACH", /* call clearing */
125 "DETACH ACKNOWLEDGE",
131 "RESTART ACKNOWLEDGE",
155 "SEGMENT", /* misc messages */
163 "CANCEL ACKNOWLEDGE",
165 "FACILITY ACKNOWLEDGE",
167 "REGISTER ACKNOWLEDGE",
183 "CONGESTION CONTROL",
192 #define MTTAB_MAX 0x7f
194 extern int f_null(char *pbuf, unsigned char *buf, int off);
195 extern int f_bc(char *pbuf, unsigned char *buf, int off);
196 extern int f_cause(char *pbuf, unsigned char *buf, int off);
197 extern int f_cstat(char *pbuf, unsigned char *buf, int off);
198 extern int f_chid(char *pbuf, unsigned char *buf, int off);
199 extern int f_fac(char *pbuf, unsigned char *buf, int off);
200 extern int f_progi(char *pbuf, unsigned char *buf, int off);
201 extern int f_displ(char *pbuf, unsigned char *buf, int off);
202 extern int f_date(char *pbuf, unsigned char *buf, int off);
203 extern int f_cnu(char *pbuf, unsigned char *buf, int off);
204 extern int f_cgpn(char *pbuf, unsigned char *buf, int off);
205 extern int f_cdpn(char *pbuf, unsigned char *buf, int off);
206 extern int f_hlc(char *pbuf, unsigned char *buf, int off);
207 extern int f_uu(char *pbuf, unsigned char *buf, int off);
210 unsigned char code; /* information element identifier code */
211 char *name; /* ie name */
212 int (*func) (char *pbuf, unsigned char *buf, int off); /* decode function */
214 { 0x00, "segmented message", f_null },
215 { 0x04, "bearer capability", f_bc },
216 { 0x08, "cause", f_cause },
217 { 0x0c, "connected address", f_null },
218 { 0x0d, "extended facility", f_null },
219 { 0x10, "call identity", f_null },
220 { 0x14, "call state", f_cstat },
221 { 0x18, "channel id", f_chid },
222 { 0x19, "data link connection id", f_null },
223 { 0x1c, "facility", f_fac },
224 { 0x1e, "progress indicator", f_progi },
225 { 0x20, "network specific facilities", f_null },
226 { 0x24, "terminal capabilities", f_null },
227 { 0x27, "notification indicator", f_null },
228 { 0x28, "display", f_displ },
229 { 0x29, "date/time", f_date },
230 { 0x2c, "keypad", f_null },
231 { 0x30, "keypad echo", f_null },
232 { 0x32, "information request", f_null },
233 { 0x34, "signal", f_null },
234 { 0x36, "switchhook", f_null },
235 { 0x38, "feature activation", f_null },
236 { 0x39, "feature indication", f_null },
237 { 0x3a, "service profile id", f_null },
238 { 0x3b, "endpoint identifier", f_null },
239 { 0x40, "information rate", f_null },
240 { 0x41, "precedence level", f_null },
241 { 0x42, "end-to-end transit delay", f_null },
242 { 0x43, "transit delay detection", f_null },
243 { 0x44, "packet layer binary parms", f_null },
244 { 0x45, "packet layer window size", f_null },
245 { 0x46, "packet size", f_null },
246 { 0x47, "closed user group", f_null },
247 { 0x48, "link layer core parameters", f_null },
248 { 0x49, "link layer protocol parms", f_null },
249 { 0x4a, "reverse charging information", f_null },
250 { 0x4c, "connected number", f_cnu },
251 { 0x4d, "connected subaddress", f_null },
252 { 0x50, "X.213 priority", f_null },
253 { 0x51, "report type", f_null },
254 { 0x53, "link integrity verification", f_null },
255 { 0x57, "PVC status", f_null },
256 { 0x6c, "calling party number", f_cnu },
257 { 0x6d, "calling party subaddress", f_null },
258 { 0x70, "called party number", f_cnu },
259 { 0x71, "called party subaddress", f_null },
260 { 0x74, "redirecting number", f_null },
261 { 0x78, "transit network selection", f_null },
262 { 0x79, "restart indicator", f_null },
263 { 0x7c, "low layer compatibility", f_null },
264 { 0x7d, "high layer compatibility", f_hlc },
265 { 0x7e, "user-user", f_uu },
266 { 0x7f, "escape for extension", f_null },
267 { 0xff, "unknown information element", f_null }
270 /*---------------------------------------------------------------------------*
271 * decode Q.931 protocol
272 *---------------------------------------------------------------------------*/
274 layer3(char *pbuf, int n, int off, unsigned char *buf)
293 /* protocol discriminator */
297 if(pd >= 0x00 && pd <= 0x07)
298 sprintf(buffer, "User-User IE (0x%02x)",pd);
300 sprintf(buffer, "Q.931/I.451");
301 else if(pd >= 0x10 && pd <= 0x3f)
302 sprintf(buffer, "Other Layer 3 or X.25 (0x%02x)",pd);
303 else if(pd >= 0x40 && pd <= 0x4f)
304 sprintf(buffer, "National Use (0x%02x)",pd);
305 else if(pd >= 0x50 && pd <= 0xfe)
306 sprintf(buffer, "Other Layer 3 or X.25 (0x%02x)",pd);
308 sprintf(buffer, "Reserved (0x%02x)",pd);
310 sprintline(3, (pbuf+strlen(pbuf)), off+i, pd, 0xff, "Protocol discriminator = %s", buffer);
316 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0xff, "-");
324 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0xf0, "Call Reference");
329 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Length of Call Reference = 0 (Dummy CR)");
332 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Length of Call Reference = 1");
334 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x80, "Call Reference sent %s origination side", (buf[i] & 0x80) ? "to" : "from");
335 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "Call Reference = %d = 0x%02x", (buf[i] & 0x7f), (buf[i] & 0x7f));
338 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Length of Call Reference = 2");
340 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x80, "Call Reference sent %s origination side", (buf[i] & 0x80) ? "to" : "from");
341 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "Call reference = %d = %02x", (buf[i] & 0x7f), (buf[i] & 0x7f));
343 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0xff, "Call reference = %d = %02x", (buf[i]), (buf[i]));
350 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x80, "Message type extension = %d", buf[i] & 0x80 ? 1 : 0);
352 if(buf[i] <= MTTAB_MAX)
353 strcpy(buffer, mttab[buf[i]]);
355 sprintf(buffer, "unknown (0x%02x)", buf[i]);
357 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "Message type = %s", buffer);
360 /* information elements */
364 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x80, "%s Information element", buf[i] & 0x80 ? "Single octet" : "Variable length");
368 /* single octett info element type 1 */
370 if((buf[i] & 0x70) == 0x00)
372 strcpy(buffer, "Reserved");
373 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x70, "Reserved");
374 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Reserved, content of IE");
376 else if((buf[i] & 0x70) == 0x10)
378 strcpy(buffer, "Shift");
379 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x70, "Shift");
380 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x08, "%s shift", buf[i] & 0x08 ? "Non-locking" : "Locking");
382 switch(buf[i] & 0x07)
385 strcpy(buffer, "Not applicable");
390 sprintf(buffer, "Reserved (%d)", buf[i] & 0x07);
393 strcpy(buffer, "Codeset 4 (ISO/IEC)");
396 strcpy(buffer, "Codeset 5 (National use)");
399 strcpy(buffer, "Codeset 6 (Local network specific)");
402 strcpy(buffer, "Codeset 7 (User specific)");
405 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x07, "%s", buffer);
408 else if((buf[i] & 0x70) == 0x30)
410 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x70, "Congestion Level");
411 switch(buf[i] & 0x0f)
414 strcpy(buffer, "receiver ready");
417 strcpy(buffer, "receiver not ready");
420 sprintf(buffer, "reserved (0x%02x)", buf[i] & 0x0f);
423 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Congestion Level = ", buffer);
426 else if((buf[i] & 0x70) == 0x50)
428 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x70, "Repeat Indicator");
429 switch(buf[i] & 0x0f)
432 strcpy(buffer, "Prioritized list for selecting one possibility");
435 sprintf(buffer, "reserved (0x%02x)", buf[i] & 0x0f);
438 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x0f, "Repeat indication = ", buffer);
442 /* single octett info element type 2 */
444 else if((buf[i] & 0x7f) == 0x20)
446 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "More data");
448 else if((buf[i] & 0x7f) == 0x21)
450 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "Sending complete");
454 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0xff, "UNKNOWN single octet IE = 0x%02x", buf[i]);
462 struct ie *iep = &ietab[0];
466 if((iep->code == buf[i]) ||
472 sprintline(3, (pbuf+strlen(pbuf)), off+i, buf[i], 0x7f, "IE = %s", iep->name);
473 sprintline(3, pbuf+strlen(pbuf), off+i+1, buf[i+1], 0xff, "IE Length = %d", buf[i+1]);
475 if(iep->func == f_null)
480 i += (iep->func)(pbuf, &buf[i], off+i);
486 sprintf((pbuf+strlen(pbuf)), "UNKNOWN CODESET=%d, IE=0x%02x", codeset, buf[i]);
489 i++; /* index -> length */
493 sprintf((pbuf+strlen(pbuf)), "LEN=0x%02x, DATA=", len);
495 i++; /* index -> 1st param */
497 for(j = 0; j < len; j++)
499 sprintf((pbuf+strlen(pbuf)),"0x%02x ", buf[j+i]);
502 sprintf((pbuf+strlen(pbuf)),"]\n");
508 if(!codelock && (codeset != oldcodeset))
509 codeset = oldcodeset;
512 /* sprintf((pbuf+strlen(pbuf)),"\n"); */