xref: /freebsd/crypto/openssh/sshconnect.c (revision 1b6c76a2fe091c74f08427e6c870851025a9cf67)
1 /*
2  * Author: Tatu Ylonen <ylo@cs.hut.fi>
3  * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
4  *                    All rights reserved
5  * Code to connect to a remote host, and to perform the client side of the
6  * login (authentication) dialog.
7  *
8  * As far as I am concerned, the code I have written for this software
9  * can be used freely for any purpose.  Any derived versions of this
10  * software must be clearly marked as such, and if the derived work is
11  * incompatible with the protocol description in the RFC file, it must be
12  * called by a name other than "ssh" or "Secure Shell".
13  */
14 
15 #include "includes.h"
16 RCSID("$OpenBSD: sshconnect.c,v 1.104 2001/04/12 19:15:25 markus Exp $");
17 RCSID("$FreeBSD$");
18 
19 #include <openssl/bn.h>
20 
21 #include "ssh.h"
22 #include "xmalloc.h"
23 #include "rsa.h"
24 #include "buffer.h"
25 #include "packet.h"
26 #include "uidswap.h"
27 #include "compat.h"
28 #include "key.h"
29 #include "sshconnect.h"
30 #include "hostfile.h"
31 #include "log.h"
32 #include "readconf.h"
33 #include "atomicio.h"
34 #include "misc.h"
35 #include "auth.h"
36 #include "ssh1.h"
37 #include "canohost.h"
38 
39 char *client_version_string = NULL;
40 char *server_version_string = NULL;
41 
42 extern Options options;
43 extern char *__progname;
44 
45 /* AF_UNSPEC or AF_INET or AF_INET6 */
46 extern int IPv4or6;
47 
48 /*
49  * Connect to the given ssh server using a proxy command.
50  */
51 int
52 ssh_proxy_connect(const char *host, u_short port, struct passwd *pw,
53 		  const char *proxy_command)
54 {
55 	Buffer command;
56 	const char *cp;
57 	char *command_string;
58 	int pin[2], pout[2];
59 	pid_t pid;
60 	char strport[NI_MAXSERV];
61 
62 	/* Convert the port number into a string. */
63 	snprintf(strport, sizeof strport, "%hu", port);
64 
65 	/* Build the final command string in the buffer by making the
66 	   appropriate substitutions to the given proxy command. */
67 	buffer_init(&command);
68 	for (cp = proxy_command; *cp; cp++) {
69 		if (cp[0] == '%' && cp[1] == '%') {
70 			buffer_append(&command, "%", 1);
71 			cp++;
72 			continue;
73 		}
74 		if (cp[0] == '%' && cp[1] == 'h') {
75 			buffer_append(&command, host, strlen(host));
76 			cp++;
77 			continue;
78 		}
79 		if (cp[0] == '%' && cp[1] == 'p') {
80 			buffer_append(&command, strport, strlen(strport));
81 			cp++;
82 			continue;
83 		}
84 		buffer_append(&command, cp, 1);
85 	}
86 	buffer_append(&command, "\0", 1);
87 
88 	/* Get the final command string. */
89 	command_string = buffer_ptr(&command);
90 
91 	/* Create pipes for communicating with the proxy. */
92 	if (pipe(pin) < 0 || pipe(pout) < 0)
93 		fatal("Could not create pipes to communicate with the proxy: %.100s",
94 		      strerror(errno));
95 
96 	debug("Executing proxy command: %.500s", command_string);
97 
98 	/* Fork and execute the proxy command. */
99 	if ((pid = fork()) == 0) {
100 		char *argv[10];
101 
102 		/* Child.  Permanently give up superuser privileges. */
103 		permanently_set_uid(pw);
104 
105 		/* Redirect stdin and stdout. */
106 		close(pin[1]);
107 		if (pin[0] != 0) {
108 			if (dup2(pin[0], 0) < 0)
109 				perror("dup2 stdin");
110 			close(pin[0]);
111 		}
112 		close(pout[0]);
113 		if (dup2(pout[1], 1) < 0)
114 			perror("dup2 stdout");
115 		/* Cannot be 1 because pin allocated two descriptors. */
116 		close(pout[1]);
117 
118 		/* Stderr is left as it is so that error messages get
119 		   printed on the user's terminal. */
120 		argv[0] = _PATH_BSHELL;
121 		argv[1] = "-c";
122 		argv[2] = command_string;
123 		argv[3] = NULL;
124 
125 		/* Execute the proxy command.  Note that we gave up any
126 		   extra privileges above. */
127 		execv(argv[0], argv);
128 		perror(argv[0]);
129 		exit(1);
130 	}
131 	/* Parent. */
132 	if (pid < 0)
133 		fatal("fork failed: %.100s", strerror(errno));
134 
135 	/* Close child side of the descriptors. */
136 	close(pin[0]);
137 	close(pout[1]);
138 
139 	/* Free the command name. */
140 	buffer_free(&command);
141 
142 	/* Set the connection file descriptors. */
143 	packet_set_connection(pout[0], pin[1]);
144 
145 	return 1;
146 }
147 
148 /*
149  * Creates a (possibly privileged) socket for use as the ssh connection.
150  */
151 int
152 ssh_create_socket(struct passwd *pw, int privileged, int family)
153 {
154 	int sock;
155 
156 	/*
157 	 * If we are running as root and want to connect to a privileged
158 	 * port, bind our own socket to a privileged port.
159 	 */
160 	if (privileged) {
161 		int p = IPPORT_RESERVED - 1;
162 		sock = rresvport_af(&p, family);
163 		if (sock < 0)
164 			error("rresvport: af=%d %.100s", family, strerror(errno));
165 		else
166 			debug("Allocated local port %d.", p);
167 	} else {
168 		/*
169 		 * Just create an ordinary socket on arbitrary port.  We use
170 		 * the user's uid to create the socket.
171 		 */
172 		temporarily_use_uid(pw);
173 		sock = socket(family, SOCK_STREAM, 0);
174 		if (sock < 0)
175 			error("socket: %.100s", strerror(errno));
176 		restore_uid();
177 	}
178 	return sock;
179 }
180 
181 /*
182  * Opens a TCP/IP connection to the remote server on the given host.
183  * The address of the remote host will be returned in hostaddr.
184  * If port is 0, the default port will be used.  If anonymous is zero,
185  * a privileged port will be allocated to make the connection.
186  * This requires super-user privileges if anonymous is false.
187  * Connection_attempts specifies the maximum number of tries (one per
188  * second).  If proxy_command is non-NULL, it specifies the command (with %h
189  * and %p substituted for host and port, respectively) to use to contact
190  * the daemon.
191  */
192 int
193 ssh_connect(const char *host, struct sockaddr_storage * hostaddr,
194 	    u_short port, int connection_attempts,
195 	    int anonymous, struct passwd *pw,
196 	    const char *proxy_command)
197 {
198 	int gaierr;
199 	int on = 1;
200 	int sock = -1, attempt;
201 	char ntop[NI_MAXHOST], strport[NI_MAXSERV];
202 	struct addrinfo hints, *ai, *aitop;
203 	struct linger linger;
204 	struct servent *sp;
205 
206 	debug("ssh_connect: getuid %u geteuid %u anon %d",
207 	      (u_int) getuid(), (u_int) geteuid(), anonymous);
208 
209 	/* Get default port if port has not been set. */
210 	if (port == 0) {
211 		sp = getservbyname(SSH_SERVICE_NAME, "tcp");
212 		if (sp)
213 			port = ntohs(sp->s_port);
214 		else
215 			port = SSH_DEFAULT_PORT;
216 	}
217 	/* If a proxy command is given, connect using it. */
218 	if (proxy_command != NULL)
219 		return ssh_proxy_connect(host, port, pw, proxy_command);
220 
221 	/* No proxy command. */
222 
223 	memset(&hints, 0, sizeof(hints));
224 	hints.ai_family = IPv4or6;
225 	hints.ai_socktype = SOCK_STREAM;
226 	snprintf(strport, sizeof strport, "%d", port);
227 	if ((gaierr = getaddrinfo(host, strport, &hints, &aitop)) != 0)
228 		fatal("%s: %.100s: %s", __progname, host,
229 		    gai_strerror(gaierr));
230 
231 	/*
232 	 * Try to connect several times.  On some machines, the first time
233 	 * will sometimes fail.  In general socket code appears to behave
234 	 * quite magically on many machines.
235 	 */
236 	for (attempt = 0; attempt < connection_attempts; attempt++) {
237 		if (attempt > 0)
238 			debug("Trying again...");
239 
240 		/* Loop through addresses for this host, and try each one in
241 		   sequence until the connection succeeds. */
242 		for (ai = aitop; ai; ai = ai->ai_next) {
243 			if (ai->ai_family != AF_INET && ai->ai_family != AF_INET6)
244 				continue;
245 			if (getnameinfo(ai->ai_addr, ai->ai_addrlen,
246 			    ntop, sizeof(ntop), strport, sizeof(strport),
247 			    NI_NUMERICHOST|NI_NUMERICSERV) != 0) {
248 				error("ssh_connect: getnameinfo failed");
249 				continue;
250 			}
251 			debug("Connecting to %.200s [%.100s] port %s.",
252 				host, ntop, strport);
253 
254 			/* Create a socket for connecting. */
255 			sock = ssh_create_socket(pw,
256 			    !anonymous && geteuid() == 0,
257 			    ai->ai_family);
258 			if (sock < 0)
259 				continue;
260 
261 			/* Connect to the host.  We use the user's uid in the
262 			 * hope that it will help with tcp_wrappers showing
263 			 * the remote uid as root.
264 			 */
265 			temporarily_use_uid(pw);
266 			if (connect(sock, ai->ai_addr, ai->ai_addrlen) >= 0) {
267 				/* Successful connection. */
268 				memcpy(hostaddr, ai->ai_addr, ai->ai_addrlen);
269 				restore_uid();
270 				break;
271 			} else {
272 				debug("connect: %.100s", strerror(errno));
273 				restore_uid();
274 				/*
275 				 * Close the failed socket; there appear to
276 				 * be some problems when reusing a socket for
277 				 * which connect() has already returned an
278 				 * error.
279 				 */
280 				shutdown(sock, SHUT_RDWR);
281 				close(sock);
282 			}
283 		}
284 		if (ai)
285 			break;	/* Successful connection. */
286 
287 		/* Sleep a moment before retrying. */
288 		sleep(1);
289 	}
290 
291 	freeaddrinfo(aitop);
292 
293 	/* Return failure if we didn't get a successful connection. */
294 	if (attempt >= connection_attempts)
295 		return 0;
296 
297 	debug("Connection established.");
298 
299 	/*
300 	 * Set socket options.  We would like the socket to disappear as soon
301 	 * as it has been closed for whatever reason.
302 	 */
303 	/* setsockopt(sock, SOL_SOCKET, SO_REUSEADDR, (void *)&on, sizeof(on)); */
304 	linger.l_onoff = 1;
305 	linger.l_linger = 5;
306 	setsockopt(sock, SOL_SOCKET, SO_LINGER, (void *)&linger, sizeof(linger));
307 
308 	/* Set keepalives if requested. */
309 	if (options.keepalives &&
310 	    setsockopt(sock, SOL_SOCKET, SO_KEEPALIVE, (void *)&on,
311 	    sizeof(on)) < 0)
312 		error("setsockopt SO_KEEPALIVE: %.100s", strerror(errno));
313 
314 	/* Set the connection. */
315 	packet_set_connection(sock, sock);
316 
317 	return 1;
318 }
319 
320 /*
321  * Waits for the server identification string, and sends our own
322  * identification string.
323  */
324 void
325 ssh_exchange_identification(void)
326 {
327 	char buf[256], remote_version[256];	/* must be same size! */
328 	int remote_major, remote_minor, i, mismatch;
329 	int connection_in = packet_get_connection_in();
330 	int connection_out = packet_get_connection_out();
331 	int minor1 = PROTOCOL_MINOR_1;
332 
333 	/* Read other side\'s version identification. */
334 	for (;;) {
335 		for (i = 0; i < sizeof(buf) - 1; i++) {
336 			int len = atomicio(read, connection_in, &buf[i], 1);
337 			if (len < 0)
338 				fatal("ssh_exchange_identification: read: %.100s", strerror(errno));
339 			if (len != 1)
340 				fatal("ssh_exchange_identification: Connection closed by remote host");
341 			if (buf[i] == '\r') {
342 				buf[i] = '\n';
343 				buf[i + 1] = 0;
344 				continue;		/**XXX wait for \n */
345 			}
346 			if (buf[i] == '\n') {
347 				buf[i + 1] = 0;
348 				break;
349 			}
350 		}
351 		buf[sizeof(buf) - 1] = 0;
352 		if (strncmp(buf, "SSH-", 4) == 0)
353 			break;
354 		debug("ssh_exchange_identification: %s", buf);
355 	}
356 	server_version_string = xstrdup(buf);
357 
358 	/*
359 	 * Check that the versions match.  In future this might accept
360 	 * several versions and set appropriate flags to handle them.
361 	 */
362 	if (sscanf(server_version_string, "SSH-%d.%d-%[^\n]\n",
363 	    &remote_major, &remote_minor, remote_version) != 3)
364 		fatal("Bad remote protocol version identification: '%.100s'", buf);
365 	debug("Remote protocol version %d.%d, remote software version %.100s",
366 	      remote_major, remote_minor, remote_version);
367 
368 	compat_datafellows(remote_version);
369 	mismatch = 0;
370 
371 	switch(remote_major) {
372 	case 1:
373 		if (remote_minor == 99 &&
374 		    (options.protocol & SSH_PROTO_2) &&
375 		    !(options.protocol & SSH_PROTO_1_PREFERRED)) {
376 			enable_compat20();
377 			break;
378 		}
379 		if (!(options.protocol & SSH_PROTO_1)) {
380 			mismatch = 1;
381 			break;
382 		}
383 		if (remote_minor < 3) {
384 			fatal("Remote machine has too old SSH software version.");
385 		} else if (remote_minor == 3 || remote_minor == 4) {
386 			/* We speak 1.3, too. */
387 			enable_compat13();
388 			minor1 = 3;
389 			if (options.forward_agent) {
390 				log("Agent forwarding disabled for protocol 1.3");
391 				options.forward_agent = 0;
392 			}
393 		}
394 		break;
395 	case 2:
396 		if (options.protocol & SSH_PROTO_2) {
397 			enable_compat20();
398 			break;
399 		}
400 		/* FALLTHROUGH */
401 	default:
402 		mismatch = 1;
403 		break;
404 	}
405 	if (mismatch)
406 		fatal("Protocol major versions differ: %d vs. %d",
407 		    (options.protocol & SSH_PROTO_2) ? PROTOCOL_MAJOR_2 : PROTOCOL_MAJOR_1,
408 		    remote_major);
409 	if (compat20)
410 		packet_set_ssh2_format();
411 	/* Send our own protocol version identification. */
412 	snprintf(buf, sizeof buf, "SSH-%d.%d-%.100s\n",
413 	    compat20 ? PROTOCOL_MAJOR_2 : PROTOCOL_MAJOR_1,
414 	    compat20 ? PROTOCOL_MINOR_2 : minor1,
415 	    SSH_VERSION);
416 	if (atomicio(write, connection_out, buf, strlen(buf)) != strlen(buf))
417 		fatal("write: %.100s", strerror(errno));
418 	client_version_string = xstrdup(buf);
419 	chop(client_version_string);
420 	chop(server_version_string);
421 	debug("Local version string %.100s", client_version_string);
422 }
423 
424 /* defaults to 'no' */
425 int
426 read_yes_or_no(const char *prompt, int defval)
427 {
428 	char buf[1024];
429 	FILE *f;
430 	int retval = -1;
431 
432 	if (options.batch_mode)
433 		return 0;
434 
435 	if (isatty(STDIN_FILENO))
436 		f = stdin;
437 	else
438 		f = fopen(_PATH_TTY, "rw");
439 
440 	if (f == NULL)
441 		return 0;
442 
443 	fflush(stdout);
444 
445 	while (1) {
446 		fprintf(stderr, "%s", prompt);
447 		if (fgets(buf, sizeof(buf), f) == NULL) {
448 			/* Print a newline (the prompt probably didn\'t have one). */
449 			fprintf(stderr, "\n");
450 			strlcpy(buf, "no", sizeof buf);
451 		}
452 		/* Remove newline from response. */
453 		if (strchr(buf, '\n'))
454 			*strchr(buf, '\n') = 0;
455 
456 		if (buf[0] == 0)
457 			retval = defval;
458 		if (strcmp(buf, "yes") == 0)
459 			retval = 1;
460 		else if (strcmp(buf, "no") == 0)
461 			retval = 0;
462 		else
463 			fprintf(stderr, "Please type 'yes' or 'no'.\n");
464 
465 		if (retval != -1) {
466 			if (f != stdin)
467 				fclose(f);
468 			return retval;
469 		}
470 	}
471 }
472 
473 /*
474  * check whether the supplied host key is valid, return only if ok.
475  */
476 
477 void
478 check_host_key(char *host, struct sockaddr *hostaddr, Key *host_key,
479 	const char *user_hostfile, const char *system_hostfile)
480 {
481 	Key *file_key;
482 	char *type = key_type(host_key);
483 	char *ip = NULL;
484 	char hostline[1000], *hostp, *fp;
485 	HostStatus host_status;
486 	HostStatus ip_status;
487 	int local = 0, host_ip_differ = 0;
488 	char ntop[NI_MAXHOST];
489 	int host_line, ip_line;
490 	const char *host_file = NULL, *ip_file = NULL;
491 
492 	/*
493 	 * Force accepting of the host key for loopback/localhost. The
494 	 * problem is that if the home directory is NFS-mounted to multiple
495 	 * machines, localhost will refer to a different machine in each of
496 	 * them, and the user will get bogus HOST_CHANGED warnings.  This
497 	 * essentially disables host authentication for localhost; however,
498 	 * this is probably not a real problem.
499 	 */
500 	/**  hostaddr == 0! */
501 	switch (hostaddr->sa_family) {
502 	case AF_INET:
503 		local = (ntohl(((struct sockaddr_in *)hostaddr)->sin_addr.s_addr) >> 24) == IN_LOOPBACKNET;
504 		break;
505 	case AF_INET6:
506 		local = IN6_IS_ADDR_LOOPBACK(&(((struct sockaddr_in6 *)hostaddr)->sin6_addr));
507 		break;
508 	default:
509 		local = 0;
510 		break;
511 	}
512 	if (local && options.host_key_alias == NULL) {
513 		debug("Forcing accepting of host key for "
514 		    "loopback/localhost.");
515 		return;
516 	}
517 
518 	/*
519 	 * We don't have the remote ip-address for connections
520 	 * using a proxy command
521 	 */
522 	if (options.proxy_command == NULL) {
523 		if (getnameinfo(hostaddr, hostaddr->sa_len, ntop, sizeof(ntop),
524 		    NULL, 0, NI_NUMERICHOST) != 0)
525 			fatal("check_host_key: getnameinfo failed");
526 		ip = xstrdup(ntop);
527 	} else {
528 		ip = xstrdup("<no hostip for proxy command>");
529 	}
530 	/*
531 	 * Turn off check_host_ip if the connection is to localhost, via proxy
532 	 * command or if we don't have a hostname to compare with
533 	 */
534 	if (options.check_host_ip &&
535 	    (local || strcmp(host, ip) == 0 || options.proxy_command != NULL))
536 		options.check_host_ip = 0;
537 
538 	/*
539 	 * Allow the user to record the key under a different name. This is
540 	 * useful for ssh tunneling over forwarded connections or if you run
541 	 * multiple sshd's on different ports on the same machine.
542 	 */
543 	if (options.host_key_alias != NULL) {
544 		host = options.host_key_alias;
545 		debug("using hostkeyalias: %s", host);
546 	}
547 
548 	/*
549 	 * Store the host key from the known host file in here so that we can
550 	 * compare it with the key for the IP address.
551 	 */
552 	file_key = key_new(host_key->type);
553 
554 	/*
555 	 * Check if the host key is present in the user\'s list of known
556 	 * hosts or in the systemwide list.
557 	 */
558 	host_file = user_hostfile;
559 	host_status = check_host_in_hostfile(host_file, host, host_key, file_key, &host_line);
560 	if (host_status == HOST_NEW) {
561 		host_file = system_hostfile;
562 		host_status = check_host_in_hostfile(host_file, host, host_key, file_key, &host_line);
563 	}
564 	/*
565 	 * Also perform check for the ip address, skip the check if we are
566 	 * localhost or the hostname was an ip address to begin with
567 	 */
568 	if (options.check_host_ip) {
569 		Key *ip_key = key_new(host_key->type);
570 
571 		ip_file = user_hostfile;
572 		ip_status = check_host_in_hostfile(ip_file, ip, host_key, ip_key, &ip_line);
573 		if (ip_status == HOST_NEW) {
574 			ip_file = system_hostfile;
575 			ip_status = check_host_in_hostfile(ip_file, ip, host_key, ip_key, &ip_line);
576 		}
577 		if (host_status == HOST_CHANGED &&
578 		    (ip_status != HOST_CHANGED || !key_equal(ip_key, file_key)))
579 			host_ip_differ = 1;
580 
581 		key_free(ip_key);
582 	} else
583 		ip_status = host_status;
584 
585 	key_free(file_key);
586 
587 	switch (host_status) {
588 	case HOST_OK:
589 		/* The host is known and the key matches. */
590 		debug("Host '%.200s' is known and matches the %s host key.",
591 		    host, type);
592 		debug("Found key in %s:%d", host_file, host_line);
593 		if (options.check_host_ip && ip_status == HOST_NEW) {
594 			if (!add_host_to_hostfile(user_hostfile, ip, host_key))
595 				log("Failed to add the %s host key for IP address '%.128s' to the list of known hosts (%.30s).",
596 				    type, ip, user_hostfile);
597 			else
598 				log("Warning: Permanently added the %s host key for IP address '%.128s' to the list of known hosts.",
599 				    type, ip);
600 		}
601 		break;
602 	case HOST_NEW:
603 		/* The host is new. */
604 		if (options.strict_host_key_checking == 1) {
605 			/* User has requested strict host key checking.  We will not add the host key
606 			   automatically.  The only alternative left is to abort. */
607 			fatal("No %s host key is known for %.200s and you have requested strict checking.", type, host);
608 		} else if (options.strict_host_key_checking == 2) {
609 			/* The default */
610 			char prompt[1024];
611 			fp = key_fingerprint(host_key, SSH_FP_MD5, SSH_FP_HEX);
612 			snprintf(prompt, sizeof(prompt),
613 			    "The authenticity of host '%.200s (%s)' can't be established.\n"
614 			    "%s key fingerprint is %s.\n"
615 			    "Are you sure you want to continue connecting (yes/no)? ",
616 			    host, ip, type, fp);
617 			xfree(fp);
618 			if (!read_yes_or_no(prompt, -1))
619 				fatal("Aborted by user!");
620 		}
621 		if (options.check_host_ip && ip_status == HOST_NEW) {
622 			snprintf(hostline, sizeof(hostline), "%s,%s", host, ip);
623 			hostp = hostline;
624 		} else
625 			hostp = host;
626 
627 		/* If not in strict mode, add the key automatically to the local known_hosts file. */
628 		if (!add_host_to_hostfile(user_hostfile, hostp, host_key))
629 			log("Failed to add the host to the list of known hosts (%.500s).",
630 			    user_hostfile);
631 		else
632 			log("Warning: Permanently added '%.200s' (%s) to the list of known hosts.",
633 			    hostp, type);
634 		break;
635 	case HOST_CHANGED:
636 		if (options.check_host_ip && host_ip_differ) {
637 			char *msg;
638 			if (ip_status == HOST_NEW)
639 				msg = "is unknown";
640 			else if (ip_status == HOST_OK)
641 				msg = "is unchanged";
642 			else
643 				msg = "has a different value";
644 			error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
645 			error("@       WARNING: POSSIBLE DNS SPOOFING DETECTED!          @");
646 			error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
647 			error("The %s host key for %s has changed,", type, host);
648 			error("and the key for the according IP address %s", ip);
649 			error("%s. This could either mean that", msg);
650 			error("DNS SPOOFING is happening or the IP address for the host");
651 			error("and its host key have changed at the same time.");
652 			if (ip_status != HOST_NEW)
653 				error("Offending key for IP in %s:%d", ip_file, ip_line);
654 		}
655 		/* The host key has changed. */
656 		fp = key_fingerprint(host_key, SSH_FP_MD5, SSH_FP_HEX);
657 		error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
658 		error("@    WARNING: REMOTE HOST IDENTIFICATION HAS CHANGED!     @");
659 		error("@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@");
660 		error("IT IS POSSIBLE THAT SOMEONE IS DOING SOMETHING NASTY!");
661 		error("Someone could be eavesdropping on you right now (man-in-the-middle attack)!");
662 		error("It is also possible that the %s host key has just been changed.", type);
663 		error("The fingerprint for the %s key sent by the remote host is\n%s.",
664 		    type, fp);
665 		error("Please contact your system administrator.");
666 		error("Add correct host key in %.100s to get rid of this message.",
667 		    user_hostfile);
668 		error("Offending key in %s:%d", host_file, host_line);
669 		xfree(fp);
670 
671 		/*
672 		 * If strict host key checking is in use, the user will have
673 		 * to edit the key manually and we can only abort.
674 		 */
675 		if (options.strict_host_key_checking)
676 			fatal("%s host key for %.200s has changed and you have requested strict checking.", type, host);
677 
678 		/*
679 		 * If strict host key checking has not been requested, allow
680 		 * the connection but without password authentication or
681 		 * agent forwarding.
682 		 */
683 		if (options.password_authentication) {
684 			error("Password authentication is disabled to avoid trojan horses.");
685 			options.password_authentication = 0;
686 		}
687 		if (options.forward_agent) {
688 			error("Agent forwarding is disabled to avoid trojan horses.");
689 			options.forward_agent = 0;
690 		}
691 		if (options.forward_x11) {
692 			error("X11 forwarding is disabled to avoid trojan horses.");
693 			options.forward_x11 = 0;
694 		}
695 		if (options.num_local_forwards > 0 || options.num_remote_forwards > 0) {
696 			error("Port forwarding is disabled to avoid trojan horses.");
697 			options.num_local_forwards = options.num_remote_forwards = 0;
698 		}
699 		/*
700 		 * XXX Should permit the user to change to use the new id.
701 		 * This could be done by converting the host key to an
702 		 * identifying sentence, tell that the host identifies itself
703 		 * by that sentence, and ask the user if he/she whishes to
704 		 * accept the authentication.
705 		 */
706 		break;
707 	}
708 
709 	if (options.check_host_ip && host_status != HOST_CHANGED &&
710 	    ip_status == HOST_CHANGED) {
711 		log("Warning: the %s host key for '%.200s' "
712 		    "differs from the key for the IP address '%.128s'",
713 		    type, host, ip);
714 		if (host_status == HOST_OK)
715 			log("Matching host key in %s:%d", host_file, host_line);
716 		log("Offending key for IP in %s:%d", ip_file, ip_line);
717 		if (options.strict_host_key_checking == 1) {
718 			fatal("Exiting, you have requested strict checking.");
719 		} else if (options.strict_host_key_checking == 2) {
720 			if (!read_yes_or_no("Are you sure you want " \
721 			    "to continue connecting (yes/no)? ", -1))
722 				fatal("Aborted by user!");
723 		}
724 	}
725 
726 	xfree(ip);
727 }
728 
729 #ifdef KRB5
730 int
731 try_krb5_authentication(krb5_context *context, krb5_auth_context *auth_context)
732 {
733   krb5_error_code problem;
734   const char *tkfile;
735   struct stat buf;
736   krb5_ccache ccache = NULL;
737   const char *remotehost;
738   krb5_data ap;
739   int type, payload_len;
740   krb5_ap_rep_enc_part *reply = NULL;
741   int ret;
742 
743   memset(&ap, 0, sizeof(ap));
744 
745   problem = krb5_init_context(context);
746   if (problem) {
747      ret = 0;
748      goto out;
749   }
750 
751   tkfile = krb5_cc_default_name(*context);
752   if (strncmp(tkfile, "FILE:", 5) == 0)
753      tkfile += 5;
754 
755   if (stat(tkfile, &buf) == 0 && getuid() != buf.st_uid) {
756     debug("Kerberos V5: could not get default ccache (permission denied).");
757     ret = 0;
758     goto out;
759   }
760 
761   problem = krb5_cc_default(*context, &ccache);
762   if (problem) {
763      ret = 0;
764      goto out;
765   }
766 
767   remotehost = get_canonical_hostname(1);
768 
769   problem = krb5_mk_req(*context, auth_context, AP_OPTS_MUTUAL_REQUIRED,
770 			"host", remotehost, NULL, ccache, &ap);
771   if (problem) {
772      ret = 0;
773      goto out;
774   }
775 
776   packet_start(SSH_CMSG_AUTH_KERBEROS);
777   packet_put_string((char *) ap.data, ap.length);
778   packet_send();
779   packet_write_wait();
780 
781   xfree(ap.data);
782   ap.length = 0;
783 
784   type = packet_read(&payload_len);
785    switch (type) {
786         case SSH_SMSG_FAILURE:
787                 /* Should really be SSH_SMSG_AUTH_KERBEROS_FAILURE */
788                 debug("Kerberos V5 authentication failed.");
789                 ret = 0;
790                 break;
791 
792          case SSH_SMSG_AUTH_KERBEROS_RESPONSE:
793                 /* SSH_SMSG_AUTH_KERBEROS_SUCCESS */
794                 debug("Kerberos V5 authentication accepted.");
795 
796                 /* Get server's response. */
797                 ap.data = packet_get_string((unsigned int *) &ap.length);
798 
799                 packet_integrity_check(payload_len, 4 + ap.length, type);
800                 /* XXX je to dobre? */
801 
802                 problem = krb5_rd_rep(*context, *auth_context, &ap, &reply);
803                 if (problem) {
804 		   ret = 0;
805                 }
806 		ret = 1;
807 		break;
808 
809 	default:
810 		packet_disconnect("Protocol error on Kerberos V5 response: %d", type);
811 		ret = 0;
812 		break;
813 
814    }
815 
816 out:
817    if (ccache != NULL)
818        krb5_cc_close(*context, ccache);
819    if (reply != NULL)
820       krb5_free_ap_rep_enc_part(*context, reply);
821    if (ap.length > 0)
822       krb5_data_free(&ap);
823 
824    return ret;
825 
826 }
827 
828 void
829 send_krb5_tgt(krb5_context context, krb5_auth_context auth_context)
830 {
831   int fd;
832   int type, payload_len;
833   krb5_error_code problem;
834   krb5_data outbuf;
835   krb5_ccache ccache = NULL;
836   krb5_creds creds;
837   krb5_kdc_flags flags;
838   const char *remotehost = get_canonical_hostname(1);
839 
840   memset(&creds, 0, sizeof(creds));
841   memset(&outbuf, 0, sizeof(outbuf));
842 
843   fd = packet_get_connection_in();
844   problem = krb5_auth_con_setaddrs_from_fd(context, auth_context, &fd);
845   if (problem) {
846      goto out;
847   }
848 
849 #if 0
850   tkfile = krb5_cc_default_name(context);
851   if (strncmp(tkfile, "FILE:", 5) == 0)
852      tkfile += 5;
853 
854   if (stat(tkfile, &buf) == 0 && getuid() != buf.st_uid) {
855      debug("Kerberos V5: could not get default ccache (permission denied).");
856      goto out;
857   }
858 #endif
859 
860   problem = krb5_cc_default(context, &ccache);
861   if (problem) {
862      goto out;
863   }
864 
865   problem = krb5_cc_get_principal(context, ccache, &creds.client);
866   if (problem) {
867      goto out;
868   }
869 
870   problem = krb5_build_principal(context, &creds.server,
871 	                         strlen(creds.client->realm),
872 				 creds.client->realm,
873 				 "krbtgt",
874 				 creds.client->realm,
875 				 NULL);
876   if (problem) {
877      goto out;
878   }
879 
880   creds.times.endtime = 0;
881 
882   flags.i = 0;
883   flags.b.forwarded = 1;
884   flags.b.forwardable = krb5_config_get_bool(context,  NULL,
885 	                  "libdefaults", "forwardable", NULL);
886 
887   problem = krb5_get_forwarded_creds (context,
888 	                              auth_context,
889 				      ccache,
890 				      flags.i,
891 				      remotehost,
892 				      &creds,
893 				      &outbuf);
894   if (problem) {
895      goto out;
896   }
897 
898   packet_start(SSH_CMSG_HAVE_KERBEROS_TGT);
899   packet_put_string((char *)outbuf.data, outbuf.length);
900   packet_send();
901   packet_write_wait();
902 
903   type = packet_read(&payload_len);
904   switch (type) {
905      case SSH_SMSG_SUCCESS:
906 	break;
907      case SSH_SMSG_FAILURE:
908 	break;
909      default:
910 	break;
911   }
912 
913 out:
914   if (creds.client)
915      krb5_free_principal(context, creds.client);
916   if (creds.server)
917      krb5_free_principal(context, creds.server);
918   if (ccache)
919      krb5_cc_close(context, ccache);
920   if (outbuf.data)
921      xfree(outbuf.data);
922 
923   return;
924 }
925 #endif /* KRB5 */
926 
927 /*
928  * Starts a dialog with the server, and authenticates the current user on the
929  * server.  This does not need any extra privileges.  The basic connection
930  * to the server must already have been established before this is called.
931  * If login fails, this function prints an error and never returns.
932  * This function does not require super-user privileges.
933  */
934 void
935 ssh_login(Key **keys, int nkeys, const char *orighost,
936     struct sockaddr *hostaddr, struct passwd *pw)
937 {
938 	char *host, *cp;
939 	char *server_user, *local_user;
940 
941 	local_user = xstrdup(pw->pw_name);
942 	server_user = options.user ? options.user : local_user;
943 
944 	/* Convert the user-supplied hostname into all lowercase. */
945 	host = xstrdup(orighost);
946 	for (cp = host; *cp; cp++)
947 		if (isupper(*cp))
948 			*cp = tolower(*cp);
949 
950 	/* Exchange protocol version identification strings with the server. */
951 	ssh_exchange_identification();
952 
953 	/* Put the connection into non-blocking mode. */
954 	packet_set_nonblocking();
955 
956 	/* key exchange */
957 	/* authenticate user */
958 	if (compat20) {
959 		ssh_kex2(host, hostaddr);
960 		ssh_userauth2(local_user, server_user, host, keys, nkeys);
961 	} else {
962 		ssh_kex(host, hostaddr);
963 		ssh_userauth1(local_user, server_user, host, keys, nkeys);
964 	}
965 }
966 
967 void
968 ssh_put_password(char *password)
969 {
970 	int size;
971 	char *padded;
972 
973 	if (datafellows & SSH_BUG_PASSWORDPAD) {
974 		packet_put_string(password, strlen(password));
975 		return;
976 	}
977 	size = roundup(strlen(password) + 1, 32);
978 	padded = xmalloc(size);
979 	memset(padded, 0, size);
980 	strlcpy(padded, password, size);
981 	packet_put_string(padded, size);
982 	memset(padded, 0, size);
983 	xfree(padded);
984 }
985