[24319] | 1 | /* $Id: genkey.c 3956 2010-01-05 20:56:56Z zacheiss $ |
---|
[23095] | 2 | * |
---|
| 3 | * Utility program to generate a public/private key pair |
---|
| 4 | * |
---|
| 5 | * Copyright (C) 1998 by the Massachusetts Institute of Technology |
---|
| 6 | * For copying and distribution information, please see the file |
---|
| 7 | * <mit-copyright.h>. |
---|
| 8 | * |
---|
| 9 | */ |
---|
| 10 | |
---|
| 11 | #include <mit-copyright.h> |
---|
| 12 | #include <moira.h> |
---|
| 13 | #include "reg_svr.h" |
---|
| 14 | |
---|
| 15 | #include <sys/param.h> |
---|
| 16 | |
---|
| 17 | #include <errno.h> |
---|
| 18 | #include <stdio.h> |
---|
| 19 | #include <stdlib.h> |
---|
| 20 | #include <string.h> |
---|
| 21 | |
---|
| 22 | #include <com_err.h> |
---|
| 23 | |
---|
| 24 | /* RSARef includes */ |
---|
| 25 | #include "global.h" |
---|
| 26 | #include "rsaref.h" |
---|
| 27 | |
---|
[24319] | 28 | RCSID("$HeadURL: svn+ssh://svn.mit.edu/moira/trunk/moira/reg_svr/genkey.c $ $Id: genkey.c 3956 2010-01-05 20:56:56Z zacheiss $"); |
---|
[23095] | 29 | |
---|
| 30 | void printhex(FILE *out, unsigned char *buf, int len); |
---|
| 31 | |
---|
| 32 | int main(int argc, char **argv) |
---|
| 33 | { |
---|
| 34 | R_RSA_PRIVATE_KEY private; |
---|
| 35 | R_RSA_PUBLIC_KEY public; |
---|
| 36 | R_RSA_PROTO_KEY proto; |
---|
| 37 | R_RANDOM_STRUCT random; |
---|
| 38 | FILE *in, *out; |
---|
| 39 | int needed; |
---|
| 40 | unsigned char *buf; |
---|
| 41 | char pubname[MAXPATHLEN], oldname[MAXPATHLEN]; |
---|
| 42 | char *whoami = argv[0], *inname = argv[1], *outname = argv[2]; |
---|
| 43 | |
---|
| 44 | if (strchr(whoami, '/')) |
---|
| 45 | whoami = strrchr(whoami, '/'); |
---|
| 46 | |
---|
| 47 | if (argc != 3) |
---|
| 48 | { |
---|
| 49 | com_err(NULL, 0, "Usage: %s infile outfile\n" |
---|
| 50 | "where infile is a file of random data", whoami); |
---|
| 51 | exit(1); |
---|
| 52 | } |
---|
| 53 | in = fopen(inname, "r"); |
---|
| 54 | if (!in) |
---|
| 55 | { |
---|
| 56 | com_err(whoami, errno, "trying to open %s", inname); |
---|
| 57 | exit(1); |
---|
| 58 | } |
---|
| 59 | |
---|
| 60 | R_RandomInit(&random); |
---|
| 61 | R_GetRandomBytesNeeded(&needed, &random); |
---|
| 62 | buf = malloc(needed); |
---|
| 63 | if (fread(buf, needed, 1, in) != 1) |
---|
| 64 | { |
---|
| 65 | com_err(whoami, 0, "Not enough random input data: need %d bytes\n", |
---|
| 66 | needed); |
---|
| 67 | exit(1); |
---|
| 68 | } |
---|
| 69 | R_RandomUpdate(&random, buf, needed); |
---|
| 70 | |
---|
| 71 | proto.bits = 1024; |
---|
| 72 | proto.useFermat4 = 1; |
---|
| 73 | |
---|
| 74 | if (R_GeneratePEMKeys(&public, &private, &proto, &random)) |
---|
| 75 | { |
---|
| 76 | com_err(whoami, 0, "Couldn't generate key"); |
---|
| 77 | exit(1); |
---|
| 78 | } |
---|
| 79 | |
---|
| 80 | sprintf(oldname, "%s.old", outname); |
---|
| 81 | rename(outname, oldname); |
---|
| 82 | out = fopen(outname, "w"); |
---|
| 83 | if (!out) |
---|
| 84 | { |
---|
| 85 | com_err(whoami, errno, "opening %s", outname); |
---|
| 86 | exit(1); |
---|
| 87 | } |
---|
| 88 | if (fwrite(&private, sizeof(private), 1, out) != 1) |
---|
| 89 | { |
---|
| 90 | com_err(whoami, errno, "writing %s", outname); |
---|
| 91 | exit(1); |
---|
| 92 | } |
---|
| 93 | fclose(out); |
---|
| 94 | |
---|
| 95 | sprintf(pubname, "%s.pub", outname); |
---|
| 96 | sprintf(oldname, "%s.old", pubname); |
---|
| 97 | rename(pubname, oldname); |
---|
| 98 | out = fopen(pubname, "w"); |
---|
| 99 | if (!out) |
---|
| 100 | { |
---|
| 101 | com_err(whoami, errno, "opening %s", pubname); |
---|
| 102 | exit(1); |
---|
| 103 | } |
---|
| 104 | if (fwrite(&public, sizeof(public), 1, out) != 1) |
---|
| 105 | { |
---|
| 106 | com_err(whoami, errno, "writing %s", pubname); |
---|
| 107 | exit(1); |
---|
| 108 | } |
---|
| 109 | fclose(out); |
---|
| 110 | |
---|
| 111 | sprintf(pubname, "%s.pub.txt", outname); |
---|
| 112 | out = fopen(pubname, "w"); |
---|
| 113 | if (!out) |
---|
| 114 | { |
---|
| 115 | com_err(whoami, errno, "opening %s", pubname); |
---|
| 116 | exit(1); |
---|
| 117 | } |
---|
| 118 | printhex(out, public.modulus, MAX_RSA_MODULUS_LEN); |
---|
| 119 | fclose(out); |
---|
| 120 | |
---|
| 121 | exit(0); |
---|
| 122 | } |
---|
| 123 | |
---|
| 124 | char hexd[] = { '0', '1', '2', '3', '4', '5', '6', '7', |
---|
| 125 | '8', '9', 'A', 'B', 'C', 'D', 'E', 'F' }; |
---|
| 126 | |
---|
| 127 | void printhex(FILE *out, unsigned char *buf, int len) |
---|
| 128 | { |
---|
| 129 | while (len--) |
---|
| 130 | { |
---|
| 131 | fprintf(out, "%c%c", hexd[*buf>>4], hexd[*buf%0x10]); |
---|
| 132 | buf++; |
---|
| 133 | } |
---|
| 134 | } |
---|