Linux Audio

Check our new training course

Loading...
v4.6
 
  1/*
  2 * Cryptographic API.
  3 *
  4 * Serpent Cipher Algorithm.
  5 *
  6 * Copyright (C) 2002 Dag Arne Osvik <osvik@ii.uib.no>
  7 *               2003 Herbert Valerio Riedel <hvr@gnu.org>
  8 *
  9 * Added tnepres support:
 10 *		Ruben Jesus Garcia Hernandez <ruben@ugr.es>, 18.10.2004
 11 *              Based on code by hvr
 12 *
 13 * This program is free software; you can redistribute it and/or modify
 14 * it under the terms of the GNU General Public License as published by
 15 * the Free Software Foundation; either version 2 of the License, or
 16 * (at your option) any later version.
 17 */
 18
 
 19#include <linux/init.h>
 20#include <linux/module.h>
 21#include <linux/errno.h>
 22#include <asm/byteorder.h>
 23#include <linux/crypto.h>
 24#include <linux/types.h>
 25#include <crypto/serpent.h>
 26
 27/* Key is padded to the maximum of 256 bits before round key generation.
 28 * Any key length <= 256 bits (32 bytes) is allowed by the algorithm.
 29 */
 30
 31#define PHI 0x9e3779b9UL
 32
 33#define keyiter(a, b, c, d, i, j) \
 34	({ b ^= d; b ^= c; b ^= a; b ^= PHI ^ i; b = rol32(b, 11); k[j] = b; })
 35
 36#define loadkeys(x0, x1, x2, x3, i) \
 37	({ x0 = k[i]; x1 = k[i+1]; x2 = k[i+2]; x3 = k[i+3]; })
 38
 39#define storekeys(x0, x1, x2, x3, i) \
 40	({ k[i] = x0; k[i+1] = x1; k[i+2] = x2; k[i+3] = x3; })
 41
 42#define store_and_load_keys(x0, x1, x2, x3, s, l) \
 43	({ storekeys(x0, x1, x2, x3, s); loadkeys(x0, x1, x2, x3, l); })
 44
 45#define K(x0, x1, x2, x3, i) ({				\
 46	x3 ^= k[4*(i)+3];        x2 ^= k[4*(i)+2];	\
 47	x1 ^= k[4*(i)+1];        x0 ^= k[4*(i)+0];	\
 48	})
 49
 50#define LK(x0, x1, x2, x3, x4, i) ({					   \
 51							x0 = rol32(x0, 13);\
 52	x2 = rol32(x2, 3);	x1 ^= x0;		x4  = x0 << 3;	   \
 53	x3 ^= x2;		x1 ^= x2;				   \
 54	x1 = rol32(x1, 1);	x3 ^= x4;				   \
 55	x3 = rol32(x3, 7);	x4  = x1;				   \
 56	x0 ^= x1;		x4 <<= 7;		x2 ^= x3;	   \
 57	x0 ^= x3;		x2 ^= x4;		x3 ^= k[4*i+3];	   \
 58	x1 ^= k[4*i+1];		x0 = rol32(x0, 5);	x2 = rol32(x2, 22);\
 59	x0 ^= k[4*i+0];		x2 ^= k[4*i+2];				   \
 60	})
 61
 62#define KL(x0, x1, x2, x3, x4, i) ({					   \
 63	x0 ^= k[4*i+0];		x1 ^= k[4*i+1];		x2 ^= k[4*i+2];	   \
 64	x3 ^= k[4*i+3];		x0 = ror32(x0, 5);	x2 = ror32(x2, 22);\
 65	x4 =  x1;		x2 ^= x3;		x0 ^= x3;	   \
 66	x4 <<= 7;		x0 ^= x1;		x1 = ror32(x1, 1); \
 67	x2 ^= x4;		x3 = ror32(x3, 7);	x4 = x0 << 3;	   \
 68	x1 ^= x0;		x3 ^= x4;		x0 = ror32(x0, 13);\
 69	x1 ^= x2;		x3 ^= x2;		x2 = ror32(x2, 3); \
 70	})
 71
 72#define S0(x0, x1, x2, x3, x4) ({			\
 73					x4  = x3;	\
 74	x3 |= x0;	x0 ^= x4;	x4 ^= x2;	\
 75	x4 = ~x4;	x3 ^= x1;	x1 &= x0;	\
 76	x1 ^= x4;	x2 ^= x0;	x0 ^= x3;	\
 77	x4 |= x0;	x0 ^= x2;	x2 &= x1;	\
 78	x3 ^= x2;	x1 = ~x1;	x2 ^= x4;	\
 79	x1 ^= x2;					\
 80	})
 81
 82#define S1(x0, x1, x2, x3, x4) ({			\
 83					x4  = x1;	\
 84	x1 ^= x0;	x0 ^= x3;	x3 = ~x3;	\
 85	x4 &= x1;	x0 |= x1;	x3 ^= x2;	\
 86	x0 ^= x3;	x1 ^= x3;	x3 ^= x4;	\
 87	x1 |= x4;	x4 ^= x2;	x2 &= x0;	\
 88	x2 ^= x1;	x1 |= x0;	x0 = ~x0;	\
 89	x0 ^= x2;	x4 ^= x1;			\
 90	})
 91
 92#define S2(x0, x1, x2, x3, x4) ({			\
 93					x3 = ~x3;	\
 94	x1 ^= x0;	x4  = x0;	x0 &= x2;	\
 95	x0 ^= x3;	x3 |= x4;	x2 ^= x1;	\
 96	x3 ^= x1;	x1 &= x0;	x0 ^= x2;	\
 97	x2 &= x3;	x3 |= x1;	x0 = ~x0;	\
 98	x3 ^= x0;	x4 ^= x0;	x0 ^= x2;	\
 99	x1 |= x2;					\
100	})
101
102#define S3(x0, x1, x2, x3, x4) ({			\
103					x4  = x1;	\
104	x1 ^= x3;	x3 |= x0;	x4 &= x0;	\
105	x0 ^= x2;	x2 ^= x1;	x1 &= x3;	\
106	x2 ^= x3;	x0 |= x4;	x4 ^= x3;	\
107	x1 ^= x0;	x0 &= x3;	x3 &= x4;	\
108	x3 ^= x2;	x4 |= x1;	x2 &= x1;	\
109	x4 ^= x3;	x0 ^= x3;	x3 ^= x2;	\
110	})
111
112#define S4(x0, x1, x2, x3, x4) ({			\
113					x4  = x3;	\
114	x3 &= x0;	x0 ^= x4;			\
115	x3 ^= x2;	x2 |= x4;	x0 ^= x1;	\
116	x4 ^= x3;	x2 |= x0;			\
117	x2 ^= x1;	x1 &= x0;			\
118	x1 ^= x4;	x4 &= x2;	x2 ^= x3;	\
119	x4 ^= x0;	x3 |= x1;	x1 = ~x1;	\
120	x3 ^= x0;					\
121	})
122
123#define S5(x0, x1, x2, x3, x4) ({			\
124	x4  = x1;	x1 |= x0;			\
125	x2 ^= x1;	x3 = ~x3;	x4 ^= x0;	\
126	x0 ^= x2;	x1 &= x4;	x4 |= x3;	\
127	x4 ^= x0;	x0 &= x3;	x1 ^= x3;	\
128	x3 ^= x2;	x0 ^= x1;	x2 &= x4;	\
129	x1 ^= x2;	x2 &= x0;			\
130	x3 ^= x2;					\
131	})
132
133#define S6(x0, x1, x2, x3, x4) ({			\
134					x4  = x1;	\
135	x3 ^= x0;	x1 ^= x2;	x2 ^= x0;	\
136	x0 &= x3;	x1 |= x3;	x4 = ~x4;	\
137	x0 ^= x1;	x1 ^= x2;			\
138	x3 ^= x4;	x4 ^= x0;	x2 &= x0;	\
139	x4 ^= x1;	x2 ^= x3;	x3 &= x1;	\
140	x3 ^= x0;	x1 ^= x2;			\
141	})
142
143#define S7(x0, x1, x2, x3, x4) ({			\
144					x1 = ~x1;	\
145	x4  = x1;	x0 = ~x0;	x1 &= x2;	\
146	x1 ^= x3;	x3 |= x4;	x4 ^= x2;	\
147	x2 ^= x3;	x3 ^= x0;	x0 |= x1;	\
148	x2 &= x0;	x0 ^= x4;	x4 ^= x3;	\
149	x3 &= x0;	x4 ^= x1;			\
150	x2 ^= x4;	x3 ^= x1;	x4 |= x0;	\
151	x4 ^= x1;					\
152	})
153
154#define SI0(x0, x1, x2, x3, x4) ({			\
155			x4  = x3;	x1 ^= x0;	\
156	x3 |= x1;	x4 ^= x1;	x0 = ~x0;	\
157	x2 ^= x3;	x3 ^= x0;	x0 &= x1;	\
158	x0 ^= x2;	x2 &= x3;	x3 ^= x4;	\
159	x2 ^= x3;	x1 ^= x3;	x3 &= x0;	\
160	x1 ^= x0;	x0 ^= x2;	x4 ^= x3;	\
161	})
162
163#define SI1(x0, x1, x2, x3, x4) ({			\
164	x1 ^= x3;	x4  = x0;			\
165	x0 ^= x2;	x2 = ~x2;	x4 |= x1;	\
166	x4 ^= x3;	x3 &= x1;	x1 ^= x2;	\
167	x2 &= x4;	x4 ^= x1;	x1 |= x3;	\
168	x3 ^= x0;	x2 ^= x0;	x0 |= x4;	\
169	x2 ^= x4;	x1 ^= x0;			\
170	x4 ^= x1;					\
171	})
172
173#define SI2(x0, x1, x2, x3, x4) ({			\
174	x2 ^= x1;	x4  = x3;	x3 = ~x3;	\
175	x3 |= x2;	x2 ^= x4;	x4 ^= x0;	\
176	x3 ^= x1;	x1 |= x2;	x2 ^= x0;	\
177	x1 ^= x4;	x4 |= x3;	x2 ^= x3;	\
178	x4 ^= x2;	x2 &= x1;			\
179	x2 ^= x3;	x3 ^= x4;	x4 ^= x0;	\
180	})
181
182#define SI3(x0, x1, x2, x3, x4) ({			\
183					x2 ^= x1;	\
184	x4  = x1;	x1 &= x2;			\
185	x1 ^= x0;	x0 |= x4;	x4 ^= x3;	\
186	x0 ^= x3;	x3 |= x1;	x1 ^= x2;	\
187	x1 ^= x3;	x0 ^= x2;	x2 ^= x3;	\
188	x3 &= x1;	x1 ^= x0;	x0 &= x2;	\
189	x4 ^= x3;	x3 ^= x0;	x0 ^= x1;	\
190	})
191
192#define SI4(x0, x1, x2, x3, x4) ({			\
193	x2 ^= x3;	x4  = x0;	x0 &= x1;	\
194	x0 ^= x2;	x2 |= x3;	x4 = ~x4;	\
195	x1 ^= x0;	x0 ^= x2;	x2 &= x4;	\
196	x2 ^= x0;	x0 |= x4;			\
197	x0 ^= x3;	x3 &= x2;			\
198	x4 ^= x3;	x3 ^= x1;	x1 &= x0;	\
199	x4 ^= x1;	x0 ^= x3;			\
200	})
201
202#define SI5(x0, x1, x2, x3, x4) ({			\
203			x4  = x1;	x1 |= x2;	\
204	x2 ^= x4;	x1 ^= x3;	x3 &= x4;	\
205	x2 ^= x3;	x3 |= x0;	x0 = ~x0;	\
206	x3 ^= x2;	x2 |= x0;	x4 ^= x1;	\
207	x2 ^= x4;	x4 &= x0;	x0 ^= x1;	\
208	x1 ^= x3;	x0 &= x2;	x2 ^= x3;	\
209	x0 ^= x2;	x2 ^= x4;	x4 ^= x3;	\
210	})
211
212#define SI6(x0, x1, x2, x3, x4) ({			\
213			x0 ^= x2;			\
214	x4  = x0;	x0 &= x3;	x2 ^= x3;	\
215	x0 ^= x2;	x3 ^= x1;	x2 |= x4;	\
216	x2 ^= x3;	x3 &= x0;	x0 = ~x0;	\
217	x3 ^= x1;	x1 &= x2;	x4 ^= x0;	\
218	x3 ^= x4;	x4 ^= x2;	x0 ^= x1;	\
219	x2 ^= x0;					\
220	})
221
222#define SI7(x0, x1, x2, x3, x4) ({			\
223	x4  = x3;	x3 &= x0;	x0 ^= x2;	\
224	x2 |= x4;	x4 ^= x1;	x0 = ~x0;	\
225	x1 |= x3;	x4 ^= x0;	x0 &= x2;	\
226	x0 ^= x1;	x1 &= x2;	x3 ^= x2;	\
227	x4 ^= x3;	x2 &= x3;	x3 |= x0;	\
228	x1 ^= x4;	x3 ^= x4;	x4 &= x0;	\
229	x4 ^= x2;					\
230	})
231
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
232int __serpent_setkey(struct serpent_ctx *ctx, const u8 *key,
233		     unsigned int keylen)
234{
235	u32 *k = ctx->expkey;
236	u8  *k8 = (u8 *)k;
237	u32 r0, r1, r2, r3, r4;
 
238	int i;
239
240	/* Copy key, add padding */
241
242	for (i = 0; i < keylen; ++i)
243		k8[i] = key[i];
244	if (i < SERPENT_MAX_KEY_SIZE)
245		k8[i++] = 1;
246	while (i < SERPENT_MAX_KEY_SIZE)
247		k8[i++] = 0;
248
 
 
 
 
 
 
 
 
 
 
249	/* Expand key using polynomial */
250
251	r0 = le32_to_cpu(k[3]);
252	r1 = le32_to_cpu(k[4]);
253	r2 = le32_to_cpu(k[5]);
254	r3 = le32_to_cpu(k[6]);
255	r4 = le32_to_cpu(k[7]);
256
257	keyiter(le32_to_cpu(k[0]), r0, r4, r2, 0, 0);
258	keyiter(le32_to_cpu(k[1]), r1, r0, r3, 1, 1);
259	keyiter(le32_to_cpu(k[2]), r2, r1, r4, 2, 2);
260	keyiter(le32_to_cpu(k[3]), r3, r2, r0, 3, 3);
261	keyiter(le32_to_cpu(k[4]), r4, r3, r1, 4, 4);
262	keyiter(le32_to_cpu(k[5]), r0, r4, r2, 5, 5);
263	keyiter(le32_to_cpu(k[6]), r1, r0, r3, 6, 6);
264	keyiter(le32_to_cpu(k[7]), r2, r1, r4, 7, 7);
265
266	keyiter(k[0], r3, r2, r0, 8, 8);
267	keyiter(k[1], r4, r3, r1, 9, 9);
268	keyiter(k[2], r0, r4, r2, 10, 10);
269	keyiter(k[3], r1, r0, r3, 11, 11);
270	keyiter(k[4], r2, r1, r4, 12, 12);
271	keyiter(k[5], r3, r2, r0, 13, 13);
272	keyiter(k[6], r4, r3, r1, 14, 14);
273	keyiter(k[7], r0, r4, r2, 15, 15);
274	keyiter(k[8], r1, r0, r3, 16, 16);
275	keyiter(k[9], r2, r1, r4, 17, 17);
276	keyiter(k[10], r3, r2, r0, 18, 18);
277	keyiter(k[11], r4, r3, r1, 19, 19);
278	keyiter(k[12], r0, r4, r2, 20, 20);
279	keyiter(k[13], r1, r0, r3, 21, 21);
280	keyiter(k[14], r2, r1, r4, 22, 22);
281	keyiter(k[15], r3, r2, r0, 23, 23);
282	keyiter(k[16], r4, r3, r1, 24, 24);
283	keyiter(k[17], r0, r4, r2, 25, 25);
284	keyiter(k[18], r1, r0, r3, 26, 26);
285	keyiter(k[19], r2, r1, r4, 27, 27);
286	keyiter(k[20], r3, r2, r0, 28, 28);
287	keyiter(k[21], r4, r3, r1, 29, 29);
288	keyiter(k[22], r0, r4, r2, 30, 30);
289	keyiter(k[23], r1, r0, r3, 31, 31);
290
291	k += 50;
292
293	keyiter(k[-26], r2, r1, r4, 32, -18);
294	keyiter(k[-25], r3, r2, r0, 33, -17);
295	keyiter(k[-24], r4, r3, r1, 34, -16);
296	keyiter(k[-23], r0, r4, r2, 35, -15);
297	keyiter(k[-22], r1, r0, r3, 36, -14);
298	keyiter(k[-21], r2, r1, r4, 37, -13);
299	keyiter(k[-20], r3, r2, r0, 38, -12);
300	keyiter(k[-19], r4, r3, r1, 39, -11);
301	keyiter(k[-18], r0, r4, r2, 40, -10);
302	keyiter(k[-17], r1, r0, r3, 41, -9);
303	keyiter(k[-16], r2, r1, r4, 42, -8);
304	keyiter(k[-15], r3, r2, r0, 43, -7);
305	keyiter(k[-14], r4, r3, r1, 44, -6);
306	keyiter(k[-13], r0, r4, r2, 45, -5);
307	keyiter(k[-12], r1, r0, r3, 46, -4);
308	keyiter(k[-11], r2, r1, r4, 47, -3);
309	keyiter(k[-10], r3, r2, r0, 48, -2);
310	keyiter(k[-9], r4, r3, r1, 49, -1);
311	keyiter(k[-8], r0, r4, r2, 50, 0);
312	keyiter(k[-7], r1, r0, r3, 51, 1);
313	keyiter(k[-6], r2, r1, r4, 52, 2);
314	keyiter(k[-5], r3, r2, r0, 53, 3);
315	keyiter(k[-4], r4, r3, r1, 54, 4);
316	keyiter(k[-3], r0, r4, r2, 55, 5);
317	keyiter(k[-2], r1, r0, r3, 56, 6);
318	keyiter(k[-1], r2, r1, r4, 57, 7);
319	keyiter(k[0], r3, r2, r0, 58, 8);
320	keyiter(k[1], r4, r3, r1, 59, 9);
321	keyiter(k[2], r0, r4, r2, 60, 10);
322	keyiter(k[3], r1, r0, r3, 61, 11);
323	keyiter(k[4], r2, r1, r4, 62, 12);
324	keyiter(k[5], r3, r2, r0, 63, 13);
325	keyiter(k[6], r4, r3, r1, 64, 14);
326	keyiter(k[7], r0, r4, r2, 65, 15);
327	keyiter(k[8], r1, r0, r3, 66, 16);
328	keyiter(k[9], r2, r1, r4, 67, 17);
329	keyiter(k[10], r3, r2, r0, 68, 18);
330	keyiter(k[11], r4, r3, r1, 69, 19);
331	keyiter(k[12], r0, r4, r2, 70, 20);
332	keyiter(k[13], r1, r0, r3, 71, 21);
333	keyiter(k[14], r2, r1, r4, 72, 22);
334	keyiter(k[15], r3, r2, r0, 73, 23);
335	keyiter(k[16], r4, r3, r1, 74, 24);
336	keyiter(k[17], r0, r4, r2, 75, 25);
337	keyiter(k[18], r1, r0, r3, 76, 26);
338	keyiter(k[19], r2, r1, r4, 77, 27);
339	keyiter(k[20], r3, r2, r0, 78, 28);
340	keyiter(k[21], r4, r3, r1, 79, 29);
341	keyiter(k[22], r0, r4, r2, 80, 30);
342	keyiter(k[23], r1, r0, r3, 81, 31);
343
344	k += 50;
345
346	keyiter(k[-26], r2, r1, r4, 82, -18);
347	keyiter(k[-25], r3, r2, r0, 83, -17);
348	keyiter(k[-24], r4, r3, r1, 84, -16);
349	keyiter(k[-23], r0, r4, r2, 85, -15);
350	keyiter(k[-22], r1, r0, r3, 86, -14);
351	keyiter(k[-21], r2, r1, r4, 87, -13);
352	keyiter(k[-20], r3, r2, r0, 88, -12);
353	keyiter(k[-19], r4, r3, r1, 89, -11);
354	keyiter(k[-18], r0, r4, r2, 90, -10);
355	keyiter(k[-17], r1, r0, r3, 91, -9);
356	keyiter(k[-16], r2, r1, r4, 92, -8);
357	keyiter(k[-15], r3, r2, r0, 93, -7);
358	keyiter(k[-14], r4, r3, r1, 94, -6);
359	keyiter(k[-13], r0, r4, r2, 95, -5);
360	keyiter(k[-12], r1, r0, r3, 96, -4);
361	keyiter(k[-11], r2, r1, r4, 97, -3);
362	keyiter(k[-10], r3, r2, r0, 98, -2);
363	keyiter(k[-9], r4, r3, r1, 99, -1);
364	keyiter(k[-8], r0, r4, r2, 100, 0);
365	keyiter(k[-7], r1, r0, r3, 101, 1);
366	keyiter(k[-6], r2, r1, r4, 102, 2);
367	keyiter(k[-5], r3, r2, r0, 103, 3);
368	keyiter(k[-4], r4, r3, r1, 104, 4);
369	keyiter(k[-3], r0, r4, r2, 105, 5);
370	keyiter(k[-2], r1, r0, r3, 106, 6);
371	keyiter(k[-1], r2, r1, r4, 107, 7);
372	keyiter(k[0], r3, r2, r0, 108, 8);
373	keyiter(k[1], r4, r3, r1, 109, 9);
374	keyiter(k[2], r0, r4, r2, 110, 10);
375	keyiter(k[3], r1, r0, r3, 111, 11);
376	keyiter(k[4], r2, r1, r4, 112, 12);
377	keyiter(k[5], r3, r2, r0, 113, 13);
378	keyiter(k[6], r4, r3, r1, 114, 14);
379	keyiter(k[7], r0, r4, r2, 115, 15);
380	keyiter(k[8], r1, r0, r3, 116, 16);
381	keyiter(k[9], r2, r1, r4, 117, 17);
382	keyiter(k[10], r3, r2, r0, 118, 18);
383	keyiter(k[11], r4, r3, r1, 119, 19);
384	keyiter(k[12], r0, r4, r2, 120, 20);
385	keyiter(k[13], r1, r0, r3, 121, 21);
386	keyiter(k[14], r2, r1, r4, 122, 22);
387	keyiter(k[15], r3, r2, r0, 123, 23);
388	keyiter(k[16], r4, r3, r1, 124, 24);
389	keyiter(k[17], r0, r4, r2, 125, 25);
390	keyiter(k[18], r1, r0, r3, 126, 26);
391	keyiter(k[19], r2, r1, r4, 127, 27);
392	keyiter(k[20], r3, r2, r0, 128, 28);
393	keyiter(k[21], r4, r3, r1, 129, 29);
394	keyiter(k[22], r0, r4, r2, 130, 30);
395	keyiter(k[23], r1, r0, r3, 131, 31);
396
397	/* Apply S-boxes */
398
399	S3(r3, r4, r0, r1, r2); store_and_load_keys(r1, r2, r4, r3, 28, 24);
400	S4(r1, r2, r4, r3, r0); store_and_load_keys(r2, r4, r3, r0, 24, 20);
401	S5(r2, r4, r3, r0, r1); store_and_load_keys(r1, r2, r4, r0, 20, 16);
402	S6(r1, r2, r4, r0, r3); store_and_load_keys(r4, r3, r2, r0, 16, 12);
403	S7(r4, r3, r2, r0, r1); store_and_load_keys(r1, r2, r0, r4, 12, 8);
404	S0(r1, r2, r0, r4, r3); store_and_load_keys(r0, r2, r4, r1, 8, 4);
405	S1(r0, r2, r4, r1, r3); store_and_load_keys(r3, r4, r1, r0, 4, 0);
406	S2(r3, r4, r1, r0, r2); store_and_load_keys(r2, r4, r3, r0, 0, -4);
407	S3(r2, r4, r3, r0, r1); store_and_load_keys(r0, r1, r4, r2, -4, -8);
408	S4(r0, r1, r4, r2, r3); store_and_load_keys(r1, r4, r2, r3, -8, -12);
409	S5(r1, r4, r2, r3, r0); store_and_load_keys(r0, r1, r4, r3, -12, -16);
410	S6(r0, r1, r4, r3, r2); store_and_load_keys(r4, r2, r1, r3, -16, -20);
411	S7(r4, r2, r1, r3, r0); store_and_load_keys(r0, r1, r3, r4, -20, -24);
412	S0(r0, r1, r3, r4, r2); store_and_load_keys(r3, r1, r4, r0, -24, -28);
413	k -= 50;
414	S1(r3, r1, r4, r0, r2); store_and_load_keys(r2, r4, r0, r3, 22, 18);
415	S2(r2, r4, r0, r3, r1); store_and_load_keys(r1, r4, r2, r3, 18, 14);
416	S3(r1, r4, r2, r3, r0); store_and_load_keys(r3, r0, r4, r1, 14, 10);
417	S4(r3, r0, r4, r1, r2); store_and_load_keys(r0, r4, r1, r2, 10, 6);
418	S5(r0, r4, r1, r2, r3); store_and_load_keys(r3, r0, r4, r2, 6, 2);
419	S6(r3, r0, r4, r2, r1); store_and_load_keys(r4, r1, r0, r2, 2, -2);
420	S7(r4, r1, r0, r2, r3); store_and_load_keys(r3, r0, r2, r4, -2, -6);
421	S0(r3, r0, r2, r4, r1); store_and_load_keys(r2, r0, r4, r3, -6, -10);
422	S1(r2, r0, r4, r3, r1); store_and_load_keys(r1, r4, r3, r2, -10, -14);
423	S2(r1, r4, r3, r2, r0); store_and_load_keys(r0, r4, r1, r2, -14, -18);
424	S3(r0, r4, r1, r2, r3); store_and_load_keys(r2, r3, r4, r0, -18, -22);
425	k -= 50;
426	S4(r2, r3, r4, r0, r1); store_and_load_keys(r3, r4, r0, r1, 28, 24);
427	S5(r3, r4, r0, r1, r2); store_and_load_keys(r2, r3, r4, r1, 24, 20);
428	S6(r2, r3, r4, r1, r0); store_and_load_keys(r4, r0, r3, r1, 20, 16);
429	S7(r4, r0, r3, r1, r2); store_and_load_keys(r2, r3, r1, r4, 16, 12);
430	S0(r2, r3, r1, r4, r0); store_and_load_keys(r1, r3, r4, r2, 12, 8);
431	S1(r1, r3, r4, r2, r0); store_and_load_keys(r0, r4, r2, r1, 8, 4);
432	S2(r0, r4, r2, r1, r3); store_and_load_keys(r3, r4, r0, r1, 4, 0);
433	S3(r3, r4, r0, r1, r2); storekeys(r1, r2, r4, r3, 0);
434
435	return 0;
436}
437EXPORT_SYMBOL_GPL(__serpent_setkey);
438
439int serpent_setkey(struct crypto_tfm *tfm, const u8 *key, unsigned int keylen)
440{
441	return __serpent_setkey(crypto_tfm_ctx(tfm), key, keylen);
442}
443EXPORT_SYMBOL_GPL(serpent_setkey);
444
445void __serpent_encrypt(struct serpent_ctx *ctx, u8 *dst, const u8 *src)
446{
 
447	const u32 *k = ctx->expkey;
448	const __le32 *s = (const __le32 *)src;
449	__le32	*d = (__le32 *)dst;
450	u32	r0, r1, r2, r3, r4;
451
452/*
453 * Note: The conversions between u8* and u32* might cause trouble
454 * on architectures with stricter alignment rules than x86
455 */
456
457	r0 = le32_to_cpu(s[0]);
458	r1 = le32_to_cpu(s[1]);
459	r2 = le32_to_cpu(s[2]);
460	r3 = le32_to_cpu(s[3]);
461
462					K(r0, r1, r2, r3, 0);
463	S0(r0, r1, r2, r3, r4);		LK(r2, r1, r3, r0, r4, 1);
464	S1(r2, r1, r3, r0, r4);		LK(r4, r3, r0, r2, r1, 2);
465	S2(r4, r3, r0, r2, r1);		LK(r1, r3, r4, r2, r0, 3);
466	S3(r1, r3, r4, r2, r0);		LK(r2, r0, r3, r1, r4, 4);
467	S4(r2, r0, r3, r1, r4);		LK(r0, r3, r1, r4, r2, 5);
468	S5(r0, r3, r1, r4, r2);		LK(r2, r0, r3, r4, r1, 6);
469	S6(r2, r0, r3, r4, r1);		LK(r3, r1, r0, r4, r2, 7);
470	S7(r3, r1, r0, r4, r2);		LK(r2, r0, r4, r3, r1, 8);
471	S0(r2, r0, r4, r3, r1);		LK(r4, r0, r3, r2, r1, 9);
472	S1(r4, r0, r3, r2, r1);		LK(r1, r3, r2, r4, r0, 10);
473	S2(r1, r3, r2, r4, r0);		LK(r0, r3, r1, r4, r2, 11);
474	S3(r0, r3, r1, r4, r2);		LK(r4, r2, r3, r0, r1, 12);
475	S4(r4, r2, r3, r0, r1);		LK(r2, r3, r0, r1, r4, 13);
476	S5(r2, r3, r0, r1, r4);		LK(r4, r2, r3, r1, r0, 14);
477	S6(r4, r2, r3, r1, r0);		LK(r3, r0, r2, r1, r4, 15);
478	S7(r3, r0, r2, r1, r4);		LK(r4, r2, r1, r3, r0, 16);
479	S0(r4, r2, r1, r3, r0);		LK(r1, r2, r3, r4, r0, 17);
480	S1(r1, r2, r3, r4, r0);		LK(r0, r3, r4, r1, r2, 18);
481	S2(r0, r3, r4, r1, r2);		LK(r2, r3, r0, r1, r4, 19);
482	S3(r2, r3, r0, r1, r4);		LK(r1, r4, r3, r2, r0, 20);
483	S4(r1, r4, r3, r2, r0);		LK(r4, r3, r2, r0, r1, 21);
484	S5(r4, r3, r2, r0, r1);		LK(r1, r4, r3, r0, r2, 22);
485	S6(r1, r4, r3, r0, r2);		LK(r3, r2, r4, r0, r1, 23);
486	S7(r3, r2, r4, r0, r1);		LK(r1, r4, r0, r3, r2, 24);
487	S0(r1, r4, r0, r3, r2);		LK(r0, r4, r3, r1, r2, 25);
488	S1(r0, r4, r3, r1, r2);		LK(r2, r3, r1, r0, r4, 26);
489	S2(r2, r3, r1, r0, r4);		LK(r4, r3, r2, r0, r1, 27);
490	S3(r4, r3, r2, r0, r1);		LK(r0, r1, r3, r4, r2, 28);
491	S4(r0, r1, r3, r4, r2);		LK(r1, r3, r4, r2, r0, 29);
492	S5(r1, r3, r4, r2, r0);		LK(r0, r1, r3, r2, r4, 30);
493	S6(r0, r1, r3, r2, r4);		LK(r3, r4, r1, r2, r0, 31);
494	S7(r3, r4, r1, r2, r0);		K(r0, r1, r2, r3, 32);
495
496	d[0] = cpu_to_le32(r0);
497	d[1] = cpu_to_le32(r1);
498	d[2] = cpu_to_le32(r2);
499	d[3] = cpu_to_le32(r3);
500}
501EXPORT_SYMBOL_GPL(__serpent_encrypt);
502
503static void serpent_encrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
504{
505	struct serpent_ctx *ctx = crypto_tfm_ctx(tfm);
506
507	__serpent_encrypt(ctx, dst, src);
508}
509
510void __serpent_decrypt(struct serpent_ctx *ctx, u8 *dst, const u8 *src)
511{
 
512	const u32 *k = ctx->expkey;
513	const __le32 *s = (const __le32 *)src;
514	__le32	*d = (__le32 *)dst;
515	u32	r0, r1, r2, r3, r4;
516
517	r0 = le32_to_cpu(s[0]);
518	r1 = le32_to_cpu(s[1]);
519	r2 = le32_to_cpu(s[2]);
520	r3 = le32_to_cpu(s[3]);
521
522					K(r0, r1, r2, r3, 32);
523	SI7(r0, r1, r2, r3, r4);	KL(r1, r3, r0, r4, r2, 31);
524	SI6(r1, r3, r0, r4, r2);	KL(r0, r2, r4, r1, r3, 30);
525	SI5(r0, r2, r4, r1, r3);	KL(r2, r3, r0, r4, r1, 29);
526	SI4(r2, r3, r0, r4, r1);	KL(r2, r0, r1, r4, r3, 28);
527	SI3(r2, r0, r1, r4, r3);	KL(r1, r2, r3, r4, r0, 27);
528	SI2(r1, r2, r3, r4, r0);	KL(r2, r0, r4, r3, r1, 26);
529	SI1(r2, r0, r4, r3, r1);	KL(r1, r0, r4, r3, r2, 25);
530	SI0(r1, r0, r4, r3, r2);	KL(r4, r2, r0, r1, r3, 24);
531	SI7(r4, r2, r0, r1, r3);	KL(r2, r1, r4, r3, r0, 23);
532	SI6(r2, r1, r4, r3, r0);	KL(r4, r0, r3, r2, r1, 22);
533	SI5(r4, r0, r3, r2, r1);	KL(r0, r1, r4, r3, r2, 21);
534	SI4(r0, r1, r4, r3, r2);	KL(r0, r4, r2, r3, r1, 20);
535	SI3(r0, r4, r2, r3, r1);	KL(r2, r0, r1, r3, r4, 19);
536	SI2(r2, r0, r1, r3, r4);	KL(r0, r4, r3, r1, r2, 18);
537	SI1(r0, r4, r3, r1, r2);	KL(r2, r4, r3, r1, r0, 17);
538	SI0(r2, r4, r3, r1, r0);	KL(r3, r0, r4, r2, r1, 16);
539	SI7(r3, r0, r4, r2, r1);	KL(r0, r2, r3, r1, r4, 15);
540	SI6(r0, r2, r3, r1, r4);	KL(r3, r4, r1, r0, r2, 14);
541	SI5(r3, r4, r1, r0, r2);	KL(r4, r2, r3, r1, r0, 13);
542	SI4(r4, r2, r3, r1, r0);	KL(r4, r3, r0, r1, r2, 12);
543	SI3(r4, r3, r0, r1, r2);	KL(r0, r4, r2, r1, r3, 11);
544	SI2(r0, r4, r2, r1, r3);	KL(r4, r3, r1, r2, r0, 10);
545	SI1(r4, r3, r1, r2, r0);	KL(r0, r3, r1, r2, r4, 9);
546	SI0(r0, r3, r1, r2, r4);	KL(r1, r4, r3, r0, r2, 8);
547	SI7(r1, r4, r3, r0, r2);	KL(r4, r0, r1, r2, r3, 7);
548	SI6(r4, r0, r1, r2, r3);	KL(r1, r3, r2, r4, r0, 6);
549	SI5(r1, r3, r2, r4, r0);	KL(r3, r0, r1, r2, r4, 5);
550	SI4(r3, r0, r1, r2, r4);	KL(r3, r1, r4, r2, r0, 4);
551	SI3(r3, r1, r4, r2, r0);	KL(r4, r3, r0, r2, r1, 3);
552	SI2(r4, r3, r0, r2, r1);	KL(r3, r1, r2, r0, r4, 2);
553	SI1(r3, r1, r2, r0, r4);	KL(r4, r1, r2, r0, r3, 1);
554	SI0(r4, r1, r2, r0, r3);	K(r2, r3, r1, r4, 0);
555
556	d[0] = cpu_to_le32(r2);
557	d[1] = cpu_to_le32(r3);
558	d[2] = cpu_to_le32(r1);
559	d[3] = cpu_to_le32(r4);
560}
561EXPORT_SYMBOL_GPL(__serpent_decrypt);
562
563static void serpent_decrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
564{
565	struct serpent_ctx *ctx = crypto_tfm_ctx(tfm);
566
567	__serpent_decrypt(ctx, dst, src);
568}
569
570static int tnepres_setkey(struct crypto_tfm *tfm, const u8 *key,
571			  unsigned int keylen)
572{
573	u8 rev_key[SERPENT_MAX_KEY_SIZE];
574	int i;
575
576	for (i = 0; i < keylen; ++i)
577		rev_key[keylen - i - 1] = key[i];
578
579	return serpent_setkey(tfm, rev_key, keylen);
580}
581
582static void tnepres_encrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
583{
584	const u32 * const s = (const u32 * const)src;
585	u32 * const d = (u32 * const)dst;
586
587	u32 rs[4], rd[4];
588
589	rs[0] = swab32(s[3]);
590	rs[1] = swab32(s[2]);
591	rs[2] = swab32(s[1]);
592	rs[3] = swab32(s[0]);
593
594	serpent_encrypt(tfm, (u8 *)rd, (u8 *)rs);
595
596	d[0] = swab32(rd[3]);
597	d[1] = swab32(rd[2]);
598	d[2] = swab32(rd[1]);
599	d[3] = swab32(rd[0]);
600}
601
602static void tnepres_decrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
603{
604	const u32 * const s = (const u32 * const)src;
605	u32 * const d = (u32 * const)dst;
606
607	u32 rs[4], rd[4];
608
609	rs[0] = swab32(s[3]);
610	rs[1] = swab32(s[2]);
611	rs[2] = swab32(s[1]);
612	rs[3] = swab32(s[0]);
613
614	serpent_decrypt(tfm, (u8 *)rd, (u8 *)rs);
615
616	d[0] = swab32(rd[3]);
617	d[1] = swab32(rd[2]);
618	d[2] = swab32(rd[1]);
619	d[3] = swab32(rd[0]);
620}
621
622static struct crypto_alg srp_algs[2] = { {
623	.cra_name		=	"serpent",
624	.cra_driver_name	=	"serpent-generic",
625	.cra_priority		=	100,
626	.cra_flags		=	CRYPTO_ALG_TYPE_CIPHER,
627	.cra_blocksize		=	SERPENT_BLOCK_SIZE,
628	.cra_ctxsize		=	sizeof(struct serpent_ctx),
629	.cra_alignmask		=	3,
630	.cra_module		=	THIS_MODULE,
631	.cra_u			=	{ .cipher = {
632	.cia_min_keysize	=	SERPENT_MIN_KEY_SIZE,
633	.cia_max_keysize	=	SERPENT_MAX_KEY_SIZE,
634	.cia_setkey		=	serpent_setkey,
635	.cia_encrypt		=	serpent_encrypt,
636	.cia_decrypt		=	serpent_decrypt } }
637}, {
638	.cra_name		=	"tnepres",
639	.cra_flags		=	CRYPTO_ALG_TYPE_CIPHER,
640	.cra_blocksize		=	SERPENT_BLOCK_SIZE,
641	.cra_ctxsize		=	sizeof(struct serpent_ctx),
642	.cra_alignmask		=	3,
643	.cra_module		=	THIS_MODULE,
644	.cra_u			=	{ .cipher = {
645	.cia_min_keysize	=	SERPENT_MIN_KEY_SIZE,
646	.cia_max_keysize	=	SERPENT_MAX_KEY_SIZE,
647	.cia_setkey		=	tnepres_setkey,
648	.cia_encrypt		=	tnepres_encrypt,
649	.cia_decrypt		=	tnepres_decrypt } }
650} };
651
652static int __init serpent_mod_init(void)
653{
654	return crypto_register_algs(srp_algs, ARRAY_SIZE(srp_algs));
655}
656
657static void __exit serpent_mod_fini(void)
658{
659	crypto_unregister_algs(srp_algs, ARRAY_SIZE(srp_algs));
660}
661
662module_init(serpent_mod_init);
663module_exit(serpent_mod_fini);
664
665MODULE_LICENSE("GPL");
666MODULE_DESCRIPTION("Serpent and tnepres (kerneli compatible serpent reversed) Cipher Algorithm");
667MODULE_AUTHOR("Dag Arne Osvik <osvik@ii.uib.no>");
668MODULE_ALIAS_CRYPTO("tnepres");
669MODULE_ALIAS_CRYPTO("serpent");
670MODULE_ALIAS_CRYPTO("serpent-generic");
v6.8
  1// SPDX-License-Identifier: GPL-2.0-or-later
  2/*
  3 * Cryptographic API.
  4 *
  5 * Serpent Cipher Algorithm.
  6 *
  7 * Copyright (C) 2002 Dag Arne Osvik <osvik@ii.uib.no>
 
 
 
 
 
 
 
 
 
 
  8 */
  9
 10#include <crypto/algapi.h>
 11#include <linux/init.h>
 12#include <linux/module.h>
 13#include <linux/errno.h>
 14#include <asm/unaligned.h>
 
 15#include <linux/types.h>
 16#include <crypto/serpent.h>
 17
 18/* Key is padded to the maximum of 256 bits before round key generation.
 19 * Any key length <= 256 bits (32 bytes) is allowed by the algorithm.
 20 */
 21
 22#define PHI 0x9e3779b9UL
 23
 24#define keyiter(a, b, c, d, i, j) \
 25	({ b ^= d; b ^= c; b ^= a; b ^= PHI ^ i; b = rol32(b, 11); k[j] = b; })
 26
 27#define loadkeys(x0, x1, x2, x3, i) \
 28	({ x0 = k[i]; x1 = k[i+1]; x2 = k[i+2]; x3 = k[i+3]; })
 29
 30#define storekeys(x0, x1, x2, x3, i) \
 31	({ k[i] = x0; k[i+1] = x1; k[i+2] = x2; k[i+3] = x3; })
 32
 33#define store_and_load_keys(x0, x1, x2, x3, s, l) \
 34	({ storekeys(x0, x1, x2, x3, s); loadkeys(x0, x1, x2, x3, l); })
 35
 36#define K(x0, x1, x2, x3, i) ({				\
 37	x3 ^= k[4*(i)+3];        x2 ^= k[4*(i)+2];	\
 38	x1 ^= k[4*(i)+1];        x0 ^= k[4*(i)+0];	\
 39	})
 40
 41#define LK(x0, x1, x2, x3, x4, i) ({					   \
 42							x0 = rol32(x0, 13);\
 43	x2 = rol32(x2, 3);	x1 ^= x0;		x4  = x0 << 3;	   \
 44	x3 ^= x2;		x1 ^= x2;				   \
 45	x1 = rol32(x1, 1);	x3 ^= x4;				   \
 46	x3 = rol32(x3, 7);	x4  = x1;				   \
 47	x0 ^= x1;		x4 <<= 7;		x2 ^= x3;	   \
 48	x0 ^= x3;		x2 ^= x4;		x3 ^= k[4*i+3];	   \
 49	x1 ^= k[4*i+1];		x0 = rol32(x0, 5);	x2 = rol32(x2, 22);\
 50	x0 ^= k[4*i+0];		x2 ^= k[4*i+2];				   \
 51	})
 52
 53#define KL(x0, x1, x2, x3, x4, i) ({					   \
 54	x0 ^= k[4*i+0];		x1 ^= k[4*i+1];		x2 ^= k[4*i+2];	   \
 55	x3 ^= k[4*i+3];		x0 = ror32(x0, 5);	x2 = ror32(x2, 22);\
 56	x4 =  x1;		x2 ^= x3;		x0 ^= x3;	   \
 57	x4 <<= 7;		x0 ^= x1;		x1 = ror32(x1, 1); \
 58	x2 ^= x4;		x3 = ror32(x3, 7);	x4 = x0 << 3;	   \
 59	x1 ^= x0;		x3 ^= x4;		x0 = ror32(x0, 13);\
 60	x1 ^= x2;		x3 ^= x2;		x2 = ror32(x2, 3); \
 61	})
 62
 63#define S0(x0, x1, x2, x3, x4) ({			\
 64					x4  = x3;	\
 65	x3 |= x0;	x0 ^= x4;	x4 ^= x2;	\
 66	x4 = ~x4;	x3 ^= x1;	x1 &= x0;	\
 67	x1 ^= x4;	x2 ^= x0;	x0 ^= x3;	\
 68	x4 |= x0;	x0 ^= x2;	x2 &= x1;	\
 69	x3 ^= x2;	x1 = ~x1;	x2 ^= x4;	\
 70	x1 ^= x2;					\
 71	})
 72
 73#define S1(x0, x1, x2, x3, x4) ({			\
 74					x4  = x1;	\
 75	x1 ^= x0;	x0 ^= x3;	x3 = ~x3;	\
 76	x4 &= x1;	x0 |= x1;	x3 ^= x2;	\
 77	x0 ^= x3;	x1 ^= x3;	x3 ^= x4;	\
 78	x1 |= x4;	x4 ^= x2;	x2 &= x0;	\
 79	x2 ^= x1;	x1 |= x0;	x0 = ~x0;	\
 80	x0 ^= x2;	x4 ^= x1;			\
 81	})
 82
 83#define S2(x0, x1, x2, x3, x4) ({			\
 84					x3 = ~x3;	\
 85	x1 ^= x0;	x4  = x0;	x0 &= x2;	\
 86	x0 ^= x3;	x3 |= x4;	x2 ^= x1;	\
 87	x3 ^= x1;	x1 &= x0;	x0 ^= x2;	\
 88	x2 &= x3;	x3 |= x1;	x0 = ~x0;	\
 89	x3 ^= x0;	x4 ^= x0;	x0 ^= x2;	\
 90	x1 |= x2;					\
 91	})
 92
 93#define S3(x0, x1, x2, x3, x4) ({			\
 94					x4  = x1;	\
 95	x1 ^= x3;	x3 |= x0;	x4 &= x0;	\
 96	x0 ^= x2;	x2 ^= x1;	x1 &= x3;	\
 97	x2 ^= x3;	x0 |= x4;	x4 ^= x3;	\
 98	x1 ^= x0;	x0 &= x3;	x3 &= x4;	\
 99	x3 ^= x2;	x4 |= x1;	x2 &= x1;	\
100	x4 ^= x3;	x0 ^= x3;	x3 ^= x2;	\
101	})
102
103#define S4(x0, x1, x2, x3, x4) ({			\
104					x4  = x3;	\
105	x3 &= x0;	x0 ^= x4;			\
106	x3 ^= x2;	x2 |= x4;	x0 ^= x1;	\
107	x4 ^= x3;	x2 |= x0;			\
108	x2 ^= x1;	x1 &= x0;			\
109	x1 ^= x4;	x4 &= x2;	x2 ^= x3;	\
110	x4 ^= x0;	x3 |= x1;	x1 = ~x1;	\
111	x3 ^= x0;					\
112	})
113
114#define S5(x0, x1, x2, x3, x4) ({			\
115	x4  = x1;	x1 |= x0;			\
116	x2 ^= x1;	x3 = ~x3;	x4 ^= x0;	\
117	x0 ^= x2;	x1 &= x4;	x4 |= x3;	\
118	x4 ^= x0;	x0 &= x3;	x1 ^= x3;	\
119	x3 ^= x2;	x0 ^= x1;	x2 &= x4;	\
120	x1 ^= x2;	x2 &= x0;			\
121	x3 ^= x2;					\
122	})
123
124#define S6(x0, x1, x2, x3, x4) ({			\
125					x4  = x1;	\
126	x3 ^= x0;	x1 ^= x2;	x2 ^= x0;	\
127	x0 &= x3;	x1 |= x3;	x4 = ~x4;	\
128	x0 ^= x1;	x1 ^= x2;			\
129	x3 ^= x4;	x4 ^= x0;	x2 &= x0;	\
130	x4 ^= x1;	x2 ^= x3;	x3 &= x1;	\
131	x3 ^= x0;	x1 ^= x2;			\
132	})
133
134#define S7(x0, x1, x2, x3, x4) ({			\
135					x1 = ~x1;	\
136	x4  = x1;	x0 = ~x0;	x1 &= x2;	\
137	x1 ^= x3;	x3 |= x4;	x4 ^= x2;	\
138	x2 ^= x3;	x3 ^= x0;	x0 |= x1;	\
139	x2 &= x0;	x0 ^= x4;	x4 ^= x3;	\
140	x3 &= x0;	x4 ^= x1;			\
141	x2 ^= x4;	x3 ^= x1;	x4 |= x0;	\
142	x4 ^= x1;					\
143	})
144
145#define SI0(x0, x1, x2, x3, x4) ({			\
146			x4  = x3;	x1 ^= x0;	\
147	x3 |= x1;	x4 ^= x1;	x0 = ~x0;	\
148	x2 ^= x3;	x3 ^= x0;	x0 &= x1;	\
149	x0 ^= x2;	x2 &= x3;	x3 ^= x4;	\
150	x2 ^= x3;	x1 ^= x3;	x3 &= x0;	\
151	x1 ^= x0;	x0 ^= x2;	x4 ^= x3;	\
152	})
153
154#define SI1(x0, x1, x2, x3, x4) ({			\
155	x1 ^= x3;	x4  = x0;			\
156	x0 ^= x2;	x2 = ~x2;	x4 |= x1;	\
157	x4 ^= x3;	x3 &= x1;	x1 ^= x2;	\
158	x2 &= x4;	x4 ^= x1;	x1 |= x3;	\
159	x3 ^= x0;	x2 ^= x0;	x0 |= x4;	\
160	x2 ^= x4;	x1 ^= x0;			\
161	x4 ^= x1;					\
162	})
163
164#define SI2(x0, x1, x2, x3, x4) ({			\
165	x2 ^= x1;	x4  = x3;	x3 = ~x3;	\
166	x3 |= x2;	x2 ^= x4;	x4 ^= x0;	\
167	x3 ^= x1;	x1 |= x2;	x2 ^= x0;	\
168	x1 ^= x4;	x4 |= x3;	x2 ^= x3;	\
169	x4 ^= x2;	x2 &= x1;			\
170	x2 ^= x3;	x3 ^= x4;	x4 ^= x0;	\
171	})
172
173#define SI3(x0, x1, x2, x3, x4) ({			\
174					x2 ^= x1;	\
175	x4  = x1;	x1 &= x2;			\
176	x1 ^= x0;	x0 |= x4;	x4 ^= x3;	\
177	x0 ^= x3;	x3 |= x1;	x1 ^= x2;	\
178	x1 ^= x3;	x0 ^= x2;	x2 ^= x3;	\
179	x3 &= x1;	x1 ^= x0;	x0 &= x2;	\
180	x4 ^= x3;	x3 ^= x0;	x0 ^= x1;	\
181	})
182
183#define SI4(x0, x1, x2, x3, x4) ({			\
184	x2 ^= x3;	x4  = x0;	x0 &= x1;	\
185	x0 ^= x2;	x2 |= x3;	x4 = ~x4;	\
186	x1 ^= x0;	x0 ^= x2;	x2 &= x4;	\
187	x2 ^= x0;	x0 |= x4;			\
188	x0 ^= x3;	x3 &= x2;			\
189	x4 ^= x3;	x3 ^= x1;	x1 &= x0;	\
190	x4 ^= x1;	x0 ^= x3;			\
191	})
192
193#define SI5(x0, x1, x2, x3, x4) ({			\
194			x4  = x1;	x1 |= x2;	\
195	x2 ^= x4;	x1 ^= x3;	x3 &= x4;	\
196	x2 ^= x3;	x3 |= x0;	x0 = ~x0;	\
197	x3 ^= x2;	x2 |= x0;	x4 ^= x1;	\
198	x2 ^= x4;	x4 &= x0;	x0 ^= x1;	\
199	x1 ^= x3;	x0 &= x2;	x2 ^= x3;	\
200	x0 ^= x2;	x2 ^= x4;	x4 ^= x3;	\
201	})
202
203#define SI6(x0, x1, x2, x3, x4) ({			\
204			x0 ^= x2;			\
205	x4  = x0;	x0 &= x3;	x2 ^= x3;	\
206	x0 ^= x2;	x3 ^= x1;	x2 |= x4;	\
207	x2 ^= x3;	x3 &= x0;	x0 = ~x0;	\
208	x3 ^= x1;	x1 &= x2;	x4 ^= x0;	\
209	x3 ^= x4;	x4 ^= x2;	x0 ^= x1;	\
210	x2 ^= x0;					\
211	})
212
213#define SI7(x0, x1, x2, x3, x4) ({			\
214	x4  = x3;	x3 &= x0;	x0 ^= x2;	\
215	x2 |= x4;	x4 ^= x1;	x0 = ~x0;	\
216	x1 |= x3;	x4 ^= x0;	x0 &= x2;	\
217	x0 ^= x1;	x1 &= x2;	x3 ^= x2;	\
218	x4 ^= x3;	x2 &= x3;	x3 |= x0;	\
219	x1 ^= x4;	x3 ^= x4;	x4 &= x0;	\
220	x4 ^= x2;					\
221	})
222
223/*
224 * both gcc and clang have misoptimized this function in the past,
225 * producing horrible object code from spilling temporary variables
226 * on the stack. Forcing this part out of line avoids that.
227 */
228static noinline void __serpent_setkey_sbox(u32 r0, u32 r1, u32 r2,
229					   u32 r3, u32 r4, u32 *k)
230{
231	k += 100;
232	S3(r3, r4, r0, r1, r2); store_and_load_keys(r1, r2, r4, r3, 28, 24);
233	S4(r1, r2, r4, r3, r0); store_and_load_keys(r2, r4, r3, r0, 24, 20);
234	S5(r2, r4, r3, r0, r1); store_and_load_keys(r1, r2, r4, r0, 20, 16);
235	S6(r1, r2, r4, r0, r3); store_and_load_keys(r4, r3, r2, r0, 16, 12);
236	S7(r4, r3, r2, r0, r1); store_and_load_keys(r1, r2, r0, r4, 12, 8);
237	S0(r1, r2, r0, r4, r3); store_and_load_keys(r0, r2, r4, r1, 8, 4);
238	S1(r0, r2, r4, r1, r3); store_and_load_keys(r3, r4, r1, r0, 4, 0);
239	S2(r3, r4, r1, r0, r2); store_and_load_keys(r2, r4, r3, r0, 0, -4);
240	S3(r2, r4, r3, r0, r1); store_and_load_keys(r0, r1, r4, r2, -4, -8);
241	S4(r0, r1, r4, r2, r3); store_and_load_keys(r1, r4, r2, r3, -8, -12);
242	S5(r1, r4, r2, r3, r0); store_and_load_keys(r0, r1, r4, r3, -12, -16);
243	S6(r0, r1, r4, r3, r2); store_and_load_keys(r4, r2, r1, r3, -16, -20);
244	S7(r4, r2, r1, r3, r0); store_and_load_keys(r0, r1, r3, r4, -20, -24);
245	S0(r0, r1, r3, r4, r2); store_and_load_keys(r3, r1, r4, r0, -24, -28);
246	k -= 50;
247	S1(r3, r1, r4, r0, r2); store_and_load_keys(r2, r4, r0, r3, 22, 18);
248	S2(r2, r4, r0, r3, r1); store_and_load_keys(r1, r4, r2, r3, 18, 14);
249	S3(r1, r4, r2, r3, r0); store_and_load_keys(r3, r0, r4, r1, 14, 10);
250	S4(r3, r0, r4, r1, r2); store_and_load_keys(r0, r4, r1, r2, 10, 6);
251	S5(r0, r4, r1, r2, r3); store_and_load_keys(r3, r0, r4, r2, 6, 2);
252	S6(r3, r0, r4, r2, r1); store_and_load_keys(r4, r1, r0, r2, 2, -2);
253	S7(r4, r1, r0, r2, r3); store_and_load_keys(r3, r0, r2, r4, -2, -6);
254	S0(r3, r0, r2, r4, r1); store_and_load_keys(r2, r0, r4, r3, -6, -10);
255	S1(r2, r0, r4, r3, r1); store_and_load_keys(r1, r4, r3, r2, -10, -14);
256	S2(r1, r4, r3, r2, r0); store_and_load_keys(r0, r4, r1, r2, -14, -18);
257	S3(r0, r4, r1, r2, r3); store_and_load_keys(r2, r3, r4, r0, -18, -22);
258	k -= 50;
259	S4(r2, r3, r4, r0, r1); store_and_load_keys(r3, r4, r0, r1, 28, 24);
260	S5(r3, r4, r0, r1, r2); store_and_load_keys(r2, r3, r4, r1, 24, 20);
261	S6(r2, r3, r4, r1, r0); store_and_load_keys(r4, r0, r3, r1, 20, 16);
262	S7(r4, r0, r3, r1, r2); store_and_load_keys(r2, r3, r1, r4, 16, 12);
263	S0(r2, r3, r1, r4, r0); store_and_load_keys(r1, r3, r4, r2, 12, 8);
264	S1(r1, r3, r4, r2, r0); store_and_load_keys(r0, r4, r2, r1, 8, 4);
265	S2(r0, r4, r2, r1, r3); store_and_load_keys(r3, r4, r0, r1, 4, 0);
266	S3(r3, r4, r0, r1, r2); storekeys(r1, r2, r4, r3, 0);
267}
268
269int __serpent_setkey(struct serpent_ctx *ctx, const u8 *key,
270		     unsigned int keylen)
271{
272	u32 *k = ctx->expkey;
273	u8  *k8 = (u8 *)k;
274	u32 r0, r1, r2, r3, r4;
275	__le32 *lk;
276	int i;
277
278	/* Copy key, add padding */
279
280	for (i = 0; i < keylen; ++i)
281		k8[i] = key[i];
282	if (i < SERPENT_MAX_KEY_SIZE)
283		k8[i++] = 1;
284	while (i < SERPENT_MAX_KEY_SIZE)
285		k8[i++] = 0;
286
287	lk = (__le32 *)k;
288	k[0] = le32_to_cpu(lk[0]);
289	k[1] = le32_to_cpu(lk[1]);
290	k[2] = le32_to_cpu(lk[2]);
291	k[3] = le32_to_cpu(lk[3]);
292	k[4] = le32_to_cpu(lk[4]);
293	k[5] = le32_to_cpu(lk[5]);
294	k[6] = le32_to_cpu(lk[6]);
295	k[7] = le32_to_cpu(lk[7]);
296
297	/* Expand key using polynomial */
298
299	r0 = k[3];
300	r1 = k[4];
301	r2 = k[5];
302	r3 = k[6];
303	r4 = k[7];
304
305	keyiter(k[0], r0, r4, r2, 0, 0);
306	keyiter(k[1], r1, r0, r3, 1, 1);
307	keyiter(k[2], r2, r1, r4, 2, 2);
308	keyiter(k[3], r3, r2, r0, 3, 3);
309	keyiter(k[4], r4, r3, r1, 4, 4);
310	keyiter(k[5], r0, r4, r2, 5, 5);
311	keyiter(k[6], r1, r0, r3, 6, 6);
312	keyiter(k[7], r2, r1, r4, 7, 7);
313
314	keyiter(k[0], r3, r2, r0, 8, 8);
315	keyiter(k[1], r4, r3, r1, 9, 9);
316	keyiter(k[2], r0, r4, r2, 10, 10);
317	keyiter(k[3], r1, r0, r3, 11, 11);
318	keyiter(k[4], r2, r1, r4, 12, 12);
319	keyiter(k[5], r3, r2, r0, 13, 13);
320	keyiter(k[6], r4, r3, r1, 14, 14);
321	keyiter(k[7], r0, r4, r2, 15, 15);
322	keyiter(k[8], r1, r0, r3, 16, 16);
323	keyiter(k[9], r2, r1, r4, 17, 17);
324	keyiter(k[10], r3, r2, r0, 18, 18);
325	keyiter(k[11], r4, r3, r1, 19, 19);
326	keyiter(k[12], r0, r4, r2, 20, 20);
327	keyiter(k[13], r1, r0, r3, 21, 21);
328	keyiter(k[14], r2, r1, r4, 22, 22);
329	keyiter(k[15], r3, r2, r0, 23, 23);
330	keyiter(k[16], r4, r3, r1, 24, 24);
331	keyiter(k[17], r0, r4, r2, 25, 25);
332	keyiter(k[18], r1, r0, r3, 26, 26);
333	keyiter(k[19], r2, r1, r4, 27, 27);
334	keyiter(k[20], r3, r2, r0, 28, 28);
335	keyiter(k[21], r4, r3, r1, 29, 29);
336	keyiter(k[22], r0, r4, r2, 30, 30);
337	keyiter(k[23], r1, r0, r3, 31, 31);
338
339	k += 50;
340
341	keyiter(k[-26], r2, r1, r4, 32, -18);
342	keyiter(k[-25], r3, r2, r0, 33, -17);
343	keyiter(k[-24], r4, r3, r1, 34, -16);
344	keyiter(k[-23], r0, r4, r2, 35, -15);
345	keyiter(k[-22], r1, r0, r3, 36, -14);
346	keyiter(k[-21], r2, r1, r4, 37, -13);
347	keyiter(k[-20], r3, r2, r0, 38, -12);
348	keyiter(k[-19], r4, r3, r1, 39, -11);
349	keyiter(k[-18], r0, r4, r2, 40, -10);
350	keyiter(k[-17], r1, r0, r3, 41, -9);
351	keyiter(k[-16], r2, r1, r4, 42, -8);
352	keyiter(k[-15], r3, r2, r0, 43, -7);
353	keyiter(k[-14], r4, r3, r1, 44, -6);
354	keyiter(k[-13], r0, r4, r2, 45, -5);
355	keyiter(k[-12], r1, r0, r3, 46, -4);
356	keyiter(k[-11], r2, r1, r4, 47, -3);
357	keyiter(k[-10], r3, r2, r0, 48, -2);
358	keyiter(k[-9], r4, r3, r1, 49, -1);
359	keyiter(k[-8], r0, r4, r2, 50, 0);
360	keyiter(k[-7], r1, r0, r3, 51, 1);
361	keyiter(k[-6], r2, r1, r4, 52, 2);
362	keyiter(k[-5], r3, r2, r0, 53, 3);
363	keyiter(k[-4], r4, r3, r1, 54, 4);
364	keyiter(k[-3], r0, r4, r2, 55, 5);
365	keyiter(k[-2], r1, r0, r3, 56, 6);
366	keyiter(k[-1], r2, r1, r4, 57, 7);
367	keyiter(k[0], r3, r2, r0, 58, 8);
368	keyiter(k[1], r4, r3, r1, 59, 9);
369	keyiter(k[2], r0, r4, r2, 60, 10);
370	keyiter(k[3], r1, r0, r3, 61, 11);
371	keyiter(k[4], r2, r1, r4, 62, 12);
372	keyiter(k[5], r3, r2, r0, 63, 13);
373	keyiter(k[6], r4, r3, r1, 64, 14);
374	keyiter(k[7], r0, r4, r2, 65, 15);
375	keyiter(k[8], r1, r0, r3, 66, 16);
376	keyiter(k[9], r2, r1, r4, 67, 17);
377	keyiter(k[10], r3, r2, r0, 68, 18);
378	keyiter(k[11], r4, r3, r1, 69, 19);
379	keyiter(k[12], r0, r4, r2, 70, 20);
380	keyiter(k[13], r1, r0, r3, 71, 21);
381	keyiter(k[14], r2, r1, r4, 72, 22);
382	keyiter(k[15], r3, r2, r0, 73, 23);
383	keyiter(k[16], r4, r3, r1, 74, 24);
384	keyiter(k[17], r0, r4, r2, 75, 25);
385	keyiter(k[18], r1, r0, r3, 76, 26);
386	keyiter(k[19], r2, r1, r4, 77, 27);
387	keyiter(k[20], r3, r2, r0, 78, 28);
388	keyiter(k[21], r4, r3, r1, 79, 29);
389	keyiter(k[22], r0, r4, r2, 80, 30);
390	keyiter(k[23], r1, r0, r3, 81, 31);
391
392	k += 50;
393
394	keyiter(k[-26], r2, r1, r4, 82, -18);
395	keyiter(k[-25], r3, r2, r0, 83, -17);
396	keyiter(k[-24], r4, r3, r1, 84, -16);
397	keyiter(k[-23], r0, r4, r2, 85, -15);
398	keyiter(k[-22], r1, r0, r3, 86, -14);
399	keyiter(k[-21], r2, r1, r4, 87, -13);
400	keyiter(k[-20], r3, r2, r0, 88, -12);
401	keyiter(k[-19], r4, r3, r1, 89, -11);
402	keyiter(k[-18], r0, r4, r2, 90, -10);
403	keyiter(k[-17], r1, r0, r3, 91, -9);
404	keyiter(k[-16], r2, r1, r4, 92, -8);
405	keyiter(k[-15], r3, r2, r0, 93, -7);
406	keyiter(k[-14], r4, r3, r1, 94, -6);
407	keyiter(k[-13], r0, r4, r2, 95, -5);
408	keyiter(k[-12], r1, r0, r3, 96, -4);
409	keyiter(k[-11], r2, r1, r4, 97, -3);
410	keyiter(k[-10], r3, r2, r0, 98, -2);
411	keyiter(k[-9], r4, r3, r1, 99, -1);
412	keyiter(k[-8], r0, r4, r2, 100, 0);
413	keyiter(k[-7], r1, r0, r3, 101, 1);
414	keyiter(k[-6], r2, r1, r4, 102, 2);
415	keyiter(k[-5], r3, r2, r0, 103, 3);
416	keyiter(k[-4], r4, r3, r1, 104, 4);
417	keyiter(k[-3], r0, r4, r2, 105, 5);
418	keyiter(k[-2], r1, r0, r3, 106, 6);
419	keyiter(k[-1], r2, r1, r4, 107, 7);
420	keyiter(k[0], r3, r2, r0, 108, 8);
421	keyiter(k[1], r4, r3, r1, 109, 9);
422	keyiter(k[2], r0, r4, r2, 110, 10);
423	keyiter(k[3], r1, r0, r3, 111, 11);
424	keyiter(k[4], r2, r1, r4, 112, 12);
425	keyiter(k[5], r3, r2, r0, 113, 13);
426	keyiter(k[6], r4, r3, r1, 114, 14);
427	keyiter(k[7], r0, r4, r2, 115, 15);
428	keyiter(k[8], r1, r0, r3, 116, 16);
429	keyiter(k[9], r2, r1, r4, 117, 17);
430	keyiter(k[10], r3, r2, r0, 118, 18);
431	keyiter(k[11], r4, r3, r1, 119, 19);
432	keyiter(k[12], r0, r4, r2, 120, 20);
433	keyiter(k[13], r1, r0, r3, 121, 21);
434	keyiter(k[14], r2, r1, r4, 122, 22);
435	keyiter(k[15], r3, r2, r0, 123, 23);
436	keyiter(k[16], r4, r3, r1, 124, 24);
437	keyiter(k[17], r0, r4, r2, 125, 25);
438	keyiter(k[18], r1, r0, r3, 126, 26);
439	keyiter(k[19], r2, r1, r4, 127, 27);
440	keyiter(k[20], r3, r2, r0, 128, 28);
441	keyiter(k[21], r4, r3, r1, 129, 29);
442	keyiter(k[22], r0, r4, r2, 130, 30);
443	keyiter(k[23], r1, r0, r3, 131, 31);
444
445	/* Apply S-boxes */
446	__serpent_setkey_sbox(r0, r1, r2, r3, r4, ctx->expkey);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
447
448	return 0;
449}
450EXPORT_SYMBOL_GPL(__serpent_setkey);
451
452int serpent_setkey(struct crypto_tfm *tfm, const u8 *key, unsigned int keylen)
453{
454	return __serpent_setkey(crypto_tfm_ctx(tfm), key, keylen);
455}
456EXPORT_SYMBOL_GPL(serpent_setkey);
457
458void __serpent_encrypt(const void *c, u8 *dst, const u8 *src)
459{
460	const struct serpent_ctx *ctx = c;
461	const u32 *k = ctx->expkey;
 
 
462	u32	r0, r1, r2, r3, r4;
463
464	r0 = get_unaligned_le32(src);
465	r1 = get_unaligned_le32(src + 4);
466	r2 = get_unaligned_le32(src + 8);
467	r3 = get_unaligned_le32(src + 12);
 
 
 
 
 
468
469					K(r0, r1, r2, r3, 0);
470	S0(r0, r1, r2, r3, r4);		LK(r2, r1, r3, r0, r4, 1);
471	S1(r2, r1, r3, r0, r4);		LK(r4, r3, r0, r2, r1, 2);
472	S2(r4, r3, r0, r2, r1);		LK(r1, r3, r4, r2, r0, 3);
473	S3(r1, r3, r4, r2, r0);		LK(r2, r0, r3, r1, r4, 4);
474	S4(r2, r0, r3, r1, r4);		LK(r0, r3, r1, r4, r2, 5);
475	S5(r0, r3, r1, r4, r2);		LK(r2, r0, r3, r4, r1, 6);
476	S6(r2, r0, r3, r4, r1);		LK(r3, r1, r0, r4, r2, 7);
477	S7(r3, r1, r0, r4, r2);		LK(r2, r0, r4, r3, r1, 8);
478	S0(r2, r0, r4, r3, r1);		LK(r4, r0, r3, r2, r1, 9);
479	S1(r4, r0, r3, r2, r1);		LK(r1, r3, r2, r4, r0, 10);
480	S2(r1, r3, r2, r4, r0);		LK(r0, r3, r1, r4, r2, 11);
481	S3(r0, r3, r1, r4, r2);		LK(r4, r2, r3, r0, r1, 12);
482	S4(r4, r2, r3, r0, r1);		LK(r2, r3, r0, r1, r4, 13);
483	S5(r2, r3, r0, r1, r4);		LK(r4, r2, r3, r1, r0, 14);
484	S6(r4, r2, r3, r1, r0);		LK(r3, r0, r2, r1, r4, 15);
485	S7(r3, r0, r2, r1, r4);		LK(r4, r2, r1, r3, r0, 16);
486	S0(r4, r2, r1, r3, r0);		LK(r1, r2, r3, r4, r0, 17);
487	S1(r1, r2, r3, r4, r0);		LK(r0, r3, r4, r1, r2, 18);
488	S2(r0, r3, r4, r1, r2);		LK(r2, r3, r0, r1, r4, 19);
489	S3(r2, r3, r0, r1, r4);		LK(r1, r4, r3, r2, r0, 20);
490	S4(r1, r4, r3, r2, r0);		LK(r4, r3, r2, r0, r1, 21);
491	S5(r4, r3, r2, r0, r1);		LK(r1, r4, r3, r0, r2, 22);
492	S6(r1, r4, r3, r0, r2);		LK(r3, r2, r4, r0, r1, 23);
493	S7(r3, r2, r4, r0, r1);		LK(r1, r4, r0, r3, r2, 24);
494	S0(r1, r4, r0, r3, r2);		LK(r0, r4, r3, r1, r2, 25);
495	S1(r0, r4, r3, r1, r2);		LK(r2, r3, r1, r0, r4, 26);
496	S2(r2, r3, r1, r0, r4);		LK(r4, r3, r2, r0, r1, 27);
497	S3(r4, r3, r2, r0, r1);		LK(r0, r1, r3, r4, r2, 28);
498	S4(r0, r1, r3, r4, r2);		LK(r1, r3, r4, r2, r0, 29);
499	S5(r1, r3, r4, r2, r0);		LK(r0, r1, r3, r2, r4, 30);
500	S6(r0, r1, r3, r2, r4);		LK(r3, r4, r1, r2, r0, 31);
501	S7(r3, r4, r1, r2, r0);		K(r0, r1, r2, r3, 32);
502
503	put_unaligned_le32(r0, dst);
504	put_unaligned_le32(r1, dst + 4);
505	put_unaligned_le32(r2, dst + 8);
506	put_unaligned_le32(r3, dst + 12);
507}
508EXPORT_SYMBOL_GPL(__serpent_encrypt);
509
510static void serpent_encrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
511{
512	struct serpent_ctx *ctx = crypto_tfm_ctx(tfm);
513
514	__serpent_encrypt(ctx, dst, src);
515}
516
517void __serpent_decrypt(const void *c, u8 *dst, const u8 *src)
518{
519	const struct serpent_ctx *ctx = c;
520	const u32 *k = ctx->expkey;
 
 
521	u32	r0, r1, r2, r3, r4;
522
523	r0 = get_unaligned_le32(src);
524	r1 = get_unaligned_le32(src + 4);
525	r2 = get_unaligned_le32(src + 8);
526	r3 = get_unaligned_le32(src + 12);
527
528					K(r0, r1, r2, r3, 32);
529	SI7(r0, r1, r2, r3, r4);	KL(r1, r3, r0, r4, r2, 31);
530	SI6(r1, r3, r0, r4, r2);	KL(r0, r2, r4, r1, r3, 30);
531	SI5(r0, r2, r4, r1, r3);	KL(r2, r3, r0, r4, r1, 29);
532	SI4(r2, r3, r0, r4, r1);	KL(r2, r0, r1, r4, r3, 28);
533	SI3(r2, r0, r1, r4, r3);	KL(r1, r2, r3, r4, r0, 27);
534	SI2(r1, r2, r3, r4, r0);	KL(r2, r0, r4, r3, r1, 26);
535	SI1(r2, r0, r4, r3, r1);	KL(r1, r0, r4, r3, r2, 25);
536	SI0(r1, r0, r4, r3, r2);	KL(r4, r2, r0, r1, r3, 24);
537	SI7(r4, r2, r0, r1, r3);	KL(r2, r1, r4, r3, r0, 23);
538	SI6(r2, r1, r4, r3, r0);	KL(r4, r0, r3, r2, r1, 22);
539	SI5(r4, r0, r3, r2, r1);	KL(r0, r1, r4, r3, r2, 21);
540	SI4(r0, r1, r4, r3, r2);	KL(r0, r4, r2, r3, r1, 20);
541	SI3(r0, r4, r2, r3, r1);	KL(r2, r0, r1, r3, r4, 19);
542	SI2(r2, r0, r1, r3, r4);	KL(r0, r4, r3, r1, r2, 18);
543	SI1(r0, r4, r3, r1, r2);	KL(r2, r4, r3, r1, r0, 17);
544	SI0(r2, r4, r3, r1, r0);	KL(r3, r0, r4, r2, r1, 16);
545	SI7(r3, r0, r4, r2, r1);	KL(r0, r2, r3, r1, r4, 15);
546	SI6(r0, r2, r3, r1, r4);	KL(r3, r4, r1, r0, r2, 14);
547	SI5(r3, r4, r1, r0, r2);	KL(r4, r2, r3, r1, r0, 13);
548	SI4(r4, r2, r3, r1, r0);	KL(r4, r3, r0, r1, r2, 12);
549	SI3(r4, r3, r0, r1, r2);	KL(r0, r4, r2, r1, r3, 11);
550	SI2(r0, r4, r2, r1, r3);	KL(r4, r3, r1, r2, r0, 10);
551	SI1(r4, r3, r1, r2, r0);	KL(r0, r3, r1, r2, r4, 9);
552	SI0(r0, r3, r1, r2, r4);	KL(r1, r4, r3, r0, r2, 8);
553	SI7(r1, r4, r3, r0, r2);	KL(r4, r0, r1, r2, r3, 7);
554	SI6(r4, r0, r1, r2, r3);	KL(r1, r3, r2, r4, r0, 6);
555	SI5(r1, r3, r2, r4, r0);	KL(r3, r0, r1, r2, r4, 5);
556	SI4(r3, r0, r1, r2, r4);	KL(r3, r1, r4, r2, r0, 4);
557	SI3(r3, r1, r4, r2, r0);	KL(r4, r3, r0, r2, r1, 3);
558	SI2(r4, r3, r0, r2, r1);	KL(r3, r1, r2, r0, r4, 2);
559	SI1(r3, r1, r2, r0, r4);	KL(r4, r1, r2, r0, r3, 1);
560	SI0(r4, r1, r2, r0, r3);	K(r2, r3, r1, r4, 0);
561
562	put_unaligned_le32(r2, dst);
563	put_unaligned_le32(r3, dst + 4);
564	put_unaligned_le32(r1, dst + 8);
565	put_unaligned_le32(r4, dst + 12);
566}
567EXPORT_SYMBOL_GPL(__serpent_decrypt);
568
569static void serpent_decrypt(struct crypto_tfm *tfm, u8 *dst, const u8 *src)
570{
571	struct serpent_ctx *ctx = crypto_tfm_ctx(tfm);
572
573	__serpent_decrypt(ctx, dst, src);
574}
575
576static struct crypto_alg srp_alg = {
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
577	.cra_name		=	"serpent",
578	.cra_driver_name	=	"serpent-generic",
579	.cra_priority		=	100,
580	.cra_flags		=	CRYPTO_ALG_TYPE_CIPHER,
581	.cra_blocksize		=	SERPENT_BLOCK_SIZE,
582	.cra_ctxsize		=	sizeof(struct serpent_ctx),
 
583	.cra_module		=	THIS_MODULE,
584	.cra_u			=	{ .cipher = {
585	.cia_min_keysize	=	SERPENT_MIN_KEY_SIZE,
586	.cia_max_keysize	=	SERPENT_MAX_KEY_SIZE,
587	.cia_setkey		=	serpent_setkey,
588	.cia_encrypt		=	serpent_encrypt,
589	.cia_decrypt		=	serpent_decrypt } }
590};
 
 
 
 
 
 
 
 
 
 
 
 
 
591
592static int __init serpent_mod_init(void)
593{
594	return crypto_register_alg(&srp_alg);
595}
596
597static void __exit serpent_mod_fini(void)
598{
599	crypto_unregister_alg(&srp_alg);
600}
601
602subsys_initcall(serpent_mod_init);
603module_exit(serpent_mod_fini);
604
605MODULE_LICENSE("GPL");
606MODULE_DESCRIPTION("Serpent Cipher Algorithm");
607MODULE_AUTHOR("Dag Arne Osvik <osvik@ii.uib.no>");
 
608MODULE_ALIAS_CRYPTO("serpent");
609MODULE_ALIAS_CRYPTO("serpent-generic");