2 * ti_pcilynx.c - Texas Instruments PCILynx driver
3 * Copyright (C) 1999,2000 Andreas Bombe <andreas.bombe@munich.netsurf.de>,
4 * Stephan Linz <linz@mazet.de>
5 * Manfred Weihs <weihs@ict.tuwien.ac.at>
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.
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.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software Foundation,
19 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
25 * Manfred Weihs <weihs@ict.tuwien.ac.at>
26 * reading bus info block (containing GUID) from serial
27 * eeprom via i2c and storing it in config ROM
28 * Reworked code for initiating bus resets
29 * (long, short, with or without hold-off)
30 * Enhancements in async and iso send code
33 #include <linux/config.h>
34 #include <linux/kernel.h>
35 #include <linux/slab.h>
36 #include <linux/interrupt.h>
37 #include <linux/wait.h>
38 #include <linux/errno.h>
39 #include <linux/module.h>
40 #include <linux/moduleparam.h>
41 #include <linux/init.h>
42 #include <linux/pci.h>
44 #include <linux/poll.h>
45 #include <linux/irq.h>
46 #include <linux/kdev_t.h>
47 #include <asm/byteorder.h>
48 #include <asm/atomic.h>
50 #include <asm/uaccess.h>
54 #include "ieee1394_types.h"
56 #include "ieee1394_core.h"
57 #include "highlevel.h"
60 #include <linux/i2c.h>
61 #include <linux/i2c-algo-bit.h>
63 /* print general (card independent) information */
64 #define PRINT_G(level, fmt, args...) printk(level "pcilynx: " fmt "\n" , ## args)
65 /* print card specific information */
66 #define PRINT(level, card, fmt, args...) printk(level "pcilynx%d: " fmt "\n" , card , ## args)
68 #ifdef CONFIG_IEEE1394_VERBOSEDEBUG
69 #define PRINT_GD(level, fmt, args...) printk(level "pcilynx: " fmt "\n" , ## args)
70 #define PRINTD(level, card, fmt, args...) printk(level "pcilynx%d: " fmt "\n" , card , ## args)
72 #define PRINT_GD(level, fmt, args...) do {} while (0)
73 #define PRINTD(level, card, fmt, args...) do {} while (0)
77 /* Module Parameters */
78 static int skip_eeprom = 0;
79 module_param(skip_eeprom, int, 0444);
80 MODULE_PARM_DESC(skip_eeprom, "Use generic bus info block instead of serial eeprom (default = 0).");
83 static struct hpsb_host_driver lynx_driver;
84 static unsigned int card_id;
92 /* the i2c stuff was inspired by i2c-philips-par.c */
94 static void bit_setscl(void *data, int state)
97 ((struct ti_lynx *) data)->i2c_driven_state |= 0x00000040;
99 ((struct ti_lynx *) data)->i2c_driven_state &= ~0x00000040;
101 reg_write((struct ti_lynx *) data, SERIAL_EEPROM_CONTROL, ((struct ti_lynx *) data)->i2c_driven_state);
104 static void bit_setsda(void *data, int state)
107 ((struct ti_lynx *) data)->i2c_driven_state |= 0x00000010;
109 ((struct ti_lynx *) data)->i2c_driven_state &= ~0x00000010;
111 reg_write((struct ti_lynx *) data, SERIAL_EEPROM_CONTROL, ((struct ti_lynx *) data)->i2c_driven_state);
114 static int bit_getscl(void *data)
116 return reg_read((struct ti_lynx *) data, SERIAL_EEPROM_CONTROL) & 0x00000040;
119 static int bit_getsda(void *data)
121 return reg_read((struct ti_lynx *) data, SERIAL_EEPROM_CONTROL) & 0x00000010;
124 static int bit_reg(struct i2c_client *client)
129 static int bit_unreg(struct i2c_client *client)
134 static struct i2c_algo_bit_data bit_data = {
135 .setsda = bit_setsda,
136 .setscl = bit_setscl,
137 .getsda = bit_getsda,
138 .getscl = bit_getscl,
144 static struct i2c_adapter bit_ops = {
145 .id = 0xAA, //FIXME: probably we should get an id in i2c-id.h
146 .client_register = bit_reg,
147 .client_unregister = bit_unreg,
148 .name = "PCILynx I2C",
154 * PCL handling functions.
157 static pcl_t alloc_pcl(struct ti_lynx *lynx)
162 spin_lock(&lynx->lock);
163 /* FIXME - use ffz() to make this readable */
164 for (i = 0; i < (LOCALRAM_SIZE / 1024); i++) {
165 m = lynx->pcl_bmap[i];
166 for (j = 0; j < 8; j++) {
171 lynx->pcl_bmap[i] = m;
172 spin_unlock(&lynx->lock);
176 spin_unlock(&lynx->lock);
183 static void free_pcl(struct ti_lynx *lynx, pcl_t pclid)
194 spin_lock(&lynx->lock);
195 if (lynx->pcl_bmap[off] & 1<<bit) {
196 lynx->pcl_bmap[off] &= ~(1<<bit);
198 PRINT(KERN_ERR, lynx->id,
199 "attempted to free unallocated PCL %d", pclid);
201 spin_unlock(&lynx->lock);
204 /* functions useful for debugging */
205 static void pretty_print_pcl(const struct ti_pcl *pcl)
209 printk("PCL next %08x, userdata %08x, status %08x, remtrans %08x, nextbuf %08x\n",
210 pcl->next, pcl->user_data, pcl->pcl_status,
211 pcl->remaining_transfer_count, pcl->next_data_buffer);
214 for (i=0; i<13; i++) {
215 printk(" c%x:%08x d%x:%08x",
216 i, pcl->buffer[i].control, i, pcl->buffer[i].pointer);
217 if (!(i & 0x3) && (i != 12)) printk("\nPCL");
222 static void print_pcl(const struct ti_lynx *lynx, pcl_t pclid)
226 get_pcl(lynx, pclid, &pcl);
227 pretty_print_pcl(&pcl);
233 /***********************************
234 * IEEE-1394 functionality section *
235 ***********************************/
238 static int get_phy_reg(struct ti_lynx *lynx, int addr)
246 PRINT(KERN_ERR, lynx->id,
247 "%s: PHY register address %d out of range",
252 spin_lock_irqsave(&lynx->phy_reg_lock, flags);
254 reg_write(lynx, LINK_PHY, LINK_PHY_READ | LINK_PHY_ADDR(addr));
256 retval = reg_read(lynx, LINK_PHY);
259 PRINT(KERN_ERR, lynx->id, "%s: runaway loop, aborting",
265 } while ((retval & 0xf00) != LINK_PHY_RADDR(addr));
267 reg_write(lynx, LINK_INT_STATUS, LINK_INT_PHY_REG_RCVD);
268 spin_unlock_irqrestore(&lynx->phy_reg_lock, flags);
271 return retval & 0xff;
277 static int set_phy_reg(struct ti_lynx *lynx, int addr, int val)
282 PRINT(KERN_ERR, lynx->id,
283 "%s: PHY register address %d out of range", __FUNCTION__, addr);
288 PRINT(KERN_ERR, lynx->id,
289 "%s: PHY register value %d out of range", __FUNCTION__, val);
293 spin_lock_irqsave(&lynx->phy_reg_lock, flags);
295 reg_write(lynx, LINK_PHY, LINK_PHY_WRITE | LINK_PHY_ADDR(addr)
296 | LINK_PHY_WDATA(val));
298 spin_unlock_irqrestore(&lynx->phy_reg_lock, flags);
303 static int sel_phy_reg_page(struct ti_lynx *lynx, int page)
308 PRINT(KERN_ERR, lynx->id,
309 "%s: PHY page %d out of range", __FUNCTION__, page);
313 reg = get_phy_reg(lynx, 7);
317 set_phy_reg(lynx, 7, reg);
324 #if 0 /* not needed at this time */
325 static int sel_phy_reg_port(struct ti_lynx *lynx, int port)
330 PRINT(KERN_ERR, lynx->id,
331 "%s: PHY port %d out of range", __FUNCTION__, port);
335 reg = get_phy_reg(lynx, 7);
339 set_phy_reg(lynx, 7, reg);
347 static u32 get_phy_vendorid(struct ti_lynx *lynx)
350 sel_phy_reg_page(lynx, 1);
351 pvid |= (get_phy_reg(lynx, 10) << 16);
352 pvid |= (get_phy_reg(lynx, 11) << 8);
353 pvid |= get_phy_reg(lynx, 12);
354 PRINT(KERN_INFO, lynx->id, "PHY vendor id 0x%06x", pvid);
358 static u32 get_phy_productid(struct ti_lynx *lynx)
361 sel_phy_reg_page(lynx, 1);
362 id |= (get_phy_reg(lynx, 13) << 16);
363 id |= (get_phy_reg(lynx, 14) << 8);
364 id |= get_phy_reg(lynx, 15);
365 PRINT(KERN_INFO, lynx->id, "PHY product id 0x%06x", id);
369 static quadlet_t generate_own_selfid(struct ti_lynx *lynx,
370 struct hpsb_host *host)
376 phyreg[0] = lynx->phy_reg0;
377 for (i = 1; i < 7; i++) {
378 phyreg[i] = get_phy_reg(lynx, i);
381 /* FIXME? We assume a TSB21LV03A phy here. This code doesn't support
382 more than 3 ports on the PHY anyway. */
384 lsid = 0x80400000 | ((phyreg[0] & 0xfc) << 22);
385 lsid |= (phyreg[1] & 0x3f) << 16; /* gap count */
386 lsid |= (phyreg[2] & 0xc0) << 8; /* max speed */
387 lsid |= (phyreg[6] & 0x01) << 11; /* contender (phy dependent) */
388 /* lsid |= 1 << 11; *//* set contender (hack) */
389 lsid |= (phyreg[6] & 0x10) >> 3; /* initiated reset */
391 for (i = 0; i < (phyreg[2] & 0xf); i++) { /* ports */
392 if (phyreg[3 + i] & 0x4) {
393 lsid |= (((phyreg[3 + i] & 0x8) | 0x10) >> 3)
396 lsid |= 1 << (6 - i*2);
401 PRINT(KERN_DEBUG, lynx->id, "generated own selfid 0x%x", lsid);
405 static void handle_selfid(struct ti_lynx *lynx, struct hpsb_host *host)
407 quadlet_t *q = lynx->rcv_page;
408 int phyid, isroot, size;
412 if (lynx->phy_reg0 == -1 || lynx->selfid_size == -1) return;
414 size = lynx->selfid_size;
415 phyid = lynx->phy_reg0;
417 i = (size > 16 ? 16 : size) / 4 - 1;
423 if (!lynx->phyic.reg_1394a) {
424 lsid = generate_own_selfid(lynx, host);
427 isroot = (phyid & 2) != 0;
429 PRINT(KERN_INFO, lynx->id, "SelfID process finished (phyid %d, %s)",
430 phyid, (isroot ? "root" : "not root"));
431 reg_write(lynx, LINK_ID, (0xffc0 | phyid) << 16);
433 if (!lynx->phyic.reg_1394a && !size) {
434 hpsb_selfid_received(host, lsid);
438 struct selfid *sid = (struct selfid *)q;
440 if (!lynx->phyic.reg_1394a && !sid->extended
441 && (sid->phy_id == (phyid + 1))) {
442 hpsb_selfid_received(host, lsid);
446 PRINT(KERN_DEBUG, lynx->id, "SelfID packet 0x%x rcvd",
448 hpsb_selfid_received(host, q[0]);
450 PRINT(KERN_INFO, lynx->id,
451 "inconsistent selfid 0x%x/0x%x", q[0], q[1]);
457 if (!lynx->phyic.reg_1394a && isroot && phyid != 0) {
458 hpsb_selfid_received(host, lsid);
461 hpsb_selfid_complete(host, phyid, isroot);
463 if (host->in_bus_reset) return; /* in bus reset again */
465 if (isroot) reg_set_bits(lynx, LINK_CONTROL, LINK_CONTROL_CYCMASTER); //FIXME: I do not think, we need this here
466 reg_set_bits(lynx, LINK_CONTROL,
467 LINK_CONTROL_RCV_CMP_VALID | LINK_CONTROL_TX_ASYNC_EN
468 | LINK_CONTROL_RX_ASYNC_EN | LINK_CONTROL_CYCTIMEREN);
473 /* This must be called with the respective queue_lock held. */
474 static void send_next(struct ti_lynx *lynx, int what)
477 struct lynx_send_data *d;
478 struct hpsb_packet *packet;
480 d = (what == hpsb_iso ? &lynx->iso_send : &lynx->async);
481 if (!list_empty(&d->pcl_queue)) {
482 PRINT(KERN_ERR, lynx->id, "trying to queue a new packet in nonempty fifo");
486 packet = driver_packet(d->queue.next);
487 list_move_tail(&packet->driver_list, &d->pcl_queue);
489 d->header_dma = pci_map_single(lynx->dev, packet->header,
490 packet->header_size, PCI_DMA_TODEVICE);
491 if (packet->data_size) {
492 d->data_dma = pci_map_single(lynx->dev, packet->data,
499 pcl.next = PCL_NEXT_INVALID;
500 pcl.async_error_next = PCL_NEXT_INVALID;
502 pcl.buffer[0].control = packet->speed_code << 14 | packet->header_size;
504 pcl.buffer[0].control |= PCL_BIGENDIAN;
506 pcl.buffer[0].pointer = d->header_dma;
507 pcl.buffer[1].control = PCL_LAST_BUFF | packet->data_size;
508 pcl.buffer[1].pointer = d->data_dma;
510 switch (packet->type) {
512 pcl.buffer[0].control |= PCL_CMD_XMT;
515 pcl.buffer[0].control |= PCL_CMD_XMT | PCL_ISOMODE;
518 pcl.buffer[0].control |= PCL_CMD_UNFXMT;
522 put_pcl(lynx, d->pcl, &pcl);
523 run_pcl(lynx, d->pcl_start, d->channel);
527 /* called from subsystem core */
528 static int lynx_transmit(struct hpsb_host *host, struct hpsb_packet *packet)
530 struct ti_lynx *lynx = host->hostdata;
531 struct lynx_send_data *d;
534 if (packet->data_size >= 4096) {
535 PRINT(KERN_ERR, lynx->id, "transmit packet data too big (%Zd)",
540 switch (packet->type) {
549 PRINT(KERN_ERR, lynx->id, "invalid packet type %d",
554 if (packet->tcode == TCODE_WRITEQ
555 || packet->tcode == TCODE_READQ_RESPONSE) {
556 cpu_to_be32s(&packet->header[3]);
559 spin_lock_irqsave(&d->queue_lock, flags);
561 list_add_tail(&packet->driver_list, &d->queue);
562 if (list_empty(&d->pcl_queue))
563 send_next(lynx, packet->type);
565 spin_unlock_irqrestore(&d->queue_lock, flags);
571 /* called from subsystem core */
572 static int lynx_devctl(struct hpsb_host *host, enum devctl_cmd cmd, int arg)
574 struct ti_lynx *lynx = host->hostdata;
576 struct hpsb_packet *packet;
577 LIST_HEAD(packet_list);
583 if (reg_read(lynx, LINK_INT_STATUS) & LINK_INT_PHY_BUSRESET) {
590 if (lynx->phyic.reg_1394a) {
591 phy_reg = get_phy_reg(lynx, 5);
593 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
599 PRINT(KERN_INFO, lynx->id, "resetting bus (short bus reset) on request");
601 lynx->selfid_size = -1;
603 set_phy_reg(lynx, 5, phy_reg); /* set ISBR */
606 PRINT(KERN_INFO, lynx->id, "cannot do short bus reset, because of old phy");
607 /* fall through to long bus reset */
610 phy_reg = get_phy_reg(lynx, 1);
612 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
618 PRINT(KERN_INFO, lynx->id, "resetting bus (long bus reset) on request");
620 lynx->selfid_size = -1;
622 set_phy_reg(lynx, 1, phy_reg); /* clear RHB, set IBR */
624 case SHORT_RESET_NO_FORCE_ROOT:
625 if (lynx->phyic.reg_1394a) {
626 phy_reg = get_phy_reg(lynx, 1);
628 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
632 if (phy_reg & 0x80) {
634 set_phy_reg(lynx, 1, phy_reg); /* clear RHB */
637 phy_reg = get_phy_reg(lynx, 5);
639 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
645 PRINT(KERN_INFO, lynx->id, "resetting bus (short bus reset, no force_root) on request");
647 lynx->selfid_size = -1;
649 set_phy_reg(lynx, 5, phy_reg); /* set ISBR */
652 PRINT(KERN_INFO, lynx->id, "cannot do short bus reset, because of old phy");
653 /* fall through to long bus reset */
655 case LONG_RESET_NO_FORCE_ROOT:
656 phy_reg = get_phy_reg(lynx, 1);
658 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
665 PRINT(KERN_INFO, lynx->id, "resetting bus (long bus reset, no force_root) on request");
667 lynx->selfid_size = -1;
669 set_phy_reg(lynx, 1, phy_reg); /* clear RHB, set IBR */
671 case SHORT_RESET_FORCE_ROOT:
672 if (lynx->phyic.reg_1394a) {
673 phy_reg = get_phy_reg(lynx, 1);
675 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
679 if (!(phy_reg & 0x80)) {
681 set_phy_reg(lynx, 1, phy_reg); /* set RHB */
684 phy_reg = get_phy_reg(lynx, 5);
686 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
692 PRINT(KERN_INFO, lynx->id, "resetting bus (short bus reset, force_root set) on request");
694 lynx->selfid_size = -1;
696 set_phy_reg(lynx, 5, phy_reg); /* set ISBR */
699 PRINT(KERN_INFO, lynx->id, "cannot do short bus reset, because of old phy");
700 /* fall through to long bus reset */
702 case LONG_RESET_FORCE_ROOT:
703 phy_reg = get_phy_reg(lynx, 1);
705 PRINT(KERN_ERR, lynx->id, "cannot reset bus, because read phy reg failed");
711 PRINT(KERN_INFO, lynx->id, "resetting bus (long bus reset, force_root set) on request");
713 lynx->selfid_size = -1;
715 set_phy_reg(lynx, 1, phy_reg); /* set IBR and RHB */
718 PRINT(KERN_ERR, lynx->id, "unknown argument for reset_bus command %d", arg);
724 case GET_CYCLE_COUNTER:
725 retval = reg_read(lynx, CYCLE_TIMER);
728 case SET_CYCLE_COUNTER:
729 reg_write(lynx, CYCLE_TIMER, arg);
733 reg_write(lynx, LINK_ID,
734 (arg << 22) | (reg_read(lynx, LINK_ID) & 0x003f0000));
737 case ACT_CYCLE_MASTER:
739 reg_set_bits(lynx, LINK_CONTROL,
740 LINK_CONTROL_CYCMASTER);
742 reg_clear_bits(lynx, LINK_CONTROL,
743 LINK_CONTROL_CYCMASTER);
747 case CANCEL_REQUESTS:
748 spin_lock_irqsave(&lynx->async.queue_lock, flags);
750 reg_write(lynx, DMA_CHAN_CTRL(CHANNEL_ASYNC_SEND), 0);
751 list_splice(&lynx->async.queue, &packet_list);
752 INIT_LIST_HEAD(&lynx->async.queue);
754 if (list_empty(&lynx->async.pcl_queue)) {
755 spin_unlock_irqrestore(&lynx->async.queue_lock, flags);
756 PRINTD(KERN_DEBUG, lynx->id, "no async packet in PCL to cancel");
760 struct hpsb_packet *packet;
762 PRINT(KERN_INFO, lynx->id, "cancelling async packet, that was already in PCL");
764 get_pcl(lynx, lynx->async.pcl, &pcl);
766 packet = driver_packet(lynx->async.pcl_queue.next);
767 list_del_init(&packet->driver_list);
769 pci_unmap_single(lynx->dev, lynx->async.header_dma,
770 packet->header_size, PCI_DMA_TODEVICE);
771 if (packet->data_size) {
772 pci_unmap_single(lynx->dev, lynx->async.data_dma,
773 packet->data_size, PCI_DMA_TODEVICE);
776 spin_unlock_irqrestore(&lynx->async.queue_lock, flags);
778 if (pcl.pcl_status & DMA_CHAN_STAT_PKTCMPL) {
779 if (pcl.pcl_status & DMA_CHAN_STAT_SPECIALACK) {
780 ack = (pcl.pcl_status >> 15) & 0xf;
781 PRINTD(KERN_INFO, lynx->id, "special ack %d", ack);
782 ack = (ack == 1 ? ACKX_TIMEOUT : ACKX_SEND_ERROR);
784 ack = (pcl.pcl_status >> 15) & 0xf;
787 PRINT(KERN_INFO, lynx->id, "async packet was not completed");
790 hpsb_packet_sent(host, packet, ack);
793 while (!list_empty(&packet_list)) {
794 packet = driver_packet(packet_list.next);
795 list_del_init(&packet->driver_list);
796 hpsb_packet_sent(host, packet, ACKX_ABORTED);
801 case ISO_LISTEN_CHANNEL:
802 spin_lock_irqsave(&lynx->iso_rcv.lock, flags);
804 if (lynx->iso_rcv.chan_count++ == 0) {
805 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ISO_RCV),
806 DMA_WORD1_CMP_ENABLE_MASTER);
809 spin_unlock_irqrestore(&lynx->iso_rcv.lock, flags);
812 case ISO_UNLISTEN_CHANNEL:
813 spin_lock_irqsave(&lynx->iso_rcv.lock, flags);
815 if (--lynx->iso_rcv.chan_count == 0) {
816 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ISO_RCV),
820 spin_unlock_irqrestore(&lynx->iso_rcv.lock, flags);
824 PRINT(KERN_ERR, lynx->id, "unknown devctl command %d", cmd);
832 /***************************************
833 * IEEE-1394 functionality section END *
834 ***************************************/
836 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
837 /* VFS functions for local bus / aux device access. Access to those
838 * is implemented as a character device instead of block devices
839 * because buffers are not wanted for this. Therefore llseek (from
840 * VFS) can be used for these char devices with obvious effects.
842 static int mem_open(struct inode*, struct file*);
843 static int mem_release(struct inode*, struct file*);
844 static unsigned int aux_poll(struct file*, struct poll_table_struct*);
845 static loff_t mem_llseek(struct file*, loff_t, int);
846 static ssize_t mem_read (struct file*, char*, size_t, loff_t*);
847 static ssize_t mem_write(struct file*, const char*, size_t, loff_t*);
850 static struct file_operations aux_ops = {
851 .owner = THIS_MODULE,
855 .llseek = mem_llseek,
857 .release = mem_release,
861 static void aux_setup_pcls(struct ti_lynx *lynx)
865 pcl.next = PCL_NEXT_INVALID;
866 pcl.user_data = pcl_bus(lynx, lynx->dmem_pcl);
867 put_pcl(lynx, lynx->dmem_pcl, &pcl);
870 static int mem_open(struct inode *inode, struct file *file)
872 int cid = iminor(inode);
873 enum { t_rom, t_aux, t_ram } type;
876 if (cid < PCILYNX_MINOR_AUX_START) {
877 /* just for completeness */
879 } else if (cid < PCILYNX_MINOR_ROM_START) {
880 cid -= PCILYNX_MINOR_AUX_START;
881 if (cid >= num_of_cards || !cards[cid].aux_port)
884 } else if (cid < PCILYNX_MINOR_RAM_START) {
885 cid -= PCILYNX_MINOR_ROM_START;
886 if (cid >= num_of_cards || !cards[cid].local_rom)
890 /* WARNING: Know what you are doing when opening RAM.
891 * It is currently used inside the driver! */
892 cid -= PCILYNX_MINOR_RAM_START;
893 if (cid >= num_of_cards || !cards[cid].local_ram)
898 md = (struct memdata *)kmalloc(sizeof(struct memdata), SLAB_KERNEL);
902 md->lynx = &cards[cid];
913 atomic_set(&md->aux_intr_last_seen,
914 atomic_read(&cards[cid].aux_intr_seen));
919 file->private_data = md;
924 static int mem_release(struct inode *inode, struct file *file)
926 kfree(file->private_data);
930 static unsigned int aux_poll(struct file *file, poll_table *pt)
932 struct memdata *md = (struct memdata *)file->private_data;
936 /* reading and writing is always allowed */
937 mask = POLLIN | POLLRDNORM | POLLOUT | POLLWRNORM;
939 if (md->type == aux) {
940 poll_wait(file, &cards[cid].aux_intr_wait, pt);
942 if (atomic_read(&md->aux_intr_last_seen)
943 != atomic_read(&cards[cid].aux_intr_seen)) {
945 atomic_inc(&md->aux_intr_last_seen);
952 loff_t mem_llseek(struct file *file, loff_t offs, int orig)
961 newoffs = offs + file->f_pos;
964 newoffs = PCILYNX_MAX_MEMORY + 1 + offs;
970 if (newoffs < 0 || newoffs > PCILYNX_MAX_MEMORY + 1) return -EINVAL;
972 file->f_pos = newoffs;
977 * do not DMA if count is too small because this will have a serious impact
978 * on performance - the value 2400 was found by experiment and may not work
979 * everywhere as good as here - use mem_mindma option for modules to change
981 static short mem_mindma = 2400;
982 module_param(mem_mindma, short, 0444);
983 MODULE_PARM_DESC(mem_mindma, "Minimum amount of data required to use DMA");
985 static ssize_t mem_dmaread(struct memdata *md, u32 physbuf, ssize_t count,
992 DECLARE_WAITQUEUE(wait, current);
995 count = min(count, 53196);
998 if (reg_read(md->lynx, DMA_CHAN_CTRL(CHANNEL_LOCALBUS))
999 & DMA_CHAN_CTRL_BUSY) {
1000 PRINT(KERN_WARNING, md->lynx->id, "DMA ALREADY ACTIVE!");
1003 reg_write(md->lynx, LBUS_ADDR, md->type | offset);
1005 pcl = edit_pcl(md->lynx, md->lynx->dmem_pcl, &pcltmp);
1006 pcl->buffer[0].control = PCL_CMD_LBUS_TO_PCI | min(count, 4092);
1007 pcl->buffer[0].pointer = physbuf;
1013 pcl->buffer[i].control = min(count, 4092);
1014 pcl->buffer[i].pointer = physbuf + i * 4092;
1017 pcl->buffer[i].control |= PCL_LAST_BUFF;
1018 commit_pcl(md->lynx, md->lynx->dmem_pcl, &pcltmp);
1020 set_current_state(TASK_INTERRUPTIBLE);
1021 add_wait_queue(&md->lynx->mem_dma_intr_wait, &wait);
1022 run_sub_pcl(md->lynx, md->lynx->dmem_pcl, 2, CHANNEL_LOCALBUS);
1025 while (reg_read(md->lynx, DMA_CHAN_CTRL(CHANNEL_LOCALBUS))
1026 & DMA_CHAN_CTRL_BUSY) {
1027 if (signal_pending(current)) {
1034 reg_write(md->lynx, DMA_CHAN_CTRL(CHANNEL_LOCALBUS), 0);
1035 remove_wait_queue(&md->lynx->mem_dma_intr_wait, &wait);
1037 if (reg_read(md->lynx, DMA_CHAN_CTRL(CHANNEL_LOCALBUS))
1038 & DMA_CHAN_CTRL_BUSY) {
1039 PRINT(KERN_ERR, md->lynx->id, "DMA STILL ACTIVE!");
1045 static ssize_t mem_read(struct file *file, char *buffer, size_t count,
1048 struct memdata *md = (struct memdata *)file->private_data;
1051 loff_t off = *offset; /* avoid useless 64bit-arithmetic */
1055 if ((off + count) > PCILYNX_MAX_MEMORY+1) {
1056 count = PCILYNX_MAX_MEMORY+1 - off;
1058 if (count == 0 || off > PCILYNX_MAX_MEMORY) {
1064 membase = md->lynx->local_rom;
1067 membase = md->lynx->local_ram;
1070 membase = md->lynx->aux_port;
1073 panic("pcilynx%d: unsupported md->type %d in %s",
1074 md->lynx->id, md->type, __FUNCTION__);
1077 down(&md->lynx->mem_dma_mutex);
1079 if (count < mem_mindma) {
1080 memcpy_fromio(md->lynx->mem_dma_buffer, membase+off, count);
1085 alignfix = 4 - (off % 4);
1086 if (alignfix != 4) {
1087 if (bcount < alignfix) {
1090 memcpy_fromio(md->lynx->mem_dma_buffer, membase+off,
1092 if (bcount == alignfix) {
1099 while (bcount >= 4) {
1100 retval = mem_dmaread(md, md->lynx->mem_dma_buffer_dma
1101 + count - bcount, bcount, off);
1102 if (retval < 0) return retval;
1109 memcpy_fromio(md->lynx->mem_dma_buffer + count - bcount,
1110 membase+off, bcount);
1114 retval = copy_to_user(buffer, md->lynx->mem_dma_buffer, count);
1115 up(&md->lynx->mem_dma_mutex);
1117 if (retval) return -EFAULT;
1123 static ssize_t mem_write(struct file *file, const char *buffer, size_t count,
1126 struct memdata *md = (struct memdata *)file->private_data;
1128 if (((*offset) + count) > PCILYNX_MAX_MEMORY+1) {
1129 count = PCILYNX_MAX_MEMORY+1 - *offset;
1131 if (count == 0 || *offset > PCILYNX_MAX_MEMORY) {
1135 /* FIXME: dereferencing pointers to PCI mem doesn't work everywhere */
1138 if (copy_from_user(md->lynx->aux_port+(*offset), buffer, count))
1142 if (copy_from_user(md->lynx->local_ram+(*offset), buffer, count))
1146 /* the ROM may be writeable */
1147 if (copy_from_user(md->lynx->local_rom+(*offset), buffer, count))
1152 file->f_pos += count;
1155 #endif /* CONFIG_IEEE1394_PCILYNX_PORTS */
1158 /********************************************************
1159 * Global stuff (interrupt handler, init/shutdown code) *
1160 ********************************************************/
1163 static irqreturn_t lynx_irq_handler(int irq, void *dev_id,
1164 struct pt_regs *regs_are_unused)
1166 struct ti_lynx *lynx = (struct ti_lynx *)dev_id;
1167 struct hpsb_host *host = lynx->host;
1171 linkint = reg_read(lynx, LINK_INT_STATUS);
1172 intmask = reg_read(lynx, PCI_INT_STATUS);
1174 if (!(intmask & PCI_INT_INT_PEND))
1177 PRINTD(KERN_DEBUG, lynx->id, "interrupt: 0x%08x / 0x%08x", intmask,
1180 reg_write(lynx, LINK_INT_STATUS, linkint);
1181 reg_write(lynx, PCI_INT_STATUS, intmask);
1183 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1184 if (intmask & PCI_INT_AUX_INT) {
1185 atomic_inc(&lynx->aux_intr_seen);
1186 wake_up_interruptible(&lynx->aux_intr_wait);
1189 if (intmask & PCI_INT_DMA_HLT(CHANNEL_LOCALBUS)) {
1190 wake_up_interruptible(&lynx->mem_dma_intr_wait);
1195 if (intmask & PCI_INT_1394) {
1196 if (linkint & LINK_INT_PHY_TIMEOUT) {
1197 PRINT(KERN_INFO, lynx->id, "PHY timeout occurred");
1199 if (linkint & LINK_INT_PHY_BUSRESET) {
1200 PRINT(KERN_INFO, lynx->id, "bus reset interrupt");
1201 lynx->selfid_size = -1;
1202 lynx->phy_reg0 = -1;
1203 if (!host->in_bus_reset)
1204 hpsb_bus_reset(host);
1206 if (linkint & LINK_INT_PHY_REG_RCVD) {
1209 spin_lock(&lynx->phy_reg_lock);
1210 reg = reg_read(lynx, LINK_PHY);
1211 spin_unlock(&lynx->phy_reg_lock);
1213 if (!host->in_bus_reset) {
1214 PRINT(KERN_INFO, lynx->id,
1215 "phy reg received without reset");
1216 } else if (reg & 0xf00) {
1217 PRINT(KERN_INFO, lynx->id,
1218 "unsolicited phy reg %d received",
1221 lynx->phy_reg0 = reg & 0xff;
1222 handle_selfid(lynx, host);
1225 if (linkint & LINK_INT_ISO_STUCK) {
1226 PRINT(KERN_INFO, lynx->id, "isochronous transmitter stuck");
1228 if (linkint & LINK_INT_ASYNC_STUCK) {
1229 PRINT(KERN_INFO, lynx->id, "asynchronous transmitter stuck");
1231 if (linkint & LINK_INT_SENT_REJECT) {
1232 PRINT(KERN_INFO, lynx->id, "sent reject");
1234 if (linkint & LINK_INT_TX_INVALID_TC) {
1235 PRINT(KERN_INFO, lynx->id, "invalid transaction code");
1237 if (linkint & LINK_INT_GRF_OVERFLOW) {
1238 /* flush FIFO if overflow happens during reset */
1239 if (host->in_bus_reset)
1240 reg_write(lynx, FIFO_CONTROL,
1241 FIFO_CONTROL_GRF_FLUSH);
1242 PRINT(KERN_INFO, lynx->id, "GRF overflow");
1244 if (linkint & LINK_INT_ITF_UNDERFLOW) {
1245 PRINT(KERN_INFO, lynx->id, "ITF underflow");
1247 if (linkint & LINK_INT_ATF_UNDERFLOW) {
1248 PRINT(KERN_INFO, lynx->id, "ATF underflow");
1252 if (intmask & PCI_INT_DMA_HLT(CHANNEL_ISO_RCV)) {
1253 PRINTD(KERN_DEBUG, lynx->id, "iso receive");
1255 spin_lock(&lynx->iso_rcv.lock);
1257 lynx->iso_rcv.stat[lynx->iso_rcv.next] =
1258 reg_read(lynx, DMA_CHAN_STAT(CHANNEL_ISO_RCV));
1260 lynx->iso_rcv.used++;
1261 lynx->iso_rcv.next = (lynx->iso_rcv.next + 1) % NUM_ISORCV_PCL;
1263 if ((lynx->iso_rcv.next == lynx->iso_rcv.last)
1264 || !lynx->iso_rcv.chan_count) {
1265 PRINTD(KERN_DEBUG, lynx->id, "stopped");
1266 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ISO_RCV), 0);
1269 run_sub_pcl(lynx, lynx->iso_rcv.pcl_start, lynx->iso_rcv.next,
1272 spin_unlock(&lynx->iso_rcv.lock);
1274 tasklet_schedule(&lynx->iso_rcv.tq);
1277 if (intmask & PCI_INT_DMA_HLT(CHANNEL_ASYNC_SEND)) {
1278 PRINTD(KERN_DEBUG, lynx->id, "async sent");
1279 spin_lock(&lynx->async.queue_lock);
1281 if (list_empty(&lynx->async.pcl_queue)) {
1282 spin_unlock(&lynx->async.queue_lock);
1283 PRINT(KERN_WARNING, lynx->id, "async dma halted, but no queued packet (maybe it was cancelled)");
1287 struct hpsb_packet *packet;
1289 get_pcl(lynx, lynx->async.pcl, &pcl);
1291 packet = driver_packet(lynx->async.pcl_queue.next);
1292 list_del_init(&packet->driver_list);
1294 pci_unmap_single(lynx->dev, lynx->async.header_dma,
1295 packet->header_size, PCI_DMA_TODEVICE);
1296 if (packet->data_size) {
1297 pci_unmap_single(lynx->dev, lynx->async.data_dma,
1298 packet->data_size, PCI_DMA_TODEVICE);
1301 if (!list_empty(&lynx->async.queue)) {
1302 send_next(lynx, hpsb_async);
1305 spin_unlock(&lynx->async.queue_lock);
1307 if (pcl.pcl_status & DMA_CHAN_STAT_PKTCMPL) {
1308 if (pcl.pcl_status & DMA_CHAN_STAT_SPECIALACK) {
1309 ack = (pcl.pcl_status >> 15) & 0xf;
1310 PRINTD(KERN_INFO, lynx->id, "special ack %d", ack);
1311 ack = (ack == 1 ? ACKX_TIMEOUT : ACKX_SEND_ERROR);
1313 ack = (pcl.pcl_status >> 15) & 0xf;
1316 PRINT(KERN_INFO, lynx->id, "async packet was not completed");
1317 ack = ACKX_SEND_ERROR;
1319 hpsb_packet_sent(host, packet, ack);
1323 if (intmask & PCI_INT_DMA_HLT(CHANNEL_ISO_SEND)) {
1324 PRINTD(KERN_DEBUG, lynx->id, "iso sent");
1325 spin_lock(&lynx->iso_send.queue_lock);
1327 if (list_empty(&lynx->iso_send.pcl_queue)) {
1328 spin_unlock(&lynx->iso_send.queue_lock);
1329 PRINT(KERN_ERR, lynx->id, "iso send dma halted, but no queued packet");
1333 struct hpsb_packet *packet;
1335 get_pcl(lynx, lynx->iso_send.pcl, &pcl);
1337 packet = driver_packet(lynx->iso_send.pcl_queue.next);
1338 list_del_init(&packet->driver_list);
1340 pci_unmap_single(lynx->dev, lynx->iso_send.header_dma,
1341 packet->header_size, PCI_DMA_TODEVICE);
1342 if (packet->data_size) {
1343 pci_unmap_single(lynx->dev, lynx->iso_send.data_dma,
1344 packet->data_size, PCI_DMA_TODEVICE);
1347 if (!list_empty(&lynx->iso_send.queue)) {
1348 send_next(lynx, hpsb_iso);
1351 spin_unlock(&lynx->iso_send.queue_lock);
1353 if (pcl.pcl_status & DMA_CHAN_STAT_PKTCMPL) {
1354 if (pcl.pcl_status & DMA_CHAN_STAT_SPECIALACK) {
1355 ack = (pcl.pcl_status >> 15) & 0xf;
1356 PRINTD(KERN_INFO, lynx->id, "special ack %d", ack);
1357 ack = (ack == 1 ? ACKX_TIMEOUT : ACKX_SEND_ERROR);
1359 ack = (pcl.pcl_status >> 15) & 0xf;
1362 PRINT(KERN_INFO, lynx->id, "iso send packet was not completed");
1363 ack = ACKX_SEND_ERROR;
1366 hpsb_packet_sent(host, packet, ack); //FIXME: maybe we should just use ACK_COMPLETE and ACKX_SEND_ERROR
1370 if (intmask & PCI_INT_DMA_HLT(CHANNEL_ASYNC_RCV)) {
1371 /* general receive DMA completed */
1372 int stat = reg_read(lynx, DMA_CHAN_STAT(CHANNEL_ASYNC_RCV));
1374 PRINTD(KERN_DEBUG, lynx->id, "received packet size %d",
1377 if (stat & DMA_CHAN_STAT_SELFID) {
1378 lynx->selfid_size = stat & 0x1fff;
1379 handle_selfid(lynx, host);
1381 quadlet_t *q_data = lynx->rcv_page;
1382 if ((*q_data >> 4 & 0xf) == TCODE_READQ_RESPONSE
1383 || (*q_data >> 4 & 0xf) == TCODE_WRITEQ) {
1384 cpu_to_be32s(q_data + 3);
1386 hpsb_packet_received(host, q_data, stat & 0x1fff, 0);
1389 run_pcl(lynx, lynx->rcv_pcl_start, CHANNEL_ASYNC_RCV);
1396 static void iso_rcv_bh(struct ti_lynx *lynx)
1400 unsigned long flags;
1402 spin_lock_irqsave(&lynx->iso_rcv.lock, flags);
1404 while (lynx->iso_rcv.used) {
1405 idx = lynx->iso_rcv.last;
1406 spin_unlock_irqrestore(&lynx->iso_rcv.lock, flags);
1408 data = lynx->iso_rcv.page[idx / ISORCV_PER_PAGE]
1409 + (idx % ISORCV_PER_PAGE) * MAX_ISORCV_SIZE;
1411 if ((*data >> 16) + 4 != (lynx->iso_rcv.stat[idx] & 0x1fff)) {
1412 PRINT(KERN_ERR, lynx->id,
1413 "iso length mismatch 0x%08x/0x%08x", *data,
1414 lynx->iso_rcv.stat[idx]);
1417 if (lynx->iso_rcv.stat[idx]
1418 & (DMA_CHAN_STAT_PCIERR | DMA_CHAN_STAT_PKTERR)) {
1419 PRINT(KERN_INFO, lynx->id,
1420 "iso receive error on %d to 0x%p", idx, data);
1422 hpsb_packet_received(lynx->host, data,
1423 lynx->iso_rcv.stat[idx] & 0x1fff,
1427 spin_lock_irqsave(&lynx->iso_rcv.lock, flags);
1428 lynx->iso_rcv.last = (idx + 1) % NUM_ISORCV_PCL;
1429 lynx->iso_rcv.used--;
1432 if (lynx->iso_rcv.chan_count) {
1433 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ISO_RCV),
1434 DMA_WORD1_CMP_ENABLE_MASTER);
1436 spin_unlock_irqrestore(&lynx->iso_rcv.lock, flags);
1440 static void remove_card(struct pci_dev *dev)
1442 struct ti_lynx *lynx;
1443 struct device *lynx_dev;
1446 lynx = pci_get_drvdata(dev);
1448 pci_set_drvdata(dev, NULL);
1450 lynx_dev = get_device(&lynx->host->device);
1452 switch (lynx->state) {
1454 reg_write(lynx, PCI_INT_ENABLE, 0);
1455 hpsb_remove_host(lynx->host);
1457 reg_write(lynx, PCI_INT_ENABLE, 0);
1458 free_irq(lynx->dev->irq, lynx);
1460 /* Disable IRM Contender and LCtrl */
1461 if (lynx->phyic.reg_1394a)
1462 set_phy_reg(lynx, 4, ~0xc0 & get_phy_reg(lynx, 4));
1464 /* Let all other nodes know to ignore us */
1465 lynx_devctl(lynx->host, RESET_BUS, LONG_RESET_NO_FORCE_ROOT);
1467 case have_iomappings:
1468 reg_set_bits(lynx, MISC_CONTROL, MISC_CONTROL_SWRESET);
1469 /* Fix buggy cards with autoboot pin not tied low: */
1470 reg_write(lynx, DMA0_CHAN_CTRL, 0);
1471 iounmap(lynx->registers);
1472 iounmap(lynx->local_rom);
1473 iounmap(lynx->local_ram);
1474 iounmap(lynx->aux_port);
1475 case have_1394_buffers:
1476 for (i = 0; i < ISORCV_PAGES; i++) {
1477 if (lynx->iso_rcv.page[i]) {
1478 pci_free_consistent(lynx->dev, PAGE_SIZE,
1479 lynx->iso_rcv.page[i],
1480 lynx->iso_rcv.page_dma[i]);
1483 pci_free_consistent(lynx->dev, PAGE_SIZE, lynx->rcv_page,
1484 lynx->rcv_page_dma);
1486 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1487 pci_free_consistent(lynx->dev, 65536, lynx->mem_dma_buffer,
1488 lynx->mem_dma_buffer_dma);
1491 #ifndef CONFIG_IEEE1394_PCILYNX_LOCALRAM
1492 pci_free_consistent(lynx->dev, LOCALRAM_SIZE, lynx->pcl_mem,
1496 /* do nothing - already freed */
1500 tasklet_kill(&lynx->iso_rcv.tq);
1503 put_device(lynx_dev);
1507 static int __devinit add_card(struct pci_dev *dev,
1508 const struct pci_device_id *devid_is_unused)
1510 #define FAIL(fmt, args...) do { \
1511 PRINT_G(KERN_ERR, fmt , ## args); \
1517 struct hpsb_host *host;
1518 struct ti_lynx *lynx; /* shortcut to currently handled device */
1524 /* needed for i2c communication with serial eeprom */
1525 struct i2c_adapter i2c_adapter;
1526 struct i2c_algo_bit_data i2c_adapter_data;
1530 if (pci_set_dma_mask(dev, 0xffffffff))
1531 FAIL("DMA address limits not supported for PCILynx hardware");
1532 if (pci_enable_device(dev))
1533 FAIL("failed to enable PCILynx hardware");
1534 pci_set_master(dev);
1538 host = hpsb_alloc_host(&lynx_driver, sizeof(struct ti_lynx), &dev->dev);
1539 if (!host) FAIL("failed to allocate control structure memory");
1541 lynx = host->hostdata;
1542 lynx->id = card_id++;
1544 lynx->state = clear;
1547 pci_set_drvdata(dev, lynx);
1549 lynx->lock = SPIN_LOCK_UNLOCKED;
1550 lynx->phy_reg_lock = SPIN_LOCK_UNLOCKED;
1552 #ifndef CONFIG_IEEE1394_PCILYNX_LOCALRAM
1553 lynx->pcl_mem = pci_alloc_consistent(dev, LOCALRAM_SIZE,
1554 &lynx->pcl_mem_dma);
1556 if (lynx->pcl_mem != NULL) {
1557 lynx->state = have_pcl_mem;
1558 PRINT(KERN_INFO, lynx->id,
1559 "allocated PCL memory %d Bytes @ 0x%p", LOCALRAM_SIZE,
1562 FAIL("failed to allocate PCL memory area");
1566 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1567 lynx->mem_dma_buffer = pci_alloc_consistent(dev, 65536,
1568 &lynx->mem_dma_buffer_dma);
1569 if (lynx->mem_dma_buffer == NULL) {
1570 FAIL("failed to allocate DMA buffer for aux");
1572 lynx->state = have_aux_buf;
1575 lynx->rcv_page = pci_alloc_consistent(dev, PAGE_SIZE,
1576 &lynx->rcv_page_dma);
1577 if (lynx->rcv_page == NULL) {
1578 FAIL("failed to allocate receive buffer");
1580 lynx->state = have_1394_buffers;
1582 for (i = 0; i < ISORCV_PAGES; i++) {
1583 lynx->iso_rcv.page[i] =
1584 pci_alloc_consistent(dev, PAGE_SIZE,
1585 &lynx->iso_rcv.page_dma[i]);
1586 if (lynx->iso_rcv.page[i] == NULL) {
1587 FAIL("failed to allocate iso receive buffers");
1591 lynx->registers = ioremap_nocache(pci_resource_start(dev,0),
1592 PCILYNX_MAX_REGISTER);
1593 lynx->local_ram = ioremap(pci_resource_start(dev,1), PCILYNX_MAX_MEMORY);
1594 lynx->aux_port = ioremap(pci_resource_start(dev,2), PCILYNX_MAX_MEMORY);
1595 lynx->local_rom = ioremap(pci_resource_start(dev,PCI_ROM_RESOURCE),
1596 PCILYNX_MAX_MEMORY);
1597 lynx->state = have_iomappings;
1599 if (lynx->registers == NULL) {
1600 FAIL("failed to remap registers - card not accessible");
1603 #ifdef CONFIG_IEEE1394_PCILYNX_LOCALRAM
1604 if (lynx->local_ram == NULL) {
1605 FAIL("failed to remap local RAM which is required for "
1610 reg_set_bits(lynx, MISC_CONTROL, MISC_CONTROL_SWRESET);
1611 /* Fix buggy cards with autoboot pin not tied low: */
1612 reg_write(lynx, DMA0_CHAN_CTRL, 0);
1615 sprintf (irq_buf, "%d", dev->irq);
1617 sprintf (irq_buf, "%s", __irq_itoa(dev->irq));
1620 if (!request_irq(dev->irq, lynx_irq_handler, SA_SHIRQ,
1621 PCILYNX_DRIVER_NAME, lynx)) {
1622 PRINT(KERN_INFO, lynx->id, "allocated interrupt %s", irq_buf);
1623 lynx->state = have_intr;
1625 FAIL("failed to allocate shared interrupt %s", irq_buf);
1628 /* alloc_pcl return values are not checked, it is expected that the
1629 * provided PCL space is sufficient for the initial allocations */
1630 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1631 if (lynx->aux_port != NULL) {
1632 lynx->dmem_pcl = alloc_pcl(lynx);
1633 aux_setup_pcls(lynx);
1634 sema_init(&lynx->mem_dma_mutex, 1);
1637 lynx->rcv_pcl = alloc_pcl(lynx);
1638 lynx->rcv_pcl_start = alloc_pcl(lynx);
1639 lynx->async.pcl = alloc_pcl(lynx);
1640 lynx->async.pcl_start = alloc_pcl(lynx);
1641 lynx->iso_send.pcl = alloc_pcl(lynx);
1642 lynx->iso_send.pcl_start = alloc_pcl(lynx);
1644 for (i = 0; i < NUM_ISORCV_PCL; i++) {
1645 lynx->iso_rcv.pcl[i] = alloc_pcl(lynx);
1647 lynx->iso_rcv.pcl_start = alloc_pcl(lynx);
1649 /* all allocations successful - simple init stuff follows */
1651 reg_write(lynx, PCI_INT_ENABLE, PCI_INT_DMA_ALL);
1653 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1654 reg_set_bits(lynx, PCI_INT_ENABLE, PCI_INT_AUX_INT);
1655 init_waitqueue_head(&lynx->mem_dma_intr_wait);
1656 init_waitqueue_head(&lynx->aux_intr_wait);
1659 tasklet_init(&lynx->iso_rcv.tq, (void (*)(unsigned long))iso_rcv_bh,
1660 (unsigned long)lynx);
1662 lynx->iso_rcv.lock = SPIN_LOCK_UNLOCKED;
1664 lynx->async.queue_lock = SPIN_LOCK_UNLOCKED;
1665 lynx->async.channel = CHANNEL_ASYNC_SEND;
1666 lynx->iso_send.queue_lock = SPIN_LOCK_UNLOCKED;
1667 lynx->iso_send.channel = CHANNEL_ISO_SEND;
1669 PRINT(KERN_INFO, lynx->id, "remapped memory spaces reg 0x%p, rom 0x%p, "
1670 "ram 0x%p, aux 0x%p", lynx->registers, lynx->local_rom,
1671 lynx->local_ram, lynx->aux_port);
1673 /* now, looking for PHY register set */
1674 if ((get_phy_reg(lynx, 2) & 0xe0) == 0xe0) {
1675 lynx->phyic.reg_1394a = 1;
1676 PRINT(KERN_INFO, lynx->id,
1677 "found 1394a conform PHY (using extended register set)");
1678 lynx->phyic.vendor = get_phy_vendorid(lynx);
1679 lynx->phyic.product = get_phy_productid(lynx);
1681 lynx->phyic.reg_1394a = 0;
1682 PRINT(KERN_INFO, lynx->id, "found old 1394 PHY");
1685 lynx->selfid_size = -1;
1686 lynx->phy_reg0 = -1;
1688 INIT_LIST_HEAD(&lynx->async.queue);
1689 INIT_LIST_HEAD(&lynx->async.pcl_queue);
1690 INIT_LIST_HEAD(&lynx->iso_send.queue);
1691 INIT_LIST_HEAD(&lynx->iso_send.pcl_queue);
1693 pcl.next = pcl_bus(lynx, lynx->rcv_pcl);
1694 put_pcl(lynx, lynx->rcv_pcl_start, &pcl);
1696 pcl.next = PCL_NEXT_INVALID;
1697 pcl.async_error_next = PCL_NEXT_INVALID;
1699 pcl.buffer[0].control = PCL_CMD_RCV | 16;
1701 pcl.buffer[0].control |= PCL_BIGENDIAN;
1703 pcl.buffer[1].control = PCL_LAST_BUFF | 4080;
1705 pcl.buffer[0].pointer = lynx->rcv_page_dma;
1706 pcl.buffer[1].pointer = lynx->rcv_page_dma + 16;
1707 put_pcl(lynx, lynx->rcv_pcl, &pcl);
1709 pcl.next = pcl_bus(lynx, lynx->async.pcl);
1710 pcl.async_error_next = pcl_bus(lynx, lynx->async.pcl);
1711 put_pcl(lynx, lynx->async.pcl_start, &pcl);
1713 pcl.next = pcl_bus(lynx, lynx->iso_send.pcl);
1714 pcl.async_error_next = PCL_NEXT_INVALID;
1715 put_pcl(lynx, lynx->iso_send.pcl_start, &pcl);
1717 pcl.next = PCL_NEXT_INVALID;
1718 pcl.async_error_next = PCL_NEXT_INVALID;
1719 pcl.buffer[0].control = PCL_CMD_RCV | 4;
1720 #ifndef __BIG_ENDIAN
1721 pcl.buffer[0].control |= PCL_BIGENDIAN;
1723 pcl.buffer[1].control = PCL_LAST_BUFF | 2044;
1725 for (i = 0; i < NUM_ISORCV_PCL; i++) {
1726 int page = i / ISORCV_PER_PAGE;
1727 int sec = i % ISORCV_PER_PAGE;
1729 pcl.buffer[0].pointer = lynx->iso_rcv.page_dma[page]
1730 + sec * MAX_ISORCV_SIZE;
1731 pcl.buffer[1].pointer = pcl.buffer[0].pointer + 4;
1732 put_pcl(lynx, lynx->iso_rcv.pcl[i], &pcl);
1736 for (i = 0; i < NUM_ISORCV_PCL; i++) {
1737 pcli[i] = pcl_bus(lynx, lynx->iso_rcv.pcl[i]);
1739 put_pcl(lynx, lynx->iso_rcv.pcl_start, &pcl);
1741 /* FIFO sizes from left to right: ITF=48 ATF=48 GRF=160 */
1742 reg_write(lynx, FIFO_SIZES, 0x003030a0);
1743 /* 20 byte threshold before triggering PCI transfer */
1744 reg_write(lynx, DMA_GLOBAL_REGISTER, 0x2<<24);
1745 /* threshold on both send FIFOs before transmitting:
1746 FIFO size - cache line size - 1 */
1747 i = reg_read(lynx, PCI_LATENCY_CACHELINE) & 0xff;
1749 reg_write(lynx, FIFO_XMIT_THRESHOLD, (i << 8) | i);
1751 reg_set_bits(lynx, PCI_INT_ENABLE, PCI_INT_1394);
1753 reg_write(lynx, LINK_INT_ENABLE, LINK_INT_PHY_TIMEOUT
1754 | LINK_INT_PHY_REG_RCVD | LINK_INT_PHY_BUSRESET
1755 | LINK_INT_ISO_STUCK | LINK_INT_ASYNC_STUCK
1756 | LINK_INT_SENT_REJECT | LINK_INT_TX_INVALID_TC
1757 | LINK_INT_GRF_OVERFLOW | LINK_INT_ITF_UNDERFLOW
1758 | LINK_INT_ATF_UNDERFLOW);
1760 reg_write(lynx, DMA_WORD0_CMP_VALUE(CHANNEL_ASYNC_RCV), 0);
1761 reg_write(lynx, DMA_WORD0_CMP_ENABLE(CHANNEL_ASYNC_RCV), 0xa<<4);
1762 reg_write(lynx, DMA_WORD1_CMP_VALUE(CHANNEL_ASYNC_RCV), 0);
1763 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ASYNC_RCV),
1764 DMA_WORD1_CMP_MATCH_LOCAL_NODE | DMA_WORD1_CMP_MATCH_BROADCAST
1765 | DMA_WORD1_CMP_MATCH_EXACT | DMA_WORD1_CMP_MATCH_BUS_BCAST
1766 | DMA_WORD1_CMP_ENABLE_SELF_ID | DMA_WORD1_CMP_ENABLE_MASTER);
1768 run_pcl(lynx, lynx->rcv_pcl_start, CHANNEL_ASYNC_RCV);
1770 reg_write(lynx, DMA_WORD0_CMP_VALUE(CHANNEL_ISO_RCV), 0);
1771 reg_write(lynx, DMA_WORD0_CMP_ENABLE(CHANNEL_ISO_RCV), 0x9<<4);
1772 reg_write(lynx, DMA_WORD1_CMP_VALUE(CHANNEL_ISO_RCV), 0);
1773 reg_write(lynx, DMA_WORD1_CMP_ENABLE(CHANNEL_ISO_RCV), 0);
1775 run_sub_pcl(lynx, lynx->iso_rcv.pcl_start, 0, CHANNEL_ISO_RCV);
1777 reg_write(lynx, LINK_CONTROL, LINK_CONTROL_RCV_CMP_VALID
1778 | LINK_CONTROL_TX_ISO_EN | LINK_CONTROL_RX_ISO_EN
1779 | LINK_CONTROL_TX_ASYNC_EN | LINK_CONTROL_RX_ASYNC_EN
1780 | LINK_CONTROL_RESET_TX | LINK_CONTROL_RESET_RX);
1782 if (!lynx->phyic.reg_1394a) {
1783 /* attempt to enable contender bit -FIXME- would this work
1785 reg_set_bits(lynx, GPIO_CTRL_A, 0x1);
1786 reg_write(lynx, GPIO_DATA_BASE + 0x3c, 0x1);
1788 /* set the contender and LCtrl bit in the extended PHY register
1789 * set. (Should check that bis 0,1,2 (=0xE0) is set
1792 i = get_phy_reg(lynx, 4);
1793 if (i != -1) set_phy_reg(lynx, 4, i | 0xc0);
1799 i2c_adapter = bit_ops;
1800 i2c_adapter_data = bit_data;
1801 i2c_adapter.algo_data = &i2c_adapter_data;
1802 i2c_adapter_data.data = lynx;
1804 PRINTD(KERN_DEBUG, lynx->id,"original eeprom control: %d",
1805 reg_read(lynx, SERIAL_EEPROM_CONTROL));
1807 /* reset hardware to sane state */
1808 lynx->i2c_driven_state = 0x00000070;
1809 reg_write(lynx, SERIAL_EEPROM_CONTROL, lynx->i2c_driven_state);
1811 if (i2c_bit_add_bus(&i2c_adapter) < 0)
1814 FAIL("unable to register i2c");
1819 unsigned char i2c_cmd = 0x10;
1820 struct i2c_msg msg[2] = { { 0x50, 0, 1, &i2c_cmd },
1821 { 0x50, I2C_M_RD, 20, (unsigned char*) lynx->bus_info_block }
1825 #ifdef CONFIG_IEEE1394_VERBOSEDEBUG
1826 union i2c_smbus_data data;
1828 if (i2c_smbus_xfer(&i2c_adapter, 80, 0, I2C_SMBUS_WRITE, 0, I2C_SMBUS_BYTE,NULL))
1829 PRINT(KERN_ERR, lynx->id,"eeprom read start has failed");
1833 for (addr=0x00; addr < 0x100; addr++) {
1834 if (i2c_smbus_xfer(&i2c_adapter, 80, 0, I2C_SMBUS_READ, 0, I2C_SMBUS_BYTE,& data)) {
1835 PRINT(KERN_ERR, lynx->id, "unable to read i2c %x", addr);
1839 PRINT(KERN_DEBUG, lynx->id,"got serial eeprom data at %x: %x",addr, data.byte);
1844 /* we use i2c_transfer, because i2c_smbus_read_block_data does not work properly and we
1845 do it more efficiently in one transaction rather then using several reads */
1846 if (i2c_transfer(&i2c_adapter, msg, 2) < 0) {
1847 PRINT(KERN_ERR, lynx->id, "unable to read bus info block from i2c");
1851 PRINT(KERN_INFO, lynx->id, "got bus info block from serial eeprom");
1852 /* FIXME: probably we shoud rewrite the max_rec, max_ROM(1394a),
1853 * generation(1394a) and link_spd(1394a) field and recalculate
1856 for (i = 0; i < 5 ; i++)
1857 PRINTD(KERN_DEBUG, lynx->id, "Businfo block quadlet %i: %08x",
1858 i, be32_to_cpu(lynx->bus_info_block[i]));
1860 /* info_length, crc_length and 1394 magic number to check, if it is really a bus info block */
1861 if (((be32_to_cpu(lynx->bus_info_block[0]) & 0xffff0000) == 0x04040000) &&
1862 (lynx->bus_info_block[1] == __constant_cpu_to_be32(0x31333934)))
1864 PRINT(KERN_DEBUG, lynx->id, "read a valid bus info block from");
1867 FAIL("read something from serial eeprom, but it does not seem to be a valid bus info block");
1872 i2c_bit_del_bus(&i2c_adapter);
1876 host->csr.guid_hi = be32_to_cpu(lynx->bus_info_block[3]);
1877 host->csr.guid_lo = be32_to_cpu(lynx->bus_info_block[4]);
1878 host->csr.cyc_clk_acc = (be32_to_cpu(lynx->bus_info_block[2]) >> 16) & 0xff;
1879 host->csr.max_rec = (be32_to_cpu(lynx->bus_info_block[2]) >> 12) & 0xf;
1880 if (!lynx->phyic.reg_1394a)
1881 host->csr.lnk_spd = (get_phy_reg(lynx, 2) & 0xc0) >> 6;
1883 host->csr.lnk_spd = be32_to_cpu(lynx->bus_info_block[2]) & 0x7;
1885 if (hpsb_add_host(host)) {
1887 FAIL("Failed to register host with highlevel");
1890 lynx->state = is_host;
1897 static struct pci_device_id pci_table[] = {
1899 .vendor = PCI_VENDOR_ID_TI,
1900 .device = PCI_DEVICE_ID_TI_PCILYNX,
1901 .subvendor = PCI_ANY_ID,
1902 .subdevice = PCI_ANY_ID,
1904 { } /* Terminating entry */
1907 static struct pci_driver lynx_pci_driver = {
1908 .name = PCILYNX_DRIVER_NAME,
1909 .id_table = pci_table,
1911 .remove = remove_card,
1914 static struct hpsb_host_driver lynx_driver = {
1915 .owner = THIS_MODULE,
1916 .name = PCILYNX_DRIVER_NAME,
1917 .set_hw_config_rom = NULL,
1918 .transmit_packet = lynx_transmit,
1919 .devctl = lynx_devctl,
1923 MODULE_AUTHOR("Andreas E. Bombe <andreas.bombe@munich.netsurf.de>");
1924 MODULE_DESCRIPTION("driver for Texas Instruments PCI Lynx IEEE-1394 controller");
1925 MODULE_LICENSE("GPL");
1926 MODULE_SUPPORTED_DEVICE("pcilynx");
1927 MODULE_DEVICE_TABLE(pci, pci_table);
1929 static int __init pcilynx_init(void)
1933 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1934 if (register_chrdev(PCILYNX_MAJOR, PCILYNX_DRIVER_NAME, &aux_ops)) {
1935 PRINT_G(KERN_ERR, "allocation of char major number %d failed",
1941 ret = pci_module_init(&lynx_pci_driver);
1943 PRINT_G(KERN_ERR, "PCI module init failed");
1950 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1951 unregister_chrdev(PCILYNX_MAJOR, PCILYNX_DRIVER_NAME);
1957 static void __exit pcilynx_cleanup(void)
1959 pci_unregister_driver(&lynx_pci_driver);
1961 #ifdef CONFIG_IEEE1394_PCILYNX_PORTS
1962 unregister_chrdev(PCILYNX_MAJOR, PCILYNX_DRIVER_NAME);
1967 module_init(pcilynx_init);
1968 module_exit(pcilynx_cleanup);