OpenCL/m00500.cl

   1 /**
   2  * Author......: Jens Steube <jens.steube@gmail.com>
   3  * License.....: MIT
   4  */
   5
   6 #define _MD5_
   7
   8 #include "inc_vendor.cl"
   9 #include "inc_hash_constants.h"
  10 #include "inc_hash_functions.cl"
  11 #include "inc_types.cl"
  12 #include "inc_common.cl"
  13
  14 #define COMPARE_S "inc_comp_single.cl"
  15 #define COMPARE_M "inc_comp_multi.cl"
  16
  17 #define md5crypt_magic 0x00243124u
  18
  19 void md5_transform (const u32 w0[4], const u32 w1[4], const u32 w2[4], const u32 w3[4], u32 digest[4])
  20 {
  21   u32 a = digest[0];
  22   u32 b = digest[1];
  23   u32 c = digest[2];
  24   u32 d = digest[3];
  25
  26   u32 w0_t = w0[0];
  27   u32 w1_t = w0[1];
  28   u32 w2_t = w0[2];
  29   u32 w3_t = w0[3];
  30   u32 w4_t = w1[0];
  31   u32 w5_t = w1[1];
  32   u32 w6_t = w1[2];
  33   u32 w7_t = w1[3];
  34   u32 w8_t = w2[0];
  35   u32 w9_t = w2[1];
  36   u32 wa_t = w2[2];
  37   u32 wb_t = w2[3];
  38   u32 wc_t = w3[0];
  39   u32 wd_t = w3[1];
  40   u32 we_t = w3[2];
  41   u32 wf_t = 0;
  42
  43   MD5_STEP (MD5_Fo, a, b, c, d, w0_t, MD5C00, MD5S00);
  44   MD5_STEP (MD5_Fo, d, a, b, c, w1_t, MD5C01, MD5S01);
  45   MD5_STEP (MD5_Fo, c, d, a, b, w2_t, MD5C02, MD5S02);
  46   MD5_STEP (MD5_Fo, b, c, d, a, w3_t, MD5C03, MD5S03);
  47   MD5_STEP (MD5_Fo, a, b, c, d, w4_t, MD5C04, MD5S00);
  48   MD5_STEP (MD5_Fo, d, a, b, c, w5_t, MD5C05, MD5S01);
  49   MD5_STEP (MD5_Fo, c, d, a, b, w6_t, MD5C06, MD5S02);
  50   MD5_STEP (MD5_Fo, b, c, d, a, w7_t, MD5C07, MD5S03);
  51   MD5_STEP (MD5_Fo, a, b, c, d, w8_t, MD5C08, MD5S00);
  52   MD5_STEP (MD5_Fo, d, a, b, c, w9_t, MD5C09, MD5S01);
  53   MD5_STEP (MD5_Fo, c, d, a, b, wa_t, MD5C0a, MD5S02);
  54   MD5_STEP (MD5_Fo, b, c, d, a, wb_t, MD5C0b, MD5S03);
  55   MD5_STEP (MD5_Fo, a, b, c, d, wc_t, MD5C0c, MD5S00);
  56   MD5_STEP (MD5_Fo, d, a, b, c, wd_t, MD5C0d, MD5S01);
  57   MD5_STEP (MD5_Fo, c, d, a, b, we_t, MD5C0e, MD5S02);
  58   MD5_STEP (MD5_Fo, b, c, d, a, wf_t, MD5C0f, MD5S03);
  59
  60   MD5_STEP (MD5_Go, a, b, c, d, w1_t, MD5C10, MD5S10);
  61   MD5_STEP (MD5_Go, d, a, b, c, w6_t, MD5C11, MD5S11);
  62   MD5_STEP (MD5_Go, c, d, a, b, wb_t, MD5C12, MD5S12);
  63   MD5_STEP (MD5_Go, b, c, d, a, w0_t, MD5C13, MD5S13);
  64   MD5_STEP (MD5_Go, a, b, c, d, w5_t, MD5C14, MD5S10);
  65   MD5_STEP (MD5_Go, d, a, b, c, wa_t, MD5C15, MD5S11);
  66   MD5_STEP (MD5_Go, c, d, a, b, wf_t, MD5C16, MD5S12);
  67   MD5_STEP (MD5_Go, b, c, d, a, w4_t, MD5C17, MD5S13);
  68   MD5_STEP (MD5_Go, a, b, c, d, w9_t, MD5C18, MD5S10);
  69   MD5_STEP (MD5_Go, d, a, b, c, we_t, MD5C19, MD5S11);
  70   MD5_STEP (MD5_Go, c, d, a, b, w3_t, MD5C1a, MD5S12);
  71   MD5_STEP (MD5_Go, b, c, d, a, w8_t, MD5C1b, MD5S13);
  72   MD5_STEP (MD5_Go, a, b, c, d, wd_t, MD5C1c, MD5S10);
  73   MD5_STEP (MD5_Go, d, a, b, c, w2_t, MD5C1d, MD5S11);
  74   MD5_STEP (MD5_Go, c, d, a, b, w7_t, MD5C1e, MD5S12);
  75   MD5_STEP (MD5_Go, b, c, d, a, wc_t, MD5C1f, MD5S13);
  76
  77   MD5_STEP (MD5_H , a, b, c, d, w5_t, MD5C20, MD5S20);
  78   MD5_STEP (MD5_H , d, a, b, c, w8_t, MD5C21, MD5S21);
  79   MD5_STEP (MD5_H , c, d, a, b, wb_t, MD5C22, MD5S22);
  80   MD5_STEP (MD5_H , b, c, d, a, we_t, MD5C23, MD5S23);
  81   MD5_STEP (MD5_H , a, b, c, d, w1_t, MD5C24, MD5S20);
  82   MD5_STEP (MD5_H , d, a, b, c, w4_t, MD5C25, MD5S21);
  83   MD5_STEP (MD5_H , c, d, a, b, w7_t, MD5C26, MD5S22);
  84   MD5_STEP (MD5_H , b, c, d, a, wa_t, MD5C27, MD5S23);
  85   MD5_STEP (MD5_H , a, b, c, d, wd_t, MD5C28, MD5S20);
  86   MD5_STEP (MD5_H , d, a, b, c, w0_t, MD5C29, MD5S21);
  87   MD5_STEP (MD5_H , c, d, a, b, w3_t, MD5C2a, MD5S22);
  88   MD5_STEP (MD5_H , b, c, d, a, w6_t, MD5C2b, MD5S23);
  89   MD5_STEP (MD5_H , a, b, c, d, w9_t, MD5C2c, MD5S20);
  90   MD5_STEP (MD5_H , d, a, b, c, wc_t, MD5C2d, MD5S21);
  91   MD5_STEP (MD5_H , c, d, a, b, wf_t, MD5C2e, MD5S22);
  92   MD5_STEP (MD5_H , b, c, d, a, w2_t, MD5C2f, MD5S23);
  93
  94   MD5_STEP (MD5_I , a, b, c, d, w0_t, MD5C30, MD5S30);
  95   MD5_STEP (MD5_I , d, a, b, c, w7_t, MD5C31, MD5S31);
  96   MD5_STEP (MD5_I , c, d, a, b, we_t, MD5C32, MD5S32);
  97   MD5_STEP (MD5_I , b, c, d, a, w5_t, MD5C33, MD5S33);
  98   MD5_STEP (MD5_I , a, b, c, d, wc_t, MD5C34, MD5S30);
  99   MD5_STEP (MD5_I , d, a, b, c, w3_t, MD5C35, MD5S31);
 100   MD5_STEP (MD5_I , c, d, a, b, wa_t, MD5C36, MD5S32);
 101   MD5_STEP (MD5_I , b, c, d, a, w1_t, MD5C37, MD5S33);
 102   MD5_STEP (MD5_I , a, b, c, d, w8_t, MD5C38, MD5S30);
 103   MD5_STEP (MD5_I , d, a, b, c, wf_t, MD5C39, MD5S31);
 104   MD5_STEP (MD5_I , c, d, a, b, w6_t, MD5C3a, MD5S32);
 105   MD5_STEP (MD5_I , b, c, d, a, wd_t, MD5C3b, MD5S33);
 106   MD5_STEP (MD5_I , a, b, c, d, w4_t, MD5C3c, MD5S30);
 107   MD5_STEP (MD5_I , d, a, b, c, wb_t, MD5C3d, MD5S31);
 108   MD5_STEP (MD5_I , c, d, a, b, w2_t, MD5C3e, MD5S32);
 109   MD5_STEP (MD5_I , b, c, d, a, w9_t, MD5C3f, MD5S33);
 110
 111   digest[0] += a;
 112   digest[1] += b;
 113   digest[2] += c;
 114   digest[3] += d;
 115 }
 116
 117 void memcat16 (u32 block0[4], u32 block1[4], u32 block2[4], u32 block3[4], const u32 block_len, const u32 append[4])
 118 {
 119   u32 tmp0;
 120   u32 tmp1;
 121   u32 tmp2;
 122   u32 tmp3;
 123   u32 tmp4;
 124
 125   #if defined IS_AMD || defined IS_GENERIC
 126
 127   const int offset_minus_4 = 4 - (block_len & 3);
 128
 129   tmp0 = amd_bytealign (append[0],         0, offset_minus_4);
 130   tmp1 = amd_bytealign (append[1], append[0], offset_minus_4);
 131   tmp2 = amd_bytealign (append[2], append[1], offset_minus_4);
 132   tmp3 = amd_bytealign (append[3], append[2], offset_minus_4);
 133   tmp4 = amd_bytealign (        0, append[3], offset_minus_4);
 134
 135   const u32 mod = block_len & 3;
 136
 137   if (mod == 0)
 138   {
 139     tmp0 = tmp1;
 140     tmp1 = tmp2;
 141     tmp2 = tmp3;
 142     tmp3 = tmp4;
 143     tmp4 = 0;
 144   }
 145
 146   #endif
 147
 148   #ifdef IS_NV
 149
 150   const int offset_minus_4 = 4 - (block_len & 3);
 151
 152   const int selector = (0x76543210 >> (offset_minus_4 * 4)) & 0xffff;
 153
 154   tmp0 = __byte_perm (        0, append[0], selector);
 155   tmp1 = __byte_perm (append[0], append[1], selector);
 156   tmp2 = __byte_perm (append[1], append[2], selector);
 157   tmp3 = __byte_perm (append[2], append[3], selector);
 158   tmp4 = __byte_perm (append[3],         0, selector);
 159
 160   #endif
 161
 162   const u32 div = block_len / 4;
 163
 164   switch (div)
 165   {
 166     case  0:  block0[0] |= tmp0;
 167               block0[1]  = tmp1;
 168               block0[2]  = tmp2;
 169               block0[3]  = tmp3;
 170               block1[0]  = tmp4;
 171               break;
 172     case  1:  block0[1] |= tmp0;
 173               block0[2]  = tmp1;
 174               block0[3]  = tmp2;
 175               block1[0]  = tmp3;
 176               block1[1]  = tmp4;
 177               break;
 178     case  2:  block0[2] |= tmp0;
 179               block0[3]  = tmp1;
 180               block1[0]  = tmp2;
 181               block1[1]  = tmp3;
 182               block1[2]  = tmp4;
 183               break;
 184     case  3:  block0[3] |= tmp0;
 185               block1[0]  = tmp1;
 186               block1[1]  = tmp2;
 187               block1[2]  = tmp3;
 188               block1[3]  = tmp4;
 189               break;
 190     case  4:  block1[0] |= tmp0;
 191               block1[1]  = tmp1;
 192               block1[2]  = tmp2;
 193               block1[3]  = tmp3;
 194               block2[0]  = tmp4;
 195               break;
 196     case  5:  block1[1] |= tmp0;
 197               block1[2]  = tmp1;
 198               block1[3]  = tmp2;
 199               block2[0]  = tmp3;
 200               block2[1]  = tmp4;
 201               break;
 202     case  6:  block1[2] |= tmp0;
 203               block1[3]  = tmp1;
 204               block2[0]  = tmp2;
 205               block2[1]  = tmp3;
 206               block2[2]  = tmp4;
 207               break;
 208     case  7:  block1[3] |= tmp0;
 209               block2[0]  = tmp1;
 210               block2[1]  = tmp2;
 211               block2[2]  = tmp3;
 212               block2[3]  = tmp4;
 213               break;
 214     case  8:  block2[0] |= tmp0;
 215               block2[1]  = tmp1;
 216               block2[2]  = tmp2;
 217               block2[3]  = tmp3;
 218               block3[0]  = tmp4;
 219               break;
 220     case  9:  block2[1] |= tmp0;
 221               block2[2]  = tmp1;
 222               block2[3]  = tmp2;
 223               block3[0]  = tmp3;
 224               block3[1]  = tmp4;
 225               break;
 226   }
 227 }
 228
 229 void memcat16_x80 (u32 block0[4], u32 block1[4], u32 block2[4], u32 block3[4], const u32 block_len, const u32 append[4])
 230 {
 231   u32 tmp0;
 232   u32 tmp1;
 233   u32 tmp2;
 234   u32 tmp3;
 235   u32 tmp4;
 236
 237   #if defined IS_AMD || defined IS_GENERIC
 238
 239   const int offset_minus_4 = 4 - (block_len & 3);
 240
 241   tmp0 = amd_bytealign (append[0],         0, offset_minus_4);
 242   tmp1 = amd_bytealign (append[1], append[0], offset_minus_4);
 243   tmp2 = amd_bytealign (append[2], append[1], offset_minus_4);
 244   tmp3 = amd_bytealign (append[3], append[2], offset_minus_4);
 245   tmp4 = amd_bytealign (     0x80, append[3], offset_minus_4);
 246
 247   const u32 mod = block_len & 3;
 248
 249   if (mod == 0)
 250   {
 251     tmp0 = tmp1;
 252     tmp1 = tmp2;
 253     tmp2 = tmp3;
 254     tmp3 = tmp4;
 255     tmp4 = 0x80;
 256   }
 257
 258   #endif
 259
 260   #ifdef IS_NV
 261
 262   const int offset_minus_4 = 4 - (block_len & 3);
 263
 264   const int selector = (0x76543210 >> (offset_minus_4 * 4)) & 0xffff;
 265
 266   tmp0 = __byte_perm (        0, append[0], selector);
 267   tmp1 = __byte_perm (append[0], append[1], selector);
 268   tmp2 = __byte_perm (append[1], append[2], selector);
 269   tmp3 = __byte_perm (append[2], append[3], selector);
 270   tmp4 = __byte_perm (append[3],      0x80, selector);
 271
 272   #endif
 273
 274   const u32 div = block_len / 4;
 275
 276   switch (div)
 277   {
 278     case  0:  block0[0] |= tmp0;
 279               block0[1]  = tmp1;
 280               block0[2]  = tmp2;
 281               block0[3]  = tmp3;
 282               block1[0]  = tmp4;
 283               break;
 284     case  1:  block0[1] |= tmp0;
 285               block0[2]  = tmp1;
 286               block0[3]  = tmp2;
 287               block1[0]  = tmp3;
 288               block1[1]  = tmp4;
 289               break;
 290     case  2:  block0[2] |= tmp0;
 291               block0[3]  = tmp1;
 292               block1[0]  = tmp2;
 293               block1[1]  = tmp3;
 294               block1[2]  = tmp4;
 295               break;
 296     case  3:  block0[3] |= tmp0;
 297               block1[0]  = tmp1;
 298               block1[1]  = tmp2;
 299               block1[2]  = tmp3;
 300               block1[3]  = tmp4;
 301               break;
 302     case  4:  block1[0] |= tmp0;
 303               block1[1]  = tmp1;
 304               block1[2]  = tmp2;
 305               block1[3]  = tmp3;
 306               block2[0]  = tmp4;
 307               break;
 308     case  5:  block1[1] |= tmp0;
 309               block1[2]  = tmp1;
 310               block1[3]  = tmp2;
 311               block2[0]  = tmp3;
 312               block2[1]  = tmp4;
 313               break;
 314     case  6:  block1[2] |= tmp0;
 315               block1[3]  = tmp1;
 316               block2[0]  = tmp2;
 317               block2[1]  = tmp3;
 318               block2[2]  = tmp4;
 319               break;
 320     case  7:  block1[3] |= tmp0;
 321               block2[0]  = tmp1;
 322               block2[1]  = tmp2;
 323               block2[2]  = tmp3;
 324               block2[3]  = tmp4;
 325               break;
 326     case  8:  block2[0] |= tmp0;
 327               block2[1]  = tmp1;
 328               block2[2]  = tmp2;
 329               block2[3]  = tmp3;
 330               block3[0]  = tmp4;
 331               break;
 332     case  9:  block2[1] |= tmp0;
 333               block2[2]  = tmp1;
 334               block2[3]  = tmp2;
 335               block3[0]  = tmp3;
 336               block3[1]  = tmp4;
 337               break;
 338   }
 339 }
 340
 341 void memcat8 (u32 block0[4], u32 block1[4], u32 block2[4], u32 block3[4], const u32 block_len, const u32 append[2])
 342 {
 343   u32 tmp0;
 344   u32 tmp1;
 345   u32 tmp2;
 346
 347   #if defined IS_AMD || defined IS_GENERIC
 348
 349   const int offset_minus_4 = 4 - (block_len & 3);
 350
 351   tmp0 = amd_bytealign (append[0],         0, offset_minus_4);
 352   tmp1 = amd_bytealign (append[1], append[0], offset_minus_4);
 353   tmp2 = amd_bytealign (        0, append[1], offset_minus_4);
 354
 355   const u32 mod = block_len & 3;
 356
 357   if (mod == 0)
 358   {
 359     tmp0 = tmp1;
 360     tmp1 = tmp2;
 361     tmp2 = 0;
 362   }
 363
 364   #endif
 365
 366   #ifdef IS_NV
 367
 368   const int offset_minus_4 = 4 - (block_len & 3);
 369
 370   const int selector = (0x76543210 >> (offset_minus_4 * 4)) & 0xffff;
 371
 372   tmp0 = __byte_perm (        0, append[0], selector);
 373   tmp1 = __byte_perm (append[0], append[1], selector);
 374   tmp2 = __byte_perm (append[1],         0, selector);
 375
 376   #endif
 377
 378   const u32 div = block_len / 4;
 379
 380   switch (div)
 381   {
 382     case  0:  block0[0] |= tmp0;
 383               block0[1]  = tmp1;
 384               block0[2]  = tmp2;
 385               break;
 386     case  1:  block0[1] |= tmp0;
 387               block0[2]  = tmp1;
 388               block0[3]  = tmp2;
 389               break;
 390     case  2:  block0[2] |= tmp0;
 391               block0[3]  = tmp1;
 392               block1[0]  = tmp2;
 393               break;
 394     case  3:  block0[3] |= tmp0;
 395               block1[0]  = tmp1;
 396               block1[1]  = tmp2;
 397               break;
 398     case  4:  block1[0] |= tmp0;
 399               block1[1]  = tmp1;
 400               block1[2]  = tmp2;
 401               break;
 402     case  5:  block1[1] |= tmp0;
 403               block1[2]  = tmp1;
 404               block1[3]  = tmp2;
 405               break;
 406     case  6:  block1[2] |= tmp0;
 407               block1[3]  = tmp1;
 408               block2[0]  = tmp2;
 409               break;
 410     case  7:  block1[3] |= tmp0;
 411               block2[0]  = tmp1;
 412               block2[1]  = tmp2;
 413               break;
 414     case  8:  block2[0] |= tmp0;
 415               block2[1]  = tmp1;
 416               block2[2]  = tmp2;
 417               break;
 418     case  9:  block2[1] |= tmp0;
 419               block2[2]  = tmp1;
 420               block2[3]  = tmp2;
 421               break;
 422     case 10:  block2[2] |= tmp0;
 423               block2[3]  = tmp1;
 424               block3[0]  = tmp2;
 425               break;
 426     case 11:  block2[3] |= tmp0;
 427               block3[0]  = tmp1;
 428               block3[1]  = tmp2;
 429               break;
 430   }
 431 }
 432
 433 void append_sign (u32 block0[4], u32 block1[4], const u32 block_len)
 434 {
 435   switch (block_len)
 436   {
 437     case 0:
 438       block0[0] = md5crypt_magic;
 439       break;
 440
 441     case 1:
 442       block0[0] = block0[0]            | md5crypt_magic <<  8u;
 443       block0[1] = md5crypt_magic >> 24u;
 444       break;
 445
 446     case 2:
 447       block0[0] = block0[0]            | md5crypt_magic << 16u;
 448       block0[1] = md5crypt_magic >> 16u;
 449       break;
 450
 451     case 3:
 452       block0[0] = block0[0]            | md5crypt_magic << 24u;
 453       block0[1] = md5crypt_magic >>  8u;
 454       break;
 455
 456     case 4:
 457       block0[1] = md5crypt_magic;
 458       break;
 459
 460     case 5:
 461       block0[1] = block0[1]            | md5crypt_magic <<  8u;
 462       block0[2] = md5crypt_magic >> 24u;
 463       break;
 464
 465     case 6:
 466       block0[1] = block0[1]            | md5crypt_magic << 16u;
 467       block0[2] = md5crypt_magic >> 16u;
 468       break;
 469
 470     case 7:
 471       block0[1] = block0[1]            | md5crypt_magic << 24u;
 472       block0[2] = md5crypt_magic >>  8u;
 473       break;
 474
 475     case 8:
 476       block0[2] = md5crypt_magic;
 477       break;
 478
 479     case 9:
 480       block0[2] = block0[2]            | md5crypt_magic <<  8u;
 481       block0[3] = md5crypt_magic >> 24u;
 482       break;
 483
 484     case 10:
 485       block0[2] = block0[2]            | md5crypt_magic << 16u;
 486       block0[3] = md5crypt_magic >> 16u;
 487       break;
 488
 489     case 11:
 490       block0[2] = block0[2]            | md5crypt_magic << 24u;
 491       block0[3] = md5crypt_magic >>  8u;
 492       break;
 493
 494     case 12:
 495       block0[3] = md5crypt_magic;
 496       break;
 497
 498     case 13:
 499       block0[3] = block0[3]            | md5crypt_magic <<  8u;
 500       block1[0] = md5crypt_magic >> 24u;
 501       break;
 502
 503     case 14:
 504       block0[3] = block0[3]            | md5crypt_magic << 16u;
 505       block1[0] = md5crypt_magic >> 16u;
 506       break;
 507
 508     case 15:
 509       block0[3] = block0[3]            | md5crypt_magic << 24u;
 510       block1[0] = md5crypt_magic >>  8u;
 511       break;
 512   }
 513 }
 514
 515 void append_1st (u32 block0[4], u32 block1[4], u32 block2[4], u32 block3[4], const u32 block_len, const u32 append)
 516 {
 517   switch (block_len)
 518   {
 519     case 0:
 520       block0[0] = append;
 521       break;
 522
 523     case 1:
 524       block0[0] = block0[0] | append <<  8;
 525       break;
 526
 527     case 2:
 528       block0[0] = block0[0] | append << 16;
 529       break;
 530
 531     case 3:
 532       block0[0] = block0[0] | append << 24;
 533       break;
 534
 535     case 4:
 536       block0[1] = append;
 537       break;
 538
 539     case 5:
 540       block0[1] = block0[1] | append <<  8;
 541       break;
 542
 543     case 6:
 544       block0[1] = block0[1] | append << 16;
 545       break;
 546
 547     case 7:
 548       block0[1] = block0[1] | append << 24;
 549       break;
 550
 551     case 8:
 552       block0[2] = append;
 553       break;
 554
 555     case 9:
 556       block0[2] = block0[2] | append <<  8;
 557       break;
 558
 559     case 10:
 560       block0[2] = block0[2] | append << 16;
 561       break;
 562
 563     case 11:
 564       block0[2] = block0[2] | append << 24;
 565       break;
 566
 567     case 12:
 568       block0[3] = append;
 569       break;
 570
 571     case 13:
 572       block0[3] = block0[3] | append <<  8;
 573       break;
 574
 575     case 14:
 576       block0[3] = block0[3] | append << 16;
 577       break;
 578
 579     case 15:
 580       block0[3] = block0[3] | append << 24;
 581       break;
 582
 583     case 16:
 584       block1[0] = append;
 585       break;
 586
 587     case 17:
 588       block1[0] = block1[0] | append <<  8;
 589       break;
 590
 591     case 18:
 592       block1[0] = block1[0] | append << 16;
 593       break;
 594
 595     case 19:
 596       block1[0] = block1[0] | append << 24;
 597       break;
 598
 599     case 20:
 600       block1[1] = append;
 601       break;
 602
 603     case 21:
 604       block1[1] = block1[1] | append <<  8;
 605       break;
 606
 607     case 22:
 608       block1[1] = block1[1] | append << 16;
 609       break;
 610
 611     case 23:
 612       block1[1] = block1[1] | append << 24;
 613       break;
 614
 615     case 24:
 616       block1[2] = append;
 617       break;
 618
 619     case 25:
 620       block1[2] = block1[2] | append <<  8;
 621       break;
 622
 623     case 26:
 624       block1[2] = block1[2] | append << 16;
 625       break;
 626
 627     case 27:
 628       block1[2] = block1[2] | append << 24;
 629       break;
 630
 631     case 28:
 632       block1[3] = append;
 633       break;
 634
 635     case 29:
 636       block1[3] = block1[3] | append <<  8;
 637       break;
 638
 639     case 30:
 640       block1[3] = block1[3] | append << 16;
 641       break;
 642
 643     case 31:
 644       block1[3] = block1[3] | append << 24;
 645       break;
 646
 647     case 32:
 648       block2[0] = append;
 649       break;
 650
 651     case 33:
 652       block2[0] = block2[0] | append <<  8;
 653       break;
 654
 655     case 34:
 656       block2[0] = block2[0] | append << 16;
 657       break;
 658
 659     case 35:
 660       block2[0] = block2[0] | append << 24;
 661       break;
 662
 663     case 36:
 664       block2[1] = append;
 665       break;
 666
 667     case 37:
 668       block2[1] = block2[1] | append <<  8;
 669       break;
 670
 671     case 38:
 672       block2[1] = block2[1] | append << 16;
 673       break;
 674
 675     case 39:
 676       block2[1] = block2[1] | append << 24;
 677       break;
 678
 679     case 40:
 680       block2[2] = append;
 681       break;
 682
 683     case 41:
 684       block2[2] = block2[2] | append <<  8;
 685       break;
 686
 687     case 42:
 688       block2[2] = block2[2] | append << 16;
 689       break;
 690
 691     case 43:
 692       block2[2] = block2[2] | append << 24;
 693       break;
 694
 695     case 44:
 696       block2[3] = append;
 697       break;
 698
 699     case 45:
 700       block2[3] = block2[3] | append <<  8;
 701       break;
 702
 703     case 46:
 704       block2[3] = block2[3] | append << 16;
 705       break;
 706
 707     case 47:
 708       block2[3] = block2[3] | append << 24;
 709       break;
 710
 711     case 48:
 712       block3[0] = append;
 713       break;
 714
 715     case 49:
 716       block3[0] = block3[0] | append <<  8;
 717       break;
 718
 719     case 50:
 720       block3[0] = block3[0] | append << 16;
 721       break;
 722
 723     case 51:
 724       block3[0] = block3[0] | append << 24;
 725       break;
 726
 727     case 52:
 728       block3[1] = append;
 729       break;
 730
 731     case 53:
 732       block3[1] = block3[1] | append <<  8;
 733       break;
 734
 735     case 54:
 736       block3[1] = block3[1] | append << 16;
 737       break;
 738
 739     case 55:
 740       block3[1] = block3[1] | append << 24;
 741       break;
 742
 743     case 56:
 744       block3[2] = append;
 745       break;
 746   }
 747 }
 748
 749 __kernel void m00500_init (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global md5crypt_tmp_t *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 void *esalt_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV0_buf, __global u32 *d_scryptV1_buf, __global u32 *d_scryptV2_buf, __global u32 *d_scryptV3_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)
 750 {
 751   /**
 752    * base
 753    */
 754
 755   const u32 gid = get_global_id (0);
 756
 757   if (gid >= gid_max) return;
 758
 759   u32 w0[4];
 760
 761   w0[0] = pws[gid].i[0];
 762   w0[1] = pws[gid].i[1];
 763   w0[2] = pws[gid].i[2];
 764   w0[3] = pws[gid].i[3];
 765
 766   const u32 pw_len = pws[gid].pw_len;
 767
 768   /**
 769    * salt
 770    */
 771
 772   u32 salt_buf[2];
 773
 774   salt_buf[0] = salt_bufs[salt_pos].salt_buf[0];
 775   salt_buf[1] = salt_bufs[salt_pos].salt_buf[1];
 776
 777   const u32 salt_len = salt_bufs[salt_pos].salt_len;
 778
 779   /**
 780    * init
 781    */
 782
 783   //memcat16 (block0, block1, block2, block3, block_len, w0);
 784   //block_len += pw_len;
 785
 786   u32 block_len = pw_len;
 787
 788   u32 block0[4];
 789
 790   block0[0] = w0[0];
 791   block0[1] = w0[1];
 792   block0[2] = w0[2];
 793   block0[3] = w0[3];
 794
 795   u32 block1[4];
 796
 797   block1[0] = 0;
 798   block1[1] = 0;
 799   block1[2] = 0;
 800   block1[3] = 0;
 801
 802   u32 block2[4];
 803
 804   block2[0] = 0;
 805   block2[1] = 0;
 806   block2[2] = 0;
 807   block2[3] = 0;
 808
 809   u32 block3[4];
 810
 811   block3[0] = 0;
 812   block3[1] = 0;
 813   block3[2] = 0;
 814   block3[3] = 0;
 815
 816   memcat8 (block0, block1, block2, block3, block_len, salt_buf);
 817
 818   block_len += salt_len;
 819
 820   memcat16 (block0, block1, block2, block3, block_len, w0);
 821
 822   block_len += pw_len;
 823
 824   append_0x80_4x4 (block0, block1, block2, block3, block_len);
 825
 826   block3[2] = block_len * 8;
 827
 828   u32 digest[4];
 829
 830   digest[0] = MD5M_A;
 831   digest[1] = MD5M_B;
 832   digest[2] = MD5M_C;
 833   digest[3] = MD5M_D;
 834
 835   md5_transform (block0, block1, block2, block3, digest);
 836
 837   /* The password first, since that is what is most unknown */
 838   /* Then our magic string */
 839   /* Then the raw salt */
 840   /* Then just as many characters of the MD5(pw,salt,pw) */
 841
 842   //memcat16 (block0, block1, block2, block3, block_len, w);
 843   //block_len += pw_len;
 844
 845   block_len = pw_len;
 846
 847   block0[0] = w0[0];
 848   block0[1] = w0[1];
 849   block0[2] = w0[2];
 850   block0[3] = w0[3];
 851
 852   block1[0] = 0;
 853   block1[1] = 0;
 854   block1[2] = 0;
 855   block1[3] = 0;
 856
 857   block2[0] = 0;
 858   block2[1] = 0;
 859   block2[2] = 0;
 860   block2[3] = 0;
 861
 862   block3[0] = 0;
 863   block3[1] = 0;
 864   block3[2] = 0;
 865   block3[3] = 0;
 866
 867   append_sign (block0, block1, block_len);
 868
 869   block_len += 3;
 870
 871   memcat8 (block0, block1, block2, block3, block_len, salt_buf);
 872
 873   block_len += salt_len;
 874
 875   truncate_block (digest, pw_len);
 876
 877   memcat16 (block0, block1, block2, block3, block_len, digest);
 878
 879   block_len += pw_len;
 880
 881   /* Then something really weird... */
 882
 883   u32 append = block0[0] & 0xFF;
 884
 885   for (u32 j = pw_len; j; j >>= 1)
 886   {
 887     if ((j & 1) == 0)
 888     {
 889       append_1st (block0, block1, block2, block3, block_len, append);
 890     }
 891
 892     block_len++;
 893   }
 894
 895   append_0x80_4x4 (block0, block1, block2, block3, block_len);
 896
 897   block3[2] = block_len * 8;
 898
 899   digest[0] = MD5M_A;
 900   digest[1] = MD5M_B;
 901   digest[2] = MD5M_C;
 902   digest[3] = MD5M_D;
 903
 904   md5_transform (block0, block1, block2, block3, digest);
 905
 906   tmps[gid].digest_buf[0] = digest[0];
 907   tmps[gid].digest_buf[1] = digest[1];
 908   tmps[gid].digest_buf[2] = digest[2];
 909   tmps[gid].digest_buf[3] = digest[3];
 910 }
 911
 912 __kernel void m00500_loop (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global md5crypt_tmp_t *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 void *esalt_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV0_buf, __global u32 *d_scryptV1_buf, __global u32 *d_scryptV2_buf, __global u32 *d_scryptV3_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)
 913 {
 914   /**
 915    * base
 916    */
 917
 918   const u32 gid = get_global_id (0);
 919
 920   if (gid >= gid_max) return;
 921
 922   u32 w0[4];
 923
 924   w0[0] = pws[gid].i[0];
 925   w0[1] = pws[gid].i[1];
 926   w0[2] = pws[gid].i[2];
 927   w0[3] = pws[gid].i[3];
 928
 929   const u32 pw_len = pws[gid].pw_len;
 930
 931   u32 w0_x80[4];
 932
 933   w0_x80[0] = w0[0];
 934   w0_x80[1] = w0[1];
 935   w0_x80[2] = w0[2];
 936   w0_x80[3] = w0[3];
 937
 938   append_0x80_1x4 (w0_x80, pw_len);
 939
 940   /**
 941    * salt
 942    */
 943
 944   u32 salt_buf[2];
 945
 946   salt_buf[0] = salt_bufs[salt_pos].salt_buf[0];
 947   salt_buf[1] = salt_bufs[salt_pos].salt_buf[1];
 948
 949   const u32 salt_len = salt_bufs[salt_pos].salt_len;
 950
 951   /**
 952    * digest
 953    */
 954
 955   u32 digest[4];
 956
 957   digest[0] = tmps[gid].digest_buf[0];
 958   digest[1] = tmps[gid].digest_buf[1];
 959   digest[2] = tmps[gid].digest_buf[2];
 960   digest[3] = tmps[gid].digest_buf[3];
 961
 962   /**
 963    * loop
 964    */
 965
 966   /* and now, just to make sure things don't run too fast */
 967
 968   u32 block_len;
 969
 970   u32 block0[4];
 971
 972   block0[0] = 0;
 973   block0[1] = 0;
 974   block0[2] = 0;
 975   block0[3] = 0;
 976
 977   u32 block1[4];
 978
 979   block1[0] = 0;
 980   block1[1] = 0;
 981   block1[2] = 0;
 982   block1[3] = 0;
 983
 984   u32 block2[4];
 985
 986   block2[0] = 0;
 987   block2[1] = 0;
 988   block2[2] = 0;
 989   block2[3] = 0;
 990
 991   u32 block3[4];
 992
 993   block3[0] = 0;
 994   block3[1] = 0;
 995   block3[2] = 0;
 996   block3[3] = 0;
 997
 998   for (u32 i = 0, j = loop_pos; i < loop_cnt; i++, j++)
 999   {
1000     block1[0] = 0;
1001     block1[1] = 0;
1002     block1[2] = 0;
1003     block1[3] = 0;
1004     block2[0] = 0;
1005     block2[1] = 0;
1006     block2[2] = 0;
1007     block2[3] = 0;
1008     block3[0] = 0;
1009     block3[1] = 0;
1010
1011     const u32 j1 = (j & 1) ? 1 : 0;
1012     const u32 j3 = (j % 3) ? 1 : 0;
1013     const u32 j7 = (j % 7) ? 1 : 0;
1014
1015     if (j1)
1016     {
1017       block0[0] = w0[0];
1018       block0[1] = w0[1];
1019       block0[2] = w0[2];
1020       block0[3] = w0[3];
1021
1022       block_len = pw_len;
1023
1024       if (j3)
1025       {
1026         memcat8 (block0, block1, block2, block3, block_len, salt_buf);
1027
1028         block_len += salt_len;
1029       }
1030
1031       if (j7)
1032       {
1033         memcat16 (block0, block1, block2, block3, block_len, w0);
1034
1035         block_len += pw_len;
1036       }
1037
1038       memcat16_x80 (block0, block1, block2, block3, block_len, digest);
1039
1040       block_len += 16;
1041     }
1042     else
1043     {
1044       block0[0] = digest[0];
1045       block0[1] = digest[1];
1046       block0[2] = digest[2];
1047       block0[3] = digest[3];
1048
1049       block_len = 16;
1050
1051       if (j3 && j7)
1052       {
1053         block1[0] = salt_buf[0];
1054         block1[1] = salt_buf[1];
1055
1056         block_len += salt_len;
1057
1058         memcat16 (block0, block1, block2, block3, block_len, w0);
1059
1060         block_len += pw_len;
1061       }
1062       else if (j3)
1063       {
1064         block1[0] = salt_buf[0];
1065         block1[1] = salt_buf[1];
1066
1067         block_len += salt_len;
1068       }
1069       else if (j7)
1070       {
1071         block1[0] = w0[0];
1072         block1[1] = w0[1];
1073         block1[2] = w0[2];
1074         block1[3] = w0[3];
1075
1076         block_len += pw_len;
1077       }
1078
1079       memcat16 (block0, block1, block2, block3, block_len, w0_x80);
1080
1081       block_len += pw_len;
1082     }
1083
1084     block3[2] = block_len * 8;
1085
1086     digest[0] = MD5M_A;
1087     digest[1] = MD5M_B;
1088     digest[2] = MD5M_C;
1089     digest[3] = MD5M_D;
1090
1091     md5_transform (block0, block1, block2, block3, digest);
1092   }
1093
1094   tmps[gid].digest_buf[0] = digest[0];
1095   tmps[gid].digest_buf[1] = digest[1];
1096   tmps[gid].digest_buf[2] = digest[2];
1097   tmps[gid].digest_buf[3] = digest[3];
1098 }
1099
1100 __kernel void m00500_comp (__global pw_t *pws, __global kernel_rule_t *rules_buf, __global comb_t *combs_buf, __global bf_t *bfs_buf, __global md5crypt_tmp_t *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 void *esalt_bufs, __global u32 *d_return_buf, __global u32 *d_scryptV0_buf, __global u32 *d_scryptV1_buf, __global u32 *d_scryptV2_buf, __global u32 *d_scryptV3_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)
1101 {
1102   /**
1103    * modifier
1104    */
1105
1106   const u32 gid = get_global_id (0);
1107
1108   if (gid >= gid_max) return;
1109
1110   const u32 lid = get_local_id (0);
1111
1112   /**
1113    * digest
1114    */
1115
1116   const u32 r0 = tmps[gid].digest_buf[DGST_R0];
1117   const u32 r1 = tmps[gid].digest_buf[DGST_R1];
1118   const u32 r2 = tmps[gid].digest_buf[DGST_R2];
1119   const u32 r3 = tmps[gid].digest_buf[DGST_R3];
1120
1121   #define il_pos 0
1122
1123   #include COMPARE_M
1124 }