2 * Copyright (c) 1997, 2001 Hellmuth Michaelis. All rights reserved.
4 * Redistribution and use in source and binary forms, with or without
5 * modification, are permitted provided that the following conditions
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.
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
25 *---------------------------------------------------------------------------
27 * i4btrc - device driver for trace data read device
28 * ---------------------------------------------------
30 * last edit-date: [Sat Aug 11 18:07:15 2001]
32 * $FreeBSD: src/sys/i4b/driver/i4b_trace.c,v 1.9.2.3 2001/08/12 16:22:48 hm Exp $
33 * $DragonFly: src/sys/net/i4b/driver/i4b_trace.c,v 1.17 2006/12/22 23:44:55 swildner Exp $
35 *---------------------------------------------------------------------------*/
37 #include "use_i4btrc.h"
41 #include <sys/param.h>
42 #include <sys/systm.h>
45 #include <sys/kernel.h>
47 #include <sys/socket.h>
50 #include <sys/thread2.h>
52 #include <net/i4b/include/machine/i4b_trace.h>
53 #include <net/i4b/include/machine/i4b_ioctl.h>
55 #include "../include/i4b_mbuf.h"
56 #include "../include/i4b_global.h"
57 #include "../include/i4b_l3l4.h"
59 static struct ifqueue trace_queue[NI4BTRC];
60 static int device_state[NI4BTRC];
62 #define ST_ISOPEN 0x01
63 #define ST_WAITDATA 0x02
65 static int analyzemode = 0;
66 static int rxunit = -1;
67 static int txunit = -1;
68 static int outunit = -1;
70 #define PDEVSTATIC static
71 static d_open_t i4btrcopen;
72 static d_close_t i4btrcclose;
73 static d_read_t i4btrcread;
74 static d_ioctl_t i4btrcioctl;
76 static d_poll_t i4btrcpoll;
77 #define POLLFIELD i4btrcpoll
81 static struct dev_ops i4btrc_ops = {
82 { "i4btrc", CDEV_MAJOR, 0 },
84 .d_close = i4btrcclose,
86 .d_ioctl = i4btrcioctl,
90 /*---------------------------------------------------------------------------*
91 * interface init routine
92 *---------------------------------------------------------------------------*/
94 i4btrcinit(void *unused)
96 dev_ops_add(&i4btrc_ops, 0, 0);
99 SYSINIT(i4btrcdev, SI_SUB_DRIVERS,
100 SI_ORDER_MIDDLE+CDEV_MAJOR, &i4btrcinit, NULL);
102 static void i4btrcattach(void *);
103 PSEUDO_SET(i4btrcattach, i4b_trace);
105 int get_trace_data_from_l1(i4b_trace_hdr_t *hdr, int len, char *buf);
107 /*---------------------------------------------------------------------------*
108 * interface attach routine
109 *---------------------------------------------------------------------------*/
111 i4btrcattach(void *dummy)
115 kprintf("i4btrc: %d ISDN trace device(s) attached\n", NI4BTRC);
117 for(i=0; i < NI4BTRC; i++)
120 make_dev(&i4btrc_ops, i,
121 UID_ROOT, GID_WHEEL, 0600, "i4btrc%d", i);
122 trace_queue[i].ifq_maxlen = IFQ_MAXLEN;
124 device_state[i] = ST_IDLE;
128 /*---------------------------------------------------------------------------*
129 * get_trace_data_from_l1()
130 * ------------------------
131 * is called from layer 1, adds timestamp to trace data and puts
132 * it into a queue, from which it can be read from the i4btrc
133 * device. The unit number in the trace header selects the minor
134 * device's queue the data is put into.
135 *---------------------------------------------------------------------------*/
137 get_trace_data_from_l1(i4b_trace_hdr_t *hdr, int len, char *buf)
142 int totlen = len + sizeof(i4b_trace_hdr_t);
145 * for telephony (or better non-HDLC HSCX mode) we get
146 * (MCLBYTE + sizeof(i4b_trace_hdr_t)) length packets
147 * to put into the queue to userland. because of this
148 * we detect this situation, strip the length to MCLBYTES
149 * max size, and infor the userland program of this fact
150 * by putting the no of truncated bytes into hdr->trunc.
153 if(totlen > MCLBYTES)
156 hdr->trunc = totlen - MCLBYTES;
164 /* set length of trace record */
166 hdr->length = totlen;
168 /* check valid unit no */
170 if((unit = hdr->unit) > NI4BTRC)
172 kprintf("i4b_trace: get_trace_data_from_l1 - unit > NI4BTRC!\n");
178 if(!(m = i4b_Bgetmbuf(totlen)))
180 kprintf("i4b_trace: get_trace_data_from_l1 - i4b_getmbuf() failed!\n");
184 /* check if we are in analyzemode */
186 if(analyzemode && (unit == rxunit || unit == txunit))
195 if(IF_QFULL(&trace_queue[unit]))
200 IF_DEQUEUE(&trace_queue[unit], m1);
206 /* copy trace header */
207 memcpy(m->m_data, hdr, sizeof(i4b_trace_hdr_t));
209 /* copy trace data */
211 memcpy(&m->m_data[sizeof(i4b_trace_hdr_t)], buf, totlen-sizeof(i4b_trace_hdr_t));
213 memcpy(&m->m_data[sizeof(i4b_trace_hdr_t)], buf, len);
217 IF_ENQUEUE(&trace_queue[unit], m);
219 if(device_state[unit] & ST_WAITDATA)
221 device_state[unit] &= ~ST_WAITDATA;
222 wakeup((caddr_t) &trace_queue[unit]);
230 /*---------------------------------------------------------------------------*
232 *---------------------------------------------------------------------------*/
234 i4btrcopen(struct dev_open_args *ap)
236 cdev_t dev = ap->a_head.a_dev;
237 int unit = minor(dev);
242 if(device_state[unit] & ST_ISOPEN)
245 if(analyzemode && (unit == outunit || unit == rxunit || unit == txunit))
250 device_state[unit] = ST_ISOPEN;
257 /*---------------------------------------------------------------------------*
259 *---------------------------------------------------------------------------*/
261 i4btrcclose(struct dev_close_args *ap)
263 cdev_t dev = ap->a_head.a_dev;
264 int unit = minor(dev);
268 for(i=0; i < nctrl; i++)
270 if((ctrl_desc[i].ctrl_type == CTRL_PASSIVE) &&
271 (ctrl_desc[i].unit == unit))
278 if(analyzemode && (unit == outunit))
285 (*ctrl_desc[cno].N_MGMT_COMMAND)(rxunit, CMR_SETTRACE, TRACE_OFF);
286 (*ctrl_desc[cno].N_MGMT_COMMAND)(txunit, CMR_SETTRACE, TRACE_OFF);
294 (*ctrl_desc[cno].N_MGMT_COMMAND)(ctrl_desc[cno].unit, CMR_SETTRACE, TRACE_OFF);
298 device_state[unit] = ST_IDLE;
304 /*---------------------------------------------------------------------------*
305 * read from trace device
306 *---------------------------------------------------------------------------*/
308 i4btrcread(struct dev_read_args *ap)
310 cdev_t dev = ap->a_head.a_dev;
311 struct uio *uio = ap->a_uio;
314 int unit = minor(dev);
316 if(!(device_state[unit] & ST_ISOPEN))
321 while(IF_QEMPTY(&trace_queue[unit]) && (device_state[unit] & ST_ISOPEN))
323 device_state[unit] |= ST_WAITDATA;
325 if((error = tsleep((caddr_t) &trace_queue[unit],
326 PCATCH, "bitrc", 0 )) != 0)
328 device_state[unit] &= ~ST_WAITDATA;
334 IF_DEQUEUE(&trace_queue[unit], m);
337 error = uiomove(m->m_data, m->m_len, uio);
349 /*---------------------------------------------------------------------------*
351 *---------------------------------------------------------------------------*/
353 i4btrcpoll(struct dev_poll_args *ap)
358 /*---------------------------------------------------------------------------*
359 * device driver ioctl routine
360 *---------------------------------------------------------------------------*/
362 i4btrcioctl(struct dev_ioctl_args *ap)
364 cdev_t dev = ap->a_head.a_dev;
366 int unit = minor(dev);
367 i4b_trace_setupa_t *tsa;
371 /* find the first passive controller matching our unit no */
373 for(i=0; i < nctrl; i++)
375 if((ctrl_desc[i].ctrl_type == CTRL_PASSIVE) &&
376 (ctrl_desc[i].unit == unit))
388 (*ctrl_desc[cno].N_MGMT_COMMAND)(ctrl_desc[cno].unit, CMR_SETTRACE, (void *)*(unsigned int *)ap->a_data);
392 tsa = (i4b_trace_setupa_t *)ap->a_data;
394 if(tsa->rxunit >= 0 && tsa->rxunit < NI4BTRC)
395 rxunit = tsa->rxunit;
399 if(tsa->txunit >= 0 && tsa->txunit < NI4BTRC)
400 txunit = tsa->txunit;
417 (*ctrl_desc[cno].N_MGMT_COMMAND)(rxunit, CMR_SETTRACE, (int *)(tsa->rxflags & (TRACE_I | TRACE_D_RX | TRACE_B_RX)));
418 (*ctrl_desc[cno].N_MGMT_COMMAND)(txunit, CMR_SETTRACE, (int *)(tsa->txflags & (TRACE_I | TRACE_D_RX | TRACE_B_RX)));
436 #endif /* NI4BTRC > 0 */