[BACK]Return to key.c CVS log [TXT][DIR] Up to [local] / src / usr.bin / ssh

Diff for /src/usr.bin/ssh/Attic/key.c between version 1.11 and 1.11.2.1

version 1.11, 2000/09/07 20:27:51 version 1.11.2.1, 2001/02/16 20:13:04
Line 31 
Line 31 
  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF   * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.   * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  */   */
   
 #include "includes.h"  #include "includes.h"
 #include "ssh.h"  RCSID("$OpenBSD$");
 #include <openssl/rsa.h>  
 #include <openssl/dsa.h>  
 #include <openssl/evp.h>  #include <openssl/evp.h>
   
 #include "xmalloc.h"  #include "xmalloc.h"
 #include "key.h"  #include "key.h"
 #include "dsa.h"  #include "rsa.h"
   #include "ssh-dss.h"
   #include "ssh-rsa.h"
 #include "uuencode.h"  #include "uuencode.h"
   #include "buffer.h"
   #include "bufaux.h"
   #include "log.h"
   
 RCSID("$OpenBSD$");  
   
 #define SSH_DSS "ssh-dss"  
   
 Key *  Key *
 key_new(int type)  key_new(int type)
 {  {
Line 57 
Line 57 
         k->dsa = NULL;          k->dsa = NULL;
         k->rsa = NULL;          k->rsa = NULL;
         switch (k->type) {          switch (k->type) {
           case KEY_RSA1:
         case KEY_RSA:          case KEY_RSA:
                 rsa = RSA_new();                  rsa = RSA_new();
                 rsa->n = BN_new();                  rsa->n = BN_new();
Line 71 
Line 72 
                 dsa->pub_key = BN_new();                  dsa->pub_key = BN_new();
                 k->dsa = dsa;                  k->dsa = dsa;
                 break;                  break;
         case KEY_EMPTY:          case KEY_UNSPEC:
                 break;                  break;
         default:          default:
                 fatal("key_new: bad key type %d", k->type);                  fatal("key_new: bad key type %d", k->type);
Line 79 
Line 80 
         }          }
         return k;          return k;
 }  }
   Key *
   key_new_private(int type)
   {
           Key *k = key_new(type);
           switch (k->type) {
           case KEY_RSA1:
           case KEY_RSA:
                   k->rsa->d = BN_new();
                   k->rsa->iqmp = BN_new();
                   k->rsa->q = BN_new();
                   k->rsa->p = BN_new();
                   k->rsa->dmq1 = BN_new();
                   k->rsa->dmp1 = BN_new();
                   break;
           case KEY_DSA:
                   k->dsa->priv_key = BN_new();
                   break;
           case KEY_UNSPEC:
                   break;
           default:
                   break;
           }
           return k;
   }
 void  void
 key_free(Key *k)  key_free(Key *k)
 {  {
         switch (k->type) {          switch (k->type) {
           case KEY_RSA1:
         case KEY_RSA:          case KEY_RSA:
                 if (k->rsa != NULL)                  if (k->rsa != NULL)
                         RSA_free(k->rsa);                          RSA_free(k->rsa);
Line 93 
Line 119 
                         DSA_free(k->dsa);                          DSA_free(k->dsa);
                 k->dsa = NULL;                  k->dsa = NULL;
                 break;                  break;
           case KEY_UNSPEC:
                   break;
         default:          default:
                 fatal("key_free: bad key type %d", k->type);                  fatal("key_free: bad key type %d", k->type);
                 break;                  break;
Line 105 
Line 133 
         if (a == NULL || b == NULL || a->type != b->type)          if (a == NULL || b == NULL || a->type != b->type)
                 return 0;                  return 0;
         switch (a->type) {          switch (a->type) {
           case KEY_RSA1:
         case KEY_RSA:          case KEY_RSA:
                 return a->rsa != NULL && b->rsa != NULL &&                  return a->rsa != NULL && b->rsa != NULL &&
                     BN_cmp(a->rsa->e, b->rsa->e) == 0 &&                      BN_cmp(a->rsa->e, b->rsa->e) == 0 &&
Line 132 
Line 161 
 key_fingerprint(Key *k)  key_fingerprint(Key *k)
 {  {
         static char retval[(EVP_MAX_MD_SIZE+1)*3];          static char retval[(EVP_MAX_MD_SIZE+1)*3];
         unsigned char *blob = NULL;          u_char *blob = NULL;
         int len = 0;          int len = 0;
         int nlen, elen;          int nlen, elen;
   
           retval[0] = '\0';
         switch (k->type) {          switch (k->type) {
         case KEY_RSA:          case KEY_RSA1:
                 nlen = BN_num_bytes(k->rsa->n);                  nlen = BN_num_bytes(k->rsa->n);
                 elen = BN_num_bytes(k->rsa->e);                  elen = BN_num_bytes(k->rsa->e);
                 len = nlen + elen;                  len = nlen + elen;
Line 146 
Line 176 
                 BN_bn2bin(k->rsa->e, blob + nlen);                  BN_bn2bin(k->rsa->e, blob + nlen);
                 break;                  break;
         case KEY_DSA:          case KEY_DSA:
                 dsa_make_key_blob(k, &blob, &len);          case KEY_RSA:
                   key_to_blob(k, &blob, &len);
                 break;                  break;
           case KEY_UNSPEC:
                   return retval;
                   break;
         default:          default:
                 fatal("key_fingerprint: bad key type %d", k->type);                  fatal("key_fingerprint: bad key type %d", k->type);
                 break;                  break;
         }          }
         retval[0] = '\0';  
   
         if (blob != NULL) {          if (blob != NULL) {
                 int i;                  int i;
                 unsigned char digest[EVP_MAX_MD_SIZE];                  u_char digest[EVP_MAX_MD_SIZE];
                 EVP_MD *md = EVP_md5();                  EVP_MD *md = EVP_md5();
                 EVP_MD_CTX ctx;                  EVP_MD_CTX ctx;
                 EVP_DigestInit(&ctx, md);                  EVP_DigestInit(&ctx, md);
Line 226 
Line 258 
                 return 0;                  return 0;
         }          }
         fprintf(f, " %s", buf);          fprintf(f, " %s", buf);
         free(buf);          xfree(buf);
         return 1;          return 1;
 }  }
 unsigned int  
   /* returns 1 ok, -1 error, 0 type mismatch */
   int
 key_read(Key *ret, char **cpp)  key_read(Key *ret, char **cpp)
 {  {
         Key *k;          Key *k;
         unsigned int bits = 0;          int success = -1;
         char *cp;          char *cp, *space;
         int len, n;          int len, n, type;
         unsigned char *blob;          u_int bits;
           u_char *blob;
   
         cp = *cpp;          cp = *cpp;
   
         switch(ret->type) {          switch(ret->type) {
         case KEY_RSA:          case KEY_RSA1:
                 /* Get number of bits. */                  /* Get number of bits. */
                 if (*cp < '0' || *cp > '9')                  if (*cp < '0' || *cp > '9')
                         return 0;       /* Bad bit count... */                          return -1;      /* Bad bit count... */
                 for (bits = 0; *cp >= '0' && *cp <= '9'; cp++)                  for (bits = 0; *cp >= '0' && *cp <= '9'; cp++)
                         bits = 10 * bits + *cp - '0';                          bits = 10 * bits + *cp - '0';
                 if (bits == 0)                  if (bits == 0)
                         return 0;                          return -1;
                 *cpp = cp;                  *cpp = cp;
                 /* Get public exponent, public modulus. */                  /* Get public exponent, public modulus. */
                 if (!read_bignum(cpp, ret->rsa->e))                  if (!read_bignum(cpp, ret->rsa->e))
                         return 0;                          return -1;
                 if (!read_bignum(cpp, ret->rsa->n))                  if (!read_bignum(cpp, ret->rsa->n))
                         return 0;                          return -1;
                   success = 1;
                 break;                  break;
           case KEY_UNSPEC:
           case KEY_RSA:
         case KEY_DSA:          case KEY_DSA:
                 if (strncmp(cp, SSH_DSS " ", 7) != 0)                  space = strchr(cp, ' ');
                   if (space == NULL) {
                           debug3("key_read: no space");
                           return -1;
                   }
                   *space = '\0';
                   type = key_type_from_name(cp);
                   *space = ' ';
                   if (type == KEY_UNSPEC) {
                           debug3("key_read: no key found");
                           return -1;
                   }
                   cp = space+1;
                   if (*cp == '\0') {
                           debug3("key_read: short string");
                           return -1;
                   }
                   if (ret->type == KEY_UNSPEC) {
                           ret->type = type;
                   } else if (ret->type != type) {
                           /* is a key, but different type */
                           debug3("key_read: type mismatch");
                         return 0;                          return 0;
                 cp += 7;                  }
                 len = 2*strlen(cp);                  len = 2*strlen(cp);
                 blob = xmalloc(len);                  blob = xmalloc(len);
                 n = uudecode(cp, blob, len);                  n = uudecode(cp, blob, len);
                 if (n < 0) {                  if (n < 0) {
                         error("key_read: uudecode %s failed", cp);                          error("key_read: uudecode %s failed", cp);
                         return 0;                          return -1;
                 }                  }
                 k = dsa_key_from_blob(blob, n);                  k = key_from_blob(blob, n);
                 if (k == NULL) {                  if (k == NULL) {
                         error("key_read: dsa_key_from_blob %s failed", cp);                          error("key_read: key_from_blob %s failed", cp);
                         return 0;                          return -1;
                 }                  }
                 xfree(blob);                  xfree(blob);
                 if (ret->dsa != NULL)                  if (k->type != type) {
                         DSA_free(ret->dsa);                          error("key_read: type mismatch: encoding error");
                 ret->dsa = k->dsa;                          key_free(k);
                 k->dsa = NULL;                          return -1;
                   }
   /*XXXX*/
                   if (ret->type == KEY_RSA) {
                           if (ret->rsa != NULL)
                                   RSA_free(ret->rsa);
                           ret->rsa = k->rsa;
                           k->rsa = NULL;
                           success = 1;
   #ifdef DEBUG_PK
                           RSA_print_fp(stderr, ret->rsa, 8);
   #endif
                   } else {
                           if (ret->dsa != NULL)
                                   DSA_free(ret->dsa);
                           ret->dsa = k->dsa;
                           k->dsa = NULL;
                           success = 1;
   #ifdef DEBUG_PK
                           DSA_print_fp(stderr, ret->dsa, 8);
   #endif
                   }
   /*XXXX*/
                   if (success != 1)
                           break;
                 key_free(k);                  key_free(k);
                 bits = BN_num_bits(ret->dsa->p);  
                 /* advance cp: skip whitespace and data */                  /* advance cp: skip whitespace and data */
                 while (*cp == ' ' || *cp == '\t')                  while (*cp == ' ' || *cp == '\t')
                         cp++;                          cp++;
Line 290 
Line 372 
                 fatal("key_read: bad key type: %d", ret->type);                  fatal("key_read: bad key type: %d", ret->type);
                 break;                  break;
         }          }
         return bits;          return success;
 }  }
 int  int
 key_write(Key *key, FILE *f)  key_write(Key *key, FILE *f)
 {  {
         int success = 0;          int success = 0;
         unsigned int bits = 0;          u_int bits = 0;
   
         if (key->type == KEY_RSA && key->rsa != NULL) {          if (key->type == KEY_RSA1 && key->rsa != NULL) {
                 /* size of modulus 'n' */                  /* size of modulus 'n' */
                 bits = BN_num_bits(key->rsa->n);                  bits = BN_num_bits(key->rsa->n);
                 fprintf(f, "%u", bits);                  fprintf(f, "%u", bits);
Line 308 
Line 390 
                 } else {                  } else {
                         error("key_write: failed for RSA key");                          error("key_write: failed for RSA key");
                 }                  }
         } else if (key->type == KEY_DSA && key->dsa != NULL) {          } else if ((key->type == KEY_DSA && key->dsa != NULL) ||
               (key->type == KEY_RSA && key->rsa != NULL)) {
                 int len, n;                  int len, n;
                 unsigned char *blob, *uu;                  u_char *blob, *uu;
                 dsa_make_key_blob(key, &blob, &len);                  key_to_blob(key, &blob, &len);
                 uu = xmalloc(2*len);                  uu = xmalloc(2*len);
                 n = uuencode(blob, len, uu, 2*len);                  n = uuencode(blob, len, uu, 2*len);
                 if (n > 0) {                  if (n > 0) {
                         fprintf(f, "%s %s", SSH_DSS, uu);                          fprintf(f, "%s %s", key_ssh_name(key), uu);
                         success = 1;                          success = 1;
                 }                  }
                 xfree(blob);                  xfree(blob);
Line 327 
Line 410 
 key_type(Key *k)  key_type(Key *k)
 {  {
         switch (k->type) {          switch (k->type) {
           case KEY_RSA1:
                   return "RSA1";
                   break;
         case KEY_RSA:          case KEY_RSA:
                 return "RSA";                  return "RSA";
                 break;                  break;
Line 336 
Line 422 
         }          }
         return "unknown";          return "unknown";
 }  }
 unsigned int  char *
   key_ssh_name(Key *k)
   {
           switch (k->type) {
           case KEY_RSA:
                   return "ssh-rsa";
                   break;
           case KEY_DSA:
                   return "ssh-dss";
                   break;
           }
           return "ssh-unknown";
   }
   u_int
 key_size(Key *k){  key_size(Key *k){
         switch (k->type) {          switch (k->type) {
           case KEY_RSA1:
         case KEY_RSA:          case KEY_RSA:
                 return BN_num_bits(k->rsa->n);                  return BN_num_bits(k->rsa->n);
                 break;                  break;
Line 347 
Line 447 
                 break;                  break;
         }          }
         return 0;          return 0;
   }
   
   RSA *
   rsa_generate_private_key(u_int bits)
   {
           RSA *private;
           private = RSA_generate_key(bits, 35, NULL, NULL);
           if (private == NULL)
                   fatal("rsa_generate_private_key: key generation failed.");
           return private;
   }
   
   DSA*
   dsa_generate_private_key(u_int bits)
   {
           DSA *private = DSA_generate_parameters(bits, NULL, 0, NULL, NULL, NULL, NULL);
           if (private == NULL)
                   fatal("dsa_generate_private_key: DSA_generate_parameters failed");
           if (!DSA_generate_key(private))
                   fatal("dsa_generate_private_key: DSA_generate_key failed.");
           if (private == NULL)
                   fatal("dsa_generate_private_key: NULL.");
           return private;
   }
   
   Key *
   key_generate(int type, u_int bits)
   {
           Key *k = key_new(KEY_UNSPEC);
           switch (type) {
           case KEY_DSA:
                   k->dsa = dsa_generate_private_key(bits);
                   break;
           case KEY_RSA:
           case KEY_RSA1:
                   k->rsa = rsa_generate_private_key(bits);
                   break;
           default:
                   fatal("key_generate: unknown type %d", type);
           }
           k->type = type;
           return k;
   }
   
   Key *
   key_from_private(Key *k)
   {
           Key *n = NULL;
           switch (k->type) {
           case KEY_DSA:
                   n = key_new(k->type);
                   BN_copy(n->dsa->p, k->dsa->p);
                   BN_copy(n->dsa->q, k->dsa->q);
                   BN_copy(n->dsa->g, k->dsa->g);
                   BN_copy(n->dsa->pub_key, k->dsa->pub_key);
                   break;
           case KEY_RSA:
           case KEY_RSA1:
                   n = key_new(k->type);
                   BN_copy(n->rsa->n, k->rsa->n);
                   BN_copy(n->rsa->e, k->rsa->e);
                   break;
           default:
                   fatal("key_from_private: unknown type %d", k->type);
                   break;
           }
           return n;
   }
   
   int
   key_type_from_name(char *name)
   {
           if (strcmp(name, "rsa1") == 0){
                   return KEY_RSA1;
           } else if (strcmp(name, "rsa") == 0){
                   return KEY_RSA;
           } else if (strcmp(name, "dsa") == 0){
                   return KEY_DSA;
           } else if (strcmp(name, "ssh-rsa") == 0){
                   return KEY_RSA;
           } else if (strcmp(name, "ssh-dss") == 0){
                   return KEY_DSA;
           }
           debug("key_type_from_name: unknown key type '%s'", name);
           return KEY_UNSPEC;
   }
   
   Key *
   key_from_blob(char *blob, int blen)
   {
           Buffer b;
           char *ktype;
           int rlen, type;
           Key *key = NULL;
   
   #ifdef DEBUG_PK
           dump_base64(stderr, blob, blen);
   #endif
           buffer_init(&b);
           buffer_append(&b, blob, blen);
           ktype = buffer_get_string(&b, NULL);
           type = key_type_from_name(ktype);
   
           switch(type){
           case KEY_RSA:
                   key = key_new(type);
                   buffer_get_bignum2(&b, key->rsa->e);
                   buffer_get_bignum2(&b, key->rsa->n);
   #ifdef DEBUG_PK
                   RSA_print_fp(stderr, key->rsa, 8);
   #endif
                   break;
           case KEY_DSA:
                   key = key_new(type);
                   buffer_get_bignum2(&b, key->dsa->p);
                   buffer_get_bignum2(&b, key->dsa->q);
                   buffer_get_bignum2(&b, key->dsa->g);
                   buffer_get_bignum2(&b, key->dsa->pub_key);
   #ifdef DEBUG_PK
                   DSA_print_fp(stderr, key->dsa, 8);
   #endif
                   break;
           case KEY_UNSPEC:
                   key = key_new(type);
                   break;
           default:
                   error("key_from_blob: cannot handle type %s", ktype);
                   break;
           }
           rlen = buffer_len(&b);
           if (key != NULL && rlen != 0)
                   error("key_from_blob: remaining bytes in key blob %d", rlen);
           xfree(ktype);
           buffer_free(&b);
           return key;
   }
   
   int
   key_to_blob(Key *key, u_char **blobp, u_int *lenp)
   {
           Buffer b;
           int len;
           u_char *buf;
   
           if (key == NULL) {
                   error("key_to_blob: key == NULL");
                   return 0;
           }
           buffer_init(&b);
           switch(key->type){
           case KEY_DSA:
                   buffer_put_cstring(&b, key_ssh_name(key));
                   buffer_put_bignum2(&b, key->dsa->p);
                   buffer_put_bignum2(&b, key->dsa->q);
                   buffer_put_bignum2(&b, key->dsa->g);
                   buffer_put_bignum2(&b, key->dsa->pub_key);
                   break;
           case KEY_RSA:
                   buffer_put_cstring(&b, key_ssh_name(key));
                   buffer_put_bignum2(&b, key->rsa->e);
                   buffer_put_bignum2(&b, key->rsa->n);
                   break;
           default:
                   error("key_to_blob: illegal key type %d", key->type);
                   break;
           }
           len = buffer_len(&b);
           buf = xmalloc(len);
           memcpy(buf, buffer_ptr(&b), len);
           memset(buffer_ptr(&b), 0, len);
           buffer_free(&b);
           if (lenp != NULL)
                   *lenp = len;
           if (blobp != NULL)
                   *blobp = buf;
           return len;
   }
   
   int
   key_sign(
       Key *key,
       u_char **sigp, int *lenp,
       u_char *data, int datalen)
   {
           switch(key->type){
           case KEY_DSA:
                   return ssh_dss_sign(key, sigp, lenp, data, datalen);
                   break;
           case KEY_RSA:
                   return ssh_rsa_sign(key, sigp, lenp, data, datalen);
                   break;
           default:
                   error("key_sign: illegal key type %d", key->type);
                   return -1;
                   break;
           }
   }
   
   int
   key_verify(
       Key *key,
       u_char *signature, int signaturelen,
       u_char *data, int datalen)
   {
           switch(key->type){
           case KEY_DSA:
                   return ssh_dss_verify(key, signature, signaturelen, data, datalen);
                   break;
           case KEY_RSA:
                   return ssh_rsa_verify(key, signature, signaturelen, data, datalen);
                   break;
           default:
                   error("key_verify: illegal key type %d", key->type);
                   return -1;
                   break;
           }
 }  }
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.11.2.1