e74ec5c309bec341f5a13fa139cf535ae6d137e1
[platform/adaptation/renesas_rcar/renesas_kernel.git] / drivers / net / wireless / libertas / if_cs.c
1 /*
2
3   Driver for the Marvell 8385 based compact flash WLAN cards.
4
5   (C) 2007 by Holger Schurig <hs4233@mail.mn-solutions.de>
6
7   This program is free software; you can redistribute it and/or modify
8   it under the terms of the GNU General Public License as published by
9   the Free Software Foundation; either version 2 of the License, or
10   (at your option) any later version.
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; see the file COPYING.  If not, write to
19   the Free Software Foundation, Inc., 51 Franklin Steet, Fifth Floor,
20   Boston, MA 02110-1301, USA.
21
22 */
23
24 #include <linux/module.h>
25 #include <linux/delay.h>
26 #include <linux/moduleparam.h>
27 #include <linux/firmware.h>
28 #include <linux/netdevice.h>
29
30 #include <pcmcia/cs_types.h>
31 #include <pcmcia/cs.h>
32 #include <pcmcia/cistpl.h>
33 #include <pcmcia/ds.h>
34
35 #include <linux/io.h>
36
37 #define DRV_NAME "libertas_cs"
38
39 #include "decl.h"
40 #include "defs.h"
41 #include "dev.h"
42
43
44 /********************************************************************/
45 /* Module stuff                                                     */
46 /********************************************************************/
47
48 MODULE_AUTHOR("Holger Schurig <hs4233@mail.mn-solutions.de>");
49 MODULE_DESCRIPTION("Driver for Marvell 83xx compact flash WLAN cards");
50 MODULE_LICENSE("GPL");
51
52
53
54 /********************************************************************/
55 /* Data structures                                                  */
56 /********************************************************************/
57
58 struct if_cs_card {
59         struct pcmcia_device *p_dev;
60         wlan_private *priv;
61         void __iomem *iobase;
62 };
63
64
65
66 /********************************************************************/
67 /* Hardware access                                                  */
68 /********************************************************************/
69
70 /* This define enables wrapper functions which allow you
71    to dump all register accesses. You normally won't this,
72    except for development */
73 /* #define DEBUG_IO */
74
75 #ifdef DEBUG_IO
76 static int debug_output = 0;
77 #else
78 /* This way the compiler optimizes the printk's away */
79 #define debug_output 0
80 #endif
81
82 static inline unsigned int if_cs_read8(struct if_cs_card *card, uint reg)
83 {
84         unsigned int val = ioread8(card->iobase + reg);
85         if (debug_output)
86                 printk(KERN_INFO "##inb %08x<%02x\n", reg, val);
87         return val;
88 }
89 static inline unsigned int if_cs_read16(struct if_cs_card *card, uint reg)
90 {
91         unsigned int val = ioread16(card->iobase + reg);
92         if (debug_output)
93                 printk(KERN_INFO "##inw %08x<%04x\n", reg, val);
94         return val;
95 }
96 static inline void if_cs_read16_rep(
97         struct if_cs_card *card,
98         uint reg,
99         void *buf,
100         unsigned long count)
101 {
102         if (debug_output)
103                 printk(KERN_INFO "##insw %08x<(0x%lx words)\n",
104                         reg, count);
105         ioread16_rep(card->iobase + reg, buf, count);
106 }
107
108 static inline void if_cs_write8(struct if_cs_card *card, uint reg, u8 val)
109 {
110         if (debug_output)
111                 printk(KERN_INFO "##outb %08x>%02x\n", reg, val);
112         iowrite8(val, card->iobase + reg);
113 }
114
115 static inline void if_cs_write16(struct if_cs_card *card, uint reg, u16 val)
116 {
117         if (debug_output)
118                 printk(KERN_INFO "##outw %08x>%04x\n", reg, val);
119         iowrite16(val, card->iobase + reg);
120 }
121
122 static inline void if_cs_write16_rep(
123         struct if_cs_card *card,
124         uint reg,
125         void *buf,
126         unsigned long count)
127 {
128         if (debug_output)
129                 printk(KERN_INFO "##outsw %08x>(0x%lx words)\n",
130                         reg, count);
131         iowrite16_rep(card->iobase + reg, buf, count);
132 }
133
134
135 /*
136  * I know that polling/delaying is frowned upon. However, this procedure
137  * with polling is needed while downloading the firmware. At this stage,
138  * the hardware does unfortunately not create any interrupts.
139  *
140  * Fortunately, this function is never used once the firmware is in
141  * the card. :-)
142  *
143  * As a reference, see the "Firmware Specification v5.1", page 18
144  * and 19. I did not follow their suggested timing to the word,
145  * but this works nice & fast anyway.
146  */
147 static int if_cs_poll_while_fw_download(struct if_cs_card *card, uint addr, u8 reg)
148 {
149         int i;
150
151         for (i = 0; i < 500; i++) {
152                 u8 val = if_cs_read8(card, addr);
153                 if (val == reg)
154                         return i;
155                 udelay(100);
156         }
157         return -ETIME;
158 }
159
160
161
162 /* Host control registers and their bit definitions */
163
164 #define IF_CS_H_STATUS                  0x00000000
165 #define IF_CS_H_STATUS_TX_OVER          0x0001
166 #define IF_CS_H_STATUS_RX_OVER          0x0002
167 #define IF_CS_H_STATUS_DNLD_OVER        0x0004
168
169 #define IF_CS_H_INT_CAUSE               0x00000002
170 #define IF_CS_H_IC_TX_OVER              0x0001
171 #define IF_CS_H_IC_RX_OVER              0x0002
172 #define IF_CS_H_IC_DNLD_OVER            0x0004
173 #define IF_CS_H_IC_HOST_EVENT           0x0008
174 #define IF_CS_H_IC_MASK                 0x001f
175
176 #define IF_CS_H_INT_MASK                0x00000004
177 #define IF_CS_H_IM_MASK                 0x001f
178
179 #define IF_CS_H_WRITE_LEN               0x00000014
180
181 #define IF_CS_H_WRITE                   0x00000016
182
183 #define IF_CS_H_CMD_LEN                 0x00000018
184
185 #define IF_CS_H_CMD                     0x0000001A
186
187 #define IF_CS_C_READ_LEN                0x00000024
188
189 #define IF_CS_H_READ                    0x00000010
190
191 /* Card control registers and their bit definitions */
192
193 #define IF_CS_C_STATUS                  0x00000020
194 #define IF_CS_C_S_TX_DNLD_RDY           0x0001
195 #define IF_CS_C_S_RX_UPLD_RDY           0x0002
196 #define IF_CS_C_S_CMD_DNLD_RDY          0x0004
197 #define IF_CS_C_S_CMD_UPLD_RDY          0x0008
198 #define IF_CS_C_S_CARDEVENT             0x0010
199 #define IF_CS_C_S_MASK                  0x001f
200 #define IF_CS_C_S_STATUS_MASK           0x7f00
201 /* The following definitions should be the same as the MRVDRV_ ones */
202
203 #if MRVDRV_CMD_DNLD_RDY != IF_CS_C_S_CMD_DNLD_RDY
204 #error MRVDRV_CMD_DNLD_RDY and IF_CS_C_S_CMD_DNLD_RDY not in sync
205 #endif
206 #if MRVDRV_CMD_UPLD_RDY != IF_CS_C_S_CMD_UPLD_RDY
207 #error MRVDRV_CMD_UPLD_RDY and IF_CS_C_S_CMD_UPLD_RDY not in sync
208 #endif
209 #if MRVDRV_CARDEVENT != IF_CS_C_S_CARDEVENT
210 #error MRVDRV_CARDEVENT and IF_CS_C_S_CARDEVENT not in sync
211 #endif
212
213 #define IF_CS_C_INT_CAUSE               0x00000022
214 #define IF_CS_C_IC_MASK                 0x001f
215
216 #define IF_CS_C_SQ_READ_LOW             0x00000028
217 #define IF_CS_C_SQ_HELPER_OK            0x10
218
219 #define IF_CS_C_CMD_LEN                 0x00000030
220
221 #define IF_CS_C_CMD                     0x00000012
222
223 #define IF_CS_SCRATCH                   0x0000003F
224
225
226
227 /********************************************************************/
228 /* Interrupts                                                       */
229 /********************************************************************/
230
231 static inline void if_cs_enable_ints(struct if_cs_card *card)
232 {
233         lbs_deb_enter(LBS_DEB_CS);
234         if_cs_write16(card, IF_CS_H_INT_MASK, 0);
235 }
236
237 static inline void if_cs_disable_ints(struct if_cs_card *card)
238 {
239         lbs_deb_enter(LBS_DEB_CS);
240         if_cs_write16(card, IF_CS_H_INT_MASK, IF_CS_H_IM_MASK);
241 }
242
243 static irqreturn_t if_cs_interrupt(int irq, void *data)
244 {
245         struct if_cs_card *card = (struct if_cs_card *)data;
246         u16 int_cause;
247
248         lbs_deb_enter(LBS_DEB_CS);
249
250         int_cause = if_cs_read16(card, IF_CS_C_INT_CAUSE);
251         if(int_cause == 0x0) {
252                 /* Not for us */
253                 return IRQ_NONE;
254
255         } else if(int_cause == 0xffff) {
256                 /* Read in junk, the card has probably been removed */
257                 card->priv->adapter->surpriseremoved = 1;
258
259         } else {
260                 if(int_cause & IF_CS_H_IC_TX_OVER) {
261                         card->priv->dnld_sent = DNLD_RES_RECEIVED;
262                         if (!card->priv->adapter->cur_cmd)
263                                 wake_up_interruptible(&card->priv->waitq);
264
265                         if (card->priv->adapter->connect_status == LIBERTAS_CONNECTED)
266                                 netif_wake_queue(card->priv->dev);
267                 }
268
269                 /* clear interrupt */
270                 if_cs_write16(card, IF_CS_C_INT_CAUSE, int_cause & IF_CS_C_IC_MASK);
271         }
272
273         libertas_interrupt(card->priv->dev);
274
275         return IRQ_HANDLED;
276 }
277
278
279
280
281 /********************************************************************/
282 /* I/O                                                              */
283 /********************************************************************/
284
285 /*
286  * Called from if_cs_host_to_card to send a command to the hardware
287  */
288 static int if_cs_send_cmd(wlan_private *priv, u8 *buf, u16 nb)
289 {
290         struct if_cs_card *card = (struct if_cs_card *)priv->card;
291         int ret = -1;
292         int loops = 0;
293
294         lbs_deb_enter(LBS_DEB_CS);
295
296         /* Is hardware ready? */
297         while (1) {
298                 u16 val = if_cs_read16(card, IF_CS_C_STATUS);
299                 if (val & IF_CS_C_S_CMD_DNLD_RDY)
300                         break;
301                 if (++loops > 100) {
302                         lbs_pr_err("card not ready for commands\n");
303                         goto done;
304                 }
305                 mdelay(1);
306         }
307
308         if_cs_write16(card, IF_CS_H_CMD_LEN, nb);
309
310         if_cs_write16_rep(card, IF_CS_H_CMD, buf, nb / 2);
311         /* Are we supposed to transfer an odd amount of bytes? */
312         if (nb & 1)
313                 if_cs_write8(card, IF_CS_H_CMD, buf[nb-1]);
314
315         /* "Assert the download over interrupt command in the Host
316          * status register" */
317         if_cs_write16(card, IF_CS_H_STATUS, IF_CS_H_STATUS_DNLD_OVER);
318
319         /* "Assert the download over interrupt command in the Card
320          * interrupt case register" */
321         if_cs_write16(card, IF_CS_H_INT_CAUSE, IF_CS_H_IC_DNLD_OVER);
322         ret = 0;
323
324 done:
325         lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
326         return ret;
327 }
328
329
330 /*
331  * Called from if_cs_host_to_card to send a data to the hardware
332  */
333 static void if_cs_send_data(wlan_private *priv, u8 *buf, u16 nb)
334 {
335         struct if_cs_card *card = (struct if_cs_card *)priv->card;
336
337         lbs_deb_enter(LBS_DEB_CS);
338
339         if_cs_write16(card, IF_CS_H_WRITE_LEN, nb);
340
341         /* write even number of bytes, then odd byte if necessary */
342         if_cs_write16_rep(card, IF_CS_H_WRITE, buf, nb / 2);
343         if (nb & 1)
344                 if_cs_write8(card, IF_CS_H_WRITE, buf[nb-1]);
345
346         if_cs_write16(card, IF_CS_H_STATUS, IF_CS_H_STATUS_TX_OVER);
347         if_cs_write16(card, IF_CS_H_INT_CAUSE, IF_CS_H_STATUS_TX_OVER);
348
349         lbs_deb_leave(LBS_DEB_CS);
350 }
351
352
353 /*
354  * Get the command result out of the card.
355  */
356 static int if_cs_receive_cmdres(wlan_private *priv, u8* data, u32 *len)
357 {
358         int ret = -1;
359         u16 val;
360
361         lbs_deb_enter(LBS_DEB_CS);
362
363         /* is hardware ready? */
364         val = if_cs_read16(priv->card, IF_CS_C_STATUS);
365         if ((val & IF_CS_C_S_CMD_UPLD_RDY) == 0) {
366                 lbs_pr_err("card not ready for CMD\n");
367                 goto out;
368         }
369
370         *len = if_cs_read16(priv->card, IF_CS_C_CMD_LEN);
371         if ((*len == 0) || (*len > MRVDRV_SIZE_OF_CMD_BUFFER)) {
372                 lbs_pr_err("card cmd buffer has invalid # of bytes (%d)\n", *len);
373                 goto out;
374         }
375
376         /* read even number of bytes, then odd byte if necessary */
377         if_cs_read16_rep(priv->card, IF_CS_C_CMD, data, *len/sizeof(u16));
378         if (*len & 1)
379                 data[*len-1] = if_cs_read8(priv->card, IF_CS_C_CMD);
380
381         ret = 0;
382 out:
383         lbs_deb_leave_args(LBS_DEB_CS, "ret %d, len %d", ret, *len);
384         return ret;
385 }
386
387
388 static struct sk_buff *if_cs_receive_data(wlan_private *priv)
389 {
390         struct sk_buff *skb = NULL;
391         u16 len;
392         u8 *data;
393
394         lbs_deb_enter(LBS_DEB_CS);
395
396         len = if_cs_read16(priv->card, IF_CS_C_READ_LEN);
397         if (len == 0 || len > MRVDRV_ETH_RX_PACKET_BUFFER_SIZE) {
398                 lbs_pr_err("card data buffer has invalid # of bytes (%d)\n", len);
399                 priv->stats.rx_dropped++;
400                 printk(KERN_INFO "##HS %s:%d TODO\n", __FUNCTION__, __LINE__);
401                 goto dat_err;
402         }
403
404         //TODO: skb = dev_alloc_skb(len+ETH_FRAME_LEN+MRVDRV_SNAP_HEADER_LEN+EXTRA_LEN);
405         skb = dev_alloc_skb(MRVDRV_ETH_RX_PACKET_BUFFER_SIZE);
406         if (!skb)
407                 goto out;
408         data = skb_put(skb, len);
409
410         /* read even number of bytes, then odd byte if necessary */
411         if_cs_read16_rep(priv->card, IF_CS_H_READ, data, len/sizeof(u16));
412         if (len & 1)
413                 data[len-1] = if_cs_read8(priv->card, IF_CS_H_READ);
414
415 dat_err:
416         if_cs_write16(priv->card, IF_CS_H_STATUS, IF_CS_H_STATUS_RX_OVER);
417         if_cs_write16(priv->card, IF_CS_H_INT_CAUSE, IF_CS_H_IC_RX_OVER);
418
419 out:
420         lbs_deb_leave_args(LBS_DEB_CS, "ret %p", skb);
421         return skb;
422 }
423
424
425
426 /********************************************************************/
427 /* Firmware                                                         */
428 /********************************************************************/
429
430 /*
431  * Tries to program the helper firmware.
432  *
433  * Return 0 on success
434  */
435 static int if_cs_prog_helper(struct if_cs_card *card)
436 {
437         int ret = 0;
438         int sent = 0;
439         u8  scratch;
440         const struct firmware *fw;
441
442         lbs_deb_enter(LBS_DEB_CS);
443
444         scratch = if_cs_read8(card, IF_CS_SCRATCH);
445
446         /* "If the value is 0x5a, the firmware is already
447          * downloaded successfully"
448          */
449         if (scratch == 0x5a)
450                 goto done;
451
452         /* "If the value is != 00, it is invalid value of register */
453         if (scratch != 0x00) {
454                 ret = -ENODEV;
455                 goto done;
456         }
457
458         /* TODO: make firmware file configurable */
459         ret = request_firmware(&fw, "libertas_cs_helper.fw",
460                 &handle_to_dev(card->p_dev));
461         if (ret) {
462                 lbs_pr_err("can't load helper firmware\n");
463                 ret = -ENODEV;
464                 goto done;
465         }
466         lbs_deb_cs("helper size %td\n", fw->size);
467
468         /* "Set the 5 bytes of the helper image to 0" */
469         /* Not needed, this contains an ARM branch instruction */
470
471         for (;;) {
472                 /* "the number of bytes to send is 256" */
473                 int count = 256;
474                 int remain = fw->size - sent;
475
476                 if (remain < count)
477                         count = remain;
478                 /* printk(KERN_INFO "//HS %d loading %d of %d bytes\n",
479                         __LINE__, sent, fw->size); */
480
481                 /* "write the number of bytes to be sent to the I/O Command
482                  * write length register" */
483                 if_cs_write16(card, IF_CS_H_CMD_LEN, count);
484
485                 /* "write this to I/O Command port register as 16 bit writes */
486                 if (count)
487                         if_cs_write16_rep(card, IF_CS_H_CMD,
488                                 &fw->data[sent],
489                                 count >> 1);
490
491                 /* "Assert the download over interrupt command in the Host
492                  * status register" */
493                 if_cs_write8(card, IF_CS_H_STATUS, IF_CS_H_STATUS_DNLD_OVER);
494
495                 /* "Assert the download over interrupt command in the Card
496                  * interrupt case register" */
497                 if_cs_write16(card, IF_CS_H_INT_CAUSE, IF_CS_H_IC_DNLD_OVER);
498
499                 /* "The host polls the Card Status register ... for 50 ms before
500                    declaring a failure */
501                 ret = if_cs_poll_while_fw_download(card, IF_CS_C_STATUS,
502                         IF_CS_C_S_CMD_DNLD_RDY);
503                 if (ret < 0) {
504                         lbs_pr_err("can't download helper at 0x%x, ret %d\n",
505                                 sent, ret);
506                         goto done;
507                 }
508
509                 if (count == 0)
510                         break;
511
512                 sent += count;
513         }
514
515         release_firmware(fw);
516         ret = 0;
517
518 done:
519         lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
520         return ret;
521 }
522
523
524 static int if_cs_prog_real(struct if_cs_card *card)
525 {
526         const struct firmware *fw;
527         int ret = 0;
528         int retry = 0;
529         int len = 0;
530         int sent;
531
532         lbs_deb_enter(LBS_DEB_CS);
533
534         /* TODO: make firmware file configurable */
535         ret = request_firmware(&fw, "libertas_cs.fw",
536                 &handle_to_dev(card->p_dev));
537         if (ret) {
538                 lbs_pr_err("can't load firmware\n");
539                 ret = -ENODEV;
540                 goto done;
541         }
542         lbs_deb_cs("fw size %td\n", fw->size);
543
544         ret = if_cs_poll_while_fw_download(card, IF_CS_C_SQ_READ_LOW, IF_CS_C_SQ_HELPER_OK);
545         if (ret < 0) {
546                 int i;
547                 lbs_pr_err("helper firmware doesn't answer\n");
548                 for (i = 0; i < 0x50; i += 2)
549                         printk(KERN_INFO "## HS %02x: %04x\n",
550                                 i, if_cs_read16(card, i));
551                 goto err_release;
552         }
553
554         for (sent = 0; sent < fw->size; sent += len) {
555                 len = if_cs_read16(card, IF_CS_C_SQ_READ_LOW);
556                 /* printk(KERN_INFO "//HS %d loading %d of %d bytes\n",
557                         __LINE__, sent, fw->size); */
558                 if (len & 1) {
559                         retry++;
560                         lbs_pr_info("odd, need to retry this firmware block\n");
561                 } else {
562                         retry = 0;
563                 }
564
565                 if (retry > 20) {
566                         lbs_pr_err("could not download firmware\n");
567                         ret = -ENODEV;
568                         goto err_release;
569                 }
570                 if (retry) {
571                         sent -= len;
572                 }
573
574
575                 if_cs_write16(card, IF_CS_H_CMD_LEN, len);
576
577                 if_cs_write16_rep(card, IF_CS_H_CMD,
578                         &fw->data[sent],
579                         (len+1) >> 1);
580                 if_cs_write8(card, IF_CS_H_STATUS, IF_CS_H_STATUS_DNLD_OVER);
581                 if_cs_write16(card, IF_CS_H_INT_CAUSE, IF_CS_H_IC_DNLD_OVER);
582
583                 ret = if_cs_poll_while_fw_download(card, IF_CS_C_STATUS,
584                         IF_CS_C_S_CMD_DNLD_RDY);
585                 if (ret < 0) {
586                         lbs_pr_err("can't download firmware at 0x%x\n", sent);
587                         goto err_release;
588                 }
589         }
590
591         ret = if_cs_poll_while_fw_download(card, IF_CS_SCRATCH, 0x5a);
592         if (ret < 0) {
593                 lbs_pr_err("firmware download failed\n");
594                 goto err_release;
595         }
596
597         ret = 0;
598         goto done;
599
600
601 err_release:
602         release_firmware(fw);
603
604 done:
605         lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
606         return ret;
607 }
608
609
610
611 /********************************************************************/
612 /* Callback functions for libertas.ko                               */
613 /********************************************************************/
614
615 /* Send commands or data packets to the card */
616 static int if_cs_host_to_card(wlan_private *priv, u8 type, u8 *buf, u16 nb)
617 {
618         int ret = -1;
619
620         lbs_deb_enter_args(LBS_DEB_CS, "type %d, bytes %d", type, nb);
621
622         switch (type) {
623         case MVMS_DAT:
624                 priv->dnld_sent = DNLD_DATA_SENT;
625                 if_cs_send_data(priv, buf, nb);
626                 ret = 0;
627                 break;
628         case MVMS_CMD:
629                 priv->dnld_sent = DNLD_CMD_SENT;
630                 ret = if_cs_send_cmd(priv, buf, nb);
631                 break;
632         default:
633                 lbs_pr_err("%s: unsupported type %d\n", __FUNCTION__, type);
634         }
635
636         lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
637         return ret;
638 }
639
640
641 static int if_cs_get_int_status(wlan_private *priv, u8 *ireg)
642 {
643         struct if_cs_card *card = (struct if_cs_card *)priv->card;
644         //wlan_adapter *adapter = priv->adapter;
645         int ret = 0;
646         u16 int_cause;
647         u8 *cmdbuf;
648         *ireg = 0;
649
650         lbs_deb_enter(LBS_DEB_CS);
651
652         if (priv->adapter->surpriseremoved)
653                 goto out;
654
655         int_cause = if_cs_read16(card, IF_CS_C_INT_CAUSE) & IF_CS_C_IC_MASK;
656         if_cs_write16(card, IF_CS_C_INT_CAUSE, int_cause);
657
658         *ireg = if_cs_read16(card, IF_CS_C_STATUS) & IF_CS_C_S_MASK;
659
660         if (!*ireg)
661                 goto sbi_get_int_status_exit;
662
663 sbi_get_int_status_exit:
664
665         /* is there a data packet for us? */
666         if (*ireg & IF_CS_C_S_RX_UPLD_RDY) {
667                 struct sk_buff *skb = if_cs_receive_data(priv);
668                 libertas_process_rxed_packet(priv, skb);
669                 *ireg &= ~IF_CS_C_S_RX_UPLD_RDY;
670         }
671
672         if (*ireg & IF_CS_C_S_TX_DNLD_RDY) {
673                 priv->dnld_sent = DNLD_RES_RECEIVED;
674         }
675
676         /* Card has a command result for us */
677         if (*ireg & IF_CS_C_S_CMD_UPLD_RDY) {
678                 spin_lock(&priv->adapter->driver_lock);
679                 if (!priv->adapter->cur_cmd) {
680                         cmdbuf = priv->upld_buf;
681                         priv->adapter->hisregcpy &= ~IF_CS_C_S_RX_UPLD_RDY;
682                 } else {
683                         cmdbuf = priv->adapter->cur_cmd->bufvirtualaddr;
684                 }
685
686                 ret = if_cs_receive_cmdres(priv, cmdbuf, &priv->upld_len);
687                 spin_unlock(&priv->adapter->driver_lock);
688                 if (ret < 0)
689                         lbs_pr_err("could not receive cmd from card\n");
690         }
691
692 out:
693         lbs_deb_leave_args(LBS_DEB_CS, "ret %d, ireg 0x%x, hisregcpy 0x%x", ret, *ireg, priv->adapter->hisregcpy);
694         return ret;
695 }
696
697
698 static int if_cs_read_event_cause(wlan_private *priv)
699 {
700         lbs_deb_enter(LBS_DEB_CS);
701
702         priv->adapter->eventcause = (if_cs_read16(priv->card, IF_CS_C_STATUS) & IF_CS_C_S_STATUS_MASK) >> 5;
703         if_cs_write16(priv->card, IF_CS_H_INT_CAUSE, IF_CS_H_IC_HOST_EVENT);
704
705         return 0;
706 }
707
708
709
710 /********************************************************************/
711 /* Card Services                                                    */
712 /********************************************************************/
713
714 /*
715  * After a card is removed, if_cs_release() will unregister the
716  * device, and release the PCMCIA configuration.  If the device is
717  * still open, this will be postponed until it is closed.
718  */
719 static void if_cs_release(struct pcmcia_device *p_dev)
720 {
721         struct if_cs_card *card = p_dev->priv;
722
723         lbs_deb_enter(LBS_DEB_CS);
724
725         pcmcia_disable_device(p_dev);
726         free_irq(p_dev->irq.AssignedIRQ, card);
727         if (card->iobase)
728                 ioport_unmap(card->iobase);
729
730         lbs_deb_leave(LBS_DEB_CS);
731 }
732
733
734 /*
735  * This creates an "instance" of the driver, allocating local data
736  * structures for one device.  The device is registered with Card
737  * Services.
738  *
739  * The dev_link structure is initialized, but we don't actually
740  * configure the card at this point -- we wait until we receive a card
741  * insertion event.
742  */
743 static int if_cs_probe(struct pcmcia_device *p_dev)
744 {
745         int ret = -ENOMEM;
746         wlan_private *priv;
747         struct if_cs_card *card;
748         /* CIS parsing */
749         tuple_t tuple;
750         cisparse_t parse;
751         cistpl_cftable_entry_t *cfg = &parse.cftable_entry;
752         cistpl_io_t *io = &cfg->io;
753         u_char buf[64];
754
755         lbs_deb_enter(LBS_DEB_CS);
756
757         card = kzalloc(sizeof(struct if_cs_card), GFP_KERNEL);
758         if (!card) {
759                 lbs_pr_err("error in kzalloc\n");
760                 goto out;
761         }
762         card->p_dev = p_dev;
763         p_dev->priv = card;
764
765         p_dev->irq.Attributes = IRQ_TYPE_DYNAMIC_SHARING;
766         p_dev->irq.Handler = NULL;
767         p_dev->irq.IRQInfo1 = IRQ_INFO2_VALID | IRQ_LEVEL_ID;
768
769         p_dev->conf.Attributes = 0;
770         p_dev->conf.IntType = INT_MEMORY_AND_IO;
771
772         tuple.Attributes = 0;
773         tuple.TupleData = buf;
774         tuple.TupleDataMax = sizeof(buf);
775         tuple.TupleOffset = 0;
776
777         tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
778         if ((ret = pcmcia_get_first_tuple(p_dev, &tuple)) != 0 ||
779             (ret = pcmcia_get_tuple_data(p_dev, &tuple)) != 0 ||
780             (ret = pcmcia_parse_tuple(p_dev, &tuple, &parse)) != 0)
781         {
782                 lbs_pr_err("error in pcmcia_get_first_tuple etc\n");
783                 goto out1;
784         }
785
786         p_dev->conf.ConfigIndex = cfg->index;
787
788         /* Do we need to allocate an interrupt? */
789         if (cfg->irq.IRQInfo1) {
790                 p_dev->conf.Attributes |= CONF_ENABLE_IRQ;
791         }
792
793         /* IO window settings */
794         if (cfg->io.nwin != 1) {
795                 lbs_pr_err("wrong CIS (check number of IO windows)\n");
796                 ret = -ENODEV;
797                 goto out1;
798         }
799         p_dev->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
800         p_dev->io.BasePort1 = io->win[0].base;
801         p_dev->io.NumPorts1 = io->win[0].len;
802
803         /* This reserves IO space but doesn't actually enable it */
804         ret = pcmcia_request_io(p_dev, &p_dev->io);
805         if (ret) {
806                 lbs_pr_err("error in pcmcia_request_io\n");
807                 goto out1;
808         }
809
810         /*
811          * Allocate an interrupt line.  Note that this does not assign
812          * a handler to the interrupt, unless the 'Handler' member of
813          * the irq structure is initialized.
814          */
815         if (p_dev->conf.Attributes & CONF_ENABLE_IRQ) {
816                 ret = pcmcia_request_irq(p_dev, &p_dev->irq);
817                 if (ret) {
818                         lbs_pr_err("error in pcmcia_request_irq\n");
819                         goto out1;
820                 }
821         }
822
823         /* Initialize io access */
824         card->iobase = ioport_map(p_dev->io.BasePort1, p_dev->io.NumPorts1);
825         if (!card->iobase) {
826                 lbs_pr_err("error in ioport_map\n");
827                 ret = -EIO;
828                 goto out1;
829         }
830
831         /*
832          * This actually configures the PCMCIA socket -- setting up
833          * the I/O windows and the interrupt mapping, and putting the
834          * card and host interface into "Memory and IO" mode.
835          */
836         ret = pcmcia_request_configuration(p_dev, &p_dev->conf);
837         if (ret) {
838                 lbs_pr_err("error in pcmcia_request_configuration\n");
839                 goto out2;
840         }
841
842         /* Finally, report what we've done */
843         lbs_deb_cs("irq %d, io 0x%04x-0x%04x\n",
844                p_dev->irq.AssignedIRQ, p_dev->io.BasePort1,
845                p_dev->io.BasePort1 + p_dev->io.NumPorts1 - 1);
846
847
848         /* Load the firmware early, before calling into libertas.ko */
849         ret = if_cs_prog_helper(card);
850         if (ret == 0)
851                 ret = if_cs_prog_real(card);
852         if (ret)
853                 goto out2;
854
855         /* Make this card known to the libertas driver */
856         priv = libertas_add_card(card, &p_dev->dev);
857         if (!priv) {
858                 ret = -ENOMEM;
859                 goto out2;
860         }
861
862         /* Store pointers to our call-back functions */
863         card->priv = priv;
864         priv->card = card;
865         priv->hw_host_to_card     = if_cs_host_to_card;
866         priv->hw_get_int_status   = if_cs_get_int_status;
867         priv->hw_read_event_cause = if_cs_read_event_cause;
868
869         priv->adapter->fw_ready = 1;
870
871         /* Now actually get the IRQ */
872         ret = request_irq(p_dev->irq.AssignedIRQ, if_cs_interrupt,
873                 IRQF_SHARED, DRV_NAME, card);
874         if (ret) {
875                 lbs_pr_err("error in request_irq\n");
876                 goto out3;
877         }
878
879         if_cs_enable_ints(card);
880
881         /* And finally bring the card up */
882         if (libertas_start_card(priv) != 0) {
883                 lbs_pr_err("could not activate card\n");
884                 goto out3;
885         }
886
887         ret = 0;
888         goto out;
889
890 out3:
891         libertas_remove_card(priv);
892 out2:
893         ioport_unmap(card->iobase);
894 out1:
895         pcmcia_disable_device(p_dev);
896 out:
897         lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
898         return ret;
899 }
900
901
902 /*
903  * This deletes a driver "instance".  The device is de-registered with
904  * Card Services.  If it has been released, all local data structures
905  * are freed.  Otherwise, the structures will be freed when the device
906  * is released.
907  */
908 static void if_cs_detach(struct pcmcia_device *p_dev)
909 {
910         struct if_cs_card *card = p_dev->priv;
911
912         lbs_deb_enter(LBS_DEB_CS);
913
914         libertas_stop_card(card->priv);
915         libertas_remove_card(card->priv);
916         if_cs_disable_ints(card);
917         if_cs_release(p_dev);
918         kfree(card);
919
920         lbs_deb_leave(LBS_DEB_CS);
921 }
922
923
924
925 /********************************************************************/
926 /* Module initialization                                            */
927 /********************************************************************/
928
929 static struct pcmcia_device_id if_cs_ids[] = {
930         PCMCIA_DEVICE_MANF_CARD(0x02df, 0x8103),
931         PCMCIA_DEVICE_NULL,
932 };
933 MODULE_DEVICE_TABLE(pcmcia, if_cs_ids);
934
935
936 static struct pcmcia_driver libertas_driver = {
937         .owner          = THIS_MODULE,
938         .drv            = {
939                 .name   = DRV_NAME,
940         },
941         .probe          = if_cs_probe,
942         .remove         = if_cs_detach,
943         .id_table       = if_cs_ids,
944 };
945
946
947 static int __init if_cs_init(void)
948 {
949         int ret;
950
951         lbs_deb_enter(LBS_DEB_CS);
952         ret = pcmcia_register_driver(&libertas_driver);
953         lbs_deb_leave(LBS_DEB_CS);
954         return ret;
955 }
956
957
958 static void __exit if_cs_exit(void)
959 {
960         lbs_deb_enter(LBS_DEB_CS);
961         pcmcia_unregister_driver(&libertas_driver);
962         lbs_deb_leave(LBS_DEB_CS);
963 }
964
965
966 module_init(if_cs_init);
967 module_exit(if_cs_exit);