Add hard-wired Device-Name for Tuning-Database which matches all Device-Types:
[hashcat.git] / src / shared.c
1 /**
2 * Authors.....: Jens Steube <jens.steube@gmail.com>
3 * Gabriele Gristina <matrix@hashcat.net>
4 * magnum <john.magnum@hushmail.com>
5 *
6 * License.....: MIT
7 */
8
9 #ifdef OSX
10 #include <stdio.h>
11 #endif
12
13 #include <shared.h>
14 #include <limits.h>
15
16 /**
17 * basic bit handling
18 */
19
20 u32 is_power_of_2(u32 v)
21 {
22 return (v && !(v & (v - 1)));
23 }
24
25 u32 rotl32 (const u32 a, const u32 n)
26 {
27 return ((a << n) | (a >> (32 - n)));
28 }
29
30 u32 rotr32 (const u32 a, const u32 n)
31 {
32 return ((a >> n) | (a << (32 - n)));
33 }
34
35 u64 rotl64 (const u64 a, const u64 n)
36 {
37 return ((a << n) | (a >> (64 - n)));
38 }
39
40 u64 rotr64 (const u64 a, const u64 n)
41 {
42 return ((a >> n) | (a << (64 - n)));
43 }
44
45 u32 byte_swap_32 (const u32 n)
46 {
47 return (n & 0xff000000) >> 24
48 | (n & 0x00ff0000) >> 8
49 | (n & 0x0000ff00) << 8
50 | (n & 0x000000ff) << 24;
51 }
52
53 u64 byte_swap_64 (const u64 n)
54 {
55 return (n & 0xff00000000000000ULL) >> 56
56 | (n & 0x00ff000000000000ULL) >> 40
57 | (n & 0x0000ff0000000000ULL) >> 24
58 | (n & 0x000000ff00000000ULL) >> 8
59 | (n & 0x00000000ff000000ULL) << 8
60 | (n & 0x0000000000ff0000ULL) << 24
61 | (n & 0x000000000000ff00ULL) << 40
62 | (n & 0x00000000000000ffULL) << 56;
63 }
64
65 /**
66 * ciphers for use on cpu
67 */
68
69 #include "cpu-des.c"
70 #include "cpu-aes.c"
71
72 /**
73 * hashes for use on cpu
74 */
75
76 #include "cpu-md5.c"
77 #include "cpu-sha256.c"
78
79 /**
80 * logging
81 */
82
83 int last_len = 0;
84
85 void log_final (FILE *fp, const char *fmt, va_list ap)
86 {
87 if (last_len)
88 {
89 fputc ('\r', fp);
90
91 for (int i = 0; i < last_len; i++)
92 {
93 fputc (' ', fp);
94 }
95
96 fputc ('\r', fp);
97 }
98
99 char s[4096] = { 0 };
100
101 int max_len = (int) sizeof (s);
102
103 int len = vsnprintf (s, max_len, fmt, ap);
104
105 if (len > max_len) len = max_len;
106
107 fwrite (s, len, 1, fp);
108
109 fflush (fp);
110
111 last_len = len;
112 }
113
114 void log_out_nn (FILE *fp, const char *fmt, ...)
115 {
116 if (SUPPRESS_OUTPUT) return;
117
118 va_list ap;
119
120 va_start (ap, fmt);
121
122 log_final (fp, fmt, ap);
123
124 va_end (ap);
125 }
126
127 void log_info_nn (const char *fmt, ...)
128 {
129 if (SUPPRESS_OUTPUT) return;
130
131 va_list ap;
132
133 va_start (ap, fmt);
134
135 log_final (stdout, fmt, ap);
136
137 va_end (ap);
138 }
139
140 void log_error_nn (const char *fmt, ...)
141 {
142 if (SUPPRESS_OUTPUT) return;
143
144 va_list ap;
145
146 va_start (ap, fmt);
147
148 log_final (stderr, fmt, ap);
149
150 va_end (ap);
151 }
152
153 void log_out (FILE *fp, const char *fmt, ...)
154 {
155 if (SUPPRESS_OUTPUT) return;
156
157 va_list ap;
158
159 va_start (ap, fmt);
160
161 log_final (fp, fmt, ap);
162
163 va_end (ap);
164
165 fputc ('\n', fp);
166
167 last_len = 0;
168 }
169
170 void log_info (const char *fmt, ...)
171 {
172 if (SUPPRESS_OUTPUT) return;
173
174 va_list ap;
175
176 va_start (ap, fmt);
177
178 log_final (stdout, fmt, ap);
179
180 va_end (ap);
181
182 fputc ('\n', stdout);
183
184 last_len = 0;
185 }
186
187 void log_error (const char *fmt, ...)
188 {
189 if (SUPPRESS_OUTPUT) return;
190
191 fputc ('\n', stderr);
192 fputc ('\n', stderr);
193
194 va_list ap;
195
196 va_start (ap, fmt);
197
198 log_final (stderr, fmt, ap);
199
200 va_end (ap);
201
202 fputc ('\n', stderr);
203 fputc ('\n', stderr);
204
205 last_len = 0;
206 }
207
208 /**
209 * converter
210 */
211
212 u8 int_to_base32 (const u8 c)
213 {
214 static const u8 tbl[0x20] =
215 {
216 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50,
217 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37,
218 };
219
220 return tbl[c];
221 }
222
223 u8 base32_to_int (const u8 c)
224 {
225 if ((c >= 'A') && (c <= 'Z')) return c - 'A';
226 else if ((c >= '2') && (c <= '7')) return c - '2' + 26;
227
228 return 0;
229 }
230
231 u8 int_to_itoa32 (const u8 c)
232 {
233 static const u8 tbl[0x20] =
234 {
235 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66,
236 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76,
237 };
238
239 return tbl[c];
240 }
241
242 u8 itoa32_to_int (const u8 c)
243 {
244 if ((c >= '0') && (c <= '9')) return c - '0';
245 else if ((c >= 'a') && (c <= 'v')) return c - 'a' + 10;
246
247 return 0;
248 }
249
250 u8 int_to_itoa64 (const u8 c)
251 {
252 static const u8 tbl[0x40] =
253 {
254 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x41, 0x42, 0x43, 0x44,
255 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50, 0x51, 0x52, 0x53, 0x54,
256 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a,
257 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a,
258 };
259
260 return tbl[c];
261 }
262
263 u8 itoa64_to_int (const u8 c)
264 {
265 static const u8 tbl[0x100] =
266 {
267 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21,
268 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31,
269 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 0x00, 0x01,
270 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a,
271 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a,
272 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x20, 0x21, 0x22, 0x23, 0x24,
273 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34,
274 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 0x00, 0x01, 0x02, 0x03, 0x04,
275 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14,
276 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21, 0x22, 0x23, 0x24,
277 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34,
278 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 0x00, 0x01, 0x02, 0x03, 0x04,
279 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14,
280 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21, 0x22, 0x23, 0x24,
281 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34,
282 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 0x00, 0x01, 0x02, 0x03, 0x04,
283 };
284
285 return tbl[c];
286 }
287
288 u8 int_to_base64 (const u8 c)
289 {
290 static const u8 tbl[0x40] =
291 {
292 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e, 0x4f, 0x50,
293 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x61, 0x62, 0x63, 0x64, 0x65, 0x66,
294 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75, 0x76,
295 0x77, 0x78, 0x79, 0x7a, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x2b, 0x2f,
296 };
297
298 return tbl[c];
299 }
300
301 u8 base64_to_int (const u8 c)
302 {
303 static const u8 tbl[0x100] =
304 {
305 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
306 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
307 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x3e, 0x00, 0x00, 0x00, 0x3f,
308 0x34, 0x35, 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
309 0x00, 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e,
310 0x0f, 0x10, 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x00, 0x00, 0x00, 0x00, 0x00,
311 0x00, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28,
312 0x29, 0x2a, 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x00, 0x00, 0x00, 0x00, 0x00,
313 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
314 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
315 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
316 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
317 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
318 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
319 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
320 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
321 };
322
323 return tbl[c];
324 }
325
326 u8 int_to_bf64 (const u8 c)
327 {
328 static const u8 tbl[0x40] =
329 {
330 0x2e, 0x2f, 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x4a, 0x4b, 0x4c, 0x4d, 0x4e,
331 0x4f, 0x50, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57, 0x58, 0x59, 0x5a, 0x61, 0x62, 0x63, 0x64,
332 0x65, 0x66, 0x67, 0x68, 0x69, 0x6a, 0x6b, 0x6c, 0x6d, 0x6e, 0x6f, 0x70, 0x71, 0x72, 0x73, 0x74,
333 0x75, 0x76, 0x77, 0x78, 0x79, 0x7a, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x36, 0x37, 0x38, 0x39,
334 };
335
336 return tbl[c];
337 }
338
339 u8 bf64_to_int (const u8 c)
340 {
341 static const u8 tbl[0x100] =
342 {
343 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
344 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
345 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01,
346 0x36, 0x37, 0x38, 0x39, 0x3a, 0x3b, 0x3c, 0x3d, 0x3e, 0x3f, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
347 0x00, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07, 0x08, 0x09, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0x10,
348 0x11, 0x12, 0x13, 0x14, 0x15, 0x16, 0x17, 0x18, 0x19, 0x1a, 0x1b, 0x00, 0x00, 0x00, 0x00, 0x00,
349 0x00, 0x1c, 0x1d, 0x1e, 0x1f, 0x20, 0x21, 0x22, 0x23, 0x24, 0x25, 0x26, 0x27, 0x28, 0x29, 0x2a,
350 0x2b, 0x2c, 0x2d, 0x2e, 0x2f, 0x30, 0x31, 0x32, 0x33, 0x34, 0x35, 0x00, 0x00, 0x00, 0x00, 0x00,
351 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
352 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
353 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
354 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
355 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
356 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
357 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
358 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
359 };
360
361 return tbl[c];
362 }
363
364 u8 int_to_lotus64 (const u8 c)
365 {
366 if (c < 10) return '0' + c;
367 else if (c < 36) return 'A' + c - 10;
368 else if (c < 62) return 'a' + c - 36;
369 else if (c == 62) return '+';
370 else if (c == 63) return '/';
371
372 return 0;
373 }
374
375 u8 lotus64_to_int (const u8 c)
376 {
377 if ((c >= '0') && (c <= '9')) return c - '0';
378 else if ((c >= 'A') && (c <= 'Z')) return c - 'A' + 10;
379 else if ((c >= 'a') && (c <= 'z')) return c - 'a' + 36;
380 else if (c == '+') return 62;
381 else if (c == '/') return 63;
382 else
383
384 return 0;
385 }
386
387 int base32_decode (u8 (*f) (const u8), const u8 *in_buf, int in_len, u8 *out_buf)
388 {
389 const u8 *in_ptr = in_buf;
390
391 u8 *out_ptr = out_buf;
392
393 for (int i = 0; i < in_len; i += 8)
394 {
395 const u8 out_val0 = f (in_ptr[0] & 0x7f);
396 const u8 out_val1 = f (in_ptr[1] & 0x7f);
397 const u8 out_val2 = f (in_ptr[2] & 0x7f);
398 const u8 out_val3 = f (in_ptr[3] & 0x7f);
399 const u8 out_val4 = f (in_ptr[4] & 0x7f);
400 const u8 out_val5 = f (in_ptr[5] & 0x7f);
401 const u8 out_val6 = f (in_ptr[6] & 0x7f);
402 const u8 out_val7 = f (in_ptr[7] & 0x7f);
403
404 out_ptr[0] = ((out_val0 << 3) & 0xf8) | ((out_val1 >> 2) & 0x07);
405 out_ptr[1] = ((out_val1 << 6) & 0xc0) | ((out_val2 << 1) & 0x3e) | ((out_val3 >> 4) & 0x01);
406 out_ptr[2] = ((out_val3 << 4) & 0xf0) | ((out_val4 >> 1) & 0x0f);
407 out_ptr[3] = ((out_val4 << 7) & 0x80) | ((out_val5 << 2) & 0x7c) | ((out_val6 >> 3) & 0x03);
408 out_ptr[4] = ((out_val6 << 5) & 0xe0) | ((out_val7 >> 0) & 0x1f);
409
410 in_ptr += 8;
411 out_ptr += 5;
412 }
413
414 for (int i = 0; i < in_len; i++)
415 {
416 if (in_buf[i] != '=') continue;
417
418 in_len = i;
419 }
420
421 int out_len = (in_len * 5) / 8;
422
423 return out_len;
424 }
425
426 int base32_encode (u8 (*f) (const u8), const u8 *in_buf, int in_len, u8 *out_buf)
427 {
428 const u8 *in_ptr = in_buf;
429
430 u8 *out_ptr = out_buf;
431
432 for (int i = 0; i < in_len; i += 5)
433 {
434 const u8 out_val0 = f ( ((in_ptr[0] >> 3) & 0x1f));
435 const u8 out_val1 = f (((in_ptr[0] << 2) & 0x1c) | ((in_ptr[1] >> 6) & 0x03));
436 const u8 out_val2 = f ( ((in_ptr[1] >> 1) & 0x1f));
437 const u8 out_val3 = f (((in_ptr[1] << 4) & 0x10) | ((in_ptr[2] >> 4) & 0x0f));
438 const u8 out_val4 = f (((in_ptr[2] << 1) & 0x1e) | ((in_ptr[3] >> 7) & 0x01));
439 const u8 out_val5 = f ( ((in_ptr[3] >> 2) & 0x1f));
440 const u8 out_val6 = f (((in_ptr[3] << 3) & 0x18) | ((in_ptr[4] >> 5) & 0x07));
441 const u8 out_val7 = f ( ((in_ptr[4] >> 0) & 0x1f));
442
443 out_ptr[0] = out_val0 & 0x7f;
444 out_ptr[1] = out_val1 & 0x7f;
445 out_ptr[2] = out_val2 & 0x7f;
446 out_ptr[3] = out_val3 & 0x7f;
447 out_ptr[4] = out_val4 & 0x7f;
448 out_ptr[5] = out_val5 & 0x7f;
449 out_ptr[6] = out_val6 & 0x7f;
450 out_ptr[7] = out_val7 & 0x7f;
451
452 in_ptr += 5;
453 out_ptr += 8;
454 }
455
456 int out_len = (int) (((0.5 + (float) in_len) * 8) / 5); // ceil (in_len * 8 / 5)
457
458 while (out_len % 8)
459 {
460 out_buf[out_len] = '=';
461
462 out_len++;
463 }
464
465 return out_len;
466 }
467
468 int base64_decode (u8 (*f) (const u8), const u8 *in_buf, int in_len, u8 *out_buf)
469 {
470 const u8 *in_ptr = in_buf;
471
472 u8 *out_ptr = out_buf;
473
474 for (int i = 0; i < in_len; i += 4)
475 {
476 const u8 out_val0 = f (in_ptr[0] & 0x7f);
477 const u8 out_val1 = f (in_ptr[1] & 0x7f);
478 const u8 out_val2 = f (in_ptr[2] & 0x7f);
479 const u8 out_val3 = f (in_ptr[3] & 0x7f);
480
481 out_ptr[0] = ((out_val0 << 2) & 0xfc) | ((out_val1 >> 4) & 0x03);
482 out_ptr[1] = ((out_val1 << 4) & 0xf0) | ((out_val2 >> 2) & 0x0f);
483 out_ptr[2] = ((out_val2 << 6) & 0xc0) | ((out_val3 >> 0) & 0x3f);
484
485 in_ptr += 4;
486 out_ptr += 3;
487 }
488
489 for (int i = 0; i < in_len; i++)
490 {
491 if (in_buf[i] != '=') continue;
492
493 in_len = i;
494 }
495
496 int out_len = (in_len * 6) / 8;
497
498 return out_len;
499 }
500
501 int base64_encode (u8 (*f) (const u8), const u8 *in_buf, int in_len, u8 *out_buf)
502 {
503 const u8 *in_ptr = in_buf;
504
505 u8 *out_ptr = out_buf;
506
507 for (int i = 0; i < in_len; i += 3)
508 {
509 const u8 out_val0 = f ( ((in_ptr[0] >> 2) & 0x3f));
510 const u8 out_val1 = f (((in_ptr[0] << 4) & 0x30) | ((in_ptr[1] >> 4) & 0x0f));
511 const u8 out_val2 = f (((in_ptr[1] << 2) & 0x3c) | ((in_ptr[2] >> 6) & 0x03));
512 const u8 out_val3 = f ( ((in_ptr[2] >> 0) & 0x3f));
513
514 out_ptr[0] = out_val0 & 0x7f;
515 out_ptr[1] = out_val1 & 0x7f;
516 out_ptr[2] = out_val2 & 0x7f;
517 out_ptr[3] = out_val3 & 0x7f;
518
519 in_ptr += 3;
520 out_ptr += 4;
521 }
522
523 int out_len = (int) (((0.5 + (float) in_len) * 8) / 6); // ceil (in_len * 8 / 6)
524
525 while (out_len % 4)
526 {
527 out_buf[out_len] = '=';
528
529 out_len++;
530 }
531
532 return out_len;
533 }
534
535 int is_valid_hex_char (const u8 c)
536 {
537 if ((c >= '0') && (c <= '9')) return 1;
538 if ((c >= 'A') && (c <= 'F')) return 1;
539 if ((c >= 'a') && (c <= 'f')) return 1;
540
541 return 0;
542 }
543
544 u8 hex_convert (const u8 c)
545 {
546 return (c & 15) + (c >> 6) * 9;
547 }
548
549 u8 hex_to_u8 (const u8 hex[2])
550 {
551 u8 v = 0;
552
553 v |= (hex_convert (hex[1]) << 0);
554 v |= (hex_convert (hex[0]) << 4);
555
556 return (v);
557 }
558
559 u32 hex_to_u32 (const u8 hex[8])
560 {
561 u32 v = 0;
562
563 v |= ((u32) hex_convert (hex[7])) << 0;
564 v |= ((u32) hex_convert (hex[6])) << 4;
565 v |= ((u32) hex_convert (hex[5])) << 8;
566 v |= ((u32) hex_convert (hex[4])) << 12;
567 v |= ((u32) hex_convert (hex[3])) << 16;
568 v |= ((u32) hex_convert (hex[2])) << 20;
569 v |= ((u32) hex_convert (hex[1])) << 24;
570 v |= ((u32) hex_convert (hex[0])) << 28;
571
572 return (v);
573 }
574
575 u64 hex_to_u64 (const u8 hex[16])
576 {
577 u64 v = 0;
578
579 v |= ((u64) hex_convert (hex[15]) << 0);
580 v |= ((u64) hex_convert (hex[14]) << 4);
581 v |= ((u64) hex_convert (hex[13]) << 8);
582 v |= ((u64) hex_convert (hex[12]) << 12);
583 v |= ((u64) hex_convert (hex[11]) << 16);
584 v |= ((u64) hex_convert (hex[10]) << 20);
585 v |= ((u64) hex_convert (hex[ 9]) << 24);
586 v |= ((u64) hex_convert (hex[ 8]) << 28);
587 v |= ((u64) hex_convert (hex[ 7]) << 32);
588 v |= ((u64) hex_convert (hex[ 6]) << 36);
589 v |= ((u64) hex_convert (hex[ 5]) << 40);
590 v |= ((u64) hex_convert (hex[ 4]) << 44);
591 v |= ((u64) hex_convert (hex[ 3]) << 48);
592 v |= ((u64) hex_convert (hex[ 2]) << 52);
593 v |= ((u64) hex_convert (hex[ 1]) << 56);
594 v |= ((u64) hex_convert (hex[ 0]) << 60);
595
596 return (v);
597 }
598
599 void bin_to_hex_lower (const u32 v, u8 hex[8])
600 {
601 hex[0] = v >> 28 & 15;
602 hex[1] = v >> 24 & 15;
603 hex[2] = v >> 20 & 15;
604 hex[3] = v >> 16 & 15;
605 hex[4] = v >> 12 & 15;
606 hex[5] = v >> 8 & 15;
607 hex[6] = v >> 4 & 15;
608 hex[7] = v >> 0 & 15;
609
610 u32 add;
611
612 hex[0] += 6; add = ((hex[0] & 0x10) >> 4) * 39; hex[0] += 42 + add;
613 hex[1] += 6; add = ((hex[1] & 0x10) >> 4) * 39; hex[1] += 42 + add;
614 hex[2] += 6; add = ((hex[2] & 0x10) >> 4) * 39; hex[2] += 42 + add;
615 hex[3] += 6; add = ((hex[3] & 0x10) >> 4) * 39; hex[3] += 42 + add;
616 hex[4] += 6; add = ((hex[4] & 0x10) >> 4) * 39; hex[4] += 42 + add;
617 hex[5] += 6; add = ((hex[5] & 0x10) >> 4) * 39; hex[5] += 42 + add;
618 hex[6] += 6; add = ((hex[6] & 0x10) >> 4) * 39; hex[6] += 42 + add;
619 hex[7] += 6; add = ((hex[7] & 0x10) >> 4) * 39; hex[7] += 42 + add;
620 }
621
622 /**
623 * decoder
624 */
625
626 static void AES128_decrypt_cbc (const u32 key[4], const u32 iv[4], const u32 in[16], u32 out[16])
627 {
628 AES_KEY skey;
629
630 AES_set_decrypt_key ((const u8 *) key, 128, &skey);
631
632 u32 _iv[4] = { 0 };
633
634 _iv[0] = iv[0];
635 _iv[1] = iv[1];
636 _iv[2] = iv[2];
637 _iv[3] = iv[3];
638
639 for (int i = 0; i < 16; i += 4)
640 {
641 u32 _in[4] = { 0 };
642 u32 _out[4] = { 0 };
643
644 _in[0] = in[i + 0];
645 _in[1] = in[i + 1];
646 _in[2] = in[i + 2];
647 _in[3] = in[i + 3];
648
649 AES_decrypt (&skey, (const u8 *) _in, (u8 *) _out);
650
651 _out[0] ^= _iv[0];
652 _out[1] ^= _iv[1];
653 _out[2] ^= _iv[2];
654 _out[3] ^= _iv[3];
655
656 out[i + 0] = _out[0];
657 out[i + 1] = _out[1];
658 out[i + 2] = _out[2];
659 out[i + 3] = _out[3];
660
661 _iv[0] = _in[0];
662 _iv[1] = _in[1];
663 _iv[2] = _in[2];
664 _iv[3] = _in[3];
665 }
666 }
667
668 static void juniper_decrypt_hash (char *in, char *out)
669 {
670 // base64 decode
671
672 u8 base64_buf[100] = { 0 };
673
674 base64_decode (base64_to_int, (const u8 *) in, DISPLAY_LEN_MIN_501, base64_buf);
675
676 // iv stuff
677
678 u32 juniper_iv[4] = { 0 };
679
680 memcpy (juniper_iv, base64_buf, 12);
681
682 memcpy (out, juniper_iv, 12);
683
684 // reversed key
685
686 u32 juniper_key[4] = { 0 };
687
688 juniper_key[0] = byte_swap_32 (0xa6707a7e);
689 juniper_key[1] = byte_swap_32 (0x8df91059);
690 juniper_key[2] = byte_swap_32 (0xdea70ae5);
691 juniper_key[3] = byte_swap_32 (0x2f9c2442);
692
693 // AES decrypt
694
695 u32 *in_ptr = (u32 *) (base64_buf + 12);
696 u32 *out_ptr = (u32 *) (out + 12);
697
698 AES128_decrypt_cbc (juniper_key, juniper_iv, in_ptr, out_ptr);
699 }
700
701 void phpass_decode (u8 digest[16], u8 buf[22])
702 {
703 int l;
704
705 l = itoa64_to_int (buf[ 0]) << 0;
706 l |= itoa64_to_int (buf[ 1]) << 6;
707 l |= itoa64_to_int (buf[ 2]) << 12;
708 l |= itoa64_to_int (buf[ 3]) << 18;
709
710 digest[ 0] = (l >> 0) & 0xff;
711 digest[ 1] = (l >> 8) & 0xff;
712 digest[ 2] = (l >> 16) & 0xff;
713
714 l = itoa64_to_int (buf[ 4]) << 0;
715 l |= itoa64_to_int (buf[ 5]) << 6;
716 l |= itoa64_to_int (buf[ 6]) << 12;
717 l |= itoa64_to_int (buf[ 7]) << 18;
718
719 digest[ 3] = (l >> 0) & 0xff;
720 digest[ 4] = (l >> 8) & 0xff;
721 digest[ 5] = (l >> 16) & 0xff;
722
723 l = itoa64_to_int (buf[ 8]) << 0;
724 l |= itoa64_to_int (buf[ 9]) << 6;
725 l |= itoa64_to_int (buf[10]) << 12;
726 l |= itoa64_to_int (buf[11]) << 18;
727
728 digest[ 6] = (l >> 0) & 0xff;
729 digest[ 7] = (l >> 8) & 0xff;
730 digest[ 8] = (l >> 16) & 0xff;
731
732 l = itoa64_to_int (buf[12]) << 0;
733 l |= itoa64_to_int (buf[13]) << 6;
734 l |= itoa64_to_int (buf[14]) << 12;
735 l |= itoa64_to_int (buf[15]) << 18;
736
737 digest[ 9] = (l >> 0) & 0xff;
738 digest[10] = (l >> 8) & 0xff;
739 digest[11] = (l >> 16) & 0xff;
740
741 l = itoa64_to_int (buf[16]) << 0;
742 l |= itoa64_to_int (buf[17]) << 6;
743 l |= itoa64_to_int (buf[18]) << 12;
744 l |= itoa64_to_int (buf[19]) << 18;
745
746 digest[12] = (l >> 0) & 0xff;
747 digest[13] = (l >> 8) & 0xff;
748 digest[14] = (l >> 16) & 0xff;
749
750 l = itoa64_to_int (buf[20]) << 0;
751 l |= itoa64_to_int (buf[21]) << 6;
752
753 digest[15] = (l >> 0) & 0xff;
754 }
755
756 void phpass_encode (u8 digest[16], u8 buf[22])
757 {
758 int l;
759
760 l = (digest[ 0] << 0) | (digest[ 1] << 8) | (digest[ 2] << 16);
761
762 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
763 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
764 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
765 buf[ 3] = int_to_itoa64 (l & 0x3f);
766
767 l = (digest[ 3] << 0) | (digest[ 4] << 8) | (digest[ 5] << 16);
768
769 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
770 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
771 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
772 buf[ 7] = int_to_itoa64 (l & 0x3f);
773
774 l = (digest[ 6] << 0) | (digest[ 7] << 8) | (digest[ 8] << 16);
775
776 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
777 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
778 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
779 buf[11] = int_to_itoa64 (l & 0x3f);
780
781 l = (digest[ 9] << 0) | (digest[10] << 8) | (digest[11] << 16);
782
783 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
784 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
785 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
786 buf[15] = int_to_itoa64 (l & 0x3f);
787
788 l = (digest[12] << 0) | (digest[13] << 8) | (digest[14] << 16);
789
790 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
791 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
792 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
793 buf[19] = int_to_itoa64 (l & 0x3f);
794
795 l = (digest[15] << 0);
796
797 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
798 buf[21] = int_to_itoa64 (l & 0x3f);
799 }
800
801 void md5crypt_decode (u8 digest[16], u8 buf[22])
802 {
803 int l;
804
805 l = itoa64_to_int (buf[ 0]) << 0;
806 l |= itoa64_to_int (buf[ 1]) << 6;
807 l |= itoa64_to_int (buf[ 2]) << 12;
808 l |= itoa64_to_int (buf[ 3]) << 18;
809
810 digest[ 0] = (l >> 16) & 0xff;
811 digest[ 6] = (l >> 8) & 0xff;
812 digest[12] = (l >> 0) & 0xff;
813
814 l = itoa64_to_int (buf[ 4]) << 0;
815 l |= itoa64_to_int (buf[ 5]) << 6;
816 l |= itoa64_to_int (buf[ 6]) << 12;
817 l |= itoa64_to_int (buf[ 7]) << 18;
818
819 digest[ 1] = (l >> 16) & 0xff;
820 digest[ 7] = (l >> 8) & 0xff;
821 digest[13] = (l >> 0) & 0xff;
822
823 l = itoa64_to_int (buf[ 8]) << 0;
824 l |= itoa64_to_int (buf[ 9]) << 6;
825 l |= itoa64_to_int (buf[10]) << 12;
826 l |= itoa64_to_int (buf[11]) << 18;
827
828 digest[ 2] = (l >> 16) & 0xff;
829 digest[ 8] = (l >> 8) & 0xff;
830 digest[14] = (l >> 0) & 0xff;
831
832 l = itoa64_to_int (buf[12]) << 0;
833 l |= itoa64_to_int (buf[13]) << 6;
834 l |= itoa64_to_int (buf[14]) << 12;
835 l |= itoa64_to_int (buf[15]) << 18;
836
837 digest[ 3] = (l >> 16) & 0xff;
838 digest[ 9] = (l >> 8) & 0xff;
839 digest[15] = (l >> 0) & 0xff;
840
841 l = itoa64_to_int (buf[16]) << 0;
842 l |= itoa64_to_int (buf[17]) << 6;
843 l |= itoa64_to_int (buf[18]) << 12;
844 l |= itoa64_to_int (buf[19]) << 18;
845
846 digest[ 4] = (l >> 16) & 0xff;
847 digest[10] = (l >> 8) & 0xff;
848 digest[ 5] = (l >> 0) & 0xff;
849
850 l = itoa64_to_int (buf[20]) << 0;
851 l |= itoa64_to_int (buf[21]) << 6;
852
853 digest[11] = (l >> 0) & 0xff;
854 }
855
856 void md5crypt_encode (u8 digest[16], u8 buf[22])
857 {
858 int l;
859
860 l = (digest[ 0] << 16) | (digest[ 6] << 8) | (digest[12] << 0);
861
862 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
863 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
864 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
865 buf[ 3] = int_to_itoa64 (l & 0x3f); l >>= 6;
866
867 l = (digest[ 1] << 16) | (digest[ 7] << 8) | (digest[13] << 0);
868
869 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
870 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
871 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
872 buf[ 7] = int_to_itoa64 (l & 0x3f); l >>= 6;
873
874 l = (digest[ 2] << 16) | (digest[ 8] << 8) | (digest[14] << 0);
875
876 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
877 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
878 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
879 buf[11] = int_to_itoa64 (l & 0x3f); l >>= 6;
880
881 l = (digest[ 3] << 16) | (digest[ 9] << 8) | (digest[15] << 0);
882
883 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
884 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
885 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
886 buf[15] = int_to_itoa64 (l & 0x3f); l >>= 6;
887
888 l = (digest[ 4] << 16) | (digest[10] << 8) | (digest[ 5] << 0);
889
890 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
891 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
892 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
893 buf[19] = int_to_itoa64 (l & 0x3f); l >>= 6;
894
895 l = (digest[11] << 0);
896
897 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
898 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
899 }
900
901 void sha512crypt_decode (u8 digest[64], u8 buf[86])
902 {
903 int l;
904
905 l = itoa64_to_int (buf[ 0]) << 0;
906 l |= itoa64_to_int (buf[ 1]) << 6;
907 l |= itoa64_to_int (buf[ 2]) << 12;
908 l |= itoa64_to_int (buf[ 3]) << 18;
909
910 digest[ 0] = (l >> 16) & 0xff;
911 digest[21] = (l >> 8) & 0xff;
912 digest[42] = (l >> 0) & 0xff;
913
914 l = itoa64_to_int (buf[ 4]) << 0;
915 l |= itoa64_to_int (buf[ 5]) << 6;
916 l |= itoa64_to_int (buf[ 6]) << 12;
917 l |= itoa64_to_int (buf[ 7]) << 18;
918
919 digest[22] = (l >> 16) & 0xff;
920 digest[43] = (l >> 8) & 0xff;
921 digest[ 1] = (l >> 0) & 0xff;
922
923 l = itoa64_to_int (buf[ 8]) << 0;
924 l |= itoa64_to_int (buf[ 9]) << 6;
925 l |= itoa64_to_int (buf[10]) << 12;
926 l |= itoa64_to_int (buf[11]) << 18;
927
928 digest[44] = (l >> 16) & 0xff;
929 digest[ 2] = (l >> 8) & 0xff;
930 digest[23] = (l >> 0) & 0xff;
931
932 l = itoa64_to_int (buf[12]) << 0;
933 l |= itoa64_to_int (buf[13]) << 6;
934 l |= itoa64_to_int (buf[14]) << 12;
935 l |= itoa64_to_int (buf[15]) << 18;
936
937 digest[ 3] = (l >> 16) & 0xff;
938 digest[24] = (l >> 8) & 0xff;
939 digest[45] = (l >> 0) & 0xff;
940
941 l = itoa64_to_int (buf[16]) << 0;
942 l |= itoa64_to_int (buf[17]) << 6;
943 l |= itoa64_to_int (buf[18]) << 12;
944 l |= itoa64_to_int (buf[19]) << 18;
945
946 digest[25] = (l >> 16) & 0xff;
947 digest[46] = (l >> 8) & 0xff;
948 digest[ 4] = (l >> 0) & 0xff;
949
950 l = itoa64_to_int (buf[20]) << 0;
951 l |= itoa64_to_int (buf[21]) << 6;
952 l |= itoa64_to_int (buf[22]) << 12;
953 l |= itoa64_to_int (buf[23]) << 18;
954
955 digest[47] = (l >> 16) & 0xff;
956 digest[ 5] = (l >> 8) & 0xff;
957 digest[26] = (l >> 0) & 0xff;
958
959 l = itoa64_to_int (buf[24]) << 0;
960 l |= itoa64_to_int (buf[25]) << 6;
961 l |= itoa64_to_int (buf[26]) << 12;
962 l |= itoa64_to_int (buf[27]) << 18;
963
964 digest[ 6] = (l >> 16) & 0xff;
965 digest[27] = (l >> 8) & 0xff;
966 digest[48] = (l >> 0) & 0xff;
967
968 l = itoa64_to_int (buf[28]) << 0;
969 l |= itoa64_to_int (buf[29]) << 6;
970 l |= itoa64_to_int (buf[30]) << 12;
971 l |= itoa64_to_int (buf[31]) << 18;
972
973 digest[28] = (l >> 16) & 0xff;
974 digest[49] = (l >> 8) & 0xff;
975 digest[ 7] = (l >> 0) & 0xff;
976
977 l = itoa64_to_int (buf[32]) << 0;
978 l |= itoa64_to_int (buf[33]) << 6;
979 l |= itoa64_to_int (buf[34]) << 12;
980 l |= itoa64_to_int (buf[35]) << 18;
981
982 digest[50] = (l >> 16) & 0xff;
983 digest[ 8] = (l >> 8) & 0xff;
984 digest[29] = (l >> 0) & 0xff;
985
986 l = itoa64_to_int (buf[36]) << 0;
987 l |= itoa64_to_int (buf[37]) << 6;
988 l |= itoa64_to_int (buf[38]) << 12;
989 l |= itoa64_to_int (buf[39]) << 18;
990
991 digest[ 9] = (l >> 16) & 0xff;
992 digest[30] = (l >> 8) & 0xff;
993 digest[51] = (l >> 0) & 0xff;
994
995 l = itoa64_to_int (buf[40]) << 0;
996 l |= itoa64_to_int (buf[41]) << 6;
997 l |= itoa64_to_int (buf[42]) << 12;
998 l |= itoa64_to_int (buf[43]) << 18;
999
1000 digest[31] = (l >> 16) & 0xff;
1001 digest[52] = (l >> 8) & 0xff;
1002 digest[10] = (l >> 0) & 0xff;
1003
1004 l = itoa64_to_int (buf[44]) << 0;
1005 l |= itoa64_to_int (buf[45]) << 6;
1006 l |= itoa64_to_int (buf[46]) << 12;
1007 l |= itoa64_to_int (buf[47]) << 18;
1008
1009 digest[53] = (l >> 16) & 0xff;
1010 digest[11] = (l >> 8) & 0xff;
1011 digest[32] = (l >> 0) & 0xff;
1012
1013 l = itoa64_to_int (buf[48]) << 0;
1014 l |= itoa64_to_int (buf[49]) << 6;
1015 l |= itoa64_to_int (buf[50]) << 12;
1016 l |= itoa64_to_int (buf[51]) << 18;
1017
1018 digest[12] = (l >> 16) & 0xff;
1019 digest[33] = (l >> 8) & 0xff;
1020 digest[54] = (l >> 0) & 0xff;
1021
1022 l = itoa64_to_int (buf[52]) << 0;
1023 l |= itoa64_to_int (buf[53]) << 6;
1024 l |= itoa64_to_int (buf[54]) << 12;
1025 l |= itoa64_to_int (buf[55]) << 18;
1026
1027 digest[34] = (l >> 16) & 0xff;
1028 digest[55] = (l >> 8) & 0xff;
1029 digest[13] = (l >> 0) & 0xff;
1030
1031 l = itoa64_to_int (buf[56]) << 0;
1032 l |= itoa64_to_int (buf[57]) << 6;
1033 l |= itoa64_to_int (buf[58]) << 12;
1034 l |= itoa64_to_int (buf[59]) << 18;
1035
1036 digest[56] = (l >> 16) & 0xff;
1037 digest[14] = (l >> 8) & 0xff;
1038 digest[35] = (l >> 0) & 0xff;
1039
1040 l = itoa64_to_int (buf[60]) << 0;
1041 l |= itoa64_to_int (buf[61]) << 6;
1042 l |= itoa64_to_int (buf[62]) << 12;
1043 l |= itoa64_to_int (buf[63]) << 18;
1044
1045 digest[15] = (l >> 16) & 0xff;
1046 digest[36] = (l >> 8) & 0xff;
1047 digest[57] = (l >> 0) & 0xff;
1048
1049 l = itoa64_to_int (buf[64]) << 0;
1050 l |= itoa64_to_int (buf[65]) << 6;
1051 l |= itoa64_to_int (buf[66]) << 12;
1052 l |= itoa64_to_int (buf[67]) << 18;
1053
1054 digest[37] = (l >> 16) & 0xff;
1055 digest[58] = (l >> 8) & 0xff;
1056 digest[16] = (l >> 0) & 0xff;
1057
1058 l = itoa64_to_int (buf[68]) << 0;
1059 l |= itoa64_to_int (buf[69]) << 6;
1060 l |= itoa64_to_int (buf[70]) << 12;
1061 l |= itoa64_to_int (buf[71]) << 18;
1062
1063 digest[59] = (l >> 16) & 0xff;
1064 digest[17] = (l >> 8) & 0xff;
1065 digest[38] = (l >> 0) & 0xff;
1066
1067 l = itoa64_to_int (buf[72]) << 0;
1068 l |= itoa64_to_int (buf[73]) << 6;
1069 l |= itoa64_to_int (buf[74]) << 12;
1070 l |= itoa64_to_int (buf[75]) << 18;
1071
1072 digest[18] = (l >> 16) & 0xff;
1073 digest[39] = (l >> 8) & 0xff;
1074 digest[60] = (l >> 0) & 0xff;
1075
1076 l = itoa64_to_int (buf[76]) << 0;
1077 l |= itoa64_to_int (buf[77]) << 6;
1078 l |= itoa64_to_int (buf[78]) << 12;
1079 l |= itoa64_to_int (buf[79]) << 18;
1080
1081 digest[40] = (l >> 16) & 0xff;
1082 digest[61] = (l >> 8) & 0xff;
1083 digest[19] = (l >> 0) & 0xff;
1084
1085 l = itoa64_to_int (buf[80]) << 0;
1086 l |= itoa64_to_int (buf[81]) << 6;
1087 l |= itoa64_to_int (buf[82]) << 12;
1088 l |= itoa64_to_int (buf[83]) << 18;
1089
1090 digest[62] = (l >> 16) & 0xff;
1091 digest[20] = (l >> 8) & 0xff;
1092 digest[41] = (l >> 0) & 0xff;
1093
1094 l = itoa64_to_int (buf[84]) << 0;
1095 l |= itoa64_to_int (buf[85]) << 6;
1096
1097 digest[63] = (l >> 0) & 0xff;
1098 }
1099
1100 void sha512crypt_encode (u8 digest[64], u8 buf[86])
1101 {
1102 int l;
1103
1104 l = (digest[ 0] << 16) | (digest[21] << 8) | (digest[42] << 0);
1105
1106 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
1107 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
1108 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
1109 buf[ 3] = int_to_itoa64 (l & 0x3f); l >>= 6;
1110
1111 l = (digest[22] << 16) | (digest[43] << 8) | (digest[ 1] << 0);
1112
1113 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
1114 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
1115 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
1116 buf[ 7] = int_to_itoa64 (l & 0x3f); l >>= 6;
1117
1118 l = (digest[44] << 16) | (digest[ 2] << 8) | (digest[23] << 0);
1119
1120 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
1121 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
1122 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
1123 buf[11] = int_to_itoa64 (l & 0x3f); l >>= 6;
1124
1125 l = (digest[ 3] << 16) | (digest[24] << 8) | (digest[45] << 0);
1126
1127 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
1128 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
1129 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
1130 buf[15] = int_to_itoa64 (l & 0x3f); l >>= 6;
1131
1132 l = (digest[25] << 16) | (digest[46] << 8) | (digest[ 4] << 0);
1133
1134 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
1135 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
1136 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
1137 buf[19] = int_to_itoa64 (l & 0x3f); l >>= 6;
1138
1139 l = (digest[47] << 16) | (digest[ 5] << 8) | (digest[26] << 0);
1140
1141 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
1142 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
1143 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
1144 buf[23] = int_to_itoa64 (l & 0x3f); l >>= 6;
1145
1146 l = (digest[ 6] << 16) | (digest[27] << 8) | (digest[48] << 0);
1147
1148 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
1149 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
1150 buf[26] = int_to_itoa64 (l & 0x3f); l >>= 6;
1151 buf[27] = int_to_itoa64 (l & 0x3f); l >>= 6;
1152
1153 l = (digest[28] << 16) | (digest[49] << 8) | (digest[ 7] << 0);
1154
1155 buf[28] = int_to_itoa64 (l & 0x3f); l >>= 6;
1156 buf[29] = int_to_itoa64 (l & 0x3f); l >>= 6;
1157 buf[30] = int_to_itoa64 (l & 0x3f); l >>= 6;
1158 buf[31] = int_to_itoa64 (l & 0x3f); l >>= 6;
1159
1160 l = (digest[50] << 16) | (digest[ 8] << 8) | (digest[29] << 0);
1161
1162 buf[32] = int_to_itoa64 (l & 0x3f); l >>= 6;
1163 buf[33] = int_to_itoa64 (l & 0x3f); l >>= 6;
1164 buf[34] = int_to_itoa64 (l & 0x3f); l >>= 6;
1165 buf[35] = int_to_itoa64 (l & 0x3f); l >>= 6;
1166
1167 l = (digest[ 9] << 16) | (digest[30] << 8) | (digest[51] << 0);
1168
1169 buf[36] = int_to_itoa64 (l & 0x3f); l >>= 6;
1170 buf[37] = int_to_itoa64 (l & 0x3f); l >>= 6;
1171 buf[38] = int_to_itoa64 (l & 0x3f); l >>= 6;
1172 buf[39] = int_to_itoa64 (l & 0x3f); l >>= 6;
1173
1174 l = (digest[31] << 16) | (digest[52] << 8) | (digest[10] << 0);
1175
1176 buf[40] = int_to_itoa64 (l & 0x3f); l >>= 6;
1177 buf[41] = int_to_itoa64 (l & 0x3f); l >>= 6;
1178 buf[42] = int_to_itoa64 (l & 0x3f); l >>= 6;
1179 buf[43] = int_to_itoa64 (l & 0x3f); l >>= 6;
1180
1181 l = (digest[53] << 16) | (digest[11] << 8) | (digest[32] << 0);
1182
1183 buf[44] = int_to_itoa64 (l & 0x3f); l >>= 6;
1184 buf[45] = int_to_itoa64 (l & 0x3f); l >>= 6;
1185 buf[46] = int_to_itoa64 (l & 0x3f); l >>= 6;
1186 buf[47] = int_to_itoa64 (l & 0x3f); l >>= 6;
1187
1188 l = (digest[12] << 16) | (digest[33] << 8) | (digest[54] << 0);
1189
1190 buf[48] = int_to_itoa64 (l & 0x3f); l >>= 6;
1191 buf[49] = int_to_itoa64 (l & 0x3f); l >>= 6;
1192 buf[50] = int_to_itoa64 (l & 0x3f); l >>= 6;
1193 buf[51] = int_to_itoa64 (l & 0x3f); l >>= 6;
1194
1195 l = (digest[34] << 16) | (digest[55] << 8) | (digest[13] << 0);
1196
1197 buf[52] = int_to_itoa64 (l & 0x3f); l >>= 6;
1198 buf[53] = int_to_itoa64 (l & 0x3f); l >>= 6;
1199 buf[54] = int_to_itoa64 (l & 0x3f); l >>= 6;
1200 buf[55] = int_to_itoa64 (l & 0x3f); l >>= 6;
1201
1202 l = (digest[56] << 16) | (digest[14] << 8) | (digest[35] << 0);
1203
1204 buf[56] = int_to_itoa64 (l & 0x3f); l >>= 6;
1205 buf[57] = int_to_itoa64 (l & 0x3f); l >>= 6;
1206 buf[58] = int_to_itoa64 (l & 0x3f); l >>= 6;
1207 buf[59] = int_to_itoa64 (l & 0x3f); l >>= 6;
1208
1209 l = (digest[15] << 16) | (digest[36] << 8) | (digest[57] << 0);
1210
1211 buf[60] = int_to_itoa64 (l & 0x3f); l >>= 6;
1212 buf[61] = int_to_itoa64 (l & 0x3f); l >>= 6;
1213 buf[62] = int_to_itoa64 (l & 0x3f); l >>= 6;
1214 buf[63] = int_to_itoa64 (l & 0x3f); l >>= 6;
1215
1216 l = (digest[37] << 16) | (digest[58] << 8) | (digest[16] << 0);
1217
1218 buf[64] = int_to_itoa64 (l & 0x3f); l >>= 6;
1219 buf[65] = int_to_itoa64 (l & 0x3f); l >>= 6;
1220 buf[66] = int_to_itoa64 (l & 0x3f); l >>= 6;
1221 buf[67] = int_to_itoa64 (l & 0x3f); l >>= 6;
1222
1223 l = (digest[59] << 16) | (digest[17] << 8) | (digest[38] << 0);
1224
1225 buf[68] = int_to_itoa64 (l & 0x3f); l >>= 6;
1226 buf[69] = int_to_itoa64 (l & 0x3f); l >>= 6;
1227 buf[70] = int_to_itoa64 (l & 0x3f); l >>= 6;
1228 buf[71] = int_to_itoa64 (l & 0x3f); l >>= 6;
1229
1230 l = (digest[18] << 16) | (digest[39] << 8) | (digest[60] << 0);
1231
1232 buf[72] = int_to_itoa64 (l & 0x3f); l >>= 6;
1233 buf[73] = int_to_itoa64 (l & 0x3f); l >>= 6;
1234 buf[74] = int_to_itoa64 (l & 0x3f); l >>= 6;
1235 buf[75] = int_to_itoa64 (l & 0x3f); l >>= 6;
1236
1237 l = (digest[40] << 16) | (digest[61] << 8) | (digest[19] << 0);
1238
1239 buf[76] = int_to_itoa64 (l & 0x3f); l >>= 6;
1240 buf[77] = int_to_itoa64 (l & 0x3f); l >>= 6;
1241 buf[78] = int_to_itoa64 (l & 0x3f); l >>= 6;
1242 buf[79] = int_to_itoa64 (l & 0x3f); l >>= 6;
1243
1244 l = (digest[62] << 16) | (digest[20] << 8) | (digest[41] << 0);
1245
1246 buf[80] = int_to_itoa64 (l & 0x3f); l >>= 6;
1247 buf[81] = int_to_itoa64 (l & 0x3f); l >>= 6;
1248 buf[82] = int_to_itoa64 (l & 0x3f); l >>= 6;
1249 buf[83] = int_to_itoa64 (l & 0x3f); l >>= 6;
1250
1251 l = 0 | 0 | (digest[63] << 0);
1252
1253 buf[84] = int_to_itoa64 (l & 0x3f); l >>= 6;
1254 buf[85] = int_to_itoa64 (l & 0x3f); l >>= 6;
1255 }
1256
1257 void sha1aix_decode (u8 digest[20], u8 buf[27])
1258 {
1259 int l;
1260
1261 l = itoa64_to_int (buf[ 0]) << 0;
1262 l |= itoa64_to_int (buf[ 1]) << 6;
1263 l |= itoa64_to_int (buf[ 2]) << 12;
1264 l |= itoa64_to_int (buf[ 3]) << 18;
1265
1266 digest[ 2] = (l >> 0) & 0xff;
1267 digest[ 1] = (l >> 8) & 0xff;
1268 digest[ 0] = (l >> 16) & 0xff;
1269
1270 l = itoa64_to_int (buf[ 4]) << 0;
1271 l |= itoa64_to_int (buf[ 5]) << 6;
1272 l |= itoa64_to_int (buf[ 6]) << 12;
1273 l |= itoa64_to_int (buf[ 7]) << 18;
1274
1275 digest[ 5] = (l >> 0) & 0xff;
1276 digest[ 4] = (l >> 8) & 0xff;
1277 digest[ 3] = (l >> 16) & 0xff;
1278
1279 l = itoa64_to_int (buf[ 8]) << 0;
1280 l |= itoa64_to_int (buf[ 9]) << 6;
1281 l |= itoa64_to_int (buf[10]) << 12;
1282 l |= itoa64_to_int (buf[11]) << 18;
1283
1284 digest[ 8] = (l >> 0) & 0xff;
1285 digest[ 7] = (l >> 8) & 0xff;
1286 digest[ 6] = (l >> 16) & 0xff;
1287
1288 l = itoa64_to_int (buf[12]) << 0;
1289 l |= itoa64_to_int (buf[13]) << 6;
1290 l |= itoa64_to_int (buf[14]) << 12;
1291 l |= itoa64_to_int (buf[15]) << 18;
1292
1293 digest[11] = (l >> 0) & 0xff;
1294 digest[10] = (l >> 8) & 0xff;
1295 digest[ 9] = (l >> 16) & 0xff;
1296
1297 l = itoa64_to_int (buf[16]) << 0;
1298 l |= itoa64_to_int (buf[17]) << 6;
1299 l |= itoa64_to_int (buf[18]) << 12;
1300 l |= itoa64_to_int (buf[19]) << 18;
1301
1302 digest[14] = (l >> 0) & 0xff;
1303 digest[13] = (l >> 8) & 0xff;
1304 digest[12] = (l >> 16) & 0xff;
1305
1306 l = itoa64_to_int (buf[20]) << 0;
1307 l |= itoa64_to_int (buf[21]) << 6;
1308 l |= itoa64_to_int (buf[22]) << 12;
1309 l |= itoa64_to_int (buf[23]) << 18;
1310
1311 digest[17] = (l >> 0) & 0xff;
1312 digest[16] = (l >> 8) & 0xff;
1313 digest[15] = (l >> 16) & 0xff;
1314
1315 l = itoa64_to_int (buf[24]) << 0;
1316 l |= itoa64_to_int (buf[25]) << 6;
1317 l |= itoa64_to_int (buf[26]) << 12;
1318
1319 digest[19] = (l >> 8) & 0xff;
1320 digest[18] = (l >> 16) & 0xff;
1321 }
1322
1323 void sha1aix_encode (u8 digest[20], u8 buf[27])
1324 {
1325 int l;
1326
1327 l = (digest[ 2] << 0) | (digest[ 1] << 8) | (digest[ 0] << 16);
1328
1329 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
1330 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
1331 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
1332 buf[ 3] = int_to_itoa64 (l & 0x3f);
1333
1334 l = (digest[ 5] << 0) | (digest[ 4] << 8) | (digest[ 3] << 16);
1335
1336 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
1337 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
1338 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
1339 buf[ 7] = int_to_itoa64 (l & 0x3f);
1340
1341 l = (digest[ 8] << 0) | (digest[ 7] << 8) | (digest[ 6] << 16);
1342
1343 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
1344 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
1345 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
1346 buf[11] = int_to_itoa64 (l & 0x3f);
1347
1348 l = (digest[11] << 0) | (digest[10] << 8) | (digest[ 9] << 16);
1349
1350 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
1351 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
1352 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
1353 buf[15] = int_to_itoa64 (l & 0x3f);
1354
1355 l = (digest[14] << 0) | (digest[13] << 8) | (digest[12] << 16);
1356
1357 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
1358 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
1359 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
1360 buf[19] = int_to_itoa64 (l & 0x3f);
1361
1362 l = (digest[17] << 0) | (digest[16] << 8) | (digest[15] << 16);
1363
1364 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
1365 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
1366 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
1367 buf[23] = int_to_itoa64 (l & 0x3f);
1368
1369 l = 0 | (digest[19] << 8) | (digest[18] << 16);
1370
1371 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
1372 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
1373 buf[26] = int_to_itoa64 (l & 0x3f);
1374 }
1375
1376 void sha256aix_decode (u8 digest[32], u8 buf[43])
1377 {
1378 int l;
1379
1380 l = itoa64_to_int (buf[ 0]) << 0;
1381 l |= itoa64_to_int (buf[ 1]) << 6;
1382 l |= itoa64_to_int (buf[ 2]) << 12;
1383 l |= itoa64_to_int (buf[ 3]) << 18;
1384
1385 digest[ 2] = (l >> 0) & 0xff;
1386 digest[ 1] = (l >> 8) & 0xff;
1387 digest[ 0] = (l >> 16) & 0xff;
1388
1389 l = itoa64_to_int (buf[ 4]) << 0;
1390 l |= itoa64_to_int (buf[ 5]) << 6;
1391 l |= itoa64_to_int (buf[ 6]) << 12;
1392 l |= itoa64_to_int (buf[ 7]) << 18;
1393
1394 digest[ 5] = (l >> 0) & 0xff;
1395 digest[ 4] = (l >> 8) & 0xff;
1396 digest[ 3] = (l >> 16) & 0xff;
1397
1398 l = itoa64_to_int (buf[ 8]) << 0;
1399 l |= itoa64_to_int (buf[ 9]) << 6;
1400 l |= itoa64_to_int (buf[10]) << 12;
1401 l |= itoa64_to_int (buf[11]) << 18;
1402
1403 digest[ 8] = (l >> 0) & 0xff;
1404 digest[ 7] = (l >> 8) & 0xff;
1405 digest[ 6] = (l >> 16) & 0xff;
1406
1407 l = itoa64_to_int (buf[12]) << 0;
1408 l |= itoa64_to_int (buf[13]) << 6;
1409 l |= itoa64_to_int (buf[14]) << 12;
1410 l |= itoa64_to_int (buf[15]) << 18;
1411
1412 digest[11] = (l >> 0) & 0xff;
1413 digest[10] = (l >> 8) & 0xff;
1414 digest[ 9] = (l >> 16) & 0xff;
1415
1416 l = itoa64_to_int (buf[16]) << 0;
1417 l |= itoa64_to_int (buf[17]) << 6;
1418 l |= itoa64_to_int (buf[18]) << 12;
1419 l |= itoa64_to_int (buf[19]) << 18;
1420
1421 digest[14] = (l >> 0) & 0xff;
1422 digest[13] = (l >> 8) & 0xff;
1423 digest[12] = (l >> 16) & 0xff;
1424
1425 l = itoa64_to_int (buf[20]) << 0;
1426 l |= itoa64_to_int (buf[21]) << 6;
1427 l |= itoa64_to_int (buf[22]) << 12;
1428 l |= itoa64_to_int (buf[23]) << 18;
1429
1430 digest[17] = (l >> 0) & 0xff;
1431 digest[16] = (l >> 8) & 0xff;
1432 digest[15] = (l >> 16) & 0xff;
1433
1434 l = itoa64_to_int (buf[24]) << 0;
1435 l |= itoa64_to_int (buf[25]) << 6;
1436 l |= itoa64_to_int (buf[26]) << 12;
1437 l |= itoa64_to_int (buf[27]) << 18;
1438
1439 digest[20] = (l >> 0) & 0xff;
1440 digest[19] = (l >> 8) & 0xff;
1441 digest[18] = (l >> 16) & 0xff;
1442
1443 l = itoa64_to_int (buf[28]) << 0;
1444 l |= itoa64_to_int (buf[29]) << 6;
1445 l |= itoa64_to_int (buf[30]) << 12;
1446 l |= itoa64_to_int (buf[31]) << 18;
1447
1448 digest[23] = (l >> 0) & 0xff;
1449 digest[22] = (l >> 8) & 0xff;
1450 digest[21] = (l >> 16) & 0xff;
1451
1452 l = itoa64_to_int (buf[32]) << 0;
1453 l |= itoa64_to_int (buf[33]) << 6;
1454 l |= itoa64_to_int (buf[34]) << 12;
1455 l |= itoa64_to_int (buf[35]) << 18;
1456
1457 digest[26] = (l >> 0) & 0xff;
1458 digest[25] = (l >> 8) & 0xff;
1459 digest[24] = (l >> 16) & 0xff;
1460
1461 l = itoa64_to_int (buf[36]) << 0;
1462 l |= itoa64_to_int (buf[37]) << 6;
1463 l |= itoa64_to_int (buf[38]) << 12;
1464 l |= itoa64_to_int (buf[39]) << 18;
1465
1466 digest[29] = (l >> 0) & 0xff;
1467 digest[28] = (l >> 8) & 0xff;
1468 digest[27] = (l >> 16) & 0xff;
1469
1470 l = itoa64_to_int (buf[40]) << 0;
1471 l |= itoa64_to_int (buf[41]) << 6;
1472 l |= itoa64_to_int (buf[42]) << 12;
1473
1474 //digest[32] = (l >> 0) & 0xff;
1475 digest[31] = (l >> 8) & 0xff;
1476 digest[30] = (l >> 16) & 0xff;
1477 }
1478
1479 void sha256aix_encode (u8 digest[32], u8 buf[43])
1480 {
1481 int l;
1482
1483 l = (digest[ 2] << 0) | (digest[ 1] << 8) | (digest[ 0] << 16);
1484
1485 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
1486 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
1487 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
1488 buf[ 3] = int_to_itoa64 (l & 0x3f);
1489
1490 l = (digest[ 5] << 0) | (digest[ 4] << 8) | (digest[ 3] << 16);
1491
1492 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
1493 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
1494 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
1495 buf[ 7] = int_to_itoa64 (l & 0x3f);
1496
1497 l = (digest[ 8] << 0) | (digest[ 7] << 8) | (digest[ 6] << 16);
1498
1499 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
1500 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
1501 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
1502 buf[11] = int_to_itoa64 (l & 0x3f);
1503
1504 l = (digest[11] << 0) | (digest[10] << 8) | (digest[ 9] << 16);
1505
1506 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
1507 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
1508 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
1509 buf[15] = int_to_itoa64 (l & 0x3f);
1510
1511 l = (digest[14] << 0) | (digest[13] << 8) | (digest[12] << 16);
1512
1513 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
1514 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
1515 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
1516 buf[19] = int_to_itoa64 (l & 0x3f);
1517
1518 l = (digest[17] << 0) | (digest[16] << 8) | (digest[15] << 16);
1519
1520 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
1521 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
1522 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
1523 buf[23] = int_to_itoa64 (l & 0x3f);
1524
1525 l = (digest[20] << 0) | (digest[19] << 8) | (digest[18] << 16);
1526
1527 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
1528 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
1529 buf[26] = int_to_itoa64 (l & 0x3f); l >>= 6;
1530 buf[27] = int_to_itoa64 (l & 0x3f);
1531
1532 l = (digest[23] << 0) | (digest[22] << 8) | (digest[21] << 16);
1533
1534 buf[28] = int_to_itoa64 (l & 0x3f); l >>= 6;
1535 buf[29] = int_to_itoa64 (l & 0x3f); l >>= 6;
1536 buf[30] = int_to_itoa64 (l & 0x3f); l >>= 6;
1537 buf[31] = int_to_itoa64 (l & 0x3f);
1538
1539 l = (digest[26] << 0) | (digest[25] << 8) | (digest[24] << 16);
1540
1541 buf[32] = int_to_itoa64 (l & 0x3f); l >>= 6;
1542 buf[33] = int_to_itoa64 (l & 0x3f); l >>= 6;
1543 buf[34] = int_to_itoa64 (l & 0x3f); l >>= 6;
1544 buf[35] = int_to_itoa64 (l & 0x3f);
1545
1546 l = (digest[29] << 0) | (digest[28] << 8) | (digest[27] << 16);
1547
1548 buf[36] = int_to_itoa64 (l & 0x3f); l >>= 6;
1549 buf[37] = int_to_itoa64 (l & 0x3f); l >>= 6;
1550 buf[38] = int_to_itoa64 (l & 0x3f); l >>= 6;
1551 buf[39] = int_to_itoa64 (l & 0x3f);
1552
1553 l = 0 | (digest[31] << 8) | (digest[30] << 16);
1554
1555 buf[40] = int_to_itoa64 (l & 0x3f); l >>= 6;
1556 buf[41] = int_to_itoa64 (l & 0x3f); l >>= 6;
1557 buf[42] = int_to_itoa64 (l & 0x3f);
1558 }
1559
1560 void sha512aix_decode (u8 digest[64], u8 buf[86])
1561 {
1562 int l;
1563
1564 l = itoa64_to_int (buf[ 0]) << 0;
1565 l |= itoa64_to_int (buf[ 1]) << 6;
1566 l |= itoa64_to_int (buf[ 2]) << 12;
1567 l |= itoa64_to_int (buf[ 3]) << 18;
1568
1569 digest[ 2] = (l >> 0) & 0xff;
1570 digest[ 1] = (l >> 8) & 0xff;
1571 digest[ 0] = (l >> 16) & 0xff;
1572
1573 l = itoa64_to_int (buf[ 4]) << 0;
1574 l |= itoa64_to_int (buf[ 5]) << 6;
1575 l |= itoa64_to_int (buf[ 6]) << 12;
1576 l |= itoa64_to_int (buf[ 7]) << 18;
1577
1578 digest[ 5] = (l >> 0) & 0xff;
1579 digest[ 4] = (l >> 8) & 0xff;
1580 digest[ 3] = (l >> 16) & 0xff;
1581
1582 l = itoa64_to_int (buf[ 8]) << 0;
1583 l |= itoa64_to_int (buf[ 9]) << 6;
1584 l |= itoa64_to_int (buf[10]) << 12;
1585 l |= itoa64_to_int (buf[11]) << 18;
1586
1587 digest[ 8] = (l >> 0) & 0xff;
1588 digest[ 7] = (l >> 8) & 0xff;
1589 digest[ 6] = (l >> 16) & 0xff;
1590
1591 l = itoa64_to_int (buf[12]) << 0;
1592 l |= itoa64_to_int (buf[13]) << 6;
1593 l |= itoa64_to_int (buf[14]) << 12;
1594 l |= itoa64_to_int (buf[15]) << 18;
1595
1596 digest[11] = (l >> 0) & 0xff;
1597 digest[10] = (l >> 8) & 0xff;
1598 digest[ 9] = (l >> 16) & 0xff;
1599
1600 l = itoa64_to_int (buf[16]) << 0;
1601 l |= itoa64_to_int (buf[17]) << 6;
1602 l |= itoa64_to_int (buf[18]) << 12;
1603 l |= itoa64_to_int (buf[19]) << 18;
1604
1605 digest[14] = (l >> 0) & 0xff;
1606 digest[13] = (l >> 8) & 0xff;
1607 digest[12] = (l >> 16) & 0xff;
1608
1609 l = itoa64_to_int (buf[20]) << 0;
1610 l |= itoa64_to_int (buf[21]) << 6;
1611 l |= itoa64_to_int (buf[22]) << 12;
1612 l |= itoa64_to_int (buf[23]) << 18;
1613
1614 digest[17] = (l >> 0) & 0xff;
1615 digest[16] = (l >> 8) & 0xff;
1616 digest[15] = (l >> 16) & 0xff;
1617
1618 l = itoa64_to_int (buf[24]) << 0;
1619 l |= itoa64_to_int (buf[25]) << 6;
1620 l |= itoa64_to_int (buf[26]) << 12;
1621 l |= itoa64_to_int (buf[27]) << 18;
1622
1623 digest[20] = (l >> 0) & 0xff;
1624 digest[19] = (l >> 8) & 0xff;
1625 digest[18] = (l >> 16) & 0xff;
1626
1627 l = itoa64_to_int (buf[28]) << 0;
1628 l |= itoa64_to_int (buf[29]) << 6;
1629 l |= itoa64_to_int (buf[30]) << 12;
1630 l |= itoa64_to_int (buf[31]) << 18;
1631
1632 digest[23] = (l >> 0) & 0xff;
1633 digest[22] = (l >> 8) & 0xff;
1634 digest[21] = (l >> 16) & 0xff;
1635
1636 l = itoa64_to_int (buf[32]) << 0;
1637 l |= itoa64_to_int (buf[33]) << 6;
1638 l |= itoa64_to_int (buf[34]) << 12;
1639 l |= itoa64_to_int (buf[35]) << 18;
1640
1641 digest[26] = (l >> 0) & 0xff;
1642 digest[25] = (l >> 8) & 0xff;
1643 digest[24] = (l >> 16) & 0xff;
1644
1645 l = itoa64_to_int (buf[36]) << 0;
1646 l |= itoa64_to_int (buf[37]) << 6;
1647 l |= itoa64_to_int (buf[38]) << 12;
1648 l |= itoa64_to_int (buf[39]) << 18;
1649
1650 digest[29] = (l >> 0) & 0xff;
1651 digest[28] = (l >> 8) & 0xff;
1652 digest[27] = (l >> 16) & 0xff;
1653
1654 l = itoa64_to_int (buf[40]) << 0;
1655 l |= itoa64_to_int (buf[41]) << 6;
1656 l |= itoa64_to_int (buf[42]) << 12;
1657 l |= itoa64_to_int (buf[43]) << 18;
1658
1659 digest[32] = (l >> 0) & 0xff;
1660 digest[31] = (l >> 8) & 0xff;
1661 digest[30] = (l >> 16) & 0xff;
1662
1663 l = itoa64_to_int (buf[44]) << 0;
1664 l |= itoa64_to_int (buf[45]) << 6;
1665 l |= itoa64_to_int (buf[46]) << 12;
1666 l |= itoa64_to_int (buf[47]) << 18;
1667
1668 digest[35] = (l >> 0) & 0xff;
1669 digest[34] = (l >> 8) & 0xff;
1670 digest[33] = (l >> 16) & 0xff;
1671
1672 l = itoa64_to_int (buf[48]) << 0;
1673 l |= itoa64_to_int (buf[49]) << 6;
1674 l |= itoa64_to_int (buf[50]) << 12;
1675 l |= itoa64_to_int (buf[51]) << 18;
1676
1677 digest[38] = (l >> 0) & 0xff;
1678 digest[37] = (l >> 8) & 0xff;
1679 digest[36] = (l >> 16) & 0xff;
1680
1681 l = itoa64_to_int (buf[52]) << 0;
1682 l |= itoa64_to_int (buf[53]) << 6;
1683 l |= itoa64_to_int (buf[54]) << 12;
1684 l |= itoa64_to_int (buf[55]) << 18;
1685
1686 digest[41] = (l >> 0) & 0xff;
1687 digest[40] = (l >> 8) & 0xff;
1688 digest[39] = (l >> 16) & 0xff;
1689
1690 l = itoa64_to_int (buf[56]) << 0;
1691 l |= itoa64_to_int (buf[57]) << 6;
1692 l |= itoa64_to_int (buf[58]) << 12;
1693 l |= itoa64_to_int (buf[59]) << 18;
1694
1695 digest[44] = (l >> 0) & 0xff;
1696 digest[43] = (l >> 8) & 0xff;
1697 digest[42] = (l >> 16) & 0xff;
1698
1699 l = itoa64_to_int (buf[60]) << 0;
1700 l |= itoa64_to_int (buf[61]) << 6;
1701 l |= itoa64_to_int (buf[62]) << 12;
1702 l |= itoa64_to_int (buf[63]) << 18;
1703
1704 digest[47] = (l >> 0) & 0xff;
1705 digest[46] = (l >> 8) & 0xff;
1706 digest[45] = (l >> 16) & 0xff;
1707
1708 l = itoa64_to_int (buf[64]) << 0;
1709 l |= itoa64_to_int (buf[65]) << 6;
1710 l |= itoa64_to_int (buf[66]) << 12;
1711 l |= itoa64_to_int (buf[67]) << 18;
1712
1713 digest[50] = (l >> 0) & 0xff;
1714 digest[49] = (l >> 8) & 0xff;
1715 digest[48] = (l >> 16) & 0xff;
1716
1717 l = itoa64_to_int (buf[68]) << 0;
1718 l |= itoa64_to_int (buf[69]) << 6;
1719 l |= itoa64_to_int (buf[70]) << 12;
1720 l |= itoa64_to_int (buf[71]) << 18;
1721
1722 digest[53] = (l >> 0) & 0xff;
1723 digest[52] = (l >> 8) & 0xff;
1724 digest[51] = (l >> 16) & 0xff;
1725
1726 l = itoa64_to_int (buf[72]) << 0;
1727 l |= itoa64_to_int (buf[73]) << 6;
1728 l |= itoa64_to_int (buf[74]) << 12;
1729 l |= itoa64_to_int (buf[75]) << 18;
1730
1731 digest[56] = (l >> 0) & 0xff;
1732 digest[55] = (l >> 8) & 0xff;
1733 digest[54] = (l >> 16) & 0xff;
1734
1735 l = itoa64_to_int (buf[76]) << 0;
1736 l |= itoa64_to_int (buf[77]) << 6;
1737 l |= itoa64_to_int (buf[78]) << 12;
1738 l |= itoa64_to_int (buf[79]) << 18;
1739
1740 digest[59] = (l >> 0) & 0xff;
1741 digest[58] = (l >> 8) & 0xff;
1742 digest[57] = (l >> 16) & 0xff;
1743
1744 l = itoa64_to_int (buf[80]) << 0;
1745 l |= itoa64_to_int (buf[81]) << 6;
1746 l |= itoa64_to_int (buf[82]) << 12;
1747 l |= itoa64_to_int (buf[83]) << 18;
1748
1749 digest[62] = (l >> 0) & 0xff;
1750 digest[61] = (l >> 8) & 0xff;
1751 digest[60] = (l >> 16) & 0xff;
1752
1753 l = itoa64_to_int (buf[84]) << 0;
1754 l |= itoa64_to_int (buf[85]) << 6;
1755
1756 digest[63] = (l >> 16) & 0xff;
1757 }
1758
1759 void sha512aix_encode (u8 digest[64], u8 buf[86])
1760 {
1761 int l;
1762
1763 l = (digest[ 2] << 0) | (digest[ 1] << 8) | (digest[ 0] << 16);
1764
1765 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
1766 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
1767 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
1768 buf[ 3] = int_to_itoa64 (l & 0x3f);
1769
1770 l = (digest[ 5] << 0) | (digest[ 4] << 8) | (digest[ 3] << 16);
1771
1772 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
1773 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
1774 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
1775 buf[ 7] = int_to_itoa64 (l & 0x3f);
1776
1777 l = (digest[ 8] << 0) | (digest[ 7] << 8) | (digest[ 6] << 16);
1778
1779 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
1780 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
1781 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
1782 buf[11] = int_to_itoa64 (l & 0x3f);
1783
1784 l = (digest[11] << 0) | (digest[10] << 8) | (digest[ 9] << 16);
1785
1786 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
1787 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
1788 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
1789 buf[15] = int_to_itoa64 (l & 0x3f);
1790
1791 l = (digest[14] << 0) | (digest[13] << 8) | (digest[12] << 16);
1792
1793 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
1794 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
1795 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
1796 buf[19] = int_to_itoa64 (l & 0x3f);
1797
1798 l = (digest[17] << 0) | (digest[16] << 8) | (digest[15] << 16);
1799
1800 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
1801 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
1802 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
1803 buf[23] = int_to_itoa64 (l & 0x3f);
1804
1805 l = (digest[20] << 0) | (digest[19] << 8) | (digest[18] << 16);
1806
1807 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
1808 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
1809 buf[26] = int_to_itoa64 (l & 0x3f); l >>= 6;
1810 buf[27] = int_to_itoa64 (l & 0x3f);
1811
1812 l = (digest[23] << 0) | (digest[22] << 8) | (digest[21] << 16);
1813
1814 buf[28] = int_to_itoa64 (l & 0x3f); l >>= 6;
1815 buf[29] = int_to_itoa64 (l & 0x3f); l >>= 6;
1816 buf[30] = int_to_itoa64 (l & 0x3f); l >>= 6;
1817 buf[31] = int_to_itoa64 (l & 0x3f);
1818
1819 l = (digest[26] << 0) | (digest[25] << 8) | (digest[24] << 16);
1820
1821 buf[32] = int_to_itoa64 (l & 0x3f); l >>= 6;
1822 buf[33] = int_to_itoa64 (l & 0x3f); l >>= 6;
1823 buf[34] = int_to_itoa64 (l & 0x3f); l >>= 6;
1824 buf[35] = int_to_itoa64 (l & 0x3f);
1825
1826 l = (digest[29] << 0) | (digest[28] << 8) | (digest[27] << 16);
1827
1828 buf[36] = int_to_itoa64 (l & 0x3f); l >>= 6;
1829 buf[37] = int_to_itoa64 (l & 0x3f); l >>= 6;
1830 buf[38] = int_to_itoa64 (l & 0x3f); l >>= 6;
1831 buf[39] = int_to_itoa64 (l & 0x3f);
1832
1833 l = (digest[32] << 0) | (digest[31] << 8) | (digest[30] << 16);
1834
1835 buf[40] = int_to_itoa64 (l & 0x3f); l >>= 6;
1836 buf[41] = int_to_itoa64 (l & 0x3f); l >>= 6;
1837 buf[42] = int_to_itoa64 (l & 0x3f); l >>= 6;
1838 buf[43] = int_to_itoa64 (l & 0x3f);
1839
1840 l = (digest[35] << 0) | (digest[34] << 8) | (digest[33] << 16);
1841
1842 buf[44] = int_to_itoa64 (l & 0x3f); l >>= 6;
1843 buf[45] = int_to_itoa64 (l & 0x3f); l >>= 6;
1844 buf[46] = int_to_itoa64 (l & 0x3f); l >>= 6;
1845 buf[47] = int_to_itoa64 (l & 0x3f);
1846
1847 l = (digest[38] << 0) | (digest[37] << 8) | (digest[36] << 16);
1848
1849 buf[48] = int_to_itoa64 (l & 0x3f); l >>= 6;
1850 buf[49] = int_to_itoa64 (l & 0x3f); l >>= 6;
1851 buf[50] = int_to_itoa64 (l & 0x3f); l >>= 6;
1852 buf[51] = int_to_itoa64 (l & 0x3f);
1853
1854 l = (digest[41] << 0) | (digest[40] << 8) | (digest[39] << 16);
1855
1856 buf[52] = int_to_itoa64 (l & 0x3f); l >>= 6;
1857 buf[53] = int_to_itoa64 (l & 0x3f); l >>= 6;
1858 buf[54] = int_to_itoa64 (l & 0x3f); l >>= 6;
1859 buf[55] = int_to_itoa64 (l & 0x3f);
1860
1861 l = (digest[44] << 0) | (digest[43] << 8) | (digest[42] << 16);
1862
1863 buf[56] = int_to_itoa64 (l & 0x3f); l >>= 6;
1864 buf[57] = int_to_itoa64 (l & 0x3f); l >>= 6;
1865 buf[58] = int_to_itoa64 (l & 0x3f); l >>= 6;
1866 buf[59] = int_to_itoa64 (l & 0x3f);
1867
1868 l = (digest[47] << 0) | (digest[46] << 8) | (digest[45] << 16);
1869
1870 buf[60] = int_to_itoa64 (l & 0x3f); l >>= 6;
1871 buf[61] = int_to_itoa64 (l & 0x3f); l >>= 6;
1872 buf[62] = int_to_itoa64 (l & 0x3f); l >>= 6;
1873 buf[63] = int_to_itoa64 (l & 0x3f);
1874
1875 l = (digest[50] << 0) | (digest[49] << 8) | (digest[48] << 16);
1876
1877 buf[64] = int_to_itoa64 (l & 0x3f); l >>= 6;
1878 buf[65] = int_to_itoa64 (l & 0x3f); l >>= 6;
1879 buf[66] = int_to_itoa64 (l & 0x3f); l >>= 6;
1880 buf[67] = int_to_itoa64 (l & 0x3f);
1881
1882 l = (digest[53] << 0) | (digest[52] << 8) | (digest[51] << 16);
1883
1884 buf[68] = int_to_itoa64 (l & 0x3f); l >>= 6;
1885 buf[69] = int_to_itoa64 (l & 0x3f); l >>= 6;
1886 buf[70] = int_to_itoa64 (l & 0x3f); l >>= 6;
1887 buf[71] = int_to_itoa64 (l & 0x3f);
1888
1889 l = (digest[56] << 0) | (digest[55] << 8) | (digest[54] << 16);
1890
1891 buf[72] = int_to_itoa64 (l & 0x3f); l >>= 6;
1892 buf[73] = int_to_itoa64 (l & 0x3f); l >>= 6;
1893 buf[74] = int_to_itoa64 (l & 0x3f); l >>= 6;
1894 buf[75] = int_to_itoa64 (l & 0x3f);
1895
1896 l = (digest[59] << 0) | (digest[58] << 8) | (digest[57] << 16);
1897
1898 buf[76] = int_to_itoa64 (l & 0x3f); l >>= 6;
1899 buf[77] = int_to_itoa64 (l & 0x3f); l >>= 6;
1900 buf[78] = int_to_itoa64 (l & 0x3f); l >>= 6;
1901 buf[79] = int_to_itoa64 (l & 0x3f);
1902
1903 l = (digest[62] << 0) | (digest[61] << 8) | (digest[60] << 16);
1904
1905 buf[80] = int_to_itoa64 (l & 0x3f); l >>= 6;
1906 buf[81] = int_to_itoa64 (l & 0x3f); l >>= 6;
1907 buf[82] = int_to_itoa64 (l & 0x3f); l >>= 6;
1908 buf[83] = int_to_itoa64 (l & 0x3f);
1909
1910 l = 0 | 0 | (digest[63] << 16);
1911
1912 buf[84] = int_to_itoa64 (l & 0x3f); l >>= 6;
1913 buf[85] = int_to_itoa64 (l & 0x3f); l >>= 6;
1914 }
1915
1916 void sha256crypt_decode (u8 digest[32], u8 buf[43])
1917 {
1918 int l;
1919
1920 l = itoa64_to_int (buf[ 0]) << 0;
1921 l |= itoa64_to_int (buf[ 1]) << 6;
1922 l |= itoa64_to_int (buf[ 2]) << 12;
1923 l |= itoa64_to_int (buf[ 3]) << 18;
1924
1925 digest[ 0] = (l >> 16) & 0xff;
1926 digest[10] = (l >> 8) & 0xff;
1927 digest[20] = (l >> 0) & 0xff;
1928
1929 l = itoa64_to_int (buf[ 4]) << 0;
1930 l |= itoa64_to_int (buf[ 5]) << 6;
1931 l |= itoa64_to_int (buf[ 6]) << 12;
1932 l |= itoa64_to_int (buf[ 7]) << 18;
1933
1934 digest[21] = (l >> 16) & 0xff;
1935 digest[ 1] = (l >> 8) & 0xff;
1936 digest[11] = (l >> 0) & 0xff;
1937
1938 l = itoa64_to_int (buf[ 8]) << 0;
1939 l |= itoa64_to_int (buf[ 9]) << 6;
1940 l |= itoa64_to_int (buf[10]) << 12;
1941 l |= itoa64_to_int (buf[11]) << 18;
1942
1943 digest[12] = (l >> 16) & 0xff;
1944 digest[22] = (l >> 8) & 0xff;
1945 digest[ 2] = (l >> 0) & 0xff;
1946
1947 l = itoa64_to_int (buf[12]) << 0;
1948 l |= itoa64_to_int (buf[13]) << 6;
1949 l |= itoa64_to_int (buf[14]) << 12;
1950 l |= itoa64_to_int (buf[15]) << 18;
1951
1952 digest[ 3] = (l >> 16) & 0xff;
1953 digest[13] = (l >> 8) & 0xff;
1954 digest[23] = (l >> 0) & 0xff;
1955
1956 l = itoa64_to_int (buf[16]) << 0;
1957 l |= itoa64_to_int (buf[17]) << 6;
1958 l |= itoa64_to_int (buf[18]) << 12;
1959 l |= itoa64_to_int (buf[19]) << 18;
1960
1961 digest[24] = (l >> 16) & 0xff;
1962 digest[ 4] = (l >> 8) & 0xff;
1963 digest[14] = (l >> 0) & 0xff;
1964
1965 l = itoa64_to_int (buf[20]) << 0;
1966 l |= itoa64_to_int (buf[21]) << 6;
1967 l |= itoa64_to_int (buf[22]) << 12;
1968 l |= itoa64_to_int (buf[23]) << 18;
1969
1970 digest[15] = (l >> 16) & 0xff;
1971 digest[25] = (l >> 8) & 0xff;
1972 digest[ 5] = (l >> 0) & 0xff;
1973
1974 l = itoa64_to_int (buf[24]) << 0;
1975 l |= itoa64_to_int (buf[25]) << 6;
1976 l |= itoa64_to_int (buf[26]) << 12;
1977 l |= itoa64_to_int (buf[27]) << 18;
1978
1979 digest[ 6] = (l >> 16) & 0xff;
1980 digest[16] = (l >> 8) & 0xff;
1981 digest[26] = (l >> 0) & 0xff;
1982
1983 l = itoa64_to_int (buf[28]) << 0;
1984 l |= itoa64_to_int (buf[29]) << 6;
1985 l |= itoa64_to_int (buf[30]) << 12;
1986 l |= itoa64_to_int (buf[31]) << 18;
1987
1988 digest[27] = (l >> 16) & 0xff;
1989 digest[ 7] = (l >> 8) & 0xff;
1990 digest[17] = (l >> 0) & 0xff;
1991
1992 l = itoa64_to_int (buf[32]) << 0;
1993 l |= itoa64_to_int (buf[33]) << 6;
1994 l |= itoa64_to_int (buf[34]) << 12;
1995 l |= itoa64_to_int (buf[35]) << 18;
1996
1997 digest[18] = (l >> 16) & 0xff;
1998 digest[28] = (l >> 8) & 0xff;
1999 digest[ 8] = (l >> 0) & 0xff;
2000
2001 l = itoa64_to_int (buf[36]) << 0;
2002 l |= itoa64_to_int (buf[37]) << 6;
2003 l |= itoa64_to_int (buf[38]) << 12;
2004 l |= itoa64_to_int (buf[39]) << 18;
2005
2006 digest[ 9] = (l >> 16) & 0xff;
2007 digest[19] = (l >> 8) & 0xff;
2008 digest[29] = (l >> 0) & 0xff;
2009
2010 l = itoa64_to_int (buf[40]) << 0;
2011 l |= itoa64_to_int (buf[41]) << 6;
2012 l |= itoa64_to_int (buf[42]) << 12;
2013
2014 digest[31] = (l >> 8) & 0xff;
2015 digest[30] = (l >> 0) & 0xff;
2016 }
2017
2018 void sha256crypt_encode (u8 digest[32], u8 buf[43])
2019 {
2020 int l;
2021
2022 l = (digest[ 0] << 16) | (digest[10] << 8) | (digest[20] << 0);
2023
2024 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
2025 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
2026 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
2027 buf[ 3] = int_to_itoa64 (l & 0x3f); l >>= 6;
2028
2029 l = (digest[21] << 16) | (digest[ 1] << 8) | (digest[11] << 0);
2030
2031 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
2032 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
2033 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
2034 buf[ 7] = int_to_itoa64 (l & 0x3f); l >>= 6;
2035
2036 l = (digest[12] << 16) | (digest[22] << 8) | (digest[ 2] << 0);
2037
2038 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
2039 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
2040 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
2041 buf[11] = int_to_itoa64 (l & 0x3f); l >>= 6;
2042
2043 l = (digest[ 3] << 16) | (digest[13] << 8) | (digest[23] << 0);
2044
2045 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
2046 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
2047 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
2048 buf[15] = int_to_itoa64 (l & 0x3f); l >>= 6;
2049
2050 l = (digest[24] << 16) | (digest[ 4] << 8) | (digest[14] << 0);
2051
2052 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
2053 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
2054 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
2055 buf[19] = int_to_itoa64 (l & 0x3f); l >>= 6;
2056
2057 l = (digest[15] << 16) | (digest[25] << 8) | (digest[ 5] << 0);
2058
2059 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
2060 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
2061 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
2062 buf[23] = int_to_itoa64 (l & 0x3f); l >>= 6;
2063
2064 l = (digest[ 6] << 16) | (digest[16] << 8) | (digest[26] << 0);
2065
2066 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
2067 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
2068 buf[26] = int_to_itoa64 (l & 0x3f); l >>= 6;
2069 buf[27] = int_to_itoa64 (l & 0x3f); l >>= 6;
2070
2071 l = (digest[27] << 16) | (digest[ 7] << 8) | (digest[17] << 0);
2072
2073 buf[28] = int_to_itoa64 (l & 0x3f); l >>= 6;
2074 buf[29] = int_to_itoa64 (l & 0x3f); l >>= 6;
2075 buf[30] = int_to_itoa64 (l & 0x3f); l >>= 6;
2076 buf[31] = int_to_itoa64 (l & 0x3f); l >>= 6;
2077
2078 l = (digest[18] << 16) | (digest[28] << 8) | (digest[ 8] << 0);
2079
2080 buf[32] = int_to_itoa64 (l & 0x3f); l >>= 6;
2081 buf[33] = int_to_itoa64 (l & 0x3f); l >>= 6;
2082 buf[34] = int_to_itoa64 (l & 0x3f); l >>= 6;
2083 buf[35] = int_to_itoa64 (l & 0x3f); l >>= 6;
2084
2085 l = (digest[ 9] << 16) | (digest[19] << 8) | (digest[29] << 0);
2086
2087 buf[36] = int_to_itoa64 (l & 0x3f); l >>= 6;
2088 buf[37] = int_to_itoa64 (l & 0x3f); l >>= 6;
2089 buf[38] = int_to_itoa64 (l & 0x3f); l >>= 6;
2090 buf[39] = int_to_itoa64 (l & 0x3f); l >>= 6;
2091
2092 l = 0 | (digest[31] << 8) | (digest[30] << 0);
2093
2094 buf[40] = int_to_itoa64 (l & 0x3f); l >>= 6;
2095 buf[41] = int_to_itoa64 (l & 0x3f); l >>= 6;
2096 buf[42] = int_to_itoa64 (l & 0x3f);
2097 }
2098
2099 void drupal7_decode (u8 digest[64], u8 buf[44])
2100 {
2101 int l;
2102
2103 l = itoa64_to_int (buf[ 0]) << 0;
2104 l |= itoa64_to_int (buf[ 1]) << 6;
2105 l |= itoa64_to_int (buf[ 2]) << 12;
2106 l |= itoa64_to_int (buf[ 3]) << 18;
2107
2108 digest[ 0] = (l >> 0) & 0xff;
2109 digest[ 1] = (l >> 8) & 0xff;
2110 digest[ 2] = (l >> 16) & 0xff;
2111
2112 l = itoa64_to_int (buf[ 4]) << 0;
2113 l |= itoa64_to_int (buf[ 5]) << 6;
2114 l |= itoa64_to_int (buf[ 6]) << 12;
2115 l |= itoa64_to_int (buf[ 7]) << 18;
2116
2117 digest[ 3] = (l >> 0) & 0xff;
2118 digest[ 4] = (l >> 8) & 0xff;
2119 digest[ 5] = (l >> 16) & 0xff;
2120
2121 l = itoa64_to_int (buf[ 8]) << 0;
2122 l |= itoa64_to_int (buf[ 9]) << 6;
2123 l |= itoa64_to_int (buf[10]) << 12;
2124 l |= itoa64_to_int (buf[11]) << 18;
2125
2126 digest[ 6] = (l >> 0) & 0xff;
2127 digest[ 7] = (l >> 8) & 0xff;
2128 digest[ 8] = (l >> 16) & 0xff;
2129
2130 l = itoa64_to_int (buf[12]) << 0;
2131 l |= itoa64_to_int (buf[13]) << 6;
2132 l |= itoa64_to_int (buf[14]) << 12;
2133 l |= itoa64_to_int (buf[15]) << 18;
2134
2135 digest[ 9] = (l >> 0) & 0xff;
2136 digest[10] = (l >> 8) & 0xff;
2137 digest[11] = (l >> 16) & 0xff;
2138
2139 l = itoa64_to_int (buf[16]) << 0;
2140 l |= itoa64_to_int (buf[17]) << 6;
2141 l |= itoa64_to_int (buf[18]) << 12;
2142 l |= itoa64_to_int (buf[19]) << 18;
2143
2144 digest[12] = (l >> 0) & 0xff;
2145 digest[13] = (l >> 8) & 0xff;
2146 digest[14] = (l >> 16) & 0xff;
2147
2148 l = itoa64_to_int (buf[20]) << 0;
2149 l |= itoa64_to_int (buf[21]) << 6;
2150 l |= itoa64_to_int (buf[22]) << 12;
2151 l |= itoa64_to_int (buf[23]) << 18;
2152
2153 digest[15] = (l >> 0) & 0xff;
2154 digest[16] = (l >> 8) & 0xff;
2155 digest[17] = (l >> 16) & 0xff;
2156
2157 l = itoa64_to_int (buf[24]) << 0;
2158 l |= itoa64_to_int (buf[25]) << 6;
2159 l |= itoa64_to_int (buf[26]) << 12;
2160 l |= itoa64_to_int (buf[27]) << 18;
2161
2162 digest[18] = (l >> 0) & 0xff;
2163 digest[19] = (l >> 8) & 0xff;
2164 digest[20] = (l >> 16) & 0xff;
2165
2166 l = itoa64_to_int (buf[28]) << 0;
2167 l |= itoa64_to_int (buf[29]) << 6;
2168 l |= itoa64_to_int (buf[30]) << 12;
2169 l |= itoa64_to_int (buf[31]) << 18;
2170
2171 digest[21] = (l >> 0) & 0xff;
2172 digest[22] = (l >> 8) & 0xff;
2173 digest[23] = (l >> 16) & 0xff;
2174
2175 l = itoa64_to_int (buf[32]) << 0;
2176 l |= itoa64_to_int (buf[33]) << 6;
2177 l |= itoa64_to_int (buf[34]) << 12;
2178 l |= itoa64_to_int (buf[35]) << 18;
2179
2180 digest[24] = (l >> 0) & 0xff;
2181 digest[25] = (l >> 8) & 0xff;
2182 digest[26] = (l >> 16) & 0xff;
2183
2184 l = itoa64_to_int (buf[36]) << 0;
2185 l |= itoa64_to_int (buf[37]) << 6;
2186 l |= itoa64_to_int (buf[38]) << 12;
2187 l |= itoa64_to_int (buf[39]) << 18;
2188
2189 digest[27] = (l >> 0) & 0xff;
2190 digest[28] = (l >> 8) & 0xff;
2191 digest[29] = (l >> 16) & 0xff;
2192
2193 l = itoa64_to_int (buf[40]) << 0;
2194 l |= itoa64_to_int (buf[41]) << 6;
2195 l |= itoa64_to_int (buf[42]) << 12;
2196 l |= itoa64_to_int (buf[43]) << 18;
2197
2198 digest[30] = (l >> 0) & 0xff;
2199 digest[31] = (l >> 8) & 0xff;
2200 digest[32] = (l >> 16) & 0xff;
2201
2202 digest[33] = 0;
2203 digest[34] = 0;
2204 digest[35] = 0;
2205 digest[36] = 0;
2206 digest[37] = 0;
2207 digest[38] = 0;
2208 digest[39] = 0;
2209 digest[40] = 0;
2210 digest[41] = 0;
2211 digest[42] = 0;
2212 digest[43] = 0;
2213 digest[44] = 0;
2214 digest[45] = 0;
2215 digest[46] = 0;
2216 digest[47] = 0;
2217 digest[48] = 0;
2218 digest[49] = 0;
2219 digest[50] = 0;
2220 digest[51] = 0;
2221 digest[52] = 0;
2222 digest[53] = 0;
2223 digest[54] = 0;
2224 digest[55] = 0;
2225 digest[56] = 0;
2226 digest[57] = 0;
2227 digest[58] = 0;
2228 digest[59] = 0;
2229 digest[60] = 0;
2230 digest[61] = 0;
2231 digest[62] = 0;
2232 digest[63] = 0;
2233 }
2234
2235 void drupal7_encode (u8 digest[64], u8 buf[43])
2236 {
2237 int l;
2238
2239 l = (digest[ 0] << 0) | (digest[ 1] << 8) | (digest[ 2] << 16);
2240
2241 buf[ 0] = int_to_itoa64 (l & 0x3f); l >>= 6;
2242 buf[ 1] = int_to_itoa64 (l & 0x3f); l >>= 6;
2243 buf[ 2] = int_to_itoa64 (l & 0x3f); l >>= 6;
2244 buf[ 3] = int_to_itoa64 (l & 0x3f);
2245
2246 l = (digest[ 3] << 0) | (digest[ 4] << 8) | (digest[ 5] << 16);
2247
2248 buf[ 4] = int_to_itoa64 (l & 0x3f); l >>= 6;
2249 buf[ 5] = int_to_itoa64 (l & 0x3f); l >>= 6;
2250 buf[ 6] = int_to_itoa64 (l & 0x3f); l >>= 6;
2251 buf[ 7] = int_to_itoa64 (l & 0x3f);
2252
2253 l = (digest[ 6] << 0) | (digest[ 7] << 8) | (digest[ 8] << 16);
2254
2255 buf[ 8] = int_to_itoa64 (l & 0x3f); l >>= 6;
2256 buf[ 9] = int_to_itoa64 (l & 0x3f); l >>= 6;
2257 buf[10] = int_to_itoa64 (l & 0x3f); l >>= 6;
2258 buf[11] = int_to_itoa64 (l & 0x3f);
2259
2260 l = (digest[ 9] << 0) | (digest[10] << 8) | (digest[11] << 16);
2261
2262 buf[12] = int_to_itoa64 (l & 0x3f); l >>= 6;
2263 buf[13] = int_to_itoa64 (l & 0x3f); l >>= 6;
2264 buf[14] = int_to_itoa64 (l & 0x3f); l >>= 6;
2265 buf[15] = int_to_itoa64 (l & 0x3f);
2266
2267 l = (digest[12] << 0) | (digest[13] << 8) | (digest[14] << 16);
2268
2269 buf[16] = int_to_itoa64 (l & 0x3f); l >>= 6;
2270 buf[17] = int_to_itoa64 (l & 0x3f); l >>= 6;
2271 buf[18] = int_to_itoa64 (l & 0x3f); l >>= 6;
2272 buf[19] = int_to_itoa64 (l & 0x3f);
2273
2274 l = (digest[15] << 0) | (digest[16] << 8) | (digest[17] << 16);
2275
2276 buf[20] = int_to_itoa64 (l & 0x3f); l >>= 6;
2277 buf[21] = int_to_itoa64 (l & 0x3f); l >>= 6;
2278 buf[22] = int_to_itoa64 (l & 0x3f); l >>= 6;
2279 buf[23] = int_to_itoa64 (l & 0x3f);
2280
2281 l = (digest[18] << 0) | (digest[19] << 8) | (digest[20] << 16);
2282
2283 buf[24] = int_to_itoa64 (l & 0x3f); l >>= 6;
2284 buf[25] = int_to_itoa64 (l & 0x3f); l >>= 6;
2285 buf[26] = int_to_itoa64 (l & 0x3f); l >>= 6;
2286 buf[27] = int_to_itoa64 (l & 0x3f);
2287
2288 l = (digest[21] << 0) | (digest[22] << 8) | (digest[23] << 16);
2289
2290 buf[28] = int_to_itoa64 (l & 0x3f); l >>= 6;
2291 buf[29] = int_to_itoa64 (l & 0x3f); l >>= 6;
2292 buf[30] = int_to_itoa64 (l & 0x3f); l >>= 6;
2293 buf[31] = int_to_itoa64 (l & 0x3f);
2294
2295 l = (digest[24] << 0) | (digest[25] << 8) | (digest[26] << 16);
2296
2297 buf[32] = int_to_itoa64 (l & 0x3f); l >>= 6;
2298 buf[33] = int_to_itoa64 (l & 0x3f); l >>= 6;
2299 buf[34] = int_to_itoa64 (l & 0x3f); l >>= 6;
2300 buf[35] = int_to_itoa64 (l & 0x3f);
2301
2302 l = (digest[27] << 0) | (digest[28] << 8) | (digest[29] << 16);
2303
2304 buf[36] = int_to_itoa64 (l & 0x3f); l >>= 6;
2305 buf[37] = int_to_itoa64 (l & 0x3f); l >>= 6;
2306 buf[38] = int_to_itoa64 (l & 0x3f); l >>= 6;
2307 buf[39] = int_to_itoa64 (l & 0x3f);
2308
2309 l = (digest[30] << 0) | (digest[31] << 8) | (digest[32] << 16);
2310
2311 buf[40] = int_to_itoa64 (l & 0x3f); l >>= 6;
2312 buf[41] = int_to_itoa64 (l & 0x3f); l >>= 6;
2313 buf[42] = int_to_itoa64 (l & 0x3f); l >>= 6;
2314 //buf[43] = int_to_itoa64 (l & 0x3f);
2315 }
2316
2317 /**
2318 * tty
2319 */
2320
2321 #ifdef LINUX
2322 static struct termio savemodes;
2323 static int havemodes = 0;
2324
2325 int tty_break()
2326 {
2327 struct termio modmodes;
2328
2329 if (ioctl (fileno (stdin), TCGETA, &savemodes) < 0) return -1;
2330
2331 havemodes = 1;
2332
2333 modmodes = savemodes;
2334 modmodes.c_lflag &= ~ICANON;
2335 modmodes.c_cc[VMIN] = 1;
2336 modmodes.c_cc[VTIME] = 0;
2337
2338 return ioctl (fileno (stdin), TCSETAW, &modmodes);
2339 }
2340
2341 int tty_getchar()
2342 {
2343 fd_set rfds;
2344
2345 FD_ZERO (&rfds);
2346
2347 FD_SET (fileno (stdin), &rfds);
2348
2349 struct timeval tv;
2350
2351 tv.tv_sec = 1;
2352 tv.tv_usec = 0;
2353
2354 int retval = select (1, &rfds, NULL, NULL, &tv);
2355
2356 if (retval == 0) return 0;
2357 if (retval == -1) return -1;
2358
2359 return getchar();
2360 }
2361
2362 int tty_fix()
2363 {
2364 if (!havemodes) return 0;
2365
2366 return ioctl (fileno (stdin), TCSETAW, &savemodes);
2367 }
2368 #endif
2369
2370 #ifdef OSX
2371 static struct termios savemodes;
2372 static int havemodes = 0;
2373
2374 int tty_break()
2375 {
2376 struct termios modmodes;
2377
2378 if (ioctl (fileno (stdin), TIOCGETA, &savemodes) < 0) return -1;
2379
2380 havemodes = 1;
2381
2382 modmodes = savemodes;
2383 modmodes.c_lflag &= ~ICANON;
2384 modmodes.c_cc[VMIN] = 1;
2385 modmodes.c_cc[VTIME] = 0;
2386
2387 return ioctl (fileno (stdin), TIOCSETAW, &modmodes);
2388 }
2389
2390 int tty_getchar()
2391 {
2392 fd_set rfds;
2393
2394 FD_ZERO (&rfds);
2395
2396 FD_SET (fileno (stdin), &rfds);
2397
2398 struct timeval tv;
2399
2400 tv.tv_sec = 1;
2401 tv.tv_usec = 0;
2402
2403 int retval = select (1, &rfds, NULL, NULL, &tv);
2404
2405 if (retval == 0) return 0;
2406 if (retval == -1) return -1;
2407
2408 return getchar();
2409 }
2410
2411 int tty_fix()
2412 {
2413 if (!havemodes) return 0;
2414
2415 return ioctl (fileno (stdin), TIOCSETAW, &savemodes);
2416 }
2417 #endif
2418
2419 #ifdef WIN
2420 static DWORD saveMode = 0;
2421
2422 int tty_break()
2423 {
2424 HANDLE stdinHandle = GetStdHandle (STD_INPUT_HANDLE);
2425
2426 GetConsoleMode (stdinHandle, &saveMode);
2427 SetConsoleMode (stdinHandle, ENABLE_PROCESSED_INPUT);
2428
2429 return 0;
2430 }
2431
2432 int tty_getchar()
2433 {
2434 HANDLE stdinHandle = GetStdHandle (STD_INPUT_HANDLE);
2435
2436 DWORD rc = WaitForSingleObject (stdinHandle, 1000);
2437
2438 if (rc == WAIT_TIMEOUT) return 0;
2439 if (rc == WAIT_ABANDONED) return -1;
2440 if (rc == WAIT_FAILED) return -1;
2441
2442 // The whole ReadConsoleInput () part is a workaround.
2443 // For some unknown reason, maybe a mingw bug, a random signal
2444 // is sent to stdin which unblocks WaitForSingleObject () and sets rc 0.
2445 // Then it wants to read with getche () a keyboard input
2446 // which has never been made.
2447
2448 INPUT_RECORD buf[100];
2449
2450 DWORD num = 0;
2451
2452 memset (buf, 0, sizeof (buf));
2453
2454 ReadConsoleInput (stdinHandle, buf, 100, &num);
2455
2456 FlushConsoleInputBuffer (stdinHandle);
2457
2458 for (uint i = 0; i < num; i++)
2459 {
2460 if (buf[i].EventType != KEY_EVENT) continue;
2461
2462 KEY_EVENT_RECORD KeyEvent = buf[i].Event.KeyEvent;
2463
2464 if (KeyEvent.bKeyDown != TRUE) continue;
2465
2466 return KeyEvent.uChar.AsciiChar;
2467 }
2468
2469 return 0;
2470 }
2471
2472 int tty_fix()
2473 {
2474 HANDLE stdinHandle = GetStdHandle (STD_INPUT_HANDLE);
2475
2476 SetConsoleMode (stdinHandle, saveMode);
2477
2478 return 0;
2479 }
2480 #endif
2481
2482 /**
2483 * mem alloc
2484 */
2485
2486 #define MSG_ENOMEM "Insufficient memory available"
2487
2488 void *mycalloc (size_t nmemb, size_t size)
2489 {
2490 void *p = calloc (nmemb, size);
2491
2492 if (p == NULL)
2493 {
2494 log_error ("ERROR: %s", MSG_ENOMEM);
2495
2496 exit (-1);
2497 }
2498
2499 return (p);
2500 }
2501
2502 void *mymalloc (size_t size)
2503 {
2504 void *p = malloc (size);
2505
2506 if (p == NULL)
2507 {
2508 log_error ("ERROR: %s", MSG_ENOMEM);
2509
2510 exit (-1);
2511 }
2512
2513 memset (p, 0, size);
2514
2515 return (p);
2516 }
2517
2518 void myfree (void *ptr)
2519 {
2520 if (ptr == NULL) return;
2521
2522 free (ptr);
2523 }
2524
2525 void *myrealloc (void *ptr, size_t oldsz, size_t add)
2526 {
2527 void *p = realloc (ptr, oldsz + add);
2528
2529 if (p == NULL)
2530 {
2531 log_error ("ERROR: %s", MSG_ENOMEM);
2532
2533 exit (-1);
2534 }
2535
2536 memset ((char *) p + oldsz, 0, add);
2537
2538 return (p);
2539 }
2540
2541 char *mystrdup (const char *s)
2542 {
2543 const size_t len = strlen (s);
2544
2545 char *b = (char *) mymalloc (len + 1);
2546
2547 memcpy (b, s, len);
2548
2549 return (b);
2550 }
2551
2552 FILE *logfile_open (char *logfile)
2553 {
2554 FILE *fp = fopen (logfile, "ab");
2555
2556 if (fp == NULL)
2557 {
2558 fp = stdout;
2559 }
2560
2561 return fp;
2562 }
2563
2564 void logfile_close (FILE *fp)
2565 {
2566 if (fp == stdout) return;
2567
2568 fclose (fp);
2569 }
2570
2571 void logfile_append (const char *fmt, ...)
2572 {
2573 if (data.logfile_disable == 1) return;
2574
2575 FILE *fp = logfile_open (data.logfile);
2576
2577 va_list ap;
2578
2579 va_start (ap, fmt);
2580
2581 vfprintf (fp, fmt, ap);
2582
2583 va_end (ap);
2584
2585 fputc ('\n', fp);
2586
2587 fflush (fp);
2588
2589 logfile_close (fp);
2590 }
2591
2592 int logfile_generate_id ()
2593 {
2594 const int n = rand ();
2595
2596 time_t t;
2597
2598 time (&t);
2599
2600 return t + n;
2601 }
2602
2603 char *logfile_generate_topid ()
2604 {
2605 const int id = logfile_generate_id ();
2606
2607 char *topid = (char *) mymalloc (1 + 16 + 1);
2608
2609 snprintf (topid, 1 + 16, "TOP%08x", id);
2610
2611 return topid;
2612 }
2613
2614 char *logfile_generate_subid ()
2615 {
2616 const int id = logfile_generate_id ();
2617
2618 char *subid = (char *) mymalloc (1 + 16 + 1);
2619
2620 snprintf (subid, 1 + 16, "SUB%08x", id);
2621
2622 return subid;
2623 }
2624
2625 /**
2626 * system
2627 */
2628
2629 #if F_SETLKW
2630 void lock_file (FILE *fp)
2631 {
2632 struct flock lock;
2633
2634 memset (&lock, 0, sizeof (struct flock));
2635
2636 lock.l_type = F_WRLCK;
2637 while (fcntl(fileno(fp), F_SETLKW, &lock))
2638 {
2639 if (errno != EINTR)
2640 {
2641 log_error ("ERROR: failed acquiring write lock: %s", strerror (errno));
2642
2643 exit (-1);
2644 }
2645 }
2646 }
2647
2648 void unlock_file (FILE *fp)
2649 {
2650 struct flock lock;
2651
2652 memset (&lock, 0, sizeof (struct flock));
2653
2654 lock.l_type = F_UNLCK;
2655 fcntl(fileno(fp), F_SETLK, &lock);
2656 }
2657 #endif // F_SETLKW
2658
2659 #ifdef _WIN
2660 void fsync (int fd)
2661 {
2662 HANDLE h = (HANDLE) _get_osfhandle (fd);
2663
2664 FlushFileBuffers (h);
2665 }
2666 #endif
2667
2668 /**
2669 * thermal
2670 */
2671
2672 #ifdef HAVE_HWMON
2673 #if defined(_WIN) && defined(HAVE_NVAPI)
2674 int hm_get_adapter_index_nv (HM_ADAPTER_NV nvGPUHandle[DEVICES_MAX])
2675 {
2676 NvU32 pGpuCount;
2677
2678 if (hm_NvAPI_EnumPhysicalGPUs (data.hm_nv, nvGPUHandle, &pGpuCount) != NVAPI_OK) return (0);
2679
2680 if (pGpuCount == 0)
2681 {
2682 log_info ("WARN: No NvAPI adapters found");
2683
2684 return (0);
2685 }
2686
2687 return (pGpuCount);
2688 }
2689 #endif // _WIN && HAVE_NVAPI
2690
2691 #if defined(LINUX) && defined(HAVE_NVML)
2692 int hm_get_adapter_index_nv (HM_ADAPTER_NV nvGPUHandle[DEVICES_MAX])
2693 {
2694 int pGpuCount = 0;
2695
2696 for (uint i = 0; i < DEVICES_MAX; i++)
2697 {
2698 if (hm_NVML_nvmlDeviceGetHandleByIndex (data.hm_nv, 1, i, &nvGPUHandle[i]) != NVML_SUCCESS) break;
2699
2700 // can be used to determine if the device by index matches the cuda device by index
2701 // char name[100]; memset (name, 0, sizeof (name));
2702 // hm_NVML_nvmlDeviceGetName (data.hm_nv, nvGPUHandle[i], name, sizeof (name) - 1);
2703
2704 pGpuCount++;
2705 }
2706
2707 if (pGpuCount == 0)
2708 {
2709 log_info ("WARN: No NVML adapters found");
2710
2711 return (0);
2712 }
2713
2714 return (pGpuCount);
2715 }
2716 #endif // LINUX && HAVE_NVML
2717
2718 #ifdef HAVE_ADL
2719 int get_adapters_num_amd (void *adl, int *iNumberAdapters)
2720 {
2721 if (hm_ADL_Adapter_NumberOfAdapters_Get ((ADL_PTR *) adl, iNumberAdapters) != ADL_OK) return -1;
2722
2723 if (iNumberAdapters == 0)
2724 {
2725 log_info ("WARN: No ADL adapters found.");
2726
2727 return -1;
2728 }
2729
2730 return 0;
2731 }
2732
2733 /*
2734 int hm_show_performance_level (HM_LIB hm_dll, int iAdapterIndex)
2735 {
2736 ADLODPerformanceLevels *lpOdPerformanceLevels = NULL;
2737 ADLODParameters lpOdParameters;
2738
2739 lpOdParameters.iSize = sizeof (ADLODParameters);
2740 size_t plevels_size = 0;
2741
2742 if (hm_ADL_Overdrive_ODParameters_Get (hm_dll, iAdapterIndex, &lpOdParameters) != ADL_OK) return -1;
2743
2744 log_info ("[DEBUG] %s, adapter %d performance level (%d) : %s %s",
2745 __func__, iAdapterIndex,
2746 lpOdParameters.iNumberOfPerformanceLevels,
2747 (lpOdParameters.iActivityReportingSupported) ? "activity reporting" : "",
2748 (lpOdParameters.iDiscretePerformanceLevels) ? "discrete performance levels" : "performance ranges");
2749
2750 plevels_size = sizeof (ADLODPerformanceLevels) + sizeof (ADLODPerformanceLevel) * (lpOdParameters.iNumberOfPerformanceLevels - 1);
2751
2752 lpOdPerformanceLevels = (ADLODPerformanceLevels *) mymalloc (plevels_size);
2753
2754 lpOdPerformanceLevels->iSize = sizeof (ADLODPerformanceLevels) + sizeof (ADLODPerformanceLevel) * (lpOdParameters.iNumberOfPerformanceLevels - 1);
2755
2756 if (hm_ADL_Overdrive_ODPerformanceLevels_Get (hm_dll, iAdapterIndex, 0, lpOdPerformanceLevels) != ADL_OK) return -1;
2757
2758 for (int j = 0; j < lpOdParameters.iNumberOfPerformanceLevels; j++)
2759 log_info ("[DEBUG] %s, adapter %d, level %d : engine %d, memory %d, voltage: %d",
2760 __func__, iAdapterIndex, j,
2761 lpOdPerformanceLevels->aLevels[j].iEngineClock / 100, lpOdPerformanceLevels->aLevels[j].iMemoryClock / 100, lpOdPerformanceLevels->aLevels[j].iVddc);
2762
2763 myfree (lpOdPerformanceLevels);
2764
2765 return 0;
2766 }
2767 */
2768
2769 LPAdapterInfo hm_get_adapter_info_amd (void *adl, int iNumberAdapters)
2770 {
2771 size_t AdapterInfoSize = iNumberAdapters * sizeof (AdapterInfo);
2772
2773 LPAdapterInfo lpAdapterInfo = (LPAdapterInfo) mymalloc (AdapterInfoSize);
2774
2775 if (hm_ADL_Adapter_AdapterInfo_Get ((ADL_PTR *) adl, lpAdapterInfo, AdapterInfoSize) != ADL_OK) return NULL;
2776
2777 return lpAdapterInfo;
2778 }
2779
2780 /*
2781 //
2782 // does not help at all, since AMD does not assign different bus id, device id when we have multi GPU setups
2783 //
2784
2785 int hm_get_opencl_device_index (hm_attrs_t *hm_device, uint num_adl_adapters, int bus_num, int dev_num)
2786 {
2787 u32 idx = -1;
2788
2789 for (uint i = 0; i < num_adl_adapters; i++)
2790 {
2791 int opencl_bus_num = hm_device[i].busid;
2792 int opencl_dev_num = hm_device[i].devid;
2793
2794 if ((opencl_bus_num == bus_num) && (opencl_dev_num == dev_num))
2795 {
2796 idx = i;
2797
2798 break;
2799 }
2800 }
2801
2802 if (idx >= DEVICES_MAX) return -1;
2803
2804 return idx;
2805 }
2806
2807 void hm_get_opencl_busid_devid (hm_attrs_t *hm_device, uint opencl_num_devices, cl_device_id *devices)
2808 {
2809 for (uint i = 0; i < opencl_num_devices; i++)
2810 {
2811 cl_device_topology_amd device_topology;
2812
2813 hc_clGetDeviceInfo (devices[i], CL_DEVICE_TOPOLOGY_AMD, sizeof (device_topology), &device_topology, NULL);
2814
2815 hm_device[i].busid = device_topology.pcie.bus;
2816 hm_device[i].devid = device_topology.pcie.device;
2817 }
2818 }
2819 */
2820
2821 void hm_sort_adl_adapters_by_busid_devid (u32 *valid_adl_device_list, int num_adl_adapters, LPAdapterInfo lpAdapterInfo)
2822 {
2823 // basically bubble sort
2824
2825 for (int i = 0; i < num_adl_adapters; i++)
2826 {
2827 for (int j = 0; j < num_adl_adapters - 1; j++)
2828 {
2829 // get info of adapter [x]
2830
2831 u32 adapter_index_x = valid_adl_device_list[j];
2832 AdapterInfo info_x = lpAdapterInfo[adapter_index_x];
2833
2834 u32 bus_num_x = info_x.iBusNumber;
2835 u32 dev_num_x = info_x.iDeviceNumber;
2836
2837 // get info of adapter [y]
2838
2839 u32 adapter_index_y = valid_adl_device_list[j + 1];
2840 AdapterInfo info_y = lpAdapterInfo[adapter_index_y];
2841
2842 u32 bus_num_y = info_y.iBusNumber;
2843 u32 dev_num_y = info_y.iDeviceNumber;
2844
2845 uint need_swap = 0;
2846
2847 if (bus_num_y < bus_num_x)
2848 {
2849 need_swap = 1;
2850 }
2851 else if (bus_num_y == bus_num_x)
2852 {
2853 if (dev_num_y < dev_num_x)
2854 {
2855 need_swap = 1;
2856 }
2857 }
2858
2859 if (need_swap == 1)
2860 {
2861 u32 temp = valid_adl_device_list[j + 1];
2862
2863 valid_adl_device_list[j + 1] = valid_adl_device_list[j];
2864 valid_adl_device_list[j + 0] = temp;
2865 }
2866 }
2867 }
2868 }
2869
2870 u32 *hm_get_list_valid_adl_adapters (int iNumberAdapters, int *num_adl_adapters, LPAdapterInfo lpAdapterInfo)
2871 {
2872 *num_adl_adapters = 0;
2873
2874 u32 *adl_adapters = NULL;
2875
2876 int *bus_numbers = NULL;
2877 int *device_numbers = NULL;
2878
2879 for (int i = 0; i < iNumberAdapters; i++)
2880 {
2881 AdapterInfo info = lpAdapterInfo[i];
2882
2883 if (strlen (info.strUDID) < 1) continue;
2884
2885 #ifdef WIN
2886 if (info.iVendorID != 1002) continue;
2887 #else
2888 if (info.iVendorID != 0x1002) continue;
2889 #endif
2890
2891 if (info.iBusNumber < 0) continue;
2892 if (info.iDeviceNumber < 0) continue;
2893
2894 int found = 0;
2895
2896 for (int pos = 0; pos < *num_adl_adapters; pos++)
2897 {
2898 if ((bus_numbers[pos] == info.iBusNumber) && (device_numbers[pos] == info.iDeviceNumber))
2899 {
2900 found = 1;
2901 break;
2902 }
2903 }
2904
2905 if (found) continue;
2906
2907 // add it to the list
2908
2909 adl_adapters = (u32 *) myrealloc (adl_adapters, (*num_adl_adapters) * sizeof (int), sizeof (int));
2910
2911 adl_adapters[*num_adl_adapters] = i;
2912
2913 // rest is just bookkeeping
2914
2915 bus_numbers = (int*) myrealloc (bus_numbers, (*num_adl_adapters) * sizeof (int), sizeof (int));
2916 device_numbers = (int*) myrealloc (device_numbers, (*num_adl_adapters) * sizeof (int), sizeof (int));
2917
2918 bus_numbers[*num_adl_adapters] = info.iBusNumber;
2919 device_numbers[*num_adl_adapters] = info.iDeviceNumber;
2920
2921 (*num_adl_adapters)++;
2922 }
2923
2924 myfree (bus_numbers);
2925 myfree (device_numbers);
2926
2927 // sort the list by increasing bus id, device id number
2928
2929 hm_sort_adl_adapters_by_busid_devid (adl_adapters, *num_adl_adapters, lpAdapterInfo);
2930
2931 return adl_adapters;
2932 }
2933
2934 int hm_check_fanspeed_control (void *adl, hm_attrs_t *hm_device, u32 *valid_adl_device_list, int num_adl_adapters, LPAdapterInfo lpAdapterInfo)
2935 {
2936 // loop through all valid devices
2937
2938 for (int i = 0; i < num_adl_adapters; i++)
2939 {
2940 u32 adapter_index = valid_adl_device_list[i];
2941
2942 // get AdapterInfo
2943
2944 AdapterInfo info = lpAdapterInfo[adapter_index];
2945
2946 // unfortunately this doesn't work since bus id and dev id are not unique
2947 // int opencl_device_index = hm_get_opencl_device_index (hm_device, num_adl_adapters, info.iBusNumber, info.iDeviceNumber);
2948 // if (opencl_device_index == -1) continue;
2949
2950 int opencl_device_index = i;
2951
2952 // if (hm_show_performance_level (adl, info.iAdapterIndex) != 0) return -1;
2953
2954 // get fanspeed info
2955
2956 if (hm_device[opencl_device_index].od_version == 5)
2957 {
2958 ADLFanSpeedInfo FanSpeedInfo;
2959
2960 memset (&FanSpeedInfo, 0, sizeof (ADLFanSpeedInfo));
2961
2962 FanSpeedInfo.iSize = sizeof (ADLFanSpeedInfo);
2963
2964 if (hm_ADL_Overdrive5_FanSpeedInfo_Get (adl, info.iAdapterIndex, 0, &FanSpeedInfo) != ADL_OK) return -1;
2965
2966 // check read and write capability in fanspeedinfo
2967
2968 if ((FanSpeedInfo.iFlags & ADL_DL_FANCTRL_SUPPORTS_PERCENT_READ) &&
2969 (FanSpeedInfo.iFlags & ADL_DL_FANCTRL_SUPPORTS_PERCENT_WRITE))
2970 {
2971 hm_device[opencl_device_index].fan_supported = 1;
2972 }
2973 else
2974 {
2975 hm_device[opencl_device_index].fan_supported = 0;
2976 }
2977 }
2978 else // od_version == 6
2979 {
2980 ADLOD6FanSpeedInfo faninfo;
2981
2982 memset (&faninfo, 0, sizeof (faninfo));
2983
2984 if (hm_ADL_Overdrive6_FanSpeed_Get (adl, info.iAdapterIndex, &faninfo) != ADL_OK) return -1;
2985
2986 // check read capability in fanspeedinfo
2987
2988 if (faninfo.iSpeedType & ADL_OD6_FANSPEED_TYPE_PERCENT)
2989 {
2990 hm_device[opencl_device_index].fan_supported = 1;
2991 }
2992 else
2993 {
2994 hm_device[opencl_device_index].fan_supported = 0;
2995 }
2996 }
2997 }
2998
2999 return 0;
3000 }
3001
3002 int hm_get_overdrive_version (void *adl, hm_attrs_t *hm_device, u32 *valid_adl_device_list, int num_adl_adapters, LPAdapterInfo lpAdapterInfo)
3003 {
3004 for (int i = 0; i < num_adl_adapters; i++)
3005 {
3006 u32 adapter_index = valid_adl_device_list[i];
3007
3008 // get AdapterInfo
3009
3010 AdapterInfo info = lpAdapterInfo[adapter_index];
3011
3012 // get overdrive version
3013
3014 int od_supported = 0;
3015 int od_enabled = 0;
3016 int od_version = 0;
3017
3018 if (hm_ADL_Overdrive_Caps (adl, info.iAdapterIndex, &od_supported, &od_enabled, &od_version) != ADL_OK) return -1;
3019
3020 // store the overdrive version in hm_device
3021
3022 // unfortunately this doesn't work since bus id and dev id are not unique
3023 // int opencl_device_index = hm_get_opencl_device_index (hm_device, num_adl_adapters, info.iBusNumber, info.iDeviceNumber);
3024 // if (opencl_device_index == -1) continue;
3025
3026 int opencl_device_index = i;
3027
3028 hm_device[opencl_device_index].od_version = od_version;
3029 }
3030
3031 return 0;
3032 }
3033
3034 int hm_get_adapter_index_amd (hm_attrs_t *hm_device, u32 *valid_adl_device_list, int num_adl_adapters, LPAdapterInfo lpAdapterInfo)
3035 {
3036 for (int i = 0; i < num_adl_adapters; i++)
3037 {
3038 u32 adapter_index = valid_adl_device_list[i];
3039
3040 // get AdapterInfo
3041
3042 AdapterInfo info = lpAdapterInfo[adapter_index];
3043
3044 // store the iAdapterIndex in hm_device
3045
3046 // unfortunately this doesn't work since bus id and dev id are not unique
3047 // int opencl_device_index = hm_get_opencl_device_index (hm_device, num_adl_adapters, info.iBusNumber, info.iDeviceNumber);
3048 // if (opencl_device_index == -1) continue;
3049
3050 int opencl_device_index = i;
3051
3052 hm_device[opencl_device_index].adapter_index.amd = info.iAdapterIndex;
3053 }
3054
3055 return num_adl_adapters;
3056 }
3057 #endif // HAVE_ADL
3058
3059 int hm_get_temperature_with_device_id (const uint device_id)
3060 {
3061 if ((data.devices_param[device_id].device_type & CL_DEVICE_TYPE_GPU) == 0) return -1;
3062
3063 #ifdef HAVE_ADL
3064 if (data.devices_param[device_id].vendor_id == VENDOR_ID_AMD)
3065 {
3066 if (data.hm_amd)
3067 {
3068 if (data.hm_device[device_id].od_version == 5)
3069 {
3070 ADLTemperature Temperature;
3071
3072 Temperature.iSize = sizeof (ADLTemperature);
3073
3074 if (hm_ADL_Overdrive5_Temperature_Get (data.hm_amd, data.hm_device[device_id].adapter_index.amd, 0, &Temperature) != ADL_OK) return -1;
3075
3076 return Temperature.iTemperature / 1000;
3077 }
3078 else if (data.hm_device[device_id].od_version == 6)
3079 {
3080 int Temperature = 0;
3081
3082 if (hm_ADL_Overdrive6_Temperature_Get (data.hm_amd, data.hm_device[device_id].adapter_index.amd, &Temperature) != ADL_OK) return -1;
3083
3084 return Temperature / 1000;
3085 }
3086 }
3087 }
3088 #endif
3089
3090 #if defined(HAVE_NVML) || defined(HAVE_NVAPI)
3091 if (data.devices_param[device_id].vendor_id == VENDOR_ID_NV)
3092 {
3093 #if defined(LINUX) && defined(HAVE_NVML)
3094 int temperature = 0;
3095
3096 hm_NVML_nvmlDeviceGetTemperature (data.hm_nv, data.hm_device[device_id].adapter_index.nv, NVML_TEMPERATURE_GPU, (unsigned int *) &temperature);
3097
3098 return temperature;
3099 #endif
3100
3101 #if defined(WIN) && defined(HAVE_NVAPI)
3102 NV_GPU_THERMAL_SETTINGS pThermalSettings;
3103
3104 pThermalSettings.version = NV_GPU_THERMAL_SETTINGS_VER;
3105 pThermalSettings.count = NVAPI_MAX_THERMAL_SENSORS_PER_GPU;
3106 pThermalSettings.sensor[0].controller = NVAPI_THERMAL_CONTROLLER_UNKNOWN;
3107 pThermalSettings.sensor[0].target = NVAPI_THERMAL_TARGET_GPU;
3108
3109 if (hm_NvAPI_GPU_GetThermalSettings (data.hm_nv, data.hm_device[device_id].adapter_index.nv, 0, &pThermalSettings) != NVAPI_OK) return -1;
3110
3111 return pThermalSettings.sensor[0].currentTemp;
3112 #endif // WIN && HAVE_NVAPI
3113 }
3114 #endif // HAVE_NVML || HAVE_NVAPI
3115
3116 return -1;
3117 }
3118
3119 int hm_get_fanspeed_with_device_id (const uint device_id)
3120 {
3121 // we shouldn't really need this extra CL_DEVICE_TYPE_GPU check, because fan_supported should not be set w/ CPUs
3122 if ((data.devices_param[device_id].device_type & CL_DEVICE_TYPE_GPU) == 0) return -1;
3123
3124 if (data.hm_device[device_id].fan_supported == 1)
3125 {
3126 #ifdef HAVE_ADL
3127 if (data.devices_param[device_id].vendor_id == VENDOR_ID_AMD)
3128 {
3129 if (data.hm_amd)
3130 {
3131 if (data.hm_device[device_id].od_version == 5)
3132 {
3133 ADLFanSpeedValue lpFanSpeedValue;
3134
3135 memset (&lpFanSpeedValue, 0, sizeof (lpFanSpeedValue));
3136
3137 lpFanSpeedValue.iSize = sizeof (lpFanSpeedValue);
3138 lpFanSpeedValue.iSpeedType = ADL_DL_FANCTRL_SPEED_TYPE_PERCENT;
3139 lpFanSpeedValue.iFlags = ADL_DL_FANCTRL_FLAG_USER_DEFINED_SPEED;
3140
3141 if (hm_ADL_Overdrive5_FanSpeed_Get (data.hm_amd, data.hm_device[device_id].adapter_index.amd, 0, &lpFanSpeedValue) != ADL_OK) return -1;
3142
3143 return lpFanSpeedValue.iFanSpeed;
3144 }
3145 else // od_version == 6
3146 {
3147 ADLOD6FanSpeedInfo faninfo;
3148
3149 memset (&faninfo, 0, sizeof (faninfo));
3150
3151 if (hm_ADL_Overdrive6_FanSpeed_Get (data.hm_amd, data.hm_device[device_id].adapter_index.amd, &faninfo) != ADL_OK) return -1;
3152
3153 return faninfo.iFanSpeedPercent;
3154 }
3155 }
3156 }
3157 #endif // HAVE_ADL
3158
3159 #if defined(HAVE_NVML) || defined(HAVE_NVAPI)
3160 if (data.devices_param[device_id].vendor_id == VENDOR_ID_NV)
3161 {
3162 #if defined(LINUX) && defined(HAVE_NVML)
3163 int speed = 0;
3164
3165 hm_NVML_nvmlDeviceGetFanSpeed (data.hm_nv, 1, data.hm_device[device_id].adapter_index.nv, (unsigned int *) &speed);
3166
3167 return speed;
3168 #endif
3169
3170 #if defined(WIN) && defined(HAVE_NVAPI)
3171
3172 NV_GPU_COOLER_SETTINGS pCoolerSettings;
3173
3174 pCoolerSettings.Version = GPU_COOLER_SETTINGS_VER | sizeof (NV_GPU_COOLER_SETTINGS);
3175
3176 hm_NvAPI_GPU_GetCoolerSettings (data.hm_nv, data.hm_device[device_id].adapter_index.nv, 0, &pCoolerSettings);
3177
3178 return pCoolerSettings.Cooler[0].CurrentLevel;
3179 #endif
3180 }
3181 #endif // HAVE_NVML || HAVE_NVAPI
3182 }
3183
3184 return -1;
3185 }
3186
3187 int hm_get_utilization_with_device_id (const uint device_id)
3188 {
3189 if ((data.devices_param[device_id].device_type & CL_DEVICE_TYPE_GPU) == 0) return -1;
3190
3191 #ifdef HAVE_ADL
3192 if (data.devices_param[device_id].vendor_id == VENDOR_ID_AMD)
3193 {
3194 if (data.hm_amd)
3195 {
3196 ADLPMActivity PMActivity;
3197
3198 PMActivity.iSize = sizeof (ADLPMActivity);
3199
3200 if (hm_ADL_Overdrive_CurrentActivity_Get (data.hm_amd, data.hm_device[device_id].adapter_index.amd, &PMActivity) != ADL_OK) return -1;
3201
3202 return PMActivity.iActivityPercent;
3203 }
3204 }
3205 #endif // HAVE_ADL
3206
3207 #if defined(HAVE_NVML) || defined(HAVE_NVAPI)
3208 if (data.devices_param[device_id].vendor_id == VENDOR_ID_NV)
3209 {
3210 #if defined(LINUX) && defined(HAVE_NVML)
3211 nvmlUtilization_t utilization;
3212
3213 hm_NVML_nvmlDeviceGetUtilizationRates (data.hm_nv, data.hm_device[device_id].adapter_index.nv, &utilization);
3214
3215 return utilization.gpu;
3216 #endif
3217
3218 #if defined(WIN) && defined(HAVE_NVAPI)
3219 NV_GPU_DYNAMIC_PSTATES_INFO_EX pDynamicPstatesInfoEx;
3220
3221 pDynamicPstatesInfoEx.version = NV_GPU_DYNAMIC_PSTATES_INFO_EX_VER;
3222
3223 if (hm_NvAPI_GPU_GetDynamicPstatesInfoEx (data.hm_nv, data.hm_device[device_id].adapter_index.nv, &pDynamicPstatesInfoEx) != NVAPI_OK) return -1;
3224
3225 return pDynamicPstatesInfoEx.utilization[0].percentage;
3226 #endif
3227 }
3228 #endif // HAVE_NVML || HAVE_NVAPI
3229
3230 return -1;
3231 }
3232
3233 #ifdef HAVE_ADL
3234 int hm_set_fanspeed_with_device_id_amd (const uint device_id, const int fanspeed)
3235 {
3236 if (data.hm_device[device_id].fan_supported == 1)
3237 {
3238 if (data.hm_amd)
3239 {
3240 if (data.hm_device[device_id].od_version == 5)
3241 {
3242 ADLFanSpeedValue lpFanSpeedValue;
3243
3244 memset (&lpFanSpeedValue, 0, sizeof (lpFanSpeedValue));
3245
3246 lpFanSpeedValue.iSize = sizeof (lpFanSpeedValue);
3247 lpFanSpeedValue.iSpeedType = ADL_DL_FANCTRL_SPEED_TYPE_PERCENT;
3248 lpFanSpeedValue.iFlags = ADL_DL_FANCTRL_FLAG_USER_DEFINED_SPEED;
3249 lpFanSpeedValue.iFanSpeed = fanspeed;
3250
3251 if (hm_ADL_Overdrive5_FanSpeed_Set (data.hm_amd, data.hm_device[device_id].adapter_index.amd, 0, &lpFanSpeedValue) != ADL_OK) return -1;
3252
3253 return 0;
3254 }
3255 else // od_version == 6
3256 {
3257 ADLOD6FanSpeedValue fan_speed_value;
3258
3259 memset (&fan_speed_value, 0, sizeof (fan_speed_value));
3260
3261 fan_speed_value.iSpeedType = ADL_OD6_FANSPEED_TYPE_PERCENT;
3262 fan_speed_value.iFanSpeed = fanspeed;
3263
3264 if (hm_ADL_Overdrive6_FanSpeed_Set (data.hm_amd, data.hm_device[device_id].adapter_index.amd, &fan_speed_value) != ADL_OK) return -1;
3265
3266 return 0;
3267 }
3268 }
3269 }
3270
3271 return -1;
3272 }
3273 #endif
3274
3275 // helper function for status display
3276
3277 void hm_device_val_to_str (char *target_buf, int max_buf_size, char *suffix, int value)
3278 {
3279 #define VALUE_NOT_AVAILABLE "N/A"
3280
3281 if (value == -1)
3282 {
3283 snprintf (target_buf, max_buf_size, VALUE_NOT_AVAILABLE);
3284 }
3285 else
3286 {
3287 snprintf (target_buf, max_buf_size, "%2d%s", value, suffix);
3288 }
3289 }
3290 #endif // HAVE_HWMON
3291
3292 /**
3293 * maskprocessor
3294 */
3295
3296 void mp_css_to_uniq_tbl (uint css_cnt, cs_t *css, uint uniq_tbls[SP_PW_MAX][CHARSIZ])
3297 {
3298 /* generates a lookup table where key is the char itself for fastest possible lookup performance */
3299
3300 if (css_cnt > SP_PW_MAX)
3301 {
3302 log_error ("ERROR: mask length is too long");
3303
3304 exit (-1);
3305 }
3306
3307 for (uint css_pos = 0; css_pos < css_cnt; css_pos++)
3308 {
3309 uint *uniq_tbl = uniq_tbls[css_pos];
3310
3311 uint *cs_buf = css[css_pos].cs_buf;
3312 uint cs_len = css[css_pos].cs_len;
3313
3314 for (uint cs_pos = 0; cs_pos < cs_len; cs_pos++)
3315 {
3316 uint c = cs_buf[cs_pos] & 0xff;
3317
3318 uniq_tbl[c] = 1;
3319 }
3320 }
3321 }
3322
3323 void mp_add_cs_buf (uint *in_buf, size_t in_len, cs_t *css, int css_cnt)
3324 {
3325 cs_t *cs = &css[css_cnt];
3326
3327 size_t css_uniq_sz = CHARSIZ * sizeof (uint);
3328
3329 uint *css_uniq = (uint *) mymalloc (css_uniq_sz);
3330
3331 size_t i;
3332
3333 for (i = 0; i < cs->cs_len; i++)
3334 {
3335 const uint u = cs->cs_buf[i];
3336
3337 css_uniq[u] = 1;
3338 }
3339
3340 for (i = 0; i < in_len; i++)
3341 {
3342 uint u = in_buf[i] & 0xff;
3343
3344 if (data.opts_type & OPTS_TYPE_PT_UPPER) u = toupper (u);
3345
3346 if (css_uniq[u] == 1) continue;
3347
3348 css_uniq[u] = 1;
3349
3350 cs->cs_buf[cs->cs_len] = u;
3351
3352 cs->cs_len++;
3353 }
3354
3355 myfree (css_uniq);
3356 }
3357
3358 void mp_expand (char *in_buf, size_t in_len, cs_t *mp_sys, cs_t *mp_usr, int mp_usr_offset, int interpret)
3359 {
3360 size_t in_pos;
3361
3362 for (in_pos = 0; in_pos < in_len; in_pos++)
3363 {
3364 uint p0 = in_buf[in_pos] & 0xff;
3365
3366 if (interpret == 1 && p0 == '?')
3367 {
3368 in_pos++;
3369
3370 if (in_pos == in_len) break;
3371
3372 uint p1 = in_buf[in_pos] & 0xff;
3373
3374 switch (p1)
3375 {
3376 case 'l': mp_add_cs_buf (mp_sys[0].cs_buf, mp_sys[0].cs_len, mp_usr, mp_usr_offset);
3377 break;
3378 case 'u': mp_add_cs_buf (mp_sys[1].cs_buf, mp_sys[1].cs_len, mp_usr, mp_usr_offset);
3379 break;
3380 case 'd': mp_add_cs_buf (mp_sys[2].cs_buf, mp_sys[2].cs_len, mp_usr, mp_usr_offset);
3381 break;
3382 case 's': mp_add_cs_buf (mp_sys[3].cs_buf, mp_sys[3].cs_len, mp_usr, mp_usr_offset);
3383 break;
3384 case 'a': mp_add_cs_buf (mp_sys[4].cs_buf, mp_sys[4].cs_len, mp_usr, mp_usr_offset);
3385 break;
3386 case 'b': mp_add_cs_buf (mp_sys[5].cs_buf, mp_sys[5].cs_len, mp_usr, mp_usr_offset);
3387 break;
3388 case '1': if (mp_usr[0].cs_len == 0) { log_error ("ERROR: Custom-charset 1 is undefined\n"); exit (-1); }
3389 mp_add_cs_buf (mp_usr[0].cs_buf, mp_usr[0].cs_len, mp_usr, mp_usr_offset);
3390 break;
3391 case '2': if (mp_usr[1].cs_len == 0) { log_error ("ERROR: Custom-charset 2 is undefined\n"); exit (-1); }
3392 mp_add_cs_buf (mp_usr[1].cs_buf, mp_usr[1].cs_len, mp_usr, mp_usr_offset);
3393 break;
3394 case '3': if (mp_usr[2].cs_len == 0) { log_error ("ERROR: Custom-charset 3 is undefined\n"); exit (-1); }
3395 mp_add_cs_buf (mp_usr[2].cs_buf, mp_usr[2].cs_len, mp_usr, mp_usr_offset);
3396 break;
3397 case '4': if (mp_usr[3].cs_len == 0) { log_error ("ERROR: Custom-charset 4 is undefined\n"); exit (-1); }
3398 mp_add_cs_buf (mp_usr[3].cs_buf, mp_usr[3].cs_len, mp_usr, mp_usr_offset);
3399 break;
3400 case '?': mp_add_cs_buf (&p0, 1, mp_usr, mp_usr_offset);
3401 break;
3402 default: log_error ("Syntax error: %s", in_buf);
3403 exit (-1);
3404 }
3405 }
3406 else
3407 {
3408 if (data.hex_charset)
3409 {
3410 in_pos++;
3411
3412 if (in_pos == in_len)
3413 {
3414 log_error ("ERROR: the hex-charset option always expects couples of exactly 2 hexadecimal chars, failed mask: %s", in_buf);
3415
3416 exit (-1);
3417 }
3418
3419 uint p1 = in_buf[in_pos] & 0xff;
3420
3421 if ((is_valid_hex_char (p0) == 0) || (is_valid_hex_char (p1) == 0))
3422 {
3423 log_error ("ERROR: invalid hex character detected in mask %s", in_buf);
3424
3425 exit (-1);
3426 }
3427
3428 uint chr = 0;
3429
3430 chr = hex_convert (p1) << 0;
3431 chr |= hex_convert (p0) << 4;
3432
3433 mp_add_cs_buf (&chr, 1, mp_usr, mp_usr_offset);
3434 }
3435 else
3436 {
3437 uint chr = p0;
3438
3439 mp_add_cs_buf (&chr, 1, mp_usr, mp_usr_offset);
3440 }
3441 }
3442 }
3443 }
3444
3445 u64 mp_get_sum (uint css_cnt, cs_t *css)
3446 {
3447 u64 sum = 1;
3448
3449 for (uint css_pos = 0; css_pos < css_cnt; css_pos++)
3450 {
3451 sum *= css[css_pos].cs_len;
3452 }
3453
3454 return (sum);
3455 }
3456
3457 cs_t *mp_gen_css (char *mask_buf, size_t mask_len, cs_t *mp_sys, cs_t *mp_usr, uint *css_cnt)
3458 {
3459 cs_t *css = (cs_t *) mycalloc (256, sizeof (cs_t));
3460
3461 uint mask_pos;
3462 uint css_pos;
3463
3464 for (mask_pos = 0, css_pos = 0; mask_pos < mask_len; mask_pos++, css_pos++)
3465 {
3466 char p0 = mask_buf[mask_pos];
3467
3468 if (p0 == '?')
3469 {
3470 mask_pos++;
3471
3472 if (mask_pos == mask_len) break;
3473
3474 char p1 = mask_buf[mask_pos];
3475
3476 uint chr = p1;
3477
3478 switch (p1)
3479 {
3480 case 'l': mp_add_cs_buf (mp_sys[0].cs_buf, mp_sys[0].cs_len, css, css_pos);
3481 break;
3482 case 'u': mp_add_cs_buf (mp_sys[1].cs_buf, mp_sys[1].cs_len, css, css_pos);
3483 break;
3484 case 'd': mp_add_cs_buf (mp_sys[2].cs_buf, mp_sys[2].cs_len, css, css_pos);
3485 break;
3486 case 's': mp_add_cs_buf (mp_sys[3].cs_buf, mp_sys[3].cs_len, css, css_pos);
3487 break;
3488 case 'a': mp_add_cs_buf (mp_sys[4].cs_buf, mp_sys[4].cs_len, css, css_pos);
3489 break;
3490 case 'b': mp_add_cs_buf (mp_sys[5].cs_buf, mp_sys[5].cs_len, css, css_pos);
3491 break;
3492 case '1': if (mp_usr[0].cs_len == 0) { log_error ("ERROR: Custom-charset 1 is undefined\n"); exit (-1); }
3493 mp_add_cs_buf (mp_usr[0].cs_buf, mp_usr[0].cs_len, css, css_pos);
3494 break;
3495 case '2': if (mp_usr[1].cs_len == 0) { log_error ("ERROR: Custom-charset 2 is undefined\n"); exit (-1); }
3496 mp_add_cs_buf (mp_usr[1].cs_buf, mp_usr[1].cs_len, css, css_pos);
3497 break;
3498 case '3': if (mp_usr[2].cs_len == 0) { log_error ("ERROR: Custom-charset 3 is undefined\n"); exit (-1); }
3499 mp_add_cs_buf (mp_usr[2].cs_buf, mp_usr[2].cs_len, css, css_pos);
3500 break;
3501 case '4': if (mp_usr[3].cs_len == 0) { log_error ("ERROR: Custom-charset 4 is undefined\n"); exit (-1); }
3502 mp_add_cs_buf (mp_usr[3].cs_buf, mp_usr[3].cs_len, css, css_pos);
3503 break;
3504 case '?': mp_add_cs_buf (&chr, 1, css, css_pos);
3505 break;
3506 default: log_error ("ERROR: syntax error: %s", mask_buf);
3507 exit (-1);
3508 }
3509 }
3510 else
3511 {
3512 if (data.hex_charset)
3513 {
3514 mask_pos++;
3515
3516 // if there is no 2nd hex character, show an error:
3517
3518 if (mask_pos == mask_len)
3519 {
3520 log_error ("ERROR: the hex-charset option always expects couples of exactly 2 hexadecimal chars, failed mask: %s", mask_buf);
3521
3522 exit (-1);
3523 }
3524
3525 char p1 = mask_buf[mask_pos];
3526
3527 // if they are not valid hex character, show an error:
3528
3529 if ((is_valid_hex_char (p0) == 0) || (is_valid_hex_char (p1) == 0))
3530 {
3531 log_error ("ERROR: invalid hex character detected in mask %s", mask_buf);
3532
3533 exit (-1);
3534 }
3535
3536 uint chr = 0;
3537
3538 chr |= hex_convert (p1) << 0;
3539 chr |= hex_convert (p0) << 4;
3540
3541 mp_add_cs_buf (&chr, 1, css, css_pos);
3542 }
3543 else
3544 {
3545 uint chr = p0;
3546
3547 mp_add_cs_buf (&chr, 1, css, css_pos);
3548 }
3549 }
3550 }
3551
3552 if (css_pos == 0)
3553 {
3554 log_error ("ERROR: invalid mask length (0)");
3555
3556 exit (-1);
3557 }
3558
3559 *css_cnt = css_pos;
3560
3561 return (css);
3562 }
3563
3564 void mp_exec (u64 val, char *buf, cs_t *css, int css_cnt)
3565 {
3566 for (int i = 0; i < css_cnt; i++)
3567 {
3568 uint len = css[i].cs_len;
3569 u64 next = val / len;
3570 uint pos = val % len;
3571 buf[i] = (char) css[i].cs_buf[pos] & 0xff;
3572 val = next;
3573 }
3574 }
3575
3576 void mp_cut_at (char *mask, uint max)
3577 {
3578 uint i;
3579 uint j;
3580 uint mask_len = strlen (mask);
3581
3582 for (i = 0, j = 0; i < mask_len && j < max; i++, j++)
3583 {
3584 if (mask[i] == '?') i++;
3585 }
3586
3587 mask[i] = 0;
3588 }
3589
3590 void mp_setup_sys (cs_t *mp_sys)
3591 {
3592 uint pos;
3593 uint chr;
3594 uint donec[CHARSIZ] = { 0 };
3595
3596 for (pos = 0, chr = 'a'; chr <= 'z'; chr++) { donec[chr] = 1;
3597 mp_sys[0].cs_buf[pos++] = chr;
3598 mp_sys[0].cs_len = pos; }
3599
3600 for (pos = 0, chr = 'A'; chr <= 'Z'; chr++) { donec[chr] = 1;
3601 mp_sys[1].cs_buf[pos++] = chr;
3602 mp_sys[1].cs_len = pos; }
3603
3604 for (pos = 0, chr = '0'; chr <= '9'; chr++) { donec[chr] = 1;
3605 mp_sys[2].cs_buf[pos++] = chr;
3606 mp_sys[2].cs_len = pos; }
3607
3608 for (pos = 0, chr = 0x20; chr <= 0x7e; chr++) { if (donec[chr]) continue;
3609 mp_sys[3].cs_buf[pos++] = chr;
3610 mp_sys[3].cs_len = pos; }
3611
3612 for (pos = 0, chr = 0x20; chr <= 0x7e; chr++) { mp_sys[4].cs_buf[pos++] = chr;
3613 mp_sys[4].cs_len = pos; }
3614
3615 for (pos = 0, chr = 0x00; chr <= 0xff; chr++) { mp_sys[5].cs_buf[pos++] = chr;
3616 mp_sys[5].cs_len = pos; }
3617 }
3618
3619 void mp_setup_usr (cs_t *mp_sys, cs_t *mp_usr, char *buf, uint index)
3620 {
3621 FILE *fp = fopen (buf, "rb");
3622
3623 if (fp == NULL || feof (fp)) // feof() in case if file is empty
3624 {
3625 mp_expand (buf, strlen (buf), mp_sys, mp_usr, index, 1);
3626 }
3627 else
3628 {
3629 char mp_file[1024] = { 0 };
3630
3631 size_t len = fread (mp_file, 1, sizeof (mp_file) - 1, fp);
3632
3633 fclose (fp);
3634
3635 len = in_superchop (mp_file);
3636
3637 if (len == 0)
3638 {
3639 log_info ("WARNING: charset file corrupted");
3640
3641 mp_expand (buf, strlen (buf), mp_sys, mp_usr, index, 1);
3642 }
3643 else
3644 {
3645 mp_expand (mp_file, len, mp_sys, mp_usr, index, 0);
3646 }
3647 }
3648 }
3649
3650 void mp_reset_usr (cs_t *mp_usr, uint index)
3651 {
3652 mp_usr[index].cs_len = 0;
3653
3654 memset (mp_usr[index].cs_buf, 0, sizeof (mp_usr[index].cs_buf));
3655 }
3656
3657 char *mp_get_truncated_mask (char *mask_buf, size_t mask_len, uint len)
3658 {
3659 char *new_mask_buf = (char *) mymalloc (256);
3660
3661 uint mask_pos;
3662
3663 uint css_pos;
3664
3665 for (mask_pos = 0, css_pos = 0; mask_pos < mask_len; mask_pos++, css_pos++)
3666 {
3667 if (css_pos == len) break;
3668
3669 char p0 = mask_buf[mask_pos];
3670
3671 new_mask_buf[mask_pos] = p0;
3672
3673 if (p0 == '?')
3674 {
3675 mask_pos++;
3676
3677 if (mask_pos == mask_len) break;
3678
3679 new_mask_buf[mask_pos] = mask_buf[mask_pos];
3680 }
3681 else
3682 {
3683 if (data.hex_charset)
3684 {
3685 mask_pos++;
3686
3687 if (mask_pos == mask_len)
3688 {
3689 log_error ("ERROR: the hex-charset option always expects couples of exactly 2 hexadecimal chars, failed mask: %s", mask_buf);
3690
3691 exit (-1);
3692 }
3693
3694 char p1 = mask_buf[mask_pos];
3695
3696 // if they are not valid hex character, show an error:
3697
3698 if ((is_valid_hex_char (p0) == 0) || (is_valid_hex_char (p1) == 0))
3699 {
3700 log_error ("ERROR: invalid hex character detected in mask: %s", mask_buf);
3701
3702 exit (-1);
3703 }
3704
3705 new_mask_buf[mask_pos] = p1;
3706 }
3707 }
3708 }
3709
3710 if (css_pos == len) return (new_mask_buf);
3711
3712 myfree (new_mask_buf);
3713
3714 return (NULL);
3715 }
3716
3717 /**
3718 * statprocessor
3719 */
3720
3721 u64 sp_get_sum (uint start, uint stop, cs_t *root_css_buf)
3722 {
3723 u64 sum = 1;
3724
3725 uint i;
3726
3727 for (i = start; i < stop; i++)
3728 {
3729 sum *= root_css_buf[i].cs_len;
3730 }
3731
3732 return (sum);
3733 }
3734
3735 void sp_exec (u64 ctx, char *pw_buf, cs_t *root_css_buf, cs_t *markov_css_buf, uint start, uint stop)
3736 {
3737 u64 v = ctx;
3738
3739 cs_t *cs = &root_css_buf[start];
3740
3741 uint i;
3742
3743 for (i = start; i < stop; i++)
3744 {
3745 const u64 m = v % cs->cs_len;
3746 const u64 d = v / cs->cs_len;
3747
3748 v = d;
3749
3750 const uint k = cs->cs_buf[m];
3751
3752 pw_buf[i - start] = (char) k;
3753
3754 cs = &markov_css_buf[(i * CHARSIZ) + k];
3755 }
3756 }
3757
3758 int sp_comp_val (const void *p1, const void *p2)
3759 {
3760 hcstat_table_t *b1 = (hcstat_table_t *) p1;
3761 hcstat_table_t *b2 = (hcstat_table_t *) p2;
3762
3763 return b2->val - b1->val;
3764 }
3765
3766 void sp_setup_tbl (const char *shared_dir, char *hcstat, uint disable, uint classic, hcstat_table_t *root_table_buf, hcstat_table_t *markov_table_buf)
3767 {
3768 uint i;
3769 uint j;
3770 uint k;
3771
3772 /**
3773 * Initialize hcstats
3774 */
3775
3776 u64 *root_stats_buf = (u64 *) mycalloc (SP_ROOT_CNT, sizeof (u64));
3777
3778 u64 *root_stats_ptr = root_stats_buf;
3779
3780 u64 *root_stats_buf_by_pos[SP_PW_MAX];
3781
3782 for (i = 0; i < SP_PW_MAX; i++)
3783 {
3784 root_stats_buf_by_pos[i] = root_stats_ptr;
3785
3786 root_stats_ptr += CHARSIZ;
3787 }
3788
3789 u64 *markov_stats_buf = (u64 *) mycalloc (SP_MARKOV_CNT, sizeof (u64));
3790
3791 u64 *markov_stats_ptr = markov_stats_buf;
3792
3793 u64 *markov_stats_buf_by_key[SP_PW_MAX][CHARSIZ];
3794
3795 for (i = 0; i < SP_PW_MAX; i++)
3796 {
3797 for (j = 0; j < CHARSIZ; j++)
3798 {
3799 markov_stats_buf_by_key[i][j] = markov_stats_ptr;
3800
3801 markov_stats_ptr += CHARSIZ;
3802 }
3803 }
3804
3805 /**
3806 * Load hcstats File
3807 */
3808
3809 if (hcstat == NULL)
3810 {
3811 char hcstat_tmp[256] = { 0 };
3812
3813 snprintf (hcstat_tmp, sizeof (hcstat_tmp) - 1, "%s/%s", shared_dir, SP_HCSTAT);
3814
3815 hcstat = hcstat_tmp;
3816 }
3817
3818 FILE *fd = fopen (hcstat, "rb");
3819
3820 if (fd == NULL)
3821 {
3822 log_error ("%s: %s", hcstat, strerror (errno));
3823
3824 exit (-1);
3825 }
3826
3827 if (fread (root_stats_buf, sizeof (u64), SP_ROOT_CNT, fd) != SP_ROOT_CNT)
3828 {
3829 log_error ("%s: Could not load data", hcstat);
3830
3831 fclose (fd);
3832
3833 exit (-1);
3834 }
3835
3836 if (fread (markov_stats_buf, sizeof (u64), SP_MARKOV_CNT, fd) != SP_MARKOV_CNT)
3837 {
3838 log_error ("%s: Could not load data", hcstat);
3839
3840 fclose (fd);
3841
3842 exit (-1);
3843 }
3844
3845 fclose (fd);
3846
3847 /**
3848 * Markov modifier of hcstat_table on user request
3849 */
3850
3851 if (disable)
3852 {
3853 memset (root_stats_buf, 0, SP_ROOT_CNT * sizeof (u64));
3854 memset (markov_stats_buf, 0, SP_MARKOV_CNT * sizeof (u64));
3855 }
3856
3857 if (classic)
3858 {
3859 /* Add all stats to first position */
3860
3861 for (i = 1; i < SP_PW_MAX; i++)
3862 {
3863 u64 *out = root_stats_buf_by_pos[0];
3864 u64 *in = root_stats_buf_by_pos[i];
3865
3866 for (j = 0; j < CHARSIZ; j++)
3867 {
3868 *out++ += *in++;
3869 }
3870 }
3871
3872 for (i = 1; i < SP_PW_MAX; i++)
3873 {
3874 u64 *out = markov_stats_buf_by_key[0][0];
3875 u64 *in = markov_stats_buf_by_key[i][0];
3876
3877 for (j = 0; j < CHARSIZ; j++)
3878 {
3879 for (k = 0; k < CHARSIZ; k++)
3880 {
3881 *out++ += *in++;
3882 }
3883 }
3884 }
3885
3886 /* copy them to all pw_positions */
3887
3888 for (i = 1; i < SP_PW_MAX; i++)
3889 {
3890 memcpy (root_stats_buf_by_pos[i], root_stats_buf_by_pos[0], CHARSIZ * sizeof (u64));
3891 }
3892
3893 for (i = 1; i < SP_PW_MAX; i++)
3894 {
3895 memcpy (markov_stats_buf_by_key[i][0], markov_stats_buf_by_key[0][0], CHARSIZ * CHARSIZ * sizeof (u64));
3896 }
3897 }
3898
3899 /**
3900 * Initialize tables
3901 */
3902
3903 hcstat_table_t *root_table_ptr = root_table_buf;
3904
3905 hcstat_table_t *root_table_buf_by_pos[SP_PW_MAX];
3906
3907 for (i = 0; i < SP_PW_MAX; i++)
3908 {
3909 root_table_buf_by_pos[i] = root_table_ptr;
3910
3911 root_table_ptr += CHARSIZ;
3912 }
3913
3914 hcstat_table_t *markov_table_ptr = markov_table_buf;
3915
3916 hcstat_table_t *markov_table_buf_by_key[SP_PW_MAX][CHARSIZ];
3917
3918 for (i = 0; i < SP_PW_MAX; i++)
3919 {
3920 for (j = 0; j < CHARSIZ; j++)
3921 {
3922 markov_table_buf_by_key[i][j] = markov_table_ptr;
3923
3924 markov_table_ptr += CHARSIZ;
3925 }
3926 }
3927
3928 /**
3929 * Convert hcstat to tables
3930 */
3931
3932 for (i = 0; i < SP_ROOT_CNT; i++)
3933 {
3934 uint key = i % CHARSIZ;
3935
3936 root_table_buf[i].key = key;
3937 root_table_buf[i].val = root_stats_buf[i];
3938 }
3939
3940 for (i = 0; i < SP_MARKOV_CNT; i++)
3941 {
3942 uint key = i % CHARSIZ;
3943
3944 markov_table_buf[i].key = key;
3945 markov_table_buf[i].val = markov_stats_buf[i];
3946 }
3947
3948 myfree (root_stats_buf);
3949 myfree (markov_stats_buf);
3950
3951 /**
3952 * Finally sort them
3953 */
3954
3955 for (i = 0; i < SP_PW_MAX; i++)
3956 {
3957 qsort (root_table_buf_by_pos[i], CHARSIZ, sizeof (hcstat_table_t), sp_comp_val);
3958 }
3959
3960 for (i = 0; i < SP_PW_MAX; i++)
3961 {
3962 for (j = 0; j < CHARSIZ; j++)
3963 {
3964 qsort (markov_table_buf_by_key[i][j], CHARSIZ, sizeof (hcstat_table_t), sp_comp_val);
3965 }
3966 }
3967 }
3968
3969 void sp_tbl_to_css (hcstat_table_t *root_table_buf, hcstat_table_t *markov_table_buf, cs_t *root_css_buf, cs_t *markov_css_buf, uint threshold, uint uniq_tbls[SP_PW_MAX][CHARSIZ])
3970 {
3971 /**
3972 * Convert tables to css
3973 */
3974
3975 for (uint i = 0; i < SP_ROOT_CNT; i++)
3976 {
3977 uint pw_pos = i / CHARSIZ;
3978
3979 cs_t *cs = &root_css_buf[pw_pos];
3980
3981 if (cs->cs_len == threshold) continue;
3982
3983 uint key = root_table_buf[i].key;
3984
3985 if (uniq_tbls[pw_pos][key] == 0) continue;
3986
3987 cs->cs_buf[cs->cs_len] = key;
3988
3989 cs->cs_len++;
3990 }
3991
3992 /**
3993 * Convert table to css
3994 */
3995
3996 for (uint i = 0; i < SP_MARKOV_CNT; i++)
3997 {
3998 uint c = i / CHARSIZ;
3999
4000 cs_t *cs = &markov_css_buf[c];
4001
4002 if (cs->cs_len == threshold) continue;
4003
4004 uint pw_pos = c / CHARSIZ;
4005
4006 uint key = markov_table_buf[i].key;
4007
4008 if ((pw_pos + 1) < SP_PW_MAX) if (uniq_tbls[pw_pos + 1][key] == 0) continue;
4009
4010 cs->cs_buf[cs->cs_len] = key;
4011
4012 cs->cs_len++;
4013 }
4014
4015 /*
4016 for (uint i = 0; i < 8; i++)
4017 {
4018 for (uint j = 0x20; j < 0x80; j++)
4019 {
4020 cs_t *ptr = &markov_css_buf[(i * CHARSIZ) + j];
4021
4022 printf ("pos:%u key:%u len:%u\n", i, j, ptr->cs_len);
4023
4024 for (uint k = 0; k < 10; k++)
4025 {
4026 printf (" %u\n", ptr->cs_buf[k]);
4027 }
4028 }
4029 }
4030 */
4031 }
4032
4033 void sp_stretch_root (hcstat_table_t *in, hcstat_table_t *out)
4034 {
4035 for (uint i = 0; i < SP_PW_MAX; i += 2)
4036 {
4037 memcpy (out, in, CHARSIZ * sizeof (hcstat_table_t));
4038
4039 out += CHARSIZ;
4040 in += CHARSIZ;
4041
4042 out->key = 0;
4043 out->val = 1;
4044
4045 out++;
4046
4047 for (uint j = 1; j < CHARSIZ; j++)
4048 {
4049 out->key = j;
4050 out->val = 0;
4051
4052 out++;
4053 }
4054 }
4055 }
4056
4057 void sp_stretch_markov (hcstat_table_t *in, hcstat_table_t *out)
4058 {
4059 for (uint i = 0; i < SP_PW_MAX; i += 2)
4060 {
4061 memcpy (out, in, CHARSIZ * CHARSIZ * sizeof (hcstat_table_t));
4062
4063 out += CHARSIZ * CHARSIZ;
4064 in += CHARSIZ * CHARSIZ;
4065
4066 for (uint j = 0; j < CHARSIZ; j++)
4067 {
4068 out->key = 0;
4069 out->val = 1;
4070
4071 out++;
4072
4073 for (uint k = 1; k < CHARSIZ; k++)
4074 {
4075 out->key = k;
4076 out->val = 0;
4077
4078 out++;
4079 }
4080 }
4081 }
4082 }
4083
4084 /**
4085 * mixed shared functions
4086 */
4087
4088 void dump_hex (const u8 *s, const int sz)
4089 {
4090 for (int i = 0; i < sz; i++)
4091 {
4092 log_info_nn ("%02x ", s[i]);
4093 }
4094
4095 log_info ("");
4096 }
4097
4098 void usage_mini_print (const char *progname)
4099 {
4100 for (uint i = 0; USAGE_MINI[i] != NULL; i++) log_info (USAGE_MINI[i], progname);
4101 }
4102
4103 void usage_big_print (const char *progname)
4104 {
4105 for (uint i = 0; USAGE_BIG[i] != NULL; i++) log_info (USAGE_BIG[i], progname);
4106 }
4107
4108 char *get_exec_path ()
4109 {
4110 int exec_path_len = 1024;
4111
4112 char *exec_path = (char *) mymalloc (exec_path_len);
4113
4114 #ifdef LINUX
4115
4116 char tmp[32] = { 0 };
4117
4118 snprintf (tmp, sizeof (tmp) - 1, "/proc/%d/exe", getpid ());
4119
4120 const int len = readlink (tmp, exec_path, exec_path_len - 1);
4121
4122 #elif WIN
4123
4124 const int len = GetModuleFileName (NULL, exec_path, exec_path_len - 1);
4125
4126 #elif OSX
4127
4128 uint size = exec_path_len;
4129
4130 if (_NSGetExecutablePath (exec_path, &size) != 0)
4131 {
4132 log_error("! executable path buffer too small\n");
4133
4134 exit (-1);
4135 }
4136
4137 const int len = strlen (exec_path);
4138
4139 #else
4140 #error Your Operating System is not supported or detected
4141 #endif
4142
4143 exec_path[len] = 0;
4144
4145 return exec_path;
4146 }
4147
4148 char *get_install_dir (const char *progname)
4149 {
4150 char *install_dir = mystrdup (progname);
4151 char *last_slash = NULL;
4152
4153 if ((last_slash = strrchr (install_dir, '/')) != NULL)
4154 {
4155 *last_slash = 0;
4156 }
4157 else if ((last_slash = strrchr (install_dir, '\\')) != NULL)
4158 {
4159 *last_slash = 0;
4160 }
4161 else
4162 {
4163 install_dir[0] = '.';
4164 install_dir[1] = 0;
4165 }
4166
4167 return (install_dir);
4168 }
4169
4170 char *get_profile_dir (const char *homedir)
4171 {
4172 #define DOT_HASHCAT ".hashcat"
4173
4174 size_t len = strlen (homedir) + 1 + strlen (DOT_HASHCAT) + 1;
4175
4176 char *profile_dir = (char *) mymalloc (len + 1);
4177
4178 snprintf (profile_dir, len, "%s/%s", homedir, DOT_HASHCAT);
4179
4180 return profile_dir;
4181 }
4182
4183 char *get_session_dir (const char *profile_dir)
4184 {
4185 #define SESSIONS_FOLDER "sessions"
4186
4187 size_t len = strlen (profile_dir) + 1 + strlen (SESSIONS_FOLDER) + 1;
4188
4189 char *session_dir = (char *) mymalloc (len + 1);
4190
4191 snprintf (session_dir, len, "%s/%s", profile_dir, SESSIONS_FOLDER);
4192
4193 return session_dir;
4194 }
4195
4196 uint count_lines (FILE *fd)
4197 {
4198 uint cnt = 0;
4199
4200 char *buf = (char *) mymalloc (BUFSIZ + 1);
4201
4202 char prev = '\n';
4203
4204 while (!feof (fd))
4205 {
4206 size_t nread = fread (buf, sizeof (char), BUFSIZ, fd);
4207
4208 if (nread < 1) continue;
4209
4210 size_t i;
4211
4212 for (i = 0; i < nread; i++)
4213 {
4214 if (prev == '\n') cnt++;
4215
4216 prev = buf[i];
4217 }
4218 }
4219
4220 myfree (buf);
4221
4222 return cnt;
4223 }
4224
4225 void truecrypt_crc32 (const char *filename, u8 keytab[64])
4226 {
4227 uint crc = ~0;
4228
4229 FILE *fd = fopen (filename, "rb");
4230
4231 if (fd == NULL)
4232 {
4233 log_error ("%s: %s", filename, strerror (errno));
4234
4235 exit (-1);
4236 }
4237
4238 #define MAX_KEY_SIZE (1024 * 1024)
4239
4240 u8 *buf = (u8 *) mymalloc (MAX_KEY_SIZE + 1);
4241
4242 int nread = fread (buf, sizeof (u8), MAX_KEY_SIZE, fd);
4243
4244 fclose (fd);
4245
4246 int kpos = 0;
4247
4248 for (int fpos = 0; fpos < nread; fpos++)
4249 {
4250 crc = crc32tab[(crc ^ buf[fpos]) & 0xff] ^ (crc >> 8);
4251
4252 keytab[kpos++] += (crc >> 24) & 0xff;
4253 keytab[kpos++] += (crc >> 16) & 0xff;
4254 keytab[kpos++] += (crc >> 8) & 0xff;
4255 keytab[kpos++] += (crc >> 0) & 0xff;
4256
4257 if (kpos >= 64) kpos = 0;
4258 }
4259
4260 myfree (buf);
4261 }
4262
4263 #ifdef OSX
4264 int pthread_setaffinity_np (pthread_t thread, size_t cpu_size, cpu_set_t *cpu_set)
4265 {
4266 int core;
4267
4268 for (core = 0; core < (8 * (int)cpu_size); core++)
4269 if (CPU_ISSET(core, cpu_set)) break;
4270
4271 thread_affinity_policy_data_t policy = { core };
4272
4273 const int rc = thread_policy_set (pthread_mach_thread_np (thread), THREAD_AFFINITY_POLICY, (thread_policy_t) &policy, 1);
4274
4275 if (data.quiet == 0)
4276 {
4277 if (rc != KERN_SUCCESS)
4278 {
4279 log_error ("ERROR: %s : %d", "thread_policy_set()", rc);
4280 }
4281 }
4282
4283 return rc;
4284 }
4285 #endif
4286
4287 void set_cpu_affinity (char *cpu_affinity)
4288 {
4289 #ifdef WIN
4290 DWORD_PTR aff_mask = 0;
4291 #elif _POSIX
4292 cpu_set_t cpuset;
4293 CPU_ZERO (&cpuset);
4294 #endif
4295
4296 if (cpu_affinity)
4297 {
4298 char *devices = strdup (cpu_affinity);
4299
4300 char *next = strtok (devices, ",");
4301
4302 do
4303 {
4304 uint cpu_id = atoi (next);
4305
4306 if (cpu_id == 0)
4307 {
4308 #ifdef WIN
4309 aff_mask = 0;
4310 #elif _POSIX
4311 CPU_ZERO (&cpuset);
4312 #endif
4313
4314 break;
4315 }
4316
4317 if (cpu_id > 32)
4318 {
4319 log_error ("ERROR: invalid cpu_id %u specified", cpu_id);
4320
4321 exit (-1);
4322 }
4323
4324 #ifdef WIN
4325 aff_mask |= 1 << (cpu_id - 1);
4326 #elif _POSIX
4327 CPU_SET ((cpu_id - 1), &cpuset);
4328 #endif
4329
4330 } while ((next = strtok (NULL, ",")) != NULL);
4331
4332 free (devices);
4333 }
4334
4335 #ifdef WIN
4336 SetProcessAffinityMask (GetCurrentProcess (), aff_mask);
4337 SetThreadAffinityMask (GetCurrentThread (), aff_mask);
4338 #elif _POSIX
4339 pthread_t thread = pthread_self ();
4340 pthread_setaffinity_np (thread, sizeof (cpu_set_t), &cpuset);
4341 #endif
4342 }
4343
4344 void *rulefind (const void *key, void *base, int nmemb, size_t size, int (*compar) (const void *, const void *))
4345 {
4346 char *element, *end;
4347
4348 end = (char *) base + nmemb * size;
4349
4350 for (element = (char *) base; element < end; element += size)
4351 if (!compar (element, key))
4352 return element;
4353
4354 return NULL;
4355 }
4356
4357 int sort_by_u32 (const void *v1, const void *v2)
4358 {
4359 const u32 *s1 = (const u32 *) v1;
4360 const u32 *s2 = (const u32 *) v2;
4361
4362 return *s1 - *s2;
4363 }
4364
4365 int sort_by_salt (const void *v1, const void *v2)
4366 {
4367 const salt_t *s1 = (const salt_t *) v1;
4368 const salt_t *s2 = (const salt_t *) v2;
4369
4370 const int res1 = s1->salt_len - s2->salt_len;
4371
4372 if (res1 != 0) return (res1);
4373
4374 const int res2 = s1->salt_iter - s2->salt_iter;
4375
4376 if (res2 != 0) return (res2);
4377
4378 uint n;
4379
4380 n = 16;
4381
4382 while (n--)
4383 {
4384 if (s1->salt_buf[n] > s2->salt_buf[n]) return ( 1);
4385 if (s1->salt_buf[n] < s2->salt_buf[n]) return (-1);
4386 }
4387
4388 n = 8;
4389
4390 while (n--)
4391 {
4392 if (s1->salt_buf_pc[n] > s2->salt_buf_pc[n]) return ( 1);
4393 if (s1->salt_buf_pc[n] < s2->salt_buf_pc[n]) return (-1);
4394 }
4395
4396 return (0);
4397 }
4398
4399 int sort_by_salt_buf (const void *v1, const void *v2)
4400 {
4401 const pot_t *p1 = (const pot_t *) v1;
4402 const pot_t *p2 = (const pot_t *) v2;
4403
4404 const hash_t *h1 = &p1->hash;
4405 const hash_t *h2 = &p2->hash;
4406
4407 const salt_t *s1 = h1->salt;
4408 const salt_t *s2 = h2->salt;
4409
4410 uint n = 16;
4411
4412 while (n--)
4413 {
4414 if (s1->salt_buf[n] > s2->salt_buf[n]) return ( 1);
4415 if (s1->salt_buf[n] < s2->salt_buf[n]) return (-1);
4416 }
4417
4418 return 0;
4419 }
4420
4421 int sort_by_hash_t_salt (const void *v1, const void *v2)
4422 {
4423 const hash_t *h1 = (const hash_t *) v1;
4424 const hash_t *h2 = (const hash_t *) v2;
4425
4426 const salt_t *s1 = h1->salt;
4427 const salt_t *s2 = h2->salt;
4428
4429 // testphase: this should work
4430 uint n = 16;
4431
4432 while (n--)
4433 {
4434 if (s1->salt_buf[n] > s2->salt_buf[n]) return ( 1);
4435 if (s1->salt_buf[n] < s2->salt_buf[n]) return (-1);
4436 }
4437
4438 /* original code, seems buggy since salt_len can be very big (had a case with 131 len)
4439 also it thinks salt_buf[x] is a char but its a uint so salt_len should be / 4
4440 if (s1->salt_len > s2->salt_len) return ( 1);
4441 if (s1->salt_len < s2->salt_len) return (-1);
4442
4443 uint n = s1->salt_len;
4444
4445 while (n--)
4446 {
4447 if (s1->salt_buf[n] > s2->salt_buf[n]) return ( 1);
4448 if (s1->salt_buf[n] < s2->salt_buf[n]) return (-1);
4449 }
4450 */
4451
4452 return 0;
4453 }
4454
4455 int sort_by_hash_t_salt_hccap (const void *v1, const void *v2)
4456 {
4457 const hash_t *h1 = (const hash_t *) v1;
4458 const hash_t *h2 = (const hash_t *) v2;
4459
4460 const salt_t *s1 = h1->salt;
4461 const salt_t *s2 = h2->salt;
4462
4463 // 16 - 2 (since last 2 uints contain the digest)
4464 uint n = 14;
4465
4466 while (n--)
4467 {
4468 if (s1->salt_buf[n] > s2->salt_buf[n]) return ( 1);
4469 if (s1->salt_buf[n] < s2->salt_buf[n]) return (-1);
4470 }
4471
4472 return 0;
4473 }
4474
4475 int sort_by_hash_no_salt (const void *v1, const void *v2)
4476 {
4477 const hash_t *h1 = (const hash_t *) v1;
4478 const hash_t *h2 = (const hash_t *) v2;
4479
4480 const void *d1 = h1->digest;
4481 const void *d2 = h2->digest;
4482
4483 return data.sort_by_digest (d1, d2);
4484 }
4485
4486 int sort_by_hash (const void *v1, const void *v2)
4487 {
4488 const hash_t *h1 = (const hash_t *) v1;
4489 const hash_t *h2 = (const hash_t *) v2;
4490
4491 if (data.isSalted)
4492 {
4493 const salt_t *s1 = h1->salt;
4494 const salt_t *s2 = h2->salt;
4495
4496 int res = sort_by_salt (s1, s2);
4497
4498 if (res != 0) return (res);
4499 }
4500
4501 const void *d1 = h1->digest;
4502 const void *d2 = h2->digest;
4503
4504 return data.sort_by_digest (d1, d2);
4505 }
4506
4507 int sort_by_pot (const void *v1, const void *v2)
4508 {
4509 const pot_t *p1 = (const pot_t *) v1;
4510 const pot_t *p2 = (const pot_t *) v2;
4511
4512 const hash_t *h1 = &p1->hash;
4513 const hash_t *h2 = &p2->hash;
4514
4515 return sort_by_hash (h1, h2);
4516 }
4517
4518 int sort_by_mtime (const void *p1, const void *p2)
4519 {
4520 const char **f1 = (const char **) p1;
4521 const char **f2 = (const char **) p2;
4522
4523 struct stat s1; stat (*f1, &s1);
4524 struct stat s2; stat (*f2, &s2);
4525
4526 return s2.st_mtime - s1.st_mtime;
4527 }
4528
4529 int sort_by_cpu_rule (const void *p1, const void *p2)
4530 {
4531 const cpu_rule_t *r1 = (const cpu_rule_t *) p1;
4532 const cpu_rule_t *r2 = (const cpu_rule_t *) p2;
4533
4534 return memcmp (r1, r2, sizeof (cpu_rule_t));
4535 }
4536
4537 int sort_by_kernel_rule (const void *p1, const void *p2)
4538 {
4539 const kernel_rule_t *r1 = (const kernel_rule_t *) p1;
4540 const kernel_rule_t *r2 = (const kernel_rule_t *) p2;
4541
4542 return memcmp (r1, r2, sizeof (kernel_rule_t));
4543 }
4544
4545 int sort_by_stringptr (const void *p1, const void *p2)
4546 {
4547 const char **s1 = (const char **) p1;
4548 const char **s2 = (const char **) p2;
4549
4550 return strcmp (*s1, *s2);
4551 }
4552
4553 int sort_by_dictstat (const void *s1, const void *s2)
4554 {
4555 dictstat_t *d1 = (dictstat_t *) s1;
4556 dictstat_t *d2 = (dictstat_t *) s2;
4557
4558 #ifdef LINUX
4559 d2->stat.st_atim = d1->stat.st_atim;
4560 #else
4561 d2->stat.st_atime = d1->stat.st_atime;
4562 #endif
4563
4564 return memcmp (&d1->stat, &d2->stat, sizeof (struct stat));
4565 }
4566
4567 int sort_by_bitmap (const void *p1, const void *p2)
4568 {
4569 const bitmap_result_t *b1 = (const bitmap_result_t *) p1;
4570 const bitmap_result_t *b2 = (const bitmap_result_t *) p2;
4571
4572 return b1->collisions - b2->collisions;
4573 }
4574
4575 int sort_by_digest_4_2 (const void *v1, const void *v2)
4576 {
4577 const u32 *d1 = (const u32 *) v1;
4578 const u32 *d2 = (const u32 *) v2;
4579
4580 uint n = 2;
4581
4582 while (n--)
4583 {
4584 if (d1[n] > d2[n]) return ( 1);
4585 if (d1[n] < d2[n]) return (-1);
4586 }
4587
4588 return (0);
4589 }
4590
4591 int sort_by_digest_4_4 (const void *v1, const void *v2)
4592 {
4593 const u32 *d1 = (const u32 *) v1;
4594 const u32 *d2 = (const u32 *) v2;
4595
4596 uint n = 4;
4597
4598 while (n--)
4599 {
4600 if (d1[n] > d2[n]) return ( 1);
4601 if (d1[n] < d2[n]) return (-1);
4602 }
4603
4604 return (0);
4605 }
4606
4607 int sort_by_digest_4_5 (const void *v1, const void *v2)
4608 {
4609 const u32 *d1 = (const u32 *) v1;
4610 const u32 *d2 = (const u32 *) v2;
4611
4612 uint n = 5;
4613
4614 while (n--)
4615 {
4616 if (d1[n] > d2[n]) return ( 1);
4617 if (d1[n] < d2[n]) return (-1);
4618 }
4619
4620 return (0);
4621 }
4622
4623 int sort_by_digest_4_6 (const void *v1, const void *v2)
4624 {
4625 const u32 *d1 = (const u32 *) v1;
4626 const u32 *d2 = (const u32 *) v2;
4627
4628 uint n = 6;
4629
4630 while (n--)
4631 {
4632 if (d1[n] > d2[n]) return ( 1);
4633 if (d1[n] < d2[n]) return (-1);
4634 }
4635
4636 return (0);
4637 }
4638
4639 int sort_by_digest_4_8 (const void *v1, const void *v2)
4640 {
4641 const u32 *d1 = (const u32 *) v1;
4642 const u32 *d2 = (const u32 *) v2;
4643
4644 uint n = 8;
4645
4646 while (n--)
4647 {
4648 if (d1[n] > d2[n]) return ( 1);
4649 if (d1[n] < d2[n]) return (-1);
4650 }
4651
4652 return (0);
4653 }
4654
4655 int sort_by_digest_4_16 (const void *v1, const void *v2)
4656 {
4657 const u32 *d1 = (const u32 *) v1;
4658 const u32 *d2 = (const u32 *) v2;
4659
4660 uint n = 16;
4661
4662 while (n--)
4663 {
4664 if (d1[n] > d2[n]) return ( 1);
4665 if (d1[n] < d2[n]) return (-1);
4666 }
4667
4668 return (0);
4669 }
4670
4671 int sort_by_digest_4_32 (const void *v1, const void *v2)
4672 {
4673 const u32 *d1 = (const u32 *) v1;
4674 const u32 *d2 = (const u32 *) v2;
4675
4676 uint n = 32;
4677
4678 while (n--)
4679 {
4680 if (d1[n] > d2[n]) return ( 1);
4681 if (d1[n] < d2[n]) return (-1);
4682 }
4683
4684 return (0);
4685 }
4686
4687 int sort_by_digest_4_64 (const void *v1, const void *v2)
4688 {
4689 const u32 *d1 = (const u32 *) v1;
4690 const u32 *d2 = (const u32 *) v2;
4691
4692 uint n = 64;
4693
4694 while (n--)
4695 {
4696 if (d1[n] > d2[n]) return ( 1);
4697 if (d1[n] < d2[n]) return (-1);
4698 }
4699
4700 return (0);
4701 }
4702
4703 int sort_by_digest_8_8 (const void *v1, const void *v2)
4704 {
4705 const u64 *d1 = (const u64 *) v1;
4706 const u64 *d2 = (const u64 *) v2;
4707
4708 uint n = 8;
4709
4710 while (n--)
4711 {
4712 if (d1[n] > d2[n]) return ( 1);
4713 if (d1[n] < d2[n]) return (-1);
4714 }
4715
4716 return (0);
4717 }
4718
4719 int sort_by_digest_8_16 (const void *v1, const void *v2)
4720 {
4721 const u64 *d1 = (const u64 *) v1;
4722 const u64 *d2 = (const u64 *) v2;
4723
4724 uint n = 16;
4725
4726 while (n--)
4727 {
4728 if (d1[n] > d2[n]) return ( 1);
4729 if (d1[n] < d2[n]) return (-1);
4730 }
4731
4732 return (0);
4733 }
4734
4735 int sort_by_digest_8_25 (const void *v1, const void *v2)
4736 {
4737 const u64 *d1 = (const u64 *) v1;
4738 const u64 *d2 = (const u64 *) v2;
4739
4740 uint n = 25;
4741
4742 while (n--)
4743 {
4744 if (d1[n] > d2[n]) return ( 1);
4745 if (d1[n] < d2[n]) return (-1);
4746 }
4747
4748 return (0);
4749 }
4750
4751 int sort_by_digest_p0p1 (const void *v1, const void *v2)
4752 {
4753 const u32 *d1 = (const u32 *) v1;
4754 const u32 *d2 = (const u32 *) v2;
4755
4756 const uint dgst_pos0 = data.dgst_pos0;
4757 const uint dgst_pos1 = data.dgst_pos1;
4758 const uint dgst_pos2 = data.dgst_pos2;
4759 const uint dgst_pos3 = data.dgst_pos3;
4760
4761 if (d1[dgst_pos3] > d2[dgst_pos3]) return ( 1);
4762 if (d1[dgst_pos3] < d2[dgst_pos3]) return (-1);
4763 if (d1[dgst_pos2] > d2[dgst_pos2]) return ( 1);
4764 if (d1[dgst_pos2] < d2[dgst_pos2]) return (-1);
4765 if (d1[dgst_pos1] > d2[dgst_pos1]) return ( 1);
4766 if (d1[dgst_pos1] < d2[dgst_pos1]) return (-1);
4767 if (d1[dgst_pos0] > d2[dgst_pos0]) return ( 1);
4768 if (d1[dgst_pos0] < d2[dgst_pos0]) return (-1);
4769
4770 return (0);
4771 }
4772
4773 int sort_by_tuning_db_alias (const void *v1, const void *v2)
4774 {
4775 const tuning_db_alias_t *t1 = (const tuning_db_alias_t *) v1;
4776 const tuning_db_alias_t *t2 = (const tuning_db_alias_t *) v2;
4777
4778 const int res1 = strcmp (t1->device_name, t2->device_name);
4779
4780 if (res1 != 0) return (res1);
4781
4782 return 0;
4783 }
4784
4785 int sort_by_tuning_db_entry (const void *v1, const void *v2)
4786 {
4787 const tuning_db_entry_t *t1 = (const tuning_db_entry_t *) v1;
4788 const tuning_db_entry_t *t2 = (const tuning_db_entry_t *) v2;
4789
4790 const int res1 = strcmp (t1->device_name, t2->device_name);
4791
4792 if (res1 != 0) return (res1);
4793
4794 const int res2 = t1->attack_mode
4795 - t2->attack_mode;
4796
4797 if (res2 != 0) return (res2);
4798
4799 const int res3 = t1->hash_type
4800 - t2->hash_type;
4801
4802 if (res3 != 0) return (res3);
4803
4804 return 0;
4805 }
4806
4807 void format_debug (char *debug_file, uint debug_mode, unsigned char *orig_plain_ptr, uint orig_plain_len, unsigned char *mod_plain_ptr, uint mod_plain_len, char *rule_buf, int rule_len)
4808 {
4809 uint outfile_autohex = data.outfile_autohex;
4810
4811 unsigned char *rule_ptr = (unsigned char *) rule_buf;
4812
4813 FILE *debug_fp = NULL;
4814
4815 if (debug_file != NULL)
4816 {
4817 debug_fp = fopen (debug_file, "ab");
4818
4819 lock_file (debug_fp);
4820 }
4821 else
4822 {
4823 debug_fp = stderr;
4824 }
4825
4826 if (debug_fp == NULL)
4827 {
4828 log_info ("WARNING: Could not open debug-file for writing");
4829 }
4830 else
4831 {
4832 if ((debug_mode == 2) || (debug_mode == 3) || (debug_mode == 4))
4833 {
4834 format_plain (debug_fp, orig_plain_ptr, orig_plain_len, outfile_autohex);
4835
4836 if ((debug_mode == 3) || (debug_mode == 4)) fputc (':', debug_fp);
4837 }
4838
4839 fwrite (rule_ptr, rule_len, 1, debug_fp);
4840
4841 if (debug_mode == 4)
4842 {
4843 fputc (':', debug_fp);
4844
4845 format_plain (debug_fp, mod_plain_ptr, mod_plain_len, outfile_autohex);
4846 }
4847
4848 fputc ('\n', debug_fp);
4849
4850 if (debug_file != NULL) fclose (debug_fp);
4851 }
4852 }
4853
4854 void format_plain (FILE *fp, unsigned char *plain_ptr, uint plain_len, uint outfile_autohex)
4855 {
4856 int needs_hexify = 0;
4857
4858 if (outfile_autohex == 1)
4859 {
4860 for (uint i = 0; i < plain_len; i++)
4861 {
4862 if (plain_ptr[i] < 0x20)
4863 {
4864 needs_hexify = 1;
4865
4866 break;
4867 }
4868
4869 if (plain_ptr[i] > 0x7f)
4870 {
4871 needs_hexify = 1;
4872
4873 break;
4874 }
4875 }
4876 }
4877
4878 if (needs_hexify == 1)
4879 {
4880 fprintf (fp, "$HEX[");
4881
4882 for (uint i = 0; i < plain_len; i++)
4883 {
4884 fprintf (fp, "%02x", plain_ptr[i]);
4885 }
4886
4887 fprintf (fp, "]");
4888 }
4889 else
4890 {
4891 fwrite (plain_ptr, plain_len, 1, fp);
4892 }
4893 }
4894
4895 void format_output (FILE *out_fp, char *out_buf, unsigned char *plain_ptr, const uint plain_len, const u64 crackpos, unsigned char *username, const uint user_len)
4896 {
4897 uint outfile_format = data.outfile_format;
4898
4899 char separator = data.separator;
4900
4901 if (outfile_format & OUTFILE_FMT_HASH)
4902 {
4903 fprintf (out_fp, "%s", out_buf);
4904
4905 if (outfile_format & (OUTFILE_FMT_PLAIN | OUTFILE_FMT_HEXPLAIN | OUTFILE_FMT_CRACKPOS))
4906 {
4907 fputc (separator, out_fp);
4908 }
4909 }
4910 else if (data.username)
4911 {
4912 if (username != NULL)
4913 {
4914 for (uint i = 0; i < user_len; i++)
4915 {
4916 fprintf (out_fp, "%c", username[i]);
4917 }
4918
4919 if (outfile_format & (OUTFILE_FMT_PLAIN | OUTFILE_FMT_HEXPLAIN | OUTFILE_FMT_CRACKPOS))
4920 {
4921 fputc (separator, out_fp);
4922 }
4923 }
4924 }
4925
4926 if (outfile_format & OUTFILE_FMT_PLAIN)
4927 {
4928 format_plain (out_fp, plain_ptr, plain_len, data.outfile_autohex);
4929
4930 if (outfile_format & (OUTFILE_FMT_HEXPLAIN | OUTFILE_FMT_CRACKPOS))
4931 {
4932 fputc (separator, out_fp);
4933 }
4934 }
4935
4936 if (outfile_format & OUTFILE_FMT_HEXPLAIN)
4937 {
4938 for (uint i = 0; i < plain_len; i++)
4939 {
4940 fprintf (out_fp, "%02x", plain_ptr[i]);
4941 }
4942
4943 if (outfile_format & (OUTFILE_FMT_CRACKPOS))
4944 {
4945 fputc (separator, out_fp);
4946 }
4947 }
4948
4949 if (outfile_format & OUTFILE_FMT_CRACKPOS)
4950 {
4951 #ifdef _WIN
4952 __mingw_fprintf (out_fp, "%llu", crackpos);
4953 #endif
4954
4955 #ifdef _POSIX
4956 #ifdef __x86_64__
4957 fprintf (out_fp, "%lu", (unsigned long) crackpos);
4958 #else
4959 fprintf (out_fp, "%llu", crackpos);
4960 #endif
4961 #endif
4962 }
4963
4964 fputc ('\n', out_fp);
4965 }
4966
4967 void handle_show_request (pot_t *pot, uint pot_cnt, char *input_buf, int input_len, hash_t *hashes_buf, int (*sort_by_pot) (const void *, const void *), FILE *out_fp)
4968 {
4969 pot_t pot_key;
4970
4971 pot_key.hash.salt = hashes_buf->salt;
4972 pot_key.hash.digest = hashes_buf->digest;
4973
4974 pot_t *pot_ptr = (pot_t *) bsearch (&pot_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
4975
4976 if (pot_ptr)
4977 {
4978 log_info_nn ("");
4979
4980 input_buf[input_len] = 0;
4981
4982 // user
4983 unsigned char *username = NULL;
4984 uint user_len = 0;
4985
4986 if (data.username)
4987 {
4988 user_t *user = hashes_buf->hash_info->user;
4989
4990 if (user)
4991 {
4992 username = (unsigned char *) (user->user_name);
4993
4994 user_len = user->user_len;
4995 }
4996 }
4997
4998 // do output the line
4999 format_output (out_fp, input_buf, (unsigned char *) pot_ptr->plain_buf, pot_ptr->plain_len, 0, username, user_len);
5000 }
5001 }
5002
5003 #define LM_WEAK_HASH "\x4e\xcf\x0d\x0c\x0a\xe2\xfb\xc1"
5004 #define LM_MASKED_PLAIN "[notfound]"
5005
5006 void handle_show_request_lm (pot_t *pot, uint pot_cnt, char *input_buf, int input_len, hash_t *hash_left, hash_t *hash_right, int (*sort_by_pot) (const void *, const void *), FILE *out_fp)
5007 {
5008 // left
5009
5010 pot_t pot_left_key;
5011
5012 pot_left_key.hash.salt = hash_left->salt;
5013 pot_left_key.hash.digest = hash_left->digest;
5014
5015 pot_t *pot_left_ptr = (pot_t *) bsearch (&pot_left_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
5016
5017 // right
5018
5019 uint weak_hash_found = 0;
5020
5021 pot_t pot_right_key;
5022
5023 pot_right_key.hash.salt = hash_right->salt;
5024 pot_right_key.hash.digest = hash_right->digest;
5025
5026 pot_t *pot_right_ptr = (pot_t *) bsearch (&pot_right_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
5027
5028 if (pot_right_ptr == NULL)
5029 {
5030 // special case, if "weak hash"
5031
5032 if (memcmp (hash_right->digest, LM_WEAK_HASH, 8) == 0)
5033 {
5034 weak_hash_found = 1;
5035
5036 pot_right_ptr = (pot_t *) mycalloc (1, sizeof (pot_t));
5037
5038 // in theory this is not needed, but we are paranoia:
5039
5040 memset (pot_right_ptr->plain_buf, 0, sizeof (pot_right_ptr->plain_buf));
5041 pot_right_ptr->plain_len = 0;
5042 }
5043 }
5044
5045 if ((pot_left_ptr == NULL) && (pot_right_ptr == NULL))
5046 {
5047 if (weak_hash_found == 1) myfree (pot_right_ptr); // this shouldn't happen at all: if weak_hash_found == 1, than pot_right_ptr is not NULL for sure
5048
5049 return;
5050 }
5051
5052 // at least one half was found:
5053
5054 log_info_nn ("");
5055
5056 input_buf[input_len] = 0;
5057
5058 // user
5059
5060 unsigned char *username = NULL;
5061 uint user_len = 0;
5062
5063 if (data.username)
5064 {
5065 user_t *user = hash_left->hash_info->user;
5066
5067 if (user)
5068 {
5069 username = (unsigned char *) (user->user_name);
5070
5071 user_len = user->user_len;
5072 }
5073 }
5074
5075 // mask the part which was not found
5076
5077 uint left_part_masked = 0;
5078 uint right_part_masked = 0;
5079
5080 uint mask_plain_len = strlen (LM_MASKED_PLAIN);
5081
5082 if (pot_left_ptr == NULL)
5083 {
5084 left_part_masked = 1;
5085
5086 pot_left_ptr = (pot_t *) mycalloc (1, sizeof (pot_t));
5087
5088 memset (pot_left_ptr->plain_buf, 0, sizeof (pot_left_ptr->plain_buf));
5089
5090 memcpy (pot_left_ptr->plain_buf, LM_MASKED_PLAIN, mask_plain_len);
5091 pot_left_ptr->plain_len = mask_plain_len;
5092 }
5093
5094 if (pot_right_ptr == NULL)
5095 {
5096 right_part_masked = 1;
5097
5098 pot_right_ptr = (pot_t *) mycalloc (1, sizeof (pot_t));
5099
5100 memset (pot_right_ptr->plain_buf, 0, sizeof (pot_right_ptr->plain_buf));
5101
5102 memcpy (pot_right_ptr->plain_buf, LM_MASKED_PLAIN, mask_plain_len);
5103 pot_right_ptr->plain_len = mask_plain_len;
5104 }
5105
5106 // create the pot_ptr out of pot_left_ptr and pot_right_ptr
5107
5108 pot_t pot_ptr;
5109
5110 pot_ptr.plain_len = pot_left_ptr->plain_len + pot_right_ptr->plain_len;
5111
5112 memcpy (pot_ptr.plain_buf, pot_left_ptr->plain_buf, pot_left_ptr->plain_len);
5113
5114 memcpy (pot_ptr.plain_buf + pot_left_ptr->plain_len, pot_right_ptr->plain_buf, pot_right_ptr->plain_len);
5115
5116 // do output the line
5117
5118 format_output (out_fp, input_buf, (unsigned char *) pot_ptr.plain_buf, pot_ptr.plain_len, 0, username, user_len);
5119
5120 if (weak_hash_found == 1) myfree (pot_right_ptr);
5121
5122 if (left_part_masked == 1) myfree (pot_left_ptr);
5123 if (right_part_masked == 1) myfree (pot_right_ptr);
5124 }
5125
5126 void handle_left_request (pot_t *pot, uint pot_cnt, char *input_buf, int input_len, hash_t *hashes_buf, int (*sort_by_pot) (const void *, const void *), FILE *out_fp)
5127 {
5128 pot_t pot_key;
5129
5130 memcpy (&pot_key.hash, hashes_buf, sizeof (hash_t));
5131
5132 pot_t *pot_ptr = (pot_t *) bsearch (&pot_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
5133
5134 if (pot_ptr == NULL)
5135 {
5136 log_info_nn ("");
5137
5138 input_buf[input_len] = 0;
5139
5140 format_output (out_fp, input_buf, NULL, 0, 0, NULL, 0);
5141 }
5142 }
5143
5144 void handle_left_request_lm (pot_t *pot, uint pot_cnt, char *input_buf, int input_len, hash_t *hash_left, hash_t *hash_right, int (*sort_by_pot) (const void *, const void *), FILE *out_fp)
5145 {
5146 // left
5147
5148 pot_t pot_left_key;
5149
5150 memcpy (&pot_left_key.hash, hash_left, sizeof (hash_t));
5151
5152 pot_t *pot_left_ptr = (pot_t *) bsearch (&pot_left_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
5153
5154 // right
5155
5156 pot_t pot_right_key;
5157
5158 memcpy (&pot_right_key.hash, hash_right, sizeof (hash_t));
5159
5160 pot_t *pot_right_ptr = (pot_t *) bsearch (&pot_right_key, pot, pot_cnt, sizeof (pot_t), sort_by_pot);
5161
5162 uint weak_hash_found = 0;
5163
5164 if (pot_right_ptr == NULL)
5165 {
5166 // special case, if "weak hash"
5167
5168 if (memcmp (hash_right->digest, LM_WEAK_HASH, 8) == 0)
5169 {
5170 weak_hash_found = 1;
5171
5172 // we just need that pot_right_ptr is not a NULL pointer
5173
5174 pot_right_ptr = (pot_t *) mycalloc (1, sizeof (pot_t));
5175 }
5176 }
5177
5178 if ((pot_left_ptr != NULL) && (pot_right_ptr != NULL))
5179 {
5180 if (weak_hash_found == 1) myfree (pot_right_ptr);
5181
5182 return;
5183 }
5184
5185 // ... at least one part was not cracked
5186
5187 log_info_nn ("");
5188
5189 input_buf[input_len] = 0;
5190
5191 // only show the hash part which is still not cracked
5192
5193 uint user_len = input_len - 32;
5194
5195 char *hash_output = (char *) mymalloc (33);
5196
5197 memcpy (hash_output, input_buf, input_len);
5198
5199 if (pot_left_ptr != NULL)
5200 {
5201 // only show right part (because left part was already found)
5202
5203 memcpy (hash_output + user_len, input_buf + user_len + 16, 16);
5204
5205 hash_output[user_len + 16] = 0;
5206 }
5207
5208 if (pot_right_ptr != NULL)
5209 {
5210 // only show left part (because right part was already found)
5211
5212 memcpy (hash_output + user_len, input_buf + user_len, 16);
5213
5214 hash_output[user_len + 16] = 0;
5215 }
5216
5217 format_output (out_fp, hash_output, NULL, 0, 0, NULL, 0);
5218
5219 myfree (hash_output);
5220
5221 if (weak_hash_found == 1) myfree (pot_right_ptr);
5222 }
5223
5224 uint setup_opencl_platforms_filter (char *opencl_platforms)
5225 {
5226 uint opencl_platforms_filter = 0;
5227
5228 if (opencl_platforms)
5229 {
5230 char *platforms = strdup (opencl_platforms);
5231
5232 char *next = strtok (platforms, ",");
5233
5234 do
5235 {
5236 int platform = atoi (next);
5237
5238 if (platform < 1 || platform > 32)
5239 {
5240 log_error ("ERROR: invalid OpenCL platform %u specified", platform);
5241
5242 exit (-1);
5243 }
5244
5245 opencl_platforms_filter |= 1 << (platform - 1);
5246
5247 } while ((next = strtok (NULL, ",")) != NULL);
5248
5249 free (platforms);
5250 }
5251 else
5252 {
5253 opencl_platforms_filter = -1;
5254 }
5255
5256 return opencl_platforms_filter;
5257 }
5258
5259 u32 setup_devices_filter (char *opencl_devices)
5260 {
5261 u32 devices_filter = 0;
5262
5263 if (opencl_devices)
5264 {
5265 char *devices = strdup (opencl_devices);
5266
5267 char *next = strtok (devices, ",");
5268
5269 do
5270 {
5271 int device_id = atoi (next);
5272
5273 if (device_id < 1 || device_id > 32)
5274 {
5275 log_error ("ERROR: invalid device_id %u specified", device_id);
5276
5277 exit (-1);
5278 }
5279
5280 devices_filter |= 1 << (device_id - 1);
5281
5282 } while ((next = strtok (NULL, ",")) != NULL);
5283
5284 free (devices);
5285 }
5286 else
5287 {
5288 devices_filter = -1;
5289 }
5290
5291 return devices_filter;
5292 }
5293
5294 cl_device_type setup_device_types_filter (char *opencl_device_types)
5295 {
5296 cl_device_type device_types_filter = 0;
5297
5298 if (opencl_device_types)
5299 {
5300 char *device_types = strdup (opencl_device_types);
5301
5302 char *next = strtok (device_types, ",");
5303
5304 do
5305 {
5306 int device_type = atoi (next);
5307
5308 if (device_type < 1 || device_type > 3)
5309 {
5310 log_error ("ERROR: invalid device_type %u specified", device_type);
5311
5312 exit (-1);
5313 }
5314
5315 device_types_filter |= 1 << device_type;
5316
5317 } while ((next = strtok (NULL, ",")) != NULL);
5318
5319 free (device_types);
5320 }
5321 else
5322 {
5323 // Do not use CPU by default, this often reduces GPU performance because
5324 // the CPU is too busy to handle GPU synchronization
5325
5326 device_types_filter = CL_DEVICE_TYPE_ALL & ~CL_DEVICE_TYPE_CPU;
5327 }
5328
5329 return device_types_filter;
5330 }
5331
5332 u32 get_random_num (const u32 min, const u32 max)
5333 {
5334 if (min == max) return (min);
5335
5336 return ((rand () % (max - min)) + min);
5337 }
5338
5339 u32 mydivc32 (const u32 dividend, const u32 divisor)
5340 {
5341 u32 quotient = dividend / divisor;
5342
5343 if (dividend % divisor) quotient++;
5344
5345 return quotient;
5346 }
5347
5348 u64 mydivc64 (const u64 dividend, const u64 divisor)
5349 {
5350 u64 quotient = dividend / divisor;
5351
5352 if (dividend % divisor) quotient++;
5353
5354 return quotient;
5355 }
5356
5357 void format_timer_display (struct tm *tm, char *buf, size_t len)
5358 {
5359 const char *time_entities_s[] = { "year", "day", "hour", "min", "sec" };
5360 const char *time_entities_m[] = { "years", "days", "hours", "mins", "secs" };
5361
5362 if (tm->tm_year - 70)
5363 {
5364 char *time_entity1 = ((tm->tm_year - 70) == 1) ? (char *) time_entities_s[0] : (char *) time_entities_m[0];
5365 char *time_entity2 = ( tm->tm_yday == 1) ? (char *) time_entities_s[1] : (char *) time_entities_m[1];
5366
5367 snprintf (buf, len - 1, "%d %s, %d %s", tm->tm_year - 70, time_entity1, tm->tm_yday, time_entity2);
5368 }
5369 else if (tm->tm_yday)
5370 {
5371 char *time_entity1 = (tm->tm_yday == 1) ? (char *) time_entities_s[1] : (char *) time_entities_m[1];
5372 char *time_entity2 = (tm->tm_hour == 1) ? (char *) time_entities_s[2] : (char *) time_entities_m[2];
5373
5374 snprintf (buf, len - 1, "%d %s, %d %s", tm->tm_yday, time_entity1, tm->tm_hour, time_entity2);
5375 }
5376 else if (tm->tm_hour)
5377 {
5378 char *time_entity1 = (tm->tm_hour == 1) ? (char *) time_entities_s[2] : (char *) time_entities_m[2];
5379 char *time_entity2 = (tm->tm_min == 1) ? (char *) time_entities_s[3] : (char *) time_entities_m[3];
5380
5381 snprintf (buf, len - 1, "%d %s, %d %s", tm->tm_hour, time_entity1, tm->tm_min, time_entity2);
5382 }
5383 else if (tm->tm_min)
5384 {
5385 char *time_entity1 = (tm->tm_min == 1) ? (char *) time_entities_s[3] : (char *) time_entities_m[3];
5386 char *time_entity2 = (tm->tm_sec == 1) ? (char *) time_entities_s[4] : (char *) time_entities_m[4];
5387
5388 snprintf (buf, len - 1, "%d %s, %d %s", tm->tm_min, time_entity1, tm->tm_sec, time_entity2);
5389 }
5390 else
5391 {
5392 char *time_entity1 = (tm->tm_sec == 1) ? (char *) time_entities_s[4] : (char *) time_entities_m[4];
5393
5394 snprintf (buf, len - 1, "%d %s", tm->tm_sec, time_entity1);
5395 }
5396 }
5397
5398 void format_speed_display (float val, char *buf, size_t len)
5399 {
5400 if (val <= 0)
5401 {
5402 buf[0] = '0';
5403 buf[1] = ' ';
5404 buf[2] = 0;
5405
5406 return;
5407 }
5408
5409 char units[7] = { ' ', 'k', 'M', 'G', 'T', 'P', 'E' };
5410
5411 uint level = 0;
5412
5413 while (val > 99999)
5414 {
5415 val /= 1000;
5416
5417 level++;
5418 }
5419
5420 /* generate output */
5421
5422 if (level == 0)
5423 {
5424 snprintf (buf, len - 1, "%.0f ", val);
5425 }
5426 else
5427 {
5428 snprintf (buf, len - 1, "%.1f %c", val, units[level]);
5429 }
5430 }
5431
5432 void lowercase (u8 *buf, int len)
5433 {
5434 for (int i = 0; i < len; i++) buf[i] = tolower (buf[i]);
5435 }
5436
5437 void uppercase (u8 *buf, int len)
5438 {
5439 for (int i = 0; i < len; i++) buf[i] = toupper (buf[i]);
5440 }
5441
5442 int fgetl (FILE *fp, char *line_buf)
5443 {
5444 int line_len = 0;
5445
5446 while (!feof (fp))
5447 {
5448 const int c = fgetc (fp);
5449
5450 if (c == EOF) break;
5451
5452 line_buf[line_len] = (char) c;
5453
5454 line_len++;
5455
5456 if (line_len == BUFSIZ) line_len--;
5457
5458 if (c == '\n') break;
5459 }
5460
5461 if (line_len == 0) return 0;
5462
5463 if (line_buf[line_len - 1] == '\n')
5464 {
5465 line_len--;
5466
5467 line_buf[line_len] = 0;
5468 }
5469
5470 if (line_len == 0) return 0;
5471
5472 if (line_buf[line_len - 1] == '\r')
5473 {
5474 line_len--;
5475
5476 line_buf[line_len] = 0;
5477 }
5478
5479 return (line_len);
5480 }
5481
5482 int in_superchop (char *buf)
5483 {
5484 int len = strlen (buf);
5485
5486 while (len)
5487 {
5488 if (buf[len - 1] == '\n')
5489 {
5490 len--;
5491
5492 continue;
5493 }
5494
5495 if (buf[len - 1] == '\r')
5496 {
5497 len--;
5498
5499 continue;
5500 }
5501
5502 break;
5503 }
5504
5505 buf[len] = 0;
5506
5507 return len;
5508 }
5509
5510 char **scan_directory (const char *path)
5511 {
5512 char *tmp_path = mystrdup (path);
5513
5514 size_t tmp_path_len = strlen (tmp_path);
5515
5516 while (tmp_path[tmp_path_len - 1] == '/' || tmp_path[tmp_path_len - 1] == '\\')
5517 {
5518 tmp_path[tmp_path_len - 1] = 0;
5519
5520 tmp_path_len = strlen (tmp_path);
5521 }
5522
5523 char **files = NULL;
5524
5525 int num_files = 0;
5526
5527 DIR *d = NULL;
5528
5529 if ((d = opendir (tmp_path)) != NULL)
5530 {
5531 #ifdef OSX
5532 struct dirent e;
5533
5534 for (;;) {
5535 memset (&e, 0, sizeof (e));
5536 struct dirent *de = NULL;
5537
5538 if (readdir_r (d, &e, &de) != 0)
5539 {
5540 log_error ("ERROR: readdir_r() failed");
5541
5542 break;
5543 }
5544
5545 if (de == NULL) break;
5546 #else
5547 struct dirent *de;
5548
5549 while ((de = readdir (d)) != NULL)
5550 {
5551 #endif
5552 if ((strcmp (de->d_name, ".") == 0) || (strcmp (de->d_name, "..") == 0)) continue;
5553
5554 int path_size = strlen (tmp_path) + 1 + strlen (de->d_name);
5555
5556 char *path_file = (char *) mymalloc (path_size + 1);
5557
5558 snprintf (path_file, path_size + 1, "%s/%s", tmp_path, de->d_name);
5559
5560 path_file[path_size] = 0;
5561
5562 DIR *d_test;
5563
5564 if ((d_test = opendir (path_file)) != NULL)
5565 {
5566 closedir (d_test);
5567
5568 myfree (path_file);
5569 }
5570 else
5571 {
5572 files = (char **) myrealloc (files, num_files * sizeof (char *), sizeof (char *));
5573
5574 num_files++;
5575
5576 files[num_files - 1] = path_file;
5577 }
5578 }
5579
5580 closedir (d);
5581 }
5582 else if (errno == ENOTDIR)
5583 {
5584 files = (char **) myrealloc (files, num_files * sizeof (char *), sizeof (char *));
5585
5586 num_files++;
5587
5588 files[num_files - 1] = mystrdup (path);
5589 }
5590
5591 files = (char **) myrealloc (files, num_files * sizeof (char *), sizeof (char *));
5592
5593 num_files++;
5594
5595 files[num_files - 1] = NULL;
5596
5597 myfree (tmp_path);
5598
5599 return (files);
5600 }
5601
5602 int count_dictionaries (char **dictionary_files)
5603 {
5604 if (dictionary_files == NULL) return 0;
5605
5606 int cnt = 0;
5607
5608 for (int d = 0; dictionary_files[d] != NULL; d++)
5609 {
5610 cnt++;
5611 }
5612
5613 return (cnt);
5614 }
5615
5616 char *stroptitype (const uint opti_type)
5617 {
5618 switch (opti_type)
5619 {
5620 case OPTI_TYPE_ZERO_BYTE: return ((char *) OPTI_STR_ZERO_BYTE); break;
5621 case OPTI_TYPE_PRECOMPUTE_INIT: return ((char *) OPTI_STR_PRECOMPUTE_INIT); break;
5622 case OPTI_TYPE_PRECOMPUTE_MERKLE: return ((char *) OPTI_STR_PRECOMPUTE_MERKLE); break;
5623 case OPTI_TYPE_PRECOMPUTE_PERMUT: return ((char *) OPTI_STR_PRECOMPUTE_PERMUT); break;
5624 case OPTI_TYPE_MEET_IN_MIDDLE: return ((char *) OPTI_STR_MEET_IN_MIDDLE); break;
5625 case OPTI_TYPE_EARLY_SKIP: return ((char *) OPTI_STR_EARLY_SKIP); break;
5626 case OPTI_TYPE_NOT_SALTED: return ((char *) OPTI_STR_NOT_SALTED); break;
5627 case OPTI_TYPE_NOT_ITERATED: return ((char *) OPTI_STR_NOT_ITERATED); break;
5628 case OPTI_TYPE_PREPENDED_SALT: return ((char *) OPTI_STR_PREPENDED_SALT); break;
5629 case OPTI_TYPE_APPENDED_SALT: return ((char *) OPTI_STR_APPENDED_SALT); break;
5630 case OPTI_TYPE_SINGLE_HASH: return ((char *) OPTI_STR_SINGLE_HASH); break;
5631 case OPTI_TYPE_SINGLE_SALT: return ((char *) OPTI_STR_SINGLE_SALT); break;
5632 case OPTI_TYPE_BRUTE_FORCE: return ((char *) OPTI_STR_BRUTE_FORCE); break;
5633 case OPTI_TYPE_RAW_HASH: return ((char *) OPTI_STR_RAW_HASH); break;
5634 case OPTI_TYPE_USES_BITS_8: return ((char *) OPTI_STR_USES_BITS_8); break;
5635 case OPTI_TYPE_USES_BITS_16: return ((char *) OPTI_STR_USES_BITS_16); break;
5636 case OPTI_TYPE_USES_BITS_32: return ((char *) OPTI_STR_USES_BITS_32); break;
5637 case OPTI_TYPE_USES_BITS_64: return ((char *) OPTI_STR_USES_BITS_64); break;
5638 }
5639
5640 return (NULL);
5641 }
5642
5643 char *strparser (const uint parser_status)
5644 {
5645 switch (parser_status)
5646 {
5647 case PARSER_OK: return ((char *) PA_000); break;
5648 case PARSER_COMMENT: return ((char *) PA_001); break;
5649 case PARSER_GLOBAL_ZERO: return ((char *) PA_002); break;
5650 case PARSER_GLOBAL_LENGTH: return ((char *) PA_003); break;
5651 case PARSER_HASH_LENGTH: return ((char *) PA_004); break;
5652 case PARSER_HASH_VALUE: return ((char *) PA_005); break;
5653 case PARSER_SALT_LENGTH: return ((char *) PA_006); break;
5654 case PARSER_SALT_VALUE: return ((char *) PA_007); break;
5655 case PARSER_SALT_ITERATION: return ((char *) PA_008); break;
5656 case PARSER_SEPARATOR_UNMATCHED: return ((char *) PA_009); break;
5657 case PARSER_SIGNATURE_UNMATCHED: return ((char *) PA_010); break;
5658 case PARSER_HCCAP_FILE_SIZE: return ((char *) PA_011); break;
5659 case PARSER_HCCAP_EAPOL_SIZE: return ((char *) PA_012); break;
5660 case PARSER_PSAFE2_FILE_SIZE: return ((char *) PA_013); break;
5661 case PARSER_PSAFE3_FILE_SIZE: return ((char *) PA_014); break;
5662 case PARSER_TC_FILE_SIZE: return ((char *) PA_015); break;
5663 case PARSER_SIP_AUTH_DIRECTIVE: return ((char *) PA_016); break;
5664 }
5665
5666 return ((char *) PA_255);
5667 }
5668
5669 char *strhashtype (const uint hash_mode)
5670 {
5671 switch (hash_mode)
5672 {
5673 case 0: return ((char *) HT_00000); break;
5674 case 10: return ((char *) HT_00010); break;
5675 case 11: return ((char *) HT_00011); break;
5676 case 12: return ((char *) HT_00012); break;
5677 case 20: return ((char *) HT_00020); break;
5678 case 21: return ((char *) HT_00021); break;
5679 case 22: return ((char *) HT_00022); break;
5680 case 23: return ((char *) HT_00023); break;
5681 case 30: return ((char *) HT_00030); break;
5682 case 40: return ((char *) HT_00040); break;
5683 case 50: return ((char *) HT_00050); break;
5684 case 60: return ((char *) HT_00060); break;
5685 case 100: return ((char *) HT_00100); break;
5686 case 101: return ((char *) HT_00101); break;
5687 case 110: return ((char *) HT_00110); break;
5688 case 111: return ((char *) HT_00111); break;
5689 case 112: return ((char *) HT_00112); break;
5690 case 120: return ((char *) HT_00120); break;
5691 case 121: return ((char *) HT_00121); break;
5692 case 122: return ((char *) HT_00122); break;
5693 case 124: return ((char *) HT_00124); break;
5694 case 130: return ((char *) HT_00130); break;
5695 case 131: return ((char *) HT_00131); break;
5696 case 132: return ((char *) HT_00132); break;
5697 case 133: return ((char *) HT_00133); break;
5698 case 140: return ((char *) HT_00140); break;
5699 case 141: return ((char *) HT_00141); break;
5700 case 150: return ((char *) HT_00150); break;
5701 case 160: return ((char *) HT_00160); break;
5702 case 190: return ((char *) HT_00190); break;
5703 case 200: return ((char *) HT_00200); break;
5704 case 300: return ((char *) HT_00300); break;
5705 case 400: return ((char *) HT_00400); break;
5706 case 500: return ((char *) HT_00500); break;
5707 case 501: return ((char *) HT_00501); break;
5708 case 900: return ((char *) HT_00900); break;
5709 case 910: return ((char *) HT_00910); break;
5710 case 1000: return ((char *) HT_01000); break;
5711 case 1100: return ((char *) HT_01100); break;
5712 case 1400: return ((char *) HT_01400); break;
5713 case 1410: return ((char *) HT_01410); break;
5714 case 1420: return ((char *) HT_01420); break;
5715 case 1421: return ((char *) HT_01421); break;
5716 case 1430: return ((char *) HT_01430); break;
5717 case 1440: return ((char *) HT_01440); break;
5718 case 1441: return ((char *) HT_01441); break;
5719 case 1450: return ((char *) HT_01450); break;
5720 case 1460: return ((char *) HT_01460); break;
5721 case 1500: return ((char *) HT_01500); break;
5722 case 1600: return ((char *) HT_01600); break;
5723 case 1700: return ((char *) HT_01700); break;
5724 case 1710: return ((char *) HT_01710); break;
5725 case 1711: return ((char *) HT_01711); break;
5726 case 1720: return ((char *) HT_01720); break;
5727 case 1722: return ((char *) HT_01722); break;
5728 case 1730: return ((char *) HT_01730); break;
5729 case 1731: return ((char *) HT_01731); break;
5730 case 1740: return ((char *) HT_01740); break;
5731 case 1750: return ((char *) HT_01750); break;
5732 case 1760: return ((char *) HT_01760); break;
5733 case 1800: return ((char *) HT_01800); break;
5734 case 2100: return ((char *) HT_02100); break;
5735 case 2400: return ((char *) HT_02400); break;
5736 case 2410: return ((char *) HT_02410); break;
5737 case 2500: return ((char *) HT_02500); break;
5738 case 2600: return ((char *) HT_02600); break;
5739 case 2611: return ((char *) HT_02611); break;
5740 case 2612: return ((char *) HT_02612); break;
5741 case 2711: return ((char *) HT_02711); break;
5742 case 2811: return ((char *) HT_02811); break;
5743 case 3000: return ((char *) HT_03000); break;
5744 case 3100: return ((char *) HT_03100); break;
5745 case 3200: return ((char *) HT_03200); break;
5746 case 3710: return ((char *) HT_03710); break;
5747 case 3711: return ((char *) HT_03711); break;
5748 case 3800: return ((char *) HT_03800); break;
5749 case 4300: return ((char *) HT_04300); break;
5750 case 4400: return ((char *) HT_04400); break;
5751 case 4500: return ((char *) HT_04500); break;
5752 case 4700: return ((char *) HT_04700); break;
5753 case 4800: return ((char *) HT_04800); break;
5754 case 4900: return ((char *) HT_04900); break;
5755 case 5000: return ((char *) HT_05000); break;
5756 case 5100: return ((char *) HT_05100); break;
5757 case 5200: return ((char *) HT_05200); break;
5758 case 5300: return ((char *) HT_05300); break;
5759 case 5400: return ((char *) HT_05400); break;
5760 case 5500: return ((char *) HT_05500); break;
5761 case 5600: return ((char *) HT_05600); break;
5762 case 5700: return ((char *) HT_05700); break;
5763 case 5800: return ((char *) HT_05800); break;
5764 case 6000: return ((char *) HT_06000); break;
5765 case 6100: return ((char *) HT_06100); break;
5766 case 6211: return ((char *) HT_06211); break;
5767 case 6212: return ((char *) HT_06212); break;
5768 case 6213: return ((char *) HT_06213); break;
5769 case 6221: return ((char *) HT_06221); break;
5770 case 6222: return ((char *) HT_06222); break;
5771 case 6223: return ((char *) HT_06223); break;
5772 case 6231: return ((char *) HT_06231); break;
5773 case 6232: return ((char *) HT_06232); break;
5774 case 6233: return ((char *) HT_06233); break;
5775 case 6241: return ((char *) HT_06241); break;
5776 case 6242: return ((char *) HT_06242); break;
5777 case 6243: return ((char *) HT_06243); break;
5778 case 6300: return ((char *) HT_06300); break;
5779 case 6400: return ((char *) HT_06400); break;
5780 case 6500: return ((char *) HT_06500); break;
5781 case 6600: return ((char *) HT_06600); break;
5782 case 6700: return ((char *) HT_06700); break;
5783 case 6800: return ((char *) HT_06800); break;
5784 case 6900: return ((char *) HT_06900); break;
5785 case 7100: return ((char *) HT_07100); break;
5786 case 7200: return ((char *) HT_07200); break;
5787 case 7300: return ((char *) HT_07300); break;
5788 case 7400: return ((char *) HT_07400); break;
5789 case 7500: return ((char *) HT_07500); break;
5790 case 7600: return ((char *) HT_07600); break;
5791 case 7700: return ((char *) HT_07700); break;
5792 case 7800: return ((char *) HT_07800); break;
5793 case 7900: return ((char *) HT_07900); break;
5794 case 8000: return ((char *) HT_08000); break;
5795 case 8100: return ((char *) HT_08100); break;
5796 case 8200: return ((char *) HT_08200); break;
5797 case 8300: return ((char *) HT_08300); break;
5798 case 8400: return ((char *) HT_08400); break;
5799 case 8500: return ((char *) HT_08500); break;
5800 case 8600: return ((char *) HT_08600); break;
5801 case 8700: return ((char *) HT_08700); break;
5802 case 8800: return ((char *) HT_08800); break;
5803 case 8900: return ((char *) HT_08900); break;
5804 case 9000: return ((char *) HT_09000); break;
5805 case 9100: return ((char *) HT_09100); break;
5806 case 9200: return ((char *) HT_09200); break;
5807 case 9300: return ((char *) HT_09300); break;
5808 case 9400: return ((char *) HT_09400); break;
5809 case 9500: return ((char *) HT_09500); break;
5810 case 9600: return ((char *) HT_09600); break;
5811 case 9700: return ((char *) HT_09700); break;
5812 case 9710: return ((char *) HT_09710); break;
5813 case 9720: return ((char *) HT_09720); break;
5814 case 9800: return ((char *) HT_09800); break;
5815 case 9810: return ((char *) HT_09810); break;
5816 case 9820: return ((char *) HT_09820); break;
5817 case 9900: return ((char *) HT_09900); break;
5818 case 10000: return ((char *) HT_10000); break;
5819 case 10100: return ((char *) HT_10100); break;
5820 case 10200: return ((char *) HT_10200); break;
5821 case 10300: return ((char *) HT_10300); break;
5822 case 10400: return ((char *) HT_10400); break;
5823 case 10410: return ((char *) HT_10410); break;
5824 case 10420: return ((char *) HT_10420); break;
5825 case 10500: return ((char *) HT_10500); break;
5826 case 10600: return ((char *) HT_10600); break;
5827 case 10700: return ((char *) HT_10700); break;
5828 case 10800: return ((char *) HT_10800); break;
5829 case 10900: return ((char *) HT_10900); break;
5830 case 11000: return ((char *) HT_11000); break;
5831 case 11100: return ((char *) HT_11100); break;
5832 case 11200: return ((char *) HT_11200); break;
5833 case 11300: return ((char *) HT_11300); break;
5834 case 11400: return ((char *) HT_11400); break;
5835 case 11500: return ((char *) HT_11500); break;
5836 case 11600: return ((char *) HT_11600); break;
5837 case 11700: return ((char *) HT_11700); break;
5838 case 11800: return ((char *) HT_11800); break;
5839 case 11900: return ((char *) HT_11900); break;
5840 case 12000: return ((char *) HT_12000); break;
5841 case 12100: return ((char *) HT_12100); break;
5842 case 12200: return ((char *) HT_12200); break;
5843 case 12300: return ((char *) HT_12300); break;
5844 case 12400: return ((char *) HT_12400); break;
5845 case 12500: return ((char *) HT_12500); break;
5846 case 12600: return ((char *) HT_12600); break;
5847 case 12700: return ((char *) HT_12700); break;
5848 case 12800: return ((char *) HT_12800); break;
5849 case 12900: return ((char *) HT_12900); break;
5850 case 13000: return ((char *) HT_13000); break;
5851 case 13100: return ((char *) HT_13100); break;
5852 }
5853
5854 return ((char *) "Unknown");
5855 }
5856
5857 char *strstatus (const uint devices_status)
5858 {
5859 switch (devices_status)
5860 {
5861 case STATUS_INIT: return ((char *) ST_0000); break;
5862 case STATUS_STARTING: return ((char *) ST_0001); break;
5863 case STATUS_RUNNING: return ((char *) ST_0002); break;
5864 case STATUS_PAUSED: return ((char *) ST_0003); break;
5865 case STATUS_EXHAUSTED: return ((char *) ST_0004); break;
5866 case STATUS_CRACKED: return ((char *) ST_0005); break;
5867 case STATUS_ABORTED: return ((char *) ST_0006); break;
5868 case STATUS_QUIT: return ((char *) ST_0007); break;
5869 case STATUS_BYPASS: return ((char *) ST_0008); break;
5870 case STATUS_STOP_AT_CHECKPOINT: return ((char *) ST_0009); break;
5871 case STATUS_AUTOTUNE: return ((char *) ST_0010); break;
5872 }
5873
5874 return ((char *) "Unknown");
5875 }
5876
5877 void ascii_digest (char out_buf[4096], uint salt_pos, uint digest_pos)
5878 {
5879 uint hash_type = data.hash_type;
5880 uint hash_mode = data.hash_mode;
5881 uint salt_type = data.salt_type;
5882 uint opts_type = data.opts_type;
5883 uint opti_type = data.opti_type;
5884 uint dgst_size = data.dgst_size;
5885
5886 char *hashfile = data.hashfile;
5887
5888 uint len = 4096;
5889
5890 uint digest_buf[64] = { 0 };
5891
5892 u64 *digest_buf64 = (u64 *) digest_buf;
5893
5894 char *digests_buf_ptr = (char *) data.digests_buf;
5895
5896 memcpy (digest_buf, digests_buf_ptr + (data.salts_buf[salt_pos].digests_offset * dgst_size) + (digest_pos * dgst_size), dgst_size);
5897
5898 if (opti_type & OPTI_TYPE_PRECOMPUTE_PERMUT)
5899 {
5900 uint tt;
5901
5902 switch (hash_type)
5903 {
5904 case HASH_TYPE_DESCRYPT:
5905 FP (digest_buf[1], digest_buf[0], tt);
5906 break;
5907
5908 case HASH_TYPE_DESRACF:
5909 digest_buf[0] = rotl32 (digest_buf[0], 29);
5910 digest_buf[1] = rotl32 (digest_buf[1], 29);
5911
5912 FP (digest_buf[1], digest_buf[0], tt);
5913 break;
5914
5915 case HASH_TYPE_LM:
5916 FP (digest_buf[1], digest_buf[0], tt);
5917 break;
5918
5919 case HASH_TYPE_NETNTLM:
5920 digest_buf[0] = rotl32 (digest_buf[0], 29);
5921 digest_buf[1] = rotl32 (digest_buf[1], 29);
5922 digest_buf[2] = rotl32 (digest_buf[2], 29);
5923 digest_buf[3] = rotl32 (digest_buf[3], 29);
5924
5925 FP (digest_buf[1], digest_buf[0], tt);
5926 FP (digest_buf[3], digest_buf[2], tt);
5927 break;
5928
5929 case HASH_TYPE_BSDICRYPT:
5930 digest_buf[0] = rotl32 (digest_buf[0], 31);
5931 digest_buf[1] = rotl32 (digest_buf[1], 31);
5932
5933 FP (digest_buf[1], digest_buf[0], tt);
5934 break;
5935 }
5936 }
5937
5938 if (opti_type & OPTI_TYPE_PRECOMPUTE_MERKLE)
5939 {
5940 switch (hash_type)
5941 {
5942 case HASH_TYPE_MD4:
5943 digest_buf[0] += MD4M_A;
5944 digest_buf[1] += MD4M_B;
5945 digest_buf[2] += MD4M_C;
5946 digest_buf[3] += MD4M_D;
5947 break;
5948
5949 case HASH_TYPE_MD5:
5950 digest_buf[0] += MD5M_A;
5951 digest_buf[1] += MD5M_B;
5952 digest_buf[2] += MD5M_C;
5953 digest_buf[3] += MD5M_D;
5954 break;
5955
5956 case HASH_TYPE_SHA1:
5957 digest_buf[0] += SHA1M_A;
5958 digest_buf[1] += SHA1M_B;
5959 digest_buf[2] += SHA1M_C;
5960 digest_buf[3] += SHA1M_D;
5961 digest_buf[4] += SHA1M_E;
5962 break;
5963
5964 case HASH_TYPE_SHA256:
5965 digest_buf[0] += SHA256M_A;
5966 digest_buf[1] += SHA256M_B;
5967 digest_buf[2] += SHA256M_C;
5968 digest_buf[3] += SHA256M_D;
5969 digest_buf[4] += SHA256M_E;
5970 digest_buf[5] += SHA256M_F;
5971 digest_buf[6] += SHA256M_G;
5972 digest_buf[7] += SHA256M_H;
5973 break;
5974
5975 case HASH_TYPE_SHA384:
5976 digest_buf64[0] += SHA384M_A;
5977 digest_buf64[1] += SHA384M_B;
5978 digest_buf64[2] += SHA384M_C;
5979 digest_buf64[3] += SHA384M_D;
5980 digest_buf64[4] += SHA384M_E;
5981 digest_buf64[5] += SHA384M_F;
5982 digest_buf64[6] += 0;
5983 digest_buf64[7] += 0;
5984 break;
5985
5986 case HASH_TYPE_SHA512:
5987 digest_buf64[0] += SHA512M_A;
5988 digest_buf64[1] += SHA512M_B;
5989 digest_buf64[2] += SHA512M_C;
5990 digest_buf64[3] += SHA512M_D;
5991 digest_buf64[4] += SHA512M_E;
5992 digest_buf64[5] += SHA512M_F;
5993 digest_buf64[6] += SHA512M_G;
5994 digest_buf64[7] += SHA512M_H;
5995 break;
5996 }
5997 }
5998
5999 if (opts_type & OPTS_TYPE_PT_GENERATE_LE)
6000 {
6001 if (dgst_size == DGST_SIZE_4_2)
6002 {
6003 for (int i = 0; i < 2; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6004 }
6005 else if (dgst_size == DGST_SIZE_4_4)
6006 {
6007 for (int i = 0; i < 4; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6008 }
6009 else if (dgst_size == DGST_SIZE_4_5)
6010 {
6011 for (int i = 0; i < 5; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6012 }
6013 else if (dgst_size == DGST_SIZE_4_6)
6014 {
6015 for (int i = 0; i < 6; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6016 }
6017 else if (dgst_size == DGST_SIZE_4_8)
6018 {
6019 for (int i = 0; i < 8; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6020 }
6021 else if ((dgst_size == DGST_SIZE_4_16) || (dgst_size == DGST_SIZE_8_8)) // same size, same result :)
6022 {
6023 if (hash_type == HASH_TYPE_WHIRLPOOL)
6024 {
6025 for (int i = 0; i < 16; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6026 }
6027 else if (hash_type == HASH_TYPE_SHA384)
6028 {
6029 for (int i = 0; i < 8; i++) digest_buf64[i] = byte_swap_64 (digest_buf64[i]);
6030 }
6031 else if (hash_type == HASH_TYPE_SHA512)
6032 {
6033 for (int i = 0; i < 8; i++) digest_buf64[i] = byte_swap_64 (digest_buf64[i]);
6034 }
6035 else if (hash_type == HASH_TYPE_GOST)
6036 {
6037 for (int i = 0; i < 16; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6038 }
6039 }
6040 else if (dgst_size == DGST_SIZE_4_64)
6041 {
6042 for (int i = 0; i < 64; i++) digest_buf[i] = byte_swap_32 (digest_buf[i]);
6043 }
6044 else if (dgst_size == DGST_SIZE_8_25)
6045 {
6046 for (int i = 0; i < 25; i++) digest_buf64[i] = byte_swap_64 (digest_buf64[i]);
6047 }
6048 }
6049
6050 uint isSalted = ((data.salt_type == SALT_TYPE_INTERN)
6051 | (data.salt_type == SALT_TYPE_EXTERN)
6052 | (data.salt_type == SALT_TYPE_EMBEDDED));
6053
6054 salt_t salt;
6055
6056 if (isSalted)
6057 {
6058 memset (&salt, 0, sizeof (salt_t));
6059
6060 memcpy (&salt, &data.salts_buf[salt_pos], sizeof (salt_t));
6061
6062 char *ptr = (char *) salt.salt_buf;
6063
6064 uint len = salt.salt_len;
6065
6066 if (opti_type & OPTI_TYPE_PRECOMPUTE_PERMUT)
6067 {
6068 uint tt;
6069
6070 switch (hash_type)
6071 {
6072 case HASH_TYPE_NETNTLM:
6073
6074 salt.salt_buf[0] = rotr32 (salt.salt_buf[0], 3);
6075 salt.salt_buf[1] = rotr32 (salt.salt_buf[1], 3);
6076
6077 FP (salt.salt_buf[1], salt.salt_buf[0], tt);
6078
6079 break;
6080 }
6081 }
6082
6083 if (opts_type & OPTS_TYPE_ST_UNICODE)
6084 {
6085 for (uint i = 0, j = 0; i < len; i += 1, j += 2)
6086 {
6087 ptr[i] = ptr[j];
6088 }
6089
6090 len = len / 2;
6091 }
6092
6093 if (opts_type & OPTS_TYPE_ST_GENERATE_LE)
6094 {
6095 uint max = salt.salt_len / 4;
6096
6097 if (len % 4) max++;
6098
6099 for (uint i = 0; i < max; i++)
6100 {
6101 salt.salt_buf[i] = byte_swap_32 (salt.salt_buf[i]);
6102 }
6103 }
6104
6105 if (opts_type & OPTS_TYPE_ST_HEX)
6106 {
6107 char tmp[64] = { 0 };
6108
6109 for (uint i = 0, j = 0; i < len; i += 1, j += 2)
6110 {
6111 sprintf (tmp + j, "%02x", (unsigned char) ptr[i]);
6112 }
6113
6114 len = len * 2;
6115
6116 memcpy (ptr, tmp, len);
6117 }
6118
6119 uint memset_size = ((48 - (int) len) > 0) ? (48 - len) : 0;
6120
6121 memset (ptr + len, 0, memset_size);
6122
6123 salt.salt_len = len;
6124 }
6125
6126 //
6127 // some modes require special encoding
6128 //
6129
6130 uint out_buf_plain[256] = { 0 };
6131 uint out_buf_salt[256] = { 0 };
6132
6133 char tmp_buf[1024] = { 0 };
6134
6135 char *ptr_plain = (char *) out_buf_plain;
6136 char *ptr_salt = (char *) out_buf_salt;
6137
6138 if (hash_mode == 22)
6139 {
6140 char username[30] = { 0 };
6141
6142 memcpy (username, salt.salt_buf, salt.salt_len - 22);
6143
6144 char sig[6] = { 'n', 'r', 'c', 's', 't', 'n' };
6145
6146 u16 *ptr = (u16 *) digest_buf;
6147
6148 tmp_buf[ 0] = sig[0];
6149 tmp_buf[ 1] = int_to_base64 (((ptr[1]) >> 12) & 0x3f);
6150 tmp_buf[ 2] = int_to_base64 (((ptr[1]) >> 6) & 0x3f);
6151 tmp_buf[ 3] = int_to_base64 (((ptr[1]) >> 0) & 0x3f);
6152 tmp_buf[ 4] = int_to_base64 (((ptr[0]) >> 12) & 0x3f);
6153 tmp_buf[ 5] = int_to_base64 (((ptr[0]) >> 6) & 0x3f);
6154 tmp_buf[ 6] = sig[1];
6155 tmp_buf[ 7] = int_to_base64 (((ptr[0]) >> 0) & 0x3f);
6156 tmp_buf[ 8] = int_to_base64 (((ptr[3]) >> 12) & 0x3f);
6157 tmp_buf[ 9] = int_to_base64 (((ptr[3]) >> 6) & 0x3f);
6158 tmp_buf[10] = int_to_base64 (((ptr[3]) >> 0) & 0x3f);
6159 tmp_buf[11] = int_to_base64 (((ptr[2]) >> 12) & 0x3f);
6160 tmp_buf[12] = sig[2];
6161 tmp_buf[13] = int_to_base64 (((ptr[2]) >> 6) & 0x3f);
6162 tmp_buf[14] = int_to_base64 (((ptr[2]) >> 0) & 0x3f);
6163 tmp_buf[15] = int_to_base64 (((ptr[5]) >> 12) & 0x3f);
6164 tmp_buf[16] = int_to_base64 (((ptr[5]) >> 6) & 0x3f);
6165 tmp_buf[17] = sig[3];
6166 tmp_buf[18] = int_to_base64 (((ptr[5]) >> 0) & 0x3f);
6167 tmp_buf[19] = int_to_base64 (((ptr[4]) >> 12) & 0x3f);
6168 tmp_buf[20] = int_to_base64 (((ptr[4]) >> 6) & 0x3f);
6169 tmp_buf[21] = int_to_base64 (((ptr[4]) >> 0) & 0x3f);
6170 tmp_buf[22] = int_to_base64 (((ptr[7]) >> 12) & 0x3f);
6171 tmp_buf[23] = sig[4];
6172 tmp_buf[24] = int_to_base64 (((ptr[7]) >> 6) & 0x3f);
6173 tmp_buf[25] = int_to_base64 (((ptr[7]) >> 0) & 0x3f);
6174 tmp_buf[26] = int_to_base64 (((ptr[6]) >> 12) & 0x3f);
6175 tmp_buf[27] = int_to_base64 (((ptr[6]) >> 6) & 0x3f);
6176 tmp_buf[28] = int_to_base64 (((ptr[6]) >> 0) & 0x3f);
6177 tmp_buf[29] = sig[5];
6178
6179 snprintf (out_buf, len-1, "%s:%s",
6180 tmp_buf,
6181 username);
6182 }
6183 else if (hash_mode == 23)
6184 {
6185 // do not show the \nskyper\n part in output
6186
6187 char *salt_buf_ptr = (char *) salt.salt_buf;
6188
6189 salt_buf_ptr[salt.salt_len - 8] = 0;
6190
6191 snprintf (out_buf, len-1, "%08x%08x%08x%08x:%s",
6192 digest_buf[0],
6193 digest_buf[1],
6194 digest_buf[2],
6195 digest_buf[3],
6196 salt_buf_ptr);
6197 }
6198 else if (hash_mode == 101)
6199 {
6200 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6201
6202 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6203 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6204 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6205 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6206 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6207
6208 memcpy (tmp_buf, digest_buf, 20);
6209
6210 base64_encode (int_to_base64, (const u8 *) tmp_buf, 20, (u8 *) ptr_plain);
6211
6212 snprintf (out_buf, len-1, "{SHA}%s", ptr_plain);
6213 }
6214 else if (hash_mode == 111)
6215 {
6216 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6217
6218 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6219 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6220 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6221 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6222 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6223
6224 memcpy (tmp_buf, digest_buf, 20);
6225 memcpy (tmp_buf + 20, salt.salt_buf, salt.salt_len);
6226
6227 base64_encode (int_to_base64, (const u8 *) tmp_buf, 20 + salt.salt_len, (u8 *) ptr_plain);
6228
6229 snprintf (out_buf, len-1, "{SSHA}%s", ptr_plain);
6230 }
6231 else if (hash_mode == 122)
6232 {
6233 snprintf (out_buf, len-1, "%s%08x%08x%08x%08x%08x",
6234 (char *) salt.salt_buf,
6235 digest_buf[0],
6236 digest_buf[1],
6237 digest_buf[2],
6238 digest_buf[3],
6239 digest_buf[4]);
6240 }
6241 else if (hash_mode == 124)
6242 {
6243 snprintf (out_buf, len-1, "sha1$%s$%08x%08x%08x%08x%08x",
6244 (char *) salt.salt_buf,
6245 digest_buf[0],
6246 digest_buf[1],
6247 digest_buf[2],
6248 digest_buf[3],
6249 digest_buf[4]);
6250 }
6251 else if (hash_mode == 131)
6252 {
6253 snprintf (out_buf, len-1, "0x0100%s%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
6254 (char *) salt.salt_buf,
6255 0, 0, 0, 0, 0,
6256 digest_buf[0],
6257 digest_buf[1],
6258 digest_buf[2],
6259 digest_buf[3],
6260 digest_buf[4]);
6261 }
6262 else if (hash_mode == 132)
6263 {
6264 snprintf (out_buf, len-1, "0x0100%s%08x%08x%08x%08x%08x",
6265 (char *) salt.salt_buf,
6266 digest_buf[0],
6267 digest_buf[1],
6268 digest_buf[2],
6269 digest_buf[3],
6270 digest_buf[4]);
6271 }
6272 else if (hash_mode == 133)
6273 {
6274 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6275
6276 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6277 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6278 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6279 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6280 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6281
6282 memcpy (tmp_buf, digest_buf, 20);
6283
6284 base64_encode (int_to_base64, (const u8 *) tmp_buf, 20, (u8 *) ptr_plain);
6285
6286 snprintf (out_buf, len-1, "%s", ptr_plain);
6287 }
6288 else if (hash_mode == 141)
6289 {
6290 memcpy (tmp_buf, salt.salt_buf, salt.salt_len);
6291
6292 base64_encode (int_to_base64, (const u8 *) tmp_buf, salt.salt_len, (u8 *) ptr_salt);
6293
6294 memset (tmp_buf, 0, sizeof (tmp_buf));
6295
6296 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6297
6298 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6299 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6300 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6301 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6302 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6303
6304 memcpy (tmp_buf, digest_buf, 20);
6305
6306 base64_encode (int_to_base64, (const u8 *) tmp_buf, 20, (u8 *) ptr_plain);
6307
6308 ptr_plain[27] = 0;
6309
6310 snprintf (out_buf, len-1, "%s%s*%s", SIGNATURE_EPISERVER, ptr_salt, ptr_plain);
6311 }
6312 else if (hash_mode == 400)
6313 {
6314 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6315
6316 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6317 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6318 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6319 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6320
6321 phpass_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6322
6323 snprintf (out_buf, len-1, "%s%s%s", (char *) salt.salt_sign, (char *) salt.salt_buf, (char *) ptr_plain);
6324 }
6325 else if (hash_mode == 500)
6326 {
6327 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6328
6329 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6330 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6331 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6332 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6333
6334 md5crypt_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6335
6336 if (salt.salt_iter == ROUNDS_MD5CRYPT)
6337 {
6338 snprintf (out_buf, len-1, "$1$%s$%s", (char *) salt.salt_buf, (char *) ptr_plain);
6339 }
6340 else
6341 {
6342 snprintf (out_buf, len-1, "$1$rounds=%i$%s$%s", salt.salt_iter, (char *) salt.salt_buf, (char *) ptr_plain);
6343 }
6344 }
6345 else if (hash_mode == 501)
6346 {
6347 uint digest_idx = salt.digests_offset + digest_pos;
6348
6349 hashinfo_t **hashinfo_ptr = data.hash_info;
6350 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
6351
6352 snprintf (out_buf, len-1, "%s", hash_buf);
6353 }
6354 else if (hash_mode == 1421)
6355 {
6356 u8 *salt_ptr = (u8 *) salt.salt_buf;
6357
6358 snprintf (out_buf, len-1, "%c%c%c%c%c%c%08x%08x%08x%08x%08x%08x%08x%08x",
6359 salt_ptr[0],
6360 salt_ptr[1],
6361 salt_ptr[2],
6362 salt_ptr[3],
6363 salt_ptr[4],
6364 salt_ptr[5],
6365 digest_buf[0],
6366 digest_buf[1],
6367 digest_buf[2],
6368 digest_buf[3],
6369 digest_buf[4],
6370 digest_buf[5],
6371 digest_buf[6],
6372 digest_buf[7]);
6373 }
6374 else if (hash_mode == 1441)
6375 {
6376 memcpy (tmp_buf, salt.salt_buf, salt.salt_len);
6377
6378 base64_encode (int_to_base64, (const u8 *) tmp_buf, salt.salt_len, (u8 *) ptr_salt);
6379
6380 memset (tmp_buf, 0, sizeof (tmp_buf));
6381
6382 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6383
6384 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6385 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6386 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6387 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6388 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6389 digest_buf[5] = byte_swap_32 (digest_buf[5]);
6390 digest_buf[6] = byte_swap_32 (digest_buf[6]);
6391 digest_buf[7] = byte_swap_32 (digest_buf[7]);
6392
6393 memcpy (tmp_buf, digest_buf, 32);
6394
6395 base64_encode (int_to_base64, (const u8 *) tmp_buf, 32, (u8 *) ptr_plain);
6396
6397 ptr_plain[43] = 0;
6398
6399 snprintf (out_buf, len-1, "%s%s*%s", SIGNATURE_EPISERVER4, ptr_salt, ptr_plain);
6400 }
6401 else if (hash_mode == 1500)
6402 {
6403 out_buf[0] = salt.salt_sign[0] & 0xff;
6404 out_buf[1] = salt.salt_sign[1] & 0xff;
6405 //original method, but changed because of this ticket: https://hashcat.net/trac/ticket/269
6406 //out_buf[0] = int_to_itoa64 ((salt.salt_buf[0] >> 0) & 0x3f);
6407 //out_buf[1] = int_to_itoa64 ((salt.salt_buf[0] >> 6) & 0x3f);
6408
6409 memset (tmp_buf, 0, sizeof (tmp_buf));
6410
6411 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6412
6413 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6414 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6415
6416 memcpy (tmp_buf, digest_buf, 8);
6417
6418 base64_encode (int_to_itoa64, (const u8 *) tmp_buf, 8, (u8 *) ptr_plain);
6419
6420 snprintf (out_buf + 2, len-1-2, "%s", ptr_plain);
6421
6422 out_buf[13] = 0;
6423 }
6424 else if (hash_mode == 1600)
6425 {
6426 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6427
6428 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6429 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6430 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6431 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6432
6433 md5crypt_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6434
6435 if (salt.salt_iter == ROUNDS_MD5CRYPT)
6436 {
6437 snprintf (out_buf, len-1, "$apr1$%s$%s", (char *) salt.salt_buf, (char *) ptr_plain);
6438 }
6439 else
6440 {
6441 snprintf (out_buf, len-1, "$apr1$rounds=%i$%s$%s", salt.salt_iter, (char *) salt.salt_buf, (char *) ptr_plain);
6442 }
6443 }
6444 else if (hash_mode == 1711)
6445 {
6446 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6447
6448 digest_buf64[0] = byte_swap_64 (digest_buf64[0]);
6449 digest_buf64[1] = byte_swap_64 (digest_buf64[1]);
6450 digest_buf64[2] = byte_swap_64 (digest_buf64[2]);
6451 digest_buf64[3] = byte_swap_64 (digest_buf64[3]);
6452 digest_buf64[4] = byte_swap_64 (digest_buf64[4]);
6453 digest_buf64[5] = byte_swap_64 (digest_buf64[5]);
6454 digest_buf64[6] = byte_swap_64 (digest_buf64[6]);
6455 digest_buf64[7] = byte_swap_64 (digest_buf64[7]);
6456
6457 memcpy (tmp_buf, digest_buf, 64);
6458 memcpy (tmp_buf + 64, salt.salt_buf, salt.salt_len);
6459
6460 base64_encode (int_to_base64, (const u8 *) tmp_buf, 64 + salt.salt_len, (u8 *) ptr_plain);
6461
6462 snprintf (out_buf, len-1, "%s%s", SIGNATURE_SHA512B64S, ptr_plain);
6463 }
6464 else if (hash_mode == 1722)
6465 {
6466 uint *ptr = digest_buf;
6467
6468 snprintf (out_buf, len-1, "%s%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
6469 (unsigned char *) salt.salt_buf,
6470 ptr[ 1], ptr[ 0],
6471 ptr[ 3], ptr[ 2],
6472 ptr[ 5], ptr[ 4],
6473 ptr[ 7], ptr[ 6],
6474 ptr[ 9], ptr[ 8],
6475 ptr[11], ptr[10],
6476 ptr[13], ptr[12],
6477 ptr[15], ptr[14]);
6478 }
6479 else if (hash_mode == 1731)
6480 {
6481 uint *ptr = digest_buf;
6482
6483 snprintf (out_buf, len-1, "0x0200%s%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
6484 (unsigned char *) salt.salt_buf,
6485 ptr[ 1], ptr[ 0],
6486 ptr[ 3], ptr[ 2],
6487 ptr[ 5], ptr[ 4],
6488 ptr[ 7], ptr[ 6],
6489 ptr[ 9], ptr[ 8],
6490 ptr[11], ptr[10],
6491 ptr[13], ptr[12],
6492 ptr[15], ptr[14]);
6493 }
6494 else if (hash_mode == 1800)
6495 {
6496 // temp workaround
6497
6498 digest_buf64[0] = byte_swap_64 (digest_buf64[0]);
6499 digest_buf64[1] = byte_swap_64 (digest_buf64[1]);
6500 digest_buf64[2] = byte_swap_64 (digest_buf64[2]);
6501 digest_buf64[3] = byte_swap_64 (digest_buf64[3]);
6502 digest_buf64[4] = byte_swap_64 (digest_buf64[4]);
6503 digest_buf64[5] = byte_swap_64 (digest_buf64[5]);
6504 digest_buf64[6] = byte_swap_64 (digest_buf64[6]);
6505 digest_buf64[7] = byte_swap_64 (digest_buf64[7]);
6506
6507 sha512crypt_encode ((unsigned char *) digest_buf64, (unsigned char *) ptr_plain);
6508
6509 if (salt.salt_iter == ROUNDS_SHA512CRYPT)
6510 {
6511 snprintf (out_buf, len-1, "$6$%s$%s", (char *) salt.salt_buf, (char *) ptr_plain);
6512 }
6513 else
6514 {
6515 snprintf (out_buf, len-1, "$6$rounds=%i$%s$%s", salt.salt_iter, (char *) salt.salt_buf, (char *) ptr_plain);
6516 }
6517 }
6518 else if (hash_mode == 2100)
6519 {
6520 uint pos = 0;
6521
6522 snprintf (out_buf + pos, len-1, "%s%i#",
6523 SIGNATURE_DCC2,
6524 salt.salt_iter + 1);
6525
6526 uint signature_len = strlen (out_buf);
6527
6528 pos += signature_len;
6529 len -= signature_len;
6530
6531 char *salt_ptr = (char *) salt.salt_buf;
6532
6533 for (uint i = 0; i < salt.salt_len; i++, pos++, len--) snprintf (out_buf + pos, len-1, "%c", salt_ptr[i]);
6534
6535 snprintf (out_buf + pos, len-1, "#%08x%08x%08x%08x",
6536 byte_swap_32 (digest_buf[0]),
6537 byte_swap_32 (digest_buf[1]),
6538 byte_swap_32 (digest_buf[2]),
6539 byte_swap_32 (digest_buf[3]));
6540 }
6541 else if ((hash_mode == 2400) || (hash_mode == 2410))
6542 {
6543 memcpy (tmp_buf, digest_buf, 16);
6544
6545 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6546
6547 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6548 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6549 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6550 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6551
6552 out_buf[ 0] = int_to_itoa64 ((digest_buf[0] >> 0) & 0x3f);
6553 out_buf[ 1] = int_to_itoa64 ((digest_buf[0] >> 6) & 0x3f);
6554 out_buf[ 2] = int_to_itoa64 ((digest_buf[0] >> 12) & 0x3f);
6555 out_buf[ 3] = int_to_itoa64 ((digest_buf[0] >> 18) & 0x3f);
6556
6557 out_buf[ 4] = int_to_itoa64 ((digest_buf[1] >> 0) & 0x3f);
6558 out_buf[ 5] = int_to_itoa64 ((digest_buf[1] >> 6) & 0x3f);
6559 out_buf[ 6] = int_to_itoa64 ((digest_buf[1] >> 12) & 0x3f);
6560 out_buf[ 7] = int_to_itoa64 ((digest_buf[1] >> 18) & 0x3f);
6561
6562 out_buf[ 8] = int_to_itoa64 ((digest_buf[2] >> 0) & 0x3f);
6563 out_buf[ 9] = int_to_itoa64 ((digest_buf[2] >> 6) & 0x3f);
6564 out_buf[10] = int_to_itoa64 ((digest_buf[2] >> 12) & 0x3f);
6565 out_buf[11] = int_to_itoa64 ((digest_buf[2] >> 18) & 0x3f);
6566
6567 out_buf[12] = int_to_itoa64 ((digest_buf[3] >> 0) & 0x3f);
6568 out_buf[13] = int_to_itoa64 ((digest_buf[3] >> 6) & 0x3f);
6569 out_buf[14] = int_to_itoa64 ((digest_buf[3] >> 12) & 0x3f);
6570 out_buf[15] = int_to_itoa64 ((digest_buf[3] >> 18) & 0x3f);
6571
6572 out_buf[16] = 0;
6573 }
6574 else if (hash_mode == 2500)
6575 {
6576 wpa_t *wpas = (wpa_t *) data.esalts_buf;
6577
6578 wpa_t *wpa = &wpas[salt_pos];
6579
6580 uint pke[25] = { 0 };
6581
6582 char *pke_ptr = (char *) pke;
6583
6584 for (uint i = 0; i < 25; i++)
6585 {
6586 pke[i] = byte_swap_32 (wpa->pke[i]);
6587 }
6588
6589 unsigned char mac1[6] = { 0 };
6590 unsigned char mac2[6] = { 0 };
6591
6592 memcpy (mac1, pke_ptr + 23, 6);
6593 memcpy (mac2, pke_ptr + 29, 6);
6594
6595 snprintf (out_buf, len-1, "%s:%02x%02x%02x%02x%02x%02x:%02x%02x%02x%02x%02x%02x",
6596 (char *) salt.salt_buf,
6597 mac1[0],
6598 mac1[1],
6599 mac1[2],
6600 mac1[3],
6601 mac1[4],
6602 mac1[5],
6603 mac2[0],
6604 mac2[1],
6605 mac2[2],
6606 mac2[3],
6607 mac2[4],
6608 mac2[5]);
6609 }
6610 else if (hash_mode == 4400)
6611 {
6612 snprintf (out_buf, len-1, "%08x%08x%08x%08x",
6613 byte_swap_32 (digest_buf[0]),
6614 byte_swap_32 (digest_buf[1]),
6615 byte_swap_32 (digest_buf[2]),
6616 byte_swap_32 (digest_buf[3]));
6617 }
6618 else if (hash_mode == 4700)
6619 {
6620 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x",
6621 byte_swap_32 (digest_buf[0]),
6622 byte_swap_32 (digest_buf[1]),
6623 byte_swap_32 (digest_buf[2]),
6624 byte_swap_32 (digest_buf[3]),
6625 byte_swap_32 (digest_buf[4]));
6626 }
6627 else if (hash_mode == 4800)
6628 {
6629 u8 chap_id_byte = (u8) salt.salt_buf[4];
6630
6631 snprintf (out_buf, len-1, "%08x%08x%08x%08x:%08x%08x%08x%08x:%02x",
6632 digest_buf[0],
6633 digest_buf[1],
6634 digest_buf[2],
6635 digest_buf[3],
6636 byte_swap_32 (salt.salt_buf[0]),
6637 byte_swap_32 (salt.salt_buf[1]),
6638 byte_swap_32 (salt.salt_buf[2]),
6639 byte_swap_32 (salt.salt_buf[3]),
6640 chap_id_byte);
6641 }
6642 else if (hash_mode == 4900)
6643 {
6644 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x",
6645 byte_swap_32 (digest_buf[0]),
6646 byte_swap_32 (digest_buf[1]),
6647 byte_swap_32 (digest_buf[2]),
6648 byte_swap_32 (digest_buf[3]),
6649 byte_swap_32 (digest_buf[4]));
6650 }
6651 else if (hash_mode == 5100)
6652 {
6653 snprintf (out_buf, len-1, "%08x%08x",
6654 digest_buf[0],
6655 digest_buf[1]);
6656 }
6657 else if (hash_mode == 5200)
6658 {
6659 snprintf (out_buf, len-1, "%s", hashfile);
6660 }
6661 else if (hash_mode == 5300)
6662 {
6663 ikepsk_t *ikepsks = (ikepsk_t *) data.esalts_buf;
6664
6665 ikepsk_t *ikepsk = &ikepsks[salt_pos];
6666
6667 int buf_len = len -1;
6668
6669 // msg_buf
6670
6671 uint ikepsk_msg_len = ikepsk->msg_len / 4;
6672
6673 for (uint i = 0; i < ikepsk_msg_len; i++)
6674 {
6675 if ((i == 32) || (i == 64) || (i == 66) || (i == 68) || (i == 108))
6676 {
6677 snprintf (out_buf, buf_len, ":");
6678
6679 buf_len--;
6680 out_buf++;
6681 }
6682
6683 snprintf (out_buf, buf_len, "%08x", byte_swap_32 (ikepsk->msg_buf[i]));
6684
6685 buf_len -= 8;
6686 out_buf += 8;
6687 }
6688
6689 // nr_buf
6690
6691 uint ikepsk_nr_len = ikepsk->nr_len / 4;
6692
6693 for (uint i = 0; i < ikepsk_nr_len; i++)
6694 {
6695 if ((i == 0) || (i == 5))
6696 {
6697 snprintf (out_buf, buf_len, ":");
6698
6699 buf_len--;
6700 out_buf++;
6701 }
6702
6703 snprintf (out_buf, buf_len, "%08x", byte_swap_32 (ikepsk->nr_buf[i]));
6704
6705 buf_len -= 8;
6706 out_buf += 8;
6707 }
6708
6709 // digest_buf
6710
6711 for (uint i = 0; i < 4; i++)
6712 {
6713 if (i == 0)
6714 {
6715 snprintf (out_buf, buf_len, ":");
6716
6717 buf_len--;
6718 out_buf++;
6719 }
6720
6721 snprintf (out_buf, buf_len, "%08x", digest_buf[i]);
6722
6723 buf_len -= 8;
6724 out_buf += 8;
6725 }
6726 }
6727 else if (hash_mode == 5400)
6728 {
6729 ikepsk_t *ikepsks = (ikepsk_t *) data.esalts_buf;
6730
6731 ikepsk_t *ikepsk = &ikepsks[salt_pos];
6732
6733 int buf_len = len -1;
6734
6735 // msg_buf
6736
6737 uint ikepsk_msg_len = ikepsk->msg_len / 4;
6738
6739 for (uint i = 0; i < ikepsk_msg_len; i++)
6740 {
6741 if ((i == 32) || (i == 64) || (i == 66) || (i == 68) || (i == 108))
6742 {
6743 snprintf (out_buf, buf_len, ":");
6744
6745 buf_len--;
6746 out_buf++;
6747 }
6748
6749 snprintf (out_buf, buf_len, "%08x", byte_swap_32 (ikepsk->msg_buf[i]));
6750
6751 buf_len -= 8;
6752 out_buf += 8;
6753 }
6754
6755 // nr_buf
6756
6757 uint ikepsk_nr_len = ikepsk->nr_len / 4;
6758
6759 for (uint i = 0; i < ikepsk_nr_len; i++)
6760 {
6761 if ((i == 0) || (i == 5))
6762 {
6763 snprintf (out_buf, buf_len, ":");
6764
6765 buf_len--;
6766 out_buf++;
6767 }
6768
6769 snprintf (out_buf, buf_len, "%08x", byte_swap_32 (ikepsk->nr_buf[i]));
6770
6771 buf_len -= 8;
6772 out_buf += 8;
6773 }
6774
6775 // digest_buf
6776
6777 for (uint i = 0; i < 5; i++)
6778 {
6779 if (i == 0)
6780 {
6781 snprintf (out_buf, buf_len, ":");
6782
6783 buf_len--;
6784 out_buf++;
6785 }
6786
6787 snprintf (out_buf, buf_len, "%08x", digest_buf[i]);
6788
6789 buf_len -= 8;
6790 out_buf += 8;
6791 }
6792 }
6793 else if (hash_mode == 5500)
6794 {
6795 netntlm_t *netntlms = (netntlm_t *) data.esalts_buf;
6796
6797 netntlm_t *netntlm = &netntlms[salt_pos];
6798
6799 char user_buf[64] = { 0 };
6800 char domain_buf[64] = { 0 };
6801 char srvchall_buf[1024] = { 0 };
6802 char clichall_buf[1024] = { 0 };
6803
6804 for (uint i = 0, j = 0; j < netntlm->user_len; i += 1, j += 2)
6805 {
6806 char *ptr = (char *) netntlm->userdomain_buf;
6807
6808 user_buf[i] = ptr[j];
6809 }
6810
6811 for (uint i = 0, j = 0; j < netntlm->domain_len; i += 1, j += 2)
6812 {
6813 char *ptr = (char *) netntlm->userdomain_buf;
6814
6815 domain_buf[i] = ptr[netntlm->user_len + j];
6816 }
6817
6818 for (uint i = 0, j = 0; i < netntlm->srvchall_len; i += 1, j += 2)
6819 {
6820 u8 *ptr = (u8 *) netntlm->chall_buf;
6821
6822 sprintf (srvchall_buf + j, "%02x", ptr[i]);
6823 }
6824
6825 for (uint i = 0, j = 0; i < netntlm->clichall_len; i += 1, j += 2)
6826 {
6827 u8 *ptr = (u8 *) netntlm->chall_buf;
6828
6829 sprintf (clichall_buf + j, "%02x", ptr[netntlm->srvchall_len + i]);
6830 }
6831
6832 snprintf (out_buf, len-1, "%s::%s:%s:%08x%08x%08x%08x%08x%08x:%s",
6833 user_buf,
6834 domain_buf,
6835 srvchall_buf,
6836 digest_buf[0],
6837 digest_buf[1],
6838 digest_buf[2],
6839 digest_buf[3],
6840 byte_swap_32 (salt.salt_buf_pc[0]),
6841 byte_swap_32 (salt.salt_buf_pc[1]),
6842 clichall_buf);
6843 }
6844 else if (hash_mode == 5600)
6845 {
6846 netntlm_t *netntlms = (netntlm_t *) data.esalts_buf;
6847
6848 netntlm_t *netntlm = &netntlms[salt_pos];
6849
6850 char user_buf[64] = { 0 };
6851 char domain_buf[64] = { 0 };
6852 char srvchall_buf[1024] = { 0 };
6853 char clichall_buf[1024] = { 0 };
6854
6855 for (uint i = 0, j = 0; j < netntlm->user_len; i += 1, j += 2)
6856 {
6857 char *ptr = (char *) netntlm->userdomain_buf;
6858
6859 user_buf[i] = ptr[j];
6860 }
6861
6862 for (uint i = 0, j = 0; j < netntlm->domain_len; i += 1, j += 2)
6863 {
6864 char *ptr = (char *) netntlm->userdomain_buf;
6865
6866 domain_buf[i] = ptr[netntlm->user_len + j];
6867 }
6868
6869 for (uint i = 0, j = 0; i < netntlm->srvchall_len; i += 1, j += 2)
6870 {
6871 u8 *ptr = (u8 *) netntlm->chall_buf;
6872
6873 sprintf (srvchall_buf + j, "%02x", ptr[i]);
6874 }
6875
6876 for (uint i = 0, j = 0; i < netntlm->clichall_len; i += 1, j += 2)
6877 {
6878 u8 *ptr = (u8 *) netntlm->chall_buf;
6879
6880 sprintf (clichall_buf + j, "%02x", ptr[netntlm->srvchall_len + i]);
6881 }
6882
6883 snprintf (out_buf, len-1, "%s::%s:%s:%08x%08x%08x%08x:%s",
6884 user_buf,
6885 domain_buf,
6886 srvchall_buf,
6887 digest_buf[0],
6888 digest_buf[1],
6889 digest_buf[2],
6890 digest_buf[3],
6891 clichall_buf);
6892 }
6893 else if (hash_mode == 5700)
6894 {
6895 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6896
6897 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6898 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6899 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6900 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6901 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6902 digest_buf[5] = byte_swap_32 (digest_buf[5]);
6903 digest_buf[6] = byte_swap_32 (digest_buf[6]);
6904 digest_buf[7] = byte_swap_32 (digest_buf[7]);
6905
6906 memcpy (tmp_buf, digest_buf, 32);
6907
6908 base64_encode (int_to_itoa64, (const u8 *) tmp_buf, 32, (u8 *) ptr_plain);
6909
6910 ptr_plain[43] = 0;
6911
6912 snprintf (out_buf, len-1, "%s", ptr_plain);
6913 }
6914 else if (hash_mode == 5800)
6915 {
6916 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6917 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6918 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6919 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6920 digest_buf[4] = byte_swap_32 (digest_buf[4]);
6921
6922 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x",
6923 digest_buf[0],
6924 digest_buf[1],
6925 digest_buf[2],
6926 digest_buf[3],
6927 digest_buf[4]);
6928 }
6929 else if ((hash_mode >= 6200) && (hash_mode <= 6299))
6930 {
6931 snprintf (out_buf, len-1, "%s", hashfile);
6932 }
6933 else if (hash_mode == 6300)
6934 {
6935 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
6936
6937 digest_buf[0] = byte_swap_32 (digest_buf[0]);
6938 digest_buf[1] = byte_swap_32 (digest_buf[1]);
6939 digest_buf[2] = byte_swap_32 (digest_buf[2]);
6940 digest_buf[3] = byte_swap_32 (digest_buf[3]);
6941
6942 md5crypt_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6943
6944 snprintf (out_buf, len-1, "{smd5}%s$%s", (char *) salt.salt_buf, (char *) ptr_plain);
6945 }
6946 else if (hash_mode == 6400)
6947 {
6948 sha256aix_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6949
6950 snprintf (out_buf, len-1, "{ssha256}%02d$%s$%s", salt.salt_sign[0], (char *) salt.salt_buf, (char *) ptr_plain);
6951 }
6952 else if (hash_mode == 6500)
6953 {
6954 sha512aix_encode ((unsigned char *) digest_buf64, (unsigned char *) ptr_plain);
6955
6956 snprintf (out_buf, len-1, "{ssha512}%02d$%s$%s", salt.salt_sign[0], (char *) salt.salt_buf, (char *) ptr_plain);
6957 }
6958 else if (hash_mode == 6600)
6959 {
6960 agilekey_t *agilekeys = (agilekey_t *) data.esalts_buf;
6961
6962 agilekey_t *agilekey = &agilekeys[salt_pos];
6963
6964 salt.salt_buf[0] = byte_swap_32 (salt.salt_buf[0]);
6965 salt.salt_buf[1] = byte_swap_32 (salt.salt_buf[1]);
6966
6967 uint buf_len = len - 1;
6968
6969 uint off = snprintf (out_buf, buf_len, "%d:%08x%08x:", salt.salt_iter + 1, salt.salt_buf[0], salt.salt_buf[1]);
6970 buf_len -= 22;
6971
6972 for (uint i = 0, j = off; i < 1040; i++, j += 2)
6973 {
6974 snprintf (out_buf + j, buf_len, "%02x", agilekey->cipher[i]);
6975
6976 buf_len -= 2;
6977 }
6978 }
6979 else if (hash_mode == 6700)
6980 {
6981 sha1aix_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
6982
6983 snprintf (out_buf, len-1, "{ssha1}%02d$%s$%s", salt.salt_sign[0], (char *) salt.salt_buf, (char *) ptr_plain);
6984 }
6985 else if (hash_mode == 6800)
6986 {
6987 snprintf (out_buf, len-1, "%s", (char *) salt.salt_buf);
6988 }
6989 else if (hash_mode == 7100)
6990 {
6991 uint *ptr = digest_buf;
6992
6993 pbkdf2_sha512_t *pbkdf2_sha512s = (pbkdf2_sha512_t *) data.esalts_buf;
6994
6995 pbkdf2_sha512_t *pbkdf2_sha512 = &pbkdf2_sha512s[salt_pos];
6996
6997 uint esalt[8] = { 0 };
6998
6999 esalt[0] = byte_swap_32 (pbkdf2_sha512->salt_buf[0]);
7000 esalt[1] = byte_swap_32 (pbkdf2_sha512->salt_buf[1]);
7001 esalt[2] = byte_swap_32 (pbkdf2_sha512->salt_buf[2]);
7002 esalt[3] = byte_swap_32 (pbkdf2_sha512->salt_buf[3]);
7003 esalt[4] = byte_swap_32 (pbkdf2_sha512->salt_buf[4]);
7004 esalt[5] = byte_swap_32 (pbkdf2_sha512->salt_buf[5]);
7005 esalt[6] = byte_swap_32 (pbkdf2_sha512->salt_buf[6]);
7006 esalt[7] = byte_swap_32 (pbkdf2_sha512->salt_buf[7]);
7007
7008 snprintf (out_buf, len-1, "%s%i$%08x%08x%08x%08x%08x%08x%08x%08x$%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
7009 SIGNATURE_SHA512OSX,
7010 salt.salt_iter + 1,
7011 esalt[ 0], esalt[ 1],
7012 esalt[ 2], esalt[ 3],
7013 esalt[ 4], esalt[ 5],
7014 esalt[ 6], esalt[ 7],
7015 ptr [ 1], ptr [ 0],
7016 ptr [ 3], ptr [ 2],
7017 ptr [ 5], ptr [ 4],
7018 ptr [ 7], ptr [ 6],
7019 ptr [ 9], ptr [ 8],
7020 ptr [11], ptr [10],
7021 ptr [13], ptr [12],
7022 ptr [15], ptr [14]);
7023 }
7024 else if (hash_mode == 7200)
7025 {
7026 uint *ptr = digest_buf;
7027
7028 pbkdf2_sha512_t *pbkdf2_sha512s = (pbkdf2_sha512_t *) data.esalts_buf;
7029
7030 pbkdf2_sha512_t *pbkdf2_sha512 = &pbkdf2_sha512s[salt_pos];
7031
7032 uint len_used = 0;
7033
7034 snprintf (out_buf + len_used, len - len_used - 1, "%s%i.", SIGNATURE_SHA512GRUB, salt.salt_iter + 1);
7035
7036 len_used = strlen (out_buf);
7037
7038 unsigned char *salt_buf_ptr = (unsigned char *) pbkdf2_sha512->salt_buf;
7039
7040 for (uint i = 0; i < salt.salt_len; i++, len_used += 2)
7041 {
7042 snprintf (out_buf + len_used, len - len_used - 1, "%02x", salt_buf_ptr[i]);
7043 }
7044
7045 snprintf (out_buf + len_used, len - len_used - 1, ".%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
7046 ptr [ 1], ptr [ 0],
7047 ptr [ 3], ptr [ 2],
7048 ptr [ 5], ptr [ 4],
7049 ptr [ 7], ptr [ 6],
7050 ptr [ 9], ptr [ 8],
7051 ptr [11], ptr [10],
7052 ptr [13], ptr [12],
7053 ptr [15], ptr [14]);
7054 }
7055 else if (hash_mode == 7300)
7056 {
7057 rakp_t *rakps = (rakp_t *) data.esalts_buf;
7058
7059 rakp_t *rakp = &rakps[salt_pos];
7060
7061 for (uint i = 0, j = 0; (i * 4) < rakp->salt_len; i += 1, j += 8)
7062 {
7063 sprintf (out_buf + j, "%08x", rakp->salt_buf[i]);
7064 }
7065
7066 snprintf (out_buf + rakp->salt_len * 2, len - 1, ":%08x%08x%08x%08x%08x",
7067 digest_buf[0],
7068 digest_buf[1],
7069 digest_buf[2],
7070 digest_buf[3],
7071 digest_buf[4]);
7072 }
7073 else if (hash_mode == 7400)
7074 {
7075 // the encoder is a bit too intelligent, it expects the input data in the wrong BOM
7076
7077 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7078 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7079 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7080 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7081 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7082 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7083 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7084 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7085
7086 sha256crypt_encode ((unsigned char *) digest_buf, (unsigned char *) ptr_plain);
7087
7088 if (salt.salt_iter == ROUNDS_SHA256CRYPT)
7089 {
7090 snprintf (out_buf, len-1, "$5$%s$%s", (char *) salt.salt_buf, (char *) ptr_plain);
7091 }
7092 else
7093 {
7094 snprintf (out_buf, len-1, "$5$rounds=%i$%s$%s", salt.salt_iter, (char *) salt.salt_buf, (char *) ptr_plain);
7095 }
7096 }
7097 else if (hash_mode == 7500)
7098 {
7099 krb5pa_t *krb5pas = (krb5pa_t *) data.esalts_buf;
7100
7101 krb5pa_t *krb5pa = &krb5pas[salt_pos];
7102
7103 u8 *ptr_timestamp = (u8 *) krb5pa->timestamp;
7104 u8 *ptr_checksum = (u8 *) krb5pa->checksum;
7105
7106 char data[128] = { 0 };
7107
7108 char *ptr_data = data;
7109
7110 for (uint i = 0; i < 36; i++, ptr_data += 2)
7111 {
7112 sprintf (ptr_data, "%02x", ptr_timestamp[i]);
7113 }
7114
7115 for (uint i = 0; i < 16; i++, ptr_data += 2)
7116 {
7117 sprintf (ptr_data, "%02x", ptr_checksum[i]);
7118 }
7119
7120 *ptr_data = 0;
7121
7122 snprintf (out_buf, len-1, "%s$%s$%s$%s$%s",
7123 SIGNATURE_KRB5PA,
7124 (char *) krb5pa->user,
7125 (char *) krb5pa->realm,
7126 (char *) krb5pa->salt,
7127 data);
7128 }
7129 else if (hash_mode == 7700)
7130 {
7131 snprintf (out_buf, len-1, "%s$%08X%08X",
7132 (char *) salt.salt_buf,
7133 digest_buf[0],
7134 digest_buf[1]);
7135 }
7136 else if (hash_mode == 7800)
7137 {
7138 snprintf (out_buf, len-1, "%s$%08X%08X%08X%08X%08X",
7139 (char *) salt.salt_buf,
7140 digest_buf[0],
7141 digest_buf[1],
7142 digest_buf[2],
7143 digest_buf[3],
7144 digest_buf[4]);
7145 }
7146 else if (hash_mode == 7900)
7147 {
7148 drupal7_encode ((unsigned char *) digest_buf64, (unsigned char *) ptr_plain);
7149
7150 // ugly hack start
7151
7152 char *tmp = (char *) salt.salt_buf_pc;
7153
7154 ptr_plain[42] = tmp[0];
7155
7156 // ugly hack end
7157
7158 ptr_plain[43] = 0;
7159
7160 snprintf (out_buf, len-1, "%s%s%s", (char *) salt.salt_sign, (char *) salt.salt_buf, (char *) ptr_plain);
7161 }
7162 else if (hash_mode == 8000)
7163 {
7164 snprintf (out_buf, len-1, "0xc007%s%08x%08x%08x%08x%08x%08x%08x%08x",
7165 (unsigned char *) salt.salt_buf,
7166 digest_buf[0],
7167 digest_buf[1],
7168 digest_buf[2],
7169 digest_buf[3],
7170 digest_buf[4],
7171 digest_buf[5],
7172 digest_buf[6],
7173 digest_buf[7]);
7174 }
7175 else if (hash_mode == 8100)
7176 {
7177 salt.salt_buf[0] = byte_swap_32 (salt.salt_buf[0]);
7178 salt.salt_buf[1] = byte_swap_32 (salt.salt_buf[1]);
7179
7180 snprintf (out_buf, len-1, "1%s%08x%08x%08x%08x%08x",
7181 (unsigned char *) salt.salt_buf,
7182 digest_buf[0],
7183 digest_buf[1],
7184 digest_buf[2],
7185 digest_buf[3],
7186 digest_buf[4]);
7187 }
7188 else if (hash_mode == 8200)
7189 {
7190 cloudkey_t *cloudkeys = (cloudkey_t *) data.esalts_buf;
7191
7192 cloudkey_t *cloudkey = &cloudkeys[salt_pos];
7193
7194 char data_buf[4096] = { 0 };
7195
7196 for (int i = 0, j = 0; i < 512; i += 1, j += 8)
7197 {
7198 sprintf (data_buf + j, "%08x", cloudkey->data_buf[i]);
7199 }
7200
7201 data_buf[cloudkey->data_len * 2] = 0;
7202
7203 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7204 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7205 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7206 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7207 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7208 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7209 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7210 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7211
7212 salt.salt_buf[0] = byte_swap_32 (salt.salt_buf[0]);
7213 salt.salt_buf[1] = byte_swap_32 (salt.salt_buf[1]);
7214 salt.salt_buf[2] = byte_swap_32 (salt.salt_buf[2]);
7215 salt.salt_buf[3] = byte_swap_32 (salt.salt_buf[3]);
7216
7217 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x:%08x%08x%08x%08x:%u:%s",
7218 digest_buf[0],
7219 digest_buf[1],
7220 digest_buf[2],
7221 digest_buf[3],
7222 digest_buf[4],
7223 digest_buf[5],
7224 digest_buf[6],
7225 digest_buf[7],
7226 salt.salt_buf[0],
7227 salt.salt_buf[1],
7228 salt.salt_buf[2],
7229 salt.salt_buf[3],
7230 salt.salt_iter + 1,
7231 data_buf);
7232 }
7233 else if (hash_mode == 8300)
7234 {
7235 char digest_buf_c[34] = { 0 };
7236
7237 base32_encode (int_to_itoa32, (const u8 *) digest_buf, 20, (u8 *) digest_buf_c);
7238
7239 digest_buf_c[32] = 0;
7240
7241 // domain
7242
7243 const uint salt_pc_len = salt.salt_buf_pc[7]; // what a hack
7244
7245 char domain_buf_c[33] = { 0 };
7246
7247 memcpy (domain_buf_c, (char *) salt.salt_buf_pc, salt_pc_len);
7248
7249 for (uint i = 0; i < salt_pc_len; i++)
7250 {
7251 const char next = domain_buf_c[i];
7252
7253 domain_buf_c[i] = '.';
7254
7255 i += next;
7256 }
7257
7258 domain_buf_c[salt_pc_len] = 0;
7259
7260 // final
7261
7262 snprintf (out_buf, len-1, "%s:%s:%s:%u", digest_buf_c, domain_buf_c, (char *) salt.salt_buf, salt.salt_iter);
7263 }
7264 else if (hash_mode == 8500)
7265 {
7266 snprintf (out_buf, len-1, "%s*%s*%08X%08X", SIGNATURE_RACF, (char *) salt.salt_buf, digest_buf[0], digest_buf[1]);
7267 }
7268 else if (hash_mode == 2612)
7269 {
7270 snprintf (out_buf, len-1, "%s%s$%08x%08x%08x%08x",
7271 SIGNATURE_PHPS,
7272 (char *) salt.salt_buf,
7273 digest_buf[0],
7274 digest_buf[1],
7275 digest_buf[2],
7276 digest_buf[3]);
7277 }
7278 else if (hash_mode == 3711)
7279 {
7280 char *salt_ptr = (char *) salt.salt_buf;
7281
7282 salt_ptr[salt.salt_len - 1] = 0;
7283
7284 snprintf (out_buf, len-1, "%s%s$%08x%08x%08x%08x",
7285 SIGNATURE_MEDIAWIKI_B,
7286 salt_ptr,
7287 digest_buf[0],
7288 digest_buf[1],
7289 digest_buf[2],
7290 digest_buf[3]);
7291 }
7292 else if (hash_mode == 8800)
7293 {
7294 androidfde_t *androidfdes = (androidfde_t *) data.esalts_buf;
7295
7296 androidfde_t *androidfde = &androidfdes[salt_pos];
7297
7298 char tmp[3073] = { 0 };
7299
7300 for (uint i = 0, j = 0; i < 384; i += 1, j += 8)
7301 {
7302 sprintf (tmp + j, "%08x", androidfde->data[i]);
7303 }
7304
7305 tmp[3072] = 0;
7306
7307 snprintf (out_buf, len-1, "%s16$%08x%08x%08x%08x$16$%08x%08x%08x%08x$%s",
7308 SIGNATURE_ANDROIDFDE,
7309 byte_swap_32 (salt.salt_buf[0]),
7310 byte_swap_32 (salt.salt_buf[1]),
7311 byte_swap_32 (salt.salt_buf[2]),
7312 byte_swap_32 (salt.salt_buf[3]),
7313 byte_swap_32 (digest_buf[0]),
7314 byte_swap_32 (digest_buf[1]),
7315 byte_swap_32 (digest_buf[2]),
7316 byte_swap_32 (digest_buf[3]),
7317 tmp);
7318 }
7319 else if (hash_mode == 8900)
7320 {
7321 uint N = salt.scrypt_N;
7322 uint r = salt.scrypt_r;
7323 uint p = salt.scrypt_p;
7324
7325 char base64_salt[32] = { 0 };
7326
7327 base64_encode (int_to_base64, (const u8 *) salt.salt_buf, salt.salt_len, (u8 *) base64_salt);
7328
7329 memset (tmp_buf, 0, 46);
7330
7331 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7332 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7333 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7334 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7335 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7336 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7337 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7338 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7339 digest_buf[8] = 0; // needed for base64_encode ()
7340
7341 base64_encode (int_to_base64, (const u8 *) digest_buf, 32, (u8 *) tmp_buf);
7342
7343 snprintf (out_buf, len-1, "%s:%i:%i:%i:%s:%s",
7344 SIGNATURE_SCRYPT,
7345 N,
7346 r,
7347 p,
7348 base64_salt,
7349 tmp_buf);
7350 }
7351 else if (hash_mode == 9000)
7352 {
7353 snprintf (out_buf, len-1, "%s", hashfile);
7354 }
7355 else if (hash_mode == 9200)
7356 {
7357 // salt
7358
7359 pbkdf2_sha256_t *pbkdf2_sha256s = (pbkdf2_sha256_t *) data.esalts_buf;
7360
7361 pbkdf2_sha256_t *pbkdf2_sha256 = &pbkdf2_sha256s[salt_pos];
7362
7363 unsigned char *salt_buf_ptr = (unsigned char *) pbkdf2_sha256->salt_buf;
7364
7365 // hash
7366
7367 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7368 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7369 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7370 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7371 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7372 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7373 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7374 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7375 digest_buf[8] = 0; // needed for base64_encode ()
7376
7377 char tmp_buf[64] = { 0 };
7378
7379 base64_encode (int_to_itoa64, (const u8 *) digest_buf, 32, (u8 *) tmp_buf);
7380 tmp_buf[43] = 0; // cut it here
7381
7382 // output
7383
7384 snprintf (out_buf, len-1, "%s%s$%s", SIGNATURE_CISCO8, salt_buf_ptr, tmp_buf);
7385 }
7386 else if (hash_mode == 9300)
7387 {
7388 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7389 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7390 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7391 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7392 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7393 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7394 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7395 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7396 digest_buf[8] = 0; // needed for base64_encode ()
7397
7398 char tmp_buf[64] = { 0 };
7399
7400 base64_encode (int_to_itoa64, (const u8 *) digest_buf, 32, (u8 *) tmp_buf);
7401 tmp_buf[43] = 0; // cut it here
7402
7403 unsigned char *salt_buf_ptr = (unsigned char *) salt.salt_buf;
7404
7405 snprintf (out_buf, len-1, "%s%s$%s", SIGNATURE_CISCO9, salt_buf_ptr, tmp_buf);
7406 }
7407 else if (hash_mode == 9400)
7408 {
7409 office2007_t *office2007s = (office2007_t *) data.esalts_buf;
7410
7411 office2007_t *office2007 = &office2007s[salt_pos];
7412
7413 snprintf (out_buf, len-1, "%s*%u*%u*%u*%u*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x",
7414 SIGNATURE_OFFICE2007,
7415 2007,
7416 20,
7417 office2007->keySize,
7418 16,
7419 salt.salt_buf[0],
7420 salt.salt_buf[1],
7421 salt.salt_buf[2],
7422 salt.salt_buf[3],
7423 office2007->encryptedVerifier[0],
7424 office2007->encryptedVerifier[1],
7425 office2007->encryptedVerifier[2],
7426 office2007->encryptedVerifier[3],
7427 office2007->encryptedVerifierHash[0],
7428 office2007->encryptedVerifierHash[1],
7429 office2007->encryptedVerifierHash[2],
7430 office2007->encryptedVerifierHash[3],
7431 office2007->encryptedVerifierHash[4]);
7432 }
7433 else if (hash_mode == 9500)
7434 {
7435 office2010_t *office2010s = (office2010_t *) data.esalts_buf;
7436
7437 office2010_t *office2010 = &office2010s[salt_pos];
7438
7439 snprintf (out_buf, len-1, "%s*%u*%u*%u*%u*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x%08x%08x%08x", SIGNATURE_OFFICE2010, 2010, 100000, 128, 16,
7440
7441 salt.salt_buf[0],
7442 salt.salt_buf[1],
7443 salt.salt_buf[2],
7444 salt.salt_buf[3],
7445 office2010->encryptedVerifier[0],
7446 office2010->encryptedVerifier[1],
7447 office2010->encryptedVerifier[2],
7448 office2010->encryptedVerifier[3],
7449 office2010->encryptedVerifierHash[0],
7450 office2010->encryptedVerifierHash[1],
7451 office2010->encryptedVerifierHash[2],
7452 office2010->encryptedVerifierHash[3],
7453 office2010->encryptedVerifierHash[4],
7454 office2010->encryptedVerifierHash[5],
7455 office2010->encryptedVerifierHash[6],
7456 office2010->encryptedVerifierHash[7]);
7457 }
7458 else if (hash_mode == 9600)
7459 {
7460 office2013_t *office2013s = (office2013_t *) data.esalts_buf;
7461
7462 office2013_t *office2013 = &office2013s[salt_pos];
7463
7464 snprintf (out_buf, len-1, "%s*%u*%u*%u*%u*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x%08x%08x%08x", SIGNATURE_OFFICE2013, 2013, 100000, 256, 16,
7465
7466 salt.salt_buf[0],
7467 salt.salt_buf[1],
7468 salt.salt_buf[2],
7469 salt.salt_buf[3],
7470 office2013->encryptedVerifier[0],
7471 office2013->encryptedVerifier[1],
7472 office2013->encryptedVerifier[2],
7473 office2013->encryptedVerifier[3],
7474 office2013->encryptedVerifierHash[0],
7475 office2013->encryptedVerifierHash[1],
7476 office2013->encryptedVerifierHash[2],
7477 office2013->encryptedVerifierHash[3],
7478 office2013->encryptedVerifierHash[4],
7479 office2013->encryptedVerifierHash[5],
7480 office2013->encryptedVerifierHash[6],
7481 office2013->encryptedVerifierHash[7]);
7482 }
7483 else if (hash_mode == 9700)
7484 {
7485 oldoffice01_t *oldoffice01s = (oldoffice01_t *) data.esalts_buf;
7486
7487 oldoffice01_t *oldoffice01 = &oldoffice01s[salt_pos];
7488
7489 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x",
7490 (oldoffice01->version == 0) ? SIGNATURE_OLDOFFICE0 : SIGNATURE_OLDOFFICE1,
7491 byte_swap_32 (salt.salt_buf[0]),
7492 byte_swap_32 (salt.salt_buf[1]),
7493 byte_swap_32 (salt.salt_buf[2]),
7494 byte_swap_32 (salt.salt_buf[3]),
7495 byte_swap_32 (oldoffice01->encryptedVerifier[0]),
7496 byte_swap_32 (oldoffice01->encryptedVerifier[1]),
7497 byte_swap_32 (oldoffice01->encryptedVerifier[2]),
7498 byte_swap_32 (oldoffice01->encryptedVerifier[3]),
7499 byte_swap_32 (oldoffice01->encryptedVerifierHash[0]),
7500 byte_swap_32 (oldoffice01->encryptedVerifierHash[1]),
7501 byte_swap_32 (oldoffice01->encryptedVerifierHash[2]),
7502 byte_swap_32 (oldoffice01->encryptedVerifierHash[3]));
7503 }
7504 else if (hash_mode == 9710)
7505 {
7506 oldoffice01_t *oldoffice01s = (oldoffice01_t *) data.esalts_buf;
7507
7508 oldoffice01_t *oldoffice01 = &oldoffice01s[salt_pos];
7509
7510 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x",
7511 (oldoffice01->version == 0) ? SIGNATURE_OLDOFFICE0 : SIGNATURE_OLDOFFICE1,
7512 byte_swap_32 (salt.salt_buf[0]),
7513 byte_swap_32 (salt.salt_buf[1]),
7514 byte_swap_32 (salt.salt_buf[2]),
7515 byte_swap_32 (salt.salt_buf[3]),
7516 byte_swap_32 (oldoffice01->encryptedVerifier[0]),
7517 byte_swap_32 (oldoffice01->encryptedVerifier[1]),
7518 byte_swap_32 (oldoffice01->encryptedVerifier[2]),
7519 byte_swap_32 (oldoffice01->encryptedVerifier[3]),
7520 byte_swap_32 (oldoffice01->encryptedVerifierHash[0]),
7521 byte_swap_32 (oldoffice01->encryptedVerifierHash[1]),
7522 byte_swap_32 (oldoffice01->encryptedVerifierHash[2]),
7523 byte_swap_32 (oldoffice01->encryptedVerifierHash[3]));
7524 }
7525 else if (hash_mode == 9720)
7526 {
7527 oldoffice01_t *oldoffice01s = (oldoffice01_t *) data.esalts_buf;
7528
7529 oldoffice01_t *oldoffice01 = &oldoffice01s[salt_pos];
7530
7531 u8 *rc4key = (u8 *) oldoffice01->rc4key;
7532
7533 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x:%02x%02x%02x%02x%02x",
7534 (oldoffice01->version == 0) ? SIGNATURE_OLDOFFICE0 : SIGNATURE_OLDOFFICE1,
7535 byte_swap_32 (salt.salt_buf[0]),
7536 byte_swap_32 (salt.salt_buf[1]),
7537 byte_swap_32 (salt.salt_buf[2]),
7538 byte_swap_32 (salt.salt_buf[3]),
7539 byte_swap_32 (oldoffice01->encryptedVerifier[0]),
7540 byte_swap_32 (oldoffice01->encryptedVerifier[1]),
7541 byte_swap_32 (oldoffice01->encryptedVerifier[2]),
7542 byte_swap_32 (oldoffice01->encryptedVerifier[3]),
7543 byte_swap_32 (oldoffice01->encryptedVerifierHash[0]),
7544 byte_swap_32 (oldoffice01->encryptedVerifierHash[1]),
7545 byte_swap_32 (oldoffice01->encryptedVerifierHash[2]),
7546 byte_swap_32 (oldoffice01->encryptedVerifierHash[3]),
7547 rc4key[0],
7548 rc4key[1],
7549 rc4key[2],
7550 rc4key[3],
7551 rc4key[4]);
7552 }
7553 else if (hash_mode == 9800)
7554 {
7555 oldoffice34_t *oldoffice34s = (oldoffice34_t *) data.esalts_buf;
7556
7557 oldoffice34_t *oldoffice34 = &oldoffice34s[salt_pos];
7558
7559 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x",
7560 (oldoffice34->version == 3) ? SIGNATURE_OLDOFFICE3 : SIGNATURE_OLDOFFICE4,
7561 salt.salt_buf[0],
7562 salt.salt_buf[1],
7563 salt.salt_buf[2],
7564 salt.salt_buf[3],
7565 byte_swap_32 (oldoffice34->encryptedVerifier[0]),
7566 byte_swap_32 (oldoffice34->encryptedVerifier[1]),
7567 byte_swap_32 (oldoffice34->encryptedVerifier[2]),
7568 byte_swap_32 (oldoffice34->encryptedVerifier[3]),
7569 byte_swap_32 (oldoffice34->encryptedVerifierHash[0]),
7570 byte_swap_32 (oldoffice34->encryptedVerifierHash[1]),
7571 byte_swap_32 (oldoffice34->encryptedVerifierHash[2]),
7572 byte_swap_32 (oldoffice34->encryptedVerifierHash[3]),
7573 byte_swap_32 (oldoffice34->encryptedVerifierHash[4]));
7574 }
7575 else if (hash_mode == 9810)
7576 {
7577 oldoffice34_t *oldoffice34s = (oldoffice34_t *) data.esalts_buf;
7578
7579 oldoffice34_t *oldoffice34 = &oldoffice34s[salt_pos];
7580
7581 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x",
7582 (oldoffice34->version == 3) ? SIGNATURE_OLDOFFICE3 : SIGNATURE_OLDOFFICE4,
7583 salt.salt_buf[0],
7584 salt.salt_buf[1],
7585 salt.salt_buf[2],
7586 salt.salt_buf[3],
7587 byte_swap_32 (oldoffice34->encryptedVerifier[0]),
7588 byte_swap_32 (oldoffice34->encryptedVerifier[1]),
7589 byte_swap_32 (oldoffice34->encryptedVerifier[2]),
7590 byte_swap_32 (oldoffice34->encryptedVerifier[3]),
7591 byte_swap_32 (oldoffice34->encryptedVerifierHash[0]),
7592 byte_swap_32 (oldoffice34->encryptedVerifierHash[1]),
7593 byte_swap_32 (oldoffice34->encryptedVerifierHash[2]),
7594 byte_swap_32 (oldoffice34->encryptedVerifierHash[3]),
7595 byte_swap_32 (oldoffice34->encryptedVerifierHash[4]));
7596 }
7597 else if (hash_mode == 9820)
7598 {
7599 oldoffice34_t *oldoffice34s = (oldoffice34_t *) data.esalts_buf;
7600
7601 oldoffice34_t *oldoffice34 = &oldoffice34s[salt_pos];
7602
7603 u8 *rc4key = (u8 *) oldoffice34->rc4key;
7604
7605 snprintf (out_buf, len-1, "%s*%08x%08x%08x%08x*%08x%08x%08x%08x*%08x%08x%08x%08x%08x:%02x%02x%02x%02x%02x",
7606 (oldoffice34->version == 3) ? SIGNATURE_OLDOFFICE3 : SIGNATURE_OLDOFFICE4,
7607 salt.salt_buf[0],
7608 salt.salt_buf[1],
7609 salt.salt_buf[2],
7610 salt.salt_buf[3],
7611 byte_swap_32 (oldoffice34->encryptedVerifier[0]),
7612 byte_swap_32 (oldoffice34->encryptedVerifier[1]),
7613 byte_swap_32 (oldoffice34->encryptedVerifier[2]),
7614 byte_swap_32 (oldoffice34->encryptedVerifier[3]),
7615 byte_swap_32 (oldoffice34->encryptedVerifierHash[0]),
7616 byte_swap_32 (oldoffice34->encryptedVerifierHash[1]),
7617 byte_swap_32 (oldoffice34->encryptedVerifierHash[2]),
7618 byte_swap_32 (oldoffice34->encryptedVerifierHash[3]),
7619 byte_swap_32 (oldoffice34->encryptedVerifierHash[4]),
7620 rc4key[0],
7621 rc4key[1],
7622 rc4key[2],
7623 rc4key[3],
7624 rc4key[4]);
7625 }
7626 else if (hash_mode == 10000)
7627 {
7628 // salt
7629
7630 pbkdf2_sha256_t *pbkdf2_sha256s = (pbkdf2_sha256_t *) data.esalts_buf;
7631
7632 pbkdf2_sha256_t *pbkdf2_sha256 = &pbkdf2_sha256s[salt_pos];
7633
7634 unsigned char *salt_buf_ptr = (unsigned char *) pbkdf2_sha256->salt_buf;
7635
7636 // hash
7637
7638 digest_buf[0] = byte_swap_32 (digest_buf[0]);
7639 digest_buf[1] = byte_swap_32 (digest_buf[1]);
7640 digest_buf[2] = byte_swap_32 (digest_buf[2]);
7641 digest_buf[3] = byte_swap_32 (digest_buf[3]);
7642 digest_buf[4] = byte_swap_32 (digest_buf[4]);
7643 digest_buf[5] = byte_swap_32 (digest_buf[5]);
7644 digest_buf[6] = byte_swap_32 (digest_buf[6]);
7645 digest_buf[7] = byte_swap_32 (digest_buf[7]);
7646 digest_buf[8] = 0; // needed for base64_encode ()
7647
7648 char tmp_buf[64] = { 0 };
7649
7650 base64_encode (int_to_base64, (const u8 *) digest_buf, 32, (u8 *) tmp_buf);
7651
7652 // output
7653
7654 snprintf (out_buf, len-1, "%s%i$%s$%s", SIGNATURE_DJANGOPBKDF2, salt.salt_iter + 1, salt_buf_ptr, tmp_buf);
7655 }
7656 else if (hash_mode == 10100)
7657 {
7658 snprintf (out_buf, len-1, "%08x%08x:%u:%u:%08x%08x%08x%08x",
7659 digest_buf[0],
7660 digest_buf[1],
7661 2,
7662 4,
7663 byte_swap_32 (salt.salt_buf[0]),
7664 byte_swap_32 (salt.salt_buf[1]),
7665 byte_swap_32 (salt.salt_buf[2]),
7666 byte_swap_32 (salt.salt_buf[3]));
7667 }
7668 else if (hash_mode == 10200)
7669 {
7670 cram_md5_t *cram_md5s = (cram_md5_t *) data.esalts_buf;
7671
7672 cram_md5_t *cram_md5 = &cram_md5s[salt_pos];
7673
7674 // challenge
7675
7676 char challenge[100] = { 0 };
7677
7678 base64_encode (int_to_base64, (const u8 *) salt.salt_buf, salt.salt_len, (u8 *) challenge);
7679
7680 // response
7681
7682 char tmp_buf[100] = { 0 };
7683
7684 uint tmp_len = snprintf (tmp_buf, 100, "%s %08x%08x%08x%08x",
7685 (char *) cram_md5->user,
7686 digest_buf[0],
7687 digest_buf[1],
7688 digest_buf[2],
7689 digest_buf[3]);
7690
7691 char response[100] = { 0 };
7692
7693 base64_encode (int_to_base64, (const u8 *) tmp_buf, tmp_len, (u8 *) response);
7694
7695 snprintf (out_buf, len-1, "%s%s$%s", SIGNATURE_CRAM_MD5, challenge, response);
7696 }
7697 else if (hash_mode == 10300)
7698 {
7699 char tmp_buf[100] = { 0 };
7700
7701 memcpy (tmp_buf + 0, digest_buf, 20);
7702 memcpy (tmp_buf + 20, salt.salt_buf, salt.salt_len);
7703
7704 uint tmp_len = 20 + salt.salt_len;
7705
7706 // base64 encode it
7707
7708 char base64_encoded[100] = { 0 };
7709
7710 base64_encode (int_to_base64, (const u8 *) tmp_buf, tmp_len, (u8 *) base64_encoded);
7711
7712 snprintf (out_buf, len-1, "%s%i}%s", SIGNATURE_SAPH_SHA1, salt.salt_iter + 1, base64_encoded);
7713 }
7714 else if (hash_mode == 10400)
7715 {
7716 pdf_t *pdfs = (pdf_t *) data.esalts_buf;
7717
7718 pdf_t *pdf = &pdfs[salt_pos];
7719
7720 snprintf (out_buf, len-1, "$pdf$%d*%d*%d*%d*%d*%d*%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x",
7721
7722 pdf->V,
7723 pdf->R,
7724 40,
7725 pdf->P,
7726 pdf->enc_md,
7727 pdf->id_len,
7728 byte_swap_32 (pdf->id_buf[0]),
7729 byte_swap_32 (pdf->id_buf[1]),
7730 byte_swap_32 (pdf->id_buf[2]),
7731 byte_swap_32 (pdf->id_buf[3]),
7732 pdf->u_len,
7733 byte_swap_32 (pdf->u_buf[0]),
7734 byte_swap_32 (pdf->u_buf[1]),
7735 byte_swap_32 (pdf->u_buf[2]),
7736 byte_swap_32 (pdf->u_buf[3]),
7737 byte_swap_32 (pdf->u_buf[4]),
7738 byte_swap_32 (pdf->u_buf[5]),
7739 byte_swap_32 (pdf->u_buf[6]),
7740 byte_swap_32 (pdf->u_buf[7]),
7741 pdf->o_len,
7742 byte_swap_32 (pdf->o_buf[0]),
7743 byte_swap_32 (pdf->o_buf[1]),
7744 byte_swap_32 (pdf->o_buf[2]),
7745 byte_swap_32 (pdf->o_buf[3]),
7746 byte_swap_32 (pdf->o_buf[4]),
7747 byte_swap_32 (pdf->o_buf[5]),
7748 byte_swap_32 (pdf->o_buf[6]),
7749 byte_swap_32 (pdf->o_buf[7])
7750 );
7751 }
7752 else if (hash_mode == 10410)
7753 {
7754 pdf_t *pdfs = (pdf_t *) data.esalts_buf;
7755
7756 pdf_t *pdf = &pdfs[salt_pos];
7757
7758 snprintf (out_buf, len-1, "$pdf$%d*%d*%d*%d*%d*%d*%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x",
7759
7760 pdf->V,
7761 pdf->R,
7762 40,
7763 pdf->P,
7764 pdf->enc_md,
7765 pdf->id_len,
7766 byte_swap_32 (pdf->id_buf[0]),
7767 byte_swap_32 (pdf->id_buf[1]),
7768 byte_swap_32 (pdf->id_buf[2]),
7769 byte_swap_32 (pdf->id_buf[3]),
7770 pdf->u_len,
7771 byte_swap_32 (pdf->u_buf[0]),
7772 byte_swap_32 (pdf->u_buf[1]),
7773 byte_swap_32 (pdf->u_buf[2]),
7774 byte_swap_32 (pdf->u_buf[3]),
7775 byte_swap_32 (pdf->u_buf[4]),
7776 byte_swap_32 (pdf->u_buf[5]),
7777 byte_swap_32 (pdf->u_buf[6]),
7778 byte_swap_32 (pdf->u_buf[7]),
7779 pdf->o_len,
7780 byte_swap_32 (pdf->o_buf[0]),
7781 byte_swap_32 (pdf->o_buf[1]),
7782 byte_swap_32 (pdf->o_buf[2]),
7783 byte_swap_32 (pdf->o_buf[3]),
7784 byte_swap_32 (pdf->o_buf[4]),
7785 byte_swap_32 (pdf->o_buf[5]),
7786 byte_swap_32 (pdf->o_buf[6]),
7787 byte_swap_32 (pdf->o_buf[7])
7788 );
7789 }
7790 else if (hash_mode == 10420)
7791 {
7792 pdf_t *pdfs = (pdf_t *) data.esalts_buf;
7793
7794 pdf_t *pdf = &pdfs[salt_pos];
7795
7796 u8 *rc4key = (u8 *) pdf->rc4key;
7797
7798 snprintf (out_buf, len-1, "$pdf$%d*%d*%d*%d*%d*%d*%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x:%02x%02x%02x%02x%02x",
7799
7800 pdf->V,
7801 pdf->R,
7802 40,
7803 pdf->P,
7804 pdf->enc_md,
7805 pdf->id_len,
7806 byte_swap_32 (pdf->id_buf[0]),
7807 byte_swap_32 (pdf->id_buf[1]),
7808 byte_swap_32 (pdf->id_buf[2]),
7809 byte_swap_32 (pdf->id_buf[3]),
7810 pdf->u_len,
7811 byte_swap_32 (pdf->u_buf[0]),
7812 byte_swap_32 (pdf->u_buf[1]),
7813 byte_swap_32 (pdf->u_buf[2]),
7814 byte_swap_32 (pdf->u_buf[3]),
7815 byte_swap_32 (pdf->u_buf[4]),
7816 byte_swap_32 (pdf->u_buf[5]),
7817 byte_swap_32 (pdf->u_buf[6]),
7818 byte_swap_32 (pdf->u_buf[7]),
7819 pdf->o_len,
7820 byte_swap_32 (pdf->o_buf[0]),
7821 byte_swap_32 (pdf->o_buf[1]),
7822 byte_swap_32 (pdf->o_buf[2]),
7823 byte_swap_32 (pdf->o_buf[3]),
7824 byte_swap_32 (pdf->o_buf[4]),
7825 byte_swap_32 (pdf->o_buf[5]),
7826 byte_swap_32 (pdf->o_buf[6]),
7827 byte_swap_32 (pdf->o_buf[7]),
7828 rc4key[0],
7829 rc4key[1],
7830 rc4key[2],
7831 rc4key[3],
7832 rc4key[4]
7833 );
7834 }
7835 else if (hash_mode == 10500)
7836 {
7837 pdf_t *pdfs = (pdf_t *) data.esalts_buf;
7838
7839 pdf_t *pdf = &pdfs[salt_pos];
7840
7841 if (pdf->id_len == 32)
7842 {
7843 snprintf (out_buf, len-1, "$pdf$%d*%d*%d*%d*%d*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x",
7844
7845 pdf->V,
7846 pdf->R,
7847 128,
7848 pdf->P,
7849 pdf->enc_md,
7850 pdf->id_len,
7851 byte_swap_32 (pdf->id_buf[0]),
7852 byte_swap_32 (pdf->id_buf[1]),
7853 byte_swap_32 (pdf->id_buf[2]),
7854 byte_swap_32 (pdf->id_buf[3]),
7855 byte_swap_32 (pdf->id_buf[4]),
7856 byte_swap_32 (pdf->id_buf[5]),
7857 byte_swap_32 (pdf->id_buf[6]),
7858 byte_swap_32 (pdf->id_buf[7]),
7859 pdf->u_len,
7860 byte_swap_32 (pdf->u_buf[0]),
7861 byte_swap_32 (pdf->u_buf[1]),
7862 byte_swap_32 (pdf->u_buf[2]),
7863 byte_swap_32 (pdf->u_buf[3]),
7864 byte_swap_32 (pdf->u_buf[4]),
7865 byte_swap_32 (pdf->u_buf[5]),
7866 byte_swap_32 (pdf->u_buf[6]),
7867 byte_swap_32 (pdf->u_buf[7]),
7868 pdf->o_len,
7869 byte_swap_32 (pdf->o_buf[0]),
7870 byte_swap_32 (pdf->o_buf[1]),
7871 byte_swap_32 (pdf->o_buf[2]),
7872 byte_swap_32 (pdf->o_buf[3]),
7873 byte_swap_32 (pdf->o_buf[4]),
7874 byte_swap_32 (pdf->o_buf[5]),
7875 byte_swap_32 (pdf->o_buf[6]),
7876 byte_swap_32 (pdf->o_buf[7])
7877 );
7878 }
7879 else
7880 {
7881 snprintf (out_buf, len-1, "$pdf$%d*%d*%d*%d*%d*%d*%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x*%d*%08x%08x%08x%08x%08x%08x%08x%08x",
7882
7883 pdf->V,
7884 pdf->R,
7885 128,
7886 pdf->P,
7887 pdf->enc_md,
7888 pdf->id_len,
7889 byte_swap_32 (pdf->id_buf[0]),
7890 byte_swap_32 (pdf->id_buf[1]),
7891 byte_swap_32 (pdf->id_buf[2]),
7892 byte_swap_32 (pdf->id_buf[3]),
7893 pdf->u_len,
7894 byte_swap_32 (pdf->u_buf[0]),
7895 byte_swap_32 (pdf->u_buf[1]),
7896 byte_swap_32 (pdf->u_buf[2]),
7897 byte_swap_32 (pdf->u_buf[3]),
7898 byte_swap_32 (pdf->u_buf[4]),
7899 byte_swap_32 (pdf->u_buf[5]),
7900 byte_swap_32 (pdf->u_buf[6]),
7901 byte_swap_32 (pdf->u_buf[7]),
7902 pdf->o_len,
7903 byte_swap_32 (pdf->o_buf[0]),
7904 byte_swap_32 (pdf->o_buf[1]),
7905 byte_swap_32 (pdf->o_buf[2]),
7906 byte_swap_32 (pdf->o_buf[3]),
7907 byte_swap_32 (pdf->o_buf[4]),
7908 byte_swap_32 (pdf->o_buf[5]),
7909 byte_swap_32 (pdf->o_buf[6]),
7910 byte_swap_32 (pdf->o_buf[7])
7911 );
7912 }
7913 }
7914 else if (hash_mode == 10600)
7915 {
7916 uint digest_idx = salt.digests_offset + digest_pos;
7917
7918 hashinfo_t **hashinfo_ptr = data.hash_info;
7919 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
7920
7921 snprintf (out_buf, len-1, "%s", hash_buf);
7922 }
7923 else if (hash_mode == 10700)
7924 {
7925 uint digest_idx = salt.digests_offset + digest_pos;
7926
7927 hashinfo_t **hashinfo_ptr = data.hash_info;
7928 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
7929
7930 snprintf (out_buf, len-1, "%s", hash_buf);
7931 }
7932 else if (hash_mode == 10900)
7933 {
7934 uint digest_idx = salt.digests_offset + digest_pos;
7935
7936 hashinfo_t **hashinfo_ptr = data.hash_info;
7937 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
7938
7939 snprintf (out_buf, len-1, "%s", hash_buf);
7940 }
7941 else if (hash_mode == 11100)
7942 {
7943 u32 salt_challenge = salt.salt_buf[0];
7944
7945 salt_challenge = byte_swap_32 (salt_challenge);
7946
7947 unsigned char *user_name = (unsigned char *) (salt.salt_buf + 1);
7948
7949 snprintf (out_buf, len-1, "%s%s*%08x*%08x%08x%08x%08x",
7950 SIGNATURE_POSTGRESQL_AUTH,
7951 user_name,
7952 salt_challenge,
7953 digest_buf[0],
7954 digest_buf[1],
7955 digest_buf[2],
7956 digest_buf[3]);
7957 }
7958 else if (hash_mode == 11200)
7959 {
7960 snprintf (out_buf, len-1, "%s%s*%08x%08x%08x%08x%08x",
7961 SIGNATURE_MYSQL_AUTH,
7962 (unsigned char *) salt.salt_buf,
7963 digest_buf[0],
7964 digest_buf[1],
7965 digest_buf[2],
7966 digest_buf[3],
7967 digest_buf[4]);
7968 }
7969 else if (hash_mode == 11300)
7970 {
7971 bitcoin_wallet_t *bitcoin_wallets = (bitcoin_wallet_t *) data.esalts_buf;
7972
7973 bitcoin_wallet_t *bitcoin_wallet = &bitcoin_wallets[salt_pos];
7974
7975 const uint cry_master_len = bitcoin_wallet->cry_master_len;
7976 const uint ckey_len = bitcoin_wallet->ckey_len;
7977 const uint public_key_len = bitcoin_wallet->public_key_len;
7978
7979 char *cry_master_buf = (char *) mymalloc ((cry_master_len * 2) + 1);
7980 char *ckey_buf = (char *) mymalloc ((ckey_len * 2) + 1);
7981 char *public_key_buf = (char *) mymalloc ((public_key_len * 2) + 1);
7982
7983 for (uint i = 0, j = 0; i < cry_master_len; i += 1, j += 2)
7984 {
7985 const u8 *ptr = (const u8 *) bitcoin_wallet->cry_master_buf;
7986
7987 sprintf (cry_master_buf + j, "%02x", ptr[i]);
7988 }
7989
7990 for (uint i = 0, j = 0; i < ckey_len; i += 1, j += 2)
7991 {
7992 const u8 *ptr = (const u8 *) bitcoin_wallet->ckey_buf;
7993
7994 sprintf (ckey_buf + j, "%02x", ptr[i]);
7995 }
7996
7997 for (uint i = 0, j = 0; i < public_key_len; i += 1, j += 2)
7998 {
7999 const u8 *ptr = (const u8 *) bitcoin_wallet->public_key_buf;
8000
8001 sprintf (public_key_buf + j, "%02x", ptr[i]);
8002 }
8003
8004 snprintf (out_buf, len-1, "%s%d$%s$%d$%s$%d$%d$%s$%d$%s",
8005 SIGNATURE_BITCOIN_WALLET,
8006 cry_master_len * 2,
8007 cry_master_buf,
8008 salt.salt_len,
8009 (unsigned char *) salt.salt_buf,
8010 salt.salt_iter + 1,
8011 ckey_len * 2,
8012 ckey_buf,
8013 public_key_len * 2,
8014 public_key_buf
8015 );
8016
8017 free (cry_master_buf);
8018 free (ckey_buf);
8019 free (public_key_buf);
8020 }
8021 else if (hash_mode == 11400)
8022 {
8023 uint digest_idx = salt.digests_offset + digest_pos;
8024
8025 hashinfo_t **hashinfo_ptr = data.hash_info;
8026 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
8027
8028 snprintf (out_buf, len-1, "%s", hash_buf);
8029 }
8030 else if (hash_mode == 11600)
8031 {
8032 seven_zip_t *seven_zips = (seven_zip_t *) data.esalts_buf;
8033
8034 seven_zip_t *seven_zip = &seven_zips[salt_pos];
8035
8036 const uint data_len = seven_zip->data_len;
8037
8038 char *data_buf = (char *) mymalloc ((data_len * 2) + 1);
8039
8040 for (uint i = 0, j = 0; i < data_len; i += 1, j += 2)
8041 {
8042 const u8 *ptr = (const u8 *) seven_zip->data_buf;
8043
8044 sprintf (data_buf + j, "%02x", ptr[i]);
8045 }
8046
8047 snprintf (out_buf, len-1, "%s%u$%u$%u$%s$%u$%08x%08x%08x%08x$%u$%u$%u$%s",
8048 SIGNATURE_SEVEN_ZIP,
8049 0,
8050 salt.salt_sign[0],
8051 0,
8052 (char *) seven_zip->salt_buf,
8053 seven_zip->iv_len,
8054 seven_zip->iv_buf[0],
8055 seven_zip->iv_buf[1],
8056 seven_zip->iv_buf[2],
8057 seven_zip->iv_buf[3],
8058 seven_zip->crc,
8059 seven_zip->data_len,
8060 seven_zip->unpack_size,
8061 data_buf);
8062
8063 free (data_buf);
8064 }
8065 else if (hash_mode == 11700)
8066 {
8067 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x",
8068 digest_buf[0],
8069 digest_buf[1],
8070 digest_buf[2],
8071 digest_buf[3],
8072 digest_buf[4],
8073 digest_buf[5],
8074 digest_buf[6],
8075 digest_buf[7]);
8076 }
8077 else if (hash_mode == 11800)
8078 {
8079 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8080 digest_buf[ 0],
8081 digest_buf[ 1],
8082 digest_buf[ 2],
8083 digest_buf[ 3],
8084 digest_buf[ 4],
8085 digest_buf[ 5],
8086 digest_buf[ 6],
8087 digest_buf[ 7],
8088 digest_buf[ 8],
8089 digest_buf[ 9],
8090 digest_buf[10],
8091 digest_buf[11],
8092 digest_buf[12],
8093 digest_buf[13],
8094 digest_buf[14],
8095 digest_buf[15]);
8096 }
8097 else if (hash_mode == 11900)
8098 {
8099 uint digest_idx = salt.digests_offset + digest_pos;
8100
8101 hashinfo_t **hashinfo_ptr = data.hash_info;
8102 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
8103
8104 snprintf (out_buf, len-1, "%s", hash_buf);
8105 }
8106 else if (hash_mode == 12000)
8107 {
8108 uint digest_idx = salt.digests_offset + digest_pos;
8109
8110 hashinfo_t **hashinfo_ptr = data.hash_info;
8111 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
8112
8113 snprintf (out_buf, len-1, "%s", hash_buf);
8114 }
8115 else if (hash_mode == 12100)
8116 {
8117 uint digest_idx = salt.digests_offset + digest_pos;
8118
8119 hashinfo_t **hashinfo_ptr = data.hash_info;
8120 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
8121
8122 snprintf (out_buf, len-1, "%s", hash_buf);
8123 }
8124 else if (hash_mode == 12200)
8125 {
8126 uint *ptr_digest = digest_buf;
8127 uint *ptr_salt = salt.salt_buf;
8128
8129 snprintf (out_buf, len-1, "%s0$1$%08x%08x$%08x%08x",
8130 SIGNATURE_ECRYPTFS,
8131 ptr_salt[0],
8132 ptr_salt[1],
8133 ptr_digest[0],
8134 ptr_digest[1]);
8135 }
8136 else if (hash_mode == 12300)
8137 {
8138 uint *ptr_digest = digest_buf;
8139 uint *ptr_salt = salt.salt_buf;
8140
8141 snprintf (out_buf, len-1, "%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X%08X",
8142 ptr_digest[ 0], ptr_digest[ 1],
8143 ptr_digest[ 2], ptr_digest[ 3],
8144 ptr_digest[ 4], ptr_digest[ 5],
8145 ptr_digest[ 6], ptr_digest[ 7],
8146 ptr_digest[ 8], ptr_digest[ 9],
8147 ptr_digest[10], ptr_digest[11],
8148 ptr_digest[12], ptr_digest[13],
8149 ptr_digest[14], ptr_digest[15],
8150 ptr_salt[0],
8151 ptr_salt[1],
8152 ptr_salt[2],
8153 ptr_salt[3]);
8154 }
8155 else if (hash_mode == 12400)
8156 {
8157 // encode iteration count
8158
8159 char salt_iter[5] = { 0 };
8160
8161 salt_iter[0] = int_to_itoa64 ((salt.salt_iter ) & 0x3f);
8162 salt_iter[1] = int_to_itoa64 ((salt.salt_iter >> 6) & 0x3f);
8163 salt_iter[2] = int_to_itoa64 ((salt.salt_iter >> 12) & 0x3f);
8164 salt_iter[3] = int_to_itoa64 ((salt.salt_iter >> 18) & 0x3f);
8165 salt_iter[4] = 0;
8166
8167 // encode salt
8168
8169 ptr_salt[0] = int_to_itoa64 ((salt.salt_buf[0] ) & 0x3f);
8170 ptr_salt[1] = int_to_itoa64 ((salt.salt_buf[0] >> 6) & 0x3f);
8171 ptr_salt[2] = int_to_itoa64 ((salt.salt_buf[0] >> 12) & 0x3f);
8172 ptr_salt[3] = int_to_itoa64 ((salt.salt_buf[0] >> 18) & 0x3f);
8173 ptr_salt[4] = 0;
8174
8175 // encode digest
8176
8177 memset (tmp_buf, 0, sizeof (tmp_buf));
8178
8179 digest_buf[0] = byte_swap_32 (digest_buf[0]);
8180 digest_buf[1] = byte_swap_32 (digest_buf[1]);
8181
8182 memcpy (tmp_buf, digest_buf, 8);
8183
8184 base64_encode (int_to_itoa64, (const u8 *) tmp_buf, 8, (u8 *) ptr_plain);
8185
8186 ptr_plain[11] = 0;
8187
8188 // fill the resulting buffer
8189
8190 snprintf (out_buf, len - 1, "_%s%s%s", salt_iter, ptr_salt, ptr_plain);
8191 }
8192 else if (hash_mode == 12500)
8193 {
8194 snprintf (out_buf, len - 1, "%s*0*%08x%08x*%08x%08x%08x%08x",
8195 SIGNATURE_RAR3,
8196 byte_swap_32 (salt.salt_buf[0]),
8197 byte_swap_32 (salt.salt_buf[1]),
8198 salt.salt_buf[2],
8199 salt.salt_buf[3],
8200 salt.salt_buf[4],
8201 salt.salt_buf[5]);
8202 }
8203 else if (hash_mode == 12600)
8204 {
8205 snprintf (out_buf, len - 1, "%08x%08x%08x%08x%08x%08x%08x%08x",
8206 digest_buf[0] + salt.salt_buf_pc[0],
8207 digest_buf[1] + salt.salt_buf_pc[1],
8208 digest_buf[2] + salt.salt_buf_pc[2],
8209 digest_buf[3] + salt.salt_buf_pc[3],
8210 digest_buf[4] + salt.salt_buf_pc[4],
8211 digest_buf[5] + salt.salt_buf_pc[5],
8212 digest_buf[6] + salt.salt_buf_pc[6],
8213 digest_buf[7] + salt.salt_buf_pc[7]);
8214 }
8215 else if (hash_mode == 12700)
8216 {
8217 uint digest_idx = salt.digests_offset + digest_pos;
8218
8219 hashinfo_t **hashinfo_ptr = data.hash_info;
8220 char *hash_buf = hashinfo_ptr[digest_idx]->orighash;
8221
8222 snprintf (out_buf, len-1, "%s", hash_buf);
8223 }
8224 else if (hash_mode == 12800)
8225 {
8226 const u8 *ptr = (const u8 *) salt.salt_buf;
8227
8228 snprintf (out_buf, len-1, "%s,%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x,%d,%08x%08x%08x%08x%08x%08x%08x%08x",
8229 SIGNATURE_MS_DRSR,
8230 ptr[0],
8231 ptr[1],
8232 ptr[2],
8233 ptr[3],
8234 ptr[4],
8235 ptr[5],
8236 ptr[6],
8237 ptr[7],
8238 ptr[8],
8239 ptr[9],
8240 salt.salt_iter + 1,
8241 byte_swap_32 (digest_buf[0]),
8242 byte_swap_32 (digest_buf[1]),
8243 byte_swap_32 (digest_buf[2]),
8244 byte_swap_32 (digest_buf[3]),
8245 byte_swap_32 (digest_buf[4]),
8246 byte_swap_32 (digest_buf[5]),
8247 byte_swap_32 (digest_buf[6]),
8248 byte_swap_32 (digest_buf[7])
8249 );
8250 }
8251 else if (hash_mode == 12900)
8252 {
8253 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8254 salt.salt_buf[ 4],
8255 salt.salt_buf[ 5],
8256 salt.salt_buf[ 6],
8257 salt.salt_buf[ 7],
8258 salt.salt_buf[ 8],
8259 salt.salt_buf[ 9],
8260 salt.salt_buf[10],
8261 salt.salt_buf[11],
8262 byte_swap_32 (digest_buf[0]),
8263 byte_swap_32 (digest_buf[1]),
8264 byte_swap_32 (digest_buf[2]),
8265 byte_swap_32 (digest_buf[3]),
8266 byte_swap_32 (digest_buf[4]),
8267 byte_swap_32 (digest_buf[5]),
8268 byte_swap_32 (digest_buf[6]),
8269 byte_swap_32 (digest_buf[7]),
8270 salt.salt_buf[ 0],
8271 salt.salt_buf[ 1],
8272 salt.salt_buf[ 2],
8273 salt.salt_buf[ 3]
8274 );
8275 }
8276 else if (hash_mode == 13000)
8277 {
8278 rar5_t *rar5s = (rar5_t *) data.esalts_buf;
8279
8280 rar5_t *rar5 = &rar5s[salt_pos];
8281
8282 snprintf (out_buf, len-1, "$rar5$16$%08x%08x%08x%08x$%u$%08x%08x%08x%08x$8$%08x%08x",
8283 salt.salt_buf[0],
8284 salt.salt_buf[1],
8285 salt.salt_buf[2],
8286 salt.salt_buf[3],
8287 salt.salt_sign[0],
8288 rar5->iv[0],
8289 rar5->iv[1],
8290 rar5->iv[2],
8291 rar5->iv[3],
8292 byte_swap_32 (digest_buf[0]),
8293 byte_swap_32 (digest_buf[1])
8294 );
8295 }
8296 else if (hash_mode == 13100)
8297 {
8298 krb5tgs_t *krb5tgss = (krb5tgs_t *) data.esalts_buf;
8299
8300 krb5tgs_t *krb5tgs = &krb5tgss[salt_pos];
8301
8302 u8 *ptr_checksum = (u8 *) krb5tgs->checksum;
8303 u8 *ptr_edata2 = (u8 *) krb5tgs->edata2;
8304
8305 char data[2560 * 4 * 2] = { 0 };
8306
8307 char *ptr_data = data;
8308
8309 for (uint i = 0; i < 16; i++, ptr_data += 2)
8310 sprintf (ptr_data, "%02x", ptr_checksum[i]);
8311
8312 /* skip '$' */
8313 ptr_data++;
8314
8315 for (uint i = 0; i < krb5tgs->edata2_len; i++, ptr_data += 2)
8316 sprintf (ptr_data, "%02x", ptr_edata2[i]);
8317
8318 snprintf (out_buf, len-1, "%s$%s$%s$%s",
8319 SIGNATURE_KRB5TGS,
8320 (char *) krb5tgs->account_info,
8321 data,
8322 data + 33);
8323 }
8324 else
8325 {
8326 if (hash_type == HASH_TYPE_MD4)
8327 {
8328 snprintf (out_buf, 255, "%08x%08x%08x%08x",
8329 digest_buf[0],
8330 digest_buf[1],
8331 digest_buf[2],
8332 digest_buf[3]);
8333 }
8334 else if (hash_type == HASH_TYPE_MD5)
8335 {
8336 snprintf (out_buf, len-1, "%08x%08x%08x%08x",
8337 digest_buf[0],
8338 digest_buf[1],
8339 digest_buf[2],
8340 digest_buf[3]);
8341 }
8342 else if (hash_type == HASH_TYPE_SHA1)
8343 {
8344 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x",
8345 digest_buf[0],
8346 digest_buf[1],
8347 digest_buf[2],
8348 digest_buf[3],
8349 digest_buf[4]);
8350 }
8351 else if (hash_type == HASH_TYPE_SHA256)
8352 {
8353 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x",
8354 digest_buf[0],
8355 digest_buf[1],
8356 digest_buf[2],
8357 digest_buf[3],
8358 digest_buf[4],
8359 digest_buf[5],
8360 digest_buf[6],
8361 digest_buf[7]);
8362 }
8363 else if (hash_type == HASH_TYPE_SHA384)
8364 {
8365 uint *ptr = digest_buf;
8366
8367 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8368 ptr[ 1], ptr[ 0],
8369 ptr[ 3], ptr[ 2],
8370 ptr[ 5], ptr[ 4],
8371 ptr[ 7], ptr[ 6],
8372 ptr[ 9], ptr[ 8],
8373 ptr[11], ptr[10]);
8374 }
8375 else if (hash_type == HASH_TYPE_SHA512)
8376 {
8377 uint *ptr = digest_buf;
8378
8379 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8380 ptr[ 1], ptr[ 0],
8381 ptr[ 3], ptr[ 2],
8382 ptr[ 5], ptr[ 4],
8383 ptr[ 7], ptr[ 6],
8384 ptr[ 9], ptr[ 8],
8385 ptr[11], ptr[10],
8386 ptr[13], ptr[12],
8387 ptr[15], ptr[14]);
8388 }
8389 else if (hash_type == HASH_TYPE_LM)
8390 {
8391 snprintf (out_buf, len-1, "%08x%08x",
8392 digest_buf[0],
8393 digest_buf[1]);
8394 }
8395 else if (hash_type == HASH_TYPE_ORACLEH)
8396 {
8397 snprintf (out_buf, len-1, "%08X%08X",
8398 digest_buf[0],
8399 digest_buf[1]);
8400 }
8401 else if (hash_type == HASH_TYPE_BCRYPT)
8402 {
8403 base64_encode (int_to_bf64, (const u8 *) salt.salt_buf, 16, (u8 *) tmp_buf + 0);
8404 base64_encode (int_to_bf64, (const u8 *) digest_buf, 23, (u8 *) tmp_buf + 22);
8405
8406 tmp_buf[22 + 31] = 0; // base64_encode wants to pad
8407
8408 snprintf (out_buf, len-1, "%s$%s", (char *) salt.salt_sign, tmp_buf);
8409 }
8410 else if (hash_type == HASH_TYPE_KECCAK)
8411 {
8412 uint *ptr = digest_buf;
8413
8414 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8415 ptr[ 1], ptr[ 0],
8416 ptr[ 3], ptr[ 2],
8417 ptr[ 5], ptr[ 4],
8418 ptr[ 7], ptr[ 6],
8419 ptr[ 9], ptr[ 8],
8420 ptr[11], ptr[10],
8421 ptr[13], ptr[12],
8422 ptr[15], ptr[14],
8423 ptr[17], ptr[16],
8424 ptr[19], ptr[18],
8425 ptr[21], ptr[20],
8426 ptr[23], ptr[22],
8427 ptr[25], ptr[24],
8428 ptr[27], ptr[26],
8429 ptr[29], ptr[28],
8430 ptr[31], ptr[30],
8431 ptr[33], ptr[32],
8432 ptr[35], ptr[34],
8433 ptr[37], ptr[36],
8434 ptr[39], ptr[38],
8435 ptr[41], ptr[30],
8436 ptr[43], ptr[42],
8437 ptr[45], ptr[44],
8438 ptr[47], ptr[46],
8439 ptr[49], ptr[48]
8440 );
8441
8442 out_buf[salt.keccak_mdlen * 2] = 0;
8443 }
8444 else if (hash_type == HASH_TYPE_RIPEMD160)
8445 {
8446 snprintf (out_buf, 255, "%08x%08x%08x%08x%08x",
8447 digest_buf[0],
8448 digest_buf[1],
8449 digest_buf[2],
8450 digest_buf[3],
8451 digest_buf[4]);
8452 }
8453 else if (hash_type == HASH_TYPE_WHIRLPOOL)
8454 {
8455 digest_buf[ 0] = digest_buf[ 0];
8456 digest_buf[ 1] = digest_buf[ 1];
8457 digest_buf[ 2] = digest_buf[ 2];
8458 digest_buf[ 3] = digest_buf[ 3];
8459 digest_buf[ 4] = digest_buf[ 4];
8460 digest_buf[ 5] = digest_buf[ 5];
8461 digest_buf[ 6] = digest_buf[ 6];
8462 digest_buf[ 7] = digest_buf[ 7];
8463 digest_buf[ 8] = digest_buf[ 8];
8464 digest_buf[ 9] = digest_buf[ 9];
8465 digest_buf[10] = digest_buf[10];
8466 digest_buf[11] = digest_buf[11];
8467 digest_buf[12] = digest_buf[12];
8468 digest_buf[13] = digest_buf[13];
8469 digest_buf[14] = digest_buf[14];
8470 digest_buf[15] = digest_buf[15];
8471
8472 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x%08x",
8473 digest_buf[ 0],
8474 digest_buf[ 1],
8475 digest_buf[ 2],
8476 digest_buf[ 3],
8477 digest_buf[ 4],
8478 digest_buf[ 5],
8479 digest_buf[ 6],
8480 digest_buf[ 7],
8481 digest_buf[ 8],
8482 digest_buf[ 9],
8483 digest_buf[10],
8484 digest_buf[11],
8485 digest_buf[12],
8486 digest_buf[13],
8487 digest_buf[14],
8488 digest_buf[15]);
8489 }
8490 else if (hash_type == HASH_TYPE_GOST)
8491 {
8492 snprintf (out_buf, len-1, "%08x%08x%08x%08x%08x%08x%08x%08x",
8493 digest_buf[0],
8494 digest_buf[1],
8495 digest_buf[2],
8496 digest_buf[3],
8497 digest_buf[4],
8498 digest_buf[5],
8499 digest_buf[6],
8500 digest_buf[7]);
8501 }
8502 else if (hash_type == HASH_TYPE_MYSQL)
8503 {
8504 snprintf (out_buf, len-1, "%08x%08x",
8505 digest_buf[0],
8506 digest_buf[1]);
8507 }
8508 else if (hash_type == HASH_TYPE_LOTUS5)
8509 {
8510 snprintf (out_buf, len-1, "%08x%08x%08x%08x",
8511 digest_buf[0],
8512 digest_buf[1],
8513 digest_buf[2],
8514 digest_buf[3]);
8515 }
8516 else if (hash_type == HASH_TYPE_LOTUS6)
8517 {
8518 digest_buf[ 0] = byte_swap_32 (digest_buf[ 0]);
8519 digest_buf[ 1] = byte_swap_32 (digest_buf[ 1]);
8520 digest_buf[ 2] = byte_swap_32 (digest_buf[ 2]);
8521 digest_buf[ 3] = byte_swap_32 (digest_buf[ 3]);
8522
8523 char buf[16] = { 0 };
8524
8525 memcpy (buf + 0, salt.salt_buf, 5);
8526 memcpy (buf + 5, digest_buf, 9);
8527
8528 buf[3] -= -4;
8529
8530 base64_encode (int_to_lotus64, (const u8 *) buf, 14, (u8 *) tmp_buf);
8531
8532 tmp_buf[18] = salt.salt_buf_pc[7];
8533 tmp_buf[19] = 0;
8534
8535 snprintf (out_buf, len-1, "(G%s)", tmp_buf);
8536 }
8537 else if (hash_type == HASH_TYPE_LOTUS8)
8538 {
8539 char buf[52] = { 0 };
8540
8541 // salt
8542
8543 memcpy (buf + 0, salt.salt_buf, 16);
8544
8545 buf[3] -= -4;
8546
8547 // iteration
8548
8549 snprintf (buf + 16, 11, "%010i", salt.salt_iter + 1);
8550
8551 // chars
8552
8553 buf[26] = salt.salt_buf_pc[0];
8554 buf[27] = salt.salt_buf_pc[1];
8555
8556 // digest
8557
8558 memcpy (buf + 28, digest_buf, 8);
8559
8560 base64_encode (int_to_lotus64, (const u8 *) buf, 36, (u8 *) tmp_buf);
8561
8562 tmp_buf[49] = 0;
8563
8564 snprintf (out_buf, len-1, "(H%s)", tmp_buf);
8565 }
8566 else if (hash_type == HASH_TYPE_CRC32)
8567 {
8568 snprintf (out_buf, len-1, "%08x", byte_swap_32 (digest_buf[0]));
8569 }
8570 }
8571
8572 if (salt_type == SALT_TYPE_INTERN)
8573 {
8574 size_t pos = strlen (out_buf);
8575
8576 out_buf[pos] = data.separator;
8577
8578 char *ptr = (char *) salt.salt_buf;
8579
8580 memcpy (out_buf + pos + 1, ptr, salt.salt_len);
8581
8582 out_buf[pos + 1 + salt.salt_len] = 0;
8583 }
8584 }
8585
8586 void to_hccap_t (hccap_t *hccap, uint salt_pos, uint digest_pos)
8587 {
8588 memset (hccap, 0, sizeof (hccap_t));
8589
8590 salt_t *salt = &data.salts_buf[salt_pos];
8591
8592 memcpy (hccap->essid, salt->salt_buf, salt->salt_len);
8593
8594 wpa_t *wpas = (wpa_t *) data.esalts_buf;
8595 wpa_t *wpa = &wpas[salt_pos];
8596
8597 hccap->keyver = wpa->keyver;
8598
8599 hccap->eapol_size = wpa->eapol_size;
8600
8601 if (wpa->keyver != 1)
8602 {
8603 uint eapol_tmp[64] = { 0 };
8604
8605 for (uint i = 0; i < 64; i++)
8606 {
8607 eapol_tmp[i] = byte_swap_32 (wpa->eapol[i]);
8608 }
8609
8610 memcpy (hccap->eapol, eapol_tmp, wpa->eapol_size);
8611 }
8612 else
8613 {
8614 memcpy (hccap->eapol, wpa->eapol, wpa->eapol_size);
8615 }
8616
8617 uint pke_tmp[25] = { 0 };
8618
8619 for (int i = 5; i < 25; i++)
8620 {
8621 pke_tmp[i] = byte_swap_32 (wpa->pke[i]);
8622 }
8623
8624 char *pke_ptr = (char *) pke_tmp;
8625
8626 memcpy (hccap->mac1, pke_ptr + 23, 6);
8627 memcpy (hccap->mac2, pke_ptr + 29, 6);
8628 memcpy (hccap->nonce1, pke_ptr + 67, 32);
8629 memcpy (hccap->nonce2, pke_ptr + 35, 32);
8630
8631 char *digests_buf_ptr = (char *) data.digests_buf;
8632
8633 uint dgst_size = data.dgst_size;
8634
8635 uint *digest_ptr = (uint *) (digests_buf_ptr + (data.salts_buf[salt_pos].digests_offset * dgst_size) + (digest_pos * dgst_size));
8636
8637 if (wpa->keyver != 1)
8638 {
8639 uint digest_tmp[4] = { 0 };
8640
8641 digest_tmp[0] = byte_swap_32 (digest_ptr[0]);
8642 digest_tmp[1] = byte_swap_32 (digest_ptr[1]);
8643 digest_tmp[2] = byte_swap_32 (digest_ptr[2]);
8644 digest_tmp[3] = byte_swap_32 (digest_ptr[3]);
8645
8646 memcpy (hccap->keymic, digest_tmp, 16);
8647 }
8648 else
8649 {
8650 memcpy (hccap->keymic, digest_ptr, 16);
8651 }
8652 }
8653
8654 void SuspendThreads ()
8655 {
8656 if (data.devices_status == STATUS_RUNNING)
8657 {
8658 hc_timer_set (&data.timer_paused);
8659
8660 data.devices_status = STATUS_PAUSED;
8661
8662 log_info ("Paused");
8663 }
8664 }
8665
8666 void ResumeThreads ()
8667 {
8668 if (data.devices_status == STATUS_PAUSED)
8669 {
8670 float ms_paused;
8671
8672 hc_timer_get (data.timer_paused, ms_paused);
8673
8674 data.ms_paused += ms_paused;
8675
8676 data.devices_status = STATUS_RUNNING;
8677
8678 log_info ("Resumed");
8679 }
8680 }
8681
8682 void bypass ()
8683 {
8684 if (data.devices_status != STATUS_RUNNING) return;
8685
8686 data.devices_status = STATUS_BYPASS;
8687
8688 log_info ("Next dictionary / mask in queue selected, bypassing current one");
8689 }
8690
8691 void stop_at_checkpoint ()
8692 {
8693 if (data.devices_status != STATUS_STOP_AT_CHECKPOINT)
8694 {
8695 if (data.devices_status != STATUS_RUNNING) return;
8696 }
8697
8698 // this feature only makes sense if --restore-disable was not specified
8699
8700 if (data.restore_disable == 1)
8701 {
8702 log_info ("WARNING: this feature is disabled when --restore-disable was specified");
8703
8704 return;
8705 }
8706
8707 // check if monitoring of Restore Point updates should be enabled or disabled
8708
8709 if (data.devices_status != STATUS_STOP_AT_CHECKPOINT)
8710 {
8711 data.devices_status = STATUS_STOP_AT_CHECKPOINT;
8712
8713 // save the current restore point value
8714
8715 data.checkpoint_cur_words = get_lowest_words_done ();
8716
8717 log_info ("Checkpoint enabled: will quit at next Restore Point update");
8718 }
8719 else
8720 {
8721 data.devices_status = STATUS_RUNNING;
8722
8723 // reset the global value for checkpoint checks
8724
8725 data.checkpoint_cur_words = 0;
8726
8727 log_info ("Checkpoint disabled: Restore Point updates will no longer be monitored");
8728 }
8729 }
8730
8731 void myabort ()
8732 {
8733 if (data.devices_status == STATUS_INIT) return;
8734 if (data.devices_status == STATUS_STARTING) return;
8735
8736 data.devices_status = STATUS_ABORTED;
8737 }
8738
8739 void myquit ()
8740 {
8741 if (data.devices_status == STATUS_INIT) return;
8742 if (data.devices_status == STATUS_STARTING) return;
8743
8744 data.devices_status = STATUS_QUIT;
8745 }
8746
8747 void load_kernel (const char *kernel_file, int num_devices, size_t *kernel_lengths, const u8 **kernel_sources)
8748 {
8749 FILE *fp = fopen (kernel_file, "rb");
8750
8751 if (fp != NULL)
8752 {
8753 struct stat st;
8754
8755 memset (&st, 0, sizeof (st));
8756
8757 stat (kernel_file, &st);
8758
8759 u8 *buf = (u8 *) mymalloc (st.st_size + 1);
8760
8761 size_t num_read = fread (buf, sizeof (u8), st.st_size, fp);
8762
8763 if (num_read != (size_t) st.st_size)
8764 {
8765 log_error ("ERROR: %s: %s", kernel_file, strerror (errno));
8766
8767 exit (-1);
8768 }
8769
8770 fclose (fp);
8771
8772 buf[st.st_size] = 0;
8773
8774 for (int i = 0; i < num_devices; i++)
8775 {
8776 kernel_lengths[i] = (size_t) st.st_size;
8777
8778 kernel_sources[i] = buf;
8779 }
8780 }
8781 else
8782 {
8783 log_error ("ERROR: %s: %s", kernel_file, strerror (errno));
8784
8785 exit (-1);
8786 }
8787
8788 return;
8789 }
8790
8791 void writeProgramBin (char *dst, u8 *binary, size_t binary_size)
8792 {
8793 if (binary_size > 0)
8794 {
8795 FILE *fp = fopen (dst, "wb");
8796
8797 lock_file (fp);
8798 fwrite (binary, sizeof (u8), binary_size, fp);
8799
8800 fflush (fp);
8801 fclose (fp);
8802 }
8803 }
8804
8805 /**
8806 * restore
8807 */
8808
8809 restore_data_t *init_restore (int argc, char **argv)
8810 {
8811 restore_data_t *rd = (restore_data_t *) mymalloc (sizeof (restore_data_t));
8812
8813 if (data.restore_disable == 0)
8814 {
8815 FILE *fp = fopen (data.eff_restore_file, "rb");
8816
8817 if (fp)
8818 {
8819 size_t nread = fread (rd, sizeof (restore_data_t), 1, fp);
8820
8821 if (nread != 1)
8822 {
8823 log_error ("ERROR: cannot read %s", data.eff_restore_file);
8824
8825 exit (-1);
8826 }
8827
8828 fclose (fp);
8829
8830 if (rd->pid)
8831 {
8832 char pidbin[BUFSIZ] = { 0 };
8833
8834 int pidbin_len = -1;
8835
8836 #ifdef _POSIX
8837 snprintf (pidbin, sizeof (pidbin) - 1, "/proc/%d/cmdline", rd->pid);
8838
8839 FILE *fd = fopen (pidbin, "rb");
8840
8841 if (fd)
8842 {
8843 pidbin_len = fread (pidbin, 1, BUFSIZ, fd);
8844
8845 pidbin[pidbin_len] = 0;
8846
8847 fclose (fd);
8848
8849 char *argv0_r = strrchr (argv[0], '/');
8850
8851 char *pidbin_r = strrchr (pidbin, '/');
8852
8853 if (argv0_r == NULL) argv0_r = argv[0];
8854
8855 if (pidbin_r == NULL) pidbin_r = pidbin;
8856
8857 if (strcmp (argv0_r, pidbin_r) == 0)
8858 {
8859 log_error ("ERROR: already an instance %s running on pid %d", pidbin, rd->pid);
8860
8861 exit (-1);
8862 }
8863 }
8864
8865 #elif _WIN
8866 HANDLE hProcess = OpenProcess (PROCESS_ALL_ACCESS, FALSE, rd->pid);
8867
8868 char pidbin2[BUFSIZ] = { 0 };
8869
8870 int pidbin2_len = -1;
8871
8872 pidbin_len = GetModuleFileName (NULL, pidbin, BUFSIZ);
8873 pidbin2_len = GetModuleFileNameEx (hProcess, NULL, pidbin2, BUFSIZ);
8874
8875 pidbin[pidbin_len] = 0;
8876 pidbin2[pidbin2_len] = 0;
8877
8878 if (pidbin2_len)
8879 {
8880 if (strcmp (pidbin, pidbin2) == 0)
8881 {
8882 log_error ("ERROR: already an instance %s running on pid %d", pidbin2, rd->pid);
8883
8884 exit (-1);
8885 }
8886 }
8887 #endif
8888 }
8889
8890 if (rd->version_bin < RESTORE_MIN)
8891 {
8892 log_error ("ERROR: cannot use outdated %s. Please remove it.", data.eff_restore_file);
8893
8894 exit (-1);
8895 }
8896 }
8897 }
8898
8899 memset (rd, 0, sizeof (restore_data_t));
8900
8901 rd->version_bin = VERSION_BIN;
8902
8903 #ifdef _POSIX
8904 rd->pid = getpid ();
8905 #elif _WIN
8906 rd->pid = GetCurrentProcessId ();
8907 #endif
8908
8909 if (getcwd (rd->cwd, 255) == NULL)
8910 {
8911 myfree (rd);
8912
8913 return (NULL);
8914 }
8915
8916 rd->argc = argc;
8917 rd->argv = argv;
8918
8919 return (rd);
8920 }
8921
8922 void read_restore (const char *eff_restore_file, restore_data_t *rd)
8923 {
8924 FILE *fp = fopen (eff_restore_file, "rb");
8925
8926 if (fp == NULL)
8927 {
8928 log_error ("ERROR: restore file '%s': %s", eff_restore_file, strerror (errno));
8929
8930 exit (-1);
8931 }
8932
8933 if (fread (rd, sizeof (restore_data_t), 1, fp) != 1)
8934 {
8935 log_error ("ERROR: cannot read %s", eff_restore_file);
8936
8937 exit (-1);
8938 }
8939
8940 rd->argv = (char **) mycalloc (rd->argc, sizeof (char *));
8941
8942 for (uint i = 0; i < rd->argc; i++)
8943 {
8944 char buf[BUFSIZ] = { 0 };
8945
8946 if (fgets (buf, BUFSIZ - 1, fp) == NULL)
8947 {
8948 log_error ("ERROR: cannot read %s", eff_restore_file);
8949
8950 exit (-1);
8951 }
8952
8953 size_t len = strlen (buf);
8954
8955 if (len) buf[len - 1] = 0;
8956
8957 rd->argv[i] = mystrdup (buf);
8958 }
8959
8960 fclose (fp);
8961
8962 char new_cwd[1024] = { 0 };
8963
8964 char *nwd = getcwd (new_cwd, sizeof (new_cwd));
8965
8966 if (nwd == NULL)
8967 {
8968 log_error ("Restore file is corrupted");
8969 }
8970
8971 if (strncmp (new_cwd, rd->cwd, sizeof (new_cwd)) != 0)
8972 {
8973 if (getcwd (rd->cwd, sizeof (rd->cwd)) == NULL)
8974 {
8975 log_error ("ERROR: could not determine current user path: %s", strerror (errno));
8976
8977 exit (-1);
8978 }
8979
8980 log_info ("WARNING: Found old restore file, updating path to %s...", new_cwd);
8981 }
8982
8983 if (chdir (rd->cwd))
8984 {
8985 log_error ("ERROR: cannot chdir to %s: %s", rd->cwd, strerror (errno));
8986
8987 exit (-1);
8988 }
8989 }
8990
8991 u64 get_lowest_words_done ()
8992 {
8993 u64 words_cur = -1;
8994
8995 for (uint device_id = 0; device_id < data.devices_cnt; device_id++)
8996 {
8997 hc_device_param_t *device_param = &data.devices_param[device_id];
8998
8999 if (device_param->skipped) continue;
9000
9001 const u64 words_done = device_param->words_done;
9002
9003 if (words_done < words_cur) words_cur = words_done;
9004 }
9005
9006 // It's possible that a device's workload isn't finished right after a restore-case.
9007 // In that case, this function would return 0 and overwrite the real restore point
9008 // There's also data.words_cur which is set to rd->words_cur but it changes while
9009 // the attack is running therefore we should stick to rd->words_cur.
9010 // Note that -s influences rd->words_cur we should keep a close look on that.
9011
9012 if (words_cur < data.rd->words_cur) words_cur = data.rd->words_cur;
9013
9014 return words_cur;
9015 }
9016
9017 void write_restore (const char *new_restore_file, restore_data_t *rd)
9018 {
9019 u64 words_cur = get_lowest_words_done ();
9020
9021 rd->words_cur = words_cur;
9022
9023 FILE *fp = fopen (new_restore_file, "wb");
9024
9025 if (fp == NULL)
9026 {
9027 log_error ("ERROR: %s: %s", new_restore_file, strerror (errno));
9028
9029 exit (-1);
9030 }
9031
9032 if (setvbuf (fp, NULL, _IONBF, 0))
9033 {
9034 log_error ("ERROR: setvbuf file '%s': %s", new_restore_file, strerror (errno));
9035
9036 exit (-1);
9037 }
9038
9039 fwrite (rd, sizeof (restore_data_t), 1, fp);
9040
9041 for (uint i = 0; i < rd->argc; i++)
9042 {
9043 fprintf (fp, "%s", rd->argv[i]);
9044 fputc ('\n', fp);
9045 }
9046
9047 fflush (fp);
9048
9049 fsync (fileno (fp));
9050
9051 fclose (fp);
9052 }
9053
9054 void cycle_restore ()
9055 {
9056 const char *eff_restore_file = data.eff_restore_file;
9057 const char *new_restore_file = data.new_restore_file;
9058
9059 restore_data_t *rd = data.rd;
9060
9061 write_restore (new_restore_file, rd);
9062
9063 struct stat st;
9064
9065 memset (&st, 0, sizeof(st));
9066
9067 if (stat (eff_restore_file, &st) == 0)
9068 {
9069 if (unlink (eff_restore_file))
9070 {
9071 log_info ("WARN: unlink file '%s': %s", eff_restore_file, strerror (errno));
9072 }
9073 }
9074
9075 if (rename (new_restore_file, eff_restore_file))
9076 {
9077 log_info ("WARN: rename file '%s' to '%s': %s", new_restore_file, eff_restore_file, strerror (errno));
9078 }
9079 }
9080
9081 void check_checkpoint ()
9082 {
9083 // if (data.restore_disable == 1) break; (this is already implied by previous checks)
9084
9085 u64 words_cur = get_lowest_words_done ();
9086
9087 if (words_cur != data.checkpoint_cur_words)
9088 {
9089 myabort ();
9090 }
9091 }
9092
9093 /**
9094 * tuning db
9095 */
9096
9097 void tuning_db_destroy (tuning_db_t *tuning_db)
9098 {
9099 int i;
9100
9101 for (i = 0; i < tuning_db->alias_cnt; i++)
9102 {
9103 tuning_db_alias_t *alias = &tuning_db->alias_buf[i];
9104
9105 myfree (alias->device_name);
9106 myfree (alias->alias_name);
9107 }
9108
9109 for (i = 0; i < tuning_db->entry_cnt; i++)
9110 {
9111 tuning_db_entry_t *entry = &tuning_db->entry_buf[i];
9112
9113 myfree (entry->device_name);
9114 }
9115
9116 myfree (tuning_db->alias_buf);
9117 myfree (tuning_db->entry_buf);
9118
9119 myfree (tuning_db);
9120 }
9121
9122 tuning_db_t *tuning_db_alloc (FILE *fp)
9123 {
9124 tuning_db_t *tuning_db = (tuning_db_t *) mymalloc (sizeof (tuning_db_t));
9125
9126 int num_lines = count_lines (fp);
9127
9128 // a bit over-allocated
9129
9130 tuning_db->alias_buf = (tuning_db_alias_t *) mycalloc (num_lines + 1, sizeof (tuning_db_alias_t));
9131 tuning_db->alias_cnt = 0;
9132
9133 tuning_db->entry_buf = (tuning_db_entry_t *) mycalloc (num_lines + 1, sizeof (tuning_db_entry_t));
9134 tuning_db->entry_cnt = 0;
9135
9136 return tuning_db;
9137 }
9138
9139 tuning_db_t *tuning_db_init (const char *tuning_db_file)
9140 {
9141 FILE *fp = fopen (tuning_db_file, "rb");
9142
9143 if (fp == NULL)
9144 {
9145 log_error ("%s: %s", tuning_db_file, strerror (errno));
9146
9147 exit (-1);
9148 }
9149
9150 tuning_db_t *tuning_db = tuning_db_alloc (fp);
9151
9152 rewind (fp);
9153
9154 int line_num = 0;
9155
9156 while (!feof (fp))
9157 {
9158 char buf[BUFSIZ];
9159
9160 char *line_buf = fgets (buf, sizeof (buf) - 1, fp);
9161
9162 if (line_buf == NULL) break;
9163
9164 line_num++;
9165
9166 const int line_len = in_superchop (line_buf);
9167
9168 if (line_len == 0) continue;
9169
9170 if (line_buf[0] == '#') continue;
9171
9172 // start processing
9173
9174 char *token_ptr[7] = { NULL };
9175
9176 int token_cnt = 0;
9177
9178 char *next = strtok (line_buf, "\t ");
9179
9180 token_ptr[token_cnt] = next;
9181
9182 token_cnt++;
9183
9184 while ((next = strtok (NULL, "\t ")) != NULL)
9185 {
9186 token_ptr[token_cnt] = next;
9187
9188 token_cnt++;
9189 }
9190
9191 if (token_cnt == 2)
9192 {
9193 char *device_name = token_ptr[0];
9194 char *alias_name = token_ptr[1];
9195
9196 tuning_db_alias_t *alias = &tuning_db->alias_buf[tuning_db->alias_cnt];
9197
9198 alias->device_name = mystrdup (device_name);
9199 alias->alias_name = mystrdup (alias_name);
9200
9201 tuning_db->alias_cnt++;
9202 }
9203 else if (token_cnt == 6)
9204 {
9205 if ((token_ptr[1][0] != '0') &&
9206 (token_ptr[1][0] != '1') &&
9207 (token_ptr[1][0] != '3') &&
9208 (token_ptr[1][0] != '*'))
9209 {
9210 log_info ("WARNING: Tuning-db: Invalid attack_mode '%c' in Line '%u'", token_ptr[1][0], line_num);
9211
9212 continue;
9213 }
9214
9215 if ((token_ptr[3][0] != '1') &&
9216 (token_ptr[3][0] != '2') &&
9217 (token_ptr[3][0] != '4') &&
9218 (token_ptr[3][0] != '8') &&
9219 (token_ptr[3][0] != 'N'))
9220 {
9221 log_info ("WARNING: Tuning-db: Invalid vector_width '%c' in Line '%u'", token_ptr[3][0], line_num);
9222
9223 continue;
9224 }
9225
9226 char *device_name = token_ptr[0];
9227
9228 int attack_mode = -1;
9229 int hash_type = -1;
9230 int vector_width = -1;
9231 int kernel_accel = -1;
9232 int kernel_loops = -1;
9233
9234 if (token_ptr[1][0] != '*') attack_mode = atoi (token_ptr[1]);
9235 if (token_ptr[2][0] != '*') hash_type = atoi (token_ptr[2]);
9236 if (token_ptr[3][0] != 'N') vector_width = atoi (token_ptr[3]);
9237
9238 if (token_ptr[4][0] != 'A')
9239 {
9240 kernel_accel = atoi (token_ptr[4]);
9241
9242 if ((kernel_accel < 1) || (kernel_accel > 1024))
9243 {
9244 log_info ("WARNING: Tuning-db: Invalid kernel_accel '%d' in Line '%u'", kernel_accel, line_num);
9245
9246 continue;
9247 }
9248 }
9249 else
9250 {
9251 kernel_accel = 0;
9252 }
9253
9254 if (token_ptr[5][0] != 'A')
9255 {
9256 kernel_loops = atoi (token_ptr[5]);
9257
9258 if ((kernel_loops < 1) || (kernel_loops > 1024))
9259 {
9260 log_info ("WARNING: Tuning-db: Invalid kernel_loops '%d' in Line '%u'", kernel_loops, line_num);
9261
9262 continue;
9263 }
9264 }
9265 else
9266 {
9267 kernel_loops = 0;
9268 }
9269
9270 tuning_db_entry_t *entry = &tuning_db->entry_buf[tuning_db->entry_cnt];
9271
9272 entry->device_name = mystrdup (device_name);
9273 entry->attack_mode = attack_mode;
9274 entry->hash_type = hash_type;
9275 entry->vector_width = vector_width;
9276 entry->kernel_accel = kernel_accel;
9277 entry->kernel_loops = kernel_loops;
9278
9279 tuning_db->entry_cnt++;
9280 }
9281 else
9282 {
9283 log_info ("WARNING: Tuning-db: Invalid number of token in Line '%u'", line_num);
9284
9285 continue;
9286 }
9287 }
9288
9289 fclose (fp);
9290
9291 // todo: print loaded 'cnt' message
9292
9293 // sort the database
9294
9295 qsort (tuning_db->alias_buf, tuning_db->alias_cnt, sizeof (tuning_db_alias_t), sort_by_tuning_db_alias);
9296 qsort (tuning_db->entry_buf, tuning_db->entry_cnt, sizeof (tuning_db_entry_t), sort_by_tuning_db_entry);
9297
9298 return tuning_db;
9299 }
9300
9301 tuning_db_entry_t *tuning_db_search (tuning_db_t *tuning_db, hc_device_param_t *device_param, int attack_mode, int hash_type)
9302 {
9303 static tuning_db_entry_t s;
9304
9305 // first we need to convert all spaces in the device_name to underscore
9306
9307 char *device_name_nospace = strdup (device_param->device_name);
9308
9309 int device_name_length = strlen (device_name_nospace);
9310
9311 int i;
9312
9313 for (i = 0; i < device_name_length; i++)
9314 {
9315 if (device_name_nospace[i] == ' ') device_name_nospace[i] = '_';
9316 }
9317
9318 // find out if there's an alias configured
9319
9320 tuning_db_alias_t a;
9321
9322 a.device_name = device_name_nospace;
9323
9324 tuning_db_alias_t *alias = bsearch (&a, tuning_db->alias_buf, tuning_db->alias_cnt, sizeof (tuning_db_alias_t), sort_by_tuning_db_alias);
9325
9326 char *alias_name = (alias == NULL) ? NULL : alias->alias_name;
9327
9328 // attack-mode 6 and 7 are attack-mode 1 basically
9329
9330 if (attack_mode == 6) attack_mode = 1;
9331 if (attack_mode == 7) attack_mode = 1;
9332
9333 // bsearch is not ideal but fast enough
9334
9335 s.device_name = device_name_nospace;
9336 s.attack_mode = attack_mode;
9337 s.hash_type = hash_type;
9338
9339 tuning_db_entry_t *entry = NULL;
9340
9341 // this will produce all 2^3 combinations required
9342
9343 for (i = 0; i < 8; i++)
9344 {
9345 s.device_name = (i & 1) ? "*" : device_name_nospace;
9346 s.attack_mode = (i & 2) ? -1 : attack_mode;
9347 s.hash_type = (i & 4) ? -1 : hash_type;
9348
9349 entry = bsearch (&s, tuning_db->entry_buf, tuning_db->entry_cnt, sizeof (tuning_db_entry_t), sort_by_tuning_db_entry);
9350
9351 if (entry != NULL) break;
9352
9353 // in non-wildcard mode do some additional checks:
9354
9355 if ((i & 1) == 0)
9356 {
9357 // in case we have an alias-name
9358
9359 if (alias_name != NULL)
9360 {
9361 s.device_name = alias_name;
9362
9363 entry = bsearch (&s, tuning_db->entry_buf, tuning_db->entry_cnt, sizeof (tuning_db_entry_t), sort_by_tuning_db_entry);
9364
9365 if (entry != NULL) break;
9366 }
9367
9368 // or by device type
9369
9370 if (device_param->device_type & CL_DEVICE_TYPE_CPU)
9371 {
9372 s.device_name = "DEVICE_TYPE_CPU";
9373 }
9374 else if (device_param->device_type & CL_DEVICE_TYPE_GPU)
9375 {
9376 s.device_name = "DEVICE_TYPE_GPU";
9377 }
9378 else if (device_param->device_type & CL_DEVICE_TYPE_ACCELERATOR)
9379 {
9380 s.device_name = "DEVICE_TYPE_ACCELERATOR";
9381 }
9382
9383 entry = bsearch (&s, tuning_db->entry_buf, tuning_db->entry_cnt, sizeof (tuning_db_entry_t), sort_by_tuning_db_entry);
9384
9385 if (entry != NULL) break;
9386 }
9387 }
9388
9389 // free converted device_name
9390
9391 myfree (device_name_nospace);
9392
9393 return entry;
9394 }
9395
9396 /**
9397 * parser
9398 */
9399
9400 uint parse_and_store_salt (char *out, char *in, uint salt_len)
9401 {
9402 u8 tmp[256] = { 0 };
9403
9404 if (salt_len > sizeof (tmp))
9405 {
9406 return UINT_MAX;
9407 }
9408
9409 memcpy (tmp, in, salt_len);
9410
9411 if (data.opts_type & OPTS_TYPE_ST_HEX)
9412 {
9413 if ((salt_len % 2) == 0)
9414 {
9415 u32 new_salt_len = salt_len / 2;
9416
9417 for (uint i = 0, j = 0; i < new_salt_len; i += 1, j += 2)
9418 {
9419 u8 p0 = tmp[j + 0];
9420 u8 p1 = tmp[j + 1];
9421
9422 tmp[i] = hex_convert (p1) << 0;
9423 tmp[i] |= hex_convert (p0) << 4;
9424 }
9425
9426 salt_len = new_salt_len;
9427 }
9428 else
9429 {
9430 return UINT_MAX;
9431 }
9432 }
9433 else if (data.opts_type & OPTS_TYPE_ST_BASE64)
9434 {
9435 salt_len = base64_decode (base64_to_int, (const u8 *) in, salt_len, (u8 *) tmp);
9436 }
9437
9438 memset (tmp + salt_len, 0, sizeof (tmp) - salt_len);
9439
9440 if (data.opts_type & OPTS_TYPE_ST_UNICODE)
9441 {
9442 if (salt_len < 20)
9443 {
9444 u32 *tmp_uint = (u32 *) tmp;
9445
9446 tmp_uint[9] = ((tmp_uint[4] >> 8) & 0x00FF0000) | ((tmp_uint[4] >> 16) & 0x000000FF);
9447 tmp_uint[8] = ((tmp_uint[4] << 8) & 0x00FF0000) | ((tmp_uint[4] >> 0) & 0x000000FF);
9448 tmp_uint[7] = ((tmp_uint[3] >> 8) & 0x00FF0000) | ((tmp_uint[3] >> 16) & 0x000000FF);
9449 tmp_uint[6] = ((tmp_uint[3] << 8) & 0x00FF0000) | ((tmp_uint[3] >> 0) & 0x000000FF);
9450 tmp_uint[5] = ((tmp_uint[2] >> 8) & 0x00FF0000) | ((tmp_uint[2] >> 16) & 0x000000FF);
9451 tmp_uint[4] = ((tmp_uint[2] << 8) & 0x00FF0000) | ((tmp_uint[2] >> 0) & 0x000000FF);
9452 tmp_uint[3] = ((tmp_uint[1] >> 8) & 0x00FF0000) | ((tmp_uint[1] >> 16) & 0x000000FF);
9453 tmp_uint[2] = ((tmp_uint[1] << 8) & 0x00FF0000) | ((tmp_uint[1] >> 0) & 0x000000FF);
9454 tmp_uint[1] = ((tmp_uint[0] >> 8) & 0x00FF0000) | ((tmp_uint[0] >> 16) & 0x000000FF);
9455 tmp_uint[0] = ((tmp_uint[0] << 8) & 0x00FF0000) | ((tmp_uint[0] >> 0) & 0x000000FF);
9456
9457 salt_len = salt_len * 2;
9458 }
9459 else
9460 {
9461 return UINT_MAX;
9462 }
9463 }
9464
9465 if (data.opts_type & OPTS_TYPE_ST_LOWER)
9466 {
9467 lowercase (tmp, salt_len);
9468 }
9469
9470 if (data.opts_type & OPTS_TYPE_ST_UPPER)
9471 {
9472 uppercase (tmp, salt_len);
9473 }
9474
9475 u32 len = salt_len;
9476
9477 if (data.opts_type & OPTS_TYPE_ST_ADD80)
9478 {
9479 tmp[len++] = 0x80;
9480 }
9481
9482 if (data.opts_type & OPTS_TYPE_ST_ADD01)
9483 {
9484 tmp[len++] = 0x01;
9485 }
9486
9487 if (data.opts_type & OPTS_TYPE_ST_GENERATE_LE)
9488 {
9489 u32 *tmp_uint = (uint *) tmp;
9490
9491 u32 max = len / 4;
9492
9493 if (len % 4) max++;
9494
9495 for (u32 i = 0; i < max; i++)
9496 {
9497 tmp_uint[i] = byte_swap_32 (tmp_uint[i]);
9498 }
9499
9500 // Important: we may need to increase the length of memcpy since
9501 // we don't want to "loose" some swapped bytes (could happen if
9502 // they do not perfectly fit in the 4-byte blocks)
9503 // Memcpy does always copy the bytes in the BE order, but since
9504 // we swapped them, some important bytes could be in positions
9505 // we normally skip with the original len
9506
9507 if (len % 4) len += 4 - (len % 4);
9508 }
9509
9510 memcpy (out, tmp, len);
9511
9512 return (salt_len);
9513 }
9514
9515 int bcrypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9516 {
9517 if ((input_len < DISPLAY_LEN_MIN_3200) || (input_len > DISPLAY_LEN_MAX_3200)) return (PARSER_GLOBAL_LENGTH);
9518
9519 if ((memcmp (SIGNATURE_BCRYPT1, input_buf, 4)) && (memcmp (SIGNATURE_BCRYPT2, input_buf, 4)) && (memcmp (SIGNATURE_BCRYPT3, input_buf, 4))) return (PARSER_SIGNATURE_UNMATCHED);
9520
9521 u32 *digest = (u32 *) hash_buf->digest;
9522
9523 salt_t *salt = hash_buf->salt;
9524
9525 memcpy ((char *) salt->salt_sign, input_buf, 6);
9526
9527 char *iter_pos = input_buf + 4;
9528
9529 salt->salt_iter = 1 << atoi (iter_pos);
9530
9531 char *salt_pos = strchr (iter_pos, '$');
9532
9533 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
9534
9535 salt_pos++;
9536
9537 uint salt_len = 16;
9538
9539 salt->salt_len = salt_len;
9540
9541 u8 tmp_buf[100] = { 0 };
9542
9543 base64_decode (bf64_to_int, (const u8 *) salt_pos, 22, tmp_buf);
9544
9545 char *salt_buf_ptr = (char *) salt->salt_buf;
9546
9547 memcpy (salt_buf_ptr, tmp_buf, 16);
9548
9549 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
9550 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
9551 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
9552 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
9553
9554 char *hash_pos = salt_pos + 22;
9555
9556 memset (tmp_buf, 0, sizeof (tmp_buf));
9557
9558 base64_decode (bf64_to_int, (const u8 *) hash_pos, 31, tmp_buf);
9559
9560 memcpy (digest, tmp_buf, 24);
9561
9562 digest[0] = byte_swap_32 (digest[0]);
9563 digest[1] = byte_swap_32 (digest[1]);
9564 digest[2] = byte_swap_32 (digest[2]);
9565 digest[3] = byte_swap_32 (digest[3]);
9566 digest[4] = byte_swap_32 (digest[4]);
9567 digest[5] = byte_swap_32 (digest[5]);
9568
9569 digest[5] &= ~0xff; // its just 23 not 24 !
9570
9571 return (PARSER_OK);
9572 }
9573
9574 int cisco4_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9575 {
9576 if ((input_len < DISPLAY_LEN_MIN_5700) || (input_len > DISPLAY_LEN_MAX_5700)) return (PARSER_GLOBAL_LENGTH);
9577
9578 u32 *digest = (u32 *) hash_buf->digest;
9579
9580 u8 tmp_buf[100] = { 0 };
9581
9582 base64_decode (itoa64_to_int, (const u8 *) input_buf, 43, tmp_buf);
9583
9584 memcpy (digest, tmp_buf, 32);
9585
9586 digest[0] = byte_swap_32 (digest[0]);
9587 digest[1] = byte_swap_32 (digest[1]);
9588 digest[2] = byte_swap_32 (digest[2]);
9589 digest[3] = byte_swap_32 (digest[3]);
9590 digest[4] = byte_swap_32 (digest[4]);
9591 digest[5] = byte_swap_32 (digest[5]);
9592 digest[6] = byte_swap_32 (digest[6]);
9593 digest[7] = byte_swap_32 (digest[7]);
9594
9595 digest[0] -= SHA256M_A;
9596 digest[1] -= SHA256M_B;
9597 digest[2] -= SHA256M_C;
9598 digest[3] -= SHA256M_D;
9599 digest[4] -= SHA256M_E;
9600 digest[5] -= SHA256M_F;
9601 digest[6] -= SHA256M_G;
9602 digest[7] -= SHA256M_H;
9603
9604 return (PARSER_OK);
9605 }
9606
9607 int lm_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9608 {
9609 if ((input_len < DISPLAY_LEN_MIN_3000) || (input_len > DISPLAY_LEN_MAX_3000)) return (PARSER_GLOBAL_LENGTH);
9610
9611 u32 *digest = (u32 *) hash_buf->digest;
9612
9613 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
9614 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
9615
9616 digest[0] = byte_swap_32 (digest[0]);
9617 digest[1] = byte_swap_32 (digest[1]);
9618
9619 uint tt;
9620
9621 IP (digest[0], digest[1], tt);
9622
9623 digest[0] = digest[0];
9624 digest[1] = digest[1];
9625 digest[2] = 0;
9626 digest[3] = 0;
9627
9628 return (PARSER_OK);
9629 }
9630
9631 int osx1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9632 {
9633 if ((input_len < DISPLAY_LEN_MIN_122) || (input_len > DISPLAY_LEN_MAX_122)) return (PARSER_GLOBAL_LENGTH);
9634
9635 u32 *digest = (u32 *) hash_buf->digest;
9636
9637 salt_t *salt = hash_buf->salt;
9638
9639 char *hash_pos = input_buf + 8;
9640
9641 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
9642 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
9643 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
9644 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
9645 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
9646
9647 digest[0] -= SHA1M_A;
9648 digest[1] -= SHA1M_B;
9649 digest[2] -= SHA1M_C;
9650 digest[3] -= SHA1M_D;
9651 digest[4] -= SHA1M_E;
9652
9653 uint salt_len = 8;
9654
9655 char *salt_buf_ptr = (char *) salt->salt_buf;
9656
9657 salt_len = parse_and_store_salt (salt_buf_ptr, input_buf, salt_len);
9658
9659 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
9660
9661 salt->salt_len = salt_len;
9662
9663 return (PARSER_OK);
9664 }
9665
9666 int osx512_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9667 {
9668 if ((input_len < DISPLAY_LEN_MIN_1722) || (input_len > DISPLAY_LEN_MAX_1722)) return (PARSER_GLOBAL_LENGTH);
9669
9670 u64 *digest = (u64 *) hash_buf->digest;
9671
9672 salt_t *salt = hash_buf->salt;
9673
9674 char *hash_pos = input_buf + 8;
9675
9676 digest[0] = hex_to_u64 ((const u8 *) &hash_pos[ 0]);
9677 digest[1] = hex_to_u64 ((const u8 *) &hash_pos[ 16]);
9678 digest[2] = hex_to_u64 ((const u8 *) &hash_pos[ 32]);
9679 digest[3] = hex_to_u64 ((const u8 *) &hash_pos[ 48]);
9680 digest[4] = hex_to_u64 ((const u8 *) &hash_pos[ 64]);
9681 digest[5] = hex_to_u64 ((const u8 *) &hash_pos[ 80]);
9682 digest[6] = hex_to_u64 ((const u8 *) &hash_pos[ 96]);
9683 digest[7] = hex_to_u64 ((const u8 *) &hash_pos[112]);
9684
9685 digest[0] -= SHA512M_A;
9686 digest[1] -= SHA512M_B;
9687 digest[2] -= SHA512M_C;
9688 digest[3] -= SHA512M_D;
9689 digest[4] -= SHA512M_E;
9690 digest[5] -= SHA512M_F;
9691 digest[6] -= SHA512M_G;
9692 digest[7] -= SHA512M_H;
9693
9694 uint salt_len = 8;
9695
9696 char *salt_buf_ptr = (char *) salt->salt_buf;
9697
9698 salt_len = parse_and_store_salt (salt_buf_ptr, input_buf, salt_len);
9699
9700 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
9701
9702 salt->salt_len = salt_len;
9703
9704 return (PARSER_OK);
9705 }
9706
9707 int osc_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9708 {
9709 if (data.opts_type & OPTS_TYPE_ST_HEX)
9710 {
9711 if ((input_len < DISPLAY_LEN_MIN_21H) || (input_len > DISPLAY_LEN_MAX_21H)) return (PARSER_GLOBAL_LENGTH);
9712 }
9713 else
9714 {
9715 if ((input_len < DISPLAY_LEN_MIN_21) || (input_len > DISPLAY_LEN_MAX_21)) return (PARSER_GLOBAL_LENGTH);
9716 }
9717
9718 u32 *digest = (u32 *) hash_buf->digest;
9719
9720 salt_t *salt = hash_buf->salt;
9721
9722 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
9723 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
9724 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
9725 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
9726
9727 digest[0] = byte_swap_32 (digest[0]);
9728 digest[1] = byte_swap_32 (digest[1]);
9729 digest[2] = byte_swap_32 (digest[2]);
9730 digest[3] = byte_swap_32 (digest[3]);
9731
9732 digest[0] -= MD5M_A;
9733 digest[1] -= MD5M_B;
9734 digest[2] -= MD5M_C;
9735 digest[3] -= MD5M_D;
9736
9737 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
9738
9739 uint salt_len = input_len - 32 - 1;
9740
9741 char *salt_buf = input_buf + 32 + 1;
9742
9743 char *salt_buf_ptr = (char *) salt->salt_buf;
9744
9745 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
9746
9747 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
9748
9749 salt->salt_len = salt_len;
9750
9751 return (PARSER_OK);
9752 }
9753
9754 int netscreen_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9755 {
9756 if (data.opts_type & OPTS_TYPE_ST_HEX)
9757 {
9758 if ((input_len < DISPLAY_LEN_MIN_22H) || (input_len > DISPLAY_LEN_MAX_22H)) return (PARSER_GLOBAL_LENGTH);
9759 }
9760 else
9761 {
9762 if ((input_len < DISPLAY_LEN_MIN_22) || (input_len > DISPLAY_LEN_MAX_22)) return (PARSER_GLOBAL_LENGTH);
9763 }
9764
9765 // unscramble
9766
9767 char clean_input_buf[32] = { 0 };
9768
9769 char sig[6] = { 'n', 'r', 'c', 's', 't', 'n' };
9770 int pos[6] = { 0, 6, 12, 17, 23, 29 };
9771
9772 for (int i = 0, j = 0, k = 0; i < 30; i++)
9773 {
9774 if (i == pos[j])
9775 {
9776 if (sig[j] != input_buf[i]) return (PARSER_SIGNATURE_UNMATCHED);
9777
9778 j++;
9779 }
9780 else
9781 {
9782 clean_input_buf[k] = input_buf[i];
9783
9784 k++;
9785 }
9786 }
9787
9788 // base64 decode
9789
9790 u32 *digest = (u32 *) hash_buf->digest;
9791
9792 salt_t *salt = hash_buf->salt;
9793
9794 u32 a, b, c, d, e, f;
9795
9796 a = base64_to_int (clean_input_buf[ 0] & 0x7f);
9797 b = base64_to_int (clean_input_buf[ 1] & 0x7f);
9798 c = base64_to_int (clean_input_buf[ 2] & 0x7f);
9799 d = base64_to_int (clean_input_buf[ 3] & 0x7f);
9800 e = base64_to_int (clean_input_buf[ 4] & 0x7f);
9801 f = base64_to_int (clean_input_buf[ 5] & 0x7f);
9802
9803 digest[0] = (((a << 12) | (b << 6) | (c)) << 16)
9804 | (((d << 12) | (e << 6) | (f)) << 0);
9805
9806 a = base64_to_int (clean_input_buf[ 6] & 0x7f);
9807 b = base64_to_int (clean_input_buf[ 7] & 0x7f);
9808 c = base64_to_int (clean_input_buf[ 8] & 0x7f);
9809 d = base64_to_int (clean_input_buf[ 9] & 0x7f);
9810 e = base64_to_int (clean_input_buf[10] & 0x7f);
9811 f = base64_to_int (clean_input_buf[11] & 0x7f);
9812
9813 digest[1] = (((a << 12) | (b << 6) | (c)) << 16)
9814 | (((d << 12) | (e << 6) | (f)) << 0);
9815
9816 a = base64_to_int (clean_input_buf[12] & 0x7f);
9817 b = base64_to_int (clean_input_buf[13] & 0x7f);
9818 c = base64_to_int (clean_input_buf[14] & 0x7f);
9819 d = base64_to_int (clean_input_buf[15] & 0x7f);
9820 e = base64_to_int (clean_input_buf[16] & 0x7f);
9821 f = base64_to_int (clean_input_buf[17] & 0x7f);
9822
9823 digest[2] = (((a << 12) | (b << 6) | (c)) << 16)
9824 | (((d << 12) | (e << 6) | (f)) << 0);
9825
9826 a = base64_to_int (clean_input_buf[18] & 0x7f);
9827 b = base64_to_int (clean_input_buf[19] & 0x7f);
9828 c = base64_to_int (clean_input_buf[20] & 0x7f);
9829 d = base64_to_int (clean_input_buf[21] & 0x7f);
9830 e = base64_to_int (clean_input_buf[22] & 0x7f);
9831 f = base64_to_int (clean_input_buf[23] & 0x7f);
9832
9833 digest[3] = (((a << 12) | (b << 6) | (c)) << 16)
9834 | (((d << 12) | (e << 6) | (f)) << 0);
9835
9836 digest[0] = byte_swap_32 (digest[0]);
9837 digest[1] = byte_swap_32 (digest[1]);
9838 digest[2] = byte_swap_32 (digest[2]);
9839 digest[3] = byte_swap_32 (digest[3]);
9840
9841 digest[0] -= MD5M_A;
9842 digest[1] -= MD5M_B;
9843 digest[2] -= MD5M_C;
9844 digest[3] -= MD5M_D;
9845
9846 if (input_buf[30] != ':') return (PARSER_SEPARATOR_UNMATCHED);
9847
9848 uint salt_len = input_len - 30 - 1;
9849
9850 char *salt_buf = input_buf + 30 + 1;
9851
9852 char *salt_buf_ptr = (char *) salt->salt_buf;
9853
9854 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
9855
9856 // max. salt length: salt_buf[32] => 32 - 22 (":Administration Tools:") = 10
9857 if (salt_len > 10) return (PARSER_SALT_LENGTH);
9858
9859 salt->salt_len = salt_len;
9860
9861 memcpy (salt_buf_ptr + salt_len, ":Administration Tools:", 22);
9862
9863 salt->salt_len += 22;
9864
9865 return (PARSER_OK);
9866 }
9867
9868 int smf_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9869 {
9870 if (data.opts_type & OPTS_TYPE_ST_HEX)
9871 {
9872 if ((input_len < DISPLAY_LEN_MIN_121H) || (input_len > DISPLAY_LEN_MAX_121H)) return (PARSER_GLOBAL_LENGTH);
9873 }
9874 else
9875 {
9876 if ((input_len < DISPLAY_LEN_MIN_121) || (input_len > DISPLAY_LEN_MAX_121)) return (PARSER_GLOBAL_LENGTH);
9877 }
9878
9879 u32 *digest = (u32 *) hash_buf->digest;
9880
9881 salt_t *salt = hash_buf->salt;
9882
9883 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
9884 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
9885 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
9886 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
9887 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
9888
9889 digest[0] -= SHA1M_A;
9890 digest[1] -= SHA1M_B;
9891 digest[2] -= SHA1M_C;
9892 digest[3] -= SHA1M_D;
9893 digest[4] -= SHA1M_E;
9894
9895 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
9896
9897 uint salt_len = input_len - 40 - 1;
9898
9899 char *salt_buf = input_buf + 40 + 1;
9900
9901 char *salt_buf_ptr = (char *) salt->salt_buf;
9902
9903 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
9904
9905 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
9906
9907 salt->salt_len = salt_len;
9908
9909 return (PARSER_OK);
9910 }
9911
9912 int dcc2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9913 {
9914 if (data.opts_type & OPTS_TYPE_ST_HEX)
9915 {
9916 if ((input_len < DISPLAY_LEN_MIN_2100H) || (input_len > DISPLAY_LEN_MAX_2100H)) return (PARSER_GLOBAL_LENGTH);
9917 }
9918 else
9919 {
9920 if ((input_len < DISPLAY_LEN_MIN_2100) || (input_len > DISPLAY_LEN_MAX_2100)) return (PARSER_GLOBAL_LENGTH);
9921 }
9922
9923 if (memcmp (SIGNATURE_DCC2, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
9924
9925 char *iter_pos = input_buf + 6;
9926
9927 salt_t *salt = hash_buf->salt;
9928
9929 uint iter = atoi (iter_pos);
9930
9931 if (iter < 1)
9932 {
9933 iter = ROUNDS_DCC2;
9934 }
9935
9936 salt->salt_iter = iter - 1;
9937
9938 char *salt_pos = strchr (iter_pos, '#');
9939
9940 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
9941
9942 salt_pos++;
9943
9944 char *digest_pos = strchr (salt_pos, '#');
9945
9946 if (digest_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
9947
9948 digest_pos++;
9949
9950 uint salt_len = digest_pos - salt_pos - 1;
9951
9952 u32 *digest = (u32 *) hash_buf->digest;
9953
9954 digest[0] = hex_to_u32 ((const u8 *) &digest_pos[ 0]);
9955 digest[1] = hex_to_u32 ((const u8 *) &digest_pos[ 8]);
9956 digest[2] = hex_to_u32 ((const u8 *) &digest_pos[16]);
9957 digest[3] = hex_to_u32 ((const u8 *) &digest_pos[24]);
9958
9959 char *salt_buf_ptr = (char *) salt->salt_buf;
9960
9961 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
9962
9963 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
9964
9965 salt->salt_len = salt_len;
9966
9967 return (PARSER_OK);
9968 }
9969
9970 int wpa_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
9971 {
9972 u32 *digest = (u32 *) hash_buf->digest;
9973
9974 salt_t *salt = hash_buf->salt;
9975
9976 wpa_t *wpa = (wpa_t *) hash_buf->esalt;
9977
9978 hccap_t in;
9979
9980 memcpy (&in, input_buf, input_len);
9981
9982 if (in.eapol_size < 1 || in.eapol_size > 255) return (PARSER_HCCAP_EAPOL_SIZE);
9983
9984 memcpy (digest, in.keymic, 16);
9985
9986 /*
9987 http://www.one-net.eu/jsw/j_sec/m_ptype.html
9988 The phrase "Pairwise key expansion"
9989 Access Point Address (referred to as Authenticator Address AA)
9990 Supplicant Address (referred to as Supplicant Address SA)
9991 Access Point Nonce (referred to as Authenticator Anonce)
9992 Wireless Device Nonce (referred to as Supplicant Nonce Snonce)
9993 */
9994
9995 uint salt_len = strlen (in.essid);
9996
9997 memcpy (salt->salt_buf, in.essid, salt_len);
9998
9999 salt->salt_len = salt_len;
10000
10001 salt->salt_iter = ROUNDS_WPA2 - 1;
10002
10003 unsigned char *pke_ptr = (unsigned char *) wpa->pke;
10004
10005 memcpy (pke_ptr, "Pairwise key expansion", 23);
10006
10007 if (memcmp (in.mac1, in.mac2, 6) < 0)
10008 {
10009 memcpy (pke_ptr + 23, in.mac1, 6);
10010 memcpy (pke_ptr + 29, in.mac2, 6);
10011 }
10012 else
10013 {
10014 memcpy (pke_ptr + 23, in.mac2, 6);
10015 memcpy (pke_ptr + 29, in.mac1, 6);
10016 }
10017
10018 if (memcmp (in.nonce1, in.nonce2, 32) < 0)
10019 {
10020 memcpy (pke_ptr + 35, in.nonce1, 32);
10021 memcpy (pke_ptr + 67, in.nonce2, 32);
10022 }
10023 else
10024 {
10025 memcpy (pke_ptr + 35, in.nonce2, 32);
10026 memcpy (pke_ptr + 67, in.nonce1, 32);
10027 }
10028
10029 for (int i = 0; i < 25; i++)
10030 {
10031 wpa->pke[i] = byte_swap_32 (wpa->pke[i]);
10032 }
10033
10034 wpa->keyver = in.keyver;
10035
10036 if (wpa->keyver > 255)
10037 {
10038 log_info ("ATTENTION!");
10039 log_info (" The WPA/WPA2 key version in your .hccap file is invalid!");
10040 log_info (" This could be due to a recent aircrack-ng bug.");
10041 log_info (" The key version was automatically reset to a reasonable value.");
10042 log_info ("");
10043
10044 wpa->keyver &= 0xff;
10045 }
10046
10047 wpa->eapol_size = in.eapol_size;
10048
10049 unsigned char *eapol_ptr = (unsigned char *) wpa->eapol;
10050
10051 memcpy (eapol_ptr, in.eapol, wpa->eapol_size);
10052
10053 memset (eapol_ptr + wpa->eapol_size, 0, 256 - wpa->eapol_size);
10054
10055 eapol_ptr[wpa->eapol_size] = (unsigned char) 0x80;
10056
10057 if (wpa->keyver == 1)
10058 {
10059 // nothing to do
10060 }
10061 else
10062 {
10063 digest[0] = byte_swap_32 (digest[0]);
10064 digest[1] = byte_swap_32 (digest[1]);
10065 digest[2] = byte_swap_32 (digest[2]);
10066 digest[3] = byte_swap_32 (digest[3]);
10067
10068 for (int i = 0; i < 64; i++)
10069 {
10070 wpa->eapol[i] = byte_swap_32 (wpa->eapol[i]);
10071 }
10072 }
10073
10074 salt->salt_buf[10] = digest[1];
10075 salt->salt_buf[11] = digest[2];
10076
10077 return (PARSER_OK);
10078 }
10079
10080 int psafe2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10081 {
10082 u32 *digest = (u32 *) hash_buf->digest;
10083
10084 salt_t *salt = hash_buf->salt;
10085
10086 if (input_len == 0)
10087 {
10088 log_error ("Password Safe v2 container not specified");
10089
10090 exit (-1);
10091 }
10092
10093 FILE *fp = fopen (input_buf, "rb");
10094
10095 if (fp == NULL)
10096 {
10097 log_error ("%s: %s", input_buf, strerror (errno));
10098
10099 exit (-1);
10100 }
10101
10102 psafe2_hdr buf;
10103
10104 memset (&buf, 0, sizeof (psafe2_hdr));
10105
10106 int n = fread (&buf, sizeof (psafe2_hdr), 1, fp);
10107
10108 fclose (fp);
10109
10110 if (n != 1) return (PARSER_PSAFE2_FILE_SIZE);
10111
10112 salt->salt_buf[0] = buf.random[0];
10113 salt->salt_buf[1] = buf.random[1];
10114
10115 salt->salt_len = 8;
10116 salt->salt_iter = 1000;
10117
10118 digest[0] = byte_swap_32 (buf.hash[0]);
10119 digest[1] = byte_swap_32 (buf.hash[1]);
10120 digest[2] = byte_swap_32 (buf.hash[2]);
10121 digest[3] = byte_swap_32 (buf.hash[3]);
10122 digest[4] = byte_swap_32 (buf.hash[4]);
10123
10124 return (PARSER_OK);
10125 }
10126
10127 int psafe3_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10128 {
10129 u32 *digest = (u32 *) hash_buf->digest;
10130
10131 salt_t *salt = hash_buf->salt;
10132
10133 if (input_len == 0)
10134 {
10135 log_error (".psafe3 not specified");
10136
10137 exit (-1);
10138 }
10139
10140 FILE *fp = fopen (input_buf, "rb");
10141
10142 if (fp == NULL)
10143 {
10144 log_error ("%s: %s", input_buf, strerror (errno));
10145
10146 exit (-1);
10147 }
10148
10149 psafe3_t in;
10150
10151 int n = fread (&in, sizeof (psafe3_t), 1, fp);
10152
10153 fclose (fp);
10154
10155 data.hashfile = input_buf; // we will need this in case it gets cracked
10156
10157 if (memcmp (SIGNATURE_PSAFE3, in.signature, 4)) return (PARSER_SIGNATURE_UNMATCHED);
10158
10159 if (n != 1) return (PARSER_PSAFE3_FILE_SIZE);
10160
10161 salt->salt_iter = in.iterations + 1;
10162
10163 salt->salt_buf[0] = in.salt_buf[0];
10164 salt->salt_buf[1] = in.salt_buf[1];
10165 salt->salt_buf[2] = in.salt_buf[2];
10166 salt->salt_buf[3] = in.salt_buf[3];
10167 salt->salt_buf[4] = in.salt_buf[4];
10168 salt->salt_buf[5] = in.salt_buf[5];
10169 salt->salt_buf[6] = in.salt_buf[6];
10170 salt->salt_buf[7] = in.salt_buf[7];
10171
10172 salt->salt_len = 32;
10173
10174 digest[0] = in.hash_buf[0];
10175 digest[1] = in.hash_buf[1];
10176 digest[2] = in.hash_buf[2];
10177 digest[3] = in.hash_buf[3];
10178 digest[4] = in.hash_buf[4];
10179 digest[5] = in.hash_buf[5];
10180 digest[6] = in.hash_buf[6];
10181 digest[7] = in.hash_buf[7];
10182
10183 digest[0] = byte_swap_32 (digest[0]);
10184 digest[1] = byte_swap_32 (digest[1]);
10185 digest[2] = byte_swap_32 (digest[2]);
10186 digest[3] = byte_swap_32 (digest[3]);
10187 digest[4] = byte_swap_32 (digest[4]);
10188 digest[5] = byte_swap_32 (digest[5]);
10189 digest[6] = byte_swap_32 (digest[6]);
10190 digest[7] = byte_swap_32 (digest[7]);
10191
10192 return (PARSER_OK);
10193 }
10194
10195 int phpass_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10196 {
10197 if ((input_len < DISPLAY_LEN_MIN_400) || (input_len > DISPLAY_LEN_MAX_400)) return (PARSER_GLOBAL_LENGTH);
10198
10199 if ((memcmp (SIGNATURE_PHPASS1, input_buf, 3)) && (memcmp (SIGNATURE_PHPASS2, input_buf, 3))) return (PARSER_SIGNATURE_UNMATCHED);
10200
10201 u32 *digest = (u32 *) hash_buf->digest;
10202
10203 salt_t *salt = hash_buf->salt;
10204
10205 char *iter_pos = input_buf + 3;
10206
10207 uint salt_iter = 1 << itoa64_to_int (iter_pos[0]);
10208
10209 if (salt_iter > 0x80000000) return (PARSER_SALT_ITERATION);
10210
10211 memcpy ((char *) salt->salt_sign, input_buf, 4);
10212
10213 salt->salt_iter = salt_iter;
10214
10215 char *salt_pos = iter_pos + 1;
10216
10217 uint salt_len = 8;
10218
10219 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
10220
10221 salt->salt_len = salt_len;
10222
10223 char *hash_pos = salt_pos + salt_len;
10224
10225 phpass_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
10226
10227 return (PARSER_OK);
10228 }
10229
10230 int md5crypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10231 {
10232 if (memcmp (SIGNATURE_MD5CRYPT, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
10233
10234 u32 *digest = (u32 *) hash_buf->digest;
10235
10236 salt_t *salt = hash_buf->salt;
10237
10238 char *salt_pos = input_buf + 3;
10239
10240 uint iterations_len = 0;
10241
10242 if (memcmp (salt_pos, "rounds=", 7) == 0)
10243 {
10244 salt_pos += 7;
10245
10246 for (iterations_len = 0; salt_pos[0] >= '0' && salt_pos[0] <= '9' && iterations_len < 7; iterations_len++, salt_pos += 1) continue;
10247
10248 if (iterations_len == 0 ) return (PARSER_SALT_ITERATION);
10249 if (salt_pos[0] != '$') return (PARSER_SIGNATURE_UNMATCHED);
10250
10251 salt_pos[0] = 0x0;
10252
10253 salt->salt_iter = atoi (salt_pos - iterations_len);
10254
10255 salt_pos += 1;
10256
10257 iterations_len += 8;
10258 }
10259 else
10260 {
10261 salt->salt_iter = ROUNDS_MD5CRYPT;
10262 }
10263
10264 if ((input_len < DISPLAY_LEN_MIN_500) || (input_len > (DISPLAY_LEN_MAX_500 + iterations_len))) return (PARSER_GLOBAL_LENGTH);
10265
10266 char *hash_pos = strchr (salt_pos, '$');
10267
10268 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10269
10270 uint salt_len = hash_pos - salt_pos;
10271
10272 if (salt_len > 8) return (PARSER_SALT_LENGTH);
10273
10274 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
10275
10276 salt->salt_len = salt_len;
10277
10278 hash_pos++;
10279
10280 uint hash_len = input_len - 3 - iterations_len - salt_len - 1;
10281
10282 if (hash_len != 22) return (PARSER_HASH_LENGTH);
10283
10284 md5crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
10285
10286 return (PARSER_OK);
10287 }
10288
10289 int md5apr1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10290 {
10291 if (memcmp (SIGNATURE_MD5APR1, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
10292
10293 u32 *digest = (u32 *) hash_buf->digest;
10294
10295 salt_t *salt = hash_buf->salt;
10296
10297 char *salt_pos = input_buf + 6;
10298
10299 uint iterations_len = 0;
10300
10301 if (memcmp (salt_pos, "rounds=", 7) == 0)
10302 {
10303 salt_pos += 7;
10304
10305 for (iterations_len = 0; salt_pos[0] >= '0' && salt_pos[0] <= '9' && iterations_len < 7; iterations_len++, salt_pos += 1) continue;
10306
10307 if (iterations_len == 0 ) return (PARSER_SALT_ITERATION);
10308 if (salt_pos[0] != '$') return (PARSER_SIGNATURE_UNMATCHED);
10309
10310 salt_pos[0] = 0x0;
10311
10312 salt->salt_iter = atoi (salt_pos - iterations_len);
10313
10314 salt_pos += 1;
10315
10316 iterations_len += 8;
10317 }
10318 else
10319 {
10320 salt->salt_iter = ROUNDS_MD5CRYPT;
10321 }
10322
10323 if ((input_len < DISPLAY_LEN_MIN_1600) || (input_len > DISPLAY_LEN_MAX_1600 + iterations_len)) return (PARSER_GLOBAL_LENGTH);
10324
10325 char *hash_pos = strchr (salt_pos, '$');
10326
10327 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10328
10329 uint salt_len = hash_pos - salt_pos;
10330
10331 if (salt_len > 8) return (PARSER_SALT_LENGTH);
10332
10333 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
10334
10335 salt->salt_len = salt_len;
10336
10337 hash_pos++;
10338
10339 md5crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
10340
10341 return (PARSER_OK);
10342 }
10343
10344 int episerver_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10345 {
10346 if ((input_len < DISPLAY_LEN_MIN_141) || (input_len > DISPLAY_LEN_MAX_141)) return (PARSER_GLOBAL_LENGTH);
10347
10348 if (memcmp (SIGNATURE_EPISERVER, input_buf, 14)) return (PARSER_SIGNATURE_UNMATCHED);
10349
10350 u32 *digest = (u32 *) hash_buf->digest;
10351
10352 salt_t *salt = hash_buf->salt;
10353
10354 char *salt_pos = input_buf + 14;
10355
10356 char *hash_pos = strchr (salt_pos, '*');
10357
10358 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10359
10360 hash_pos++;
10361
10362 uint salt_len = hash_pos - salt_pos - 1;
10363
10364 char *salt_buf_ptr = (char *) salt->salt_buf;
10365
10366 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
10367
10368 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
10369
10370 salt->salt_len = salt_len;
10371
10372 u8 tmp_buf[100] = { 0 };
10373
10374 base64_decode (base64_to_int, (const u8 *) hash_pos, 27, tmp_buf);
10375
10376 memcpy (digest, tmp_buf, 20);
10377
10378 digest[0] = byte_swap_32 (digest[0]);
10379 digest[1] = byte_swap_32 (digest[1]);
10380 digest[2] = byte_swap_32 (digest[2]);
10381 digest[3] = byte_swap_32 (digest[3]);
10382 digest[4] = byte_swap_32 (digest[4]);
10383
10384 digest[0] -= SHA1M_A;
10385 digest[1] -= SHA1M_B;
10386 digest[2] -= SHA1M_C;
10387 digest[3] -= SHA1M_D;
10388 digest[4] -= SHA1M_E;
10389
10390 return (PARSER_OK);
10391 }
10392
10393 int descrypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10394 {
10395 if ((input_len < DISPLAY_LEN_MIN_1500) || (input_len > DISPLAY_LEN_MAX_1500)) return (PARSER_GLOBAL_LENGTH);
10396
10397 unsigned char c12 = itoa64_to_int (input_buf[12]);
10398
10399 if (c12 & 3) return (PARSER_HASH_VALUE);
10400
10401 u32 *digest = (u32 *) hash_buf->digest;
10402
10403 salt_t *salt = hash_buf->salt;
10404
10405 // for ascii_digest
10406 salt->salt_sign[0] = input_buf[0];
10407 salt->salt_sign[1] = input_buf[1];
10408
10409 salt->salt_buf[0] = itoa64_to_int (input_buf[0])
10410 | itoa64_to_int (input_buf[1]) << 6;
10411
10412 salt->salt_len = 2;
10413
10414 u8 tmp_buf[100] = { 0 };
10415
10416 base64_decode (itoa64_to_int, (const u8 *) input_buf + 2, 11, tmp_buf);
10417
10418 memcpy (digest, tmp_buf, 8);
10419
10420 uint tt;
10421
10422 IP (digest[0], digest[1], tt);
10423
10424 digest[2] = 0;
10425 digest[3] = 0;
10426
10427 return (PARSER_OK);
10428 }
10429
10430 int md4_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10431 {
10432 if ((input_len < DISPLAY_LEN_MIN_900) || (input_len > DISPLAY_LEN_MAX_900)) return (PARSER_GLOBAL_LENGTH);
10433
10434 u32 *digest = (u32 *) hash_buf->digest;
10435
10436 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
10437 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
10438 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
10439 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
10440
10441 digest[0] = byte_swap_32 (digest[0]);
10442 digest[1] = byte_swap_32 (digest[1]);
10443 digest[2] = byte_swap_32 (digest[2]);
10444 digest[3] = byte_swap_32 (digest[3]);
10445
10446 digest[0] -= MD4M_A;
10447 digest[1] -= MD4M_B;
10448 digest[2] -= MD4M_C;
10449 digest[3] -= MD4M_D;
10450
10451 return (PARSER_OK);
10452 }
10453
10454 int md4s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10455 {
10456 if (data.opts_type & OPTS_TYPE_ST_HEX)
10457 {
10458 if ((input_len < DISPLAY_LEN_MIN_910H) || (input_len > DISPLAY_LEN_MAX_910H)) return (PARSER_GLOBAL_LENGTH);
10459 }
10460 else
10461 {
10462 if ((input_len < DISPLAY_LEN_MIN_910) || (input_len > DISPLAY_LEN_MAX_910)) return (PARSER_GLOBAL_LENGTH);
10463 }
10464
10465 u32 *digest = (u32 *) hash_buf->digest;
10466
10467 salt_t *salt = hash_buf->salt;
10468
10469 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
10470 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
10471 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
10472 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
10473
10474 digest[0] = byte_swap_32 (digest[0]);
10475 digest[1] = byte_swap_32 (digest[1]);
10476 digest[2] = byte_swap_32 (digest[2]);
10477 digest[3] = byte_swap_32 (digest[3]);
10478
10479 digest[0] -= MD4M_A;
10480 digest[1] -= MD4M_B;
10481 digest[2] -= MD4M_C;
10482 digest[3] -= MD4M_D;
10483
10484 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
10485
10486 uint salt_len = input_len - 32 - 1;
10487
10488 char *salt_buf = input_buf + 32 + 1;
10489
10490 char *salt_buf_ptr = (char *) salt->salt_buf;
10491
10492 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
10493
10494 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
10495
10496 salt->salt_len = salt_len;
10497
10498 return (PARSER_OK);
10499 }
10500
10501 int md5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10502 {
10503 if ((input_len < DISPLAY_LEN_MIN_0) || (input_len > DISPLAY_LEN_MAX_0)) return (PARSER_GLOBAL_LENGTH);
10504
10505 u32 *digest = (u32 *) hash_buf->digest;
10506
10507 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
10508 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
10509 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
10510 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
10511
10512 digest[0] = byte_swap_32 (digest[0]);
10513 digest[1] = byte_swap_32 (digest[1]);
10514 digest[2] = byte_swap_32 (digest[2]);
10515 digest[3] = byte_swap_32 (digest[3]);
10516
10517 digest[0] -= MD5M_A;
10518 digest[1] -= MD5M_B;
10519 digest[2] -= MD5M_C;
10520 digest[3] -= MD5M_D;
10521
10522 return (PARSER_OK);
10523 }
10524
10525 int md5half_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10526 {
10527 if ((input_len < DISPLAY_LEN_MIN_5100) || (input_len > DISPLAY_LEN_MAX_5100)) return (PARSER_GLOBAL_LENGTH);
10528
10529 u32 *digest = (u32 *) hash_buf->digest;
10530
10531 digest[0] = hex_to_u32 ((const u8 *) &input_buf[0]);
10532 digest[1] = hex_to_u32 ((const u8 *) &input_buf[8]);
10533 digest[2] = 0;
10534 digest[3] = 0;
10535
10536 digest[0] = byte_swap_32 (digest[0]);
10537 digest[1] = byte_swap_32 (digest[1]);
10538
10539 return (PARSER_OK);
10540 }
10541
10542 int md5s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10543 {
10544 if (data.opts_type & OPTS_TYPE_ST_HEX)
10545 {
10546 if ((input_len < DISPLAY_LEN_MIN_10H) || (input_len > DISPLAY_LEN_MAX_10H)) return (PARSER_GLOBAL_LENGTH);
10547 }
10548 else
10549 {
10550 if ((input_len < DISPLAY_LEN_MIN_10) || (input_len > DISPLAY_LEN_MAX_10)) return (PARSER_GLOBAL_LENGTH);
10551 }
10552
10553 u32 *digest = (u32 *) hash_buf->digest;
10554
10555 salt_t *salt = hash_buf->salt;
10556
10557 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
10558 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
10559 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
10560 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
10561
10562 digest[0] = byte_swap_32 (digest[0]);
10563 digest[1] = byte_swap_32 (digest[1]);
10564 digest[2] = byte_swap_32 (digest[2]);
10565 digest[3] = byte_swap_32 (digest[3]);
10566
10567 digest[0] -= MD5M_A;
10568 digest[1] -= MD5M_B;
10569 digest[2] -= MD5M_C;
10570 digest[3] -= MD5M_D;
10571
10572 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
10573
10574 uint salt_len = input_len - 32 - 1;
10575
10576 char *salt_buf = input_buf + 32 + 1;
10577
10578 char *salt_buf_ptr = (char *) salt->salt_buf;
10579
10580 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
10581
10582 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
10583
10584 salt->salt_len = salt_len;
10585
10586 return (PARSER_OK);
10587 }
10588
10589 int md5pix_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10590 {
10591 if ((input_len < DISPLAY_LEN_MIN_2400) || (input_len > DISPLAY_LEN_MAX_2400)) return (PARSER_GLOBAL_LENGTH);
10592
10593 u32 *digest = (u32 *) hash_buf->digest;
10594
10595 digest[0] = itoa64_to_int (input_buf[ 0]) << 0
10596 | itoa64_to_int (input_buf[ 1]) << 6
10597 | itoa64_to_int (input_buf[ 2]) << 12
10598 | itoa64_to_int (input_buf[ 3]) << 18;
10599 digest[1] = itoa64_to_int (input_buf[ 4]) << 0
10600 | itoa64_to_int (input_buf[ 5]) << 6
10601 | itoa64_to_int (input_buf[ 6]) << 12
10602 | itoa64_to_int (input_buf[ 7]) << 18;
10603 digest[2] = itoa64_to_int (input_buf[ 8]) << 0
10604 | itoa64_to_int (input_buf[ 9]) << 6
10605 | itoa64_to_int (input_buf[10]) << 12
10606 | itoa64_to_int (input_buf[11]) << 18;
10607 digest[3] = itoa64_to_int (input_buf[12]) << 0
10608 | itoa64_to_int (input_buf[13]) << 6
10609 | itoa64_to_int (input_buf[14]) << 12
10610 | itoa64_to_int (input_buf[15]) << 18;
10611
10612 digest[0] -= MD5M_A;
10613 digest[1] -= MD5M_B;
10614 digest[2] -= MD5M_C;
10615 digest[3] -= MD5M_D;
10616
10617 digest[0] &= 0x00ffffff;
10618 digest[1] &= 0x00ffffff;
10619 digest[2] &= 0x00ffffff;
10620 digest[3] &= 0x00ffffff;
10621
10622 return (PARSER_OK);
10623 }
10624
10625 int md5asa_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10626 {
10627 if (data.opts_type & OPTS_TYPE_ST_HEX)
10628 {
10629 if ((input_len < DISPLAY_LEN_MIN_2410H) || (input_len > DISPLAY_LEN_MAX_2410H)) return (PARSER_GLOBAL_LENGTH);
10630 }
10631 else
10632 {
10633 if ((input_len < DISPLAY_LEN_MIN_2410) || (input_len > DISPLAY_LEN_MAX_2410)) return (PARSER_GLOBAL_LENGTH);
10634 }
10635
10636 u32 *digest = (u32 *) hash_buf->digest;
10637
10638 salt_t *salt = hash_buf->salt;
10639
10640 digest[0] = itoa64_to_int (input_buf[ 0]) << 0
10641 | itoa64_to_int (input_buf[ 1]) << 6
10642 | itoa64_to_int (input_buf[ 2]) << 12
10643 | itoa64_to_int (input_buf[ 3]) << 18;
10644 digest[1] = itoa64_to_int (input_buf[ 4]) << 0
10645 | itoa64_to_int (input_buf[ 5]) << 6
10646 | itoa64_to_int (input_buf[ 6]) << 12
10647 | itoa64_to_int (input_buf[ 7]) << 18;
10648 digest[2] = itoa64_to_int (input_buf[ 8]) << 0
10649 | itoa64_to_int (input_buf[ 9]) << 6
10650 | itoa64_to_int (input_buf[10]) << 12
10651 | itoa64_to_int (input_buf[11]) << 18;
10652 digest[3] = itoa64_to_int (input_buf[12]) << 0
10653 | itoa64_to_int (input_buf[13]) << 6
10654 | itoa64_to_int (input_buf[14]) << 12
10655 | itoa64_to_int (input_buf[15]) << 18;
10656
10657 digest[0] -= MD5M_A;
10658 digest[1] -= MD5M_B;
10659 digest[2] -= MD5M_C;
10660 digest[3] -= MD5M_D;
10661
10662 digest[0] &= 0x00ffffff;
10663 digest[1] &= 0x00ffffff;
10664 digest[2] &= 0x00ffffff;
10665 digest[3] &= 0x00ffffff;
10666
10667 if (input_buf[16] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
10668
10669 uint salt_len = input_len - 16 - 1;
10670
10671 char *salt_buf = input_buf + 16 + 1;
10672
10673 char *salt_buf_ptr = (char *) salt->salt_buf;
10674
10675 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
10676
10677 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
10678
10679 salt->salt_len = salt_len;
10680
10681 return (PARSER_OK);
10682 }
10683
10684 void transform_netntlmv1_key (const u8 *nthash, u8 *key)
10685 {
10686 key[0] = (nthash[0] >> 0);
10687 key[1] = (nthash[0] << 7) | (nthash[1] >> 1);
10688 key[2] = (nthash[1] << 6) | (nthash[2] >> 2);
10689 key[3] = (nthash[2] << 5) | (nthash[3] >> 3);
10690 key[4] = (nthash[3] << 4) | (nthash[4] >> 4);
10691 key[5] = (nthash[4] << 3) | (nthash[5] >> 5);
10692 key[6] = (nthash[5] << 2) | (nthash[6] >> 6);
10693 key[7] = (nthash[6] << 1);
10694
10695 key[0] |= 0x01;
10696 key[1] |= 0x01;
10697 key[2] |= 0x01;
10698 key[3] |= 0x01;
10699 key[4] |= 0x01;
10700 key[5] |= 0x01;
10701 key[6] |= 0x01;
10702 key[7] |= 0x01;
10703 }
10704
10705 int netntlmv1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10706 {
10707 if ((input_len < DISPLAY_LEN_MIN_5500) || (input_len > DISPLAY_LEN_MAX_5500)) return (PARSER_GLOBAL_LENGTH);
10708
10709 u32 *digest = (u32 *) hash_buf->digest;
10710
10711 salt_t *salt = hash_buf->salt;
10712
10713 netntlm_t *netntlm = (netntlm_t *) hash_buf->esalt;
10714
10715 /**
10716 * parse line
10717 */
10718
10719 char *user_pos = input_buf;
10720
10721 char *unused_pos = strchr (user_pos, ':');
10722
10723 if (unused_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10724
10725 uint user_len = unused_pos - user_pos;
10726
10727 if (user_len > 60) return (PARSER_SALT_LENGTH);
10728
10729 unused_pos++;
10730
10731 char *domain_pos = strchr (unused_pos, ':');
10732
10733 if (domain_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10734
10735 uint unused_len = domain_pos - unused_pos;
10736
10737 if (unused_len != 0) return (PARSER_SALT_LENGTH);
10738
10739 domain_pos++;
10740
10741 char *srvchall_pos = strchr (domain_pos, ':');
10742
10743 if (srvchall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10744
10745 uint domain_len = srvchall_pos - domain_pos;
10746
10747 if (domain_len > 45) return (PARSER_SALT_LENGTH);
10748
10749 srvchall_pos++;
10750
10751 char *hash_pos = strchr (srvchall_pos, ':');
10752
10753 if (srvchall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10754
10755 uint srvchall_len = hash_pos - srvchall_pos;
10756
10757 // if (srvchall_len != 0) return (PARSER_SALT_LENGTH);
10758
10759 hash_pos++;
10760
10761 char *clichall_pos = strchr (hash_pos, ':');
10762
10763 if (clichall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10764
10765 uint hash_len = clichall_pos - hash_pos;
10766
10767 if (hash_len != 48) return (PARSER_HASH_LENGTH);
10768
10769 clichall_pos++;
10770
10771 uint clichall_len = input_len - user_len - 1 - unused_len - 1 - domain_len - 1 - srvchall_len - 1 - hash_len - 1;
10772
10773 if (clichall_len != 16) return (PARSER_SALT_LENGTH);
10774
10775 /**
10776 * store some data for later use
10777 */
10778
10779 netntlm->user_len = user_len * 2;
10780 netntlm->domain_len = domain_len * 2;
10781 netntlm->srvchall_len = srvchall_len / 2;
10782 netntlm->clichall_len = clichall_len / 2;
10783
10784 char *userdomain_ptr = (char *) netntlm->userdomain_buf;
10785 char *chall_ptr = (char *) netntlm->chall_buf;
10786
10787 /**
10788 * handle username and domainname
10789 */
10790
10791 for (uint i = 0; i < user_len; i++)
10792 {
10793 *userdomain_ptr++ = user_pos[i];
10794 *userdomain_ptr++ = 0;
10795 }
10796
10797 for (uint i = 0; i < domain_len; i++)
10798 {
10799 *userdomain_ptr++ = domain_pos[i];
10800 *userdomain_ptr++ = 0;
10801 }
10802
10803 /**
10804 * handle server challenge encoding
10805 */
10806
10807 for (uint i = 0; i < srvchall_len; i += 2)
10808 {
10809 const char p0 = srvchall_pos[i + 0];
10810 const char p1 = srvchall_pos[i + 1];
10811
10812 *chall_ptr++ = hex_convert (p1) << 0
10813 | hex_convert (p0) << 4;
10814 }
10815
10816 /**
10817 * handle client challenge encoding
10818 */
10819
10820 for (uint i = 0; i < clichall_len; i += 2)
10821 {
10822 const char p0 = clichall_pos[i + 0];
10823 const char p1 = clichall_pos[i + 1];
10824
10825 *chall_ptr++ = hex_convert (p1) << 0
10826 | hex_convert (p0) << 4;
10827 }
10828
10829 /**
10830 * store data
10831 */
10832
10833 char *salt_buf_ptr = (char *) salt->salt_buf;
10834
10835 uint salt_len = parse_and_store_salt (salt_buf_ptr, clichall_pos, clichall_len);
10836
10837 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
10838
10839 salt->salt_len = salt_len;
10840
10841 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
10842 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
10843 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
10844 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
10845
10846 digest[0] = byte_swap_32 (digest[0]);
10847 digest[1] = byte_swap_32 (digest[1]);
10848 digest[2] = byte_swap_32 (digest[2]);
10849 digest[3] = byte_swap_32 (digest[3]);
10850
10851 /* special case, last 8 byte do not need to be checked since they are brute-forced next */
10852
10853 uint digest_tmp[2] = { 0 };
10854
10855 digest_tmp[0] = hex_to_u32 ((const u8 *) &hash_pos[32]);
10856 digest_tmp[1] = hex_to_u32 ((const u8 *) &hash_pos[40]);
10857
10858 digest_tmp[0] = byte_swap_32 (digest_tmp[0]);
10859 digest_tmp[1] = byte_swap_32 (digest_tmp[1]);
10860
10861 /* special case 2: ESS */
10862
10863 if (srvchall_len == 48)
10864 {
10865 if ((netntlm->chall_buf[2] == 0) && (netntlm->chall_buf[3] == 0) && (netntlm->chall_buf[4] == 0) && (netntlm->chall_buf[5] == 0))
10866 {
10867 uint w[16] = { 0 };
10868
10869 w[ 0] = netntlm->chall_buf[6];
10870 w[ 1] = netntlm->chall_buf[7];
10871 w[ 2] = netntlm->chall_buf[0];
10872 w[ 3] = netntlm->chall_buf[1];
10873 w[ 4] = 0x80;
10874 w[14] = 16 * 8;
10875
10876 uint dgst[4] = { 0 };
10877
10878 dgst[0] = MAGIC_A;
10879 dgst[1] = MAGIC_B;
10880 dgst[2] = MAGIC_C;
10881 dgst[3] = MAGIC_D;
10882
10883 md5_64 (w, dgst);
10884
10885 salt->salt_buf[0] = dgst[0];
10886 salt->salt_buf[1] = dgst[1];
10887 }
10888 }
10889
10890 /* precompute netntlmv1 exploit start */
10891
10892 for (uint i = 0; i < 0x10000; i++)
10893 {
10894 uint key_md4[2] = { i, 0 };
10895 uint key_des[2] = { 0, 0 };
10896
10897 transform_netntlmv1_key ((u8 *) key_md4, (u8 *) key_des);
10898
10899 uint Kc[16] = { 0 };
10900 uint Kd[16] = { 0 };
10901
10902 _des_keysetup (key_des, Kc, Kd, c_skb);
10903
10904 uint data3[2] = { salt->salt_buf[0], salt->salt_buf[1] };
10905
10906 _des_encrypt (data3, Kc, Kd, c_SPtrans);
10907
10908 if (data3[0] != digest_tmp[0]) continue;
10909 if (data3[1] != digest_tmp[1]) continue;
10910
10911 salt->salt_buf[2] = i;
10912
10913 salt->salt_len = 24;
10914
10915 break;
10916 }
10917
10918 salt->salt_buf_pc[0] = digest_tmp[0];
10919 salt->salt_buf_pc[1] = digest_tmp[1];
10920
10921 /* precompute netntlmv1 exploit stop */
10922
10923 u32 tt;
10924
10925 IP (digest[0], digest[1], tt);
10926 IP (digest[2], digest[3], tt);
10927
10928 digest[0] = rotr32 (digest[0], 29);
10929 digest[1] = rotr32 (digest[1], 29);
10930 digest[2] = rotr32 (digest[2], 29);
10931 digest[3] = rotr32 (digest[3], 29);
10932
10933 IP (salt->salt_buf[0], salt->salt_buf[1], tt);
10934
10935 salt->salt_buf[0] = rotl32 (salt->salt_buf[0], 3);
10936 salt->salt_buf[1] = rotl32 (salt->salt_buf[1], 3);
10937
10938 return (PARSER_OK);
10939 }
10940
10941 int netntlmv2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
10942 {
10943 if ((input_len < DISPLAY_LEN_MIN_5600) || (input_len > DISPLAY_LEN_MAX_5600)) return (PARSER_GLOBAL_LENGTH);
10944
10945 u32 *digest = (u32 *) hash_buf->digest;
10946
10947 salt_t *salt = hash_buf->salt;
10948
10949 netntlm_t *netntlm = (netntlm_t *) hash_buf->esalt;
10950
10951 /**
10952 * parse line
10953 */
10954
10955 char *user_pos = input_buf;
10956
10957 char *unused_pos = strchr (user_pos, ':');
10958
10959 if (unused_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10960
10961 uint user_len = unused_pos - user_pos;
10962
10963 if (user_len > 60) return (PARSER_SALT_LENGTH);
10964
10965 unused_pos++;
10966
10967 char *domain_pos = strchr (unused_pos, ':');
10968
10969 if (domain_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10970
10971 uint unused_len = domain_pos - unused_pos;
10972
10973 if (unused_len != 0) return (PARSER_SALT_LENGTH);
10974
10975 domain_pos++;
10976
10977 char *srvchall_pos = strchr (domain_pos, ':');
10978
10979 if (srvchall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10980
10981 uint domain_len = srvchall_pos - domain_pos;
10982
10983 if (domain_len > 45) return (PARSER_SALT_LENGTH);
10984
10985 srvchall_pos++;
10986
10987 char *hash_pos = strchr (srvchall_pos, ':');
10988
10989 if (srvchall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
10990
10991 uint srvchall_len = hash_pos - srvchall_pos;
10992
10993 if (srvchall_len != 16) return (PARSER_SALT_LENGTH);
10994
10995 hash_pos++;
10996
10997 char *clichall_pos = strchr (hash_pos, ':');
10998
10999 if (clichall_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
11000
11001 uint hash_len = clichall_pos - hash_pos;
11002
11003 if (hash_len != 32) return (PARSER_HASH_LENGTH);
11004
11005 clichall_pos++;
11006
11007 uint clichall_len = input_len - user_len - 1 - unused_len - 1 - domain_len - 1 - srvchall_len - 1 - hash_len - 1;
11008
11009 if (clichall_len > 1024) return (PARSER_SALT_LENGTH);
11010
11011 if (clichall_len % 2) return (PARSER_SALT_VALUE);
11012
11013 /**
11014 * store some data for later use
11015 */
11016
11017 netntlm->user_len = user_len * 2;
11018 netntlm->domain_len = domain_len * 2;
11019 netntlm->srvchall_len = srvchall_len / 2;
11020 netntlm->clichall_len = clichall_len / 2;
11021
11022 char *userdomain_ptr = (char *) netntlm->userdomain_buf;
11023 char *chall_ptr = (char *) netntlm->chall_buf;
11024
11025 /**
11026 * handle username and domainname
11027 */
11028
11029 for (uint i = 0; i < user_len; i++)
11030 {
11031 *userdomain_ptr++ = toupper (user_pos[i]);
11032 *userdomain_ptr++ = 0;
11033 }
11034
11035 for (uint i = 0; i < domain_len; i++)
11036 {
11037 *userdomain_ptr++ = domain_pos[i];
11038 *userdomain_ptr++ = 0;
11039 }
11040
11041 *userdomain_ptr++ = 0x80;
11042
11043 /**
11044 * handle server challenge encoding
11045 */
11046
11047 for (uint i = 0; i < srvchall_len; i += 2)
11048 {
11049 const char p0 = srvchall_pos[i + 0];
11050 const char p1 = srvchall_pos[i + 1];
11051
11052 *chall_ptr++ = hex_convert (p1) << 0
11053 | hex_convert (p0) << 4;
11054 }
11055
11056 /**
11057 * handle client challenge encoding
11058 */
11059
11060 for (uint i = 0; i < clichall_len; i += 2)
11061 {
11062 const char p0 = clichall_pos[i + 0];
11063 const char p1 = clichall_pos[i + 1];
11064
11065 *chall_ptr++ = hex_convert (p1) << 0
11066 | hex_convert (p0) << 4;
11067 }
11068
11069 *chall_ptr++ = 0x80;
11070
11071 /**
11072 * handle hash itself
11073 */
11074
11075 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
11076 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
11077 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
11078 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
11079
11080 digest[0] = byte_swap_32 (digest[0]);
11081 digest[1] = byte_swap_32 (digest[1]);
11082 digest[2] = byte_swap_32 (digest[2]);
11083 digest[3] = byte_swap_32 (digest[3]);
11084
11085 /**
11086 * reuse challange data as salt_buf, its the buffer that is most likely unique
11087 */
11088
11089 salt->salt_buf[0] = 0;
11090 salt->salt_buf[1] = 0;
11091 salt->salt_buf[2] = 0;
11092 salt->salt_buf[3] = 0;
11093 salt->salt_buf[4] = 0;
11094 salt->salt_buf[5] = 0;
11095 salt->salt_buf[6] = 0;
11096 salt->salt_buf[7] = 0;
11097
11098 uint *uptr;
11099
11100 uptr = (uint *) netntlm->userdomain_buf;
11101
11102 for (uint i = 0; i < 16; i += 16)
11103 {
11104 md5_64 (uptr, salt->salt_buf);
11105 }
11106
11107 uptr = (uint *) netntlm->chall_buf;
11108
11109 for (uint i = 0; i < 256; i += 16)
11110 {
11111 md5_64 (uptr, salt->salt_buf);
11112 }
11113
11114 salt->salt_len = 16;
11115
11116 return (PARSER_OK);
11117 }
11118
11119 int joomla_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11120 {
11121 if (data.opts_type & OPTS_TYPE_ST_HEX)
11122 {
11123 if ((input_len < DISPLAY_LEN_MIN_11H) || (input_len > DISPLAY_LEN_MAX_11H)) return (PARSER_GLOBAL_LENGTH);
11124 }
11125 else
11126 {
11127 if ((input_len < DISPLAY_LEN_MIN_11) || (input_len > DISPLAY_LEN_MAX_11)) return (PARSER_GLOBAL_LENGTH);
11128 }
11129
11130 u32 *digest = (u32 *) hash_buf->digest;
11131
11132 salt_t *salt = hash_buf->salt;
11133
11134 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11135 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11136 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11137 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11138
11139 digest[0] = byte_swap_32 (digest[0]);
11140 digest[1] = byte_swap_32 (digest[1]);
11141 digest[2] = byte_swap_32 (digest[2]);
11142 digest[3] = byte_swap_32 (digest[3]);
11143
11144 digest[0] -= MD5M_A;
11145 digest[1] -= MD5M_B;
11146 digest[2] -= MD5M_C;
11147 digest[3] -= MD5M_D;
11148
11149 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11150
11151 uint salt_len = input_len - 32 - 1;
11152
11153 char *salt_buf = input_buf + 32 + 1;
11154
11155 char *salt_buf_ptr = (char *) salt->salt_buf;
11156
11157 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11158
11159 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11160
11161 salt->salt_len = salt_len;
11162
11163 return (PARSER_OK);
11164 }
11165
11166 int postgresql_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11167 {
11168 if (data.opts_type & OPTS_TYPE_ST_HEX)
11169 {
11170 if ((input_len < DISPLAY_LEN_MIN_12H) || (input_len > DISPLAY_LEN_MAX_12H)) return (PARSER_GLOBAL_LENGTH);
11171 }
11172 else
11173 {
11174 if ((input_len < DISPLAY_LEN_MIN_12) || (input_len > DISPLAY_LEN_MAX_12)) return (PARSER_GLOBAL_LENGTH);
11175 }
11176
11177 u32 *digest = (u32 *) hash_buf->digest;
11178
11179 salt_t *salt = hash_buf->salt;
11180
11181 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11182 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11183 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11184 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11185
11186 digest[0] = byte_swap_32 (digest[0]);
11187 digest[1] = byte_swap_32 (digest[1]);
11188 digest[2] = byte_swap_32 (digest[2]);
11189 digest[3] = byte_swap_32 (digest[3]);
11190
11191 digest[0] -= MD5M_A;
11192 digest[1] -= MD5M_B;
11193 digest[2] -= MD5M_C;
11194 digest[3] -= MD5M_D;
11195
11196 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11197
11198 uint salt_len = input_len - 32 - 1;
11199
11200 char *salt_buf = input_buf + 32 + 1;
11201
11202 char *salt_buf_ptr = (char *) salt->salt_buf;
11203
11204 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11205
11206 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11207
11208 salt->salt_len = salt_len;
11209
11210 return (PARSER_OK);
11211 }
11212
11213 int md5md5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11214 {
11215 if ((input_len < DISPLAY_LEN_MIN_2600) || (input_len > DISPLAY_LEN_MAX_2600)) return (PARSER_GLOBAL_LENGTH);
11216
11217 u32 *digest = (u32 *) hash_buf->digest;
11218
11219 salt_t *salt = hash_buf->salt;
11220
11221 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11222 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11223 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11224 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11225
11226 digest[0] = byte_swap_32 (digest[0]);
11227 digest[1] = byte_swap_32 (digest[1]);
11228 digest[2] = byte_swap_32 (digest[2]);
11229 digest[3] = byte_swap_32 (digest[3]);
11230
11231 digest[0] -= MD5M_A;
11232 digest[1] -= MD5M_B;
11233 digest[2] -= MD5M_C;
11234 digest[3] -= MD5M_D;
11235
11236 /**
11237 * This is a virtual salt. While the algorithm is basically not salted
11238 * we can exploit the salt buffer to set the 0x80 and the w[14] value.
11239 * This way we can save a special md5md5 kernel and reuse the one from vbull.
11240 */
11241
11242 char *salt_buf_ptr = (char *) salt->salt_buf;
11243
11244 uint salt_len = parse_and_store_salt (salt_buf_ptr, (char *) "", 0);
11245
11246 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11247
11248 salt->salt_len = salt_len;
11249
11250 return (PARSER_OK);
11251 }
11252
11253 int vb3_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11254 {
11255 if (data.opts_type & OPTS_TYPE_ST_HEX)
11256 {
11257 if ((input_len < DISPLAY_LEN_MIN_2611H) || (input_len > DISPLAY_LEN_MAX_2611H)) return (PARSER_GLOBAL_LENGTH);
11258 }
11259 else
11260 {
11261 if ((input_len < DISPLAY_LEN_MIN_2611) || (input_len > DISPLAY_LEN_MAX_2611)) return (PARSER_GLOBAL_LENGTH);
11262 }
11263
11264 u32 *digest = (u32 *) hash_buf->digest;
11265
11266 salt_t *salt = hash_buf->salt;
11267
11268 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11269 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11270 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11271 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11272
11273 digest[0] = byte_swap_32 (digest[0]);
11274 digest[1] = byte_swap_32 (digest[1]);
11275 digest[2] = byte_swap_32 (digest[2]);
11276 digest[3] = byte_swap_32 (digest[3]);
11277
11278 digest[0] -= MD5M_A;
11279 digest[1] -= MD5M_B;
11280 digest[2] -= MD5M_C;
11281 digest[3] -= MD5M_D;
11282
11283 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11284
11285 uint salt_len = input_len - 32 - 1;
11286
11287 char *salt_buf = input_buf + 32 + 1;
11288
11289 char *salt_buf_ptr = (char *) salt->salt_buf;
11290
11291 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11292
11293 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11294
11295 salt->salt_len = salt_len;
11296
11297 return (PARSER_OK);
11298 }
11299
11300 int vb30_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11301 {
11302 if (data.opts_type & OPTS_TYPE_ST_HEX)
11303 {
11304 if ((input_len < DISPLAY_LEN_MIN_2711H) || (input_len > DISPLAY_LEN_MAX_2711H)) return (PARSER_GLOBAL_LENGTH);
11305 }
11306 else
11307 {
11308 if ((input_len < DISPLAY_LEN_MIN_2711) || (input_len > DISPLAY_LEN_MAX_2711)) return (PARSER_GLOBAL_LENGTH);
11309 }
11310
11311 u32 *digest = (u32 *) hash_buf->digest;
11312
11313 salt_t *salt = hash_buf->salt;
11314
11315 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11316 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11317 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11318 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11319
11320 digest[0] = byte_swap_32 (digest[0]);
11321 digest[1] = byte_swap_32 (digest[1]);
11322 digest[2] = byte_swap_32 (digest[2]);
11323 digest[3] = byte_swap_32 (digest[3]);
11324
11325 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11326
11327 uint salt_len = input_len - 32 - 1;
11328
11329 char *salt_buf = input_buf + 32 + 1;
11330
11331 char *salt_buf_ptr = (char *) salt->salt_buf;
11332
11333 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11334
11335 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11336
11337 salt->salt_len = salt_len;
11338
11339 return (PARSER_OK);
11340 }
11341
11342 int dcc_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11343 {
11344 if (data.opts_type & OPTS_TYPE_ST_HEX)
11345 {
11346 if ((input_len < DISPLAY_LEN_MIN_1100H) || (input_len > DISPLAY_LEN_MAX_1100H)) return (PARSER_GLOBAL_LENGTH);
11347 }
11348 else
11349 {
11350 if ((input_len < DISPLAY_LEN_MIN_1100) || (input_len > DISPLAY_LEN_MAX_1100)) return (PARSER_GLOBAL_LENGTH);
11351 }
11352
11353 u32 *digest = (u32 *) hash_buf->digest;
11354
11355 salt_t *salt = hash_buf->salt;
11356
11357 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11358 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11359 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11360 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11361
11362 digest[0] = byte_swap_32 (digest[0]);
11363 digest[1] = byte_swap_32 (digest[1]);
11364 digest[2] = byte_swap_32 (digest[2]);
11365 digest[3] = byte_swap_32 (digest[3]);
11366
11367 digest[0] -= MD4M_A;
11368 digest[1] -= MD4M_B;
11369 digest[2] -= MD4M_C;
11370 digest[3] -= MD4M_D;
11371
11372 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11373
11374 uint salt_len = input_len - 32 - 1;
11375
11376 char *salt_buf = input_buf + 32 + 1;
11377
11378 char *salt_buf_ptr = (char *) salt->salt_buf;
11379
11380 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11381
11382 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11383
11384 salt->salt_len = salt_len;
11385
11386 return (PARSER_OK);
11387 }
11388
11389 int ipb2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11390 {
11391 if (data.opts_type & OPTS_TYPE_ST_HEX)
11392 {
11393 if ((input_len < DISPLAY_LEN_MIN_2811H) || (input_len > DISPLAY_LEN_MAX_2811H)) return (PARSER_GLOBAL_LENGTH);
11394 }
11395 else
11396 {
11397 if ((input_len < DISPLAY_LEN_MIN_2811) || (input_len > DISPLAY_LEN_MAX_2811)) return (PARSER_GLOBAL_LENGTH);
11398 }
11399
11400 u32 *digest = (u32 *) hash_buf->digest;
11401
11402 salt_t *salt = hash_buf->salt;
11403
11404 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11405 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11406 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11407 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11408
11409 digest[0] = byte_swap_32 (digest[0]);
11410 digest[1] = byte_swap_32 (digest[1]);
11411 digest[2] = byte_swap_32 (digest[2]);
11412 digest[3] = byte_swap_32 (digest[3]);
11413
11414 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11415
11416 uint salt_len = input_len - 32 - 1;
11417
11418 char *salt_buf = input_buf + 32 + 1;
11419
11420 uint salt_pc_block[16] = { 0 };
11421
11422 char *salt_pc_block_ptr = (char *) salt_pc_block;
11423
11424 salt_len = parse_and_store_salt (salt_pc_block_ptr, salt_buf, salt_len);
11425
11426 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11427
11428 salt_pc_block_ptr[salt_len] = (unsigned char) 0x80;
11429
11430 salt_pc_block[14] = salt_len * 8;
11431
11432 uint salt_pc_digest[4] = { MAGIC_A, MAGIC_B, MAGIC_C, MAGIC_D };
11433
11434 md5_64 (salt_pc_block, salt_pc_digest);
11435
11436 salt_pc_digest[0] = byte_swap_32 (salt_pc_digest[0]);
11437 salt_pc_digest[1] = byte_swap_32 (salt_pc_digest[1]);
11438 salt_pc_digest[2] = byte_swap_32 (salt_pc_digest[2]);
11439 salt_pc_digest[3] = byte_swap_32 (salt_pc_digest[3]);
11440
11441 u8 *salt_buf_ptr = (u8 *) salt->salt_buf;
11442
11443 memcpy (salt_buf_ptr, salt_buf, salt_len);
11444
11445 u8 *salt_buf_pc_ptr = (u8 *) salt->salt_buf_pc;
11446
11447 bin_to_hex_lower (salt_pc_digest[0], salt_buf_pc_ptr + 0);
11448 bin_to_hex_lower (salt_pc_digest[1], salt_buf_pc_ptr + 8);
11449 bin_to_hex_lower (salt_pc_digest[2], salt_buf_pc_ptr + 16);
11450 bin_to_hex_lower (salt_pc_digest[3], salt_buf_pc_ptr + 24);
11451
11452 salt->salt_len = 32; // changed, was salt_len before -- was a bug? 32 should be correct
11453
11454 return (PARSER_OK);
11455 }
11456
11457 int sha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11458 {
11459 if ((input_len < DISPLAY_LEN_MIN_100) || (input_len > DISPLAY_LEN_MAX_100)) return (PARSER_GLOBAL_LENGTH);
11460
11461 u32 *digest = (u32 *) hash_buf->digest;
11462
11463 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11464 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11465 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11466 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11467 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11468
11469 digest[0] -= SHA1M_A;
11470 digest[1] -= SHA1M_B;
11471 digest[2] -= SHA1M_C;
11472 digest[3] -= SHA1M_D;
11473 digest[4] -= SHA1M_E;
11474
11475 return (PARSER_OK);
11476 }
11477
11478 int sha1linkedin_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11479 {
11480 if ((input_len < DISPLAY_LEN_MIN_100) || (input_len > DISPLAY_LEN_MAX_100)) return (PARSER_GLOBAL_LENGTH);
11481
11482 u32 *digest = (u32 *) hash_buf->digest;
11483
11484 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11485 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11486 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11487 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11488 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11489
11490 return (PARSER_OK);
11491 }
11492
11493 int sha1s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11494 {
11495 if (data.opts_type & OPTS_TYPE_ST_HEX)
11496 {
11497 if ((input_len < DISPLAY_LEN_MIN_110H) || (input_len > DISPLAY_LEN_MAX_110H)) return (PARSER_GLOBAL_LENGTH);
11498 }
11499 else
11500 {
11501 if ((input_len < DISPLAY_LEN_MIN_110) || (input_len > DISPLAY_LEN_MAX_110)) return (PARSER_GLOBAL_LENGTH);
11502 }
11503
11504 u32 *digest = (u32 *) hash_buf->digest;
11505
11506 salt_t *salt = hash_buf->salt;
11507
11508 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11509 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11510 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11511 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11512 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11513
11514 digest[0] -= SHA1M_A;
11515 digest[1] -= SHA1M_B;
11516 digest[2] -= SHA1M_C;
11517 digest[3] -= SHA1M_D;
11518 digest[4] -= SHA1M_E;
11519
11520 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11521
11522 uint salt_len = input_len - 40 - 1;
11523
11524 char *salt_buf = input_buf + 40 + 1;
11525
11526 char *salt_buf_ptr = (char *) salt->salt_buf;
11527
11528 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11529
11530 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11531
11532 salt->salt_len = salt_len;
11533
11534 return (PARSER_OK);
11535 }
11536
11537 int sha1b64_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11538 {
11539 if ((input_len < DISPLAY_LEN_MIN_101) || (input_len > DISPLAY_LEN_MAX_101)) return (PARSER_GLOBAL_LENGTH);
11540
11541 if (memcmp (SIGNATURE_SHA1B64, input_buf, 5)) return (PARSER_SIGNATURE_UNMATCHED);
11542
11543 u32 *digest = (u32 *) hash_buf->digest;
11544
11545 u8 tmp_buf[100] = { 0 };
11546
11547 base64_decode (base64_to_int, (const u8 *) input_buf + 5, input_len - 5, tmp_buf);
11548
11549 memcpy (digest, tmp_buf, 20);
11550
11551 digest[0] = byte_swap_32 (digest[0]);
11552 digest[1] = byte_swap_32 (digest[1]);
11553 digest[2] = byte_swap_32 (digest[2]);
11554 digest[3] = byte_swap_32 (digest[3]);
11555 digest[4] = byte_swap_32 (digest[4]);
11556
11557 digest[0] -= SHA1M_A;
11558 digest[1] -= SHA1M_B;
11559 digest[2] -= SHA1M_C;
11560 digest[3] -= SHA1M_D;
11561 digest[4] -= SHA1M_E;
11562
11563 return (PARSER_OK);
11564 }
11565
11566 int sha1b64s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11567 {
11568 if ((input_len < DISPLAY_LEN_MIN_111) || (input_len > DISPLAY_LEN_MAX_111)) return (PARSER_GLOBAL_LENGTH);
11569
11570 if (memcmp (SIGNATURE_SSHA1B64_lower, input_buf, 6) && memcmp (SIGNATURE_SSHA1B64_upper, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
11571
11572 u32 *digest = (u32 *) hash_buf->digest;
11573
11574 salt_t *salt = hash_buf->salt;
11575
11576 u8 tmp_buf[100] = { 0 };
11577
11578 int tmp_len = base64_decode (base64_to_int, (const u8 *) input_buf + 6, input_len - 6, tmp_buf);
11579
11580 memcpy (digest, tmp_buf, 20);
11581
11582 salt->salt_len = tmp_len - 20;
11583
11584 memcpy (salt->salt_buf, tmp_buf + 20, salt->salt_len);
11585
11586 if (data.opts_type & OPTS_TYPE_ST_ADD80)
11587 {
11588 char *ptr = (char *) salt->salt_buf;
11589
11590 ptr[salt->salt_len] = 0x80;
11591 }
11592
11593 digest[0] = byte_swap_32 (digest[0]);
11594 digest[1] = byte_swap_32 (digest[1]);
11595 digest[2] = byte_swap_32 (digest[2]);
11596 digest[3] = byte_swap_32 (digest[3]);
11597 digest[4] = byte_swap_32 (digest[4]);
11598
11599 digest[0] -= SHA1M_A;
11600 digest[1] -= SHA1M_B;
11601 digest[2] -= SHA1M_C;
11602 digest[3] -= SHA1M_D;
11603 digest[4] -= SHA1M_E;
11604
11605 return (PARSER_OK);
11606 }
11607
11608 int mssql2000_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11609 {
11610 if ((input_len < DISPLAY_LEN_MIN_131) || (input_len > DISPLAY_LEN_MAX_131)) return (PARSER_GLOBAL_LENGTH);
11611
11612 if (memcmp (SIGNATURE_MSSQL, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
11613
11614 u32 *digest = (u32 *) hash_buf->digest;
11615
11616 salt_t *salt = hash_buf->salt;
11617
11618 char *salt_buf = input_buf + 6;
11619
11620 uint salt_len = 8;
11621
11622 char *salt_buf_ptr = (char *) salt->salt_buf;
11623
11624 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11625
11626 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11627
11628 salt->salt_len = salt_len;
11629
11630 char *hash_pos = input_buf + 6 + 8 + 40;
11631
11632 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
11633 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
11634 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
11635 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
11636 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
11637
11638 digest[0] -= SHA1M_A;
11639 digest[1] -= SHA1M_B;
11640 digest[2] -= SHA1M_C;
11641 digest[3] -= SHA1M_D;
11642 digest[4] -= SHA1M_E;
11643
11644 return (PARSER_OK);
11645 }
11646
11647 int mssql2005_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11648 {
11649 if ((input_len < DISPLAY_LEN_MIN_132) || (input_len > DISPLAY_LEN_MAX_132)) return (PARSER_GLOBAL_LENGTH);
11650
11651 if (memcmp (SIGNATURE_MSSQL, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
11652
11653 u32 *digest = (u32 *) hash_buf->digest;
11654
11655 salt_t *salt = hash_buf->salt;
11656
11657 char *salt_buf = input_buf + 6;
11658
11659 uint salt_len = 8;
11660
11661 char *salt_buf_ptr = (char *) salt->salt_buf;
11662
11663 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11664
11665 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11666
11667 salt->salt_len = salt_len;
11668
11669 char *hash_pos = input_buf + 6 + 8;
11670
11671 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
11672 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
11673 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
11674 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
11675 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
11676
11677 digest[0] -= SHA1M_A;
11678 digest[1] -= SHA1M_B;
11679 digest[2] -= SHA1M_C;
11680 digest[3] -= SHA1M_D;
11681 digest[4] -= SHA1M_E;
11682
11683 return (PARSER_OK);
11684 }
11685
11686 int mssql2012_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11687 {
11688 if ((input_len < DISPLAY_LEN_MIN_1731) || (input_len > DISPLAY_LEN_MAX_1731)) return (PARSER_GLOBAL_LENGTH);
11689
11690 if (memcmp (SIGNATURE_MSSQL2012, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
11691
11692 u64 *digest = (u64 *) hash_buf->digest;
11693
11694 salt_t *salt = hash_buf->salt;
11695
11696 char *salt_buf = input_buf + 6;
11697
11698 uint salt_len = 8;
11699
11700 char *salt_buf_ptr = (char *) salt->salt_buf;
11701
11702 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11703
11704 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11705
11706 salt->salt_len = salt_len;
11707
11708 char *hash_pos = input_buf + 6 + 8;
11709
11710 digest[0] = hex_to_u64 ((const u8 *) &hash_pos[ 0]);
11711 digest[1] = hex_to_u64 ((const u8 *) &hash_pos[ 16]);
11712 digest[2] = hex_to_u64 ((const u8 *) &hash_pos[ 32]);
11713 digest[3] = hex_to_u64 ((const u8 *) &hash_pos[ 48]);
11714 digest[4] = hex_to_u64 ((const u8 *) &hash_pos[ 64]);
11715 digest[5] = hex_to_u64 ((const u8 *) &hash_pos[ 80]);
11716 digest[6] = hex_to_u64 ((const u8 *) &hash_pos[ 96]);
11717 digest[7] = hex_to_u64 ((const u8 *) &hash_pos[112]);
11718
11719 digest[0] -= SHA512M_A;
11720 digest[1] -= SHA512M_B;
11721 digest[2] -= SHA512M_C;
11722 digest[3] -= SHA512M_D;
11723 digest[4] -= SHA512M_E;
11724 digest[5] -= SHA512M_F;
11725 digest[6] -= SHA512M_G;
11726 digest[7] -= SHA512M_H;
11727
11728 return (PARSER_OK);
11729 }
11730
11731 int oracleh_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11732 {
11733 if (data.opts_type & OPTS_TYPE_ST_HEX)
11734 {
11735 if ((input_len < DISPLAY_LEN_MIN_3100H) || (input_len > DISPLAY_LEN_MAX_3100H)) return (PARSER_GLOBAL_LENGTH);
11736 }
11737 else
11738 {
11739 if ((input_len < DISPLAY_LEN_MIN_3100) || (input_len > DISPLAY_LEN_MAX_3100)) return (PARSER_GLOBAL_LENGTH);
11740 }
11741
11742 u32 *digest = (u32 *) hash_buf->digest;
11743
11744 salt_t *salt = hash_buf->salt;
11745
11746 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11747 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11748 digest[2] = 0;
11749 digest[3] = 0;
11750
11751 digest[0] = byte_swap_32 (digest[0]);
11752 digest[1] = byte_swap_32 (digest[1]);
11753
11754 if (input_buf[16] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11755
11756 uint salt_len = input_len - 16 - 1;
11757
11758 char *salt_buf = input_buf + 16 + 1;
11759
11760 char *salt_buf_ptr = (char *) salt->salt_buf;
11761
11762 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11763
11764 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11765
11766 salt->salt_len = salt_len;
11767
11768 return (PARSER_OK);
11769 }
11770
11771 int oracles_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11772 {
11773 if ((input_len < DISPLAY_LEN_MIN_112) || (input_len > DISPLAY_LEN_MAX_112)) return (PARSER_GLOBAL_LENGTH);
11774
11775 u32 *digest = (u32 *) hash_buf->digest;
11776
11777 salt_t *salt = hash_buf->salt;
11778
11779 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11780 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11781 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11782 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11783 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11784
11785 digest[0] -= SHA1M_A;
11786 digest[1] -= SHA1M_B;
11787 digest[2] -= SHA1M_C;
11788 digest[3] -= SHA1M_D;
11789 digest[4] -= SHA1M_E;
11790
11791 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11792
11793 uint salt_len = input_len - 40 - 1;
11794
11795 char *salt_buf = input_buf + 40 + 1;
11796
11797 char *salt_buf_ptr = (char *) salt->salt_buf;
11798
11799 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11800
11801 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11802
11803 salt->salt_len = salt_len;
11804
11805 return (PARSER_OK);
11806 }
11807
11808 int oraclet_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11809 {
11810 if ((input_len < DISPLAY_LEN_MIN_12300) || (input_len > DISPLAY_LEN_MAX_12300)) return (PARSER_GLOBAL_LENGTH);
11811
11812 u32 *digest = (u32 *) hash_buf->digest;
11813
11814 salt_t *salt = hash_buf->salt;
11815
11816 char *hash_pos = input_buf;
11817
11818 digest[ 0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
11819 digest[ 1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
11820 digest[ 2] = hex_to_u32 ((const u8 *) &hash_pos[ 16]);
11821 digest[ 3] = hex_to_u32 ((const u8 *) &hash_pos[ 24]);
11822 digest[ 4] = hex_to_u32 ((const u8 *) &hash_pos[ 32]);
11823 digest[ 5] = hex_to_u32 ((const u8 *) &hash_pos[ 40]);
11824 digest[ 6] = hex_to_u32 ((const u8 *) &hash_pos[ 48]);
11825 digest[ 7] = hex_to_u32 ((const u8 *) &hash_pos[ 56]);
11826 digest[ 8] = hex_to_u32 ((const u8 *) &hash_pos[ 64]);
11827 digest[ 9] = hex_to_u32 ((const u8 *) &hash_pos[ 72]);
11828 digest[10] = hex_to_u32 ((const u8 *) &hash_pos[ 80]);
11829 digest[11] = hex_to_u32 ((const u8 *) &hash_pos[ 88]);
11830 digest[12] = hex_to_u32 ((const u8 *) &hash_pos[ 96]);
11831 digest[13] = hex_to_u32 ((const u8 *) &hash_pos[104]);
11832 digest[14] = hex_to_u32 ((const u8 *) &hash_pos[112]);
11833 digest[15] = hex_to_u32 ((const u8 *) &hash_pos[120]);
11834
11835 char *salt_pos = input_buf + 128;
11836
11837 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[ 0]);
11838 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[ 8]);
11839 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_pos[16]);
11840 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &salt_pos[24]);
11841
11842 salt->salt_iter = ROUNDS_ORACLET - 1;
11843 salt->salt_len = 16;
11844
11845 return (PARSER_OK);
11846 }
11847
11848 int sha256_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11849 {
11850 if ((input_len < DISPLAY_LEN_MIN_1400) || (input_len > DISPLAY_LEN_MAX_1400)) return (PARSER_GLOBAL_LENGTH);
11851
11852 u32 *digest = (u32 *) hash_buf->digest;
11853
11854 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11855 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11856 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11857 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11858 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11859 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
11860 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
11861 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
11862
11863 digest[0] -= SHA256M_A;
11864 digest[1] -= SHA256M_B;
11865 digest[2] -= SHA256M_C;
11866 digest[3] -= SHA256M_D;
11867 digest[4] -= SHA256M_E;
11868 digest[5] -= SHA256M_F;
11869 digest[6] -= SHA256M_G;
11870 digest[7] -= SHA256M_H;
11871
11872 return (PARSER_OK);
11873 }
11874
11875 int sha256s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11876 {
11877 if (data.opts_type & OPTS_TYPE_ST_HEX)
11878 {
11879 if ((input_len < DISPLAY_LEN_MIN_1410H) || (input_len > DISPLAY_LEN_MAX_1410H)) return (PARSER_GLOBAL_LENGTH);
11880 }
11881 else
11882 {
11883 if ((input_len < DISPLAY_LEN_MIN_1410) || (input_len > DISPLAY_LEN_MAX_1410)) return (PARSER_GLOBAL_LENGTH);
11884 }
11885
11886 u32 *digest = (u32 *) hash_buf->digest;
11887
11888 salt_t *salt = hash_buf->salt;
11889
11890 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
11891 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
11892 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
11893 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
11894 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
11895 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
11896 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
11897 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
11898
11899 digest[0] -= SHA256M_A;
11900 digest[1] -= SHA256M_B;
11901 digest[2] -= SHA256M_C;
11902 digest[3] -= SHA256M_D;
11903 digest[4] -= SHA256M_E;
11904 digest[5] -= SHA256M_F;
11905 digest[6] -= SHA256M_G;
11906 digest[7] -= SHA256M_H;
11907
11908 if (input_buf[64] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
11909
11910 uint salt_len = input_len - 64 - 1;
11911
11912 char *salt_buf = input_buf + 64 + 1;
11913
11914 char *salt_buf_ptr = (char *) salt->salt_buf;
11915
11916 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
11917
11918 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
11919
11920 salt->salt_len = salt_len;
11921
11922 return (PARSER_OK);
11923 }
11924
11925 int sha384_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11926 {
11927 if ((input_len < DISPLAY_LEN_MIN_10800) || (input_len > DISPLAY_LEN_MAX_10800)) return (PARSER_GLOBAL_LENGTH);
11928
11929 u64 *digest = (u64 *) hash_buf->digest;
11930
11931 digest[0] = hex_to_u64 ((const u8 *) &input_buf[ 0]);
11932 digest[1] = hex_to_u64 ((const u8 *) &input_buf[ 16]);
11933 digest[2] = hex_to_u64 ((const u8 *) &input_buf[ 32]);
11934 digest[3] = hex_to_u64 ((const u8 *) &input_buf[ 48]);
11935 digest[4] = hex_to_u64 ((const u8 *) &input_buf[ 64]);
11936 digest[5] = hex_to_u64 ((const u8 *) &input_buf[ 80]);
11937 digest[6] = 0;
11938 digest[7] = 0;
11939
11940 digest[0] -= SHA384M_A;
11941 digest[1] -= SHA384M_B;
11942 digest[2] -= SHA384M_C;
11943 digest[3] -= SHA384M_D;
11944 digest[4] -= SHA384M_E;
11945 digest[5] -= SHA384M_F;
11946 digest[6] -= 0;
11947 digest[7] -= 0;
11948
11949 return (PARSER_OK);
11950 }
11951
11952 int sha512_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11953 {
11954 if ((input_len < DISPLAY_LEN_MIN_1700) || (input_len > DISPLAY_LEN_MAX_1700)) return (PARSER_GLOBAL_LENGTH);
11955
11956 u64 *digest = (u64 *) hash_buf->digest;
11957
11958 digest[0] = hex_to_u64 ((const u8 *) &input_buf[ 0]);
11959 digest[1] = hex_to_u64 ((const u8 *) &input_buf[ 16]);
11960 digest[2] = hex_to_u64 ((const u8 *) &input_buf[ 32]);
11961 digest[3] = hex_to_u64 ((const u8 *) &input_buf[ 48]);
11962 digest[4] = hex_to_u64 ((const u8 *) &input_buf[ 64]);
11963 digest[5] = hex_to_u64 ((const u8 *) &input_buf[ 80]);
11964 digest[6] = hex_to_u64 ((const u8 *) &input_buf[ 96]);
11965 digest[7] = hex_to_u64 ((const u8 *) &input_buf[112]);
11966
11967 digest[0] -= SHA512M_A;
11968 digest[1] -= SHA512M_B;
11969 digest[2] -= SHA512M_C;
11970 digest[3] -= SHA512M_D;
11971 digest[4] -= SHA512M_E;
11972 digest[5] -= SHA512M_F;
11973 digest[6] -= SHA512M_G;
11974 digest[7] -= SHA512M_H;
11975
11976 return (PARSER_OK);
11977 }
11978
11979 int sha512s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
11980 {
11981 if (data.opts_type & OPTS_TYPE_ST_HEX)
11982 {
11983 if ((input_len < DISPLAY_LEN_MIN_1710H) || (input_len > DISPLAY_LEN_MAX_1710H)) return (PARSER_GLOBAL_LENGTH);
11984 }
11985 else
11986 {
11987 if ((input_len < DISPLAY_LEN_MIN_1710) || (input_len > DISPLAY_LEN_MAX_1710)) return (PARSER_GLOBAL_LENGTH);
11988 }
11989
11990 u64 *digest = (u64 *) hash_buf->digest;
11991
11992 salt_t *salt = hash_buf->salt;
11993
11994 digest[0] = hex_to_u64 ((const u8 *) &input_buf[ 0]);
11995 digest[1] = hex_to_u64 ((const u8 *) &input_buf[ 16]);
11996 digest[2] = hex_to_u64 ((const u8 *) &input_buf[ 32]);
11997 digest[3] = hex_to_u64 ((const u8 *) &input_buf[ 48]);
11998 digest[4] = hex_to_u64 ((const u8 *) &input_buf[ 64]);
11999 digest[5] = hex_to_u64 ((const u8 *) &input_buf[ 80]);
12000 digest[6] = hex_to_u64 ((const u8 *) &input_buf[ 96]);
12001 digest[7] = hex_to_u64 ((const u8 *) &input_buf[112]);
12002
12003 digest[0] -= SHA512M_A;
12004 digest[1] -= SHA512M_B;
12005 digest[2] -= SHA512M_C;
12006 digest[3] -= SHA512M_D;
12007 digest[4] -= SHA512M_E;
12008 digest[5] -= SHA512M_F;
12009 digest[6] -= SHA512M_G;
12010 digest[7] -= SHA512M_H;
12011
12012 if (input_buf[128] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
12013
12014 uint salt_len = input_len - 128 - 1;
12015
12016 char *salt_buf = input_buf + 128 + 1;
12017
12018 char *salt_buf_ptr = (char *) salt->salt_buf;
12019
12020 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
12021
12022 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
12023
12024 salt->salt_len = salt_len;
12025
12026 return (PARSER_OK);
12027 }
12028
12029 int sha512crypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12030 {
12031 if (memcmp (SIGNATURE_SHA512CRYPT, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
12032
12033 u64 *digest = (u64 *) hash_buf->digest;
12034
12035 salt_t *salt = hash_buf->salt;
12036
12037 char *salt_pos = input_buf + 3;
12038
12039 uint iterations_len = 0;
12040
12041 if (memcmp (salt_pos, "rounds=", 7) == 0)
12042 {
12043 salt_pos += 7;
12044
12045 for (iterations_len = 0; salt_pos[0] >= '0' && salt_pos[0] <= '9' && iterations_len < 7; iterations_len++, salt_pos += 1) continue;
12046
12047 if (iterations_len == 0 ) return (PARSER_SALT_ITERATION);
12048 if (salt_pos[0] != '$') return (PARSER_SIGNATURE_UNMATCHED);
12049
12050 salt_pos[0] = 0x0;
12051
12052 salt->salt_iter = atoi (salt_pos - iterations_len);
12053
12054 salt_pos += 1;
12055
12056 iterations_len += 8;
12057 }
12058 else
12059 {
12060 salt->salt_iter = ROUNDS_SHA512CRYPT;
12061 }
12062
12063 if ((input_len < DISPLAY_LEN_MIN_1800) || (input_len > DISPLAY_LEN_MAX_1800 + iterations_len)) return (PARSER_GLOBAL_LENGTH);
12064
12065 char *hash_pos = strchr (salt_pos, '$');
12066
12067 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12068
12069 uint salt_len = hash_pos - salt_pos;
12070
12071 if (salt_len > 16) return (PARSER_SALT_LENGTH);
12072
12073 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12074
12075 salt->salt_len = salt_len;
12076
12077 hash_pos++;
12078
12079 sha512crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12080
12081 return (PARSER_OK);
12082 }
12083
12084 int keccak_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12085 {
12086 if ((input_len < DISPLAY_LEN_MIN_5000) || (input_len > DISPLAY_LEN_MAX_5000)) return (PARSER_GLOBAL_LENGTH);
12087
12088 if (input_len % 16) return (PARSER_GLOBAL_LENGTH);
12089
12090 u64 *digest = (u64 *) hash_buf->digest;
12091
12092 salt_t *salt = hash_buf->salt;
12093
12094 uint keccak_mdlen = input_len / 2;
12095
12096 for (uint i = 0; i < keccak_mdlen / 8; i++)
12097 {
12098 digest[i] = hex_to_u64 ((const u8 *) &input_buf[i * 16]);
12099
12100 digest[i] = byte_swap_64 (digest[i]);
12101 }
12102
12103 salt->keccak_mdlen = keccak_mdlen;
12104
12105 return (PARSER_OK);
12106 }
12107
12108 int ikepsk_md5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12109 {
12110 if ((input_len < DISPLAY_LEN_MIN_5300) || (input_len > DISPLAY_LEN_MAX_5300)) return (PARSER_GLOBAL_LENGTH);
12111
12112 u32 *digest = (u32 *) hash_buf->digest;
12113
12114 salt_t *salt = hash_buf->salt;
12115
12116 ikepsk_t *ikepsk = (ikepsk_t *) hash_buf->esalt;
12117
12118 /**
12119 * Parse that strange long line
12120 */
12121
12122 char *in_off[9];
12123
12124 size_t in_len[9] = { 0 };
12125
12126 in_off[0] = strtok (input_buf, ":");
12127
12128 in_len[0] = strlen (in_off[0]);
12129
12130 size_t i;
12131
12132 for (i = 1; i < 9; i++)
12133 {
12134 in_off[i] = strtok (NULL, ":");
12135
12136 if (in_off[i] == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12137
12138 in_len[i] = strlen (in_off[i]);
12139 }
12140
12141 char *ptr = (char *) ikepsk->msg_buf;
12142
12143 for (i = 0; i < in_len[0]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[0] + i);
12144 for (i = 0; i < in_len[1]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[1] + i);
12145 for (i = 0; i < in_len[2]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[2] + i);
12146 for (i = 0; i < in_len[3]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[3] + i);
12147 for (i = 0; i < in_len[4]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[4] + i);
12148 for (i = 0; i < in_len[5]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[5] + i);
12149
12150 *ptr = 0x80;
12151
12152 ikepsk->msg_len = (in_len[0] + in_len[1] + in_len[2] + in_len[3] + in_len[4] + in_len[5]) / 2;
12153
12154 ptr = (char *) ikepsk->nr_buf;
12155
12156 for (i = 0; i < in_len[6]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[6] + i);
12157 for (i = 0; i < in_len[7]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[7] + i);
12158
12159 *ptr = 0x80;
12160
12161 ikepsk->nr_len = (in_len[6] + in_len[7]) / 2;
12162
12163 /**
12164 * Store to database
12165 */
12166
12167 ptr = in_off[8];
12168
12169 digest[0] = hex_to_u32 ((const u8 *) &ptr[ 0]);
12170 digest[1] = hex_to_u32 ((const u8 *) &ptr[ 8]);
12171 digest[2] = hex_to_u32 ((const u8 *) &ptr[16]);
12172 digest[3] = hex_to_u32 ((const u8 *) &ptr[24]);
12173
12174 digest[0] = byte_swap_32 (digest[0]);
12175 digest[1] = byte_swap_32 (digest[1]);
12176 digest[2] = byte_swap_32 (digest[2]);
12177 digest[3] = byte_swap_32 (digest[3]);
12178
12179 salt->salt_len = 32;
12180
12181 salt->salt_buf[0] = ikepsk->nr_buf[0];
12182 salt->salt_buf[1] = ikepsk->nr_buf[1];
12183 salt->salt_buf[2] = ikepsk->nr_buf[2];
12184 salt->salt_buf[3] = ikepsk->nr_buf[3];
12185 salt->salt_buf[4] = ikepsk->nr_buf[4];
12186 salt->salt_buf[5] = ikepsk->nr_buf[5];
12187 salt->salt_buf[6] = ikepsk->nr_buf[6];
12188 salt->salt_buf[7] = ikepsk->nr_buf[7];
12189
12190 return (PARSER_OK);
12191 }
12192
12193 int ikepsk_sha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12194 {
12195 if ((input_len < DISPLAY_LEN_MIN_5400) || (input_len > DISPLAY_LEN_MAX_5400)) return (PARSER_GLOBAL_LENGTH);
12196
12197 u32 *digest = (u32 *) hash_buf->digest;
12198
12199 salt_t *salt = hash_buf->salt;
12200
12201 ikepsk_t *ikepsk = (ikepsk_t *) hash_buf->esalt;
12202
12203 /**
12204 * Parse that strange long line
12205 */
12206
12207 char *in_off[9];
12208
12209 size_t in_len[9] = { 0 };
12210
12211 in_off[0] = strtok (input_buf, ":");
12212
12213 in_len[0] = strlen (in_off[0]);
12214
12215 size_t i;
12216
12217 for (i = 1; i < 9; i++)
12218 {
12219 in_off[i] = strtok (NULL, ":");
12220
12221 if (in_off[i] == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12222
12223 in_len[i] = strlen (in_off[i]);
12224 }
12225
12226 char *ptr = (char *) ikepsk->msg_buf;
12227
12228 for (i = 0; i < in_len[0]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[0] + i);
12229 for (i = 0; i < in_len[1]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[1] + i);
12230 for (i = 0; i < in_len[2]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[2] + i);
12231 for (i = 0; i < in_len[3]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[3] + i);
12232 for (i = 0; i < in_len[4]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[4] + i);
12233 for (i = 0; i < in_len[5]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[5] + i);
12234
12235 *ptr = 0x80;
12236
12237 ikepsk->msg_len = (in_len[0] + in_len[1] + in_len[2] + in_len[3] + in_len[4] + in_len[5]) / 2;
12238
12239 ptr = (char *) ikepsk->nr_buf;
12240
12241 for (i = 0; i < in_len[6]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[6] + i);
12242 for (i = 0; i < in_len[7]; i += 2) *ptr++ = hex_to_u8 ((const u8 *) in_off[7] + i);
12243
12244 *ptr = 0x80;
12245
12246 ikepsk->nr_len = (in_len[6] + in_len[7]) / 2;
12247
12248 /**
12249 * Store to database
12250 */
12251
12252 ptr = in_off[8];
12253
12254 digest[0] = hex_to_u32 ((const u8 *) &ptr[ 0]);
12255 digest[1] = hex_to_u32 ((const u8 *) &ptr[ 8]);
12256 digest[2] = hex_to_u32 ((const u8 *) &ptr[16]);
12257 digest[3] = hex_to_u32 ((const u8 *) &ptr[24]);
12258 digest[4] = hex_to_u32 ((const u8 *) &ptr[32]);
12259
12260 salt->salt_len = 32;
12261
12262 salt->salt_buf[0] = ikepsk->nr_buf[0];
12263 salt->salt_buf[1] = ikepsk->nr_buf[1];
12264 salt->salt_buf[2] = ikepsk->nr_buf[2];
12265 salt->salt_buf[3] = ikepsk->nr_buf[3];
12266 salt->salt_buf[4] = ikepsk->nr_buf[4];
12267 salt->salt_buf[5] = ikepsk->nr_buf[5];
12268 salt->salt_buf[6] = ikepsk->nr_buf[6];
12269 salt->salt_buf[7] = ikepsk->nr_buf[7];
12270
12271 return (PARSER_OK);
12272 }
12273
12274 int ripemd160_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12275 {
12276 if ((input_len < DISPLAY_LEN_MIN_6000) || (input_len > DISPLAY_LEN_MAX_6000)) return (PARSER_GLOBAL_LENGTH);
12277
12278 u32 *digest = (u32 *) hash_buf->digest;
12279
12280 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
12281 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
12282 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
12283 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
12284 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
12285
12286 digest[0] = byte_swap_32 (digest[0]);
12287 digest[1] = byte_swap_32 (digest[1]);
12288 digest[2] = byte_swap_32 (digest[2]);
12289 digest[3] = byte_swap_32 (digest[3]);
12290 digest[4] = byte_swap_32 (digest[4]);
12291
12292 return (PARSER_OK);
12293 }
12294
12295 int whirlpool_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12296 {
12297 if ((input_len < DISPLAY_LEN_MIN_6100) || (input_len > DISPLAY_LEN_MAX_6100)) return (PARSER_GLOBAL_LENGTH);
12298
12299 u32 *digest = (u32 *) hash_buf->digest;
12300
12301 digest[ 0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
12302 digest[ 1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
12303 digest[ 2] = hex_to_u32 ((const u8 *) &input_buf[ 16]);
12304 digest[ 3] = hex_to_u32 ((const u8 *) &input_buf[ 24]);
12305 digest[ 4] = hex_to_u32 ((const u8 *) &input_buf[ 32]);
12306 digest[ 5] = hex_to_u32 ((const u8 *) &input_buf[ 40]);
12307 digest[ 6] = hex_to_u32 ((const u8 *) &input_buf[ 48]);
12308 digest[ 7] = hex_to_u32 ((const u8 *) &input_buf[ 56]);
12309 digest[ 8] = hex_to_u32 ((const u8 *) &input_buf[ 64]);
12310 digest[ 9] = hex_to_u32 ((const u8 *) &input_buf[ 72]);
12311 digest[10] = hex_to_u32 ((const u8 *) &input_buf[ 80]);
12312 digest[11] = hex_to_u32 ((const u8 *) &input_buf[ 88]);
12313 digest[12] = hex_to_u32 ((const u8 *) &input_buf[ 96]);
12314 digest[13] = hex_to_u32 ((const u8 *) &input_buf[104]);
12315 digest[14] = hex_to_u32 ((const u8 *) &input_buf[112]);
12316 digest[15] = hex_to_u32 ((const u8 *) &input_buf[120]);
12317
12318 return (PARSER_OK);
12319 }
12320
12321 int androidpin_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12322 {
12323 if ((input_len < DISPLAY_LEN_MIN_5800) || (input_len > DISPLAY_LEN_MAX_5800)) return (PARSER_GLOBAL_LENGTH);
12324
12325 u32 *digest = (u32 *) hash_buf->digest;
12326
12327 salt_t *salt = hash_buf->salt;
12328
12329 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
12330 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
12331 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
12332 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
12333 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
12334
12335 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
12336
12337 uint salt_len = input_len - 40 - 1;
12338
12339 char *salt_buf = input_buf + 40 + 1;
12340
12341 char *salt_buf_ptr = (char *) salt->salt_buf;
12342
12343 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
12344
12345 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
12346
12347 salt->salt_len = salt_len;
12348
12349 salt->salt_iter = ROUNDS_ANDROIDPIN - 1;
12350
12351 return (PARSER_OK);
12352 }
12353
12354 int truecrypt_parse_hash_1k (char *input_buf, uint input_len, hash_t *hash_buf)
12355 {
12356 u32 *digest = (u32 *) hash_buf->digest;
12357
12358 salt_t *salt = hash_buf->salt;
12359
12360 tc_t *tc = (tc_t *) hash_buf->esalt;
12361
12362 if (input_len == 0)
12363 {
12364 log_error ("TrueCrypt container not specified");
12365
12366 exit (-1);
12367 }
12368
12369 FILE *fp = fopen (input_buf, "rb");
12370
12371 if (fp == NULL)
12372 {
12373 log_error ("%s: %s", input_buf, strerror (errno));
12374
12375 exit (-1);
12376 }
12377
12378 char buf[512] = { 0 };
12379
12380 int n = fread (buf, 1, sizeof (buf), fp);
12381
12382 fclose (fp);
12383
12384 if (n != 512) return (PARSER_TC_FILE_SIZE);
12385
12386 memcpy (tc->salt_buf, buf, 64);
12387
12388 memcpy (tc->data_buf, buf + 64, 512 - 64);
12389
12390 salt->salt_buf[0] = tc->salt_buf[0];
12391
12392 salt->salt_len = 4;
12393
12394 salt->salt_iter = 1000 - 1;
12395
12396 digest[0] = tc->data_buf[0];
12397
12398 return (PARSER_OK);
12399 }
12400
12401 int truecrypt_parse_hash_2k (char *input_buf, uint input_len, hash_t *hash_buf)
12402 {
12403 u32 *digest = (u32 *) hash_buf->digest;
12404
12405 salt_t *salt = hash_buf->salt;
12406
12407 tc_t *tc = (tc_t *) hash_buf->esalt;
12408
12409 if (input_len == 0)
12410 {
12411 log_error ("TrueCrypt container not specified");
12412
12413 exit (-1);
12414 }
12415
12416 FILE *fp = fopen (input_buf, "rb");
12417
12418 if (fp == NULL)
12419 {
12420 log_error ("%s: %s", input_buf, strerror (errno));
12421
12422 exit (-1);
12423 }
12424
12425 char buf[512] = { 0 };
12426
12427 int n = fread (buf, 1, sizeof (buf), fp);
12428
12429 fclose (fp);
12430
12431 if (n != 512) return (PARSER_TC_FILE_SIZE);
12432
12433 memcpy (tc->salt_buf, buf, 64);
12434
12435 memcpy (tc->data_buf, buf + 64, 512 - 64);
12436
12437 salt->salt_buf[0] = tc->salt_buf[0];
12438
12439 salt->salt_len = 4;
12440
12441 salt->salt_iter = 2000 - 1;
12442
12443 digest[0] = tc->data_buf[0];
12444
12445 return (PARSER_OK);
12446 }
12447
12448 int md5aix_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12449 {
12450 if ((input_len < DISPLAY_LEN_MIN_6300) || (input_len > DISPLAY_LEN_MAX_6300)) return (PARSER_GLOBAL_LENGTH);
12451
12452 if (memcmp (SIGNATURE_MD5AIX, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
12453
12454 u32 *digest = (u32 *) hash_buf->digest;
12455
12456 salt_t *salt = hash_buf->salt;
12457
12458 char *salt_pos = input_buf + 6;
12459
12460 char *hash_pos = strchr (salt_pos, '$');
12461
12462 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12463
12464 uint salt_len = hash_pos - salt_pos;
12465
12466 if (salt_len < 8) return (PARSER_SALT_LENGTH);
12467
12468 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12469
12470 salt->salt_len = salt_len;
12471
12472 salt->salt_iter = 1000;
12473
12474 hash_pos++;
12475
12476 md5crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12477
12478 return (PARSER_OK);
12479 }
12480
12481 int sha1aix_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12482 {
12483 if ((input_len < DISPLAY_LEN_MIN_6700) || (input_len > DISPLAY_LEN_MAX_6700)) return (PARSER_GLOBAL_LENGTH);
12484
12485 if (memcmp (SIGNATURE_SHA1AIX, input_buf, 7)) return (PARSER_SIGNATURE_UNMATCHED);
12486
12487 u32 *digest = (u32 *) hash_buf->digest;
12488
12489 salt_t *salt = hash_buf->salt;
12490
12491 char *iter_pos = input_buf + 7;
12492
12493 char *salt_pos = strchr (iter_pos, '$');
12494
12495 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12496
12497 salt_pos++;
12498
12499 char *hash_pos = strchr (salt_pos, '$');
12500
12501 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12502
12503 uint salt_len = hash_pos - salt_pos;
12504
12505 if (salt_len < 16) return (PARSER_SALT_LENGTH);
12506
12507 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12508
12509 salt->salt_len = salt_len;
12510
12511 char salt_iter[3] = { iter_pos[0], iter_pos[1], 0 };
12512
12513 salt->salt_sign[0] = atoi (salt_iter);
12514
12515 salt->salt_iter = (1 << atoi (salt_iter)) - 1;
12516
12517 hash_pos++;
12518
12519 sha1aix_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12520
12521 digest[0] = byte_swap_32 (digest[0]);
12522 digest[1] = byte_swap_32 (digest[1]);
12523 digest[2] = byte_swap_32 (digest[2]);
12524 digest[3] = byte_swap_32 (digest[3]);
12525 digest[4] = byte_swap_32 (digest[4]);
12526
12527 return (PARSER_OK);
12528 }
12529
12530 int sha256aix_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12531 {
12532 if ((input_len < DISPLAY_LEN_MIN_6400) || (input_len > DISPLAY_LEN_MAX_6400)) return (PARSER_GLOBAL_LENGTH);
12533
12534 if (memcmp (SIGNATURE_SHA256AIX, input_buf, 9)) return (PARSER_SIGNATURE_UNMATCHED);
12535
12536 u32 *digest = (u32 *) hash_buf->digest;
12537
12538 salt_t *salt = hash_buf->salt;
12539
12540 char *iter_pos = input_buf + 9;
12541
12542 char *salt_pos = strchr (iter_pos, '$');
12543
12544 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12545
12546 salt_pos++;
12547
12548 char *hash_pos = strchr (salt_pos, '$');
12549
12550 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12551
12552 uint salt_len = hash_pos - salt_pos;
12553
12554 if (salt_len < 16) return (PARSER_SALT_LENGTH);
12555
12556 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12557
12558 salt->salt_len = salt_len;
12559
12560 char salt_iter[3] = { iter_pos[0], iter_pos[1], 0 };
12561
12562 salt->salt_sign[0] = atoi (salt_iter);
12563
12564 salt->salt_iter = (1 << atoi (salt_iter)) - 1;
12565
12566 hash_pos++;
12567
12568 sha256aix_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12569
12570 digest[0] = byte_swap_32 (digest[0]);
12571 digest[1] = byte_swap_32 (digest[1]);
12572 digest[2] = byte_swap_32 (digest[2]);
12573 digest[3] = byte_swap_32 (digest[3]);
12574 digest[4] = byte_swap_32 (digest[4]);
12575 digest[5] = byte_swap_32 (digest[5]);
12576 digest[6] = byte_swap_32 (digest[6]);
12577 digest[7] = byte_swap_32 (digest[7]);
12578
12579 return (PARSER_OK);
12580 }
12581
12582 int sha512aix_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12583 {
12584 if ((input_len < DISPLAY_LEN_MIN_6500) || (input_len > DISPLAY_LEN_MAX_6500)) return (PARSER_GLOBAL_LENGTH);
12585
12586 if (memcmp (SIGNATURE_SHA512AIX, input_buf, 9)) return (PARSER_SIGNATURE_UNMATCHED);
12587
12588 u64 *digest = (u64 *) hash_buf->digest;
12589
12590 salt_t *salt = hash_buf->salt;
12591
12592 char *iter_pos = input_buf + 9;
12593
12594 char *salt_pos = strchr (iter_pos, '$');
12595
12596 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12597
12598 salt_pos++;
12599
12600 char *hash_pos = strchr (salt_pos, '$');
12601
12602 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12603
12604 uint salt_len = hash_pos - salt_pos;
12605
12606 if (salt_len < 16) return (PARSER_SALT_LENGTH);
12607
12608 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12609
12610 salt->salt_len = salt_len;
12611
12612 char salt_iter[3] = { iter_pos[0], iter_pos[1], 0 };
12613
12614 salt->salt_sign[0] = atoi (salt_iter);
12615
12616 salt->salt_iter = (1 << atoi (salt_iter)) - 1;
12617
12618 hash_pos++;
12619
12620 sha512aix_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12621
12622 digest[0] = byte_swap_64 (digest[0]);
12623 digest[1] = byte_swap_64 (digest[1]);
12624 digest[2] = byte_swap_64 (digest[2]);
12625 digest[3] = byte_swap_64 (digest[3]);
12626 digest[4] = byte_swap_64 (digest[4]);
12627 digest[5] = byte_swap_64 (digest[5]);
12628 digest[6] = byte_swap_64 (digest[6]);
12629 digest[7] = byte_swap_64 (digest[7]);
12630
12631 return (PARSER_OK);
12632 }
12633
12634 int agilekey_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12635 {
12636 if ((input_len < DISPLAY_LEN_MIN_6600) || (input_len > DISPLAY_LEN_MAX_6600)) return (PARSER_GLOBAL_LENGTH);
12637
12638 u32 *digest = (u32 *) hash_buf->digest;
12639
12640 salt_t *salt = hash_buf->salt;
12641
12642 agilekey_t *agilekey = (agilekey_t *) hash_buf->esalt;
12643
12644 /**
12645 * parse line
12646 */
12647
12648 char *iterations_pos = input_buf;
12649
12650 char *saltbuf_pos = strchr (iterations_pos, ':');
12651
12652 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12653
12654 uint iterations_len = saltbuf_pos - iterations_pos;
12655
12656 if (iterations_len > 6) return (PARSER_SALT_LENGTH);
12657
12658 saltbuf_pos++;
12659
12660 char *cipherbuf_pos = strchr (saltbuf_pos, ':');
12661
12662 if (cipherbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12663
12664 uint saltbuf_len = cipherbuf_pos - saltbuf_pos;
12665
12666 if (saltbuf_len != 16) return (PARSER_SALT_LENGTH);
12667
12668 uint cipherbuf_len = input_len - iterations_len - 1 - saltbuf_len - 1;
12669
12670 if (cipherbuf_len != 2080) return (PARSER_HASH_LENGTH);
12671
12672 cipherbuf_pos++;
12673
12674 /**
12675 * pbkdf2 iterations
12676 */
12677
12678 salt->salt_iter = atoi (iterations_pos) - 1;
12679
12680 /**
12681 * handle salt encoding
12682 */
12683
12684 char *saltbuf_ptr = (char *) salt->salt_buf;
12685
12686 for (uint i = 0; i < saltbuf_len; i += 2)
12687 {
12688 const char p0 = saltbuf_pos[i + 0];
12689 const char p1 = saltbuf_pos[i + 1];
12690
12691 *saltbuf_ptr++ = hex_convert (p1) << 0
12692 | hex_convert (p0) << 4;
12693 }
12694
12695 salt->salt_len = saltbuf_len / 2;
12696
12697 /**
12698 * handle cipher encoding
12699 */
12700
12701 uint *tmp = (uint *) mymalloc (32);
12702
12703 char *cipherbuf_ptr = (char *) tmp;
12704
12705 for (uint i = 2016; i < cipherbuf_len; i += 2)
12706 {
12707 const char p0 = cipherbuf_pos[i + 0];
12708 const char p1 = cipherbuf_pos[i + 1];
12709
12710 *cipherbuf_ptr++ = hex_convert (p1) << 0
12711 | hex_convert (p0) << 4;
12712 }
12713
12714 // iv is stored at salt_buf 4 (length 16)
12715 // data is stored at salt_buf 8 (length 16)
12716
12717 salt->salt_buf[ 4] = byte_swap_32 (tmp[0]);
12718 salt->salt_buf[ 5] = byte_swap_32 (tmp[1]);
12719 salt->salt_buf[ 6] = byte_swap_32 (tmp[2]);
12720 salt->salt_buf[ 7] = byte_swap_32 (tmp[3]);
12721
12722 salt->salt_buf[ 8] = byte_swap_32 (tmp[4]);
12723 salt->salt_buf[ 9] = byte_swap_32 (tmp[5]);
12724 salt->salt_buf[10] = byte_swap_32 (tmp[6]);
12725 salt->salt_buf[11] = byte_swap_32 (tmp[7]);
12726
12727 free (tmp);
12728
12729 for (uint i = 0, j = 0; i < 1040; i += 1, j += 2)
12730 {
12731 const char p0 = cipherbuf_pos[j + 0];
12732 const char p1 = cipherbuf_pos[j + 1];
12733
12734 agilekey->cipher[i] = hex_convert (p1) << 0
12735 | hex_convert (p0) << 4;
12736 }
12737
12738 /**
12739 * digest buf
12740 */
12741
12742 digest[0] = 0x10101010;
12743 digest[1] = 0x10101010;
12744 digest[2] = 0x10101010;
12745 digest[3] = 0x10101010;
12746
12747 return (PARSER_OK);
12748 }
12749
12750 int lastpass_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12751 {
12752 if ((input_len < DISPLAY_LEN_MIN_6800) || (input_len > DISPLAY_LEN_MAX_6800)) return (PARSER_GLOBAL_LENGTH);
12753
12754 u32 *digest = (u32 *) hash_buf->digest;
12755
12756 salt_t *salt = hash_buf->salt;
12757
12758 char *hashbuf_pos = input_buf;
12759
12760 char *iterations_pos = strchr (hashbuf_pos, ':');
12761
12762 if (iterations_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12763
12764 uint hash_len = iterations_pos - hashbuf_pos;
12765
12766 if ((hash_len != 32) && (hash_len != 64)) return (PARSER_HASH_LENGTH);
12767
12768 iterations_pos++;
12769
12770 char *saltbuf_pos = strchr (iterations_pos, ':');
12771
12772 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12773
12774 uint iterations_len = saltbuf_pos - iterations_pos;
12775
12776 saltbuf_pos++;
12777
12778 uint salt_len = input_len - hash_len - 1 - iterations_len - 1;
12779
12780 if (salt_len > 32) return (PARSER_SALT_LENGTH);
12781
12782 char *salt_buf_ptr = (char *) salt->salt_buf;
12783
12784 salt_len = parse_and_store_salt (salt_buf_ptr, saltbuf_pos, salt_len);
12785
12786 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
12787
12788 salt->salt_len = salt_len;
12789
12790 salt->salt_iter = atoi (iterations_pos) - 1;
12791
12792 digest[0] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 0]);
12793 digest[1] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 8]);
12794 digest[2] = hex_to_u32 ((const u8 *) &hashbuf_pos[16]);
12795 digest[3] = hex_to_u32 ((const u8 *) &hashbuf_pos[24]);
12796
12797 return (PARSER_OK);
12798 }
12799
12800 int gost_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12801 {
12802 if ((input_len < DISPLAY_LEN_MIN_6900) || (input_len > DISPLAY_LEN_MAX_6900)) return (PARSER_GLOBAL_LENGTH);
12803
12804 u32 *digest = (u32 *) hash_buf->digest;
12805
12806 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
12807 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
12808 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
12809 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
12810 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
12811 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
12812 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
12813 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
12814
12815 digest[0] = byte_swap_32 (digest[0]);
12816 digest[1] = byte_swap_32 (digest[1]);
12817 digest[2] = byte_swap_32 (digest[2]);
12818 digest[3] = byte_swap_32 (digest[3]);
12819 digest[4] = byte_swap_32 (digest[4]);
12820 digest[5] = byte_swap_32 (digest[5]);
12821 digest[6] = byte_swap_32 (digest[6]);
12822 digest[7] = byte_swap_32 (digest[7]);
12823
12824 return (PARSER_OK);
12825 }
12826
12827 int sha256crypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12828 {
12829 if (memcmp (SIGNATURE_SHA256CRYPT, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
12830
12831 u32 *digest = (u32 *) hash_buf->digest;
12832
12833 salt_t *salt = hash_buf->salt;
12834
12835 char *salt_pos = input_buf + 3;
12836
12837 uint iterations_len = 0;
12838
12839 if (memcmp (salt_pos, "rounds=", 7) == 0)
12840 {
12841 salt_pos += 7;
12842
12843 for (iterations_len = 0; salt_pos[0] >= '0' && salt_pos[0] <= '9' && iterations_len < 7; iterations_len++, salt_pos += 1) continue;
12844
12845 if (iterations_len == 0 ) return (PARSER_SALT_ITERATION);
12846 if (salt_pos[0] != '$') return (PARSER_SIGNATURE_UNMATCHED);
12847
12848 salt_pos[0] = 0x0;
12849
12850 salt->salt_iter = atoi (salt_pos - iterations_len);
12851
12852 salt_pos += 1;
12853
12854 iterations_len += 8;
12855 }
12856 else
12857 {
12858 salt->salt_iter = ROUNDS_SHA256CRYPT;
12859 }
12860
12861 if ((input_len < DISPLAY_LEN_MIN_7400) || (input_len > DISPLAY_LEN_MAX_7400 + iterations_len)) return (PARSER_GLOBAL_LENGTH);
12862
12863 char *hash_pos = strchr (salt_pos, '$');
12864
12865 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12866
12867 uint salt_len = hash_pos - salt_pos;
12868
12869 if (salt_len > 16) return (PARSER_SALT_LENGTH);
12870
12871 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
12872
12873 salt->salt_len = salt_len;
12874
12875 hash_pos++;
12876
12877 sha256crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
12878
12879 return (PARSER_OK);
12880 }
12881
12882 int sha512osx_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12883 {
12884 uint max_len = DISPLAY_LEN_MAX_7100 + (2 * 128);
12885
12886 if ((input_len < DISPLAY_LEN_MIN_7100) || (input_len > max_len)) return (PARSER_GLOBAL_LENGTH);
12887
12888 if (memcmp (SIGNATURE_SHA512OSX, input_buf, 4)) return (PARSER_SIGNATURE_UNMATCHED);
12889
12890 u64 *digest = (u64 *) hash_buf->digest;
12891
12892 salt_t *salt = hash_buf->salt;
12893
12894 pbkdf2_sha512_t *pbkdf2_sha512 = (pbkdf2_sha512_t *) hash_buf->esalt;
12895
12896 char *iter_pos = input_buf + 4;
12897
12898 char *salt_pos = strchr (iter_pos, '$');
12899
12900 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12901
12902 salt_pos++;
12903
12904 char *hash_pos = strchr (salt_pos, '$');
12905
12906 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12907
12908 if (((input_len - (hash_pos - input_buf) - 1) % 128) != 0) return (PARSER_GLOBAL_LENGTH);
12909
12910 hash_pos++;
12911
12912 digest[0] = hex_to_u64 ((const u8 *) &hash_pos[ 0]);
12913 digest[1] = hex_to_u64 ((const u8 *) &hash_pos[ 16]);
12914 digest[2] = hex_to_u64 ((const u8 *) &hash_pos[ 32]);
12915 digest[3] = hex_to_u64 ((const u8 *) &hash_pos[ 48]);
12916 digest[4] = hex_to_u64 ((const u8 *) &hash_pos[ 64]);
12917 digest[5] = hex_to_u64 ((const u8 *) &hash_pos[ 80]);
12918 digest[6] = hex_to_u64 ((const u8 *) &hash_pos[ 96]);
12919 digest[7] = hex_to_u64 ((const u8 *) &hash_pos[112]);
12920
12921 uint salt_len = hash_pos - salt_pos - 1;
12922
12923 if ((salt_len % 2) != 0) return (PARSER_SALT_LENGTH);
12924
12925 salt->salt_len = salt_len / 2;
12926
12927 pbkdf2_sha512->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[ 0]);
12928 pbkdf2_sha512->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[ 8]);
12929 pbkdf2_sha512->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_pos[16]);
12930 pbkdf2_sha512->salt_buf[3] = hex_to_u32 ((const u8 *) &salt_pos[24]);
12931 pbkdf2_sha512->salt_buf[4] = hex_to_u32 ((const u8 *) &salt_pos[32]);
12932 pbkdf2_sha512->salt_buf[5] = hex_to_u32 ((const u8 *) &salt_pos[40]);
12933 pbkdf2_sha512->salt_buf[6] = hex_to_u32 ((const u8 *) &salt_pos[48]);
12934 pbkdf2_sha512->salt_buf[7] = hex_to_u32 ((const u8 *) &salt_pos[56]);
12935
12936 pbkdf2_sha512->salt_buf[0] = byte_swap_32 (pbkdf2_sha512->salt_buf[0]);
12937 pbkdf2_sha512->salt_buf[1] = byte_swap_32 (pbkdf2_sha512->salt_buf[1]);
12938 pbkdf2_sha512->salt_buf[2] = byte_swap_32 (pbkdf2_sha512->salt_buf[2]);
12939 pbkdf2_sha512->salt_buf[3] = byte_swap_32 (pbkdf2_sha512->salt_buf[3]);
12940 pbkdf2_sha512->salt_buf[4] = byte_swap_32 (pbkdf2_sha512->salt_buf[4]);
12941 pbkdf2_sha512->salt_buf[5] = byte_swap_32 (pbkdf2_sha512->salt_buf[5]);
12942 pbkdf2_sha512->salt_buf[6] = byte_swap_32 (pbkdf2_sha512->salt_buf[6]);
12943 pbkdf2_sha512->salt_buf[7] = byte_swap_32 (pbkdf2_sha512->salt_buf[7]);
12944 pbkdf2_sha512->salt_buf[8] = 0x01000000;
12945 pbkdf2_sha512->salt_buf[9] = 0x80;
12946
12947 salt->salt_buf[0] = pbkdf2_sha512->salt_buf[0];
12948
12949 salt->salt_iter = atoi (iter_pos) - 1;
12950
12951 return (PARSER_OK);
12952 }
12953
12954 int episerver4_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
12955 {
12956 if ((input_len < DISPLAY_LEN_MIN_1441) || (input_len > DISPLAY_LEN_MAX_1441)) return (PARSER_GLOBAL_LENGTH);
12957
12958 if (memcmp (SIGNATURE_EPISERVER4, input_buf, 14)) return (PARSER_SIGNATURE_UNMATCHED);
12959
12960 u32 *digest = (u32 *) hash_buf->digest;
12961
12962 salt_t *salt = hash_buf->salt;
12963
12964 char *salt_pos = input_buf + 14;
12965
12966 char *hash_pos = strchr (salt_pos, '*');
12967
12968 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
12969
12970 hash_pos++;
12971
12972 uint salt_len = hash_pos - salt_pos - 1;
12973
12974 char *salt_buf_ptr = (char *) salt->salt_buf;
12975
12976 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
12977
12978 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
12979
12980 salt->salt_len = salt_len;
12981
12982 u8 tmp_buf[100] = { 0 };
12983
12984 base64_decode (base64_to_int, (const u8 *) hash_pos, 43, tmp_buf);
12985
12986 memcpy (digest, tmp_buf, 32);
12987
12988 digest[0] = byte_swap_32 (digest[0]);
12989 digest[1] = byte_swap_32 (digest[1]);
12990 digest[2] = byte_swap_32 (digest[2]);
12991 digest[3] = byte_swap_32 (digest[3]);
12992 digest[4] = byte_swap_32 (digest[4]);
12993 digest[5] = byte_swap_32 (digest[5]);
12994 digest[6] = byte_swap_32 (digest[6]);
12995 digest[7] = byte_swap_32 (digest[7]);
12996
12997 digest[0] -= SHA256M_A;
12998 digest[1] -= SHA256M_B;
12999 digest[2] -= SHA256M_C;
13000 digest[3] -= SHA256M_D;
13001 digest[4] -= SHA256M_E;
13002 digest[5] -= SHA256M_F;
13003 digest[6] -= SHA256M_G;
13004 digest[7] -= SHA256M_H;
13005
13006 return (PARSER_OK);
13007 }
13008
13009 int sha512grub_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13010 {
13011 uint max_len = DISPLAY_LEN_MAX_7200 + (8 * 128);
13012
13013 if ((input_len < DISPLAY_LEN_MIN_7200) || (input_len > max_len)) return (PARSER_GLOBAL_LENGTH);
13014
13015 if (memcmp (SIGNATURE_SHA512GRUB, input_buf, 19)) return (PARSER_SIGNATURE_UNMATCHED);
13016
13017 u64 *digest = (u64 *) hash_buf->digest;
13018
13019 salt_t *salt = hash_buf->salt;
13020
13021 pbkdf2_sha512_t *pbkdf2_sha512 = (pbkdf2_sha512_t *) hash_buf->esalt;
13022
13023 char *iter_pos = input_buf + 19;
13024
13025 char *salt_pos = strchr (iter_pos, '.');
13026
13027 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13028
13029 salt_pos++;
13030
13031 char *hash_pos = strchr (salt_pos, '.');
13032
13033 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13034
13035 if (((input_len - (hash_pos - input_buf) - 1) % 128) != 0) return (PARSER_GLOBAL_LENGTH);
13036
13037 hash_pos++;
13038
13039 digest[0] = hex_to_u64 ((const u8 *) &hash_pos[ 0]);
13040 digest[1] = hex_to_u64 ((const u8 *) &hash_pos[ 16]);
13041 digest[2] = hex_to_u64 ((const u8 *) &hash_pos[ 32]);
13042 digest[3] = hex_to_u64 ((const u8 *) &hash_pos[ 48]);
13043 digest[4] = hex_to_u64 ((const u8 *) &hash_pos[ 64]);
13044 digest[5] = hex_to_u64 ((const u8 *) &hash_pos[ 80]);
13045 digest[6] = hex_to_u64 ((const u8 *) &hash_pos[ 96]);
13046 digest[7] = hex_to_u64 ((const u8 *) &hash_pos[112]);
13047
13048 uint salt_len = hash_pos - salt_pos - 1;
13049
13050 salt_len /= 2;
13051
13052 char *salt_buf_ptr = (char *) pbkdf2_sha512->salt_buf;
13053
13054 uint i;
13055
13056 for (i = 0; i < salt_len; i++)
13057 {
13058 salt_buf_ptr[i] = hex_to_u8 ((const u8 *) &salt_pos[i * 2]);
13059 }
13060
13061 salt_buf_ptr[salt_len + 3] = 0x01;
13062 salt_buf_ptr[salt_len + 4] = 0x80;
13063
13064 salt->salt_buf[0] = pbkdf2_sha512->salt_buf[0];
13065
13066 salt->salt_len = salt_len;
13067
13068 salt->salt_iter = atoi (iter_pos) - 1;
13069
13070 return (PARSER_OK);
13071 }
13072
13073 int sha512b64s_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13074 {
13075 if ((input_len < DISPLAY_LEN_MIN_1711) || (input_len > DISPLAY_LEN_MAX_1711)) return (PARSER_GLOBAL_LENGTH);
13076
13077 if (memcmp (SIGNATURE_SHA512B64S, input_buf, 9)) return (PARSER_SIGNATURE_UNMATCHED);
13078
13079 u64 *digest = (u64 *) hash_buf->digest;
13080
13081 salt_t *salt = hash_buf->salt;
13082
13083 u8 tmp_buf[120] = { 0 };
13084
13085 int tmp_len = base64_decode (base64_to_int, (const u8 *) input_buf + 9, input_len - 9, tmp_buf);
13086
13087 memcpy (digest, tmp_buf, 64);
13088
13089 digest[0] = byte_swap_64 (digest[0]);
13090 digest[1] = byte_swap_64 (digest[1]);
13091 digest[2] = byte_swap_64 (digest[2]);
13092 digest[3] = byte_swap_64 (digest[3]);
13093 digest[4] = byte_swap_64 (digest[4]);
13094 digest[5] = byte_swap_64 (digest[5]);
13095 digest[6] = byte_swap_64 (digest[6]);
13096 digest[7] = byte_swap_64 (digest[7]);
13097
13098 digest[0] -= SHA512M_A;
13099 digest[1] -= SHA512M_B;
13100 digest[2] -= SHA512M_C;
13101 digest[3] -= SHA512M_D;
13102 digest[4] -= SHA512M_E;
13103 digest[5] -= SHA512M_F;
13104 digest[6] -= SHA512M_G;
13105 digest[7] -= SHA512M_H;
13106
13107 salt->salt_len = tmp_len - 64;
13108
13109 memcpy (salt->salt_buf, tmp_buf + 64, salt->salt_len);
13110
13111 if (data.opts_type & OPTS_TYPE_ST_ADD80)
13112 {
13113 char *ptr = (char *) salt->salt_buf;
13114
13115 ptr[salt->salt_len] = 0x80;
13116 }
13117
13118 return (PARSER_OK);
13119 }
13120
13121 int hmacmd5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13122 {
13123 if (data.opts_type & OPTS_TYPE_ST_HEX)
13124 {
13125 if ((input_len < DISPLAY_LEN_MIN_50H) || (input_len > DISPLAY_LEN_MAX_50H)) return (PARSER_GLOBAL_LENGTH);
13126 }
13127 else
13128 {
13129 if ((input_len < DISPLAY_LEN_MIN_50) || (input_len > DISPLAY_LEN_MAX_50)) return (PARSER_GLOBAL_LENGTH);
13130 }
13131
13132 u32 *digest = (u32 *) hash_buf->digest;
13133
13134 salt_t *salt = hash_buf->salt;
13135
13136 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
13137 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
13138 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
13139 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
13140
13141 digest[0] = byte_swap_32 (digest[0]);
13142 digest[1] = byte_swap_32 (digest[1]);
13143 digest[2] = byte_swap_32 (digest[2]);
13144 digest[3] = byte_swap_32 (digest[3]);
13145
13146 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13147
13148 uint salt_len = input_len - 32 - 1;
13149
13150 char *salt_buf = input_buf + 32 + 1;
13151
13152 char *salt_buf_ptr = (char *) salt->salt_buf;
13153
13154 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
13155
13156 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13157
13158 salt->salt_len = salt_len;
13159
13160 return (PARSER_OK);
13161 }
13162
13163 int hmacsha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13164 {
13165 if (data.opts_type & OPTS_TYPE_ST_HEX)
13166 {
13167 if ((input_len < DISPLAY_LEN_MIN_150H) || (input_len > DISPLAY_LEN_MAX_150H)) return (PARSER_GLOBAL_LENGTH);
13168 }
13169 else
13170 {
13171 if ((input_len < DISPLAY_LEN_MIN_150) || (input_len > DISPLAY_LEN_MAX_150)) return (PARSER_GLOBAL_LENGTH);
13172 }
13173
13174 u32 *digest = (u32 *) hash_buf->digest;
13175
13176 salt_t *salt = hash_buf->salt;
13177
13178 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
13179 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
13180 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
13181 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
13182 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
13183
13184 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13185
13186 uint salt_len = input_len - 40 - 1;
13187
13188 char *salt_buf = input_buf + 40 + 1;
13189
13190 char *salt_buf_ptr = (char *) salt->salt_buf;
13191
13192 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
13193
13194 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13195
13196 salt->salt_len = salt_len;
13197
13198 return (PARSER_OK);
13199 }
13200
13201 int hmacsha256_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13202 {
13203 if (data.opts_type & OPTS_TYPE_ST_HEX)
13204 {
13205 if ((input_len < DISPLAY_LEN_MIN_1450H) || (input_len > DISPLAY_LEN_MAX_1450H)) return (PARSER_GLOBAL_LENGTH);
13206 }
13207 else
13208 {
13209 if ((input_len < DISPLAY_LEN_MIN_1450) || (input_len > DISPLAY_LEN_MAX_1450)) return (PARSER_GLOBAL_LENGTH);
13210 }
13211
13212 u32 *digest = (u32 *) hash_buf->digest;
13213
13214 salt_t *salt = hash_buf->salt;
13215
13216 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
13217 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
13218 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
13219 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
13220 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
13221 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
13222 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
13223 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
13224
13225 if (input_buf[64] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13226
13227 uint salt_len = input_len - 64 - 1;
13228
13229 char *salt_buf = input_buf + 64 + 1;
13230
13231 char *salt_buf_ptr = (char *) salt->salt_buf;
13232
13233 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
13234
13235 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13236
13237 salt->salt_len = salt_len;
13238
13239 return (PARSER_OK);
13240 }
13241
13242 int hmacsha512_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13243 {
13244 if (data.opts_type & OPTS_TYPE_ST_HEX)
13245 {
13246 if ((input_len < DISPLAY_LEN_MIN_1750H) || (input_len > DISPLAY_LEN_MAX_1750H)) return (PARSER_GLOBAL_LENGTH);
13247 }
13248 else
13249 {
13250 if ((input_len < DISPLAY_LEN_MIN_1750) || (input_len > DISPLAY_LEN_MAX_1750)) return (PARSER_GLOBAL_LENGTH);
13251 }
13252
13253 u64 *digest = (u64 *) hash_buf->digest;
13254
13255 salt_t *salt = hash_buf->salt;
13256
13257 digest[0] = hex_to_u64 ((const u8 *) &input_buf[ 0]);
13258 digest[1] = hex_to_u64 ((const u8 *) &input_buf[ 16]);
13259 digest[2] = hex_to_u64 ((const u8 *) &input_buf[ 32]);
13260 digest[3] = hex_to_u64 ((const u8 *) &input_buf[ 48]);
13261 digest[4] = hex_to_u64 ((const u8 *) &input_buf[ 64]);
13262 digest[5] = hex_to_u64 ((const u8 *) &input_buf[ 80]);
13263 digest[6] = hex_to_u64 ((const u8 *) &input_buf[ 96]);
13264 digest[7] = hex_to_u64 ((const u8 *) &input_buf[112]);
13265
13266 if (input_buf[128] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13267
13268 uint salt_len = input_len - 128 - 1;
13269
13270 char *salt_buf = input_buf + 128 + 1;
13271
13272 char *salt_buf_ptr = (char *) salt->salt_buf;
13273
13274 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
13275
13276 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13277
13278 salt->salt_len = salt_len;
13279
13280 return (PARSER_OK);
13281 }
13282
13283 int krb5pa_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13284 {
13285 if ((input_len < DISPLAY_LEN_MIN_7500) || (input_len > DISPLAY_LEN_MAX_7500)) return (PARSER_GLOBAL_LENGTH);
13286
13287 if (memcmp (SIGNATURE_KRB5PA, input_buf, 10)) return (PARSER_SIGNATURE_UNMATCHED);
13288
13289 u32 *digest = (u32 *) hash_buf->digest;
13290
13291 salt_t *salt = hash_buf->salt;
13292
13293 krb5pa_t *krb5pa = (krb5pa_t *) hash_buf->esalt;
13294
13295 /**
13296 * parse line
13297 */
13298
13299 char *user_pos = input_buf + 10 + 1;
13300
13301 char *realm_pos = strchr (user_pos, '$');
13302
13303 if (realm_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13304
13305 uint user_len = realm_pos - user_pos;
13306
13307 if (user_len >= 64) return (PARSER_SALT_LENGTH);
13308
13309 realm_pos++;
13310
13311 char *salt_pos = strchr (realm_pos, '$');
13312
13313 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13314
13315 uint realm_len = salt_pos - realm_pos;
13316
13317 if (realm_len >= 64) return (PARSER_SALT_LENGTH);
13318
13319 salt_pos++;
13320
13321 char *data_pos = strchr (salt_pos, '$');
13322
13323 if (data_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13324
13325 uint salt_len = data_pos - salt_pos;
13326
13327 if (salt_len >= 128) return (PARSER_SALT_LENGTH);
13328
13329 data_pos++;
13330
13331 uint data_len = input_len - 10 - 1 - user_len - 1 - realm_len - 1 - salt_len - 1;
13332
13333 if (data_len != ((36 + 16) * 2)) return (PARSER_SALT_LENGTH);
13334
13335 /**
13336 * copy data
13337 */
13338
13339 memcpy (krb5pa->user, user_pos, user_len);
13340 memcpy (krb5pa->realm, realm_pos, realm_len);
13341 memcpy (krb5pa->salt, salt_pos, salt_len);
13342
13343 char *timestamp_ptr = (char *) krb5pa->timestamp;
13344
13345 for (uint i = 0; i < (36 * 2); i += 2)
13346 {
13347 const char p0 = data_pos[i + 0];
13348 const char p1 = data_pos[i + 1];
13349
13350 *timestamp_ptr++ = hex_convert (p1) << 0
13351 | hex_convert (p0) << 4;
13352 }
13353
13354 char *checksum_ptr = (char *) krb5pa->checksum;
13355
13356 for (uint i = (36 * 2); i < ((36 + 16) * 2); i += 2)
13357 {
13358 const char p0 = data_pos[i + 0];
13359 const char p1 = data_pos[i + 1];
13360
13361 *checksum_ptr++ = hex_convert (p1) << 0
13362 | hex_convert (p0) << 4;
13363 }
13364
13365 /**
13366 * copy some data to generic buffers to make sorting happy
13367 */
13368
13369 salt->salt_buf[0] = krb5pa->timestamp[0];
13370 salt->salt_buf[1] = krb5pa->timestamp[1];
13371 salt->salt_buf[2] = krb5pa->timestamp[2];
13372 salt->salt_buf[3] = krb5pa->timestamp[3];
13373 salt->salt_buf[4] = krb5pa->timestamp[4];
13374 salt->salt_buf[5] = krb5pa->timestamp[5];
13375 salt->salt_buf[6] = krb5pa->timestamp[6];
13376 salt->salt_buf[7] = krb5pa->timestamp[7];
13377 salt->salt_buf[8] = krb5pa->timestamp[8];
13378
13379 salt->salt_len = 36;
13380
13381 digest[0] = krb5pa->checksum[0];
13382 digest[1] = krb5pa->checksum[1];
13383 digest[2] = krb5pa->checksum[2];
13384 digest[3] = krb5pa->checksum[3];
13385
13386 return (PARSER_OK);
13387 }
13388
13389 int sapb_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13390 {
13391 if ((input_len < DISPLAY_LEN_MIN_7700) || (input_len > DISPLAY_LEN_MAX_7700)) return (PARSER_GLOBAL_LENGTH);
13392
13393 u32 *digest = (u32 *) hash_buf->digest;
13394
13395 salt_t *salt = hash_buf->salt;
13396
13397 /**
13398 * parse line
13399 */
13400
13401 char *salt_pos = input_buf;
13402
13403 char *hash_pos = strchr (salt_pos, '$');
13404
13405 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13406
13407 uint salt_len = hash_pos - salt_pos;
13408
13409 if (salt_len >= 40) return (PARSER_SALT_LENGTH);
13410
13411 hash_pos++;
13412
13413 uint hash_len = input_len - 1 - salt_len;
13414
13415 if (hash_len != 16) return (PARSER_HASH_LENGTH);
13416
13417 /**
13418 * valid some data
13419 */
13420
13421 uint user_len = 0;
13422
13423 for (uint i = 0; i < salt_len; i++)
13424 {
13425 if (salt_pos[i] == ' ') continue;
13426
13427 user_len++;
13428 }
13429
13430 // SAP user names cannot be longer than 12 characters
13431 if (user_len > 12) return (PARSER_SALT_LENGTH);
13432
13433 // SAP user name cannot start with ! or ?
13434 if (salt_pos[0] == '!' || salt_pos[0] == '?') return (PARSER_SALT_VALUE);
13435
13436 /**
13437 * copy data
13438 */
13439
13440 char *salt_buf_ptr = (char *) salt->salt_buf;
13441
13442 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
13443
13444 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13445
13446 salt->salt_len = salt_len;
13447
13448 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[0]);
13449 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[8]);
13450 digest[2] = 0;
13451 digest[3] = 0;
13452
13453 digest[0] = byte_swap_32 (digest[0]);
13454 digest[1] = byte_swap_32 (digest[1]);
13455
13456 return (PARSER_OK);
13457 }
13458
13459 int sapg_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13460 {
13461 if ((input_len < DISPLAY_LEN_MIN_7800) || (input_len > DISPLAY_LEN_MAX_7800)) return (PARSER_GLOBAL_LENGTH);
13462
13463 u32 *digest = (u32 *) hash_buf->digest;
13464
13465 salt_t *salt = hash_buf->salt;
13466
13467 /**
13468 * parse line
13469 */
13470
13471 char *salt_pos = input_buf;
13472
13473 char *hash_pos = strchr (salt_pos, '$');
13474
13475 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13476
13477 uint salt_len = hash_pos - salt_pos;
13478
13479 if (salt_len >= 40) return (PARSER_SALT_LENGTH);
13480
13481 hash_pos++;
13482
13483 uint hash_len = input_len - 1 - salt_len;
13484
13485 if (hash_len != 40) return (PARSER_HASH_LENGTH);
13486
13487 /**
13488 * valid some data
13489 */
13490
13491 uint user_len = 0;
13492
13493 for (uint i = 0; i < salt_len; i++)
13494 {
13495 if (salt_pos[i] == ' ') continue;
13496
13497 user_len++;
13498 }
13499
13500 // SAP user names cannot be longer than 12 characters
13501 // this is kinda buggy. if the username is in utf the length can be up to length 12*3
13502 // so far nobody complained so we stay with this because it helps in optimization
13503 // final string can have a max size of 32 (password) + (10 * 5) = lengthMagicArray + 12 (max salt) + 1 (the 0x80)
13504
13505 if (user_len > 12) return (PARSER_SALT_LENGTH);
13506
13507 // SAP user name cannot start with ! or ?
13508 if (salt_pos[0] == '!' || salt_pos[0] == '?') return (PARSER_SALT_VALUE);
13509
13510 /**
13511 * copy data
13512 */
13513
13514 char *salt_buf_ptr = (char *) salt->salt_buf;
13515
13516 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
13517
13518 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13519
13520 salt->salt_len = salt_len;
13521
13522 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
13523 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
13524 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
13525 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
13526 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
13527
13528 return (PARSER_OK);
13529 }
13530
13531 int drupal7_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13532 {
13533 if ((input_len < DISPLAY_LEN_MIN_7900) || (input_len > DISPLAY_LEN_MAX_7900)) return (PARSER_GLOBAL_LENGTH);
13534
13535 if (memcmp (SIGNATURE_DRUPAL7, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
13536
13537 u64 *digest = (u64 *) hash_buf->digest;
13538
13539 salt_t *salt = hash_buf->salt;
13540
13541 char *iter_pos = input_buf + 3;
13542
13543 uint salt_iter = 1 << itoa64_to_int (iter_pos[0]);
13544
13545 if (salt_iter > 0x80000000) return (PARSER_SALT_ITERATION);
13546
13547 memcpy ((char *) salt->salt_sign, input_buf, 4);
13548
13549 salt->salt_iter = salt_iter;
13550
13551 char *salt_pos = iter_pos + 1;
13552
13553 uint salt_len = 8;
13554
13555 memcpy ((char *) salt->salt_buf, salt_pos, salt_len);
13556
13557 salt->salt_len = salt_len;
13558
13559 char *hash_pos = salt_pos + salt_len;
13560
13561 drupal7_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
13562
13563 // ugly hack start
13564
13565 char *tmp = (char *) salt->salt_buf_pc;
13566
13567 tmp[0] = hash_pos[42];
13568
13569 // ugly hack end
13570
13571 digest[ 0] = byte_swap_64 (digest[ 0]);
13572 digest[ 1] = byte_swap_64 (digest[ 1]);
13573 digest[ 2] = byte_swap_64 (digest[ 2]);
13574 digest[ 3] = byte_swap_64 (digest[ 3]);
13575 digest[ 4] = 0;
13576 digest[ 5] = 0;
13577 digest[ 6] = 0;
13578 digest[ 7] = 0;
13579
13580 return (PARSER_OK);
13581 }
13582
13583 int sybasease_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13584 {
13585 if ((input_len < DISPLAY_LEN_MIN_8000) || (input_len > DISPLAY_LEN_MAX_8000)) return (PARSER_GLOBAL_LENGTH);
13586
13587 if (memcmp (SIGNATURE_SYBASEASE, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
13588
13589 u32 *digest = (u32 *) hash_buf->digest;
13590
13591 salt_t *salt = hash_buf->salt;
13592
13593 char *salt_buf = input_buf + 6;
13594
13595 uint salt_len = 16;
13596
13597 char *salt_buf_ptr = (char *) salt->salt_buf;
13598
13599 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
13600
13601 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
13602
13603 salt->salt_len = salt_len;
13604
13605 char *hash_pos = input_buf + 6 + 16;
13606
13607 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
13608 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
13609 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
13610 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
13611 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
13612 digest[5] = hex_to_u32 ((const u8 *) &hash_pos[40]);
13613 digest[6] = hex_to_u32 ((const u8 *) &hash_pos[48]);
13614 digest[7] = hex_to_u32 ((const u8 *) &hash_pos[56]);
13615
13616 return (PARSER_OK);
13617 }
13618
13619 int mysql323_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13620 {
13621 if ((input_len < DISPLAY_LEN_MIN_200) || (input_len > DISPLAY_LEN_MAX_200)) return (PARSER_GLOBAL_LENGTH);
13622
13623 u32 *digest = (u32 *) hash_buf->digest;
13624
13625 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
13626 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
13627 digest[2] = 0;
13628 digest[3] = 0;
13629
13630 return (PARSER_OK);
13631 }
13632
13633 int rakp_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13634 {
13635 if ((input_len < DISPLAY_LEN_MIN_7300) || (input_len > DISPLAY_LEN_MAX_7300)) return (PARSER_GLOBAL_LENGTH);
13636
13637 u32 *digest = (u32 *) hash_buf->digest;
13638
13639 salt_t *salt = hash_buf->salt;
13640
13641 rakp_t *rakp = (rakp_t *) hash_buf->esalt;
13642
13643 char *saltbuf_pos = input_buf;
13644
13645 char *hashbuf_pos = strchr (saltbuf_pos, ':');
13646
13647 if (hashbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13648
13649 uint saltbuf_len = hashbuf_pos - saltbuf_pos;
13650
13651 if (saltbuf_len < 64) return (PARSER_SALT_LENGTH);
13652 if (saltbuf_len > 512) return (PARSER_SALT_LENGTH);
13653
13654 if (saltbuf_len & 1) return (PARSER_SALT_LENGTH); // muss gerade sein wegen hex
13655
13656 hashbuf_pos++;
13657
13658 uint hashbuf_len = input_len - saltbuf_len - 1;
13659
13660 if (hashbuf_len != 40) return (PARSER_HASH_LENGTH);
13661
13662 char *salt_ptr = (char *) saltbuf_pos;
13663 char *rakp_ptr = (char *) rakp->salt_buf;
13664
13665 uint i;
13666 uint j;
13667
13668 for (i = 0, j = 0; i < saltbuf_len; i += 2, j += 1)
13669 {
13670 rakp_ptr[j] = hex_to_u8 ((const u8 *) &salt_ptr[i]);
13671 }
13672
13673 rakp_ptr[j] = 0x80;
13674
13675 rakp->salt_len = j;
13676
13677 for (i = 0; i < 64; i++)
13678 {
13679 rakp->salt_buf[i] = byte_swap_32 (rakp->salt_buf[i]);
13680 }
13681
13682 salt->salt_buf[0] = rakp->salt_buf[0];
13683 salt->salt_buf[1] = rakp->salt_buf[1];
13684 salt->salt_buf[2] = rakp->salt_buf[2];
13685 salt->salt_buf[3] = rakp->salt_buf[3];
13686 salt->salt_buf[4] = rakp->salt_buf[4];
13687 salt->salt_buf[5] = rakp->salt_buf[5];
13688 salt->salt_buf[6] = rakp->salt_buf[6];
13689 salt->salt_buf[7] = rakp->salt_buf[7];
13690
13691 salt->salt_len = 32; // muss min. 32 haben
13692
13693 digest[0] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 0]);
13694 digest[1] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 8]);
13695 digest[2] = hex_to_u32 ((const u8 *) &hashbuf_pos[16]);
13696 digest[3] = hex_to_u32 ((const u8 *) &hashbuf_pos[24]);
13697 digest[4] = hex_to_u32 ((const u8 *) &hashbuf_pos[32]);
13698
13699 return (PARSER_OK);
13700 }
13701
13702 int netscaler_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13703 {
13704 if ((input_len < DISPLAY_LEN_MIN_8100) || (input_len > DISPLAY_LEN_MAX_8100)) return (PARSER_GLOBAL_LENGTH);
13705
13706 u32 *digest = (u32 *) hash_buf->digest;
13707
13708 salt_t *salt = hash_buf->salt;
13709
13710 if (memcmp (SIGNATURE_NETSCALER, input_buf, 1)) return (PARSER_SIGNATURE_UNMATCHED);
13711
13712 char *salt_pos = input_buf + 1;
13713
13714 memcpy (salt->salt_buf, salt_pos, 8);
13715
13716 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
13717 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
13718
13719 salt->salt_len = 8;
13720
13721 char *hash_pos = salt_pos + 8;
13722
13723 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
13724 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
13725 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
13726 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
13727 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
13728
13729 digest[0] -= SHA1M_A;
13730 digest[1] -= SHA1M_B;
13731 digest[2] -= SHA1M_C;
13732 digest[3] -= SHA1M_D;
13733 digest[4] -= SHA1M_E;
13734
13735 return (PARSER_OK);
13736 }
13737
13738 int chap_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13739 {
13740 if ((input_len < DISPLAY_LEN_MIN_4800) || (input_len > DISPLAY_LEN_MAX_4800)) return (PARSER_GLOBAL_LENGTH);
13741
13742 u32 *digest = (u32 *) hash_buf->digest;
13743
13744 salt_t *salt = hash_buf->salt;
13745
13746 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
13747 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
13748 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
13749 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
13750
13751 digest[0] = byte_swap_32 (digest[0]);
13752 digest[1] = byte_swap_32 (digest[1]);
13753 digest[2] = byte_swap_32 (digest[2]);
13754 digest[3] = byte_swap_32 (digest[3]);
13755
13756 digest[0] -= MD5M_A;
13757 digest[1] -= MD5M_B;
13758 digest[2] -= MD5M_C;
13759 digest[3] -= MD5M_D;
13760
13761 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13762
13763 char *salt_buf_ptr = input_buf + 32 + 1;
13764
13765 u32 *salt_buf = salt->salt_buf;
13766
13767 salt_buf[0] = hex_to_u32 ((const u8 *) &salt_buf_ptr[ 0]);
13768 salt_buf[1] = hex_to_u32 ((const u8 *) &salt_buf_ptr[ 8]);
13769 salt_buf[2] = hex_to_u32 ((const u8 *) &salt_buf_ptr[16]);
13770 salt_buf[3] = hex_to_u32 ((const u8 *) &salt_buf_ptr[24]);
13771
13772 salt_buf[0] = byte_swap_32 (salt_buf[0]);
13773 salt_buf[1] = byte_swap_32 (salt_buf[1]);
13774 salt_buf[2] = byte_swap_32 (salt_buf[2]);
13775 salt_buf[3] = byte_swap_32 (salt_buf[3]);
13776
13777 salt->salt_len = 16 + 1;
13778
13779 if (input_buf[65] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
13780
13781 char *idbyte_buf_ptr = input_buf + 32 + 1 + 32 + 1;
13782
13783 salt_buf[4] = hex_to_u8 ((const u8 *) &idbyte_buf_ptr[0]) & 0xff;
13784
13785 return (PARSER_OK);
13786 }
13787
13788 int cloudkey_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13789 {
13790 if ((input_len < DISPLAY_LEN_MIN_8200) || (input_len > DISPLAY_LEN_MAX_8200)) return (PARSER_GLOBAL_LENGTH);
13791
13792 u32 *digest = (u32 *) hash_buf->digest;
13793
13794 salt_t *salt = hash_buf->salt;
13795
13796 cloudkey_t *cloudkey = (cloudkey_t *) hash_buf->esalt;
13797
13798 /**
13799 * parse line
13800 */
13801
13802 char *hashbuf_pos = input_buf;
13803
13804 char *saltbuf_pos = strchr (hashbuf_pos, ':');
13805
13806 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13807
13808 const uint hashbuf_len = saltbuf_pos - hashbuf_pos;
13809
13810 if (hashbuf_len != 64) return (PARSER_HASH_LENGTH);
13811
13812 saltbuf_pos++;
13813
13814 char *iteration_pos = strchr (saltbuf_pos, ':');
13815
13816 if (iteration_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13817
13818 const uint saltbuf_len = iteration_pos - saltbuf_pos;
13819
13820 if (saltbuf_len != 32) return (PARSER_SALT_LENGTH);
13821
13822 iteration_pos++;
13823
13824 char *databuf_pos = strchr (iteration_pos, ':');
13825
13826 if (databuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13827
13828 const uint iteration_len = databuf_pos - iteration_pos;
13829
13830 if (iteration_len < 1) return (PARSER_SALT_ITERATION);
13831 if (iteration_len > 8) return (PARSER_SALT_ITERATION);
13832
13833 const uint databuf_len = input_len - hashbuf_len - 1 - saltbuf_len - 1 - iteration_len - 1;
13834
13835 if (databuf_len < 1) return (PARSER_SALT_LENGTH);
13836 if (databuf_len > 2048) return (PARSER_SALT_LENGTH);
13837
13838 databuf_pos++;
13839
13840 // digest
13841
13842 digest[0] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 0]);
13843 digest[1] = hex_to_u32 ((const u8 *) &hashbuf_pos[ 8]);
13844 digest[2] = hex_to_u32 ((const u8 *) &hashbuf_pos[16]);
13845 digest[3] = hex_to_u32 ((const u8 *) &hashbuf_pos[24]);
13846 digest[4] = hex_to_u32 ((const u8 *) &hashbuf_pos[32]);
13847 digest[5] = hex_to_u32 ((const u8 *) &hashbuf_pos[40]);
13848 digest[6] = hex_to_u32 ((const u8 *) &hashbuf_pos[48]);
13849 digest[7] = hex_to_u32 ((const u8 *) &hashbuf_pos[56]);
13850
13851 // salt
13852
13853 char *saltbuf_ptr = (char *) salt->salt_buf;
13854
13855 for (uint i = 0; i < saltbuf_len; i += 2)
13856 {
13857 const char p0 = saltbuf_pos[i + 0];
13858 const char p1 = saltbuf_pos[i + 1];
13859
13860 *saltbuf_ptr++ = hex_convert (p1) << 0
13861 | hex_convert (p0) << 4;
13862 }
13863
13864 salt->salt_buf[4] = 0x01000000;
13865 salt->salt_buf[5] = 0x80;
13866
13867 salt->salt_len = saltbuf_len / 2;
13868
13869 // iteration
13870
13871 salt->salt_iter = atoi (iteration_pos) - 1;
13872
13873 // data
13874
13875 char *databuf_ptr = (char *) cloudkey->data_buf;
13876
13877 for (uint i = 0; i < databuf_len; i += 2)
13878 {
13879 const char p0 = databuf_pos[i + 0];
13880 const char p1 = databuf_pos[i + 1];
13881
13882 *databuf_ptr++ = hex_convert (p1) << 0
13883 | hex_convert (p0) << 4;
13884 }
13885
13886 *databuf_ptr++ = 0x80;
13887
13888 for (uint i = 0; i < 512; i++)
13889 {
13890 cloudkey->data_buf[i] = byte_swap_32 (cloudkey->data_buf[i]);
13891 }
13892
13893 cloudkey->data_len = databuf_len / 2;
13894
13895 return (PARSER_OK);
13896 }
13897
13898 int nsec3_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
13899 {
13900 if ((input_len < DISPLAY_LEN_MIN_8300) || (input_len > DISPLAY_LEN_MAX_8300)) return (PARSER_GLOBAL_LENGTH);
13901
13902 u32 *digest = (u32 *) hash_buf->digest;
13903
13904 salt_t *salt = hash_buf->salt;
13905
13906 /**
13907 * parse line
13908 */
13909
13910 char *hashbuf_pos = input_buf;
13911
13912 char *domainbuf_pos = strchr (hashbuf_pos, ':');
13913
13914 if (domainbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13915
13916 const uint hashbuf_len = domainbuf_pos - hashbuf_pos;
13917
13918 if (hashbuf_len != 32) return (PARSER_HASH_LENGTH);
13919
13920 domainbuf_pos++;
13921
13922 if (domainbuf_pos[0] != '.') return (PARSER_SALT_VALUE);
13923
13924 char *saltbuf_pos = strchr (domainbuf_pos, ':');
13925
13926 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13927
13928 const uint domainbuf_len = saltbuf_pos - domainbuf_pos;
13929
13930 if (domainbuf_len >= 32) return (PARSER_SALT_LENGTH);
13931
13932 saltbuf_pos++;
13933
13934 char *iteration_pos = strchr (saltbuf_pos, ':');
13935
13936 if (iteration_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
13937
13938 const uint saltbuf_len = iteration_pos - saltbuf_pos;
13939
13940 if (saltbuf_len >= 28) return (PARSER_SALT_LENGTH); // 28 = 32 - 4; 4 = length
13941
13942 if ((domainbuf_len + saltbuf_len) >= 48) return (PARSER_SALT_LENGTH);
13943
13944 iteration_pos++;
13945
13946 const uint iteration_len = input_len - hashbuf_len - 1 - domainbuf_len - 1 - saltbuf_len - 1;
13947
13948 if (iteration_len < 1) return (PARSER_SALT_ITERATION);
13949 if (iteration_len > 5) return (PARSER_SALT_ITERATION);
13950
13951 // ok, the plan for this algorithm is the following:
13952 // we have 2 salts here, the domain-name and a random salt
13953 // while both are used in the initial transformation,
13954 // only the random salt is used in the following iterations
13955 // so we create two buffer, one that includes domain-name (stored into salt_buf_pc[])
13956 // and one that includes only the real salt (stored into salt_buf[]).
13957 // the domain-name length is put into array position 7 of salt_buf_pc[] since there is not salt_pc_len
13958
13959 u8 tmp_buf[100] = { 0 };
13960
13961 base32_decode (itoa32_to_int, (const u8 *) hashbuf_pos, 32, tmp_buf);
13962
13963 memcpy (digest, tmp_buf, 20);
13964
13965 digest[0] = byte_swap_32 (digest[0]);
13966 digest[1] = byte_swap_32 (digest[1]);
13967 digest[2] = byte_swap_32 (digest[2]);
13968 digest[3] = byte_swap_32 (digest[3]);
13969 digest[4] = byte_swap_32 (digest[4]);
13970
13971 // domain
13972
13973 char *salt_buf_pc_ptr = (char *) salt->salt_buf_pc;
13974
13975 memcpy (salt_buf_pc_ptr, domainbuf_pos, domainbuf_len);
13976
13977 char *len_ptr = NULL;
13978
13979 for (uint i = 0; i < domainbuf_len; i++)
13980 {
13981 if (salt_buf_pc_ptr[i] == '.')
13982 {
13983 len_ptr = &salt_buf_pc_ptr[i];
13984
13985 *len_ptr = 0;
13986 }
13987 else
13988 {
13989 *len_ptr += 1;
13990 }
13991 }
13992
13993 salt->salt_buf_pc[7] = domainbuf_len;
13994
13995 // "real" salt
13996
13997 char *salt_buf_ptr = (char *) salt->salt_buf;
13998
13999 const uint salt_len = parse_and_store_salt (salt_buf_ptr, saltbuf_pos, saltbuf_len);
14000
14001 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14002
14003 salt->salt_len = salt_len;
14004
14005 // iteration
14006
14007 salt->salt_iter = atoi (iteration_pos);
14008
14009 return (PARSER_OK);
14010 }
14011
14012 int wbb3_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14013 {
14014 if ((input_len < DISPLAY_LEN_MIN_8400) || (input_len > DISPLAY_LEN_MAX_8400)) return (PARSER_GLOBAL_LENGTH);
14015
14016 u32 *digest = (u32 *) hash_buf->digest;
14017
14018 salt_t *salt = hash_buf->salt;
14019
14020 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
14021 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
14022 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
14023 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
14024 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
14025
14026 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
14027
14028 uint salt_len = input_len - 40 - 1;
14029
14030 char *salt_buf = input_buf + 40 + 1;
14031
14032 char *salt_buf_ptr = (char *) salt->salt_buf;
14033
14034 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
14035
14036 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14037
14038 salt->salt_len = salt_len;
14039
14040 return (PARSER_OK);
14041 }
14042
14043 int racf_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14044 {
14045 const u8 ascii_to_ebcdic[] =
14046 {
14047 0x00, 0x01, 0x02, 0x03, 0x37, 0x2d, 0x2e, 0x2f, 0x16, 0x05, 0x25, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f,
14048 0x10, 0x11, 0x12, 0x13, 0x3c, 0x3d, 0x32, 0x26, 0x18, 0x19, 0x3f, 0x27, 0x1c, 0x1d, 0x1e, 0x1f,
14049 0x40, 0x4f, 0x7f, 0x7b, 0x5b, 0x6c, 0x50, 0x7d, 0x4d, 0x5d, 0x5c, 0x4e, 0x6b, 0x60, 0x4b, 0x61,
14050 0xf0, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7, 0xf8, 0xf9, 0x7a, 0x5e, 0x4c, 0x7e, 0x6e, 0x6f,
14051 0x7c, 0xc1, 0xc2, 0xc3, 0xc4, 0xc5, 0xc6, 0xc7, 0xc8, 0xc9, 0xd1, 0xd2, 0xd3, 0xd4, 0xd5, 0xd6,
14052 0xd7, 0xd8, 0xd9, 0xe2, 0xe3, 0xe4, 0xe5, 0xe6, 0xe7, 0xe8, 0xe9, 0x4a, 0xe0, 0x5a, 0x5f, 0x6d,
14053 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96,
14054 0x97, 0x98, 0x99, 0xa2, 0xa3, 0xa4, 0xa5, 0xa6, 0xa7, 0xa8, 0xa9, 0xc0, 0x6a, 0xd0, 0xa1, 0x07,
14055 0x20, 0x21, 0x22, 0x23, 0x24, 0x15, 0x06, 0x17, 0x28, 0x29, 0x2a, 0x2b, 0x2c, 0x09, 0x0a, 0x1b,
14056 0x30, 0x31, 0x1a, 0x33, 0x34, 0x35, 0x36, 0x08, 0x38, 0x39, 0x3a, 0x3b, 0x04, 0x14, 0x3e, 0xe1,
14057 0x41, 0x42, 0x43, 0x44, 0x45, 0x46, 0x47, 0x48, 0x49, 0x51, 0x52, 0x53, 0x54, 0x55, 0x56, 0x57,
14058 0x58, 0x59, 0x62, 0x63, 0x64, 0x65, 0x66, 0x67, 0x68, 0x69, 0x70, 0x71, 0x72, 0x73, 0x74, 0x75,
14059 0x76, 0x77, 0x78, 0x80, 0x8a, 0x8b, 0x8c, 0x8d, 0x8e, 0x8f, 0x90, 0x9a, 0x9b, 0x9c, 0x9d, 0x9e,
14060 0x9f, 0xa0, 0xaa, 0xab, 0xac, 0xad, 0xae, 0xaf, 0xb0, 0xb1, 0xb2, 0xb3, 0xb4, 0xb5, 0xb6, 0xb7,
14061 0xb8, 0xb9, 0xba, 0xbb, 0xbc, 0xbd, 0xbe, 0xbf, 0xca, 0xcb, 0xcc, 0xcd, 0xce, 0xcf, 0xda, 0xdb,
14062 0xdc, 0xdd, 0xde, 0xdf, 0xea, 0xeb, 0xec, 0xed, 0xee, 0xef, 0xfa, 0xfb, 0xfc, 0xfd, 0xfe, 0xff,
14063 };
14064
14065 if ((input_len < DISPLAY_LEN_MIN_8500) || (input_len > DISPLAY_LEN_MAX_8500)) return (PARSER_GLOBAL_LENGTH);
14066
14067 if (memcmp (SIGNATURE_RACF, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
14068
14069 u32 *digest = (u32 *) hash_buf->digest;
14070
14071 salt_t *salt = hash_buf->salt;
14072
14073 char *salt_pos = input_buf + 6 + 1;
14074
14075 char *digest_pos = strchr (salt_pos, '*');
14076
14077 if (digest_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14078
14079 uint salt_len = digest_pos - salt_pos;
14080
14081 if (salt_len > 8) return (PARSER_SALT_LENGTH);
14082
14083 uint hash_len = input_len - 1 - salt_len - 1 - 6;
14084
14085 if (hash_len != 16) return (PARSER_HASH_LENGTH);
14086
14087 digest_pos++;
14088
14089 char *salt_buf_ptr = (char *) salt->salt_buf;
14090 char *salt_buf_pc_ptr = (char *) salt->salt_buf_pc;
14091
14092 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
14093
14094 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14095
14096 salt->salt_len = salt_len;
14097
14098 for (uint i = 0; i < salt_len; i++)
14099 {
14100 salt_buf_pc_ptr[i] = ascii_to_ebcdic[(int) salt_buf_ptr[i]];
14101 }
14102 for (uint i = salt_len; i < 8; i++)
14103 {
14104 salt_buf_pc_ptr[i] = 0x40;
14105 }
14106
14107 uint tt;
14108
14109 IP (salt->salt_buf_pc[0], salt->salt_buf_pc[1], tt);
14110
14111 salt->salt_buf_pc[0] = rotl32 (salt->salt_buf_pc[0], 3u);
14112 salt->salt_buf_pc[1] = rotl32 (salt->salt_buf_pc[1], 3u);
14113
14114 digest[0] = hex_to_u32 ((const u8 *) &digest_pos[ 0]);
14115 digest[1] = hex_to_u32 ((const u8 *) &digest_pos[ 8]);
14116
14117 digest[0] = byte_swap_32 (digest[0]);
14118 digest[1] = byte_swap_32 (digest[1]);
14119
14120 IP (digest[0], digest[1], tt);
14121
14122 digest[0] = rotr32 (digest[0], 29);
14123 digest[1] = rotr32 (digest[1], 29);
14124 digest[2] = 0;
14125 digest[3] = 0;
14126
14127 return (PARSER_OK);
14128 }
14129
14130 int lotus5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14131 {
14132 if ((input_len < DISPLAY_LEN_MIN_8600) || (input_len > DISPLAY_LEN_MAX_8600)) return (PARSER_GLOBAL_LENGTH);
14133
14134 u32 *digest = (u32 *) hash_buf->digest;
14135
14136 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
14137 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
14138 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
14139 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
14140
14141 digest[0] = byte_swap_32 (digest[0]);
14142 digest[1] = byte_swap_32 (digest[1]);
14143 digest[2] = byte_swap_32 (digest[2]);
14144 digest[3] = byte_swap_32 (digest[3]);
14145
14146 return (PARSER_OK);
14147 }
14148
14149 int lotus6_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14150 {
14151 if ((input_len < DISPLAY_LEN_MIN_8700) || (input_len > DISPLAY_LEN_MAX_8700)) return (PARSER_GLOBAL_LENGTH);
14152
14153 if ((input_buf[0] != '(') || (input_buf[1] != 'G') || (input_buf[21] != ')')) return (PARSER_SIGNATURE_UNMATCHED);
14154
14155 u32 *digest = (u32 *) hash_buf->digest;
14156
14157 salt_t *salt = hash_buf->salt;
14158
14159 u8 tmp_buf[120] = { 0 };
14160
14161 base64_decode (lotus64_to_int, (const u8 *) input_buf + 2, input_len - 3, tmp_buf);
14162
14163 tmp_buf[3] += -4; // dont ask!
14164
14165 memcpy (salt->salt_buf, tmp_buf, 5);
14166
14167 salt->salt_len = 5;
14168
14169 memcpy (digest, tmp_buf + 5, 9);
14170
14171 // yes, only 9 byte are needed to crack, but 10 to display
14172
14173 salt->salt_buf_pc[7] = input_buf[20];
14174
14175 return (PARSER_OK);
14176 }
14177
14178 int lotus8_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14179 {
14180 if ((input_len < DISPLAY_LEN_MIN_9100) || (input_len > DISPLAY_LEN_MAX_9100)) return (PARSER_GLOBAL_LENGTH);
14181
14182 if ((input_buf[0] != '(') || (input_buf[1] != 'H') || (input_buf[DISPLAY_LEN_MAX_9100 - 1] != ')')) return (PARSER_SIGNATURE_UNMATCHED);
14183
14184 u32 *digest = (u32 *) hash_buf->digest;
14185
14186 salt_t *salt = hash_buf->salt;
14187
14188 u8 tmp_buf[120] = { 0 };
14189
14190 base64_decode (lotus64_to_int, (const u8 *) input_buf + 2, input_len - 3, tmp_buf);
14191
14192 tmp_buf[3] += -4; // dont ask!
14193
14194 // salt
14195
14196 memcpy (salt->salt_buf, tmp_buf, 16);
14197
14198 salt->salt_len = 16; // Attention: in theory we have 2 salt_len, one for the -m 8700 part (len: 8), 2nd for the 9100 part (len: 16)
14199
14200 // iteration
14201
14202 char tmp_iter_buf[11] = { 0 };
14203
14204 memcpy (tmp_iter_buf, tmp_buf + 16, 10);
14205
14206 tmp_iter_buf[10] = 0;
14207
14208 salt->salt_iter = atoi (tmp_iter_buf);
14209
14210 if (salt->salt_iter < 1) // well, the limit hopefully is much higher
14211 {
14212 return (PARSER_SALT_ITERATION);
14213 }
14214
14215 salt->salt_iter--; // first round in init
14216
14217 // 2 additional bytes for display only
14218
14219 salt->salt_buf_pc[0] = tmp_buf[26];
14220 salt->salt_buf_pc[1] = tmp_buf[27];
14221
14222 // digest
14223
14224 memcpy (digest, tmp_buf + 28, 8);
14225
14226 digest[0] = byte_swap_32 (digest[0]);
14227 digest[1] = byte_swap_32 (digest[1]);
14228 digest[2] = 0;
14229 digest[3] = 0;
14230
14231 return (PARSER_OK);
14232 }
14233
14234 int hmailserver_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14235 {
14236 if ((input_len < DISPLAY_LEN_MIN_1421) || (input_len > DISPLAY_LEN_MAX_1421)) return (PARSER_GLOBAL_LENGTH);
14237
14238 u32 *digest = (u32 *) hash_buf->digest;
14239
14240 salt_t *salt = hash_buf->salt;
14241
14242 char *salt_buf_pos = input_buf;
14243
14244 char *hash_buf_pos = salt_buf_pos + 6;
14245
14246 digest[0] = hex_to_u32 ((const u8 *) &hash_buf_pos[ 0]);
14247 digest[1] = hex_to_u32 ((const u8 *) &hash_buf_pos[ 8]);
14248 digest[2] = hex_to_u32 ((const u8 *) &hash_buf_pos[16]);
14249 digest[3] = hex_to_u32 ((const u8 *) &hash_buf_pos[24]);
14250 digest[4] = hex_to_u32 ((const u8 *) &hash_buf_pos[32]);
14251 digest[5] = hex_to_u32 ((const u8 *) &hash_buf_pos[40]);
14252 digest[6] = hex_to_u32 ((const u8 *) &hash_buf_pos[48]);
14253 digest[7] = hex_to_u32 ((const u8 *) &hash_buf_pos[56]);
14254
14255 digest[0] -= SHA256M_A;
14256 digest[1] -= SHA256M_B;
14257 digest[2] -= SHA256M_C;
14258 digest[3] -= SHA256M_D;
14259 digest[4] -= SHA256M_E;
14260 digest[5] -= SHA256M_F;
14261 digest[6] -= SHA256M_G;
14262 digest[7] -= SHA256M_H;
14263
14264 char *salt_buf_ptr = (char *) salt->salt_buf;
14265
14266 const uint salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf_pos, 6);
14267
14268 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14269
14270 salt->salt_len = salt_len;
14271
14272 return (PARSER_OK);
14273 }
14274
14275 int phps_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14276 {
14277 if ((input_len < DISPLAY_LEN_MIN_2612) || (input_len > DISPLAY_LEN_MAX_2612)) return (PARSER_GLOBAL_LENGTH);
14278
14279 u32 *digest = (u32 *) hash_buf->digest;
14280
14281 if (memcmp (SIGNATURE_PHPS, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
14282
14283 salt_t *salt = hash_buf->salt;
14284
14285 char *salt_buf = input_buf + 6;
14286
14287 char *digest_buf = strchr (salt_buf, '$');
14288
14289 if (digest_buf == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14290
14291 uint salt_len = digest_buf - salt_buf;
14292
14293 digest_buf++; // skip the '$' symbol
14294
14295 char *salt_buf_ptr = (char *) salt->salt_buf;
14296
14297 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
14298
14299 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14300
14301 salt->salt_len = salt_len;
14302
14303 digest[0] = hex_to_u32 ((const u8 *) &digest_buf[ 0]);
14304 digest[1] = hex_to_u32 ((const u8 *) &digest_buf[ 8]);
14305 digest[2] = hex_to_u32 ((const u8 *) &digest_buf[16]);
14306 digest[3] = hex_to_u32 ((const u8 *) &digest_buf[24]);
14307
14308 digest[0] = byte_swap_32 (digest[0]);
14309 digest[1] = byte_swap_32 (digest[1]);
14310 digest[2] = byte_swap_32 (digest[2]);
14311 digest[3] = byte_swap_32 (digest[3]);
14312
14313 digest[0] -= MD5M_A;
14314 digest[1] -= MD5M_B;
14315 digest[2] -= MD5M_C;
14316 digest[3] -= MD5M_D;
14317
14318 return (PARSER_OK);
14319 }
14320
14321 int mediawiki_b_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14322 {
14323 if ((input_len < DISPLAY_LEN_MIN_3711) || (input_len > DISPLAY_LEN_MAX_3711)) return (PARSER_GLOBAL_LENGTH);
14324
14325 if (memcmp (SIGNATURE_MEDIAWIKI_B, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
14326
14327 u32 *digest = (u32 *) hash_buf->digest;
14328
14329 salt_t *salt = hash_buf->salt;
14330
14331 char *salt_buf = input_buf + 3;
14332
14333 char *digest_buf = strchr (salt_buf, '$');
14334
14335 if (digest_buf == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14336
14337 uint salt_len = digest_buf - salt_buf;
14338
14339 digest_buf++; // skip the '$' symbol
14340
14341 char *salt_buf_ptr = (char *) salt->salt_buf;
14342
14343 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
14344
14345 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14346
14347 salt_buf_ptr[salt_len] = 0x2d;
14348
14349 salt->salt_len = salt_len + 1;
14350
14351 digest[0] = hex_to_u32 ((const u8 *) &digest_buf[ 0]);
14352 digest[1] = hex_to_u32 ((const u8 *) &digest_buf[ 8]);
14353 digest[2] = hex_to_u32 ((const u8 *) &digest_buf[16]);
14354 digest[3] = hex_to_u32 ((const u8 *) &digest_buf[24]);
14355
14356 digest[0] = byte_swap_32 (digest[0]);
14357 digest[1] = byte_swap_32 (digest[1]);
14358 digest[2] = byte_swap_32 (digest[2]);
14359 digest[3] = byte_swap_32 (digest[3]);
14360
14361 digest[0] -= MD5M_A;
14362 digest[1] -= MD5M_B;
14363 digest[2] -= MD5M_C;
14364 digest[3] -= MD5M_D;
14365
14366 return (PARSER_OK);
14367 }
14368
14369 int peoplesoft_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14370 {
14371 if ((input_len < DISPLAY_LEN_MIN_133) || (input_len > DISPLAY_LEN_MAX_133)) return (PARSER_GLOBAL_LENGTH);
14372
14373 u32 *digest = (u32 *) hash_buf->digest;
14374
14375 u8 tmp_buf[100] = { 0 };
14376
14377 base64_decode (base64_to_int, (const u8 *) input_buf, input_len, tmp_buf);
14378
14379 memcpy (digest, tmp_buf, 20);
14380
14381 digest[0] = byte_swap_32 (digest[0]);
14382 digest[1] = byte_swap_32 (digest[1]);
14383 digest[2] = byte_swap_32 (digest[2]);
14384 digest[3] = byte_swap_32 (digest[3]);
14385 digest[4] = byte_swap_32 (digest[4]);
14386
14387 digest[0] -= SHA1M_A;
14388 digest[1] -= SHA1M_B;
14389 digest[2] -= SHA1M_C;
14390 digest[3] -= SHA1M_D;
14391 digest[4] -= SHA1M_E;
14392
14393 return (PARSER_OK);
14394 }
14395
14396 int skype_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14397 {
14398 if ((input_len < DISPLAY_LEN_MIN_23) || (input_len > DISPLAY_LEN_MAX_23)) return (PARSER_GLOBAL_LENGTH);
14399
14400 u32 *digest = (u32 *) hash_buf->digest;
14401
14402 salt_t *salt = hash_buf->salt;
14403
14404 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
14405 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
14406 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
14407 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
14408
14409 digest[0] = byte_swap_32 (digest[0]);
14410 digest[1] = byte_swap_32 (digest[1]);
14411 digest[2] = byte_swap_32 (digest[2]);
14412 digest[3] = byte_swap_32 (digest[3]);
14413
14414 digest[0] -= MD5M_A;
14415 digest[1] -= MD5M_B;
14416 digest[2] -= MD5M_C;
14417 digest[3] -= MD5M_D;
14418
14419 if (input_buf[32] != ':') return (PARSER_SEPARATOR_UNMATCHED);
14420
14421 uint salt_len = input_len - 32 - 1;
14422
14423 char *salt_buf = input_buf + 32 + 1;
14424
14425 char *salt_buf_ptr = (char *) salt->salt_buf;
14426
14427 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
14428
14429 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
14430
14431 /*
14432 * add static "salt" part
14433 */
14434
14435 memcpy (salt_buf_ptr + salt_len, "\nskyper\n", 8);
14436
14437 salt_len += 8;
14438
14439 salt->salt_len = salt_len;
14440
14441 return (PARSER_OK);
14442 }
14443
14444 int androidfde_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14445 {
14446 if ((input_len < DISPLAY_LEN_MIN_8800) || (input_len > DISPLAY_LEN_MAX_8800)) return (PARSER_GLOBAL_LENGTH);
14447
14448 if (memcmp (SIGNATURE_ANDROIDFDE, input_buf, 5)) return (PARSER_SIGNATURE_UNMATCHED);
14449
14450 u32 *digest = (u32 *) hash_buf->digest;
14451
14452 salt_t *salt = hash_buf->salt;
14453
14454 androidfde_t *androidfde = (androidfde_t *) hash_buf->esalt;
14455
14456 /**
14457 * parse line
14458 */
14459
14460 char *saltlen_pos = input_buf + 1 + 3 + 1;
14461
14462 char *saltbuf_pos = strchr (saltlen_pos, '$');
14463
14464 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14465
14466 uint saltlen_len = saltbuf_pos - saltlen_pos;
14467
14468 if (saltlen_len != 2) return (PARSER_SALT_LENGTH);
14469
14470 saltbuf_pos++;
14471
14472 char *keylen_pos = strchr (saltbuf_pos, '$');
14473
14474 if (keylen_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14475
14476 uint saltbuf_len = keylen_pos - saltbuf_pos;
14477
14478 if (saltbuf_len != 32) return (PARSER_SALT_LENGTH);
14479
14480 keylen_pos++;
14481
14482 char *keybuf_pos = strchr (keylen_pos, '$');
14483
14484 if (keybuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14485
14486 uint keylen_len = keybuf_pos - keylen_pos;
14487
14488 if (keylen_len != 2) return (PARSER_SALT_LENGTH);
14489
14490 keybuf_pos++;
14491
14492 char *databuf_pos = strchr (keybuf_pos, '$');
14493
14494 if (databuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14495
14496 uint keybuf_len = databuf_pos - keybuf_pos;
14497
14498 if (keybuf_len != 32) return (PARSER_SALT_LENGTH);
14499
14500 databuf_pos++;
14501
14502 uint data_len = input_len - 1 - 3 - 1 - saltlen_len - 1 - saltbuf_len - 1 - keylen_len - 1 - keybuf_len - 1;
14503
14504 if (data_len != 3072) return (PARSER_SALT_LENGTH);
14505
14506 /**
14507 * copy data
14508 */
14509
14510 digest[0] = hex_to_u32 ((const u8 *) &keybuf_pos[ 0]);
14511 digest[1] = hex_to_u32 ((const u8 *) &keybuf_pos[ 8]);
14512 digest[2] = hex_to_u32 ((const u8 *) &keybuf_pos[16]);
14513 digest[3] = hex_to_u32 ((const u8 *) &keybuf_pos[24]);
14514
14515 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &saltbuf_pos[ 0]);
14516 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &saltbuf_pos[ 8]);
14517 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &saltbuf_pos[16]);
14518 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &saltbuf_pos[24]);
14519
14520 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
14521 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
14522 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
14523 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
14524
14525 salt->salt_len = 16;
14526 salt->salt_iter = ROUNDS_ANDROIDFDE - 1;
14527
14528 for (uint i = 0, j = 0; i < 3072; i += 8, j += 1)
14529 {
14530 androidfde->data[j] = hex_to_u32 ((const u8 *) &databuf_pos[i]);
14531 }
14532
14533 return (PARSER_OK);
14534 }
14535
14536 int scrypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14537 {
14538 if ((input_len < DISPLAY_LEN_MIN_8900) || (input_len > DISPLAY_LEN_MAX_8900)) return (PARSER_GLOBAL_LENGTH);
14539
14540 if (memcmp (SIGNATURE_SCRYPT, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
14541
14542 u32 *digest = (u32 *) hash_buf->digest;
14543
14544 salt_t *salt = hash_buf->salt;
14545
14546 /**
14547 * parse line
14548 */
14549
14550 // first is the N salt parameter
14551
14552 char *N_pos = input_buf + 6;
14553
14554 if (N_pos[0] != ':') return (PARSER_SEPARATOR_UNMATCHED);
14555
14556 N_pos++;
14557
14558 salt->scrypt_N = atoi (N_pos);
14559
14560 // r
14561
14562 char *r_pos = strchr (N_pos, ':');
14563
14564 if (r_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14565
14566 r_pos++;
14567
14568 salt->scrypt_r = atoi (r_pos);
14569
14570 // p
14571
14572 char *p_pos = strchr (r_pos, ':');
14573
14574 if (p_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14575
14576 p_pos++;
14577
14578 salt->scrypt_p = atoi (p_pos);
14579
14580 // salt
14581
14582 char *saltbuf_pos = strchr (p_pos, ':');
14583
14584 if (saltbuf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14585
14586 saltbuf_pos++;
14587
14588 char *hash_pos = strchr (saltbuf_pos, ':');
14589
14590 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14591
14592 hash_pos++;
14593
14594 // base64 decode
14595
14596 u8 tmp_buf[33] = { 0 };
14597
14598 int tmp_len = base64_decode (base64_to_int, (const u8 *) saltbuf_pos, hash_pos - saltbuf_pos, tmp_buf);
14599
14600 char *salt_buf_ptr = (char *) salt->salt_buf;
14601
14602 memcpy (salt_buf_ptr, tmp_buf, tmp_len);
14603
14604 salt->salt_len = tmp_len;
14605 salt->salt_iter = 1;
14606
14607 // digest - base64 decode
14608
14609 memset (tmp_buf, 0, sizeof (tmp_buf));
14610
14611 tmp_len = input_len - (hash_pos - input_buf);
14612
14613 if (tmp_len != 44) return (PARSER_GLOBAL_LENGTH);
14614
14615 base64_decode (base64_to_int, (const u8 *) hash_pos, tmp_len, tmp_buf);
14616
14617 memcpy (digest, tmp_buf, 32);
14618
14619 return (PARSER_OK);
14620 }
14621
14622 int juniper_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14623 {
14624 if ((input_len < DISPLAY_LEN_MIN_501) || (input_len > DISPLAY_LEN_MAX_501)) return (PARSER_GLOBAL_LENGTH);
14625
14626 u32 *digest = (u32 *) hash_buf->digest;
14627
14628 salt_t *salt = hash_buf->salt;
14629
14630 /**
14631 * parse line
14632 */
14633
14634 char decrypted[76] = { 0 }; // iv + hash
14635
14636 juniper_decrypt_hash (input_buf, decrypted);
14637
14638 char *md5crypt_hash = decrypted + 12;
14639
14640 if (memcmp (md5crypt_hash, "$1$danastre$", 12)) return (PARSER_SALT_VALUE);
14641
14642 salt->salt_iter = ROUNDS_MD5CRYPT;
14643
14644 char *salt_pos = md5crypt_hash + 3;
14645
14646 char *hash_pos = strchr (salt_pos, '$'); // or simply salt_pos + 8
14647
14648 salt->salt_len = hash_pos - salt_pos; // should be 8
14649
14650 memcpy ((char *) salt->salt_buf, salt_pos, salt->salt_len);
14651
14652 hash_pos++;
14653
14654 md5crypt_decode ((unsigned char *) digest, (unsigned char *) hash_pos);
14655
14656 return (PARSER_OK);
14657 }
14658
14659 int cisco8_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14660 {
14661 if ((input_len < DISPLAY_LEN_MIN_9200) || (input_len > DISPLAY_LEN_MAX_9200)) return (PARSER_GLOBAL_LENGTH);
14662
14663 if (memcmp (SIGNATURE_CISCO8, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
14664
14665 u32 *digest = (u32 *) hash_buf->digest;
14666
14667 salt_t *salt = hash_buf->salt;
14668
14669 pbkdf2_sha256_t *pbkdf2_sha256 = (pbkdf2_sha256_t *) hash_buf->esalt;
14670
14671 /**
14672 * parse line
14673 */
14674
14675 // first is *raw* salt
14676
14677 char *salt_pos = input_buf + 3;
14678
14679 char *hash_pos = strchr (salt_pos, '$');
14680
14681 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14682
14683 uint salt_len = hash_pos - salt_pos;
14684
14685 if (salt_len != 14) return (PARSER_SALT_LENGTH);
14686
14687 hash_pos++;
14688
14689 char *salt_buf_ptr = (char *) pbkdf2_sha256->salt_buf;
14690
14691 memcpy (salt_buf_ptr, salt_pos, 14);
14692
14693 salt_buf_ptr[17] = 0x01;
14694 salt_buf_ptr[18] = 0x80;
14695
14696 // add some stuff to normal salt to make sorted happy
14697
14698 salt->salt_buf[0] = pbkdf2_sha256->salt_buf[0];
14699 salt->salt_buf[1] = pbkdf2_sha256->salt_buf[1];
14700 salt->salt_buf[2] = pbkdf2_sha256->salt_buf[2];
14701 salt->salt_buf[3] = pbkdf2_sha256->salt_buf[3];
14702
14703 salt->salt_len = salt_len;
14704 salt->salt_iter = ROUNDS_CISCO8 - 1;
14705
14706 // base64 decode hash
14707
14708 u8 tmp_buf[100] = { 0 };
14709
14710 uint hash_len = input_len - 3 - salt_len - 1;
14711
14712 int tmp_len = base64_decode (itoa64_to_int, (const u8 *) hash_pos, hash_len, tmp_buf);
14713
14714 if (tmp_len != 32) return (PARSER_HASH_LENGTH);
14715
14716 memcpy (digest, tmp_buf, 32);
14717
14718 digest[0] = byte_swap_32 (digest[0]);
14719 digest[1] = byte_swap_32 (digest[1]);
14720 digest[2] = byte_swap_32 (digest[2]);
14721 digest[3] = byte_swap_32 (digest[3]);
14722 digest[4] = byte_swap_32 (digest[4]);
14723 digest[5] = byte_swap_32 (digest[5]);
14724 digest[6] = byte_swap_32 (digest[6]);
14725 digest[7] = byte_swap_32 (digest[7]);
14726
14727 return (PARSER_OK);
14728 }
14729
14730 int cisco9_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14731 {
14732 if ((input_len < DISPLAY_LEN_MIN_9300) || (input_len > DISPLAY_LEN_MAX_9300)) return (PARSER_GLOBAL_LENGTH);
14733
14734 if (memcmp (SIGNATURE_CISCO9, input_buf, 3)) return (PARSER_SIGNATURE_UNMATCHED);
14735
14736 u32 *digest = (u32 *) hash_buf->digest;
14737
14738 salt_t *salt = hash_buf->salt;
14739
14740 /**
14741 * parse line
14742 */
14743
14744 // first is *raw* salt
14745
14746 char *salt_pos = input_buf + 3;
14747
14748 char *hash_pos = strchr (salt_pos, '$');
14749
14750 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14751
14752 uint salt_len = hash_pos - salt_pos;
14753
14754 if (salt_len != 14) return (PARSER_SALT_LENGTH);
14755
14756 salt->salt_len = salt_len;
14757 hash_pos++;
14758
14759 char *salt_buf_ptr = (char *) salt->salt_buf;
14760
14761 memcpy (salt_buf_ptr, salt_pos, salt_len);
14762 salt_buf_ptr[salt_len] = 0;
14763
14764 // base64 decode hash
14765
14766 u8 tmp_buf[100] = { 0 };
14767
14768 uint hash_len = input_len - 3 - salt_len - 1;
14769
14770 int tmp_len = base64_decode (itoa64_to_int, (const u8 *) hash_pos, hash_len, tmp_buf);
14771
14772 if (tmp_len != 32) return (PARSER_HASH_LENGTH);
14773
14774 memcpy (digest, tmp_buf, 32);
14775
14776 // fixed:
14777 salt->scrypt_N = 16384;
14778 salt->scrypt_r = 1;
14779 salt->scrypt_p = 1;
14780 salt->salt_iter = 1;
14781
14782 return (PARSER_OK);
14783 }
14784
14785 int office2007_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14786 {
14787 if ((input_len < DISPLAY_LEN_MIN_9400) || (input_len > DISPLAY_LEN_MAX_9400)) return (PARSER_GLOBAL_LENGTH);
14788
14789 if (memcmp (SIGNATURE_OFFICE2007, input_buf, 8)) return (PARSER_SIGNATURE_UNMATCHED);
14790
14791 u32 *digest = (u32 *) hash_buf->digest;
14792
14793 salt_t *salt = hash_buf->salt;
14794
14795 office2007_t *office2007 = (office2007_t *) hash_buf->esalt;
14796
14797 /**
14798 * parse line
14799 */
14800
14801 char *version_pos = input_buf + 8 + 1;
14802
14803 char *verifierHashSize_pos = strchr (version_pos, '*');
14804
14805 if (verifierHashSize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14806
14807 u32 version_len = verifierHashSize_pos - version_pos;
14808
14809 if (version_len != 4) return (PARSER_SALT_LENGTH);
14810
14811 verifierHashSize_pos++;
14812
14813 char *keySize_pos = strchr (verifierHashSize_pos, '*');
14814
14815 if (keySize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14816
14817 u32 verifierHashSize_len = keySize_pos - verifierHashSize_pos;
14818
14819 if (verifierHashSize_len != 2) return (PARSER_SALT_LENGTH);
14820
14821 keySize_pos++;
14822
14823 char *saltSize_pos = strchr (keySize_pos, '*');
14824
14825 if (saltSize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14826
14827 u32 keySize_len = saltSize_pos - keySize_pos;
14828
14829 if (keySize_len != 3) return (PARSER_SALT_LENGTH);
14830
14831 saltSize_pos++;
14832
14833 char *osalt_pos = strchr (saltSize_pos, '*');
14834
14835 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14836
14837 u32 saltSize_len = osalt_pos - saltSize_pos;
14838
14839 if (saltSize_len != 2) return (PARSER_SALT_LENGTH);
14840
14841 osalt_pos++;
14842
14843 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
14844
14845 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14846
14847 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
14848
14849 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
14850
14851 encryptedVerifier_pos++;
14852
14853 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
14854
14855 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14856
14857 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
14858
14859 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
14860
14861 encryptedVerifierHash_pos++;
14862
14863 u32 encryptedVerifierHash_len = input_len - 8 - 1 - version_len - 1 - verifierHashSize_len - 1 - keySize_len - 1 - saltSize_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1;
14864
14865 if (encryptedVerifierHash_len != 40) return (PARSER_SALT_LENGTH);
14866
14867 const uint version = atoi (version_pos);
14868
14869 if (version != 2007) return (PARSER_SALT_VALUE);
14870
14871 const uint verifierHashSize = atoi (verifierHashSize_pos);
14872
14873 if (verifierHashSize != 20) return (PARSER_SALT_VALUE);
14874
14875 const uint keySize = atoi (keySize_pos);
14876
14877 if ((keySize != 128) && (keySize != 256)) return (PARSER_SALT_VALUE);
14878
14879 office2007->keySize = keySize;
14880
14881 const uint saltSize = atoi (saltSize_pos);
14882
14883 if (saltSize != 16) return (PARSER_SALT_VALUE);
14884
14885 /**
14886 * salt
14887 */
14888
14889 salt->salt_len = 16;
14890 salt->salt_iter = ROUNDS_OFFICE2007;
14891
14892 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
14893 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
14894 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
14895 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
14896
14897 /**
14898 * esalt
14899 */
14900
14901 office2007->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
14902 office2007->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
14903 office2007->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
14904 office2007->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
14905
14906 office2007->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
14907 office2007->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
14908 office2007->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
14909 office2007->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
14910 office2007->encryptedVerifierHash[4] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[32]);
14911
14912 /**
14913 * digest
14914 */
14915
14916 digest[0] = office2007->encryptedVerifierHash[0];
14917 digest[1] = office2007->encryptedVerifierHash[1];
14918 digest[2] = office2007->encryptedVerifierHash[2];
14919 digest[3] = office2007->encryptedVerifierHash[3];
14920
14921 return (PARSER_OK);
14922 }
14923
14924 int office2010_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
14925 {
14926 if ((input_len < DISPLAY_LEN_MIN_9500) || (input_len > DISPLAY_LEN_MAX_9500)) return (PARSER_GLOBAL_LENGTH);
14927
14928 if (memcmp (SIGNATURE_OFFICE2010, input_buf, 8)) return (PARSER_SIGNATURE_UNMATCHED);
14929
14930 u32 *digest = (u32 *) hash_buf->digest;
14931
14932 salt_t *salt = hash_buf->salt;
14933
14934 office2010_t *office2010 = (office2010_t *) hash_buf->esalt;
14935
14936 /**
14937 * parse line
14938 */
14939
14940 char *version_pos = input_buf + 8 + 1;
14941
14942 char *spinCount_pos = strchr (version_pos, '*');
14943
14944 if (spinCount_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14945
14946 u32 version_len = spinCount_pos - version_pos;
14947
14948 if (version_len != 4) return (PARSER_SALT_LENGTH);
14949
14950 spinCount_pos++;
14951
14952 char *keySize_pos = strchr (spinCount_pos, '*');
14953
14954 if (keySize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14955
14956 u32 spinCount_len = keySize_pos - spinCount_pos;
14957
14958 if (spinCount_len != 6) return (PARSER_SALT_LENGTH);
14959
14960 keySize_pos++;
14961
14962 char *saltSize_pos = strchr (keySize_pos, '*');
14963
14964 if (saltSize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14965
14966 u32 keySize_len = saltSize_pos - keySize_pos;
14967
14968 if (keySize_len != 3) return (PARSER_SALT_LENGTH);
14969
14970 saltSize_pos++;
14971
14972 char *osalt_pos = strchr (saltSize_pos, '*');
14973
14974 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14975
14976 u32 saltSize_len = osalt_pos - saltSize_pos;
14977
14978 if (saltSize_len != 2) return (PARSER_SALT_LENGTH);
14979
14980 osalt_pos++;
14981
14982 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
14983
14984 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14985
14986 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
14987
14988 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
14989
14990 encryptedVerifier_pos++;
14991
14992 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
14993
14994 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
14995
14996 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
14997
14998 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
14999
15000 encryptedVerifierHash_pos++;
15001
15002 u32 encryptedVerifierHash_len = input_len - 8 - 1 - version_len - 1 - spinCount_len - 1 - keySize_len - 1 - saltSize_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1;
15003
15004 if (encryptedVerifierHash_len != 64) return (PARSER_SALT_LENGTH);
15005
15006 const uint version = atoi (version_pos);
15007
15008 if (version != 2010) return (PARSER_SALT_VALUE);
15009
15010 const uint spinCount = atoi (spinCount_pos);
15011
15012 if (spinCount != 100000) return (PARSER_SALT_VALUE);
15013
15014 const uint keySize = atoi (keySize_pos);
15015
15016 if (keySize != 128) return (PARSER_SALT_VALUE);
15017
15018 const uint saltSize = atoi (saltSize_pos);
15019
15020 if (saltSize != 16) return (PARSER_SALT_VALUE);
15021
15022 /**
15023 * salt
15024 */
15025
15026 salt->salt_len = 16;
15027 salt->salt_iter = spinCount;
15028
15029 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15030 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15031 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15032 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15033
15034 /**
15035 * esalt
15036 */
15037
15038 office2010->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15039 office2010->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15040 office2010->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15041 office2010->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15042
15043 office2010->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15044 office2010->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15045 office2010->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15046 office2010->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15047 office2010->encryptedVerifierHash[4] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[32]);
15048 office2010->encryptedVerifierHash[5] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[40]);
15049 office2010->encryptedVerifierHash[6] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[48]);
15050 office2010->encryptedVerifierHash[7] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[56]);
15051
15052 /**
15053 * digest
15054 */
15055
15056 digest[0] = office2010->encryptedVerifierHash[0];
15057 digest[1] = office2010->encryptedVerifierHash[1];
15058 digest[2] = office2010->encryptedVerifierHash[2];
15059 digest[3] = office2010->encryptedVerifierHash[3];
15060
15061 return (PARSER_OK);
15062 }
15063
15064 int office2013_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15065 {
15066 if ((input_len < DISPLAY_LEN_MIN_9600) || (input_len > DISPLAY_LEN_MAX_9600)) return (PARSER_GLOBAL_LENGTH);
15067
15068 if (memcmp (SIGNATURE_OFFICE2013, input_buf, 8)) return (PARSER_SIGNATURE_UNMATCHED);
15069
15070 u32 *digest = (u32 *) hash_buf->digest;
15071
15072 salt_t *salt = hash_buf->salt;
15073
15074 office2013_t *office2013 = (office2013_t *) hash_buf->esalt;
15075
15076 /**
15077 * parse line
15078 */
15079
15080 char *version_pos = input_buf + 8 + 1;
15081
15082 char *spinCount_pos = strchr (version_pos, '*');
15083
15084 if (spinCount_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15085
15086 u32 version_len = spinCount_pos - version_pos;
15087
15088 if (version_len != 4) return (PARSER_SALT_LENGTH);
15089
15090 spinCount_pos++;
15091
15092 char *keySize_pos = strchr (spinCount_pos, '*');
15093
15094 if (keySize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15095
15096 u32 spinCount_len = keySize_pos - spinCount_pos;
15097
15098 if (spinCount_len != 6) return (PARSER_SALT_LENGTH);
15099
15100 keySize_pos++;
15101
15102 char *saltSize_pos = strchr (keySize_pos, '*');
15103
15104 if (saltSize_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15105
15106 u32 keySize_len = saltSize_pos - keySize_pos;
15107
15108 if (keySize_len != 3) return (PARSER_SALT_LENGTH);
15109
15110 saltSize_pos++;
15111
15112 char *osalt_pos = strchr (saltSize_pos, '*');
15113
15114 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15115
15116 u32 saltSize_len = osalt_pos - saltSize_pos;
15117
15118 if (saltSize_len != 2) return (PARSER_SALT_LENGTH);
15119
15120 osalt_pos++;
15121
15122 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
15123
15124 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15125
15126 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
15127
15128 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
15129
15130 encryptedVerifier_pos++;
15131
15132 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
15133
15134 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15135
15136 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
15137
15138 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
15139
15140 encryptedVerifierHash_pos++;
15141
15142 u32 encryptedVerifierHash_len = input_len - 8 - 1 - version_len - 1 - spinCount_len - 1 - keySize_len - 1 - saltSize_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1;
15143
15144 if (encryptedVerifierHash_len != 64) return (PARSER_SALT_LENGTH);
15145
15146 const uint version = atoi (version_pos);
15147
15148 if (version != 2013) return (PARSER_SALT_VALUE);
15149
15150 const uint spinCount = atoi (spinCount_pos);
15151
15152 if (spinCount != 100000) return (PARSER_SALT_VALUE);
15153
15154 const uint keySize = atoi (keySize_pos);
15155
15156 if (keySize != 256) return (PARSER_SALT_VALUE);
15157
15158 const uint saltSize = atoi (saltSize_pos);
15159
15160 if (saltSize != 16) return (PARSER_SALT_VALUE);
15161
15162 /**
15163 * salt
15164 */
15165
15166 salt->salt_len = 16;
15167 salt->salt_iter = spinCount;
15168
15169 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15170 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15171 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15172 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15173
15174 /**
15175 * esalt
15176 */
15177
15178 office2013->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15179 office2013->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15180 office2013->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15181 office2013->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15182
15183 office2013->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15184 office2013->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15185 office2013->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15186 office2013->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15187 office2013->encryptedVerifierHash[4] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[32]);
15188 office2013->encryptedVerifierHash[5] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[40]);
15189 office2013->encryptedVerifierHash[6] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[48]);
15190 office2013->encryptedVerifierHash[7] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[56]);
15191
15192 /**
15193 * digest
15194 */
15195
15196 digest[0] = office2013->encryptedVerifierHash[0];
15197 digest[1] = office2013->encryptedVerifierHash[1];
15198 digest[2] = office2013->encryptedVerifierHash[2];
15199 digest[3] = office2013->encryptedVerifierHash[3];
15200
15201 return (PARSER_OK);
15202 }
15203
15204 int oldoffice01_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15205 {
15206 if ((input_len < DISPLAY_LEN_MIN_9700) || (input_len > DISPLAY_LEN_MAX_9700)) return (PARSER_GLOBAL_LENGTH);
15207
15208 if ((memcmp (SIGNATURE_OLDOFFICE0, input_buf, 12)) && (memcmp (SIGNATURE_OLDOFFICE1, input_buf, 12))) return (PARSER_SIGNATURE_UNMATCHED);
15209
15210 u32 *digest = (u32 *) hash_buf->digest;
15211
15212 salt_t *salt = hash_buf->salt;
15213
15214 oldoffice01_t *oldoffice01 = (oldoffice01_t *) hash_buf->esalt;
15215
15216 /**
15217 * parse line
15218 */
15219
15220 char *version_pos = input_buf + 11;
15221
15222 char *osalt_pos = strchr (version_pos, '*');
15223
15224 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15225
15226 u32 version_len = osalt_pos - version_pos;
15227
15228 if (version_len != 1) return (PARSER_SALT_LENGTH);
15229
15230 osalt_pos++;
15231
15232 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
15233
15234 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15235
15236 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
15237
15238 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
15239
15240 encryptedVerifier_pos++;
15241
15242 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
15243
15244 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15245
15246 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
15247
15248 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
15249
15250 encryptedVerifierHash_pos++;
15251
15252 u32 encryptedVerifierHash_len = input_len - 11 - version_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1;
15253
15254 if (encryptedVerifierHash_len != 32) return (PARSER_SALT_LENGTH);
15255
15256 const uint version = *version_pos - 0x30;
15257
15258 if (version != 0 && version != 1) return (PARSER_SALT_VALUE);
15259
15260 /**
15261 * esalt
15262 */
15263
15264 oldoffice01->version = version;
15265
15266 oldoffice01->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15267 oldoffice01->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15268 oldoffice01->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15269 oldoffice01->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15270
15271 oldoffice01->encryptedVerifier[0] = byte_swap_32 (oldoffice01->encryptedVerifier[0]);
15272 oldoffice01->encryptedVerifier[1] = byte_swap_32 (oldoffice01->encryptedVerifier[1]);
15273 oldoffice01->encryptedVerifier[2] = byte_swap_32 (oldoffice01->encryptedVerifier[2]);
15274 oldoffice01->encryptedVerifier[3] = byte_swap_32 (oldoffice01->encryptedVerifier[3]);
15275
15276 oldoffice01->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15277 oldoffice01->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15278 oldoffice01->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15279 oldoffice01->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15280
15281 oldoffice01->encryptedVerifierHash[0] = byte_swap_32 (oldoffice01->encryptedVerifierHash[0]);
15282 oldoffice01->encryptedVerifierHash[1] = byte_swap_32 (oldoffice01->encryptedVerifierHash[1]);
15283 oldoffice01->encryptedVerifierHash[2] = byte_swap_32 (oldoffice01->encryptedVerifierHash[2]);
15284 oldoffice01->encryptedVerifierHash[3] = byte_swap_32 (oldoffice01->encryptedVerifierHash[3]);
15285
15286 /**
15287 * salt
15288 */
15289
15290 salt->salt_len = 16;
15291
15292 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15293 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15294 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15295 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15296
15297 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
15298 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
15299 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
15300 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
15301
15302 // this is a workaround as office produces multiple documents with the same salt
15303
15304 salt->salt_len += 32;
15305
15306 salt->salt_buf[ 4] = oldoffice01->encryptedVerifier[0];
15307 salt->salt_buf[ 5] = oldoffice01->encryptedVerifier[1];
15308 salt->salt_buf[ 6] = oldoffice01->encryptedVerifier[2];
15309 salt->salt_buf[ 7] = oldoffice01->encryptedVerifier[3];
15310 salt->salt_buf[ 8] = oldoffice01->encryptedVerifierHash[0];
15311 salt->salt_buf[ 9] = oldoffice01->encryptedVerifierHash[1];
15312 salt->salt_buf[10] = oldoffice01->encryptedVerifierHash[2];
15313 salt->salt_buf[11] = oldoffice01->encryptedVerifierHash[3];
15314
15315 /**
15316 * digest
15317 */
15318
15319 digest[0] = oldoffice01->encryptedVerifierHash[0];
15320 digest[1] = oldoffice01->encryptedVerifierHash[1];
15321 digest[2] = oldoffice01->encryptedVerifierHash[2];
15322 digest[3] = oldoffice01->encryptedVerifierHash[3];
15323
15324 return (PARSER_OK);
15325 }
15326
15327 int oldoffice01cm1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15328 {
15329 return oldoffice01_parse_hash (input_buf, input_len, hash_buf);
15330 }
15331
15332 int oldoffice01cm2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15333 {
15334 if ((input_len < DISPLAY_LEN_MIN_9720) || (input_len > DISPLAY_LEN_MAX_9720)) return (PARSER_GLOBAL_LENGTH);
15335
15336 if ((memcmp (SIGNATURE_OLDOFFICE0, input_buf, 12)) && (memcmp (SIGNATURE_OLDOFFICE1, input_buf, 12))) return (PARSER_SIGNATURE_UNMATCHED);
15337
15338 u32 *digest = (u32 *) hash_buf->digest;
15339
15340 salt_t *salt = hash_buf->salt;
15341
15342 oldoffice01_t *oldoffice01 = (oldoffice01_t *) hash_buf->esalt;
15343
15344 /**
15345 * parse line
15346 */
15347
15348 char *version_pos = input_buf + 11;
15349
15350 char *osalt_pos = strchr (version_pos, '*');
15351
15352 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15353
15354 u32 version_len = osalt_pos - version_pos;
15355
15356 if (version_len != 1) return (PARSER_SALT_LENGTH);
15357
15358 osalt_pos++;
15359
15360 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
15361
15362 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15363
15364 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
15365
15366 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
15367
15368 encryptedVerifier_pos++;
15369
15370 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
15371
15372 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15373
15374 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
15375
15376 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
15377
15378 encryptedVerifierHash_pos++;
15379
15380 char *rc4key_pos = strchr (encryptedVerifierHash_pos, ':');
15381
15382 if (rc4key_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15383
15384 u32 encryptedVerifierHash_len = rc4key_pos - encryptedVerifierHash_pos;
15385
15386 if (encryptedVerifierHash_len != 32) return (PARSER_SALT_LENGTH);
15387
15388 rc4key_pos++;
15389
15390 u32 rc4key_len = input_len - 11 - version_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1 - encryptedVerifierHash_len - 1;
15391
15392 if (rc4key_len != 10) return (PARSER_SALT_LENGTH);
15393
15394 const uint version = *version_pos - 0x30;
15395
15396 if (version != 0 && version != 1) return (PARSER_SALT_VALUE);
15397
15398 /**
15399 * esalt
15400 */
15401
15402 oldoffice01->version = version;
15403
15404 oldoffice01->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15405 oldoffice01->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15406 oldoffice01->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15407 oldoffice01->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15408
15409 oldoffice01->encryptedVerifier[0] = byte_swap_32 (oldoffice01->encryptedVerifier[0]);
15410 oldoffice01->encryptedVerifier[1] = byte_swap_32 (oldoffice01->encryptedVerifier[1]);
15411 oldoffice01->encryptedVerifier[2] = byte_swap_32 (oldoffice01->encryptedVerifier[2]);
15412 oldoffice01->encryptedVerifier[3] = byte_swap_32 (oldoffice01->encryptedVerifier[3]);
15413
15414 oldoffice01->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15415 oldoffice01->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15416 oldoffice01->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15417 oldoffice01->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15418
15419 oldoffice01->encryptedVerifierHash[0] = byte_swap_32 (oldoffice01->encryptedVerifierHash[0]);
15420 oldoffice01->encryptedVerifierHash[1] = byte_swap_32 (oldoffice01->encryptedVerifierHash[1]);
15421 oldoffice01->encryptedVerifierHash[2] = byte_swap_32 (oldoffice01->encryptedVerifierHash[2]);
15422 oldoffice01->encryptedVerifierHash[3] = byte_swap_32 (oldoffice01->encryptedVerifierHash[3]);
15423
15424 oldoffice01->rc4key[1] = 0;
15425 oldoffice01->rc4key[0] = 0;
15426
15427 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[0]) << 28;
15428 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[1]) << 24;
15429 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[2]) << 20;
15430 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[3]) << 16;
15431 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[4]) << 12;
15432 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[5]) << 8;
15433 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[6]) << 4;
15434 oldoffice01->rc4key[0] |= hex_convert (rc4key_pos[7]) << 0;
15435 oldoffice01->rc4key[1] |= hex_convert (rc4key_pos[8]) << 28;
15436 oldoffice01->rc4key[1] |= hex_convert (rc4key_pos[9]) << 24;
15437
15438 oldoffice01->rc4key[0] = byte_swap_32 (oldoffice01->rc4key[0]);
15439 oldoffice01->rc4key[1] = byte_swap_32 (oldoffice01->rc4key[1]);
15440
15441 /**
15442 * salt
15443 */
15444
15445 salt->salt_len = 16;
15446
15447 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15448 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15449 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15450 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15451
15452 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
15453 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
15454 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
15455 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
15456
15457 // this is a workaround as office produces multiple documents with the same salt
15458
15459 salt->salt_len += 32;
15460
15461 salt->salt_buf[ 4] = oldoffice01->encryptedVerifier[0];
15462 salt->salt_buf[ 5] = oldoffice01->encryptedVerifier[1];
15463 salt->salt_buf[ 6] = oldoffice01->encryptedVerifier[2];
15464 salt->salt_buf[ 7] = oldoffice01->encryptedVerifier[3];
15465 salt->salt_buf[ 8] = oldoffice01->encryptedVerifierHash[0];
15466 salt->salt_buf[ 9] = oldoffice01->encryptedVerifierHash[1];
15467 salt->salt_buf[10] = oldoffice01->encryptedVerifierHash[2];
15468 salt->salt_buf[11] = oldoffice01->encryptedVerifierHash[3];
15469
15470 /**
15471 * digest
15472 */
15473
15474 digest[0] = oldoffice01->rc4key[0];
15475 digest[1] = oldoffice01->rc4key[1];
15476 digest[2] = 0;
15477 digest[3] = 0;
15478
15479 return (PARSER_OK);
15480 }
15481
15482 int oldoffice34_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15483 {
15484 if ((input_len < DISPLAY_LEN_MIN_9800) || (input_len > DISPLAY_LEN_MAX_9800)) return (PARSER_GLOBAL_LENGTH);
15485
15486 if ((memcmp (SIGNATURE_OLDOFFICE3, input_buf, 12)) && (memcmp (SIGNATURE_OLDOFFICE4, input_buf, 12))) return (PARSER_SIGNATURE_UNMATCHED);
15487
15488 u32 *digest = (u32 *) hash_buf->digest;
15489
15490 salt_t *salt = hash_buf->salt;
15491
15492 oldoffice34_t *oldoffice34 = (oldoffice34_t *) hash_buf->esalt;
15493
15494 /**
15495 * parse line
15496 */
15497
15498 char *version_pos = input_buf + 11;
15499
15500 char *osalt_pos = strchr (version_pos, '*');
15501
15502 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15503
15504 u32 version_len = osalt_pos - version_pos;
15505
15506 if (version_len != 1) return (PARSER_SALT_LENGTH);
15507
15508 osalt_pos++;
15509
15510 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
15511
15512 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15513
15514 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
15515
15516 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
15517
15518 encryptedVerifier_pos++;
15519
15520 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
15521
15522 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15523
15524 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
15525
15526 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
15527
15528 encryptedVerifierHash_pos++;
15529
15530 u32 encryptedVerifierHash_len = input_len - 11 - version_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1;
15531
15532 if (encryptedVerifierHash_len != 40) return (PARSER_SALT_LENGTH);
15533
15534 const uint version = *version_pos - 0x30;
15535
15536 if (version != 3 && version != 4) return (PARSER_SALT_VALUE);
15537
15538 /**
15539 * esalt
15540 */
15541
15542 oldoffice34->version = version;
15543
15544 oldoffice34->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15545 oldoffice34->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15546 oldoffice34->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15547 oldoffice34->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15548
15549 oldoffice34->encryptedVerifier[0] = byte_swap_32 (oldoffice34->encryptedVerifier[0]);
15550 oldoffice34->encryptedVerifier[1] = byte_swap_32 (oldoffice34->encryptedVerifier[1]);
15551 oldoffice34->encryptedVerifier[2] = byte_swap_32 (oldoffice34->encryptedVerifier[2]);
15552 oldoffice34->encryptedVerifier[3] = byte_swap_32 (oldoffice34->encryptedVerifier[3]);
15553
15554 oldoffice34->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15555 oldoffice34->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15556 oldoffice34->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15557 oldoffice34->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15558 oldoffice34->encryptedVerifierHash[4] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[32]);
15559
15560 oldoffice34->encryptedVerifierHash[0] = byte_swap_32 (oldoffice34->encryptedVerifierHash[0]);
15561 oldoffice34->encryptedVerifierHash[1] = byte_swap_32 (oldoffice34->encryptedVerifierHash[1]);
15562 oldoffice34->encryptedVerifierHash[2] = byte_swap_32 (oldoffice34->encryptedVerifierHash[2]);
15563 oldoffice34->encryptedVerifierHash[3] = byte_swap_32 (oldoffice34->encryptedVerifierHash[3]);
15564 oldoffice34->encryptedVerifierHash[4] = byte_swap_32 (oldoffice34->encryptedVerifierHash[4]);
15565
15566 /**
15567 * salt
15568 */
15569
15570 salt->salt_len = 16;
15571
15572 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15573 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15574 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15575 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15576
15577 // this is a workaround as office produces multiple documents with the same salt
15578
15579 salt->salt_len += 32;
15580
15581 salt->salt_buf[ 4] = oldoffice34->encryptedVerifier[0];
15582 salt->salt_buf[ 5] = oldoffice34->encryptedVerifier[1];
15583 salt->salt_buf[ 6] = oldoffice34->encryptedVerifier[2];
15584 salt->salt_buf[ 7] = oldoffice34->encryptedVerifier[3];
15585 salt->salt_buf[ 8] = oldoffice34->encryptedVerifierHash[0];
15586 salt->salt_buf[ 9] = oldoffice34->encryptedVerifierHash[1];
15587 salt->salt_buf[10] = oldoffice34->encryptedVerifierHash[2];
15588 salt->salt_buf[11] = oldoffice34->encryptedVerifierHash[3];
15589
15590 /**
15591 * digest
15592 */
15593
15594 digest[0] = oldoffice34->encryptedVerifierHash[0];
15595 digest[1] = oldoffice34->encryptedVerifierHash[1];
15596 digest[2] = oldoffice34->encryptedVerifierHash[2];
15597 digest[3] = oldoffice34->encryptedVerifierHash[3];
15598
15599 return (PARSER_OK);
15600 }
15601
15602 int oldoffice34cm1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15603 {
15604 if (memcmp (SIGNATURE_OLDOFFICE3, input_buf, 12)) return (PARSER_SIGNATURE_UNMATCHED);
15605
15606 return oldoffice34_parse_hash (input_buf, input_len, hash_buf);
15607 }
15608
15609 int oldoffice34cm2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15610 {
15611 if ((input_len < DISPLAY_LEN_MIN_9820) || (input_len > DISPLAY_LEN_MAX_9820)) return (PARSER_GLOBAL_LENGTH);
15612
15613 if (memcmp (SIGNATURE_OLDOFFICE3, input_buf, 12)) return (PARSER_SIGNATURE_UNMATCHED);
15614
15615 u32 *digest = (u32 *) hash_buf->digest;
15616
15617 salt_t *salt = hash_buf->salt;
15618
15619 oldoffice34_t *oldoffice34 = (oldoffice34_t *) hash_buf->esalt;
15620
15621 /**
15622 * parse line
15623 */
15624
15625 char *version_pos = input_buf + 11;
15626
15627 char *osalt_pos = strchr (version_pos, '*');
15628
15629 if (osalt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15630
15631 u32 version_len = osalt_pos - version_pos;
15632
15633 if (version_len != 1) return (PARSER_SALT_LENGTH);
15634
15635 osalt_pos++;
15636
15637 char *encryptedVerifier_pos = strchr (osalt_pos, '*');
15638
15639 if (encryptedVerifier_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15640
15641 u32 osalt_len = encryptedVerifier_pos - osalt_pos;
15642
15643 if (osalt_len != 32) return (PARSER_SALT_LENGTH);
15644
15645 encryptedVerifier_pos++;
15646
15647 char *encryptedVerifierHash_pos = strchr (encryptedVerifier_pos, '*');
15648
15649 if (encryptedVerifierHash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15650
15651 u32 encryptedVerifier_len = encryptedVerifierHash_pos - encryptedVerifier_pos;
15652
15653 if (encryptedVerifier_len != 32) return (PARSER_SALT_LENGTH);
15654
15655 encryptedVerifierHash_pos++;
15656
15657 char *rc4key_pos = strchr (encryptedVerifierHash_pos, ':');
15658
15659 if (rc4key_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15660
15661 u32 encryptedVerifierHash_len = rc4key_pos - encryptedVerifierHash_pos;
15662
15663 if (encryptedVerifierHash_len != 40) return (PARSER_SALT_LENGTH);
15664
15665 rc4key_pos++;
15666
15667 u32 rc4key_len = input_len - 11 - version_len - 1 - osalt_len - 1 - encryptedVerifier_len - 1 - encryptedVerifierHash_len - 1;
15668
15669 if (rc4key_len != 10) return (PARSER_SALT_LENGTH);
15670
15671 const uint version = *version_pos - 0x30;
15672
15673 if (version != 3 && version != 4) return (PARSER_SALT_VALUE);
15674
15675 /**
15676 * esalt
15677 */
15678
15679 oldoffice34->version = version;
15680
15681 oldoffice34->encryptedVerifier[0] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 0]);
15682 oldoffice34->encryptedVerifier[1] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[ 8]);
15683 oldoffice34->encryptedVerifier[2] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[16]);
15684 oldoffice34->encryptedVerifier[3] = hex_to_u32 ((const u8 *) &encryptedVerifier_pos[24]);
15685
15686 oldoffice34->encryptedVerifier[0] = byte_swap_32 (oldoffice34->encryptedVerifier[0]);
15687 oldoffice34->encryptedVerifier[1] = byte_swap_32 (oldoffice34->encryptedVerifier[1]);
15688 oldoffice34->encryptedVerifier[2] = byte_swap_32 (oldoffice34->encryptedVerifier[2]);
15689 oldoffice34->encryptedVerifier[3] = byte_swap_32 (oldoffice34->encryptedVerifier[3]);
15690
15691 oldoffice34->encryptedVerifierHash[0] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 0]);
15692 oldoffice34->encryptedVerifierHash[1] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[ 8]);
15693 oldoffice34->encryptedVerifierHash[2] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[16]);
15694 oldoffice34->encryptedVerifierHash[3] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[24]);
15695 oldoffice34->encryptedVerifierHash[4] = hex_to_u32 ((const u8 *) &encryptedVerifierHash_pos[32]);
15696
15697 oldoffice34->encryptedVerifierHash[0] = byte_swap_32 (oldoffice34->encryptedVerifierHash[0]);
15698 oldoffice34->encryptedVerifierHash[1] = byte_swap_32 (oldoffice34->encryptedVerifierHash[1]);
15699 oldoffice34->encryptedVerifierHash[2] = byte_swap_32 (oldoffice34->encryptedVerifierHash[2]);
15700 oldoffice34->encryptedVerifierHash[3] = byte_swap_32 (oldoffice34->encryptedVerifierHash[3]);
15701 oldoffice34->encryptedVerifierHash[4] = byte_swap_32 (oldoffice34->encryptedVerifierHash[4]);
15702
15703 oldoffice34->rc4key[1] = 0;
15704 oldoffice34->rc4key[0] = 0;
15705
15706 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[0]) << 28;
15707 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[1]) << 24;
15708 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[2]) << 20;
15709 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[3]) << 16;
15710 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[4]) << 12;
15711 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[5]) << 8;
15712 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[6]) << 4;
15713 oldoffice34->rc4key[0] |= hex_convert (rc4key_pos[7]) << 0;
15714 oldoffice34->rc4key[1] |= hex_convert (rc4key_pos[8]) << 28;
15715 oldoffice34->rc4key[1] |= hex_convert (rc4key_pos[9]) << 24;
15716
15717 oldoffice34->rc4key[0] = byte_swap_32 (oldoffice34->rc4key[0]);
15718 oldoffice34->rc4key[1] = byte_swap_32 (oldoffice34->rc4key[1]);
15719
15720 /**
15721 * salt
15722 */
15723
15724 salt->salt_len = 16;
15725
15726 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &osalt_pos[ 0]);
15727 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &osalt_pos[ 8]);
15728 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &osalt_pos[16]);
15729 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &osalt_pos[24]);
15730
15731 // this is a workaround as office produces multiple documents with the same salt
15732
15733 salt->salt_len += 32;
15734
15735 salt->salt_buf[ 4] = oldoffice34->encryptedVerifier[0];
15736 salt->salt_buf[ 5] = oldoffice34->encryptedVerifier[1];
15737 salt->salt_buf[ 6] = oldoffice34->encryptedVerifier[2];
15738 salt->salt_buf[ 7] = oldoffice34->encryptedVerifier[3];
15739 salt->salt_buf[ 8] = oldoffice34->encryptedVerifierHash[0];
15740 salt->salt_buf[ 9] = oldoffice34->encryptedVerifierHash[1];
15741 salt->salt_buf[10] = oldoffice34->encryptedVerifierHash[2];
15742 salt->salt_buf[11] = oldoffice34->encryptedVerifierHash[3];
15743
15744 /**
15745 * digest
15746 */
15747
15748 digest[0] = oldoffice34->rc4key[0];
15749 digest[1] = oldoffice34->rc4key[1];
15750 digest[2] = 0;
15751 digest[3] = 0;
15752
15753 return (PARSER_OK);
15754 }
15755
15756 int radmin2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15757 {
15758 if ((input_len < DISPLAY_LEN_MIN_9900) || (input_len > DISPLAY_LEN_MAX_9900)) return (PARSER_GLOBAL_LENGTH);
15759
15760 u32 *digest = (u32 *) hash_buf->digest;
15761
15762 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
15763 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
15764 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
15765 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
15766
15767 digest[0] = byte_swap_32 (digest[0]);
15768 digest[1] = byte_swap_32 (digest[1]);
15769 digest[2] = byte_swap_32 (digest[2]);
15770 digest[3] = byte_swap_32 (digest[3]);
15771
15772 return (PARSER_OK);
15773 }
15774
15775 int djangosha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15776 {
15777 if ((input_len < DISPLAY_LEN_MIN_124) || (input_len > DISPLAY_LEN_MAX_124)) return (PARSER_GLOBAL_LENGTH);
15778
15779 if ((memcmp (SIGNATURE_DJANGOSHA1, input_buf, 5)) && (memcmp (SIGNATURE_DJANGOSHA1, input_buf, 5))) return (PARSER_SIGNATURE_UNMATCHED);
15780
15781 u32 *digest = (u32 *) hash_buf->digest;
15782
15783 salt_t *salt = hash_buf->salt;
15784
15785 char *signature_pos = input_buf;
15786
15787 char *salt_pos = strchr (signature_pos, '$');
15788
15789 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15790
15791 u32 signature_len = salt_pos - signature_pos;
15792
15793 if (signature_len != 4) return (PARSER_SIGNATURE_UNMATCHED);
15794
15795 salt_pos++;
15796
15797 char *hash_pos = strchr (salt_pos, '$');
15798
15799 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15800
15801 u32 salt_len = hash_pos - salt_pos;
15802
15803 if (salt_len > 32) return (PARSER_SALT_LENGTH);
15804
15805 hash_pos++;
15806
15807 u32 hash_len = input_len - signature_len - 1 - salt_len - 1;
15808
15809 if (hash_len != 40) return (PARSER_SALT_LENGTH);
15810
15811 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
15812 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
15813 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
15814 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
15815 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
15816
15817 digest[0] -= SHA1M_A;
15818 digest[1] -= SHA1M_B;
15819 digest[2] -= SHA1M_C;
15820 digest[3] -= SHA1M_D;
15821 digest[4] -= SHA1M_E;
15822
15823 char *salt_buf_ptr = (char *) salt->salt_buf;
15824
15825 memcpy (salt_buf_ptr, salt_pos, salt_len);
15826
15827 salt->salt_len = salt_len;
15828
15829 return (PARSER_OK);
15830 }
15831
15832 int djangopbkdf2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15833 {
15834 if ((input_len < DISPLAY_LEN_MIN_10000) || (input_len > DISPLAY_LEN_MAX_10000)) return (PARSER_GLOBAL_LENGTH);
15835
15836 if (memcmp (SIGNATURE_DJANGOPBKDF2, input_buf, 14)) return (PARSER_SIGNATURE_UNMATCHED);
15837
15838 u32 *digest = (u32 *) hash_buf->digest;
15839
15840 salt_t *salt = hash_buf->salt;
15841
15842 pbkdf2_sha256_t *pbkdf2_sha256 = (pbkdf2_sha256_t *) hash_buf->esalt;
15843
15844 /**
15845 * parse line
15846 */
15847
15848 char *iter_pos = input_buf + 14;
15849
15850 const int iter = atoi (iter_pos);
15851
15852 if (iter < 1) return (PARSER_SALT_ITERATION);
15853
15854 salt->salt_iter = iter - 1;
15855
15856 char *salt_pos = strchr (iter_pos, '$');
15857
15858 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15859
15860 salt_pos++;
15861
15862 char *hash_pos = strchr (salt_pos, '$');
15863
15864 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15865
15866 const uint salt_len = hash_pos - salt_pos;
15867
15868 hash_pos++;
15869
15870 char *salt_buf_ptr = (char *) pbkdf2_sha256->salt_buf;
15871
15872 memcpy (salt_buf_ptr, salt_pos, salt_len);
15873
15874 salt->salt_len = salt_len;
15875
15876 salt_buf_ptr[salt_len + 3] = 0x01;
15877 salt_buf_ptr[salt_len + 4] = 0x80;
15878
15879 // add some stuff to normal salt to make sorted happy
15880
15881 salt->salt_buf[0] = pbkdf2_sha256->salt_buf[0];
15882 salt->salt_buf[1] = pbkdf2_sha256->salt_buf[1];
15883 salt->salt_buf[2] = pbkdf2_sha256->salt_buf[2];
15884 salt->salt_buf[3] = pbkdf2_sha256->salt_buf[3];
15885 salt->salt_buf[4] = salt->salt_iter;
15886
15887 // base64 decode hash
15888
15889 u8 tmp_buf[100] = { 0 };
15890
15891 uint hash_len = input_len - (hash_pos - input_buf);
15892
15893 if (hash_len != 44) return (PARSER_HASH_LENGTH);
15894
15895 base64_decode (base64_to_int, (const u8 *) hash_pos, hash_len, tmp_buf);
15896
15897 memcpy (digest, tmp_buf, 32);
15898
15899 digest[0] = byte_swap_32 (digest[0]);
15900 digest[1] = byte_swap_32 (digest[1]);
15901 digest[2] = byte_swap_32 (digest[2]);
15902 digest[3] = byte_swap_32 (digest[3]);
15903 digest[4] = byte_swap_32 (digest[4]);
15904 digest[5] = byte_swap_32 (digest[5]);
15905 digest[6] = byte_swap_32 (digest[6]);
15906 digest[7] = byte_swap_32 (digest[7]);
15907
15908 return (PARSER_OK);
15909 }
15910
15911 int siphash_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15912 {
15913 if ((input_len < DISPLAY_LEN_MIN_10100) || (input_len > DISPLAY_LEN_MAX_10100)) return (PARSER_GLOBAL_LENGTH);
15914
15915 u32 *digest = (u32 *) hash_buf->digest;
15916
15917 salt_t *salt = hash_buf->salt;
15918
15919 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
15920 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
15921 digest[2] = 0;
15922 digest[3] = 0;
15923
15924 digest[0] = byte_swap_32 (digest[0]);
15925 digest[1] = byte_swap_32 (digest[1]);
15926
15927 if (input_buf[16] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
15928 if (input_buf[18] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
15929 if (input_buf[20] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
15930
15931 char iter_c = input_buf[17];
15932 char iter_d = input_buf[19];
15933
15934 // atm only defaults, let's see if there's more request
15935 if (iter_c != '2') return (PARSER_SALT_ITERATION);
15936 if (iter_d != '4') return (PARSER_SALT_ITERATION);
15937
15938 char *salt_buf = input_buf + 16 + 1 + 1 + 1 + 1 + 1;
15939
15940 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_buf[ 0]);
15941 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_buf[ 8]);
15942 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_buf[16]);
15943 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &salt_buf[24]);
15944
15945 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
15946 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
15947 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
15948 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
15949
15950 salt->salt_len = 16;
15951
15952 return (PARSER_OK);
15953 }
15954
15955 int crammd5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
15956 {
15957 if ((input_len < DISPLAY_LEN_MIN_10200) || (input_len > DISPLAY_LEN_MAX_10200)) return (PARSER_GLOBAL_LENGTH);
15958
15959 if (memcmp (SIGNATURE_CRAM_MD5, input_buf, 10)) return (PARSER_SIGNATURE_UNMATCHED);
15960
15961 u32 *digest = (u32 *) hash_buf->digest;
15962
15963 cram_md5_t *cram_md5 = (cram_md5_t *) hash_buf->esalt;
15964
15965 salt_t *salt = hash_buf->salt;
15966
15967 char *salt_pos = input_buf + 10;
15968
15969 char *hash_pos = strchr (salt_pos, '$');
15970
15971 uint salt_len = hash_pos - salt_pos;
15972
15973 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
15974
15975 hash_pos++;
15976
15977 uint hash_len = input_len - 10 - salt_len - 1;
15978
15979 // base64 decode salt
15980
15981 u8 tmp_buf[100] = { 0 };
15982
15983 salt_len = base64_decode (base64_to_int, (const u8 *) salt_pos, salt_len, tmp_buf);
15984
15985 if (salt_len > 55) return (PARSER_SALT_LENGTH);
15986
15987 tmp_buf[salt_len] = 0x80;
15988
15989 memcpy (&salt->salt_buf, tmp_buf, salt_len + 1);
15990
15991 salt->salt_len = salt_len;
15992
15993 // base64 decode salt
15994
15995 memset (tmp_buf, 0, sizeof (tmp_buf));
15996
15997 hash_len = base64_decode (base64_to_int, (const u8 *) hash_pos, hash_len, tmp_buf);
15998
15999 uint user_len = hash_len - 32;
16000
16001 const u8 *tmp_hash = tmp_buf + user_len;
16002
16003 user_len--; // skip the trailing space
16004
16005 digest[0] = hex_to_u32 (&tmp_hash[ 0]);
16006 digest[1] = hex_to_u32 (&tmp_hash[ 8]);
16007 digest[2] = hex_to_u32 (&tmp_hash[16]);
16008 digest[3] = hex_to_u32 (&tmp_hash[24]);
16009
16010 digest[0] = byte_swap_32 (digest[0]);
16011 digest[1] = byte_swap_32 (digest[1]);
16012 digest[2] = byte_swap_32 (digest[2]);
16013 digest[3] = byte_swap_32 (digest[3]);
16014
16015 // store username for host only (output hash if cracked)
16016
16017 memset (cram_md5->user, 0, sizeof (cram_md5->user));
16018 memcpy (cram_md5->user, tmp_buf, user_len);
16019
16020 return (PARSER_OK);
16021 }
16022
16023 int saph_sha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16024 {
16025 if ((input_len < DISPLAY_LEN_MIN_10300) || (input_len > DISPLAY_LEN_MAX_10300)) return (PARSER_GLOBAL_LENGTH);
16026
16027 if (memcmp (SIGNATURE_SAPH_SHA1, input_buf, 10)) return (PARSER_SIGNATURE_UNMATCHED);
16028
16029 u32 *digest = (u32 *) hash_buf->digest;
16030
16031 salt_t *salt = hash_buf->salt;
16032
16033 char *iter_pos = input_buf + 10;
16034
16035 u32 iter = atoi (iter_pos);
16036
16037 if (iter < 1)
16038 {
16039 return (PARSER_SALT_ITERATION);
16040 }
16041
16042 iter--; // first iteration is special
16043
16044 salt->salt_iter = iter;
16045
16046 char *base64_pos = strchr (iter_pos, '}');
16047
16048 if (base64_pos == NULL)
16049 {
16050 return (PARSER_SIGNATURE_UNMATCHED);
16051 }
16052
16053 base64_pos++;
16054
16055 // base64 decode salt
16056
16057 u32 base64_len = input_len - (base64_pos - input_buf);
16058
16059 u8 tmp_buf[100] = { 0 };
16060
16061 u32 decoded_len = base64_decode (base64_to_int, (const u8 *) base64_pos, base64_len, tmp_buf);
16062
16063 if (decoded_len < 24)
16064 {
16065 return (PARSER_SALT_LENGTH);
16066 }
16067
16068 // copy the salt
16069
16070 uint salt_len = decoded_len - 20;
16071
16072 if (salt_len < 4) return (PARSER_SALT_LENGTH);
16073 if (salt_len > 16) return (PARSER_SALT_LENGTH);
16074
16075 memcpy (&salt->salt_buf, tmp_buf + 20, salt_len);
16076
16077 salt->salt_len = salt_len;
16078
16079 // set digest
16080
16081 u32 *digest_ptr = (u32*) tmp_buf;
16082
16083 digest[0] = byte_swap_32 (digest_ptr[0]);
16084 digest[1] = byte_swap_32 (digest_ptr[1]);
16085 digest[2] = byte_swap_32 (digest_ptr[2]);
16086 digest[3] = byte_swap_32 (digest_ptr[3]);
16087 digest[4] = byte_swap_32 (digest_ptr[4]);
16088
16089 return (PARSER_OK);
16090 }
16091
16092 int redmine_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16093 {
16094 if ((input_len < DISPLAY_LEN_MIN_7600) || (input_len > DISPLAY_LEN_MAX_7600)) return (PARSER_GLOBAL_LENGTH);
16095
16096 u32 *digest = (u32 *) hash_buf->digest;
16097
16098 salt_t *salt = hash_buf->salt;
16099
16100 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
16101 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
16102 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
16103 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
16104 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
16105
16106 if (input_buf[40] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
16107
16108 uint salt_len = input_len - 40 - 1;
16109
16110 char *salt_buf = input_buf + 40 + 1;
16111
16112 char *salt_buf_ptr = (char *) salt->salt_buf;
16113
16114 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
16115
16116 if (salt_len != 32) return (PARSER_SALT_LENGTH);
16117
16118 salt->salt_len = salt_len;
16119
16120 return (PARSER_OK);
16121 }
16122
16123 int pdf11_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16124 {
16125 if ((input_len < DISPLAY_LEN_MIN_10400) || (input_len > DISPLAY_LEN_MAX_10400)) return (PARSER_GLOBAL_LENGTH);
16126
16127 if ((memcmp (SIGNATURE_PDF, input_buf, 5)) && (memcmp (SIGNATURE_PDF, input_buf, 5))) return (PARSER_SIGNATURE_UNMATCHED);
16128
16129 u32 *digest = (u32 *) hash_buf->digest;
16130
16131 salt_t *salt = hash_buf->salt;
16132
16133 pdf_t *pdf = (pdf_t *) hash_buf->esalt;
16134
16135 /**
16136 * parse line
16137 */
16138
16139 char *V_pos = input_buf + 5;
16140
16141 char *R_pos = strchr (V_pos, '*');
16142
16143 if (R_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16144
16145 u32 V_len = R_pos - V_pos;
16146
16147 R_pos++;
16148
16149 char *bits_pos = strchr (R_pos, '*');
16150
16151 if (bits_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16152
16153 u32 R_len = bits_pos - R_pos;
16154
16155 bits_pos++;
16156
16157 char *P_pos = strchr (bits_pos, '*');
16158
16159 if (P_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16160
16161 u32 bits_len = P_pos - bits_pos;
16162
16163 P_pos++;
16164
16165 char *enc_md_pos = strchr (P_pos, '*');
16166
16167 if (enc_md_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16168
16169 u32 P_len = enc_md_pos - P_pos;
16170
16171 enc_md_pos++;
16172
16173 char *id_len_pos = strchr (enc_md_pos, '*');
16174
16175 if (id_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16176
16177 u32 enc_md_len = id_len_pos - enc_md_pos;
16178
16179 id_len_pos++;
16180
16181 char *id_buf_pos = strchr (id_len_pos, '*');
16182
16183 if (id_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16184
16185 u32 id_len_len = id_buf_pos - id_len_pos;
16186
16187 id_buf_pos++;
16188
16189 char *u_len_pos = strchr (id_buf_pos, '*');
16190
16191 if (u_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16192
16193 u32 id_buf_len = u_len_pos - id_buf_pos;
16194
16195 if (id_buf_len != 32) return (PARSER_SALT_LENGTH);
16196
16197 u_len_pos++;
16198
16199 char *u_buf_pos = strchr (u_len_pos, '*');
16200
16201 if (u_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16202
16203 u32 u_len_len = u_buf_pos - u_len_pos;
16204
16205 u_buf_pos++;
16206
16207 char *o_len_pos = strchr (u_buf_pos, '*');
16208
16209 if (o_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16210
16211 u32 u_buf_len = o_len_pos - u_buf_pos;
16212
16213 if (u_buf_len != 64) return (PARSER_SALT_LENGTH);
16214
16215 o_len_pos++;
16216
16217 char *o_buf_pos = strchr (o_len_pos, '*');
16218
16219 if (o_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16220
16221 u32 o_len_len = o_buf_pos - o_len_pos;
16222
16223 o_buf_pos++;
16224
16225 u32 o_buf_len = input_len - 5 - V_len - 1 - R_len - 1 - bits_len - 1 - P_len - 1 - enc_md_len - 1 - id_len_len - 1 - id_buf_len - 1 - u_len_len - 1 - u_buf_len - 1 - o_len_len - 1;
16226
16227 if (o_buf_len != 64) return (PARSER_SALT_LENGTH);
16228
16229 // validate data
16230
16231 const int V = atoi (V_pos);
16232 const int R = atoi (R_pos);
16233 const int P = atoi (P_pos);
16234
16235 if (V != 1) return (PARSER_SALT_VALUE);
16236 if (R != 2) return (PARSER_SALT_VALUE);
16237
16238 const int enc_md = atoi (enc_md_pos);
16239
16240 if ((enc_md != 0) && (enc_md != 1)) return (PARSER_SALT_VALUE);
16241
16242 const int id_len = atoi (id_len_pos);
16243 const int u_len = atoi (u_len_pos);
16244 const int o_len = atoi (o_len_pos);
16245
16246 if (id_len != 16) return (PARSER_SALT_VALUE);
16247 if (u_len != 32) return (PARSER_SALT_VALUE);
16248 if (o_len != 32) return (PARSER_SALT_VALUE);
16249
16250 const int bits = atoi (bits_pos);
16251
16252 if (bits != 40) return (PARSER_SALT_VALUE);
16253
16254 // copy data to esalt
16255
16256 pdf->V = V;
16257 pdf->R = R;
16258 pdf->P = P;
16259
16260 pdf->enc_md = enc_md;
16261
16262 pdf->id_buf[0] = hex_to_u32 ((const u8 *) &id_buf_pos[ 0]);
16263 pdf->id_buf[1] = hex_to_u32 ((const u8 *) &id_buf_pos[ 8]);
16264 pdf->id_buf[2] = hex_to_u32 ((const u8 *) &id_buf_pos[16]);
16265 pdf->id_buf[3] = hex_to_u32 ((const u8 *) &id_buf_pos[24]);
16266 pdf->id_len = id_len;
16267
16268 pdf->u_buf[0] = hex_to_u32 ((const u8 *) &u_buf_pos[ 0]);
16269 pdf->u_buf[1] = hex_to_u32 ((const u8 *) &u_buf_pos[ 8]);
16270 pdf->u_buf[2] = hex_to_u32 ((const u8 *) &u_buf_pos[16]);
16271 pdf->u_buf[3] = hex_to_u32 ((const u8 *) &u_buf_pos[24]);
16272 pdf->u_buf[4] = hex_to_u32 ((const u8 *) &u_buf_pos[32]);
16273 pdf->u_buf[5] = hex_to_u32 ((const u8 *) &u_buf_pos[40]);
16274 pdf->u_buf[6] = hex_to_u32 ((const u8 *) &u_buf_pos[48]);
16275 pdf->u_buf[7] = hex_to_u32 ((const u8 *) &u_buf_pos[56]);
16276 pdf->u_len = u_len;
16277
16278 pdf->o_buf[0] = hex_to_u32 ((const u8 *) &o_buf_pos[ 0]);
16279 pdf->o_buf[1] = hex_to_u32 ((const u8 *) &o_buf_pos[ 8]);
16280 pdf->o_buf[2] = hex_to_u32 ((const u8 *) &o_buf_pos[16]);
16281 pdf->o_buf[3] = hex_to_u32 ((const u8 *) &o_buf_pos[24]);
16282 pdf->o_buf[4] = hex_to_u32 ((const u8 *) &o_buf_pos[32]);
16283 pdf->o_buf[5] = hex_to_u32 ((const u8 *) &o_buf_pos[40]);
16284 pdf->o_buf[6] = hex_to_u32 ((const u8 *) &o_buf_pos[48]);
16285 pdf->o_buf[7] = hex_to_u32 ((const u8 *) &o_buf_pos[56]);
16286 pdf->o_len = o_len;
16287
16288 pdf->id_buf[0] = byte_swap_32 (pdf->id_buf[0]);
16289 pdf->id_buf[1] = byte_swap_32 (pdf->id_buf[1]);
16290 pdf->id_buf[2] = byte_swap_32 (pdf->id_buf[2]);
16291 pdf->id_buf[3] = byte_swap_32 (pdf->id_buf[3]);
16292
16293 pdf->u_buf[0] = byte_swap_32 (pdf->u_buf[0]);
16294 pdf->u_buf[1] = byte_swap_32 (pdf->u_buf[1]);
16295 pdf->u_buf[2] = byte_swap_32 (pdf->u_buf[2]);
16296 pdf->u_buf[3] = byte_swap_32 (pdf->u_buf[3]);
16297 pdf->u_buf[4] = byte_swap_32 (pdf->u_buf[4]);
16298 pdf->u_buf[5] = byte_swap_32 (pdf->u_buf[5]);
16299 pdf->u_buf[6] = byte_swap_32 (pdf->u_buf[6]);
16300 pdf->u_buf[7] = byte_swap_32 (pdf->u_buf[7]);
16301
16302 pdf->o_buf[0] = byte_swap_32 (pdf->o_buf[0]);
16303 pdf->o_buf[1] = byte_swap_32 (pdf->o_buf[1]);
16304 pdf->o_buf[2] = byte_swap_32 (pdf->o_buf[2]);
16305 pdf->o_buf[3] = byte_swap_32 (pdf->o_buf[3]);
16306 pdf->o_buf[4] = byte_swap_32 (pdf->o_buf[4]);
16307 pdf->o_buf[5] = byte_swap_32 (pdf->o_buf[5]);
16308 pdf->o_buf[6] = byte_swap_32 (pdf->o_buf[6]);
16309 pdf->o_buf[7] = byte_swap_32 (pdf->o_buf[7]);
16310
16311 // we use ID for salt, maybe needs to change, we will see...
16312
16313 salt->salt_buf[0] = pdf->id_buf[0];
16314 salt->salt_buf[1] = pdf->id_buf[1];
16315 salt->salt_buf[2] = pdf->id_buf[2];
16316 salt->salt_buf[3] = pdf->id_buf[3];
16317 salt->salt_len = pdf->id_len;
16318
16319 digest[0] = pdf->u_buf[0];
16320 digest[1] = pdf->u_buf[1];
16321 digest[2] = pdf->u_buf[2];
16322 digest[3] = pdf->u_buf[3];
16323
16324 return (PARSER_OK);
16325 }
16326
16327 int pdf11cm1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16328 {
16329 return pdf11_parse_hash (input_buf, input_len, hash_buf);
16330 }
16331
16332 int pdf11cm2_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16333 {
16334 if ((input_len < DISPLAY_LEN_MIN_10420) || (input_len > DISPLAY_LEN_MAX_10420)) return (PARSER_GLOBAL_LENGTH);
16335
16336 if ((memcmp (SIGNATURE_PDF, input_buf, 5)) && (memcmp (SIGNATURE_PDF, input_buf, 5))) return (PARSER_SIGNATURE_UNMATCHED);
16337
16338 u32 *digest = (u32 *) hash_buf->digest;
16339
16340 salt_t *salt = hash_buf->salt;
16341
16342 pdf_t *pdf = (pdf_t *) hash_buf->esalt;
16343
16344 /**
16345 * parse line
16346 */
16347
16348 char *V_pos = input_buf + 5;
16349
16350 char *R_pos = strchr (V_pos, '*');
16351
16352 if (R_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16353
16354 u32 V_len = R_pos - V_pos;
16355
16356 R_pos++;
16357
16358 char *bits_pos = strchr (R_pos, '*');
16359
16360 if (bits_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16361
16362 u32 R_len = bits_pos - R_pos;
16363
16364 bits_pos++;
16365
16366 char *P_pos = strchr (bits_pos, '*');
16367
16368 if (P_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16369
16370 u32 bits_len = P_pos - bits_pos;
16371
16372 P_pos++;
16373
16374 char *enc_md_pos = strchr (P_pos, '*');
16375
16376 if (enc_md_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16377
16378 u32 P_len = enc_md_pos - P_pos;
16379
16380 enc_md_pos++;
16381
16382 char *id_len_pos = strchr (enc_md_pos, '*');
16383
16384 if (id_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16385
16386 u32 enc_md_len = id_len_pos - enc_md_pos;
16387
16388 id_len_pos++;
16389
16390 char *id_buf_pos = strchr (id_len_pos, '*');
16391
16392 if (id_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16393
16394 u32 id_len_len = id_buf_pos - id_len_pos;
16395
16396 id_buf_pos++;
16397
16398 char *u_len_pos = strchr (id_buf_pos, '*');
16399
16400 if (u_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16401
16402 u32 id_buf_len = u_len_pos - id_buf_pos;
16403
16404 if (id_buf_len != 32) return (PARSER_SALT_LENGTH);
16405
16406 u_len_pos++;
16407
16408 char *u_buf_pos = strchr (u_len_pos, '*');
16409
16410 if (u_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16411
16412 u32 u_len_len = u_buf_pos - u_len_pos;
16413
16414 u_buf_pos++;
16415
16416 char *o_len_pos = strchr (u_buf_pos, '*');
16417
16418 if (o_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16419
16420 u32 u_buf_len = o_len_pos - u_buf_pos;
16421
16422 if (u_buf_len != 64) return (PARSER_SALT_LENGTH);
16423
16424 o_len_pos++;
16425
16426 char *o_buf_pos = strchr (o_len_pos, '*');
16427
16428 if (o_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16429
16430 u32 o_len_len = o_buf_pos - o_len_pos;
16431
16432 o_buf_pos++;
16433
16434 char *rc4key_pos = strchr (o_buf_pos, ':');
16435
16436 if (rc4key_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16437
16438 u32 o_buf_len = rc4key_pos - o_buf_pos;
16439
16440 if (o_buf_len != 64) return (PARSER_SALT_LENGTH);
16441
16442 rc4key_pos++;
16443
16444 u32 rc4key_len = input_len - 5 - V_len - 1 - R_len - 1 - bits_len - 1 - P_len - 1 - enc_md_len - 1 - id_len_len - 1 - id_buf_len - 1 - u_len_len - 1 - u_buf_len - 1 - o_len_len - 1 - o_buf_len - 1;
16445
16446 if (rc4key_len != 10) return (PARSER_SALT_LENGTH);
16447
16448 // validate data
16449
16450 const int V = atoi (V_pos);
16451 const int R = atoi (R_pos);
16452 const int P = atoi (P_pos);
16453
16454 if (V != 1) return (PARSER_SALT_VALUE);
16455 if (R != 2) return (PARSER_SALT_VALUE);
16456
16457 const int enc_md = atoi (enc_md_pos);
16458
16459 if ((enc_md != 0) && (enc_md != 1)) return (PARSER_SALT_VALUE);
16460
16461 const int id_len = atoi (id_len_pos);
16462 const int u_len = atoi (u_len_pos);
16463 const int o_len = atoi (o_len_pos);
16464
16465 if (id_len != 16) return (PARSER_SALT_VALUE);
16466 if (u_len != 32) return (PARSER_SALT_VALUE);
16467 if (o_len != 32) return (PARSER_SALT_VALUE);
16468
16469 const int bits = atoi (bits_pos);
16470
16471 if (bits != 40) return (PARSER_SALT_VALUE);
16472
16473 // copy data to esalt
16474
16475 pdf->V = V;
16476 pdf->R = R;
16477 pdf->P = P;
16478
16479 pdf->enc_md = enc_md;
16480
16481 pdf->id_buf[0] = hex_to_u32 ((const u8 *) &id_buf_pos[ 0]);
16482 pdf->id_buf[1] = hex_to_u32 ((const u8 *) &id_buf_pos[ 8]);
16483 pdf->id_buf[2] = hex_to_u32 ((const u8 *) &id_buf_pos[16]);
16484 pdf->id_buf[3] = hex_to_u32 ((const u8 *) &id_buf_pos[24]);
16485 pdf->id_len = id_len;
16486
16487 pdf->u_buf[0] = hex_to_u32 ((const u8 *) &u_buf_pos[ 0]);
16488 pdf->u_buf[1] = hex_to_u32 ((const u8 *) &u_buf_pos[ 8]);
16489 pdf->u_buf[2] = hex_to_u32 ((const u8 *) &u_buf_pos[16]);
16490 pdf->u_buf[3] = hex_to_u32 ((const u8 *) &u_buf_pos[24]);
16491 pdf->u_buf[4] = hex_to_u32 ((const u8 *) &u_buf_pos[32]);
16492 pdf->u_buf[5] = hex_to_u32 ((const u8 *) &u_buf_pos[40]);
16493 pdf->u_buf[6] = hex_to_u32 ((const u8 *) &u_buf_pos[48]);
16494 pdf->u_buf[7] = hex_to_u32 ((const u8 *) &u_buf_pos[56]);
16495 pdf->u_len = u_len;
16496
16497 pdf->o_buf[0] = hex_to_u32 ((const u8 *) &o_buf_pos[ 0]);
16498 pdf->o_buf[1] = hex_to_u32 ((const u8 *) &o_buf_pos[ 8]);
16499 pdf->o_buf[2] = hex_to_u32 ((const u8 *) &o_buf_pos[16]);
16500 pdf->o_buf[3] = hex_to_u32 ((const u8 *) &o_buf_pos[24]);
16501 pdf->o_buf[4] = hex_to_u32 ((const u8 *) &o_buf_pos[32]);
16502 pdf->o_buf[5] = hex_to_u32 ((const u8 *) &o_buf_pos[40]);
16503 pdf->o_buf[6] = hex_to_u32 ((const u8 *) &o_buf_pos[48]);
16504 pdf->o_buf[7] = hex_to_u32 ((const u8 *) &o_buf_pos[56]);
16505 pdf->o_len = o_len;
16506
16507 pdf->id_buf[0] = byte_swap_32 (pdf->id_buf[0]);
16508 pdf->id_buf[1] = byte_swap_32 (pdf->id_buf[1]);
16509 pdf->id_buf[2] = byte_swap_32 (pdf->id_buf[2]);
16510 pdf->id_buf[3] = byte_swap_32 (pdf->id_buf[3]);
16511
16512 pdf->u_buf[0] = byte_swap_32 (pdf->u_buf[0]);
16513 pdf->u_buf[1] = byte_swap_32 (pdf->u_buf[1]);
16514 pdf->u_buf[2] = byte_swap_32 (pdf->u_buf[2]);
16515 pdf->u_buf[3] = byte_swap_32 (pdf->u_buf[3]);
16516 pdf->u_buf[4] = byte_swap_32 (pdf->u_buf[4]);
16517 pdf->u_buf[5] = byte_swap_32 (pdf->u_buf[5]);
16518 pdf->u_buf[6] = byte_swap_32 (pdf->u_buf[6]);
16519 pdf->u_buf[7] = byte_swap_32 (pdf->u_buf[7]);
16520
16521 pdf->o_buf[0] = byte_swap_32 (pdf->o_buf[0]);
16522 pdf->o_buf[1] = byte_swap_32 (pdf->o_buf[1]);
16523 pdf->o_buf[2] = byte_swap_32 (pdf->o_buf[2]);
16524 pdf->o_buf[3] = byte_swap_32 (pdf->o_buf[3]);
16525 pdf->o_buf[4] = byte_swap_32 (pdf->o_buf[4]);
16526 pdf->o_buf[5] = byte_swap_32 (pdf->o_buf[5]);
16527 pdf->o_buf[6] = byte_swap_32 (pdf->o_buf[6]);
16528 pdf->o_buf[7] = byte_swap_32 (pdf->o_buf[7]);
16529
16530 pdf->rc4key[1] = 0;
16531 pdf->rc4key[0] = 0;
16532
16533 pdf->rc4key[0] |= hex_convert (rc4key_pos[0]) << 28;
16534 pdf->rc4key[0] |= hex_convert (rc4key_pos[1]) << 24;
16535 pdf->rc4key[0] |= hex_convert (rc4key_pos[2]) << 20;
16536 pdf->rc4key[0] |= hex_convert (rc4key_pos[3]) << 16;
16537 pdf->rc4key[0] |= hex_convert (rc4key_pos[4]) << 12;
16538 pdf->rc4key[0] |= hex_convert (rc4key_pos[5]) << 8;
16539 pdf->rc4key[0] |= hex_convert (rc4key_pos[6]) << 4;
16540 pdf->rc4key[0] |= hex_convert (rc4key_pos[7]) << 0;
16541 pdf->rc4key[1] |= hex_convert (rc4key_pos[8]) << 28;
16542 pdf->rc4key[1] |= hex_convert (rc4key_pos[9]) << 24;
16543
16544 pdf->rc4key[0] = byte_swap_32 (pdf->rc4key[0]);
16545 pdf->rc4key[1] = byte_swap_32 (pdf->rc4key[1]);
16546
16547 // we use ID for salt, maybe needs to change, we will see...
16548
16549 salt->salt_buf[0] = pdf->id_buf[0];
16550 salt->salt_buf[1] = pdf->id_buf[1];
16551 salt->salt_buf[2] = pdf->id_buf[2];
16552 salt->salt_buf[3] = pdf->id_buf[3];
16553 salt->salt_buf[4] = pdf->u_buf[0];
16554 salt->salt_buf[5] = pdf->u_buf[1];
16555 salt->salt_buf[6] = pdf->o_buf[0];
16556 salt->salt_buf[7] = pdf->o_buf[1];
16557 salt->salt_len = pdf->id_len + 16;
16558
16559 digest[0] = pdf->rc4key[0];
16560 digest[1] = pdf->rc4key[1];
16561 digest[2] = 0;
16562 digest[3] = 0;
16563
16564 return (PARSER_OK);
16565 }
16566
16567 int pdf14_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16568 {
16569 if ((input_len < DISPLAY_LEN_MIN_10500) || (input_len > DISPLAY_LEN_MAX_10500)) return (PARSER_GLOBAL_LENGTH);
16570
16571 if ((memcmp (SIGNATURE_PDF, input_buf, 5)) && (memcmp (SIGNATURE_PDF, input_buf, 5))) return (PARSER_SIGNATURE_UNMATCHED);
16572
16573 u32 *digest = (u32 *) hash_buf->digest;
16574
16575 salt_t *salt = hash_buf->salt;
16576
16577 pdf_t *pdf = (pdf_t *) hash_buf->esalt;
16578
16579 /**
16580 * parse line
16581 */
16582
16583 char *V_pos = input_buf + 5;
16584
16585 char *R_pos = strchr (V_pos, '*');
16586
16587 if (R_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16588
16589 u32 V_len = R_pos - V_pos;
16590
16591 R_pos++;
16592
16593 char *bits_pos = strchr (R_pos, '*');
16594
16595 if (bits_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16596
16597 u32 R_len = bits_pos - R_pos;
16598
16599 bits_pos++;
16600
16601 char *P_pos = strchr (bits_pos, '*');
16602
16603 if (P_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16604
16605 u32 bits_len = P_pos - bits_pos;
16606
16607 P_pos++;
16608
16609 char *enc_md_pos = strchr (P_pos, '*');
16610
16611 if (enc_md_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16612
16613 u32 P_len = enc_md_pos - P_pos;
16614
16615 enc_md_pos++;
16616
16617 char *id_len_pos = strchr (enc_md_pos, '*');
16618
16619 if (id_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16620
16621 u32 enc_md_len = id_len_pos - enc_md_pos;
16622
16623 id_len_pos++;
16624
16625 char *id_buf_pos = strchr (id_len_pos, '*');
16626
16627 if (id_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16628
16629 u32 id_len_len = id_buf_pos - id_len_pos;
16630
16631 id_buf_pos++;
16632
16633 char *u_len_pos = strchr (id_buf_pos, '*');
16634
16635 if (u_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16636
16637 u32 id_buf_len = u_len_pos - id_buf_pos;
16638
16639 if ((id_buf_len != 32) && (id_buf_len != 64)) return (PARSER_SALT_LENGTH);
16640
16641 u_len_pos++;
16642
16643 char *u_buf_pos = strchr (u_len_pos, '*');
16644
16645 if (u_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16646
16647 u32 u_len_len = u_buf_pos - u_len_pos;
16648
16649 u_buf_pos++;
16650
16651 char *o_len_pos = strchr (u_buf_pos, '*');
16652
16653 if (o_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16654
16655 u32 u_buf_len = o_len_pos - u_buf_pos;
16656
16657 if (u_buf_len != 64) return (PARSER_SALT_LENGTH);
16658
16659 o_len_pos++;
16660
16661 char *o_buf_pos = strchr (o_len_pos, '*');
16662
16663 if (o_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16664
16665 u32 o_len_len = o_buf_pos - o_len_pos;
16666
16667 o_buf_pos++;
16668
16669 u32 o_buf_len = input_len - 5 - V_len - 1 - R_len - 1 - bits_len - 1 - P_len - 1 - enc_md_len - 1 - id_len_len - 1 - id_buf_len - 1 - u_len_len - 1 - u_buf_len - 1 - o_len_len - 1;
16670
16671 if (o_buf_len != 64) return (PARSER_SALT_LENGTH);
16672
16673 // validate data
16674
16675 const int V = atoi (V_pos);
16676 const int R = atoi (R_pos);
16677 const int P = atoi (P_pos);
16678
16679 int vr_ok = 0;
16680
16681 if ((V == 2) && (R == 3)) vr_ok = 1;
16682 if ((V == 4) && (R == 4)) vr_ok = 1;
16683
16684 if (vr_ok == 0) return (PARSER_SALT_VALUE);
16685
16686 const int id_len = atoi (id_len_pos);
16687 const int u_len = atoi (u_len_pos);
16688 const int o_len = atoi (o_len_pos);
16689
16690 if ((id_len != 16) && (id_len != 32)) return (PARSER_SALT_VALUE);
16691
16692 if (u_len != 32) return (PARSER_SALT_VALUE);
16693 if (o_len != 32) return (PARSER_SALT_VALUE);
16694
16695 const int bits = atoi (bits_pos);
16696
16697 if (bits != 128) return (PARSER_SALT_VALUE);
16698
16699 int enc_md = 1;
16700
16701 if (R >= 4)
16702 {
16703 enc_md = atoi (enc_md_pos);
16704 }
16705
16706 // copy data to esalt
16707
16708 pdf->V = V;
16709 pdf->R = R;
16710 pdf->P = P;
16711
16712 pdf->enc_md = enc_md;
16713
16714 pdf->id_buf[0] = hex_to_u32 ((const u8 *) &id_buf_pos[ 0]);
16715 pdf->id_buf[1] = hex_to_u32 ((const u8 *) &id_buf_pos[ 8]);
16716 pdf->id_buf[2] = hex_to_u32 ((const u8 *) &id_buf_pos[16]);
16717 pdf->id_buf[3] = hex_to_u32 ((const u8 *) &id_buf_pos[24]);
16718
16719 if (id_len == 32)
16720 {
16721 pdf->id_buf[4] = hex_to_u32 ((const u8 *) &id_buf_pos[32]);
16722 pdf->id_buf[5] = hex_to_u32 ((const u8 *) &id_buf_pos[40]);
16723 pdf->id_buf[6] = hex_to_u32 ((const u8 *) &id_buf_pos[48]);
16724 pdf->id_buf[7] = hex_to_u32 ((const u8 *) &id_buf_pos[56]);
16725 }
16726
16727 pdf->id_len = id_len;
16728
16729 pdf->u_buf[0] = hex_to_u32 ((const u8 *) &u_buf_pos[ 0]);
16730 pdf->u_buf[1] = hex_to_u32 ((const u8 *) &u_buf_pos[ 8]);
16731 pdf->u_buf[2] = hex_to_u32 ((const u8 *) &u_buf_pos[16]);
16732 pdf->u_buf[3] = hex_to_u32 ((const u8 *) &u_buf_pos[24]);
16733 pdf->u_buf[4] = hex_to_u32 ((const u8 *) &u_buf_pos[32]);
16734 pdf->u_buf[5] = hex_to_u32 ((const u8 *) &u_buf_pos[40]);
16735 pdf->u_buf[6] = hex_to_u32 ((const u8 *) &u_buf_pos[48]);
16736 pdf->u_buf[7] = hex_to_u32 ((const u8 *) &u_buf_pos[56]);
16737 pdf->u_len = u_len;
16738
16739 pdf->o_buf[0] = hex_to_u32 ((const u8 *) &o_buf_pos[ 0]);
16740 pdf->o_buf[1] = hex_to_u32 ((const u8 *) &o_buf_pos[ 8]);
16741 pdf->o_buf[2] = hex_to_u32 ((const u8 *) &o_buf_pos[16]);
16742 pdf->o_buf[3] = hex_to_u32 ((const u8 *) &o_buf_pos[24]);
16743 pdf->o_buf[4] = hex_to_u32 ((const u8 *) &o_buf_pos[32]);
16744 pdf->o_buf[5] = hex_to_u32 ((const u8 *) &o_buf_pos[40]);
16745 pdf->o_buf[6] = hex_to_u32 ((const u8 *) &o_buf_pos[48]);
16746 pdf->o_buf[7] = hex_to_u32 ((const u8 *) &o_buf_pos[56]);
16747 pdf->o_len = o_len;
16748
16749 pdf->id_buf[0] = byte_swap_32 (pdf->id_buf[0]);
16750 pdf->id_buf[1] = byte_swap_32 (pdf->id_buf[1]);
16751 pdf->id_buf[2] = byte_swap_32 (pdf->id_buf[2]);
16752 pdf->id_buf[3] = byte_swap_32 (pdf->id_buf[3]);
16753
16754 if (id_len == 32)
16755 {
16756 pdf->id_buf[4] = byte_swap_32 (pdf->id_buf[4]);
16757 pdf->id_buf[5] = byte_swap_32 (pdf->id_buf[5]);
16758 pdf->id_buf[6] = byte_swap_32 (pdf->id_buf[6]);
16759 pdf->id_buf[7] = byte_swap_32 (pdf->id_buf[7]);
16760 }
16761
16762 pdf->u_buf[0] = byte_swap_32 (pdf->u_buf[0]);
16763 pdf->u_buf[1] = byte_swap_32 (pdf->u_buf[1]);
16764 pdf->u_buf[2] = byte_swap_32 (pdf->u_buf[2]);
16765 pdf->u_buf[3] = byte_swap_32 (pdf->u_buf[3]);
16766 pdf->u_buf[4] = byte_swap_32 (pdf->u_buf[4]);
16767 pdf->u_buf[5] = byte_swap_32 (pdf->u_buf[5]);
16768 pdf->u_buf[6] = byte_swap_32 (pdf->u_buf[6]);
16769 pdf->u_buf[7] = byte_swap_32 (pdf->u_buf[7]);
16770
16771 pdf->o_buf[0] = byte_swap_32 (pdf->o_buf[0]);
16772 pdf->o_buf[1] = byte_swap_32 (pdf->o_buf[1]);
16773 pdf->o_buf[2] = byte_swap_32 (pdf->o_buf[2]);
16774 pdf->o_buf[3] = byte_swap_32 (pdf->o_buf[3]);
16775 pdf->o_buf[4] = byte_swap_32 (pdf->o_buf[4]);
16776 pdf->o_buf[5] = byte_swap_32 (pdf->o_buf[5]);
16777 pdf->o_buf[6] = byte_swap_32 (pdf->o_buf[6]);
16778 pdf->o_buf[7] = byte_swap_32 (pdf->o_buf[7]);
16779
16780 // precompute rc4 data for later use
16781
16782 uint padding[8] =
16783 {
16784 0x5e4ebf28,
16785 0x418a754e,
16786 0x564e0064,
16787 0x0801faff,
16788 0xb6002e2e,
16789 0x803e68d0,
16790 0xfea90c2f,
16791 0x7a695364
16792 };
16793
16794 // md5
16795
16796 uint salt_pc_block[32] = { 0 };
16797
16798 char *salt_pc_ptr = (char *) salt_pc_block;
16799
16800 memcpy (salt_pc_ptr, padding, 32);
16801 memcpy (salt_pc_ptr + 32, pdf->id_buf, pdf->id_len);
16802
16803 uint salt_pc_digest[4] = { 0 };
16804
16805 md5_complete_no_limit (salt_pc_digest, salt_pc_block, 32 + pdf->id_len);
16806
16807 pdf->rc4data[0] = salt_pc_digest[0];
16808 pdf->rc4data[1] = salt_pc_digest[1];
16809
16810 // we use ID for salt, maybe needs to change, we will see...
16811
16812 salt->salt_buf[0] = pdf->id_buf[0];
16813 salt->salt_buf[1] = pdf->id_buf[1];
16814 salt->salt_buf[2] = pdf->id_buf[2];
16815 salt->salt_buf[3] = pdf->id_buf[3];
16816 salt->salt_buf[4] = pdf->u_buf[0];
16817 salt->salt_buf[5] = pdf->u_buf[1];
16818 salt->salt_buf[6] = pdf->o_buf[0];
16819 salt->salt_buf[7] = pdf->o_buf[1];
16820 salt->salt_len = pdf->id_len + 16;
16821
16822 salt->salt_iter = ROUNDS_PDF14;
16823
16824 digest[0] = pdf->u_buf[0];
16825 digest[1] = pdf->u_buf[1];
16826 digest[2] = 0;
16827 digest[3] = 0;
16828
16829 return (PARSER_OK);
16830 }
16831
16832 int pdf17l3_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16833 {
16834 int ret = pdf17l8_parse_hash (input_buf, input_len, hash_buf);
16835
16836 if (ret != PARSER_OK)
16837 {
16838 return ret;
16839 }
16840
16841 u32 *digest = (u32 *) hash_buf->digest;
16842
16843 salt_t *salt = hash_buf->salt;
16844
16845 digest[0] -= SHA256M_A;
16846 digest[1] -= SHA256M_B;
16847 digest[2] -= SHA256M_C;
16848 digest[3] -= SHA256M_D;
16849 digest[4] -= SHA256M_E;
16850 digest[5] -= SHA256M_F;
16851 digest[6] -= SHA256M_G;
16852 digest[7] -= SHA256M_H;
16853
16854 salt->salt_buf[2] = 0x80;
16855
16856 return (PARSER_OK);
16857 }
16858
16859 int pdf17l8_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
16860 {
16861 if ((input_len < DISPLAY_LEN_MIN_10600) || (input_len > DISPLAY_LEN_MAX_10600)) return (PARSER_GLOBAL_LENGTH);
16862
16863 if ((memcmp (SIGNATURE_PDF, input_buf, 5)) && (memcmp (SIGNATURE_PDF, input_buf, 5))) return (PARSER_SIGNATURE_UNMATCHED);
16864
16865 u32 *digest = (u32 *) hash_buf->digest;
16866
16867 salt_t *salt = hash_buf->salt;
16868
16869 pdf_t *pdf = (pdf_t *) hash_buf->esalt;
16870
16871 /**
16872 * parse line
16873 */
16874
16875 char *V_pos = input_buf + 5;
16876
16877 char *R_pos = strchr (V_pos, '*');
16878
16879 if (R_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16880
16881 u32 V_len = R_pos - V_pos;
16882
16883 R_pos++;
16884
16885 char *bits_pos = strchr (R_pos, '*');
16886
16887 if (bits_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16888
16889 u32 R_len = bits_pos - R_pos;
16890
16891 bits_pos++;
16892
16893 char *P_pos = strchr (bits_pos, '*');
16894
16895 if (P_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16896
16897 u32 bits_len = P_pos - bits_pos;
16898
16899 P_pos++;
16900
16901 char *enc_md_pos = strchr (P_pos, '*');
16902
16903 if (enc_md_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16904
16905 u32 P_len = enc_md_pos - P_pos;
16906
16907 enc_md_pos++;
16908
16909 char *id_len_pos = strchr (enc_md_pos, '*');
16910
16911 if (id_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16912
16913 u32 enc_md_len = id_len_pos - enc_md_pos;
16914
16915 id_len_pos++;
16916
16917 char *id_buf_pos = strchr (id_len_pos, '*');
16918
16919 if (id_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16920
16921 u32 id_len_len = id_buf_pos - id_len_pos;
16922
16923 id_buf_pos++;
16924
16925 char *u_len_pos = strchr (id_buf_pos, '*');
16926
16927 if (u_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16928
16929 u32 id_buf_len = u_len_pos - id_buf_pos;
16930
16931 u_len_pos++;
16932
16933 char *u_buf_pos = strchr (u_len_pos, '*');
16934
16935 if (u_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16936
16937 u32 u_len_len = u_buf_pos - u_len_pos;
16938
16939 u_buf_pos++;
16940
16941 char *o_len_pos = strchr (u_buf_pos, '*');
16942
16943 if (o_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16944
16945 u32 u_buf_len = o_len_pos - u_buf_pos;
16946
16947 o_len_pos++;
16948
16949 char *o_buf_pos = strchr (o_len_pos, '*');
16950
16951 if (o_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
16952
16953 u32 o_len_len = o_buf_pos - o_len_pos;
16954
16955 o_buf_pos++;
16956
16957 char *last = strchr (o_buf_pos, '*');
16958
16959 if (last == NULL) last = input_buf + input_len;
16960
16961 u32 o_buf_len = last - o_buf_pos;
16962
16963 // validate data
16964
16965 const int V = atoi (V_pos);
16966 const int R = atoi (R_pos);
16967
16968 int vr_ok = 0;
16969
16970 if ((V == 5) && (R == 5)) vr_ok = 1;
16971 if ((V == 5) && (R == 6)) vr_ok = 1;
16972
16973 if (vr_ok == 0) return (PARSER_SALT_VALUE);
16974
16975 const int bits = atoi (bits_pos);
16976
16977 if (bits != 256) return (PARSER_SALT_VALUE);
16978
16979 int enc_md = atoi (enc_md_pos);
16980
16981 if (enc_md != 1) return (PARSER_SALT_VALUE);
16982
16983 const uint id_len = atoi (id_len_pos);
16984 const uint u_len = atoi (u_len_pos);
16985 const uint o_len = atoi (o_len_pos);
16986
16987 if (V_len > 6) return (PARSER_SALT_LENGTH);
16988 if (R_len > 6) return (PARSER_SALT_LENGTH);
16989 if (P_len > 6) return (PARSER_SALT_LENGTH);
16990 if (id_len_len > 6) return (PARSER_SALT_LENGTH);
16991 if (u_len_len > 6) return (PARSER_SALT_LENGTH);
16992 if (o_len_len > 6) return (PARSER_SALT_LENGTH);
16993 if (bits_len > 6) return (PARSER_SALT_LENGTH);
16994 if (enc_md_len > 6) return (PARSER_SALT_LENGTH);
16995
16996 if ((id_len * 2) != id_buf_len) return (PARSER_SALT_VALUE);
16997 if ((u_len * 2) != u_buf_len) return (PARSER_SALT_VALUE);
16998 if ((o_len * 2) != o_buf_len) return (PARSER_SALT_VALUE);
16999
17000 // copy data to esalt
17001
17002 if (u_len < 40) return (PARSER_SALT_VALUE);
17003
17004 for (int i = 0, j = 0; i < 8 + 2; i += 1, j += 8)
17005 {
17006 pdf->u_buf[i] = hex_to_u32 ((const u8 *) &u_buf_pos[j]);
17007 }
17008
17009 salt->salt_buf[0] = pdf->u_buf[8];
17010 salt->salt_buf[1] = pdf->u_buf[9];
17011
17012 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
17013 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
17014
17015 salt->salt_len = 8;
17016 salt->salt_iter = ROUNDS_PDF17L8;
17017
17018 digest[0] = pdf->u_buf[0];
17019 digest[1] = pdf->u_buf[1];
17020 digest[2] = pdf->u_buf[2];
17021 digest[3] = pdf->u_buf[3];
17022 digest[4] = pdf->u_buf[4];
17023 digest[5] = pdf->u_buf[5];
17024 digest[6] = pdf->u_buf[6];
17025 digest[7] = pdf->u_buf[7];
17026
17027 return (PARSER_OK);
17028 }
17029
17030 int pbkdf2_sha256_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17031 {
17032 if ((input_len < DISPLAY_LEN_MIN_10900) || (input_len > DISPLAY_LEN_MAX_10900)) return (PARSER_GLOBAL_LENGTH);
17033
17034 if (memcmp (SIGNATURE_PBKDF2_SHA256, input_buf, 7)) return (PARSER_SIGNATURE_UNMATCHED);
17035
17036 u32 *digest = (u32 *) hash_buf->digest;
17037
17038 salt_t *salt = hash_buf->salt;
17039
17040 pbkdf2_sha256_t *pbkdf2_sha256 = (pbkdf2_sha256_t *) hash_buf->esalt;
17041
17042 /**
17043 * parse line
17044 */
17045
17046 // iterations
17047
17048 char *iter_pos = input_buf + 7;
17049
17050 u32 iter = atoi (iter_pos);
17051
17052 if (iter < 1) return (PARSER_SALT_ITERATION);
17053 if (iter > 999999) return (PARSER_SALT_ITERATION);
17054
17055 // first is *raw* salt
17056
17057 char *salt_pos = strchr (iter_pos, ':');
17058
17059 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17060
17061 salt_pos++;
17062
17063 char *hash_pos = strchr (salt_pos, ':');
17064
17065 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17066
17067 u32 salt_len = hash_pos - salt_pos;
17068
17069 if (salt_len > 64) return (PARSER_SALT_LENGTH);
17070
17071 hash_pos++;
17072
17073 u32 hash_b64_len = input_len - (hash_pos - input_buf);
17074
17075 if (hash_b64_len > 88) return (PARSER_HASH_LENGTH);
17076
17077 // decode salt
17078
17079 char *salt_buf_ptr = (char *) pbkdf2_sha256->salt_buf;
17080
17081 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
17082
17083 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
17084
17085 salt_buf_ptr[salt_len + 3] = 0x01;
17086 salt_buf_ptr[salt_len + 4] = 0x80;
17087
17088 salt->salt_len = salt_len;
17089 salt->salt_iter = iter - 1;
17090
17091 // decode hash
17092
17093 u8 tmp_buf[100] = { 0 };
17094
17095 int hash_len = base64_decode (base64_to_int, (const u8 *) hash_pos, hash_b64_len, tmp_buf);
17096
17097 if (hash_len < 16) return (PARSER_HASH_LENGTH);
17098
17099 memcpy (digest, tmp_buf, 16);
17100
17101 digest[0] = byte_swap_32 (digest[0]);
17102 digest[1] = byte_swap_32 (digest[1]);
17103 digest[2] = byte_swap_32 (digest[2]);
17104 digest[3] = byte_swap_32 (digest[3]);
17105
17106 // add some stuff to normal salt to make sorted happy
17107
17108 salt->salt_buf[0] = pbkdf2_sha256->salt_buf[0];
17109 salt->salt_buf[1] = pbkdf2_sha256->salt_buf[1];
17110 salt->salt_buf[2] = pbkdf2_sha256->salt_buf[2];
17111 salt->salt_buf[3] = pbkdf2_sha256->salt_buf[3];
17112 salt->salt_buf[4] = salt->salt_iter;
17113
17114 return (PARSER_OK);
17115 }
17116
17117 int prestashop_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17118 {
17119 if ((input_len < DISPLAY_LEN_MIN_11000) || (input_len > DISPLAY_LEN_MAX_11000)) return (PARSER_GLOBAL_LENGTH);
17120
17121 u32 *digest = (u32 *) hash_buf->digest;
17122
17123 salt_t *salt = hash_buf->salt;
17124
17125 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
17126 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
17127 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
17128 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
17129
17130 digest[0] = byte_swap_32 (digest[0]);
17131 digest[1] = byte_swap_32 (digest[1]);
17132 digest[2] = byte_swap_32 (digest[2]);
17133 digest[3] = byte_swap_32 (digest[3]);
17134
17135 if (input_buf[32] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
17136
17137 uint salt_len = input_len - 32 - 1;
17138
17139 char *salt_buf = input_buf + 32 + 1;
17140
17141 char *salt_buf_ptr = (char *) salt->salt_buf;
17142
17143 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
17144
17145 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
17146
17147 salt->salt_len = salt_len;
17148
17149 return (PARSER_OK);
17150 }
17151
17152 int postgresql_auth_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17153 {
17154 if ((input_len < DISPLAY_LEN_MIN_11100) || (input_len > DISPLAY_LEN_MAX_11100)) return (PARSER_GLOBAL_LENGTH);
17155
17156 if (memcmp (SIGNATURE_POSTGRESQL_AUTH, input_buf, 10)) return (PARSER_SIGNATURE_UNMATCHED);
17157
17158 u32 *digest = (u32 *) hash_buf->digest;
17159
17160 salt_t *salt = hash_buf->salt;
17161
17162 char *user_pos = input_buf + 10;
17163
17164 char *salt_pos = strchr (user_pos, '*');
17165
17166 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17167
17168 salt_pos++;
17169
17170 char *hash_pos = strchr (salt_pos, '*');
17171
17172 hash_pos++;
17173
17174 uint hash_len = input_len - (hash_pos - input_buf);
17175
17176 if (hash_len != 32) return (PARSER_HASH_LENGTH);
17177
17178 uint user_len = salt_pos - user_pos - 1;
17179
17180 uint salt_len = hash_pos - salt_pos - 1;
17181
17182 if (salt_len != 8) return (PARSER_SALT_LENGTH);
17183
17184 /*
17185 * store digest
17186 */
17187
17188 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
17189 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
17190 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
17191 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
17192
17193 digest[0] = byte_swap_32 (digest[0]);
17194 digest[1] = byte_swap_32 (digest[1]);
17195 digest[2] = byte_swap_32 (digest[2]);
17196 digest[3] = byte_swap_32 (digest[3]);
17197
17198 digest[0] -= MD5M_A;
17199 digest[1] -= MD5M_B;
17200 digest[2] -= MD5M_C;
17201 digest[3] -= MD5M_D;
17202
17203 /*
17204 * store salt
17205 */
17206
17207 char *salt_buf_ptr = (char *) salt->salt_buf;
17208
17209 // first 4 bytes are the "challenge"
17210
17211 salt_buf_ptr[0] = hex_to_u8 ((const u8 *) &salt_pos[0]);
17212 salt_buf_ptr[1] = hex_to_u8 ((const u8 *) &salt_pos[2]);
17213 salt_buf_ptr[2] = hex_to_u8 ((const u8 *) &salt_pos[4]);
17214 salt_buf_ptr[3] = hex_to_u8 ((const u8 *) &salt_pos[6]);
17215
17216 // append the user name
17217
17218 user_len = parse_and_store_salt (salt_buf_ptr + 4, user_pos, user_len);
17219
17220 salt->salt_len = 4 + user_len;
17221
17222 return (PARSER_OK);
17223 }
17224
17225 int mysql_auth_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17226 {
17227 if ((input_len < DISPLAY_LEN_MIN_11200) || (input_len > DISPLAY_LEN_MAX_11200)) return (PARSER_GLOBAL_LENGTH);
17228
17229 if (memcmp (SIGNATURE_MYSQL_AUTH, input_buf, 9)) return (PARSER_SIGNATURE_UNMATCHED);
17230
17231 u32 *digest = (u32 *) hash_buf->digest;
17232
17233 salt_t *salt = hash_buf->salt;
17234
17235 char *salt_pos = input_buf + 9;
17236
17237 char *hash_pos = strchr (salt_pos, '*');
17238
17239 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17240
17241 hash_pos++;
17242
17243 uint hash_len = input_len - (hash_pos - input_buf);
17244
17245 if (hash_len != 40) return (PARSER_HASH_LENGTH);
17246
17247 uint salt_len = hash_pos - salt_pos - 1;
17248
17249 if (salt_len != 40) return (PARSER_SALT_LENGTH);
17250
17251 /*
17252 * store digest
17253 */
17254
17255 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
17256 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
17257 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
17258 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
17259 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
17260
17261 /*
17262 * store salt
17263 */
17264
17265 char *salt_buf_ptr = (char *) salt->salt_buf;
17266
17267 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
17268
17269 salt->salt_len = salt_len;
17270
17271 return (PARSER_OK);
17272 }
17273
17274 int bitcoin_wallet_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17275 {
17276 if ((input_len < DISPLAY_LEN_MIN_11300) || (input_len > DISPLAY_LEN_MAX_11300)) return (PARSER_GLOBAL_LENGTH);
17277
17278 if (memcmp (SIGNATURE_BITCOIN_WALLET, input_buf, 9)) return (PARSER_SIGNATURE_UNMATCHED);
17279
17280 u32 *digest = (u32 *) hash_buf->digest;
17281
17282 salt_t *salt = hash_buf->salt;
17283
17284 bitcoin_wallet_t *bitcoin_wallet = (bitcoin_wallet_t *) hash_buf->esalt;
17285
17286 /**
17287 * parse line
17288 */
17289
17290 char *cry_master_len_pos = input_buf + 9;
17291
17292 char *cry_master_buf_pos = strchr (cry_master_len_pos, '$');
17293
17294 if (cry_master_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17295
17296 u32 cry_master_len_len = cry_master_buf_pos - cry_master_len_pos;
17297
17298 cry_master_buf_pos++;
17299
17300 char *cry_salt_len_pos = strchr (cry_master_buf_pos, '$');
17301
17302 if (cry_salt_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17303
17304 u32 cry_master_buf_len = cry_salt_len_pos - cry_master_buf_pos;
17305
17306 cry_salt_len_pos++;
17307
17308 char *cry_salt_buf_pos = strchr (cry_salt_len_pos, '$');
17309
17310 if (cry_salt_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17311
17312 u32 cry_salt_len_len = cry_salt_buf_pos - cry_salt_len_pos;
17313
17314 cry_salt_buf_pos++;
17315
17316 char *cry_rounds_pos = strchr (cry_salt_buf_pos, '$');
17317
17318 if (cry_rounds_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17319
17320 u32 cry_salt_buf_len = cry_rounds_pos - cry_salt_buf_pos;
17321
17322 cry_rounds_pos++;
17323
17324 char *ckey_len_pos = strchr (cry_rounds_pos, '$');
17325
17326 if (ckey_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17327
17328 u32 cry_rounds_len = ckey_len_pos - cry_rounds_pos;
17329
17330 ckey_len_pos++;
17331
17332 char *ckey_buf_pos = strchr (ckey_len_pos, '$');
17333
17334 if (ckey_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17335
17336 u32 ckey_len_len = ckey_buf_pos - ckey_len_pos;
17337
17338 ckey_buf_pos++;
17339
17340 char *public_key_len_pos = strchr (ckey_buf_pos, '$');
17341
17342 if (public_key_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17343
17344 u32 ckey_buf_len = public_key_len_pos - ckey_buf_pos;
17345
17346 public_key_len_pos++;
17347
17348 char *public_key_buf_pos = strchr (public_key_len_pos, '$');
17349
17350 if (public_key_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17351
17352 u32 public_key_len_len = public_key_buf_pos - public_key_len_pos;
17353
17354 public_key_buf_pos++;
17355
17356 u32 public_key_buf_len = input_len - 1 - 7 - 1 - cry_master_len_len - 1 - cry_master_buf_len - 1 - cry_salt_len_len - 1 - cry_salt_buf_len - 1 - cry_rounds_len - 1 - ckey_len_len - 1 - ckey_buf_len - 1 - public_key_len_len - 1;
17357
17358 const uint cry_master_len = atoi (cry_master_len_pos);
17359 const uint cry_salt_len = atoi (cry_salt_len_pos);
17360 const uint ckey_len = atoi (ckey_len_pos);
17361 const uint public_key_len = atoi (public_key_len_pos);
17362
17363 if (cry_master_buf_len != cry_master_len) return (PARSER_SALT_VALUE);
17364 if (cry_salt_buf_len != cry_salt_len) return (PARSER_SALT_VALUE);
17365 if (ckey_buf_len != ckey_len) return (PARSER_SALT_VALUE);
17366 if (public_key_buf_len != public_key_len) return (PARSER_SALT_VALUE);
17367
17368 for (uint i = 0, j = 0; j < cry_master_len; i += 1, j += 8)
17369 {
17370 bitcoin_wallet->cry_master_buf[i] = hex_to_u32 ((const u8 *) &cry_master_buf_pos[j]);
17371
17372 bitcoin_wallet->cry_master_buf[i] = byte_swap_32 (bitcoin_wallet->cry_master_buf[i]);
17373 }
17374
17375 for (uint i = 0, j = 0; j < ckey_len; i += 1, j += 8)
17376 {
17377 bitcoin_wallet->ckey_buf[i] = hex_to_u32 ((const u8 *) &ckey_buf_pos[j]);
17378
17379 bitcoin_wallet->ckey_buf[i] = byte_swap_32 (bitcoin_wallet->ckey_buf[i]);
17380 }
17381
17382 for (uint i = 0, j = 0; j < public_key_len; i += 1, j += 8)
17383 {
17384 bitcoin_wallet->public_key_buf[i] = hex_to_u32 ((const u8 *) &public_key_buf_pos[j]);
17385
17386 bitcoin_wallet->public_key_buf[i] = byte_swap_32 (bitcoin_wallet->public_key_buf[i]);
17387 }
17388
17389 bitcoin_wallet->cry_master_len = cry_master_len / 2;
17390 bitcoin_wallet->ckey_len = ckey_len / 2;
17391 bitcoin_wallet->public_key_len = public_key_len / 2;
17392
17393 /*
17394 * store digest (should be unique enought, hopefully)
17395 */
17396
17397 digest[0] = bitcoin_wallet->cry_master_buf[0];
17398 digest[1] = bitcoin_wallet->cry_master_buf[1];
17399 digest[2] = bitcoin_wallet->cry_master_buf[2];
17400 digest[3] = bitcoin_wallet->cry_master_buf[3];
17401
17402 /*
17403 * store salt
17404 */
17405
17406 if (cry_rounds_len >= 7) return (PARSER_SALT_VALUE);
17407
17408 const uint cry_rounds = atoi (cry_rounds_pos);
17409
17410 salt->salt_iter = cry_rounds - 1;
17411
17412 char *salt_buf_ptr = (char *) salt->salt_buf;
17413
17414 const uint salt_len = parse_and_store_salt (salt_buf_ptr, cry_salt_buf_pos, cry_salt_buf_len);
17415
17416 salt->salt_len = salt_len;
17417
17418 return (PARSER_OK);
17419 }
17420
17421 int sip_auth_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17422 {
17423 if ((input_len < DISPLAY_LEN_MIN_11400) || (input_len > DISPLAY_LEN_MAX_11400)) return (PARSER_GLOBAL_LENGTH);
17424
17425 if (memcmp (SIGNATURE_SIP_AUTH, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
17426
17427 u32 *digest = (u32 *) hash_buf->digest;
17428
17429 salt_t *salt = hash_buf->salt;
17430
17431 sip_t *sip = (sip_t *) hash_buf->esalt;
17432
17433 // work with a temporary copy of input_buf (s.t. we can manipulate it directly)
17434
17435 char *temp_input_buf = (char *) mymalloc (input_len + 1);
17436
17437 memcpy (temp_input_buf, input_buf, input_len);
17438
17439 // URI_server:
17440
17441 char *URI_server_pos = temp_input_buf + 6;
17442
17443 char *URI_client_pos = strchr (URI_server_pos, '*');
17444
17445 if (URI_client_pos == NULL)
17446 {
17447 myfree (temp_input_buf);
17448
17449 return (PARSER_SEPARATOR_UNMATCHED);
17450 }
17451
17452 URI_client_pos[0] = 0;
17453 URI_client_pos++;
17454
17455 uint URI_server_len = strlen (URI_server_pos);
17456
17457 if (URI_server_len > 512)
17458 {
17459 myfree (temp_input_buf);
17460
17461 return (PARSER_SALT_LENGTH);
17462 }
17463
17464 // URI_client:
17465
17466 char *user_pos = strchr (URI_client_pos, '*');
17467
17468 if (user_pos == NULL)
17469 {
17470 myfree (temp_input_buf);
17471
17472 return (PARSER_SEPARATOR_UNMATCHED);
17473 }
17474
17475 user_pos[0] = 0;
17476 user_pos++;
17477
17478 uint URI_client_len = strlen (URI_client_pos);
17479
17480 if (URI_client_len > 512)
17481 {
17482 myfree (temp_input_buf);
17483
17484 return (PARSER_SALT_LENGTH);
17485 }
17486
17487 // user:
17488
17489 char *realm_pos = strchr (user_pos, '*');
17490
17491 if (realm_pos == NULL)
17492 {
17493 myfree (temp_input_buf);
17494
17495 return (PARSER_SEPARATOR_UNMATCHED);
17496 }
17497
17498 realm_pos[0] = 0;
17499 realm_pos++;
17500
17501 uint user_len = strlen (user_pos);
17502
17503 if (user_len > 116)
17504 {
17505 myfree (temp_input_buf);
17506
17507 return (PARSER_SALT_LENGTH);
17508 }
17509
17510 // realm:
17511
17512 char *method_pos = strchr (realm_pos, '*');
17513
17514 if (method_pos == NULL)
17515 {
17516 myfree (temp_input_buf);
17517
17518 return (PARSER_SEPARATOR_UNMATCHED);
17519 }
17520
17521 method_pos[0] = 0;
17522 method_pos++;
17523
17524 uint realm_len = strlen (realm_pos);
17525
17526 if (realm_len > 116)
17527 {
17528 myfree (temp_input_buf);
17529
17530 return (PARSER_SALT_LENGTH);
17531 }
17532
17533 // method:
17534
17535 char *URI_prefix_pos = strchr (method_pos, '*');
17536
17537 if (URI_prefix_pos == NULL)
17538 {
17539 myfree (temp_input_buf);
17540
17541 return (PARSER_SEPARATOR_UNMATCHED);
17542 }
17543
17544 URI_prefix_pos[0] = 0;
17545 URI_prefix_pos++;
17546
17547 uint method_len = strlen (method_pos);
17548
17549 if (method_len > 246)
17550 {
17551 myfree (temp_input_buf);
17552
17553 return (PARSER_SALT_LENGTH);
17554 }
17555
17556 // URI_prefix:
17557
17558 char *URI_resource_pos = strchr (URI_prefix_pos, '*');
17559
17560 if (URI_resource_pos == NULL)
17561 {
17562 myfree (temp_input_buf);
17563
17564 return (PARSER_SEPARATOR_UNMATCHED);
17565 }
17566
17567 URI_resource_pos[0] = 0;
17568 URI_resource_pos++;
17569
17570 uint URI_prefix_len = strlen (URI_prefix_pos);
17571
17572 if (URI_prefix_len > 245)
17573 {
17574 myfree (temp_input_buf);
17575
17576 return (PARSER_SALT_LENGTH);
17577 }
17578
17579 // URI_resource:
17580
17581 char *URI_suffix_pos = strchr (URI_resource_pos, '*');
17582
17583 if (URI_suffix_pos == NULL)
17584 {
17585 myfree (temp_input_buf);
17586
17587 return (PARSER_SEPARATOR_UNMATCHED);
17588 }
17589
17590 URI_suffix_pos[0] = 0;
17591 URI_suffix_pos++;
17592
17593 uint URI_resource_len = strlen (URI_resource_pos);
17594
17595 if (URI_resource_len < 1 || URI_resource_len > 246)
17596 {
17597 myfree (temp_input_buf);
17598
17599 return (PARSER_SALT_LENGTH);
17600 }
17601
17602 // URI_suffix:
17603
17604 char *nonce_pos = strchr (URI_suffix_pos, '*');
17605
17606 if (nonce_pos == NULL)
17607 {
17608 myfree (temp_input_buf);
17609
17610 return (PARSER_SEPARATOR_UNMATCHED);
17611 }
17612
17613 nonce_pos[0] = 0;
17614 nonce_pos++;
17615
17616 uint URI_suffix_len = strlen (URI_suffix_pos);
17617
17618 if (URI_suffix_len > 245)
17619 {
17620 myfree (temp_input_buf);
17621
17622 return (PARSER_SALT_LENGTH);
17623 }
17624
17625 // nonce:
17626
17627 char *nonce_client_pos = strchr (nonce_pos, '*');
17628
17629 if (nonce_client_pos == NULL)
17630 {
17631 myfree (temp_input_buf);
17632
17633 return (PARSER_SEPARATOR_UNMATCHED);
17634 }
17635
17636 nonce_client_pos[0] = 0;
17637 nonce_client_pos++;
17638
17639 uint nonce_len = strlen (nonce_pos);
17640
17641 if (nonce_len < 1 || nonce_len > 50)
17642 {
17643 myfree (temp_input_buf);
17644
17645 return (PARSER_SALT_LENGTH);
17646 }
17647
17648 // nonce_client:
17649
17650 char *nonce_count_pos = strchr (nonce_client_pos, '*');
17651
17652 if (nonce_count_pos == NULL)
17653 {
17654 myfree (temp_input_buf);
17655
17656 return (PARSER_SEPARATOR_UNMATCHED);
17657 }
17658
17659 nonce_count_pos[0] = 0;
17660 nonce_count_pos++;
17661
17662 uint nonce_client_len = strlen (nonce_client_pos);
17663
17664 if (nonce_client_len > 50)
17665 {
17666 myfree (temp_input_buf);
17667
17668 return (PARSER_SALT_LENGTH);
17669 }
17670
17671 // nonce_count:
17672
17673 char *qop_pos = strchr (nonce_count_pos, '*');
17674
17675 if (qop_pos == NULL)
17676 {
17677 myfree (temp_input_buf);
17678
17679 return (PARSER_SEPARATOR_UNMATCHED);
17680 }
17681
17682 qop_pos[0] = 0;
17683 qop_pos++;
17684
17685 uint nonce_count_len = strlen (nonce_count_pos);
17686
17687 if (nonce_count_len > 50)
17688 {
17689 myfree (temp_input_buf);
17690
17691 return (PARSER_SALT_LENGTH);
17692 }
17693
17694 // qop:
17695
17696 char *directive_pos = strchr (qop_pos, '*');
17697
17698 if (directive_pos == NULL)
17699 {
17700 myfree (temp_input_buf);
17701
17702 return (PARSER_SEPARATOR_UNMATCHED);
17703 }
17704
17705 directive_pos[0] = 0;
17706 directive_pos++;
17707
17708 uint qop_len = strlen (qop_pos);
17709
17710 if (qop_len > 50)
17711 {
17712 myfree (temp_input_buf);
17713
17714 return (PARSER_SALT_LENGTH);
17715 }
17716
17717 // directive
17718
17719 char *digest_pos = strchr (directive_pos, '*');
17720
17721 if (digest_pos == NULL)
17722 {
17723 myfree (temp_input_buf);
17724
17725 return (PARSER_SEPARATOR_UNMATCHED);
17726 }
17727
17728 digest_pos[0] = 0;
17729 digest_pos++;
17730
17731 uint directive_len = strlen (directive_pos);
17732
17733 if (directive_len != 3)
17734 {
17735 myfree (temp_input_buf);
17736
17737 return (PARSER_SALT_LENGTH);
17738 }
17739
17740 if (memcmp (directive_pos, "MD5", 3))
17741 {
17742 log_info ("ERROR: only the MD5 directive is currently supported\n");
17743
17744 myfree (temp_input_buf);
17745
17746 return (PARSER_SIP_AUTH_DIRECTIVE);
17747 }
17748
17749 /*
17750 * first (pre-)compute: HA2 = md5 ($method . ":" . $uri)
17751 */
17752
17753 uint md5_len = 0;
17754
17755 uint md5_max_len = 4 * 64;
17756
17757 uint md5_remaining_len = md5_max_len;
17758
17759 uint tmp_md5_buf[64] = { 0 };
17760
17761 char *tmp_md5_ptr = (char *) tmp_md5_buf;
17762
17763 snprintf (tmp_md5_ptr, md5_remaining_len, "%s:", method_pos);
17764
17765 md5_len += method_len + 1;
17766 tmp_md5_ptr += method_len + 1;
17767
17768 if (URI_prefix_len > 0)
17769 {
17770 md5_remaining_len = md5_max_len - md5_len;
17771
17772 snprintf (tmp_md5_ptr, md5_remaining_len + 1, "%s:", URI_prefix_pos);
17773
17774 md5_len += URI_prefix_len + 1;
17775 tmp_md5_ptr += URI_prefix_len + 1;
17776 }
17777
17778 md5_remaining_len = md5_max_len - md5_len;
17779
17780 snprintf (tmp_md5_ptr, md5_remaining_len + 1, "%s", URI_resource_pos);
17781
17782 md5_len += URI_resource_len;
17783 tmp_md5_ptr += URI_resource_len;
17784
17785 if (URI_suffix_len > 0)
17786 {
17787 md5_remaining_len = md5_max_len - md5_len;
17788
17789 snprintf (tmp_md5_ptr, md5_remaining_len + 1, ":%s", URI_suffix_pos);
17790
17791 md5_len += 1 + URI_suffix_len;
17792 }
17793
17794 uint tmp_digest[4] = { 0 };
17795
17796 md5_complete_no_limit (tmp_digest, tmp_md5_buf, md5_len);
17797
17798 tmp_digest[0] = byte_swap_32 (tmp_digest[0]);
17799 tmp_digest[1] = byte_swap_32 (tmp_digest[1]);
17800 tmp_digest[2] = byte_swap_32 (tmp_digest[2]);
17801 tmp_digest[3] = byte_swap_32 (tmp_digest[3]);
17802
17803 /*
17804 * esalt
17805 */
17806
17807 char *esalt_buf_ptr = (char *) sip->esalt_buf;
17808
17809 uint esalt_len = 0;
17810
17811 uint max_esalt_len = sizeof (sip->esalt_buf); // 151 = (64 + 64 + 55) - 32, where 32 is the hexadecimal MD5 HA1 hash
17812
17813 // there are 2 possibilities for the esalt:
17814
17815 if ((strcmp (qop_pos, "auth") == 0) || (strcmp (qop_pos, "auth-int") == 0))
17816 {
17817 esalt_len = 1 + nonce_len + 1 + nonce_count_len + 1 + nonce_client_len + 1 + qop_len + 1 + 32;
17818
17819 if (esalt_len > max_esalt_len)
17820 {
17821 myfree (temp_input_buf);
17822
17823 return (PARSER_SALT_LENGTH);
17824 }
17825
17826 snprintf (esalt_buf_ptr, max_esalt_len, ":%s:%s:%s:%s:%08x%08x%08x%08x",
17827 nonce_pos,
17828 nonce_count_pos,
17829 nonce_client_pos,
17830 qop_pos,
17831 tmp_digest[0],
17832 tmp_digest[1],
17833 tmp_digest[2],
17834 tmp_digest[3]);
17835 }
17836 else
17837 {
17838 esalt_len = 1 + nonce_len + 1 + 32;
17839
17840 if (esalt_len > max_esalt_len)
17841 {
17842 myfree (temp_input_buf);
17843
17844 return (PARSER_SALT_LENGTH);
17845 }
17846
17847 snprintf (esalt_buf_ptr, max_esalt_len, ":%s:%08x%08x%08x%08x",
17848 nonce_pos,
17849 tmp_digest[0],
17850 tmp_digest[1],
17851 tmp_digest[2],
17852 tmp_digest[3]);
17853 }
17854
17855 // add 0x80 to esalt
17856
17857 esalt_buf_ptr[esalt_len] = 0x80;
17858
17859 sip->esalt_len = esalt_len;
17860
17861 /*
17862 * actual salt
17863 */
17864
17865 char *sip_salt_ptr = (char *) sip->salt_buf;
17866
17867 uint salt_len = user_len + 1 + realm_len + 1;
17868
17869 uint max_salt_len = 119;
17870
17871 if (salt_len > max_salt_len)
17872 {
17873 myfree (temp_input_buf);
17874
17875 return (PARSER_SALT_LENGTH);
17876 }
17877
17878 snprintf (sip_salt_ptr, max_salt_len + 1, "%s:%s:", user_pos, realm_pos);
17879
17880 sip->salt_len = salt_len;
17881
17882 /*
17883 * fake salt (for sorting)
17884 */
17885
17886 char *salt_buf_ptr = (char *) salt->salt_buf;
17887
17888 max_salt_len = 55;
17889
17890 uint fake_salt_len = salt_len;
17891
17892 if (fake_salt_len > max_salt_len)
17893 {
17894 fake_salt_len = max_salt_len;
17895 }
17896
17897 snprintf (salt_buf_ptr, max_salt_len + 1, "%s:%s:", user_pos, realm_pos);
17898
17899 salt->salt_len = fake_salt_len;
17900
17901 /*
17902 * digest
17903 */
17904
17905 digest[0] = hex_to_u32 ((const u8 *) &digest_pos[ 0]);
17906 digest[1] = hex_to_u32 ((const u8 *) &digest_pos[ 8]);
17907 digest[2] = hex_to_u32 ((const u8 *) &digest_pos[16]);
17908 digest[3] = hex_to_u32 ((const u8 *) &digest_pos[24]);
17909
17910 digest[0] = byte_swap_32 (digest[0]);
17911 digest[1] = byte_swap_32 (digest[1]);
17912 digest[2] = byte_swap_32 (digest[2]);
17913 digest[3] = byte_swap_32 (digest[3]);
17914
17915 myfree (temp_input_buf);
17916
17917 return (PARSER_OK);
17918 }
17919
17920 int crc32_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17921 {
17922 if ((input_len < DISPLAY_LEN_MIN_11500) || (input_len > DISPLAY_LEN_MAX_11500)) return (PARSER_GLOBAL_LENGTH);
17923
17924 if (input_buf[8] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
17925
17926 u32 *digest = (u32 *) hash_buf->digest;
17927
17928 salt_t *salt = hash_buf->salt;
17929
17930 // digest
17931
17932 char *digest_pos = input_buf;
17933
17934 digest[0] = hex_to_u32 ((const u8 *) &digest_pos[0]);
17935 digest[1] = 0;
17936 digest[2] = 0;
17937 digest[3] = 0;
17938
17939 // salt
17940
17941 char *salt_buf = input_buf + 8 + 1;
17942
17943 uint salt_len = 8;
17944
17945 char *salt_buf_ptr = (char *) salt->salt_buf;
17946
17947 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
17948
17949 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
17950
17951 salt->salt_len = salt_len;
17952
17953 return (PARSER_OK);
17954 }
17955
17956 int seven_zip_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
17957 {
17958 if ((input_len < DISPLAY_LEN_MIN_11600) || (input_len > DISPLAY_LEN_MAX_11600)) return (PARSER_GLOBAL_LENGTH);
17959
17960 if (memcmp (SIGNATURE_SEVEN_ZIP, input_buf, 4)) return (PARSER_SIGNATURE_UNMATCHED);
17961
17962 u32 *digest = (u32 *) hash_buf->digest;
17963
17964 salt_t *salt = hash_buf->salt;
17965
17966 seven_zip_t *seven_zip = (seven_zip_t *) hash_buf->esalt;
17967
17968 /**
17969 * parse line
17970 */
17971
17972 char *p_buf_pos = input_buf + 4;
17973
17974 char *NumCyclesPower_pos = strchr (p_buf_pos, '$');
17975
17976 if (NumCyclesPower_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17977
17978 u32 p_buf_len = NumCyclesPower_pos - p_buf_pos;
17979
17980 NumCyclesPower_pos++;
17981
17982 char *salt_len_pos = strchr (NumCyclesPower_pos, '$');
17983
17984 if (salt_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17985
17986 u32 NumCyclesPower_len = salt_len_pos - NumCyclesPower_pos;
17987
17988 salt_len_pos++;
17989
17990 char *salt_buf_pos = strchr (salt_len_pos, '$');
17991
17992 if (salt_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
17993
17994 u32 salt_len_len = salt_buf_pos - salt_len_pos;
17995
17996 salt_buf_pos++;
17997
17998 char *iv_len_pos = strchr (salt_buf_pos, '$');
17999
18000 if (iv_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18001
18002 u32 salt_buf_len = iv_len_pos - salt_buf_pos;
18003
18004 iv_len_pos++;
18005
18006 char *iv_buf_pos = strchr (iv_len_pos, '$');
18007
18008 if (iv_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18009
18010 u32 iv_len_len = iv_buf_pos - iv_len_pos;
18011
18012 iv_buf_pos++;
18013
18014 char *crc_buf_pos = strchr (iv_buf_pos, '$');
18015
18016 if (crc_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18017
18018 u32 iv_buf_len = crc_buf_pos - iv_buf_pos;
18019
18020 crc_buf_pos++;
18021
18022 char *data_len_pos = strchr (crc_buf_pos, '$');
18023
18024 if (data_len_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18025
18026 u32 crc_buf_len = data_len_pos - crc_buf_pos;
18027
18028 data_len_pos++;
18029
18030 char *unpack_size_pos = strchr (data_len_pos, '$');
18031
18032 if (unpack_size_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18033
18034 u32 data_len_len = unpack_size_pos - data_len_pos;
18035
18036 unpack_size_pos++;
18037
18038 char *data_buf_pos = strchr (unpack_size_pos, '$');
18039
18040 if (data_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18041
18042 u32 unpack_size_len = data_buf_pos - unpack_size_pos;
18043
18044 data_buf_pos++;
18045
18046 u32 data_buf_len = input_len - 1 - 2 - 1 - p_buf_len - 1 - NumCyclesPower_len - 1 - salt_len_len - 1 - salt_buf_len - 1 - iv_len_len - 1 - iv_buf_len - 1 - crc_buf_len - 1 - data_len_len - 1 - unpack_size_len - 1;
18047
18048 const uint iter = atoi (NumCyclesPower_pos);
18049 const uint crc = atoi (crc_buf_pos);
18050 const uint p_buf = atoi (p_buf_pos);
18051 const uint salt_len = atoi (salt_len_pos);
18052 const uint iv_len = atoi (iv_len_pos);
18053 const uint unpack_size = atoi (unpack_size_pos);
18054 const uint data_len = atoi (data_len_pos);
18055
18056 /**
18057 * verify some data
18058 */
18059
18060 if (p_buf != 0) return (PARSER_SALT_VALUE);
18061 if (salt_len != 0) return (PARSER_SALT_VALUE);
18062
18063 if ((data_len * 2) != data_buf_len) return (PARSER_SALT_VALUE);
18064
18065 if (data_len > 384) return (PARSER_SALT_VALUE);
18066
18067 if (unpack_size > data_len) return (PARSER_SALT_VALUE);
18068
18069 /**
18070 * store data
18071 */
18072
18073 seven_zip->iv_buf[0] = hex_to_u32 ((const u8 *) &iv_buf_pos[ 0]);
18074 seven_zip->iv_buf[1] = hex_to_u32 ((const u8 *) &iv_buf_pos[ 8]);
18075 seven_zip->iv_buf[2] = hex_to_u32 ((const u8 *) &iv_buf_pos[16]);
18076 seven_zip->iv_buf[3] = hex_to_u32 ((const u8 *) &iv_buf_pos[24]);
18077
18078 seven_zip->iv_len = iv_len;
18079
18080 memcpy (seven_zip->salt_buf, salt_buf_pos, salt_buf_len); // we just need that for later ascii_digest()
18081
18082 seven_zip->salt_len = 0;
18083
18084 seven_zip->crc = crc;
18085
18086 for (uint i = 0, j = 0; j < data_buf_len; i += 1, j += 8)
18087 {
18088 seven_zip->data_buf[i] = hex_to_u32 ((const u8 *) &data_buf_pos[j]);
18089
18090 seven_zip->data_buf[i] = byte_swap_32 (seven_zip->data_buf[i]);
18091 }
18092
18093 seven_zip->data_len = data_len;
18094
18095 seven_zip->unpack_size = unpack_size;
18096
18097 // real salt
18098
18099 salt->salt_buf[0] = seven_zip->data_buf[0];
18100 salt->salt_buf[1] = seven_zip->data_buf[1];
18101 salt->salt_buf[2] = seven_zip->data_buf[2];
18102 salt->salt_buf[3] = seven_zip->data_buf[3];
18103
18104 salt->salt_len = 16;
18105
18106 salt->salt_sign[0] = iter;
18107
18108 salt->salt_iter = 1 << iter;
18109
18110 /**
18111 * digest
18112 */
18113
18114 digest[0] = crc;
18115 digest[1] = 0;
18116 digest[2] = 0;
18117 digest[3] = 0;
18118
18119 return (PARSER_OK);
18120 }
18121
18122 int gost2012sbog_256_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18123 {
18124 if ((input_len < DISPLAY_LEN_MIN_11700) || (input_len > DISPLAY_LEN_MAX_11700)) return (PARSER_GLOBAL_LENGTH);
18125
18126 u32 *digest = (u32 *) hash_buf->digest;
18127
18128 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
18129 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
18130 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
18131 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
18132 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
18133 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
18134 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
18135 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
18136
18137 digest[0] = byte_swap_32 (digest[0]);
18138 digest[1] = byte_swap_32 (digest[1]);
18139 digest[2] = byte_swap_32 (digest[2]);
18140 digest[3] = byte_swap_32 (digest[3]);
18141 digest[4] = byte_swap_32 (digest[4]);
18142 digest[5] = byte_swap_32 (digest[5]);
18143 digest[6] = byte_swap_32 (digest[6]);
18144 digest[7] = byte_swap_32 (digest[7]);
18145
18146 return (PARSER_OK);
18147 }
18148
18149 int gost2012sbog_512_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18150 {
18151 if ((input_len < DISPLAY_LEN_MIN_11800) || (input_len > DISPLAY_LEN_MAX_11800)) return (PARSER_GLOBAL_LENGTH);
18152
18153 u32 *digest = (u32 *) hash_buf->digest;
18154
18155 digest[ 0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
18156 digest[ 1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
18157 digest[ 2] = hex_to_u32 ((const u8 *) &input_buf[ 16]);
18158 digest[ 3] = hex_to_u32 ((const u8 *) &input_buf[ 24]);
18159 digest[ 4] = hex_to_u32 ((const u8 *) &input_buf[ 32]);
18160 digest[ 5] = hex_to_u32 ((const u8 *) &input_buf[ 40]);
18161 digest[ 6] = hex_to_u32 ((const u8 *) &input_buf[ 48]);
18162 digest[ 7] = hex_to_u32 ((const u8 *) &input_buf[ 56]);
18163 digest[ 8] = hex_to_u32 ((const u8 *) &input_buf[ 64]);
18164 digest[ 9] = hex_to_u32 ((const u8 *) &input_buf[ 72]);
18165 digest[10] = hex_to_u32 ((const u8 *) &input_buf[ 80]);
18166 digest[11] = hex_to_u32 ((const u8 *) &input_buf[ 88]);
18167 digest[12] = hex_to_u32 ((const u8 *) &input_buf[ 96]);
18168 digest[13] = hex_to_u32 ((const u8 *) &input_buf[104]);
18169 digest[14] = hex_to_u32 ((const u8 *) &input_buf[112]);
18170 digest[15] = hex_to_u32 ((const u8 *) &input_buf[120]);
18171
18172 digest[ 0] = byte_swap_32 (digest[ 0]);
18173 digest[ 1] = byte_swap_32 (digest[ 1]);
18174 digest[ 2] = byte_swap_32 (digest[ 2]);
18175 digest[ 3] = byte_swap_32 (digest[ 3]);
18176 digest[ 4] = byte_swap_32 (digest[ 4]);
18177 digest[ 5] = byte_swap_32 (digest[ 5]);
18178 digest[ 6] = byte_swap_32 (digest[ 6]);
18179 digest[ 7] = byte_swap_32 (digest[ 7]);
18180 digest[ 8] = byte_swap_32 (digest[ 8]);
18181 digest[ 9] = byte_swap_32 (digest[ 9]);
18182 digest[10] = byte_swap_32 (digest[10]);
18183 digest[11] = byte_swap_32 (digest[11]);
18184 digest[12] = byte_swap_32 (digest[12]);
18185 digest[13] = byte_swap_32 (digest[13]);
18186 digest[14] = byte_swap_32 (digest[14]);
18187 digest[15] = byte_swap_32 (digest[15]);
18188
18189 return (PARSER_OK);
18190 }
18191
18192 int pbkdf2_md5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18193 {
18194 if ((input_len < DISPLAY_LEN_MIN_11900) || (input_len > DISPLAY_LEN_MAX_11900)) return (PARSER_GLOBAL_LENGTH);
18195
18196 if (memcmp (SIGNATURE_PBKDF2_MD5, input_buf, 4)) return (PARSER_SIGNATURE_UNMATCHED);
18197
18198 u32 *digest = (u32 *) hash_buf->digest;
18199
18200 salt_t *salt = hash_buf->salt;
18201
18202 pbkdf2_md5_t *pbkdf2_md5 = (pbkdf2_md5_t *) hash_buf->esalt;
18203
18204 /**
18205 * parse line
18206 */
18207
18208 // iterations
18209
18210 char *iter_pos = input_buf + 4;
18211
18212 u32 iter = atoi (iter_pos);
18213
18214 if (iter < 1) return (PARSER_SALT_ITERATION);
18215 if (iter > 999999) return (PARSER_SALT_ITERATION);
18216
18217 // first is *raw* salt
18218
18219 char *salt_pos = strchr (iter_pos, ':');
18220
18221 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18222
18223 salt_pos++;
18224
18225 char *hash_pos = strchr (salt_pos, ':');
18226
18227 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18228
18229 u32 salt_len = hash_pos - salt_pos;
18230
18231 if (salt_len > 64) return (PARSER_SALT_LENGTH);
18232
18233 hash_pos++;
18234
18235 u32 hash_b64_len = input_len - (hash_pos - input_buf);
18236
18237 if (hash_b64_len > 88) return (PARSER_HASH_LENGTH);
18238
18239 // decode salt
18240
18241 char *salt_buf_ptr = (char *) pbkdf2_md5->salt_buf;
18242
18243 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
18244
18245 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
18246
18247 salt_buf_ptr[salt_len + 3] = 0x01;
18248 salt_buf_ptr[salt_len + 4] = 0x80;
18249
18250 salt->salt_len = salt_len;
18251 salt->salt_iter = iter - 1;
18252
18253 // decode hash
18254
18255 u8 tmp_buf[100] = { 0 };
18256
18257 int hash_len = base64_decode (base64_to_int, (const u8 *) hash_pos, hash_b64_len, tmp_buf);
18258
18259 if (hash_len < 16) return (PARSER_HASH_LENGTH);
18260
18261 memcpy (digest, tmp_buf, 16);
18262
18263 // add some stuff to normal salt to make sorted happy
18264
18265 salt->salt_buf[0] = pbkdf2_md5->salt_buf[0];
18266 salt->salt_buf[1] = pbkdf2_md5->salt_buf[1];
18267 salt->salt_buf[2] = pbkdf2_md5->salt_buf[2];
18268 salt->salt_buf[3] = pbkdf2_md5->salt_buf[3];
18269 salt->salt_buf[4] = salt->salt_iter;
18270
18271 return (PARSER_OK);
18272 }
18273
18274 int pbkdf2_sha1_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18275 {
18276 if ((input_len < DISPLAY_LEN_MIN_12000) || (input_len > DISPLAY_LEN_MAX_12000)) return (PARSER_GLOBAL_LENGTH);
18277
18278 if (memcmp (SIGNATURE_PBKDF2_SHA1, input_buf, 5)) return (PARSER_SIGNATURE_UNMATCHED);
18279
18280 u32 *digest = (u32 *) hash_buf->digest;
18281
18282 salt_t *salt = hash_buf->salt;
18283
18284 pbkdf2_sha1_t *pbkdf2_sha1 = (pbkdf2_sha1_t *) hash_buf->esalt;
18285
18286 /**
18287 * parse line
18288 */
18289
18290 // iterations
18291
18292 char *iter_pos = input_buf + 5;
18293
18294 u32 iter = atoi (iter_pos);
18295
18296 if (iter < 1) return (PARSER_SALT_ITERATION);
18297 if (iter > 999999) return (PARSER_SALT_ITERATION);
18298
18299 // first is *raw* salt
18300
18301 char *salt_pos = strchr (iter_pos, ':');
18302
18303 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18304
18305 salt_pos++;
18306
18307 char *hash_pos = strchr (salt_pos, ':');
18308
18309 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18310
18311 u32 salt_len = hash_pos - salt_pos;
18312
18313 if (salt_len > 64) return (PARSER_SALT_LENGTH);
18314
18315 hash_pos++;
18316
18317 u32 hash_b64_len = input_len - (hash_pos - input_buf);
18318
18319 if (hash_b64_len > 88) return (PARSER_HASH_LENGTH);
18320
18321 // decode salt
18322
18323 char *salt_buf_ptr = (char *) pbkdf2_sha1->salt_buf;
18324
18325 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
18326
18327 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
18328
18329 salt_buf_ptr[salt_len + 3] = 0x01;
18330 salt_buf_ptr[salt_len + 4] = 0x80;
18331
18332 salt->salt_len = salt_len;
18333 salt->salt_iter = iter - 1;
18334
18335 // decode hash
18336
18337 u8 tmp_buf[100] = { 0 };
18338
18339 int hash_len = base64_decode (base64_to_int, (const u8 *) hash_pos, hash_b64_len, tmp_buf);
18340
18341 if (hash_len < 16) return (PARSER_HASH_LENGTH);
18342
18343 memcpy (digest, tmp_buf, 16);
18344
18345 digest[0] = byte_swap_32 (digest[0]);
18346 digest[1] = byte_swap_32 (digest[1]);
18347 digest[2] = byte_swap_32 (digest[2]);
18348 digest[3] = byte_swap_32 (digest[3]);
18349
18350 // add some stuff to normal salt to make sorted happy
18351
18352 salt->salt_buf[0] = pbkdf2_sha1->salt_buf[0];
18353 salt->salt_buf[1] = pbkdf2_sha1->salt_buf[1];
18354 salt->salt_buf[2] = pbkdf2_sha1->salt_buf[2];
18355 salt->salt_buf[3] = pbkdf2_sha1->salt_buf[3];
18356 salt->salt_buf[4] = salt->salt_iter;
18357
18358 return (PARSER_OK);
18359 }
18360
18361 int pbkdf2_sha512_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18362 {
18363 if ((input_len < DISPLAY_LEN_MIN_12100) || (input_len > DISPLAY_LEN_MAX_12100)) return (PARSER_GLOBAL_LENGTH);
18364
18365 if (memcmp (SIGNATURE_PBKDF2_SHA512, input_buf, 7)) return (PARSER_SIGNATURE_UNMATCHED);
18366
18367 u64 *digest = (u64 *) hash_buf->digest;
18368
18369 salt_t *salt = hash_buf->salt;
18370
18371 pbkdf2_sha512_t *pbkdf2_sha512 = (pbkdf2_sha512_t *) hash_buf->esalt;
18372
18373 /**
18374 * parse line
18375 */
18376
18377 // iterations
18378
18379 char *iter_pos = input_buf + 7;
18380
18381 u32 iter = atoi (iter_pos);
18382
18383 if (iter < 1) return (PARSER_SALT_ITERATION);
18384 if (iter > 999999) return (PARSER_SALT_ITERATION);
18385
18386 // first is *raw* salt
18387
18388 char *salt_pos = strchr (iter_pos, ':');
18389
18390 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18391
18392 salt_pos++;
18393
18394 char *hash_pos = strchr (salt_pos, ':');
18395
18396 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18397
18398 u32 salt_len = hash_pos - salt_pos;
18399
18400 if (salt_len > 64) return (PARSER_SALT_LENGTH);
18401
18402 hash_pos++;
18403
18404 u32 hash_b64_len = input_len - (hash_pos - input_buf);
18405
18406 if (hash_b64_len > 88) return (PARSER_HASH_LENGTH);
18407
18408 // decode salt
18409
18410 char *salt_buf_ptr = (char *) pbkdf2_sha512->salt_buf;
18411
18412 salt_len = parse_and_store_salt (salt_buf_ptr, salt_pos, salt_len);
18413
18414 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
18415
18416 salt_buf_ptr[salt_len + 3] = 0x01;
18417 salt_buf_ptr[salt_len + 4] = 0x80;
18418
18419 salt->salt_len = salt_len;
18420 salt->salt_iter = iter - 1;
18421
18422 // decode hash
18423
18424 u8 tmp_buf[100] = { 0 };
18425
18426 int hash_len = base64_decode (base64_to_int, (const u8 *) hash_pos, hash_b64_len, tmp_buf);
18427
18428 if (hash_len < 16) return (PARSER_HASH_LENGTH);
18429
18430 memcpy (digest, tmp_buf, 64);
18431
18432 digest[0] = byte_swap_64 (digest[0]);
18433 digest[1] = byte_swap_64 (digest[1]);
18434 digest[2] = byte_swap_64 (digest[2]);
18435 digest[3] = byte_swap_64 (digest[3]);
18436 digest[4] = byte_swap_64 (digest[4]);
18437 digest[5] = byte_swap_64 (digest[5]);
18438 digest[6] = byte_swap_64 (digest[6]);
18439 digest[7] = byte_swap_64 (digest[7]);
18440
18441 // add some stuff to normal salt to make sorted happy
18442
18443 salt->salt_buf[0] = pbkdf2_sha512->salt_buf[0];
18444 salt->salt_buf[1] = pbkdf2_sha512->salt_buf[1];
18445 salt->salt_buf[2] = pbkdf2_sha512->salt_buf[2];
18446 salt->salt_buf[3] = pbkdf2_sha512->salt_buf[3];
18447 salt->salt_buf[4] = salt->salt_iter;
18448
18449 return (PARSER_OK);
18450 }
18451
18452 int ecryptfs_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18453 {
18454 if ((input_len < DISPLAY_LEN_MIN_12200) || (input_len > DISPLAY_LEN_MAX_12200)) return (PARSER_GLOBAL_LENGTH);
18455
18456 if (memcmp (SIGNATURE_ECRYPTFS, input_buf, 10)) return (PARSER_SIGNATURE_UNMATCHED);
18457
18458 uint *digest = (uint *) hash_buf->digest;
18459
18460 salt_t *salt = hash_buf->salt;
18461
18462 /**
18463 * parse line
18464 */
18465
18466 char *salt_pos = input_buf + 10 + 2 + 2; // skip over "0$" and "1$"
18467
18468 char *hash_pos = strchr (salt_pos, '$');
18469
18470 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18471
18472 u32 salt_len = hash_pos - salt_pos;
18473
18474 if (salt_len != 16) return (PARSER_SALT_LENGTH);
18475
18476 hash_pos++;
18477
18478 u32 hash_len = input_len - 10 - 2 - 2 - salt_len - 1;
18479
18480 if (hash_len != 16) return (PARSER_HASH_LENGTH);
18481
18482 // decode hash
18483
18484 digest[ 0] = hex_to_u32 ((const u8 *) &hash_pos[0]);
18485 digest[ 1] = hex_to_u32 ((const u8 *) &hash_pos[8]);
18486 digest[ 2] = 0;
18487 digest[ 3] = 0;
18488 digest[ 4] = 0;
18489 digest[ 5] = 0;
18490 digest[ 6] = 0;
18491 digest[ 7] = 0;
18492 digest[ 8] = 0;
18493 digest[ 9] = 0;
18494 digest[10] = 0;
18495 digest[11] = 0;
18496 digest[12] = 0;
18497 digest[13] = 0;
18498 digest[14] = 0;
18499 digest[15] = 0;
18500
18501 // decode salt
18502
18503 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[0]);
18504 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[8]);
18505
18506 salt->salt_iter = ROUNDS_ECRYPTFS;
18507 salt->salt_len = 8;
18508
18509 return (PARSER_OK);
18510 }
18511
18512 int bsdicrypt_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18513 {
18514 if ((input_len < DISPLAY_LEN_MIN_12400) || (input_len > DISPLAY_LEN_MAX_12400)) return (PARSER_GLOBAL_LENGTH);
18515
18516 if (memcmp (SIGNATURE_BSDICRYPT, input_buf, 1)) return (PARSER_SIGNATURE_UNMATCHED);
18517
18518 unsigned char c19 = itoa64_to_int (input_buf[19]);
18519
18520 if (c19 & 3) return (PARSER_HASH_VALUE);
18521
18522 salt_t *salt = hash_buf->salt;
18523
18524 u32 *digest = (u32 *) hash_buf->digest;
18525
18526 // iteration count
18527
18528 salt->salt_iter = itoa64_to_int (input_buf[1])
18529 | itoa64_to_int (input_buf[2]) << 6
18530 | itoa64_to_int (input_buf[3]) << 12
18531 | itoa64_to_int (input_buf[4]) << 18;
18532
18533 // set salt
18534
18535 salt->salt_buf[0] = itoa64_to_int (input_buf[5])
18536 | itoa64_to_int (input_buf[6]) << 6
18537 | itoa64_to_int (input_buf[7]) << 12
18538 | itoa64_to_int (input_buf[8]) << 18;
18539
18540 salt->salt_len = 4;
18541
18542 u8 tmp_buf[100] = { 0 };
18543
18544 base64_decode (itoa64_to_int, (const u8 *) input_buf + 9, 11, tmp_buf);
18545
18546 memcpy (digest, tmp_buf, 8);
18547
18548 uint tt;
18549
18550 IP (digest[0], digest[1], tt);
18551
18552 digest[0] = rotr32 (digest[0], 31);
18553 digest[1] = rotr32 (digest[1], 31);
18554 digest[2] = 0;
18555 digest[3] = 0;
18556
18557 return (PARSER_OK);
18558 }
18559
18560 int rar3hp_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18561 {
18562 if ((input_len < DISPLAY_LEN_MIN_12500) || (input_len > DISPLAY_LEN_MAX_12500)) return (PARSER_GLOBAL_LENGTH);
18563
18564 if (memcmp (SIGNATURE_RAR3, input_buf, 6)) return (PARSER_SIGNATURE_UNMATCHED);
18565
18566 u32 *digest = (u32 *) hash_buf->digest;
18567
18568 salt_t *salt = hash_buf->salt;
18569
18570 /**
18571 * parse line
18572 */
18573
18574 char *type_pos = input_buf + 6 + 1;
18575
18576 char *salt_pos = strchr (type_pos, '*');
18577
18578 if (salt_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18579
18580 u32 type_len = salt_pos - type_pos;
18581
18582 if (type_len != 1) return (PARSER_SALT_LENGTH);
18583
18584 salt_pos++;
18585
18586 char *crypted_pos = strchr (salt_pos, '*');
18587
18588 if (crypted_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18589
18590 u32 salt_len = crypted_pos - salt_pos;
18591
18592 if (salt_len != 16) return (PARSER_SALT_LENGTH);
18593
18594 crypted_pos++;
18595
18596 u32 crypted_len = input_len - 6 - 1 - type_len - 1 - salt_len - 1;
18597
18598 if (crypted_len != 32) return (PARSER_SALT_LENGTH);
18599
18600 /**
18601 * copy data
18602 */
18603
18604 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[0]);
18605 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[8]);
18606
18607 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
18608 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
18609
18610 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &crypted_pos[ 0]);
18611 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &crypted_pos[ 8]);
18612 salt->salt_buf[4] = hex_to_u32 ((const u8 *) &crypted_pos[16]);
18613 salt->salt_buf[5] = hex_to_u32 ((const u8 *) &crypted_pos[24]);
18614
18615 salt->salt_len = 24;
18616 salt->salt_iter = ROUNDS_RAR3;
18617
18618 // there's no hash for rar3. the data which is in crypted_pos is some encrypted data and
18619 // if it matches the value \xc4\x3d\x7b\x00\x40\x07\x00 after decrypt we know that we successfully cracked it.
18620
18621 digest[0] = 0xc43d7b00;
18622 digest[1] = 0x40070000;
18623 digest[2] = 0;
18624 digest[3] = 0;
18625
18626 return (PARSER_OK);
18627 }
18628
18629 int rar5_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18630 {
18631 if ((input_len < DISPLAY_LEN_MIN_13000) || (input_len > DISPLAY_LEN_MAX_13000)) return (PARSER_GLOBAL_LENGTH);
18632
18633 if (memcmp (SIGNATURE_RAR5, input_buf, 1 + 4 + 1)) return (PARSER_SIGNATURE_UNMATCHED);
18634
18635 u32 *digest = (u32 *) hash_buf->digest;
18636
18637 salt_t *salt = hash_buf->salt;
18638
18639 rar5_t *rar5 = (rar5_t *) hash_buf->esalt;
18640
18641 /**
18642 * parse line
18643 */
18644
18645 char *param0_pos = input_buf + 1 + 4 + 1;
18646
18647 char *param1_pos = strchr (param0_pos, '$');
18648
18649 if (param1_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18650
18651 u32 param0_len = param1_pos - param0_pos;
18652
18653 param1_pos++;
18654
18655 char *param2_pos = strchr (param1_pos, '$');
18656
18657 if (param2_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18658
18659 u32 param1_len = param2_pos - param1_pos;
18660
18661 param2_pos++;
18662
18663 char *param3_pos = strchr (param2_pos, '$');
18664
18665 if (param3_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18666
18667 u32 param2_len = param3_pos - param2_pos;
18668
18669 param3_pos++;
18670
18671 char *param4_pos = strchr (param3_pos, '$');
18672
18673 if (param4_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18674
18675 u32 param3_len = param4_pos - param3_pos;
18676
18677 param4_pos++;
18678
18679 char *param5_pos = strchr (param4_pos, '$');
18680
18681 if (param5_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18682
18683 u32 param4_len = param5_pos - param4_pos;
18684
18685 param5_pos++;
18686
18687 u32 param5_len = input_len - 1 - 4 - 1 - param0_len - 1 - param1_len - 1 - param2_len - 1 - param3_len - 1 - param4_len - 1;
18688
18689 char *salt_buf = param1_pos;
18690 char *iv = param3_pos;
18691 char *pswcheck = param5_pos;
18692
18693 const uint salt_len = atoi (param0_pos);
18694 const uint iterations = atoi (param2_pos);
18695 const uint pswcheck_len = atoi (param4_pos);
18696
18697 /**
18698 * verify some data
18699 */
18700
18701 if (param1_len != 32) return (PARSER_SALT_VALUE);
18702 if (param3_len != 32) return (PARSER_SALT_VALUE);
18703 if (param5_len != 16) return (PARSER_SALT_VALUE);
18704
18705 if (salt_len != 16) return (PARSER_SALT_VALUE);
18706 if (iterations == 0) return (PARSER_SALT_VALUE);
18707 if (pswcheck_len != 8) return (PARSER_SALT_VALUE);
18708
18709 /**
18710 * store data
18711 */
18712
18713 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_buf[ 0]);
18714 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_buf[ 8]);
18715 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_buf[16]);
18716 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &salt_buf[24]);
18717
18718 rar5->iv[0] = hex_to_u32 ((const u8 *) &iv[ 0]);
18719 rar5->iv[1] = hex_to_u32 ((const u8 *) &iv[ 8]);
18720 rar5->iv[2] = hex_to_u32 ((const u8 *) &iv[16]);
18721 rar5->iv[3] = hex_to_u32 ((const u8 *) &iv[24]);
18722
18723 salt->salt_len = 16;
18724
18725 salt->salt_sign[0] = iterations;
18726
18727 salt->salt_iter = ((1 << iterations) + 32) - 1;
18728
18729 /**
18730 * digest buf
18731 */
18732
18733 digest[0] = hex_to_u32 ((const u8 *) &pswcheck[ 0]);
18734 digest[1] = hex_to_u32 ((const u8 *) &pswcheck[ 8]);
18735 digest[2] = 0;
18736 digest[3] = 0;
18737
18738 return (PARSER_OK);
18739 }
18740
18741 int krb5tgs_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18742 {
18743 if ((input_len < DISPLAY_LEN_MIN_13100) || (input_len > DISPLAY_LEN_MAX_13100)) return (PARSER_GLOBAL_LENGTH);
18744
18745 if (memcmp (SIGNATURE_KRB5TGS, input_buf, 11)) return (PARSER_SIGNATURE_UNMATCHED);
18746
18747 u32 *digest = (u32 *) hash_buf->digest;
18748
18749 salt_t *salt = hash_buf->salt;
18750
18751 krb5tgs_t *krb5tgs = (krb5tgs_t *) hash_buf->esalt;
18752
18753 /**
18754 * parse line
18755 */
18756
18757 /* Skip '$' */
18758 char *account_pos = input_buf + 11 + 1;
18759
18760 char *data_pos;
18761
18762 uint data_len;
18763
18764 if (account_pos[0] == '*')
18765 {
18766 account_pos++;
18767
18768 data_pos = strchr (account_pos, '*');
18769
18770 /* Skip '*' */
18771 data_pos++;
18772
18773 if (data_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18774
18775 uint account_len = data_pos - account_pos + 1;
18776
18777 if (account_len >= 512) return (PARSER_SALT_LENGTH);
18778
18779 /* Skip '$' */
18780 data_pos++;
18781
18782 data_len = input_len - 11 - 1 - account_len - 2;
18783
18784 memcpy (krb5tgs->account_info, account_pos - 1, account_len);
18785 }
18786 else
18787 {
18788 /* assume $krb5tgs$23$checksum$edata2 */
18789 data_pos = account_pos;
18790
18791 memcpy (krb5tgs->account_info, "**", 3);
18792
18793 data_len = input_len - 11 - 1 - 1;
18794 }
18795
18796 if (data_len < ((16 + 32) * 2)) return (PARSER_SALT_LENGTH);
18797
18798 char *checksum_ptr = (char *) krb5tgs->checksum;
18799
18800 for (uint i = 0; i < 16 * 2; i += 2)
18801 {
18802 const char p0 = data_pos[i + 0];
18803 const char p1 = data_pos[i + 1];
18804
18805 *checksum_ptr++ = hex_convert (p1) << 0
18806 | hex_convert (p0) << 4;
18807 }
18808
18809 char *edata_ptr = (char *) krb5tgs->edata2;
18810
18811 /* skip '$' */
18812 for (uint i = 16 * 2 + 1; i < input_len; i += 2)
18813 {
18814 const char p0 = data_pos[i + 0];
18815 const char p1 = data_pos[i + 1];
18816 *edata_ptr++ = hex_convert (p1) << 0
18817 | hex_convert (p0) << 4;
18818 }
18819
18820 /* this is needed for hmac_md5 */
18821 *edata_ptr++ = 0x80;
18822
18823 krb5tgs->edata2_len = (data_len - 32) / 2 ;
18824
18825 salt->salt_buf[0] = krb5tgs->checksum[0];
18826 salt->salt_buf[1] = krb5tgs->checksum[1];
18827 salt->salt_buf[2] = krb5tgs->checksum[2];
18828 salt->salt_buf[3] = krb5tgs->checksum[3];
18829
18830 salt->salt_len = 32;
18831
18832 digest[0] = krb5tgs->checksum[0];
18833 digest[1] = krb5tgs->checksum[1];
18834 digest[2] = krb5tgs->checksum[2];
18835 digest[3] = krb5tgs->checksum[3];
18836
18837 return (PARSER_OK);
18838 }
18839
18840 int cf10_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18841 {
18842 if ((input_len < DISPLAY_LEN_MIN_12600) || (input_len > DISPLAY_LEN_MAX_12600)) return (PARSER_GLOBAL_LENGTH);
18843
18844 u32 *digest = (u32 *) hash_buf->digest;
18845
18846 salt_t *salt = hash_buf->salt;
18847
18848 digest[0] = hex_to_u32 ((const u8 *) &input_buf[ 0]);
18849 digest[1] = hex_to_u32 ((const u8 *) &input_buf[ 8]);
18850 digest[2] = hex_to_u32 ((const u8 *) &input_buf[16]);
18851 digest[3] = hex_to_u32 ((const u8 *) &input_buf[24]);
18852 digest[4] = hex_to_u32 ((const u8 *) &input_buf[32]);
18853 digest[5] = hex_to_u32 ((const u8 *) &input_buf[40]);
18854 digest[6] = hex_to_u32 ((const u8 *) &input_buf[48]);
18855 digest[7] = hex_to_u32 ((const u8 *) &input_buf[56]);
18856
18857 if (input_buf[64] != data.separator) return (PARSER_SEPARATOR_UNMATCHED);
18858
18859 uint salt_len = input_len - 64 - 1;
18860
18861 char *salt_buf = input_buf + 64 + 1;
18862
18863 char *salt_buf_ptr = (char *) salt->salt_buf;
18864
18865 salt_len = parse_and_store_salt (salt_buf_ptr, salt_buf, salt_len);
18866
18867 if (salt_len == UINT_MAX) return (PARSER_SALT_LENGTH);
18868
18869 salt->salt_len = salt_len;
18870
18871 /**
18872 * we can precompute the first sha256 transform
18873 */
18874
18875 uint w[16] = { 0 };
18876
18877 w[ 0] = byte_swap_32 (salt->salt_buf[ 0]);
18878 w[ 1] = byte_swap_32 (salt->salt_buf[ 1]);
18879 w[ 2] = byte_swap_32 (salt->salt_buf[ 2]);
18880 w[ 3] = byte_swap_32 (salt->salt_buf[ 3]);
18881 w[ 4] = byte_swap_32 (salt->salt_buf[ 4]);
18882 w[ 5] = byte_swap_32 (salt->salt_buf[ 5]);
18883 w[ 6] = byte_swap_32 (salt->salt_buf[ 6]);
18884 w[ 7] = byte_swap_32 (salt->salt_buf[ 7]);
18885 w[ 8] = byte_swap_32 (salt->salt_buf[ 8]);
18886 w[ 9] = byte_swap_32 (salt->salt_buf[ 9]);
18887 w[10] = byte_swap_32 (salt->salt_buf[10]);
18888 w[11] = byte_swap_32 (salt->salt_buf[11]);
18889 w[12] = byte_swap_32 (salt->salt_buf[12]);
18890 w[13] = byte_swap_32 (salt->salt_buf[13]);
18891 w[14] = byte_swap_32 (salt->salt_buf[14]);
18892 w[15] = byte_swap_32 (salt->salt_buf[15]);
18893
18894 uint pc256[8] = { SHA256M_A, SHA256M_B, SHA256M_C, SHA256M_D, SHA256M_E, SHA256M_F, SHA256M_G, SHA256M_H };
18895
18896 sha256_64 (w, pc256);
18897
18898 salt->salt_buf_pc[0] = pc256[0];
18899 salt->salt_buf_pc[1] = pc256[1];
18900 salt->salt_buf_pc[2] = pc256[2];
18901 salt->salt_buf_pc[3] = pc256[3];
18902 salt->salt_buf_pc[4] = pc256[4];
18903 salt->salt_buf_pc[5] = pc256[5];
18904 salt->salt_buf_pc[6] = pc256[6];
18905 salt->salt_buf_pc[7] = pc256[7];
18906
18907 digest[0] -= pc256[0];
18908 digest[1] -= pc256[1];
18909 digest[2] -= pc256[2];
18910 digest[3] -= pc256[3];
18911 digest[4] -= pc256[4];
18912 digest[5] -= pc256[5];
18913 digest[6] -= pc256[6];
18914 digest[7] -= pc256[7];
18915
18916 return (PARSER_OK);
18917 }
18918
18919 int mywallet_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18920 {
18921 if ((input_len < DISPLAY_LEN_MIN_12700) || (input_len > DISPLAY_LEN_MAX_12700)) return (PARSER_GLOBAL_LENGTH);
18922
18923 if (memcmp (SIGNATURE_MYWALLET, input_buf, 12)) return (PARSER_SIGNATURE_UNMATCHED);
18924
18925 u32 *digest = (u32 *) hash_buf->digest;
18926
18927 salt_t *salt = hash_buf->salt;
18928
18929 /**
18930 * parse line
18931 */
18932
18933 char *data_len_pos = input_buf + 1 + 10 + 1;
18934
18935 char *data_buf_pos = strchr (data_len_pos, '$');
18936
18937 if (data_buf_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
18938
18939 u32 data_len_len = data_buf_pos - data_len_pos;
18940
18941 if (data_len_len < 1) return (PARSER_SALT_LENGTH);
18942 if (data_len_len > 5) return (PARSER_SALT_LENGTH);
18943
18944 data_buf_pos++;
18945
18946 u32 data_buf_len = input_len - 1 - 10 - 1 - data_len_len - 1;
18947
18948 if (data_buf_len < 64) return (PARSER_HASH_LENGTH);
18949
18950 if (data_buf_len % 16) return (PARSER_HASH_LENGTH);
18951
18952 u32 data_len = atoi (data_len_pos);
18953
18954 if ((data_len * 2) != data_buf_len) return (PARSER_HASH_LENGTH);
18955
18956 /**
18957 * salt
18958 */
18959
18960 char *salt_pos = data_buf_pos;
18961
18962 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[ 0]);
18963 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[ 8]);
18964 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_pos[16]);
18965 salt->salt_buf[3] = hex_to_u32 ((const u8 *) &salt_pos[24]);
18966
18967 // this is actually the CT, which is also the hash later (if matched)
18968
18969 salt->salt_buf[4] = hex_to_u32 ((const u8 *) &salt_pos[32]);
18970 salt->salt_buf[5] = hex_to_u32 ((const u8 *) &salt_pos[40]);
18971 salt->salt_buf[6] = hex_to_u32 ((const u8 *) &salt_pos[48]);
18972 salt->salt_buf[7] = hex_to_u32 ((const u8 *) &salt_pos[56]);
18973
18974 salt->salt_len = 32; // note we need to fix this to 16 in kernel
18975
18976 salt->salt_iter = 10 - 1;
18977
18978 /**
18979 * digest buf
18980 */
18981
18982 digest[0] = salt->salt_buf[4];
18983 digest[1] = salt->salt_buf[5];
18984 digest[2] = salt->salt_buf[6];
18985 digest[3] = salt->salt_buf[7];
18986
18987 return (PARSER_OK);
18988 }
18989
18990 int ms_drsr_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
18991 {
18992 if ((input_len < DISPLAY_LEN_MIN_12800) || (input_len > DISPLAY_LEN_MAX_12800)) return (PARSER_GLOBAL_LENGTH);
18993
18994 if (memcmp (SIGNATURE_MS_DRSR, input_buf, 11)) return (PARSER_SIGNATURE_UNMATCHED);
18995
18996 u32 *digest = (u32 *) hash_buf->digest;
18997
18998 salt_t *salt = hash_buf->salt;
18999
19000 /**
19001 * parse line
19002 */
19003
19004 char *salt_pos = input_buf + 11 + 1;
19005
19006 char *iter_pos = strchr (salt_pos, ',');
19007
19008 if (iter_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
19009
19010 u32 salt_len = iter_pos - salt_pos;
19011
19012 if (salt_len != 20) return (PARSER_SALT_LENGTH);
19013
19014 iter_pos++;
19015
19016 char *hash_pos = strchr (iter_pos, ',');
19017
19018 if (hash_pos == NULL) return (PARSER_SEPARATOR_UNMATCHED);
19019
19020 u32 iter_len = hash_pos - iter_pos;
19021
19022 if (iter_len > 5) return (PARSER_SALT_LENGTH);
19023
19024 hash_pos++;
19025
19026 u32 hash_len = input_len - 11 - 1 - salt_len - 1 - iter_len - 1;
19027
19028 if (hash_len != 64) return (PARSER_HASH_LENGTH);
19029
19030 /**
19031 * salt
19032 */
19033
19034 salt->salt_buf[0] = hex_to_u32 ((const u8 *) &salt_pos[ 0]);
19035 salt->salt_buf[1] = hex_to_u32 ((const u8 *) &salt_pos[ 8]);
19036 salt->salt_buf[2] = hex_to_u32 ((const u8 *) &salt_pos[16]) & 0xffff0000;
19037 salt->salt_buf[3] = 0x00018000;
19038
19039 salt->salt_buf[0] = byte_swap_32 (salt->salt_buf[0]);
19040 salt->salt_buf[1] = byte_swap_32 (salt->salt_buf[1]);
19041 salt->salt_buf[2] = byte_swap_32 (salt->salt_buf[2]);
19042 salt->salt_buf[3] = byte_swap_32 (salt->salt_buf[3]);
19043
19044 salt->salt_len = salt_len / 2;
19045
19046 salt->salt_iter = atoi (iter_pos) - 1;
19047
19048 /**
19049 * digest buf
19050 */
19051
19052 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
19053 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
19054 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
19055 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
19056 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
19057 digest[5] = hex_to_u32 ((const u8 *) &hash_pos[40]);
19058 digest[6] = hex_to_u32 ((const u8 *) &hash_pos[48]);
19059 digest[7] = hex_to_u32 ((const u8 *) &hash_pos[56]);
19060
19061 return (PARSER_OK);
19062 }
19063
19064 int androidfde_samsung_parse_hash (char *input_buf, uint input_len, hash_t *hash_buf)
19065 {
19066 if ((input_len < DISPLAY_LEN_MIN_12900) || (input_len > DISPLAY_LEN_MAX_12900)) return (PARSER_GLOBAL_LENGTH);
19067
19068 u32 *digest = (u32 *) hash_buf->digest;
19069
19070 salt_t *salt = hash_buf->salt;
19071
19072 /**
19073 * parse line
19074 */
19075
19076 char *hash_pos = input_buf + 64;
19077 char *salt1_pos = input_buf + 128;
19078 char *salt2_pos = input_buf;
19079
19080 /**
19081 * salt
19082 */
19083
19084 salt->salt_buf[ 0] = hex_to_u32 ((const u8 *) &salt1_pos[ 0]);
19085 salt->salt_buf[ 1] = hex_to_u32 ((const u8 *) &salt1_pos[ 8]);
19086 salt->salt_buf[ 2] = hex_to_u32 ((const u8 *) &salt1_pos[16]);
19087 salt->salt_buf[ 3] = hex_to_u32 ((const u8 *) &salt1_pos[24]);
19088
19089 salt->salt_buf[ 4] = hex_to_u32 ((const u8 *) &salt2_pos[ 0]);
19090 salt->salt_buf[ 5] = hex_to_u32 ((const u8 *) &salt2_pos[ 8]);
19091 salt->salt_buf[ 6] = hex_to_u32 ((const u8 *) &salt2_pos[16]);
19092 salt->salt_buf[ 7] = hex_to_u32 ((const u8 *) &salt2_pos[24]);
19093
19094 salt->salt_buf[ 8] = hex_to_u32 ((const u8 *) &salt2_pos[32]);
19095 salt->salt_buf[ 9] = hex_to_u32 ((const u8 *) &salt2_pos[40]);
19096 salt->salt_buf[10] = hex_to_u32 ((const u8 *) &salt2_pos[48]);
19097 salt->salt_buf[11] = hex_to_u32 ((const u8 *) &salt2_pos[56]);
19098
19099 salt->salt_len = 48;
19100
19101 salt->salt_iter = ROUNDS_ANDROIDFDE_SAMSUNG - 1;
19102
19103 /**
19104 * digest buf
19105 */
19106
19107 digest[0] = hex_to_u32 ((const u8 *) &hash_pos[ 0]);
19108 digest[1] = hex_to_u32 ((const u8 *) &hash_pos[ 8]);
19109 digest[2] = hex_to_u32 ((const u8 *) &hash_pos[16]);
19110 digest[3] = hex_to_u32 ((const u8 *) &hash_pos[24]);
19111 digest[4] = hex_to_u32 ((const u8 *) &hash_pos[32]);
19112 digest[5] = hex_to_u32 ((const u8 *) &hash_pos[40]);
19113 digest[6] = hex_to_u32 ((const u8 *) &hash_pos[48]);
19114 digest[7] = hex_to_u32 ((const u8 *) &hash_pos[56]);
19115
19116 return (PARSER_OK);
19117 }
19118
19119 /**
19120 * parallel running threads
19121 */
19122
19123 #ifdef WIN
19124
19125 BOOL WINAPI sigHandler_default (DWORD sig)
19126 {
19127 switch (sig)
19128 {
19129 case CTRL_CLOSE_EVENT:
19130
19131 /*
19132 * special case see: https://stackoverflow.com/questions/3640633/c-setconsolectrlhandler-routine-issue/5610042#5610042
19133 * if the user interacts w/ the user-interface (GUI/cmd), we need to do the finalization job within this signal handler
19134 * function otherwise it is too late (e.g. after returning from this function)
19135 */
19136
19137 myabort ();
19138
19139 SetConsoleCtrlHandler (NULL, TRUE);
19140
19141 hc_sleep (10);
19142
19143 return TRUE;
19144
19145 case CTRL_C_EVENT:
19146 case CTRL_LOGOFF_EVENT:
19147 case CTRL_SHUTDOWN_EVENT:
19148
19149 myabort ();
19150
19151 SetConsoleCtrlHandler (NULL, TRUE);
19152
19153 return TRUE;
19154 }
19155
19156 return FALSE;
19157 }
19158
19159 BOOL WINAPI sigHandler_benchmark (DWORD sig)
19160 {
19161 switch (sig)
19162 {
19163 case CTRL_CLOSE_EVENT:
19164
19165 myabort ();
19166
19167 SetConsoleCtrlHandler (NULL, TRUE);
19168
19169 hc_sleep (10);
19170
19171 return TRUE;
19172
19173 case CTRL_C_EVENT:
19174 case CTRL_LOGOFF_EVENT:
19175 case CTRL_SHUTDOWN_EVENT:
19176
19177 myquit ();
19178
19179 SetConsoleCtrlHandler (NULL, TRUE);
19180
19181 return TRUE;
19182 }
19183
19184 return FALSE;
19185 }
19186
19187 void hc_signal (BOOL WINAPI (callback) (DWORD))
19188 {
19189 if (callback == NULL)
19190 {
19191 SetConsoleCtrlHandler ((PHANDLER_ROUTINE) callback, FALSE);
19192 }
19193 else
19194 {
19195 SetConsoleCtrlHandler ((PHANDLER_ROUTINE) callback, TRUE);
19196 }
19197 }
19198
19199 #else
19200
19201 void sigHandler_default (int sig)
19202 {
19203 myabort ();
19204
19205 signal (sig, NULL);
19206 }
19207
19208 void sigHandler_benchmark (int sig)
19209 {
19210 myquit ();
19211
19212 signal (sig, NULL);
19213 }
19214
19215 void hc_signal (void (callback) (int))
19216 {
19217 if (callback == NULL) callback = SIG_DFL;
19218
19219 signal (SIGINT, callback);
19220 signal (SIGTERM, callback);
19221 signal (SIGABRT, callback);
19222 }
19223
19224 #endif
19225
19226 void status_display ();
19227
19228 void *thread_keypress (void *p)
19229 {
19230 int benchmark = *((int *) p);
19231
19232 uint quiet = data.quiet;
19233
19234 tty_break();
19235
19236 while ((data.devices_status != STATUS_EXHAUSTED) && (data.devices_status != STATUS_CRACKED) && (data.devices_status != STATUS_ABORTED) && (data.devices_status != STATUS_QUIT))
19237 {
19238 int ch = tty_getchar();
19239
19240 if (ch == -1) break;
19241
19242 if (ch == 0) continue;
19243
19244 #ifdef _POSIX
19245 if (ch != '\n')
19246 #endif
19247
19248 hc_thread_mutex_lock (mux_display);
19249
19250 log_info ("");
19251
19252 switch (ch)
19253 {
19254 case 's':
19255 case '\n':
19256
19257 log_info ("");
19258
19259 status_display ();
19260
19261 log_info ("");
19262
19263 if (quiet == 0) fprintf (stdout, "%s", PROMPT);
19264 if (quiet == 0) fflush (stdout);
19265
19266 break;
19267
19268 case 'b':
19269
19270 log_info ("");
19271
19272 bypass ();
19273
19274 log_info ("");
19275
19276 if (quiet == 0) fprintf (stdout, "%s", PROMPT);
19277 if (quiet == 0) fflush (stdout);
19278
19279 break;
19280
19281 case 'p':
19282
19283 log_info ("");
19284
19285 SuspendThreads ();
19286
19287 log_info ("");
19288
19289 if (quiet == 0) fprintf (stdout, "%s", PROMPT);
19290 if (quiet == 0) fflush (stdout);
19291
19292 break;
19293
19294 case 'r':
19295
19296 log_info ("");
19297
19298 ResumeThreads ();
19299
19300 log_info ("");
19301
19302 if (quiet == 0) fprintf (stdout, "%s", PROMPT);
19303 if (quiet == 0) fflush (stdout);
19304
19305 break;
19306
19307 case 'c':
19308
19309 log_info ("");
19310
19311 if (benchmark == 1) break;
19312
19313 stop_at_checkpoint ();
19314
19315 log_info ("");
19316
19317 if (quiet == 0) fprintf (stdout, "%s", PROMPT);
19318 if (quiet == 0) fflush (stdout);
19319
19320 break;
19321
19322 case 'q':
19323
19324 log_info ("");
19325
19326 if (benchmark == 1)
19327 {
19328 myquit ();
19329 }
19330 else
19331 {
19332 myabort ();
19333 }
19334
19335 break;
19336 }
19337
19338 hc_thread_mutex_unlock (mux_display);
19339 }
19340
19341 tty_fix();
19342
19343 return (p);
19344 }
19345
19346 /**
19347 * rules common
19348 */
19349
19350 bool class_num (const u8 c)
19351 {
19352 return ((c >= '0') && (c <= '9'));
19353 }
19354
19355 bool class_lower (const u8 c)
19356 {
19357 return ((c >= 'a') && (c <= 'z'));
19358 }
19359
19360 bool class_upper (const u8 c)
19361 {
19362 return ((c >= 'A') && (c <= 'Z'));
19363 }
19364
19365 bool class_alpha (const u8 c)
19366 {
19367 return (class_lower (c) || class_upper (c));
19368 }
19369
19370 int conv_ctoi (const u8 c)
19371 {
19372 if (class_num (c))
19373 {
19374 return c - '0';
19375 }
19376 else if (class_upper (c))
19377 {
19378 return c - 'A' + 10;
19379 }
19380
19381 return -1;
19382 }
19383
19384 int conv_itoc (const u8 c)
19385 {
19386 if (c < 10)
19387 {
19388 return c + '0';
19389 }
19390 else if (c < 37)
19391 {
19392 return c + 'A' - 10;
19393 }
19394
19395 return -1;
19396 }
19397
19398 /**
19399 * device rules
19400 */
19401
19402 #define INCR_POS if (++rule_pos == rule_len) return (-1)
19403 #define SET_NAME(rule,val) (rule)->cmds[rule_cnt] = ((val) & 0xff) << 0
19404 #define SET_P0(rule,val) INCR_POS; (rule)->cmds[rule_cnt] |= ((val) & 0xff) << 8
19405 #define SET_P1(rule,val) INCR_POS; (rule)->cmds[rule_cnt] |= ((val) & 0xff) << 16
19406 #define MAX_KERNEL_RULES 255
19407 #define GET_NAME(rule) rule_cmd = (((rule)->cmds[rule_cnt] >> 0) & 0xff)
19408 #define GET_P0(rule) INCR_POS; rule_buf[rule_pos] = (((rule)->cmds[rule_cnt] >> 8) & 0xff)
19409 #define GET_P1(rule) INCR_POS; rule_buf[rule_pos] = (((rule)->cmds[rule_cnt] >> 16) & 0xff)
19410
19411 #define SET_P0_CONV(rule,val) INCR_POS; (rule)->cmds[rule_cnt] |= ((conv_ctoi (val)) & 0xff) << 8
19412 #define SET_P1_CONV(rule,val) INCR_POS; (rule)->cmds[rule_cnt] |= ((conv_ctoi (val)) & 0xff) << 16
19413 #define GET_P0_CONV(rule) INCR_POS; rule_buf[rule_pos] = conv_itoc (((rule)->cmds[rule_cnt] >> 8) & 0xff)
19414 #define GET_P1_CONV(rule) INCR_POS; rule_buf[rule_pos] = conv_itoc (((rule)->cmds[rule_cnt] >> 16) & 0xff)
19415
19416 int cpu_rule_to_kernel_rule (char rule_buf[BUFSIZ], uint rule_len, kernel_rule_t *rule)
19417 {
19418 uint rule_pos;
19419 uint rule_cnt;
19420
19421 for (rule_pos = 0, rule_cnt = 0; rule_pos < rule_len && rule_cnt < MAX_KERNEL_RULES; rule_pos++, rule_cnt++)
19422 {
19423 switch (rule_buf[rule_pos])
19424 {
19425 case ' ':
19426 rule_cnt--;
19427 break;
19428
19429 case RULE_OP_MANGLE_NOOP:
19430 SET_NAME (rule, rule_buf[rule_pos]);
19431 break;
19432
19433 case RULE_OP_MANGLE_LREST:
19434 SET_NAME (rule, rule_buf[rule_pos]);
19435 break;
19436
19437 case RULE_OP_MANGLE_UREST:
19438 SET_NAME (rule, rule_buf[rule_pos]);
19439 break;
19440
19441 case RULE_OP_MANGLE_LREST_UFIRST:
19442 SET_NAME (rule, rule_buf[rule_pos]);
19443 break;
19444
19445 case RULE_OP_MANGLE_UREST_LFIRST:
19446 SET_NAME (rule, rule_buf[rule_pos]);
19447 break;
19448
19449 case RULE_OP_MANGLE_TREST:
19450 SET_NAME (rule, rule_buf[rule_pos]);
19451 break;
19452
19453 case RULE_OP_MANGLE_TOGGLE_AT:
19454 SET_NAME (rule, rule_buf[rule_pos]);
19455 SET_P0_CONV (rule, rule_buf[rule_pos]);
19456 break;
19457
19458 case RULE_OP_MANGLE_REVERSE:
19459 SET_NAME (rule, rule_buf[rule_pos]);
19460 break;
19461
19462 case RULE_OP_MANGLE_DUPEWORD:
19463 SET_NAME (rule, rule_buf[rule_pos]);
19464 break;
19465
19466 case RULE_OP_MANGLE_DUPEWORD_TIMES:
19467 SET_NAME (rule, rule_buf[rule_pos]);
19468 SET_P0_CONV (rule, rule_buf[rule_pos]);
19469 break;
19470
19471 case RULE_OP_MANGLE_REFLECT:
19472 SET_NAME (rule, rule_buf[rule_pos]);
19473 break;
19474
19475 case RULE_OP_MANGLE_ROTATE_LEFT:
19476 SET_NAME (rule, rule_buf[rule_pos]);
19477 break;
19478
19479 case RULE_OP_MANGLE_ROTATE_RIGHT:
19480 SET_NAME (rule, rule_buf[rule_pos]);
19481 break;
19482
19483 case RULE_OP_MANGLE_APPEND:
19484 SET_NAME (rule, rule_buf[rule_pos]);
19485 SET_P0 (rule, rule_buf[rule_pos]);
19486 break;
19487
19488 case RULE_OP_MANGLE_PREPEND:
19489 SET_NAME (rule, rule_buf[rule_pos]);
19490 SET_P0 (rule, rule_buf[rule_pos]);
19491 break;
19492
19493 case RULE_OP_MANGLE_DELETE_FIRST:
19494 SET_NAME (rule, rule_buf[rule_pos]);
19495 break;
19496
19497 case RULE_OP_MANGLE_DELETE_LAST:
19498 SET_NAME (rule, rule_buf[rule_pos]);
19499 break;
19500
19501 case RULE_OP_MANGLE_DELETE_AT:
19502 SET_NAME (rule, rule_buf[rule_pos]);
19503 SET_P0_CONV (rule, rule_buf[rule_pos]);
19504 break;
19505
19506 case RULE_OP_MANGLE_EXTRACT:
19507 SET_NAME (rule, rule_buf[rule_pos]);
19508 SET_P0_CONV (rule, rule_buf[rule_pos]);
19509 SET_P1_CONV (rule, rule_buf[rule_pos]);
19510 break;
19511
19512 case RULE_OP_MANGLE_OMIT:
19513 SET_NAME (rule, rule_buf[rule_pos]);
19514 SET_P0_CONV (rule, rule_buf[rule_pos]);
19515 SET_P1_CONV (rule, rule_buf[rule_pos]);
19516 break;
19517
19518 case RULE_OP_MANGLE_INSERT:
19519 SET_NAME (rule, rule_buf[rule_pos]);
19520 SET_P0_CONV (rule, rule_buf[rule_pos]);
19521 SET_P1 (rule, rule_buf[rule_pos]);
19522 break;
19523
19524 case RULE_OP_MANGLE_OVERSTRIKE:
19525 SET_NAME (rule, rule_buf[rule_pos]);
19526 SET_P0_CONV (rule, rule_buf[rule_pos]);
19527 SET_P1 (rule, rule_buf[rule_pos]);
19528 break;
19529
19530 case RULE_OP_MANGLE_TRUNCATE_AT:
19531 SET_NAME (rule, rule_buf[rule_pos]);
19532 SET_P0_CONV (rule, rule_buf[rule_pos]);
19533 break;
19534
19535 case RULE_OP_MANGLE_REPLACE:
19536 SET_NAME (rule, rule_buf[rule_pos]);
19537 SET_P0 (rule, rule_buf[rule_pos]);
19538 SET_P1 (rule, rule_buf[rule_pos]);
19539 break;
19540
19541 case RULE_OP_MANGLE_PURGECHAR:
19542 return (-1);
19543 break;
19544
19545 case RULE_OP_MANGLE_TOGGLECASE_REC:
19546 return (-1);
19547 break;
19548
19549 case RULE_OP_MANGLE_DUPECHAR_FIRST:
19550 SET_NAME (rule, rule_buf[rule_pos]);
19551 SET_P0_CONV (rule, rule_buf[rule_pos]);
19552 break;
19553
19554 case RULE_OP_MANGLE_DUPECHAR_LAST:
19555 SET_NAME (rule, rule_buf[rule_pos]);
19556 SET_P0_CONV (rule, rule_buf[rule_pos]);
19557 break;
19558
19559 case RULE_OP_MANGLE_DUPECHAR_ALL:
19560 SET_NAME (rule, rule_buf[rule_pos]);
19561 break;
19562
19563 case RULE_OP_MANGLE_SWITCH_FIRST:
19564 SET_NAME (rule, rule_buf[rule_pos]);
19565 break;
19566
19567 case RULE_OP_MANGLE_SWITCH_LAST:
19568 SET_NAME (rule, rule_buf[rule_pos]);
19569 break;
19570
19571 case RULE_OP_MANGLE_SWITCH_AT:
19572 SET_NAME (rule, rule_buf[rule_pos]);
19573 SET_P0_CONV (rule, rule_buf[rule_pos]);
19574 SET_P1_CONV (rule, rule_buf[rule_pos]);
19575 break;
19576
19577 case RULE_OP_MANGLE_CHR_SHIFTL:
19578 SET_NAME (rule, rule_buf[rule_pos]);
19579 SET_P0_CONV (rule, rule_buf[rule_pos]);
19580 break;
19581
19582 case RULE_OP_MANGLE_CHR_SHIFTR:
19583 SET_NAME (rule, rule_buf[rule_pos]);
19584 SET_P0_CONV (rule, rule_buf[rule_pos]);
19585 break;
19586
19587 case RULE_OP_MANGLE_CHR_INCR:
19588 SET_NAME (rule, rule_buf[rule_pos]);
19589 SET_P0_CONV (rule, rule_buf[rule_pos]);
19590 break;
19591
19592 case RULE_OP_MANGLE_CHR_DECR:
19593 SET_NAME (rule, rule_buf[rule_pos]);
19594 SET_P0_CONV (rule, rule_buf[rule_pos]);
19595 break;
19596
19597 case RULE_OP_MANGLE_REPLACE_NP1:
19598 SET_NAME (rule, rule_buf[rule_pos]);
19599 SET_P0_CONV (rule, rule_buf[rule_pos]);
19600 break;
19601
19602 case RULE_OP_MANGLE_REPLACE_NM1:
19603 SET_NAME (rule, rule_buf[rule_pos]);
19604 SET_P0_CONV (rule, rule_buf[rule_pos]);
19605 break;
19606
19607 case RULE_OP_MANGLE_DUPEBLOCK_FIRST:
19608 SET_NAME (rule, rule_buf[rule_pos]);
19609 SET_P0_CONV (rule, rule_buf[rule_pos]);
19610 break;
19611
19612 case RULE_OP_MANGLE_DUPEBLOCK_LAST:
19613 SET_NAME (rule, rule_buf[rule_pos]);
19614 SET_P0_CONV (rule, rule_buf[rule_pos]);
19615 break;
19616
19617 case RULE_OP_MANGLE_TITLE:
19618 SET_NAME (rule, rule_buf[rule_pos]);
19619 break;
19620
19621 default:
19622 return (-1);
19623 break;
19624 }
19625 }
19626
19627 if (rule_pos < rule_len) return (-1);
19628
19629 return (0);
19630 }
19631
19632 int kernel_rule_to_cpu_rule (char rule_buf[BUFSIZ], kernel_rule_t *rule)
19633 {
19634 uint rule_cnt;
19635 uint rule_pos;
19636 uint rule_len = BUFSIZ - 1; // maximum possible len
19637
19638 char rule_cmd;
19639
19640 for (rule_cnt = 0, rule_pos = 0; rule_pos < rule_len && rule_cnt < MAX_KERNEL_RULES; rule_pos++, rule_cnt++)
19641 {
19642 GET_NAME (rule);
19643
19644 if (rule_cnt > 0) rule_buf[rule_pos++] = ' ';
19645
19646 switch (rule_cmd)
19647 {
19648 case RULE_OP_MANGLE_NOOP:
19649 rule_buf[rule_pos] = rule_cmd;
19650 break;
19651
19652 case RULE_OP_MANGLE_LREST:
19653 rule_buf[rule_pos] = rule_cmd;
19654 break;
19655
19656 case RULE_OP_MANGLE_UREST:
19657 rule_buf[rule_pos] = rule_cmd;
19658 break;
19659
19660 case RULE_OP_MANGLE_LREST_UFIRST:
19661 rule_buf[rule_pos] = rule_cmd;
19662 break;
19663
19664 case RULE_OP_MANGLE_UREST_LFIRST:
19665 rule_buf[rule_pos] = rule_cmd;
19666 break;
19667
19668 case RULE_OP_MANGLE_TREST:
19669 rule_buf[rule_pos] = rule_cmd;
19670 break;
19671
19672 case RULE_OP_MANGLE_TOGGLE_AT:
19673 rule_buf[rule_pos] = rule_cmd;
19674 GET_P0_CONV (rule);
19675 break;
19676
19677 case RULE_OP_MANGLE_REVERSE:
19678 rule_buf[rule_pos] = rule_cmd;
19679 break;
19680
19681 case RULE_OP_MANGLE_DUPEWORD:
19682 rule_buf[rule_pos] = rule_cmd;
19683 break;
19684
19685 case RULE_OP_MANGLE_DUPEWORD_TIMES:
19686 rule_buf[rule_pos] = rule_cmd;
19687 GET_P0_CONV (rule);
19688 break;
19689
19690 case RULE_OP_MANGLE_REFLECT:
19691 rule_buf[rule_pos] = rule_cmd;
19692 break;
19693
19694 case RULE_OP_MANGLE_ROTATE_LEFT:
19695 rule_buf[rule_pos] = rule_cmd;
19696 break;
19697
19698 case RULE_OP_MANGLE_ROTATE_RIGHT:
19699 rule_buf[rule_pos] = rule_cmd;
19700 break;
19701
19702 case RULE_OP_MANGLE_APPEND:
19703 rule_buf[rule_pos] = rule_cmd;
19704 GET_P0 (rule);
19705 break;
19706
19707 case RULE_OP_MANGLE_PREPEND:
19708 rule_buf[rule_pos] = rule_cmd;
19709 GET_P0 (rule);
19710 break;
19711
19712 case RULE_OP_MANGLE_DELETE_FIRST:
19713 rule_buf[rule_pos] = rule_cmd;
19714 break;
19715
19716 case RULE_OP_MANGLE_DELETE_LAST:
19717 rule_buf[rule_pos] = rule_cmd;
19718 break;
19719
19720 case RULE_OP_MANGLE_DELETE_AT:
19721 rule_buf[rule_pos] = rule_cmd;
19722 GET_P0_CONV (rule);
19723 break;
19724
19725 case RULE_OP_MANGLE_EXTRACT:
19726 rule_buf[rule_pos] = rule_cmd;
19727 GET_P0_CONV (rule);
19728 GET_P1_CONV (rule);
19729 break;
19730
19731 case RULE_OP_MANGLE_OMIT:
19732 rule_buf[rule_pos] = rule_cmd;
19733 GET_P0_CONV (rule);
19734 GET_P1_CONV (rule);
19735 break;
19736
19737 case RULE_OP_MANGLE_INSERT:
19738 rule_buf[rule_pos] = rule_cmd;
19739 GET_P0_CONV (rule);
19740 GET_P1 (rule);
19741 break;
19742
19743 case RULE_OP_MANGLE_OVERSTRIKE:
19744 rule_buf[rule_pos] = rule_cmd;
19745 GET_P0_CONV (rule);
19746 GET_P1 (rule);
19747 break;
19748
19749 case RULE_OP_MANGLE_TRUNCATE_AT:
19750 rule_buf[rule_pos] = rule_cmd;
19751 GET_P0_CONV (rule);
19752 break;
19753
19754 case RULE_OP_MANGLE_REPLACE:
19755 rule_buf[rule_pos] = rule_cmd;
19756 GET_P0 (rule);
19757 GET_P1 (rule);
19758 break;
19759
19760 case RULE_OP_MANGLE_PURGECHAR:
19761 return (-1);
19762 break;
19763
19764 case RULE_OP_MANGLE_TOGGLECASE_REC:
19765 return (-1);
19766 break;
19767
19768 case RULE_OP_MANGLE_DUPECHAR_FIRST:
19769 rule_buf[rule_pos] = rule_cmd;
19770 GET_P0_CONV (rule);
19771 break;
19772
19773 case RULE_OP_MANGLE_DUPECHAR_LAST:
19774 rule_buf[rule_pos] = rule_cmd;
19775 GET_P0_CONV (rule);
19776 break;
19777
19778 case RULE_OP_MANGLE_DUPECHAR_ALL:
19779 rule_buf[rule_pos] = rule_cmd;
19780 break;
19781
19782 case RULE_OP_MANGLE_SWITCH_FIRST:
19783 rule_buf[rule_pos] = rule_cmd;
19784 break;
19785
19786 case RULE_OP_MANGLE_SWITCH_LAST:
19787 rule_buf[rule_pos] = rule_cmd;
19788 break;
19789
19790 case RULE_OP_MANGLE_SWITCH_AT:
19791 rule_buf[rule_pos] = rule_cmd;
19792 GET_P0_CONV (rule);
19793 GET_P1_CONV (rule);
19794 break;
19795
19796 case RULE_OP_MANGLE_CHR_SHIFTL:
19797 rule_buf[rule_pos] = rule_cmd;
19798 GET_P0_CONV (rule);
19799 break;
19800
19801 case RULE_OP_MANGLE_CHR_SHIFTR:
19802 rule_buf[rule_pos] = rule_cmd;
19803 GET_P0_CONV (rule);
19804 break;
19805
19806 case RULE_OP_MANGLE_CHR_INCR:
19807 rule_buf[rule_pos] = rule_cmd;
19808 GET_P0_CONV (rule);
19809 break;
19810
19811 case RULE_OP_MANGLE_CHR_DECR:
19812 rule_buf[rule_pos] = rule_cmd;
19813 GET_P0_CONV (rule);
19814 break;
19815
19816 case RULE_OP_MANGLE_REPLACE_NP1:
19817 rule_buf[rule_pos] = rule_cmd;
19818 GET_P0_CONV (rule);
19819 break;
19820
19821 case RULE_OP_MANGLE_REPLACE_NM1:
19822 rule_buf[rule_pos] = rule_cmd;
19823 GET_P0_CONV (rule);
19824 break;
19825
19826 case RULE_OP_MANGLE_DUPEBLOCK_FIRST:
19827 rule_buf[rule_pos] = rule_cmd;
19828 GET_P0_CONV (rule);
19829 break;
19830
19831 case RULE_OP_MANGLE_DUPEBLOCK_LAST:
19832 rule_buf[rule_pos] = rule_cmd;
19833 GET_P0_CONV (rule);
19834 break;
19835
19836 case RULE_OP_MANGLE_TITLE:
19837 rule_buf[rule_pos] = rule_cmd;
19838 break;
19839
19840 case 0:
19841 return rule_pos - 1;
19842 break;
19843
19844 default:
19845 return (-1);
19846 break;
19847 }
19848 }
19849
19850 if (rule_cnt > 0)
19851 {
19852 return rule_pos;
19853 }
19854
19855 return (-1);
19856 }
19857
19858 /**
19859 * CPU rules : this is from hashcat sources, cpu based rules
19860 */
19861
19862 #define NEXT_RULEPOS(rp) if (++(rp) == rule_len) return (RULE_RC_SYNTAX_ERROR)
19863 #define NEXT_RPTOI(r,rp,up) if (((up) = conv_ctoi ((r)[(rp)])) == -1) return (RULE_RC_SYNTAX_ERROR)
19864
19865 #define MANGLE_TOGGLE_AT(a,p) if (class_alpha ((a)[(p)])) (a)[(p)] ^= 0x20
19866 #define MANGLE_LOWER_AT(a,p) if (class_upper ((a)[(p)])) (a)[(p)] ^= 0x20
19867 #define MANGLE_UPPER_AT(a,p) if (class_lower ((a)[(p)])) (a)[(p)] ^= 0x20
19868
19869 /* #define MANGLE_SWITCH(a,l,r) { char c = (l); arr[(r)] = arr[(l)]; arr[(l)] = c; } */
19870 /* #define MANGLE_SWITCH(a,l,r) { char c = (l); (a)[(r)] = (a)[(l)]; (a)[(l)] = c; } */
19871 #define MANGLE_SWITCH(a,l,r) { char c = (a)[(r)]; (a)[(r)] = (a)[(l)]; (a)[(l)] = c; }
19872
19873 int mangle_lrest (char arr[BLOCK_SIZE], int arr_len)
19874 {
19875 int pos;
19876
19877 for (pos = 0; pos < arr_len; pos++) MANGLE_LOWER_AT (arr, pos);
19878
19879 return (arr_len);
19880 }
19881
19882 int mangle_urest (char arr[BLOCK_SIZE], int arr_len)
19883 {
19884 int pos;
19885
19886 for (pos = 0; pos < arr_len; pos++) MANGLE_UPPER_AT (arr, pos);
19887
19888 return (arr_len);
19889 }
19890
19891 int mangle_trest (char arr[BLOCK_SIZE], int arr_len)
19892 {
19893 int pos;
19894
19895 for (pos = 0; pos < arr_len; pos++) MANGLE_TOGGLE_AT (arr, pos);
19896
19897 return (arr_len);
19898 }
19899
19900 int mangle_reverse (char arr[BLOCK_SIZE], int arr_len)
19901 {
19902 int l;
19903 int r;
19904
19905 for (l = 0; l < arr_len; l++)
19906 {
19907 r = arr_len - 1 - l;
19908
19909 if (l >= r) break;
19910
19911 MANGLE_SWITCH (arr, l, r);
19912 }
19913
19914 return (arr_len);
19915 }
19916
19917 int mangle_double (char arr[BLOCK_SIZE], int arr_len)
19918 {
19919 if ((arr_len * 2) >= BLOCK_SIZE) return (arr_len);
19920
19921 memcpy (&arr[arr_len], arr, (size_t) arr_len);
19922
19923 return (arr_len * 2);
19924 }
19925
19926 int mangle_double_times (char arr[BLOCK_SIZE], int arr_len, int times)
19927 {
19928 if (((arr_len * times) + arr_len) >= BLOCK_SIZE) return (arr_len);
19929
19930 int orig_len = arr_len;
19931
19932 int i;
19933
19934 for (i = 0; i < times; i++)
19935 {
19936 memcpy (&arr[arr_len], arr, orig_len);
19937
19938 arr_len += orig_len;
19939 }
19940
19941 return (arr_len);
19942 }
19943
19944 int mangle_reflect (char arr[BLOCK_SIZE], int arr_len)
19945 {
19946 if ((arr_len * 2) >= BLOCK_SIZE) return (arr_len);
19947
19948 mangle_double (arr, arr_len);
19949
19950 mangle_reverse (arr + arr_len, arr_len);
19951
19952 return (arr_len * 2);
19953 }
19954
19955 int mangle_rotate_left (char arr[BLOCK_SIZE], int arr_len)
19956 {
19957 int l;
19958 int r;
19959
19960 for (l = 0, r = arr_len - 1; r > 0; r--)
19961 {
19962 MANGLE_SWITCH (arr, l, r);
19963 }
19964
19965 return (arr_len);
19966 }
19967
19968 int mangle_rotate_right (char arr[BLOCK_SIZE], int arr_len)
19969 {
19970 int l;
19971 int r;
19972
19973 for (l = 0, r = arr_len - 1; l < r; l++)
19974 {
19975 MANGLE_SWITCH (arr, l, r);
19976 }
19977
19978 return (arr_len);
19979 }
19980
19981 int mangle_append (char arr[BLOCK_SIZE], int arr_len, char c)
19982 {
19983 if ((arr_len + 1) >= BLOCK_SIZE) return (arr_len);
19984
19985 arr[arr_len] = c;
19986
19987 return (arr_len + 1);
19988 }
19989
19990 int mangle_prepend (char arr[BLOCK_SIZE], int arr_len, char c)
19991 {
19992 if ((arr_len + 1) >= BLOCK_SIZE) return (arr_len);
19993
19994 int arr_pos;
19995
19996 for (arr_pos = arr_len - 1; arr_pos > -1; arr_pos--)
19997 {
19998 arr[arr_pos + 1] = arr[arr_pos];
19999 }
20000
20001 arr[0] = c;
20002
20003 return (arr_len + 1);
20004 }
20005
20006 int mangle_delete_at (char arr[BLOCK_SIZE], int arr_len, int upos)
20007 {
20008 if (upos >= arr_len) return (arr_len);
20009
20010 int arr_pos;
20011
20012 for (arr_pos = upos; arr_pos < arr_len - 1; arr_pos++)
20013 {
20014 arr[arr_pos] = arr[arr_pos + 1];
20015 }
20016
20017 return (arr_len - 1);
20018 }
20019
20020 int mangle_extract (char arr[BLOCK_SIZE], int arr_len, int upos, int ulen)
20021 {
20022 if (upos >= arr_len) return (arr_len);
20023
20024 if ((upos + ulen) > arr_len) return (arr_len);
20025
20026 int arr_pos;
20027
20028 for (arr_pos = 0; arr_pos < ulen; arr_pos++)
20029 {
20030 arr[arr_pos] = arr[upos + arr_pos];
20031 }
20032
20033 return (ulen);
20034 }
20035
20036 int mangle_omit (char arr[BLOCK_SIZE], int arr_len, int upos, int ulen)
20037 {
20038 if (upos >= arr_len) return (arr_len);
20039
20040 if ((upos + ulen) >= arr_len) return (arr_len);
20041
20042 int arr_pos;
20043
20044 for (arr_pos = upos; arr_pos < arr_len - ulen; arr_pos++)
20045 {
20046 arr[arr_pos] = arr[arr_pos + ulen];
20047 }
20048
20049 return (arr_len - ulen);
20050 }
20051
20052 int mangle_insert (char arr[BLOCK_SIZE], int arr_len, int upos, char c)
20053 {
20054 if (upos >= arr_len) return (arr_len);
20055
20056 if ((arr_len + 1) >= BLOCK_SIZE) return (arr_len);
20057
20058 int arr_pos;
20059
20060 for (arr_pos = arr_len - 1; arr_pos > upos - 1; arr_pos--)
20061 {
20062 arr[arr_pos + 1] = arr[arr_pos];
20063 }
20064
20065 arr[upos] = c;
20066
20067 return (arr_len + 1);
20068 }
20069
20070 int mangle_insert_multi (char arr[BLOCK_SIZE], int arr_len, int arr_pos, char arr2[BLOCK_SIZE], int arr2_len, int arr2_pos, int arr2_cpy)
20071 {
20072 if ((arr_len + arr2_cpy) > BLOCK_SIZE) return (RULE_RC_REJECT_ERROR);
20073
20074 if (arr_pos > arr_len) return (RULE_RC_REJECT_ERROR);
20075
20076 if (arr2_pos > arr2_len) return (RULE_RC_REJECT_ERROR);
20077
20078 if ((arr2_pos + arr2_cpy) > arr2_len) return (RULE_RC_REJECT_ERROR);
20079
20080 if (arr2_cpy < 1) return (RULE_RC_SYNTAX_ERROR);
20081
20082 memcpy (arr2, arr2 + arr2_pos, arr2_len - arr2_pos);
20083
20084 memcpy (arr2 + arr2_cpy, arr + arr_pos, arr_len - arr_pos);
20085
20086 memcpy (arr + arr_pos, arr2, arr_len - arr_pos + arr2_cpy);
20087
20088 return (arr_len + arr2_cpy);
20089 }
20090
20091 int mangle_overstrike (char arr[BLOCK_SIZE], int arr_len, int upos, char c)
20092 {
20093 if (upos >= arr_len) return (arr_len);
20094
20095 arr[upos] = c;
20096
20097 return (arr_len);
20098 }
20099
20100 int mangle_truncate_at (char arr[BLOCK_SIZE], int arr_len, int upos)
20101 {
20102 if (upos >= arr_len) return (arr_len);
20103
20104 memset (arr + upos, 0, arr_len - upos);
20105
20106 return (upos);
20107 }
20108
20109 int mangle_replace (char arr[BLOCK_SIZE], int arr_len, char oldc, char newc)
20110 {
20111 int arr_pos;
20112
20113 for (arr_pos = 0; arr_pos < arr_len; arr_pos++)
20114 {
20115 if (arr[arr_pos] != oldc) continue;
20116
20117 arr[arr_pos] = newc;
20118 }
20119
20120 return (arr_len);
20121 }
20122
20123 int mangle_purgechar (char arr[BLOCK_SIZE], int arr_len, char c)
20124 {
20125 int arr_pos;
20126
20127 int ret_len;
20128
20129 for (ret_len = 0, arr_pos = 0; arr_pos < arr_len; arr_pos++)
20130 {
20131 if (arr[arr_pos] == c) continue;
20132
20133 arr[ret_len] = arr[arr_pos];
20134
20135 ret_len++;
20136 }
20137
20138 return (ret_len);
20139 }
20140
20141 int mangle_dupeblock_prepend (char arr[BLOCK_SIZE], int arr_len, int ulen)
20142 {
20143 if (ulen > arr_len) return (arr_len);
20144
20145 if ((arr_len + ulen) >= BLOCK_SIZE) return (arr_len);
20146
20147 char cs[100] = { 0 };
20148
20149 memcpy (cs, arr, ulen);
20150
20151 int i;
20152
20153 for (i = 0; i < ulen; i++)
20154 {
20155 char c = cs[i];
20156
20157 arr_len = mangle_insert (arr, arr_len, i, c);
20158 }
20159
20160 return (arr_len);
20161 }
20162
20163 int mangle_dupeblock_append (char arr[BLOCK_SIZE], int arr_len, int ulen)
20164 {
20165 if (ulen > arr_len) return (arr_len);
20166
20167 if ((arr_len + ulen) >= BLOCK_SIZE) return (arr_len);
20168
20169 int upos = arr_len - ulen;
20170
20171 int i;
20172
20173 for (i = 0; i < ulen; i++)
20174 {
20175 char c = arr[upos + i];
20176
20177 arr_len = mangle_append (arr, arr_len, c);
20178 }
20179
20180 return (arr_len);
20181 }
20182
20183 int mangle_dupechar_at (char arr[BLOCK_SIZE], int arr_len, int upos, int ulen)
20184 {
20185 if ( arr_len == 0) return (arr_len);
20186 if ((arr_len + ulen) >= BLOCK_SIZE) return (arr_len);
20187
20188 char c = arr[upos];
20189
20190 int i;
20191
20192 for (i = 0; i < ulen; i++)
20193 {
20194 arr_len = mangle_insert (arr, arr_len, upos, c);
20195 }
20196
20197 return (arr_len);
20198 }
20199
20200 int mangle_dupechar (char arr[BLOCK_SIZE], int arr_len)
20201 {
20202 if ( arr_len == 0) return (arr_len);
20203 if ((arr_len + arr_len) >= BLOCK_SIZE) return (arr_len);
20204
20205 int arr_pos;
20206
20207 for (arr_pos = arr_len - 1; arr_pos > -1; arr_pos--)
20208 {
20209 int new_pos = arr_pos * 2;
20210
20211 arr[new_pos] = arr[arr_pos];
20212
20213 arr[new_pos + 1] = arr[arr_pos];
20214 }
20215
20216 return (arr_len * 2);
20217 }
20218
20219 int mangle_switch_at_check (char arr[BLOCK_SIZE], int arr_len, int upos, int upos2)
20220 {
20221 if (upos >= arr_len) return (arr_len);
20222 if (upos2 >= arr_len) return (arr_len);
20223
20224 MANGLE_SWITCH (arr, upos, upos2);
20225
20226 return (arr_len);
20227 }
20228
20229 int mangle_switch_at (char arr[BLOCK_SIZE], int arr_len, int upos, int upos2)
20230 {
20231 MANGLE_SWITCH (arr, upos, upos2);
20232
20233 return (arr_len);
20234 }
20235
20236 int mangle_chr_shiftl (char arr[BLOCK_SIZE], int arr_len, int upos)
20237 {
20238 if (upos >= arr_len) return (arr_len);
20239
20240 arr[upos] <<= 1;
20241
20242 return (arr_len);
20243 }
20244
20245 int mangle_chr_shiftr (char arr[BLOCK_SIZE], int arr_len, int upos)
20246 {
20247 if (upos >= arr_len) return (arr_len);
20248
20249 arr[upos] >>= 1;
20250
20251 return (arr_len);
20252 }
20253
20254 int mangle_chr_incr (char arr[BLOCK_SIZE], int arr_len, int upos)
20255 {
20256 if (upos >= arr_len) return (arr_len);
20257
20258 arr[upos] += 1;
20259
20260 return (arr_len);
20261 }
20262
20263 int mangle_chr_decr (char arr[BLOCK_SIZE], int arr_len, int upos)
20264 {
20265 if (upos >= arr_len) return (arr_len);
20266
20267 arr[upos] -= 1;
20268
20269 return (arr_len);
20270 }
20271
20272 int mangle_title (char arr[BLOCK_SIZE], int arr_len)
20273 {
20274 int upper_next = 1;
20275
20276 int pos;
20277
20278 for (pos = 0; pos < arr_len; pos++)
20279 {
20280 if (arr[pos] == ' ')
20281 {
20282 upper_next = 1;
20283
20284 continue;
20285 }
20286
20287 if (upper_next)
20288 {
20289 upper_next = 0;
20290
20291 MANGLE_UPPER_AT (arr, pos);
20292 }
20293 else
20294 {
20295 MANGLE_LOWER_AT (arr, pos);
20296 }
20297 }
20298
20299 return (arr_len);
20300 }
20301
20302 int generate_random_rule (char rule_buf[RP_RULE_BUFSIZ], u32 rp_gen_func_min, u32 rp_gen_func_max)
20303 {
20304 u32 rp_gen_num = get_random_num (rp_gen_func_min, rp_gen_func_max);
20305
20306 u32 j;
20307
20308 u32 rule_pos = 0;
20309
20310 for (j = 0; j < rp_gen_num; j++)
20311 {
20312 u32 r = 0;
20313 u32 p1 = 0;
20314 u32 p2 = 0;
20315 u32 p3 = 0;
20316
20317 switch ((char) get_random_num (0, 9))
20318 {
20319 case 0:
20320 r = get_random_num (0, sizeof (grp_op_nop));
20321 rule_buf[rule_pos++] = grp_op_nop[r];
20322 break;
20323
20324 case 1:
20325 r = get_random_num (0, sizeof (grp_op_pos_p0));
20326 rule_buf[rule_pos++] = grp_op_pos_p0[r];
20327 p1 = get_random_num (0, sizeof (grp_pos));
20328 rule_buf[rule_pos++] = grp_pos[p1];
20329 break;
20330
20331 case 2:
20332 r = get_random_num (0, sizeof (grp_op_pos_p1));
20333 rule_buf[rule_pos++] = grp_op_pos_p1[r];
20334 p1 = get_random_num (1, 6);
20335 rule_buf[rule_pos++] = grp_pos[p1];
20336 break;
20337
20338 case 3:
20339 r = get_random_num (0, sizeof (grp_op_chr));
20340 rule_buf[rule_pos++] = grp_op_chr[r];
20341 p1 = get_random_num (0x20, 0x7e);
20342 rule_buf[rule_pos++] = (char) p1;
20343 break;
20344
20345 case 4:
20346 r = get_random_num (0, sizeof (grp_op_chr_chr));
20347 rule_buf[rule_pos++] = grp_op_chr_chr[r];
20348 p1 = get_random_num (0x20, 0x7e);
20349 rule_buf[rule_pos++] = (char) p1;
20350 p2 = get_random_num (0x20, 0x7e);
20351 while (p1 == p2)
20352 p2 = get_random_num (0x20, 0x7e);
20353 rule_buf[rule_pos++] = (char) p2;
20354 break;
20355
20356 case 5:
20357 r = get_random_num (0, sizeof (grp_op_pos_chr));
20358 rule_buf[rule_pos++] = grp_op_pos_chr[r];
20359 p1 = get_random_num (0, sizeof (grp_pos));
20360 rule_buf[rule_pos++] = grp_pos[p1];
20361 p2 = get_random_num (0x20, 0x7e);
20362 rule_buf[rule_pos++] = (char) p2;
20363 break;
20364
20365 case 6:
20366 r = get_random_num (0, sizeof (grp_op_pos_pos0));
20367 rule_buf[rule_pos++] = grp_op_pos_pos0[r];
20368 p1 = get_random_num (0, sizeof (grp_pos));
20369 rule_buf[rule_pos++] = grp_pos[p1];
20370 p2 = get_random_num (0, sizeof (grp_pos));
20371 while (p1 == p2)
20372 p2 = get_random_num (0, sizeof (grp_pos));
20373 rule_buf[rule_pos++] = grp_pos[p2];
20374 break;
20375
20376 case 7:
20377 r = get_random_num (0, sizeof (grp_op_pos_pos1));
20378 rule_buf[rule_pos++] = grp_op_pos_pos1[r];
20379 p1 = get_random_num (0, sizeof (grp_pos));
20380 rule_buf[rule_pos++] = grp_pos[p1];
20381 p2 = get_random_num (1, sizeof (grp_pos));
20382 while (p1 == p2)
20383 p2 = get_random_num (1, sizeof (grp_pos));
20384 rule_buf[rule_pos++] = grp_pos[p2];
20385 break;
20386
20387 case 8:
20388 r = get_random_num (0, sizeof (grp_op_pos1_pos2_pos3));
20389 rule_buf[rule_pos++] = grp_op_pos1_pos2_pos3[r];
20390 p1 = get_random_num (0, sizeof (grp_pos));
20391 rule_buf[rule_pos++] = grp_pos[p1];
20392 p2 = get_random_num (1, sizeof (grp_pos));
20393 rule_buf[rule_pos++] = grp_pos[p1];
20394 p3 = get_random_num (0, sizeof (grp_pos));
20395 rule_buf[rule_pos++] = grp_pos[p3];
20396 break;
20397 }
20398 }
20399
20400 return (rule_pos);
20401 }
20402
20403 int _old_apply_rule (char *rule, int rule_len, char in[BLOCK_SIZE], int in_len, char out[BLOCK_SIZE])
20404 {
20405 char mem[BLOCK_SIZE] = { 0 };
20406
20407 if (in == NULL) return (RULE_RC_REJECT_ERROR);
20408
20409 if (out == NULL) return (RULE_RC_REJECT_ERROR);
20410
20411 if (in_len < 1 || in_len > BLOCK_SIZE) return (RULE_RC_REJECT_ERROR);
20412
20413 if (rule_len < 1) return (RULE_RC_REJECT_ERROR);
20414
20415 int out_len = in_len;
20416 int mem_len = in_len;
20417
20418 memcpy (out, in, out_len);
20419
20420 int rule_pos;
20421
20422 for (rule_pos = 0; rule_pos < rule_len; rule_pos++)
20423 {
20424 int upos, upos2;
20425 int ulen;
20426
20427 switch (rule[rule_pos])
20428 {
20429 case ' ':
20430 break;
20431
20432 case RULE_OP_MANGLE_NOOP:
20433 break;
20434
20435 case RULE_OP_MANGLE_LREST:
20436 out_len = mangle_lrest (out, out_len);
20437 break;
20438
20439 case RULE_OP_MANGLE_UREST:
20440 out_len = mangle_urest (out, out_len);
20441 break;
20442
20443 case RULE_OP_MANGLE_LREST_UFIRST:
20444 out_len = mangle_lrest (out, out_len);
20445 if (out_len) MANGLE_UPPER_AT (out, 0);
20446 break;
20447
20448 case RULE_OP_MANGLE_UREST_LFIRST:
20449 out_len = mangle_urest (out, out_len);
20450 if (out_len) MANGLE_LOWER_AT (out, 0);
20451 break;
20452
20453 case RULE_OP_MANGLE_TREST:
20454 out_len = mangle_trest (out, out_len);
20455 break;
20456
20457 case RULE_OP_MANGLE_TOGGLE_AT:
20458 NEXT_RULEPOS (rule_pos);
20459 NEXT_RPTOI (rule, rule_pos, upos);
20460 if (upos < out_len) MANGLE_TOGGLE_AT (out, upos);
20461 break;
20462
20463 case RULE_OP_MANGLE_REVERSE:
20464 out_len = mangle_reverse (out, out_len);
20465 break;
20466
20467 case RULE_OP_MANGLE_DUPEWORD:
20468 out_len = mangle_double (out, out_len);
20469 break;
20470
20471 case RULE_OP_MANGLE_DUPEWORD_TIMES:
20472 NEXT_RULEPOS (rule_pos);
20473 NEXT_RPTOI (rule, rule_pos, ulen);
20474 out_len = mangle_double_times (out, out_len, ulen);
20475 break;
20476
20477 case RULE_OP_MANGLE_REFLECT:
20478 out_len = mangle_reflect (out, out_len);
20479 break;
20480
20481 case RULE_OP_MANGLE_ROTATE_LEFT:
20482 mangle_rotate_left (out, out_len);
20483 break;
20484
20485 case RULE_OP_MANGLE_ROTATE_RIGHT:
20486 mangle_rotate_right (out, out_len);
20487 break;
20488
20489 case RULE_OP_MANGLE_APPEND:
20490 NEXT_RULEPOS (rule_pos);
20491 out_len = mangle_append (out, out_len, rule[rule_pos]);
20492 break;
20493
20494 case RULE_OP_MANGLE_PREPEND:
20495 NEXT_RULEPOS (rule_pos);
20496 out_len = mangle_prepend (out, out_len, rule[rule_pos]);
20497 break;
20498
20499 case RULE_OP_MANGLE_DELETE_FIRST:
20500 out_len = mangle_delete_at (out, out_len, 0);
20501 break;
20502
20503 case RULE_OP_MANGLE_DELETE_LAST:
20504 out_len = mangle_delete_at (out, out_len, (out_len) ? out_len - 1 : 0);
20505 break;
20506
20507 case RULE_OP_MANGLE_DELETE_AT:
20508 NEXT_RULEPOS (rule_pos);
20509 NEXT_RPTOI (rule, rule_pos, upos);
20510 out_len = mangle_delete_at (out, out_len, upos);
20511 break;
20512
20513 case RULE_OP_MANGLE_EXTRACT:
20514 NEXT_RULEPOS (rule_pos);
20515 NEXT_RPTOI (rule, rule_pos, upos);
20516 NEXT_RULEPOS (rule_pos);
20517 NEXT_RPTOI (rule, rule_pos, ulen);
20518 out_len = mangle_extract (out, out_len, upos, ulen);
20519 break;
20520
20521 case RULE_OP_MANGLE_OMIT:
20522 NEXT_RULEPOS (rule_pos);
20523 NEXT_RPTOI (rule, rule_pos, upos);
20524 NEXT_RULEPOS (rule_pos);
20525 NEXT_RPTOI (rule, rule_pos, ulen);
20526 out_len = mangle_omit (out, out_len, upos, ulen);
20527 break;
20528
20529 case RULE_OP_MANGLE_INSERT:
20530 NEXT_RULEPOS (rule_pos);
20531 NEXT_RPTOI (rule, rule_pos, upos);
20532 NEXT_RULEPOS (rule_pos);
20533 out_len = mangle_insert (out, out_len, upos, rule[rule_pos]);
20534 break;
20535
20536 case RULE_OP_MANGLE_OVERSTRIKE:
20537 NEXT_RULEPOS (rule_pos);
20538 NEXT_RPTOI (rule, rule_pos, upos);
20539 NEXT_RULEPOS (rule_pos);
20540 out_len = mangle_overstrike (out, out_len, upos, rule[rule_pos]);
20541 break;
20542
20543 case RULE_OP_MANGLE_TRUNCATE_AT:
20544 NEXT_RULEPOS (rule_pos);
20545 NEXT_RPTOI (rule, rule_pos, upos);
20546 out_len = mangle_truncate_at (out, out_len, upos);
20547 break;
20548
20549 case RULE_OP_MANGLE_REPLACE:
20550 NEXT_RULEPOS (rule_pos);
20551 NEXT_RULEPOS (rule_pos);
20552 out_len = mangle_replace (out, out_len, rule[rule_pos - 1], rule[rule_pos]);
20553 break;
20554
20555 case RULE_OP_MANGLE_PURGECHAR:
20556 NEXT_RULEPOS (rule_pos);
20557 out_len = mangle_purgechar (out, out_len, rule[rule_pos]);
20558 break;
20559
20560 case RULE_OP_MANGLE_TOGGLECASE_REC:
20561 /* todo */
20562 break;
20563
20564 case RULE_OP_MANGLE_DUPECHAR_FIRST:
20565 NEXT_RULEPOS (rule_pos);
20566 NEXT_RPTOI (rule, rule_pos, ulen);
20567 out_len = mangle_dupechar_at (out, out_len, 0, ulen);
20568 break;
20569
20570 case RULE_OP_MANGLE_DUPECHAR_LAST:
20571 NEXT_RULEPOS (rule_pos);
20572 NEXT_RPTOI (rule, rule_pos, ulen);
20573 out_len = mangle_dupechar_at (out, out_len, out_len - 1, ulen);
20574 break;
20575
20576 case RULE_OP_MANGLE_DUPECHAR_ALL:
20577 out_len = mangle_dupechar (out, out_len);
20578 break;
20579
20580 case RULE_OP_MANGLE_DUPEBLOCK_FIRST:
20581 NEXT_RULEPOS (rule_pos);
20582 NEXT_RPTOI (rule, rule_pos, ulen);
20583 out_len = mangle_dupeblock_prepend (out, out_len, ulen);
20584 break;
20585
20586 case RULE_OP_MANGLE_DUPEBLOCK_LAST:
20587 NEXT_RULEPOS (rule_pos);
20588 NEXT_RPTOI (rule, rule_pos, ulen);
20589 out_len = mangle_dupeblock_append (out, out_len, ulen);
20590 break;
20591
20592 case RULE_OP_MANGLE_SWITCH_FIRST:
20593 if (out_len >= 2) mangle_switch_at (out, out_len, 0, 1);
20594 break;
20595
20596 case RULE_OP_MANGLE_SWITCH_LAST:
20597 if (out_len >= 2) mangle_switch_at (out, out_len, out_len - 1, out_len - 2);
20598 break;
20599
20600 case RULE_OP_MANGLE_SWITCH_AT:
20601 NEXT_RULEPOS (rule_pos);
20602 NEXT_RPTOI (rule, rule_pos, upos);
20603 NEXT_RULEPOS (rule_pos);
20604 NEXT_RPTOI (rule, rule_pos, upos2);
20605 out_len = mangle_switch_at_check (out, out_len, upos, upos2);
20606 break;
20607
20608 case RULE_OP_MANGLE_CHR_SHIFTL:
20609 NEXT_RULEPOS (rule_pos);
20610 NEXT_RPTOI (rule, rule_pos, upos);
20611 mangle_chr_shiftl (out, out_len, upos);
20612 break;
20613
20614 case RULE_OP_MANGLE_CHR_SHIFTR:
20615 NEXT_RULEPOS (rule_pos);
20616 NEXT_RPTOI (rule, rule_pos, upos);
20617 mangle_chr_shiftr (out, out_len, upos);
20618 break;
20619
20620 case RULE_OP_MANGLE_CHR_INCR:
20621 NEXT_RULEPOS (rule_pos);
20622 NEXT_RPTOI (rule, rule_pos, upos);
20623 mangle_chr_incr (out, out_len, upos);
20624 break;
20625
20626 case RULE_OP_MANGLE_CHR_DECR:
20627 NEXT_RULEPOS (rule_pos);
20628 NEXT_RPTOI (rule, rule_pos, upos);
20629 mangle_chr_decr (out, out_len, upos);
20630 break;
20631
20632 case RULE_OP_MANGLE_REPLACE_NP1:
20633 NEXT_RULEPOS (rule_pos);
20634 NEXT_RPTOI (rule, rule_pos, upos);
20635 if ((upos >= 0) && ((upos + 1) < out_len)) mangle_overstrike (out, out_len, upos, out[upos + 1]);
20636 break;
20637
20638 case RULE_OP_MANGLE_REPLACE_NM1:
20639 NEXT_RULEPOS (rule_pos);
20640 NEXT_RPTOI (rule, rule_pos, upos);
20641 if ((upos >= 1) && ((upos + 0) < out_len)) mangle_overstrike (out, out_len, upos, out[upos - 1]);
20642 break;
20643
20644 case RULE_OP_MANGLE_TITLE:
20645 out_len = mangle_title (out, out_len);
20646 break;
20647
20648 case RULE_OP_MANGLE_EXTRACT_MEMORY:
20649 if (mem_len < 1) return (RULE_RC_REJECT_ERROR);
20650 NEXT_RULEPOS (rule_pos);
20651 NEXT_RPTOI (rule, rule_pos, upos);
20652 NEXT_RULEPOS (rule_pos);
20653 NEXT_RPTOI (rule, rule_pos, ulen);
20654 NEXT_RULEPOS (rule_pos);
20655 NEXT_RPTOI (rule, rule_pos, upos2);
20656 if ((out_len = mangle_insert_multi (out, out_len, upos2, mem, mem_len, upos, ulen)) < 1) return (out_len);
20657 break;
20658
20659 case RULE_OP_MANGLE_APPEND_MEMORY:
20660 if (mem_len < 1) return (RULE_RC_REJECT_ERROR);
20661 if ((out_len + mem_len) > BLOCK_SIZE) return (RULE_RC_REJECT_ERROR);
20662 memcpy (out + out_len, mem, mem_len);
20663 out_len += mem_len;
20664 break;
20665
20666 case RULE_OP_MANGLE_PREPEND_MEMORY:
20667 if (mem_len < 1) return (RULE_RC_REJECT_ERROR);
20668 if ((mem_len + out_len) > BLOCK_SIZE) return (RULE_RC_REJECT_ERROR);
20669 memcpy (mem + mem_len, out, out_len);
20670 out_len += mem_len;
20671 memcpy (out, mem, out_len);
20672 break;
20673
20674 case RULE_OP_MEMORIZE_WORD:
20675 memcpy (mem, out, out_len);
20676 mem_len = out_len;
20677 break;
20678
20679 case RULE_OP_REJECT_LESS:
20680 NEXT_RULEPOS (rule_pos);
20681 NEXT_RPTOI (rule, rule_pos, upos);
20682 if (out_len > upos) return (RULE_RC_REJECT_ERROR);
20683 break;
20684
20685 case RULE_OP_REJECT_GREATER:
20686 NEXT_RULEPOS (rule_pos);
20687 NEXT_RPTOI (rule, rule_pos, upos);
20688 if (out_len < upos) return (RULE_RC_REJECT_ERROR);
20689 break;
20690
20691 case RULE_OP_REJECT_CONTAIN:
20692 NEXT_RULEPOS (rule_pos);
20693 if (strchr (out, rule[rule_pos]) != NULL) return (RULE_RC_REJECT_ERROR);
20694 break;
20695
20696 case RULE_OP_REJECT_NOT_CONTAIN:
20697 NEXT_RULEPOS (rule_pos);
20698 if (strchr (out, rule[rule_pos]) == NULL) return (RULE_RC_REJECT_ERROR);
20699 break;
20700
20701 case RULE_OP_REJECT_EQUAL_FIRST:
20702 NEXT_RULEPOS (rule_pos);
20703 if (out[0] != rule[rule_pos]) return (RULE_RC_REJECT_ERROR);
20704 break;
20705
20706 case RULE_OP_REJECT_EQUAL_LAST:
20707 NEXT_RULEPOS (rule_pos);
20708 if (out[out_len - 1] != rule[rule_pos]) return (RULE_RC_REJECT_ERROR);
20709 break;
20710
20711 case RULE_OP_REJECT_EQUAL_AT:
20712 NEXT_RULEPOS (rule_pos);
20713 NEXT_RPTOI (rule, rule_pos, upos);
20714 if ((upos + 1) > out_len) return (RULE_RC_REJECT_ERROR);
20715 NEXT_RULEPOS (rule_pos);
20716 if (out[upos] != rule[rule_pos]) return (RULE_RC_REJECT_ERROR);
20717 break;
20718
20719 case RULE_OP_REJECT_CONTAINS:
20720 NEXT_RULEPOS (rule_pos);
20721 NEXT_RPTOI (rule, rule_pos, upos);
20722 if ((upos + 1) > out_len) return (RULE_RC_REJECT_ERROR);
20723 NEXT_RULEPOS (rule_pos);
20724 int c; int cnt; for (c = 0, cnt = 0; c < out_len; c++) if (out[c] == rule[rule_pos]) cnt++;
20725 if (cnt < upos) return (RULE_RC_REJECT_ERROR);
20726 break;
20727
20728 case RULE_OP_REJECT_MEMORY:
20729 if ((out_len == mem_len) && (memcmp (out, mem, out_len) == 0)) return (RULE_RC_REJECT_ERROR);
20730 break;
20731
20732 default:
20733 return (RULE_RC_SYNTAX_ERROR);
20734 break;
20735 }
20736 }
20737
20738 memset (out + out_len, 0, BLOCK_SIZE - out_len);
20739
20740 return (out_len);
20741 }