e60eafcefbe9eff4e46721e21ad1d28a00a40a67
[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 #ifdef OPENSSL_OPENBSD_DEV_CRYPTO
50
51 #include <fcntl.h>
52 #include <stdio.h>
53 #include <errno.h>
54 #include <sys/ioctl.h>
55 #include <crypto/cryptodev.h>
56 #include <unistd.h>
57 #include <openssl/evp.h>
58 #include <openssl/objects.h>
59 #include "evp_locl.h"
60 #include <assert.h>
61
62 /* longest key supported in hardware */
63 #define MAX_HW_KEY      24
64
65 static int fd;
66 static int dev_failed;
67
68 typedef struct session_op session_op;
69
70 #define data(ctx) EVP_C_DATA(session_op,ctx)
71
72 static void err(const char *str)
73     {
74     fprintf(stderr,"%s: errno %d\n",str,errno);
75     }
76
77 static int dev_crypto_init(EVP_CIPHER_CTX *ctx)
78     {
79     if(dev_failed)
80         return 0;
81     if(!fd)
82         {
83         int cryptodev_fd;
84
85         if ((cryptodev_fd=open("/dev/crypto",O_RDWR,0)) < 0)
86             {
87             err("/dev/crypto");
88             dev_failed=1;
89             return 0;
90             }
91         if (ioctl(cryptodev_fd,CRIOGET,&fd) == -1)
92             {
93             err("CRIOGET failed");
94             close(cryptodev_fd);
95             dev_failed=1;
96             return 0;
97             }
98         close(cryptodev_fd);
99         }
100     assert(data(ctx));
101     memset(data(ctx),'\0',sizeof *data(ctx));
102     data(ctx)->key=OPENSSL_malloc(MAX_HW_KEY);
103
104     return 1;
105     }
106
107 static int dev_crypto_cleanup(EVP_CIPHER_CTX *ctx)
108     {
109     if(ioctl(fd,CIOCFSESSION,&data(ctx)->ses) == -1)
110         err("CIOCFSESSION failed");
111
112     OPENSSL_free(data(ctx)->key);
113
114     return 1;
115     }
116
117 /* FIXME: there should be some non-fatal way to report we fell back to s/w? */
118 static int dev_crypto_des_ede3_init_key(EVP_CIPHER_CTX *ctx,
119                                         const unsigned char *key,
120                                         const unsigned char *iv, int enc)
121     {
122     if(!dev_crypto_init(ctx))
123         {
124         /* fall back to using software... */
125         ctx->cipher=EVP_des_ede3_cbc();
126         return ctx->cipher->init(ctx,key,iv,enc);
127         }
128     memcpy(data(ctx)->key,key,24);
129     
130     data(ctx)->cipher=CRYPTO_3DES_CBC;
131     data(ctx)->mac=0;
132     data(ctx)->keylen=24;
133
134     if (ioctl(fd,CIOCGSESSION,data(ctx)) == -1)
135         {
136         err("CIOCGSESSION failed");
137         /* fall back to using software... */
138         dev_crypto_cleanup(ctx);
139         ctx->cipher=EVP_des_ede3_cbc();
140         return ctx->cipher->init(ctx,key,iv,enc);
141         }
142     return 1;
143     }
144
145 static int dev_crypto_des_ede3_cbc_cipher(EVP_CIPHER_CTX *ctx, 
146                                           unsigned char *out,
147                                           const unsigned char *in,
148                                           unsigned int inl)
149     {
150     struct crypt_op cryp;
151     unsigned char lb[8];
152
153     assert(data(ctx));
154     assert(!dev_failed);
155
156     memset(&cryp,'\0',sizeof cryp);
157     cryp.ses=data(ctx)->ses;
158     cryp.op=ctx->encrypt ? COP_ENCRYPT : COP_DECRYPT;
159     cryp.flags=0;
160 #if 0
161     cryp.len=((inl+7)/8)*8;
162 #endif
163     cryp.len=inl;
164     assert((inl&7) == 0);
165     cryp.src=(caddr_t)in;
166     cryp.dst=(caddr_t)out;
167     cryp.mac=0;
168     cryp.iv=(caddr_t)ctx->iv;
169
170     if(!ctx->encrypt)
171         memcpy(lb,&in[cryp.len-8],8);
172
173     if (ioctl(fd, CIOCCRYPT, &cryp) == -1)
174         {
175         err("CIOCCRYPT failed");
176         abort();
177         return 0;
178         }
179
180     if(ctx->encrypt)
181         memcpy(ctx->iv,&out[cryp.len-8],8);
182     else
183         memcpy(ctx->iv,lb,8);
184
185     return 1;
186     }
187
188 BLOCK_CIPHER_def_cbc(dev_crypto_des_ede3, session_op, NID_des_ede3, 8, 24, 8,
189                      0, dev_crypto_des_ede3_init_key,
190                      dev_crypto_cleanup, 
191                      EVP_CIPHER_set_asn1_iv,
192                      EVP_CIPHER_get_asn1_iv,
193                      NULL)
194 #else
195 static void *dummy=&dummy;
196 #endif