OpenCL/m01500_a0.cl

   1 /**
   2  * Author......: Jens Steube <jens.steube@gmail.com>
   3  * License.....: MIT
   4  */
   5
   6 #define _DES_
   7
   8 #include "include/constants.h"
   9 #include "include/kernel_vendor.h"
  10
  11 #define DGST_R0 0
  12 #define DGST_R1 1
  13 #define DGST_R2 2
  14 #define DGST_R3 3
  15
  16 #include "include/kernel_functions.c"
  17 #include "OpenCL/types_ocl.c"
  18 #include "OpenCL/common.c"
  19 #include "include/rp_gpu.h"
  20 #include "OpenCL/rp.c"
  21
  22 #define COMPARE_S "OpenCL/check_single_comp4.c"
  23 #define COMPARE_M "OpenCL/check_multi_comp4.c"
  24
  25 #define PERM_OP(a,b,tt,n,m) \
  26 {                           \
  27   tt = a >> n;              \
  28   tt = tt ^ b;              \
  29   tt = tt & m;              \
  30   b = b ^ tt;               \
  31   tt = tt << n;             \
  32   a = a ^ tt;               \
  33 }
  34
  35 #define HPERM_OP(a,tt,n,m)  \
  36 {                           \
  37   tt = a << (16 + n);       \
  38   tt = tt ^ a;              \
  39   tt = tt & m;              \
  40   a  = a ^ tt;              \
  41   tt = tt >> (16 + n);      \
  42   a  = a ^ tt;              \
  43 }
  44
  45 __constant u32 c_SPtrans[8][64] =
  46 {
  47   {
  48     0x00820200, 0x00020000, 0x80800000, 0x80820200,
  49     0x00800000, 0x80020200, 0x80020000, 0x80800000,
  50     0x80020200, 0x00820200, 0x00820000, 0x80000200,
  51     0x80800200, 0x00800000, 0x00000000, 0x80020000,
  52     0x00020000, 0x80000000, 0x00800200, 0x00020200,
  53     0x80820200, 0x00820000, 0x80000200, 0x00800200,
  54     0x80000000, 0x00000200, 0x00020200, 0x80820000,
  55     0x00000200, 0x80800200, 0x80820000, 0x00000000,
  56     0x00000000, 0x80820200, 0x00800200, 0x80020000,
  57     0x00820200, 0x00020000, 0x80000200, 0x00800200,
  58     0x80820000, 0x00000200, 0x00020200, 0x80800000,
  59     0x80020200, 0x80000000, 0x80800000, 0x00820000,
  60     0x80820200, 0x00020200, 0x00820000, 0x80800200,
  61     0x00800000, 0x80000200, 0x80020000, 0x00000000,
  62     0x00020000, 0x00800000, 0x80800200, 0x00820200,
  63     0x80000000, 0x80820000, 0x00000200, 0x80020200,
  64   },
  65   {
  66     0x10042004, 0x00000000, 0x00042000, 0x10040000,
  67     0x10000004, 0x00002004, 0x10002000, 0x00042000,
  68     0x00002000, 0x10040004, 0x00000004, 0x10002000,
  69     0x00040004, 0x10042000, 0x10040000, 0x00000004,
  70     0x00040000, 0x10002004, 0x10040004, 0x00002000,
  71     0x00042004, 0x10000000, 0x00000000, 0x00040004,
  72     0x10002004, 0x00042004, 0x10042000, 0x10000004,
  73     0x10000000, 0x00040000, 0x00002004, 0x10042004,
  74     0x00040004, 0x10042000, 0x10002000, 0x00042004,
  75     0x10042004, 0x00040004, 0x10000004, 0x00000000,
  76     0x10000000, 0x00002004, 0x00040000, 0x10040004,
  77     0x00002000, 0x10000000, 0x00042004, 0x10002004,
  78     0x10042000, 0x00002000, 0x00000000, 0x10000004,
  79     0x00000004, 0x10042004, 0x00042000, 0x10040000,
  80     0x10040004, 0x00040000, 0x00002004, 0x10002000,
  81     0x10002004, 0x00000004, 0x10040000, 0x00042000,
  82   },
  83   {
  84     0x41000000, 0x01010040, 0x00000040, 0x41000040,
  85     0x40010000, 0x01000000, 0x41000040, 0x00010040,
  86     0x01000040, 0x00010000, 0x01010000, 0x40000000,
  87     0x41010040, 0x40000040, 0x40000000, 0x41010000,
  88     0x00000000, 0x40010000, 0x01010040, 0x00000040,
  89     0x40000040, 0x41010040, 0x00010000, 0x41000000,
  90     0x41010000, 0x01000040, 0x40010040, 0x01010000,
  91     0x00010040, 0x00000000, 0x01000000, 0x40010040,
  92     0x01010040, 0x00000040, 0x40000000, 0x00010000,
  93     0x40000040, 0x40010000, 0x01010000, 0x41000040,
  94     0x00000000, 0x01010040, 0x00010040, 0x41010000,
  95     0x40010000, 0x01000000, 0x41010040, 0x40000000,
  96     0x40010040, 0x41000000, 0x01000000, 0x41010040,
  97     0x00010000, 0x01000040, 0x41000040, 0x00010040,
  98     0x01000040, 0x00000000, 0x41010000, 0x40000040,
  99     0x41000000, 0x40010040, 0x00000040, 0x01010000,
 100   },
 101   {
 102     0x00100402, 0x04000400, 0x00000002, 0x04100402,
 103     0x00000000, 0x04100000, 0x04000402, 0x00100002,
 104     0x04100400, 0x04000002, 0x04000000, 0x00000402,
 105     0x04000002, 0x00100402, 0x00100000, 0x04000000,
 106     0x04100002, 0x00100400, 0x00000400, 0x00000002,
 107     0x00100400, 0x04000402, 0x04100000, 0x00000400,
 108     0x00000402, 0x00000000, 0x00100002, 0x04100400,
 109     0x04000400, 0x04100002, 0x04100402, 0x00100000,
 110     0x04100002, 0x00000402, 0x00100000, 0x04000002,
 111     0x00100400, 0x04000400, 0x00000002, 0x04100000,
 112     0x04000402, 0x00000000, 0x00000400, 0x00100002,
 113     0x00000000, 0x04100002, 0x04100400, 0x00000400,
 114     0x04000000, 0x04100402, 0x00100402, 0x00100000,
 115     0x04100402, 0x00000002, 0x04000400, 0x00100402,
 116     0x00100002, 0x00100400, 0x04100000, 0x04000402,
 117     0x00000402, 0x04000000, 0x04000002, 0x04100400,
 118   },
 119   {
 120     0x02000000, 0x00004000, 0x00000100, 0x02004108,
 121     0x02004008, 0x02000100, 0x00004108, 0x02004000,
 122     0x00004000, 0x00000008, 0x02000008, 0x00004100,
 123     0x02000108, 0x02004008, 0x02004100, 0x00000000,
 124     0x00004100, 0x02000000, 0x00004008, 0x00000108,
 125     0x02000100, 0x00004108, 0x00000000, 0x02000008,
 126     0x00000008, 0x02000108, 0x02004108, 0x00004008,
 127     0x02004000, 0x00000100, 0x00000108, 0x02004100,
 128     0x02004100, 0x02000108, 0x00004008, 0x02004000,
 129     0x00004000, 0x00000008, 0x02000008, 0x02000100,
 130     0x02000000, 0x00004100, 0x02004108, 0x00000000,
 131     0x00004108, 0x02000000, 0x00000100, 0x00004008,
 132     0x02000108, 0x00000100, 0x00000000, 0x02004108,
 133     0x02004008, 0x02004100, 0x00000108, 0x00004000,
 134     0x00004100, 0x02004008, 0x02000100, 0x00000108,
 135     0x00000008, 0x00004108, 0x02004000, 0x02000008,
 136   },
 137   {
 138     0x20000010, 0x00080010, 0x00000000, 0x20080800,
 139     0x00080010, 0x00000800, 0x20000810, 0x00080000,
 140     0x00000810, 0x20080810, 0x00080800, 0x20000000,
 141     0x20000800, 0x20000010, 0x20080000, 0x00080810,
 142     0x00080000, 0x20000810, 0x20080010, 0x00000000,
 143     0x00000800, 0x00000010, 0x20080800, 0x20080010,
 144     0x20080810, 0x20080000, 0x20000000, 0x00000810,
 145     0x00000010, 0x00080800, 0x00080810, 0x20000800,
 146     0x00000810, 0x20000000, 0x20000800, 0x00080810,
 147     0x20080800, 0x00080010, 0x00000000, 0x20000800,
 148     0x20000000, 0x00000800, 0x20080010, 0x00080000,
 149     0x00080010, 0x20080810, 0x00080800, 0x00000010,
 150     0x20080810, 0x00080800, 0x00080000, 0x20000810,
 151     0x20000010, 0x20080000, 0x00080810, 0x00000000,
 152     0x00000800, 0x20000010, 0x20000810, 0x20080800,
 153     0x20080000, 0x00000810, 0x00000010, 0x20080010,
 154   },
 155   {
 156     0x00001000, 0x00000080, 0x00400080, 0x00400001,
 157     0x00401081, 0x00001001, 0x00001080, 0x00000000,
 158     0x00400000, 0x00400081, 0x00000081, 0x00401000,
 159     0x00000001, 0x00401080, 0x00401000, 0x00000081,
 160     0x00400081, 0x00001000, 0x00001001, 0x00401081,
 161     0x00000000, 0x00400080, 0x00400001, 0x00001080,
 162     0x00401001, 0x00001081, 0x00401080, 0x00000001,
 163     0x00001081, 0x00401001, 0x00000080, 0x00400000,
 164     0x00001081, 0x00401000, 0x00401001, 0x00000081,
 165     0x00001000, 0x00000080, 0x00400000, 0x00401001,
 166     0x00400081, 0x00001081, 0x00001080, 0x00000000,
 167     0x00000080, 0x00400001, 0x00000001, 0x00400080,
 168     0x00000000, 0x00400081, 0x00400080, 0x00001080,
 169     0x00000081, 0x00001000, 0x00401081, 0x00400000,
 170     0x00401080, 0x00000001, 0x00001001, 0x00401081,
 171     0x00400001, 0x00401080, 0x00401000, 0x00001001,
 172   },
 173   {
 174     0x08200020, 0x08208000, 0x00008020, 0x00000000,
 175     0x08008000, 0x00200020, 0x08200000, 0x08208020,
 176     0x00000020, 0x08000000, 0x00208000, 0x00008020,
 177     0x00208020, 0x08008020, 0x08000020, 0x08200000,
 178     0x00008000, 0x00208020, 0x00200020, 0x08008000,
 179     0x08208020, 0x08000020, 0x00000000, 0x00208000,
 180     0x08000000, 0x00200000, 0x08008020, 0x08200020,
 181     0x00200000, 0x00008000, 0x08208000, 0x00000020,
 182     0x00200000, 0x00008000, 0x08000020, 0x08208020,
 183     0x00008020, 0x08000000, 0x00000000, 0x00208000,
 184     0x08200020, 0x08008020, 0x08008000, 0x00200020,
 185     0x08208000, 0x00000020, 0x00200020, 0x08008000,
 186     0x08208020, 0x00200000, 0x08200000, 0x08000020,
 187     0x00208000, 0x00008020, 0x08008020, 0x08200000,
 188     0x00000020, 0x08208000, 0x00208020, 0x00000000,
 189     0x08000000, 0x08200020, 0x00008000, 0x00208020
 190   },
 191 };
 192
 193 __constant u32 c_skb[8][64] =
 194 {
 195   {
 196     0x00000000, 0x00000010, 0x20000000, 0x20000010,
 197     0x00010000, 0x00010010, 0x20010000, 0x20010010,
 198     0x00000800, 0x00000810, 0x20000800, 0x20000810,
 199     0x00010800, 0x00010810, 0x20010800, 0x20010810,
 200     0x00000020, 0x00000030, 0x20000020, 0x20000030,
 201     0x00010020, 0x00010030, 0x20010020, 0x20010030,
 202     0x00000820, 0x00000830, 0x20000820, 0x20000830,
 203     0x00010820, 0x00010830, 0x20010820, 0x20010830,
 204     0x00080000, 0x00080010, 0x20080000, 0x20080010,
 205     0x00090000, 0x00090010, 0x20090000, 0x20090010,
 206     0x00080800, 0x00080810, 0x20080800, 0x20080810,
 207     0x00090800, 0x00090810, 0x20090800, 0x20090810,
 208     0x00080020, 0x00080030, 0x20080020, 0x20080030,
 209     0x00090020, 0x00090030, 0x20090020, 0x20090030,
 210     0x00080820, 0x00080830, 0x20080820, 0x20080830,
 211     0x00090820, 0x00090830, 0x20090820, 0x20090830,
 212   },
 213   {
 214     0x00000000, 0x02000000, 0x00002000, 0x02002000,
 215     0x00200000, 0x02200000, 0x00202000, 0x02202000,
 216     0x00000004, 0x02000004, 0x00002004, 0x02002004,
 217     0x00200004, 0x02200004, 0x00202004, 0x02202004,
 218     0x00000400, 0x02000400, 0x00002400, 0x02002400,
 219     0x00200400, 0x02200400, 0x00202400, 0x02202400,
 220     0x00000404, 0x02000404, 0x00002404, 0x02002404,
 221     0x00200404, 0x02200404, 0x00202404, 0x02202404,
 222     0x10000000, 0x12000000, 0x10002000, 0x12002000,
 223     0x10200000, 0x12200000, 0x10202000, 0x12202000,
 224     0x10000004, 0x12000004, 0x10002004, 0x12002004,
 225     0x10200004, 0x12200004, 0x10202004, 0x12202004,
 226     0x10000400, 0x12000400, 0x10002400, 0x12002400,
 227     0x10200400, 0x12200400, 0x10202400, 0x12202400,
 228     0x10000404, 0x12000404, 0x10002404, 0x12002404,
 229     0x10200404, 0x12200404, 0x10202404, 0x12202404,
 230   },
 231   {
 232     0x00000000, 0x00000001, 0x00040000, 0x00040001,
 233     0x01000000, 0x01000001, 0x01040000, 0x01040001,
 234     0x00000002, 0x00000003, 0x00040002, 0x00040003,
 235     0x01000002, 0x01000003, 0x01040002, 0x01040003,
 236     0x00000200, 0x00000201, 0x00040200, 0x00040201,
 237     0x01000200, 0x01000201, 0x01040200, 0x01040201,
 238     0x00000202, 0x00000203, 0x00040202, 0x00040203,
 239     0x01000202, 0x01000203, 0x01040202, 0x01040203,
 240     0x08000000, 0x08000001, 0x08040000, 0x08040001,
 241     0x09000000, 0x09000001, 0x09040000, 0x09040001,
 242     0x08000002, 0x08000003, 0x08040002, 0x08040003,
 243     0x09000002, 0x09000003, 0x09040002, 0x09040003,
 244     0x08000200, 0x08000201, 0x08040200, 0x08040201,
 245     0x09000200, 0x09000201, 0x09040200, 0x09040201,
 246     0x08000202, 0x08000203, 0x08040202, 0x08040203,
 247     0x09000202, 0x09000203, 0x09040202, 0x09040203,
 248   },
 249   {
 250     0x00000000, 0x00100000, 0x00000100, 0x00100100,
 251     0x00000008, 0x00100008, 0x00000108, 0x00100108,
 252     0x00001000, 0x00101000, 0x00001100, 0x00101100,
 253     0x00001008, 0x00101008, 0x00001108, 0x00101108,
 254     0x04000000, 0x04100000, 0x04000100, 0x04100100,
 255     0x04000008, 0x04100008, 0x04000108, 0x04100108,
 256     0x04001000, 0x04101000, 0x04001100, 0x04101100,
 257     0x04001008, 0x04101008, 0x04001108, 0x04101108,
 258     0x00020000, 0x00120000, 0x00020100, 0x00120100,
 259     0x00020008, 0x00120008, 0x00020108, 0x00120108,
 260     0x00021000, 0x00121000, 0x00021100, 0x00121100,
 261     0x00021008, 0x00121008, 0x00021108, 0x00121108,
 262     0x04020000, 0x04120000, 0x04020100, 0x04120100,
 263     0x04020008, 0x04120008, 0x04020108, 0x04120108,
 264     0x04021000, 0x04121000, 0x04021100, 0x04121100,
 265     0x04021008, 0x04121008, 0x04021108, 0x04121108,
 266   },
 267   {
 268     0x00000000, 0x10000000, 0x00010000, 0x10010000,
 269     0x00000004, 0x10000004, 0x00010004, 0x10010004,
 270     0x20000000, 0x30000000, 0x20010000, 0x30010000,
 271     0x20000004, 0x30000004, 0x20010004, 0x30010004,
 272     0x00100000, 0x10100000, 0x00110000, 0x10110000,
 273     0x00100004, 0x10100004, 0x00110004, 0x10110004,
 274     0x20100000, 0x30100000, 0x20110000, 0x30110000,
 275     0x20100004, 0x30100004, 0x20110004, 0x30110004,
 276     0x00001000, 0x10001000, 0x00011000, 0x10011000,
 277     0x00001004, 0x10001004, 0x00011004, 0x10011004,
 278     0x20001000, 0x30001000, 0x20011000, 0x30011000,
 279     0x20001004, 0x30001004, 0x20011004, 0x30011004,
 280     0x00101000, 0x10101000, 0x00111000, 0x10111000,
 281     0x00101004, 0x10101004, 0x00111004, 0x10111004,
 282     0x20101000, 0x30101000, 0x20111000, 0x30111000,
 283     0x20101004, 0x30101004, 0x20111004, 0x30111004,
 284   },
 285   {
 286     0x00000000, 0x08000000, 0x00000008, 0x08000008,
 287     0x00000400, 0x08000400, 0x00000408, 0x08000408,
 288     0x00020000, 0x08020000, 0x00020008, 0x08020008,
 289     0x00020400, 0x08020400, 0x00020408, 0x08020408,
 290     0x00000001, 0x08000001, 0x00000009, 0x08000009,
 291     0x00000401, 0x08000401, 0x00000409, 0x08000409,
 292     0x00020001, 0x08020001, 0x00020009, 0x08020009,
 293     0x00020401, 0x08020401, 0x00020409, 0x08020409,
 294     0x02000000, 0x0A000000, 0x02000008, 0x0A000008,
 295     0x02000400, 0x0A000400, 0x02000408, 0x0A000408,
 296     0x02020000, 0x0A020000, 0x02020008, 0x0A020008,
 297     0x02020400, 0x0A020400, 0x02020408, 0x0A020408,
 298     0x02000001, 0x0A000001, 0x02000009, 0x0A000009,
 299     0x02000401, 0x0A000401, 0x02000409, 0x0A000409,
 300     0x02020001, 0x0A020001, 0x02020009, 0x0A020009,
 301     0x02020401, 0x0A020401, 0x02020409, 0x0A020409,
 302   },
 303   {
 304     0x00000000, 0x00000100, 0x00080000, 0x00080100,
 305     0x01000000, 0x01000100, 0x01080000, 0x01080100,
 306     0x00000010, 0x00000110, 0x00080010, 0x00080110,
 307     0x01000010, 0x01000110, 0x01080010, 0x01080110,
 308     0x00200000, 0x00200100, 0x00280000, 0x00280100,
 309     0x01200000, 0x01200100, 0x01280000, 0x01280100,
 310     0x00200010, 0x00200110, 0x00280010, 0x00280110,
 311     0x01200010, 0x01200110, 0x01280010, 0x01280110,
 312     0x00000200, 0x00000300, 0x00080200, 0x00080300,
 313     0x01000200, 0x01000300, 0x01080200, 0x01080300,
 314     0x00000210, 0x00000310, 0x00080210, 0x00080310,
 315     0x01000210, 0x01000310, 0x01080210, 0x01080310,
 316     0x00200200, 0x00200300, 0x00280200, 0x00280300,
 317     0x01200200, 0x01200300, 0x01280200, 0x01280300,
 318     0x00200210, 0x00200310, 0x00280210, 0x00280310,
 319     0x01200210, 0x01200310, 0x01280210, 0x01280310,
 320   },
 321   {
 322     0x00000000, 0x04000000, 0x00040000, 0x04040000,
 323     0x00000002, 0x04000002, 0x00040002, 0x04040002,
 324     0x00002000, 0x04002000, 0x00042000, 0x04042000,
 325     0x00002002, 0x04002002, 0x00042002, 0x04042002,
 326     0x00000020, 0x04000020, 0x00040020, 0x04040020,
 327     0x00000022, 0x04000022, 0x00040022, 0x04040022,
 328     0x00002020, 0x04002020, 0x00042020, 0x04042020,
 329     0x00002022, 0x04002022, 0x00042022, 0x04042022,
 330     0x00000800, 0x04000800, 0x00040800, 0x04040800,
 331     0x00000802, 0x04000802, 0x00040802, 0x04040802,
 332     0x00002800, 0x04002800, 0x00042800, 0x04042800,
 333     0x00002802, 0x04002802, 0x00042802, 0x04042802,
 334     0x00000820, 0x04000820, 0x00040820, 0x04040820,
 335     0x00000822, 0x04000822, 0x00040822, 0x04040822,
 336     0x00002820, 0x04002820, 0x00042820, 0x04042820,
 337     0x00002822, 0x04002822, 0x00042822, 0x04042822
 338   },
 339 };
 340
 341 #define BOX(i,n,S) (S)[(n)][(i)]
 342
 343 static void _des_crypt_keysetup (u32 c, u32 d, u32 Kc[16], u32 Kd[16], __local u32 s_skb[8][64])
 344 {
 345   u32 tt;
 346
 347   PERM_OP  (d, c, tt, 4, 0x0f0f0f0f);
 348   HPERM_OP (c,    tt, 2, 0xcccc0000);
 349   HPERM_OP (d,    tt, 2, 0xcccc0000);
 350   PERM_OP  (d, c, tt, 1, 0x55555555);
 351   PERM_OP  (c, d, tt, 8, 0x00ff00ff);
 352   PERM_OP  (d, c, tt, 1, 0x55555555);
 353
 354   d = ((d & 0x000000ff) << 16)
 355     | ((d & 0x0000ff00) <<  0)
 356     | ((d & 0x00ff0000) >> 16)
 357     | ((c & 0xf0000000) >>  4);
 358
 359   c = c & 0x0fffffff;
 360
 361   #pragma unroll
 362   for (u32 i = 0; i < 16; i++)
 363   {
 364     if ((i < 2) || (i == 8) || (i == 15))
 365     {
 366       c = ((c >> 1) | (c << 27));
 367       d = ((d >> 1) | (d << 27));
 368     }
 369     else
 370     {
 371       c = ((c >> 2) | (c << 26));
 372       d = ((d >> 2) | (d << 26));
 373     }
 374
 375     c = c & 0x0fffffff;
 376     d = d & 0x0fffffff;
 377
 378     const u32 c00 = (c >>  0) & 0x0000003f;
 379     const u32 c06 = (c >>  6) & 0x00383003;
 380     const u32 c07 = (c >>  7) & 0x0000003c;
 381     const u32 c13 = (c >> 13) & 0x0000060f;
 382     const u32 c20 = (c >> 20) & 0x00000001;
 383
 384     u32 s = BOX (((c00 >>  0) & 0xff), 0, s_skb)
 385           | BOX (((c06 >>  0) & 0xff)
 386                 |((c07 >>  0) & 0xff), 1, s_skb)
 387           | BOX (((c13 >>  0) & 0xff)
 388                 |((c06 >>  8) & 0xff), 2, s_skb)
 389           | BOX (((c20 >>  0) & 0xff)
 390                 |((c13 >>  8) & 0xff)
 391                 |((c06 >> 16) & 0xff), 3, s_skb);
 392
 393     const u32 d00 = (d >>  0) & 0x00003c3f;
 394     const u32 d07 = (d >>  7) & 0x00003f03;
 395     const u32 d21 = (d >> 21) & 0x0000000f;
 396     const u32 d22 = (d >> 22) & 0x00000030;
 397
 398     u32 t = BOX (((d00 >>  0) & 0xff), 4, s_skb)
 399           | BOX (((d07 >>  0) & 0xff)
 400                 |((d00 >>  8) & 0xff), 5, s_skb)
 401           | BOX (((d07 >>  8) & 0xff), 6, s_skb)
 402           | BOX (((d21 >>  0) & 0xff)
 403                 |((d22 >>  0) & 0xff), 7, s_skb);
 404
 405     Kc[i] = ((t << 16) | (s & 0x0000ffff));
 406     Kd[i] = ((s >> 16) | (t & 0xffff0000));
 407   }
 408 }
 409
 410 static void _des_crypt_encrypt (u32 iv[2], u32 mask, u32 Kc[16], u32 Kd[16], __local u32 s_SPtrans[8][64])
 411 {
 412   const u32 E1 = (mask >> 2) & 0x3f0;
 413   const u32 E0 = mask & 0x3f;
 414
 415   u32 r = 0;
 416   u32 l = 0;
 417
 418   for (u32 i = 0; i < 25; i++)
 419   {
 420     for (u32 j = 0; j < 16; j += 2)
 421     {
 422       u32 t;
 423       u32 u;
 424
 425       t = r ^ (r >> 16);
 426       u = t & E0;
 427       t = t & E1;
 428       u = u ^ (u << 16);
 429       u = u ^ r;
 430       u = u ^ Kc[j + 0];
 431       t = t ^ (t << 16);
 432       t = t ^ r;
 433       t = rotl32 (t, 28u);
 434       t = t ^ Kd[j + 0];
 435
 436       l ^= BOX (((u >>  0) & 0x3f), 0, s_SPtrans)
 437          | BOX (((u >>  8) & 0x3f), 2, s_SPtrans)
 438          | BOX (((u >> 16) & 0x3f), 4, s_SPtrans)
 439          | BOX (((u >> 24) & 0x3f), 6, s_SPtrans)
 440          | BOX (((t >>  0) & 0x3f), 1, s_SPtrans)
 441          | BOX (((t >>  8) & 0x3f), 3, s_SPtrans)
 442          | BOX (((t >> 16) & 0x3f), 5, s_SPtrans)
 443          | BOX (((t >> 24) & 0x3f), 7, s_SPtrans);
 444
 445       t = l ^ (l >> 16);
 446       u = t & E0;
 447       t = t & E1;
 448       u = u ^ (u << 16);
 449       u = u ^ l;
 450       u = u ^ Kc[j + 1];
 451       t = t ^ (t << 16);
 452       t = t ^ l;
 453       t = rotl32 (t, 28u);
 454       t = t ^ Kd[j + 1];
 455
 456       r ^= BOX (((u >>  0) & 0x3f), 0, s_SPtrans)
 457          | BOX (((u >>  8) & 0x3f), 2, s_SPtrans)
 458          | BOX (((u >> 16) & 0x3f), 4, s_SPtrans)
 459          | BOX (((u >> 24) & 0x3f), 6, s_SPtrans)
 460          | BOX (((t >>  0) & 0x3f), 1, s_SPtrans)
 461          | BOX (((t >>  8) & 0x3f), 3, s_SPtrans)
 462          | BOX (((t >> 16) & 0x3f), 5, s_SPtrans)
 463          | BOX (((t >> 24) & 0x3f), 7, s_SPtrans);
 464     }
 465
 466     u32 tt;
 467
 468     tt = l;
 469     l  = r;
 470     r  = tt;
 471   }
 472
 473   iv[0] = rotl32 (r, 31);
 474   iv[1] = rotl32 (l, 31);
 475 }
 476
 477 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_m04 (__global pw_t *pws, __global gpu_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 void *esalt_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 rules_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 478 {
 479   /**
 480    * modifier
 481    */
 482
 483   const u32 lid = get_local_id (0);
 484
 485   /**
 486    * base
 487    */
 488
 489   const u32 gid = get_global_id (0);
 490
 491   u32 pw_buf0[4];
 492
 493   pw_buf0[0] = pws[gid].i[ 0];
 494   pw_buf0[1] = pws[gid].i[ 1];
 495   pw_buf0[2] = 0;
 496   pw_buf0[3] = 0;
 497
 498   const u32 pw_len = pws[gid].pw_len;
 499
 500   /**
 501    * sbox, kbox
 502    */
 503
 504   __local u32 s_SPtrans[8][64];
 505   __local u32 s_skb[8][64];
 506
 507   s_SPtrans[0][lid] = c_SPtrans[0][lid];
 508   s_SPtrans[1][lid] = c_SPtrans[1][lid];
 509   s_SPtrans[2][lid] = c_SPtrans[2][lid];
 510   s_SPtrans[3][lid] = c_SPtrans[3][lid];
 511   s_SPtrans[4][lid] = c_SPtrans[4][lid];
 512   s_SPtrans[5][lid] = c_SPtrans[5][lid];
 513   s_SPtrans[6][lid] = c_SPtrans[6][lid];
 514   s_SPtrans[7][lid] = c_SPtrans[7][lid];
 515
 516   s_skb[0][lid] = c_skb[0][lid];
 517   s_skb[1][lid] = c_skb[1][lid];
 518   s_skb[2][lid] = c_skb[2][lid];
 519   s_skb[3][lid] = c_skb[3][lid];
 520   s_skb[4][lid] = c_skb[4][lid];
 521   s_skb[5][lid] = c_skb[5][lid];
 522   s_skb[6][lid] = c_skb[6][lid];
 523   s_skb[7][lid] = c_skb[7][lid];
 524
 525   barrier (CLK_LOCAL_MEM_FENCE);
 526
 527   if (gid >= gid_max) return;
 528
 529   /**
 530    * salt
 531    */
 532
 533   const u32 mask = salt_bufs[salt_pos].salt_buf[0];
 534
 535   /**
 536    * main
 537    */
 538
 539   for (u32 il_pos = 0; il_pos < rules_cnt; il_pos++)
 540   {
 541     u32 w0[4];
 542
 543     w0[0] = pw_buf0[0];
 544     w0[1] = pw_buf0[1];
 545     w0[2] = 0;
 546     w0[3] = 0;
 547
 548     u32 w1[4];
 549
 550     w1[0] = 0;
 551     w1[1] = 0;
 552     w1[2] = 0;
 553     w1[3] = 0;
 554
 555     u32 w2[4];
 556
 557     w2[0] = 0;
 558     w2[1] = 0;
 559     w2[2] = 0;
 560     w2[3] = 0;
 561
 562     u32 w3[4];
 563
 564     w3[0] = 0;
 565     w3[1] = 0;
 566     w3[2] = 0;
 567     w3[3] = 0;
 568
 569     u32 out_len = apply_rules (rules_buf[il_pos].cmds, w0, w1, pw_len);
 570
 571     out_len = (out_len >= 8) ? 8 : out_len;
 572
 573     u32 data[2];
 574
 575     data[0] = (w0[0] << 1) & 0xfefefefe;
 576     data[1] = (w0[1] << 1) & 0xfefefefe;
 577
 578     u32 Kc[16];
 579     u32 Kd[16];
 580
 581     _des_crypt_keysetup (data[0], data[1], Kc, Kd, s_skb);
 582
 583     u32 iv[2];
 584
 585     _des_crypt_encrypt (iv, mask, Kc, Kd, s_SPtrans);
 586
 587     const u32 r0 = iv[0];
 588     const u32 r1 = iv[1];
 589     const u32 r2 = 0;
 590     const u32 r3 = 0;
 591
 592     #include COMPARE_M
 593   }
 594 }
 595
 596 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_m08 (__global pw_t *pws, __global gpu_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 void *esalt_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 bfs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 597 {
 598 }
 599
 600 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_m16 (__global pw_t *pws, __global gpu_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 void *esalt_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 bfs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 601 {
 602 }
 603
 604 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_s04 (__global pw_t *pws, __global gpu_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 void *esalt_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 rules_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 605 {
 606   /**
 607    * modifier
 608    */
 609
 610   const u32 lid = get_local_id (0);
 611
 612   /**
 613    * base
 614    */
 615
 616   const u32 gid = get_global_id (0);
 617
 618   u32 pw_buf0[4];
 619
 620   pw_buf0[0] = pws[gid].i[ 0];
 621   pw_buf0[1] = pws[gid].i[ 1];
 622   pw_buf0[2] = 0;
 623   pw_buf0[3] = 0;
 624
 625   const u32 pw_len = pws[gid].pw_len;
 626
 627   /**
 628    * sbox, kbox
 629    */
 630
 631   __local u32 s_SPtrans[8][64];
 632   __local u32 s_skb[8][64];
 633
 634   s_SPtrans[0][lid] = c_SPtrans[0][lid];
 635   s_SPtrans[1][lid] = c_SPtrans[1][lid];
 636   s_SPtrans[2][lid] = c_SPtrans[2][lid];
 637   s_SPtrans[3][lid] = c_SPtrans[3][lid];
 638   s_SPtrans[4][lid] = c_SPtrans[4][lid];
 639   s_SPtrans[5][lid] = c_SPtrans[5][lid];
 640   s_SPtrans[6][lid] = c_SPtrans[6][lid];
 641   s_SPtrans[7][lid] = c_SPtrans[7][lid];
 642
 643   s_skb[0][lid] = c_skb[0][lid];
 644   s_skb[1][lid] = c_skb[1][lid];
 645   s_skb[2][lid] = c_skb[2][lid];
 646   s_skb[3][lid] = c_skb[3][lid];
 647   s_skb[4][lid] = c_skb[4][lid];
 648   s_skb[5][lid] = c_skb[5][lid];
 649   s_skb[6][lid] = c_skb[6][lid];
 650   s_skb[7][lid] = c_skb[7][lid];
 651
 652   barrier (CLK_LOCAL_MEM_FENCE);
 653
 654   if (gid >= gid_max) return;
 655
 656   /**
 657    * salt
 658    */
 659
 660   const u32 mask = salt_bufs[salt_pos].salt_buf[0];
 661
 662   /**
 663    * digest
 664    */
 665
 666   const u32 search[4] =
 667   {
 668     digests_buf[digests_offset].digest_buf[DGST_R0],
 669     digests_buf[digests_offset].digest_buf[DGST_R1],
 670     digests_buf[digests_offset].digest_buf[DGST_R2],
 671     digests_buf[digests_offset].digest_buf[DGST_R3]
 672   };
 673
 674   /**
 675    * main
 676    */
 677
 678   for (u32 il_pos = 0; il_pos < rules_cnt; il_pos++)
 679   {
 680     u32 w0[4];
 681
 682     w0[0] = pw_buf0[0];
 683     w0[1] = pw_buf0[1];
 684     w0[2] = 0;
 685     w0[3] = 0;
 686
 687     u32 w1[4];
 688
 689     w1[0] = 0;
 690     w1[1] = 0;
 691     w1[2] = 0;
 692     w1[3] = 0;
 693
 694     u32 w2[4];
 695
 696     w2[0] = 0;
 697     w2[1] = 0;
 698     w2[2] = 0;
 699     w2[3] = 0;
 700
 701     u32 w3[4];
 702
 703     w3[0] = 0;
 704     w3[1] = 0;
 705     w3[2] = 0;
 706     w3[3] = 0;
 707
 708     u32 out_len = apply_rules (rules_buf[il_pos].cmds, w0, w1, pw_len);
 709
 710     out_len = (out_len >= 8) ? 8 : out_len;
 711
 712     u32 data[2];
 713
 714     data[0] = (w0[0] << 1) & 0xfefefefe;
 715     data[1] = (w0[1] << 1) & 0xfefefefe;
 716
 717     u32 Kc[16];
 718     u32 Kd[16];
 719
 720     _des_crypt_keysetup (data[0], data[1], Kc, Kd, s_skb);
 721
 722     u32 iv[2];
 723
 724     _des_crypt_encrypt (iv, mask, Kc, Kd, s_SPtrans);
 725
 726     const u32 r0 = iv[0];
 727     const u32 r1 = iv[1];
 728     const u32 r2 = 0;
 729     const u32 r3 = 0;
 730
 731     #include COMPARE_S
 732   }
 733 }
 734
 735 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_s08 (__global pw_t *pws, __global gpu_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 void *esalt_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 bfs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 736 {
 737 }
 738
 739 __kernel void __attribute__((reqd_work_group_size (64, 1, 1))) m01500_s16 (__global pw_t *pws, __global gpu_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 void *esalt_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 bfs_cnt, const u32 digests_cnt, const u32 digests_offset, const u32 combs_mode, const u32 gid_max)
 740 {
 741 }