X-Git-Url: http://cvs.zerfleddert.de/cgi-bin/gitweb.cgi/proxmark3-svn/blobdiff_plain/de15fc5fe3090a95cf100c48af340e93a738576a..8fa68384769d5d241bac693ac86ff03dbdc6a81d:/client/cmdhftopaz.c?ds=sidebyside diff --git a/client/cmdhftopaz.c b/client/cmdhftopaz.c index 95e988ed..6058cabe 100644 --- a/client/cmdhftopaz.c +++ b/client/cmdhftopaz.c @@ -8,21 +8,41 @@ // High frequency Topaz (NFC Type 1) commands //----------------------------------------------------------------------------- +#include "cmdhftopaz.h" + #include #include #include #include #include "cmdmain.h" #include "cmdparser.h" -#include "cmdhftopaz.h" #include "cmdhf14a.h" #include "ui.h" #include "mifare.h" -#include "proxmark3.h" +#include "comms.h" #include "iso14443crc.h" #include "protocols.h" +#define TOPAZ_STATIC_MEMORY (0x0f * 8) // 15 blocks with 8 Bytes each +// a struct to describe a memory area which contains lock bits and the corresponding lockable memory area +typedef struct dynamic_lock_area { + struct dynamic_lock_area *next; + uint16_t byte_offset; // the address of the lock bits + uint16_t size_in_bits; + uint16_t first_locked_byte; // the address of the lockable area + uint16_t bytes_locked_per_bit; +} dynamic_lock_area_t; + + +static struct { + uint8_t HR01[2]; + uint8_t uid[7]; + uint16_t size; + uint8_t data_blocks[TOPAZ_STATIC_MEMORY/8][8]; // this memory is always there + uint8_t *dynamic_memory; // this memory can be there + dynamic_lock_area_t *dynamic_lock_areas; // lock area descriptors +} topaz_tag; static void topaz_switch_on_field(void) @@ -39,6 +59,7 @@ static void topaz_switch_off_field(void) } +// send a raw topaz command, returns the length of the response (0 in case of error) static int topaz_send_cmd_raw(uint8_t *cmd, uint8_t len, uint8_t *response) { UsbCommand c = {CMD_READER_ISO_14443a, {ISO14A_RAW | ISO14A_NO_DISCONNECT | ISO14A_TOPAZMODE, len, 0}}; @@ -56,6 +77,7 @@ static int topaz_send_cmd_raw(uint8_t *cmd, uint8_t len, uint8_t *response) } +// calculate CRC bytes and send topaz command, returns the length of the response (0 in case of error) static int topaz_send_cmd(uint8_t *cmd, uint8_t len, uint8_t *response) { if (len > 1) { @@ -69,6 +91,7 @@ static int topaz_send_cmd(uint8_t *cmd, uint8_t len, uint8_t *response) } +// select a topaz tag. Send WUPA and RID. static int topaz_select(uint8_t *atqa, uint8_t *rid_response) { // ToDo: implement anticollision @@ -92,12 +115,13 @@ static int topaz_select(uint8_t *atqa, uint8_t *rid_response) } -static int topaz_rall(uint8_t *uid, uint8_t *rall_response) +// read all of the static memory of a selected Topaz tag. +static int topaz_rall(uint8_t *uid, uint8_t *response) { uint8_t rall_cmd[] = {TOPAZ_RALL, 0, 0, 0, 0, 0, 0, 0, 0}; memcpy(&rall_cmd[3], uid, 4); - if (!topaz_send_cmd(rall_cmd, sizeof(rall_cmd), rall_response)) { + if (!topaz_send_cmd(rall_cmd, sizeof(rall_cmd), response)) { topaz_switch_off_field(); return -1; // RALL failed } @@ -106,9 +130,86 @@ static int topaz_rall(uint8_t *uid, uint8_t *rall_response) } -static bool topaz_block_is_locked(uint8_t blockno, uint8_t *lockbits) +// read a block (8 Bytes) of a selected Topaz tag. +static int topaz_read_block(uint8_t *uid, uint8_t blockno, uint8_t *block_data) +{ + uint8_t read8_cmd[] = {TOPAZ_READ8, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}; + uint8_t read8_response[11]; + + read8_cmd[1] = blockno; + memcpy(&read8_cmd[10], uid, 4); + if (!topaz_send_cmd(read8_cmd, sizeof(read8_cmd), read8_response)) { + topaz_switch_off_field(); + return -1; // READ8 failed + } + + memcpy(block_data, &read8_response[1], 8); + + return 0; +} + + +// read a segment (16 blocks = 128 Bytes) of a selected Topaz tag. Works only for tags with dynamic memory. +static int topaz_read_segment(uint8_t *uid, uint8_t segno, uint8_t *segment_data) +{ + uint8_t rseg_cmd[] = {TOPAZ_RSEG, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}; + uint8_t rseg_response[131]; + + rseg_cmd[1] = segno << 4; + memcpy(&rseg_cmd[10], uid, 4); + if (!topaz_send_cmd(rseg_cmd, sizeof(rseg_cmd), rseg_response)) { + topaz_switch_off_field(); + return -1; // RSEG failed + } + + memcpy(segment_data, &rseg_response[1], 128); + + return 0; +} + + +// search for the lock area descriptor for the lockable area including byteno +static dynamic_lock_area_t *get_dynamic_lock_area(uint16_t byteno) +{ + dynamic_lock_area_t *lock_area; + + lock_area = topaz_tag.dynamic_lock_areas; + + while (lock_area != NULL) { + if (byteno < lock_area->first_locked_byte) { + lock_area = lock_area->next; + } else { + return lock_area; + } + } + + return NULL; +} + + +// check if a memory byte is locked. +static bool topaz_byte_is_locked(uint16_t byteno) { - if(lockbits[blockno/8] >> (blockno % 8) & 0x01) { + uint8_t *lockbits; + uint16_t locked_bytes_per_bit; + dynamic_lock_area_t *lock_area; + + if (byteno < TOPAZ_STATIC_MEMORY) { + lockbits = &topaz_tag.data_blocks[0x0e][0]; + locked_bytes_per_bit = 8; + } else { + lock_area = get_dynamic_lock_area(byteno); + if (lock_area == NULL) { + return false; + } else { + lockbits = &topaz_tag.dynamic_memory[lock_area->byte_offset - TOPAZ_STATIC_MEMORY]; + locked_bytes_per_bit = lock_area->bytes_locked_per_bit; + byteno = byteno - lock_area->first_locked_byte; + } + } + + uint16_t blockno = byteno / locked_bytes_per_bit; + if(lockbits[blockno/8] & (0x01 << (blockno % 8))) { return true; } else { return false; @@ -116,16 +217,21 @@ static bool topaz_block_is_locked(uint8_t blockno, uint8_t *lockbits) } +// read and print the Capability Container static int topaz_print_CC(uint8_t *data) { if(data[0] != 0xe1) { + topaz_tag.size = TOPAZ_STATIC_MEMORY; return -1; // no NDEF message } PrintAndLog("Capability Container: %02x %02x %02x %02x", data[0], data[1], data[2], data[3]); PrintAndLog(" %02x: NDEF Magic Number", data[0]); PrintAndLog(" %02x: version %d.%d supported by tag", data[1], (data[1] & 0xF0) >> 4, data[1] & 0x0f); - PrintAndLog(" %02x: Physical Memory Size of this tag: %d bytes", data[2], (data[2] + 1) * 8); + uint16_t memsize = (data[2] + 1) * 8; + topaz_tag.size = memsize; + topaz_tag.dynamic_memory = malloc(memsize - TOPAZ_STATIC_MEMORY); + PrintAndLog(" %02x: Physical Memory Size of this tag: %d bytes", data[2], memsize); PrintAndLog(" %02x: %s / %s", data[3], (data[3] & 0xF0) ? "(RFU)" : "Read access granted without any security", (data[3] & 0x0F)==0 ? "Write access granted without any security" : (data[3] & 0x0F)==0x0F ? "No write access granted at all" : "(RFU)"); @@ -133,14 +239,15 @@ static int topaz_print_CC(uint8_t *data) } -static void get_TLV(uint8_t **TLV_ptr, uint8_t *tag, uint16_t *length, uint8_t **value) +// return type, length and value of a TLV, starting at memory position *TLV_ptr +static void get_TLV(uint8_t **TLV_ptr, uint8_t *TLV_type, uint16_t *TLV_length, uint8_t **TLV_value) { - *length = 0; - *value = NULL; + *TLV_length = 0; + *TLV_value = NULL; - *tag = **TLV_ptr; + *TLV_type = **TLV_ptr; *TLV_ptr += 1; - switch (*tag) { + switch (*TLV_type) { case 0x00: // NULL TLV. case 0xFE: // Terminator TLV. break; @@ -148,16 +255,16 @@ static void get_TLV(uint8_t **TLV_ptr, uint8_t *tag, uint16_t *length, uint8_t * case 0x02: // Reserved Memory TLV case 0x03: // NDEF message TLV case 0xFD: // proprietary TLV - *length = **TLV_ptr; + *TLV_length = **TLV_ptr; *TLV_ptr += 1; - if (*length == 0xff) { - *length = **TLV_ptr << 8; + if (*TLV_length == 0xff) { + *TLV_length = **TLV_ptr << 8; *TLV_ptr += 1; - *length |= **TLV_ptr; + *TLV_length |= **TLV_ptr; *TLV_ptr += 1; } - *value = *TLV_ptr; - *TLV_ptr += *length; + *TLV_value = *TLV_ptr; + *TLV_ptr += *TLV_length; break; default: // RFU break; @@ -165,99 +272,161 @@ static void get_TLV(uint8_t **TLV_ptr, uint8_t *tag, uint16_t *length, uint8_t * } -static bool topaz_print_lock_control_TLVs(uint8_t *memory) +// lock area TLVs contain no information on the start of the respective lockable area. Lockable areas +// do not include the lock bits and reserved memory. We therefore need to adjust the start of the +// respective lockable areas accordingly +static void adjust_lock_areas(uint16_t block_start, uint16_t block_size) +{ + dynamic_lock_area_t *lock_area = topaz_tag.dynamic_lock_areas; + while (lock_area != NULL) { + if (lock_area->first_locked_byte <= block_start) { + lock_area->first_locked_byte += block_size; + } + lock_area = lock_area->next; + } +} + + +// read and print the lock area and reserved memory TLVs +static void topaz_print_control_TLVs(uint8_t *memory) { uint8_t *TLV_ptr = memory; - uint8_t tag = 0; - uint16_t length; - uint8_t *value; + uint8_t TLV_type = 0; + uint16_t TLV_length; + uint8_t *TLV_value; bool lock_TLV_present = false; + bool reserved_memory_control_TLV_present = false; + uint16_t next_lockable_byte = 0x0f * 8; // first byte after static memory area while(*TLV_ptr != 0x03 && *TLV_ptr != 0xFD && *TLV_ptr != 0xFE) { // all Lock Control TLVs shall be present before the NDEF message TLV, the proprietary TLV (and the Terminator TLV) - get_TLV(&TLV_ptr, &tag, &length, &value); - if (tag == 0x01) { // the Lock Control TLV - uint8_t pages_addr = value[0] >> 4; - uint8_t byte_offset = value[0] & 0x0f; - uint8_t size_in_bits = value[1] ? value[1] : 256; - uint8_t bytes_per_page = 1 << (value[2] & 0x0f); - uint8_t bytes_locked_per_bit = 1 << (value[2] >> 4); - PrintAndLog("Lock Area of %d bits at byte offset 0x%02x. Each Lock Bit locks %d bytes.", + get_TLV(&TLV_ptr, &TLV_type, &TLV_length, &TLV_value); + if (TLV_type == 0x01) { // a Lock Control TLV + uint8_t pages_addr = TLV_value[0] >> 4; + uint8_t byte_offset = TLV_value[0] & 0x0f; + uint16_t size_in_bits = TLV_value[1] ? TLV_value[1] : 256; + uint16_t size_in_bytes = (size_in_bits + 7)/8; + uint16_t bytes_per_page = 1 << (TLV_value[2] & 0x0f); + uint16_t bytes_locked_per_bit = 1 << (TLV_value[2] >> 4); + uint16_t area_start = pages_addr * bytes_per_page + byte_offset; + PrintAndLog("Lock Area of %d bits at byte offset 0x%04x. Each Lock Bit locks %d bytes.", size_in_bits, - pages_addr * bytes_per_page + byte_offset, + area_start, bytes_locked_per_bit); lock_TLV_present = true; + dynamic_lock_area_t *old = topaz_tag.dynamic_lock_areas; + dynamic_lock_area_t *new = topaz_tag.dynamic_lock_areas; + if (old == NULL) { + new = topaz_tag.dynamic_lock_areas = (dynamic_lock_area_t *)malloc(sizeof(dynamic_lock_area_t)); + } else { + while(old->next != NULL) { + old = old->next; + } + new = old->next = (dynamic_lock_area_t *)malloc(sizeof(dynamic_lock_area_t)); + } + new->next = NULL; + if (area_start <= next_lockable_byte) { + // lock areas are not lockable + next_lockable_byte += size_in_bytes; + } + new->first_locked_byte = next_lockable_byte; + new->byte_offset = area_start; + new->size_in_bits = size_in_bits; + new->bytes_locked_per_bit = bytes_locked_per_bit; + next_lockable_byte += size_in_bits * bytes_locked_per_bit; + } + if (TLV_type == 0x02) { // a Reserved Memory Control TLV + uint8_t pages_addr = TLV_value[0] >> 4; + uint8_t byte_offset = TLV_value[0] & 0x0f; + uint16_t size_in_bytes = TLV_value[1] ? TLV_value[1] : 256; + uint8_t bytes_per_page = 1 << (TLV_value[2] & 0x0f); + uint16_t area_start = pages_addr * bytes_per_page + byte_offset; + PrintAndLog("Reserved Memory of %d bytes at byte offset 0x%02x.", + size_in_bytes, + area_start); + reserved_memory_control_TLV_present = true; + adjust_lock_areas(area_start, size_in_bytes); // reserved memory areas are not lockable + if (area_start <= next_lockable_byte) { + next_lockable_byte += size_in_bytes; + } } } if (!lock_TLV_present) { PrintAndLog("(No Lock Control TLV present)"); - return -1; - } else { - return 0; } + + if (!reserved_memory_control_TLV_present) { + PrintAndLog("(No Reserved Memory Control TLV present)"); + } } -static int topaz_print_reserved_memory_control_TLVs(uint8_t *memory) +// read all of the dynamic memory +static int topaz_read_dynamic_data(void) { - uint8_t *TLV_ptr = memory; - uint8_t tag = 0; - uint16_t length; - uint8_t *value; - bool reserved_memory_control_TLV_present = false; + // first read the remaining block of segment 0 + if(topaz_read_block(topaz_tag.uid, 0x0f, &topaz_tag.dynamic_memory[0]) == -1) { + PrintAndLog("Error while reading dynamic memory block %02x. Aborting...", 0x0f); + return -1; + } - while(*TLV_ptr != 0x03 && *TLV_ptr != 0xFD && *TLV_ptr != 0xFE) { - // all Reserved Memory Control TLVs shall be present before the NDEF message TLV, the proprietary TLV (and the Terminator TLV) - get_TLV(&TLV_ptr, &tag, &length, &value); - if (tag == 0x02) { // the Reserved Memory Control TLV - uint8_t pages_addr = value[0] >> 4; - uint8_t byte_offset = value[0] & 0x0f; - uint8_t size_in_bytes = value[1] ? value[1] : 256; - uint8_t bytes_per_page = 1 << (value[2] & 0x0f); - PrintAndLog("Reserved Memory of %d bytes at byte offset 0x%02x.", - size_in_bytes, - pages_addr * bytes_per_page + byte_offset); - reserved_memory_control_TLV_present = true; + // read the remaining segments + uint8_t max_segment = topaz_tag.size / 128 - 1; + for(uint8_t segment = 1; segment <= max_segment; segment++) { + if(topaz_read_segment(topaz_tag.uid, segment, &topaz_tag.dynamic_memory[(segment-1)*128+8]) == -1) { + PrintAndLog("Error while reading dynamic memory block %02x. Aborting...", 0x0f); + return -1; } } - if (!reserved_memory_control_TLV_present) { - PrintAndLog("(No Reserved Memory Control TLV present)"); - return -1; - } else { - return 0; + return 0; +} + + +// read and print the dynamic memory +static void topaz_print_dynamic_data(void) +{ + if (topaz_tag.size > TOPAZ_STATIC_MEMORY) { + PrintAndLog("Dynamic Data blocks:"); + if (topaz_read_dynamic_data() == 0) { + PrintAndLog("block# | offset | Data | Locked(y/n)"); + char line[80]; + for (uint16_t blockno = 0x0f; blockno < topaz_tag.size/8; blockno++) { + uint8_t *block_data = &topaz_tag.dynamic_memory[(blockno-0x0f)*8]; + char lockbits[9]; + for (uint16_t j = 0; j < 8; j++) { + sprintf(&line[3*j], "%02x ", block_data[j]); + lockbits[j] = topaz_byte_is_locked(blockno*8+j) ? 'y' : 'n'; + } + lockbits[8] = '\0'; + PrintAndLog(" 0x%02x | 0x%04x | %s| %-3s", blockno, blockno*8, line, lockbits); + } + } } } static void topaz_print_lifecycle_state(uint8_t *data) { - + // to be done } static void topaz_print_NDEF(uint8_t *data) { - + // to be done. } - + +// read a Topaz tag and print some usefull information int CmdHFTopazReader(const char *Cmd) { int status; uint8_t atqa[2]; uint8_t rid_response[8]; uint8_t *uid_echo = &rid_response[2]; - union { - uint8_t raw_content[124]; - struct { - uint8_t HR[2]; - uint8_t data_block[15][8]; - uint8_t CRC[2]; - } static_memory; - } rall_response; - uint8_t *static_lock_bytes = rall_response.static_memory.data_block[0x0e]; + uint8_t rall_response[124]; status = topaz_select(atqa, rid_response); @@ -279,14 +448,17 @@ int CmdHFTopazReader(const char *Cmd) return -1; } + topaz_tag.HR01[0] = rid_response[0]; + topaz_tag.HR01[1] = rid_response[1]; + // ToDo: CRC check PrintAndLog("HR0 : %02x (%sa Topaz tag (%scapable of carrying a NDEF message), %s memory map)", rid_response[0], (rid_response[0] & 0xF0) == 0x10 ? "" : "not ", (rid_response[0] & 0xF0) == 0x10 ? "" : "not ", - (rid_response[0] & 0x0F) == 0x10 ? "static" : "dynamic"); + (rid_response[0] & 0x0F) == 0x01 ? "static" : "dynamic"); PrintAndLog("HR1 : %02x", rid_response[1]); - status = topaz_rall(uid_echo, rall_response.raw_content); + status = topaz_rall(uid_echo, rall_response); if(status == -1) { PrintAndLog("Error: tag didn't answer to RALL"); @@ -294,78 +466,76 @@ int CmdHFTopazReader(const char *Cmd) return -1; } + memcpy(topaz_tag.uid, rall_response+2, 7); PrintAndLog("UID : %02x %02x %02x %02x %02x %02x %02x", - rall_response.static_memory.data_block[0][6], - rall_response.static_memory.data_block[0][5], - rall_response.static_memory.data_block[0][4], - rall_response.static_memory.data_block[0][3], - rall_response.static_memory.data_block[0][2], - rall_response.static_memory.data_block[0][1], - rall_response.static_memory.data_block[0][0]); + topaz_tag.uid[6], + topaz_tag.uid[5], + topaz_tag.uid[4], + topaz_tag.uid[3], + topaz_tag.uid[2], + topaz_tag.uid[1], + topaz_tag.uid[0]); PrintAndLog(" UID[6] (Manufacturer Byte) = %02x, Manufacturer: %s", - rall_response.static_memory.data_block[0][6], - getTagInfo(rall_response.static_memory.data_block[0][6])); - + topaz_tag.uid[6], + getTagInfo(topaz_tag.uid[6])); + + memcpy(topaz_tag.data_blocks, rall_response+2, 0x0f*8); PrintAndLog(""); PrintAndLog("Static Data blocks 00 to 0c:"); - PrintAndLog("block# | offset | Data | Locked?"); + PrintAndLog("block# | offset | Data | Locked(y/n)"); char line[80]; for (uint16_t i = 0; i <= 0x0c; i++) { + char lockbits[9]; for (uint16_t j = 0; j < 8; j++) { - sprintf(&line[3*j], "%02x ", rall_response.static_memory.data_block[i][j] /*rall_response[2 + 8*i + j]*/); + sprintf(&line[3*j], "%02x ", topaz_tag.data_blocks[i][j] /*rall_response[2 + 8*i + j]*/); + lockbits[j] = topaz_byte_is_locked(i*8+j) ? 'y' : 'n'; } - PrintAndLog(" 0x%02x | 0x%02x | %s| %-3s", i, i*8, line, topaz_block_is_locked(i, static_lock_bytes) ? "yes" : "no"); + lockbits[8] = '\0'; + PrintAndLog(" 0x%02x | 0x%04x | %s| %-3s", i, i*8, line, lockbits); } PrintAndLog(""); PrintAndLog("Static Reserved block 0d:"); for (uint16_t j = 0; j < 8; j++) { - sprintf(&line[3*j], "%02x ", rall_response.static_memory.data_block[0x0d][j]); + sprintf(&line[3*j], "%02x ", topaz_tag.data_blocks[0x0d][j]); } - PrintAndLog(" 0x%02x | 0x%02x | %s| %-3s", 0x0d, 0x0d*8, line, "n/a"); + PrintAndLog(" 0x%02x | 0x%04x | %s| %-3s", 0x0d, 0x0d*8, line, "n/a"); PrintAndLog(""); - PrintAndLog("Static Lockbits / OTP block 0e:"); + PrintAndLog("Static Lockbits and OTP Bytes:"); for (uint16_t j = 0; j < 8; j++) { - sprintf(&line[3*j], "%02x ", static_lock_bytes[j]); + sprintf(&line[3*j], "%02x ", topaz_tag.data_blocks[0x0e][j]); } - PrintAndLog(" 0x%02x | 0x%02x | %s| %-3s", 0x0e, 0x0e*8, line, "n/a"); + PrintAndLog(" 0x%02x | 0x%04x | %s| %-3s", 0x0e, 0x0e*8, line, "n/a"); PrintAndLog(""); - status = topaz_print_CC(&rall_response.static_memory.data_block[1][0]); + status = topaz_print_CC(&topaz_tag.data_blocks[1][0]); if (status == -1) { - PrintAndLog("No NDEF message present"); + PrintAndLog("No NDEF message data present"); topaz_switch_off_field(); return 0; } PrintAndLog(""); - bool lock_TLV_present = topaz_print_lock_control_TLVs(&rall_response.static_memory.data_block[1][4]); + topaz_print_control_TLVs(&topaz_tag.data_blocks[1][4]); PrintAndLog(""); - bool reserved_mem_present = topaz_print_reserved_memory_control_TLVs(&rall_response.static_memory.data_block[1][4]); - - topaz_print_lifecycle_state(&rall_response.static_memory.data_block[1][0]); + topaz_print_dynamic_data(); + + topaz_print_lifecycle_state(&topaz_tag.data_blocks[1][0]); - topaz_print_NDEF(&rall_response.static_memory.data_block[1][0]); + topaz_print_NDEF(&topaz_tag.data_blocks[1][0]); topaz_switch_off_field(); return 0; } -int CmdHFTopazSim(const char *Cmd) -{ - PrintAndLog("not yet implemented"); - return 0; -} - - int CmdHFTopazCmdRaw(const char *Cmd) { - PrintAndLog("not yet implemented"); + PrintAndLog("not yet implemented. Use hf 14 raw with option -T."); return 0; } @@ -377,7 +547,6 @@ static command_t CommandTable[] = { {"help", CmdHelp, 1, "This help"}, {"reader", CmdHFTopazReader, 0, "Act like a Topaz reader"}, - {"sim", CmdHFTopazSim, 0, " -- Simulate Topaz tag"}, {"snoop", CmdHF14ASnoop, 0, "Eavesdrop a Topaz reader-tag communication"}, {"raw", CmdHFTopazCmdRaw, 0, "Send raw hex data to tag"}, {NULL, NULL, 0, NULL} @@ -385,14 +554,12 @@ static command_t CommandTable[] = int CmdHFTopaz(const char *Cmd) { - // flush - WaitForResponseTimeout(CMD_ACK,NULL,100); - - // parse + (void)WaitForResponseTimeout(CMD_ACK,NULL,100); CmdsParse(CommandTable, Cmd); return 0; } + static int CmdHelp(const char *Cmd) { CmdsHelp(CommandTable);