crypto/openssh/ssh.c

   1 /* $OpenBSD: ssh.c,v 1.585 2023/02/10 04:40:28 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 SSLeay 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 #include <sys/wait.h>
  53
  54 #include <ctype.h>
  55 #include <errno.h>
  56 #include <fcntl.h>
  57 #include <netdb.h>
  58 #ifdef HAVE_PATHS_H
  59 #include <paths.h>
  60 #endif
  61 #include <pwd.h>
  62 #include <signal.h>
  63 #include <stdarg.h>
  64 #include <stddef.h>
  65 #include <stdio.h>
  66 #include <stdlib.h>
  67 #include <string.h>
  68 #include <stdarg.h>
  69 #include <unistd.h>
  70 #include <limits.h>
  71 #include <locale.h>
  72
  73 #include <netinet/in.h>
  74 #include <arpa/inet.h>
  75
  76 #ifdef WITH_OPENSSL
  77 #include <openssl/evp.h>
  78 #include <openssl/err.h>
  79 #endif
  80 #include "openbsd-compat/openssl-compat.h"
  81 #include "openbsd-compat/sys-queue.h"
  82
  83 #include "xmalloc.h"
  84 #include "ssh.h"
  85 #include "ssh2.h"
  86 #include "canohost.h"
  87 #include "compat.h"
  88 #include "cipher.h"
  89 #include "packet.h"
  90 #include "sshbuf.h"
  91 #include "channels.h"
  92 #include "sshkey.h"
  93 #include "authfd.h"
  94 #include "authfile.h"
  95 #include "pathnames.h"
  96 #include "dispatch.h"
  97 #include "clientloop.h"
  98 #include "log.h"
  99 #include "misc.h"
 100 #include "readconf.h"
 101 #include "sshconnect.h"
 102 #include "kex.h"
 103 #include "mac.h"
 104 #include "sshpty.h"
 105 #include "match.h"
 106 #include "msg.h"
 107 #include "version.h"
 108 #include "ssherr.h"
 109 #include "myproposal.h"
 110 #include "utf8.h"
 111
 112 #ifdef ENABLE_PKCS11
 113 #include "ssh-pkcs11.h"
 114 #endif
 115
 116 extern char *__progname;
 117
 118 /* Saves a copy of argv for setproctitle emulation */
 119 #ifndef HAVE_SETPROCTITLE
 120 static char **saved_av;
 121 #endif
 122
 123 /* Flag indicating whether debug mode is on.  May be set on the command line. */
 124 int debug_flag = 0;
 125
 126 /* Flag indicating whether a tty should be requested */
 127 int tty_flag = 0;
 128
 129 /*
 130  * Flag indicating that the current process should be backgrounded and
 131  * a new mux-client launched in the foreground for ControlPersist.
 132  */
 133 int need_controlpersist_detach = 0;
 134
 135 /* Copies of flags for ControlPersist foreground mux-client */
 136 int ostdin_null_flag, osession_type, otty_flag, orequest_tty;
 137
 138 /*
 139  * General data structure for command line options and options configurable
 140  * in configuration files.  See readconf.h.
 141  */
 142 Options options;
 143
 144 /* optional user configfile */
 145 char *config = NULL;
 146
 147 /*
 148  * Name of the host we are connecting to.  This is the name given on the
 149  * command line, or the Hostname specified for the user-supplied name in a
 150  * configuration file.
 151  */
 152 char *host;
 153
 154 /*
 155  * A config can specify a path to forward, overriding SSH_AUTH_SOCK. If this is
 156  * not NULL, forward the socket at this path instead.
 157  */
 158 char *forward_agent_sock_path = NULL;
 159
 160 /* socket address the host resolves to */
 161 struct sockaddr_storage hostaddr;
 162
 163 /* Private host keys. */
 164 Sensitive sensitive_data;
 165
 166 /* command to be executed */
 167 struct sshbuf *command;
 168
 169 /* # of replies received for global requests */
 170 static int forward_confirms_pending = -1;
 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 [-46AaCfGgKkMNnqsTtVvXxYy] [-B bind_interface]\n"
 183 "           [-b bind_address] [-c cipher_spec] [-D [bind_address:]port]\n"
 184 "           [-E log_file] [-e escape_char] [-F configfile] [-I pkcs11]\n"
 185 "           [-i identity_file] [-J [user@]host[:port]] [-L address]\n"
 186 "           [-l login_name] [-m mac_spec] [-O ctl_cmd] [-o option] [-p port]\n"
 187 "           [-Q query_option] [-R address] [-S ctl_path] [-W host:port]\n"
 188 "           [-w local_tun[:remote_tun]] destination [command [argument ...]]\n"
 189         );
 190         exit(255);
 191 }
 192
 193 static int ssh_session2(struct ssh *, const struct ssh_conn_info *);
 194 static void load_public_identity_files(const struct ssh_conn_info *);
 195 static void main_sigchld_handler(int);
 196
 197 /* ~/ expand a list of paths. NB. assumes path[n] is heap-allocated. */
 198 static void
 199 tilde_expand_paths(char **paths, u_int num_paths)
 200 {
 201         u_int i;
 202         char *cp;
 203
 204         for (i = 0; i < num_paths; i++) {
 205                 cp = tilde_expand_filename(paths[i], getuid());
 206                 free(paths[i]);
 207                 paths[i] = cp;
 208         }
 209 }
 210
 211 /*
 212  * Expands the set of percent_expand options used by the majority of keywords
 213  * in the client that support percent expansion.
 214  * Caller must free returned string.
 215  */
 216 static char *
 217 default_client_percent_expand(const char *str,
 218     const struct ssh_conn_info *cinfo)
 219 {
 220         return percent_expand(str,
 221             DEFAULT_CLIENT_PERCENT_EXPAND_ARGS(cinfo),
 222             (char *)NULL);
 223 }
 224
 225 /*
 226  * Expands the set of percent_expand options used by the majority of keywords
 227  * AND perform environment variable substitution.
 228  * Caller must free returned string.
 229  */
 230 static char *
 231 default_client_percent_dollar_expand(const char *str,
 232     const struct ssh_conn_info *cinfo)
 233 {
 234         char *ret;
 235
 236         ret = percent_dollar_expand(str,
 237             DEFAULT_CLIENT_PERCENT_EXPAND_ARGS(cinfo),
 238             (char *)NULL);
 239         if (ret == NULL)
 240                 fatal("invalid environment variable expansion");
 241         return ret;
 242 }
 243
 244 /*
 245  * Attempt to resolve a host name / port to a set of addresses and
 246  * optionally return any CNAMEs encountered along the way.
 247  * Returns NULL on failure.
 248  * NB. this function must operate with a options having undefined members.
 249  */
 250 static struct addrinfo *
 251 resolve_host(const char *name, int port, int logerr, char *cname, size_t clen)
 252 {
 253         char strport[NI_MAXSERV];
 254         const char *errstr = NULL;
 255         struct addrinfo hints, *res;
 256         int gaierr;
 257         LogLevel loglevel = SYSLOG_LEVEL_DEBUG1;
 258
 259         if (port <= 0)
 260                 port = default_ssh_port();
 261         if (cname != NULL)
 262                 *cname = '\0';
 263         debug3_f("lookup %s:%d", name, port);
 264
 265         snprintf(strport, sizeof strport, "%d", port);
 266         memset(&hints, 0, sizeof(hints));
 267         hints.ai_family = options.address_family == -1 ?
 268             AF_UNSPEC : options.address_family;
 269         hints.ai_socktype = SOCK_STREAM;
 270         if (cname != NULL)
 271                 hints.ai_flags = AI_CANONNAME;
 272         if ((gaierr = getaddrinfo(name, strport, &hints, &res)) != 0) {
 273                 if (logerr || (gaierr != EAI_NONAME && gaierr != EAI_NODATA))
 274                         loglevel = SYSLOG_LEVEL_ERROR;
 275                 do_log2(loglevel, "%s: Could not resolve hostname %.100s: %s",
 276                     __progname, name, ssh_gai_strerror(gaierr));
 277                 return NULL;
 278         }
 279         if (cname != NULL && res->ai_canonname != NULL) {
 280                 if (!valid_domain(res->ai_canonname, 0, &errstr)) {
 281                         error("ignoring bad CNAME \"%s\" for host \"%s\": %s",
 282                             res->ai_canonname, name, errstr);
 283                 } else if (strlcpy(cname, res->ai_canonname, clen) >= clen) {
 284                         error_f("host \"%s\" cname \"%s\" too long (max %lu)",
 285                             name,  res->ai_canonname, (u_long)clen);
 286                         if (clen > 0)
 287                                 *cname = '\0';
 288                 }
 289         }
 290         return res;
 291 }
 292
 293 /* Returns non-zero if name can only be an address and not a hostname */
 294 static int
 295 is_addr_fast(const char *name)
 296 {
 297         return (strchr(name, '%') != NULL || strchr(name, ':') != NULL ||
 298             strspn(name, "0123456789.") == strlen(name));
 299 }
 300
 301 /* Returns non-zero if name represents a valid, single address */
 302 static int
 303 is_addr(const char *name)
 304 {
 305         char strport[NI_MAXSERV];
 306         struct addrinfo hints, *res;
 307
 308         if (is_addr_fast(name))
 309                 return 1;
 310
 311         snprintf(strport, sizeof strport, "%u", default_ssh_port());
 312         memset(&hints, 0, sizeof(hints));
 313         hints.ai_family = options.address_family == -1 ?
 314             AF_UNSPEC : options.address_family;
 315         hints.ai_socktype = SOCK_STREAM;
 316         hints.ai_flags = AI_NUMERICHOST|AI_NUMERICSERV;
 317         if (getaddrinfo(name, strport, &hints, &res) != 0)
 318                 return 0;
 319         if (res == NULL || res->ai_next != NULL) {
 320                 freeaddrinfo(res);
 321                 return 0;
 322         }
 323         freeaddrinfo(res);
 324         return 1;
 325 }
 326
 327 /*
 328  * Attempt to resolve a numeric host address / port to a single address.
 329  * Returns a canonical address string.
 330  * Returns NULL on failure.
 331  * NB. this function must operate with a options having undefined members.
 332  */
 333 static struct addrinfo *
 334 resolve_addr(const char *name, int port, char *caddr, size_t clen)
 335 {
 336         char addr[NI_MAXHOST], strport[NI_MAXSERV];
 337         struct addrinfo hints, *res;
 338         int gaierr;
 339
 340         if (port <= 0)
 341                 port = default_ssh_port();
 342         snprintf(strport, sizeof strport, "%u", port);
 343         memset(&hints, 0, sizeof(hints));
 344         hints.ai_family = options.address_family == -1 ?
 345             AF_UNSPEC : options.address_family;
 346         hints.ai_socktype = SOCK_STREAM;
 347         hints.ai_flags = AI_NUMERICHOST|AI_NUMERICSERV;
 348         if ((gaierr = getaddrinfo(name, strport, &hints, &res)) != 0) {
 349                 debug2_f("could not resolve name %.100s as address: %s",
 350                     name, ssh_gai_strerror(gaierr));
 351                 return NULL;
 352         }
 353         if (res == NULL) {
 354                 debug_f("getaddrinfo %.100s returned no addresses", name);
 355                 return NULL;
 356         }
 357         if (res->ai_next != NULL) {
 358                 debug_f("getaddrinfo %.100s returned multiple addresses", name);
 359                 goto fail;
 360         }
 361         if ((gaierr = getnameinfo(res->ai_addr, res->ai_addrlen,
 362             addr, sizeof(addr), NULL, 0, NI_NUMERICHOST)) != 0) {
 363                 debug_f("Could not format address for name %.100s: %s",
 364                     name, ssh_gai_strerror(gaierr));
 365                 goto fail;
 366         }
 367         if (strlcpy(caddr, addr, clen) >= clen) {
 368                 error_f("host \"%s\" addr \"%s\" too long (max %lu)",
 369                     name,  addr, (u_long)clen);
 370                 if (clen > 0)
 371                         *caddr = '\0';
 372  fail:
 373                 freeaddrinfo(res);
 374                 return NULL;
 375         }
 376         return res;
 377 }
 378
 379 /*
 380  * Check whether the cname is a permitted replacement for the hostname
 381  * and perform the replacement if it is.
 382  * NB. this function must operate with a options having undefined members.
 383  */
 384 static int
 385 check_follow_cname(int direct, char **namep, const char *cname)
 386 {
 387         int i;
 388         struct allowed_cname *rule;
 389
 390         if (*cname == '\0' || !config_has_permitted_cnames(&options) ||
 391             strcmp(*namep, cname) == 0)
 392                 return 0;
 393         if (options.canonicalize_hostname == SSH_CANONICALISE_NO)
 394                 return 0;
 395         /*
 396          * Don't attempt to canonicalize names that will be interpreted by
 397          * a proxy or jump host unless the user specifically requests so.
 398          */
 399         if (!direct &&
 400             options.canonicalize_hostname != SSH_CANONICALISE_ALWAYS)
 401                 return 0;
 402         debug3_f("check \"%s\" CNAME \"%s\"", *namep, cname);
 403         for (i = 0; i < options.num_permitted_cnames; i++) {
 404                 rule = options.permitted_cnames + i;
 405                 if (match_pattern_list(*namep, rule->source_list, 1) != 1 ||
 406                     match_pattern_list(cname, rule->target_list, 1) != 1)
 407                         continue;
 408                 verbose("Canonicalized DNS aliased hostname "
 409                     "\"%s\" => \"%s\"", *namep, cname);
 410                 free(*namep);
 411                 *namep = xstrdup(cname);
 412                 return 1;
 413         }
 414         return 0;
 415 }
 416
 417 /*
 418  * Attempt to resolve the supplied hostname after applying the user's
 419  * canonicalization rules. Returns the address list for the host or NULL
 420  * if no name was found after canonicalization.
 421  * NB. this function must operate with a options having undefined members.
 422  */
 423 static struct addrinfo *
 424 resolve_canonicalize(char **hostp, int port)
 425 {
 426         int i, direct, ndots;
 427         char *cp, *fullhost, newname[NI_MAXHOST];
 428         struct addrinfo *addrs;
 429
 430         /*
 431          * Attempt to canonicalise addresses, regardless of
 432          * whether hostname canonicalisation was requested
 433          */
 434         if ((addrs = resolve_addr(*hostp, port,
 435             newname, sizeof(newname))) != NULL) {
 436                 debug2_f("hostname %.100s is address", *hostp);
 437                 if (strcasecmp(*hostp, newname) != 0) {
 438                         debug2_f("canonicalised address \"%s\" => \"%s\"",
 439                             *hostp, newname);
 440                         free(*hostp);
 441                         *hostp = xstrdup(newname);
 442                 }
 443                 return addrs;
 444         }
 445
 446         /*
 447          * If this looks like an address but didn't parse as one, it might
 448          * be an address with an invalid interface scope. Skip further
 449          * attempts at canonicalisation.
 450          */
 451         if (is_addr_fast(*hostp)) {
 452                 debug_f("hostname %.100s is an unrecognised address", *hostp);
 453                 return NULL;
 454         }
 455
 456         if (options.canonicalize_hostname == SSH_CANONICALISE_NO)
 457                 return NULL;
 458
 459         /*
 460          * Don't attempt to canonicalize names that will be interpreted by
 461          * a proxy unless the user specifically requests so.
 462          */
 463         direct = option_clear_or_none(options.proxy_command) &&
 464             options.jump_host == NULL;
 465         if (!direct &&
 466             options.canonicalize_hostname != SSH_CANONICALISE_ALWAYS)
 467                 return NULL;
 468
 469         /* If domain name is anchored, then resolve it now */
 470         if ((*hostp)[strlen(*hostp) - 1] == '.') {
 471                 debug3_f("name is fully qualified");
 472                 fullhost = xstrdup(*hostp);
 473                 if ((addrs = resolve_host(fullhost, port, 0,
 474                     newname, sizeof(newname))) != NULL)
 475                         goto found;
 476                 free(fullhost);
 477                 goto notfound;
 478         }
 479
 480         /* Don't apply canonicalization to sufficiently-qualified hostnames */
 481         ndots = 0;
 482         for (cp = *hostp; *cp != '\0'; cp++) {
 483                 if (*cp == '.')
 484                         ndots++;
 485         }
 486         if (ndots > options.canonicalize_max_dots) {
 487                 debug3_f("not canonicalizing hostname \"%s\" (max dots %d)",
 488                     *hostp, options.canonicalize_max_dots);
 489                 return NULL;
 490         }
 491         /* Attempt each supplied suffix */
 492         for (i = 0; i < options.num_canonical_domains; i++) {
 493                 if (strcasecmp(options.canonical_domains[i], "none") == 0)
 494                         break;
 495                 xasprintf(&fullhost, "%s.%s.", *hostp,
 496                     options.canonical_domains[i]);
 497                 debug3_f("attempting \"%s\" => \"%s\"", *hostp, fullhost);
 498                 if ((addrs = resolve_host(fullhost, port, 0,
 499                     newname, sizeof(newname))) == NULL) {
 500                         free(fullhost);
 501                         continue;
 502                 }
 503  found:
 504                 /* Remove trailing '.' */
 505                 fullhost[strlen(fullhost) - 1] = '\0';
 506                 /* Follow CNAME if requested */
 507                 if (!check_follow_cname(direct, &fullhost, newname)) {
 508                         debug("Canonicalized hostname \"%s\" => \"%s\"",
 509                             *hostp, fullhost);
 510                 }
 511                 free(*hostp);
 512                 *hostp = fullhost;
 513                 return addrs;
 514         }
 515  notfound:
 516         if (!options.canonicalize_fallback_local)
 517                 fatal("%s: Could not resolve host \"%s\"", __progname, *hostp);
 518         debug2_f("host %s not found in any suffix", *hostp);
 519         return NULL;
 520 }
 521
 522 /*
 523  * Check the result of hostkey loading, ignoring some errors and either
 524  * discarding the key or fatal()ing for others.
 525  */
 526 static void
 527 check_load(int r, struct sshkey **k, const char *path, const char *message)
 528 {
 529         switch (r) {
 530         case 0:
 531                 /* Check RSA keys size and discard if undersized */
 532                 if (k != NULL && *k != NULL &&
 533                     (r = sshkey_check_rsa_length(*k,
 534                     options.required_rsa_size)) != 0) {
 535                         error_r(r, "load %s \"%s\"", message, path);
 536                         free(*k);
 537                         *k = NULL;
 538                 }
 539                 break;
 540         case SSH_ERR_INTERNAL_ERROR:
 541         case SSH_ERR_ALLOC_FAIL:
 542                 fatal_r(r, "load %s \"%s\"", message, path);
 543         case SSH_ERR_SYSTEM_ERROR:
 544                 /* Ignore missing files */
 545                 if (errno == ENOENT)
 546                         break;
 547                 /* FALLTHROUGH */
 548         default:
 549                 error_r(r, "load %s \"%s\"", message, path);
 550                 break;
 551         }
 552 }
 553
 554 /*
 555  * Read per-user configuration file.  Ignore the system wide config
 556  * file if the user specifies a config file on the command line.
 557  */
 558 static void
 559 process_config_files(const char *host_name, struct passwd *pw, int final_pass,
 560     int *want_final_pass)
 561 {
 562         char buf[PATH_MAX];
 563         int r;
 564
 565         if (config != NULL) {
 566                 if (strcasecmp(config, "none") != 0 &&
 567                     !read_config_file(config, pw, host, host_name, &options,
 568                     SSHCONF_USERCONF | (final_pass ? SSHCONF_FINAL : 0),
 569                     want_final_pass))
 570                         fatal("Can't open user config file %.100s: "
 571                             "%.100s", config, strerror(errno));
 572         } else {
 573                 r = snprintf(buf, sizeof buf, "%s/%s", pw->pw_dir,
 574                     _PATH_SSH_USER_CONFFILE);
 575                 if (r > 0 && (size_t)r < sizeof(buf))
 576                         (void)read_config_file(buf, pw, host, host_name,
 577                             &options, SSHCONF_CHECKPERM | SSHCONF_USERCONF |
 578                             (final_pass ? SSHCONF_FINAL : 0), want_final_pass);
 579
 580                 /* Read systemwide configuration file after user config. */
 581                 (void)read_config_file(_PATH_HOST_CONFIG_FILE, pw,
 582                     host, host_name, &options,
 583                     final_pass ? SSHCONF_FINAL : 0, want_final_pass);
 584         }
 585 }
 586
 587 /* Rewrite the port number in an addrinfo list of addresses */
 588 static void
 589 set_addrinfo_port(struct addrinfo *addrs, int port)
 590 {
 591         struct addrinfo *addr;
 592
 593         for (addr = addrs; addr != NULL; addr = addr->ai_next) {
 594                 switch (addr->ai_family) {
 595                 case AF_INET:
 596                         ((struct sockaddr_in *)addr->ai_addr)->
 597                             sin_port = htons(port);
 598                         break;
 599                 case AF_INET6:
 600                         ((struct sockaddr_in6 *)addr->ai_addr)->
 601                             sin6_port = htons(port);
 602                         break;
 603                 }
 604         }
 605 }
 606
 607 static void
 608 ssh_conn_info_free(struct ssh_conn_info *cinfo)
 609 {
 610         if (cinfo == NULL)
 611                 return;
 612         free(cinfo->conn_hash_hex);
 613         free(cinfo->shorthost);
 614         free(cinfo->uidstr);
 615         free(cinfo->keyalias);
 616         free(cinfo->thishost);
 617         free(cinfo->host_arg);
 618         free(cinfo->portstr);
 619         free(cinfo->remhost);
 620         free(cinfo->remuser);
 621         free(cinfo->homedir);
 622         free(cinfo->locuser);
 623         free(cinfo);
 624 }
 625
 626 /*
 627  * Main program for the ssh client.
 628  */
 629 int
 630 main(int ac, char **av)
 631 {
 632         struct ssh *ssh = NULL;
 633         int i, r, opt, exit_status, use_syslog, direct, timeout_ms;
 634         int was_addr, config_test = 0, opt_terminated = 0, want_final_pass = 0;
 635         char *p, *cp, *line, *argv0, *logfile;
 636         char cname[NI_MAXHOST], thishost[NI_MAXHOST];
 637         struct stat st;
 638         struct passwd *pw;
 639         extern int optind, optreset;
 640         extern char *optarg;
 641         struct Forward fwd;
 642         struct addrinfo *addrs = NULL;
 643         size_t n, len;
 644         u_int j;
 645         struct ssh_conn_info *cinfo = NULL;
 646
 647         /* Ensure that fds 0, 1 and 2 are open or directed to /dev/null */
 648         sanitise_stdfd();
 649
 650         /*
 651          * Discard other fds that are hanging around. These can cause problem
 652          * with backgrounded ssh processes started by ControlPersist.
 653          */
 654         closefrom(STDERR_FILENO + 1);
 655
 656         __progname = ssh_get_progname(av[0]);
 657
 658 #ifndef HAVE_SETPROCTITLE
 659         /* Prepare for later setproctitle emulation */
 660         /* Save argv so it isn't clobbered by setproctitle() emulation */
 661         saved_av = xcalloc(ac + 1, sizeof(*saved_av));
 662         for (i = 0; i < ac; i++)
 663                 saved_av[i] = xstrdup(av[i]);
 664         saved_av[i] = NULL;
 665         compat_init_setproctitle(ac, av);
 666         av = saved_av;
 667 #endif
 668
 669         seed_rng();
 670
 671         /* Get user data. */
 672         pw = getpwuid(getuid());
 673         if (!pw) {
 674                 logit("No user exists for uid %lu", (u_long)getuid());
 675                 exit(255);
 676         }
 677         /* Take a copy of the returned structure. */
 678         pw = pwcopy(pw);
 679
 680         /*
 681          * Set our umask to something reasonable, as some files are created
 682          * with the default umask.  This will make them world-readable but
 683          * writable only by the owner, which is ok for all files for which we
 684          * don't set the modes explicitly.
 685          */
 686         umask(022 | umask(077));
 687
 688         msetlocale();
 689
 690         /*
 691          * Initialize option structure to indicate that no values have been
 692          * set.
 693          */
 694         initialize_options(&options);
 695
 696         /*
 697          * Prepare main ssh transport/connection structures
 698          */
 699         if ((ssh = ssh_alloc_session_state()) == NULL)
 700                 fatal("Couldn't allocate session state");
 701         channel_init_channels(ssh);
 702
 703         /* Parse command-line arguments. */
 704         host = NULL;
 705         use_syslog = 0;
 706         logfile = NULL;
 707         argv0 = av[0];
 708
 709  again:
 710         while ((opt = getopt(ac, av, "1246ab:c:e:fgi:kl:m:no:p:qstvx"
 711             "AB:CD:E:F:GI:J:KL:MNO:PQ:R:S:TVw:W:XYy")) != -1) { /* HUZdhjruz */
 712                 switch (opt) {
 713                 case '1':
 714                         fatal("SSH protocol v.1 is no longer supported");
 715                         break;
 716                 case '2':
 717                         /* Ignored */
 718                         break;
 719                 case '4':
 720                         options.address_family = AF_INET;
 721                         break;
 722                 case '6':
 723                         options.address_family = AF_INET6;
 724                         break;
 725                 case 'n':
 726                         options.stdin_null = 1;
 727                         break;
 728                 case 'f':
 729                         options.fork_after_authentication = 1;
 730                         options.stdin_null = 1;
 731                         break;
 732                 case 'x':
 733                         options.forward_x11 = 0;
 734                         break;
 735                 case 'X':
 736                         options.forward_x11 = 1;
 737                         break;
 738                 case 'y':
 739                         use_syslog = 1;
 740                         break;
 741                 case 'E':
 742                         logfile = optarg;
 743                         break;
 744                 case 'G':
 745                         config_test = 1;
 746                         break;
 747                 case 'Y':
 748                         options.forward_x11 = 1;
 749                         options.forward_x11_trusted = 1;
 750                         break;
 751                 case 'g':
 752                         options.fwd_opts.gateway_ports = 1;
 753                         break;
 754                 case 'O':
 755                         if (options.stdio_forward_host != NULL)
 756                                 fatal("Cannot specify multiplexing "
 757                                     "command with -W");
 758                         else if (muxclient_command != 0)
 759                                 fatal("Multiplexing command already specified");
 760                         if (strcmp(optarg, "check") == 0)
 761                                 muxclient_command = SSHMUX_COMMAND_ALIVE_CHECK;
 762                         else if (strcmp(optarg, "forward") == 0)
 763                                 muxclient_command = SSHMUX_COMMAND_FORWARD;
 764                         else if (strcmp(optarg, "exit") == 0)
 765                                 muxclient_command = SSHMUX_COMMAND_TERMINATE;
 766                         else if (strcmp(optarg, "stop") == 0)
 767                                 muxclient_command = SSHMUX_COMMAND_STOP;
 768                         else if (strcmp(optarg, "cancel") == 0)
 769                                 muxclient_command = SSHMUX_COMMAND_CANCEL_FWD;
 770                         else if (strcmp(optarg, "proxy") == 0)
 771                                 muxclient_command = SSHMUX_COMMAND_PROXY;
 772                         else
 773                                 fatal("Invalid multiplex command.");
 774                         break;
 775                 case 'P':       /* deprecated */
 776                         break;
 777                 case 'Q':
 778                         cp = NULL;
 779                         if (strcmp(optarg, "cipher") == 0 ||
 780                             strcasecmp(optarg, "Ciphers") == 0)
 781                                 cp = cipher_alg_list('\n', 0);
 782                         else if (strcmp(optarg, "cipher-auth") == 0)
 783                                 cp = cipher_alg_list('\n', 1);
 784                         else if (strcmp(optarg, "mac") == 0 ||
 785                             strcasecmp(optarg, "MACs") == 0)
 786                                 cp = mac_alg_list('\n');
 787                         else if (strcmp(optarg, "kex") == 0 ||
 788                             strcasecmp(optarg, "KexAlgorithms") == 0)
 789                                 cp = kex_alg_list('\n');
 790                         else if (strcmp(optarg, "key") == 0)
 791                                 cp = sshkey_alg_list(0, 0, 0, '\n');
 792                         else if (strcmp(optarg, "key-cert") == 0)
 793                                 cp = sshkey_alg_list(1, 0, 0, '\n');
 794                         else if (strcmp(optarg, "key-plain") == 0)
 795                                 cp = sshkey_alg_list(0, 1, 0, '\n');
 796                         else if (strcmp(optarg, "key-sig") == 0 ||
 797                             strcasecmp(optarg, "CASignatureAlgorithms") == 0 ||
 798                             strcasecmp(optarg, "PubkeyAcceptedKeyTypes") == 0 || /* deprecated name */
 799                             strcasecmp(optarg, "PubkeyAcceptedAlgorithms") == 0 ||
 800                             strcasecmp(optarg, "HostKeyAlgorithms") == 0 ||
 801                             strcasecmp(optarg, "HostbasedKeyTypes") == 0 || /* deprecated name */
 802                             strcasecmp(optarg, "HostbasedAcceptedKeyTypes") == 0 || /* deprecated name */
 803                             strcasecmp(optarg, "HostbasedAcceptedAlgorithms") == 0)
 804                                 cp = sshkey_alg_list(0, 0, 1, '\n');
 805                         else if (strcmp(optarg, "sig") == 0)
 806                                 cp = sshkey_alg_list(0, 1, 1, '\n');
 807                         else if (strcmp(optarg, "protocol-version") == 0)
 808                                 cp = xstrdup("2");
 809                         else if (strcmp(optarg, "compression") == 0) {
 810                                 cp = xstrdup(compression_alg_list(0));
 811                                 len = strlen(cp);
 812                                 for (n = 0; n < len; n++)
 813                                         if (cp[n] == ',')
 814                                                 cp[n] = '\n';
 815                         } else if (strcmp(optarg, "help") == 0) {
 816                                 cp = xstrdup(
 817                                     "cipher\ncipher-auth\ncompression\nkex\n"
 818                                     "key\nkey-cert\nkey-plain\nkey-sig\nmac\n"
 819                                     "protocol-version\nsig");
 820                         }
 821                         if (cp == NULL)
 822                                 fatal("Unsupported query \"%s\"", optarg);
 823                         printf("%s\n", cp);
 824                         free(cp);
 825                         exit(0);
 826                         break;
 827                 case 'a':
 828                         options.forward_agent = 0;
 829                         break;
 830                 case 'A':
 831                         options.forward_agent = 1;
 832                         break;
 833                 case 'k':
 834                         options.gss_deleg_creds = 0;
 835                         break;
 836                 case 'K':
 837                         options.gss_authentication = 1;
 838                         options.gss_deleg_creds = 1;
 839                         break;
 840                 case 'i':
 841                         p = tilde_expand_filename(optarg, getuid());
 842                         if (stat(p, &st) == -1)
 843                                 fprintf(stderr, "Warning: Identity file %s "
 844                                     "not accessible: %s.\n", p,
 845                                     strerror(errno));
 846                         else
 847                                 add_identity_file(&options, NULL, p, 1);
 848                         free(p);
 849                         break;
 850                 case 'I':
 851 #ifdef ENABLE_PKCS11
 852                         free(options.pkcs11_provider);
 853                         options.pkcs11_provider = xstrdup(optarg);
 854 #else
 855                         fprintf(stderr, "no support for PKCS#11.\n");
 856 #endif
 857                         break;
 858                 case 'J':
 859                         if (options.jump_host != NULL) {
 860                                 fatal("Only a single -J option is permitted "
 861                                     "(use commas to separate multiple "
 862                                     "jump hops)");
 863                         }
 864                         if (options.proxy_command != NULL)
 865                                 fatal("Cannot specify -J with ProxyCommand");
 866                         if (parse_jump(optarg, &options, 1) == -1)
 867                                 fatal("Invalid -J argument");
 868                         options.proxy_command = xstrdup("none");
 869                         break;
 870                 case 't':
 871                         if (options.request_tty == REQUEST_TTY_YES)
 872                                 options.request_tty = REQUEST_TTY_FORCE;
 873                         else
 874                                 options.request_tty = REQUEST_TTY_YES;
 875                         break;
 876                 case 'v':
 877                         if (debug_flag == 0) {
 878                                 debug_flag = 1;
 879                                 options.log_level = SYSLOG_LEVEL_DEBUG1;
 880                         } else {
 881                                 if (options.log_level < SYSLOG_LEVEL_DEBUG3) {
 882                                         debug_flag++;
 883                                         options.log_level++;
 884                                 }
 885                         }
 886                         break;
 887                 case 'V':
 888                         if (options.version_addendum != NULL &&
 889                             *options.version_addendum != '\0')
 890                                 fprintf(stderr, "%s %s, %s\n", SSH_RELEASE,
 891                                     options.version_addendum,
 892                                     SSH_OPENSSL_VERSION);
 893                         else
 894                                 fprintf(stderr, "%s, %s\n", SSH_RELEASE,
 895                                     SSH_OPENSSL_VERSION);
 896                         exit(0);
 897                         break;
 898                 case 'w':
 899                         if (options.tun_open == -1)
 900                                 options.tun_open = SSH_TUNMODE_DEFAULT;
 901                         options.tun_local = a2tun(optarg, &options.tun_remote);
 902                         if (options.tun_local == SSH_TUNID_ERR) {
 903                                 fprintf(stderr,
 904                                     "Bad tun device '%s'\n", optarg);
 905                                 exit(255);
 906                         }
 907                         break;
 908                 case 'W':
 909                         if (options.stdio_forward_host != NULL)
 910                                 fatal("stdio forward already specified");
 911                         if (muxclient_command != 0)
 912                                 fatal("Cannot specify stdio forward with -O");
 913                         if (parse_forward(&fwd, optarg, 1, 0)) {
 914                                 options.stdio_forward_host = fwd.listen_host;
 915                                 options.stdio_forward_port = fwd.listen_port;
 916                                 free(fwd.connect_host);
 917                         } else {
 918                                 fprintf(stderr,
 919                                     "Bad stdio forwarding specification '%s'\n",
 920                                     optarg);
 921                                 exit(255);
 922                         }
 923                         options.request_tty = REQUEST_TTY_NO;
 924                         options.session_type = SESSION_TYPE_NONE;
 925                         break;
 926                 case 'q':
 927                         options.log_level = SYSLOG_LEVEL_QUIET;
 928                         break;
 929                 case 'e':
 930                         if (optarg[0] == '^' && optarg[2] == 0 &&
 931                             (u_char) optarg[1] >= 64 &&
 932                             (u_char) optarg[1] < 128)
 933                                 options.escape_char = (u_char) optarg[1] & 31;
 934                         else if (strlen(optarg) == 1)
 935                                 options.escape_char = (u_char) optarg[0];
 936                         else if (strcmp(optarg, "none") == 0)
 937                                 options.escape_char = SSH_ESCAPECHAR_NONE;
 938                         else {
 939                                 fprintf(stderr, "Bad escape character '%s'.\n",
 940                                     optarg);
 941                                 exit(255);
 942                         }
 943                         break;
 944                 case 'c':
 945                         if (!ciphers_valid(*optarg == '+' || *optarg == '^' ?
 946                             optarg + 1 : optarg)) {
 947                                 fprintf(stderr, "Unknown cipher type '%s'\n",
 948                                     optarg);
 949                                 exit(255);
 950                         }
 951                         free(options.ciphers);
 952                         options.ciphers = xstrdup(optarg);
 953                         break;
 954                 case 'm':
 955                         if (mac_valid(optarg)) {
 956                                 free(options.macs);
 957                                 options.macs = xstrdup(optarg);
 958                         } else {
 959                                 fprintf(stderr, "Unknown mac type '%s'\n",
 960                                     optarg);
 961                                 exit(255);
 962                         }
 963                         break;
 964                 case 'M':
 965                         if (options.control_master == SSHCTL_MASTER_YES)
 966                                 options.control_master = SSHCTL_MASTER_ASK;
 967                         else
 968                                 options.control_master = SSHCTL_MASTER_YES;
 969                         break;
 970                 case 'p':
 971                         if (options.port == -1) {
 972                                 options.port = a2port(optarg);
 973                                 if (options.port <= 0) {
 974                                         fprintf(stderr, "Bad port '%s'\n",
 975                                             optarg);
 976                                         exit(255);
 977                                 }
 978                         }
 979                         break;
 980                 case 'l':
 981                         if (options.user == NULL)
 982                                 options.user = optarg;
 983                         break;
 984
 985                 case 'L':
 986                         if (parse_forward(&fwd, optarg, 0, 0))
 987                                 add_local_forward(&options, &fwd);
 988                         else {
 989                                 fprintf(stderr,
 990                                     "Bad local forwarding specification '%s'\n",
 991                                     optarg);
 992                                 exit(255);
 993                         }
 994                         break;
 995
 996                 case 'R':
 997                         if (parse_forward(&fwd, optarg, 0, 1) ||
 998                             parse_forward(&fwd, optarg, 1, 1)) {
 999                                 add_remote_forward(&options, &fwd);
1000                         } else {
1001                                 fprintf(stderr,
1002                                     "Bad remote forwarding specification "
1003                                     "'%s'\n", optarg);
1004                                 exit(255);
1005                         }
1006                         break;
1007
1008                 case 'D':
1009                         if (parse_forward(&fwd, optarg, 1, 0)) {
1010                                 add_local_forward(&options, &fwd);
1011                         } else {
1012                                 fprintf(stderr,
1013                                     "Bad dynamic forwarding specification "
1014                                     "'%s'\n", optarg);
1015                                 exit(255);
1016                         }
1017                         break;
1018
1019                 case 'C':
1020 #ifdef WITH_ZLIB
1021                         options.compression = 1;
1022 #else
1023                         error("Compression not supported, disabling.");
1024 #endif
1025                         break;
1026                 case 'N':
1027                         if (options.session_type != -1 &&
1028                             options.session_type != SESSION_TYPE_NONE)
1029                                 fatal("Cannot specify -N with -s/SessionType");
1030                         options.session_type = SESSION_TYPE_NONE;
1031                         options.request_tty = REQUEST_TTY_NO;
1032                         break;
1033                 case 'T':
1034                         options.request_tty = REQUEST_TTY_NO;
1035                         break;
1036                 case 'o':
1037                         line = xstrdup(optarg);
1038                         if (process_config_line(&options, pw,
1039                             host ? host : "", host ? host : "", line,
1040                             "command-line", 0, NULL, SSHCONF_USERCONF) != 0)
1041                                 exit(255);
1042                         free(line);
1043                         break;
1044                 case 's':
1045                         if (options.session_type != -1 &&
1046                             options.session_type != SESSION_TYPE_SUBSYSTEM)
1047                                 fatal("Cannot specify -s with -N/SessionType");
1048                         options.session_type = SESSION_TYPE_SUBSYSTEM;
1049                         break;
1050                 case 'S':
1051                         free(options.control_path);
1052                         options.control_path = xstrdup(optarg);
1053                         break;
1054                 case 'b':
1055                         options.bind_address = optarg;
1056                         break;
1057                 case 'B':
1058                         options.bind_interface = optarg;
1059                         break;
1060                 case 'F':
1061                         config = optarg;
1062                         break;
1063                 default:
1064                         usage();
1065                 }
1066         }
1067
1068         if (optind > 1 && strcmp(av[optind - 1], "--") == 0)
1069                 opt_terminated = 1;
1070
1071         ac -= optind;
1072         av += optind;
1073
1074         if (ac > 0 && !host) {
1075                 int tport;
1076                 char *tuser;
1077                 switch (parse_ssh_uri(*av, &tuser, &host, &tport)) {
1078                 case -1:
1079                         usage();
1080                         break;
1081                 case 0:
1082                         if (options.user == NULL) {
1083                                 options.user = tuser;
1084                                 tuser = NULL;
1085                         }
1086                         free(tuser);
1087                         if (options.port == -1 && tport != -1)
1088                                 options.port = tport;
1089                         break;
1090                 default:
1091                         p = xstrdup(*av);
1092                         cp = strrchr(p, '@');
1093                         if (cp != NULL) {
1094                                 if (cp == p)
1095                                         usage();
1096                                 if (options.user == NULL) {
1097                                         options.user = p;
1098                                         p = NULL;
1099                                 }
1100                                 *cp++ = '\0';
1101                                 host = xstrdup(cp);
1102                                 free(p);
1103                         } else
1104                                 host = p;
1105                         break;
1106                 }
1107                 if (ac > 1 && !opt_terminated) {
1108                         optind = optreset = 1;
1109                         goto again;
1110                 }
1111                 ac--, av++;
1112         }
1113
1114         /* Check that we got a host name. */
1115         if (!host)
1116                 usage();
1117
1118         options.host_arg = xstrdup(host);
1119
1120         /* Initialize the command to execute on remote host. */
1121         if ((command = sshbuf_new()) == NULL)
1122                 fatal("sshbuf_new failed");
1123
1124         /*
1125          * Save the command to execute on the remote host in a buffer. There
1126          * is no limit on the length of the command, except by the maximum
1127          * packet size.  Also sets the tty flag if there is no command.
1128          */
1129         if (!ac) {
1130                 /* No command specified - execute shell on a tty. */
1131                 if (options.session_type == SESSION_TYPE_SUBSYSTEM) {
1132                         fprintf(stderr,
1133                             "You must specify a subsystem to invoke.\n");
1134                         usage();
1135                 }
1136         } else {
1137                 /* A command has been specified.  Store it into the buffer. */
1138                 for (i = 0; i < ac; i++) {
1139                         if ((r = sshbuf_putf(command, "%s%s",
1140                             i ? " " : "", av[i])) != 0)
1141                                 fatal_fr(r, "buffer error");
1142                 }
1143         }
1144
1145         ssh_signal(SIGPIPE, SIG_IGN); /* ignore SIGPIPE early */
1146
1147         /*
1148          * Initialize "log" output.  Since we are the client all output
1149          * goes to stderr unless otherwise specified by -y or -E.
1150          */
1151         if (use_syslog && logfile != NULL)
1152                 fatal("Can't specify both -y and -E");
1153         if (logfile != NULL)
1154                 log_redirect_stderr_to(logfile);
1155         log_init(argv0,
1156             options.log_level == SYSLOG_LEVEL_NOT_SET ?
1157             SYSLOG_LEVEL_INFO : options.log_level,
1158             options.log_facility == SYSLOG_FACILITY_NOT_SET ?
1159             SYSLOG_FACILITY_USER : options.log_facility,
1160             !use_syslog);
1161
1162         if (debug_flag)
1163                 /* version_addendum is always NULL at this point */
1164                 logit("%s, %s", SSH_RELEASE, SSH_OPENSSL_VERSION);
1165
1166         /* Parse the configuration files */
1167         process_config_files(options.host_arg, pw, 0, &want_final_pass);
1168         if (want_final_pass)
1169                 debug("configuration requests final Match pass");
1170
1171         /* Hostname canonicalisation needs a few options filled. */
1172         fill_default_options_for_canonicalization(&options);
1173
1174         /* If the user has replaced the hostname then take it into use now */
1175         if (options.hostname != NULL) {
1176                 /* NB. Please keep in sync with readconf.c:match_cfg_line() */
1177                 cp = percent_expand(options.hostname,
1178                     "h", host, (char *)NULL);
1179                 free(host);
1180                 host = cp;
1181                 free(options.hostname);
1182                 options.hostname = xstrdup(host);
1183         }
1184
1185         /* Don't lowercase addresses, they will be explicitly canonicalised */
1186         if ((was_addr = is_addr(host)) == 0)
1187                 lowercase(host);
1188
1189         /*
1190          * Try to canonicalize if requested by configuration or the
1191          * hostname is an address.
1192          */
1193         if (options.canonicalize_hostname != SSH_CANONICALISE_NO || was_addr)
1194                 addrs = resolve_canonicalize(&host, options.port);
1195
1196         /*
1197          * If CanonicalizePermittedCNAMEs have been specified but
1198          * other canonicalization did not happen (by not being requested
1199          * or by failing with fallback) then the hostname may still be changed
1200          * as a result of CNAME following.
1201          *
1202          * Try to resolve the bare hostname name using the system resolver's
1203          * usual search rules and then apply the CNAME follow rules.
1204          *
1205          * Skip the lookup if a ProxyCommand is being used unless the user
1206          * has specifically requested canonicalisation for this case via
1207          * CanonicalizeHostname=always
1208          */
1209         direct = option_clear_or_none(options.proxy_command) &&
1210             options.jump_host == NULL;
1211         if (addrs == NULL && config_has_permitted_cnames(&options) && (direct ||
1212             options.canonicalize_hostname == SSH_CANONICALISE_ALWAYS)) {
1213                 if ((addrs = resolve_host(host, options.port,
1214                     direct, cname, sizeof(cname))) == NULL) {
1215                         /* Don't fatal proxied host names not in the DNS */
1216                         if (direct)
1217                                 cleanup_exit(255); /* logged in resolve_host */
1218                 } else
1219                         check_follow_cname(direct, &host, cname);
1220         }
1221
1222         /*
1223          * If canonicalisation is enabled then re-parse the configuration
1224          * files as new stanzas may match.
1225          */
1226         if (options.canonicalize_hostname != 0 && !want_final_pass) {
1227                 debug("hostname canonicalisation enabled, "
1228                     "will re-parse configuration");
1229                 want_final_pass = 1;
1230         }
1231
1232         if (want_final_pass) {
1233                 debug("re-parsing configuration");
1234                 free(options.hostname);
1235                 options.hostname = xstrdup(host);
1236                 process_config_files(options.host_arg, pw, 1, NULL);
1237                 /*
1238                  * Address resolution happens early with canonicalisation
1239                  * enabled and the port number may have changed since, so
1240                  * reset it in address list
1241                  */
1242                 if (addrs != NULL && options.port > 0)
1243                         set_addrinfo_port(addrs, options.port);
1244         }
1245
1246         /* Fill configuration defaults. */
1247         if (fill_default_options(&options) != 0)
1248                 cleanup_exit(255);
1249
1250         if (options.user == NULL)
1251                 options.user = xstrdup(pw->pw_name);
1252
1253         /*
1254          * If ProxyJump option specified, then construct a ProxyCommand now.
1255          */
1256         if (options.jump_host != NULL) {
1257                 char port_s[8];
1258                 const char *jumpuser = options.jump_user, *sshbin = argv0;
1259                 int port = options.port, jumpport = options.jump_port;
1260
1261                 if (port <= 0)
1262                         port = default_ssh_port();
1263                 if (jumpport <= 0)
1264                         jumpport = default_ssh_port();
1265                 if (jumpuser == NULL)
1266                         jumpuser = options.user;
1267                 if (strcmp(options.jump_host, host) == 0 && port == jumpport &&
1268                     strcmp(options.user, jumpuser) == 0)
1269                         fatal("jumphost loop via %s", options.jump_host);
1270
1271                 /*
1272                  * Try to use SSH indicated by argv[0], but fall back to
1273                  * "ssh" if it appears unavailable.
1274                  */
1275                 if (strchr(argv0, '/') != NULL && access(argv0, X_OK) != 0)
1276                         sshbin = "ssh";
1277
1278                 /* Consistency check */
1279                 if (options.proxy_command != NULL)
1280                         fatal("inconsistent options: ProxyCommand+ProxyJump");
1281                 /* Never use FD passing for ProxyJump */
1282                 options.proxy_use_fdpass = 0;
1283                 snprintf(port_s, sizeof(port_s), "%d", options.jump_port);
1284                 xasprintf(&options.proxy_command,
1285                     "%s%s%s%s%s%s%s%s%s%s%.*s -W '[%%h]:%%p' %s",
1286                     sshbin,
1287                     /* Optional "-l user" argument if jump_user set */
1288                     options.jump_user == NULL ? "" : " -l ",
1289                     options.jump_user == NULL ? "" : options.jump_user,
1290                     /* Optional "-p port" argument if jump_port set */
1291                     options.jump_port <= 0 ? "" : " -p ",
1292                     options.jump_port <= 0 ? "" : port_s,
1293                     /* Optional additional jump hosts ",..." */
1294                     options.jump_extra == NULL ? "" : " -J ",
1295                     options.jump_extra == NULL ? "" : options.jump_extra,
1296                     /* Optional "-F" argument if -F specified */
1297                     config == NULL ? "" : " -F ",
1298                     config == NULL ? "" : config,
1299                     /* Optional "-v" arguments if -v set */
1300                     debug_flag ? " -" : "",
1301                     debug_flag, "vvv",
1302                     /* Mandatory hostname */
1303                     options.jump_host);
1304                 debug("Setting implicit ProxyCommand from ProxyJump: %s",
1305                     options.proxy_command);
1306         }
1307
1308         if (options.port == 0)
1309                 options.port = default_ssh_port();
1310         channel_set_af(ssh, options.address_family);
1311
1312         /* Tidy and check options */
1313         if (options.host_key_alias != NULL)
1314                 lowercase(options.host_key_alias);
1315         if (options.proxy_command != NULL &&
1316             strcmp(options.proxy_command, "-") == 0 &&
1317             options.proxy_use_fdpass)
1318                 fatal("ProxyCommand=- and ProxyUseFDPass are incompatible");
1319         if (options.update_hostkeys == SSH_UPDATE_HOSTKEYS_ASK) {
1320                 if (options.control_persist && options.control_path != NULL) {
1321                         debug("UpdateHostKeys=ask is incompatible with "
1322                             "ControlPersist; disabling");
1323                         options.update_hostkeys = 0;
1324                 } else if (sshbuf_len(command) != 0 ||
1325                     options.remote_command != NULL ||
1326                     options.request_tty == REQUEST_TTY_NO) {
1327                         debug("UpdateHostKeys=ask is incompatible with "
1328                             "remote command execution; disabling");
1329                         options.update_hostkeys = 0;
1330                 } else if (options.log_level < SYSLOG_LEVEL_INFO) {
1331                         /* no point logging anything; user won't see it */
1332                         options.update_hostkeys = 0;
1333                 }
1334         }
1335         if (options.connection_attempts <= 0)
1336                 fatal("Invalid number of ConnectionAttempts");
1337
1338         if (sshbuf_len(command) != 0 && options.remote_command != NULL)
1339                 fatal("Cannot execute command-line and remote command.");
1340
1341         /* Cannot fork to background if no command. */
1342         if (options.fork_after_authentication && sshbuf_len(command) == 0 &&
1343             options.remote_command == NULL &&
1344             options.session_type != SESSION_TYPE_NONE)
1345                 fatal("Cannot fork into background without a command "
1346                     "to execute.");
1347
1348         /* reinit */
1349         log_init(argv0, options.log_level, options.log_facility, !use_syslog);
1350         for (j = 0; j < options.num_log_verbose; j++) {
1351                 if (strcasecmp(options.log_verbose[j], "none") == 0)
1352                         break;
1353                 log_verbose_add(options.log_verbose[j]);
1354         }
1355
1356         if (options.request_tty == REQUEST_TTY_YES ||
1357             options.request_tty == REQUEST_TTY_FORCE)
1358                 tty_flag = 1;
1359
1360         /* Allocate a tty by default if no command specified. */
1361         if (sshbuf_len(command) == 0 && options.remote_command == NULL)
1362                 tty_flag = options.request_tty != REQUEST_TTY_NO;
1363
1364         /* Force no tty */
1365         if (options.request_tty == REQUEST_TTY_NO ||
1366             (muxclient_command && muxclient_command != SSHMUX_COMMAND_PROXY) ||
1367             options.session_type == SESSION_TYPE_NONE)
1368                 tty_flag = 0;
1369         /* Do not allocate a tty if stdin is not a tty. */
1370         if ((!isatty(fileno(stdin)) || options.stdin_null) &&
1371             options.request_tty != REQUEST_TTY_FORCE) {
1372                 if (tty_flag)
1373                         logit("Pseudo-terminal will not be allocated because "
1374                             "stdin is not a terminal.");
1375                 tty_flag = 0;
1376         }
1377
1378         /* Set up strings used to percent_expand() arguments */
1379         cinfo = xcalloc(1, sizeof(*cinfo));
1380         if (gethostname(thishost, sizeof(thishost)) == -1)
1381                 fatal("gethostname: %s", strerror(errno));
1382         cinfo->thishost = xstrdup(thishost);
1383         thishost[strcspn(thishost, ".")] = '\0';
1384         cinfo->shorthost = xstrdup(thishost);
1385         xasprintf(&cinfo->portstr, "%d", options.port);
1386         xasprintf(&cinfo->uidstr, "%llu",
1387             (unsigned long long)pw->pw_uid);
1388         cinfo->keyalias = xstrdup(options.host_key_alias ?
1389             options.host_key_alias : options.host_arg);
1390         cinfo->conn_hash_hex = ssh_connection_hash(cinfo->thishost, host,
1391             cinfo->portstr, options.user);
1392         cinfo->host_arg = xstrdup(options.host_arg);
1393         cinfo->remhost = xstrdup(host);
1394         cinfo->remuser = xstrdup(options.user);
1395         cinfo->homedir = xstrdup(pw->pw_dir);
1396         cinfo->locuser = xstrdup(pw->pw_name);
1397
1398         /* Find canonic host name. */
1399         if (strchr(host, '.') == NULL) {
1400                 struct addrinfo hints;
1401                 struct addrinfo *ai = NULL;
1402                 int errgai;
1403
1404                 memset(&hints, 0, sizeof(hints));
1405                 hints.ai_family = options.address_family;
1406                 hints.ai_flags = AI_CANONNAME;
1407                 hints.ai_socktype = SOCK_STREAM;
1408                 errgai = getaddrinfo(host, NULL, &hints, &ai);
1409                 if (errgai == 0) {
1410                         if (ai->ai_canonname != NULL) {
1411                                 free(host);
1412                                 host = xstrdup(ai->ai_canonname);
1413                         }
1414                         freeaddrinfo(ai);
1415                 }
1416         }
1417
1418         /*
1419          * Expand tokens in arguments. NB. LocalCommand is expanded later,
1420          * after port-forwarding is set up, so it may pick up any local
1421          * tunnel interface name allocated.
1422          */
1423         if (options.remote_command != NULL) {
1424                 debug3("expanding RemoteCommand: %s", options.remote_command);
1425                 cp = options.remote_command;
1426                 options.remote_command = default_client_percent_expand(cp,
1427                     cinfo);
1428                 debug3("expanded RemoteCommand: %s", options.remote_command);
1429                 free(cp);
1430                 if ((r = sshbuf_put(command, options.remote_command,
1431                     strlen(options.remote_command))) != 0)
1432                         fatal_fr(r, "buffer error");
1433         }
1434
1435         if (options.control_path != NULL) {
1436                 cp = tilde_expand_filename(options.control_path, getuid());
1437                 free(options.control_path);
1438                 options.control_path = default_client_percent_dollar_expand(cp,
1439                     cinfo);
1440                 free(cp);
1441         }
1442
1443         if (options.identity_agent != NULL) {
1444                 p = tilde_expand_filename(options.identity_agent, getuid());
1445                 cp = default_client_percent_dollar_expand(p, cinfo);
1446                 free(p);
1447                 free(options.identity_agent);
1448                 options.identity_agent = cp;
1449         }
1450
1451         if (options.forward_agent_sock_path != NULL) {
1452                 p = tilde_expand_filename(options.forward_agent_sock_path,
1453                     getuid());
1454                 cp = default_client_percent_dollar_expand(p, cinfo);
1455                 free(p);
1456                 free(options.forward_agent_sock_path);
1457                 options.forward_agent_sock_path = cp;
1458                 if (stat(options.forward_agent_sock_path, &st) != 0) {
1459                         error("Cannot forward agent socket path \"%s\": %s",
1460                             options.forward_agent_sock_path, strerror(errno));
1461                         if (options.exit_on_forward_failure)
1462                                 cleanup_exit(255);
1463                 }
1464         }
1465
1466         if (options.num_system_hostfiles > 0 &&
1467             strcasecmp(options.system_hostfiles[0], "none") == 0) {
1468                 if (options.num_system_hostfiles > 1)
1469                         fatal("Invalid GlobalKnownHostsFiles: \"none\" "
1470                             "appears with other entries");
1471                 free(options.system_hostfiles[0]);
1472                 options.system_hostfiles[0] = NULL;
1473                 options.num_system_hostfiles = 0;
1474         }
1475
1476         if (options.num_user_hostfiles > 0 &&
1477             strcasecmp(options.user_hostfiles[0], "none") == 0) {
1478                 if (options.num_user_hostfiles > 1)
1479                         fatal("Invalid UserKnownHostsFiles: \"none\" "
1480                             "appears with other entries");
1481                 free(options.user_hostfiles[0]);
1482                 options.user_hostfiles[0] = NULL;
1483                 options.num_user_hostfiles = 0;
1484         }
1485         for (j = 0; j < options.num_user_hostfiles; j++) {
1486                 if (options.user_hostfiles[j] == NULL)
1487                         continue;
1488                 cp = tilde_expand_filename(options.user_hostfiles[j], getuid());
1489                 p = default_client_percent_dollar_expand(cp, cinfo);
1490                 if (strcmp(options.user_hostfiles[j], p) != 0)
1491                         debug3("expanded UserKnownHostsFile '%s' -> "
1492                             "'%s'", options.user_hostfiles[j], p);
1493                 free(options.user_hostfiles[j]);
1494                 free(cp);
1495                 options.user_hostfiles[j] = p;
1496         }
1497
1498         for (i = 0; i < options.num_local_forwards; i++) {
1499                 if (options.local_forwards[i].listen_path != NULL) {
1500                         cp = options.local_forwards[i].listen_path;
1501                         p = options.local_forwards[i].listen_path =
1502                             default_client_percent_expand(cp, cinfo);
1503                         if (strcmp(cp, p) != 0)
1504                                 debug3("expanded LocalForward listen path "
1505                                     "'%s' -> '%s'", cp, p);
1506                         free(cp);
1507                 }
1508                 if (options.local_forwards[i].connect_path != NULL) {
1509                         cp = options.local_forwards[i].connect_path;
1510                         p = options.local_forwards[i].connect_path =
1511                             default_client_percent_expand(cp, cinfo);
1512                         if (strcmp(cp, p) != 0)
1513                                 debug3("expanded LocalForward connect path "
1514                                     "'%s' -> '%s'", cp, p);
1515                         free(cp);
1516                 }
1517         }
1518
1519         for (i = 0; i < options.num_remote_forwards; i++) {
1520                 if (options.remote_forwards[i].listen_path != NULL) {
1521                         cp = options.remote_forwards[i].listen_path;
1522                         p = options.remote_forwards[i].listen_path =
1523                             default_client_percent_expand(cp, cinfo);
1524                         if (strcmp(cp, p) != 0)
1525                                 debug3("expanded RemoteForward listen path "
1526                                     "'%s' -> '%s'", cp, p);
1527                         free(cp);
1528                 }
1529                 if (options.remote_forwards[i].connect_path != NULL) {
1530                         cp = options.remote_forwards[i].connect_path;
1531                         p = options.remote_forwards[i].connect_path =
1532                             default_client_percent_expand(cp, cinfo);
1533                         if (strcmp(cp, p) != 0)
1534                                 debug3("expanded RemoteForward connect path "
1535                                     "'%s' -> '%s'", cp, p);
1536                         free(cp);
1537                 }
1538         }
1539
1540         if (config_test) {
1541                 dump_client_config(&options, host);
1542                 exit(0);
1543         }
1544
1545         /* Expand SecurityKeyProvider if it refers to an environment variable */
1546         if (options.sk_provider != NULL && *options.sk_provider == '$' &&
1547             strlen(options.sk_provider) > 1) {
1548                 if ((cp = getenv(options.sk_provider + 1)) == NULL) {
1549                         debug("Authenticator provider %s did not resolve; "
1550                             "disabling", options.sk_provider);
1551                         free(options.sk_provider);
1552                         options.sk_provider = NULL;
1553                 } else {
1554                         debug2("resolved SecurityKeyProvider %s => %s",
1555                             options.sk_provider, cp);
1556                         free(options.sk_provider);
1557                         options.sk_provider = xstrdup(cp);
1558                 }
1559         }
1560
1561         if (muxclient_command != 0 && options.control_path == NULL)
1562                 fatal("No ControlPath specified for \"-O\" command");
1563         if (options.control_path != NULL) {
1564                 int sock;
1565                 if ((sock = muxclient(options.control_path)) >= 0) {
1566                         ssh_packet_set_connection(ssh, sock, sock);
1567                         ssh_packet_set_mux(ssh);
1568                         goto skip_connect;
1569                 }
1570         }
1571
1572         /*
1573          * If hostname canonicalisation was not enabled, then we may not
1574          * have yet resolved the hostname. Do so now.
1575          */
1576         if (addrs == NULL && options.proxy_command == NULL) {
1577                 debug2("resolving \"%s\" port %d", host, options.port);
1578                 if ((addrs = resolve_host(host, options.port, 1,
1579                     cname, sizeof(cname))) == NULL)
1580                         cleanup_exit(255); /* resolve_host logs the error */
1581         }
1582
1583         if (options.connection_timeout >= INT_MAX/1000)
1584                 timeout_ms = INT_MAX;
1585         else
1586                 timeout_ms = options.connection_timeout * 1000;
1587
1588         /* Open a connection to the remote host. */
1589         if (ssh_connect(ssh, host, options.host_arg, addrs, &hostaddr,
1590             options.port, options.connection_attempts,
1591             &timeout_ms, options.tcp_keep_alive) != 0)
1592                 exit(255);
1593
1594         if (addrs != NULL)
1595                 freeaddrinfo(addrs);
1596
1597         ssh_packet_set_timeout(ssh, options.server_alive_interval,
1598             options.server_alive_count_max);
1599
1600         if (timeout_ms > 0)
1601                 debug3("timeout: %d ms remain after connect", timeout_ms);
1602
1603         /*
1604          * If we successfully made the connection and we have hostbased auth
1605          * enabled, load the public keys so we can later use the ssh-keysign
1606          * helper to sign challenges.
1607          */
1608         sensitive_data.nkeys = 0;
1609         sensitive_data.keys = NULL;
1610         if (options.hostbased_authentication) {
1611                 int loaded = 0;
1612
1613                 sensitive_data.nkeys = 10;
1614                 sensitive_data.keys = xcalloc(sensitive_data.nkeys,
1615                     sizeof(*sensitive_data.keys));
1616
1617                 /* XXX check errors? */
1618 #define L_PUBKEY(p,o) do { \
1619         if ((o) >= sensitive_data.nkeys) \
1620                 fatal_f("pubkey out of array bounds"); \
1621         check_load(sshkey_load_public(p, &(sensitive_data.keys[o]), NULL), \
1622             &(sensitive_data.keys[o]), p, "pubkey"); \
1623         if (sensitive_data.keys[o] != NULL) { \
1624                 debug2("hostbased key %d: %s key from \"%s\"", o, \
1625                     sshkey_ssh_name(sensitive_data.keys[o]), p); \
1626                 loaded++; \
1627         } \
1628 } while (0)
1629 #define L_CERT(p,o) do { \
1630         if ((o) >= sensitive_data.nkeys) \
1631                 fatal_f("cert out of array bounds"); \
1632         check_load(sshkey_load_cert(p, &(sensitive_data.keys[o])), \
1633             &(sensitive_data.keys[o]), p, "cert"); \
1634         if (sensitive_data.keys[o] != NULL) { \
1635                 debug2("hostbased key %d: %s cert from \"%s\"", o, \
1636                     sshkey_ssh_name(sensitive_data.keys[o]), p); \
1637                 loaded++; \
1638         } \
1639 } while (0)
1640
1641                 if (options.hostbased_authentication == 1) {
1642                         L_CERT(_PATH_HOST_ECDSA_KEY_FILE, 0);
1643                         L_CERT(_PATH_HOST_ED25519_KEY_FILE, 1);
1644                         L_CERT(_PATH_HOST_RSA_KEY_FILE, 2);
1645                         L_CERT(_PATH_HOST_DSA_KEY_FILE, 3);
1646                         L_PUBKEY(_PATH_HOST_ECDSA_KEY_FILE, 4);
1647                         L_PUBKEY(_PATH_HOST_ED25519_KEY_FILE, 5);
1648                         L_PUBKEY(_PATH_HOST_RSA_KEY_FILE, 6);
1649                         L_PUBKEY(_PATH_HOST_DSA_KEY_FILE, 7);
1650                         L_CERT(_PATH_HOST_XMSS_KEY_FILE, 8);
1651                         L_PUBKEY(_PATH_HOST_XMSS_KEY_FILE, 9);
1652                         if (loaded == 0)
1653                                 debug("HostbasedAuthentication enabled but no "
1654                                    "local public host keys could be loaded.");
1655                 }
1656         }
1657
1658         /* load options.identity_files */
1659         load_public_identity_files(cinfo);
1660
1661         /* optionally set the SSH_AUTHSOCKET_ENV_NAME variable */
1662         if (options.identity_agent &&
1663             strcmp(options.identity_agent, SSH_AUTHSOCKET_ENV_NAME) != 0) {
1664                 if (strcmp(options.identity_agent, "none") == 0) {
1665                         unsetenv(SSH_AUTHSOCKET_ENV_NAME);
1666                 } else {
1667                         cp = options.identity_agent;
1668                         /* legacy (limited) format */
1669                         if (cp[0] == '$' && cp[1] != '{') {
1670                                 if (!valid_env_name(cp + 1)) {
1671                                         fatal("Invalid IdentityAgent "
1672                                             "environment variable name %s", cp);
1673                                 }
1674                                 if ((p = getenv(cp + 1)) == NULL)
1675                                         unsetenv(SSH_AUTHSOCKET_ENV_NAME);
1676                                 else
1677                                         setenv(SSH_AUTHSOCKET_ENV_NAME, p, 1);
1678                         } else {
1679                                 /* identity_agent specifies a path directly */
1680                                 setenv(SSH_AUTHSOCKET_ENV_NAME, cp, 1);
1681                         }
1682                 }
1683         }
1684
1685         if (options.forward_agent && options.forward_agent_sock_path != NULL) {
1686                 cp = options.forward_agent_sock_path;
1687                 if (cp[0] == '$') {
1688                         if (!valid_env_name(cp + 1)) {
1689                                 fatal("Invalid ForwardAgent environment variable name %s", cp);
1690                         }
1691                         if ((p = getenv(cp + 1)) != NULL)
1692                                 forward_agent_sock_path = xstrdup(p);
1693                         else
1694                                 options.forward_agent = 0;
1695                         free(cp);
1696                 } else {
1697                         forward_agent_sock_path = cp;
1698                 }
1699         }
1700
1701         /* Expand ~ in known host file names. */
1702         tilde_expand_paths(options.system_hostfiles,
1703             options.num_system_hostfiles);
1704         tilde_expand_paths(options.user_hostfiles, options.num_user_hostfiles);
1705
1706         ssh_signal(SIGCHLD, main_sigchld_handler);
1707
1708         /* Log into the remote system.  Never returns if the login fails. */
1709         ssh_login(ssh, &sensitive_data, host, (struct sockaddr *)&hostaddr,
1710             options.port, pw, timeout_ms, cinfo);
1711
1712         /* We no longer need the private host keys.  Clear them now. */
1713         if (sensitive_data.nkeys != 0) {
1714                 for (i = 0; i < sensitive_data.nkeys; i++) {
1715                         if (sensitive_data.keys[i] != NULL) {
1716                                 /* Destroys contents safely */
1717                                 debug3("clear hostkey %d", i);
1718                                 sshkey_free(sensitive_data.keys[i]);
1719                                 sensitive_data.keys[i] = NULL;
1720                         }
1721                 }
1722                 free(sensitive_data.keys);
1723         }
1724         for (i = 0; i < options.num_identity_files; i++) {
1725                 free(options.identity_files[i]);
1726                 options.identity_files[i] = NULL;
1727                 if (options.identity_keys[i]) {
1728                         sshkey_free(options.identity_keys[i]);
1729                         options.identity_keys[i] = NULL;
1730                 }
1731         }
1732         for (i = 0; i < options.num_certificate_files; i++) {
1733                 free(options.certificate_files[i]);
1734                 options.certificate_files[i] = NULL;
1735         }
1736
1737 #ifdef ENABLE_PKCS11
1738         (void)pkcs11_del_provider(options.pkcs11_provider);
1739 #endif
1740
1741  skip_connect:
1742         exit_status = ssh_session2(ssh, cinfo);
1743         ssh_conn_info_free(cinfo);
1744         ssh_packet_close(ssh);
1745
1746         if (options.control_path != NULL && muxserver_sock != -1)
1747                 unlink(options.control_path);
1748
1749         /* Kill ProxyCommand if it is running. */
1750         ssh_kill_proxy_command();
1751
1752         return exit_status;
1753 }
1754
1755 static void
1756 control_persist_detach(void)
1757 {
1758         pid_t pid;
1759
1760         debug_f("backgrounding master process");
1761
1762         /*
1763          * master (current process) into the background, and make the
1764          * foreground process a client of the backgrounded master.
1765          */
1766         switch ((pid = fork())) {
1767         case -1:
1768                 fatal_f("fork: %s", strerror(errno));
1769         case 0:
1770                 /* Child: master process continues mainloop */
1771                 break;
1772         default:
1773                 /* Parent: set up mux client to connect to backgrounded master */
1774                 debug2_f("background process is %ld", (long)pid);
1775                 options.stdin_null = ostdin_null_flag;
1776                 options.request_tty = orequest_tty;
1777                 tty_flag = otty_flag;
1778                 options.session_type = osession_type;
1779                 close(muxserver_sock);
1780                 muxserver_sock = -1;
1781                 options.control_master = SSHCTL_MASTER_NO;
1782                 muxclient(options.control_path);
1783                 /* muxclient() doesn't return on success. */
1784                 fatal("Failed to connect to new control master");
1785         }
1786         if (stdfd_devnull(1, 1, !(log_is_on_stderr() && debug_flag)) == -1)
1787                 error_f("stdfd_devnull failed");
1788         daemon(1, 1);
1789         setproctitle("%s [mux]", options.control_path);
1790 }
1791
1792 /* Do fork() after authentication. Used by "ssh -f" */
1793 static void
1794 fork_postauth(void)
1795 {
1796         if (need_controlpersist_detach)
1797                 control_persist_detach();
1798         debug("forking to background");
1799         options.fork_after_authentication = 0;
1800         if (daemon(1, 1) == -1)
1801                 fatal("daemon() failed: %.200s", strerror(errno));
1802         if (stdfd_devnull(1, 1, !(log_is_on_stderr() && debug_flag)) == -1)
1803                 error_f("stdfd_devnull failed");
1804 }
1805
1806 static void
1807 forwarding_success(void)
1808 {
1809         if (forward_confirms_pending == -1)
1810                 return;
1811         if (--forward_confirms_pending == 0) {
1812                 debug_f("all expected forwarding replies received");
1813                 if (options.fork_after_authentication)
1814                         fork_postauth();
1815         } else {
1816                 debug2_f("%d expected forwarding replies remaining",
1817                     forward_confirms_pending);
1818         }
1819 }
1820
1821 /* Callback for remote forward global requests */
1822 static void
1823 ssh_confirm_remote_forward(struct ssh *ssh, int type, u_int32_t seq, void *ctxt)
1824 {
1825         struct Forward *rfwd = (struct Forward *)ctxt;
1826         u_int port;
1827         int r;
1828
1829         /* XXX verbose() on failure? */
1830         debug("remote forward %s for: listen %s%s%d, connect %s:%d",
1831             type == SSH2_MSG_REQUEST_SUCCESS ? "success" : "failure",
1832             rfwd->listen_path ? rfwd->listen_path :
1833             rfwd->listen_host ? rfwd->listen_host : "",
1834             (rfwd->listen_path || rfwd->listen_host) ? ":" : "",
1835             rfwd->listen_port, rfwd->connect_path ? rfwd->connect_path :
1836             rfwd->connect_host, rfwd->connect_port);
1837         if (rfwd->listen_path == NULL && rfwd->listen_port == 0) {
1838                 if (type == SSH2_MSG_REQUEST_SUCCESS) {
1839                         if ((r = sshpkt_get_u32(ssh, &port)) != 0)
1840                                 fatal_fr(r, "parse packet");
1841                         if (port > 65535) {
1842                                 error("Invalid allocated port %u for remote "
1843                                     "forward to %s:%d", port,
1844                                     rfwd->connect_host, rfwd->connect_port);
1845                                 /* Ensure failure processing runs below */
1846                                 type = SSH2_MSG_REQUEST_FAILURE;
1847                                 channel_update_permission(ssh,
1848                                     rfwd->handle, -1);
1849                         } else {
1850                                 rfwd->allocated_port = (int)port;
1851                                 logit("Allocated port %u for remote "
1852                                     "forward to %s:%d",
1853                                     rfwd->allocated_port, rfwd->connect_path ?
1854                                     rfwd->connect_path : rfwd->connect_host,
1855                                     rfwd->connect_port);
1856                                 channel_update_permission(ssh,
1857                                     rfwd->handle, rfwd->allocated_port);
1858                         }
1859                 } else {
1860                         channel_update_permission(ssh, rfwd->handle, -1);
1861                 }
1862         }
1863
1864         if (type == SSH2_MSG_REQUEST_FAILURE) {
1865                 if (options.exit_on_forward_failure) {
1866                         if (rfwd->listen_path != NULL)
1867                                 fatal("Error: remote port forwarding failed "
1868                                     "for listen path %s", rfwd->listen_path);
1869                         else
1870                                 fatal("Error: remote port forwarding failed "
1871                                     "for listen port %d", rfwd->listen_port);
1872                 } else {
1873                         if (rfwd->listen_path != NULL)
1874                                 logit("Warning: remote port forwarding failed "
1875                                     "for listen path %s", rfwd->listen_path);
1876                         else
1877                                 logit("Warning: remote port forwarding failed "
1878                                     "for listen port %d", rfwd->listen_port);
1879                 }
1880         }
1881         forwarding_success();
1882 }
1883
1884 static void
1885 client_cleanup_stdio_fwd(struct ssh *ssh, int id, int force, void *arg)
1886 {
1887         debug("stdio forwarding: done");
1888         cleanup_exit(0);
1889 }
1890
1891 static void
1892 ssh_stdio_confirm(struct ssh *ssh, int id, int success, void *arg)
1893 {
1894         if (!success)
1895                 fatal("stdio forwarding failed");
1896 }
1897
1898 static void
1899 ssh_tun_confirm(struct ssh *ssh, int id, int success, void *arg)
1900 {
1901         if (!success) {
1902                 error("Tunnel forwarding failed");
1903                 if (options.exit_on_forward_failure)
1904                         cleanup_exit(255);
1905         }
1906
1907         debug_f("tunnel forward established, id=%d", id);
1908         forwarding_success();
1909 }
1910
1911 static void
1912 ssh_init_stdio_forwarding(struct ssh *ssh)
1913 {
1914         Channel *c;
1915         int in, out;
1916
1917         if (options.stdio_forward_host == NULL)
1918                 return;
1919
1920         debug3_f("%s:%d", options.stdio_forward_host,
1921             options.stdio_forward_port);
1922
1923         if ((in = dup(STDIN_FILENO)) == -1 ||
1924             (out = dup(STDOUT_FILENO)) == -1)
1925                 fatal_f("dup() in/out failed");
1926         if ((c = channel_connect_stdio_fwd(ssh, options.stdio_forward_host,
1927             options.stdio_forward_port, in, out,
1928             CHANNEL_NONBLOCK_STDIO)) == NULL)
1929                 fatal_f("channel_connect_stdio_fwd failed");
1930         channel_register_cleanup(ssh, c->self, client_cleanup_stdio_fwd, 0);
1931         channel_register_open_confirm(ssh, c->self, ssh_stdio_confirm, NULL);
1932 }
1933
1934 static void
1935 ssh_init_forward_permissions(struct ssh *ssh, const char *what, char **opens,
1936     u_int num_opens)
1937 {
1938         u_int i;
1939         int port;
1940         char *addr, *arg, *oarg;
1941         int where = FORWARD_LOCAL;
1942
1943         channel_clear_permission(ssh, FORWARD_ADM, where);
1944         if (num_opens == 0)
1945                 return; /* permit any */
1946
1947         /* handle keywords: "any" / "none" */
1948         if (num_opens == 1 && strcmp(opens[0], "any") == 0)
1949                 return;
1950         if (num_opens == 1 && strcmp(opens[0], "none") == 0) {
1951                 channel_disable_admin(ssh, where);
1952                 return;
1953         }
1954         /* Otherwise treat it as a list of permitted host:port */
1955         for (i = 0; i < num_opens; i++) {
1956                 oarg = arg = xstrdup(opens[i]);
1957                 addr = hpdelim(&arg);
1958                 if (addr == NULL)
1959                         fatal_f("missing host in %s", what);
1960                 addr = cleanhostname(addr);
1961                 if (arg == NULL || ((port = permitopen_port(arg)) < 0))
1962                         fatal_f("bad port number in %s", what);
1963                 /* Send it to channels layer */
1964                 channel_add_permission(ssh, FORWARD_ADM,
1965                     where, addr, port);
1966                 free(oarg);
1967         }
1968 }
1969
1970 static void
1971 ssh_init_forwarding(struct ssh *ssh, char **ifname)
1972 {
1973         int success = 0;
1974         int i;
1975
1976         ssh_init_forward_permissions(ssh, "permitremoteopen",
1977             options.permitted_remote_opens,
1978             options.num_permitted_remote_opens);
1979
1980         if (options.exit_on_forward_failure)
1981                 forward_confirms_pending = 0; /* track pending requests */
1982         /* Initiate local TCP/IP port forwardings. */
1983         for (i = 0; i < options.num_local_forwards; i++) {
1984                 debug("Local connections to %.200s:%d forwarded to remote "
1985                     "address %.200s:%d",
1986                     (options.local_forwards[i].listen_path != NULL) ?
1987                     options.local_forwards[i].listen_path :
1988                     (options.local_forwards[i].listen_host == NULL) ?
1989                     (options.fwd_opts.gateway_ports ? "*" : "LOCALHOST") :
1990                     options.local_forwards[i].listen_host,
1991                     options.local_forwards[i].listen_port,
1992                     (options.local_forwards[i].connect_path != NULL) ?
1993                     options.local_forwards[i].connect_path :
1994                     options.local_forwards[i].connect_host,
1995                     options.local_forwards[i].connect_port);
1996                 success += channel_setup_local_fwd_listener(ssh,
1997                     &options.local_forwards[i], &options.fwd_opts);
1998         }
1999         if (i > 0 && success != i && options.exit_on_forward_failure)
2000                 fatal("Could not request local forwarding.");
2001         if (i > 0 && success == 0)
2002                 error("Could not request local forwarding.");
2003
2004         /* Initiate remote TCP/IP port forwardings. */
2005         for (i = 0; i < options.num_remote_forwards; i++) {
2006                 debug("Remote connections from %.200s:%d forwarded to "
2007                     "local address %.200s:%d",
2008                     (options.remote_forwards[i].listen_path != NULL) ?
2009                     options.remote_forwards[i].listen_path :
2010                     (options.remote_forwards[i].listen_host == NULL) ?
2011                     "LOCALHOST" : options.remote_forwards[i].listen_host,
2012                     options.remote_forwards[i].listen_port,
2013                     (options.remote_forwards[i].connect_path != NULL) ?
2014                     options.remote_forwards[i].connect_path :
2015                     options.remote_forwards[i].connect_host,
2016                     options.remote_forwards[i].connect_port);
2017                 if ((options.remote_forwards[i].handle =
2018                     channel_request_remote_forwarding(ssh,
2019                     &options.remote_forwards[i])) >= 0) {
2020                         client_register_global_confirm(
2021                             ssh_confirm_remote_forward,
2022                             &options.remote_forwards[i]);
2023                         forward_confirms_pending++;
2024                 } else if (options.exit_on_forward_failure)
2025                         fatal("Could not request remote forwarding.");
2026                 else
2027                         logit("Warning: Could not request remote forwarding.");
2028         }
2029
2030         /* Initiate tunnel forwarding. */
2031         if (options.tun_open != SSH_TUNMODE_NO) {
2032                 if ((*ifname = client_request_tun_fwd(ssh,
2033                     options.tun_open, options.tun_local,
2034                     options.tun_remote, ssh_tun_confirm, NULL)) != NULL)
2035                         forward_confirms_pending++;
2036                 else if (options.exit_on_forward_failure)
2037                         fatal("Could not request tunnel forwarding.");
2038                 else
2039                         error("Could not request tunnel forwarding.");
2040         }
2041         if (forward_confirms_pending > 0) {
2042                 debug_f("expecting replies for %d forwards",
2043                     forward_confirms_pending);
2044         }
2045 }
2046
2047 static void
2048 check_agent_present(void)
2049 {
2050         int r;
2051
2052         if (options.forward_agent) {
2053                 /* Clear agent forwarding if we don't have an agent. */
2054                 if ((r = ssh_get_authentication_socket(NULL)) != 0) {
2055                         options.forward_agent = 0;
2056                         if (r != SSH_ERR_AGENT_NOT_PRESENT)
2057                                 debug_r(r, "ssh_get_authentication_socket");
2058                 }
2059         }
2060 }
2061
2062 static void
2063 ssh_session2_setup(struct ssh *ssh, int id, int success, void *arg)
2064 {
2065         extern char **environ;
2066         const char *display, *term;
2067         int r, interactive = tty_flag;
2068         char *proto = NULL, *data = NULL;
2069
2070         if (!success)
2071                 return; /* No need for error message, channels code sends one */
2072
2073         display = getenv("DISPLAY");
2074         if (display == NULL && options.forward_x11)
2075                 debug("X11 forwarding requested but DISPLAY not set");
2076         if (options.forward_x11 && client_x11_get_proto(ssh, display,
2077             options.xauth_location, options.forward_x11_trusted,
2078             options.forward_x11_timeout, &proto, &data) == 0) {
2079                 /* Request forwarding with authentication spoofing. */
2080                 debug("Requesting X11 forwarding with authentication "
2081                     "spoofing.");
2082                 x11_request_forwarding_with_spoofing(ssh, id, display, proto,
2083                     data, 1);
2084                 client_expect_confirm(ssh, id, "X11 forwarding", CONFIRM_WARN);
2085                 /* XXX exit_on_forward_failure */
2086                 interactive = 1;
2087         }
2088
2089         check_agent_present();
2090         if (options.forward_agent) {
2091                 debug("Requesting authentication agent forwarding.");
2092                 channel_request_start(ssh, id, "auth-agent-req@openssh.com", 0);
2093                 if ((r = sshpkt_send(ssh)) != 0)
2094                         fatal_fr(r, "send packet");
2095         }
2096
2097         /* Tell the packet module whether this is an interactive session. */
2098         ssh_packet_set_interactive(ssh, interactive,
2099             options.ip_qos_interactive, options.ip_qos_bulk);
2100
2101         if ((term = lookup_env_in_list("TERM", options.setenv,
2102             options.num_setenv)) == NULL || *term == '\0')
2103                 term = getenv("TERM");
2104         client_session2_setup(ssh, id, tty_flag,
2105             options.session_type == SESSION_TYPE_SUBSYSTEM, term,
2106             NULL, fileno(stdin), command, environ);
2107 }
2108
2109 /* open new channel for a session */
2110 static int
2111 ssh_session2_open(struct ssh *ssh)
2112 {
2113         Channel *c;
2114         int window, packetmax, in, out, err;
2115
2116         if (options.stdin_null) {
2117                 in = open(_PATH_DEVNULL, O_RDONLY);
2118         } else {
2119                 in = dup(STDIN_FILENO);
2120         }
2121         out = dup(STDOUT_FILENO);
2122         err = dup(STDERR_FILENO);
2123
2124         if (in == -1 || out == -1 || err == -1)
2125                 fatal("dup() in/out/err failed");
2126
2127         window = CHAN_SES_WINDOW_DEFAULT;
2128         packetmax = CHAN_SES_PACKET_DEFAULT;
2129         if (tty_flag) {
2130                 window >>= 1;
2131                 packetmax >>= 1;
2132         }
2133         c = channel_new(ssh,
2134             "session", SSH_CHANNEL_OPENING, in, out, err,
2135             window, packetmax, CHAN_EXTENDED_WRITE,
2136             "client-session", CHANNEL_NONBLOCK_STDIO);
2137
2138         debug3_f("channel_new: %d", c->self);
2139
2140         channel_send_open(ssh, c->self);
2141         if (options.session_type != SESSION_TYPE_NONE)
2142                 channel_register_open_confirm(ssh, c->self,
2143                     ssh_session2_setup, NULL);
2144
2145         return c->self;
2146 }
2147
2148 static int
2149 ssh_session2(struct ssh *ssh, const struct ssh_conn_info *cinfo)
2150 {
2151         int r, id = -1;
2152         char *cp, *tun_fwd_ifname = NULL;
2153
2154         /* XXX should be pre-session */
2155         if (!options.control_persist)
2156                 ssh_init_stdio_forwarding(ssh);
2157
2158         ssh_init_forwarding(ssh, &tun_fwd_ifname);
2159
2160         if (options.local_command != NULL) {
2161                 debug3("expanding LocalCommand: %s", options.local_command);
2162                 cp = options.local_command;
2163                 options.local_command = percent_expand(cp,
2164                     DEFAULT_CLIENT_PERCENT_EXPAND_ARGS(cinfo),
2165                     "T", tun_fwd_ifname == NULL ? "NONE" : tun_fwd_ifname,
2166                     (char *)NULL);
2167                 debug3("expanded LocalCommand: %s", options.local_command);
2168                 free(cp);
2169         }
2170
2171         /* Start listening for multiplex clients */
2172         if (!ssh_packet_get_mux(ssh))
2173                 muxserver_listen(ssh);
2174
2175         /*
2176          * If we are in control persist mode and have a working mux listen
2177          * socket, then prepare to background ourselves and have a foreground
2178          * client attach as a control client.
2179          * NB. we must save copies of the flags that we override for
2180          * the backgrounding, since we defer attachment of the client until
2181          * after the connection is fully established (in particular,
2182          * async rfwd replies have been received for ExitOnForwardFailure).
2183          */
2184         if (options.control_persist && muxserver_sock != -1) {
2185                 ostdin_null_flag = options.stdin_null;
2186                 osession_type = options.session_type;
2187                 orequest_tty = options.request_tty;
2188                 otty_flag = tty_flag;
2189                 options.stdin_null = 1;
2190                 options.session_type = SESSION_TYPE_NONE;
2191                 tty_flag = 0;
2192                 if (!options.fork_after_authentication &&
2193                     (osession_type != SESSION_TYPE_NONE ||
2194                     options.stdio_forward_host != NULL))
2195                         need_controlpersist_detach = 1;
2196                 options.fork_after_authentication = 1;
2197         }
2198         /*
2199          * ControlPersist mux listen socket setup failed, attempt the
2200          * stdio forward setup that we skipped earlier.
2201          */
2202         if (options.control_persist && muxserver_sock == -1)
2203                 ssh_init_stdio_forwarding(ssh);
2204
2205         if (options.session_type != SESSION_TYPE_NONE)
2206                 id = ssh_session2_open(ssh);
2207         else {
2208                 ssh_packet_set_interactive(ssh,
2209                     options.control_master == SSHCTL_MASTER_NO,
2210                     options.ip_qos_interactive, options.ip_qos_bulk);
2211         }
2212
2213         /* If we don't expect to open a new session, then disallow it */
2214         if (options.control_master == SSHCTL_MASTER_NO &&
2215             (ssh->compat & SSH_NEW_OPENSSH)) {
2216                 debug("Requesting no-more-sessions@openssh.com");
2217                 if ((r = sshpkt_start(ssh, SSH2_MSG_GLOBAL_REQUEST)) != 0 ||
2218                     (r = sshpkt_put_cstring(ssh,
2219                     "no-more-sessions@openssh.com")) != 0 ||
2220                     (r = sshpkt_put_u8(ssh, 0)) != 0 ||
2221                     (r = sshpkt_send(ssh)) != 0)
2222                         fatal_fr(r, "send packet");
2223         }
2224
2225         /* Execute a local command */
2226         if (options.local_command != NULL &&
2227             options.permit_local_command)
2228                 ssh_local_cmd(options.local_command);
2229
2230         /*
2231          * stdout is now owned by the session channel; clobber it here
2232          * so future channel closes are propagated to the local fd.
2233          * NB. this can only happen after LocalCommand has completed,
2234          * as it may want to write to stdout.
2235          */
2236         if (!need_controlpersist_detach && stdfd_devnull(0, 1, 0) == -1)
2237                 error_f("stdfd_devnull failed");
2238
2239         /*
2240          * If requested and we are not interested in replies to remote
2241          * forwarding requests, then let ssh continue in the background.
2242          */
2243         if (options.fork_after_authentication) {
2244                 if (options.exit_on_forward_failure &&
2245                     options.num_remote_forwards > 0) {
2246                         debug("deferring postauth fork until remote forward "
2247                             "confirmation received");
2248                 } else
2249                         fork_postauth();
2250         }
2251
2252         return client_loop(ssh, tty_flag, tty_flag ?
2253             options.escape_char : SSH_ESCAPECHAR_NONE, id);
2254 }
2255
2256 /* Loads all IdentityFile and CertificateFile keys */
2257 static void
2258 load_public_identity_files(const struct ssh_conn_info *cinfo)
2259 {
2260         char *filename, *cp;
2261         struct sshkey *public;
2262         int i;
2263         u_int n_ids, n_certs;
2264         char *identity_files[SSH_MAX_IDENTITY_FILES];
2265         struct sshkey *identity_keys[SSH_MAX_IDENTITY_FILES];
2266         int identity_file_userprovided[SSH_MAX_IDENTITY_FILES];
2267         char *certificate_files[SSH_MAX_CERTIFICATE_FILES];
2268         struct sshkey *certificates[SSH_MAX_CERTIFICATE_FILES];
2269         int certificate_file_userprovided[SSH_MAX_CERTIFICATE_FILES];
2270 #ifdef ENABLE_PKCS11
2271         struct sshkey **keys = NULL;
2272         char **comments = NULL;
2273         int nkeys;
2274 #endif /* PKCS11 */
2275
2276         n_ids = n_certs = 0;
2277         memset(identity_files, 0, sizeof(identity_files));
2278         memset(identity_keys, 0, sizeof(identity_keys));
2279         memset(identity_file_userprovided, 0,
2280             sizeof(identity_file_userprovided));
2281         memset(certificate_files, 0, sizeof(certificate_files));
2282         memset(certificates, 0, sizeof(certificates));
2283         memset(certificate_file_userprovided, 0,
2284             sizeof(certificate_file_userprovided));
2285
2286 #ifdef ENABLE_PKCS11
2287         if (options.pkcs11_provider != NULL &&
2288             options.num_identity_files < SSH_MAX_IDENTITY_FILES &&
2289             (pkcs11_init(!options.batch_mode) == 0) &&
2290             (nkeys = pkcs11_add_provider(options.pkcs11_provider, NULL,
2291             &keys, &comments)) > 0) {
2292                 for (i = 0; i < nkeys; i++) {
2293                         if (n_ids >= SSH_MAX_IDENTITY_FILES) {
2294                                 sshkey_free(keys[i]);
2295                                 free(comments[i]);
2296                                 continue;
2297                         }
2298                         identity_keys[n_ids] = keys[i];
2299                         identity_files[n_ids] = comments[i]; /* transferred */
2300                         n_ids++;
2301                 }
2302                 free(keys);
2303                 free(comments);
2304         }
2305 #endif /* ENABLE_PKCS11 */
2306         for (i = 0; i < options.num_identity_files; i++) {
2307                 if (n_ids >= SSH_MAX_IDENTITY_FILES ||
2308                     strcasecmp(options.identity_files[i], "none") == 0) {
2309                         free(options.identity_files[i]);
2310                         options.identity_files[i] = NULL;
2311                         continue;
2312                 }
2313                 cp = tilde_expand_filename(options.identity_files[i], getuid());
2314                 filename = default_client_percent_dollar_expand(cp, cinfo);
2315                 free(cp);
2316                 check_load(sshkey_load_public(filename, &public, NULL),
2317                     &public, filename, "pubkey");
2318                 debug("identity file %s type %d", filename,
2319                     public ? public->type : -1);
2320                 free(options.identity_files[i]);
2321                 identity_files[n_ids] = filename;
2322                 identity_keys[n_ids] = public;
2323                 identity_file_userprovided[n_ids] =
2324                     options.identity_file_userprovided[i];
2325                 if (++n_ids >= SSH_MAX_IDENTITY_FILES)
2326                         continue;
2327
2328                 /*
2329                  * If no certificates have been explicitly listed then try
2330                  * to add the default certificate variant too.
2331                  */
2332                 if (options.num_certificate_files != 0)
2333                         continue;
2334                 xasprintf(&cp, "%s-cert", filename);
2335                 check_load(sshkey_load_public(cp, &public, NULL),
2336                     &public, filename, "pubkey");
2337                 debug("identity file %s type %d", cp,
2338                     public ? public->type : -1);
2339                 if (public == NULL) {
2340                         free(cp);
2341                         continue;
2342                 }
2343                 if (!sshkey_is_cert(public)) {
2344                         debug_f("key %s type %s is not a certificate",
2345                             cp, sshkey_type(public));
2346                         sshkey_free(public);
2347                         free(cp);
2348                         continue;
2349                 }
2350                 /* NB. leave filename pointing to private key */
2351                 identity_files[n_ids] = xstrdup(filename);
2352                 identity_keys[n_ids] = public;
2353                 identity_file_userprovided[n_ids] =
2354                     options.identity_file_userprovided[i];
2355                 n_ids++;
2356         }
2357
2358         if (options.num_certificate_files > SSH_MAX_CERTIFICATE_FILES)
2359                 fatal_f("too many certificates");
2360         for (i = 0; i < options.num_certificate_files; i++) {
2361                 cp = tilde_expand_filename(options.certificate_files[i],
2362                     getuid());
2363                 filename = default_client_percent_dollar_expand(cp, cinfo);
2364                 free(cp);
2365
2366                 check_load(sshkey_load_public(filename, &public, NULL),
2367                     &public, filename, "certificate");
2368                 debug("certificate file %s type %d", filename,
2369                     public ? public->type : -1);
2370                 free(options.certificate_files[i]);
2371                 options.certificate_files[i] = NULL;
2372                 if (public == NULL) {
2373                         free(filename);
2374                         continue;
2375                 }
2376                 if (!sshkey_is_cert(public)) {
2377                         debug_f("key %s type %s is not a certificate",
2378                             filename, sshkey_type(public));
2379                         sshkey_free(public);
2380                         free(filename);
2381                         continue;
2382                 }
2383                 certificate_files[n_certs] = filename;
2384                 certificates[n_certs] = public;
2385                 certificate_file_userprovided[n_certs] =
2386                     options.certificate_file_userprovided[i];
2387                 ++n_certs;
2388         }
2389
2390         options.num_identity_files = n_ids;
2391         memcpy(options.identity_files, identity_files, sizeof(identity_files));
2392         memcpy(options.identity_keys, identity_keys, sizeof(identity_keys));
2393         memcpy(options.identity_file_userprovided,
2394             identity_file_userprovided, sizeof(identity_file_userprovided));
2395
2396         options.num_certificate_files = n_certs;
2397         memcpy(options.certificate_files,
2398             certificate_files, sizeof(certificate_files));
2399         memcpy(options.certificates, certificates, sizeof(certificates));
2400         memcpy(options.certificate_file_userprovided,
2401             certificate_file_userprovided,
2402             sizeof(certificate_file_userprovided));
2403 }
2404
2405 static void
2406 main_sigchld_handler(int sig)
2407 {
2408         int save_errno = errno;
2409         pid_t pid;
2410         int status;
2411
2412         while ((pid = waitpid(-1, &status, WNOHANG)) > 0 ||
2413             (pid == -1 && errno == EINTR))
2414                 ;
2415         errno = save_errno;
2416 }