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

Annotation of src/usr.bin/ssh/rsa.c, Revision 1.29

1.29    ! markus      1: /* $OpenBSD: rsa.c,v 1.28 2006/08/03 03:34:42 deraadt Exp $ */
1.1       provos      2: /*
1.10      deraadt     3:  * Author: Tatu Ylonen <ylo@cs.hut.fi>
                      4:  * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
                      5:  *                    All rights reserved
1.14      markus      6:  *
1.16      deraadt     7:  * As far as I am concerned, the code I have written for this software
                      8:  * can be used freely for any purpose.  Any derived versions of this
                      9:  * software must be clearly marked as such, and if the derived work is
                     10:  * incompatible with the protocol description in the RFC file, it must be
                     11:  * called by a name other than "ssh" or "Secure Shell".
1.21      stevesk    12:  *
1.16      deraadt    13:  *
                     14:  * Copyright (c) 1999 Niels Provos.  All rights reserved.
                     15:  *
                     16:  * Redistribution and use in source and binary forms, with or without
                     17:  * modification, are permitted provided that the following conditions
                     18:  * are met:
                     19:  * 1. Redistributions of source code must retain the above copyright
                     20:  *    notice, this list of conditions and the following disclaimer.
                     21:  * 2. Redistributions in binary form must reproduce the above copyright
                     22:  *    notice, this list of conditions and the following disclaimer in the
                     23:  *    documentation and/or other materials provided with the distribution.
                     24:  *
                     25:  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
                     26:  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
                     27:  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
                     28:  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
                     29:  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
                     30:  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
                     31:  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
                     32:  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
                     33:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
                     34:  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
1.14      markus     35:  *
1.16      deraadt    36:  *
                     37:  * Description of the RSA algorithm can be found e.g. from the following
                     38:  * sources:
1.14      markus     39:  *
1.10      deraadt    40:  *   Bruce Schneier: Applied Cryptography.  John Wiley & Sons, 1994.
1.14      markus     41:  *
1.10      deraadt    42:  *   Jennifer Seberry and Josed Pieprzyk: Cryptography: An Introduction to
                     43:  *   Computer Security.  Prentice-Hall, 1989.
1.14      markus     44:  *
1.10      deraadt    45:  *   Man Young Rhee: Cryptography and Secure Data Communications.  McGraw-Hill,
                     46:  *   1994.
1.14      markus     47:  *
1.10      deraadt    48:  *   R. Rivest, A. Shamir, and L. M. Adleman: Cryptographic Communications
                     49:  *   System and Method.  US Patent 4,405,829, 1983.
1.14      markus     50:  *
1.10      deraadt    51:  *   Hans Riesel: Prime Numbers and Computer Methods for Factorization.
                     52:  *   Birkhauser, 1994.
1.14      markus     53:  *
1.16      deraadt    54:  *   The RSA Frequently Asked Questions document by RSA Data Security,
                     55:  *   Inc., 1995.
1.14      markus     56:  *
1.16      deraadt    57:  *   RSA in 3 lines of perl by Adam Back <aba@atlax.ex.ac.uk>, 1995, as
                     58:  * included below:
1.14      markus     59:  *
1.10      deraadt    60:  *     [gone - had to be deleted - what a pity]
1.16      deraadt    61:  */
1.1       provos     62:
1.28      deraadt    63: #include <sys/types.h>
1.27      stevesk    64:
                     65: #include <string.h>
1.1       provos     66:
1.28      deraadt    67: #include "xmalloc.h"
1.1       provos     68: #include "rsa.h"
1.19      markus     69: #include "log.h"
1.1       provos     70:
                     71: void
1.9       markus     72: rsa_public_encrypt(BIGNUM *out, BIGNUM *in, RSA *key)
1.1       provos     73: {
1.18      markus     74:        u_char *inbuf, *outbuf;
1.9       markus     75:        int len, ilen, olen;
1.4       provos     76:
1.9       markus     77:        if (BN_num_bits(key->e) < 2 || !BN_is_odd(key->e))
                     78:                fatal("rsa_public_encrypt() exponent too small or not odd");
1.1       provos     79:
1.9       markus     80:        olen = BN_num_bytes(key->n);
                     81:        outbuf = xmalloc(olen);
1.1       provos     82:
1.9       markus     83:        ilen = BN_num_bytes(in);
                     84:        inbuf = xmalloc(ilen);
                     85:        BN_bn2bin(in, inbuf);
1.1       provos     86:
1.9       markus     87:        if ((len = RSA_public_encrypt(ilen, inbuf, outbuf, key,
1.12      markus     88:            RSA_PKCS1_PADDING)) <= 0)
1.9       markus     89:                fatal("rsa_public_encrypt() failed");
1.1       provos     90:
1.29    ! markus     91:        if (BN_bin2bn(outbuf, len, out) == NULL)
        !            92:                fatal("rsa_public_encrypt: BN_bin2bn failed");
1.1       provos     93:
1.9       markus     94:        memset(outbuf, 0, olen);
                     95:        memset(inbuf, 0, ilen);
                     96:        xfree(outbuf);
                     97:        xfree(inbuf);
1.1       provos     98: }
                     99:
1.20      markus    100: int
1.1       provos    101: rsa_private_decrypt(BIGNUM *out, BIGNUM *in, RSA *key)
                    102: {
1.18      markus    103:        u_char *inbuf, *outbuf;
1.9       markus    104:        int len, ilen, olen;
1.1       provos    105:
1.9       markus    106:        olen = BN_num_bytes(key->n);
                    107:        outbuf = xmalloc(olen);
1.1       provos    108:
1.9       markus    109:        ilen = BN_num_bytes(in);
                    110:        inbuf = xmalloc(ilen);
                    111:        BN_bn2bin(in, inbuf);
                    112:
                    113:        if ((len = RSA_private_decrypt(ilen, inbuf, outbuf, key,
1.20      markus    114:            RSA_PKCS1_PADDING)) <= 0) {
                    115:                error("rsa_private_decrypt() failed");
                    116:        } else {
1.29    ! markus    117:                if (BN_bin2bn(outbuf, len, out) == NULL)
        !           118:                        fatal("rsa_private_decrypt: BN_bin2bn failed");
1.20      markus    119:        }
1.9       markus    120:        memset(outbuf, 0, olen);
                    121:        memset(inbuf, 0, ilen);
                    122:        xfree(outbuf);
                    123:        xfree(inbuf);
1.20      markus    124:        return len;
1.1       provos    125: }
1.22      markus    126:
1.24      markus    127: /* calculate p-1 and q-1 */
1.22      markus    128: void
1.23      markus    129: rsa_generate_additional_parameters(RSA *rsa)
1.22      markus    130: {
                    131:        BIGNUM *aux;
                    132:        BN_CTX *ctx;
1.24      markus    133:
                    134:        if ((aux = BN_new()) == NULL)
                    135:                fatal("rsa_generate_additional_parameters: BN_new failed");
                    136:        if ((ctx = BN_CTX_new()) == NULL)
                    137:                fatal("rsa_generate_additional_parameters: BN_CTX_new failed");
1.22      markus    138:
1.29    ! markus    139:        if ((BN_sub(aux, rsa->q, BN_value_one()) == 0) ||
        !           140:            (BN_mod(rsa->dmq1, rsa->d, aux, ctx) == 0) ||
        !           141:            (BN_sub(aux, rsa->p, BN_value_one()) == 0) ||
        !           142:            (BN_mod(rsa->dmp1, rsa->d, aux, ctx) == 0))
        !           143:                fatal("rsa_generate_additional_parameters: BN_sub/mod failed");
1.22      markus    144:
                    145:        BN_clear_free(aux);
                    146:        BN_CTX_free(ctx);
                    147: }
                    148: