Remove some duplicate includes in bin/, games/ and lib/.
[games.git] / lib / libnetgraph / debug.c
1
2 /*
3  * debug.c
4  *
5  * Copyright (c) 1996-1999 Whistle Communications, Inc.
6  * All rights reserved.
7  * 
8  * Subject to the following obligations and disclaimer of warranty, use and
9  * redistribution of this software, in source or object code forms, with or
10  * without modifications are expressly permitted by Whistle Communications;
11  * provided, however, that:
12  * 1. Any and all reproductions of the source or object code must include the
13  *    copyright notice above and the following disclaimer of warranties; and
14  * 2. No rights are granted, in any manner or form, to use Whistle
15  *    Communications, Inc. trademarks, including the mark "WHISTLE
16  *    COMMUNICATIONS" on advertising, endorsements, or otherwise except as
17  *    such appears in the above copyright notice or in the software.
18  * 
19  * THIS SOFTWARE IS BEING PROVIDED BY WHISTLE COMMUNICATIONS "AS IS", AND
20  * TO THE MAXIMUM EXTENT PERMITTED BY LAW, WHISTLE COMMUNICATIONS MAKES NO
21  * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING THIS SOFTWARE,
22  * INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED WARRANTIES OF
23  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE, OR NON-INFRINGEMENT.
24  * WHISTLE COMMUNICATIONS DOES NOT WARRANT, GUARANTEE, OR MAKE ANY
25  * REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS OF THE USE OF THIS
26  * SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY, RELIABILITY OR OTHERWISE.
27  * IN NO EVENT SHALL WHISTLE COMMUNICATIONS BE LIABLE FOR ANY DAMAGES
28  * RESULTING FROM OR ARISING OUT OF ANY USE OF THIS SOFTWARE, INCLUDING
29  * WITHOUT LIMITATION, ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY,
30  * PUNITIVE, OR CONSEQUENTIAL DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR
31  * SERVICES, LOSS OF USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY
32  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
33  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
34  * THIS SOFTWARE, EVEN IF WHISTLE COMMUNICATIONS IS ADVISED OF THE POSSIBILITY
35  * OF SUCH DAMAGE.
36  *
37  * Author: Archie Cobbs <archie@whistle.com>
38  *
39  * $FreeBSD: src/lib/libnetgraph/debug.c,v 1.5.2.1 2000/05/01 18:09:54 archie Exp $
40  * $Whistle: debug.c,v 1.24 1999/01/24 01:15:33 archie Exp $
41  */
42
43 #include <sys/types.h>
44 #include <sys/time.h>
45 #include <sys/ioctl.h>
46
47 #include <stdarg.h>
48
49 #include <netinet/in.h>
50 #include <net/ethernet.h>
51 #include <net/bpf.h>
52
53 #include <netgraph/ng_message.h>
54 #include <netgraph/socket/ng_socket.h>
55
56 #include "netgraph.h"
57 #include "internal.h"
58
59 #include <netgraph/UI/ng_UI.h>
60 #include <netgraph/async/ng_async.h>
61 #include <netgraph/bpf/ng_bpf.h>
62 #include <netgraph/bridge/ng_bridge.h>
63 #include <netgraph/cisco/ng_cisco.h>
64 #include <netgraph/echo/ng_echo.h>
65 #include <netgraph/eiface/ng_eiface.h>
66 #include <netgraph/etf/ng_etf.h>
67 #include <netgraph/ether/ng_ether.h>
68 #include <netgraph/frame_relay/ng_frame_relay.h>
69 #include <netgraph/hole/ng_hole.h>
70 #include <netgraph/iface/ng_iface.h>
71 #include <netgraph/ksocket/ng_ksocket.h>
72 #include <netgraph/l2tp/ng_l2tp.h>
73 #include <netgraph/lmi/ng_lmi.h>
74 #include <netgraph/mppc/ng_mppc.h>
75 #include <netgraph/one2many/ng_one2many.h>
76 #include <netgraph/ppp/ng_ppp.h>
77 #include <netgraph/pppoe/ng_pppoe.h>
78 #include <netgraph/pptpgre/ng_pptpgre.h>
79 #include <netgraph/rfc1490/ng_rfc1490.h>
80 #include <netgraph/tee/ng_tee.h>
81 #include <netgraph/tty/ng_tty.h>
82 #include <netgraph/vjc/ng_vjc.h>
83 #ifdef  WHISTLE
84 #include <machine/../isa/df_def.h>
85 #include <machine/../isa/if_wfra.h>
86 #include <machine/../isa/ipac.h>
87 #include <netgraph/ng_df.h>
88 #include <netgraph/ng_ipac.h>
89 #include <netgraph/ng_tn.h>
90 #endif
91
92 /* Global debug level */
93 int     _gNgDebugLevel = 0;
94
95 /* Debug printing functions */
96 void    (*_NgLog) (const char *fmt,...) __printflike(1, 2) = warn;
97 void    (*_NgLogx) (const char *fmt,...) __printflike(1, 2) = warnx;
98
99 /* Internal functions */
100 static const    char *NgCookie(int cookie);
101
102 /* Known typecookie list */
103 struct ng_cookie {
104         int             cookie;
105         const char      *type;
106 };
107
108 #define COOKIE(c)       { NGM_ ## c ## _COOKIE, #c }
109
110 /* List of known cookies */
111 static const struct ng_cookie cookies[] = {
112         COOKIE(UI),
113         COOKIE(ASYNC),
114         COOKIE(BPF),
115         COOKIE(BRIDGE),
116         COOKIE(CISCO),
117         COOKIE(ECHO),
118         COOKIE(EIFACE),
119         COOKIE(ETF),
120         COOKIE(ETHER),
121         COOKIE(FRAMERELAY),
122         COOKIE(GENERIC),
123         COOKIE(HOLE),
124         COOKIE(IFACE),
125         COOKIE(KSOCKET),
126         COOKIE(L2TP),
127         COOKIE(LMI),
128         COOKIE(MPPC),
129         COOKIE(ONE2MANY),
130         COOKIE(PPP),
131         COOKIE(PPPOE),
132         COOKIE(PPTPGRE),
133         COOKIE(RFC1490),
134         COOKIE(SOCKET),
135         COOKIE(TEE),
136         COOKIE(TTY),
137         COOKIE(VJC),
138 #ifdef WHISTLE
139         COOKIE(DF),
140         COOKIE(IPAC),
141         COOKIE(TN),
142         COOKIE(WFRA),
143 #endif
144         { 0, NULL }
145 };
146
147 /*
148  * Set debug level, ie, verbosity, if "level" is non-negative.
149  * Returns old debug level.
150  */
151 int
152 NgSetDebug(int level)
153 {
154         int old = _gNgDebugLevel;
155
156         if (level < 0)
157                 level = old;
158         _gNgDebugLevel = level;
159         return (old);
160 }
161
162 /*
163  * Set debug logging functions.
164  */
165 void
166 NgSetErrLog(void (*log) (const char *fmt,...),
167                 void (*logx) (const char *fmt,...))
168 {
169         _NgLog = log;
170         _NgLogx = logx;
171 }
172
173 /*
174  * Display a netgraph sockaddr
175  */
176 void
177 _NgDebugSockaddr(const struct sockaddr_ng *sg)
178 {
179         NGLOGX("SOCKADDR: { fam=%d len=%d addr=\"%s\" }",
180                sg->sg_family, sg->sg_len, sg->sg_data);
181 }
182
183 #define ARGS_BUFSIZE            2048
184 #define RECURSIVE_DEBUG_ADJUST  4
185
186 /*
187  * Display a negraph message
188  */
189 void
190 _NgDebugMsg(const struct ng_mesg *msg, const char *path)
191 {
192         u_char buf[2 * sizeof(struct ng_mesg) + ARGS_BUFSIZE];
193         struct ng_mesg *const req = (struct ng_mesg *)buf;
194         struct ng_mesg *const bin = (struct ng_mesg *)req->data;
195         int arglen, csock = -1;
196
197         /* Display header stuff */
198         NGLOGX("NG_MESG :");
199         NGLOGX("  vers   %d", msg->header.version);
200         NGLOGX("  arglen %d", msg->header.arglen);
201         NGLOGX("  flags  %u", msg->header.flags);
202         NGLOGX("  token  %u", msg->header.token);
203         NGLOGX("  cookie %s (%d)",
204             NgCookie(msg->header.typecookie), msg->header.typecookie);
205
206         /* At lower debugging levels, skip ASCII translation */
207         if (_gNgDebugLevel <= 2)
208                 goto fail2;
209
210         /* If path is not absolute, don't bother trying to use relative
211            address on a different socket for the ASCII translation */
212         if (strchr(path, ':') == NULL)
213                 goto fail2;
214
215         /* Get a temporary socket */
216         if (NgMkSockNode(NULL, &csock, NULL) < 0)
217                 goto fail;
218
219         /* Copy binary message into request message payload */
220         arglen = msg->header.arglen;
221         if (arglen > ARGS_BUFSIZE)
222                 arglen = ARGS_BUFSIZE;
223         memcpy(bin, msg, sizeof(*msg) + arglen);
224         bin->header.arglen = arglen;
225
226         /* Lower debugging to avoid infinite recursion */
227         _gNgDebugLevel -= RECURSIVE_DEBUG_ADJUST;
228
229         /* Ask the node to translate the binary message to ASCII for us */
230         if (NgSendMsg(csock, path, NGM_GENERIC_COOKIE,
231             NGM_BINARY2ASCII, bin, sizeof(*bin) + bin->header.arglen) < 0) {
232                 _gNgDebugLevel += RECURSIVE_DEBUG_ADJUST;
233                 goto fail;
234         }
235         if (NgRecvMsg(csock, req, sizeof(buf), NULL) < 0) {
236                 _gNgDebugLevel += RECURSIVE_DEBUG_ADJUST;
237                 goto fail;
238         }
239
240         /* Restore debugging level */
241         _gNgDebugLevel += RECURSIVE_DEBUG_ADJUST;
242
243         /* Display command string and arguments */
244         NGLOGX("  cmd    %s (%d)", bin->header.cmdstr, bin->header.cmd);
245         NGLOGX("  args   %s", bin->data);
246         goto done;
247
248 fail:
249         /* Just display binary version */
250         NGLOGX("  [error decoding message: %s]", strerror(errno));
251 fail2:
252         NGLOGX("  cmd    %d", msg->header.cmd);
253         NGLOGX("  args (%d bytes)", msg->header.arglen);
254         _NgDebugBytes(msg->data, msg->header.arglen);
255
256 done:
257         if (csock != -1)
258                 (void)close(csock);
259 }
260
261 /*
262  * Return the name of the node type corresponding to the cookie
263  */
264 static const char *
265 NgCookie(int cookie)
266 {
267         int k;
268
269         for (k = 0; cookies[k].cookie != 0; k++) {
270                 if (cookies[k].cookie == cookie)
271                         return cookies[k].type;
272         }
273         return "??";
274 }
275
276 /*
277  * Dump bytes in hex
278  */
279 void
280 _NgDebugBytes(const u_char *ptr, int len)
281 {
282         char    buf[100];
283         int     k, count;
284
285 #define BYPERLINE       16
286
287         for (count = 0; count < len; ptr += BYPERLINE, count += BYPERLINE) {
288
289                 /* Do hex */
290                 snprintf(buf, sizeof(buf), "%04x:  ", count);
291                 for (k = 0; k < BYPERLINE; k++, count++)
292                         if (count < len)
293                                 snprintf(buf + strlen(buf),
294                                     sizeof(buf) - strlen(buf), "%02x ", ptr[k]);
295                         else
296                                 snprintf(buf + strlen(buf),
297                                     sizeof(buf) - strlen(buf), "   ");
298                 snprintf(buf + strlen(buf), sizeof(buf) - strlen(buf), "  ");
299                 count -= BYPERLINE;
300
301                 /* Do ASCII */
302                 for (k = 0; k < BYPERLINE; k++, count++)
303                         if (count < len)
304                                 snprintf(buf + strlen(buf),
305                                     sizeof(buf) - strlen(buf),
306                                     "%c", isprint(ptr[k]) ? ptr[k] : '.');
307                         else
308                                 snprintf(buf + strlen(buf),
309                                     sizeof(buf) - strlen(buf), "  ");
310                 count -= BYPERLINE;
311
312                 /* Print it */
313                 NGLOGX("%s", buf);
314         }
315 }
316