]> git.zerfleddert.de Git - proxmark3-svn/blame - armsrc/iso14443b.c
fix wrong type in print bug
[proxmark3-svn] / armsrc / iso14443b.c
CommitLineData
15c4dc5a 1//-----------------------------------------------------------------------------
bd20f8f4 2// Jonathan Westhues, split Nov 2006
3//
4// This code is licensed to you under the terms of the GNU GPL, version 2 or,
5// at your option, any later version. See the LICENSE.txt file for the text of
6// the license.
7//-----------------------------------------------------------------------------
51d4f6f1 8// Routines to support ISO 14443B. This includes both the reader software and
9// the `fake tag' modes.
15c4dc5a 10//-----------------------------------------------------------------------------
bd20f8f4 11
e30c654b 12#include "proxmark3.h"
15c4dc5a 13#include "apps.h"
f7e3ed82 14#include "util.h"
9ab7a6c7 15#include "string.h"
15c4dc5a 16
f7e3ed82 17#include "iso14443crc.h"
15c4dc5a 18
0d9a86c7 19#define RECEIVE_SAMPLES_TIMEOUT 2000
705bfa10 20#define ISO14443B_DMA_BUFFER_SIZE 256
0d9a86c7 21
4be27083
FM
22// PCB Block number for APDUs
23static uint8_t pcb_blocknum = 0;
24
15c4dc5a 25//=============================================================================
26// An ISO 14443 Type B tag. We listen for commands from the reader, using
27// a UART kind of thing that's implemented in software. When we get a
28// frame (i.e., a group of bytes between SOF and EOF), we check the CRC.
29// If it's good, then we can do something appropriate with it, and send
30// a response.
31//=============================================================================
32
33//-----------------------------------------------------------------------------
34// Code up a string of octets at layer 2 (including CRC, we don't generate
35// that here) so that they can be transmitted to the reader. Doesn't transmit
36// them yet, just leaves them ready to send in ToSend[].
37//-----------------------------------------------------------------------------
f7e3ed82 38static void CodeIso14443bAsTag(const uint8_t *cmd, int len)
15c4dc5a 39{
7d5ebac9
MHS
40 int i;
41
42 ToSendReset();
43
44 // Transmit a burst of ones, as the initial thing that lets the
45 // reader get phase sync. This (TR1) must be > 80/fs, per spec,
46 // but tag that I've tried (a Paypass) exceeds that by a fair bit,
47 // so I will too.
48 for(i = 0; i < 20; i++) {
49 ToSendStuffBit(1);
50 ToSendStuffBit(1);
51 ToSendStuffBit(1);
52 ToSendStuffBit(1);
53 }
54
55 // Send SOF.
56 for(i = 0; i < 10; i++) {
57 ToSendStuffBit(0);
58 ToSendStuffBit(0);
59 ToSendStuffBit(0);
60 ToSendStuffBit(0);
61 }
62 for(i = 0; i < 2; i++) {
63 ToSendStuffBit(1);
64 ToSendStuffBit(1);
65 ToSendStuffBit(1);
66 ToSendStuffBit(1);
67 }
68
69 for(i = 0; i < len; i++) {
70 int j;
71 uint8_t b = cmd[i];
72
73 // Start bit
74 ToSendStuffBit(0);
75 ToSendStuffBit(0);
76 ToSendStuffBit(0);
77 ToSendStuffBit(0);
78
79 // Data bits
80 for(j = 0; j < 8; j++) {
81 if(b & 1) {
82 ToSendStuffBit(1);
83 ToSendStuffBit(1);
84 ToSendStuffBit(1);
85 ToSendStuffBit(1);
86 } else {
87 ToSendStuffBit(0);
88 ToSendStuffBit(0);
89 ToSendStuffBit(0);
90 ToSendStuffBit(0);
91 }
92 b >>= 1;
93 }
94
95 // Stop bit
96 ToSendStuffBit(1);
97 ToSendStuffBit(1);
98 ToSendStuffBit(1);
99 ToSendStuffBit(1);
100 }
101
51d4f6f1 102 // Send EOF.
7d5ebac9
MHS
103 for(i = 0; i < 10; i++) {
104 ToSendStuffBit(0);
105 ToSendStuffBit(0);
106 ToSendStuffBit(0);
107 ToSendStuffBit(0);
108 }
51d4f6f1 109 for(i = 0; i < 2; i++) {
7d5ebac9
MHS
110 ToSendStuffBit(1);
111 ToSendStuffBit(1);
112 ToSendStuffBit(1);
113 ToSendStuffBit(1);
114 }
115
116 // Convert from last byte pos to length
117 ToSendMax++;
15c4dc5a 118}
119
120//-----------------------------------------------------------------------------
121// The software UART that receives commands from the reader, and its state
122// variables.
123//-----------------------------------------------------------------------------
124static struct {
7d5ebac9
MHS
125 enum {
126 STATE_UNSYNCD,
127 STATE_GOT_FALLING_EDGE_OF_SOF,
128 STATE_AWAITING_START_BIT,
46734099 129 STATE_RECEIVING_DATA
7d5ebac9
MHS
130 } state;
131 uint16_t shiftReg;
132 int bitCnt;
133 int byteCnt;
134 int byteCntMax;
135 int posCnt;
136 uint8_t *output;
15c4dc5a 137} Uart;
138
139/* Receive & handle a bit coming from the reader.
51d4f6f1 140 *
141 * This function is called 4 times per bit (every 2 subcarrier cycles).
142 * Subcarrier frequency fs is 848kHz, 1/fs = 1,18us, i.e. function is called every 2,36us
15c4dc5a 143 *
144 * LED handling:
145 * LED A -> ON once we have received the SOF and are expecting the rest.
146 * LED A -> OFF once we have received EOF or are in error state or unsynced
147 *
148 * Returns: true if we received a EOF
149 * false if we are still waiting for some more
150 */
46734099 151static RAMFUNC int Handle14443bUartBit(uint8_t bit)
15c4dc5a 152{
7d5ebac9 153 switch(Uart.state) {
03dc1740 154 case STATE_UNSYNCD:
7d5ebac9
MHS
155 if(!bit) {
156 // we went low, so this could be the beginning
157 // of an SOF
158 Uart.state = STATE_GOT_FALLING_EDGE_OF_SOF;
159 Uart.posCnt = 0;
160 Uart.bitCnt = 0;
161 }
162 break;
163
164 case STATE_GOT_FALLING_EDGE_OF_SOF:
165 Uart.posCnt++;
51d4f6f1 166 if(Uart.posCnt == 2) { // sample every 4 1/fs in the middle of a bit
7d5ebac9 167 if(bit) {
51d4f6f1 168 if(Uart.bitCnt > 9) {
7d5ebac9
MHS
169 // we've seen enough consecutive
170 // zeros that it's a valid SOF
171 Uart.posCnt = 0;
172 Uart.byteCnt = 0;
173 Uart.state = STATE_AWAITING_START_BIT;
174 LED_A_ON(); // Indicate we got a valid SOF
175 } else {
176 // didn't stay down long enough
177 // before going high, error
46734099 178 Uart.state = STATE_UNSYNCD;
7d5ebac9
MHS
179 }
180 } else {
181 // do nothing, keep waiting
182 }
183 Uart.bitCnt++;
184 }
185 if(Uart.posCnt >= 4) Uart.posCnt = 0;
51d4f6f1 186 if(Uart.bitCnt > 12) {
7d5ebac9
MHS
187 // Give up if we see too many zeros without
188 // a one, too.
46734099 189 LED_A_OFF();
190 Uart.state = STATE_UNSYNCD;
7d5ebac9
MHS
191 }
192 break;
193
194 case STATE_AWAITING_START_BIT:
195 Uart.posCnt++;
196 if(bit) {
51d4f6f1 197 if(Uart.posCnt > 50/2) { // max 57us between characters = 49 1/fs, max 3 etus after low phase of SOF = 24 1/fs
7d5ebac9
MHS
198 // stayed high for too long between
199 // characters, error
46734099 200 Uart.state = STATE_UNSYNCD;
7d5ebac9
MHS
201 }
202 } else {
203 // falling edge, this starts the data byte
204 Uart.posCnt = 0;
205 Uart.bitCnt = 0;
206 Uart.shiftReg = 0;
207 Uart.state = STATE_RECEIVING_DATA;
7d5ebac9
MHS
208 }
209 break;
210
211 case STATE_RECEIVING_DATA:
212 Uart.posCnt++;
213 if(Uart.posCnt == 2) {
214 // time to sample a bit
215 Uart.shiftReg >>= 1;
216 if(bit) {
217 Uart.shiftReg |= 0x200;
218 }
219 Uart.bitCnt++;
220 }
221 if(Uart.posCnt >= 4) {
222 Uart.posCnt = 0;
223 }
224 if(Uart.bitCnt == 10) {
225 if((Uart.shiftReg & 0x200) && !(Uart.shiftReg & 0x001))
226 {
227 // this is a data byte, with correct
228 // start and stop bits
229 Uart.output[Uart.byteCnt] = (Uart.shiftReg >> 1) & 0xff;
230 Uart.byteCnt++;
231
232 if(Uart.byteCnt >= Uart.byteCntMax) {
233 // Buffer overflowed, give up
46734099 234 LED_A_OFF();
235 Uart.state = STATE_UNSYNCD;
7d5ebac9
MHS
236 } else {
237 // so get the next byte now
238 Uart.posCnt = 0;
239 Uart.state = STATE_AWAITING_START_BIT;
240 }
46734099 241 } else if (Uart.shiftReg == 0x000) {
7d5ebac9
MHS
242 // this is an EOF byte
243 LED_A_OFF(); // Finished receiving
46734099 244 Uart.state = STATE_UNSYNCD;
132a0217 245 if (Uart.byteCnt != 0) {
246 return TRUE;
247 }
7d5ebac9
MHS
248 } else {
249 // this is an error
46734099 250 LED_A_OFF();
251 Uart.state = STATE_UNSYNCD;
7d5ebac9
MHS
252 }
253 }
254 break;
255
7d5ebac9 256 default:
46734099 257 LED_A_OFF();
7d5ebac9
MHS
258 Uart.state = STATE_UNSYNCD;
259 break;
260 }
261
7d5ebac9 262 return FALSE;
15c4dc5a 263}
264
46734099 265
266static void UartReset()
267{
268 Uart.byteCntMax = MAX_FRAME_SIZE;
269 Uart.state = STATE_UNSYNCD;
270 Uart.byteCnt = 0;
271 Uart.bitCnt = 0;
272}
273
274
275static void UartInit(uint8_t *data)
276{
277 Uart.output = data;
278 UartReset();
279}
280
281
15c4dc5a 282//-----------------------------------------------------------------------------
283// Receive a command (from the reader to us, where we are the simulated tag),
284// and store it in the given buffer, up to the given maximum length. Keeps
285// spinning, waiting for a well-framed command, until either we get one
286// (returns TRUE) or someone presses the pushbutton on the board (FALSE).
287//
288// Assume that we're called with the SSC (to the FPGA) and ADC path set
289// correctly.
290//-----------------------------------------------------------------------------
46734099 291static int GetIso14443bCommandFromReader(uint8_t *received, uint16_t *len)
15c4dc5a 292{
51d4f6f1 293 // Set FPGA mode to "simulated ISO 14443B tag", no modulation (listen
7d5ebac9
MHS
294 // only, since we are receiving, not transmitting).
295 // Signal field is off with the appropriate LED
296 LED_D_OFF();
297 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_SIMULATOR | FPGA_HF_SIMULATOR_NO_MODULATION);
298
7d5ebac9 299 // Now run a `software UART' on the stream of incoming samples.
46734099 300 UartInit(received);
7d5ebac9
MHS
301
302 for(;;) {
303 WDT_HIT();
304
305 if(BUTTON_PRESS()) return FALSE;
306
7d5ebac9
MHS
307 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_RXRDY)) {
308 uint8_t b = (uint8_t)AT91C_BASE_SSC->SSC_RHR;
46734099 309 for(uint8_t mask = 0x80; mask != 0x00; mask >>= 1) {
310 if(Handle14443bUartBit(b & mask)) {
7d5ebac9
MHS
311 *len = Uart.byteCnt;
312 return TRUE;
313 }
314 }
315 }
316 }
bee99bbf 317
46734099 318 return FALSE;
15c4dc5a 319}
320
321//-----------------------------------------------------------------------------
322// Main loop of simulated tag: receive commands from reader, decide what
323// response to send, and send it.
324//-----------------------------------------------------------------------------
51d4f6f1 325void SimulateIso14443bTag(void)
15c4dc5a 326{
14660057 327 // the only commands we understand is WUPB, AFI=0, Select All, N=1:
328 static const uint8_t cmd1[] = { 0x05, 0x00, 0x08, 0x39, 0x73 }; // WUPB
329 // ... and REQB, AFI=0, Normal Request, N=1:
f3b83bee 330 static const uint8_t cmd2[] = { 0x05, 0x00, 0x00, 0x71, 0xFF }; // REQB
f3b83bee 331 // ... and HLTB
14660057 332 static const uint8_t cmd3[] = { 0x50, 0xff, 0xff, 0xff, 0xff }; // HLTB
f3b83bee 333 // ... and ATTRIB
14660057 334 static const uint8_t cmd4[] = { 0x1D, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff}; // ATTRIB
46734099 335
336 // ... and we always respond with ATQB, PUPI = 820de174, Application Data = 0x20381922,
51d4f6f1 337 // supports only 106kBit/s in both directions, max frame size = 32Bytes,
338 // supports ISO14443-4, FWI=8 (77ms), NAD supported, CID not supported:
7d5ebac9
MHS
339 static const uint8_t response1[] = {
340 0x50, 0x82, 0x0d, 0xe1, 0x74, 0x20, 0x38, 0x19, 0x22,
341 0x00, 0x21, 0x85, 0x5e, 0xd7
342 };
f3b83bee 343 // response to HLTB and ATTRIB
344 static const uint8_t response2[] = {0x00, 0x78, 0xF0};
345
15c4dc5a 346
5f605b8f 347 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
348
46734099 349 clear_trace();
350 set_tracing(TRUE);
351
352 const uint8_t *resp;
353 uint8_t *respCode;
354 uint16_t respLen, respCodeLen;
15c4dc5a 355
51d4f6f1 356 // allocate command receive buffer
357 BigBuf_free();
358 uint8_t *receivedCmd = BigBuf_malloc(MAX_FRAME_SIZE);
15c4dc5a 359
46734099 360 uint16_t len;
361 uint16_t cmdsRecvd = 0;
15c4dc5a 362
51d4f6f1 363 // prepare the (only one) tag answer:
7d5ebac9 364 CodeIso14443bAsTag(response1, sizeof(response1));
46734099 365 uint8_t *resp1Code = BigBuf_malloc(ToSendMax);
dd57061c 366 memcpy(resp1Code, ToSend, ToSendMax);
46734099 367 uint16_t resp1CodeLen = ToSendMax;
15c4dc5a 368
f3b83bee 369 // prepare the (other) tag answer:
370 CodeIso14443bAsTag(response2, sizeof(response2));
371 uint8_t *resp2Code = BigBuf_malloc(ToSendMax);
dd57061c 372 memcpy(resp2Code, ToSend, ToSendMax);
f3b83bee 373 uint16_t resp2CodeLen = ToSendMax;
374
7d5ebac9
MHS
375 // We need to listen to the high-frequency, peak-detected path.
376 SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
377 FpgaSetupSsc();
15c4dc5a 378
7d5ebac9 379 cmdsRecvd = 0;
15c4dc5a 380
7d5ebac9 381 for(;;) {
15c4dc5a 382
46734099 383 if(!GetIso14443bCommandFromReader(receivedCmd, &len)) {
51d4f6f1 384 Dbprintf("button pressed, received %d commands", cmdsRecvd);
385 break;
46734099 386 }
7d5ebac9 387
46734099 388 if (tracing) {
389 uint8_t parity[MAX_PARITY_SIZE];
390 LogTrace(receivedCmd, len, 0, 0, parity, TRUE);
391 }
7d5ebac9 392
46734099 393 // Good, look at the command now.
394 if ( (len == sizeof(cmd1) && memcmp(receivedCmd, cmd1, len) == 0)
14660057 395 || (len == sizeof(cmd2) && memcmp(receivedCmd, cmd2, len) == 0) ) {
dd57061c 396 resp = response1;
46734099 397 respLen = sizeof(response1);
dd57061c 398 respCode = resp1Code;
46734099 399 respCodeLen = resp1CodeLen;
14660057 400 } else if ( (len == sizeof(cmd3) && receivedCmd[0] == cmd3[0])
401 || (len == sizeof(cmd4) && receivedCmd[0] == cmd4[0]) ) {
dd57061c 402 resp = response2;
f3b83bee 403 respLen = sizeof(response2);
dd57061c 404 respCode = resp2Code;
f3b83bee 405 respCodeLen = resp2CodeLen;
7d5ebac9
MHS
406 } else {
407 Dbprintf("new cmd from reader: len=%d, cmdsRecvd=%d", len, cmdsRecvd);
408 // And print whether the CRC fails, just for good measure
46734099 409 uint8_t b1, b2;
f3b83bee 410 if (len >= 3){ // if crc exists
411 ComputeCrc14443(CRC_14443_B, receivedCmd, len-2, &b1, &b2);
412 if(b1 != receivedCmd[len-2] || b2 != receivedCmd[len-1]) {
413 // Not so good, try again.
414 DbpString("+++CRC fail");
14660057 415
f3b83bee 416 } else {
417 DbpString("CRC passes");
418 }
7d5ebac9 419 }
f3b83bee 420 //get rid of compiler warning
421 respCodeLen = 0;
422 resp = response1;
423 respLen = 0;
424 respCode = resp1Code;
425 //don't crash at new command just wait and see if reader will send other new cmds.
426 //break;
7d5ebac9
MHS
427 }
428
7d5ebac9
MHS
429 cmdsRecvd++;
430
431 if(cmdsRecvd > 0x30) {
432 DbpString("many commands later...");
433 break;
434 }
435
46734099 436 if(respCodeLen <= 0) continue;
7d5ebac9
MHS
437
438 // Modulate BPSK
439 // Signal field is off with the appropriate LED
440 LED_D_OFF();
441 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_SIMULATOR | FPGA_HF_SIMULATOR_MODULATE_BPSK);
442 AT91C_BASE_SSC->SSC_THR = 0xff;
443 FpgaSetupSsc();
444
445 // Transmit the response.
46734099 446 uint16_t i = 0;
7d5ebac9
MHS
447 for(;;) {
448 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_TXRDY)) {
46734099 449 uint8_t b = respCode[i];
7d5ebac9
MHS
450
451 AT91C_BASE_SSC->SSC_THR = b;
452
453 i++;
46734099 454 if(i > respCodeLen) {
7d5ebac9
MHS
455 break;
456 }
457 }
458 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_RXRDY)) {
459 volatile uint8_t b = (uint8_t)AT91C_BASE_SSC->SSC_RHR;
460 (void)b;
461 }
462 }
dd57061c 463
46734099 464 // trace the response:
465 if (tracing) {
466 uint8_t parity[MAX_PARITY_SIZE];
467 LogTrace(resp, respLen, 0, 0, parity, FALSE);
468 }
dd57061c 469
7d5ebac9 470 }
15c4dc5a 471}
472
473//=============================================================================
474// An ISO 14443 Type B reader. We take layer two commands, code them
475// appropriately, and then send them to the tag. We then listen for the
476// tag's response, which we leave in the buffer to be demodulated on the
477// PC side.
478//=============================================================================
479
480static struct {
7d5ebac9
MHS
481 enum {
482 DEMOD_UNSYNCD,
483 DEMOD_PHASE_REF_TRAINING,
484 DEMOD_AWAITING_FALLING_EDGE_OF_SOF,
485 DEMOD_GOT_FALLING_EDGE_OF_SOF,
486 DEMOD_AWAITING_START_BIT,
46734099 487 DEMOD_RECEIVING_DATA
7d5ebac9
MHS
488 } state;
489 int bitCount;
490 int posCount;
491 int thisBit;
51d4f6f1 492/* this had been used to add RSSI (Received Signal Strength Indication) to traces. Currently not implemented.
7d5ebac9
MHS
493 int metric;
494 int metricN;
51d4f6f1 495*/
7d5ebac9
MHS
496 uint16_t shiftReg;
497 uint8_t *output;
498 int len;
499 int sumI;
500 int sumQ;
15c4dc5a 501} Demod;
502
503/*
504 * Handles reception of a bit from the tag
505 *
51d4f6f1 506 * This function is called 2 times per bit (every 4 subcarrier cycles).
507 * Subcarrier frequency fs is 848kHz, 1/fs = 1,18us, i.e. function is called every 4,72us
508 *
15c4dc5a 509 * LED handling:
510 * LED C -> ON once we have received the SOF and are expecting the rest.
511 * LED C -> OFF once we have received EOF or are unsynced
512 *
513 * Returns: true if we received a EOF
514 * false if we are still waiting for some more
515 *
516 */
51d4f6f1 517static RAMFUNC int Handle14443bSamplesDemod(int ci, int cq)
15c4dc5a 518{
7d5ebac9 519 int v;
15c4dc5a 520
51d4f6f1 521// The soft decision on the bit uses an estimate of just the
522// quadrant of the reference angle, not the exact angle.
15c4dc5a 523#define MAKE_SOFT_DECISION() { \
7d5ebac9
MHS
524 if(Demod.sumI > 0) { \
525 v = ci; \
526 } else { \
527 v = -ci; \
528 } \
529 if(Demod.sumQ > 0) { \
530 v += cq; \
531 } else { \
532 v -= cq; \
533 } \
534 }
15c4dc5a 535
51d4f6f1 536#define SUBCARRIER_DETECT_THRESHOLD 8
537
538// Subcarrier amplitude v = sqrt(ci^2 + cq^2), approximated here by abs(ci) + abs(cq)
539/* #define CHECK_FOR_SUBCARRIER() { \
540 v = ci; \
541 if(v < 0) v = -v; \
542 if(cq > 0) { \
543 v += cq; \
544 } else { \
545 v -= cq; \
546 } \
dd57061c 547 }
51d4f6f1 548 */
549// Subcarrier amplitude v = sqrt(ci^2 + cq^2), approximated here by max(abs(ci),abs(cq)) + 1/2*min(abs(ci),abs(cq)))
550#define CHECK_FOR_SUBCARRIER() { \
551 if(ci < 0) { \
552 if(cq < 0) { /* ci < 0, cq < 0 */ \
553 if (cq < ci) { \
554 v = -cq - (ci >> 1); \
555 } else { \
556 v = -ci - (cq >> 1); \
557 } \
558 } else { /* ci < 0, cq >= 0 */ \
559 if (cq < -ci) { \
560 v = -ci + (cq >> 1); \
561 } else { \
562 v = cq - (ci >> 1); \
563 } \
564 } \
565 } else { \
566 if(cq < 0) { /* ci >= 0, cq < 0 */ \
567 if (-cq < ci) { \
568 v = ci - (cq >> 1); \
569 } else { \
570 v = -cq + (ci >> 1); \
571 } \
572 } else { /* ci >= 0, cq >= 0 */ \
573 if (cq < ci) { \
574 v = ci + (cq >> 1); \
575 } else { \
576 v = cq + (ci >> 1); \
577 } \
578 } \
579 } \
580 }
dd57061c 581
7d5ebac9
MHS
582 switch(Demod.state) {
583 case DEMOD_UNSYNCD:
51d4f6f1 584 CHECK_FOR_SUBCARRIER();
585 if(v > SUBCARRIER_DETECT_THRESHOLD) { // subcarrier detected
7d5ebac9 586 Demod.state = DEMOD_PHASE_REF_TRAINING;
51d4f6f1 587 Demod.sumI = ci;
588 Demod.sumQ = cq;
589 Demod.posCount = 1;
590 }
7d5ebac9
MHS
591 break;
592
593 case DEMOD_PHASE_REF_TRAINING:
594 if(Demod.posCount < 8) {
51d4f6f1 595 CHECK_FOR_SUBCARRIER();
596 if (v > SUBCARRIER_DETECT_THRESHOLD) {
597 // set the reference phase (will code a logic '1') by averaging over 32 1/fs.
598 // note: synchronization time > 80 1/fs
599 Demod.sumI += ci;
600 Demod.sumQ += cq;
601 Demod.posCount++;
602 } else { // subcarrier lost
603 Demod.state = DEMOD_UNSYNCD;
7d5ebac9 604 }
51d4f6f1 605 } else {
606 Demod.state = DEMOD_AWAITING_FALLING_EDGE_OF_SOF;
7d5ebac9 607 }
7d5ebac9
MHS
608 break;
609
610 case DEMOD_AWAITING_FALLING_EDGE_OF_SOF:
611 MAKE_SOFT_DECISION();
51d4f6f1 612 if(v < 0) { // logic '0' detected
7d5ebac9 613 Demod.state = DEMOD_GOT_FALLING_EDGE_OF_SOF;
51d4f6f1 614 Demod.posCount = 0; // start of SOF sequence
7d5ebac9 615 } else {
51d4f6f1 616 if(Demod.posCount > 200/4) { // maximum length of TR1 = 200 1/fs
7d5ebac9
MHS
617 Demod.state = DEMOD_UNSYNCD;
618 }
619 }
620 Demod.posCount++;
621 break;
622
623 case DEMOD_GOT_FALLING_EDGE_OF_SOF:
51d4f6f1 624 Demod.posCount++;
7d5ebac9
MHS
625 MAKE_SOFT_DECISION();
626 if(v > 0) {
51d4f6f1 627 if(Demod.posCount < 9*2) { // low phase of SOF too short (< 9 etu). Note: spec is >= 10, but FPGA tends to "smear" edges
7d5ebac9
MHS
628 Demod.state = DEMOD_UNSYNCD;
629 } else {
630 LED_C_ON(); // Got SOF
631 Demod.state = DEMOD_AWAITING_START_BIT;
632 Demod.posCount = 0;
633 Demod.len = 0;
51d4f6f1 634/* this had been used to add RSSI (Received Signal Strength Indication) to traces. Currently not implemented.
7d5ebac9
MHS
635 Demod.metricN = 0;
636 Demod.metric = 0;
51d4f6f1 637*/
7d5ebac9
MHS
638 }
639 } else {
51d4f6f1 640 if(Demod.posCount > 12*2) { // low phase of SOF too long (> 12 etu)
7d5ebac9 641 Demod.state = DEMOD_UNSYNCD;
09c66f1f 642 LED_C_OFF();
7d5ebac9
MHS
643 }
644 }
7d5ebac9
MHS
645 break;
646
647 case DEMOD_AWAITING_START_BIT:
51d4f6f1 648 Demod.posCount++;
7d5ebac9
MHS
649 MAKE_SOFT_DECISION();
650 if(v > 0) {
51d4f6f1 651 if(Demod.posCount > 3*2) { // max 19us between characters = 16 1/fs, max 3 etu after low phase of SOF = 24 1/fs
7d5ebac9 652 Demod.state = DEMOD_UNSYNCD;
09c66f1f 653 LED_C_OFF();
7d5ebac9 654 }
51d4f6f1 655 } else { // start bit detected
7d5ebac9 656 Demod.bitCount = 0;
51d4f6f1 657 Demod.posCount = 1; // this was the first half
7d5ebac9
MHS
658 Demod.thisBit = v;
659 Demod.shiftReg = 0;
660 Demod.state = DEMOD_RECEIVING_DATA;
661 }
662 break;
663
664 case DEMOD_RECEIVING_DATA:
665 MAKE_SOFT_DECISION();
51d4f6f1 666 if(Demod.posCount == 0) { // first half of bit
7d5ebac9
MHS
667 Demod.thisBit = v;
668 Demod.posCount = 1;
51d4f6f1 669 } else { // second half of bit
7d5ebac9
MHS
670 Demod.thisBit += v;
671
51d4f6f1 672/* this had been used to add RSSI (Received Signal Strength Indication) to traces. Currently not implemented.
7d5ebac9
MHS
673 if(Demod.thisBit > 0) {
674 Demod.metric += Demod.thisBit;
675 } else {
676 Demod.metric -= Demod.thisBit;
677 }
678 (Demod.metricN)++;
dd57061c 679*/
7d5ebac9
MHS
680
681 Demod.shiftReg >>= 1;
51d4f6f1 682 if(Demod.thisBit > 0) { // logic '1'
7d5ebac9
MHS
683 Demod.shiftReg |= 0x200;
684 }
685
686 Demod.bitCount++;
687 if(Demod.bitCount == 10) {
688 uint16_t s = Demod.shiftReg;
51d4f6f1 689 if((s & 0x200) && !(s & 0x001)) { // stop bit == '1', start bit == '0'
7d5ebac9
MHS
690 uint8_t b = (s >> 1);
691 Demod.output[Demod.len] = b;
692 Demod.len++;
693 Demod.state = DEMOD_AWAITING_START_BIT;
7d5ebac9
MHS
694 } else {
695 Demod.state = DEMOD_UNSYNCD;
09c66f1f 696 LED_C_OFF();
697 if(s == 0x000) {
51d4f6f1 698 // This is EOF (start, stop and all data bits == '0'
09c66f1f 699 return TRUE;
700 }
7d5ebac9
MHS
701 }
702 }
703 Demod.posCount = 0;
704 }
705 break;
706
707 default:
708 Demod.state = DEMOD_UNSYNCD;
09c66f1f 709 LED_C_OFF();
7d5ebac9
MHS
710 break;
711 }
712
7d5ebac9
MHS
713 return FALSE;
714}
67ac4bf7 715
716
aeadbdb2
MHS
717static void DemodReset()
718{
719 // Clear out the state of the "UART" that receives from the tag.
aeadbdb2
MHS
720 Demod.len = 0;
721 Demod.state = DEMOD_UNSYNCD;
51d4f6f1 722 Demod.posCount = 0;
aeadbdb2 723 memset(Demod.output, 0x00, MAX_FRAME_SIZE);
7d5ebac9 724}
67ac4bf7 725
726
7d5ebac9
MHS
727static void DemodInit(uint8_t *data)
728{
729 Demod.output = data;
730 DemodReset();
aeadbdb2
MHS
731}
732
67ac4bf7 733
15c4dc5a 734/*
355c8b4a 735 * Demodulate the samples we received from the tag, also log to tracebuffer
15c4dc5a 736 * quiet: set to 'TRUE' to disable debug output
737 */
51d4f6f1 738static void GetSamplesFor14443bDemod(int n, bool quiet)
15c4dc5a 739{
7d5ebac9 740 int max = 0;
51d4f6f1 741 bool gotFrame = FALSE;
7d5ebac9
MHS
742 int lastRxCounter, ci, cq, samples = 0;
743
744 // Allocate memory from BigBuf for some buffers
745 // free all previous allocations first
746 BigBuf_free();
dd57061c 747
7d5ebac9
MHS
748 // The response (tag -> reader) that we're receiving.
749 uint8_t *receivedResponse = BigBuf_malloc(MAX_FRAME_SIZE);
dd57061c 750
7d5ebac9 751 // The DMA buffer, used to stream samples from the FPGA
705bfa10 752 int8_t *dmaBuf = (int8_t*) BigBuf_malloc(ISO14443B_DMA_BUFFER_SIZE);
15c4dc5a 753
7d5ebac9
MHS
754 // Set up the demodulator for tag -> reader responses.
755 DemodInit(receivedResponse);
15c4dc5a 756
7d5ebac9 757 // Setup and start DMA.
705bfa10 758 FpgaSetupSscDma((uint8_t*) dmaBuf, ISO14443B_DMA_BUFFER_SIZE);
15c4dc5a 759
67ac4bf7 760 int8_t *upTo = dmaBuf;
705bfa10 761 lastRxCounter = ISO14443B_DMA_BUFFER_SIZE;
15c4dc5a 762
7d5ebac9 763 // Signal field is ON with the appropriate LED:
51d4f6f1 764 LED_D_ON();
7d5ebac9 765 // And put the FPGA in the appropriate mode
da586b17 766 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR | FPGA_HF_READER_RX_XCORR_848_KHZ);
15c4dc5a 767
7d5ebac9
MHS
768 for(;;) {
769 int behindBy = lastRxCounter - AT91C_BASE_PDC_SSC->PDC_RCR;
770 if(behindBy > max) max = behindBy;
15c4dc5a 771
705bfa10 772 while(((lastRxCounter-AT91C_BASE_PDC_SSC->PDC_RCR) & (ISO14443B_DMA_BUFFER_SIZE-1)) > 2) {
7d5ebac9
MHS
773 ci = upTo[0];
774 cq = upTo[1];
775 upTo += 2;
705bfa10 776 if(upTo >= dmaBuf + ISO14443B_DMA_BUFFER_SIZE) {
0d9a86c7 777 upTo = dmaBuf;
7d5ebac9 778 AT91C_BASE_PDC_SSC->PDC_RNPR = (uint32_t) upTo;
705bfa10 779 AT91C_BASE_PDC_SSC->PDC_RNCR = ISO14443B_DMA_BUFFER_SIZE;
7d5ebac9
MHS
780 }
781 lastRxCounter -= 2;
782 if(lastRxCounter <= 0) {
705bfa10 783 lastRxCounter += ISO14443B_DMA_BUFFER_SIZE;
7d5ebac9 784 }
15c4dc5a 785
7d5ebac9 786 samples += 2;
15c4dc5a 787
51d4f6f1 788 if(Handle14443bSamplesDemod(ci, cq)) {
789 gotFrame = TRUE;
790 break;
7d5ebac9
MHS
791 }
792 }
15c4dc5a 793
51d4f6f1 794 if(samples > n || gotFrame) {
7d5ebac9
MHS
795 break;
796 }
797 }
51d4f6f1 798
7d5ebac9 799 AT91C_BASE_PDC_SSC->PDC_PTCR = AT91C_PDC_RXTDIS;
51d4f6f1 800
801 if (!quiet) Dbprintf("max behindby = %d, samples = %d, gotFrame = %d, Demod.len = %d, Demod.sumI = %d, Demod.sumQ = %d", max, samples, gotFrame, Demod.len, Demod.sumI, Demod.sumQ);
355c8b4a
MHS
802 //Tracing
803 if (tracing && Demod.len > 0) {
804 uint8_t parity[MAX_PARITY_SIZE];
0d9a86c7 805 LogTrace(Demod.output, Demod.len, 0, 0, parity, FALSE);
355c8b4a 806 }
15c4dc5a 807}
808
67ac4bf7 809
15c4dc5a 810//-----------------------------------------------------------------------------
811// Transmit the command (to the tag) that was placed in ToSend[].
812//-----------------------------------------------------------------------------
51d4f6f1 813static void TransmitFor14443b(void)
15c4dc5a 814{
7d5ebac9 815 int c;
15c4dc5a 816
7d5ebac9 817 FpgaSetupSsc();
15c4dc5a 818
7d5ebac9
MHS
819 while(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_TXRDY)) {
820 AT91C_BASE_SSC->SSC_THR = 0xff;
821 }
15c4dc5a 822
7d5ebac9 823 // Signal field is ON with the appropriate Red LED
15c4dc5a 824 LED_D_ON();
825 // Signal we are transmitting with the Green LED
826 LED_B_ON();
51d4f6f1 827 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_TX | FPGA_HF_READER_TX_SHALLOW_MOD);
7d5ebac9
MHS
828
829 for(c = 0; c < 10;) {
830 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_TXRDY)) {
831 AT91C_BASE_SSC->SSC_THR = 0xff;
832 c++;
833 }
834 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_RXRDY)) {
835 volatile uint32_t r = AT91C_BASE_SSC->SSC_RHR;
836 (void)r;
837 }
838 WDT_HIT();
839 }
840
841 c = 0;
842 for(;;) {
843 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_TXRDY)) {
844 AT91C_BASE_SSC->SSC_THR = ToSend[c];
845 c++;
846 if(c >= ToSendMax) {
847 break;
848 }
849 }
850 if(AT91C_BASE_SSC->SSC_SR & (AT91C_SSC_RXRDY)) {
851 volatile uint32_t r = AT91C_BASE_SSC->SSC_RHR;
852 (void)r;
853 }
854 WDT_HIT();
855 }
856 LED_B_OFF(); // Finished sending
15c4dc5a 857}
858
67ac4bf7 859
15c4dc5a 860//-----------------------------------------------------------------------------
861// Code a layer 2 command (string of octets, including CRC) into ToSend[],
51d4f6f1 862// so that it is ready to transmit to the tag using TransmitFor14443b().
15c4dc5a 863//-----------------------------------------------------------------------------
7cf3ef20 864static void CodeIso14443bAsReader(const uint8_t *cmd, int len)
15c4dc5a 865{
7d5ebac9
MHS
866 int i, j;
867 uint8_t b;
868
869 ToSendReset();
870
871 // Establish initial reference level
872 for(i = 0; i < 40; i++) {
873 ToSendStuffBit(1);
874 }
875 // Send SOF
876 for(i = 0; i < 10; i++) {
877 ToSendStuffBit(0);
878 }
879
880 for(i = 0; i < len; i++) {
881 // Stop bits/EGT
882 ToSendStuffBit(1);
883 ToSendStuffBit(1);
884 // Start bit
885 ToSendStuffBit(0);
886 // Data bits
887 b = cmd[i];
888 for(j = 0; j < 8; j++) {
889 if(b & 1) {
890 ToSendStuffBit(1);
891 } else {
892 ToSendStuffBit(0);
893 }
894 b >>= 1;
895 }
896 }
897 // Send EOF
898 ToSendStuffBit(1);
899 for(i = 0; i < 10; i++) {
900 ToSendStuffBit(0);
901 }
902 for(i = 0; i < 8; i++) {
903 ToSendStuffBit(1);
904 }
905
906 // And then a little more, to make sure that the last character makes
907 // it out before we switch to rx mode.
908 for(i = 0; i < 24; i++) {
909 ToSendStuffBit(1);
910 }
911
912 // Convert from last character reference to length
913 ToSendMax++;
15c4dc5a 914}
915
67ac4bf7 916
355c8b4a
MHS
917/**
918 Convenience function to encode, transmit and trace iso 14443b comms
919 **/
920static void CodeAndTransmit14443bAsReader(const uint8_t *cmd, int len)
921{
922 CodeIso14443bAsReader(cmd, len);
51d4f6f1 923 TransmitFor14443b();
355c8b4a
MHS
924 if (tracing) {
925 uint8_t parity[MAX_PARITY_SIZE];
355c8b4a
MHS
926 LogTrace(cmd,len, 0, 0, parity, TRUE);
927 }
928}
929
4be27083
FM
930/* Sends an APDU to the tag
931 * TODO: check CRC and preamble
932 */
933int iso14443b_apdu(uint8_t const *message, size_t message_length, uint8_t *response)
934{
935 uint8_t message_frame[message_length + 4];
936 // PCB
937 message_frame[0] = 0x0A | pcb_blocknum;
938 pcb_blocknum ^= 1;
939 // CID
940 message_frame[1] = 0;
941 // INF
942 memcpy(message_frame + 2, message, message_length);
943 // EDC (CRC)
944 ComputeCrc14443(CRC_14443_B, message_frame, message_length + 2, &message_frame[message_length + 2], &message_frame[message_length + 3]);
945 // send
946 CodeAndTransmit14443bAsReader(message_frame, message_length + 4);
947 // get response
948 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT*100, TRUE);
949 if(Demod.len < 3)
950 {
951 return 0;
952 }
953 // TODO: Check CRC
954 // copy response contents
955 if(response != NULL)
956 {
957 memcpy(response, Demod.output, Demod.len);
958 }
959 return Demod.len;
960}
961
962/* Perform the ISO 14443 B Card Selection procedure
963 * Currently does NOT do any collision handling.
964 * It expects 0-1 cards in the device's range.
965 * TODO: Support multiple cards (perform anticollision)
966 * TODO: Verify CRC checksums
967 */
968int iso14443b_select_card()
969{
970 // WUPB command (including CRC)
971 // Note: WUPB wakes up all tags, REQB doesn't wake up tags in HALT state
972 static const uint8_t wupb[] = { 0x05, 0x00, 0x08, 0x39, 0x73 };
973 // ATTRIB command (with space for CRC)
974 uint8_t attrib[] = { 0x1D, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, 0x00, 0x00, 0x00, 0x00};
975
976 // first, wake up the tag
977 CodeAndTransmit14443bAsReader(wupb, sizeof(wupb));
978 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
979 // ATQB too short?
980 if (Demod.len < 14)
981 {
982 return 2;
983 }
984
985 // select the tag
986 // copy the PUPI to ATTRIB
987 memcpy(attrib + 1, Demod.output + 1, 4);
988 /* copy the protocol info from ATQB (Protocol Info -> Protocol_Type) into
989 ATTRIB (Param 3) */
990 attrib[7] = Demod.output[10] & 0x0F;
991 ComputeCrc14443(CRC_14443_B, attrib, 9, attrib + 9, attrib + 10);
992 CodeAndTransmit14443bAsReader(attrib, sizeof(attrib));
993 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
994 // Answer to ATTRIB too short?
995 if(Demod.len < 3)
996 {
997 return 2;
998 }
999 // reset PCB block number
1000 pcb_blocknum = 0;
1001 return 1;
1002}
1003
1004// Set up ISO 14443 Type B communication (similar to iso14443a_setup)
1005void iso14443b_setup() {
1006 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
1007 // Set up the synchronous serial port
1008 FpgaSetupSsc();
1009 // connect Demodulated Signal to ADC:
1010 SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
1011
1012 // Signal field is on with the appropriate LED
1013 LED_D_ON();
1014 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_TX | FPGA_HF_READER_TX_SHALLOW_MOD);
1015
1016 // Start the timer
1017 StartCountSspClk();
1018
1019 DemodReset();
1020 UartReset();
1021}
67ac4bf7 1022
15c4dc5a 1023//-----------------------------------------------------------------------------
51d4f6f1 1024// Read a SRI512 ISO 14443B tag.
15c4dc5a 1025//
1026// SRI512 tags are just simple memory tags, here we're looking at making a dump
1027// of the contents of the memory. No anticollision algorithm is done, we assume
1028// we have a single tag in the field.
1029//
1030// I tried to be systematic and check every answer of the tag, every CRC, etc...
1031//-----------------------------------------------------------------------------
51d4f6f1 1032void ReadSTMemoryIso14443b(uint32_t dwLast)
15c4dc5a 1033{
7d5ebac9 1034 uint8_t i = 0x00;
15c4dc5a 1035
7d5ebac9
MHS
1036 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
1037 // Make sure that we start from off, since the tags are stateful;
1038 // confusing things will happen if we don't reset them between reads.
1039 LED_D_OFF();
1040 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
1041 SpinDelay(200);
15c4dc5a 1042
7d5ebac9
MHS
1043 SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
1044 FpgaSetupSsc();
15c4dc5a 1045
7d5ebac9
MHS
1046 // Now give it time to spin up.
1047 // Signal field is on with the appropriate LED
1048 LED_D_ON();
705bfa10 1049 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR | FPGA_HF_READER_RX_XCORR_848_KHZ);
7d5ebac9 1050 SpinDelay(200);
15c4dc5a 1051
5f605b8f 1052 clear_trace();
1053 set_tracing(TRUE);
1054
7d5ebac9 1055 // First command: wake up the tag using the INITIATE command
51d4f6f1 1056 uint8_t cmd1[] = {0x06, 0x00, 0x97, 0x5b};
355c8b4a 1057 CodeAndTransmit14443bAsReader(cmd1, sizeof(cmd1));
51d4f6f1 1058 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
15c4dc5a 1059
7d5ebac9 1060 if (Demod.len == 0) {
705bfa10 1061 DbpString("No response from tag");
1062 return;
7d5ebac9 1063 } else {
705bfa10 1064 Dbprintf("Randomly generated Chip ID (+ 2 byte CRC): %02x %02x %02x",
1065 Demod.output[0], Demod.output[1], Demod.output[2]);
7d5ebac9 1066 }
705bfa10 1067
7d5ebac9
MHS
1068 // There is a response, SELECT the uid
1069 DbpString("Now SELECT tag:");
1070 cmd1[0] = 0x0E; // 0x0E is SELECT
1071 cmd1[1] = Demod.output[0];
1072 ComputeCrc14443(CRC_14443_B, cmd1, 2, &cmd1[2], &cmd1[3]);
355c8b4a 1073 CodeAndTransmit14443bAsReader(cmd1, sizeof(cmd1));
51d4f6f1 1074 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
7d5ebac9 1075 if (Demod.len != 3) {
51d4f6f1 1076 Dbprintf("Expected 3 bytes from tag, got %d", Demod.len);
1077 return;
7d5ebac9
MHS
1078 }
1079 // Check the CRC of the answer:
1080 ComputeCrc14443(CRC_14443_B, Demod.output, 1 , &cmd1[2], &cmd1[3]);
1081 if(cmd1[2] != Demod.output[1] || cmd1[3] != Demod.output[2]) {
51d4f6f1 1082 DbpString("CRC Error reading select response.");
1083 return;
7d5ebac9
MHS
1084 }
1085 // Check response from the tag: should be the same UID as the command we just sent:
1086 if (cmd1[1] != Demod.output[0]) {
132a0217 1087 Dbprintf("Bad response to SELECT from Tag, aborting: %02x %02x", cmd1[1], Demod.output[0]);
51d4f6f1 1088 return;
7d5ebac9 1089 }
705bfa10 1090
7d5ebac9
MHS
1091 // Tag is now selected,
1092 // First get the tag's UID:
1093 cmd1[0] = 0x0B;
1094 ComputeCrc14443(CRC_14443_B, cmd1, 1 , &cmd1[1], &cmd1[2]);
355c8b4a 1095 CodeAndTransmit14443bAsReader(cmd1, 3); // Only first three bytes for this one
51d4f6f1 1096 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
7d5ebac9 1097 if (Demod.len != 10) {
51d4f6f1 1098 Dbprintf("Expected 10 bytes from tag, got %d", Demod.len);
1099 return;
7d5ebac9
MHS
1100 }
1101 // The check the CRC of the answer (use cmd1 as temporary variable):
1102 ComputeCrc14443(CRC_14443_B, Demod.output, 8, &cmd1[2], &cmd1[3]);
51d4f6f1 1103 if(cmd1[2] != Demod.output[8] || cmd1[3] != Demod.output[9]) {
132a0217 1104 Dbprintf("CRC Error reading block! Expected: %04x got: %04x",
705bfa10 1105 (cmd1[2]<<8)+cmd1[3], (Demod.output[8]<<8)+Demod.output[9]);
51d4f6f1 1106 // Do not return;, let's go on... (we should retry, maybe ?)
7d5ebac9
MHS
1107 }
1108 Dbprintf("Tag UID (64 bits): %08x %08x",
705bfa10 1109 (Demod.output[7]<<24) + (Demod.output[6]<<16) + (Demod.output[5]<<8) + Demod.output[4],
1110 (Demod.output[3]<<24) + (Demod.output[2]<<16) + (Demod.output[1]<<8) + Demod.output[0]);
15c4dc5a 1111
7d5ebac9 1112 // Now loop to read all 16 blocks, address from 0 to last block
132a0217 1113 Dbprintf("Tag memory dump, block 0 to %d", dwLast);
7d5ebac9
MHS
1114 cmd1[0] = 0x08;
1115 i = 0x00;
1116 dwLast++;
1117 for (;;) {
51d4f6f1 1118 if (i == dwLast) {
7d5ebac9
MHS
1119 DbpString("System area block (0xff):");
1120 i = 0xff;
1121 }
1122 cmd1[1] = i;
1123 ComputeCrc14443(CRC_14443_B, cmd1, 2, &cmd1[2], &cmd1[3]);
355c8b4a 1124 CodeAndTransmit14443bAsReader(cmd1, sizeof(cmd1));
51d4f6f1 1125 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
7d5ebac9 1126 if (Demod.len != 6) { // Check if we got an answer from the tag
51d4f6f1 1127 DbpString("Expected 6 bytes from tag, got less...");
1128 return;
7d5ebac9
MHS
1129 }
1130 // The check the CRC of the answer (use cmd1 as temporary variable):
1131 ComputeCrc14443(CRC_14443_B, Demod.output, 4, &cmd1[2], &cmd1[3]);
51d4f6f1 1132 if(cmd1[2] != Demod.output[4] || cmd1[3] != Demod.output[5]) {
132a0217 1133 Dbprintf("CRC Error reading block! Expected: %04x got: %04x",
705bfa10 1134 (cmd1[2]<<8)+cmd1[3], (Demod.output[4]<<8)+Demod.output[5]);
51d4f6f1 1135 // Do not return;, let's go on... (we should retry, maybe ?)
7d5ebac9
MHS
1136 }
1137 // Now print out the memory location:
132a0217 1138 Dbprintf("Address=%02x, Contents=%08x, CRC=%04x", i,
705bfa10 1139 (Demod.output[3]<<24) + (Demod.output[2]<<16) + (Demod.output[1]<<8) + Demod.output[0],
1140 (Demod.output[4]<<8)+Demod.output[5]);
7d5ebac9 1141 if (i == 0xff) {
51d4f6f1 1142 break;
7d5ebac9
MHS
1143 }
1144 i++;
1145 }
15c4dc5a 1146}
1147
1148
1149//=============================================================================
1150// Finally, the `sniffer' combines elements from both the reader and
1151// simulated tag, to show both sides of the conversation.
1152//=============================================================================
1153
1154//-----------------------------------------------------------------------------
1155// Record the sequence of commands sent by the reader to the tag, with
1156// triggering so that we start recording at the point that the tag is moved
1157// near the reader.
1158//-----------------------------------------------------------------------------
1159/*
1160 * Memory usage for this function, (within BigBuf)
5b95953d 1161 * Last Received command (reader->tag) - MAX_FRAME_SIZE
1162 * Last Received command (tag->reader) - MAX_FRAME_SIZE
705bfa10 1163 * DMA Buffer - ISO14443B_DMA_BUFFER_SIZE
5b95953d 1164 * Demodulated samples received - all the rest
15c4dc5a 1165 */
51d4f6f1 1166void RAMFUNC SnoopIso14443b(void)
15c4dc5a 1167{
7d5ebac9
MHS
1168 // We won't start recording the frames that we acquire until we trigger;
1169 // a good trigger condition to get started is probably when we see a
1170 // response from the tag.
5b95953d 1171 int triggered = TRUE; // TODO: set and evaluate trigger condition
15c4dc5a 1172
7d5ebac9 1173 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
f71f4deb 1174 BigBuf_free();
15c4dc5a 1175
aeadbdb2
MHS
1176 clear_trace();
1177 set_tracing(TRUE);
1178
7d5ebac9 1179 // The DMA buffer, used to stream samples from the FPGA
705bfa10 1180 int8_t *dmaBuf = (int8_t*) BigBuf_malloc(ISO14443B_DMA_BUFFER_SIZE);
7d5ebac9 1181 int lastRxCounter;
67ac4bf7 1182 int8_t *upTo;
7d5ebac9
MHS
1183 int ci, cq;
1184 int maxBehindBy = 0;
1185
1186 // Count of samples received so far, so that we can include timing
1187 // information in the trace buffer.
1188 int samples = 0;
15c4dc5a 1189
7d5ebac9
MHS
1190 DemodInit(BigBuf_malloc(MAX_FRAME_SIZE));
1191 UartInit(BigBuf_malloc(MAX_FRAME_SIZE));
15c4dc5a 1192
7d5ebac9
MHS
1193 // Print some debug information about the buffer sizes
1194 Dbprintf("Snooping buffers initialized:");
1195 Dbprintf(" Trace: %i bytes", BigBuf_max_traceLen());
aeadbdb2
MHS
1196 Dbprintf(" Reader -> tag: %i bytes", MAX_FRAME_SIZE);
1197 Dbprintf(" tag -> Reader: %i bytes", MAX_FRAME_SIZE);
705bfa10 1198 Dbprintf(" DMA: %i bytes", ISO14443B_DMA_BUFFER_SIZE);
e30c654b 1199
51d4f6f1 1200 // Signal field is off, no reader signal, no tag signal
1201 LEDsoff();
aeadbdb2
MHS
1202
1203 // And put the FPGA in the appropriate mode
da586b17 1204 FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_READER_RX_XCORR | FPGA_HF_READER_RX_XCORR_848_KHZ | FPGA_HF_READER_RX_XCORR_SNOOP);
7d5ebac9
MHS
1205 SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
1206
1207 // Setup for the DMA.
1208 FpgaSetupSsc();
1209 upTo = dmaBuf;
705bfa10 1210 lastRxCounter = ISO14443B_DMA_BUFFER_SIZE;
1211 FpgaSetupSscDma((uint8_t*) dmaBuf, ISO14443B_DMA_BUFFER_SIZE);
aeadbdb2 1212 uint8_t parity[MAX_PARITY_SIZE];
5b95953d 1213
1214 bool TagIsActive = FALSE;
1215 bool ReaderIsActive = FALSE;
dd57061c 1216
7d5ebac9
MHS
1217 // And now we loop, receiving samples.
1218 for(;;) {
1219 int behindBy = (lastRxCounter - AT91C_BASE_PDC_SSC->PDC_RCR) &
705bfa10 1220 (ISO14443B_DMA_BUFFER_SIZE-1);
7d5ebac9
MHS
1221 if(behindBy > maxBehindBy) {
1222 maxBehindBy = behindBy;
7d5ebac9 1223 }
51d4f6f1 1224
7d5ebac9
MHS
1225 if(behindBy < 2) continue;
1226
1227 ci = upTo[0];
1228 cq = upTo[1];
1229 upTo += 2;
1230 lastRxCounter -= 2;
705bfa10 1231 if(upTo >= dmaBuf + ISO14443B_DMA_BUFFER_SIZE) {
0d9a86c7 1232 upTo = dmaBuf;
705bfa10 1233 lastRxCounter += ISO14443B_DMA_BUFFER_SIZE;
0d9a86c7 1234 AT91C_BASE_PDC_SSC->PDC_RNPR = (uint32_t) dmaBuf;
705bfa10 1235 AT91C_BASE_PDC_SSC->PDC_RNCR = ISO14443B_DMA_BUFFER_SIZE;
51d4f6f1 1236 WDT_HIT();
705bfa10 1237 if(behindBy > (9*ISO14443B_DMA_BUFFER_SIZE/10)) { // TODO: understand whether we can increase/decrease as we want or not?
132a0217 1238 Dbprintf("blew circular buffer! behindBy=%d", behindBy);
51d4f6f1 1239 break;
1240 }
1241 if(!tracing) {
1242 DbpString("Reached trace limit");
1243 break;
1244 }
1245 if(BUTTON_PRESS()) {
1246 DbpString("cancelled");
1247 break;
1248 }
7d5ebac9 1249 }
15c4dc5a 1250
7d5ebac9 1251 samples += 2;
15c4dc5a 1252
5b95953d 1253 if (!TagIsActive) { // no need to try decoding reader data if the tag is sending
51d4f6f1 1254 if(Handle14443bUartBit(ci & 0x01)) {
5b95953d 1255 if(triggered && tracing) {
51d4f6f1 1256 LogTrace(Uart.output, Uart.byteCnt, samples, samples, parity, TRUE);
5b95953d 1257 }
5b95953d 1258 /* And ready to receive another command. */
1259 UartReset();
1260 /* And also reset the demod code, which might have been */
1261 /* false-triggered by the commands from the reader. */
1262 DemodReset();
aeadbdb2 1263 }
51d4f6f1 1264 if(Handle14443bUartBit(cq & 0x01)) {
5b95953d 1265 if(triggered && tracing) {
51d4f6f1 1266 LogTrace(Uart.output, Uart.byteCnt, samples, samples, parity, TRUE);
5b95953d 1267 }
5b95953d 1268 /* And ready to receive another command. */
1269 UartReset();
1270 /* And also reset the demod code, which might have been */
1271 /* false-triggered by the commands from the reader. */
1272 DemodReset();
1273 }
46734099 1274 ReaderIsActive = (Uart.state > STATE_GOT_FALLING_EDGE_OF_SOF);
aeadbdb2 1275 }
15c4dc5a 1276
5b95953d 1277 if(!ReaderIsActive) { // no need to try decoding tag data if the reader is sending - and we cannot afford the time
46734099 1278 if(Handle14443bSamplesDemod(ci | 0x01, cq | 0x01)) {
15c4dc5a 1279
5b95953d 1280 //Use samples as a time measurement
1281 if(tracing)
1282 {
1283 uint8_t parity[MAX_PARITY_SIZE];
09c66f1f 1284 LogTrace(Demod.output, Demod.len, samples, samples, parity, FALSE);
5b95953d 1285 }
1286 triggered = TRUE;
15c4dc5a 1287
5b95953d 1288 // And ready to receive another response.
1289 DemodReset();
1290 }
d5875804 1291 TagIsActive = (Demod.state > DEMOD_GOT_FALLING_EDGE_OF_SOF);
aeadbdb2 1292 }
15c4dc5a 1293
7d5ebac9 1294 }
51d4f6f1 1295
aeadbdb2 1296 FpgaDisableSscDma();
51d4f6f1 1297 LEDsoff();
aeadbdb2 1298 AT91C_BASE_PDC_SSC->PDC_PTCR = AT91C_PDC_RXTDIS;
15c4dc5a 1299 DbpString("Snoop statistics:");
355c8b4a 1300 Dbprintf(" Max behind by: %i", maxBehindBy);
15c4dc5a 1301 Dbprintf(" Uart State: %x", Uart.state);
1302 Dbprintf(" Uart ByteCnt: %i", Uart.byteCnt);
1303 Dbprintf(" Uart ByteCntMax: %i", Uart.byteCntMax);
3000dc4e 1304 Dbprintf(" Trace length: %i", BigBuf_get_traceLen());
15c4dc5a 1305}
7cf3ef20 1306
67ac4bf7 1307
7cf3ef20 1308/*
1309 * Send raw command to tag ISO14443B
1310 * @Input
1311 * datalen len of buffer data
1312 * recv bool when true wait for data from tag and send to client
1313 * powerfield bool leave the field on when true
1314 * data buffer with byte to send
1315 *
1316 * @Output
1317 * none
1318 *
1319 */
67ac4bf7 1320void SendRawCommand14443B(uint32_t datalen, uint32_t recv, uint8_t powerfield, uint8_t data[])
7cf3ef20 1321{
7d5ebac9 1322 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);
51d4f6f1 1323 SetAdcMuxFor(GPIO_MUXSEL_HIPKD);
1324 FpgaSetupSsc();
5f605b8f 1325
9d84e689 1326 if (datalen){
1327 set_tracing(TRUE);
1328
1329 CodeAndTransmit14443bAsReader(data, datalen);
1330
1331 if(recv) {
1332 GetSamplesFor14443bDemod(RECEIVE_SAMPLES_TIMEOUT, TRUE);
1333 uint16_t iLen = MIN(Demod.len, USB_CMD_DATA_SIZE);
1334 cmd_send(CMD_ACK, iLen, 0, 0, Demod.output, iLen);
1335 }
dd57061c 1336 }
355c8b4a 1337
51d4f6f1 1338 if(!powerfield) {
7d5ebac9
MHS
1339 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
1340 LED_D_OFF();
1341 }
7cf3ef20 1342}
1343
Impressum, Datenschutz