1/*- 2 * Copyright (c) 1997 Brian Somers <brian@Awfulhak.org> 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 24 * SUCH DAMAGE. 25 * 26 * $FreeBSD$ 27 */ 28 29 30#include <sys/param.h> 31#include <netdb.h> 32#include <netinet/in.h> 33#include <arpa/inet.h> 34#include <sys/socket.h> 35 36#include <ctype.h> 37#include <errno.h> 38#include <stdarg.h> 39#include <stdio.h> 40#include <stdlib.h> 41#include <string.h> 42#if defined(__FreeBSD__) && !defined(NOKLDLOAD) 43#include <sys/module.h> 44#endif 45#include <termios.h> 46#ifndef __FreeBSD__ 47#include <time.h> 48#endif 49#include <unistd.h> 50 51#if defined(__FreeBSD__) && !defined(NOKLDLOAD) 52#include "id.h" 53#include "log.h" 54#endif 55#include "defs.h" 56 57#define issep(c) ((c) == '\t' || (c) == ' ') 58 59#ifdef __NetBSD__ 60void 61randinit() 62{ 63 srandom((time(NULL)^getpid())+random()); 64} 65#endif 66 67ssize_t 68fullread(int fd, void *v, size_t n) 69{ 70 size_t got, total; 71 72 for (total = 0; total < n; total += got) 73 switch ((got = read(fd, (char *)v + total, n - total))) { 74 case 0: 75 return total; 76 case -1: 77 if (errno == EINTR) 78 got = 0; 79 else 80 return -1; 81 } 82 return total; 83} 84 85static struct { 86 int mode; 87 const char *name; 88} modes[] = { 89 { PHYS_INTERACTIVE, "interactive" }, 90 { PHYS_AUTO, "auto" }, 91 { PHYS_DIRECT, "direct" }, 92 { PHYS_DEDICATED, "dedicated" }, 93 { PHYS_DDIAL, "ddial" }, 94 { PHYS_BACKGROUND, "background" }, 95 { PHYS_FOREGROUND, "foreground" }, 96 { PHYS_ALL, "*" }, 97 { 0, 0 } 98}; 99 100const char * 101mode2Nam(int mode) 102{ 103 int m; 104 105 for (m = 0; modes[m].mode; m++) 106 if (modes[m].mode == mode) 107 return modes[m].name; 108 109 return "unknown"; 110} 111 112int 113Nam2mode(const char *name) 114{ 115 int m, got, len; 116 117 len = strlen(name); 118 got = -1; 119 for (m = 0; modes[m].mode; m++) 120 if (!strncasecmp(name, modes[m].name, len)) { 121 if (modes[m].name[len] == '\0') 122 return modes[m].mode; 123 if (got != -1) 124 return 0; 125 got = m; 126 } 127 128 return got == -1 ? 0 : modes[got].mode; 129} 130 131struct in_addr 132GetIpAddr(const char *cp) 133{ 134 struct in_addr ipaddr; 135 136 if (!strcasecmp(cp, "default")) 137 ipaddr.s_addr = INADDR_ANY; 138 else if (inet_aton(cp, &ipaddr) == 0) { 139 const char *ptr; 140 141 /* Any illegal characters ? */ 142 for (ptr = cp; *ptr != '\0'; ptr++) 143 if (!isalnum(*ptr) && strchr("-.", *ptr) == NULL) 144 break; 145 146 if (*ptr == '\0') { 147 struct hostent *hp; 148 149 hp = gethostbyname(cp); 150 if (hp && hp->h_addrtype == AF_INET) 151 memcpy(&ipaddr, hp->h_addr, hp->h_length); 152 else 153 ipaddr.s_addr = INADDR_NONE; 154 } else 155 ipaddr.s_addr = INADDR_NONE; 156 } 157 158 return ipaddr; 159} 160 161static const struct speeds { 162 unsigned nspeed; 163 speed_t speed; 164} speeds[] = { 165#ifdef B50 166 { 50, B50, }, 167#endif 168#ifdef B75 169 { 75, B75, }, 170#endif 171#ifdef B110 172 { 110, B110, }, 173#endif 174#ifdef B134 175 { 134, B134, }, 176#endif 177#ifdef B150 178 { 150, B150, }, 179#endif 180#ifdef B200 181 { 200, B200, }, 182#endif 183#ifdef B300 184 { 300, B300, }, 185#endif 186#ifdef B600 187 { 600, B600, }, 188#endif 189#ifdef B1200 190 { 1200, B1200, }, 191#endif 192#ifdef B1800 193 { 1800, B1800, }, 194#endif 195#ifdef B2400 196 { 2400, B2400, }, 197#endif 198#ifdef B4800 199 { 4800, B4800, }, 200#endif 201#ifdef B9600 202 { 9600, B9600, }, 203#endif 204#ifdef B19200 205 { 19200, B19200, }, 206#endif 207#ifdef B38400 208 { 38400, B38400, }, 209#endif 210#ifndef _POSIX_SOURCE 211#ifdef B7200 212 { 7200, B7200, }, 213#endif 214#ifdef B14400 215 { 14400, B14400, }, 216#endif 217#ifdef B28800 218 { 28800, B28800, }, 219#endif 220#ifdef B57600 221 { 57600, B57600, }, 222#endif 223#ifdef B76800 224 { 76800, B76800, }, 225#endif 226#ifdef B115200 227 { 115200, B115200, }, 228#endif 229#ifdef B230400 230 { 230400, B230400, }, 231#endif 232#ifdef B460800 233 { 460800, B460800, }, 234#endif 235#ifdef B921600 236 { 921600, B921600, }, 237#endif 238#ifdef EXTA 239 { 19200, EXTA, }, 240#endif 241#ifdef EXTB 242 { 38400, EXTB, }, 243#endif 244#endif /* _POSIX_SOURCE */ 245 { 0, 0 } 246}; 247 248unsigned 249SpeedToUnsigned(speed_t speed) 250{ 251 const struct speeds *sp; 252 253 for (sp = speeds; sp->nspeed; sp++) { 254 if (sp->speed == speed) { 255 return sp->nspeed; 256 } 257 } 258 return 0; 259} 260 261speed_t 262UnsignedToSpeed(unsigned nspeed) 263{ 264 const struct speeds *sp; 265 266 for (sp = speeds; sp->nspeed; sp++) { 267 if (sp->nspeed == nspeed) { 268 return sp->speed; 269 } 270 } 271 return B0; 272} 273 274char * 275findblank(char *p, int flags) 276{ 277 int instring; 278 279 instring = 0; 280 while (*p) { 281 if (*p == '\\') { 282 if (flags & PARSE_REDUCE) { 283 memmove(p, p + 1, strlen(p)); 284 if (!*p) 285 break; 286 } else 287 p++; 288 } else if (*p == '"') { 289 memmove(p, p + 1, strlen(p)); 290 instring = !instring; 291 continue; 292 } else if (!instring && (issep(*p) || 293 (*p == '#' && !(flags & PARSE_NOHASH)))) 294 return p; 295 p++; 296 } 297 298 return instring ? NULL : p; 299} 300 301int 302MakeArgs(char *script, char **pvect, int maxargs, int flags) 303{ 304 int nargs; 305 306 nargs = 0; 307 while (*script) { 308 script += strspn(script, " \t"); 309 if (*script == '#' && !(flags & PARSE_NOHASH)) { 310 *script = '\0'; 311 break; 312 } 313 if (*script) { 314 if (nargs >= maxargs - 1) 315 break; 316 *pvect++ = script; 317 nargs++; 318 script = findblank(script, flags); 319 if (script == NULL) 320 return -1; 321 else if (!(flags & PARSE_NOHASH) && *script == '#') 322 *script = '\0'; 323 else if (*script) 324 *script++ = '\0'; 325 } 326 } 327 *pvect = NULL; 328 return nargs; 329} 330 331const char * 332NumStr(long val, char *buf, size_t sz) 333{ 334 static char result[23]; /* handles 64 bit numbers */ 335 336 if (buf == NULL || sz == 0) { 337 buf = result; 338 sz = sizeof result; 339 } 340 snprintf(buf, sz, "<%ld>", val); 341 return buf; 342} 343 344const char * 345HexStr(long val, char *buf, size_t sz) 346{ 347 static char result[21]; /* handles 64 bit numbers */ 348 349 if (buf == NULL || sz == 0) { 350 buf = result; 351 sz = sizeof result; 352 } 353 snprintf(buf, sz, "<0x%lx>", val); 354 return buf; 355} 356 357const char * 358ex_desc(int ex) 359{ 360 static char num[12]; /* Used immediately if returned */ 361 static const char * const desc[] = { 362 "normal", "start", "sock", "modem", "dial", "dead", "done", 363 "reboot", "errdead", "hangup", "term", "nodial", "nologin", 364 "redial", "reconnect" 365 }; 366 367 if (ex >= 0 && ex < (int)(sizeof desc / sizeof *desc)) 368 return desc[ex]; 369 snprintf(num, sizeof num, "%d", ex); 370 return num; 371} 372 373void 374SetTitle(const char *title) 375{ 376 if (title == NULL) 377 setproctitle(NULL); 378 else if (title[0] == '-' && title[1] != '\0') 379 setproctitle("-%s", title + 1); 380 else 381 setproctitle("%s", title); 382} 383 384fd_set * 385mkfdset() 386{ 387 return (fd_set *)malloc(howmany(getdtablesize(), NFDBITS) * sizeof (fd_mask)); 388} 389 390void 391zerofdset(fd_set *s) 392{ 393 memset(s, '\0', howmany(getdtablesize(), NFDBITS) * sizeof (fd_mask)); 394} 395 396void 397Concatinate(char *buf, size_t sz, int argc, const char *const *argv) 398{ 399 int i, n; 400 unsigned pos; 401 402 *buf = '\0'; 403 for (pos = i = 0; i < argc; i++) { 404 n = snprintf(buf + pos, sz - pos, "%s%s", i ? " " : "", argv[i]); 405 if (n < 0) { 406 buf[pos] = '\0'; 407 break; 408 } 409 if ((pos += n) >= sz) 410 break; 411 } 412} 413 414#if defined(__FreeBSD__) && !defined(NOKLDLOAD) 415int 416loadmodules(int how, const char *module, ...) 417{ 418 int loaded = 0; 419 va_list ap; 420 421 va_start(ap, module); 422 while (module != NULL) { 423 if (modfind(module) == -1) { 424 if (ID0kldload(module) == -1) { 425 if (how == LOAD_VERBOSLY) 426 log_Printf(LogWARN, "%s: Cannot load module\n", module); 427 } else 428 loaded++; 429 } 430 module = va_arg(ap, const char *); 431 } 432 va_end(ap); 433 return loaded; 434} 435#else 436int 437loadmodules(int how __unused, const char *module __unused, ...) 438{ 439 return 0; 440} 441#endif 442