5 Author: Pekka Riikonen <priikone@poseidon.pspt.fi>
7 Copyright (C) 1999 - 2000 Pekka Riikonen
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 2 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
23 * Revision 1.1.1.1 2000/06/27 11:36:54 priikone
24 * Importet from internal CVS/Added Log headers.
32 #include "crypton_internal.h"
35 * SILC Crypto API for Crypton
38 /* Sets the key for the cipher. */
40 SILC_CIPHER_API_SET_KEY(crypton)
42 crypton_set_key((CryptonContext *)context, (unsigned int *)key, keylen);
46 /* Sets the string as a new key for the cipher. The string is first
47 hashed and then used as a new key. */
49 SILC_CIPHER_API_SET_KEY_WITH_STRING(crypton)
52 unsigned char key[16];
54 silc_hash_alloc("md5", &hash);
55 hash->make_hash(hash, string, stringlen, key);
57 crypton_set_key((CryptonContext *)context, key, sizeof(key));
60 memset(&key, 'F', sizeof(key));
65 /* Returns the size of the cipher context. */
67 SILC_CIPHER_API_CONTEXT_LEN(crypton)
69 return sizeof(CryptonContext);
72 /* Encrypts with the cipher in CBC mode. */
74 SILC_CIPHER_API_ENCRYPT_CBC(crypton)
76 unsigned int *in, *out, *tiv;
80 in = (unsigned int *)src;
81 out = (unsigned int *)dst;
82 tiv = (unsigned int *)iv;
84 tmp[0] = in[0] ^ tiv[0];
85 tmp[1] = in[1] ^ tiv[1];
86 tmp[2] = in[2] ^ tiv[2];
87 tmp[3] = in[3] ^ tiv[3];
88 crypton_encrypt((CryptonContext *)context, tmp, out);
92 for (i = 16; i < len; i += 16) {
93 tmp[0] = in[0] ^ out[0 - 4];
94 tmp[1] = in[1] ^ out[1 - 4];
95 tmp[2] = in[2] ^ out[2 - 4];
96 tmp[3] = in[3] ^ out[3 - 4];
97 crypton_encrypt((CryptonContext *)context, tmp, out);
105 /* Decrypts with the cipher in CBC mode. */
107 SILC_CIPHER_API_DECRYPT_CBC(crypton)
109 unsigned int *in, *out, *tiv;
112 in = (unsigned int *)src;
113 out = (unsigned int *)dst;
114 tiv = (unsigned int *)iv;
116 crypton_decrypt((CryptonContext *)context, in, out);
124 for (i = 16; i < len; i += 16) {
125 crypton_decrypt((CryptonContext *)context, in, out);