diff options
| -rw-r--r-- | tests/Makefile.am | 2 | ||||
| -rw-r--r-- | tests/pgps2kgnu.c | 108 |
2 files changed, 109 insertions, 1 deletions
diff --git a/tests/Makefile.am b/tests/Makefile.am index 3de120b686..f9eaf069ac 100644 --- a/tests/Makefile.am +++ b/tests/Makefile.am @@ -41,7 +41,7 @@ libutils_la_SOURCES = utils.h utils.c ctests = simple openssl gc set_pkcs12_cred certder mpi \ certificate_set_x509_crl dn parse_ca moredn crypto_rng mini \ - finished + pgps2kgnu finished openssl_LDADD = $(LDADD) ../libextra/libgnutls-openssl.la if HAVE_FORK diff --git a/tests/pgps2kgnu.c b/tests/pgps2kgnu.c new file mode 100644 index 0000000000..6c9315dfa9 --- /dev/null +++ b/tests/pgps2kgnu.c @@ -0,0 +1,108 @@ +/* + * Copyright (C) 2008 Free Software Foundation, Inc. + * + * Author: Daniel Kahn Gillmor <dkg@fifthhorseman.net> + + * pgps2kgnu: test GNU extensions to the OpenPGP S2K specification. + * at the moment, we just test the "GNU dummy" S2K + * extension. + + * + * This file is part of GNUTLS. + * + * GNUTLS 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 3 of the License, or + * (at your option) any later version. + * + * GNUTLS 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. + * + * You should have received a copy of the GNU General Public License + * along with GNUTLS; if not, write to the Free Software Foundation, + * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA + */ + +#if HAVE_CONFIG_H +# include <config.h> +#endif + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <gnutls/gnutls.h> +#include <gnutls/openpgp.h> + +static char dummy_key[] = + "-----BEGIN PGP PRIVATE KEY BLOCK-----\n" + "Version: GnuPG v1.4.9 (GNU/Linux)\n" + "\n" + "lQCVBEO3YdABBACRqqEnucag4+vyZny2M67Pai5+5suIRRvY+Ly8Ms5MvgCi3EVV\n" + "xT05O/+0ShiRaf+QicCOFrhbU9PZzzU+seEvkeW2UCu4dQfILkmj+HBEIltGnHr3\n" + "G0yegHj5pnqrcezERURf2e17gGFWX91cXB9Cm721FPXczuKraphKwCA9PwARAQAB\n" + "/gNlAkdOVQG0OURlbW9uc3RyYXRpb24gS2V5IGZvciBTMksgR05VIGV4dGVuc2lv\n" + "biAxMDAxIC0tIGdudS1kdW1teYi8BBMBAgAmBQJDt2HQAhsDBQkB4TOABgsJCAcD\n" + "AgQVAggDBBYCAwECHgECF4AACgkQQZUwSa4UDezTOQP/TMQXUVrWzHYZGopoPZ2+\n" + "ZS3qddiznBHsgb7MGYg1KlTiVJSroDUBCHIUJvdQKZV9zrzrFl47D07x6hGyUPHV\n" + "aZXvuITW8t1o5MMHkCy3pmJ2KgfDvdUxrBvLfgPMICA4c6zA0mWquee43syEW9NY\n" + "g3q61iPlQwD1J1kX1wlimLCdAdgEQ7dh0AEEANAwa63zlQbuy1Meliy8otwiOa+a\n" + "mH6pxxUgUNggjyjO5qx+rl25mMjvGIRX4/L1QwIBXJBVi3SgvJW1COZxZqBYqj9U\n" + "8HVT07mWKFEDf0rZLeUE2jTm16cF9fcW4DQhW+sfYm+hi2sY3HeMuwlUBK9KHfW2\n" + "+bGeDzVZ4pqfUEudABEBAAEAA/0bemib+wxub9IyVFUp7nPobjQC83qxLSNzrGI/\n" + "RHzgu/5CQi4tfLOnwbcQsLELfker2hYnjsLrT9PURqK4F7udrWEoZ1I1LymOtLG/\n" + "4tNZ7Mnul3wRC2tCn7FKx8sGJwGh/3li8vZ6ALVJAyOia5TZ/buX0+QZzt6+hPKk\n" + "7MU1WQIA4bUBjtrsqDwro94DvPj3/jBnMZbXr6WZIItLNeVDUcM8oHL807Am97K1\n" + "ueO/f6v1sGAHG6lVPTmtekqPSTWBfwIA7CGFvEyvSALfB8NUa6jtk27NCiw0csql\n" + "kuhCmwXGMVOiryKEfegkIahf2bAd/gnWHPrpWp7bUE20v8YoW22I4wIAhnm5Wr5Q\n" + "Sy7EHDUxmJm5TzadFp9gq08qNzHBpXSYXXJ3JuWcL1/awUqp3tE1I6zZ0hZ38Ia6\n" + "SdBMN88idnhDPqPoiKUEGAECAA8FAkO3YdACGyAFCQHhM4AACgkQQZUwSa4UDezm\n" + "vQP/ZhK+2ly9oI2z7ZcNC/BJRch0/ybQ3haahII8pXXmOThpZohr/LUgoWgCZdXg\n" + "vP6yiszNk2tIs8KphCAw7Lw/qzDC2hEORjWO4f46qk73RAgSqG/GyzI4ltWiDhqn\n" + "vnQCFl3+QFSe4zinqykHnLwGPMXv428d/ZjkIc2ju8dRsn4=\n" + "=CR5w\n" + "-----END PGP PRIVATE KEY BLOCK-----\n"; + +/* Test capability of reading the gnu-dummy OpenPGP S2K extension. + See: doc/DETAILS from gnupg + http://lists.gnu.org/archive/html/gnutls-devel/2008-08/msg00023.html +*/ + +int +main (void) +{ + int rc; + gnutls_datum_t keydatum = { (unsigned char*)dummy_key, strlen (dummy_key) }; + gnutls_openpgp_privkey_t key; + + rc = gnutls_global_init (); + if (rc) + { + printf ("gnutls_global_init rc %d: %s\n", rc, gnutls_strerror (rc)); + return 1; + } + + rc = gnutls_openpgp_privkey_init (&key); + if (rc) + { + printf ("gnutls_openpgp_privkey_init rc %d: %s\n", + rc, gnutls_strerror (rc)); + return 1; + } + + rc = gnutls_openpgp_privkey_import (key, &keydatum, + GNUTLS_OPENPGP_FMT_BASE64, NULL, 0); + if (rc) + { + printf ("gnutls_openpgp_privkey_import rc %d: %s\n", + rc, gnutls_strerror (rc)); + return 1; + } + + gnutls_openpgp_privkey_deinit (key); + + gnutls_global_deinit (); + + return 0; +} |