1018 lines
26 KiB
C
1018 lines
26 KiB
C
/*
|
|
|
|
Driver for the Marvell 8385 based compact flash WLAN cards.
|
|
|
|
(C) 2007 by Holger Schurig <hs4233@mail.mn-solutions.de>
|
|
|
|
This program is free software; you can redistribute it and/or modify
|
|
it under the terms of the GNU General Public License as published by
|
|
the Free Software Foundation; either version 2 of the License, or
|
|
(at your option) any later version.
|
|
|
|
This program is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this program; see the file COPYING. If not, write to
|
|
the Free Software Foundation, Inc., 51 Franklin Steet, Fifth Floor,
|
|
Boston, MA 02110-1301, USA.
|
|
|
|
*/
|
|
|
|
#include <linux/module.h>
|
|
#include <linux/delay.h>
|
|
#include <linux/moduleparam.h>
|
|
#include <linux/firmware.h>
|
|
#include <linux/netdevice.h>
|
|
|
|
#include <pcmcia/cs_types.h>
|
|
#include <pcmcia/cs.h>
|
|
#include <pcmcia/cistpl.h>
|
|
#include <pcmcia/ds.h>
|
|
|
|
#include <linux/io.h>
|
|
|
|
#define DRV_NAME "libertas_cs"
|
|
|
|
#include "decl.h"
|
|
#include "defs.h"
|
|
#include "dev.h"
|
|
|
|
|
|
/********************************************************************/
|
|
/* Module stuff */
|
|
/********************************************************************/
|
|
|
|
MODULE_AUTHOR("Holger Schurig <hs4233@mail.mn-solutions.de>");
|
|
MODULE_DESCRIPTION("Driver for Marvell 83xx compact flash WLAN cards");
|
|
MODULE_LICENSE("GPL");
|
|
|
|
|
|
|
|
/********************************************************************/
|
|
/* Data structures */
|
|
/********************************************************************/
|
|
|
|
struct if_cs_card {
|
|
struct pcmcia_device *p_dev;
|
|
struct lbs_private *priv;
|
|
void __iomem *iobase;
|
|
};
|
|
|
|
|
|
|
|
/********************************************************************/
|
|
/* Hardware access */
|
|
/********************************************************************/
|
|
|
|
/* This define enables wrapper functions which allow you
|
|
to dump all register accesses. You normally won't this,
|
|
except for development */
|
|
/* #define DEBUG_IO */
|
|
|
|
#ifdef DEBUG_IO
|
|
static int debug_output = 0;
|
|
#else
|
|
/* This way the compiler optimizes the printk's away */
|
|
#define debug_output 0
|
|
#endif
|
|
|
|
static inline unsigned int if_cs_read8(struct if_cs_card *card, uint reg)
|
|
{
|
|
unsigned int val = ioread8(card->iobase + reg);
|
|
if (debug_output)
|
|
printk(KERN_INFO "inb %08x<%02x\n", reg, val);
|
|
return val;
|
|
}
|
|
static inline unsigned int if_cs_read16(struct if_cs_card *card, uint reg)
|
|
{
|
|
unsigned int val = ioread16(card->iobase + reg);
|
|
if (debug_output)
|
|
printk(KERN_INFO "inw %08x<%04x\n", reg, val);
|
|
return val;
|
|
}
|
|
static inline void if_cs_read16_rep(
|
|
struct if_cs_card *card,
|
|
uint reg,
|
|
void *buf,
|
|
unsigned long count)
|
|
{
|
|
if (debug_output)
|
|
printk(KERN_INFO "insw %08x<(0x%lx words)\n",
|
|
reg, count);
|
|
ioread16_rep(card->iobase + reg, buf, count);
|
|
}
|
|
|
|
static inline void if_cs_write8(struct if_cs_card *card, uint reg, u8 val)
|
|
{
|
|
if (debug_output)
|
|
printk(KERN_INFO "outb %08x>%02x\n", reg, val);
|
|
iowrite8(val, card->iobase + reg);
|
|
}
|
|
|
|
static inline void if_cs_write16(struct if_cs_card *card, uint reg, u16 val)
|
|
{
|
|
if (debug_output)
|
|
printk(KERN_INFO "outw %08x>%04x\n", reg, val);
|
|
iowrite16(val, card->iobase + reg);
|
|
}
|
|
|
|
static inline void if_cs_write16_rep(
|
|
struct if_cs_card *card,
|
|
uint reg,
|
|
const void *buf,
|
|
unsigned long count)
|
|
{
|
|
if (debug_output)
|
|
printk(KERN_INFO "outsw %08x>(0x%lx words)\n",
|
|
reg, count);
|
|
iowrite16_rep(card->iobase + reg, buf, count);
|
|
}
|
|
|
|
|
|
/*
|
|
* I know that polling/delaying is frowned upon. However, this procedure
|
|
* with polling is needed while downloading the firmware. At this stage,
|
|
* the hardware does unfortunately not create any interrupts.
|
|
*
|
|
* Fortunately, this function is never used once the firmware is in
|
|
* the card. :-)
|
|
*
|
|
* As a reference, see the "Firmware Specification v5.1", page 18
|
|
* and 19. I did not follow their suggested timing to the word,
|
|
* but this works nice & fast anyway.
|
|
*/
|
|
static int if_cs_poll_while_fw_download(struct if_cs_card *card, uint addr, u8 reg)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < 100000; i++) {
|
|
u8 val = if_cs_read8(card, addr);
|
|
if (val == reg)
|
|
return 0;
|
|
udelay(5);
|
|
}
|
|
return -ETIME;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* First the bitmasks for the host/card interrupt/status registers:
|
|
*/
|
|
#define IF_CS_BIT_TX 0x0001
|
|
#define IF_CS_BIT_RX 0x0002
|
|
#define IF_CS_BIT_COMMAND 0x0004
|
|
#define IF_CS_BIT_RESP 0x0008
|
|
#define IF_CS_BIT_EVENT 0x0010
|
|
#define IF_CS_BIT_MASK 0x001f
|
|
|
|
|
|
|
|
/*
|
|
* It's not really clear to me what the host status register is for. It
|
|
* needs to be set almost in union with "host int cause". The following
|
|
* bits from above are used:
|
|
*
|
|
* IF_CS_BIT_TX driver downloaded a data packet
|
|
* IF_CS_BIT_RX driver got a data packet
|
|
* IF_CS_BIT_COMMAND driver downloaded a command
|
|
* IF_CS_BIT_RESP not used (has some meaning with powerdown)
|
|
* IF_CS_BIT_EVENT driver read a host event
|
|
*/
|
|
#define IF_CS_HOST_STATUS 0x00000000
|
|
|
|
/*
|
|
* With the host int cause register can the host (that is, Linux) cause
|
|
* an interrupt in the firmware, to tell the firmware about those events:
|
|
*
|
|
* IF_CS_BIT_TX a data packet has been downloaded
|
|
* IF_CS_BIT_RX a received data packet has retrieved
|
|
* IF_CS_BIT_COMMAND a firmware block or a command has been downloaded
|
|
* IF_CS_BIT_RESP not used (has some meaning with powerdown)
|
|
* IF_CS_BIT_EVENT a host event (link lost etc) has been retrieved
|
|
*/
|
|
#define IF_CS_HOST_INT_CAUSE 0x00000002
|
|
|
|
/*
|
|
* The host int mask register is used to enable/disable interrupt. However,
|
|
* I have the suspicion that disabled interrupts are lost.
|
|
*/
|
|
#define IF_CS_HOST_INT_MASK 0x00000004
|
|
|
|
/*
|
|
* Used to send or receive data packets:
|
|
*/
|
|
#define IF_CS_WRITE 0x00000016
|
|
#define IF_CS_WRITE_LEN 0x00000014
|
|
#define IF_CS_READ 0x00000010
|
|
#define IF_CS_READ_LEN 0x00000024
|
|
|
|
/*
|
|
* Used to send commands (and to send firmware block) and to
|
|
* receive command responses:
|
|
*/
|
|
#define IF_CS_CMD 0x0000001A
|
|
#define IF_CS_CMD_LEN 0x00000018
|
|
#define IF_CS_RESP 0x00000012
|
|
#define IF_CS_RESP_LEN 0x00000030
|
|
|
|
/*
|
|
* The card status registers shows what the card/firmware actually
|
|
* accepts:
|
|
*
|
|
* IF_CS_BIT_TX you may send a data packet
|
|
* IF_CS_BIT_RX you may retrieve a data packet
|
|
* IF_CS_BIT_COMMAND you may send a command
|
|
* IF_CS_BIT_RESP you may retrieve a command response
|
|
* IF_CS_BIT_EVENT the card has a event for use (link lost, snr low etc)
|
|
*
|
|
* When reading this register several times, you will get back the same
|
|
* results --- with one exception: the IF_CS_BIT_EVENT clear itself
|
|
* automatically.
|
|
*
|
|
* Not that we don't rely on BIT_RX,_BIT_RESP or BIT_EVENT because
|
|
* we handle this via the card int cause register.
|
|
*/
|
|
#define IF_CS_CARD_STATUS 0x00000020
|
|
#define IF_CS_CARD_STATUS_MASK 0x7f00
|
|
|
|
/*
|
|
* The card int cause register is used by the card/firmware to notify us
|
|
* about the following events:
|
|
*
|
|
* IF_CS_BIT_TX a data packet has successfully been sentx
|
|
* IF_CS_BIT_RX a data packet has been received and can be retrieved
|
|
* IF_CS_BIT_COMMAND not used
|
|
* IF_CS_BIT_RESP the firmware has a command response for us
|
|
* IF_CS_BIT_EVENT the card has a event for use (link lost, snr low etc)
|
|
*/
|
|
#define IF_CS_CARD_INT_CAUSE 0x00000022
|
|
|
|
/*
|
|
* This is used to for handshaking with the card's bootloader/helper image
|
|
* to synchronize downloading of firmware blocks.
|
|
*/
|
|
#define IF_CS_SQ_READ_LOW 0x00000028
|
|
#define IF_CS_SQ_HELPER_OK 0x10
|
|
|
|
/*
|
|
* The scratch register tells us ...
|
|
*
|
|
* IF_CS_SCRATCH_BOOT_OK the bootloader runs
|
|
* IF_CS_SCRATCH_HELPER_OK the helper firmware already runs
|
|
*/
|
|
#define IF_CS_SCRATCH 0x0000003F
|
|
#define IF_CS_SCRATCH_BOOT_OK 0x00
|
|
#define IF_CS_SCRATCH_HELPER_OK 0x5a
|
|
|
|
/*
|
|
* Used to detect ancient chips:
|
|
*/
|
|
#define IF_CS_PRODUCT_ID 0x0000001C
|
|
#define IF_CS_CF8385_B1_REV 0x12
|
|
#define IF_CS_CF8381_B3_REV 0x04
|
|
|
|
/*
|
|
* Used to detect other cards than CF8385 since their revisions of silicon
|
|
* doesn't match those from CF8385, eg. CF8381 B3 works with this driver.
|
|
*/
|
|
#define CF8381_MANFID 0x02db
|
|
#define CF8381_CARDID 0x6064
|
|
#define CF8385_MANFID 0x02df
|
|
#define CF8385_CARDID 0x8103
|
|
|
|
static inline int if_cs_hw_is_cf8381(struct pcmcia_device *p_dev)
|
|
{
|
|
return (p_dev->manf_id == CF8381_MANFID &&
|
|
p_dev->card_id == CF8381_CARDID);
|
|
}
|
|
|
|
static inline int if_cs_hw_is_cf8385(struct pcmcia_device *p_dev)
|
|
{
|
|
return (p_dev->manf_id == CF8385_MANFID &&
|
|
p_dev->card_id == CF8385_CARDID);
|
|
}
|
|
|
|
/********************************************************************/
|
|
/* I/O and interrupt handling */
|
|
/********************************************************************/
|
|
|
|
static inline void if_cs_enable_ints(struct if_cs_card *card)
|
|
{
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
if_cs_write16(card, IF_CS_HOST_INT_MASK, 0);
|
|
}
|
|
|
|
static inline void if_cs_disable_ints(struct if_cs_card *card)
|
|
{
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
if_cs_write16(card, IF_CS_HOST_INT_MASK, IF_CS_BIT_MASK);
|
|
}
|
|
|
|
/*
|
|
* Called from if_cs_host_to_card to send a command to the hardware
|
|
*/
|
|
static int if_cs_send_cmd(struct lbs_private *priv, u8 *buf, u16 nb)
|
|
{
|
|
struct if_cs_card *card = (struct if_cs_card *)priv->card;
|
|
int ret = -1;
|
|
int loops = 0;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
if_cs_disable_ints(card);
|
|
|
|
/* Is hardware ready? */
|
|
while (1) {
|
|
u16 status = if_cs_read16(card, IF_CS_CARD_STATUS);
|
|
if (status & IF_CS_BIT_COMMAND)
|
|
break;
|
|
if (++loops > 100) {
|
|
lbs_pr_err("card not ready for commands\n");
|
|
goto done;
|
|
}
|
|
mdelay(1);
|
|
}
|
|
|
|
if_cs_write16(card, IF_CS_CMD_LEN, nb);
|
|
|
|
if_cs_write16_rep(card, IF_CS_CMD, buf, nb / 2);
|
|
/* Are we supposed to transfer an odd amount of bytes? */
|
|
if (nb & 1)
|
|
if_cs_write8(card, IF_CS_CMD, buf[nb-1]);
|
|
|
|
/* "Assert the download over interrupt command in the Host
|
|
* status register" */
|
|
if_cs_write16(card, IF_CS_HOST_STATUS, IF_CS_BIT_COMMAND);
|
|
|
|
/* "Assert the download over interrupt command in the Card
|
|
* interrupt case register" */
|
|
if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_COMMAND);
|
|
ret = 0;
|
|
|
|
done:
|
|
if_cs_enable_ints(card);
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
|
|
return ret;
|
|
}
|
|
|
|
/*
|
|
* Called from if_cs_host_to_card to send a data to the hardware
|
|
*/
|
|
static void if_cs_send_data(struct lbs_private *priv, u8 *buf, u16 nb)
|
|
{
|
|
struct if_cs_card *card = (struct if_cs_card *)priv->card;
|
|
u16 status;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
if_cs_disable_ints(card);
|
|
|
|
status = if_cs_read16(card, IF_CS_CARD_STATUS);
|
|
BUG_ON((status & IF_CS_BIT_TX) == 0);
|
|
|
|
if_cs_write16(card, IF_CS_WRITE_LEN, nb);
|
|
|
|
/* write even number of bytes, then odd byte if necessary */
|
|
if_cs_write16_rep(card, IF_CS_WRITE, buf, nb / 2);
|
|
if (nb & 1)
|
|
if_cs_write8(card, IF_CS_WRITE, buf[nb-1]);
|
|
|
|
if_cs_write16(card, IF_CS_HOST_STATUS, IF_CS_BIT_TX);
|
|
if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_TX);
|
|
if_cs_enable_ints(card);
|
|
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
}
|
|
|
|
/*
|
|
* Get the command result out of the card.
|
|
*/
|
|
static int if_cs_receive_cmdres(struct lbs_private *priv, u8 *data, u32 *len)
|
|
{
|
|
unsigned long flags;
|
|
int ret = -1;
|
|
u16 status;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
/* is hardware ready? */
|
|
status = if_cs_read16(priv->card, IF_CS_CARD_STATUS);
|
|
if ((status & IF_CS_BIT_RESP) == 0) {
|
|
lbs_pr_err("no cmd response in card\n");
|
|
*len = 0;
|
|
goto out;
|
|
}
|
|
|
|
*len = if_cs_read16(priv->card, IF_CS_RESP_LEN);
|
|
if ((*len == 0) || (*len > LBS_CMD_BUFFER_SIZE)) {
|
|
lbs_pr_err("card cmd buffer has invalid # of bytes (%d)\n", *len);
|
|
goto out;
|
|
}
|
|
|
|
/* read even number of bytes, then odd byte if necessary */
|
|
if_cs_read16_rep(priv->card, IF_CS_RESP, data, *len/sizeof(u16));
|
|
if (*len & 1)
|
|
data[*len-1] = if_cs_read8(priv->card, IF_CS_RESP);
|
|
|
|
/* This is a workaround for a firmware that reports too much
|
|
* bytes */
|
|
*len -= 8;
|
|
ret = 0;
|
|
|
|
/* Clear this flag again */
|
|
spin_lock_irqsave(&priv->driver_lock, flags);
|
|
priv->dnld_sent = DNLD_RES_RECEIVED;
|
|
spin_unlock_irqrestore(&priv->driver_lock, flags);
|
|
|
|
out:
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d, len %d", ret, *len);
|
|
return ret;
|
|
}
|
|
|
|
static struct sk_buff *if_cs_receive_data(struct lbs_private *priv)
|
|
{
|
|
struct sk_buff *skb = NULL;
|
|
u16 len;
|
|
u8 *data;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
len = if_cs_read16(priv->card, IF_CS_READ_LEN);
|
|
if (len == 0 || len > MRVDRV_ETH_RX_PACKET_BUFFER_SIZE) {
|
|
lbs_pr_err("card data buffer has invalid # of bytes (%d)\n", len);
|
|
priv->dev->stats.rx_dropped++;
|
|
goto dat_err;
|
|
}
|
|
|
|
skb = dev_alloc_skb(MRVDRV_ETH_RX_PACKET_BUFFER_SIZE + 2);
|
|
if (!skb)
|
|
goto out;
|
|
skb_put(skb, len);
|
|
skb_reserve(skb, 2);/* 16 byte align */
|
|
data = skb->data;
|
|
|
|
/* read even number of bytes, then odd byte if necessary */
|
|
if_cs_read16_rep(priv->card, IF_CS_READ, data, len/sizeof(u16));
|
|
if (len & 1)
|
|
data[len-1] = if_cs_read8(priv->card, IF_CS_READ);
|
|
|
|
dat_err:
|
|
if_cs_write16(priv->card, IF_CS_HOST_STATUS, IF_CS_BIT_RX);
|
|
if_cs_write16(priv->card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_RX);
|
|
|
|
out:
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %p", skb);
|
|
return skb;
|
|
}
|
|
|
|
static irqreturn_t if_cs_interrupt(int irq, void *data)
|
|
{
|
|
struct if_cs_card *card = data;
|
|
struct lbs_private *priv = card->priv;
|
|
u16 cause;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
/* Ask card interrupt cause register if there is something for us */
|
|
cause = if_cs_read16(card, IF_CS_CARD_INT_CAUSE);
|
|
lbs_deb_cs("cause 0x%04x\n", cause);
|
|
|
|
if (cause == 0) {
|
|
/* Not for us */
|
|
return IRQ_NONE;
|
|
}
|
|
|
|
if (cause == 0xffff) {
|
|
/* Read in junk, the card has probably been removed */
|
|
card->priv->surpriseremoved = 1;
|
|
return IRQ_HANDLED;
|
|
}
|
|
|
|
if (cause & IF_CS_BIT_RX) {
|
|
struct sk_buff *skb;
|
|
lbs_deb_cs("rx packet\n");
|
|
skb = if_cs_receive_data(priv);
|
|
if (skb)
|
|
lbs_process_rxed_packet(priv, skb);
|
|
}
|
|
|
|
if (cause & IF_CS_BIT_TX) {
|
|
lbs_deb_cs("tx done\n");
|
|
lbs_host_to_card_done(priv);
|
|
}
|
|
|
|
if (cause & IF_CS_BIT_RESP) {
|
|
unsigned long flags;
|
|
u8 i;
|
|
|
|
lbs_deb_cs("cmd resp\n");
|
|
spin_lock_irqsave(&priv->driver_lock, flags);
|
|
i = (priv->resp_idx == 0) ? 1 : 0;
|
|
spin_unlock_irqrestore(&priv->driver_lock, flags);
|
|
|
|
BUG_ON(priv->resp_len[i]);
|
|
if_cs_receive_cmdres(priv, priv->resp_buf[i],
|
|
&priv->resp_len[i]);
|
|
|
|
spin_lock_irqsave(&priv->driver_lock, flags);
|
|
lbs_notify_command_response(priv, i);
|
|
spin_unlock_irqrestore(&priv->driver_lock, flags);
|
|
}
|
|
|
|
if (cause & IF_CS_BIT_EVENT) {
|
|
u16 status = if_cs_read16(priv->card, IF_CS_CARD_STATUS);
|
|
if_cs_write16(priv->card, IF_CS_HOST_INT_CAUSE,
|
|
IF_CS_BIT_EVENT);
|
|
lbs_queue_event(priv, (status & IF_CS_CARD_STATUS_MASK) >> 8);
|
|
}
|
|
|
|
/* Clear interrupt cause */
|
|
if_cs_write16(card, IF_CS_CARD_INT_CAUSE, cause & IF_CS_BIT_MASK);
|
|
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
return IRQ_HANDLED;
|
|
}
|
|
|
|
|
|
|
|
|
|
/********************************************************************/
|
|
/* Firmware */
|
|
/********************************************************************/
|
|
|
|
/*
|
|
* Tries to program the helper firmware.
|
|
*
|
|
* Return 0 on success
|
|
*/
|
|
static int if_cs_prog_helper(struct if_cs_card *card)
|
|
{
|
|
int ret = 0;
|
|
int sent = 0;
|
|
u8 scratch;
|
|
const struct firmware *fw;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
scratch = if_cs_read8(card, IF_CS_SCRATCH);
|
|
|
|
/* "If the value is 0x5a, the firmware is already
|
|
* downloaded successfully"
|
|
*/
|
|
if (scratch == IF_CS_SCRATCH_HELPER_OK)
|
|
goto done;
|
|
|
|
/* "If the value is != 00, it is invalid value of register */
|
|
if (scratch != IF_CS_SCRATCH_BOOT_OK) {
|
|
ret = -ENODEV;
|
|
goto done;
|
|
}
|
|
|
|
/* TODO: make firmware file configurable */
|
|
ret = request_firmware(&fw, "libertas_cs_helper.fw",
|
|
&handle_to_dev(card->p_dev));
|
|
if (ret) {
|
|
lbs_pr_err("can't load helper firmware\n");
|
|
ret = -ENODEV;
|
|
goto done;
|
|
}
|
|
lbs_deb_cs("helper size %td\n", fw->size);
|
|
|
|
/* "Set the 5 bytes of the helper image to 0" */
|
|
/* Not needed, this contains an ARM branch instruction */
|
|
|
|
for (;;) {
|
|
/* "the number of bytes to send is 256" */
|
|
int count = 256;
|
|
int remain = fw->size - sent;
|
|
|
|
if (remain < count)
|
|
count = remain;
|
|
|
|
/* "write the number of bytes to be sent to the I/O Command
|
|
* write length register" */
|
|
if_cs_write16(card, IF_CS_CMD_LEN, count);
|
|
|
|
/* "write this to I/O Command port register as 16 bit writes */
|
|
if (count)
|
|
if_cs_write16_rep(card, IF_CS_CMD,
|
|
&fw->data[sent],
|
|
count >> 1);
|
|
|
|
/* "Assert the download over interrupt command in the Host
|
|
* status register" */
|
|
if_cs_write8(card, IF_CS_HOST_STATUS, IF_CS_BIT_COMMAND);
|
|
|
|
/* "Assert the download over interrupt command in the Card
|
|
* interrupt case register" */
|
|
if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_COMMAND);
|
|
|
|
/* "The host polls the Card Status register ... for 50 ms before
|
|
declaring a failure */
|
|
ret = if_cs_poll_while_fw_download(card, IF_CS_CARD_STATUS,
|
|
IF_CS_BIT_COMMAND);
|
|
if (ret < 0) {
|
|
lbs_pr_err("can't download helper at 0x%x, ret %d\n",
|
|
sent, ret);
|
|
goto err_release;
|
|
}
|
|
|
|
if (count == 0)
|
|
break;
|
|
|
|
sent += count;
|
|
}
|
|
|
|
err_release:
|
|
release_firmware(fw);
|
|
done:
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
|
|
return ret;
|
|
}
|
|
|
|
|
|
static int if_cs_prog_real(struct if_cs_card *card)
|
|
{
|
|
const struct firmware *fw;
|
|
int ret = 0;
|
|
int retry = 0;
|
|
int len = 0;
|
|
int sent;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
/* TODO: make firmware file configurable */
|
|
ret = request_firmware(&fw, "libertas_cs.fw",
|
|
&handle_to_dev(card->p_dev));
|
|
if (ret) {
|
|
lbs_pr_err("can't load firmware\n");
|
|
ret = -ENODEV;
|
|
goto done;
|
|
}
|
|
lbs_deb_cs("fw size %td\n", fw->size);
|
|
|
|
ret = if_cs_poll_while_fw_download(card, IF_CS_SQ_READ_LOW,
|
|
IF_CS_SQ_HELPER_OK);
|
|
if (ret < 0) {
|
|
lbs_pr_err("helper firmware doesn't answer\n");
|
|
goto err_release;
|
|
}
|
|
|
|
for (sent = 0; sent < fw->size; sent += len) {
|
|
len = if_cs_read16(card, IF_CS_SQ_READ_LOW);
|
|
if (len & 1) {
|
|
retry++;
|
|
lbs_pr_info("odd, need to retry this firmware block\n");
|
|
} else {
|
|
retry = 0;
|
|
}
|
|
|
|
if (retry > 20) {
|
|
lbs_pr_err("could not download firmware\n");
|
|
ret = -ENODEV;
|
|
goto err_release;
|
|
}
|
|
if (retry) {
|
|
sent -= len;
|
|
}
|
|
|
|
|
|
if_cs_write16(card, IF_CS_CMD_LEN, len);
|
|
|
|
if_cs_write16_rep(card, IF_CS_CMD,
|
|
&fw->data[sent],
|
|
(len+1) >> 1);
|
|
if_cs_write8(card, IF_CS_HOST_STATUS, IF_CS_BIT_COMMAND);
|
|
if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_COMMAND);
|
|
|
|
ret = if_cs_poll_while_fw_download(card, IF_CS_CARD_STATUS,
|
|
IF_CS_BIT_COMMAND);
|
|
if (ret < 0) {
|
|
lbs_pr_err("can't download firmware at 0x%x\n", sent);
|
|
goto err_release;
|
|
}
|
|
}
|
|
|
|
ret = if_cs_poll_while_fw_download(card, IF_CS_SCRATCH, 0x5a);
|
|
if (ret < 0)
|
|
lbs_pr_err("firmware download failed\n");
|
|
|
|
err_release:
|
|
release_firmware(fw);
|
|
|
|
done:
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
|
|
return ret;
|
|
}
|
|
|
|
|
|
|
|
/********************************************************************/
|
|
/* Callback functions for libertas.ko */
|
|
/********************************************************************/
|
|
|
|
/* Send commands or data packets to the card */
|
|
static int if_cs_host_to_card(struct lbs_private *priv,
|
|
u8 type,
|
|
u8 *buf,
|
|
u16 nb)
|
|
{
|
|
int ret = -1;
|
|
|
|
lbs_deb_enter_args(LBS_DEB_CS, "type %d, bytes %d", type, nb);
|
|
|
|
switch (type) {
|
|
case MVMS_DAT:
|
|
priv->dnld_sent = DNLD_DATA_SENT;
|
|
if_cs_send_data(priv, buf, nb);
|
|
ret = 0;
|
|
break;
|
|
case MVMS_CMD:
|
|
priv->dnld_sent = DNLD_CMD_SENT;
|
|
ret = if_cs_send_cmd(priv, buf, nb);
|
|
break;
|
|
default:
|
|
lbs_pr_err("%s: unsupported type %d\n", __func__, type);
|
|
}
|
|
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
|
|
return ret;
|
|
}
|
|
|
|
|
|
/********************************************************************/
|
|
/* Card Services */
|
|
/********************************************************************/
|
|
|
|
/*
|
|
* After a card is removed, if_cs_release() will unregister the
|
|
* device, and release the PCMCIA configuration. If the device is
|
|
* still open, this will be postponed until it is closed.
|
|
*/
|
|
static void if_cs_release(struct pcmcia_device *p_dev)
|
|
{
|
|
struct if_cs_card *card = p_dev->priv;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
free_irq(p_dev->irq.AssignedIRQ, card);
|
|
pcmcia_disable_device(p_dev);
|
|
if (card->iobase)
|
|
ioport_unmap(card->iobase);
|
|
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
}
|
|
|
|
|
|
/*
|
|
* This creates an "instance" of the driver, allocating local data
|
|
* structures for one device. The device is registered with Card
|
|
* Services.
|
|
*
|
|
* The dev_link structure is initialized, but we don't actually
|
|
* configure the card at this point -- we wait until we receive a card
|
|
* insertion event.
|
|
*/
|
|
static int if_cs_probe(struct pcmcia_device *p_dev)
|
|
{
|
|
int ret = -ENOMEM;
|
|
unsigned int prod_id;
|
|
struct lbs_private *priv;
|
|
struct if_cs_card *card;
|
|
/* CIS parsing */
|
|
tuple_t tuple;
|
|
cisparse_t parse;
|
|
cistpl_cftable_entry_t *cfg = &parse.cftable_entry;
|
|
cistpl_io_t *io = &cfg->io;
|
|
u_char buf[64];
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
card = kzalloc(sizeof(struct if_cs_card), GFP_KERNEL);
|
|
if (!card) {
|
|
lbs_pr_err("error in kzalloc\n");
|
|
goto out;
|
|
}
|
|
card->p_dev = p_dev;
|
|
p_dev->priv = card;
|
|
|
|
p_dev->irq.Attributes = IRQ_TYPE_DYNAMIC_SHARING;
|
|
p_dev->irq.Handler = NULL;
|
|
p_dev->irq.IRQInfo1 = IRQ_INFO2_VALID | IRQ_LEVEL_ID;
|
|
|
|
p_dev->conf.Attributes = 0;
|
|
p_dev->conf.IntType = INT_MEMORY_AND_IO;
|
|
|
|
tuple.Attributes = 0;
|
|
tuple.TupleData = buf;
|
|
tuple.TupleDataMax = sizeof(buf);
|
|
tuple.TupleOffset = 0;
|
|
|
|
tuple.DesiredTuple = CISTPL_CFTABLE_ENTRY;
|
|
if ((ret = pcmcia_get_first_tuple(p_dev, &tuple)) != 0 ||
|
|
(ret = pcmcia_get_tuple_data(p_dev, &tuple)) != 0 ||
|
|
(ret = pcmcia_parse_tuple(&tuple, &parse)) != 0)
|
|
{
|
|
lbs_pr_err("error in pcmcia_get_first_tuple etc\n");
|
|
goto out1;
|
|
}
|
|
|
|
p_dev->conf.ConfigIndex = cfg->index;
|
|
|
|
/* Do we need to allocate an interrupt? */
|
|
if (cfg->irq.IRQInfo1) {
|
|
p_dev->conf.Attributes |= CONF_ENABLE_IRQ;
|
|
}
|
|
|
|
/* IO window settings */
|
|
if (cfg->io.nwin != 1) {
|
|
lbs_pr_err("wrong CIS (check number of IO windows)\n");
|
|
ret = -ENODEV;
|
|
goto out1;
|
|
}
|
|
p_dev->io.Attributes1 = IO_DATA_PATH_WIDTH_AUTO;
|
|
p_dev->io.BasePort1 = io->win[0].base;
|
|
p_dev->io.NumPorts1 = io->win[0].len;
|
|
|
|
/* This reserves IO space but doesn't actually enable it */
|
|
ret = pcmcia_request_io(p_dev, &p_dev->io);
|
|
if (ret) {
|
|
lbs_pr_err("error in pcmcia_request_io\n");
|
|
goto out1;
|
|
}
|
|
|
|
/*
|
|
* Allocate an interrupt line. Note that this does not assign
|
|
* a handler to the interrupt, unless the 'Handler' member of
|
|
* the irq structure is initialized.
|
|
*/
|
|
if (p_dev->conf.Attributes & CONF_ENABLE_IRQ) {
|
|
ret = pcmcia_request_irq(p_dev, &p_dev->irq);
|
|
if (ret) {
|
|
lbs_pr_err("error in pcmcia_request_irq\n");
|
|
goto out1;
|
|
}
|
|
}
|
|
|
|
/* Initialize io access */
|
|
card->iobase = ioport_map(p_dev->io.BasePort1, p_dev->io.NumPorts1);
|
|
if (!card->iobase) {
|
|
lbs_pr_err("error in ioport_map\n");
|
|
ret = -EIO;
|
|
goto out1;
|
|
}
|
|
|
|
/*
|
|
* This actually configures the PCMCIA socket -- setting up
|
|
* the I/O windows and the interrupt mapping, and putting the
|
|
* card and host interface into "Memory and IO" mode.
|
|
*/
|
|
ret = pcmcia_request_configuration(p_dev, &p_dev->conf);
|
|
if (ret) {
|
|
lbs_pr_err("error in pcmcia_request_configuration\n");
|
|
goto out2;
|
|
}
|
|
|
|
/* Finally, report what we've done */
|
|
lbs_deb_cs("irq %d, io 0x%04x-0x%04x\n",
|
|
p_dev->irq.AssignedIRQ, p_dev->io.BasePort1,
|
|
p_dev->io.BasePort1 + p_dev->io.NumPorts1 - 1);
|
|
|
|
/* Check if we have a current silicon */
|
|
prod_id = if_cs_read8(card, IF_CS_PRODUCT_ID);
|
|
if (if_cs_hw_is_cf8381(p_dev) && prod_id < IF_CS_CF8381_B3_REV) {
|
|
lbs_pr_err("old chips like 8381 rev B3 aren't supported\n");
|
|
ret = -ENODEV;
|
|
goto out2;
|
|
}
|
|
|
|
if (if_cs_hw_is_cf8385(p_dev) && prod_id < IF_CS_CF8385_B1_REV) {
|
|
lbs_pr_err("old chips like 8385 rev B1 aren't supported\n");
|
|
ret = -ENODEV;
|
|
goto out2;
|
|
}
|
|
|
|
/* Load the firmware early, before calling into libertas.ko */
|
|
ret = if_cs_prog_helper(card);
|
|
if (ret == 0)
|
|
ret = if_cs_prog_real(card);
|
|
if (ret)
|
|
goto out2;
|
|
|
|
/* Make this card known to the libertas driver */
|
|
priv = lbs_add_card(card, &p_dev->dev);
|
|
if (!priv) {
|
|
ret = -ENOMEM;
|
|
goto out2;
|
|
}
|
|
|
|
/* Finish setting up fields in lbs_private */
|
|
card->priv = priv;
|
|
priv->card = card;
|
|
priv->hw_host_to_card = if_cs_host_to_card;
|
|
priv->fw_ready = 1;
|
|
|
|
/* Now actually get the IRQ */
|
|
ret = request_irq(p_dev->irq.AssignedIRQ, if_cs_interrupt,
|
|
IRQF_SHARED, DRV_NAME, card);
|
|
if (ret) {
|
|
lbs_pr_err("error in request_irq\n");
|
|
goto out3;
|
|
}
|
|
|
|
/* Clear any interrupt cause that happend while sending
|
|
* firmware/initializing card */
|
|
if_cs_write16(card, IF_CS_CARD_INT_CAUSE, IF_CS_BIT_MASK);
|
|
if_cs_enable_ints(card);
|
|
|
|
/* And finally bring the card up */
|
|
if (lbs_start_card(priv) != 0) {
|
|
lbs_pr_err("could not activate card\n");
|
|
goto out3;
|
|
}
|
|
|
|
ret = 0;
|
|
goto out;
|
|
|
|
out3:
|
|
lbs_remove_card(priv);
|
|
out2:
|
|
ioport_unmap(card->iobase);
|
|
out1:
|
|
pcmcia_disable_device(p_dev);
|
|
out:
|
|
lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
|
|
return ret;
|
|
}
|
|
|
|
|
|
/*
|
|
* This deletes a driver "instance". The device is de-registered with
|
|
* Card Services. If it has been released, all local data structures
|
|
* are freed. Otherwise, the structures will be freed when the device
|
|
* is released.
|
|
*/
|
|
static void if_cs_detach(struct pcmcia_device *p_dev)
|
|
{
|
|
struct if_cs_card *card = p_dev->priv;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
|
|
lbs_stop_card(card->priv);
|
|
lbs_remove_card(card->priv);
|
|
if_cs_disable_ints(card);
|
|
if_cs_release(p_dev);
|
|
kfree(card);
|
|
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
}
|
|
|
|
|
|
|
|
/********************************************************************/
|
|
/* Module initialization */
|
|
/********************************************************************/
|
|
|
|
static struct pcmcia_device_id if_cs_ids[] = {
|
|
PCMCIA_DEVICE_MANF_CARD(CF8381_MANFID, CF8381_CARDID),
|
|
PCMCIA_DEVICE_MANF_CARD(CF8385_MANFID, CF8385_CARDID),
|
|
PCMCIA_DEVICE_NULL,
|
|
};
|
|
MODULE_DEVICE_TABLE(pcmcia, if_cs_ids);
|
|
|
|
|
|
static struct pcmcia_driver lbs_driver = {
|
|
.owner = THIS_MODULE,
|
|
.drv = {
|
|
.name = DRV_NAME,
|
|
},
|
|
.probe = if_cs_probe,
|
|
.remove = if_cs_detach,
|
|
.id_table = if_cs_ids,
|
|
};
|
|
|
|
|
|
static int __init if_cs_init(void)
|
|
{
|
|
int ret;
|
|
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
ret = pcmcia_register_driver(&lbs_driver);
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
return ret;
|
|
}
|
|
|
|
|
|
static void __exit if_cs_exit(void)
|
|
{
|
|
lbs_deb_enter(LBS_DEB_CS);
|
|
pcmcia_unregister_driver(&lbs_driver);
|
|
lbs_deb_leave(LBS_DEB_CS);
|
|
}
|
|
|
|
|
|
module_init(if_cs_init);
|
|
module_exit(if_cs_exit);
|