5
/* nettle, low-level cryptographics library
7
* Copyright (C) 2002 Niels M�ller
9
* The nettle library is free software; you can redistribute it and/or modify
10
* it under the terms of the GNU Lesser General Public License as published by
11
* the Free Software Foundation; either version 2.1 of the License, or (at your
12
* option) any later version.
14
* The nettle library is distributed in the hope that it will be useful, but
15
* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
16
* or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public
17
* License for more details.
19
* You should have received a copy of the GNU Lesser General Public License
20
* along with the nettle library; see the file COPYING.LIB. If not, write to
21
* the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
48
progress(void *ctx, int c)
56
main(int argc, char **argv)
58
struct yarrow256_ctx yarrow;
59
struct rsa_public_key pub;
60
struct rsa_private_key priv;
63
char *pub_name = NULL;
64
const char *priv_name = NULL;
65
const char *random_name = NULL;
67
struct nettle_buffer pub_buffer;
68
struct nettle_buffer priv_buffer;
70
while ( (c = getopt(argc, argv, "o:r:")) != -1)
83
werror("Unknown option `-%c'.\n", optopt);
85
werror("Unknown option character `\\x%x'.\n",
94
werror("No filename provided.\n");
98
pub_name = xalloc(strlen(priv_name) + 5);
99
sprintf(pub_name, "%s.pub", priv_name);
101
/* NOTE: No sources */
102
yarrow256_init(&yarrow, 0, NULL);
104
/* Read some data to seed the generator */
105
if (!simple_random(&yarrow, random_name))
107
werror("Initialization of randomness generator failed.\n");
111
rsa_public_key_init(&pub);
112
rsa_private_key_init(&priv);
114
if (!rsa_generate_keypair
116
(void *) &yarrow, (nettle_random_func) yarrow256_random,
120
werror("Key generation failed.\n");
124
nettle_buffer_init(&priv_buffer);
125
nettle_buffer_init(&pub_buffer);
127
if (!rsa_keypair_to_sexp(&pub_buffer, "rsa-pkcs1-sha1", &pub, NULL))
129
werror("Formatting public key failed.\n");
133
if (!rsa_keypair_to_sexp(&priv_buffer, "rsa-pkcs1-sha1", &pub, &priv))
135
werror("Formatting private key failed.\n");
139
if (!write_file(pub_name, pub_buffer.size, pub_buffer.contents))
141
werror("Failed to write public key: %s\n",
146
/* NOTE: This doesn't set up paranoid access restrictions on the
147
* private key file, like a serious key generation tool would do. */
148
if (!write_file(priv_name, priv_buffer.size, priv_buffer.contents))
150
werror("Failed to write private key: %s\n",