if_cs.c 25.7 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
/*

  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.

*/

24 25
#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt

26
#include <linux/module.h>
27
#include <linux/slab.h>
28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60
#include <linux/delay.h>
#include <linux/moduleparam.h>
#include <linux/firmware.h>
#include <linux/netdevice.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;
61
	struct lbs_private *priv;
62
	void __iomem *iobase;
63
	bool align_regs;
64
	u32 model;
65 66 67
};


68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91
enum {
	MODEL_UNKNOWN = 0x00,
	MODEL_8305 = 0x01,
	MODEL_8381 = 0x02,
	MODEL_8385 = 0x03
};

static const struct lbs_fw_table fw_table[] = {
	{ MODEL_8305, "libertas/cf8305.bin", NULL },
	{ MODEL_8305, "libertas_cs_helper.fw", NULL },
	{ MODEL_8381, "libertas/cf8381_helper.bin", "libertas/cf8381.bin" },
	{ MODEL_8381, "libertas_cs_helper.fw", "libertas_cs.fw" },
	{ MODEL_8385, "libertas/cf8385_helper.bin", "libertas/cf8385.bin" },
	{ MODEL_8385, "libertas_cs_helper.fw", "libertas_cs.fw" },
	{ 0, NULL, NULL }
};
MODULE_FIRMWARE("libertas/cf8305.bin");
MODULE_FIRMWARE("libertas/cf8381_helper.bin");
MODULE_FIRMWARE("libertas/cf8381.bin");
MODULE_FIRMWARE("libertas/cf8385_helper.bin");
MODULE_FIRMWARE("libertas/cf8385.bin");
MODULE_FIRMWARE("libertas_cs_helper.fw");
MODULE_FIRMWARE("libertas_cs.fw");

92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112

/********************************************************************/
/* 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)
113
		printk(KERN_INFO "inb %08x<%02x\n", reg, val);
114 115 116 117 118 119
	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)
120
		printk(KERN_INFO "inw %08x<%04x\n", reg, val);
121 122 123 124 125 126 127 128 129
	return val;
}
static inline void if_cs_read16_rep(
	struct if_cs_card *card,
	uint reg,
	void *buf,
	unsigned long count)
{
	if (debug_output)
130
		printk(KERN_INFO "insw %08x<(0x%lx words)\n",
131 132 133 134 135 136 137
			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)
138
		printk(KERN_INFO "outb %08x>%02x\n", reg, val);
139 140 141 142 143 144
	iowrite8(val, card->iobase + reg);
}

static inline void if_cs_write16(struct if_cs_card *card, uint reg, u16 val)
{
	if (debug_output)
145
		printk(KERN_INFO "outw %08x>%04x\n", reg, val);
146 147 148 149 150 151
	iowrite16(val, card->iobase + reg);
}

static inline void if_cs_write16_rep(
	struct if_cs_card *card,
	uint reg,
152
	const void *buf,
153 154 155
	unsigned long count)
{
	if (debug_output)
156
		printk(KERN_INFO "outsw %08x>(0x%lx words)\n",
157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177
			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;

178
	for (i = 0; i < 100000; i++) {
179 180
		u8 val = if_cs_read8(card, addr);
		if (val == reg)
181
			return 0;
182
		udelay(5);
183 184 185 186 187 188
	}
	return -ETIME;
}



189 190 191
/*
 * First the bitmasks for the host/card interrupt/status registers:
 */
192 193 194 195 196 197
#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
198

199 200 201 202 203 204 205 206 207 208 209 210 211


/*
 * 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
 */
212
#define IF_CS_HOST_STATUS		0x00000000
213

214 215 216 217 218 219 220 221 222 223
/*
 * 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
 */
224
#define IF_CS_HOST_INT_CAUSE		0x00000002
225

226 227 228 229
/*
 * The host int mask register is used to enable/disable interrupt.  However,
 * I have the suspicion that disabled interrupts are lost.
 */
230
#define IF_CS_HOST_INT_MASK		0x00000004
231

232 233 234
/*
 * Used to send or receive data packets:
 */
235 236
#define IF_CS_WRITE			0x00000016
#define IF_CS_WRITE_LEN			0x00000014
237 238
#define IF_CS_READ			0x00000010
#define IF_CS_READ_LEN			0x00000024
239

240 241 242 243
/*
 * Used to send commands (and to send firmware block) and to
 * receive command responses:
 */
244 245 246 247
#define IF_CS_CMD			0x0000001A
#define IF_CS_CMD_LEN			0x00000018
#define IF_CS_RESP			0x00000012
#define IF_CS_RESP_LEN			0x00000030
248

249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265
/*
 * 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.
 */
266 267
#define IF_CS_CARD_STATUS		0x00000020
#define IF_CS_CARD_STATUS_MASK		0x7f00
268

269 270 271 272 273 274 275 276 277 278
/*
 * 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)
 */
279
#define IF_CS_CARD_INT_CAUSE		0x00000022
280

281 282 283 284
/*
 * This is used to for handshaking with the card's bootloader/helper image
 * to synchronize downloading of firmware blocks.
 */
285 286
#define IF_CS_SQ_READ_LOW		0x00000028
#define IF_CS_SQ_HELPER_OK		0x10
287

288 289 290 291 292 293
/*
 * The scratch register tells us ...
 *
 * IF_CS_SCRATCH_BOOT_OK     the bootloader runs
 * IF_CS_SCRATCH_HELPER_OK   the helper firmware already runs
 */
294
#define IF_CS_SCRATCH			0x0000003F
295 296
#define IF_CS_SCRATCH_BOOT_OK		0x00
#define IF_CS_SCRATCH_HELPER_OK		0x5a
297

298 299 300 301 302
/*
 * Used to detect ancient chips:
 */
#define IF_CS_PRODUCT_ID		0x0000001C
#define IF_CS_CF8385_B1_REV		0x12
M
Marek Vasut 已提交
303
#define IF_CS_CF8381_B3_REV		0x04
304
#define IF_CS_CF8305_B1_REV		0x03
305

M
Marek Vasut 已提交
306 307 308 309
/*
 * 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.
 */
310 311
#define CF8305_MANFID		0x02db
#define CF8305_CARDID		0x8103
M
Marek Vasut 已提交
312 313 314 315 316
#define CF8381_MANFID		0x02db
#define CF8381_CARDID		0x6064
#define CF8385_MANFID		0x02df
#define CF8385_CARDID		0x8103

317 318
/*
 * FIXME: just use the 'driver_info' field of 'struct pcmcia_device_id' when
319 320 321
 * that gets fixed.  Currently there's no way to access it from the probe hook.
 */
static inline u32 get_model(u16 manf_id, u16 card_id)
M
Marek Vasut 已提交
322
{
323 324 325 326 327 328 329 330
	/* NOTE: keep in sync with if_cs_ids */
	if (manf_id == CF8305_MANFID && card_id == CF8305_CARDID)
		return MODEL_8305;
	else if (manf_id == CF8381_MANFID && card_id == CF8381_CARDID)
		return MODEL_8381;
	else if (manf_id == CF8385_MANFID && card_id == CF8385_CARDID)
		return MODEL_8385;
	return MODEL_UNKNOWN;
M
Marek Vasut 已提交
331
}
332 333

/********************************************************************/
334
/* I/O and interrupt handling                                       */
335 336
/********************************************************************/

337 338 339
static inline void if_cs_enable_ints(struct if_cs_card *card)
{
	lbs_deb_enter(LBS_DEB_CS);
340
	if_cs_write16(card, IF_CS_HOST_INT_MASK, 0);
341 342 343 344 345
}

static inline void if_cs_disable_ints(struct if_cs_card *card)
{
	lbs_deb_enter(LBS_DEB_CS);
346
	if_cs_write16(card, IF_CS_HOST_INT_MASK, IF_CS_BIT_MASK);
347 348
}

349 350 351
/*
 * Called from if_cs_host_to_card to send a command to the hardware
 */
352
static int if_cs_send_cmd(struct lbs_private *priv, u8 *buf, u16 nb)
353 354 355 356 357 358
{
	struct if_cs_card *card = (struct if_cs_card *)priv->card;
	int ret = -1;
	int loops = 0;

	lbs_deb_enter(LBS_DEB_CS);
359
	if_cs_disable_ints(card);
360 361 362

	/* Is hardware ready? */
	while (1) {
363 364
		u16 status = if_cs_read16(card, IF_CS_CARD_STATUS);
		if (status & IF_CS_BIT_COMMAND)
365 366
			break;
		if (++loops > 100) {
367
			pr_err("card not ready for commands\n");
368 369 370 371 372
			goto done;
		}
		mdelay(1);
	}

373
	if_cs_write16(card, IF_CS_CMD_LEN, nb);
374

375
	if_cs_write16_rep(card, IF_CS_CMD, buf, nb / 2);
376 377
	/* Are we supposed to transfer an odd amount of bytes? */
	if (nb & 1)
378
		if_cs_write8(card, IF_CS_CMD, buf[nb-1]);
379 380 381

	/* "Assert the download over interrupt command in the Host
	 * status register" */
382
	if_cs_write16(card, IF_CS_HOST_STATUS, IF_CS_BIT_COMMAND);
383 384 385

	/* "Assert the download over interrupt command in the Card
	 * interrupt case register" */
386
	if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_COMMAND);
387 388 389
	ret = 0;

done:
390
	if_cs_enable_ints(card);
391 392 393 394 395 396 397
	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
 */
398
static void if_cs_send_data(struct lbs_private *priv, u8 *buf, u16 nb)
399 400
{
	struct if_cs_card *card = (struct if_cs_card *)priv->card;
401
	u16 status;
402 403

	lbs_deb_enter(LBS_DEB_CS);
404 405
	if_cs_disable_ints(card);

406 407
	status = if_cs_read16(card, IF_CS_CARD_STATUS);
	BUG_ON((status & IF_CS_BIT_TX) == 0);
408

409
	if_cs_write16(card, IF_CS_WRITE_LEN, nb);
410 411

	/* write even number of bytes, then odd byte if necessary */
412
	if_cs_write16_rep(card, IF_CS_WRITE, buf, nb / 2);
413
	if (nb & 1)
414
		if_cs_write8(card, IF_CS_WRITE, buf[nb-1]);
415

416 417
	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);
418
	if_cs_enable_ints(card);
419 420 421 422 423 424 425

	lbs_deb_leave(LBS_DEB_CS);
}

/*
 * Get the command result out of the card.
 */
426
static int if_cs_receive_cmdres(struct lbs_private *priv, u8 *data, u32 *len)
427
{
428
	unsigned long flags;
429
	int ret = -1;
430
	u16 status;
431 432 433 434

	lbs_deb_enter(LBS_DEB_CS);

	/* is hardware ready? */
435 436
	status = if_cs_read16(priv->card, IF_CS_CARD_STATUS);
	if ((status & IF_CS_BIT_RESP) == 0) {
437
		pr_err("no cmd response in card\n");
438
		*len = 0;
439 440 441
		goto out;
	}

442
	*len = if_cs_read16(priv->card, IF_CS_RESP_LEN);
443
	if ((*len == 0) || (*len > LBS_CMD_BUFFER_SIZE)) {
444
		pr_err("card cmd buffer has invalid # of bytes (%d)\n", *len);
445 446 447 448
		goto out;
	}

	/* read even number of bytes, then odd byte if necessary */
449
	if_cs_read16_rep(priv->card, IF_CS_RESP, data, *len/sizeof(u16));
450
	if (*len & 1)
451
		data[*len-1] = if_cs_read8(priv->card, IF_CS_RESP);
452

453 454 455
	/* This is a workaround for a firmware that reports too much
	 * bytes */
	*len -= 8;
456
	ret = 0;
457 458 459 460 461 462

	/* Clear this flag again */
	spin_lock_irqsave(&priv->driver_lock, flags);
	priv->dnld_sent = DNLD_RES_RECEIVED;
	spin_unlock_irqrestore(&priv->driver_lock, flags);

463 464 465 466 467
out:
	lbs_deb_leave_args(LBS_DEB_CS, "ret %d, len %d", ret, *len);
	return ret;
}

468
static struct sk_buff *if_cs_receive_data(struct lbs_private *priv)
469 470 471 472 473 474 475
{
	struct sk_buff *skb = NULL;
	u16 len;
	u8 *data;

	lbs_deb_enter(LBS_DEB_CS);

476
	len = if_cs_read16(priv->card, IF_CS_READ_LEN);
477
	if (len == 0 || len > MRVDRV_ETH_RX_PACKET_BUFFER_SIZE) {
478
		pr_err("card data buffer has invalid # of bytes (%d)\n", len);
479
		priv->dev->stats.rx_dropped++;
480 481 482
		goto dat_err;
	}

483
	skb = dev_alloc_skb(MRVDRV_ETH_RX_PACKET_BUFFER_SIZE + 2);
484 485
	if (!skb)
		goto out;
486 487 488
	skb_put(skb, len);
	skb_reserve(skb, 2);/* 16 byte align */
	data = skb->data;
489 490

	/* read even number of bytes, then odd byte if necessary */
491
	if_cs_read16_rep(priv->card, IF_CS_READ, data, len/sizeof(u16));
492
	if (len & 1)
493
		data[len-1] = if_cs_read8(priv->card, IF_CS_READ);
494 495

dat_err:
496 497
	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);
498 499 500 501 502 503

out:
	lbs_deb_leave_args(LBS_DEB_CS, "ret %p", skb);
	return skb;
}

504 505 506 507 508 509 510 511
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);

512
	/* Ask card interrupt cause register if there is something for us */
513
	cause = if_cs_read16(card, IF_CS_CARD_INT_CAUSE);
H
Holger Schurig 已提交
514 515
	lbs_deb_cs("cause 0x%04x\n", cause);

516 517 518 519 520 521 522 523 524 525 526
	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;
	}

527
	if (cause & IF_CS_BIT_RX) {
528 529 530 531 532 533 534
		struct sk_buff *skb;
		lbs_deb_cs("rx packet\n");
		skb = if_cs_receive_data(priv);
		if (skb)
			lbs_process_rxed_packet(priv, skb);
	}

535
	if (cause & IF_CS_BIT_TX) {
536
		lbs_deb_cs("tx done\n");
537 538 539
		lbs_host_to_card_done(priv);
	}

540
	if (cause & IF_CS_BIT_RESP) {
541 542 543
		unsigned long flags;
		u8 i;

544
		lbs_deb_cs("cmd resp\n");
545 546 547 548 549 550 551 552 553 554 555 556 557
		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);
	}

558
	if (cause & IF_CS_BIT_EVENT) {
559
		u16 status = if_cs_read16(priv->card, IF_CS_CARD_STATUS);
560 561
		if_cs_write16(priv->card, IF_CS_HOST_INT_CAUSE,
			IF_CS_BIT_EVENT);
562
		lbs_queue_event(priv, (status & IF_CS_CARD_STATUS_MASK) >> 8);
563 564
	}

H
Holger Schurig 已提交
565 566 567
	/* Clear interrupt cause */
	if_cs_write16(card, IF_CS_CARD_INT_CAUSE, cause & IF_CS_BIT_MASK);

568
	lbs_deb_leave(LBS_DEB_CS);
569 570 571 572 573 574
	return IRQ_HANDLED;
}




575 576 577 578 579 580 581 582 583
/********************************************************************/
/* Firmware                                                         */
/********************************************************************/

/*
 * Tries to program the helper firmware.
 *
 * Return 0 on success
 */
584
static int if_cs_prog_helper(struct if_cs_card *card, const struct firmware *fw)
585 586 587 588 589 590 591
{
	int ret = 0;
	int sent = 0;
	u8  scratch;

	lbs_deb_enter(LBS_DEB_CS);

592 593 594 595 596 597 598 599 600
	/*
	 * This is the only place where an unaligned register access happens on
	 * the CF8305 card, therefore for the sake of speed of the driver, we do
	 * the alignment correction here.
	 */
	if (card->align_regs)
		scratch = if_cs_read16(card, IF_CS_SCRATCH) >> 8;
	else
		scratch = if_cs_read8(card, IF_CS_SCRATCH);
601 602 603 604

	/* "If the value is 0x5a, the firmware is already
	 * downloaded successfully"
	 */
605
	if (scratch == IF_CS_SCRATCH_HELPER_OK)
606 607 608
		goto done;

	/* "If the value is != 00, it is invalid value of register */
609
	if (scratch != IF_CS_SCRATCH_BOOT_OK) {
610 611 612 613
		ret = -ENODEV;
		goto done;
	}

614
	lbs_deb_cs("helper size %td\n", fw->size);
615 616 617 618 619 620 621 622 623 624 625 626

	/* "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;

627 628 629 630
		/*
		 * "write the number of bytes to be sent to the I/O Command
		 * write length register"
		 */
631
		if_cs_write16(card, IF_CS_CMD_LEN, count);
632 633 634

		/* "write this to I/O Command port register as 16 bit writes */
		if (count)
635
			if_cs_write16_rep(card, IF_CS_CMD,
636 637 638
				&fw->data[sent],
				count >> 1);

639 640 641 642
		/*
		 * "Assert the download over interrupt command in the Host
		 * status register"
		 */
643
		if_cs_write8(card, IF_CS_HOST_STATUS, IF_CS_BIT_COMMAND);
644

645 646 647 648
		/*
		 * "Assert the download over interrupt command in the Card
		 * interrupt case register"
		 */
649
		if_cs_write16(card, IF_CS_HOST_INT_CAUSE, IF_CS_BIT_COMMAND);
650

651 652 653 654
		/*
		 * "The host polls the Card Status register ... for 50 ms before
		 * declaring a failure"
		 */
655 656
		ret = if_cs_poll_while_fw_download(card, IF_CS_CARD_STATUS,
			IF_CS_BIT_COMMAND);
657
		if (ret < 0) {
658 659
			pr_err("can't download helper at 0x%x, ret %d\n",
			       sent, ret);
660
			goto done;
661 662 663 664 665 666 667 668 669 670 671 672 673 674
		}

		if (count == 0)
			break;

		sent += count;
	}

done:
	lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
	return ret;
}


675
static int if_cs_prog_real(struct if_cs_card *card, const struct firmware *fw)
676 677 678 679 680 681 682 683
{
	int ret = 0;
	int retry = 0;
	int len = 0;
	int sent;

	lbs_deb_enter(LBS_DEB_CS);

684
	lbs_deb_cs("fw size %td\n", fw->size);
685

686 687
	ret = if_cs_poll_while_fw_download(card, IF_CS_SQ_READ_LOW,
		IF_CS_SQ_HELPER_OK);
688
	if (ret < 0) {
689
		pr_err("helper firmware doesn't answer\n");
690
		goto done;
691 692 693
	}

	for (sent = 0; sent < fw->size; sent += len) {
694
		len = if_cs_read16(card, IF_CS_SQ_READ_LOW);
695 696
		if (len & 1) {
			retry++;
697
			pr_info("odd, need to retry this firmware block\n");
698 699 700 701 702
		} else {
			retry = 0;
		}

		if (retry > 20) {
703
			pr_err("could not download firmware\n");
704
			ret = -ENODEV;
705
			goto done;
706 707 708 709 710 711
		}
		if (retry) {
			sent -= len;
		}


712
		if_cs_write16(card, IF_CS_CMD_LEN, len);
713

714
		if_cs_write16_rep(card, IF_CS_CMD,
715 716
			&fw->data[sent],
			(len+1) >> 1);
717 718
		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);
719

720 721
		ret = if_cs_poll_while_fw_download(card, IF_CS_CARD_STATUS,
			IF_CS_BIT_COMMAND);
722
		if (ret < 0) {
723
			pr_err("can't download firmware at 0x%x\n", sent);
724
			goto done;
725 726 727 728
		}
	}

	ret = if_cs_poll_while_fw_download(card, IF_CS_SCRATCH, 0x5a);
729
	if (ret < 0)
730
		pr_err("firmware download failed\n");
731 732 733 734 735 736 737 738 739 740 741 742 743

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 */
744 745 746 747
static int if_cs_host_to_card(struct lbs_private *priv,
	u8 type,
	u8 *buf,
	u16 nb)
748 749 750 751 752 753 754
{
	int ret = -1;

	lbs_deb_enter_args(LBS_DEB_CS, "type %d, bytes %d", type, nb);

	switch (type) {
	case MVMS_DAT:
755
		priv->dnld_sent = DNLD_DATA_SENT;
756 757 758 759
		if_cs_send_data(priv, buf, nb);
		ret = 0;
		break;
	case MVMS_CMD:
760
		priv->dnld_sent = DNLD_CMD_SENT;
761 762 763
		ret = if_cs_send_cmd(priv, buf, nb);
		break;
	default:
764
		pr_err("%s: unsupported type %d\n", __func__, type);
765 766 767 768 769 770 771 772 773 774 775 776 777
	}

	lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
	return ret;
}


static void if_cs_release(struct pcmcia_device *p_dev)
{
	struct if_cs_card *card = p_dev->priv;

	lbs_deb_enter(LBS_DEB_CS);

778
	free_irq(p_dev->irq, card);
779
	pcmcia_disable_device(p_dev);
780 781 782 783 784 785 786
	if (card->iobase)
		ioport_unmap(card->iobase);

	lbs_deb_leave(LBS_DEB_CS);
}


787
static int if_cs_ioprobe(struct pcmcia_device *p_dev, void *priv_data)
788
{
789
	p_dev->resource[0]->flags &= ~IO_DATA_PATH_WIDTH;
790
	p_dev->resource[0]->flags |= IO_DATA_PATH_WIDTH_AUTO;
791

792
	if (p_dev->resource[1]->end) {
793
		pr_err("wrong CIS (check number of IO windows)\n");
794 795 796 797
		return -ENODEV;
	}

	/* This reserves IO space but doesn't actually enable it */
798
	return pcmcia_request_io(p_dev);
799 800
}

801 802 803
static int if_cs_probe(struct pcmcia_device *p_dev)
{
	int ret = -ENOMEM;
M
Marek Vasut 已提交
804
	unsigned int prod_id;
805
	struct lbs_private *priv;
806
	struct if_cs_card *card;
807 808
	const struct firmware *helper = NULL;
	const struct firmware *mainfw = NULL;
809 810 811 812 813

	lbs_deb_enter(LBS_DEB_CS);

	card = kzalloc(sizeof(struct if_cs_card), GFP_KERNEL);
	if (!card) {
814
		pr_err("error in kzalloc\n");
815 816 817 818 819
		goto out;
	}
	card->p_dev = p_dev;
	p_dev->priv = card;

820 821
	p_dev->config_flags |= CONF_ENABLE_IRQ | CONF_AUTO_SET_IO;

822
	if (pcmcia_loop_config(p_dev, if_cs_ioprobe, NULL)) {
823
		pr_err("error in pcmcia_loop_config\n");
824 825 826 827 828 829 830 831
		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.
	 */
832 833
	if (!p_dev->irq)
		goto out1;
834 835

	/* Initialize io access */
836 837
	card->iobase = ioport_map(p_dev->resource[0]->start,
				resource_size(p_dev->resource[0]));
838
	if (!card->iobase) {
839
		pr_err("error in ioport_map\n");
840 841 842 843
		ret = -EIO;
		goto out1;
	}

844
	ret = pcmcia_enable_device(p_dev);
845
	if (ret) {
846
		pr_err("error in pcmcia_enable_device\n");
847 848 849 850
		goto out2;
	}

	/* Finally, report what we've done */
851
	lbs_deb_cs("irq %d, io %pR", p_dev->irq, p_dev->resource[0]);
852

853 854
	/*
	 * Most of the libertas cards can do unaligned register access, but some
855
	 * weird ones cannot. That's especially true for the CF8305 card.
856 857 858
	 */
	card->align_regs = 0;

859 860
	card->model = get_model(p_dev->manf_id, p_dev->card_id);
	if (card->model == MODEL_UNKNOWN) {
861 862
		pr_err("unsupported manf_id 0x%04x / card_id 0x%04x\n",
		       p_dev->manf_id, p_dev->card_id);
863 864 865
		goto out2;
	}

866
	/* Check if we have a current silicon */
M
Marek Vasut 已提交
867
	prod_id = if_cs_read8(card, IF_CS_PRODUCT_ID);
868
	if (card->model == MODEL_8305) {
869 870
		card->align_regs = 1;
		if (prod_id < IF_CS_CF8305_B1_REV) {
871
			pr_err("8305 rev B0 and older are not supported\n");
872 873 874 875 876
			ret = -ENODEV;
			goto out2;
		}
	}

877
	if ((card->model == MODEL_8381) && prod_id < IF_CS_CF8381_B3_REV) {
878
		pr_err("8381 rev B2 and older are not supported\n");
M
Marek Vasut 已提交
879 880 881 882
		ret = -ENODEV;
		goto out2;
	}

883
	if ((card->model == MODEL_8385) && prod_id < IF_CS_CF8385_B1_REV) {
884
		pr_err("8385 rev B0 and older are not supported\n");
885 886 887
		ret = -ENODEV;
		goto out2;
	}
888

889 890 891
	ret = lbs_get_firmware(&p_dev->dev, NULL, NULL, card->model,
				&fw_table[0], &helper, &mainfw);
	if (ret) {
892
		pr_err("failed to find firmware (%d)\n", ret);
893 894 895
		goto out2;
	}

896
	/* Load the firmware early, before calling into libertas.ko */
897 898 899
	ret = if_cs_prog_helper(card, helper);
	if (ret == 0 && (card->model != MODEL_8305))
		ret = if_cs_prog_real(card, mainfw);
900 901 902 903
	if (ret)
		goto out2;

	/* Make this card known to the libertas driver */
904
	priv = lbs_add_card(card, &p_dev->dev);
905 906 907 908 909
	if (!priv) {
		ret = -ENOMEM;
		goto out2;
	}

910
	/* Finish setting up fields in lbs_private */
911
	card->priv = priv;
912
	priv->card = card;
913
	priv->hw_host_to_card = if_cs_host_to_card;
914 915 916
	priv->enter_deep_sleep = NULL;
	priv->exit_deep_sleep = NULL;
	priv->reset_deep_sleep_wakeup = NULL;
917
	priv->fw_ready = 1;
918

919
	/* Now actually get the IRQ */
920
	ret = request_irq(p_dev->irq, if_cs_interrupt,
921 922
		IRQF_SHARED, DRV_NAME, card);
	if (ret) {
923
		pr_err("error in request_irq\n");
924 925 926
		goto out3;
	}

927 928 929 930
	/*
	 * Clear any interrupt cause that happened while sending
	 * firmware/initializing card
	 */
931
	if_cs_write16(card, IF_CS_CARD_INT_CAUSE, IF_CS_BIT_MASK);
932 933
	if_cs_enable_ints(card);

934
	/* And finally bring the card up */
935
	if (lbs_start_card(priv) != 0) {
936
		pr_err("could not activate card\n");
937 938 939 940 941 942 943
		goto out3;
	}

	ret = 0;
	goto out;

out3:
944
	lbs_remove_card(priv);
945 946 947 948 949
out2:
	ioport_unmap(card->iobase);
out1:
	pcmcia_disable_device(p_dev);
out:
950 951 952 953 954
	if (helper)
		release_firmware(helper);
	if (mainfw)
		release_firmware(mainfw);

955 956 957 958 959 960 961 962 963 964 965
	lbs_deb_leave_args(LBS_DEB_CS, "ret %d", ret);
	return ret;
}


static void if_cs_detach(struct pcmcia_device *p_dev)
{
	struct if_cs_card *card = p_dev->priv;

	lbs_deb_enter(LBS_DEB_CS);

966 967
	lbs_stop_card(card->priv);
	lbs_remove_card(card->priv);
968
	if_cs_disable_ints(card);
969 970 971 972 973 974 975 976 977 978 979 980 981
	if_cs_release(p_dev);
	kfree(card);

	lbs_deb_leave(LBS_DEB_CS);
}



/********************************************************************/
/* Module initialization                                            */
/********************************************************************/

static struct pcmcia_device_id if_cs_ids[] = {
982
	PCMCIA_DEVICE_MANF_CARD(CF8305_MANFID, CF8305_CARDID),
M
Marek Vasut 已提交
983 984
	PCMCIA_DEVICE_MANF_CARD(CF8381_MANFID, CF8381_CARDID),
	PCMCIA_DEVICE_MANF_CARD(CF8385_MANFID, CF8385_CARDID),
985
	/* NOTE: keep in sync with get_model() */
986 987 988 989 990
	PCMCIA_DEVICE_NULL,
};
MODULE_DEVICE_TABLE(pcmcia, if_cs_ids);


991
static struct pcmcia_driver lbs_driver = {
992
	.owner		= THIS_MODULE,
993
	.name		= DRV_NAME,
994 995 996 997 998 999 1000 1001 1002 1003 1004
	.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);
1005
	ret = pcmcia_register_driver(&lbs_driver);
1006 1007 1008 1009 1010 1011 1012 1013
	lbs_deb_leave(LBS_DEB_CS);
	return ret;
}


static void __exit if_cs_exit(void)
{
	lbs_deb_enter(LBS_DEB_CS);
1014
	pcmcia_unregister_driver(&lbs_driver);
1015 1016 1017 1018 1019 1020
	lbs_deb_leave(LBS_DEB_CS);
}


module_init(if_cs_init);
module_exit(if_cs_exit);