cvs.zerfleddert.de Git - proxmark3-svn/blob - client/cmdlfhitag.c

   1 //-----------------------------------------------------------------------------
   2 // Copyright (C) 2012 Roel Verdult
   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 Hitag support
   9 //-----------------------------------------------------------------------------
  10
  11 #include "cmdlfhitag.h"
  12
  13 #include <stdio.h>
  14 #include <stdlib.h>
  15 #include <string.h>
  16 #include "comms.h"
  17 #include "ui.h"
  18 #include "cmdparser.h"
  19 #include "common.h"
  20 #include "util.h"
  21 #include "parity.h"
  22 #include "hitag.h"
  23 #include "cmdmain.h"
  24
  25 static size_t nbytes(size_t nbits) {
  26         return (nbits/8) + ((nbits%8)>0);
  27 }
  28
  29
  30 static int CmdLFHitagList(const char *Cmd) {
  31         uint8_t *got = malloc(USB_CMD_DATA_SIZE);
  32         // Query for the actual size of the trace
  33         UsbCommand response;
  34         GetFromBigBuf(got, USB_CMD_DATA_SIZE, 0, &response, -1, false);
  35         uint16_t traceLen = response.arg[2];
  36         if (traceLen > USB_CMD_DATA_SIZE) {
  37                 uint8_t *p = realloc(got, traceLen);
  38                 if (p == NULL) {
  39                         PrintAndLog("Cannot allocate memory for trace");
  40                         free(got);
  41                         return 2;
  42                 }
  43                 got = p;
  44                 GetFromBigBuf(got, traceLen, 0, NULL, -1, false);
  45         }
  46
  47         PrintAndLog("recorded activity (TraceLen = %d bytes):");
  48         PrintAndLog(" ETU     :nbits: who bytes");
  49         PrintAndLog("---------+-----+----+-----------");
  50
  51         int j;
  52         int i = 0;
  53         int prev = -1;
  54         int len = strlen(Cmd);
  55
  56         char filename[FILE_PATH_SIZE]  = { 0x00 };
  57         FILE* pf = NULL;
  58
  59         if (len > FILE_PATH_SIZE)
  60                 len = FILE_PATH_SIZE;
  61         memcpy(filename, Cmd, len);
  62
  63         if (strlen(filename) > 0) {
  64                 if ((pf = fopen(filename,"wb")) == NULL) {
  65                         PrintAndLog("Error: Could not open file [%s]",filename);
  66                         free(got);
  67                         return 1;
  68                 }
  69         }
  70
  71         for (;;) {
  72
  73                 if(i > traceLen) { break; }
  74
  75                 bool isResponse;
  76                 int timestamp = *((uint32_t *)(got+i));
  77                 if (timestamp & 0x80000000) {
  78                         timestamp &= 0x7fffffff;
  79                         isResponse = 1;
  80                 } else {
  81                         isResponse = 0;
  82                 }
  83
  84                 int parityBits = *((uint32_t *)(got+i+4));
  85                 // 4 bytes of additional information...
  86                 // maximum of 32 additional parity bit information
  87                 //
  88                 // TODO:
  89                 // at each quarter bit period we can send power level (16 levels)
  90                 // or each half bit period in 256 levels.
  91
  92                 int bits = got[i+8];
  93                 int len = nbytes(bits);
  94
  95                 if (len > 100) {
  96                         break;
  97                 }
  98                 if (i + len > traceLen) { break;}
  99
 100                 uint8_t *frame = (got+i+9);
 101 /*
 102                 int fillupBits = 8 - (bits % 8);
 103                 byte_t framefilled[bits+fillupBits];
 104                 byte_t* ff = framefilled;
 105
 106                 int response_bit[200] = {0};
 107                 int z = 0;
 108                 for (int y = 0; y < len; y++) {
 109                         for (j = 0; j < 8; j++) {
 110                                 response_bit[z] = 0;
 111                                 if ((frame[y] & ((mask << 7) >> j)) != 0)
 112                                         response_bit[z] = 1;
 113                                 z++;
 114                         }
 115                 }
 116                 z = 0;
 117                 for (int y = 0; y < len; y++) {
 118                         ff[y] = (response_bit[z] << 7) | (response_bit[z + 1] << 6)
 119                                         | (response_bit[z + 2] << 5) | (response_bit[z + 3] << 4)
 120                                         | (response_bit[z + 4] << 3) | (response_bit[z + 5] << 2)
 121                                         | (response_bit[z + 6] << 1) | response_bit[z + 7];
 122                         z += 8;
 123                 }
 124 */
 125
 126
 127
 128
 129                 // Break and stick with current result if buffer was not completely full
 130                 if (frame[0] == 0x44 && frame[1] == 0x44 && frame[3] == 0x44) { break; }
 131
 132                 char line[1000] = "";
 133                 for (j = 0; j < len; j++) {
 134                         //if((parityBits >> (len - j - 1)) & 0x01) {
 135                         if (isResponse && (oddparity8(frame[j]) != ((parityBits >> (len - j - 1)) & 0x01))) {
 136                                 sprintf(line+(j*4), "%02x!  ", frame[j]);
 137                         } else {
 138                                 sprintf(line+(j*4), "%02x   ", frame[j]);
 139                         }
 140                 }
 141
 142                 PrintAndLog(" +%7d:  %3d: %s %s",
 143                         (prev < 0 ? 0 : (timestamp - prev)),
 144                         bits,
 145                         (isResponse ? "TAG" : "   "),
 146                         line);
 147
 148                 if (pf) {
 149                         fprintf(pf," +%7d:  %3d: %s %s\n",
 150                                 (prev < 0 ? 0 : (timestamp - prev)),
 151                                 bits,
 152                                 (isResponse ? "TAG" : "   "),
 153                                 line);
 154                 }
 155
 156                 prev = timestamp;
 157                 i += (len + 9);
 158         }
 159
 160         if (pf) {
 161                 fclose(pf);
 162                 PrintAndLog("Recorded activity succesfully written to file: %s", filename);
 163         }
 164
 165         free(got);
 166         return 0;
 167 }
 168
 169
 170 static int CmdLFHitagSnoop(const char *Cmd) {
 171         UsbCommand c = {CMD_SNOOP_HITAG};
 172         SendCommand(&c);
 173         return 0;
 174 }
 175
 176
 177 static int CmdLFHitagSim(const char *Cmd) {
 178
 179         UsbCommand c = {CMD_SIMULATE_HITAG};
 180         char filename[FILE_PATH_SIZE] = { 0x00 };
 181         FILE* pf;
 182         bool tag_mem_supplied;
 183         int len = strlen(Cmd);
 184         if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
 185         memcpy(filename, Cmd, len);
 186
 187         if (strlen(filename) > 0) {
 188                 if ((pf = fopen(filename,"rb+")) == NULL) {
 189                         PrintAndLog("Error: Could not open file [%s]",filename);
 190                         return 1;
 191                 }
 192                 tag_mem_supplied = true;
 193                 if (fread(c.d.asBytes,1,48,pf) != 48) {
 194                         PrintAndLog("Error: File reading error");
 195                         fclose(pf);
 196                         return 1;
 197                 }
 198                 fclose(pf);
 199         } else {
 200                 tag_mem_supplied = false;
 201         }
 202
 203         // Does the tag comes with memory
 204         c.arg[0] = (uint32_t)tag_mem_supplied;
 205
 206         SendCommand(&c);
 207         return 0;
 208 }
 209
 210
 211 static bool getHitagUid(uint32_t *uid) {
 212         // ToDo: this is for Hitag2 only (??)
 213
 214         UsbCommand c = {CMD_READER_HITAG, {RHT2F_UID_ONLY}};
 215
 216         SendCommand(&c);
 217
 218         UsbCommand resp;
 219         if (!WaitForResponseTimeout(CMD_ACK, &resp, 2500)) {
 220                 PrintAndLogEx(WARNING, "timeout while waiting for reply.");
 221                 return false;
 222         }
 223
 224         if (resp.arg[0] == false) {
 225                 PrintAndLogEx(DEBUG, "DEBUG: Error - failed getting UID");
 226                 return false;
 227         }
 228
 229         if (uid)
 230                 *uid = bytes_to_num(resp.d.asBytes, 4);
 231
 232         return true;
 233 }
 234
 235
 236 static int CmdLFHitagInfo(const char *Cmd) {
 237         char ctmp = param_getchar(Cmd, 0);
 238         if (ctmp != '\0') {
 239                 PrintAndLog("Usage:   lf hitag info [h]");
 240                 PrintAndLog("Options:");
 241                 PrintAndLog("       h          This help");
 242                 PrintAndLog("Examples:");
 243                 PrintAndLog("         lf hitag info");
 244                 return 0;
 245         }
 246
 247         // read UID
 248         uint32_t uid = 0;
 249         if (getHitagUid(&uid) == false)
 250                 return 1;
 251
 252         PrintAndLogEx(SUCCESS, "UID: %08X", uid);
 253
 254         // how to detemine Hitag types?
 255         // read block3,  get configuration byte.
 256         // PrintAndLogEx(FAILED, _RED_("TODO: This is a hardcoded example!"));
 257
 258         // common configurations.
 259         // printHitagConfiguration(0x06);
 260         //printHitagConfiguration( 0x0E );
 261         //printHitagConfiguration( 0x02 );
 262         //printHitagConfiguration( 0x00 );
 263         //printHitagConfiguration( 0x04 );
 264         return 0;
 265 }
 266
 267
 268 int CmdLFHitagReader(const char *Cmd) {
 269         UsbCommand c = {CMD_READER_HITAG};
 270         hitag_data* htd = (hitag_data*)c.d.asBytes;
 271         hitag_function htf = param_get32ex(Cmd, 0, 0, 10);
 272
 273         switch (htf) {
 274                 case 01: { //RHTSF_CHALLENGE
 275                         c = (UsbCommand){ CMD_READ_HITAG_S };
 276                         num_to_bytes(param_get32ex(Cmd, 1, 0, 16), 4, htd->auth.NrAr);
 277                         num_to_bytes(param_get32ex(Cmd, 2, 0, 16), 4, htd->auth.NrAr+4);
 278                         c.arg[1] = param_get64ex(Cmd, 3, 0, 0); //firstpage
 279                         c.arg[2] = param_get64ex(Cmd, 4, 0, 0); //tag mode
 280                 } break;
 281                 case 02: { //RHTSF_KEY
 282                         c = (UsbCommand){ CMD_READ_HITAG_S };
 283                         num_to_bytes(param_get64ex(Cmd, 1, 0, 16), 6, htd->crypto.key);
 284                         c.arg[1] = param_get64ex(Cmd, 2, 0, 0); //firstpage
 285                         c.arg[2] = param_get64ex(Cmd, 3, 0, 0); //tag mode
 286                 } break;
 287                 case 03: { //RHTSF_CHALLENGE BLOCK
 288                         c = (UsbCommand){ CMD_READ_HITAG_S_BLK };
 289                         num_to_bytes(param_get32ex(Cmd, 1, 0, 16), 4, htd->auth.NrAr);
 290                         num_to_bytes(param_get32ex(Cmd, 2, 0, 16), 4, htd->auth.NrAr+4);
 291                         c.arg[1] = param_get64ex(Cmd, 3, 0, 0); //firstpage
 292                         c.arg[2] = param_get64ex(Cmd, 4, 0, 0); //tag mode
 293                 } break;
 294                 case 04: { //RHTSF_KEY BLOCK
 295                         c = (UsbCommand){ CMD_READ_HITAG_S_BLK };
 296                         num_to_bytes(param_get64ex(Cmd, 1, 0, 16), 6, htd->crypto.key);
 297                         c.arg[1] = param_get64ex(Cmd, 2, 0, 0); //firstpage
 298                         c.arg[2] = param_get64ex(Cmd, 3, 0, 0); //tag mode
 299                 } break;
 300                 case RHT2F_PASSWORD: {
 301                         num_to_bytes(param_get32ex(Cmd, 1, 0, 16), 4, htd->pwd.password);
 302                 } break;
 303                 case RHT2F_AUTHENTICATE: {
 304                         num_to_bytes(param_get32ex(Cmd, 1, 0, 16), 4, htd->auth.NrAr);
 305                         num_to_bytes(param_get32ex(Cmd, 2, 0, 16), 4, htd->auth.NrAr+4);
 306                 } break;
 307                 case RHT2F_CRYPTO: {
 308                         num_to_bytes(param_get64ex(Cmd, 1, 0, 16), 6, htd->crypto.key);
 309                         //          num_to_bytes(param_get32ex(Cmd,2,0,16),4,htd->auth.NrAr+4);
 310                 } break;
 311                 case RHT2F_TEST_AUTH_ATTEMPTS: {
 312                         // No additional parameters needed
 313                 } break;
 314                 case RHT2F_UID_ONLY: {
 315                         // No additional parameters needed
 316                 } break;
 317                 default: {
 318                         PrintAndLog("\nError: unkown reader function %d",htf);
 319                         PrintAndLog("");
 320                         PrintAndLog("Usage: hitag reader <Reader Function #>");
 321                         PrintAndLog("Reader Functions:");
 322                         PrintAndLog("  HitagS (0*):");
 323                         PrintAndLog("    01 <nr> <ar> (Challenge) <firstPage> <tagmode> read all pages from a Hitag S tag");
 324                         PrintAndLog("    02 <key> (set to 0 if no authentication is needed) <firstPage> <tagmode> read all pages from a Hitag S tag");
 325                         PrintAndLog("    03 <nr> <ar> (Challenge) <firstPage> <tagmode> read all blocks from a Hitag S tag");
 326                         PrintAndLog("    04 <key> (set to 0 if no authentication is needed) <firstPage> <tagmode> read all blocks from a Hitag S tag");
 327                         PrintAndLog("    Valid tagmodes are 0=STANDARD, 1=ADVANCED, 2=FAST_ADVANCED (default is ADVANCED)");
 328                         PrintAndLog("  Hitag1 (1*):");
 329                         PrintAndLog("    (not yet implemented)");
 330                         PrintAndLog("  Hitag2 (2*):");
 331                         PrintAndLog("    21 <password> (password mode)");
 332                         PrintAndLog("    22 <nr> <ar> (authentication)");
 333                         PrintAndLog("    23 <key> (authentication) key is in format: ISK high + ISK low");
 334                         PrintAndLog("    25 (test recorded authentications)");
 335                         PrintAndLog("    26 just read UID");
 336                         return 1;
 337                 } break;
 338         }
 339
 340         // Copy the hitag2 function into the first argument
 341         c.arg[0] = htf;
 342
 343         // Send the command to the proxmark
 344         clearCommandBuffer();
 345         SendCommand(&c);
 346
 347         UsbCommand resp;
 348         if (!WaitForResponseTimeout(CMD_ACK, &resp, 4000)) {
 349                 PrintAndLogEx(WARNING, "timeout while waiting for reply.");
 350                 return 1;
 351         }
 352
 353         // Check the return status, stored in the first argument
 354         if (resp.arg[0] == false)  {
 355                 PrintAndLogEx(DEBUG, "DEBUG: Error - hitag failed");
 356                 return 1;
 357         }
 358
 359         uint32_t id = bytes_to_num(resp.d.asBytes,4);
 360
 361         if (htf == RHT2F_UID_ONLY){
 362                 PrintAndLog("Valid Hitag2 tag found - UID: %08x",id);
 363         } else {
 364                 char filename[256];
 365                 FILE* pf = NULL;
 366
 367                 sprintf(filename,"%08x_%04x.ht2",id,(rand() & 0xffff));
 368                 if ((pf = fopen(filename,"wb")) == NULL) {
 369                   PrintAndLog("Error: Could not open file [%s]",filename);
 370                   return 1;
 371                 }
 372
 373                 // Write the 48 tag memory bytes to file and finalize
 374                 fwrite(resp.d.asBytes,1,48,pf);
 375                 fclose(pf);
 376
 377                 PrintAndLog("Succesfully saved tag memory to [%s]",filename);
 378         }
 379
 380         return 0;
 381 }
 382
 383
 384 static int CmdLFHitagSimS(const char *Cmd) {
 385         UsbCommand c = { CMD_SIMULATE_HITAG_S };
 386         char filename[FILE_PATH_SIZE] = { 0x00 };
 387         FILE* pf;
 388         bool tag_mem_supplied;
 389         int len = strlen(Cmd);
 390         if (len > FILE_PATH_SIZE)
 391                 len = FILE_PATH_SIZE;
 392         memcpy(filename, Cmd, len);
 393
 394         if (strlen(filename) > 0) {
 395                 if ((pf = fopen(filename, "rb+")) == NULL) {
 396                         PrintAndLog("Error: Could not open file [%s]", filename);
 397                         return 1;
 398                 }
 399                 tag_mem_supplied = true;
 400                 if (fread(c.d.asBytes, 1, 4*64, pf) != 4*64) {
 401                         PrintAndLog("Error: File reading error");
 402                         fclose(pf);
 403                         return 1;
 404                 }
 405                 fclose(pf);
 406         } else {
 407                 tag_mem_supplied = false;
 408         }
 409
 410         // Does the tag comes with memory
 411         c.arg[0] = (uint32_t) tag_mem_supplied;
 412
 413         SendCommand(&c);
 414         return 0;
 415 }
 416
 417
 418 static int CmdLFHitagCheckChallenges(const char *Cmd) {
 419         UsbCommand c = { CMD_TEST_HITAGS_TRACES };
 420         char filename[FILE_PATH_SIZE] = { 0x00 };
 421         FILE* pf;
 422         bool file_given;
 423         int len = strlen(Cmd);
 424         if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
 425         memcpy(filename, Cmd, len);
 426
 427         if (strlen(filename) > 0) {
 428                 if ((pf = fopen(filename,"rb+")) == NULL) {
 429                         PrintAndLog("Error: Could not open file [%s]",filename);
 430                         return 1;
 431                 }
 432                 file_given = true;
 433                 if (fread(c.d.asBytes,1,8*60,pf) != 8*60) {
 434                         PrintAndLog("Error: File reading error");
 435                         fclose(pf);
 436                         return 1;
 437                 }
 438                 fclose(pf);
 439         } else {
 440                 file_given = false;
 441         }
 442
 443         //file with all the challenges to try
 444         c.arg[0] = (uint32_t)file_given;
 445         c.arg[1] = param_get64ex(Cmd,2,0,0); //get mode
 446
 447         SendCommand(&c);
 448         return 0;
 449 }
 450
 451
 452 static int CmdLFHitagWriter(const char *Cmd) {
 453         UsbCommand c = { CMD_WR_HITAG_S };
 454         hitag_data* htd = (hitag_data*)c.d.asBytes;
 455         hitag_function htf = param_get32ex(Cmd,0,0,10);
 456         switch (htf) {
 457                 case WHTSF_CHALLENGE: {
 458                         num_to_bytes(param_get64ex(Cmd,1,0,16),8,htd->auth.NrAr);
 459                         c.arg[2]= param_get32ex(Cmd, 2, 0, 10);
 460                         num_to_bytes(param_get32ex(Cmd,3,0,16),4,htd->auth.data);
 461                 } break;
 462                 case WHTSF_KEY:
 463                 case WHT2F_CRYPTO: {
 464                         num_to_bytes(param_get64ex(Cmd,1,0,16),6,htd->crypto.key);
 465                         c.arg[2]= param_get32ex(Cmd, 2, 0, 10);
 466                         num_to_bytes(param_get32ex(Cmd,3,0,16),4,htd->crypto.data);
 467                 } break;
 468                 case WHT2F_PASSWORD: {
 469                         num_to_bytes(param_get64ex(Cmd, 1, 0, 16), 4, htd->pwd.password);
 470                         c.arg[2] = param_get32ex(Cmd, 2, 0, 10);
 471                         num_to_bytes(param_get32ex(Cmd, 3, 0, 16), 4, htd->crypto.data);
 472                 } break;
 473                 default: {
 474                         PrintAndLog("Error: unkown writer function %d",htf);
 475                         PrintAndLog("Hitag writer functions");
 476                         PrintAndLog("  HitagS (0*):");
 477                         PrintAndLog("    03 <nr,ar> (Challenge) <page> <byte0...byte3> write page on a Hitag S tag");
 478                         PrintAndLog("    04 <key> (set to 0 if no authentication is needed) <page> <byte0...byte3> write page on a Hitag S tag");
 479                         PrintAndLog("  Hitag1 (1*)");
 480                         PrintAndLog("    (not yet implemented)");
 481                         PrintAndLog("  Hitag2 (2*):");
 482                         PrintAndLog("    24 <key> (set to 0 if no authentication is needed) <page> <byte0...byte3> write page on a Hitag S tag");
 483                         PrintAndLog("    27 <password> <page> <byte0...byte3> write page on a Hitag2 tag");
 484                         return 1;
 485                 } break;
 486         }
 487         // Copy the hitag function into the first argument
 488         c.arg[0] = htf;
 489
 490         // Send the command to the proxmark
 491         SendCommand(&c);
 492
 493         UsbCommand resp;
 494         if (!WaitForResponseTimeout(CMD_ACK, &resp, 4000)) {
 495                 PrintAndLogEx(WARNING, "timeout while waiting for reply.");
 496                 return 1;
 497         }
 498
 499         // Check the return status, stored in the first argument
 500         if (resp.arg[0] == false) {
 501                 PrintAndLogEx(DEBUG, "DEBUG: Error - hitag write failed");
 502                 return 1;
 503         }
 504         return 0;
 505 }
 506
 507
 508 static int CmdHelp(const char *Cmd);
 509
 510 static command_t CommandTable[] =
 511 {
 512         {"help",             CmdHelp,                   1, "This help"},
 513         {"list",             CmdLFHitagList,            0, "<outfile> List Hitag trace history"},
 514         {"info",             CmdLFHitagInfo,            0, "Tag information" },
 515         {"reader",           CmdLFHitagReader,          0, "Act like a Hitag Reader"},
 516         {"sim",              CmdLFHitagSim,             0, "Simulate Hitag transponder"},
 517         {"snoop",            CmdLFHitagSnoop,           0, "Eavesdrop Hitag communication"},
 518         {"writer",           CmdLFHitagWriter,          0, "Act like a Hitag Writer" },
 519         {"simS",             CmdLFHitagSimS,            0, "Simulate HitagS transponder" },
 520         {"checkChallenges",  CmdLFHitagCheckChallenges, 0, "Test challenges from a file" },
 521         { NULL,              NULL,                      0, NULL }
 522 };
 523
 524
 525 static int CmdHelp(const char *Cmd) {
 526         CmdsHelp(CommandTable);
 527         return 0;
 528 }
 529
 530
 531 int CmdLFHitag(const char *Cmd) {
 532         CmdsParse(CommandTable, Cmd);
 533         return 0;
 534 }