1 #if !defined(lint) && !defined(SABER) 2 static const char rcsid[] = "$Id: ctl_p.c,v 1.4 2005/04/27 04:56:35 sra Exp $"; 3 #endif /* not lint */ 4 5 /* 6 * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC") 7 * Copyright (c) 1998,1999 by Internet Software Consortium. 8 * 9 * Permission to use, copy, modify, and distribute this software for any 10 * purpose with or without fee is hereby granted, provided that the above 11 * copyright notice and this permission notice appear in all copies. 12 * 13 * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES 14 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF 15 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL ISC BE LIABLE FOR 16 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES 17 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN 18 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT 19 * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. 20 */ 21 22 /* Extern. */ 23 24 #include "port_before.h" 25 26 #include <sys/param.h> 27 #include <sys/file.h> 28 #include <sys/socket.h> 29 #include <sys/un.h> 30 31 #include <netinet/in.h> 32 #include <arpa/nameser.h> 33 #include <arpa/inet.h> 34 35 #include <errno.h> 36 #include <stdio.h> 37 #include <stdlib.h> 38 #include <string.h> 39 #include <time.h> 40 41 #include <isc/assertions.h> 42 #include <isc/eventlib.h> 43 #include <isc/logging.h> 44 #include <isc/memcluster.h> 45 #include <isc/ctl.h> 46 47 #include "ctl_p.h" 48 49 #include "port_after.h" 50 51 /* Constants. */ 52 53 const char * const ctl_sevnames[] = { 54 "debug", "warning", "error" 55 }; 56 57 /* Public. */ 58 59 /*% 60 * ctl_logger() 61 * if ctl_startup()'s caller didn't specify a logger, this one 62 * is used. this pollutes stderr with all kinds of trash so it will 63 * probably never be used in real applications. 64 */ 65 void 66 ctl_logger(enum ctl_severity severity, const char *format, ...) { 67 va_list ap; 68 static const char me[] = "ctl_logger"; 69 70 fprintf(stderr, "%s(%s): ", me, ctl_sevnames[severity]); 71 va_start(ap, format); 72 vfprintf(stderr, format, ap); 73 va_end(ap); 74 fputc('\n', stderr); 75 } 76 77 int 78 ctl_bufget(struct ctl_buf *buf, ctl_logfunc logger) { 79 static const char me[] = "ctl_bufget"; 80 81 REQUIRE(!allocated_p(*buf) && buf->used == 0U); 82 buf->text = memget(MAX_LINELEN); 83 if (!allocated_p(*buf)) { 84 (*logger)(ctl_error, "%s: getmem: %s", me, strerror(errno)); 85 return (-1); 86 } 87 buf->used = 0; 88 return (0); 89 } 90 91 void 92 ctl_bufput(struct ctl_buf *buf) { 93 94 REQUIRE(allocated_p(*buf)); 95 memput(buf->text, MAX_LINELEN); 96 buf->text = NULL; 97 buf->used = 0; 98 } 99 100 const char * 101 ctl_sa_ntop(const struct sockaddr *sa, 102 char *buf, size_t size, 103 ctl_logfunc logger) 104 { 105 static const char me[] = "ctl_sa_ntop"; 106 static const char punt[] = "[0].-1"; 107 char tmp[INET6_ADDRSTRLEN]; 108 109 switch (sa->sa_family) { 110 case AF_INET6: { 111 const struct sockaddr_in6 *in6 = 112 (const struct sockaddr_in6 *) sa; 113 114 if (inet_ntop(in6->sin6_family, &in6->sin6_addr, tmp, sizeof tmp) 115 == NULL) { 116 (*logger)(ctl_error, "%s: inet_ntop(%u %04x): %s", 117 me, in6->sin6_family, 118 in6->sin6_port, strerror(errno)); 119 return (punt); 120 } 121 if (strlen(tmp) + sizeof "[].65535" > size) { 122 (*logger)(ctl_error, "%s: buffer overflow", me); 123 return (punt); 124 } 125 (void) sprintf(buf, "[%s].%u", tmp, ntohs(in6->sin6_port)); 126 return (buf); 127 } 128 case AF_INET: { 129 const struct sockaddr_in *in = 130 (const struct sockaddr_in *) sa; 131 132 if (inet_ntop(in->sin_family, &in->sin_addr, tmp, sizeof tmp) 133 == NULL) { 134 (*logger)(ctl_error, "%s: inet_ntop(%u %04x %08x): %s", 135 me, in->sin_family, 136 in->sin_port, in->sin_addr.s_addr, 137 strerror(errno)); 138 return (punt); 139 } 140 if (strlen(tmp) + sizeof "[].65535" > size) { 141 (*logger)(ctl_error, "%s: buffer overflow", me); 142 return (punt); 143 } 144 (void) sprintf(buf, "[%s].%u", tmp, ntohs(in->sin_port)); 145 return (buf); 146 } 147 #ifndef NO_SOCKADDR_UN 148 case AF_UNIX: { 149 const struct sockaddr_un *un = 150 (const struct sockaddr_un *) sa; 151 unsigned int x = sizeof un->sun_path; 152 153 if (x > size) 154 x = size; 155 strncpy(buf, un->sun_path, x - 1); 156 buf[x - 1] = '\0'; 157 return (buf); 158 } 159 #endif 160 default: 161 return (punt); 162 } 163 } 164 165 void 166 ctl_sa_copy(const struct sockaddr *src, struct sockaddr *dst) { 167 switch (src->sa_family) { 168 case AF_INET6: 169 *((struct sockaddr_in6 *)dst) = 170 *((const struct sockaddr_in6 *)src); 171 break; 172 case AF_INET: 173 *((struct sockaddr_in *)dst) = 174 *((const struct sockaddr_in *)src); 175 break; 176 #ifndef NO_SOCKADDR_UN 177 case AF_UNIX: 178 *((struct sockaddr_un *)dst) = 179 *((const struct sockaddr_un *)src); 180 break; 181 #endif 182 default: 183 *dst = *src; 184 break; 185 } 186 } 187 188 /*! \file */ 189