]> git.zerfleddert.de Git - proxmark3-svn/blame - armsrc/appmain.c
ADD: added the possibility to choose which block num to attack with "hf mf mifare...
[proxmark3-svn] / armsrc / appmain.c
CommitLineData
15c4dc5a 1//-----------------------------------------------------------------------------
15c4dc5a 2// Jonathan Westhues, Mar 2006
3// Edits by Gerhard de Koning Gans, Sep 2007 (##)
bd20f8f4 4//
5// This code is licensed to you under the terms of the GNU GPL, version 2 or,
6// at your option, any later version. See the LICENSE.txt file for the text of
7// the license.
8//-----------------------------------------------------------------------------
9// The main application code. This is the first thing called after start.c
10// executes.
15c4dc5a 11//-----------------------------------------------------------------------------
12
c3c241f3 13#include "usb_cdc.h"
14#include "cmd.h"
15
16#include "proxmark3.h"
15c4dc5a 17#include "apps.h"
f7e3ed82 18#include "util.h"
9ab7a6c7 19#include "printf.h"
20#include "string.h"
22e24700 21
9ab7a6c7 22#include <stdarg.h>
22e24700 23
15c4dc5a 24#include "legicrf.h"
c3c241f3 25#include <hitag2.h>
31abe49f 26#include "lfsampling.h"
3000dc4e 27#include "BigBuf.h"
7838f4be 28#include "mifareutil.h"
36804420 29#include "pcf7931.h"
15c4dc5a 30#ifdef WITH_LCD
902cb3c0 31 #include "LCD.h"
15c4dc5a 32#endif
33
7838f4be 34// Craig Young - 14a stand-alone code
35#ifdef WITH_ISO14443a_StandAlone
36 #include "iso14443a.h"
c2731f37 37 #include "protocols.h"
7838f4be 38#endif
39
15c4dc5a 40#define abs(x) ( ((x)<0) ? -(x) : (x) )
41
42//=============================================================================
43// A buffer where we can queue things up to be sent through the FPGA, for
44// any purpose (fake tag, as reader, whatever). We go MSB first, since that
45// is the order in which they go out on the wire.
46//=============================================================================
47
6a1f2d82 48#define TOSEND_BUFFER_SIZE (9*MAX_FRAME_SIZE + 1 + 1 + 2) // 8 data bits and 1 parity bit per payload byte, 1 correction bit, 1 SOC bit, 2 EOC bits
a501c82b 49uint8_t ToSend[TOSEND_BUFFER_SIZE];
7838f4be 50int ToSendMax = 0;
15c4dc5a 51static int ToSendBit;
52struct common_area common_area __attribute__((section(".commonarea")));
53
15c4dc5a 54void ToSendReset(void)
55{
56 ToSendMax = -1;
57 ToSendBit = 8;
58}
59
60void ToSendStuffBit(int b)
61{
62 if(ToSendBit >= 8) {
63 ToSendMax++;
64 ToSend[ToSendMax] = 0;
65 ToSendBit = 0;
66 }
67
68 if(b) {
69 ToSend[ToSendMax] |= (1 << (7 - ToSendBit));
70 }
71
72 ToSendBit++;
73
6a1f2d82 74 if(ToSendMax >= sizeof(ToSend)) {
15c4dc5a 75 ToSendBit = 0;
76 DbpString("ToSendStuffBit overflowed!");
77 }
78}
79
80//=============================================================================
81// Debug print functions, to go out over USB, to the usual PC-side client.
82//=============================================================================
83
84void DbpString(char *str)
85{
9440213d 86 byte_t len = strlen(str);
87 cmd_send(CMD_DEBUG_PRINT_STRING,len,0,0,(byte_t*)str,len);
15c4dc5a 88}
89
90#if 0
91void DbpIntegers(int x1, int x2, int x3)
92{
902cb3c0 93 cmd_send(CMD_DEBUG_PRINT_INTEGERS,x1,x2,x3,0,0);
15c4dc5a 94}
95#endif
96
97void Dbprintf(const char *fmt, ...) {
98// should probably limit size here; oh well, let's just use a big buffer
99 char output_string[128];
100 va_list ap;
101
102 va_start(ap, fmt);
103 kvsprintf(fmt, output_string, 10, ap);
104 va_end(ap);
e30c654b 105
15c4dc5a 106 DbpString(output_string);
107}
108
9455b51c 109// prints HEX & ASCII
d19929cb 110void Dbhexdump(int len, uint8_t *d, bool bAsci) {
9455b51c 111 int l=0,i;
112 char ascii[9];
d19929cb 113
9455b51c 114 while (len>0) {
115 if (len>8) l=8;
116 else l=len;
117
118 memcpy(ascii,d,l);
d19929cb 119 ascii[l]=0;
9455b51c 120
121 // filter safe ascii
d19929cb 122 for (i=0;i<l;i++)
9455b51c 123 if (ascii[i]<32 || ascii[i]>126) ascii[i]='.';
d19929cb 124
125 if (bAsci) {
126 Dbprintf("%-8s %*D",ascii,l,d," ");
127 } else {
128 Dbprintf("%*D",l,d," ");
129 }
130
9455b51c 131 len-=8;
132 d+=8;
133 }
134}
135
15c4dc5a 136//-----------------------------------------------------------------------------
137// Read an ADC channel and block till it completes, then return the result
138// in ADC units (0 to 1023). Also a routine to average 32 samples and
139// return that.
140//-----------------------------------------------------------------------------
141static int ReadAdc(int ch)
142{
f7e3ed82 143 uint32_t d;
15c4dc5a 144
145 AT91C_BASE_ADC->ADC_CR = AT91C_ADC_SWRST;
146 AT91C_BASE_ADC->ADC_MR =
3b692427 147 ADC_MODE_PRESCALE(63 /* was 32 */) | // ADC_CLK = MCK / ((63+1) * 2) = 48MHz / 128 = 375kHz
148 ADC_MODE_STARTUP_TIME(1 /* was 16 */) | // Startup Time = (1+1) * 8 / ADC_CLK = 16 / 375kHz = 42,7us Note: must be > 20us
149 ADC_MODE_SAMPLE_HOLD_TIME(15 /* was 8 */); // Sample & Hold Time SHTIM = 15 / ADC_CLK = 15 / 375kHz = 40us
150
151 // Note: ADC_MODE_PRESCALE and ADC_MODE_SAMPLE_HOLD_TIME are set to the maximum allowed value.
152 // Both AMPL_LO and AMPL_HI are very high impedance (10MOhm) outputs, the input capacitance of the ADC is 12pF (typical). This results in a time constant
153 // of RC = 10MOhm * 12pF = 120us. Even after the maximum configurable sample&hold time of 40us the input capacitor will not be fully charged.
154 //
155 // The maths are:
156 // If there is a voltage v_in at the input, the voltage v_cap at the capacitor (this is what we are measuring) will be
157 //
158 // v_cap = v_in * (1 - exp(-RC/SHTIM)) = v_in * (1 - exp(-3)) = v_in * 0,95 (i.e. an error of 5%)
159 //
160 // Note: with the "historic" values in the comments above, the error was 34% !!!
161
15c4dc5a 162 AT91C_BASE_ADC->ADC_CHER = ADC_CHANNEL(ch);
163
164 AT91C_BASE_ADC->ADC_CR = AT91C_ADC_START;
3b692427 165
15c4dc5a 166 while(!(AT91C_BASE_ADC->ADC_SR & ADC_END_OF_CONVERSION(ch)))
167 ;
168 d = AT91C_BASE_ADC->ADC_CDR[ch];
169
170 return d;
171}
172
9ca155ba 173int AvgAdc(int ch) // was static - merlok
15c4dc5a 174{
175 int i;
176 int a = 0;
177
178 for(i = 0; i < 32; i++) {
179 a += ReadAdc(ch);
180 }
181
182 return (a + 15) >> 5;
183}
184
185void MeasureAntennaTuning(void)
186{
d3499d36 187 uint8_t LF_Results[256];
9f693930 188 int i, adcval = 0, peak = 0, peakv = 0, peakf = 0; //ptr = 0
15c4dc5a 189 int vLf125 = 0, vLf134 = 0, vHf = 0; // in mV
190
7838f4be 191 LED_B_ON();
15c4dc5a 192
193/*
194 * Sweeps the useful LF range of the proxmark from
195 * 46.8kHz (divisor=255) to 600kHz (divisor=19) and
196 * read the voltage in the antenna, the result left
197 * in the buffer is a graph which should clearly show
198 * the resonating frequency of your LF antenna
199 * ( hopefully around 95 if it is tuned to 125kHz!)
200 */
d19929cb 201
7cc204bf 202 FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
b014c96d 203 FpgaWriteConfWord(FPGA_MAJOR_MODE_LF_ADC | FPGA_LF_ADC_READER_FIELD);
d3499d36 204 for (i=255; i>=19; i--) {
d19929cb 205 WDT_HIT();
15c4dc5a 206 FpgaSendCommand(FPGA_CMD_SET_DIVISOR, i);
207 SpinDelay(20);
3b692427 208 adcval = ((MAX_ADC_LF_VOLTAGE * AvgAdc(ADC_CHAN_LF)) >> 10);
15c4dc5a 209 if (i==95) vLf125 = adcval; // voltage at 125Khz
210 if (i==89) vLf134 = adcval; // voltage at 134Khz
211
d3499d36 212 LF_Results[i] = adcval>>8; // scale int to fit in byte for graphing purposes
213 if(LF_Results[i] > peak) {
15c4dc5a 214 peakv = adcval;
d3499d36 215 peak = LF_Results[i];
15c4dc5a 216 peakf = i;
9f693930 217 //ptr = i;
15c4dc5a 218 }
219 }
220
d3499d36 221 for (i=18; i >= 0; i--) LF_Results[i] = 0;
222
7838f4be 223 LED_A_ON();
15c4dc5a 224 // Let the FPGA drive the high-frequency antenna around 13.56 MHz.
7838f4be 225 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
15c4dc5a 226 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR);
227 SpinDelay(20);
3b692427 228 vHf = (MAX_ADC_HF_VOLTAGE * AvgAdc(ADC_CHAN_HF)) >> 10;
15c4dc5a 229
3b692427 230 cmd_send(CMD_MEASURED_ANTENNA_TUNING, vLf125 | (vLf134<<16), vHf, peakf | (peakv<<16), LF_Results, 256);
d19929cb 231 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
7838f4be 232 LED_A_OFF();
233 LED_B_OFF();
d19929cb 234 return;
15c4dc5a 235}
236
237void MeasureAntennaTuningHf(void)
238{
239 int vHf = 0; // in mV
240
241 DbpString("Measuring HF antenna, press button to exit");
242
3b692427 243 // Let the FPGA drive the high-frequency antenna around 13.56 MHz.
244 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
245 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR);
246
15c4dc5a 247 for (;;) {
15c4dc5a 248 SpinDelay(20);
3b692427 249 vHf = (MAX_ADC_HF_VOLTAGE * AvgAdc(ADC_CHAN_HF)) >> 10;
e30c654b 250
15c4dc5a 251 Dbprintf("%d mV",vHf);
252 if (BUTTON_PRESS()) break;
253 }
254 DbpString("cancelled");
3b692427 255
256 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
257
15c4dc5a 258}
259
260
15c4dc5a 261void ReadMem(int addr)
262{
f7e3ed82 263 const uint8_t *data = ((uint8_t *)addr);
15c4dc5a 264
265 Dbprintf("%x: %02x %02x %02x %02x %02x %02x %02x %02x",
266 addr, data[0], data[1], data[2], data[3], data[4], data[5], data[6], data[7]);
267}
268
269/* osimage version information is linked in */
270extern struct version_information version_information;
271/* bootrom version information is pointed to from _bootphase1_version_pointer */
9783989b 272extern char *_bootphase1_version_pointer, _flash_start, _flash_end, _bootrom_start, _bootrom_end, __data_src_start__;
15c4dc5a 273void SendVersion(void)
274{
9783989b 275 char temp[USB_CMD_DATA_SIZE]; /* Limited data payload in USB packets */
276 char VersionString[USB_CMD_DATA_SIZE] = { '\0' };
e30c654b 277
278 /* Try to find the bootrom version information. Expect to find a pointer at
15c4dc5a 279 * symbol _bootphase1_version_pointer, perform slight sanity checks on the
280 * pointer, then use it.
281 */
282 char *bootrom_version = *(char**)&_bootphase1_version_pointer;
283 if( bootrom_version < &_flash_start || bootrom_version >= &_flash_end ) {
9783989b 284 strcat(VersionString, "bootrom version information appears invalid\n");
15c4dc5a 285 } else {
286 FormatVersionInformation(temp, sizeof(temp), "bootrom: ", bootrom_version);
9783989b 287 strncat(VersionString, temp, sizeof(VersionString) - strlen(VersionString) - 1);
15c4dc5a 288 }
e30c654b 289
15c4dc5a 290 FormatVersionInformation(temp, sizeof(temp), "os: ", &version_information);
9783989b 291 strncat(VersionString, temp, sizeof(VersionString) - strlen(VersionString) - 1);
e30c654b 292
9783989b 293 FpgaGatherVersion(FPGA_BITSTREAM_LF, temp, sizeof(temp));
294 strncat(VersionString, temp, sizeof(VersionString) - strlen(VersionString) - 1);
295 FpgaGatherVersion(FPGA_BITSTREAM_HF, temp, sizeof(temp));
296 strncat(VersionString, temp, sizeof(VersionString) - strlen(VersionString) - 1);
297
298 // Send Chip ID and used flash memory
299 uint32_t text_and_rodata_section_size = (uint32_t)&__data_src_start__ - (uint32_t)&_flash_start;
300 uint32_t compressed_data_section_size = common_area.arg1;
301 cmd_send(CMD_ACK, *(AT91C_DBGU_CIDR), text_and_rodata_section_size + compressed_data_section_size, 0, VersionString, strlen(VersionString));
15c4dc5a 302}
f62b5e12 303
304// measure the USB Speed by sending SpeedTestBufferSize bytes to client and measuring the elapsed time.
305// Note: this mimics GetFromBigbuf(), i.e. we have the overhead of the UsbCommand structure included.
0de8e387 306void printUSBSpeed(void)
f62b5e12 307{
308 Dbprintf("USB Speed:");
0de8e387 309 Dbprintf(" Sending USB packets to client...");
f62b5e12 310
0de8e387 311 #define USB_SPEED_TEST_MIN_TIME 1500 // in milliseconds
f62b5e12 312 uint8_t *test_data = BigBuf_get_addr();
0de8e387 313 uint32_t end_time;
f62b5e12 314
0de8e387 315 uint32_t start_time = end_time = GetTickCount();
316 uint32_t bytes_transferred = 0;
f62b5e12 317
318 LED_B_ON();
0de8e387 319 while(end_time < start_time + USB_SPEED_TEST_MIN_TIME) {
320 cmd_send(CMD_DOWNLOADED_RAW_ADC_SAMPLES_125K, 0, USB_CMD_DATA_SIZE, 0, test_data, USB_CMD_DATA_SIZE);
321 end_time = GetTickCount();
322 bytes_transferred += USB_CMD_DATA_SIZE;
f62b5e12 323 }
324 LED_B_OFF();
325
0de8e387 326 Dbprintf(" Time elapsed: %dms", end_time - start_time);
327 Dbprintf(" Bytes transferred: %d", bytes_transferred);
328 Dbprintf(" USB Transfer Speed PM3 -> Client = %d Bytes/s",
329 1000 * bytes_transferred / (end_time - start_time));
f62b5e12 330
331}
332
7838f4be 333/**
334 * Prints runtime information about the PM3.
335**/
0de8e387 336void SendStatus(void)
15c4dc5a 337{
7838f4be 338 BigBuf_print_status();
339 Fpga_print_status();
340 printConfig(); //LF Sampling config
0de8e387 341 printUSBSpeed();
7838f4be 342 Dbprintf("Various");
f62b5e12 343 Dbprintf(" MF_DBGLEVEL........%d", MF_DBGLEVEL);
344 Dbprintf(" ToSendMax..........%d", ToSendMax);
345 Dbprintf(" ToSendBit..........%d", ToSendBit);
346 Dbprintf(" ToSend BUFFERSIZE..%d", TOSEND_BUFFER_SIZE);
347
348 cmd_send(CMD_ACK,1,0,0,0,0);
7838f4be 349}
15c4dc5a 350
7838f4be 351#if defined(WITH_ISO14443a_StandAlone) || defined(WITH_LF)
15c4dc5a 352
7838f4be 353#define OPTS 2
7838f4be 354void StandAloneMode()
355{
356 DbpString("Stand-alone mode! No PC necessary.");
15c4dc5a 357 // Oooh pretty -- notify user we're in elite samy mode now
358 LED(LED_RED, 200);
359 LED(LED_ORANGE, 200);
360 LED(LED_GREEN, 200);
361 LED(LED_ORANGE, 200);
362 LED(LED_RED, 200);
363 LED(LED_ORANGE, 200);
364 LED(LED_GREEN, 200);
365 LED(LED_ORANGE, 200);
366 LED(LED_RED, 200);
7838f4be 367}
7838f4be 368#endif
369
7838f4be 370#ifdef WITH_ISO14443a_StandAlone
371void StandAloneMode14a()
372{
373 StandAloneMode();
374 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
375
376 int selected = 0;
0db6ed9a 377 int playing = 0, iGotoRecord = 0, iGotoClone = 0;
7838f4be 378 int cardRead[OPTS] = {0};
379 uint8_t readUID[10] = {0};
380 uint32_t uid_1st[OPTS]={0};
381 uint32_t uid_2nd[OPTS]={0};
0db6ed9a 382 uint32_t uid_tmp1 = 0;
383 uint32_t uid_tmp2 = 0;
384 iso14a_card_select_t hi14a_card[OPTS];
7838f4be 385
c2731f37 386 uint8_t params = (MAGIC_SINGLE | MAGIC_DATAIN);
387
7838f4be 388 LED(selected + 1, 0);
389
390 for (;;)
391 {
392 usb_poll();
393 WDT_HIT();
7838f4be 394 SpinDelay(300);
395
0db6ed9a 396 if (iGotoRecord == 1 || cardRead[selected] == 0)
7838f4be 397 {
0db6ed9a 398 iGotoRecord = 0;
7838f4be 399 LEDsoff();
400 LED(selected + 1, 0);
401 LED(LED_RED2, 0);
402
403 // record
404 Dbprintf("Enabling iso14443a reader mode for [Bank: %u]...", selected);
7838f4be 405 /* need this delay to prevent catching some weird data */
406 SpinDelay(500);
407 /* Code for reading from 14a tag */
810f5379 408 uint8_t uid[10] = {0};
409 uint32_t cuid = 0;
7838f4be 410 iso14443a_setup(FPGA_HF_ISO14443A_READER_MOD);
411
412 for ( ; ; )
413 {
414 WDT_HIT();
0db6ed9a 415 if (BUTTON_PRESS()) {
416 if (cardRead[selected]) {
417 Dbprintf("Button press detected -- replaying card in bank[%d]", selected);
418 break;
419 }
420 else if (cardRead[(selected+1)%OPTS]) {
421 Dbprintf("Button press detected but no card in bank[%d] so playing from bank[%d]", selected, (selected+1)%OPTS);
422 selected = (selected+1)%OPTS;
423 break; // playing = 1;
424 }
425 else {
426 Dbprintf("Button press detected but no stored tag to play. (Ignoring button)");
427 SpinDelay(300);
428 }
429 }
c188b1b9 430 if (!iso14443a_select_card(uid, &hi14a_card[selected], &cuid, true, 0))
7838f4be 431 continue;
432 else
433 {
434 Dbprintf("Read UID:"); Dbhexdump(10,uid,0);
435 memcpy(readUID,uid,10*sizeof(uint8_t));
0db6ed9a 436 uint8_t *dst = (uint8_t *)&uid_tmp1;
7838f4be 437 // Set UID byte order
438 for (int i=0; i<4; i++)
439 dst[i] = uid[3-i];
0db6ed9a 440 dst = (uint8_t *)&uid_tmp2;
7838f4be 441 for (int i=0; i<4; i++)
442 dst[i] = uid[7-i];
0db6ed9a 443 if (uid_1st[(selected+1)%OPTS] == uid_tmp1 && uid_2nd[(selected+1)%OPTS] == uid_tmp2) {
444 Dbprintf("Card selected has same UID as what is stored in the other bank. Skipping.");
445 }
446 else {
447 if (uid_tmp2) {
448 Dbprintf("Bank[%d] received a 7-byte UID",selected);
449 uid_1st[selected] = (uid_tmp1)>>8;
450 uid_2nd[selected] = (uid_tmp1<<24) + (uid_tmp2>>8);
451 }
452 else {
453 Dbprintf("Bank[%d] received a 4-byte UID",selected);
454 uid_1st[selected] = uid_tmp1;
455 uid_2nd[selected] = uid_tmp2;
456 }
7838f4be 457 break;
458 }
459 }
0db6ed9a 460 }
461 Dbprintf("ATQA = %02X%02X",hi14a_card[selected].atqa[0],hi14a_card[selected].atqa[1]);
462 Dbprintf("SAK = %02X",hi14a_card[selected].sak);
7838f4be 463 LEDsoff();
464 LED(LED_GREEN, 200);
465 LED(LED_ORANGE, 200);
466 LED(LED_GREEN, 200);
467 LED(LED_ORANGE, 200);
468
469 LEDsoff();
470 LED(selected + 1, 0);
7838f4be 471
0db6ed9a 472 // Next state is replay:
473 playing = 1;
7838f4be 474
475 cardRead[selected] = 1;
7838f4be 476 }
0db6ed9a 477 /* MF Classic UID clone */
478 else if (iGotoClone==1)
7838f4be 479 {
0db6ed9a 480 iGotoClone=0;
c2731f37 481 LEDsoff();
482 LED(selected + 1, 0);
483 LED(LED_ORANGE, 250);
7838f4be 484
c2731f37 485 // record
486 Dbprintf("Preparing to Clone card [Bank: %x]; uid: %08x", selected, uid_1st[selected]);
7838f4be 487
c2731f37 488 // wait for button to be released
489 // Delay cloning until card is in place
490 while(BUTTON_PRESS())
491 WDT_HIT();
7838f4be 492
c2731f37 493 Dbprintf("Starting clone. [Bank: %u]", selected);
494 // need this delay to prevent catching some weird data
495 SpinDelay(500);
496 // Begin clone function here:
497 /* Example from client/mifarehost.c for commanding a block write for "magic Chinese" cards:
498 UsbCommand c = {CMD_MIFARE_CSETBLOCK, {params & (0xFE | (uid == NULL ? 0:1)), blockNo, 0}};
499 memcpy(c.d.asBytes, data, 16);
500 SendCommand(&c);
501
502 Block read is similar:
503 UsbCommand c = {CMD_MIFARE_CGETBLOCK, {params, blockNo, 0}};
504 We need to imitate that call with blockNo 0 to set a uid.
505
506 The get and set commands are handled in this file:
507 // Work with "magic Chinese" card
508 case CMD_MIFARE_CSETBLOCK:
509 MifareCSetBlock(c->arg[0], c->arg[1], c->d.asBytes);
510 break;
511 case CMD_MIFARE_CGETBLOCK:
512 MifareCGetBlock(c->arg[0], c->arg[1], c->d.asBytes);
513 break;
514
515 mfCSetUID provides example logic for UID set workflow:
516 -Read block0 from card in field with MifareCGetBlock()
517 -Configure new values without replacing reserved bytes
518 memcpy(block0, uid, 4); // Copy UID bytes from byte array
519 // Mifare UID BCC
520 block0[4] = block0[0]^block0[1]^block0[2]^block0[3]; // BCC on byte 5
521 Bytes 5-7 are reserved SAK and ATQA for mifare classic
522 -Use mfCSetBlock(0, block0, oldUID, wantWipe, MAGIC_SINGLE) to write it
523 */
524 uint8_t oldBlock0[16] = {0}, newBlock0[16] = {0}, testBlock0[16] = {0};
525 // arg0 = Flags, arg1=blockNo
526 MifareCGetBlock(params, 0, oldBlock0);
0db6ed9a 527 if (oldBlock0[0] == 0 && oldBlock0[0] == oldBlock0[1] && oldBlock0[1] == oldBlock0[2] && oldBlock0[2] == oldBlock0[3]) {
528 Dbprintf("No changeable tag detected. Returning to replay mode for bank[%d]", selected);
529 playing = 1;
530 }
531 else {
c2731f37 532 Dbprintf("UID from target tag: %02X%02X%02X%02X", oldBlock0[0],oldBlock0[1],oldBlock0[2],oldBlock0[3]);
533 memcpy(newBlock0,oldBlock0,16);
534 // Copy uid_1st for bank (2nd is for longer UIDs not supported if classic)
535
536 newBlock0[0] = uid_1st[selected]>>24;
537 newBlock0[1] = 0xFF & (uid_1st[selected]>>16);
538 newBlock0[2] = 0xFF & (uid_1st[selected]>>8);
539 newBlock0[3] = 0xFF & (uid_1st[selected]);
540 newBlock0[4] = newBlock0[0]^newBlock0[1]^newBlock0[2]^newBlock0[3];
541
542 // arg0 = workFlags, arg1 = blockNo, datain
543 MifareCSetBlock(params, 0, newBlock0);
544 MifareCGetBlock(params, 0, testBlock0);
545
546 if (memcmp(testBlock0, newBlock0, 16)==0) {
547 DbpString("Cloned successfull!");
548 cardRead[selected] = 0; // Only if the card was cloned successfully should we clear it
7838f4be 549 playing = 0;
0db6ed9a 550 iGotoRecord = 1;
c2731f37 551 selected = (selected + 1) % OPTS;
552 } else {
0db6ed9a 553 Dbprintf("Clone failed. Back to replay mode on bank[%d]", selected);
554 playing = 1;
555 }
556 }
557 LEDsoff();
558 LED(selected + 1, 0);
7838f4be 559 }
560 // Change where to record (or begin playing)
0db6ed9a 561 else if (playing==1) // button_pressed == BUTTON_SINGLE_CLICK && cardRead[selected])
7838f4be 562 {
7838f4be 563 LEDsoff();
564 LED(selected + 1, 0);
565
566 // Begin transmitting
567 if (playing)
568 {
569 LED(LED_GREEN, 0);
570 DbpString("Playing");
0db6ed9a 571 for ( ; ; ) {
572 WDT_HIT();
573 int button_action = BUTTON_HELD(1000);
574 if (button_action == 0) { // No button action, proceed with sim
575 uint8_t data[512] = {0}; // in case there is a read command received we shouldn't break
576 uint8_t flags = ( uid_2nd[selected] > 0x00 ) ? FLAG_7B_UID_IN_DATA : FLAG_4B_UID_IN_DATA;
577 num_to_bytes(uid_1st[selected], 3, data);
578 num_to_bytes(uid_2nd[selected], 4, data);
579
7838f4be 580 Dbprintf("Simulating ISO14443a tag with uid[0]: %08x, uid[1]: %08x [Bank: %u]", uid_1st[selected],uid_2nd[selected],selected);
0db6ed9a 581 if (hi14a_card[selected].sak == 8 && hi14a_card[selected].atqa[0] == 4 && hi14a_card[selected].atqa[1] == 0) {
582 DbpString("Mifare Classic");
583 SimulateIso14443aTag(1, flags, data); // Mifare Classic
584 }
585 else if (hi14a_card[selected].sak == 0 && hi14a_card[selected].atqa[0] == 0x44 && hi14a_card[selected].atqa[1] == 0) {
586 DbpString("Mifare Ultralight");
587 SimulateIso14443aTag(2, flags, data); // Mifare Ultralight
588 }
589 else if (hi14a_card[selected].sak == 20 && hi14a_card[selected].atqa[0] == 0x44 && hi14a_card[selected].atqa[1] == 3) {
590 DbpString("Mifare DESFire");
591 SimulateIso14443aTag(3, flags, data); // Mifare DESFire
592 }
593 else {
594 Dbprintf("Unrecognized tag type -- defaulting to Mifare Classic emulation");
595 SimulateIso14443aTag(1, flags, data);
596 }
597 }
598 else if (button_action == BUTTON_SINGLE_CLICK) {
599 selected = (selected + 1) % OPTS;
600 Dbprintf("Done playing. Switching to record mode on bank %d",selected);
601 iGotoRecord = 1;
602 break;
603 }
604 else if (button_action == BUTTON_HOLD) {
605 Dbprintf("Playtime over. Begin cloning...");
606 iGotoClone = 1;
607 break;
7838f4be 608 }
0db6ed9a 609 WDT_HIT();
610 }
7838f4be 611
612 /* We pressed a button so ignore it here with a delay */
613 SpinDelay(300);
7838f4be 614 LEDsoff();
615 LED(selected + 1, 0);
616 }
617 else
618 while(BUTTON_PRESS())
619 WDT_HIT();
620 }
621 }
622}
623#elif WITH_LF
624// samy's sniff and repeat routine
625void SamyRun()
626{
627 StandAloneMode();
628 FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
629
630 int high[OPTS], low[OPTS];
15c4dc5a 631 int selected = 0;
632 int playing = 0;
72e930ef 633 int cardRead = 0;
15c4dc5a 634
635 // Turn on selected LED
636 LED(selected + 1, 0);
637
614da335 638 for (;;) {
6e82300d 639 usb_poll();
95e63594 640 WDT_HIT();
15c4dc5a 641
642 // Was our button held down or pressed?
643 int button_pressed = BUTTON_HELD(1000);
644 SpinDelay(300);
645
646 // Button was held for a second, begin recording
72e930ef 647 if (button_pressed > 0 && cardRead == 0)
15c4dc5a 648 {
649 LEDsoff();
650 LED(selected + 1, 0);
651 LED(LED_RED2, 0);
652
653 // record
654 DbpString("Starting recording");
655
656 // wait for button to be released
657 while(BUTTON_PRESS())
658 WDT_HIT();
659
660 /* need this delay to prevent catching some weird data */
661 SpinDelay(500);
662
663 CmdHIDdemodFSK(1, &high[selected], &low[selected], 0);
664 Dbprintf("Recorded %x %x %x", selected, high[selected], low[selected]);
665
666 LEDsoff();
667 LED(selected + 1, 0);
668 // Finished recording
15c4dc5a 669 // If we were previously playing, set playing off
670 // so next button push begins playing what we recorded
614da335 671 playing = 0;
672 cardRead = 1;
72e930ef 673 }
614da335 674 else if (button_pressed > 0 && cardRead == 1) {
675 LEDsoff();
676 LED(selected + 1, 0);
677 LED(LED_ORANGE, 0);
72e930ef 678
614da335 679 // record
680 Dbprintf("Cloning %x %x %x", selected, high[selected], low[selected]);
72e930ef 681
614da335 682 // wait for button to be released
683 while(BUTTON_PRESS())
684 WDT_HIT();
72e930ef 685
614da335 686 /* need this delay to prevent catching some weird data */
687 SpinDelay(500);
72e930ef 688
614da335 689 CopyHIDtoT55x7(high[selected], low[selected], 0, 0);
690 Dbprintf("Cloned %x %x %x", selected, high[selected], low[selected]);
72e930ef 691
614da335 692 LEDsoff();
693 LED(selected + 1, 0);
694 // Finished recording
72e930ef 695
614da335 696 // If we were previously playing, set playing off
697 // so next button push begins playing what we recorded
698 playing = 0;
699 cardRead = 0;
15c4dc5a 700 }
701
702 // Change where to record (or begin playing)
614da335 703 else if (button_pressed) {
15c4dc5a 704 // Next option if we were previously playing
705 if (playing)
706 selected = (selected + 1) % OPTS;
707 playing = !playing;
708
709 LEDsoff();
710 LED(selected + 1, 0);
711
712 // Begin transmitting
713 if (playing)
714 {
715 LED(LED_GREEN, 0);
716 DbpString("Playing");
717 // wait for button to be released
718 while(BUTTON_PRESS())
719 WDT_HIT();
0d5ee8e2 720
15c4dc5a 721 Dbprintf("%x %x %x", selected, high[selected], low[selected]);
0d5ee8e2 722 CmdHIDsimTAG(high[selected], low[selected], 0);
15c4dc5a 723 DbpString("Done playing");
0d5ee8e2 724
725 if (BUTTON_HELD(1000) > 0) {
15c4dc5a 726 DbpString("Exiting");
727 LEDsoff();
728 return;
0d5ee8e2 729 }
15c4dc5a 730
731 /* We pressed a button so ignore it here with a delay */
732 SpinDelay(300);
733
734 // when done, we're done playing, move to next option
735 selected = (selected + 1) % OPTS;
736 playing = !playing;
737 LEDsoff();
738 LED(selected + 1, 0);
739 }
740 else
741 while(BUTTON_PRESS())
742 WDT_HIT();
743 }
744 }
745}
15c4dc5a 746
7838f4be 747#endif
15c4dc5a 748/*
749OBJECTIVE
750Listen and detect an external reader. Determine the best location
751for the antenna.
752
753INSTRUCTIONS:
754Inside the ListenReaderField() function, there is two mode.
755By default, when you call the function, you will enter mode 1.
756If you press the PM3 button one time, you will enter mode 2.
757If you press the PM3 button a second time, you will exit the function.
758
759DESCRIPTION OF MODE 1:
760This mode just listens for an external reader field and lights up green
761for HF and/or red for LF. This is the original mode of the detectreader
762function.
763
764DESCRIPTION OF MODE 2:
765This mode will visually represent, using the LEDs, the actual strength of the
766current compared to the maximum current detected. Basically, once you know
767what kind of external reader is present, it will help you spot the best location to place
768your antenna. You will probably not get some good results if there is a LF and a HF reader
769at the same place! :-)
770
771LIGHT SCHEME USED:
772*/
773static const char LIGHT_SCHEME[] = {
774 0x0, /* ---- | No field detected */
775 0x1, /* X--- | 14% of maximum current detected */
776 0x2, /* -X-- | 29% of maximum current detected */
777 0x4, /* --X- | 43% of maximum current detected */
778 0x8, /* ---X | 57% of maximum current detected */
779 0xC, /* --XX | 71% of maximum current detected */
780 0xE, /* -XXX | 86% of maximum current detected */
781 0xF, /* XXXX | 100% of maximum current detected */
782};
783static const int LIGHT_LEN = sizeof(LIGHT_SCHEME)/sizeof(LIGHT_SCHEME[0]);
784
785void ListenReaderField(int limit)
786{
3b692427 787 int lf_av, lf_av_new, lf_baseline= 0, lf_max;
788 int hf_av, hf_av_new, hf_baseline= 0, hf_max;
15c4dc5a 789 int mode=1, display_val, display_max, i;
790
3b692427 791#define LF_ONLY 1
792#define HF_ONLY 2
793#define REPORT_CHANGE 10 // report new values only if they have changed at least by REPORT_CHANGE
794
795
796 // switch off FPGA - we don't want to measure our own signal
797 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
798 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
15c4dc5a 799
800 LEDsoff();
801
3b692427 802 lf_av = lf_max = AvgAdc(ADC_CHAN_LF);
15c4dc5a 803
804 if(limit != HF_ONLY) {
3b692427 805 Dbprintf("LF 125/134kHz Baseline: %dmV", (MAX_ADC_LF_VOLTAGE * lf_av) >> 10);
15c4dc5a 806 lf_baseline = lf_av;
807 }
808
3b692427 809 hf_av = hf_max = AvgAdc(ADC_CHAN_HF);
15c4dc5a 810
811 if (limit != LF_ONLY) {
3b692427 812 Dbprintf("HF 13.56MHz Baseline: %dmV", (MAX_ADC_HF_VOLTAGE * hf_av) >> 10);
15c4dc5a 813 hf_baseline = hf_av;
814 }
815
816 for(;;) {
817 if (BUTTON_PRESS()) {
818 SpinDelay(500);
819 switch (mode) {
820 case 1:
821 mode=2;
822 DbpString("Signal Strength Mode");
823 break;
824 case 2:
825 default:
826 DbpString("Stopped");
827 LEDsoff();
828 return;
829 break;
830 }
831 }
832 WDT_HIT();
833
834 if (limit != HF_ONLY) {
3b692427 835 if(mode == 1) {
836 if (abs(lf_av - lf_baseline) > REPORT_CHANGE)
837 LED_D_ON();
838 else
839 LED_D_OFF();
15c4dc5a 840 }
e30c654b 841
3b692427 842 lf_av_new = AvgAdc(ADC_CHAN_LF);
15c4dc5a 843 // see if there's a significant change
3b692427 844 if(abs(lf_av - lf_av_new) > REPORT_CHANGE) {
845 Dbprintf("LF 125/134kHz Field Change: %5dmV", (MAX_ADC_LF_VOLTAGE * lf_av_new) >> 10);
15c4dc5a 846 lf_av = lf_av_new;
847 if (lf_av > lf_max)
848 lf_max = lf_av;
15c4dc5a 849 }
850 }
851
852 if (limit != LF_ONLY) {
853 if (mode == 1){
3b692427 854 if (abs(hf_av - hf_baseline) > REPORT_CHANGE)
855 LED_B_ON();
856 else
857 LED_B_OFF();
15c4dc5a 858 }
e30c654b 859
3b692427 860 hf_av_new = AvgAdc(ADC_CHAN_HF);
15c4dc5a 861 // see if there's a significant change
3b692427 862 if(abs(hf_av - hf_av_new) > REPORT_CHANGE) {
863 Dbprintf("HF 13.56MHz Field Change: %5dmV", (MAX_ADC_HF_VOLTAGE * hf_av_new) >> 10);
15c4dc5a 864 hf_av = hf_av_new;
865 if (hf_av > hf_max)
866 hf_max = hf_av;
15c4dc5a 867 }
868 }
e30c654b 869
15c4dc5a 870 if(mode == 2) {
871 if (limit == LF_ONLY) {
872 display_val = lf_av;
873 display_max = lf_max;
874 } else if (limit == HF_ONLY) {
875 display_val = hf_av;
876 display_max = hf_max;
877 } else { /* Pick one at random */
878 if( (hf_max - hf_baseline) > (lf_max - lf_baseline) ) {
879 display_val = hf_av;
880 display_max = hf_max;
881 } else {
882 display_val = lf_av;
883 display_max = lf_max;
884 }
885 }
886 for (i=0; i<LIGHT_LEN; i++) {
887 if (display_val >= ((display_max/LIGHT_LEN)*i) && display_val <= ((display_max/LIGHT_LEN)*(i+1))) {
888 if (LIGHT_SCHEME[i] & 0x1) LED_C_ON(); else LED_C_OFF();
889 if (LIGHT_SCHEME[i] & 0x2) LED_A_ON(); else LED_A_OFF();
890 if (LIGHT_SCHEME[i] & 0x4) LED_B_ON(); else LED_B_OFF();
891 if (LIGHT_SCHEME[i] & 0x8) LED_D_ON(); else LED_D_OFF();
892 break;
893 }
894 }
895 }
896 }
897}
898
f7e3ed82 899void UsbPacketReceived(uint8_t *packet, int len)
15c4dc5a 900{
901 UsbCommand *c = (UsbCommand *)packet;
15c4dc5a 902
313ee67e 903 //Dbprintf("received %d bytes, with command: 0x%04x and args: %d %d %d",len,c->cmd,c->arg[0],c->arg[1],c->arg[2]);
902cb3c0 904
15c4dc5a 905 switch(c->cmd) {
906#ifdef WITH_LF
31abe49f
MHS
907 case CMD_SET_LF_SAMPLING_CONFIG:
908 setSamplingConfig((sample_config *) c->d.asBytes);
909 break;
15c4dc5a 910 case CMD_ACQUIRE_RAW_ADC_SAMPLES_125K:
1c8fbeb9 911 cmd_send(CMD_ACK, SampleLF(c->arg[0]),0,0,0,0);
15c4dc5a 912 break;
15c4dc5a 913 case CMD_MOD_THEN_ACQUIRE_RAW_ADC_SAMPLES_125K:
914 ModThenAcquireRawAdcSamples125k(c->arg[0],c->arg[1],c->arg[2],c->d.asBytes);
915 break;
b014c96d 916 case CMD_LF_SNOOP_RAW_ADC_SAMPLES:
31abe49f 917 cmd_send(CMD_ACK,SnoopLF(),0,0,0,0);
b014c96d 918 break;
7e67e42f 919 case CMD_HID_DEMOD_FSK:
a501c82b 920 CmdHIDdemodFSK(c->arg[0], 0, 0, 1);
7e67e42f 921 break;
922 case CMD_HID_SIM_TAG:
a501c82b 923 CmdHIDsimTAG(c->arg[0], c->arg[1], 1);
7e67e42f 924 break;
abd6112f 925 case CMD_FSK_SIM_TAG:
926 CmdFSKsimTAG(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
927 break;
928 case CMD_ASK_SIM_TAG:
929 CmdASKsimTag(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
930 break;
872e3d4d 931 case CMD_PSK_SIM_TAG:
932 CmdPSKsimTag(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
933 break;
a501c82b 934 case CMD_HID_CLONE_TAG:
1c611bbd 935 CopyHIDtoT55x7(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
7e67e42f 936 break;
a1f3bb12 937 case CMD_IO_DEMOD_FSK:
a501c82b 938 CmdIOdemodFSK(c->arg[0], 0, 0, 1);
a1f3bb12 939 break;
a501c82b 940 case CMD_IO_CLONE_TAG:
94422fa2 941 CopyIOtoT55x7(c->arg[0], c->arg[1]);
a1f3bb12 942 break;
6ff6ade2 943 case CMD_EM410X_DEMOD:
944 CmdEM410xdemod(c->arg[0], 0, 0, 1);
945 break;
2d4eae76 946 case CMD_EM410X_WRITE_TAG:
947 WriteEM410x(c->arg[0], c->arg[1], c->arg[2]);
948 break;
7e67e42f 949 case CMD_READ_TI_TYPE:
950 ReadTItag();
951 break;
952 case CMD_WRITE_TI_TYPE:
953 WriteTItag(c->arg[0],c->arg[1],c->arg[2]);
954 break;
955 case CMD_SIMULATE_TAG_125K:
74daee24 956 LED_A_ON();
957 SimulateTagLowFrequency(c->arg[0], c->arg[1], 1);
958 LED_A_OFF();
7e67e42f 959 break;
960 case CMD_LF_SIMULATE_BIDIR:
961 SimulateTagLowFrequencyBidir(c->arg[0], c->arg[1]);
962 break;
a501c82b 963 case CMD_INDALA_CLONE_TAG:
2414f978 964 CopyIndala64toT55x7(c->arg[0], c->arg[1]);
965 break;
a501c82b 966 case CMD_INDALA_CLONE_TAG_L:
2414f978 967 CopyIndala224toT55x7(c->d.asDwords[0], c->d.asDwords[1], c->d.asDwords[2], c->d.asDwords[3], c->d.asDwords[4], c->d.asDwords[5], c->d.asDwords[6]);
968 break;
1c611bbd 969 case CMD_T55XX_READ_BLOCK:
9276e859 970 T55xxReadBlock(c->arg[0], c->arg[1], c->arg[2]);
1c611bbd 971 break;
972 case CMD_T55XX_WRITE_BLOCK:
973 T55xxWriteBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
974 break;
9276e859 975 case CMD_T55XX_WAKEUP:
976 T55xxWakeUp(c->arg[0]);
977 break;
94422fa2 978 case CMD_T55XX_RESET_READ:
979 T55xxResetRead();
980 break;
a501c82b 981 case CMD_PCF7931_READ:
1c611bbd 982 ReadPCF7931();
1c611bbd 983 break;
e98572a1 984 case CMD_PCF7931_WRITE:
ac2df346 985 WritePCF7931(c->d.asBytes[0],c->d.asBytes[1],c->d.asBytes[2],c->d.asBytes[3],c->d.asBytes[4],c->d.asBytes[5],c->d.asBytes[6], c->d.asBytes[9], c->d.asBytes[7]-128,c->d.asBytes[8]-128, c->arg[0], c->arg[1], c->arg[2]);
e98572a1 986 break;
1c611bbd 987 case CMD_EM4X_READ_WORD:
988 EM4xReadWord(c->arg[1], c->arg[2],c->d.asBytes[0]);
989 break;
990 case CMD_EM4X_WRITE_WORD:
991 EM4xWriteWord(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
992 break;
db25599d 993 case CMD_AWID_DEMOD_FSK: // Set realtime AWID demodulation
994 CmdAWIDdemodFSK(c->arg[0], 0, 0, 1);
70459879 995 break;
0de8e387 996 case CMD_VIKING_CLONE_TAG:
a126332a 997 CopyVikingtoT55xx(c->arg[0], c->arg[1], c->arg[2]);
0de8e387 998 break;
15c4dc5a 999#endif
1000
d19929cb 1001#ifdef WITH_HITAG
1002 case CMD_SNOOP_HITAG: // Eavesdrop Hitag tag, args = type
1003 SnoopHitag(c->arg[0]);
1004 break;
1005 case CMD_SIMULATE_HITAG: // Simulate Hitag tag, args = memory content
1006 SimulateHitagTag((bool)c->arg[0],(byte_t*)c->d.asBytes);
1007 break;
1008 case CMD_READER_HITAG: // Reader for Hitag tags, args = type and function
1009 ReaderHitag((hitag_function)c->arg[0],(hitag_data*)c->d.asBytes);
1010 break;
1011#endif
f168b263 1012
15c4dc5a 1013#ifdef WITH_ISO15693
1014 case CMD_ACQUIRE_RAW_ADC_SAMPLES_ISO_15693:
1015 AcquireRawAdcSamplesIso15693();
1016 break;
9455b51c 1017 case CMD_RECORD_RAW_ADC_SAMPLES_ISO_15693:
1018 RecordRawAdcSamplesIso15693();
1019 break;
1020
1021 case CMD_ISO_15693_COMMAND:
1022 DirectTag15693Command(c->arg[0],c->arg[1],c->arg[2],c->d.asBytes);
1023 break;
1024
1025 case CMD_ISO_15693_FIND_AFI:
1026 BruteforceIso15693Afi(c->arg[0]);
1027 break;
1028
1029 case CMD_ISO_15693_DEBUG:
1030 SetDebugIso15693(c->arg[0]);
1031 break;
15c4dc5a 1032
15c4dc5a 1033 case CMD_READER_ISO_15693:
1034 ReaderIso15693(c->arg[0]);
1035 break;
7e67e42f 1036 case CMD_SIMTAG_ISO_15693:
3649b640 1037 SimTagIso15693(c->arg[0], c->d.asBytes);
7e67e42f 1038 break;
15c4dc5a 1039#endif
1040
7e67e42f 1041#ifdef WITH_LEGICRF
1042 case CMD_SIMULATE_TAG_LEGIC_RF:
1043 LegicRfSimulate(c->arg[0], c->arg[1], c->arg[2]);
1044 break;
3612a8a8 1045
7e67e42f 1046 case CMD_WRITER_LEGIC_RF:
1047 LegicRfWriter(c->arg[1], c->arg[0]);
1048 break;
3612a8a8 1049
15c4dc5a 1050 case CMD_READER_LEGIC_RF:
1051 LegicRfReader(c->arg[0], c->arg[1]);
1052 break;
15c4dc5a 1053#endif
1054
1055#ifdef WITH_ISO14443b
15c4dc5a 1056 case CMD_READ_SRI512_TAG:
abb21530 1057 ReadSTMemoryIso14443b(0x0F);
15c4dc5a 1058 break;
7e67e42f 1059 case CMD_READ_SRIX4K_TAG:
abb21530 1060 ReadSTMemoryIso14443b(0x7F);
7e67e42f 1061 break;
22e24700 1062 case CMD_SNOOP_ISO_14443B:
abb21530 1063 SnoopIso14443b();
7e67e42f 1064 break;
22e24700 1065 case CMD_SIMULATE_TAG_ISO_14443B:
abb21530 1066 SimulateIso14443bTag();
7e67e42f 1067 break;
7cf3ef20 1068 case CMD_ISO_14443B_COMMAND:
1069 SendRawCommand14443B(c->arg[0],c->arg[1],c->arg[2],c->d.asBytes);
1070 break;
15c4dc5a 1071#endif
1072
1073#ifdef WITH_ISO14443a
7e67e42f 1074 case CMD_SNOOP_ISO_14443a:
4d2e4eea 1075 SniffIso14443a(c->arg[0]);
7e67e42f 1076 break;
15c4dc5a 1077 case CMD_READER_ISO_14443a:
902cb3c0 1078 ReaderIso14443a(c);
15c4dc5a 1079 break;
7e67e42f 1080 case CMD_SIMULATE_TAG_ISO_14443a:
0db6ed9a 1081 SimulateIso14443aTag(c->arg[0], c->arg[1], c->d.asBytes); // ## Simulate iso14443a tag - pass tag type & UID
7e67e42f 1082 break;
95e63594 1083
5acd09bd 1084 case CMD_EPA_PACE_COLLECT_NONCE:
902cb3c0 1085 EPA_PACE_Collect_Nonce(c);
5acd09bd 1086 break;
d0f3338e 1087 case CMD_EPA_PACE_REPLAY:
1088 EPA_PACE_Replay(c);
1089 break;
7e67e42f 1090
15c4dc5a 1091 case CMD_READER_MIFARE:
810f5379 1092 ReaderMifare(c->arg[0], c->arg[1]);
15c4dc5a 1093 break;
20f9a2a1
M
1094 case CMD_MIFARE_READBL:
1095 MifareReadBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1096 break;
981bd429 1097 case CMD_MIFAREU_READBL:
aa60d156 1098 MifareUReadBlock(c->arg[0],c->arg[1], c->d.asBytes);
981bd429 1099 break;
4d2e4eea 1100 case CMD_MIFAREUC_AUTH:
1101 MifareUC_Auth(c->arg[0],c->d.asBytes);
f38a1528 1102 break;
981bd429 1103 case CMD_MIFAREU_READCARD:
74daee24 1104 MifareUReadCard(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
117d9ec2 1105 break;
aa60d156 1106 case CMD_MIFAREUC_SETPWD:
1107 MifareUSetPwd(c->arg[0], c->d.asBytes);
117d9ec2 1108 break;
20f9a2a1
M
1109 case CMD_MIFARE_READSC:
1110 MifareReadSector(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1111 break;
1112 case CMD_MIFARE_WRITEBL:
1113 MifareWriteBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1114 break;
95aeb706 1115 //case CMD_MIFAREU_WRITEBL_COMPAT:
1116 //MifareUWriteBlockCompat(c->arg[0], c->d.asBytes);
1117 //break;
981bd429 1118 case CMD_MIFAREU_WRITEBL:
95aeb706 1119 MifareUWriteBlock(c->arg[0], c->arg[1], c->d.asBytes);
aa60d156 1120 break;
c188b1b9 1121 case CMD_MIFARE_ACQUIRE_ENCRYPTED_NONCES:
1122 MifareAcquireEncryptedNonces(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1123 break;
20f9a2a1
M
1124 case CMD_MIFARE_NESTED:
1125 MifareNested(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
f397b5cc
M
1126 break;
1127 case CMD_MIFARE_CHKKEYS:
1128 MifareChkKeys(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
20f9a2a1
M
1129 break;
1130 case CMD_SIMULATE_MIFARE_CARD:
1131 Mifare1ksim(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1132 break;
8556b852
M
1133
1134 // emulator
1135 case CMD_MIFARE_SET_DBGMODE:
1136 MifareSetDbgLvl(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1137 break;
1138 case CMD_MIFARE_EML_MEMCLR:
1139 MifareEMemClr(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1140 break;
1141 case CMD_MIFARE_EML_MEMSET:
1142 MifareEMemSet(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1143 break;
1144 case CMD_MIFARE_EML_MEMGET:
1145 MifareEMemGet(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1146 break;
1147 case CMD_MIFARE_EML_CARDLOAD:
1148 MifareECardLoad(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
0675f200
M
1149 break;
1150
1151 // Work with "magic Chinese" card
d52e4e88 1152 case CMD_MIFARE_CSETBLOCK:
c2731f37 1153 MifareCSetBlock(c->arg[0], c->arg[1], c->d.asBytes);
545a1f38 1154 break;
d52e4e88 1155 case CMD_MIFARE_CGETBLOCK:
c2731f37 1156 MifareCGetBlock(c->arg[0], c->arg[1], c->d.asBytes);
8556b852 1157 break;
d52e4e88 1158 case CMD_MIFARE_CIDENT:
1159 MifareCIdent();
1160 break;
b62a5a84
M
1161
1162 // mifare sniffer
1163 case CMD_MIFARE_SNIFFER:
5cd9ec01 1164 SniffMifare(c->arg[0]);
b62a5a84 1165 break;
313ee67e 1166
aa60d156 1167 //mifare desfire
1168 case CMD_MIFARE_DESFIRE_READBL: break;
1169 case CMD_MIFARE_DESFIRE_WRITEBL: break;
1170 case CMD_MIFARE_DESFIRE_AUTH1:
1171 MifareDES_Auth1(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1172 break;
1173 case CMD_MIFARE_DESFIRE_AUTH2:
1174 //MifareDES_Auth2(c->arg[0],c->d.asBytes);
1175 break;
1176 case CMD_MIFARE_DES_READER:
1177 //readermifaredes(c->arg[0], c->arg[1], c->d.asBytes);
1178 break;
1179 case CMD_MIFARE_DESFIRE_INFO:
1180 MifareDesfireGetInformation();
1181 break;
1182 case CMD_MIFARE_DESFIRE:
1183 MifareSendCommand(c->arg[0], c->arg[1], c->d.asBytes);
1184 break;
1185
add0504d 1186 case CMD_MIFARE_COLLECT_NONCES:
add0504d 1187 break;
20f9a2a1 1188#endif
810f5379 1189#ifdef WITH_EMV
1190 case CMD_EMV_TRANSACTION:
1191 EMVTransaction();
1192 break;
1193 case CMD_EMV_GET_RANDOM_NUM:
1194 //EMVgetUDOL();
1195 break;
1196 case CMD_EMV_LOAD_VALUE:
1197 EMVloadvalue(c->arg[0], c->d.asBytes);
1198 break;
1199 case CMD_EMV_DUMP_CARD:
1200 EMVdumpcard();
1201#endif
7e67e42f 1202#ifdef WITH_ICLASS
cee5a30d 1203 // Makes use of ISO14443a FPGA Firmware
1204 case CMD_SNOOP_ICLASS:
1205 SnoopIClass();
1206 break;
1e262141 1207 case CMD_SIMULATE_TAG_ICLASS:
ff7bb4ef 1208 SimulateIClass(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1e262141 1209 break;
1210 case CMD_READER_ICLASS:
1211 ReaderIClass(c->arg[0]);
1212 break;
f38a1528 1213 case CMD_READER_ICLASS_REPLAY:
f62b5e12 1214 ReaderIClass_Replay(c->arg[0], c->d.asBytes);
f38a1528 1215 break;
e80aeb96
MHS
1216 case CMD_ICLASS_EML_MEMSET:
1217 emlSet(c->d.asBytes,c->arg[0], c->arg[1]);
1218 break;
e98572a1 1219 case CMD_ICLASS_WRITEBLOCK:
1220 iClass_WriteBlock(c->arg[0], c->d.asBytes);
1221 break;
1222 case CMD_ICLASS_READCHECK: // auth step 1
1223 iClass_ReadCheck(c->arg[0], c->arg[1]);
1224 break;
1225 case CMD_ICLASS_READBLOCK:
1226 iClass_ReadBlk(c->arg[0]);
1227 break;
1228 case CMD_ICLASS_AUTHENTICATION: //check
1229 iClass_Authentication(c->d.asBytes);
1230 break;
1231 case CMD_ICLASS_DUMP:
1232 iClass_Dump(c->arg[0], c->arg[1]);
1233 break;
1234 case CMD_ICLASS_CLONE:
1235 iClass_Clone(c->arg[0], c->arg[1], c->d.asBytes);
1236 break;
cee5a30d 1237#endif
1d0ccbe0 1238#ifdef WITH_HFSNOOP
1239 case CMD_HF_SNIFFER:
1240 HfSnoop(c->arg[0], c->arg[1]);
1241 break;
1242#endif
cee5a30d 1243
7e67e42f 1244 case CMD_BUFF_CLEAR:
117d9ec2 1245 BigBuf_Clear();
15c4dc5a 1246 break;
15c4dc5a 1247
1248 case CMD_MEASURE_ANTENNA_TUNING:
1249 MeasureAntennaTuning();
1250 break;
1251
1252 case CMD_MEASURE_ANTENNA_TUNING_HF:
1253 MeasureAntennaTuningHf();
1254 break;
1255
1256 case CMD_LISTEN_READER_FIELD:
1257 ListenReaderField(c->arg[0]);
1258 break;
1259
15c4dc5a 1260 case CMD_FPGA_MAJOR_MODE_OFF: // ## FPGA Control
1261 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
1262 SpinDelay(200);
1263 LED_D_OFF(); // LED D indicates field ON or OFF
1264 break;
1265
1c611bbd 1266 case CMD_DOWNLOAD_RAW_ADC_SAMPLES_125K:
902cb3c0 1267
1c611bbd 1268 LED_B_ON();
117d9ec2 1269 uint8_t *BigBuf = BigBuf_get_addr();
0de8e387 1270 size_t len = 0;
1c611bbd 1271 for(size_t i=0; i<c->arg[1]; i += USB_CMD_DATA_SIZE) {
0de8e387 1272 len = MIN((c->arg[1] - i),USB_CMD_DATA_SIZE);
3000dc4e 1273 cmd_send(CMD_DOWNLOADED_RAW_ADC_SAMPLES_125K,i,len,BigBuf_get_traceLen(),BigBuf+c->arg[0]+i,len);
1c611bbd 1274 }
1275 // Trigger a finish downloading signal with an ACK frame
3000dc4e 1276 cmd_send(CMD_ACK,1,0,BigBuf_get_traceLen(),getSamplingConfig(),sizeof(sample_config));
d3b1f4e4 1277 LED_B_OFF();
1c611bbd 1278 break;
15c4dc5a 1279
1280 case CMD_DOWNLOADED_SIM_SAMPLES_125K: {
117d9ec2 1281 uint8_t *b = BigBuf_get_addr();
7c756d68 1282 memcpy(b+c->arg[0], c->d.asBytes, USB_CMD_DATA_SIZE);
1c611bbd 1283 cmd_send(CMD_ACK,0,0,0,0,0);
1284 break;
1285 }
15c4dc5a 1286 case CMD_READ_MEM:
1287 ReadMem(c->arg[0]);
1288 break;
1289
1290 case CMD_SET_LF_DIVISOR:
7cc204bf 1291 FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
15c4dc5a 1292 FpgaSendCommand(FPGA_CMD_SET_DIVISOR, c->arg[0]);
1293 break;
1294
1295 case CMD_SET_ADC_MUX:
1296 switch(c->arg[0]) {
1297 case 0: SetAdcMuxFor(GPIO_MUXSEL_LOPKD); break;
1298 case 1: SetAdcMuxFor(GPIO_MUXSEL_LORAW); break;
1299 case 2: SetAdcMuxFor(GPIO_MUXSEL_HIPKD); break;
1300 case 3: SetAdcMuxFor(GPIO_MUXSEL_HIRAW); break;
1301 }
1302 break;
1303
1304 case CMD_VERSION:
1305 SendVersion();
1306 break;
7838f4be 1307 case CMD_STATUS:
0de8e387 1308 SendStatus();
7838f4be 1309 break;
1310 case CMD_PING:
1311 cmd_send(CMD_ACK,0,0,0,0,0);
1312 break;
15c4dc5a 1313#ifdef WITH_LCD
1314 case CMD_LCD_RESET:
1315 LCDReset();
1316 break;
1317 case CMD_LCD:
1318 LCDSend(c->arg[0]);
1319 break;
1320#endif
1321 case CMD_SETUP_WRITE:
1322 case CMD_FINISH_WRITE:
1c611bbd 1323 case CMD_HARDWARE_RESET:
1324 usb_disable();
f62b5e12 1325 SpinDelay(2000);
15c4dc5a 1326 AT91C_BASE_RSTC->RSTC_RCR = RST_CONTROL_KEY | AT91C_RSTC_PROCRST;
1327 for(;;) {
1328 // We're going to reset, and the bootrom will take control.
1329 }
1c611bbd 1330 break;
15c4dc5a 1331
1c611bbd 1332 case CMD_START_FLASH:
15c4dc5a 1333 if(common_area.flags.bootrom_present) {
1334 common_area.command = COMMON_AREA_COMMAND_ENTER_FLASH_MODE;
1335 }
1c611bbd 1336 usb_disable();
15c4dc5a 1337 AT91C_BASE_RSTC->RSTC_RCR = RST_CONTROL_KEY | AT91C_RSTC_PROCRST;
1338 for(;;);
1c611bbd 1339 break;
e30c654b 1340
15c4dc5a 1341 case CMD_DEVICE_INFO: {
902cb3c0 1342 uint32_t dev_info = DEVICE_INFO_FLAG_OSIMAGE_PRESENT | DEVICE_INFO_FLAG_CURRENT_MODE_OS;
1343 if(common_area.flags.bootrom_present) dev_info |= DEVICE_INFO_FLAG_BOOTROM_PRESENT;
1c611bbd 1344 cmd_send(CMD_DEVICE_INFO,dev_info,0,0,0,0);
1345 break;
1346 }
1347 default:
15c4dc5a 1348 Dbprintf("%s: 0x%04x","unknown command:",c->cmd);
1c611bbd 1349 break;
15c4dc5a 1350 }
1351}
1352
1353void __attribute__((noreturn)) AppMain(void)
1354{
1355 SpinDelay(100);
9e8255d4 1356 clear_trace();
15c4dc5a 1357 if(common_area.magic != COMMON_AREA_MAGIC || common_area.version != 1) {
1358 /* Initialize common area */
1359 memset(&common_area, 0, sizeof(common_area));
1360 common_area.magic = COMMON_AREA_MAGIC;
1361 common_area.version = 1;
1362 }
1363 common_area.flags.osimage_present = 1;
1364
1365 LED_D_OFF();
1366 LED_C_OFF();
1367 LED_B_OFF();
1368 LED_A_OFF();
1369
b44e5233 1370 // Init USB device
313ee67e 1371 usb_enable();
15c4dc5a 1372
1373 // The FPGA gets its clock from us from PCK0 output, so set that up.
1374 AT91C_BASE_PIOA->PIO_BSR = GPIO_PCK0;
1375 AT91C_BASE_PIOA->PIO_PDR = GPIO_PCK0;
1376 AT91C_BASE_PMC->PMC_SCER = AT91C_PMC_PCK0;
1377 // PCK0 is PLL clock / 4 = 96Mhz / 4 = 24Mhz
1378 AT91C_BASE_PMC->PMC_PCKR[0] = AT91C_PMC_CSS_PLL_CLK |
1d0ccbe0 1379 AT91C_PMC_PRES_CLK_4; // 4 for 24Mhz pck0, 2 for 48 MHZ pck0
15c4dc5a 1380 AT91C_BASE_PIOA->PIO_OER = GPIO_PCK0;
1381
1382 // Reset SPI
1383 AT91C_BASE_SPI->SPI_CR = AT91C_SPI_SWRST;
1384 // Reset SSC
1385 AT91C_BASE_SSC->SSC_CR = AT91C_SSC_SWRST;
1386
1387 // Load the FPGA image, which we have stored in our flash.
7cc204bf 1388 // (the HF version by default)
1389 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
15c4dc5a 1390
9ca155ba 1391 StartTickCount();
902cb3c0 1392
15c4dc5a 1393#ifdef WITH_LCD
15c4dc5a 1394 LCDInit();
15c4dc5a 1395#endif
1396
f62b5e12 1397 byte_t rx[sizeof(UsbCommand)];
902cb3c0 1398 size_t rx_len;
1399
15c4dc5a 1400 for(;;) {
313ee67e 1401 if (usb_poll()) {
1402 rx_len = usb_read(rx,sizeof(UsbCommand));
1403 if (rx_len) {
1404 UsbPacketReceived(rx,rx_len);
1405 }
1406 }
15c4dc5a 1407 WDT_HIT();
1408
1409#ifdef WITH_LF
7838f4be 1410#ifndef WITH_ISO14443a_StandAlone
15c4dc5a 1411 if (BUTTON_HELD(1000) > 0)
1412 SamyRun();
7838f4be 1413#endif
1414#endif
1415#ifdef WITH_ISO14443a
1416#ifdef WITH_ISO14443a_StandAlone
1417 if (BUTTON_HELD(1000) > 0)
1418 StandAloneMode14a();
1419#endif
15c4dc5a 1420#endif
1421 }
1422}
Impressum, Datenschutz