| /* |
| * UFC-crypt: ultra fast crypt(3) implementation |
| * |
| * Copyright (C) 1991-2018 Free Software Foundation, Inc. |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; see the file COPYING.LIB. If not, |
| * see <http://www.gnu.org/licenses/>. |
| * |
| * @(#)crypt.c 2.25 12/20/96 |
| * |
| * Semiportable C version |
| * |
| */ |
| |
| #include "crypt-private.h" |
| |
| #ifdef _UFC_32_ |
| |
| /* |
| * 32 bit version |
| */ |
| |
| #define SBA(sb, v) (*(long32*)((char*)(sb)+(v))) |
| |
| void |
| _ufc_doit_r (ufc_long itr, struct crypt_data * __restrict __data, |
| ufc_long *res) |
| { |
| int i; |
| long32 s, *k; |
| long32 *sb01 = (long32*)__data->sb0; |
| long32 *sb23 = (long32*)__data->sb2; |
| long32 l1, l2, r1, r2; |
| |
| l1 = (long32)res[0]; l2 = (long32)res[1]; |
| r1 = (long32)res[2]; r2 = (long32)res[3]; |
| |
| while(itr--) { |
| k = (long32*)__data->keysched; |
| for(i=8; i--; ) { |
| s = *k++ ^ r1; |
| l1 ^= SBA(sb01, s & 0xffff); l2 ^= SBA(sb01, (s & 0xffff)+4); |
| l1 ^= SBA(sb01, s >>= 16 ); l2 ^= SBA(sb01, (s )+4); |
| s = *k++ ^ r2; |
| l1 ^= SBA(sb23, s & 0xffff); l2 ^= SBA(sb23, (s & 0xffff)+4); |
| l1 ^= SBA(sb23, s >>= 16 ); l2 ^= SBA(sb23, (s )+4); |
| |
| s = *k++ ^ l1; |
| r1 ^= SBA(sb01, s & 0xffff); r2 ^= SBA(sb01, (s & 0xffff)+4); |
| r1 ^= SBA(sb01, s >>= 16 ); r2 ^= SBA(sb01, (s )+4); |
| s = *k++ ^ l2; |
| r1 ^= SBA(sb23, s & 0xffff); r2 ^= SBA(sb23, (s & 0xffff)+4); |
| r1 ^= SBA(sb23, s >>= 16 ); r2 ^= SBA(sb23, (s )+4); |
| } |
| s=l1; l1=r1; r1=s; s=l2; l2=r2; r2=s; |
| } |
| res[0] = l1; res[1] = l2; res[2] = r1; res[3] = r2; |
| } |
| |
| #endif |
| |
| #ifdef _UFC_64_ |
| |
| /* |
| * 64 bit version |
| */ |
| |
| #define SBA(sb, v) (*(long64*)((char*)(sb)+(v))) |
| |
| void |
| _ufc_doit_r (ufc_long itr, struct crypt_data * __restrict __data, |
| ufc_long *res) |
| { |
| int i; |
| long64 l, r, s, *k; |
| long64 *sb01 = (long64*)__data->sb0; |
| long64 *sb23 = (long64*)__data->sb2; |
| |
| l = (((long64)res[0]) << 32) | ((long64)res[1]); |
| r = (((long64)res[2]) << 32) | ((long64)res[3]); |
| |
| while(itr--) { |
| k = (long64*)__data->keysched; |
| for(i=8; i--; ) { |
| s = *k++ ^ r; |
| l ^= SBA(sb23, (s ) & 0xffff); |
| l ^= SBA(sb23, (s >>= 16) & 0xffff); |
| l ^= SBA(sb01, (s >>= 16) & 0xffff); |
| l ^= SBA(sb01, (s >>= 16) ); |
| |
| s = *k++ ^ l; |
| r ^= SBA(sb23, (s ) & 0xffff); |
| r ^= SBA(sb23, (s >>= 16) & 0xffff); |
| r ^= SBA(sb01, (s >>= 16) & 0xffff); |
| r ^= SBA(sb01, (s >>= 16) ); |
| } |
| s=l; l=r; r=s; |
| } |
| |
| res[0] = l >> 32; res[1] = l & 0xffffffff; |
| res[2] = r >> 32; res[3] = r & 0xffffffff; |
| } |
| |
| #endif |