git.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 <stdio.h>
  12 #include <stdlib.h>
  13 #include <string.h>
  14 #include "data.h"
  15 #include "proxmark3.h"
  16 #include "ui.h"
  17 #include "cmdparser.h"
  18 #include "common.h"
  19 #include "util.h"
  20 #include "hitag2.h"
  21 #include "hitagS.h"
  22 #include "sleep.h"
  23 #include "cmdmain.h"
  24
  25 static int CmdHelp(const char *Cmd);
  26
  27 size_t nbytes(size_t nbits) {
  28         return (nbits/8)+((nbits%8)>0);
  29 }
  30
  31 int CmdLFHitagList(const char *Cmd) {
  32         uint8_t *got = malloc(USB_CMD_DATA_SIZE);
  33
  34         // Query for the actual size of the trace
  35         UsbCommand response;
  36         GetFromBigBuf(got, USB_CMD_DATA_SIZE, 0);
  37         WaitForResponse(CMD_ACK, &response);
  38         uint16_t traceLen = response.arg[2];
  39         if (traceLen > USB_CMD_DATA_SIZE) {
  40                 uint8_t *p = realloc(got, traceLen);
  41                 if (p == NULL) {
  42                         PrintAndLog("Cannot allocate memory for trace");
  43                         free(got);
  44                         return 2;
  45                 }
  46                 got = p;
  47                 GetFromBigBuf(got, traceLen, 0);
  48                 WaitForResponse(CMD_ACK,NULL);
  49         }
  50
  51         PrintAndLog("recorded activity (TraceLen = %d bytes):");
  52         PrintAndLog(" ETU     :nbits: who bytes");
  53         PrintAndLog("---------+-----+----+-----------");
  54
  55         int i = 0;
  56         int prev = -1;
  57         int len = strlen(Cmd);
  58
  59         char filename[FILE_PATH_SIZE]  = { 0x00 };
  60         FILE* f = NULL;
  61
  62         if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
  63         memcpy(filename, Cmd, len);
  64
  65         if (strlen(filename) > 0) {
  66                 f = fopen(filename,"wb");
  67                 if (!f) {
  68                         PrintAndLog("Error: Could not open file [%s]",filename);
  69                         return 1;
  70                 }
  71         }
  72
  73         for (;;) {
  74
  75                 if(i >= traceLen) { break; }
  76
  77                 bool isResponse;
  78                 int timestamp = *((uint32_t *)(got+i));
  79                 if (timestamp & 0x80000000) {
  80                         timestamp &= 0x7fffffff;
  81                         isResponse = 1;
  82                 } else {
  83                         isResponse = 0;
  84                 }
  85
  86                 int parityBits = *((uint32_t *)(got+i+4));
  87                 // 4 bytes of additional information...
  88                 // maximum of 32 additional parity bit information
  89                 //
  90                 // TODO:
  91                 // at each quarter bit period we can send power level (16 levels)
  92                 // or each half bit period in 256 levels.
  93
  94                 int bits = got[i+8];
  95                 int len = nbytes(got[i+8]);
  96
  97                 if (len > 100) {
  98                   break;
  99                 }
 100                 if (i + len > traceLen) { break;}
 101
 102                 uint8_t *frame = (got+i+9);
 103
 104                 // Break and stick with current result if buffer was not completely full
 105                 if (frame[0] == 0x44 && frame[1] == 0x44 && frame[3] == 0x44) { break; }
 106
 107                 char line[1000] = "";
 108                 int j;
 109                 for (j = 0; j < len; j++) {
 110                   int oddparity = 0x01;
 111                   int k;
 112
 113                   for (k=0;k<8;k++) {
 114                         oddparity ^= (((frame[j] & 0xFF) >> k) & 0x01);
 115                   }
 116
 117                   //if((parityBits >> (len - j - 1)) & 0x01) {
 118                   if (isResponse && (oddparity != ((parityBits >> (len - j - 1)) & 0x01))) {
 119                         sprintf(line+(j*4), "%02x!  ", frame[j]);
 120                   }
 121                   else {
 122                         sprintf(line+(j*4), "%02x   ", frame[j]);
 123                   }
 124                 }
 125
 126                 PrintAndLog(" +%7d:  %3d: %s %s",
 127                         (prev < 0 ? 0 : (timestamp - prev)),
 128                         bits,
 129                         (isResponse ? "TAG" : "   "),
 130                         line);
 131
 132                 if (f) {
 133                         fprintf(f," +%7d:  %3d: %s %s\n",
 134                                 (prev < 0 ? 0 : (timestamp - prev)),
 135                                 bits,
 136                                 (isResponse ? "TAG" : "   "),
 137                                 line);
 138                 }
 139
 140                 prev = timestamp;
 141                 i += (len + 9);
 142         }
 143
 144         if (f) {
 145                 fclose(f);
 146                 PrintAndLog("Recorded activity succesfully written to file: %s", filename);
 147         }
 148
 149         free(got);
 150         return 0;
 151 }
 152
 153 int CmdLFHitagSnoop(const char *Cmd) {
 154         UsbCommand c = {CMD_SNOOP_HITAG};
 155         clearCommandBuffer();
 156         SendCommand(&c);
 157         return 0;
 158 }
 159
 160 int CmdLFHitagSim(const char *Cmd) {
 161
 162         UsbCommand c = {CMD_SIMULATE_HITAG};
 163         char filename[FILE_PATH_SIZE] = { 0x00 };
 164         FILE* f;
 165         bool tag_mem_supplied;
 166
 167         int len = strlen(Cmd);
 168         if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
 169         memcpy(filename, Cmd, len);
 170
 171         if (strlen(filename) > 0) {
 172                 f = fopen(filename,"rb+");
 173                 if (!f) {
 174                         PrintAndLog("Error: Could not open file [%s]",filename);
 175                         return 1;
 176                 }
 177                 tag_mem_supplied = true;
 178                 size_t bytes_read = fread(c.d.asBytes, 48, 1, f);
 179                 if ( bytes_read == 0) {
 180                         PrintAndLog("Error: File reading error");
 181                         fclose(f);
 182                         return 1;
 183                 }
 184                 fclose(f);
 185         } else {
 186                 tag_mem_supplied = false;
 187         }
 188
 189         // Does the tag comes with memory
 190         c.arg[0] = (uint32_t)tag_mem_supplied;
 191         clearCommandBuffer();
 192         SendCommand(&c);
 193         return 0;
 194 }
 195
 196 int CmdLFHitagReader(const char *Cmd) {
 197
 198         UsbCommand c = {CMD_READER_HITAG};//, {param_get32ex(Cmd,0,0,10),param_get32ex(Cmd,1,0,16),param_get32ex(Cmd,2,0,16),param_get32ex(Cmd,3,0,16)}};
 199         hitag_data* htd = (hitag_data*)c.d.asBytes;
 200         hitag_function htf = param_get32ex(Cmd,0,0,10);
 201
 202         switch (htf) {
 203                 case 01: { //RHTSF_CHALLENGE
 204                         c = (UsbCommand){ CMD_READ_HITAG_S };
 205                         num_to_bytes(param_get32ex(Cmd,1,0,16),4,htd->auth.NrAr);
 206                         num_to_bytes(param_get32ex(Cmd,2,0,16),4,htd->auth.NrAr+4);
 207                 } break;
 208                 case 02: { //RHTSF_KEY
 209                         c = (UsbCommand){ CMD_READ_HITAG_S };
 210                         num_to_bytes(param_get64ex(Cmd,1,0,16),6,htd->crypto.key);
 211                 } break;
 212                 case RHT2F_PASSWORD: {
 213                         num_to_bytes(param_get32ex(Cmd,1,0,16),4,htd->pwd.password);
 214                 } break;
 215                 case RHT2F_AUTHENTICATE: {
 216                         num_to_bytes(param_get32ex(Cmd,1,0,16),4,htd->auth.NrAr);
 217                         num_to_bytes(param_get32ex(Cmd,2,0,16),4,htd->auth.NrAr+4);
 218                 } break;
 219                 case RHT2F_CRYPTO: {
 220                         num_to_bytes(param_get64ex(Cmd,1,0,16),6,htd->crypto.key);
 221                 } break;
 222                 case RHT2F_TEST_AUTH_ATTEMPTS: {
 223                         // No additional parameters needed
 224                 } break;
 225                 default: {
 226                         PrintAndLog("Error: unkown reader function %d",htf);
 227                         PrintAndLog("Hitag reader functions");
 228                         PrintAndLog(" HitagS (0*)");
 229                         PrintAndLog("  01 <nr> <ar> (Challenge) read all pages from a Hitag S tag");
 230                         PrintAndLog("  02 <key> (set to 0 if no authentication is needed) read all pages from a Hitag S tag");
 231                         PrintAndLog(" Hitag1 (1*)");
 232                         PrintAndLog(" Hitag2 (2*)");
 233                         PrintAndLog("  21 <password> (password mode)");
 234                         PrintAndLog("  22 <nr> <ar> (authentication)");
 235                         PrintAndLog("  23 <key> (authentication) key is in format: ISK high + ISK low");
 236                         PrintAndLog("  25 (test recorded authentications)");
 237                         return 1;
 238                 } break;
 239         }
 240
 241         // Copy the hitag2 function into the first argument
 242         c.arg[0] = htf;
 243         clearCommandBuffer();
 244         SendCommand(&c);
 245         UsbCommand resp;
 246         WaitForResponse(CMD_ACK,&resp);
 247
 248         // Check the return status, stored in the first argument
 249         if (resp.arg[0] == false) return 1;
 250
 251         uint32_t id = bytes_to_num(resp.d.asBytes,4);
 252
 253         char filename[FILE_PATH_SIZE];
 254         FILE* f = NULL;
 255         sprintf(filename,"%08x_%04x.ht2",id,(rand() & 0xffff));
 256         f = fopen(filename,"wb");
 257         if (!f) {
 258                 PrintAndLog("Error: Could not open file [%s]",filename);
 259                 return 1;
 260         }
 261
 262         // Write the 48 tag memory bytes to file and finalize
 263         fwrite(resp.d.asBytes, 1, 48, f);
 264         fclose(f);
 265         PrintAndLog("Succesfully saved tag memory to [%s]",filename);
 266         return 0;
 267 }
 268
 269 int CmdLFHitagSimS(const char *Cmd) {
 270         UsbCommand c = { CMD_SIMULATE_HITAG_S };
 271         char filename[FILE_PATH_SIZE] = { 0x00 };
 272         FILE* f;
 273         bool tag_mem_supplied;
 274         int len = strlen(Cmd);
 275         if (len > FILE_PATH_SIZE)
 276                 len = FILE_PATH_SIZE;
 277         memcpy(filename, Cmd, len);
 278
 279         if (strlen(filename) > 0) {
 280                 f = fopen(filename, "rb+");
 281                 if (!f) {
 282                         PrintAndLog("Error: Could not open file [%s]", filename);
 283                         return 1;
 284                 }
 285                 tag_mem_supplied = true;
 286                 size_t bytes_read = fread(c.d.asBytes, 4*64, 1, f);
 287                 if ( bytes_read == 0) {
 288                         PrintAndLog("Error: File reading error");
 289                         fclose(f);
 290                         return 1;
 291                 }
 292                 fclose(f);
 293         } else {
 294                 tag_mem_supplied = false;
 295         }
 296
 297         // Does the tag comes with memory
 298         c.arg[0] = (uint32_t) tag_mem_supplied;
 299         clearCommandBuffer();
 300         SendCommand(&c);
 301         return 0;
 302 }
 303
 304 int CmdLFHitagCheckChallenges(const char *Cmd) {
 305         UsbCommand c = { CMD_TEST_HITAGS_TRACES };
 306         char filename[FILE_PATH_SIZE] = { 0x00 };
 307         FILE* f;
 308         bool file_given;
 309         int len = strlen(Cmd);
 310         if (len > FILE_PATH_SIZE) len = FILE_PATH_SIZE;
 311         memcpy(filename, Cmd, len);
 312
 313         if (strlen(filename) > 0) {
 314                 f = fopen(filename,"rb+");
 315                 if( !f ) {
 316                         PrintAndLog("Error: Could not open file [%s]", filename);
 317                         return 1;
 318                 }
 319                 file_given = true;
 320                 size_t bytes_read = fread(c.d.asBytes, 8*60, 1, f);
 321                 if ( bytes_read == 0) {
 322                         PrintAndLog("Error: File reading error");
 323                         fclose(f);
 324                         return 1;
 325         }
 326                 fclose(f);
 327         } else {
 328                 file_given = false;
 329         }
 330
 331         //file with all the challenges to try
 332         c.arg[0] = (uint32_t)file_given;
 333         clearCommandBuffer();
 334         SendCommand(&c);
 335         return 0;
 336 }
 337
 338 int CmdLFHitagWP(const char *Cmd) {
 339         UsbCommand c = { CMD_WR_HITAG_S };
 340         hitag_data* htd = (hitag_data*)c.d.asBytes;
 341         hitag_function htf = param_get32ex(Cmd,0,0,10);
 342         switch (htf) {
 343                 case 03: { //WHTSF_CHALLENGE
 344                         num_to_bytes(param_get64ex(Cmd,1,0,16),8,htd->auth.NrAr);
 345                         c.arg[2]= param_get32ex(Cmd, 2, 0, 10);
 346                         num_to_bytes(param_get32ex(Cmd,3,0,16),4,htd->auth.data);
 347                 } break;
 348                 case 04: { //WHTSF_KEY
 349                         num_to_bytes(param_get64ex(Cmd,1,0,16),6,htd->crypto.key);
 350                         c.arg[2]= param_get32ex(Cmd, 2, 0, 10);
 351                         num_to_bytes(param_get32ex(Cmd,3,0,16),4,htd->crypto.data);
 352
 353                 } break;
 354                 default: {
 355                         PrintAndLog("Error: unkown writer function %d",htf);
 356                         PrintAndLog("Hitag writer functions");
 357                         PrintAndLog(" HitagS (0*)");
 358                         PrintAndLog("  03 <nr,ar> (Challenge) <page> <byte0...byte3> write page on a Hitag S tag");
 359                         PrintAndLog("  04 <key> (set to 0 if no authentication is needed) <page> <byte0...byte3> write page on a Hitag S tag");
 360                         PrintAndLog(" Hitag1 (1*)");
 361                         PrintAndLog(" Hitag2 (2*)");
 362                         return 1;
 363                 } break;
 364         }
 365         // Copy the hitag function into the first argument
 366         c.arg[0] = htf;
 367
 368         clearCommandBuffer();
 369         SendCommand(&c);
 370         UsbCommand resp;
 371         WaitForResponse(CMD_ACK,&resp);
 372
 373         // Check the return status, stored in the first argument
 374         if (resp.arg[0] == false) return 1;
 375         return 0;
 376 }
 377
 378 static command_t CommandTable[] =
 379 {
 380         {"help",    CmdHelp,           1, "This help"},
 381         {"list",    CmdLFHitagList,    1, "<outfile> List Hitag trace history"},
 382         {"reader",  CmdLFHitagReader,  1, "Act like a Hitag Reader"},
 383         {"sim",     CmdLFHitagSim,     1, "<infile> Simulate Hitag transponder"},
 384         {"snoop",   CmdLFHitagSnoop,   1, "Eavesdrop Hitag communication"},
 385   {"writer",            CmdLFHitagWP,      1, "Act like a Hitag Writer" },
 386   {"simS",              CmdLFHitagSimS,    1, "<hitagS.hts> Simulate HitagS transponder" },
 387   {"checkChallenges",   CmdLFHitagCheckChallenges,   1, "<challenges.cc> test all challenges" }, {
 388                                 NULL,NULL, 0, NULL }
 389 };
 390
 391 int CmdLFHitag(const char *Cmd) {
 392         clearCommandBuffer();
 393         CmdsParse(CommandTable, Cmd);
 394         return 0;
 395 }
 396
 397 int CmdHelp(const char *Cmd) {
 398         CmdsHelp(CommandTable);
 399         return 0;
 400 }