OpenCL/m05400_a1.cl

   1 /**
   2  * Author......: Jens Steube <jens.steube@gmail.com>
   3  * License.....: MIT
   4  */
   5
   6 #define _SHA1_
   7
   8 #define NEW_SIMD_CODE
   9
  10 #include "inc_hash_constants.h"
  11 #include "inc_vendor.cl"
  12
  13 #define DGST_R0 3
  14 #define DGST_R1 4
  15 #define DGST_R2 2
  16 #define DGST_R3 1
  17
  18 #include "inc_hash_functions.cl"
  19 #include "inc_types.cl"
  20 #include "inc_common.cl"
  21 #include "inc_simd.cl"
  22
  23 void sha1_transform (const u32x w0[4], const u32x w1[4], const u32x w2[4], const u32x w3[4], u32x digest[5])
  24 {
  25   u32x A = digest[0];
  26   u32x B = digest[1];
  27   u32x C = digest[2];
  28   u32x D = digest[3];
  29   u32x E = digest[4];
  30
  31   u32x w0_t = w0[0];
  32   u32x w1_t = w0[1];
  33   u32x w2_t = w0[2];
  34   u32x w3_t = w0[3];
  35   u32x w4_t = w1[0];
  36   u32x w5_t = w1[1];
  37   u32x w6_t = w1[2];
  38   u32x w7_t = w1[3];
  39   u32x w8_t = w2[0];
  40   u32x w9_t = w2[1];
  41   u32x wa_t = w2[2];
  42   u32x wb_t = w2[3];
  43   u32x wc_t = w3[0];
  44   u32x wd_t = w3[1];
  45   u32x we_t = w3[2];
  46   u32x wf_t = w3[3];
  47
  48   #undef K
  49   #define K SHA1C00
  50
  51   SHA1_STEP (SHA1_F0o, A, B, C, D, E, w0_t);
  52   SHA1_STEP (SHA1_F0o, E, A, B, C, D, w1_t);
  53   SHA1_STEP (SHA1_F0o, D, E, A, B, C, w2_t);
  54   SHA1_STEP (SHA1_F0o, C, D, E, A, B, w3_t);
  55   SHA1_STEP (SHA1_F0o, B, C, D, E, A, w4_t);
  56   SHA1_STEP (SHA1_F0o, A, B, C, D, E, w5_t);
  57   SHA1_STEP (SHA1_F0o, E, A, B, C, D, w6_t);
  58   SHA1_STEP (SHA1_F0o, D, E, A, B, C, w7_t);
  59   SHA1_STEP (SHA1_F0o, C, D, E, A, B, w8_t);
  60   SHA1_STEP (SHA1_F0o, B, C, D, E, A, w9_t);
  61   SHA1_STEP (SHA1_F0o, A, B, C, D, E, wa_t);
  62   SHA1_STEP (SHA1_F0o, E, A, B, C, D, wb_t);
  63   SHA1_STEP (SHA1_F0o, D, E, A, B, C, wc_t);
  64   SHA1_STEP (SHA1_F0o, C, D, E, A, B, wd_t);
  65   SHA1_STEP (SHA1_F0o, B, C, D, E, A, we_t);
  66   SHA1_STEP (SHA1_F0o, A, B, C, D, E, wf_t);
  67   w0_t = rotl32 ((wd_t ^ w8_t ^ w2_t ^ w0_t), 1u); SHA1_STEP (SHA1_F0o, E, A, B, C, D, w0_t);
  68   w1_t = rotl32 ((we_t ^ w9_t ^ w3_t ^ w1_t), 1u); SHA1_STEP (SHA1_F0o, D, E, A, B, C, w1_t);
  69   w2_t = rotl32 ((wf_t ^ wa_t ^ w4_t ^ w2_t), 1u); SHA1_STEP (SHA1_F0o, C, D, E, A, B, w2_t);
  70   w3_t = rotl32 ((w0_t ^ wb_t ^ w5_t ^ w3_t), 1u); SHA1_STEP (SHA1_F0o, B, C, D, E, A, w3_t);
  71
  72   #undef K
  73   #define K SHA1C01
  74
  75   w4_t = rotl32 ((w1_t ^ wc_t ^ w6_t ^ w4_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, w4_t);
  76   w5_t = rotl32 ((w2_t ^ wd_t ^ w7_t ^ w5_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, w5_t);
  77   w6_t = rotl32 ((w3_t ^ we_t ^ w8_t ^ w6_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, w6_t);
  78   w7_t = rotl32 ((w4_t ^ wf_t ^ w9_t ^ w7_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, w7_t);
  79   w8_t = rotl32 ((w5_t ^ w0_t ^ wa_t ^ w8_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, w8_t);
  80   w9_t = rotl32 ((w6_t ^ w1_t ^ wb_t ^ w9_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, w9_t);
  81   wa_t = rotl32 ((w7_t ^ w2_t ^ wc_t ^ wa_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, wa_t);
  82   wb_t = rotl32 ((w8_t ^ w3_t ^ wd_t ^ wb_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, wb_t);
  83   wc_t = rotl32 ((w9_t ^ w4_t ^ we_t ^ wc_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, wc_t);
  84   wd_t = rotl32 ((wa_t ^ w5_t ^ wf_t ^ wd_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, wd_t);
  85   we_t = rotl32 ((wb_t ^ w6_t ^ w0_t ^ we_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, we_t);
  86   wf_t = rotl32 ((wc_t ^ w7_t ^ w1_t ^ wf_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, wf_t);
  87   w0_t = rotl32 ((wd_t ^ w8_t ^ w2_t ^ w0_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, w0_t);
  88   w1_t = rotl32 ((we_t ^ w9_t ^ w3_t ^ w1_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, w1_t);
  89   w2_t = rotl32 ((wf_t ^ wa_t ^ w4_t ^ w2_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, w2_t);
  90   w3_t = rotl32 ((w0_t ^ wb_t ^ w5_t ^ w3_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, w3_t);
  91   w4_t = rotl32 ((w1_t ^ wc_t ^ w6_t ^ w4_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, w4_t);
  92   w5_t = rotl32 ((w2_t ^ wd_t ^ w7_t ^ w5_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, w5_t);
  93   w6_t = rotl32 ((w3_t ^ we_t ^ w8_t ^ w6_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, w6_t);
  94   w7_t = rotl32 ((w4_t ^ wf_t ^ w9_t ^ w7_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, w7_t);
  95
  96   #undef K
  97   #define K SHA1C02
  98
  99   w8_t = rotl32 ((w5_t ^ w0_t ^ wa_t ^ w8_t), 1u); SHA1_STEP (SHA1_F2o, A, B, C, D, E, w8_t);
 100   w9_t = rotl32 ((w6_t ^ w1_t ^ wb_t ^ w9_t), 1u); SHA1_STEP (SHA1_F2o, E, A, B, C, D, w9_t);
 101   wa_t = rotl32 ((w7_t ^ w2_t ^ wc_t ^ wa_t), 1u); SHA1_STEP (SHA1_F2o, D, E, A, B, C, wa_t);
 102   wb_t = rotl32 ((w8_t ^ w3_t ^ wd_t ^ wb_t), 1u); SHA1_STEP (SHA1_F2o, C, D, E, A, B, wb_t);
 103   wc_t = rotl32 ((w9_t ^ w4_t ^ we_t ^ wc_t), 1u); SHA1_STEP (SHA1_F2o, B, C, D, E, A, wc_t);
 104   wd_t = rotl32 ((wa_t ^ w5_t ^ wf_t ^ wd_t), 1u); SHA1_STEP (SHA1_F2o, A, B, C, D, E, wd_t);
 105   we_t = rotl32 ((wb_t ^ w6_t ^ w0_t ^ we_t), 1u); SHA1_STEP (SHA1_F2o, E, A, B, C, D, we_t);
 106   wf_t = rotl32 ((wc_t ^ w7_t ^ w1_t ^ wf_t), 1u); SHA1_STEP (SHA1_F2o, D, E, A, B, C, wf_t);
 107   w0_t = rotl32 ((wd_t ^ w8_t ^ w2_t ^ w0_t), 1u); SHA1_STEP (SHA1_F2o, C, D, E, A, B, w0_t);
 108   w1_t = rotl32 ((we_t ^ w9_t ^ w3_t ^ w1_t), 1u); SHA1_STEP (SHA1_F2o, B, C, D, E, A, w1_t);
 109   w2_t = rotl32 ((wf_t ^ wa_t ^ w4_t ^ w2_t), 1u); SHA1_STEP (SHA1_F2o, A, B, C, D, E, w2_t);
 110   w3_t = rotl32 ((w0_t ^ wb_t ^ w5_t ^ w3_t), 1u); SHA1_STEP (SHA1_F2o, E, A, B, C, D, w3_t);
 111   w4_t = rotl32 ((w1_t ^ wc_t ^ w6_t ^ w4_t), 1u); SHA1_STEP (SHA1_F2o, D, E, A, B, C, w4_t);
 112   w5_t = rotl32 ((w2_t ^ wd_t ^ w7_t ^ w5_t), 1u); SHA1_STEP (SHA1_F2o, C, D, E, A, B, w5_t);
 113   w6_t = rotl32 ((w3_t ^ we_t ^ w8_t ^ w6_t), 1u); SHA1_STEP (SHA1_F2o, B, C, D, E, A, w6_t);
 114   w7_t = rotl32 ((w4_t ^ wf_t ^ w9_t ^ w7_t), 1u); SHA1_STEP (SHA1_F2o, A, B, C, D, E, w7_t);
 115   w8_t = rotl32 ((w5_t ^ w0_t ^ wa_t ^ w8_t), 1u); SHA1_STEP (SHA1_F2o, E, A, B, C, D, w8_t);
 116   w9_t = rotl32 ((w6_t ^ w1_t ^ wb_t ^ w9_t), 1u); SHA1_STEP (SHA1_F2o, D, E, A, B, C, w9_t);
 117   wa_t = rotl32 ((w7_t ^ w2_t ^ wc_t ^ wa_t), 1u); SHA1_STEP (SHA1_F2o, C, D, E, A, B, wa_t);
 118   wb_t = rotl32 ((w8_t ^ w3_t ^ wd_t ^ wb_t), 1u); SHA1_STEP (SHA1_F2o, B, C, D, E, A, wb_t);
 119
 120   #undef K
 121   #define K SHA1C03
 122
 123   wc_t = rotl32 ((w9_t ^ w4_t ^ we_t ^ wc_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, wc_t);
 124   wd_t = rotl32 ((wa_t ^ w5_t ^ wf_t ^ wd_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, wd_t);
 125   we_t = rotl32 ((wb_t ^ w6_t ^ w0_t ^ we_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, we_t);
 126   wf_t = rotl32 ((wc_t ^ w7_t ^ w1_t ^ wf_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, wf_t);
 127   w0_t = rotl32 ((wd_t ^ w8_t ^ w2_t ^ w0_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, w0_t);
 128   w1_t = rotl32 ((we_t ^ w9_t ^ w3_t ^ w1_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, w1_t);
 129   w2_t = rotl32 ((wf_t ^ wa_t ^ w4_t ^ w2_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, w2_t);
 130   w3_t = rotl32 ((w0_t ^ wb_t ^ w5_t ^ w3_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, w3_t);
 131   w4_t = rotl32 ((w1_t ^ wc_t ^ w6_t ^ w4_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, w4_t);
 132   w5_t = rotl32 ((w2_t ^ wd_t ^ w7_t ^ w5_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, w5_t);
 133   w6_t = rotl32 ((w3_t ^ we_t ^ w8_t ^ w6_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, w6_t);
 134   w7_t = rotl32 ((w4_t ^ wf_t ^ w9_t ^ w7_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, w7_t);
 135   w8_t = rotl32 ((w5_t ^ w0_t ^ wa_t ^ w8_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, w8_t);
 136   w9_t = rotl32 ((w6_t ^ w1_t ^ wb_t ^ w9_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, w9_t);
 137   wa_t = rotl32 ((w7_t ^ w2_t ^ wc_t ^ wa_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, wa_t);
 138   wb_t = rotl32 ((w8_t ^ w3_t ^ wd_t ^ wb_t), 1u); SHA1_STEP (SHA1_F1, A, B, C, D, E, wb_t);
 139   wc_t = rotl32 ((w9_t ^ w4_t ^ we_t ^ wc_t), 1u); SHA1_STEP (SHA1_F1, E, A, B, C, D, wc_t);
 140   wd_t = rotl32 ((wa_t ^ w5_t ^ wf_t ^ wd_t), 1u); SHA1_STEP (SHA1_F1, D, E, A, B, C, wd_t);
 141   we_t = rotl32 ((wb_t ^ w6_t ^ w0_t ^ we_t), 1u); SHA1_STEP (SHA1_F1, C, D, E, A, B, we_t);
 142   wf_t = rotl32 ((wc_t ^ w7_t ^ w1_t ^ wf_t), 1u); SHA1_STEP (SHA1_F1, B, C, D, E, A, wf_t);
 143
 144   digest[0] += A;
 145   digest[1] += B;
 146   digest[2] += C;
 147   digest[3] += D;
 148   digest[4] += E;
 149 }
 150
 151 void hmac_sha1_pad (u32x w0[4], u32x w1[4], u32x w2[4], u32x w3[4], u32x ipad[5], u32x opad[5])
 152 {
 153   w0[0] = w0[0] ^ 0x36363636;
 154   w0[1] = w0[1] ^ 0x36363636;
 155   w0[2] = w0[2] ^ 0x36363636;
 156   w0[3] = w0[3] ^ 0x36363636;
 157   w1[0] = w1[0] ^ 0x36363636;
 158   w1[1] = w1[1] ^ 0x36363636;
 159   w1[2] = w1[2] ^ 0x36363636;
 160   w1[3] = w1[3] ^ 0x36363636;
 161   w2[0] = w2[0] ^ 0x36363636;
 162   w2[1] = w2[1] ^ 0x36363636;
 163   w2[2] = w2[2] ^ 0x36363636;
 164   w2[3] = w2[3] ^ 0x36363636;
 165   w3[0] = w3[0] ^ 0x36363636;
 166   w3[1] = w3[1] ^ 0x36363636;
 167   w3[2] = w3[2] ^ 0x36363636;
 168   w3[3] = w3[3] ^ 0x36363636;
 169
 170   ipad[0] = SHA1M_A;
 171   ipad[1] = SHA1M_B;
 172   ipad[2] = SHA1M_C;
 173   ipad[3] = SHA1M_D;
 174   ipad[4] = SHA1M_E;
 175
 176   sha1_transform (w0, w1, w2, w3, ipad);
 177
 178   w0[0] = w0[0] ^ 0x6a6a6a6a;
 179   w0[1] = w0[1] ^ 0x6a6a6a6a;
 180   w0[2] = w0[2] ^ 0x6a6a6a6a;
 181   w0[3] = w0[3] ^ 0x6a6a6a6a;
 182   w1[0] = w1[0] ^ 0x6a6a6a6a;
 183   w1[1] = w1[1] ^ 0x6a6a6a6a;
 184   w1[2] = w1[2] ^ 0x6a6a6a6a;
 185   w1[3] = w1[3] ^ 0x6a6a6a6a;
 186   w2[0] = w2[0] ^ 0x6a6a6a6a;
 187   w2[1] = w2[1] ^ 0x6a6a6a6a;
 188   w2[2] = w2[2] ^ 0x6a6a6a6a;
 189   w2[3] = w2[3] ^ 0x6a6a6a6a;
 190   w3[0] = w3[0] ^ 0x6a6a6a6a;
 191   w3[1] = w3[1] ^ 0x6a6a6a6a;
 192   w3[2] = w3[2] ^ 0x6a6a6a6a;
 193   w3[3] = w3[3] ^ 0x6a6a6a6a;
 194
 195   opad[0] = SHA1M_A;
 196   opad[1] = SHA1M_B;
 197   opad[2] = SHA1M_C;
 198   opad[3] = SHA1M_D;
 199   opad[4] = SHA1M_E;
 200
 201   sha1_transform (w0, w1, w2, w3, opad);
 202 }
 203
 204 void hmac_sha1_run (u32x w0[4], u32x w1[4], u32x w2[4], u32x w3[4], u32x ipad[5], u32x opad[5], u32x digest[5])
 205 {
 206   digest[0] = ipad[0];
 207   digest[1] = ipad[1];
 208   digest[2] = ipad[2];
 209   digest[3] = ipad[3];
 210   digest[4] = ipad[4];
 211
 212   sha1_transform (w0, w1, w2, w3, digest);
 213
 214   w0[0] = digest[0];
 215   w0[1] = digest[1];
 216   w0[2] = digest[2];
 217   w0[3] = digest[3];
 218   w1[0] = digest[4];
 219   w1[1] = 0x80000000;
 220   w1[2] = 0;
 221   w1[3] = 0;
 222   w2[0] = 0;
 223   w2[1] = 0;
 224   w2[2] = 0;
 225   w2[3] = 0;
 226   w3[0] = 0;
 227   w3[1] = 0;
 228   w3[2] = 0;
 229   w3[3] = (64 + 20) * 8;
 230
 231   digest[0] = opad[0];
 232   digest[1] = opad[1];
 233   digest[2] = opad[2];
 234   digest[3] = opad[3];
 235   digest[4] = opad[4];
 236
 237   sha1_transform (w0, w1, w2, w3, digest);
 238 }
 239
 240 __kernel void m05400_m04 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 241 {
 242   /**
 243    * modifier
 244    */
 245
 246   const u32 gid = get_global_id (0);
 247   const u32 lid = get_local_id (0);
 248   const u32 lsz = get_local_size (0);
 249
 250   /**
 251    * s_msg
 252    */
 253
 254   __local u32 w_s[16];
 255
 256   for (u32 i = lid; i < 16; i += lsz)
 257   {
 258     w_s[i] = swap32_S (ikepsk_bufs[salt_pos].nr_buf[i]);
 259   }
 260
 261   barrier (CLK_LOCAL_MEM_FENCE);
 262
 263   __local u32 s_msg_buf[128];
 264
 265   for (u32 i = lid; i < 128; i += lsz)
 266   {
 267     s_msg_buf[i] = swap32_S (ikepsk_bufs[salt_pos].msg_buf[i]);
 268   }
 269
 270   barrier (CLK_LOCAL_MEM_FENCE);
 271
 272   if (gid >= gid_max) return;
 273
 274   /**
 275    * base
 276    */
 277
 278   u32 pw_buf0[4];
 279   u32 pw_buf1[4];
 280
 281   pw_buf0[0] = pws[gid].i[0];
 282   pw_buf0[1] = pws[gid].i[1];
 283   pw_buf0[2] = pws[gid].i[2];
 284   pw_buf0[3] = pws[gid].i[3];
 285   pw_buf1[0] = pws[gid].i[4];
 286   pw_buf1[1] = pws[gid].i[5];
 287   pw_buf1[2] = pws[gid].i[6];
 288   pw_buf1[3] = pws[gid].i[7];
 289
 290   const u32 pw_l_len = pws[gid].pw_len;
 291
 292   /**
 293    * salt
 294    */
 295
 296   const u32 nr_len  = ikepsk_bufs[salt_pos].nr_len;
 297   const u32 msg_len = ikepsk_bufs[salt_pos].msg_len;
 298
 299   /**
 300    * loop
 301    */
 302
 303   for (u32 il_pos = 0; il_pos < il_cnt; il_pos += VECT_SIZE)
 304   {
 305     const u32x pw_r_len = pwlenx_create_combt (combs_buf, il_pos);
 306
 307     const u32x pw_len = pw_l_len + pw_r_len;
 308
 309     /**
 310      * concat password candidate
 311      */
 312
 313     u32x wordl0[4] = { 0 };
 314     u32x wordl1[4] = { 0 };
 315     u32x wordl2[4] = { 0 };
 316     u32x wordl3[4] = { 0 };
 317
 318     wordl0[0] = pw_buf0[0];
 319     wordl0[1] = pw_buf0[1];
 320     wordl0[2] = pw_buf0[2];
 321     wordl0[3] = pw_buf0[3];
 322     wordl1[0] = pw_buf1[0];
 323     wordl1[1] = pw_buf1[1];
 324     wordl1[2] = pw_buf1[2];
 325     wordl1[3] = pw_buf1[3];
 326
 327     u32x wordr0[4] = { 0 };
 328     u32x wordr1[4] = { 0 };
 329     u32x wordr2[4] = { 0 };
 330     u32x wordr3[4] = { 0 };
 331
 332     wordr0[0] = ix_create_combt (combs_buf, il_pos, 0);
 333     wordr0[1] = ix_create_combt (combs_buf, il_pos, 1);
 334     wordr0[2] = ix_create_combt (combs_buf, il_pos, 2);
 335     wordr0[3] = ix_create_combt (combs_buf, il_pos, 3);
 336     wordr1[0] = ix_create_combt (combs_buf, il_pos, 4);
 337     wordr1[1] = ix_create_combt (combs_buf, il_pos, 5);
 338     wordr1[2] = ix_create_combt (combs_buf, il_pos, 6);
 339     wordr1[3] = ix_create_combt (combs_buf, il_pos, 7);
 340
 341     if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
 342     {
 343       switch_buffer_by_offset_le_VV (wordr0, wordr1, wordr2, wordr3, pw_l_len);
 344     }
 345     else
 346     {
 347       switch_buffer_by_offset_le_VV (wordl0, wordl1, wordl2, wordl3, pw_r_len);
 348     }
 349
 350     u32x w0[4];
 351     u32x w1[4];
 352     u32x w2[4];
 353     u32x w3[4];
 354
 355     w0[0] = wordl0[0] | wordr0[0];
 356     w0[1] = wordl0[1] | wordr0[1];
 357     w0[2] = wordl0[2] | wordr0[2];
 358     w0[3] = wordl0[3] | wordr0[3];
 359     w1[0] = wordl1[0] | wordr1[0];
 360     w1[1] = wordl1[1] | wordr1[1];
 361     w1[2] = wordl1[2] | wordr1[2];
 362     w1[3] = wordl1[3] | wordr1[3];
 363     w2[0] = wordl2[0] | wordr2[0];
 364     w2[1] = wordl2[1] | wordr2[1];
 365     w2[2] = wordl2[2] | wordr2[2];
 366     w2[3] = wordl2[3] | wordr2[3];
 367     w3[0] = wordl3[0] | wordr3[0];
 368     w3[1] = wordl3[1] | wordr3[1];
 369     w3[2] = wordl3[2] | wordr3[2];
 370     w3[3] = wordl3[3] | wordr3[3];
 371
 372     /**
 373      * pads
 374      */
 375
 376     w0[0] = swap32 (w0[0]);
 377     w0[1] = swap32 (w0[1]);
 378     w0[2] = swap32 (w0[2]);
 379     w0[3] = swap32 (w0[3]);
 380     w1[0] = swap32 (w1[0]);
 381     w1[1] = swap32 (w1[1]);
 382     w1[2] = swap32 (w1[2]);
 383     w1[3] = swap32 (w1[3]);
 384     w2[0] = swap32 (w2[0]);
 385     w2[1] = swap32 (w2[1]);
 386     w2[2] = swap32 (w2[2]);
 387     w2[3] = swap32 (w2[3]);
 388     w3[0] = swap32 (w3[0]);
 389     w3[1] = swap32 (w3[1]);
 390     w3[2] = swap32 (w3[2]);
 391     w3[3] = swap32 (w3[3]);
 392
 393     u32x ipad[5];
 394     u32x opad[5];
 395
 396     hmac_sha1_pad (w0, w1, w2, w3, ipad, opad);
 397
 398     w0[0] = w_s[ 0];
 399     w0[1] = w_s[ 1];
 400     w0[2] = w_s[ 2];
 401     w0[3] = w_s[ 3];
 402     w1[0] = w_s[ 4];
 403     w1[1] = w_s[ 5];
 404     w1[2] = w_s[ 6];
 405     w1[3] = w_s[ 7];
 406     w2[0] = w_s[ 8];
 407     w2[1] = w_s[ 9];
 408     w2[2] = w_s[10];
 409     w2[3] = w_s[11];
 410     w3[0] = w_s[12];
 411     w3[1] = w_s[13];
 412     w3[2] = 0;
 413     w3[3] = (64 + nr_len) * 8;
 414
 415     u32x digest[5];
 416
 417     hmac_sha1_run (w0, w1, w2, w3, ipad, opad, digest);
 418
 419     w0[0] = digest[0];
 420     w0[1] = digest[1];
 421     w0[2] = digest[2];
 422     w0[3] = digest[3];
 423     w1[0] = digest[4];
 424     w1[1] = 0;
 425     w1[2] = 0;
 426     w1[3] = 0;
 427     w2[0] = 0;
 428     w2[1] = 0;
 429     w2[2] = 0;
 430     w2[3] = 0;
 431     w3[0] = 0;
 432     w3[1] = 0;
 433     w3[2] = 0;
 434     w3[3] = 0;
 435
 436     hmac_sha1_pad (w0, w1, w2, w3, ipad, opad);
 437
 438     int left;
 439     int off;
 440
 441     for (left = ikepsk_bufs[salt_pos].msg_len, off = 0; left >= 56; left -= 64, off += 16)
 442     {
 443       w0[0] = s_msg_buf[off +  0];
 444       w0[1] = s_msg_buf[off +  1];
 445       w0[2] = s_msg_buf[off +  2];
 446       w0[3] = s_msg_buf[off +  3];
 447       w1[0] = s_msg_buf[off +  4];
 448       w1[1] = s_msg_buf[off +  5];
 449       w1[2] = s_msg_buf[off +  6];
 450       w1[3] = s_msg_buf[off +  7];
 451       w2[0] = s_msg_buf[off +  8];
 452       w2[1] = s_msg_buf[off +  9];
 453       w2[2] = s_msg_buf[off + 10];
 454       w2[3] = s_msg_buf[off + 11];
 455       w3[0] = s_msg_buf[off + 12];
 456       w3[1] = s_msg_buf[off + 13];
 457       w3[2] = s_msg_buf[off + 14];
 458       w3[3] = s_msg_buf[off + 15];
 459
 460       sha1_transform (w0, w1, w2, w3, ipad);
 461     }
 462
 463     w0[0] = s_msg_buf[off +  0];
 464     w0[1] = s_msg_buf[off +  1];
 465     w0[2] = s_msg_buf[off +  2];
 466     w0[3] = s_msg_buf[off +  3];
 467     w1[0] = s_msg_buf[off +  4];
 468     w1[1] = s_msg_buf[off +  5];
 469     w1[2] = s_msg_buf[off +  6];
 470     w1[3] = s_msg_buf[off +  7];
 471     w2[0] = s_msg_buf[off +  8];
 472     w2[1] = s_msg_buf[off +  9];
 473     w2[2] = s_msg_buf[off + 10];
 474     w2[3] = s_msg_buf[off + 11];
 475     w3[0] = s_msg_buf[off + 12];
 476     w3[1] = s_msg_buf[off + 13];
 477     w3[2] = 0;
 478     w3[3] = (64 + msg_len) * 8;
 479
 480     hmac_sha1_run (w0, w1, w2, w3, ipad, opad, digest);
 481
 482     COMPARE_M_SIMD (digest[3], digest[4], digest[2], digest[1]);
 483   }
 484 }
 485
 486 __kernel void m05400_m08 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 487 {
 488 }
 489
 490 __kernel void m05400_m16 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 491 {
 492 }
 493
 494 __kernel void m05400_s04 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 495 {
 496   /**
 497    * modifier
 498    */
 499
 500   const u32 gid = get_global_id (0);
 501   const u32 lid = get_local_id (0);
 502   const u32 lsz = get_local_size (0);
 503
 504   /**
 505    * s_msg
 506    */
 507
 508   __local u32 w_s[16];
 509
 510   for (u32 i = lid; i < 16; i += lsz)
 511   {
 512     w_s[i] = swap32_S (ikepsk_bufs[salt_pos].nr_buf[i]);
 513   }
 514
 515   barrier (CLK_LOCAL_MEM_FENCE);
 516
 517   __local u32 s_msg_buf[128];
 518
 519   for (u32 i = lid; i < 128; i += lsz)
 520   {
 521     s_msg_buf[i] = swap32_S (ikepsk_bufs[salt_pos].msg_buf[i]);
 522   }
 523
 524   barrier (CLK_LOCAL_MEM_FENCE);
 525
 526   if (gid >= gid_max) return;
 527
 528   /**
 529    * base
 530    */
 531
 532   u32 pw_buf0[4];
 533   u32 pw_buf1[4];
 534
 535   pw_buf0[0] = pws[gid].i[0];
 536   pw_buf0[1] = pws[gid].i[1];
 537   pw_buf0[2] = pws[gid].i[2];
 538   pw_buf0[3] = pws[gid].i[3];
 539   pw_buf1[0] = pws[gid].i[4];
 540   pw_buf1[1] = pws[gid].i[5];
 541   pw_buf1[2] = pws[gid].i[6];
 542   pw_buf1[3] = pws[gid].i[7];
 543
 544   const u32 pw_l_len = pws[gid].pw_len;
 545
 546   /**
 547    * salt
 548    */
 549
 550   const u32 nr_len  = ikepsk_bufs[salt_pos].nr_len;
 551   const u32 msg_len = ikepsk_bufs[salt_pos].msg_len;
 552
 553   /**
 554    * digest
 555    */
 556
 557   const u32 search[4] =
 558   {
 559     digests_buf[digests_offset].digest_buf[DGST_R0],
 560     digests_buf[digests_offset].digest_buf[DGST_R1],
 561     digests_buf[digests_offset].digest_buf[DGST_R2],
 562     digests_buf[digests_offset].digest_buf[DGST_R3]
 563   };
 564
 565   /**
 566    * loop
 567    */
 568
 569   for (u32 il_pos = 0; il_pos < il_cnt; il_pos += VECT_SIZE)
 570   {
 571     const u32x pw_r_len = pwlenx_create_combt (combs_buf, il_pos);
 572
 573     const u32x pw_len = pw_l_len + pw_r_len;
 574
 575     /**
 576      * concat password candidate
 577      */
 578
 579     u32x wordl0[4] = { 0 };
 580     u32x wordl1[4] = { 0 };
 581     u32x wordl2[4] = { 0 };
 582     u32x wordl3[4] = { 0 };
 583
 584     wordl0[0] = pw_buf0[0];
 585     wordl0[1] = pw_buf0[1];
 586     wordl0[2] = pw_buf0[2];
 587     wordl0[3] = pw_buf0[3];
 588     wordl1[0] = pw_buf1[0];
 589     wordl1[1] = pw_buf1[1];
 590     wordl1[2] = pw_buf1[2];
 591     wordl1[3] = pw_buf1[3];
 592
 593     u32x wordr0[4] = { 0 };
 594     u32x wordr1[4] = { 0 };
 595     u32x wordr2[4] = { 0 };
 596     u32x wordr3[4] = { 0 };
 597
 598     wordr0[0] = ix_create_combt (combs_buf, il_pos, 0);
 599     wordr0[1] = ix_create_combt (combs_buf, il_pos, 1);
 600     wordr0[2] = ix_create_combt (combs_buf, il_pos, 2);
 601     wordr0[3] = ix_create_combt (combs_buf, il_pos, 3);
 602     wordr1[0] = ix_create_combt (combs_buf, il_pos, 4);
 603     wordr1[1] = ix_create_combt (combs_buf, il_pos, 5);
 604     wordr1[2] = ix_create_combt (combs_buf, il_pos, 6);
 605     wordr1[3] = ix_create_combt (combs_buf, il_pos, 7);
 606
 607     if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
 608     {
 609       switch_buffer_by_offset_le_VV (wordr0, wordr1, wordr2, wordr3, pw_l_len);
 610     }
 611     else
 612     {
 613       switch_buffer_by_offset_le_VV (wordl0, wordl1, wordl2, wordl3, pw_r_len);
 614     }
 615
 616     u32x w0[4];
 617     u32x w1[4];
 618     u32x w2[4];
 619     u32x w3[4];
 620
 621     w0[0] = wordl0[0] | wordr0[0];
 622     w0[1] = wordl0[1] | wordr0[1];
 623     w0[2] = wordl0[2] | wordr0[2];
 624     w0[3] = wordl0[3] | wordr0[3];
 625     w1[0] = wordl1[0] | wordr1[0];
 626     w1[1] = wordl1[1] | wordr1[1];
 627     w1[2] = wordl1[2] | wordr1[2];
 628     w1[3] = wordl1[3] | wordr1[3];
 629     w2[0] = wordl2[0] | wordr2[0];
 630     w2[1] = wordl2[1] | wordr2[1];
 631     w2[2] = wordl2[2] | wordr2[2];
 632     w2[3] = wordl2[3] | wordr2[3];
 633     w3[0] = wordl3[0] | wordr3[0];
 634     w3[1] = wordl3[1] | wordr3[1];
 635     w3[2] = wordl3[2] | wordr3[2];
 636     w3[3] = wordl3[3] | wordr3[3];
 637
 638     /**
 639      * pads
 640      */
 641
 642     w0[0] = swap32 (w0[0]);
 643     w0[1] = swap32 (w0[1]);
 644     w0[2] = swap32 (w0[2]);
 645     w0[3] = swap32 (w0[3]);
 646     w1[0] = swap32 (w1[0]);
 647     w1[1] = swap32 (w1[1]);
 648     w1[2] = swap32 (w1[2]);
 649     w1[3] = swap32 (w1[3]);
 650     w2[0] = swap32 (w2[0]);
 651     w2[1] = swap32 (w2[1]);
 652     w2[2] = swap32 (w2[2]);
 653     w2[3] = swap32 (w2[3]);
 654     w3[0] = swap32 (w3[0]);
 655     w3[1] = swap32 (w3[1]);
 656     w3[2] = swap32 (w3[2]);
 657     w3[3] = swap32 (w3[3]);
 658
 659     u32x ipad[5];
 660     u32x opad[5];
 661
 662     hmac_sha1_pad (w0, w1, w2, w3, ipad, opad);
 663
 664     w0[0] = w_s[ 0];
 665     w0[1] = w_s[ 1];
 666     w0[2] = w_s[ 2];
 667     w0[3] = w_s[ 3];
 668     w1[0] = w_s[ 4];
 669     w1[1] = w_s[ 5];
 670     w1[2] = w_s[ 6];
 671     w1[3] = w_s[ 7];
 672     w2[0] = w_s[ 8];
 673     w2[1] = w_s[ 9];
 674     w2[2] = w_s[10];
 675     w2[3] = w_s[11];
 676     w3[0] = w_s[12];
 677     w3[1] = w_s[13];
 678     w3[2] = 0;
 679     w3[3] = (64 + nr_len) * 8;
 680
 681     u32x digest[5];
 682
 683     hmac_sha1_run (w0, w1, w2, w3, ipad, opad, digest);
 684
 685     w0[0] = digest[0];
 686     w0[1] = digest[1];
 687     w0[2] = digest[2];
 688     w0[3] = digest[3];
 689     w1[0] = digest[4];
 690     w1[1] = 0;
 691     w1[2] = 0;
 692     w1[3] = 0;
 693     w2[0] = 0;
 694     w2[1] = 0;
 695     w2[2] = 0;
 696     w2[3] = 0;
 697     w3[0] = 0;
 698     w3[1] = 0;
 699     w3[2] = 0;
 700     w3[3] = 0;
 701
 702     hmac_sha1_pad (w0, w1, w2, w3, ipad, opad);
 703
 704     int left;
 705     int off;
 706
 707     for (left = ikepsk_bufs[salt_pos].msg_len, off = 0; left >= 56; left -= 64, off += 16)
 708     {
 709       w0[0] = s_msg_buf[off +  0];
 710       w0[1] = s_msg_buf[off +  1];
 711       w0[2] = s_msg_buf[off +  2];
 712       w0[3] = s_msg_buf[off +  3];
 713       w1[0] = s_msg_buf[off +  4];
 714       w1[1] = s_msg_buf[off +  5];
 715       w1[2] = s_msg_buf[off +  6];
 716       w1[3] = s_msg_buf[off +  7];
 717       w2[0] = s_msg_buf[off +  8];
 718       w2[1] = s_msg_buf[off +  9];
 719       w2[2] = s_msg_buf[off + 10];
 720       w2[3] = s_msg_buf[off + 11];
 721       w3[0] = s_msg_buf[off + 12];
 722       w3[1] = s_msg_buf[off + 13];
 723       w3[2] = s_msg_buf[off + 14];
 724       w3[3] = s_msg_buf[off + 15];
 725
 726       sha1_transform (w0, w1, w2, w3, ipad);
 727     }
 728
 729     w0[0] = s_msg_buf[off +  0];
 730     w0[1] = s_msg_buf[off +  1];
 731     w0[2] = s_msg_buf[off +  2];
 732     w0[3] = s_msg_buf[off +  3];
 733     w1[0] = s_msg_buf[off +  4];
 734     w1[1] = s_msg_buf[off +  5];
 735     w1[2] = s_msg_buf[off +  6];
 736     w1[3] = s_msg_buf[off +  7];
 737     w2[0] = s_msg_buf[off +  8];
 738     w2[1] = s_msg_buf[off +  9];
 739     w2[2] = s_msg_buf[off + 10];
 740     w2[3] = s_msg_buf[off + 11];
 741     w3[0] = s_msg_buf[off + 12];
 742     w3[1] = s_msg_buf[off + 13];
 743     w3[2] = 0;
 744     w3[3] = (64 + msg_len) * 8;
 745
 746     hmac_sha1_run (w0, w1, w2, w3, ipad, opad, digest);
 747
 748     COMPARE_S_SIMD (digest[3], digest[4], digest[2], digest[1]);
 749   }
 750 }
 751
 752 __kernel void m05400_s08 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 753 {
 754 }
 755
 756 __kernel void m05400_s16 (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global void *tmps, __global void *hooks, __global u32 *bitmaps_buf_s1_a, __global u32 *bitmaps_buf_s1_b, __global u32 *bitmaps_buf_s1_c, __global u32 *bitmaps_buf_s1_d, __global u32 *bitmaps_buf_s2_a, __global u32 *bitmaps_buf_s2_b, __global u32 *bitmaps_buf_s2_c, __global u32 *bitmaps_buf_s2_d, __global plain_t *plains_buf, __global digest_t *digests_buf, __global u32 *hashes_shown, __global salt_t *salt_bufs, __global ikepsk_t *ikepsk_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV_buf, const u32 bitmap_mask, const u32 bitmap_shift1, const u32 bitmap_shift2, const u32 salt_pos, const u32 loop_pos, const u32 loop_cnt, const u32 il_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 757 {
 758 }