Ремонт принтеров, сканнеров, факсов и остальной офисной техники


назад Оглавление вперед




[194]

for(i=0;i<10;i++) long block[i] = i; idea enc(&c,lbp,5);

for(i=0;i<10;i+=2) printf("Block %01d = %08lx %08lx.\n",

i/2,long block[i],long block[i+1]);

idea dec(&c,lbp,3); idea dec(&c,lbp+24,2);

for(i=0;i<10;i+=2) printf("Block %01d = %08lx %08lx.\n",

i/2,long block[i],long block[i+1]);

return 0;/* normal exit */

} /* main */

typedef unsigned long u4; typedef unsigned char byte;

typedef struct {

u4 k[8];

/* Constant s-boxes -- set up in gost init(). */

char k87[256],k65[256],k43[256],k21[256];

} gost ctx;

/* Note: encrypt and decrypt expect full blocks--padding blocks is callers responsibility. All bulk encryption is done in ECB mode by these calls. Other modes may be added easily enough.*/

void gost enc(gost ctx *, u4 *, int);

void gost dec(gost ctx *, u4 *, int);

void gost key(gost ctx *, u4 *);

void gost init(gost ctx *);

void gost destroy(gost ctx *);

#ifdef alpha /* Any other 64-bit machines? */

typedef unsigned int word32;

typedef unsigned long word32;

kboxinit(gost ctx *c)

byte k8[16] = {14,4,13,1,2, 15, 11, 8, 3, 10, 6,

12,5,9,0,7 };

byte k7[16] = {15,1,8,14,6, 11, 3, 4, 9, 7, 2,

13,12,0,5,10 };

byte k6[16] = {10,0,9,14,6, 3, 15, 5, 1, 13, 12,

7,11,4,2,8 };

byte k5[16] = { 7,13,14,3,0, 6, 9, 10, 1, 2, 8,

5,11,12,4,15 };

byte k4[16] = { 2,12,4,1,7, 10, 11, 6, 8, 5, 3,

15,13,0,14,9 };

byte k3[16] = {12,1,10,15,9, 2, 6, 8, 0, 13, 3,

4,14,7,5,11 };


byte k2[16] = { 4,11,2,14,15, 0, 8, 13, 3, 12, 9,

7,5,10,6,1 };

byte k1[16] = {13,2,8,4,6, 15, 11, 1, 10, 9, 3,

14,5,0,12,7 };

for (i = 0; i < 25 6;{

c->k87[i] = k8[i >> 4] << 4 k7[i & 15]; c->k65[i] = k6[i >> 4] << 4 k5[i & 15]; c->k43[i] = k4[i >> 4] << 4 k3[i & 15]; c->k21[i] = k2[i >> 4] << 4 k1[i & 15];

static word32 f(gost ctx *c,word32 x)

x = c->k87[x>>24 & 255] << 24 c->k65[x>>16 & 255] << 16 c->k43[x>> 8 & 255] << 8 c->k21[x & 255];

/* Rotate left 11 bits */ return x<<11 x>>(32-11);

void gostcrypt(gost ctx *c, word32 *d){

register word32 n1, n2; /* As named in the GOST */

n1 = d[0]; n2 = d[1];

/* Instead of swapping halves, swap names each round */

n2 л= f(c,n1+c->k[0]);n1л=f(c,n2+c->k[1]);

n2 л= f(c,n1+c->k[2]);n1л=f(c,n2+c->k[3]);

n2 л= f(c,n1+c->k[4]);n1л=f(c,n2+c->k[5]);

n2 л= f(c,n1+c->k[6]);n1л=f(c,n2+c->k[7]);

n2 л= f(c,n1+c->k[0]);n1л=f(c,n2+c->k[1]);

n2 л= f(c,n1+c->k[2]);n1л=f(c,n2+c->k[3]);

n2 л= f(c,n1+c->k[4]);n1л=f(c,n2+c->k[5]);

n2 л= f(c,n1+c->k[6]);n1л=f(c,n2+c->k[7]);

n2 л= f(c,n1+c->k[0]);n1л=f(c,n2+c->k[1]);

n2 л= f(c,n1+c->k[2]);n1л=f(c,n2+c->k[3]);

n2 л= f(c,n1+c->k[4]);n1л=f(c,n2+c->k[5]);

n2 л= f(c,n1+c->k[6]);n1л=f(c,n2+c->k[7]);

n2 л= f(c,n1+c->k[7]);n1л=f(c,n2+c->k[6]);

n2 л= f(c,n1+c->k[5]);n1л=f(c,n2+c->k[4]);

n2 л= f(c,n1+c->k[3]);n1л=f(c,n2+c->k[2]);

n2 л= f(c,n1+c->k[1]);n1л=f(c,n2+c->k[0]);

d[0] = n2; d[1] = n1;

gostdecrypt(gost ctx *c, u4 *d){

register word32 n1, n2; /* As named in the GOST */

n1 = d[0]; n2 = d[1];

n2 л= f(c,n1+c->k[0]);n1л=f(c,n2+c->k[1]);

n2 л= f(c,n1+c->k[2]);n1л=f(c,n2+c->k[3]);

n2 л= f(c,n1+c->k[4]);n1л=f(c,n2+c->k[5]);


n2 a= f(c,n1+c->k[6]); n1 a= f(c,n2+c->k[7]);

n2 a= f(c,n1+c->k[7]);n1a=f(c,n2+c->k[6]);

n2 a= f(c,n1+c->k[5]);n1a=f(c,n2+c->k[4]);

n2 a= f(c,n1+c->k[3]);n1a=f(c,n2+c->k[2]);

n2 a= f(c,n1+c->k[1]);n1a=f(c,n2+c->k[0]);

n2 a= f(c,n1+c->k[7]);n1a=f(c,n2+c->k[6]);

n2 a= f(c,n1+c->k[5]);n1a=f(c,n2+c->k[4]);

n2 a= f(c,n1+c->k[3]);n1a=f(c,n2+c->k[2]);

n2 a= f(c,n1+c->k[1]);n1a=f(c,n2+c->k[0]);

n2 a= f(c,n1+c->k[7]);n1a=f(c,n2+c->k[6]);

n2 a= f(c,n1+c->k[5]);n1a=f(c,n2+c->k[4]);

n2 a= f(c,n1+c->k[3]);n1a=f(c,n2+c->k[2]);

n2 a= f(c,n1+c->k[1]);n1a=f(c,n2+c->k[0]);

d[0] = n2; d[1] = n1;

void gost enc(gost ctx *c, u4 *d, int blocks){ int i;

for(i=0;i<blocks;i++){ gostcrypt(c,d); d+=2;

void gost dec(gost ctx *c, u4 *d, int blocks){ int i;

for(i=0;i<blocks;i++){

gostdecrypt(c,d); d+=2;

void gost key(gost ctx *c, u4 *k){ int i;

for(i=0;i<8;i++) c->k[i]=k[i];

void gost init(gost ctx *c){ kboxinit(c);

void gost destroy(gost ctx *c){ int i;

for(i=0;i<8;i++) c->k[i]=0;

void main(void){

gost ctx gc;

u4 k[8],data[10];

/* Initialize GOST context. */ gost init(&gc);

/* Prepare key--a simple key should be OK, with this many rounds! */ for(i=0;i<8;i++) k[i] = i;



[стр.Начало] [стр.1] [стр.2] [стр.3] [стр.4] [стр.5] [стр.6] [стр.7] [стр.8] [стр.9] [стр.10] [стр.11] [стр.12] [стр.13] [стр.14] [стр.15] [стр.16] [стр.17] [стр.18] [стр.19] [стр.20] [стр.21] [стр.22] [стр.23] [стр.24] [стр.25] [стр.26] [стр.27] [стр.28] [стр.29] [стр.30] [стр.31] [стр.32] [стр.33] [стр.34] [стр.35] [стр.36] [стр.37] [стр.38] [стр.39] [стр.40] [стр.41] [стр.42] [стр.43] [стр.44] [стр.45] [стр.46] [стр.47] [стр.48] [стр.49] [стр.50] [стр.51] [стр.52] [стр.53] [стр.54] [стр.55] [стр.56] [стр.57] [стр.58] [стр.59] [стр.60] [стр.61] [стр.62] [стр.63] [стр.64] [стр.65] [стр.66] [стр.67] [стр.68] [стр.69] [стр.70] [стр.71] [стр.72] [стр.73] [стр.74] [стр.75] [стр.76] [стр.77] [стр.78] [стр.79] [стр.80] [стр.81] [стр.82] [стр.83] [стр.84] [стр.85] [стр.86] [стр.87] [стр.88] [стр.89] [стр.90] [стр.91] [стр.92] [стр.93] [стр.94] [стр.95] [стр.96] [стр.97] [стр.98] [стр.99] [стр.100] [стр.101] [стр.102] [стр.103] [стр.104] [стр.105] [стр.106] [стр.107] [стр.108] [стр.109] [стр.110] [стр.111] [стр.112] [стр.113] [стр.114] [стр.115] [стр.116] [стр.117] [стр.118] [стр.119] [стр.120] [стр.121] [стр.122] [стр.123] [стр.124] [стр.125] [стр.126] [стр.127] [стр.128] [стр.129] [стр.130] [стр.131] [стр.132] [стр.133] [стр.134] [стр.135] [стр.136] [стр.137] [стр.138] [стр.139] [стр.140] [стр.141] [стр.142] [стр.143] [стр.144] [стр.145] [стр.146] [стр.147] [стр.148] [стр.149] [стр.150] [стр.151] [стр.152] [стр.153] [стр.154] [стр.155] [стр.156] [стр.157] [стр.158] [стр.159] [стр.160] [стр.161] [стр.162] [стр.163] [стр.164] [стр.165] [стр.166] [стр.167] [стр.168] [стр.169] [стр.170] [стр.171] [стр.172] [стр.173] [стр.174] [стр.175] [стр.176] [стр.177] [стр.178] [стр.179] [стр.180] [стр.181] [стр.182] [стр.183] [стр.184] [стр.185] [стр.186] [стр.187] [стр.188] [стр.189] [стр.190] [стр.191] [стр.192] [стр.193] [стр.194] [стр.195] [стр.196] [стр.197] [стр.198] [стр.199] [стр.200] [стр.201] [стр.202] [стр.203]