Aren/NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
d8db5e11b1
NetBSD/usr.sbin/isdn/isdntrace/q931_util.c

1048 lines
23 KiB
C
Raw Normal View History

Import of essential ISDN4BSD userland utilities and their documentation. The left out parts (which have not been installed by ISDN4BSD on NetBSD anyway), may be added as pkgs later (if demand exists).
2001-01-06 16:00:10 +03:00
/*
* 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
* -----------------------------------------------------
*
Respect the law: Use A-law and mu-law as spellings as far as easily possible. Inspired by Igor Sobrado in PR 19680.
2003-04-06 22:20:07 +04:00
* $Id: q931_util.c,v 1.2 2003/04/06 18:20:15 wiz Exp $
Import of essential ISDN4BSD userland utilities and their documentation. The left out parts (which have not been installed by ISDN4BSD on NetBSD anyway), may be added as pkgs later (if demand exists).
2001-01-06 16:00:10 +03:00
*
* $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:
Respect the law: Use A-law and mu-law as spellings as far as easily possible. Inspired by Igor Sobrado in PR 19680.
2003-04-06 22:20:07 +04:00
sprintf((pbuf+strlen(pbuf)), "G.711 mu-law");
Import of essential ISDN4BSD userland utilities and their documentation. The left out parts (which have not been installed by ISDN4BSD on NetBSD anyway), may be added as pkgs later (if demand exists).
2001-01-06 16:00:10 +03:00
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 */
Reference in New Issue Copy Permalink