serpent-sse2-x86_64-asm_64.S 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739
  1. /* SPDX-License-Identifier: GPL-2.0-or-later */
  2. /*
  3. * Serpent Cipher 8-way parallel algorithm (x86_64/SSE2)
  4. *
  5. * Copyright (C) 2011 Jussi Kivilinna <[email protected]>
  6. *
  7. * Based on crypto/serpent.c by
  8. * Copyright (C) 2002 Dag Arne Osvik <[email protected]>
  9. * 2003 Herbert Valerio Riedel <[email protected]>
  10. */
  11. #include <linux/linkage.h>
  12. .file "serpent-sse2-x86_64-asm_64.S"
  13. .text
  14. #define CTX %rdi
  15. /**********************************************************************
  16. 8-way SSE2 serpent
  17. **********************************************************************/
  18. #define RA1 %xmm0
  19. #define RB1 %xmm1
  20. #define RC1 %xmm2
  21. #define RD1 %xmm3
  22. #define RE1 %xmm4
  23. #define RA2 %xmm5
  24. #define RB2 %xmm6
  25. #define RC2 %xmm7
  26. #define RD2 %xmm8
  27. #define RE2 %xmm9
  28. #define RNOT %xmm10
  29. #define RK0 %xmm11
  30. #define RK1 %xmm12
  31. #define RK2 %xmm13
  32. #define RK3 %xmm14
  33. #define S0_1(x0, x1, x2, x3, x4) \
  34. movdqa x3, x4; \
  35. por x0, x3; \
  36. pxor x4, x0; \
  37. pxor x2, x4; \
  38. pxor RNOT, x4; \
  39. pxor x1, x3; \
  40. pand x0, x1; \
  41. pxor x4, x1; \
  42. pxor x0, x2;
  43. #define S0_2(x0, x1, x2, x3, x4) \
  44. pxor x3, x0; \
  45. por x0, x4; \
  46. pxor x2, x0; \
  47. pand x1, x2; \
  48. pxor x2, x3; \
  49. pxor RNOT, x1; \
  50. pxor x4, x2; \
  51. pxor x2, x1;
  52. #define S1_1(x0, x1, x2, x3, x4) \
  53. movdqa x1, x4; \
  54. pxor x0, x1; \
  55. pxor x3, x0; \
  56. pxor RNOT, x3; \
  57. pand x1, x4; \
  58. por x1, x0; \
  59. pxor x2, x3; \
  60. pxor x3, x0; \
  61. pxor x3, x1;
  62. #define S1_2(x0, x1, x2, x3, x4) \
  63. pxor x4, x3; \
  64. por x4, x1; \
  65. pxor x2, x4; \
  66. pand x0, x2; \
  67. pxor x1, x2; \
  68. por x0, x1; \
  69. pxor RNOT, x0; \
  70. pxor x2, x0; \
  71. pxor x1, x4;
  72. #define S2_1(x0, x1, x2, x3, x4) \
  73. pxor RNOT, x3; \
  74. pxor x0, x1; \
  75. movdqa x0, x4; \
  76. pand x2, x0; \
  77. pxor x3, x0; \
  78. por x4, x3; \
  79. pxor x1, x2; \
  80. pxor x1, x3; \
  81. pand x0, x1;
  82. #define S2_2(x0, x1, x2, x3, x4) \
  83. pxor x2, x0; \
  84. pand x3, x2; \
  85. por x1, x3; \
  86. pxor RNOT, x0; \
  87. pxor x0, x3; \
  88. pxor x0, x4; \
  89. pxor x2, x0; \
  90. por x2, x1;
  91. #define S3_1(x0, x1, x2, x3, x4) \
  92. movdqa x1, x4; \
  93. pxor x3, x1; \
  94. por x0, x3; \
  95. pand x0, x4; \
  96. pxor x2, x0; \
  97. pxor x1, x2; \
  98. pand x3, x1; \
  99. pxor x3, x2; \
  100. por x4, x0; \
  101. pxor x3, x4;
  102. #define S3_2(x0, x1, x2, x3, x4) \
  103. pxor x0, x1; \
  104. pand x3, x0; \
  105. pand x4, x3; \
  106. pxor x2, x3; \
  107. por x1, x4; \
  108. pand x1, x2; \
  109. pxor x3, x4; \
  110. pxor x3, x0; \
  111. pxor x2, x3;
  112. #define S4_1(x0, x1, x2, x3, x4) \
  113. movdqa x3, x4; \
  114. pand x0, x3; \
  115. pxor x4, x0; \
  116. pxor x2, x3; \
  117. por x4, x2; \
  118. pxor x1, x0; \
  119. pxor x3, x4; \
  120. por x0, x2; \
  121. pxor x1, x2;
  122. #define S4_2(x0, x1, x2, x3, x4) \
  123. pand x0, x1; \
  124. pxor x4, x1; \
  125. pand x2, x4; \
  126. pxor x3, x2; \
  127. pxor x0, x4; \
  128. por x1, x3; \
  129. pxor RNOT, x1; \
  130. pxor x0, x3;
  131. #define S5_1(x0, x1, x2, x3, x4) \
  132. movdqa x1, x4; \
  133. por x0, x1; \
  134. pxor x1, x2; \
  135. pxor RNOT, x3; \
  136. pxor x0, x4; \
  137. pxor x2, x0; \
  138. pand x4, x1; \
  139. por x3, x4; \
  140. pxor x0, x4;
  141. #define S5_2(x0, x1, x2, x3, x4) \
  142. pand x3, x0; \
  143. pxor x3, x1; \
  144. pxor x2, x3; \
  145. pxor x1, x0; \
  146. pand x4, x2; \
  147. pxor x2, x1; \
  148. pand x0, x2; \
  149. pxor x2, x3;
  150. #define S6_1(x0, x1, x2, x3, x4) \
  151. movdqa x1, x4; \
  152. pxor x0, x3; \
  153. pxor x2, x1; \
  154. pxor x0, x2; \
  155. pand x3, x0; \
  156. por x3, x1; \
  157. pxor RNOT, x4; \
  158. pxor x1, x0; \
  159. pxor x2, x1;
  160. #define S6_2(x0, x1, x2, x3, x4) \
  161. pxor x4, x3; \
  162. pxor x0, x4; \
  163. pand x0, x2; \
  164. pxor x1, x4; \
  165. pxor x3, x2; \
  166. pand x1, x3; \
  167. pxor x0, x3; \
  168. pxor x2, x1;
  169. #define S7_1(x0, x1, x2, x3, x4) \
  170. pxor RNOT, x1; \
  171. movdqa x1, x4; \
  172. pxor RNOT, x0; \
  173. pand x2, x1; \
  174. pxor x3, x1; \
  175. por x4, x3; \
  176. pxor x2, x4; \
  177. pxor x3, x2; \
  178. pxor x0, x3; \
  179. por x1, x0;
  180. #define S7_2(x0, x1, x2, x3, x4) \
  181. pand x0, x2; \
  182. pxor x4, x0; \
  183. pxor x3, x4; \
  184. pand x0, x3; \
  185. pxor x1, x4; \
  186. pxor x4, x2; \
  187. pxor x1, x3; \
  188. por x0, x4; \
  189. pxor x1, x4;
  190. #define SI0_1(x0, x1, x2, x3, x4) \
  191. movdqa x3, x4; \
  192. pxor x0, x1; \
  193. por x1, x3; \
  194. pxor x1, x4; \
  195. pxor RNOT, x0; \
  196. pxor x3, x2; \
  197. pxor x0, x3; \
  198. pand x1, x0; \
  199. pxor x2, x0;
  200. #define SI0_2(x0, x1, x2, x3, x4) \
  201. pand x3, x2; \
  202. pxor x4, x3; \
  203. pxor x3, x2; \
  204. pxor x3, x1; \
  205. pand x0, x3; \
  206. pxor x0, x1; \
  207. pxor x2, x0; \
  208. pxor x3, x4;
  209. #define SI1_1(x0, x1, x2, x3, x4) \
  210. pxor x3, x1; \
  211. movdqa x0, x4; \
  212. pxor x2, x0; \
  213. pxor RNOT, x2; \
  214. por x1, x4; \
  215. pxor x3, x4; \
  216. pand x1, x3; \
  217. pxor x2, x1; \
  218. pand x4, x2;
  219. #define SI1_2(x0, x1, x2, x3, x4) \
  220. pxor x1, x4; \
  221. por x3, x1; \
  222. pxor x0, x3; \
  223. pxor x0, x2; \
  224. por x4, x0; \
  225. pxor x4, x2; \
  226. pxor x0, x1; \
  227. pxor x1, x4;
  228. #define SI2_1(x0, x1, x2, x3, x4) \
  229. pxor x1, x2; \
  230. movdqa x3, x4; \
  231. pxor RNOT, x3; \
  232. por x2, x3; \
  233. pxor x4, x2; \
  234. pxor x0, x4; \
  235. pxor x1, x3; \
  236. por x2, x1; \
  237. pxor x0, x2;
  238. #define SI2_2(x0, x1, x2, x3, x4) \
  239. pxor x4, x1; \
  240. por x3, x4; \
  241. pxor x3, x2; \
  242. pxor x2, x4; \
  243. pand x1, x2; \
  244. pxor x3, x2; \
  245. pxor x4, x3; \
  246. pxor x0, x4;
  247. #define SI3_1(x0, x1, x2, x3, x4) \
  248. pxor x1, x2; \
  249. movdqa x1, x4; \
  250. pand x2, x1; \
  251. pxor x0, x1; \
  252. por x4, x0; \
  253. pxor x3, x4; \
  254. pxor x3, x0; \
  255. por x1, x3; \
  256. pxor x2, x1;
  257. #define SI3_2(x0, x1, x2, x3, x4) \
  258. pxor x3, x1; \
  259. pxor x2, x0; \
  260. pxor x3, x2; \
  261. pand x1, x3; \
  262. pxor x0, x1; \
  263. pand x2, x0; \
  264. pxor x3, x4; \
  265. pxor x0, x3; \
  266. pxor x1, x0;
  267. #define SI4_1(x0, x1, x2, x3, x4) \
  268. pxor x3, x2; \
  269. movdqa x0, x4; \
  270. pand x1, x0; \
  271. pxor x2, x0; \
  272. por x3, x2; \
  273. pxor RNOT, x4; \
  274. pxor x0, x1; \
  275. pxor x2, x0; \
  276. pand x4, x2;
  277. #define SI4_2(x0, x1, x2, x3, x4) \
  278. pxor x0, x2; \
  279. por x4, x0; \
  280. pxor x3, x0; \
  281. pand x2, x3; \
  282. pxor x3, x4; \
  283. pxor x1, x3; \
  284. pand x0, x1; \
  285. pxor x1, x4; \
  286. pxor x3, x0;
  287. #define SI5_1(x0, x1, x2, x3, x4) \
  288. movdqa x1, x4; \
  289. por x2, x1; \
  290. pxor x4, x2; \
  291. pxor x3, x1; \
  292. pand x4, x3; \
  293. pxor x3, x2; \
  294. por x0, x3; \
  295. pxor RNOT, x0; \
  296. pxor x2, x3; \
  297. por x0, x2;
  298. #define SI5_2(x0, x1, x2, x3, x4) \
  299. pxor x1, x4; \
  300. pxor x4, x2; \
  301. pand x0, x4; \
  302. pxor x1, x0; \
  303. pxor x3, x1; \
  304. pand x2, x0; \
  305. pxor x3, x2; \
  306. pxor x2, x0; \
  307. pxor x4, x2; \
  308. pxor x3, x4;
  309. #define SI6_1(x0, x1, x2, x3, x4) \
  310. pxor x2, x0; \
  311. movdqa x0, x4; \
  312. pand x3, x0; \
  313. pxor x3, x2; \
  314. pxor x2, x0; \
  315. pxor x1, x3; \
  316. por x4, x2; \
  317. pxor x3, x2; \
  318. pand x0, x3;
  319. #define SI6_2(x0, x1, x2, x3, x4) \
  320. pxor RNOT, x0; \
  321. pxor x1, x3; \
  322. pand x2, x1; \
  323. pxor x0, x4; \
  324. pxor x4, x3; \
  325. pxor x2, x4; \
  326. pxor x1, x0; \
  327. pxor x0, x2;
  328. #define SI7_1(x0, x1, x2, x3, x4) \
  329. movdqa x3, x4; \
  330. pand x0, x3; \
  331. pxor x2, x0; \
  332. por x4, x2; \
  333. pxor x1, x4; \
  334. pxor RNOT, x0; \
  335. por x3, x1; \
  336. pxor x0, x4; \
  337. pand x2, x0; \
  338. pxor x1, x0;
  339. #define SI7_2(x0, x1, x2, x3, x4) \
  340. pand x2, x1; \
  341. pxor x2, x3; \
  342. pxor x3, x4; \
  343. pand x3, x2; \
  344. por x0, x3; \
  345. pxor x4, x1; \
  346. pxor x4, x3; \
  347. pand x0, x4; \
  348. pxor x2, x4;
  349. #define get_key(i, j, t) \
  350. movd (4*(i)+(j))*4(CTX), t; \
  351. pshufd $0, t, t;
  352. #define K2(x0, x1, x2, x3, x4, i) \
  353. get_key(i, 0, RK0); \
  354. get_key(i, 1, RK1); \
  355. get_key(i, 2, RK2); \
  356. get_key(i, 3, RK3); \
  357. pxor RK0, x0 ## 1; \
  358. pxor RK1, x1 ## 1; \
  359. pxor RK2, x2 ## 1; \
  360. pxor RK3, x3 ## 1; \
  361. pxor RK0, x0 ## 2; \
  362. pxor RK1, x1 ## 2; \
  363. pxor RK2, x2 ## 2; \
  364. pxor RK3, x3 ## 2;
  365. #define LK2(x0, x1, x2, x3, x4, i) \
  366. movdqa x0 ## 1, x4 ## 1; \
  367. pslld $13, x0 ## 1; \
  368. psrld $(32 - 13), x4 ## 1; \
  369. por x4 ## 1, x0 ## 1; \
  370. pxor x0 ## 1, x1 ## 1; \
  371. movdqa x2 ## 1, x4 ## 1; \
  372. pslld $3, x2 ## 1; \
  373. psrld $(32 - 3), x4 ## 1; \
  374. por x4 ## 1, x2 ## 1; \
  375. pxor x2 ## 1, x1 ## 1; \
  376. movdqa x0 ## 2, x4 ## 2; \
  377. pslld $13, x0 ## 2; \
  378. psrld $(32 - 13), x4 ## 2; \
  379. por x4 ## 2, x0 ## 2; \
  380. pxor x0 ## 2, x1 ## 2; \
  381. movdqa x2 ## 2, x4 ## 2; \
  382. pslld $3, x2 ## 2; \
  383. psrld $(32 - 3), x4 ## 2; \
  384. por x4 ## 2, x2 ## 2; \
  385. pxor x2 ## 2, x1 ## 2; \
  386. movdqa x1 ## 1, x4 ## 1; \
  387. pslld $1, x1 ## 1; \
  388. psrld $(32 - 1), x4 ## 1; \
  389. por x4 ## 1, x1 ## 1; \
  390. movdqa x0 ## 1, x4 ## 1; \
  391. pslld $3, x4 ## 1; \
  392. pxor x2 ## 1, x3 ## 1; \
  393. pxor x4 ## 1, x3 ## 1; \
  394. movdqa x3 ## 1, x4 ## 1; \
  395. get_key(i, 1, RK1); \
  396. movdqa x1 ## 2, x4 ## 2; \
  397. pslld $1, x1 ## 2; \
  398. psrld $(32 - 1), x4 ## 2; \
  399. por x4 ## 2, x1 ## 2; \
  400. movdqa x0 ## 2, x4 ## 2; \
  401. pslld $3, x4 ## 2; \
  402. pxor x2 ## 2, x3 ## 2; \
  403. pxor x4 ## 2, x3 ## 2; \
  404. movdqa x3 ## 2, x4 ## 2; \
  405. get_key(i, 3, RK3); \
  406. pslld $7, x3 ## 1; \
  407. psrld $(32 - 7), x4 ## 1; \
  408. por x4 ## 1, x3 ## 1; \
  409. movdqa x1 ## 1, x4 ## 1; \
  410. pslld $7, x4 ## 1; \
  411. pxor x1 ## 1, x0 ## 1; \
  412. pxor x3 ## 1, x0 ## 1; \
  413. pxor x3 ## 1, x2 ## 1; \
  414. pxor x4 ## 1, x2 ## 1; \
  415. get_key(i, 0, RK0); \
  416. pslld $7, x3 ## 2; \
  417. psrld $(32 - 7), x4 ## 2; \
  418. por x4 ## 2, x3 ## 2; \
  419. movdqa x1 ## 2, x4 ## 2; \
  420. pslld $7, x4 ## 2; \
  421. pxor x1 ## 2, x0 ## 2; \
  422. pxor x3 ## 2, x0 ## 2; \
  423. pxor x3 ## 2, x2 ## 2; \
  424. pxor x4 ## 2, x2 ## 2; \
  425. get_key(i, 2, RK2); \
  426. pxor RK1, x1 ## 1; \
  427. pxor RK3, x3 ## 1; \
  428. movdqa x0 ## 1, x4 ## 1; \
  429. pslld $5, x0 ## 1; \
  430. psrld $(32 - 5), x4 ## 1; \
  431. por x4 ## 1, x0 ## 1; \
  432. movdqa x2 ## 1, x4 ## 1; \
  433. pslld $22, x2 ## 1; \
  434. psrld $(32 - 22), x4 ## 1; \
  435. por x4 ## 1, x2 ## 1; \
  436. pxor RK0, x0 ## 1; \
  437. pxor RK2, x2 ## 1; \
  438. pxor RK1, x1 ## 2; \
  439. pxor RK3, x3 ## 2; \
  440. movdqa x0 ## 2, x4 ## 2; \
  441. pslld $5, x0 ## 2; \
  442. psrld $(32 - 5), x4 ## 2; \
  443. por x4 ## 2, x0 ## 2; \
  444. movdqa x2 ## 2, x4 ## 2; \
  445. pslld $22, x2 ## 2; \
  446. psrld $(32 - 22), x4 ## 2; \
  447. por x4 ## 2, x2 ## 2; \
  448. pxor RK0, x0 ## 2; \
  449. pxor RK2, x2 ## 2;
  450. #define KL2(x0, x1, x2, x3, x4, i) \
  451. pxor RK0, x0 ## 1; \
  452. pxor RK2, x2 ## 1; \
  453. movdqa x0 ## 1, x4 ## 1; \
  454. psrld $5, x0 ## 1; \
  455. pslld $(32 - 5), x4 ## 1; \
  456. por x4 ## 1, x0 ## 1; \
  457. pxor RK3, x3 ## 1; \
  458. pxor RK1, x1 ## 1; \
  459. movdqa x2 ## 1, x4 ## 1; \
  460. psrld $22, x2 ## 1; \
  461. pslld $(32 - 22), x4 ## 1; \
  462. por x4 ## 1, x2 ## 1; \
  463. pxor x3 ## 1, x2 ## 1; \
  464. pxor RK0, x0 ## 2; \
  465. pxor RK2, x2 ## 2; \
  466. movdqa x0 ## 2, x4 ## 2; \
  467. psrld $5, x0 ## 2; \
  468. pslld $(32 - 5), x4 ## 2; \
  469. por x4 ## 2, x0 ## 2; \
  470. pxor RK3, x3 ## 2; \
  471. pxor RK1, x1 ## 2; \
  472. movdqa x2 ## 2, x4 ## 2; \
  473. psrld $22, x2 ## 2; \
  474. pslld $(32 - 22), x4 ## 2; \
  475. por x4 ## 2, x2 ## 2; \
  476. pxor x3 ## 2, x2 ## 2; \
  477. pxor x3 ## 1, x0 ## 1; \
  478. movdqa x1 ## 1, x4 ## 1; \
  479. pslld $7, x4 ## 1; \
  480. pxor x1 ## 1, x0 ## 1; \
  481. pxor x4 ## 1, x2 ## 1; \
  482. movdqa x1 ## 1, x4 ## 1; \
  483. psrld $1, x1 ## 1; \
  484. pslld $(32 - 1), x4 ## 1; \
  485. por x4 ## 1, x1 ## 1; \
  486. pxor x3 ## 2, x0 ## 2; \
  487. movdqa x1 ## 2, x4 ## 2; \
  488. pslld $7, x4 ## 2; \
  489. pxor x1 ## 2, x0 ## 2; \
  490. pxor x4 ## 2, x2 ## 2; \
  491. movdqa x1 ## 2, x4 ## 2; \
  492. psrld $1, x1 ## 2; \
  493. pslld $(32 - 1), x4 ## 2; \
  494. por x4 ## 2, x1 ## 2; \
  495. movdqa x3 ## 1, x4 ## 1; \
  496. psrld $7, x3 ## 1; \
  497. pslld $(32 - 7), x4 ## 1; \
  498. por x4 ## 1, x3 ## 1; \
  499. pxor x0 ## 1, x1 ## 1; \
  500. movdqa x0 ## 1, x4 ## 1; \
  501. pslld $3, x4 ## 1; \
  502. pxor x4 ## 1, x3 ## 1; \
  503. movdqa x0 ## 1, x4 ## 1; \
  504. movdqa x3 ## 2, x4 ## 2; \
  505. psrld $7, x3 ## 2; \
  506. pslld $(32 - 7), x4 ## 2; \
  507. por x4 ## 2, x3 ## 2; \
  508. pxor x0 ## 2, x1 ## 2; \
  509. movdqa x0 ## 2, x4 ## 2; \
  510. pslld $3, x4 ## 2; \
  511. pxor x4 ## 2, x3 ## 2; \
  512. movdqa x0 ## 2, x4 ## 2; \
  513. psrld $13, x0 ## 1; \
  514. pslld $(32 - 13), x4 ## 1; \
  515. por x4 ## 1, x0 ## 1; \
  516. pxor x2 ## 1, x1 ## 1; \
  517. pxor x2 ## 1, x3 ## 1; \
  518. movdqa x2 ## 1, x4 ## 1; \
  519. psrld $3, x2 ## 1; \
  520. pslld $(32 - 3), x4 ## 1; \
  521. por x4 ## 1, x2 ## 1; \
  522. psrld $13, x0 ## 2; \
  523. pslld $(32 - 13), x4 ## 2; \
  524. por x4 ## 2, x0 ## 2; \
  525. pxor x2 ## 2, x1 ## 2; \
  526. pxor x2 ## 2, x3 ## 2; \
  527. movdqa x2 ## 2, x4 ## 2; \
  528. psrld $3, x2 ## 2; \
  529. pslld $(32 - 3), x4 ## 2; \
  530. por x4 ## 2, x2 ## 2;
  531. #define S(SBOX, x0, x1, x2, x3, x4) \
  532. SBOX ## _1(x0 ## 1, x1 ## 1, x2 ## 1, x3 ## 1, x4 ## 1); \
  533. SBOX ## _2(x0 ## 1, x1 ## 1, x2 ## 1, x3 ## 1, x4 ## 1); \
  534. SBOX ## _1(x0 ## 2, x1 ## 2, x2 ## 2, x3 ## 2, x4 ## 2); \
  535. SBOX ## _2(x0 ## 2, x1 ## 2, x2 ## 2, x3 ## 2, x4 ## 2);
  536. #define SP(SBOX, x0, x1, x2, x3, x4, i) \
  537. get_key(i, 0, RK0); \
  538. SBOX ## _1(x0 ## 1, x1 ## 1, x2 ## 1, x3 ## 1, x4 ## 1); \
  539. get_key(i, 2, RK2); \
  540. SBOX ## _1(x0 ## 2, x1 ## 2, x2 ## 2, x3 ## 2, x4 ## 2); \
  541. get_key(i, 3, RK3); \
  542. SBOX ## _2(x0 ## 1, x1 ## 1, x2 ## 1, x3 ## 1, x4 ## 1); \
  543. get_key(i, 1, RK1); \
  544. SBOX ## _2(x0 ## 2, x1 ## 2, x2 ## 2, x3 ## 2, x4 ## 2); \
  545. #define transpose_4x4(x0, x1, x2, x3, t0, t1, t2) \
  546. movdqa x0, t2; \
  547. punpckldq x1, x0; \
  548. punpckhdq x1, t2; \
  549. movdqa x2, t1; \
  550. punpckhdq x3, x2; \
  551. punpckldq x3, t1; \
  552. movdqa x0, x1; \
  553. punpcklqdq t1, x0; \
  554. punpckhqdq t1, x1; \
  555. movdqa t2, x3; \
  556. punpcklqdq x2, t2; \
  557. punpckhqdq x2, x3; \
  558. movdqa t2, x2;
  559. #define read_blocks(in, x0, x1, x2, x3, t0, t1, t2) \
  560. movdqu (0*4*4)(in), x0; \
  561. movdqu (1*4*4)(in), x1; \
  562. movdqu (2*4*4)(in), x2; \
  563. movdqu (3*4*4)(in), x3; \
  564. \
  565. transpose_4x4(x0, x1, x2, x3, t0, t1, t2)
  566. #define write_blocks(out, x0, x1, x2, x3, t0, t1, t2) \
  567. transpose_4x4(x0, x1, x2, x3, t0, t1, t2) \
  568. \
  569. movdqu x0, (0*4*4)(out); \
  570. movdqu x1, (1*4*4)(out); \
  571. movdqu x2, (2*4*4)(out); \
  572. movdqu x3, (3*4*4)(out);
  573. #define xor_blocks(out, x0, x1, x2, x3, t0, t1, t2) \
  574. transpose_4x4(x0, x1, x2, x3, t0, t1, t2) \
  575. \
  576. movdqu (0*4*4)(out), t0; \
  577. pxor t0, x0; \
  578. movdqu x0, (0*4*4)(out); \
  579. movdqu (1*4*4)(out), t0; \
  580. pxor t0, x1; \
  581. movdqu x1, (1*4*4)(out); \
  582. movdqu (2*4*4)(out), t0; \
  583. pxor t0, x2; \
  584. movdqu x2, (2*4*4)(out); \
  585. movdqu (3*4*4)(out), t0; \
  586. pxor t0, x3; \
  587. movdqu x3, (3*4*4)(out);
  588. SYM_FUNC_START(__serpent_enc_blk_8way)
  589. /* input:
  590. * %rdi: ctx, CTX
  591. * %rsi: dst
  592. * %rdx: src
  593. * %rcx: bool, if true: xor output
  594. */
  595. pcmpeqd RNOT, RNOT;
  596. leaq (4*4*4)(%rdx), %rax;
  597. read_blocks(%rdx, RA1, RB1, RC1, RD1, RK0, RK1, RK2);
  598. read_blocks(%rax, RA2, RB2, RC2, RD2, RK0, RK1, RK2);
  599. K2(RA, RB, RC, RD, RE, 0);
  600. S(S0, RA, RB, RC, RD, RE); LK2(RC, RB, RD, RA, RE, 1);
  601. S(S1, RC, RB, RD, RA, RE); LK2(RE, RD, RA, RC, RB, 2);
  602. S(S2, RE, RD, RA, RC, RB); LK2(RB, RD, RE, RC, RA, 3);
  603. S(S3, RB, RD, RE, RC, RA); LK2(RC, RA, RD, RB, RE, 4);
  604. S(S4, RC, RA, RD, RB, RE); LK2(RA, RD, RB, RE, RC, 5);
  605. S(S5, RA, RD, RB, RE, RC); LK2(RC, RA, RD, RE, RB, 6);
  606. S(S6, RC, RA, RD, RE, RB); LK2(RD, RB, RA, RE, RC, 7);
  607. S(S7, RD, RB, RA, RE, RC); LK2(RC, RA, RE, RD, RB, 8);
  608. S(S0, RC, RA, RE, RD, RB); LK2(RE, RA, RD, RC, RB, 9);
  609. S(S1, RE, RA, RD, RC, RB); LK2(RB, RD, RC, RE, RA, 10);
  610. S(S2, RB, RD, RC, RE, RA); LK2(RA, RD, RB, RE, RC, 11);
  611. S(S3, RA, RD, RB, RE, RC); LK2(RE, RC, RD, RA, RB, 12);
  612. S(S4, RE, RC, RD, RA, RB); LK2(RC, RD, RA, RB, RE, 13);
  613. S(S5, RC, RD, RA, RB, RE); LK2(RE, RC, RD, RB, RA, 14);
  614. S(S6, RE, RC, RD, RB, RA); LK2(RD, RA, RC, RB, RE, 15);
  615. S(S7, RD, RA, RC, RB, RE); LK2(RE, RC, RB, RD, RA, 16);
  616. S(S0, RE, RC, RB, RD, RA); LK2(RB, RC, RD, RE, RA, 17);
  617. S(S1, RB, RC, RD, RE, RA); LK2(RA, RD, RE, RB, RC, 18);
  618. S(S2, RA, RD, RE, RB, RC); LK2(RC, RD, RA, RB, RE, 19);
  619. S(S3, RC, RD, RA, RB, RE); LK2(RB, RE, RD, RC, RA, 20);
  620. S(S4, RB, RE, RD, RC, RA); LK2(RE, RD, RC, RA, RB, 21);
  621. S(S5, RE, RD, RC, RA, RB); LK2(RB, RE, RD, RA, RC, 22);
  622. S(S6, RB, RE, RD, RA, RC); LK2(RD, RC, RE, RA, RB, 23);
  623. S(S7, RD, RC, RE, RA, RB); LK2(RB, RE, RA, RD, RC, 24);
  624. S(S0, RB, RE, RA, RD, RC); LK2(RA, RE, RD, RB, RC, 25);
  625. S(S1, RA, RE, RD, RB, RC); LK2(RC, RD, RB, RA, RE, 26);
  626. S(S2, RC, RD, RB, RA, RE); LK2(RE, RD, RC, RA, RB, 27);
  627. S(S3, RE, RD, RC, RA, RB); LK2(RA, RB, RD, RE, RC, 28);
  628. S(S4, RA, RB, RD, RE, RC); LK2(RB, RD, RE, RC, RA, 29);
  629. S(S5, RB, RD, RE, RC, RA); LK2(RA, RB, RD, RC, RE, 30);
  630. S(S6, RA, RB, RD, RC, RE); LK2(RD, RE, RB, RC, RA, 31);
  631. S(S7, RD, RE, RB, RC, RA); K2(RA, RB, RC, RD, RE, 32);
  632. leaq (4*4*4)(%rsi), %rax;
  633. testb %cl, %cl;
  634. jnz .L__enc_xor8;
  635. write_blocks(%rsi, RA1, RB1, RC1, RD1, RK0, RK1, RK2);
  636. write_blocks(%rax, RA2, RB2, RC2, RD2, RK0, RK1, RK2);
  637. RET;
  638. .L__enc_xor8:
  639. xor_blocks(%rsi, RA1, RB1, RC1, RD1, RK0, RK1, RK2);
  640. xor_blocks(%rax, RA2, RB2, RC2, RD2, RK0, RK1, RK2);
  641. RET;
  642. SYM_FUNC_END(__serpent_enc_blk_8way)
  643. SYM_FUNC_START(serpent_dec_blk_8way)
  644. /* input:
  645. * %rdi: ctx, CTX
  646. * %rsi: dst
  647. * %rdx: src
  648. */
  649. pcmpeqd RNOT, RNOT;
  650. leaq (4*4*4)(%rdx), %rax;
  651. read_blocks(%rdx, RA1, RB1, RC1, RD1, RK0, RK1, RK2);
  652. read_blocks(%rax, RA2, RB2, RC2, RD2, RK0, RK1, RK2);
  653. K2(RA, RB, RC, RD, RE, 32);
  654. SP(SI7, RA, RB, RC, RD, RE, 31); KL2(RB, RD, RA, RE, RC, 31);
  655. SP(SI6, RB, RD, RA, RE, RC, 30); KL2(RA, RC, RE, RB, RD, 30);
  656. SP(SI5, RA, RC, RE, RB, RD, 29); KL2(RC, RD, RA, RE, RB, 29);
  657. SP(SI4, RC, RD, RA, RE, RB, 28); KL2(RC, RA, RB, RE, RD, 28);
  658. SP(SI3, RC, RA, RB, RE, RD, 27); KL2(RB, RC, RD, RE, RA, 27);
  659. SP(SI2, RB, RC, RD, RE, RA, 26); KL2(RC, RA, RE, RD, RB, 26);
  660. SP(SI1, RC, RA, RE, RD, RB, 25); KL2(RB, RA, RE, RD, RC, 25);
  661. SP(SI0, RB, RA, RE, RD, RC, 24); KL2(RE, RC, RA, RB, RD, 24);
  662. SP(SI7, RE, RC, RA, RB, RD, 23); KL2(RC, RB, RE, RD, RA, 23);
  663. SP(SI6, RC, RB, RE, RD, RA, 22); KL2(RE, RA, RD, RC, RB, 22);
  664. SP(SI5, RE, RA, RD, RC, RB, 21); KL2(RA, RB, RE, RD, RC, 21);
  665. SP(SI4, RA, RB, RE, RD, RC, 20); KL2(RA, RE, RC, RD, RB, 20);
  666. SP(SI3, RA, RE, RC, RD, RB, 19); KL2(RC, RA, RB, RD, RE, 19);
  667. SP(SI2, RC, RA, RB, RD, RE, 18); KL2(RA, RE, RD, RB, RC, 18);
  668. SP(SI1, RA, RE, RD, RB, RC, 17); KL2(RC, RE, RD, RB, RA, 17);
  669. SP(SI0, RC, RE, RD, RB, RA, 16); KL2(RD, RA, RE, RC, RB, 16);
  670. SP(SI7, RD, RA, RE, RC, RB, 15); KL2(RA, RC, RD, RB, RE, 15);
  671. SP(SI6, RA, RC, RD, RB, RE, 14); KL2(RD, RE, RB, RA, RC, 14);
  672. SP(SI5, RD, RE, RB, RA, RC, 13); KL2(RE, RC, RD, RB, RA, 13);
  673. SP(SI4, RE, RC, RD, RB, RA, 12); KL2(RE, RD, RA, RB, RC, 12);
  674. SP(SI3, RE, RD, RA, RB, RC, 11); KL2(RA, RE, RC, RB, RD, 11);
  675. SP(SI2, RA, RE, RC, RB, RD, 10); KL2(RE, RD, RB, RC, RA, 10);
  676. SP(SI1, RE, RD, RB, RC, RA, 9); KL2(RA, RD, RB, RC, RE, 9);
  677. SP(SI0, RA, RD, RB, RC, RE, 8); KL2(RB, RE, RD, RA, RC, 8);
  678. SP(SI7, RB, RE, RD, RA, RC, 7); KL2(RE, RA, RB, RC, RD, 7);
  679. SP(SI6, RE, RA, RB, RC, RD, 6); KL2(RB, RD, RC, RE, RA, 6);
  680. SP(SI5, RB, RD, RC, RE, RA, 5); KL2(RD, RA, RB, RC, RE, 5);
  681. SP(SI4, RD, RA, RB, RC, RE, 4); KL2(RD, RB, RE, RC, RA, 4);
  682. SP(SI3, RD, RB, RE, RC, RA, 3); KL2(RE, RD, RA, RC, RB, 3);
  683. SP(SI2, RE, RD, RA, RC, RB, 2); KL2(RD, RB, RC, RA, RE, 2);
  684. SP(SI1, RD, RB, RC, RA, RE, 1); KL2(RE, RB, RC, RA, RD, 1);
  685. S(SI0, RE, RB, RC, RA, RD); K2(RC, RD, RB, RE, RA, 0);
  686. leaq (4*4*4)(%rsi), %rax;
  687. write_blocks(%rsi, RC1, RD1, RB1, RE1, RK0, RK1, RK2);
  688. write_blocks(%rax, RC2, RD2, RB2, RE2, RK0, RK1, RK2);
  689. RET;
  690. SYM_FUNC_END(serpent_dec_blk_8way)