9d43bb74fc3295d4988cdbb6924b172a69cd34ab
[dragonfly.git] / crypto / openssh / ssh.c
1 /* $OpenBSD: ssh.c,v 1.324 2009/02/12 03:00:56 djm 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  * Ssh client program.  This program can be used to log into a remote machine.
7  * The software supports strong authentication, encryption, and forwarding
8  * of X11, TCP/IP, and authentication connections.
9  *
10  * As far as I am concerned, the code I have written for this software
11  * can be used freely for any purpose.  Any derived versions of this
12  * software must be clearly marked as such, and if the derived work is
13  * incompatible with the protocol description in the RFC file, it must be
14  * called by a name other than "ssh" or "Secure Shell".
15  *
16  * Copyright (c) 1999 Niels Provos.  All rights reserved.
17  * Copyright (c) 2000, 2001, 2002, 2003 Markus Friedl.  All rights reserved.
18  *
19  * Modified to work with SSL by Niels Provos <provos@citi.umich.edu>
20  * in Canada (German citizen).
21  *
22  * Redistribution and use in source and binary forms, with or without
23  * modification, are permitted provided that the following conditions
24  * are met:
25  * 1. Redistributions of source code must retain the above copyright
26  *    notice, this list of conditions and the following disclaimer.
27  * 2. Redistributions in binary form must reproduce the above copyright
28  *    notice, this list of conditions and the following disclaimer in the
29  *    documentation and/or other materials provided with the distribution.
30  *
31  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
32  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
33  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
34  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
35  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
36  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
37  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
38  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
39  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
40  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
41  */
42
43 #include "includes.h"
44
45 #include <sys/types.h>
46 #ifdef HAVE_SYS_STAT_H
47 # include <sys/stat.h>
48 #endif
49 #include <sys/resource.h>
50 #include <sys/ioctl.h>
51 #include <sys/socket.h>
52
53 #include <ctype.h>
54 #include <errno.h>
55 #include <fcntl.h>
56 #include <netdb.h>
57 #ifdef HAVE_PATHS_H
58 #include <paths.h>
59 #endif
60 #include <pwd.h>
61 #include <signal.h>
62 #include <stdarg.h>
63 #include <stddef.h>
64 #include <stdio.h>
65 #include <stdlib.h>
66 #include <string.h>
67 #include <unistd.h>
68
69 #include <netinet/in.h>
70 #include <arpa/inet.h>
71
72 #include <openssl/evp.h>
73 #include <openssl/err.h>
74 #include "openbsd-compat/openssl-compat.h"
75 #include "openbsd-compat/sys-queue.h"
76
77 #include "xmalloc.h"
78 #include "ssh.h"
79 #include "ssh1.h"
80 #include "ssh2.h"
81 #include "compat.h"
82 #include "cipher.h"
83 #include "packet.h"
84 #include "buffer.h"
85 #include "channels.h"
86 #include "key.h"
87 #include "authfd.h"
88 #include "authfile.h"
89 #include "pathnames.h"
90 #include "dispatch.h"
91 #include "clientloop.h"
92 #include "log.h"
93 #include "readconf.h"
94 #include "sshconnect.h"
95 #include "misc.h"
96 #include "kex.h"
97 #include "mac.h"
98 #include "sshpty.h"
99 #include "match.h"
100 #include "msg.h"
101 #include "uidswap.h"
102 #include "version.h"
103
104 #ifdef SMARTCARD
105 #include "scard.h"
106 #endif
107
108 extern char *__progname;
109
110 /* Flag indicating whether debug mode is on.  May be set on the command line. */
111 int debug_flag = 0;
112
113 /* Flag indicating whether a tty should be allocated */
114 int tty_flag = 0;
115 int no_tty_flag = 0;
116 int force_tty_flag = 0;
117
118 /* don't exec a shell */
119 int no_shell_flag = 0;
120
121 /*
122  * Flag indicating that nothing should be read from stdin.  This can be set
123  * on the command line.
124  */
125 int stdin_null_flag = 0;
126
127 /*
128  * Flag indicating that ssh should fork after authentication.  This is useful
129  * so that the passphrase can be entered manually, and then ssh goes to the
130  * background.
131  */
132 int fork_after_authentication_flag = 0;
133
134 /*
135  * General data structure for command line options and options configurable
136  * in configuration files.  See readconf.h.
137  */
138 Options options;
139
140 /* optional user configfile */
141 char *config = NULL;
142
143 /*
144  * Name of the host we are connecting to.  This is the name given on the
145  * command line, or the HostName specified for the user-supplied name in a
146  * configuration file.
147  */
148 char *host;
149
150 /* socket address the host resolves to */
151 struct sockaddr_storage hostaddr;
152
153 /* Private host keys. */
154 Sensitive sensitive_data;
155
156 /* Original real UID. */
157 uid_t original_real_uid;
158 uid_t original_effective_uid;
159
160 /* command to be executed */
161 Buffer command;
162
163 /* Should we execute a command or invoke a subsystem? */
164 int subsystem_flag = 0;
165
166 /* # of replies received for global requests */
167 static int remote_forward_confirms_received = 0;
168
169 /* pid of proxycommand child process */
170 pid_t proxy_command_pid = 0;
171
172 /* mux.c */
173 extern int muxserver_sock;
174 extern u_int muxclient_command;
175
176 /* Prints a help message to the user.  This function never returns. */
177
178 static void
179 usage(void)
180 {
181         fprintf(stderr,
182 "usage: ssh [-1246AaCfgKkMNnqsTtVvXxYy] [-b bind_address] [-c cipher_spec]\n"
183 "           [-D [bind_address:]port] [-e escape_char] [-F configfile]\n"
184 "           [-i identity_file] [-L [bind_address:]port:host:hostport]\n"
185 "           [-l login_name] [-m mac_spec] [-O ctl_cmd] [-o option] [-p port]\n"
186 "           [-R [bind_address:]port:host:hostport] [-S ctl_path]\n"
187 "           [-w local_tun[:remote_tun]] [user@]hostname [command]\n"
188         );
189         exit(255);
190 }
191
192 static int ssh_session(void);
193 static int ssh_session2(void);
194 static void load_public_identity_files(void);
195
196 /* from muxclient.c */
197 void muxclient(const char *);
198 void muxserver_listen(void);
199
200 /*
201  * Main program for the ssh client.
202  */
203 int
204 main(int ac, char **av)
205 {
206         int i, opt, exit_status, use_syslog;
207         char *p, *cp, *line, buf[256];
208         struct stat st;
209         struct passwd *pw;
210         int dummy, timeout_ms;
211         extern int optind, optreset;
212         extern char *optarg;
213         struct servent *sp;
214         Forward fwd;
215
216         /* Ensure that fds 0, 1 and 2 are open or directed to /dev/null */
217         sanitise_stdfd();
218
219         __progname = ssh_get_progname(av[0]);
220         init_rng();
221
222         /*
223          * Save the original real uid.  It will be needed later (uid-swapping
224          * may clobber the real uid).
225          */
226         original_real_uid = getuid();
227         original_effective_uid = geteuid();
228
229         /*
230          * Use uid-swapping to give up root privileges for the duration of
231          * option processing.  We will re-instantiate the rights when we are
232          * ready to create the privileged port, and will permanently drop
233          * them when the port has been created (actually, when the connection
234          * has been made, as we may need to create the port several times).
235          */
236         PRIV_END;
237
238 #ifdef HAVE_SETRLIMIT
239         /* If we are installed setuid root be careful to not drop core. */
240         if (original_real_uid != original_effective_uid) {
241                 struct rlimit rlim;
242                 rlim.rlim_cur = rlim.rlim_max = 0;
243                 if (setrlimit(RLIMIT_CORE, &rlim) < 0)
244                         fatal("setrlimit failed: %.100s", strerror(errno));
245         }
246 #endif
247         /* Get user data. */
248         pw = getpwuid(original_real_uid);
249         if (!pw) {
250                 logit("You don't exist, go away!");
251                 exit(255);
252         }
253         /* Take a copy of the returned structure. */
254         pw = pwcopy(pw);
255
256         /*
257          * Set our umask to something reasonable, as some files are created
258          * with the default umask.  This will make them world-readable but
259          * writable only by the owner, which is ok for all files for which we
260          * don't set the modes explicitly.
261          */
262         umask(022);
263
264         /*
265          * Initialize option structure to indicate that no values have been
266          * set.
267          */
268         initialize_options(&options);
269
270         /* Parse command-line arguments. */
271         host = NULL;
272         use_syslog = 0;
273
274  again:
275         while ((opt = getopt(ac, av, "1246ab:c:e:fgi:kl:m:no:p:qstvx"
276             "ACD:F:I:KL:MNO:PR:S:TVw:XYy")) != -1) {
277                 switch (opt) {
278                 case '1':
279                         options.protocol = SSH_PROTO_1;
280                         break;
281                 case '2':
282                         options.protocol = SSH_PROTO_2;
283                         break;
284                 case '4':
285                         options.address_family = AF_INET;
286                         break;
287                 case '6':
288                         options.address_family = AF_INET6;
289                         break;
290                 case 'n':
291                         stdin_null_flag = 1;
292                         break;
293                 case 'f':
294                         fork_after_authentication_flag = 1;
295                         stdin_null_flag = 1;
296                         break;
297                 case 'x':
298                         options.forward_x11 = 0;
299                         break;
300                 case 'X':
301                         options.forward_x11 = 1;
302                         break;
303                 case 'y':
304                         use_syslog = 1;
305                         break;
306                 case 'Y':
307                         options.forward_x11 = 1;
308                         options.forward_x11_trusted = 1;
309                         break;
310                 case 'g':
311                         options.gateway_ports = 1;
312                         break;
313                 case 'O':
314                         if (strcmp(optarg, "check") == 0)
315                                 muxclient_command = SSHMUX_COMMAND_ALIVE_CHECK;
316                         else if (strcmp(optarg, "exit") == 0)
317                                 muxclient_command = SSHMUX_COMMAND_TERMINATE;
318                         else
319                                 fatal("Invalid multiplex command.");
320                         break;
321                 case 'P':       /* deprecated */
322                         options.use_privileged_port = 0;
323                         break;
324                 case 'a':
325                         options.forward_agent = 0;
326                         break;
327                 case 'A':
328                         options.forward_agent = 1;
329                         break;
330                 case 'k':
331                         options.gss_deleg_creds = 0;
332                         break;
333                 case 'K':
334                         options.gss_authentication = 1;
335                         options.gss_deleg_creds = 1;
336                         break;
337                 case 'i':
338                         if (stat(optarg, &st) < 0) {
339                                 fprintf(stderr, "Warning: Identity file %s "
340                                     "not accessible: %s.\n", optarg,
341                                     strerror(errno));
342                                 break;
343                         }
344                         if (options.num_identity_files >=
345                             SSH_MAX_IDENTITY_FILES)
346                                 fatal("Too many identity files specified "
347                                     "(max %d)", SSH_MAX_IDENTITY_FILES);
348                         options.identity_files[options.num_identity_files++] =
349                             xstrdup(optarg);
350                         break;
351                 case 'I':
352 #ifdef SMARTCARD
353                         options.smartcard_device = xstrdup(optarg);
354 #else
355                         fprintf(stderr, "no support for smartcards.\n");
356 #endif
357                         break;
358                 case 't':
359                         if (tty_flag)
360                                 force_tty_flag = 1;
361                         tty_flag = 1;
362                         break;
363                 case 'v':
364                         if (debug_flag == 0) {
365                                 debug_flag = 1;
366                                 options.log_level = SYSLOG_LEVEL_DEBUG1;
367                         } else {
368                                 if (options.log_level < SYSLOG_LEVEL_DEBUG3)
369                                         options.log_level++;
370                                 break;
371                         }
372                         /* FALLTHROUGH */
373                 case 'V':
374                         fprintf(stderr, "%s, %s\n",
375                             SSH_RELEASE, SSLeay_version(SSLEAY_VERSION));
376                         if (opt == 'V')
377                                 exit(0);
378                         break;
379                 case 'w':
380                         if (options.tun_open == -1)
381                                 options.tun_open = SSH_TUNMODE_DEFAULT;
382                         options.tun_local = a2tun(optarg, &options.tun_remote);
383                         if (options.tun_local == SSH_TUNID_ERR) {
384                                 fprintf(stderr,
385                                     "Bad tun device '%s'\n", optarg);
386                                 exit(255);
387                         }
388                         break;
389                 case 'q':
390                         options.log_level = SYSLOG_LEVEL_QUIET;
391                         break;
392                 case 'e':
393                         if (optarg[0] == '^' && optarg[2] == 0 &&
394                             (u_char) optarg[1] >= 64 &&
395                             (u_char) optarg[1] < 128)
396                                 options.escape_char = (u_char) optarg[1] & 31;
397                         else if (strlen(optarg) == 1)
398                                 options.escape_char = (u_char) optarg[0];
399                         else if (strcmp(optarg, "none") == 0)
400                                 options.escape_char = SSH_ESCAPECHAR_NONE;
401                         else {
402                                 fprintf(stderr, "Bad escape character '%s'.\n",
403                                     optarg);
404                                 exit(255);
405                         }
406                         break;
407                 case 'c':
408                         if (ciphers_valid(optarg)) {
409                                 /* SSH2 only */
410                                 options.ciphers = xstrdup(optarg);
411                                 options.cipher = SSH_CIPHER_INVALID;
412                         } else {
413                                 /* SSH1 only */
414                                 options.cipher = cipher_number(optarg);
415                                 if (options.cipher == -1) {
416                                         fprintf(stderr,
417                                             "Unknown cipher type '%s'\n",
418                                             optarg);
419                                         exit(255);
420                                 }
421                                 if (options.cipher == SSH_CIPHER_3DES)
422                                         options.ciphers = "3des-cbc";
423                                 else if (options.cipher == SSH_CIPHER_BLOWFISH)
424                                         options.ciphers = "blowfish-cbc";
425                                 else
426                                         options.ciphers = (char *)-1;
427                         }
428                         break;
429                 case 'm':
430                         if (mac_valid(optarg))
431                                 options.macs = xstrdup(optarg);
432                         else {
433                                 fprintf(stderr, "Unknown mac type '%s'\n",
434                                     optarg);
435                                 exit(255);
436                         }
437                         break;
438                 case 'M':
439                         if (options.control_master == SSHCTL_MASTER_YES)
440                                 options.control_master = SSHCTL_MASTER_ASK;
441                         else
442                                 options.control_master = SSHCTL_MASTER_YES;
443                         break;
444                 case 'p':
445                         options.port = a2port(optarg);
446                         if (options.port <= 0) {
447                                 fprintf(stderr, "Bad port '%s'\n", optarg);
448                                 exit(255);
449                         }
450                         break;
451                 case 'l':
452                         options.user = optarg;
453                         break;
454
455                 case 'L':
456                         if (parse_forward(&fwd, optarg, 0, 0))
457                                 add_local_forward(&options, &fwd);
458                         else {
459                                 fprintf(stderr,
460                                     "Bad local forwarding specification '%s'\n",
461                                     optarg);
462                                 exit(255);
463                         }
464                         break;
465
466                 case 'R':
467                         if (parse_forward(&fwd, optarg, 0, 1)) {
468                                 add_remote_forward(&options, &fwd);
469                         } else {
470                                 fprintf(stderr,
471                                     "Bad remote forwarding specification "
472                                     "'%s'\n", optarg);
473                                 exit(255);
474                         }
475                         break;
476
477                 case 'D':
478                         if (parse_forward(&fwd, optarg, 1, 0)) {
479                                 add_local_forward(&options, &fwd);
480                         } else {
481                                 fprintf(stderr,
482                                     "Bad dynamic forwarding specification "
483                                     "'%s'\n", optarg);
484                                 exit(255);
485                         }
486                         break;
487
488                 case 'C':
489                         options.compression = 1;
490                         break;
491                 case 'N':
492                         no_shell_flag = 1;
493                         no_tty_flag = 1;
494                         break;
495                 case 'T':
496                         no_tty_flag = 1;
497                         break;
498                 case 'o':
499                         dummy = 1;
500                         line = xstrdup(optarg);
501                         if (process_config_line(&options, host ? host : "",
502                             line, "command-line", 0, &dummy) != 0)
503                                 exit(255);
504                         xfree(line);
505                         break;
506                 case 's':
507                         subsystem_flag = 1;
508                         break;
509                 case 'S':
510                         if (options.control_path != NULL)
511                                 free(options.control_path);
512                         options.control_path = xstrdup(optarg);
513                         break;
514                 case 'b':
515                         options.bind_address = optarg;
516                         break;
517                 case 'F':
518                         config = optarg;
519                         break;
520                 default:
521                         usage();
522                 }
523         }
524
525         ac -= optind;
526         av += optind;
527
528         if (ac > 0 && !host && **av != '-') {
529                 if (strrchr(*av, '@')) {
530                         p = xstrdup(*av);
531                         cp = strrchr(p, '@');
532                         if (cp == NULL || cp == p)
533                                 usage();
534                         options.user = p;
535                         *cp = '\0';
536                         host = ++cp;
537                 } else
538                         host = *av;
539                 if (ac > 1) {
540                         optind = optreset = 1;
541                         goto again;
542                 }
543                 ac--, av++;
544         }
545
546         /* Check that we got a host name. */
547         if (!host)
548                 usage();
549
550         SSLeay_add_all_algorithms();
551         ERR_load_crypto_strings();
552
553         /* Initialize the command to execute on remote host. */
554         buffer_init(&command);
555
556         /*
557          * Save the command to execute on the remote host in a buffer. There
558          * is no limit on the length of the command, except by the maximum
559          * packet size.  Also sets the tty flag if there is no command.
560          */
561         if (!ac) {
562                 /* No command specified - execute shell on a tty. */
563                 tty_flag = 1;
564                 if (subsystem_flag) {
565                         fprintf(stderr,
566                             "You must specify a subsystem to invoke.\n");
567                         usage();
568                 }
569         } else {
570                 /* A command has been specified.  Store it into the buffer. */
571                 for (i = 0; i < ac; i++) {
572                         if (i)
573                                 buffer_append(&command, " ", 1);
574                         buffer_append(&command, av[i], strlen(av[i]));
575                 }
576         }
577
578         /* Cannot fork to background if no command. */
579         if (fork_after_authentication_flag && buffer_len(&command) == 0 &&
580             !no_shell_flag)
581                 fatal("Cannot fork into background without a command "
582                     "to execute.");
583
584         /* Allocate a tty by default if no command specified. */
585         if (buffer_len(&command) == 0)
586                 tty_flag = 1;
587
588         /* Force no tty */
589         if (no_tty_flag)
590                 tty_flag = 0;
591         /* Do not allocate a tty if stdin is not a tty. */
592         if ((!isatty(fileno(stdin)) || stdin_null_flag) && !force_tty_flag) {
593                 if (tty_flag)
594                         logit("Pseudo-terminal will not be allocated because "
595                             "stdin is not a terminal.");
596                 tty_flag = 0;
597         }
598
599         /*
600          * Initialize "log" output.  Since we are the client all output
601          * actually goes to stderr.
602          */
603         log_init(av[0],
604             options.log_level == -1 ? SYSLOG_LEVEL_INFO : options.log_level,
605             SYSLOG_FACILITY_USER, !use_syslog);
606
607         /*
608          * Read per-user configuration file.  Ignore the system wide config
609          * file if the user specifies a config file on the command line.
610          */
611         if (config != NULL) {
612                 if (!read_config_file(config, host, &options, 0))
613                         fatal("Can't open user config file %.100s: "
614                             "%.100s", config, strerror(errno));
615         } else {
616                 snprintf(buf, sizeof buf, "%.100s/%.100s", pw->pw_dir,
617                     _PATH_SSH_USER_CONFFILE);
618                 (void)read_config_file(buf, host, &options, 1);
619
620                 /* Read systemwide configuration file after use config. */
621                 (void)read_config_file(_PATH_HOST_CONFIG_FILE, host,
622                     &options, 0);
623         }
624
625         /* Fill configuration defaults. */
626         fill_default_options(&options);
627
628         channel_set_af(options.address_family);
629
630         /* reinit */
631         log_init(av[0], options.log_level, SYSLOG_FACILITY_USER, !use_syslog);
632
633         seed_rng();
634
635         if (options.user == NULL)
636                 options.user = xstrdup(pw->pw_name);
637
638         /* Get default port if port has not been set. */
639         if (options.port == 0) {
640                 sp = getservbyname(SSH_SERVICE_NAME, "tcp");
641                 options.port = sp ? ntohs(sp->s_port) : SSH_DEFAULT_PORT;
642         }
643
644         if (options.local_command != NULL) {
645                 char thishost[NI_MAXHOST];
646
647                 if (gethostname(thishost, sizeof(thishost)) == -1)
648                         fatal("gethostname: %s", strerror(errno));
649                 snprintf(buf, sizeof(buf), "%d", options.port);
650                 debug3("expanding LocalCommand: %s", options.local_command);
651                 cp = options.local_command;
652                 options.local_command = percent_expand(cp, "d", pw->pw_dir,
653                     "h", options.hostname? options.hostname : host,
654                     "l", thishost, "n", host, "r", options.user, "p", buf,
655                     "u", pw->pw_name, (char *)NULL);
656                 debug3("expanded LocalCommand: %s", options.local_command);
657                 xfree(cp);
658         }
659
660         if (options.hostname != NULL)
661                 host = options.hostname;
662
663         /* force lowercase for hostkey matching */
664         if (options.host_key_alias != NULL) {
665                 for (p = options.host_key_alias; *p; p++)
666                         if (isupper(*p))
667                                 *p = (char)tolower(*p);
668         }
669
670         if (options.proxy_command != NULL &&
671             strcmp(options.proxy_command, "none") == 0) {
672                 xfree(options.proxy_command);
673                 options.proxy_command = NULL;
674         }
675         if (options.control_path != NULL &&
676             strcmp(options.control_path, "none") == 0) {
677                 xfree(options.control_path);
678                 options.control_path = NULL;
679         }
680
681         if (options.control_path != NULL) {
682                 char thishost[NI_MAXHOST];
683
684                 if (gethostname(thishost, sizeof(thishost)) == -1)
685                         fatal("gethostname: %s", strerror(errno));
686                 snprintf(buf, sizeof(buf), "%d", options.port);
687                 cp = tilde_expand_filename(options.control_path,
688                     original_real_uid);
689                 xfree(options.control_path);
690                 options.control_path = percent_expand(cp, "p", buf, "h", host,
691                     "r", options.user, "l", thishost, (char *)NULL);
692                 xfree(cp);
693         }
694         if (muxclient_command != 0 && options.control_path == NULL)
695                 fatal("No ControlPath specified for \"-O\" command");
696         if (options.control_path != NULL)
697                 muxclient(options.control_path);
698
699         timeout_ms = options.connection_timeout * 1000;
700
701         /* Open a connection to the remote host. */
702         if (ssh_connect(host, &hostaddr, options.port,
703             options.address_family, options.connection_attempts, &timeout_ms,
704             options.tcp_keep_alive, 
705 #ifdef HAVE_CYGWIN
706             options.use_privileged_port,
707 #else
708             original_effective_uid == 0 && options.use_privileged_port,
709 #endif
710             options.proxy_command) != 0)
711                 exit(255);
712
713         if (timeout_ms > 0)
714                 debug3("timeout: %d ms remain after connect", timeout_ms);
715
716         /*
717          * If we successfully made the connection, load the host private key
718          * in case we will need it later for combined rsa-rhosts
719          * authentication. This must be done before releasing extra
720          * privileges, because the file is only readable by root.
721          * If we cannot access the private keys, load the public keys
722          * instead and try to execute the ssh-keysign helper instead.
723          */
724         sensitive_data.nkeys = 0;
725         sensitive_data.keys = NULL;
726         sensitive_data.external_keysign = 0;
727         if (options.rhosts_rsa_authentication ||
728             options.hostbased_authentication) {
729                 sensitive_data.nkeys = 3;
730                 sensitive_data.keys = xcalloc(sensitive_data.nkeys,
731                     sizeof(Key));
732
733                 PRIV_START;
734                 sensitive_data.keys[0] = key_load_private_type(KEY_RSA1,
735                     _PATH_HOST_KEY_FILE, "", NULL, NULL);
736                 sensitive_data.keys[1] = key_load_private_type(KEY_DSA,
737                     _PATH_HOST_DSA_KEY_FILE, "", NULL, NULL);
738                 sensitive_data.keys[2] = key_load_private_type(KEY_RSA,
739                     _PATH_HOST_RSA_KEY_FILE, "", NULL, NULL);
740                 PRIV_END;
741
742                 if (options.hostbased_authentication == 1 &&
743                     sensitive_data.keys[0] == NULL &&
744                     sensitive_data.keys[1] == NULL &&
745                     sensitive_data.keys[2] == NULL) {
746                         sensitive_data.keys[1] = key_load_public(
747                             _PATH_HOST_DSA_KEY_FILE, NULL);
748                         sensitive_data.keys[2] = key_load_public(
749                             _PATH_HOST_RSA_KEY_FILE, NULL);
750                         sensitive_data.external_keysign = 1;
751                 }
752         }
753         /*
754          * Get rid of any extra privileges that we may have.  We will no
755          * longer need them.  Also, extra privileges could make it very hard
756          * to read identity files and other non-world-readable files from the
757          * user's home directory if it happens to be on a NFS volume where
758          * root is mapped to nobody.
759          */
760         if (original_effective_uid == 0) {
761                 PRIV_START;
762                 permanently_set_uid(pw);
763         }
764
765         /*
766          * Now that we are back to our own permissions, create ~/.ssh
767          * directory if it doesn't already exist.
768          */
769         snprintf(buf, sizeof buf, "%.100s%s%.100s", pw->pw_dir,
770             strcmp(pw->pw_dir, "/") ? "/" : "", _PATH_SSH_USER_DIR);
771         if (stat(buf, &st) < 0)
772                 if (mkdir(buf, 0700) < 0)
773                         error("Could not create directory '%.200s'.", buf);
774
775         /* load options.identity_files */
776         load_public_identity_files();
777
778         /* Expand ~ in known host file names. */
779         /* XXX mem-leaks: */
780         options.system_hostfile =
781             tilde_expand_filename(options.system_hostfile, original_real_uid);
782         options.user_hostfile =
783             tilde_expand_filename(options.user_hostfile, original_real_uid);
784         options.system_hostfile2 =
785             tilde_expand_filename(options.system_hostfile2, original_real_uid);
786         options.user_hostfile2 =
787             tilde_expand_filename(options.user_hostfile2, original_real_uid);
788
789         signal(SIGPIPE, SIG_IGN); /* ignore SIGPIPE early */
790
791         /* Log into the remote system.  Never returns if the login fails. */
792         ssh_login(&sensitive_data, host, (struct sockaddr *)&hostaddr,
793             pw, timeout_ms);
794
795         /* We no longer need the private host keys.  Clear them now. */
796         if (sensitive_data.nkeys != 0) {
797                 for (i = 0; i < sensitive_data.nkeys; i++) {
798                         if (sensitive_data.keys[i] != NULL) {
799                                 /* Destroys contents safely */
800                                 debug3("clear hostkey %d", i);
801                                 key_free(sensitive_data.keys[i]);
802                                 sensitive_data.keys[i] = NULL;
803                         }
804                 }
805                 xfree(sensitive_data.keys);
806         }
807         for (i = 0; i < options.num_identity_files; i++) {
808                 if (options.identity_files[i]) {
809                         xfree(options.identity_files[i]);
810                         options.identity_files[i] = NULL;
811                 }
812                 if (options.identity_keys[i]) {
813                         key_free(options.identity_keys[i]);
814                         options.identity_keys[i] = NULL;
815                 }
816         }
817
818         exit_status = compat20 ? ssh_session2() : ssh_session();
819         packet_close();
820
821         if (options.control_path != NULL && muxserver_sock != -1)
822                 unlink(options.control_path);
823
824         /*
825          * Send SIGHUP to proxy command if used. We don't wait() in
826          * case it hangs and instead rely on init to reap the child
827          */
828         if (proxy_command_pid > 1)
829                 kill(proxy_command_pid, SIGHUP);
830
831         return exit_status;
832 }
833
834 /* Callback for remote forward global requests */
835 static void
836 ssh_confirm_remote_forward(int type, u_int32_t seq, void *ctxt)
837 {
838         Forward *rfwd = (Forward *)ctxt;
839
840         /* XXX verbose() on failure? */
841         debug("remote forward %s for: listen %d, connect %s:%d",
842             type == SSH2_MSG_REQUEST_SUCCESS ? "success" : "failure",
843             rfwd->listen_port, rfwd->connect_host, rfwd->connect_port);
844         if (type == SSH2_MSG_REQUEST_SUCCESS && rfwd->listen_port == 0) {
845                 logit("Allocated port %u for remote forward to %s:%d",
846                         packet_get_int(),
847                         rfwd->connect_host, rfwd->connect_port);
848         }
849         
850         if (type == SSH2_MSG_REQUEST_FAILURE) {
851                 if (options.exit_on_forward_failure)
852                         fatal("Error: remote port forwarding failed for "
853                             "listen port %d", rfwd->listen_port);
854                 else
855                         logit("Warning: remote port forwarding failed for "
856                             "listen port %d", rfwd->listen_port);
857         }
858         if (++remote_forward_confirms_received == options.num_remote_forwards) {
859                 debug("All remote forwarding requests processed");
860                 if (fork_after_authentication_flag) {
861                         fork_after_authentication_flag = 0;
862                         if (daemon(1, 1) < 0)
863                                 fatal("daemon() failed: %.200s",
864                                     strerror(errno));
865                 }
866         }
867 }
868
869 static void
870 ssh_init_forwarding(void)
871 {
872         int success = 0;
873         int i;
874
875         /* Initiate local TCP/IP port forwardings. */
876         for (i = 0; i < options.num_local_forwards; i++) {
877                 debug("Local connections to %.200s:%d forwarded to remote "
878                     "address %.200s:%d",
879                     (options.local_forwards[i].listen_host == NULL) ?
880                     (options.gateway_ports ? "*" : "LOCALHOST") :
881                     options.local_forwards[i].listen_host,
882                     options.local_forwards[i].listen_port,
883                     options.local_forwards[i].connect_host,
884                     options.local_forwards[i].connect_port);
885                 success += channel_setup_local_fwd_listener(
886                     options.local_forwards[i].listen_host,
887                     options.local_forwards[i].listen_port,
888                     options.local_forwards[i].connect_host,
889                     options.local_forwards[i].connect_port,
890                     options.gateway_ports);
891         }
892         if (i > 0 && success != i && options.exit_on_forward_failure)
893                 fatal("Could not request local forwarding.");
894         if (i > 0 && success == 0)
895                 error("Could not request local forwarding.");
896
897         /* Initiate remote TCP/IP port forwardings. */
898         for (i = 0; i < options.num_remote_forwards; i++) {
899                 debug("Remote connections from %.200s:%d forwarded to "
900                     "local address %.200s:%d",
901                     (options.remote_forwards[i].listen_host == NULL) ?
902                     "LOCALHOST" : options.remote_forwards[i].listen_host,
903                     options.remote_forwards[i].listen_port,
904                     options.remote_forwards[i].connect_host,
905                     options.remote_forwards[i].connect_port);
906                 if (channel_request_remote_forwarding(
907                     options.remote_forwards[i].listen_host,
908                     options.remote_forwards[i].listen_port,
909                     options.remote_forwards[i].connect_host,
910                     options.remote_forwards[i].connect_port) < 0) {
911                         if (options.exit_on_forward_failure)
912                                 fatal("Could not request remote forwarding.");
913                         else
914                                 logit("Warning: Could not request remote "
915                                     "forwarding.");
916                 }
917                 client_register_global_confirm(ssh_confirm_remote_forward,
918                     &options.remote_forwards[i]);
919         }
920
921         /* Initiate tunnel forwarding. */
922         if (options.tun_open != SSH_TUNMODE_NO) {
923                 if (client_request_tun_fwd(options.tun_open,
924                     options.tun_local, options.tun_remote) == -1) {
925                         if (options.exit_on_forward_failure)
926                                 fatal("Could not request tunnel forwarding.");
927                         else
928                                 error("Could not request tunnel forwarding.");
929                 }
930         }                       
931 }
932
933 static void
934 check_agent_present(void)
935 {
936         if (options.forward_agent) {
937                 /* Clear agent forwarding if we don't have an agent. */
938                 if (!ssh_agent_present())
939                         options.forward_agent = 0;
940         }
941 }
942
943 static int
944 ssh_session(void)
945 {
946         int type;
947         int interactive = 0;
948         int have_tty = 0;
949         struct winsize ws;
950         char *cp;
951         const char *display;
952
953         /* Enable compression if requested. */
954         if (options.compression) {
955                 debug("Requesting compression at level %d.",
956                     options.compression_level);
957
958                 if (options.compression_level < 1 ||
959                     options.compression_level > 9)
960                         fatal("Compression level must be from 1 (fast) to "
961                             "9 (slow, best).");
962
963                 /* Send the request. */
964                 packet_start(SSH_CMSG_REQUEST_COMPRESSION);
965                 packet_put_int(options.compression_level);
966                 packet_send();
967                 packet_write_wait();
968                 type = packet_read();
969                 if (type == SSH_SMSG_SUCCESS)
970                         packet_start_compression(options.compression_level);
971                 else if (type == SSH_SMSG_FAILURE)
972                         logit("Warning: Remote host refused compression.");
973                 else
974                         packet_disconnect("Protocol error waiting for "
975                             "compression response.");
976         }
977         /* Allocate a pseudo tty if appropriate. */
978         if (tty_flag) {
979                 debug("Requesting pty.");
980
981                 /* Start the packet. */
982                 packet_start(SSH_CMSG_REQUEST_PTY);
983
984                 /* Store TERM in the packet.  There is no limit on the
985                    length of the string. */
986                 cp = getenv("TERM");
987                 if (!cp)
988                         cp = "";
989                 packet_put_cstring(cp);
990
991                 /* Store window size in the packet. */
992                 if (ioctl(fileno(stdin), TIOCGWINSZ, &ws) < 0)
993                         memset(&ws, 0, sizeof(ws));
994                 packet_put_int((u_int)ws.ws_row);
995                 packet_put_int((u_int)ws.ws_col);
996                 packet_put_int((u_int)ws.ws_xpixel);
997                 packet_put_int((u_int)ws.ws_ypixel);
998
999                 /* Store tty modes in the packet. */
1000                 tty_make_modes(fileno(stdin), NULL);
1001
1002                 /* Send the packet, and wait for it to leave. */
1003                 packet_send();
1004                 packet_write_wait();
1005
1006                 /* Read response from the server. */
1007                 type = packet_read();
1008                 if (type == SSH_SMSG_SUCCESS) {
1009                         interactive = 1;
1010                         have_tty = 1;
1011                 } else if (type == SSH_SMSG_FAILURE)
1012                         logit("Warning: Remote host failed or refused to "
1013                             "allocate a pseudo tty.");
1014                 else
1015                         packet_disconnect("Protocol error waiting for pty "
1016                             "request response.");
1017         }
1018         /* Request X11 forwarding if enabled and DISPLAY is set. */
1019         display = getenv("DISPLAY");
1020         if (options.forward_x11 && display != NULL) {
1021                 char *proto, *data;
1022                 /* Get reasonable local authentication information. */
1023                 client_x11_get_proto(display, options.xauth_location,
1024                     options.forward_x11_trusted, &proto, &data);
1025                 /* Request forwarding with authentication spoofing. */
1026                 debug("Requesting X11 forwarding with authentication "
1027                     "spoofing.");
1028                 x11_request_forwarding_with_spoofing(0, display, proto, data);
1029
1030                 /* Read response from the server. */
1031                 type = packet_read();
1032                 if (type == SSH_SMSG_SUCCESS) {
1033                         interactive = 1;
1034                 } else if (type == SSH_SMSG_FAILURE) {
1035                         logit("Warning: Remote host denied X11 forwarding.");
1036                 } else {
1037                         packet_disconnect("Protocol error waiting for X11 "
1038                             "forwarding");
1039                 }
1040         }
1041         /* Tell the packet module whether this is an interactive session. */
1042         packet_set_interactive(interactive);
1043
1044         /* Request authentication agent forwarding if appropriate. */
1045         check_agent_present();
1046
1047         if (options.forward_agent) {
1048                 debug("Requesting authentication agent forwarding.");
1049                 auth_request_forwarding();
1050
1051                 /* Read response from the server. */
1052                 type = packet_read();
1053                 packet_check_eom();
1054                 if (type != SSH_SMSG_SUCCESS)
1055                         logit("Warning: Remote host denied authentication agent forwarding.");
1056         }
1057
1058         /* Initiate port forwardings. */
1059         ssh_init_forwarding();
1060
1061         /* Execute a local command */
1062         if (options.local_command != NULL &&
1063             options.permit_local_command)
1064                 ssh_local_cmd(options.local_command);
1065
1066         /*
1067          * If requested and we are not interested in replies to remote
1068          * forwarding requests, then let ssh continue in the background.
1069          */
1070         if (fork_after_authentication_flag &&
1071             (!options.exit_on_forward_failure ||
1072             options.num_remote_forwards == 0)) {
1073                 fork_after_authentication_flag = 0;
1074                 if (daemon(1, 1) < 0)
1075                         fatal("daemon() failed: %.200s", strerror(errno));
1076         }
1077
1078         /*
1079          * If a command was specified on the command line, execute the
1080          * command now. Otherwise request the server to start a shell.
1081          */
1082         if (buffer_len(&command) > 0) {
1083                 int len = buffer_len(&command);
1084                 if (len > 900)
1085                         len = 900;
1086                 debug("Sending command: %.*s", len,
1087                     (u_char *)buffer_ptr(&command));
1088                 packet_start(SSH_CMSG_EXEC_CMD);
1089                 packet_put_string(buffer_ptr(&command), buffer_len(&command));
1090                 packet_send();
1091                 packet_write_wait();
1092         } else {
1093                 debug("Requesting shell.");
1094                 packet_start(SSH_CMSG_EXEC_SHELL);
1095                 packet_send();
1096                 packet_write_wait();
1097         }
1098
1099         /* Enter the interactive session. */
1100         return client_loop(have_tty, tty_flag ?
1101             options.escape_char : SSH_ESCAPECHAR_NONE, 0);
1102 }
1103
1104 /* request pty/x11/agent/tcpfwd/shell for channel */
1105 static void
1106 ssh_session2_setup(int id, void *arg)
1107 {
1108         extern char **environ;
1109         const char *display;
1110         int interactive = tty_flag;
1111
1112         display = getenv("DISPLAY");
1113         if (options.forward_x11 && display != NULL) {
1114                 char *proto, *data;
1115                 /* Get reasonable local authentication information. */
1116                 client_x11_get_proto(display, options.xauth_location,
1117                     options.forward_x11_trusted, &proto, &data);
1118                 /* Request forwarding with authentication spoofing. */
1119                 debug("Requesting X11 forwarding with authentication "
1120                     "spoofing.");
1121                 x11_request_forwarding_with_spoofing(id, display, proto, data);
1122                 interactive = 1;
1123                 /* XXX wait for reply */
1124         }
1125
1126         check_agent_present();
1127         if (options.forward_agent) {
1128                 debug("Requesting authentication agent forwarding.");
1129                 channel_request_start(id, "auth-agent-req@openssh.com", 0);
1130                 packet_send();
1131         }
1132
1133         client_session2_setup(id, tty_flag, subsystem_flag, getenv("TERM"),
1134             NULL, fileno(stdin), &command, environ);
1135
1136         packet_set_interactive(interactive);
1137 }
1138
1139 /* open new channel for a session */
1140 static int
1141 ssh_session2_open(void)
1142 {
1143         Channel *c;
1144         int window, packetmax, in, out, err;
1145
1146         if (stdin_null_flag) {
1147                 in = open(_PATH_DEVNULL, O_RDONLY);
1148         } else {
1149                 in = dup(STDIN_FILENO);
1150         }
1151         out = dup(STDOUT_FILENO);
1152         err = dup(STDERR_FILENO);
1153
1154         if (in < 0 || out < 0 || err < 0)
1155                 fatal("dup() in/out/err failed");
1156
1157         /* enable nonblocking unless tty */
1158         if (!isatty(in))
1159                 set_nonblock(in);
1160         if (!isatty(out))
1161                 set_nonblock(out);
1162         if (!isatty(err))
1163                 set_nonblock(err);
1164
1165         window = CHAN_SES_WINDOW_DEFAULT;
1166         packetmax = CHAN_SES_PACKET_DEFAULT;
1167         if (tty_flag) {
1168                 window >>= 1;
1169                 packetmax >>= 1;
1170         }
1171         c = channel_new(
1172             "session", SSH_CHANNEL_OPENING, in, out, err,
1173             window, packetmax, CHAN_EXTENDED_WRITE,
1174             "client-session", /*nonblock*/0);
1175
1176         debug3("ssh_session2_open: channel_new: %d", c->self);
1177
1178         channel_send_open(c->self);
1179         if (!no_shell_flag)
1180                 channel_register_open_confirm(c->self,
1181                     ssh_session2_setup, NULL);
1182
1183         return c->self;
1184 }
1185
1186 static int
1187 ssh_session2(void)
1188 {
1189         int id = -1;
1190
1191         /* XXX should be pre-session */
1192         ssh_init_forwarding();
1193
1194         if (!no_shell_flag || (datafellows & SSH_BUG_DUMMYCHAN))
1195                 id = ssh_session2_open();
1196
1197         /* If we don't expect to open a new session, then disallow it */
1198         if (options.control_master == SSHCTL_MASTER_NO &&
1199             (datafellows & SSH_NEW_OPENSSH)) {
1200                 debug("Requesting no-more-sessions@openssh.com");
1201                 packet_start(SSH2_MSG_GLOBAL_REQUEST);
1202                 packet_put_cstring("no-more-sessions@openssh.com");
1203                 packet_put_char(0);
1204                 packet_send();
1205         }
1206
1207         /* Execute a local command */
1208         if (options.local_command != NULL &&
1209             options.permit_local_command)
1210                 ssh_local_cmd(options.local_command);
1211
1212         /* Start listening for multiplex clients */
1213         muxserver_listen();
1214
1215         /* If requested, let ssh continue in the background. */
1216         if (fork_after_authentication_flag) {
1217                 fork_after_authentication_flag = 0;
1218                 if (daemon(1, 1) < 0)
1219                         fatal("daemon() failed: %.200s", strerror(errno));
1220         }
1221
1222         return client_loop(tty_flag, tty_flag ?
1223             options.escape_char : SSH_ESCAPECHAR_NONE, id);
1224 }
1225
1226 static void
1227 load_public_identity_files(void)
1228 {
1229         char *filename, *cp, thishost[NI_MAXHOST];
1230         char *pwdir = NULL, *pwname = NULL;
1231         int i = 0;
1232         Key *public;
1233         struct passwd *pw;
1234 #ifdef SMARTCARD
1235         Key **keys;
1236
1237         if (options.smartcard_device != NULL &&
1238             options.num_identity_files < SSH_MAX_IDENTITY_FILES &&
1239             (keys = sc_get_keys(options.smartcard_device, NULL)) != NULL) {
1240                 int count = 0;
1241                 for (i = 0; keys[i] != NULL; i++) {
1242                         count++;
1243                         memmove(&options.identity_files[1],
1244                             &options.identity_files[0],
1245                             sizeof(char *) * (SSH_MAX_IDENTITY_FILES - 1));
1246                         memmove(&options.identity_keys[1],
1247                             &options.identity_keys[0],
1248                             sizeof(Key *) * (SSH_MAX_IDENTITY_FILES - 1));
1249                         options.num_identity_files++;
1250                         options.identity_keys[0] = keys[i];
1251                         options.identity_files[0] = sc_get_key_label(keys[i]);
1252                 }
1253                 if (options.num_identity_files > SSH_MAX_IDENTITY_FILES)
1254                         options.num_identity_files = SSH_MAX_IDENTITY_FILES;
1255                 i = count;
1256                 xfree(keys);
1257         }
1258 #endif /* SMARTCARD */
1259         if ((pw = getpwuid(original_real_uid)) == NULL)
1260                 fatal("load_public_identity_files: getpwuid failed");
1261         pwname = xstrdup(pw->pw_name);
1262         pwdir = xstrdup(pw->pw_dir);
1263         if (gethostname(thishost, sizeof(thishost)) == -1)
1264                 fatal("load_public_identity_files: gethostname: %s",
1265                     strerror(errno));
1266         for (; i < options.num_identity_files; i++) {
1267                 cp = tilde_expand_filename(options.identity_files[i],
1268                     original_real_uid);
1269                 filename = percent_expand(cp, "d", pwdir,
1270                     "u", pwname, "l", thishost, "h", host,
1271                     "r", options.user, (char *)NULL);
1272                 xfree(cp);
1273                 public = key_load_public(filename, NULL);
1274                 debug("identity file %s type %d", filename,
1275                     public ? public->type : -1);
1276                 xfree(options.identity_files[i]);
1277                 options.identity_files[i] = filename;
1278                 options.identity_keys[i] = public;
1279         }
1280         bzero(pwname, strlen(pwname));
1281         xfree(pwname);
1282         bzero(pwdir, strlen(pwdir));
1283         xfree(pwdir);
1284 }