X-Git-Url: https://git.zerfleddert.de/cgi-bin/gitweb.cgi/proxmark3-svn/blobdiff_plain/0e8cabed8d180d2e03ba0cc04c853dad501cff7a..f0fa6638141409674b64481557aba051935b1685:/armsrc/legicrf.c diff --git a/armsrc/legicrf.c b/armsrc/legicrf.c index 19f12a95..223a7772 100644 --- a/armsrc/legicrf.c +++ b/armsrc/legicrf.c @@ -91,7 +91,13 @@ static void setup_timer(void) { #ifndef OPEN_COIL # define OPEN_COIL HIGH(GPIO_SSC_DOUT); #endif - +#ifndef LINE_IN +# define LINE_IN \ + do { \ + AT91C_BASE_PIOA->PIO_ODR = GPIO_SSC_DIN; \ + AT91C_BASE_PIOA->PIO_PER = GPIO_SSC_DIN; \ + } while (0); +#endif // Pause pulse, off in 20us / 30ticks, // ONE / ZERO bit pulse, // one == 80us / 120ticks @@ -161,10 +167,6 @@ uint32_t get_key_stream(int skip, int count) { i = (count == 6) ? -1 : legic_read_count; - // log - //uint8_t cmdbytes[] = {bits, BYTEx(data, 0), BYTEx(data, 1), BYTEx(send, 0), BYTEx(send, 1), legic_prng_count()}; - //LogTrace(cmdbytes, sizeof(cmdbytes), starttime, GET_TICKS, NULL, TRUE); - /* Generate KeyStream */ return legic_prng_get_bits(count); } @@ -255,9 +257,9 @@ static void frame_receiveAsReader(struct legic_frame * const f, uint8_t bits) { volatile uint32_t level = 0; frame_clean(f); - - AT91C_BASE_PIOA->PIO_ODR = GPIO_SSC_DIN; - AT91C_BASE_PIOA->PIO_PER = GPIO_SSC_DIN; + + /* Bitbang the receiver */ + LINE_IN; // calibrate the prng. legic_prng_forward(2); @@ -415,11 +417,13 @@ int legic_write_byte(uint16_t index, uint8_t byte, uint8_t addr_sz) { crc_update(&legic_crc, index, addr_sz); crc_update(&legic_crc, byte, 8); uint32_t crc = crc_finish(&legic_crc); + /* uint32_t crc2 = legic4Crc(LEGIC_WRITE, index, byte, addr_sz+1); if ( crc != crc2 ) { Dbprintf("crc is missmatch"); return 1; } + */ // send write command uint32_t cmd = ((crc <<(addr_sz+1+8)) //CRC |(byte <<(addr_sz+1)) //Data @@ -434,15 +438,14 @@ int legic_write_byte(uint16_t index, uint8_t byte, uint8_t addr_sz) { frame_sendAsReader(cmd, cmd_sz); - // wait for ack - AT91C_BASE_PIOA->PIO_ODR = GPIO_SSC_DIN; - AT91C_BASE_PIOA->PIO_PER = GPIO_SSC_DIN; + /* Bitbang the receiver */ + LINE_IN; int t, old_level = 0, edges = 0; int next_bit_at = 0; // ACK 3.6ms = 3600us * 1.5 = 5400ticks. - WaitTicks(5360); + WaitTicks(5400); for( t = 0; t < 80; ++t) { edges = 0; @@ -511,16 +514,18 @@ OUT: void LegicRfWriter(uint16_t offset, uint16_t len, uint8_t iv, uint8_t *data) { + #define LOWERLIMIT 4 + + int r = 0; uint8_t isOK = 1; + legic_card_select_t card; - // UID not is writeable. - if ( offset <= 4 ) { + // uid NOT is writeable. + if ( offset <= LOWERLIMIT ) { isOK = 0; goto OUT; } - legic_card_select_t card; - LegicCommonInit(); if ( legic_select_card_iv(&card, iv) ) { @@ -528,39 +533,25 @@ void LegicRfWriter(uint16_t offset, uint16_t len, uint8_t iv, uint8_t *data) { goto OUT; } - if (len + offset >= card.cardsize) - len = card.cardsize - offset; - + switch_off_tag_rwd(); + + if ( len + offset + LOWERLIMIT >= card.cardsize) { + isOK = 0; + goto OUT; + } + setup_phase_reader(iv); LED_B_ON(); - int r = 0; - // how about we write backwards instead. no need for this extra DCF check. - // index = len - cardsize - // stops uid 01234, - /* - len = 20 - offset = 5 - - index = 20+5 = 25 - if ( index > cardsize ) return -1; - - loop - write( cardmem[index], index , card.addrsize); - --index; - end loop - */ - uint16_t index = len; - while(index > 4) { + while( len > 0 ) { - r = legic_write_byte( index, cardmem[ index ], card.addrsize); - - if ( r ) { - Dbprintf("operation aborted @ 0x%03.3x", index); + int r = legic_write_byte( len + offset + LOWERLIMIT, data[len], card.addrsize); + if ( r == -1 ) { + Dbprintf("operation aborted @ 0x%03.3x", len); isOK = 0; goto OUT; } - --index; + --len; WDT_HIT(); } @@ -681,7 +672,11 @@ OUT: */ static void frame_handle_tag(struct legic_frame const * const f) { - uint8_t *BigBuf = BigBuf_get_addr(); + // log + //uint8_t cmdbytes[] = {bits, BYTEx(data, 0), BYTEx(data, 1)}; + //LogTrace(cmdbytes, sizeof(cmdbytes), starttime, GET_TICKS, NULL, FALSE); + + cardmem = BigBuf_get_EM_addr(); /* First Part of Handshake (IV) */ if(f->bits == 7) { @@ -691,8 +686,12 @@ static void frame_handle_tag(struct legic_frame const * const f) // Reset prng timer ResetTimer(prng_timer); + // IV from reader. legic_prng_init(f->data); + + // We should have three tagtypes with three different answers. frame_send_tag(0x3d, 6); /* 0x3d^0x26 = 0x1B */ + legic_state = STATE_IV; legic_read_count = 0; legic_prng_bc = 0; @@ -706,7 +705,7 @@ static void frame_handle_tag(struct legic_frame const * const f) /* 0x19==??? */ if(legic_state == STATE_IV) { - int local_key = get_key_stream(3, 6); + uint32_t local_key = get_key_stream(3, 6); int xored = 0x39 ^ local_key; if((f->bits == 6) && (f->data == xored)) { legic_state = STATE_CON; @@ -726,59 +725,47 @@ static void frame_handle_tag(struct legic_frame const * const f) /* Read */ if(f->bits == 11) { if(legic_state == STATE_CON) { - int key = get_key_stream(2, 11); //legic_phase_drift, 11); - int addr = f->data ^ key; addr = addr >> 1; - int data = BigBuf[addr]; + uint32_t key = get_key_stream(2, 11); //legic_phase_drift, 11); + uint16_t addr = f->data ^ key; + addr >>= 1; + uint8_t data = cardmem[addr]; int hash = legic4Crc(LEGIC_READ, addr, data, 11) << 8; - BigBuf[OFFSET_LOG+legic_read_count] = (uint8_t)addr; - legic_read_count++; - //Dbprintf("Data:%03.3x, key:%03.3x, addr: %03.3x, read_c:%u", f->data, key, addr, read_c); + legic_read_count++; legic_prng_forward(legic_reqresp_drift); frame_send_tag(hash | data, 12); - ResetTimer(timer); legic_prng_forward(2); - WaitUS(180); + WaitTicks(330); return; } } /* Write */ if(f->bits == 23) { - int key = get_key_stream(-1, 23); //legic_frame_drift, 23); - int addr = f->data ^ key; addr = addr >> 1; addr = addr & 0x3ff; - int data = f->data ^ key; data = data >> 11; data = data & 0xff; - + uint32_t key = get_key_stream(-1, 23); //legic_frame_drift, 23); + uint16_t addr = f->data ^ key; + addr >>= 1; + addr &= 0x3ff; + uint32_t data = f->data ^ key; + data >>= 11; + data &= 0xff; + + cardmem[addr] = data; /* write command */ legic_state = STATE_DISCON; LED_C_OFF(); Dbprintf("write - addr: %x, data: %x", addr, data); + // should send a ACK within 3.5ms too return; } if(legic_state != STATE_DISCON) { Dbprintf("Unexpected: sz:%u, Data:%03.3x, State:%u, Count:%u", f->bits, f->data, legic_state, legic_read_count); - int i; Dbprintf("IV: %03.3x", legic_prng_iv); - for(i = 0; iPIO_ODR = GPIO_SSC_DIN; - AT91C_BASE_PIOA->PIO_PER = GPIO_SSC_DIN; + LINE_IN; + + // need a way to determine which tagtype we are simulating + + // hook up emulator memory + cardmem = BigBuf_get_EM_addr(); + + clear_trace(); + set_tracing(TRUE); - //setup_timer(); crc_init(&legic_crc, 4, 0x19 >> 1, 0x5, 0); - int old_level = 0; - int active = 0; - legic_state = STATE_DISCON; + StartTicks(); LED_B_ON(); DbpString("Starting Legic emulator, press button to end"); while(!BUTTON_PRESS() && !usb_poll_validate_length()) { - int level = !!(AT91C_BASE_PIOA->PIO_PDSR & GPIO_SSC_DIN); - int time = timer->TC_CV; + volatile uint32_t level = !!(AT91C_BASE_PIOA->PIO_PDSR & GPIO_SSC_DIN); + + uint32_t time = GET_TICKS; + + if (level != old_level) { + + if (level) { - if(level != old_level) { - if(level == 1) { - timer->TC_CCR = AT91C_TC_CLKEN | AT91C_TC_SWTRG; + ResetTicks(); if (FUZZ_EQUAL(time, RWD_TIME_1, RWD_TIME_FUZZ)) { /* 1 bit */ @@ -880,15 +876,22 @@ void LegicRfSimulate(int phase, int frame, int reqresp) LED_A_OFF(); } - if(time >= (20*RWD_TIME_1) && (timer->TC_SR & AT91C_TC_CLKSTA)) { - timer->TC_CCR = AT91C_TC_CLKDIS; - } + /* + * Disable the counter, Then wait for the clock to acknowledge the + * shutdown in its status register. Reading the SR has the + * side-effect of clearing any pending state in there. + */ + if(time >= (20*RWD_TIME_1) && (timer->TC_SR & AT91C_TC_CLKSTA)) + StopTicks(); old_level = level; WDT_HIT(); } - if ( MF_DBGLEVEL >= 1) DbpString("Stopped"); + + WDT_HIT(); + switch_off_tag_rwd(); LEDsoff(); + cmd_send(CMD_ACK, 1, 0, 0, 0, 0); } //-----------------------------------------------------------------------------