1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
|
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <stdint.h>
#include <fcntl.h>
#include <string.h>
#include <time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/mman.h>
#include <netinet/in.h>
#include <nfc/nfc-types.h>
#include <nfc/mifaretag.h>
#include "easycard.h"
struct {
int fd;
unsigned long size;
mifare_tag *mft;
} global;
#define ABP_C1 0x04
#define ABP_C2 0x02
#define ABP_C3 0x01
struct acc_bits_parsed {
uint8_t block[4];
};
static void dump_acc_bits(const struct acc_bits_parsed *abp)
{
uint8_t block;
for (block = 0; block < 4; block++) {
printf("\tBlock %u: %x (%u %u %u)\n", block, abp->block[block],
abp->block[block] & ABP_C1 ? 1 : 0,
abp->block[block] & ABP_C2 ? 1 : 0,
abp->block[block] & ABP_C3 ? 1 : 0);
}
}
static void parse_acc_bits(struct acc_bits_parsed *abp, uint8_t *acc_bits)
{
uint8_t c1, c2, c3;
uint8_t block;
memset(abp, 0, sizeof(*abp));
c1 = acc_bits[1] >> 4;
c2 = acc_bits[2] & 0xf;
c3 = acc_bits[2] >> 4;
printf("C1 = %x, C2 = %x, C3 = %x\n", c1, c2, c3);
for (block = 0; block < 4; block++) {
uint8_t testbit = 1 << block;
if (c1 & testbit)
abp->block[block] |= ABP_C1;
if (c2 & testbit)
abp->block[block] |= ABP_C2;
if (c3 & testbit)
abp->block[block] |= ABP_C3;
}
}
/* storage of a transaction log record on the transponder itself */
struct easy_log_rec {
uint8_t unknown[2];
uint8_t timestamp[3]; /* seconds since January 1st 1970 / 256 */
uint8_t trans_type;
uint16_t amount; /* transaction amount / value */
uint16_t remaining; /* remaining value on card _after_ trans */
uint8_t unknown2[6];
} __attribute__ ((packed));
static time_t convert_timestamp(const uint8_t *easy_ts)
{
return (easy_ts[2] << 16 | easy_ts[1] << 8 | easy_ts[0]) << 8;
}
static void dump_easy_log(const struct easy_log_rec *elr)
{
time_t t_time = convert_timestamp(elr->timestamp);
struct tm *t_tm = gmtime(&t_time);
printf("%u-%u-%u %u:%u | %10s %u NTD -> %u NTD remaining\n",
t_tm->tm_year+1900, t_tm->tm_mon+1, t_tm->tm_mday,
t_tm->tm_hour, t_tm->tm_min,
get_value_string(easy_tt_names, elr->trans_type),
elr->amount, elr->remaining);
}
static void dump_mfcl(mifare_tag *mft)
{
unsigned int sect;
mifare_block_manufacturer *manuf = &mft->amb[0].mbm;
printf("UID %x, ATQA %x\n", ntohl(*((uint32_t *) manuf->abtUID)),
ntohs(*((uint16_t *) manuf->abtATQA)));
for (sect = 0; sect < 16; sect++) {
unsigned int block_base = sect * 4;
uint8_t *access_bits = mft->amb[block_base+3].mbt.abtAccessBits;
struct acc_bits_parsed abp;
int i;
printf("Sector %02u (base: 0x%02x) Access bits: 0x%08x\n", sect,
sect*4*16, ntohl(*((uint32_t *) access_bits)));
//parse_acc_bits(&abp, access_bits);
//dump_acc_bits(&abp);
if (sect == 3 || sect == 4) {
for (i = 0; i < 3; i++) {
void *data = mft->amb[block_base+i].mbd.abtData;
dump_easy_log(data);
}
}
}
}
int main(int argc, char **argv)
{
struct stat st;
global.fd = open(argv[1], O_RDONLY);
if (global.fd < 0) {
perror("open");
exit(1);
}
if (fstat(global.fd, &st) < 0) {
perror("stat");
exit(1);
}
global.size = st.st_size;
global.mft = mmap(NULL, global.size, PROT_READ, MAP_SHARED,
global.fd, 0);
if (!global.mft) {
perror("mmap");
exit(1);
}
dump_mfcl(global.mft);
munmap(global.mft, global.size);
close(global.fd);
exit(0);
}
|
