cvs.zerfleddert.de Git - proxmark3-svn/blob

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 #include "proxmark3.h"

13 #include "ui.h"

14 #include "util.h"

15 #include "graph.h"

16 #include "cmdparser.h"

17 #include "cmddata.h"

18 #include "cmdmain.h"

19 #include "cmdlf.h"

20 #include "protocols.h" // for T55xx config register definitions

 #include "lfdemod.h"    // parityTest

22 #include "crc.h"

 static int CmdHelp(const char *Cmd);

 int usage_lf_pyramid_clone(void){

27 PrintAndLog("clone a Farpointe/Pyramid tag to a T55x7 tag.");

28 PrintAndLog("The facility-code is 8-bit and the card number is 16-bit. Larger values are truncated. ");

29 PrintAndLog("Currently work only on 26bit");

30 PrintAndLog("");

31 PrintAndLog("Usage: lf pyramid clone <Facility-Code> <Card-Number>");

32 PrintAndLog("Options :");

33 PrintAndLog(" <Facility-Code> : 8-bit value facility code");

34 PrintAndLog(" <Card Number> : 16-bit value card number");

35 PrintAndLog(" Q5 : optional - clone to Q5 (T5555) instead of T55x7 chip");

36 PrintAndLog("");

37 PrintAndLog("Sample : lf pyramid clone 123 11223");

38 return 0;

39 }

 int usage_lf_pyramid_sim(void) {

42 PrintAndLog("Enables simulation of Farpointe/Pyramid card with specified card number.");

43 PrintAndLog("Simulation runs until the button is pressed or another USB command is issued.");

44 PrintAndLog("The facility-code is 8-bit and the card number is 16-bit. Larger values are truncated.");

45 PrintAndLog("Currently work only on 26bit");

46 PrintAndLog("");

47 PrintAndLog("Usage: lf pyramid sim <Card-Number>");

48 PrintAndLog("Options :");

49 PrintAndLog(" <Facility-Code> : 8-bit value facility code");

50 PrintAndLog(" <Card Number> : 16-bit value card number");

51 PrintAndLog("");

52 PrintAndLog("Sample : lf pyramid sim 123 11223");

53 return 0;

54 }

56 // Works for 26bits.

 int GetPyramidBits(uint32_t fc, uint32_t cn, uint8_t *pyramidBits) {

59 uint8_t pre[128];

         memset(pre, 0x00, sizeof(pre));

62 // format start bit

         pre[79] = 1;

65 // Get 26 wiegand from FacilityCode, CardNumber

66 uint8_t wiegand[24];

         memset(wiegand, 0x00, sizeof(wiegand));

         num_to_bytebits(fc, 8, wiegand);

         num_to_bytebits(cn, 16, wiegand+8);

71 // add wiegand parity bits (dest, source, len)

         wiegand_add_parity(pre+80, wiegand, 24);

74 // add paritybits (bitsource, dest, sourcelen, paritylen, parityType (odd, even,)

         addParity(pre+8, pyramidBits+8, 102, 8, 1);

77 // add checksum

78 uint8_t csBuff[13];

         for (uint8_t i = 0; i < 13; i++)

                 csBuff[i] = bytebits_to_byte(pyramidBits + 16 + (i*8), 8);

         uint32_t crc = CRC8Maxim(csBuff, 13);

         num_to_bytebits(crc, 8, pyramidBits+120);

84 return 1;

85 }

 int CmdPyramidRead(const char *Cmd) {

88 CmdLFRead("s");

         getSamples("30000",false);

         return CmdFSKdemodPyramid("");

91 }

 int CmdPyramidClone(const char *Cmd) {

         char cmdp = param_getchar(Cmd, 0);

         if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_pyramid_clone();

         uint32_t facilitycode=0, cardnumber=0, fc = 0, cn = 0;

99 uint32_t blocks[5];

100 uint8_t i;

101 uint8_t bs[128];

         memset(bs, 0x00, sizeof(bs));

103

         if (sscanf(Cmd, "%u %u", &fc, &cn ) != 2) return usage_lf_pyramid_clone();

105

106 facilitycode = (fc & 0x000000FF);

107 cardnumber = (cn & 0x0000FFFF);

108

         if ( !GetPyramidBits(facilitycode, cardnumber, bs)) {

110 PrintAndLog("Error with tag bitstream generation.");

111 return 1;

112 }

113

114 //Pyramid - compat mode, FSK2a, data rate 50, 4 data blocks

         blocks[0] = T55x7_MODULATION_FSK2a | T55x7_BITRATE_RF_50 | 4<<T55x7_MAXBLOCK_SHIFT;

116

         if (param_getchar(Cmd, 3) == 'Q' || param_getchar(Cmd, 3) == 'q')

                 blocks[0] = T5555_MODULATION_FSK2 | T5555_INVERT_OUTPUT | 50<<T5555_BITRATE_SHIFT | 4<<T5555_MAXBLOCK_SHIFT;

119

         blocks[1] = bytebits_to_byte(bs,32);

         blocks[2] = bytebits_to_byte(bs+32,32);

         blocks[3] = bytebits_to_byte(bs+64,32);

         blocks[4] = bytebits_to_byte(bs+96,32);

124

         PrintAndLog("Preparing to clone Farpointe/Pyramid to T55x7 with Facility Code: %u, Card Number: %u", facilitycode, cardnumber);

126 PrintAndLog("Blk | Data ");

127 PrintAndLog("----+------------");

         for ( i = 0; i<5; ++i )

                 PrintAndLog(" %02d | %08" PRIx32, i, blocks[i]);

130

131 UsbCommand resp;

         UsbCommand c = {CMD_T55XX_WRITE_BLOCK, {0,0,0}};

133

         for ( i = 0; i<5; ++i ) {

                 c.arg[0] = blocks[i];

                 c.arg[1] = i;

137 clearCommandBuffer();

138 SendCommand(&c);

                 if (!WaitForResponseTimeout(CMD_ACK, &resp, 1000)){

140 PrintAndLog("Error occurred, device did not respond during write operation.");

141 return -1;

142 }

143 }

144 return 0;

145 }

146

 int CmdPyramidSim(const char *Cmd) {

148

         char cmdp = param_getchar(Cmd, 0);

         if (strlen(Cmd) == 0 || cmdp == 'h' || cmdp == 'H') return usage_lf_pyramid_sim();

151

         uint32_t facilitycode = 0, cardnumber = 0, fc = 0, cn = 0;

153

154 uint8_t bs[128];

         size_t size = sizeof(bs);

         memset(bs, 0x00, size);

157

158 // Pyramid uses: fcHigh: 10, fcLow: 8, clk: 50, invert: 0

159 uint64_t arg1, arg2;

         arg1 = (10 << 8) + 8;

         arg2 = 50 | 0;

162

         if (sscanf(Cmd, "%u %u", &fc, &cn ) != 2) return usage_lf_pyramid_sim();

164

165 facilitycode = (fc & 0x000000FF);

166 cardnumber = (cn & 0x0000FFFF);

167

         if ( !GetPyramidBits(facilitycode, cardnumber, bs)) {

169 PrintAndLog("Error with tag bitstream generation.");

170 return 1;

171 }

172

         PrintAndLog("Simulating Farpointe/Pyramid - Facility Code: %u, CardNumber: %u", facilitycode, cardnumber );

174

         UsbCommand c = {CMD_FSK_SIM_TAG, {arg1, arg2, size}};

         memcpy(c.d.asBytes, bs, size);

177 clearCommandBuffer();

178 SendCommand(&c);

179 return 0;

180 }

181

182 static command_t CommandTable[] = {

         {"help",  CmdHelp,         1, "This help"},

         {"read",  CmdPyramidRead,  0, "Attempt to read and extract tag data"},

         {"clone", CmdPyramidClone, 0, "<Facility-Code> <Card Number>  clone pyramid tag"},

         {"sim",   CmdPyramidSim,   0, "<Facility-Code> <Card Number>  simulate pyramid tag"},

         {NULL, NULL, 0, NULL}

188 };

189

 int CmdLFPyramid(const char *Cmd) {

191 clearCommandBuffer();

192 CmdsParse(CommandTable, Cmd);

193 return 0;

194 }

195

 int CmdHelp(const char *Cmd) {

197 CmdsHelp(CommandTable);

198 return 0;

199 }