Update.
[kopensolaris-gnu/glibc.git] / resolv / inet_net_ntop.c
1 /*
2  * Copyright (c) 1996 by Internet Software Consortium.
3  *
4  * Permission to use, copy, modify, and distribute this software for any
5  * purpose with or without fee is hereby granted, provided that the above
6  * copyright notice and this permission notice appear in all copies.
7  *
8  * THE SOFTWARE IS PROVIDED "AS IS" AND INTERNET SOFTWARE CONSORTIUM DISCLAIMS
9  * ALL WARRANTIES WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES
10  * OF MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL INTERNET SOFTWARE
11  * CONSORTIUM BE LIABLE FOR ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL
12  * DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR
13  * PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS
14  * ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
15  * SOFTWARE.
16  */
17
18 #if defined(LIBC_SCCS) && !defined(lint)
19 static const char rcsid[] = "$Id$";
20 #endif
21
22 #include <sys/types.h>
23 #include <sys/socket.h>
24 #include <netinet/in.h>
25 #include <arpa/inet.h>
26
27 #include <errno.h>
28 #include <stdio.h>
29 #include <string.h>
30 #include <stdlib.h>
31
32 #ifdef SPRINTF_CHAR
33 # define SPRINTF(x) strlen(sprintf/**/x)
34 #else
35 # define SPRINTF(x) ((size_t)sprintf x)
36 #endif
37
38 static char *   inet_net_ntop_ipv4 __P((const u_char *src, int bits,
39                                         char *dst, size_t size));
40
41 /*
42  * char *
43  * inet_net_ntop(af, src, bits, dst, size)
44  *      convert network number from network to presentation format.
45  *      generates CIDR style result always.
46  * return:
47  *      pointer to dst, or NULL if an error occurred (check errno).
48  * author:
49  *      Paul Vixie (ISC), July 1996
50  */
51 char *
52 inet_net_ntop(af, src, bits, dst, size)
53         int af;
54         const void *src;
55         int bits;
56         char *dst;
57         size_t size;
58 {
59         switch (af) {
60         case AF_INET:
61                 return (inet_net_ntop_ipv4(src, bits, dst, size));
62         default:
63                 __set_errno (EAFNOSUPPORT);
64                 return (NULL);
65         }
66 }
67
68 /*
69  * static char *
70  * inet_net_ntop_ipv4(src, bits, dst, size)
71  *      convert IPv4 network number from network to presentation format.
72  *      generates CIDR style result always.
73  * return:
74  *      pointer to dst, or NULL if an error occurred (check errno).
75  * note:
76  *      network byte order assumed.  this means 192.5.5.240/28 has
77  *      0x11110000 in its fourth octet.
78  * author:
79  *      Paul Vixie (ISC), July 1996
80  */
81 static char *
82 inet_net_ntop_ipv4(src, bits, dst, size)
83         const u_char *src;
84         int bits;
85         char *dst;
86         size_t size;
87 {
88         char *odst = dst;
89         char *t;
90         u_int m;
91         int b;
92
93         if (bits < 0 || bits > 32) {
94                 __set_errno (EINVAL);
95                 return (NULL);
96         }
97         if (bits == 0) {
98                 if (size < sizeof "0")
99                         goto emsgsize;
100                 *dst++ = '0';
101                 *dst = '\0';
102         }
103
104         /* Format whole octets. */
105         for (b = bits / 8; b > 0; b--) {
106                 if (size < sizeof "255.")
107                         goto emsgsize;
108                 t = dst;
109                 dst += SPRINTF((dst, "%u", *src++));
110                 if (b > 1) {
111                         *dst++ = '.';
112                         *dst = '\0';
113                 }
114                 size -= (size_t)(dst - t);
115         }
116
117         /* Format partial octet. */
118         b = bits % 8;
119         if (b > 0) {
120                 if (size < sizeof ".255")
121                         goto emsgsize;
122                 t = dst;
123                 if (dst != odst)
124                         *dst++ = '.';
125                 m = ((1 << b) - 1) << (8 - b);
126                 dst += SPRINTF((dst, "%u", *src & m));
127                 size -= (size_t)(dst - t);
128         }
129
130         /* Format CIDR /width. */
131         if (size < sizeof "/32")
132                 goto emsgsize;
133         dst += SPRINTF((dst, "/%u", bits));
134         return (odst);
135
136  emsgsize:
137         __set_errno (EMSGSIZE);
138         return (NULL);
139 }