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

   1 //-----------------------------------------------------------------------------
   2 //
   3 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
   4 // at your option, any later version. See the LICENSE.txt file for the text of
   5 // the license.
   6 //-----------------------------------------------------------------------------
   7 // Low frequency Farpoint / Pyramid tag commands
   8 //-----------------------------------------------------------------------------
   9 #include <string.h>
  10 #include <inttypes.h>
  11 #include "cmdlfpyramid.h"
  12 static int CmdHelp(const char *Cmd);
  13
  14 int usage_lf_pyramid_clone(void){
  15         PrintAndLog("clone a Farepointe/Pyramid tag to a T55x7 tag.");
  16         PrintAndLog("Per pyramid format, the facility-code is 8-bit and the card number is 16-bit.  Larger values are truncated.");
  17         PrintAndLog("");
  18         PrintAndLog("Usage: lf pyramid clone <Facility-Code> <Card-Number>");
  19         PrintAndLog("Options :");
  20         PrintAndLog("  <Facility-Code> :  8-bit value facility code");
  21         PrintAndLog("  <Card Number>   : 16-bit value card number");
  22         PrintAndLog("");
  23         PrintAndLog("Sample  : lf pyramid clone 123 11223");
  24         return 0;
  25 }
  26
  27 int usage_lf_pyramid_sim(void) {
  28         PrintAndLog("Enables simulation of Farepointe/Pyramid card with specified card number.");
  29         PrintAndLog("Simulation runs until the button is pressed or another USB command is issued.");
  30         PrintAndLog("Per pyramid format, the facility-code is 8-bit and the card number is 16-bit.  Larger values are truncated.");
  31         PrintAndLog("");
  32         PrintAndLog("Usage:  lf pyramid sim <Card-Number>");
  33         PrintAndLog("Options :");
  34         PrintAndLog("  <Facility-Code> :  8-bit value facility code");
  35         PrintAndLog("  <Card Number>   : 16-bit value card number");
  36         PrintAndLog("");
  37         PrintAndLog("Sample  : lf pyramid sim 123 11223");
  38         return 0;
  39 }
  40
  41 // calc checksum
  42 int GetWiegandFromPyramid(const char *id, uint32_t *fc, uint32_t *cn) {
  43         return 0;
  44 }
  45
  46 int GetPyramidBits(uint32_t fc, uint32_t cn, uint8_t *pyramidBits) {
  47
  48         uint8_t pre[128];
  49         memset(pre, 0x00, sizeof(pre));
  50
  51         // format start bit
  52         pre[79] = 1;
  53
  54         // Get 26 wiegand from FacilityCode, CardNumber
  55         uint8_t wiegand[24];
  56         memset(wiegand, 0x00, sizeof(wiegand));
  57         num_to_bytebits(fc, 8, wiegand);
  58         num_to_bytebits(cn, 16, wiegand+8);
  59
  60         // add wiegand parity bits (dest, source, len)
  61         wiegand_add_parity(pre+80, wiegand, 24);
  62
  63         // add paritybits       (bitsource, dest, sourcelen, paritylen, parityType (odd, even,)
  64         addParity(pre+8, pyramidBits+8, 112, 8, 1);
  65
  66         // add checksum
  67         uint8_t csBuff[13];
  68         for (uint8_t i = 0; i < 13; i++)
  69                 csBuff[i] = bytebits_to_byte(pyramidBits + 16 + (i*8), 8);
  70
  71         uint32_t crc = CRC8Maxim(csBuff, 13);
  72         num_to_bytebits(crc, 8, pyramidBits+120);
  73
  74         return 1;
  75 }
  76
  77 int CmdPyramidRead(const char *Cmd) {
  78         // read lf silently
  79         CmdLFRead("s");
  80         // get samples silently
  81         getSamples("30000",false);
  82         // demod and output Pyramid ID
  83         return CmdFSKdemodPyramid("");
  84 }
  85
  86 int CmdPyramidClone(const char *Cmd) {
  87
  88         char cmdp = param_getchar(Cmd, 0);
  89         if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_pyramid_clone();
  90
  91         uint32_t facilitycode=0, cardnumber=0, fc = 0, cn = 0;
  92
  93         uint8_t bs[129];
  94         memset(bs, 0x00, sizeof(bs));
  95
  96         //Pyramid - compat mode, FSK2a, data rate 50, 4 data blocks
  97         uint32_t blocks[5] = {T55x7_MODULATION_FSK2a | T55x7_BITRATE_RF_50 | 4<<T55x7_MAXBLOCK_SHIFT, 0, 0, 0, 0};
  98
  99 //      if (param_getchar(Cmd, 3) == 'Q' || param_getchar(Cmd, 3) == 'q')
 100 //              blocks[0] = T5555_MODULATION_FSK2 | 50<<T5555_BITRATE_SHIFT | 4<<T5555_MAXBLOCK_SHIFT;
 101
 102         if (sscanf(Cmd, "%u %u", &fc, &cn ) != 2) return usage_lf_pyramid_clone();
 103
 104         facilitycode = (fc & 0x000000FF);
 105         cardnumber = (cn & 0x0000FFFF);
 106
 107         // get wiegand from printed number.
 108         //GetWiegandFromPyramid(Cmd, &facilitycode, &cardnumber);
 109
 110         if ( !GetPyramidBits(facilitycode, cardnumber, bs)) {
 111                 PrintAndLog("Error with tag bitstream generation.");
 112                 return 1;
 113         }
 114
 115         blocks[1] = bytebits_to_byte(bs,32);
 116         blocks[2] = bytebits_to_byte(bs+32,32);
 117         blocks[3] = bytebits_to_byte(bs+64,32);
 118         blocks[4] = bytebits_to_byte(bs+96,32);
 119
 120         PrintAndLog("Preparing to clone Farepointe/Pyramid to T55x7 with Facility Code: %u, Card Number: %u", facilitycode, cardnumber);
 121         PrintAndLog("Blk | Data ");
 122         PrintAndLog("----+------------");
 123         for ( uint8_t i=0; i<5; ++i )
 124         PrintAndLog(" %d | %08x",i , blocks[i]);
 125
 126         UsbCommand resp;
 127         UsbCommand c = {CMD_T55XX_WRITE_BLOCK, {0,0,0}};
 128
 129         for ( uint8_t i=0; i<5; ++i ) {
 130                 c.arg[0] = blocks[i];
 131                 c.arg[1] = i;
 132                 clearCommandBuffer();
 133                 SendCommand(&c);
 134                 if (!WaitForResponseTimeout(CMD_ACK, &resp, 1000)){
 135                         PrintAndLog("Error occurred, device did not respond during write operation.");
 136                         return -1;
 137                 }
 138         }
 139     return 0;
 140 }
 141
 142 int CmdPyramidSim(const char *Cmd) {
 143         // uint32_t id = 0;
 144         // uint64_t rawID = 0;
 145         // uint8_t clk = 50, encoding = 1, separator = 0, invert = 0;
 146
 147         char cmdp = param_getchar(Cmd, 0);
 148         if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_pyramid_sim();
 149
 150         // id = param_get32ex(Cmd, 0, 0, 16);
 151         // if (id == 0) return usage_lf_pyramid_sim();
 152
 153         //rawID = getPyramidBits(id);
 154
 155         // uint16_t arg1, arg2;
 156         // size_t size = 64;
 157         // arg1 = clk << 8 | encoding;
 158         // arg2 = invert << 8 | separator;
 159
 160         // PrintAndLog("Simulating - ID: %08X, Raw: %08X%08X",id,(uint32_t)(rawID >> 32),(uint32_t) (rawID & 0xFFFFFFFF));
 161
 162         // UsbCommand c = {CMD_FSK_SIM_TAG, {arg1, arg2, size}};
 163         // num_to_bytebits(rawID, size, c.d.asBytes);
 164         // clearCommandBuffer();
 165         // SendCommand(&c);
 166         return 0;
 167 }
 168
 169 static command_t CommandTable[] = {
 170     {"help",    CmdHelp,                1, "This help"},
 171         {"read",        CmdPyramidRead,  0, "Attempt to read and extract tag data"},
 172         {"clone",       CmdPyramidClone, 0, "<Facility-Code> <Card Number>  clone pyramid tag"},
 173         {"sim",         CmdPyramidSim,   0, "<Facility-Code> <Card Number>  simulate pyramid tag"},
 174     {NULL, NULL, 0, NULL}
 175 };
 176
 177 int CmdLFPyramid(const char *Cmd) {
 178         clearCommandBuffer();
 179     CmdsParse(CommandTable, Cmd);
 180     return 0;
 181 }
 182
 183 int CmdHelp(const char *Cmd) {
 184     CmdsHelp(CommandTable);
 185     return 0;
 186 }