/* * Copyright (c) 1997, 2000 Hellmuth Michaelis. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * *--------------------------------------------------------------------------- * * q931_util.c - utility functions to print Q.931 traces * ----------------------------------------------------- * * $Id: q931_util.c,v 1.1.1.1 2001/01/06 13:00:32 martin Exp $ * * $FreeBSD$ * * last edit-date: [Tue Feb 15 13:52:09 2000] * *---------------------------------------------------------------------------*/ #include "trace.h" /*---------------------------------------------------------------------------* * decode and print the cause *---------------------------------------------------------------------------*/ int p_q931cause(char *pbuf, unsigned char *buf) { int j; int len; int i = 0; int ls; int r = 0; int rflag = 0; i++; /* index -> length */ len = buf[i]; i++; /* coding/location */ len--; ls = buf[i]; i++; len--; if(!(buf[i-1] & 0x80)) { r = buf[i]; rflag = 1; i++; len--; } sprintf((pbuf+strlen(pbuf)), "%s ", print_cause_q850(buf[i] & 0x7f)); sprintf((pbuf+strlen(pbuf)), "\n (location="); switch(ls & 0x0f) { case 0x00: sprintf((pbuf+strlen(pbuf)), "user"); break; case 0x01: sprintf((pbuf+strlen(pbuf)), "private network serving local user"); break; case 0x02: sprintf((pbuf+strlen(pbuf)), "public network serving local user"); break; case 0x03: sprintf((pbuf+strlen(pbuf)), "transit network"); break; case 0x04: sprintf((pbuf+strlen(pbuf)), "public network serving remote user"); break; case 0x05: sprintf((pbuf+strlen(pbuf)), "private network serving remote user"); break; case 0x07: sprintf((pbuf+strlen(pbuf)), "international network"); break; case 0x0a: sprintf((pbuf+strlen(pbuf)), "network beyond interworking point"); break; default: sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", ls & 0x0f); break; } sprintf((pbuf+strlen(pbuf)), ", std="); switch((ls & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "CCITT"); break; case 1: sprintf((pbuf+strlen(pbuf)), "ISO/IEC"); break; case 2: sprintf((pbuf+strlen(pbuf)), "National"); break; case 3: sprintf((pbuf+strlen(pbuf)), "Local"); break; } if(rflag) { sprintf((pbuf+strlen(pbuf)), ", rec="); switch(r & 0x7f) { case 0: sprintf((pbuf+strlen(pbuf)), "Q.931"); break; case 3: sprintf((pbuf+strlen(pbuf)), "X.21"); break; case 4: sprintf((pbuf+strlen(pbuf)), "X.25"); break; case 5: sprintf((pbuf+strlen(pbuf)), "Q.1031/Q.1051"); break; default: sprintf((pbuf+strlen(pbuf)), "Reserved"); break; } } sprintf((pbuf+strlen(pbuf)),")"); i++; len--; for(j = 0; j < len; j++) sprintf((pbuf+strlen(pbuf))," 0x%02x", buf[j+i]); sprintf((pbuf+strlen(pbuf)),"]"); i += (len+1); return(i); } /*---------------------------------------------------------------------------* * decode and print the bearer capability *---------------------------------------------------------------------------*/ int p_q931bc(char *pbuf, unsigned char *buf) { int len; int i = 0; int mr = 0; i++; /* index -> length */ len = buf[i]; i++; sprintf((pbuf+strlen(pbuf)), "\n cap="); switch(buf[i] & 0x1f) { case 0x00: sprintf((pbuf+strlen(pbuf)), "speech"); break; case 0x08: sprintf((pbuf+strlen(pbuf)), "unrestricted digital information"); break; case 0x09: sprintf((pbuf+strlen(pbuf)), "restricted digital information"); break; case 0x10: sprintf((pbuf+strlen(pbuf)), "3.1 kHz audio"); break; case 0x11: sprintf((pbuf+strlen(pbuf)), "unrestricted digital information with tones"); break; case 0x18: sprintf((pbuf+strlen(pbuf)), "video"); break; default: sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", buf[i] & 0x0f); break; } sprintf((pbuf+strlen(pbuf)), "\n std="); switch((buf[i] & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "CCITT"); break; case 1: sprintf((pbuf+strlen(pbuf)), "ISO/IEC"); break; case 2: sprintf((pbuf+strlen(pbuf)), "National"); break; case 3: sprintf((pbuf+strlen(pbuf)), "NSI Std"); break; } i++; len--; sprintf((pbuf+strlen(pbuf)), "\n rate="); switch(buf[i] & 0x1f) { case 0x00: sprintf((pbuf+strlen(pbuf)), "packet mode"); break; case 0x10: sprintf((pbuf+strlen(pbuf)), "64 kbit/s"); break; case 0x11: sprintf((pbuf+strlen(pbuf)), "2 x 64 kbit/s"); break; case 0x13: sprintf((pbuf+strlen(pbuf)), "384 kbit/s"); break; case 0x15: sprintf((pbuf+strlen(pbuf)), "1536 kbit/s"); break; case 0x17: sprintf((pbuf+strlen(pbuf)), "1920 kbit/s"); break; case 0x18: sprintf((pbuf+strlen(pbuf)), "Multirate"); mr = 1; break; default: sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", buf[i] & 0x0f); break; } sprintf((pbuf+strlen(pbuf)), "\n mode="); switch((buf[i] & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "circuit"); break; case 2: sprintf((pbuf+strlen(pbuf)), "packet"); break; default: sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", ((buf[i] & 0x60) >> 5)); break; } i++; len--; if(!len) goto exit; if(mr) { sprintf((pbuf+strlen(pbuf)), "\n rate multiplier=%d", buf[i] & 0x7f); i++; len--; } if(!len) goto exit; sprintf((pbuf+strlen(pbuf)), "\n layer1="); switch(buf[i] & 0x1f) { case 0x01: sprintf((pbuf+strlen(pbuf)), "V.110"); break; case 0x02: sprintf((pbuf+strlen(pbuf)), "G.711 u-law"); break; case 0x03: sprintf((pbuf+strlen(pbuf)), "G.711 A-law"); break; case 0x04: sprintf((pbuf+strlen(pbuf)), "G.721"); break; case 0x05: sprintf((pbuf+strlen(pbuf)), "H.221/H.242"); break; case 0x07: sprintf((pbuf+strlen(pbuf)), "Non-Std"); break; case 0x08: sprintf((pbuf+strlen(pbuf)), "V.120"); break; case 0x09: sprintf((pbuf+strlen(pbuf)), "X.31"); break; default: sprintf((pbuf+strlen(pbuf)), "reserved (0x%02x)", buf[i] & 0x0f); break; } i++; len--; if(!len) goto exit; if(!(buf[i-1] & 0x80)) { sprintf((pbuf+strlen(pbuf)), "\n user rate=0x%02x ", buf[i] & 0x1f); if(buf[i] & 0x40) sprintf((pbuf+strlen(pbuf)), "(async,"); else sprintf((pbuf+strlen(pbuf)), "(sync,"); if(buf[i] & 0x20) sprintf((pbuf+strlen(pbuf)), "in-band neg. possible)"); else sprintf((pbuf+strlen(pbuf)), "in-band neg not possible)"); i++; len--; } if(!len) goto exit; if(!(buf[i-1] & 0x80)) { sprintf((pbuf+strlen(pbuf)), "\n clk/flow=0x%02x", buf[i] & 0x1f); sprintf((pbuf+strlen(pbuf)), "\n intermediate rate="); switch((buf[i] & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "not used"); break; case 1: sprintf((pbuf+strlen(pbuf)), "8 kbit/s"); break; case 2: sprintf((pbuf+strlen(pbuf)), "16 kbit/s"); break; case 3: sprintf((pbuf+strlen(pbuf)), "32 kbit/s"); break; } i++; len--; } if(!len) goto exit; if(!(buf[i-1] & 0x80)) { sprintf((pbuf+strlen(pbuf)), "\n hdr/mfrm/etc.=0x%02x", buf[i]); i++; len--; } if(!len) goto exit; if(!(buf[i-1] & 0x80)) { sprintf((pbuf+strlen(pbuf)), "\n stop/data/parity=0x%02x", buf[i]); i++; len--; } if(!len) goto exit; if(!(buf[i-1] & 0x80)) { sprintf((pbuf+strlen(pbuf)), "\n modemtype=0x%02x", buf[i]); i++; len--; } if(!len) goto exit; switch(buf[i] & 0x7f) { case 0x42: sprintf((pbuf+strlen(pbuf)), "\n layer2=Q.921/I.441"); break; case 0x46: sprintf((pbuf+strlen(pbuf)), "\n layer2=X.25 link"); break; default: sprintf((pbuf+strlen(pbuf)), "\n layer2=0x%02x",(buf[i] & 0x7f)); break; } i++; len--; if(!len) goto exit; switch(buf[i] & 0x7f) { case 0x62: sprintf((pbuf+strlen(pbuf)), "\n layer3=Q.921/I.441"); break; case 0x66: sprintf((pbuf+strlen(pbuf)), "\n layer3=X.25 packet"); break; default: sprintf((pbuf+strlen(pbuf)), "\n layer3=0x%02x",(buf[i] & 0x7f)); break; } i++; len--; exit: sprintf((pbuf+strlen(pbuf)), "]"); return(i); } /*---------------------------------------------------------------------------* * decode and print the ISDN (telephone) number *---------------------------------------------------------------------------*/ int p_q931address(char *pbuf, unsigned char *buf) { int j; int len; int i = 0; int tp; int ind = 0; int indflag = 0; i++; /* index -> length */ len = buf[i]; i++; /* index -> type/plan */ tp = buf[i]; i++; len--; if(!(tp & 0x80)) { ind = buf[i]; indflag = 1; i++; len--; } for(j = 0; j < len; j++) { sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]); } switch((tp & 0x70) >> 4) { case 0: sprintf((pbuf+strlen(pbuf)), " (type=unknown, "); break; case 1: sprintf((pbuf+strlen(pbuf)), " (type=international, "); break; case 2: sprintf((pbuf+strlen(pbuf)), " (type=national, "); break; case 3: sprintf((pbuf+strlen(pbuf)), " (type=network specific, "); break; case 4: sprintf((pbuf+strlen(pbuf)), " (type=subscriber, "); break; case 6: sprintf((pbuf+strlen(pbuf)), " (type=abbreviated, "); break; default: sprintf((pbuf+strlen(pbuf)), " (type=reserved (%d), ", ((tp & 0x70) >> 4)); break; } switch(tp & 0x0f) { case 0: sprintf((pbuf+strlen(pbuf)), "plan=unknown"); break; case 1: sprintf((pbuf+strlen(pbuf)), "plan=ISDN"); break; case 3: sprintf((pbuf+strlen(pbuf)), "plan=Data"); break; case 4: sprintf((pbuf+strlen(pbuf)), "plan=Telex"); break; case 8: sprintf((pbuf+strlen(pbuf)), "plan=National"); break; case 9: sprintf((pbuf+strlen(pbuf)), "plan=private"); break; default: sprintf((pbuf+strlen(pbuf)), "plan=reserved (%d)", (tp & 0x0f)); break; } if(indflag) { sprintf((pbuf+strlen(pbuf)), ",\n "); switch((ind & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "presentation allowed, "); break; case 1: sprintf((pbuf+strlen(pbuf)), "presentation restricted, "); break; case 2: sprintf((pbuf+strlen(pbuf)), "number not available, "); break; case 3: sprintf((pbuf+strlen(pbuf)), "reserved, "); break; } switch(ind & 0x03) { case 0: sprintf((pbuf+strlen(pbuf)), "screening user provided: not screened"); break; case 1: sprintf((pbuf+strlen(pbuf)), "screening user provided: verified & passed"); break; case 2: sprintf((pbuf+strlen(pbuf)), "screening user provided: verified & failed"); break; case 3: sprintf((pbuf+strlen(pbuf)), "screening network provided"); break; } } sprintf((pbuf+strlen(pbuf)),")]"); i += j; return(i); } /*---------------------------------------------------------------------------* * decode and print HL comatibility *---------------------------------------------------------------------------*/ int p_q931high_compat(char *pbuf, unsigned char *buf) { int len = buf[1]; sprintf(pbuf+strlen(pbuf), " standard="); switch ((buf[2] >> 5) & 0x03) { case 0: sprintf(pbuf+strlen(pbuf), "CCITT"); break; case 1: sprintf(pbuf+strlen(pbuf), "unknown international standard"); break; case 2: sprintf(pbuf+strlen(pbuf), "unknown national standard"); break; case 3: sprintf(pbuf+strlen(pbuf), "local network standard"); } len--; sprintf(pbuf+strlen(pbuf), ", characteristics="); switch (buf[3] & 0x7f) { case 0x01: sprintf(pbuf+strlen(pbuf), "Telephony"); break; case 0x04: sprintf(pbuf+strlen(pbuf), "Fax Group 2/3"); break; case 0x21: sprintf(pbuf+strlen(pbuf), "Fax Group 4 Class I (F.184)"); break; case 0x24: sprintf(pbuf+strlen(pbuf), "Teletex basic/mixed (F.230) or Fax Group 4 Class II/III (F.184)"); break; case 0x28: sprintf(pbuf+strlen(pbuf), "Teletex basic/processable (F.220)"); break; case 0x31: sprintf(pbuf+strlen(pbuf), "Teletex basic mode (F.200)"); break; case 0x32: sprintf(pbuf+strlen(pbuf), "Videotex (F.300 and T.101)"); break; case 0x35: sprintf(pbuf+strlen(pbuf), "Telex (F.60)"); break; case 0x38: sprintf(pbuf+strlen(pbuf), "MHS (X.400 series)"); break; case 0x41: sprintf(pbuf+strlen(pbuf), "OSI application (X.200 series)"); break; case 0x5e: sprintf(pbuf+strlen(pbuf), "Maintenance"); break; case 0x5f: sprintf(pbuf+strlen(pbuf), "Management"); break; case 0x7f: sprintf(pbuf+strlen(pbuf), "reserved"); break; default: sprintf(pbuf+strlen(pbuf), "UNKNOWN (0x%02x)", buf[3]); break; } len--; if (!len) { sprintf(pbuf+strlen(pbuf), "]"); return 4; } sprintf(pbuf+strlen(pbuf), " of "); switch (buf[4] & 0x7f) { case 0x01: sprintf(pbuf+strlen(pbuf), "Telephony"); break; case 0x04: sprintf(pbuf+strlen(pbuf), "Fax Group 2/3"); break; case 0x21: sprintf(pbuf+strlen(pbuf), "Fax Group 4 Class I (F.184)"); break; case 0x24: sprintf(pbuf+strlen(pbuf), "Teletex basic/mixed (F.230) or Fax Group 4 Class II/III (F.184)"); break; case 0x28: sprintf(pbuf+strlen(pbuf), "Teletex basic/processable (F.220)"); break; case 0x31: sprintf(pbuf+strlen(pbuf), "Teletex basic mode (F.200)"); break; case 0x32: sprintf(pbuf+strlen(pbuf), "Videotex (F.300 and T.101)"); break; case 0x35: sprintf(pbuf+strlen(pbuf), "Telex (F.60)"); break; case 0x38: sprintf(pbuf+strlen(pbuf), "MHS (X.400 series)"); break; case 0x41: sprintf(pbuf+strlen(pbuf), "OSI application (X.200 series)"); break; case 0x7f: sprintf(pbuf+strlen(pbuf), "reserved"); break; default: sprintf(pbuf+strlen(pbuf), "UNKNOWN (0x%02x)", buf[3]); break; } sprintf(pbuf+strlen(pbuf), "]"); return 5; } /*---------------------------------------------------------------------------* * decode and print user-user IE *---------------------------------------------------------------------------*/ int p_q931user_user(char *pbuf, unsigned char *buf) { int j; int len; int i = 0; int pd; i++; /* index -> length */ len = buf[i]; i++; /* index -> protocoldiscriminator */ pd = buf[i]; switch(pd) { case 0: sprintf((pbuf+strlen(pbuf)), "(pd=user-specific"); break; case 1: sprintf((pbuf+strlen(pbuf)), "(pd=OSI high-layer protocols"); break; case 2: sprintf((pbuf+strlen(pbuf)), "(pd=X.244"); break; case 3: sprintf((pbuf+strlen(pbuf)), "(pd=reserved for system management"); break; case 4: sprintf((pbuf+strlen(pbuf)), "(pd=IA5 characters"); break; case 6: sprintf((pbuf+strlen(pbuf)), "(pd=X.208/X.209 coded user info"); break; case 7: sprintf((pbuf+strlen(pbuf)), "(pd=V.120 rate adaption"); break; case 8: sprintf((pbuf+strlen(pbuf)), "(pd=Q.931/I.451 user network call control messages"); break; default: if(pd >= 0x10 && pd <= 0x3f) sprintf((pbuf+strlen(pbuf)), "(pd=0x%x=reserved for other L3 protocols incl. X.25", pd); else if(pd >= 0x40 && pd <= 0x47) sprintf((pbuf+strlen(pbuf)), "(pd=0x%x=national use", pd); else if(pd >= 0x48 && pd <= 0x4f) sprintf((pbuf+strlen(pbuf)), "(pd=0x%x=reserved for ETSI", pd); else if(pd >= 0x50 && pd <= 0xfe) sprintf((pbuf+strlen(pbuf)), "(pd=0x%x=reserved for other L3 protocols incl. X.25", pd); else sprintf((pbuf+strlen(pbuf)), "(pd=0x%x=reserved", pd); break; } i++; len--; sprintf((pbuf+strlen(pbuf)),": ("); for(j = 0; j < len; j++) { if(pd == 4) sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]); else sprintf((pbuf+strlen(pbuf)),"0x%2x", buf[j+i]); } sprintf((pbuf+strlen(pbuf)),"))]"); i += j; return(i); } /*---------------------------------------------------------------------------* * decode and notification indicator IE (Q.932, p44) *---------------------------------------------------------------------------*/ int p_q931notification(char *pbuf, unsigned char *buf) { int j = 0; int len; int i = 0; int nd; i++; /* index -> length */ len = buf[i]; i++; /* index -> notification description */ nd = buf[i]; switch(nd) { case 0x80: sprintf((pbuf+strlen(pbuf)), "0x%2x, user suspended", nd); break; case 0x81: sprintf((pbuf+strlen(pbuf)), "0x%2x, user resumed", nd); break; case 0x82: sprintf((pbuf+strlen(pbuf)), "0x%2x, bearer service changed", nd); break; case 0x83: sprintf((pbuf+strlen(pbuf)), "0x%2x, BER coded information", nd); break; case 0xc2: sprintf((pbuf+strlen(pbuf)), "0x%2x, conference established", nd); break; case 0xc3: sprintf((pbuf+strlen(pbuf)), "0x%2x, conference disconnected", nd); break; case 0xc4: sprintf((pbuf+strlen(pbuf)), "0x%2x, other party added", nd); break; case 0xc5: sprintf((pbuf+strlen(pbuf)), "0x%2x, isolated", nd); break; case 0xc6: sprintf((pbuf+strlen(pbuf)), "0x%2x, reattached", nd); break; case 0xc7: sprintf((pbuf+strlen(pbuf)), "0x%2x, other party isolated", nd); break; case 0xc8: sprintf((pbuf+strlen(pbuf)), "0x%2x, other party reattached", nd); break; case 0xc9: sprintf((pbuf+strlen(pbuf)), "0x%2x, other party split", nd); break; case 0xca: sprintf((pbuf+strlen(pbuf)), "0x%2x, other party disconnected", nd); break; case 0xcb: sprintf((pbuf+strlen(pbuf)), "0x%2x, conference floating", nd); break; case 0xcc: sprintf((pbuf+strlen(pbuf)), "0x%2x, conference disconnected, preemption", nd); break; case 0xcf: sprintf((pbuf+strlen(pbuf)), "0x%2x, conference floating, server user preempted", nd); break; case 0xe0: sprintf((pbuf+strlen(pbuf)), "0x%2x, call is a waiting call", nd); break; case 0xe8: sprintf((pbuf+strlen(pbuf)), "0x%2x, diversion activated", nd); break; case 0xe9: /* ECT, EN 300 369-1 V1.2.4 p12) */ sprintf((pbuf+strlen(pbuf)), "0x%2x, call transferred, alerting", nd); break; case 0xea: /* ECT, EN 300 369-1 V1.2.4 p12) */ sprintf((pbuf+strlen(pbuf)), "0x%2x, call transferred, active", nd); break; case 0xee: sprintf((pbuf+strlen(pbuf)), "0x%2x, reverse charging", nd); break; case 0xf9: sprintf((pbuf+strlen(pbuf)), "0x%2x, remote hold", nd); break; case 0xfa: sprintf((pbuf+strlen(pbuf)), "0x%2x, remote retrieval", nd); break; case 0xfb: sprintf((pbuf+strlen(pbuf)), "0x%2x, call is diverting", nd); break; default: sprintf((pbuf+strlen(pbuf)), "0x%2x, undefined", nd); break; } i++; len--; if(len) { sprintf((pbuf+strlen(pbuf)),": ("); for(; j < len; j++) { if(nd == 4) sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]); else sprintf((pbuf+strlen(pbuf)),"0x%2x", buf[j+i]); } sprintf((pbuf+strlen(pbuf)),")"); } sprintf((pbuf+strlen(pbuf)),"]"); i += j; return(i); } /*---------------------------------------------------------------------------* * decode and print redirecting/redirection number *---------------------------------------------------------------------------*/ int p_q931redir(char *pbuf, unsigned char *buf) { int j; int len; int i = 0; int tp; int ind = 0; int indflag = 0; int reas = 0; int reasflag = 0; i++; /* index -> length */ len = buf[i]; i++; /* index -> type/plan */ tp = buf[i]; i++; len--; if(!(tp & 0x80)) { ind = buf[i]; indflag = 1; i++; len--; if(!(ind & 0x80)) { reas = buf[i]; reasflag = 1; i++; len--; } } for(j = 0; j < len; j++) { sprintf((pbuf+strlen(pbuf)),"%c", buf[j+i]); } switch((tp & 0x70) >> 4) { case 0: sprintf((pbuf+strlen(pbuf)), " (type=unknown, "); break; case 1: sprintf((pbuf+strlen(pbuf)), " (type=international, "); break; case 2: sprintf((pbuf+strlen(pbuf)), " (type=national, "); break; case 3: sprintf((pbuf+strlen(pbuf)), " (type=network specific, "); break; case 4: sprintf((pbuf+strlen(pbuf)), " (type=subscriber, "); break; case 6: sprintf((pbuf+strlen(pbuf)), " (type=abbreviated, "); break; default: sprintf((pbuf+strlen(pbuf)), " (type=reserved (%d), ", ((tp & 0x70) >> 4)); break; } switch(tp & 0x0f) { case 0: sprintf((pbuf+strlen(pbuf)), "plan=unknown"); break; case 1: sprintf((pbuf+strlen(pbuf)), "plan=ISDN"); break; case 3: sprintf((pbuf+strlen(pbuf)), "plan=Data"); break; case 4: sprintf((pbuf+strlen(pbuf)), "plan=Telex"); break; case 8: sprintf((pbuf+strlen(pbuf)), "plan=National"); break; case 9: sprintf((pbuf+strlen(pbuf)), "plan=private"); break; default: sprintf((pbuf+strlen(pbuf)), "plan=reserved (%d)", (tp & 0x0f)); break; } if(indflag) { sprintf((pbuf+strlen(pbuf)), ",\n "); switch((ind & 0x60) >> 5) { case 0: sprintf((pbuf+strlen(pbuf)), "presentation allowed"); break; case 1: sprintf((pbuf+strlen(pbuf)), "presentation restricted"); break; case 2: sprintf((pbuf+strlen(pbuf)), "number not available"); break; case 3: sprintf((pbuf+strlen(pbuf)), "reserved"); break; } } if(reasflag) { sprintf((pbuf+strlen(pbuf)), ",\n "); switch(reas & 0x0f) { case 0: sprintf((pbuf+strlen(pbuf)), "reason for diversion: unknown"); break; case 1: sprintf((pbuf+strlen(pbuf)), "reason for diversion: call forwarding busy"); break; case 2: sprintf((pbuf+strlen(pbuf)), "reason for diversion: call forwarding unconditional"); break; case 0xa: sprintf((pbuf+strlen(pbuf)), "reason for diversion: called DTE"); break; case 0xf: sprintf((pbuf+strlen(pbuf)), "reason for diversion: call forwarding unconditional"); break; default: sprintf((pbuf+strlen(pbuf)), "reason for diversion: reserved (0x%2x)",reas & 0x0f); break; } } sprintf((pbuf+strlen(pbuf)),")]"); i += j; return(i); } /* EOF */