crypto/modes: make modes.h selfsufficient and rename block_f to block128_t.
[openssl.git] / crypto / camellia / cmll_cfb.c
1 /* crypto/camellia/camellia_cfb.c -*- mode:C; c-file-style: "eay" -*- */
2 /* ====================================================================
3  * Copyright (c) 2006 The OpenSSL Project.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer. 
11  *
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in
14  *    the documentation and/or other materials provided with the
15  *    distribution.
16  *
17  * 3. All advertising materials mentioning features or use of this
18  *    software must display the following acknowledgment:
19  *    "This product includes software developed by the OpenSSL Project
20  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
21  *
22  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
23  *    endorse or promote products derived from this software without
24  *    prior written permission. For written permission, please contact
25  *    openssl-core@openssl.org.
26  *
27  * 5. Products derived from this software may not be called "OpenSSL"
28  *    nor may "OpenSSL" appear in their names without prior written
29  *    permission of the OpenSSL Project.
30  *
31  * 6. Redistributions of any form whatsoever must retain the following
32  *    acknowledgment:
33  *    "This product includes software developed by the OpenSSL Project
34  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
35  *
36  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
37  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
38  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
39  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
40  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
41  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
42  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
43  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
44  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
45  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
46  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
47  * OF THE POSSIBILITY OF SUCH DAMAGE.
48  * ====================================================================
49  *
50  */
51 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
52  * All rights reserved.
53  *
54  * This package is an SSL implementation written
55  * by Eric Young (eay@cryptsoft.com).
56  * The implementation was written so as to conform with Netscapes SSL.
57  * 
58  * This library is free for commercial and non-commercial use as long as
59  * the following conditions are aheared to.  The following conditions
60  * apply to all code found in this distribution, be it the RC4, RSA,
61  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
62  * included with this distribution is covered by the same copyright terms
63  * except that the holder is Tim Hudson (tjh@cryptsoft.com).
64  * 
65  * Copyright remains Eric Young's, and as such any Copyright notices in
66  * the code are not to be removed.
67  * If this package is used in a product, Eric Young should be given attribution
68  * as the author of the parts of the library used.
69  * This can be in the form of a textual message at program startup or
70  * in documentation (online or textual) provided with the package.
71  * 
72  * Redistribution and use in source and binary forms, with or without
73  * modification, are permitted provided that the following conditions
74  * are met:
75  * 1. Redistributions of source code must retain the copyright
76  *    notice, this list of conditions and the following disclaimer.
77  * 2. Redistributions in binary form must reproduce the above copyright
78  *    notice, this list of conditions and the following disclaimer in the
79  *    documentation and/or other materials provided with the distribution.
80  * 3. All advertising materials mentioning features or use of this software
81  *    must display the following acknowledgement:
82  *    "This product includes cryptographic software written by
83  *     Eric Young (eay@cryptsoft.com)"
84  *    The word 'cryptographic' can be left out if the rouines from the library
85  *    being used are not cryptographic related :-).
86  * 4. If you include any Windows specific code (or a derivative thereof) from 
87  *    the apps directory (application code) you must include an acknowledgement:
88  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
89  * 
90  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
91  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
92  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
93  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
94  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
95  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
96  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
97  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
98  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
99  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
100  * SUCH DAMAGE.
101  * 
102  * The licence and distribution terms for any publically available version or
103  * derivative of this code cannot be changed.  i.e. this code cannot simply be
104  * copied and put under another distribution licence
105  * [including the GNU Public Licence.]
106  */
107
108 #ifndef CAMELLIA_DEBUG
109 # ifndef NDEBUG
110 #  define NDEBUG
111 # endif
112 #endif
113 #include <assert.h>
114 #include <string.h>
115
116 #include <openssl/camellia.h>
117 #include "cmll_locl.h"
118 #include "e_os.h"
119
120
121 /* The input and output encrypted as though 128bit cfb mode is being
122  * used.  The extra state information to record how much of the
123  * 128bit block we have used is contained in *num;
124  */
125
126 void Camellia_cfb128_encrypt(const unsigned char *in, unsigned char *out,
127         size_t length, const CAMELLIA_KEY *key,
128         unsigned char *ivec, int *num, const int enc)
129         {
130
131         unsigned int n;
132         unsigned char c;
133
134         assert(in && out && key && ivec && num);
135
136         n = *num;
137
138         if (enc) 
139                 {
140                 while (length--) 
141                         {
142                         if (n == 0) 
143                                 {
144                                 Camellia_encrypt(ivec, ivec, key);
145                                 }
146                         ivec[n] = *(out++) = *(in++) ^ ivec[n];
147                         n = (n+1) % CAMELLIA_BLOCK_SIZE;
148                         }
149                 } 
150         else 
151                 {
152                 while (length--) 
153                         {
154                         if (n == 0) 
155                                 {
156                                 Camellia_encrypt(ivec, ivec, key);
157                                 }
158                         c = *(in);
159                         *(out++) = *(in++) ^ ivec[n];
160                         ivec[n] = c;
161                         n = (n+1) % CAMELLIA_BLOCK_SIZE;
162                         }
163                 }
164
165         *num=n;
166         }
167
168 /* This expects a single block of size nbits for both in and out. Note that
169    it corrupts any extra bits in the last byte of out */
170 void Camellia_cfbr_encrypt_block(const unsigned char *in,unsigned char *out,
171         const int nbits,const CAMELLIA_KEY *key,
172         unsigned char *ivec,const int enc)
173         {
174         int n,rem,num;
175         unsigned char ovec[CAMELLIA_BLOCK_SIZE*2];
176
177         if (nbits<=0 || nbits>128) return;
178
179         /* fill in the first half of the new IV with the current IV */
180         memcpy(ovec,ivec,CAMELLIA_BLOCK_SIZE);
181         /* construct the new IV */
182         Camellia_encrypt(ivec,ivec,key);
183         num = (nbits+7)/8;
184         if (enc)        /* encrypt the input */
185                 for(n=0 ; n < num ; ++n)
186                         out[n] = (ovec[CAMELLIA_BLOCK_SIZE+n] = in[n] ^ ivec[n]);
187         else            /* decrypt the input */
188                 for(n=0 ; n < num ; ++n)
189                         out[n] = (ovec[CAMELLIA_BLOCK_SIZE+n] = in[n]) ^ ivec[n];
190         /* shift ovec left... */
191         rem = nbits%8;
192         num = nbits/8;
193         if(rem==0)
194                 memcpy(ivec,ovec+num,CAMELLIA_BLOCK_SIZE);
195         else
196                 for(n=0 ; n < CAMELLIA_BLOCK_SIZE ; ++n)
197                         ivec[n] = ovec[n+num]<<rem | ovec[n+num+1]>>(8-rem);
198
199         /* it is not necessary to cleanse ovec, since the IV is not secret */
200         }
201
202 /* N.B. This expects the input to be packed, MS bit first */
203 void Camellia_cfb1_encrypt(const unsigned char *in, unsigned char *out,
204         size_t length, const CAMELLIA_KEY *key,
205         unsigned char *ivec, int *num, const int enc)
206         {
207         size_t n;
208         unsigned char c[1],d[1];
209
210         assert(in && out && key && ivec && num);
211         assert(*num == 0);
212
213         memset(out,0,(length+7)/8);
214         for(n=0 ; n < length ; ++n)
215                 {
216                 c[0]=(in[n/8]&(1 << (7-n%8))) ? 0x80 : 0;
217                 Camellia_cfbr_encrypt_block(c,d,1,key,ivec,enc);
218                 out[n/8]=(out[n/8]&~(1 << (7-n%8)))|((d[0]&0x80) >> (n%8));
219                 }
220         }
221
222 void Camellia_cfb8_encrypt(const unsigned char *in, unsigned char *out,
223         size_t length, const CAMELLIA_KEY *key,
224         unsigned char *ivec, int *num, const int enc)
225         {
226         size_t n;
227
228         assert(in && out && key && ivec && num);
229         assert(*num == 0);
230
231         for(n=0 ; n < length ; ++n)
232                 Camellia_cfbr_encrypt_block(&in[n],&out[n],8,key,ivec,enc);
233         }
234