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