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