mirror of
https://github.com/shadps4-emu/ext-cryptopp.git
synced 2024-12-17 23:38:35 +00:00
124 lines
3.4 KiB
C++
124 lines
3.4 KiB
C++
#include "pch.h"
|
|
#include "gost.h"
|
|
#include "misc.h"
|
|
|
|
NAMESPACE_BEGIN(CryptoPP)
|
|
|
|
// these are the S-boxes given in Applied Cryptography 2nd Ed., p. 333
|
|
const byte GOST::Base::sBox[8][16]={
|
|
{4, 10, 9, 2, 13, 8, 0, 14, 6, 11, 1, 12, 7, 15, 5, 3},
|
|
{14, 11, 4, 12, 6, 13, 15, 10, 2, 3, 8, 1, 0, 7, 5, 9},
|
|
{5, 8, 1, 13, 10, 3, 4, 2, 14, 15, 12, 7, 6, 0, 9, 11},
|
|
{7, 13, 10, 1, 0, 8, 9, 15, 14, 4, 6, 12, 11, 2, 5, 3},
|
|
{6, 12, 7, 1, 5, 15, 13, 8, 4, 10, 9, 14, 0, 3, 11, 2},
|
|
{4, 11, 10, 0, 7, 2, 1, 13, 3, 6, 8, 5, 9, 12, 15, 14},
|
|
{13, 11, 4, 1, 3, 15, 5, 9, 0, 10, 14, 7, 6, 8, 2, 12},
|
|
{1, 15, 13, 0, 5, 7, 10, 4, 9, 2, 3, 14, 6, 11, 8, 12}};
|
|
|
|
/* // these are the S-boxes given in the GOST source code listing in Applied
|
|
// Cryptography 2nd Ed., p. 644. they appear to be from the DES S-boxes
|
|
{13, 2, 8, 4, 6, 15, 11, 1, 10, 9, 3, 14, 5, 0, 12, 7 },
|
|
{ 4, 11, 2, 14, 15, 0, 8, 13, 3, 12, 9, 7, 5, 10, 6, 1 },
|
|
{12, 1, 10, 15, 9, 2, 6, 8, 0, 13, 3, 4, 14, 7, 5, 11 },
|
|
{ 2, 12, 4, 1, 7, 10, 11, 6, 8, 5, 3, 15, 13, 0, 14, 9 },
|
|
{ 7, 13, 14, 3, 0, 6, 9, 10, 1, 2, 8, 5, 11, 12, 4, 15 },
|
|
{10, 0, 9, 14, 6, 3, 15, 5, 1, 13, 12, 7, 11, 4, 2, 8 },
|
|
{15, 1, 8, 14, 6, 11, 3, 4, 9, 7, 2, 13, 12, 0, 5, 10 },
|
|
{14, 4, 13, 1, 2, 15, 11, 8, 3, 10, 6, 12, 5, 9, 0, 7 }};
|
|
*/
|
|
|
|
volatile bool GOST::Base::sTableCalculated = false;
|
|
word32 GOST::Base::sTable[4][256];
|
|
|
|
void GOST::Base::UncheckedSetKey(const byte *userKey, unsigned int length, const NameValuePairs &)
|
|
{
|
|
AssertValidKeyLength(length);
|
|
|
|
PrecalculateSTable();
|
|
|
|
GetUserKey(LITTLE_ENDIAN_ORDER, m_key.begin(), 8, userKey, KEYLENGTH);
|
|
}
|
|
|
|
void GOST::Base::PrecalculateSTable()
|
|
{
|
|
if (!sTableCalculated)
|
|
{
|
|
for (unsigned i = 0; i < 4; i++)
|
|
for (unsigned j = 0; j < 256; j++)
|
|
{
|
|
word32 temp = sBox[2*i][j%16] | (sBox[2*i+1][j/16] << 4);
|
|
sTable[i][j] = rotlMod(temp, 11+8*i);
|
|
}
|
|
|
|
sTableCalculated=true;
|
|
}
|
|
}
|
|
|
|
#define f(x) ( t=x, \
|
|
sTable[3][GETBYTE(t, 3)] ^ sTable[2][GETBYTE(t, 2)] \
|
|
^ sTable[1][GETBYTE(t, 1)] ^ sTable[0][GETBYTE(t, 0)] )
|
|
|
|
typedef BlockGetAndPut<word32, LittleEndian> Block;
|
|
|
|
void GOST::Enc::ProcessAndXorBlock(const byte *inBlock, const byte *xorBlock, byte *outBlock) const
|
|
{
|
|
word32 n1, n2, t;
|
|
|
|
Block::Get(inBlock)(n1)(n2);
|
|
|
|
for (unsigned int i=0; i<3; i++)
|
|
{
|
|
n2 ^= f(n1+m_key[0]);
|
|
n1 ^= f(n2+m_key[1]);
|
|
n2 ^= f(n1+m_key[2]);
|
|
n1 ^= f(n2+m_key[3]);
|
|
n2 ^= f(n1+m_key[4]);
|
|
n1 ^= f(n2+m_key[5]);
|
|
n2 ^= f(n1+m_key[6]);
|
|
n1 ^= f(n2+m_key[7]);
|
|
}
|
|
|
|
n2 ^= f(n1+m_key[7]);
|
|
n1 ^= f(n2+m_key[6]);
|
|
n2 ^= f(n1+m_key[5]);
|
|
n1 ^= f(n2+m_key[4]);
|
|
n2 ^= f(n1+m_key[3]);
|
|
n1 ^= f(n2+m_key[2]);
|
|
n2 ^= f(n1+m_key[1]);
|
|
n1 ^= f(n2+m_key[0]);
|
|
|
|
Block::Put(xorBlock, outBlock)(n2)(n1);
|
|
}
|
|
|
|
void GOST::Dec::ProcessAndXorBlock(const byte *inBlock, const byte *xorBlock, byte *outBlock) const
|
|
{
|
|
word32 n1, n2, t;
|
|
|
|
Block::Get(inBlock)(n1)(n2);
|
|
|
|
n2 ^= f(n1+m_key[0]);
|
|
n1 ^= f(n2+m_key[1]);
|
|
n2 ^= f(n1+m_key[2]);
|
|
n1 ^= f(n2+m_key[3]);
|
|
n2 ^= f(n1+m_key[4]);
|
|
n1 ^= f(n2+m_key[5]);
|
|
n2 ^= f(n1+m_key[6]);
|
|
n1 ^= f(n2+m_key[7]);
|
|
|
|
for (unsigned int i=0; i<3; i++)
|
|
{
|
|
n2 ^= f(n1+m_key[7]);
|
|
n1 ^= f(n2+m_key[6]);
|
|
n2 ^= f(n1+m_key[5]);
|
|
n1 ^= f(n2+m_key[4]);
|
|
n2 ^= f(n1+m_key[3]);
|
|
n1 ^= f(n2+m_key[2]);
|
|
n2 ^= f(n1+m_key[1]);
|
|
n1 ^= f(n2+m_key[0]);
|
|
}
|
|
|
|
Block::Put(xorBlock, outBlock)(n2)(n1);
|
|
}
|
|
|
|
NAMESPACE_END
|