]> cvs.zerfleddert.de Git - proxmark3-svn/blob - client/cmdlf.c
Merge pull request #1 from bforbort/master
[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 "cmdlf.h"
23 #include "cmdlfawid26.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
32 static int CmdHelp(const char *Cmd);
33
34 /* send a command before reading */
35 int CmdLFCommandRead(const char *Cmd)
36 {
37 static char dummy[3];
38
39 dummy[0]= ' ';
40
41 UsbCommand c = {CMD_MOD_THEN_ACQUIRE_RAW_ADC_SAMPLES_125K};
42 sscanf(Cmd, "%"lli" %"lli" %"lli" %s %s", &c.arg[0], &c.arg[1], &c.arg[2],(char*)(&c.d.asBytes),(char*)(&dummy+1));
43 // in case they specified 'h'
44 strcpy((char *)&c.d.asBytes + strlen((char *)c.d.asBytes), dummy);
45 SendCommand(&c);
46 return 0;
47 }
48
49 int CmdFlexdemod(const char *Cmd)
50 {
51 int i;
52 for (i = 0; i < GraphTraceLen; ++i) {
53 if (GraphBuffer[i] < 0) {
54 GraphBuffer[i] = -1;
55 } else {
56 GraphBuffer[i] = 1;
57 }
58 }
59
60 #define LONG_WAIT 100
61 int start;
62 for (start = 0; start < GraphTraceLen - LONG_WAIT; start++) {
63 int first = GraphBuffer[start];
64 for (i = start; i < start + LONG_WAIT; i++) {
65 if (GraphBuffer[i] != first) {
66 break;
67 }
68 }
69 if (i == (start + LONG_WAIT)) {
70 break;
71 }
72 }
73 if (start == GraphTraceLen - LONG_WAIT) {
74 PrintAndLog("nothing to wait for");
75 return 0;
76 }
77
78 GraphBuffer[start] = 2;
79 GraphBuffer[start+1] = -2;
80
81 uint8_t bits[64];
82
83 int bit;
84 i = start;
85 for (bit = 0; bit < 64; bit++) {
86 int j;
87 int sum = 0;
88 for (j = 0; j < 16; j++) {
89 sum += GraphBuffer[i++];
90 }
91 if (sum > 0) {
92 bits[bit] = 1;
93 } else {
94 bits[bit] = 0;
95 }
96 PrintAndLog("bit %d sum %d", bit, sum);
97 }
98
99 for (bit = 0; bit < 64; bit++) {
100 int j;
101 int sum = 0;
102 for (j = 0; j < 16; j++) {
103 sum += GraphBuffer[i++];
104 }
105 if (sum > 0 && bits[bit] != 1) {
106 PrintAndLog("oops1 at %d", bit);
107 }
108 if (sum < 0 && bits[bit] != 0) {
109 PrintAndLog("oops2 at %d", bit);
110 }
111 }
112
113 GraphTraceLen = 32*64;
114 i = 0;
115 int phase = 0;
116 for (bit = 0; bit < 64; bit++) {
117 if (bits[bit] == 0) {
118 phase = 0;
119 } else {
120 phase = 1;
121 }
122 int j;
123 for (j = 0; j < 32; j++) {
124 GraphBuffer[i++] = phase;
125 phase = !phase;
126 }
127 }
128
129 RepaintGraphWindow();
130 return 0;
131 }
132
133 int CmdIndalaDemod(const char *Cmd)
134 {
135 // Usage: recover 64bit UID by default, specify "224" as arg to recover a 224bit UID
136
137 int state = -1;
138 int count = 0;
139 int i, j;
140 // worst case with GraphTraceLen=64000 is < 4096
141 // under normal conditions it's < 2048
142 uint8_t rawbits[4096];
143 int rawbit = 0;
144 int worst = 0, worstPos = 0;
145 PrintAndLog("Expecting a bit less than %d raw bits", GraphTraceLen / 32);
146 for (i = 0; i < GraphTraceLen-1; i += 2) {
147 count += 1;
148 if ((GraphBuffer[i] > GraphBuffer[i + 1]) && (state != 1)) {
149 if (state == 0) {
150 for (j = 0; j < count - 8; j += 16) {
151 rawbits[rawbit++] = 0;
152 }
153 if ((abs(count - j)) > worst) {
154 worst = abs(count - j);
155 worstPos = i;
156 }
157 }
158 state = 1;
159 count = 0;
160 } else if ((GraphBuffer[i] < GraphBuffer[i + 1]) && (state != 0)) {
161 if (state == 1) {
162 for (j = 0; j < count - 8; j += 16) {
163 rawbits[rawbit++] = 1;
164 }
165 if ((abs(count - j)) > worst) {
166 worst = abs(count - j);
167 worstPos = i;
168 }
169 }
170 state = 0;
171 count = 0;
172 }
173 }
174 if (rawbit>0){
175 PrintAndLog("Recovered %d raw bits, expected: %d", rawbit, GraphTraceLen/32);
176 PrintAndLog("worst metric (0=best..7=worst): %d at pos %d", worst, worstPos);
177 } else return 0;
178 // Finding the start of a UID
179 int uidlen, long_wait;
180 if (strcmp(Cmd, "224") == 0) {
181 uidlen = 224;
182 long_wait = 30;
183 } else {
184 uidlen = 64;
185 long_wait = 29;
186 }
187 int start;
188 int first = 0;
189 for (start = 0; start <= rawbit - uidlen; start++) {
190 first = rawbits[start];
191 for (i = start; i < start + long_wait; i++) {
192 if (rawbits[i] != first) {
193 break;
194 }
195 }
196 if (i == (start + long_wait)) {
197 break;
198 }
199 }
200 if (start == rawbit - uidlen + 1) {
201 PrintAndLog("nothing to wait for");
202 return 0;
203 }
204
205 // Inverting signal if needed
206 if (first == 1) {
207 for (i = start; i < rawbit; i++) {
208 rawbits[i] = !rawbits[i];
209 }
210 }
211
212 // Dumping UID
213 uint8_t bits[224];
214 char showbits[225];
215 showbits[uidlen]='\0';
216 int bit;
217 i = start;
218 int times = 0;
219 if (uidlen > rawbit) {
220 PrintAndLog("Warning: not enough raw bits to get a full UID");
221 for (bit = 0; bit < rawbit; bit++) {
222 bits[bit] = rawbits[i++];
223 // As we cannot know the parity, let's use "." and "/"
224 showbits[bit] = '.' + bits[bit];
225 }
226 showbits[bit+1]='\0';
227 PrintAndLog("Partial UID=%s", showbits);
228 return 0;
229 } else {
230 for (bit = 0; bit < uidlen; bit++) {
231 bits[bit] = rawbits[i++];
232 showbits[bit] = '0' + bits[bit];
233 }
234 times = 1;
235 }
236
237 //convert UID to HEX
238 uint32_t uid1, uid2, uid3, uid4, uid5, uid6, uid7;
239 int idx;
240 uid1=0;
241 uid2=0;
242 if (uidlen==64){
243 for( idx=0; idx<64; idx++) {
244 if (showbits[idx] == '0') {
245 uid1=(uid1<<1)|(uid2>>31);
246 uid2=(uid2<<1)|0;
247 } else {
248 uid1=(uid1<<1)|(uid2>>31);
249 uid2=(uid2<<1)|1;
250 }
251 }
252 PrintAndLog("UID=%s (%x%08x)", showbits, uid1, uid2);
253 }
254 else {
255 uid3=0;
256 uid4=0;
257 uid5=0;
258 uid6=0;
259 uid7=0;
260 for( idx=0; idx<224; idx++) {
261 uid1=(uid1<<1)|(uid2>>31);
262 uid2=(uid2<<1)|(uid3>>31);
263 uid3=(uid3<<1)|(uid4>>31);
264 uid4=(uid4<<1)|(uid5>>31);
265 uid5=(uid5<<1)|(uid6>>31);
266 uid6=(uid6<<1)|(uid7>>31);
267 if (showbits[idx] == '0') uid7=(uid7<<1)|0;
268 else uid7=(uid7<<1)|1;
269 }
270 PrintAndLog("UID=%s (%x%08x%08x%08x%08x%08x%08x)", showbits, uid1, uid2, uid3, uid4, uid5, uid6, uid7);
271 }
272
273 // Checking UID against next occurrences
274 for (; i + uidlen <= rawbit;) {
275 int failed = 0;
276 for (bit = 0; bit < uidlen; bit++) {
277 if (bits[bit] != rawbits[i++]) {
278 failed = 1;
279 break;
280 }
281 }
282 if (failed == 1) {
283 break;
284 }
285 times += 1;
286 }
287 PrintAndLog("Occurrences: %d (expected %d)", times, (rawbit - start) / uidlen);
288
289 // Remodulating for tag cloning
290 GraphTraceLen = 32*uidlen;
291 i = 0;
292 int phase = 0;
293 for (bit = 0; bit < uidlen; bit++) {
294 if (bits[bit] == 0) {
295 phase = 0;
296 } else {
297 phase = 1;
298 }
299 int j;
300 for (j = 0; j < 32; j++) {
301 GraphBuffer[i++] = phase;
302 phase = !phase;
303 }
304 }
305
306 RepaintGraphWindow();
307 return 1;
308 }
309
310 int CmdIndalaClone(const char *Cmd)
311 {
312 unsigned int uid1, uid2, uid3, uid4, uid5, uid6, uid7;
313 UsbCommand c;
314 uid1=0;
315 uid2=0;
316 uid3=0;
317 uid4=0;
318 uid5=0;
319 uid6=0;
320 uid7=0;
321 int n = 0, i = 0;
322
323 if (strchr(Cmd,'l') != 0) {
324 while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
325 uid1 = (uid1 << 4) | (uid2 >> 28);
326 uid2 = (uid2 << 4) | (uid3 >> 28);
327 uid3 = (uid3 << 4) | (uid4 >> 28);
328 uid4 = (uid4 << 4) | (uid5 >> 28);
329 uid5 = (uid5 << 4) | (uid6 >> 28);
330 uid6 = (uid6 << 4) | (uid7 >> 28);
331 uid7 = (uid7 << 4) | (n & 0xf);
332 }
333 PrintAndLog("Cloning 224bit tag with UID %x%08x%08x%08x%08x%08x%08x", uid1, uid2, uid3, uid4, uid5, uid6, uid7);
334 c.cmd = CMD_INDALA_CLONE_TAG_L;
335 c.d.asDwords[0] = uid1;
336 c.d.asDwords[1] = uid2;
337 c.d.asDwords[2] = uid3;
338 c.d.asDwords[3] = uid4;
339 c.d.asDwords[4] = uid5;
340 c.d.asDwords[5] = uid6;
341 c.d.asDwords[6] = uid7;
342 }
343 else
344 {
345 while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
346 uid1 = (uid1 << 4) | (uid2 >> 28);
347 uid2 = (uid2 << 4) | (n & 0xf);
348 }
349 PrintAndLog("Cloning 64bit tag with UID %x%08x", uid1, uid2);
350 c.cmd = CMD_INDALA_CLONE_TAG;
351 c.arg[0] = uid1;
352 c.arg[1] = uid2;
353 }
354
355 SendCommand(&c);
356 return 0;
357 }
358
359 int CmdLFRead(const char *Cmd)
360 {
361 UsbCommand c = {CMD_ACQUIRE_RAW_ADC_SAMPLES_125K};
362 // 'h' means higher-low-frequency, 134 kHz
363 if(*Cmd == 'h') {
364 c.arg[0] = 1;
365 } else if (*Cmd == '\0') {
366 c.arg[0] = 0;
367 } else if (sscanf(Cmd, "%"lli, &c.arg[0]) != 1) {
368 PrintAndLog("Samples 1: 'lf read'");
369 PrintAndLog(" 2: 'lf read h'");
370 PrintAndLog(" 3: 'lf read <divisor>'");
371 return 0;
372 }
373 SendCommand(&c);
374 WaitForResponse(CMD_ACK,NULL);
375
376 // load samples
377 CmdSamples("");
378 return 0;
379 }
380
381 static void ChkBitstream(const char *str)
382 {
383 int i;
384
385 /* convert to bitstream if necessary */
386 for (i = 0; i < (int)(GraphTraceLen / 2); i++)
387 {
388 if (GraphBuffer[i] > 1 || GraphBuffer[i] < 0)
389 {
390 CmdBitstream(str);
391 break;
392 }
393 }
394 }
395
396 int CmdLFSim(const char *Cmd)
397 {
398 int i,j;
399
400 static int gap;
401
402 sscanf(Cmd, "%i", &gap);
403
404 /* convert to bitstream if necessary */
405 ChkBitstream(Cmd);
406
407 printf("Sending [%d bytes]", GraphTraceLen);
408 for (i = 0; i < GraphTraceLen; i += USB_CMD_DATA_SIZE) {
409 UsbCommand c={CMD_DOWNLOADED_SIM_SAMPLES_125K, {i, 0, 0}};
410
411 for (j = 0; j < USB_CMD_DATA_SIZE; j++) {
412 c.d.asBytes[j] = GraphBuffer[i+j];
413 }
414 SendCommand(&c);
415 WaitForResponse(CMD_ACK,NULL);
416 printf(".");
417 }
418 printf("\n");
419 PrintAndLog("Starting to simulate");
420 UsbCommand c = {CMD_SIMULATE_TAG_125K, {GraphTraceLen, gap, 0}};
421 SendCommand(&c);
422 return 0;
423 }
424
425 int CmdLFSimBidir(const char *Cmd)
426 {
427 /* Set ADC to twice the carrier for a slight supersampling */
428 UsbCommand c = {CMD_LF_SIMULATE_BIDIR, {47, 384, 0}};
429 SendCommand(&c);
430 return 0;
431 }
432
433 /* simulate an LF Manchester encoded tag with specified bitstream, clock rate and inter-id gap */
434 int CmdLFSimManchester(const char *Cmd)
435 {
436 static int clock, gap;
437 static char data[1024], gapstring[8];
438
439 /* get settings/bits */
440 sscanf(Cmd, "%i %s %i", &clock, &data[0], &gap);
441
442 /* clear our graph */
443 ClearGraph(0);
444
445 /* fill it with our bitstream */
446 for (int i = 0; i < strlen(data) ; ++i)
447 AppendGraph(0, clock, data[i]- '0');
448
449 /* modulate */
450 CmdManchesterMod("");
451
452 /* show what we've done */
453 RepaintGraphWindow();
454
455 /* simulate */
456 sprintf(&gapstring[0], "%i", gap);
457 CmdLFSim(gapstring);
458 return 0;
459 }
460
461 int CmdLFSnoop(const char *Cmd)
462 {
463 UsbCommand c = {CMD_LF_SNOOP_RAW_ADC_SAMPLES};
464 // 'h' means higher-low-frequency, 134 kHz
465 c.arg[0] = 0;
466 c.arg[1] = -1;
467 if (*Cmd == 0) {
468 // empty
469 } else if (*Cmd == 'l') {
470 sscanf(Cmd, "l %"lli, &c.arg[1]);
471 } else if(*Cmd == 'h') {
472 c.arg[0] = 1;
473 sscanf(Cmd, "h %"lli, &c.arg[1]);
474 } else if (sscanf(Cmd, "%"lli" %"lli, &c.arg[0], &c.arg[1]) < 1) {
475 PrintAndLog("use 'snoop' or 'snoop {l,h} [trigger threshold]', or 'snoop <divisor> [trigger threshold]'");
476 return 0;
477 }
478 SendCommand(&c);
479 WaitForResponse(CMD_ACK,NULL);
480
481 size_t BUFF_SIZE = 8000;
482 uint8_t data[BUFF_SIZE];
483
484 GetFromBigBuf(data,BUFF_SIZE,3560); //3560 -- should be offset..
485 WaitForResponseTimeout(CMD_ACK,NULL, 1500);
486
487 for (int j = 0; j < BUFF_SIZE; j++) {
488 GraphBuffer[j] = ((int)data[j]);
489 }
490 GraphTraceLen = BUFF_SIZE;
491
492 return 0;
493 }
494
495 int CmdVchDemod(const char *Cmd)
496 {
497 // Is this the entire sync pattern, or does this also include some
498 // data bits that happen to be the same everywhere? That would be
499 // lovely to know.
500 static const int SyncPattern[] = {
501 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
502 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
503 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
504 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
505 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
506 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
507 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
508 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
509 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
510 1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
511 };
512
513 // So first, we correlate for the sync pattern, and mark that.
514 int bestCorrel = 0, bestPos = 0;
515 int i;
516 // It does us no good to find the sync pattern, with fewer than
517 // 2048 samples after it...
518 for (i = 0; i < (GraphTraceLen-2048); i++) {
519 int sum = 0;
520 int j;
521 for (j = 0; j < arraylen(SyncPattern); j++) {
522 sum += GraphBuffer[i+j]*SyncPattern[j];
523 }
524 if (sum > bestCorrel) {
525 bestCorrel = sum;
526 bestPos = i;
527 }
528 }
529 PrintAndLog("best sync at %d [metric %d]", bestPos, bestCorrel);
530
531 char bits[257];
532 bits[256] = '\0';
533
534 int worst = INT_MAX;
535 int worstPos = 0;
536
537 for (i = 0; i < 2048; i += 8) {
538 int sum = 0;
539 int j;
540 for (j = 0; j < 8; j++) {
541 sum += GraphBuffer[bestPos+i+j];
542 }
543 if (sum < 0) {
544 bits[i/8] = '.';
545 } else {
546 bits[i/8] = '1';
547 }
548 if(abs(sum) < worst) {
549 worst = abs(sum);
550 worstPos = i;
551 }
552 }
553 PrintAndLog("bits:");
554 PrintAndLog("%s", bits);
555 PrintAndLog("worst metric: %d at pos %d", worst, worstPos);
556
557 if (strcmp(Cmd, "clone")==0) {
558 GraphTraceLen = 0;
559 char *s;
560 for(s = bits; *s; s++) {
561 int j;
562 for(j = 0; j < 16; j++) {
563 GraphBuffer[GraphTraceLen++] = (*s == '1') ? 1 : 0;
564 }
565 }
566 RepaintGraphWindow();
567 }
568 return 0;
569 }
570
571 //by marshmellow
572 int CmdLFfind(const char *Cmd)
573 {
574 int ans = 0;
575 char cmdp = param_getchar(Cmd, 0);
576
577 if (strlen(Cmd) > 1 || cmdp == 'h' || cmdp == 'H') {
578 PrintAndLog("Usage: lf search [use data from Graphbuffer]");
579 PrintAndLog(" [use data from Graphbuffer], if not set, try reading data from tag.");
580 PrintAndLog("");
581 PrintAndLog(" sample: lf search");
582 PrintAndLog(" : lf search 1");
583 return 0;
584 }
585
586 if (!offline || (cmdp != '1') ){
587 ans = CmdLFRead("");
588 } else if (GraphTraceLen<1000) {
589 PrintAndLog("Data in Graphbuffer was too small.");
590 return 0;
591 }
592
593 PrintAndLog("Checking for known tags:");
594
595 ans=Cmdaskmandemod("");
596 PrintAndLog("ASK_MAN: %s", (ans)?"YES":"NO" );
597
598 ans=CmdFSKdemodHID("");
599 PrintAndLog("HID: %s", (ans)?"YES":"NO" );
600
601 ans=CmdFSKdemodIO("");
602 PrintAndLog("IO prox: %s", (ans)?"YES":"NO" );
603
604 ans=CmdIndalaDemod("");
605 PrintAndLog("Indala (64): %s", (ans)?"YES":"NO" );
606
607 ans=CmdIndalaDemod("224");
608 PrintAndLog("Indala (224): %s", (ans)?"YES":"NO" );
609
610 if (!ans)
611 PrintAndLog("No Known Tags Found!\n");
612
613 return 0;
614 }
615
616 static command_t CommandTable[] =
617 {
618 {"help", CmdHelp, 1, "This help"},
619 {"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)"},
620
621 {"flexdemod", CmdFlexdemod, 1, "Demodulate samples for FlexPass"},
622 {"indalademod", CmdIndalaDemod, 1, "['224'] -- Demodulate samples for Indala 64 bit UID (option '224' for 224 bit)"},
623 {"indalaclone", CmdIndalaClone, 0, "<UID> ['l']-- Clone Indala to T55x7 (UID in HEX)(option 'l' for 224 UID"},
624 {"vchdemod", CmdVchDemod, 1, "['clone'] -- Demodulate samples for VeriChip"},
625
626
627 {"read", CmdLFRead, 0, "['h' or <divisor>] -- Read 125/134 kHz LF ID-only tag (option 'h' for 134, alternatively: f=12MHz/(divisor+1))"},
628 {"search", CmdLFfind, 1, "Read and Search for valid known tag (in offline mode it you can load first then search)"},
629 {"sim", CmdLFSim, 0, "[GAP] -- Simulate LF tag from buffer with optional GAP (in microseconds)"},
630 {"simbidir", CmdLFSimBidir, 0, "Simulate LF tag (with bidirectional data transmission between reader and tag)"},
631 {"simman", CmdLFSimManchester, 0, "<Clock> <Bitstream> [GAP] Simulate arbitrary Manchester LF tag"},
632 {"snoop", CmdLFSnoop, 0, "['l'|'h'|<divisor>] [trigger threshold]-- Snoop LF (l:125khz, h:134khz)"},
633
634 {"awid26", CmdLFAWID26, 1, "{ AWID26 tags }"},
635 {"em4x", CmdLFEM4X, 1, "{ EM4X tags }"},
636 {"hid", CmdLFHID, 1, "{ HID tags }"},
637 {"hitag", CmdLFHitag, 1, "{ Hitag tags and transponders }"},
638 {"io", CmdLFIO, 1, "{ ioProx tags }"},
639 {"pcf7931", CmdLFPCF7931, 1, "{ PCF7931 tags }"},
640 {"ti", CmdLFTI, 1, "{ TI tags }"},
641 {"t55xx", CmdLFT55XX, 1, "{ T55xx tags }"},
642
643 {NULL, NULL, 0, NULL}
644 };
645
646 int CmdLF(const char *Cmd)
647 {
648 CmdsParse(CommandTable, Cmd);
649 return 0;
650 }
651
652 int CmdHelp(const char *Cmd)
653 {
654 CmdsHelp(CommandTable);
655 return 0;
656 }
Impressum, Datenschutz