Annotation of src/usr.bin/ssh/ssh-keyscan.c, Revision 1.74
1.74 ! djm 1: /* $OpenBSD: ssh-keyscan.c,v 1.73 2006/08/03 03:34:42 deraadt Exp $ */
1.1 markus 2: /*
3: * Copyright 1995, 1996 by David Mazieres <dm@lcs.mit.edu>.
4: *
5: * Modification and redistribution in source and binary forms is
6: * permitted provided that due credit is given to the author and the
1.23 pvalchev 7: * OpenBSD project by leaving this copyright notice intact.
1.1 markus 8: */
9:
1.65 stevesk 10: #include <sys/types.h>
11: #include <sys/socket.h>
1.1 markus 12: #include <sys/queue.h>
1.74 ! djm 13: #include <sys/time.h>
1.59 stevesk 14: #include <sys/resource.h>
1.58 stevesk 15:
1.69 stevesk 16: #include <openssl/bn.h>
17:
1.1 markus 18: #include <errno.h>
1.67 stevesk 19: #include <netdb.h>
1.58 stevesk 20: #include <setjmp.h>
1.66 stevesk 21: #include <stdarg.h>
1.72 stevesk 22: #include <stdio.h>
1.71 stevesk 23: #include <stdlib.h>
1.73 deraadt 24: #include <signal.h>
1.69 stevesk 25: #include <string.h>
1.68 stevesk 26: #include <unistd.h>
1.1 markus 27:
28: #include "xmalloc.h"
29: #include "ssh.h"
1.10 markus 30: #include "ssh1.h"
1.73 deraadt 31: #include "buffer.h"
1.1 markus 32: #include "key.h"
1.73 deraadt 33: #include "cipher.h"
1.26 markus 34: #include "kex.h"
35: #include "compat.h"
36: #include "myproposal.h"
37: #include "packet.h"
38: #include "dispatch.h"
1.11 markus 39: #include "log.h"
1.18 deraadt 40: #include "atomicio.h"
1.26 markus 41: #include "misc.h"
1.51 djm 42: #include "hostfile.h"
1.1 markus 43:
1.26 markus 44: /* Flag indicating whether IPv4 or IPv6. This can be set on the command line.
45: Default value is AF_UNSPEC means both IPv4 and IPv6. */
46: int IPv4or6 = AF_UNSPEC;
47:
48: int ssh_port = SSH_DEFAULT_PORT;
1.1 markus 49:
1.26 markus 50: #define KT_RSA1 1
51: #define KT_DSA 2
52: #define KT_RSA 4
53:
54: int get_keytypes = KT_RSA1; /* Get only RSA1 keys by default */
1.1 markus 55:
1.51 djm 56: int hash_hosts = 0; /* Hash hostname on output */
57:
1.1 markus 58: #define MAXMAXFD 256
59:
60: /* The number of seconds after which to give up on a TCP connection */
61: int timeout = 5;
62:
63: int maxfd;
1.18 deraadt 64: #define MAXCON (maxfd - 10)
1.1 markus 65:
1.3 markus 66: extern char *__progname;
1.19 millert 67: fd_set *read_wait;
1.63 djm 68: size_t read_wait_nfdset;
1.1 markus 69: int ncon;
1.26 markus 70: int nonfatal_fatal = 0;
71: jmp_buf kexjmp;
1.29 markus 72: Key *kexjmp_key;
1.1 markus 73:
74: /*
75: * Keep a connection structure for each file descriptor. The state
76: * associated with file descriptor n is held in fdcon[n].
77: */
78: typedef struct Connection {
1.6 markus 79: u_char c_status; /* State of connection on this file desc. */
1.1 markus 80: #define CS_UNUSED 0 /* File descriptor unused */
81: #define CS_CON 1 /* Waiting to connect/read greeting */
82: #define CS_SIZE 2 /* Waiting to read initial packet size */
83: #define CS_KEYS 3 /* Waiting to read public key packet */
84: int c_fd; /* Quick lookup: c->c_fd == c - fdcon */
85: int c_plen; /* Packet length field for ssh packet */
86: int c_len; /* Total bytes which must be read. */
87: int c_off; /* Length of data read so far. */
1.26 markus 88: int c_keytype; /* Only one of KT_RSA1, KT_DSA, or KT_RSA */
1.1 markus 89: char *c_namebase; /* Address to free for c_name and c_namelist */
90: char *c_name; /* Hostname of connection for errors */
91: char *c_namelist; /* Pointer to other possible addresses */
92: char *c_output_name; /* Hostname of connection for output */
93: char *c_data; /* Data read from this fd */
1.26 markus 94: Kex *c_kex; /* The key-exchange struct for ssh2 */
1.1 markus 95: struct timeval c_tv; /* Time at which connection gets aborted */
96: TAILQ_ENTRY(Connection) c_link; /* List of connections in timeout order. */
97: } con;
98:
99: TAILQ_HEAD(conlist, Connection) tq; /* Timeout Queue */
100: con *fdcon;
101:
102: /*
103: * This is just a wrapper around fgets() to make it usable.
104: */
105:
106: /* Stress-test. Increase this later. */
107: #define LINEBUF_SIZE 16
108:
109: typedef struct {
110: char *buf;
1.6 markus 111: u_int size;
1.1 markus 112: int lineno;
113: const char *filename;
114: FILE *stream;
115: void (*errfun) (const char *,...);
116: } Linebuf;
117:
1.24 itojun 118: static Linebuf *
1.1 markus 119: Linebuf_alloc(const char *filename, void (*errfun) (const char *,...))
120: {
121: Linebuf *lb;
122:
123: if (!(lb = malloc(sizeof(*lb)))) {
124: if (errfun)
1.37 markus 125: (*errfun) ("linebuf (%s): malloc failed\n",
126: filename ? filename : "(stdin)");
1.1 markus 127: return (NULL);
128: }
129: if (filename) {
130: lb->filename = filename;
131: if (!(lb->stream = fopen(filename, "r"))) {
1.9 markus 132: xfree(lb);
1.1 markus 133: if (errfun)
134: (*errfun) ("%s: %s\n", filename, strerror(errno));
135: return (NULL);
136: }
137: } else {
138: lb->filename = "(stdin)";
139: lb->stream = stdin;
140: }
141:
1.62 deraadt 142: if (!(lb->buf = malloc((lb->size = LINEBUF_SIZE)))) {
1.1 markus 143: if (errfun)
144: (*errfun) ("linebuf (%s): malloc failed\n", lb->filename);
1.9 markus 145: xfree(lb);
1.1 markus 146: return (NULL);
147: }
148: lb->errfun = errfun;
149: lb->lineno = 0;
150: return (lb);
151: }
152:
1.24 itojun 153: static void
1.1 markus 154: Linebuf_free(Linebuf * lb)
155: {
156: fclose(lb->stream);
1.9 markus 157: xfree(lb->buf);
158: xfree(lb);
1.1 markus 159: }
160:
1.24 itojun 161: #if 0
162: static void
1.1 markus 163: Linebuf_restart(Linebuf * lb)
164: {
165: clearerr(lb->stream);
166: rewind(lb->stream);
167: lb->lineno = 0;
168: }
169:
1.24 itojun 170: static int
1.1 markus 171: Linebuf_lineno(Linebuf * lb)
172: {
173: return (lb->lineno);
174: }
1.24 itojun 175: #endif
1.1 markus 176:
1.24 itojun 177: static char *
1.14 markus 178: Linebuf_getline(Linebuf * lb)
1.1 markus 179: {
1.55 djm 180: size_t n = 0;
1.39 deraadt 181: void *p;
1.1 markus 182:
183: lb->lineno++;
184: for (;;) {
185: /* Read a line */
186: if (!fgets(&lb->buf[n], lb->size - n, lb->stream)) {
187: if (ferror(lb->stream) && lb->errfun)
1.39 deraadt 188: (*lb->errfun)("%s: %s\n", lb->filename,
1.17 deraadt 189: strerror(errno));
1.1 markus 190: return (NULL);
191: }
192: n = strlen(lb->buf);
193:
194: /* Return it or an error if it fits */
195: if (n > 0 && lb->buf[n - 1] == '\n') {
196: lb->buf[n - 1] = '\0';
197: return (lb->buf);
198: }
199: if (n != lb->size - 1) {
200: if (lb->errfun)
1.39 deraadt 201: (*lb->errfun)("%s: skipping incomplete last line\n",
1.17 deraadt 202: lb->filename);
1.1 markus 203: return (NULL);
204: }
205: /* Double the buffer if we need more space */
1.39 deraadt 206: lb->size *= 2;
207: if ((p = realloc(lb->buf, lb->size)) == NULL) {
208: lb->size /= 2;
1.1 markus 209: if (lb->errfun)
1.39 deraadt 210: (*lb->errfun)("linebuf (%s): realloc failed\n",
1.17 deraadt 211: lb->filename);
1.1 markus 212: return (NULL);
213: }
1.39 deraadt 214: lb->buf = p;
1.1 markus 215: }
216: }
217:
1.24 itojun 218: static int
1.1 markus 219: fdlim_get(int hard)
220: {
221: struct rlimit rlfd;
1.17 deraadt 222:
1.1 markus 223: if (getrlimit(RLIMIT_NOFILE, &rlfd) < 0)
224: return (-1);
225: if ((hard ? rlfd.rlim_max : rlfd.rlim_cur) == RLIM_INFINITY)
1.46 djm 226: return sysconf(_SC_OPEN_MAX);
1.1 markus 227: else
228: return hard ? rlfd.rlim_max : rlfd.rlim_cur;
229: }
230:
1.24 itojun 231: static int
1.1 markus 232: fdlim_set(int lim)
233: {
234: struct rlimit rlfd;
1.39 deraadt 235:
1.1 markus 236: if (lim <= 0)
237: return (-1);
238: if (getrlimit(RLIMIT_NOFILE, &rlfd) < 0)
239: return (-1);
240: rlfd.rlim_cur = lim;
241: if (setrlimit(RLIMIT_NOFILE, &rlfd) < 0)
242: return (-1);
243: return (0);
244: }
245:
246: /*
247: * This is an strsep function that returns a null field for adjacent
248: * separators. This is the same as the 4.4BSD strsep, but different from the
249: * one in the GNU libc.
250: */
1.24 itojun 251: static char *
1.1 markus 252: xstrsep(char **str, const char *delim)
253: {
254: char *s, *e;
255:
256: if (!**str)
257: return (NULL);
258:
259: s = *str;
260: e = s + strcspn(s, delim);
261:
262: if (*e != '\0')
263: *e++ = '\0';
264: *str = e;
265:
266: return (s);
267: }
268:
269: /*
270: * Get the next non-null token (like GNU strsep). Strsep() will return a
271: * null token for two adjacent separators, so we may have to loop.
272: */
1.24 itojun 273: static char *
1.1 markus 274: strnnsep(char **stringp, char *delim)
275: {
276: char *tok;
277:
278: do {
279: tok = xstrsep(stringp, delim);
280: } while (tok && *tok == '\0');
281: return (tok);
282: }
283:
1.26 markus 284: static Key *
285: keygrab_ssh1(con *c)
1.1 markus 286: {
287: static Key *rsa;
288: static Buffer msg;
289:
290: if (rsa == NULL) {
291: buffer_init(&msg);
292: rsa = key_new(KEY_RSA1);
293: }
1.26 markus 294: buffer_append(&msg, c->c_data, c->c_plen);
295: buffer_consume(&msg, 8 - (c->c_plen & 7)); /* padding */
1.1 markus 296: if (buffer_get_char(&msg) != (int) SSH_SMSG_PUBLIC_KEY) {
1.26 markus 297: error("%s: invalid packet type", c->c_name);
1.1 markus 298: buffer_clear(&msg);
1.26 markus 299: return NULL;
1.1 markus 300: }
301: buffer_consume(&msg, 8); /* cookie */
302:
303: /* server key */
304: (void) buffer_get_int(&msg);
305: buffer_get_bignum(&msg, rsa->rsa->e);
306: buffer_get_bignum(&msg, rsa->rsa->n);
307:
308: /* host key */
309: (void) buffer_get_int(&msg);
310: buffer_get_bignum(&msg, rsa->rsa->e);
311: buffer_get_bignum(&msg, rsa->rsa->n);
1.26 markus 312:
1.1 markus 313: buffer_clear(&msg);
314:
1.26 markus 315: return (rsa);
316: }
317:
318: static int
319: hostjump(Key *hostkey)
320: {
1.29 markus 321: kexjmp_key = hostkey;
322: longjmp(kexjmp, 1);
1.26 markus 323: }
324:
325: static int
326: ssh2_capable(int remote_major, int remote_minor)
327: {
328: switch (remote_major) {
329: case 1:
330: if (remote_minor == 99)
331: return 1;
332: break;
333: case 2:
334: return 1;
335: default:
336: break;
337: }
338: return 0;
339: }
340:
341: static Key *
342: keygrab_ssh2(con *c)
343: {
344: int j;
345:
346: packet_set_connection(c->c_fd, c->c_fd);
347: enable_compat20();
348: myproposal[PROPOSAL_SERVER_HOST_KEY_ALGS] = c->c_keytype == KT_DSA?
349: "ssh-dss": "ssh-rsa";
350: c->c_kex = kex_setup(myproposal);
1.41 markus 351: c->c_kex->kex[KEX_DH_GRP1_SHA1] = kexdh_client;
1.48 djm 352: c->c_kex->kex[KEX_DH_GRP14_SHA1] = kexdh_client;
1.41 markus 353: c->c_kex->kex[KEX_DH_GEX_SHA1] = kexgex_client;
1.60 djm 354: c->c_kex->kex[KEX_DH_GEX_SHA256] = kexgex_client;
1.26 markus 355: c->c_kex->verify_host_key = hostjump;
356:
357: if (!(j = setjmp(kexjmp))) {
358: nonfatal_fatal = 1;
359: dispatch_run(DISPATCH_BLOCK, &c->c_kex->done, c->c_kex);
360: fprintf(stderr, "Impossible! dispatch_run() returned!\n");
361: exit(1);
362: }
363: nonfatal_fatal = 0;
364: xfree(c->c_kex);
365: c->c_kex = NULL;
366: packet_close();
367:
1.29 markus 368: return j < 0? NULL : kexjmp_key;
1.26 markus 369: }
370:
371: static void
372: keyprint(con *c, Key *key)
373: {
1.51 djm 374: char *host = c->c_output_name ? c->c_output_name : c->c_name;
375:
1.26 markus 376: if (!key)
377: return;
1.51 djm 378: if (hash_hosts && (host = host_hash(host, NULL, 0)) == NULL)
379: fatal("host_hash failed");
1.26 markus 380:
1.51 djm 381: fprintf(stdout, "%s ", host);
1.26 markus 382: key_write(key, stdout);
1.1 markus 383: fputs("\n", stdout);
384: }
385:
1.24 itojun 386: static int
1.1 markus 387: tcpconnect(char *host)
388: {
389: struct addrinfo hints, *ai, *aitop;
390: char strport[NI_MAXSERV];
391: int gaierr, s = -1;
392:
1.26 markus 393: snprintf(strport, sizeof strport, "%d", ssh_port);
1.1 markus 394: memset(&hints, 0, sizeof(hints));
1.26 markus 395: hints.ai_family = IPv4or6;
1.1 markus 396: hints.ai_socktype = SOCK_STREAM;
397: if ((gaierr = getaddrinfo(host, strport, &hints, &aitop)) != 0)
398: fatal("getaddrinfo %s: %s", host, gai_strerror(gaierr));
399: for (ai = aitop; ai; ai = ai->ai_next) {
1.42 markus 400: s = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
1.1 markus 401: if (s < 0) {
402: error("socket: %s", strerror(errno));
403: continue;
404: }
1.49 djm 405: if (set_nonblock(s) == -1)
406: fatal("%s: set_nonblock(%d)", __func__, s);
1.1 markus 407: if (connect(s, ai->ai_addr, ai->ai_addrlen) < 0 &&
408: errno != EINPROGRESS)
409: error("connect (`%s'): %s", host, strerror(errno));
410: else
411: break;
412: close(s);
413: s = -1;
414: }
415: freeaddrinfo(aitop);
416: return s;
417: }
418:
1.24 itojun 419: static int
1.26 markus 420: conalloc(char *iname, char *oname, int keytype)
1.1 markus 421: {
1.39 deraadt 422: char *namebase, *name, *namelist;
1.1 markus 423: int s;
424:
425: namebase = namelist = xstrdup(iname);
426:
427: do {
428: name = xstrsep(&namelist, ",");
429: if (!name) {
1.9 markus 430: xfree(namebase);
1.1 markus 431: return (-1);
432: }
433: } while ((s = tcpconnect(name)) < 0);
434:
435: if (s >= maxfd)
1.4 markus 436: fatal("conalloc: fdno %d too high", s);
1.1 markus 437: if (fdcon[s].c_status)
1.4 markus 438: fatal("conalloc: attempt to reuse fdno %d", s);
1.1 markus 439:
440: fdcon[s].c_fd = s;
441: fdcon[s].c_status = CS_CON;
442: fdcon[s].c_namebase = namebase;
443: fdcon[s].c_name = name;
444: fdcon[s].c_namelist = namelist;
445: fdcon[s].c_output_name = xstrdup(oname);
446: fdcon[s].c_data = (char *) &fdcon[s].c_plen;
447: fdcon[s].c_len = 4;
448: fdcon[s].c_off = 0;
1.26 markus 449: fdcon[s].c_keytype = keytype;
1.1 markus 450: gettimeofday(&fdcon[s].c_tv, NULL);
451: fdcon[s].c_tv.tv_sec += timeout;
452: TAILQ_INSERT_TAIL(&tq, &fdcon[s], c_link);
1.19 millert 453: FD_SET(s, read_wait);
1.1 markus 454: ncon++;
455: return (s);
456: }
457:
1.24 itojun 458: static void
1.1 markus 459: confree(int s)
460: {
461: if (s >= maxfd || fdcon[s].c_status == CS_UNUSED)
1.4 markus 462: fatal("confree: attempt to free bad fdno %d", s);
1.18 deraadt 463: close(s);
1.9 markus 464: xfree(fdcon[s].c_namebase);
465: xfree(fdcon[s].c_output_name);
1.1 markus 466: if (fdcon[s].c_status == CS_KEYS)
1.9 markus 467: xfree(fdcon[s].c_data);
1.1 markus 468: fdcon[s].c_status = CS_UNUSED;
1.26 markus 469: fdcon[s].c_keytype = 0;
1.1 markus 470: TAILQ_REMOVE(&tq, &fdcon[s], c_link);
1.19 millert 471: FD_CLR(s, read_wait);
1.1 markus 472: ncon--;
473: }
474:
1.24 itojun 475: static void
1.1 markus 476: contouch(int s)
477: {
478: TAILQ_REMOVE(&tq, &fdcon[s], c_link);
479: gettimeofday(&fdcon[s].c_tv, NULL);
480: fdcon[s].c_tv.tv_sec += timeout;
481: TAILQ_INSERT_TAIL(&tq, &fdcon[s], c_link);
482: }
483:
1.24 itojun 484: static int
1.1 markus 485: conrecycle(int s)
486: {
1.39 deraadt 487: con *c = &fdcon[s];
1.1 markus 488: int ret;
489:
1.26 markus 490: ret = conalloc(c->c_namelist, c->c_output_name, c->c_keytype);
1.1 markus 491: confree(s);
492: return (ret);
493: }
494:
1.24 itojun 495: static void
1.1 markus 496: congreet(int s)
497: {
1.55 djm 498: int n = 0, remote_major = 0, remote_minor = 0;
1.26 markus 499: char buf[256], *cp;
1.33 markus 500: char remote_version[sizeof buf];
1.55 djm 501: size_t bufsiz;
1.1 markus 502: con *c = &fdcon[s];
503:
1.57 djm 504: for (;;) {
505: memset(buf, '\0', sizeof(buf));
506: bufsiz = sizeof(buf);
507: cp = buf;
508: while (bufsiz-- &&
509: (n = atomicio(read, s, cp, 1)) == 1 && *cp != '\n') {
510: if (*cp == '\r')
511: *cp = '\n';
512: cp++;
513: }
514: if (n != 1 || strncmp(buf, "SSH-", 4) == 0)
515: break;
1.27 markus 516: }
1.54 avsm 517: if (n == 0) {
518: switch (errno) {
519: case EPIPE:
520: error("%s: Connection closed by remote host", c->c_name);
521: break;
522: case ECONNREFUSED:
523: break;
524: default:
1.1 markus 525: error("read (%s): %s", c->c_name, strerror(errno));
1.54 avsm 526: break;
527: }
1.1 markus 528: conrecycle(s);
529: return;
530: }
1.21 millert 531: if (*cp != '\n' && *cp != '\r') {
1.1 markus 532: error("%s: bad greeting", c->c_name);
533: confree(s);
534: return;
535: }
1.21 millert 536: *cp = '\0';
1.33 markus 537: if (sscanf(buf, "SSH-%d.%d-%[^\n]\n",
538: &remote_major, &remote_minor, remote_version) == 3)
539: compat_datafellows(remote_version);
540: else
541: datafellows = 0;
1.26 markus 542: if (c->c_keytype != KT_RSA1) {
543: if (!ssh2_capable(remote_major, remote_minor)) {
544: debug("%s doesn't support ssh2", c->c_name);
545: confree(s);
546: return;
547: }
1.33 markus 548: } else if (remote_major != 1) {
549: debug("%s doesn't support ssh1", c->c_name);
550: confree(s);
551: return;
1.26 markus 552: }
1.27 markus 553: fprintf(stderr, "# %s %s\n", c->c_name, chop(buf));
1.26 markus 554: n = snprintf(buf, sizeof buf, "SSH-%d.%d-OpenSSH-keyscan\r\n",
555: c->c_keytype == KT_RSA1? PROTOCOL_MAJOR_1 : PROTOCOL_MAJOR_2,
556: c->c_keytype == KT_RSA1? PROTOCOL_MINOR_1 : PROTOCOL_MINOR_2);
1.55 djm 557: if (n < 0 || (size_t)n >= sizeof(buf)) {
1.53 moritz 558: error("snprintf: buffer too small");
559: confree(s);
560: return;
561: }
1.55 djm 562: if (atomicio(vwrite, s, buf, n) != (size_t)n) {
1.1 markus 563: error("write (%s): %s", c->c_name, strerror(errno));
564: confree(s);
565: return;
566: }
1.26 markus 567: if (c->c_keytype != KT_RSA1) {
568: keyprint(c, keygrab_ssh2(c));
569: confree(s);
570: return;
571: }
1.1 markus 572: c->c_status = CS_SIZE;
573: contouch(s);
574: }
575:
1.24 itojun 576: static void
1.1 markus 577: conread(int s)
578: {
1.39 deraadt 579: con *c = &fdcon[s];
1.54 avsm 580: size_t n;
1.1 markus 581:
582: if (c->c_status == CS_CON) {
583: congreet(s);
584: return;
585: }
1.50 avsm 586: n = atomicio(read, s, c->c_data + c->c_off, c->c_len - c->c_off);
1.54 avsm 587: if (n == 0) {
1.1 markus 588: error("read (%s): %s", c->c_name, strerror(errno));
589: confree(s);
590: return;
591: }
592: c->c_off += n;
593:
594: if (c->c_off == c->c_len)
595: switch (c->c_status) {
596: case CS_SIZE:
597: c->c_plen = htonl(c->c_plen);
598: c->c_len = c->c_plen + 8 - (c->c_plen & 7);
599: c->c_off = 0;
600: c->c_data = xmalloc(c->c_len);
601: c->c_status = CS_KEYS;
602: break;
603: case CS_KEYS:
1.26 markus 604: keyprint(c, keygrab_ssh1(c));
1.1 markus 605: confree(s);
606: return;
607: default:
1.4 markus 608: fatal("conread: invalid status %d", c->c_status);
1.1 markus 609: break;
610: }
611:
612: contouch(s);
613: }
614:
1.24 itojun 615: static void
1.1 markus 616: conloop(void)
617: {
1.39 deraadt 618: struct timeval seltime, now;
1.19 millert 619: fd_set *r, *e;
1.39 deraadt 620: con *c;
1.1 markus 621: int i;
622:
623: gettimeofday(&now, NULL);
1.36 itojun 624: c = TAILQ_FIRST(&tq);
1.1 markus 625:
1.18 deraadt 626: if (c && (c->c_tv.tv_sec > now.tv_sec ||
627: (c->c_tv.tv_sec == now.tv_sec && c->c_tv.tv_usec > now.tv_usec))) {
1.1 markus 628: seltime = c->c_tv;
629: seltime.tv_sec -= now.tv_sec;
630: seltime.tv_usec -= now.tv_usec;
1.13 itojun 631: if (seltime.tv_usec < 0) {
1.1 markus 632: seltime.tv_usec += 1000000;
633: seltime.tv_sec--;
634: }
635: } else
636: seltime.tv_sec = seltime.tv_usec = 0;
637:
1.63 djm 638: r = xcalloc(read_wait_nfdset, sizeof(fd_mask));
639: e = xcalloc(read_wait_nfdset, sizeof(fd_mask));
640: memcpy(r, read_wait, read_wait_nfdset * sizeof(fd_mask));
641: memcpy(e, read_wait, read_wait_nfdset * sizeof(fd_mask));
1.19 millert 642:
643: while (select(maxfd, r, NULL, e, &seltime) == -1 &&
1.16 deraadt 644: (errno == EAGAIN || errno == EINTR))
645: ;
646:
1.18 deraadt 647: for (i = 0; i < maxfd; i++) {
1.19 millert 648: if (FD_ISSET(i, e)) {
1.1 markus 649: error("%s: exception!", fdcon[i].c_name);
650: confree(i);
1.19 millert 651: } else if (FD_ISSET(i, r))
1.1 markus 652: conread(i);
1.18 deraadt 653: }
1.19 millert 654: xfree(r);
655: xfree(e);
1.1 markus 656:
1.36 itojun 657: c = TAILQ_FIRST(&tq);
1.18 deraadt 658: while (c && (c->c_tv.tv_sec < now.tv_sec ||
659: (c->c_tv.tv_sec == now.tv_sec && c->c_tv.tv_usec < now.tv_usec))) {
1.1 markus 660: int s = c->c_fd;
1.18 deraadt 661:
1.36 itojun 662: c = TAILQ_NEXT(c, c_link);
1.1 markus 663: conrecycle(s);
664: }
665: }
666:
1.26 markus 667: static void
668: do_host(char *host)
1.1 markus 669: {
1.26 markus 670: char *name = strnnsep(&host, " \t\n");
671: int j;
1.1 markus 672:
1.31 markus 673: if (name == NULL)
674: return;
1.26 markus 675: for (j = KT_RSA1; j <= KT_RSA; j *= 2) {
676: if (get_keytypes & j) {
677: while (ncon >= MAXCON)
678: conloop();
679: conalloc(name, *host ? host : name, j);
1.1 markus 680: }
681: }
682: }
683:
1.34 markus 684: void
685: fatal(const char *fmt,...)
1.26 markus 686: {
1.34 markus 687: va_list args;
1.39 deraadt 688:
1.34 markus 689: va_start(args, fmt);
690: do_log(SYSLOG_LEVEL_FATAL, fmt, args);
691: va_end(args);
1.26 markus 692: if (nonfatal_fatal)
693: longjmp(kexjmp, -1);
1.34 markus 694: else
1.45 markus 695: exit(255);
1.26 markus 696: }
697:
698: static void
1.1 markus 699: usage(void)
700: {
1.52 jmc 701: fprintf(stderr, "usage: %s [-46Hv] [-f file] [-p port] [-T timeout] [-t type]\n"
1.39 deraadt 702: "\t\t [host | addrlist namelist] [...]\n",
1.25 jakob 703: __progname);
704: exit(1);
1.1 markus 705: }
706:
707: int
708: main(int argc, char **argv)
709: {
1.26 markus 710: int debug_flag = 0, log_level = SYSLOG_LEVEL_INFO;
711: int opt, fopt_count = 0;
712: char *tname;
713:
714: extern int optind;
715: extern char *optarg;
1.1 markus 716:
717: TAILQ_INIT(&tq);
1.56 djm 718:
719: /* Ensure that fds 0, 1 and 2 are open or directed to /dev/null */
720: sanitise_stdfd();
1.1 markus 721:
1.26 markus 722: if (argc <= 1)
1.1 markus 723: usage();
724:
1.51 djm 725: while ((opt = getopt(argc, argv, "Hv46p:T:t:f:")) != -1) {
1.26 markus 726: switch (opt) {
1.51 djm 727: case 'H':
728: hash_hosts = 1;
729: break;
1.26 markus 730: case 'p':
731: ssh_port = a2port(optarg);
732: if (ssh_port == 0) {
733: fprintf(stderr, "Bad port '%s'\n", optarg);
734: exit(1);
735: }
736: break;
737: case 'T':
1.38 stevesk 738: timeout = convtime(optarg);
739: if (timeout == -1 || timeout == 0) {
740: fprintf(stderr, "Bad timeout '%s'\n", optarg);
1.1 markus 741: usage();
1.38 stevesk 742: }
1.26 markus 743: break;
744: case 'v':
745: if (!debug_flag) {
746: debug_flag = 1;
747: log_level = SYSLOG_LEVEL_DEBUG1;
748: }
749: else if (log_level < SYSLOG_LEVEL_DEBUG3)
750: log_level++;
751: else
752: fatal("Too high debugging level.");
753: break;
754: case 'f':
755: if (strcmp(optarg, "-") == 0)
756: optarg = NULL;
757: argv[fopt_count++] = optarg;
758: break;
759: case 't':
760: get_keytypes = 0;
761: tname = strtok(optarg, ",");
762: while (tname) {
763: int type = key_type_from_name(tname);
764: switch (type) {
765: case KEY_RSA1:
766: get_keytypes |= KT_RSA1;
767: break;
768: case KEY_DSA:
769: get_keytypes |= KT_DSA;
770: break;
771: case KEY_RSA:
772: get_keytypes |= KT_RSA;
773: break;
774: case KEY_UNSPEC:
1.32 stevesk 775: fatal("unknown key type %s", tname);
1.26 markus 776: }
777: tname = strtok(NULL, ",");
778: }
779: break;
780: case '4':
781: IPv4or6 = AF_INET;
782: break;
783: case '6':
784: IPv4or6 = AF_INET6;
785: break;
786: case '?':
787: default:
788: usage();
1.1 markus 789: }
790: }
1.26 markus 791: if (optind == argc && !fopt_count)
1.1 markus 792: usage();
793:
1.26 markus 794: log_init("ssh-keyscan", log_level, SYSLOG_FACILITY_USER, 1);
795:
1.1 markus 796: maxfd = fdlim_get(1);
797: if (maxfd < 0)
1.4 markus 798: fatal("%s: fdlim_get: bad value", __progname);
1.1 markus 799: if (maxfd > MAXMAXFD)
800: maxfd = MAXMAXFD;
1.18 deraadt 801: if (MAXCON <= 0)
1.4 markus 802: fatal("%s: not enough file descriptors", __progname);
1.1 markus 803: if (maxfd > fdlim_get(0))
804: fdlim_set(maxfd);
1.63 djm 805: fdcon = xcalloc(maxfd, sizeof(con));
1.19 millert 806:
1.63 djm 807: read_wait_nfdset = howmany(maxfd, NFDBITS);
808: read_wait = xcalloc(read_wait_nfdset, sizeof(fd_mask));
1.1 markus 809:
1.26 markus 810: if (fopt_count) {
811: Linebuf *lb;
812: char *line;
813: int j;
814:
815: for (j = 0; j < fopt_count; j++) {
816: lb = Linebuf_alloc(argv[j], error);
1.28 danh 817: if (!lb)
818: continue;
1.26 markus 819: while ((line = Linebuf_getline(lb)) != NULL)
820: do_host(line);
821: Linebuf_free(lb);
822: }
823: }
824:
825: while (optind < argc)
826: do_host(argv[optind++]);
1.1 markus 827:
828: while (ncon > 0)
829: conloop();
830:
831: return (0);
832: }