Clean up EVP macros, rename DES EDE3 modes correctly, temporary support for
[openssl.git] / crypto / evp / openbsd_hw.c
1 /*
2  * Copyright (c) 1998-2001 The OpenSSL Project.  All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  *
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer. 
10  *
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in
13  *    the documentation and/or other materials provided with the
14  *    distribution.
15  *
16  * 3. All advertising materials mentioning features or use of this
17  *    software must display the following acknowledgment:
18  *    "This product includes software developed by the OpenSSL Project
19  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
20  *
21  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
22  *    endorse or promote products derived from this software without
23  *    prior written permission. For written permission, please contact
24  *    openssl-core@openssl.org.
25  *
26  * 5. Products derived from this software may not be called "OpenSSL"
27  *    nor may "OpenSSL" appear in their names without prior written
28  *    permission of the OpenSSL Project.
29  *
30  * 6. Redistributions of any form whatsoever must retain the following
31  *    acknowledgment:
32  *    "This product includes software developed by the OpenSSL Project
33  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
34  *
35  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
36  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
37  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
38  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
39  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
40  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
41  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
42  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
43  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
44  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
45  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
46  * OF THE POSSIBILITY OF SUCH DAMAGE.
47  */
48
49 #include <fcntl.h>
50 #include <stdio.h>
51 #include <errno.h>
52 #include <sys/ioctl.h>
53 #include <crypto/cryptodev.h>
54 #include <unistd.h>
55 #include <openssl/evp.h>
56 #include <openssl/objects.h>
57 #include "evp_locl.h"
58 #include <assert.h>
59
60 // longest key supported in hardware
61 #define MAX_HW_KEY      24
62
63 static int fd;
64 static int dev_failed;
65
66 static void err(const char *str)
67     {
68     fprintf(stderr,"%s: errno %d\n",str,errno);
69     }
70
71 static int dev_crypto_init(EVP_CIPHER_CTX *ctx)
72     {
73     if(dev_failed)
74         return 0;
75     if(!fd)
76         {
77         int cryptodev_fd;
78
79         if ((cryptodev_fd=open("/dev/crypto",O_RDWR,0)) < 0)
80             {
81             err("/dev/crypto");
82             dev_failed=1;
83             return 0;
84             }
85         if (ioctl(cryptodev_fd,CRIOGET,&fd) == -1)
86             {
87             err("CRIOGET failed");
88             close(cryptodev_fd);
89             dev_failed=1;
90             return 0;
91             }
92         close(cryptodev_fd);
93         }
94     if(!ctx->c.dev_crypto)
95         {
96         ctx->c.dev_crypto=OPENSSL_malloc(sizeof *ctx->c.dev_crypto);
97         memset(ctx->c.dev_crypto,'\0',sizeof *ctx->c.dev_crypto);
98         ctx->c.dev_crypto->key=OPENSSL_malloc(MAX_HW_KEY);
99         }
100     
101     return 1;
102     }
103
104 static int dev_crypto_cleanup(EVP_CIPHER_CTX *ctx)
105     {
106     if(ioctl(fd,CIOCFSESSION,ctx->c.dev_crypto->ses) == -1)
107         err("CIOCFSESSION failed");
108
109     OPENSSL_free(ctx->c.dev_crypto->key);
110     OPENSSL_free(ctx->c.dev_crypto);
111     ctx->c.dev_crypto=NULL;
112
113     return 1;
114     }
115
116 // FIXME: there should be some non-fatal way to report we fell back to s/w?
117 static int dev_crypto_des_ede3_init_key(EVP_CIPHER_CTX *ctx,
118                                         const unsigned char *key,
119                                         const unsigned char *iv, int enc)
120     {
121     if(!dev_crypto_init(ctx))
122         {
123         // fall back to using software...
124         ctx->cipher=EVP_des_ede3_cbc();
125         return ctx->cipher->init(ctx,key,iv,enc);
126         }
127     memcpy(ctx->c.dev_crypto->key,key,24);
128     
129     ctx->c.dev_crypto->cipher=CRYPTO_3DES_CBC;
130     ctx->c.dev_crypto->mac=0;
131     ctx->c.dev_crypto->keylen=24;
132
133     if (ioctl(fd,CIOCGSESSION,ctx->c.dev_crypto) == -1)
134         {
135         err("CIOCGSESSION failed");
136         // fall back to using software...
137         dev_crypto_cleanup(ctx);
138         ctx->cipher=EVP_des_ede3_cbc();
139         return ctx->cipher->init(ctx,key,iv,enc);
140         }
141     return 1;
142     }
143
144 static int dev_crypto_des_ede3_cbc_cipher(EVP_CIPHER_CTX *ctx, 
145                                           unsigned char *out,
146                                           const unsigned char *in,
147                                           unsigned int inl)
148     {
149     struct crypt_op cryp;
150     unsigned char lb[8];
151
152     assert(ctx->c.dev_crypto);
153     assert(!dev_failed);
154
155     memset(&cryp,'\0',sizeof cryp);
156     cryp.ses=ctx->c.dev_crypto->ses;
157     cryp.op=ctx->encrypt ? COP_ENCRYPT : COP_DECRYPT;
158     cryp.flags=0;
159     //    cryp.len=((inl+7)/8)*8;
160     cryp.len=inl;
161     assert((inl&7) == 0);
162     cryp.src=(caddr_t)in;
163     cryp.dst=(caddr_t)out;
164     cryp.mac=0;
165     cryp.iv=(caddr_t)ctx->iv;
166
167     if(!ctx->encrypt)
168         memcpy(lb,&in[cryp.len-8],8);
169
170     if (ioctl(fd, CIOCCRYPT, &cryp) == -1)
171         {
172         err("CIOCCRYPT failed");
173         abort();
174         return 0;
175         }
176
177     if(ctx->encrypt)
178         memcpy(ctx->iv,&out[cryp.len-8],8);
179     else
180         memcpy(ctx->iv,lb,8);
181
182     return 1;
183     }
184
185 BLOCK_CIPHER_def_cbc(dev_crypto_des_ede3, des_ede,NID_des_ede3, 8, 24, 8,
186                      0, dev_crypto_des_ede3_init_key,
187                      dev_crypto_cleanup, 
188                      EVP_CIPHER_set_asn1_iv,
189                      EVP_CIPHER_get_asn1_iv,
190                      NULL)