xref: /dragonfly/crypto/openssh/sshconnect.c (revision 768af85b)
1 /* $OpenBSD: sshconnect.c,v 1.214 2009/05/28 16:50:16 andreas Exp $ */
2 /*
3  * Author: Tatu Ylonen <ylo@cs.hut.fi>
4  * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
5  *                    All rights reserved
6  * Code to connect to a remote host, and to perform the client side of the
7  * login (authentication) dialog.
8  *
9  * As far as I am concerned, the code I have written for this software
10  * can be used freely for any purpose.  Any derived versions of this
11  * software must be clearly marked as such, and if the derived work is
12  * incompatible with the protocol description in the RFC file, it must be
13  * called by a name other than "ssh" or "Secure Shell".
14  */
15 
16 #include "includes.h"
17 
18 #include <sys/types.h>
19 #include <sys/wait.h>
20 #include <sys/stat.h>
21 #include <sys/socket.h>
22 #ifdef HAVE_SYS_TIME_H
23 # include <sys/time.h>
24 #endif
25 
26 #include <netinet/in.h>
27 #include <arpa/inet.h>
28 
29 #include <ctype.h>
30 #include <errno.h>
31 #include <netdb.h>
32 #ifdef HAVE_PATHS_H
33 #include <paths.h>
34 #endif
35 #include <pwd.h>
36 #include <stdarg.h>
37 #include <stdio.h>
38 #include <stdlib.h>
39 #include <string.h>
40 #include <unistd.h>
41 
42 #include "xmalloc.h"
43 #include "key.h"
44 #include "hostfile.h"
45 #include "ssh.h"
46 #include "rsa.h"
47 #include "buffer.h"
48 #include "packet.h"
49 #include "uidswap.h"
50 #include "compat.h"
51 #include "key.h"
52 #include "sshconnect.h"
53 #include "hostfile.h"
54 #include "log.h"
55 #include "readconf.h"
56 #include "atomicio.h"
57 #include "misc.h"
58 #include "dns.h"
59 #include "roaming.h"
60 #include "version.h"
61 
62 char *client_version_string = NULL;
63 char *server_version_string = NULL;
64 
65 static int matching_host_key_dns = 0;
66 
67 /* import */
68 extern Options options;
69 extern char *__progname;
70 extern uid_t original_real_uid;
71 extern uid_t original_effective_uid;
72 extern pid_t proxy_command_pid;
73 
74 static int show_other_keys(const char *, Key *);
75 static void warn_changed_key(Key *);
76 
77 /*
78  * Connect to the given ssh server using a proxy command.
79  */
80 static int
81 ssh_proxy_connect(const char *host, u_short port, const char *proxy_command)
82 {
83 	char *command_string, *tmp;
84 	int pin[2], pout[2];
85 	pid_t pid;
86 	char *shell, strport[NI_MAXSERV];
87 
88 	if ((shell = getenv("SHELL")) == NULL)
89 		shell = _PATH_BSHELL;
90 
91 	/* Convert the port number into a string. */
92 	snprintf(strport, sizeof strport, "%hu", port);
93 
94 	/*
95 	 * Build the final command string in the buffer by making the
96 	 * appropriate substitutions to the given proxy command.
97 	 *
98 	 * Use "exec" to avoid "sh -c" processes on some platforms
99 	 * (e.g. Solaris)
100 	 */
101 	xasprintf(&tmp, "exec %s", proxy_command);
102 	command_string = percent_expand(tmp, "h", host,
103 	    "p", strport, (char *)NULL);
104 	xfree(tmp);
105 
106 	/* Create pipes for communicating with the proxy. */
107 	if (pipe(pin) < 0 || pipe(pout) < 0)
108 		fatal("Could not create pipes to communicate with the proxy: %.100s",
109 		    strerror(errno));
110 
111 	debug("Executing proxy command: %.500s", command_string);
112 
113 	/* Fork and execute the proxy command. */
114 	if ((pid = fork()) == 0) {
115 		char *argv[10];
116 
117 		/* Child.  Permanently give up superuser privileges. */
118 		permanently_drop_suid(original_real_uid);
119 
120 		/* Redirect stdin and stdout. */
121 		close(pin[1]);
122 		if (pin[0] != 0) {
123 			if (dup2(pin[0], 0) < 0)
124 				perror("dup2 stdin");
125 			close(pin[0]);
126 		}
127 		close(pout[0]);
128 		if (dup2(pout[1], 1) < 0)
129 			perror("dup2 stdout");
130 		/* Cannot be 1 because pin allocated two descriptors. */
131 		close(pout[1]);
132 
133 		/* Stderr is left as it is so that error messages get
134 		   printed on the user's terminal. */
135 		argv[0] = shell;
136 		argv[1] = "-c";
137 		argv[2] = command_string;
138 		argv[3] = NULL;
139 
140 		/* Execute the proxy command.  Note that we gave up any
141 		   extra privileges above. */
142 		execv(argv[0], argv);
143 		perror(argv[0]);
144 		exit(1);
145 	}
146 	/* Parent. */
147 	if (pid < 0)
148 		fatal("fork failed: %.100s", strerror(errno));
149 	else
150 		proxy_command_pid = pid; /* save pid to clean up later */
151 
152 	/* Close child side of the descriptors. */
153 	close(pin[0]);
154 	close(pout[1]);
155 
156 	/* Free the command name. */
157 	xfree(command_string);
158 
159 	/* Set the connection file descriptors. */
160 	packet_set_connection(pout[0], pin[1]);
161 	packet_set_timeout(options.server_alive_interval,
162 	    options.server_alive_count_max);
163 
164 	/* Indicate OK return */
165 	return 0;
166 }
167 
168 /*
169  * Set TCP receive buffer if requested.
170  * Note: tuning needs to happen after the socket is
171  * created but before the connection happens
172  * so winscale is negotiated properly -cjr
173  */
174 static void
175 ssh_set_socket_recvbuf(int sock)
176 {
177 	void *buf = (void *)&options.tcp_rcv_buf;
178 	int sz = sizeof(options.tcp_rcv_buf);
179 	int socksize;
180 	int socksizelen = sizeof(int);
181 
182 	debug("setsockopt Attempting to set SO_RCVBUF to %d", options.tcp_rcv_buf);
183 	if (setsockopt(sock, SOL_SOCKET, SO_RCVBUF, buf, sz) >= 0) {
184 	  getsockopt(sock, SOL_SOCKET, SO_RCVBUF, &socksize, &socksizelen);
185 	  debug("setsockopt SO_RCVBUF: %.100s %d", strerror(errno), socksize);
186 	}
187 	else
188 		error("Couldn't set socket receive buffer to %d: %.100s",
189 		    options.tcp_rcv_buf, strerror(errno));
190 }
191 
192 
193 /*
194  * Creates a (possibly privileged) socket for use as the ssh connection.
195  */
196 static int
197 ssh_create_socket(int privileged, struct addrinfo *ai)
198 {
199 	int sock, gaierr;
200 	struct addrinfo hints, *res;
201 
202 	/*
203 	 * If we are running as root and want to connect to a privileged
204 	 * port, bind our own socket to a privileged port.
205 	 */
206 	if (privileged) {
207 		int p = IPPORT_RESERVED - 1;
208 		PRIV_START;
209 		sock = rresvport_af(&p, ai->ai_family);
210 		PRIV_END;
211 		if (sock < 0)
212 			error("rresvport: af=%d %.100s", ai->ai_family,
213 			    strerror(errno));
214 		else
215 			debug("Allocated local port %d.", p);
216 
217 		if (options.tcp_rcv_buf > 0)
218 			ssh_set_socket_recvbuf(sock);
219 		return sock;
220 	}
221 	sock = socket(ai->ai_family, ai->ai_socktype, ai->ai_protocol);
222 	if (sock < 0)
223 		error("socket: %.100s", strerror(errno));
224 
225 	if (options.tcp_rcv_buf > 0)
226 		ssh_set_socket_recvbuf(sock);
227 
228 	/* Bind the socket to an alternative local IP address */
229 	if (options.bind_address == NULL)
230 		return sock;
231 
232 	memset(&hints, 0, sizeof(hints));
233 	hints.ai_family = ai->ai_family;
234 	hints.ai_socktype = ai->ai_socktype;
235 	hints.ai_protocol = ai->ai_protocol;
236 	hints.ai_flags = AI_PASSIVE;
237 	gaierr = getaddrinfo(options.bind_address, NULL, &hints, &res);
238 	if (gaierr) {
239 		error("getaddrinfo: %s: %s", options.bind_address,
240 		    ssh_gai_strerror(gaierr));
241 		close(sock);
242 		return -1;
243 	}
244 	if (bind(sock, res->ai_addr, res->ai_addrlen) < 0) {
245 		error("bind: %s: %s", options.bind_address, strerror(errno));
246 		close(sock);
247 		freeaddrinfo(res);
248 		return -1;
249 	}
250 	freeaddrinfo(res);
251 	return sock;
252 }
253 
254 static int
255 timeout_connect(int sockfd, const struct sockaddr *serv_addr,
256     socklen_t addrlen, int *timeoutp)
257 {
258 	fd_set *fdset;
259 	struct timeval tv, t_start;
260 	socklen_t optlen;
261 	int optval, rc, result = -1;
262 
263 	gettimeofday(&t_start, NULL);
264 
265 	if (*timeoutp <= 0) {
266 		result = connect(sockfd, serv_addr, addrlen);
267 		goto done;
268 	}
269 
270 	set_nonblock(sockfd);
271 	rc = connect(sockfd, serv_addr, addrlen);
272 	if (rc == 0) {
273 		unset_nonblock(sockfd);
274 		result = 0;
275 		goto done;
276 	}
277 	if (errno != EINPROGRESS) {
278 		result = -1;
279 		goto done;
280 	}
281 
282 	fdset = (fd_set *)xcalloc(howmany(sockfd + 1, NFDBITS),
283 	    sizeof(fd_mask));
284 	FD_SET(sockfd, fdset);
285 	ms_to_timeval(&tv, *timeoutp);
286 
287 	for (;;) {
288 		rc = select(sockfd + 1, NULL, fdset, NULL, &tv);
289 		if (rc != -1 || errno != EINTR)
290 			break;
291 	}
292 
293 	switch (rc) {
294 	case 0:
295 		/* Timed out */
296 		errno = ETIMEDOUT;
297 		break;
298 	case -1:
299 		/* Select error */
300 		debug("select: %s", strerror(errno));
301 		break;
302 	case 1:
303 		/* Completed or failed */
304 		optval = 0;
305 		optlen = sizeof(optval);
306 		if (getsockopt(sockfd, SOL_SOCKET, SO_ERROR, &optval,
307 		    &optlen) == -1) {
308 			debug("getsockopt: %s", strerror(errno));
309 			break;
310 		}
311 		if (optval != 0) {
312 			errno = optval;
313 			break;
314 		}
315 		result = 0;
316 		unset_nonblock(sockfd);
317 		break;
318 	default:
319 		/* Should not occur */
320 		fatal("Bogus return (%d) from select()", rc);
321 	}
322 
323 	xfree(fdset);
324 
325  done:
326  	if (result == 0 && *timeoutp > 0) {
327 		ms_subtract_diff(&t_start, timeoutp);
328 		if (*timeoutp <= 0) {
329 			errno = ETIMEDOUT;
330 			result = -1;
331 		}
332 	}
333 
334 	return (result);
335 }
336 
337 /*
338  * Opens a TCP/IP connection to the remote server on the given host.
339  * The address of the remote host will be returned in hostaddr.
340  * If port is 0, the default port will be used.  If needpriv is true,
341  * a privileged port will be allocated to make the connection.
342  * This requires super-user privileges if needpriv is true.
343  * Connection_attempts specifies the maximum number of tries (one per
344  * second).  If proxy_command is non-NULL, it specifies the command (with %h
345  * and %p substituted for host and port, respectively) to use to contact
346  * the daemon.
347  */
348 int
349 ssh_connect(const char *host, struct sockaddr_storage * hostaddr,
350     u_short port, int family, int connection_attempts, int *timeout_ms,
351     int want_keepalive, int needpriv, const char *proxy_command)
352 {
353 	int gaierr;
354 	int on = 1;
355 	int sock = -1, attempt;
356 	char ntop[NI_MAXHOST], strport[NI_MAXSERV];
357 	struct addrinfo hints, *ai, *aitop;
358 
359 	debug2("ssh_connect: needpriv %d", needpriv);
360 
361 	/* If a proxy command is given, connect using it. */
362 	if (proxy_command != NULL)
363 		return ssh_proxy_connect(host, port, proxy_command);
364 
365 	/* No proxy command. */
366 
367 	memset(&hints, 0, sizeof(hints));
368 	hints.ai_family = family;
369 	hints.ai_socktype = SOCK_STREAM;
370 	snprintf(strport, sizeof strport, "%u", port);
371 	if ((gaierr = getaddrinfo(host, strport, &hints, &aitop)) != 0)
372 		fatal("%s: Could not resolve hostname %.100s: %s", __progname,
373 		    host, ssh_gai_strerror(gaierr));
374 
375 	for (attempt = 0; attempt < connection_attempts; attempt++) {
376 		if (attempt > 0) {
377 			/* Sleep a moment before retrying. */
378 			sleep(1);
379 			debug("Trying again...");
380 		}
381 		/*
382 		 * Loop through addresses for this host, and try each one in
383 		 * sequence until the connection succeeds.
384 		 */
385 		for (ai = aitop; ai; ai = ai->ai_next) {
386 			if (ai->ai_family != AF_INET && ai->ai_family != AF_INET6)
387 				continue;
388 			if (getnameinfo(ai->ai_addr, ai->ai_addrlen,
389 			    ntop, sizeof(ntop), strport, sizeof(strport),
390 			    NI_NUMERICHOST|NI_NUMERICSERV) != 0) {
391 				error("ssh_connect: getnameinfo failed");
392 				continue;
393 			}
394 			debug("Connecting to %.200s [%.100s] port %s.",
395 				host, ntop, strport);
396 
397 			/* Create a socket for connecting. */
398 			sock = ssh_create_socket(needpriv, ai);
399 			if (sock < 0)
400 				/* Any error is already output */
401 				continue;
402 
403 			if (timeout_connect(sock, ai->ai_addr, ai->ai_addrlen,
404 			    timeout_ms) >= 0) {
405 				/* Successful connection. */
406 				memcpy(hostaddr, ai->ai_addr, ai->ai_addrlen);
407 				break;
408 			} else {
409 				debug("connect to address %s port %s: %s",
410 				    ntop, strport, strerror(errno));
411 				close(sock);
412 				sock = -1;
413 			}
414 		}
415 		if (sock != -1)
416 			break;	/* Successful connection. */
417 	}
418 
419 	freeaddrinfo(aitop);
420 
421 	/* Return failure if we didn't get a successful connection. */
422 	if (sock == -1) {
423 		error("ssh: connect to host %s port %s: %s",
424 		    host, strport, strerror(errno));
425 		return (-1);
426 	}
427 
428 	debug("Connection established.");
429 
430 	/* Set SO_KEEPALIVE if requested. */
431 	if (want_keepalive &&
432 	    setsockopt(sock, SOL_SOCKET, SO_KEEPALIVE, (void *)&on,
433 	    sizeof(on)) < 0)
434 		error("setsockopt SO_KEEPALIVE: %.100s", strerror(errno));
435 
436 	/* Set the connection. */
437 	packet_set_connection(sock, sock);
438 	packet_set_timeout(options.server_alive_interval,
439 	    options.server_alive_count_max);
440 
441 	return 0;
442 }
443 
444 /*
445  * Waits for the server identification string, and sends our own
446  * identification string.
447  */
448 void
449 ssh_exchange_identification(int timeout_ms)
450 {
451 	char buf[256], remote_version[256];	/* must be same size! */
452 	int remote_major, remote_minor, mismatch;
453 	int connection_in = packet_get_connection_in();
454 	int connection_out = packet_get_connection_out();
455 	int minor1 = PROTOCOL_MINOR_1;
456 	u_int i, n;
457 	size_t len;
458 	int fdsetsz, remaining, rc;
459 	struct timeval t_start, t_remaining;
460 	fd_set *fdset;
461 
462 	fdsetsz = howmany(connection_in + 1, NFDBITS) * sizeof(fd_mask);
463 	fdset = xcalloc(1, fdsetsz);
464 
465 	/* Read other side's version identification. */
466 	remaining = timeout_ms;
467 	for (n = 0;;) {
468 		for (i = 0; i < sizeof(buf) - 1; i++) {
469 			if (timeout_ms > 0) {
470 				gettimeofday(&t_start, NULL);
471 				ms_to_timeval(&t_remaining, remaining);
472 				FD_SET(connection_in, fdset);
473 				rc = select(connection_in + 1, fdset, NULL,
474 				    fdset, &t_remaining);
475 				ms_subtract_diff(&t_start, &remaining);
476 				if (rc == 0 || remaining <= 0)
477 					fatal("Connection timed out during "
478 					    "banner exchange");
479 				if (rc == -1) {
480 					if (errno == EINTR)
481 						continue;
482 					fatal("ssh_exchange_identification: "
483 					    "select: %s", strerror(errno));
484 				}
485 			}
486 
487 			len = roaming_atomicio(read, connection_in, &buf[i], 1);
488 
489 			if (len != 1 && errno == EPIPE)
490 				fatal("ssh_exchange_identification: "
491 				    "Connection closed by remote host");
492 			else if (len != 1)
493 				fatal("ssh_exchange_identification: "
494 				    "read: %.100s", strerror(errno));
495 			if (buf[i] == '\r') {
496 				buf[i] = '\n';
497 				buf[i + 1] = 0;
498 				continue;		/**XXX wait for \n */
499 			}
500 			if (buf[i] == '\n') {
501 				buf[i + 1] = 0;
502 				break;
503 			}
504 			if (++n > 65536)
505 				fatal("ssh_exchange_identification: "
506 				    "No banner received");
507 		}
508 		buf[sizeof(buf) - 1] = 0;
509 		if (strncmp(buf, "SSH-", 4) == 0)
510 			break;
511 		debug("ssh_exchange_identification: %s", buf);
512 	}
513 	server_version_string = xstrdup(buf);
514 	xfree(fdset);
515 
516 	/*
517 	 * Check that the versions match.  In future this might accept
518 	 * several versions and set appropriate flags to handle them.
519 	 */
520 	if (sscanf(server_version_string, "SSH-%d.%d-%[^\n]\n",
521 	    &remote_major, &remote_minor, remote_version) != 3)
522 		fatal("Bad remote protocol version identification: '%.100s'", buf);
523 	debug("Remote protocol version %d.%d, remote software version %.100s",
524 	    remote_major, remote_minor, remote_version);
525 
526 	compat_datafellows(remote_version);
527 	mismatch = 0;
528 
529 	switch (remote_major) {
530 	case 1:
531 		if (remote_minor == 99 &&
532 		    (options.protocol & SSH_PROTO_2) &&
533 		    !(options.protocol & SSH_PROTO_1_PREFERRED)) {
534 			enable_compat20();
535 			break;
536 		}
537 		if (!(options.protocol & SSH_PROTO_1)) {
538 			mismatch = 1;
539 			break;
540 		}
541 		if (remote_minor < 3) {
542 			fatal("Remote machine has too old SSH software version.");
543 		} else if (remote_minor == 3 || remote_minor == 4) {
544 			/* We speak 1.3, too. */
545 			enable_compat13();
546 			minor1 = 3;
547 			if (options.forward_agent) {
548 				logit("Agent forwarding disabled for protocol 1.3");
549 				options.forward_agent = 0;
550 			}
551 		}
552 		break;
553 	case 2:
554 		if (options.protocol & SSH_PROTO_2) {
555 			enable_compat20();
556 			break;
557 		}
558 		/* FALLTHROUGH */
559 	default:
560 		mismatch = 1;
561 		break;
562 	}
563 	if (mismatch)
564 		fatal("Protocol major versions differ: %d vs. %d",
565 		    (options.protocol & SSH_PROTO_2) ? PROTOCOL_MAJOR_2 : PROTOCOL_MAJOR_1,
566 		    remote_major);
567 	/* Send our own protocol version identification. */
568 	snprintf(buf, sizeof buf, "SSH-%d.%d-%.100s%s",
569 	    compat20 ? PROTOCOL_MAJOR_2 : PROTOCOL_MAJOR_1,
570 	    compat20 ? PROTOCOL_MINOR_2 : minor1,
571 	    SSH_RELEASE, compat20 ? "\r\n" : "\n");
572 	if (roaming_atomicio(vwrite, connection_out, buf, strlen(buf))
573 	    != strlen(buf))
574 		fatal("write: %.100s", strerror(errno));
575 	client_version_string = xstrdup(buf);
576 	chop(client_version_string);
577 	chop(server_version_string);
578 	debug("Local version string %.100s", client_version_string);
579 }
580 
581 /* defaults to 'no' */
582 static int
583 confirm(const char *prompt)
584 {
585 	const char *msg, *again = "Please type 'yes' or 'no': ";
586 	char *p;
587 	int ret = -1;
588 
589 	if (options.batch_mode)
590 		return 0;
591 	for (msg = prompt;;msg = again) {
592 		p = read_passphrase(msg, RP_ECHO);
593 		if (p == NULL ||
594 		    (p[0] == '\0') || (p[0] == '\n') ||
595 		    strncasecmp(p, "no", 2) == 0)
596 			ret = 0;
597 		if (p && strncasecmp(p, "yes", 3) == 0)
598 			ret = 1;
599 		if (p)
600 			xfree(p);
601 		if (ret != -1)
602 			return ret;
603 	}
604 }
605 
606 /*
607  * check whether the supplied host key is valid, return -1 if the key
608  * is not valid. the user_hostfile will not be updated if 'readonly' is true.
609  */
610 #define RDRW	0
611 #define RDONLY	1
612 #define ROQUIET	2
613 static int
614 check_host_key(char *hostname, struct sockaddr *hostaddr, u_short port,
615     Key *host_key, int readonly, const char *user_hostfile,
616     const char *system_hostfile)
617 {
618 	Key *file_key;
619 	const char *type = key_type(host_key);
620 	char *ip = NULL, *host = NULL;
621 	char hostline[1000], *hostp, *fp, *ra;
622 	HostStatus host_status;
623 	HostStatus ip_status;
624 	int r, local = 0, host_ip_differ = 0;
625 	int salen;
626 	char ntop[NI_MAXHOST];
627 	char msg[1024];
628 	int len, host_line, ip_line, cancelled_forwarding = 0;
629 	const char *host_file = NULL, *ip_file = NULL;
630 
631 	/*
632 	 * Force accepting of the host key for loopback/localhost. The
633 	 * problem is that if the home directory is NFS-mounted to multiple
634 	 * machines, localhost will refer to a different machine in each of
635 	 * them, and the user will get bogus HOST_CHANGED warnings.  This
636 	 * essentially disables host authentication for localhost; however,
637 	 * this is probably not a real problem.
638 	 */
639 	/**  hostaddr == 0! */
640 	switch (hostaddr->sa_family) {
641 	case AF_INET:
642 		local = (ntohl(((struct sockaddr_in *)hostaddr)->
643 		    sin_addr.s_addr) >> 24) == IN_LOOPBACKNET;
644 		salen = sizeof(struct sockaddr_in);
645 		break;
646 	case AF_INET6:
647 		local = IN6_IS_ADDR_LOOPBACK(
648 		    &(((struct sockaddr_in6 *)hostaddr)->sin6_addr));
649 		salen = sizeof(struct sockaddr_in6);
650 		break;
651 	default:
652 		local = 0;
653 		salen = sizeof(struct sockaddr_storage);
654 		break;
655 	}
656 	if (options.no_host_authentication_for_localhost == 1 && local &&
657 	    options.host_key_alias == NULL) {
658 		debug("Forcing accepting of host key for "
659 		    "loopback/localhost.");
660 		return 0;
661 	}
662 
663 	/*
664 	 * We don't have the remote ip-address for connections
665 	 * using a proxy command
666 	 */
667 	if (options.proxy_command == NULL) {
668 		if (getnameinfo(hostaddr, salen, ntop, sizeof(ntop),
669 		    NULL, 0, NI_NUMERICHOST) != 0)
670 			fatal("check_host_key: getnameinfo failed");
671 		ip = put_host_port(ntop, port);
672 	} else {
673 		ip = xstrdup("<no hostip for proxy command>");
674 	}
675 
676 	/*
677 	 * Turn off check_host_ip if the connection is to localhost, via proxy
678 	 * command or if we don't have a hostname to compare with
679 	 */
680 	if (options.check_host_ip && (local ||
681 	    strcmp(hostname, ip) == 0 || options.proxy_command != NULL))
682 		options.check_host_ip = 0;
683 
684 	/*
685 	 * Allow the user to record the key under a different name or
686 	 * differentiate a non-standard port.  This is useful for ssh
687 	 * tunneling over forwarded connections or if you run multiple
688 	 * sshd's on different ports on the same machine.
689 	 */
690 	if (options.host_key_alias != NULL) {
691 		host = xstrdup(options.host_key_alias);
692 		debug("using hostkeyalias: %s", host);
693 	} else {
694 		host = put_host_port(hostname, port);
695 	}
696 
697 	/*
698 	 * Store the host key from the known host file in here so that we can
699 	 * compare it with the key for the IP address.
700 	 */
701 	file_key = key_new(host_key->type);
702 
703 	/*
704 	 * Check if the host key is present in the user's list of known
705 	 * hosts or in the systemwide list.
706 	 */
707 	host_file = user_hostfile;
708 	host_status = check_host_in_hostfile(host_file, host, host_key,
709 	    file_key, &host_line);
710 	if (host_status == HOST_NEW) {
711 		host_file = system_hostfile;
712 		host_status = check_host_in_hostfile(host_file, host, host_key,
713 		    file_key, &host_line);
714 	}
715 	/*
716 	 * Also perform check for the ip address, skip the check if we are
717 	 * localhost or the hostname was an ip address to begin with
718 	 */
719 	if (options.check_host_ip) {
720 		Key *ip_key = key_new(host_key->type);
721 
722 		ip_file = user_hostfile;
723 		ip_status = check_host_in_hostfile(ip_file, ip, host_key,
724 		    ip_key, &ip_line);
725 		if (ip_status == HOST_NEW) {
726 			ip_file = system_hostfile;
727 			ip_status = check_host_in_hostfile(ip_file, ip,
728 			    host_key, ip_key, &ip_line);
729 		}
730 		if (host_status == HOST_CHANGED &&
731 		    (ip_status != HOST_CHANGED || !key_equal(ip_key, file_key)))
732 			host_ip_differ = 1;
733 
734 		key_free(ip_key);
735 	} else
736 		ip_status = host_status;
737 
738 	key_free(file_key);
739 
740 	switch (host_status) {
741 	case HOST_OK:
742 		/* The host is known and the key matches. */
743 		debug("Host '%.200s' is known and matches the %s host key.",
744 		    host, type);
745 		debug("Found key in %s:%d", host_file, host_line);
746 		if (options.check_host_ip && ip_status == HOST_NEW) {
747 			if (readonly)
748 				logit("%s host key for IP address "
749 				    "'%.128s' not in list of known hosts.",
750 				    type, ip);
751 			else if (!add_host_to_hostfile(user_hostfile, ip,
752 			    host_key, options.hash_known_hosts))
753 				logit("Failed to add the %s host key for IP "
754 				    "address '%.128s' to the list of known "
755 				    "hosts (%.30s).", type, ip, user_hostfile);
756 			else
757 				logit("Warning: Permanently added the %s host "
758 				    "key for IP address '%.128s' to the list "
759 				    "of known hosts.", type, ip);
760 		} else if (options.visual_host_key) {
761 			fp = key_fingerprint(host_key, SSH_FP_MD5, SSH_FP_HEX);
762 			ra = key_fingerprint(host_key, SSH_FP_MD5,
763 			    SSH_FP_RANDOMART);
764 			logit("Host key fingerprint is %s\n%s\n", fp, ra);
765 			xfree(ra);
766 			xfree(fp);
767 		}
768 		break;
769 	case HOST_NEW:
770 		if (options.host_key_alias == NULL && port != 0 &&
771 		    port != SSH_DEFAULT_PORT) {
772 			debug("checking without port identifier");
773 			if (check_host_key(hostname, hostaddr, 0, host_key,
774 			    ROQUIET, user_hostfile, system_hostfile) == 0) {
775 				debug("found matching key w/out port");
776 				break;
777 			}
778 		}
779 		if (readonly)
780 			goto fail;
781 		/* The host is new. */
782 		if (options.strict_host_key_checking == 1) {
783 			/*
784 			 * User has requested strict host key checking.  We
785 			 * will not add the host key automatically.  The only
786 			 * alternative left is to abort.
787 			 */
788 			error("No %s host key is known for %.200s and you "
789 			    "have requested strict checking.", type, host);
790 			goto fail;
791 		} else if (options.strict_host_key_checking == 2) {
792 			char msg1[1024], msg2[1024];
793 
794 			if (show_other_keys(host, host_key))
795 				snprintf(msg1, sizeof(msg1),
796 				    "\nbut keys of different type are already"
797 				    " known for this host.");
798 			else
799 				snprintf(msg1, sizeof(msg1), ".");
800 			/* The default */
801 			fp = key_fingerprint(host_key, SSH_FP_MD5, SSH_FP_HEX);
802 			ra = key_fingerprint(host_key, SSH_FP_MD5,
803 			    SSH_FP_RANDOMART);
804 			msg2[0] = '\0';
805 			if (options.verify_host_key_dns) {
806 				if (matching_host_key_dns)
807 					snprintf(msg2, sizeof(msg2),
808 					    "Matching host key fingerprint"
809 					    " found in DNS.\n");
810 				else
811 					snprintf(msg2, sizeof(msg2),
812 					    "No matching host key fingerprint"
813 					    " found in DNS.\n");
814 			}
815 			snprintf(msg, sizeof(msg),
816 			    "The authenticity of host '%.200s (%s)' can't be "
817 			    "established%s\n"
818 			    "%s key fingerprint is %s.%s%s\n%s"
819 			    "Are you sure you want to continue connecting "
820 			    "(yes/no)? ",
821 			    host, ip, msg1, type, fp,
822 			    options.visual_host_key ? "\n" : "",
823 			    options.visual_host_key ? ra : "",
824 			    msg2);
825 			xfree(ra);
826 			xfree(fp);
827 			if (!confirm(msg))
828 				goto fail;
829 		}
830 		/*
831 		 * If not in strict mode, add the key automatically to the
832 		 * local known_hosts file.
833 		 */
834 		if (options.check_host_ip && ip_status == HOST_NEW) {
835 			snprintf(hostline, sizeof(hostline), "%s,%s",
836 			    host, ip);
837 			hostp = hostline;
838 			if (options.hash_known_hosts) {
839 				/* Add hash of host and IP separately */
840 				r = add_host_to_hostfile(user_hostfile, host,
841 				    host_key, options.hash_known_hosts) &&
842 				    add_host_to_hostfile(user_hostfile, ip,
843 				    host_key, options.hash_known_hosts);
844 			} else {
845 				/* Add unhashed "host,ip" */
846 				r = add_host_to_hostfile(user_hostfile,
847 				    hostline, host_key,
848 				    options.hash_known_hosts);
849 			}
850 		} else {
851 			r = add_host_to_hostfile(user_hostfile, host, host_key,
852 			    options.hash_known_hosts);
853 			hostp = host;
854 		}
855 
856 		if (!r)
857 			logit("Failed to add the host to the list of known "
858 			    "hosts (%.500s).", user_hostfile);
859 		else
860 			logit("Warning: Permanently added '%.200s' (%s) to the "
861 			    "list of known hosts.", hostp, type);
862 		break;
863 	case HOST_CHANGED:
864 		if (readonly == ROQUIET)
865 			goto fail;
866 		if (options.check_host_ip && host_ip_differ) {
867 			char *key_msg;
868 			if (ip_status == HOST_NEW)
869 				key_msg = "is unknown";
870 			else if (ip_status == HOST_OK)
871 				key_msg = "is unchanged";
872 			else
873 				key_msg = "has a different value";
874 			error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
875 			error("@       WARNING: POSSIBLE DNS SPOOFING DETECTED!          @");
876 			error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
877 			error("The %s host key for %s has changed,", type, host);
878 			error("and the key for the corresponding IP address %s", ip);
879 			error("%s. This could either mean that", key_msg);
880 			error("DNS SPOOFING is happening or the IP address for the host");
881 			error("and its host key have changed at the same time.");
882 			if (ip_status != HOST_NEW)
883 				error("Offending key for IP in %s:%d", ip_file, ip_line);
884 		}
885 		/* The host key has changed. */
886 		warn_changed_key(host_key);
887 		error("Add correct host key in %.100s to get rid of this message.",
888 		    user_hostfile);
889 		error("Offending key in %s:%d", host_file, host_line);
890 
891 		/*
892 		 * If strict host key checking is in use, the user will have
893 		 * to edit the key manually and we can only abort.
894 		 */
895 		if (options.strict_host_key_checking) {
896 			error("%s host key for %.200s has changed and you have "
897 			    "requested strict checking.", type, host);
898 			goto fail;
899 		}
900 
901 		/*
902 		 * If strict host key checking has not been requested, allow
903 		 * the connection but without MITM-able authentication or
904 		 * forwarding.
905 		 */
906 		if (options.password_authentication) {
907 			error("Password authentication is disabled to avoid "
908 			    "man-in-the-middle attacks.");
909 			options.password_authentication = 0;
910 			cancelled_forwarding = 1;
911 		}
912 		if (options.kbd_interactive_authentication) {
913 			error("Keyboard-interactive authentication is disabled"
914 			    " to avoid man-in-the-middle attacks.");
915 			options.kbd_interactive_authentication = 0;
916 			options.challenge_response_authentication = 0;
917 			cancelled_forwarding = 1;
918 		}
919 		if (options.challenge_response_authentication) {
920 			error("Challenge/response authentication is disabled"
921 			    " to avoid man-in-the-middle attacks.");
922 			options.challenge_response_authentication = 0;
923 			cancelled_forwarding = 1;
924 		}
925 		if (options.forward_agent) {
926 			error("Agent forwarding is disabled to avoid "
927 			    "man-in-the-middle attacks.");
928 			options.forward_agent = 0;
929 			cancelled_forwarding = 1;
930 		}
931 		if (options.forward_x11) {
932 			error("X11 forwarding is disabled to avoid "
933 			    "man-in-the-middle attacks.");
934 			options.forward_x11 = 0;
935 			cancelled_forwarding = 1;
936 		}
937 		if (options.num_local_forwards > 0 ||
938 		    options.num_remote_forwards > 0) {
939 			error("Port forwarding is disabled to avoid "
940 			    "man-in-the-middle attacks.");
941 			options.num_local_forwards =
942 			    options.num_remote_forwards = 0;
943 			cancelled_forwarding = 1;
944 		}
945 		if (options.tun_open != SSH_TUNMODE_NO) {
946 			error("Tunnel forwarding is disabled to avoid "
947 			    "man-in-the-middle attacks.");
948 			options.tun_open = SSH_TUNMODE_NO;
949 			cancelled_forwarding = 1;
950 		}
951 		if (options.exit_on_forward_failure && cancelled_forwarding)
952 			fatal("Error: forwarding disabled due to host key "
953 			    "check failure");
954 
955 		/*
956 		 * XXX Should permit the user to change to use the new id.
957 		 * This could be done by converting the host key to an
958 		 * identifying sentence, tell that the host identifies itself
959 		 * by that sentence, and ask the user if he/she whishes to
960 		 * accept the authentication.
961 		 */
962 		break;
963 	case HOST_FOUND:
964 		fatal("internal error");
965 		break;
966 	}
967 
968 	if (options.check_host_ip && host_status != HOST_CHANGED &&
969 	    ip_status == HOST_CHANGED) {
970 		snprintf(msg, sizeof(msg),
971 		    "Warning: the %s host key for '%.200s' "
972 		    "differs from the key for the IP address '%.128s'"
973 		    "\nOffending key for IP in %s:%d",
974 		    type, host, ip, ip_file, ip_line);
975 		if (host_status == HOST_OK) {
976 			len = strlen(msg);
977 			snprintf(msg + len, sizeof(msg) - len,
978 			    "\nMatching host key in %s:%d",
979 			    host_file, host_line);
980 		}
981 		if (options.strict_host_key_checking == 1) {
982 			logit("%s", msg);
983 			error("Exiting, you have requested strict checking.");
984 			goto fail;
985 		} else if (options.strict_host_key_checking == 2) {
986 			strlcat(msg, "\nAre you sure you want "
987 			    "to continue connecting (yes/no)? ", sizeof(msg));
988 			if (!confirm(msg))
989 				goto fail;
990 		} else {
991 			logit("%s", msg);
992 		}
993 	}
994 
995 	xfree(ip);
996 	xfree(host);
997 	return 0;
998 
999 fail:
1000 	xfree(ip);
1001 	xfree(host);
1002 	return -1;
1003 }
1004 
1005 /* returns 0 if key verifies or -1 if key does NOT verify */
1006 int
1007 verify_host_key(char *host, struct sockaddr *hostaddr, Key *host_key)
1008 {
1009 	struct stat st;
1010 	int flags = 0;
1011 
1012 	if (options.verify_host_key_dns &&
1013 	    verify_host_key_dns(host, hostaddr, host_key, &flags) == 0) {
1014 
1015 		if (flags & DNS_VERIFY_FOUND) {
1016 
1017 			if (options.verify_host_key_dns == 1 &&
1018 			    flags & DNS_VERIFY_MATCH &&
1019 			    flags & DNS_VERIFY_SECURE)
1020 				return 0;
1021 
1022 			if (flags & DNS_VERIFY_MATCH) {
1023 				matching_host_key_dns = 1;
1024 			} else {
1025 				warn_changed_key(host_key);
1026 				error("Update the SSHFP RR in DNS with the new "
1027 				    "host key to get rid of this message.");
1028 			}
1029 		}
1030 	}
1031 
1032 	/* return ok if the key can be found in an old keyfile */
1033 	if (stat(options.system_hostfile2, &st) == 0 ||
1034 	    stat(options.user_hostfile2, &st) == 0) {
1035 		if (check_host_key(host, hostaddr, options.port, host_key,
1036 		    RDONLY, options.user_hostfile2,
1037 		    options.system_hostfile2) == 0)
1038 			return 0;
1039 	}
1040 	return check_host_key(host, hostaddr, options.port, host_key,
1041 	    RDRW, options.user_hostfile, options.system_hostfile);
1042 }
1043 
1044 /*
1045  * Starts a dialog with the server, and authenticates the current user on the
1046  * server.  This does not need any extra privileges.  The basic connection
1047  * to the server must already have been established before this is called.
1048  * If login fails, this function prints an error and never returns.
1049  * This function does not require super-user privileges.
1050  */
1051 void
1052 ssh_login(Sensitive *sensitive, const char *orighost,
1053     struct sockaddr *hostaddr, struct passwd *pw, int timeout_ms)
1054 {
1055 	char *host, *cp;
1056 	char *server_user, *local_user;
1057 
1058 	local_user = xstrdup(pw->pw_name);
1059 	server_user = options.user ? options.user : local_user;
1060 
1061 	/* Convert the user-supplied hostname into all lowercase. */
1062 	host = xstrdup(orighost);
1063 	for (cp = host; *cp; cp++)
1064 		if (isupper(*cp))
1065 			*cp = (char)tolower(*cp);
1066 
1067 	/* Exchange protocol version identification strings with the server. */
1068 	ssh_exchange_identification(timeout_ms);
1069 
1070 	/* Put the connection into non-blocking mode. */
1071 	packet_set_nonblocking();
1072 
1073 	/* key exchange */
1074 	/* authenticate user */
1075 	if (compat20) {
1076 		ssh_kex2(host, hostaddr);
1077 		ssh_userauth2(local_user, server_user, host, sensitive);
1078 	} else {
1079 		ssh_kex(host, hostaddr);
1080 		ssh_userauth1(local_user, server_user, host, sensitive);
1081 	}
1082 	xfree(local_user);
1083 }
1084 
1085 void
1086 ssh_put_password(char *password)
1087 {
1088 	int size;
1089 	char *padded;
1090 
1091 	if (datafellows & SSH_BUG_PASSWORDPAD) {
1092 		packet_put_cstring(password);
1093 		return;
1094 	}
1095 	size = roundup(strlen(password) + 1, 32);
1096 	padded = xcalloc(1, size);
1097 	strlcpy(padded, password, size);
1098 	packet_put_string(padded, size);
1099 	memset(padded, 0, size);
1100 	xfree(padded);
1101 }
1102 
1103 static int
1104 show_key_from_file(const char *file, const char *host, int keytype)
1105 {
1106 	Key *found;
1107 	char *fp, *ra;
1108 	int line, ret;
1109 
1110 	found = key_new(keytype);
1111 	if ((ret = lookup_key_in_hostfile_by_type(file, host,
1112 	    keytype, found, &line))) {
1113 		fp = key_fingerprint(found, SSH_FP_MD5, SSH_FP_HEX);
1114 		ra = key_fingerprint(found, SSH_FP_MD5, SSH_FP_RANDOMART);
1115 		logit("WARNING: %s key found for host %s\n"
1116 		    "in %s:%d\n"
1117 		    "%s key fingerprint %s.\n%s\n",
1118 		    key_type(found), host, file, line,
1119 		    key_type(found), fp, ra);
1120 		xfree(ra);
1121 		xfree(fp);
1122 	}
1123 	key_free(found);
1124 	return (ret);
1125 }
1126 
1127 /* print all known host keys for a given host, but skip keys of given type */
1128 static int
1129 show_other_keys(const char *host, Key *key)
1130 {
1131 	int type[] = { KEY_RSA1, KEY_RSA, KEY_DSA, -1};
1132 	int i, found = 0;
1133 
1134 	for (i = 0; type[i] != -1; i++) {
1135 		if (type[i] == key->type)
1136 			continue;
1137 		if (type[i] != KEY_RSA1 &&
1138 		    show_key_from_file(options.user_hostfile2, host, type[i])) {
1139 			found = 1;
1140 			continue;
1141 		}
1142 		if (type[i] != KEY_RSA1 &&
1143 		    show_key_from_file(options.system_hostfile2, host, type[i])) {
1144 			found = 1;
1145 			continue;
1146 		}
1147 		if (show_key_from_file(options.user_hostfile, host, type[i])) {
1148 			found = 1;
1149 			continue;
1150 		}
1151 		if (show_key_from_file(options.system_hostfile, host, type[i])) {
1152 			found = 1;
1153 			continue;
1154 		}
1155 		debug2("no key of type %d for host %s", type[i], host);
1156 	}
1157 	return (found);
1158 }
1159 
1160 static void
1161 warn_changed_key(Key *host_key)
1162 {
1163 	char *fp;
1164 	const char *type = key_type(host_key);
1165 
1166 	fp = key_fingerprint(host_key, SSH_FP_MD5, SSH_FP_HEX);
1167 
1168 	error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
1169 	error("@    WARNING: REMOTE HOST IDENTIFICATION HAS CHANGED!     @");
1170 	error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
1171 	error("IT IS POSSIBLE THAT SOMEONE IS DOING SOMETHING NASTY!");
1172 	error("Someone could be eavesdropping on you right now (man-in-the-middle attack)!");
1173 	error("It is also possible that the %s host key has just been changed.", type);
1174 	error("The fingerprint for the %s key sent by the remote host is\n%s.",
1175 	    type, fp);
1176 	error("Please contact your system administrator.");
1177 
1178 	xfree(fp);
1179 }
1180 
1181 /*
1182  * Execute a local command
1183  */
1184 int
1185 ssh_local_cmd(const char *args)
1186 {
1187 	char *shell;
1188 	pid_t pid;
1189 	int status;
1190 
1191 	if (!options.permit_local_command ||
1192 	    args == NULL || !*args)
1193 		return (1);
1194 
1195 	if ((shell = getenv("SHELL")) == NULL)
1196 		shell = _PATH_BSHELL;
1197 
1198 	pid = fork();
1199 	if (pid == 0) {
1200 		debug3("Executing %s -c \"%s\"", shell, args);
1201 		execl(shell, shell, "-c", args, (char *)NULL);
1202 		error("Couldn't execute %s -c \"%s\": %s",
1203 		    shell, args, strerror(errno));
1204 		_exit(1);
1205 	} else if (pid == -1)
1206 		fatal("fork failed: %.100s", strerror(errno));
1207 	while (waitpid(pid, &status, 0) == -1)
1208 		if (errno != EINTR)
1209 			fatal("Couldn't wait for child: %s", strerror(errno));
1210 
1211 	if (!WIFEXITED(status))
1212 		return (1);
1213 
1214 	return (WEXITSTATUS(status));
1215 }
1216