554 lines
15 KiB
C
554 lines
15 KiB
C
/*
|
|
* Copyright (c) 1997, 1999 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.
|
|
*
|
|
*---------------------------------------------------------------------------
|
|
*
|
|
* main.c - i4b set debug options
|
|
* ------------------------------
|
|
*
|
|
* $Id: main.c,v 1.14 1999/02/14 09:44:57 hm Exp $
|
|
*
|
|
* last edit-date: [Sun Feb 14 10:13:25 1999]
|
|
*
|
|
*---------------------------------------------------------------------------*/
|
|
|
|
#include <stdio.h>
|
|
#include <signal.h>
|
|
#include <errno.h>
|
|
#include <string.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <fcntl.h>
|
|
#include <ctype.h>
|
|
#include <sys/stat.h>
|
|
#include <sys/wait.h>
|
|
#include <sys/ioctl.h>
|
|
#include <sys/types.h>
|
|
#include <sys/time.h>
|
|
|
|
#include <machine/i4b_debug.h>
|
|
#include <machine/i4b_ioctl.h>
|
|
|
|
char *bin_str(unsigned long val, int length);
|
|
|
|
static void usage ( void );
|
|
void printl1(unsigned long val);
|
|
void printl2(unsigned long val);
|
|
void printl3(unsigned long val);
|
|
void printl4(unsigned long val);
|
|
|
|
static int isdnfd;
|
|
|
|
#define I4BCTLDEVICE "/dev/i4bctl"
|
|
|
|
int opt_get = 0;
|
|
int opt_layer = -1;
|
|
int opt_set = 0;
|
|
int opt_setval;
|
|
int opt_reset = 0;
|
|
int opt_max = 0;
|
|
int opt_err = 0;
|
|
int opt_zero = 0;
|
|
int opt_unit = 0;
|
|
int opt_hscx = 0;
|
|
int opt_rhscx = 0;
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* program entry
|
|
*---------------------------------------------------------------------------*/
|
|
int
|
|
main(int argc, char **argv)
|
|
{
|
|
int c;
|
|
ctl_debug_t cdbg;
|
|
int ret;
|
|
|
|
while ((c = getopt(argc, argv, "eghl:mrs:u:zH?")) != EOF)
|
|
{
|
|
switch(c)
|
|
{
|
|
case 'e':
|
|
opt_err = 1;
|
|
break;
|
|
|
|
case 'g':
|
|
opt_get = 1;
|
|
break;
|
|
|
|
case 'h':
|
|
opt_hscx = 1;
|
|
break;
|
|
|
|
case 'r':
|
|
opt_reset = 1;
|
|
break;
|
|
|
|
case 'm':
|
|
opt_max = 1;
|
|
break;
|
|
|
|
case 'l':
|
|
opt_layer = atoi(optarg);
|
|
if(opt_layer < 1 || opt_layer > 4)
|
|
usage();
|
|
break;
|
|
|
|
case 's':
|
|
if((sscanf(optarg, "%i", &opt_setval)) != 1)
|
|
usage();
|
|
opt_set = 1;
|
|
break;
|
|
|
|
case 'u':
|
|
opt_unit = atoi(optarg);
|
|
if(opt_unit < 0 || opt_unit > 9)
|
|
usage();
|
|
break;
|
|
|
|
case 'z':
|
|
opt_zero = 1;
|
|
break;
|
|
|
|
case 'H':
|
|
opt_rhscx = 1;
|
|
break;
|
|
|
|
case '?':
|
|
default:
|
|
usage();
|
|
break;
|
|
}
|
|
}
|
|
|
|
if(opt_get == 0 && opt_set == 0 && opt_reset == 0 && opt_max == 0 &&
|
|
opt_err == 0 && opt_zero == 0 && opt_hscx == 0 && opt_rhscx == 0)
|
|
{
|
|
usage();
|
|
}
|
|
|
|
if((opt_get + opt_set + opt_reset + opt_max + opt_err + opt_zero +
|
|
opt_hscx + opt_rhscx) > 1)
|
|
{
|
|
usage();
|
|
}
|
|
|
|
if((isdnfd = open(I4BCTLDEVICE, O_RDWR)) < 0)
|
|
{
|
|
fprintf(stderr, "i4bctl: cannot open %s: %s\n", I4BCTLDEVICE, strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
if(opt_hscx)
|
|
{
|
|
hscxstat_t hst;
|
|
|
|
hst.unit = opt_unit;
|
|
hst.chan = 0;
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_GET_HSCXSTAT, &hst)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_GET_HSCXSTAT failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
printf("\nHSCX events: VFR RDO CRC RAB XDU RFO\n");
|
|
|
|
printf("unit %d chan %d: %6d %6d %6d %6d %6d %6d\n",
|
|
hst.unit, hst.chan,
|
|
hst.vfr, hst.rdo, hst.crc, hst.rab, hst.xdu, hst.rfo);
|
|
|
|
hst.unit = opt_unit;
|
|
hst.chan = 1;
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_GET_HSCXSTAT, &hst)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_GET_HSCXSTAT failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
printf("unit %d chan %d: %6d %6d %6d %6d %6d %6d\n",
|
|
hst.unit, hst.chan,
|
|
hst.vfr, hst.rdo, hst.crc, hst.rab, hst.xdu, hst.rfo);
|
|
|
|
exit(0);
|
|
}
|
|
|
|
if(opt_rhscx)
|
|
{
|
|
hscxstat_t hst;
|
|
|
|
hst.unit = opt_unit;
|
|
hst.chan = 0;
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_CLR_HSCXSTAT, &hst)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_CLR_HSCXSTAT failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
printf("HSCX event counters unit %d chan %d reset to zero!\n",
|
|
hst.unit, hst.chan);
|
|
|
|
hst.unit = opt_unit;
|
|
hst.chan = 1;
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_CLR_HSCXSTAT, &hst)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_CLR_HSCXSTAT failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
printf("HSCX event counters unit %d chan %d reset to zero!\n",
|
|
hst.unit, hst.chan);
|
|
|
|
exit(0);
|
|
}
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_GET_DEBUG, &cdbg)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_GET_DEBUG failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
|
|
if(opt_get)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
printl1(cdbg.l1);
|
|
printl2(cdbg.l2);
|
|
printl3(cdbg.l3);
|
|
printl4(cdbg.l4);
|
|
break;
|
|
|
|
case 1:
|
|
printl1(cdbg.l1);
|
|
break;
|
|
|
|
case 2:
|
|
printl2(cdbg.l2);
|
|
break;
|
|
|
|
case 3:
|
|
printl3(cdbg.l3);
|
|
break;
|
|
|
|
case 4:
|
|
printl4(cdbg.l4);
|
|
break;
|
|
}
|
|
printf("\n");
|
|
return(0);
|
|
}
|
|
else if(opt_set)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
usage();
|
|
break;
|
|
|
|
case 1:
|
|
cdbg.l1 = opt_setval;
|
|
break;
|
|
|
|
case 2:
|
|
cdbg.l2 = opt_setval;
|
|
break;
|
|
|
|
case 3:
|
|
cdbg.l3 = opt_setval;
|
|
break;
|
|
|
|
case 4:
|
|
cdbg.l4 = opt_setval;
|
|
break;
|
|
}
|
|
}
|
|
else if(opt_reset)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
cdbg.l1 = L1_DEBUG_DEFAULT;
|
|
cdbg.l2 = L2_DEBUG_DEFAULT;
|
|
cdbg.l3 = L3_DEBUG_DEFAULT;
|
|
cdbg.l4 = L4_DEBUG_DEFAULT;
|
|
break;
|
|
|
|
case 1:
|
|
cdbg.l1 = L1_DEBUG_DEFAULT;
|
|
break;
|
|
|
|
case 2:
|
|
cdbg.l2 = L2_DEBUG_DEFAULT;
|
|
break;
|
|
|
|
case 3:
|
|
cdbg.l3 = L3_DEBUG_DEFAULT;
|
|
break;
|
|
|
|
case 4:
|
|
cdbg.l4 = L4_DEBUG_DEFAULT;
|
|
break;
|
|
}
|
|
}
|
|
else if(opt_max)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
cdbg.l1 = L1_DEBUG_MAX;
|
|
cdbg.l2 = L2_DEBUG_MAX;
|
|
cdbg.l3 = L3_DEBUG_MAX;
|
|
cdbg.l4 = L4_DEBUG_MAX;
|
|
break;
|
|
|
|
case 1:
|
|
cdbg.l1 = L1_DEBUG_MAX;
|
|
break;
|
|
|
|
case 2:
|
|
cdbg.l2 = L2_DEBUG_MAX;
|
|
break;
|
|
|
|
case 3:
|
|
cdbg.l3 = L3_DEBUG_MAX;
|
|
break;
|
|
|
|
case 4:
|
|
cdbg.l4 = L4_DEBUG_MAX;
|
|
break;
|
|
}
|
|
}
|
|
else if(opt_err)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
cdbg.l1 = L1_DEBUG_ERR;
|
|
cdbg.l2 = L2_DEBUG_ERR;
|
|
cdbg.l3 = L3_DEBUG_ERR;
|
|
cdbg.l4 = L4_DEBUG_ERR;
|
|
break;
|
|
|
|
case 1:
|
|
cdbg.l1 = L1_DEBUG_ERR;
|
|
break;
|
|
|
|
case 2:
|
|
cdbg.l2 = L2_DEBUG_ERR;
|
|
break;
|
|
|
|
case 3:
|
|
cdbg.l3 = L3_DEBUG_ERR;
|
|
break;
|
|
|
|
case 4:
|
|
cdbg.l4 = L4_DEBUG_ERR;
|
|
break;
|
|
}
|
|
}
|
|
else if(opt_zero)
|
|
{
|
|
switch(opt_layer)
|
|
{
|
|
case -1:
|
|
cdbg.l1 = 0;
|
|
cdbg.l2 = 0;
|
|
cdbg.l3 = 0;
|
|
cdbg.l4 = 0;
|
|
break;
|
|
|
|
case 1:
|
|
cdbg.l1 = 0;
|
|
break;
|
|
|
|
case 2:
|
|
cdbg.l2 = 0;
|
|
break;
|
|
|
|
case 3:
|
|
cdbg.l3 = 0;
|
|
break;
|
|
|
|
case 4:
|
|
cdbg.l4 = 0;
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
exit(1);
|
|
}
|
|
|
|
if((ret = ioctl(isdnfd, I4B_CTL_SET_DEBUG, &cdbg)) < 0)
|
|
{
|
|
fprintf(stderr, "ioctl I4B_CTL_SET_DEBUG failed: %s", strerror(errno));
|
|
exit(1);
|
|
}
|
|
return(0);
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* return ptr to string of 1's and 0's for value
|
|
*---------------------------------------------------------------------------*/
|
|
char *
|
|
bin_str(unsigned long val, int length)
|
|
{
|
|
static char buffer[80];
|
|
int i = 0;
|
|
|
|
if (length > 32)
|
|
length = 32;
|
|
|
|
val = val << (32 - length);
|
|
|
|
while (length--)
|
|
{
|
|
if (val & 0x80000000)
|
|
buffer[i++] = '1';
|
|
else
|
|
buffer[i++] = '0';
|
|
if ((length % 4) == 0 && length)
|
|
buffer[i++] = '.';
|
|
val = val << 1;
|
|
}
|
|
return (buffer);
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* print l1 info
|
|
*---------------------------------------------------------------------------*/
|
|
void
|
|
printl1(unsigned long val)
|
|
{
|
|
printf("\nLayer 1: %s = 0x%lX\n", bin_str(val, 32), val);
|
|
printf(" || |||| |||| ||||\n"),
|
|
printf(" || |||| |||| |||+- general error messages\n");
|
|
printf(" || |||| |||| ||+-- PH primitives exchanged\n");
|
|
printf(" || |||| |||| |+--- B channel actions\n");
|
|
printf(" || |||| |||| +---- HSCX error messages\n");
|
|
printf(" || |||| |||+------ HSCX IRQ messages\n");
|
|
printf(" || |||| ||+------- ISAC error messages\n");
|
|
printf(" || |||| |+-------- ISAC messages\n");
|
|
printf(" || |||| +--------- ISAC setup messages\n");
|
|
printf(" || |||+----------- FSM general messages\n");
|
|
printf(" || ||+------------ FSM error messages\n");
|
|
printf(" || |+------------- timer general messages\n");
|
|
printf(" || +-------------- timer error messages\n");
|
|
printf(" |+---------------- HSCX data xfer errors msgs\n");
|
|
printf(" +----------------- ISAC CICO messages\n");
|
|
printf(" ++++-++++-++++-++++-++------------------ unassigned\n");
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* print l2 info
|
|
*---------------------------------------------------------------------------*/
|
|
void
|
|
printl2(unsigned long val)
|
|
{
|
|
printf("\nLayer 2: %s = 0x%lX\n", bin_str(val, 32), val);
|
|
printf(" || |||| |||| ||||\n"),
|
|
printf(" || |||| |||| |||+- general error messages\n");
|
|
printf(" || |||| |||| ||+-- DL primitives exchanged\n");
|
|
printf(" || |||| |||| |+--- U frame messages\n");
|
|
printf(" || |||| |||| +---- U frame error messages\n");
|
|
printf(" || |||| |||+------ S frame messages\n");
|
|
printf(" || |||| ||+------- S frame error messages\n");
|
|
printf(" || |||| |+-------- I frame messages\n");
|
|
printf(" || |||| +--------- I frame error messages\n");
|
|
printf(" || |||+----------- FSM general messages\n");
|
|
printf(" || ||+------------ FSM error messages\n");
|
|
printf(" || |+------------- timer general messages\n");
|
|
printf(" || +-------------- timer error messages\n");
|
|
printf(" |+---------------- TEI general messages\n");
|
|
printf(" +----------------- TEI error messages\n");
|
|
printf(" ++++-++++-++++-++++-++------------------ unassigned\n");
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* print l3 info
|
|
*---------------------------------------------------------------------------*/
|
|
void
|
|
printl3(unsigned long val)
|
|
{
|
|
printf("\nLayer 3: %s = 0x%lX\n", bin_str(val, 32), val);
|
|
printf(" ||| |||| ||||\n"),
|
|
printf(" ||| |||| |||+- general error messages\n");
|
|
printf(" ||| |||| ||+-- general messages\n");
|
|
printf(" ||| |||| |+--- FSM messages\n");
|
|
printf(" ||| |||| +---- FSM error messages\n");
|
|
printf(" ||| |||+------ timer messages\n");
|
|
printf(" ||| ||+------- timer error messages\n");
|
|
printf(" ||| |+-------- protocol messages\n");
|
|
printf(" ||| +--------- protocol error messages\n");
|
|
printf(" ||+----------- facility messages\n");
|
|
printf(" |+------------ facility error messages\n");
|
|
printf(" +------------- Q.931 messages exchanged\n");
|
|
printf(" ++++-++++-++++-++++-++++-++------------- unassigned\n");
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* print l4 info
|
|
*---------------------------------------------------------------------------*/
|
|
void
|
|
printl4(unsigned long val)
|
|
{
|
|
printf("\nLayer 4: %s = 0x%lX\n", bin_str(val, 32), val);
|
|
printf(" || ||||\n"),
|
|
printf(" || |||+- general error messages\n");
|
|
printf(" || ||+-- general messages\n");
|
|
printf(" || |+--- B-ch timeout messages\n");
|
|
printf(" || +---- network driver dial state\n");
|
|
printf(" |+------ ipr driver debug messages\n");
|
|
printf(" +------- rbch driver debug messages\n");
|
|
printf(" ++++-++++-++++-++++-++++-++++-++-------- unassigned\n");
|
|
}
|
|
|
|
/*---------------------------------------------------------------------------*
|
|
* usage display and exit
|
|
*---------------------------------------------------------------------------*/
|
|
static void
|
|
usage(void)
|
|
{
|
|
fprintf(stderr, "\n");
|
|
fprintf(stderr, "isdndebug - i4b set debug level, version %02d.%02d, compiled %s %s\n", VERSION, REL, __DATE__, __TIME__);
|
|
fprintf(stderr, "usage: isdndebug -e -h -g -l <layer> -m -r -s <value> -u <unit> -z -H\n");
|
|
fprintf(stderr, " -e set error only debugging output\n");
|
|
fprintf(stderr, " -g get current debugging values\n");
|
|
fprintf(stderr, " -h get HSCX event counters\n");
|
|
fprintf(stderr, " -l layer specify layer (1...4)\n");
|
|
fprintf(stderr, " -m set maximum debugging output\n");
|
|
fprintf(stderr, " -r reset values(s) to compiled in default\n");
|
|
fprintf(stderr, " -s value set new debugging value for layer\n");
|
|
fprintf(stderr, " -u unit unit number for -h and -H commands\n");
|
|
fprintf(stderr, " -z set zero (=no) debugging output\n");
|
|
fprintf(stderr, " -H reset HSCX event counters to zero\n");
|
|
fprintf(stderr, "\n");
|
|
exit(1);
|
|
}
|
|
|
|
/* EOF */
|