]>
Commit | Line | Data |
---|---|---|
8efc0c15 | 1 | /* |
5260325f | 2 | * Author: Tatu Ylonen <ylo@cs.hut.fi> |
5260325f | 3 | * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland |
4 | * All rights reserved | |
bcbf86ec | 5 | * Functions for manipulating the known hosts files. |
6ae2364d | 6 | * |
bcbf86ec | 7 | * As far as I am concerned, the code I have written for this software |
8 | * can be used freely for any purpose. Any derived versions of this | |
9 | * software must be clearly marked as such, and if the derived work is | |
10 | * incompatible with the protocol description in the RFC file, it must be | |
11 | * called by a name other than "ssh" or "Secure Shell". | |
6ae2364d | 12 | * |
6ae2364d | 13 | * |
a96070d4 | 14 | * Copyright (c) 1999, 2000 Markus Friedl. All rights reserved. |
bcbf86ec | 15 | * Copyright (c) 1999 Niels Provos. All rights reserved. |
16 | * | |
17 | * Redistribution and use in source and binary forms, with or without | |
18 | * modification, are permitted provided that the following conditions | |
19 | * are met: | |
20 | * 1. Redistributions of source code must retain the above copyright | |
21 | * notice, this list of conditions and the following disclaimer. | |
22 | * 2. Redistributions in binary form must reproduce the above copyright | |
23 | * notice, this list of conditions and the following disclaimer in the | |
24 | * documentation and/or other materials provided with the distribution. | |
25 | * | |
26 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR | |
27 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES | |
28 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. | |
29 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, | |
30 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT | |
31 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, | |
32 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY | |
33 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT | |
34 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF | |
35 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. | |
5260325f | 36 | */ |
8efc0c15 | 37 | |
38 | #include "includes.h" | |
5c63c2ab | 39 | |
40 | #include <resolv.h> | |
cc63c340 | 41 | |
5c63c2ab | 42 | #include <openssl/hmac.h> |
43 | #include <openssl/sha.h> | |
4fe2af09 | 44 | |
4fe2af09 | 45 | #include "match.h" |
4fe2af09 | 46 | #include "key.h" |
47 | #include "hostfile.h" | |
42f11eb2 | 48 | #include "log.h" |
5c63c2ab | 49 | #include "xmalloc.h" |
50 | ||
51 | static int | |
52 | extract_salt(const char *s, u_int l, char *salt, size_t salt_len) | |
53 | { | |
54 | char *p, *b64salt; | |
55 | u_int b64len; | |
56 | int ret; | |
57 | ||
58 | if (l < sizeof(HASH_MAGIC) - 1) { | |
59 | debug2("extract_salt: string too short"); | |
60 | return (-1); | |
61 | } | |
62 | if (strncmp(s, HASH_MAGIC, sizeof(HASH_MAGIC) - 1) != 0) { | |
63 | debug2("extract_salt: invalid magic identifier"); | |
64 | return (-1); | |
65 | } | |
66 | s += sizeof(HASH_MAGIC) - 1; | |
67 | l -= sizeof(HASH_MAGIC) - 1; | |
68 | if ((p = memchr(s, HASH_DELIM, l)) == NULL) { | |
69 | debug2("extract_salt: missing salt termination character"); | |
70 | return (-1); | |
71 | } | |
72 | ||
73 | b64len = p - s; | |
74 | /* Sanity check */ | |
75 | if (b64len == 0 || b64len > 1024) { | |
76 | debug2("extract_salt: bad encoded salt length %u", b64len); | |
77 | return (-1); | |
78 | } | |
79 | b64salt = xmalloc(1 + b64len); | |
80 | memcpy(b64salt, s, b64len); | |
81 | b64salt[b64len] = '\0'; | |
82 | ||
83 | ret = __b64_pton(b64salt, salt, salt_len); | |
84 | xfree(b64salt); | |
85 | if (ret == -1) { | |
86 | debug2("extract_salt: salt decode error"); | |
87 | return (-1); | |
88 | } | |
89 | if (ret != SHA_DIGEST_LENGTH) { | |
18f8ef7a | 90 | debug2("extract_salt: expected salt len %d, got %d", |
91 | SHA_DIGEST_LENGTH, ret); | |
5c63c2ab | 92 | return (-1); |
93 | } | |
f8cc7664 | 94 | |
5c63c2ab | 95 | return (0); |
96 | } | |
97 | ||
98 | char * | |
99 | host_hash(const char *host, const char *name_from_hostfile, u_int src_len) | |
100 | { | |
101 | const EVP_MD *md = EVP_sha1(); | |
102 | HMAC_CTX mac_ctx; | |
103 | char salt[256], result[256], uu_salt[512], uu_result[512]; | |
104 | static char encoded[1024]; | |
105 | u_int i, len; | |
106 | ||
107 | len = EVP_MD_size(md); | |
108 | ||
109 | if (name_from_hostfile == NULL) { | |
110 | /* Create new salt */ | |
111 | for (i = 0; i < len; i++) | |
112 | salt[i] = arc4random(); | |
113 | } else { | |
114 | /* Extract salt from known host entry */ | |
115 | if (extract_salt(name_from_hostfile, src_len, salt, | |
116 | sizeof(salt)) == -1) | |
117 | return (NULL); | |
118 | } | |
119 | ||
120 | HMAC_Init(&mac_ctx, salt, len, md); | |
121 | HMAC_Update(&mac_ctx, host, strlen(host)); | |
122 | HMAC_Final(&mac_ctx, result, NULL); | |
123 | HMAC_cleanup(&mac_ctx); | |
124 | ||
f8cc7664 | 125 | if (__b64_ntop(salt, len, uu_salt, sizeof(uu_salt)) == -1 || |
5c63c2ab | 126 | __b64_ntop(result, len, uu_result, sizeof(uu_result)) == -1) |
127 | fatal("host_hash: __b64_ntop failed"); | |
128 | ||
129 | snprintf(encoded, sizeof(encoded), "%s%s%c%s", HASH_MAGIC, uu_salt, | |
130 | HASH_DELIM, uu_result); | |
131 | ||
132 | return (encoded); | |
133 | } | |
8efc0c15 | 134 | |
aa3378df | 135 | /* |
4fe2af09 | 136 | * Parses an RSA (number of bits, e, n) or DSA key from a string. Moves the |
137 | * pointer over the key. Skips any whitespace at the beginning and at end. | |
aa3378df | 138 | */ |
8efc0c15 | 139 | |
fb396518 | 140 | int |
1e3b8b07 | 141 | hostfile_read_key(char **cpp, u_int *bitsp, Key *ret) |
8efc0c15 | 142 | { |
5260325f | 143 | char *cp; |
144 | ||
145 | /* Skip leading whitespace. */ | |
aa3378df | 146 | for (cp = *cpp; *cp == ' ' || *cp == '\t'; cp++) |
147 | ; | |
5260325f | 148 | |
fa08c86b | 149 | if (key_read(ret, &cp) != 1) |
5260325f | 150 | return 0; |
151 | ||
152 | /* Skip trailing whitespace. */ | |
aa3378df | 153 | for (; *cp == ' ' || *cp == '\t'; cp++) |
154 | ; | |
5260325f | 155 | |
156 | /* Return results. */ | |
157 | *cpp = cp; | |
fa08c86b | 158 | *bitsp = key_size(ret); |
5260325f | 159 | return 1; |
8efc0c15 | 160 | } |
161 | ||
396c147e | 162 | static int |
b6c7b7b7 | 163 | hostfile_check_key(int bits, const Key *key, const char *host, const char *filename, int linenum) |
4fe2af09 | 164 | { |
fa08c86b | 165 | if (key == NULL || key->type != KEY_RSA1 || key->rsa == NULL) |
4fe2af09 | 166 | return 1; |
167 | if (bits != BN_num_bits(key->rsa->n)) { | |
bbe88b6d | 168 | logit("Warning: %s, line %d: keysize mismatch for host %s: " |
4fe2af09 | 169 | "actual %d vs. announced %d.", |
170 | filename, linenum, host, BN_num_bits(key->rsa->n), bits); | |
bbe88b6d | 171 | logit("Warning: replace %d with %d in %s, line %d.", |
4fe2af09 | 172 | bits, BN_num_bits(key->rsa->n), filename, linenum); |
8efc0c15 | 173 | } |
4fe2af09 | 174 | return 1; |
8efc0c15 | 175 | } |
176 | ||
aa3378df | 177 | /* |
178 | * Checks whether the given host (which must be in all lowercase) is already | |
179 | * in the list of our known hosts. Returns HOST_OK if the host is known and | |
180 | * has the specified key, HOST_NEW if the host is not known, and HOST_CHANGED | |
181 | * if the host is known but used to have a different host key. | |
8a48a7ef | 182 | * |
183 | * If no 'key' has been specified and a key of type 'keytype' is known | |
184 | * for the specified host, then HOST_FOUND is returned. | |
aa3378df | 185 | */ |
8efc0c15 | 186 | |
8a48a7ef | 187 | static HostStatus |
188 | check_host_in_hostfile_by_key_or_type(const char *filename, | |
b6c7b7b7 | 189 | const char *host, const Key *key, int keytype, Key *found, int *numret) |
8efc0c15 | 190 | { |
5260325f | 191 | FILE *f; |
192 | char line[8192]; | |
193 | int linenum = 0; | |
d9d49fdb | 194 | u_int kbits; |
5c63c2ab | 195 | char *cp, *cp2, *hashed_host; |
5260325f | 196 | HostStatus end_return; |
197 | ||
8002af61 | 198 | debug3("check_host_in_hostfile: filename %s", filename); |
8a48a7ef | 199 | |
5260325f | 200 | /* Open the file containing the list of known hosts. */ |
201 | f = fopen(filename, "r"); | |
202 | if (!f) | |
203 | return HOST_NEW; | |
204 | ||
aa3378df | 205 | /* |
206 | * Return value when the loop terminates. This is set to | |
207 | * HOST_CHANGED if we have seen a different key for the host and have | |
208 | * not found the proper one. | |
209 | */ | |
5260325f | 210 | end_return = HOST_NEW; |
211 | ||
d9d49fdb | 212 | /* Go through the file. */ |
5260325f | 213 | while (fgets(line, sizeof(line), f)) { |
214 | cp = line; | |
215 | linenum++; | |
216 | ||
aa3378df | 217 | /* Skip any leading whitespace, comments and empty lines. */ |
218 | for (; *cp == ' ' || *cp == '\t'; cp++) | |
219 | ; | |
5260325f | 220 | if (!*cp || *cp == '#' || *cp == '\n') |
221 | continue; | |
222 | ||
223 | /* Find the end of the host name portion. */ | |
aa3378df | 224 | for (cp2 = cp; *cp2 && *cp2 != ' ' && *cp2 != '\t'; cp2++) |
225 | ; | |
5260325f | 226 | |
227 | /* Check if the host name matches. */ | |
5c63c2ab | 228 | if (match_hostname(host, cp, (u_int) (cp2 - cp)) != 1) { |
229 | if (*cp != HASH_DELIM) | |
230 | continue; | |
231 | hashed_host = host_hash(host, cp, (u_int) (cp2 - cp)); | |
232 | if (hashed_host == NULL) { | |
233 | debug("Invalid hashed host line %d of %s", | |
234 | linenum, filename); | |
235 | continue; | |
236 | } | |
237 | if (strncmp(hashed_host, cp, (u_int) (cp2 - cp)) != 0) | |
238 | continue; | |
239 | } | |
5260325f | 240 | |
241 | /* Got a match. Skip host name. */ | |
242 | cp = cp2; | |
243 | ||
aa3378df | 244 | /* |
245 | * Extract the key from the line. This will skip any leading | |
246 | * whitespace. Ignore badly formatted lines. | |
247 | */ | |
4fe2af09 | 248 | if (!hostfile_read_key(&cp, &kbits, found)) |
249 | continue; | |
5260325f | 250 | |
1e3b8b07 | 251 | if (numret != NULL) |
252 | *numret = linenum; | |
253 | ||
8a48a7ef | 254 | if (key == NULL) { |
255 | /* we found a key of the requested type */ | |
256 | if (found->type == keytype) | |
257 | return HOST_FOUND; | |
258 | continue; | |
259 | } | |
260 | ||
261 | if (!hostfile_check_key(kbits, found, host, filename, linenum)) | |
262 | continue; | |
263 | ||
5260325f | 264 | /* Check if the current key is the same as the given key. */ |
4fe2af09 | 265 | if (key_equal(key, found)) { |
5260325f | 266 | /* Ok, they match. */ |
8002af61 | 267 | debug3("check_host_in_hostfile: match line %d", linenum); |
5260325f | 268 | fclose(f); |
269 | return HOST_OK; | |
270 | } | |
aa3378df | 271 | /* |
272 | * They do not match. We will continue to go through the | |
273 | * file; however, we note that we will not return that it is | |
274 | * new. | |
275 | */ | |
5260325f | 276 | end_return = HOST_CHANGED; |
8efc0c15 | 277 | } |
5260325f | 278 | /* Clear variables and close the file. */ |
279 | fclose(f); | |
280 | ||
aa3378df | 281 | /* |
282 | * Return either HOST_NEW or HOST_CHANGED, depending on whether we | |
283 | * saw a different key for the host. | |
284 | */ | |
5260325f | 285 | return end_return; |
8efc0c15 | 286 | } |
287 | ||
8a48a7ef | 288 | HostStatus |
b6c7b7b7 | 289 | check_host_in_hostfile(const char *filename, const char *host, const Key *key, |
8a48a7ef | 290 | Key *found, int *numret) |
291 | { | |
292 | if (key == NULL) | |
293 | fatal("no key to look up"); | |
294 | return (check_host_in_hostfile_by_key_or_type(filename, host, key, 0, | |
295 | found, numret)); | |
296 | } | |
297 | ||
298 | int | |
299 | lookup_key_in_hostfile_by_type(const char *filename, const char *host, | |
300 | int keytype, Key *found, int *numret) | |
301 | { | |
302 | return (check_host_in_hostfile_by_key_or_type(filename, host, NULL, | |
303 | keytype, found, numret) == HOST_FOUND); | |
304 | } | |
305 | ||
aa3378df | 306 | /* |
307 | * Appends an entry to the host file. Returns false if the entry could not | |
308 | * be appended. | |
309 | */ | |
8efc0c15 | 310 | |
311 | int | |
f8cc7664 | 312 | add_host_to_hostfile(const char *filename, const char *host, const Key *key, |
5c63c2ab | 313 | int store_hash) |
8efc0c15 | 314 | { |
5260325f | 315 | FILE *f; |
4fe2af09 | 316 | int success = 0; |
a056dfa2 | 317 | char *hashed_host = NULL; |
5c63c2ab | 318 | |
4fe2af09 | 319 | if (key == NULL) |
a306f2dd | 320 | return 1; /* XXX ? */ |
5260325f | 321 | f = fopen(filename, "a"); |
322 | if (!f) | |
323 | return 0; | |
5c63c2ab | 324 | |
325 | if (store_hash) { | |
326 | if ((hashed_host = host_hash(host, NULL, 0)) == NULL) { | |
327 | error("add_host_to_hostfile: host_hash failed"); | |
328 | fclose(f); | |
329 | return 0; | |
330 | } | |
331 | } | |
332 | fprintf(f, "%s ", store_hash ? hashed_host : host); | |
333 | ||
4fe2af09 | 334 | if (key_write(key, f)) { |
4fe2af09 | 335 | success = 1; |
336 | } else { | |
a306f2dd | 337 | error("add_host_to_hostfile: saving key in %s failed", filename); |
5260325f | 338 | } |
a306f2dd | 339 | fprintf(f, "\n"); |
5260325f | 340 | fclose(f); |
4fe2af09 | 341 | return success; |
8efc0c15 | 342 | } |