sl@0: /* crypto/rc4/rc4_skey.c */ sl@0: /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com) sl@0: * All rights reserved. sl@0: * sl@0: * This package is an SSL implementation written sl@0: * by Eric Young (eay@cryptsoft.com). sl@0: * The implementation was written so as to conform with Netscapes SSL. sl@0: * sl@0: * This library is free for commercial and non-commercial use as long as sl@0: * the following conditions are aheared to. The following conditions sl@0: * apply to all code found in this distribution, be it the RC4, RSA, sl@0: * lhash, DES, etc., code; not just the SSL code. The SSL documentation sl@0: * included with this distribution is covered by the same copyright terms sl@0: * except that the holder is Tim Hudson (tjh@cryptsoft.com). sl@0: * sl@0: * Copyright remains Eric Young's, and as such any Copyright notices in sl@0: * the code are not to be removed. sl@0: * If this package is used in a product, Eric Young should be given attribution sl@0: * as the author of the parts of the library used. sl@0: * This can be in the form of a textual message at program startup or sl@0: * in documentation (online or textual) provided with the package. sl@0: * sl@0: * Redistribution and use in source and binary forms, with or without sl@0: * modification, are permitted provided that the following conditions sl@0: * are met: sl@0: * 1. Redistributions of source code must retain the copyright sl@0: * notice, this list of conditions and the following disclaimer. sl@0: * 2. Redistributions in binary form must reproduce the above copyright sl@0: * notice, this list of conditions and the following disclaimer in the sl@0: * documentation and/or other materials provided with the distribution. sl@0: * 3. All advertising materials mentioning features or use of this software sl@0: * must display the following acknowledgement: sl@0: * "This product includes cryptographic software written by sl@0: * Eric Young (eay@cryptsoft.com)" sl@0: * The word 'cryptographic' can be left out if the rouines from the library sl@0: * being used are not cryptographic related :-). sl@0: * 4. If you include any Windows specific code (or a derivative thereof) from sl@0: * the apps directory (application code) you must include an acknowledgement: sl@0: * "This product includes software written by Tim Hudson (tjh@cryptsoft.com)" sl@0: * sl@0: * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND sl@0: * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE sl@0: * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE sl@0: * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE sl@0: * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL sl@0: * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS sl@0: * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) sl@0: * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT sl@0: * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY sl@0: * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF sl@0: * SUCH DAMAGE. sl@0: * sl@0: * The licence and distribution terms for any publically available version or sl@0: * derivative of this code cannot be changed. i.e. this code cannot simply be sl@0: * copied and put under another distribution licence sl@0: * [including the GNU Public Licence.] sl@0: */ sl@0: sl@0: #include sl@0: #include "rc4_locl.h" sl@0: #include sl@0: sl@0: const char RC4_version[]="RC4" OPENSSL_VERSION_PTEXT; sl@0: sl@0: EXPORT_C const char *RC4_options(void) sl@0: { sl@0: #ifdef RC4_INDEX sl@0: if (sizeof(RC4_INT) == 1) sl@0: return("rc4(idx,char)"); sl@0: else sl@0: return("rc4(idx,int)"); sl@0: #else sl@0: if (sizeof(RC4_INT) == 1) sl@0: return("rc4(ptr,char)"); sl@0: else sl@0: return("rc4(ptr,int)"); sl@0: #endif sl@0: } sl@0: sl@0: /* RC4 as implemented from a posting from sl@0: * Newsgroups: sci.crypt sl@0: * From: sterndark@netcom.com (David Sterndark) sl@0: * Subject: RC4 Algorithm revealed. sl@0: * Message-ID: sl@0: * Date: Wed, 14 Sep 1994 06:35:31 GMT sl@0: */ sl@0: sl@0: EXPORT_C void RC4_set_key(RC4_KEY *key, int len, const unsigned char *data) sl@0: { sl@0: register RC4_INT tmp; sl@0: register int id1,id2; sl@0: register RC4_INT *d; sl@0: unsigned int i; sl@0: sl@0: d= &(key->data[0]); sl@0: key->x = 0; sl@0: key->y = 0; sl@0: id1=id2=0; sl@0: sl@0: #define SK_LOOP(d,n) { \ sl@0: tmp=d[(n)]; \ sl@0: id2 = (data[id1] + tmp + id2) & 0xff; \ sl@0: if (++id1 == len) id1=0; \ sl@0: d[(n)]=d[id2]; \ sl@0: d[id2]=tmp; } sl@0: sl@0: #if defined(OPENSSL_CPUID_OBJ) && !defined(OPENSSL_NO_ASM) sl@0: # if defined(__i386) || defined(__i386__) || defined(_M_IX86) || \ sl@0: defined(__INTEL__) || \ sl@0: defined(__x86_64) || defined(__x86_64__) || defined(_M_AMD64) sl@0: if (sizeof(RC4_INT) > 1) { sl@0: /* sl@0: * Unlike all other x86 [and x86_64] implementations, sl@0: * Intel P4 core [including EM64T] was found to perform sl@0: * poorly with wider RC4_INT. Performance improvement sl@0: * for IA-32 hand-coded assembler turned out to be 2.8x sl@0: * if re-coded for RC4_CHAR! It's however inappropriate sl@0: * to just switch to RC4_CHAR for x86[_64], as non-P4 sl@0: * implementations suffer from significant performance sl@0: * losses then, e.g. PIII exhibits >2x deterioration, sl@0: * and so does Opteron. In order to assure optimal sl@0: * all-round performance, let us [try to] detect P4 at sl@0: * run-time by checking upon HTT bit in CPU capability sl@0: * vector and set up compressed key schedule, which is sl@0: * recognized by correspondingly updated assembler sl@0: * module... sl@0: * sl@0: */ sl@0: if (OPENSSL_ia32cap_P & (1<<28)) { sl@0: unsigned char *cp=(unsigned char *)d; sl@0: sl@0: for (i=0;i<256;i++) cp[i]=i; sl@0: for (i=0;i<256;i++) SK_LOOP(cp,i); sl@0: /* mark schedule as compressed! */ sl@0: d[256/sizeof(RC4_INT)]=-1; sl@0: return; sl@0: } sl@0: } sl@0: # endif sl@0: #endif sl@0: for (i=0; i < 256; i++) d[i]=i; sl@0: for (i=0; i < 256; i+=4) sl@0: { sl@0: SK_LOOP(d,i+0); sl@0: SK_LOOP(d,i+1); sl@0: SK_LOOP(d,i+2); sl@0: SK_LOOP(d,i+3); sl@0: } sl@0: } sl@0: