![[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] / 43BSD / etc / named / tools / ns.lookup / src|
Return to debug.c CVS log | Up to [CSRG BSD Unix] / 43BSD / etc / named / tools / ns.lookup / src |
1.1 root 1: /*
2: *******************************************************************************
3: *
4: * debug.c --
5: *
6: * Routines to print out packets received from a name server query.
7: *
8: * Modified version of 4.3BSD BIND res_debug.c 5.6 9/14/85
9: *
10: * Copyright (c) 1985 Regents of the University of California.
11: * All rights reserved. The Berkeley software License Agreement
12: * specifies the terms and conditions for redistribution.
13: *
14: *******************************************************************************
15: */
16:
17: #ifndef lint
18: static char sccsid[] = "@(#)debug.c 5.3 (Berkeley) 3/31/86";
19: #endif not lint
20:
21: #include <sys/types.h>
22: #include <netinet/in.h>
23: #include <stdio.h>
24: #include <arpa/nameser.h>
25: #include <resolv.h>
26: #include "res.h"
27:
28: extern char ctime();
29:
30: /*
31: * Imported from res_debug.c
32: */
33: extern char *rcodes[];
34: extern char *opcodes[];
35:
36: /*
37: * Used to highlight the start of a record when printing it.
38: */
39: #define INDENT "-> "
40:
41:
42:
43: /*
44: * Print the contents of a query.
45: * This is intended to be primarily a debugging routine.
46: */
47:
48: Print_query(msg, eom, printHeader)
49: char *msg, *eom;
50: int printHeader;
51: {
52: Fprint_query(msg, eom, printHeader,stdout);
53: }
54:
55: Fprint_query(msg, eom, printHeader,file)
56: char *msg, *eom;
57: int printHeader;
58: FILE *file;
59: {
60: register char *cp;
61: register HEADER *hp;
62: register int n;
63: short class;
64: short type;
65:
66: /*
67: * Print header fields.
68: */
69: hp = (HEADER *)msg;
70: cp = msg + sizeof(HEADER);
71: if (printHeader || (_res.options & RES_DEBUG2)) {
72: fprintf(file,"HEADER:\n");
73: fprintf(file,"\topcode = %s", opcodes[hp->opcode]);
74: fprintf(file,", id = %d", ntohs(hp->id));
75: fprintf(file,", rcode = %s\n", rcodes[hp->rcode]);
76: fprintf(file,"\theader flags: ");
77: if (hp->qr) {
78: fprintf(file," response");
79: } else {
80: fprintf(file," query");
81: }
82: if (hp->aa)
83: fprintf(file,", auth. answer");
84: if (hp->tc)
85: fprintf(file,", truncation");
86: if (hp->rd)
87: fprintf(file,", want recursion");
88: if (hp->ra)
89: fprintf(file,", recursion avail.");
90: if (hp->pr)
91: fprintf(file,", primary");
92: fprintf(file,"\n\tquestions = %d", ntohs(hp->qdcount));
93: fprintf(file,", answers = %d", ntohs(hp->ancount));
94: fprintf(file,", n.s. = %d", ntohs(hp->nscount));
95: fprintf(file,", additional = %d\n\n", ntohs(hp->arcount));
96: }
97:
98: /*
99: * Print question records.
100: */
101: if (n = ntohs(hp->qdcount)) {
102: fprintf(file,"QUESTIONS:\n");
103: while (--n >= 0) {
104: fprintf(file,"\t");
105: cp = Print_cdname(cp, msg, eom, file);
106: if (cp == NULL)
107: return;
108: type = getshort(cp);
109: cp += sizeof(u_short);
110: class = getshort(cp);
111: cp += sizeof(u_short);
112: fprintf(file,", type = %s", p_type(type));
113: fprintf(file,", class = %s\n", p_class(class));
114: }
115: }
116: /*
117: * Print authoritative answer records
118: */
119: if (n = ntohs(hp->ancount)) {
120: fprintf(file,"ANSWERS:\n");
121: while (--n >= 0) {
122: fprintf(file, INDENT);
123: cp = Print_rr(cp, msg, eom, file);
124: if (cp == NULL)
125: return;
126: }
127: }
128: /*
129: * print name server records
130: */
131: if (n = ntohs(hp->nscount)) {
132: fprintf(file,"NAME SERVERS:\n");
133: while (--n >= 0) {
134: fprintf(file, INDENT);
135: cp = Print_rr(cp, msg, eom, file);
136: if (cp == NULL)
137: return;
138: }
139: }
140: /*
141: * print additional records
142: */
143: if (n = ntohs(hp->arcount)) {
144: fprintf(file,"ADDITIONAL RECORDS:\n");
145: while (--n >= 0) {
146: fprintf(file, INDENT);
147: cp = Print_rr(cp, msg, eom, file);
148: if (cp == NULL)
149: return;
150: }
151: }
152: fprintf(file,"\n");
153:
154: }
155:
156:
157: char *
158: Print_cdname_sub(cp, msg, eom, file, format)
159: char *cp, *msg, *eom;
160: FILE *file;
161: int format;
162: {
163: int n;
164: char name[MAXDNAME];
165: extern char *strcpy();
166:
167: if ((n = dn_expand(msg, eom, cp, name, sizeof(name))) < 0)
168: return (NULL);
169: if (name[0] == '\0') {
170: (void) strcpy(name, "(root)");
171: }
172: if (format) {
173: fprintf(file, "%-30s", name);
174: } else {
175: fputs(name, file);
176: }
177: return (cp + n);
178: }
179:
180: char *
181: Print_cdname(cp, msg, eom, file)
182: char *cp, *msg, *eom;
183: FILE *file;
184: {
185: return(Print_cdname_sub(cp, msg, eom, file, 0));
186: }
187:
188: char *
189: Print_cdname2(cp, msg, eom, file)
190: char *cp, *msg, *eom;
191: FILE *file;
192: {
193: return(Print_cdname_sub(cp, msg, eom, file, 1));
194: }
195:
196: /*
197: * Print resource record fields in human readable form.
198: */
199: char *
200: Print_rr(cp, msg, eom, file)
201: char *cp, *msg, *eom;
202: FILE *file;
203: {
204: int type, class, dlen, n, c;
205: long ttl;
206: struct in_addr inaddr;
207: char *cp1;
208:
209: if ((cp = Print_cdname(cp, msg, eom, file)) == NULL)
210: return (NULL); /* compression error */
211:
212: type = getshort(cp);
213: cp += sizeof(u_short);
214: class = getshort(cp);
215: cp += sizeof(u_short);
216: ttl = getlong(cp);
217: cp += sizeof(u_long);
218: dlen = getshort(cp);
219: cp += sizeof(u_short);
220:
221: if (_res.options & RES_DEBUG2) {
222: fprintf(file,"\n\ttype = %s, class = %s, ttl = %u, dlen = %d",
223: p_type(type), p_class(class), ttl, dlen);
224: fprintf(file,"\n");
225: }
226:
227: cp1 = cp;
228:
229: /*
230: * Print type specific data, if appropriate
231: */
232: switch (type) {
233: case T_A:
234: switch (class) {
235: case C_IN:
236: bcopy(cp, (char *)&inaddr, sizeof(inaddr));
237: if (dlen == 4) {
238: fprintf(file,"\tinet address = %s\n",
239: inet_ntoa(inaddr));
240: cp += dlen;
241: } else if (dlen == 7) {
242: fprintf(file,"\tinet address = %s",
243: inet_ntoa(inaddr));
244: fprintf(file,", protocol = %d", cp[4]);
245: fprintf(file,", port = %d\n",
246: (cp[5] << 8) + cp[6]);
247: cp += dlen;
248: }
249: break;
250: }
251: break;
252:
253: case T_CNAME:
254: fprintf(file,"\tcanonical name = ");
255: cp = Print_cdname(cp, msg, eom, file);
256: fprintf(file,"\n");
257: break;
258:
259: case T_MX:
260: fprintf(file,"\tpreference = %d",getshort(cp));
261: cp += sizeof(u_short);
262: fprintf(file,", mail exchanger = ");
263: cp = Print_cdname(cp,msg, eom, file);
264: fprintf(file,"\n");
265: break;
266:
267: case T_MG:
268: case T_MB:
269: case T_MR:
270: case T_NS:
271: case T_PTR:
272: fprintf(file,"\tserver name = ");
273: cp = Print_cdname(cp, msg, eom, file);
274: fprintf(file,"\n");
275: break;
276:
277: case T_HINFO:
278: if (n = *cp++) {
279: fprintf(file,"\tCPU=%.*s", n, cp);
280: cp += n;
281: }
282: if (n = *cp++) {
283: fprintf(file,"\tOS=%.*s\n", n, cp);
284: cp += n;
285: }
286: break;
287:
288: case T_SOA:
289: fprintf(file,"\torigin = ");
290: cp = Print_cdname(cp, msg, eom, file);
291: fprintf(file,"\n\tmail addr = ");
292: cp = Print_cdname(cp, msg, eom, file);
293: fprintf(file,"\n\tserial=%ld", getlong(cp));
294: cp += sizeof(u_long);
295: fprintf(file,", refresh=%ld", getlong(cp));
296: cp += sizeof(u_long);
297: fprintf(file,", retry=%ld", getlong(cp));
298: cp += sizeof(u_long);
299: fprintf(file,", expire=%ld", getlong(cp));
300: cp += sizeof(u_long);
301: fprintf(file,", min=%ld\n", getlong(cp));
302: cp += sizeof(u_long);
303: break;
304:
305: case T_MINFO:
306: fprintf(file,"\trequests = ");
307: cp = Print_cdname(cp, msg, eom, file);
308: fprintf(file,"\n\terrors = ");
309: cp = Print_cdname(cp, msg, eom, file);
310: break;
311:
312: case T_UINFO:
313: fprintf(file,"\t%s\n", cp);
314: cp += dlen;
315: break;
316:
317: case T_UID:
318: case T_GID:
319: if (dlen == 4) {
320: fprintf(file,"\t%ld\n", getlong(cp));
321: cp += sizeof(int);
322: }
323: break;
324:
325: case T_WKS:
326: if (dlen < sizeof(u_long) + 1)
327: break;
328: bcopy(cp, (char *)&inaddr, sizeof(inaddr));
329: cp += sizeof(u_long);
330: fprintf(file,"\tinet address = %s, protocol = %d\n\t",
331: inet_ntoa(inaddr), *cp++);
332: n = 0;
333: while (cp < cp1 + dlen) {
334: c = *cp++;
335: do {
336: if (c & 0200)
337: fprintf(file," %d", n);
338: c <<= 1;
339: } while (++n & 07);
340: }
341: putc('\n',file);
342: break;
343:
344: case T_NULL:
345: break;
346:
347: default:
348: fprintf(file,"\t???\n");
349: cp += dlen;
350: }
351: if (cp != cp1 + dlen)
352: fprintf(file,"packet size error (%#x != %#x)\n", cp, cp1+dlen);
353: return (cp);
354: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.