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       make_keys++;
 131       continue;
 132     }
 133     if (htons (enc->len) != fwrite (enc, 1, htons (enc->len), f))
 134       {
 135         fprintf (stderr,
 136                  _("\nFailed to write to `%s': %s\n"),
 137                  fn,
 138                  STRERROR (errno));
 139         GNUNET_CRYPTO_rsa_key_free (pk);
 140         GNUNET_free (enc);
 141         break;
 142       }
 143     GNUNET_CRYPTO_rsa_key_free (pk);
 144     GNUNET_free (enc);
 145   }
 146   if (0 == make_keys)
 147     fprintf (stderr,
 148              _("Finished!\n"));
 149   fclose (f);
 150 }
 151
 152
 153 /**
 154  * Main function that will be run by the scheduler.
 155  *
 156  * @param cls closure
 157  * @param args remaining command-line arguments
 158  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
 159  * @param cfg configuration
 160  */
 161 static void
 162 run (void *cls, char *const *args, const char *cfgfile,
 163      const struct GNUNET_CONFIGURATION_Handle *cfg)
 164 {
 165   struct GNUNET_CRYPTO_RsaPrivateKey *pk;
 166   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
 167   struct GNUNET_PeerIdentity pid;
 168
 169   if (NULL == args[0])
 170   {
 171     fprintf (stderr, _("No hostkey file specified on command line\n"));
 172     return;
 173   }
 174   if (0 != weak_random)
 175     GNUNET_CRYPTO_random_disable_entropy_gathering ();
 176   if (make_keys > 0)
 177   {
 178     create_keys (args[0]);
 179     return;
 180   }
 181   pk = GNUNET_CRYPTO_rsa_key_create_from_file (args[0]);
 182   if (NULL == pk)
 183     return;
 184   if (print_public_key)
 185   {
 186     char *s;
 187
 188     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 189     s = GNUNET_CRYPTO_rsa_public_key_to_string (&pub);
 190     fprintf (stdout, "%s\n", s);
 191     GNUNET_free (s);
 192   }
 193   if (print_peer_identity)
 194   {
 195     struct GNUNET_CRYPTO_HashAsciiEncoded enc;
 196
 197     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 198     GNUNET_CRYPTO_hash (&pub, sizeof (pub), &pid.hashPubKey);
 199     GNUNET_CRYPTO_hash_to_enc (&pid.hashPubKey, &enc);
 200     fprintf (stdout, "%s\n", enc.encoding);
 201   }
 202   if (print_short_identity)
 203   {
 204     struct GNUNET_CRYPTO_ShortHashAsciiEncoded enc;
 205     struct GNUNET_CRYPTO_ShortHashCode sh;
 206
 207     GNUNET_CRYPTO_rsa_key_get_public (pk, &pub);
 208     GNUNET_CRYPTO_short_hash (&pub, sizeof (pub), &sh);
 209     GNUNET_CRYPTO_short_hash_to_enc (&sh, &enc);
 210     fprintf (stdout, "%s\n", enc.short_encoding);
 211   }
 212   GNUNET_CRYPTO_rsa_key_free (pk);
 213 }
 214
 215
 216 /**
 217  * Program to manipulate RSA key files.
 218  *
 219  * @param argc number of arguments from the command line
 220  * @param argv command line arguments
 221  * @return 0 ok, 1 on error
 222  */
 223 int
 224 main (int argc, char *const *argv)
 225 {
 226   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
 227     { 'g', "generate-keys", "COUNT",
 228       gettext_noop ("create COUNT public-private key pairs (for testing)"),
 229       1, &GNUNET_GETOPT_set_uint, &make_keys },
 230     { 'p', "print-public-key", NULL,
 231       gettext_noop ("print the public key in ASCII format"),
 232       0, &GNUNET_GETOPT_set_one, &print_public_key },
 233     { 'P', "print-peer-identity", NULL,
 234       gettext_noop ("print the hash of the public key in ASCII format"),
 235       0, &GNUNET_GETOPT_set_one, &print_peer_identity },
 236     { 's', "print-short-identity", NULL,
 237       gettext_noop ("print the short hash of the public key in ASCII format"),
 238       0, &GNUNET_GETOPT_set_one, &print_short_identity },
 239     { 'w', "weak-random", NULL,
 240       gettext_noop ("use insecure, weak random number generator for key generation (for testing only)"),
 241       0, &GNUNET_GETOPT_set_one, &weak_random },
 242     GNUNET_GETOPT_OPTION_END
 243   };
 244
 245   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
 246     return 2;
 247
 248   return (GNUNET_OK ==
 249           GNUNET_PROGRAM_run (argc, argv, "gnunet-rsa [OPTIONS] keyfile",
 250                               gettext_noop ("Manipulate GNUnet private RSA key files"),
 251                               options, &run, NULL)) ? 0 : 1;
 252 }
 253
 254 /* end of gnunet-rsa.c */