ssh-keygen.c

   1 /*
   2  * Author: Tatu Ylonen <ylo@cs.hut.fi>
   3  * Copyright (c) 1994 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
   4  *                    All rights reserved
   5  * Identity and host key generation and maintenance.
   6  *
   7  * As far as I am concerned, the code I have written for this software
   8  * can be used freely for any purpose.  Any derived versions of this
   9  * software must be clearly marked as such, and if the derived work is
  10  * incompatible with the protocol description in the RFC file, it must be
  11  * called by a name other than "ssh" or "Secure Shell".
  12  */
  13
  14 #include "includes.h"
  15 RCSID("$OpenBSD: ssh-keygen.c,v 1.53 2001/03/26 23:23:24 markus Exp $");
  16
  17 #include <openssl/evp.h>
  18 #include <openssl/pem.h>
  19
  20 #include "xmalloc.h"
  21 #include "key.h"
  22 #include "rsa.h"
  23 #include "authfile.h"
  24 #include "uuencode.h"
  25 #include "buffer.h"
  26 #include "bufaux.h"
  27 #include "pathnames.h"
  28 #include "log.h"
  29 #include "readpass.h"
  30
  31 /* Number of bits in the RSA/DSA key.  This value can be changed on the command line. */
  32 int bits = 1024;
  33
  34 /*
  35  * Flag indicating that we just want to change the passphrase.  This can be
  36  * set on the command line.
  37  */
  38 int change_passphrase = 0;
  39
  40 /*
  41  * Flag indicating that we just want to change the comment.  This can be set
  42  * on the command line.
  43  */
  44 int change_comment = 0;
  45
  46 int quiet = 0;
  47
  48 /* Flag indicating that we just want to see the key fingerprint */
  49 int print_fingerprint = 0;
  50 int print_bubblebabble = 0;
  51
  52 /* The identity file name, given on the command line or entered by the user. */
  53 char identity_file[1024];
  54 int have_identity = 0;
  55
  56 /* This is set to the passphrase if given on the command line. */
  57 char *identity_passphrase = NULL;
  58
  59 /* This is set to the new passphrase if given on the command line. */
  60 char *identity_new_passphrase = NULL;
  61
  62 /* This is set to the new comment if given on the command line. */
  63 char *identity_comment = NULL;
  64
  65 /* Dump public key file in format used by real and the original SSH 2 */
  66 int convert_to_ssh2 = 0;
  67 int convert_from_ssh2 = 0;
  68 int print_public = 0;
  69
  70 /* default to RSA for SSH-1 */
  71 char *key_type_name = "rsa1";
  72
  73 /* argv0 */
  74 #ifdef HAVE___PROGNAME
  75 extern char *__progname;
  76 #else
  77 char *__progname;
  78 #endif
  79
  80 char hostname[MAXHOSTNAMELEN];
  81
  82 void
  83 ask_filename(struct passwd *pw, const char *prompt)
  84 {
  85         char buf[1024];
  86         char *name = NULL;
  87
  88         switch (key_type_from_name(key_type_name)) {
  89         case KEY_RSA1:
  90                 name = _PATH_SSH_CLIENT_IDENTITY;
  91                 break;
  92         case KEY_DSA:
  93                 name = _PATH_SSH_CLIENT_ID_DSA;
  94                 break;
  95         case KEY_RSA:
  96                 name = _PATH_SSH_CLIENT_ID_RSA;
  97                 break;
  98         default:
  99                 fprintf(stderr, "bad key type");
 100                 exit(1);
 101                 break;
 102         }
 103         snprintf(identity_file, sizeof(identity_file), "%s/%s", pw->pw_dir, name);
 104         fprintf(stderr, "%s (%s): ", prompt, identity_file);
 105         fflush(stderr);
 106         if (fgets(buf, sizeof(buf), stdin) == NULL)
 107                 exit(1);
 108         if (strchr(buf, '\n'))
 109                 *strchr(buf, '\n') = 0;
 110         if (strcmp(buf, "") != 0)
 111                 strlcpy(identity_file, buf, sizeof(identity_file));
 112         have_identity = 1;
 113 }
 114
 115 Key *
 116 try_load_pem_key(char *filename)
 117 {
 118         char *pass;
 119         Key *prv;
 120
 121         prv = key_load_private(filename, "", NULL);
 122         if (prv == NULL) {
 123                 pass = read_passphrase("Enter passphrase: ", 1);
 124                 prv = key_load_private(filename, pass, NULL);
 125                 memset(pass, 0, strlen(pass));
 126                 xfree(pass);
 127         }
 128         return prv;
 129 }
 130
 131 #define SSH_COM_PUBLIC_BEGIN            "---- BEGIN SSH2 PUBLIC KEY ----"
 132 #define SSH_COM_PUBLIC_END              "---- END SSH2 PUBLIC KEY ----"
 133 #define SSH_COM_PRIVATE_BEGIN           "---- BEGIN SSH2 ENCRYPTED PRIVATE KEY ----"
 134 #define SSH_COM_PRIVATE_KEY_MAGIC       0x3f6ff9eb
 135
 136 void
 137 do_convert_to_ssh2(struct passwd *pw)
 138 {
 139         Key *prv;
 140         int len;
 141         u_char *blob;
 142         struct stat st;
 143
 144         if (!have_identity)
 145                 ask_filename(pw, "Enter file in which the key is");
 146         if (stat(identity_file, &st) < 0) {
 147                 perror(identity_file);
 148                 exit(1);
 149         }
 150         prv = try_load_pem_key(identity_file);
 151         if (prv == NULL) {
 152                 fprintf(stderr, "load failed\n");
 153                 exit(1);
 154         }
 155         key_to_blob(prv, &blob, &len);
 156         fprintf(stdout, "%s\n", SSH_COM_PUBLIC_BEGIN);
 157         fprintf(stdout,
 158             "Comment: \"%d-bit %s, converted from OpenSSH by %s@%s\"\n",
 159             key_size(prv), key_type(prv),
 160             pw->pw_name, hostname);
 161         dump_base64(stdout, blob, len);
 162         fprintf(stdout, "%s\n", SSH_COM_PUBLIC_END);
 163         key_free(prv);
 164         xfree(blob);
 165         exit(0);
 166 }
 167
 168 void
 169 buffer_get_bignum_bits(Buffer *b, BIGNUM *value)
 170 {
 171         int bits = buffer_get_int(b);
 172         int bytes = (bits + 7) / 8;
 173
 174         if (buffer_len(b) < bytes)
 175                 fatal("buffer_get_bignum_bits: input buffer too small: "
 176                     "need %d have %d", bytes, buffer_len(b));
 177         BN_bin2bn((u_char *)buffer_ptr(b), bytes, value);
 178         buffer_consume(b, bytes);
 179 }
 180
 181 Key *
 182 do_convert_private_ssh2_from_blob(char *blob, int blen)
 183 {
 184         Buffer b;
 185         Key *key = NULL;
 186         int ignore, magic, rlen, ktype;
 187         char *type, *cipher;
 188
 189         buffer_init(&b);
 190         buffer_append(&b, blob, blen);
 191
 192         magic  = buffer_get_int(&b);
 193         if (magic != SSH_COM_PRIVATE_KEY_MAGIC) {
 194                 error("bad magic 0x%x != 0x%x", magic, SSH_COM_PRIVATE_KEY_MAGIC);
 195                 buffer_free(&b);
 196                 return NULL;
 197         }
 198         ignore = buffer_get_int(&b);
 199         type   = buffer_get_string(&b, NULL);
 200         cipher = buffer_get_string(&b, NULL);
 201         ignore = buffer_get_int(&b);
 202         ignore = buffer_get_int(&b);
 203         ignore = buffer_get_int(&b);
 204
 205         if (strcmp(cipher, "none") != 0) {
 206                 error("unsupported cipher %s", cipher);
 207                 xfree(cipher);
 208                 buffer_free(&b);
 209                 xfree(type);
 210                 return NULL;
 211         }
 212         xfree(cipher);
 213
 214         if (strstr(type, "dsa")) {
 215                 ktype = KEY_DSA;
 216         } else if (strstr(type, "rsa")) {
 217                 ktype = KEY_RSA;
 218         } else {
 219                 xfree(type);
 220                 return NULL;
 221         }
 222         key = key_new_private(ktype);
 223         xfree(type);
 224
 225         switch (key->type) {
 226         case KEY_DSA:
 227                 buffer_get_bignum_bits(&b, key->dsa->p);
 228                 buffer_get_bignum_bits(&b, key->dsa->g);
 229                 buffer_get_bignum_bits(&b, key->dsa->q);
 230                 buffer_get_bignum_bits(&b, key->dsa->pub_key);
 231                 buffer_get_bignum_bits(&b, key->dsa->priv_key);
 232                 break;
 233         case KEY_RSA:
 234                 if (!BN_set_word(key->rsa->e, (u_long) buffer_get_char(&b))) {
 235                         buffer_free(&b);
 236                         key_free(key);
 237                         return NULL;
 238                 }
 239                 buffer_get_bignum_bits(&b, key->rsa->d);
 240                 buffer_get_bignum_bits(&b, key->rsa->n);
 241                 buffer_get_bignum_bits(&b, key->rsa->iqmp);
 242                 buffer_get_bignum_bits(&b, key->rsa->q);
 243                 buffer_get_bignum_bits(&b, key->rsa->p);
 244                 generate_additional_parameters(key->rsa);
 245                 break;
 246         }
 247         rlen = buffer_len(&b);
 248         if(rlen != 0)
 249                 error("do_convert_private_ssh2_from_blob: "
 250                     "remaining bytes in key blob %d", rlen);
 251         buffer_free(&b);
 252 #ifdef DEBUG_PK
 253         {
 254                 u_int slen;
 255                 u_char *sig, data[10] = "abcde12345";
 256
 257                 key_sign(key, &sig, &slen, data, sizeof data);
 258                 key_verify(key, sig, slen, data, sizeof data);
 259                 free(sig);
 260         }
 261 #endif
 262         return key;
 263 }
 264
 265 void
 266 do_convert_from_ssh2(struct passwd *pw)
 267 {
 268         Key *k;
 269         int blen;
 270         char line[1024], *p;
 271         char blob[8096];
 272         char encoded[8096];
 273         struct stat st;
 274         int escaped = 0, private = 0, ok;
 275         FILE *fp;
 276
 277         if (!have_identity)
 278                 ask_filename(pw, "Enter file in which the key is");
 279         if (stat(identity_file, &st) < 0) {
 280                 perror(identity_file);
 281                 exit(1);
 282         }
 283         fp = fopen(identity_file, "r");
 284         if (fp == NULL) {
 285                 perror(identity_file);
 286                 exit(1);
 287         }
 288         encoded[0] = '\0';
 289         while (fgets(line, sizeof(line), fp)) {
 290                 if (!(p = strchr(line, '\n'))) {
 291                         fprintf(stderr, "input line too long.\n");
 292                         exit(1);
 293                 }
 294                 if (p > line && p[-1] == '\\')
 295                         escaped++;
 296                 if (strncmp(line, "----", 4) == 0 ||
 297                     strstr(line, ": ") != NULL) {
 298                         if (strstr(line, SSH_COM_PRIVATE_BEGIN) != NULL)
 299                                 private = 1;
 300                         fprintf(stderr, "ignore: %s", line);
 301                         continue;
 302                 }
 303                 if (escaped) {
 304                         escaped--;
 305                         fprintf(stderr, "escaped: %s", line);
 306                         continue;
 307                 }
 308                 *p = '\0';
 309                 strlcat(encoded, line, sizeof(encoded));
 310         }
 311         blen = uudecode(encoded, (u_char *)blob, sizeof(blob));
 312         if (blen < 0) {
 313                 fprintf(stderr, "uudecode failed.\n");
 314                 exit(1);
 315         }
 316         k = private ?
 317             do_convert_private_ssh2_from_blob(blob, blen) :
 318             key_from_blob(blob, blen);
 319         if (k == NULL) {
 320                 fprintf(stderr, "decode blob failed.\n");
 321                 exit(1);
 322         }
 323         ok = private ?
 324             (k->type == KEY_DSA ?
 325                  PEM_write_DSAPrivateKey(stdout, k->dsa, NULL, NULL, 0, NULL, NULL) :
 326                  PEM_write_RSAPrivateKey(stdout, k->rsa, NULL, NULL, 0, NULL, NULL)) :
 327             key_write(k, stdout);
 328         if (!ok) {
 329                 fprintf(stderr, "key write failed");
 330                 exit(1);
 331         }
 332         key_free(k);
 333         fprintf(stdout, "\n");
 334         fclose(fp);
 335         exit(0);
 336 }
 337
 338 void
 339 do_print_public(struct passwd *pw)
 340 {
 341         Key *prv;
 342         struct stat st;
 343
 344         if (!have_identity)
 345                 ask_filename(pw, "Enter file in which the key is");
 346         if (stat(identity_file, &st) < 0) {
 347                 perror(identity_file);
 348                 exit(1);
 349         }
 350         prv = try_load_pem_key(identity_file);
 351         if (prv == NULL) {
 352                 fprintf(stderr, "load failed\n");
 353                 exit(1);
 354         }
 355         if (!key_write(prv, stdout))
 356                 fprintf(stderr, "key_write failed");
 357         key_free(prv);
 358         fprintf(stdout, "\n");
 359         exit(0);
 360 }
 361
 362 void
 363 do_fingerprint(struct passwd *pw)
 364 {
 365         FILE *f;
 366         Key *public;
 367         char *comment = NULL, *cp, *ep, line[16*1024], *fp;
 368         int i, skip = 0, num = 1, invalid = 1, rep, fptype;
 369         struct stat st;
 370
 371         fptype = print_bubblebabble ? SSH_FP_SHA1 : SSH_FP_MD5;
 372         rep =    print_bubblebabble ? SSH_FP_BUBBLEBABBLE : SSH_FP_HEX;
 373
 374         if (!have_identity)
 375                 ask_filename(pw, "Enter file in which the key is");
 376         if (stat(identity_file, &st) < 0) {
 377                 perror(identity_file);
 378                 exit(1);
 379         }
 380         public = key_load_public(identity_file, &comment);
 381         if (public != NULL) {
 382                 fp = key_fingerprint(public, fptype, rep);
 383                 printf("%d %s %s\n", key_size(public), fp, comment);
 384                 key_free(public);
 385                 xfree(comment);
 386                 xfree(fp);
 387                 exit(0);
 388         }
 389         if (comment)
 390                 xfree(comment);
 391
 392         f = fopen(identity_file, "r");
 393         if (f != NULL) {
 394                 while (fgets(line, sizeof(line), f)) {
 395                         i = strlen(line) - 1;
 396                         if (line[i] != '\n') {
 397                                 error("line %d too long: %.40s...", num, line);
 398                                 skip = 1;
 399                                 continue;
 400                         }
 401                         num++;
 402                         if (skip) {
 403                                 skip = 0;
 404                                 continue;
 405                         }
 406                         line[i] = '\0';
 407
 408                         /* Skip leading whitespace, empty and comment lines. */
 409                         for (cp = line; *cp == ' ' || *cp == '\t'; cp++)
 410                                 ;
 411                         if (!*cp || *cp == '\n' || *cp == '#')
 412                                 continue ;
 413                         i = strtol(cp, &ep, 10);
 414                         if (i == 0 || ep == NULL || (*ep != ' ' && *ep != '\t')) {
 415                                 int quoted = 0;
 416                                 comment = cp;
 417                                 for (; *cp && (quoted || (*cp != ' ' && *cp != '\t')); cp++) {
 418                                         if (*cp == '\\' && cp[1] == '"')
 419                                                 cp++;   /* Skip both */
 420                                         else if (*cp == '"')
 421                                                 quoted = !quoted;
 422                                 }
 423                                 if (!*cp)
 424                                         continue;
 425                                 *cp++ = '\0';
 426                         }
 427                         ep = cp;
 428                         public = key_new(KEY_RSA1);
 429                         if (key_read(public, &cp) != 1) {
 430                                 cp = ep;
 431                                 key_free(public);
 432                                 public = key_new(KEY_UNSPEC);
 433                                 if (key_read(public, &cp) != 1) {
 434                                         key_free(public);
 435                                         continue;
 436                                 }
 437                         }
 438                         comment = *cp ? cp : comment;
 439                         fp = key_fingerprint(public, fptype, rep);
 440                         printf("%d %s %s\n", key_size(public), fp,
 441                             comment ? comment : "no comment");
 442                         xfree(fp);
 443                         key_free(public);
 444                         invalid = 0;
 445                 }
 446                 fclose(f);
 447         }
 448         if (invalid) {
 449                 printf("%s is not a valid key file.\n", identity_file);
 450                 exit(1);
 451         }
 452         exit(0);
 453 }
 454
 455 /*
 456  * Perform changing a passphrase.  The argument is the passwd structure
 457  * for the current user.
 458  */
 459 void
 460 do_change_passphrase(struct passwd *pw)
 461 {
 462         char *comment;
 463         char *old_passphrase, *passphrase1, *passphrase2;
 464         struct stat st;
 465         Key *private;
 466
 467         if (!have_identity)
 468                 ask_filename(pw, "Enter file in which the key is");
 469         if (stat(identity_file, &st) < 0) {
 470                 perror(identity_file);
 471                 exit(1);
 472         }
 473         /* Try to load the file with empty passphrase. */
 474         private = key_load_private(identity_file, "", &comment);
 475         if (private == NULL) {
 476                 if (identity_passphrase)
 477                         old_passphrase = xstrdup(identity_passphrase);
 478                 else
 479                         old_passphrase = read_passphrase("Enter old passphrase: ", 1);
 480                 private = key_load_private(identity_file, old_passphrase , &comment);
 481                 memset(old_passphrase, 0, strlen(old_passphrase));
 482                 xfree(old_passphrase);
 483                 if (private == NULL) {
 484                         printf("Bad passphrase.\n");
 485                         exit(1);
 486                 }
 487         }
 488         printf("Key has comment '%s'\n", comment);
 489
 490         /* Ask the new passphrase (twice). */
 491         if (identity_new_passphrase) {
 492                 passphrase1 = xstrdup(identity_new_passphrase);
 493                 passphrase2 = NULL;
 494         } else {
 495                 passphrase1 =
 496                         read_passphrase("Enter new passphrase (empty for no passphrase): ", 1);
 497                 passphrase2 = read_passphrase("Enter same passphrase again: ", 1);
 498
 499                 /* Verify that they are the same. */
 500                 if (strcmp(passphrase1, passphrase2) != 0) {
 501                         memset(passphrase1, 0, strlen(passphrase1));
 502                         memset(passphrase2, 0, strlen(passphrase2));
 503                         xfree(passphrase1);
 504                         xfree(passphrase2);
 505                         printf("Pass phrases do not match.  Try again.\n");
 506                         exit(1);
 507                 }
 508                 /* Destroy the other copy. */
 509                 memset(passphrase2, 0, strlen(passphrase2));
 510                 xfree(passphrase2);
 511         }
 512
 513         /* Save the file using the new passphrase. */
 514         if (!key_save_private(private, identity_file, passphrase1, comment)) {
 515                 printf("Saving the key failed: %s: %s.\n",
 516                        identity_file, strerror(errno));
 517                 memset(passphrase1, 0, strlen(passphrase1));
 518                 xfree(passphrase1);
 519                 key_free(private);
 520                 xfree(comment);
 521                 exit(1);
 522         }
 523         /* Destroy the passphrase and the copy of the key in memory. */
 524         memset(passphrase1, 0, strlen(passphrase1));
 525         xfree(passphrase1);
 526         key_free(private);               /* Destroys contents */
 527         xfree(comment);
 528
 529         printf("Your identification has been saved with the new passphrase.\n");
 530         exit(0);
 531 }
 532
 533 /*
 534  * Change the comment of a private key file.
 535  */
 536 void
 537 do_change_comment(struct passwd *pw)
 538 {
 539         char new_comment[1024], *comment, *passphrase;
 540         Key *private;
 541         Key *public;
 542         struct stat st;
 543         FILE *f;
 544         int fd;
 545
 546         if (!have_identity)
 547                 ask_filename(pw, "Enter file in which the key is");
 548         if (stat(identity_file, &st) < 0) {
 549                 perror(identity_file);
 550                 exit(1);
 551         }
 552         private = key_load_private(identity_file, "", &comment);
 553         if (private == NULL) {
 554                 if (identity_passphrase)
 555                         passphrase = xstrdup(identity_passphrase);
 556                 else if (identity_new_passphrase)
 557                         passphrase = xstrdup(identity_new_passphrase);
 558                 else
 559                         passphrase = read_passphrase("Enter passphrase: ", 1);
 560                 /* Try to load using the passphrase. */
 561                 private = key_load_private(identity_file, passphrase, &comment);
 562                 if (private == NULL) {
 563                         memset(passphrase, 0, strlen(passphrase));
 564                         xfree(passphrase);
 565                         printf("Bad passphrase.\n");
 566                         exit(1);
 567                 }
 568         } else {
 569                 passphrase = xstrdup("");
 570         }
 571         if (private->type != KEY_RSA1) {
 572                 fprintf(stderr, "Comments are only supported for RSA1 keys.\n");
 573                 key_free(private);
 574                 exit(1);
 575         }
 576         printf("Key now has comment '%s'\n", comment);
 577
 578         if (identity_comment) {
 579                 strlcpy(new_comment, identity_comment, sizeof(new_comment));
 580         } else {
 581                 printf("Enter new comment: ");
 582                 fflush(stdout);
 583                 if (!fgets(new_comment, sizeof(new_comment), stdin)) {
 584                         memset(passphrase, 0, strlen(passphrase));
 585                         key_free(private);
 586                         exit(1);
 587                 }
 588                 if (strchr(new_comment, '\n'))
 589                         *strchr(new_comment, '\n') = 0;
 590         }
 591
 592         /* Save the file using the new passphrase. */
 593         if (!key_save_private(private, identity_file, passphrase, new_comment)) {
 594                 printf("Saving the key failed: %s: %s.\n",
 595                        identity_file, strerror(errno));
 596                 memset(passphrase, 0, strlen(passphrase));
 597                 xfree(passphrase);
 598                 key_free(private);
 599                 xfree(comment);
 600                 exit(1);
 601         }
 602         memset(passphrase, 0, strlen(passphrase));
 603         xfree(passphrase);
 604         public = key_from_private(private);
 605         key_free(private);
 606
 607         strlcat(identity_file, ".pub", sizeof(identity_file));
 608         fd = open(identity_file, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 609         if (fd == -1) {
 610                 printf("Could not save your public key in %s\n", identity_file);
 611                 exit(1);
 612         }
 613         f = fdopen(fd, "w");
 614         if (f == NULL) {
 615                 printf("fdopen %s failed", identity_file);
 616                 exit(1);
 617         }
 618         if (!key_write(public, f))
 619                 fprintf(stderr, "write key failed");
 620         key_free(public);
 621         fprintf(f, " %s\n", new_comment);
 622         fclose(f);
 623
 624         xfree(comment);
 625
 626         printf("The comment in your key file has been changed.\n");
 627         exit(0);
 628 }
 629
 630 void
 631 usage(void)
 632 {
 633         printf("Usage: %s [-lBpqxXyc] [-t type] [-b bits] [-f file] [-C comment] "
 634             "[-N new-pass] [-P pass]\n", __progname);
 635         exit(1);
 636 }
 637
 638 /*
 639  * Main program for key management.
 640  */
 641 int
 642 main(int ac, char **av)
 643 {
 644         char dotsshdir[16 * 1024], comment[1024], *passphrase1, *passphrase2;
 645         Key *private, *public;
 646         struct passwd *pw;
 647         int opt, type, fd;
 648         struct stat st;
 649         FILE *f;
 650
 651         extern int optind;
 652         extern char *optarg;
 653
 654         __progname = get_progname(av[0]);
 655         init_rng();
 656         seed_rng();
 657
 658         SSLeay_add_all_algorithms();
 659
 660         /* we need this for the home * directory.  */
 661         pw = getpwuid(getuid());
 662         if (!pw) {
 663                 printf("You don't exist, go away!\n");
 664                 exit(1);
 665         }
 666         if (gethostname(hostname, sizeof(hostname)) < 0) {
 667                 perror("gethostname");
 668                 exit(1);
 669         }
 670
 671         while ((opt = getopt(ac, av, "dqpclBRxXyb:f:t:P:N:C:")) != -1) {
 672                 switch (opt) {
 673                 case 'b':
 674                         bits = atoi(optarg);
 675                         if (bits < 512 || bits > 32768) {
 676                                 printf("Bits has bad value.\n");
 677                                 exit(1);
 678                         }
 679                         break;
 680
 681                 case 'l':
 682                         print_fingerprint = 1;
 683                         break;
 684
 685                 case 'B':
 686                         print_bubblebabble = 1;
 687                         break;
 688
 689                 case 'p':
 690                         change_passphrase = 1;
 691                         break;
 692
 693                 case 'c':
 694                         change_comment = 1;
 695                         break;
 696
 697                 case 'f':
 698                         strlcpy(identity_file, optarg, sizeof(identity_file));
 699                         have_identity = 1;
 700                         break;
 701
 702                 case 'P':
 703                         identity_passphrase = optarg;
 704                         break;
 705
 706                 case 'N':
 707                         identity_new_passphrase = optarg;
 708                         break;
 709
 710                 case 'C':
 711                         identity_comment = optarg;
 712                         break;
 713
 714                 case 'q':
 715                         quiet = 1;
 716                         break;
 717
 718                 case 'R':
 719                         /* unused */
 720                         exit(0);
 721                         break;
 722
 723                 case 'x':
 724                         convert_to_ssh2 = 1;
 725                         break;
 726
 727                 case 'X':
 728                         convert_from_ssh2 = 1;
 729                         break;
 730
 731                 case 'y':
 732                         print_public = 1;
 733                         break;
 734
 735                 case 'd':
 736                         key_type_name = "dsa";
 737                         break;
 738
 739                 case 't':
 740                         key_type_name = optarg;
 741                         break;
 742
 743                 case '?':
 744                 default:
 745                         usage();
 746                 }
 747         }
 748         if (optind < ac) {
 749                 printf("Too many arguments.\n");
 750                 usage();
 751         }
 752         if (change_passphrase && change_comment) {
 753                 printf("Can only have one of -p and -c.\n");
 754                 usage();
 755         }
 756         if (print_fingerprint || print_bubblebabble)
 757                 do_fingerprint(pw);
 758         if (change_passphrase)
 759                 do_change_passphrase(pw);
 760         if (change_comment)
 761                 do_change_comment(pw);
 762         if (convert_to_ssh2)
 763                 do_convert_to_ssh2(pw);
 764         if (convert_from_ssh2)
 765                 do_convert_from_ssh2(pw);
 766         if (print_public)
 767                 do_print_public(pw);
 768
 769         arc4random_stir();
 770
 771         type = key_type_from_name(key_type_name);
 772         if (type == KEY_UNSPEC) {
 773                 fprintf(stderr, "unknown key type %s\n", key_type_name);
 774                 exit(1);
 775         }
 776         if (!quiet)
 777                 printf("Generating public/private %s key pair.\n", key_type_name);
 778         private = key_generate(type, bits);
 779         if (private == NULL) {
 780                 fprintf(stderr, "key_generate failed");
 781                 exit(1);
 782         }
 783         public  = key_from_private(private);
 784
 785         if (!have_identity)
 786                 ask_filename(pw, "Enter file in which to save the key");
 787
 788         /* Create ~/.ssh directory if it doesn\'t already exist. */
 789         snprintf(dotsshdir, sizeof dotsshdir, "%s/%s", pw->pw_dir, _PATH_SSH_USER_DIR);
 790         if (strstr(identity_file, dotsshdir) != NULL &&
 791             stat(dotsshdir, &st) < 0) {
 792                 if (mkdir(dotsshdir, 0700) < 0)
 793                         error("Could not create directory '%s'.", dotsshdir);
 794                 else if (!quiet)
 795                         printf("Created directory '%s'.\n", dotsshdir);
 796         }
 797         /* If the file already exists, ask the user to confirm. */
 798         if (stat(identity_file, &st) >= 0) {
 799                 char yesno[3];
 800                 printf("%s already exists.\n", identity_file);
 801                 printf("Overwrite (y/n)? ");
 802                 fflush(stdout);
 803                 if (fgets(yesno, sizeof(yesno), stdin) == NULL)
 804                         exit(1);
 805                 if (yesno[0] != 'y' && yesno[0] != 'Y')
 806                         exit(1);
 807         }
 808         /* Ask for a passphrase (twice). */
 809         if (identity_passphrase)
 810                 passphrase1 = xstrdup(identity_passphrase);
 811         else if (identity_new_passphrase)
 812                 passphrase1 = xstrdup(identity_new_passphrase);
 813         else {
 814 passphrase_again:
 815                 passphrase1 =
 816                         read_passphrase("Enter passphrase (empty for no passphrase): ", 1);
 817                 passphrase2 = read_passphrase("Enter same passphrase again: ", 1);
 818                 if (strcmp(passphrase1, passphrase2) != 0) {
 819                         /* The passphrases do not match.  Clear them and retry. */
 820                         memset(passphrase1, 0, strlen(passphrase1));
 821                         memset(passphrase2, 0, strlen(passphrase2));
 822                         xfree(passphrase1);
 823                         xfree(passphrase2);
 824                         printf("Passphrases do not match.  Try again.\n");
 825                         goto passphrase_again;
 826                 }
 827                 /* Clear the other copy of the passphrase. */
 828                 memset(passphrase2, 0, strlen(passphrase2));
 829                 xfree(passphrase2);
 830         }
 831
 832         if (identity_comment) {
 833                 strlcpy(comment, identity_comment, sizeof(comment));
 834         } else {
 835                 /* Create default commend field for the passphrase. */
 836                 snprintf(comment, sizeof comment, "%s@%s", pw->pw_name, hostname);
 837         }
 838
 839         /* Save the key with the given passphrase and comment. */
 840         if (!key_save_private(private, identity_file, passphrase1, comment)) {
 841                 printf("Saving the key failed: %s: %s.\n",
 842                     identity_file, strerror(errno));
 843                 memset(passphrase1, 0, strlen(passphrase1));
 844                 xfree(passphrase1);
 845                 exit(1);
 846         }
 847         /* Clear the passphrase. */
 848         memset(passphrase1, 0, strlen(passphrase1));
 849         xfree(passphrase1);
 850
 851         /* Clear the private key and the random number generator. */
 852         key_free(private);
 853         arc4random_stir();
 854
 855         if (!quiet)
 856                 printf("Your identification has been saved in %s.\n", identity_file);
 857
 858         strlcat(identity_file, ".pub", sizeof(identity_file));
 859         fd = open(identity_file, O_WRONLY | O_CREAT | O_TRUNC, 0644);
 860         if (fd == -1) {
 861                 printf("Could not save your public key in %s\n", identity_file);
 862                 exit(1);
 863         }
 864         f = fdopen(fd, "w");
 865         if (f == NULL) {
 866                 printf("fdopen %s failed", identity_file);
 867                 exit(1);
 868         }
 869         if (!key_write(public, f))
 870                 fprintf(stderr, "write key failed");
 871         fprintf(f, " %s\n", comment);
 872         fclose(f);
 873
 874         if (!quiet) {
 875                 char *fp = key_fingerprint(public, SSH_FP_MD5, SSH_FP_HEX);
 876                 printf("Your public key has been saved in %s.\n",
 877                     identity_file);
 878                 printf("The key fingerprint is:\n");
 879                 printf("%s %s\n", fp, comment);
 880                 xfree(fp);
 881         }
 882
 883         key_free(public);
 884         exit(0);
 885 }