src/rfid_proto_mifare_classic.c

   1
   2 /* Mifare Classic implementation, PCD side.
   3  *
   4  * (C) 2005 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 /* FIXME */
  42 #define MIFARE_CL_READ_FWT      100
  43 #define MIFARE_CL_WRITE_FWT     100
  44
  45 static int
  46 mfcl_read(struct rfid_protocol_handle *ph, unsigned int page,
  47           unsigned char *rx_data, unsigned int *rx_len)
  48 {
  49         unsigned char rx_buf[16];
  50         unsigned int real_rx_len = sizeof(rx_buf);
  51         unsigned char tx[2];
  52         int ret;
  53
  54         if (page > MIFARE_CL_PAGE_MAX)
  55                 return -EINVAL;
  56
  57         tx[0] = MIFARE_CL_CMD_READ;
  58         tx[1] = page & 0xff;
  59
  60         ret = rfid_layer2_transcieve(ph->l2h, RFID_MIFARE_FRAME, tx,
  61                                      sizeof(tx), rx_buf, &real_rx_len,
  62                                      MIFARE_CL_READ_FWT, 0);
  63
  64         if (ret < 0)
  65                 return ret;
  66
  67         if (real_rx_len == 1 && *rx_buf == 0x04)
  68                 return -EPERM;
  69
  70         if (real_rx_len < *rx_len)
  71                 *rx_len = real_rx_len;
  72
  73         memcpy(rx_data, rx_buf, *rx_len);
  74
  75         return ret;
  76 }
  77
  78 static int
  79 mfcl_write(struct rfid_protocol_handle *ph, unsigned int page,
  80            unsigned char *tx_data, unsigned int tx_len)
  81 {
  82         unsigned int i;
  83         unsigned char tx[18];
  84         unsigned char rx[1];
  85         unsigned int rx_len;
  86         int ret;
  87
  88         if (tx_len != 16 || page > MIFARE_CL_PAGE_MAX)
  89                 return -EINVAL;
  90
  91         tx[0] = MIFARE_CL_CMD_WRITE16;
  92         tx[1] = page & 0xff;
  93
  94         memcpy(tx+2, tx_data, 16);
  95
  96         ret = rfid_layer2_transcieve(ph->l2h, RFID_MIFARE_FRAME, tx,
  97                                      sizeof(tx), rx, &rx_len,
  98                                      MIFARE_CL_WRITE_FWT, 0);
  99
 100         if (ret < 0)
 101                 return ret;
 102
 103         if (rx[0] != MIFARE_UL_RESP_ACK)
 104                 return -EIO;
 105
 106         return ret;
 107 }
 108
 109 static struct rfid_protocol_handle *
 110 mfcl_init(struct rfid_layer2_handle *l2h)
 111 {
 112         struct rfid_protocol_handle *ph;
 113         ph = malloc(sizeof(struct rfid_protocol_handle));
 114         return ph;
 115 }
 116
 117 static int mfcl_fini(struct rfid_protocol_handle *ph)
 118 {
 119         free(ph);
 120         return 0;
 121 }
 122
 123 struct rfid_protocol rfid_protocol_mfcl = {
 124         .id     = RFID_PROTOCOL_MIFARE_CLASSIC,
 125         .name   = "Mifare Classic",
 126         .fn     = {
 127                 .init           = &mfcl_init,
 128                 .read           = &mfcl_read,
 129                 .write          = &mfcl_write,
 130                 .fini           = &mfcl_fini,
 131         },
 132 };
 133
 134 int mfcl_set_key(struct rfid_protocol_handle *ph, unsigned char *key)
 135 {
 136         if (!ph->l2h->rh->reader->mifare_classic.setkey)
 137                 return -ENODEV;
 138
 139         return ph->l2h->rh->reader->mifare_classic.setkey(ph->l2h->rh, key);
 140 }
 141
 142 int mfcl_auth(struct rfid_protocol_handle *ph, u_int8_t cmd, u_int8_t block)
 143 {
 144         u_int32_t serno = *((u_int32_t *)ph->l2h->uid);
 145
 146         if (!ph->l2h->rh->reader->mifare_classic.auth)
 147                 return -ENODEV;
 148
 149         return ph->l2h->rh->reader->mifare_classic.auth(ph->l2h->rh, cmd,
 150                                                        serno, block);
 151 }