Change the kernel dev_t, representing a pointer to a specinfo structure,
[dragonfly.git] / contrib / bind-9.2.4rc7 / lib / bind / inet / nsap_addr.c
1 /*
2  * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3  * Copyright (c) 1996-1999 by Internet Software Consortium.
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
15  * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  */
17
18 #if defined(LIBC_SCCS) && !defined(lint)
19 static const char rcsid[] = "$Id: nsap_addr.c,v 1.2.2.1 2004/03/09 09:17:27 marka Exp $";
20 #endif /* LIBC_SCCS and not lint */
21
22 #include "port_before.h"
23
24 #include <sys/types.h>
25 #include <sys/param.h>
26 #include <sys/socket.h>
27
28 #include <netinet/in.h>
29 #include <arpa/inet.h>
30 #include <arpa/nameser.h>
31
32 #include <ctype.h>
33 #include <resolv.h>
34
35 #include "port_after.h"
36
37 static char
38 xtob(int c) {
39         return (c - (((c >= '0') && (c <= '9')) ? '0' : '7'));
40 }
41
42 u_int
43 inet_nsap_addr(const char *ascii, u_char *binary, int maxlen) {
44         u_char c, nib;
45         u_int len = 0;
46
47         if (ascii[0] != '0' || (ascii[1] != 'x' && ascii[1] != 'X'))
48                 return (0);
49         ascii += 2;
50
51         while ((c = *ascii++) != '\0' && len < (u_int)maxlen) {
52                 if (c == '.' || c == '+' || c == '/')
53                         continue;
54                 if (!isascii(c))
55                         return (0);
56                 if (islower(c))
57                         c = toupper(c);
58                 if (isxdigit(c)) {
59                         nib = xtob(c);
60                         c = *ascii++;
61                         if (c != '\0') {
62                                 c = toupper(c);
63                                 if (isxdigit(c)) {
64                                         *binary++ = (nib << 4) | xtob(c);
65                                         len++;
66                                 } else
67                                         return (0);
68                         }
69                         else
70                                 return (0);
71                 }
72                 else
73                         return (0);
74         }
75         return (len);
76 }
77
78 char *
79 inet_nsap_ntoa(int binlen, const u_char *binary, char *ascii) {
80         int nib;
81         int i;
82         static char tmpbuf[2+255*3];
83         char *start;
84
85         if (ascii)
86                 start = ascii;
87         else {
88                 ascii = tmpbuf;
89                 start = tmpbuf;
90         }
91
92         *ascii++ = '0';
93         *ascii++ = 'x';
94
95         if (binlen > 255)
96                 binlen = 255;
97
98         for (i = 0; i < binlen; i++) {
99                 nib = *binary >> 4;
100                 *ascii++ = nib + (nib < 10 ? '0' : '7');
101                 nib = *binary++ & 0x0f;
102                 *ascii++ = nib + (nib < 10 ? '0' : '7');
103                 if (((i % 2) == 0 && (i + 1) < binlen))
104                         *ascii++ = '.';
105         }
106         *ascii = '\0';
107         return (start);
108 }