xref: /illumos-gate/usr/src/lib/libresolv2/common/isc/ctl_p.c (revision 55fea89dcaa64928bed4327112404dcb3e07b79f)
1 /*
2  * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3  * Copyright (c) 1998,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 /* Extern. */
19 
20 #include "port_before.h"
21 
22 #include <sys/param.h>
23 #include <sys/file.h>
24 #include <sys/socket.h>
25 #include <sys/un.h>
26 
27 #include <netinet/in.h>
28 #include <arpa/nameser.h>
29 #include <arpa/inet.h>
30 
31 #include <errno.h>
32 #include <stdio.h>
33 #include <stdlib.h>
34 #include <string.h>
35 #include <time.h>
36 
37 #include <isc/assertions.h>
38 #include <isc/eventlib.h>
39 #include <isc/logging.h>
40 #include <isc/memcluster.h>
41 #include <isc/ctl.h>
42 
43 #include "ctl_p.h"
44 
45 #include "port_after.h"
46 
47 /* Constants. */
48 
49 const char * const ctl_sevnames[] = {
50 	"debug", "warning", "error"
51 };
52 
53 /* Public. */
54 
55 /*%
56  * ctl_logger()
57  *	if ctl_startup()'s caller didn't specify a logger, this one
58  *	is used.  this pollutes stderr with all kinds of trash so it will
59  *	probably never be used in real applications.
60  */
61 void
ctl_logger(enum ctl_severity severity,const char * format,...)62 ctl_logger(enum ctl_severity severity, const char *format, ...) {
63 	va_list ap;
64 	static const char me[] = "ctl_logger";
65 
66 	fprintf(stderr, "%s(%s): ", me, ctl_sevnames[severity]);
67 	va_start(ap, format);
68 	vfprintf(stderr, format, ap);
69 	va_end(ap);
70 	fputc('\n', stderr);
71 }
72 
73 int
ctl_bufget(struct ctl_buf * buf,ctl_logfunc logger)74 ctl_bufget(struct ctl_buf *buf, ctl_logfunc logger) {
75 	static const char me[] = "ctl_bufget";
76 
77 	REQUIRE(!allocated_p(*buf) && buf->used == 0U);
78 	buf->text = memget(MAX_LINELEN);
79 	if (!allocated_p(*buf)) {
80 		(*logger)(ctl_error, "%s: getmem: %s", me, strerror(errno));
81 		return (-1);
82 	}
83 	buf->used = 0;
84 	return (0);
85 }
86 
87 void
ctl_bufput(struct ctl_buf * buf)88 ctl_bufput(struct ctl_buf *buf) {
89 
90 	REQUIRE(allocated_p(*buf));
91 	memput(buf->text, MAX_LINELEN);
92 	buf->text = NULL;
93 	buf->used = 0;
94 }
95 
96 const char *
ctl_sa_ntop(const struct sockaddr * sa,char * buf,size_t size,ctl_logfunc logger)97 ctl_sa_ntop(const struct sockaddr *sa,
98 	    char *buf, size_t size,
99 	    ctl_logfunc logger)
100 {
101 	static const char me[] = "ctl_sa_ntop";
102 	static const char punt[] = "[0].-1";
103 	char tmp[INET6_ADDRSTRLEN];
104 
105 	switch (sa->sa_family) {
106 	case AF_INET6: {
107 		const struct sockaddr_in6 *in6 =
108 					(const struct sockaddr_in6 *) sa;
109 
110 		if (inet_ntop(in6->sin6_family, &in6->sin6_addr, tmp, sizeof tmp)
111 		    == NULL) {
112 			(*logger)(ctl_error, "%s: inet_ntop(%u %04x): %s",
113 				  me, in6->sin6_family,
114 				  in6->sin6_port, strerror(errno));
115 			return (punt);
116 		}
117 		if (strlen(tmp) + sizeof "[].65535" > size) {
118 			(*logger)(ctl_error, "%s: buffer overflow", me);
119 			return (punt);
120 		}
121 		(void) sprintf(buf, "[%s].%u", tmp, ntohs(in6->sin6_port));
122 		return (buf);
123 	    }
124 	case AF_INET: {
125 		const struct sockaddr_in *in =
126 					      (const struct sockaddr_in *) sa;
127 
128 		if (inet_ntop(in->sin_family, &in->sin_addr, tmp, sizeof tmp)
129 		    == NULL) {
130 			(*logger)(ctl_error, "%s: inet_ntop(%u %04x %08x): %s",
131 				  me, in->sin_family,
132 				  in->sin_port, in->sin_addr.s_addr,
133 				  strerror(errno));
134 			return (punt);
135 		}
136 		if (strlen(tmp) + sizeof "[].65535" > size) {
137 			(*logger)(ctl_error, "%s: buffer overflow", me);
138 			return (punt);
139 		}
140 		(void) sprintf(buf, "[%s].%u", tmp, ntohs(in->sin_port));
141 		return (buf);
142 	    }
143 #ifndef NO_SOCKADDR_UN
144 	case AF_UNIX: {
145 		const struct sockaddr_un *un =
146 					      (const struct sockaddr_un *) sa;
147 		unsigned int x = sizeof un->sun_path;
148 
149 		if (x > size)
150 			x = size;
151 		strncpy(buf, un->sun_path, x - 1);
152 		buf[x - 1] = '\0';
153 		return (buf);
154 	    }
155 #endif
156 	default:
157 		return (punt);
158 	}
159 }
160 
161 void
ctl_sa_copy(const struct sockaddr * src,struct sockaddr * dst)162 ctl_sa_copy(const struct sockaddr *src, struct sockaddr *dst) {
163 	switch (src->sa_family) {
164 	case AF_INET6:
165 		*((struct sockaddr_in6 *)dst) =
166 					 *((const struct sockaddr_in6 *)src);
167 		break;
168 	case AF_INET:
169 		*((struct sockaddr_in *)dst) =
170 					  *((const struct sockaddr_in *)src);
171 		break;
172 #ifndef NO_SOCKADDR_UN
173 	case AF_UNIX:
174 		*((struct sockaddr_un *)dst) =
175 					  *((const struct sockaddr_un *)src);
176 		break;
177 #endif
178 	default:
179 		*dst = *src;
180 		break;
181 	}
182 }
183 
184 /*! \file */
185