![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to res_debug.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / lib / libc / net|
Return to res_debug.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / lib / libc / net |
1.1 ! root 1: /* ! 2: * Copyright (c) 1985 Regents of the University of California. ! 3: * All rights reserved. ! 4: * ! 5: * Redistribution and use in source and binary forms are permitted ! 6: * provided that the above copyright notice and this paragraph are ! 7: * duplicated in all such forms and that any documentation, ! 8: * advertising materials, and other materials related to such ! 9: * distribution and use acknowledge that the software was developed ! 10: * by the University of California, Berkeley. The name of the ! 11: * University may not be used to endorse or promote products derived ! 12: * from this software without specific prior written permission. ! 13: * THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR ! 14: * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED ! 15: * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. ! 16: */ ! 17: ! 18: #if defined(LIBC_SCCS) && !defined(lint) ! 19: static char sccsid[] = "@(#)res_debug.c 5.24 (Berkeley) 6/27/88"; ! 20: #endif /* LIBC_SCCS and not lint */ ! 21: ! 22: #if defined(lint) && !defined(DEBUG) ! 23: #define DEBUG ! 24: #endif ! 25: ! 26: #include <sys/types.h> ! 27: #include <netinet/in.h> ! 28: #include <stdio.h> ! 29: #include <arpa/nameser.h> ! 30: ! 31: extern char *p_cdname(), *p_rr(), *p_type(), *p_class(), *p_time(); ! 32: extern char *inet_ntoa(); ! 33: ! 34: char *_res_opcodes[] = { ! 35: "QUERY", ! 36: "IQUERY", ! 37: "CQUERYM", ! 38: "CQUERYU", ! 39: "4", ! 40: "5", ! 41: "6", ! 42: "7", ! 43: "8", ! 44: "UPDATEA", ! 45: "UPDATED", ! 46: "UPDATEDA", ! 47: "UPDATEM", ! 48: "UPDATEMA", ! 49: "ZONEINIT", ! 50: "ZONEREF", ! 51: }; ! 52: ! 53: char *_res_resultcodes[] = { ! 54: "NOERROR", ! 55: "FORMERR", ! 56: "SERVFAIL", ! 57: "NXDOMAIN", ! 58: "NOTIMP", ! 59: "REFUSED", ! 60: "6", ! 61: "7", ! 62: "8", ! 63: "9", ! 64: "10", ! 65: "11", ! 66: "12", ! 67: "13", ! 68: "14", ! 69: "NOCHANGE", ! 70: }; ! 71: ! 72: p_query(msg) ! 73: char *msg; ! 74: { ! 75: #ifdef DEBUG ! 76: fp_query(msg,stdout); ! 77: #endif ! 78: } ! 79: ! 80: /* ! 81: * Print the contents of a query. ! 82: * This is intended to be primarily a debugging routine. ! 83: */ ! 84: fp_query(msg,file) ! 85: char *msg; ! 86: FILE *file; ! 87: { ! 88: #ifdef DEBUG ! 89: register char *cp; ! 90: register HEADER *hp; ! 91: register int n; ! 92: ! 93: /* ! 94: * Print header fields. ! 95: */ ! 96: hp = (HEADER *)msg; ! 97: cp = msg + sizeof(HEADER); ! 98: fprintf(file,"HEADER:\n"); ! 99: fprintf(file,"\topcode = %s", _res_opcodes[hp->opcode]); ! 100: fprintf(file,", id = %d", ntohs(hp->id)); ! 101: fprintf(file,", rcode = %s\n", _res_resultcodes[hp->rcode]); ! 102: fprintf(file,"\theader flags: "); ! 103: if (hp->qr) ! 104: fprintf(file," qr"); ! 105: if (hp->aa) ! 106: fprintf(file," aa"); ! 107: if (hp->tc) ! 108: fprintf(file," tc"); ! 109: if (hp->rd) ! 110: fprintf(file," rd"); ! 111: if (hp->ra) ! 112: fprintf(file," ra"); ! 113: if (hp->pr) ! 114: fprintf(file," pr"); ! 115: fprintf(file,"\n\tqdcount = %d", ntohs(hp->qdcount)); ! 116: fprintf(file,", ancount = %d", ntohs(hp->ancount)); ! 117: fprintf(file,", nscount = %d", ntohs(hp->nscount)); ! 118: fprintf(file,", arcount = %d\n\n", ntohs(hp->arcount)); ! 119: /* ! 120: * Print question records. ! 121: */ ! 122: if (n = ntohs(hp->qdcount)) { ! 123: fprintf(file,"QUESTIONS:\n"); ! 124: while (--n >= 0) { ! 125: fprintf(file,"\t"); ! 126: cp = p_cdname(cp, msg, file); ! 127: if (cp == NULL) ! 128: return; ! 129: fprintf(file,", type = %s", p_type(_getshort(cp))); ! 130: cp += sizeof(u_short); ! 131: fprintf(file,", class = %s\n\n", p_class(_getshort(cp))); ! 132: cp += sizeof(u_short); ! 133: } ! 134: } ! 135: /* ! 136: * Print authoritative answer records ! 137: */ ! 138: if (n = ntohs(hp->ancount)) { ! 139: fprintf(file,"ANSWERS:\n"); ! 140: while (--n >= 0) { ! 141: fprintf(file,"\t"); ! 142: cp = p_rr(cp, msg, file); ! 143: if (cp == NULL) ! 144: return; ! 145: } ! 146: } ! 147: /* ! 148: * print name server records ! 149: */ ! 150: if (n = ntohs(hp->nscount)) { ! 151: fprintf(file,"NAME SERVERS:\n"); ! 152: while (--n >= 0) { ! 153: fprintf(file,"\t"); ! 154: cp = p_rr(cp, msg, file); ! 155: if (cp == NULL) ! 156: return; ! 157: } ! 158: } ! 159: /* ! 160: * print additional records ! 161: */ ! 162: if (n = ntohs(hp->arcount)) { ! 163: fprintf(file,"ADDITIONAL RECORDS:\n"); ! 164: while (--n >= 0) { ! 165: fprintf(file,"\t"); ! 166: cp = p_rr(cp, msg, file); ! 167: if (cp == NULL) ! 168: return; ! 169: } ! 170: } ! 171: #endif ! 172: } ! 173: ! 174: char * ! 175: p_cdname(cp, msg, file) ! 176: char *cp, *msg; ! 177: FILE *file; ! 178: { ! 179: #ifdef DEBUG ! 180: char name[MAXDNAME]; ! 181: int n; ! 182: ! 183: if ((n = dn_expand(msg, msg + 512, cp, name, sizeof(name))) < 0) ! 184: return (NULL); ! 185: if (name[0] == '\0') { ! 186: name[0] = '.'; ! 187: name[1] = '\0'; ! 188: } ! 189: fputs(name, file); ! 190: return (cp + n); ! 191: #endif ! 192: } ! 193: ! 194: /* ! 195: * Print resource record fields in human readable form. ! 196: */ ! 197: char * ! 198: p_rr(cp, msg, file) ! 199: char *cp, *msg; ! 200: FILE *file; ! 201: { ! 202: #ifdef DEBUG ! 203: int type, class, dlen, n, c; ! 204: struct in_addr inaddr; ! 205: char *cp1; ! 206: ! 207: if ((cp = p_cdname(cp, msg, file)) == NULL) ! 208: return (NULL); /* compression error */ ! 209: fprintf(file,"\n\ttype = %s", p_type(type = _getshort(cp))); ! 210: cp += sizeof(u_short); ! 211: fprintf(file,", class = %s", p_class(class = _getshort(cp))); ! 212: cp += sizeof(u_short); ! 213: fprintf(file,", ttl = %s", p_time(cp)); ! 214: cp += sizeof(u_long); ! 215: fprintf(file,", dlen = %d\n", dlen = _getshort(cp)); ! 216: cp += sizeof(u_short); ! 217: cp1 = cp; ! 218: /* ! 219: * Print type specific data, if appropriate ! 220: */ ! 221: switch (type) { ! 222: case T_A: ! 223: switch (class) { ! 224: case C_IN: ! 225: bcopy(cp, (char *)&inaddr, sizeof(inaddr)); ! 226: if (dlen == 4) { ! 227: fprintf(file,"\tinternet address = %s\n", ! 228: inet_ntoa(inaddr)); ! 229: cp += dlen; ! 230: } else if (dlen == 7) { ! 231: fprintf(file,"\tinternet address = %s", ! 232: inet_ntoa(inaddr)); ! 233: fprintf(file,", protocol = %d", cp[4]); ! 234: fprintf(file,", port = %d\n", ! 235: (cp[5] << 8) + cp[6]); ! 236: cp += dlen; ! 237: } ! 238: break; ! 239: default: ! 240: cp += dlen; ! 241: } ! 242: break; ! 243: case T_CNAME: ! 244: case T_MB: ! 245: #ifdef OLDRR ! 246: case T_MD: ! 247: case T_MF: ! 248: #endif /* OLDRR */ ! 249: case T_MG: ! 250: case T_MR: ! 251: case T_NS: ! 252: case T_PTR: ! 253: fprintf(file,"\tdomain name = "); ! 254: cp = p_cdname(cp, msg, file); ! 255: fprintf(file,"\n"); ! 256: break; ! 257: ! 258: case T_HINFO: ! 259: if (n = *cp++) { ! 260: fprintf(file,"\tCPU=%.*s\n", n, cp); ! 261: cp += n; ! 262: } ! 263: if (n = *cp++) { ! 264: fprintf(file,"\tOS=%.*s\n", n, cp); ! 265: cp += n; ! 266: } ! 267: break; ! 268: ! 269: case T_SOA: ! 270: fprintf(file,"\torigin = "); ! 271: cp = p_cdname(cp, msg, file); ! 272: fprintf(file,"\n\tmail addr = "); ! 273: cp = p_cdname(cp, msg, file); ! 274: fprintf(file,"\n\tserial=%ld", _getlong(cp)); ! 275: cp += sizeof(u_long); ! 276: fprintf(file,", refresh=%s", p_time(cp)); ! 277: cp += sizeof(u_long); ! 278: fprintf(file,", retry=%s", p_time(cp)); ! 279: cp += sizeof(u_long); ! 280: fprintf(file,", expire=%s", p_time(cp)); ! 281: cp += sizeof(u_long); ! 282: fprintf(file,", min=%s\n", p_time(cp)); ! 283: cp += sizeof(u_long); ! 284: break; ! 285: ! 286: case T_MX: ! 287: fprintf(file,"\tpreference = %ld,",_getshort(cp)); ! 288: cp += sizeof(u_short); ! 289: fprintf(file," name = "); ! 290: cp = p_cdname(cp, msg, file); ! 291: break; ! 292: ! 293: case T_MINFO: ! 294: fprintf(file,"\trequests = "); ! 295: cp = p_cdname(cp, msg, file); ! 296: fprintf(file,"\n\terrors = "); ! 297: cp = p_cdname(cp, msg, file); ! 298: break; ! 299: ! 300: case T_UINFO: ! 301: fprintf(file,"\t%s\n", cp); ! 302: cp += dlen; ! 303: break; ! 304: ! 305: case T_UID: ! 306: case T_GID: ! 307: if (dlen == 4) { ! 308: fprintf(file,"\t%ld\n", _getlong(cp)); ! 309: cp += sizeof(int); ! 310: } ! 311: break; ! 312: ! 313: case T_WKS: ! 314: if (dlen < sizeof(u_long) + 1) ! 315: break; ! 316: bcopy(cp, (char *)&inaddr, sizeof(inaddr)); ! 317: cp += sizeof(u_long); ! 318: fprintf(file,"\tinternet address = %s, protocol = %d\n\t", ! 319: inet_ntoa(inaddr), *cp++); ! 320: n = 0; ! 321: while (cp < cp1 + dlen) { ! 322: c = *cp++; ! 323: do { ! 324: if (c & 0200) ! 325: fprintf(file," %d", n); ! 326: c <<= 1; ! 327: } while (++n & 07); ! 328: } ! 329: putc('\n',file); ! 330: break; ! 331: ! 332: #ifdef ALLOW_T_UNSPEC ! 333: case T_UNSPEC: ! 334: { ! 335: int NumBytes = 8; ! 336: char *DataPtr; ! 337: int i; ! 338: ! 339: if (dlen < NumBytes) NumBytes = dlen; ! 340: fprintf(file, "\tFirst %d bytes of hex data:", ! 341: NumBytes); ! 342: for (i = 0, DataPtr = cp; i < NumBytes; i++, DataPtr++) ! 343: fprintf(file, " %x", *DataPtr); ! 344: fputs("\n", file); ! 345: cp += dlen; ! 346: } ! 347: break; ! 348: #endif /* ALLOW_T_UNSPEC */ ! 349: ! 350: default: ! 351: fprintf(file,"\t???\n"); ! 352: cp += dlen; ! 353: } ! 354: if (cp != cp1 + dlen) ! 355: fprintf(file,"packet size error (%#x != %#x)\n", cp, cp1+dlen); ! 356: fprintf(file,"\n"); ! 357: return (cp); ! 358: #endif ! 359: } ! 360: ! 361: static char nbuf[40]; ! 362: ! 363: /* ! 364: * Return a string for the type ! 365: */ ! 366: char * ! 367: p_type(type) ! 368: int type; ! 369: { ! 370: switch (type) { ! 371: case T_A: ! 372: return("A"); ! 373: case T_NS: /* authoritative server */ ! 374: return("NS"); ! 375: #ifdef OLDRR ! 376: case T_MD: /* mail destination */ ! 377: return("MD"); ! 378: case T_MF: /* mail forwarder */ ! 379: return("MF"); ! 380: #endif /* OLDRR */ ! 381: case T_CNAME: /* connonical name */ ! 382: return("CNAME"); ! 383: case T_SOA: /* start of authority zone */ ! 384: return("SOA"); ! 385: case T_MB: /* mailbox domain name */ ! 386: return("MB"); ! 387: case T_MG: /* mail group member */ ! 388: return("MG"); ! 389: case T_MX: /* mail routing info */ ! 390: return("MX"); ! 391: case T_MR: /* mail rename name */ ! 392: return("MR"); ! 393: case T_NULL: /* null resource record */ ! 394: return("NULL"); ! 395: case T_WKS: /* well known service */ ! 396: return("WKS"); ! 397: case T_PTR: /* domain name pointer */ ! 398: return("PTR"); ! 399: case T_HINFO: /* host information */ ! 400: return("HINFO"); ! 401: case T_MINFO: /* mailbox information */ ! 402: return("MINFO"); ! 403: case T_AXFR: /* zone transfer */ ! 404: return("AXFR"); ! 405: case T_MAILB: /* mail box */ ! 406: return("MAILB"); ! 407: case T_MAILA: /* mail address */ ! 408: return("MAILA"); ! 409: case T_ANY: /* matches any type */ ! 410: return("ANY"); ! 411: case T_UINFO: ! 412: return("UINFO"); ! 413: case T_UID: ! 414: return("UID"); ! 415: case T_GID: ! 416: return("GID"); ! 417: #ifdef ALLOW_T_UNSPEC ! 418: case T_UNSPEC: ! 419: return("UNSPEC"); ! 420: #endif /* ALLOW_T_UNSPEC */ ! 421: default: ! 422: (void)sprintf(nbuf, "%d", type); ! 423: return(nbuf); ! 424: } ! 425: } ! 426: ! 427: /* ! 428: * Return a mnemonic for class ! 429: */ ! 430: char * ! 431: p_class(class) ! 432: int class; ! 433: { ! 434: ! 435: switch (class) { ! 436: case C_IN: /* internet class */ ! 437: return("IN"); ! 438: case C_ANY: /* matches any class */ ! 439: return("ANY"); ! 440: default: ! 441: (void)sprintf(nbuf, "%d", class); ! 442: return(nbuf); ! 443: } ! 444: } ! 445: ! 446: /* ! 447: * Return a mnemonic for a time to live ! 448: */ ! 449: char ! 450: *p_time(value) ! 451: u_long value; ! 452: { ! 453: int secs, mins, hours; ! 454: register char *p; ! 455: ! 456: secs = value % 60; ! 457: value /= 60; ! 458: mins = value % 60; ! 459: value /= 60; ! 460: hours = value % 24; ! 461: value /= 24; ! 462: ! 463: #define PLURALIZE(x) x, (x == 1) ? "" : "s" ! 464: p = nbuf; ! 465: if (value) { ! 466: (void)sprintf(p, "%d day%s", PLURALIZE(value)); ! 467: while (*++p); ! 468: } ! 469: if (hours) { ! 470: if (p != nbuf) ! 471: *p++ = ' '; ! 472: (void)sprintf(p, "%d hour%s", PLURALIZE(hours)); ! 473: while (*++p); ! 474: } ! 475: if (mins) { ! 476: if (p != nbuf) ! 477: *p++ = ' '; ! 478: (void)sprintf(p, "%d min%s", PLURALIZE(mins)); ! 479: while (*++p); ! 480: } ! 481: if (secs) { ! 482: if (p != nbuf) ! 483: *p++ = ' '; ! 484: (void)sprintf(p, "%d sec%s", PLURALIZE(secs)); ! 485: while (*++p); ! 486: } ! 487: return(nbuf); ! 488: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.