?login_element?

Subversion Repositories NedoOS

Rev

Blame | Last modification | View Log | Download

  1.     typedef struct {
  2.         unsigned char key[32];
  3.         unsigned char enckey[32];
  4.         unsigned char deckey[32];
  5.     } aesctx;
  6.  
  7.     void aesini(aesctx *, unsigned char * );
  8.     void aesdon(aesctx *);
  9.     void aesenc(aesctx *, unsigned char * );
  10.     void aesdec(aesctx *, unsigned char * );
  11.  
  12. #define FD(x)  (((x) >> 1) ^ (((x) & 1) ? 0x8d : 0))
  13. #define BACK_TO_TABLES
  14.  
  15. static unsigned char rj_xtime(unsigned char);
  16. static void aessB(unsigned char *);
  17. static void aessBi(unsigned char *);
  18. static void aesRK(unsigned char *, unsigned char *);
  19. static void aesRKc(unsigned char *, unsigned char *, unsigned char *);
  20. static void aessR(unsigned char *);
  21. static void aessRi(unsigned char *);
  22. static void aesmC(unsigned char *);
  23. static void aesmCi(unsigned char *);
  24. static void aeseEK(unsigned char *, unsigned char *);
  25. static void aeseDK(unsigned char *, unsigned char *);
  26.  
  27. static const unsigned char sbox[256] =
  28. {
  29.     0x63, 0x7c, 0x77, 0x7b, 0xf2, 0x6b, 0x6f, 0xc5,
  30.     0x30, 0x01, 0x67, 0x2b, 0xfe, 0xd7, 0xab, 0x76,
  31.     0xca, 0x82, 0xc9, 0x7d, 0xfa, 0x59, 0x47, 0xf0,
  32.     0xad, 0xd4, 0xa2, 0xaf, 0x9c, 0xa4, 0x72, 0xc0,
  33.     0xb7, 0xfd, 0x93, 0x26, 0x36, 0x3f, 0xf7, 0xcc,
  34.     0x34, 0xa5, 0xe5, 0xf1, 0x71, 0xd8, 0x31, 0x15,
  35.     0x04, 0xc7, 0x23, 0xc3, 0x18, 0x96, 0x05, 0x9a,
  36.     0x07, 0x12, 0x80, 0xe2, 0xeb, 0x27, 0xb2, 0x75,
  37.     0x09, 0x83, 0x2c, 0x1a, 0x1b, 0x6e, 0x5a, 0xa0,
  38.     0x52, 0x3b, 0xd6, 0xb3, 0x29, 0xe3, 0x2f, 0x84,
  39.     0x53, 0xd1, 0x00, 0xed, 0x20, 0xfc, 0xb1, 0x5b,
  40.     0x6a, 0xcb, 0xbe, 0x39, 0x4a, 0x4c, 0x58, 0xcf,
  41.     0xd0, 0xef, 0xaa, 0xfb, 0x43, 0x4d, 0x33, 0x85,
  42.     0x45, 0xf9, 0x02, 0x7f, 0x50, 0x3c, 0x9f, 0xa8,
  43.     0x51, 0xa3, 0x40, 0x8f, 0x92, 0x9d, 0x38, 0xf5,
  44.     0xbc, 0xb6, 0xda, 0x21, 0x10, 0xff, 0xf3, 0xd2,
  45.     0xcd, 0x0c, 0x13, 0xec, 0x5f, 0x97, 0x44, 0x17,
  46.     0xc4, 0xa7, 0x7e, 0x3d, 0x64, 0x5d, 0x19, 0x73,
  47.     0x60, 0x81, 0x4f, 0xdc, 0x22, 0x2a, 0x90, 0x88,
  48.     0x46, 0xee, 0xb8, 0x14, 0xde, 0x5e, 0x0b, 0xdb,
  49.     0xe0, 0x32, 0x3a, 0x0a, 0x49, 0x06, 0x24, 0x5c,
  50.     0xc2, 0xd3, 0xac, 0x62, 0x91, 0x95, 0xe4, 0x79,
  51.     0xe7, 0xc8, 0x37, 0x6d, 0x8d, 0xd5, 0x4e, 0xa9,
  52.     0x6c, 0x56, 0xf4, 0xea, 0x65, 0x7a, 0xae, 0x08,
  53.     0xba, 0x78, 0x25, 0x2e, 0x1c, 0xa6, 0xb4, 0xc6,
  54.     0xe8, 0xdd, 0x74, 0x1f, 0x4b, 0xbd, 0x8b, 0x8a,
  55.     0x70, 0x3e, 0xb5, 0x66, 0x48, 0x03, 0xf6, 0x0e,
  56.     0x61, 0x35, 0x57, 0xb9, 0x86, 0xc1, 0x1d, 0x9e,
  57.     0xe1, 0xf8, 0x98, 0x11, 0x69, 0xd9, 0x8e, 0x94,
  58.     0x9b, 0x1e, 0x87, 0xe9, 0xce, 0x55, 0x28, 0xdf,
  59.     0x8c, 0xa1, 0x89, 0x0d, 0xbf, 0xe6, 0x42, 0x68,
  60.     0x41, 0x99, 0x2d, 0x0f, 0xb0, 0x54, 0xbb, 0x16
  61. };
  62. static const unsigned char sboxin[256] =
  63. {
  64.     0x52, 0x09, 0x6a, 0xd5, 0x30, 0x36, 0xa5, 0x38,
  65.     0xbf, 0x40, 0xa3, 0x9e, 0x81, 0xf3, 0xd7, 0xfb,
  66.     0x7c, 0xe3, 0x39, 0x82, 0x9b, 0x2f, 0xff, 0x87,
  67.     0x34, 0x8e, 0x43, 0x44, 0xc4, 0xde, 0xe9, 0xcb,
  68.     0x54, 0x7b, 0x94, 0x32, 0xa6, 0xc2, 0x23, 0x3d,
  69.     0xee, 0x4c, 0x95, 0x0b, 0x42, 0xfa, 0xc3, 0x4e,
  70.     0x08, 0x2e, 0xa1, 0x66, 0x28, 0xd9, 0x24, 0xb2,
  71.     0x76, 0x5b, 0xa2, 0x49, 0x6d, 0x8b, 0xd1, 0x25,
  72.     0x72, 0xf8, 0xf6, 0x64, 0x86, 0x68, 0x98, 0x16,
  73.     0xd4, 0xa4, 0x5c, 0xcc, 0x5d, 0x65, 0xb6, 0x92,
  74.     0x6c, 0x70, 0x48, 0x50, 0xfd, 0xed, 0xb9, 0xda,
  75.     0x5e, 0x15, 0x46, 0x57, 0xa7, 0x8d, 0x9d, 0x84,
  76.     0x90, 0xd8, 0xab, 0x00, 0x8c, 0xbc, 0xd3, 0x0a,
  77.     0xf7, 0xe4, 0x58, 0x05, 0xb8, 0xb3, 0x45, 0x06,
  78.     0xd0, 0x2c, 0x1e, 0x8f, 0xca, 0x3f, 0x0f, 0x02,
  79.     0xc1, 0xaf, 0xbd, 0x03, 0x01, 0x13, 0x8a, 0x6b,
  80.     0x3a, 0x91, 0x11, 0x41, 0x4f, 0x67, 0xdc, 0xea,
  81.     0x97, 0xf2, 0xcf, 0xce, 0xf0, 0xb4, 0xe6, 0x73,
  82.     0x96, 0xac, 0x74, 0x22, 0xe7, 0xad, 0x35, 0x85,
  83.     0xe2, 0xf9, 0x37, 0xe8, 0x1c, 0x75, 0xdf, 0x6e,
  84.     0x47, 0xf1, 0x1a, 0x71, 0x1d, 0x29, 0xc5, 0x89,
  85.     0x6f, 0xb7, 0x62, 0x0e, 0xaa, 0x18, 0xbe, 0x1b,
  86.     0xfc, 0x56, 0x3e, 0x4b, 0xc6, 0xd2, 0x79, 0x20,
  87.     0x9a, 0xdb, 0xc0, 0xfe, 0x78, 0xcd, 0x5a, 0xf4,
  88.     0x1f, 0xdd, 0xa8, 0x33, 0x88, 0x07, 0xc7, 0x31,
  89.     0xb1, 0x12, 0x10, 0x59, 0x27, 0x80, 0xec, 0x5f,
  90.     0x60, 0x51, 0x7f, 0xa9, 0x19, 0xb5, 0x4a, 0x0d,
  91.     0x2d, 0xe5, 0x7a, 0x9f, 0x93, 0xc9, 0x9c, 0xef,
  92.     0xa0, 0xe0, 0x3b, 0x4d, 0xae, 0x2a, 0xf5, 0xb0,
  93.     0xc8, 0xeb, 0xbb, 0x3c, 0x83, 0x53, 0x99, 0x61,
  94.     0x17, 0x2b, 0x04, 0x7e, 0xba, 0x77, 0xd6, 0x26,
  95.     0xe1, 0x69, 0x14, 0x63, 0x55, 0x21, 0x0c, 0x7d
  96. };
  97.  
  98. #define rj_sbox(x)     sbox[(x)]
  99. #define rj_sbox_inv(x) sboxin[(x)]
  100.  
  101. static unsigned char rj_xtime(unsigned char x)
  102. {
  103.     unsigned char y = (unsigned char)(x << 1);
  104.     return (x & 0x80) ? (y ^ 0x1b) : y;
  105. }
  106.  
  107. static void aessB(unsigned char *buf)
  108. {
  109.      unsigned char i = 16;
  110.  
  111.     while (i--) buf[i] = rj_sbox(buf[i]);
  112. }
  113.  
  114. static void aessBi(unsigned char *buf)
  115. {
  116.      unsigned char i = 16;
  117.  
  118.     while (i--) buf[i] = rj_sbox_inv(buf[i]);
  119. }
  120.  
  121. static void aesRK(unsigned char *buf, unsigned char *key)
  122. {
  123.      unsigned char i = 16;
  124.  
  125.     while (i--) buf[i] ^= key[i];
  126. }
  127.  
  128. static void aesRKc(unsigned char *buf, unsigned char *key, unsigned char *cpk)
  129. {
  130.      unsigned char i = 16;
  131.  
  132.     while (i--)  buf[i] ^= (cpk[i] = key[i]), cpk[16 + i] = key[16 + i];
  133. }
  134.  
  135. static void aessR(unsigned char *buf)
  136. {
  137.      unsigned char i, j; /* to make it potentially parallelable :) */
  138.  
  139.     i = buf[1], buf[1] = buf[5], buf[5] = buf[9], buf[9] = buf[13], buf[13] = i;
  140.     i = buf[10], buf[10] = buf[2], buf[2] = i;
  141.     j = buf[3], buf[3] = buf[15], buf[15] = buf[11], buf[11] = buf[7], buf[7] = j;
  142.     j = buf[14], buf[14] = buf[6], buf[6]  = j;
  143.  
  144. }
  145.  
  146. static void aessRi(unsigned char *buf)
  147. {
  148.      unsigned char i, j; /* same as above :) */
  149.  
  150.     i = buf[1], buf[1] = buf[13], buf[13] = buf[9], buf[9] = buf[5], buf[5] = i;
  151.     i = buf[2], buf[2] = buf[10], buf[10] = i;
  152.     j = buf[3], buf[3] = buf[7], buf[7] = buf[11], buf[11] = buf[15], buf[15] = j;
  153.     j = buf[6], buf[6] = buf[14], buf[14] = j;
  154.  
  155. }
  156.  
  157. static void aesmC(unsigned char *buf)
  158. {
  159.      unsigned char i, a, b, c, d, e;
  160.  
  161.     for (i = 0; i < 16; i += 4)
  162.     {
  163.         a = buf[i];
  164.         b = buf[i + 1];
  165.         c = buf[i + 2];
  166.         d = buf[i + 3];
  167.         e = a ^ b ^ c ^ d;
  168.         buf[i] ^= e ^ rj_xtime(a ^ b);
  169.         buf[i + 1] ^= e ^ rj_xtime(b ^ c);
  170.         buf[i + 2] ^= e ^ rj_xtime(c ^ d);
  171.         buf[i + 3] ^= e ^ rj_xtime(d ^ a);
  172.     }
  173. }
  174.  
  175. void aesmCi(unsigned char *buf)
  176. {
  177.      unsigned char i, a, b, c, d, e, x, y, z;
  178.  
  179.     for (i = 0; i < 16; i += 4)
  180.     {
  181.         a = buf[i];
  182.         b = buf[i + 1];
  183.         c = buf[i + 2];
  184.         d = buf[i + 3];
  185.         e = a ^ b ^ c ^ d;
  186.         z = rj_xtime(e);
  187.         x = e ^ rj_xtime(rj_xtime(z ^ a ^ c));
  188.         y = e ^ rj_xtime(rj_xtime(z ^ b ^ d));
  189.         buf[i] ^= x ^ rj_xtime(a ^ b);
  190.         buf[i + 1] ^= y ^ rj_xtime(b ^ c);
  191.         buf[i + 2] ^= x ^ rj_xtime(c ^ d);
  192.         buf[i + 3] ^= y ^ rj_xtime(d ^ a);
  193.     }
  194. }
  195.  
  196. static void aeseEK(unsigned char *k, unsigned char *rc)
  197. {
  198.      unsigned char i;
  199.  
  200.     k[0] ^= rj_sbox(k[29]) ^ (*rc);
  201.     k[1] ^= rj_sbox(k[30]);
  202.     k[2] ^= rj_sbox(k[31]);
  203.     k[3] ^= rj_sbox(k[28]);
  204.     *rc = rj_xtime( *rc);
  205.  
  206.     for(i = 4; i < 16; i += 4)  k[i] ^= k[i - 4],   k[i + 1] ^= k[i - 3],
  207.                                             k[i + 2] ^= k[i - 2], k[i + 3] ^= k[i - 1];
  208.     k[16] ^= rj_sbox(k[12]);
  209.     k[17] ^= rj_sbox(k[13]);
  210.     k[18] ^= rj_sbox(k[14]);
  211.     k[19] ^= rj_sbox(k[15]);
  212.  
  213.     for(i = 20; i < 32; i += 4) k[i] ^= k[i - 4],   k[i + 1] ^= k[i - 3],
  214.                                             k[i + 2] ^= k[i - 2], k[i + 3] ^= k[i - 1];
  215.  
  216. }
  217.  
  218. void aeseDK(unsigned char *k, unsigned char *rc)
  219. {
  220.     unsigned char i;
  221.  
  222.     for(i = 28; i > 16; i -= 4) k[i + 0] ^= k[i - 4], k[i + 1] ^= k[i - 3],
  223.                                                 k[i + 2] ^= k[i - 2], k[i + 3] ^= k[i - 1];
  224.  
  225.     k[16] ^= rj_sbox(k[12]);
  226.     k[17] ^= rj_sbox(k[13]);
  227.     k[18] ^= rj_sbox(k[14]);
  228.     k[19] ^= rj_sbox(k[15]);
  229.  
  230.     for(i = 12; i > 0; i -= 4)  k[i + 0] ^= k[i - 4], k[i + 1] ^= k[i - 3],
  231.                                                 k[i + 2] ^= k[i - 2], k[i + 3] ^= k[i - 1];
  232.  
  233.     *rc = FD(*rc);
  234.     k[0] ^= rj_sbox(k[29]) ^ (*rc);
  235.     k[1] ^= rj_sbox(k[30]);
  236.     k[2] ^= rj_sbox(k[31]);
  237.     k[3] ^= rj_sbox(k[28]);
  238. }
  239.  
  240. void aesini(aesctx *ctx, unsigned char *k)
  241. {
  242.     unsigned char rcon = 1;
  243.      unsigned char i;
  244.  
  245.     for (i = 0; i < sizeof(ctx->key); i++) ctx->enckey[i] = ctx->deckey[i] = k[i];
  246.     for (i = 8; --i;) aeseEK(ctx->deckey, &rcon);
  247. }
  248.  
  249. void aesdon(aesctx *ctx)
  250. {
  251.      unsigned char i;
  252.  
  253.     for (i = 0; i < sizeof(ctx->key); i++)
  254.         ctx->key[i] = ctx->enckey[i] = ctx->deckey[i] = 0;
  255. }
  256.  
  257. void aesenc(aesctx *ctx, unsigned char *buf)
  258. {
  259.     unsigned char i, rcon;
  260.  
  261.     aesRKc(buf, ctx->enckey, ctx->key);
  262.     for(i = 1, rcon = 1; i < 14; ++i)
  263.     {
  264.         aessB(buf);
  265.         aessR(buf);
  266.         aesmC(buf);
  267.         if( i & 1 ) aesRK( buf, &ctx->key[16]);
  268.         else aeseEK(ctx->key, &rcon), aesRK(buf, ctx->key);
  269.     }
  270.     aessB(buf);
  271.     aessR(buf);
  272.     aeseEK(ctx->key, &rcon);
  273.     aesRK(buf, ctx->key);
  274. }
  275.  
  276. void aesdec(aesctx *ctx, unsigned char *buf)
  277. {
  278.     unsigned char i, rcon;
  279.  
  280.     aesRKc(buf, ctx->deckey, ctx->key);
  281.     aessRi(buf);
  282.     aessBi(buf);
  283.  
  284.     for (i = 14, rcon = 0x80; --i;)
  285.     {
  286.         if( ( i & 1 ) )
  287.         {
  288.             aeseDK(ctx->key, &rcon);
  289.             aesRK(buf, &ctx->key[16]);
  290.         }
  291.         else aesRK(buf, ctx->key);
  292.         aesmCi(buf);
  293.         aessRi(buf);
  294.         aessBi(buf);
  295.     }
  296.     aesRK( buf, ctx->key);
  297. }