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
  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         uint8_t bits[64] = {0x00};
  81
  82         int bit, sum;
  83   i = start;
  84   for (bit = 0; bit < 64; bit++) {
  85                 sum = 0;
  86                 for (int j = 0; j < 16; j++) {
  87       sum += GraphBuffer[i++];
  88     }
  89
  90                 bits[bit] = (sum > 0) ? 1 : 0;
  91
  92     PrintAndLog("bit %d sum %d", bit, sum);
  93   }
  94
  95   for (bit = 0; bit < 64; bit++) {
  96     int j;
  97     int sum = 0;
  98     for (j = 0; j < 16; j++) {
  99       sum += GraphBuffer[i++];
 100     }
 101     if (sum > 0 && bits[bit] != 1) {
 102       PrintAndLog("oops1 at %d", bit);
 103     }
 104     if (sum < 0 && bits[bit] != 0) {
 105       PrintAndLog("oops2 at %d", bit);
 106     }
 107   }
 108
 109         // HACK writing back to graphbuffer.
 110   GraphTraceLen = 32*64;
 111   i = 0;
 112   int phase = 0;
 113   for (bit = 0; bit < 64; bit++) {
 114
 115                 phase = (bits[bit] == 0) ? 0 : 1;
 116
 117     int j;
 118     for (j = 0; j < 32; j++) {
 119       GraphBuffer[i++] = phase;
 120       phase = !phase;
 121     }
 122   }
 123
 124   RepaintGraphWindow();
 125   return 0;
 126 }
 127
 128 int CmdIndalaDemod(const char *Cmd)
 129 {
 130   // Usage: recover 64bit UID by default, specify "224" as arg to recover a 224bit UID
 131
 132   int state = -1;
 133   int count = 0;
 134   int i, j;
 135
 136   // worst case with GraphTraceLen=64000 is < 4096
 137   // under normal conditions it's < 2048
 138
 139   uint8_t rawbits[4096];
 140   int rawbit = 0;
 141   int worst = 0, worstPos = 0;
 142  // PrintAndLog("Expecting a bit less than %d raw bits", GraphTraceLen / 32);
 143   for (i = 0; i < GraphTraceLen-1; i += 2) {
 144     count += 1;
 145     if ((GraphBuffer[i] > GraphBuffer[i + 1]) && (state != 1)) {
 146       if (state == 0) {
 147         for (j = 0; j <  count - 8; j += 16) {
 148           rawbits[rawbit++] = 0;
 149         }
 150         if ((abs(count - j)) > worst) {
 151           worst = abs(count - j);
 152           worstPos = i;
 153         }
 154       }
 155       state = 1;
 156       count = 0;
 157     } else if ((GraphBuffer[i] < GraphBuffer[i + 1]) && (state != 0)) {
 158       if (state == 1) {
 159         for (j = 0; j <  count - 8; j += 16) {
 160           rawbits[rawbit++] = 1;
 161         }
 162         if ((abs(count - j)) > worst) {
 163           worst = abs(count - j);
 164           worstPos = i;
 165         }
 166       }
 167       state = 0;
 168       count = 0;
 169     }
 170   }
 171
 172   if (rawbit>0){
 173     PrintAndLog("Recovered %d raw bits, expected: %d", rawbit, GraphTraceLen/32);
 174     PrintAndLog("worst metric (0=best..7=worst): %d at pos %d", worst, worstPos);
 175         } else {
 176                 return 0;
 177         }
 178
 179   // Finding the start of a UID
 180   int uidlen, long_wait;
 181   if (strcmp(Cmd, "224") == 0) {
 182     uidlen = 224;
 183     long_wait = 30;
 184   } else {
 185     uidlen = 64;
 186     long_wait = 29;
 187   }
 188
 189   int start;
 190   int first = 0;
 191   for (start = 0; start <= rawbit - uidlen; start++) {
 192     first = rawbits[start];
 193     for (i = start; i < start + long_wait; i++) {
 194       if (rawbits[i] != first) {
 195         break;
 196       }
 197     }
 198     if (i == (start + long_wait)) {
 199       break;
 200     }
 201   }
 202
 203   if (start == rawbit - uidlen + 1) {
 204     PrintAndLog("nothing to wait for");
 205     return 0;
 206   }
 207
 208   // Inverting signal if needed
 209   if (first == 1) {
 210     for (i = start; i < rawbit; i++) {
 211       rawbits[i] = !rawbits[i];
 212     }
 213   }
 214
 215   // Dumping UID
 216         uint8_t bits[224] = {0x00};
 217         char showbits[225] = {0x00};
 218   int bit;
 219   i = start;
 220   int times = 0;
 221
 222   if (uidlen > rawbit) {
 223     PrintAndLog("Warning: not enough raw bits to get a full UID");
 224     for (bit = 0; bit < rawbit; bit++) {
 225       bits[bit] = rawbits[i++];
 226       // As we cannot know the parity, let's use "." and "/"
 227       showbits[bit] = '.' + bits[bit];
 228     }
 229     showbits[bit+1]='\0';
 230     PrintAndLog("Partial UID=%s", showbits);
 231     return 0;
 232   } else {
 233     for (bit = 0; bit < uidlen; bit++) {
 234       bits[bit] = rawbits[i++];
 235       showbits[bit] = '0' + bits[bit];
 236     }
 237     times = 1;
 238   }
 239
 240   //convert UID to HEX
 241   uint32_t uid1, uid2, uid3, uid4, uid5, uid6, uid7;
 242   int idx;
 243         uid1 = uid2 = 0;
 244
 245   if (uidlen==64){
 246     for( idx=0; idx<64; idx++) {
 247         if (showbits[idx] == '0') {
 248         uid1=(uid1<<1)|(uid2>>31);
 249         uid2=(uid2<<1)|0;
 250         } else {
 251         uid1=(uid1<<1)|(uid2>>31);
 252         uid2=(uid2<<1)|1;
 253         }
 254       }
 255     PrintAndLog("UID=%s (%x%08x)", showbits, uid1, uid2);
 256   }
 257   else {
 258                 uid3 = uid4 = uid5 = uid6 = uid7 = 0;
 259
 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
 268                         if (showbits[idx] == '0')
 269                                 uid7 = (uid7<<1) | 0;
 270                         else
 271                                 uid7 = (uid7<<1) | 1;
 272       }
 273     PrintAndLog("UID=%s (%x%08x%08x%08x%08x%08x%08x)", showbits, uid1, uid2, uid3, uid4, uid5, uid6, uid7);
 274   }
 275
 276   // Checking UID against next occurrences
 277     int failed = 0;
 278         for (; i + uidlen <= rawbit;) {
 279                 failed = 0;
 280     for (bit = 0; bit < uidlen; bit++) {
 281       if (bits[bit] != rawbits[i++]) {
 282         failed = 1;
 283         break;
 284       }
 285     }
 286     if (failed == 1) {
 287       break;
 288     }
 289     times += 1;
 290   }
 291
 292   PrintAndLog("Occurrences: %d (expected %d)", times, (rawbit - start) / uidlen);
 293
 294   // Remodulating for tag cloning
 295         // HACK: 2015-01-04 this will have an impact on our new way of seening lf commands (demod)
 296         // since this changes graphbuffer data.
 297   GraphTraceLen = 32*uidlen;
 298   i = 0;
 299   int phase = 0;
 300   for (bit = 0; bit < uidlen; bit++) {
 301     if (bits[bit] == 0) {
 302       phase = 0;
 303     } else {
 304       phase = 1;
 305     }
 306     int j;
 307     for (j = 0; j < 32; j++) {
 308       GraphBuffer[i++] = phase;
 309       phase = !phase;
 310     }
 311   }
 312
 313   RepaintGraphWindow();
 314   return 1;
 315 }
 316
 317 int CmdIndalaClone(const char *Cmd)
 318 {
 319   UsbCommand c;
 320         unsigned int uid1, uid2, uid3, uid4, uid5, uid6, uid7;
 321
 322         uid1 =  uid2 = uid3 = uid4 = uid5 = uid6 = uid7 = 0;
 323   int n = 0, i = 0;
 324
 325   if (strchr(Cmd,'l') != 0) {
 326     while (sscanf(&Cmd[i++], "%1x", &n ) == 1) {
 327       uid1 = (uid1 << 4) | (uid2 >> 28);
 328       uid2 = (uid2 << 4) | (uid3 >> 28);
 329       uid3 = (uid3 << 4) | (uid4 >> 28);
 330       uid4 = (uid4 << 4) | (uid5 >> 28);
 331       uid5 = (uid5 << 4) | (uid6 >> 28);
 332       uid6 = (uid6 << 4) | (uid7 >> 28);
 333         uid7 = (uid7 << 4) | (n & 0xf);
 334     }
 335     PrintAndLog("Cloning 224bit tag with UID %x%08x%08x%08x%08x%08x%08x", uid1, uid2, uid3, uid4, uid5, uid6, uid7);
 336     c.cmd = CMD_INDALA_CLONE_TAG_L;
 337     c.d.asDwords[0] = uid1;
 338     c.d.asDwords[1] = uid2;
 339     c.d.asDwords[2] = uid3;
 340     c.d.asDwords[3] = uid4;
 341     c.d.asDwords[4] = uid5;
 342     c.d.asDwords[5] = uid6;
 343     c.d.asDwords[6] = uid7;
 344         } else {
 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 usage_lf_read()
 360 {
 361         PrintAndLog("Usage: lf read");
 362         PrintAndLog("Options:        ");
 363         PrintAndLog("       h            This help");
 364         PrintAndLog("This function takes no arguments. ");
 365         PrintAndLog("Use 'lf config' to set parameters.");
 366         return 0;
 367 }
 368 int usage_lf_snoop()
 369 {
 370         PrintAndLog("Usage: lf snoop");
 371         PrintAndLog("Options:        ");
 372         PrintAndLog("       h            This help");
 373         PrintAndLog("This function takes no arguments. ");
 374         PrintAndLog("Use 'lf config' to set parameters.");
 375         return 0;
 376 }
 377
 378 int usage_lf_config()
 379 {
 380         PrintAndLog("Usage: lf config [H|<divisor>] [b <bps>] [d <decim>] [a 0|1]");
 381         PrintAndLog("Options:        ");
 382         PrintAndLog("       h             This help");
 383         PrintAndLog("       L             Low frequency (125 KHz)");
 384         PrintAndLog("       H             High frequency (134 KHz)");
 385         PrintAndLog("       q <divisor>   Manually set divisor. 88-> 134KHz, 95-> 125 Hz");
 386         PrintAndLog("       b <bps>       Sets resolution of bits per sample. Default (max): 8");
 387         PrintAndLog("       d <decim>     Sets decimation. A value of N saves only 1 in N samples. Default: 1");
 388         PrintAndLog("       a [0|1]       Averaging - if set, will average the stored sample value when decimating. Default: 1");
 389         PrintAndLog("       t <threshold> Sets trigger threshold. 0 means no threshold");
 390         PrintAndLog("Examples:");
 391         PrintAndLog("      lf config b 8 L");
 392         PrintAndLog("                    Samples at 125KHz, 8bps.");
 393         PrintAndLog("      lf config H b 4 d 3");
 394         PrintAndLog("                    Samples at 134KHz, averages three samples into one, stored with ");
 395         PrintAndLog("                    a resolution of 4 bits per sample.");
 396         PrintAndLog("      lf read");
 397         PrintAndLog("                    Performs a read (active field)");
 398         PrintAndLog("      lf snoop");
 399         PrintAndLog("                    Performs a snoop (no active field)");
 400         return 0;
 401 }
 402
 403 int CmdLFSetConfig(const char *Cmd)
 404 {
 405
 406         uint8_t divisor =  0;//Frequency divisor
 407         uint8_t bps = 0; // Bits per sample
 408         uint8_t decimation = 0; //How many to keep
 409         bool averaging = 1; // Defaults to true
 410         bool errors = FALSE;
 411         int trigger_threshold =-1;//Means no change
 412         uint8_t unsigned_trigg = 0;
 413
 414         uint8_t cmdp =0;
 415         while(param_getchar(Cmd, cmdp) != 0x00)
 416         {
 417                 switch(param_getchar(Cmd, cmdp))
 418                 {
 419                 case 'h':
 420                         return usage_lf_config();
 421                 case 'H':
 422                         divisor = 88;
 423                         cmdp++;
 424                         break;
 425                 case 'L':
 426                         divisor = 95;
 427                         cmdp++;
 428                         break;
 429                 case 'q':
 430                         errors |= param_getdec(Cmd,cmdp+1,&divisor);
 431                         cmdp+=2;
 432                         break;
 433                 case 't':
 434                         errors |= param_getdec(Cmd,cmdp+1,&unsigned_trigg);
 435                         cmdp+=2;
 436                         if(!errors) trigger_threshold = unsigned_trigg;
 437                         break;
 438                 case 'b':
 439                         errors |= param_getdec(Cmd,cmdp+1,&bps);
 440                         cmdp+=2;
 441                         break;
 442                 case 'd':
 443                         errors |= param_getdec(Cmd,cmdp+1,&decimation);
 444                         cmdp+=2;
 445                         break;
 446                 case 'a':
 447                         averaging = param_getchar(Cmd,cmdp+1) == '1';
 448                         cmdp+=2;
 449                         break;
 450                 default:
 451                         PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
 452                         errors = 1;
 453                         break;
 454                 }
 455                 if(errors) break;
 456         }
 457         if(cmdp == 0)
 458         {
 459                 errors = 1;// No args
 460         }
 461
 462         //Validations
 463         if(errors)
 464         {
 465                 return usage_lf_config();
 466         }
 467         //Bps is limited to 8, so fits in lower half of arg1
 468         if(bps >> 8) bps = 8;
 469
 470         sample_config config = {
 471                 decimation,bps,averaging,divisor,trigger_threshold
 472         };
 473         //Averaging is a flag on high-bit of arg[1]
 474         UsbCommand c = {CMD_SET_LF_SAMPLING_CONFIG};
 475         memcpy(c.d.asBytes,&config,sizeof(sample_config));
 476         SendCommand(&c);
 477         return 0;
 478 }
 479
 480 int CmdLFRead(const char *Cmd)
 481 {
 482
 483         uint8_t cmdp =0;
 484         if(param_getchar(Cmd, cmdp) == 'h')
 485         {
 486                 return usage_lf_read();
 487         }
 488         //And ship it to device
 489         UsbCommand c = {CMD_ACQUIRE_RAW_ADC_SAMPLES_125K};
 490         SendCommand(&c);
 491         WaitForResponse(CMD_ACK,NULL);
 492         return 0;
 493 }
 494
 495 int CmdLFSnoop(const char *Cmd)
 496 {
 497         uint8_t cmdp =0;
 498         if(param_getchar(Cmd, cmdp) == 'h')
 499         {
 500                 return usage_lf_snoop();
 501         }
 502
 503         UsbCommand c = {CMD_LF_SNOOP_RAW_ADC_SAMPLES};
 504         SendCommand(&c);
 505         WaitForResponse(CMD_ACK,NULL);
 506         return 0;
 507 }
 508
 509 static void ChkBitstream(const char *str)
 510 {
 511   int i;
 512
 513   /* convert to bitstream if necessary */
 514         for (i = 0; i < (int)(GraphTraceLen / 2); i++){
 515                 if (GraphBuffer[i] > 1 || GraphBuffer[i] < 0) {
 516       CmdBitstream(str);
 517       break;
 518     }
 519   }
 520 }
 521 //appears to attempt to simulate manchester
 522 int CmdLFSim(const char *Cmd)
 523 {
 524         int i,j;
 525   static int gap;
 526
 527   sscanf(Cmd, "%i", &gap);
 528
 529   /* convert to bitstream if necessary */
 530   ChkBitstream(Cmd);
 531
 532   //can send 512 bits at a time (1 byte sent per bit...)
 533         printf("Sending [%d bytes]", GraphTraceLen);
 534         for (i = 0; i < GraphTraceLen; i += USB_CMD_DATA_SIZE) {
 535     UsbCommand c={CMD_DOWNLOADED_SIM_SAMPLES_125K, {i, 0, 0}};
 536
 537                 for (j = 0; j < USB_CMD_DATA_SIZE; j++) {
 538       c.d.asBytes[j] = GraphBuffer[i+j];
 539     }
 540     SendCommand(&c);
 541     WaitForResponse(CMD_ACK,NULL);
 542                 printf(".");
 543   }
 544
 545         printf("\n");
 546         PrintAndLog("Starting to simulate");
 547   UsbCommand c = {CMD_SIMULATE_TAG_125K, {GraphTraceLen, gap, 0}};
 548   SendCommand(&c);
 549   return 0;
 550 }
 551
 552 int usage_lf_simfsk(void)
 553 {
 554   //print help
 555   PrintAndLog("Usage: lf simfsk [c <clock>] [i] [H <fcHigh>] [L <fcLow>] [d <hexdata>]");
 556   PrintAndLog("Options:        ");
 557   PrintAndLog("       h              This help");
 558   PrintAndLog("       c <clock>      Manually set clock - can autodetect if using DemodBuffer");
 559   PrintAndLog("       i              invert data");
 560   PrintAndLog("       H <fcHigh>     Manually set the larger Field Clock");
 561   PrintAndLog("       L <fcLow>      Manually set the smaller Field Clock");
 562   //PrintAndLog("       s              TBD- -to enable a gap between playback repetitions - default: no gap");
 563   PrintAndLog("       d <hexdata>    Data to sim as hex - omit to sim from DemodBuffer");
 564   return 0;
 565 }
 566
 567 int usage_lf_simask(void)
 568 {
 569   //print help
 570   PrintAndLog("Usage: lf simask [c <clock>] [i] [m|r] [s] [d <raw hex to sim>]");
 571   PrintAndLog("Options:        ");
 572   PrintAndLog("       h              This help");
 573   PrintAndLog("       c <clock>      Manually set clock - can autodetect if using DemodBuffer");
 574   PrintAndLog("       i              invert data");
 575   PrintAndLog("       m              sim ask/manchester");
 576   PrintAndLog("       r              sim ask/raw");
 577   PrintAndLog("       s              TBD- -to enable a gap between playback repetitions - default: no gap");
 578   PrintAndLog("       d <hexdata>    Data to sim as hex - omit to sim from DemodBuffer");
 579   return 0;
 580 }
 581
 582 // by marshmellow - sim ask data given clock, fcHigh, fcLow, invert
 583 // - allow pull data from DemodBuffer
 584 int CmdLFfskSim(const char *Cmd)
 585 {
 586   //todo - allow data from demodbuffer or parameters
 587   //might be able to autodetect FC and clock from Graphbuffer if using demod buffer
 588   //will need FChigh, FClow, Clock, and bitstream
 589   uint8_t fcHigh=0, fcLow=0, clk=0;
 590   uint8_t invert=0;
 591   bool errors = FALSE;
 592   char hexData[32] = {0x00}; // store entered hex data
 593   uint8_t data[255] = {0x00};
 594   int dataLen = 0;
 595   uint8_t cmdp = 0;
 596   while(param_getchar(Cmd, cmdp) != 0x00)
 597   {
 598     switch(param_getchar(Cmd, cmdp))
 599     {
 600     case 'h':
 601       return usage_lf_simfsk();
 602     case 'i':
 603       invert = 1;
 604       cmdp++;
 605       break;
 606     case 'c':
 607       errors |= param_getdec(Cmd,cmdp+1,&clk);
 608       cmdp+=2;
 609       break;
 610     case 'H':
 611       errors |= param_getdec(Cmd,cmdp+1,&fcHigh);
 612       cmdp+=2;
 613       break;
 614     case 'L':
 615       errors |= param_getdec(Cmd,cmdp+1,&fcLow);
 616       cmdp+=2;
 617       break;
 618     //case 's':
 619     //  separator=1;
 620     //  cmdp++;
 621     //  break;
 622     case 'd':
 623       dataLen = param_getstr(Cmd, cmdp+1, hexData);
 624       if (dataLen==0) {
 625         errors=TRUE;
 626       } else {
 627         dataLen = hextobinarray((char *)data, hexData);
 628       }    if (dataLen==0) errors=TRUE;
 629       if (errors) PrintAndLog ("Error getting hex data");
 630       cmdp+=2;
 631       break;
 632     default:
 633       PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
 634       errors = TRUE;
 635       break;
 636     }
 637     if(errors) break;
 638   }
 639   if(cmdp == 0 && DemodBufferLen == 0)
 640   {
 641     errors = TRUE;// No args
 642   }
 643
 644   //Validations
 645   if(errors)
 646   {
 647     return usage_lf_simfsk();
 648   }
 649   if (dataLen == 0){ //using DemodBuffer
 650     if (clk==0 || fcHigh==0 || fcLow==0){
 651       uint8_t ans = fskClocks(&fcHigh, &fcLow, &clk, 0);
 652       if (ans==0){
 653         fcHigh=10;
 654         fcLow=8;
 655         clk=50;
 656       }
 657     }
 658   } else {
 659     setDemodBuf(data, dataLen, 0);
 660   }
 661   if (clk == 0) clk = 50;
 662   if (fcHigh == 0) fcHigh = 10;
 663   if (fcLow == 0) fcLow = 8;
 664
 665   uint16_t arg1, arg2;
 666   arg1 = fcHigh << 8 | fcLow;
 667   arg2 = invert << 8 | clk;
 668   UsbCommand c = {CMD_FSK_SIM_TAG, {arg1, arg2, DemodBufferLen}};
 669   if (DemodBufferLen > USB_CMD_DATA_SIZE) {
 670     PrintAndLog("DemodBuffer too long for current implementation - length: %d - max: %d", DemodBufferLen, USB_CMD_DATA_SIZE);
 671   }
 672   memcpy(c.d.asBytes, DemodBuffer, DemodBufferLen);
 673   SendCommand(&c);
 674   return 0;
 675 }
 676
 677 // by marshmellow - sim ask data given clock, invert, manchester or raw, separator
 678 // - allow pull data from DemodBuffer
 679 int CmdLFaskSim(const char *Cmd)
 680 {
 681   //todo - allow data from demodbuffer or parameters
 682   //autodetect clock from Graphbuffer if using demod buffer
 683   //will need clock, invert, manchester/raw as m or r, separator as s, and bitstream
 684   uint8_t manchester = 1, separator = 0;
 685   //char cmdp = Cmd[0], par3='m', par4=0;
 686   uint8_t clk=0, invert=0;
 687   bool errors = FALSE;
 688   char hexData[32] = {0x00};
 689   uint8_t data[255]= {0x00}; // store entered hex data
 690   int dataLen = 0;
 691   uint8_t cmdp = 0;
 692   while(param_getchar(Cmd, cmdp) != 0x00)
 693   {
 694     switch(param_getchar(Cmd, cmdp))
 695     {
 696     case 'h':
 697       return usage_lf_simask();
 698     case 'i':
 699       invert = 1;
 700       cmdp++;
 701       break;
 702     case 'c':
 703       errors |= param_getdec(Cmd,cmdp+1,&clk);
 704       cmdp+=2;
 705       break;
 706     case 'm':
 707       manchester=1;
 708       cmdp++;
 709       break;
 710     case 'r':
 711       manchester=0;
 712       cmdp++;
 713       break;
 714     case 's':
 715       separator=1;
 716       cmdp++;
 717       break;
 718     case 'd':
 719       dataLen = param_getstr(Cmd, cmdp+1, hexData);
 720       if (dataLen==0) {
 721         errors=TRUE;
 722       } else {
 723         dataLen = hextobinarray((char *)data, hexData);
 724       }
 725       if (dataLen==0) errors=TRUE;
 726       if (errors) PrintAndLog ("Error getting hex data, datalen: %d",dataLen);
 727         cmdp+=2;
 728       break;
 729     default:
 730       PrintAndLog("Unknown parameter '%c'", param_getchar(Cmd, cmdp));
 731       errors = TRUE;
 732       break;
 733     }
 734     if(errors) break;
 735   }
 736   if(cmdp == 0 && DemodBufferLen == 0)
 737   {
 738     errors = TRUE;// No args
 739   }
 740
 741   //Validations
 742   if(errors)
 743   {
 744     return usage_lf_simask();
 745   }
 746   if (dataLen == 0){ //using DemodBuffer
 747     if (clk == 0) clk = GetAskClock("0", false, false);
 748   } else {
 749     setDemodBuf(data, dataLen, 0);
 750   }
 751   if (clk == 0) clk = 64;
 752
 753   uint16_t arg1, arg2;
 754   arg1 = clk << 8 | manchester;
 755   arg2 = invert << 8 | separator;
 756   UsbCommand c = {CMD_ASK_SIM_TAG, {arg1, arg2, DemodBufferLen}};
 757   if (DemodBufferLen > USB_CMD_DATA_SIZE) {
 758     PrintAndLog("DemodBuffer too long for current implementation - length: %d - max: %d", DemodBufferLen, USB_CMD_DATA_SIZE);
 759   }
 760   PrintAndLog("preparing to sim ask data: %d bits", DemodBufferLen);
 761   memcpy(c.d.asBytes, DemodBuffer, DemodBufferLen);
 762   SendCommand(&c);
 763   return 0;
 764 }
 765
 766
 767 int CmdLFSimBidir(const char *Cmd)
 768 {
 769   // Set ADC to twice the carrier for a slight supersampling
 770   // HACK: not implemented in ARMSRC.
 771   PrintAndLog("Not implemented yet.");
 772   UsbCommand c = {CMD_LF_SIMULATE_BIDIR, {47, 384, 0}};
 773   SendCommand(&c);
 774   return 0;
 775 }
 776
 777 /* simulate an LF Manchester encoded tag with specified bitstream, clock rate and inter-id gap */
 778 int CmdLFSimManchester(const char *Cmd)
 779 {
 780   static int clock, gap;
 781   static char data[1024], gapstring[8];
 782
 783   sscanf(Cmd, "%i %s %i", &clock, &data[0], &gap);
 784
 785   ClearGraph(0);
 786
 787   for (int i = 0; i < strlen(data) ; ++i)
 788     AppendGraph(0, clock, data[i]- '0');
 789
 790   CmdManchesterMod("");
 791
 792   RepaintGraphWindow();
 793
 794   sprintf(&gapstring[0], "%i", gap);
 795   CmdLFSim(gapstring);
 796   return 0;
 797 }
 798
 799
 800 int CmdVchDemod(const char *Cmd)
 801 {
 802   // Is this the entire sync pattern, or does this also include some
 803   // data bits that happen to be the same everywhere? That would be
 804   // lovely to know.
 805   static const int SyncPattern[] = {
 806     1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
 807     1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
 808     1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
 809     1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
 810     1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
 811     1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
 812     1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
 813     1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
 814     1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,  1,
 815     1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
 816   };
 817
 818   // So first, we correlate for the sync pattern, and mark that.
 819   int bestCorrel = 0, bestPos = 0;
 820   int i;
 821   // It does us no good to find the sync pattern, with fewer than
 822   // 2048 samples after it...
 823   for (i = 0; i < (GraphTraceLen-2048); i++) {
 824     int sum = 0;
 825     int j;
 826     for (j = 0; j < arraylen(SyncPattern); j++) {
 827       sum += GraphBuffer[i+j]*SyncPattern[j];
 828     }
 829     if (sum > bestCorrel) {
 830       bestCorrel = sum;
 831       bestPos = i;
 832     }
 833   }
 834   PrintAndLog("best sync at %d [metric %d]", bestPos, bestCorrel);
 835
 836   char bits[257];
 837   bits[256] = '\0';
 838
 839   int worst = INT_MAX;
 840   int worstPos = 0;
 841
 842   for (i = 0; i < 2048; i += 8) {
 843     int sum = 0;
 844     int j;
 845     for (j = 0; j < 8; j++) {
 846       sum += GraphBuffer[bestPos+i+j];
 847     }
 848     if (sum < 0) {
 849       bits[i/8] = '.';
 850     } else {
 851       bits[i/8] = '1';
 852     }
 853     if(abs(sum) < worst) {
 854       worst = abs(sum);
 855       worstPos = i;
 856     }
 857   }
 858   PrintAndLog("bits:");
 859   PrintAndLog("%s", bits);
 860   PrintAndLog("worst metric: %d at pos %d", worst, worstPos);
 861
 862   if (strcmp(Cmd, "clone")==0) {
 863     GraphTraceLen = 0;
 864     char *s;
 865     for(s = bits; *s; s++) {
 866       int j;
 867       for(j = 0; j < 16; j++) {
 868         GraphBuffer[GraphTraceLen++] = (*s == '1') ? 1 : 0;
 869       }
 870     }
 871     RepaintGraphWindow();
 872   }
 873   return 0;
 874 }
 875
 876 //by marshmellow
 877 int CmdLFfind(const char *Cmd)
 878 {
 879   int ans=0;
 880   char cmdp = param_getchar(Cmd, 0);
 881   char testRaw = param_getchar(Cmd, 1);
 882   if (strlen(Cmd) > 2 || cmdp == 'h' || cmdp == 'H') {
 883     PrintAndLog("Usage:  lf search <0|1> [u]");
 884     PrintAndLog("     <use data from Graphbuffer> , if not set, try reading data from tag.");
 885     PrintAndLog("     [Search for Unknown tags] , if not set, reads only known tags.");
 886     PrintAndLog("");
 887     PrintAndLog("    sample: lf search     = try reading data from tag & search for known tags");
 888     PrintAndLog("          : lf search 1   = use data from GraphBuffer & search for known tags");
 889     PrintAndLog("          : lf search u   = try reading data from tag & search for known and unknown tags");
 890     PrintAndLog("          : lf search 1 u = use data from GraphBuffer & search for known and unknown tags");
 891
 892     return 0;
 893   }
 894
 895   if (!offline && (cmdp != '1')){
 896     ans=CmdLFRead("");
 897     ans=CmdSamples("20000");
 898   } else if (GraphTraceLen < 1000) {
 899     PrintAndLog("Data in Graphbuffer was too small.");
 900     return 0;
 901   }
 902   if (cmdp == 'u' || cmdp == 'U') testRaw = 'u';
 903   PrintAndLog("NOTE: some demods output possible binary\n  if it finds something that looks like a tag");
 904   PrintAndLog("False Positives ARE possible\n");
 905   PrintAndLog("\nChecking for known tags:\n");
 906   ans=CmdFSKdemodIO("");
 907   if (ans>0) {
 908     PrintAndLog("\nValid IO Prox ID Found!");
 909     return 1;
 910   }
 911   ans=CmdFSKdemodPyramid("");
 912   if (ans>0) {
 913     PrintAndLog("\nValid Pyramid ID Found!");
 914     return 1;
 915   }
 916   ans=CmdFSKdemodParadox("");
 917   if (ans>0) {
 918     PrintAndLog("\nValid Paradox ID Found!");
 919     return 1;
 920   }
 921   ans=CmdFSKdemodAWID("");
 922   if (ans>0) {
 923     PrintAndLog("\nValid AWID ID Found!");
 924     return 1;
 925   }
 926   ans=CmdFSKdemodHID("");
 927   if (ans>0) {
 928     PrintAndLog("\nValid HID Prox ID Found!");
 929     return 1;
 930   }
 931   //add psk and indala
 932   ans=CmdIndalaDecode("");
 933   if (ans>0) {
 934     PrintAndLog("\nValid Indala ID Found!");
 935     return 1;
 936   }
 937   ans=CmdAskEM410xDemod("");
 938   if (ans>0) {
 939     PrintAndLog("\nValid EM410x ID Found!");
 940     return 1;
 941   }
 942   PrintAndLog("\nNo Known Tags Found!\n");
 943   if (testRaw=='u' || testRaw=='U'){
 944     //test unknown tag formats (raw mode)
 945     PrintAndLog("\nChecking for Unknown tags:\n");
 946     ans=CmdDetectClockRate("f");
 947     if (ans != 0){ //fsk
 948       ans=CmdFSKrawdemod("");
 949       if (ans>0) {
 950         PrintAndLog("\nUnknown FSK Modulated Tag Found!");
 951         return 1;
 952       }
 953     }
 954     ans=Cmdaskmandemod("");
 955     if (ans>0) {
 956       PrintAndLog("\nUnknown ASK Modulated and Manchester encoded Tag Found!");
 957       return 1;
 958     }
 959     ans=CmdPSK1rawDemod("");
 960     if (ans>0) {
 961       PrintAndLog("Possible unknown PSK1 Modulated Tag Found above!\n\nCould also be PSK2 - try 'data psk2rawdemod'");
 962       PrintAndLog("\nCould also be PSK3 - [currently not supported]");
 963       PrintAndLog("\nCould also be NRZ - try 'data nrzrawdemod");
 964       return 1;
 965     }
 966     PrintAndLog("\nNo Data Found!\n");
 967   }
 968   return 0;
 969 }
 970
 971 static command_t CommandTable[] =
 972 {
 973   {"help",        CmdHelp,            1, "This help"},
 974   {"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)"},
 975   {"em4x",        CmdLFEM4X,          1, "{ EM4X RFIDs... }"},
 976   {"config",      CmdLFSetConfig,     0, "Set config for LF sampling, bit/sample, decimation, frequency"},
 977   {"flexdemod",   CmdFlexdemod,       1, "Demodulate samples for FlexPass"},
 978   {"hid",         CmdLFHID,           1, "{ HID RFIDs... }"},
 979   {"io",          CmdLFIO,                1, "{ ioProx tags... }"},
 980   {"indalademod", CmdIndalaDemod,     1, "['224'] -- Demodulate samples for Indala 64 bit UID (option '224' for 224 bit)"},
 981   {"indalaclone", CmdIndalaClone,     0, "<UID> ['l']-- Clone Indala to T55x7 (tag must be in antenna)(UID in HEX)(option 'l' for 224 UID"},
 982   {"read",        CmdLFRead,          0, "Read 125/134 kHz LF ID-only tag. Do 'lf read h' for help"},
 983   {"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"},
 984   {"sim",         CmdLFSim,           0, "[GAP] -- Simulate LF tag from buffer with optional GAP (in microseconds)"},
 985   {"simask",      CmdLFaskSim,        0, "[clock] [invert <1|0>] [manchester/raw <'m'|'r'>] [trs separator 's'] -- Simulate LF ASK tag from demodbuffer"},
 986   {"simfsk",      CmdLFfskSim,        0, "[invert <1|0>] -- Simulate LF FSK tag from demodbuffer"},
 987   {"simbidir",    CmdLFSimBidir,      0, "Simulate LF tag (with bidirectional data transmission between reader and tag)"},
 988   {"simman",      CmdLFSimManchester, 0, "<Clock> <Bitstream> [GAP] Simulate arbitrary Manchester LF tag"},
 989   {"snoop",       CmdLFSnoop,         0, "['l'|'h'|<divisor>] [trigger threshold]-- Snoop LF (l:125khz, h:134khz)"},
 990   {"ti",          CmdLFTI,            1, "{ TI RFIDs... }"},
 991   {"hitag",       CmdLFHitag,         1, "{ Hitag tags and transponders... }"},
 992   {"vchdemod",    CmdVchDemod,        1, "['clone'] -- Demodulate samples for VeriChip"},
 993   {"t55xx",       CmdLFT55XX,         1, "{ T55xx RFIDs... }"},
 994   {"pcf7931",     CmdLFPCF7931,       1, "{PCF7931 RFIDs...}"},
 995   {NULL, NULL, 0, NULL}
 996 };
 997
 998 int CmdLF(const char *Cmd)
 999 {
1000   CmdsParse(CommandTable, Cmd);
1001   return 0;
1002 }
1003
1004 int CmdHelp(const char *Cmd)
1005 {
1006   CmdsHelp(CommandTable);
1007   return 0;
1008 }