41 lines
997 B
C
41 lines
997 B
C
|
/*
|
||
|
* Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved.
|
||
|
*
|
||
|
* Licensed under the OpenSSL license (the "License"). You may not use
|
||
|
* this file except in compliance with the License. You can obtain a copy
|
||
|
* in the file LICENSE in the source distribution or at
|
||
|
* https://www.openssl.org/source/license.html
|
||
|
*/
|
||
|
|
||
|
#include <openssl/rc2.h>
|
||
|
#include "rc2_local.h"
|
||
|
#include <openssl/opensslv.h>
|
||
|
|
||
|
/*-
|
||
|
* RC2 as implemented frm a posting from
|
||
|
* Newsgroups: sci.crypt
|
||
|
* Subject: Specification for Ron Rivests Cipher No.2
|
||
|
* Message-ID: <4fk39f$f70@net.auckland.ac.nz>
|
||
|
* Date: 11 Feb 1996 06:45:03 GMT
|
||
|
*/
|
||
|
|
||
|
void RC2_ecb_encrypt(const unsigned char *in, unsigned char *out, RC2_KEY *ks,
|
||
|
int encrypt)
|
||
|
{
|
||
|
unsigned long l, d[2];
|
||
|
|
||
|
c2l(in, l);
|
||
|
d[0] = l;
|
||
|
c2l(in, l);
|
||
|
d[1] = l;
|
||
|
if (encrypt)
|
||
|
RC2_encrypt(d, ks);
|
||
|
else
|
||
|
RC2_decrypt(d, ks);
|
||
|
l = d[0];
|
||
|
l2c(l, out);
|
||
|
l = d[1];
|
||
|
l2c(l, out);
|
||
|
l = d[0] = d[1] = 0;
|
||
|
}
|