source: trunk/NativeCryptography/NativeCryptography.cpp @ 1201

Last change on this file since 1201 was 1201, checked in by Sven Rech, 12 years ago

fixed CFB

File size: 4.6 KB
Line 
1// This is the main DLL file.
2
3#include "NativeCryptography.h"
4
5namespace NativeCryptography {
6
7        /* Fast way to xor an AES block */
8        void Crypto::xorBlockAES(int *t1, int *t2)
9        {
10                t1[0] ^= t2[0];
11                t1[1] ^= t2[1];
12                t1[2] ^= t2[2];
13                t1[3] ^= t2[3];
14        }
15
16        /* Fast way to xor an DES block */
17        void Crypto::xorBlockDES(int *t1, int *t2)
18        {
19                t1[0] ^= t2[0];
20                t1[1] ^= t2[1];
21        }
22
23        void Crypto::encrypt(unsigned char* in, unsigned char* out, const cryptMethod method, AES_KEY* aeskey, DES_key_schedule* deskey)
24        {
25                if (method == cryptMethod::methodAES)
26                        AES_encrypt(in, out, aeskey);
27                else
28                        DES_ecb_encrypt((const_DES_cblock*)in, (const_DES_cblock*)out, deskey, DES_ENCRYPT);
29        }
30
31        void Crypto::decrypt(unsigned char* in, unsigned char* out, const cryptMethod method, AES_KEY* aeskey, DES_key_schedule* deskey)
32        {
33                if (method == cryptMethod::methodAES)
34                        AES_decrypt(in, out, aeskey);
35                else
36                        DES_ecb_encrypt((const_DES_cblock*)in, (const_DES_cblock*)out, deskey, DES_DECRYPT);
37        }
38
39
40        void Crypto::xorblock(unsigned char* t1, unsigned char* t2, const cryptMethod method) {
41                if (method == cryptMethod::methodAES)
42                        xorBlockAES((int*)t1, (int*)t2);
43                else
44                        xorBlockDES((int*)t1, (int*)t2); 
45        }
46
47        array<unsigned char>^ Crypto::decryptAESorDES(array<unsigned char>^ Input, array<unsigned char>^ Key, array<unsigned char>^ IV, const int bits, const int length, const int mode, const int blockSize, const cryptMethod method)
48        {
49                int numBlocks = length / blockSize;
50                if (length % blockSize != 0)
51                        numBlocks++;
52
53                bool noIV = false;
54
55                if (IV == nullptr)
56                {
57                        noIV = true;
58                        if (blockSize == 8)
59                                IV = zeroIV8;
60                        else if (blockSize == 16)
61                                IV = zeroIV16;
62                        else
63                                return nullptr;
64                }
65
66                pin_ptr<unsigned char> input = &Input[0];
67                pin_ptr<unsigned char> key = &Key[0];
68                pin_ptr<unsigned char> iv = &IV[0];
69
70                array<unsigned char>^ output = gcnew array<unsigned char>(length);
71                pin_ptr<unsigned char> outp = &output[0];
72
73                AES_KEY aeskey;
74                DES_key_schedule deskey;
75                if (mode == 2)  //CFB
76                {                       
77                        unsigned char block[16];        //16 is enough for AES and DES
78                        unsigned char shiftregister[16];
79                        //works only for little endian architectures:
80                        if (blockSize == 8)
81                        {
82                                *((unsigned int*)shiftregister) = *((unsigned int*)&iv[1]);
83                                *((unsigned int*)&shiftregister[4]) = (*((unsigned int*)&iv[4]) >> 8) | ((unsigned int)(input[0]) << 24);
84                        }
85                        else if (blockSize == 16)
86                        {
87                                *((unsigned int*)shiftregister) = *((unsigned int*)&iv[1]);
88                                *((unsigned int*)&shiftregister[4]) = (*((unsigned int*)&iv[4]) >> 8) | ((unsigned int)iv[8] << 24);
89                                *((unsigned int*)&shiftregister[8]) = (*((unsigned int*)&iv[8]) >> 8) | ((unsigned int)iv[12] << 24);
90                                *((unsigned int*)&shiftregister[12]) = (*((unsigned int*)&iv[12]) >> 8) | ((unsigned int)input[0] << 24);
91                        }
92                        else
93                                return nullptr;
94                       
95                        if (method == cryptMethod::methodAES)
96                                AES_set_encrypt_key(key, bits, &aeskey);
97                        else
98                                DES_set_key_unchecked((const_DES_cblock*)key, &deskey);
99
100                        encrypt(iv, block, method, &aeskey, &deskey);
101                        unsigned char leftmost = block[0];
102                        outp[0] = leftmost ^ input[0];
103
104                        for (int i = 1; i < length; i++)
105                        {
106                                encrypt(shiftregister, block, method, &aeskey, &deskey);
107                                leftmost = block[0];
108                                outp[i] = leftmost ^ input[i];
109                               
110                                //shift input[i] in register:
111                                if (blockSize == 8)
112                                {
113                                        *((unsigned int*)shiftregister) = *((unsigned int*)&shiftregister[1]);
114                                        *((unsigned int*)&shiftregister[4]) = (*((unsigned int*)&shiftregister[4]) >> 8) | ((unsigned int)input[i] << 24);
115                                }
116                                else if (blockSize == 16)
117                                {
118                                        *((unsigned int*)shiftregister) = *((unsigned int*)&shiftregister[1]);
119                                        *((unsigned int*)&shiftregister[4]) = (*((unsigned int*)&shiftregister[4]) >> 8) | ((unsigned int)shiftregister[8] << 24);
120                                        *((unsigned int*)&shiftregister[8]) = (*((unsigned int*)&shiftregister[8]) >> 8) | ((unsigned int)shiftregister[12] << 24);
121                                        *((unsigned int*)&shiftregister[12]) = (*((unsigned int*)&shiftregister[12]) >> 8) | ((unsigned int)input[i] << 24);
122                                }
123                        }
124                }
125                else    //CBC or ECB
126                {
127                        if (method == cryptMethod::methodAES)
128                                AES_set_decrypt_key(key, bits, &aeskey);
129                        else
130                                DES_set_key_unchecked((const_DES_cblock*)key, &deskey);
131
132                        decrypt(input, outp, method, &aeskey, &deskey);                         
133                        if (mode == 1 && !noIV)         //CBC
134                                xorblock(outp, iv, method);     
135                        for (int c = 1; c < numBlocks; c++)
136                        {
137                                decrypt(input+c*blockSize, outp+c*blockSize, method, &aeskey, &deskey);
138                                if (mode == 1)          //CBC
139                                        xorblock(outp+c*blockSize, input+(c-1)*blockSize, method);                             
140                        }
141                }
142
143                return output;
144        }
145
146}
Note: See TracBrowser for help on using the repository browser.