]> git.zerfleddert.de Git - proxmark3-svn/blame - armsrc/appmain.c
ADD: since the client now calls legic prng, this is needed here too.
[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//-----------------------------------------------------------------------------
c3c241f3 12#include "usb_cdc.h"
cc70dd6b 13//#include "cmd.h"
c3c241f3 14#include "proxmark3.h"
15c4dc5a 15#include "apps.h"
f7e3ed82 16#include "util.h"
9ab7a6c7 17#include "printf.h"
18#include "string.h"
9ab7a6c7 19#include <stdarg.h>
15c4dc5a 20#include "legicrf.h"
0db11b71 21#include "hitag2.h"
22#include "hitagS.h"
31abe49f 23#include "lfsampling.h"
3000dc4e 24#include "BigBuf.h"
7838f4be 25#include "mifareutil.h"
36804420 26#include "pcf7931.h"
f2c2b174 27
15c4dc5a 28#ifdef WITH_LCD
902cb3c0 29 #include "LCD.h"
15c4dc5a 30#endif
31
7838f4be 32// Craig Young - 14a stand-alone code
33#ifdef WITH_ISO14443a_StandAlone
34 #include "iso14443a.h"
c2731f37 35 #include "protocols.h"
7838f4be 36#endif
37
15c4dc5a 38//=============================================================================
39// A buffer where we can queue things up to be sent through the FPGA, for
40// any purpose (fake tag, as reader, whatever). We go MSB first, since that
41// is the order in which they go out on the wire.
42//=============================================================================
43
6a1f2d82 44#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 45uint8_t ToSend[TOSEND_BUFFER_SIZE];
7838f4be 46int ToSendMax = 0;
15c4dc5a 47static int ToSendBit;
48struct common_area common_area __attribute__((section(".commonarea")));
49
15c4dc5a 50void ToSendReset(void)
51{
52 ToSendMax = -1;
53 ToSendBit = 8;
54}
55
da198be4 56void ToSendStuffBit(int b) {
15c4dc5a 57 if(ToSendBit >= 8) {
da198be4 58 ++ToSendMax;
15c4dc5a 59 ToSend[ToSendMax] = 0;
60 ToSendBit = 0;
61 }
62
da198be4 63 if(b)
15c4dc5a 64 ToSend[ToSendMax] |= (1 << (7 - ToSendBit));
15c4dc5a 65
da198be4 66 ++ToSendBit;
15c4dc5a 67
6a1f2d82 68 if(ToSendMax >= sizeof(ToSend)) {
15c4dc5a 69 ToSendBit = 0;
70 DbpString("ToSendStuffBit overflowed!");
71 }
72}
73
dccddaef 74void PrintToSendBuffer(void){
75 DbpString("Printing ToSendBuffer:");
76 Dbhexdump(ToSendMax, ToSend, 0);
77}
78
15c4dc5a 79//=============================================================================
80// Debug print functions, to go out over USB, to the usual PC-side client.
81//=============================================================================
82
38e41917 83void DbpStringEx(char *str, uint32_t cmd){
84 byte_t len = strlen(str);
85 cmd_send(CMD_DEBUG_PRINT_STRING,len, cmd,0,(byte_t*)str,len);
86}
87
da198be4 88void DbpString(char *str) {
38e41917 89 DbpStringEx(str, 0);
15c4dc5a 90}
91
92#if 0
da198be4 93void DbpIntegers(int x1, int x2, int x3) {
38e41917 94 cmd_send(CMD_DEBUG_PRINT_INTEGERS,x1,x2,x3,0,0);
15c4dc5a 95}
96#endif
38e41917 97void DbprintfEx(uint32_t cmd, const char *fmt, ...) {
98 // should probably limit size here; oh well, let's just use a big buffer
99 char output_string[128] = {0x00};
100 va_list ap;
101
102 va_start(ap, fmt);
103 kvsprintf(fmt, output_string, 10, ap);
104 va_end(ap);
105
106 DbpStringEx(output_string, cmd);
107}
15c4dc5a 108
109void Dbprintf(const char *fmt, ...) {
da198be4 110 // should probably limit size here; oh well, let's just use a big buffer
111 char output_string[128] = {0x00};
15c4dc5a 112 va_list ap;
113
114 va_start(ap, fmt);
115 kvsprintf(fmt, output_string, 10, ap);
116 va_end(ap);
e30c654b 117
15c4dc5a 118 DbpString(output_string);
119}
120
9455b51c 121// prints HEX & ASCII
d19929cb 122void Dbhexdump(int len, uint8_t *d, bool bAsci) {
da198be4 123 int l=0, i;
9455b51c 124 char ascii[9];
d19929cb 125
9455b51c 126 while (len>0) {
da198be4 127
128 l = (len>8) ? 8 : len;
9455b51c 129
130 memcpy(ascii,d,l);
d19929cb 131 ascii[l]=0;
9455b51c 132
133 // filter safe ascii
da198be4 134 for (i=0; i<l; ++i)
9455b51c 135 if (ascii[i]<32 || ascii[i]>126) ascii[i]='.';
d19929cb 136
da198be4 137 if (bAsci)
d19929cb 138 Dbprintf("%-8s %*D",ascii,l,d," ");
da198be4 139 else
d19929cb 140 Dbprintf("%*D",l,d," ");
d19929cb 141
da198be4 142 len -= 8;
143 d += 8;
9455b51c 144 }
145}
146
15c4dc5a 147//-----------------------------------------------------------------------------
148// Read an ADC channel and block till it completes, then return the result
149// in ADC units (0 to 1023). Also a routine to average 32 samples and
150// return that.
151//-----------------------------------------------------------------------------
152static int ReadAdc(int ch)
153{
f7e3ed82 154 uint32_t d;
15c4dc5a 155
156 AT91C_BASE_ADC->ADC_CR = AT91C_ADC_SWRST;
157 AT91C_BASE_ADC->ADC_MR =
3b692427 158 ADC_MODE_PRESCALE(63 /* was 32 */) | // ADC_CLK = MCK / ((63+1) * 2) = 48MHz / 128 = 375kHz
159 ADC_MODE_STARTUP_TIME(1 /* was 16 */) | // Startup Time = (1+1) * 8 / ADC_CLK = 16 / 375kHz = 42,7us Note: must be > 20us
160 ADC_MODE_SAMPLE_HOLD_TIME(15 /* was 8 */); // Sample & Hold Time SHTIM = 15 / ADC_CLK = 15 / 375kHz = 40us
161
162 // Note: ADC_MODE_PRESCALE and ADC_MODE_SAMPLE_HOLD_TIME are set to the maximum allowed value.
163 // 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
164 // of RC = 10MOhm * 12pF = 120us. Even after the maximum configurable sample&hold time of 40us the input capacitor will not be fully charged.
165 //
166 // The maths are:
167 // 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
168 //
169 // v_cap = v_in * (1 - exp(-RC/SHTIM)) = v_in * (1 - exp(-3)) = v_in * 0,95 (i.e. an error of 5%)
170 //
171 // Note: with the "historic" values in the comments above, the error was 34% !!!
172
15c4dc5a 173 AT91C_BASE_ADC->ADC_CHER = ADC_CHANNEL(ch);
174
175 AT91C_BASE_ADC->ADC_CR = AT91C_ADC_START;
3b692427 176
da198be4 177 while (!(AT91C_BASE_ADC->ADC_SR & ADC_END_OF_CONVERSION(ch))) ;
178
15c4dc5a 179 d = AT91C_BASE_ADC->ADC_CDR[ch];
15c4dc5a 180 return d;
181}
182
9ca155ba 183int AvgAdc(int ch) // was static - merlok
15c4dc5a 184{
185 int i;
186 int a = 0;
187
da198be4 188 for(i = 0; i < 32; ++i)
15c4dc5a 189 a += ReadAdc(ch);
15c4dc5a 190
191 return (a + 15) >> 5;
192}
193
f121b478 194
da198be4 195void MeasureAntennaTuning(void) {
15c4dc5a 196
2deea574 197 uint8_t LF_Results[256];
f121b478 198 int i, adcval = 0, peak = 0, peakv = 0, peakf = 0;
199 int vLf125 = 0, vLf134 = 0, vHf = 0; // in mV
2deea574 200
201 memset(LF_Results, 0, sizeof(LF_Results));
7838f4be 202 LED_B_ON();
15c4dc5a 203
204/*
205 * Sweeps the useful LF range of the proxmark from
206 * 46.8kHz (divisor=255) to 600kHz (divisor=19) and
207 * read the voltage in the antenna, the result left
208 * in the buffer is a graph which should clearly show
209 * the resonating frequency of your LF antenna
210 * ( hopefully around 95 if it is tuned to 125kHz!)
211 */
d19929cb 212
7cc204bf 213 FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
b014c96d 214 FpgaWriteConfWord(FPGA_MAJOR_MODE_LF_ADC | FPGA_LF_ADC_READER_FIELD);
2deea574 215
f121b478 216 for (i = 255; i >= 19; i--) {
da198be4 217 WDT_HIT();
15c4dc5a 218 FpgaSendCommand(FPGA_CMD_SET_DIVISOR, i);
219 SpinDelay(20);
3b692427 220 adcval = ((MAX_ADC_LF_VOLTAGE * AvgAdc(ADC_CHAN_LF)) >> 10);
15c4dc5a 221 if (i==95) vLf125 = adcval; // voltage at 125Khz
222 if (i==89) vLf134 = adcval; // voltage at 134Khz
223
153a4a78 224 LF_Results[i] = adcval >> 8; // scale int to fit in byte for graphing purposes
d3499d36 225 if(LF_Results[i] > peak) {
15c4dc5a 226 peakv = adcval;
d3499d36 227 peak = LF_Results[i];
15c4dc5a 228 peakf = i;
15c4dc5a 229 }
230 }
231
7838f4be 232 LED_A_ON();
15c4dc5a 233 // Let the FPGA drive the high-frequency antenna around 13.56 MHz.
7838f4be 234 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
15c4dc5a 235 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR);
236 SpinDelay(20);
3b692427 237 vHf = (MAX_ADC_HF_VOLTAGE * AvgAdc(ADC_CHAN_HF)) >> 10;
15c4dc5a 238
153a4a78 239 cmd_send(CMD_MEASURED_ANTENNA_TUNING, vLf125 | (vLf134 << 16), vHf, peakf | (peakv << 16), LF_Results, 256);
d19929cb 240 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
da198be4 241 LEDsoff();
15c4dc5a 242}
243
da198be4 244void MeasureAntennaTuningHf(void) {
15c4dc5a 245 int vHf = 0; // in mV
3b692427 246 // Let the FPGA drive the high-frequency antenna around 13.56 MHz.
247 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
248 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR);
249
38e41917 250 while ( !BUTTON_PRESS() ){
15c4dc5a 251 SpinDelay(20);
3b692427 252 vHf = (MAX_ADC_HF_VOLTAGE * AvgAdc(ADC_CHAN_HF)) >> 10;
38e41917 253 //Dbprintf("%d mV",vHf);
254 DbprintfEx(CMD_MEASURE_ANTENNA_TUNING_HF, "%d mV",vHf);
15c4dc5a 255 }
3b692427 256 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
38e41917 257 DbpString("cancelled");
15c4dc5a 258}
259
260
da198be4 261void ReadMem(int addr) {
f7e3ed82 262 const uint8_t *data = ((uint8_t *)addr);
15c4dc5a 263
264 Dbprintf("%x: %02x %02x %02x %02x %02x %02x %02x %02x",
265 addr, data[0], data[1], data[2], data[3], data[4], data[5], data[6], data[7]);
266}
267
268/* osimage version information is linked in */
269extern struct version_information version_information;
270/* bootrom version information is pointed to from _bootphase1_version_pointer */
9783989b 271extern char *_bootphase1_version_pointer, _flash_start, _flash_end, _bootrom_start, _bootrom_end, __data_src_start__;
15c4dc5a 272void SendVersion(void)
273{
9783989b 274 char temp[USB_CMD_DATA_SIZE]; /* Limited data payload in USB packets */
275 char VersionString[USB_CMD_DATA_SIZE] = { '\0' };
e30c654b 276
277 /* Try to find the bootrom version information. Expect to find a pointer at
15c4dc5a 278 * symbol _bootphase1_version_pointer, perform slight sanity checks on the
279 * pointer, then use it.
280 */
281 char *bootrom_version = *(char**)&_bootphase1_version_pointer;
da198be4 282
15c4dc5a 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);
da198be4 295
9783989b 296 FpgaGatherVersion(FPGA_BITSTREAM_HF, temp, sizeof(temp));
297 strncat(VersionString, temp, sizeof(VersionString) - strlen(VersionString) - 1);
298
299 // Send Chip ID and used flash memory
300 uint32_t text_and_rodata_section_size = (uint32_t)&__data_src_start__ - (uint32_t)&_flash_start;
301 uint32_t compressed_data_section_size = common_area.arg1;
302 cmd_send(CMD_ACK, *(AT91C_DBGU_CIDR), text_and_rodata_section_size + compressed_data_section_size, 0, VersionString, strlen(VersionString));
15c4dc5a 303}
f62b5e12 304
305// measure the USB Speed by sending SpeedTestBufferSize bytes to client and measuring the elapsed time.
306// Note: this mimics GetFromBigbuf(), i.e. we have the overhead of the UsbCommand structure included.
0de8e387 307void printUSBSpeed(void)
f62b5e12 308{
309 Dbprintf("USB Speed:");
0de8e387 310 Dbprintf(" Sending USB packets to client...");
f62b5e12 311
0de8e387 312 #define USB_SPEED_TEST_MIN_TIME 1500 // in milliseconds
f62b5e12 313 uint8_t *test_data = BigBuf_get_addr();
0de8e387 314 uint32_t end_time;
f62b5e12 315
0de8e387 316 uint32_t start_time = end_time = GetTickCount();
317 uint32_t bytes_transferred = 0;
f62b5e12 318
319 LED_B_ON();
0de8e387 320 while(end_time < start_time + USB_SPEED_TEST_MIN_TIME) {
321 cmd_send(CMD_DOWNLOADED_RAW_ADC_SAMPLES_125K, 0, USB_CMD_DATA_SIZE, 0, test_data, USB_CMD_DATA_SIZE);
322 end_time = GetTickCount();
323 bytes_transferred += USB_CMD_DATA_SIZE;
f62b5e12 324 }
325 LED_B_OFF();
326
0de8e387 327 Dbprintf(" Time elapsed: %dms", end_time - start_time);
328 Dbprintf(" Bytes transferred: %d", bytes_transferred);
329 Dbprintf(" USB Transfer Speed PM3 -> Client = %d Bytes/s",
330 1000 * bytes_transferred / (end_time - start_time));
f62b5e12 331
332}
333
7838f4be 334/**
335 * Prints runtime information about the PM3.
336**/
da198be4 337void SendStatus(void) {
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);
b7536e11 664 Dbprintf("Recorded %x %x %08x", selected, high[selected], low[selected]);
15c4dc5a 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
b7536e11 680 Dbprintf("Cloning %x %x %08x", 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
b7536e11 689 CopyHIDtoT55x7(0, high[selected], low[selected], 0);
690 Dbprintf("Cloned %x %x %08x", 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
b7536e11 721 Dbprintf("%x %x %08x", 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
da198be4 785void ListenReaderField(int limit) {
3b692427 786#define LF_ONLY 1
787#define HF_ONLY 2
788#define REPORT_CHANGE 10 // report new values only if they have changed at least by REPORT_CHANGE
789
da198be4 790 int lf_av, lf_av_new, lf_baseline= 0, lf_max;
791 int hf_av, hf_av_new, hf_baseline= 0, hf_max;
792 int mode=1, display_val, display_max, i;
3b692427 793
794 // switch off FPGA - we don't want to measure our own signal
795 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
796 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
15c4dc5a 797
798 LEDsoff();
799
3b692427 800 lf_av = lf_max = AvgAdc(ADC_CHAN_LF);
15c4dc5a 801
802 if(limit != HF_ONLY) {
3b692427 803 Dbprintf("LF 125/134kHz Baseline: %dmV", (MAX_ADC_LF_VOLTAGE * lf_av) >> 10);
15c4dc5a 804 lf_baseline = lf_av;
805 }
806
3b692427 807 hf_av = hf_max = AvgAdc(ADC_CHAN_HF);
15c4dc5a 808
809 if (limit != LF_ONLY) {
3b692427 810 Dbprintf("HF 13.56MHz Baseline: %dmV", (MAX_ADC_HF_VOLTAGE * hf_av) >> 10);
15c4dc5a 811 hf_baseline = hf_av;
812 }
813
814 for(;;) {
815 if (BUTTON_PRESS()) {
816 SpinDelay(500);
817 switch (mode) {
818 case 1:
819 mode=2;
820 DbpString("Signal Strength Mode");
821 break;
822 case 2:
823 default:
824 DbpString("Stopped");
825 LEDsoff();
826 return;
827 break;
828 }
829 }
830 WDT_HIT();
831
832 if (limit != HF_ONLY) {
3b692427 833 if(mode == 1) {
f2c2b174 834 if (ABS(lf_av - lf_baseline) > REPORT_CHANGE)
3b692427 835 LED_D_ON();
836 else
837 LED_D_OFF();
15c4dc5a 838 }
e30c654b 839
3b692427 840 lf_av_new = AvgAdc(ADC_CHAN_LF);
15c4dc5a 841 // see if there's a significant change
f2c2b174 842 if(ABS(lf_av - lf_av_new) > REPORT_CHANGE) {
3b692427 843 Dbprintf("LF 125/134kHz Field Change: %5dmV", (MAX_ADC_LF_VOLTAGE * lf_av_new) >> 10);
15c4dc5a 844 lf_av = lf_av_new;
845 if (lf_av > lf_max)
846 lf_max = lf_av;
15c4dc5a 847 }
848 }
849
850 if (limit != LF_ONLY) {
851 if (mode == 1){
f2c2b174 852 if (ABS(hf_av - hf_baseline) > REPORT_CHANGE)
3b692427 853 LED_B_ON();
854 else
855 LED_B_OFF();
15c4dc5a 856 }
e30c654b 857
3b692427 858 hf_av_new = AvgAdc(ADC_CHAN_HF);
15c4dc5a 859 // see if there's a significant change
f2c2b174 860 if(ABS(hf_av - hf_av_new) > REPORT_CHANGE) {
3b692427 861 Dbprintf("HF 13.56MHz Field Change: %5dmV", (MAX_ADC_HF_VOLTAGE * hf_av_new) >> 10);
15c4dc5a 862 hf_av = hf_av_new;
863 if (hf_av > hf_max)
864 hf_max = hf_av;
15c4dc5a 865 }
866 }
e30c654b 867
15c4dc5a 868 if(mode == 2) {
869 if (limit == LF_ONLY) {
870 display_val = lf_av;
871 display_max = lf_max;
872 } else if (limit == HF_ONLY) {
873 display_val = hf_av;
874 display_max = hf_max;
875 } else { /* Pick one at random */
876 if( (hf_max - hf_baseline) > (lf_max - lf_baseline) ) {
877 display_val = hf_av;
878 display_max = hf_max;
879 } else {
880 display_val = lf_av;
881 display_max = lf_max;
882 }
883 }
884 for (i=0; i<LIGHT_LEN; i++) {
885 if (display_val >= ((display_max/LIGHT_LEN)*i) && display_val <= ((display_max/LIGHT_LEN)*(i+1))) {
886 if (LIGHT_SCHEME[i] & 0x1) LED_C_ON(); else LED_C_OFF();
887 if (LIGHT_SCHEME[i] & 0x2) LED_A_ON(); else LED_A_OFF();
888 if (LIGHT_SCHEME[i] & 0x4) LED_B_ON(); else LED_B_OFF();
889 if (LIGHT_SCHEME[i] & 0x8) LED_D_ON(); else LED_D_OFF();
890 break;
891 }
892 }
893 }
894 }
895}
896
f7e3ed82 897void UsbPacketReceived(uint8_t *packet, int len)
15c4dc5a 898{
899 UsbCommand *c = (UsbCommand *)packet;
15c4dc5a 900
f121b478 901 //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 902
15c4dc5a 903 switch(c->cmd) {
904#ifdef WITH_LF
31abe49f
MHS
905 case CMD_SET_LF_SAMPLING_CONFIG:
906 setSamplingConfig((sample_config *) c->d.asBytes);
907 break;
15c4dc5a 908 case CMD_ACQUIRE_RAW_ADC_SAMPLES_125K:
1c8fbeb9 909 cmd_send(CMD_ACK, SampleLF(c->arg[0]),0,0,0,0);
15c4dc5a 910 break;
15c4dc5a 911 case CMD_MOD_THEN_ACQUIRE_RAW_ADC_SAMPLES_125K:
d0724780 912 ModThenAcquireRawAdcSamples125k(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
15c4dc5a 913 break;
b014c96d 914 case CMD_LF_SNOOP_RAW_ADC_SAMPLES:
31abe49f 915 cmd_send(CMD_ACK,SnoopLF(),0,0,0,0);
b014c96d 916 break;
7e67e42f 917 case CMD_HID_DEMOD_FSK:
a501c82b 918 CmdHIDdemodFSK(c->arg[0], 0, 0, 1);
7e67e42f 919 break;
920 case CMD_HID_SIM_TAG:
a501c82b 921 CmdHIDsimTAG(c->arg[0], c->arg[1], 1);
7e67e42f 922 break;
abd6112f 923 case CMD_FSK_SIM_TAG:
924 CmdFSKsimTAG(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
925 break;
926 case CMD_ASK_SIM_TAG:
927 CmdASKsimTag(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
928 break;
872e3d4d 929 case CMD_PSK_SIM_TAG:
930 CmdPSKsimTag(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
931 break;
a501c82b 932 case CMD_HID_CLONE_TAG:
1c611bbd 933 CopyHIDtoT55x7(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
7e67e42f 934 break;
a1f3bb12 935 case CMD_IO_DEMOD_FSK:
a501c82b 936 CmdIOdemodFSK(c->arg[0], 0, 0, 1);
a1f3bb12 937 break;
a501c82b 938 case CMD_IO_CLONE_TAG:
94422fa2 939 CopyIOtoT55x7(c->arg[0], c->arg[1]);
a1f3bb12 940 break;
6ff6ade2 941 case CMD_EM410X_DEMOD:
942 CmdEM410xdemod(c->arg[0], 0, 0, 1);
943 break;
2d4eae76 944 case CMD_EM410X_WRITE_TAG:
945 WriteEM410x(c->arg[0], c->arg[1], c->arg[2]);
946 break;
7e67e42f 947 case CMD_READ_TI_TYPE:
948 ReadTItag();
949 break;
950 case CMD_WRITE_TI_TYPE:
951 WriteTItag(c->arg[0],c->arg[1],c->arg[2]);
952 break;
953 case CMD_SIMULATE_TAG_125K:
f121b478 954 LED_A_ON();
74daee24 955 SimulateTagLowFrequency(c->arg[0], c->arg[1], 1);
956 LED_A_OFF();
7e67e42f 957 break;
958 case CMD_LF_SIMULATE_BIDIR:
959 SimulateTagLowFrequencyBidir(c->arg[0], c->arg[1]);
960 break;
a501c82b 961 case CMD_INDALA_CLONE_TAG:
2414f978 962 CopyIndala64toT55x7(c->arg[0], c->arg[1]);
963 break;
a501c82b 964 case CMD_INDALA_CLONE_TAG_L:
2414f978 965 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]);
966 break;
1c611bbd 967 case CMD_T55XX_READ_BLOCK:
9276e859 968 T55xxReadBlock(c->arg[0], c->arg[1], c->arg[2]);
1c611bbd 969 break;
970 case CMD_T55XX_WRITE_BLOCK:
971 T55xxWriteBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
972 break;
9276e859 973 case CMD_T55XX_WAKEUP:
974 T55xxWakeUp(c->arg[0]);
975 break;
94422fa2 976 case CMD_T55XX_RESET_READ:
977 T55xxResetRead();
978 break;
a501c82b 979 case CMD_PCF7931_READ:
1c611bbd 980 ReadPCF7931();
1c611bbd 981 break;
e98572a1 982 case CMD_PCF7931_WRITE:
ac2df346 983 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 984 break;
1c611bbd 985 case CMD_EM4X_READ_WORD:
986 EM4xReadWord(c->arg[1], c->arg[2],c->d.asBytes[0]);
987 break;
988 case CMD_EM4X_WRITE_WORD:
989 EM4xWriteWord(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes[0]);
990 break;
db25599d 991 case CMD_AWID_DEMOD_FSK: // Set realtime AWID demodulation
992 CmdAWIDdemodFSK(c->arg[0], 0, 0, 1);
70459879 993 break;
0de8e387 994 case CMD_VIKING_CLONE_TAG:
a126332a 995 CopyVikingtoT55xx(c->arg[0], c->arg[1], c->arg[2]);
0de8e387 996 break;
15c4dc5a 997#endif
998
d19929cb 999#ifdef WITH_HITAG
1000 case CMD_SNOOP_HITAG: // Eavesdrop Hitag tag, args = type
1001 SnoopHitag(c->arg[0]);
1002 break;
1003 case CMD_SIMULATE_HITAG: // Simulate Hitag tag, args = memory content
1004 SimulateHitagTag((bool)c->arg[0],(byte_t*)c->d.asBytes);
1005 break;
1006 case CMD_READER_HITAG: // Reader for Hitag tags, args = type and function
1007 ReaderHitag((hitag_function)c->arg[0],(hitag_data*)c->d.asBytes);
1008 break;
0db11b71 1009 case CMD_SIMULATE_HITAG_S:// Simulate Hitag s tag, args = memory content
1010 SimulateHitagSTag((bool)c->arg[0],(byte_t*)c->d.asBytes);
1011 break;
1012 case CMD_TEST_HITAGS_TRACES:// Tests every challenge within the given file
1013 check_challenges((bool)c->arg[0],(byte_t*)c->d.asBytes);
1014 break;
6fc68747 1015 case CMD_READ_HITAG_S: //Reader for only Hitag S tags, args = key or challenge
0db11b71 1016 ReadHitagS((hitag_function)c->arg[0],(hitag_data*)c->d.asBytes);
1017 break;
6fc68747 1018 case CMD_WR_HITAG_S: //writer for Hitag tags args=data to write,page and key or challenge
0db11b71 1019 WritePageHitagS((hitag_function)c->arg[0],(hitag_data*)c->d.asBytes,c->arg[2]);
1020 break;
d19929cb 1021#endif
f168b263 1022
15c4dc5a 1023#ifdef WITH_ISO15693
1024 case CMD_ACQUIRE_RAW_ADC_SAMPLES_ISO_15693:
1025 AcquireRawAdcSamplesIso15693();
1026 break;
9455b51c 1027 case CMD_RECORD_RAW_ADC_SAMPLES_ISO_15693:
1028 RecordRawAdcSamplesIso15693();
1029 break;
1030
1031 case CMD_ISO_15693_COMMAND:
1032 DirectTag15693Command(c->arg[0],c->arg[1],c->arg[2],c->d.asBytes);
1033 break;
1034
1035 case CMD_ISO_15693_FIND_AFI:
1036 BruteforceIso15693Afi(c->arg[0]);
1037 break;
1038
1039 case CMD_ISO_15693_DEBUG:
1040 SetDebugIso15693(c->arg[0]);
1041 break;
15c4dc5a 1042
15c4dc5a 1043 case CMD_READER_ISO_15693:
1044 ReaderIso15693(c->arg[0]);
1045 break;
7e67e42f 1046 case CMD_SIMTAG_ISO_15693:
3649b640 1047 SimTagIso15693(c->arg[0], c->d.asBytes);
7e67e42f 1048 break;
15c4dc5a 1049#endif
1050
7e67e42f 1051#ifdef WITH_LEGICRF
1052 case CMD_SIMULATE_TAG_LEGIC_RF:
1053 LegicRfSimulate(c->arg[0], c->arg[1], c->arg[2]);
1054 break;
3612a8a8 1055
7e67e42f 1056 case CMD_WRITER_LEGIC_RF:
f121b478 1057 LegicRfWriter( c->arg[0], c->arg[1], c->arg[2]);
7e67e42f 1058 break;
3612a8a8 1059
3e134b4c 1060 case CMD_RAW_WRITER_LEGIC_RF:
f121b478 1061 LegicRfRawWriter(c->arg[0], c->arg[1], c->arg[2]);
3e134b4c 1062 break;
1063
15c4dc5a 1064 case CMD_READER_LEGIC_RF:
f121b478 1065 LegicRfReader(c->arg[0], c->arg[1], c->arg[2]);
15c4dc5a 1066 break;
15c4dc5a 1067#endif
1068
1069#ifdef WITH_ISO14443b
6fc68747 1070 case CMD_READ_SRI_TAG:
1071 ReadSTMemoryIso14443b(c->arg[0]);
7e67e42f 1072 break;
22e24700 1073 case CMD_SNOOP_ISO_14443B:
abb21530 1074 SnoopIso14443b();
7e67e42f 1075 break;
22e24700 1076 case CMD_SIMULATE_TAG_ISO_14443B:
dccddaef 1077 SimulateIso14443bTag(c->arg[0]);
7e67e42f 1078 break;
7cf3ef20 1079 case CMD_ISO_14443B_COMMAND:
6fc68747 1080 //SendRawCommand14443B(c->arg[0],c->arg[1],c->arg[2],c->d.asBytes);
1081 SendRawCommand14443B_Ex(c);
7cf3ef20 1082 break;
15c4dc5a 1083#endif
1084
1085#ifdef WITH_ISO14443a
7e67e42f 1086 case CMD_SNOOP_ISO_14443a:
4d2e4eea 1087 SniffIso14443a(c->arg[0]);
7e67e42f 1088 break;
15c4dc5a 1089 case CMD_READER_ISO_14443a:
902cb3c0 1090 ReaderIso14443a(c);
15c4dc5a 1091 break;
7e67e42f 1092 case CMD_SIMULATE_TAG_ISO_14443a:
0db6ed9a 1093 SimulateIso14443aTag(c->arg[0], c->arg[1], c->d.asBytes); // ## Simulate iso14443a tag - pass tag type & UID
7e67e42f 1094 break;
5acd09bd 1095 case CMD_EPA_PACE_COLLECT_NONCE:
902cb3c0 1096 EPA_PACE_Collect_Nonce(c);
5acd09bd 1097 break;
d0f3338e 1098 case CMD_EPA_PACE_REPLAY:
1099 EPA_PACE_Replay(c);
1100 break;
15c4dc5a 1101 case CMD_READER_MIFARE:
df007486 1102 ReaderMifare(c->arg[0], c->arg[1], c->arg[2]);
15c4dc5a 1103 break;
20f9a2a1
M
1104 case CMD_MIFARE_READBL:
1105 MifareReadBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1106 break;
981bd429 1107 case CMD_MIFAREU_READBL:
aa60d156 1108 MifareUReadBlock(c->arg[0],c->arg[1], c->d.asBytes);
981bd429 1109 break;
4d2e4eea 1110 case CMD_MIFAREUC_AUTH:
1111 MifareUC_Auth(c->arg[0],c->d.asBytes);
f38a1528 1112 break;
981bd429 1113 case CMD_MIFAREU_READCARD:
74daee24 1114 MifareUReadCard(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
117d9ec2 1115 break;
aa60d156 1116 case CMD_MIFAREUC_SETPWD:
1117 MifareUSetPwd(c->arg[0], c->d.asBytes);
117d9ec2 1118 break;
20f9a2a1
M
1119 case CMD_MIFARE_READSC:
1120 MifareReadSector(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1121 break;
1122 case CMD_MIFARE_WRITEBL:
1123 MifareWriteBlock(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1124 break;
95aeb706 1125 //case CMD_MIFAREU_WRITEBL_COMPAT:
1126 //MifareUWriteBlockCompat(c->arg[0], c->d.asBytes);
1127 //break;
981bd429 1128 case CMD_MIFAREU_WRITEBL:
95aeb706 1129 MifareUWriteBlock(c->arg[0], c->arg[1], c->d.asBytes);
aa60d156 1130 break;
c188b1b9 1131 case CMD_MIFARE_ACQUIRE_ENCRYPTED_NONCES:
1132 MifareAcquireEncryptedNonces(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1133 break;
20f9a2a1
M
1134 case CMD_MIFARE_NESTED:
1135 MifareNested(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
f397b5cc
M
1136 break;
1137 case CMD_MIFARE_CHKKEYS:
1138 MifareChkKeys(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
20f9a2a1
M
1139 break;
1140 case CMD_SIMULATE_MIFARE_CARD:
1141 Mifare1ksim(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1142 break;
8556b852
M
1143
1144 // emulator
1145 case CMD_MIFARE_SET_DBGMODE:
1146 MifareSetDbgLvl(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1147 break;
1148 case CMD_MIFARE_EML_MEMCLR:
1149 MifareEMemClr(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1150 break;
1151 case CMD_MIFARE_EML_MEMSET:
1152 MifareEMemSet(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1153 break;
1154 case CMD_MIFARE_EML_MEMGET:
1155 MifareEMemGet(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1156 break;
1157 case CMD_MIFARE_EML_CARDLOAD:
1158 MifareECardLoad(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
0675f200
M
1159 break;
1160
1161 // Work with "magic Chinese" card
d52e4e88 1162 case CMD_MIFARE_CSETBLOCK:
c2731f37 1163 MifareCSetBlock(c->arg[0], c->arg[1], c->d.asBytes);
545a1f38 1164 break;
d52e4e88 1165 case CMD_MIFARE_CGETBLOCK:
c2731f37 1166 MifareCGetBlock(c->arg[0], c->arg[1], c->d.asBytes);
8556b852 1167 break;
d52e4e88 1168 case CMD_MIFARE_CIDENT:
1169 MifareCIdent();
1170 break;
b62a5a84
M
1171
1172 // mifare sniffer
1173 case CMD_MIFARE_SNIFFER:
5cd9ec01 1174 SniffMifare(c->arg[0]);
b62a5a84 1175 break;
313ee67e 1176
aa60d156 1177 //mifare desfire
1178 case CMD_MIFARE_DESFIRE_READBL: break;
1179 case CMD_MIFARE_DESFIRE_WRITEBL: break;
1180 case CMD_MIFARE_DESFIRE_AUTH1:
1181 MifareDES_Auth1(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1182 break;
1183 case CMD_MIFARE_DESFIRE_AUTH2:
1184 //MifareDES_Auth2(c->arg[0],c->d.asBytes);
1185 break;
1186 case CMD_MIFARE_DES_READER:
1187 //readermifaredes(c->arg[0], c->arg[1], c->d.asBytes);
1188 break;
1189 case CMD_MIFARE_DESFIRE_INFO:
1190 MifareDesfireGetInformation();
1191 break;
1192 case CMD_MIFARE_DESFIRE:
1193 MifareSendCommand(c->arg[0], c->arg[1], c->d.asBytes);
1194 break;
1195
add0504d 1196 case CMD_MIFARE_COLLECT_NONCES:
add0504d 1197 break;
20f9a2a1 1198#endif
810f5379 1199#ifdef WITH_EMV
1200 case CMD_EMV_TRANSACTION:
1201 EMVTransaction();
1202 break;
1203 case CMD_EMV_GET_RANDOM_NUM:
1204 //EMVgetUDOL();
1205 break;
1206 case CMD_EMV_LOAD_VALUE:
1207 EMVloadvalue(c->arg[0], c->d.asBytes);
1208 break;
1209 case CMD_EMV_DUMP_CARD:
1210 EMVdumpcard();
1211#endif
7e67e42f 1212#ifdef WITH_ICLASS
cee5a30d 1213 // Makes use of ISO14443a FPGA Firmware
1214 case CMD_SNOOP_ICLASS:
1215 SnoopIClass();
1216 break;
1e262141 1217 case CMD_SIMULATE_TAG_ICLASS:
ff7bb4ef 1218 SimulateIClass(c->arg[0], c->arg[1], c->arg[2], c->d.asBytes);
1e262141 1219 break;
1220 case CMD_READER_ICLASS:
1221 ReaderIClass(c->arg[0]);
1222 break;
f38a1528 1223 case CMD_READER_ICLASS_REPLAY:
f62b5e12 1224 ReaderIClass_Replay(c->arg[0], c->d.asBytes);
f38a1528 1225 break;
e80aeb96
MHS
1226 case CMD_ICLASS_EML_MEMSET:
1227 emlSet(c->d.asBytes,c->arg[0], c->arg[1]);
1228 break;
e98572a1 1229 case CMD_ICLASS_WRITEBLOCK:
1230 iClass_WriteBlock(c->arg[0], c->d.asBytes);
1231 break;
1232 case CMD_ICLASS_READCHECK: // auth step 1
1233 iClass_ReadCheck(c->arg[0], c->arg[1]);
1234 break;
1235 case CMD_ICLASS_READBLOCK:
1236 iClass_ReadBlk(c->arg[0]);
1237 break;
1238 case CMD_ICLASS_AUTHENTICATION: //check
1239 iClass_Authentication(c->d.asBytes);
1240 break;
1241 case CMD_ICLASS_DUMP:
1242 iClass_Dump(c->arg[0], c->arg[1]);
1243 break;
1244 case CMD_ICLASS_CLONE:
1245 iClass_Clone(c->arg[0], c->arg[1], c->d.asBytes);
1246 break;
cee5a30d 1247#endif
1d0ccbe0 1248#ifdef WITH_HFSNOOP
1249 case CMD_HF_SNIFFER:
1250 HfSnoop(c->arg[0], c->arg[1]);
1251 break;
1252#endif
cee5a30d 1253
7e67e42f 1254 case CMD_BUFF_CLEAR:
117d9ec2 1255 BigBuf_Clear();
15c4dc5a 1256 break;
15c4dc5a 1257
1258 case CMD_MEASURE_ANTENNA_TUNING:
1259 MeasureAntennaTuning();
1260 break;
1261
1262 case CMD_MEASURE_ANTENNA_TUNING_HF:
1263 MeasureAntennaTuningHf();
1264 break;
1265
1266 case CMD_LISTEN_READER_FIELD:
1267 ListenReaderField(c->arg[0]);
1268 break;
1269
15c4dc5a 1270 case CMD_FPGA_MAJOR_MODE_OFF: // ## FPGA Control
1271 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
1272 SpinDelay(200);
1273 LED_D_OFF(); // LED D indicates field ON or OFF
1274 break;
1275
aaa1a9a2 1276 case CMD_DOWNLOAD_RAW_ADC_SAMPLES_125K: {
1c611bbd 1277 LED_B_ON();
117d9ec2 1278 uint8_t *BigBuf = BigBuf_get_addr();
0de8e387 1279 size_t len = 0;
1c611bbd 1280 for(size_t i=0; i<c->arg[1]; i += USB_CMD_DATA_SIZE) {
0de8e387 1281 len = MIN((c->arg[1] - i),USB_CMD_DATA_SIZE);
3000dc4e 1282 cmd_send(CMD_DOWNLOADED_RAW_ADC_SAMPLES_125K,i,len,BigBuf_get_traceLen(),BigBuf+c->arg[0]+i,len);
1c611bbd 1283 }
1284 // Trigger a finish downloading signal with an ACK frame
3000dc4e 1285 cmd_send(CMD_ACK,1,0,BigBuf_get_traceLen(),getSamplingConfig(),sizeof(sample_config));
d3b1f4e4 1286 LED_B_OFF();
1c611bbd 1287 break;
aaa1a9a2 1288 }
15c4dc5a 1289 case CMD_DOWNLOADED_SIM_SAMPLES_125K: {
117d9ec2 1290 uint8_t *b = BigBuf_get_addr();
aaa1a9a2 1291 memcpy( b + c->arg[0], c->d.asBytes, USB_CMD_DATA_SIZE);
1c611bbd 1292 cmd_send(CMD_ACK,0,0,0,0,0);
1293 break;
aaa1a9a2 1294 }
1295 case CMD_DOWNLOAD_EML_BIGBUF: {
1296 LED_B_ON();
1297 uint8_t *cardmem = BigBuf_get_EM_addr();
1298 size_t len = 0;
1299 for(size_t i=0; i < c->arg[1]; i += USB_CMD_DATA_SIZE) {
1300 len = MIN((c->arg[1] - i), USB_CMD_DATA_SIZE);
1301 cmd_send(CMD_DOWNLOADED_EML_BIGBUF, i, len, CARD_MEMORY_SIZE, cardmem + c->arg[0] + i, len);
1302 }
1303 // Trigger a finish downloading signal with an ACK frame
1304 cmd_send(CMD_ACK, 1, 0, CARD_MEMORY_SIZE, 0, 0);
1305 LED_B_OFF();
1306 break;
1307 }
15c4dc5a 1308 case CMD_READ_MEM:
1309 ReadMem(c->arg[0]);
1310 break;
1311
1312 case CMD_SET_LF_DIVISOR:
7cc204bf 1313 FpgaDownloadAndGo(FPGA_BITSTREAM_LF);
15c4dc5a 1314 FpgaSendCommand(FPGA_CMD_SET_DIVISOR, c->arg[0]);
1315 break;
1316
1317 case CMD_SET_ADC_MUX:
1318 switch(c->arg[0]) {
1319 case 0: SetAdcMuxFor(GPIO_MUXSEL_LOPKD); break;
1320 case 1: SetAdcMuxFor(GPIO_MUXSEL_LORAW); break;
1321 case 2: SetAdcMuxFor(GPIO_MUXSEL_HIPKD); break;
1322 case 3: SetAdcMuxFor(GPIO_MUXSEL_HIRAW); break;
1323 }
1324 break;
1325
1326 case CMD_VERSION:
1327 SendVersion();
1328 break;
7838f4be 1329 case CMD_STATUS:
0de8e387 1330 SendStatus();
7838f4be 1331 break;
1332 case CMD_PING:
1333 cmd_send(CMD_ACK,0,0,0,0,0);
1334 break;
15c4dc5a 1335#ifdef WITH_LCD
1336 case CMD_LCD_RESET:
1337 LCDReset();
1338 break;
1339 case CMD_LCD:
1340 LCDSend(c->arg[0]);
1341 break;
1342#endif
1343 case CMD_SETUP_WRITE:
1344 case CMD_FINISH_WRITE:
1c611bbd 1345 case CMD_HARDWARE_RESET:
1346 usb_disable();
f62b5e12 1347 SpinDelay(2000);
15c4dc5a 1348 AT91C_BASE_RSTC->RSTC_RCR = RST_CONTROL_KEY | AT91C_RSTC_PROCRST;
1349 for(;;) {
1350 // We're going to reset, and the bootrom will take control.
1351 }
1c611bbd 1352 break;
15c4dc5a 1353
1c611bbd 1354 case CMD_START_FLASH:
15c4dc5a 1355 if(common_area.flags.bootrom_present) {
1356 common_area.command = COMMON_AREA_COMMAND_ENTER_FLASH_MODE;
1357 }
1c611bbd 1358 usb_disable();
15c4dc5a 1359 AT91C_BASE_RSTC->RSTC_RCR = RST_CONTROL_KEY | AT91C_RSTC_PROCRST;
1360 for(;;);
1c611bbd 1361 break;
e30c654b 1362
15c4dc5a 1363 case CMD_DEVICE_INFO: {
902cb3c0 1364 uint32_t dev_info = DEVICE_INFO_FLAG_OSIMAGE_PRESENT | DEVICE_INFO_FLAG_CURRENT_MODE_OS;
1365 if(common_area.flags.bootrom_present) dev_info |= DEVICE_INFO_FLAG_BOOTROM_PRESENT;
1c611bbd 1366 cmd_send(CMD_DEVICE_INFO,dev_info,0,0,0,0);
1367 break;
1368 }
1369 default:
15c4dc5a 1370 Dbprintf("%s: 0x%04x","unknown command:",c->cmd);
1c611bbd 1371 break;
15c4dc5a 1372 }
1373}
1374
1375void __attribute__((noreturn)) AppMain(void)
1376{
1377 SpinDelay(100);
9e8255d4 1378 clear_trace();
15c4dc5a 1379 if(common_area.magic != COMMON_AREA_MAGIC || common_area.version != 1) {
1380 /* Initialize common area */
1381 memset(&common_area, 0, sizeof(common_area));
1382 common_area.magic = COMMON_AREA_MAGIC;
1383 common_area.version = 1;
1384 }
1385 common_area.flags.osimage_present = 1;
1386
f121b478 1387 LEDsoff();
15c4dc5a 1388
b44e5233 1389 // Init USB device
313ee67e 1390 usb_enable();
15c4dc5a 1391
1392 // The FPGA gets its clock from us from PCK0 output, so set that up.
1393 AT91C_BASE_PIOA->PIO_BSR = GPIO_PCK0;
1394 AT91C_BASE_PIOA->PIO_PDR = GPIO_PCK0;
1395 AT91C_BASE_PMC->PMC_SCER = AT91C_PMC_PCK0;
1396 // PCK0 is PLL clock / 4 = 96Mhz / 4 = 24Mhz
f121b478 1397 AT91C_BASE_PMC->PMC_PCKR[0] = AT91C_PMC_CSS_PLL_CLK | AT91C_PMC_PRES_CLK_4; // 4 for 24Mhz pck0, 2 for 48 MHZ pck0
15c4dc5a 1398 AT91C_BASE_PIOA->PIO_OER = GPIO_PCK0;
1399
1400 // Reset SPI
1401 AT91C_BASE_SPI->SPI_CR = AT91C_SPI_SWRST;
1402 // Reset SSC
1403 AT91C_BASE_SSC->SSC_CR = AT91C_SSC_SWRST;
1404
1405 // Load the FPGA image, which we have stored in our flash.
7cc204bf 1406 // (the HF version by default)
1407 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
15c4dc5a 1408
9ca155ba 1409 StartTickCount();
902cb3c0 1410
15c4dc5a 1411#ifdef WITH_LCD
15c4dc5a 1412 LCDInit();
15c4dc5a 1413#endif
1414
f62b5e12 1415 byte_t rx[sizeof(UsbCommand)];
902cb3c0 1416 size_t rx_len;
1417
15c4dc5a 1418 for(;;) {
f121b478 1419 if ( usb_poll_validate_length() ) {
1420 rx_len = usb_read(rx, sizeof(UsbCommand));
1421
da198be4 1422 if (rx_len)
f121b478 1423 UsbPacketReceived(rx, rx_len);
313ee67e 1424 }
15c4dc5a 1425 WDT_HIT();
1426
1427#ifdef WITH_LF
7838f4be 1428#ifndef WITH_ISO14443a_StandAlone
15c4dc5a 1429 if (BUTTON_HELD(1000) > 0)
1430 SamyRun();
7838f4be 1431#endif
1432#endif
1433#ifdef WITH_ISO14443a
1434#ifdef WITH_ISO14443a_StandAlone
1435 if (BUTTON_HELD(1000) > 0)
1436 StandAloneMode14a();
1437#endif
15c4dc5a 1438#endif
1439 }
1440}
Impressum, Datenschutz