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 *---------------------------------------------------------------------------*/
93 static void i4btrcattach(void *);
94 PSEUDO_SET(i4btrcattach, i4b_trace);
96 int get_trace_data_from_l1(i4b_trace_hdr_t *hdr, int len, char *buf);
98 /*---------------------------------------------------------------------------*
99 * interface attach routine
100 *---------------------------------------------------------------------------*/
102 i4btrcattach(void *dummy)
106 kprintf("i4btrc: %d ISDN trace device(s) attached\n", NI4BTRC);
108 for(i=0; i < NI4BTRC; i++)
111 make_dev(&i4btrc_ops, i,
112 UID_ROOT, GID_WHEEL, 0600, "i4btrc%d", i);
113 trace_queue[i].ifq_maxlen = IFQ_MAXLEN;
115 device_state[i] = ST_IDLE;
119 /*---------------------------------------------------------------------------*
120 * get_trace_data_from_l1()
121 * ------------------------
122 * is called from layer 1, adds timestamp to trace data and puts
123 * it into a queue, from which it can be read from the i4btrc
124 * device. The unit number in the trace header selects the minor
125 * device's queue the data is put into.
126 *---------------------------------------------------------------------------*/
128 get_trace_data_from_l1(i4b_trace_hdr_t *hdr, int len, char *buf)
133 int totlen = len + sizeof(i4b_trace_hdr_t);
136 * for telephony (or better non-HDLC HSCX mode) we get
137 * (MCLBYTE + sizeof(i4b_trace_hdr_t)) length packets
138 * to put into the queue to userland. because of this
139 * we detect this situation, strip the length to MCLBYTES
140 * max size, and infor the userland program of this fact
141 * by putting the no of truncated bytes into hdr->trunc.
144 if(totlen > MCLBYTES)
147 hdr->trunc = totlen - MCLBYTES;
155 /* set length of trace record */
157 hdr->length = totlen;
159 /* check valid unit no */
161 if((unit = hdr->unit) > NI4BTRC)
163 kprintf("i4b_trace: get_trace_data_from_l1 - unit > NI4BTRC!\n");
169 if(!(m = i4b_Bgetmbuf(totlen)))
171 kprintf("i4b_trace: get_trace_data_from_l1 - i4b_getmbuf() failed!\n");
175 /* check if we are in analyzemode */
177 if(analyzemode && (unit == rxunit || unit == txunit))
186 if(IF_QFULL(&trace_queue[unit]))
191 IF_DEQUEUE(&trace_queue[unit], m1);
197 /* copy trace header */
198 memcpy(m->m_data, hdr, sizeof(i4b_trace_hdr_t));
200 /* copy trace data */
202 memcpy(&m->m_data[sizeof(i4b_trace_hdr_t)], buf, totlen-sizeof(i4b_trace_hdr_t));
204 memcpy(&m->m_data[sizeof(i4b_trace_hdr_t)], buf, len);
208 IF_ENQUEUE(&trace_queue[unit], m);
210 if(device_state[unit] & ST_WAITDATA)
212 device_state[unit] &= ~ST_WAITDATA;
213 wakeup((caddr_t) &trace_queue[unit]);
221 /*---------------------------------------------------------------------------*
223 *---------------------------------------------------------------------------*/
225 i4btrcopen(struct dev_open_args *ap)
227 cdev_t dev = ap->a_head.a_dev;
228 int unit = minor(dev);
233 if(device_state[unit] & ST_ISOPEN)
236 if(analyzemode && (unit == outunit || unit == rxunit || unit == txunit))
241 device_state[unit] = ST_ISOPEN;
248 /*---------------------------------------------------------------------------*
250 *---------------------------------------------------------------------------*/
252 i4btrcclose(struct dev_close_args *ap)
254 cdev_t dev = ap->a_head.a_dev;
255 int unit = minor(dev);
259 for(i=0; i < nctrl; i++)
261 if((ctrl_desc[i].ctrl_type == CTRL_PASSIVE) &&
262 (ctrl_desc[i].unit == unit))
269 if(analyzemode && (unit == outunit))
276 (*ctrl_desc[cno].N_MGMT_COMMAND)(rxunit, CMR_SETTRACE, TRACE_OFF);
277 (*ctrl_desc[cno].N_MGMT_COMMAND)(txunit, CMR_SETTRACE, TRACE_OFF);
285 (*ctrl_desc[cno].N_MGMT_COMMAND)(ctrl_desc[cno].unit, CMR_SETTRACE, TRACE_OFF);
289 device_state[unit] = ST_IDLE;
295 /*---------------------------------------------------------------------------*
296 * read from trace device
297 *---------------------------------------------------------------------------*/
299 i4btrcread(struct dev_read_args *ap)
301 cdev_t dev = ap->a_head.a_dev;
302 struct uio *uio = ap->a_uio;
305 int unit = minor(dev);
307 if(!(device_state[unit] & ST_ISOPEN))
312 while(IF_QEMPTY(&trace_queue[unit]) && (device_state[unit] & ST_ISOPEN))
314 device_state[unit] |= ST_WAITDATA;
316 if((error = tsleep((caddr_t) &trace_queue[unit],
317 PCATCH, "bitrc", 0 )) != 0)
319 device_state[unit] &= ~ST_WAITDATA;
325 IF_DEQUEUE(&trace_queue[unit], m);
328 error = uiomove(m->m_data, m->m_len, uio);
340 /*---------------------------------------------------------------------------*
342 *---------------------------------------------------------------------------*/
344 i4btrcpoll(struct dev_poll_args *ap)
349 /*---------------------------------------------------------------------------*
350 * device driver ioctl routine
351 *---------------------------------------------------------------------------*/
353 i4btrcioctl(struct dev_ioctl_args *ap)
355 cdev_t dev = ap->a_head.a_dev;
357 int unit = minor(dev);
358 i4b_trace_setupa_t *tsa;
362 /* find the first passive controller matching our unit no */
364 for(i=0; i < nctrl; i++)
366 if((ctrl_desc[i].ctrl_type == CTRL_PASSIVE) &&
367 (ctrl_desc[i].unit == unit))
379 (*ctrl_desc[cno].N_MGMT_COMMAND)(ctrl_desc[cno].unit, CMR_SETTRACE, (void *)*(unsigned int *)ap->a_data);
383 tsa = (i4b_trace_setupa_t *)ap->a_data;
385 if(tsa->rxunit >= 0 && tsa->rxunit < NI4BTRC)
386 rxunit = tsa->rxunit;
390 if(tsa->txunit >= 0 && tsa->txunit < NI4BTRC)
391 txunit = tsa->txunit;
408 (*ctrl_desc[cno].N_MGMT_COMMAND)(rxunit, CMR_SETTRACE, (int *)(tsa->rxflags & (TRACE_I | TRACE_D_RX | TRACE_B_RX)));
409 (*ctrl_desc[cno].N_MGMT_COMMAND)(txunit, CMR_SETTRACE, (int *)(tsa->txflags & (TRACE_I | TRACE_D_RX | TRACE_B_RX)));
427 #endif /* NI4BTRC > 0 */