git.rot13.org Git - librfid/blob - utils/mifare-tool.c

   1 /* mifare-tool - a small command-line tool for librfid mifare testing
   2  *
   3  * (C) 2006 by Harald Welte <laforge@gnumonks.org>
   4  *
   5  *  This program is free software; you can redistribute it and/or modify
   6  *  it under the terms of the GNU General Public License version 2
   7  *  as published by the Free Software Foundation
   8  *
   9  *  This program is distributed in the hope that it will be useful,
  10  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  *  GNU General Public License for more details.
  13  *
  14  *  You should have received a copy of the GNU General Public License
  15  *  along with this program; if not, write to the Free Software
  16  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  */
  18
  19 #include <stdio.h>
  20 #include <unistd.h>
  21 #include <stdlib.h>
  22 #include <string.h>
  23 #include <errno.h>
  24 //#include <libgen.h>
  25
  26 #define _GNU_SOURCE
  27 #include <getopt.h>
  28
  29 #include <librfid/rfid.h>
  30 #include <librfid/rfid_scan.h>
  31 #include <librfid/rfid_reader.h>
  32 #include <librfid/rfid_layer2.h>
  33 #include <librfid/rfid_protocol.h>
  34
  35 #include <librfid/rfid_protocol_mifare_classic.h>
  36 #include <librfid/rfid_protocol_mifare_ul.h>
  37
  38 #include <librfid/rfid_access_mifare_classic.h>
  39
  40 #include "librfid-tool.h"
  41
  42 static char *program_name;
  43
  44 static void help(void)
  45 {
  46         printf( " -h    --help          Print this help message\n"
  47                 " -r    --read          Read a mifare sector\n"
  48                 " -l    --loop-read     Loop reading a mifare sector\n"
  49                 " -w    --write         Write a mifare sector\n"
  50                 " -k    --key           Specify mifare access key (in hex tuples)\n");
  51 }
  52
  53 static struct option mifare_opts[] = {
  54         { "key", 1, 0, 'k' },
  55         { "read", 1, 0, 'r' },
  56         { "loop-read", 1, 0, 'l' },
  57         { "write", 1 ,0, 'w' },
  58         { "help", 0, 0, 'h' },
  59         { 0, 0, 0, 0 }
  60 };
  61
  62 static int mifare_cl_auth(unsigned char *key, int page)
  63 {
  64         int rc;
  65
  66         rc = mfcl_set_key(ph, key);
  67         if (rc < 0) {
  68                 fprintf(stderr, "key format error\n");
  69                 return rc;
  70         }
  71         rc = mfcl_auth(ph, RFID_CMD_MIFARE_AUTH1A, page);
  72         if (rc < 0) {
  73                 fprintf(stderr, "mifare auth error\n");
  74                 return rc;
  75         } else
  76                 printf("mifare auth succeeded!\n");
  77
  78         return 0;
  79 }
  80
  81 static void mifare_l3(void)
  82 {
  83         while (l2_init(RFID_LAYER2_ISO14443A) < 0) ;
  84
  85         printf("ISO14443-3A anticollision succeeded\n");
  86
  87         while (l3_init(RFID_PROTOCOL_MIFARE_CLASSIC) < 0) ;
  88
  89         printf("Mifare card available\n");
  90 }
  91
  92 int main(int argc, char **argv)
  93 {
  94         int len, rc, c, option_index = 0;
  95         unsigned int page,uid,uid_len;
  96         char key[MIFARE_CL_KEY_LEN];
  97         char buf[MIFARE_CL_PAGE_SIZE];
  98
  99 #ifdef  __MINGW32__
 100         program_name = argv[0];
 101 #else
 102         program_name = basename(argv[0]);
 103 #endif/*__MINGW32__*/
 104
 105         memcpy(key, MIFARE_CL_KEYA_DEFAULT_INFINEON, MIFARE_CL_KEY_LEN);
 106
 107         printf("%s - (C) 2006 by Harald Welte\n"
 108                "This program is Free Software and has "
 109                "ABSOLUTELY NO WARRANTY\n\n", program_name);
 110
 111         printf("initializing librfid\n");
 112         rfid_init();
 113
 114         if (reader_init() < 0) {
 115                 fprintf(stderr, "error opening reader\n");
 116                 exit(1);
 117         }
 118
 119         while (1) {
 120                 c = getopt_long(argc, argv, "k:r:l:w:", mifare_opts,
 121                                 &option_index);
 122                 if (c == -1)
 123                         break;
 124
 125                 switch (c) {
 126                 case 'k':
 127                         hexread(key, optarg, strlen(optarg));
 128                         printf("key: %s\n", hexdump(key, MIFARE_CL_KEY_LEN));
 129                         break;
 130                 case 'r':
 131                         page = atoi(optarg);
 132                         printf("read(key='%s',page=%u):",
 133                                 hexdump(key, MIFARE_CL_KEY_LEN), page);
 134                         len = MIFARE_CL_PAGE_SIZE;
 135                         mifare_l3();
 136                         if (mifare_cl_auth(key, page) < 0)
 137                                 exit(1);
 138
 139                         uid_len=sizeof(uid);
 140                         uid=0;
 141                         if(rfid_layer2_getopt(l2h,RFID_OPT_LAYER2_UID,&uid,&uid_len)>=0)
 142                             printf("UID=%08X (len=%u)\n",uid,uid_len);
 143
 144                         len=MIFARE_CL_PAGE_SIZE;
 145                         rc = rfid_protocol_read(ph, page, buf, &len);
 146                         if (rc < 0) {
 147                                 printf("\n");
 148                                 fprintf(stderr, "error during read\n");
 149                                 break;
 150                         }
 151                         printf("len=%u data=%s\n", len, hexdump(buf, len));
 152
 153                         if (page & 0x3 == 0x3) {
 154                                 struct mfcl_access_sect s;
 155                                 struct mfcl_access_exp_sect es;
 156                                 int b;
 157                                 u_int8_t recreated[4];
 158                                 mfcl_parse_access(&s, buf+6);
 159                                 printf("access b0:%u b1:%u b2:%u b3:%u\n",
 160                                         s.block[0], s.block[1],
 161                                         s.block[2], s.block[3]);
 162                                 mfcl_access_to_exp(&es, &s);
 163                                 for (b = 0; b < 3; b++)
 164                                         printf("%u: %s\n", b, mfcl_access_exp_stringify(&es.block[b]));
 165                                 printf("3: %s\n", mfcl_access_exp_acc_stringify(&es.acc));
 166 #if 0
 167                                 mfcl_compile_access(recreated, &s);
 168                                 printf("recreated; %s\n", hexdump(recreated,4));
 169 #endif
 170                         }
 171                         break;
 172                 case 'l':
 173                         page = atoi(optarg);
 174                         printf("read_loop(key='%s',page=%u):\n",
 175                                 hexdump(key, MIFARE_CL_KEY_LEN), page);
 176                         while (1) {
 177                                 mifare_l3();
 178                                 if (mifare_cl_auth(key, page) < 0)
 179                                         continue;
 180
 181                                 uid_len=sizeof(uid);
 182                                 uid=0;
 183                                 if(rfid_layer2_getopt(l2h,RFID_OPT_LAYER2_UID,&uid,&uid_len)>=0)
 184                                     printf("UID=%08X (len=%u)\n",uid,uid_len);
 185
 186                                 len=MIFARE_CL_PAGE_SIZE;
 187                                 rc = rfid_protocol_read(ph, page, buf, &len);
 188                                 if (rc < 0) {
 189                                         printf("\n");
 190                                         fprintf(stderr, "error during read\n");
 191                                         continue;
 192                                 }
 193                                 printf("%s\n", hexdump(buf, len));
 194                         }
 195                         break;
 196                 case 'w':
 197                         page = atoi(optarg);
 198                         len = strlen(argv[optind]);
 199                         len = hexread(buf, argv[optind], len);
 200                         printf("write(key='%s',page=%u):",
 201                                 hexdump(key, MIFARE_CL_KEY_LEN), page);
 202                         printf(" '%s'(%u):", hexdump(buf, len), len);
 203                         mifare_l3();
 204                         if (mifare_cl_auth(key, page) < 0)
 205                                 exit(1);
 206                         rc = rfid_protocol_write(ph, page, buf, len);
 207                         if (rc < 0) {
 208                                 printf("\n");
 209                                 fprintf(stderr, "error during write\n");
 210                                 break;
 211                         }
 212                         printf("success\n");
 213                         break;
 214                 case 'h':
 215                 default:
 216                         help();
 217                 }
 218         }
 219
 220 #if 0
 221         rfid_protocol_close(ph);
 222         rfid_protocol_fini(ph);
 223
 224         rfid_layer2_close(l2h);
 225         rfid_layer2_fini(l2h);
 226 #endif
 227         rfid_reader_close(rh);
 228         exit(0);
 229 }
 230