pki --req generates a PKCS#10 certificate request
authorAndreas Steffen <andreas@strongswan.org>
Tue, 15 Sep 2009 20:33:32 +0000 (22:33 +0200)
committerAndreas Steffen <andreas@strongswan.org>
Tue, 15 Sep 2009 20:33:32 +0000 (22:33 +0200)
src/pki/Makefile.am
src/pki/commands/req.c [new file with mode: 0644]

index 8bd32e6..a471b64 100644 (file)
@@ -1,8 +1,13 @@
 ipsec_PROGRAMS = pki
 
 pki_SOURCES = pki.c pki.h command.c command.h \
-       commands/verify.c commands/issue.c commands/self.c \
-       commands/keyid.c commands/pub.c commands/gen.c
+       commands/gen.c \
+       commands/issue.c \
+       commands/keyid.c \
+       commands/pub.c \
+       commands/req.c \
+       commands/self.c \
+       commands/verify.c 
 
 pki_LDADD = $(top_builddir)/src/libstrongswan/libstrongswan.la
 INCLUDES = -I$(top_srcdir)/src/libstrongswan
diff --git a/src/pki/commands/req.c b/src/pki/commands/req.c
new file mode 100644 (file)
index 0000000..198e9da
--- /dev/null
@@ -0,0 +1,188 @@
+/*
+ * Copyright (C) 2009 Martin Willi
+ * Copyright (C) 2009 Andreas Steffen
+ *
+ * HSR Hochschule fuer Technik Rapperswil
+ *
+ * This program is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2 of the License, or (at your
+ * option) any later version.  See <http://www.fsf.org/copyleft/gpl.txt>.
+ *
+ * This program is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+ * for more details.
+ */
+
+#include <time.h>
+
+#include "pki.h"
+
+#include <utils/linked_list.h>
+#include <credentials/certificates/certificate.h>
+#include <credentials/certificates/x509.h>
+
+/**
+ * Create a self-signed PKCS#10 certificate requesst.
+ */
+static int req()
+{
+       key_type_t type = KEY_RSA;
+       hash_algorithm_t digest = HASH_SHA1;
+       certificate_t *cert = NULL;
+       private_key_t *private = NULL;
+       char *file = NULL, *dn = NULL, *error = NULL;
+       identification_t *id = NULL;
+       linked_list_t *san;
+       chunk_t encoding = chunk_empty;
+       chunk_t challenge_password = chunk_empty;
+       char *arg;
+
+       san = linked_list_create();
+
+       while (TRUE)
+       {
+               switch (command_getopt(&arg))
+               {
+                       case 'h':
+                               goto usage;
+                       case 'v':
+                               dbg_level = atoi(arg);
+                               continue;
+                       case 't':
+                               if (streq(arg, "rsa"))
+                               {
+                                       type = KEY_RSA;
+                               }
+                               else if (streq(arg, "ecdsa"))
+                               {
+                                       type = KEY_ECDSA;
+                               }
+                               else
+                               {
+                                       error = "invalid input type";
+                                       goto usage;
+                               }
+                               continue;
+                       case 'g':
+                               digest = get_digest(arg);
+                               if (digest == HASH_UNKNOWN)
+                               {
+                                       error = "invalid --digest type";
+                                       goto usage;
+                               }
+                               continue;
+                       case 'i':
+                               file = arg;
+                               continue;
+                       case 'd':
+                               dn = arg;
+                               continue;
+                       case 'a':
+                               san->insert_last(san, identification_create_from_string(arg));
+                               continue;
+                       case 'p':
+                               challenge_password = chunk_create(arg, strlen(arg));
+                               continue;
+                       case EOF:
+                               break;
+                       default:
+                               error = "invalid --req option";
+                               goto usage;
+               }
+               break;
+       }
+
+       if (!dn)
+       {
+               error = "--dn is required";
+               goto usage;
+       }
+       id = identification_create_from_string(dn);
+       if (id->get_type(id) != ID_DER_ASN1_DN)
+       {
+               error = "supplied --dn is not a distinguished name";
+               goto end;
+       }
+       if (file)
+       {
+               private = lib->creds->create(lib->creds, CRED_PRIVATE_KEY, type,
+                                                                        BUILD_FROM_FILE, file, BUILD_END);
+       }
+       else
+       {
+               private = lib->creds->create(lib->creds, CRED_PRIVATE_KEY, type,
+                                                                        BUILD_FROM_FD, 0, BUILD_END);
+       }
+       if (!private)
+       {
+               error = "parsing private key failed";
+               goto end;
+       }
+       cert = lib->creds->create(lib->creds, CRED_CERTIFICATE, CERT_PKCS10_REQUEST,
+                                                         BUILD_SIGNING_KEY, private,
+                                                         BUILD_SUBJECT, id,
+                                                         BUILD_SUBJECT_ALTNAMES, san,
+                                                         BUILD_PASSPHRASE, challenge_password,
+                                                         BUILD_DIGEST_ALG, digest,
+                                                         BUILD_END);
+       if (!cert)
+       {
+               error = "generating certificate request failed";
+               goto end;
+       }
+       encoding = cert->get_encoding(cert);
+       if (!encoding.ptr)
+       {
+               error = "encoding certificate request failed";
+               goto end;
+       }
+       if (fwrite(encoding.ptr, encoding.len, 1, stdout) != 1)
+       {
+               error = "writing certificate request failed";
+               goto end;
+       }
+
+end:
+       DESTROY_IF(id);
+       DESTROY_IF(cert);
+       DESTROY_IF(private);
+       san->destroy_offset(san, offsetof(identification_t, destroy));
+       free(encoding.ptr);
+
+       if (error)
+       {
+               fprintf(stderr, "%s\n", error);
+               return 1;
+       }
+       return 0;
+
+usage:
+       san->destroy_offset(san, offsetof(identification_t, destroy));
+       return command_usage(error);
+}
+
+/**
+ * Register the command.
+ */
+static void __attribute__ ((constructor))reg()
+{
+       command_register((command_t) {
+               req, 'r', "req",
+               "create a PKCS#10 certificate request",
+               {"[--in file] [--type rsa|ecdsa]",
+                " --dn distinguished-name [--san subjectAltName]+",
+                "[--password challengePassword]",
+                "[--digest md5|sha1|sha224|sha256|sha384|sha512]"},
+               {
+                       {"help",        'h', 0, "show usage information"},
+                       {"in",          'i', 1, "private key input file, default: stdin"},
+                       {"type",        't', 1, "type of input key, default: rsa"},
+                       {"dn",          'd', 1, "subject and issuer distinguished name"},
+                       {"san",         'a', 1, "subjectAltName to include in cert request"},
+                       {"password",'p', 1, "challengePassword to include in cert request"},
+                       {"digest",      'g', 1, "digest for signature creation, default: sha1"},
+               }
+       });
+}