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