?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
No empty .Rs/.Re
[netbsd-mini2440.git] / usr.sbin / isdn / isdntrace / 1tr6.c
blob2910c9eef5103ab8995643306252d30adcb682e2
1 /*
2 * Copyright (c) 1997, 1999 Hellmuth Michaelis. All rights reserved.
3 *
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
6 * are met:
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.
12 *
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
23 * SUCH DAMAGE.
24 *
25 *---------------------------------------------------------------------------
26 *
27 * 1tr6.c - print 1TR6 protocol traces
28 * -----------------------------------
29 *
30 * $Id: 1tr6.c,v 1.3 2003/10/06 09:43:28 itojun Exp $
31 *
32 * $FreeBSD$
33 *
34 * last edit-date: [Mon Dec 13 21:55:31 1999]
35 *
36 *---------------------------------------------------------------------------*/
37
38 #include "trace.h"
39
40 static int p_1tr6address(char *pbuf, unsigned char buf[]);
41 static int p_1tr6cause(char *pbuf, unsigned char buf[]);
42
43 /*---------------------------------------------------------------------------*
44 * decode the (german) national specific 1TR6 protocol
45 *---------------------------------------------------------------------------*/
46 void
47 decode_1tr6(char *pbuf, int n, int off, unsigned char *buf, int raw)
48 {
49 int codeset = 0;
50 int oldcodeset = 0;
51 int codelock = 0;
52
53 int pd;
54 int len;
55 int j;
56 int i;
57
58 if (n <= 0)
59 return;
60
61 *pbuf = '\0';
62
63 if (raw)
64 {
65 for (i = 0; i < n; i += 16)
66 {
67 sprintf((pbuf+strlen(pbuf)),"Dump:%.3d ", i+off);
68 for (j = 0; j < 16; j++)
69 if (i + j < n)
70 sprintf((pbuf+strlen(pbuf)),"%02x ", buf[i + j]);
71 else
72 sprintf((pbuf+strlen(pbuf))," ");
73 sprintf((pbuf+strlen(pbuf))," ");
74 for (j = 0; j < 16 && i + j < n; j++)
75 if (isprint(buf[i + j]))
76 sprintf((pbuf+strlen(pbuf)),"%c", buf[i + j]);
77 else
78 sprintf((pbuf+strlen(pbuf)),".");
79 sprintf((pbuf+strlen(pbuf)),"\n");
80 }
81 }
82
83 sprintf((pbuf+strlen(pbuf)), "1TR6: ");
84
85 /* protocol discriminator */
86
87 i = 0;
88
89 pd = buf[i];
90
91 switch (pd)
92 {
93 case 0x40:
94 sprintf((pbuf+strlen(pbuf)), "pd=N0, ");
95 break;
96 case 0x41:
97 sprintf((pbuf+strlen(pbuf)), "pd=N1, ");
98 break;
99 default:
100 sprintf((pbuf+strlen(pbuf)), "pd=UNDEF (0x%02x), ",pd);
101 break;
102 }
103
104 /* call reference */
105
106 i++;
107
108 len = buf[i] & 0x0f;
109
110 switch (len)
111 {
112 case 1:
113 sprintf((pbuf+strlen(pbuf)), "cr=0x%02x %s, ", (buf[i+1] & 0x7f), (buf[i+1] & 0x80) ? "(from destination)" : "(from origination)");
114 break;
115 default:
116 sprintf((pbuf+strlen(pbuf)), "cr: LEN=%d %s 0x%02x 0x%02x, ", len, (buf[i+1] & 0x80) ? "org" : "dst", (buf[i+1] & 0x7f), (buf[i+2] & 0x7f));
117 break;
118 }
119
120 i += (len+1);
121
122 /* message type */
123
124 sprintf((pbuf+strlen(pbuf)), "message=");
125
126 if (pd == 0x40) /* protocol discriminator N0 */
127 {
128 switch (buf[i])
129 {
130 case 0x61:
131 sprintf((pbuf+strlen(pbuf)), "REGISTER INDICATION: ");
132 break;
133 case 0x62:
134 sprintf((pbuf+strlen(pbuf)), "CANCEL INDICATION: ");
135 break;
136 case 0x63:
137 sprintf((pbuf+strlen(pbuf)), "FACILITY STATUS: ");
138 break;
139 case 0x64:
140 sprintf((pbuf+strlen(pbuf)), "STATUS ACKNOWLEDGE: ");
141 break;
142 case 0x65:
143 sprintf((pbuf+strlen(pbuf)), "STATUS REJECT: ");
144 break;
145 case 0x66:
146 sprintf((pbuf+strlen(pbuf)), "FACILITY INFORMATION: ");
147 break;
148 case 0x67:
149 sprintf((pbuf+strlen(pbuf)), "INFORMATION ACKNOWLEDGE: ");
150 break;
151 case 0x68:
152 sprintf((pbuf+strlen(pbuf)), "INFORMATION REJECT: ");
153 break;
154 case 0x75:
155 sprintf((pbuf+strlen(pbuf)), "CLOSE: ");
156 break;
157 case 0x77:
158 sprintf((pbuf+strlen(pbuf)), "CLOSE ACKNOWLEDGE: ");
159 break;
160 default:
161 sprintf((pbuf+strlen(pbuf)), "ERROR: PD=0x40 MSG=0x%02x, ", buf[i]);
162 break;
163 }
164 }
165 else if (pd == 0x41)
166 {
167 switch (buf[i])
168 {
169 case 0x00:
170 sprintf((pbuf+strlen(pbuf)), "ESCAPE: ");
171 break;
172 case 0x01:
173 sprintf((pbuf+strlen(pbuf)), "ALERT: ");
174 break;
175 case 0x02:
176 sprintf((pbuf+strlen(pbuf)), "CALL SENT: ");
177 break;
178 case 0x07:
179 sprintf((pbuf+strlen(pbuf)), "CONNECT: ");
180 break;
181 case 0x0f:
182 sprintf((pbuf+strlen(pbuf)), "CONNECT ACKNOWLEDGE: ");
183 break;
184 case 0x05:
185 sprintf((pbuf+strlen(pbuf)), "SETUP: ");
186 break;
187 case 0x0d:
188 sprintf((pbuf+strlen(pbuf)), "SETUP ACKNOWLEDGE: ");
189 break;
190
191 case 0x26:
192 sprintf((pbuf+strlen(pbuf)), "RESUME: ");
193 break;
194 case 0x2e:
195 sprintf((pbuf+strlen(pbuf)), "RESUME ACKNOWLEDGE: ");
196 break;
197 case 0x22:
198 sprintf((pbuf+strlen(pbuf)), "RESUME REJECT: ");
199 break;
200 case 0x25:
201 sprintf((pbuf+strlen(pbuf)), "SUSPEND: ");
202 break;
203 case 0x2d:
204 sprintf((pbuf+strlen(pbuf)), "SUSPEND ACKNOWLEDGE: ");
205 break;
206 case 0x21:
207 sprintf((pbuf+strlen(pbuf)), "SUSPEND REJECT: ");
208 break;
209 case 0x20:
210 sprintf((pbuf+strlen(pbuf)), "USER INFORMATION: ");
211 break;
212
213 case 0x40:
214 sprintf((pbuf+strlen(pbuf)), "DETACH");
215 break;
216 case 0x45:
217 sprintf((pbuf+strlen(pbuf)), "DISCONNECT: ");
218 break;
219 case 0x4d:
220 sprintf((pbuf+strlen(pbuf)), "RELEASE: ");
221 break;
222 case 0x5a:
223 sprintf((pbuf+strlen(pbuf)), "RELEASE ACKNOWLEDGE");
224 break;
225
226 case 0x6e:
227 sprintf((pbuf+strlen(pbuf)), "CANCEL ACKNOWLEDGE: ");
228 break;
229 case 0x67:
230 sprintf((pbuf+strlen(pbuf)), "CANCEL REJECT: ");
231 break;
232 case 0x69:
233 sprintf((pbuf+strlen(pbuf)), "CONGESTION CONTROL: ");
234 break;
235 case 0x60:
236 sprintf((pbuf+strlen(pbuf)), "FACILITY: ");
237 break;
238 case 0x68:
239 sprintf((pbuf+strlen(pbuf)), "FACILITY ACKNOWLEDGE: ");
240 break;
241 case 0x66:
242 sprintf((pbuf+strlen(pbuf)), "FACILITY CANCEL: ");
243 break;
244 case 0x64:
245 sprintf((pbuf+strlen(pbuf)), "FACILITY REGISTER: ");
246 break;
247 case 0x65:
248 sprintf((pbuf+strlen(pbuf)), "FACILITY REJECT: ");
249 break;
250 case 0x6d:
251 sprintf((pbuf+strlen(pbuf)), "INFORMATION: ");
252 break;
253 case 0x6c:
254 sprintf((pbuf+strlen(pbuf)), "REGISTER ACKNOWLEDGE: ");
255 break;
256 case 0x6f:
257 sprintf((pbuf+strlen(pbuf)), "REGISTER REJECT: ");
258 break;
259 case 0x63:
260 sprintf((pbuf+strlen(pbuf)), "STATUS: ");
261 break;
262
263 default:
264 sprintf((pbuf+strlen(pbuf)), "ERROR: PD=0x41 MSG=0x%02x, ", buf[i]);
265 break;
266 }
267 }
268 else
269 {
270 sprintf((pbuf+strlen(pbuf)), "ERROR: PD=0x%02x MSG=0x%02x, ", pd, buf[i]);
271 }
272
273 /* other information elements */
274
275 i++;
276
277 for (; i < n;)
278 {
279 sprintf((pbuf+strlen(pbuf)), "\n ");
280
281 if (buf[i] & 0x80)
282 {
283 /* single octett info element */
284
285 switch (buf[i] & 0x70)
286 {
287 case 0x00: /* reserved */
288 sprintf((pbuf+strlen(pbuf)), "[reserved single octett info]");
289 break;
290
291 case 0x10: /* shift */
292 oldcodeset = codeset;
293 codeset = buf[i] & 0x07;
294 if (buf[i] & 0x08)
295 codelock = 0;
296 else
297 codelock = 1;
298 sprintf((pbuf+strlen(pbuf)), "[shift: codeset=%d lock=%d]", codeset, codelock);
299 break;
300
301 case 0x20: /* more data */
302 sprintf((pbuf+strlen(pbuf)), "[more data]");
303 break;
304
305 case 0x30: /* congestion level */
306 sprintf((pbuf+strlen(pbuf)), "[congestion level = %d]", buf[i] & 0x0f);
307 break;
308
309 default:
310 sprintf((pbuf+strlen(pbuf)), "[UNDEF SINGLE OCTET ELEMENT 0x%02x]", buf[i]);
311 break;
312 }
313
314 i++; /* next */
315
316 }
317 else
318 {
319 /* variable length info element */
320
321 if (codeset == 0)
322 {
323 switch (buf[i])
324 {
325 case 0x08:
326 sprintf((pbuf+strlen(pbuf)), "[cause: ");
327 i += p_1tr6cause(pbuf, &buf[i]);
328 goto next;
329 break;
330
331 case 0x0c:
332 sprintf((pbuf+strlen(pbuf)), "[connected address: ");
333 i += p_1tr6address(pbuf, &buf[i]);
334 goto next;
335 break;
336
337 case 0x10:
338 sprintf((pbuf+strlen(pbuf)), "[call identity: ");
339 break;
340 case 0x18:
341 sprintf((pbuf+strlen(pbuf)), "[channel id: channel=");
342 i += 2;
343 switch (buf[i] & 0x03)
344 {
345 case 0:
346 sprintf((pbuf+strlen(pbuf)), "no channel");
347 break;
348 case 1:
349 sprintf((pbuf+strlen(pbuf)), "B-1");
350 break;
351 case 2:
352 sprintf((pbuf+strlen(pbuf)), "B-2");
353 break;
354 case 3:
355 sprintf((pbuf+strlen(pbuf)), "any channel");
356 break;
357 }
358 if (buf[i] & 0x08)
359 sprintf((pbuf+strlen(pbuf)), " (exclusive)]");
360 else
361 sprintf((pbuf+strlen(pbuf)), " (preferred)]");
362 i++;
363 goto next;
364 break;
365 case 0x20:
366 sprintf((pbuf+strlen(pbuf)), "[network specific facilities: ");
367 i++;
368 len = buf[i];
369 i+=2;
370 switch (buf[i])
371 {
372 case 1:
373 sprintf((pbuf+strlen(pbuf)), "Sperre");
374 break;
375 case 2:
376 sprintf((pbuf+strlen(pbuf)), "AWS 1");
377 break;
378 case 3:
379 sprintf((pbuf+strlen(pbuf)), "AWS 2");
380 break;
381 case 0xe:
382 sprintf((pbuf+strlen(pbuf)), "Konferenz");
383 break;
384 case 0xf:
385 sprintf((pbuf+strlen(pbuf)), "B-Kan uebern.");
386 break;
387 case 0x10:
388 sprintf((pbuf+strlen(pbuf)), "aktvrg. ghlt. Vbdg.");
389 break;
390 case 0x11:
391 sprintf((pbuf+strlen(pbuf)), "3er Konf");
392 break;
393 case 0x12:
394 sprintf((pbuf+strlen(pbuf)), "1seitg D/G Wechsel");
395 break;
396 case 0x13:
397 sprintf((pbuf+strlen(pbuf)), "2seitig D/G Wechsel");
398 break;
399 case 0x14:
400 sprintf((pbuf+strlen(pbuf)), "Rufnr. identifiz.");
401 break;
402 case 0x15:
403 sprintf((pbuf+strlen(pbuf)), "GBG");
404 break;
405 case 0x17:
406 sprintf((pbuf+strlen(pbuf)), "ueberg. Ruf");
407 break;
408 case 0x1a:
409 sprintf((pbuf+strlen(pbuf)), "um/weitergel. Ruf");
410 break;
411 case 0x1b:
412 sprintf((pbuf+strlen(pbuf)), "unterdr. A-Rufnr.");
413 break;
414 case 0x1e:
415 sprintf((pbuf+strlen(pbuf)), "Verbdg. deaktivieren");
416 break;
417 case 0x1d:
418 sprintf((pbuf+strlen(pbuf)), "Verbdg. aktivieren");
419 break;
420 case 0x1f:
421 sprintf((pbuf+strlen(pbuf)), "SPV");
422 break;
423 case 0x23:
424 sprintf((pbuf+strlen(pbuf)), "Rueckw. 2seitg. DW");
425 break;
426 case 0x24:
427 sprintf((pbuf+strlen(pbuf)), "Anrufumltg. priv. Netz");
428 break;
429 default:
430 sprintf((pbuf+strlen(pbuf)), "undefined");
431 break;
432 }
433 i++;
434 sprintf((pbuf+strlen(pbuf)), ", serv=%d", buf[i]);
435 i++;
436 sprintf((pbuf+strlen(pbuf)), ", ainfo=%d", buf[i]);
437 i++;
438 len-=4;
439 for (j = 0; j < len; j++)
440 {
441 sprintf((pbuf+strlen(pbuf))," 0x%02x", buf[j+i]);
442 }
443 sprintf((pbuf+strlen(pbuf)),"]");
444 i += j;
445 goto next;
446 break;
447 case 0x28:
448 sprintf((pbuf+strlen(pbuf)), "[display: ");
449 break;
450 case 0x2c:
451 sprintf((pbuf+strlen(pbuf)), "[keypad: ");
452 break;
453 case 0x6c:
454 sprintf((pbuf+strlen(pbuf)), "[origination address: ");
455 i += p_1tr6address(pbuf, &buf[i]);
456 goto next;
457 break;
458 case 0x70:
459 sprintf((pbuf+strlen(pbuf)), "[destination address: ");
460 i += p_1tr6address(pbuf, &buf[i]);
461 goto next;
462 break;
463 case 0x7e:
464 sprintf((pbuf+strlen(pbuf)), "[user-user information: ");
465 break;
466 case 0x7f:
467 sprintf((pbuf+strlen(pbuf)), "[reserved: ");
468 break;
469 default:
470 sprintf((pbuf+strlen(pbuf)), "[UNKNOWN INFO-ELEMENT-ID");
471 break;
472 }
473 }
474 else if (codeset == 6)
475 {
476 switch (buf[i])
477 {
478 case 0x01:
479 sprintf((pbuf+strlen(pbuf)), "[service ind: serv=");
480 i+= 2;
481 switch (buf[i])
482 {
483 case 0x01:
484 sprintf((pbuf+strlen(pbuf)), "phone");
485 break;
486 case 0x02:
487 sprintf((pbuf+strlen(pbuf)), "a/b");
488 break;
489 case 0x03:
490 sprintf((pbuf+strlen(pbuf)), "X.21");
491 break;
492 case 0x04:
493 sprintf((pbuf+strlen(pbuf)), "fax g4");
494 break;
495 case 0x05:
496 sprintf((pbuf+strlen(pbuf)), "btx");
497 break;
498 case 0x07:
499 sprintf((pbuf+strlen(pbuf)), "64k data");
500 break;
501 case 0x08:
502 sprintf((pbuf+strlen(pbuf)), "X.25");
503 break;
504 case 0x09:
505 sprintf((pbuf+strlen(pbuf)), "teletex");
506 break;
507 case 0x0a:
508 sprintf((pbuf+strlen(pbuf)), "mixed");
509 break;
510 case 0x0d:
511 sprintf((pbuf+strlen(pbuf)), "temex");
512 break;
513 case 0x0e:
514 sprintf((pbuf+strlen(pbuf)), "picturephone");
515 break;
516 case 0x0f:
517 sprintf((pbuf+strlen(pbuf)), "btx (new)");
518 break;
519 case 0x10:
520 sprintf((pbuf+strlen(pbuf)), "videophone");
521 break;
522 default:
523 sprintf((pbuf+strlen(pbuf)), "undefined");
524 break;
525 }
526 i++;
527 sprintf((pbuf+strlen(pbuf)), ", ainfo=0x%02x]", buf[i]);
528 i++;
529 goto next;
530 break;
531 case 0x02:
532 sprintf((pbuf+strlen(pbuf)), "[charging information: ");
533 break;
534 case 0x03:
535 sprintf((pbuf+strlen(pbuf)), "[date: ");
536 i++;
537 len = buf[i];
538 i++;
539 for (j = 0; j < len; j++)
540 {
541 sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]);
542 }
543 sprintf((pbuf+strlen(pbuf)),"]");
544 i += j;
545 goto next;
546 break;
547 case 0x05:
548 sprintf((pbuf+strlen(pbuf)), "[facility select: ");
549 break;
550 case 0x06:
551 sprintf((pbuf+strlen(pbuf)), "[status of facilities: ");
552 break;
553 case 0x07:
554 sprintf((pbuf+strlen(pbuf)), "[status of called party: ");
555 i+=2;
556 switch (buf[i])
557 {
558 case 1:
559 sprintf((pbuf+strlen(pbuf)), "no information]");
560 break;
561 case 2:
562 sprintf((pbuf+strlen(pbuf)), "is being called]");
563 break;
564 default:
565 sprintf((pbuf+strlen(pbuf)), "undefined (0x%02x)]", buf[i]);
566 break;
567 }
568 i++;
569 goto next;
570 break;
571 case 0x08:
572 sprintf((pbuf+strlen(pbuf)), "[additional tx attributes: ");
573 i++;
574 len = buf[i];
575 i++;
576 for (j = 0; j < len; j++)
577 {
578 switch (buf[j+i] &0x70)
579 {
580 case 0:
581 sprintf((pbuf+strlen(pbuf)), "no satellite link");
582 break;
583 case 1:
584 sprintf((pbuf+strlen(pbuf)), "one satellite link");
585 break;
586 case 2:
587 sprintf((pbuf+strlen(pbuf)), "two satellite links");
588 break;
589 case 3:
590 sprintf((pbuf+strlen(pbuf)), "three satellite links");
591 break;
592 default:
593 sprintf((pbuf+strlen(pbuf)), "undefined value");
594 break;
595 }
596 if (buf[j+i] & 0x80)
597 sprintf((pbuf+strlen(pbuf)),"(flag=req)]");
598 else
599 sprintf((pbuf+strlen(pbuf)),"(flag=ind)]");
600 }
601 i += j;
602 goto next;
603 break;
604 default:
605 sprintf((pbuf+strlen(pbuf)), "[UNKNOWN INFO-ELEMENT-ID");
606 break;
607 }
608 }
609 else
610 {
611 sprintf((pbuf+strlen(pbuf)), "[ILLEGAL CODESET = 0x%02x", codeset);
612 }
613
614 i++; /* index -> length */
615
616 len = buf[i];
617
618 i++; /* index -> 1st param */
619
620 for (j = 0; j < len; j++)
621 {
622 sprintf((pbuf+strlen(pbuf))," 0x%02x", buf[j+i]);
623 }
624
625 sprintf((pbuf+strlen(pbuf)),"]");
626
627 i += len;
628
629 next:
630
631 if (!codelock && (codeset != oldcodeset))
632 codeset = oldcodeset;
633 }
634 }
635 sprintf((pbuf+strlen(pbuf)),"\n");
636 }
637
638 /*---------------------------------------------------------------------------*
639 * decode and print the cause
640 *---------------------------------------------------------------------------*/
641 static int
642 p_1tr6cause(char *pbuf, unsigned char buf[])
643 {
644 int j;
645 int len;
646 int i = 0;
647
648 i++; /* index -> length */
649
650 len = buf[i];
651
652 switch (len)
653 {
654 case 0:
655 sprintf((pbuf+strlen(pbuf)), "%s", print_cause_1tr6(0));
656 break;
657 case 1:
658 i++;
659 sprintf((pbuf+strlen(pbuf)), "%s", print_cause_1tr6(buf[i] & 0x7f));
660 break;
661 case 2:
662 i++;
663 sprintf((pbuf+strlen(pbuf)), "%s, location: ", print_cause_1tr6(buf[i] & 0x7f));
664 i++;
665 switch (buf[i] & 0x0f)
666 {
667 case 0x04:
668 sprintf((pbuf+strlen(pbuf)), "public network");
669 break;
670 case 0x05:
671 sprintf((pbuf+strlen(pbuf)), "private network");
672 break;
673 case 0x0f:
674 sprintf((pbuf+strlen(pbuf)), "no information");
675 break;
676 default:
677 sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", buf[i] & 0x0f);
678 break;
679 }
680 break;
681 default:
682 i++; /* index -> length */
683 len = buf[i];
684 i++; /* index -> 1st param */
685 for (j = 0; j < len; j++)
686 {
687 sprintf((pbuf+strlen(pbuf))," 0x%02x", buf[j+i]);
688 }
689 break;
690 }
691 i++;
692 sprintf((pbuf+strlen(pbuf)),"]");
693 return(i);
694 }
695
696 /*---------------------------------------------------------------------------*
697 * decode and print the ISDN (telephone) number
698 *---------------------------------------------------------------------------*/
699 static int
700 p_1tr6address(char *pbuf, unsigned char buf[])
701 {
702 int j;
703 int len;
704 int i = 0;
705 int tp;
706
707 i++; /* index -> length */
708 len = buf[i];
709 i++; /* index -> 1st param */
710 tp = buf[i];
711
712 i++;
713 len--;
714
715 for (j = 0; j < len; j++)
716 {
717 sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]);
718 }
719
720 switch ((tp & 0x70) >> 4)
721 {
722 case 0:
723 sprintf((pbuf+strlen(pbuf)), " (type=unknown, ");
724 break;
725 case 1:
726 sprintf((pbuf+strlen(pbuf)), " (type=international, ");
727 break;
728 case 2:
729 sprintf((pbuf+strlen(pbuf)), " (type=national, ");
730 break;
731 default:
732 sprintf((pbuf+strlen(pbuf)), " (type=%d, ", ((tp & 0x70) >> 4));
733 break;
734 }
735
736 switch (tp & 0x0f)
737 {
738 case 0:
739 sprintf((pbuf+strlen(pbuf)), "plan=unknown)");
740 break;
741 case 1:
742 sprintf((pbuf+strlen(pbuf)), "plan=ISDN)");
743 break;
744 default:
745 sprintf((pbuf+strlen(pbuf)), "plan=%d)", (tp & 0x0f));
746 break;
747 }
748
749 sprintf((pbuf+strlen(pbuf)),"]");
750
751 i += j;
752
753 return(i);
754 }
755
756 /* EOF */
NetBSD on the FriendlyARM MINI2440