← Back to branch summary

~ubuntu-branches/ubuntu/precise/dropbear/precise

« back to all changes in this revision

Viewing changes to libtomcrypt/src/pk/katja/katja_export.c

  • Committer: Bazaar Package Importer
  • Author(s): Gerrit Pape
  • Date: 2007-03-02 20:48:18 UTC
  • mfrom: (1.3.2 upstream)
  • Revision ID: james.westby@ubuntu.com-20070302204818-ozmbou2sbyj7dus5
Tags: 0.49-1
http://bugs.debian.org/412899
http://bugs.debian.org/394996
http://bugs.debian.org/405686
* new upstream release, fixes
  * CVE-2007-1099: dropbear dbclient insufficient warning on hostkey
    mismatch (closes: #412899).
  * dbclient uses static "Password:" prompt instead of using the server's
    prompt (closes: #394996).
* debian/control: Suggests: openssh-client, not ssh (closes: #405686);
  Standards-Version: 3.7.2.2.
* debian/README.Debian: ssh -> openssh-server, openssh-client; remove
  'Replacing OpenSSH "sshd" with Dropbear' part, this is simply done by not
  installing the openssh-server package.
* debian/README.runit: runsvstat -> sv status.

Show diffs side-by-side

added added

removed removed

Lines of Context:
libtomcrypt/src/pk/katja/katja_export.c
 
1
/* LibTomCrypt, modular cryptographic library -- Tom St Denis
 
2
 *
 
3
 * LibTomCrypt is a library that provides various cryptographic
 
4
 * algorithms in a highly modular and flexible manner.
 
5
 *
 
6
 * The library is free for all purposes without any express
 
7
 * guarantee it works.
 
8
 *
 
9
 * Tom St Denis, tomstdenis@gmail.com, http://libtomcrypt.com
 
10
 */
 
11
#include "tomcrypt.h"
 
12
 
 
13
/**
 
14
  @file katja_export.c
 
15
  Export Katja PKCS-style keys, Tom St Denis
 
16
*/  
 
17
 
 
18
#ifdef MKAT
 
19
 
 
20
/**
 
21
    This will export either an KatjaPublicKey or KatjaPrivateKey
 
22
    @param out       [out] Destination of the packet
 
23
    @param outlen    [in/out] The max size and resulting size of the packet
 
24
    @param type      The type of exported key (PK_PRIVATE or PK_PUBLIC)
 
25
    @param key       The Katja key to export
 
26
    @return CRYPT_OK if successful
 
27
*/    
 
28
int katja_export(unsigned char *out, unsigned long *outlen, int type, katja_key *key)
 
29
{
 
30
   int           err;
 
31
   unsigned long zero=0;
 
32
 
 
33
   LTC_ARGCHK(out    != NULL);
 
34
   LTC_ARGCHK(outlen != NULL);
 
35
   LTC_ARGCHK(key    != NULL);
 
36
 
 
37
   /* type valid? */
 
38
   if (!(key->type == PK_PRIVATE) && (type == PK_PRIVATE)) {
 
39
      return CRYPT_PK_INVALID_TYPE;
 
40
   }
 
41
 
 
42
   if (type == PK_PRIVATE) {
 
43
      /* private key */
 
44
      /* output is 
 
45
            Version, n, d, p, q, d mod (p-1), d mod (q - 1), 1/q mod p, pq
 
46
       */
 
47
      if ((err = der_encode_sequence_multi(out, outlen, 
 
48
                          LTC_ASN1_SHORT_INTEGER, 1UL, &zero, 
 
49
                          LTC_ASN1_INTEGER, 1UL,  key->N, 
 
50
                          LTC_ASN1_INTEGER, 1UL,  key->d, 
 
51
                          LTC_ASN1_INTEGER, 1UL,  key->p, 
 
52
                          LTC_ASN1_INTEGER, 1UL,  key->q, 
 
53
                          LTC_ASN1_INTEGER, 1UL,  key->dP,
 
54
                          LTC_ASN1_INTEGER, 1UL,  key->dQ, 
 
55
                          LTC_ASN1_INTEGER, 1UL,  key->qP, 
 
56
                          LTC_ASN1_INTEGER, 1UL,  key->pq, 
 
57
                          LTC_ASN1_EOL,     0UL, NULL)) != CRYPT_OK) {
 
58
         return err;
 
59
      }
 
60
 
 
61
      /* clear zero and return */
 
62
      return CRYPT_OK;
 
63
   } else {
 
64
      /* public key */
 
65
      return der_encode_sequence_multi(out, outlen, 
 
66
                                 LTC_ASN1_INTEGER, 1UL, key->N, 
 
67
                                 LTC_ASN1_EOL,     0UL, NULL);
 
68
   }
 
69
}
 
70
 
 
71
#endif /* MRSA */
 
72
 
 
73
/* $Source: /cvs/libtom/libtomcrypt/src/pk/katja/katja_export.c,v $ */
 
74
/* $Revision: 1.2 $ */
 
75
/* $Date: 2006/03/31 14:15:35 $ */