Linux-2.6.12-rc2
[linux-2.6/linux-acpi-2.6/ibm-acpi-2.6.git] / drivers / net / irda / vlsi_ir.c
blob35fad8171a01beb66b157ee842c4736ea9e612c0
1 /*********************************************************************
3 * vlsi_ir.c: VLSI82C147 PCI IrDA controller driver for Linux
5 * Copyright (c) 2001-2003 Martin Diehl
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 2 of
10 * the License, or (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
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
20 * MA 02111-1307 USA
22 ********************************************************************/
24 #include <linux/config.h>
25 #include <linux/module.h>
27 #define DRIVER_NAME "vlsi_ir"
28 #define DRIVER_VERSION "v0.5"
29 #define DRIVER_DESCRIPTION "IrDA SIR/MIR/FIR driver for VLSI 82C147"
30 #define DRIVER_AUTHOR "Martin Diehl <info@mdiehl.de>"
32 MODULE_DESCRIPTION(DRIVER_DESCRIPTION);
33 MODULE_AUTHOR(DRIVER_AUTHOR);
34 MODULE_LICENSE("GPL");
36 /********************************************************/
38 #include <linux/kernel.h>
39 #include <linux/init.h>
40 #include <linux/pci.h>
41 #include <linux/slab.h>
42 #include <linux/netdevice.h>
43 #include <linux/skbuff.h>
44 #include <linux/delay.h>
45 #include <linux/time.h>
46 #include <linux/proc_fs.h>
47 #include <linux/seq_file.h>
48 #include <linux/smp_lock.h>
49 #include <asm/uaccess.h>
50 #include <asm/byteorder.h>
52 #include <net/irda/irda.h>
53 #include <net/irda/irda_device.h>
54 #include <net/irda/wrapper.h>
55 #include <net/irda/crc.h>
57 #include "vlsi_ir.h"
59 /********************************************************/
61 static /* const */ char drivername[] = DRIVER_NAME;
63 static struct pci_device_id vlsi_irda_table [] = {
65 .class = PCI_CLASS_WIRELESS_IRDA << 8,
66 .class_mask = PCI_CLASS_SUBCLASS_MASK << 8,
67 .vendor = PCI_VENDOR_ID_VLSI,
68 .device = PCI_DEVICE_ID_VLSI_82C147,
69 .subvendor = PCI_ANY_ID,
70 .subdevice = PCI_ANY_ID,
72 { /* all zeroes */ }
75 MODULE_DEVICE_TABLE(pci, vlsi_irda_table);
77 /********************************************************/
79 /* clksrc: which clock source to be used
80 * 0: auto - try PLL, fallback to 40MHz XCLK
81 * 1: on-chip 48MHz PLL
82 * 2: external 48MHz XCLK
83 * 3: external 40MHz XCLK (HP OB-800)
86 static int clksrc = 0; /* default is 0(auto) */
87 module_param(clksrc, int, 0);
88 MODULE_PARM_DESC(clksrc, "clock input source selection");
90 /* ringsize: size of the tx and rx descriptor rings
91 * independent for tx and rx
92 * specify as ringsize=tx[,rx]
93 * allowed values: 4, 8, 16, 32, 64
94 * Due to the IrDA 1.x max. allowed window size=7,
95 * there should be no gain when using rings larger than 8
98 static int ringsize[] = {8,8}; /* default is tx=8 / rx=8 */
99 module_param_array(ringsize, int, NULL, 0);
100 MODULE_PARM_DESC(ringsize, "TX, RX ring descriptor size");
102 /* sirpulse: tuning of the SIR pulse width within IrPHY 1.3 limits
103 * 0: very short, 1.5us (exception: 6us at 2.4 kbaud)
104 * 1: nominal 3/16 bittime width
105 * note: IrDA compliant peer devices should be happy regardless
106 * which one is used. Primary goal is to save some power
107 * on the sender's side - at 9.6kbaud for example the short
108 * pulse width saves more than 90% of the transmitted IR power.
111 static int sirpulse = 1; /* default is 3/16 bittime */
112 module_param(sirpulse, int, 0);
113 MODULE_PARM_DESC(sirpulse, "SIR pulse width tuning");
115 /* qos_mtt_bits: encoded min-turn-time value we require the peer device
116 * to use before transmitting to us. "Type 1" (per-station)
117 * bitfield according to IrLAP definition (section 6.6.8)
118 * Don't know which transceiver is used by my OB800 - the
119 * pretty common HP HDLS-1100 requires 1 msec - so lets use this.
122 static int qos_mtt_bits = 0x07; /* default is 1 ms or more */
123 module_param(qos_mtt_bits, int, 0);
124 MODULE_PARM_DESC(qos_mtt_bits, "IrLAP bitfield representing min-turn-time");
126 /********************************************************/
128 static void vlsi_reg_debug(unsigned iobase, const char *s)
130 int i;
132 printk(KERN_DEBUG "%s: ", s);
133 for (i = 0; i < 0x20; i++)
134 printk("%02x", (unsigned)inb((iobase+i)));
135 printk("\n");
138 static void vlsi_ring_debug(struct vlsi_ring *r)
140 struct ring_descr *rd;
141 unsigned i;
143 printk(KERN_DEBUG "%s - ring %p / size %u / mask 0x%04x / len %u / dir %d / hw %p\n",
144 __FUNCTION__, r, r->size, r->mask, r->len, r->dir, r->rd[0].hw);
145 printk(KERN_DEBUG "%s - head = %d / tail = %d\n", __FUNCTION__,
146 atomic_read(&r->head) & r->mask, atomic_read(&r->tail) & r->mask);
147 for (i = 0; i < r->size; i++) {
148 rd = &r->rd[i];
149 printk(KERN_DEBUG "%s - ring descr %u: ", __FUNCTION__, i);
150 printk("skb=%p data=%p hw=%p\n", rd->skb, rd->buf, rd->hw);
151 printk(KERN_DEBUG "%s - hw: status=%02x count=%u addr=0x%08x\n",
152 __FUNCTION__, (unsigned) rd_get_status(rd),
153 (unsigned) rd_get_count(rd), (unsigned) rd_get_addr(rd));
157 /********************************************************/
159 /* needed regardless of CONFIG_PROC_FS */
160 static struct proc_dir_entry *vlsi_proc_root = NULL;
162 #ifdef CONFIG_PROC_FS
164 static void vlsi_proc_pdev(struct seq_file *seq, struct pci_dev *pdev)
166 unsigned iobase = pci_resource_start(pdev, 0);
167 unsigned i;
169 seq_printf(seq, "\n%s (vid/did: %04x/%04x)\n",
170 PCIDEV_NAME(pdev), (int)pdev->vendor, (int)pdev->device);
171 seq_printf(seq, "pci-power-state: %u\n", (unsigned) pdev->current_state);
172 seq_printf(seq, "resources: irq=%u / io=0x%04x / dma_mask=0x%016Lx\n",
173 pdev->irq, (unsigned)pci_resource_start(pdev, 0), (unsigned long long)pdev->dma_mask);
174 seq_printf(seq, "hw registers: ");
175 for (i = 0; i < 0x20; i++)
176 seq_printf(seq, "%02x", (unsigned)inb((iobase+i)));
177 seq_printf(seq, "\n");
180 static void vlsi_proc_ndev(struct seq_file *seq, struct net_device *ndev)
182 vlsi_irda_dev_t *idev = ndev->priv;
183 u8 byte;
184 u16 word;
185 unsigned delta1, delta2;
186 struct timeval now;
187 unsigned iobase = ndev->base_addr;
189 seq_printf(seq, "\n%s link state: %s / %s / %s / %s\n", ndev->name,
190 netif_device_present(ndev) ? "attached" : "detached",
191 netif_running(ndev) ? "running" : "not running",
192 netif_carrier_ok(ndev) ? "carrier ok" : "no carrier",
193 netif_queue_stopped(ndev) ? "queue stopped" : "queue running");
195 if (!netif_running(ndev))
196 return;
198 seq_printf(seq, "\nhw-state:\n");
199 pci_read_config_byte(idev->pdev, VLSI_PCI_IRMISC, &byte);
200 seq_printf(seq, "IRMISC:%s%s%s uart%s",
201 (byte&IRMISC_IRRAIL) ? " irrail" : "",
202 (byte&IRMISC_IRPD) ? " irpd" : "",
203 (byte&IRMISC_UARTTST) ? " uarttest" : "",
204 (byte&IRMISC_UARTEN) ? "@" : " disabled\n");
205 if (byte&IRMISC_UARTEN) {
206 seq_printf(seq, "0x%s\n",
207 (byte&2) ? ((byte&1) ? "3e8" : "2e8")
208 : ((byte&1) ? "3f8" : "2f8"));
210 pci_read_config_byte(idev->pdev, VLSI_PCI_CLKCTL, &byte);
211 seq_printf(seq, "CLKCTL: PLL %s%s%s / clock %s / wakeup %s\n",
212 (byte&CLKCTL_PD_INV) ? "powered" : "down",
213 (byte&CLKCTL_LOCK) ? " locked" : "",
214 (byte&CLKCTL_EXTCLK) ? ((byte&CLKCTL_XCKSEL)?" / 40 MHz XCLK":" / 48 MHz XCLK") : "",
215 (byte&CLKCTL_CLKSTP) ? "stopped" : "running",
216 (byte&CLKCTL_WAKE) ? "enabled" : "disabled");
217 pci_read_config_byte(idev->pdev, VLSI_PCI_MSTRPAGE, &byte);
218 seq_printf(seq, "MSTRPAGE: 0x%02x\n", (unsigned)byte);
220 byte = inb(iobase+VLSI_PIO_IRINTR);
221 seq_printf(seq, "IRINTR:%s%s%s%s%s%s%s%s\n",
222 (byte&IRINTR_ACTEN) ? " ACTEN" : "",
223 (byte&IRINTR_RPKTEN) ? " RPKTEN" : "",
224 (byte&IRINTR_TPKTEN) ? " TPKTEN" : "",
225 (byte&IRINTR_OE_EN) ? " OE_EN" : "",
226 (byte&IRINTR_ACTIVITY) ? " ACTIVITY" : "",
227 (byte&IRINTR_RPKTINT) ? " RPKTINT" : "",
228 (byte&IRINTR_TPKTINT) ? " TPKTINT" : "",
229 (byte&IRINTR_OE_INT) ? " OE_INT" : "");
230 word = inw(iobase+VLSI_PIO_RINGPTR);
231 seq_printf(seq, "RINGPTR: rx=%u / tx=%u\n", RINGPTR_GET_RX(word), RINGPTR_GET_TX(word));
232 word = inw(iobase+VLSI_PIO_RINGBASE);
233 seq_printf(seq, "RINGBASE: busmap=0x%08x\n",
234 ((unsigned)word << 10)|(MSTRPAGE_VALUE<<24));
235 word = inw(iobase+VLSI_PIO_RINGSIZE);
236 seq_printf(seq, "RINGSIZE: rx=%u / tx=%u\n", RINGSIZE_TO_RXSIZE(word),
237 RINGSIZE_TO_TXSIZE(word));
239 word = inw(iobase+VLSI_PIO_IRCFG);
240 seq_printf(seq, "IRCFG:%s%s%s%s%s%s%s%s%s%s%s%s%s\n",
241 (word&IRCFG_LOOP) ? " LOOP" : "",
242 (word&IRCFG_ENTX) ? " ENTX" : "",
243 (word&IRCFG_ENRX) ? " ENRX" : "",
244 (word&IRCFG_MSTR) ? " MSTR" : "",
245 (word&IRCFG_RXANY) ? " RXANY" : "",
246 (word&IRCFG_CRC16) ? " CRC16" : "",
247 (word&IRCFG_FIR) ? " FIR" : "",
248 (word&IRCFG_MIR) ? " MIR" : "",
249 (word&IRCFG_SIR) ? " SIR" : "",
250 (word&IRCFG_SIRFILT) ? " SIRFILT" : "",
251 (word&IRCFG_SIRTEST) ? " SIRTEST" : "",
252 (word&IRCFG_TXPOL) ? " TXPOL" : "",
253 (word&IRCFG_RXPOL) ? " RXPOL" : "");
254 word = inw(iobase+VLSI_PIO_IRENABLE);
255 seq_printf(seq, "IRENABLE:%s%s%s%s%s%s%s%s\n",
256 (word&IRENABLE_PHYANDCLOCK) ? " PHYANDCLOCK" : "",
257 (word&IRENABLE_CFGER) ? " CFGERR" : "",
258 (word&IRENABLE_FIR_ON) ? " FIR_ON" : "",
259 (word&IRENABLE_MIR_ON) ? " MIR_ON" : "",
260 (word&IRENABLE_SIR_ON) ? " SIR_ON" : "",
261 (word&IRENABLE_ENTXST) ? " ENTXST" : "",
262 (word&IRENABLE_ENRXST) ? " ENRXST" : "",
263 (word&IRENABLE_CRC16_ON) ? " CRC16_ON" : "");
264 word = inw(iobase+VLSI_PIO_PHYCTL);
265 seq_printf(seq, "PHYCTL: baud-divisor=%u / pulsewidth=%u / preamble=%u\n",
266 (unsigned)PHYCTL_TO_BAUD(word),
267 (unsigned)PHYCTL_TO_PLSWID(word),
268 (unsigned)PHYCTL_TO_PREAMB(word));
269 word = inw(iobase+VLSI_PIO_NPHYCTL);
270 seq_printf(seq, "NPHYCTL: baud-divisor=%u / pulsewidth=%u / preamble=%u\n",
271 (unsigned)PHYCTL_TO_BAUD(word),
272 (unsigned)PHYCTL_TO_PLSWID(word),
273 (unsigned)PHYCTL_TO_PREAMB(word));
274 word = inw(iobase+VLSI_PIO_MAXPKT);
275 seq_printf(seq, "MAXPKT: max. rx packet size = %u\n", word);
276 word = inw(iobase+VLSI_PIO_RCVBCNT) & RCVBCNT_MASK;
277 seq_printf(seq, "RCVBCNT: rx-fifo filling level = %u\n", word);
279 seq_printf(seq, "\nsw-state:\n");
280 seq_printf(seq, "IrPHY setup: %d baud - %s encoding\n", idev->baud,
281 (idev->mode==IFF_SIR)?"SIR":((idev->mode==IFF_MIR)?"MIR":"FIR"));
282 do_gettimeofday(&now);
283 if (now.tv_usec >= idev->last_rx.tv_usec) {
284 delta2 = now.tv_usec - idev->last_rx.tv_usec;
285 delta1 = 0;
287 else {
288 delta2 = 1000000 + now.tv_usec - idev->last_rx.tv_usec;
289 delta1 = 1;
291 seq_printf(seq, "last rx: %lu.%06u sec\n",
292 now.tv_sec - idev->last_rx.tv_sec - delta1, delta2);
294 seq_printf(seq, "RX: packets=%lu / bytes=%lu / errors=%lu / dropped=%lu",
295 idev->stats.rx_packets, idev->stats.rx_bytes, idev->stats.rx_errors,
296 idev->stats.rx_dropped);
297 seq_printf(seq, " / overrun=%lu / length=%lu / frame=%lu / crc=%lu\n",
298 idev->stats.rx_over_errors, idev->stats.rx_length_errors,
299 idev->stats.rx_frame_errors, idev->stats.rx_crc_errors);
300 seq_printf(seq, "TX: packets=%lu / bytes=%lu / errors=%lu / dropped=%lu / fifo=%lu\n",
301 idev->stats.tx_packets, idev->stats.tx_bytes, idev->stats.tx_errors,
302 idev->stats.tx_dropped, idev->stats.tx_fifo_errors);
306 static void vlsi_proc_ring(struct seq_file *seq, struct vlsi_ring *r)
308 struct ring_descr *rd;
309 unsigned i, j;
310 int h, t;
312 seq_printf(seq, "size %u / mask 0x%04x / len %u / dir %d / hw %p\n",
313 r->size, r->mask, r->len, r->dir, r->rd[0].hw);
314 h = atomic_read(&r->head) & r->mask;
315 t = atomic_read(&r->tail) & r->mask;
316 seq_printf(seq, "head = %d / tail = %d ", h, t);
317 if (h == t)
318 seq_printf(seq, "(empty)\n");
319 else {
320 if (((t+1)&r->mask) == h)
321 seq_printf(seq, "(full)\n");
322 else
323 seq_printf(seq, "(level = %d)\n", ((unsigned)(t-h) & r->mask));
324 rd = &r->rd[h];
325 j = (unsigned) rd_get_count(rd);
326 seq_printf(seq, "current: rd = %d / status = %02x / len = %u\n",
327 h, (unsigned)rd_get_status(rd), j);
328 if (j > 0) {
329 seq_printf(seq, " data:");
330 if (j > 20)
331 j = 20;
332 for (i = 0; i < j; i++)
333 seq_printf(seq, " %02x", (unsigned)((unsigned char *)rd->buf)[i]);
334 seq_printf(seq, "\n");
337 for (i = 0; i < r->size; i++) {
338 rd = &r->rd[i];
339 seq_printf(seq, "> ring descr %u: ", i);
340 seq_printf(seq, "skb=%p data=%p hw=%p\n", rd->skb, rd->buf, rd->hw);
341 seq_printf(seq, " hw: status=%02x count=%u busaddr=0x%08x\n",
342 (unsigned) rd_get_status(rd),
343 (unsigned) rd_get_count(rd), (unsigned) rd_get_addr(rd));
347 static int vlsi_seq_show(struct seq_file *seq, void *v)
349 struct net_device *ndev = seq->private;
350 vlsi_irda_dev_t *idev = ndev->priv;
351 unsigned long flags;
353 seq_printf(seq, "\n%s %s\n\n", DRIVER_NAME, DRIVER_VERSION);
354 seq_printf(seq, "clksrc: %s\n",
355 (clksrc>=2) ? ((clksrc==3)?"40MHz XCLK":"48MHz XCLK")
356 : ((clksrc==1)?"48MHz PLL":"autodetect"));
357 seq_printf(seq, "ringsize: tx=%d / rx=%d\n",
358 ringsize[0], ringsize[1]);
359 seq_printf(seq, "sirpulse: %s\n", (sirpulse)?"3/16 bittime":"short");
360 seq_printf(seq, "qos_mtt_bits: 0x%02x\n", (unsigned)qos_mtt_bits);
362 spin_lock_irqsave(&idev->lock, flags);
363 if (idev->pdev != NULL) {
364 vlsi_proc_pdev(seq, idev->pdev);
366 if (idev->pdev->current_state == 0)
367 vlsi_proc_ndev(seq, ndev);
368 else
369 seq_printf(seq, "\nPCI controller down - resume_ok = %d\n",
370 idev->resume_ok);
371 if (netif_running(ndev) && idev->rx_ring && idev->tx_ring) {
372 seq_printf(seq, "\n--------- RX ring -----------\n\n");
373 vlsi_proc_ring(seq, idev->rx_ring);
374 seq_printf(seq, "\n--------- TX ring -----------\n\n");
375 vlsi_proc_ring(seq, idev->tx_ring);
378 seq_printf(seq, "\n");
379 spin_unlock_irqrestore(&idev->lock, flags);
381 return 0;
384 static int vlsi_seq_open(struct inode *inode, struct file *file)
386 return single_open(file, vlsi_seq_show, PDE(inode)->data);
389 static struct file_operations vlsi_proc_fops = {
390 .owner = THIS_MODULE,
391 .open = vlsi_seq_open,
392 .read = seq_read,
393 .llseek = seq_lseek,
394 .release = single_release,
397 #define VLSI_PROC_FOPS (&vlsi_proc_fops)
399 #else /* CONFIG_PROC_FS */
400 #define VLSI_PROC_FOPS NULL
401 #endif
403 /********************************************************/
405 static struct vlsi_ring *vlsi_alloc_ring(struct pci_dev *pdev, struct ring_descr_hw *hwmap,
406 unsigned size, unsigned len, int dir)
408 struct vlsi_ring *r;
409 struct ring_descr *rd;
410 unsigned i, j;
411 dma_addr_t busaddr;
413 if (!size || ((size-1)&size)!=0) /* must be >0 and power of 2 */
414 return NULL;
416 r = kmalloc(sizeof(*r) + size * sizeof(struct ring_descr), GFP_KERNEL);
417 if (!r)
418 return NULL;
419 memset(r, 0, sizeof(*r));
421 r->pdev = pdev;
422 r->dir = dir;
423 r->len = len;
424 r->rd = (struct ring_descr *)(r+1);
425 r->mask = size - 1;
426 r->size = size;
427 atomic_set(&r->head, 0);
428 atomic_set(&r->tail, 0);
430 for (i = 0; i < size; i++) {
431 rd = r->rd + i;
432 memset(rd, 0, sizeof(*rd));
433 rd->hw = hwmap + i;
434 rd->buf = kmalloc(len, GFP_KERNEL|GFP_DMA);
435 if (rd->buf == NULL
436 || !(busaddr = pci_map_single(pdev, rd->buf, len, dir))) {
437 if (rd->buf) {
438 IRDA_ERROR("%s: failed to create PCI-MAP for %p",
439 __FUNCTION__, rd->buf);
440 kfree(rd->buf);
441 rd->buf = NULL;
443 for (j = 0; j < i; j++) {
444 rd = r->rd + j;
445 busaddr = rd_get_addr(rd);
446 rd_set_addr_status(rd, 0, 0);
447 if (busaddr)
448 pci_unmap_single(pdev, busaddr, len, dir);
449 kfree(rd->buf);
450 rd->buf = NULL;
452 kfree(r);
453 return NULL;
455 rd_set_addr_status(rd, busaddr, 0);
456 /* initially, the dma buffer is owned by the CPU */
457 rd->skb = NULL;
459 return r;
462 static int vlsi_free_ring(struct vlsi_ring *r)
464 struct ring_descr *rd;
465 unsigned i;
466 dma_addr_t busaddr;
468 for (i = 0; i < r->size; i++) {
469 rd = r->rd + i;
470 if (rd->skb)
471 dev_kfree_skb_any(rd->skb);
472 busaddr = rd_get_addr(rd);
473 rd_set_addr_status(rd, 0, 0);
474 if (busaddr)
475 pci_unmap_single(r->pdev, busaddr, r->len, r->dir);
476 if (rd->buf)
477 kfree(rd->buf);
479 kfree(r);
480 return 0;
483 static int vlsi_create_hwif(vlsi_irda_dev_t *idev)
485 char *ringarea;
486 struct ring_descr_hw *hwmap;
488 idev->virtaddr = NULL;
489 idev->busaddr = 0;
491 ringarea = pci_alloc_consistent(idev->pdev, HW_RING_AREA_SIZE, &idev->busaddr);
492 if (!ringarea) {
493 IRDA_ERROR("%s: insufficient memory for descriptor rings\n",
494 __FUNCTION__);
495 goto out;
497 memset(ringarea, 0, HW_RING_AREA_SIZE);
499 hwmap = (struct ring_descr_hw *)ringarea;
500 idev->rx_ring = vlsi_alloc_ring(idev->pdev, hwmap, ringsize[1],
501 XFER_BUF_SIZE, PCI_DMA_FROMDEVICE);
502 if (idev->rx_ring == NULL)
503 goto out_unmap;
505 hwmap += MAX_RING_DESCR;
506 idev->tx_ring = vlsi_alloc_ring(idev->pdev, hwmap, ringsize[0],
507 XFER_BUF_SIZE, PCI_DMA_TODEVICE);
508 if (idev->tx_ring == NULL)
509 goto out_free_rx;
511 idev->virtaddr = ringarea;
512 return 0;
514 out_free_rx:
515 vlsi_free_ring(idev->rx_ring);
516 out_unmap:
517 idev->rx_ring = idev->tx_ring = NULL;
518 pci_free_consistent(idev->pdev, HW_RING_AREA_SIZE, ringarea, idev->busaddr);
519 idev->busaddr = 0;
520 out:
521 return -ENOMEM;
524 static int vlsi_destroy_hwif(vlsi_irda_dev_t *idev)
526 vlsi_free_ring(idev->rx_ring);
527 vlsi_free_ring(idev->tx_ring);
528 idev->rx_ring = idev->tx_ring = NULL;
530 if (idev->busaddr)
531 pci_free_consistent(idev->pdev,HW_RING_AREA_SIZE,idev->virtaddr,idev->busaddr);
533 idev->virtaddr = NULL;
534 idev->busaddr = 0;
536 return 0;
539 /********************************************************/
541 static int vlsi_process_rx(struct vlsi_ring *r, struct ring_descr *rd)
543 u16 status;
544 int crclen, len = 0;
545 struct sk_buff *skb;
546 int ret = 0;
547 struct net_device *ndev = (struct net_device *)pci_get_drvdata(r->pdev);
548 vlsi_irda_dev_t *idev = ndev->priv;
550 pci_dma_sync_single_for_cpu(r->pdev, rd_get_addr(rd), r->len, r->dir);
551 /* dma buffer now owned by the CPU */
552 status = rd_get_status(rd);
553 if (status & RD_RX_ERROR) {
554 if (status & RD_RX_OVER)
555 ret |= VLSI_RX_OVER;
556 if (status & RD_RX_LENGTH)
557 ret |= VLSI_RX_LENGTH;
558 if (status & RD_RX_PHYERR)
559 ret |= VLSI_RX_FRAME;
560 if (status & RD_RX_CRCERR)
561 ret |= VLSI_RX_CRC;
562 goto done;
565 len = rd_get_count(rd);
566 crclen = (idev->mode==IFF_FIR) ? sizeof(u32) : sizeof(u16);
567 len -= crclen; /* remove trailing CRC */
568 if (len <= 0) {
569 IRDA_DEBUG(0, "%s: strange frame (len=%d)\n", __FUNCTION__, len);
570 ret |= VLSI_RX_DROP;
571 goto done;
574 if (idev->mode == IFF_SIR) { /* hw checks CRC in MIR, FIR mode */
576 /* rd->buf is a streaming PCI_DMA_FROMDEVICE map. Doing the
577 * endian-adjustment there just in place will dirty a cache line
578 * which belongs to the map and thus we must be sure it will
579 * get flushed before giving the buffer back to hardware.
580 * vlsi_fill_rx() will do this anyway - but here we rely on.
582 le16_to_cpus(rd->buf+len);
583 if (irda_calc_crc16(INIT_FCS,rd->buf,len+crclen) != GOOD_FCS) {
584 IRDA_DEBUG(0, "%s: crc error\n", __FUNCTION__);
585 ret |= VLSI_RX_CRC;
586 goto done;
590 if (!rd->skb) {
591 IRDA_WARNING("%s: rx packet lost\n", __FUNCTION__);
592 ret |= VLSI_RX_DROP;
593 goto done;
596 skb = rd->skb;
597 rd->skb = NULL;
598 skb->dev = ndev;
599 memcpy(skb_put(skb,len), rd->buf, len);
600 skb->mac.raw = skb->data;
601 if (in_interrupt())
602 netif_rx(skb);
603 else
604 netif_rx_ni(skb);
605 ndev->last_rx = jiffies;
607 done:
608 rd_set_status(rd, 0);
609 rd_set_count(rd, 0);
610 /* buffer still owned by CPU */
612 return (ret) ? -ret : len;
615 static void vlsi_fill_rx(struct vlsi_ring *r)
617 struct ring_descr *rd;
619 for (rd = ring_last(r); rd != NULL; rd = ring_put(r)) {
620 if (rd_is_active(rd)) {
621 IRDA_WARNING("%s: driver bug: rx descr race with hw\n",
622 __FUNCTION__);
623 vlsi_ring_debug(r);
624 break;
626 if (!rd->skb) {
627 rd->skb = dev_alloc_skb(IRLAP_SKB_ALLOCSIZE);
628 if (rd->skb) {
629 skb_reserve(rd->skb,1);
630 rd->skb->protocol = htons(ETH_P_IRDA);
632 else
633 break; /* probably not worth logging? */
635 /* give dma buffer back to busmaster */
636 pci_dma_sync_single_for_device(r->pdev, rd_get_addr(rd), r->len, r->dir);
637 rd_activate(rd);
641 static void vlsi_rx_interrupt(struct net_device *ndev)
643 vlsi_irda_dev_t *idev = ndev->priv;
644 struct vlsi_ring *r = idev->rx_ring;
645 struct ring_descr *rd;
646 int ret;
648 for (rd = ring_first(r); rd != NULL; rd = ring_get(r)) {
650 if (rd_is_active(rd))
651 break;
653 ret = vlsi_process_rx(r, rd);
655 if (ret < 0) {
656 ret = -ret;
657 idev->stats.rx_errors++;
658 if (ret & VLSI_RX_DROP)
659 idev->stats.rx_dropped++;
660 if (ret & VLSI_RX_OVER)
661 idev->stats.rx_over_errors++;
662 if (ret & VLSI_RX_LENGTH)
663 idev->stats.rx_length_errors++;
664 if (ret & VLSI_RX_FRAME)
665 idev->stats.rx_frame_errors++;
666 if (ret & VLSI_RX_CRC)
667 idev->stats.rx_crc_errors++;
669 else if (ret > 0) {
670 idev->stats.rx_packets++;
671 idev->stats.rx_bytes += ret;
675 do_gettimeofday(&idev->last_rx); /* remember "now" for later mtt delay */
677 vlsi_fill_rx(r);
679 if (ring_first(r) == NULL) {
680 /* we are in big trouble, if this should ever happen */
681 IRDA_ERROR("%s: rx ring exhausted!\n", __FUNCTION__);
682 vlsi_ring_debug(r);
684 else
685 outw(0, ndev->base_addr+VLSI_PIO_PROMPT);
688 /* caller must have stopped the controller from busmastering */
690 static void vlsi_unarm_rx(vlsi_irda_dev_t *idev)
692 struct vlsi_ring *r = idev->rx_ring;
693 struct ring_descr *rd;
694 int ret;
696 for (rd = ring_first(r); rd != NULL; rd = ring_get(r)) {
698 ret = 0;
699 if (rd_is_active(rd)) {
700 rd_set_status(rd, 0);
701 if (rd_get_count(rd)) {
702 IRDA_DEBUG(0, "%s - dropping rx packet\n", __FUNCTION__);
703 ret = -VLSI_RX_DROP;
705 rd_set_count(rd, 0);
706 pci_dma_sync_single_for_cpu(r->pdev, rd_get_addr(rd), r->len, r->dir);
707 if (rd->skb) {
708 dev_kfree_skb_any(rd->skb);
709 rd->skb = NULL;
712 else
713 ret = vlsi_process_rx(r, rd);
715 if (ret < 0) {
716 ret = -ret;
717 idev->stats.rx_errors++;
718 if (ret & VLSI_RX_DROP)
719 idev->stats.rx_dropped++;
720 if (ret & VLSI_RX_OVER)
721 idev->stats.rx_over_errors++;
722 if (ret & VLSI_RX_LENGTH)
723 idev->stats.rx_length_errors++;
724 if (ret & VLSI_RX_FRAME)
725 idev->stats.rx_frame_errors++;
726 if (ret & VLSI_RX_CRC)
727 idev->stats.rx_crc_errors++;
729 else if (ret > 0) {
730 idev->stats.rx_packets++;
731 idev->stats.rx_bytes += ret;
736 /********************************************************/
738 static int vlsi_process_tx(struct vlsi_ring *r, struct ring_descr *rd)
740 u16 status;
741 int len;
742 int ret;
744 pci_dma_sync_single_for_cpu(r->pdev, rd_get_addr(rd), r->len, r->dir);
745 /* dma buffer now owned by the CPU */
746 status = rd_get_status(rd);
747 if (status & RD_TX_UNDRN)
748 ret = VLSI_TX_FIFO;
749 else
750 ret = 0;
751 rd_set_status(rd, 0);
753 if (rd->skb) {
754 len = rd->skb->len;
755 dev_kfree_skb_any(rd->skb);
756 rd->skb = NULL;
758 else /* tx-skb already freed? - should never happen */
759 len = rd_get_count(rd); /* incorrect for SIR! (due to wrapping) */
761 rd_set_count(rd, 0);
762 /* dma buffer still owned by the CPU */
764 return (ret) ? -ret : len;
767 static int vlsi_set_baud(vlsi_irda_dev_t *idev, unsigned iobase)
769 u16 nphyctl;
770 u16 config;
771 unsigned mode;
772 int ret;
773 int baudrate;
774 int fifocnt;
776 baudrate = idev->new_baud;
777 IRDA_DEBUG(2, "%s: %d -> %d\n", __FUNCTION__, idev->baud, idev->new_baud);
778 if (baudrate == 4000000) {
779 mode = IFF_FIR;
780 config = IRCFG_FIR;
781 nphyctl = PHYCTL_FIR;
783 else if (baudrate == 1152000) {
784 mode = IFF_MIR;
785 config = IRCFG_MIR | IRCFG_CRC16;
786 nphyctl = PHYCTL_MIR(clksrc==3);
788 else {
789 mode = IFF_SIR;
790 config = IRCFG_SIR | IRCFG_SIRFILT | IRCFG_RXANY;
791 switch(baudrate) {
792 default:
793 IRDA_WARNING("%s: undefined baudrate %d - fallback to 9600!\n",
794 __FUNCTION__, baudrate);
795 baudrate = 9600;
796 /* fallthru */
797 case 2400:
798 case 9600:
799 case 19200:
800 case 38400:
801 case 57600:
802 case 115200:
803 nphyctl = PHYCTL_SIR(baudrate,sirpulse,clksrc==3);
804 break;
807 config |= IRCFG_MSTR | IRCFG_ENRX;
809 fifocnt = inw(iobase+VLSI_PIO_RCVBCNT) & RCVBCNT_MASK;
810 if (fifocnt != 0) {
811 IRDA_DEBUG(0, "%s: rx fifo not empty(%d)\n", __FUNCTION__, fifocnt);
814 outw(0, iobase+VLSI_PIO_IRENABLE);
815 outw(config, iobase+VLSI_PIO_IRCFG);
816 outw(nphyctl, iobase+VLSI_PIO_NPHYCTL);
817 wmb();
818 outw(IRENABLE_PHYANDCLOCK, iobase+VLSI_PIO_IRENABLE);
819 mb();
821 udelay(1); /* chip applies IRCFG on next rising edge of its 8MHz clock */
823 /* read back settings for validation */
825 config = inw(iobase+VLSI_PIO_IRENABLE) & IRENABLE_MASK;
827 if (mode == IFF_FIR)
828 config ^= IRENABLE_FIR_ON;
829 else if (mode == IFF_MIR)
830 config ^= (IRENABLE_MIR_ON|IRENABLE_CRC16_ON);
831 else
832 config ^= IRENABLE_SIR_ON;
834 if (config != (IRENABLE_PHYANDCLOCK|IRENABLE_ENRXST)) {
835 IRDA_WARNING("%s: failed to set %s mode!\n", __FUNCTION__,
836 (mode==IFF_SIR)?"SIR":((mode==IFF_MIR)?"MIR":"FIR"));
837 ret = -1;
839 else {
840 if (inw(iobase+VLSI_PIO_PHYCTL) != nphyctl) {
841 IRDA_WARNING("%s: failed to apply baudrate %d\n",
842 __FUNCTION__, baudrate);
843 ret = -1;
845 else {
846 idev->mode = mode;
847 idev->baud = baudrate;
848 idev->new_baud = 0;
849 ret = 0;
853 if (ret)
854 vlsi_reg_debug(iobase,__FUNCTION__);
856 return ret;
859 static int vlsi_hard_start_xmit(struct sk_buff *skb, struct net_device *ndev)
861 vlsi_irda_dev_t *idev = ndev->priv;
862 struct vlsi_ring *r = idev->tx_ring;
863 struct ring_descr *rd;
864 unsigned long flags;
865 unsigned iobase = ndev->base_addr;
866 u8 status;
867 u16 config;
868 int mtt;
869 int len, speed;
870 struct timeval now, ready;
871 char *msg = NULL;
873 speed = irda_get_next_speed(skb);
874 spin_lock_irqsave(&idev->lock, flags);
875 if (speed != -1 && speed != idev->baud) {
876 netif_stop_queue(ndev);
877 idev->new_baud = speed;
878 status = RD_TX_CLRENTX; /* stop tx-ring after this frame */
880 else
881 status = 0;
883 if (skb->len == 0) {
884 /* handle zero packets - should be speed change */
885 if (status == 0) {
886 msg = "bogus zero-length packet";
887 goto drop_unlock;
890 /* due to the completely asynch tx operation we might have
891 * IrLAP racing with the hardware here, f.e. if the controller
892 * is just sending the last packet with current speed while
893 * the LAP is already switching the speed using synchronous
894 * len=0 packet. Immediate execution would lead to hw lockup
895 * requiring a powercycle to reset. Good candidate to trigger
896 * this is the final UA:RSP packet after receiving a DISC:CMD
897 * when getting the LAP down.
898 * Note that we are not protected by the queue_stop approach
899 * because the final UA:RSP arrives _without_ request to apply
900 * new-speed-after-this-packet - hence the driver doesn't know
901 * this was the last packet and doesn't stop the queue. So the
902 * forced switch to default speed from LAP gets through as fast
903 * as only some 10 usec later while the UA:RSP is still processed
904 * by the hardware and we would get screwed.
907 if (ring_first(idev->tx_ring) == NULL) {
908 /* no race - tx-ring already empty */
909 vlsi_set_baud(idev, iobase);
910 netif_wake_queue(ndev);
912 else
914 /* keep the speed change pending like it would
915 * for any len>0 packet. tx completion interrupt
916 * will apply it when the tx ring becomes empty.
918 spin_unlock_irqrestore(&idev->lock, flags);
919 dev_kfree_skb_any(skb);
920 return 0;
923 /* sanity checks - simply drop the packet */
925 rd = ring_last(r);
926 if (!rd) {
927 msg = "ring full, but queue wasn't stopped";
928 goto drop_unlock;
931 if (rd_is_active(rd)) {
932 msg = "entry still owned by hw";
933 goto drop_unlock;
936 if (!rd->buf) {
937 msg = "tx ring entry without pci buffer";
938 goto drop_unlock;
941 if (rd->skb) {
942 msg = "ring entry with old skb still attached";
943 goto drop_unlock;
946 /* no need for serialization or interrupt disable during mtt */
947 spin_unlock_irqrestore(&idev->lock, flags);
949 if ((mtt = irda_get_mtt(skb)) > 0) {
951 ready.tv_usec = idev->last_rx.tv_usec + mtt;
952 ready.tv_sec = idev->last_rx.tv_sec;
953 if (ready.tv_usec >= 1000000) {
954 ready.tv_usec -= 1000000;
955 ready.tv_sec++; /* IrLAP 1.1: mtt always < 1 sec */
957 for(;;) {
958 do_gettimeofday(&now);
959 if (now.tv_sec > ready.tv_sec
960 || (now.tv_sec==ready.tv_sec && now.tv_usec>=ready.tv_usec))
961 break;
962 udelay(100);
963 /* must not sleep here - we are called under xmit_lock! */
967 /* tx buffer already owned by CPU due to pci_dma_sync_single_for_cpu()
968 * after subsequent tx-completion
971 if (idev->mode == IFF_SIR) {
972 status |= RD_TX_DISCRC; /* no hw-crc creation */
973 len = async_wrap_skb(skb, rd->buf, r->len);
975 /* Some rare worst case situation in SIR mode might lead to
976 * potential buffer overflow. The wrapper detects this, returns
977 * with a shortened frame (without FCS/EOF) but doesn't provide
978 * any error indication about the invalid packet which we are
979 * going to transmit.
980 * Therefore we log if the buffer got filled to the point, where the
981 * wrapper would abort, i.e. when there are less than 5 bytes left to
982 * allow appending the FCS/EOF.
985 if (len >= r->len-5)
986 IRDA_WARNING("%s: possible buffer overflow with SIR wrapping!\n",
987 __FUNCTION__);
989 else {
990 /* hw deals with MIR/FIR mode wrapping */
991 status |= RD_TX_PULSE; /* send 2 us highspeed indication pulse */
992 len = skb->len;
993 if (len > r->len) {
994 msg = "frame exceeds tx buffer length";
995 goto drop;
997 else
998 memcpy(rd->buf, skb->data, len);
1001 rd->skb = skb; /* remember skb for tx-complete stats */
1003 rd_set_count(rd, len);
1004 rd_set_status(rd, status); /* not yet active! */
1006 /* give dma buffer back to busmaster-hw (flush caches to make
1007 * CPU-driven changes visible from the pci bus).
1010 pci_dma_sync_single_for_device(r->pdev, rd_get_addr(rd), r->len, r->dir);
1012 /* Switching to TX mode here races with the controller
1013 * which may stop TX at any time when fetching an inactive descriptor
1014 * or one with CLR_ENTX set. So we switch on TX only, if TX was not running
1015 * _after_ the new descriptor was activated on the ring. This ensures
1016 * we will either find TX already stopped or we can be sure, there
1017 * will be a TX-complete interrupt even if the chip stopped doing
1018 * TX just after we found it still running. The ISR will then find
1019 * the non-empty ring and restart TX processing. The enclosing
1020 * spinlock provides the correct serialization to prevent race with isr.
1023 spin_lock_irqsave(&idev->lock,flags);
1025 rd_activate(rd);
1027 if (!(inw(iobase+VLSI_PIO_IRENABLE) & IRENABLE_ENTXST)) {
1028 int fifocnt;
1030 fifocnt = inw(ndev->base_addr+VLSI_PIO_RCVBCNT) & RCVBCNT_MASK;
1031 if (fifocnt != 0) {
1032 IRDA_DEBUG(0, "%s: rx fifo not empty(%d)\n", __FUNCTION__, fifocnt);
1035 config = inw(iobase+VLSI_PIO_IRCFG);
1036 mb();
1037 outw(config | IRCFG_ENTX, iobase+VLSI_PIO_IRCFG);
1038 wmb();
1039 outw(0, iobase+VLSI_PIO_PROMPT);
1041 ndev->trans_start = jiffies;
1043 if (ring_put(r) == NULL) {
1044 netif_stop_queue(ndev);
1045 IRDA_DEBUG(3, "%s: tx ring full - queue stopped\n", __FUNCTION__);
1047 spin_unlock_irqrestore(&idev->lock, flags);
1049 return 0;
1051 drop_unlock:
1052 spin_unlock_irqrestore(&idev->lock, flags);
1053 drop:
1054 IRDA_WARNING("%s: dropping packet - %s\n", __FUNCTION__, msg);
1055 dev_kfree_skb_any(skb);
1056 idev->stats.tx_errors++;
1057 idev->stats.tx_dropped++;
1058 /* Don't even think about returning NET_XMIT_DROP (=1) here!
1059 * In fact any retval!=0 causes the packet scheduler to requeue the
1060 * packet for later retry of transmission - which isn't exactly
1061 * what we want after we've just called dev_kfree_skb_any ;-)
1063 return 0;
1066 static void vlsi_tx_interrupt(struct net_device *ndev)
1068 vlsi_irda_dev_t *idev = ndev->priv;
1069 struct vlsi_ring *r = idev->tx_ring;
1070 struct ring_descr *rd;
1071 unsigned iobase;
1072 int ret;
1073 u16 config;
1075 for (rd = ring_first(r); rd != NULL; rd = ring_get(r)) {
1077 if (rd_is_active(rd))
1078 break;
1080 ret = vlsi_process_tx(r, rd);
1082 if (ret < 0) {
1083 ret = -ret;
1084 idev->stats.tx_errors++;
1085 if (ret & VLSI_TX_DROP)
1086 idev->stats.tx_dropped++;
1087 if (ret & VLSI_TX_FIFO)
1088 idev->stats.tx_fifo_errors++;
1090 else if (ret > 0){
1091 idev->stats.tx_packets++;
1092 idev->stats.tx_bytes += ret;
1096 iobase = ndev->base_addr;
1098 if (idev->new_baud && rd == NULL) /* tx ring empty and speed change pending */
1099 vlsi_set_baud(idev, iobase);
1101 config = inw(iobase+VLSI_PIO_IRCFG);
1102 if (rd == NULL) /* tx ring empty: re-enable rx */
1103 outw((config & ~IRCFG_ENTX) | IRCFG_ENRX, iobase+VLSI_PIO_IRCFG);
1105 else if (!(inw(iobase+VLSI_PIO_IRENABLE) & IRENABLE_ENTXST)) {
1106 int fifocnt;
1108 fifocnt = inw(iobase+VLSI_PIO_RCVBCNT) & RCVBCNT_MASK;
1109 if (fifocnt != 0) {
1110 IRDA_DEBUG(0, "%s: rx fifo not empty(%d)\n",
1111 __FUNCTION__, fifocnt);
1113 outw(config | IRCFG_ENTX, iobase+VLSI_PIO_IRCFG);
1116 outw(0, iobase+VLSI_PIO_PROMPT);
1118 if (netif_queue_stopped(ndev) && !idev->new_baud) {
1119 netif_wake_queue(ndev);
1120 IRDA_DEBUG(3, "%s: queue awoken\n", __FUNCTION__);
1124 /* caller must have stopped the controller from busmastering */
1126 static void vlsi_unarm_tx(vlsi_irda_dev_t *idev)
1128 struct vlsi_ring *r = idev->tx_ring;
1129 struct ring_descr *rd;
1130 int ret;
1132 for (rd = ring_first(r); rd != NULL; rd = ring_get(r)) {
1134 ret = 0;
1135 if (rd_is_active(rd)) {
1136 rd_set_status(rd, 0);
1137 rd_set_count(rd, 0);
1138 pci_dma_sync_single_for_cpu(r->pdev, rd_get_addr(rd), r->len, r->dir);
1139 if (rd->skb) {
1140 dev_kfree_skb_any(rd->skb);
1141 rd->skb = NULL;
1143 IRDA_DEBUG(0, "%s - dropping tx packet\n", __FUNCTION__);
1144 ret = -VLSI_TX_DROP;
1146 else
1147 ret = vlsi_process_tx(r, rd);
1149 if (ret < 0) {
1150 ret = -ret;
1151 idev->stats.tx_errors++;
1152 if (ret & VLSI_TX_DROP)
1153 idev->stats.tx_dropped++;
1154 if (ret & VLSI_TX_FIFO)
1155 idev->stats.tx_fifo_errors++;
1157 else if (ret > 0){
1158 idev->stats.tx_packets++;
1159 idev->stats.tx_bytes += ret;
1165 /********************************************************/
1167 static int vlsi_start_clock(struct pci_dev *pdev)
1169 u8 clkctl, lock;
1170 int i, count;
1172 if (clksrc < 2) { /* auto or PLL: try PLL */
1173 clkctl = CLKCTL_PD_INV | CLKCTL_CLKSTP;
1174 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1176 /* procedure to detect PLL lock synchronisation:
1177 * after 0.5 msec initial delay we expect to find 3 PLL lock
1178 * indications within 10 msec for successful PLL detection.
1180 udelay(500);
1181 count = 0;
1182 for (i = 500; i <= 10000; i += 50) { /* max 10 msec */
1183 pci_read_config_byte(pdev, VLSI_PCI_CLKCTL, &lock);
1184 if (lock&CLKCTL_LOCK) {
1185 if (++count >= 3)
1186 break;
1188 udelay(50);
1190 if (count < 3) {
1191 if (clksrc == 1) { /* explicitly asked for PLL hence bail out */
1192 IRDA_ERROR("%s: no PLL or failed to lock!\n",
1193 __FUNCTION__);
1194 clkctl = CLKCTL_CLKSTP;
1195 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1196 return -1;
1198 else /* was: clksrc=0(auto) */
1199 clksrc = 3; /* fallback to 40MHz XCLK (OB800) */
1201 IRDA_DEBUG(0, "%s: PLL not locked, fallback to clksrc=%d\n",
1202 __FUNCTION__, clksrc);
1204 else
1205 clksrc = 1; /* got successful PLL lock */
1208 if (clksrc != 1) {
1209 /* we get here if either no PLL detected in auto-mode or
1210 an external clock source was explicitly specified */
1212 clkctl = CLKCTL_EXTCLK | CLKCTL_CLKSTP;
1213 if (clksrc == 3)
1214 clkctl |= CLKCTL_XCKSEL;
1215 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1217 /* no way to test for working XCLK */
1219 else
1220 pci_read_config_byte(pdev, VLSI_PCI_CLKCTL, &clkctl);
1222 /* ok, now going to connect the chip with the clock source */
1224 clkctl &= ~CLKCTL_CLKSTP;
1225 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1227 return 0;
1230 static void vlsi_stop_clock(struct pci_dev *pdev)
1232 u8 clkctl;
1234 /* disconnect chip from clock source */
1235 pci_read_config_byte(pdev, VLSI_PCI_CLKCTL, &clkctl);
1236 clkctl |= CLKCTL_CLKSTP;
1237 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1239 /* disable all clock sources */
1240 clkctl &= ~(CLKCTL_EXTCLK | CLKCTL_PD_INV);
1241 pci_write_config_byte(pdev, VLSI_PCI_CLKCTL, clkctl);
1244 /********************************************************/
1246 /* writing all-zero to the VLSI PCI IO register area seems to prevent
1247 * some occasional situations where the hardware fails (symptoms are
1248 * what appears as stalled tx/rx state machines, i.e. everything ok for
1249 * receive or transmit but hw makes no progress or is unable to access
1250 * the bus memory locations).
1251 * Best place to call this is immediately after/before the internal clock
1252 * gets started/stopped.
1255 static inline void vlsi_clear_regs(unsigned iobase)
1257 unsigned i;
1258 const unsigned chip_io_extent = 32;
1260 for (i = 0; i < chip_io_extent; i += sizeof(u16))
1261 outw(0, iobase + i);
1264 static int vlsi_init_chip(struct pci_dev *pdev)
1266 struct net_device *ndev = pci_get_drvdata(pdev);
1267 vlsi_irda_dev_t *idev = ndev->priv;
1268 unsigned iobase;
1269 u16 ptr;
1271 /* start the clock and clean the registers */
1273 if (vlsi_start_clock(pdev)) {
1274 IRDA_ERROR("%s: no valid clock source\n", __FUNCTION__);
1275 return -1;
1277 iobase = ndev->base_addr;
1278 vlsi_clear_regs(iobase);
1280 outb(IRINTR_INT_MASK, iobase+VLSI_PIO_IRINTR); /* w/c pending IRQ, disable all INT */
1282 outw(0, iobase+VLSI_PIO_IRENABLE); /* disable IrPHY-interface */
1284 /* disable everything, particularly IRCFG_MSTR - (also resetting the RING_PTR) */
1286 outw(0, iobase+VLSI_PIO_IRCFG);
1287 wmb();
1289 outw(MAX_PACKET_LENGTH, iobase+VLSI_PIO_MAXPKT); /* max possible value=0x0fff */
1291 outw(BUS_TO_RINGBASE(idev->busaddr), iobase+VLSI_PIO_RINGBASE);
1293 outw(TX_RX_TO_RINGSIZE(idev->tx_ring->size, idev->rx_ring->size),
1294 iobase+VLSI_PIO_RINGSIZE);
1296 ptr = inw(iobase+VLSI_PIO_RINGPTR);
1297 atomic_set(&idev->rx_ring->head, RINGPTR_GET_RX(ptr));
1298 atomic_set(&idev->rx_ring->tail, RINGPTR_GET_RX(ptr));
1299 atomic_set(&idev->tx_ring->head, RINGPTR_GET_TX(ptr));
1300 atomic_set(&idev->tx_ring->tail, RINGPTR_GET_TX(ptr));
1302 vlsi_set_baud(idev, iobase); /* idev->new_baud used as provided by caller */
1304 outb(IRINTR_INT_MASK, iobase+VLSI_PIO_IRINTR); /* just in case - w/c pending IRQ's */
1305 wmb();
1307 /* DO NOT BLINDLY ENABLE IRINTR_ACTEN!
1308 * basically every received pulse fires an ACTIVITY-INT
1309 * leading to >>1000 INT's per second instead of few 10
1312 outb(IRINTR_RPKTEN|IRINTR_TPKTEN, iobase+VLSI_PIO_IRINTR);
1314 return 0;
1317 static int vlsi_start_hw(vlsi_irda_dev_t *idev)
1319 struct pci_dev *pdev = idev->pdev;
1320 struct net_device *ndev = pci_get_drvdata(pdev);
1321 unsigned iobase = ndev->base_addr;
1322 u8 byte;
1324 /* we don't use the legacy UART, disable its address decoding */
1326 pci_read_config_byte(pdev, VLSI_PCI_IRMISC, &byte);
1327 byte &= ~(IRMISC_UARTEN | IRMISC_UARTTST);
1328 pci_write_config_byte(pdev, VLSI_PCI_IRMISC, byte);
1330 /* enable PCI busmaster access to our 16MB page */
1332 pci_write_config_byte(pdev, VLSI_PCI_MSTRPAGE, MSTRPAGE_VALUE);
1333 pci_set_master(pdev);
1335 if (vlsi_init_chip(pdev) < 0) {
1336 pci_disable_device(pdev);
1337 return -1;
1340 vlsi_fill_rx(idev->rx_ring);
1342 do_gettimeofday(&idev->last_rx); /* first mtt may start from now on */
1344 outw(0, iobase+VLSI_PIO_PROMPT); /* kick hw state machine */
1346 return 0;
1349 static int vlsi_stop_hw(vlsi_irda_dev_t *idev)
1351 struct pci_dev *pdev = idev->pdev;
1352 struct net_device *ndev = pci_get_drvdata(pdev);
1353 unsigned iobase = ndev->base_addr;
1354 unsigned long flags;
1356 spin_lock_irqsave(&idev->lock,flags);
1357 outw(0, iobase+VLSI_PIO_IRENABLE);
1358 outw(0, iobase+VLSI_PIO_IRCFG); /* disable everything */
1360 /* disable and w/c irqs */
1361 outb(0, iobase+VLSI_PIO_IRINTR);
1362 wmb();
1363 outb(IRINTR_INT_MASK, iobase+VLSI_PIO_IRINTR);
1364 spin_unlock_irqrestore(&idev->lock,flags);
1366 vlsi_unarm_tx(idev);
1367 vlsi_unarm_rx(idev);
1369 vlsi_clear_regs(iobase);
1370 vlsi_stop_clock(pdev);
1372 pci_disable_device(pdev);
1374 return 0;
1377 /**************************************************************/
1379 static struct net_device_stats * vlsi_get_stats(struct net_device *ndev)
1381 vlsi_irda_dev_t *idev = ndev->priv;
1383 return &idev->stats;
1386 static void vlsi_tx_timeout(struct net_device *ndev)
1388 vlsi_irda_dev_t *idev = ndev->priv;
1391 vlsi_reg_debug(ndev->base_addr, __FUNCTION__);
1392 vlsi_ring_debug(idev->tx_ring);
1394 if (netif_running(ndev))
1395 netif_stop_queue(ndev);
1397 vlsi_stop_hw(idev);
1399 /* now simply restart the whole thing */
1401 if (!idev->new_baud)
1402 idev->new_baud = idev->baud; /* keep current baudrate */
1404 if (vlsi_start_hw(idev))
1405 IRDA_ERROR("%s: failed to restart hw - %s(%s) unusable!\n",
1406 __FUNCTION__, PCIDEV_NAME(idev->pdev), ndev->name);
1407 else
1408 netif_start_queue(ndev);
1411 static int vlsi_ioctl(struct net_device *ndev, struct ifreq *rq, int cmd)
1413 vlsi_irda_dev_t *idev = ndev->priv;
1414 struct if_irda_req *irq = (struct if_irda_req *) rq;
1415 unsigned long flags;
1416 u16 fifocnt;
1417 int ret = 0;
1419 switch (cmd) {
1420 case SIOCSBANDWIDTH:
1421 if (!capable(CAP_NET_ADMIN)) {
1422 ret = -EPERM;
1423 break;
1425 spin_lock_irqsave(&idev->lock, flags);
1426 idev->new_baud = irq->ifr_baudrate;
1427 /* when called from userland there might be a minor race window here
1428 * if the stack tries to change speed concurrently - which would be
1429 * pretty strange anyway with the userland having full control...
1431 vlsi_set_baud(idev, ndev->base_addr);
1432 spin_unlock_irqrestore(&idev->lock, flags);
1433 break;
1434 case SIOCSMEDIABUSY:
1435 if (!capable(CAP_NET_ADMIN)) {
1436 ret = -EPERM;
1437 break;
1439 irda_device_set_media_busy(ndev, TRUE);
1440 break;
1441 case SIOCGRECEIVING:
1442 /* the best we can do: check whether there are any bytes in rx fifo.
1443 * The trustable window (in case some data arrives just afterwards)
1444 * may be as short as 1usec or so at 4Mbps.
1446 fifocnt = inw(ndev->base_addr+VLSI_PIO_RCVBCNT) & RCVBCNT_MASK;
1447 irq->ifr_receiving = (fifocnt!=0) ? 1 : 0;
1448 break;
1449 default:
1450 IRDA_WARNING("%s: notsupp - cmd=%04x\n",
1451 __FUNCTION__, cmd);
1452 ret = -EOPNOTSUPP;
1455 return ret;
1458 /********************************************************/
1460 static irqreturn_t vlsi_interrupt(int irq, void *dev_instance,
1461 struct pt_regs *regs)
1463 struct net_device *ndev = dev_instance;
1464 vlsi_irda_dev_t *idev = ndev->priv;
1465 unsigned iobase;
1466 u8 irintr;
1467 int boguscount = 5;
1468 unsigned long flags;
1469 int handled = 0;
1471 iobase = ndev->base_addr;
1472 spin_lock_irqsave(&idev->lock,flags);
1473 do {
1474 irintr = inb(iobase+VLSI_PIO_IRINTR);
1475 mb();
1476 outb(irintr, iobase+VLSI_PIO_IRINTR); /* acknowledge asap */
1478 if (!(irintr&=IRINTR_INT_MASK)) /* not our INT - probably shared */
1479 break;
1481 handled = 1;
1483 if (unlikely(!(irintr & ~IRINTR_ACTIVITY)))
1484 break; /* nothing todo if only activity */
1486 if (irintr&IRINTR_RPKTINT)
1487 vlsi_rx_interrupt(ndev);
1489 if (irintr&IRINTR_TPKTINT)
1490 vlsi_tx_interrupt(ndev);
1492 } while (--boguscount > 0);
1493 spin_unlock_irqrestore(&idev->lock,flags);
1495 if (boguscount <= 0)
1496 IRDA_MESSAGE("%s: too much work in interrupt!\n",
1497 __FUNCTION__);
1498 return IRQ_RETVAL(handled);
1501 /********************************************************/
1503 static int vlsi_open(struct net_device *ndev)
1505 vlsi_irda_dev_t *idev = ndev->priv;
1506 int err = -EAGAIN;
1507 char hwname[32];
1509 if (pci_request_regions(idev->pdev, drivername)) {
1510 IRDA_WARNING("%s: io resource busy\n", __FUNCTION__);
1511 goto errout;
1513 ndev->base_addr = pci_resource_start(idev->pdev,0);
1514 ndev->irq = idev->pdev->irq;
1516 /* under some rare occasions the chip apparently comes up with
1517 * IRQ's pending. We better w/c pending IRQ and disable them all
1520 outb(IRINTR_INT_MASK, ndev->base_addr+VLSI_PIO_IRINTR);
1522 if (request_irq(ndev->irq, vlsi_interrupt, SA_SHIRQ,
1523 drivername, ndev)) {
1524 IRDA_WARNING("%s: couldn't get IRQ: %d\n",
1525 __FUNCTION__, ndev->irq);
1526 goto errout_io;
1529 if ((err = vlsi_create_hwif(idev)) != 0)
1530 goto errout_irq;
1532 sprintf(hwname, "VLSI-FIR @ 0x%04x", (unsigned)ndev->base_addr);
1533 idev->irlap = irlap_open(ndev,&idev->qos,hwname);
1534 if (!idev->irlap)
1535 goto errout_free_ring;
1537 do_gettimeofday(&idev->last_rx); /* first mtt may start from now on */
1539 idev->new_baud = 9600; /* start with IrPHY using 9600(SIR) mode */
1541 if ((err = vlsi_start_hw(idev)) != 0)
1542 goto errout_close_irlap;
1544 netif_start_queue(ndev);
1546 IRDA_MESSAGE("%s: device %s operational\n", __FUNCTION__, ndev->name);
1548 return 0;
1550 errout_close_irlap:
1551 irlap_close(idev->irlap);
1552 errout_free_ring:
1553 vlsi_destroy_hwif(idev);
1554 errout_irq:
1555 free_irq(ndev->irq,ndev);
1556 errout_io:
1557 pci_release_regions(idev->pdev);
1558 errout:
1559 return err;
1562 static int vlsi_close(struct net_device *ndev)
1564 vlsi_irda_dev_t *idev = ndev->priv;
1566 netif_stop_queue(ndev);
1568 if (idev->irlap)
1569 irlap_close(idev->irlap);
1570 idev->irlap = NULL;
1572 vlsi_stop_hw(idev);
1574 vlsi_destroy_hwif(idev);
1576 free_irq(ndev->irq,ndev);
1578 pci_release_regions(idev->pdev);
1580 IRDA_MESSAGE("%s: device %s stopped\n", __FUNCTION__, ndev->name);
1582 return 0;
1585 static int vlsi_irda_init(struct net_device *ndev)
1587 vlsi_irda_dev_t *idev = ndev->priv;
1588 struct pci_dev *pdev = idev->pdev;
1590 SET_MODULE_OWNER(ndev);
1592 ndev->irq = pdev->irq;
1593 ndev->base_addr = pci_resource_start(pdev,0);
1595 /* PCI busmastering
1596 * see include file for details why we need these 2 masks, in this order!
1599 if (pci_set_dma_mask(pdev,DMA_MASK_USED_BY_HW)
1600 || pci_set_dma_mask(pdev,DMA_MASK_MSTRPAGE)) {
1601 IRDA_ERROR("%s: aborting due to PCI BM-DMA address limitations\n", __FUNCTION__);
1602 return -1;
1605 irda_init_max_qos_capabilies(&idev->qos);
1607 /* the VLSI82C147 does not support 576000! */
1609 idev->qos.baud_rate.bits = IR_2400 | IR_9600
1610 | IR_19200 | IR_38400 | IR_57600 | IR_115200
1611 | IR_1152000 | (IR_4000000 << 8);
1613 idev->qos.min_turn_time.bits = qos_mtt_bits;
1615 irda_qos_bits_to_value(&idev->qos);
1617 /* currently no public media definitions for IrDA */
1619 ndev->flags |= IFF_PORTSEL | IFF_AUTOMEDIA;
1620 ndev->if_port = IF_PORT_UNKNOWN;
1622 ndev->open = vlsi_open;
1623 ndev->stop = vlsi_close;
1624 ndev->get_stats = vlsi_get_stats;
1625 ndev->hard_start_xmit = vlsi_hard_start_xmit;
1626 ndev->do_ioctl = vlsi_ioctl;
1627 ndev->tx_timeout = vlsi_tx_timeout;
1628 ndev->watchdog_timeo = 500*HZ/1000; /* max. allowed turn time for IrLAP */
1630 SET_NETDEV_DEV(ndev, &pdev->dev);
1632 return 0;
1635 /**************************************************************/
1637 static int __devinit
1638 vlsi_irda_probe(struct pci_dev *pdev, const struct pci_device_id *id)
1640 struct net_device *ndev;
1641 vlsi_irda_dev_t *idev;
1643 if (pci_enable_device(pdev))
1644 goto out;
1645 else
1646 pdev->current_state = 0; /* hw must be running now */
1648 IRDA_MESSAGE("%s: IrDA PCI controller %s detected\n",
1649 drivername, PCIDEV_NAME(pdev));
1651 if ( !pci_resource_start(pdev,0)
1652 || !(pci_resource_flags(pdev,0) & IORESOURCE_IO) ) {
1653 IRDA_ERROR("%s: bar 0 invalid", __FUNCTION__);
1654 goto out_disable;
1657 ndev = alloc_irdadev(sizeof(*idev));
1658 if (ndev==NULL) {
1659 IRDA_ERROR("%s: Unable to allocate device memory.\n",
1660 __FUNCTION__);
1661 goto out_disable;
1664 idev = ndev->priv;
1666 spin_lock_init(&idev->lock);
1667 init_MUTEX(&idev->sem);
1668 down(&idev->sem);
1669 idev->pdev = pdev;
1671 if (vlsi_irda_init(ndev) < 0)
1672 goto out_freedev;
1674 if (register_netdev(ndev) < 0) {
1675 IRDA_ERROR("%s: register_netdev failed\n", __FUNCTION__);
1676 goto out_freedev;
1679 if (vlsi_proc_root != NULL) {
1680 struct proc_dir_entry *ent;
1682 ent = create_proc_entry(ndev->name, S_IFREG|S_IRUGO, vlsi_proc_root);
1683 if (!ent) {
1684 IRDA_WARNING("%s: failed to create proc entry\n",
1685 __FUNCTION__);
1686 } else {
1687 ent->data = ndev;
1688 ent->proc_fops = VLSI_PROC_FOPS;
1689 ent->size = 0;
1691 idev->proc_entry = ent;
1693 IRDA_MESSAGE("%s: registered device %s\n", drivername, ndev->name);
1695 pci_set_drvdata(pdev, ndev);
1696 up(&idev->sem);
1698 return 0;
1700 out_freedev:
1701 up(&idev->sem);
1702 free_netdev(ndev);
1703 out_disable:
1704 pci_disable_device(pdev);
1705 out:
1706 pci_set_drvdata(pdev, NULL);
1707 return -ENODEV;
1710 static void __devexit vlsi_irda_remove(struct pci_dev *pdev)
1712 struct net_device *ndev = pci_get_drvdata(pdev);
1713 vlsi_irda_dev_t *idev;
1715 if (!ndev) {
1716 IRDA_ERROR("%s: lost netdevice?\n", drivername);
1717 return;
1720 unregister_netdev(ndev);
1722 idev = ndev->priv;
1723 down(&idev->sem);
1724 if (idev->proc_entry) {
1725 remove_proc_entry(ndev->name, vlsi_proc_root);
1726 idev->proc_entry = NULL;
1728 up(&idev->sem);
1730 free_netdev(ndev);
1732 pci_set_drvdata(pdev, NULL);
1734 IRDA_MESSAGE("%s: %s removed\n", drivername, PCIDEV_NAME(pdev));
1737 #ifdef CONFIG_PM
1739 /* The Controller doesn't provide PCI PM capabilities as defined by PCI specs.
1740 * Some of the Linux PCI-PM code however depends on this, for example in
1741 * pci_set_power_state(). So we have to take care to perform the required
1742 * operations on our own (particularly reflecting the pdev->current_state)
1743 * otherwise we might get cheated by pci-pm.
1747 static int vlsi_irda_suspend(struct pci_dev *pdev, u32 state)
1749 struct net_device *ndev = pci_get_drvdata(pdev);
1750 vlsi_irda_dev_t *idev;
1752 if (state < 1 || state > 3 ) {
1753 IRDA_ERROR("%s - %s: invalid pm state request: %u\n",
1754 __FUNCTION__, PCIDEV_NAME(pdev), state);
1755 return 0;
1757 if (!ndev) {
1758 IRDA_ERROR("%s - %s: no netdevice \n",
1759 __FUNCTION__, PCIDEV_NAME(pdev));
1760 return 0;
1762 idev = ndev->priv;
1763 down(&idev->sem);
1764 if (pdev->current_state != 0) { /* already suspended */
1765 if (state > pdev->current_state) { /* simply go deeper */
1766 pci_set_power_state(pdev,state);
1767 pdev->current_state = state;
1769 else
1770 IRDA_ERROR("%s - %s: invalid suspend request %u -> %u\n", __FUNCTION__, PCIDEV_NAME(pdev), pdev->current_state, state);
1771 up(&idev->sem);
1772 return 0;
1775 if (netif_running(ndev)) {
1776 netif_device_detach(ndev);
1777 vlsi_stop_hw(idev);
1778 pci_save_state(pdev);
1779 if (!idev->new_baud)
1780 /* remember speed settings to restore on resume */
1781 idev->new_baud = idev->baud;
1784 pci_set_power_state(pdev,state);
1785 pdev->current_state = state;
1786 idev->resume_ok = 1;
1787 up(&idev->sem);
1788 return 0;
1791 static int vlsi_irda_resume(struct pci_dev *pdev)
1793 struct net_device *ndev = pci_get_drvdata(pdev);
1794 vlsi_irda_dev_t *idev;
1796 if (!ndev) {
1797 IRDA_ERROR("%s - %s: no netdevice \n",
1798 __FUNCTION__, PCIDEV_NAME(pdev));
1799 return 0;
1801 idev = ndev->priv;
1802 down(&idev->sem);
1803 if (pdev->current_state == 0) {
1804 up(&idev->sem);
1805 IRDA_WARNING("%s - %s: already resumed\n",
1806 __FUNCTION__, PCIDEV_NAME(pdev));
1807 return 0;
1810 pci_set_power_state(pdev, 0);
1811 pdev->current_state = 0;
1813 if (!idev->resume_ok) {
1814 /* should be obsolete now - but used to happen due to:
1815 * - pci layer initially setting pdev->current_state = 4 (unknown)
1816 * - pci layer did not walk the save_state-tree (might be APM problem)
1817 * so we could not refuse to suspend from undefined state
1818 * - vlsi_irda_suspend detected invalid state and refused to save
1819 * configuration for resume - but was too late to stop suspending
1820 * - vlsi_irda_resume got screwed when trying to resume from garbage
1822 * now we explicitly set pdev->current_state = 0 after enabling the
1823 * device and independently resume_ok should catch any garbage config.
1825 IRDA_WARNING("%s - hm, nothing to resume?\n", __FUNCTION__);
1826 up(&idev->sem);
1827 return 0;
1830 if (netif_running(ndev)) {
1831 pci_restore_state(pdev);
1832 vlsi_start_hw(idev);
1833 netif_device_attach(ndev);
1835 idev->resume_ok = 0;
1836 up(&idev->sem);
1837 return 0;
1840 #endif /* CONFIG_PM */
1842 /*********************************************************/
1844 static struct pci_driver vlsi_irda_driver = {
1845 .name = drivername,
1846 .id_table = vlsi_irda_table,
1847 .probe = vlsi_irda_probe,
1848 .remove = __devexit_p(vlsi_irda_remove),
1849 #ifdef CONFIG_PM
1850 .suspend = vlsi_irda_suspend,
1851 .resume = vlsi_irda_resume,
1852 #endif
1855 #define PROC_DIR ("driver/" DRIVER_NAME)
1857 static int __init vlsi_mod_init(void)
1859 int i, ret;
1861 if (clksrc < 0 || clksrc > 3) {
1862 IRDA_ERROR("%s: invalid clksrc=%d\n", drivername, clksrc);
1863 return -1;
1866 for (i = 0; i < 2; i++) {
1867 switch(ringsize[i]) {
1868 case 4:
1869 case 8:
1870 case 16:
1871 case 32:
1872 case 64:
1873 break;
1874 default:
1875 IRDA_WARNING("%s: invalid %s ringsize %d, using default=8", drivername, (i)?"rx":"tx", ringsize[i]);
1876 ringsize[i] = 8;
1877 break;
1881 sirpulse = !!sirpulse;
1883 /* create_proc_entry returns NULL if !CONFIG_PROC_FS.
1884 * Failure to create the procfs entry is handled like running
1885 * without procfs - it's not required for the driver to work.
1887 vlsi_proc_root = create_proc_entry(PROC_DIR, S_IFDIR, NULL);
1888 if (vlsi_proc_root) {
1889 /* protect registered procdir against module removal.
1890 * Because we are in the module init path there's no race
1891 * window after create_proc_entry (and no barrier needed).
1893 vlsi_proc_root->owner = THIS_MODULE;
1896 ret = pci_module_init(&vlsi_irda_driver);
1898 if (ret && vlsi_proc_root)
1899 remove_proc_entry(PROC_DIR, NULL);
1900 return ret;
1904 static void __exit vlsi_mod_exit(void)
1906 pci_unregister_driver(&vlsi_irda_driver);
1907 if (vlsi_proc_root)
1908 remove_proc_entry(PROC_DIR, NULL);
1911 module_init(vlsi_mod_init);
1912 module_exit(vlsi_mod_exit);