Linux 4.16.11
[linux/fpc-iii.git] / drivers / atm / fore200e.c
blob6ebc4e4820fc4b267351970047e29a7c700902cc
1 /*
2 A FORE Systems 200E-series driver for ATM on Linux.
3 Christophe Lizzi (lizzi@cnam.fr), October 1999-March 2003.
5 Based on the PCA-200E driver from Uwe Dannowski (Uwe.Dannowski@inf.tu-dresden.de).
7 This driver simultaneously supports PCA-200E and SBA-200E adapters
8 on i386, alpha (untested), powerpc, sparc and sparc64 architectures.
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26 #include <linux/kernel.h>
27 #include <linux/slab.h>
28 #include <linux/init.h>
29 #include <linux/capability.h>
30 #include <linux/interrupt.h>
31 #include <linux/bitops.h>
32 #include <linux/pci.h>
33 #include <linux/module.h>
34 #include <linux/atmdev.h>
35 #include <linux/sonet.h>
36 #include <linux/atm_suni.h>
37 #include <linux/dma-mapping.h>
38 #include <linux/delay.h>
39 #include <linux/firmware.h>
40 #include <asm/io.h>
41 #include <asm/string.h>
42 #include <asm/page.h>
43 #include <asm/irq.h>
44 #include <asm/dma.h>
45 #include <asm/byteorder.h>
46 #include <linux/uaccess.h>
47 #include <linux/atomic.h>
49 #ifdef CONFIG_SBUS
50 #include <linux/of.h>
51 #include <linux/of_device.h>
52 #include <asm/idprom.h>
53 #include <asm/openprom.h>
54 #include <asm/oplib.h>
55 #include <asm/pgtable.h>
56 #endif
58 #if defined(CONFIG_ATM_FORE200E_USE_TASKLET) /* defer interrupt work to a tasklet */
59 #define FORE200E_USE_TASKLET
60 #endif
62 #if 0 /* enable the debugging code of the buffer supply queues */
63 #define FORE200E_BSQ_DEBUG
64 #endif
66 #if 1 /* ensure correct handling of 52-byte AAL0 SDUs expected by atmdump-like apps */
67 #define FORE200E_52BYTE_AAL0_SDU
68 #endif
70 #include "fore200e.h"
71 #include "suni.h"
73 #define FORE200E_VERSION "0.3e"
75 #define FORE200E "fore200e: "
77 #if 0 /* override .config */
78 #define CONFIG_ATM_FORE200E_DEBUG 1
79 #endif
80 #if defined(CONFIG_ATM_FORE200E_DEBUG) && (CONFIG_ATM_FORE200E_DEBUG > 0)
81 #define DPRINTK(level, format, args...) do { if (CONFIG_ATM_FORE200E_DEBUG >= (level)) \
82 printk(FORE200E format, ##args); } while (0)
83 #else
84 #define DPRINTK(level, format, args...) do {} while (0)
85 #endif
88 #define FORE200E_ALIGN(addr, alignment) \
89 ((((unsigned long)(addr) + (alignment - 1)) & ~(alignment - 1)) - (unsigned long)(addr))
91 #define FORE200E_DMA_INDEX(dma_addr, type, index) ((dma_addr) + (index) * sizeof(type))
93 #define FORE200E_INDEX(virt_addr, type, index) (&((type *)(virt_addr))[ index ])
95 #define FORE200E_NEXT_ENTRY(index, modulo) (index = ((index) + 1) % (modulo))
97 #if 1
98 #define ASSERT(expr) if (!(expr)) { \
99 printk(FORE200E "assertion failed! %s[%d]: %s\n", \
100 __func__, __LINE__, #expr); \
101 panic(FORE200E "%s", __func__); \
103 #else
104 #define ASSERT(expr) do {} while (0)
105 #endif
108 static const struct atmdev_ops fore200e_ops;
109 static const struct fore200e_bus fore200e_bus[];
111 static LIST_HEAD(fore200e_boards);
114 MODULE_AUTHOR("Christophe Lizzi - credits to Uwe Dannowski and Heikki Vatiainen");
115 MODULE_DESCRIPTION("FORE Systems 200E-series ATM driver - version " FORE200E_VERSION);
116 MODULE_SUPPORTED_DEVICE("PCA-200E, SBA-200E");
119 static const int fore200e_rx_buf_nbr[ BUFFER_SCHEME_NBR ][ BUFFER_MAGN_NBR ] = {
120 { BUFFER_S1_NBR, BUFFER_L1_NBR },
121 { BUFFER_S2_NBR, BUFFER_L2_NBR }
124 static const int fore200e_rx_buf_size[ BUFFER_SCHEME_NBR ][ BUFFER_MAGN_NBR ] = {
125 { BUFFER_S1_SIZE, BUFFER_L1_SIZE },
126 { BUFFER_S2_SIZE, BUFFER_L2_SIZE }
130 #if defined(CONFIG_ATM_FORE200E_DEBUG) && (CONFIG_ATM_FORE200E_DEBUG > 0)
131 static const char* fore200e_traffic_class[] = { "NONE", "UBR", "CBR", "VBR", "ABR", "ANY" };
132 #endif
135 #if 0 /* currently unused */
136 static int
137 fore200e_fore2atm_aal(enum fore200e_aal aal)
139 switch(aal) {
140 case FORE200E_AAL0: return ATM_AAL0;
141 case FORE200E_AAL34: return ATM_AAL34;
142 case FORE200E_AAL5: return ATM_AAL5;
145 return -EINVAL;
147 #endif
150 static enum fore200e_aal
151 fore200e_atm2fore_aal(int aal)
153 switch(aal) {
154 case ATM_AAL0: return FORE200E_AAL0;
155 case ATM_AAL34: return FORE200E_AAL34;
156 case ATM_AAL1:
157 case ATM_AAL2:
158 case ATM_AAL5: return FORE200E_AAL5;
161 return -EINVAL;
165 static char*
166 fore200e_irq_itoa(int irq)
168 static char str[8];
169 sprintf(str, "%d", irq);
170 return str;
174 /* allocate and align a chunk of memory intended to hold the data behing exchanged
175 between the driver and the adapter (using streaming DVMA) */
177 static int
178 fore200e_chunk_alloc(struct fore200e* fore200e, struct chunk* chunk, int size, int alignment, int direction)
180 unsigned long offset = 0;
182 if (alignment <= sizeof(int))
183 alignment = 0;
185 chunk->alloc_size = size + alignment;
186 chunk->align_size = size;
187 chunk->direction = direction;
189 chunk->alloc_addr = kzalloc(chunk->alloc_size, GFP_KERNEL | GFP_DMA);
190 if (chunk->alloc_addr == NULL)
191 return -ENOMEM;
193 if (alignment > 0)
194 offset = FORE200E_ALIGN(chunk->alloc_addr, alignment);
196 chunk->align_addr = chunk->alloc_addr + offset;
198 chunk->dma_addr = fore200e->bus->dma_map(fore200e, chunk->align_addr, chunk->align_size, direction);
200 return 0;
204 /* free a chunk of memory */
206 static void
207 fore200e_chunk_free(struct fore200e* fore200e, struct chunk* chunk)
209 fore200e->bus->dma_unmap(fore200e, chunk->dma_addr, chunk->dma_size, chunk->direction);
211 kfree(chunk->alloc_addr);
215 static void
216 fore200e_spin(int msecs)
218 unsigned long timeout = jiffies + msecs_to_jiffies(msecs);
219 while (time_before(jiffies, timeout));
223 static int
224 fore200e_poll(struct fore200e* fore200e, volatile u32* addr, u32 val, int msecs)
226 unsigned long timeout = jiffies + msecs_to_jiffies(msecs);
227 int ok;
229 mb();
230 do {
231 if ((ok = (*addr == val)) || (*addr & STATUS_ERROR))
232 break;
234 } while (time_before(jiffies, timeout));
236 #if 1
237 if (!ok) {
238 printk(FORE200E "cmd polling failed, got status 0x%08x, expected 0x%08x\n",
239 *addr, val);
241 #endif
243 return ok;
247 static int
248 fore200e_io_poll(struct fore200e* fore200e, volatile u32 __iomem *addr, u32 val, int msecs)
250 unsigned long timeout = jiffies + msecs_to_jiffies(msecs);
251 int ok;
253 do {
254 if ((ok = (fore200e->bus->read(addr) == val)))
255 break;
257 } while (time_before(jiffies, timeout));
259 #if 1
260 if (!ok) {
261 printk(FORE200E "I/O polling failed, got status 0x%08x, expected 0x%08x\n",
262 fore200e->bus->read(addr), val);
264 #endif
266 return ok;
270 static void
271 fore200e_free_rx_buf(struct fore200e* fore200e)
273 int scheme, magn, nbr;
274 struct buffer* buffer;
276 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
277 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
279 if ((buffer = fore200e->host_bsq[ scheme ][ magn ].buffer) != NULL) {
281 for (nbr = 0; nbr < fore200e_rx_buf_nbr[ scheme ][ magn ]; nbr++) {
283 struct chunk* data = &buffer[ nbr ].data;
285 if (data->alloc_addr != NULL)
286 fore200e_chunk_free(fore200e, data);
294 static void
295 fore200e_uninit_bs_queue(struct fore200e* fore200e)
297 int scheme, magn;
299 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
300 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
302 struct chunk* status = &fore200e->host_bsq[ scheme ][ magn ].status;
303 struct chunk* rbd_block = &fore200e->host_bsq[ scheme ][ magn ].rbd_block;
305 if (status->alloc_addr)
306 fore200e->bus->dma_chunk_free(fore200e, status);
308 if (rbd_block->alloc_addr)
309 fore200e->bus->dma_chunk_free(fore200e, rbd_block);
315 static int
316 fore200e_reset(struct fore200e* fore200e, int diag)
318 int ok;
320 fore200e->cp_monitor = fore200e->virt_base + FORE200E_CP_MONITOR_OFFSET;
322 fore200e->bus->write(BSTAT_COLD_START, &fore200e->cp_monitor->bstat);
324 fore200e->bus->reset(fore200e);
326 if (diag) {
327 ok = fore200e_io_poll(fore200e, &fore200e->cp_monitor->bstat, BSTAT_SELFTEST_OK, 1000);
328 if (ok == 0) {
330 printk(FORE200E "device %s self-test failed\n", fore200e->name);
331 return -ENODEV;
334 printk(FORE200E "device %s self-test passed\n", fore200e->name);
336 fore200e->state = FORE200E_STATE_RESET;
339 return 0;
343 static void
344 fore200e_shutdown(struct fore200e* fore200e)
346 printk(FORE200E "removing device %s at 0x%lx, IRQ %s\n",
347 fore200e->name, fore200e->phys_base,
348 fore200e_irq_itoa(fore200e->irq));
350 if (fore200e->state > FORE200E_STATE_RESET) {
351 /* first, reset the board to prevent further interrupts or data transfers */
352 fore200e_reset(fore200e, 0);
355 /* then, release all allocated resources */
356 switch(fore200e->state) {
358 case FORE200E_STATE_COMPLETE:
359 kfree(fore200e->stats);
361 /* fall through */
362 case FORE200E_STATE_IRQ:
363 free_irq(fore200e->irq, fore200e->atm_dev);
365 /* fall through */
366 case FORE200E_STATE_ALLOC_BUF:
367 fore200e_free_rx_buf(fore200e);
369 /* fall through */
370 case FORE200E_STATE_INIT_BSQ:
371 fore200e_uninit_bs_queue(fore200e);
373 /* fall through */
374 case FORE200E_STATE_INIT_RXQ:
375 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_rxq.status);
376 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_rxq.rpd);
378 /* fall through */
379 case FORE200E_STATE_INIT_TXQ:
380 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_txq.status);
381 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_txq.tpd);
383 /* fall through */
384 case FORE200E_STATE_INIT_CMDQ:
385 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_cmdq.status);
387 /* fall through */
388 case FORE200E_STATE_INITIALIZE:
389 /* nothing to do for that state */
391 case FORE200E_STATE_START_FW:
392 /* nothing to do for that state */
394 case FORE200E_STATE_RESET:
395 /* nothing to do for that state */
397 case FORE200E_STATE_MAP:
398 fore200e->bus->unmap(fore200e);
400 /* fall through */
401 case FORE200E_STATE_CONFIGURE:
402 /* nothing to do for that state */
404 case FORE200E_STATE_REGISTER:
405 /* XXX shouldn't we *start* by deregistering the device? */
406 atm_dev_deregister(fore200e->atm_dev);
408 case FORE200E_STATE_BLANK:
409 /* nothing to do for that state */
410 break;
415 #ifdef CONFIG_PCI
417 static u32 fore200e_pca_read(volatile u32 __iomem *addr)
419 /* on big-endian hosts, the board is configured to convert
420 the endianess of slave RAM accesses */
421 return le32_to_cpu(readl(addr));
425 static void fore200e_pca_write(u32 val, volatile u32 __iomem *addr)
427 /* on big-endian hosts, the board is configured to convert
428 the endianess of slave RAM accesses */
429 writel(cpu_to_le32(val), addr);
433 static u32
434 fore200e_pca_dma_map(struct fore200e* fore200e, void* virt_addr, int size, int direction)
436 u32 dma_addr = dma_map_single(&((struct pci_dev *) fore200e->bus_dev)->dev, virt_addr, size, direction);
438 DPRINTK(3, "PCI DVMA mapping: virt_addr = 0x%p, size = %d, direction = %d, --> dma_addr = 0x%08x\n",
439 virt_addr, size, direction, dma_addr);
441 return dma_addr;
445 static void
446 fore200e_pca_dma_unmap(struct fore200e* fore200e, u32 dma_addr, int size, int direction)
448 DPRINTK(3, "PCI DVMA unmapping: dma_addr = 0x%08x, size = %d, direction = %d\n",
449 dma_addr, size, direction);
451 dma_unmap_single(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
455 static void
456 fore200e_pca_dma_sync_for_cpu(struct fore200e* fore200e, u32 dma_addr, int size, int direction)
458 DPRINTK(3, "PCI DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
460 dma_sync_single_for_cpu(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
463 static void
464 fore200e_pca_dma_sync_for_device(struct fore200e* fore200e, u32 dma_addr, int size, int direction)
466 DPRINTK(3, "PCI DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
468 dma_sync_single_for_device(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
472 /* allocate a DMA consistent chunk of memory intended to act as a communication mechanism
473 (to hold descriptors, status, queues, etc.) shared by the driver and the adapter */
475 static int
476 fore200e_pca_dma_chunk_alloc(struct fore200e* fore200e, struct chunk* chunk,
477 int size, int nbr, int alignment)
479 /* returned chunks are page-aligned */
480 chunk->alloc_size = size * nbr;
481 chunk->alloc_addr = dma_alloc_coherent(&((struct pci_dev *) fore200e->bus_dev)->dev,
482 chunk->alloc_size,
483 &chunk->dma_addr,
484 GFP_KERNEL);
486 if ((chunk->alloc_addr == NULL) || (chunk->dma_addr == 0))
487 return -ENOMEM;
489 chunk->align_addr = chunk->alloc_addr;
491 return 0;
495 /* free a DMA consistent chunk of memory */
497 static void
498 fore200e_pca_dma_chunk_free(struct fore200e* fore200e, struct chunk* chunk)
500 dma_free_coherent(&((struct pci_dev *) fore200e->bus_dev)->dev,
501 chunk->alloc_size,
502 chunk->alloc_addr,
503 chunk->dma_addr);
507 static int
508 fore200e_pca_irq_check(struct fore200e* fore200e)
510 /* this is a 1 bit register */
511 int irq_posted = readl(fore200e->regs.pca.psr);
513 #if defined(CONFIG_ATM_FORE200E_DEBUG) && (CONFIG_ATM_FORE200E_DEBUG == 2)
514 if (irq_posted && (readl(fore200e->regs.pca.hcr) & PCA200E_HCR_OUTFULL)) {
515 DPRINTK(2,"FIFO OUT full, device %d\n", fore200e->atm_dev->number);
517 #endif
519 return irq_posted;
523 static void
524 fore200e_pca_irq_ack(struct fore200e* fore200e)
526 writel(PCA200E_HCR_CLRINTR, fore200e->regs.pca.hcr);
530 static void
531 fore200e_pca_reset(struct fore200e* fore200e)
533 writel(PCA200E_HCR_RESET, fore200e->regs.pca.hcr);
534 fore200e_spin(10);
535 writel(0, fore200e->regs.pca.hcr);
539 static int fore200e_pca_map(struct fore200e* fore200e)
541 DPRINTK(2, "device %s being mapped in memory\n", fore200e->name);
543 fore200e->virt_base = ioremap(fore200e->phys_base, PCA200E_IOSPACE_LENGTH);
545 if (fore200e->virt_base == NULL) {
546 printk(FORE200E "can't map device %s\n", fore200e->name);
547 return -EFAULT;
550 DPRINTK(1, "device %s mapped to 0x%p\n", fore200e->name, fore200e->virt_base);
552 /* gain access to the PCA specific registers */
553 fore200e->regs.pca.hcr = fore200e->virt_base + PCA200E_HCR_OFFSET;
554 fore200e->regs.pca.imr = fore200e->virt_base + PCA200E_IMR_OFFSET;
555 fore200e->regs.pca.psr = fore200e->virt_base + PCA200E_PSR_OFFSET;
557 fore200e->state = FORE200E_STATE_MAP;
558 return 0;
562 static void
563 fore200e_pca_unmap(struct fore200e* fore200e)
565 DPRINTK(2, "device %s being unmapped from memory\n", fore200e->name);
567 if (fore200e->virt_base != NULL)
568 iounmap(fore200e->virt_base);
572 static int fore200e_pca_configure(struct fore200e *fore200e)
574 struct pci_dev* pci_dev = (struct pci_dev*)fore200e->bus_dev;
575 u8 master_ctrl, latency;
577 DPRINTK(2, "device %s being configured\n", fore200e->name);
579 if ((pci_dev->irq == 0) || (pci_dev->irq == 0xFF)) {
580 printk(FORE200E "incorrect IRQ setting - misconfigured PCI-PCI bridge?\n");
581 return -EIO;
584 pci_read_config_byte(pci_dev, PCA200E_PCI_MASTER_CTRL, &master_ctrl);
586 master_ctrl = master_ctrl
587 #if defined(__BIG_ENDIAN)
588 /* request the PCA board to convert the endianess of slave RAM accesses */
589 | PCA200E_CTRL_CONVERT_ENDIAN
590 #endif
591 #if 0
592 | PCA200E_CTRL_DIS_CACHE_RD
593 | PCA200E_CTRL_DIS_WRT_INVAL
594 | PCA200E_CTRL_ENA_CONT_REQ_MODE
595 | PCA200E_CTRL_2_CACHE_WRT_INVAL
596 #endif
597 | PCA200E_CTRL_LARGE_PCI_BURSTS;
599 pci_write_config_byte(pci_dev, PCA200E_PCI_MASTER_CTRL, master_ctrl);
601 /* raise latency from 32 (default) to 192, as this seems to prevent NIC
602 lockups (under heavy rx loads) due to continuous 'FIFO OUT full' condition.
603 this may impact the performances of other PCI devices on the same bus, though */
604 latency = 192;
605 pci_write_config_byte(pci_dev, PCI_LATENCY_TIMER, latency);
607 fore200e->state = FORE200E_STATE_CONFIGURE;
608 return 0;
612 static int __init
613 fore200e_pca_prom_read(struct fore200e* fore200e, struct prom_data* prom)
615 struct host_cmdq* cmdq = &fore200e->host_cmdq;
616 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
617 struct prom_opcode opcode;
618 int ok;
619 u32 prom_dma;
621 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
623 opcode.opcode = OPCODE_GET_PROM;
624 opcode.pad = 0;
626 prom_dma = fore200e->bus->dma_map(fore200e, prom, sizeof(struct prom_data), DMA_FROM_DEVICE);
628 fore200e->bus->write(prom_dma, &entry->cp_entry->cmd.prom_block.prom_haddr);
630 *entry->status = STATUS_PENDING;
632 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.prom_block.opcode);
634 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
636 *entry->status = STATUS_FREE;
638 fore200e->bus->dma_unmap(fore200e, prom_dma, sizeof(struct prom_data), DMA_FROM_DEVICE);
640 if (ok == 0) {
641 printk(FORE200E "unable to get PROM data from device %s\n", fore200e->name);
642 return -EIO;
645 #if defined(__BIG_ENDIAN)
647 #define swap_here(addr) (*((u32*)(addr)) = swab32( *((u32*)(addr)) ))
649 /* MAC address is stored as little-endian */
650 swap_here(&prom->mac_addr[0]);
651 swap_here(&prom->mac_addr[4]);
652 #endif
654 return 0;
658 static int
659 fore200e_pca_proc_read(struct fore200e* fore200e, char *page)
661 struct pci_dev* pci_dev = (struct pci_dev*)fore200e->bus_dev;
663 return sprintf(page, " PCI bus/slot/function:\t%d/%d/%d\n",
664 pci_dev->bus->number, PCI_SLOT(pci_dev->devfn), PCI_FUNC(pci_dev->devfn));
667 #endif /* CONFIG_PCI */
670 #ifdef CONFIG_SBUS
672 static u32 fore200e_sba_read(volatile u32 __iomem *addr)
674 return sbus_readl(addr);
677 static void fore200e_sba_write(u32 val, volatile u32 __iomem *addr)
679 sbus_writel(val, addr);
682 static u32 fore200e_sba_dma_map(struct fore200e *fore200e, void* virt_addr, int size, int direction)
684 struct platform_device *op = fore200e->bus_dev;
685 u32 dma_addr;
687 dma_addr = dma_map_single(&op->dev, virt_addr, size, direction);
689 DPRINTK(3, "SBUS DVMA mapping: virt_addr = 0x%p, size = %d, direction = %d --> dma_addr = 0x%08x\n",
690 virt_addr, size, direction, dma_addr);
692 return dma_addr;
695 static void fore200e_sba_dma_unmap(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
697 struct platform_device *op = fore200e->bus_dev;
699 DPRINTK(3, "SBUS DVMA unmapping: dma_addr = 0x%08x, size = %d, direction = %d,\n",
700 dma_addr, size, direction);
702 dma_unmap_single(&op->dev, dma_addr, size, direction);
705 static void fore200e_sba_dma_sync_for_cpu(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
707 struct platform_device *op = fore200e->bus_dev;
709 DPRINTK(3, "SBUS DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
711 dma_sync_single_for_cpu(&op->dev, dma_addr, size, direction);
714 static void fore200e_sba_dma_sync_for_device(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
716 struct platform_device *op = fore200e->bus_dev;
718 DPRINTK(3, "SBUS DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
720 dma_sync_single_for_device(&op->dev, dma_addr, size, direction);
723 /* Allocate a DVMA consistent chunk of memory intended to act as a communication mechanism
724 * (to hold descriptors, status, queues, etc.) shared by the driver and the adapter.
726 static int fore200e_sba_dma_chunk_alloc(struct fore200e *fore200e, struct chunk *chunk,
727 int size, int nbr, int alignment)
729 struct platform_device *op = fore200e->bus_dev;
731 chunk->alloc_size = chunk->align_size = size * nbr;
733 /* returned chunks are page-aligned */
734 chunk->alloc_addr = dma_alloc_coherent(&op->dev, chunk->alloc_size,
735 &chunk->dma_addr, GFP_ATOMIC);
737 if ((chunk->alloc_addr == NULL) || (chunk->dma_addr == 0))
738 return -ENOMEM;
740 chunk->align_addr = chunk->alloc_addr;
742 return 0;
745 /* free a DVMA consistent chunk of memory */
746 static void fore200e_sba_dma_chunk_free(struct fore200e *fore200e, struct chunk *chunk)
748 struct platform_device *op = fore200e->bus_dev;
750 dma_free_coherent(&op->dev, chunk->alloc_size,
751 chunk->alloc_addr, chunk->dma_addr);
754 static void fore200e_sba_irq_enable(struct fore200e *fore200e)
756 u32 hcr = fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_STICKY;
757 fore200e->bus->write(hcr | SBA200E_HCR_INTR_ENA, fore200e->regs.sba.hcr);
760 static int fore200e_sba_irq_check(struct fore200e *fore200e)
762 return fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_INTR_REQ;
765 static void fore200e_sba_irq_ack(struct fore200e *fore200e)
767 u32 hcr = fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_STICKY;
768 fore200e->bus->write(hcr | SBA200E_HCR_INTR_CLR, fore200e->regs.sba.hcr);
771 static void fore200e_sba_reset(struct fore200e *fore200e)
773 fore200e->bus->write(SBA200E_HCR_RESET, fore200e->regs.sba.hcr);
774 fore200e_spin(10);
775 fore200e->bus->write(0, fore200e->regs.sba.hcr);
778 static int __init fore200e_sba_map(struct fore200e *fore200e)
780 struct platform_device *op = fore200e->bus_dev;
781 unsigned int bursts;
783 /* gain access to the SBA specific registers */
784 fore200e->regs.sba.hcr = of_ioremap(&op->resource[0], 0, SBA200E_HCR_LENGTH, "SBA HCR");
785 fore200e->regs.sba.bsr = of_ioremap(&op->resource[1], 0, SBA200E_BSR_LENGTH, "SBA BSR");
786 fore200e->regs.sba.isr = of_ioremap(&op->resource[2], 0, SBA200E_ISR_LENGTH, "SBA ISR");
787 fore200e->virt_base = of_ioremap(&op->resource[3], 0, SBA200E_RAM_LENGTH, "SBA RAM");
789 if (!fore200e->virt_base) {
790 printk(FORE200E "unable to map RAM of device %s\n", fore200e->name);
791 return -EFAULT;
794 DPRINTK(1, "device %s mapped to 0x%p\n", fore200e->name, fore200e->virt_base);
796 fore200e->bus->write(0x02, fore200e->regs.sba.isr); /* XXX hardwired interrupt level */
798 /* get the supported DVMA burst sizes */
799 bursts = of_getintprop_default(op->dev.of_node->parent, "burst-sizes", 0x00);
801 if (sbus_can_dma_64bit())
802 sbus_set_sbus64(&op->dev, bursts);
804 fore200e->state = FORE200E_STATE_MAP;
805 return 0;
808 static void fore200e_sba_unmap(struct fore200e *fore200e)
810 struct platform_device *op = fore200e->bus_dev;
812 of_iounmap(&op->resource[0], fore200e->regs.sba.hcr, SBA200E_HCR_LENGTH);
813 of_iounmap(&op->resource[1], fore200e->regs.sba.bsr, SBA200E_BSR_LENGTH);
814 of_iounmap(&op->resource[2], fore200e->regs.sba.isr, SBA200E_ISR_LENGTH);
815 of_iounmap(&op->resource[3], fore200e->virt_base, SBA200E_RAM_LENGTH);
818 static int __init fore200e_sba_configure(struct fore200e *fore200e)
820 fore200e->state = FORE200E_STATE_CONFIGURE;
821 return 0;
824 static int __init fore200e_sba_prom_read(struct fore200e *fore200e, struct prom_data *prom)
826 struct platform_device *op = fore200e->bus_dev;
827 const u8 *prop;
828 int len;
830 prop = of_get_property(op->dev.of_node, "madaddrlo2", &len);
831 if (!prop)
832 return -ENODEV;
833 memcpy(&prom->mac_addr[4], prop, 4);
835 prop = of_get_property(op->dev.of_node, "madaddrhi4", &len);
836 if (!prop)
837 return -ENODEV;
838 memcpy(&prom->mac_addr[2], prop, 4);
840 prom->serial_number = of_getintprop_default(op->dev.of_node,
841 "serialnumber", 0);
842 prom->hw_revision = of_getintprop_default(op->dev.of_node,
843 "promversion", 0);
845 return 0;
848 static int fore200e_sba_proc_read(struct fore200e *fore200e, char *page)
850 struct platform_device *op = fore200e->bus_dev;
851 const struct linux_prom_registers *regs;
853 regs = of_get_property(op->dev.of_node, "reg", NULL);
855 return sprintf(page, " SBUS slot/device:\t\t%d/'%s'\n",
856 (regs ? regs->which_io : 0), op->dev.of_node->name);
858 #endif /* CONFIG_SBUS */
861 static void
862 fore200e_tx_irq(struct fore200e* fore200e)
864 struct host_txq* txq = &fore200e->host_txq;
865 struct host_txq_entry* entry;
866 struct atm_vcc* vcc;
867 struct fore200e_vc_map* vc_map;
869 if (fore200e->host_txq.txing == 0)
870 return;
872 for (;;) {
874 entry = &txq->host_entry[ txq->tail ];
876 if ((*entry->status & STATUS_COMPLETE) == 0) {
877 break;
880 DPRINTK(3, "TX COMPLETED: entry = %p [tail = %d], vc_map = %p, skb = %p\n",
881 entry, txq->tail, entry->vc_map, entry->skb);
883 /* free copy of misaligned data */
884 kfree(entry->data);
886 /* remove DMA mapping */
887 fore200e->bus->dma_unmap(fore200e, entry->tpd->tsd[ 0 ].buffer, entry->tpd->tsd[ 0 ].length,
888 DMA_TO_DEVICE);
890 vc_map = entry->vc_map;
892 /* vcc closed since the time the entry was submitted for tx? */
893 if ((vc_map->vcc == NULL) ||
894 (test_bit(ATM_VF_READY, &vc_map->vcc->flags) == 0)) {
896 DPRINTK(1, "no ready vcc found for PDU sent on device %d\n",
897 fore200e->atm_dev->number);
899 dev_kfree_skb_any(entry->skb);
901 else {
902 ASSERT(vc_map->vcc);
904 /* vcc closed then immediately re-opened? */
905 if (vc_map->incarn != entry->incarn) {
907 /* when a vcc is closed, some PDUs may be still pending in the tx queue.
908 if the same vcc is immediately re-opened, those pending PDUs must
909 not be popped after the completion of their emission, as they refer
910 to the prior incarnation of that vcc. otherwise, sk_atm(vcc)->sk_wmem_alloc
911 would be decremented by the size of the (unrelated) skb, possibly
912 leading to a negative sk->sk_wmem_alloc count, ultimately freezing the vcc.
913 we thus bind the tx entry to the current incarnation of the vcc
914 when the entry is submitted for tx. When the tx later completes,
915 if the incarnation number of the tx entry does not match the one
916 of the vcc, then this implies that the vcc has been closed then re-opened.
917 we thus just drop the skb here. */
919 DPRINTK(1, "vcc closed-then-re-opened; dropping PDU sent on device %d\n",
920 fore200e->atm_dev->number);
922 dev_kfree_skb_any(entry->skb);
924 else {
925 vcc = vc_map->vcc;
926 ASSERT(vcc);
928 /* notify tx completion */
929 if (vcc->pop) {
930 vcc->pop(vcc, entry->skb);
932 else {
933 dev_kfree_skb_any(entry->skb);
936 /* check error condition */
937 if (*entry->status & STATUS_ERROR)
938 atomic_inc(&vcc->stats->tx_err);
939 else
940 atomic_inc(&vcc->stats->tx);
944 *entry->status = STATUS_FREE;
946 fore200e->host_txq.txing--;
948 FORE200E_NEXT_ENTRY(txq->tail, QUEUE_SIZE_TX);
953 #ifdef FORE200E_BSQ_DEBUG
954 int bsq_audit(int where, struct host_bsq* bsq, int scheme, int magn)
956 struct buffer* buffer;
957 int count = 0;
959 buffer = bsq->freebuf;
960 while (buffer) {
962 if (buffer->supplied) {
963 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld supplied but in free list!\n",
964 where, scheme, magn, buffer->index);
967 if (buffer->magn != magn) {
968 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld, unexpected magn = %d\n",
969 where, scheme, magn, buffer->index, buffer->magn);
972 if (buffer->scheme != scheme) {
973 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld, unexpected scheme = %d\n",
974 where, scheme, magn, buffer->index, buffer->scheme);
977 if ((buffer->index < 0) || (buffer->index >= fore200e_rx_buf_nbr[ scheme ][ magn ])) {
978 printk(FORE200E "bsq_audit(%d): queue %d.%d, out of range buffer index = %ld !\n",
979 where, scheme, magn, buffer->index);
982 count++;
983 buffer = buffer->next;
986 if (count != bsq->freebuf_count) {
987 printk(FORE200E "bsq_audit(%d): queue %d.%d, %d bufs in free list, but freebuf_count = %d\n",
988 where, scheme, magn, count, bsq->freebuf_count);
990 return 0;
992 #endif
995 static void
996 fore200e_supply(struct fore200e* fore200e)
998 int scheme, magn, i;
1000 struct host_bsq* bsq;
1001 struct host_bsq_entry* entry;
1002 struct buffer* buffer;
1004 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
1005 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
1007 bsq = &fore200e->host_bsq[ scheme ][ magn ];
1009 #ifdef FORE200E_BSQ_DEBUG
1010 bsq_audit(1, bsq, scheme, magn);
1011 #endif
1012 while (bsq->freebuf_count >= RBD_BLK_SIZE) {
1014 DPRINTK(2, "supplying %d rx buffers to queue %d / %d, freebuf_count = %d\n",
1015 RBD_BLK_SIZE, scheme, magn, bsq->freebuf_count);
1017 entry = &bsq->host_entry[ bsq->head ];
1019 for (i = 0; i < RBD_BLK_SIZE; i++) {
1021 /* take the first buffer in the free buffer list */
1022 buffer = bsq->freebuf;
1023 if (!buffer) {
1024 printk(FORE200E "no more free bufs in queue %d.%d, but freebuf_count = %d\n",
1025 scheme, magn, bsq->freebuf_count);
1026 return;
1028 bsq->freebuf = buffer->next;
1030 #ifdef FORE200E_BSQ_DEBUG
1031 if (buffer->supplied)
1032 printk(FORE200E "queue %d.%d, buffer %lu already supplied\n",
1033 scheme, magn, buffer->index);
1034 buffer->supplied = 1;
1035 #endif
1036 entry->rbd_block->rbd[ i ].buffer_haddr = buffer->data.dma_addr;
1037 entry->rbd_block->rbd[ i ].handle = FORE200E_BUF2HDL(buffer);
1040 FORE200E_NEXT_ENTRY(bsq->head, QUEUE_SIZE_BS);
1042 /* decrease accordingly the number of free rx buffers */
1043 bsq->freebuf_count -= RBD_BLK_SIZE;
1045 *entry->status = STATUS_PENDING;
1046 fore200e->bus->write(entry->rbd_block_dma, &entry->cp_entry->rbd_block_haddr);
1053 static int
1054 fore200e_push_rpd(struct fore200e* fore200e, struct atm_vcc* vcc, struct rpd* rpd)
1056 struct sk_buff* skb;
1057 struct buffer* buffer;
1058 struct fore200e_vcc* fore200e_vcc;
1059 int i, pdu_len = 0;
1060 #ifdef FORE200E_52BYTE_AAL0_SDU
1061 u32 cell_header = 0;
1062 #endif
1064 ASSERT(vcc);
1066 fore200e_vcc = FORE200E_VCC(vcc);
1067 ASSERT(fore200e_vcc);
1069 #ifdef FORE200E_52BYTE_AAL0_SDU
1070 if ((vcc->qos.aal == ATM_AAL0) && (vcc->qos.rxtp.max_sdu == ATM_AAL0_SDU)) {
1072 cell_header = (rpd->atm_header.gfc << ATM_HDR_GFC_SHIFT) |
1073 (rpd->atm_header.vpi << ATM_HDR_VPI_SHIFT) |
1074 (rpd->atm_header.vci << ATM_HDR_VCI_SHIFT) |
1075 (rpd->atm_header.plt << ATM_HDR_PTI_SHIFT) |
1076 rpd->atm_header.clp;
1077 pdu_len = 4;
1079 #endif
1081 /* compute total PDU length */
1082 for (i = 0; i < rpd->nseg; i++)
1083 pdu_len += rpd->rsd[ i ].length;
1085 skb = alloc_skb(pdu_len, GFP_ATOMIC);
1086 if (skb == NULL) {
1087 DPRINTK(2, "unable to alloc new skb, rx PDU length = %d\n", pdu_len);
1089 atomic_inc(&vcc->stats->rx_drop);
1090 return -ENOMEM;
1093 __net_timestamp(skb);
1095 #ifdef FORE200E_52BYTE_AAL0_SDU
1096 if (cell_header) {
1097 *((u32*)skb_put(skb, 4)) = cell_header;
1099 #endif
1101 /* reassemble segments */
1102 for (i = 0; i < rpd->nseg; i++) {
1104 /* rebuild rx buffer address from rsd handle */
1105 buffer = FORE200E_HDL2BUF(rpd->rsd[ i ].handle);
1107 /* Make device DMA transfer visible to CPU. */
1108 fore200e->bus->dma_sync_for_cpu(fore200e, buffer->data.dma_addr, rpd->rsd[ i ].length, DMA_FROM_DEVICE);
1110 skb_put_data(skb, buffer->data.align_addr, rpd->rsd[i].length);
1112 /* Now let the device get at it again. */
1113 fore200e->bus->dma_sync_for_device(fore200e, buffer->data.dma_addr, rpd->rsd[ i ].length, DMA_FROM_DEVICE);
1116 DPRINTK(3, "rx skb: len = %d, truesize = %d\n", skb->len, skb->truesize);
1118 if (pdu_len < fore200e_vcc->rx_min_pdu)
1119 fore200e_vcc->rx_min_pdu = pdu_len;
1120 if (pdu_len > fore200e_vcc->rx_max_pdu)
1121 fore200e_vcc->rx_max_pdu = pdu_len;
1122 fore200e_vcc->rx_pdu++;
1124 /* push PDU */
1125 if (atm_charge(vcc, skb->truesize) == 0) {
1127 DPRINTK(2, "receive buffers saturated for %d.%d.%d - PDU dropped\n",
1128 vcc->itf, vcc->vpi, vcc->vci);
1130 dev_kfree_skb_any(skb);
1132 atomic_inc(&vcc->stats->rx_drop);
1133 return -ENOMEM;
1136 vcc->push(vcc, skb);
1137 atomic_inc(&vcc->stats->rx);
1139 return 0;
1143 static void
1144 fore200e_collect_rpd(struct fore200e* fore200e, struct rpd* rpd)
1146 struct host_bsq* bsq;
1147 struct buffer* buffer;
1148 int i;
1150 for (i = 0; i < rpd->nseg; i++) {
1152 /* rebuild rx buffer address from rsd handle */
1153 buffer = FORE200E_HDL2BUF(rpd->rsd[ i ].handle);
1155 bsq = &fore200e->host_bsq[ buffer->scheme ][ buffer->magn ];
1157 #ifdef FORE200E_BSQ_DEBUG
1158 bsq_audit(2, bsq, buffer->scheme, buffer->magn);
1160 if (buffer->supplied == 0)
1161 printk(FORE200E "queue %d.%d, buffer %ld was not supplied\n",
1162 buffer->scheme, buffer->magn, buffer->index);
1163 buffer->supplied = 0;
1164 #endif
1166 /* re-insert the buffer into the free buffer list */
1167 buffer->next = bsq->freebuf;
1168 bsq->freebuf = buffer;
1170 /* then increment the number of free rx buffers */
1171 bsq->freebuf_count++;
1176 static void
1177 fore200e_rx_irq(struct fore200e* fore200e)
1179 struct host_rxq* rxq = &fore200e->host_rxq;
1180 struct host_rxq_entry* entry;
1181 struct atm_vcc* vcc;
1182 struct fore200e_vc_map* vc_map;
1184 for (;;) {
1186 entry = &rxq->host_entry[ rxq->head ];
1188 /* no more received PDUs */
1189 if ((*entry->status & STATUS_COMPLETE) == 0)
1190 break;
1192 vc_map = FORE200E_VC_MAP(fore200e, entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1194 if ((vc_map->vcc == NULL) ||
1195 (test_bit(ATM_VF_READY, &vc_map->vcc->flags) == 0)) {
1197 DPRINTK(1, "no ready VC found for PDU received on %d.%d.%d\n",
1198 fore200e->atm_dev->number,
1199 entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1201 else {
1202 vcc = vc_map->vcc;
1203 ASSERT(vcc);
1205 if ((*entry->status & STATUS_ERROR) == 0) {
1207 fore200e_push_rpd(fore200e, vcc, entry->rpd);
1209 else {
1210 DPRINTK(2, "damaged PDU on %d.%d.%d\n",
1211 fore200e->atm_dev->number,
1212 entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1213 atomic_inc(&vcc->stats->rx_err);
1217 FORE200E_NEXT_ENTRY(rxq->head, QUEUE_SIZE_RX);
1219 fore200e_collect_rpd(fore200e, entry->rpd);
1221 /* rewrite the rpd address to ack the received PDU */
1222 fore200e->bus->write(entry->rpd_dma, &entry->cp_entry->rpd_haddr);
1223 *entry->status = STATUS_FREE;
1225 fore200e_supply(fore200e);
1230 #ifndef FORE200E_USE_TASKLET
1231 static void
1232 fore200e_irq(struct fore200e* fore200e)
1234 unsigned long flags;
1236 spin_lock_irqsave(&fore200e->q_lock, flags);
1237 fore200e_rx_irq(fore200e);
1238 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1240 spin_lock_irqsave(&fore200e->q_lock, flags);
1241 fore200e_tx_irq(fore200e);
1242 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1244 #endif
1247 static irqreturn_t
1248 fore200e_interrupt(int irq, void* dev)
1250 struct fore200e* fore200e = FORE200E_DEV((struct atm_dev*)dev);
1252 if (fore200e->bus->irq_check(fore200e) == 0) {
1254 DPRINTK(3, "interrupt NOT triggered by device %d\n", fore200e->atm_dev->number);
1255 return IRQ_NONE;
1257 DPRINTK(3, "interrupt triggered by device %d\n", fore200e->atm_dev->number);
1259 #ifdef FORE200E_USE_TASKLET
1260 tasklet_schedule(&fore200e->tx_tasklet);
1261 tasklet_schedule(&fore200e->rx_tasklet);
1262 #else
1263 fore200e_irq(fore200e);
1264 #endif
1266 fore200e->bus->irq_ack(fore200e);
1267 return IRQ_HANDLED;
1271 #ifdef FORE200E_USE_TASKLET
1272 static void
1273 fore200e_tx_tasklet(unsigned long data)
1275 struct fore200e* fore200e = (struct fore200e*) data;
1276 unsigned long flags;
1278 DPRINTK(3, "tx tasklet scheduled for device %d\n", fore200e->atm_dev->number);
1280 spin_lock_irqsave(&fore200e->q_lock, flags);
1281 fore200e_tx_irq(fore200e);
1282 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1286 static void
1287 fore200e_rx_tasklet(unsigned long data)
1289 struct fore200e* fore200e = (struct fore200e*) data;
1290 unsigned long flags;
1292 DPRINTK(3, "rx tasklet scheduled for device %d\n", fore200e->atm_dev->number);
1294 spin_lock_irqsave(&fore200e->q_lock, flags);
1295 fore200e_rx_irq((struct fore200e*) data);
1296 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1298 #endif
1301 static int
1302 fore200e_select_scheme(struct atm_vcc* vcc)
1304 /* fairly balance the VCs over (identical) buffer schemes */
1305 int scheme = vcc->vci % 2 ? BUFFER_SCHEME_ONE : BUFFER_SCHEME_TWO;
1307 DPRINTK(1, "VC %d.%d.%d uses buffer scheme %d\n",
1308 vcc->itf, vcc->vpi, vcc->vci, scheme);
1310 return scheme;
1314 static int
1315 fore200e_activate_vcin(struct fore200e* fore200e, int activate, struct atm_vcc* vcc, int mtu)
1317 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1318 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1319 struct activate_opcode activ_opcode;
1320 struct deactivate_opcode deactiv_opcode;
1321 struct vpvc vpvc;
1322 int ok;
1323 enum fore200e_aal aal = fore200e_atm2fore_aal(vcc->qos.aal);
1325 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1327 if (activate) {
1328 FORE200E_VCC(vcc)->scheme = fore200e_select_scheme(vcc);
1330 activ_opcode.opcode = OPCODE_ACTIVATE_VCIN;
1331 activ_opcode.aal = aal;
1332 activ_opcode.scheme = FORE200E_VCC(vcc)->scheme;
1333 activ_opcode.pad = 0;
1335 else {
1336 deactiv_opcode.opcode = OPCODE_DEACTIVATE_VCIN;
1337 deactiv_opcode.pad = 0;
1340 vpvc.vci = vcc->vci;
1341 vpvc.vpi = vcc->vpi;
1343 *entry->status = STATUS_PENDING;
1345 if (activate) {
1347 #ifdef FORE200E_52BYTE_AAL0_SDU
1348 mtu = 48;
1349 #endif
1350 /* the MTU is not used by the cp, except in the case of AAL0 */
1351 fore200e->bus->write(mtu, &entry->cp_entry->cmd.activate_block.mtu);
1352 fore200e->bus->write(*(u32*)&vpvc, (u32 __iomem *)&entry->cp_entry->cmd.activate_block.vpvc);
1353 fore200e->bus->write(*(u32*)&activ_opcode, (u32 __iomem *)&entry->cp_entry->cmd.activate_block.opcode);
1355 else {
1356 fore200e->bus->write(*(u32*)&vpvc, (u32 __iomem *)&entry->cp_entry->cmd.deactivate_block.vpvc);
1357 fore200e->bus->write(*(u32*)&deactiv_opcode, (u32 __iomem *)&entry->cp_entry->cmd.deactivate_block.opcode);
1360 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1362 *entry->status = STATUS_FREE;
1364 if (ok == 0) {
1365 printk(FORE200E "unable to %s VC %d.%d.%d\n",
1366 activate ? "open" : "close", vcc->itf, vcc->vpi, vcc->vci);
1367 return -EIO;
1370 DPRINTK(1, "VC %d.%d.%d %sed\n", vcc->itf, vcc->vpi, vcc->vci,
1371 activate ? "open" : "clos");
1373 return 0;
1377 #define FORE200E_MAX_BACK2BACK_CELLS 255 /* XXX depends on CDVT */
1379 static void
1380 fore200e_rate_ctrl(struct atm_qos* qos, struct tpd_rate* rate)
1382 if (qos->txtp.max_pcr < ATM_OC3_PCR) {
1384 /* compute the data cells to idle cells ratio from the tx PCR */
1385 rate->data_cells = qos->txtp.max_pcr * FORE200E_MAX_BACK2BACK_CELLS / ATM_OC3_PCR;
1386 rate->idle_cells = FORE200E_MAX_BACK2BACK_CELLS - rate->data_cells;
1388 else {
1389 /* disable rate control */
1390 rate->data_cells = rate->idle_cells = 0;
1395 static int
1396 fore200e_open(struct atm_vcc *vcc)
1398 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1399 struct fore200e_vcc* fore200e_vcc;
1400 struct fore200e_vc_map* vc_map;
1401 unsigned long flags;
1402 int vci = vcc->vci;
1403 short vpi = vcc->vpi;
1405 ASSERT((vpi >= 0) && (vpi < 1<<FORE200E_VPI_BITS));
1406 ASSERT((vci >= 0) && (vci < 1<<FORE200E_VCI_BITS));
1408 spin_lock_irqsave(&fore200e->q_lock, flags);
1410 vc_map = FORE200E_VC_MAP(fore200e, vpi, vci);
1411 if (vc_map->vcc) {
1413 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1415 printk(FORE200E "VC %d.%d.%d already in use\n",
1416 fore200e->atm_dev->number, vpi, vci);
1418 return -EINVAL;
1421 vc_map->vcc = vcc;
1423 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1425 fore200e_vcc = kzalloc(sizeof(struct fore200e_vcc), GFP_ATOMIC);
1426 if (fore200e_vcc == NULL) {
1427 vc_map->vcc = NULL;
1428 return -ENOMEM;
1431 DPRINTK(2, "opening %d.%d.%d:%d QoS = (tx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d; "
1432 "rx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d)\n",
1433 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1434 fore200e_traffic_class[ vcc->qos.txtp.traffic_class ],
1435 vcc->qos.txtp.min_pcr, vcc->qos.txtp.max_pcr, vcc->qos.txtp.max_cdv, vcc->qos.txtp.max_sdu,
1436 fore200e_traffic_class[ vcc->qos.rxtp.traffic_class ],
1437 vcc->qos.rxtp.min_pcr, vcc->qos.rxtp.max_pcr, vcc->qos.rxtp.max_cdv, vcc->qos.rxtp.max_sdu);
1439 /* pseudo-CBR bandwidth requested? */
1440 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1442 mutex_lock(&fore200e->rate_mtx);
1443 if (fore200e->available_cell_rate < vcc->qos.txtp.max_pcr) {
1444 mutex_unlock(&fore200e->rate_mtx);
1446 kfree(fore200e_vcc);
1447 vc_map->vcc = NULL;
1448 return -EAGAIN;
1451 /* reserve bandwidth */
1452 fore200e->available_cell_rate -= vcc->qos.txtp.max_pcr;
1453 mutex_unlock(&fore200e->rate_mtx);
1456 vcc->itf = vcc->dev->number;
1458 set_bit(ATM_VF_PARTIAL,&vcc->flags);
1459 set_bit(ATM_VF_ADDR, &vcc->flags);
1461 vcc->dev_data = fore200e_vcc;
1463 if (fore200e_activate_vcin(fore200e, 1, vcc, vcc->qos.rxtp.max_sdu) < 0) {
1465 vc_map->vcc = NULL;
1467 clear_bit(ATM_VF_ADDR, &vcc->flags);
1468 clear_bit(ATM_VF_PARTIAL,&vcc->flags);
1470 vcc->dev_data = NULL;
1472 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
1474 kfree(fore200e_vcc);
1475 return -EINVAL;
1478 /* compute rate control parameters */
1479 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1481 fore200e_rate_ctrl(&vcc->qos, &fore200e_vcc->rate);
1482 set_bit(ATM_VF_HASQOS, &vcc->flags);
1484 DPRINTK(3, "tx on %d.%d.%d:%d, tx PCR = %d, rx PCR = %d, data_cells = %u, idle_cells = %u\n",
1485 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1486 vcc->qos.txtp.max_pcr, vcc->qos.rxtp.max_pcr,
1487 fore200e_vcc->rate.data_cells, fore200e_vcc->rate.idle_cells);
1490 fore200e_vcc->tx_min_pdu = fore200e_vcc->rx_min_pdu = MAX_PDU_SIZE + 1;
1491 fore200e_vcc->tx_max_pdu = fore200e_vcc->rx_max_pdu = 0;
1492 fore200e_vcc->tx_pdu = fore200e_vcc->rx_pdu = 0;
1494 /* new incarnation of the vcc */
1495 vc_map->incarn = ++fore200e->incarn_count;
1497 /* VC unusable before this flag is set */
1498 set_bit(ATM_VF_READY, &vcc->flags);
1500 return 0;
1504 static void
1505 fore200e_close(struct atm_vcc* vcc)
1507 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1508 struct fore200e_vcc* fore200e_vcc;
1509 struct fore200e_vc_map* vc_map;
1510 unsigned long flags;
1512 ASSERT(vcc);
1513 ASSERT((vcc->vpi >= 0) && (vcc->vpi < 1<<FORE200E_VPI_BITS));
1514 ASSERT((vcc->vci >= 0) && (vcc->vci < 1<<FORE200E_VCI_BITS));
1516 DPRINTK(2, "closing %d.%d.%d:%d\n", vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal));
1518 clear_bit(ATM_VF_READY, &vcc->flags);
1520 fore200e_activate_vcin(fore200e, 0, vcc, 0);
1522 spin_lock_irqsave(&fore200e->q_lock, flags);
1524 vc_map = FORE200E_VC_MAP(fore200e, vcc->vpi, vcc->vci);
1526 /* the vc is no longer considered as "in use" by fore200e_open() */
1527 vc_map->vcc = NULL;
1529 vcc->itf = vcc->vci = vcc->vpi = 0;
1531 fore200e_vcc = FORE200E_VCC(vcc);
1532 vcc->dev_data = NULL;
1534 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1536 /* release reserved bandwidth, if any */
1537 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1539 mutex_lock(&fore200e->rate_mtx);
1540 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
1541 mutex_unlock(&fore200e->rate_mtx);
1543 clear_bit(ATM_VF_HASQOS, &vcc->flags);
1546 clear_bit(ATM_VF_ADDR, &vcc->flags);
1547 clear_bit(ATM_VF_PARTIAL,&vcc->flags);
1549 ASSERT(fore200e_vcc);
1550 kfree(fore200e_vcc);
1554 static int
1555 fore200e_send(struct atm_vcc *vcc, struct sk_buff *skb)
1557 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1558 struct fore200e_vcc* fore200e_vcc = FORE200E_VCC(vcc);
1559 struct fore200e_vc_map* vc_map;
1560 struct host_txq* txq = &fore200e->host_txq;
1561 struct host_txq_entry* entry;
1562 struct tpd* tpd;
1563 struct tpd_haddr tpd_haddr;
1564 int retry = CONFIG_ATM_FORE200E_TX_RETRY;
1565 int tx_copy = 0;
1566 int tx_len = skb->len;
1567 u32* cell_header = NULL;
1568 unsigned char* skb_data;
1569 int skb_len;
1570 unsigned char* data;
1571 unsigned long flags;
1573 ASSERT(vcc);
1574 ASSERT(fore200e);
1575 ASSERT(fore200e_vcc);
1577 if (!test_bit(ATM_VF_READY, &vcc->flags)) {
1578 DPRINTK(1, "VC %d.%d.%d not ready for tx\n", vcc->itf, vcc->vpi, vcc->vpi);
1579 dev_kfree_skb_any(skb);
1580 return -EINVAL;
1583 #ifdef FORE200E_52BYTE_AAL0_SDU
1584 if ((vcc->qos.aal == ATM_AAL0) && (vcc->qos.txtp.max_sdu == ATM_AAL0_SDU)) {
1585 cell_header = (u32*) skb->data;
1586 skb_data = skb->data + 4; /* skip 4-byte cell header */
1587 skb_len = tx_len = skb->len - 4;
1589 DPRINTK(3, "user-supplied cell header = 0x%08x\n", *cell_header);
1591 else
1592 #endif
1594 skb_data = skb->data;
1595 skb_len = skb->len;
1598 if (((unsigned long)skb_data) & 0x3) {
1600 DPRINTK(2, "misaligned tx PDU on device %s\n", fore200e->name);
1601 tx_copy = 1;
1602 tx_len = skb_len;
1605 if ((vcc->qos.aal == ATM_AAL0) && (skb_len % ATM_CELL_PAYLOAD)) {
1607 /* this simply NUKES the PCA board */
1608 DPRINTK(2, "incomplete tx AAL0 PDU on device %s\n", fore200e->name);
1609 tx_copy = 1;
1610 tx_len = ((skb_len / ATM_CELL_PAYLOAD) + 1) * ATM_CELL_PAYLOAD;
1613 if (tx_copy) {
1614 data = kmalloc(tx_len, GFP_ATOMIC | GFP_DMA);
1615 if (data == NULL) {
1616 if (vcc->pop) {
1617 vcc->pop(vcc, skb);
1619 else {
1620 dev_kfree_skb_any(skb);
1622 return -ENOMEM;
1625 memcpy(data, skb_data, skb_len);
1626 if (skb_len < tx_len)
1627 memset(data + skb_len, 0x00, tx_len - skb_len);
1629 else {
1630 data = skb_data;
1633 vc_map = FORE200E_VC_MAP(fore200e, vcc->vpi, vcc->vci);
1634 ASSERT(vc_map->vcc == vcc);
1636 retry_here:
1638 spin_lock_irqsave(&fore200e->q_lock, flags);
1640 entry = &txq->host_entry[ txq->head ];
1642 if ((*entry->status != STATUS_FREE) || (txq->txing >= QUEUE_SIZE_TX - 2)) {
1644 /* try to free completed tx queue entries */
1645 fore200e_tx_irq(fore200e);
1647 if (*entry->status != STATUS_FREE) {
1649 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1651 /* retry once again? */
1652 if (--retry > 0) {
1653 udelay(50);
1654 goto retry_here;
1657 atomic_inc(&vcc->stats->tx_err);
1659 fore200e->tx_sat++;
1660 DPRINTK(2, "tx queue of device %s is saturated, PDU dropped - heartbeat is %08x\n",
1661 fore200e->name, fore200e->cp_queues->heartbeat);
1662 if (vcc->pop) {
1663 vcc->pop(vcc, skb);
1665 else {
1666 dev_kfree_skb_any(skb);
1669 if (tx_copy)
1670 kfree(data);
1672 return -ENOBUFS;
1676 entry->incarn = vc_map->incarn;
1677 entry->vc_map = vc_map;
1678 entry->skb = skb;
1679 entry->data = tx_copy ? data : NULL;
1681 tpd = entry->tpd;
1682 tpd->tsd[ 0 ].buffer = fore200e->bus->dma_map(fore200e, data, tx_len, DMA_TO_DEVICE);
1683 tpd->tsd[ 0 ].length = tx_len;
1685 FORE200E_NEXT_ENTRY(txq->head, QUEUE_SIZE_TX);
1686 txq->txing++;
1688 /* The dma_map call above implies a dma_sync so the device can use it,
1689 * thus no explicit dma_sync call is necessary here.
1692 DPRINTK(3, "tx on %d.%d.%d:%d, len = %u (%u)\n",
1693 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1694 tpd->tsd[0].length, skb_len);
1696 if (skb_len < fore200e_vcc->tx_min_pdu)
1697 fore200e_vcc->tx_min_pdu = skb_len;
1698 if (skb_len > fore200e_vcc->tx_max_pdu)
1699 fore200e_vcc->tx_max_pdu = skb_len;
1700 fore200e_vcc->tx_pdu++;
1702 /* set tx rate control information */
1703 tpd->rate.data_cells = fore200e_vcc->rate.data_cells;
1704 tpd->rate.idle_cells = fore200e_vcc->rate.idle_cells;
1706 if (cell_header) {
1707 tpd->atm_header.clp = (*cell_header & ATM_HDR_CLP);
1708 tpd->atm_header.plt = (*cell_header & ATM_HDR_PTI_MASK) >> ATM_HDR_PTI_SHIFT;
1709 tpd->atm_header.vci = (*cell_header & ATM_HDR_VCI_MASK) >> ATM_HDR_VCI_SHIFT;
1710 tpd->atm_header.vpi = (*cell_header & ATM_HDR_VPI_MASK) >> ATM_HDR_VPI_SHIFT;
1711 tpd->atm_header.gfc = (*cell_header & ATM_HDR_GFC_MASK) >> ATM_HDR_GFC_SHIFT;
1713 else {
1714 /* set the ATM header, common to all cells conveying the PDU */
1715 tpd->atm_header.clp = 0;
1716 tpd->atm_header.plt = 0;
1717 tpd->atm_header.vci = vcc->vci;
1718 tpd->atm_header.vpi = vcc->vpi;
1719 tpd->atm_header.gfc = 0;
1722 tpd->spec.length = tx_len;
1723 tpd->spec.nseg = 1;
1724 tpd->spec.aal = fore200e_atm2fore_aal(vcc->qos.aal);
1725 tpd->spec.intr = 1;
1727 tpd_haddr.size = sizeof(struct tpd) / (1<<TPD_HADDR_SHIFT); /* size is expressed in 32 byte blocks */
1728 tpd_haddr.pad = 0;
1729 tpd_haddr.haddr = entry->tpd_dma >> TPD_HADDR_SHIFT; /* shift the address, as we are in a bitfield */
1731 *entry->status = STATUS_PENDING;
1732 fore200e->bus->write(*(u32*)&tpd_haddr, (u32 __iomem *)&entry->cp_entry->tpd_haddr);
1734 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1736 return 0;
1740 static int
1741 fore200e_getstats(struct fore200e* fore200e)
1743 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1744 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1745 struct stats_opcode opcode;
1746 int ok;
1747 u32 stats_dma_addr;
1749 if (fore200e->stats == NULL) {
1750 fore200e->stats = kzalloc(sizeof(struct stats), GFP_KERNEL | GFP_DMA);
1751 if (fore200e->stats == NULL)
1752 return -ENOMEM;
1755 stats_dma_addr = fore200e->bus->dma_map(fore200e, fore200e->stats,
1756 sizeof(struct stats), DMA_FROM_DEVICE);
1758 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1760 opcode.opcode = OPCODE_GET_STATS;
1761 opcode.pad = 0;
1763 fore200e->bus->write(stats_dma_addr, &entry->cp_entry->cmd.stats_block.stats_haddr);
1765 *entry->status = STATUS_PENDING;
1767 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.stats_block.opcode);
1769 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1771 *entry->status = STATUS_FREE;
1773 fore200e->bus->dma_unmap(fore200e, stats_dma_addr, sizeof(struct stats), DMA_FROM_DEVICE);
1775 if (ok == 0) {
1776 printk(FORE200E "unable to get statistics from device %s\n", fore200e->name);
1777 return -EIO;
1780 return 0;
1784 static int
1785 fore200e_getsockopt(struct atm_vcc* vcc, int level, int optname, void __user *optval, int optlen)
1787 /* struct fore200e* fore200e = FORE200E_DEV(vcc->dev); */
1789 DPRINTK(2, "getsockopt %d.%d.%d, level = %d, optname = 0x%x, optval = 0x%p, optlen = %d\n",
1790 vcc->itf, vcc->vpi, vcc->vci, level, optname, optval, optlen);
1792 return -EINVAL;
1796 static int
1797 fore200e_setsockopt(struct atm_vcc* vcc, int level, int optname, void __user *optval, unsigned int optlen)
1799 /* struct fore200e* fore200e = FORE200E_DEV(vcc->dev); */
1801 DPRINTK(2, "setsockopt %d.%d.%d, level = %d, optname = 0x%x, optval = 0x%p, optlen = %d\n",
1802 vcc->itf, vcc->vpi, vcc->vci, level, optname, optval, optlen);
1804 return -EINVAL;
1808 #if 0 /* currently unused */
1809 static int
1810 fore200e_get_oc3(struct fore200e* fore200e, struct oc3_regs* regs)
1812 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1813 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1814 struct oc3_opcode opcode;
1815 int ok;
1816 u32 oc3_regs_dma_addr;
1818 oc3_regs_dma_addr = fore200e->bus->dma_map(fore200e, regs, sizeof(struct oc3_regs), DMA_FROM_DEVICE);
1820 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1822 opcode.opcode = OPCODE_GET_OC3;
1823 opcode.reg = 0;
1824 opcode.value = 0;
1825 opcode.mask = 0;
1827 fore200e->bus->write(oc3_regs_dma_addr, &entry->cp_entry->cmd.oc3_block.regs_haddr);
1829 *entry->status = STATUS_PENDING;
1831 fore200e->bus->write(*(u32*)&opcode, (u32*)&entry->cp_entry->cmd.oc3_block.opcode);
1833 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1835 *entry->status = STATUS_FREE;
1837 fore200e->bus->dma_unmap(fore200e, oc3_regs_dma_addr, sizeof(struct oc3_regs), DMA_FROM_DEVICE);
1839 if (ok == 0) {
1840 printk(FORE200E "unable to get OC-3 regs of device %s\n", fore200e->name);
1841 return -EIO;
1844 return 0;
1846 #endif
1849 static int
1850 fore200e_set_oc3(struct fore200e* fore200e, u32 reg, u32 value, u32 mask)
1852 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1853 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1854 struct oc3_opcode opcode;
1855 int ok;
1857 DPRINTK(2, "set OC-3 reg = 0x%02x, value = 0x%02x, mask = 0x%02x\n", reg, value, mask);
1859 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1861 opcode.opcode = OPCODE_SET_OC3;
1862 opcode.reg = reg;
1863 opcode.value = value;
1864 opcode.mask = mask;
1866 fore200e->bus->write(0, &entry->cp_entry->cmd.oc3_block.regs_haddr);
1868 *entry->status = STATUS_PENDING;
1870 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.oc3_block.opcode);
1872 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1874 *entry->status = STATUS_FREE;
1876 if (ok == 0) {
1877 printk(FORE200E "unable to set OC-3 reg 0x%02x of device %s\n", reg, fore200e->name);
1878 return -EIO;
1881 return 0;
1885 static int
1886 fore200e_setloop(struct fore200e* fore200e, int loop_mode)
1888 u32 mct_value, mct_mask;
1889 int error;
1891 if (!capable(CAP_NET_ADMIN))
1892 return -EPERM;
1894 switch (loop_mode) {
1896 case ATM_LM_NONE:
1897 mct_value = 0;
1898 mct_mask = SUNI_MCT_DLE | SUNI_MCT_LLE;
1899 break;
1901 case ATM_LM_LOC_PHY:
1902 mct_value = mct_mask = SUNI_MCT_DLE;
1903 break;
1905 case ATM_LM_RMT_PHY:
1906 mct_value = mct_mask = SUNI_MCT_LLE;
1907 break;
1909 default:
1910 return -EINVAL;
1913 error = fore200e_set_oc3(fore200e, SUNI_MCT, mct_value, mct_mask);
1914 if (error == 0)
1915 fore200e->loop_mode = loop_mode;
1917 return error;
1921 static int
1922 fore200e_fetch_stats(struct fore200e* fore200e, struct sonet_stats __user *arg)
1924 struct sonet_stats tmp;
1926 if (fore200e_getstats(fore200e) < 0)
1927 return -EIO;
1929 tmp.section_bip = be32_to_cpu(fore200e->stats->oc3.section_bip8_errors);
1930 tmp.line_bip = be32_to_cpu(fore200e->stats->oc3.line_bip24_errors);
1931 tmp.path_bip = be32_to_cpu(fore200e->stats->oc3.path_bip8_errors);
1932 tmp.line_febe = be32_to_cpu(fore200e->stats->oc3.line_febe_errors);
1933 tmp.path_febe = be32_to_cpu(fore200e->stats->oc3.path_febe_errors);
1934 tmp.corr_hcs = be32_to_cpu(fore200e->stats->oc3.corr_hcs_errors);
1935 tmp.uncorr_hcs = be32_to_cpu(fore200e->stats->oc3.ucorr_hcs_errors);
1936 tmp.tx_cells = be32_to_cpu(fore200e->stats->aal0.cells_transmitted) +
1937 be32_to_cpu(fore200e->stats->aal34.cells_transmitted) +
1938 be32_to_cpu(fore200e->stats->aal5.cells_transmitted);
1939 tmp.rx_cells = be32_to_cpu(fore200e->stats->aal0.cells_received) +
1940 be32_to_cpu(fore200e->stats->aal34.cells_received) +
1941 be32_to_cpu(fore200e->stats->aal5.cells_received);
1943 if (arg)
1944 return copy_to_user(arg, &tmp, sizeof(struct sonet_stats)) ? -EFAULT : 0;
1946 return 0;
1950 static int
1951 fore200e_ioctl(struct atm_dev* dev, unsigned int cmd, void __user * arg)
1953 struct fore200e* fore200e = FORE200E_DEV(dev);
1955 DPRINTK(2, "ioctl cmd = 0x%x (%u), arg = 0x%p (%lu)\n", cmd, cmd, arg, (unsigned long)arg);
1957 switch (cmd) {
1959 case SONET_GETSTAT:
1960 return fore200e_fetch_stats(fore200e, (struct sonet_stats __user *)arg);
1962 case SONET_GETDIAG:
1963 return put_user(0, (int __user *)arg) ? -EFAULT : 0;
1965 case ATM_SETLOOP:
1966 return fore200e_setloop(fore200e, (int)(unsigned long)arg);
1968 case ATM_GETLOOP:
1969 return put_user(fore200e->loop_mode, (int __user *)arg) ? -EFAULT : 0;
1971 case ATM_QUERYLOOP:
1972 return put_user(ATM_LM_LOC_PHY | ATM_LM_RMT_PHY, (int __user *)arg) ? -EFAULT : 0;
1975 return -ENOSYS; /* not implemented */
1979 static int
1980 fore200e_change_qos(struct atm_vcc* vcc,struct atm_qos* qos, int flags)
1982 struct fore200e_vcc* fore200e_vcc = FORE200E_VCC(vcc);
1983 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1985 if (!test_bit(ATM_VF_READY, &vcc->flags)) {
1986 DPRINTK(1, "VC %d.%d.%d not ready for QoS change\n", vcc->itf, vcc->vpi, vcc->vpi);
1987 return -EINVAL;
1990 DPRINTK(2, "change_qos %d.%d.%d, "
1991 "(tx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d; "
1992 "rx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d), flags = 0x%x\n"
1993 "available_cell_rate = %u",
1994 vcc->itf, vcc->vpi, vcc->vci,
1995 fore200e_traffic_class[ qos->txtp.traffic_class ],
1996 qos->txtp.min_pcr, qos->txtp.max_pcr, qos->txtp.max_cdv, qos->txtp.max_sdu,
1997 fore200e_traffic_class[ qos->rxtp.traffic_class ],
1998 qos->rxtp.min_pcr, qos->rxtp.max_pcr, qos->rxtp.max_cdv, qos->rxtp.max_sdu,
1999 flags, fore200e->available_cell_rate);
2001 if ((qos->txtp.traffic_class == ATM_CBR) && (qos->txtp.max_pcr > 0)) {
2003 mutex_lock(&fore200e->rate_mtx);
2004 if (fore200e->available_cell_rate + vcc->qos.txtp.max_pcr < qos->txtp.max_pcr) {
2005 mutex_unlock(&fore200e->rate_mtx);
2006 return -EAGAIN;
2009 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
2010 fore200e->available_cell_rate -= qos->txtp.max_pcr;
2012 mutex_unlock(&fore200e->rate_mtx);
2014 memcpy(&vcc->qos, qos, sizeof(struct atm_qos));
2016 /* update rate control parameters */
2017 fore200e_rate_ctrl(qos, &fore200e_vcc->rate);
2019 set_bit(ATM_VF_HASQOS, &vcc->flags);
2021 return 0;
2024 return -EINVAL;
2028 static int fore200e_irq_request(struct fore200e *fore200e)
2030 if (request_irq(fore200e->irq, fore200e_interrupt, IRQF_SHARED, fore200e->name, fore200e->atm_dev) < 0) {
2032 printk(FORE200E "unable to reserve IRQ %s for device %s\n",
2033 fore200e_irq_itoa(fore200e->irq), fore200e->name);
2034 return -EBUSY;
2037 printk(FORE200E "IRQ %s reserved for device %s\n",
2038 fore200e_irq_itoa(fore200e->irq), fore200e->name);
2040 #ifdef FORE200E_USE_TASKLET
2041 tasklet_init(&fore200e->tx_tasklet, fore200e_tx_tasklet, (unsigned long)fore200e);
2042 tasklet_init(&fore200e->rx_tasklet, fore200e_rx_tasklet, (unsigned long)fore200e);
2043 #endif
2045 fore200e->state = FORE200E_STATE_IRQ;
2046 return 0;
2050 static int fore200e_get_esi(struct fore200e *fore200e)
2052 struct prom_data* prom = kzalloc(sizeof(struct prom_data), GFP_KERNEL | GFP_DMA);
2053 int ok, i;
2055 if (!prom)
2056 return -ENOMEM;
2058 ok = fore200e->bus->prom_read(fore200e, prom);
2059 if (ok < 0) {
2060 kfree(prom);
2061 return -EBUSY;
2064 printk(FORE200E "device %s, rev. %c, S/N: %d, ESI: %pM\n",
2065 fore200e->name,
2066 (prom->hw_revision & 0xFF) + '@', /* probably meaningless with SBA boards */
2067 prom->serial_number & 0xFFFF, &prom->mac_addr[2]);
2069 for (i = 0; i < ESI_LEN; i++) {
2070 fore200e->esi[ i ] = fore200e->atm_dev->esi[ i ] = prom->mac_addr[ i + 2 ];
2073 kfree(prom);
2075 return 0;
2079 static int fore200e_alloc_rx_buf(struct fore200e *fore200e)
2081 int scheme, magn, nbr, size, i;
2083 struct host_bsq* bsq;
2084 struct buffer* buffer;
2086 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
2087 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
2089 bsq = &fore200e->host_bsq[ scheme ][ magn ];
2091 nbr = fore200e_rx_buf_nbr[ scheme ][ magn ];
2092 size = fore200e_rx_buf_size[ scheme ][ magn ];
2094 DPRINTK(2, "rx buffers %d / %d are being allocated\n", scheme, magn);
2096 /* allocate the array of receive buffers */
2097 buffer = bsq->buffer = kzalloc(nbr * sizeof(struct buffer), GFP_KERNEL);
2099 if (buffer == NULL)
2100 return -ENOMEM;
2102 bsq->freebuf = NULL;
2104 for (i = 0; i < nbr; i++) {
2106 buffer[ i ].scheme = scheme;
2107 buffer[ i ].magn = magn;
2108 #ifdef FORE200E_BSQ_DEBUG
2109 buffer[ i ].index = i;
2110 buffer[ i ].supplied = 0;
2111 #endif
2113 /* allocate the receive buffer body */
2114 if (fore200e_chunk_alloc(fore200e,
2115 &buffer[ i ].data, size, fore200e->bus->buffer_alignment,
2116 DMA_FROM_DEVICE) < 0) {
2118 while (i > 0)
2119 fore200e_chunk_free(fore200e, &buffer[ --i ].data);
2120 kfree(buffer);
2122 return -ENOMEM;
2125 /* insert the buffer into the free buffer list */
2126 buffer[ i ].next = bsq->freebuf;
2127 bsq->freebuf = &buffer[ i ];
2129 /* all the buffers are free, initially */
2130 bsq->freebuf_count = nbr;
2132 #ifdef FORE200E_BSQ_DEBUG
2133 bsq_audit(3, bsq, scheme, magn);
2134 #endif
2138 fore200e->state = FORE200E_STATE_ALLOC_BUF;
2139 return 0;
2143 static int fore200e_init_bs_queue(struct fore200e *fore200e)
2145 int scheme, magn, i;
2147 struct host_bsq* bsq;
2148 struct cp_bsq_entry __iomem * cp_entry;
2150 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
2151 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
2153 DPRINTK(2, "buffer supply queue %d / %d is being initialized\n", scheme, magn);
2155 bsq = &fore200e->host_bsq[ scheme ][ magn ];
2157 /* allocate and align the array of status words */
2158 if (fore200e->bus->dma_chunk_alloc(fore200e,
2159 &bsq->status,
2160 sizeof(enum status),
2161 QUEUE_SIZE_BS,
2162 fore200e->bus->status_alignment) < 0) {
2163 return -ENOMEM;
2166 /* allocate and align the array of receive buffer descriptors */
2167 if (fore200e->bus->dma_chunk_alloc(fore200e,
2168 &bsq->rbd_block,
2169 sizeof(struct rbd_block),
2170 QUEUE_SIZE_BS,
2171 fore200e->bus->descr_alignment) < 0) {
2173 fore200e->bus->dma_chunk_free(fore200e, &bsq->status);
2174 return -ENOMEM;
2177 /* get the base address of the cp resident buffer supply queue entries */
2178 cp_entry = fore200e->virt_base +
2179 fore200e->bus->read(&fore200e->cp_queues->cp_bsq[ scheme ][ magn ]);
2181 /* fill the host resident and cp resident buffer supply queue entries */
2182 for (i = 0; i < QUEUE_SIZE_BS; i++) {
2184 bsq->host_entry[ i ].status =
2185 FORE200E_INDEX(bsq->status.align_addr, enum status, i);
2186 bsq->host_entry[ i ].rbd_block =
2187 FORE200E_INDEX(bsq->rbd_block.align_addr, struct rbd_block, i);
2188 bsq->host_entry[ i ].rbd_block_dma =
2189 FORE200E_DMA_INDEX(bsq->rbd_block.dma_addr, struct rbd_block, i);
2190 bsq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2192 *bsq->host_entry[ i ].status = STATUS_FREE;
2194 fore200e->bus->write(FORE200E_DMA_INDEX(bsq->status.dma_addr, enum status, i),
2195 &cp_entry[ i ].status_haddr);
2200 fore200e->state = FORE200E_STATE_INIT_BSQ;
2201 return 0;
2205 static int fore200e_init_rx_queue(struct fore200e *fore200e)
2207 struct host_rxq* rxq = &fore200e->host_rxq;
2208 struct cp_rxq_entry __iomem * cp_entry;
2209 int i;
2211 DPRINTK(2, "receive queue is being initialized\n");
2213 /* allocate and align the array of status words */
2214 if (fore200e->bus->dma_chunk_alloc(fore200e,
2215 &rxq->status,
2216 sizeof(enum status),
2217 QUEUE_SIZE_RX,
2218 fore200e->bus->status_alignment) < 0) {
2219 return -ENOMEM;
2222 /* allocate and align the array of receive PDU descriptors */
2223 if (fore200e->bus->dma_chunk_alloc(fore200e,
2224 &rxq->rpd,
2225 sizeof(struct rpd),
2226 QUEUE_SIZE_RX,
2227 fore200e->bus->descr_alignment) < 0) {
2229 fore200e->bus->dma_chunk_free(fore200e, &rxq->status);
2230 return -ENOMEM;
2233 /* get the base address of the cp resident rx queue entries */
2234 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_rxq);
2236 /* fill the host resident and cp resident rx entries */
2237 for (i=0; i < QUEUE_SIZE_RX; i++) {
2239 rxq->host_entry[ i ].status =
2240 FORE200E_INDEX(rxq->status.align_addr, enum status, i);
2241 rxq->host_entry[ i ].rpd =
2242 FORE200E_INDEX(rxq->rpd.align_addr, struct rpd, i);
2243 rxq->host_entry[ i ].rpd_dma =
2244 FORE200E_DMA_INDEX(rxq->rpd.dma_addr, struct rpd, i);
2245 rxq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2247 *rxq->host_entry[ i ].status = STATUS_FREE;
2249 fore200e->bus->write(FORE200E_DMA_INDEX(rxq->status.dma_addr, enum status, i),
2250 &cp_entry[ i ].status_haddr);
2252 fore200e->bus->write(FORE200E_DMA_INDEX(rxq->rpd.dma_addr, struct rpd, i),
2253 &cp_entry[ i ].rpd_haddr);
2256 /* set the head entry of the queue */
2257 rxq->head = 0;
2259 fore200e->state = FORE200E_STATE_INIT_RXQ;
2260 return 0;
2264 static int fore200e_init_tx_queue(struct fore200e *fore200e)
2266 struct host_txq* txq = &fore200e->host_txq;
2267 struct cp_txq_entry __iomem * cp_entry;
2268 int i;
2270 DPRINTK(2, "transmit queue is being initialized\n");
2272 /* allocate and align the array of status words */
2273 if (fore200e->bus->dma_chunk_alloc(fore200e,
2274 &txq->status,
2275 sizeof(enum status),
2276 QUEUE_SIZE_TX,
2277 fore200e->bus->status_alignment) < 0) {
2278 return -ENOMEM;
2281 /* allocate and align the array of transmit PDU descriptors */
2282 if (fore200e->bus->dma_chunk_alloc(fore200e,
2283 &txq->tpd,
2284 sizeof(struct tpd),
2285 QUEUE_SIZE_TX,
2286 fore200e->bus->descr_alignment) < 0) {
2288 fore200e->bus->dma_chunk_free(fore200e, &txq->status);
2289 return -ENOMEM;
2292 /* get the base address of the cp resident tx queue entries */
2293 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_txq);
2295 /* fill the host resident and cp resident tx entries */
2296 for (i=0; i < QUEUE_SIZE_TX; i++) {
2298 txq->host_entry[ i ].status =
2299 FORE200E_INDEX(txq->status.align_addr, enum status, i);
2300 txq->host_entry[ i ].tpd =
2301 FORE200E_INDEX(txq->tpd.align_addr, struct tpd, i);
2302 txq->host_entry[ i ].tpd_dma =
2303 FORE200E_DMA_INDEX(txq->tpd.dma_addr, struct tpd, i);
2304 txq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2306 *txq->host_entry[ i ].status = STATUS_FREE;
2308 fore200e->bus->write(FORE200E_DMA_INDEX(txq->status.dma_addr, enum status, i),
2309 &cp_entry[ i ].status_haddr);
2311 /* although there is a one-to-one mapping of tx queue entries and tpds,
2312 we do not write here the DMA (physical) base address of each tpd into
2313 the related cp resident entry, because the cp relies on this write
2314 operation to detect that a new pdu has been submitted for tx */
2317 /* set the head and tail entries of the queue */
2318 txq->head = 0;
2319 txq->tail = 0;
2321 fore200e->state = FORE200E_STATE_INIT_TXQ;
2322 return 0;
2326 static int fore200e_init_cmd_queue(struct fore200e *fore200e)
2328 struct host_cmdq* cmdq = &fore200e->host_cmdq;
2329 struct cp_cmdq_entry __iomem * cp_entry;
2330 int i;
2332 DPRINTK(2, "command queue is being initialized\n");
2334 /* allocate and align the array of status words */
2335 if (fore200e->bus->dma_chunk_alloc(fore200e,
2336 &cmdq->status,
2337 sizeof(enum status),
2338 QUEUE_SIZE_CMD,
2339 fore200e->bus->status_alignment) < 0) {
2340 return -ENOMEM;
2343 /* get the base address of the cp resident cmd queue entries */
2344 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_cmdq);
2346 /* fill the host resident and cp resident cmd entries */
2347 for (i=0; i < QUEUE_SIZE_CMD; i++) {
2349 cmdq->host_entry[ i ].status =
2350 FORE200E_INDEX(cmdq->status.align_addr, enum status, i);
2351 cmdq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2353 *cmdq->host_entry[ i ].status = STATUS_FREE;
2355 fore200e->bus->write(FORE200E_DMA_INDEX(cmdq->status.dma_addr, enum status, i),
2356 &cp_entry[ i ].status_haddr);
2359 /* set the head entry of the queue */
2360 cmdq->head = 0;
2362 fore200e->state = FORE200E_STATE_INIT_CMDQ;
2363 return 0;
2367 static void fore200e_param_bs_queue(struct fore200e *fore200e,
2368 enum buffer_scheme scheme,
2369 enum buffer_magn magn, int queue_length,
2370 int pool_size, int supply_blksize)
2372 struct bs_spec __iomem * bs_spec = &fore200e->cp_queues->init.bs_spec[ scheme ][ magn ];
2374 fore200e->bus->write(queue_length, &bs_spec->queue_length);
2375 fore200e->bus->write(fore200e_rx_buf_size[ scheme ][ magn ], &bs_spec->buffer_size);
2376 fore200e->bus->write(pool_size, &bs_spec->pool_size);
2377 fore200e->bus->write(supply_blksize, &bs_spec->supply_blksize);
2381 static int fore200e_initialize(struct fore200e *fore200e)
2383 struct cp_queues __iomem * cpq;
2384 int ok, scheme, magn;
2386 DPRINTK(2, "device %s being initialized\n", fore200e->name);
2388 mutex_init(&fore200e->rate_mtx);
2389 spin_lock_init(&fore200e->q_lock);
2391 cpq = fore200e->cp_queues = fore200e->virt_base + FORE200E_CP_QUEUES_OFFSET;
2393 /* enable cp to host interrupts */
2394 fore200e->bus->write(1, &cpq->imask);
2396 if (fore200e->bus->irq_enable)
2397 fore200e->bus->irq_enable(fore200e);
2399 fore200e->bus->write(NBR_CONNECT, &cpq->init.num_connect);
2401 fore200e->bus->write(QUEUE_SIZE_CMD, &cpq->init.cmd_queue_len);
2402 fore200e->bus->write(QUEUE_SIZE_RX, &cpq->init.rx_queue_len);
2403 fore200e->bus->write(QUEUE_SIZE_TX, &cpq->init.tx_queue_len);
2405 fore200e->bus->write(RSD_EXTENSION, &cpq->init.rsd_extension);
2406 fore200e->bus->write(TSD_EXTENSION, &cpq->init.tsd_extension);
2408 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++)
2409 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++)
2410 fore200e_param_bs_queue(fore200e, scheme, magn,
2411 QUEUE_SIZE_BS,
2412 fore200e_rx_buf_nbr[ scheme ][ magn ],
2413 RBD_BLK_SIZE);
2415 /* issue the initialize command */
2416 fore200e->bus->write(STATUS_PENDING, &cpq->init.status);
2417 fore200e->bus->write(OPCODE_INITIALIZE, &cpq->init.opcode);
2419 ok = fore200e_io_poll(fore200e, &cpq->init.status, STATUS_COMPLETE, 3000);
2420 if (ok == 0) {
2421 printk(FORE200E "device %s initialization failed\n", fore200e->name);
2422 return -ENODEV;
2425 printk(FORE200E "device %s initialized\n", fore200e->name);
2427 fore200e->state = FORE200E_STATE_INITIALIZE;
2428 return 0;
2432 static void fore200e_monitor_putc(struct fore200e *fore200e, char c)
2434 struct cp_monitor __iomem * monitor = fore200e->cp_monitor;
2436 #if 0
2437 printk("%c", c);
2438 #endif
2439 fore200e->bus->write(((u32) c) | FORE200E_CP_MONITOR_UART_AVAIL, &monitor->soft_uart.send);
2443 static int fore200e_monitor_getc(struct fore200e *fore200e)
2445 struct cp_monitor __iomem * monitor = fore200e->cp_monitor;
2446 unsigned long timeout = jiffies + msecs_to_jiffies(50);
2447 int c;
2449 while (time_before(jiffies, timeout)) {
2451 c = (int) fore200e->bus->read(&monitor->soft_uart.recv);
2453 if (c & FORE200E_CP_MONITOR_UART_AVAIL) {
2455 fore200e->bus->write(FORE200E_CP_MONITOR_UART_FREE, &monitor->soft_uart.recv);
2456 #if 0
2457 printk("%c", c & 0xFF);
2458 #endif
2459 return c & 0xFF;
2463 return -1;
2467 static void fore200e_monitor_puts(struct fore200e *fore200e, char *str)
2469 while (*str) {
2471 /* the i960 monitor doesn't accept any new character if it has something to say */
2472 while (fore200e_monitor_getc(fore200e) >= 0);
2474 fore200e_monitor_putc(fore200e, *str++);
2477 while (fore200e_monitor_getc(fore200e) >= 0);
2480 #ifdef __LITTLE_ENDIAN
2481 #define FW_EXT ".bin"
2482 #else
2483 #define FW_EXT "_ecd.bin2"
2484 #endif
2486 static int fore200e_load_and_start_fw(struct fore200e *fore200e)
2488 const struct firmware *firmware;
2489 struct device *device;
2490 const struct fw_header *fw_header;
2491 const __le32 *fw_data;
2492 u32 fw_size;
2493 u32 __iomem *load_addr;
2494 char buf[48];
2495 int err = -ENODEV;
2497 if (strcmp(fore200e->bus->model_name, "PCA-200E") == 0)
2498 device = &((struct pci_dev *) fore200e->bus_dev)->dev;
2499 #ifdef CONFIG_SBUS
2500 else if (strcmp(fore200e->bus->model_name, "SBA-200E") == 0)
2501 device = &((struct platform_device *) fore200e->bus_dev)->dev;
2502 #endif
2503 else
2504 return err;
2506 sprintf(buf, "%s%s", fore200e->bus->proc_name, FW_EXT);
2507 if ((err = request_firmware(&firmware, buf, device)) < 0) {
2508 printk(FORE200E "problem loading firmware image %s\n", fore200e->bus->model_name);
2509 return err;
2512 fw_data = (const __le32 *)firmware->data;
2513 fw_size = firmware->size / sizeof(u32);
2514 fw_header = (const struct fw_header *)firmware->data;
2515 load_addr = fore200e->virt_base + le32_to_cpu(fw_header->load_offset);
2517 DPRINTK(2, "device %s firmware being loaded at 0x%p (%d words)\n",
2518 fore200e->name, load_addr, fw_size);
2520 if (le32_to_cpu(fw_header->magic) != FW_HEADER_MAGIC) {
2521 printk(FORE200E "corrupted %s firmware image\n", fore200e->bus->model_name);
2522 goto release;
2525 for (; fw_size--; fw_data++, load_addr++)
2526 fore200e->bus->write(le32_to_cpu(*fw_data), load_addr);
2528 DPRINTK(2, "device %s firmware being started\n", fore200e->name);
2530 #if defined(__sparc_v9__)
2531 /* reported to be required by SBA cards on some sparc64 hosts */
2532 fore200e_spin(100);
2533 #endif
2535 sprintf(buf, "\rgo %x\r", le32_to_cpu(fw_header->start_offset));
2536 fore200e_monitor_puts(fore200e, buf);
2538 if (fore200e_io_poll(fore200e, &fore200e->cp_monitor->bstat, BSTAT_CP_RUNNING, 1000) == 0) {
2539 printk(FORE200E "device %s firmware didn't start\n", fore200e->name);
2540 goto release;
2543 printk(FORE200E "device %s firmware started\n", fore200e->name);
2545 fore200e->state = FORE200E_STATE_START_FW;
2546 err = 0;
2548 release:
2549 release_firmware(firmware);
2550 return err;
2554 static int fore200e_register(struct fore200e *fore200e, struct device *parent)
2556 struct atm_dev* atm_dev;
2558 DPRINTK(2, "device %s being registered\n", fore200e->name);
2560 atm_dev = atm_dev_register(fore200e->bus->proc_name, parent, &fore200e_ops,
2561 -1, NULL);
2562 if (atm_dev == NULL) {
2563 printk(FORE200E "unable to register device %s\n", fore200e->name);
2564 return -ENODEV;
2567 atm_dev->dev_data = fore200e;
2568 fore200e->atm_dev = atm_dev;
2570 atm_dev->ci_range.vpi_bits = FORE200E_VPI_BITS;
2571 atm_dev->ci_range.vci_bits = FORE200E_VCI_BITS;
2573 fore200e->available_cell_rate = ATM_OC3_PCR;
2575 fore200e->state = FORE200E_STATE_REGISTER;
2576 return 0;
2580 static int fore200e_init(struct fore200e *fore200e, struct device *parent)
2582 if (fore200e_register(fore200e, parent) < 0)
2583 return -ENODEV;
2585 if (fore200e->bus->configure(fore200e) < 0)
2586 return -ENODEV;
2588 if (fore200e->bus->map(fore200e) < 0)
2589 return -ENODEV;
2591 if (fore200e_reset(fore200e, 1) < 0)
2592 return -ENODEV;
2594 if (fore200e_load_and_start_fw(fore200e) < 0)
2595 return -ENODEV;
2597 if (fore200e_initialize(fore200e) < 0)
2598 return -ENODEV;
2600 if (fore200e_init_cmd_queue(fore200e) < 0)
2601 return -ENOMEM;
2603 if (fore200e_init_tx_queue(fore200e) < 0)
2604 return -ENOMEM;
2606 if (fore200e_init_rx_queue(fore200e) < 0)
2607 return -ENOMEM;
2609 if (fore200e_init_bs_queue(fore200e) < 0)
2610 return -ENOMEM;
2612 if (fore200e_alloc_rx_buf(fore200e) < 0)
2613 return -ENOMEM;
2615 if (fore200e_get_esi(fore200e) < 0)
2616 return -EIO;
2618 if (fore200e_irq_request(fore200e) < 0)
2619 return -EBUSY;
2621 fore200e_supply(fore200e);
2623 /* all done, board initialization is now complete */
2624 fore200e->state = FORE200E_STATE_COMPLETE;
2625 return 0;
2628 #ifdef CONFIG_SBUS
2629 static const struct of_device_id fore200e_sba_match[];
2630 static int fore200e_sba_probe(struct platform_device *op)
2632 const struct of_device_id *match;
2633 const struct fore200e_bus *bus;
2634 struct fore200e *fore200e;
2635 static int index = 0;
2636 int err;
2638 match = of_match_device(fore200e_sba_match, &op->dev);
2639 if (!match)
2640 return -EINVAL;
2641 bus = match->data;
2643 fore200e = kzalloc(sizeof(struct fore200e), GFP_KERNEL);
2644 if (!fore200e)
2645 return -ENOMEM;
2647 fore200e->bus = bus;
2648 fore200e->bus_dev = op;
2649 fore200e->irq = op->archdata.irqs[0];
2650 fore200e->phys_base = op->resource[0].start;
2652 sprintf(fore200e->name, "%s-%d", bus->model_name, index);
2654 err = fore200e_init(fore200e, &op->dev);
2655 if (err < 0) {
2656 fore200e_shutdown(fore200e);
2657 kfree(fore200e);
2658 return err;
2661 index++;
2662 dev_set_drvdata(&op->dev, fore200e);
2664 return 0;
2667 static int fore200e_sba_remove(struct platform_device *op)
2669 struct fore200e *fore200e = dev_get_drvdata(&op->dev);
2671 fore200e_shutdown(fore200e);
2672 kfree(fore200e);
2674 return 0;
2677 static const struct of_device_id fore200e_sba_match[] = {
2679 .name = SBA200E_PROM_NAME,
2680 .data = (void *) &fore200e_bus[1],
2684 MODULE_DEVICE_TABLE(of, fore200e_sba_match);
2686 static struct platform_driver fore200e_sba_driver = {
2687 .driver = {
2688 .name = "fore_200e",
2689 .of_match_table = fore200e_sba_match,
2691 .probe = fore200e_sba_probe,
2692 .remove = fore200e_sba_remove,
2694 #endif
2696 #ifdef CONFIG_PCI
2697 static int fore200e_pca_detect(struct pci_dev *pci_dev,
2698 const struct pci_device_id *pci_ent)
2700 const struct fore200e_bus* bus = (struct fore200e_bus*) pci_ent->driver_data;
2701 struct fore200e* fore200e;
2702 int err = 0;
2703 static int index = 0;
2705 if (pci_enable_device(pci_dev)) {
2706 err = -EINVAL;
2707 goto out;
2710 if (dma_set_mask_and_coherent(&pci_dev->dev, DMA_BIT_MASK(32))) {
2711 err = -EINVAL;
2712 goto out;
2715 fore200e = kzalloc(sizeof(struct fore200e), GFP_KERNEL);
2716 if (fore200e == NULL) {
2717 err = -ENOMEM;
2718 goto out_disable;
2721 fore200e->bus = bus;
2722 fore200e->bus_dev = pci_dev;
2723 fore200e->irq = pci_dev->irq;
2724 fore200e->phys_base = pci_resource_start(pci_dev, 0);
2726 sprintf(fore200e->name, "%s-%d", bus->model_name, index - 1);
2728 pci_set_master(pci_dev);
2730 printk(FORE200E "device %s found at 0x%lx, IRQ %s\n",
2731 fore200e->bus->model_name,
2732 fore200e->phys_base, fore200e_irq_itoa(fore200e->irq));
2734 sprintf(fore200e->name, "%s-%d", bus->model_name, index);
2736 err = fore200e_init(fore200e, &pci_dev->dev);
2737 if (err < 0) {
2738 fore200e_shutdown(fore200e);
2739 goto out_free;
2742 ++index;
2743 pci_set_drvdata(pci_dev, fore200e);
2745 out:
2746 return err;
2748 out_free:
2749 kfree(fore200e);
2750 out_disable:
2751 pci_disable_device(pci_dev);
2752 goto out;
2756 static void fore200e_pca_remove_one(struct pci_dev *pci_dev)
2758 struct fore200e *fore200e;
2760 fore200e = pci_get_drvdata(pci_dev);
2762 fore200e_shutdown(fore200e);
2763 kfree(fore200e);
2764 pci_disable_device(pci_dev);
2768 static const struct pci_device_id fore200e_pca_tbl[] = {
2769 { PCI_VENDOR_ID_FORE, PCI_DEVICE_ID_FORE_PCA200E, PCI_ANY_ID, PCI_ANY_ID,
2770 0, 0, (unsigned long) &fore200e_bus[0] },
2771 { 0, }
2774 MODULE_DEVICE_TABLE(pci, fore200e_pca_tbl);
2776 static struct pci_driver fore200e_pca_driver = {
2777 .name = "fore_200e",
2778 .probe = fore200e_pca_detect,
2779 .remove = fore200e_pca_remove_one,
2780 .id_table = fore200e_pca_tbl,
2782 #endif
2784 static int __init fore200e_module_init(void)
2786 int err = 0;
2788 printk(FORE200E "FORE Systems 200E-series ATM driver - version " FORE200E_VERSION "\n");
2790 #ifdef CONFIG_SBUS
2791 err = platform_driver_register(&fore200e_sba_driver);
2792 if (err)
2793 return err;
2794 #endif
2796 #ifdef CONFIG_PCI
2797 err = pci_register_driver(&fore200e_pca_driver);
2798 #endif
2800 #ifdef CONFIG_SBUS
2801 if (err)
2802 platform_driver_unregister(&fore200e_sba_driver);
2803 #endif
2805 return err;
2808 static void __exit fore200e_module_cleanup(void)
2810 #ifdef CONFIG_PCI
2811 pci_unregister_driver(&fore200e_pca_driver);
2812 #endif
2813 #ifdef CONFIG_SBUS
2814 platform_driver_unregister(&fore200e_sba_driver);
2815 #endif
2818 static int
2819 fore200e_proc_read(struct atm_dev *dev, loff_t* pos, char* page)
2821 struct fore200e* fore200e = FORE200E_DEV(dev);
2822 struct fore200e_vcc* fore200e_vcc;
2823 struct atm_vcc* vcc;
2824 int i, len, left = *pos;
2825 unsigned long flags;
2827 if (!left--) {
2829 if (fore200e_getstats(fore200e) < 0)
2830 return -EIO;
2832 len = sprintf(page,"\n"
2833 " device:\n"
2834 " internal name:\t\t%s\n", fore200e->name);
2836 /* print bus-specific information */
2837 if (fore200e->bus->proc_read)
2838 len += fore200e->bus->proc_read(fore200e, page + len);
2840 len += sprintf(page + len,
2841 " interrupt line:\t\t%s\n"
2842 " physical base address:\t0x%p\n"
2843 " virtual base address:\t0x%p\n"
2844 " factory address (ESI):\t%pM\n"
2845 " board serial number:\t\t%d\n\n",
2846 fore200e_irq_itoa(fore200e->irq),
2847 (void*)fore200e->phys_base,
2848 fore200e->virt_base,
2849 fore200e->esi,
2850 fore200e->esi[4] * 256 + fore200e->esi[5]);
2852 return len;
2855 if (!left--)
2856 return sprintf(page,
2857 " free small bufs, scheme 1:\t%d\n"
2858 " free large bufs, scheme 1:\t%d\n"
2859 " free small bufs, scheme 2:\t%d\n"
2860 " free large bufs, scheme 2:\t%d\n",
2861 fore200e->host_bsq[ BUFFER_SCHEME_ONE ][ BUFFER_MAGN_SMALL ].freebuf_count,
2862 fore200e->host_bsq[ BUFFER_SCHEME_ONE ][ BUFFER_MAGN_LARGE ].freebuf_count,
2863 fore200e->host_bsq[ BUFFER_SCHEME_TWO ][ BUFFER_MAGN_SMALL ].freebuf_count,
2864 fore200e->host_bsq[ BUFFER_SCHEME_TWO ][ BUFFER_MAGN_LARGE ].freebuf_count);
2866 if (!left--) {
2867 u32 hb = fore200e->bus->read(&fore200e->cp_queues->heartbeat);
2869 len = sprintf(page,"\n\n"
2870 " cell processor:\n"
2871 " heartbeat state:\t\t");
2873 if (hb >> 16 != 0xDEAD)
2874 len += sprintf(page + len, "0x%08x\n", hb);
2875 else
2876 len += sprintf(page + len, "*** FATAL ERROR %04x ***\n", hb & 0xFFFF);
2878 return len;
2881 if (!left--) {
2882 static const char* media_name[] = {
2883 "unshielded twisted pair",
2884 "multimode optical fiber ST",
2885 "multimode optical fiber SC",
2886 "single-mode optical fiber ST",
2887 "single-mode optical fiber SC",
2888 "unknown"
2891 static const char* oc3_mode[] = {
2892 "normal operation",
2893 "diagnostic loopback",
2894 "line loopback",
2895 "unknown"
2898 u32 fw_release = fore200e->bus->read(&fore200e->cp_queues->fw_release);
2899 u32 mon960_release = fore200e->bus->read(&fore200e->cp_queues->mon960_release);
2900 u32 oc3_revision = fore200e->bus->read(&fore200e->cp_queues->oc3_revision);
2901 u32 media_index = FORE200E_MEDIA_INDEX(fore200e->bus->read(&fore200e->cp_queues->media_type));
2902 u32 oc3_index;
2904 if (media_index > 4)
2905 media_index = 5;
2907 switch (fore200e->loop_mode) {
2908 case ATM_LM_NONE: oc3_index = 0;
2909 break;
2910 case ATM_LM_LOC_PHY: oc3_index = 1;
2911 break;
2912 case ATM_LM_RMT_PHY: oc3_index = 2;
2913 break;
2914 default: oc3_index = 3;
2917 return sprintf(page,
2918 " firmware release:\t\t%d.%d.%d\n"
2919 " monitor release:\t\t%d.%d\n"
2920 " media type:\t\t\t%s\n"
2921 " OC-3 revision:\t\t0x%x\n"
2922 " OC-3 mode:\t\t\t%s",
2923 fw_release >> 16, fw_release << 16 >> 24, fw_release << 24 >> 24,
2924 mon960_release >> 16, mon960_release << 16 >> 16,
2925 media_name[ media_index ],
2926 oc3_revision,
2927 oc3_mode[ oc3_index ]);
2930 if (!left--) {
2931 struct cp_monitor __iomem * cp_monitor = fore200e->cp_monitor;
2933 return sprintf(page,
2934 "\n\n"
2935 " monitor:\n"
2936 " version number:\t\t%d\n"
2937 " boot status word:\t\t0x%08x\n",
2938 fore200e->bus->read(&cp_monitor->mon_version),
2939 fore200e->bus->read(&cp_monitor->bstat));
2942 if (!left--)
2943 return sprintf(page,
2944 "\n"
2945 " device statistics:\n"
2946 " 4b5b:\n"
2947 " crc_header_errors:\t\t%10u\n"
2948 " framing_errors:\t\t%10u\n",
2949 be32_to_cpu(fore200e->stats->phy.crc_header_errors),
2950 be32_to_cpu(fore200e->stats->phy.framing_errors));
2952 if (!left--)
2953 return sprintf(page, "\n"
2954 " OC-3:\n"
2955 " section_bip8_errors:\t%10u\n"
2956 " path_bip8_errors:\t\t%10u\n"
2957 " line_bip24_errors:\t\t%10u\n"
2958 " line_febe_errors:\t\t%10u\n"
2959 " path_febe_errors:\t\t%10u\n"
2960 " corr_hcs_errors:\t\t%10u\n"
2961 " ucorr_hcs_errors:\t\t%10u\n",
2962 be32_to_cpu(fore200e->stats->oc3.section_bip8_errors),
2963 be32_to_cpu(fore200e->stats->oc3.path_bip8_errors),
2964 be32_to_cpu(fore200e->stats->oc3.line_bip24_errors),
2965 be32_to_cpu(fore200e->stats->oc3.line_febe_errors),
2966 be32_to_cpu(fore200e->stats->oc3.path_febe_errors),
2967 be32_to_cpu(fore200e->stats->oc3.corr_hcs_errors),
2968 be32_to_cpu(fore200e->stats->oc3.ucorr_hcs_errors));
2970 if (!left--)
2971 return sprintf(page,"\n"
2972 " ATM:\t\t\t\t cells\n"
2973 " TX:\t\t\t%10u\n"
2974 " RX:\t\t\t%10u\n"
2975 " vpi out of range:\t\t%10u\n"
2976 " vpi no conn:\t\t%10u\n"
2977 " vci out of range:\t\t%10u\n"
2978 " vci no conn:\t\t%10u\n",
2979 be32_to_cpu(fore200e->stats->atm.cells_transmitted),
2980 be32_to_cpu(fore200e->stats->atm.cells_received),
2981 be32_to_cpu(fore200e->stats->atm.vpi_bad_range),
2982 be32_to_cpu(fore200e->stats->atm.vpi_no_conn),
2983 be32_to_cpu(fore200e->stats->atm.vci_bad_range),
2984 be32_to_cpu(fore200e->stats->atm.vci_no_conn));
2986 if (!left--)
2987 return sprintf(page,"\n"
2988 " AAL0:\t\t\t cells\n"
2989 " TX:\t\t\t%10u\n"
2990 " RX:\t\t\t%10u\n"
2991 " dropped:\t\t\t%10u\n",
2992 be32_to_cpu(fore200e->stats->aal0.cells_transmitted),
2993 be32_to_cpu(fore200e->stats->aal0.cells_received),
2994 be32_to_cpu(fore200e->stats->aal0.cells_dropped));
2996 if (!left--)
2997 return sprintf(page,"\n"
2998 " AAL3/4:\n"
2999 " SAR sublayer:\t\t cells\n"
3000 " TX:\t\t\t%10u\n"
3001 " RX:\t\t\t%10u\n"
3002 " dropped:\t\t\t%10u\n"
3003 " CRC errors:\t\t%10u\n"
3004 " protocol errors:\t\t%10u\n\n"
3005 " CS sublayer:\t\t PDUs\n"
3006 " TX:\t\t\t%10u\n"
3007 " RX:\t\t\t%10u\n"
3008 " dropped:\t\t\t%10u\n"
3009 " protocol errors:\t\t%10u\n",
3010 be32_to_cpu(fore200e->stats->aal34.cells_transmitted),
3011 be32_to_cpu(fore200e->stats->aal34.cells_received),
3012 be32_to_cpu(fore200e->stats->aal34.cells_dropped),
3013 be32_to_cpu(fore200e->stats->aal34.cells_crc_errors),
3014 be32_to_cpu(fore200e->stats->aal34.cells_protocol_errors),
3015 be32_to_cpu(fore200e->stats->aal34.cspdus_transmitted),
3016 be32_to_cpu(fore200e->stats->aal34.cspdus_received),
3017 be32_to_cpu(fore200e->stats->aal34.cspdus_dropped),
3018 be32_to_cpu(fore200e->stats->aal34.cspdus_protocol_errors));
3020 if (!left--)
3021 return sprintf(page,"\n"
3022 " AAL5:\n"
3023 " SAR sublayer:\t\t cells\n"
3024 " TX:\t\t\t%10u\n"
3025 " RX:\t\t\t%10u\n"
3026 " dropped:\t\t\t%10u\n"
3027 " congestions:\t\t%10u\n\n"
3028 " CS sublayer:\t\t PDUs\n"
3029 " TX:\t\t\t%10u\n"
3030 " RX:\t\t\t%10u\n"
3031 " dropped:\t\t\t%10u\n"
3032 " CRC errors:\t\t%10u\n"
3033 " protocol errors:\t\t%10u\n",
3034 be32_to_cpu(fore200e->stats->aal5.cells_transmitted),
3035 be32_to_cpu(fore200e->stats->aal5.cells_received),
3036 be32_to_cpu(fore200e->stats->aal5.cells_dropped),
3037 be32_to_cpu(fore200e->stats->aal5.congestion_experienced),
3038 be32_to_cpu(fore200e->stats->aal5.cspdus_transmitted),
3039 be32_to_cpu(fore200e->stats->aal5.cspdus_received),
3040 be32_to_cpu(fore200e->stats->aal5.cspdus_dropped),
3041 be32_to_cpu(fore200e->stats->aal5.cspdus_crc_errors),
3042 be32_to_cpu(fore200e->stats->aal5.cspdus_protocol_errors));
3044 if (!left--)
3045 return sprintf(page,"\n"
3046 " AUX:\t\t allocation failures\n"
3047 " small b1:\t\t\t%10u\n"
3048 " large b1:\t\t\t%10u\n"
3049 " small b2:\t\t\t%10u\n"
3050 " large b2:\t\t\t%10u\n"
3051 " RX PDUs:\t\t\t%10u\n"
3052 " TX PDUs:\t\t\t%10lu\n",
3053 be32_to_cpu(fore200e->stats->aux.small_b1_failed),
3054 be32_to_cpu(fore200e->stats->aux.large_b1_failed),
3055 be32_to_cpu(fore200e->stats->aux.small_b2_failed),
3056 be32_to_cpu(fore200e->stats->aux.large_b2_failed),
3057 be32_to_cpu(fore200e->stats->aux.rpd_alloc_failed),
3058 fore200e->tx_sat);
3060 if (!left--)
3061 return sprintf(page,"\n"
3062 " receive carrier:\t\t\t%s\n",
3063 fore200e->stats->aux.receive_carrier ? "ON" : "OFF!");
3065 if (!left--) {
3066 return sprintf(page,"\n"
3067 " VCCs:\n address VPI VCI AAL "
3068 "TX PDUs TX min/max size RX PDUs RX min/max size\n");
3071 for (i = 0; i < NBR_CONNECT; i++) {
3073 vcc = fore200e->vc_map[i].vcc;
3075 if (vcc == NULL)
3076 continue;
3078 spin_lock_irqsave(&fore200e->q_lock, flags);
3080 if (vcc && test_bit(ATM_VF_READY, &vcc->flags) && !left--) {
3082 fore200e_vcc = FORE200E_VCC(vcc);
3083 ASSERT(fore200e_vcc);
3085 len = sprintf(page,
3086 " %pK %03d %05d %1d %09lu %05d/%05d %09lu %05d/%05d\n",
3087 vcc,
3088 vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
3089 fore200e_vcc->tx_pdu,
3090 fore200e_vcc->tx_min_pdu > 0xFFFF ? 0 : fore200e_vcc->tx_min_pdu,
3091 fore200e_vcc->tx_max_pdu,
3092 fore200e_vcc->rx_pdu,
3093 fore200e_vcc->rx_min_pdu > 0xFFFF ? 0 : fore200e_vcc->rx_min_pdu,
3094 fore200e_vcc->rx_max_pdu);
3096 spin_unlock_irqrestore(&fore200e->q_lock, flags);
3097 return len;
3100 spin_unlock_irqrestore(&fore200e->q_lock, flags);
3103 return 0;
3106 module_init(fore200e_module_init);
3107 module_exit(fore200e_module_cleanup);
3110 static const struct atmdev_ops fore200e_ops =
3112 .open = fore200e_open,
3113 .close = fore200e_close,
3114 .ioctl = fore200e_ioctl,
3115 .getsockopt = fore200e_getsockopt,
3116 .setsockopt = fore200e_setsockopt,
3117 .send = fore200e_send,
3118 .change_qos = fore200e_change_qos,
3119 .proc_read = fore200e_proc_read,
3120 .owner = THIS_MODULE
3124 static const struct fore200e_bus fore200e_bus[] = {
3125 #ifdef CONFIG_PCI
3126 { "PCA-200E", "pca200e", 32, 4, 32,
3127 fore200e_pca_read,
3128 fore200e_pca_write,
3129 fore200e_pca_dma_map,
3130 fore200e_pca_dma_unmap,
3131 fore200e_pca_dma_sync_for_cpu,
3132 fore200e_pca_dma_sync_for_device,
3133 fore200e_pca_dma_chunk_alloc,
3134 fore200e_pca_dma_chunk_free,
3135 fore200e_pca_configure,
3136 fore200e_pca_map,
3137 fore200e_pca_reset,
3138 fore200e_pca_prom_read,
3139 fore200e_pca_unmap,
3140 NULL,
3141 fore200e_pca_irq_check,
3142 fore200e_pca_irq_ack,
3143 fore200e_pca_proc_read,
3145 #endif
3146 #ifdef CONFIG_SBUS
3147 { "SBA-200E", "sba200e", 32, 64, 32,
3148 fore200e_sba_read,
3149 fore200e_sba_write,
3150 fore200e_sba_dma_map,
3151 fore200e_sba_dma_unmap,
3152 fore200e_sba_dma_sync_for_cpu,
3153 fore200e_sba_dma_sync_for_device,
3154 fore200e_sba_dma_chunk_alloc,
3155 fore200e_sba_dma_chunk_free,
3156 fore200e_sba_configure,
3157 fore200e_sba_map,
3158 fore200e_sba_reset,
3159 fore200e_sba_prom_read,
3160 fore200e_sba_unmap,
3161 fore200e_sba_irq_enable,
3162 fore200e_sba_irq_check,
3163 fore200e_sba_irq_ack,
3164 fore200e_sba_proc_read,
3166 #endif
3170 MODULE_LICENSE("GPL");
3171 #ifdef CONFIG_PCI
3172 #ifdef __LITTLE_ENDIAN__
3173 MODULE_FIRMWARE("pca200e.bin");
3174 #else
3175 MODULE_FIRMWARE("pca200e_ecd.bin2");
3176 #endif
3177 #endif /* CONFIG_PCI */
3178 #ifdef CONFIG_SBUS
3179 MODULE_FIRMWARE("sba200e_ecd.bin2");
3180 #endif