OpenCL/m05400_a1.cl

   1 /**
   2  * Author......: Jens Steube <jens.steube@gmail.com>
   3  * License.....: MIT
   4  */
   5
   6 #define _SHA1_
   7
   8 #include "include/constants.h"
   9 #include "include/kernel_vendor.h"
  10
  11 #define DGST_R0 3
  12 #define DGST_R1 4
  13 #define DGST_R2 2
  14 #define DGST_R3 1
  15
  16 #include "include/kernel_functions.c"
  17 #include "OpenCL/types_ocl.c"
  18 #include "OpenCL/common.c"
  19
  20 #define COMPARE_S "OpenCL/check_single_comp4.c"
  21 #define COMPARE_M "OpenCL/check_multi_comp4.c"
  22
  23 static void sha1_transform (const u32 w0[4], const u32 w1[4], const u32 w2[4], const u32 w3[4], u32 digest[5])
  24 {
  25   u32 A = digest[0];
  26   u32 B = digest[1];
  27   u32 C = digest[2];
  28   u32 D = digest[3];
  29   u32 E = digest[4];
  30
  31   u32 w0_t = w0[0];
  32   u32 w1_t = w0[1];
  33   u32 w2_t = w0[2];
  34   u32 w3_t = w0[3];
  35   u32 w4_t = w1[0];
  36   u32 w5_t = w1[1];
  37   u32 w6_t = w1[2];
  38   u32 w7_t = w1[3];
  39   u32 w8_t = w2[0];
  40   u32 w9_t = w2[1];
  41   u32 wa_t = w2[2];
  42   u32 wb_t = w2[3];
  43   u32 wc_t = w3[0];
  44   u32 wd_t = w3[1];
  45   u32 we_t = w3[2];
  46   u32 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 static void hmac_sha1_pad (u32 w0[4], u32 w1[4], u32 w2[4], u32 w3[4], u32 ipad[5], u32 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 static void hmac_sha1_run (u32 w0[4], u32 w1[4], u32 w2[4], u32 w3[4], u32 ipad[5], u32 opad[5], u32 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 combs_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 (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 (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    * salt
 276    */
 277
 278   const u32 nr_len  = ikepsk_bufs[salt_pos].nr_len;
 279   const u32 msg_len = ikepsk_bufs[salt_pos].msg_len;
 280
 281   /**
 282    * base
 283    */
 284
 285   u32 wordl0[4];
 286
 287   wordl0[0] = pws[gid].i[ 0];
 288   wordl0[1] = pws[gid].i[ 1];
 289   wordl0[2] = pws[gid].i[ 2];
 290   wordl0[3] = pws[gid].i[ 3];
 291
 292   u32 wordl1[4];
 293
 294   wordl1[0] = pws[gid].i[ 4];
 295   wordl1[1] = pws[gid].i[ 5];
 296   wordl1[2] = pws[gid].i[ 6];
 297   wordl1[3] = pws[gid].i[ 7];
 298
 299   u32 wordl2[4];
 300
 301   wordl2[0] = 0;
 302   wordl2[1] = 0;
 303   wordl2[2] = 0;
 304   wordl2[3] = 0;
 305
 306   u32 wordl3[4];
 307
 308   wordl3[0] = 0;
 309   wordl3[1] = 0;
 310   wordl3[2] = 0;
 311   wordl3[3] = 0;
 312
 313   const u32 pw_l_len = pws[gid].pw_len;
 314
 315   if (combs_mode == COMBINATOR_MODE_BASE_RIGHT)
 316   {
 317     switch_buffer_by_offset_le (wordl0, wordl1, wordl2, wordl3, combs_buf[0].pw_len);
 318   }
 319
 320   /**
 321    * loop
 322    */
 323
 324   for (u32 il_pos = 0; il_pos < combs_cnt; il_pos++)
 325   {
 326     const u32 pw_r_len = combs_buf[il_pos].pw_len;
 327
 328     const u32 pw_len = pw_l_len + pw_r_len;
 329
 330     u32 wordr0[4];
 331
 332     wordr0[0] = combs_buf[il_pos].i[0];
 333     wordr0[1] = combs_buf[il_pos].i[1];
 334     wordr0[2] = combs_buf[il_pos].i[2];
 335     wordr0[3] = combs_buf[il_pos].i[3];
 336
 337     u32 wordr1[4];
 338
 339     wordr1[0] = combs_buf[il_pos].i[4];
 340     wordr1[1] = combs_buf[il_pos].i[5];
 341     wordr1[2] = combs_buf[il_pos].i[6];
 342     wordr1[3] = combs_buf[il_pos].i[7];
 343
 344     u32 wordr2[4];
 345
 346     wordr2[0] = 0;
 347     wordr2[1] = 0;
 348     wordr2[2] = 0;
 349     wordr2[3] = 0;
 350
 351     u32 wordr3[4];
 352
 353     wordr3[0] = 0;
 354     wordr3[1] = 0;
 355     wordr3[2] = 0;
 356     wordr3[3] = 0;
 357
 358     if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
 359     {
 360       switch_buffer_by_offset_le (wordr0, wordr1, wordr2, wordr3, pw_l_len);
 361     }
 362
 363     u32 w0[4];
 364
 365     w0[0] = wordl0[0] | wordr0[0];
 366     w0[1] = wordl0[1] | wordr0[1];
 367     w0[2] = wordl0[2] | wordr0[2];
 368     w0[3] = wordl0[3] | wordr0[3];
 369
 370     u32 w1[4];
 371
 372     w1[0] = wordl1[0] | wordr1[0];
 373     w1[1] = wordl1[1] | wordr1[1];
 374     w1[2] = wordl1[2] | wordr1[2];
 375     w1[3] = wordl1[3] | wordr1[3];
 376
 377     u32 w2[4];
 378
 379     w2[0] = wordl2[0] | wordr2[0];
 380     w2[1] = wordl2[1] | wordr2[1];
 381     w2[2] = wordl2[2] | wordr2[2];
 382     w2[3] = wordl2[3] | wordr2[3];
 383
 384     u32 w3[4];
 385
 386     w3[0] = wordl3[0] | wordr3[0];
 387     w3[1] = wordl3[1] | wordr3[1];
 388     w3[2] = wordl3[2] | wordr3[2];
 389     w3[3] = wordl3[3] | wordr3[3];
 390
 391     /**
 392      * pads
 393      */
 394
 395     u32 w0_t[4];
 396
 397     w0_t[0] = swap32 (w0[0]);
 398     w0_t[1] = swap32 (w0[1]);
 399     w0_t[2] = swap32 (w0[2]);
 400     w0_t[3] = swap32 (w0[3]);
 401
 402     u32 w1_t[4];
 403
 404     w1_t[0] = swap32 (w1[0]);
 405     w1_t[1] = swap32 (w1[1]);
 406     w1_t[2] = swap32 (w1[2]);
 407     w1_t[3] = swap32 (w1[3]);
 408
 409     u32 w2_t[4];
 410
 411     w2_t[0] = 0;
 412     w2_t[1] = 0;
 413     w2_t[2] = 0;
 414     w2_t[3] = 0;
 415
 416     u32 w3_t[4];
 417
 418     w3_t[0] = 0;
 419     w3_t[1] = 0;
 420     w3_t[2] = 0;
 421     w3_t[3] = 0;
 422
 423     u32 ipad[5];
 424     u32 opad[5];
 425
 426     hmac_sha1_pad (w0_t, w1_t, w2_t, w3_t, ipad, opad);
 427
 428     w0_t[0] = w_s[ 0];
 429     w0_t[1] = w_s[ 1];
 430     w0_t[2] = w_s[ 2];
 431     w0_t[3] = w_s[ 3];
 432     w1_t[0] = w_s[ 4];
 433     w1_t[1] = w_s[ 5];
 434     w1_t[2] = w_s[ 6];
 435     w1_t[3] = w_s[ 7];
 436     w2_t[0] = w_s[ 8];
 437     w2_t[1] = w_s[ 9];
 438     w2_t[2] = w_s[10];
 439     w2_t[3] = w_s[11];
 440     w3_t[0] = w_s[12];
 441     w3_t[1] = w_s[13];
 442     w3_t[2] = 0;
 443     w3_t[3] = (64 + nr_len) * 8;
 444
 445     u32 digest[5];
 446
 447     hmac_sha1_run (w0_t, w1_t, w2_t, w3_t, ipad, opad, digest);
 448
 449     w0_t[0] = digest[0];
 450     w0_t[1] = digest[1];
 451     w0_t[2] = digest[2];
 452     w0_t[3] = digest[3];
 453     w1_t[0] = digest[4];
 454     w1_t[1] = 0;
 455     w1_t[2] = 0;
 456     w1_t[3] = 0;
 457     w2_t[0] = 0;
 458     w2_t[1] = 0;
 459     w2_t[2] = 0;
 460     w2_t[3] = 0;
 461     w3_t[0] = 0;
 462     w3_t[1] = 0;
 463     w3_t[2] = 0;
 464     w3_t[3] = 0;
 465
 466     hmac_sha1_pad (w0_t, w1_t, w2_t, w3_t, ipad, opad);
 467
 468     int left;
 469     int off;
 470
 471     for (left = ikepsk_bufs[salt_pos].msg_len, off = 0; left >= 56; left -= 64, off += 16)
 472     {
 473       w0_t[0] = s_msg_buf[off +  0];
 474       w0_t[1] = s_msg_buf[off +  1];
 475       w0_t[2] = s_msg_buf[off +  2];
 476       w0_t[3] = s_msg_buf[off +  3];
 477       w1_t[0] = s_msg_buf[off +  4];
 478       w1_t[1] = s_msg_buf[off +  5];
 479       w1_t[2] = s_msg_buf[off +  6];
 480       w1_t[3] = s_msg_buf[off +  7];
 481       w2_t[0] = s_msg_buf[off +  8];
 482       w2_t[1] = s_msg_buf[off +  9];
 483       w2_t[2] = s_msg_buf[off + 10];
 484       w2_t[3] = s_msg_buf[off + 11];
 485       w3_t[0] = s_msg_buf[off + 12];
 486       w3_t[1] = s_msg_buf[off + 13];
 487       w3_t[2] = s_msg_buf[off + 14];
 488       w3_t[3] = s_msg_buf[off + 15];
 489
 490       sha1_transform (w0_t, w1_t, w2_t, w3_t, ipad);
 491     }
 492
 493     w0_t[0] = s_msg_buf[off +  0];
 494     w0_t[1] = s_msg_buf[off +  1];
 495     w0_t[2] = s_msg_buf[off +  2];
 496     w0_t[3] = s_msg_buf[off +  3];
 497     w1_t[0] = s_msg_buf[off +  4];
 498     w1_t[1] = s_msg_buf[off +  5];
 499     w1_t[2] = s_msg_buf[off +  6];
 500     w1_t[3] = s_msg_buf[off +  7];
 501     w2_t[0] = s_msg_buf[off +  8];
 502     w2_t[1] = s_msg_buf[off +  9];
 503     w2_t[2] = s_msg_buf[off + 10];
 504     w2_t[3] = s_msg_buf[off + 11];
 505     w3_t[0] = s_msg_buf[off + 12];
 506     w3_t[1] = s_msg_buf[off + 13];
 507     w3_t[2] = 0;
 508     w3_t[3] = (64 + msg_len) * 8;
 509
 510     hmac_sha1_run (w0_t, w1_t, w2_t, w3_t, ipad, opad, digest);
 511
 512     const u32 r0 = digest[3];
 513     const u32 r1 = digest[4];
 514     const u32 r2 = digest[2];
 515     const u32 r3 = digest[1];
 516
 517     #include COMPARE_M
 518   }
 519 }
 520
 521 __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 combs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 522 {
 523 }
 524
 525 __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 combs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 526 {
 527 }
 528
 529 __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 combs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 530 {
 531   /**
 532    * modifier
 533    */
 534
 535   const u32 gid = get_global_id (0);
 536   const u32 lid = get_local_id (0);
 537   const u32 lsz = get_local_size (0);
 538
 539   /**
 540    * s_msg
 541    */
 542
 543   __local u32 w_s[16];
 544
 545   for (u32 i = lid; i < 16; i += lsz)
 546   {
 547     w_s[i] = swap32 (ikepsk_bufs[salt_pos].nr_buf[i]);
 548   }
 549
 550   barrier (CLK_LOCAL_MEM_FENCE);
 551
 552   __local u32 s_msg_buf[128];
 553
 554   for (u32 i = lid; i < 128; i += lsz)
 555   {
 556     s_msg_buf[i] = swap32 (ikepsk_bufs[salt_pos].msg_buf[i]);
 557   }
 558
 559   barrier (CLK_LOCAL_MEM_FENCE);
 560
 561   if (gid >= gid_max) return;
 562
 563   /**
 564    * salt
 565    */
 566
 567   const u32 nr_len  = ikepsk_bufs[salt_pos].nr_len;
 568   const u32 msg_len = ikepsk_bufs[salt_pos].msg_len;
 569
 570   /**
 571    * base
 572    */
 573
 574   u32 wordl0[4];
 575
 576   wordl0[0] = pws[gid].i[ 0];
 577   wordl0[1] = pws[gid].i[ 1];
 578   wordl0[2] = pws[gid].i[ 2];
 579   wordl0[3] = pws[gid].i[ 3];
 580
 581   u32 wordl1[4];
 582
 583   wordl1[0] = pws[gid].i[ 4];
 584   wordl1[1] = pws[gid].i[ 5];
 585   wordl1[2] = pws[gid].i[ 6];
 586   wordl1[3] = pws[gid].i[ 7];
 587
 588   u32 wordl2[4];
 589
 590   wordl2[0] = 0;
 591   wordl2[1] = 0;
 592   wordl2[2] = 0;
 593   wordl2[3] = 0;
 594
 595   u32 wordl3[4];
 596
 597   wordl3[0] = 0;
 598   wordl3[1] = 0;
 599   wordl3[2] = 0;
 600   wordl3[3] = 0;
 601
 602   const u32 pw_l_len = pws[gid].pw_len;
 603
 604   if (combs_mode == COMBINATOR_MODE_BASE_RIGHT)
 605   {
 606     switch_buffer_by_offset_le (wordl0, wordl1, wordl2, wordl3, combs_buf[0].pw_len);
 607   }
 608
 609   /**
 610    * digest
 611    */
 612
 613   const u32 search[4] =
 614   {
 615     digests_buf[digests_offset].digest_buf[DGST_R0],
 616     digests_buf[digests_offset].digest_buf[DGST_R1],
 617     digests_buf[digests_offset].digest_buf[DGST_R2],
 618     digests_buf[digests_offset].digest_buf[DGST_R3]
 619   };
 620
 621   /**
 622    * loop
 623    */
 624
 625   for (u32 il_pos = 0; il_pos < combs_cnt; il_pos++)
 626   {
 627     const u32 pw_r_len = combs_buf[il_pos].pw_len;
 628
 629     const u32 pw_len = pw_l_len + pw_r_len;
 630
 631     u32 wordr0[4];
 632
 633     wordr0[0] = combs_buf[il_pos].i[0];
 634     wordr0[1] = combs_buf[il_pos].i[1];
 635     wordr0[2] = combs_buf[il_pos].i[2];
 636     wordr0[3] = combs_buf[il_pos].i[3];
 637
 638     u32 wordr1[4];
 639
 640     wordr1[0] = combs_buf[il_pos].i[4];
 641     wordr1[1] = combs_buf[il_pos].i[5];
 642     wordr1[2] = combs_buf[il_pos].i[6];
 643     wordr1[3] = combs_buf[il_pos].i[7];
 644
 645     u32 wordr2[4];
 646
 647     wordr2[0] = 0;
 648     wordr2[1] = 0;
 649     wordr2[2] = 0;
 650     wordr2[3] = 0;
 651
 652     u32 wordr3[4];
 653
 654     wordr3[0] = 0;
 655     wordr3[1] = 0;
 656     wordr3[2] = 0;
 657     wordr3[3] = 0;
 658
 659     if (combs_mode == COMBINATOR_MODE_BASE_LEFT)
 660     {
 661       switch_buffer_by_offset_le (wordr0, wordr1, wordr2, wordr3, pw_l_len);
 662     }
 663
 664     u32 w0[4];
 665
 666     w0[0] = wordl0[0] | wordr0[0];
 667     w0[1] = wordl0[1] | wordr0[1];
 668     w0[2] = wordl0[2] | wordr0[2];
 669     w0[3] = wordl0[3] | wordr0[3];
 670
 671     u32 w1[4];
 672
 673     w1[0] = wordl1[0] | wordr1[0];
 674     w1[1] = wordl1[1] | wordr1[1];
 675     w1[2] = wordl1[2] | wordr1[2];
 676     w1[3] = wordl1[3] | wordr1[3];
 677
 678     u32 w2[4];
 679
 680     w2[0] = wordl2[0] | wordr2[0];
 681     w2[1] = wordl2[1] | wordr2[1];
 682     w2[2] = wordl2[2] | wordr2[2];
 683     w2[3] = wordl2[3] | wordr2[3];
 684
 685     u32 w3[4];
 686
 687     w3[0] = wordl3[0] | wordr3[0];
 688     w3[1] = wordl3[1] | wordr3[1];
 689     w3[2] = wordl3[2] | wordr3[2];
 690     w3[3] = wordl3[3] | wordr3[3];
 691
 692     /**
 693      * pads
 694      */
 695
 696     u32 w0_t[4];
 697
 698     w0_t[0] = swap32 (w0[0]);
 699     w0_t[1] = swap32 (w0[1]);
 700     w0_t[2] = swap32 (w0[2]);
 701     w0_t[3] = swap32 (w0[3]);
 702
 703     u32 w1_t[4];
 704
 705     w1_t[0] = swap32 (w1[0]);
 706     w1_t[1] = swap32 (w1[1]);
 707     w1_t[2] = swap32 (w1[2]);
 708     w1_t[3] = swap32 (w1[3]);
 709
 710     u32 w2_t[4];
 711
 712     w2_t[0] = 0;
 713     w2_t[1] = 0;
 714     w2_t[2] = 0;
 715     w2_t[3] = 0;
 716
 717     u32 w3_t[4];
 718
 719     w3_t[0] = 0;
 720     w3_t[1] = 0;
 721     w3_t[2] = 0;
 722     w3_t[3] = 0;
 723
 724     u32 ipad[5];
 725     u32 opad[5];
 726
 727     hmac_sha1_pad (w0_t, w1_t, w2_t, w3_t, ipad, opad);
 728
 729     w0_t[0] = w_s[ 0];
 730     w0_t[1] = w_s[ 1];
 731     w0_t[2] = w_s[ 2];
 732     w0_t[3] = w_s[ 3];
 733     w1_t[0] = w_s[ 4];
 734     w1_t[1] = w_s[ 5];
 735     w1_t[2] = w_s[ 6];
 736     w1_t[3] = w_s[ 7];
 737     w2_t[0] = w_s[ 8];
 738     w2_t[1] = w_s[ 9];
 739     w2_t[2] = w_s[10];
 740     w2_t[3] = w_s[11];
 741     w3_t[0] = w_s[12];
 742     w3_t[1] = w_s[13];
 743     w3_t[2] = 0;
 744     w3_t[3] = (64 + nr_len) * 8;
 745
 746     u32 digest[5];
 747
 748     hmac_sha1_run (w0_t, w1_t, w2_t, w3_t, ipad, opad, digest);
 749
 750     w0_t[0] = digest[0];
 751     w0_t[1] = digest[1];
 752     w0_t[2] = digest[2];
 753     w0_t[3] = digest[3];
 754     w1_t[0] = digest[4];
 755     w1_t[1] = 0;
 756     w1_t[2] = 0;
 757     w1_t[3] = 0;
 758     w2_t[0] = 0;
 759     w2_t[1] = 0;
 760     w2_t[2] = 0;
 761     w2_t[3] = 0;
 762     w3_t[0] = 0;
 763     w3_t[1] = 0;
 764     w3_t[2] = 0;
 765     w3_t[3] = 0;
 766
 767     hmac_sha1_pad (w0_t, w1_t, w2_t, w3_t, ipad, opad);
 768
 769     int left;
 770     int off;
 771
 772     for (left = ikepsk_bufs[salt_pos].msg_len, off = 0; left >= 56; left -= 64, off += 16)
 773     {
 774       w0_t[0] = s_msg_buf[off +  0];
 775       w0_t[1] = s_msg_buf[off +  1];
 776       w0_t[2] = s_msg_buf[off +  2];
 777       w0_t[3] = s_msg_buf[off +  3];
 778       w1_t[0] = s_msg_buf[off +  4];
 779       w1_t[1] = s_msg_buf[off +  5];
 780       w1_t[2] = s_msg_buf[off +  6];
 781       w1_t[3] = s_msg_buf[off +  7];
 782       w2_t[0] = s_msg_buf[off +  8];
 783       w2_t[1] = s_msg_buf[off +  9];
 784       w2_t[2] = s_msg_buf[off + 10];
 785       w2_t[3] = s_msg_buf[off + 11];
 786       w3_t[0] = s_msg_buf[off + 12];
 787       w3_t[1] = s_msg_buf[off + 13];
 788       w3_t[2] = s_msg_buf[off + 14];
 789       w3_t[3] = s_msg_buf[off + 15];
 790
 791       sha1_transform (w0_t, w1_t, w2_t, w3_t, ipad);
 792     }
 793
 794     w0_t[0] = s_msg_buf[off +  0];
 795     w0_t[1] = s_msg_buf[off +  1];
 796     w0_t[2] = s_msg_buf[off +  2];
 797     w0_t[3] = s_msg_buf[off +  3];
 798     w1_t[0] = s_msg_buf[off +  4];
 799     w1_t[1] = s_msg_buf[off +  5];
 800     w1_t[2] = s_msg_buf[off +  6];
 801     w1_t[3] = s_msg_buf[off +  7];
 802     w2_t[0] = s_msg_buf[off +  8];
 803     w2_t[1] = s_msg_buf[off +  9];
 804     w2_t[2] = s_msg_buf[off + 10];
 805     w2_t[3] = s_msg_buf[off + 11];
 806     w3_t[0] = s_msg_buf[off + 12];
 807     w3_t[1] = s_msg_buf[off + 13];
 808     w3_t[2] = 0;
 809     w3_t[3] = (64 + msg_len) * 8;
 810
 811     hmac_sha1_run (w0_t, w1_t, w2_t, w3_t, ipad, opad, digest);
 812
 813     const u32 r0 = digest[3];
 814     const u32 r1 = digest[4];
 815     const u32 r2 = digest[2];
 816     const u32 r3 = digest[1];
 817
 818     #include COMPARE_S
 819   }
 820 }
 821
 822 __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 combs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 823 {
 824 }
 825
 826 __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 combs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 827 {
 828 }