git.rot13.org Git - librfid/blob - src/rfid_proto_mifare_classic.c

   1
   2 /* Mifare Classic implementation, PCD side.
   3  *
   4  * (C) 2005-2006 by Harald Welte <laforge@gnumonks.org>
   5  *
   6  */
   7
   8 /*
   9  *  This program is free software; you can redistribute it and/or modify
  10  *  it under the terms of the GNU General Public License version 2
  11  *  as published by the Free Software Foundation
  12  *
  13  *  This program is distributed in the hope that it will be useful,
  14  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  *  GNU General Public License for more details.
  17  *
  18  *  You should have received a copy of the GNU General Public License
  19  *  along with this program; if not, write to the Free Software
  20  *  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
  21  */
  22 #include <stdio.h>
  23 #include <stdlib.h>
  24 #include <unistd.h>
  25 #include <string.h>
  26 #include <errno.h>
  27
  28 #include <librfid/rfid.h>
  29 #include <librfid/rfid_protocol.h>
  30 #include <librfid/rfid_layer2.h>
  31 #include <librfid/rfid_protocol_mifare_classic.h>
  32
  33 #include <librfid/rfid_reader.h>
  34
  35 #include "rfid_iso14443_common.h"
  36
  37
  38 #define MIFARE_UL_CMD_WRITE     0xA2
  39 #define MIFARE_UL_CMD_READ      0x30
  40
  41 #define MIFARE_CL_READ_FWT      250
  42 #define MIFARE_CL_WRITE_FWT     600
  43
  44 static int
  45 mfcl_read(struct rfid_protocol_handle *ph, unsigned int page,
  46           unsigned char *rx_data, unsigned int *rx_len)
  47 {
  48         unsigned char rx_buf[16];
  49         unsigned int real_rx_len = sizeof(rx_buf);
  50         unsigned char tx[2];
  51         int ret;
  52
  53         if (page > MIFARE_CL_PAGE_MAX)
  54                 return -EINVAL;
  55
  56         tx[0] = MIFARE_CL_CMD_READ;
  57         tx[1] = page & 0xff;
  58
  59         ret = rfid_layer2_transceive(ph->l2h, RFID_MIFARE_FRAME, tx,
  60                                      sizeof(tx), rx_buf, &real_rx_len,
  61                                      MIFARE_CL_READ_FWT, 0);
  62
  63         if (ret < 0)
  64                 return ret;
  65
  66         if (real_rx_len == 1 && *rx_buf == 0x04)
  67                 return -EPERM;
  68
  69         if (real_rx_len < *rx_len)
  70                 *rx_len = real_rx_len;
  71
  72         memcpy(rx_data, rx_buf, *rx_len);
  73
  74         return ret;
  75 }
  76
  77 static int
  78 mfcl_write(struct rfid_protocol_handle *ph, unsigned int page,
  79            unsigned char *tx_data, unsigned int tx_len)
  80 {
  81         unsigned char tx[2];
  82         unsigned char rx[1];
  83         unsigned int rx_len = sizeof(rx);
  84         int ret;
  85
  86         if (page > MIFARE_CL_PAGE_MAX)
  87                 return -EINVAL;
  88
  89         if (tx_len != 16)
  90                 return -EINVAL;
  91
  92         tx[0] = MIFARE_CL_CMD_WRITE16;
  93         tx[1] = page & 0xff;
  94
  95         ret = rfid_layer2_transceive(ph->l2h, RFID_MIFARE_FRAME, tx, 2, rx,
  96                                      &rx_len, MIFARE_CL_WRITE_FWT, 0);
  97         if (ret < 0)
  98                 return ret;
  99
 100         ret = rfid_layer2_transceive(ph->l2h, RFID_MIFARE_FRAME, tx_data,
 101                                      tx_len, rx, &rx_len,
 102                                      MIFARE_CL_WRITE_FWT, 0);
 103         if (ret < 0)
 104                 return ret;
 105
 106         if (rx[0] != MIFARE_UL_RESP_ACK)
 107                 return -EIO;
 108
 109         return ret;
 110 }
 111
 112 static int
 113 mfcl_getopt(struct rfid_protocol_handle *ph, int optname, void *optval,
 114             unsigned int *optlen)
 115 {
 116         int ret = -EINVAL;
 117         u_int8_t atqa[2];
 118         unsigned int atqa_size = sizeof(atqa);
 119         unsigned int *size = optval;
 120
 121         switch (optname) {
 122         case RFID_OPT_PROTO_SIZE:
 123                 if (*optlen < sizeof(*size))
 124                         return -EINVAL;
 125                 *optlen = sizeof(*size);
 126                 ret = 0;
 127                 rfid_layer2_getopt(ph->l2h, RFID_OPT_14443A_ATQA,
 128                                    atqa, &atqa_size);
 129                 if (atqa[0] == 0x04 && atqa[1] == 0x00)
 130                         *size = 1024;
 131                 else if (atqa[0] == 0x02 && atqa[1] == 0x00)
 132                         *size = 4096;
 133                 else
 134                         ret = -EIO;
 135                 break;
 136         }
 137
 138         return ret;
 139 }
 140
 141 static struct rfid_protocol_handle *
 142 mfcl_init(struct rfid_layer2_handle *l2h)
 143 {
 144         struct rfid_protocol_handle *ph;
 145
 146         if (l2h->l2->id != RFID_LAYER2_ISO14443A)
 147                 return NULL;
 148
 149         if (l2h->uid_len != 4)
 150                 return NULL;
 151
 152         ph = malloc_protocol_handle(sizeof(struct rfid_protocol_handle));
 153         return ph;
 154 }
 155
 156 static int mfcl_fini(struct rfid_protocol_handle *ph)
 157 {
 158         free_protocol_handle(ph);
 159         return 0;
 160 }
 161
 162 const struct rfid_protocol rfid_protocol_mfcl = {
 163         .id     = RFID_PROTOCOL_MIFARE_CLASSIC,
 164         .name   = "Mifare Classic",
 165         .fn     = {
 166                 .init           = &mfcl_init,
 167                 .read           = &mfcl_read,
 168                 .write          = &mfcl_write,
 169                 .fini           = &mfcl_fini,
 170                 .getopt         = &mfcl_getopt,
 171         },
 172 };
 173
 174 int mfcl_set_key(struct rfid_protocol_handle *ph, unsigned char *key)
 175 {
 176         if (!ph->l2h->rh->reader->mifare_classic.setkey)
 177                 return -ENODEV;
 178
 179         return ph->l2h->rh->reader->mifare_classic.setkey(ph->l2h->rh, key);
 180 }
 181
 182 int mfcl_auth(struct rfid_protocol_handle *ph, u_int8_t cmd, u_int8_t block)
 183 {
 184         u_int32_t serno = *((u_int32_t *)ph->l2h->uid);
 185
 186         if (!ph->l2h->rh->reader->mifare_classic.auth)
 187                 return -ENODEV;
 188
 189         return ph->l2h->rh->reader->mifare_classic.auth(ph->l2h->rh, cmd,
 190                                                        serno, block);
 191 }