![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to debug.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDReno / usr.sbin / named / tools / nslookup|
Return to debug.c CVS log | Up to [CSRG BSD Unix] / 43BSDReno / usr.sbin / named / tools / nslookup |
1.1 root 1: /*
2: * Copyright (c) 1985,1989 Regents of the University of California.
3: * All rights reserved.
4: *
5: * Redistribution and use in source and binary forms are permitted provided
6: * that: (1) source distributions retain this entire copyright notice and
7: * comment, and (2) distributions including binaries display the following
8: * acknowledgement: ``This product includes software developed by the
9: * University of California, Berkeley and its contributors'' in the
10: * documentation or other materials provided with the distribution and in
11: * all advertising materials mentioning features or use of this software.
12: * Neither the name of the University nor the names of its contributors may
13: * be used to endorse or promote products derived from this software without
14: * specific prior written permission.
15: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR IMPLIED
16: * WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
17: * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
18: */
19:
20: #ifndef lint
21: static char sccsid[] = "@(#)debug.c 5.22 (Berkeley) 6/29/90";
22: #endif /* not lint */
23:
24: /*
25: *******************************************************************************
26: *
27: * debug.c --
28: *
29: * Routines to print out packets received from a name server query.
30: *
31: * Modified version of 4.3BSD BIND res_debug.c 5.30 6/27/90
32: *
33: *******************************************************************************
34: */
35:
36: #include <sys/types.h>
37: #include <netinet/in.h>
38: #include <stdio.h>
39: #include <arpa/nameser.h>
40: #include <arpa/inet.h>
41: #include <resolv.h>
42: #include <netdb.h>
43: #include "res.h"
44:
45: extern char ctime();
46:
47: /*
48: * Imported from res_debug.c
49: */
50: extern char *_res_resultcodes[];
51: extern char *_res_opcodes[];
52:
53: /*
54: * Used to highlight the start of a record when printing it.
55: */
56: #define INDENT " -> "
57:
58:
59:
60: /*
61: * Print the contents of a query.
62: * This is intended to be primarily a debugging routine.
63: */
64:
65: Print_query(msg, eom, printHeader)
66: char *msg, *eom;
67: int printHeader;
68: {
69: Fprint_query(msg, eom, printHeader,stdout);
70: }
71:
72: Fprint_query(msg, eom, printHeader,file)
73: char *msg, *eom;
74: int printHeader;
75: FILE *file;
76: {
77: register char *cp;
78: register HEADER *hp;
79: register int n;
80: short class;
81: short type;
82:
83: /*
84: * Print header fields.
85: */
86: hp = (HEADER *)msg;
87: cp = msg + sizeof(HEADER);
88: if (printHeader || (_res.options & RES_DEBUG2)) {
89: fprintf(file," HEADER:\n");
90: fprintf(file,"\topcode = %s", _res_opcodes[hp->opcode]);
91: fprintf(file,", id = %d", ntohs(hp->id));
92: fprintf(file,", rcode = %s\n", _res_resultcodes[hp->rcode]);
93: fprintf(file,"\theader flags: ");
94: if (hp->qr) {
95: fprintf(file," response");
96: } else {
97: fprintf(file," query");
98: }
99: if (hp->aa)
100: fprintf(file,", auth. answer");
101: if (hp->tc)
102: fprintf(file,", truncation");
103: if (hp->rd)
104: fprintf(file,", want recursion");
105: if (hp->ra)
106: fprintf(file,", recursion avail.");
107: if (hp->pr)
108: fprintf(file,", primary");
109: fprintf(file,"\n\tquestions = %d", ntohs(hp->qdcount));
110: fprintf(file,", answers = %d", ntohs(hp->ancount));
111: fprintf(file,", authority records = %d", ntohs(hp->nscount));
112: fprintf(file,", additional = %d\n\n", ntohs(hp->arcount));
113: }
114:
115: /*
116: * Print question records.
117: */
118: if (n = ntohs(hp->qdcount)) {
119: fprintf(file," QUESTIONS:\n");
120: while (--n >= 0) {
121: fprintf(file,"\t");
122: cp = Print_cdname(cp, msg, eom, file);
123: if (cp == NULL)
124: return;
125: type = _getshort(cp);
126: cp += sizeof(u_short);
127: class = _getshort(cp);
128: cp += sizeof(u_short);
129: fprintf(file,", type = %s", p_type(type));
130: fprintf(file,", class = %s\n", p_class(class));
131: }
132: }
133: /*
134: * Print authoritative answer records
135: */
136: if (n = ntohs(hp->ancount)) {
137: fprintf(file," ANSWERS:\n");
138: while (--n >= 0) {
139: fprintf(file, INDENT);
140: cp = Print_rr(cp, msg, eom, file);
141: if (cp == NULL)
142: return;
143: }
144: }
145: /*
146: * print name server records
147: */
148: if (n = ntohs(hp->nscount)) {
149: fprintf(file," AUTHORITY RECORDS:\n");
150: while (--n >= 0) {
151: fprintf(file, INDENT);
152: cp = Print_rr(cp, msg, eom, file);
153: if (cp == NULL)
154: return;
155: }
156: }
157: /*
158: * print additional records
159: */
160: if (n = ntohs(hp->arcount)) {
161: fprintf(file," ADDITIONAL RECORDS:\n");
162: while (--n >= 0) {
163: fprintf(file, INDENT);
164: cp = Print_rr(cp, msg, eom, file);
165: if (cp == NULL)
166: return;
167: }
168: }
169: fprintf(file,"\n------------\n");
170: }
171:
172:
173: char *
174: Print_cdname_sub(cp, msg, eom, file, format)
175: char *cp, *msg, *eom;
176: FILE *file;
177: int format;
178: {
179: int n;
180: char name[MAXDNAME];
181: extern char *strcpy();
182:
183: if ((n = dn_expand(msg, eom, cp, name, sizeof(name))) < 0)
184: return (NULL);
185: if (name[0] == '\0') {
186: (void) strcpy(name, "(root)");
187: }
188: if (format) {
189: fprintf(file, "%-30s", name);
190: } else {
191: fputs(name, file);
192: }
193: return (cp + n);
194: }
195:
196: char *
197: Print_cdname(cp, msg, eom, file)
198: char *cp, *msg, *eom;
199: FILE *file;
200: {
201: return(Print_cdname_sub(cp, msg, eom, file, 0));
202: }
203:
204: char *
205: Print_cdname2(cp, msg, eom, file)
206: char *cp, *msg, *eom;
207: FILE *file;
208: {
209: return(Print_cdname_sub(cp, msg, eom, file, 1));
210: }
211:
212: /*
213: * Print resource record fields in human readable form.
214: */
215: char *
216: Print_rr(cp, msg, eom, file)
217: char *cp, *msg, *eom;
218: FILE *file;
219: {
220: int type, class, dlen, n, c;
221: unsigned long rrttl, ttl;
222: struct in_addr inaddr;
223: char *cp1, *cp2;
224: int debug;
225:
226: if ((cp = Print_cdname(cp, msg, eom, file)) == NULL) {
227: fprintf(file, "(name truncated?)\n");
228: return (NULL); /* compression error */
229: }
230:
231: type = _getshort(cp);
232: cp += sizeof(u_short);
233: class = _getshort(cp);
234: cp += sizeof(u_short);
235: rrttl = _getlong(cp);
236: cp += sizeof(u_long);
237: dlen = _getshort(cp);
238: cp += sizeof(u_short);
239:
240: debug = _res.options & (RES_DEBUG|RES_DEBUG2);
241: if (debug) {
242: if (_res.options & RES_DEBUG2) {
243: fprintf(file,"\n\ttype = %s, class = %s, dlen = %d",
244: p_type(type), p_class(class), dlen);
245: }
246: if (type == T_SOA) {
247: fprintf(file,"\n\tttl = %lu (%s)", rrttl, p_time(rrttl));
248: }
249: (void) putc('\n', file);
250: }
251:
252: cp1 = cp;
253:
254: /*
255: * Print type specific data, if appropriate
256: */
257: switch (type) {
258: case T_A:
259: switch (class) {
260: case C_IN:
261: case C_HS:
262: bcopy(cp, (char *)&inaddr, sizeof(inaddr));
263: if (dlen == 4) {
264: fprintf(file,"\tinternet address = %s\n",
265: inet_ntoa(inaddr));
266: cp += dlen;
267: } else if (dlen == 7) {
268: fprintf(file,"\tinternet address = %s",
269: inet_ntoa(inaddr));
270: fprintf(file,", protocol = %d", cp[4]);
271: fprintf(file,", port = %d\n",
272: (cp[5] << 8) + cp[6]);
273: cp += dlen;
274: }
275: break;
276: default:
277: fprintf(file,"\taddress, class = %d, len = %d\n",
278: class, dlen);
279: cp += dlen;
280: }
281: break;
282:
283: case T_CNAME:
284: fprintf(file,"\tcanonical name = ");
285: goto doname;
286:
287: case T_MG:
288: fprintf(file,"\tmail group member = ");
289: goto doname;
290: case T_MB:
291: fprintf(file,"\tmail box = ");
292: goto doname;
293: case T_MR:
294: fprintf(file,"\tmailbox rename = ");
295: goto doname;
296: case T_MX:
297: fprintf(file,"\tpreference = %u",_getshort(cp));
298: cp += sizeof(u_short);
299: fprintf(file,", mail exchanger = ");
300: goto doname;
301: case T_NS:
302: fprintf(file,"\tnameserver = ");
303: goto doname;
304: case T_PTR:
305: fprintf(file,"\tname = ");
306: doname:
307: cp = Print_cdname(cp, msg, eom, file);
308: (void) putc('\n', file);
309: break;
310:
311: case T_HINFO:
312: if (n = *cp++) {
313: fprintf(file,"\tCPU = %.*s", n, cp);
314: cp += n;
315: }
316: if (n = *cp++) {
317: fprintf(file,"\tOS = %.*s\n", n, cp);
318: cp += n;
319: }
320: break;
321:
322: case T_SOA:
323: if (!debug)
324: (void) putc('\n', file);
325: fprintf(file,"\torigin = ");
326: cp = Print_cdname(cp, msg, eom, file);
327: fprintf(file,"\n\tmail addr = ");
328: cp = Print_cdname(cp, msg, eom, file);
329: fprintf(file,"\n\tserial = %lu", _getlong(cp));
330: cp += sizeof(u_long);
331: ttl = _getlong(cp);
332: fprintf(file,"\n\trefresh = %lu (%s)", ttl, p_time(ttl));
333: cp += sizeof(u_long);
334: ttl = _getlong(cp);
335: fprintf(file,"\n\tretry = %lu (%s)", ttl, p_time(ttl));
336: cp += sizeof(u_long);
337: ttl = _getlong(cp);
338: fprintf(file,"\n\texpire = %lu (%s)", ttl, p_time(ttl));
339: cp += sizeof(u_long);
340: ttl = _getlong(cp);
341: fprintf(file,"\n\tminimum ttl = %lu (%s)\n", ttl, p_time(ttl));
342: cp += sizeof(u_long);
343: break;
344:
345: case T_MINFO:
346: if (!debug)
347: (void) putc('\n', file);
348: fprintf(file,"\trequests = ");
349: cp = Print_cdname(cp, msg, eom, file);
350: fprintf(file,"\n\terrors = ");
351: cp = Print_cdname(cp, msg, eom, file);
352: (void) putc('\n', file);
353: break;
354:
355: case T_TXT:
356: (void) fputs("\ttext = \"", file);
357: cp2 = cp1 + dlen;
358: while (cp < cp2) {
359: if (n = (unsigned char) *cp++) {
360: for (c = n; c > 0 && cp < cp2; c--)
361: if (*cp == '\n') {
362: (void) putc('\\', file);
363: (void) putc(*cp++, file);
364: } else
365: (void) putc(*cp++, file);
366: }
367: }
368: (void) fputs("\"\n", file);
369: break;
370:
371: case T_UINFO:
372: fprintf(file,"\tuser info = %s\n", cp);
373: cp += dlen;
374: break;
375:
376: case T_UID:
377: case T_GID:
378: if (dlen == 4) {
379: fprintf(file,"\t%cid = %lu\n",type == T_UID ? 'u' : 'g',
380: _getlong(cp));
381: cp += sizeof(int);
382: } else {
383: fprintf(file,"\t%cid of length %d?\n",
384: type == T_UID ? 'u' : 'g', dlen);
385: cp += dlen;
386: }
387: break;
388:
389: case T_WKS: {
390: struct protoent *protoPtr;
391:
392: if (dlen < sizeof(u_long) + 1)
393: break;
394: if (!debug)
395: (void) putc('\n', file);
396: bcopy(cp, (char *)&inaddr, sizeof(inaddr));
397: cp += sizeof(u_long);
398: if ((protoPtr = getprotobynumber(*cp)) != NULL) {
399: fprintf(file,"\tinet address = %s, protocol = %s\n\t",
400: inet_ntoa(inaddr), protoPtr->p_name);
401: } else {
402: fprintf(file,"\tinet address = %s, protocol = %d\n\t",
403: inet_ntoa(inaddr), *cp);
404: }
405: cp++;
406: n = 0;
407: while (cp < cp1 + dlen) {
408: c = *cp++;
409: do {
410: struct servent *s;
411:
412: if (c & 0200) {
413: s = getservbyport(n, NULL);
414: if (s != NULL) {
415: fprintf(file," %s", s->s_name);
416: } else {
417: fprintf(file," #%d", n);
418: }
419: }
420: c <<= 1;
421: } while (++n & 07);
422: }
423: putc('\n',file);
424: }
425: break;
426:
427: case T_NULL:
428: fprintf(file, "\tNULL (dlen %d)\n", dlen);
429: cp += dlen;
430: break;
431:
432: default:
433: fprintf(file,"\t??? unknown type %d ???\n", type);
434: cp += dlen;
435: }
436: if (_res.options & RES_DEBUG && type != T_SOA) {
437: fprintf(file,"\tttl = %lu (%s)\n", rrttl, p_time(rrttl));
438: }
439: if (cp != cp1 + dlen) {
440: fprintf(file,
441: "\n*** Error: record size incorrect (%d != %d)\n\n",
442: cp - cp1, dlen);
443: cp = NULL;
444: }
445: return (cp);
446: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.