add some rude code for pegoda mifare classic operation
[librfid] / rfid_asic_rc632.c
1 /* Generic Philips CL RC632 Routines
2  *
3  * (C) Harald Welte <laforge@gnumonks.org>
4  *
5  */
6
7 /*
8  *  This program is free software; you can redistribute it and/or modify
9  *  it under the terms of the GNU General Public License version 2 
10  *  as published by the Free Software Foundation
11  *
12  *  This program is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *  GNU General Public License for more details.
16  *
17  *  You should have received a copy of the GNU General Public License
18  *  along with this program; if not, write to the Free Software
19  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
20  */
21
22 #include <unistd.h>
23 #include <stdlib.h>
24 #include <string.h>
25 #include <errno.h>
26 #include <sys/types.h>
27
28 #include <rfid/rfid.h>
29 #include <rfid/rfid_asic.h>
30 #include <rfid/rfid_asic_rc632.h>
31 #include <rfid/rfid_reader_cm5121.h>
32 #include <rfid/rfid_layer2_iso14443a.h>
33 #include <rfid/rfid_protocol_mifare_classic.h>
34
35 #include "rfid_iso14443_common.h"
36 #include "rc632.h"
37 //#include "rc632_14443a.h"
38
39
40 #define RC632_TMO_AUTH1 14000
41
42 #define ENTER()         DEBUGP("entering\n")
43 struct rfid_asic rc632;
44
45 /* Register and FIFO Access functions */
46 static int 
47 rc632_reg_write(struct rfid_asic_handle *handle,
48                 u_int8_t reg,
49                 u_int8_t val)
50 {
51         return handle->rath->rat->priv.rc632.fn.reg_write(handle->rath, reg, val);
52 }
53
54 static int 
55 rc632_reg_read(struct rfid_asic_handle *handle,
56                u_int8_t reg,
57                u_int8_t *val)
58 {
59         return handle->rath->rat->priv.rc632.fn.reg_read(handle->rath, reg, val);
60 }
61
62 static int 
63 rc632_fifo_write(struct rfid_asic_handle *handle,
64                  u_int8_t len,
65                  const u_int8_t *buf,
66                  u_int8_t flags)
67 {
68         return handle->rath->rat->priv.rc632.fn.fifo_write(handle->rath, 
69                                                            len, buf, flags);
70 }
71
72 static int 
73 rc632_fifo_read(struct rfid_asic_handle *handle,
74                 u_int8_t len,
75                 u_int8_t *buf)
76 {
77         return handle->rath->rat->priv.rc632.fn.fifo_read(handle->rath, len, buf);
78 }
79
80
81 static int
82 rc632_set_bits(struct rfid_asic_handle *handle, 
83                 u_int8_t reg,
84                 u_int8_t val)
85 {
86         int ret;
87         u_int8_t tmp;
88
89         ret = rc632_reg_read(handle, reg, &tmp);
90         if (ret < 0)
91                 return -1;
92
93         /* if bits are already set, no need to set them again */
94         if ((tmp & val) == val)
95                 return 0;
96
97         return rc632_reg_write(handle, reg, (tmp|val)&0xff);
98 }
99
100 static int 
101 rc632_clear_bits(struct rfid_asic_handle *handle, 
102                  u_int8_t reg,
103                  u_int8_t val)
104 {
105         int ret;
106         u_int8_t tmp;
107
108         ret = rc632_reg_read(handle, reg, &tmp);
109         if (ret < 0) {
110                 DEBUGP("error during reg_read(%p, %d):%d\n",
111                         handle, reg, ret);
112                 return -1;
113         }
114         /* if bits are already cleared, no need to clear them again */
115         if ((tmp & val) == 0)
116                 return 0;
117
118         return rc632_reg_write(handle, reg, (tmp & ~val)&0xff);
119 }
120
121 static int 
122 rc632_turn_on_rf(struct rfid_asic_handle *handle)
123 {
124         ENTER();
125         return rc632_set_bits(handle, RC632_REG_TX_CONTROL, 0x03);
126 }
127
128 static int 
129 rc632_turn_off_rf(struct rfid_asic_handle *handle)
130 {
131         ENTER();
132         return rc632_clear_bits(handle, RC632_REG_TX_CONTROL, 0x03);
133 }
134
135 static int
136 rc632_power_up(struct rfid_asic_handle *handle)
137 {
138         ENTER();
139         return rc632_clear_bits(handle, RC632_REG_CONTROL, 
140                                 RC632_CONTROL_POWERDOWN);
141 }
142
143 static int
144 rc632_power_down(struct rfid_asic_handle *handle)
145 {
146         return rc632_set_bits(handle, RC632_REG_CONTROL,
147                               RC632_CONTROL_POWERDOWN);
148 }
149
150 /* Stupid RC623 implementations don't evaluate interrupts but poll the
151  * command register for "status idle" */
152 static int
153 rc632_wait_idle(struct rfid_asic_handle *handle, u_int64_t timeout)
154 {
155         u_int8_t cmd = 0xff;
156         int ret;
157
158         while (cmd != 0) {
159                 ret = rc632_reg_read(handle, RC632_REG_COMMAND, &cmd);
160                 if (ret < 0)
161                         return ret;
162
163                 if (cmd == 0) {
164                         /* FIXME: read second time ?? */
165                         return 0;
166                 }
167
168                 {
169                         u_int8_t foo;
170                         rc632_reg_read(handle, RC632_REG_PRIMARY_STATUS, &foo);
171                         if (foo & 0x04)
172                                 rc632_reg_read(handle, RC632_REG_ERROR_FLAG, &foo);
173                 }
174
175                 usleep(100);
176
177                 /* Fixme: Abort after some timeout */
178         }
179
180         return 0;
181 }
182
183 static int
184 rc632_transmit(struct rfid_asic_handle *handle,
185                 const u_int8_t *buf,
186                 u_int8_t len,
187                 u_int64_t timeout)
188 {
189         int ret;
190
191         ret = rc632_fifo_write(handle, len, buf, 0x03);
192         if (ret < 0)
193                 return ret;
194
195         ret = rc632_reg_write(handle, RC632_REG_COMMAND, RC632_CMD_TRANSMIT);
196         if (ret < 0)
197                 return ret;
198
199         return rc632_wait_idle(handle, timeout);
200 }
201
202 static int
203 tcl_toggle_pcb(struct rfid_asic_handle *handle)
204 {
205         // FIXME: toggle something between 0x0a and 0x0b
206         return 0;
207 }
208
209 static int
210 rc632_transcieve(struct rfid_asic_handle *handle,
211                  const u_int8_t *tx_buf,
212                  u_int8_t tx_len,
213                  u_int8_t *rx_buf,
214                  u_int8_t *rx_len,
215                  unsigned int timer,
216                  unsigned int toggle)
217 {
218         int ret;
219
220         ret = rc632_fifo_write(handle, tx_len, tx_buf, 0x03);
221         if (ret < 0)
222                 return ret;
223
224         ret = rc632_reg_write(handle, RC632_REG_COMMAND, RC632_CMD_TRANSCIEVE);
225         if (ret < 0)
226                 return ret;
227
228         if (toggle == 1)
229                 tcl_toggle_pcb(handle);
230
231         ret = rc632_wait_idle(handle, timer);
232         if (ret < 0)
233                 return ret;
234
235         ret = rc632_reg_read(handle, RC632_REG_FIFO_LENGTH, rx_len);
236         if (ret < 0)
237                 return ret;
238
239         if (*rx_len == 0) {
240                 u_int8_t tmp;
241
242                 DEBUGP("rx_len == 0\n");
243
244                 rc632_reg_read(handle, RC632_REG_ERROR_FLAG, &tmp);
245                 rc632_reg_read(handle, RC632_REG_CHANNEL_REDUNDANCY, &tmp);
246
247                 return -1; 
248         }
249
250         return rc632_fifo_read(handle, *rx_len, rx_buf);
251 }
252
253 static int
254 rc632_read_eeprom(struct rfid_asic_handle *handle)
255 {
256         u_int8_t recvbuf[60];
257         u_int8_t sndbuf[3];
258         int ret;
259
260         sndbuf[0] = 0x00;
261         sndbuf[1] = 0x00;
262         sndbuf[2] = 0x3c;
263
264         ret = rc632_fifo_write(handle, 3, sndbuf, 0x03);
265         if (ret < 0)
266                 return ret;
267
268         ret = rc632_reg_write(handle, RC632_REG_COMMAND, RC632_CMD_READ_E2);
269         if (ret < 0)
270                 return ret;
271
272         usleep(20000);
273
274         ret = rc632_fifo_read(handle, sizeof(recvbuf), recvbuf);
275         if (ret < 0)
276                 return ret;
277
278         // FIXME: do something with eeprom contents
279         return ret;
280 }
281
282 static int
283 rc632_calc_crc16_from(struct rfid_asic_handle *handle)
284 {
285         u_int8_t sndbuf[2] = { 0x01, 0x02 };
286         u_int8_t crc_lsb = 0x00 , crc_msb = 0x00;
287         int ret;
288
289         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_LSB, 0x12);
290         if (ret < 0)
291                 return ret;
292
293         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_MSB, 0xe0);
294         if (ret < 0)
295                 return ret;
296
297         ret = rc632_fifo_write(handle, sizeof(sndbuf), sndbuf, 3);
298         if (ret < 0)
299                 return ret;
300
301         ret = rc632_reg_write(handle, RC632_REG_COMMAND, RC632_CMD_CALC_CRC);
302         if (ret < 0)
303                 return ret;
304         
305         usleep(10000);  // FIXME: no checking for cmd completion?
306
307         ret = rc632_reg_read(handle, RC632_REG_CRC_RESULT_LSB, &crc_lsb);
308         if (ret < 0)
309                 return ret;
310
311         ret = rc632_reg_read(handle, RC632_REG_CRC_RESULT_MSB, &crc_msb);
312         if (ret < 0)
313                 return ret;
314
315         // FIXME: what to do with crc result?
316         return ret;
317 }
318
319
320 int
321 rc632_register_dump(struct rfid_asic_handle *handle, u_int8_t *buf)
322 {
323         int ret;
324         u_int8_t i;
325
326         for (i = 0; i <= 0x3f; i++) {
327                 ret = rc632_reg_read(handle, i, &buf[i]);
328                 // do we want error checks?
329         }
330         return 0;
331 }
332
333
334
335 /* generic FIFO access functions (if no more efficient ones provided by
336  * transport driver) */
337
338 static int 
339 generic_fifo_write()
340 {
341         // FIXME: implementation (not needed for CM 5121)
342         return -1;
343 }
344
345 static int
346 generic_fifo_read()
347 {
348         // FIXME: implementation (not neded for CM 5121)
349         return -1;
350 }
351
352 static int
353 rc632_init(struct rfid_asic_handle *ah)
354 {
355         int ret;
356
357         /* switch off rf (make sure PICCs are reset at init time) */
358         ret = rc632_power_down(ah);
359         if (ret < 0)
360                 return ret;
361
362         usleep(10000);
363
364         /* switch on rf */
365         ret = rc632_power_up(ah);
366         if (ret < 0)
367                 return ret;
368
369         /* disable register paging */
370         ret = rc632_reg_write(ah, 0x00, 0x00);
371         if (ret < 0)
372                 return ret;
373
374         /* set some sane default values */
375         ret = rc632_reg_write(ah, 0x11, 0x5b);
376         if (ret < 0)
377                 return ret;
378
379         /* switch on rf */
380         ret = rc632_turn_on_rf(ah);
381         if (ret < 0)
382                 return ret;
383
384         return 0;
385 }
386
387 static int
388 rc632_fini(struct rfid_asic_handle *ah)
389 {
390         int ret;
391
392         /* switch off rf */
393         ret = rc632_turn_off_rf(ah);
394         if (ret < 0)
395                 return ret;
396
397         ret = rc632_power_down(ah);
398         if (ret < 0)
399                 return ret;
400
401         return 0;
402 }
403
404 struct rfid_asic_handle *
405 rc632_open(struct rfid_asic_transport_handle *th)
406 {
407         struct rfid_asic_handle *h;
408
409         h = malloc(sizeof(*h));
410         if (!h)
411                 return NULL;
412         memset(h, 0, sizeof(*h));
413
414         h->asic = &rc632;
415         h->rath = th;
416         h->fc = h->asic->fc;
417         h->mtu = h->mru = 40; /* FIXME */
418
419         if (rc632_init(h) < 0) {
420                 free(h);
421                 return NULL;
422         }
423
424         return h;
425 }
426
427 void
428 rc632_close(struct rfid_asic_handle *h)
429 {
430         rc632_fini(h);
431         free(h);
432 }
433
434
435 /* 
436  * Philips CL RC632 primitives for ISO 14443-A compliant PICC's
437  *
438  * (C) 2005 by Harald Welte <laforge@gnumonks.org>
439  *
440  */
441
442 static int
443 rc632_iso14443a_init(struct rfid_asic_handle *handle)
444 {
445         int ret;
446
447         // FIXME: some fifo work (drain fifo?)
448         
449         /* flush fifo (our way) */
450         ret = rc632_reg_write(handle, RC632_REG_CONTROL, 0x01);
451
452         ret = rc632_reg_write(handle, RC632_REG_TX_CONTROL,
453                         (RC632_TXCTRL_TX1_RF_EN |
454                          RC632_TXCTRL_TX2_RF_EN |
455                          RC632_TXCTRL_TX2_INV |
456                          RC632_TXCTRL_FORCE_100_ASK |
457                          RC632_TXCTRL_MOD_SRC_INT));
458         if (ret < 0)
459                 return ret;
460
461         ret = rc632_reg_write(handle, RC632_REG_CW_CONDUCTANCE,
462                                 CM5121_CW_CONDUCTANCE);
463         if (ret < 0)
464                 return ret;
465
466         /* Since FORCE_100_ASK is set (cf mc073930.pdf), this line may be left out? */
467         ret = rc632_reg_write(handle, RC632_REG_MOD_CONDUCTANCE,
468                                 CM5121_MOD_CONDUCTANCE);
469         if (ret < 0)
470                 return ret;
471
472         ret = rc632_reg_write(handle, RC632_REG_CODER_CONTROL,
473                                 (RC632_CDRCTRL_TXCD_14443A |
474                                  RC632_CDRCTRL_RATE_106K));
475         if (ret < 0)
476                 return ret;
477
478         ret = rc632_reg_write(handle, RC632_REG_MOD_WIDTH, 0x13);
479         if (ret < 0)
480                 return ret;
481
482         ret = rc632_reg_write(handle, RC632_REG_MOD_WIDTH_SOF, 0x3f);
483         if (ret < 0)
484                 return ret;
485
486         ret = rc632_reg_write(handle, RC632_REG_TYPE_B_FRAMING, 0x00);
487         if (ret < 0)
488                 return ret;
489
490         ret = rc632_reg_write(handle, RC632_REG_RX_CONTROL1,
491                               (RC632_RXCTRL1_GAIN_35DB |
492                                RC632_RXCTRL1_ISO14443 |
493                                RC632_RXCTRL1_SUBCP_8));
494         if (ret < 0)
495                 return ret;
496
497         ret = rc632_reg_write(handle, RC632_REG_DECODER_CONTROL,
498                               (RC632_DECCTRL_MANCHESTER |
499                                RC632_DECCTRL_RXFR_14443A));
500         if (ret < 0)
501                 return ret;
502
503         ret = rc632_reg_write(handle, RC632_REG_BIT_PHASE,
504                                 CM5121_14443A_BITPHASE);
505         if (ret < 0)
506                 return ret;
507
508         ret = rc632_reg_write(handle, RC632_REG_RX_THRESHOLD,
509                                 CM5121_14443A_THRESHOLD);
510         if (ret < 0)
511                 return ret;
512
513         ret = rc632_reg_write(handle, RC632_REG_BPSK_DEM_CONTROL, 0x00);
514         if (ret < 0)
515                 return ret;
516                               
517         ret = rc632_reg_write(handle, RC632_REG_RX_CONTROL2,
518                               (RC632_RXCTRL2_DECSRC_INT |
519                                RC632_RXCTRL2_CLK_Q));
520         if (ret < 0)
521                 return ret;
522
523         /* Omnikey proprietary driver has 0x03, but 0x06 is the default reset value ?!? */
524         ret = rc632_reg_write(handle, RC632_REG_RX_WAIT, 0x06);
525         if (ret < 0)
526                 return ret;
527
528         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
529                               (RC632_CR_PARITY_ENABLE |
530                                RC632_CR_PARITY_ODD));
531         if (ret < 0)
532                 return ret;
533
534         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_LSB, 0x63);
535         if (ret < 0)
536                 return ret;
537
538         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_MSB, 0x63);
539         if (ret < 0)
540                 return ret;
541
542         return 0;
543 }
544
545 static int
546 rc632_iso14443a_fini(struct iso14443a_handle *handle_14443)
547 {
548
549 #if 0
550         ret = rc632_turn_off_rf(handle);
551         if (ret < 0)
552                 return ret;
553 #endif
554
555
556         return 0;
557 }
558
559
560 /* issue a 14443-3 A PCD -> PICC command in a short frame, such as REQA, WUPA */
561 static int
562 rc632_iso14443a_transcieve_sf(struct rfid_asic_handle *handle,
563                                 u_int8_t cmd,
564                                 struct iso14443a_atqa *atqa)
565 {
566         int ret;
567         u_int8_t tx_buf[1];
568         u_int8_t rx_len = 2;
569
570         memset(atqa, 0, sizeof(atqa));
571
572         tx_buf[0] = cmd;
573
574         /* transfer only 7 bits of last byte in frame */
575         ret = rc632_reg_write(handle, RC632_REG_BIT_FRAMING, 0x07);
576         if (ret < 0)
577                 return ret;
578
579         ret = rc632_clear_bits(handle, RC632_REG_CONTROL,
580                                 RC632_CONTROL_CRYPTO1_ON);
581         if (ret < 0)
582                 return ret;
583
584 #if 0
585         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
586                                 (RC632_CR_PARITY_ENABLE |
587                                  RC632_CR_PARITY_ODD));
588 #else
589         ret = rc632_clear_bits(handle, RC632_REG_CHANNEL_REDUNDANCY,
590                                 RC632_CR_RX_CRC_ENABLE|RC632_CR_TX_CRC_ENABLE);
591                                 
592 #endif
593         if (ret < 0)
594                 return ret;
595
596         ret = rc632_transcieve(handle, tx_buf, sizeof(tx_buf),
597                                 (u_int8_t *)atqa, &rx_len, 0x32, 0);
598         if (ret < 0) {
599                 DEBUGP("error during rc632_transcieve()\n");
600                 return ret;
601         }
602
603         /* switch back to normal 8bit last byte */
604         ret = rc632_reg_write(handle, RC632_REG_BIT_FRAMING, 0x00);
605         if (ret < 0)
606                 return ret;
607
608         if (rx_len != 2) {
609                 DEBUGP("rx_len(%d) != 2\n", rx_len);
610                 return -1;
611         }
612
613         return 0;
614 }
615
616 /* transcieve regular frame */
617 static int
618 rc632_iso14443ab_transcieve(struct rfid_asic_handle *handle,
619                            unsigned int frametype,
620                            const u_int8_t *tx_buf, unsigned int tx_len,
621                            u_int8_t *rx_buf, unsigned int *rx_len,
622                            u_int64_t timeout, unsigned int flags)
623 {
624         int ret;
625         u_int8_t rxl = *rx_len & 0xff;
626         u_int8_t channel_red;
627
628         memset(rx_buf, 0, *rx_len);
629
630         switch (frametype) {
631         case RFID_14443A_FRAME_REGULAR:
632                 channel_red = RC632_CR_RX_CRC_ENABLE|RC632_CR_TX_CRC_ENABLE
633                                 |RC632_CR_PARITY_ENABLE|RC632_CR_PARITY_ODD;
634                 break;
635         case RFID_14443B_FRAME_REGULAR:
636                 channel_red = RC632_CR_RX_CRC_ENABLE|RC632_CR_TX_CRC_ENABLE
637                                 |RC632_CR_CRC3309;
638                 break;
639         case RFID_MIFARE_FRAME:
640                 channel_red = RC632_CR_PARITY_ENABLE|RC632_CR_PARITY_ODD;
641                 break;
642         }
643 #if 0
644         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
645                                 (RC632_CR_PARITY_ENABLE |
646                                  RC632_CR_PARITY_ODD |
647                                  RC632_CR_TX_CRC_ENABLE |
648                                  RC632_CR_RX_CRC_ENABLE));
649 #endif
650         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
651                               channel_red);
652         if (ret < 0)
653                 return ret;
654
655         ret = rc632_transcieve(handle, tx_buf, tx_len, rx_buf, &rxl, 0x32, 0);
656         *rx_len = rxl;
657         if (ret < 0)
658                 return ret;
659
660
661         return 0; 
662 }
663
664 /* transcieve anti collission bitframe */
665 static int
666 rc632_iso14443a_transcieve_acf(struct rfid_asic_handle *handle,
667                                 struct iso14443a_anticol_cmd *acf,
668                                 unsigned int *bit_of_col)
669 {
670         int ret;
671         u_int8_t rx_buf[64];
672         u_int8_t rx_len = sizeof(rx_buf);
673         u_int8_t rx_align = 0, tx_last_bits, tx_bytes;
674         u_int8_t boc;
675         u_int8_t error_flag;
676         *bit_of_col = ISO14443A_BITOFCOL_NONE;
677         memset(rx_buf, 0, sizeof(rx_buf));
678
679         /* disable mifare cryto */
680         ret = rc632_clear_bits(handle, RC632_REG_CONTROL,
681                                 RC632_CONTROL_CRYPTO1_ON);
682         if (ret < 0)
683                 return ret;
684
685         /* disable CRC summing */
686 #if 0
687         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
688                                 (RC632_CR_PARITY_ENABLE |
689                                  RC632_CR_PARITY_ODD));
690 #else
691         ret = rc632_clear_bits(handle, RC632_REG_CHANNEL_REDUNDANCY,
692                                 RC632_CR_TX_CRC_ENABLE|RC632_CR_TX_CRC_ENABLE);
693 #endif
694         if (ret < 0)
695                 return ret;
696
697         tx_last_bits = acf->nvb & 0x0f; /* lower nibble indicates bits */
698         tx_bytes = acf->nvb >> 4;
699         if (tx_last_bits) {
700                 tx_bytes++;
701                 rx_align = (tx_last_bits+1) % 8;/* rx frame complements tx */
702         }
703
704         //rx_align = 8 - tx_last_bits;/* rx frame complements tx */
705
706         /* set RxAlign and TxLastBits*/
707         ret = rc632_reg_write(handle, RC632_REG_BIT_FRAMING,
708                                 (rx_align << 4) | (tx_last_bits));
709         if (ret < 0)
710                 return ret;
711
712         ret = rc632_transcieve(handle, (u_int8_t *)acf, tx_bytes,
713                                 rx_buf, &rx_len, 0x32, 0);
714         if (ret < 0)
715                 return ret;
716
717         /* bitwise-OR the two halves of the split byte */
718         acf->uid_bits[tx_bytes-2] = (
719                   (acf->uid_bits[tx_bytes-2] & (0xff >> (8-tx_last_bits)))
720                 | rx_buf[0]);
721         /* copy the rest */
722         memcpy(&acf->uid_bits[tx_bytes+1-2], &rx_buf[1], rx_len-1);
723
724         /* determine whether there was a collission */
725         ret = rc632_reg_read(handle, RC632_REG_ERROR_FLAG, &error_flag);
726         if (ret < 0)
727                 return ret;
728
729         if (error_flag & RC632_ERR_FLAG_COL_ERR) {
730                 /* retrieve bit of collission */
731                 ret = rc632_reg_read(handle, RC632_REG_COLL_POS, &boc);
732                 if (ret < 0)
733                         return ret;
734
735                 /* bit of collission relative to start of part 1 of 
736                  * anticollision frame (!) */
737                 *bit_of_col = 2*8 + boc;
738         }
739
740         return 0;
741 }
742
743 static int rc632_iso14443b_init(struct rfid_asic_handle *handle)
744 {
745         int ret;
746
747         // FIXME: some FIFO work
748         
749         /* flush fifo (our way) */
750         ret = rc632_reg_write(handle, RC632_REG_CONTROL, 0x01);
751         if (ret < 0)
752                 return ret;
753
754         ret = rc632_reg_write(handle, RC632_REG_TX_CONTROL,
755                         (RC632_TXCTRL_TX1_RF_EN |
756                          RC632_TXCTRL_TX2_RF_EN |
757                          RC632_TXCTRL_TX2_INV |
758                          RC632_TXCTRL_MOD_SRC_INT));
759         if (ret < 0)
760                 return ret;
761
762         ret = rc632_reg_write(handle, RC632_REG_CW_CONDUCTANCE, 0x3f);
763         if (ret < 0)
764                 return ret;
765
766         ret = rc632_reg_write(handle, RC632_REG_MOD_CONDUCTANCE, 0x04);
767         if (ret < 0)
768                 return ret;
769
770         ret = rc632_reg_write(handle, RC632_REG_CODER_CONTROL,
771                               (RC632_CDRCTRL_TXCD_NRZ |
772                                RC632_CDRCTRL_RATE_14443B));
773         if (ret < 0)
774                 return ret;
775
776         ret = rc632_reg_write(handle, RC632_REG_MOD_WIDTH, 0x13);
777         if (ret < 0)
778                 return ret;
779
780         ret = rc632_reg_write(handle, RC632_REG_MOD_WIDTH_SOF, 0x3f);
781         if (ret < 0)
782                 return ret;
783
784         ret = rc632_reg_write(handle, RC632_REG_TYPE_B_FRAMING,
785                               (RC632_TBFRAMING_SOF_11L_3H |
786                                (6 << RC632_TBFRAMING_SPACE_SHIFT) |
787                                RC632_TBFRAMING_EOF_11));
788         if (ret < 0)
789                 return ret;
790
791         ret = rc632_reg_write(handle, RC632_REG_RX_CONTROL1,
792                               (RC632_RXCTRL1_GAIN_35DB |
793                                RC632_RXCTRL1_ISO14443 |
794                                RC632_RXCTRL1_SUBCP_8));
795         if (ret < 0)
796                 return ret;
797
798         ret = rc632_reg_write(handle, RC632_REG_DECODER_CONTROL,
799                               (RC632_DECCTRL_BPSK |
800                                RC632_DECCTRL_RXFR_14443B));
801         if (ret < 0)
802                 return ret;
803
804         ret = rc632_reg_write(handle, RC632_REG_BIT_PHASE,
805                                 CM5121_14443B_BITPHASE);
806         if (ret < 0)
807                 return ret;
808
809         ret = rc632_reg_write(handle, RC632_REG_RX_THRESHOLD,
810                                 CM5121_14443B_THRESHOLD);
811         if (ret < 0)
812                 return ret;
813
814         ret = rc632_reg_write(handle, RC632_REG_BPSK_DEM_CONTROL,
815                               ((0x2 & RC632_BPSKD_TAUB_MASK)<<RC632_BPSKD_TAUB_SHIFT |
816                                (0x3 & RC632_BPSKD_TAUD_MASK)<<RC632_BPSKD_TAUD_SHIFT |
817                                RC632_BPSKD_FILTER_AMP_DETECT |
818                                RC632_BPSKD_NO_RX_EOF |
819                                RC632_BPSKD_NO_RX_EGT));
820         if (ret < 0)
821                 return ret;
822
823         ret = rc632_reg_write(handle, RC632_REG_RX_CONTROL2,
824                               (RC632_RXCTRL2_AUTO_PD |
825                                RC632_RXCTRL2_DECSRC_INT));
826         if (ret < 0)
827                 return ret;
828
829         ret = rc632_reg_write(handle, RC632_REG_RX_WAIT, 0x03);
830         if (ret < 0)
831                 return ret;
832
833         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
834                               (RC632_CR_TX_CRC_ENABLE |
835                                RC632_CR_RX_CRC_ENABLE |
836                                RC632_CR_CRC3309));
837         if (ret < 0)
838                 return ret;
839
840         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_LSB, 0xff);
841         if (ret < 0)
842                 return ret;
843
844         ret = rc632_reg_write(handle, RC632_REG_CRC_PRESET_MSB, 0xff);
845         if (ret < 0)
846                 return ret;
847
848         return 0;
849 }
850
851 static int
852 rc632_iso15693_init(struct rfid_asic_handle *h)
853 {
854         int ret;
855
856         ret = rc632_reg_write(h, RC632_REG_TX_CONTROL,
857                                                 (RC632_TXCTRL_MOD_SRC_INT |
858                                                  RC632_TXCTRL_TX2_INV |
859                                                  RC632_TXCTRL_TX2_RF_EN |
860                                                  RC632_TXCTRL_TX1_RF_EN));
861         if (ret < 0)
862                 return ret;
863
864         ret = rc632_reg_write(h, RC632_REG_CW_CONDUCTANCE, 0x3f);
865         if (ret < 0)
866                 return ret;
867
868         ret = rc632_reg_write(h, RC632_REG_MOD_CONDUCTANCE, 0x03);
869         if (ret < 0)
870                 return ret;
871
872         ret = rc632_reg_write(h, RC632_REG_CODER_CONTROL,
873                                                 (RC632_CDRCTRL_RATE_15693 |
874                                                  0x03)); /* FIXME */
875         if (ret < 0)
876                 return ret;
877
878         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH, 0x3f);
879         if (ret < 0)
880                 return ret;
881         
882         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH_SOF, 0x3f);
883         if (ret < 0)
884                 return ret;
885
886         ret = rc632_reg_write(h, RC632_REG_TYPE_B_FRAMING, 0x00);
887         if (ret < 0)
888                 return ret;
889
890         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL1, 
891                                                 (RC632_RXCTRL1_SUBCP_16 |
892                                                  RC632_RXCTRL1_ISO15693 |
893                                                  RC632_RXCTRL1_GAIN_35DB));
894         if (ret < 0)
895                 return ret;
896
897         ret = rc632_reg_write(h, RC632_REG_DECODER_CONTROL,
898                                                 (RC632_DECCTRL_RXFR_15693 |
899                                                  RC632_DECCTRL_RX_INVERT));
900         if (ret < 0)
901                 return ret;
902
903         ret = rc632_reg_write(h, RC632_REG_BIT_PHASE, 0xe0);
904         if (ret < 0)
905                 return ret;
906
907         ret = rc632_reg_write(h, RC632_REG_RX_THRESHOLD, 0xff);
908         if (ret < 0)
909                 return ret;
910
911         ret = rc632_reg_write(h, RC632_REG_BPSK_DEM_CONTROL, 0x00);
912         if (ret < 0)
913                 return ret;
914
915         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL2,
916                                                 (RC632_RXCTRL2_AUTO_PD |
917                                                  RC632_RXCTRL2_DECSRC_INT));
918         if (ret < 0)
919                 return ret;
920
921         ret = rc632_reg_write(h, RC632_REG_CHANNEL_REDUNDANCY,
922                                                 (RC632_CR_CRC3309 |
923                                                  RC632_CR_RX_CRC_ENABLE |
924                                                  RC632_CR_TX_CRC_ENABLE));
925         if (ret < 0)
926                 return ret;
927
928         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_LSB, 0xff);
929         if (ret < 0)
930                 return ret;
931
932         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_MSB, 0xff);
933         if (ret < 0)
934                 return ret;
935
936         return 0;
937 }
938
939 static int
940 rc632_iso15693_icode_init(struct rfid_asic_handle *h)
941 {
942         int ret;
943
944         ret = rc632_reg_write(h, RC632_REG_TX_CONTROL,
945                                                 (RC632_TXCTRL_MOD_SRC_INT |
946                                                  RC632_TXCTRL_TX2_INV |
947                                                  RC632_TXCTRL_TX2_RF_EN |
948                                                  RC632_TXCTRL_TX1_RF_EN));
949         if (ret < 0)
950                 return ret;
951
952         ret = rc632_reg_write(h, RC632_REG_CW_CONDUCTANCE, 0x3f);
953         if (ret < 0)
954                 return ret;
955
956         ret = rc632_reg_write(h, RC632_REG_MOD_CONDUCTANCE, 0x02);
957         if (ret < 0)
958                 return ret;
959
960         ret = rc632_reg_write(h, RC632_REG_CODER_CONTROL, 0x2c);
961         if (ret < 0)
962                 return ret;
963
964         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH, 0x3f);
965         if (ret < 0)
966                 return ret;
967
968         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH_SOF, 0x3f);
969         if (ret < 0)
970                 return ret;
971
972         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH_SOF, 0x3f);
973         if (ret < 0)
974                 return ret;
975
976         ret = rc632_reg_write(h, RC632_REG_TYPE_B_FRAMING, 0x00);
977         if (ret < 0)
978                 return ret;
979
980         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL1, 0x8b); /* FIXME */
981         if (ret < 0)
982                 return ret;
983
984         ret = rc632_reg_write(h, RC632_REG_DECODER_CONTROL, 0x00);
985         if (ret < 0)
986                 return ret;
987
988         ret = rc632_reg_write(h, RC632_REG_BIT_PHASE, 0x52);
989         if (ret < 0)
990                 return ret;
991
992         ret = rc632_reg_write(h, RC632_REG_RX_THRESHOLD, 0x66);
993         if (ret < 0)
994                 return ret;
995
996         ret = rc632_reg_write(h, RC632_REG_BPSK_DEM_CONTROL, 0x00);
997         if (ret < 0)
998                 return ret;
999
1000         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL2, 
1001                                                 RC632_RXCTRL2_DECSRC_INT);
1002         if (ret < 0)
1003                 return ret;
1004
1005         ret = rc632_reg_write(h, RC632_REG_CHANNEL_REDUNDANCY,
1006                                                 (RC632_CR_RX_CRC_ENABLE |
1007                                                  RC632_CR_TX_CRC_ENABLE));
1008         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_LSB, 0xfe);
1009         if (ret < 0)
1010                 return ret;
1011
1012         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_MSB, 0xff);
1013         if (ret < 0)
1014                 return ret;
1015
1016         return 0;
1017 }
1018
1019 static int
1020 rc632_iso15693_icl_init(struct rfid_asic_handle *h)
1021 {
1022         int ret;
1023         
1024         /* ICL */
1025
1026         ret = rc632_reg_write(h, RC632_REG_TX_CONTROL, 
1027                                                 (RC632_TXCTRL_MOD_SRC_INT |     
1028                                                  RC632_TXCTRL_TX2_INV |
1029                                                  RC632_TXCTRL_TX2_RF_EN |
1030                                                  RC632_TXCTRL_TX1_RF_EN));
1031         if (ret < 0)
1032                 return ret;
1033
1034         ret = rc632_reg_write(h, RC632_REG_CW_CONDUCTANCE, 0x3f);
1035         if (ret < 0)
1036                 return ret;
1037
1038         ret = rc632_reg_write(h, RC632_REG_MOD_CONDUCTANCE, 0x11);
1039         if (ret < 0)
1040                 return ret;
1041
1042         ret = rc632_reg_write(h, RC632_REG_CODER_CONTROL, 
1043                                                 (RC632_CDRCTRL_RATE_15693 |
1044                                                  RC632_CDRCTRL_TXCD_ICODE_STD |
1045                                                  0x03)); /* FIXME */
1046         if (ret < 0)
1047                 return ret;
1048
1049         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH, 0x3f);
1050         if (ret < 0)
1051                 return ret;
1052
1053         ret = rc632_reg_write(h, RC632_REG_MOD_WIDTH_SOF, 0x3f);
1054         if (ret < 0)
1055                 return ret;
1056         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL1, 
1057                                                 (RC632_RXCTRL1_SUBCP_16|
1058                                                  RC632_RXCTRL1_ISO15693|
1059                                                  RC632_RXCTRL1_GAIN_35DB));
1060         if (ret < 0)
1061                 return ret;
1062         ret = rc632_reg_write(h, RC632_REG_DECODER_CONTROL,
1063                                                 (RC632_DECCTRL_RX_INVERT|
1064                                                  RC632_DECCTRL_RXFR_15693));
1065         if (ret < 0)
1066                 return ret;
1067
1068         ret = rc632_reg_write(h, RC632_REG_BIT_PHASE, 0xbd);
1069         if (ret < 0)
1070                 return ret;
1071
1072         ret = rc632_reg_write(h, RC632_REG_RX_THRESHOLD, 0xff);
1073         if (ret < 0)
1074                 return ret;
1075
1076         ret = rc632_reg_write(h, RC632_REG_BPSK_DEM_CONTROL, 0x00);
1077         if (ret < 0)
1078                 return ret;
1079
1080         ret = rc632_reg_write(h, RC632_REG_RX_CONTROL2, 
1081                                                 RC632_RXCTRL2_DECSRC_INT);
1082         if (ret < 0)
1083                 return ret;
1084
1085         ret = rc632_reg_write(h, RC632_REG_CHANNEL_REDUNDANCY, 0x00);
1086         if (ret < 0)
1087                 return ret;
1088
1089         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_LSB, 0x12);
1090         if (ret < 0)
1091                 return ret;
1092
1093         ret = rc632_reg_write(h, RC632_REG_CRC_PRESET_MSB, 0xe0);
1094         if (ret < 0)
1095                 return ret;
1096
1097         return 0;
1098 }
1099
1100 struct mifare_authcmd {
1101         u_int8_t auth_cmd;
1102         u_int8_t block_address;
1103         u_int32_t serno;        /* lsb 1 2 msb */
1104 } __attribute__ ((packed));
1105
1106
1107 #define RFID_MIFARE_KEY_LEN 6
1108 #define RFID_MIFARE_KEY_CODED_LEN 12
1109
1110 /* Transform crypto1 key from generic 6byte into rc632 specific 12byte */
1111 static int
1112 rc632_mifare_transform_key(const u_int8_t *key6, u_int8_t *key12)
1113 {
1114         int i;
1115         u_int8_t ln;
1116         u_int8_t hn;
1117
1118         for (i = 0; i < RFID_MIFARE_KEY_LEN; i++) {
1119                 ln = key6[i] & 0x0f;
1120                 hn = key6[i] >> 4;
1121                 key12[i * 2 + 1] = (~ln << 4) | ln;
1122                 key12[i * 2] = (~hn << 4) | hn;
1123         }
1124         return 0;
1125 }
1126
1127 static int
1128 rc632_mifare_set_key(struct rfid_asic_handle *h, const u_int8_t *key)
1129 {
1130         u_int8_t coded_key[RFID_MIFARE_KEY_CODED_LEN];
1131         u_int8_t reg;
1132         int ret;
1133
1134         ret = rc632_mifare_transform_key(key, coded_key);
1135         if (ret < 0)
1136                 return ret;
1137
1138         ret = rc632_fifo_write(h, RFID_MIFARE_KEY_CODED_LEN, coded_key, 0x03);
1139         if (ret < 0)
1140                 return ret;
1141
1142         ret = rc632_reg_write(h, RC632_REG_COMMAND, RC632_CMD_LOAD_KEY);
1143         if (ret < 0)
1144                 return ret;
1145
1146         ret = rc632_wait_idle(h, RC632_TMO_AUTH1);
1147         if (ret < 0)
1148                 return ret;
1149
1150         ret = rc632_reg_read(h, RC632_REG_ERROR_FLAG, &reg);
1151         if (ret < 0)
1152                 return ret;
1153
1154         if (reg & RC632_ERR_FLAG_KEY_ERR)
1155                 return -EINVAL;
1156
1157         return 0;
1158 }
1159
1160 static int
1161 rc632_mifare_auth(struct rfid_asic_handle *h, u_int8_t cmd, u_int32_t serno,
1162                   u_int8_t block)
1163 {
1164         int ret;
1165         struct mifare_authcmd acmd;
1166         u_int8_t reg;
1167
1168         if (cmd != RFID_CMD_MIFARE_AUTH1A && cmd != RFID_CMD_MIFARE_AUTH1B)
1169                 return -EINVAL;
1170
1171         /* Initialize acmd */
1172         acmd.block_address = block & 0xff;
1173         acmd.auth_cmd = cmd;
1174         //acmd.serno = htonl(serno);
1175         acmd.serno = serno;
1176
1177         ret = rc632_clear_bits(h, RC632_REG_CONTROL,
1178                                 RC632_CONTROL_CRYPTO1_ON);
1179
1180         /* Clear Rx CRC */
1181         ret = rc632_clear_bits(h, RC632_REG_CHANNEL_REDUNDANCY,
1182                                 RC632_CR_RX_CRC_ENABLE);
1183         if (ret < 0)
1184                 return ret;
1185
1186         /* Send Authent1 Command */
1187         ret = rc632_fifo_write(h, sizeof(acmd), (unsigned char *)&acmd, 0x03);
1188         if (ret < 0)
1189                 return ret;
1190
1191         ret = rc632_reg_write(h, RC632_REG_COMMAND, RC632_CMD_AUTHENT1);
1192         if (ret < 0)
1193                 return ret;
1194
1195         /* Wait until transmitter is idle */
1196         ret = rc632_wait_idle(h, RC632_TMO_AUTH1);
1197         if (ret < 0)
1198                 return ret;
1199
1200         ret = rc632_reg_read(h, RC632_REG_SECONDARY_STATUS, &reg);
1201         if (ret < 0)
1202                 return ret;
1203         if (reg & 0x07)
1204                 return -EIO;
1205
1206         /* Clear Tx CRC */
1207         ret = rc632_clear_bits(h, RC632_REG_CHANNEL_REDUNDANCY,
1208                                 RC632_CR_TX_CRC_ENABLE);
1209         if (ret < 0)
1210                 return ret;
1211
1212         /* Send Authent2 Command */
1213         ret = rc632_reg_write(h, RC632_REG_COMMAND, RC632_CMD_AUTHENT2);
1214         if (ret < 0)
1215                 return ret;
1216
1217 #if 0
1218         /* Wait until transmitter is idle */
1219         ret = rc632_wait_idle(h, RC632_TMO_AUTH1);
1220         if (ret < 0)
1221                 return ret;
1222 #else
1223         sleep(1);
1224 #endif
1225
1226         /* Check whether authentication was successful */
1227         ret = rc632_reg_read(h, RC632_REG_CONTROL, &reg);
1228         if (ret < 0)
1229                 return ret;
1230
1231         if (!(reg & RC632_CONTROL_CRYPTO1_ON))
1232                 return -EACCES;
1233
1234         return 0;
1235
1236 }
1237
1238 /* transcieve regular frame */
1239 static int
1240 rc632_mifare_transcieve(struct rfid_asic_handle *handle,
1241                         const u_int8_t *tx_buf, unsigned int tx_len,
1242                         u_int8_t *rx_buf, unsigned int *rx_len,
1243                         u_int64_t timeout, unsigned int flags)
1244 {
1245         int ret;
1246         u_int8_t rxl = *rx_len & 0xff;
1247
1248         DEBUGP("entered\n");
1249         memset(rx_buf, 0, *rx_len);
1250
1251 #if 0
1252         ret = rc632_reg_write(handle, RC632_REG_CHANNEL_REDUNDANCY,
1253                                 (RC632_CR_PARITY_ENABLE |
1254                                  RC632_CR_PARITY_ODD |
1255                                  RC632_CR_TX_CRC_ENABLE |
1256                                  RC632_CR_RX_CRC_ENABLE));
1257 #endif
1258         ret = rc632_clear_bits(handle, RC632_REG_CHANNEL_REDUNDANCY,
1259                                 RC632_CR_RX_CRC_ENABLE|RC632_CR_TX_CRC_ENABLE);
1260         if (ret < 0)
1261                 return ret;
1262
1263         ret = rc632_transcieve(handle, tx_buf, tx_len, rx_buf, &rxl, 0x32, 0);
1264         *rx_len = rxl;
1265         if (ret < 0)
1266                 return ret;
1267
1268
1269         return 0; 
1270 }
1271
1272 struct rfid_asic rc632 = {
1273         .name   = "Philips CL RC632",
1274         .fc     = ISO14443_FREQ_CARRIER,
1275         .priv.rc632 = {
1276                 .fn = {
1277                         .power_up = &rc632_power_up,
1278                         .power_down = &rc632_power_down,
1279                         .turn_on_rf = &rc632_turn_on_rf,
1280                         .turn_off_rf = &rc632_turn_off_rf,
1281                         .transcieve = &rc632_iso14443ab_transcieve,
1282                         .iso14443a = {
1283                                 .init = &rc632_iso14443a_init,
1284                                 .transcieve_sf = &rc632_iso14443a_transcieve_sf,
1285                                 .transcieve_acf = &rc632_iso14443a_transcieve_acf,
1286                         },
1287                         .iso14443b = {
1288                                 .init = &rc632_iso14443b_init,
1289                         },
1290                         .iso15693 = {
1291                                 .init = &rc632_iso15693_init,
1292                         },
1293                         .mifare_classic = {
1294                                 .setkey = &rc632_mifare_set_key,
1295                                 .auth = &rc632_mifare_auth,
1296                         },
1297                 },
1298         },
1299 };