Reported by Trent Creekmore
[dahdi/tools.git] / patgen.c
1 /*
2  * Written by Mark Spencer <markster@digium.com>
3  * Based on previous works, designs, and architectures conceived and
4  * written by Jim Dixon <jim@lambdatel.com>.
5  *
6  * Copyright (C) 2001 Jim Dixon / Zapata Telephony.
7  * Copyright (C) 2001-2008 Digium, Inc.
8  *
9  * All rights reserved.
10  *
11  * Primary Author: Mark Spencer <markster@digium.com>
12  * Radio Support by Jim Dixon <jim@lambdatel.com>
13  */
14
15 /*
16  * See http://www.asterisk.org for more information about
17  * the Asterisk project. Please do not directly contact
18  * any of the maintainers of this project for assistance;
19  * the project provides a web site, mailing lists and IRC
20  * channels for your use.
21  *
22  * This program is free software, distributed under the terms of
23  * the GNU General Public License Version 2 as published by the
24  * Free Software Foundation. See the LICENSE file included with
25  * this program for more details.
26  */
27
28 #include <stdio.h>
29 #include <fcntl.h>
30 #include <string.h>
31 #include <errno.h>
32 #include <stdio.h>
33 #include <linux/types.h>
34 #include <linux/ppp_defs.h> 
35 #include <sys/ioctl.h>
36 #include <sys/stat.h>
37 #include <unistd.h>
38 #include <stdlib.h>
39 #include "bittest.h"
40
41 #include <dahdi/user.h>
42 #include "dahdi_tools_version.h"
43
44 /* #define BLOCK_SIZE 2048 */
45 #define BLOCK_SIZE 2041
46 #define DEVICE    "/dev/dahdi/channel"
47
48 char                    *prog_name;
49
50 static void usage(void)
51 {
52         fprintf(stderr, "Usage: %s <dahdi_chan>\n", prog_name);
53         fprintf(stderr, "   e.g.: %s /dev/dahdi/55\n", prog_name);
54         fprintf(stderr, "         %s 455\n", prog_name);
55         exit(1);
56 }
57
58 void print_packet(unsigned char *buf, int len)
59 {
60         int x;
61         printf("{ ");
62         for (x=0;x<len;x++)
63                 printf("%02x ",buf[x]);
64         printf("}\n");
65 }
66
67 int channel_open(const char *name, int *bs)
68 {
69         int     channo, fd;
70         struct  dahdi_params tp;
71         struct  stat filestat;
72
73         /* stat file, if character device, open it */
74         channo = strtoul(name, NULL, 10);
75         fd = stat(name, &filestat);
76         if (!fd && S_ISCHR(filestat.st_mode)) {
77                 fd = open(name, O_RDWR, 0600);
78                 if (fd < 0) {
79                         perror(name);
80                         return -1;
81                 }
82         /* try out the dahdi_specify interface */
83         } else if (channo > 0) {
84                 fd = open(DEVICE, O_RDWR, 0600);
85                 if (fd < 0) {
86                         perror(DEVICE);
87                         return -1;
88                 }
89                 if (ioctl(fd, DAHDI_SPECIFY, &channo) < 0) {
90                         perror("DAHDI_SPECIFY ioctl failed");
91                         return -1;
92                 }
93         /* die */
94         } else {
95                 fprintf(stderr, "Specified channel is not a valid character "
96                         "device or channel number");
97                 return -1;
98         }
99
100         if (ioctl(fd, DAHDI_SET_BLOCKSIZE, bs) < 0) {
101                 perror("SET_BLOCKSIZE");
102                 return -1;
103         }
104
105         if (ioctl(fd, DAHDI_GET_PARAMS, &tp)) {
106                 fprintf(stderr, "Unable to get channel parameters\n");
107                 return -1;
108         }
109
110         return fd;
111 }
112
113 int main(int argc, char *argv[])
114 {
115         int fd;
116         int res, res1, x;
117         int bs = BLOCK_SIZE;
118         unsigned char c=0;
119         unsigned char outbuf[BLOCK_SIZE];
120
121         prog_name = argv[0];
122
123         if (argc < 2) {
124                 usage();
125         }
126
127         fd = channel_open(argv[1], &bs);
128         if (fd < 0)
129                 exit(1);
130
131         ioctl(fd, DAHDI_GETEVENT);
132 #if 0
133         print_packet(outbuf, res);
134         printf("FCS is %x, PPP_GOODFCS is %x\n",
135         fcs,PPP_GOODFCS);
136 #endif
137         for(;;) {
138                 res = bs;
139                 for (x=0;x<bs;x++) {
140                         outbuf[x] = c;
141                         c = bit_next(c);
142                 }
143                 res1 = write(fd, outbuf, res);
144                 if (res1 < res) {
145                         int e;
146                         struct dahdi_spaninfo zi;
147                         res = ioctl(fd,DAHDI_GETEVENT,&e);
148                         if (res == -1)
149                         {
150                                 perror("DAHDI_GETEVENT");
151                                 exit(1);
152                         }
153                         if (e == DAHDI_EVENT_NOALARM)
154                                 printf("ALARMS CLEARED\n");
155                         if (e == DAHDI_EVENT_ALARM)
156                         {
157                                 zi.spanno = 0;
158                                 res = ioctl(fd,DAHDI_SPANSTAT,&zi);
159                                 if (res == -1)
160                                 {
161                                         perror("DAHDI_SPANSTAT");
162                                         exit(1);
163                                 }
164                                 printf("Alarm mask %x hex\n",zi.alarms);
165                         }
166                         continue;
167                 }
168 #if 0
169                 printf("(%d) Wrote %d bytes\n", packets++, res);
170 #endif
171         }
172         
173 }