2 * Copyright (C) 2009 Martin Willi
3 * Copyright (C) 2009 Andreas Steffen
5 * HSR Hochschule fuer Technik Rapperswil
7 * This program is free software; you can redistribute it and/or modify it
8 * under the terms of the GNU General Public License as published by the
9 * Free Software Foundation; either version 2 of the License, or (at your
10 * option) any later version. See <http://www.fsf.org/copyleft/gpl.txt>.
12 * This program is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
22 #include <collections/linked_list.h>
23 #include <credentials/certificates/certificate.h>
26 * Create a self-signed PKCS#10 certificate requesst.
30 cred_encoding_type_t form
= CERT_ASN1_DER
;
31 key_type_t type
= KEY_RSA
;
32 hash_algorithm_t digest
= HASH_SHA1
;
33 certificate_t
*cert
= NULL
;
34 private_key_t
*private = NULL
;
35 char *file
= NULL
, *dn
= NULL
, *error
= NULL
;
36 identification_t
*id
= NULL
;
38 chunk_t encoding
= chunk_empty
;
39 chunk_t challenge_password
= chunk_empty
;
42 san
= linked_list_create();
46 switch (command_getopt(&arg
))
51 if (streq(arg
, "rsa"))
55 else if (streq(arg
, "ecdsa"))
61 error
= "invalid input type";
66 digest
= enum_from_name(hash_algorithm_short_names
, arg
);
69 error
= "invalid --digest type";
80 san
->insert_last(san
, identification_create_from_string(arg
));
83 challenge_password
= chunk_create(arg
, strlen(arg
));
86 if (!get_form(arg
, &form
, CRED_CERTIFICATE
))
88 error
= "invalid output format";
95 error
= "invalid --req option";
103 error
= "--dn is required";
106 id
= identification_create_from_string(dn
);
107 if (id
->get_type(id
) != ID_DER_ASN1_DN
)
109 error
= "supplied --dn is not a distinguished name";
114 private = lib
->creds
->create(lib
->creds
, CRED_PRIVATE_KEY
, type
,
115 BUILD_FROM_FILE
, file
, BUILD_END
);
119 private = lib
->creds
->create(lib
->creds
, CRED_PRIVATE_KEY
, type
,
120 BUILD_FROM_FD
, 0, BUILD_END
);
124 error
= "parsing private key failed";
127 cert
= lib
->creds
->create(lib
->creds
, CRED_CERTIFICATE
, CERT_PKCS10_REQUEST
,
128 BUILD_SIGNING_KEY
, private,
130 BUILD_SUBJECT_ALTNAMES
, san
,
131 BUILD_CHALLENGE_PWD
, challenge_password
,
132 BUILD_DIGEST_ALG
, digest
,
136 error
= "generating certificate request failed";
139 if (!cert
->get_encoding(cert
, form
, &encoding
))
141 error
= "encoding certificate request failed";
144 if (fwrite(encoding
.ptr
, encoding
.len
, 1, stdout
) != 1)
146 error
= "writing certificate request failed";
154 san
->destroy_offset(san
, offsetof(identification_t
, destroy
));
159 fprintf(stderr
, "%s\n", error
);
165 san
->destroy_offset(san
, offsetof(identification_t
, destroy
));
166 return command_usage(error
);
170 * Register the command.
172 static void __attribute__ ((constructor
))reg()
174 command_register((command_t
) {
176 "create a PKCS#10 certificate request",
177 {" [--in file] [--type rsa|ecdsa] --dn distinguished-name",
178 "[--san subjectAltName]+ [--password challengePassword]",
179 "[--digest md5|sha1|sha224|sha256|sha384|sha512] [--outform der|pem]"},
181 {"help", 'h', 0, "show usage information"},
182 {"in", 'i', 1, "private key input file, default: stdin"},
183 {"type", 't', 1, "type of input key, default: rsa"},
184 {"dn", 'd', 1, "subject distinguished name"},
185 {"san", 'a', 1, "subjectAltName to include in cert request"},
186 {"password",'p', 1, "challengePassword to include in cert request"},
187 {"digest", 'g', 1, "digest for signature creation, default: sha1"},
188 {"outform", 'f', 1, "encoding of generated request, default: der"},