1 /* $OpenBSD: ssh-keygen.c,v 1.475 2024/09/15 00:47:01 djm Exp $ */ 2 /* 3 * Author: Tatu Ylonen <ylo@cs.hut.fi> 4 * Copyright (c) 1994 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland 5 * All rights reserved 6 * Identity and host key generation and maintenance. 7 * 8 * As far as I am concerned, the code I have written for this software 9 * can be used freely for any purpose. Any derived versions of this 10 * software must be clearly marked as such, and if the derived work is 11 * incompatible with the protocol description in the RFC file, it must be 12 * called by a name other than "ssh" or "Secure Shell". 13 */ 14 15 #include "includes.h" 16 17 #include <sys/types.h> 18 #include <sys/socket.h> 19 #include <sys/stat.h> 20 21 #ifdef WITH_OPENSSL 22 #include <openssl/evp.h> 23 #include <openssl/pem.h> 24 #include "openbsd-compat/openssl-compat.h" 25 #endif 26 27 #ifdef HAVE_STDINT_H 28 # include <stdint.h> 29 #endif 30 #include <errno.h> 31 #include <fcntl.h> 32 #include <netdb.h> 33 #ifdef HAVE_PATHS_H 34 # include <paths.h> 35 #endif 36 #include <pwd.h> 37 #include <stdarg.h> 38 #include <stdio.h> 39 #include <stdlib.h> 40 #include <string.h> 41 #include <unistd.h> 42 #include <limits.h> 43 #include <locale.h> 44 #include <time.h> 45 46 #include "xmalloc.h" 47 #include "sshkey.h" 48 #include "authfile.h" 49 #include "sshbuf.h" 50 #include "pathnames.h" 51 #include "log.h" 52 #include "misc.h" 53 #include "match.h" 54 #include "hostfile.h" 55 #include "dns.h" 56 #include "ssh.h" 57 #include "ssh2.h" 58 #include "ssherr.h" 59 #include "ssh-pkcs11.h" 60 #include "atomicio.h" 61 #include "krl.h" 62 #include "digest.h" 63 #include "utf8.h" 64 #include "authfd.h" 65 #include "sshsig.h" 66 #include "ssh-sk.h" 67 #include "sk-api.h" /* XXX for SSH_SK_USER_PRESENCE_REQD; remove */ 68 #include "cipher.h" 69 70 #define DEFAULT_KEY_TYPE_NAME "ed25519" 71 72 /* 73 * Default number of bits in the RSA, DSA and ECDSA keys. These value can be 74 * overridden on the command line. 75 * 76 * These values, with the exception of DSA, provide security equivalent to at 77 * least 128 bits of security according to NIST Special Publication 800-57: 78 * Recommendation for Key Management Part 1 rev 4 section 5.6.1. 79 * For DSA it (and FIPS-186-4 section 4.2) specifies that the only size for 80 * which a 160bit hash is acceptable is 1kbit, and since ssh-dss specifies only 81 * SHA1 we limit the DSA key size 1k bits. 82 */ 83 #define DEFAULT_BITS 3072 84 #define DEFAULT_BITS_DSA 1024 85 #define DEFAULT_BITS_ECDSA 256 86 87 static int quiet = 0; 88 89 /* Flag indicating that we just want to see the key fingerprint */ 90 static int print_fingerprint = 0; 91 static int print_bubblebabble = 0; 92 93 /* Hash algorithm to use for fingerprints. */ 94 static int fingerprint_hash = SSH_FP_HASH_DEFAULT; 95 96 /* The identity file name, given on the command line or entered by the user. */ 97 static char identity_file[PATH_MAX]; 98 static int have_identity = 0; 99 100 /* This is set to the passphrase if given on the command line. */ 101 static char *identity_passphrase = NULL; 102 103 /* This is set to the new passphrase if given on the command line. */ 104 static char *identity_new_passphrase = NULL; 105 106 /* Key type when certifying */ 107 static u_int cert_key_type = SSH2_CERT_TYPE_USER; 108 109 /* "key ID" of signed key */ 110 static char *cert_key_id = NULL; 111 112 /* Comma-separated list of principal names for certifying keys */ 113 static char *cert_principals = NULL; 114 115 /* Validity period for certificates */ 116 static u_int64_t cert_valid_from = 0; 117 static u_int64_t cert_valid_to = ~0ULL; 118 119 /* Certificate options */ 120 #define CERTOPT_X_FWD (1) 121 #define CERTOPT_AGENT_FWD (1<<1) 122 #define CERTOPT_PORT_FWD (1<<2) 123 #define CERTOPT_PTY (1<<3) 124 #define CERTOPT_USER_RC (1<<4) 125 #define CERTOPT_NO_REQUIRE_USER_PRESENCE (1<<5) 126 #define CERTOPT_REQUIRE_VERIFY (1<<6) 127 #define CERTOPT_DEFAULT (CERTOPT_X_FWD|CERTOPT_AGENT_FWD| \ 128 CERTOPT_PORT_FWD|CERTOPT_PTY|CERTOPT_USER_RC) 129 static u_int32_t certflags_flags = CERTOPT_DEFAULT; 130 static char *certflags_command = NULL; 131 static char *certflags_src_addr = NULL; 132 133 /* Arbitrary extensions specified by user */ 134 struct cert_ext { 135 char *key; 136 char *val; 137 int crit; 138 }; 139 static struct cert_ext *cert_ext; 140 static size_t ncert_ext; 141 142 /* Conversion to/from various formats */ 143 enum { 144 FMT_RFC4716, 145 FMT_PKCS8, 146 FMT_PEM 147 } convert_format = FMT_RFC4716; 148 149 static char *key_type_name = NULL; 150 151 /* Load key from this PKCS#11 provider */ 152 static char *pkcs11provider = NULL; 153 154 /* FIDO/U2F provider to use */ 155 static char *sk_provider = NULL; 156 157 /* Format for writing private keys */ 158 static int private_key_format = SSHKEY_PRIVATE_OPENSSH; 159 160 /* Cipher for new-format private keys */ 161 static char *openssh_format_cipher = NULL; 162 163 /* Number of KDF rounds to derive new format keys. */ 164 static int rounds = 0; 165 166 /* argv0 */ 167 extern char *__progname; 168 169 static char hostname[NI_MAXHOST]; 170 171 #ifdef WITH_OPENSSL 172 /* moduli.c */ 173 int gen_candidates(FILE *, u_int32_t, u_int32_t, BIGNUM *); 174 int prime_test(FILE *, FILE *, u_int32_t, u_int32_t, char *, unsigned long, 175 unsigned long); 176 #endif 177 178 static void 179 type_bits_valid(int type, const char *name, u_int32_t *bitsp) 180 { 181 if (type == KEY_UNSPEC) 182 fatal("unknown key type %s", key_type_name); 183 if (*bitsp == 0) { 184 #ifdef WITH_OPENSSL 185 int nid; 186 187 switch(type) { 188 case KEY_DSA: 189 *bitsp = DEFAULT_BITS_DSA; 190 break; 191 case KEY_ECDSA: 192 if (name != NULL && 193 (nid = sshkey_ecdsa_nid_from_name(name)) > 0) 194 *bitsp = sshkey_curve_nid_to_bits(nid); 195 if (*bitsp == 0) 196 *bitsp = DEFAULT_BITS_ECDSA; 197 break; 198 case KEY_RSA: 199 *bitsp = DEFAULT_BITS; 200 break; 201 } 202 #endif 203 } 204 #ifdef WITH_OPENSSL 205 switch (type) { 206 case KEY_DSA: 207 if (*bitsp != 1024) 208 fatal("Invalid DSA key length: must be 1024 bits"); 209 break; 210 case KEY_RSA: 211 if (*bitsp < SSH_RSA_MINIMUM_MODULUS_SIZE) 212 fatal("Invalid RSA key length: minimum is %d bits", 213 SSH_RSA_MINIMUM_MODULUS_SIZE); 214 else if (*bitsp > OPENSSL_RSA_MAX_MODULUS_BITS) 215 fatal("Invalid RSA key length: maximum is %d bits", 216 OPENSSL_RSA_MAX_MODULUS_BITS); 217 break; 218 case KEY_ECDSA: 219 if (sshkey_ecdsa_bits_to_nid(*bitsp) == -1) 220 #ifdef OPENSSL_HAS_NISTP521 221 fatal("Invalid ECDSA key length: valid lengths are " 222 "256, 384 or 521 bits"); 223 #else 224 fatal("Invalid ECDSA key length: valid lengths are " 225 "256 or 384 bits"); 226 #endif 227 } 228 #endif 229 } 230 231 /* 232 * Checks whether a file exists and, if so, asks the user whether they wish 233 * to overwrite it. 234 * Returns nonzero if the file does not already exist or if the user agrees to 235 * overwrite, or zero otherwise. 236 */ 237 static int 238 confirm_overwrite(const char *filename) 239 { 240 char yesno[3]; 241 struct stat st; 242 243 if (stat(filename, &st) != 0) 244 return 1; 245 printf("%s already exists.\n", filename); 246 printf("Overwrite (y/n)? "); 247 fflush(stdout); 248 if (fgets(yesno, sizeof(yesno), stdin) == NULL) 249 return 0; 250 if (yesno[0] != 'y' && yesno[0] != 'Y') 251 return 0; 252 return 1; 253 } 254 255 static void 256 ask_filename(struct passwd *pw, const char *prompt) 257 { 258 char buf[1024]; 259 char *name = NULL; 260 261 if (key_type_name == NULL) 262 name = _PATH_SSH_CLIENT_ID_ED25519; 263 else { 264 switch (sshkey_type_from_shortname(key_type_name)) { 265 #ifdef WITH_DSA 266 case KEY_DSA_CERT: 267 case KEY_DSA: 268 name = _PATH_SSH_CLIENT_ID_DSA; 269 break; 270 #endif 271 #ifdef OPENSSL_HAS_ECC 272 case KEY_ECDSA_CERT: 273 case KEY_ECDSA: 274 name = _PATH_SSH_CLIENT_ID_ECDSA; 275 break; 276 case KEY_ECDSA_SK_CERT: 277 case KEY_ECDSA_SK: 278 name = _PATH_SSH_CLIENT_ID_ECDSA_SK; 279 break; 280 #endif 281 case KEY_RSA_CERT: 282 case KEY_RSA: 283 name = _PATH_SSH_CLIENT_ID_RSA; 284 break; 285 case KEY_ED25519: 286 case KEY_ED25519_CERT: 287 name = _PATH_SSH_CLIENT_ID_ED25519; 288 break; 289 case KEY_ED25519_SK: 290 case KEY_ED25519_SK_CERT: 291 name = _PATH_SSH_CLIENT_ID_ED25519_SK; 292 break; 293 case KEY_XMSS: 294 case KEY_XMSS_CERT: 295 name = _PATH_SSH_CLIENT_ID_XMSS; 296 break; 297 default: 298 fatal("bad key type"); 299 } 300 } 301 snprintf(identity_file, sizeof(identity_file), 302 "%s/%s", pw->pw_dir, name); 303 printf("%s (%s): ", prompt, identity_file); 304 fflush(stdout); 305 if (fgets(buf, sizeof(buf), stdin) == NULL) 306 exit(1); 307 buf[strcspn(buf, "\n")] = '\0'; 308 if (strcmp(buf, "") != 0) 309 strlcpy(identity_file, buf, sizeof(identity_file)); 310 have_identity = 1; 311 } 312 313 static struct sshkey * 314 load_identity(const char *filename, char **commentp) 315 { 316 char *prompt, *pass; 317 struct sshkey *prv; 318 int r; 319 320 if (commentp != NULL) 321 *commentp = NULL; 322 if ((r = sshkey_load_private(filename, "", &prv, commentp)) == 0) 323 return prv; 324 if (r != SSH_ERR_KEY_WRONG_PASSPHRASE) 325 fatal_r(r, "Load key \"%s\"", filename); 326 if (identity_passphrase) 327 pass = xstrdup(identity_passphrase); 328 else { 329 xasprintf(&prompt, "Enter passphrase for \"%s\": ", filename); 330 pass = read_passphrase(prompt, RP_ALLOW_STDIN); 331 free(prompt); 332 } 333 r = sshkey_load_private(filename, pass, &prv, commentp); 334 freezero(pass, strlen(pass)); 335 if (r != 0) 336 fatal_r(r, "Load key \"%s\"", filename); 337 return prv; 338 } 339 340 #define SSH_COM_PUBLIC_BEGIN "---- BEGIN SSH2 PUBLIC KEY ----" 341 #define SSH_COM_PUBLIC_END "---- END SSH2 PUBLIC KEY ----" 342 #define SSH_COM_PRIVATE_BEGIN "---- BEGIN SSH2 ENCRYPTED PRIVATE KEY ----" 343 #define SSH_COM_PRIVATE_KEY_MAGIC 0x3f6ff9eb 344 345 #ifdef WITH_OPENSSL 346 static void 347 do_convert_to_ssh2(struct passwd *pw, struct sshkey *k) 348 { 349 struct sshbuf *b; 350 char comment[61], *b64; 351 int r; 352 353 if ((b = sshbuf_new()) == NULL) 354 fatal_f("sshbuf_new failed"); 355 if ((r = sshkey_putb(k, b)) != 0) 356 fatal_fr(r, "put key"); 357 if ((b64 = sshbuf_dtob64_string(b, 1)) == NULL) 358 fatal_f("sshbuf_dtob64_string failed"); 359 360 /* Comment + surrounds must fit into 72 chars (RFC 4716 sec 3.3) */ 361 snprintf(comment, sizeof(comment), 362 "%u-bit %s, converted by %s@%s from OpenSSH", 363 sshkey_size(k), sshkey_type(k), 364 pw->pw_name, hostname); 365 366 sshkey_free(k); 367 sshbuf_free(b); 368 369 fprintf(stdout, "%s\n", SSH_COM_PUBLIC_BEGIN); 370 fprintf(stdout, "Comment: \"%s\"\n%s", comment, b64); 371 fprintf(stdout, "%s\n", SSH_COM_PUBLIC_END); 372 free(b64); 373 exit(0); 374 } 375 376 static void 377 do_convert_to_pkcs8(struct sshkey *k) 378 { 379 switch (sshkey_type_plain(k->type)) { 380 case KEY_RSA: 381 if (!PEM_write_RSA_PUBKEY(stdout, 382 EVP_PKEY_get0_RSA(k->pkey))) 383 fatal("PEM_write_RSA_PUBKEY failed"); 384 break; 385 #ifdef WITH_DSA 386 case KEY_DSA: 387 if (!PEM_write_DSA_PUBKEY(stdout, k->dsa)) 388 fatal("PEM_write_DSA_PUBKEY failed"); 389 break; 390 #endif 391 #ifdef OPENSSL_HAS_ECC 392 case KEY_ECDSA: 393 if (!PEM_write_EC_PUBKEY(stdout, 394 EVP_PKEY_get0_EC_KEY(k->pkey))) 395 fatal("PEM_write_EC_PUBKEY failed"); 396 break; 397 #endif 398 default: 399 fatal_f("unsupported key type %s", sshkey_type(k)); 400 } 401 exit(0); 402 } 403 404 static void 405 do_convert_to_pem(struct sshkey *k) 406 { 407 switch (sshkey_type_plain(k->type)) { 408 case KEY_RSA: 409 if (!PEM_write_RSAPublicKey(stdout, 410 EVP_PKEY_get0_RSA(k->pkey))) 411 fatal("PEM_write_RSAPublicKey failed"); 412 break; 413 #ifdef WITH_DSA 414 case KEY_DSA: 415 if (!PEM_write_DSA_PUBKEY(stdout, k->dsa)) 416 fatal("PEM_write_DSA_PUBKEY failed"); 417 break; 418 #endif 419 #ifdef OPENSSL_HAS_ECC 420 case KEY_ECDSA: 421 if (!PEM_write_EC_PUBKEY(stdout, 422 EVP_PKEY_get0_EC_KEY(k->pkey))) 423 fatal("PEM_write_EC_PUBKEY failed"); 424 break; 425 #endif 426 default: 427 fatal_f("unsupported key type %s", sshkey_type(k)); 428 } 429 exit(0); 430 } 431 432 static void 433 do_convert_to(struct passwd *pw) 434 { 435 struct sshkey *k; 436 struct stat st; 437 int r; 438 439 if (!have_identity) 440 ask_filename(pw, "Enter file in which the key is"); 441 if (stat(identity_file, &st) == -1) 442 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 443 if ((r = sshkey_load_public(identity_file, &k, NULL)) != 0) 444 k = load_identity(identity_file, NULL); 445 switch (convert_format) { 446 case FMT_RFC4716: 447 do_convert_to_ssh2(pw, k); 448 break; 449 case FMT_PKCS8: 450 do_convert_to_pkcs8(k); 451 break; 452 case FMT_PEM: 453 do_convert_to_pem(k); 454 break; 455 default: 456 fatal_f("unknown key format %d", convert_format); 457 } 458 exit(0); 459 } 460 461 /* 462 * This is almost exactly the bignum1 encoding, but with 32 bit for length 463 * instead of 16. 464 */ 465 static void 466 buffer_get_bignum_bits(struct sshbuf *b, BIGNUM *value) 467 { 468 u_int bytes, bignum_bits; 469 int r; 470 471 if ((r = sshbuf_get_u32(b, &bignum_bits)) != 0) 472 fatal_fr(r, "parse"); 473 bytes = (bignum_bits + 7) / 8; 474 if (sshbuf_len(b) < bytes) 475 fatal_f("input buffer too small: need %d have %zu", 476 bytes, sshbuf_len(b)); 477 if (BN_bin2bn(sshbuf_ptr(b), bytes, value) == NULL) 478 fatal_f("BN_bin2bn failed"); 479 if ((r = sshbuf_consume(b, bytes)) != 0) 480 fatal_fr(r, "consume"); 481 } 482 483 static struct sshkey * 484 do_convert_private_ssh2(struct sshbuf *b) 485 { 486 struct sshkey *key = NULL; 487 char *type, *cipher; 488 const char *alg = NULL; 489 u_char e1, e2, e3, *sig = NULL, data[] = "abcde12345"; 490 int r, rlen, ktype; 491 u_int magic, i1, i2, i3, i4; 492 size_t slen; 493 u_long e; 494 #ifdef WITH_DSA 495 BIGNUM *dsa_p = NULL, *dsa_q = NULL, *dsa_g = NULL; 496 BIGNUM *dsa_pub_key = NULL, *dsa_priv_key = NULL; 497 #endif 498 BIGNUM *rsa_n = NULL, *rsa_e = NULL, *rsa_d = NULL; 499 BIGNUM *rsa_p = NULL, *rsa_q = NULL, *rsa_iqmp = NULL; 500 BIGNUM *rsa_dmp1 = NULL, *rsa_dmq1 = NULL; 501 RSA *rsa = NULL; 502 503 if ((r = sshbuf_get_u32(b, &magic)) != 0) 504 fatal_fr(r, "parse magic"); 505 506 if (magic != SSH_COM_PRIVATE_KEY_MAGIC) { 507 error("bad magic 0x%x != 0x%x", magic, 508 SSH_COM_PRIVATE_KEY_MAGIC); 509 return NULL; 510 } 511 if ((r = sshbuf_get_u32(b, &i1)) != 0 || 512 (r = sshbuf_get_cstring(b, &type, NULL)) != 0 || 513 (r = sshbuf_get_cstring(b, &cipher, NULL)) != 0 || 514 (r = sshbuf_get_u32(b, &i2)) != 0 || 515 (r = sshbuf_get_u32(b, &i3)) != 0 || 516 (r = sshbuf_get_u32(b, &i4)) != 0) 517 fatal_fr(r, "parse"); 518 debug("ignore (%d %d %d %d)", i1, i2, i3, i4); 519 if (strcmp(cipher, "none") != 0) { 520 error("unsupported cipher %s", cipher); 521 free(cipher); 522 free(type); 523 return NULL; 524 } 525 free(cipher); 526 527 if (strstr(type, "rsa")) { 528 ktype = KEY_RSA; 529 #ifdef WITH_DSA 530 } else if (strstr(type, "dsa")) { 531 ktype = KEY_DSA; 532 #endif 533 } else { 534 free(type); 535 return NULL; 536 } 537 if ((key = sshkey_new(ktype)) == NULL) 538 fatal("sshkey_new failed"); 539 free(type); 540 541 switch (key->type) { 542 #ifdef WITH_DSA 543 case KEY_DSA: 544 if ((dsa_p = BN_new()) == NULL || 545 (dsa_q = BN_new()) == NULL || 546 (dsa_g = BN_new()) == NULL || 547 (dsa_pub_key = BN_new()) == NULL || 548 (dsa_priv_key = BN_new()) == NULL) 549 fatal_f("BN_new"); 550 buffer_get_bignum_bits(b, dsa_p); 551 buffer_get_bignum_bits(b, dsa_g); 552 buffer_get_bignum_bits(b, dsa_q); 553 buffer_get_bignum_bits(b, dsa_pub_key); 554 buffer_get_bignum_bits(b, dsa_priv_key); 555 if (!DSA_set0_pqg(key->dsa, dsa_p, dsa_q, dsa_g)) 556 fatal_f("DSA_set0_pqg failed"); 557 dsa_p = dsa_q = dsa_g = NULL; /* transferred */ 558 if (!DSA_set0_key(key->dsa, dsa_pub_key, dsa_priv_key)) 559 fatal_f("DSA_set0_key failed"); 560 dsa_pub_key = dsa_priv_key = NULL; /* transferred */ 561 break; 562 #endif 563 case KEY_RSA: 564 if ((r = sshbuf_get_u8(b, &e1)) != 0 || 565 (e1 < 30 && (r = sshbuf_get_u8(b, &e2)) != 0) || 566 (e1 < 30 && (r = sshbuf_get_u8(b, &e3)) != 0)) 567 fatal_fr(r, "parse RSA"); 568 e = e1; 569 debug("e %lx", e); 570 if (e < 30) { 571 e <<= 8; 572 e += e2; 573 debug("e %lx", e); 574 e <<= 8; 575 e += e3; 576 debug("e %lx", e); 577 } 578 if ((rsa_e = BN_new()) == NULL) 579 fatal_f("BN_new"); 580 if (!BN_set_word(rsa_e, e)) { 581 BN_clear_free(rsa_e); 582 sshkey_free(key); 583 return NULL; 584 } 585 if ((rsa_n = BN_new()) == NULL || 586 (rsa_d = BN_new()) == NULL || 587 (rsa_p = BN_new()) == NULL || 588 (rsa_q = BN_new()) == NULL || 589 (rsa_iqmp = BN_new()) == NULL) 590 fatal_f("BN_new"); 591 buffer_get_bignum_bits(b, rsa_d); 592 buffer_get_bignum_bits(b, rsa_n); 593 buffer_get_bignum_bits(b, rsa_iqmp); 594 buffer_get_bignum_bits(b, rsa_q); 595 buffer_get_bignum_bits(b, rsa_p); 596 if ((r = ssh_rsa_complete_crt_parameters(rsa_d, rsa_p, rsa_q, 597 rsa_iqmp, &rsa_dmp1, &rsa_dmq1)) != 0) 598 fatal_fr(r, "generate RSA CRT parameters"); 599 if ((key->pkey = EVP_PKEY_new()) == NULL) 600 fatal_f("EVP_PKEY_new failed"); 601 if ((rsa = RSA_new()) == NULL) 602 fatal_f("RSA_new failed"); 603 if (!RSA_set0_key(rsa, rsa_n, rsa_e, rsa_d)) 604 fatal_f("RSA_set0_key failed"); 605 rsa_n = rsa_e = rsa_d = NULL; /* transferred */ 606 if (!RSA_set0_factors(rsa, rsa_p, rsa_q)) 607 fatal_f("RSA_set0_factors failed"); 608 rsa_p = rsa_q = NULL; /* transferred */ 609 if (RSA_set0_crt_params(rsa, rsa_dmp1, rsa_dmq1, rsa_iqmp) != 1) 610 fatal_f("RSA_set0_crt_params failed"); 611 rsa_dmp1 = rsa_dmq1 = rsa_iqmp = NULL; 612 if (EVP_PKEY_set1_RSA(key->pkey, rsa) != 1) 613 fatal_f("EVP_PKEY_set1_RSA failed"); 614 RSA_free(rsa); 615 alg = "rsa-sha2-256"; 616 break; 617 } 618 rlen = sshbuf_len(b); 619 if (rlen != 0) 620 error_f("remaining bytes in key blob %d", rlen); 621 622 /* try the key */ 623 if ((r = sshkey_sign(key, &sig, &slen, data, sizeof(data), 624 alg, NULL, NULL, 0)) != 0) 625 error_fr(r, "signing with converted key failed"); 626 else if ((r = sshkey_verify(key, sig, slen, data, sizeof(data), 627 alg, 0, NULL)) != 0) 628 error_fr(r, "verification with converted key failed"); 629 if (r != 0) { 630 sshkey_free(key); 631 free(sig); 632 return NULL; 633 } 634 free(sig); 635 return key; 636 } 637 638 static int 639 get_line(FILE *fp, char *line, size_t len) 640 { 641 int c; 642 size_t pos = 0; 643 644 line[0] = '\0'; 645 while ((c = fgetc(fp)) != EOF) { 646 if (pos >= len - 1) 647 fatal("input line too long."); 648 switch (c) { 649 case '\r': 650 c = fgetc(fp); 651 if (c != EOF && c != '\n' && ungetc(c, fp) == EOF) 652 fatal("unget: %s", strerror(errno)); 653 return pos; 654 case '\n': 655 return pos; 656 } 657 line[pos++] = c; 658 line[pos] = '\0'; 659 } 660 /* We reached EOF */ 661 return -1; 662 } 663 664 static void 665 do_convert_from_ssh2(struct passwd *pw, struct sshkey **k, int *private) 666 { 667 int r, blen, escaped = 0; 668 u_int len; 669 char line[1024]; 670 struct sshbuf *buf; 671 char encoded[8096]; 672 FILE *fp; 673 674 if ((buf = sshbuf_new()) == NULL) 675 fatal("sshbuf_new failed"); 676 if ((fp = fopen(identity_file, "r")) == NULL) 677 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 678 encoded[0] = '\0'; 679 while ((blen = get_line(fp, line, sizeof(line))) != -1) { 680 if (blen > 0 && line[blen - 1] == '\\') 681 escaped++; 682 if (strncmp(line, "----", 4) == 0 || 683 strstr(line, ": ") != NULL) { 684 if (strstr(line, SSH_COM_PRIVATE_BEGIN) != NULL) 685 *private = 1; 686 if (strstr(line, " END ") != NULL) { 687 break; 688 } 689 /* fprintf(stderr, "ignore: %s", line); */ 690 continue; 691 } 692 if (escaped) { 693 escaped--; 694 /* fprintf(stderr, "escaped: %s", line); */ 695 continue; 696 } 697 strlcat(encoded, line, sizeof(encoded)); 698 } 699 len = strlen(encoded); 700 if (((len % 4) == 3) && 701 (encoded[len-1] == '=') && 702 (encoded[len-2] == '=') && 703 (encoded[len-3] == '=')) 704 encoded[len-3] = '\0'; 705 if ((r = sshbuf_b64tod(buf, encoded)) != 0) 706 fatal_fr(r, "base64 decode"); 707 if (*private) { 708 if ((*k = do_convert_private_ssh2(buf)) == NULL) 709 fatal_f("private key conversion failed"); 710 } else if ((r = sshkey_fromb(buf, k)) != 0) 711 fatal_fr(r, "parse key"); 712 sshbuf_free(buf); 713 fclose(fp); 714 } 715 716 static void 717 do_convert_from_pkcs8(struct sshkey **k, int *private) 718 { 719 EVP_PKEY *pubkey; 720 FILE *fp; 721 722 if ((fp = fopen(identity_file, "r")) == NULL) 723 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 724 if ((pubkey = PEM_read_PUBKEY(fp, NULL, NULL, NULL)) == NULL) { 725 fatal_f("%s is not a recognised public key format", 726 identity_file); 727 } 728 fclose(fp); 729 switch (EVP_PKEY_base_id(pubkey)) { 730 case EVP_PKEY_RSA: 731 if ((*k = sshkey_new(KEY_UNSPEC)) == NULL) 732 fatal("sshkey_new failed"); 733 (*k)->type = KEY_RSA; 734 (*k)->pkey = pubkey; 735 pubkey = NULL; 736 break; 737 #ifdef WITH_DSA 738 case EVP_PKEY_DSA: 739 if ((*k = sshkey_new(KEY_UNSPEC)) == NULL) 740 fatal("sshkey_new failed"); 741 (*k)->type = KEY_DSA; 742 (*k)->dsa = EVP_PKEY_get1_DSA(pubkey); 743 break; 744 #endif 745 #ifdef OPENSSL_HAS_ECC 746 case EVP_PKEY_EC: 747 if ((*k = sshkey_new(KEY_UNSPEC)) == NULL) 748 fatal("sshkey_new failed"); 749 if (((*k)->ecdsa_nid = sshkey_ecdsa_fixup_group(pubkey)) == -1) 750 fatal("sshkey_ecdsa_fixup_group failed"); 751 (*k)->type = KEY_ECDSA; 752 (*k)->pkey = pubkey; 753 pubkey = NULL; 754 break; 755 #endif 756 default: 757 fatal_f("unsupported pubkey type %d", 758 EVP_PKEY_base_id(pubkey)); 759 } 760 EVP_PKEY_free(pubkey); 761 return; 762 } 763 764 static void 765 do_convert_from_pem(struct sshkey **k, int *private) 766 { 767 FILE *fp; 768 RSA *rsa; 769 770 if ((fp = fopen(identity_file, "r")) == NULL) 771 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 772 if ((rsa = PEM_read_RSAPublicKey(fp, NULL, NULL, NULL)) != NULL) { 773 if ((*k = sshkey_new(KEY_UNSPEC)) == NULL) 774 fatal("sshkey_new failed"); 775 if (((*k)->pkey = EVP_PKEY_new()) == NULL) 776 fatal("EVP_PKEY_new failed"); 777 (*k)->type = KEY_RSA; 778 if (EVP_PKEY_set1_RSA((*k)->pkey, rsa) != 1) 779 fatal("EVP_PKEY_set1_RSA failed"); 780 RSA_free(rsa); 781 fclose(fp); 782 return; 783 } 784 fatal_f("unrecognised raw private key format"); 785 } 786 787 static void 788 do_convert_from(struct passwd *pw) 789 { 790 struct sshkey *k = NULL; 791 int r, private = 0, ok = 0; 792 struct stat st; 793 794 if (!have_identity) 795 ask_filename(pw, "Enter file in which the key is"); 796 if (stat(identity_file, &st) == -1) 797 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 798 799 switch (convert_format) { 800 case FMT_RFC4716: 801 do_convert_from_ssh2(pw, &k, &private); 802 break; 803 case FMT_PKCS8: 804 do_convert_from_pkcs8(&k, &private); 805 break; 806 case FMT_PEM: 807 do_convert_from_pem(&k, &private); 808 break; 809 default: 810 fatal_f("unknown key format %d", convert_format); 811 } 812 813 if (!private) { 814 if ((r = sshkey_write(k, stdout)) == 0) 815 ok = 1; 816 if (ok) 817 fprintf(stdout, "\n"); 818 } else { 819 switch (k->type) { 820 #ifdef WITH_DSA 821 case KEY_DSA: 822 ok = PEM_write_DSAPrivateKey(stdout, k->dsa, NULL, 823 NULL, 0, NULL, NULL); 824 break; 825 #endif 826 #ifdef OPENSSL_HAS_ECC 827 case KEY_ECDSA: 828 ok = PEM_write_ECPrivateKey(stdout, 829 EVP_PKEY_get0_EC_KEY(k->pkey), NULL, NULL, 0, 830 NULL, NULL); 831 break; 832 #endif 833 case KEY_RSA: 834 ok = PEM_write_RSAPrivateKey(stdout, 835 EVP_PKEY_get0_RSA(k->pkey), NULL, NULL, 0, 836 NULL, NULL); 837 break; 838 default: 839 fatal_f("unsupported key type %s", sshkey_type(k)); 840 } 841 } 842 843 if (!ok) 844 fatal("key write failed"); 845 sshkey_free(k); 846 exit(0); 847 } 848 #endif 849 850 static void 851 do_print_public(struct passwd *pw) 852 { 853 struct sshkey *prv; 854 struct stat st; 855 int r; 856 char *comment = NULL; 857 858 if (!have_identity) 859 ask_filename(pw, "Enter file in which the key is"); 860 if (stat(identity_file, &st) == -1) 861 fatal("%s: %s", identity_file, strerror(errno)); 862 prv = load_identity(identity_file, &comment); 863 if ((r = sshkey_write(prv, stdout)) != 0) 864 fatal_fr(r, "write key"); 865 if (comment != NULL && *comment != '\0') 866 fprintf(stdout, " %s", comment); 867 fprintf(stdout, "\n"); 868 if (sshkey_is_sk(prv)) { 869 debug("sk_application: \"%s\", sk_flags 0x%02x", 870 prv->sk_application, prv->sk_flags); 871 } 872 sshkey_free(prv); 873 free(comment); 874 exit(0); 875 } 876 877 static void 878 do_download(struct passwd *pw) 879 { 880 #ifdef ENABLE_PKCS11 881 struct sshkey **keys = NULL; 882 int i, nkeys; 883 enum sshkey_fp_rep rep; 884 int fptype; 885 char *fp, *ra, **comments = NULL; 886 887 fptype = print_bubblebabble ? SSH_DIGEST_SHA1 : fingerprint_hash; 888 rep = print_bubblebabble ? SSH_FP_BUBBLEBABBLE : SSH_FP_DEFAULT; 889 890 pkcs11_init(1); 891 nkeys = pkcs11_add_provider(pkcs11provider, NULL, &keys, &comments); 892 if (nkeys <= 0) 893 fatal("cannot read public key from pkcs11"); 894 for (i = 0; i < nkeys; i++) { 895 if (print_fingerprint) { 896 fp = sshkey_fingerprint(keys[i], fptype, rep); 897 ra = sshkey_fingerprint(keys[i], fingerprint_hash, 898 SSH_FP_RANDOMART); 899 if (fp == NULL || ra == NULL) 900 fatal_f("sshkey_fingerprint fail"); 901 printf("%u %s %s (PKCS11 key)\n", sshkey_size(keys[i]), 902 fp, sshkey_type(keys[i])); 903 if (log_level_get() >= SYSLOG_LEVEL_VERBOSE) 904 printf("%s\n", ra); 905 free(ra); 906 free(fp); 907 } else { 908 (void) sshkey_write(keys[i], stdout); /* XXX check */ 909 fprintf(stdout, "%s%s\n", 910 *(comments[i]) == '\0' ? "" : " ", comments[i]); 911 } 912 free(comments[i]); 913 sshkey_free(keys[i]); 914 } 915 free(comments); 916 free(keys); 917 pkcs11_terminate(); 918 exit(0); 919 #else 920 fatal("no pkcs11 support"); 921 #endif /* ENABLE_PKCS11 */ 922 } 923 924 static struct sshkey * 925 try_read_key(char **cpp) 926 { 927 struct sshkey *ret; 928 int r; 929 930 if ((ret = sshkey_new(KEY_UNSPEC)) == NULL) 931 fatal("sshkey_new failed"); 932 if ((r = sshkey_read(ret, cpp)) == 0) 933 return ret; 934 /* Not a key */ 935 sshkey_free(ret); 936 return NULL; 937 } 938 939 static void 940 fingerprint_one_key(const struct sshkey *public, const char *comment) 941 { 942 char *fp = NULL, *ra = NULL; 943 enum sshkey_fp_rep rep; 944 int fptype; 945 946 fptype = print_bubblebabble ? SSH_DIGEST_SHA1 : fingerprint_hash; 947 rep = print_bubblebabble ? SSH_FP_BUBBLEBABBLE : SSH_FP_DEFAULT; 948 fp = sshkey_fingerprint(public, fptype, rep); 949 ra = sshkey_fingerprint(public, fingerprint_hash, SSH_FP_RANDOMART); 950 if (fp == NULL || ra == NULL) 951 fatal_f("sshkey_fingerprint failed"); 952 mprintf("%u %s %s (%s)\n", sshkey_size(public), fp, 953 comment ? comment : "no comment", sshkey_type(public)); 954 if (log_level_get() >= SYSLOG_LEVEL_VERBOSE) 955 printf("%s\n", ra); 956 free(ra); 957 free(fp); 958 } 959 960 static void 961 fingerprint_private(const char *path) 962 { 963 struct stat st; 964 char *comment = NULL; 965 struct sshkey *privkey = NULL, *pubkey = NULL; 966 int r; 967 968 if (stat(identity_file, &st) == -1) 969 fatal("%s: %s", path, strerror(errno)); 970 if ((r = sshkey_load_public(path, &pubkey, &comment)) != 0) 971 debug_r(r, "load public \"%s\"", path); 972 if (pubkey == NULL || comment == NULL || *comment == '\0') { 973 free(comment); 974 if ((r = sshkey_load_private(path, NULL, 975 &privkey, &comment)) != 0) 976 debug_r(r, "load private \"%s\"", path); 977 } 978 if (pubkey == NULL && privkey == NULL) 979 fatal("%s is not a key file.", path); 980 981 fingerprint_one_key(pubkey == NULL ? privkey : pubkey, comment); 982 sshkey_free(pubkey); 983 sshkey_free(privkey); 984 free(comment); 985 } 986 987 static void 988 do_fingerprint(struct passwd *pw) 989 { 990 FILE *f; 991 struct sshkey *public = NULL; 992 char *comment = NULL, *cp, *ep, *line = NULL; 993 size_t linesize = 0; 994 int i, invalid = 1; 995 const char *path; 996 u_long lnum = 0; 997 998 if (!have_identity) 999 ask_filename(pw, "Enter file in which the key is"); 1000 path = identity_file; 1001 1002 if (strcmp(identity_file, "-") == 0) { 1003 f = stdin; 1004 path = "(stdin)"; 1005 } else if ((f = fopen(path, "r")) == NULL) 1006 fatal("%s: %s: %s", __progname, path, strerror(errno)); 1007 1008 while (getline(&line, &linesize, f) != -1) { 1009 lnum++; 1010 cp = line; 1011 cp[strcspn(cp, "\n")] = '\0'; 1012 /* Trim leading space and comments */ 1013 cp = line + strspn(line, " \t"); 1014 if (*cp == '#' || *cp == '\0') 1015 continue; 1016 1017 /* 1018 * Input may be plain keys, private keys, authorized_keys 1019 * or known_hosts. 1020 */ 1021 1022 /* 1023 * Try private keys first. Assume a key is private if 1024 * "SSH PRIVATE KEY" appears on the first line and we're 1025 * not reading from stdin (XXX support private keys on stdin). 1026 */ 1027 if (lnum == 1 && strcmp(identity_file, "-") != 0 && 1028 strstr(cp, "PRIVATE KEY") != NULL) { 1029 free(line); 1030 fclose(f); 1031 fingerprint_private(path); 1032 exit(0); 1033 } 1034 1035 /* 1036 * If it's not a private key, then this must be prepared to 1037 * accept a public key prefixed with a hostname or options. 1038 * Try a bare key first, otherwise skip the leading stuff. 1039 */ 1040 comment = NULL; 1041 if ((public = try_read_key(&cp)) == NULL) { 1042 i = strtol(cp, &ep, 10); 1043 if (i == 0 || ep == NULL || 1044 (*ep != ' ' && *ep != '\t')) { 1045 int quoted = 0; 1046 1047 comment = cp; 1048 for (; *cp && (quoted || (*cp != ' ' && 1049 *cp != '\t')); cp++) { 1050 if (*cp == '\\' && cp[1] == '"') 1051 cp++; /* Skip both */ 1052 else if (*cp == '"') 1053 quoted = !quoted; 1054 } 1055 if (!*cp) 1056 continue; 1057 *cp++ = '\0'; 1058 } 1059 } 1060 /* Retry after parsing leading hostname/key options */ 1061 if (public == NULL && (public = try_read_key(&cp)) == NULL) { 1062 debug("%s:%lu: not a public key", path, lnum); 1063 continue; 1064 } 1065 1066 /* Find trailing comment, if any */ 1067 for (; *cp == ' ' || *cp == '\t'; cp++) 1068 ; 1069 if (*cp != '\0' && *cp != '#') 1070 comment = cp; 1071 1072 fingerprint_one_key(public, comment); 1073 sshkey_free(public); 1074 invalid = 0; /* One good key in the file is sufficient */ 1075 } 1076 fclose(f); 1077 free(line); 1078 1079 if (invalid) 1080 fatal("%s is not a public key file.", path); 1081 exit(0); 1082 } 1083 1084 static void 1085 do_gen_all_hostkeys(struct passwd *pw) 1086 { 1087 struct { 1088 char *key_type; 1089 char *key_type_display; 1090 char *path; 1091 } key_types[] = { 1092 #ifdef WITH_OPENSSL 1093 { "rsa", "RSA" ,_PATH_HOST_RSA_KEY_FILE }, 1094 #ifdef OPENSSL_HAS_ECC 1095 { "ecdsa", "ECDSA",_PATH_HOST_ECDSA_KEY_FILE }, 1096 #endif /* OPENSSL_HAS_ECC */ 1097 #endif /* WITH_OPENSSL */ 1098 { "ed25519", "ED25519",_PATH_HOST_ED25519_KEY_FILE }, 1099 #ifdef WITH_XMSS 1100 { "xmss", "XMSS",_PATH_HOST_XMSS_KEY_FILE }, 1101 #endif /* WITH_XMSS */ 1102 { NULL, NULL, NULL } 1103 }; 1104 1105 u_int32_t bits = 0; 1106 int first = 0; 1107 struct stat st; 1108 struct sshkey *private, *public; 1109 char comment[1024], *prv_tmp, *pub_tmp, *prv_file, *pub_file; 1110 int i, type, fd, r; 1111 1112 for (i = 0; key_types[i].key_type; i++) { 1113 public = private = NULL; 1114 prv_tmp = pub_tmp = prv_file = pub_file = NULL; 1115 1116 xasprintf(&prv_file, "%s%s", 1117 identity_file, key_types[i].path); 1118 1119 /* Check whether private key exists and is not zero-length */ 1120 if (stat(prv_file, &st) == 0) { 1121 if (st.st_size != 0) 1122 goto next; 1123 } else if (errno != ENOENT) { 1124 error("Could not stat %s: %s", key_types[i].path, 1125 strerror(errno)); 1126 goto failnext; 1127 } 1128 1129 /* 1130 * Private key doesn't exist or is invalid; proceed with 1131 * key generation. 1132 */ 1133 xasprintf(&prv_tmp, "%s%s.XXXXXXXXXX", 1134 identity_file, key_types[i].path); 1135 xasprintf(&pub_tmp, "%s%s.pub.XXXXXXXXXX", 1136 identity_file, key_types[i].path); 1137 xasprintf(&pub_file, "%s%s.pub", 1138 identity_file, key_types[i].path); 1139 1140 if (first == 0) { 1141 first = 1; 1142 printf("%s: generating new host keys: ", __progname); 1143 } 1144 printf("%s ", key_types[i].key_type_display); 1145 fflush(stdout); 1146 type = sshkey_type_from_shortname(key_types[i].key_type); 1147 if ((fd = mkstemp(prv_tmp)) == -1) { 1148 error("Could not save your private key in %s: %s", 1149 prv_tmp, strerror(errno)); 1150 goto failnext; 1151 } 1152 (void)close(fd); /* just using mkstemp() to reserve a name */ 1153 bits = 0; 1154 type_bits_valid(type, NULL, &bits); 1155 if ((r = sshkey_generate(type, bits, &private)) != 0) { 1156 error_r(r, "sshkey_generate failed"); 1157 goto failnext; 1158 } 1159 if ((r = sshkey_from_private(private, &public)) != 0) 1160 fatal_fr(r, "sshkey_from_private"); 1161 snprintf(comment, sizeof comment, "%s@%s", pw->pw_name, 1162 hostname); 1163 if ((r = sshkey_save_private(private, prv_tmp, "", 1164 comment, private_key_format, openssh_format_cipher, 1165 rounds)) != 0) { 1166 error_r(r, "Saving key \"%s\" failed", prv_tmp); 1167 goto failnext; 1168 } 1169 if ((fd = mkstemp(pub_tmp)) == -1) { 1170 error("Could not save your public key in %s: %s", 1171 pub_tmp, strerror(errno)); 1172 goto failnext; 1173 } 1174 (void)fchmod(fd, 0644); 1175 (void)close(fd); 1176 if ((r = sshkey_save_public(public, pub_tmp, comment)) != 0) { 1177 error_r(r, "Unable to save public key to %s", 1178 identity_file); 1179 goto failnext; 1180 } 1181 1182 /* Rename temporary files to their permanent locations. */ 1183 if (rename(pub_tmp, pub_file) != 0) { 1184 error("Unable to move %s into position: %s", 1185 pub_file, strerror(errno)); 1186 goto failnext; 1187 } 1188 if (rename(prv_tmp, prv_file) != 0) { 1189 error("Unable to move %s into position: %s", 1190 key_types[i].path, strerror(errno)); 1191 failnext: 1192 first = 0; 1193 goto next; 1194 } 1195 next: 1196 sshkey_free(private); 1197 sshkey_free(public); 1198 free(prv_tmp); 1199 free(pub_tmp); 1200 free(prv_file); 1201 free(pub_file); 1202 } 1203 if (first != 0) 1204 printf("\n"); 1205 } 1206 1207 struct known_hosts_ctx { 1208 const char *host; /* Hostname searched for in find/delete case */ 1209 FILE *out; /* Output file, stdout for find_hosts case */ 1210 int has_unhashed; /* When hashing, original had unhashed hosts */ 1211 int found_key; /* For find/delete, host was found */ 1212 int invalid; /* File contained invalid items; don't delete */ 1213 int hash_hosts; /* Hash hostnames as we go */ 1214 int find_host; /* Search for specific hostname */ 1215 int delete_host; /* Delete host from known_hosts */ 1216 }; 1217 1218 static int 1219 known_hosts_hash(struct hostkey_foreach_line *l, void *_ctx) 1220 { 1221 struct known_hosts_ctx *ctx = (struct known_hosts_ctx *)_ctx; 1222 char *hashed, *cp, *hosts, *ohosts; 1223 int has_wild = l->hosts && strcspn(l->hosts, "*?!") != strlen(l->hosts); 1224 int was_hashed = l->hosts && l->hosts[0] == HASH_DELIM; 1225 1226 switch (l->status) { 1227 case HKF_STATUS_OK: 1228 case HKF_STATUS_MATCHED: 1229 /* 1230 * Don't hash hosts already hashed, with wildcard 1231 * characters or a CA/revocation marker. 1232 */ 1233 if (was_hashed || has_wild || l->marker != MRK_NONE) { 1234 fprintf(ctx->out, "%s\n", l->line); 1235 if (has_wild && !ctx->find_host) { 1236 logit("%s:%lu: ignoring host name " 1237 "with wildcard: %.64s", l->path, 1238 l->linenum, l->hosts); 1239 } 1240 return 0; 1241 } 1242 /* 1243 * Split any comma-separated hostnames from the host list, 1244 * hash and store separately. 1245 */ 1246 ohosts = hosts = xstrdup(l->hosts); 1247 while ((cp = strsep(&hosts, ",")) != NULL && *cp != '\0') { 1248 lowercase(cp); 1249 if ((hashed = host_hash(cp, NULL, 0)) == NULL) 1250 fatal("hash_host failed"); 1251 fprintf(ctx->out, "%s %s\n", hashed, l->rawkey); 1252 free(hashed); 1253 ctx->has_unhashed = 1; 1254 } 1255 free(ohosts); 1256 return 0; 1257 case HKF_STATUS_INVALID: 1258 /* Retain invalid lines, but mark file as invalid. */ 1259 ctx->invalid = 1; 1260 logit("%s:%lu: invalid line", l->path, l->linenum); 1261 /* FALLTHROUGH */ 1262 default: 1263 fprintf(ctx->out, "%s\n", l->line); 1264 return 0; 1265 } 1266 /* NOTREACHED */ 1267 return -1; 1268 } 1269 1270 static int 1271 known_hosts_find_delete(struct hostkey_foreach_line *l, void *_ctx) 1272 { 1273 struct known_hosts_ctx *ctx = (struct known_hosts_ctx *)_ctx; 1274 enum sshkey_fp_rep rep; 1275 int fptype; 1276 char *fp = NULL, *ra = NULL; 1277 1278 fptype = print_bubblebabble ? SSH_DIGEST_SHA1 : fingerprint_hash; 1279 rep = print_bubblebabble ? SSH_FP_BUBBLEBABBLE : SSH_FP_DEFAULT; 1280 1281 if (l->status == HKF_STATUS_MATCHED) { 1282 if (ctx->delete_host) { 1283 if (l->marker != MRK_NONE) { 1284 /* Don't remove CA and revocation lines */ 1285 fprintf(ctx->out, "%s\n", l->line); 1286 } else { 1287 /* 1288 * Hostname matches and has no CA/revoke 1289 * marker, delete it by *not* writing the 1290 * line to ctx->out. 1291 */ 1292 ctx->found_key = 1; 1293 if (!quiet) 1294 printf("# Host %s found: line %lu\n", 1295 ctx->host, l->linenum); 1296 } 1297 return 0; 1298 } else if (ctx->find_host) { 1299 ctx->found_key = 1; 1300 if (!quiet) { 1301 printf("# Host %s found: line %lu %s\n", 1302 ctx->host, 1303 l->linenum, l->marker == MRK_CA ? "CA" : 1304 (l->marker == MRK_REVOKE ? "REVOKED" : "")); 1305 } 1306 if (ctx->hash_hosts) 1307 known_hosts_hash(l, ctx); 1308 else if (print_fingerprint) { 1309 fp = sshkey_fingerprint(l->key, fptype, rep); 1310 ra = sshkey_fingerprint(l->key, 1311 fingerprint_hash, SSH_FP_RANDOMART); 1312 if (fp == NULL || ra == NULL) 1313 fatal_f("sshkey_fingerprint failed"); 1314 mprintf("%s %s %s%s%s\n", ctx->host, 1315 sshkey_type(l->key), fp, 1316 l->comment[0] ? " " : "", 1317 l->comment); 1318 if (log_level_get() >= SYSLOG_LEVEL_VERBOSE) 1319 printf("%s\n", ra); 1320 free(ra); 1321 free(fp); 1322 } else 1323 fprintf(ctx->out, "%s\n", l->line); 1324 return 0; 1325 } 1326 } else if (ctx->delete_host) { 1327 /* Retain non-matching hosts when deleting */ 1328 if (l->status == HKF_STATUS_INVALID) { 1329 ctx->invalid = 1; 1330 logit("%s:%lu: invalid line", l->path, l->linenum); 1331 } 1332 fprintf(ctx->out, "%s\n", l->line); 1333 } 1334 return 0; 1335 } 1336 1337 static void 1338 do_known_hosts(struct passwd *pw, const char *name, int find_host, 1339 int delete_host, int hash_hosts) 1340 { 1341 char *cp, tmp[PATH_MAX], old[PATH_MAX]; 1342 int r, fd, oerrno, inplace = 0; 1343 struct known_hosts_ctx ctx; 1344 u_int foreach_options; 1345 struct stat sb; 1346 1347 if (!have_identity) { 1348 cp = tilde_expand_filename(_PATH_SSH_USER_HOSTFILE, pw->pw_uid); 1349 if (strlcpy(identity_file, cp, sizeof(identity_file)) >= 1350 sizeof(identity_file)) 1351 fatal("Specified known hosts path too long"); 1352 free(cp); 1353 have_identity = 1; 1354 } 1355 if (stat(identity_file, &sb) != 0) 1356 fatal("Cannot stat %s: %s", identity_file, strerror(errno)); 1357 1358 memset(&ctx, 0, sizeof(ctx)); 1359 ctx.out = stdout; 1360 ctx.host = name; 1361 ctx.hash_hosts = hash_hosts; 1362 ctx.find_host = find_host; 1363 ctx.delete_host = delete_host; 1364 1365 /* 1366 * Find hosts goes to stdout, hash and deletions happen in-place 1367 * A corner case is ssh-keygen -HF foo, which should go to stdout 1368 */ 1369 if (!find_host && (hash_hosts || delete_host)) { 1370 if (strlcpy(tmp, identity_file, sizeof(tmp)) >= sizeof(tmp) || 1371 strlcat(tmp, ".XXXXXXXXXX", sizeof(tmp)) >= sizeof(tmp) || 1372 strlcpy(old, identity_file, sizeof(old)) >= sizeof(old) || 1373 strlcat(old, ".old", sizeof(old)) >= sizeof(old)) 1374 fatal("known_hosts path too long"); 1375 umask(077); 1376 if ((fd = mkstemp(tmp)) == -1) 1377 fatal("mkstemp: %s", strerror(errno)); 1378 if ((ctx.out = fdopen(fd, "w")) == NULL) { 1379 oerrno = errno; 1380 unlink(tmp); 1381 fatal("fdopen: %s", strerror(oerrno)); 1382 } 1383 (void)fchmod(fd, sb.st_mode & 0644); 1384 inplace = 1; 1385 } 1386 /* XXX support identity_file == "-" for stdin */ 1387 foreach_options = find_host ? HKF_WANT_MATCH : 0; 1388 foreach_options |= print_fingerprint ? HKF_WANT_PARSE_KEY : 0; 1389 if ((r = hostkeys_foreach(identity_file, (find_host || !hash_hosts) ? 1390 known_hosts_find_delete : known_hosts_hash, &ctx, name, NULL, 1391 foreach_options, 0)) != 0) { 1392 if (inplace) 1393 unlink(tmp); 1394 fatal_fr(r, "hostkeys_foreach"); 1395 } 1396 1397 if (inplace) 1398 fclose(ctx.out); 1399 1400 if (ctx.invalid) { 1401 error("%s is not a valid known_hosts file.", identity_file); 1402 if (inplace) { 1403 error("Not replacing existing known_hosts " 1404 "file because of errors"); 1405 unlink(tmp); 1406 } 1407 exit(1); 1408 } else if (delete_host && !ctx.found_key) { 1409 logit("Host %s not found in %s", name, identity_file); 1410 if (inplace) 1411 unlink(tmp); 1412 } else if (inplace) { 1413 /* Backup existing file */ 1414 if (unlink(old) == -1 && errno != ENOENT) 1415 fatal("unlink %.100s: %s", old, strerror(errno)); 1416 if (link(identity_file, old) == -1) 1417 fatal("link %.100s to %.100s: %s", identity_file, old, 1418 strerror(errno)); 1419 /* Move new one into place */ 1420 if (rename(tmp, identity_file) == -1) { 1421 error("rename\"%s\" to \"%s\": %s", tmp, identity_file, 1422 strerror(errno)); 1423 unlink(tmp); 1424 unlink(old); 1425 exit(1); 1426 } 1427 1428 printf("%s updated.\n", identity_file); 1429 printf("Original contents retained as %s\n", old); 1430 if (ctx.has_unhashed) { 1431 logit("WARNING: %s contains unhashed entries", old); 1432 logit("Delete this file to ensure privacy " 1433 "of hostnames"); 1434 } 1435 } 1436 1437 exit (find_host && !ctx.found_key); 1438 } 1439 1440 /* 1441 * Perform changing a passphrase. The argument is the passwd structure 1442 * for the current user. 1443 */ 1444 static void 1445 do_change_passphrase(struct passwd *pw) 1446 { 1447 char *comment; 1448 char *old_passphrase, *passphrase1, *passphrase2; 1449 struct stat st; 1450 struct sshkey *private; 1451 int r; 1452 1453 if (!have_identity) 1454 ask_filename(pw, "Enter file in which the key is"); 1455 if (stat(identity_file, &st) == -1) 1456 fatal("%s: %s", identity_file, strerror(errno)); 1457 /* Try to load the file with empty passphrase. */ 1458 r = sshkey_load_private(identity_file, "", &private, &comment); 1459 if (r == SSH_ERR_KEY_WRONG_PASSPHRASE) { 1460 if (identity_passphrase) 1461 old_passphrase = xstrdup(identity_passphrase); 1462 else 1463 old_passphrase = 1464 read_passphrase("Enter old passphrase: ", 1465 RP_ALLOW_STDIN); 1466 r = sshkey_load_private(identity_file, old_passphrase, 1467 &private, &comment); 1468 freezero(old_passphrase, strlen(old_passphrase)); 1469 if (r != 0) 1470 goto badkey; 1471 } else if (r != 0) { 1472 badkey: 1473 fatal_r(r, "Failed to load key %s", identity_file); 1474 } 1475 if (comment) 1476 mprintf("Key has comment '%s'\n", comment); 1477 1478 /* Ask the new passphrase (twice). */ 1479 if (identity_new_passphrase) { 1480 passphrase1 = xstrdup(identity_new_passphrase); 1481 passphrase2 = NULL; 1482 } else { 1483 passphrase1 = 1484 read_passphrase("Enter new passphrase (empty for no " 1485 "passphrase): ", RP_ALLOW_STDIN); 1486 passphrase2 = read_passphrase("Enter same passphrase again: ", 1487 RP_ALLOW_STDIN); 1488 1489 /* Verify that they are the same. */ 1490 if (strcmp(passphrase1, passphrase2) != 0) { 1491 explicit_bzero(passphrase1, strlen(passphrase1)); 1492 explicit_bzero(passphrase2, strlen(passphrase2)); 1493 free(passphrase1); 1494 free(passphrase2); 1495 printf("Pass phrases do not match. Try again.\n"); 1496 exit(1); 1497 } 1498 /* Destroy the other copy. */ 1499 freezero(passphrase2, strlen(passphrase2)); 1500 } 1501 1502 /* Save the file using the new passphrase. */ 1503 if ((r = sshkey_save_private(private, identity_file, passphrase1, 1504 comment, private_key_format, openssh_format_cipher, rounds)) != 0) { 1505 error_r(r, "Saving key \"%s\" failed", identity_file); 1506 freezero(passphrase1, strlen(passphrase1)); 1507 sshkey_free(private); 1508 free(comment); 1509 exit(1); 1510 } 1511 /* Destroy the passphrase and the copy of the key in memory. */ 1512 freezero(passphrase1, strlen(passphrase1)); 1513 sshkey_free(private); /* Destroys contents */ 1514 free(comment); 1515 1516 printf("Your identification has been saved with the new passphrase.\n"); 1517 exit(0); 1518 } 1519 1520 /* 1521 * Print the SSHFP RR. 1522 */ 1523 static int 1524 do_print_resource_record(struct passwd *pw, char *fname, char *hname, 1525 int print_generic, char * const *opts, size_t nopts) 1526 { 1527 struct sshkey *public; 1528 char *comment = NULL; 1529 struct stat st; 1530 int r, hash = -1; 1531 size_t i; 1532 1533 for (i = 0; i < nopts; i++) { 1534 if (strncasecmp(opts[i], "hashalg=", 8) == 0) { 1535 if ((hash = ssh_digest_alg_by_name(opts[i] + 8)) == -1) 1536 fatal("Unsupported hash algorithm"); 1537 } else { 1538 error("Invalid option \"%s\"", opts[i]); 1539 return SSH_ERR_INVALID_ARGUMENT; 1540 } 1541 } 1542 if (fname == NULL) 1543 fatal_f("no filename"); 1544 if (stat(fname, &st) == -1) { 1545 if (errno == ENOENT) 1546 return 0; 1547 fatal("%s: %s", fname, strerror(errno)); 1548 } 1549 if ((r = sshkey_load_public(fname, &public, &comment)) != 0) 1550 fatal_r(r, "Failed to read v2 public key from \"%s\"", fname); 1551 export_dns_rr(hname, public, stdout, print_generic, hash); 1552 sshkey_free(public); 1553 free(comment); 1554 return 1; 1555 } 1556 1557 /* 1558 * Change the comment of a private key file. 1559 */ 1560 static void 1561 do_change_comment(struct passwd *pw, const char *identity_comment) 1562 { 1563 char new_comment[1024], *comment, *passphrase; 1564 struct sshkey *private; 1565 struct sshkey *public; 1566 struct stat st; 1567 int r; 1568 1569 if (!have_identity) 1570 ask_filename(pw, "Enter file in which the key is"); 1571 if (stat(identity_file, &st) == -1) 1572 fatal("%s: %s", identity_file, strerror(errno)); 1573 if ((r = sshkey_load_private(identity_file, "", 1574 &private, &comment)) == 0) 1575 passphrase = xstrdup(""); 1576 else if (r != SSH_ERR_KEY_WRONG_PASSPHRASE) 1577 fatal_r(r, "Cannot load private key \"%s\"", identity_file); 1578 else { 1579 if (identity_passphrase) 1580 passphrase = xstrdup(identity_passphrase); 1581 else if (identity_new_passphrase) 1582 passphrase = xstrdup(identity_new_passphrase); 1583 else 1584 passphrase = read_passphrase("Enter passphrase: ", 1585 RP_ALLOW_STDIN); 1586 /* Try to load using the passphrase. */ 1587 if ((r = sshkey_load_private(identity_file, passphrase, 1588 &private, &comment)) != 0) { 1589 freezero(passphrase, strlen(passphrase)); 1590 fatal_r(r, "Cannot load private key \"%s\"", 1591 identity_file); 1592 } 1593 } 1594 1595 if (private->type != KEY_ED25519 && private->type != KEY_XMSS && 1596 private_key_format != SSHKEY_PRIVATE_OPENSSH) { 1597 error("Comments are only supported for keys stored in " 1598 "the new format (-o)."); 1599 explicit_bzero(passphrase, strlen(passphrase)); 1600 sshkey_free(private); 1601 exit(1); 1602 } 1603 if (comment) 1604 printf("Old comment: %s\n", comment); 1605 else 1606 printf("No existing comment\n"); 1607 1608 if (identity_comment) { 1609 strlcpy(new_comment, identity_comment, sizeof(new_comment)); 1610 } else { 1611 printf("New comment: "); 1612 fflush(stdout); 1613 if (!fgets(new_comment, sizeof(new_comment), stdin)) { 1614 explicit_bzero(passphrase, strlen(passphrase)); 1615 sshkey_free(private); 1616 exit(1); 1617 } 1618 new_comment[strcspn(new_comment, "\n")] = '\0'; 1619 } 1620 if (comment != NULL && strcmp(comment, new_comment) == 0) { 1621 printf("No change to comment\n"); 1622 free(passphrase); 1623 sshkey_free(private); 1624 free(comment); 1625 exit(0); 1626 } 1627 1628 /* Save the file using the new passphrase. */ 1629 if ((r = sshkey_save_private(private, identity_file, passphrase, 1630 new_comment, private_key_format, openssh_format_cipher, 1631 rounds)) != 0) { 1632 error_r(r, "Saving key \"%s\" failed", identity_file); 1633 freezero(passphrase, strlen(passphrase)); 1634 sshkey_free(private); 1635 free(comment); 1636 exit(1); 1637 } 1638 freezero(passphrase, strlen(passphrase)); 1639 if ((r = sshkey_from_private(private, &public)) != 0) 1640 fatal_fr(r, "sshkey_from_private"); 1641 sshkey_free(private); 1642 1643 strlcat(identity_file, ".pub", sizeof(identity_file)); 1644 if ((r = sshkey_save_public(public, identity_file, new_comment)) != 0) 1645 fatal_r(r, "Unable to save public key to %s", identity_file); 1646 sshkey_free(public); 1647 free(comment); 1648 1649 if (strlen(new_comment) > 0) 1650 printf("Comment '%s' applied\n", new_comment); 1651 else 1652 printf("Comment removed\n"); 1653 1654 exit(0); 1655 } 1656 1657 static void 1658 cert_ext_add(const char *key, const char *value, int iscrit) 1659 { 1660 cert_ext = xreallocarray(cert_ext, ncert_ext + 1, sizeof(*cert_ext)); 1661 cert_ext[ncert_ext].key = xstrdup(key); 1662 cert_ext[ncert_ext].val = value == NULL ? NULL : xstrdup(value); 1663 cert_ext[ncert_ext].crit = iscrit; 1664 ncert_ext++; 1665 } 1666 1667 /* qsort(3) comparison function for certificate extensions */ 1668 static int 1669 cert_ext_cmp(const void *_a, const void *_b) 1670 { 1671 const struct cert_ext *a = (const struct cert_ext *)_a; 1672 const struct cert_ext *b = (const struct cert_ext *)_b; 1673 int r; 1674 1675 if (a->crit != b->crit) 1676 return (a->crit < b->crit) ? -1 : 1; 1677 if ((r = strcmp(a->key, b->key)) != 0) 1678 return r; 1679 if ((a->val == NULL) != (b->val == NULL)) 1680 return (a->val == NULL) ? -1 : 1; 1681 if (a->val != NULL && (r = strcmp(a->val, b->val)) != 0) 1682 return r; 1683 return 0; 1684 } 1685 1686 #define OPTIONS_CRITICAL 1 1687 #define OPTIONS_EXTENSIONS 2 1688 static void 1689 prepare_options_buf(struct sshbuf *c, int which) 1690 { 1691 struct sshbuf *b; 1692 size_t i; 1693 int r; 1694 const struct cert_ext *ext; 1695 1696 if ((b = sshbuf_new()) == NULL) 1697 fatal_f("sshbuf_new failed"); 1698 sshbuf_reset(c); 1699 for (i = 0; i < ncert_ext; i++) { 1700 ext = &cert_ext[i]; 1701 if ((ext->crit && (which & OPTIONS_EXTENSIONS)) || 1702 (!ext->crit && (which & OPTIONS_CRITICAL))) 1703 continue; 1704 if (ext->val == NULL) { 1705 /* flag option */ 1706 debug3_f("%s", ext->key); 1707 if ((r = sshbuf_put_cstring(c, ext->key)) != 0 || 1708 (r = sshbuf_put_string(c, NULL, 0)) != 0) 1709 fatal_fr(r, "prepare flag"); 1710 } else { 1711 /* key/value option */ 1712 debug3_f("%s=%s", ext->key, ext->val); 1713 sshbuf_reset(b); 1714 if ((r = sshbuf_put_cstring(c, ext->key)) != 0 || 1715 (r = sshbuf_put_cstring(b, ext->val)) != 0 || 1716 (r = sshbuf_put_stringb(c, b)) != 0) 1717 fatal_fr(r, "prepare k/v"); 1718 } 1719 } 1720 sshbuf_free(b); 1721 } 1722 1723 static void 1724 finalise_cert_exts(void) 1725 { 1726 /* critical options */ 1727 if (certflags_command != NULL) 1728 cert_ext_add("force-command", certflags_command, 1); 1729 if (certflags_src_addr != NULL) 1730 cert_ext_add("source-address", certflags_src_addr, 1); 1731 if ((certflags_flags & CERTOPT_REQUIRE_VERIFY) != 0) 1732 cert_ext_add("verify-required", NULL, 1); 1733 /* extensions */ 1734 if ((certflags_flags & CERTOPT_X_FWD) != 0) 1735 cert_ext_add("permit-X11-forwarding", NULL, 0); 1736 if ((certflags_flags & CERTOPT_AGENT_FWD) != 0) 1737 cert_ext_add("permit-agent-forwarding", NULL, 0); 1738 if ((certflags_flags & CERTOPT_PORT_FWD) != 0) 1739 cert_ext_add("permit-port-forwarding", NULL, 0); 1740 if ((certflags_flags & CERTOPT_PTY) != 0) 1741 cert_ext_add("permit-pty", NULL, 0); 1742 if ((certflags_flags & CERTOPT_USER_RC) != 0) 1743 cert_ext_add("permit-user-rc", NULL, 0); 1744 if ((certflags_flags & CERTOPT_NO_REQUIRE_USER_PRESENCE) != 0) 1745 cert_ext_add("no-touch-required", NULL, 0); 1746 /* order lexically by key */ 1747 if (ncert_ext > 0) 1748 qsort(cert_ext, ncert_ext, sizeof(*cert_ext), cert_ext_cmp); 1749 } 1750 1751 static struct sshkey * 1752 load_pkcs11_key(char *path) 1753 { 1754 #ifdef ENABLE_PKCS11 1755 struct sshkey **keys = NULL, *public, *private = NULL; 1756 int r, i, nkeys; 1757 1758 if ((r = sshkey_load_public(path, &public, NULL)) != 0) 1759 fatal_r(r, "Couldn't load CA public key \"%s\"", path); 1760 1761 nkeys = pkcs11_add_provider(pkcs11provider, identity_passphrase, 1762 &keys, NULL); 1763 debug3_f("%d keys", nkeys); 1764 if (nkeys <= 0) 1765 fatal("cannot read public key from pkcs11"); 1766 for (i = 0; i < nkeys; i++) { 1767 if (sshkey_equal_public(public, keys[i])) { 1768 private = keys[i]; 1769 continue; 1770 } 1771 sshkey_free(keys[i]); 1772 } 1773 free(keys); 1774 sshkey_free(public); 1775 return private; 1776 #else 1777 fatal("no pkcs11 support"); 1778 #endif /* ENABLE_PKCS11 */ 1779 } 1780 1781 /* Signer for sshkey_certify_custom that uses the agent */ 1782 static int 1783 agent_signer(struct sshkey *key, u_char **sigp, size_t *lenp, 1784 const u_char *data, size_t datalen, 1785 const char *alg, const char *provider, const char *pin, 1786 u_int compat, void *ctx) 1787 { 1788 int *agent_fdp = (int *)ctx; 1789 1790 return ssh_agent_sign(*agent_fdp, key, sigp, lenp, 1791 data, datalen, alg, compat); 1792 } 1793 1794 static void 1795 do_ca_sign(struct passwd *pw, const char *ca_key_path, int prefer_agent, 1796 unsigned long long cert_serial, int cert_serial_autoinc, 1797 int argc, char **argv) 1798 { 1799 int r, i, found, agent_fd = -1; 1800 u_int n; 1801 struct sshkey *ca, *public; 1802 char valid[64], *otmp, *tmp, *cp, *out, *comment; 1803 char *ca_fp = NULL, **plist = NULL, *pin = NULL; 1804 struct ssh_identitylist *agent_ids; 1805 size_t j; 1806 struct notifier_ctx *notifier = NULL; 1807 1808 #ifdef ENABLE_PKCS11 1809 pkcs11_init(1); 1810 #endif 1811 tmp = tilde_expand_filename(ca_key_path, pw->pw_uid); 1812 if (pkcs11provider != NULL) { 1813 /* If a PKCS#11 token was specified then try to use it */ 1814 if ((ca = load_pkcs11_key(tmp)) == NULL) 1815 fatal("No PKCS#11 key matching %s found", ca_key_path); 1816 } else if (prefer_agent) { 1817 /* 1818 * Agent signature requested. Try to use agent after making 1819 * sure the public key specified is actually present in the 1820 * agent. 1821 */ 1822 if ((r = sshkey_load_public(tmp, &ca, NULL)) != 0) 1823 fatal_r(r, "Cannot load CA public key %s", tmp); 1824 if ((r = ssh_get_authentication_socket(&agent_fd)) != 0) 1825 fatal_r(r, "Cannot use public key for CA signature"); 1826 if ((r = ssh_fetch_identitylist(agent_fd, &agent_ids)) != 0) 1827 fatal_r(r, "Retrieve agent key list"); 1828 found = 0; 1829 for (j = 0; j < agent_ids->nkeys; j++) { 1830 if (sshkey_equal(ca, agent_ids->keys[j])) { 1831 found = 1; 1832 break; 1833 } 1834 } 1835 if (!found) 1836 fatal("CA key %s not found in agent", tmp); 1837 ssh_free_identitylist(agent_ids); 1838 ca->flags |= SSHKEY_FLAG_EXT; 1839 } else { 1840 /* CA key is assumed to be a private key on the filesystem */ 1841 ca = load_identity(tmp, NULL); 1842 if (sshkey_is_sk(ca) && 1843 (ca->sk_flags & SSH_SK_USER_VERIFICATION_REQD)) { 1844 if ((pin = read_passphrase("Enter PIN for CA key: ", 1845 RP_ALLOW_STDIN)) == NULL) 1846 fatal_f("couldn't read PIN"); 1847 } 1848 } 1849 free(tmp); 1850 1851 if (key_type_name != NULL) { 1852 if (sshkey_type_from_shortname(key_type_name) != ca->type) { 1853 fatal("CA key type %s doesn't match specified %s", 1854 sshkey_ssh_name(ca), key_type_name); 1855 } 1856 } else if (ca->type == KEY_RSA) { 1857 /* Default to a good signature algorithm */ 1858 key_type_name = "rsa-sha2-512"; 1859 } 1860 ca_fp = sshkey_fingerprint(ca, fingerprint_hash, SSH_FP_DEFAULT); 1861 1862 finalise_cert_exts(); 1863 for (i = 0; i < argc; i++) { 1864 /* Split list of principals */ 1865 n = 0; 1866 if (cert_principals != NULL) { 1867 otmp = tmp = xstrdup(cert_principals); 1868 plist = NULL; 1869 for (; (cp = strsep(&tmp, ",")) != NULL; n++) { 1870 plist = xreallocarray(plist, n + 1, sizeof(*plist)); 1871 if (*(plist[n] = xstrdup(cp)) == '\0') 1872 fatal("Empty principal name"); 1873 } 1874 free(otmp); 1875 } 1876 if (n > SSHKEY_CERT_MAX_PRINCIPALS) 1877 fatal("Too many certificate principals specified"); 1878 1879 tmp = tilde_expand_filename(argv[i], pw->pw_uid); 1880 if ((r = sshkey_load_public(tmp, &public, &comment)) != 0) 1881 fatal_r(r, "load pubkey \"%s\"", tmp); 1882 if (sshkey_is_cert(public)) 1883 fatal_f("key \"%s\" type %s cannot be certified", 1884 tmp, sshkey_type(public)); 1885 1886 /* Prepare certificate to sign */ 1887 if ((r = sshkey_to_certified(public)) != 0) 1888 fatal_r(r, "Could not upgrade key %s to certificate", tmp); 1889 public->cert->type = cert_key_type; 1890 public->cert->serial = (u_int64_t)cert_serial; 1891 public->cert->key_id = xstrdup(cert_key_id); 1892 public->cert->nprincipals = n; 1893 public->cert->principals = plist; 1894 public->cert->valid_after = cert_valid_from; 1895 public->cert->valid_before = cert_valid_to; 1896 prepare_options_buf(public->cert->critical, OPTIONS_CRITICAL); 1897 prepare_options_buf(public->cert->extensions, 1898 OPTIONS_EXTENSIONS); 1899 if ((r = sshkey_from_private(ca, 1900 &public->cert->signature_key)) != 0) 1901 fatal_r(r, "sshkey_from_private (ca key)"); 1902 1903 if (agent_fd != -1 && (ca->flags & SSHKEY_FLAG_EXT) != 0) { 1904 if ((r = sshkey_certify_custom(public, ca, 1905 key_type_name, sk_provider, NULL, agent_signer, 1906 &agent_fd)) != 0) 1907 fatal_r(r, "Couldn't certify %s via agent", tmp); 1908 } else { 1909 if (sshkey_is_sk(ca) && 1910 (ca->sk_flags & SSH_SK_USER_PRESENCE_REQD)) { 1911 notifier = notify_start(0, 1912 "Confirm user presence for key %s %s", 1913 sshkey_type(ca), ca_fp); 1914 } 1915 r = sshkey_certify(public, ca, key_type_name, 1916 sk_provider, pin); 1917 notify_complete(notifier, "User presence confirmed"); 1918 if (r != 0) 1919 fatal_r(r, "Couldn't certify key %s", tmp); 1920 } 1921 1922 if ((cp = strrchr(tmp, '.')) != NULL && strcmp(cp, ".pub") == 0) 1923 *cp = '\0'; 1924 xasprintf(&out, "%s-cert.pub", tmp); 1925 free(tmp); 1926 1927 if ((r = sshkey_save_public(public, out, comment)) != 0) { 1928 fatal_r(r, "Unable to save public key to %s", 1929 identity_file); 1930 } 1931 1932 if (!quiet) { 1933 sshkey_format_cert_validity(public->cert, 1934 valid, sizeof(valid)); 1935 logit("Signed %s key %s: id \"%s\" serial %llu%s%s " 1936 "valid %s", sshkey_cert_type(public), 1937 out, public->cert->key_id, 1938 (unsigned long long)public->cert->serial, 1939 cert_principals != NULL ? " for " : "", 1940 cert_principals != NULL ? cert_principals : "", 1941 valid); 1942 } 1943 1944 sshkey_free(public); 1945 free(out); 1946 if (cert_serial_autoinc) 1947 cert_serial++; 1948 } 1949 if (pin != NULL) 1950 freezero(pin, strlen(pin)); 1951 free(ca_fp); 1952 #ifdef ENABLE_PKCS11 1953 pkcs11_terminate(); 1954 #endif 1955 exit(0); 1956 } 1957 1958 static u_int64_t 1959 parse_relative_time(const char *s, time_t now) 1960 { 1961 int64_t mul, secs; 1962 1963 mul = *s == '-' ? -1 : 1; 1964 1965 if ((secs = convtime(s + 1)) == -1) 1966 fatal("Invalid relative certificate time %s", s); 1967 if (mul == -1 && secs > now) 1968 fatal("Certificate time %s cannot be represented", s); 1969 return now + (u_int64_t)(secs * mul); 1970 } 1971 1972 static void 1973 parse_hex_u64(const char *s, uint64_t *up) 1974 { 1975 char *ep; 1976 unsigned long long ull; 1977 1978 errno = 0; 1979 ull = strtoull(s, &ep, 16); 1980 if (*s == '\0' || *ep != '\0') 1981 fatal("Invalid certificate time: not a number"); 1982 if (errno == ERANGE && ull == ULONG_MAX) 1983 fatal_fr(SSH_ERR_SYSTEM_ERROR, "Invalid certificate time"); 1984 *up = (uint64_t)ull; 1985 } 1986 1987 static void 1988 parse_cert_times(char *timespec) 1989 { 1990 char *from, *to; 1991 time_t now = time(NULL); 1992 int64_t secs; 1993 1994 /* +timespec relative to now */ 1995 if (*timespec == '+' && strchr(timespec, ':') == NULL) { 1996 if ((secs = convtime(timespec + 1)) == -1) 1997 fatal("Invalid relative certificate life %s", timespec); 1998 cert_valid_to = now + secs; 1999 /* 2000 * Backdate certificate one minute to avoid problems on hosts 2001 * with poorly-synchronised clocks. 2002 */ 2003 cert_valid_from = ((now - 59)/ 60) * 60; 2004 return; 2005 } 2006 2007 /* 2008 * from:to, where 2009 * from := [+-]timespec | YYYYMMDD | YYYYMMDDHHMMSS | 0x... | "always" 2010 * to := [+-]timespec | YYYYMMDD | YYYYMMDDHHMMSS | 0x... | "forever" 2011 */ 2012 from = xstrdup(timespec); 2013 to = strchr(from, ':'); 2014 if (to == NULL || from == to || *(to + 1) == '\0') 2015 fatal("Invalid certificate life specification %s", timespec); 2016 *to++ = '\0'; 2017 2018 if (*from == '-' || *from == '+') 2019 cert_valid_from = parse_relative_time(from, now); 2020 else if (strcmp(from, "always") == 0) 2021 cert_valid_from = 0; 2022 else if (strncmp(from, "0x", 2) == 0) 2023 parse_hex_u64(from, &cert_valid_from); 2024 else if (parse_absolute_time(from, &cert_valid_from) != 0) 2025 fatal("Invalid from time \"%s\"", from); 2026 2027 if (*to == '-' || *to == '+') 2028 cert_valid_to = parse_relative_time(to, now); 2029 else if (strcmp(to, "forever") == 0) 2030 cert_valid_to = ~(u_int64_t)0; 2031 else if (strncmp(to, "0x", 2) == 0) 2032 parse_hex_u64(to, &cert_valid_to); 2033 else if (parse_absolute_time(to, &cert_valid_to) != 0) 2034 fatal("Invalid to time \"%s\"", to); 2035 2036 if (cert_valid_to <= cert_valid_from) 2037 fatal("Empty certificate validity interval"); 2038 free(from); 2039 } 2040 2041 static void 2042 add_cert_option(char *opt) 2043 { 2044 char *val, *cp; 2045 int iscrit = 0; 2046 2047 if (strcasecmp(opt, "clear") == 0) 2048 certflags_flags = 0; 2049 else if (strcasecmp(opt, "no-x11-forwarding") == 0) 2050 certflags_flags &= ~CERTOPT_X_FWD; 2051 else if (strcasecmp(opt, "permit-x11-forwarding") == 0) 2052 certflags_flags |= CERTOPT_X_FWD; 2053 else if (strcasecmp(opt, "no-agent-forwarding") == 0) 2054 certflags_flags &= ~CERTOPT_AGENT_FWD; 2055 else if (strcasecmp(opt, "permit-agent-forwarding") == 0) 2056 certflags_flags |= CERTOPT_AGENT_FWD; 2057 else if (strcasecmp(opt, "no-port-forwarding") == 0) 2058 certflags_flags &= ~CERTOPT_PORT_FWD; 2059 else if (strcasecmp(opt, "permit-port-forwarding") == 0) 2060 certflags_flags |= CERTOPT_PORT_FWD; 2061 else if (strcasecmp(opt, "no-pty") == 0) 2062 certflags_flags &= ~CERTOPT_PTY; 2063 else if (strcasecmp(opt, "permit-pty") == 0) 2064 certflags_flags |= CERTOPT_PTY; 2065 else if (strcasecmp(opt, "no-user-rc") == 0) 2066 certflags_flags &= ~CERTOPT_USER_RC; 2067 else if (strcasecmp(opt, "permit-user-rc") == 0) 2068 certflags_flags |= CERTOPT_USER_RC; 2069 else if (strcasecmp(opt, "touch-required") == 0) 2070 certflags_flags &= ~CERTOPT_NO_REQUIRE_USER_PRESENCE; 2071 else if (strcasecmp(opt, "no-touch-required") == 0) 2072 certflags_flags |= CERTOPT_NO_REQUIRE_USER_PRESENCE; 2073 else if (strcasecmp(opt, "no-verify-required") == 0) 2074 certflags_flags &= ~CERTOPT_REQUIRE_VERIFY; 2075 else if (strcasecmp(opt, "verify-required") == 0) 2076 certflags_flags |= CERTOPT_REQUIRE_VERIFY; 2077 else if (strncasecmp(opt, "force-command=", 14) == 0) { 2078 val = opt + 14; 2079 if (*val == '\0') 2080 fatal("Empty force-command option"); 2081 if (certflags_command != NULL) 2082 fatal("force-command already specified"); 2083 certflags_command = xstrdup(val); 2084 } else if (strncasecmp(opt, "source-address=", 15) == 0) { 2085 val = opt + 15; 2086 if (*val == '\0') 2087 fatal("Empty source-address option"); 2088 if (certflags_src_addr != NULL) 2089 fatal("source-address already specified"); 2090 if (addr_match_cidr_list(NULL, val) != 0) 2091 fatal("Invalid source-address list"); 2092 certflags_src_addr = xstrdup(val); 2093 } else if (strncasecmp(opt, "extension:", 10) == 0 || 2094 (iscrit = (strncasecmp(opt, "critical:", 9) == 0))) { 2095 val = xstrdup(strchr(opt, ':') + 1); 2096 if ((cp = strchr(val, '=')) != NULL) 2097 *cp++ = '\0'; 2098 cert_ext_add(val, cp, iscrit); 2099 free(val); 2100 } else 2101 fatal("Unsupported certificate option \"%s\"", opt); 2102 } 2103 2104 static void 2105 show_options(struct sshbuf *optbuf, int in_critical) 2106 { 2107 char *name, *arg, *hex; 2108 struct sshbuf *options, *option = NULL; 2109 int r; 2110 2111 if ((options = sshbuf_fromb(optbuf)) == NULL) 2112 fatal_f("sshbuf_fromb failed"); 2113 while (sshbuf_len(options) != 0) { 2114 sshbuf_free(option); 2115 option = NULL; 2116 if ((r = sshbuf_get_cstring(options, &name, NULL)) != 0 || 2117 (r = sshbuf_froms(options, &option)) != 0) 2118 fatal_fr(r, "parse option"); 2119 printf(" %s", name); 2120 if (!in_critical && 2121 (strcmp(name, "permit-X11-forwarding") == 0 || 2122 strcmp(name, "permit-agent-forwarding") == 0 || 2123 strcmp(name, "permit-port-forwarding") == 0 || 2124 strcmp(name, "permit-pty") == 0 || 2125 strcmp(name, "permit-user-rc") == 0 || 2126 strcmp(name, "no-touch-required") == 0)) { 2127 printf("\n"); 2128 } else if (in_critical && 2129 (strcmp(name, "force-command") == 0 || 2130 strcmp(name, "source-address") == 0)) { 2131 if ((r = sshbuf_get_cstring(option, &arg, NULL)) != 0) 2132 fatal_fr(r, "parse critical"); 2133 printf(" %s\n", arg); 2134 free(arg); 2135 } else if (in_critical && 2136 strcmp(name, "verify-required") == 0) { 2137 printf("\n"); 2138 } else if (sshbuf_len(option) > 0) { 2139 hex = sshbuf_dtob16(option); 2140 printf(" UNKNOWN OPTION: %s (len %zu)\n", 2141 hex, sshbuf_len(option)); 2142 sshbuf_reset(option); 2143 free(hex); 2144 } else 2145 printf(" UNKNOWN FLAG OPTION\n"); 2146 free(name); 2147 if (sshbuf_len(option) != 0) 2148 fatal("Option corrupt: extra data at end"); 2149 } 2150 sshbuf_free(option); 2151 sshbuf_free(options); 2152 } 2153 2154 static void 2155 print_cert(struct sshkey *key) 2156 { 2157 char valid[64], *key_fp, *ca_fp; 2158 u_int i; 2159 2160 key_fp = sshkey_fingerprint(key, fingerprint_hash, SSH_FP_DEFAULT); 2161 ca_fp = sshkey_fingerprint(key->cert->signature_key, 2162 fingerprint_hash, SSH_FP_DEFAULT); 2163 if (key_fp == NULL || ca_fp == NULL) 2164 fatal_f("sshkey_fingerprint fail"); 2165 sshkey_format_cert_validity(key->cert, valid, sizeof(valid)); 2166 2167 printf(" Type: %s %s certificate\n", sshkey_ssh_name(key), 2168 sshkey_cert_type(key)); 2169 printf(" Public key: %s %s\n", sshkey_type(key), key_fp); 2170 printf(" Signing CA: %s %s (using %s)\n", 2171 sshkey_type(key->cert->signature_key), ca_fp, 2172 key->cert->signature_type); 2173 printf(" Key ID: \"%s\"\n", key->cert->key_id); 2174 printf(" Serial: %llu\n", (unsigned long long)key->cert->serial); 2175 printf(" Valid: %s\n", valid); 2176 printf(" Principals: "); 2177 if (key->cert->nprincipals == 0) 2178 printf("(none)\n"); 2179 else { 2180 for (i = 0; i < key->cert->nprincipals; i++) 2181 printf("\n %s", 2182 key->cert->principals[i]); 2183 printf("\n"); 2184 } 2185 printf(" Critical Options: "); 2186 if (sshbuf_len(key->cert->critical) == 0) 2187 printf("(none)\n"); 2188 else { 2189 printf("\n"); 2190 show_options(key->cert->critical, 1); 2191 } 2192 printf(" Extensions: "); 2193 if (sshbuf_len(key->cert->extensions) == 0) 2194 printf("(none)\n"); 2195 else { 2196 printf("\n"); 2197 show_options(key->cert->extensions, 0); 2198 } 2199 } 2200 2201 static void 2202 do_show_cert(struct passwd *pw) 2203 { 2204 struct sshkey *key = NULL; 2205 struct stat st; 2206 int r, is_stdin = 0, ok = 0; 2207 FILE *f; 2208 char *cp, *line = NULL; 2209 const char *path; 2210 size_t linesize = 0; 2211 u_long lnum = 0; 2212 2213 if (!have_identity) 2214 ask_filename(pw, "Enter file in which the key is"); 2215 if (strcmp(identity_file, "-") != 0 && stat(identity_file, &st) == -1) 2216 fatal("%s: %s: %s", __progname, identity_file, strerror(errno)); 2217 2218 path = identity_file; 2219 if (strcmp(path, "-") == 0) { 2220 f = stdin; 2221 path = "(stdin)"; 2222 is_stdin = 1; 2223 } else if ((f = fopen(identity_file, "r")) == NULL) 2224 fatal("fopen %s: %s", identity_file, strerror(errno)); 2225 2226 while (getline(&line, &linesize, f) != -1) { 2227 lnum++; 2228 sshkey_free(key); 2229 key = NULL; 2230 /* Trim leading space and comments */ 2231 cp = line + strspn(line, " \t"); 2232 if (*cp == '#' || *cp == '\0') 2233 continue; 2234 if ((key = sshkey_new(KEY_UNSPEC)) == NULL) 2235 fatal("sshkey_new"); 2236 if ((r = sshkey_read(key, &cp)) != 0) { 2237 error_r(r, "%s:%lu: invalid key", path, lnum); 2238 continue; 2239 } 2240 if (!sshkey_is_cert(key)) { 2241 error("%s:%lu is not a certificate", path, lnum); 2242 continue; 2243 } 2244 ok = 1; 2245 if (!is_stdin && lnum == 1) 2246 printf("%s:\n", path); 2247 else 2248 printf("%s:%lu:\n", path, lnum); 2249 print_cert(key); 2250 } 2251 free(line); 2252 sshkey_free(key); 2253 fclose(f); 2254 exit(ok ? 0 : 1); 2255 } 2256 2257 static void 2258 load_krl(const char *path, struct ssh_krl **krlp) 2259 { 2260 struct sshbuf *krlbuf; 2261 int r; 2262 2263 if ((r = sshbuf_load_file(path, &krlbuf)) != 0) 2264 fatal_r(r, "Unable to load KRL %s", path); 2265 /* XXX check sigs */ 2266 if ((r = ssh_krl_from_blob(krlbuf, krlp)) != 0 || 2267 *krlp == NULL) 2268 fatal_r(r, "Invalid KRL file %s", path); 2269 sshbuf_free(krlbuf); 2270 } 2271 2272 static void 2273 hash_to_blob(const char *cp, u_char **blobp, size_t *lenp, 2274 const char *file, u_long lnum) 2275 { 2276 char *tmp; 2277 size_t tlen; 2278 struct sshbuf *b; 2279 int r; 2280 2281 if (strncmp(cp, "SHA256:", 7) != 0) 2282 fatal("%s:%lu: unsupported hash algorithm", file, lnum); 2283 cp += 7; 2284 2285 /* 2286 * OpenSSH base64 hashes omit trailing '=' 2287 * characters; put them back for decode. 2288 */ 2289 if ((tlen = strlen(cp)) >= SIZE_MAX - 5) 2290 fatal_f("hash too long: %zu bytes", tlen); 2291 tmp = xmalloc(tlen + 4 + 1); 2292 strlcpy(tmp, cp, tlen + 1); 2293 while ((tlen % 4) != 0) { 2294 tmp[tlen++] = '='; 2295 tmp[tlen] = '\0'; 2296 } 2297 if ((b = sshbuf_new()) == NULL) 2298 fatal_f("sshbuf_new failed"); 2299 if ((r = sshbuf_b64tod(b, tmp)) != 0) 2300 fatal_r(r, "%s:%lu: decode hash failed", file, lnum); 2301 free(tmp); 2302 *lenp = sshbuf_len(b); 2303 *blobp = xmalloc(*lenp); 2304 memcpy(*blobp, sshbuf_ptr(b), *lenp); 2305 sshbuf_free(b); 2306 } 2307 2308 static void 2309 update_krl_from_file(struct passwd *pw, const char *file, int wild_ca, 2310 const struct sshkey *ca, struct ssh_krl *krl) 2311 { 2312 struct sshkey *key = NULL; 2313 u_long lnum = 0; 2314 char *path, *cp, *ep, *line = NULL; 2315 u_char *blob = NULL; 2316 size_t blen = 0, linesize = 0; 2317 unsigned long long serial, serial2; 2318 int i, was_explicit_key, was_sha1, was_sha256, was_hash, r; 2319 FILE *krl_spec; 2320 2321 path = tilde_expand_filename(file, pw->pw_uid); 2322 if (strcmp(path, "-") == 0) { 2323 krl_spec = stdin; 2324 free(path); 2325 path = xstrdup("(standard input)"); 2326 } else if ((krl_spec = fopen(path, "r")) == NULL) 2327 fatal("fopen %s: %s", path, strerror(errno)); 2328 2329 if (!quiet) 2330 printf("Revoking from %s\n", path); 2331 while (getline(&line, &linesize, krl_spec) != -1) { 2332 if (linesize >= INT_MAX) { 2333 fatal_f("%s contains unparsable line, len=%zu", 2334 path, linesize); 2335 } 2336 lnum++; 2337 was_explicit_key = was_sha1 = was_sha256 = was_hash = 0; 2338 cp = line + strspn(line, " \t"); 2339 /* Trim trailing space, comments and strip \n */ 2340 for (i = 0, r = -1; cp[i] != '\0'; i++) { 2341 if (cp[i] == '#' || cp[i] == '\n') { 2342 cp[i] = '\0'; 2343 break; 2344 } 2345 if (cp[i] == ' ' || cp[i] == '\t') { 2346 /* Remember the start of a span of whitespace */ 2347 if (r == -1) 2348 r = i; 2349 } else 2350 r = -1; 2351 } 2352 if (r != -1) 2353 cp[r] = '\0'; 2354 if (*cp == '\0') 2355 continue; 2356 if (strncasecmp(cp, "serial:", 7) == 0) { 2357 if (ca == NULL && !wild_ca) { 2358 fatal("revoking certificates by serial number " 2359 "requires specification of a CA key"); 2360 } 2361 cp += 7; 2362 cp = cp + strspn(cp, " \t"); 2363 errno = 0; 2364 serial = strtoull(cp, &ep, 0); 2365 if (*cp == '\0' || (*ep != '\0' && *ep != '-')) 2366 fatal("%s:%lu: invalid serial \"%s\"", 2367 path, lnum, cp); 2368 if (errno == ERANGE && serial == ULLONG_MAX) 2369 fatal("%s:%lu: serial out of range", 2370 path, lnum); 2371 serial2 = serial; 2372 if (*ep == '-') { 2373 cp = ep + 1; 2374 errno = 0; 2375 serial2 = strtoull(cp, &ep, 0); 2376 if (*cp == '\0' || *ep != '\0') 2377 fatal("%s:%lu: invalid serial \"%s\"", 2378 path, lnum, cp); 2379 if (errno == ERANGE && serial2 == ULLONG_MAX) 2380 fatal("%s:%lu: serial out of range", 2381 path, lnum); 2382 if (serial2 <= serial) 2383 fatal("%s:%lu: invalid serial range " 2384 "%llu:%llu", path, lnum, 2385 (unsigned long long)serial, 2386 (unsigned long long)serial2); 2387 } 2388 if (ssh_krl_revoke_cert_by_serial_range(krl, 2389 ca, serial, serial2) != 0) { 2390 fatal_f("revoke serial failed"); 2391 } 2392 } else if (strncasecmp(cp, "id:", 3) == 0) { 2393 if (ca == NULL && !wild_ca) { 2394 fatal("revoking certificates by key ID " 2395 "requires specification of a CA key"); 2396 } 2397 cp += 3; 2398 cp = cp + strspn(cp, " \t"); 2399 if (ssh_krl_revoke_cert_by_key_id(krl, ca, cp) != 0) 2400 fatal_f("revoke key ID failed"); 2401 } else if (strncasecmp(cp, "hash:", 5) == 0) { 2402 cp += 5; 2403 cp = cp + strspn(cp, " \t"); 2404 hash_to_blob(cp, &blob, &blen, file, lnum); 2405 r = ssh_krl_revoke_key_sha256(krl, blob, blen); 2406 if (r != 0) 2407 fatal_fr(r, "revoke key failed"); 2408 } else { 2409 if (strncasecmp(cp, "key:", 4) == 0) { 2410 cp += 4; 2411 cp = cp + strspn(cp, " \t"); 2412 was_explicit_key = 1; 2413 } else if (strncasecmp(cp, "sha1:", 5) == 0) { 2414 cp += 5; 2415 cp = cp + strspn(cp, " \t"); 2416 was_sha1 = 1; 2417 } else if (strncasecmp(cp, "sha256:", 7) == 0) { 2418 cp += 7; 2419 cp = cp + strspn(cp, " \t"); 2420 was_sha256 = 1; 2421 /* 2422 * Just try to process the line as a key. 2423 * Parsing will fail if it isn't. 2424 */ 2425 } 2426 if ((key = sshkey_new(KEY_UNSPEC)) == NULL) 2427 fatal("sshkey_new"); 2428 if ((r = sshkey_read(key, &cp)) != 0) 2429 fatal_r(r, "%s:%lu: invalid key", path, lnum); 2430 if (was_explicit_key) 2431 r = ssh_krl_revoke_key_explicit(krl, key); 2432 else if (was_sha1) { 2433 if (sshkey_fingerprint_raw(key, 2434 SSH_DIGEST_SHA1, &blob, &blen) != 0) { 2435 fatal("%s:%lu: fingerprint failed", 2436 file, lnum); 2437 } 2438 r = ssh_krl_revoke_key_sha1(krl, blob, blen); 2439 } else if (was_sha256) { 2440 if (sshkey_fingerprint_raw(key, 2441 SSH_DIGEST_SHA256, &blob, &blen) != 0) { 2442 fatal("%s:%lu: fingerprint failed", 2443 file, lnum); 2444 } 2445 r = ssh_krl_revoke_key_sha256(krl, blob, blen); 2446 } else 2447 r = ssh_krl_revoke_key(krl, key); 2448 if (r != 0) 2449 fatal_fr(r, "revoke key failed"); 2450 freezero(blob, blen); 2451 blob = NULL; 2452 blen = 0; 2453 sshkey_free(key); 2454 } 2455 } 2456 if (strcmp(path, "-") != 0) 2457 fclose(krl_spec); 2458 free(line); 2459 free(path); 2460 } 2461 2462 static void 2463 do_gen_krl(struct passwd *pw, int updating, const char *ca_key_path, 2464 unsigned long long krl_version, const char *krl_comment, 2465 int argc, char **argv) 2466 { 2467 struct ssh_krl *krl; 2468 struct stat sb; 2469 struct sshkey *ca = NULL; 2470 int i, r, wild_ca = 0; 2471 char *tmp; 2472 struct sshbuf *kbuf; 2473 2474 if (*identity_file == '\0') 2475 fatal("KRL generation requires an output file"); 2476 if (stat(identity_file, &sb) == -1) { 2477 if (errno != ENOENT) 2478 fatal("Cannot access KRL \"%s\": %s", 2479 identity_file, strerror(errno)); 2480 if (updating) 2481 fatal("KRL \"%s\" does not exist", identity_file); 2482 } 2483 if (ca_key_path != NULL) { 2484 if (strcasecmp(ca_key_path, "none") == 0) 2485 wild_ca = 1; 2486 else { 2487 tmp = tilde_expand_filename(ca_key_path, pw->pw_uid); 2488 if ((r = sshkey_load_public(tmp, &ca, NULL)) != 0) 2489 fatal_r(r, "Cannot load CA public key %s", tmp); 2490 free(tmp); 2491 } 2492 } 2493 2494 if (updating) 2495 load_krl(identity_file, &krl); 2496 else if ((krl = ssh_krl_init()) == NULL) 2497 fatal("couldn't create KRL"); 2498 2499 if (krl_version != 0) 2500 ssh_krl_set_version(krl, krl_version); 2501 if (krl_comment != NULL) 2502 ssh_krl_set_comment(krl, krl_comment); 2503 2504 for (i = 0; i < argc; i++) 2505 update_krl_from_file(pw, argv[i], wild_ca, ca, krl); 2506 2507 if ((kbuf = sshbuf_new()) == NULL) 2508 fatal("sshbuf_new failed"); 2509 if (ssh_krl_to_blob(krl, kbuf) != 0) 2510 fatal("Couldn't generate KRL"); 2511 if ((r = sshbuf_write_file(identity_file, kbuf)) != 0) 2512 fatal("write %s: %s", identity_file, strerror(errno)); 2513 sshbuf_free(kbuf); 2514 ssh_krl_free(krl); 2515 sshkey_free(ca); 2516 } 2517 2518 static void 2519 do_check_krl(struct passwd *pw, int print_krl, int argc, char **argv) 2520 { 2521 int i, r, ret = 0; 2522 char *comment; 2523 struct ssh_krl *krl; 2524 struct sshkey *k; 2525 2526 if (*identity_file == '\0') 2527 fatal("KRL checking requires an input file"); 2528 load_krl(identity_file, &krl); 2529 if (print_krl) 2530 krl_dump(krl, stdout); 2531 for (i = 0; i < argc; i++) { 2532 if ((r = sshkey_load_public(argv[i], &k, &comment)) != 0) 2533 fatal_r(r, "Cannot load public key %s", argv[i]); 2534 r = ssh_krl_check_key(krl, k); 2535 printf("%s%s%s%s: %s\n", argv[i], 2536 *comment ? " (" : "", comment, *comment ? ")" : "", 2537 r == 0 ? "ok" : "REVOKED"); 2538 if (r != 0) 2539 ret = 1; 2540 sshkey_free(k); 2541 free(comment); 2542 } 2543 ssh_krl_free(krl); 2544 exit(ret); 2545 } 2546 2547 static struct sshkey * 2548 load_sign_key(const char *keypath, const struct sshkey *pubkey) 2549 { 2550 size_t i, slen, plen = strlen(keypath); 2551 char *privpath = xstrdup(keypath); 2552 static const char * const suffixes[] = { "-cert.pub", ".pub", NULL }; 2553 struct sshkey *ret = NULL, *privkey = NULL; 2554 int r, waspub = 0; 2555 struct stat st; 2556 2557 /* 2558 * If passed a public key filename, then try to locate the corresponding 2559 * private key. This lets us specify certificates on the command-line 2560 * and have ssh-keygen find the appropriate private key. 2561 */ 2562 for (i = 0; suffixes[i]; i++) { 2563 slen = strlen(suffixes[i]); 2564 if (plen <= slen || 2565 strcmp(privpath + plen - slen, suffixes[i]) != 0) 2566 continue; 2567 privpath[plen - slen] = '\0'; 2568 debug_f("%s looks like a public key, using private key " 2569 "path %s instead", keypath, privpath); 2570 waspub = 1; 2571 } 2572 if (waspub && stat(privpath, &st) != 0 && errno == ENOENT) 2573 fatal("No private key found for public key \"%s\"", keypath); 2574 if ((r = sshkey_load_private(privpath, "", &privkey, NULL)) != 0 && 2575 (r != SSH_ERR_KEY_WRONG_PASSPHRASE)) { 2576 debug_fr(r, "load private key \"%s\"", privpath); 2577 fatal("No private key found for \"%s\"", privpath); 2578 } else if (privkey == NULL) 2579 privkey = load_identity(privpath, NULL); 2580 2581 if (!sshkey_equal_public(pubkey, privkey)) { 2582 error("Public key %s doesn't match private %s", 2583 keypath, privpath); 2584 goto done; 2585 } 2586 if (sshkey_is_cert(pubkey) && !sshkey_is_cert(privkey)) { 2587 /* 2588 * Graft the certificate onto the private key to make 2589 * it capable of signing. 2590 */ 2591 if ((r = sshkey_to_certified(privkey)) != 0) { 2592 error_fr(r, "sshkey_to_certified"); 2593 goto done; 2594 } 2595 if ((r = sshkey_cert_copy(pubkey, privkey)) != 0) { 2596 error_fr(r, "sshkey_cert_copy"); 2597 goto done; 2598 } 2599 } 2600 /* success */ 2601 ret = privkey; 2602 privkey = NULL; 2603 done: 2604 sshkey_free(privkey); 2605 free(privpath); 2606 return ret; 2607 } 2608 2609 static int 2610 sign_one(struct sshkey *signkey, const char *filename, int fd, 2611 const char *sig_namespace, const char *hashalg, sshsig_signer *signer, 2612 void *signer_ctx) 2613 { 2614 struct sshbuf *sigbuf = NULL, *abuf = NULL; 2615 int r = SSH_ERR_INTERNAL_ERROR, wfd = -1, oerrno; 2616 char *wfile = NULL, *asig = NULL, *fp = NULL; 2617 char *pin = NULL, *prompt = NULL; 2618 2619 if (!quiet) { 2620 if (fd == STDIN_FILENO) 2621 fprintf(stderr, "Signing data on standard input\n"); 2622 else 2623 fprintf(stderr, "Signing file %s\n", filename); 2624 } 2625 if (signer == NULL && sshkey_is_sk(signkey)) { 2626 if ((signkey->sk_flags & SSH_SK_USER_VERIFICATION_REQD)) { 2627 xasprintf(&prompt, "Enter PIN for %s key: ", 2628 sshkey_type(signkey)); 2629 if ((pin = read_passphrase(prompt, 2630 RP_ALLOW_STDIN)) == NULL) 2631 fatal_f("couldn't read PIN"); 2632 } 2633 if ((signkey->sk_flags & SSH_SK_USER_PRESENCE_REQD)) { 2634 if ((fp = sshkey_fingerprint(signkey, fingerprint_hash, 2635 SSH_FP_DEFAULT)) == NULL) 2636 fatal_f("fingerprint failed"); 2637 fprintf(stderr, "Confirm user presence for key %s %s\n", 2638 sshkey_type(signkey), fp); 2639 free(fp); 2640 } 2641 } 2642 if ((r = sshsig_sign_fd(signkey, hashalg, sk_provider, pin, 2643 fd, sig_namespace, &sigbuf, signer, signer_ctx)) != 0) { 2644 error_r(r, "Signing %s failed", filename); 2645 goto out; 2646 } 2647 if ((r = sshsig_armor(sigbuf, &abuf)) != 0) { 2648 error_fr(r, "sshsig_armor"); 2649 goto out; 2650 } 2651 if ((asig = sshbuf_dup_string(abuf)) == NULL) { 2652 error_f("buffer error"); 2653 r = SSH_ERR_ALLOC_FAIL; 2654 goto out; 2655 } 2656 2657 if (fd == STDIN_FILENO) { 2658 fputs(asig, stdout); 2659 fflush(stdout); 2660 } else { 2661 xasprintf(&wfile, "%s.sig", filename); 2662 if (confirm_overwrite(wfile)) { 2663 if ((wfd = open(wfile, O_WRONLY|O_CREAT|O_TRUNC, 2664 0666)) == -1) { 2665 oerrno = errno; 2666 error("Cannot open %s: %s", 2667 wfile, strerror(errno)); 2668 errno = oerrno; 2669 r = SSH_ERR_SYSTEM_ERROR; 2670 goto out; 2671 } 2672 if (atomicio(vwrite, wfd, asig, 2673 strlen(asig)) != strlen(asig)) { 2674 oerrno = errno; 2675 error("Cannot write to %s: %s", 2676 wfile, strerror(errno)); 2677 errno = oerrno; 2678 r = SSH_ERR_SYSTEM_ERROR; 2679 goto out; 2680 } 2681 if (!quiet) { 2682 fprintf(stderr, "Write signature to %s\n", 2683 wfile); 2684 } 2685 } 2686 } 2687 /* success */ 2688 r = 0; 2689 out: 2690 free(wfile); 2691 free(prompt); 2692 free(asig); 2693 if (pin != NULL) 2694 freezero(pin, strlen(pin)); 2695 sshbuf_free(abuf); 2696 sshbuf_free(sigbuf); 2697 if (wfd != -1) 2698 close(wfd); 2699 return r; 2700 } 2701 2702 static int 2703 sig_process_opts(char * const *opts, size_t nopts, char **hashalgp, 2704 uint64_t *verify_timep, int *print_pubkey) 2705 { 2706 size_t i; 2707 time_t now; 2708 2709 if (verify_timep != NULL) 2710 *verify_timep = 0; 2711 if (print_pubkey != NULL) 2712 *print_pubkey = 0; 2713 if (hashalgp != NULL) 2714 *hashalgp = NULL; 2715 for (i = 0; i < nopts; i++) { 2716 if (hashalgp != NULL && 2717 strncasecmp(opts[i], "hashalg=", 8) == 0) { 2718 *hashalgp = xstrdup(opts[i] + 8); 2719 } else if (verify_timep && 2720 strncasecmp(opts[i], "verify-time=", 12) == 0) { 2721 if (parse_absolute_time(opts[i] + 12, 2722 verify_timep) != 0 || *verify_timep == 0) { 2723 error("Invalid \"verify-time\" option"); 2724 return SSH_ERR_INVALID_ARGUMENT; 2725 } 2726 } else if (print_pubkey && 2727 strcasecmp(opts[i], "print-pubkey") == 0) { 2728 *print_pubkey = 1; 2729 } else { 2730 error("Invalid option \"%s\"", opts[i]); 2731 return SSH_ERR_INVALID_ARGUMENT; 2732 } 2733 } 2734 if (verify_timep && *verify_timep == 0) { 2735 if ((now = time(NULL)) < 0) { 2736 error("Time is before epoch"); 2737 return SSH_ERR_INVALID_ARGUMENT; 2738 } 2739 *verify_timep = (uint64_t)now; 2740 } 2741 return 0; 2742 } 2743 2744 2745 static int 2746 sig_sign(const char *keypath, const char *sig_namespace, int require_agent, 2747 int argc, char **argv, char * const *opts, size_t nopts) 2748 { 2749 int i, fd = -1, r, ret = -1; 2750 int agent_fd = -1; 2751 struct sshkey *pubkey = NULL, *privkey = NULL, *signkey = NULL; 2752 sshsig_signer *signer = NULL; 2753 char *hashalg = NULL; 2754 2755 /* Check file arguments. */ 2756 for (i = 0; i < argc; i++) { 2757 if (strcmp(argv[i], "-") != 0) 2758 continue; 2759 if (i > 0 || argc > 1) 2760 fatal("Cannot sign mix of paths and standard input"); 2761 } 2762 2763 if (sig_process_opts(opts, nopts, &hashalg, NULL, NULL) != 0) 2764 goto done; /* error already logged */ 2765 2766 if ((r = sshkey_load_public(keypath, &pubkey, NULL)) != 0) { 2767 error_r(r, "Couldn't load public key %s", keypath); 2768 goto done; 2769 } 2770 2771 if ((r = ssh_get_authentication_socket(&agent_fd)) != 0) { 2772 if (require_agent) 2773 fatal("Couldn't get agent socket"); 2774 debug_r(r, "Couldn't get agent socket"); 2775 } else { 2776 if ((r = ssh_agent_has_key(agent_fd, pubkey)) == 0) 2777 signer = agent_signer; 2778 else { 2779 if (require_agent) 2780 fatal("Couldn't find key in agent"); 2781 debug_r(r, "Couldn't find key in agent"); 2782 } 2783 } 2784 2785 if (signer == NULL) { 2786 /* Not using agent - try to load private key */ 2787 if ((privkey = load_sign_key(keypath, pubkey)) == NULL) 2788 goto done; 2789 signkey = privkey; 2790 } else { 2791 /* Will use key in agent */ 2792 signkey = pubkey; 2793 } 2794 2795 if (argc == 0) { 2796 if ((r = sign_one(signkey, "(stdin)", STDIN_FILENO, 2797 sig_namespace, hashalg, signer, &agent_fd)) != 0) 2798 goto done; 2799 } else { 2800 for (i = 0; i < argc; i++) { 2801 if (strcmp(argv[i], "-") == 0) 2802 fd = STDIN_FILENO; 2803 else if ((fd = open(argv[i], O_RDONLY)) == -1) { 2804 error("Cannot open %s for signing: %s", 2805 argv[i], strerror(errno)); 2806 goto done; 2807 } 2808 if ((r = sign_one(signkey, argv[i], fd, sig_namespace, 2809 hashalg, signer, &agent_fd)) != 0) 2810 goto done; 2811 if (fd != STDIN_FILENO) 2812 close(fd); 2813 fd = -1; 2814 } 2815 } 2816 2817 ret = 0; 2818 done: 2819 if (fd != -1 && fd != STDIN_FILENO) 2820 close(fd); 2821 sshkey_free(pubkey); 2822 sshkey_free(privkey); 2823 free(hashalg); 2824 return ret; 2825 } 2826 2827 static int 2828 sig_verify(const char *signature, const char *sig_namespace, 2829 const char *principal, const char *allowed_keys, const char *revoked_keys, 2830 char * const *opts, size_t nopts) 2831 { 2832 int r, ret = -1; 2833 int print_pubkey = 0; 2834 struct sshbuf *sigbuf = NULL, *abuf = NULL; 2835 struct sshkey *sign_key = NULL; 2836 char *fp = NULL; 2837 struct sshkey_sig_details *sig_details = NULL; 2838 uint64_t verify_time = 0; 2839 2840 if (sig_process_opts(opts, nopts, NULL, &verify_time, 2841 &print_pubkey) != 0) 2842 goto done; /* error already logged */ 2843 2844 memset(&sig_details, 0, sizeof(sig_details)); 2845 if ((r = sshbuf_load_file(signature, &abuf)) != 0) { 2846 error_r(r, "Couldn't read signature file"); 2847 goto done; 2848 } 2849 2850 if ((r = sshsig_dearmor(abuf, &sigbuf)) != 0) { 2851 error_fr(r, "sshsig_armor"); 2852 goto done; 2853 } 2854 if ((r = sshsig_verify_fd(sigbuf, STDIN_FILENO, sig_namespace, 2855 &sign_key, &sig_details)) != 0) 2856 goto done; /* sshsig_verify() prints error */ 2857 2858 if ((fp = sshkey_fingerprint(sign_key, fingerprint_hash, 2859 SSH_FP_DEFAULT)) == NULL) 2860 fatal_f("sshkey_fingerprint failed"); 2861 debug("Valid (unverified) signature from key %s", fp); 2862 if (sig_details != NULL) { 2863 debug2_f("signature details: counter = %u, flags = 0x%02x", 2864 sig_details->sk_counter, sig_details->sk_flags); 2865 } 2866 free(fp); 2867 fp = NULL; 2868 2869 if (revoked_keys != NULL) { 2870 if ((r = sshkey_check_revoked(sign_key, revoked_keys)) != 0) { 2871 debug3_fr(r, "sshkey_check_revoked"); 2872 goto done; 2873 } 2874 } 2875 2876 if (allowed_keys != NULL && (r = sshsig_check_allowed_keys(allowed_keys, 2877 sign_key, principal, sig_namespace, verify_time)) != 0) { 2878 debug3_fr(r, "sshsig_check_allowed_keys"); 2879 goto done; 2880 } 2881 /* success */ 2882 ret = 0; 2883 done: 2884 if (!quiet) { 2885 if (ret == 0) { 2886 if ((fp = sshkey_fingerprint(sign_key, fingerprint_hash, 2887 SSH_FP_DEFAULT)) == NULL) 2888 fatal_f("sshkey_fingerprint failed"); 2889 if (principal == NULL) { 2890 printf("Good \"%s\" signature with %s key %s\n", 2891 sig_namespace, sshkey_type(sign_key), fp); 2892 2893 } else { 2894 printf("Good \"%s\" signature for %s with %s key %s\n", 2895 sig_namespace, principal, 2896 sshkey_type(sign_key), fp); 2897 } 2898 } else { 2899 printf("Could not verify signature.\n"); 2900 } 2901 } 2902 /* Print the signature key if requested */ 2903 if (ret == 0 && print_pubkey && sign_key != NULL) { 2904 if ((r = sshkey_write(sign_key, stdout)) == 0) 2905 fputc('\n', stdout); 2906 else { 2907 error_r(r, "Could not print public key.\n"); 2908 ret = -1; 2909 } 2910 } 2911 sshbuf_free(sigbuf); 2912 sshbuf_free(abuf); 2913 sshkey_free(sign_key); 2914 sshkey_sig_details_free(sig_details); 2915 free(fp); 2916 return ret; 2917 } 2918 2919 static int 2920 sig_find_principals(const char *signature, const char *allowed_keys, 2921 char * const *opts, size_t nopts) 2922 { 2923 int r, ret = -1; 2924 struct sshbuf *sigbuf = NULL, *abuf = NULL; 2925 struct sshkey *sign_key = NULL; 2926 char *principals = NULL, *cp, *tmp; 2927 uint64_t verify_time = 0; 2928 2929 if (sig_process_opts(opts, nopts, NULL, &verify_time, NULL) != 0) 2930 goto done; /* error already logged */ 2931 2932 if ((r = sshbuf_load_file(signature, &abuf)) != 0) { 2933 error_r(r, "Couldn't read signature file"); 2934 goto done; 2935 } 2936 if ((r = sshsig_dearmor(abuf, &sigbuf)) != 0) { 2937 error_fr(r, "sshsig_armor"); 2938 goto done; 2939 } 2940 if ((r = sshsig_get_pubkey(sigbuf, &sign_key)) != 0) { 2941 error_fr(r, "sshsig_get_pubkey"); 2942 goto done; 2943 } 2944 if ((r = sshsig_find_principals(allowed_keys, sign_key, 2945 verify_time, &principals)) != 0) { 2946 if (r != SSH_ERR_KEY_NOT_FOUND) 2947 error_fr(r, "sshsig_find_principal"); 2948 goto done; 2949 } 2950 ret = 0; 2951 done: 2952 if (ret == 0 ) { 2953 /* Emit matching principals one per line */ 2954 tmp = principals; 2955 while ((cp = strsep(&tmp, ",")) != NULL && *cp != '\0') 2956 puts(cp); 2957 } else { 2958 fprintf(stderr, "No principal matched.\n"); 2959 } 2960 sshbuf_free(sigbuf); 2961 sshbuf_free(abuf); 2962 sshkey_free(sign_key); 2963 free(principals); 2964 return ret; 2965 } 2966 2967 static int 2968 sig_match_principals(const char *allowed_keys, char *principal, 2969 char * const *opts, size_t nopts) 2970 { 2971 int r; 2972 char **principals = NULL; 2973 size_t i, nprincipals = 0; 2974 2975 if ((r = sig_process_opts(opts, nopts, NULL, NULL, NULL)) != 0) 2976 return r; /* error already logged */ 2977 2978 if ((r = sshsig_match_principals(allowed_keys, principal, 2979 &principals, &nprincipals)) != 0) { 2980 debug_f("match: %s", ssh_err(r)); 2981 fprintf(stderr, "No principal matched.\n"); 2982 return r; 2983 } 2984 for (i = 0; i < nprincipals; i++) { 2985 printf("%s\n", principals[i]); 2986 free(principals[i]); 2987 } 2988 free(principals); 2989 2990 return 0; 2991 } 2992 2993 static void 2994 do_moduli_gen(const char *out_file, char **opts, size_t nopts) 2995 { 2996 #ifdef WITH_OPENSSL 2997 /* Moduli generation/screening */ 2998 u_int32_t memory = 0; 2999 BIGNUM *start = NULL; 3000 int moduli_bits = 0; 3001 FILE *out; 3002 size_t i; 3003 const char *errstr; 3004 3005 /* Parse options */ 3006 for (i = 0; i < nopts; i++) { 3007 if (strncmp(opts[i], "memory=", 7) == 0) { 3008 memory = (u_int32_t)strtonum(opts[i]+7, 1, 3009 UINT_MAX, &errstr); 3010 if (errstr) { 3011 fatal("Memory limit is %s: %s", 3012 errstr, opts[i]+7); 3013 } 3014 } else if (strncmp(opts[i], "start=", 6) == 0) { 3015 /* XXX - also compare length against bits */ 3016 if (BN_hex2bn(&start, opts[i]+6) == 0) 3017 fatal("Invalid start point."); 3018 } else if (strncmp(opts[i], "bits=", 5) == 0) { 3019 moduli_bits = (int)strtonum(opts[i]+5, 1, 3020 INT_MAX, &errstr); 3021 if (errstr) { 3022 fatal("Invalid number: %s (%s)", 3023 opts[i]+12, errstr); 3024 } 3025 } else { 3026 fatal("Option \"%s\" is unsupported for moduli " 3027 "generation", opts[i]); 3028 } 3029 } 3030 3031 if ((out = fopen(out_file, "w")) == NULL) { 3032 fatal("Couldn't open modulus candidate file \"%s\": %s", 3033 out_file, strerror(errno)); 3034 } 3035 setvbuf(out, NULL, _IOLBF, 0); 3036 3037 if (moduli_bits == 0) 3038 moduli_bits = DEFAULT_BITS; 3039 if (gen_candidates(out, memory, moduli_bits, start) != 0) 3040 fatal("modulus candidate generation failed"); 3041 #else /* WITH_OPENSSL */ 3042 fatal("Moduli generation is not supported"); 3043 #endif /* WITH_OPENSSL */ 3044 } 3045 3046 static void 3047 do_moduli_screen(const char *out_file, char **opts, size_t nopts) 3048 { 3049 #ifdef WITH_OPENSSL 3050 /* Moduli generation/screening */ 3051 char *checkpoint = NULL; 3052 u_int32_t generator_wanted = 0; 3053 unsigned long start_lineno = 0, lines_to_process = 0; 3054 int prime_tests = 0; 3055 FILE *out, *in = stdin; 3056 size_t i; 3057 const char *errstr; 3058 3059 /* Parse options */ 3060 for (i = 0; i < nopts; i++) { 3061 if (strncmp(opts[i], "lines=", 6) == 0) { 3062 lines_to_process = strtoul(opts[i]+6, NULL, 10); 3063 } else if (strncmp(opts[i], "start-line=", 11) == 0) { 3064 start_lineno = strtoul(opts[i]+11, NULL, 10); 3065 } else if (strncmp(opts[i], "checkpoint=", 11) == 0) { 3066 free(checkpoint); 3067 checkpoint = xstrdup(opts[i]+11); 3068 } else if (strncmp(opts[i], "generator=", 10) == 0) { 3069 generator_wanted = (u_int32_t)strtonum( 3070 opts[i]+10, 1, UINT_MAX, &errstr); 3071 if (errstr != NULL) { 3072 fatal("Generator invalid: %s (%s)", 3073 opts[i]+10, errstr); 3074 } 3075 } else if (strncmp(opts[i], "prime-tests=", 12) == 0) { 3076 prime_tests = (int)strtonum(opts[i]+12, 1, 3077 INT_MAX, &errstr); 3078 if (errstr) { 3079 fatal("Invalid number: %s (%s)", 3080 opts[i]+12, errstr); 3081 } 3082 } else { 3083 fatal("Option \"%s\" is unsupported for moduli " 3084 "screening", opts[i]); 3085 } 3086 } 3087 3088 if (have_identity && strcmp(identity_file, "-") != 0) { 3089 if ((in = fopen(identity_file, "r")) == NULL) { 3090 fatal("Couldn't open modulus candidate " 3091 "file \"%s\": %s", identity_file, 3092 strerror(errno)); 3093 } 3094 } 3095 3096 if ((out = fopen(out_file, "a")) == NULL) { 3097 fatal("Couldn't open moduli file \"%s\": %s", 3098 out_file, strerror(errno)); 3099 } 3100 setvbuf(out, NULL, _IOLBF, 0); 3101 if (prime_test(in, out, prime_tests == 0 ? 100 : prime_tests, 3102 generator_wanted, checkpoint, 3103 start_lineno, lines_to_process) != 0) 3104 fatal("modulus screening failed"); 3105 if (in != stdin) 3106 (void)fclose(in); 3107 free(checkpoint); 3108 #else /* WITH_OPENSSL */ 3109 fatal("Moduli screening is not supported"); 3110 #endif /* WITH_OPENSSL */ 3111 } 3112 3113 /* Read and confirm a passphrase */ 3114 static char * 3115 read_check_passphrase(const char *prompt1, const char *prompt2, 3116 const char *retry_prompt) 3117 { 3118 char *passphrase1, *passphrase2; 3119 3120 for (;;) { 3121 passphrase1 = read_passphrase(prompt1, RP_ALLOW_STDIN); 3122 passphrase2 = read_passphrase(prompt2, RP_ALLOW_STDIN); 3123 if (strcmp(passphrase1, passphrase2) == 0) { 3124 freezero(passphrase2, strlen(passphrase2)); 3125 return passphrase1; 3126 } 3127 /* The passphrases do not match. Clear them and retry. */ 3128 freezero(passphrase1, strlen(passphrase1)); 3129 freezero(passphrase2, strlen(passphrase2)); 3130 fputs(retry_prompt, stdout); 3131 fputc('\n', stdout); 3132 fflush(stdout); 3133 } 3134 /* NOTREACHED */ 3135 return NULL; 3136 } 3137 3138 static char * 3139 private_key_passphrase(const char *path) 3140 { 3141 char *prompt, *ret; 3142 3143 if (identity_passphrase) 3144 return xstrdup(identity_passphrase); 3145 if (identity_new_passphrase) 3146 return xstrdup(identity_new_passphrase); 3147 3148 xasprintf(&prompt, "Enter passphrase for \"%s\" " 3149 "(empty for no passphrase): ", path); 3150 ret = read_check_passphrase(prompt, 3151 "Enter same passphrase again: ", 3152 "Passphrases do not match. Try again."); 3153 free(prompt); 3154 return ret; 3155 } 3156 3157 static char * 3158 sk_suffix(const char *application, const uint8_t *user, size_t userlen) 3159 { 3160 char *ret, *cp; 3161 size_t slen, i; 3162 3163 /* Trim off URL-like preamble */ 3164 if (strncmp(application, "ssh://", 6) == 0) 3165 ret = xstrdup(application + 6); 3166 else if (strncmp(application, "ssh:", 4) == 0) 3167 ret = xstrdup(application + 4); 3168 else 3169 ret = xstrdup(application); 3170 3171 /* Count trailing zeros in user */ 3172 for (i = 0; i < userlen; i++) { 3173 if (user[userlen - i - 1] != 0) 3174 break; 3175 } 3176 if (i >= userlen) 3177 return ret; /* user-id was default all-zeros */ 3178 3179 /* Append user-id, escaping non-UTF-8 characters */ 3180 slen = userlen - i; 3181 if (asmprintf(&cp, INT_MAX, NULL, "%.*s", (int)slen, user) == -1) 3182 fatal_f("asmprintf failed"); 3183 /* Don't emit a user-id that contains path or control characters */ 3184 if (strchr(cp, '/') != NULL || strstr(cp, "..") != NULL || 3185 strchr(cp, '\\') != NULL) { 3186 free(cp); 3187 cp = tohex(user, slen); 3188 } 3189 xextendf(&ret, "_", "%s", cp); 3190 free(cp); 3191 return ret; 3192 } 3193 3194 static int 3195 do_download_sk(const char *skprovider, const char *device) 3196 { 3197 struct sshsk_resident_key **srks; 3198 size_t nsrks, i; 3199 int r, ret = -1; 3200 char *fp, *pin = NULL, *pass = NULL, *path, *pubpath; 3201 const char *ext; 3202 struct sshkey *key; 3203 3204 if (skprovider == NULL) 3205 fatal("Cannot download keys without provider"); 3206 3207 pin = read_passphrase("Enter PIN for authenticator: ", RP_ALLOW_STDIN); 3208 if (!quiet) { 3209 printf("You may need to touch your authenticator " 3210 "to authorize key download.\n"); 3211 } 3212 if ((r = sshsk_load_resident(skprovider, device, pin, 0, 3213 &srks, &nsrks)) != 0) { 3214 if (pin != NULL) 3215 freezero(pin, strlen(pin)); 3216 error_r(r, "Unable to load resident keys"); 3217 return -1; 3218 } 3219 if (nsrks == 0) 3220 logit("No keys to download"); 3221 if (pin != NULL) 3222 freezero(pin, strlen(pin)); 3223 3224 for (i = 0; i < nsrks; i++) { 3225 key = srks[i]->key; 3226 if (key->type != KEY_ECDSA_SK && key->type != KEY_ED25519_SK) { 3227 error("Unsupported key type %s (%d)", 3228 sshkey_type(key), key->type); 3229 continue; 3230 } 3231 if ((fp = sshkey_fingerprint(key, fingerprint_hash, 3232 SSH_FP_DEFAULT)) == NULL) 3233 fatal_f("sshkey_fingerprint failed"); 3234 debug_f("key %zu: %s %s %s (flags 0x%02x)", i, 3235 sshkey_type(key), fp, key->sk_application, key->sk_flags); 3236 ext = sk_suffix(key->sk_application, 3237 srks[i]->user_id, srks[i]->user_id_len); 3238 xasprintf(&path, "id_%s_rk%s%s", 3239 key->type == KEY_ECDSA_SK ? "ecdsa_sk" : "ed25519_sk", 3240 *ext == '\0' ? "" : "_", ext); 3241 3242 /* If the file already exists, ask the user to confirm. */ 3243 if (!confirm_overwrite(path)) { 3244 free(path); 3245 break; 3246 } 3247 3248 /* Save the key with the application string as the comment */ 3249 if (pass == NULL) 3250 pass = private_key_passphrase(path); 3251 if ((r = sshkey_save_private(key, path, pass, 3252 key->sk_application, private_key_format, 3253 openssh_format_cipher, rounds)) != 0) { 3254 error_r(r, "Saving key \"%s\" failed", path); 3255 free(path); 3256 break; 3257 } 3258 if (!quiet) { 3259 printf("Saved %s key%s%s to %s\n", sshkey_type(key), 3260 *ext != '\0' ? " " : "", 3261 *ext != '\0' ? key->sk_application : "", 3262 path); 3263 } 3264 3265 /* Save public key too */ 3266 xasprintf(&pubpath, "%s.pub", path); 3267 free(path); 3268 if ((r = sshkey_save_public(key, pubpath, 3269 key->sk_application)) != 0) { 3270 error_r(r, "Saving public key \"%s\" failed", pubpath); 3271 free(pubpath); 3272 break; 3273 } 3274 free(pubpath); 3275 } 3276 3277 if (i >= nsrks) 3278 ret = 0; /* success */ 3279 if (pass != NULL) 3280 freezero(pass, strlen(pass)); 3281 sshsk_free_resident_keys(srks, nsrks); 3282 return ret; 3283 } 3284 3285 static void 3286 save_attestation(struct sshbuf *attest, const char *path) 3287 { 3288 mode_t omask; 3289 int r; 3290 3291 if (path == NULL) 3292 return; /* nothing to do */ 3293 if (attest == NULL || sshbuf_len(attest) == 0) 3294 fatal("Enrollment did not return attestation data"); 3295 omask = umask(077); 3296 r = sshbuf_write_file(path, attest); 3297 umask(omask); 3298 if (r != 0) 3299 fatal_r(r, "Unable to write attestation data \"%s\"", path); 3300 if (!quiet) 3301 printf("Your FIDO attestation certificate has been saved in " 3302 "%s\n", path); 3303 } 3304 3305 static int 3306 confirm_sk_overwrite(const char *application, const char *user) 3307 { 3308 char yesno[3]; 3309 3310 printf("A resident key scoped to '%s' with user id '%s' already " 3311 "exists.\n", application == NULL ? "ssh:" : application, 3312 user == NULL ? "null" : user); 3313 printf("Overwrite key in token (y/n)? "); 3314 fflush(stdout); 3315 if (fgets(yesno, sizeof(yesno), stdin) == NULL) 3316 return 0; 3317 if (yesno[0] != 'y' && yesno[0] != 'Y') 3318 return 0; 3319 return 1; 3320 } 3321 3322 static void 3323 usage(void) 3324 { 3325 fprintf(stderr, 3326 "usage: ssh-keygen [-q] [-a rounds] [-b bits] [-C comment] [-f output_keyfile]\n" 3327 " [-m format] [-N new_passphrase] [-O option]\n" 3328 " [-t dsa | ecdsa | ecdsa-sk | ed25519 | ed25519-sk | rsa]\n" 3329 " [-w provider] [-Z cipher]\n" 3330 " ssh-keygen -p [-a rounds] [-f keyfile] [-m format] [-N new_passphrase]\n" 3331 " [-P old_passphrase] [-Z cipher]\n" 3332 #ifdef WITH_OPENSSL 3333 " ssh-keygen -i [-f input_keyfile] [-m key_format]\n" 3334 " ssh-keygen -e [-f input_keyfile] [-m key_format]\n" 3335 #endif 3336 " ssh-keygen -y [-f input_keyfile]\n" 3337 " ssh-keygen -c [-a rounds] [-C comment] [-f keyfile] [-P passphrase]\n" 3338 " ssh-keygen -l [-v] [-E fingerprint_hash] [-f input_keyfile]\n" 3339 " ssh-keygen -B [-f input_keyfile]\n"); 3340 #ifdef ENABLE_PKCS11 3341 fprintf(stderr, 3342 " ssh-keygen -D pkcs11\n"); 3343 #endif 3344 fprintf(stderr, 3345 " ssh-keygen -F hostname [-lv] [-f known_hosts_file]\n" 3346 " ssh-keygen -H [-f known_hosts_file]\n" 3347 " ssh-keygen -K [-a rounds] [-w provider]\n" 3348 " ssh-keygen -R hostname [-f known_hosts_file]\n" 3349 " ssh-keygen -r hostname [-g] [-f input_keyfile]\n" 3350 #ifdef WITH_OPENSSL 3351 " ssh-keygen -M generate [-O option] output_file\n" 3352 " ssh-keygen -M screen [-f input_file] [-O option] output_file\n" 3353 #endif 3354 " ssh-keygen -I certificate_identity -s ca_key [-hU] [-D pkcs11_provider]\n" 3355 " [-n principals] [-O option] [-V validity_interval]\n" 3356 " [-z serial_number] file ...\n" 3357 " ssh-keygen -L [-f input_keyfile]\n" 3358 " ssh-keygen -A [-a rounds] [-f prefix_path]\n" 3359 " ssh-keygen -k -f krl_file [-u] [-s ca_public] [-z version_number]\n" 3360 " file ...\n" 3361 " ssh-keygen -Q [-l] -f krl_file [file ...]\n" 3362 " ssh-keygen -Y find-principals -s signature_file -f allowed_signers_file\n" 3363 " ssh-keygen -Y match-principals -I signer_identity -f allowed_signers_file\n" 3364 " ssh-keygen -Y check-novalidate -n namespace -s signature_file\n" 3365 " ssh-keygen -Y sign -f key_file -n namespace file [-O option] ...\n" 3366 " ssh-keygen -Y verify -f allowed_signers_file -I signer_identity\n" 3367 " -n namespace -s signature_file [-r krl_file] [-O option]\n"); 3368 exit(1); 3369 } 3370 3371 /* 3372 * Main program for key management. 3373 */ 3374 int 3375 main(int argc, char **argv) 3376 { 3377 char comment[1024], *passphrase = NULL; 3378 char *rr_hostname = NULL, *ep, *fp, *ra; 3379 struct sshkey *private, *public; 3380 struct passwd *pw; 3381 int r, opt, type; 3382 int change_passphrase = 0, change_comment = 0, show_cert = 0; 3383 int find_host = 0, delete_host = 0, hash_hosts = 0; 3384 int gen_all_hostkeys = 0, gen_krl = 0, update_krl = 0, check_krl = 0; 3385 int prefer_agent = 0, convert_to = 0, convert_from = 0; 3386 int print_public = 0, print_generic = 0, cert_serial_autoinc = 0; 3387 int do_gen_candidates = 0, do_screen_candidates = 0, download_sk = 0; 3388 unsigned long long cert_serial = 0; 3389 char *identity_comment = NULL, *ca_key_path = NULL, **opts = NULL; 3390 char *sk_application = NULL, *sk_device = NULL, *sk_user = NULL; 3391 char *sk_attestation_path = NULL; 3392 struct sshbuf *challenge = NULL, *attest = NULL; 3393 size_t i, nopts = 0; 3394 u_int32_t bits = 0; 3395 uint8_t sk_flags = SSH_SK_USER_PRESENCE_REQD; 3396 const char *errstr; 3397 int log_level = SYSLOG_LEVEL_INFO; 3398 char *sign_op = NULL; 3399 3400 extern int optind; 3401 extern char *optarg; 3402 3403 /* Ensure that fds 0, 1 and 2 are open or directed to /dev/null */ 3404 sanitise_stdfd(); 3405 3406 __progname = ssh_get_progname(argv[0]); 3407 3408 seed_rng(); 3409 3410 log_init(argv[0], SYSLOG_LEVEL_INFO, SYSLOG_FACILITY_USER, 1); 3411 3412 msetlocale(); 3413 3414 /* we need this for the home * directory. */ 3415 pw = getpwuid(getuid()); 3416 if (!pw) 3417 fatal("No user exists for uid %lu", (u_long)getuid()); 3418 pw = pwcopy(pw); 3419 if (gethostname(hostname, sizeof(hostname)) == -1) 3420 fatal("gethostname: %s", strerror(errno)); 3421 3422 sk_provider = getenv("SSH_SK_PROVIDER"); 3423 3424 /* Remaining characters: dGjJSTWx */ 3425 while ((opt = getopt(argc, argv, "ABHKLQUXceghiklopquvy" 3426 "C:D:E:F:I:M:N:O:P:R:V:Y:Z:" 3427 "a:b:f:g:m:n:r:s:t:w:z:")) != -1) { 3428 switch (opt) { 3429 case 'A': 3430 gen_all_hostkeys = 1; 3431 break; 3432 case 'b': 3433 bits = (u_int32_t)strtonum(optarg, 1, UINT32_MAX, 3434 &errstr); 3435 if (errstr) 3436 fatal("Bits has bad value %s (%s)", 3437 optarg, errstr); 3438 break; 3439 case 'E': 3440 fingerprint_hash = ssh_digest_alg_by_name(optarg); 3441 if (fingerprint_hash == -1) 3442 fatal("Invalid hash algorithm \"%s\"", optarg); 3443 break; 3444 case 'F': 3445 find_host = 1; 3446 rr_hostname = optarg; 3447 break; 3448 case 'H': 3449 hash_hosts = 1; 3450 break; 3451 case 'I': 3452 cert_key_id = optarg; 3453 break; 3454 case 'R': 3455 delete_host = 1; 3456 rr_hostname = optarg; 3457 break; 3458 case 'L': 3459 show_cert = 1; 3460 break; 3461 case 'l': 3462 print_fingerprint = 1; 3463 break; 3464 case 'B': 3465 print_bubblebabble = 1; 3466 break; 3467 case 'm': 3468 if (strcasecmp(optarg, "RFC4716") == 0 || 3469 strcasecmp(optarg, "ssh2") == 0) { 3470 convert_format = FMT_RFC4716; 3471 break; 3472 } 3473 if (strcasecmp(optarg, "PKCS8") == 0) { 3474 convert_format = FMT_PKCS8; 3475 private_key_format = SSHKEY_PRIVATE_PKCS8; 3476 break; 3477 } 3478 if (strcasecmp(optarg, "PEM") == 0) { 3479 convert_format = FMT_PEM; 3480 private_key_format = SSHKEY_PRIVATE_PEM; 3481 break; 3482 } 3483 fatal("Unsupported conversion format \"%s\"", optarg); 3484 case 'n': 3485 cert_principals = optarg; 3486 break; 3487 case 'o': 3488 /* no-op; new format is already the default */ 3489 break; 3490 case 'p': 3491 change_passphrase = 1; 3492 break; 3493 case 'c': 3494 change_comment = 1; 3495 break; 3496 case 'f': 3497 if (strlcpy(identity_file, optarg, 3498 sizeof(identity_file)) >= sizeof(identity_file)) 3499 fatal("Identity filename too long"); 3500 have_identity = 1; 3501 break; 3502 case 'g': 3503 print_generic = 1; 3504 break; 3505 case 'K': 3506 download_sk = 1; 3507 break; 3508 case 'P': 3509 identity_passphrase = optarg; 3510 break; 3511 case 'N': 3512 identity_new_passphrase = optarg; 3513 break; 3514 case 'Q': 3515 check_krl = 1; 3516 break; 3517 case 'O': 3518 opts = xrecallocarray(opts, nopts, nopts + 1, 3519 sizeof(*opts)); 3520 opts[nopts++] = xstrdup(optarg); 3521 break; 3522 case 'Z': 3523 openssh_format_cipher = optarg; 3524 if (cipher_by_name(openssh_format_cipher) == NULL) 3525 fatal("Invalid OpenSSH-format cipher '%s'", 3526 openssh_format_cipher); 3527 break; 3528 case 'C': 3529 identity_comment = optarg; 3530 break; 3531 case 'q': 3532 quiet = 1; 3533 break; 3534 case 'e': 3535 /* export key */ 3536 convert_to = 1; 3537 break; 3538 case 'h': 3539 cert_key_type = SSH2_CERT_TYPE_HOST; 3540 certflags_flags = 0; 3541 break; 3542 case 'k': 3543 gen_krl = 1; 3544 break; 3545 case 'i': 3546 case 'X': 3547 /* import key */ 3548 convert_from = 1; 3549 break; 3550 case 'y': 3551 print_public = 1; 3552 break; 3553 case 's': 3554 ca_key_path = optarg; 3555 break; 3556 case 't': 3557 key_type_name = optarg; 3558 break; 3559 case 'D': 3560 pkcs11provider = optarg; 3561 break; 3562 case 'U': 3563 prefer_agent = 1; 3564 break; 3565 case 'u': 3566 update_krl = 1; 3567 break; 3568 case 'v': 3569 if (log_level == SYSLOG_LEVEL_INFO) 3570 log_level = SYSLOG_LEVEL_DEBUG1; 3571 else { 3572 if (log_level >= SYSLOG_LEVEL_DEBUG1 && 3573 log_level < SYSLOG_LEVEL_DEBUG3) 3574 log_level++; 3575 } 3576 break; 3577 case 'r': 3578 rr_hostname = optarg; 3579 break; 3580 case 'a': 3581 rounds = (int)strtonum(optarg, 1, INT_MAX, &errstr); 3582 if (errstr) 3583 fatal("Invalid number: %s (%s)", 3584 optarg, errstr); 3585 break; 3586 case 'V': 3587 parse_cert_times(optarg); 3588 break; 3589 case 'Y': 3590 sign_op = optarg; 3591 break; 3592 case 'w': 3593 sk_provider = optarg; 3594 break; 3595 case 'z': 3596 errno = 0; 3597 if (*optarg == '+') { 3598 cert_serial_autoinc = 1; 3599 optarg++; 3600 } 3601 cert_serial = strtoull(optarg, &ep, 10); 3602 if (*optarg < '0' || *optarg > '9' || *ep != '\0' || 3603 (errno == ERANGE && cert_serial == ULLONG_MAX)) 3604 fatal("Invalid serial number \"%s\"", optarg); 3605 break; 3606 case 'M': 3607 if (strcmp(optarg, "generate") == 0) 3608 do_gen_candidates = 1; 3609 else if (strcmp(optarg, "screen") == 0) 3610 do_screen_candidates = 1; 3611 else 3612 fatal("Unsupported moduli option %s", optarg); 3613 break; 3614 default: 3615 usage(); 3616 } 3617 } 3618 3619 #ifdef ENABLE_SK_INTERNAL 3620 if (sk_provider == NULL) 3621 sk_provider = "internal"; 3622 #endif 3623 3624 /* reinit */ 3625 log_init(argv[0], log_level, SYSLOG_FACILITY_USER, 1); 3626 3627 argv += optind; 3628 argc -= optind; 3629 3630 if (sign_op != NULL) { 3631 if (strncmp(sign_op, "find-principals", 15) == 0) { 3632 if (ca_key_path == NULL) { 3633 error("Too few arguments for find-principals:" 3634 "missing signature file"); 3635 exit(1); 3636 } 3637 if (!have_identity) { 3638 error("Too few arguments for find-principals:" 3639 "missing allowed keys file"); 3640 exit(1); 3641 } 3642 return sig_find_principals(ca_key_path, identity_file, 3643 opts, nopts); 3644 } else if (strncmp(sign_op, "match-principals", 16) == 0) { 3645 if (!have_identity) { 3646 error("Too few arguments for match-principals:" 3647 "missing allowed keys file"); 3648 exit(1); 3649 } 3650 if (cert_key_id == NULL) { 3651 error("Too few arguments for match-principals: " 3652 "missing principal ID"); 3653 exit(1); 3654 } 3655 return sig_match_principals(identity_file, cert_key_id, 3656 opts, nopts); 3657 } else if (strncmp(sign_op, "sign", 4) == 0) { 3658 /* NB. cert_principals is actually namespace, via -n */ 3659 if (cert_principals == NULL || 3660 *cert_principals == '\0') { 3661 error("Too few arguments for sign: " 3662 "missing namespace"); 3663 exit(1); 3664 } 3665 if (!have_identity) { 3666 error("Too few arguments for sign: " 3667 "missing key"); 3668 exit(1); 3669 } 3670 return sig_sign(identity_file, cert_principals, 3671 prefer_agent, argc, argv, opts, nopts); 3672 } else if (strncmp(sign_op, "check-novalidate", 16) == 0) { 3673 /* NB. cert_principals is actually namespace, via -n */ 3674 if (cert_principals == NULL || 3675 *cert_principals == '\0') { 3676 error("Too few arguments for check-novalidate: " 3677 "missing namespace"); 3678 exit(1); 3679 } 3680 if (ca_key_path == NULL) { 3681 error("Too few arguments for check-novalidate: " 3682 "missing signature file"); 3683 exit(1); 3684 } 3685 return sig_verify(ca_key_path, cert_principals, 3686 NULL, NULL, NULL, opts, nopts); 3687 } else if (strncmp(sign_op, "verify", 6) == 0) { 3688 /* NB. cert_principals is actually namespace, via -n */ 3689 if (cert_principals == NULL || 3690 *cert_principals == '\0') { 3691 error("Too few arguments for verify: " 3692 "missing namespace"); 3693 exit(1); 3694 } 3695 if (ca_key_path == NULL) { 3696 error("Too few arguments for verify: " 3697 "missing signature file"); 3698 exit(1); 3699 } 3700 if (!have_identity) { 3701 error("Too few arguments for sign: " 3702 "missing allowed keys file"); 3703 exit(1); 3704 } 3705 if (cert_key_id == NULL) { 3706 error("Too few arguments for verify: " 3707 "missing principal identity"); 3708 exit(1); 3709 } 3710 return sig_verify(ca_key_path, cert_principals, 3711 cert_key_id, identity_file, rr_hostname, 3712 opts, nopts); 3713 } 3714 error("Unsupported operation for -Y: \"%s\"", sign_op); 3715 usage(); 3716 /* NOTREACHED */ 3717 } 3718 3719 if (ca_key_path != NULL) { 3720 if (argc < 1 && !gen_krl) { 3721 error("Too few arguments."); 3722 usage(); 3723 } 3724 } else if (argc > 0 && !gen_krl && !check_krl && 3725 !do_gen_candidates && !do_screen_candidates) { 3726 error("Too many arguments."); 3727 usage(); 3728 } 3729 if (change_passphrase && change_comment) { 3730 error("Can only have one of -p and -c."); 3731 usage(); 3732 } 3733 if (print_fingerprint && (delete_host || hash_hosts)) { 3734 error("Cannot use -l with -H or -R."); 3735 usage(); 3736 } 3737 if (gen_krl) { 3738 do_gen_krl(pw, update_krl, ca_key_path, 3739 cert_serial, identity_comment, argc, argv); 3740 return (0); 3741 } 3742 if (check_krl) { 3743 do_check_krl(pw, print_fingerprint, argc, argv); 3744 return (0); 3745 } 3746 if (ca_key_path != NULL) { 3747 if (cert_key_id == NULL) 3748 fatal("Must specify key id (-I) when certifying"); 3749 for (i = 0; i < nopts; i++) 3750 add_cert_option(opts[i]); 3751 do_ca_sign(pw, ca_key_path, prefer_agent, 3752 cert_serial, cert_serial_autoinc, argc, argv); 3753 } 3754 if (show_cert) 3755 do_show_cert(pw); 3756 if (delete_host || hash_hosts || find_host) { 3757 do_known_hosts(pw, rr_hostname, find_host, 3758 delete_host, hash_hosts); 3759 } 3760 if (pkcs11provider != NULL) 3761 do_download(pw); 3762 if (download_sk) { 3763 for (i = 0; i < nopts; i++) { 3764 if (strncasecmp(opts[i], "device=", 7) == 0) { 3765 sk_device = xstrdup(opts[i] + 7); 3766 } else { 3767 fatal("Option \"%s\" is unsupported for " 3768 "FIDO authenticator download", opts[i]); 3769 } 3770 } 3771 return do_download_sk(sk_provider, sk_device); 3772 } 3773 if (print_fingerprint || print_bubblebabble) 3774 do_fingerprint(pw); 3775 if (change_passphrase) 3776 do_change_passphrase(pw); 3777 if (change_comment) 3778 do_change_comment(pw, identity_comment); 3779 #ifdef WITH_OPENSSL 3780 if (convert_to) 3781 do_convert_to(pw); 3782 if (convert_from) 3783 do_convert_from(pw); 3784 #else /* WITH_OPENSSL */ 3785 if (convert_to || convert_from) 3786 fatal("key conversion disabled at compile time"); 3787 #endif /* WITH_OPENSSL */ 3788 if (print_public) 3789 do_print_public(pw); 3790 if (rr_hostname != NULL) { 3791 unsigned int n = 0; 3792 3793 if (have_identity) { 3794 n = do_print_resource_record(pw, identity_file, 3795 rr_hostname, print_generic, opts, nopts); 3796 if (n == 0) 3797 fatal("%s: %s", identity_file, strerror(errno)); 3798 exit(0); 3799 } else { 3800 3801 n += do_print_resource_record(pw, 3802 _PATH_HOST_RSA_KEY_FILE, rr_hostname, 3803 print_generic, opts, nopts); 3804 #ifdef WITH_DSA 3805 n += do_print_resource_record(pw, 3806 _PATH_HOST_DSA_KEY_FILE, rr_hostname, 3807 print_generic, opts, nopts); 3808 #endif 3809 n += do_print_resource_record(pw, 3810 _PATH_HOST_ECDSA_KEY_FILE, rr_hostname, 3811 print_generic, opts, nopts); 3812 n += do_print_resource_record(pw, 3813 _PATH_HOST_ED25519_KEY_FILE, rr_hostname, 3814 print_generic, opts, nopts); 3815 n += do_print_resource_record(pw, 3816 _PATH_HOST_XMSS_KEY_FILE, rr_hostname, 3817 print_generic, opts, nopts); 3818 if (n == 0) 3819 fatal("no keys found."); 3820 exit(0); 3821 } 3822 } 3823 3824 if (do_gen_candidates || do_screen_candidates) { 3825 if (argc <= 0) 3826 fatal("No output file specified"); 3827 else if (argc > 1) 3828 fatal("Too many output files specified"); 3829 } 3830 if (do_gen_candidates) { 3831 do_moduli_gen(argv[0], opts, nopts); 3832 return 0; 3833 } 3834 if (do_screen_candidates) { 3835 do_moduli_screen(argv[0], opts, nopts); 3836 return 0; 3837 } 3838 3839 if (gen_all_hostkeys) { 3840 do_gen_all_hostkeys(pw); 3841 return (0); 3842 } 3843 3844 if (key_type_name == NULL) 3845 key_type_name = DEFAULT_KEY_TYPE_NAME; 3846 3847 type = sshkey_type_from_shortname(key_type_name); 3848 type_bits_valid(type, key_type_name, &bits); 3849 3850 if (!quiet) 3851 printf("Generating public/private %s key pair.\n", 3852 key_type_name); 3853 switch (type) { 3854 case KEY_ECDSA_SK: 3855 case KEY_ED25519_SK: 3856 for (i = 0; i < nopts; i++) { 3857 if (strcasecmp(opts[i], "no-touch-required") == 0) { 3858 sk_flags &= ~SSH_SK_USER_PRESENCE_REQD; 3859 } else if (strcasecmp(opts[i], "verify-required") == 0) { 3860 sk_flags |= SSH_SK_USER_VERIFICATION_REQD; 3861 } else if (strcasecmp(opts[i], "resident") == 0) { 3862 sk_flags |= SSH_SK_RESIDENT_KEY; 3863 } else if (strncasecmp(opts[i], "device=", 7) == 0) { 3864 sk_device = xstrdup(opts[i] + 7); 3865 } else if (strncasecmp(opts[i], "user=", 5) == 0) { 3866 sk_user = xstrdup(opts[i] + 5); 3867 } else if (strncasecmp(opts[i], "challenge=", 10) == 0) { 3868 if ((r = sshbuf_load_file(opts[i] + 10, 3869 &challenge)) != 0) { 3870 fatal_r(r, "Unable to load FIDO " 3871 "enrollment challenge \"%s\"", 3872 opts[i] + 10); 3873 } 3874 } else if (strncasecmp(opts[i], 3875 "write-attestation=", 18) == 0) { 3876 sk_attestation_path = opts[i] + 18; 3877 } else if (strncasecmp(opts[i], 3878 "application=", 12) == 0) { 3879 sk_application = xstrdup(opts[i] + 12); 3880 if (strncmp(sk_application, "ssh:", 4) != 0) { 3881 fatal("FIDO application string must " 3882 "begin with \"ssh:\""); 3883 } 3884 } else { 3885 fatal("Option \"%s\" is unsupported for " 3886 "FIDO authenticator enrollment", opts[i]); 3887 } 3888 } 3889 if ((attest = sshbuf_new()) == NULL) 3890 fatal("sshbuf_new failed"); 3891 r = 0; 3892 for (i = 0 ;;) { 3893 if (!quiet) { 3894 printf("You may need to touch your " 3895 "authenticator%s to authorize key " 3896 "generation.\n", 3897 r == 0 ? "" : " again"); 3898 } 3899 fflush(stdout); 3900 r = sshsk_enroll(type, sk_provider, sk_device, 3901 sk_application == NULL ? "ssh:" : sk_application, 3902 sk_user, sk_flags, passphrase, challenge, 3903 &private, attest); 3904 if (r == 0) 3905 break; 3906 if (r == SSH_ERR_KEY_BAD_PERMISSIONS && 3907 (sk_flags & SSH_SK_RESIDENT_KEY) != 0 && 3908 (sk_flags & SSH_SK_FORCE_OPERATION) == 0 && 3909 confirm_sk_overwrite(sk_application, sk_user)) { 3910 sk_flags |= SSH_SK_FORCE_OPERATION; 3911 continue; 3912 } 3913 if (r != SSH_ERR_KEY_WRONG_PASSPHRASE) 3914 fatal_r(r, "Key enrollment failed"); 3915 else if (passphrase != NULL) { 3916 error("PIN incorrect"); 3917 freezero(passphrase, strlen(passphrase)); 3918 passphrase = NULL; 3919 } 3920 if (++i >= 3) 3921 fatal("Too many incorrect PINs"); 3922 passphrase = read_passphrase("Enter PIN for " 3923 "authenticator: ", RP_ALLOW_STDIN); 3924 } 3925 if (passphrase != NULL) { 3926 freezero(passphrase, strlen(passphrase)); 3927 passphrase = NULL; 3928 } 3929 break; 3930 default: 3931 if ((r = sshkey_generate(type, bits, &private)) != 0) 3932 fatal("sshkey_generate failed"); 3933 break; 3934 } 3935 if ((r = sshkey_from_private(private, &public)) != 0) 3936 fatal_r(r, "sshkey_from_private"); 3937 3938 if (!have_identity) 3939 ask_filename(pw, "Enter file in which to save the key"); 3940 3941 /* Create ~/.ssh directory if it doesn't already exist. */ 3942 hostfile_create_user_ssh_dir(identity_file, !quiet); 3943 3944 /* If the file already exists, ask the user to confirm. */ 3945 if (!confirm_overwrite(identity_file)) 3946 exit(1); 3947 3948 /* Determine the passphrase for the private key */ 3949 passphrase = private_key_passphrase(identity_file); 3950 if (identity_comment) { 3951 strlcpy(comment, identity_comment, sizeof(comment)); 3952 } else { 3953 /* Create default comment field for the passphrase. */ 3954 snprintf(comment, sizeof comment, "%s@%s", pw->pw_name, hostname); 3955 } 3956 3957 /* Save the key with the given passphrase and comment. */ 3958 if ((r = sshkey_save_private(private, identity_file, passphrase, 3959 comment, private_key_format, openssh_format_cipher, rounds)) != 0) { 3960 error_r(r, "Saving key \"%s\" failed", identity_file); 3961 freezero(passphrase, strlen(passphrase)); 3962 exit(1); 3963 } 3964 freezero(passphrase, strlen(passphrase)); 3965 sshkey_free(private); 3966 3967 if (!quiet) { 3968 printf("Your identification has been saved in %s\n", 3969 identity_file); 3970 } 3971 3972 strlcat(identity_file, ".pub", sizeof(identity_file)); 3973 if ((r = sshkey_save_public(public, identity_file, comment)) != 0) 3974 fatal_r(r, "Unable to save public key to %s", identity_file); 3975 3976 if (!quiet) { 3977 fp = sshkey_fingerprint(public, fingerprint_hash, 3978 SSH_FP_DEFAULT); 3979 ra = sshkey_fingerprint(public, fingerprint_hash, 3980 SSH_FP_RANDOMART); 3981 if (fp == NULL || ra == NULL) 3982 fatal("sshkey_fingerprint failed"); 3983 printf("Your public key has been saved in %s\n", 3984 identity_file); 3985 printf("The key fingerprint is:\n"); 3986 printf("%s %s\n", fp, comment); 3987 printf("The key's randomart image is:\n"); 3988 printf("%s\n", ra); 3989 free(ra); 3990 free(fp); 3991 } 3992 3993 if (sk_attestation_path != NULL) 3994 save_attestation(attest, sk_attestation_path); 3995 3996 sshbuf_free(attest); 3997 sshkey_free(public); 3998 3999 exit(0); 4000 } 4001