Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1 | /* |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 2 | * Author: Tatu Ylonen <ylo@cs.hut.fi> |
| 3 | * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland |
| 4 | * All rights reserved |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 5 | * This program is the ssh daemon. It listens for connections from clients, |
| 6 | * and performs authentication, executes use commands or shell, and forwards |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 7 | * information to/from the application to the user client over an encrypted |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 8 | * connection. This can also handle forwarding of X11, TCP/IP, and |
| 9 | * authentication agent connections. |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 10 | * |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 11 | * As far as I am concerned, the code I have written for this software |
| 12 | * can be used freely for any purpose. Any derived versions of this |
| 13 | * software must be clearly marked as such, and if the derived work is |
| 14 | * incompatible with the protocol description in the RFC file, it must be |
| 15 | * called by a name other than "ssh" or "Secure Shell". |
| 16 | * |
| 17 | * SSH2 implementation: |
| 18 | * |
| 19 | * Copyright (c) 2000 Markus Friedl. All rights reserved. |
| 20 | * |
| 21 | * Redistribution and use in source and binary forms, with or without |
| 22 | * modification, are permitted provided that the following conditions |
| 23 | * are met: |
| 24 | * 1. Redistributions of source code must retain the above copyright |
| 25 | * notice, this list of conditions and the following disclaimer. |
| 26 | * 2. Redistributions in binary form must reproduce the above copyright |
| 27 | * notice, this list of conditions and the following disclaimer in the |
| 28 | * documentation and/or other materials provided with the distribution. |
| 29 | * |
| 30 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
| 31 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
| 32 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
| 33 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
| 34 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
| 35 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
| 36 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
| 37 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
| 38 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
| 39 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 40 | */ |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 41 | |
| 42 | #include "includes.h" |
Damien Miller | a0ff466 | 2001-03-30 10:49:35 +1000 | [diff] [blame^] | 43 | RCSID("$OpenBSD: sshd.c,v 1.184 2001/03/29 21:06:21 stevesk Exp $"); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 44 | |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 45 | #include <openssl/dh.h> |
| 46 | #include <openssl/bn.h> |
| 47 | #include <openssl/hmac.h> |
| 48 | |
| 49 | #include "ssh.h" |
| 50 | #include "ssh1.h" |
| 51 | #include "ssh2.h" |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 52 | #include "xmalloc.h" |
| 53 | #include "rsa.h" |
Ben Lindstrom | d95c09c | 2001-02-18 19:13:33 +0000 | [diff] [blame] | 54 | #include "sshpty.h" |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 55 | #include "packet.h" |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 56 | #include "mpaux.h" |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 57 | #include "log.h" |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 58 | #include "servconf.h" |
| 59 | #include "uidswap.h" |
| 60 | #include "compat.h" |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 61 | #include "buffer.h" |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 62 | #include "cipher.h" |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 63 | #include "kex.h" |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 64 | #include "key.h" |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 65 | #include "dh.h" |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 66 | #include "myproposal.h" |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 67 | #include "authfile.h" |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 68 | #include "pathnames.h" |
| 69 | #include "atomicio.h" |
| 70 | #include "canohost.h" |
| 71 | #include "auth.h" |
| 72 | #include "misc.h" |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 73 | |
| 74 | #ifdef LIBWRAP |
| 75 | #include <tcpd.h> |
| 76 | #include <syslog.h> |
| 77 | int allow_severity = LOG_INFO; |
| 78 | int deny_severity = LOG_WARNING; |
| 79 | #endif /* LIBWRAP */ |
| 80 | |
| 81 | #ifndef O_NOCTTY |
| 82 | #define O_NOCTTY 0 |
| 83 | #endif |
| 84 | |
Ben Lindstrom | 49a79c0 | 2000-11-17 03:47:20 +0000 | [diff] [blame] | 85 | #ifdef HAVE___PROGNAME |
| 86 | extern char *__progname; |
| 87 | #else |
| 88 | char *__progname; |
| 89 | #endif |
| 90 | |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 91 | /* Server configuration options. */ |
| 92 | ServerOptions options; |
| 93 | |
| 94 | /* Name of the server configuration file. */ |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 95 | char *config_file_name = _PATH_SERVER_CONFIG_FILE; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 96 | |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 97 | /* |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 98 | * Flag indicating whether IPv4 or IPv6. This can be set on the command line. |
| 99 | * Default value is AF_UNSPEC means both IPv4 and IPv6. |
| 100 | */ |
Damien Miller | 7d80e34 | 2000-01-19 14:36:49 +1100 | [diff] [blame] | 101 | #ifdef IPV4_DEFAULT |
| 102 | int IPv4or6 = AF_INET; |
| 103 | #else |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 104 | int IPv4or6 = AF_UNSPEC; |
Damien Miller | 7d80e34 | 2000-01-19 14:36:49 +1100 | [diff] [blame] | 105 | #endif |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 106 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 107 | /* |
| 108 | * Debug mode flag. This can be set on the command line. If debug |
| 109 | * mode is enabled, extra debugging output will be sent to the system |
| 110 | * log, the daemon will not go to background, and will exit after processing |
| 111 | * the first connection. |
| 112 | */ |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 113 | int debug_flag = 0; |
| 114 | |
| 115 | /* Flag indicating that the daemon is being started from inetd. */ |
| 116 | int inetd_flag = 0; |
| 117 | |
Ben Lindstrom | c72745a | 2000-12-02 19:03:54 +0000 | [diff] [blame] | 118 | /* Flag indicating that sshd should not detach and become a daemon. */ |
| 119 | int no_daemon_flag = 0; |
| 120 | |
Damien Miller | 5ce662a | 1999-11-11 17:57:39 +1100 | [diff] [blame] | 121 | /* debug goes to stderr unless inetd_flag is set */ |
| 122 | int log_stderr = 0; |
| 123 | |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 124 | /* Saved arguments to main(). */ |
| 125 | char **saved_argv; |
Damien Miller | b8c656e | 2000-06-28 15:22:41 +1000 | [diff] [blame] | 126 | int saved_argc; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 127 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 128 | /* |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 129 | * The sockets that the server is listening; this is used in the SIGHUP |
| 130 | * signal handler. |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 131 | */ |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 132 | #define MAX_LISTEN_SOCKS 16 |
| 133 | int listen_socks[MAX_LISTEN_SOCKS]; |
| 134 | int num_listen_socks = 0; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 135 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 136 | /* |
| 137 | * the client's version string, passed by sshd2 in compat mode. if != NULL, |
| 138 | * sshd will skip the version-number exchange |
| 139 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 140 | char *client_version_string = NULL; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 141 | char *server_version_string = NULL; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 142 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 143 | /* |
| 144 | * Any really sensitive data in the application is contained in this |
| 145 | * structure. The idea is that this structure could be locked into memory so |
| 146 | * that the pages do not get written into swap. However, there are some |
| 147 | * problems. The private key contains BIGNUMs, and we do not (in principle) |
| 148 | * have access to the internals of them, and locking just the structure is |
| 149 | * not very useful. Currently, memory locking is not implemented. |
| 150 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 151 | struct { |
Ben Lindstrom | ca42d5f | 2001-03-09 18:25:32 +0000 | [diff] [blame] | 152 | Key *server_key; /* ephemeral server key */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 153 | Key *ssh1_host_key; /* ssh1 host key */ |
| 154 | Key **host_keys; /* all private host keys */ |
| 155 | int have_ssh1_key; |
| 156 | int have_ssh2_key; |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 157 | u_char ssh1_cookie[SSH_SESSION_KEY_LENGTH]; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 158 | } sensitive_data; |
| 159 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 160 | /* |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 161 | * Flag indicating whether the RSA server key needs to be regenerated. |
| 162 | * Is set in the SIGALRM handler and cleared when the key is regenerated. |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 163 | */ |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 164 | int key_do_regen = 0; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 165 | |
| 166 | /* This is set to true when SIGHUP is received. */ |
| 167 | int received_sighup = 0; |
| 168 | |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 169 | /* session identifier, used by RSA-auth */ |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 170 | u_char session_id[16]; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 171 | |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 172 | /* same for ssh2 */ |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 173 | u_char *session_id2 = NULL; |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 174 | int session_id2_len = 0; |
| 175 | |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 176 | /* record remote hostname or ip */ |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 177 | u_int utmp_len = MAXHOSTNAMELEN; |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 178 | |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 179 | /* Prototypes for various functions defined later in this file. */ |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 180 | void do_ssh1_kex(void); |
| 181 | void do_ssh2_kex(void); |
Damien Miller | 98c7ad6 | 2000-03-09 21:27:49 +1100 | [diff] [blame] | 182 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 183 | void ssh_dh1_server(Kex *, Buffer *_kexinit, Buffer *); |
| 184 | void ssh_dhgex_server(Kex *, Buffer *_kexinit, Buffer *); |
| 185 | |
Damien Miller | 98c7ad6 | 2000-03-09 21:27:49 +1100 | [diff] [blame] | 186 | /* |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 187 | * Close all listening sockets |
| 188 | */ |
| 189 | void |
| 190 | close_listen_socks(void) |
| 191 | { |
| 192 | int i; |
| 193 | for (i = 0; i < num_listen_socks; i++) |
| 194 | close(listen_socks[i]); |
| 195 | num_listen_socks = -1; |
| 196 | } |
| 197 | |
| 198 | /* |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 199 | * Signal handler for SIGHUP. Sshd execs itself when it receives SIGHUP; |
| 200 | * the effect is to reread the configuration file (and to regenerate |
| 201 | * the server key). |
| 202 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 203 | void |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 204 | sighup_handler(int sig) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 205 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 206 | received_sighup = 1; |
| 207 | signal(SIGHUP, sighup_handler); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 208 | } |
| 209 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 210 | /* |
| 211 | * Called from the main program after receiving SIGHUP. |
| 212 | * Restarts the server. |
| 213 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 214 | void |
Ben Lindstrom | 31ca54a | 2001-02-09 02:11:24 +0000 | [diff] [blame] | 215 | sighup_restart(void) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 216 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 217 | log("Received SIGHUP; restarting."); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 218 | close_listen_socks(); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 219 | execv(saved_argv[0], saved_argv); |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 220 | log("RESTART FAILED: av[0]='%.100s', error: %.100s.", saved_argv[0], strerror(errno)); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 221 | exit(1); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 222 | } |
| 223 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 224 | /* |
| 225 | * Generic signal handler for terminating signals in the master daemon. |
| 226 | * These close the listen socket; not closing it seems to cause "Address |
| 227 | * already in use" problems on some machines, which is inconvenient. |
| 228 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 229 | void |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 230 | sigterm_handler(int sig) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 231 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 232 | log("Received signal %d; terminating.", sig); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 233 | close_listen_socks(); |
Damien Miller | 6f83b8e | 2000-05-02 09:23:45 +1000 | [diff] [blame] | 234 | unlink(options.pid_file); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 235 | exit(255); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 236 | } |
| 237 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 238 | /* |
| 239 | * SIGCHLD handler. This is called whenever a child dies. This will then |
| 240 | * reap any zombies left by exited c. |
| 241 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 242 | void |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 243 | main_sigchld_handler(int sig) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 244 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 245 | int save_errno = errno; |
| 246 | int status; |
Damien Miller | 431f66b | 1999-11-21 18:31:57 +1100 | [diff] [blame] | 247 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 248 | while (waitpid(-1, &status, WNOHANG) > 0) |
| 249 | ; |
Damien Miller | 431f66b | 1999-11-21 18:31:57 +1100 | [diff] [blame] | 250 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 251 | signal(SIGCHLD, main_sigchld_handler); |
| 252 | errno = save_errno; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 253 | } |
| 254 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 255 | /* |
| 256 | * Signal handler for the alarm after the login grace period has expired. |
| 257 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 258 | void |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 259 | grace_alarm_handler(int sig) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 260 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 261 | /* Close the connection. */ |
| 262 | packet_close(); |
| 263 | |
| 264 | /* Log error and exit. */ |
| 265 | fatal("Timeout before authentication for %s.", get_remote_ipaddr()); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 266 | } |
| 267 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 268 | /* |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 269 | * Signal handler for the key regeneration alarm. Note that this |
| 270 | * alarm only occurs in the daemon waiting for connections, and it does not |
| 271 | * do anything with the private key or random state before forking. |
| 272 | * Thus there should be no concurrency control/asynchronous execution |
| 273 | * problems. |
| 274 | */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 275 | void |
Ben Lindstrom | ca42d5f | 2001-03-09 18:25:32 +0000 | [diff] [blame] | 276 | generate_ephemeral_server_key(void) |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 277 | { |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 278 | u_int32_t rand = 0; |
| 279 | int i; |
| 280 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 281 | log("Generating %s%d bit RSA key.", sensitive_data.server_key ? "new " : "", |
| 282 | options.server_key_bits); |
| 283 | if (sensitive_data.server_key != NULL) |
| 284 | key_free(sensitive_data.server_key); |
| 285 | sensitive_data.server_key = key_generate(KEY_RSA1, options.server_key_bits); |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 286 | log("RSA key generation complete."); |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 287 | |
| 288 | for (i = 0; i < SSH_SESSION_KEY_LENGTH; i++) { |
| 289 | if (i % 4 == 0) |
| 290 | rand = arc4random(); |
| 291 | sensitive_data.ssh1_cookie[i] = rand & 0xff; |
| 292 | rand >>= 8; |
| 293 | } |
| 294 | arc4random_stir(); |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 295 | } |
Ben Lindstrom | 2f959b4 | 2001-01-11 06:20:23 +0000 | [diff] [blame] | 296 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 297 | void |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 298 | key_regeneration_alarm(int sig) |
| 299 | { |
| 300 | int save_errno = errno; |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 301 | signal(SIGALRM, SIG_DFL); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 302 | errno = save_errno; |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 303 | key_do_regen = 1; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 304 | } |
| 305 | |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 306 | void |
| 307 | sshd_exchange_identification(int sock_in, int sock_out) |
| 308 | { |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 309 | int i, mismatch; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 310 | int remote_major, remote_minor; |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 311 | int major, minor; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 312 | char *s; |
| 313 | char buf[256]; /* Must not be larger than remote_version. */ |
| 314 | char remote_version[256]; /* Must be at least as big as buf. */ |
| 315 | |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 316 | if ((options.protocol & SSH_PROTO_1) && |
| 317 | (options.protocol & SSH_PROTO_2)) { |
| 318 | major = PROTOCOL_MAJOR_1; |
| 319 | minor = 99; |
| 320 | } else if (options.protocol & SSH_PROTO_2) { |
| 321 | major = PROTOCOL_MAJOR_2; |
| 322 | minor = PROTOCOL_MINOR_2; |
| 323 | } else { |
| 324 | major = PROTOCOL_MAJOR_1; |
| 325 | minor = PROTOCOL_MINOR_1; |
| 326 | } |
| 327 | snprintf(buf, sizeof buf, "SSH-%d.%d-%.100s\n", major, minor, SSH_VERSION); |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 328 | server_version_string = xstrdup(buf); |
| 329 | |
| 330 | if (client_version_string == NULL) { |
| 331 | /* Send our protocol version identification. */ |
| 332 | if (atomicio(write, sock_out, server_version_string, strlen(server_version_string)) |
| 333 | != strlen(server_version_string)) { |
| 334 | log("Could not write ident string to %s.", get_remote_ipaddr()); |
| 335 | fatal_cleanup(); |
| 336 | } |
| 337 | |
Ben Lindstrom | 5393f93 | 2001-02-15 03:17:13 +0000 | [diff] [blame] | 338 | /* Read other side's version identification. */ |
| 339 | memset(buf, 0, sizeof(buf)); |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 340 | for (i = 0; i < sizeof(buf) - 1; i++) { |
Damien Miller | bf7f466 | 2000-06-23 10:16:38 +1000 | [diff] [blame] | 341 | if (atomicio(read, sock_in, &buf[i], 1) != 1) { |
Ben Lindstrom | a9a29e1 | 2001-02-20 01:20:47 +0000 | [diff] [blame] | 342 | log("Did not receive identification string from %s.", |
| 343 | get_remote_ipaddr()); |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 344 | fatal_cleanup(); |
| 345 | } |
| 346 | if (buf[i] == '\r') { |
Ben Lindstrom | 69d8c07 | 2001-03-22 22:45:33 +0000 | [diff] [blame] | 347 | buf[i] = 0; |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 348 | /* Kludge for F-Secure Macintosh < 1.0.2 */ |
| 349 | if (i == 12 && |
| 350 | strncmp(buf, "SSH-1.5-W1.0", 12) == 0) |
| 351 | break; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 352 | continue; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 353 | } |
| 354 | if (buf[i] == '\n') { |
Ben Lindstrom | 69d8c07 | 2001-03-22 22:45:33 +0000 | [diff] [blame] | 355 | buf[i] = 0; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 356 | break; |
| 357 | } |
| 358 | } |
| 359 | buf[sizeof(buf) - 1] = 0; |
| 360 | client_version_string = xstrdup(buf); |
| 361 | } |
| 362 | |
| 363 | /* |
| 364 | * Check that the versions match. In future this might accept |
| 365 | * several versions and set appropriate flags to handle them. |
| 366 | */ |
| 367 | if (sscanf(client_version_string, "SSH-%d.%d-%[^\n]\n", |
| 368 | &remote_major, &remote_minor, remote_version) != 3) { |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 369 | s = "Protocol mismatch.\n"; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 370 | (void) atomicio(write, sock_out, s, strlen(s)); |
| 371 | close(sock_in); |
| 372 | close(sock_out); |
| 373 | log("Bad protocol version identification '%.100s' from %s", |
| 374 | client_version_string, get_remote_ipaddr()); |
| 375 | fatal_cleanup(); |
| 376 | } |
| 377 | debug("Client protocol version %d.%d; client software version %.100s", |
| 378 | remote_major, remote_minor, remote_version); |
| 379 | |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 380 | compat_datafellows(remote_version); |
| 381 | |
Damien Miller | 27dbe6f | 2001-03-19 22:36:20 +1100 | [diff] [blame] | 382 | if (datafellows & SSH_BUG_SCANNER) { |
| 383 | log("scanned from %s with %s. Don't panic.", |
| 384 | get_remote_ipaddr(), client_version_string); |
| 385 | fatal_cleanup(); |
| 386 | } |
| 387 | |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 388 | mismatch = 0; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 389 | switch(remote_major) { |
| 390 | case 1: |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 391 | if (remote_minor == 99) { |
| 392 | if (options.protocol & SSH_PROTO_2) |
| 393 | enable_compat20(); |
| 394 | else |
| 395 | mismatch = 1; |
| 396 | break; |
| 397 | } |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 398 | if (!(options.protocol & SSH_PROTO_1)) { |
| 399 | mismatch = 1; |
| 400 | break; |
| 401 | } |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 402 | if (remote_minor < 3) { |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 403 | packet_disconnect("Your ssh version is too old and " |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 404 | "is no longer supported. Please install a newer version."); |
| 405 | } else if (remote_minor == 3) { |
| 406 | /* note that this disables agent-forwarding */ |
| 407 | enable_compat13(); |
| 408 | } |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 409 | break; |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 410 | case 2: |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 411 | if (options.protocol & SSH_PROTO_2) { |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 412 | enable_compat20(); |
| 413 | break; |
| 414 | } |
| 415 | /* FALLTHROUGH */ |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 416 | default: |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 417 | mismatch = 1; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 418 | break; |
| 419 | } |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 420 | chop(server_version_string); |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 421 | debug("Local version string %.200s", server_version_string); |
| 422 | |
| 423 | if (mismatch) { |
| 424 | s = "Protocol major versions differ.\n"; |
| 425 | (void) atomicio(write, sock_out, s, strlen(s)); |
| 426 | close(sock_in); |
| 427 | close(sock_out); |
| 428 | log("Protocol major versions differ for %s: %.200s vs. %.200s", |
| 429 | get_remote_ipaddr(), |
| 430 | server_version_string, client_version_string); |
| 431 | fatal_cleanup(); |
| 432 | } |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 433 | if (compat20) |
| 434 | packet_set_ssh2_format(); |
| 435 | } |
| 436 | |
| 437 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 438 | /* Destroy the host and server keys. They will no longer be needed. */ |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 439 | void |
| 440 | destroy_sensitive_data(void) |
| 441 | { |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 442 | int i; |
| 443 | |
| 444 | if (sensitive_data.server_key) { |
| 445 | key_free(sensitive_data.server_key); |
| 446 | sensitive_data.server_key = NULL; |
| 447 | } |
Kevin Steves | ef4eea9 | 2001-02-05 12:42:17 +0000 | [diff] [blame] | 448 | for(i = 0; i < options.num_host_key_files; i++) { |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 449 | if (sensitive_data.host_keys[i]) { |
| 450 | key_free(sensitive_data.host_keys[i]); |
| 451 | sensitive_data.host_keys[i] = NULL; |
| 452 | } |
| 453 | } |
| 454 | sensitive_data.ssh1_host_key = NULL; |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 455 | memset(sensitive_data.ssh1_cookie, 0, SSH_SESSION_KEY_LENGTH); |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 456 | } |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 457 | |
| 458 | char * |
| 459 | list_hostkey_types(void) |
| 460 | { |
| 461 | static char buf[1024]; |
| 462 | int i; |
| 463 | buf[0] = '\0'; |
| 464 | for(i = 0; i < options.num_host_key_files; i++) { |
| 465 | Key *key = sensitive_data.host_keys[i]; |
| 466 | if (key == NULL) |
| 467 | continue; |
| 468 | switch(key->type) { |
| 469 | case KEY_RSA: |
| 470 | case KEY_DSA: |
| 471 | strlcat(buf, key_ssh_name(key), sizeof buf); |
| 472 | strlcat(buf, ",", sizeof buf); |
| 473 | break; |
| 474 | } |
| 475 | } |
| 476 | i = strlen(buf); |
| 477 | if (i > 0 && buf[i-1] == ',') |
| 478 | buf[i-1] = '\0'; |
| 479 | debug("list_hostkey_types: %s", buf); |
| 480 | return buf; |
| 481 | } |
| 482 | |
| 483 | Key * |
| 484 | get_hostkey_by_type(int type) |
| 485 | { |
| 486 | int i; |
| 487 | for(i = 0; i < options.num_host_key_files; i++) { |
| 488 | Key *key = sensitive_data.host_keys[i]; |
| 489 | if (key != NULL && key->type == type) |
| 490 | return key; |
| 491 | } |
| 492 | return NULL; |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 493 | } |
| 494 | |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 495 | /* |
| 496 | * returns 1 if connection should be dropped, 0 otherwise. |
| 497 | * dropping starts at connection #max_startups_begin with a probability |
| 498 | * of (max_startups_rate/100). the probability increases linearly until |
| 499 | * all connections are dropped for startups > max_startups |
| 500 | */ |
| 501 | int |
| 502 | drop_connection(int startups) |
| 503 | { |
| 504 | double p, r; |
| 505 | |
| 506 | if (startups < options.max_startups_begin) |
| 507 | return 0; |
| 508 | if (startups >= options.max_startups) |
| 509 | return 1; |
| 510 | if (options.max_startups_rate == 100) |
| 511 | return 1; |
| 512 | |
| 513 | p = 100 - options.max_startups_rate; |
| 514 | p *= startups - options.max_startups_begin; |
| 515 | p /= (double) (options.max_startups - options.max_startups_begin); |
| 516 | p += options.max_startups_rate; |
| 517 | p /= 100.0; |
| 518 | r = arc4random() / (double) UINT_MAX; |
| 519 | |
| 520 | debug("drop_connection: p %g, r %g", p, r); |
| 521 | return (r < p) ? 1 : 0; |
| 522 | } |
| 523 | |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 524 | int *startup_pipes = NULL; /* options.max_startup sized array of fd ints */ |
| 525 | int startup_pipe; /* in child */ |
| 526 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 527 | /* |
| 528 | * Main program for the daemon. |
| 529 | */ |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 530 | int |
| 531 | main(int ac, char **av) |
| 532 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 533 | extern char *optarg; |
| 534 | extern int optind; |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 535 | int opt, sock_in = 0, sock_out = 0, newsock, j, i, fdsetsz, on = 1; |
Damien Miller | 166fca8 | 2000-04-20 07:42:21 +1000 | [diff] [blame] | 536 | pid_t pid; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 537 | socklen_t fromlen; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 538 | fd_set *fdset; |
| 539 | struct sockaddr_storage from; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 540 | const char *remote_ip; |
| 541 | int remote_port; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 542 | FILE *f; |
| 543 | struct linger linger; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 544 | struct addrinfo *ai; |
| 545 | char ntop[NI_MAXHOST], strport[NI_MAXSERV]; |
| 546 | int listen_sock, maxfd; |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 547 | int startup_p[2]; |
| 548 | int startups = 0; |
Ben Lindstrom | d0fca42 | 2001-03-26 13:44:06 +0000 | [diff] [blame] | 549 | Key *key; |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 550 | int ret, key_used = 0; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 551 | |
Ben Lindstrom | 49a79c0 | 2000-11-17 03:47:20 +0000 | [diff] [blame] | 552 | __progname = get_progname(av[0]); |
Damien Miller | f9b625c | 2000-07-09 22:42:32 +1000 | [diff] [blame] | 553 | init_rng(); |
| 554 | |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 555 | /* Save argv. */ |
Damien Miller | b8c656e | 2000-06-28 15:22:41 +1000 | [diff] [blame] | 556 | saved_argc = ac; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 557 | saved_argv = av; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 558 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 559 | /* Initialize configuration options to their default values. */ |
| 560 | initialize_server_options(&options); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 561 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 562 | /* Parse command-line arguments. */ |
Ben Lindstrom | bf555ba | 2001-01-18 02:04:35 +0000 | [diff] [blame] | 563 | while ((opt = getopt(ac, av, "f:p:b:k:h:g:V:u:dDiqQ46")) != -1) { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 564 | switch (opt) { |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 565 | case '4': |
| 566 | IPv4or6 = AF_INET; |
| 567 | break; |
| 568 | case '6': |
| 569 | IPv4or6 = AF_INET6; |
| 570 | break; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 571 | case 'f': |
| 572 | config_file_name = optarg; |
| 573 | break; |
| 574 | case 'd': |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 575 | if (0 == debug_flag) { |
| 576 | debug_flag = 1; |
| 577 | options.log_level = SYSLOG_LEVEL_DEBUG1; |
| 578 | } else if (options.log_level < SYSLOG_LEVEL_DEBUG3) { |
| 579 | options.log_level++; |
| 580 | } else { |
| 581 | fprintf(stderr, "Too high debugging level.\n"); |
| 582 | exit(1); |
| 583 | } |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 584 | break; |
Ben Lindstrom | c72745a | 2000-12-02 19:03:54 +0000 | [diff] [blame] | 585 | case 'D': |
| 586 | no_daemon_flag = 1; |
| 587 | break; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 588 | case 'i': |
| 589 | inetd_flag = 1; |
| 590 | break; |
| 591 | case 'Q': |
Ben Lindstrom | d539020 | 2001-01-29 08:07:43 +0000 | [diff] [blame] | 592 | /* ignored */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 593 | break; |
| 594 | case 'q': |
| 595 | options.log_level = SYSLOG_LEVEL_QUIET; |
| 596 | break; |
| 597 | case 'b': |
| 598 | options.server_key_bits = atoi(optarg); |
| 599 | break; |
| 600 | case 'p': |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 601 | options.ports_from_cmdline = 1; |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 602 | if (options.num_ports >= MAX_PORTS) { |
| 603 | fprintf(stderr, "too many ports.\n"); |
| 604 | exit(1); |
| 605 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 606 | options.ports[options.num_ports++] = atoi(optarg); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 607 | break; |
| 608 | case 'g': |
| 609 | options.login_grace_time = atoi(optarg); |
| 610 | break; |
| 611 | case 'k': |
| 612 | options.key_regeneration_time = atoi(optarg); |
| 613 | break; |
| 614 | case 'h': |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 615 | if (options.num_host_key_files >= MAX_HOSTKEYS) { |
| 616 | fprintf(stderr, "too many host keys.\n"); |
| 617 | exit(1); |
| 618 | } |
| 619 | options.host_key_files[options.num_host_key_files++] = optarg; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 620 | break; |
| 621 | case 'V': |
| 622 | client_version_string = optarg; |
| 623 | /* only makes sense with inetd_flag, i.e. no listen() */ |
| 624 | inetd_flag = 1; |
| 625 | break; |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 626 | case 'u': |
| 627 | utmp_len = atoi(optarg); |
| 628 | break; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 629 | case '?': |
| 630 | default: |
| 631 | fprintf(stderr, "sshd version %s\n", SSH_VERSION); |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 632 | fprintf(stderr, "Usage: %s [options]\n", __progname); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 633 | fprintf(stderr, "Options:\n"); |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 634 | fprintf(stderr, " -f file Configuration file (default %s)\n", _PATH_SERVER_CONFIG_FILE); |
Damien Miller | e4340be | 2000-09-16 13:29:08 +1100 | [diff] [blame] | 635 | fprintf(stderr, " -d Debugging mode (multiple -d means more debugging)\n"); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 636 | fprintf(stderr, " -i Started from inetd\n"); |
Ben Lindstrom | 4dccfa5 | 2000-12-28 16:40:05 +0000 | [diff] [blame] | 637 | fprintf(stderr, " -D Do not fork into daemon mode\n"); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 638 | fprintf(stderr, " -q Quiet (no logging)\n"); |
| 639 | fprintf(stderr, " -p port Listen on the specified port (default: 22)\n"); |
| 640 | fprintf(stderr, " -k seconds Regenerate server key every this many seconds (default: 3600)\n"); |
Ben Lindstrom | d26dcf3 | 2001-01-06 15:18:16 +0000 | [diff] [blame] | 641 | fprintf(stderr, " -g seconds Grace period for authentication (default: 600)\n"); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 642 | fprintf(stderr, " -b bits Size of server RSA key (default: 768 bits)\n"); |
| 643 | fprintf(stderr, " -h file File from which to read host key (default: %s)\n", |
Ben Lindstrom | 226cfa0 | 2001-01-22 05:34:40 +0000 | [diff] [blame] | 644 | _PATH_HOST_KEY_FILE); |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 645 | fprintf(stderr, " -u len Maximum hostname length for utmp recording\n"); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 646 | fprintf(stderr, " -4 Use IPv4 only\n"); |
| 647 | fprintf(stderr, " -6 Use IPv6 only\n"); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 648 | exit(1); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 649 | } |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 650 | } |
Ben Lindstrom | 425fb02 | 2001-03-29 00:31:20 +0000 | [diff] [blame] | 651 | SSLeay_add_all_algorithms(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 652 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 653 | /* |
| 654 | * Force logging to stderr until we have loaded the private host |
| 655 | * key (unless started from inetd) |
| 656 | */ |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 657 | log_init(__progname, |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 658 | options.log_level == -1 ? SYSLOG_LEVEL_INFO : options.log_level, |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 659 | options.log_facility == -1 ? SYSLOG_FACILITY_AUTH : options.log_facility, |
Ben Lindstrom | d539020 | 2001-01-29 08:07:43 +0000 | [diff] [blame] | 660 | !inetd_flag); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 661 | |
Damien Miller | 60bc517 | 2001-03-19 09:38:15 +1100 | [diff] [blame] | 662 | seed_rng(); |
| 663 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 664 | /* Read server configuration options from the configuration file. */ |
| 665 | read_server_config(&options, config_file_name); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 666 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 667 | /* Fill in default values for those options not explicitly set. */ |
| 668 | fill_default_server_options(&options); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 669 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 670 | /* Check that there are no remaining arguments. */ |
| 671 | if (optind < ac) { |
| 672 | fprintf(stderr, "Extra argument %s.\n", av[optind]); |
| 673 | exit(1); |
| 674 | } |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 675 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 676 | debug("sshd version %.100s", SSH_VERSION); |
Damien Miller | 2ccf661 | 1999-11-15 15:25:10 +1100 | [diff] [blame] | 677 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 678 | /* load private host keys */ |
| 679 | sensitive_data.host_keys = xmalloc(options.num_host_key_files*sizeof(Key*)); |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 680 | for(i = 0; i < options.num_host_key_files; i++) |
| 681 | sensitive_data.host_keys[i] = NULL; |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 682 | sensitive_data.server_key = NULL; |
| 683 | sensitive_data.ssh1_host_key = NULL; |
| 684 | sensitive_data.have_ssh1_key = 0; |
| 685 | sensitive_data.have_ssh2_key = 0; |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 686 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 687 | for(i = 0; i < options.num_host_key_files; i++) { |
Ben Lindstrom | d0fca42 | 2001-03-26 13:44:06 +0000 | [diff] [blame] | 688 | key = key_load_private(options.host_key_files[i], "", NULL); |
| 689 | sensitive_data.host_keys[i] = key; |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 690 | if (key == NULL) { |
| 691 | error("Could not load host key: %.200s: %.100s", |
| 692 | options.host_key_files[i], strerror(errno)); |
Ben Lindstrom | d0fca42 | 2001-03-26 13:44:06 +0000 | [diff] [blame] | 693 | sensitive_data.host_keys[i] = NULL; |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 694 | continue; |
| 695 | } |
| 696 | switch(key->type){ |
| 697 | case KEY_RSA1: |
| 698 | sensitive_data.ssh1_host_key = key; |
| 699 | sensitive_data.have_ssh1_key = 1; |
| 700 | break; |
| 701 | case KEY_RSA: |
| 702 | case KEY_DSA: |
| 703 | sensitive_data.have_ssh2_key = 1; |
| 704 | break; |
| 705 | } |
Ben Lindstrom | d0fca42 | 2001-03-26 13:44:06 +0000 | [diff] [blame] | 706 | debug("private host key: #%d type %d %s", i, key->type, |
| 707 | key_type(key)); |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 708 | } |
| 709 | if ((options.protocol & SSH_PROTO_1) && !sensitive_data.have_ssh1_key) { |
| 710 | log("Disabling protocol version 1. Could not load host key"); |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 711 | options.protocol &= ~SSH_PROTO_1; |
| 712 | } |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 713 | if ((options.protocol & SSH_PROTO_2) && !sensitive_data.have_ssh2_key) { |
| 714 | log("Disabling protocol version 2. Could not load host key"); |
| 715 | options.protocol &= ~SSH_PROTO_2; |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 716 | } |
Kevin Steves | adf74cd | 2001-02-05 14:22:50 +0000 | [diff] [blame] | 717 | if (!(options.protocol & (SSH_PROTO_1|SSH_PROTO_2))) { |
Ben Lindstrom | 6df8ef4 | 2001-03-05 07:47:23 +0000 | [diff] [blame] | 718 | log("sshd: no hostkeys available -- exiting."); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 719 | exit(1); |
| 720 | } |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 721 | |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 722 | /* Check certain values for sanity. */ |
| 723 | if (options.protocol & SSH_PROTO_1) { |
| 724 | if (options.server_key_bits < 512 || |
| 725 | options.server_key_bits > 32768) { |
| 726 | fprintf(stderr, "Bad server key size.\n"); |
| 727 | exit(1); |
| 728 | } |
| 729 | /* |
| 730 | * Check that server and host key lengths differ sufficiently. This |
| 731 | * is necessary to make double encryption work with rsaref. Oh, I |
| 732 | * hate software patents. I dont know if this can go? Niels |
| 733 | */ |
| 734 | if (options.server_key_bits > |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 735 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n) - SSH_KEY_BITS_RESERVED && |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 736 | options.server_key_bits < |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 737 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n) + SSH_KEY_BITS_RESERVED) { |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 738 | options.server_key_bits = |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 739 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n) + SSH_KEY_BITS_RESERVED; |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 740 | debug("Forcing server key to %d bits to make it differ from host key.", |
| 741 | options.server_key_bits); |
| 742 | } |
| 743 | } |
| 744 | |
Damien Miller | 78315eb | 2000-09-29 23:01:36 +1100 | [diff] [blame] | 745 | #ifdef HAVE_SCO_PROTECTED_PW |
| 746 | (void) set_auth_parameters(ac, av); |
| 747 | #endif |
| 748 | |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 749 | /* Initialize the log (it is reinitialized below in case we forked). */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 750 | if (debug_flag && !inetd_flag) |
| 751 | log_stderr = 1; |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 752 | log_init(__progname, options.log_level, options.log_facility, log_stderr); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 753 | |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 754 | /* |
| 755 | * If not in debugging mode, and not started from inetd, disconnect |
| 756 | * from the controlling terminal, and fork. The original process |
| 757 | * exits. |
| 758 | */ |
Ben Lindstrom | c72745a | 2000-12-02 19:03:54 +0000 | [diff] [blame] | 759 | if (!(debug_flag || inetd_flag || no_daemon_flag)) { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 760 | #ifdef TIOCNOTTY |
| 761 | int fd; |
| 762 | #endif /* TIOCNOTTY */ |
| 763 | if (daemon(0, 0) < 0) |
| 764 | fatal("daemon() failed: %.200s", strerror(errno)); |
| 765 | |
| 766 | /* Disconnect from the controlling tty. */ |
| 767 | #ifdef TIOCNOTTY |
Ben Lindstrom | 31ca54a | 2001-02-09 02:11:24 +0000 | [diff] [blame] | 768 | fd = open(_PATH_TTY, O_RDWR | O_NOCTTY); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 769 | if (fd >= 0) { |
| 770 | (void) ioctl(fd, TIOCNOTTY, NULL); |
| 771 | close(fd); |
| 772 | } |
| 773 | #endif /* TIOCNOTTY */ |
| 774 | } |
| 775 | /* Reinitialize the log (because of the fork above). */ |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 776 | log_init(__progname, options.log_level, options.log_facility, log_stderr); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 777 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 778 | /* Initialize the random number generator. */ |
| 779 | arc4random_stir(); |
| 780 | |
| 781 | /* Chdir to the root directory so that the current disk can be |
| 782 | unmounted if desired. */ |
| 783 | chdir("/"); |
Ben Lindstrom | de71cda | 2001-03-24 00:43:26 +0000 | [diff] [blame] | 784 | |
| 785 | /* ignore SIGPIPE */ |
| 786 | signal(SIGPIPE, SIG_IGN); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 787 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 788 | /* Start listening for a socket, unless started from inetd. */ |
| 789 | if (inetd_flag) { |
| 790 | int s1, s2; |
| 791 | s1 = dup(0); /* Make sure descriptors 0, 1, and 2 are in use. */ |
| 792 | s2 = dup(s1); |
| 793 | sock_in = dup(0); |
| 794 | sock_out = dup(1); |
Damien Miller | 994cf14 | 2000-07-21 10:19:44 +1000 | [diff] [blame] | 795 | startup_pipe = -1; |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 796 | /* |
| 797 | * We intentionally do not close the descriptors 0, 1, and 2 |
| 798 | * as our code for setting the descriptors won\'t work if |
| 799 | * ttyfd happens to be one of those. |
| 800 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 801 | debug("inetd sockets after dupping: %d, %d", sock_in, sock_out); |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 802 | if (options.protocol & SSH_PROTO_1) |
Ben Lindstrom | ca42d5f | 2001-03-09 18:25:32 +0000 | [diff] [blame] | 803 | generate_ephemeral_server_key(); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 804 | } else { |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 805 | for (ai = options.listen_addrs; ai; ai = ai->ai_next) { |
| 806 | if (ai->ai_family != AF_INET && ai->ai_family != AF_INET6) |
| 807 | continue; |
| 808 | if (num_listen_socks >= MAX_LISTEN_SOCKS) |
| 809 | fatal("Too many listen sockets. " |
| 810 | "Enlarge MAX_LISTEN_SOCKS"); |
| 811 | if (getnameinfo(ai->ai_addr, ai->ai_addrlen, |
| 812 | ntop, sizeof(ntop), strport, sizeof(strport), |
| 813 | NI_NUMERICHOST|NI_NUMERICSERV) != 0) { |
| 814 | error("getnameinfo failed"); |
| 815 | continue; |
| 816 | } |
| 817 | /* Create socket for listening. */ |
| 818 | listen_sock = socket(ai->ai_family, SOCK_STREAM, 0); |
| 819 | if (listen_sock < 0) { |
| 820 | /* kernel may not support ipv6 */ |
| 821 | verbose("socket: %.100s", strerror(errno)); |
| 822 | continue; |
| 823 | } |
| 824 | if (fcntl(listen_sock, F_SETFL, O_NONBLOCK) < 0) { |
| 825 | error("listen_sock O_NONBLOCK: %s", strerror(errno)); |
| 826 | close(listen_sock); |
| 827 | continue; |
| 828 | } |
| 829 | /* |
| 830 | * Set socket options. We try to make the port |
| 831 | * reusable and have it close as fast as possible |
| 832 | * without waiting in unnecessary wait states on |
| 833 | * close. |
| 834 | */ |
| 835 | setsockopt(listen_sock, SOL_SOCKET, SO_REUSEADDR, |
| 836 | (void *) &on, sizeof(on)); |
| 837 | linger.l_onoff = 1; |
| 838 | linger.l_linger = 5; |
| 839 | setsockopt(listen_sock, SOL_SOCKET, SO_LINGER, |
| 840 | (void *) &linger, sizeof(linger)); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 841 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 842 | debug("Bind to port %s on %s.", strport, ntop); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 843 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 844 | /* Bind the socket to the desired port. */ |
Damien Miller | 0a4e27d | 2001-02-18 12:36:39 +1100 | [diff] [blame] | 845 | if (bind(listen_sock, ai->ai_addr, ai->ai_addrlen) < 0) { |
| 846 | if (!ai->ai_next) |
| 847 | error("Bind to port %s on %s failed: %.200s.", |
| 848 | strport, ntop, strerror(errno)); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 849 | close(listen_sock); |
| 850 | continue; |
| 851 | } |
| 852 | listen_socks[num_listen_socks] = listen_sock; |
| 853 | num_listen_socks++; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 854 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 855 | /* Start listening on the port. */ |
| 856 | log("Server listening on %s port %s.", ntop, strport); |
| 857 | if (listen(listen_sock, 5) < 0) |
| 858 | fatal("listen: %.100s", strerror(errno)); |
| 859 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 860 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 861 | freeaddrinfo(options.listen_addrs); |
| 862 | |
| 863 | if (!num_listen_socks) |
| 864 | fatal("Cannot bind any address."); |
| 865 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 866 | if (!debug_flag) { |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 867 | /* |
Ben Lindstrom | 7ad9710 | 2000-12-06 01:42:49 +0000 | [diff] [blame] | 868 | * Record our pid in /var/run/sshd.pid to make it |
| 869 | * easier to kill the correct sshd. We don't want to |
| 870 | * do this before the bind above because the bind will |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 871 | * fail if there already is a daemon, and this will |
| 872 | * overwrite any old pid in the file. |
| 873 | */ |
Damien Miller | bac2d8a | 2000-09-05 16:13:06 +1100 | [diff] [blame] | 874 | f = fopen(options.pid_file, "wb"); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 875 | if (f) { |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 876 | fprintf(f, "%u\n", (u_int) getpid()); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 877 | fclose(f); |
| 878 | } |
| 879 | } |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 880 | if (options.protocol & SSH_PROTO_1) |
Ben Lindstrom | ca42d5f | 2001-03-09 18:25:32 +0000 | [diff] [blame] | 881 | generate_ephemeral_server_key(); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 882 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 883 | /* Arrange to restart on SIGHUP. The handler needs listen_sock. */ |
| 884 | signal(SIGHUP, sighup_handler); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 885 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 886 | signal(SIGTERM, sigterm_handler); |
| 887 | signal(SIGQUIT, sigterm_handler); |
| 888 | |
| 889 | /* Arrange SIGCHLD to be caught. */ |
| 890 | signal(SIGCHLD, main_sigchld_handler); |
| 891 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 892 | /* setup fd set for listen */ |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 893 | fdset = NULL; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 894 | maxfd = 0; |
| 895 | for (i = 0; i < num_listen_socks; i++) |
| 896 | if (listen_socks[i] > maxfd) |
| 897 | maxfd = listen_socks[i]; |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 898 | /* pipes connected to unauthenticated childs */ |
| 899 | startup_pipes = xmalloc(options.max_startups * sizeof(int)); |
| 900 | for (i = 0; i < options.max_startups; i++) |
| 901 | startup_pipes[i] = -1; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 902 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 903 | /* |
| 904 | * Stay listening for connections until the system crashes or |
| 905 | * the daemon is killed with a signal. |
| 906 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 907 | for (;;) { |
| 908 | if (received_sighup) |
| 909 | sighup_restart(); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 910 | if (fdset != NULL) |
| 911 | xfree(fdset); |
Ben Lindstrom | bf555ba | 2001-01-18 02:04:35 +0000 | [diff] [blame] | 912 | fdsetsz = howmany(maxfd+1, NFDBITS) * sizeof(fd_mask); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 913 | fdset = (fd_set *)xmalloc(fdsetsz); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 914 | memset(fdset, 0, fdsetsz); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 915 | |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 916 | for (i = 0; i < num_listen_socks; i++) |
| 917 | FD_SET(listen_socks[i], fdset); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 918 | for (i = 0; i < options.max_startups; i++) |
| 919 | if (startup_pipes[i] != -1) |
| 920 | FD_SET(startup_pipes[i], fdset); |
| 921 | |
| 922 | /* Wait in select until there is a connection. */ |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 923 | ret = select(maxfd+1, fdset, NULL, NULL, NULL); |
| 924 | if (ret < 0 && errno != EINTR) |
| 925 | error("select: %.100s", strerror(errno)); |
| 926 | if (key_used && key_do_regen) { |
Ben Lindstrom | ca42d5f | 2001-03-09 18:25:32 +0000 | [diff] [blame] | 927 | generate_ephemeral_server_key(); |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 928 | key_used = 0; |
| 929 | key_do_regen = 0; |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 930 | } |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 931 | if (ret < 0) |
| 932 | continue; |
| 933 | |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 934 | for (i = 0; i < options.max_startups; i++) |
| 935 | if (startup_pipes[i] != -1 && |
| 936 | FD_ISSET(startup_pipes[i], fdset)) { |
| 937 | /* |
| 938 | * the read end of the pipe is ready |
| 939 | * if the child has closed the pipe |
Ben Lindstrom | 4dccfa5 | 2000-12-28 16:40:05 +0000 | [diff] [blame] | 940 | * after successful authentication |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 941 | * or if the child has died |
| 942 | */ |
| 943 | close(startup_pipes[i]); |
| 944 | startup_pipes[i] = -1; |
| 945 | startups--; |
| 946 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 947 | for (i = 0; i < num_listen_socks; i++) { |
| 948 | if (!FD_ISSET(listen_socks[i], fdset)) |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 949 | continue; |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 950 | fromlen = sizeof(from); |
| 951 | newsock = accept(listen_socks[i], (struct sockaddr *)&from, |
| 952 | &fromlen); |
| 953 | if (newsock < 0) { |
| 954 | if (errno != EINTR && errno != EWOULDBLOCK) |
| 955 | error("accept: %.100s", strerror(errno)); |
| 956 | continue; |
| 957 | } |
| 958 | if (fcntl(newsock, F_SETFL, 0) < 0) { |
| 959 | error("newsock del O_NONBLOCK: %s", strerror(errno)); |
| 960 | continue; |
| 961 | } |
Damien Miller | 942da03 | 2000-08-18 13:59:06 +1000 | [diff] [blame] | 962 | if (drop_connection(startups) == 1) { |
| 963 | debug("drop connection #%d", startups); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 964 | close(newsock); |
| 965 | continue; |
| 966 | } |
| 967 | if (pipe(startup_p) == -1) { |
| 968 | close(newsock); |
| 969 | continue; |
| 970 | } |
| 971 | |
| 972 | for (j = 0; j < options.max_startups; j++) |
| 973 | if (startup_pipes[j] == -1) { |
| 974 | startup_pipes[j] = startup_p[0]; |
| 975 | if (maxfd < startup_p[0]) |
| 976 | maxfd = startup_p[0]; |
| 977 | startups++; |
| 978 | break; |
| 979 | } |
Kevin Steves | ef4eea9 | 2001-02-05 12:42:17 +0000 | [diff] [blame] | 980 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 981 | /* |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 982 | * Got connection. Fork a child to handle it, unless |
| 983 | * we are in debugging mode. |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 984 | */ |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 985 | if (debug_flag) { |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 986 | /* |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 987 | * In debugging mode. Close the listening |
| 988 | * socket, and start processing the |
| 989 | * connection without forking. |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 990 | */ |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 991 | debug("Server will not fork when running in debugging mode."); |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 992 | close_listen_socks(); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 993 | sock_in = newsock; |
| 994 | sock_out = newsock; |
Damien Miller | 4d97ba2 | 2000-07-11 18:15:50 +1000 | [diff] [blame] | 995 | startup_pipe = -1; |
Damien Miller | 182ee6e | 2000-07-12 09:45:27 +1000 | [diff] [blame] | 996 | pid = getpid(); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 997 | break; |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 998 | } else { |
| 999 | /* |
| 1000 | * Normal production daemon. Fork, and have |
| 1001 | * the child process the connection. The |
| 1002 | * parent continues listening. |
| 1003 | */ |
| 1004 | if ((pid = fork()) == 0) { |
| 1005 | /* |
| 1006 | * Child. Close the listening and max_startup |
| 1007 | * sockets. Start using the accepted socket. |
| 1008 | * Reinitialize logging (since our pid has |
| 1009 | * changed). We break out of the loop to handle |
| 1010 | * the connection. |
| 1011 | */ |
| 1012 | startup_pipe = startup_p[1]; |
| 1013 | for (j = 0; j < options.max_startups; j++) |
| 1014 | if (startup_pipes[j] != -1) |
| 1015 | close(startup_pipes[j]); |
| 1016 | close_listen_socks(); |
| 1017 | sock_in = newsock; |
| 1018 | sock_out = newsock; |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 1019 | log_init(__progname, options.log_level, options.log_facility, log_stderr); |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 1020 | break; |
| 1021 | } |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1022 | } |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 1023 | |
| 1024 | /* Parent. Stay in the loop. */ |
| 1025 | if (pid < 0) |
| 1026 | error("fork: %.100s", strerror(errno)); |
| 1027 | else |
| 1028 | debug("Forked child %d.", pid); |
| 1029 | |
| 1030 | close(startup_p[1]); |
| 1031 | |
| 1032 | /* Mark that the key has been used (it was "given" to the child). */ |
Ben Lindstrom | db65e8f | 2001-01-19 04:26:52 +0000 | [diff] [blame] | 1033 | if ((options.protocol & SSH_PROTO_1) && |
| 1034 | key_used == 0) { |
| 1035 | /* Schedule server key regeneration alarm. */ |
| 1036 | signal(SIGALRM, key_regeneration_alarm); |
| 1037 | alarm(options.key_regeneration_time); |
| 1038 | key_used = 1; |
| 1039 | } |
Damien Miller | 3702396 | 2000-07-11 17:31:38 +1000 | [diff] [blame] | 1040 | |
| 1041 | arc4random_stir(); |
| 1042 | |
| 1043 | /* Close the new socket (the child is now taking care of it). */ |
| 1044 | close(newsock); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1045 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1046 | /* child process check (or debug mode) */ |
| 1047 | if (num_listen_socks < 0) |
| 1048 | break; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1049 | } |
| 1050 | } |
| 1051 | |
| 1052 | /* This is the child processing a new connection. */ |
| 1053 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1054 | /* |
| 1055 | * Disable the key regeneration alarm. We will not regenerate the |
| 1056 | * key since we are no longer in a position to give it to anyone. We |
| 1057 | * will not restart on SIGHUP since it no longer makes sense. |
| 1058 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1059 | alarm(0); |
| 1060 | signal(SIGALRM, SIG_DFL); |
| 1061 | signal(SIGHUP, SIG_DFL); |
| 1062 | signal(SIGTERM, SIG_DFL); |
| 1063 | signal(SIGQUIT, SIG_DFL); |
| 1064 | signal(SIGCHLD, SIG_DFL); |
Damien Miller | 4e0f5e1 | 2000-08-29 11:05:50 +1100 | [diff] [blame] | 1065 | signal(SIGINT, SIG_DFL); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1066 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1067 | /* |
| 1068 | * Set socket options for the connection. We want the socket to |
| 1069 | * close as fast as possible without waiting for anything. If the |
| 1070 | * connection is not a socket, these will do nothing. |
| 1071 | */ |
| 1072 | /* setsockopt(sock_in, SOL_SOCKET, SO_REUSEADDR, (void *)&on, sizeof(on)); */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1073 | linger.l_onoff = 1; |
| 1074 | linger.l_linger = 5; |
| 1075 | setsockopt(sock_in, SOL_SOCKET, SO_LINGER, (void *) &linger, sizeof(linger)); |
| 1076 | |
Ben Lindstrom | bf555ba | 2001-01-18 02:04:35 +0000 | [diff] [blame] | 1077 | /* Set keepalives if requested. */ |
| 1078 | if (options.keepalives && |
| 1079 | setsockopt(sock_in, SOL_SOCKET, SO_KEEPALIVE, (void *)&on, |
| 1080 | sizeof(on)) < 0) |
| 1081 | error("setsockopt SO_KEEPALIVE: %.100s", strerror(errno)); |
| 1082 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1083 | /* |
| 1084 | * Register our connection. This turns encryption off because we do |
| 1085 | * not have a key. |
| 1086 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1087 | packet_set_connection(sock_in, sock_out); |
| 1088 | |
| 1089 | remote_port = get_remote_port(); |
| 1090 | remote_ip = get_remote_ipaddr(); |
| 1091 | |
| 1092 | /* Check whether logins are denied from this host. */ |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1093 | #ifdef LIBWRAP |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1094 | /* XXX LIBWRAP noes not know about IPv6 */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1095 | { |
| 1096 | struct request_info req; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1097 | |
Kevin Steves | ec84dc1 | 2000-12-13 17:45:15 +0000 | [diff] [blame] | 1098 | request_init(&req, RQ_DAEMON, __progname, RQ_FILE, sock_in, NULL); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1099 | fromhost(&req); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1100 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1101 | if (!hosts_access(&req)) { |
Ben Lindstrom | 7de696e | 2001-03-29 00:45:12 +0000 | [diff] [blame] | 1102 | refuse(&req); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1103 | close(sock_in); |
| 1104 | close(sock_out); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1105 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1106 | /*XXX IPv6 verbose("Connection from %.500s port %d", eval_client(&req), remote_port); */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1107 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1108 | #endif /* LIBWRAP */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1109 | /* Log the connection. */ |
| 1110 | verbose("Connection from %.500s port %d", remote_ip, remote_port); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1111 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1112 | /* |
| 1113 | * We don\'t want to listen forever unless the other side |
| 1114 | * successfully authenticates itself. So we set up an alarm which is |
| 1115 | * cleared after successful authentication. A limit of zero |
| 1116 | * indicates no limit. Note that we don\'t set the alarm in debugging |
| 1117 | * mode; it is just annoying to have the server exit just when you |
| 1118 | * are about to discover the bug. |
| 1119 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1120 | signal(SIGALRM, grace_alarm_handler); |
| 1121 | if (!debug_flag) |
| 1122 | alarm(options.login_grace_time); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1123 | |
Damien Miller | b38eff8 | 2000-04-01 11:09:21 +1000 | [diff] [blame] | 1124 | sshd_exchange_identification(sock_in, sock_out); |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1125 | /* |
Kevin Steves | fcec7f8 | 2000-12-15 19:55:48 +0000 | [diff] [blame] | 1126 | * Check that the connection comes from a privileged port. |
| 1127 | * Rhosts-Authentication only makes sense from priviledged |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1128 | * programs. Of course, if the intruder has root access on his local |
| 1129 | * machine, he can connect from any port. So do not use these |
| 1130 | * authentication methods from machines that you do not trust. |
| 1131 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1132 | if (remote_port >= IPPORT_RESERVED || |
| 1133 | remote_port < IPPORT_RESERVED / 2) { |
Kevin Steves | fcec7f8 | 2000-12-15 19:55:48 +0000 | [diff] [blame] | 1134 | debug("Rhosts Authentication disabled, " |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1135 | "originating port not trusted."); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1136 | options.rhosts_authentication = 0; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1137 | } |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1138 | #ifdef KRB4 |
| 1139 | if (!packet_connection_is_ipv4() && |
| 1140 | options.kerberos_authentication) { |
| 1141 | debug("Kerberos Authentication disabled, only available for IPv4."); |
| 1142 | options.kerberos_authentication = 0; |
| 1143 | } |
| 1144 | #endif /* KRB4 */ |
Ben Lindstrom | f79aeff | 2001-02-10 21:27:11 +0000 | [diff] [blame] | 1145 | #ifdef AFS |
| 1146 | /* If machine has AFS, set process authentication group. */ |
| 1147 | if (k_hasafs()) { |
| 1148 | k_setpag(); |
| 1149 | k_unlog(); |
| 1150 | } |
| 1151 | #endif /* AFS */ |
Damien Miller | 34132e5 | 2000-01-14 15:45:46 +1100 | [diff] [blame] | 1152 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1153 | packet_set_nonblocking(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1154 | |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1155 | /* perform the key exchange */ |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1156 | /* authenticate user and start session */ |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1157 | if (compat20) { |
| 1158 | do_ssh2_kex(); |
| 1159 | do_authentication2(); |
| 1160 | } else { |
| 1161 | do_ssh1_kex(); |
| 1162 | do_authentication(); |
| 1163 | } |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1164 | |
| 1165 | #ifdef KRB4 |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1166 | /* Cleanup user's ticket cache file. */ |
| 1167 | if (options.kerberos_ticket_cleanup) |
| 1168 | (void) dest_tkt(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1169 | #endif /* KRB4 */ |
| 1170 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1171 | /* The connection has been terminated. */ |
| 1172 | verbose("Closing connection to %.100s", remote_ip); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1173 | |
Damien Miller | beb4ba5 | 1999-12-28 15:09:35 +1100 | [diff] [blame] | 1174 | #ifdef USE_PAM |
Damien Miller | e72b7af | 1999-12-30 15:08:44 +1100 | [diff] [blame] | 1175 | finish_pam(); |
Damien Miller | beb4ba5 | 1999-12-28 15:09:35 +1100 | [diff] [blame] | 1176 | #endif /* USE_PAM */ |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1177 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1178 | packet_close(); |
| 1179 | exit(0); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1180 | } |
| 1181 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1182 | /* |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1183 | * SSH1 key exchange |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1184 | */ |
Damien Miller | 2ccf661 | 1999-11-15 15:25:10 +1100 | [diff] [blame] | 1185 | void |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 1186 | do_ssh1_kex(void) |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1187 | { |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1188 | int i, len; |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1189 | int plen, slen; |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1190 | int rsafail = 0; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1191 | BIGNUM *session_key_int; |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 1192 | u_char session_key[SSH_SESSION_KEY_LENGTH]; |
| 1193 | u_char cookie[8]; |
| 1194 | u_int cipher_type, auth_mask, protocol_flags; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1195 | u_int32_t rand = 0; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1196 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1197 | /* |
| 1198 | * Generate check bytes that the client must send back in the user |
| 1199 | * packet in order for it to be accepted; this is used to defy ip |
| 1200 | * spoofing attacks. Note that this only works against somebody |
| 1201 | * doing IP spoofing from a remote machine; any machine on the local |
| 1202 | * network can still see outgoing packets and catch the random |
| 1203 | * cookie. This only affects rhosts authentication, and this is one |
| 1204 | * of the reasons why it is inherently insecure. |
| 1205 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1206 | for (i = 0; i < 8; i++) { |
| 1207 | if (i % 4 == 0) |
| 1208 | rand = arc4random(); |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1209 | cookie[i] = rand & 0xff; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1210 | rand >>= 8; |
| 1211 | } |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1212 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1213 | /* |
| 1214 | * Send our public key. We include in the packet 64 bits of random |
| 1215 | * data that must be matched in the reply in order to prevent IP |
| 1216 | * spoofing. |
| 1217 | */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1218 | packet_start(SSH_SMSG_PUBLIC_KEY); |
| 1219 | for (i = 0; i < 8; i++) |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1220 | packet_put_char(cookie[i]); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1221 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1222 | /* Store our public server RSA key. */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1223 | packet_put_int(BN_num_bits(sensitive_data.server_key->rsa->n)); |
| 1224 | packet_put_bignum(sensitive_data.server_key->rsa->e); |
| 1225 | packet_put_bignum(sensitive_data.server_key->rsa->n); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1226 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1227 | /* Store our public host RSA key. */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1228 | packet_put_int(BN_num_bits(sensitive_data.ssh1_host_key->rsa->n)); |
| 1229 | packet_put_bignum(sensitive_data.ssh1_host_key->rsa->e); |
| 1230 | packet_put_bignum(sensitive_data.ssh1_host_key->rsa->n); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1231 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1232 | /* Put protocol flags. */ |
| 1233 | packet_put_int(SSH_PROTOFLAG_HOST_IN_FWD_OPEN); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1234 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1235 | /* Declare which ciphers we support. */ |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1236 | packet_put_int(cipher_mask_ssh1(0)); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1237 | |
| 1238 | /* Declare supported authentication types. */ |
| 1239 | auth_mask = 0; |
| 1240 | if (options.rhosts_authentication) |
| 1241 | auth_mask |= 1 << SSH_AUTH_RHOSTS; |
| 1242 | if (options.rhosts_rsa_authentication) |
| 1243 | auth_mask |= 1 << SSH_AUTH_RHOSTS_RSA; |
| 1244 | if (options.rsa_authentication) |
| 1245 | auth_mask |= 1 << SSH_AUTH_RSA; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1246 | #ifdef KRB4 |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1247 | if (options.kerberos_authentication) |
| 1248 | auth_mask |= 1 << SSH_AUTH_KERBEROS; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1249 | #endif |
| 1250 | #ifdef AFS |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1251 | if (options.kerberos_tgt_passing) |
| 1252 | auth_mask |= 1 << SSH_PASS_KERBEROS_TGT; |
| 1253 | if (options.afs_token_passing) |
| 1254 | auth_mask |= 1 << SSH_PASS_AFS_TOKEN; |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1255 | #endif |
Ben Lindstrom | 95fb2dd | 2001-01-23 03:12:10 +0000 | [diff] [blame] | 1256 | if (options.challenge_reponse_authentication == 1) |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1257 | auth_mask |= 1 << SSH_AUTH_TIS; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1258 | if (options.password_authentication) |
| 1259 | auth_mask |= 1 << SSH_AUTH_PASSWORD; |
| 1260 | packet_put_int(auth_mask); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1261 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1262 | /* Send the packet and wait for it to be sent. */ |
| 1263 | packet_send(); |
| 1264 | packet_write_wait(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1265 | |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1266 | debug("Sent %d bit server key and %d bit host key.", |
| 1267 | BN_num_bits(sensitive_data.server_key->rsa->n), |
| 1268 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n)); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1269 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1270 | /* Read clients reply (cipher type and session key). */ |
| 1271 | packet_read_expect(&plen, SSH_CMSG_SESSION_KEY); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1272 | |
Damien Miller | 50945fa | 1999-12-09 10:31:37 +1100 | [diff] [blame] | 1273 | /* Get cipher type and check whether we accept this. */ |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1274 | cipher_type = packet_get_char(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1275 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1276 | if (!(cipher_mask_ssh1(0) & (1 << cipher_type))) |
Damien Miller | 50945fa | 1999-12-09 10:31:37 +1100 | [diff] [blame] | 1277 | packet_disconnect("Warning: client selects unsupported cipher."); |
| 1278 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1279 | /* Get check bytes from the packet. These must match those we |
| 1280 | sent earlier with the public key packet. */ |
| 1281 | for (i = 0; i < 8; i++) |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1282 | if (cookie[i] != packet_get_char()) |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1283 | packet_disconnect("IP Spoofing check bytes do not match."); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1284 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1285 | debug("Encryption type: %.200s", cipher_name(cipher_type)); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1286 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1287 | /* Get the encrypted integer. */ |
| 1288 | session_key_int = BN_new(); |
| 1289 | packet_get_bignum(session_key_int, &slen); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1290 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1291 | protocol_flags = packet_get_int(); |
| 1292 | packet_set_protocol_flags(protocol_flags); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1293 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1294 | packet_integrity_check(plen, 1 + 8 + slen + 4, SSH_CMSG_SESSION_KEY); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1295 | |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1296 | /* |
| 1297 | * Decrypt it using our private server key and private host key (key |
| 1298 | * with larger modulus first). |
| 1299 | */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1300 | if (BN_cmp(sensitive_data.server_key->rsa->n, sensitive_data.ssh1_host_key->rsa->n) > 0) { |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1301 | /* Server key has bigger modulus. */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1302 | if (BN_num_bits(sensitive_data.server_key->rsa->n) < |
| 1303 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n) + SSH_KEY_BITS_RESERVED) { |
| 1304 | fatal("do_connection: %s: server_key %d < host_key %d + SSH_KEY_BITS_RESERVED %d", |
| 1305 | get_remote_ipaddr(), |
| 1306 | BN_num_bits(sensitive_data.server_key->rsa->n), |
| 1307 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n), |
| 1308 | SSH_KEY_BITS_RESERVED); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1309 | } |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1310 | if (rsa_private_decrypt(session_key_int, session_key_int, |
| 1311 | sensitive_data.server_key->rsa) <= 0) |
| 1312 | rsafail++; |
| 1313 | if (rsa_private_decrypt(session_key_int, session_key_int, |
| 1314 | sensitive_data.ssh1_host_key->rsa) <= 0) |
| 1315 | rsafail++; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1316 | } else { |
| 1317 | /* Host key has bigger modulus (or they are equal). */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1318 | if (BN_num_bits(sensitive_data.ssh1_host_key->rsa->n) < |
| 1319 | BN_num_bits(sensitive_data.server_key->rsa->n) + SSH_KEY_BITS_RESERVED) { |
| 1320 | fatal("do_connection: %s: host_key %d < server_key %d + SSH_KEY_BITS_RESERVED %d", |
| 1321 | get_remote_ipaddr(), |
| 1322 | BN_num_bits(sensitive_data.ssh1_host_key->rsa->n), |
| 1323 | BN_num_bits(sensitive_data.server_key->rsa->n), |
| 1324 | SSH_KEY_BITS_RESERVED); |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1325 | } |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1326 | if (rsa_private_decrypt(session_key_int, session_key_int, |
| 1327 | sensitive_data.ssh1_host_key->rsa) < 0) |
| 1328 | rsafail++; |
| 1329 | if (rsa_private_decrypt(session_key_int, session_key_int, |
| 1330 | sensitive_data.server_key->rsa) < 0) |
| 1331 | rsafail++; |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1332 | } |
Damien Miller | 5428f64 | 1999-11-25 11:54:57 +1100 | [diff] [blame] | 1333 | /* |
| 1334 | * Extract session key from the decrypted integer. The key is in the |
| 1335 | * least significant 256 bits of the integer; the first byte of the |
| 1336 | * key is in the highest bits. |
| 1337 | */ |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1338 | if (!rsafail) { |
| 1339 | BN_mask_bits(session_key_int, sizeof(session_key) * 8); |
| 1340 | len = BN_num_bytes(session_key_int); |
| 1341 | if (len < 0 || len > sizeof(session_key)) { |
| 1342 | error("do_connection: bad session key len from %s: " |
Ben Lindstrom | 31ca54a | 2001-02-09 02:11:24 +0000 | [diff] [blame] | 1343 | "session_key_int %d > sizeof(session_key) %lu", |
| 1344 | get_remote_ipaddr(), len, (u_long)sizeof(session_key)); |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1345 | rsafail++; |
| 1346 | } else { |
| 1347 | memset(session_key, 0, sizeof(session_key)); |
| 1348 | BN_bn2bin(session_key_int, |
| 1349 | session_key + sizeof(session_key) - len); |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 1350 | |
| 1351 | compute_session_id(session_id, cookie, |
| 1352 | sensitive_data.ssh1_host_key->rsa->n, |
| 1353 | sensitive_data.server_key->rsa->n); |
| 1354 | /* |
| 1355 | * Xor the first 16 bytes of the session key with the |
| 1356 | * session id. |
| 1357 | */ |
| 1358 | for (i = 0; i < 16; i++) |
| 1359 | session_key[i] ^= session_id[i]; |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1360 | } |
| 1361 | } |
| 1362 | if (rsafail) { |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 1363 | int bytes = BN_num_bytes(session_key_int); |
| 1364 | char *buf = xmalloc(bytes); |
| 1365 | MD5_CTX md; |
| 1366 | |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1367 | log("do_connection: generating a fake encryption key"); |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 1368 | BN_bn2bin(session_key_int, buf); |
| 1369 | MD5_Init(&md); |
| 1370 | MD5_Update(&md, buf, bytes); |
| 1371 | MD5_Update(&md, sensitive_data.ssh1_cookie, SSH_SESSION_KEY_LENGTH); |
| 1372 | MD5_Final(session_key, &md); |
| 1373 | MD5_Init(&md); |
| 1374 | MD5_Update(&md, session_key, 16); |
| 1375 | MD5_Update(&md, buf, bytes); |
| 1376 | MD5_Update(&md, sensitive_data.ssh1_cookie, SSH_SESSION_KEY_LENGTH); |
| 1377 | MD5_Final(session_key + 16, &md); |
| 1378 | memset(buf, 0, bytes); |
| 1379 | xfree(buf); |
Ben Lindstrom | 941ac82 | 2001-03-05 06:25:23 +0000 | [diff] [blame] | 1380 | for (i = 0; i < 16; i++) |
| 1381 | session_id[i] = session_key[i] ^ session_key[i + 16]; |
Damien Miller | 7650bc6 | 2001-01-30 09:27:26 +1100 | [diff] [blame] | 1382 | } |
Ben Lindstrom | eb648a7 | 2001-03-05 06:00:29 +0000 | [diff] [blame] | 1383 | /* Destroy the private and public keys. They will no longer be needed. */ |
| 1384 | destroy_sensitive_data(); |
| 1385 | |
Damien Miller | 396691a | 2000-01-20 22:44:08 +1100 | [diff] [blame] | 1386 | /* Destroy the decrypted integer. It is no longer needed. */ |
| 1387 | BN_clear_free(session_key_int); |
| 1388 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1389 | /* Set the session key. From this on all communications will be encrypted. */ |
| 1390 | packet_set_encryption_key(session_key, SSH_SESSION_KEY_LENGTH, cipher_type); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1391 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1392 | /* Destroy our copy of the session key. It is no longer needed. */ |
| 1393 | memset(session_key, 0, sizeof(session_key)); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1394 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1395 | debug("Received session key; encryption turned on."); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1396 | |
Damien Miller | 95def09 | 1999-11-25 00:26:21 +1100 | [diff] [blame] | 1397 | /* Send an acknowledgement packet. Note that this packet is sent encrypted. */ |
| 1398 | packet_start(SSH_SMSG_SUCCESS); |
| 1399 | packet_send(); |
| 1400 | packet_write_wait(); |
Damien Miller | d4a8b7e | 1999-10-27 13:42:43 +1000 | [diff] [blame] | 1401 | } |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1402 | |
| 1403 | /* |
| 1404 | * SSH2 key exchange: diffie-hellman-group1-sha1 |
| 1405 | */ |
| 1406 | void |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 1407 | do_ssh2_kex(void) |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1408 | { |
| 1409 | Buffer *server_kexinit; |
| 1410 | Buffer *client_kexinit; |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1411 | int payload_len; |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1412 | int i; |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1413 | Kex *kex; |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1414 | char *cprop[PROPOSAL_MAX]; |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1415 | |
| 1416 | /* KEXINIT */ |
| 1417 | |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 1418 | if (options.ciphers != NULL) { |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 1419 | myproposal[PROPOSAL_ENC_ALGS_CTOS] = |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 1420 | myproposal[PROPOSAL_ENC_ALGS_STOC] = options.ciphers; |
| 1421 | } |
Damien Miller | a0ff466 | 2001-03-30 10:49:35 +1000 | [diff] [blame^] | 1422 | myproposal[PROPOSAL_ENC_ALGS_CTOS] = |
| 1423 | compat_cipher_proposal(myproposal[PROPOSAL_ENC_ALGS_CTOS]); |
| 1424 | myproposal[PROPOSAL_ENC_ALGS_STOC] = |
| 1425 | compat_cipher_proposal(myproposal[PROPOSAL_ENC_ALGS_STOC]); |
| 1426 | |
Ben Lindstrom | 06b33aa | 2001-02-15 03:01:59 +0000 | [diff] [blame] | 1427 | if (options.macs != NULL) { |
| 1428 | myproposal[PROPOSAL_MAC_ALGS_CTOS] = |
| 1429 | myproposal[PROPOSAL_MAC_ALGS_STOC] = options.macs; |
| 1430 | } |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1431 | myproposal[PROPOSAL_SERVER_HOST_KEY_ALGS] = list_hostkey_types(); |
| 1432 | |
Damien Miller | b1715dc | 2000-05-30 13:44:51 +1000 | [diff] [blame] | 1433 | server_kexinit = kex_init(myproposal); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1434 | client_kexinit = xmalloc(sizeof(*client_kexinit)); |
| 1435 | buffer_init(client_kexinit); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1436 | |
Damien Miller | b1715dc | 2000-05-30 13:44:51 +1000 | [diff] [blame] | 1437 | /* algorithm negotiation */ |
| 1438 | kex_exchange_kexinit(server_kexinit, client_kexinit, cprop); |
| 1439 | kex = kex_choose_conf(cprop, myproposal, 1); |
| 1440 | for (i = 0; i < PROPOSAL_MAX; i++) |
| 1441 | xfree(cprop[i]); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1442 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1443 | switch (kex->kex_type) { |
| 1444 | case DH_GRP1_SHA1: |
| 1445 | ssh_dh1_server(kex, client_kexinit, server_kexinit); |
| 1446 | break; |
| 1447 | case DH_GEX_SHA1: |
| 1448 | ssh_dhgex_server(kex, client_kexinit, server_kexinit); |
| 1449 | break; |
| 1450 | default: |
| 1451 | fatal("Unsupported key exchange %d", kex->kex_type); |
| 1452 | } |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1453 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1454 | debug("send SSH2_MSG_NEWKEYS."); |
| 1455 | packet_start(SSH2_MSG_NEWKEYS); |
| 1456 | packet_send(); |
| 1457 | packet_write_wait(); |
| 1458 | debug("done: send SSH2_MSG_NEWKEYS."); |
| 1459 | |
| 1460 | debug("Wait SSH2_MSG_NEWKEYS."); |
| 1461 | packet_read_expect(&payload_len, SSH2_MSG_NEWKEYS); |
| 1462 | debug("GOT SSH2_MSG_NEWKEYS."); |
| 1463 | |
| 1464 | #ifdef DEBUG_KEXDH |
| 1465 | /* send 1st encrypted/maced/compressed message */ |
| 1466 | packet_start(SSH2_MSG_IGNORE); |
| 1467 | packet_put_cstring("markus"); |
| 1468 | packet_send(); |
| 1469 | packet_write_wait(); |
| 1470 | #endif |
| 1471 | |
| 1472 | debug("done: KEX2."); |
| 1473 | } |
| 1474 | |
| 1475 | /* |
| 1476 | * SSH2 key exchange |
| 1477 | */ |
| 1478 | |
| 1479 | /* diffie-hellman-group1-sha1 */ |
| 1480 | |
| 1481 | void |
| 1482 | ssh_dh1_server(Kex *kex, Buffer *client_kexinit, Buffer *server_kexinit) |
| 1483 | { |
| 1484 | #ifdef DEBUG_KEXDH |
| 1485 | int i; |
| 1486 | #endif |
| 1487 | int payload_len, dlen; |
| 1488 | int slen; |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 1489 | u_char *signature = NULL; |
| 1490 | u_char *server_host_key_blob = NULL; |
| 1491 | u_int sbloblen; |
| 1492 | u_int klen, kout; |
| 1493 | u_char *kbuf; |
| 1494 | u_char *hash; |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1495 | BIGNUM *shared_secret = 0; |
| 1496 | DH *dh; |
| 1497 | BIGNUM *dh_client_pub = 0; |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1498 | Key *hostkey; |
| 1499 | |
| 1500 | hostkey = get_hostkey_by_type(kex->hostkey_type); |
| 1501 | if (hostkey == NULL) |
| 1502 | fatal("Unsupported hostkey type %d", kex->hostkey_type); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1503 | |
| 1504 | /* KEXDH */ |
Kevin Steves | 6b87586 | 2000-12-15 23:31:01 +0000 | [diff] [blame] | 1505 | /* generate DH key */ |
| 1506 | dh = dh_new_group1(); /* XXX depends on 'kex' */ |
Ben Lindstrom | 4c4f05e | 2001-03-06 01:09:20 +0000 | [diff] [blame] | 1507 | dh_gen_key(dh, kex->we_need * 8); |
Kevin Steves | 6b87586 | 2000-12-15 23:31:01 +0000 | [diff] [blame] | 1508 | |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1509 | debug("Wait SSH2_MSG_KEXDH_INIT."); |
| 1510 | packet_read_expect(&payload_len, SSH2_MSG_KEXDH_INIT); |
| 1511 | |
| 1512 | /* key, cert */ |
| 1513 | dh_client_pub = BN_new(); |
| 1514 | if (dh_client_pub == NULL) |
| 1515 | fatal("dh_client_pub == NULL"); |
| 1516 | packet_get_bignum2(dh_client_pub, &dlen); |
| 1517 | |
| 1518 | #ifdef DEBUG_KEXDH |
| 1519 | fprintf(stderr, "\ndh_client_pub= "); |
Damien Miller | 62cee00 | 2000-09-23 17:15:56 +1100 | [diff] [blame] | 1520 | BN_print_fp(stderr, dh_client_pub); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1521 | fprintf(stderr, "\n"); |
| 1522 | debug("bits %d", BN_num_bits(dh_client_pub)); |
| 1523 | #endif |
| 1524 | |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1525 | #ifdef DEBUG_KEXDH |
| 1526 | fprintf(stderr, "\np= "); |
Damien Miller | 62cee00 | 2000-09-23 17:15:56 +1100 | [diff] [blame] | 1527 | BN_print_fp(stderr, dh->p); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1528 | fprintf(stderr, "\ng= "); |
Damien Miller | 62cee00 | 2000-09-23 17:15:56 +1100 | [diff] [blame] | 1529 | bn_print(dh->g); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1530 | fprintf(stderr, "\npub= "); |
Damien Miller | 62cee00 | 2000-09-23 17:15:56 +1100 | [diff] [blame] | 1531 | BN_print_fp(stderr, dh->pub_key); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1532 | fprintf(stderr, "\n"); |
Kevin Steves | ef4eea9 | 2001-02-05 12:42:17 +0000 | [diff] [blame] | 1533 | DHparams_print_fp(stderr, dh); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1534 | #endif |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 1535 | if (!dh_pub_is_valid(dh, dh_client_pub)) |
| 1536 | packet_disconnect("bad client public DH value"); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1537 | |
| 1538 | klen = DH_size(dh); |
| 1539 | kbuf = xmalloc(klen); |
| 1540 | kout = DH_compute_key(kbuf, dh_client_pub, dh); |
| 1541 | |
| 1542 | #ifdef DEBUG_KEXDH |
| 1543 | debug("shared secret: len %d/%d", klen, kout); |
| 1544 | fprintf(stderr, "shared secret == "); |
| 1545 | for (i = 0; i< kout; i++) |
| 1546 | fprintf(stderr, "%02x", (kbuf[i])&0xff); |
| 1547 | fprintf(stderr, "\n"); |
| 1548 | #endif |
| 1549 | shared_secret = BN_new(); |
| 1550 | |
| 1551 | BN_bin2bn(kbuf, kout, shared_secret); |
| 1552 | memset(kbuf, 0, klen); |
| 1553 | xfree(kbuf); |
| 1554 | |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 1555 | /* XXX precompute? */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1556 | key_to_blob(hostkey, &server_host_key_blob, &sbloblen); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1557 | |
| 1558 | /* calc H */ /* XXX depends on 'kex' */ |
| 1559 | hash = kex_hash( |
| 1560 | client_version_string, |
| 1561 | server_version_string, |
| 1562 | buffer_ptr(client_kexinit), buffer_len(client_kexinit), |
| 1563 | buffer_ptr(server_kexinit), buffer_len(server_kexinit), |
| 1564 | (char *)server_host_key_blob, sbloblen, |
| 1565 | dh_client_pub, |
| 1566 | dh->pub_key, |
| 1567 | shared_secret |
| 1568 | ); |
| 1569 | buffer_free(client_kexinit); |
| 1570 | buffer_free(server_kexinit); |
| 1571 | xfree(client_kexinit); |
| 1572 | xfree(server_kexinit); |
Ben Lindstrom | b1985f7 | 2001-01-23 00:19:15 +0000 | [diff] [blame] | 1573 | BN_free(dh_client_pub); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1574 | #ifdef DEBUG_KEXDH |
Damien Miller | 4af5130 | 2000-04-16 11:18:38 +1000 | [diff] [blame] | 1575 | fprintf(stderr, "hash == "); |
| 1576 | for (i = 0; i< 20; i++) |
| 1577 | fprintf(stderr, "%02x", (hash[i])&0xff); |
| 1578 | fprintf(stderr, "\n"); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1579 | #endif |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 1580 | /* save session id := H */ |
| 1581 | /* XXX hashlen depends on KEX */ |
| 1582 | session_id2_len = 20; |
| 1583 | session_id2 = xmalloc(session_id2_len); |
| 1584 | memcpy(session_id2, hash, session_id2_len); |
| 1585 | |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1586 | /* sign H */ |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 1587 | /* XXX hashlen depends on KEX */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1588 | key_sign(hostkey, &signature, &slen, hash, 20); |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 1589 | |
| 1590 | destroy_sensitive_data(); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1591 | |
| 1592 | /* send server hostkey, DH pubkey 'f' and singed H */ |
| 1593 | packet_start(SSH2_MSG_KEXDH_REPLY); |
| 1594 | packet_put_string((char *)server_host_key_blob, sbloblen); |
Damien Miller | e247cc4 | 2000-05-07 12:03:14 +1000 | [diff] [blame] | 1595 | packet_put_bignum2(dh->pub_key); /* f */ |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1596 | packet_put_string((char *)signature, slen); |
| 1597 | packet_send(); |
Damien Miller | 8bb73be | 2000-04-19 16:26:12 +1000 | [diff] [blame] | 1598 | xfree(signature); |
Damien Miller | eba71ba | 2000-04-29 23:57:08 +1000 | [diff] [blame] | 1599 | xfree(server_host_key_blob); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1600 | packet_write_wait(); |
| 1601 | |
| 1602 | kex_derive_keys(kex, hash, shared_secret); |
Ben Lindstrom | b1985f7 | 2001-01-23 00:19:15 +0000 | [diff] [blame] | 1603 | BN_clear_free(shared_secret); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1604 | packet_set_kex(kex); |
| 1605 | |
| 1606 | /* have keys, free DH */ |
| 1607 | DH_free(dh); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1608 | } |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1609 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1610 | /* diffie-hellman-group-exchange-sha1 */ |
| 1611 | |
| 1612 | void |
| 1613 | ssh_dhgex_server(Kex *kex, Buffer *client_kexinit, Buffer *server_kexinit) |
| 1614 | { |
| 1615 | #ifdef DEBUG_KEXDH |
| 1616 | int i; |
| 1617 | #endif |
| 1618 | int payload_len, dlen; |
Ben Lindstrom | df22139 | 2001-03-29 00:36:16 +0000 | [diff] [blame] | 1619 | int slen, nbits, type, min, max; |
Ben Lindstrom | 46c1622 | 2000-12-22 01:43:59 +0000 | [diff] [blame] | 1620 | u_char *signature = NULL; |
| 1621 | u_char *server_host_key_blob = NULL; |
| 1622 | u_int sbloblen; |
| 1623 | u_int klen, kout; |
| 1624 | u_char *kbuf; |
| 1625 | u_char *hash; |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1626 | BIGNUM *shared_secret = 0; |
| 1627 | DH *dh; |
| 1628 | BIGNUM *dh_client_pub = 0; |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1629 | Key *hostkey; |
| 1630 | |
| 1631 | hostkey = get_hostkey_by_type(kex->hostkey_type); |
| 1632 | if (hostkey == NULL) |
| 1633 | fatal("Unsupported hostkey type %d", kex->hostkey_type); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1634 | |
| 1635 | /* KEXDHGEX */ |
| 1636 | debug("Wait SSH2_MSG_KEX_DH_GEX_REQUEST."); |
Ben Lindstrom | df22139 | 2001-03-29 00:36:16 +0000 | [diff] [blame] | 1637 | type = packet_read(&payload_len); |
| 1638 | if (type != SSH2_MSG_KEX_DH_GEX_REQUEST_OLD && |
| 1639 | type != SSH2_MSG_KEX_DH_GEX_REQUEST) |
| 1640 | packet_disconnect("Protocol error: expected type %d or %d, got %d", |
| 1641 | SSH2_MSG_KEX_DH_GEX_REQUEST_OLD, |
| 1642 | SSH2_MSG_KEX_DH_GEX_REQUEST, |
| 1643 | type); |
| 1644 | if (type == SSH2_MSG_KEX_DH_GEX_REQUEST_OLD) { |
| 1645 | nbits = packet_get_int(); |
| 1646 | min = DH_GRP_MIN; |
| 1647 | max = DH_GRP_MAX; |
| 1648 | } else { |
| 1649 | min = packet_get_int(); |
| 1650 | nbits = packet_get_int(); |
| 1651 | max = packet_get_int(); |
| 1652 | |
| 1653 | min = MAX(DH_GRP_MIN, min); |
| 1654 | max = MIN(DH_GRP_MAX, max); |
| 1655 | } |
| 1656 | |
| 1657 | if (max < min || nbits < min || max < nbits) |
| 1658 | fatal("DH_GEX_REQUEST, bad parameters: %d !< %d !< %d", |
| 1659 | min, nbits, max); |
| 1660 | |
| 1661 | dh = choose_dh(min, nbits, max); |
| 1662 | if (dh == NULL) |
| 1663 | packet_disconnect("Protocol error: no matching DH grp found"); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1664 | |
| 1665 | debug("Sending SSH2_MSG_KEX_DH_GEX_GROUP."); |
| 1666 | packet_start(SSH2_MSG_KEX_DH_GEX_GROUP); |
| 1667 | packet_put_bignum2(dh->p); |
| 1668 | packet_put_bignum2(dh->g); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1669 | packet_send(); |
| 1670 | packet_write_wait(); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1671 | |
Kevin Steves | 6b87586 | 2000-12-15 23:31:01 +0000 | [diff] [blame] | 1672 | /* Compute our exchange value in parallel with the client */ |
| 1673 | |
Ben Lindstrom | 4c4f05e | 2001-03-06 01:09:20 +0000 | [diff] [blame] | 1674 | dh_gen_key(dh, kex->we_need * 8); |
Kevin Steves | 6b87586 | 2000-12-15 23:31:01 +0000 | [diff] [blame] | 1675 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1676 | debug("Wait SSH2_MSG_KEX_DH_GEX_INIT."); |
| 1677 | packet_read_expect(&payload_len, SSH2_MSG_KEX_DH_GEX_INIT); |
| 1678 | |
| 1679 | /* key, cert */ |
| 1680 | dh_client_pub = BN_new(); |
| 1681 | if (dh_client_pub == NULL) |
| 1682 | fatal("dh_client_pub == NULL"); |
| 1683 | packet_get_bignum2(dh_client_pub, &dlen); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1684 | |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 1685 | #ifdef DEBUG_KEXDH |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1686 | fprintf(stderr, "\ndh_client_pub= "); |
| 1687 | BN_print_fp(stderr, dh_client_pub); |
| 1688 | fprintf(stderr, "\n"); |
| 1689 | debug("bits %d", BN_num_bits(dh_client_pub)); |
Damien Miller | 7892879 | 2000-04-12 20:17:38 +1000 | [diff] [blame] | 1690 | #endif |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1691 | |
| 1692 | #ifdef DEBUG_KEXDH |
| 1693 | fprintf(stderr, "\np= "); |
| 1694 | BN_print_fp(stderr, dh->p); |
| 1695 | fprintf(stderr, "\ng= "); |
| 1696 | bn_print(dh->g); |
| 1697 | fprintf(stderr, "\npub= "); |
| 1698 | BN_print_fp(stderr, dh->pub_key); |
| 1699 | fprintf(stderr, "\n"); |
Kevin Steves | ef4eea9 | 2001-02-05 12:42:17 +0000 | [diff] [blame] | 1700 | DHparams_print_fp(stderr, dh); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1701 | #endif |
| 1702 | if (!dh_pub_is_valid(dh, dh_client_pub)) |
| 1703 | packet_disconnect("bad client public DH value"); |
| 1704 | |
| 1705 | klen = DH_size(dh); |
| 1706 | kbuf = xmalloc(klen); |
| 1707 | kout = DH_compute_key(kbuf, dh_client_pub, dh); |
| 1708 | |
| 1709 | #ifdef DEBUG_KEXDH |
| 1710 | debug("shared secret: len %d/%d", klen, kout); |
| 1711 | fprintf(stderr, "shared secret == "); |
| 1712 | for (i = 0; i< kout; i++) |
| 1713 | fprintf(stderr, "%02x", (kbuf[i])&0xff); |
| 1714 | fprintf(stderr, "\n"); |
| 1715 | #endif |
| 1716 | shared_secret = BN_new(); |
| 1717 | |
| 1718 | BN_bin2bn(kbuf, kout, shared_secret); |
| 1719 | memset(kbuf, 0, klen); |
| 1720 | xfree(kbuf); |
| 1721 | |
| 1722 | /* XXX precompute? */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1723 | key_to_blob(hostkey, &server_host_key_blob, &sbloblen); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1724 | |
Damien Miller | 2557bfc | 2001-03-30 10:47:14 +1000 | [diff] [blame] | 1725 | if (type == SSH2_MSG_KEX_DH_GEX_REQUEST_OLD) { |
| 1726 | /* These values are not included in the hash */ |
| 1727 | min = -1; |
| 1728 | max = -1; |
| 1729 | } |
| 1730 | |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1731 | /* calc H */ /* XXX depends on 'kex' */ |
| 1732 | hash = kex_hash_gex( |
| 1733 | client_version_string, |
| 1734 | server_version_string, |
| 1735 | buffer_ptr(client_kexinit), buffer_len(client_kexinit), |
| 1736 | buffer_ptr(server_kexinit), buffer_len(server_kexinit), |
| 1737 | (char *)server_host_key_blob, sbloblen, |
Damien Miller | 2557bfc | 2001-03-30 10:47:14 +1000 | [diff] [blame] | 1738 | min, nbits, max, |
| 1739 | dh->p, dh->g, |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1740 | dh_client_pub, |
| 1741 | dh->pub_key, |
| 1742 | shared_secret |
| 1743 | ); |
| 1744 | buffer_free(client_kexinit); |
| 1745 | buffer_free(server_kexinit); |
| 1746 | xfree(client_kexinit); |
| 1747 | xfree(server_kexinit); |
Ben Lindstrom | b1985f7 | 2001-01-23 00:19:15 +0000 | [diff] [blame] | 1748 | BN_free(dh_client_pub); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1749 | #ifdef DEBUG_KEXDH |
| 1750 | fprintf(stderr, "hash == "); |
| 1751 | for (i = 0; i< 20; i++) |
| 1752 | fprintf(stderr, "%02x", (hash[i])&0xff); |
| 1753 | fprintf(stderr, "\n"); |
| 1754 | #endif |
| 1755 | /* save session id := H */ |
| 1756 | /* XXX hashlen depends on KEX */ |
| 1757 | session_id2_len = 20; |
| 1758 | session_id2 = xmalloc(session_id2_len); |
| 1759 | memcpy(session_id2, hash, session_id2_len); |
| 1760 | |
| 1761 | /* sign H */ |
| 1762 | /* XXX hashlen depends on KEX */ |
Damien Miller | 0bc1bd8 | 2000-11-13 22:57:25 +1100 | [diff] [blame] | 1763 | key_sign(hostkey, &signature, &slen, hash, 20); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1764 | |
| 1765 | destroy_sensitive_data(); |
| 1766 | |
| 1767 | /* send server hostkey, DH pubkey 'f' and singed H */ |
| 1768 | packet_start(SSH2_MSG_KEX_DH_GEX_REPLY); |
| 1769 | packet_put_string((char *)server_host_key_blob, sbloblen); |
| 1770 | packet_put_bignum2(dh->pub_key); /* f */ |
| 1771 | packet_put_string((char *)signature, slen); |
| 1772 | packet_send(); |
| 1773 | xfree(signature); |
| 1774 | xfree(server_host_key_blob); |
| 1775 | packet_write_wait(); |
| 1776 | |
| 1777 | kex_derive_keys(kex, hash, shared_secret); |
Ben Lindstrom | b1985f7 | 2001-01-23 00:19:15 +0000 | [diff] [blame] | 1778 | BN_clear_free(shared_secret); |
Damien Miller | 874d77b | 2000-10-14 16:23:11 +1100 | [diff] [blame] | 1779 | packet_set_kex(kex); |
| 1780 | |
| 1781 | /* have keys, free DH */ |
| 1782 | DH_free(dh); |
Damien Miller | efb4afe | 2000-04-12 18:45:05 +1000 | [diff] [blame] | 1783 | } |