src/util/gnunet-rsa.c

   1 /*
   2      This file is part of GNUnet.
   3      (C) 2012 Christian Grothoff (and other contributing authors)
   4
   5      GNUnet is free software; you can redistribute it and/or modify
   6      it under the terms of the GNU General Public License as published
   7      by the Free Software Foundation; either version 3, or (at your
   8      option) any later version.
   9
  10      GNUnet is distributed in the hope that it will be useful, but
  11      WITHOUT ANY WARRANTY; without even the implied warranty of
  12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13      General Public License for more details.
  14
  15      You should have received a copy of the GNU General Public License
  16      along with GNUnet; see the file COPYING.  If not, write to the
  17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  18      Boston, MA 02111-1307, USA.
  19 */
  20
  21 /**
  22  * @file util/gnunet-rsa.c
  23  * @brief tool to manipulate RSA key files
  24  * @author Christian Grothoff
  25  */
  26 #include "platform.h"
  27 #include "gnunet_util_lib.h"
  28 #include "gnunet_testing_lib-new.h"
  29 #include <gcrypt.h>
  30
  31
  32 /**
  33  * Flag for printing public key.
  34  */
  35 static int print_public_key;
  36
  37 /**
  38  * Flag for printing hash of public key.
  39  */
  40 static int print_peer_identity;
  41
  42 /**
  43  * Flag for printing short hash of public key.
  44  */
  45 static int print_short_identity;
  46
  47 /**
  48  * Use weak random number generator for key generation.
  49  */
  50 static int weak_random;
  51
  52 /**
  53  * Option set to create a bunch of keys at once.
  54  */
  55 static unsigned int make_keys;
  56
  57 /**
  58  * The private information of an RSA key pair.
  59  * NOTE: this must match the definition in crypto_ksk.c and crypto_rsa.c!
  60  */
  61 struct GNUNET_CRYPTO_RsaPrivateKey
  62 {
  63   gcry_sexp_t sexp;
  64 };
  65
  66
  67 /**
  68  * Create a new private key. Caller must free return value.
  69  *
  70  * @return fresh private key
  71  */
  72 static struct GNUNET_CRYPTO_RsaPrivateKey *
  73 rsa_key_create ()
  74 {
  75   struct GNUNET_CRYPTO_RsaPrivateKey *ret;
  76   gcry_sexp_t s_key;
  77   gcry_sexp_t s_keyparam;
  78
  79   GNUNET_assert (0 ==
  80                  gcry_sexp_build (&s_keyparam, NULL,
  81                                   "(genkey(rsa(nbits %d)(rsa-use-e 3:257)))",
  82                                   2048));
  83   GNUNET_assert (0 == gcry_pk_genkey (&s_key, s_keyparam));
  84   gcry_sexp_release (s_keyparam);
  85 #if EXTRA_CHECKS
  86   GNUNET_assert (0 == gcry_pk_testkey (s_key));
  87 #endif
  88   ret = GNUNET_malloc (sizeof (struct GNUNET_CRYPTO_RsaPrivateKey));
  89   ret->sexp = s_key;
  90   return ret;
  91 }
  92
  93
  94 /**
  95  * Create a flat file with a large number of key pairs for testing.
  96  */
  97 static void
  98 create_keys (const char *fn)
  99 {
 100   FILE *f;
 101   struct GNUNET_CRYPTO_RsaPrivateKey *pk;
 102   struct GNUNET_CRYPTO_RsaPrivateKeyBinaryEncoded *enc;
 103
 104   if (NULL == (f = fopen (fn, "w+")))
 105     {
 106       fprintf (stderr,
 107                _("Failed to open `%s': %s\n"),
 108                fn,
 109                STRERROR (errno));
 110       return;
 111     }
 112   fprintf (stderr,
 113            _("Generating %u keys, please wait"),
 114            make_keys);
 115   while (0 < make_keys--)
 116   {
 117     fprintf (stderr,
 118              ".");
 119     if (NULL == (pk = rsa_key_create ()))
 120     {
 121        GNUNET_break (0);
 122        break;
 123     }
 124     enc = GNUNET_CRYPTO_rsa_encode_key (pk);
 125     if (GNUNET_TESTING_HOSTKEYFILESIZE != htons (enc->len))
 126     {
 127       /* sometimes we get a different key length because 'd' or 'u' start
 128          with leading bits; skip those... */
 129       GNUNET_CRYPTO_rsa_key_free (pk);
 130       GNUNET_free (enc);
 131       make_keys++;
 132       continue;
 133     }
 134     if (htons (enc->len) != fwrite (enc, 1, htons (enc->len), f))
 135       {
 136         fprintf (stderr,
 137                  _("\nFailed to write to `%s': %s\n"),
 138                  fn,
 139                  STRERROR (errno));
 140         GNUNET_CRYPTO_rsa_key_free (pk);
 141         GNUNET_free (enc);
 142         break;
 143       }
 144     GNUNET_CRYPTO_rsa_key_free (pk);
 145     GNUNET_free (enc);
 146   }
 147   if (0 == make_keys)
 148     fprintf (stderr,
 149              _("Finished!\n"));
 150   fclose (f);
 151 }
 152
 153
 154 /**
 155  * Main function that will be run by the scheduler.
 156  *
 157  * @param cls closure
 158  * @param args remaining command-line arguments
 159  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
 160  * @param cfg configuration
 161  */
 162 static void
 163 run (void *cls, char *const *args, const char *cfgfile,
 164      const struct GNUNET_CONFIGURATION_Handle *cfg)
 165 {
 166   struct GNUNET_CRYPTO_RsaPrivateKey *pk;
 167   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
 168   struct GNUNET_PeerIdentity pid;
 169
 170   if (NULL == args[0])
 171   {
 172     fprintf (stderr, _("No hostkey file specified on command line\n"));
 173     return;
 174   }
 175   if (0 != weak_random)
 176     GNUNET_CRYPTO_random_disable_entropy_gathering ();
 177   if (make_keys > 0)
 178   {
 179     create_keys (args[0]);
 180     return;
 181   }
 182   pk = GNUNET_CRYPTO_rsa_key_create_from_file (args[0]);
 183   if (NULL == pk)
 184     return;
 185   if (print_public_key)
 186   {
 187     char *s;
 188
 189     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 190     s = GNUNET_CRYPTO_rsa_public_key_to_string (&pub);
 191     fprintf (stdout, "%s\n", s);
 192     GNUNET_free (s);
 193   }
 194   if (print_peer_identity)
 195   {
 196     struct GNUNET_CRYPTO_HashAsciiEncoded enc;
 197
 198     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 199     GNUNET_CRYPTO_hash (&pub, sizeof (pub), &pid.hashPubKey);
 200     GNUNET_CRYPTO_hash_to_enc (&pid.hashPubKey, &enc);
 201     fprintf (stdout, "%s\n", enc.encoding);
 202   }
 203   if (print_short_identity)
 204   {
 205     struct GNUNET_CRYPTO_ShortHashAsciiEncoded enc;
 206     struct GNUNET_CRYPTO_ShortHashCode sh;
 207
 208     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 209     GNUNET_CRYPTO_short_hash (&pub, sizeof (pub), &sh);
 210     GNUNET_CRYPTO_short_hash_to_enc (&sh, &enc);
 211     fprintf (stdout, "%s\n", enc.short_encoding);
 212   }
 213   GNUNET_CRYPTO_rsa_key_free (pk);
 214 }
 215
 216
 217 /**
 218  * Program to manipulate RSA key files.
 219  *
 220  * @param argc number of arguments from the command line
 221  * @param argv command line arguments
 222  * @return 0 ok, 1 on error
 223  */
 224 int
 225 main (int argc, char *const *argv)
 226 {
 227   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
 228     { 'g', "generate-keys", "COUNT",
 229       gettext_noop ("create COUNT public-private key pairs (for testing)"),
 230       1, &GNUNET_GETOPT_set_uint, &make_keys },
 231     { 'p', "print-public-key", NULL,
 232       gettext_noop ("print the public key in ASCII format"),
 233       0, &GNUNET_GETOPT_set_one, &print_public_key },
 234     { 'P', "print-peer-identity", NULL,
 235       gettext_noop ("print the hash of the public key in ASCII format"),
 236       0, &GNUNET_GETOPT_set_one, &print_peer_identity },
 237     { 's', "print-short-identity", NULL,
 238       gettext_noop ("print the short hash of the public key in ASCII format"),
 239       0, &GNUNET_GETOPT_set_one, &print_short_identity },
 240     { 'w', "weak-random", NULL,
 241       gettext_noop ("use insecure, weak random number generator for key generation (for testing only)"),
 242       0, &GNUNET_GETOPT_set_one, &weak_random },
 243     GNUNET_GETOPT_OPTION_END
 244   };
 245
 246   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
 247     return 2;
 248
 249   return (GNUNET_OK ==
 250           GNUNET_PROGRAM_run (argc, argv, "gnunet-rsa [OPTIONS] keyfile",
 251                               gettext_noop ("Manipulate GNUnet private RSA key files"),
 252                               options, &run, NULL)) ? 0 : 1;
 253 }
 254
 255 /* end of gnunet-rsa.c */