ini
[aversive.git] / modules / crypto / aes / aes_ctr.c
1 /* crypto/aes/aes_ctr.c -*- mode:C; c-file-style: "eay" -*- */
2 /* ====================================================================
3  * Copyright (c) 1998-2002 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
52 #ifndef AES_DEBUG
53 # ifndef NDEBUG
54 #  define NDEBUG
55 # endif
56 #endif
57 #include <aversive.h>
58 #include <assert.h>
59 #include "aes_locl.h"
60 #include "aes.h"
61 #include "aes_locl.h"
62
63 /* NOTE: CTR mode is big-endian.  The rest of the AES code
64  * is endian-neutral. */
65
66 /* increment counter (128-bit int) by 2^64 */
67 void AES_ctr128_inc(unsigned char *counter) {
68         unsigned long c;
69
70         /* Grab 3rd dword of counter and increment */
71 #ifdef L_ENDIAN
72         c = GETU32(counter + 8);
73         c++;
74         PUTU32(counter + 8, c);
75 #else
76         c = GETU32(counter + 4);
77         c++;
78         PUTU32(counter + 4, c);
79 #endif
80
81         /* if no overflow, we're done */
82         if (c)
83                 return;
84
85         /* Grab top dword of counter and increment */
86 #ifdef L_ENDIAN
87         c = GETU32(counter + 12);
88         c++;
89         PUTU32(counter + 12, c);
90 #else
91         c = GETU32(counter +  0);
92         c++;
93         PUTU32(counter +  0, c);
94 #endif
95
96 }
97
98 /* The input encrypted as though 128bit counter mode is being
99  * used.  The extra state information to record how much of the
100  * 128bit block we have used is contained in *num, and the
101  * encrypted counter is kept in ecount_buf.  Both *num and
102  * ecount_buf must be initialised with zeros before the first
103  * call to AES_ctr128_encrypt().
104  */
105 void AES_ctr128_encrypt(const unsigned char *in, unsigned char *out,
106         const unsigned long length, const AES_KEY *key,
107         unsigned char counter[AES_BLOCK_SIZE],
108         unsigned char ecount_buf[AES_BLOCK_SIZE],
109         unsigned int *num) {
110
111         unsigned int n;
112         unsigned long l=length;
113
114         assert(in && out && key && counter && num);
115         assert(*num < AES_BLOCK_SIZE);
116
117         n = *num;
118
119         while (l--) {
120                 if (n == 0) {
121                         AES_encrypt(counter, ecount_buf, key);
122                         AES_ctr128_inc(counter);
123                 }
124                 *(out++) = *(in++) ^ ecount_buf[n];
125                 n = (n+1) % AES_BLOCK_SIZE;
126         }
127
128         *num=n;
129 }