]> git.zerfleddert.de Git - proxmark3-svn/blob - client/cmdlf.c
CHG: Extracted @piwi's bucketsort into separate files under /common
[proxmark3-svn] / client / cmdlf.c
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 // Low frequency commands
9 //-----------------------------------------------------------------------------
10
11 #include <stdio.h>
12 #include <stdlib.h>
13 #include <string.h>
14 #include <limits.h>
15 #include "proxmark3.h"
16 #include "data.h"
17 #include "graph.h"
18 #include "ui.h"
19 #include "cmdparser.h"
20 #include "cmdmain.h"
21 #include "cmddata.h"
22 #include "util.h"
23 #include "cmdlf.h"
24 #include "cmdlfhid.h"
25 #include "cmdlfawid.h"
26 #include "cmdlfti.h"
27 #include "cmdlfem4x.h"
28 #include "cmdlfhitag.h"
29 #include "cmdlft55xx.h"
30 #include "cmdlfpcf7931.h"
31 #include "cmdlfio.h"
32 #include "lfdemod.h"
33 #include "cmdlfviking.h"
34 static int CmdHelp(const char *Cmd);
35
36 int usage_lf_cmdread(void) {
37 PrintAndLog("Usage: lf cmdread d <delay period> z <zero period> o <one period> c <cmdbytes> [H]");
38 PrintAndLog("Options: ");
39 PrintAndLog(" h This help");
40 PrintAndLog(" H Freqency High (134 KHz), default is 'Low (125KHz)'");
41 PrintAndLog(" d <delay> delay OFF period, (dec)");
42 PrintAndLog(" z <zero> time period ZERO, (dec)");
43 PrintAndLog(" o <one> time period ONE, (dec)");
44 PrintAndLog(" c <cmd> Command bytes");
45 PrintAndLog(" ************* All periods in microseconds (ms)");
46 PrintAndLog("Examples:");
47 PrintAndLog(" lf cmdread d 80 z 100 o 200 c 11000");
48 PrintAndLog(" lf cmdread d 80 z 100 o 100 c 11000 H");
49 return 0;
50 }
51 int usage_lf_read(void){
52 PrintAndLog("Usage: lf read [h] [s]");
53 PrintAndLog("Options: ");
54 PrintAndLog(" h This help");
55 PrintAndLog(" s silent run no printout");
56 PrintAndLog("This function takes no arguments. ");
57 PrintAndLog("Use 'lf config' to set parameters.");
58 return 0;
59 }
60 int usage_lf_snoop(void) {
61 PrintAndLog("Usage: lf snoop");
62 PrintAndLog("Options: ");
63 PrintAndLog(" h This help");
64 PrintAndLog("This function takes no arguments. ");
65 PrintAndLog("Use 'lf config' to set parameters.");
66 return 0;
67 }
68 int usage_lf_config(void) {
69 PrintAndLog("Usage: lf config [H|<divisor>] [b <bps>] [d <decim>] [a 0|1]");
70 PrintAndLog("Options: ");
71 PrintAndLog(" h This help");
72 PrintAndLog(" L Low frequency (125 KHz)");
73 PrintAndLog(" H High frequency (134 KHz)");
74 PrintAndLog(" q <divisor> Manually set divisor. 88-> 134KHz, 95-> 125 Hz");
75 PrintAndLog(" b <bps> Sets resolution of bits per sample. Default (max): 8");
76 PrintAndLog(" d <decim> Sets decimation. A value of N saves only 1 in N samples. Default: 1");
77 PrintAndLog(" a [0|1] Averaging - if set, will average the stored sample value when decimating. Default: 1");
78 PrintAndLog(" t <threshold> Sets trigger threshold. 0 means no threshold (range: 0-128)");
79 PrintAndLog("Examples:");
80 PrintAndLog(" lf config b 8 L");
81 PrintAndLog(" Samples at 125KHz, 8bps.");
82 PrintAndLog(" lf config H b 4 d 3");
83 PrintAndLog(" Samples at 134KHz, averages three samples into one, stored with ");
84 PrintAndLog(" a resolution of 4 bits per sample.");
85 PrintAndLog(" lf read");
86 PrintAndLog(" Performs a read (active field)");
87 PrintAndLog(" lf snoop");
88 PrintAndLog(" Performs a snoop (no active field)");
89 return 0;
90 }
91 int usage_lf_simfsk(void) {
92 PrintAndLog("Usage: lf simfsk [c <clock>] [i] [H <fcHigh>] [L <fcLow>] [d <hexdata>]");
93 PrintAndLog("Options: ");
94 PrintAndLog(" h This help");
95 PrintAndLog(" c <clock> Manually set clock - can autodetect if using DemodBuffer");
96 PrintAndLog(" i invert data");
97 PrintAndLog(" H <fcHigh> Manually set the larger Field Clock");
98 PrintAndLog(" L <fcLow> Manually set the smaller Field Clock");
99 //PrintAndLog(" s TBD- -to enable a gap between playback repetitions - default: no gap");
100 PrintAndLog(" d <hexdata> Data to sim as hex - omit to sim from DemodBuffer");
101 PrintAndLog("\n NOTE: if you set one clock manually set them all manually");
102 return 0;
103 }
104 int usage_lf_simask(void) {
105 PrintAndLog("Usage: lf simask [c <clock>] [i] [b|m|r] [s] [d <raw hex to sim>]");
106 PrintAndLog("Options: ");
107 PrintAndLog(" h This help");
108 PrintAndLog(" c <clock> Manually set clock - can autodetect if using DemodBuffer");
109 PrintAndLog(" i invert data");
110 PrintAndLog(" b sim ask/biphase");
111 PrintAndLog(" m sim ask/manchester - Default");
112 PrintAndLog(" r sim ask/raw");
113 PrintAndLog(" s TBD- -to enable a gap between playback repetitions - default: no gap");
114 PrintAndLog(" d <hexdata> Data to sim as hex - omit to sim from DemodBuffer");
115 return 0;
116 }
117 int usage_lf_simpsk(void) {
118 PrintAndLog("Usage: lf simpsk [1|2|3] [c <clock>] [i] [r <carrier>] [d <raw hex to sim>]");
119 PrintAndLog("Options: ");
120 PrintAndLog(" h This help");
121 PrintAndLog(" c <clock> Manually set clock - can autodetect if using DemodBuffer");
122 PrintAndLog(" i invert data");
123 PrintAndLog(" 1 set PSK1 (default)");
124 PrintAndLog(" 2 set PSK2");
125 PrintAndLog(" 3 set PSK3");
126 PrintAndLog(" r <carrier> 2|4|8 are valid carriers: default = 2");
127 PrintAndLog(" d <hexdata> Data to sim as hex - omit to sim from DemodBuffer");
128 return 0;
129 }
130 int usage_lf_find(void){
131 PrintAndLog("Usage: lf search <0|1> [u]");
132 PrintAndLog(" <use data from Graphbuffer> , if not set, try reading data from tag.");
133 PrintAndLog(" [Search for Unknown tags] , if not set, reads only known tags.");
134 PrintAndLog("");
135 PrintAndLog(" sample: lf search = try reading data from tag & search for known tags");
136 PrintAndLog(" : lf search 1 = use data from GraphBuffer & search for known tags");
137 PrintAndLog(" : lf search u = try reading data from tag & search for known and unknown tags");
138 PrintAndLog(" : lf search 1 u = use data from GraphBuffer & search for known and unknown tags");
139 return 0;
140 }
141
142
143 /* send a LF command before reading */
144 int CmdLFCommandRead(const char *Cmd)
145 {
146 static char dummy[3] = {0x20,0x00,0x00};
147 UsbCommand c = {CMD_MOD_THEN_ACQUIRE_RAW_ADC_SAMPLES_125K};
148 bool errors = FALSE;
149
150 uint8_t cmdp = 0;
151 int strLength = 0;
152
153 while(param_getchar(Cmd, cmdp) != 0x00) {
154 switch(param_getchar(Cmd, cmdp))
155 {
156 case 'h':
157 return usage_lf_cmdread();
158 case 'H':
159 dummy[1]='h';
160 cmdp++;
161 break;
162 case 'L':
163 cmdp++;
164 break;
165 case 'c':
166 strLength = param_getstr(Cmd, cmdp+1, (char *)&c.d.asBytes);
167 cmdp+=2;
168 break;
169 case 'd':
170 c.arg[0] = param_get32ex(Cmd, cmdp+1, 0, 10);
171 cmdp+=2;
172 break;
173 case 'z':
174 c.arg[1] = param_get32ex(Cmd, cmdp+1, 0, 10);
175 cmdp+=2;
176 break;
177 case 'o':
178 c.arg[2] = param_get32ex(Cmd, cmdp+1, 0, 10);
179 cmdp+=2;
180 break;
181 default:
182 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
183 errors = 1;
184 break;
185 }
186 if(errors) break;
187 }
188 // No args
189 if (cmdp == 0) errors = 1;
190
191 //Validations
192 if (errors) return usage_lf_cmdread();
193
194 // in case they specified 'H'
195 strcpy((char *)&c.d.asBytes + strLength, dummy);
196
197 clearCommandBuffer();
198 SendCommand(&c);
199 return 0;
200 }
201
202 int CmdFlexdemod(const char *Cmd)
203 {
204 int i;
205 for (i = 0; i < GraphTraceLen; ++i) {
206 if (GraphBuffer[i] < 0) {
207 GraphBuffer[i] = -1;
208 } else {
209 GraphBuffer[i] = 1;
210 }
211 }
212
213 #define LONG_WAIT 100
214 int start;
215 for (start = 0; start < GraphTraceLen - LONG_WAIT; start++) {
216 int first = GraphBuffer[start];
217 for (i = start; i < start + LONG_WAIT; i++) {
218 if (GraphBuffer[i] != first) {
219 break;
220 }
221 }
222 if (i == (start + LONG_WAIT)) {
223 break;
224 }
225 }
226 if (start == GraphTraceLen - LONG_WAIT) {
227 PrintAndLog("nothing to wait for");
228 return 0;
229 }
230
231 GraphBuffer[start] = 2;
232 GraphBuffer[start+1] = -2;
233 uint8_t bits[64] = {0x00};
234
235 int bit, sum;
236 i = start;
237 for (bit = 0; bit < 64; bit++) {
238 sum = 0;
239 for (int j = 0; j < 16; j++) {
240 sum += GraphBuffer[i++];
241 }
242
243 bits[bit] = (sum > 0) ? 1 : 0;
244
245 PrintAndLog("bit %d sum %d", bit, sum);
246 }
247
248 for (bit = 0; bit < 64; bit++) {
249 int j;
250 int sum = 0;
251 for (j = 0; j < 16; j++) {
252 sum += GraphBuffer[i++];
253 }
254 if (sum > 0 && bits[bit] != 1) {
255 PrintAndLog("oops1 at %d", bit);
256 }
257 if (sum < 0 && bits[bit] != 0) {
258 PrintAndLog("oops2 at %d", bit);
259 }
260 }
261
262 // HACK writing back to graphbuffer.
263 GraphTraceLen = 32*64;
264 i = 0;
265 int phase = 0;
266 for (bit = 0; bit < 64; bit++) {
267
268 phase = (bits[bit] == 0) ? 0 : 1;
269
270 int j;
271 for (j = 0; j < 32; j++) {
272 GraphBuffer[i++] = phase;
273 phase = !phase;
274 }
275 }
276
277 RepaintGraphWindow();
278 return 0;
279 }
280
281 int CmdIndalaDemod(const char *Cmd)
282 {
283 // Usage: recover 64bit UID by default, specify "224" as arg to recover a 224bit UID
284
285 int state = -1;
286 int count = 0;
287 int i, j;
288
289 // worst case with GraphTraceLen=64000 is < 4096
290 // under normal conditions it's < 2048
291
292 uint8_t rawbits[4096];
293 int rawbit = 0;
294 int worst = 0, worstPos = 0;
295 // PrintAndLog("Expecting a bit less than %d raw bits", GraphTraceLen / 32);
296
297 // loop through raw signal - since we know it is psk1 rf/32 fc/2 skip every other value (+=2)
298 for (i = 0; i < GraphTraceLen-1; i += 2) {
299 count += 1;
300 if ((GraphBuffer[i] > GraphBuffer[i + 1]) && (state != 1)) {
301 // appears redundant - marshmellow
302 if (state == 0) {
303 for (j = 0; j < count - 8; j += 16) {
304 rawbits[rawbit++] = 0;
305 }
306 if ((abs(count - j)) > worst) {
307 worst = abs(count - j);
308 worstPos = i;
309 }
310 }
311 state = 1;
312 count = 0;
313 } else if ((GraphBuffer[i] < GraphBuffer[i + 1]) && (state != 0)) {
314 //appears redundant
315 if (state == 1) {
316 for (j = 0; j < count - 8; j += 16) {
317 rawbits[rawbit++] = 1;
318 }
319 if ((abs(count - j)) > worst) {
320 worst = abs(count - j);
321 worstPos = i;
322 }
323 }
324 state = 0;
325 count = 0;
326 }
327 }
328
329 if ( rawbit>0 ){
330 PrintAndLog("Recovered %d raw bits, expected: %d", rawbit, GraphTraceLen/32);
331 PrintAndLog("worst metric (0=best..7=worst): %d at pos %d", worst, worstPos);
332 } else {
333 return 0;
334 }
335
336 // Finding the start of a UID
337 int uidlen, long_wait;
338 if (strcmp(Cmd, "224") == 0) {
339 uidlen = 224;
340 long_wait = 30;
341 } else {
342 uidlen = 64;
343 long_wait = 29;
344 }
345
346 int start;
347 int first = 0;
348 for (start = 0; start <= rawbit - uidlen; start++) {
349 first = rawbits[start];
350 for (i = start; i < start + long_wait; i++) {
351 if (rawbits[i] != first) {
352 break;
353 }
354 }
355 if (i == (start + long_wait)) {
356 break;
357 }
358 }
359
360 if (start == rawbit - uidlen + 1) {
361 PrintAndLog("nothing to wait for");
362 return 0;
363 }
364
365 // Inverting signal if needed
366 if (first == 1) {
367 for (i = start; i < rawbit; i++) {
368 rawbits[i] = !rawbits[i];
369 }
370 }
371
372 // Dumping UID
373 uint8_t bits[224] = {0x00};
374 char showbits[225] = {0x00};
375 int bit;
376 i = start;
377 int times = 0;
378
379 if (uidlen > rawbit) {
380 PrintAndLog("Warning: not enough raw bits to get a full UID");
381 for (bit = 0; bit < rawbit; bit++) {
382 bits[bit] = rawbits[i++];
383 // As we cannot know the parity, let's use "." and "/"
384 showbits[bit] = '.' + bits[bit];
385 }
386 showbits[bit+1]='\0';
387 PrintAndLog("Partial UID=%s", showbits);
388 return 0;
389 } else {
390 for (bit = 0; bit < uidlen; bit++) {
391 bits[bit] = rawbits[i++];
392 showbits[bit] = '0' + bits[bit];
393 }
394 times = 1;
395 }
396
397 //convert UID to HEX
398 uint32_t uid1, uid2, uid3, uid4, uid5, uid6, uid7;
399 int idx;
400 uid1 = uid2 = 0;
401
402 if (uidlen==64){
403 for( idx=0; idx<64; idx++) {
404 if (showbits[idx] == '0') {
405 uid1 = (uid1<<1) | (uid2>>31);
406 uid2 = (uid2<<1) | 0;
407 } else {
408 uid1 = (uid1<<1) | (uid2>>31);
409 uid2 = (uid2<<1) | 1;
410 }
411 }
412 PrintAndLog("UID=%s (%x%08x)", showbits, uid1, uid2);
413 } else {
414 uid3 = uid4 = uid5 = uid6 = uid7 = 0;
415
416 for( idx=0; idx<224; idx++) {
417 uid1 = (uid1<<1) | (uid2>>31);
418 uid2 = (uid2<<1) | (uid3>>31);
419 uid3 = (uid3<<1) | (uid4>>31);
420 uid4 = (uid4<<1) | (uid5>>31);
421 uid5 = (uid5<<1) | (uid6>>31);
422 uid6 = (uid6<<1) | (uid7>>31);
423
424 if (showbits[idx] == '0')
425 uid7 = (uid7<<1) | 0;
426 else
427 uid7 = (uid7<<1) | 1;
428 }
429 PrintAndLog("UID=%s (%x%08x%08x%08x%08x%08x%08x)", showbits, uid1, uid2, uid3, uid4, uid5, uid6, uid7);
430 }
431
432 // Checking UID against next occurrences
433 int failed = 0;
434 for (; i + uidlen <= rawbit;) {
435 failed = 0;
436 for (bit = 0; bit < uidlen; bit++) {
437 if (bits[bit] != rawbits[i++]) {
438 failed = 1;
439 break;
440 }
441 }
442 if (failed == 1) {
443 break;
444 }
445 times += 1;
446 }
447
448 PrintAndLog("Occurrences: %d (expected %d)", times, (rawbit - start) / uidlen);
449
450 // Remodulating for tag cloning
451 // HACK: 2015-01-04 this will have an impact on our new way of seening lf commands (demod)
452 // since this changes graphbuffer data.
453 GraphTraceLen = 32 * uidlen;
454 i = 0;
455 int phase = 0;
456 for (bit = 0; bit < uidlen; bit++) {
457 phase = (bits[bit] == 0) ? 0 : 1;
458 int j;
459 for (j = 0; j < 32; j++) {
460 GraphBuffer[i++] = phase;
461 phase = !phase;
462 }
463 }
464
465 RepaintGraphWindow();
466 return 1;
467 }
468
469 int CmdIndalaClone(const char *Cmd)
470 {
471 UsbCommand c;
472 unsigned int uid1, uid2, uid3, uid4, uid5, uid6, uid7;
473
474 uid1 = uid2 = uid3 = uid4 = uid5 = uid6 = uid7 = 0;
475 int n = 0, i = 0;
476
477 if (strchr(Cmd,'l') != 0) {
478 while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
479 uid1 = (uid1 << 4) | (uid2 >> 28);
480 uid2 = (uid2 << 4) | (uid3 >> 28);
481 uid3 = (uid3 << 4) | (uid4 >> 28);
482 uid4 = (uid4 << 4) | (uid5 >> 28);
483 uid5 = (uid5 << 4) | (uid6 >> 28);
484 uid6 = (uid6 << 4) | (uid7 >> 28);
485 uid7 = (uid7 << 4) | (n & 0xf);
486 }
487 PrintAndLog("Cloning 224bit tag with UID %x%08x%08x%08x%08x%08x%08x", uid1, uid2, uid3, uid4, uid5, uid6, uid7);
488 c.cmd = CMD_INDALA_CLONE_TAG_L;
489 c.d.asDwords[0] = uid1;
490 c.d.asDwords[1] = uid2;
491 c.d.asDwords[2] = uid3;
492 c.d.asDwords[3] = uid4;
493 c.d.asDwords[4] = uid5;
494 c.d.asDwords[5] = uid6;
495 c.d.asDwords[6] = uid7;
496 } else {
497 while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
498 uid1 = (uid1 << 4) | (uid2 >> 28);
499 uid2 = (uid2 << 4) | (n & 0xf);
500 }
501 PrintAndLog("Cloning 64bit tag with UID %x%08x", uid1, uid2);
502 c.cmd = CMD_INDALA_CLONE_TAG;
503 c.arg[0] = uid1;
504 c.arg[1] = uid2;
505 }
506
507 clearCommandBuffer();
508 SendCommand(&c);
509 return 0;
510 }
511
512 int CmdLFSetConfig(const char *Cmd)
513 {
514 uint8_t divisor = 0;//Frequency divisor
515 uint8_t bps = 0; // Bits per sample
516 uint8_t decimation = 0; //How many to keep
517 bool averaging = 1; // Defaults to true
518 bool errors = FALSE;
519 int trigger_threshold = -1;//Means no change
520 uint8_t unsigned_trigg = 0;
521
522 uint8_t cmdp = 0;
523 while(param_getchar(Cmd, cmdp) != 0x00)
524 {
525 switch(param_getchar(Cmd, cmdp))
526 {
527 case 'h':
528 return usage_lf_config();
529 case 'H':
530 divisor = 88;
531 cmdp++;
532 break;
533 case 'L':
534 divisor = 95;
535 cmdp++;
536 break;
537 case 'q':
538 errors |= param_getdec(Cmd,cmdp+1,&divisor);
539 cmdp+=2;
540 break;
541 case 't':
542 errors |= param_getdec(Cmd,cmdp+1,&unsigned_trigg);
543 cmdp+=2;
544 if(!errors) trigger_threshold = unsigned_trigg;
545 break;
546 case 'b':
547 errors |= param_getdec(Cmd,cmdp+1,&bps);
548 cmdp+=2;
549 break;
550 case 'd':
551 errors |= param_getdec(Cmd,cmdp+1,&decimation);
552 cmdp+=2;
553 break;
554 case 'a':
555 averaging = param_getchar(Cmd,cmdp+1) == '1';
556 cmdp+=2;
557 break;
558 default:
559 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
560 errors = 1;
561 break;
562 }
563 if(errors) break;
564 }
565
566 // No args
567 if (cmdp == 0) errors = 1;
568
569 //Validations
570 if (errors) return usage_lf_config();
571
572 //Bps is limited to 8, so fits in lower half of arg1
573 if (bps >> 4) bps = 8;
574
575 sample_config config = { decimation, bps, averaging, divisor, trigger_threshold };
576
577 //Averaging is a flag on high-bit of arg[1]
578 UsbCommand c = {CMD_SET_LF_SAMPLING_CONFIG};
579 memcpy(c.d.asBytes,&config,sizeof(sample_config));
580 clearCommandBuffer();
581 SendCommand(&c);
582 return 0;
583 }
584
585 int CmdLFRead(const char *Cmd)
586 {
587 bool arg1 = false;
588 uint8_t cmdp = param_getchar(Cmd, 0);
589
590 if ( cmdp == 'h' || cmdp == 'H') return usage_lf_read();
591
592 //suppress print
593 if ( cmdp == 's' || cmdp == 'S') arg1 = true;
594
595 UsbCommand c = {CMD_ACQUIRE_RAW_ADC_SAMPLES_125K, {arg1,0,0}};
596 clearCommandBuffer();
597 SendCommand(&c);
598 if ( !WaitForResponseTimeout(CMD_ACK,NULL,2500) ) {
599 PrintAndLog("command execution time out");
600 return 1;
601 }
602 return 0;
603 }
604
605 int CmdLFSnoop(const char *Cmd)
606 {
607 uint8_t cmdp = param_getchar(Cmd, 0);
608 if(cmdp == 'h' || cmdp == 'H') return usage_lf_snoop();
609
610 UsbCommand c = {CMD_LF_SNOOP_RAW_ADC_SAMPLES};
611 clearCommandBuffer();
612 SendCommand(&c);
613 WaitForResponse(CMD_ACK,NULL);
614 return 0;
615 }
616
617 static void ChkBitstream(const char *str)
618 {
619 int i;
620
621 /* convert to bitstream if necessary */
622 for (i = 0; i < (int)(GraphTraceLen / 2); i++){
623 if (GraphBuffer[i] > 1 || GraphBuffer[i] < 0) {
624 CmdGetBitStream("");
625 break;
626 }
627 }
628 }
629 //Attempt to simulate any wave in buffer (one bit per output sample)
630 // converts GraphBuffer to bitstream (based on zero crossings) if needed.
631 int CmdLFSim(const char *Cmd)
632 {
633 int i,j;
634 static int gap;
635
636 sscanf(Cmd, "%i", &gap);
637
638 // convert to bitstream if necessary
639 ChkBitstream(Cmd);
640
641 //can send only 512 bits at a time (1 byte sent per bit...)
642 printf("Sending [%d bytes]", GraphTraceLen);
643 for (i = 0; i < GraphTraceLen; i += USB_CMD_DATA_SIZE) {
644 UsbCommand c = {CMD_DOWNLOADED_SIM_SAMPLES_125K, {i, 0, 0}};
645
646 for (j = 0; j < USB_CMD_DATA_SIZE; j++) {
647 c.d.asBytes[j] = GraphBuffer[i+j];
648 }
649 clearCommandBuffer();
650 SendCommand(&c);
651 WaitForResponse(CMD_ACK,NULL);
652 printf(".");
653 }
654
655 PrintAndLog("\nStarting to simulate");
656 UsbCommand c = {CMD_SIMULATE_TAG_125K, {GraphTraceLen, gap, 0}};
657 clearCommandBuffer();
658 SendCommand(&c);
659 return 0;
660 }
661
662 // by marshmellow - sim ask data given clock, fcHigh, fcLow, invert
663 // - allow pull data from DemodBuffer
664 int CmdLFfskSim(const char *Cmd)
665 {
666 //might be able to autodetect FCs and clock from Graphbuffer if using demod buffer
667 // otherwise will need FChigh, FClow, Clock, and bitstream
668 uint8_t fcHigh=0, fcLow=0, clk=0;
669 uint8_t invert=0;
670 bool errors = FALSE;
671 char hexData[32] = {0x00}; // store entered hex data
672 uint8_t data[255] = {0x00};
673 int dataLen = 0;
674 uint8_t cmdp = 0;
675 while(param_getchar(Cmd, cmdp) != 0x00)
676 {
677 switch(param_getchar(Cmd, cmdp))
678 {
679 case 'h':
680 return usage_lf_simfsk();
681 case 'i':
682 invert = 1;
683 cmdp++;
684 break;
685 case 'c':
686 errors |= param_getdec(Cmd,cmdp+1,&clk);
687 cmdp+=2;
688 break;
689 case 'H':
690 errors |= param_getdec(Cmd,cmdp+1,&fcHigh);
691 cmdp+=2;
692 break;
693 case 'L':
694 errors |= param_getdec(Cmd,cmdp+1,&fcLow);
695 cmdp+=2;
696 break;
697 //case 's':
698 // separator=1;
699 // cmdp++;
700 // break;
701 case 'd':
702 dataLen = param_getstr(Cmd, cmdp+1, hexData);
703 if (dataLen==0) {
704 errors=TRUE;
705 } else {
706 dataLen = hextobinarray((char *)data, hexData);
707 }
708 if (dataLen==0) errors=TRUE;
709 if (errors) PrintAndLog ("Error getting hex data");
710 cmdp+=2;
711 break;
712 default:
713 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
714 errors = TRUE;
715 break;
716 }
717 if(errors) break;
718 }
719 if(cmdp == 0 && DemodBufferLen == 0)
720 {
721 errors = TRUE;// No args
722 }
723
724 //Validations
725 if(errors)
726 {
727 return usage_lf_simfsk();
728 }
729
730 if (dataLen == 0){ //using DemodBuffer
731 if (clk==0 || fcHigh==0 || fcLow==0){ //manual settings must set them all
732 uint8_t ans = fskClocks(&fcHigh, &fcLow, &clk, 0);
733 if (ans==0){
734 if (!fcHigh) fcHigh=10;
735 if (!fcLow) fcLow=8;
736 if (!clk) clk=50;
737 }
738 }
739 } else {
740 setDemodBuf(data, dataLen, 0);
741 }
742
743 //default if not found
744 if (clk == 0) clk = 50;
745 if (fcHigh == 0) fcHigh = 10;
746 if (fcLow == 0) fcLow = 8;
747
748 uint16_t arg1, arg2;
749 arg1 = fcHigh << 8 | fcLow;
750 arg2 = invert << 8 | clk;
751 size_t size = DemodBufferLen;
752 if (size > USB_CMD_DATA_SIZE) {
753 PrintAndLog("DemodBuffer too long for current implementation - length: %d - max: %d", size, USB_CMD_DATA_SIZE);
754 size = USB_CMD_DATA_SIZE;
755 }
756 UsbCommand c = {CMD_FSK_SIM_TAG, {arg1, arg2, size}};
757
758 memcpy(c.d.asBytes, DemodBuffer, size);
759 clearCommandBuffer();
760 SendCommand(&c);
761 return 0;
762 }
763
764 // by marshmellow - sim ask data given clock, invert, manchester or raw, separator
765 // - allow pull data from DemodBuffer
766 int CmdLFaskSim(const char *Cmd)
767 {
768 //autodetect clock from Graphbuffer if using demod buffer
769 // needs clock, invert, manchester/raw as m or r, separator as s, and bitstream
770 uint8_t encoding = 1, separator = 0;
771 uint8_t clk=0, invert=0;
772 bool errors = FALSE;
773 char hexData[32] = {0x00};
774 uint8_t data[255]= {0x00}; // store entered hex data
775 int dataLen = 0;
776 uint8_t cmdp = 0;
777 while(param_getchar(Cmd, cmdp) != 0x00)
778 {
779 switch(param_getchar(Cmd, cmdp))
780 {
781 case 'h':
782 return usage_lf_simask();
783 case 'i':
784 invert = 1;
785 cmdp++;
786 break;
787 case 'c':
788 errors |= param_getdec(Cmd,cmdp+1,&clk);
789 cmdp+=2;
790 break;
791 case 'b':
792 encoding=2; //biphase
793 cmdp++;
794 break;
795 case 'm':
796 encoding=1;
797 cmdp++;
798 break;
799 case 'r':
800 encoding=0;
801 cmdp++;
802 break;
803 case 's':
804 separator=1;
805 cmdp++;
806 break;
807 case 'd':
808 dataLen = param_getstr(Cmd, cmdp+1, hexData);
809 if (dataLen==0) {
810 errors=TRUE;
811 } else {
812 dataLen = hextobinarray((char *)data, hexData);
813 }
814 if (dataLen==0) errors=TRUE;
815 if (errors) PrintAndLog ("Error getting hex data, datalen: %d",dataLen);
816 cmdp+=2;
817 break;
818 default:
819 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
820 errors = TRUE;
821 break;
822 }
823 if(errors) break;
824 }
825 if(cmdp == 0 && DemodBufferLen == 0)
826 {
827 errors = TRUE;// No args
828 }
829
830 //Validations
831 if(errors)
832 {
833 return usage_lf_simask();
834 }
835 if (dataLen == 0){ //using DemodBuffer
836 if (clk == 0) clk = GetAskClock("0", false, false);
837 } else {
838 setDemodBuf(data, dataLen, 0);
839 }
840 if (clk == 0) clk = 64;
841 if (encoding == 0) clk = clk/2; //askraw needs to double the clock speed
842 uint16_t arg1, arg2;
843 size_t size=DemodBufferLen;
844 arg1 = clk << 8 | encoding;
845 arg2 = invert << 8 | separator;
846 if (size > USB_CMD_DATA_SIZE) {
847 PrintAndLog("DemodBuffer too long for current implementation - length: %d - max: %d", size, USB_CMD_DATA_SIZE);
848 size = USB_CMD_DATA_SIZE;
849 }
850 UsbCommand c = {CMD_ASK_SIM_TAG, {arg1, arg2, size}};
851 PrintAndLog("preparing to sim ask data: %d bits", size);
852 memcpy(c.d.asBytes, DemodBuffer, size);
853 clearCommandBuffer();
854 SendCommand(&c);
855 return 0;
856 }
857
858 // by marshmellow - sim psk data given carrier, clock, invert
859 // - allow pull data from DemodBuffer or parameters
860 int CmdLFpskSim(const char *Cmd)
861 {
862 //might be able to autodetect FC and clock from Graphbuffer if using demod buffer
863 //will need carrier, Clock, and bitstream
864 uint8_t carrier=0, clk=0;
865 uint8_t invert=0;
866 bool errors = FALSE;
867 char hexData[32] = {0x00}; // store entered hex data
868 uint8_t data[255] = {0x00};
869 int dataLen = 0;
870 uint8_t cmdp = 0;
871 uint8_t pskType = 1;
872 while(param_getchar(Cmd, cmdp) != 0x00)
873 {
874 switch(param_getchar(Cmd, cmdp))
875 {
876 case 'h':
877 return usage_lf_simpsk();
878 case 'i':
879 invert = 1;
880 cmdp++;
881 break;
882 case 'c':
883 errors |= param_getdec(Cmd,cmdp+1,&clk);
884 cmdp+=2;
885 break;
886 case 'r':
887 errors |= param_getdec(Cmd,cmdp+1,&carrier);
888 cmdp+=2;
889 break;
890 case '1':
891 pskType=1;
892 cmdp++;
893 break;
894 case '2':
895 pskType=2;
896 cmdp++;
897 break;
898 case '3':
899 pskType=3;
900 cmdp++;
901 break;
902 case 'd':
903 dataLen = param_getstr(Cmd, cmdp+1, hexData);
904 if (dataLen==0) {
905 errors=TRUE;
906 } else {
907 dataLen = hextobinarray((char *)data, hexData);
908 }
909 if (dataLen==0) errors=TRUE;
910 if (errors) PrintAndLog ("Error getting hex data");
911 cmdp+=2;
912 break;
913 default:
914 PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
915 errors = TRUE;
916 break;
917 }
918 if (errors) break;
919 }
920 if (cmdp == 0 && DemodBufferLen == 0)
921 {
922 errors = TRUE;// No args
923 }
924
925 //Validations
926 if (errors)
927 {
928 return usage_lf_simpsk();
929 }
930 if (dataLen == 0){ //using DemodBuffer
931 PrintAndLog("Getting Clocks");
932 if (clk==0) clk = GetPskClock("", FALSE, FALSE);
933 PrintAndLog("clk: %d",clk);
934 if (!carrier) carrier = GetPskCarrier("", FALSE, FALSE);
935 PrintAndLog("carrier: %d", carrier);
936 } else {
937 setDemodBuf(data, dataLen, 0);
938 }
939
940 if (clk <= 0) clk = 32;
941 if (carrier == 0) carrier = 2;
942 if (pskType != 1){
943 if (pskType == 2){
944 //need to convert psk2 to psk1 data before sim
945 psk2TOpsk1(DemodBuffer, DemodBufferLen);
946 } else {
947 PrintAndLog("Sorry, PSK3 not yet available");
948 }
949 }
950 uint16_t arg1, arg2;
951 arg1 = clk << 8 | carrier;
952 arg2 = invert;
953 size_t size=DemodBufferLen;
954 if (size > USB_CMD_DATA_SIZE) {
955 PrintAndLog("DemodBuffer too long for current implementation - length: %d - max: %d", size, USB_CMD_DATA_SIZE);
956 size=USB_CMD_DATA_SIZE;
957 }
958 UsbCommand c = {CMD_PSK_SIM_TAG, {arg1, arg2, size}};
959 PrintAndLog("DEBUG: Sending DemodBuffer Length: %d", size);
960 memcpy(c.d.asBytes, DemodBuffer, size);
961 clearCommandBuffer();
962 SendCommand(&c);
963
964 return 0;
965 }
966
967 int CmdLFSimBidir(const char *Cmd)
968 {
969 // Set ADC to twice the carrier for a slight supersampling
970 // HACK: not implemented in ARMSRC.
971 PrintAndLog("Not implemented yet.");
972 UsbCommand c = {CMD_LF_SIMULATE_BIDIR, {47, 384, 0}};
973 SendCommand(&c);
974 return 0;
975 }
976
977 int CmdVchDemod(const char *Cmd)
978 {
979 // Is this the entire sync pattern, or does this also include some
980 // data bits that happen to be the same everywhere? That would be
981 // lovely to know.
982 static const int SyncPattern[] = {
983 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
984 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
985 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
986 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
987 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
988 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
989 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
990 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
991 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
992 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
993 };
994
995 // So first, we correlate for the sync pattern, and mark that.
996 int bestCorrel = 0, bestPos = 0;
997 int i;
998 // It does us no good to find the sync pattern, with fewer than
999 // 2048 samples after it...
1000 for (i = 0; i < (GraphTraceLen-2048); i++) {
1001 int sum = 0;
1002 int j;
1003 for (j = 0; j < arraylen(SyncPattern); j++) {
1004 sum += GraphBuffer[i+j]*SyncPattern[j];
1005 }
1006 if (sum > bestCorrel) {
1007 bestCorrel = sum;
1008 bestPos = i;
1009 }
1010 }
1011 PrintAndLog("best sync at %d [metric %d]", bestPos, bestCorrel);
1012
1013 char bits[257];
1014 bits[256] = '\0';
1015
1016 int worst = INT_MAX;
1017 int worstPos = 0;
1018
1019 for (i = 0; i < 2048; i += 8) {
1020 int sum = 0;
1021 int j;
1022 for (j = 0; j < 8; j++) {
1023 sum += GraphBuffer[bestPos+i+j];
1024 }
1025 if (sum < 0) {
1026 bits[i/8] = '.';
1027 } else {
1028 bits[i/8] = '1';
1029 }
1030 if(abs(sum) < worst) {
1031 worst = abs(sum);
1032 worstPos = i;
1033 }
1034 }
1035 PrintAndLog("bits:");
1036 PrintAndLog("%s", bits);
1037 PrintAndLog("worst metric: %d at pos %d", worst, worstPos);
1038
1039 if (strcmp(Cmd, "clone")==0) {
1040 GraphTraceLen = 0;
1041 char *s;
1042 for(s = bits; *s; s++) {
1043 int j;
1044 for(j = 0; j < 16; j++) {
1045 GraphBuffer[GraphTraceLen++] = (*s == '1') ? 1 : 0;
1046 }
1047 }
1048 RepaintGraphWindow();
1049 }
1050 return 0;
1051 }
1052
1053 //by marshmellow
1054 int CmdLFfind(const char *Cmd) {
1055 int ans = 0;
1056 char cmdp = param_getchar(Cmd, 0);
1057 char testRaw = param_getchar(Cmd, 1);
1058 if (strlen(Cmd) > 3 || cmdp == 'h' || cmdp == 'H') return usage_lf_find();
1059
1060 if (!offline && (cmdp != '1')){
1061 CmdLFRead("s");
1062 getSamples("30000",false);
1063 } else if (GraphTraceLen < 1000) {
1064 PrintAndLog("Data in Graphbuffer was too small.");
1065 return 0;
1066 }
1067 if (cmdp == 'u' || cmdp == 'U') testRaw = 'u';
1068
1069 PrintAndLog("NOTE: some demods output possible binary\n if it finds something that looks like a tag");
1070 PrintAndLog("False Positives ARE possible\n");
1071 PrintAndLog("\nChecking for known tags:\n");
1072
1073 ans=CmdFSKdemodIO("");
1074 if (ans>0) {
1075 PrintAndLog("\nValid IO Prox ID Found!");
1076 return 1;
1077 }
1078
1079 ans=CmdFSKdemodPyramid("");
1080 if (ans>0) {
1081 PrintAndLog("\nValid Pyramid ID Found!");
1082 return 1;
1083 }
1084
1085 ans=CmdFSKdemodParadox("");
1086 if (ans>0) {
1087 PrintAndLog("\nValid Paradox ID Found!");
1088 return 1;
1089 }
1090
1091 ans=CmdFSKdemodAWID("");
1092 if (ans>0) {
1093 PrintAndLog("\nValid AWID ID Found!");
1094 return 1;
1095 }
1096
1097 ans=CmdFSKdemodHID("");
1098 if (ans>0) {
1099 PrintAndLog("\nValid HID Prox ID Found!");
1100 return 1;
1101 }
1102
1103 ans=CmdAskEM410xDemod("");
1104 if (ans>0) {
1105 PrintAndLog("\nValid EM410x ID Found!");
1106 return 1;
1107 }
1108
1109 ans=CmdG_Prox_II_Demod("");
1110 if (ans>0) {
1111 PrintAndLog("\nValid Guardall G-Prox II ID Found!");
1112 return 1;
1113 }
1114
1115 ans=CmdFDXBdemodBI("");
1116 if (ans>0) {
1117 PrintAndLog("\nValid FDX-B ID Found!");
1118 return 1;
1119 }
1120
1121 ans=EM4x50Read("", false);
1122 if (ans>0) {
1123 PrintAndLog("\nValid EM4x50 ID Found!");
1124 return 1;
1125 }
1126
1127 ans=CmdVikingDemod("");
1128 if (ans>0) {
1129 PrintAndLog("\nValid Viking ID Found!");
1130 return 1;
1131 }
1132
1133 ans=CmdIndalaDecode("");
1134 if (ans>0) {
1135 PrintAndLog("\nValid Indala ID Found!");
1136 return 1;
1137 }
1138
1139 ans=CmdPSKNexWatch("");
1140 if (ans>0) {
1141 PrintAndLog("\nValid NexWatch ID Found!");
1142 return 1;
1143 }
1144 // TIdemod?
1145
1146
1147 PrintAndLog("\nNo Known Tags Found!\n");
1148 if (testRaw=='u' || testRaw=='U'){
1149 //test unknown tag formats (raw mode)
1150 PrintAndLog("\nChecking for Unknown tags:\n");
1151 ans=AutoCorrelate(4000, FALSE, FALSE);
1152
1153 if (ans > 0) {
1154
1155 PrintAndLog("Possible Auto Correlation of %d repeating samples",ans);
1156
1157 if ( ans % 8 == 0) {
1158 int bytes = (ans / 8);
1159 PrintAndLog("Possible %d bytes", bytes);
1160 int blocks = 0;
1161 if ( bytes % 2 == 0) {
1162 blocks = (bytes / 2);
1163 PrintAndLog("Possible 2 blocks, width %d", blocks);
1164 }
1165 if ( bytes % 4 == 0) {
1166 blocks = (bytes / 4);
1167 PrintAndLog("Possible 4 blocks, width %d", blocks);
1168 }
1169 if ( bytes % 8 == 0) {
1170 blocks = (bytes / 8);
1171 PrintAndLog("Possible 8 blocks, width %d", blocks);
1172 }
1173 if ( bytes % 16 == 0) {
1174 blocks = (bytes / 16);
1175 PrintAndLog("Possible 16 blocks, width %d", blocks);
1176 }
1177 }
1178 }
1179
1180 ans=GetFskClock("",FALSE,FALSE);
1181 if (ans != 0){ //fsk
1182 ans=FSKrawDemod("",TRUE);
1183 if (ans>0) {
1184 PrintAndLog("\nUnknown FSK Modulated Tag Found!");
1185 return 1;
1186 }
1187 }
1188
1189 ans=ASKDemod("0 0 0",TRUE,FALSE,1);
1190 if (ans>0) {
1191 PrintAndLog("\nUnknown ASK Modulated and Manchester encoded Tag Found!");
1192 PrintAndLog("\nif it does not look right it could instead be ASK/Biphase - try 'data rawdemod ab'");
1193 return 1;
1194 }
1195
1196 ans=CmdPSK1rawDemod("");
1197 if (ans>0) {
1198 PrintAndLog("Possible unknown PSK1 Modulated Tag Found above!\n\nCould also be PSK2 - try 'data rawdemod p2'");
1199 PrintAndLog("\nCould also be PSK3 - [currently not supported]");
1200 PrintAndLog("\nCould also be NRZ - try 'data nrzrawdemod");
1201 return 1;
1202 }
1203 PrintAndLog("\nNo Data Found!\n");
1204 }
1205 return 0;
1206 }
1207
1208 static command_t CommandTable[] =
1209 {
1210 {"help", CmdHelp, 1, "This help"},
1211 {"awid", CmdLFAWID, 1, "{ AWID RFIDs... }"},
1212 {"em4x", CmdLFEM4X, 1, "{ EM4X RFIDs... }"},
1213 {"hid", CmdLFHID, 1, "{ HID RFIDs... }"},
1214 {"hitag", CmdLFHitag, 1, "{ HITAG RFIDs... }"},
1215 {"io", CmdLFIO, 1, "{ IOPROX RFIDs... }"},
1216 {"pcf7931", CmdLFPCF7931, 1, "{ PCF7931 RFIDs... }"},
1217 {"ti", CmdLFTI, 1, "{ TI RFIDs... }"},
1218 {"t55xx", CmdLFT55XX, 1, "{ T55X7 RFIDs... }"},
1219 {"viking", CmdLFViking, 1, "{ Viking RFIDs... }"},
1220 {"config", CmdLFSetConfig, 0, "Set config for LF sampling, bit/sample, decimation, frequency"},
1221
1222 {"cmdread", CmdLFCommandRead, 0, "<off period> <'0' period> <'1' period> <command> ['h' 134] \n\t\t-- Modulate LF reader field to send command before read (all periods in microseconds)"},
1223 {"flexdemod", CmdFlexdemod, 1, "Demodulate samples for FlexPass"},
1224 {"indalademod", CmdIndalaDemod, 1, "['224'] -- Demodulate samples for Indala 64 bit UID (option '224' for 224 bit)"},
1225 {"indalaclone", CmdIndalaClone, 0, "<UID> ['l']-- Clone Indala to T55x7 (tag must be in antenna)(UID in HEX)(option 'l' for 224 UID"},
1226 {"read", CmdLFRead, 0, "['s' silent] Read 125/134 kHz LF ID-only tag. Do 'lf read h' for help"},
1227 {"search", CmdLFfind, 1, "[offline] ['u'] Read and Search for valid known tag (in offline mode it you can load first then search) \n\t\t-- 'u' to search for unknown tags"},
1228 {"sim", CmdLFSim, 0, "[GAP] -- Simulate LF tag from buffer with optional GAP (in microseconds)"},
1229 {"simask", CmdLFaskSim, 0, "[clock] [invert <1|0>] [biphase/manchester/raw <'b'|'m'|'r'>] [msg separator 's'] [d <hexdata>] \n\t\t-- Simulate LF ASK tag from demodbuffer or input"},
1230 {"simfsk", CmdLFfskSim, 0, "[c <clock>] [i] [H <fcHigh>] [L <fcLow>] [d <hexdata>] \n\t\t-- Simulate LF FSK tag from demodbuffer or input"},
1231 {"simpsk", CmdLFpskSim, 0, "[1|2|3] [c <clock>] [i] [r <carrier>] [d <raw hex to sim>] \n\t\t-- Simulate LF PSK tag from demodbuffer or input"},
1232 {"simbidir", CmdLFSimBidir, 0, "Simulate LF tag (with bidirectional data transmission between reader and tag)"},
1233 {"snoop", CmdLFSnoop, 0, "Snoop LF"},
1234 {"vchdemod", CmdVchDemod, 1, "['clone'] -- Demodulate samples for VeriChip"},
1235 {NULL, NULL, 0, NULL}
1236 };
1237
1238 int CmdLF(const char *Cmd)
1239 {
1240 CmdsParse(CommandTable, Cmd);
1241 return 0;
1242 }
1243
1244 int CmdHelp(const char *Cmd)
1245 {
1246 CmdsHelp(CommandTable);
1247 return 0;
1248 }
Impressum, Datenschutz