?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
VM: simplify slab allocator
[minix.git] / lib / libc / nameser / ns_print.c
blob51fe16ee4f9bbf366a0e283fae2122e7ec52893d
1 /* $NetBSD: ns_print.c,v 1.10 2009/04/12 19:43:37 christos Exp $ */
2
3 /*
4 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
5 * Copyright (c) 1996-1999 by Internet Software Consortium.
6 *
7 * Permission to use, copy, modify, and distribute this software for any
8 * purpose with or without fee is hereby granted, provided that the above
9 * copyright notice and this permission notice appear in all copies.
10 *
11 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
12 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
13 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR
14 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
15 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
16 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
17 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
18 */
19
20 #include <sys/cdefs.h>
21 #ifndef lint
22 #ifdef notdef
23 static const char rcsid[] = "Id: ns_print.c,v 1.12 2009/03/03 05:29:58 each Exp";
24 #else
25 __RCSID("$NetBSD: ns_print.c,v 1.10 2009/04/12 19:43:37 christos Exp $");
26 #endif
27 #endif
28
29 /* Import. */
30
31 #include "port_before.h"
32
33 #include <sys/types.h>
34 #include <sys/socket.h>
35
36 #include <netinet/in.h>
37 #include <arpa/nameser.h>
38 #include <arpa/inet.h>
39
40 #include <isc/assertions.h>
41 #include <isc/dst.h>
42 #include <errno.h>
43 #include <resolv.h>
44 #include <string.h>
45 #include <ctype.h>
46
47 #include "port_after.h"
48
49 #ifdef SPRINTF_CHAR
50 # define SPRINTF(x) strlen(sprintf/**/x)
51 #else
52 # define SPRINTF(x) ((size_t)sprintf x)
53 #endif
54
55 /* Forward. */
56
57 static size_t prune_origin(const char *name, const char *origin);
58 static int charstr(const u_char *rdata, const u_char *edata,
59 char **buf, size_t *buflen);
60 static int addname(const u_char *msg, size_t msglen,
61 const u_char **p, const char *origin,
62 char **buf, size_t *buflen);
63 static void addlen(size_t len, char **buf, size_t *buflen);
64 static int addstr(const char *src, size_t len,
65 char **buf, size_t *buflen);
66 static int addtab(size_t len, size_t target, int spaced,
67 char **buf, size_t *buflen);
68
69 /* Macros. */
70
71 #define T(x) \
72 do { \
73 if ((x) < 0) \
74 return (-1); \
75 } while (/*CONSTCOND*/0)
76
77 static const char base32hex[] =
78 "0123456789ABCDEFGHIJKLMNOPQRSTUV=0123456789abcdefghijklmnopqrstuv";
79
80 /* Public. */
81
82 /*%
83 * Convert an RR to presentation format.
84 *
85 * return:
86 *\li Number of characters written to buf, or -1 (check errno).
87 */
88 int
89 ns_sprintrr(const ns_msg *handle, const ns_rr *rr,
90 const char *name_ctx, const char *origin,
91 char *buf, size_t buflen)
92 {
93 int n;
94
95 n = ns_sprintrrf(ns_msg_base(*handle), ns_msg_size(*handle),
96 ns_rr_name(*rr), ns_rr_class(*rr), ns_rr_type(*rr),
97 ns_rr_ttl(*rr), ns_rr_rdata(*rr), ns_rr_rdlen(*rr),
98 name_ctx, origin, buf, buflen);
99 return (n);
100 }
101
102 /*%
103 * Convert the fields of an RR into presentation format.
104 *
105 * return:
106 *\li Number of characters written to buf, or -1 (check errno).
107 */
108 int
109 ns_sprintrrf(const u_char *msg, size_t msglen,
110 const char *name, ns_class class, ns_type type,
111 u_long ttl, const u_char *rdata, size_t rdlen,
112 const char *name_ctx, const char *origin,
113 char *buf, size_t buflen)
114 {
115 const char *obuf = buf;
116 const u_char *edata = rdata + rdlen;
117 int spaced = 0;
118
119 const char *comment;
120 char tmp[100];
121 int len, x;
122
123 /*
124 * Owner.
125 */
126 if (name_ctx != NULL && ns_samename(name_ctx, name) == 1) {
127 T(addstr("\t\t\t", (size_t)3, &buf, &buflen));
128 } else {
129 len = prune_origin(name, origin);
130 if (*name == '\0') {
131 goto root;
132 } else if (len == 0) {
133 T(addstr("@\t\t\t", (size_t)4, &buf, &buflen));
134 } else {
135 T(addstr(name, (size_t)len, &buf, &buflen));
136 /* Origin not used or not root, and no trailing dot? */
137 if (((origin == NULL || origin[0] == '\0') ||
138 (origin[0] != '.' && origin[1] != '\0' &&
139 name[len] == '\0')) && name[len - 1] != '.') {
140 root:
141 T(addstr(".", (size_t)1, &buf, &buflen));
142 len++;
143 }
144 T(spaced = addtab((size_t)len, 24, spaced, &buf, &buflen));
145 }
146 }
147
148 /*
149 * TTL, Class, Type.
150 */
151 T(x = ns_format_ttl(ttl, buf, buflen));
152 addlen((size_t)x, &buf, &buflen);
153 len = SPRINTF((tmp, " %s %s", p_class(class), p_type(type)));
154 T(addstr(tmp, (size_t)len, &buf, &buflen));
155 T(spaced = addtab((size_t)(x + len), (size_t)16, spaced, &buf, &buflen));
156
157 /*
158 * RData.
159 */
160 switch (type) {
161 case ns_t_a:
162 if (rdlen != (size_t)NS_INADDRSZ)
163 goto formerr;
164 (void) inet_ntop(AF_INET, rdata, buf, buflen);
165 addlen(strlen(buf), &buf, &buflen);
166 break;
167
168 case ns_t_cname:
169 case ns_t_mb:
170 case ns_t_mg:
171 case ns_t_mr:
172 case ns_t_ns:
173 case ns_t_ptr:
174 case ns_t_dname:
175 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
176 break;
177
178 case ns_t_hinfo:
179 case ns_t_isdn:
180 /* First word. */
181 T(len = charstr(rdata, edata, &buf, &buflen));
182 if (len == 0)
183 goto formerr;
184 rdata += len;
185 T(addstr(" ", (size_t)1, &buf, &buflen));
186
187
188 /* Second word, optional in ISDN records. */
189 if (type == ns_t_isdn && rdata == edata)
190 break;
191
192 T(len = charstr(rdata, edata, &buf, &buflen));
193 if (len == 0)
194 goto formerr;
195 rdata += len;
196 break;
197
198 case ns_t_soa: {
199 u_long t;
200
201 /* Server name. */
202 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
203 T(addstr(" ", (size_t)1, &buf, &buflen));
204
205 /* Administrator name. */
206 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
207 T(addstr(" (\n", (size_t)3, &buf, &buflen));
208 spaced = 0;
209
210 if ((edata - rdata) != 5*NS_INT32SZ)
211 goto formerr;
212
213 /* Serial number. */
214 t = ns_get32(rdata); rdata += NS_INT32SZ;
215 T(addstr("\t\t\t\t\t", (size_t)5, &buf, &buflen));
216 len = SPRINTF((tmp, "%lu", t));
217 T(addstr(tmp, (size_t)len, &buf, &buflen));
218 T(spaced = addtab((size_t)len, (size_t)16, spaced, &buf, &buflen));
219 T(addstr("; serial\n", (size_t)9, &buf, &buflen));
220 spaced = 0;
221
222 /* Refresh interval. */
223 t = ns_get32(rdata); rdata += NS_INT32SZ;
224 T(addstr("\t\t\t\t\t", (size_t)5, &buf, &buflen));
225 T(len = ns_format_ttl(t, buf, buflen));
226 addlen((size_t)len, &buf, &buflen);
227 T(spaced = addtab((size_t)len, (size_t)16, spaced, &buf, &buflen));
228 T(addstr("; refresh\n", (size_t)10, &buf, &buflen));
229 spaced = 0;
230
231 /* Retry interval. */
232 t = ns_get32(rdata); rdata += NS_INT32SZ;
233 T(addstr("\t\t\t\t\t", (size_t)5, &buf, &buflen));
234 T(len = ns_format_ttl(t, buf, buflen));
235 addlen((size_t)len, &buf, &buflen);
236 T(spaced = addtab((size_t)len, (size_t)16, spaced, &buf, &buflen));
237 T(addstr("; retry\n", (size_t)8, &buf, &buflen));
238 spaced = 0;
239
240 /* Expiry. */
241 t = ns_get32(rdata); rdata += NS_INT32SZ;
242 T(addstr("\t\t\t\t\t", (size_t)5, &buf, &buflen));
243 T(len = ns_format_ttl(t, buf, buflen));
244 addlen((size_t)len, &buf, &buflen);
245 T(spaced = addtab((size_t)len, (size_t)16, spaced, &buf, &buflen));
246 T(addstr("; expiry\n", (size_t)9, &buf, &buflen));
247 spaced = 0;
248
249 /* Minimum TTL. */
250 t = ns_get32(rdata); rdata += NS_INT32SZ;
251 T(addstr("\t\t\t\t\t", (size_t)5, &buf, &buflen));
252 T(len = ns_format_ttl(t, buf, buflen));
253 addlen((size_t)len, &buf, &buflen);
254 T(addstr(" )", (size_t)2, &buf, &buflen));
255 T(spaced = addtab((size_t)len, (size_t)16, spaced, &buf, &buflen));
256 T(addstr("; minimum\n", (size_t)10, &buf, &buflen));
257
258 break;
259 }
260
261 case ns_t_mx:
262 case ns_t_afsdb:
263 case ns_t_rt:
264 case ns_t_kx: {
265 u_int t;
266
267 if (rdlen < (size_t)NS_INT16SZ)
268 goto formerr;
269
270 /* Priority. */
271 t = ns_get16(rdata);
272 rdata += NS_INT16SZ;
273 len = SPRINTF((tmp, "%u ", t));
274 T(addstr(tmp, (size_t)len, &buf, &buflen));
275
276 /* Target. */
277 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
278
279 break;
280 }
281
282 case ns_t_px: {
283 u_int t;
284
285 if (rdlen < (size_t)NS_INT16SZ)
286 goto formerr;
287
288 /* Priority. */
289 t = ns_get16(rdata);
290 rdata += NS_INT16SZ;
291 len = SPRINTF((tmp, "%u ", t));
292 T(addstr(tmp, (size_t)len, &buf, &buflen));
293
294 /* Name1. */
295 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
296 T(addstr(" ", (size_t)1, &buf, &buflen));
297
298 /* Name2. */
299 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
300
301 break;
302 }
303
304 case ns_t_x25:
305 T(len = charstr(rdata, edata, &buf, &buflen));
306 if (len == 0)
307 goto formerr;
308 rdata += len;
309 break;
310
311 case ns_t_txt:
312 case ns_t_spf:
313 while (rdata < edata) {
314 T(len = charstr(rdata, edata, &buf, &buflen));
315 if (len == 0)
316 goto formerr;
317 rdata += len;
318 if (rdata < edata)
319 T(addstr(" ", (size_t)1, &buf, &buflen));
320 }
321 break;
322
323 case ns_t_nsap: {
324 char t[2+255*3];
325
326 (void) inet_nsap_ntoa((int)rdlen, rdata, t);
327 T(addstr(t, strlen(t), &buf, &buflen));
328 break;
329 }
330
331 case ns_t_aaaa:
332 if (rdlen != (size_t)NS_IN6ADDRSZ)
333 goto formerr;
334 (void) inet_ntop(AF_INET6, rdata, buf, buflen);
335 addlen(strlen(buf), &buf, &buflen);
336 break;
337
338 case ns_t_loc: {
339 char t[255];
340
341 /* XXX protocol format checking? */
342 (void) loc_ntoa(rdata, t);
343 T(addstr(t, strlen(t), &buf, &buflen));
344 break;
345 }
346
347 case ns_t_naptr: {
348 u_int order, preference;
349 char t[50];
350
351 if (rdlen < 2U*NS_INT16SZ)
352 goto formerr;
353
354 /* Order, Precedence. */
355 order = ns_get16(rdata); rdata += NS_INT16SZ;
356 preference = ns_get16(rdata); rdata += NS_INT16SZ;
357 len = SPRINTF((t, "%u %u ", order, preference));
358 T(addstr(t, (size_t)len, &buf, &buflen));
359
360 /* Flags. */
361 T(len = charstr(rdata, edata, &buf, &buflen));
362 if (len == 0)
363 goto formerr;
364 rdata += len;
365 T(addstr(" ", (size_t)1, &buf, &buflen));
366
367 /* Service. */
368 T(len = charstr(rdata, edata, &buf, &buflen));
369 if (len == 0)
370 goto formerr;
371 rdata += len;
372 T(addstr(" ", (size_t)1, &buf, &buflen));
373
374 /* Regexp. */
375 T(len = charstr(rdata, edata, &buf, &buflen));
376 if (len < 0)
377 return (-1);
378 if (len == 0)
379 goto formerr;
380 rdata += len;
381 T(addstr(" ", (size_t)1, &buf, &buflen));
382
383 /* Server. */
384 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
385 break;
386 }
387
388 case ns_t_srv: {
389 u_int priority, weight, port;
390 char t[50];
391
392 if (rdlen < 3U*NS_INT16SZ)
393 goto formerr;
394
395 /* Priority, Weight, Port. */
396 priority = ns_get16(rdata); rdata += NS_INT16SZ;
397 weight = ns_get16(rdata); rdata += NS_INT16SZ;
398 port = ns_get16(rdata); rdata += NS_INT16SZ;
399 len = SPRINTF((t, "%u %u %u ", priority, weight, port));
400 T(addstr(t, (size_t)len, &buf, &buflen));
401
402 /* Server. */
403 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
404 break;
405 }
406
407 case ns_t_minfo:
408 case ns_t_rp:
409 /* Name1. */
410 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
411 T(addstr(" ", (size_t)1, &buf, &buflen));
412
413 /* Name2. */
414 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
415
416 break;
417
418 case ns_t_wks: {
419 int n, lcnt;
420
421 if (rdlen < 1U + NS_INT32SZ)
422 goto formerr;
423
424 /* Address. */
425 (void) inet_ntop(AF_INET, rdata, buf, buflen);
426 addlen(strlen(buf), &buf, &buflen);
427 rdata += NS_INADDRSZ;
428
429 /* Protocol. */
430 len = SPRINTF((tmp, " %u ( ", *rdata));
431 T(addstr(tmp, (size_t)len, &buf, &buflen));
432 rdata += NS_INT8SZ;
433
434 /* Bit map. */
435 n = 0;
436 lcnt = 0;
437 while (rdata < edata) {
438 u_int c = *rdata++;
439 do {
440 if (c & 0200) {
441 if (lcnt == 0) {
442 T(addstr("\n\t\t\t\t", (size_t)5,
443 &buf, &buflen));
444 lcnt = 10;
445 spaced = 0;
446 }
447 len = SPRINTF((tmp, "%d ", n));
448 T(addstr(tmp, (size_t)len, &buf, &buflen));
449 lcnt--;
450 }
451 c <<= 1;
452 } while (++n & 07);
453 }
454 T(addstr(")", (size_t)1, &buf, &buflen));
455
456 break;
457 }
458
459 case ns_t_key:
460 case ns_t_dnskey: {
461 char base64_key[NS_MD5RSA_MAX_BASE64];
462 u_int keyflags, protocol, algorithm, key_id;
463 const char *leader;
464 int n;
465
466 if (rdlen < 0U + NS_INT16SZ + NS_INT8SZ + NS_INT8SZ)
467 goto formerr;
468
469 /* Key flags, Protocol, Algorithm. */
470 #ifndef _LIBC
471 key_id = dst_s_dns_key_id(rdata, edata-rdata);
472 #else
473 key_id = 0;
474 #endif
475 keyflags = ns_get16(rdata); rdata += NS_INT16SZ;
476 protocol = *rdata++;
477 algorithm = *rdata++;
478 len = SPRINTF((tmp, "0x%04x %u %u",
479 keyflags, protocol, algorithm));
480 T(addstr(tmp, (size_t)len, &buf, &buflen));
481
482 /* Public key data. */
483 len = b64_ntop(rdata, (size_t)(edata - rdata),
484 base64_key, sizeof base64_key);
485 if (len < 0)
486 goto formerr;
487 if (len > 15) {
488 T(addstr(" (", (size_t)2, &buf, &buflen));
489 leader = "\n\t\t";
490 spaced = 0;
491 } else
492 leader = " ";
493 for (n = 0; n < len; n += 48) {
494 T(addstr(leader, strlen(leader), &buf, &buflen));
495 T(addstr(base64_key + n, (size_t)MIN(len - n, 48),
496 &buf, &buflen));
497 }
498 if (len > 15)
499 T(addstr(" )", (size_t)2, &buf, &buflen));
500 n = SPRINTF((tmp, " ; key_tag= %u", key_id));
501 T(addstr(tmp, (size_t)n, &buf, &buflen));
502
503 break;
504 }
505
506 case ns_t_sig:
507 case ns_t_rrsig: {
508 char base64_key[NS_MD5RSA_MAX_BASE64];
509 u_int typ, algorithm, labels, footprint;
510 const char *leader;
511 u_long t;
512 int n;
513
514 if (rdlen < 22U)
515 goto formerr;
516
517 /* Type covered, Algorithm, Label count, Original TTL. */
518 typ = ns_get16(rdata); rdata += NS_INT16SZ;
519 algorithm = *rdata++;
520 labels = *rdata++;
521 t = ns_get32(rdata); rdata += NS_INT32SZ;
522 len = SPRINTF((tmp, "%s %d %d %lu ",
523 p_type((int)typ), algorithm, labels, t));
524 T(addstr(tmp, (size_t)len, &buf, &buflen));
525 if (labels > (u_int)dn_count_labels(name))
526 goto formerr;
527
528 /* Signature expiry. */
529 t = ns_get32(rdata); rdata += NS_INT32SZ;
530 len = SPRINTF((tmp, "%s ", p_secstodate(t)));
531 T(addstr(tmp, (size_t)len, &buf, &buflen));
532
533 /* Time signed. */
534 t = ns_get32(rdata); rdata += NS_INT32SZ;
535 len = SPRINTF((tmp, "%s ", p_secstodate(t)));
536 T(addstr(tmp, (size_t)len, &buf, &buflen));
537
538 /* Signature Footprint. */
539 footprint = ns_get16(rdata); rdata += NS_INT16SZ;
540 len = SPRINTF((tmp, "%u ", footprint));
541 T(addstr(tmp, (size_t)len, &buf, &buflen));
542
543 /* Signer's name. */
544 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
545
546 /* Signature. */
547 len = b64_ntop(rdata, (size_t)(edata - rdata),
548 base64_key, sizeof base64_key);
549 if (len > 15) {
550 T(addstr(" (", (size_t)2, &buf, &buflen));
551 leader = "\n\t\t";
552 spaced = 0;
553 } else
554 leader = " ";
555 if (len < 0)
556 goto formerr;
557 for (n = 0; n < len; n += 48) {
558 T(addstr(leader, strlen(leader), &buf, &buflen));
559 T(addstr(base64_key + n, (size_t)MIN(len - n, 48),
560 &buf, &buflen));
561 }
562 if (len > 15)
563 T(addstr(" )", (size_t)2, &buf, &buflen));
564 break;
565 }
566
567 case ns_t_nxt: {
568 int n, c;
569
570 /* Next domain name. */
571 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
572
573 /* Type bit map. */
574 n = edata - rdata;
575 for (c = 0; c < n*8; c++)
576 if (NS_NXT_BIT_ISSET(c, rdata)) {
577 len = SPRINTF((tmp, " %s", p_type(c)));
578 T(addstr(tmp, (size_t)len, &buf, &buflen));
579 }
580 break;
581 }
582
583 case ns_t_cert: {
584 u_int c_type, key_tag, alg;
585 int n;
586 unsigned int siz;
587 char base64_cert[8192], tmp1[40];
588 const char *leader;
589
590 c_type = ns_get16(rdata); rdata += NS_INT16SZ;
591 key_tag = ns_get16(rdata); rdata += NS_INT16SZ;
592 alg = (u_int) *rdata++;
593
594 len = SPRINTF((tmp1, "%d %d %d ", c_type, key_tag, alg));
595 T(addstr(tmp1, (size_t)len, &buf, &buflen));
596 siz = (edata-rdata)*4/3 + 4; /* "+4" accounts for trailing \0 */
597 if (siz > sizeof(base64_cert) * 3/4) {
598 const char *str = "record too long to print";
599 T(addstr(str, strlen(str), &buf, &buflen));
600 }
601 else {
602 len = b64_ntop(rdata, (size_t)(edata-rdata),
603 base64_cert, siz);
604
605 if (len < 0)
606 goto formerr;
607 else if (len > 15) {
608 T(addstr(" (", (size_t)2, &buf, &buflen));
609 leader = "\n\t\t";
610 spaced = 0;
611 }
612 else
613 leader = " ";
614
615 for (n = 0; n < len; n += 48) {
616 T(addstr(leader, strlen(leader),
617 &buf, &buflen));
618 T(addstr(base64_cert + n, (size_t)MIN(len - n, 48),
619 &buf, &buflen));
620 }
621 if (len > 15)
622 T(addstr(" )", (size_t)2, &buf, &buflen));
623 }
624 break;
625 }
626
627 case ns_t_tkey: {
628 /* KJD - need to complete this */
629 u_long t;
630 int mode, err, keysize;
631
632 /* Algorithm name. */
633 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
634 T(addstr(" ", (size_t)1, &buf, &buflen));
635
636 /* Inception. */
637 t = ns_get32(rdata); rdata += NS_INT32SZ;
638 len = SPRINTF((tmp, "%s ", p_secstodate(t)));
639 T(addstr(tmp, (size_t)len, &buf, &buflen));
640
641 /* Experation. */
642 t = ns_get32(rdata); rdata += NS_INT32SZ;
643 len = SPRINTF((tmp, "%s ", p_secstodate(t)));
644 T(addstr(tmp, (size_t)len, &buf, &buflen));
645
646 /* Mode , Error, Key Size. */
647 /* Priority, Weight, Port. */
648 mode = ns_get16(rdata); rdata += NS_INT16SZ;
649 err = ns_get16(rdata); rdata += NS_INT16SZ;
650 keysize = ns_get16(rdata); rdata += NS_INT16SZ;
651 len = SPRINTF((tmp, "%u %u %u ", mode, err, keysize));
652 T(addstr(tmp, (size_t)len, &buf, &buflen));
653
654 /* XXX need to dump key, print otherdata length & other data */
655 break;
656 }
657
658 case ns_t_tsig: {
659 /* BEW - need to complete this */
660 int n;
661
662 T(len = addname(msg, msglen, &rdata, origin, &buf, &buflen));
663 T(addstr(" ", (size_t)1, &buf, &buflen));
664 rdata += 8; /*%< time */
665 n = ns_get16(rdata); rdata += INT16SZ;
666 rdata += n; /*%< sig */
667 n = ns_get16(rdata); rdata += INT16SZ; /*%< original id */
668 sprintf(buf, "%d", ns_get16(rdata));
669 rdata += INT16SZ;
670 addlen(strlen(buf), &buf, &buflen);
671 break;
672 }
673
674 case ns_t_a6: {
675 struct in6_addr a;
676 int pbyte, pbit;
677
678 /* prefix length */
679 if (rdlen == 0U) goto formerr;
680 len = SPRINTF((tmp, "%d ", *rdata));
681 T(addstr(tmp, (size_t)len, &buf, &buflen));
682 pbit = *rdata;
683 if (pbit > 128) goto formerr;
684 pbyte = (pbit & ~7) / 8;
685 rdata++;
686
687 /* address suffix: provided only when prefix len != 128 */
688 if (pbit < 128) {
689 if (rdata + pbyte >= edata) goto formerr;
690 memset(&a, 0, sizeof(a));
691 memcpy(&a.s6_addr[pbyte], rdata, sizeof(a) - pbyte);
692 (void) inet_ntop(AF_INET6, &a, buf, buflen);
693 addlen(strlen(buf), &buf, &buflen);
694 rdata += sizeof(a) - pbyte;
695 }
696
697 /* prefix name: provided only when prefix len > 0 */
698 if (pbit == 0)
699 break;
700 if (rdata >= edata) goto formerr;
701 T(addstr(" ", (size_t)1, &buf, &buflen));
702 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
703
704 break;
705 }
706
707 case ns_t_opt: {
708 len = SPRINTF((tmp, "%u bytes", class));
709 T(addstr(tmp, (size_t)len, &buf, &buflen));
710 break;
711 }
712
713 case ns_t_ds:
714 case ns_t_dlv:
715 case ns_t_sshfp: {
716 u_int t;
717
718 if (type == ns_t_ds || type == ns_t_dlv) {
719 if (rdlen < 4U) goto formerr;
720 t = ns_get16(rdata);
721 rdata += NS_INT16SZ;
722 len = SPRINTF((tmp, "%u ", t));
723 T(addstr(tmp, (size_t)len, &buf, &buflen));
724 } else
725 if (rdlen < 2U) goto formerr;
726
727 len = SPRINTF((tmp, "%u ", *rdata));
728 T(addstr(tmp, (size_t)len, &buf, &buflen));
729 rdata++;
730
731 len = SPRINTF((tmp, "%u ", *rdata));
732 T(addstr(tmp, (size_t)len, &buf, &buflen));
733 rdata++;
734
735 while (rdata < edata) {
736 len = SPRINTF((tmp, "%02X", *rdata));
737 T(addstr(tmp, (size_t)len, &buf, &buflen));
738 rdata++;
739 }
740 break;
741 }
742
743 case ns_t_nsec3:
744 case ns_t_nsec3param: {
745 u_int t, w, l, j, k, c;
746
747 len = SPRINTF((tmp, "%u ", *rdata));
748 T(addstr(tmp, (size_t)len, &buf, &buflen));
749 rdata++;
750
751 len = SPRINTF((tmp, "%u ", *rdata));
752 T(addstr(tmp, (size_t)len, &buf, &buflen));
753 rdata++;
754
755 t = ns_get16(rdata);
756 rdata += NS_INT16SZ;
757 len = SPRINTF((tmp, "%u ", t));
758 T(addstr(tmp, (size_t)len, &buf, &buflen));
759
760 t = *rdata++;
761 if (t == 0) {
762 T(addstr("-", 1, &buf, &buflen));
763 } else {
764 while (t-- > 0) {
765 len = SPRINTF((tmp, "%02X", *rdata));
766 T(addstr(tmp, (size_t)len, &buf, &buflen));
767 rdata++;
768 }
769 }
770 if (type == ns_t_nsec3param)
771 break;
772 T(addstr(" ", 1, &buf, &buflen));
773
774 t = *rdata++;
775 while (t > 0) {
776 switch (t) {
777 case 1:
778 tmp[0] = base32hex[(((uint32_t)rdata[0]>>3)&0x1f)];
779 tmp[1] = base32hex[(((uint32_t)rdata[0]<<2)&0x1c)];
780 tmp[2] = tmp[3] = tmp[4] = '=';
781 tmp[5] = tmp[6] = tmp[7] = '=';
782 break;
783 case 2:
784 tmp[0] = base32hex[(((uint32_t)rdata[0]>>3)&0x1f)];
785 tmp[1] = base32hex[(((uint32_t)rdata[0]<<2)&0x1c)|
786 (((uint32_t)rdata[1]>>6)&0x03)];
787 tmp[2] = base32hex[(((uint32_t)rdata[1]>>1)&0x1f)];
788 tmp[3] = base32hex[(((uint32_t)rdata[1]<<4)&0x10)];
789 tmp[4] = tmp[5] = tmp[6] = tmp[7] = '=';
790 break;
791 case 3:
792 tmp[0] = base32hex[(((uint32_t)rdata[0]>>3)&0x1f)];
793 tmp[1] = base32hex[(((uint32_t)rdata[0]<<2)&0x1c)|
794 (((uint32_t)rdata[1]>>6)&0x03)];
795 tmp[2] = base32hex[(((uint32_t)rdata[1]>>1)&0x1f)];
796 tmp[3] = base32hex[(((uint32_t)rdata[1]<<4)&0x10)|
797 (((uint32_t)rdata[2]>>4)&0x0f)];
798 tmp[4] = base32hex[(((uint32_t)rdata[2]<<1)&0x1e)];
799 tmp[5] = tmp[6] = tmp[7] = '=';
800 break;
801 case 4:
802 tmp[0] = base32hex[(((uint32_t)rdata[0]>>3)&0x1f)];
803 tmp[1] = base32hex[(((uint32_t)rdata[0]<<2)&0x1c)|
804 (((uint32_t)rdata[1]>>6)&0x03)];
805 tmp[2] = base32hex[(((uint32_t)rdata[1]>>1)&0x1f)];
806 tmp[3] = base32hex[(((uint32_t)rdata[1]<<4)&0x10)|
807 (((uint32_t)rdata[2]>>4)&0x0f)];
808 tmp[4] = base32hex[(((uint32_t)rdata[2]<<1)&0x1e)|
809 (((uint32_t)rdata[3]>>7)&0x01)];
810 tmp[5] = base32hex[(((uint32_t)rdata[3]>>2)&0x1f)];
811 tmp[6] = base32hex[((uint32_t)rdata[3]<<3)&0x18];
812 tmp[7] = '=';
813 break;
814 default:
815 tmp[0] = base32hex[(((uint32_t)rdata[0]>>3)&0x1f)];
816 tmp[1] = base32hex[(((uint32_t)rdata[0]<<2)&0x1c)|
817 (((uint32_t)rdata[1]>>6)&0x03)];
818 tmp[2] = base32hex[(((uint32_t)rdata[1]>>1)&0x1f)];
819 tmp[3] = base32hex[(((uint32_t)rdata[1]<<4)&0x10)|
820 (((uint32_t)rdata[2]>>4)&0x0f)];
821 tmp[4] = base32hex[(((uint32_t)rdata[2]<<1)&0x1e)|
822 (((uint32_t)rdata[3]>>7)&0x01)];
823 tmp[5] = base32hex[(((uint32_t)rdata[3]>>2)&0x1f)];
824 tmp[6] = base32hex[(((uint32_t)rdata[3]<<3)&0x18)|
825 (((uint32_t)rdata[4]>>5)&0x07)];
826 tmp[7] = base32hex[(rdata[4]&0x1f)];
827 break;
828 }
829 T(addstr(tmp, 8, &buf, &buflen));
830 if (t >= 5) {
831 rdata += 5;
832 t -= 5;
833 } else {
834 rdata += t;
835 t -= t;
836 }
837 }
838
839 while (rdata < edata) {
840 w = *rdata++;
841 l = *rdata++;
842 for (j = 0; j < l; j++) {
843 if (rdata[j] == 0)
844 continue;
845 for (k = 0; k < 8; k++) {
846 if ((rdata[j] & (0x80 >> k)) == 0)
847 continue;
848 c = w * 256 + j * 8 + k;
849 len = SPRINTF((tmp, " %s", p_type((ns_type)c)));
850 T(addstr(tmp, (size_t)len, &buf, &buflen));
851 }
852 }
853 rdata += l;
854 }
855 break;
856 }
857
858 case ns_t_nsec: {
859 u_int w, l, j, k, c;
860
861 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
862
863 while (rdata < edata) {
864 w = *rdata++;
865 l = *rdata++;
866 for (j = 0; j < l; j++) {
867 if (rdata[j] == 0)
868 continue;
869 for (k = 0; k < 8; k++) {
870 if ((rdata[j] & (0x80 >> k)) == 0)
871 continue;
872 c = w * 256 + j * 8 + k;
873 len = SPRINTF((tmp, " %s", p_type((ns_type)c)));
874 T(addstr(tmp, (size_t)len, &buf, &buflen));
875 }
876 }
877 rdata += l;
878 }
879 break;
880 }
881
882 case ns_t_dhcid: {
883 int n;
884 unsigned int siz;
885 char base64_dhcid[8192];
886 const char *leader;
887
888 siz = (edata-rdata)*4/3 + 4; /* "+4" accounts for trailing \0 */
889 if (siz > sizeof(base64_dhcid) * 3/4) {
890 const char *str = "record too long to print";
891 T(addstr(str, strlen(str), &buf, &buflen));
892 } else {
893 len = b64_ntop(rdata, (size_t)(edata-rdata),
894 base64_dhcid, siz);
895
896 if (len < 0)
897 goto formerr;
898
899 else if (len > 15) {
900 T(addstr(" (", 2, &buf, &buflen));
901 leader = "\n\t\t";
902 spaced = 0;
903 }
904 else
905 leader = " ";
906
907 for (n = 0; n < len; n += 48) {
908 T(addstr(leader, strlen(leader),
909 &buf, &buflen));
910 T(addstr(base64_dhcid + n,
911 (size_t)MIN(len - n, 48), &buf, &buflen));
912 }
913 if (len > 15)
914 T(addstr(" )", 2, &buf, &buflen));
915 }
916 break;
917 }
918
919 case ns_t_ipseckey: {
920 int n;
921 unsigned int siz;
922 char base64_key[8192];
923 const char *leader;
924
925 if (rdlen < 2)
926 goto formerr;
927
928 switch (rdata[1]) {
929 case 0:
930 case 3:
931 if (rdlen < 3)
932 goto formerr;
933 break;
934 case 1:
935 if (rdlen < 7)
936 goto formerr;
937 break;
938 case 2:
939 if (rdlen < 19)
940 goto formerr;
941 break;
942 default:
943 comment = "unknown IPSECKEY gateway type";
944 goto hexify;
945 }
946
947 len = SPRINTF((tmp, "%u ", *rdata));
948 T(addstr(tmp, (size_t)len, &buf, &buflen));
949 rdata++;
950
951 len = SPRINTF((tmp, "%u ", *rdata));
952 T(addstr(tmp, (size_t)len, &buf, &buflen));
953 rdata++;
954
955 len = SPRINTF((tmp, "%u ", *rdata));
956 T(addstr(tmp, (size_t)len, &buf, &buflen));
957 rdata++;
958
959 switch (rdata[-2]) {
960 case 0:
961 T(addstr(".", 1, &buf, &buflen));
962 break;
963 case 1:
964 (void) inet_ntop(AF_INET, rdata, buf, buflen);
965 addlen(strlen(buf), &buf, &buflen);
966 rdata += 4;
967 break;
968 case 2:
969 (void) inet_ntop(AF_INET6, rdata, buf, buflen);
970 addlen(strlen(buf), &buf, &buflen);
971 rdata += 16;
972 break;
973 case 3:
974 T(addname(msg, msglen, &rdata, origin, &buf, &buflen));
975 break;
976 }
977
978 if (rdata >= edata)
979 break;
980
981 siz = (edata-rdata)*4/3 + 4; /* "+4" accounts for trailing \0 */
982 if (siz > sizeof(base64_key) * 3/4) {
983 const char *str = "record too long to print";
984 T(addstr(str, strlen(str), &buf, &buflen));
985 } else {
986 len = b64_ntop(rdata, (size_t)(edata-rdata),
987 base64_key, siz);
988
989 if (len < 0)
990 goto formerr;
991
992 else if (len > 15) {
993 T(addstr(" (", 2, &buf, &buflen));
994 leader = "\n\t\t";
995 spaced = 0;
996 }
997 else
998 leader = " ";
999
1000 for (n = 0; n < len; n += 48) {
1001 T(addstr(leader, strlen(leader),
1002 &buf, &buflen));
1003 T(addstr(base64_key + n,
1004 (size_t)MIN(len - n, 48), &buf, &buflen));
1005 }
1006 if (len > 15)
1007 T(addstr(" )", 2, &buf, &buflen));
1008 }
1009 break;
1010 }
1011
1012 case ns_t_hip: {
1013 unsigned int i, hip_len, algorithm, key_len;
1014 char base64_key[NS_MD5RSA_MAX_BASE64];
1015 unsigned int siz;
1016 const char *leader = "\n\t\t\t\t\t";
1017
1018 hip_len = *rdata++;
1019 algorithm = *rdata++;
1020 key_len = ns_get16(rdata);
1021 rdata += NS_INT16SZ;
1022
1023 siz = key_len*4/3 + 4; /* "+4" accounts for trailing \0 */
1024 if (siz > sizeof(base64_key) * 3/4) {
1025 const char *str = "record too long to print";
1026 T(addstr(str, strlen(str), &buf, &buflen));
1027 } else {
1028 len = sprintf(tmp, "( %u ", algorithm);
1029 T(addstr(tmp, (size_t)len, &buf, &buflen));
1030
1031 for (i = 0; i < hip_len; i++) {
1032 len = sprintf(tmp, "%02X", *rdata);
1033 T(addstr(tmp, (size_t)len, &buf, &buflen));
1034 rdata++;
1035 }
1036 T(addstr(leader, strlen(leader), &buf, &buflen));
1037
1038 len = b64_ntop(rdata, key_len, base64_key, siz);
1039 if (len < 0)
1040 goto formerr;
1041
1042 T(addstr(base64_key, (size_t)len, &buf, &buflen));
1043
1044 rdata += key_len;
1045 while (rdata < edata) {
1046 T(addstr(leader, strlen(leader), &buf, &buflen));
1047 T(addname(msg, msglen, &rdata, origin,
1048 &buf, &buflen));
1049 }
1050 T(addstr(" )", 2, &buf, &buflen));
1051 }
1052 break;
1053 }
1054
1055 default:
1056 comment = "unknown RR type";
1057 goto hexify;
1058 }
1059 return (buf - obuf);
1060 formerr:
1061 comment = "RR format error";
1062 hexify: {
1063 int n, m;
1064 char *p;
1065
1066 len = SPRINTF((tmp, "\\# %u%s\t; %s", (unsigned)(edata - rdata),
1067 rdlen != 0U ? " (" : "", comment));
1068 T(addstr(tmp, (size_t)len, &buf, &buflen));
1069 while (rdata < edata) {
1070 p = tmp;
1071 p += SPRINTF((p, "\n\t"));
1072 spaced = 0;
1073 n = MIN(16, edata - rdata);
1074 for (m = 0; m < n; m++)
1075 p += SPRINTF((p, "%02x ", rdata[m]));
1076 T(addstr(tmp, (size_t)(p - tmp), &buf, &buflen));
1077 if (n < 16) {
1078 T(addstr(")", (size_t)1, &buf, &buflen));
1079 T(addtab((size_t)(p - tmp + 1), (size_t)48, spaced, &buf, &buflen));
1080 }
1081 p = tmp;
1082 p += SPRINTF((p, "; "));
1083 for (m = 0; m < n; m++)
1084 *p++ = (isascii(rdata[m]) && isprint(rdata[m]))
1085 ? rdata[m]
1086 : '.';
1087 T(addstr(tmp, (size_t)(p - tmp), &buf, &buflen));
1088 rdata += n;
1089 }
1090 return (buf - obuf);
1091 }
1092 }
1093
1094 /* Private. */
1095
1096 /*%
1097 * size_t
1098 * prune_origin(name, origin)
1099 * Find out if the name is at or under the current origin.
1100 * return:
1101 * Number of characters in name before start of origin,
1102 * or length of name if origin does not match.
1103 * notes:
1104 * This function should share code with samedomain().
1105 */
1106 static size_t
1107 prune_origin(const char *name, const char *origin) {
1108 const char *oname = name;
1109
1110 while (*name != '\0') {
1111 if (origin != NULL && ns_samename(name, origin) == 1)
1112 return (name - oname - (name > oname));
1113 while (*name != '\0') {
1114 if (*name == '\\') {
1115 name++;
1116 /* XXX need to handle \nnn form. */
1117 if (*name == '\0')
1118 break;
1119 } else if (*name == '.') {
1120 name++;
1121 break;
1122 }
1123 name++;
1124 }
1125 }
1126 return (name - oname);
1127 }
1128
1129 /*%
1130 * int
1131 * charstr(rdata, edata, buf, buflen)
1132 * Format a <character-string> into the presentation buffer.
1133 * return:
1134 * Number of rdata octets consumed
1135 * 0 for protocol format error
1136 * -1 for output buffer error
1137 * side effects:
1138 * buffer is advanced on success.
1139 */
1140 static int
1141 charstr(const u_char *rdata, const u_char *edata, char **buf, size_t *buflen) {
1142 const u_char *odata = rdata;
1143 size_t save_buflen = *buflen;
1144 char *save_buf = *buf;
1145
1146 if (addstr("\"", (size_t)1, buf, buflen) < 0)
1147 goto enospc;
1148 if (rdata < edata) {
1149 int n = *rdata;
1150
1151 if (rdata + 1 + n <= edata) {
1152 rdata++;
1153 while (n-- > 0) {
1154 if (strchr("\n\"\\", *rdata) != NULL)
1155 if (addstr("\\", (size_t)1, buf, buflen) < 0)
1156 goto enospc;
1157 if (addstr((const char *)rdata, (size_t)1,
1158 buf, buflen) < 0)
1159 goto enospc;
1160 rdata++;
1161 }
1162 }
1163 }
1164 if (addstr("\"", (size_t)1, buf, buflen) < 0)
1165 goto enospc;
1166 return (rdata - odata);
1167 enospc:
1168 errno = ENOSPC;
1169 *buf = save_buf;
1170 *buflen = save_buflen;
1171 return (-1);
1172 }
1173
1174 static int
1175 addname(const u_char *msg, size_t msglen,
1176 const u_char **pp, const char *origin,
1177 char **buf, size_t *buflen)
1178 {
1179 size_t newlen, save_buflen = *buflen;
1180 char *save_buf = *buf;
1181 int n;
1182
1183 n = dn_expand(msg, msg + msglen, *pp, *buf, (int)*buflen);
1184 if (n < 0)
1185 goto enospc; /*%< Guess. */
1186 newlen = prune_origin(*buf, origin);
1187 if (**buf == '\0') {
1188 goto root;
1189 } else if (newlen == 0U) {
1190 /* Use "@" instead of name. */
1191 if (newlen + 2 > *buflen)
1192 goto enospc; /* No room for "@\0". */
1193 (*buf)[newlen++] = '@';
1194 (*buf)[newlen] = '\0';
1195 } else {
1196 if (((origin == NULL || origin[0] == '\0') ||
1197 (origin[0] != '.' && origin[1] != '\0' &&
1198 (*buf)[newlen] == '\0')) && (*buf)[newlen - 1] != '.') {
1199 /* No trailing dot. */
1200 root:
1201 if (newlen + 2 > *buflen)
1202 goto enospc; /* No room for ".\0". */
1203 (*buf)[newlen++] = '.';
1204 (*buf)[newlen] = '\0';
1205 }
1206 }
1207 *pp += n;
1208 addlen(newlen, buf, buflen);
1209 **buf = '\0';
1210 return (newlen);
1211 enospc:
1212 errno = ENOSPC;
1213 *buf = save_buf;
1214 *buflen = save_buflen;
1215 return (-1);
1216 }
1217
1218 static void
1219 addlen(size_t len, char **buf, size_t *buflen) {
1220 INSIST(len <= *buflen);
1221 *buf += len;
1222 *buflen -= len;
1223 }
1224
1225 static int
1226 addstr(const char *src, size_t len, char **buf, size_t *buflen) {
1227 if (len >= *buflen) {
1228 errno = ENOSPC;
1229 return (-1);
1230 }
1231 memcpy(*buf, src, len);
1232 addlen(len, buf, buflen);
1233 **buf = '\0';
1234 return (0);
1235 }
1236
1237 static int
1238 addtab(size_t len, size_t target, int spaced, char **buf, size_t *buflen) {
1239 size_t save_buflen = *buflen;
1240 char *save_buf = *buf;
1241 int t;
1242
1243 if (spaced || len >= target - 1) {
1244 T(addstr(" ", (size_t)2, buf, buflen));
1245 spaced = 1;
1246 } else {
1247 for (t = (target - len - 1) / 8; t >= 0; t--)
1248 if (addstr("\t", (size_t)1, buf, buflen) < 0) {
1249 *buflen = save_buflen;
1250 *buf = save_buf;
1251 return (-1);
1252 }
1253 spaced = 0;
1254 }
1255 return (spaced);
1256 }
1257
1258 /*! \file */
MINIX 3 (repo.or.cz mirror)