x86/ldt: Further fix FPU emulation
[linux/fpc-iii.git] / drivers / vme / bridges / vme_tsi148.c
blobfb1e7ad272ec4ed3f92c7649adbb906423d60b66
1 /*
2 * Support for the Tundra TSI148 VME-PCI Bridge Chip
4 * Author: Martyn Welch <martyn.welch@ge.com>
5 * Copyright 2008 GE Intelligent Platforms Embedded Systems, Inc.
7 * Based on work by Tom Armistead and Ajit Prem
8 * Copyright 2004 Motorola Inc.
10 * This program is free software; you can redistribute it and/or modify it
11 * under the terms of the GNU General Public License as published by the
12 * Free Software Foundation; either version 2 of the License, or (at your
13 * option) any later version.
16 #include <linux/module.h>
17 #include <linux/moduleparam.h>
18 #include <linux/mm.h>
19 #include <linux/types.h>
20 #include <linux/errno.h>
21 #include <linux/proc_fs.h>
22 #include <linux/pci.h>
23 #include <linux/poll.h>
24 #include <linux/dma-mapping.h>
25 #include <linux/interrupt.h>
26 #include <linux/spinlock.h>
27 #include <linux/sched.h>
28 #include <linux/slab.h>
29 #include <linux/time.h>
30 #include <linux/io.h>
31 #include <linux/uaccess.h>
32 #include <linux/byteorder/generic.h>
33 #include <linux/vme.h>
35 #include "../vme_bridge.h"
36 #include "vme_tsi148.h"
38 static int tsi148_probe(struct pci_dev *, const struct pci_device_id *);
39 static void tsi148_remove(struct pci_dev *);
42 /* Module parameter */
43 static bool err_chk;
44 static int geoid;
46 static const char driver_name[] = "vme_tsi148";
48 static const struct pci_device_id tsi148_ids[] = {
49 { PCI_DEVICE(PCI_VENDOR_ID_TUNDRA, PCI_DEVICE_ID_TUNDRA_TSI148) },
50 { },
53 static struct pci_driver tsi148_driver = {
54 .name = driver_name,
55 .id_table = tsi148_ids,
56 .probe = tsi148_probe,
57 .remove = tsi148_remove,
60 static void reg_join(unsigned int high, unsigned int low,
61 unsigned long long *variable)
63 *variable = (unsigned long long)high << 32;
64 *variable |= (unsigned long long)low;
67 static void reg_split(unsigned long long variable, unsigned int *high,
68 unsigned int *low)
70 *low = (unsigned int)variable & 0xFFFFFFFF;
71 *high = (unsigned int)(variable >> 32);
75 * Wakes up DMA queue.
77 static u32 tsi148_DMA_irqhandler(struct tsi148_driver *bridge,
78 int channel_mask)
80 u32 serviced = 0;
82 if (channel_mask & TSI148_LCSR_INTS_DMA0S) {
83 wake_up(&bridge->dma_queue[0]);
84 serviced |= TSI148_LCSR_INTC_DMA0C;
86 if (channel_mask & TSI148_LCSR_INTS_DMA1S) {
87 wake_up(&bridge->dma_queue[1]);
88 serviced |= TSI148_LCSR_INTC_DMA1C;
91 return serviced;
95 * Wake up location monitor queue
97 static u32 tsi148_LM_irqhandler(struct tsi148_driver *bridge, u32 stat)
99 int i;
100 u32 serviced = 0;
102 for (i = 0; i < 4; i++) {
103 if (stat & TSI148_LCSR_INTS_LMS[i]) {
104 /* We only enable interrupts if the callback is set */
105 bridge->lm_callback[i](i);
106 serviced |= TSI148_LCSR_INTC_LMC[i];
110 return serviced;
114 * Wake up mail box queue.
116 * XXX This functionality is not exposed up though API.
118 static u32 tsi148_MB_irqhandler(struct vme_bridge *tsi148_bridge, u32 stat)
120 int i;
121 u32 val;
122 u32 serviced = 0;
123 struct tsi148_driver *bridge;
125 bridge = tsi148_bridge->driver_priv;
127 for (i = 0; i < 4; i++) {
128 if (stat & TSI148_LCSR_INTS_MBS[i]) {
129 val = ioread32be(bridge->base + TSI148_GCSR_MBOX[i]);
130 dev_err(tsi148_bridge->parent, "VME Mailbox %d received"
131 ": 0x%x\n", i, val);
132 serviced |= TSI148_LCSR_INTC_MBC[i];
136 return serviced;
140 * Display error & status message when PERR (PCI) exception interrupt occurs.
142 static u32 tsi148_PERR_irqhandler(struct vme_bridge *tsi148_bridge)
144 struct tsi148_driver *bridge;
146 bridge = tsi148_bridge->driver_priv;
148 dev_err(tsi148_bridge->parent, "PCI Exception at address: 0x%08x:%08x, "
149 "attributes: %08x\n",
150 ioread32be(bridge->base + TSI148_LCSR_EDPAU),
151 ioread32be(bridge->base + TSI148_LCSR_EDPAL),
152 ioread32be(bridge->base + TSI148_LCSR_EDPAT));
154 dev_err(tsi148_bridge->parent, "PCI-X attribute reg: %08x, PCI-X split "
155 "completion reg: %08x\n",
156 ioread32be(bridge->base + TSI148_LCSR_EDPXA),
157 ioread32be(bridge->base + TSI148_LCSR_EDPXS));
159 iowrite32be(TSI148_LCSR_EDPAT_EDPCL, bridge->base + TSI148_LCSR_EDPAT);
161 return TSI148_LCSR_INTC_PERRC;
165 * Save address and status when VME error interrupt occurs.
167 static u32 tsi148_VERR_irqhandler(struct vme_bridge *tsi148_bridge)
169 unsigned int error_addr_high, error_addr_low;
170 unsigned long long error_addr;
171 u32 error_attrib;
172 struct vme_bus_error *error = NULL;
173 struct tsi148_driver *bridge;
175 bridge = tsi148_bridge->driver_priv;
177 error_addr_high = ioread32be(bridge->base + TSI148_LCSR_VEAU);
178 error_addr_low = ioread32be(bridge->base + TSI148_LCSR_VEAL);
179 error_attrib = ioread32be(bridge->base + TSI148_LCSR_VEAT);
181 reg_join(error_addr_high, error_addr_low, &error_addr);
183 /* Check for exception register overflow (we have lost error data) */
184 if (error_attrib & TSI148_LCSR_VEAT_VEOF) {
185 dev_err(tsi148_bridge->parent, "VME Bus Exception Overflow "
186 "Occurred\n");
189 if (err_chk) {
190 error = kmalloc(sizeof(struct vme_bus_error), GFP_ATOMIC);
191 if (error) {
192 error->address = error_addr;
193 error->attributes = error_attrib;
194 list_add_tail(&error->list, &tsi148_bridge->vme_errors);
195 } else {
196 dev_err(tsi148_bridge->parent,
197 "Unable to alloc memory for VMEbus Error reporting\n");
201 if (!error) {
202 dev_err(tsi148_bridge->parent,
203 "VME Bus Error at address: 0x%llx, attributes: %08x\n",
204 error_addr, error_attrib);
207 /* Clear Status */
208 iowrite32be(TSI148_LCSR_VEAT_VESCL, bridge->base + TSI148_LCSR_VEAT);
210 return TSI148_LCSR_INTC_VERRC;
214 * Wake up IACK queue.
216 static u32 tsi148_IACK_irqhandler(struct tsi148_driver *bridge)
218 wake_up(&bridge->iack_queue);
220 return TSI148_LCSR_INTC_IACKC;
224 * Calling VME bus interrupt callback if provided.
226 static u32 tsi148_VIRQ_irqhandler(struct vme_bridge *tsi148_bridge,
227 u32 stat)
229 int vec, i, serviced = 0;
230 struct tsi148_driver *bridge;
232 bridge = tsi148_bridge->driver_priv;
234 for (i = 7; i > 0; i--) {
235 if (stat & (1 << i)) {
237 * Note: Even though the registers are defined as
238 * 32-bits in the spec, we only want to issue 8-bit
239 * IACK cycles on the bus, read from offset 3.
241 vec = ioread8(bridge->base + TSI148_LCSR_VIACK[i] + 3);
243 vme_irq_handler(tsi148_bridge, i, vec);
245 serviced |= (1 << i);
249 return serviced;
253 * Top level interrupt handler. Clears appropriate interrupt status bits and
254 * then calls appropriate sub handler(s).
256 static irqreturn_t tsi148_irqhandler(int irq, void *ptr)
258 u32 stat, enable, serviced = 0;
259 struct vme_bridge *tsi148_bridge;
260 struct tsi148_driver *bridge;
262 tsi148_bridge = ptr;
264 bridge = tsi148_bridge->driver_priv;
266 /* Determine which interrupts are unmasked and set */
267 enable = ioread32be(bridge->base + TSI148_LCSR_INTEO);
268 stat = ioread32be(bridge->base + TSI148_LCSR_INTS);
270 /* Only look at unmasked interrupts */
271 stat &= enable;
273 if (unlikely(!stat))
274 return IRQ_NONE;
276 /* Call subhandlers as appropriate */
277 /* DMA irqs */
278 if (stat & (TSI148_LCSR_INTS_DMA1S | TSI148_LCSR_INTS_DMA0S))
279 serviced |= tsi148_DMA_irqhandler(bridge, stat);
281 /* Location monitor irqs */
282 if (stat & (TSI148_LCSR_INTS_LM3S | TSI148_LCSR_INTS_LM2S |
283 TSI148_LCSR_INTS_LM1S | TSI148_LCSR_INTS_LM0S))
284 serviced |= tsi148_LM_irqhandler(bridge, stat);
286 /* Mail box irqs */
287 if (stat & (TSI148_LCSR_INTS_MB3S | TSI148_LCSR_INTS_MB2S |
288 TSI148_LCSR_INTS_MB1S | TSI148_LCSR_INTS_MB0S))
289 serviced |= tsi148_MB_irqhandler(tsi148_bridge, stat);
291 /* PCI bus error */
292 if (stat & TSI148_LCSR_INTS_PERRS)
293 serviced |= tsi148_PERR_irqhandler(tsi148_bridge);
295 /* VME bus error */
296 if (stat & TSI148_LCSR_INTS_VERRS)
297 serviced |= tsi148_VERR_irqhandler(tsi148_bridge);
299 /* IACK irq */
300 if (stat & TSI148_LCSR_INTS_IACKS)
301 serviced |= tsi148_IACK_irqhandler(bridge);
303 /* VME bus irqs */
304 if (stat & (TSI148_LCSR_INTS_IRQ7S | TSI148_LCSR_INTS_IRQ6S |
305 TSI148_LCSR_INTS_IRQ5S | TSI148_LCSR_INTS_IRQ4S |
306 TSI148_LCSR_INTS_IRQ3S | TSI148_LCSR_INTS_IRQ2S |
307 TSI148_LCSR_INTS_IRQ1S))
308 serviced |= tsi148_VIRQ_irqhandler(tsi148_bridge, stat);
310 /* Clear serviced interrupts */
311 iowrite32be(serviced, bridge->base + TSI148_LCSR_INTC);
313 return IRQ_HANDLED;
316 static int tsi148_irq_init(struct vme_bridge *tsi148_bridge)
318 int result;
319 unsigned int tmp;
320 struct pci_dev *pdev;
321 struct tsi148_driver *bridge;
323 pdev = to_pci_dev(tsi148_bridge->parent);
325 bridge = tsi148_bridge->driver_priv;
327 /* Initialise list for VME bus errors */
328 INIT_LIST_HEAD(&tsi148_bridge->vme_errors);
330 mutex_init(&tsi148_bridge->irq_mtx);
332 result = request_irq(pdev->irq,
333 tsi148_irqhandler,
334 IRQF_SHARED,
335 driver_name, tsi148_bridge);
336 if (result) {
337 dev_err(tsi148_bridge->parent, "Can't get assigned pci irq "
338 "vector %02X\n", pdev->irq);
339 return result;
342 /* Enable and unmask interrupts */
343 tmp = TSI148_LCSR_INTEO_DMA1EO | TSI148_LCSR_INTEO_DMA0EO |
344 TSI148_LCSR_INTEO_MB3EO | TSI148_LCSR_INTEO_MB2EO |
345 TSI148_LCSR_INTEO_MB1EO | TSI148_LCSR_INTEO_MB0EO |
346 TSI148_LCSR_INTEO_PERREO | TSI148_LCSR_INTEO_VERREO |
347 TSI148_LCSR_INTEO_IACKEO;
349 /* This leaves the following interrupts masked.
350 * TSI148_LCSR_INTEO_VIEEO
351 * TSI148_LCSR_INTEO_SYSFLEO
352 * TSI148_LCSR_INTEO_ACFLEO
355 /* Don't enable Location Monitor interrupts here - they will be
356 * enabled when the location monitors are properly configured and
357 * a callback has been attached.
358 * TSI148_LCSR_INTEO_LM0EO
359 * TSI148_LCSR_INTEO_LM1EO
360 * TSI148_LCSR_INTEO_LM2EO
361 * TSI148_LCSR_INTEO_LM3EO
364 /* Don't enable VME interrupts until we add a handler, else the board
365 * will respond to it and we don't want that unless it knows how to
366 * properly deal with it.
367 * TSI148_LCSR_INTEO_IRQ7EO
368 * TSI148_LCSR_INTEO_IRQ6EO
369 * TSI148_LCSR_INTEO_IRQ5EO
370 * TSI148_LCSR_INTEO_IRQ4EO
371 * TSI148_LCSR_INTEO_IRQ3EO
372 * TSI148_LCSR_INTEO_IRQ2EO
373 * TSI148_LCSR_INTEO_IRQ1EO
376 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEO);
377 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEN);
379 return 0;
382 static void tsi148_irq_exit(struct vme_bridge *tsi148_bridge,
383 struct pci_dev *pdev)
385 struct tsi148_driver *bridge = tsi148_bridge->driver_priv;
387 /* Turn off interrupts */
388 iowrite32be(0x0, bridge->base + TSI148_LCSR_INTEO);
389 iowrite32be(0x0, bridge->base + TSI148_LCSR_INTEN);
391 /* Clear all interrupts */
392 iowrite32be(0xFFFFFFFF, bridge->base + TSI148_LCSR_INTC);
394 /* Detach interrupt handler */
395 free_irq(pdev->irq, tsi148_bridge);
399 * Check to see if an IACk has been received, return true (1) or false (0).
401 static int tsi148_iack_received(struct tsi148_driver *bridge)
403 u32 tmp;
405 tmp = ioread32be(bridge->base + TSI148_LCSR_VICR);
407 if (tmp & TSI148_LCSR_VICR_IRQS)
408 return 0;
409 else
410 return 1;
414 * Configure VME interrupt
416 static void tsi148_irq_set(struct vme_bridge *tsi148_bridge, int level,
417 int state, int sync)
419 struct pci_dev *pdev;
420 u32 tmp;
421 struct tsi148_driver *bridge;
423 bridge = tsi148_bridge->driver_priv;
425 /* We need to do the ordering differently for enabling and disabling */
426 if (state == 0) {
427 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEN);
428 tmp &= ~TSI148_LCSR_INTEN_IRQEN[level - 1];
429 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEN);
431 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEO);
432 tmp &= ~TSI148_LCSR_INTEO_IRQEO[level - 1];
433 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEO);
435 if (sync != 0) {
436 pdev = to_pci_dev(tsi148_bridge->parent);
437 synchronize_irq(pdev->irq);
439 } else {
440 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEO);
441 tmp |= TSI148_LCSR_INTEO_IRQEO[level - 1];
442 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEO);
444 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEN);
445 tmp |= TSI148_LCSR_INTEN_IRQEN[level - 1];
446 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEN);
451 * Generate a VME bus interrupt at the requested level & vector. Wait for
452 * interrupt to be acked.
454 static int tsi148_irq_generate(struct vme_bridge *tsi148_bridge, int level,
455 int statid)
457 u32 tmp;
458 struct tsi148_driver *bridge;
460 bridge = tsi148_bridge->driver_priv;
462 mutex_lock(&bridge->vme_int);
464 /* Read VICR register */
465 tmp = ioread32be(bridge->base + TSI148_LCSR_VICR);
467 /* Set Status/ID */
468 tmp = (tmp & ~TSI148_LCSR_VICR_STID_M) |
469 (statid & TSI148_LCSR_VICR_STID_M);
470 iowrite32be(tmp, bridge->base + TSI148_LCSR_VICR);
472 /* Assert VMEbus IRQ */
473 tmp = tmp | TSI148_LCSR_VICR_IRQL[level];
474 iowrite32be(tmp, bridge->base + TSI148_LCSR_VICR);
476 /* XXX Consider implementing a timeout? */
477 wait_event_interruptible(bridge->iack_queue,
478 tsi148_iack_received(bridge));
480 mutex_unlock(&bridge->vme_int);
482 return 0;
486 * Find the first error in this address range
488 static struct vme_bus_error *tsi148_find_error(struct vme_bridge *tsi148_bridge,
489 u32 aspace, unsigned long long address, size_t count)
491 struct list_head *err_pos;
492 struct vme_bus_error *vme_err, *valid = NULL;
493 unsigned long long bound;
495 bound = address + count;
498 * XXX We are currently not looking at the address space when parsing
499 * for errors. This is because parsing the Address Modifier Codes
500 * is going to be quite resource intensive to do properly. We
501 * should be OK just looking at the addresses and this is certainly
502 * much better than what we had before.
504 err_pos = NULL;
505 /* Iterate through errors */
506 list_for_each(err_pos, &tsi148_bridge->vme_errors) {
507 vme_err = list_entry(err_pos, struct vme_bus_error, list);
508 if ((vme_err->address >= address) &&
509 (vme_err->address < bound)) {
511 valid = vme_err;
512 break;
516 return valid;
520 * Clear errors in the provided address range.
522 static void tsi148_clear_errors(struct vme_bridge *tsi148_bridge,
523 u32 aspace, unsigned long long address, size_t count)
525 struct list_head *err_pos, *temp;
526 struct vme_bus_error *vme_err;
527 unsigned long long bound;
529 bound = address + count;
532 * XXX We are currently not looking at the address space when parsing
533 * for errors. This is because parsing the Address Modifier Codes
534 * is going to be quite resource intensive to do properly. We
535 * should be OK just looking at the addresses and this is certainly
536 * much better than what we had before.
538 err_pos = NULL;
539 /* Iterate through errors */
540 list_for_each_safe(err_pos, temp, &tsi148_bridge->vme_errors) {
541 vme_err = list_entry(err_pos, struct vme_bus_error, list);
543 if ((vme_err->address >= address) &&
544 (vme_err->address < bound)) {
546 list_del(err_pos);
547 kfree(vme_err);
553 * Initialize a slave window with the requested attributes.
555 static int tsi148_slave_set(struct vme_slave_resource *image, int enabled,
556 unsigned long long vme_base, unsigned long long size,
557 dma_addr_t pci_base, u32 aspace, u32 cycle)
559 unsigned int i, addr = 0, granularity = 0;
560 unsigned int temp_ctl = 0;
561 unsigned int vme_base_low, vme_base_high;
562 unsigned int vme_bound_low, vme_bound_high;
563 unsigned int pci_offset_low, pci_offset_high;
564 unsigned long long vme_bound, pci_offset;
565 struct vme_bridge *tsi148_bridge;
566 struct tsi148_driver *bridge;
568 tsi148_bridge = image->parent;
569 bridge = tsi148_bridge->driver_priv;
571 i = image->number;
573 switch (aspace) {
574 case VME_A16:
575 granularity = 0x10;
576 addr |= TSI148_LCSR_ITAT_AS_A16;
577 break;
578 case VME_A24:
579 granularity = 0x1000;
580 addr |= TSI148_LCSR_ITAT_AS_A24;
581 break;
582 case VME_A32:
583 granularity = 0x10000;
584 addr |= TSI148_LCSR_ITAT_AS_A32;
585 break;
586 case VME_A64:
587 granularity = 0x10000;
588 addr |= TSI148_LCSR_ITAT_AS_A64;
589 break;
590 default:
591 dev_err(tsi148_bridge->parent, "Invalid address space\n");
592 return -EINVAL;
593 break;
596 /* Convert 64-bit variables to 2x 32-bit variables */
597 reg_split(vme_base, &vme_base_high, &vme_base_low);
600 * Bound address is a valid address for the window, adjust
601 * accordingly
603 vme_bound = vme_base + size - granularity;
604 reg_split(vme_bound, &vme_bound_high, &vme_bound_low);
605 pci_offset = (unsigned long long)pci_base - vme_base;
606 reg_split(pci_offset, &pci_offset_high, &pci_offset_low);
608 if (vme_base_low & (granularity - 1)) {
609 dev_err(tsi148_bridge->parent, "Invalid VME base alignment\n");
610 return -EINVAL;
612 if (vme_bound_low & (granularity - 1)) {
613 dev_err(tsi148_bridge->parent, "Invalid VME bound alignment\n");
614 return -EINVAL;
616 if (pci_offset_low & (granularity - 1)) {
617 dev_err(tsi148_bridge->parent, "Invalid PCI Offset "
618 "alignment\n");
619 return -EINVAL;
622 /* Disable while we are mucking around */
623 temp_ctl = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
624 TSI148_LCSR_OFFSET_ITAT);
625 temp_ctl &= ~TSI148_LCSR_ITAT_EN;
626 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_IT[i] +
627 TSI148_LCSR_OFFSET_ITAT);
629 /* Setup mapping */
630 iowrite32be(vme_base_high, bridge->base + TSI148_LCSR_IT[i] +
631 TSI148_LCSR_OFFSET_ITSAU);
632 iowrite32be(vme_base_low, bridge->base + TSI148_LCSR_IT[i] +
633 TSI148_LCSR_OFFSET_ITSAL);
634 iowrite32be(vme_bound_high, bridge->base + TSI148_LCSR_IT[i] +
635 TSI148_LCSR_OFFSET_ITEAU);
636 iowrite32be(vme_bound_low, bridge->base + TSI148_LCSR_IT[i] +
637 TSI148_LCSR_OFFSET_ITEAL);
638 iowrite32be(pci_offset_high, bridge->base + TSI148_LCSR_IT[i] +
639 TSI148_LCSR_OFFSET_ITOFU);
640 iowrite32be(pci_offset_low, bridge->base + TSI148_LCSR_IT[i] +
641 TSI148_LCSR_OFFSET_ITOFL);
643 /* Setup 2eSST speeds */
644 temp_ctl &= ~TSI148_LCSR_ITAT_2eSSTM_M;
645 switch (cycle & (VME_2eSST160 | VME_2eSST267 | VME_2eSST320)) {
646 case VME_2eSST160:
647 temp_ctl |= TSI148_LCSR_ITAT_2eSSTM_160;
648 break;
649 case VME_2eSST267:
650 temp_ctl |= TSI148_LCSR_ITAT_2eSSTM_267;
651 break;
652 case VME_2eSST320:
653 temp_ctl |= TSI148_LCSR_ITAT_2eSSTM_320;
654 break;
657 /* Setup cycle types */
658 temp_ctl &= ~(0x1F << 7);
659 if (cycle & VME_BLT)
660 temp_ctl |= TSI148_LCSR_ITAT_BLT;
661 if (cycle & VME_MBLT)
662 temp_ctl |= TSI148_LCSR_ITAT_MBLT;
663 if (cycle & VME_2eVME)
664 temp_ctl |= TSI148_LCSR_ITAT_2eVME;
665 if (cycle & VME_2eSST)
666 temp_ctl |= TSI148_LCSR_ITAT_2eSST;
667 if (cycle & VME_2eSSTB)
668 temp_ctl |= TSI148_LCSR_ITAT_2eSSTB;
670 /* Setup address space */
671 temp_ctl &= ~TSI148_LCSR_ITAT_AS_M;
672 temp_ctl |= addr;
674 temp_ctl &= ~0xF;
675 if (cycle & VME_SUPER)
676 temp_ctl |= TSI148_LCSR_ITAT_SUPR ;
677 if (cycle & VME_USER)
678 temp_ctl |= TSI148_LCSR_ITAT_NPRIV;
679 if (cycle & VME_PROG)
680 temp_ctl |= TSI148_LCSR_ITAT_PGM;
681 if (cycle & VME_DATA)
682 temp_ctl |= TSI148_LCSR_ITAT_DATA;
684 /* Write ctl reg without enable */
685 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_IT[i] +
686 TSI148_LCSR_OFFSET_ITAT);
688 if (enabled)
689 temp_ctl |= TSI148_LCSR_ITAT_EN;
691 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_IT[i] +
692 TSI148_LCSR_OFFSET_ITAT);
694 return 0;
698 * Get slave window configuration.
700 static int tsi148_slave_get(struct vme_slave_resource *image, int *enabled,
701 unsigned long long *vme_base, unsigned long long *size,
702 dma_addr_t *pci_base, u32 *aspace, u32 *cycle)
704 unsigned int i, granularity = 0, ctl = 0;
705 unsigned int vme_base_low, vme_base_high;
706 unsigned int vme_bound_low, vme_bound_high;
707 unsigned int pci_offset_low, pci_offset_high;
708 unsigned long long vme_bound, pci_offset;
709 struct tsi148_driver *bridge;
711 bridge = image->parent->driver_priv;
713 i = image->number;
715 /* Read registers */
716 ctl = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
717 TSI148_LCSR_OFFSET_ITAT);
719 vme_base_high = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
720 TSI148_LCSR_OFFSET_ITSAU);
721 vme_base_low = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
722 TSI148_LCSR_OFFSET_ITSAL);
723 vme_bound_high = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
724 TSI148_LCSR_OFFSET_ITEAU);
725 vme_bound_low = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
726 TSI148_LCSR_OFFSET_ITEAL);
727 pci_offset_high = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
728 TSI148_LCSR_OFFSET_ITOFU);
729 pci_offset_low = ioread32be(bridge->base + TSI148_LCSR_IT[i] +
730 TSI148_LCSR_OFFSET_ITOFL);
732 /* Convert 64-bit variables to 2x 32-bit variables */
733 reg_join(vme_base_high, vme_base_low, vme_base);
734 reg_join(vme_bound_high, vme_bound_low, &vme_bound);
735 reg_join(pci_offset_high, pci_offset_low, &pci_offset);
737 *pci_base = (dma_addr_t)(*vme_base + pci_offset);
739 *enabled = 0;
740 *aspace = 0;
741 *cycle = 0;
743 if (ctl & TSI148_LCSR_ITAT_EN)
744 *enabled = 1;
746 if ((ctl & TSI148_LCSR_ITAT_AS_M) == TSI148_LCSR_ITAT_AS_A16) {
747 granularity = 0x10;
748 *aspace |= VME_A16;
750 if ((ctl & TSI148_LCSR_ITAT_AS_M) == TSI148_LCSR_ITAT_AS_A24) {
751 granularity = 0x1000;
752 *aspace |= VME_A24;
754 if ((ctl & TSI148_LCSR_ITAT_AS_M) == TSI148_LCSR_ITAT_AS_A32) {
755 granularity = 0x10000;
756 *aspace |= VME_A32;
758 if ((ctl & TSI148_LCSR_ITAT_AS_M) == TSI148_LCSR_ITAT_AS_A64) {
759 granularity = 0x10000;
760 *aspace |= VME_A64;
763 /* Need granularity before we set the size */
764 *size = (unsigned long long)((vme_bound - *vme_base) + granularity);
767 if ((ctl & TSI148_LCSR_ITAT_2eSSTM_M) == TSI148_LCSR_ITAT_2eSSTM_160)
768 *cycle |= VME_2eSST160;
769 if ((ctl & TSI148_LCSR_ITAT_2eSSTM_M) == TSI148_LCSR_ITAT_2eSSTM_267)
770 *cycle |= VME_2eSST267;
771 if ((ctl & TSI148_LCSR_ITAT_2eSSTM_M) == TSI148_LCSR_ITAT_2eSSTM_320)
772 *cycle |= VME_2eSST320;
774 if (ctl & TSI148_LCSR_ITAT_BLT)
775 *cycle |= VME_BLT;
776 if (ctl & TSI148_LCSR_ITAT_MBLT)
777 *cycle |= VME_MBLT;
778 if (ctl & TSI148_LCSR_ITAT_2eVME)
779 *cycle |= VME_2eVME;
780 if (ctl & TSI148_LCSR_ITAT_2eSST)
781 *cycle |= VME_2eSST;
782 if (ctl & TSI148_LCSR_ITAT_2eSSTB)
783 *cycle |= VME_2eSSTB;
785 if (ctl & TSI148_LCSR_ITAT_SUPR)
786 *cycle |= VME_SUPER;
787 if (ctl & TSI148_LCSR_ITAT_NPRIV)
788 *cycle |= VME_USER;
789 if (ctl & TSI148_LCSR_ITAT_PGM)
790 *cycle |= VME_PROG;
791 if (ctl & TSI148_LCSR_ITAT_DATA)
792 *cycle |= VME_DATA;
794 return 0;
798 * Allocate and map PCI Resource
800 static int tsi148_alloc_resource(struct vme_master_resource *image,
801 unsigned long long size)
803 unsigned long long existing_size;
804 int retval = 0;
805 struct pci_dev *pdev;
806 struct vme_bridge *tsi148_bridge;
808 tsi148_bridge = image->parent;
810 pdev = to_pci_dev(tsi148_bridge->parent);
812 existing_size = (unsigned long long)(image->bus_resource.end -
813 image->bus_resource.start);
815 /* If the existing size is OK, return */
816 if ((size != 0) && (existing_size == (size - 1)))
817 return 0;
819 if (existing_size != 0) {
820 iounmap(image->kern_base);
821 image->kern_base = NULL;
822 kfree(image->bus_resource.name);
823 release_resource(&image->bus_resource);
824 memset(&image->bus_resource, 0, sizeof(struct resource));
827 /* Exit here if size is zero */
828 if (size == 0)
829 return 0;
831 if (image->bus_resource.name == NULL) {
832 image->bus_resource.name = kmalloc(VMENAMSIZ+3, GFP_ATOMIC);
833 if (image->bus_resource.name == NULL) {
834 dev_err(tsi148_bridge->parent, "Unable to allocate "
835 "memory for resource name\n");
836 retval = -ENOMEM;
837 goto err_name;
841 sprintf((char *)image->bus_resource.name, "%s.%d", tsi148_bridge->name,
842 image->number);
844 image->bus_resource.start = 0;
845 image->bus_resource.end = (unsigned long)size;
846 image->bus_resource.flags = IORESOURCE_MEM;
848 retval = pci_bus_alloc_resource(pdev->bus,
849 &image->bus_resource, size, size, PCIBIOS_MIN_MEM,
850 0, NULL, NULL);
851 if (retval) {
852 dev_err(tsi148_bridge->parent, "Failed to allocate mem "
853 "resource for window %d size 0x%lx start 0x%lx\n",
854 image->number, (unsigned long)size,
855 (unsigned long)image->bus_resource.start);
856 goto err_resource;
859 image->kern_base = ioremap_nocache(
860 image->bus_resource.start, size);
861 if (image->kern_base == NULL) {
862 dev_err(tsi148_bridge->parent, "Failed to remap resource\n");
863 retval = -ENOMEM;
864 goto err_remap;
867 return 0;
869 err_remap:
870 release_resource(&image->bus_resource);
871 err_resource:
872 kfree(image->bus_resource.name);
873 memset(&image->bus_resource, 0, sizeof(struct resource));
874 err_name:
875 return retval;
879 * Free and unmap PCI Resource
881 static void tsi148_free_resource(struct vme_master_resource *image)
883 iounmap(image->kern_base);
884 image->kern_base = NULL;
885 release_resource(&image->bus_resource);
886 kfree(image->bus_resource.name);
887 memset(&image->bus_resource, 0, sizeof(struct resource));
891 * Set the attributes of an outbound window.
893 static int tsi148_master_set(struct vme_master_resource *image, int enabled,
894 unsigned long long vme_base, unsigned long long size, u32 aspace,
895 u32 cycle, u32 dwidth)
897 int retval = 0;
898 unsigned int i;
899 unsigned int temp_ctl = 0;
900 unsigned int pci_base_low, pci_base_high;
901 unsigned int pci_bound_low, pci_bound_high;
902 unsigned int vme_offset_low, vme_offset_high;
903 unsigned long long pci_bound, vme_offset, pci_base;
904 struct vme_bridge *tsi148_bridge;
905 struct tsi148_driver *bridge;
906 struct pci_bus_region region;
907 struct pci_dev *pdev;
909 tsi148_bridge = image->parent;
911 bridge = tsi148_bridge->driver_priv;
913 pdev = to_pci_dev(tsi148_bridge->parent);
915 /* Verify input data */
916 if (vme_base & 0xFFFF) {
917 dev_err(tsi148_bridge->parent, "Invalid VME Window "
918 "alignment\n");
919 retval = -EINVAL;
920 goto err_window;
923 if ((size == 0) && (enabled != 0)) {
924 dev_err(tsi148_bridge->parent, "Size must be non-zero for "
925 "enabled windows\n");
926 retval = -EINVAL;
927 goto err_window;
930 spin_lock(&image->lock);
932 /* Let's allocate the resource here rather than further up the stack as
933 * it avoids pushing loads of bus dependent stuff up the stack. If size
934 * is zero, any existing resource will be freed.
936 retval = tsi148_alloc_resource(image, size);
937 if (retval) {
938 spin_unlock(&image->lock);
939 dev_err(tsi148_bridge->parent, "Unable to allocate memory for "
940 "resource\n");
941 goto err_res;
944 if (size == 0) {
945 pci_base = 0;
946 pci_bound = 0;
947 vme_offset = 0;
948 } else {
949 pcibios_resource_to_bus(pdev->bus, &region,
950 &image->bus_resource);
951 pci_base = region.start;
954 * Bound address is a valid address for the window, adjust
955 * according to window granularity.
957 pci_bound = pci_base + (size - 0x10000);
958 vme_offset = vme_base - pci_base;
961 /* Convert 64-bit variables to 2x 32-bit variables */
962 reg_split(pci_base, &pci_base_high, &pci_base_low);
963 reg_split(pci_bound, &pci_bound_high, &pci_bound_low);
964 reg_split(vme_offset, &vme_offset_high, &vme_offset_low);
966 if (pci_base_low & 0xFFFF) {
967 spin_unlock(&image->lock);
968 dev_err(tsi148_bridge->parent, "Invalid PCI base alignment\n");
969 retval = -EINVAL;
970 goto err_gran;
972 if (pci_bound_low & 0xFFFF) {
973 spin_unlock(&image->lock);
974 dev_err(tsi148_bridge->parent, "Invalid PCI bound alignment\n");
975 retval = -EINVAL;
976 goto err_gran;
978 if (vme_offset_low & 0xFFFF) {
979 spin_unlock(&image->lock);
980 dev_err(tsi148_bridge->parent, "Invalid VME Offset "
981 "alignment\n");
982 retval = -EINVAL;
983 goto err_gran;
986 i = image->number;
988 /* Disable while we are mucking around */
989 temp_ctl = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
990 TSI148_LCSR_OFFSET_OTAT);
991 temp_ctl &= ~TSI148_LCSR_OTAT_EN;
992 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_OT[i] +
993 TSI148_LCSR_OFFSET_OTAT);
995 /* Setup 2eSST speeds */
996 temp_ctl &= ~TSI148_LCSR_OTAT_2eSSTM_M;
997 switch (cycle & (VME_2eSST160 | VME_2eSST267 | VME_2eSST320)) {
998 case VME_2eSST160:
999 temp_ctl |= TSI148_LCSR_OTAT_2eSSTM_160;
1000 break;
1001 case VME_2eSST267:
1002 temp_ctl |= TSI148_LCSR_OTAT_2eSSTM_267;
1003 break;
1004 case VME_2eSST320:
1005 temp_ctl |= TSI148_LCSR_OTAT_2eSSTM_320;
1006 break;
1009 /* Setup cycle types */
1010 if (cycle & VME_BLT) {
1011 temp_ctl &= ~TSI148_LCSR_OTAT_TM_M;
1012 temp_ctl |= TSI148_LCSR_OTAT_TM_BLT;
1014 if (cycle & VME_MBLT) {
1015 temp_ctl &= ~TSI148_LCSR_OTAT_TM_M;
1016 temp_ctl |= TSI148_LCSR_OTAT_TM_MBLT;
1018 if (cycle & VME_2eVME) {
1019 temp_ctl &= ~TSI148_LCSR_OTAT_TM_M;
1020 temp_ctl |= TSI148_LCSR_OTAT_TM_2eVME;
1022 if (cycle & VME_2eSST) {
1023 temp_ctl &= ~TSI148_LCSR_OTAT_TM_M;
1024 temp_ctl |= TSI148_LCSR_OTAT_TM_2eSST;
1026 if (cycle & VME_2eSSTB) {
1027 dev_warn(tsi148_bridge->parent, "Currently not setting "
1028 "Broadcast Select Registers\n");
1029 temp_ctl &= ~TSI148_LCSR_OTAT_TM_M;
1030 temp_ctl |= TSI148_LCSR_OTAT_TM_2eSSTB;
1033 /* Setup data width */
1034 temp_ctl &= ~TSI148_LCSR_OTAT_DBW_M;
1035 switch (dwidth) {
1036 case VME_D16:
1037 temp_ctl |= TSI148_LCSR_OTAT_DBW_16;
1038 break;
1039 case VME_D32:
1040 temp_ctl |= TSI148_LCSR_OTAT_DBW_32;
1041 break;
1042 default:
1043 spin_unlock(&image->lock);
1044 dev_err(tsi148_bridge->parent, "Invalid data width\n");
1045 retval = -EINVAL;
1046 goto err_dwidth;
1049 /* Setup address space */
1050 temp_ctl &= ~TSI148_LCSR_OTAT_AMODE_M;
1051 switch (aspace) {
1052 case VME_A16:
1053 temp_ctl |= TSI148_LCSR_OTAT_AMODE_A16;
1054 break;
1055 case VME_A24:
1056 temp_ctl |= TSI148_LCSR_OTAT_AMODE_A24;
1057 break;
1058 case VME_A32:
1059 temp_ctl |= TSI148_LCSR_OTAT_AMODE_A32;
1060 break;
1061 case VME_A64:
1062 temp_ctl |= TSI148_LCSR_OTAT_AMODE_A64;
1063 break;
1064 case VME_CRCSR:
1065 temp_ctl |= TSI148_LCSR_OTAT_AMODE_CRCSR;
1066 break;
1067 case VME_USER1:
1068 temp_ctl |= TSI148_LCSR_OTAT_AMODE_USER1;
1069 break;
1070 case VME_USER2:
1071 temp_ctl |= TSI148_LCSR_OTAT_AMODE_USER2;
1072 break;
1073 case VME_USER3:
1074 temp_ctl |= TSI148_LCSR_OTAT_AMODE_USER3;
1075 break;
1076 case VME_USER4:
1077 temp_ctl |= TSI148_LCSR_OTAT_AMODE_USER4;
1078 break;
1079 default:
1080 spin_unlock(&image->lock);
1081 dev_err(tsi148_bridge->parent, "Invalid address space\n");
1082 retval = -EINVAL;
1083 goto err_aspace;
1084 break;
1087 temp_ctl &= ~(3<<4);
1088 if (cycle & VME_SUPER)
1089 temp_ctl |= TSI148_LCSR_OTAT_SUP;
1090 if (cycle & VME_PROG)
1091 temp_ctl |= TSI148_LCSR_OTAT_PGM;
1093 /* Setup mapping */
1094 iowrite32be(pci_base_high, bridge->base + TSI148_LCSR_OT[i] +
1095 TSI148_LCSR_OFFSET_OTSAU);
1096 iowrite32be(pci_base_low, bridge->base + TSI148_LCSR_OT[i] +
1097 TSI148_LCSR_OFFSET_OTSAL);
1098 iowrite32be(pci_bound_high, bridge->base + TSI148_LCSR_OT[i] +
1099 TSI148_LCSR_OFFSET_OTEAU);
1100 iowrite32be(pci_bound_low, bridge->base + TSI148_LCSR_OT[i] +
1101 TSI148_LCSR_OFFSET_OTEAL);
1102 iowrite32be(vme_offset_high, bridge->base + TSI148_LCSR_OT[i] +
1103 TSI148_LCSR_OFFSET_OTOFU);
1104 iowrite32be(vme_offset_low, bridge->base + TSI148_LCSR_OT[i] +
1105 TSI148_LCSR_OFFSET_OTOFL);
1107 /* Write ctl reg without enable */
1108 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_OT[i] +
1109 TSI148_LCSR_OFFSET_OTAT);
1111 if (enabled)
1112 temp_ctl |= TSI148_LCSR_OTAT_EN;
1114 iowrite32be(temp_ctl, bridge->base + TSI148_LCSR_OT[i] +
1115 TSI148_LCSR_OFFSET_OTAT);
1117 spin_unlock(&image->lock);
1118 return 0;
1120 err_aspace:
1121 err_dwidth:
1122 err_gran:
1123 tsi148_free_resource(image);
1124 err_res:
1125 err_window:
1126 return retval;
1131 * Set the attributes of an outbound window.
1133 * XXX Not parsing prefetch information.
1135 static int __tsi148_master_get(struct vme_master_resource *image, int *enabled,
1136 unsigned long long *vme_base, unsigned long long *size, u32 *aspace,
1137 u32 *cycle, u32 *dwidth)
1139 unsigned int i, ctl;
1140 unsigned int pci_base_low, pci_base_high;
1141 unsigned int pci_bound_low, pci_bound_high;
1142 unsigned int vme_offset_low, vme_offset_high;
1144 unsigned long long pci_base, pci_bound, vme_offset;
1145 struct tsi148_driver *bridge;
1147 bridge = image->parent->driver_priv;
1149 i = image->number;
1151 ctl = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1152 TSI148_LCSR_OFFSET_OTAT);
1154 pci_base_high = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1155 TSI148_LCSR_OFFSET_OTSAU);
1156 pci_base_low = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1157 TSI148_LCSR_OFFSET_OTSAL);
1158 pci_bound_high = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1159 TSI148_LCSR_OFFSET_OTEAU);
1160 pci_bound_low = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1161 TSI148_LCSR_OFFSET_OTEAL);
1162 vme_offset_high = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1163 TSI148_LCSR_OFFSET_OTOFU);
1164 vme_offset_low = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1165 TSI148_LCSR_OFFSET_OTOFL);
1167 /* Convert 64-bit variables to 2x 32-bit variables */
1168 reg_join(pci_base_high, pci_base_low, &pci_base);
1169 reg_join(pci_bound_high, pci_bound_low, &pci_bound);
1170 reg_join(vme_offset_high, vme_offset_low, &vme_offset);
1172 *vme_base = pci_base + vme_offset;
1173 *size = (unsigned long long)(pci_bound - pci_base) + 0x10000;
1175 *enabled = 0;
1176 *aspace = 0;
1177 *cycle = 0;
1178 *dwidth = 0;
1180 if (ctl & TSI148_LCSR_OTAT_EN)
1181 *enabled = 1;
1183 /* Setup address space */
1184 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_A16)
1185 *aspace |= VME_A16;
1186 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_A24)
1187 *aspace |= VME_A24;
1188 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_A32)
1189 *aspace |= VME_A32;
1190 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_A64)
1191 *aspace |= VME_A64;
1192 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_CRCSR)
1193 *aspace |= VME_CRCSR;
1194 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_USER1)
1195 *aspace |= VME_USER1;
1196 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_USER2)
1197 *aspace |= VME_USER2;
1198 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_USER3)
1199 *aspace |= VME_USER3;
1200 if ((ctl & TSI148_LCSR_OTAT_AMODE_M) == TSI148_LCSR_OTAT_AMODE_USER4)
1201 *aspace |= VME_USER4;
1203 /* Setup 2eSST speeds */
1204 if ((ctl & TSI148_LCSR_OTAT_2eSSTM_M) == TSI148_LCSR_OTAT_2eSSTM_160)
1205 *cycle |= VME_2eSST160;
1206 if ((ctl & TSI148_LCSR_OTAT_2eSSTM_M) == TSI148_LCSR_OTAT_2eSSTM_267)
1207 *cycle |= VME_2eSST267;
1208 if ((ctl & TSI148_LCSR_OTAT_2eSSTM_M) == TSI148_LCSR_OTAT_2eSSTM_320)
1209 *cycle |= VME_2eSST320;
1211 /* Setup cycle types */
1212 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_SCT)
1213 *cycle |= VME_SCT;
1214 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_BLT)
1215 *cycle |= VME_BLT;
1216 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_MBLT)
1217 *cycle |= VME_MBLT;
1218 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_2eVME)
1219 *cycle |= VME_2eVME;
1220 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_2eSST)
1221 *cycle |= VME_2eSST;
1222 if ((ctl & TSI148_LCSR_OTAT_TM_M) == TSI148_LCSR_OTAT_TM_2eSSTB)
1223 *cycle |= VME_2eSSTB;
1225 if (ctl & TSI148_LCSR_OTAT_SUP)
1226 *cycle |= VME_SUPER;
1227 else
1228 *cycle |= VME_USER;
1230 if (ctl & TSI148_LCSR_OTAT_PGM)
1231 *cycle |= VME_PROG;
1232 else
1233 *cycle |= VME_DATA;
1235 /* Setup data width */
1236 if ((ctl & TSI148_LCSR_OTAT_DBW_M) == TSI148_LCSR_OTAT_DBW_16)
1237 *dwidth = VME_D16;
1238 if ((ctl & TSI148_LCSR_OTAT_DBW_M) == TSI148_LCSR_OTAT_DBW_32)
1239 *dwidth = VME_D32;
1241 return 0;
1245 static int tsi148_master_get(struct vme_master_resource *image, int *enabled,
1246 unsigned long long *vme_base, unsigned long long *size, u32 *aspace,
1247 u32 *cycle, u32 *dwidth)
1249 int retval;
1251 spin_lock(&image->lock);
1253 retval = __tsi148_master_get(image, enabled, vme_base, size, aspace,
1254 cycle, dwidth);
1256 spin_unlock(&image->lock);
1258 return retval;
1261 static ssize_t tsi148_master_read(struct vme_master_resource *image, void *buf,
1262 size_t count, loff_t offset)
1264 int retval, enabled;
1265 unsigned long long vme_base, size;
1266 u32 aspace, cycle, dwidth;
1267 struct vme_bus_error *vme_err = NULL;
1268 struct vme_bridge *tsi148_bridge;
1269 void __iomem *addr = image->kern_base + offset;
1270 unsigned int done = 0;
1271 unsigned int count32;
1273 tsi148_bridge = image->parent;
1275 spin_lock(&image->lock);
1277 /* The following code handles VME address alignment. We cannot use
1278 * memcpy_xxx here because it may cut data transfers in to 8-bit
1279 * cycles when D16 or D32 cycles are required on the VME bus.
1280 * On the other hand, the bridge itself assures that the maximum data
1281 * cycle configured for the transfer is used and splits it
1282 * automatically for non-aligned addresses, so we don't want the
1283 * overhead of needlessly forcing small transfers for the entire cycle.
1285 if ((uintptr_t)addr & 0x1) {
1286 *(u8 *)buf = ioread8(addr);
1287 done += 1;
1288 if (done == count)
1289 goto out;
1291 if ((uintptr_t)(addr + done) & 0x2) {
1292 if ((count - done) < 2) {
1293 *(u8 *)(buf + done) = ioread8(addr + done);
1294 done += 1;
1295 goto out;
1296 } else {
1297 *(u16 *)(buf + done) = ioread16(addr + done);
1298 done += 2;
1302 count32 = (count - done) & ~0x3;
1303 while (done < count32) {
1304 *(u32 *)(buf + done) = ioread32(addr + done);
1305 done += 4;
1308 if ((count - done) & 0x2) {
1309 *(u16 *)(buf + done) = ioread16(addr + done);
1310 done += 2;
1312 if ((count - done) & 0x1) {
1313 *(u8 *)(buf + done) = ioread8(addr + done);
1314 done += 1;
1317 out:
1318 retval = count;
1320 if (!err_chk)
1321 goto skip_chk;
1323 __tsi148_master_get(image, &enabled, &vme_base, &size, &aspace, &cycle,
1324 &dwidth);
1326 vme_err = tsi148_find_error(tsi148_bridge, aspace, vme_base + offset,
1327 count);
1328 if (vme_err != NULL) {
1329 dev_err(image->parent->parent, "First VME read error detected "
1330 "an at address 0x%llx\n", vme_err->address);
1331 retval = vme_err->address - (vme_base + offset);
1332 /* Clear down save errors in this address range */
1333 tsi148_clear_errors(tsi148_bridge, aspace, vme_base + offset,
1334 count);
1337 skip_chk:
1338 spin_unlock(&image->lock);
1340 return retval;
1344 static ssize_t tsi148_master_write(struct vme_master_resource *image, void *buf,
1345 size_t count, loff_t offset)
1347 int retval = 0, enabled;
1348 unsigned long long vme_base, size;
1349 u32 aspace, cycle, dwidth;
1350 void __iomem *addr = image->kern_base + offset;
1351 unsigned int done = 0;
1352 unsigned int count32;
1354 struct vme_bus_error *vme_err = NULL;
1355 struct vme_bridge *tsi148_bridge;
1356 struct tsi148_driver *bridge;
1358 tsi148_bridge = image->parent;
1360 bridge = tsi148_bridge->driver_priv;
1362 spin_lock(&image->lock);
1364 /* Here we apply for the same strategy we do in master_read
1365 * function in order to assure the correct cycles.
1367 if ((uintptr_t)addr & 0x1) {
1368 iowrite8(*(u8 *)buf, addr);
1369 done += 1;
1370 if (done == count)
1371 goto out;
1373 if ((uintptr_t)(addr + done) & 0x2) {
1374 if ((count - done) < 2) {
1375 iowrite8(*(u8 *)(buf + done), addr + done);
1376 done += 1;
1377 goto out;
1378 } else {
1379 iowrite16(*(u16 *)(buf + done), addr + done);
1380 done += 2;
1384 count32 = (count - done) & ~0x3;
1385 while (done < count32) {
1386 iowrite32(*(u32 *)(buf + done), addr + done);
1387 done += 4;
1390 if ((count - done) & 0x2) {
1391 iowrite16(*(u16 *)(buf + done), addr + done);
1392 done += 2;
1394 if ((count - done) & 0x1) {
1395 iowrite8(*(u8 *)(buf + done), addr + done);
1396 done += 1;
1399 out:
1400 retval = count;
1403 * Writes are posted. We need to do a read on the VME bus to flush out
1404 * all of the writes before we check for errors. We can't guarantee
1405 * that reading the data we have just written is safe. It is believed
1406 * that there isn't any read, write re-ordering, so we can read any
1407 * location in VME space, so lets read the Device ID from the tsi148's
1408 * own registers as mapped into CR/CSR space.
1410 * We check for saved errors in the written address range/space.
1413 if (!err_chk)
1414 goto skip_chk;
1417 * Get window info first, to maximise the time that the buffers may
1418 * fluch on their own
1420 __tsi148_master_get(image, &enabled, &vme_base, &size, &aspace, &cycle,
1421 &dwidth);
1423 ioread16(bridge->flush_image->kern_base + 0x7F000);
1425 vme_err = tsi148_find_error(tsi148_bridge, aspace, vme_base + offset,
1426 count);
1427 if (vme_err != NULL) {
1428 dev_warn(tsi148_bridge->parent, "First VME write error detected"
1429 " an at address 0x%llx\n", vme_err->address);
1430 retval = vme_err->address - (vme_base + offset);
1431 /* Clear down save errors in this address range */
1432 tsi148_clear_errors(tsi148_bridge, aspace, vme_base + offset,
1433 count);
1436 skip_chk:
1437 spin_unlock(&image->lock);
1439 return retval;
1443 * Perform an RMW cycle on the VME bus.
1445 * Requires a previously configured master window, returns final value.
1447 static unsigned int tsi148_master_rmw(struct vme_master_resource *image,
1448 unsigned int mask, unsigned int compare, unsigned int swap,
1449 loff_t offset)
1451 unsigned long long pci_addr;
1452 unsigned int pci_addr_high, pci_addr_low;
1453 u32 tmp, result;
1454 int i;
1455 struct tsi148_driver *bridge;
1457 bridge = image->parent->driver_priv;
1459 /* Find the PCI address that maps to the desired VME address */
1460 i = image->number;
1462 /* Locking as we can only do one of these at a time */
1463 mutex_lock(&bridge->vme_rmw);
1465 /* Lock image */
1466 spin_lock(&image->lock);
1468 pci_addr_high = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1469 TSI148_LCSR_OFFSET_OTSAU);
1470 pci_addr_low = ioread32be(bridge->base + TSI148_LCSR_OT[i] +
1471 TSI148_LCSR_OFFSET_OTSAL);
1473 reg_join(pci_addr_high, pci_addr_low, &pci_addr);
1474 reg_split(pci_addr + offset, &pci_addr_high, &pci_addr_low);
1476 /* Configure registers */
1477 iowrite32be(mask, bridge->base + TSI148_LCSR_RMWEN);
1478 iowrite32be(compare, bridge->base + TSI148_LCSR_RMWC);
1479 iowrite32be(swap, bridge->base + TSI148_LCSR_RMWS);
1480 iowrite32be(pci_addr_high, bridge->base + TSI148_LCSR_RMWAU);
1481 iowrite32be(pci_addr_low, bridge->base + TSI148_LCSR_RMWAL);
1483 /* Enable RMW */
1484 tmp = ioread32be(bridge->base + TSI148_LCSR_VMCTRL);
1485 tmp |= TSI148_LCSR_VMCTRL_RMWEN;
1486 iowrite32be(tmp, bridge->base + TSI148_LCSR_VMCTRL);
1488 /* Kick process off with a read to the required address. */
1489 result = ioread32be(image->kern_base + offset);
1491 /* Disable RMW */
1492 tmp = ioread32be(bridge->base + TSI148_LCSR_VMCTRL);
1493 tmp &= ~TSI148_LCSR_VMCTRL_RMWEN;
1494 iowrite32be(tmp, bridge->base + TSI148_LCSR_VMCTRL);
1496 spin_unlock(&image->lock);
1498 mutex_unlock(&bridge->vme_rmw);
1500 return result;
1503 static int tsi148_dma_set_vme_src_attributes(struct device *dev, __be32 *attr,
1504 u32 aspace, u32 cycle, u32 dwidth)
1506 u32 val;
1508 val = be32_to_cpu(*attr);
1510 /* Setup 2eSST speeds */
1511 switch (cycle & (VME_2eSST160 | VME_2eSST267 | VME_2eSST320)) {
1512 case VME_2eSST160:
1513 val |= TSI148_LCSR_DSAT_2eSSTM_160;
1514 break;
1515 case VME_2eSST267:
1516 val |= TSI148_LCSR_DSAT_2eSSTM_267;
1517 break;
1518 case VME_2eSST320:
1519 val |= TSI148_LCSR_DSAT_2eSSTM_320;
1520 break;
1523 /* Setup cycle types */
1524 if (cycle & VME_SCT)
1525 val |= TSI148_LCSR_DSAT_TM_SCT;
1527 if (cycle & VME_BLT)
1528 val |= TSI148_LCSR_DSAT_TM_BLT;
1530 if (cycle & VME_MBLT)
1531 val |= TSI148_LCSR_DSAT_TM_MBLT;
1533 if (cycle & VME_2eVME)
1534 val |= TSI148_LCSR_DSAT_TM_2eVME;
1536 if (cycle & VME_2eSST)
1537 val |= TSI148_LCSR_DSAT_TM_2eSST;
1539 if (cycle & VME_2eSSTB) {
1540 dev_err(dev, "Currently not setting Broadcast Select "
1541 "Registers\n");
1542 val |= TSI148_LCSR_DSAT_TM_2eSSTB;
1545 /* Setup data width */
1546 switch (dwidth) {
1547 case VME_D16:
1548 val |= TSI148_LCSR_DSAT_DBW_16;
1549 break;
1550 case VME_D32:
1551 val |= TSI148_LCSR_DSAT_DBW_32;
1552 break;
1553 default:
1554 dev_err(dev, "Invalid data width\n");
1555 return -EINVAL;
1558 /* Setup address space */
1559 switch (aspace) {
1560 case VME_A16:
1561 val |= TSI148_LCSR_DSAT_AMODE_A16;
1562 break;
1563 case VME_A24:
1564 val |= TSI148_LCSR_DSAT_AMODE_A24;
1565 break;
1566 case VME_A32:
1567 val |= TSI148_LCSR_DSAT_AMODE_A32;
1568 break;
1569 case VME_A64:
1570 val |= TSI148_LCSR_DSAT_AMODE_A64;
1571 break;
1572 case VME_CRCSR:
1573 val |= TSI148_LCSR_DSAT_AMODE_CRCSR;
1574 break;
1575 case VME_USER1:
1576 val |= TSI148_LCSR_DSAT_AMODE_USER1;
1577 break;
1578 case VME_USER2:
1579 val |= TSI148_LCSR_DSAT_AMODE_USER2;
1580 break;
1581 case VME_USER3:
1582 val |= TSI148_LCSR_DSAT_AMODE_USER3;
1583 break;
1584 case VME_USER4:
1585 val |= TSI148_LCSR_DSAT_AMODE_USER4;
1586 break;
1587 default:
1588 dev_err(dev, "Invalid address space\n");
1589 return -EINVAL;
1590 break;
1593 if (cycle & VME_SUPER)
1594 val |= TSI148_LCSR_DSAT_SUP;
1595 if (cycle & VME_PROG)
1596 val |= TSI148_LCSR_DSAT_PGM;
1598 *attr = cpu_to_be32(val);
1600 return 0;
1603 static int tsi148_dma_set_vme_dest_attributes(struct device *dev, __be32 *attr,
1604 u32 aspace, u32 cycle, u32 dwidth)
1606 u32 val;
1608 val = be32_to_cpu(*attr);
1610 /* Setup 2eSST speeds */
1611 switch (cycle & (VME_2eSST160 | VME_2eSST267 | VME_2eSST320)) {
1612 case VME_2eSST160:
1613 val |= TSI148_LCSR_DDAT_2eSSTM_160;
1614 break;
1615 case VME_2eSST267:
1616 val |= TSI148_LCSR_DDAT_2eSSTM_267;
1617 break;
1618 case VME_2eSST320:
1619 val |= TSI148_LCSR_DDAT_2eSSTM_320;
1620 break;
1623 /* Setup cycle types */
1624 if (cycle & VME_SCT)
1625 val |= TSI148_LCSR_DDAT_TM_SCT;
1627 if (cycle & VME_BLT)
1628 val |= TSI148_LCSR_DDAT_TM_BLT;
1630 if (cycle & VME_MBLT)
1631 val |= TSI148_LCSR_DDAT_TM_MBLT;
1633 if (cycle & VME_2eVME)
1634 val |= TSI148_LCSR_DDAT_TM_2eVME;
1636 if (cycle & VME_2eSST)
1637 val |= TSI148_LCSR_DDAT_TM_2eSST;
1639 if (cycle & VME_2eSSTB) {
1640 dev_err(dev, "Currently not setting Broadcast Select "
1641 "Registers\n");
1642 val |= TSI148_LCSR_DDAT_TM_2eSSTB;
1645 /* Setup data width */
1646 switch (dwidth) {
1647 case VME_D16:
1648 val |= TSI148_LCSR_DDAT_DBW_16;
1649 break;
1650 case VME_D32:
1651 val |= TSI148_LCSR_DDAT_DBW_32;
1652 break;
1653 default:
1654 dev_err(dev, "Invalid data width\n");
1655 return -EINVAL;
1658 /* Setup address space */
1659 switch (aspace) {
1660 case VME_A16:
1661 val |= TSI148_LCSR_DDAT_AMODE_A16;
1662 break;
1663 case VME_A24:
1664 val |= TSI148_LCSR_DDAT_AMODE_A24;
1665 break;
1666 case VME_A32:
1667 val |= TSI148_LCSR_DDAT_AMODE_A32;
1668 break;
1669 case VME_A64:
1670 val |= TSI148_LCSR_DDAT_AMODE_A64;
1671 break;
1672 case VME_CRCSR:
1673 val |= TSI148_LCSR_DDAT_AMODE_CRCSR;
1674 break;
1675 case VME_USER1:
1676 val |= TSI148_LCSR_DDAT_AMODE_USER1;
1677 break;
1678 case VME_USER2:
1679 val |= TSI148_LCSR_DDAT_AMODE_USER2;
1680 break;
1681 case VME_USER3:
1682 val |= TSI148_LCSR_DDAT_AMODE_USER3;
1683 break;
1684 case VME_USER4:
1685 val |= TSI148_LCSR_DDAT_AMODE_USER4;
1686 break;
1687 default:
1688 dev_err(dev, "Invalid address space\n");
1689 return -EINVAL;
1690 break;
1693 if (cycle & VME_SUPER)
1694 val |= TSI148_LCSR_DDAT_SUP;
1695 if (cycle & VME_PROG)
1696 val |= TSI148_LCSR_DDAT_PGM;
1698 *attr = cpu_to_be32(val);
1700 return 0;
1704 * Add a link list descriptor to the list
1706 * Note: DMA engine expects the DMA descriptor to be big endian.
1708 static int tsi148_dma_list_add(struct vme_dma_list *list,
1709 struct vme_dma_attr *src, struct vme_dma_attr *dest, size_t count)
1711 struct tsi148_dma_entry *entry, *prev;
1712 u32 address_high, address_low, val;
1713 struct vme_dma_pattern *pattern_attr;
1714 struct vme_dma_pci *pci_attr;
1715 struct vme_dma_vme *vme_attr;
1716 int retval = 0;
1717 struct vme_bridge *tsi148_bridge;
1719 tsi148_bridge = list->parent->parent;
1721 /* Descriptor must be aligned on 64-bit boundaries */
1722 entry = kmalloc(sizeof(struct tsi148_dma_entry), GFP_KERNEL);
1723 if (entry == NULL) {
1724 dev_err(tsi148_bridge->parent, "Failed to allocate memory for "
1725 "dma resource structure\n");
1726 retval = -ENOMEM;
1727 goto err_mem;
1730 /* Test descriptor alignment */
1731 if ((unsigned long)&entry->descriptor & 0x7) {
1732 dev_err(tsi148_bridge->parent, "Descriptor not aligned to 8 "
1733 "byte boundary as required: %p\n",
1734 &entry->descriptor);
1735 retval = -EINVAL;
1736 goto err_align;
1739 /* Given we are going to fill out the structure, we probably don't
1740 * need to zero it, but better safe than sorry for now.
1742 memset(&entry->descriptor, 0, sizeof(struct tsi148_dma_descriptor));
1744 /* Fill out source part */
1745 switch (src->type) {
1746 case VME_DMA_PATTERN:
1747 pattern_attr = src->private;
1749 entry->descriptor.dsal = cpu_to_be32(pattern_attr->pattern);
1751 val = TSI148_LCSR_DSAT_TYP_PAT;
1753 /* Default behaviour is 32 bit pattern */
1754 if (pattern_attr->type & VME_DMA_PATTERN_BYTE)
1755 val |= TSI148_LCSR_DSAT_PSZ;
1757 /* It seems that the default behaviour is to increment */
1758 if ((pattern_attr->type & VME_DMA_PATTERN_INCREMENT) == 0)
1759 val |= TSI148_LCSR_DSAT_NIN;
1760 entry->descriptor.dsat = cpu_to_be32(val);
1761 break;
1762 case VME_DMA_PCI:
1763 pci_attr = src->private;
1765 reg_split((unsigned long long)pci_attr->address, &address_high,
1766 &address_low);
1767 entry->descriptor.dsau = cpu_to_be32(address_high);
1768 entry->descriptor.dsal = cpu_to_be32(address_low);
1769 entry->descriptor.dsat = cpu_to_be32(TSI148_LCSR_DSAT_TYP_PCI);
1770 break;
1771 case VME_DMA_VME:
1772 vme_attr = src->private;
1774 reg_split((unsigned long long)vme_attr->address, &address_high,
1775 &address_low);
1776 entry->descriptor.dsau = cpu_to_be32(address_high);
1777 entry->descriptor.dsal = cpu_to_be32(address_low);
1778 entry->descriptor.dsat = cpu_to_be32(TSI148_LCSR_DSAT_TYP_VME);
1780 retval = tsi148_dma_set_vme_src_attributes(
1781 tsi148_bridge->parent, &entry->descriptor.dsat,
1782 vme_attr->aspace, vme_attr->cycle, vme_attr->dwidth);
1783 if (retval < 0)
1784 goto err_source;
1785 break;
1786 default:
1787 dev_err(tsi148_bridge->parent, "Invalid source type\n");
1788 retval = -EINVAL;
1789 goto err_source;
1790 break;
1793 /* Assume last link - this will be over-written by adding another */
1794 entry->descriptor.dnlau = cpu_to_be32(0);
1795 entry->descriptor.dnlal = cpu_to_be32(TSI148_LCSR_DNLAL_LLA);
1797 /* Fill out destination part */
1798 switch (dest->type) {
1799 case VME_DMA_PCI:
1800 pci_attr = dest->private;
1802 reg_split((unsigned long long)pci_attr->address, &address_high,
1803 &address_low);
1804 entry->descriptor.ddau = cpu_to_be32(address_high);
1805 entry->descriptor.ddal = cpu_to_be32(address_low);
1806 entry->descriptor.ddat = cpu_to_be32(TSI148_LCSR_DDAT_TYP_PCI);
1807 break;
1808 case VME_DMA_VME:
1809 vme_attr = dest->private;
1811 reg_split((unsigned long long)vme_attr->address, &address_high,
1812 &address_low);
1813 entry->descriptor.ddau = cpu_to_be32(address_high);
1814 entry->descriptor.ddal = cpu_to_be32(address_low);
1815 entry->descriptor.ddat = cpu_to_be32(TSI148_LCSR_DDAT_TYP_VME);
1817 retval = tsi148_dma_set_vme_dest_attributes(
1818 tsi148_bridge->parent, &entry->descriptor.ddat,
1819 vme_attr->aspace, vme_attr->cycle, vme_attr->dwidth);
1820 if (retval < 0)
1821 goto err_dest;
1822 break;
1823 default:
1824 dev_err(tsi148_bridge->parent, "Invalid destination type\n");
1825 retval = -EINVAL;
1826 goto err_dest;
1827 break;
1830 /* Fill out count */
1831 entry->descriptor.dcnt = cpu_to_be32((u32)count);
1833 /* Add to list */
1834 list_add_tail(&entry->list, &list->entries);
1836 entry->dma_handle = dma_map_single(tsi148_bridge->parent,
1837 &entry->descriptor,
1838 sizeof(struct tsi148_dma_descriptor), DMA_TO_DEVICE);
1839 if (dma_mapping_error(tsi148_bridge->parent, entry->dma_handle)) {
1840 dev_err(tsi148_bridge->parent, "DMA mapping error\n");
1841 retval = -EINVAL;
1842 goto err_dma;
1845 /* Fill out previous descriptors "Next Address" */
1846 if (entry->list.prev != &list->entries) {
1847 reg_split((unsigned long long)entry->dma_handle, &address_high,
1848 &address_low);
1849 prev = list_entry(entry->list.prev, struct tsi148_dma_entry,
1850 list);
1851 prev->descriptor.dnlau = cpu_to_be32(address_high);
1852 prev->descriptor.dnlal = cpu_to_be32(address_low);
1856 return 0;
1858 err_dma:
1859 err_dest:
1860 err_source:
1861 err_align:
1862 kfree(entry);
1863 err_mem:
1864 return retval;
1868 * Check to see if the provided DMA channel is busy.
1870 static int tsi148_dma_busy(struct vme_bridge *tsi148_bridge, int channel)
1872 u32 tmp;
1873 struct tsi148_driver *bridge;
1875 bridge = tsi148_bridge->driver_priv;
1877 tmp = ioread32be(bridge->base + TSI148_LCSR_DMA[channel] +
1878 TSI148_LCSR_OFFSET_DSTA);
1880 if (tmp & TSI148_LCSR_DSTA_BSY)
1881 return 0;
1882 else
1883 return 1;
1888 * Execute a previously generated link list
1890 * XXX Need to provide control register configuration.
1892 static int tsi148_dma_list_exec(struct vme_dma_list *list)
1894 struct vme_dma_resource *ctrlr;
1895 int channel, retval;
1896 struct tsi148_dma_entry *entry;
1897 u32 bus_addr_high, bus_addr_low;
1898 u32 val, dctlreg = 0;
1899 struct vme_bridge *tsi148_bridge;
1900 struct tsi148_driver *bridge;
1902 ctrlr = list->parent;
1904 tsi148_bridge = ctrlr->parent;
1906 bridge = tsi148_bridge->driver_priv;
1908 mutex_lock(&ctrlr->mtx);
1910 channel = ctrlr->number;
1912 if (!list_empty(&ctrlr->running)) {
1914 * XXX We have an active DMA transfer and currently haven't
1915 * sorted out the mechanism for "pending" DMA transfers.
1916 * Return busy.
1918 /* Need to add to pending here */
1919 mutex_unlock(&ctrlr->mtx);
1920 return -EBUSY;
1921 } else {
1922 list_add(&list->list, &ctrlr->running);
1925 /* Get first bus address and write into registers */
1926 entry = list_first_entry(&list->entries, struct tsi148_dma_entry,
1927 list);
1929 mutex_unlock(&ctrlr->mtx);
1931 reg_split(entry->dma_handle, &bus_addr_high, &bus_addr_low);
1933 iowrite32be(bus_addr_high, bridge->base +
1934 TSI148_LCSR_DMA[channel] + TSI148_LCSR_OFFSET_DNLAU);
1935 iowrite32be(bus_addr_low, bridge->base +
1936 TSI148_LCSR_DMA[channel] + TSI148_LCSR_OFFSET_DNLAL);
1938 dctlreg = ioread32be(bridge->base + TSI148_LCSR_DMA[channel] +
1939 TSI148_LCSR_OFFSET_DCTL);
1941 /* Start the operation */
1942 iowrite32be(dctlreg | TSI148_LCSR_DCTL_DGO, bridge->base +
1943 TSI148_LCSR_DMA[channel] + TSI148_LCSR_OFFSET_DCTL);
1945 retval = wait_event_interruptible(bridge->dma_queue[channel],
1946 tsi148_dma_busy(ctrlr->parent, channel));
1948 if (retval) {
1949 iowrite32be(dctlreg | TSI148_LCSR_DCTL_ABT, bridge->base +
1950 TSI148_LCSR_DMA[channel] + TSI148_LCSR_OFFSET_DCTL);
1951 /* Wait for the operation to abort */
1952 wait_event(bridge->dma_queue[channel],
1953 tsi148_dma_busy(ctrlr->parent, channel));
1954 retval = -EINTR;
1955 goto exit;
1959 * Read status register, this register is valid until we kick off a
1960 * new transfer.
1962 val = ioread32be(bridge->base + TSI148_LCSR_DMA[channel] +
1963 TSI148_LCSR_OFFSET_DSTA);
1965 if (val & TSI148_LCSR_DSTA_VBE) {
1966 dev_err(tsi148_bridge->parent, "DMA Error. DSTA=%08X\n", val);
1967 retval = -EIO;
1970 exit:
1971 /* Remove list from running list */
1972 mutex_lock(&ctrlr->mtx);
1973 list_del(&list->list);
1974 mutex_unlock(&ctrlr->mtx);
1976 return retval;
1980 * Clean up a previously generated link list
1982 * We have a separate function, don't assume that the chain can't be reused.
1984 static int tsi148_dma_list_empty(struct vme_dma_list *list)
1986 struct list_head *pos, *temp;
1987 struct tsi148_dma_entry *entry;
1989 struct vme_bridge *tsi148_bridge = list->parent->parent;
1991 /* detach and free each entry */
1992 list_for_each_safe(pos, temp, &list->entries) {
1993 list_del(pos);
1994 entry = list_entry(pos, struct tsi148_dma_entry, list);
1996 dma_unmap_single(tsi148_bridge->parent, entry->dma_handle,
1997 sizeof(struct tsi148_dma_descriptor), DMA_TO_DEVICE);
1998 kfree(entry);
2001 return 0;
2005 * All 4 location monitors reside at the same base - this is therefore a
2006 * system wide configuration.
2008 * This does not enable the LM monitor - that should be done when the first
2009 * callback is attached and disabled when the last callback is removed.
2011 static int tsi148_lm_set(struct vme_lm_resource *lm, unsigned long long lm_base,
2012 u32 aspace, u32 cycle)
2014 u32 lm_base_high, lm_base_low, lm_ctl = 0;
2015 int i;
2016 struct vme_bridge *tsi148_bridge;
2017 struct tsi148_driver *bridge;
2019 tsi148_bridge = lm->parent;
2021 bridge = tsi148_bridge->driver_priv;
2023 mutex_lock(&lm->mtx);
2025 /* If we already have a callback attached, we can't move it! */
2026 for (i = 0; i < lm->monitors; i++) {
2027 if (bridge->lm_callback[i] != NULL) {
2028 mutex_unlock(&lm->mtx);
2029 dev_err(tsi148_bridge->parent, "Location monitor "
2030 "callback attached, can't reset\n");
2031 return -EBUSY;
2035 switch (aspace) {
2036 case VME_A16:
2037 lm_ctl |= TSI148_LCSR_LMAT_AS_A16;
2038 break;
2039 case VME_A24:
2040 lm_ctl |= TSI148_LCSR_LMAT_AS_A24;
2041 break;
2042 case VME_A32:
2043 lm_ctl |= TSI148_LCSR_LMAT_AS_A32;
2044 break;
2045 case VME_A64:
2046 lm_ctl |= TSI148_LCSR_LMAT_AS_A64;
2047 break;
2048 default:
2049 mutex_unlock(&lm->mtx);
2050 dev_err(tsi148_bridge->parent, "Invalid address space\n");
2051 return -EINVAL;
2052 break;
2055 if (cycle & VME_SUPER)
2056 lm_ctl |= TSI148_LCSR_LMAT_SUPR ;
2057 if (cycle & VME_USER)
2058 lm_ctl |= TSI148_LCSR_LMAT_NPRIV;
2059 if (cycle & VME_PROG)
2060 lm_ctl |= TSI148_LCSR_LMAT_PGM;
2061 if (cycle & VME_DATA)
2062 lm_ctl |= TSI148_LCSR_LMAT_DATA;
2064 reg_split(lm_base, &lm_base_high, &lm_base_low);
2066 iowrite32be(lm_base_high, bridge->base + TSI148_LCSR_LMBAU);
2067 iowrite32be(lm_base_low, bridge->base + TSI148_LCSR_LMBAL);
2068 iowrite32be(lm_ctl, bridge->base + TSI148_LCSR_LMAT);
2070 mutex_unlock(&lm->mtx);
2072 return 0;
2075 /* Get configuration of the callback monitor and return whether it is enabled
2076 * or disabled.
2078 static int tsi148_lm_get(struct vme_lm_resource *lm,
2079 unsigned long long *lm_base, u32 *aspace, u32 *cycle)
2081 u32 lm_base_high, lm_base_low, lm_ctl, enabled = 0;
2082 struct tsi148_driver *bridge;
2084 bridge = lm->parent->driver_priv;
2086 mutex_lock(&lm->mtx);
2088 lm_base_high = ioread32be(bridge->base + TSI148_LCSR_LMBAU);
2089 lm_base_low = ioread32be(bridge->base + TSI148_LCSR_LMBAL);
2090 lm_ctl = ioread32be(bridge->base + TSI148_LCSR_LMAT);
2092 reg_join(lm_base_high, lm_base_low, lm_base);
2094 if (lm_ctl & TSI148_LCSR_LMAT_EN)
2095 enabled = 1;
2097 if ((lm_ctl & TSI148_LCSR_LMAT_AS_M) == TSI148_LCSR_LMAT_AS_A16)
2098 *aspace |= VME_A16;
2100 if ((lm_ctl & TSI148_LCSR_LMAT_AS_M) == TSI148_LCSR_LMAT_AS_A24)
2101 *aspace |= VME_A24;
2103 if ((lm_ctl & TSI148_LCSR_LMAT_AS_M) == TSI148_LCSR_LMAT_AS_A32)
2104 *aspace |= VME_A32;
2106 if ((lm_ctl & TSI148_LCSR_LMAT_AS_M) == TSI148_LCSR_LMAT_AS_A64)
2107 *aspace |= VME_A64;
2110 if (lm_ctl & TSI148_LCSR_LMAT_SUPR)
2111 *cycle |= VME_SUPER;
2112 if (lm_ctl & TSI148_LCSR_LMAT_NPRIV)
2113 *cycle |= VME_USER;
2114 if (lm_ctl & TSI148_LCSR_LMAT_PGM)
2115 *cycle |= VME_PROG;
2116 if (lm_ctl & TSI148_LCSR_LMAT_DATA)
2117 *cycle |= VME_DATA;
2119 mutex_unlock(&lm->mtx);
2121 return enabled;
2125 * Attach a callback to a specific location monitor.
2127 * Callback will be passed the monitor triggered.
2129 static int tsi148_lm_attach(struct vme_lm_resource *lm, int monitor,
2130 void (*callback)(int))
2132 u32 lm_ctl, tmp;
2133 struct vme_bridge *tsi148_bridge;
2134 struct tsi148_driver *bridge;
2136 tsi148_bridge = lm->parent;
2138 bridge = tsi148_bridge->driver_priv;
2140 mutex_lock(&lm->mtx);
2142 /* Ensure that the location monitor is configured - need PGM or DATA */
2143 lm_ctl = ioread32be(bridge->base + TSI148_LCSR_LMAT);
2144 if ((lm_ctl & (TSI148_LCSR_LMAT_PGM | TSI148_LCSR_LMAT_DATA)) == 0) {
2145 mutex_unlock(&lm->mtx);
2146 dev_err(tsi148_bridge->parent, "Location monitor not properly "
2147 "configured\n");
2148 return -EINVAL;
2151 /* Check that a callback isn't already attached */
2152 if (bridge->lm_callback[monitor] != NULL) {
2153 mutex_unlock(&lm->mtx);
2154 dev_err(tsi148_bridge->parent, "Existing callback attached\n");
2155 return -EBUSY;
2158 /* Attach callback */
2159 bridge->lm_callback[monitor] = callback;
2161 /* Enable Location Monitor interrupt */
2162 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEN);
2163 tmp |= TSI148_LCSR_INTEN_LMEN[monitor];
2164 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEN);
2166 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEO);
2167 tmp |= TSI148_LCSR_INTEO_LMEO[monitor];
2168 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEO);
2170 /* Ensure that global Location Monitor Enable set */
2171 if ((lm_ctl & TSI148_LCSR_LMAT_EN) == 0) {
2172 lm_ctl |= TSI148_LCSR_LMAT_EN;
2173 iowrite32be(lm_ctl, bridge->base + TSI148_LCSR_LMAT);
2176 mutex_unlock(&lm->mtx);
2178 return 0;
2182 * Detach a callback function forn a specific location monitor.
2184 static int tsi148_lm_detach(struct vme_lm_resource *lm, int monitor)
2186 u32 lm_en, tmp;
2187 struct tsi148_driver *bridge;
2189 bridge = lm->parent->driver_priv;
2191 mutex_lock(&lm->mtx);
2193 /* Disable Location Monitor and ensure previous interrupts are clear */
2194 lm_en = ioread32be(bridge->base + TSI148_LCSR_INTEN);
2195 lm_en &= ~TSI148_LCSR_INTEN_LMEN[monitor];
2196 iowrite32be(lm_en, bridge->base + TSI148_LCSR_INTEN);
2198 tmp = ioread32be(bridge->base + TSI148_LCSR_INTEO);
2199 tmp &= ~TSI148_LCSR_INTEO_LMEO[monitor];
2200 iowrite32be(tmp, bridge->base + TSI148_LCSR_INTEO);
2202 iowrite32be(TSI148_LCSR_INTC_LMC[monitor],
2203 bridge->base + TSI148_LCSR_INTC);
2205 /* Detach callback */
2206 bridge->lm_callback[monitor] = NULL;
2208 /* If all location monitors disabled, disable global Location Monitor */
2209 if ((lm_en & (TSI148_LCSR_INTS_LM0S | TSI148_LCSR_INTS_LM1S |
2210 TSI148_LCSR_INTS_LM2S | TSI148_LCSR_INTS_LM3S)) == 0) {
2211 tmp = ioread32be(bridge->base + TSI148_LCSR_LMAT);
2212 tmp &= ~TSI148_LCSR_LMAT_EN;
2213 iowrite32be(tmp, bridge->base + TSI148_LCSR_LMAT);
2216 mutex_unlock(&lm->mtx);
2218 return 0;
2222 * Determine Geographical Addressing
2224 static int tsi148_slot_get(struct vme_bridge *tsi148_bridge)
2226 u32 slot = 0;
2227 struct tsi148_driver *bridge;
2229 bridge = tsi148_bridge->driver_priv;
2231 if (!geoid) {
2232 slot = ioread32be(bridge->base + TSI148_LCSR_VSTAT);
2233 slot = slot & TSI148_LCSR_VSTAT_GA_M;
2234 } else
2235 slot = geoid;
2237 return (int)slot;
2240 static void *tsi148_alloc_consistent(struct device *parent, size_t size,
2241 dma_addr_t *dma)
2243 struct pci_dev *pdev;
2245 /* Find pci_dev container of dev */
2246 pdev = to_pci_dev(parent);
2248 return pci_alloc_consistent(pdev, size, dma);
2251 static void tsi148_free_consistent(struct device *parent, size_t size,
2252 void *vaddr, dma_addr_t dma)
2254 struct pci_dev *pdev;
2256 /* Find pci_dev container of dev */
2257 pdev = to_pci_dev(parent);
2259 pci_free_consistent(pdev, size, vaddr, dma);
2263 * Configure CR/CSR space
2265 * Access to the CR/CSR can be configured at power-up. The location of the
2266 * CR/CSR registers in the CR/CSR address space is determined by the boards
2267 * Auto-ID or Geographic address. This function ensures that the window is
2268 * enabled at an offset consistent with the boards geopgraphic address.
2270 * Each board has a 512kB window, with the highest 4kB being used for the
2271 * boards registers, this means there is a fix length 508kB window which must
2272 * be mapped onto PCI memory.
2274 static int tsi148_crcsr_init(struct vme_bridge *tsi148_bridge,
2275 struct pci_dev *pdev)
2277 u32 cbar, crat, vstat;
2278 u32 crcsr_bus_high, crcsr_bus_low;
2279 int retval;
2280 struct tsi148_driver *bridge;
2282 bridge = tsi148_bridge->driver_priv;
2284 /* Allocate mem for CR/CSR image */
2285 bridge->crcsr_kernel = pci_zalloc_consistent(pdev, VME_CRCSR_BUF_SIZE,
2286 &bridge->crcsr_bus);
2287 if (bridge->crcsr_kernel == NULL) {
2288 dev_err(tsi148_bridge->parent, "Failed to allocate memory for "
2289 "CR/CSR image\n");
2290 return -ENOMEM;
2293 reg_split(bridge->crcsr_bus, &crcsr_bus_high, &crcsr_bus_low);
2295 iowrite32be(crcsr_bus_high, bridge->base + TSI148_LCSR_CROU);
2296 iowrite32be(crcsr_bus_low, bridge->base + TSI148_LCSR_CROL);
2298 /* Ensure that the CR/CSR is configured at the correct offset */
2299 cbar = ioread32be(bridge->base + TSI148_CBAR);
2300 cbar = (cbar & TSI148_CRCSR_CBAR_M)>>3;
2302 vstat = tsi148_slot_get(tsi148_bridge);
2304 if (cbar != vstat) {
2305 cbar = vstat;
2306 dev_info(tsi148_bridge->parent, "Setting CR/CSR offset\n");
2307 iowrite32be(cbar<<3, bridge->base + TSI148_CBAR);
2309 dev_info(tsi148_bridge->parent, "CR/CSR Offset: %d\n", cbar);
2311 crat = ioread32be(bridge->base + TSI148_LCSR_CRAT);
2312 if (crat & TSI148_LCSR_CRAT_EN)
2313 dev_info(tsi148_bridge->parent, "CR/CSR already enabled\n");
2314 else {
2315 dev_info(tsi148_bridge->parent, "Enabling CR/CSR space\n");
2316 iowrite32be(crat | TSI148_LCSR_CRAT_EN,
2317 bridge->base + TSI148_LCSR_CRAT);
2320 /* If we want flushed, error-checked writes, set up a window
2321 * over the CR/CSR registers. We read from here to safely flush
2322 * through VME writes.
2324 if (err_chk) {
2325 retval = tsi148_master_set(bridge->flush_image, 1,
2326 (vstat * 0x80000), 0x80000, VME_CRCSR, VME_SCT,
2327 VME_D16);
2328 if (retval)
2329 dev_err(tsi148_bridge->parent, "Configuring flush image"
2330 " failed\n");
2333 return 0;
2337 static void tsi148_crcsr_exit(struct vme_bridge *tsi148_bridge,
2338 struct pci_dev *pdev)
2340 u32 crat;
2341 struct tsi148_driver *bridge;
2343 bridge = tsi148_bridge->driver_priv;
2345 /* Turn off CR/CSR space */
2346 crat = ioread32be(bridge->base + TSI148_LCSR_CRAT);
2347 iowrite32be(crat & ~TSI148_LCSR_CRAT_EN,
2348 bridge->base + TSI148_LCSR_CRAT);
2350 /* Free image */
2351 iowrite32be(0, bridge->base + TSI148_LCSR_CROU);
2352 iowrite32be(0, bridge->base + TSI148_LCSR_CROL);
2354 pci_free_consistent(pdev, VME_CRCSR_BUF_SIZE, bridge->crcsr_kernel,
2355 bridge->crcsr_bus);
2358 static int tsi148_probe(struct pci_dev *pdev, const struct pci_device_id *id)
2360 int retval, i, master_num;
2361 u32 data;
2362 struct list_head *pos = NULL, *n;
2363 struct vme_bridge *tsi148_bridge;
2364 struct tsi148_driver *tsi148_device;
2365 struct vme_master_resource *master_image;
2366 struct vme_slave_resource *slave_image;
2367 struct vme_dma_resource *dma_ctrlr;
2368 struct vme_lm_resource *lm;
2370 /* If we want to support more than one of each bridge, we need to
2371 * dynamically generate this so we get one per device
2373 tsi148_bridge = kzalloc(sizeof(struct vme_bridge), GFP_KERNEL);
2374 if (tsi148_bridge == NULL) {
2375 dev_err(&pdev->dev, "Failed to allocate memory for device "
2376 "structure\n");
2377 retval = -ENOMEM;
2378 goto err_struct;
2381 tsi148_device = kzalloc(sizeof(struct tsi148_driver), GFP_KERNEL);
2382 if (tsi148_device == NULL) {
2383 dev_err(&pdev->dev, "Failed to allocate memory for device "
2384 "structure\n");
2385 retval = -ENOMEM;
2386 goto err_driver;
2389 tsi148_bridge->driver_priv = tsi148_device;
2391 /* Enable the device */
2392 retval = pci_enable_device(pdev);
2393 if (retval) {
2394 dev_err(&pdev->dev, "Unable to enable device\n");
2395 goto err_enable;
2398 /* Map Registers */
2399 retval = pci_request_regions(pdev, driver_name);
2400 if (retval) {
2401 dev_err(&pdev->dev, "Unable to reserve resources\n");
2402 goto err_resource;
2405 /* map registers in BAR 0 */
2406 tsi148_device->base = ioremap_nocache(pci_resource_start(pdev, 0),
2407 4096);
2408 if (!tsi148_device->base) {
2409 dev_err(&pdev->dev, "Unable to remap CRG region\n");
2410 retval = -EIO;
2411 goto err_remap;
2414 /* Check to see if the mapping worked out */
2415 data = ioread32(tsi148_device->base + TSI148_PCFS_ID) & 0x0000FFFF;
2416 if (data != PCI_VENDOR_ID_TUNDRA) {
2417 dev_err(&pdev->dev, "CRG region check failed\n");
2418 retval = -EIO;
2419 goto err_test;
2422 /* Initialize wait queues & mutual exclusion flags */
2423 init_waitqueue_head(&tsi148_device->dma_queue[0]);
2424 init_waitqueue_head(&tsi148_device->dma_queue[1]);
2425 init_waitqueue_head(&tsi148_device->iack_queue);
2426 mutex_init(&tsi148_device->vme_int);
2427 mutex_init(&tsi148_device->vme_rmw);
2429 tsi148_bridge->parent = &pdev->dev;
2430 strcpy(tsi148_bridge->name, driver_name);
2432 /* Setup IRQ */
2433 retval = tsi148_irq_init(tsi148_bridge);
2434 if (retval != 0) {
2435 dev_err(&pdev->dev, "Chip Initialization failed.\n");
2436 goto err_irq;
2439 /* If we are going to flush writes, we need to read from the VME bus.
2440 * We need to do this safely, thus we read the devices own CR/CSR
2441 * register. To do this we must set up a window in CR/CSR space and
2442 * hence have one less master window resource available.
2444 master_num = TSI148_MAX_MASTER;
2445 if (err_chk) {
2446 master_num--;
2448 tsi148_device->flush_image =
2449 kmalloc(sizeof(struct vme_master_resource), GFP_KERNEL);
2450 if (tsi148_device->flush_image == NULL) {
2451 dev_err(&pdev->dev, "Failed to allocate memory for "
2452 "flush resource structure\n");
2453 retval = -ENOMEM;
2454 goto err_master;
2456 tsi148_device->flush_image->parent = tsi148_bridge;
2457 spin_lock_init(&tsi148_device->flush_image->lock);
2458 tsi148_device->flush_image->locked = 1;
2459 tsi148_device->flush_image->number = master_num;
2460 memset(&tsi148_device->flush_image->bus_resource, 0,
2461 sizeof(struct resource));
2462 tsi148_device->flush_image->kern_base = NULL;
2465 /* Add master windows to list */
2466 INIT_LIST_HEAD(&tsi148_bridge->master_resources);
2467 for (i = 0; i < master_num; i++) {
2468 master_image = kmalloc(sizeof(struct vme_master_resource),
2469 GFP_KERNEL);
2470 if (master_image == NULL) {
2471 dev_err(&pdev->dev, "Failed to allocate memory for "
2472 "master resource structure\n");
2473 retval = -ENOMEM;
2474 goto err_master;
2476 master_image->parent = tsi148_bridge;
2477 spin_lock_init(&master_image->lock);
2478 master_image->locked = 0;
2479 master_image->number = i;
2480 master_image->address_attr = VME_A16 | VME_A24 | VME_A32 |
2481 VME_A64 | VME_CRCSR | VME_USER1 | VME_USER2 |
2482 VME_USER3 | VME_USER4;
2483 master_image->cycle_attr = VME_SCT | VME_BLT | VME_MBLT |
2484 VME_2eVME | VME_2eSST | VME_2eSSTB | VME_2eSST160 |
2485 VME_2eSST267 | VME_2eSST320 | VME_SUPER | VME_USER |
2486 VME_PROG | VME_DATA;
2487 master_image->width_attr = VME_D16 | VME_D32;
2488 memset(&master_image->bus_resource, 0,
2489 sizeof(struct resource));
2490 master_image->kern_base = NULL;
2491 list_add_tail(&master_image->list,
2492 &tsi148_bridge->master_resources);
2495 /* Add slave windows to list */
2496 INIT_LIST_HEAD(&tsi148_bridge->slave_resources);
2497 for (i = 0; i < TSI148_MAX_SLAVE; i++) {
2498 slave_image = kmalloc(sizeof(struct vme_slave_resource),
2499 GFP_KERNEL);
2500 if (slave_image == NULL) {
2501 dev_err(&pdev->dev, "Failed to allocate memory for "
2502 "slave resource structure\n");
2503 retval = -ENOMEM;
2504 goto err_slave;
2506 slave_image->parent = tsi148_bridge;
2507 mutex_init(&slave_image->mtx);
2508 slave_image->locked = 0;
2509 slave_image->number = i;
2510 slave_image->address_attr = VME_A16 | VME_A24 | VME_A32 |
2511 VME_A64;
2512 slave_image->cycle_attr = VME_SCT | VME_BLT | VME_MBLT |
2513 VME_2eVME | VME_2eSST | VME_2eSSTB | VME_2eSST160 |
2514 VME_2eSST267 | VME_2eSST320 | VME_SUPER | VME_USER |
2515 VME_PROG | VME_DATA;
2516 list_add_tail(&slave_image->list,
2517 &tsi148_bridge->slave_resources);
2520 /* Add dma engines to list */
2521 INIT_LIST_HEAD(&tsi148_bridge->dma_resources);
2522 for (i = 0; i < TSI148_MAX_DMA; i++) {
2523 dma_ctrlr = kmalloc(sizeof(struct vme_dma_resource),
2524 GFP_KERNEL);
2525 if (dma_ctrlr == NULL) {
2526 dev_err(&pdev->dev, "Failed to allocate memory for "
2527 "dma resource structure\n");
2528 retval = -ENOMEM;
2529 goto err_dma;
2531 dma_ctrlr->parent = tsi148_bridge;
2532 mutex_init(&dma_ctrlr->mtx);
2533 dma_ctrlr->locked = 0;
2534 dma_ctrlr->number = i;
2535 dma_ctrlr->route_attr = VME_DMA_VME_TO_MEM |
2536 VME_DMA_MEM_TO_VME | VME_DMA_VME_TO_VME |
2537 VME_DMA_MEM_TO_MEM | VME_DMA_PATTERN_TO_VME |
2538 VME_DMA_PATTERN_TO_MEM;
2539 INIT_LIST_HEAD(&dma_ctrlr->pending);
2540 INIT_LIST_HEAD(&dma_ctrlr->running);
2541 list_add_tail(&dma_ctrlr->list,
2542 &tsi148_bridge->dma_resources);
2545 /* Add location monitor to list */
2546 INIT_LIST_HEAD(&tsi148_bridge->lm_resources);
2547 lm = kmalloc(sizeof(struct vme_lm_resource), GFP_KERNEL);
2548 if (lm == NULL) {
2549 dev_err(&pdev->dev, "Failed to allocate memory for "
2550 "location monitor resource structure\n");
2551 retval = -ENOMEM;
2552 goto err_lm;
2554 lm->parent = tsi148_bridge;
2555 mutex_init(&lm->mtx);
2556 lm->locked = 0;
2557 lm->number = 1;
2558 lm->monitors = 4;
2559 list_add_tail(&lm->list, &tsi148_bridge->lm_resources);
2561 tsi148_bridge->slave_get = tsi148_slave_get;
2562 tsi148_bridge->slave_set = tsi148_slave_set;
2563 tsi148_bridge->master_get = tsi148_master_get;
2564 tsi148_bridge->master_set = tsi148_master_set;
2565 tsi148_bridge->master_read = tsi148_master_read;
2566 tsi148_bridge->master_write = tsi148_master_write;
2567 tsi148_bridge->master_rmw = tsi148_master_rmw;
2568 tsi148_bridge->dma_list_add = tsi148_dma_list_add;
2569 tsi148_bridge->dma_list_exec = tsi148_dma_list_exec;
2570 tsi148_bridge->dma_list_empty = tsi148_dma_list_empty;
2571 tsi148_bridge->irq_set = tsi148_irq_set;
2572 tsi148_bridge->irq_generate = tsi148_irq_generate;
2573 tsi148_bridge->lm_set = tsi148_lm_set;
2574 tsi148_bridge->lm_get = tsi148_lm_get;
2575 tsi148_bridge->lm_attach = tsi148_lm_attach;
2576 tsi148_bridge->lm_detach = tsi148_lm_detach;
2577 tsi148_bridge->slot_get = tsi148_slot_get;
2578 tsi148_bridge->alloc_consistent = tsi148_alloc_consistent;
2579 tsi148_bridge->free_consistent = tsi148_free_consistent;
2581 data = ioread32be(tsi148_device->base + TSI148_LCSR_VSTAT);
2582 dev_info(&pdev->dev, "Board is%s the VME system controller\n",
2583 (data & TSI148_LCSR_VSTAT_SCONS) ? "" : " not");
2584 if (!geoid)
2585 dev_info(&pdev->dev, "VME geographical address is %d\n",
2586 data & TSI148_LCSR_VSTAT_GA_M);
2587 else
2588 dev_info(&pdev->dev, "VME geographical address is set to %d\n",
2589 geoid);
2591 dev_info(&pdev->dev, "VME Write and flush and error check is %s\n",
2592 err_chk ? "enabled" : "disabled");
2594 retval = tsi148_crcsr_init(tsi148_bridge, pdev);
2595 if (retval) {
2596 dev_err(&pdev->dev, "CR/CSR configuration failed.\n");
2597 goto err_crcsr;
2600 retval = vme_register_bridge(tsi148_bridge);
2601 if (retval != 0) {
2602 dev_err(&pdev->dev, "Chip Registration failed.\n");
2603 goto err_reg;
2606 pci_set_drvdata(pdev, tsi148_bridge);
2608 /* Clear VME bus "board fail", and "power-up reset" lines */
2609 data = ioread32be(tsi148_device->base + TSI148_LCSR_VSTAT);
2610 data &= ~TSI148_LCSR_VSTAT_BRDFL;
2611 data |= TSI148_LCSR_VSTAT_CPURST;
2612 iowrite32be(data, tsi148_device->base + TSI148_LCSR_VSTAT);
2614 return 0;
2616 err_reg:
2617 tsi148_crcsr_exit(tsi148_bridge, pdev);
2618 err_crcsr:
2619 err_lm:
2620 /* resources are stored in link list */
2621 list_for_each_safe(pos, n, &tsi148_bridge->lm_resources) {
2622 lm = list_entry(pos, struct vme_lm_resource, list);
2623 list_del(pos);
2624 kfree(lm);
2626 err_dma:
2627 /* resources are stored in link list */
2628 list_for_each_safe(pos, n, &tsi148_bridge->dma_resources) {
2629 dma_ctrlr = list_entry(pos, struct vme_dma_resource, list);
2630 list_del(pos);
2631 kfree(dma_ctrlr);
2633 err_slave:
2634 /* resources are stored in link list */
2635 list_for_each_safe(pos, n, &tsi148_bridge->slave_resources) {
2636 slave_image = list_entry(pos, struct vme_slave_resource, list);
2637 list_del(pos);
2638 kfree(slave_image);
2640 err_master:
2641 /* resources are stored in link list */
2642 list_for_each_safe(pos, n, &tsi148_bridge->master_resources) {
2643 master_image = list_entry(pos, struct vme_master_resource,
2644 list);
2645 list_del(pos);
2646 kfree(master_image);
2649 tsi148_irq_exit(tsi148_bridge, pdev);
2650 err_irq:
2651 err_test:
2652 iounmap(tsi148_device->base);
2653 err_remap:
2654 pci_release_regions(pdev);
2655 err_resource:
2656 pci_disable_device(pdev);
2657 err_enable:
2658 kfree(tsi148_device);
2659 err_driver:
2660 kfree(tsi148_bridge);
2661 err_struct:
2662 return retval;
2666 static void tsi148_remove(struct pci_dev *pdev)
2668 struct list_head *pos = NULL;
2669 struct list_head *tmplist;
2670 struct vme_master_resource *master_image;
2671 struct vme_slave_resource *slave_image;
2672 struct vme_dma_resource *dma_ctrlr;
2673 int i;
2674 struct tsi148_driver *bridge;
2675 struct vme_bridge *tsi148_bridge = pci_get_drvdata(pdev);
2677 bridge = tsi148_bridge->driver_priv;
2680 dev_dbg(&pdev->dev, "Driver is being unloaded.\n");
2683 * Shutdown all inbound and outbound windows.
2685 for (i = 0; i < 8; i++) {
2686 iowrite32be(0, bridge->base + TSI148_LCSR_IT[i] +
2687 TSI148_LCSR_OFFSET_ITAT);
2688 iowrite32be(0, bridge->base + TSI148_LCSR_OT[i] +
2689 TSI148_LCSR_OFFSET_OTAT);
2693 * Shutdown Location monitor.
2695 iowrite32be(0, bridge->base + TSI148_LCSR_LMAT);
2698 * Shutdown CRG map.
2700 iowrite32be(0, bridge->base + TSI148_LCSR_CSRAT);
2703 * Clear error status.
2705 iowrite32be(0xFFFFFFFF, bridge->base + TSI148_LCSR_EDPAT);
2706 iowrite32be(0xFFFFFFFF, bridge->base + TSI148_LCSR_VEAT);
2707 iowrite32be(0x07000700, bridge->base + TSI148_LCSR_PSTAT);
2710 * Remove VIRQ interrupt (if any)
2712 if (ioread32be(bridge->base + TSI148_LCSR_VICR) & 0x800)
2713 iowrite32be(0x8000, bridge->base + TSI148_LCSR_VICR);
2716 * Map all Interrupts to PCI INTA
2718 iowrite32be(0x0, bridge->base + TSI148_LCSR_INTM1);
2719 iowrite32be(0x0, bridge->base + TSI148_LCSR_INTM2);
2721 tsi148_irq_exit(tsi148_bridge, pdev);
2723 vme_unregister_bridge(tsi148_bridge);
2725 tsi148_crcsr_exit(tsi148_bridge, pdev);
2727 /* resources are stored in link list */
2728 list_for_each_safe(pos, tmplist, &tsi148_bridge->dma_resources) {
2729 dma_ctrlr = list_entry(pos, struct vme_dma_resource, list);
2730 list_del(pos);
2731 kfree(dma_ctrlr);
2734 /* resources are stored in link list */
2735 list_for_each_safe(pos, tmplist, &tsi148_bridge->slave_resources) {
2736 slave_image = list_entry(pos, struct vme_slave_resource, list);
2737 list_del(pos);
2738 kfree(slave_image);
2741 /* resources are stored in link list */
2742 list_for_each_safe(pos, tmplist, &tsi148_bridge->master_resources) {
2743 master_image = list_entry(pos, struct vme_master_resource,
2744 list);
2745 list_del(pos);
2746 kfree(master_image);
2749 iounmap(bridge->base);
2751 pci_release_regions(pdev);
2753 pci_disable_device(pdev);
2755 kfree(tsi148_bridge->driver_priv);
2757 kfree(tsi148_bridge);
2760 module_pci_driver(tsi148_driver);
2762 MODULE_PARM_DESC(err_chk, "Check for VME errors on reads and writes");
2763 module_param(err_chk, bool, 0);
2765 MODULE_PARM_DESC(geoid, "Override geographical addressing");
2766 module_param(geoid, int, 0);
2768 MODULE_DESCRIPTION("VME driver for the Tundra Tempe VME bridge");
2769 MODULE_LICENSE("GPL");