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_kernel.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 m01500_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 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 gid = get_global_id (0);
 484   const u32 lid = get_local_id (0);
 485   const u32 lsz = get_local_size (0);
 486
 487   /**
 488    * base
 489    */
 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   for (u32 i = lid; i < 64; i += lsz)
 508   {
 509     s_SPtrans[0][i] = c_SPtrans[0][i];
 510     s_SPtrans[1][i] = c_SPtrans[1][i];
 511     s_SPtrans[2][i] = c_SPtrans[2][i];
 512     s_SPtrans[3][i] = c_SPtrans[3][i];
 513     s_SPtrans[4][i] = c_SPtrans[4][i];
 514     s_SPtrans[5][i] = c_SPtrans[5][i];
 515     s_SPtrans[6][i] = c_SPtrans[6][i];
 516     s_SPtrans[7][i] = c_SPtrans[7][i];
 517
 518     s_skb[0][i] = c_skb[0][i];
 519     s_skb[1][i] = c_skb[1][i];
 520     s_skb[2][i] = c_skb[2][i];
 521     s_skb[3][i] = c_skb[3][i];
 522     s_skb[4][i] = c_skb[4][i];
 523     s_skb[5][i] = c_skb[5][i];
 524     s_skb[6][i] = c_skb[6][i];
 525     s_skb[7][i] = c_skb[7][i];
 526   }
 527
 528   barrier (CLK_LOCAL_MEM_FENCE);
 529
 530   if (gid >= gid_max) return;
 531
 532   /**
 533    * salt
 534    */
 535
 536   const u32 mask = salt_bufs[salt_pos].salt_buf[0];
 537
 538   /**
 539    * main
 540    */
 541
 542   for (u32 il_pos = 0; il_pos < rules_cnt; il_pos++)
 543   {
 544     u32 w0[4];
 545
 546     w0[0] = pw_buf0[0];
 547     w0[1] = pw_buf0[1];
 548     w0[2] = 0;
 549     w0[3] = 0;
 550
 551     u32 w1[4];
 552
 553     w1[0] = 0;
 554     w1[1] = 0;
 555     w1[2] = 0;
 556     w1[3] = 0;
 557
 558     u32 w2[4];
 559
 560     w2[0] = 0;
 561     w2[1] = 0;
 562     w2[2] = 0;
 563     w2[3] = 0;
 564
 565     u32 w3[4];
 566
 567     w3[0] = 0;
 568     w3[1] = 0;
 569     w3[2] = 0;
 570     w3[3] = 0;
 571
 572     u32 out_len = apply_rules (rules_buf[il_pos].cmds, w0, w1, pw_len);
 573
 574     out_len = (out_len >= 8) ? 8 : out_len;
 575
 576     u32 data[2];
 577
 578     data[0] = (w0[0] << 1) & 0xfefefefe;
 579     data[1] = (w0[1] << 1) & 0xfefefefe;
 580
 581     u32 Kc[16];
 582     u32 Kd[16];
 583
 584     _des_crypt_keysetup (data[0], data[1], Kc, Kd, s_skb);
 585
 586     u32 iv[2];
 587
 588     _des_crypt_encrypt (iv, mask, Kc, Kd, s_SPtrans);
 589
 590     const u32 r0 = iv[0];
 591     const u32 r1 = iv[1];
 592     const u32 r2 = 0;
 593     const u32 r3 = 0;
 594
 595     #include COMPARE_M
 596   }
 597 }
 598
 599 __kernel void m01500_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 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)
 600 {
 601 }
 602
 603 __kernel void m01500_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 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)
 604 {
 605 }
 606
 607 __kernel void m01500_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 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)
 608 {
 609   /**
 610    * modifier
 611    */
 612
 613   const u32 gid = get_global_id (0);
 614   const u32 lid = get_local_id (0);
 615   const u32 lsz = get_local_size (0);
 616
 617   /**
 618    * base
 619    */
 620
 621   u32 pw_buf0[4];
 622
 623   pw_buf0[0] = pws[gid].i[ 0];
 624   pw_buf0[1] = pws[gid].i[ 1];
 625   pw_buf0[2] = 0;
 626   pw_buf0[3] = 0;
 627
 628   const u32 pw_len = pws[gid].pw_len;
 629
 630   /**
 631    * sbox, kbox
 632    */
 633
 634   __local u32 s_SPtrans[8][64];
 635   __local u32 s_skb[8][64];
 636
 637   for (u32 i = lid; i < 64; i += lsz)
 638   {
 639     s_SPtrans[0][i] = c_SPtrans[0][i];
 640     s_SPtrans[1][i] = c_SPtrans[1][i];
 641     s_SPtrans[2][i] = c_SPtrans[2][i];
 642     s_SPtrans[3][i] = c_SPtrans[3][i];
 643     s_SPtrans[4][i] = c_SPtrans[4][i];
 644     s_SPtrans[5][i] = c_SPtrans[5][i];
 645     s_SPtrans[6][i] = c_SPtrans[6][i];
 646     s_SPtrans[7][i] = c_SPtrans[7][i];
 647
 648     s_skb[0][i] = c_skb[0][i];
 649     s_skb[1][i] = c_skb[1][i];
 650     s_skb[2][i] = c_skb[2][i];
 651     s_skb[3][i] = c_skb[3][i];
 652     s_skb[4][i] = c_skb[4][i];
 653     s_skb[5][i] = c_skb[5][i];
 654     s_skb[6][i] = c_skb[6][i];
 655     s_skb[7][i] = c_skb[7][i];
 656   }
 657
 658   barrier (CLK_LOCAL_MEM_FENCE);
 659
 660   if (gid >= gid_max) return;
 661
 662   /**
 663    * salt
 664    */
 665
 666   const u32 mask = salt_bufs[salt_pos].salt_buf[0];
 667
 668   /**
 669    * digest
 670    */
 671
 672   const u32 search[4] =
 673   {
 674     digests_buf[digests_offset].digest_buf[DGST_R0],
 675     digests_buf[digests_offset].digest_buf[DGST_R1],
 676     digests_buf[digests_offset].digest_buf[DGST_R2],
 677     digests_buf[digests_offset].digest_buf[DGST_R3]
 678   };
 679
 680   /**
 681    * main
 682    */
 683
 684   for (u32 il_pos = 0; il_pos < rules_cnt; il_pos++)
 685   {
 686     u32 w0[4];
 687
 688     w0[0] = pw_buf0[0];
 689     w0[1] = pw_buf0[1];
 690     w0[2] = 0;
 691     w0[3] = 0;
 692
 693     u32 w1[4];
 694
 695     w1[0] = 0;
 696     w1[1] = 0;
 697     w1[2] = 0;
 698     w1[3] = 0;
 699
 700     u32 w2[4];
 701
 702     w2[0] = 0;
 703     w2[1] = 0;
 704     w2[2] = 0;
 705     w2[3] = 0;
 706
 707     u32 w3[4];
 708
 709     w3[0] = 0;
 710     w3[1] = 0;
 711     w3[2] = 0;
 712     w3[3] = 0;
 713
 714     u32 out_len = apply_rules (rules_buf[il_pos].cmds, w0, w1, pw_len);
 715
 716     out_len = (out_len >= 8) ? 8 : out_len;
 717
 718     u32 data[2];
 719
 720     data[0] = (w0[0] << 1) & 0xfefefefe;
 721     data[1] = (w0[1] << 1) & 0xfefefefe;
 722
 723     u32 Kc[16];
 724     u32 Kd[16];
 725
 726     _des_crypt_keysetup (data[0], data[1], Kc, Kd, s_skb);
 727
 728     u32 iv[2];
 729
 730     _des_crypt_encrypt (iv, mask, Kc, Kd, s_SPtrans);
 731
 732     const u32 r0 = iv[0];
 733     const u32 r1 = iv[1];
 734     const u32 r2 = 0;
 735     const u32 r3 = 0;
 736
 737     #include COMPARE_S
 738   }
 739 }
 740
 741 __kernel void m01500_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 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)
 742 {
 743 }
 744
 745 __kernel void m01500_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 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)
 746 {
 747 }