]>
Commit | Line | Data |
---|---|---|
20f9a2a1 M |
1 | //----------------------------------------------------------------------------- |
2 | // Copyright (C) 2010 iZsh <izsh at fail0verflow.com> | |
3 | // | |
4 | // This code is licensed to you under the terms of the GNU GPL, version 2 or, | |
5 | // at your option, any later version. See the LICENSE.txt file for the text of | |
6 | // the license. | |
7 | //----------------------------------------------------------------------------- | |
8 | // utilities | |
9 | //----------------------------------------------------------------------------- | |
10 | ||
11 | #include "util.h" | |
bf32dd92 | 12 | #define MAX_BIN_BREAK_LENGTH (3072+384+1) |
534983d7 | 13 | |
cb64309e | 14 | #ifndef _WIN32 |
873014de M |
15 | #include <termios.h> |
16 | #include <sys/ioctl.h> | |
79544b28 | 17 | |
f397b5cc M |
18 | int ukbhit(void) |
19 | { | |
20 | int cnt = 0; | |
21 | int error; | |
22 | static struct termios Otty, Ntty; | |
23 | ||
f397b5cc M |
24 | tcgetattr( 0, &Otty); |
25 | Ntty = Otty; | |
26 | ||
27 | Ntty.c_iflag = 0; /* input mode */ | |
28 | Ntty.c_oflag = 0; /* output mode */ | |
29 | Ntty.c_lflag &= ~ICANON; /* raw mode */ | |
30 | Ntty.c_cc[VMIN] = CMIN; /* minimum time to wait */ | |
31 | Ntty.c_cc[VTIME] = CTIME; /* minimum characters to wait for */ | |
32 | ||
33 | if (0 == (error = tcsetattr(0, TCSANOW, &Ntty))) { | |
34 | error += ioctl(0, FIONREAD, &cnt); | |
35 | error += tcsetattr(0, TCSANOW, &Otty); | |
36 | } | |
37 | ||
38 | return ( error == 0 ? cnt : -1 ); | |
39 | } | |
40 | ||
41 | #else | |
42 | #include <conio.h> | |
43 | int ukbhit(void) { | |
44 | return kbhit(); | |
45 | } | |
46 | #endif | |
47 | ||
55acbb2a | 48 | // log files functions |
b915fda3 | 49 | void AddLogLine(char *file, char *extData, char *c) { |
55acbb2a | 50 | FILE *fLog = NULL; |
b915fda3 | 51 | char filename[FILE_PATH_SIZE] = {0x00}; |
52 | int len = 0; | |
53 | ||
54 | len = strlen(file); | |
55 | if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE; | |
56 | memcpy(filename, file, len); | |
57 | ||
58 | fLog = fopen(filename, "a"); | |
55acbb2a | 59 | if (!fLog) { |
b915fda3 | 60 | printf("Could not append log file %s", filename); |
55acbb2a M |
61 | return; |
62 | } | |
63 | ||
64 | fprintf(fLog, "%s", extData); | |
65 | fprintf(fLog, "%s\n", c); | |
66 | fclose(fLog); | |
67 | } | |
68 | ||
69 | void AddLogHex(char *fileName, char *extData, const uint8_t * data, const size_t len){ | |
70 | AddLogLine(fileName, extData, sprint_hex(data, len)); | |
71 | } | |
72 | ||
73 | void AddLogUint64(char *fileName, char *extData, const uint64_t data) { | |
74 | char buf[100] = {0}; | |
75 | sprintf(buf, "%x%x", (unsigned int)((data & 0xFFFFFFFF00000000) >> 32), (unsigned int)(data & 0xFFFFFFFF)); | |
76 | AddLogLine(fileName, extData, buf); | |
77 | } | |
78 | ||
79 | void AddLogCurrentDT(char *fileName) { | |
80 | char buff[20]; | |
81 | struct tm *curTime; | |
82 | ||
83 | time_t now = time(0); | |
84 | curTime = gmtime(&now); | |
85 | ||
86 | strftime (buff, sizeof(buff), "%Y-%m-%d %H:%M:%S", curTime); | |
87 | AddLogLine(fileName, "\nanticollision: ", buff); | |
88 | } | |
89 | ||
e0c635d1 | 90 | void FillFileNameByUID(char *fileName, uint8_t * uid, char *ext, int byteCount) { |
55acbb2a M |
91 | char * fnameptr = fileName; |
92 | memset(fileName, 0x00, 200); | |
93 | ||
e0c635d1 | 94 | for (int j = 0; j < byteCount; j++, fnameptr += 2) |
55acbb2a M |
95 | sprintf(fnameptr, "%02x", uid[j]); |
96 | sprintf(fnameptr, "%s", ext); | |
55acbb2a M |
97 | } |
98 | ||
99 | // printing and converting functions | |
f397b5cc | 100 | |
534983d7 | 101 | void print_hex(const uint8_t * data, const size_t len) |
102 | { | |
103 | size_t i; | |
104 | ||
105 | for (i=0; i < len; i++) | |
106 | printf("%02x ", data[i]); | |
107 | ||
108 | printf("\n"); | |
109 | } | |
110 | ||
334cc089 | 111 | char *sprint_hex(const uint8_t *data, const size_t len) { |
b915fda3 | 112 | |
113 | int maxLen = ( len > 1024/3) ? 1024/3 : len; | |
534983d7 | 114 | static char buf[1024]; |
334cc089 | 115 | memset(buf, 0x00, 1024); |
534983d7 | 116 | char * tmp = buf; |
117 | size_t i; | |
118 | ||
b915fda3 | 119 | for (i=0; i < maxLen; ++i, tmp += 3) |
334cc089 | 120 | sprintf(tmp, "%02X ", data[i]); |
534983d7 | 121 | |
122 | return buf; | |
123 | } | |
f89c7050 | 124 | |
2767fc02 | 125 | char *sprint_bin_break(const uint8_t *data, const size_t len, const uint8_t breaks) { |
bf32dd92 | 126 | // make sure we don't go beyond our char array memory |
0c97a456 | 127 | int max_len; |
128 | if (breaks==0) | |
129 | max_len = ( len > MAX_BIN_BREAK_LENGTH ) ? MAX_BIN_BREAK_LENGTH : len; | |
130 | else | |
131 | max_len = ( len+(len/breaks) > MAX_BIN_BREAK_LENGTH ) ? MAX_BIN_BREAK_LENGTH : len+(len/breaks); | |
132 | ||
bf32dd92 | 133 | static char buf[MAX_BIN_BREAK_LENGTH]; // 3072 + end of line characters if broken at 8 bits |
134 | //clear memory | |
135 | memset(buf, 0x00, sizeof(buf)); | |
2767fc02 | 136 | char *tmp = buf; |
79544b28 | 137 | |
bf32dd92 | 138 | size_t in_index = 0; |
139 | // loop through the out_index to make sure we don't go too far | |
140 | for (size_t out_index=0; out_index < max_len; out_index++) { | |
141 | // set character | |
142 | sprintf(tmp++, "%u", data[in_index]); | |
9332b857 | 143 | // check if a line break is needed and we have room to print it in our array |
bf32dd92 | 144 | if ( (breaks > 0) && !((in_index+1) % breaks) && (out_index+1 != max_len) ) { |
145 | // increment and print line break | |
146 | out_index++; | |
2767fc02 | 147 | sprintf(tmp++, "%s","\n"); |
148 | } | |
bf32dd92 | 149 | in_index++; |
150 | } | |
79544b28 | 151 | |
152 | return buf; | |
153 | } | |
154 | ||
2767fc02 | 155 | char *sprint_bin(const uint8_t *data, const size_t len) { |
156 | return sprint_bin_break(data, len, 0); | |
157 | } | |
0c97a456 | 158 | |
159 | char *sprint_hex_ascii(const uint8_t *data, const size_t len) { | |
160 | static char buf[1024]; | |
161 | memset(buf, 0x00, 1024); | |
508b37ba | 162 | char *tmp = buf; |
163 | sprintf(tmp, "%s| %s", sprint_hex(data, len) , data); | |
0c97a456 | 164 | return buf; |
165 | } | |
f89c7050 M |
166 | void num_to_bytes(uint64_t n, size_t len, uint8_t* dest) |
167 | { | |
168 | while (len--) { | |
169 | dest[len] = (uint8_t) n; | |
170 | n >>= 8; | |
171 | } | |
172 | } | |
173 | ||
174 | uint64_t bytes_to_num(uint8_t* src, size_t len) | |
175 | { | |
176 | uint64_t num = 0; | |
177 | while (len--) | |
178 | { | |
179 | num = (num << 8) | (*src); | |
180 | src++; | |
181 | } | |
182 | return num; | |
183 | } | |
f397b5cc | 184 | |
a126332a | 185 | void num_to_bytebits(uint64_t n, size_t len, uint8_t *dest) { |
186 | while (len--) { | |
187 | dest[len] = n & 1; | |
188 | n >>= 1; | |
189 | } | |
190 | } | |
191 | ||
e1c88b09 | 192 | // aa,bb,cc,dd,ee,ff,gg,hh, ii,jj,kk,ll,mm,nn,oo,pp |
193 | // to | |
194 | // hh,gg,ff,ee,dd,cc,bb,aa, pp,oo,nn,mm,ll,kk,jj,ii | |
195 | // up to 64 bytes or 512 bits | |
224e8c1a | 196 | uint8_t *SwapEndian64(const uint8_t *src, const size_t len, const uint8_t blockSize){ |
508b37ba | 197 | static uint8_t buf[64]; |
224e8c1a | 198 | memset(buf, 0x00, 64); |
199 | uint8_t *tmp = buf; | |
200 | for (uint8_t block=0; block < (uint8_t)(len/blockSize); block++){ | |
201 | for (size_t i = 0; i < blockSize; i++){ | |
202 | tmp[i+(blockSize*block)] = src[(blockSize-1-i)+(blockSize*block)]; | |
e1c88b09 | 203 | } |
204 | } | |
224e8c1a | 205 | return tmp; |
e1c88b09 | 206 | } |
207 | ||
9ca155ba M |
208 | // ------------------------------------------------------------------------- |
209 | // string parameters lib | |
210 | // ------------------------------------------------------------------------- | |
211 | ||
f397b5cc M |
212 | // ------------------------------------------------------------------------- |
213 | // line - param line | |
214 | // bg, en - symbol numbers in param line of beginning an ending parameter | |
215 | // paramnum - param number (from 0) | |
216 | // ------------------------------------------------------------------------- | |
217 | int param_getptr(const char *line, int *bg, int *en, int paramnum) | |
218 | { | |
219 | int i; | |
220 | int len = strlen(line); | |
221 | ||
222 | *bg = 0; | |
223 | *en = 0; | |
224 | ||
225 | // skip spaces | |
226 | while (line[*bg] ==' ' || line[*bg]=='\t') (*bg)++; | |
227 | if (*bg >= len) { | |
228 | return 1; | |
229 | } | |
230 | ||
231 | for (i = 0; i < paramnum; i++) { | |
232 | while (line[*bg]!=' ' && line[*bg]!='\t' && line[*bg] != '\0') (*bg)++; | |
233 | while (line[*bg]==' ' || line[*bg]=='\t') (*bg)++; | |
234 | ||
235 | if (line[*bg] == '\0') return 1; | |
236 | } | |
237 | ||
238 | *en = *bg; | |
239 | while (line[*en] != ' ' && line[*en] != '\t' && line[*en] != '\0') (*en)++; | |
240 | ||
241 | (*en)--; | |
242 | ||
243 | return 0; | |
244 | } | |
245 | ||
31abe49f | 246 | |
f397b5cc M |
247 | char param_getchar(const char *line, int paramnum) |
248 | { | |
249 | int bg, en; | |
250 | ||
251 | if (param_getptr(line, &bg, &en, paramnum)) return 0x00; | |
252 | ||
253 | return line[bg]; | |
254 | } | |
255 | ||
256 | uint8_t param_get8(const char *line, int paramnum) | |
257 | { | |
60e86577 | 258 | return param_get8ex(line, paramnum, 0, 10); |
f397b5cc M |
259 | } |
260 | ||
f6d9fb17 | 261 | /** |
31abe49f | 262 | * @brief Reads a decimal integer (actually, 0-254, not 255) |
f6d9fb17 MHS |
263 | * @param line |
264 | * @param paramnum | |
31abe49f | 265 | * @return -1 if error |
f6d9fb17 MHS |
266 | */ |
267 | uint8_t param_getdec(const char *line, int paramnum, uint8_t *destination) | |
268 | { | |
31abe49f | 269 | uint8_t val = param_get8ex(line, paramnum, 255, 10); |
31abe49f | 270 | if( (int8_t) val == -1) return 1; |
f6d9fb17 MHS |
271 | (*destination) = val; |
272 | return 0; | |
273 | } | |
274 | /** | |
275 | * @brief Checks if param is decimal | |
276 | * @param line | |
277 | * @param paramnum | |
278 | * @return | |
279 | */ | |
280 | uint8_t param_isdec(const char *line, int paramnum) | |
281 | { | |
282 | int bg, en; | |
283 | //TODO, check more thorougly | |
284 | if (!param_getptr(line, &bg, &en, paramnum)) return 1; | |
285 | // return strtoul(&line[bg], NULL, 10) & 0xff; | |
286 | ||
287 | return 0; | |
288 | } | |
289 | ||
f397b5cc M |
290 | uint8_t param_get8ex(const char *line, int paramnum, int deflt, int base) |
291 | { | |
292 | int bg, en; | |
293 | ||
294 | if (!param_getptr(line, &bg, &en, paramnum)) | |
6c6d1ac1 | 295 | return strtoul(&line[bg], NULL, base) & 0xff; |
f397b5cc M |
296 | else |
297 | return deflt; | |
298 | } | |
299 | ||
300 | uint32_t param_get32ex(const char *line, int paramnum, int deflt, int base) | |
301 | { | |
302 | int bg, en; | |
303 | ||
304 | if (!param_getptr(line, &bg, &en, paramnum)) | |
6c6d1ac1 | 305 | return strtoul(&line[bg], NULL, base); |
f397b5cc M |
306 | else |
307 | return deflt; | |
308 | } | |
309 | ||
310 | uint64_t param_get64ex(const char *line, int paramnum, int deflt, int base) | |
311 | { | |
312 | int bg, en; | |
313 | ||
314 | if (!param_getptr(line, &bg, &en, paramnum)) | |
6c6d1ac1 | 315 | return strtoull(&line[bg], NULL, base); |
f397b5cc M |
316 | else |
317 | return deflt; | |
318 | ||
319 | return 0; | |
320 | } | |
321 | ||
322 | int param_gethex(const char *line, int paramnum, uint8_t * data, int hexcnt) | |
323 | { | |
324 | int bg, en, temp, i; | |
325 | ||
508b37ba | 326 | if (hexcnt & 1) return 1; |
f397b5cc M |
327 | |
328 | if (param_getptr(line, &bg, &en, paramnum)) return 1; | |
329 | ||
508b37ba | 330 | if (en - bg + 1 != hexcnt) return 1; |
f397b5cc M |
331 | |
332 | for(i = 0; i < hexcnt; i += 2) { | |
333 | if (!(isxdigit(line[bg + i]) && isxdigit(line[bg + i + 1])) ) return 1; | |
334 | ||
335 | sscanf((char[]){line[bg + i], line[bg + i + 1], 0}, "%X", &temp); | |
336 | data[i / 2] = temp & 0xff; | |
337 | } | |
338 | ||
339 | return 0; | |
340 | } | |
e98572a1 | 341 | int param_gethex_ex(const char *line, int paramnum, uint8_t * data, int *hexcnt) |
342 | { | |
343 | int bg, en, temp, i; | |
344 | ||
345 | //if (hexcnt % 2) | |
346 | // return 1; | |
347 | ||
348 | if (param_getptr(line, &bg, &en, paramnum)) return 1; | |
349 | ||
350 | *hexcnt = en - bg + 1; | |
351 | if (*hexcnt % 2) //error if not complete hex bytes | |
352 | return 1; | |
aea4d766 | 353 | |
e98572a1 | 354 | for(i = 0; i < *hexcnt; i += 2) { |
3bc7b13d | 355 | if (!(isxdigit(line[bg + i]) && isxdigit(line[bg + i + 1])) ) return 1; |
e98572a1 | 356 | |
357 | sscanf((char[]){line[bg + i], line[bg + i + 1], 0}, "%X", &temp); | |
358 | data[i / 2] = temp & 0xff; | |
359 | } | |
360 | ||
361 | return 0; | |
362 | } | |
aea4d766 | 363 | int param_getstr(const char *line, int paramnum, char * str) |
364 | { | |
365 | int bg, en; | |
366 | ||
367 | if (param_getptr(line, &bg, &en, paramnum)) return 0; | |
368 | ||
369 | memcpy(str, line + bg, en - bg + 1); | |
370 | str[en - bg + 1] = 0; | |
371 | ||
372 | return en - bg + 1; | |
373 | } | |
79544b28 | 374 | |
375 | /* | |
376 | The following methods comes from Rfidler sourcecode. | |
377 | https://github.com/ApertureLabsLtd/RFIDler/blob/master/firmware/Pic32/RFIDler.X/src/ | |
378 | */ | |
379 | ||
380 | // convert hex to sequence of 0/1 bit values | |
381 | // returns number of bits converted | |
382 | int hextobinarray(char *target, char *source) | |
383 | { | |
384 | int length, i, count= 0; | |
385 | char x; | |
386 | ||
387 | length = strlen(source); | |
388 | // process 4 bits (1 hex digit) at a time | |
389 | while(length--) | |
390 | { | |
391 | x= *(source++); | |
392 | // capitalize | |
393 | if (x >= 'a' && x <= 'f') | |
394 | x -= 32; | |
395 | // convert to numeric value | |
396 | if (x >= '0' && x <= '9') | |
397 | x -= '0'; | |
398 | else if (x >= 'A' && x <= 'F') | |
399 | x -= 'A' - 10; | |
400 | else | |
401 | return 0; | |
402 | // output | |
403 | for(i= 0 ; i < 4 ; ++i, ++count) | |
404 | *(target++)= (x >> (3 - i)) & 1; | |
405 | } | |
406 | ||
407 | return count; | |
408 | } | |
409 | ||
410 | // convert hex to human readable binary string | |
411 | int hextobinstring(char *target, char *source) | |
412 | { | |
413 | int length; | |
414 | ||
415 | if(!(length= hextobinarray(target, source))) | |
416 | return 0; | |
417 | binarraytobinstring(target, target, length); | |
418 | return length; | |
419 | } | |
420 | ||
421 | // convert binary array of 0x00/0x01 values to hex (safe to do in place as target will always be shorter than source) | |
422 | // return number of bits converted | |
423 | int binarraytohex(char *target, char *source, int length) | |
424 | { | |
425 | unsigned char i, x; | |
426 | int j = length; | |
427 | ||
428 | if(j % 4) | |
429 | return 0; | |
430 | ||
431 | while(j) | |
432 | { | |
433 | for(i= x= 0 ; i < 4 ; ++i) | |
434 | x += ( source[i] << (3 - i)); | |
435 | sprintf(target,"%X", x); | |
436 | ++target; | |
437 | source += 4; | |
438 | j -= 4; | |
439 | } | |
440 | return length; | |
441 | } | |
442 | ||
443 | // convert binary array to human readable binary | |
444 | void binarraytobinstring(char *target, char *source, int length) | |
445 | { | |
446 | int i; | |
447 | ||
448 | for(i= 0 ; i < length ; ++i) | |
449 | *(target++)= *(source++) + '0'; | |
450 | *target= '\0'; | |
451 | } | |
452 | ||
453 | // return parity bit required to match type | |
a126332a | 454 | uint8_t GetParity( uint8_t *bits, uint8_t type, int length) |
79544b28 | 455 | { |
456 | int x; | |
457 | ||
458 | for(x= 0 ; length > 0 ; --length) | |
459 | x += bits[length - 1]; | |
460 | x %= 2; | |
461 | ||
462 | return x ^ type; | |
463 | } | |
464 | ||
465 | // add HID parity to binary array: EVEN prefix for 1st half of ID, ODD suffix for 2nd half | |
a126332a | 466 | void wiegand_add_parity(uint8_t *target, uint8_t *source, uint8_t length) |
79544b28 | 467 | { |
468 | *(target++)= GetParity(source, EVEN, length / 2); | |
469 | memcpy(target, source, length); | |
470 | target += length; | |
471 | *(target)= GetParity(source + length / 2, ODD, length / 2); | |
472 | } | |
c3c241f3 | 473 | |
474 | void xor(unsigned char * dst, unsigned char * src, size_t len) { | |
475 | for( ; len > 0; len--,dst++,src++) | |
476 | *dst ^= *src; | |
477 | } | |
478 | ||
479 | int32_t le24toh (uint8_t data[3]) { | |
480 | return (data[2] << 16) | (data[1] << 8) | data[0]; | |
481 | } | |
ad6219fc | 482 | |
ad6219fc | 483 | uint32_t PackBits(uint8_t start, uint8_t len, uint8_t* bits) { |
9984b173 | 484 | |
485 | if (len > 32) return 0; | |
ad6219fc | 486 | |
487 | int i = start; | |
488 | int j = len-1; | |
ad6219fc | 489 | uint32_t tmp = 0; |
9984b173 | 490 | |
ad6219fc | 491 | for (; j >= 0; --j, ++i) |
492 | tmp |= bits[i] << j; | |
493 | ||
494 | return tmp; | |
495 | } | |
9984b173 | 496 | |
497 | // RotateLeft - Ultralight, Desfire | |
498 | void rol(uint8_t *data, const size_t len){ | |
499 | uint8_t first = data[0]; | |
500 | for (size_t i = 0; i < len-1; i++) { | |
501 | data[i] = data[i+1]; | |
502 | } | |
503 | data[len-1] = first; | |
504 | } |