blob: 507b73c9c5496cb14d806ddc66530d51afabb4d0 [file] [log] [blame]
Damien Millerd4a8b7e1999-10-27 13:42:43 +10001/*
Damien Miller95def091999-11-25 00:26:21 +11002 * Author: Tatu Ylonen <ylo@cs.hut.fi>
Damien Miller95def091999-11-25 00:26:21 +11003 * Copyright (c) 1995 Tatu Ylonen <ylo@cs.hut.fi>, Espoo, Finland
4 * All rights reserved
Damien Miller4af51302000-04-16 11:18:38 +10005 *
Damien Millere4340be2000-09-16 13:29:08 +11006 * As far as I am concerned, the code I have written for this software
7 * can be used freely for any purpose. Any derived versions of this
8 * software must be clearly marked as such, and if the derived work is
9 * incompatible with the protocol description in the RFC file, it must be
10 * called by a name other than "ssh" or "Secure Shell".
Kevin Stevesef4eea92001-02-05 12:42:17 +000011 *
Damien Miller4af51302000-04-16 11:18:38 +100012 *
Damien Millere4340be2000-09-16 13:29:08 +110013 * Copyright (c) 1999 Niels Provos. All rights reserved.
14 *
15 * Redistribution and use in source and binary forms, with or without
16 * modification, are permitted provided that the following conditions
17 * are met:
18 * 1. Redistributions of source code must retain the above copyright
19 * notice, this list of conditions and the following disclaimer.
20 * 2. Redistributions in binary form must reproduce the above copyright
21 * notice, this list of conditions and the following disclaimer in the
22 * documentation and/or other materials provided with the distribution.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
25 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
26 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
27 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
28 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
29 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
30 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
31 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
32 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
33 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
34 *
35 *
36 * Description of the RSA algorithm can be found e.g. from the following
37 * sources:
Damien Miller4af51302000-04-16 11:18:38 +100038 *
Damien Miller95def091999-11-25 00:26:21 +110039 * Bruce Schneier: Applied Cryptography. John Wiley & Sons, 1994.
Damien Miller4af51302000-04-16 11:18:38 +100040 *
Damien Miller95def091999-11-25 00:26:21 +110041 * Jennifer Seberry and Josed Pieprzyk: Cryptography: An Introduction to
42 * Computer Security. Prentice-Hall, 1989.
Damien Miller4af51302000-04-16 11:18:38 +100043 *
Damien Miller95def091999-11-25 00:26:21 +110044 * Man Young Rhee: Cryptography and Secure Data Communications. McGraw-Hill,
45 * 1994.
Damien Miller4af51302000-04-16 11:18:38 +100046 *
Damien Miller95def091999-11-25 00:26:21 +110047 * R. Rivest, A. Shamir, and L. M. Adleman: Cryptographic Communications
48 * System and Method. US Patent 4,405,829, 1983.
Damien Miller4af51302000-04-16 11:18:38 +100049 *
Damien Miller95def091999-11-25 00:26:21 +110050 * Hans Riesel: Prime Numbers and Computer Methods for Factorization.
51 * Birkhauser, 1994.
Damien Miller4af51302000-04-16 11:18:38 +100052 *
Damien Millere4340be2000-09-16 13:29:08 +110053 * The RSA Frequently Asked Questions document by RSA Data Security,
54 * Inc., 1995.
Damien Miller4af51302000-04-16 11:18:38 +100055 *
Damien Millere4340be2000-09-16 13:29:08 +110056 * RSA in 3 lines of perl by Adam Back <aba@atlax.ex.ac.uk>, 1995, as
57 * included below:
Damien Miller4af51302000-04-16 11:18:38 +100058 *
Damien Miller95def091999-11-25 00:26:21 +110059 * [gone - had to be deleted - what a pity]
Damien Millere4340be2000-09-16 13:29:08 +110060 */
Damien Millerd4a8b7e1999-10-27 13:42:43 +100061
62#include "includes.h"
Damien Millerd4a8b7e1999-10-27 13:42:43 +100063
64#include "rsa.h"
Ben Lindstrom226cfa02001-01-22 05:34:40 +000065#include "log.h"
Damien Millerd4a8b7e1999-10-27 13:42:43 +100066#include "xmalloc.h"
67
Damien Millerd4a8b7e1999-10-27 13:42:43 +100068void
Damien Miller95def091999-11-25 00:26:21 +110069rsa_public_encrypt(BIGNUM *out, BIGNUM *in, RSA *key)
Damien Millerd4a8b7e1999-10-27 13:42:43 +100070{
Ben Lindstrom46c16222000-12-22 01:43:59 +000071 u_char *inbuf, *outbuf;
Damien Miller95def091999-11-25 00:26:21 +110072 int len, ilen, olen;
Damien Millerd4a8b7e1999-10-27 13:42:43 +100073
Damien Miller95def091999-11-25 00:26:21 +110074 if (BN_num_bits(key->e) < 2 || !BN_is_odd(key->e))
75 fatal("rsa_public_encrypt() exponent too small or not odd");
Damien Millerd4a8b7e1999-10-27 13:42:43 +100076
Damien Miller95def091999-11-25 00:26:21 +110077 olen = BN_num_bytes(key->n);
78 outbuf = xmalloc(olen);
Damien Millerd4a8b7e1999-10-27 13:42:43 +100079
Damien Miller95def091999-11-25 00:26:21 +110080 ilen = BN_num_bytes(in);
81 inbuf = xmalloc(ilen);
82 BN_bn2bin(in, inbuf);
Damien Millerd4a8b7e1999-10-27 13:42:43 +100083
Damien Miller95def091999-11-25 00:26:21 +110084 if ((len = RSA_public_encrypt(ilen, inbuf, outbuf, key,
Damien Miller98c7ad62000-03-09 21:27:49 +110085 RSA_PKCS1_PADDING)) <= 0)
Damien Miller95def091999-11-25 00:26:21 +110086 fatal("rsa_public_encrypt() failed");
Damien Millerd4a8b7e1999-10-27 13:42:43 +100087
Damien Miller95def091999-11-25 00:26:21 +110088 BN_bin2bn(outbuf, len, out);
Damien Millerd4a8b7e1999-10-27 13:42:43 +100089
Damien Miller95def091999-11-25 00:26:21 +110090 memset(outbuf, 0, olen);
91 memset(inbuf, 0, ilen);
92 xfree(outbuf);
93 xfree(inbuf);
Damien Millerd4a8b7e1999-10-27 13:42:43 +100094}
95
Damien Miller7650bc62001-01-30 09:27:26 +110096int
Damien Millerd4a8b7e1999-10-27 13:42:43 +100097rsa_private_decrypt(BIGNUM *out, BIGNUM *in, RSA *key)
98{
Ben Lindstrom46c16222000-12-22 01:43:59 +000099 u_char *inbuf, *outbuf;
Damien Miller95def091999-11-25 00:26:21 +1100100 int len, ilen, olen;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000101
Damien Miller95def091999-11-25 00:26:21 +1100102 olen = BN_num_bytes(key->n);
103 outbuf = xmalloc(olen);
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000104
Damien Miller95def091999-11-25 00:26:21 +1100105 ilen = BN_num_bytes(in);
106 inbuf = xmalloc(ilen);
107 BN_bn2bin(in, inbuf);
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000108
Damien Miller95def091999-11-25 00:26:21 +1100109 if ((len = RSA_private_decrypt(ilen, inbuf, outbuf, key,
Damien Miller7650bc62001-01-30 09:27:26 +1100110 RSA_PKCS1_PADDING)) <= 0) {
111 error("rsa_private_decrypt() failed");
112 } else {
113 BN_bin2bn(outbuf, len, out);
114 }
Damien Miller95def091999-11-25 00:26:21 +1100115 memset(outbuf, 0, olen);
116 memset(inbuf, 0, ilen);
117 xfree(outbuf);
118 xfree(inbuf);
Damien Miller7650bc62001-01-30 09:27:26 +1100119 return len;
Damien Millerd4a8b7e1999-10-27 13:42:43 +1000120}
Ben Lindstromd09fcf52001-03-29 00:29:54 +0000121
Damien Millerda755162002-01-22 23:09:22 +1100122/* calculate p-1 and q-1 */
Ben Lindstromd09fcf52001-03-29 00:29:54 +0000123void
Ben Lindstromf7297dd2001-07-04 05:02:23 +0000124rsa_generate_additional_parameters(RSA *rsa)
Ben Lindstromd09fcf52001-03-29 00:29:54 +0000125{
126 BIGNUM *aux;
127 BN_CTX *ctx;
Damien Millerda755162002-01-22 23:09:22 +1100128
129 if ((aux = BN_new()) == NULL)
130 fatal("rsa_generate_additional_parameters: BN_new failed");
131 if ((ctx = BN_CTX_new()) == NULL)
132 fatal("rsa_generate_additional_parameters: BN_CTX_new failed");
Ben Lindstromd09fcf52001-03-29 00:29:54 +0000133
134 BN_sub(aux, rsa->q, BN_value_one());
135 BN_mod(rsa->dmq1, rsa->d, aux, ctx);
136
137 BN_sub(aux, rsa->p, BN_value_one());
138 BN_mod(rsa->dmp1, rsa->d, aux, ctx);
139
140 BN_clear_free(aux);
141 BN_CTX_free(ctx);
142}
143