Branch data     Line data    Source code

       1                 :            : /*
       2                 :            :  * FIPS 186-2 PRF for libcrypto
       3                 :            :  * Copyright (c) 2004-2005, Jouni Malinen <j@w1.fi>
       4                 :            :  *
       5                 :            :  * This software may be distributed under the terms of the BSD license.
       6                 :            :  * See README for more details.
       7                 :            :  */
       8                 :            : 
       9                 :            : #include "includes.h"
      10                 :            : #include <openssl/sha.h>
      11                 :            : 
      12                 :            : #include "common.h"
      13                 :            : #include "crypto.h"
      14                 :            : 
      15                 :            : 
      16                 :          0 : static void sha1_transform(u8 *state, const u8 data[64])
      17                 :            : {
      18                 :            :         SHA_CTX context;
      19                 :          0 :         os_memset(&context, 0, sizeof(context));
      20                 :          0 :         os_memcpy(&context.h0, state, 5 * 4);
      21                 :          0 :         SHA1_Transform(&context, data);
      22                 :          0 :         os_memcpy(state, &context.h0, 5 * 4);
      23                 :          0 : }
      24                 :            : 
      25                 :            : 
      26                 :          0 : int fips186_2_prf(const u8 *seed, size_t seed_len, u8 *x, size_t xlen)
      27                 :            : {
      28                 :            :         u8 xkey[64];
      29                 :            :         u32 t[5], _t[5];
      30                 :            :         int i, j, m, k;
      31                 :          0 :         u8 *xpos = x;
      32                 :            :         u32 carry;
      33                 :            : 
      34         [ #  # ]:          0 :         if (seed_len < sizeof(xkey))
      35                 :          0 :                 os_memset(xkey + seed_len, 0, sizeof(xkey) - seed_len);
      36                 :            :         else
      37                 :          0 :                 seed_len = sizeof(xkey);
      38                 :            : 
      39                 :            :         /* FIPS 186-2 + change notice 1 */
      40                 :            : 
      41                 :          0 :         os_memcpy(xkey, seed, seed_len);
      42                 :          0 :         t[0] = 0x67452301;
      43                 :          0 :         t[1] = 0xEFCDAB89;
      44                 :          0 :         t[2] = 0x98BADCFE;
      45                 :          0 :         t[3] = 0x10325476;
      46                 :          0 :         t[4] = 0xC3D2E1F0;
      47                 :            : 
      48                 :          0 :         m = xlen / 40;
      49         [ #  # ]:          0 :         for (j = 0; j < m; j++) {
      50                 :            :                 /* XSEED_j = 0 */
      51         [ #  # ]:          0 :                 for (i = 0; i < 2; i++) {
      52                 :            :                         /* XVAL = (XKEY + XSEED_j) mod 2^b */
      53                 :            : 
      54                 :            :                         /* w_i = G(t, XVAL) */
      55                 :          0 :                         os_memcpy(_t, t, 20);
      56                 :          0 :                         sha1_transform((u8 *) _t, xkey);
      57                 :          0 :                         _t[0] = host_to_be32(_t[0]);
      58                 :          0 :                         _t[1] = host_to_be32(_t[1]);
      59                 :          0 :                         _t[2] = host_to_be32(_t[2]);
      60                 :          0 :                         _t[3] = host_to_be32(_t[3]);
      61                 :          0 :                         _t[4] = host_to_be32(_t[4]);
      62                 :          0 :                         os_memcpy(xpos, _t, 20);
      63                 :            : 
      64                 :            :                         /* XKEY = (1 + XKEY + w_i) mod 2^b */
      65                 :          0 :                         carry = 1;
      66         [ #  # ]:          0 :                         for (k = 19; k >= 0; k--) {
      67                 :          0 :                                 carry += xkey[k] + xpos[k];
      68                 :          0 :                                 xkey[k] = carry & 0xff;
      69                 :          0 :                                 carry >>= 8;
      70                 :            :                         }
      71                 :            : 
      72                 :          0 :                         xpos += 20;
      73                 :            :                 }
      74                 :            :                 /* x_j = w_0|w_1 */
      75                 :            :         }
      76                 :            : 
      77                 :          0 :         return 0;
      78                 :            : }