git.zerfleddert.de Git - proxmark3-svn/blob - 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 }