x86/mm/pat: Don't report PAT on CPUs that don't support it
[linux/fpc-iii.git] / drivers / atm / fore200e.c
blob637c3e6b0f9ed3265da287c5a7a61c08180a74e6
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 case FORE200E_STATE_IRQ:
362 free_irq(fore200e->irq, fore200e->atm_dev);
364 case FORE200E_STATE_ALLOC_BUF:
365 fore200e_free_rx_buf(fore200e);
367 case FORE200E_STATE_INIT_BSQ:
368 fore200e_uninit_bs_queue(fore200e);
370 case FORE200E_STATE_INIT_RXQ:
371 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_rxq.status);
372 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_rxq.rpd);
374 case FORE200E_STATE_INIT_TXQ:
375 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_txq.status);
376 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_txq.tpd);
378 case FORE200E_STATE_INIT_CMDQ:
379 fore200e->bus->dma_chunk_free(fore200e, &fore200e->host_cmdq.status);
381 case FORE200E_STATE_INITIALIZE:
382 /* nothing to do for that state */
384 case FORE200E_STATE_START_FW:
385 /* nothing to do for that state */
387 case FORE200E_STATE_RESET:
388 /* nothing to do for that state */
390 case FORE200E_STATE_MAP:
391 fore200e->bus->unmap(fore200e);
393 case FORE200E_STATE_CONFIGURE:
394 /* nothing to do for that state */
396 case FORE200E_STATE_REGISTER:
397 /* XXX shouldn't we *start* by deregistering the device? */
398 atm_dev_deregister(fore200e->atm_dev);
400 case FORE200E_STATE_BLANK:
401 /* nothing to do for that state */
402 break;
407 #ifdef CONFIG_PCI
409 static u32 fore200e_pca_read(volatile u32 __iomem *addr)
411 /* on big-endian hosts, the board is configured to convert
412 the endianess of slave RAM accesses */
413 return le32_to_cpu(readl(addr));
417 static void fore200e_pca_write(u32 val, volatile u32 __iomem *addr)
419 /* on big-endian hosts, the board is configured to convert
420 the endianess of slave RAM accesses */
421 writel(cpu_to_le32(val), addr);
425 static u32
426 fore200e_pca_dma_map(struct fore200e* fore200e, void* virt_addr, int size, int direction)
428 u32 dma_addr = dma_map_single(&((struct pci_dev *) fore200e->bus_dev)->dev, virt_addr, size, direction);
430 DPRINTK(3, "PCI DVMA mapping: virt_addr = 0x%p, size = %d, direction = %d, --> dma_addr = 0x%08x\n",
431 virt_addr, size, direction, dma_addr);
433 return dma_addr;
437 static void
438 fore200e_pca_dma_unmap(struct fore200e* fore200e, u32 dma_addr, int size, int direction)
440 DPRINTK(3, "PCI DVMA unmapping: dma_addr = 0x%08x, size = %d, direction = %d\n",
441 dma_addr, size, direction);
443 dma_unmap_single(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
447 static void
448 fore200e_pca_dma_sync_for_cpu(struct fore200e* fore200e, u32 dma_addr, int size, int direction)
450 DPRINTK(3, "PCI DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
452 dma_sync_single_for_cpu(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
455 static void
456 fore200e_pca_dma_sync_for_device(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_device(&((struct pci_dev *) fore200e->bus_dev)->dev, dma_addr, size, direction);
464 /* allocate a DMA consistent chunk of memory intended to act as a communication mechanism
465 (to hold descriptors, status, queues, etc.) shared by the driver and the adapter */
467 static int
468 fore200e_pca_dma_chunk_alloc(struct fore200e* fore200e, struct chunk* chunk,
469 int size, int nbr, int alignment)
471 /* returned chunks are page-aligned */
472 chunk->alloc_size = size * nbr;
473 chunk->alloc_addr = dma_alloc_coherent(&((struct pci_dev *) fore200e->bus_dev)->dev,
474 chunk->alloc_size,
475 &chunk->dma_addr,
476 GFP_KERNEL);
478 if ((chunk->alloc_addr == NULL) || (chunk->dma_addr == 0))
479 return -ENOMEM;
481 chunk->align_addr = chunk->alloc_addr;
483 return 0;
487 /* free a DMA consistent chunk of memory */
489 static void
490 fore200e_pca_dma_chunk_free(struct fore200e* fore200e, struct chunk* chunk)
492 dma_free_coherent(&((struct pci_dev *) fore200e->bus_dev)->dev,
493 chunk->alloc_size,
494 chunk->alloc_addr,
495 chunk->dma_addr);
499 static int
500 fore200e_pca_irq_check(struct fore200e* fore200e)
502 /* this is a 1 bit register */
503 int irq_posted = readl(fore200e->regs.pca.psr);
505 #if defined(CONFIG_ATM_FORE200E_DEBUG) && (CONFIG_ATM_FORE200E_DEBUG == 2)
506 if (irq_posted && (readl(fore200e->regs.pca.hcr) & PCA200E_HCR_OUTFULL)) {
507 DPRINTK(2,"FIFO OUT full, device %d\n", fore200e->atm_dev->number);
509 #endif
511 return irq_posted;
515 static void
516 fore200e_pca_irq_ack(struct fore200e* fore200e)
518 writel(PCA200E_HCR_CLRINTR, fore200e->regs.pca.hcr);
522 static void
523 fore200e_pca_reset(struct fore200e* fore200e)
525 writel(PCA200E_HCR_RESET, fore200e->regs.pca.hcr);
526 fore200e_spin(10);
527 writel(0, fore200e->regs.pca.hcr);
531 static int fore200e_pca_map(struct fore200e* fore200e)
533 DPRINTK(2, "device %s being mapped in memory\n", fore200e->name);
535 fore200e->virt_base = ioremap(fore200e->phys_base, PCA200E_IOSPACE_LENGTH);
537 if (fore200e->virt_base == NULL) {
538 printk(FORE200E "can't map device %s\n", fore200e->name);
539 return -EFAULT;
542 DPRINTK(1, "device %s mapped to 0x%p\n", fore200e->name, fore200e->virt_base);
544 /* gain access to the PCA specific registers */
545 fore200e->regs.pca.hcr = fore200e->virt_base + PCA200E_HCR_OFFSET;
546 fore200e->regs.pca.imr = fore200e->virt_base + PCA200E_IMR_OFFSET;
547 fore200e->regs.pca.psr = fore200e->virt_base + PCA200E_PSR_OFFSET;
549 fore200e->state = FORE200E_STATE_MAP;
550 return 0;
554 static void
555 fore200e_pca_unmap(struct fore200e* fore200e)
557 DPRINTK(2, "device %s being unmapped from memory\n", fore200e->name);
559 if (fore200e->virt_base != NULL)
560 iounmap(fore200e->virt_base);
564 static int fore200e_pca_configure(struct fore200e *fore200e)
566 struct pci_dev* pci_dev = (struct pci_dev*)fore200e->bus_dev;
567 u8 master_ctrl, latency;
569 DPRINTK(2, "device %s being configured\n", fore200e->name);
571 if ((pci_dev->irq == 0) || (pci_dev->irq == 0xFF)) {
572 printk(FORE200E "incorrect IRQ setting - misconfigured PCI-PCI bridge?\n");
573 return -EIO;
576 pci_read_config_byte(pci_dev, PCA200E_PCI_MASTER_CTRL, &master_ctrl);
578 master_ctrl = master_ctrl
579 #if defined(__BIG_ENDIAN)
580 /* request the PCA board to convert the endianess of slave RAM accesses */
581 | PCA200E_CTRL_CONVERT_ENDIAN
582 #endif
583 #if 0
584 | PCA200E_CTRL_DIS_CACHE_RD
585 | PCA200E_CTRL_DIS_WRT_INVAL
586 | PCA200E_CTRL_ENA_CONT_REQ_MODE
587 | PCA200E_CTRL_2_CACHE_WRT_INVAL
588 #endif
589 | PCA200E_CTRL_LARGE_PCI_BURSTS;
591 pci_write_config_byte(pci_dev, PCA200E_PCI_MASTER_CTRL, master_ctrl);
593 /* raise latency from 32 (default) to 192, as this seems to prevent NIC
594 lockups (under heavy rx loads) due to continuous 'FIFO OUT full' condition.
595 this may impact the performances of other PCI devices on the same bus, though */
596 latency = 192;
597 pci_write_config_byte(pci_dev, PCI_LATENCY_TIMER, latency);
599 fore200e->state = FORE200E_STATE_CONFIGURE;
600 return 0;
604 static int __init
605 fore200e_pca_prom_read(struct fore200e* fore200e, struct prom_data* prom)
607 struct host_cmdq* cmdq = &fore200e->host_cmdq;
608 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
609 struct prom_opcode opcode;
610 int ok;
611 u32 prom_dma;
613 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
615 opcode.opcode = OPCODE_GET_PROM;
616 opcode.pad = 0;
618 prom_dma = fore200e->bus->dma_map(fore200e, prom, sizeof(struct prom_data), DMA_FROM_DEVICE);
620 fore200e->bus->write(prom_dma, &entry->cp_entry->cmd.prom_block.prom_haddr);
622 *entry->status = STATUS_PENDING;
624 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.prom_block.opcode);
626 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
628 *entry->status = STATUS_FREE;
630 fore200e->bus->dma_unmap(fore200e, prom_dma, sizeof(struct prom_data), DMA_FROM_DEVICE);
632 if (ok == 0) {
633 printk(FORE200E "unable to get PROM data from device %s\n", fore200e->name);
634 return -EIO;
637 #if defined(__BIG_ENDIAN)
639 #define swap_here(addr) (*((u32*)(addr)) = swab32( *((u32*)(addr)) ))
641 /* MAC address is stored as little-endian */
642 swap_here(&prom->mac_addr[0]);
643 swap_here(&prom->mac_addr[4]);
644 #endif
646 return 0;
650 static int
651 fore200e_pca_proc_read(struct fore200e* fore200e, char *page)
653 struct pci_dev* pci_dev = (struct pci_dev*)fore200e->bus_dev;
655 return sprintf(page, " PCI bus/slot/function:\t%d/%d/%d\n",
656 pci_dev->bus->number, PCI_SLOT(pci_dev->devfn), PCI_FUNC(pci_dev->devfn));
659 #endif /* CONFIG_PCI */
662 #ifdef CONFIG_SBUS
664 static u32 fore200e_sba_read(volatile u32 __iomem *addr)
666 return sbus_readl(addr);
669 static void fore200e_sba_write(u32 val, volatile u32 __iomem *addr)
671 sbus_writel(val, addr);
674 static u32 fore200e_sba_dma_map(struct fore200e *fore200e, void* virt_addr, int size, int direction)
676 struct platform_device *op = fore200e->bus_dev;
677 u32 dma_addr;
679 dma_addr = dma_map_single(&op->dev, virt_addr, size, direction);
681 DPRINTK(3, "SBUS DVMA mapping: virt_addr = 0x%p, size = %d, direction = %d --> dma_addr = 0x%08x\n",
682 virt_addr, size, direction, dma_addr);
684 return dma_addr;
687 static void fore200e_sba_dma_unmap(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
689 struct platform_device *op = fore200e->bus_dev;
691 DPRINTK(3, "SBUS DVMA unmapping: dma_addr = 0x%08x, size = %d, direction = %d,\n",
692 dma_addr, size, direction);
694 dma_unmap_single(&op->dev, dma_addr, size, direction);
697 static void fore200e_sba_dma_sync_for_cpu(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
699 struct platform_device *op = fore200e->bus_dev;
701 DPRINTK(3, "SBUS DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
703 dma_sync_single_for_cpu(&op->dev, dma_addr, size, direction);
706 static void fore200e_sba_dma_sync_for_device(struct fore200e *fore200e, u32 dma_addr, int size, int direction)
708 struct platform_device *op = fore200e->bus_dev;
710 DPRINTK(3, "SBUS DVMA sync: dma_addr = 0x%08x, size = %d, direction = %d\n", dma_addr, size, direction);
712 dma_sync_single_for_device(&op->dev, dma_addr, size, direction);
715 /* Allocate a DVMA consistent chunk of memory intended to act as a communication mechanism
716 * (to hold descriptors, status, queues, etc.) shared by the driver and the adapter.
718 static int fore200e_sba_dma_chunk_alloc(struct fore200e *fore200e, struct chunk *chunk,
719 int size, int nbr, int alignment)
721 struct platform_device *op = fore200e->bus_dev;
723 chunk->alloc_size = chunk->align_size = size * nbr;
725 /* returned chunks are page-aligned */
726 chunk->alloc_addr = dma_alloc_coherent(&op->dev, chunk->alloc_size,
727 &chunk->dma_addr, GFP_ATOMIC);
729 if ((chunk->alloc_addr == NULL) || (chunk->dma_addr == 0))
730 return -ENOMEM;
732 chunk->align_addr = chunk->alloc_addr;
734 return 0;
737 /* free a DVMA consistent chunk of memory */
738 static void fore200e_sba_dma_chunk_free(struct fore200e *fore200e, struct chunk *chunk)
740 struct platform_device *op = fore200e->bus_dev;
742 dma_free_coherent(&op->dev, chunk->alloc_size,
743 chunk->alloc_addr, chunk->dma_addr);
746 static void fore200e_sba_irq_enable(struct fore200e *fore200e)
748 u32 hcr = fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_STICKY;
749 fore200e->bus->write(hcr | SBA200E_HCR_INTR_ENA, fore200e->regs.sba.hcr);
752 static int fore200e_sba_irq_check(struct fore200e *fore200e)
754 return fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_INTR_REQ;
757 static void fore200e_sba_irq_ack(struct fore200e *fore200e)
759 u32 hcr = fore200e->bus->read(fore200e->regs.sba.hcr) & SBA200E_HCR_STICKY;
760 fore200e->bus->write(hcr | SBA200E_HCR_INTR_CLR, fore200e->regs.sba.hcr);
763 static void fore200e_sba_reset(struct fore200e *fore200e)
765 fore200e->bus->write(SBA200E_HCR_RESET, fore200e->regs.sba.hcr);
766 fore200e_spin(10);
767 fore200e->bus->write(0, fore200e->regs.sba.hcr);
770 static int __init fore200e_sba_map(struct fore200e *fore200e)
772 struct platform_device *op = fore200e->bus_dev;
773 unsigned int bursts;
775 /* gain access to the SBA specific registers */
776 fore200e->regs.sba.hcr = of_ioremap(&op->resource[0], 0, SBA200E_HCR_LENGTH, "SBA HCR");
777 fore200e->regs.sba.bsr = of_ioremap(&op->resource[1], 0, SBA200E_BSR_LENGTH, "SBA BSR");
778 fore200e->regs.sba.isr = of_ioremap(&op->resource[2], 0, SBA200E_ISR_LENGTH, "SBA ISR");
779 fore200e->virt_base = of_ioremap(&op->resource[3], 0, SBA200E_RAM_LENGTH, "SBA RAM");
781 if (!fore200e->virt_base) {
782 printk(FORE200E "unable to map RAM of device %s\n", fore200e->name);
783 return -EFAULT;
786 DPRINTK(1, "device %s mapped to 0x%p\n", fore200e->name, fore200e->virt_base);
788 fore200e->bus->write(0x02, fore200e->regs.sba.isr); /* XXX hardwired interrupt level */
790 /* get the supported DVMA burst sizes */
791 bursts = of_getintprop_default(op->dev.of_node->parent, "burst-sizes", 0x00);
793 if (sbus_can_dma_64bit())
794 sbus_set_sbus64(&op->dev, bursts);
796 fore200e->state = FORE200E_STATE_MAP;
797 return 0;
800 static void fore200e_sba_unmap(struct fore200e *fore200e)
802 struct platform_device *op = fore200e->bus_dev;
804 of_iounmap(&op->resource[0], fore200e->regs.sba.hcr, SBA200E_HCR_LENGTH);
805 of_iounmap(&op->resource[1], fore200e->regs.sba.bsr, SBA200E_BSR_LENGTH);
806 of_iounmap(&op->resource[2], fore200e->regs.sba.isr, SBA200E_ISR_LENGTH);
807 of_iounmap(&op->resource[3], fore200e->virt_base, SBA200E_RAM_LENGTH);
810 static int __init fore200e_sba_configure(struct fore200e *fore200e)
812 fore200e->state = FORE200E_STATE_CONFIGURE;
813 return 0;
816 static int __init fore200e_sba_prom_read(struct fore200e *fore200e, struct prom_data *prom)
818 struct platform_device *op = fore200e->bus_dev;
819 const u8 *prop;
820 int len;
822 prop = of_get_property(op->dev.of_node, "madaddrlo2", &len);
823 if (!prop)
824 return -ENODEV;
825 memcpy(&prom->mac_addr[4], prop, 4);
827 prop = of_get_property(op->dev.of_node, "madaddrhi4", &len);
828 if (!prop)
829 return -ENODEV;
830 memcpy(&prom->mac_addr[2], prop, 4);
832 prom->serial_number = of_getintprop_default(op->dev.of_node,
833 "serialnumber", 0);
834 prom->hw_revision = of_getintprop_default(op->dev.of_node,
835 "promversion", 0);
837 return 0;
840 static int fore200e_sba_proc_read(struct fore200e *fore200e, char *page)
842 struct platform_device *op = fore200e->bus_dev;
843 const struct linux_prom_registers *regs;
845 regs = of_get_property(op->dev.of_node, "reg", NULL);
847 return sprintf(page, " SBUS slot/device:\t\t%d/'%s'\n",
848 (regs ? regs->which_io : 0), op->dev.of_node->name);
850 #endif /* CONFIG_SBUS */
853 static void
854 fore200e_tx_irq(struct fore200e* fore200e)
856 struct host_txq* txq = &fore200e->host_txq;
857 struct host_txq_entry* entry;
858 struct atm_vcc* vcc;
859 struct fore200e_vc_map* vc_map;
861 if (fore200e->host_txq.txing == 0)
862 return;
864 for (;;) {
866 entry = &txq->host_entry[ txq->tail ];
868 if ((*entry->status & STATUS_COMPLETE) == 0) {
869 break;
872 DPRINTK(3, "TX COMPLETED: entry = %p [tail = %d], vc_map = %p, skb = %p\n",
873 entry, txq->tail, entry->vc_map, entry->skb);
875 /* free copy of misaligned data */
876 kfree(entry->data);
878 /* remove DMA mapping */
879 fore200e->bus->dma_unmap(fore200e, entry->tpd->tsd[ 0 ].buffer, entry->tpd->tsd[ 0 ].length,
880 DMA_TO_DEVICE);
882 vc_map = entry->vc_map;
884 /* vcc closed since the time the entry was submitted for tx? */
885 if ((vc_map->vcc == NULL) ||
886 (test_bit(ATM_VF_READY, &vc_map->vcc->flags) == 0)) {
888 DPRINTK(1, "no ready vcc found for PDU sent on device %d\n",
889 fore200e->atm_dev->number);
891 dev_kfree_skb_any(entry->skb);
893 else {
894 ASSERT(vc_map->vcc);
896 /* vcc closed then immediately re-opened? */
897 if (vc_map->incarn != entry->incarn) {
899 /* when a vcc is closed, some PDUs may be still pending in the tx queue.
900 if the same vcc is immediately re-opened, those pending PDUs must
901 not be popped after the completion of their emission, as they refer
902 to the prior incarnation of that vcc. otherwise, sk_atm(vcc)->sk_wmem_alloc
903 would be decremented by the size of the (unrelated) skb, possibly
904 leading to a negative sk->sk_wmem_alloc count, ultimately freezing the vcc.
905 we thus bind the tx entry to the current incarnation of the vcc
906 when the entry is submitted for tx. When the tx later completes,
907 if the incarnation number of the tx entry does not match the one
908 of the vcc, then this implies that the vcc has been closed then re-opened.
909 we thus just drop the skb here. */
911 DPRINTK(1, "vcc closed-then-re-opened; dropping PDU sent on device %d\n",
912 fore200e->atm_dev->number);
914 dev_kfree_skb_any(entry->skb);
916 else {
917 vcc = vc_map->vcc;
918 ASSERT(vcc);
920 /* notify tx completion */
921 if (vcc->pop) {
922 vcc->pop(vcc, entry->skb);
924 else {
925 dev_kfree_skb_any(entry->skb);
927 #if 1
928 /* race fixed by the above incarnation mechanism, but... */
929 if (atomic_read(&sk_atm(vcc)->sk_wmem_alloc) < 0) {
930 atomic_set(&sk_atm(vcc)->sk_wmem_alloc, 0);
932 #endif
933 /* check error condition */
934 if (*entry->status & STATUS_ERROR)
935 atomic_inc(&vcc->stats->tx_err);
936 else
937 atomic_inc(&vcc->stats->tx);
941 *entry->status = STATUS_FREE;
943 fore200e->host_txq.txing--;
945 FORE200E_NEXT_ENTRY(txq->tail, QUEUE_SIZE_TX);
950 #ifdef FORE200E_BSQ_DEBUG
951 int bsq_audit(int where, struct host_bsq* bsq, int scheme, int magn)
953 struct buffer* buffer;
954 int count = 0;
956 buffer = bsq->freebuf;
957 while (buffer) {
959 if (buffer->supplied) {
960 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld supplied but in free list!\n",
961 where, scheme, magn, buffer->index);
964 if (buffer->magn != magn) {
965 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld, unexpected magn = %d\n",
966 where, scheme, magn, buffer->index, buffer->magn);
969 if (buffer->scheme != scheme) {
970 printk(FORE200E "bsq_audit(%d): queue %d.%d, buffer %ld, unexpected scheme = %d\n",
971 where, scheme, magn, buffer->index, buffer->scheme);
974 if ((buffer->index < 0) || (buffer->index >= fore200e_rx_buf_nbr[ scheme ][ magn ])) {
975 printk(FORE200E "bsq_audit(%d): queue %d.%d, out of range buffer index = %ld !\n",
976 where, scheme, magn, buffer->index);
979 count++;
980 buffer = buffer->next;
983 if (count != bsq->freebuf_count) {
984 printk(FORE200E "bsq_audit(%d): queue %d.%d, %d bufs in free list, but freebuf_count = %d\n",
985 where, scheme, magn, count, bsq->freebuf_count);
987 return 0;
989 #endif
992 static void
993 fore200e_supply(struct fore200e* fore200e)
995 int scheme, magn, i;
997 struct host_bsq* bsq;
998 struct host_bsq_entry* entry;
999 struct buffer* buffer;
1001 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
1002 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
1004 bsq = &fore200e->host_bsq[ scheme ][ magn ];
1006 #ifdef FORE200E_BSQ_DEBUG
1007 bsq_audit(1, bsq, scheme, magn);
1008 #endif
1009 while (bsq->freebuf_count >= RBD_BLK_SIZE) {
1011 DPRINTK(2, "supplying %d rx buffers to queue %d / %d, freebuf_count = %d\n",
1012 RBD_BLK_SIZE, scheme, magn, bsq->freebuf_count);
1014 entry = &bsq->host_entry[ bsq->head ];
1016 for (i = 0; i < RBD_BLK_SIZE; i++) {
1018 /* take the first buffer in the free buffer list */
1019 buffer = bsq->freebuf;
1020 if (!buffer) {
1021 printk(FORE200E "no more free bufs in queue %d.%d, but freebuf_count = %d\n",
1022 scheme, magn, bsq->freebuf_count);
1023 return;
1025 bsq->freebuf = buffer->next;
1027 #ifdef FORE200E_BSQ_DEBUG
1028 if (buffer->supplied)
1029 printk(FORE200E "queue %d.%d, buffer %lu already supplied\n",
1030 scheme, magn, buffer->index);
1031 buffer->supplied = 1;
1032 #endif
1033 entry->rbd_block->rbd[ i ].buffer_haddr = buffer->data.dma_addr;
1034 entry->rbd_block->rbd[ i ].handle = FORE200E_BUF2HDL(buffer);
1037 FORE200E_NEXT_ENTRY(bsq->head, QUEUE_SIZE_BS);
1039 /* decrease accordingly the number of free rx buffers */
1040 bsq->freebuf_count -= RBD_BLK_SIZE;
1042 *entry->status = STATUS_PENDING;
1043 fore200e->bus->write(entry->rbd_block_dma, &entry->cp_entry->rbd_block_haddr);
1050 static int
1051 fore200e_push_rpd(struct fore200e* fore200e, struct atm_vcc* vcc, struct rpd* rpd)
1053 struct sk_buff* skb;
1054 struct buffer* buffer;
1055 struct fore200e_vcc* fore200e_vcc;
1056 int i, pdu_len = 0;
1057 #ifdef FORE200E_52BYTE_AAL0_SDU
1058 u32 cell_header = 0;
1059 #endif
1061 ASSERT(vcc);
1063 fore200e_vcc = FORE200E_VCC(vcc);
1064 ASSERT(fore200e_vcc);
1066 #ifdef FORE200E_52BYTE_AAL0_SDU
1067 if ((vcc->qos.aal == ATM_AAL0) && (vcc->qos.rxtp.max_sdu == ATM_AAL0_SDU)) {
1069 cell_header = (rpd->atm_header.gfc << ATM_HDR_GFC_SHIFT) |
1070 (rpd->atm_header.vpi << ATM_HDR_VPI_SHIFT) |
1071 (rpd->atm_header.vci << ATM_HDR_VCI_SHIFT) |
1072 (rpd->atm_header.plt << ATM_HDR_PTI_SHIFT) |
1073 rpd->atm_header.clp;
1074 pdu_len = 4;
1076 #endif
1078 /* compute total PDU length */
1079 for (i = 0; i < rpd->nseg; i++)
1080 pdu_len += rpd->rsd[ i ].length;
1082 skb = alloc_skb(pdu_len, GFP_ATOMIC);
1083 if (skb == NULL) {
1084 DPRINTK(2, "unable to alloc new skb, rx PDU length = %d\n", pdu_len);
1086 atomic_inc(&vcc->stats->rx_drop);
1087 return -ENOMEM;
1090 __net_timestamp(skb);
1092 #ifdef FORE200E_52BYTE_AAL0_SDU
1093 if (cell_header) {
1094 *((u32*)skb_put(skb, 4)) = cell_header;
1096 #endif
1098 /* reassemble segments */
1099 for (i = 0; i < rpd->nseg; i++) {
1101 /* rebuild rx buffer address from rsd handle */
1102 buffer = FORE200E_HDL2BUF(rpd->rsd[ i ].handle);
1104 /* Make device DMA transfer visible to CPU. */
1105 fore200e->bus->dma_sync_for_cpu(fore200e, buffer->data.dma_addr, rpd->rsd[ i ].length, DMA_FROM_DEVICE);
1107 memcpy(skb_put(skb, rpd->rsd[ i ].length), buffer->data.align_addr, rpd->rsd[ i ].length);
1109 /* Now let the device get at it again. */
1110 fore200e->bus->dma_sync_for_device(fore200e, buffer->data.dma_addr, rpd->rsd[ i ].length, DMA_FROM_DEVICE);
1113 DPRINTK(3, "rx skb: len = %d, truesize = %d\n", skb->len, skb->truesize);
1115 if (pdu_len < fore200e_vcc->rx_min_pdu)
1116 fore200e_vcc->rx_min_pdu = pdu_len;
1117 if (pdu_len > fore200e_vcc->rx_max_pdu)
1118 fore200e_vcc->rx_max_pdu = pdu_len;
1119 fore200e_vcc->rx_pdu++;
1121 /* push PDU */
1122 if (atm_charge(vcc, skb->truesize) == 0) {
1124 DPRINTK(2, "receive buffers saturated for %d.%d.%d - PDU dropped\n",
1125 vcc->itf, vcc->vpi, vcc->vci);
1127 dev_kfree_skb_any(skb);
1129 atomic_inc(&vcc->stats->rx_drop);
1130 return -ENOMEM;
1133 ASSERT(atomic_read(&sk_atm(vcc)->sk_wmem_alloc) >= 0);
1135 vcc->push(vcc, skb);
1136 atomic_inc(&vcc->stats->rx);
1138 ASSERT(atomic_read(&sk_atm(vcc)->sk_wmem_alloc) >= 0);
1140 return 0;
1144 static void
1145 fore200e_collect_rpd(struct fore200e* fore200e, struct rpd* rpd)
1147 struct host_bsq* bsq;
1148 struct buffer* buffer;
1149 int i;
1151 for (i = 0; i < rpd->nseg; i++) {
1153 /* rebuild rx buffer address from rsd handle */
1154 buffer = FORE200E_HDL2BUF(rpd->rsd[ i ].handle);
1156 bsq = &fore200e->host_bsq[ buffer->scheme ][ buffer->magn ];
1158 #ifdef FORE200E_BSQ_DEBUG
1159 bsq_audit(2, bsq, buffer->scheme, buffer->magn);
1161 if (buffer->supplied == 0)
1162 printk(FORE200E "queue %d.%d, buffer %ld was not supplied\n",
1163 buffer->scheme, buffer->magn, buffer->index);
1164 buffer->supplied = 0;
1165 #endif
1167 /* re-insert the buffer into the free buffer list */
1168 buffer->next = bsq->freebuf;
1169 bsq->freebuf = buffer;
1171 /* then increment the number of free rx buffers */
1172 bsq->freebuf_count++;
1177 static void
1178 fore200e_rx_irq(struct fore200e* fore200e)
1180 struct host_rxq* rxq = &fore200e->host_rxq;
1181 struct host_rxq_entry* entry;
1182 struct atm_vcc* vcc;
1183 struct fore200e_vc_map* vc_map;
1185 for (;;) {
1187 entry = &rxq->host_entry[ rxq->head ];
1189 /* no more received PDUs */
1190 if ((*entry->status & STATUS_COMPLETE) == 0)
1191 break;
1193 vc_map = FORE200E_VC_MAP(fore200e, entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1195 if ((vc_map->vcc == NULL) ||
1196 (test_bit(ATM_VF_READY, &vc_map->vcc->flags) == 0)) {
1198 DPRINTK(1, "no ready VC found for PDU received on %d.%d.%d\n",
1199 fore200e->atm_dev->number,
1200 entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1202 else {
1203 vcc = vc_map->vcc;
1204 ASSERT(vcc);
1206 if ((*entry->status & STATUS_ERROR) == 0) {
1208 fore200e_push_rpd(fore200e, vcc, entry->rpd);
1210 else {
1211 DPRINTK(2, "damaged PDU on %d.%d.%d\n",
1212 fore200e->atm_dev->number,
1213 entry->rpd->atm_header.vpi, entry->rpd->atm_header.vci);
1214 atomic_inc(&vcc->stats->rx_err);
1218 FORE200E_NEXT_ENTRY(rxq->head, QUEUE_SIZE_RX);
1220 fore200e_collect_rpd(fore200e, entry->rpd);
1222 /* rewrite the rpd address to ack the received PDU */
1223 fore200e->bus->write(entry->rpd_dma, &entry->cp_entry->rpd_haddr);
1224 *entry->status = STATUS_FREE;
1226 fore200e_supply(fore200e);
1231 #ifndef FORE200E_USE_TASKLET
1232 static void
1233 fore200e_irq(struct fore200e* fore200e)
1235 unsigned long flags;
1237 spin_lock_irqsave(&fore200e->q_lock, flags);
1238 fore200e_rx_irq(fore200e);
1239 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1241 spin_lock_irqsave(&fore200e->q_lock, flags);
1242 fore200e_tx_irq(fore200e);
1243 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1245 #endif
1248 static irqreturn_t
1249 fore200e_interrupt(int irq, void* dev)
1251 struct fore200e* fore200e = FORE200E_DEV((struct atm_dev*)dev);
1253 if (fore200e->bus->irq_check(fore200e) == 0) {
1255 DPRINTK(3, "interrupt NOT triggered by device %d\n", fore200e->atm_dev->number);
1256 return IRQ_NONE;
1258 DPRINTK(3, "interrupt triggered by device %d\n", fore200e->atm_dev->number);
1260 #ifdef FORE200E_USE_TASKLET
1261 tasklet_schedule(&fore200e->tx_tasklet);
1262 tasklet_schedule(&fore200e->rx_tasklet);
1263 #else
1264 fore200e_irq(fore200e);
1265 #endif
1267 fore200e->bus->irq_ack(fore200e);
1268 return IRQ_HANDLED;
1272 #ifdef FORE200E_USE_TASKLET
1273 static void
1274 fore200e_tx_tasklet(unsigned long data)
1276 struct fore200e* fore200e = (struct fore200e*) data;
1277 unsigned long flags;
1279 DPRINTK(3, "tx tasklet scheduled for device %d\n", fore200e->atm_dev->number);
1281 spin_lock_irqsave(&fore200e->q_lock, flags);
1282 fore200e_tx_irq(fore200e);
1283 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1287 static void
1288 fore200e_rx_tasklet(unsigned long data)
1290 struct fore200e* fore200e = (struct fore200e*) data;
1291 unsigned long flags;
1293 DPRINTK(3, "rx tasklet scheduled for device %d\n", fore200e->atm_dev->number);
1295 spin_lock_irqsave(&fore200e->q_lock, flags);
1296 fore200e_rx_irq((struct fore200e*) data);
1297 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1299 #endif
1302 static int
1303 fore200e_select_scheme(struct atm_vcc* vcc)
1305 /* fairly balance the VCs over (identical) buffer schemes */
1306 int scheme = vcc->vci % 2 ? BUFFER_SCHEME_ONE : BUFFER_SCHEME_TWO;
1308 DPRINTK(1, "VC %d.%d.%d uses buffer scheme %d\n",
1309 vcc->itf, vcc->vpi, vcc->vci, scheme);
1311 return scheme;
1315 static int
1316 fore200e_activate_vcin(struct fore200e* fore200e, int activate, struct atm_vcc* vcc, int mtu)
1318 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1319 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1320 struct activate_opcode activ_opcode;
1321 struct deactivate_opcode deactiv_opcode;
1322 struct vpvc vpvc;
1323 int ok;
1324 enum fore200e_aal aal = fore200e_atm2fore_aal(vcc->qos.aal);
1326 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1328 if (activate) {
1329 FORE200E_VCC(vcc)->scheme = fore200e_select_scheme(vcc);
1331 activ_opcode.opcode = OPCODE_ACTIVATE_VCIN;
1332 activ_opcode.aal = aal;
1333 activ_opcode.scheme = FORE200E_VCC(vcc)->scheme;
1334 activ_opcode.pad = 0;
1336 else {
1337 deactiv_opcode.opcode = OPCODE_DEACTIVATE_VCIN;
1338 deactiv_opcode.pad = 0;
1341 vpvc.vci = vcc->vci;
1342 vpvc.vpi = vcc->vpi;
1344 *entry->status = STATUS_PENDING;
1346 if (activate) {
1348 #ifdef FORE200E_52BYTE_AAL0_SDU
1349 mtu = 48;
1350 #endif
1351 /* the MTU is not used by the cp, except in the case of AAL0 */
1352 fore200e->bus->write(mtu, &entry->cp_entry->cmd.activate_block.mtu);
1353 fore200e->bus->write(*(u32*)&vpvc, (u32 __iomem *)&entry->cp_entry->cmd.activate_block.vpvc);
1354 fore200e->bus->write(*(u32*)&activ_opcode, (u32 __iomem *)&entry->cp_entry->cmd.activate_block.opcode);
1356 else {
1357 fore200e->bus->write(*(u32*)&vpvc, (u32 __iomem *)&entry->cp_entry->cmd.deactivate_block.vpvc);
1358 fore200e->bus->write(*(u32*)&deactiv_opcode, (u32 __iomem *)&entry->cp_entry->cmd.deactivate_block.opcode);
1361 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1363 *entry->status = STATUS_FREE;
1365 if (ok == 0) {
1366 printk(FORE200E "unable to %s VC %d.%d.%d\n",
1367 activate ? "open" : "close", vcc->itf, vcc->vpi, vcc->vci);
1368 return -EIO;
1371 DPRINTK(1, "VC %d.%d.%d %sed\n", vcc->itf, vcc->vpi, vcc->vci,
1372 activate ? "open" : "clos");
1374 return 0;
1378 #define FORE200E_MAX_BACK2BACK_CELLS 255 /* XXX depends on CDVT */
1380 static void
1381 fore200e_rate_ctrl(struct atm_qos* qos, struct tpd_rate* rate)
1383 if (qos->txtp.max_pcr < ATM_OC3_PCR) {
1385 /* compute the data cells to idle cells ratio from the tx PCR */
1386 rate->data_cells = qos->txtp.max_pcr * FORE200E_MAX_BACK2BACK_CELLS / ATM_OC3_PCR;
1387 rate->idle_cells = FORE200E_MAX_BACK2BACK_CELLS - rate->data_cells;
1389 else {
1390 /* disable rate control */
1391 rate->data_cells = rate->idle_cells = 0;
1396 static int
1397 fore200e_open(struct atm_vcc *vcc)
1399 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1400 struct fore200e_vcc* fore200e_vcc;
1401 struct fore200e_vc_map* vc_map;
1402 unsigned long flags;
1403 int vci = vcc->vci;
1404 short vpi = vcc->vpi;
1406 ASSERT((vpi >= 0) && (vpi < 1<<FORE200E_VPI_BITS));
1407 ASSERT((vci >= 0) && (vci < 1<<FORE200E_VCI_BITS));
1409 spin_lock_irqsave(&fore200e->q_lock, flags);
1411 vc_map = FORE200E_VC_MAP(fore200e, vpi, vci);
1412 if (vc_map->vcc) {
1414 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1416 printk(FORE200E "VC %d.%d.%d already in use\n",
1417 fore200e->atm_dev->number, vpi, vci);
1419 return -EINVAL;
1422 vc_map->vcc = vcc;
1424 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1426 fore200e_vcc = kzalloc(sizeof(struct fore200e_vcc), GFP_ATOMIC);
1427 if (fore200e_vcc == NULL) {
1428 vc_map->vcc = NULL;
1429 return -ENOMEM;
1432 DPRINTK(2, "opening %d.%d.%d:%d QoS = (tx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d; "
1433 "rx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d)\n",
1434 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1435 fore200e_traffic_class[ vcc->qos.txtp.traffic_class ],
1436 vcc->qos.txtp.min_pcr, vcc->qos.txtp.max_pcr, vcc->qos.txtp.max_cdv, vcc->qos.txtp.max_sdu,
1437 fore200e_traffic_class[ vcc->qos.rxtp.traffic_class ],
1438 vcc->qos.rxtp.min_pcr, vcc->qos.rxtp.max_pcr, vcc->qos.rxtp.max_cdv, vcc->qos.rxtp.max_sdu);
1440 /* pseudo-CBR bandwidth requested? */
1441 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1443 mutex_lock(&fore200e->rate_mtx);
1444 if (fore200e->available_cell_rate < vcc->qos.txtp.max_pcr) {
1445 mutex_unlock(&fore200e->rate_mtx);
1447 kfree(fore200e_vcc);
1448 vc_map->vcc = NULL;
1449 return -EAGAIN;
1452 /* reserve bandwidth */
1453 fore200e->available_cell_rate -= vcc->qos.txtp.max_pcr;
1454 mutex_unlock(&fore200e->rate_mtx);
1457 vcc->itf = vcc->dev->number;
1459 set_bit(ATM_VF_PARTIAL,&vcc->flags);
1460 set_bit(ATM_VF_ADDR, &vcc->flags);
1462 vcc->dev_data = fore200e_vcc;
1464 if (fore200e_activate_vcin(fore200e, 1, vcc, vcc->qos.rxtp.max_sdu) < 0) {
1466 vc_map->vcc = NULL;
1468 clear_bit(ATM_VF_ADDR, &vcc->flags);
1469 clear_bit(ATM_VF_PARTIAL,&vcc->flags);
1471 vcc->dev_data = NULL;
1473 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
1475 kfree(fore200e_vcc);
1476 return -EINVAL;
1479 /* compute rate control parameters */
1480 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1482 fore200e_rate_ctrl(&vcc->qos, &fore200e_vcc->rate);
1483 set_bit(ATM_VF_HASQOS, &vcc->flags);
1485 DPRINTK(3, "tx on %d.%d.%d:%d, tx PCR = %d, rx PCR = %d, data_cells = %u, idle_cells = %u\n",
1486 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1487 vcc->qos.txtp.max_pcr, vcc->qos.rxtp.max_pcr,
1488 fore200e_vcc->rate.data_cells, fore200e_vcc->rate.idle_cells);
1491 fore200e_vcc->tx_min_pdu = fore200e_vcc->rx_min_pdu = MAX_PDU_SIZE + 1;
1492 fore200e_vcc->tx_max_pdu = fore200e_vcc->rx_max_pdu = 0;
1493 fore200e_vcc->tx_pdu = fore200e_vcc->rx_pdu = 0;
1495 /* new incarnation of the vcc */
1496 vc_map->incarn = ++fore200e->incarn_count;
1498 /* VC unusable before this flag is set */
1499 set_bit(ATM_VF_READY, &vcc->flags);
1501 return 0;
1505 static void
1506 fore200e_close(struct atm_vcc* vcc)
1508 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1509 struct fore200e_vcc* fore200e_vcc;
1510 struct fore200e_vc_map* vc_map;
1511 unsigned long flags;
1513 ASSERT(vcc);
1514 ASSERT((vcc->vpi >= 0) && (vcc->vpi < 1<<FORE200E_VPI_BITS));
1515 ASSERT((vcc->vci >= 0) && (vcc->vci < 1<<FORE200E_VCI_BITS));
1517 DPRINTK(2, "closing %d.%d.%d:%d\n", vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal));
1519 clear_bit(ATM_VF_READY, &vcc->flags);
1521 fore200e_activate_vcin(fore200e, 0, vcc, 0);
1523 spin_lock_irqsave(&fore200e->q_lock, flags);
1525 vc_map = FORE200E_VC_MAP(fore200e, vcc->vpi, vcc->vci);
1527 /* the vc is no longer considered as "in use" by fore200e_open() */
1528 vc_map->vcc = NULL;
1530 vcc->itf = vcc->vci = vcc->vpi = 0;
1532 fore200e_vcc = FORE200E_VCC(vcc);
1533 vcc->dev_data = NULL;
1535 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1537 /* release reserved bandwidth, if any */
1538 if ((vcc->qos.txtp.traffic_class == ATM_CBR) && (vcc->qos.txtp.max_pcr > 0)) {
1540 mutex_lock(&fore200e->rate_mtx);
1541 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
1542 mutex_unlock(&fore200e->rate_mtx);
1544 clear_bit(ATM_VF_HASQOS, &vcc->flags);
1547 clear_bit(ATM_VF_ADDR, &vcc->flags);
1548 clear_bit(ATM_VF_PARTIAL,&vcc->flags);
1550 ASSERT(fore200e_vcc);
1551 kfree(fore200e_vcc);
1555 static int
1556 fore200e_send(struct atm_vcc *vcc, struct sk_buff *skb)
1558 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1559 struct fore200e_vcc* fore200e_vcc = FORE200E_VCC(vcc);
1560 struct fore200e_vc_map* vc_map;
1561 struct host_txq* txq = &fore200e->host_txq;
1562 struct host_txq_entry* entry;
1563 struct tpd* tpd;
1564 struct tpd_haddr tpd_haddr;
1565 int retry = CONFIG_ATM_FORE200E_TX_RETRY;
1566 int tx_copy = 0;
1567 int tx_len = skb->len;
1568 u32* cell_header = NULL;
1569 unsigned char* skb_data;
1570 int skb_len;
1571 unsigned char* data;
1572 unsigned long flags;
1574 ASSERT(vcc);
1575 ASSERT(atomic_read(&sk_atm(vcc)->sk_wmem_alloc) >= 0);
1576 ASSERT(fore200e);
1577 ASSERT(fore200e_vcc);
1579 if (!test_bit(ATM_VF_READY, &vcc->flags)) {
1580 DPRINTK(1, "VC %d.%d.%d not ready for tx\n", vcc->itf, vcc->vpi, vcc->vpi);
1581 dev_kfree_skb_any(skb);
1582 return -EINVAL;
1585 #ifdef FORE200E_52BYTE_AAL0_SDU
1586 if ((vcc->qos.aal == ATM_AAL0) && (vcc->qos.txtp.max_sdu == ATM_AAL0_SDU)) {
1587 cell_header = (u32*) skb->data;
1588 skb_data = skb->data + 4; /* skip 4-byte cell header */
1589 skb_len = tx_len = skb->len - 4;
1591 DPRINTK(3, "user-supplied cell header = 0x%08x\n", *cell_header);
1593 else
1594 #endif
1596 skb_data = skb->data;
1597 skb_len = skb->len;
1600 if (((unsigned long)skb_data) & 0x3) {
1602 DPRINTK(2, "misaligned tx PDU on device %s\n", fore200e->name);
1603 tx_copy = 1;
1604 tx_len = skb_len;
1607 if ((vcc->qos.aal == ATM_AAL0) && (skb_len % ATM_CELL_PAYLOAD)) {
1609 /* this simply NUKES the PCA board */
1610 DPRINTK(2, "incomplete tx AAL0 PDU on device %s\n", fore200e->name);
1611 tx_copy = 1;
1612 tx_len = ((skb_len / ATM_CELL_PAYLOAD) + 1) * ATM_CELL_PAYLOAD;
1615 if (tx_copy) {
1616 data = kmalloc(tx_len, GFP_ATOMIC | GFP_DMA);
1617 if (data == NULL) {
1618 if (vcc->pop) {
1619 vcc->pop(vcc, skb);
1621 else {
1622 dev_kfree_skb_any(skb);
1624 return -ENOMEM;
1627 memcpy(data, skb_data, skb_len);
1628 if (skb_len < tx_len)
1629 memset(data + skb_len, 0x00, tx_len - skb_len);
1631 else {
1632 data = skb_data;
1635 vc_map = FORE200E_VC_MAP(fore200e, vcc->vpi, vcc->vci);
1636 ASSERT(vc_map->vcc == vcc);
1638 retry_here:
1640 spin_lock_irqsave(&fore200e->q_lock, flags);
1642 entry = &txq->host_entry[ txq->head ];
1644 if ((*entry->status != STATUS_FREE) || (txq->txing >= QUEUE_SIZE_TX - 2)) {
1646 /* try to free completed tx queue entries */
1647 fore200e_tx_irq(fore200e);
1649 if (*entry->status != STATUS_FREE) {
1651 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1653 /* retry once again? */
1654 if (--retry > 0) {
1655 udelay(50);
1656 goto retry_here;
1659 atomic_inc(&vcc->stats->tx_err);
1661 fore200e->tx_sat++;
1662 DPRINTK(2, "tx queue of device %s is saturated, PDU dropped - heartbeat is %08x\n",
1663 fore200e->name, fore200e->cp_queues->heartbeat);
1664 if (vcc->pop) {
1665 vcc->pop(vcc, skb);
1667 else {
1668 dev_kfree_skb_any(skb);
1671 if (tx_copy)
1672 kfree(data);
1674 return -ENOBUFS;
1678 entry->incarn = vc_map->incarn;
1679 entry->vc_map = vc_map;
1680 entry->skb = skb;
1681 entry->data = tx_copy ? data : NULL;
1683 tpd = entry->tpd;
1684 tpd->tsd[ 0 ].buffer = fore200e->bus->dma_map(fore200e, data, tx_len, DMA_TO_DEVICE);
1685 tpd->tsd[ 0 ].length = tx_len;
1687 FORE200E_NEXT_ENTRY(txq->head, QUEUE_SIZE_TX);
1688 txq->txing++;
1690 /* The dma_map call above implies a dma_sync so the device can use it,
1691 * thus no explicit dma_sync call is necessary here.
1694 DPRINTK(3, "tx on %d.%d.%d:%d, len = %u (%u)\n",
1695 vcc->itf, vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
1696 tpd->tsd[0].length, skb_len);
1698 if (skb_len < fore200e_vcc->tx_min_pdu)
1699 fore200e_vcc->tx_min_pdu = skb_len;
1700 if (skb_len > fore200e_vcc->tx_max_pdu)
1701 fore200e_vcc->tx_max_pdu = skb_len;
1702 fore200e_vcc->tx_pdu++;
1704 /* set tx rate control information */
1705 tpd->rate.data_cells = fore200e_vcc->rate.data_cells;
1706 tpd->rate.idle_cells = fore200e_vcc->rate.idle_cells;
1708 if (cell_header) {
1709 tpd->atm_header.clp = (*cell_header & ATM_HDR_CLP);
1710 tpd->atm_header.plt = (*cell_header & ATM_HDR_PTI_MASK) >> ATM_HDR_PTI_SHIFT;
1711 tpd->atm_header.vci = (*cell_header & ATM_HDR_VCI_MASK) >> ATM_HDR_VCI_SHIFT;
1712 tpd->atm_header.vpi = (*cell_header & ATM_HDR_VPI_MASK) >> ATM_HDR_VPI_SHIFT;
1713 tpd->atm_header.gfc = (*cell_header & ATM_HDR_GFC_MASK) >> ATM_HDR_GFC_SHIFT;
1715 else {
1716 /* set the ATM header, common to all cells conveying the PDU */
1717 tpd->atm_header.clp = 0;
1718 tpd->atm_header.plt = 0;
1719 tpd->atm_header.vci = vcc->vci;
1720 tpd->atm_header.vpi = vcc->vpi;
1721 tpd->atm_header.gfc = 0;
1724 tpd->spec.length = tx_len;
1725 tpd->spec.nseg = 1;
1726 tpd->spec.aal = fore200e_atm2fore_aal(vcc->qos.aal);
1727 tpd->spec.intr = 1;
1729 tpd_haddr.size = sizeof(struct tpd) / (1<<TPD_HADDR_SHIFT); /* size is expressed in 32 byte blocks */
1730 tpd_haddr.pad = 0;
1731 tpd_haddr.haddr = entry->tpd_dma >> TPD_HADDR_SHIFT; /* shift the address, as we are in a bitfield */
1733 *entry->status = STATUS_PENDING;
1734 fore200e->bus->write(*(u32*)&tpd_haddr, (u32 __iomem *)&entry->cp_entry->tpd_haddr);
1736 spin_unlock_irqrestore(&fore200e->q_lock, flags);
1738 return 0;
1742 static int
1743 fore200e_getstats(struct fore200e* fore200e)
1745 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1746 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1747 struct stats_opcode opcode;
1748 int ok;
1749 u32 stats_dma_addr;
1751 if (fore200e->stats == NULL) {
1752 fore200e->stats = kzalloc(sizeof(struct stats), GFP_KERNEL | GFP_DMA);
1753 if (fore200e->stats == NULL)
1754 return -ENOMEM;
1757 stats_dma_addr = fore200e->bus->dma_map(fore200e, fore200e->stats,
1758 sizeof(struct stats), DMA_FROM_DEVICE);
1760 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1762 opcode.opcode = OPCODE_GET_STATS;
1763 opcode.pad = 0;
1765 fore200e->bus->write(stats_dma_addr, &entry->cp_entry->cmd.stats_block.stats_haddr);
1767 *entry->status = STATUS_PENDING;
1769 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.stats_block.opcode);
1771 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1773 *entry->status = STATUS_FREE;
1775 fore200e->bus->dma_unmap(fore200e, stats_dma_addr, sizeof(struct stats), DMA_FROM_DEVICE);
1777 if (ok == 0) {
1778 printk(FORE200E "unable to get statistics from device %s\n", fore200e->name);
1779 return -EIO;
1782 return 0;
1786 static int
1787 fore200e_getsockopt(struct atm_vcc* vcc, int level, int optname, void __user *optval, int optlen)
1789 /* struct fore200e* fore200e = FORE200E_DEV(vcc->dev); */
1791 DPRINTK(2, "getsockopt %d.%d.%d, level = %d, optname = 0x%x, optval = 0x%p, optlen = %d\n",
1792 vcc->itf, vcc->vpi, vcc->vci, level, optname, optval, optlen);
1794 return -EINVAL;
1798 static int
1799 fore200e_setsockopt(struct atm_vcc* vcc, int level, int optname, void __user *optval, unsigned int optlen)
1801 /* struct fore200e* fore200e = FORE200E_DEV(vcc->dev); */
1803 DPRINTK(2, "setsockopt %d.%d.%d, level = %d, optname = 0x%x, optval = 0x%p, optlen = %d\n",
1804 vcc->itf, vcc->vpi, vcc->vci, level, optname, optval, optlen);
1806 return -EINVAL;
1810 #if 0 /* currently unused */
1811 static int
1812 fore200e_get_oc3(struct fore200e* fore200e, struct oc3_regs* regs)
1814 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1815 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1816 struct oc3_opcode opcode;
1817 int ok;
1818 u32 oc3_regs_dma_addr;
1820 oc3_regs_dma_addr = fore200e->bus->dma_map(fore200e, regs, sizeof(struct oc3_regs), DMA_FROM_DEVICE);
1822 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1824 opcode.opcode = OPCODE_GET_OC3;
1825 opcode.reg = 0;
1826 opcode.value = 0;
1827 opcode.mask = 0;
1829 fore200e->bus->write(oc3_regs_dma_addr, &entry->cp_entry->cmd.oc3_block.regs_haddr);
1831 *entry->status = STATUS_PENDING;
1833 fore200e->bus->write(*(u32*)&opcode, (u32*)&entry->cp_entry->cmd.oc3_block.opcode);
1835 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1837 *entry->status = STATUS_FREE;
1839 fore200e->bus->dma_unmap(fore200e, oc3_regs_dma_addr, sizeof(struct oc3_regs), DMA_FROM_DEVICE);
1841 if (ok == 0) {
1842 printk(FORE200E "unable to get OC-3 regs of device %s\n", fore200e->name);
1843 return -EIO;
1846 return 0;
1848 #endif
1851 static int
1852 fore200e_set_oc3(struct fore200e* fore200e, u32 reg, u32 value, u32 mask)
1854 struct host_cmdq* cmdq = &fore200e->host_cmdq;
1855 struct host_cmdq_entry* entry = &cmdq->host_entry[ cmdq->head ];
1856 struct oc3_opcode opcode;
1857 int ok;
1859 DPRINTK(2, "set OC-3 reg = 0x%02x, value = 0x%02x, mask = 0x%02x\n", reg, value, mask);
1861 FORE200E_NEXT_ENTRY(cmdq->head, QUEUE_SIZE_CMD);
1863 opcode.opcode = OPCODE_SET_OC3;
1864 opcode.reg = reg;
1865 opcode.value = value;
1866 opcode.mask = mask;
1868 fore200e->bus->write(0, &entry->cp_entry->cmd.oc3_block.regs_haddr);
1870 *entry->status = STATUS_PENDING;
1872 fore200e->bus->write(*(u32*)&opcode, (u32 __iomem *)&entry->cp_entry->cmd.oc3_block.opcode);
1874 ok = fore200e_poll(fore200e, entry->status, STATUS_COMPLETE, 400);
1876 *entry->status = STATUS_FREE;
1878 if (ok == 0) {
1879 printk(FORE200E "unable to set OC-3 reg 0x%02x of device %s\n", reg, fore200e->name);
1880 return -EIO;
1883 return 0;
1887 static int
1888 fore200e_setloop(struct fore200e* fore200e, int loop_mode)
1890 u32 mct_value, mct_mask;
1891 int error;
1893 if (!capable(CAP_NET_ADMIN))
1894 return -EPERM;
1896 switch (loop_mode) {
1898 case ATM_LM_NONE:
1899 mct_value = 0;
1900 mct_mask = SUNI_MCT_DLE | SUNI_MCT_LLE;
1901 break;
1903 case ATM_LM_LOC_PHY:
1904 mct_value = mct_mask = SUNI_MCT_DLE;
1905 break;
1907 case ATM_LM_RMT_PHY:
1908 mct_value = mct_mask = SUNI_MCT_LLE;
1909 break;
1911 default:
1912 return -EINVAL;
1915 error = fore200e_set_oc3(fore200e, SUNI_MCT, mct_value, mct_mask);
1916 if (error == 0)
1917 fore200e->loop_mode = loop_mode;
1919 return error;
1923 static int
1924 fore200e_fetch_stats(struct fore200e* fore200e, struct sonet_stats __user *arg)
1926 struct sonet_stats tmp;
1928 if (fore200e_getstats(fore200e) < 0)
1929 return -EIO;
1931 tmp.section_bip = be32_to_cpu(fore200e->stats->oc3.section_bip8_errors);
1932 tmp.line_bip = be32_to_cpu(fore200e->stats->oc3.line_bip24_errors);
1933 tmp.path_bip = be32_to_cpu(fore200e->stats->oc3.path_bip8_errors);
1934 tmp.line_febe = be32_to_cpu(fore200e->stats->oc3.line_febe_errors);
1935 tmp.path_febe = be32_to_cpu(fore200e->stats->oc3.path_febe_errors);
1936 tmp.corr_hcs = be32_to_cpu(fore200e->stats->oc3.corr_hcs_errors);
1937 tmp.uncorr_hcs = be32_to_cpu(fore200e->stats->oc3.ucorr_hcs_errors);
1938 tmp.tx_cells = be32_to_cpu(fore200e->stats->aal0.cells_transmitted) +
1939 be32_to_cpu(fore200e->stats->aal34.cells_transmitted) +
1940 be32_to_cpu(fore200e->stats->aal5.cells_transmitted);
1941 tmp.rx_cells = be32_to_cpu(fore200e->stats->aal0.cells_received) +
1942 be32_to_cpu(fore200e->stats->aal34.cells_received) +
1943 be32_to_cpu(fore200e->stats->aal5.cells_received);
1945 if (arg)
1946 return copy_to_user(arg, &tmp, sizeof(struct sonet_stats)) ? -EFAULT : 0;
1948 return 0;
1952 static int
1953 fore200e_ioctl(struct atm_dev* dev, unsigned int cmd, void __user * arg)
1955 struct fore200e* fore200e = FORE200E_DEV(dev);
1957 DPRINTK(2, "ioctl cmd = 0x%x (%u), arg = 0x%p (%lu)\n", cmd, cmd, arg, (unsigned long)arg);
1959 switch (cmd) {
1961 case SONET_GETSTAT:
1962 return fore200e_fetch_stats(fore200e, (struct sonet_stats __user *)arg);
1964 case SONET_GETDIAG:
1965 return put_user(0, (int __user *)arg) ? -EFAULT : 0;
1967 case ATM_SETLOOP:
1968 return fore200e_setloop(fore200e, (int)(unsigned long)arg);
1970 case ATM_GETLOOP:
1971 return put_user(fore200e->loop_mode, (int __user *)arg) ? -EFAULT : 0;
1973 case ATM_QUERYLOOP:
1974 return put_user(ATM_LM_LOC_PHY | ATM_LM_RMT_PHY, (int __user *)arg) ? -EFAULT : 0;
1977 return -ENOSYS; /* not implemented */
1981 static int
1982 fore200e_change_qos(struct atm_vcc* vcc,struct atm_qos* qos, int flags)
1984 struct fore200e_vcc* fore200e_vcc = FORE200E_VCC(vcc);
1985 struct fore200e* fore200e = FORE200E_DEV(vcc->dev);
1987 if (!test_bit(ATM_VF_READY, &vcc->flags)) {
1988 DPRINTK(1, "VC %d.%d.%d not ready for QoS change\n", vcc->itf, vcc->vpi, vcc->vpi);
1989 return -EINVAL;
1992 DPRINTK(2, "change_qos %d.%d.%d, "
1993 "(tx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d; "
1994 "rx: cl=%s, pcr=%d-%d, cdv=%d, max_sdu=%d), flags = 0x%x\n"
1995 "available_cell_rate = %u",
1996 vcc->itf, vcc->vpi, vcc->vci,
1997 fore200e_traffic_class[ qos->txtp.traffic_class ],
1998 qos->txtp.min_pcr, qos->txtp.max_pcr, qos->txtp.max_cdv, qos->txtp.max_sdu,
1999 fore200e_traffic_class[ qos->rxtp.traffic_class ],
2000 qos->rxtp.min_pcr, qos->rxtp.max_pcr, qos->rxtp.max_cdv, qos->rxtp.max_sdu,
2001 flags, fore200e->available_cell_rate);
2003 if ((qos->txtp.traffic_class == ATM_CBR) && (qos->txtp.max_pcr > 0)) {
2005 mutex_lock(&fore200e->rate_mtx);
2006 if (fore200e->available_cell_rate + vcc->qos.txtp.max_pcr < qos->txtp.max_pcr) {
2007 mutex_unlock(&fore200e->rate_mtx);
2008 return -EAGAIN;
2011 fore200e->available_cell_rate += vcc->qos.txtp.max_pcr;
2012 fore200e->available_cell_rate -= qos->txtp.max_pcr;
2014 mutex_unlock(&fore200e->rate_mtx);
2016 memcpy(&vcc->qos, qos, sizeof(struct atm_qos));
2018 /* update rate control parameters */
2019 fore200e_rate_ctrl(qos, &fore200e_vcc->rate);
2021 set_bit(ATM_VF_HASQOS, &vcc->flags);
2023 return 0;
2026 return -EINVAL;
2030 static int fore200e_irq_request(struct fore200e *fore200e)
2032 if (request_irq(fore200e->irq, fore200e_interrupt, IRQF_SHARED, fore200e->name, fore200e->atm_dev) < 0) {
2034 printk(FORE200E "unable to reserve IRQ %s for device %s\n",
2035 fore200e_irq_itoa(fore200e->irq), fore200e->name);
2036 return -EBUSY;
2039 printk(FORE200E "IRQ %s reserved for device %s\n",
2040 fore200e_irq_itoa(fore200e->irq), fore200e->name);
2042 #ifdef FORE200E_USE_TASKLET
2043 tasklet_init(&fore200e->tx_tasklet, fore200e_tx_tasklet, (unsigned long)fore200e);
2044 tasklet_init(&fore200e->rx_tasklet, fore200e_rx_tasklet, (unsigned long)fore200e);
2045 #endif
2047 fore200e->state = FORE200E_STATE_IRQ;
2048 return 0;
2052 static int fore200e_get_esi(struct fore200e *fore200e)
2054 struct prom_data* prom = kzalloc(sizeof(struct prom_data), GFP_KERNEL | GFP_DMA);
2055 int ok, i;
2057 if (!prom)
2058 return -ENOMEM;
2060 ok = fore200e->bus->prom_read(fore200e, prom);
2061 if (ok < 0) {
2062 kfree(prom);
2063 return -EBUSY;
2066 printk(FORE200E "device %s, rev. %c, S/N: %d, ESI: %pM\n",
2067 fore200e->name,
2068 (prom->hw_revision & 0xFF) + '@', /* probably meaningless with SBA boards */
2069 prom->serial_number & 0xFFFF, &prom->mac_addr[2]);
2071 for (i = 0; i < ESI_LEN; i++) {
2072 fore200e->esi[ i ] = fore200e->atm_dev->esi[ i ] = prom->mac_addr[ i + 2 ];
2075 kfree(prom);
2077 return 0;
2081 static int fore200e_alloc_rx_buf(struct fore200e *fore200e)
2083 int scheme, magn, nbr, size, i;
2085 struct host_bsq* bsq;
2086 struct buffer* buffer;
2088 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
2089 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
2091 bsq = &fore200e->host_bsq[ scheme ][ magn ];
2093 nbr = fore200e_rx_buf_nbr[ scheme ][ magn ];
2094 size = fore200e_rx_buf_size[ scheme ][ magn ];
2096 DPRINTK(2, "rx buffers %d / %d are being allocated\n", scheme, magn);
2098 /* allocate the array of receive buffers */
2099 buffer = bsq->buffer = kzalloc(nbr * sizeof(struct buffer), GFP_KERNEL);
2101 if (buffer == NULL)
2102 return -ENOMEM;
2104 bsq->freebuf = NULL;
2106 for (i = 0; i < nbr; i++) {
2108 buffer[ i ].scheme = scheme;
2109 buffer[ i ].magn = magn;
2110 #ifdef FORE200E_BSQ_DEBUG
2111 buffer[ i ].index = i;
2112 buffer[ i ].supplied = 0;
2113 #endif
2115 /* allocate the receive buffer body */
2116 if (fore200e_chunk_alloc(fore200e,
2117 &buffer[ i ].data, size, fore200e->bus->buffer_alignment,
2118 DMA_FROM_DEVICE) < 0) {
2120 while (i > 0)
2121 fore200e_chunk_free(fore200e, &buffer[ --i ].data);
2122 kfree(buffer);
2124 return -ENOMEM;
2127 /* insert the buffer into the free buffer list */
2128 buffer[ i ].next = bsq->freebuf;
2129 bsq->freebuf = &buffer[ i ];
2131 /* all the buffers are free, initially */
2132 bsq->freebuf_count = nbr;
2134 #ifdef FORE200E_BSQ_DEBUG
2135 bsq_audit(3, bsq, scheme, magn);
2136 #endif
2140 fore200e->state = FORE200E_STATE_ALLOC_BUF;
2141 return 0;
2145 static int fore200e_init_bs_queue(struct fore200e *fore200e)
2147 int scheme, magn, i;
2149 struct host_bsq* bsq;
2150 struct cp_bsq_entry __iomem * cp_entry;
2152 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++) {
2153 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++) {
2155 DPRINTK(2, "buffer supply queue %d / %d is being initialized\n", scheme, magn);
2157 bsq = &fore200e->host_bsq[ scheme ][ magn ];
2159 /* allocate and align the array of status words */
2160 if (fore200e->bus->dma_chunk_alloc(fore200e,
2161 &bsq->status,
2162 sizeof(enum status),
2163 QUEUE_SIZE_BS,
2164 fore200e->bus->status_alignment) < 0) {
2165 return -ENOMEM;
2168 /* allocate and align the array of receive buffer descriptors */
2169 if (fore200e->bus->dma_chunk_alloc(fore200e,
2170 &bsq->rbd_block,
2171 sizeof(struct rbd_block),
2172 QUEUE_SIZE_BS,
2173 fore200e->bus->descr_alignment) < 0) {
2175 fore200e->bus->dma_chunk_free(fore200e, &bsq->status);
2176 return -ENOMEM;
2179 /* get the base address of the cp resident buffer supply queue entries */
2180 cp_entry = fore200e->virt_base +
2181 fore200e->bus->read(&fore200e->cp_queues->cp_bsq[ scheme ][ magn ]);
2183 /* fill the host resident and cp resident buffer supply queue entries */
2184 for (i = 0; i < QUEUE_SIZE_BS; i++) {
2186 bsq->host_entry[ i ].status =
2187 FORE200E_INDEX(bsq->status.align_addr, enum status, i);
2188 bsq->host_entry[ i ].rbd_block =
2189 FORE200E_INDEX(bsq->rbd_block.align_addr, struct rbd_block, i);
2190 bsq->host_entry[ i ].rbd_block_dma =
2191 FORE200E_DMA_INDEX(bsq->rbd_block.dma_addr, struct rbd_block, i);
2192 bsq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2194 *bsq->host_entry[ i ].status = STATUS_FREE;
2196 fore200e->bus->write(FORE200E_DMA_INDEX(bsq->status.dma_addr, enum status, i),
2197 &cp_entry[ i ].status_haddr);
2202 fore200e->state = FORE200E_STATE_INIT_BSQ;
2203 return 0;
2207 static int fore200e_init_rx_queue(struct fore200e *fore200e)
2209 struct host_rxq* rxq = &fore200e->host_rxq;
2210 struct cp_rxq_entry __iomem * cp_entry;
2211 int i;
2213 DPRINTK(2, "receive queue is being initialized\n");
2215 /* allocate and align the array of status words */
2216 if (fore200e->bus->dma_chunk_alloc(fore200e,
2217 &rxq->status,
2218 sizeof(enum status),
2219 QUEUE_SIZE_RX,
2220 fore200e->bus->status_alignment) < 0) {
2221 return -ENOMEM;
2224 /* allocate and align the array of receive PDU descriptors */
2225 if (fore200e->bus->dma_chunk_alloc(fore200e,
2226 &rxq->rpd,
2227 sizeof(struct rpd),
2228 QUEUE_SIZE_RX,
2229 fore200e->bus->descr_alignment) < 0) {
2231 fore200e->bus->dma_chunk_free(fore200e, &rxq->status);
2232 return -ENOMEM;
2235 /* get the base address of the cp resident rx queue entries */
2236 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_rxq);
2238 /* fill the host resident and cp resident rx entries */
2239 for (i=0; i < QUEUE_SIZE_RX; i++) {
2241 rxq->host_entry[ i ].status =
2242 FORE200E_INDEX(rxq->status.align_addr, enum status, i);
2243 rxq->host_entry[ i ].rpd =
2244 FORE200E_INDEX(rxq->rpd.align_addr, struct rpd, i);
2245 rxq->host_entry[ i ].rpd_dma =
2246 FORE200E_DMA_INDEX(rxq->rpd.dma_addr, struct rpd, i);
2247 rxq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2249 *rxq->host_entry[ i ].status = STATUS_FREE;
2251 fore200e->bus->write(FORE200E_DMA_INDEX(rxq->status.dma_addr, enum status, i),
2252 &cp_entry[ i ].status_haddr);
2254 fore200e->bus->write(FORE200E_DMA_INDEX(rxq->rpd.dma_addr, struct rpd, i),
2255 &cp_entry[ i ].rpd_haddr);
2258 /* set the head entry of the queue */
2259 rxq->head = 0;
2261 fore200e->state = FORE200E_STATE_INIT_RXQ;
2262 return 0;
2266 static int fore200e_init_tx_queue(struct fore200e *fore200e)
2268 struct host_txq* txq = &fore200e->host_txq;
2269 struct cp_txq_entry __iomem * cp_entry;
2270 int i;
2272 DPRINTK(2, "transmit queue is being initialized\n");
2274 /* allocate and align the array of status words */
2275 if (fore200e->bus->dma_chunk_alloc(fore200e,
2276 &txq->status,
2277 sizeof(enum status),
2278 QUEUE_SIZE_TX,
2279 fore200e->bus->status_alignment) < 0) {
2280 return -ENOMEM;
2283 /* allocate and align the array of transmit PDU descriptors */
2284 if (fore200e->bus->dma_chunk_alloc(fore200e,
2285 &txq->tpd,
2286 sizeof(struct tpd),
2287 QUEUE_SIZE_TX,
2288 fore200e->bus->descr_alignment) < 0) {
2290 fore200e->bus->dma_chunk_free(fore200e, &txq->status);
2291 return -ENOMEM;
2294 /* get the base address of the cp resident tx queue entries */
2295 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_txq);
2297 /* fill the host resident and cp resident tx entries */
2298 for (i=0; i < QUEUE_SIZE_TX; i++) {
2300 txq->host_entry[ i ].status =
2301 FORE200E_INDEX(txq->status.align_addr, enum status, i);
2302 txq->host_entry[ i ].tpd =
2303 FORE200E_INDEX(txq->tpd.align_addr, struct tpd, i);
2304 txq->host_entry[ i ].tpd_dma =
2305 FORE200E_DMA_INDEX(txq->tpd.dma_addr, struct tpd, i);
2306 txq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2308 *txq->host_entry[ i ].status = STATUS_FREE;
2310 fore200e->bus->write(FORE200E_DMA_INDEX(txq->status.dma_addr, enum status, i),
2311 &cp_entry[ i ].status_haddr);
2313 /* although there is a one-to-one mapping of tx queue entries and tpds,
2314 we do not write here the DMA (physical) base address of each tpd into
2315 the related cp resident entry, because the cp relies on this write
2316 operation to detect that a new pdu has been submitted for tx */
2319 /* set the head and tail entries of the queue */
2320 txq->head = 0;
2321 txq->tail = 0;
2323 fore200e->state = FORE200E_STATE_INIT_TXQ;
2324 return 0;
2328 static int fore200e_init_cmd_queue(struct fore200e *fore200e)
2330 struct host_cmdq* cmdq = &fore200e->host_cmdq;
2331 struct cp_cmdq_entry __iomem * cp_entry;
2332 int i;
2334 DPRINTK(2, "command queue is being initialized\n");
2336 /* allocate and align the array of status words */
2337 if (fore200e->bus->dma_chunk_alloc(fore200e,
2338 &cmdq->status,
2339 sizeof(enum status),
2340 QUEUE_SIZE_CMD,
2341 fore200e->bus->status_alignment) < 0) {
2342 return -ENOMEM;
2345 /* get the base address of the cp resident cmd queue entries */
2346 cp_entry = fore200e->virt_base + fore200e->bus->read(&fore200e->cp_queues->cp_cmdq);
2348 /* fill the host resident and cp resident cmd entries */
2349 for (i=0; i < QUEUE_SIZE_CMD; i++) {
2351 cmdq->host_entry[ i ].status =
2352 FORE200E_INDEX(cmdq->status.align_addr, enum status, i);
2353 cmdq->host_entry[ i ].cp_entry = &cp_entry[ i ];
2355 *cmdq->host_entry[ i ].status = STATUS_FREE;
2357 fore200e->bus->write(FORE200E_DMA_INDEX(cmdq->status.dma_addr, enum status, i),
2358 &cp_entry[ i ].status_haddr);
2361 /* set the head entry of the queue */
2362 cmdq->head = 0;
2364 fore200e->state = FORE200E_STATE_INIT_CMDQ;
2365 return 0;
2369 static void fore200e_param_bs_queue(struct fore200e *fore200e,
2370 enum buffer_scheme scheme,
2371 enum buffer_magn magn, int queue_length,
2372 int pool_size, int supply_blksize)
2374 struct bs_spec __iomem * bs_spec = &fore200e->cp_queues->init.bs_spec[ scheme ][ magn ];
2376 fore200e->bus->write(queue_length, &bs_spec->queue_length);
2377 fore200e->bus->write(fore200e_rx_buf_size[ scheme ][ magn ], &bs_spec->buffer_size);
2378 fore200e->bus->write(pool_size, &bs_spec->pool_size);
2379 fore200e->bus->write(supply_blksize, &bs_spec->supply_blksize);
2383 static int fore200e_initialize(struct fore200e *fore200e)
2385 struct cp_queues __iomem * cpq;
2386 int ok, scheme, magn;
2388 DPRINTK(2, "device %s being initialized\n", fore200e->name);
2390 mutex_init(&fore200e->rate_mtx);
2391 spin_lock_init(&fore200e->q_lock);
2393 cpq = fore200e->cp_queues = fore200e->virt_base + FORE200E_CP_QUEUES_OFFSET;
2395 /* enable cp to host interrupts */
2396 fore200e->bus->write(1, &cpq->imask);
2398 if (fore200e->bus->irq_enable)
2399 fore200e->bus->irq_enable(fore200e);
2401 fore200e->bus->write(NBR_CONNECT, &cpq->init.num_connect);
2403 fore200e->bus->write(QUEUE_SIZE_CMD, &cpq->init.cmd_queue_len);
2404 fore200e->bus->write(QUEUE_SIZE_RX, &cpq->init.rx_queue_len);
2405 fore200e->bus->write(QUEUE_SIZE_TX, &cpq->init.tx_queue_len);
2407 fore200e->bus->write(RSD_EXTENSION, &cpq->init.rsd_extension);
2408 fore200e->bus->write(TSD_EXTENSION, &cpq->init.tsd_extension);
2410 for (scheme = 0; scheme < BUFFER_SCHEME_NBR; scheme++)
2411 for (magn = 0; magn < BUFFER_MAGN_NBR; magn++)
2412 fore200e_param_bs_queue(fore200e, scheme, magn,
2413 QUEUE_SIZE_BS,
2414 fore200e_rx_buf_nbr[ scheme ][ magn ],
2415 RBD_BLK_SIZE);
2417 /* issue the initialize command */
2418 fore200e->bus->write(STATUS_PENDING, &cpq->init.status);
2419 fore200e->bus->write(OPCODE_INITIALIZE, &cpq->init.opcode);
2421 ok = fore200e_io_poll(fore200e, &cpq->init.status, STATUS_COMPLETE, 3000);
2422 if (ok == 0) {
2423 printk(FORE200E "device %s initialization failed\n", fore200e->name);
2424 return -ENODEV;
2427 printk(FORE200E "device %s initialized\n", fore200e->name);
2429 fore200e->state = FORE200E_STATE_INITIALIZE;
2430 return 0;
2434 static void fore200e_monitor_putc(struct fore200e *fore200e, char c)
2436 struct cp_monitor __iomem * monitor = fore200e->cp_monitor;
2438 #if 0
2439 printk("%c", c);
2440 #endif
2441 fore200e->bus->write(((u32) c) | FORE200E_CP_MONITOR_UART_AVAIL, &monitor->soft_uart.send);
2445 static int fore200e_monitor_getc(struct fore200e *fore200e)
2447 struct cp_monitor __iomem * monitor = fore200e->cp_monitor;
2448 unsigned long timeout = jiffies + msecs_to_jiffies(50);
2449 int c;
2451 while (time_before(jiffies, timeout)) {
2453 c = (int) fore200e->bus->read(&monitor->soft_uart.recv);
2455 if (c & FORE200E_CP_MONITOR_UART_AVAIL) {
2457 fore200e->bus->write(FORE200E_CP_MONITOR_UART_FREE, &monitor->soft_uart.recv);
2458 #if 0
2459 printk("%c", c & 0xFF);
2460 #endif
2461 return c & 0xFF;
2465 return -1;
2469 static void fore200e_monitor_puts(struct fore200e *fore200e, char *str)
2471 while (*str) {
2473 /* the i960 monitor doesn't accept any new character if it has something to say */
2474 while (fore200e_monitor_getc(fore200e) >= 0);
2476 fore200e_monitor_putc(fore200e, *str++);
2479 while (fore200e_monitor_getc(fore200e) >= 0);
2482 #ifdef __LITTLE_ENDIAN
2483 #define FW_EXT ".bin"
2484 #else
2485 #define FW_EXT "_ecd.bin2"
2486 #endif
2488 static int fore200e_load_and_start_fw(struct fore200e *fore200e)
2490 const struct firmware *firmware;
2491 struct device *device;
2492 const struct fw_header *fw_header;
2493 const __le32 *fw_data;
2494 u32 fw_size;
2495 u32 __iomem *load_addr;
2496 char buf[48];
2497 int err = -ENODEV;
2499 if (strcmp(fore200e->bus->model_name, "PCA-200E") == 0)
2500 device = &((struct pci_dev *) fore200e->bus_dev)->dev;
2501 #ifdef CONFIG_SBUS
2502 else if (strcmp(fore200e->bus->model_name, "SBA-200E") == 0)
2503 device = &((struct platform_device *) fore200e->bus_dev)->dev;
2504 #endif
2505 else
2506 return err;
2508 sprintf(buf, "%s%s", fore200e->bus->proc_name, FW_EXT);
2509 if ((err = request_firmware(&firmware, buf, device)) < 0) {
2510 printk(FORE200E "problem loading firmware image %s\n", fore200e->bus->model_name);
2511 return err;
2514 fw_data = (const __le32 *)firmware->data;
2515 fw_size = firmware->size / sizeof(u32);
2516 fw_header = (const struct fw_header *)firmware->data;
2517 load_addr = fore200e->virt_base + le32_to_cpu(fw_header->load_offset);
2519 DPRINTK(2, "device %s firmware being loaded at 0x%p (%d words)\n",
2520 fore200e->name, load_addr, fw_size);
2522 if (le32_to_cpu(fw_header->magic) != FW_HEADER_MAGIC) {
2523 printk(FORE200E "corrupted %s firmware image\n", fore200e->bus->model_name);
2524 goto release;
2527 for (; fw_size--; fw_data++, load_addr++)
2528 fore200e->bus->write(le32_to_cpu(*fw_data), load_addr);
2530 DPRINTK(2, "device %s firmware being started\n", fore200e->name);
2532 #if defined(__sparc_v9__)
2533 /* reported to be required by SBA cards on some sparc64 hosts */
2534 fore200e_spin(100);
2535 #endif
2537 sprintf(buf, "\rgo %x\r", le32_to_cpu(fw_header->start_offset));
2538 fore200e_monitor_puts(fore200e, buf);
2540 if (fore200e_io_poll(fore200e, &fore200e->cp_monitor->bstat, BSTAT_CP_RUNNING, 1000) == 0) {
2541 printk(FORE200E "device %s firmware didn't start\n", fore200e->name);
2542 goto release;
2545 printk(FORE200E "device %s firmware started\n", fore200e->name);
2547 fore200e->state = FORE200E_STATE_START_FW;
2548 err = 0;
2550 release:
2551 release_firmware(firmware);
2552 return err;
2556 static int fore200e_register(struct fore200e *fore200e, struct device *parent)
2558 struct atm_dev* atm_dev;
2560 DPRINTK(2, "device %s being registered\n", fore200e->name);
2562 atm_dev = atm_dev_register(fore200e->bus->proc_name, parent, &fore200e_ops,
2563 -1, NULL);
2564 if (atm_dev == NULL) {
2565 printk(FORE200E "unable to register device %s\n", fore200e->name);
2566 return -ENODEV;
2569 atm_dev->dev_data = fore200e;
2570 fore200e->atm_dev = atm_dev;
2572 atm_dev->ci_range.vpi_bits = FORE200E_VPI_BITS;
2573 atm_dev->ci_range.vci_bits = FORE200E_VCI_BITS;
2575 fore200e->available_cell_rate = ATM_OC3_PCR;
2577 fore200e->state = FORE200E_STATE_REGISTER;
2578 return 0;
2582 static int fore200e_init(struct fore200e *fore200e, struct device *parent)
2584 if (fore200e_register(fore200e, parent) < 0)
2585 return -ENODEV;
2587 if (fore200e->bus->configure(fore200e) < 0)
2588 return -ENODEV;
2590 if (fore200e->bus->map(fore200e) < 0)
2591 return -ENODEV;
2593 if (fore200e_reset(fore200e, 1) < 0)
2594 return -ENODEV;
2596 if (fore200e_load_and_start_fw(fore200e) < 0)
2597 return -ENODEV;
2599 if (fore200e_initialize(fore200e) < 0)
2600 return -ENODEV;
2602 if (fore200e_init_cmd_queue(fore200e) < 0)
2603 return -ENOMEM;
2605 if (fore200e_init_tx_queue(fore200e) < 0)
2606 return -ENOMEM;
2608 if (fore200e_init_rx_queue(fore200e) < 0)
2609 return -ENOMEM;
2611 if (fore200e_init_bs_queue(fore200e) < 0)
2612 return -ENOMEM;
2614 if (fore200e_alloc_rx_buf(fore200e) < 0)
2615 return -ENOMEM;
2617 if (fore200e_get_esi(fore200e) < 0)
2618 return -EIO;
2620 if (fore200e_irq_request(fore200e) < 0)
2621 return -EBUSY;
2623 fore200e_supply(fore200e);
2625 /* all done, board initialization is now complete */
2626 fore200e->state = FORE200E_STATE_COMPLETE;
2627 return 0;
2630 #ifdef CONFIG_SBUS
2631 static const struct of_device_id fore200e_sba_match[];
2632 static int fore200e_sba_probe(struct platform_device *op)
2634 const struct of_device_id *match;
2635 const struct fore200e_bus *bus;
2636 struct fore200e *fore200e;
2637 static int index = 0;
2638 int err;
2640 match = of_match_device(fore200e_sba_match, &op->dev);
2641 if (!match)
2642 return -EINVAL;
2643 bus = match->data;
2645 fore200e = kzalloc(sizeof(struct fore200e), GFP_KERNEL);
2646 if (!fore200e)
2647 return -ENOMEM;
2649 fore200e->bus = bus;
2650 fore200e->bus_dev = op;
2651 fore200e->irq = op->archdata.irqs[0];
2652 fore200e->phys_base = op->resource[0].start;
2654 sprintf(fore200e->name, "%s-%d", bus->model_name, index);
2656 err = fore200e_init(fore200e, &op->dev);
2657 if (err < 0) {
2658 fore200e_shutdown(fore200e);
2659 kfree(fore200e);
2660 return err;
2663 index++;
2664 dev_set_drvdata(&op->dev, fore200e);
2666 return 0;
2669 static int fore200e_sba_remove(struct platform_device *op)
2671 struct fore200e *fore200e = dev_get_drvdata(&op->dev);
2673 fore200e_shutdown(fore200e);
2674 kfree(fore200e);
2676 return 0;
2679 static const struct of_device_id fore200e_sba_match[] = {
2681 .name = SBA200E_PROM_NAME,
2682 .data = (void *) &fore200e_bus[1],
2686 MODULE_DEVICE_TABLE(of, fore200e_sba_match);
2688 static struct platform_driver fore200e_sba_driver = {
2689 .driver = {
2690 .name = "fore_200e",
2691 .of_match_table = fore200e_sba_match,
2693 .probe = fore200e_sba_probe,
2694 .remove = fore200e_sba_remove,
2696 #endif
2698 #ifdef CONFIG_PCI
2699 static int fore200e_pca_detect(struct pci_dev *pci_dev,
2700 const struct pci_device_id *pci_ent)
2702 const struct fore200e_bus* bus = (struct fore200e_bus*) pci_ent->driver_data;
2703 struct fore200e* fore200e;
2704 int err = 0;
2705 static int index = 0;
2707 if (pci_enable_device(pci_dev)) {
2708 err = -EINVAL;
2709 goto out;
2712 if (dma_set_mask_and_coherent(&pci_dev->dev, DMA_BIT_MASK(32))) {
2713 err = -EINVAL;
2714 goto out;
2717 fore200e = kzalloc(sizeof(struct fore200e), GFP_KERNEL);
2718 if (fore200e == NULL) {
2719 err = -ENOMEM;
2720 goto out_disable;
2723 fore200e->bus = bus;
2724 fore200e->bus_dev = pci_dev;
2725 fore200e->irq = pci_dev->irq;
2726 fore200e->phys_base = pci_resource_start(pci_dev, 0);
2728 sprintf(fore200e->name, "%s-%d", bus->model_name, index - 1);
2730 pci_set_master(pci_dev);
2732 printk(FORE200E "device %s found at 0x%lx, IRQ %s\n",
2733 fore200e->bus->model_name,
2734 fore200e->phys_base, fore200e_irq_itoa(fore200e->irq));
2736 sprintf(fore200e->name, "%s-%d", bus->model_name, index);
2738 err = fore200e_init(fore200e, &pci_dev->dev);
2739 if (err < 0) {
2740 fore200e_shutdown(fore200e);
2741 goto out_free;
2744 ++index;
2745 pci_set_drvdata(pci_dev, fore200e);
2747 out:
2748 return err;
2750 out_free:
2751 kfree(fore200e);
2752 out_disable:
2753 pci_disable_device(pci_dev);
2754 goto out;
2758 static void fore200e_pca_remove_one(struct pci_dev *pci_dev)
2760 struct fore200e *fore200e;
2762 fore200e = pci_get_drvdata(pci_dev);
2764 fore200e_shutdown(fore200e);
2765 kfree(fore200e);
2766 pci_disable_device(pci_dev);
2770 static struct pci_device_id fore200e_pca_tbl[] = {
2771 { PCI_VENDOR_ID_FORE, PCI_DEVICE_ID_FORE_PCA200E, PCI_ANY_ID, PCI_ANY_ID,
2772 0, 0, (unsigned long) &fore200e_bus[0] },
2773 { 0, }
2776 MODULE_DEVICE_TABLE(pci, fore200e_pca_tbl);
2778 static struct pci_driver fore200e_pca_driver = {
2779 .name = "fore_200e",
2780 .probe = fore200e_pca_detect,
2781 .remove = fore200e_pca_remove_one,
2782 .id_table = fore200e_pca_tbl,
2784 #endif
2786 static int __init fore200e_module_init(void)
2788 int err = 0;
2790 printk(FORE200E "FORE Systems 200E-series ATM driver - version " FORE200E_VERSION "\n");
2792 #ifdef CONFIG_SBUS
2793 err = platform_driver_register(&fore200e_sba_driver);
2794 if (err)
2795 return err;
2796 #endif
2798 #ifdef CONFIG_PCI
2799 err = pci_register_driver(&fore200e_pca_driver);
2800 #endif
2802 #ifdef CONFIG_SBUS
2803 if (err)
2804 platform_driver_unregister(&fore200e_sba_driver);
2805 #endif
2807 return err;
2810 static void __exit fore200e_module_cleanup(void)
2812 #ifdef CONFIG_PCI
2813 pci_unregister_driver(&fore200e_pca_driver);
2814 #endif
2815 #ifdef CONFIG_SBUS
2816 platform_driver_unregister(&fore200e_sba_driver);
2817 #endif
2820 static int
2821 fore200e_proc_read(struct atm_dev *dev, loff_t* pos, char* page)
2823 struct fore200e* fore200e = FORE200E_DEV(dev);
2824 struct fore200e_vcc* fore200e_vcc;
2825 struct atm_vcc* vcc;
2826 int i, len, left = *pos;
2827 unsigned long flags;
2829 if (!left--) {
2831 if (fore200e_getstats(fore200e) < 0)
2832 return -EIO;
2834 len = sprintf(page,"\n"
2835 " device:\n"
2836 " internal name:\t\t%s\n", fore200e->name);
2838 /* print bus-specific information */
2839 if (fore200e->bus->proc_read)
2840 len += fore200e->bus->proc_read(fore200e, page + len);
2842 len += sprintf(page + len,
2843 " interrupt line:\t\t%s\n"
2844 " physical base address:\t0x%p\n"
2845 " virtual base address:\t0x%p\n"
2846 " factory address (ESI):\t%pM\n"
2847 " board serial number:\t\t%d\n\n",
2848 fore200e_irq_itoa(fore200e->irq),
2849 (void*)fore200e->phys_base,
2850 fore200e->virt_base,
2851 fore200e->esi,
2852 fore200e->esi[4] * 256 + fore200e->esi[5]);
2854 return len;
2857 if (!left--)
2858 return sprintf(page,
2859 " free small bufs, scheme 1:\t%d\n"
2860 " free large bufs, scheme 1:\t%d\n"
2861 " free small bufs, scheme 2:\t%d\n"
2862 " free large bufs, scheme 2:\t%d\n",
2863 fore200e->host_bsq[ BUFFER_SCHEME_ONE ][ BUFFER_MAGN_SMALL ].freebuf_count,
2864 fore200e->host_bsq[ BUFFER_SCHEME_ONE ][ BUFFER_MAGN_LARGE ].freebuf_count,
2865 fore200e->host_bsq[ BUFFER_SCHEME_TWO ][ BUFFER_MAGN_SMALL ].freebuf_count,
2866 fore200e->host_bsq[ BUFFER_SCHEME_TWO ][ BUFFER_MAGN_LARGE ].freebuf_count);
2868 if (!left--) {
2869 u32 hb = fore200e->bus->read(&fore200e->cp_queues->heartbeat);
2871 len = sprintf(page,"\n\n"
2872 " cell processor:\n"
2873 " heartbeat state:\t\t");
2875 if (hb >> 16 != 0xDEAD)
2876 len += sprintf(page + len, "0x%08x\n", hb);
2877 else
2878 len += sprintf(page + len, "*** FATAL ERROR %04x ***\n", hb & 0xFFFF);
2880 return len;
2883 if (!left--) {
2884 static const char* media_name[] = {
2885 "unshielded twisted pair",
2886 "multimode optical fiber ST",
2887 "multimode optical fiber SC",
2888 "single-mode optical fiber ST",
2889 "single-mode optical fiber SC",
2890 "unknown"
2893 static const char* oc3_mode[] = {
2894 "normal operation",
2895 "diagnostic loopback",
2896 "line loopback",
2897 "unknown"
2900 u32 fw_release = fore200e->bus->read(&fore200e->cp_queues->fw_release);
2901 u32 mon960_release = fore200e->bus->read(&fore200e->cp_queues->mon960_release);
2902 u32 oc3_revision = fore200e->bus->read(&fore200e->cp_queues->oc3_revision);
2903 u32 media_index = FORE200E_MEDIA_INDEX(fore200e->bus->read(&fore200e->cp_queues->media_type));
2904 u32 oc3_index;
2906 if (media_index > 4)
2907 media_index = 5;
2909 switch (fore200e->loop_mode) {
2910 case ATM_LM_NONE: oc3_index = 0;
2911 break;
2912 case ATM_LM_LOC_PHY: oc3_index = 1;
2913 break;
2914 case ATM_LM_RMT_PHY: oc3_index = 2;
2915 break;
2916 default: oc3_index = 3;
2919 return sprintf(page,
2920 " firmware release:\t\t%d.%d.%d\n"
2921 " monitor release:\t\t%d.%d\n"
2922 " media type:\t\t\t%s\n"
2923 " OC-3 revision:\t\t0x%x\n"
2924 " OC-3 mode:\t\t\t%s",
2925 fw_release >> 16, fw_release << 16 >> 24, fw_release << 24 >> 24,
2926 mon960_release >> 16, mon960_release << 16 >> 16,
2927 media_name[ media_index ],
2928 oc3_revision,
2929 oc3_mode[ oc3_index ]);
2932 if (!left--) {
2933 struct cp_monitor __iomem * cp_monitor = fore200e->cp_monitor;
2935 return sprintf(page,
2936 "\n\n"
2937 " monitor:\n"
2938 " version number:\t\t%d\n"
2939 " boot status word:\t\t0x%08x\n",
2940 fore200e->bus->read(&cp_monitor->mon_version),
2941 fore200e->bus->read(&cp_monitor->bstat));
2944 if (!left--)
2945 return sprintf(page,
2946 "\n"
2947 " device statistics:\n"
2948 " 4b5b:\n"
2949 " crc_header_errors:\t\t%10u\n"
2950 " framing_errors:\t\t%10u\n",
2951 be32_to_cpu(fore200e->stats->phy.crc_header_errors),
2952 be32_to_cpu(fore200e->stats->phy.framing_errors));
2954 if (!left--)
2955 return sprintf(page, "\n"
2956 " OC-3:\n"
2957 " section_bip8_errors:\t%10u\n"
2958 " path_bip8_errors:\t\t%10u\n"
2959 " line_bip24_errors:\t\t%10u\n"
2960 " line_febe_errors:\t\t%10u\n"
2961 " path_febe_errors:\t\t%10u\n"
2962 " corr_hcs_errors:\t\t%10u\n"
2963 " ucorr_hcs_errors:\t\t%10u\n",
2964 be32_to_cpu(fore200e->stats->oc3.section_bip8_errors),
2965 be32_to_cpu(fore200e->stats->oc3.path_bip8_errors),
2966 be32_to_cpu(fore200e->stats->oc3.line_bip24_errors),
2967 be32_to_cpu(fore200e->stats->oc3.line_febe_errors),
2968 be32_to_cpu(fore200e->stats->oc3.path_febe_errors),
2969 be32_to_cpu(fore200e->stats->oc3.corr_hcs_errors),
2970 be32_to_cpu(fore200e->stats->oc3.ucorr_hcs_errors));
2972 if (!left--)
2973 return sprintf(page,"\n"
2974 " ATM:\t\t\t\t cells\n"
2975 " TX:\t\t\t%10u\n"
2976 " RX:\t\t\t%10u\n"
2977 " vpi out of range:\t\t%10u\n"
2978 " vpi no conn:\t\t%10u\n"
2979 " vci out of range:\t\t%10u\n"
2980 " vci no conn:\t\t%10u\n",
2981 be32_to_cpu(fore200e->stats->atm.cells_transmitted),
2982 be32_to_cpu(fore200e->stats->atm.cells_received),
2983 be32_to_cpu(fore200e->stats->atm.vpi_bad_range),
2984 be32_to_cpu(fore200e->stats->atm.vpi_no_conn),
2985 be32_to_cpu(fore200e->stats->atm.vci_bad_range),
2986 be32_to_cpu(fore200e->stats->atm.vci_no_conn));
2988 if (!left--)
2989 return sprintf(page,"\n"
2990 " AAL0:\t\t\t cells\n"
2991 " TX:\t\t\t%10u\n"
2992 " RX:\t\t\t%10u\n"
2993 " dropped:\t\t\t%10u\n",
2994 be32_to_cpu(fore200e->stats->aal0.cells_transmitted),
2995 be32_to_cpu(fore200e->stats->aal0.cells_received),
2996 be32_to_cpu(fore200e->stats->aal0.cells_dropped));
2998 if (!left--)
2999 return sprintf(page,"\n"
3000 " AAL3/4:\n"
3001 " SAR sublayer:\t\t cells\n"
3002 " TX:\t\t\t%10u\n"
3003 " RX:\t\t\t%10u\n"
3004 " dropped:\t\t\t%10u\n"
3005 " CRC errors:\t\t%10u\n"
3006 " protocol errors:\t\t%10u\n\n"
3007 " CS sublayer:\t\t PDUs\n"
3008 " TX:\t\t\t%10u\n"
3009 " RX:\t\t\t%10u\n"
3010 " dropped:\t\t\t%10u\n"
3011 " protocol errors:\t\t%10u\n",
3012 be32_to_cpu(fore200e->stats->aal34.cells_transmitted),
3013 be32_to_cpu(fore200e->stats->aal34.cells_received),
3014 be32_to_cpu(fore200e->stats->aal34.cells_dropped),
3015 be32_to_cpu(fore200e->stats->aal34.cells_crc_errors),
3016 be32_to_cpu(fore200e->stats->aal34.cells_protocol_errors),
3017 be32_to_cpu(fore200e->stats->aal34.cspdus_transmitted),
3018 be32_to_cpu(fore200e->stats->aal34.cspdus_received),
3019 be32_to_cpu(fore200e->stats->aal34.cspdus_dropped),
3020 be32_to_cpu(fore200e->stats->aal34.cspdus_protocol_errors));
3022 if (!left--)
3023 return sprintf(page,"\n"
3024 " AAL5:\n"
3025 " SAR sublayer:\t\t cells\n"
3026 " TX:\t\t\t%10u\n"
3027 " RX:\t\t\t%10u\n"
3028 " dropped:\t\t\t%10u\n"
3029 " congestions:\t\t%10u\n\n"
3030 " CS sublayer:\t\t PDUs\n"
3031 " TX:\t\t\t%10u\n"
3032 " RX:\t\t\t%10u\n"
3033 " dropped:\t\t\t%10u\n"
3034 " CRC errors:\t\t%10u\n"
3035 " protocol errors:\t\t%10u\n",
3036 be32_to_cpu(fore200e->stats->aal5.cells_transmitted),
3037 be32_to_cpu(fore200e->stats->aal5.cells_received),
3038 be32_to_cpu(fore200e->stats->aal5.cells_dropped),
3039 be32_to_cpu(fore200e->stats->aal5.congestion_experienced),
3040 be32_to_cpu(fore200e->stats->aal5.cspdus_transmitted),
3041 be32_to_cpu(fore200e->stats->aal5.cspdus_received),
3042 be32_to_cpu(fore200e->stats->aal5.cspdus_dropped),
3043 be32_to_cpu(fore200e->stats->aal5.cspdus_crc_errors),
3044 be32_to_cpu(fore200e->stats->aal5.cspdus_protocol_errors));
3046 if (!left--)
3047 return sprintf(page,"\n"
3048 " AUX:\t\t allocation failures\n"
3049 " small b1:\t\t\t%10u\n"
3050 " large b1:\t\t\t%10u\n"
3051 " small b2:\t\t\t%10u\n"
3052 " large b2:\t\t\t%10u\n"
3053 " RX PDUs:\t\t\t%10u\n"
3054 " TX PDUs:\t\t\t%10lu\n",
3055 be32_to_cpu(fore200e->stats->aux.small_b1_failed),
3056 be32_to_cpu(fore200e->stats->aux.large_b1_failed),
3057 be32_to_cpu(fore200e->stats->aux.small_b2_failed),
3058 be32_to_cpu(fore200e->stats->aux.large_b2_failed),
3059 be32_to_cpu(fore200e->stats->aux.rpd_alloc_failed),
3060 fore200e->tx_sat);
3062 if (!left--)
3063 return sprintf(page,"\n"
3064 " receive carrier:\t\t\t%s\n",
3065 fore200e->stats->aux.receive_carrier ? "ON" : "OFF!");
3067 if (!left--) {
3068 return sprintf(page,"\n"
3069 " VCCs:\n address VPI VCI AAL "
3070 "TX PDUs TX min/max size RX PDUs RX min/max size\n");
3073 for (i = 0; i < NBR_CONNECT; i++) {
3075 vcc = fore200e->vc_map[i].vcc;
3077 if (vcc == NULL)
3078 continue;
3080 spin_lock_irqsave(&fore200e->q_lock, flags);
3082 if (vcc && test_bit(ATM_VF_READY, &vcc->flags) && !left--) {
3084 fore200e_vcc = FORE200E_VCC(vcc);
3085 ASSERT(fore200e_vcc);
3087 len = sprintf(page,
3088 " %08x %03d %05d %1d %09lu %05d/%05d %09lu %05d/%05d\n",
3089 (u32)(unsigned long)vcc,
3090 vcc->vpi, vcc->vci, fore200e_atm2fore_aal(vcc->qos.aal),
3091 fore200e_vcc->tx_pdu,
3092 fore200e_vcc->tx_min_pdu > 0xFFFF ? 0 : fore200e_vcc->tx_min_pdu,
3093 fore200e_vcc->tx_max_pdu,
3094 fore200e_vcc->rx_pdu,
3095 fore200e_vcc->rx_min_pdu > 0xFFFF ? 0 : fore200e_vcc->rx_min_pdu,
3096 fore200e_vcc->rx_max_pdu);
3098 spin_unlock_irqrestore(&fore200e->q_lock, flags);
3099 return len;
3102 spin_unlock_irqrestore(&fore200e->q_lock, flags);
3105 return 0;
3108 module_init(fore200e_module_init);
3109 module_exit(fore200e_module_cleanup);
3112 static const struct atmdev_ops fore200e_ops =
3114 .open = fore200e_open,
3115 .close = fore200e_close,
3116 .ioctl = fore200e_ioctl,
3117 .getsockopt = fore200e_getsockopt,
3118 .setsockopt = fore200e_setsockopt,
3119 .send = fore200e_send,
3120 .change_qos = fore200e_change_qos,
3121 .proc_read = fore200e_proc_read,
3122 .owner = THIS_MODULE
3126 static const struct fore200e_bus fore200e_bus[] = {
3127 #ifdef CONFIG_PCI
3128 { "PCA-200E", "pca200e", 32, 4, 32,
3129 fore200e_pca_read,
3130 fore200e_pca_write,
3131 fore200e_pca_dma_map,
3132 fore200e_pca_dma_unmap,
3133 fore200e_pca_dma_sync_for_cpu,
3134 fore200e_pca_dma_sync_for_device,
3135 fore200e_pca_dma_chunk_alloc,
3136 fore200e_pca_dma_chunk_free,
3137 fore200e_pca_configure,
3138 fore200e_pca_map,
3139 fore200e_pca_reset,
3140 fore200e_pca_prom_read,
3141 fore200e_pca_unmap,
3142 NULL,
3143 fore200e_pca_irq_check,
3144 fore200e_pca_irq_ack,
3145 fore200e_pca_proc_read,
3147 #endif
3148 #ifdef CONFIG_SBUS
3149 { "SBA-200E", "sba200e", 32, 64, 32,
3150 fore200e_sba_read,
3151 fore200e_sba_write,
3152 fore200e_sba_dma_map,
3153 fore200e_sba_dma_unmap,
3154 fore200e_sba_dma_sync_for_cpu,
3155 fore200e_sba_dma_sync_for_device,
3156 fore200e_sba_dma_chunk_alloc,
3157 fore200e_sba_dma_chunk_free,
3158 fore200e_sba_configure,
3159 fore200e_sba_map,
3160 fore200e_sba_reset,
3161 fore200e_sba_prom_read,
3162 fore200e_sba_unmap,
3163 fore200e_sba_irq_enable,
3164 fore200e_sba_irq_check,
3165 fore200e_sba_irq_ack,
3166 fore200e_sba_proc_read,
3168 #endif
3172 MODULE_LICENSE("GPL");
3173 #ifdef CONFIG_PCI
3174 #ifdef __LITTLE_ENDIAN__
3175 MODULE_FIRMWARE("pca200e.bin");
3176 #else
3177 MODULE_FIRMWARE("pca200e_ecd.bin2");
3178 #endif
3179 #endif /* CONFIG_PCI */
3180 #ifdef CONFIG_SBUS
3181 MODULE_FIRMWARE("sba200e_ecd.bin2");
3182 #endif