Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/ieee1394...
[pandora-kernel.git] / drivers / staging / vme / bridges / vme_ca91cx42.c
1 /*
2  * Support for the Tundra Universe I/II VME-PCI Bridge Chips
3  *
4  * Author: Martyn Welch <martyn.welch@ge.com>
5  * Copyright 2008 GE Intelligent Platforms Embedded Systems, Inc.
6  *
7  * Based on work by Tom Armistead and Ajit Prem
8  * Copyright 2004 Motorola Inc.
9  *
10  * Derived from ca91c042.c by Michael Wyrick
11  *
12  * This program is free software; you can redistribute  it and/or modify it
13  * under  the terms of  the GNU General  Public License as published by the
14  * Free Software Foundation;  either version 2 of the  License, or (at your
15  * option) any later version.
16  */
17
18 #include <linux/module.h>
19 #include <linux/mm.h>
20 #include <linux/types.h>
21 #include <linux/errno.h>
22 #include <linux/pci.h>
23 #include <linux/dma-mapping.h>
24 #include <linux/poll.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
33 #include "../vme.h"
34 #include "../vme_bridge.h"
35 #include "vme_ca91cx42.h"
36
37 static int __init ca91cx42_init(void);
38 static int ca91cx42_probe(struct pci_dev *, const struct pci_device_id *);
39 static void ca91cx42_remove(struct pci_dev *);
40 static void __exit ca91cx42_exit(void);
41
42 /* Module parameters */
43 static int geoid;
44
45 static char driver_name[] = "vme_ca91cx42";
46
47 static const struct pci_device_id ca91cx42_ids[] = {
48         { PCI_DEVICE(PCI_VENDOR_ID_TUNDRA, PCI_DEVICE_ID_TUNDRA_CA91C142) },
49         { },
50 };
51
52 static struct pci_driver ca91cx42_driver = {
53         .name = driver_name,
54         .id_table = ca91cx42_ids,
55         .probe = ca91cx42_probe,
56         .remove = ca91cx42_remove,
57 };
58
59 static u32 ca91cx42_DMA_irqhandler(struct ca91cx42_driver *bridge)
60 {
61         wake_up(&(bridge->dma_queue));
62
63         return CA91CX42_LINT_DMA;
64 }
65
66 static u32 ca91cx42_LM_irqhandler(struct ca91cx42_driver *bridge, u32 stat)
67 {
68         int i;
69         u32 serviced = 0;
70
71         for (i = 0; i < 4; i++) {
72                 if (stat & CA91CX42_LINT_LM[i]) {
73                         /* We only enable interrupts if the callback is set */
74                         bridge->lm_callback[i](i);
75                         serviced |= CA91CX42_LINT_LM[i];
76                 }
77         }
78
79         return serviced;
80 }
81
82 /* XXX This needs to be split into 4 queues */
83 static u32 ca91cx42_MB_irqhandler(struct ca91cx42_driver *bridge, int mbox_mask)
84 {
85         wake_up(&(bridge->mbox_queue));
86
87         return CA91CX42_LINT_MBOX;
88 }
89
90 static u32 ca91cx42_IACK_irqhandler(struct ca91cx42_driver *bridge)
91 {
92         wake_up(&(bridge->iack_queue));
93
94         return CA91CX42_LINT_SW_IACK;
95 }
96
97 static u32 ca91cx42_VERR_irqhandler(struct vme_bridge *ca91cx42_bridge)
98 {
99         int val;
100         struct ca91cx42_driver *bridge;
101
102         bridge = ca91cx42_bridge->driver_priv;
103
104         val = ioread32(bridge->base + DGCS);
105
106         if (!(val & 0x00000800)) {
107                 dev_err(ca91cx42_bridge->parent, "ca91cx42_VERR_irqhandler DMA "
108                         "Read Error DGCS=%08X\n", val);
109         }
110
111         return CA91CX42_LINT_VERR;
112 }
113
114 static u32 ca91cx42_LERR_irqhandler(struct vme_bridge *ca91cx42_bridge)
115 {
116         int val;
117         struct ca91cx42_driver *bridge;
118
119         bridge = ca91cx42_bridge->driver_priv;
120
121         val = ioread32(bridge->base + DGCS);
122
123         if (!(val & 0x00000800))
124                 dev_err(ca91cx42_bridge->parent, "ca91cx42_LERR_irqhandler DMA "
125                         "Read Error DGCS=%08X\n", val);
126
127         return CA91CX42_LINT_LERR;
128 }
129
130
131 static u32 ca91cx42_VIRQ_irqhandler(struct vme_bridge *ca91cx42_bridge,
132         int stat)
133 {
134         int vec, i, serviced = 0;
135         struct ca91cx42_driver *bridge;
136
137         bridge = ca91cx42_bridge->driver_priv;
138
139
140         for (i = 7; i > 0; i--) {
141                 if (stat & (1 << i)) {
142                         vec = ioread32(bridge->base +
143                                 CA91CX42_V_STATID[i]) & 0xff;
144
145                         vme_irq_handler(ca91cx42_bridge, i, vec);
146
147                         serviced |= (1 << i);
148                 }
149         }
150
151         return serviced;
152 }
153
154 static irqreturn_t ca91cx42_irqhandler(int irq, void *ptr)
155 {
156         u32 stat, enable, serviced = 0;
157         struct vme_bridge *ca91cx42_bridge;
158         struct ca91cx42_driver *bridge;
159
160         ca91cx42_bridge = ptr;
161
162         bridge = ca91cx42_bridge->driver_priv;
163
164         enable = ioread32(bridge->base + LINT_EN);
165         stat = ioread32(bridge->base + LINT_STAT);
166
167         /* Only look at unmasked interrupts */
168         stat &= enable;
169
170         if (unlikely(!stat))
171                 return IRQ_NONE;
172
173         if (stat & CA91CX42_LINT_DMA)
174                 serviced |= ca91cx42_DMA_irqhandler(bridge);
175         if (stat & (CA91CX42_LINT_LM0 | CA91CX42_LINT_LM1 | CA91CX42_LINT_LM2 |
176                         CA91CX42_LINT_LM3))
177                 serviced |= ca91cx42_LM_irqhandler(bridge, stat);
178         if (stat & CA91CX42_LINT_MBOX)
179                 serviced |= ca91cx42_MB_irqhandler(bridge, stat);
180         if (stat & CA91CX42_LINT_SW_IACK)
181                 serviced |= ca91cx42_IACK_irqhandler(bridge);
182         if (stat & CA91CX42_LINT_VERR)
183                 serviced |= ca91cx42_VERR_irqhandler(ca91cx42_bridge);
184         if (stat & CA91CX42_LINT_LERR)
185                 serviced |= ca91cx42_LERR_irqhandler(ca91cx42_bridge);
186         if (stat & (CA91CX42_LINT_VIRQ1 | CA91CX42_LINT_VIRQ2 |
187                         CA91CX42_LINT_VIRQ3 | CA91CX42_LINT_VIRQ4 |
188                         CA91CX42_LINT_VIRQ5 | CA91CX42_LINT_VIRQ6 |
189                         CA91CX42_LINT_VIRQ7))
190                 serviced |= ca91cx42_VIRQ_irqhandler(ca91cx42_bridge, stat);
191
192         /* Clear serviced interrupts */
193         iowrite32(stat, bridge->base + LINT_STAT);
194
195         return IRQ_HANDLED;
196 }
197
198 static int ca91cx42_irq_init(struct vme_bridge *ca91cx42_bridge)
199 {
200         int result, tmp;
201         struct pci_dev *pdev;
202         struct ca91cx42_driver *bridge;
203
204         bridge = ca91cx42_bridge->driver_priv;
205
206         /* Need pdev */
207         pdev = container_of(ca91cx42_bridge->parent, struct pci_dev, dev);
208
209         /* Initialise list for VME bus errors */
210         INIT_LIST_HEAD(&(ca91cx42_bridge->vme_errors));
211
212         mutex_init(&(ca91cx42_bridge->irq_mtx));
213
214         /* Disable interrupts from PCI to VME */
215         iowrite32(0, bridge->base + VINT_EN);
216
217         /* Disable PCI interrupts */
218         iowrite32(0, bridge->base + LINT_EN);
219         /* Clear Any Pending PCI Interrupts */
220         iowrite32(0x00FFFFFF, bridge->base + LINT_STAT);
221
222         result = request_irq(pdev->irq, ca91cx42_irqhandler, IRQF_SHARED,
223                         driver_name, ca91cx42_bridge);
224         if (result) {
225                 dev_err(&pdev->dev, "Can't get assigned pci irq vector %02X\n",
226                        pdev->irq);
227                 return result;
228         }
229
230         /* Ensure all interrupts are mapped to PCI Interrupt 0 */
231         iowrite32(0, bridge->base + LINT_MAP0);
232         iowrite32(0, bridge->base + LINT_MAP1);
233         iowrite32(0, bridge->base + LINT_MAP2);
234
235         /* Enable DMA, mailbox & LM Interrupts */
236         tmp = CA91CX42_LINT_MBOX3 | CA91CX42_LINT_MBOX2 | CA91CX42_LINT_MBOX1 |
237                 CA91CX42_LINT_MBOX0 | CA91CX42_LINT_SW_IACK |
238                 CA91CX42_LINT_VERR | CA91CX42_LINT_LERR | CA91CX42_LINT_DMA;
239
240         iowrite32(tmp, bridge->base + LINT_EN);
241
242         return 0;
243 }
244
245 static void ca91cx42_irq_exit(struct ca91cx42_driver *bridge,
246         struct pci_dev *pdev)
247 {
248         /* Disable interrupts from PCI to VME */
249         iowrite32(0, bridge->base + VINT_EN);
250
251         /* Disable PCI interrupts */
252         iowrite32(0, bridge->base + LINT_EN);
253         /* Clear Any Pending PCI Interrupts */
254         iowrite32(0x00FFFFFF, bridge->base + LINT_STAT);
255
256         free_irq(pdev->irq, pdev);
257 }
258
259 /*
260  * Set up an VME interrupt
261  */
262 void ca91cx42_irq_set(struct vme_bridge *ca91cx42_bridge, int level, int state,
263         int sync)
264
265 {
266         struct pci_dev *pdev;
267         u32 tmp;
268         struct ca91cx42_driver *bridge;
269
270         bridge = ca91cx42_bridge->driver_priv;
271
272         /* Enable IRQ level */
273         tmp = ioread32(bridge->base + LINT_EN);
274
275         if (state == 0)
276                 tmp &= ~CA91CX42_LINT_VIRQ[level];
277         else
278                 tmp |= CA91CX42_LINT_VIRQ[level];
279
280         iowrite32(tmp, bridge->base + LINT_EN);
281
282         if ((state == 0) && (sync != 0)) {
283                 pdev = container_of(ca91cx42_bridge->parent, struct pci_dev,
284                         dev);
285
286                 synchronize_irq(pdev->irq);
287         }
288 }
289
290 int ca91cx42_irq_generate(struct vme_bridge *ca91cx42_bridge, int level,
291         int statid)
292 {
293         u32 tmp;
294         struct ca91cx42_driver *bridge;
295
296         bridge = ca91cx42_bridge->driver_priv;
297
298         /* Universe can only generate even vectors */
299         if (statid & 1)
300                 return -EINVAL;
301
302         mutex_lock(&(bridge->vme_int));
303
304         tmp = ioread32(bridge->base + VINT_EN);
305
306         /* Set Status/ID */
307         iowrite32(statid << 24, bridge->base + STATID);
308
309         /* Assert VMEbus IRQ */
310         tmp = tmp | (1 << (level + 24));
311         iowrite32(tmp, bridge->base + VINT_EN);
312
313         /* Wait for IACK */
314         wait_event_interruptible(bridge->iack_queue, 0);
315
316         /* Return interrupt to low state */
317         tmp = ioread32(bridge->base + VINT_EN);
318         tmp = tmp & ~(1 << (level + 24));
319         iowrite32(tmp, bridge->base + VINT_EN);
320
321         mutex_unlock(&(bridge->vme_int));
322
323         return 0;
324 }
325
326 int ca91cx42_slave_set(struct vme_slave_resource *image, int enabled,
327         unsigned long long vme_base, unsigned long long size,
328         dma_addr_t pci_base, vme_address_t aspace, vme_cycle_t cycle)
329 {
330         unsigned int i, addr = 0, granularity;
331         unsigned int temp_ctl = 0;
332         unsigned int vme_bound, pci_offset;
333         struct vme_bridge *ca91cx42_bridge;
334         struct ca91cx42_driver *bridge;
335
336         ca91cx42_bridge = image->parent;
337
338         bridge = ca91cx42_bridge->driver_priv;
339
340         i = image->number;
341
342         switch (aspace) {
343         case VME_A16:
344                 addr |= CA91CX42_VSI_CTL_VAS_A16;
345                 break;
346         case VME_A24:
347                 addr |= CA91CX42_VSI_CTL_VAS_A24;
348                 break;
349         case VME_A32:
350                 addr |= CA91CX42_VSI_CTL_VAS_A32;
351                 break;
352         case VME_USER1:
353                 addr |= CA91CX42_VSI_CTL_VAS_USER1;
354                 break;
355         case VME_USER2:
356                 addr |= CA91CX42_VSI_CTL_VAS_USER2;
357                 break;
358         case VME_A64:
359         case VME_CRCSR:
360         case VME_USER3:
361         case VME_USER4:
362         default:
363                 dev_err(ca91cx42_bridge->parent, "Invalid address space\n");
364                 return -EINVAL;
365                 break;
366         }
367
368         /*
369          * Bound address is a valid address for the window, adjust
370          * accordingly
371          */
372         vme_bound = vme_base + size;
373         pci_offset = pci_base - vme_base;
374
375         if ((i == 0) || (i == 4))
376                 granularity = 0x1000;
377         else
378                 granularity = 0x10000;
379
380         if (vme_base & (granularity - 1)) {
381                 dev_err(ca91cx42_bridge->parent, "Invalid VME base "
382                         "alignment\n");
383                 return -EINVAL;
384         }
385         if (vme_bound & (granularity - 1)) {
386                 dev_err(ca91cx42_bridge->parent, "Invalid VME bound "
387                         "alignment\n");
388                 return -EINVAL;
389         }
390         if (pci_offset & (granularity - 1)) {
391                 dev_err(ca91cx42_bridge->parent, "Invalid PCI Offset "
392                         "alignment\n");
393                 return -EINVAL;
394         }
395
396         /* Disable while we are mucking around */
397         temp_ctl = ioread32(bridge->base + CA91CX42_VSI_CTL[i]);
398         temp_ctl &= ~CA91CX42_VSI_CTL_EN;
399         iowrite32(temp_ctl, bridge->base + CA91CX42_VSI_CTL[i]);
400
401         /* Setup mapping */
402         iowrite32(vme_base, bridge->base + CA91CX42_VSI_BS[i]);
403         iowrite32(vme_bound, bridge->base + CA91CX42_VSI_BD[i]);
404         iowrite32(pci_offset, bridge->base + CA91CX42_VSI_TO[i]);
405
406         /* Setup address space */
407         temp_ctl &= ~CA91CX42_VSI_CTL_VAS_M;
408         temp_ctl |= addr;
409
410         /* Setup cycle types */
411         temp_ctl &= ~(CA91CX42_VSI_CTL_PGM_M | CA91CX42_VSI_CTL_SUPER_M);
412         if (cycle & VME_SUPER)
413                 temp_ctl |= CA91CX42_VSI_CTL_SUPER_SUPR;
414         if (cycle & VME_USER)
415                 temp_ctl |= CA91CX42_VSI_CTL_SUPER_NPRIV;
416         if (cycle & VME_PROG)
417                 temp_ctl |= CA91CX42_VSI_CTL_PGM_PGM;
418         if (cycle & VME_DATA)
419                 temp_ctl |= CA91CX42_VSI_CTL_PGM_DATA;
420
421         /* Write ctl reg without enable */
422         iowrite32(temp_ctl, bridge->base + CA91CX42_VSI_CTL[i]);
423
424         if (enabled)
425                 temp_ctl |= CA91CX42_VSI_CTL_EN;
426
427         iowrite32(temp_ctl, bridge->base + CA91CX42_VSI_CTL[i]);
428
429         return 0;
430 }
431
432 int ca91cx42_slave_get(struct vme_slave_resource *image, int *enabled,
433         unsigned long long *vme_base, unsigned long long *size,
434         dma_addr_t *pci_base, vme_address_t *aspace, vme_cycle_t *cycle)
435 {
436         unsigned int i, granularity = 0, ctl = 0;
437         unsigned long long vme_bound, pci_offset;
438         struct ca91cx42_driver *bridge;
439
440         bridge = image->parent->driver_priv;
441
442         i = image->number;
443
444         if ((i == 0) || (i == 4))
445                 granularity = 0x1000;
446         else
447                 granularity = 0x10000;
448
449         /* Read Registers */
450         ctl = ioread32(bridge->base + CA91CX42_VSI_CTL[i]);
451
452         *vme_base = ioread32(bridge->base + CA91CX42_VSI_BS[i]);
453         vme_bound = ioread32(bridge->base + CA91CX42_VSI_BD[i]);
454         pci_offset = ioread32(bridge->base + CA91CX42_VSI_TO[i]);
455
456         *pci_base = (dma_addr_t)vme_base + pci_offset;
457         *size = (unsigned long long)((vme_bound - *vme_base) + granularity);
458
459         *enabled = 0;
460         *aspace = 0;
461         *cycle = 0;
462
463         if (ctl & CA91CX42_VSI_CTL_EN)
464                 *enabled = 1;
465
466         if ((ctl & CA91CX42_VSI_CTL_VAS_M) == CA91CX42_VSI_CTL_VAS_A16)
467                 *aspace = VME_A16;
468         if ((ctl & CA91CX42_VSI_CTL_VAS_M) == CA91CX42_VSI_CTL_VAS_A24)
469                 *aspace = VME_A24;
470         if ((ctl & CA91CX42_VSI_CTL_VAS_M) == CA91CX42_VSI_CTL_VAS_A32)
471                 *aspace = VME_A32;
472         if ((ctl & CA91CX42_VSI_CTL_VAS_M) == CA91CX42_VSI_CTL_VAS_USER1)
473                 *aspace = VME_USER1;
474         if ((ctl & CA91CX42_VSI_CTL_VAS_M) == CA91CX42_VSI_CTL_VAS_USER2)
475                 *aspace = VME_USER2;
476
477         if (ctl & CA91CX42_VSI_CTL_SUPER_SUPR)
478                 *cycle |= VME_SUPER;
479         if (ctl & CA91CX42_VSI_CTL_SUPER_NPRIV)
480                 *cycle |= VME_USER;
481         if (ctl & CA91CX42_VSI_CTL_PGM_PGM)
482                 *cycle |= VME_PROG;
483         if (ctl & CA91CX42_VSI_CTL_PGM_DATA)
484                 *cycle |= VME_DATA;
485
486         return 0;
487 }
488
489 /*
490  * Allocate and map PCI Resource
491  */
492 static int ca91cx42_alloc_resource(struct vme_master_resource *image,
493         unsigned long long size)
494 {
495         unsigned long long existing_size;
496         int retval = 0;
497         struct pci_dev *pdev;
498         struct vme_bridge *ca91cx42_bridge;
499
500         ca91cx42_bridge = image->parent;
501
502         /* Find pci_dev container of dev */
503         if (ca91cx42_bridge->parent == NULL) {
504                 dev_err(ca91cx42_bridge->parent, "Dev entry NULL\n");
505                 return -EINVAL;
506         }
507         pdev = container_of(ca91cx42_bridge->parent, struct pci_dev, dev);
508
509         existing_size = (unsigned long long)(image->bus_resource.end -
510                 image->bus_resource.start);
511
512         /* If the existing size is OK, return */
513         if (existing_size == (size - 1))
514                 return 0;
515
516         if (existing_size != 0) {
517                 iounmap(image->kern_base);
518                 image->kern_base = NULL;
519                 if (image->bus_resource.name != NULL)
520                         kfree(image->bus_resource.name);
521                 release_resource(&(image->bus_resource));
522                 memset(&(image->bus_resource), 0, sizeof(struct resource));
523         }
524
525         if (image->bus_resource.name == NULL) {
526                 image->bus_resource.name = kmalloc(VMENAMSIZ+3, GFP_ATOMIC);
527                 if (image->bus_resource.name == NULL) {
528                         dev_err(ca91cx42_bridge->parent, "Unable to allocate "
529                                 "memory for resource name\n");
530                         retval = -ENOMEM;
531                         goto err_name;
532                 }
533         }
534
535         sprintf((char *)image->bus_resource.name, "%s.%d",
536                 ca91cx42_bridge->name, image->number);
537
538         image->bus_resource.start = 0;
539         image->bus_resource.end = (unsigned long)size;
540         image->bus_resource.flags = IORESOURCE_MEM;
541
542         retval = pci_bus_alloc_resource(pdev->bus,
543                 &(image->bus_resource), size, size, PCIBIOS_MIN_MEM,
544                 0, NULL, NULL);
545         if (retval) {
546                 dev_err(ca91cx42_bridge->parent, "Failed to allocate mem "
547                         "resource for window %d size 0x%lx start 0x%lx\n",
548                         image->number, (unsigned long)size,
549                         (unsigned long)image->bus_resource.start);
550                 goto err_resource;
551         }
552
553         image->kern_base = ioremap_nocache(
554                 image->bus_resource.start, size);
555         if (image->kern_base == NULL) {
556                 dev_err(ca91cx42_bridge->parent, "Failed to remap resource\n");
557                 retval = -ENOMEM;
558                 goto err_remap;
559         }
560
561         return 0;
562
563         iounmap(image->kern_base);
564         image->kern_base = NULL;
565 err_remap:
566         release_resource(&(image->bus_resource));
567 err_resource:
568         kfree(image->bus_resource.name);
569         memset(&(image->bus_resource), 0, sizeof(struct resource));
570 err_name:
571         return retval;
572 }
573
574 /*
575  * Free and unmap PCI Resource
576  */
577 static void ca91cx42_free_resource(struct vme_master_resource *image)
578 {
579         iounmap(image->kern_base);
580         image->kern_base = NULL;
581         release_resource(&(image->bus_resource));
582         kfree(image->bus_resource.name);
583         memset(&(image->bus_resource), 0, sizeof(struct resource));
584 }
585
586
587 int ca91cx42_master_set(struct vme_master_resource *image, int enabled,
588         unsigned long long vme_base, unsigned long long size,
589         vme_address_t aspace, vme_cycle_t cycle, vme_width_t dwidth)
590 {
591         int retval = 0;
592         unsigned int i, granularity = 0;
593         unsigned int temp_ctl = 0;
594         unsigned long long pci_bound, vme_offset, pci_base;
595         struct vme_bridge *ca91cx42_bridge;
596         struct ca91cx42_driver *bridge;
597
598         ca91cx42_bridge = image->parent;
599
600         bridge = ca91cx42_bridge->driver_priv;
601
602         i = image->number;
603
604         if ((i == 0) || (i == 4))
605                 granularity = 0x1000;
606         else
607                 granularity = 0x10000;
608
609         /* Verify input data */
610         if (vme_base & (granularity - 1)) {
611                 dev_err(ca91cx42_bridge->parent, "Invalid VME Window "
612                         "alignment\n");
613                 retval = -EINVAL;
614                 goto err_window;
615         }
616         if (size & (granularity - 1)) {
617                 dev_err(ca91cx42_bridge->parent, "Invalid VME Window "
618                         "alignment\n");
619                 retval = -EINVAL;
620                 goto err_window;
621         }
622
623         spin_lock(&(image->lock));
624
625         /*
626          * Let's allocate the resource here rather than further up the stack as
627          * it avoids pushing loads of bus dependant stuff up the stack
628          */
629         retval = ca91cx42_alloc_resource(image, size);
630         if (retval) {
631                 spin_unlock(&(image->lock));
632                 dev_err(ca91cx42_bridge->parent, "Unable to allocate memory "
633                         "for resource name\n");
634                 retval = -ENOMEM;
635                 goto err_res;
636         }
637
638         pci_base = (unsigned long long)image->bus_resource.start;
639
640         /*
641          * Bound address is a valid address for the window, adjust
642          * according to window granularity.
643          */
644         pci_bound = pci_base + size;
645         vme_offset = vme_base - pci_base;
646
647         /* Disable while we are mucking around */
648         temp_ctl = ioread32(bridge->base + CA91CX42_LSI_CTL[i]);
649         temp_ctl &= ~CA91CX42_LSI_CTL_EN;
650         iowrite32(temp_ctl, bridge->base + CA91CX42_LSI_CTL[i]);
651
652         /* Setup cycle types */
653         temp_ctl &= ~CA91CX42_LSI_CTL_VCT_M;
654         if (cycle & VME_BLT)
655                 temp_ctl |= CA91CX42_LSI_CTL_VCT_BLT;
656         if (cycle & VME_MBLT)
657                 temp_ctl |= CA91CX42_LSI_CTL_VCT_MBLT;
658
659         /* Setup data width */
660         temp_ctl &= ~CA91CX42_LSI_CTL_VDW_M;
661         switch (dwidth) {
662         case VME_D8:
663                 temp_ctl |= CA91CX42_LSI_CTL_VDW_D8;
664                 break;
665         case VME_D16:
666                 temp_ctl |= CA91CX42_LSI_CTL_VDW_D16;
667                 break;
668         case VME_D32:
669                 temp_ctl |= CA91CX42_LSI_CTL_VDW_D32;
670                 break;
671         case VME_D64:
672                 temp_ctl |= CA91CX42_LSI_CTL_VDW_D64;
673                 break;
674         default:
675                 spin_unlock(&(image->lock));
676                 dev_err(ca91cx42_bridge->parent, "Invalid data width\n");
677                 retval = -EINVAL;
678                 goto err_dwidth;
679                 break;
680         }
681
682         /* Setup address space */
683         temp_ctl &= ~CA91CX42_LSI_CTL_VAS_M;
684         switch (aspace) {
685         case VME_A16:
686                 temp_ctl |= CA91CX42_LSI_CTL_VAS_A16;
687                 break;
688         case VME_A24:
689                 temp_ctl |= CA91CX42_LSI_CTL_VAS_A24;
690                 break;
691         case VME_A32:
692                 temp_ctl |= CA91CX42_LSI_CTL_VAS_A32;
693                 break;
694         case VME_CRCSR:
695                 temp_ctl |= CA91CX42_LSI_CTL_VAS_CRCSR;
696                 break;
697         case VME_USER1:
698                 temp_ctl |= CA91CX42_LSI_CTL_VAS_USER1;
699                 break;
700         case VME_USER2:
701                 temp_ctl |= CA91CX42_LSI_CTL_VAS_USER2;
702                 break;
703         case VME_A64:
704         case VME_USER3:
705         case VME_USER4:
706         default:
707                 spin_unlock(&(image->lock));
708                 dev_err(ca91cx42_bridge->parent, "Invalid address space\n");
709                 retval = -EINVAL;
710                 goto err_aspace;
711                 break;
712         }
713
714         temp_ctl &= ~(CA91CX42_LSI_CTL_PGM_M | CA91CX42_LSI_CTL_SUPER_M);
715         if (cycle & VME_SUPER)
716                 temp_ctl |= CA91CX42_LSI_CTL_SUPER_SUPR;
717         if (cycle & VME_PROG)
718                 temp_ctl |= CA91CX42_LSI_CTL_PGM_PGM;
719
720         /* Setup mapping */
721         iowrite32(pci_base, bridge->base + CA91CX42_LSI_BS[i]);
722         iowrite32(pci_bound, bridge->base + CA91CX42_LSI_BD[i]);
723         iowrite32(vme_offset, bridge->base + CA91CX42_LSI_TO[i]);
724
725         /* Write ctl reg without enable */
726         iowrite32(temp_ctl, bridge->base + CA91CX42_LSI_CTL[i]);
727
728         if (enabled)
729                 temp_ctl |= CA91CX42_LSI_CTL_EN;
730
731         iowrite32(temp_ctl, bridge->base + CA91CX42_LSI_CTL[i]);
732
733         spin_unlock(&(image->lock));
734         return 0;
735
736 err_aspace:
737 err_dwidth:
738         ca91cx42_free_resource(image);
739 err_res:
740 err_window:
741         return retval;
742 }
743
744 int __ca91cx42_master_get(struct vme_master_resource *image, int *enabled,
745         unsigned long long *vme_base, unsigned long long *size,
746         vme_address_t *aspace, vme_cycle_t *cycle, vme_width_t *dwidth)
747 {
748         unsigned int i, ctl;
749         unsigned long long pci_base, pci_bound, vme_offset;
750         struct ca91cx42_driver *bridge;
751
752         bridge = image->parent->driver_priv;
753
754         i = image->number;
755
756         ctl = ioread32(bridge->base + CA91CX42_LSI_CTL[i]);
757
758         pci_base = ioread32(bridge->base + CA91CX42_LSI_BS[i]);
759         vme_offset = ioread32(bridge->base + CA91CX42_LSI_TO[i]);
760         pci_bound = ioread32(bridge->base + CA91CX42_LSI_BD[i]);
761
762         *vme_base = pci_base + vme_offset;
763         *size = (unsigned long long)(pci_bound - pci_base);
764
765         *enabled = 0;
766         *aspace = 0;
767         *cycle = 0;
768         *dwidth = 0;
769
770         if (ctl & CA91CX42_LSI_CTL_EN)
771                 *enabled = 1;
772
773         /* Setup address space */
774         switch (ctl & CA91CX42_LSI_CTL_VAS_M) {
775         case CA91CX42_LSI_CTL_VAS_A16:
776                 *aspace = VME_A16;
777                 break;
778         case CA91CX42_LSI_CTL_VAS_A24:
779                 *aspace = VME_A24;
780                 break;
781         case CA91CX42_LSI_CTL_VAS_A32:
782                 *aspace = VME_A32;
783                 break;
784         case CA91CX42_LSI_CTL_VAS_CRCSR:
785                 *aspace = VME_CRCSR;
786                 break;
787         case CA91CX42_LSI_CTL_VAS_USER1:
788                 *aspace = VME_USER1;
789                 break;
790         case CA91CX42_LSI_CTL_VAS_USER2:
791                 *aspace = VME_USER2;
792                 break;
793         }
794
795         /* XXX Not sure howto check for MBLT */
796         /* Setup cycle types */
797         if (ctl & CA91CX42_LSI_CTL_VCT_BLT)
798                 *cycle |= VME_BLT;
799         else
800                 *cycle |= VME_SCT;
801
802         if (ctl & CA91CX42_LSI_CTL_SUPER_SUPR)
803                 *cycle |= VME_SUPER;
804         else
805                 *cycle |= VME_USER;
806
807         if (ctl & CA91CX42_LSI_CTL_PGM_PGM)
808                 *cycle = VME_PROG;
809         else
810                 *cycle = VME_DATA;
811
812         /* Setup data width */
813         switch (ctl & CA91CX42_LSI_CTL_VDW_M) {
814         case CA91CX42_LSI_CTL_VDW_D8:
815                 *dwidth = VME_D8;
816                 break;
817         case CA91CX42_LSI_CTL_VDW_D16:
818                 *dwidth = VME_D16;
819                 break;
820         case CA91CX42_LSI_CTL_VDW_D32:
821                 *dwidth = VME_D32;
822                 break;
823         case CA91CX42_LSI_CTL_VDW_D64:
824                 *dwidth = VME_D64;
825                 break;
826         }
827
828         return 0;
829 }
830
831 int ca91cx42_master_get(struct vme_master_resource *image, int *enabled,
832         unsigned long long *vme_base, unsigned long long *size,
833         vme_address_t *aspace, vme_cycle_t *cycle, vme_width_t *dwidth)
834 {
835         int retval;
836
837         spin_lock(&(image->lock));
838
839         retval = __ca91cx42_master_get(image, enabled, vme_base, size, aspace,
840                 cycle, dwidth);
841
842         spin_unlock(&(image->lock));
843
844         return retval;
845 }
846
847 ssize_t ca91cx42_master_read(struct vme_master_resource *image, void *buf,
848         size_t count, loff_t offset)
849 {
850         ssize_t retval;
851
852         spin_lock(&(image->lock));
853
854         memcpy_fromio(buf, image->kern_base + offset, (unsigned int)count);
855         retval = count;
856
857         spin_unlock(&(image->lock));
858
859         return retval;
860 }
861
862 ssize_t ca91cx42_master_write(struct vme_master_resource *image, void *buf,
863         size_t count, loff_t offset)
864 {
865         int retval = 0;
866
867         spin_lock(&(image->lock));
868
869         memcpy_toio(image->kern_base + offset, buf, (unsigned int)count);
870         retval = count;
871
872         spin_unlock(&(image->lock));
873
874         return retval;
875 }
876
877 unsigned int ca91cx42_master_rmw(struct vme_master_resource *image,
878         unsigned int mask, unsigned int compare, unsigned int swap,
879         loff_t offset)
880 {
881         u32 pci_addr, result;
882         int i;
883         struct ca91cx42_driver *bridge;
884         struct device *dev;
885
886         bridge = image->parent->driver_priv;
887         dev = image->parent->parent;
888
889         /* Find the PCI address that maps to the desired VME address */
890         i = image->number;
891
892         /* Locking as we can only do one of these at a time */
893         mutex_lock(&(bridge->vme_rmw));
894
895         /* Lock image */
896         spin_lock(&(image->lock));
897
898         pci_addr = (u32)image->kern_base + offset;
899
900         /* Address must be 4-byte aligned */
901         if (pci_addr & 0x3) {
902                 dev_err(dev, "RMW Address not 4-byte aligned\n");
903                 return -EINVAL;
904         }
905
906         /* Ensure RMW Disabled whilst configuring */
907         iowrite32(0, bridge->base + SCYC_CTL);
908
909         /* Configure registers */
910         iowrite32(mask, bridge->base + SCYC_EN);
911         iowrite32(compare, bridge->base + SCYC_CMP);
912         iowrite32(swap, bridge->base + SCYC_SWP);
913         iowrite32(pci_addr, bridge->base + SCYC_ADDR);
914
915         /* Enable RMW */
916         iowrite32(CA91CX42_SCYC_CTL_CYC_RMW, bridge->base + SCYC_CTL);
917
918         /* Kick process off with a read to the required address. */
919         result = ioread32(image->kern_base + offset);
920
921         /* Disable RMW */
922         iowrite32(0, bridge->base + SCYC_CTL);
923
924         spin_unlock(&(image->lock));
925
926         mutex_unlock(&(bridge->vme_rmw));
927
928         return result;
929 }
930
931 int ca91cx42_dma_list_add(struct vme_dma_list *list, struct vme_dma_attr *src,
932         struct vme_dma_attr *dest, size_t count)
933 {
934         struct ca91cx42_dma_entry *entry, *prev;
935         struct vme_dma_pci *pci_attr;
936         struct vme_dma_vme *vme_attr;
937         dma_addr_t desc_ptr;
938         int retval = 0;
939         struct device *dev;
940
941         dev = list->parent->parent->parent;
942
943         /* XXX descriptor must be aligned on 64-bit boundaries */
944         entry = kmalloc(sizeof(struct ca91cx42_dma_entry), GFP_KERNEL);
945         if (entry == NULL) {
946                 dev_err(dev, "Failed to allocate memory for dma resource "
947                         "structure\n");
948                 retval = -ENOMEM;
949                 goto err_mem;
950         }
951
952         /* Test descriptor alignment */
953         if ((unsigned long)&(entry->descriptor) & CA91CX42_DCPP_M) {
954                 dev_err(dev, "Descriptor not aligned to 16 byte boundary as "
955                         "required: %p\n", &(entry->descriptor));
956                 retval = -EINVAL;
957                 goto err_align;
958         }
959
960         memset(&(entry->descriptor), 0, sizeof(struct ca91cx42_dma_descriptor));
961
962         if (dest->type == VME_DMA_VME) {
963                 entry->descriptor.dctl |= CA91CX42_DCTL_L2V;
964                 vme_attr = (struct vme_dma_vme *)dest->private;
965                 pci_attr = (struct vme_dma_pci *)src->private;
966         } else {
967                 vme_attr = (struct vme_dma_vme *)src->private;
968                 pci_attr = (struct vme_dma_pci *)dest->private;
969         }
970
971         /* Check we can do fullfill required attributes */
972         if ((vme_attr->aspace & ~(VME_A16 | VME_A24 | VME_A32 | VME_USER1 |
973                 VME_USER2)) != 0) {
974
975                 dev_err(dev, "Unsupported cycle type\n");
976                 retval = -EINVAL;
977                 goto err_aspace;
978         }
979
980         if ((vme_attr->cycle & ~(VME_SCT | VME_BLT | VME_SUPER | VME_USER |
981                 VME_PROG | VME_DATA)) != 0) {
982
983                 dev_err(dev, "Unsupported cycle type\n");
984                 retval = -EINVAL;
985                 goto err_cycle;
986         }
987
988         /* Check to see if we can fullfill source and destination */
989         if (!(((src->type == VME_DMA_PCI) && (dest->type == VME_DMA_VME)) ||
990                 ((src->type == VME_DMA_VME) && (dest->type == VME_DMA_PCI)))) {
991
992                 dev_err(dev, "Cannot perform transfer with this "
993                         "source-destination combination\n");
994                 retval = -EINVAL;
995                 goto err_direct;
996         }
997
998         /* Setup cycle types */
999         if (vme_attr->cycle & VME_BLT)
1000                 entry->descriptor.dctl |= CA91CX42_DCTL_VCT_BLT;
1001
1002         /* Setup data width */
1003         switch (vme_attr->dwidth) {
1004         case VME_D8:
1005                 entry->descriptor.dctl |= CA91CX42_DCTL_VDW_D8;
1006                 break;
1007         case VME_D16:
1008                 entry->descriptor.dctl |= CA91CX42_DCTL_VDW_D16;
1009                 break;
1010         case VME_D32:
1011                 entry->descriptor.dctl |= CA91CX42_DCTL_VDW_D32;
1012                 break;
1013         case VME_D64:
1014                 entry->descriptor.dctl |= CA91CX42_DCTL_VDW_D64;
1015                 break;
1016         default:
1017                 dev_err(dev, "Invalid data width\n");
1018                 return -EINVAL;
1019         }
1020
1021         /* Setup address space */
1022         switch (vme_attr->aspace) {
1023         case VME_A16:
1024                 entry->descriptor.dctl |= CA91CX42_DCTL_VAS_A16;
1025                 break;
1026         case VME_A24:
1027                 entry->descriptor.dctl |= CA91CX42_DCTL_VAS_A24;
1028                 break;
1029         case VME_A32:
1030                 entry->descriptor.dctl |= CA91CX42_DCTL_VAS_A32;
1031                 break;
1032         case VME_USER1:
1033                 entry->descriptor.dctl |= CA91CX42_DCTL_VAS_USER1;
1034                 break;
1035         case VME_USER2:
1036                 entry->descriptor.dctl |= CA91CX42_DCTL_VAS_USER2;
1037                 break;
1038         default:
1039                 dev_err(dev, "Invalid address space\n");
1040                 return -EINVAL;
1041                 break;
1042         }
1043
1044         if (vme_attr->cycle & VME_SUPER)
1045                 entry->descriptor.dctl |= CA91CX42_DCTL_SUPER_SUPR;
1046         if (vme_attr->cycle & VME_PROG)
1047                 entry->descriptor.dctl |= CA91CX42_DCTL_PGM_PGM;
1048
1049         entry->descriptor.dtbc = count;
1050         entry->descriptor.dla = pci_attr->address;
1051         entry->descriptor.dva = vme_attr->address;
1052         entry->descriptor.dcpp = CA91CX42_DCPP_NULL;
1053
1054         /* Add to list */
1055         list_add_tail(&(entry->list), &(list->entries));
1056
1057         /* Fill out previous descriptors "Next Address" */
1058         if (entry->list.prev != &(list->entries)) {
1059                 prev = list_entry(entry->list.prev, struct ca91cx42_dma_entry,
1060                         list);
1061                 /* We need the bus address for the pointer */
1062                 desc_ptr = virt_to_bus(&(entry->descriptor));
1063                 prev->descriptor.dcpp = desc_ptr & ~CA91CX42_DCPP_M;
1064         }
1065
1066         return 0;
1067
1068 err_cycle:
1069 err_aspace:
1070 err_direct:
1071 err_align:
1072         kfree(entry);
1073 err_mem:
1074         return retval;
1075 }
1076
1077 static int ca91cx42_dma_busy(struct vme_bridge *ca91cx42_bridge)
1078 {
1079         u32 tmp;
1080         struct ca91cx42_driver *bridge;
1081
1082         bridge = ca91cx42_bridge->driver_priv;
1083
1084         tmp = ioread32(bridge->base + DGCS);
1085
1086         if (tmp & CA91CX42_DGCS_ACT)
1087                 return 0;
1088         else
1089                 return 1;
1090 }
1091
1092 int ca91cx42_dma_list_exec(struct vme_dma_list *list)
1093 {
1094         struct vme_dma_resource *ctrlr;
1095         struct ca91cx42_dma_entry *entry;
1096         int retval = 0;
1097         dma_addr_t bus_addr;
1098         u32 val;
1099         struct device *dev;
1100         struct ca91cx42_driver *bridge;
1101
1102         ctrlr = list->parent;
1103
1104         bridge = ctrlr->parent->driver_priv;
1105         dev = ctrlr->parent->parent;
1106
1107         mutex_lock(&(ctrlr->mtx));
1108
1109         if (!(list_empty(&(ctrlr->running)))) {
1110                 /*
1111                  * XXX We have an active DMA transfer and currently haven't
1112                  *     sorted out the mechanism for "pending" DMA transfers.
1113                  *     Return busy.
1114                  */
1115                 /* Need to add to pending here */
1116                 mutex_unlock(&(ctrlr->mtx));
1117                 return -EBUSY;
1118         } else {
1119                 list_add(&(list->list), &(ctrlr->running));
1120         }
1121
1122         /* Get first bus address and write into registers */
1123         entry = list_first_entry(&(list->entries), struct ca91cx42_dma_entry,
1124                 list);
1125
1126         bus_addr = virt_to_bus(&(entry->descriptor));
1127
1128         mutex_unlock(&(ctrlr->mtx));
1129
1130         iowrite32(0, bridge->base + DTBC);
1131         iowrite32(bus_addr & ~CA91CX42_DCPP_M, bridge->base + DCPP);
1132
1133         /* Start the operation */
1134         val = ioread32(bridge->base + DGCS);
1135
1136         /* XXX Could set VMEbus On and Off Counters here */
1137         val &= (CA91CX42_DGCS_VON_M | CA91CX42_DGCS_VOFF_M);
1138
1139         val |= (CA91CX42_DGCS_CHAIN | CA91CX42_DGCS_STOP | CA91CX42_DGCS_HALT |
1140                 CA91CX42_DGCS_DONE | CA91CX42_DGCS_LERR | CA91CX42_DGCS_VERR |
1141                 CA91CX42_DGCS_PERR);
1142
1143         iowrite32(val, bridge->base + DGCS);
1144
1145         val |= CA91CX42_DGCS_GO;
1146
1147         iowrite32(val, bridge->base + DGCS);
1148
1149         wait_event_interruptible(bridge->dma_queue,
1150                 ca91cx42_dma_busy(ctrlr->parent));
1151
1152         /*
1153          * Read status register, this register is valid until we kick off a
1154          * new transfer.
1155          */
1156         val = ioread32(bridge->base + DGCS);
1157
1158         if (val & (CA91CX42_DGCS_LERR | CA91CX42_DGCS_VERR |
1159                 CA91CX42_DGCS_PERR)) {
1160
1161                 dev_err(dev, "ca91c042: DMA Error. DGCS=%08X\n", val);
1162                 val = ioread32(bridge->base + DCTL);
1163         }
1164
1165         /* Remove list from running list */
1166         mutex_lock(&(ctrlr->mtx));
1167         list_del(&(list->list));
1168         mutex_unlock(&(ctrlr->mtx));
1169
1170         return retval;
1171
1172 }
1173
1174 int ca91cx42_dma_list_empty(struct vme_dma_list *list)
1175 {
1176         struct list_head *pos, *temp;
1177         struct ca91cx42_dma_entry *entry;
1178
1179         /* detach and free each entry */
1180         list_for_each_safe(pos, temp, &(list->entries)) {
1181                 list_del(pos);
1182                 entry = list_entry(pos, struct ca91cx42_dma_entry, list);
1183                 kfree(entry);
1184         }
1185
1186         return 0;
1187 }
1188
1189 /*
1190  * All 4 location monitors reside at the same base - this is therefore a
1191  * system wide configuration.
1192  *
1193  * This does not enable the LM monitor - that should be done when the first
1194  * callback is attached and disabled when the last callback is removed.
1195  */
1196 int ca91cx42_lm_set(struct vme_lm_resource *lm, unsigned long long lm_base,
1197         vme_address_t aspace, vme_cycle_t cycle)
1198 {
1199         u32 temp_base, lm_ctl = 0;
1200         int i;
1201         struct ca91cx42_driver *bridge;
1202         struct device *dev;
1203
1204         bridge = lm->parent->driver_priv;
1205         dev = lm->parent->parent;
1206
1207         /* Check the alignment of the location monitor */
1208         temp_base = (u32)lm_base;
1209         if (temp_base & 0xffff) {
1210                 dev_err(dev, "Location monitor must be aligned to 64KB "
1211                         "boundary");
1212                 return -EINVAL;
1213         }
1214
1215         mutex_lock(&(lm->mtx));
1216
1217         /* If we already have a callback attached, we can't move it! */
1218         for (i = 0; i < lm->monitors; i++) {
1219                 if (bridge->lm_callback[i] != NULL) {
1220                         mutex_unlock(&(lm->mtx));
1221                         dev_err(dev, "Location monitor callback attached, "
1222                                 "can't reset\n");
1223                         return -EBUSY;
1224                 }
1225         }
1226
1227         switch (aspace) {
1228         case VME_A16:
1229                 lm_ctl |= CA91CX42_LM_CTL_AS_A16;
1230                 break;
1231         case VME_A24:
1232                 lm_ctl |= CA91CX42_LM_CTL_AS_A24;
1233                 break;
1234         case VME_A32:
1235                 lm_ctl |= CA91CX42_LM_CTL_AS_A32;
1236                 break;
1237         default:
1238                 mutex_unlock(&(lm->mtx));
1239                 dev_err(dev, "Invalid address space\n");
1240                 return -EINVAL;
1241                 break;
1242         }
1243
1244         if (cycle & VME_SUPER)
1245                 lm_ctl |= CA91CX42_LM_CTL_SUPR;
1246         if (cycle & VME_USER)
1247                 lm_ctl |= CA91CX42_LM_CTL_NPRIV;
1248         if (cycle & VME_PROG)
1249                 lm_ctl |= CA91CX42_LM_CTL_PGM;
1250         if (cycle & VME_DATA)
1251                 lm_ctl |= CA91CX42_LM_CTL_DATA;
1252
1253         iowrite32(lm_base, bridge->base + LM_BS);
1254         iowrite32(lm_ctl, bridge->base + LM_CTL);
1255
1256         mutex_unlock(&(lm->mtx));
1257
1258         return 0;
1259 }
1260
1261 /* Get configuration of the callback monitor and return whether it is enabled
1262  * or disabled.
1263  */
1264 int ca91cx42_lm_get(struct vme_lm_resource *lm, unsigned long long *lm_base,
1265         vme_address_t *aspace, vme_cycle_t *cycle)
1266 {
1267         u32 lm_ctl, enabled = 0;
1268         struct ca91cx42_driver *bridge;
1269
1270         bridge = lm->parent->driver_priv;
1271
1272         mutex_lock(&(lm->mtx));
1273
1274         *lm_base = (unsigned long long)ioread32(bridge->base + LM_BS);
1275         lm_ctl = ioread32(bridge->base + LM_CTL);
1276
1277         if (lm_ctl & CA91CX42_LM_CTL_EN)
1278                 enabled = 1;
1279
1280         if ((lm_ctl & CA91CX42_LM_CTL_AS_M) == CA91CX42_LM_CTL_AS_A16)
1281                 *aspace = VME_A16;
1282         if ((lm_ctl & CA91CX42_LM_CTL_AS_M) == CA91CX42_LM_CTL_AS_A24)
1283                 *aspace = VME_A24;
1284         if ((lm_ctl & CA91CX42_LM_CTL_AS_M) == CA91CX42_LM_CTL_AS_A32)
1285                 *aspace = VME_A32;
1286
1287         *cycle = 0;
1288         if (lm_ctl & CA91CX42_LM_CTL_SUPR)
1289                 *cycle |= VME_SUPER;
1290         if (lm_ctl & CA91CX42_LM_CTL_NPRIV)
1291                 *cycle |= VME_USER;
1292         if (lm_ctl & CA91CX42_LM_CTL_PGM)
1293                 *cycle |= VME_PROG;
1294         if (lm_ctl & CA91CX42_LM_CTL_DATA)
1295                 *cycle |= VME_DATA;
1296
1297         mutex_unlock(&(lm->mtx));
1298
1299         return enabled;
1300 }
1301
1302 /*
1303  * Attach a callback to a specific location monitor.
1304  *
1305  * Callback will be passed the monitor triggered.
1306  */
1307 int ca91cx42_lm_attach(struct vme_lm_resource *lm, int monitor,
1308         void (*callback)(int))
1309 {
1310         u32 lm_ctl, tmp;
1311         struct ca91cx42_driver *bridge;
1312         struct device *dev;
1313
1314         bridge = lm->parent->driver_priv;
1315         dev = lm->parent->parent;
1316
1317         mutex_lock(&(lm->mtx));
1318
1319         /* Ensure that the location monitor is configured - need PGM or DATA */
1320         lm_ctl = ioread32(bridge->base + LM_CTL);
1321         if ((lm_ctl & (CA91CX42_LM_CTL_PGM | CA91CX42_LM_CTL_DATA)) == 0) {
1322                 mutex_unlock(&(lm->mtx));
1323                 dev_err(dev, "Location monitor not properly configured\n");
1324                 return -EINVAL;
1325         }
1326
1327         /* Check that a callback isn't already attached */
1328         if (bridge->lm_callback[monitor] != NULL) {
1329                 mutex_unlock(&(lm->mtx));
1330                 dev_err(dev, "Existing callback attached\n");
1331                 return -EBUSY;
1332         }
1333
1334         /* Attach callback */
1335         bridge->lm_callback[monitor] = callback;
1336
1337         /* Enable Location Monitor interrupt */
1338         tmp = ioread32(bridge->base + LINT_EN);
1339         tmp |= CA91CX42_LINT_LM[monitor];
1340         iowrite32(tmp, bridge->base + LINT_EN);
1341
1342         /* Ensure that global Location Monitor Enable set */
1343         if ((lm_ctl & CA91CX42_LM_CTL_EN) == 0) {
1344                 lm_ctl |= CA91CX42_LM_CTL_EN;
1345                 iowrite32(lm_ctl, bridge->base + LM_CTL);
1346         }
1347
1348         mutex_unlock(&(lm->mtx));
1349
1350         return 0;
1351 }
1352
1353 /*
1354  * Detach a callback function forn a specific location monitor.
1355  */
1356 int ca91cx42_lm_detach(struct vme_lm_resource *lm, int monitor)
1357 {
1358         u32 tmp;
1359         struct ca91cx42_driver *bridge;
1360
1361         bridge = lm->parent->driver_priv;
1362
1363         mutex_lock(&(lm->mtx));
1364
1365         /* Disable Location Monitor and ensure previous interrupts are clear */
1366         tmp = ioread32(bridge->base + LINT_EN);
1367         tmp &= ~CA91CX42_LINT_LM[monitor];
1368         iowrite32(tmp, bridge->base + LINT_EN);
1369
1370         iowrite32(CA91CX42_LINT_LM[monitor],
1371                  bridge->base + LINT_STAT);
1372
1373         /* Detach callback */
1374         bridge->lm_callback[monitor] = NULL;
1375
1376         /* If all location monitors disabled, disable global Location Monitor */
1377         if ((tmp & (CA91CX42_LINT_LM0 | CA91CX42_LINT_LM1 | CA91CX42_LINT_LM2 |
1378                         CA91CX42_LINT_LM3)) == 0) {
1379                 tmp = ioread32(bridge->base + LM_CTL);
1380                 tmp &= ~CA91CX42_LM_CTL_EN;
1381                 iowrite32(tmp, bridge->base + LM_CTL);
1382         }
1383
1384         mutex_unlock(&(lm->mtx));
1385
1386         return 0;
1387 }
1388
1389 int ca91cx42_slot_get(struct vme_bridge *ca91cx42_bridge)
1390 {
1391         u32 slot = 0;
1392         struct ca91cx42_driver *bridge;
1393
1394         bridge = ca91cx42_bridge->driver_priv;
1395
1396         if (!geoid) {
1397                 slot = ioread32(bridge->base + VCSR_BS);
1398                 slot = ((slot & CA91CX42_VCSR_BS_SLOT_M) >> 27);
1399         } else
1400                 slot = geoid;
1401
1402         return (int)slot;
1403
1404 }
1405
1406 static int __init ca91cx42_init(void)
1407 {
1408         return pci_register_driver(&ca91cx42_driver);
1409 }
1410
1411 /*
1412  * Configure CR/CSR space
1413  *
1414  * Access to the CR/CSR can be configured at power-up. The location of the
1415  * CR/CSR registers in the CR/CSR address space is determined by the boards
1416  * Auto-ID or Geographic address. This function ensures that the window is
1417  * enabled at an offset consistent with the boards geopgraphic address.
1418  */
1419 static int ca91cx42_crcsr_init(struct vme_bridge *ca91cx42_bridge,
1420         struct pci_dev *pdev)
1421 {
1422         unsigned int crcsr_addr;
1423         int tmp, slot;
1424         struct ca91cx42_driver *bridge;
1425
1426         bridge = ca91cx42_bridge->driver_priv;
1427
1428         slot = ca91cx42_slot_get(ca91cx42_bridge);
1429
1430         /* Write CSR Base Address if slot ID is supplied as a module param */
1431         if (geoid)
1432                 iowrite32(geoid << 27, bridge->base + VCSR_BS);
1433
1434         dev_info(&pdev->dev, "CR/CSR Offset: %d\n", slot);
1435         if (slot == 0) {
1436                 dev_err(&pdev->dev, "Slot number is unset, not configuring "
1437                         "CR/CSR space\n");
1438                 return -EINVAL;
1439         }
1440
1441         /* Allocate mem for CR/CSR image */
1442         bridge->crcsr_kernel = pci_alloc_consistent(pdev, VME_CRCSR_BUF_SIZE,
1443                 &(bridge->crcsr_bus));
1444         if (bridge->crcsr_kernel == NULL) {
1445                 dev_err(&pdev->dev, "Failed to allocate memory for CR/CSR "
1446                         "image\n");
1447                 return -ENOMEM;
1448         }
1449
1450         memset(bridge->crcsr_kernel, 0, VME_CRCSR_BUF_SIZE);
1451
1452         crcsr_addr = slot * (512 * 1024);
1453         iowrite32(bridge->crcsr_bus - crcsr_addr, bridge->base + VCSR_TO);
1454
1455         tmp = ioread32(bridge->base + VCSR_CTL);
1456         tmp |= CA91CX42_VCSR_CTL_EN;
1457         iowrite32(tmp, bridge->base + VCSR_CTL);
1458
1459         return 0;
1460 }
1461
1462 static void ca91cx42_crcsr_exit(struct vme_bridge *ca91cx42_bridge,
1463         struct pci_dev *pdev)
1464 {
1465         u32 tmp;
1466         struct ca91cx42_driver *bridge;
1467
1468         bridge = ca91cx42_bridge->driver_priv;
1469
1470         /* Turn off CR/CSR space */
1471         tmp = ioread32(bridge->base + VCSR_CTL);
1472         tmp &= ~CA91CX42_VCSR_CTL_EN;
1473         iowrite32(tmp, bridge->base + VCSR_CTL);
1474
1475         /* Free image */
1476         iowrite32(0, bridge->base + VCSR_TO);
1477
1478         pci_free_consistent(pdev, VME_CRCSR_BUF_SIZE, bridge->crcsr_kernel,
1479                 bridge->crcsr_bus);
1480 }
1481
1482 static int ca91cx42_probe(struct pci_dev *pdev, const struct pci_device_id *id)
1483 {
1484         int retval, i;
1485         u32 data;
1486         struct list_head *pos = NULL;
1487         struct vme_bridge *ca91cx42_bridge;
1488         struct ca91cx42_driver *ca91cx42_device;
1489         struct vme_master_resource *master_image;
1490         struct vme_slave_resource *slave_image;
1491         struct vme_dma_resource *dma_ctrlr;
1492         struct vme_lm_resource *lm;
1493
1494         /* We want to support more than one of each bridge so we need to
1495          * dynamically allocate the bridge structure
1496          */
1497         ca91cx42_bridge = kzalloc(sizeof(struct vme_bridge), GFP_KERNEL);
1498
1499         if (ca91cx42_bridge == NULL) {
1500                 dev_err(&pdev->dev, "Failed to allocate memory for device "
1501                         "structure\n");
1502                 retval = -ENOMEM;
1503                 goto err_struct;
1504         }
1505
1506         ca91cx42_device = kzalloc(sizeof(struct ca91cx42_driver), GFP_KERNEL);
1507
1508         if (ca91cx42_device == NULL) {
1509                 dev_err(&pdev->dev, "Failed to allocate memory for device "
1510                         "structure\n");
1511                 retval = -ENOMEM;
1512                 goto err_driver;
1513         }
1514
1515         ca91cx42_bridge->driver_priv = ca91cx42_device;
1516
1517         /* Enable the device */
1518         retval = pci_enable_device(pdev);
1519         if (retval) {
1520                 dev_err(&pdev->dev, "Unable to enable device\n");
1521                 goto err_enable;
1522         }
1523
1524         /* Map Registers */
1525         retval = pci_request_regions(pdev, driver_name);
1526         if (retval) {
1527                 dev_err(&pdev->dev, "Unable to reserve resources\n");
1528                 goto err_resource;
1529         }
1530
1531         /* map registers in BAR 0 */
1532         ca91cx42_device->base = ioremap_nocache(pci_resource_start(pdev, 0),
1533                 4096);
1534         if (!ca91cx42_device->base) {
1535                 dev_err(&pdev->dev, "Unable to remap CRG region\n");
1536                 retval = -EIO;
1537                 goto err_remap;
1538         }
1539
1540         /* Check to see if the mapping worked out */
1541         data = ioread32(ca91cx42_device->base + CA91CX42_PCI_ID) & 0x0000FFFF;
1542         if (data != PCI_VENDOR_ID_TUNDRA) {
1543                 dev_err(&pdev->dev, "PCI_ID check failed\n");
1544                 retval = -EIO;
1545                 goto err_test;
1546         }
1547
1548         /* Initialize wait queues & mutual exclusion flags */
1549         init_waitqueue_head(&(ca91cx42_device->dma_queue));
1550         init_waitqueue_head(&(ca91cx42_device->iack_queue));
1551         mutex_init(&(ca91cx42_device->vme_int));
1552         mutex_init(&(ca91cx42_device->vme_rmw));
1553
1554         ca91cx42_bridge->parent = &(pdev->dev);
1555         strcpy(ca91cx42_bridge->name, driver_name);
1556
1557         /* Setup IRQ */
1558         retval = ca91cx42_irq_init(ca91cx42_bridge);
1559         if (retval != 0) {
1560                 dev_err(&pdev->dev, "Chip Initialization failed.\n");
1561                 goto err_irq;
1562         }
1563
1564         /* Add master windows to list */
1565         INIT_LIST_HEAD(&(ca91cx42_bridge->master_resources));
1566         for (i = 0; i < CA91C142_MAX_MASTER; i++) {
1567                 master_image = kmalloc(sizeof(struct vme_master_resource),
1568                         GFP_KERNEL);
1569                 if (master_image == NULL) {
1570                         dev_err(&pdev->dev, "Failed to allocate memory for "
1571                         "master resource structure\n");
1572                         retval = -ENOMEM;
1573                         goto err_master;
1574                 }
1575                 master_image->parent = ca91cx42_bridge;
1576                 spin_lock_init(&(master_image->lock));
1577                 master_image->locked = 0;
1578                 master_image->number = i;
1579                 master_image->address_attr = VME_A16 | VME_A24 | VME_A32 |
1580                         VME_CRCSR | VME_USER1 | VME_USER2;
1581                 master_image->cycle_attr = VME_SCT | VME_BLT | VME_MBLT |
1582                         VME_SUPER | VME_USER | VME_PROG | VME_DATA;
1583                 master_image->width_attr = VME_D8 | VME_D16 | VME_D32 | VME_D64;
1584                 memset(&(master_image->bus_resource), 0,
1585                         sizeof(struct resource));
1586                 master_image->kern_base  = NULL;
1587                 list_add_tail(&(master_image->list),
1588                         &(ca91cx42_bridge->master_resources));
1589         }
1590
1591         /* Add slave windows to list */
1592         INIT_LIST_HEAD(&(ca91cx42_bridge->slave_resources));
1593         for (i = 0; i < CA91C142_MAX_SLAVE; i++) {
1594                 slave_image = kmalloc(sizeof(struct vme_slave_resource),
1595                         GFP_KERNEL);
1596                 if (slave_image == NULL) {
1597                         dev_err(&pdev->dev, "Failed to allocate memory for "
1598                         "slave resource structure\n");
1599                         retval = -ENOMEM;
1600                         goto err_slave;
1601                 }
1602                 slave_image->parent = ca91cx42_bridge;
1603                 mutex_init(&(slave_image->mtx));
1604                 slave_image->locked = 0;
1605                 slave_image->number = i;
1606                 slave_image->address_attr = VME_A24 | VME_A32 | VME_USER1 |
1607                         VME_USER2;
1608
1609                 /* Only windows 0 and 4 support A16 */
1610                 if (i == 0 || i == 4)
1611                         slave_image->address_attr |= VME_A16;
1612
1613                 slave_image->cycle_attr = VME_SCT | VME_BLT | VME_MBLT |
1614                         VME_SUPER | VME_USER | VME_PROG | VME_DATA;
1615                 list_add_tail(&(slave_image->list),
1616                         &(ca91cx42_bridge->slave_resources));
1617         }
1618
1619         /* Add dma engines to list */
1620         INIT_LIST_HEAD(&(ca91cx42_bridge->dma_resources));
1621         for (i = 0; i < CA91C142_MAX_DMA; i++) {
1622                 dma_ctrlr = kmalloc(sizeof(struct vme_dma_resource),
1623                         GFP_KERNEL);
1624                 if (dma_ctrlr == NULL) {
1625                         dev_err(&pdev->dev, "Failed to allocate memory for "
1626                         "dma resource structure\n");
1627                         retval = -ENOMEM;
1628                         goto err_dma;
1629                 }
1630                 dma_ctrlr->parent = ca91cx42_bridge;
1631                 mutex_init(&(dma_ctrlr->mtx));
1632                 dma_ctrlr->locked = 0;
1633                 dma_ctrlr->number = i;
1634                 dma_ctrlr->route_attr = VME_DMA_VME_TO_MEM |
1635                         VME_DMA_MEM_TO_VME;
1636                 INIT_LIST_HEAD(&(dma_ctrlr->pending));
1637                 INIT_LIST_HEAD(&(dma_ctrlr->running));
1638                 list_add_tail(&(dma_ctrlr->list),
1639                         &(ca91cx42_bridge->dma_resources));
1640         }
1641
1642         /* Add location monitor to list */
1643         INIT_LIST_HEAD(&(ca91cx42_bridge->lm_resources));
1644         lm = kmalloc(sizeof(struct vme_lm_resource), GFP_KERNEL);
1645         if (lm == NULL) {
1646                 dev_err(&pdev->dev, "Failed to allocate memory for "
1647                 "location monitor resource structure\n");
1648                 retval = -ENOMEM;
1649                 goto err_lm;
1650         }
1651         lm->parent = ca91cx42_bridge;
1652         mutex_init(&(lm->mtx));
1653         lm->locked = 0;
1654         lm->number = 1;
1655         lm->monitors = 4;
1656         list_add_tail(&(lm->list), &(ca91cx42_bridge->lm_resources));
1657
1658         ca91cx42_bridge->slave_get = ca91cx42_slave_get;
1659         ca91cx42_bridge->slave_set = ca91cx42_slave_set;
1660         ca91cx42_bridge->master_get = ca91cx42_master_get;
1661         ca91cx42_bridge->master_set = ca91cx42_master_set;
1662         ca91cx42_bridge->master_read = ca91cx42_master_read;
1663         ca91cx42_bridge->master_write = ca91cx42_master_write;
1664         ca91cx42_bridge->master_rmw = ca91cx42_master_rmw;
1665         ca91cx42_bridge->dma_list_add = ca91cx42_dma_list_add;
1666         ca91cx42_bridge->dma_list_exec = ca91cx42_dma_list_exec;
1667         ca91cx42_bridge->dma_list_empty = ca91cx42_dma_list_empty;
1668         ca91cx42_bridge->irq_set = ca91cx42_irq_set;
1669         ca91cx42_bridge->irq_generate = ca91cx42_irq_generate;
1670         ca91cx42_bridge->lm_set = ca91cx42_lm_set;
1671         ca91cx42_bridge->lm_get = ca91cx42_lm_get;
1672         ca91cx42_bridge->lm_attach = ca91cx42_lm_attach;
1673         ca91cx42_bridge->lm_detach = ca91cx42_lm_detach;
1674         ca91cx42_bridge->slot_get = ca91cx42_slot_get;
1675
1676         data = ioread32(ca91cx42_device->base + MISC_CTL);
1677         dev_info(&pdev->dev, "Board is%s the VME system controller\n",
1678                 (data & CA91CX42_MISC_CTL_SYSCON) ? "" : " not");
1679         dev_info(&pdev->dev, "Slot ID is %d\n",
1680                 ca91cx42_slot_get(ca91cx42_bridge));
1681
1682         if (ca91cx42_crcsr_init(ca91cx42_bridge, pdev))
1683                 dev_err(&pdev->dev, "CR/CSR configuration failed.\n");
1684
1685         /* Need to save ca91cx42_bridge pointer locally in link list for use in
1686          * ca91cx42_remove()
1687          */
1688         retval = vme_register_bridge(ca91cx42_bridge);
1689         if (retval != 0) {
1690                 dev_err(&pdev->dev, "Chip Registration failed.\n");
1691                 goto err_reg;
1692         }
1693
1694         pci_set_drvdata(pdev, ca91cx42_bridge);
1695
1696         return 0;
1697
1698         vme_unregister_bridge(ca91cx42_bridge);
1699 err_reg:
1700         ca91cx42_crcsr_exit(ca91cx42_bridge, pdev);
1701 err_lm:
1702         /* resources are stored in link list */
1703         list_for_each(pos, &(ca91cx42_bridge->lm_resources)) {
1704                 lm = list_entry(pos, struct vme_lm_resource, list);
1705                 list_del(pos);
1706                 kfree(lm);
1707         }
1708 err_dma:
1709         /* resources are stored in link list */
1710         list_for_each(pos, &(ca91cx42_bridge->dma_resources)) {
1711                 dma_ctrlr = list_entry(pos, struct vme_dma_resource, list);
1712                 list_del(pos);
1713                 kfree(dma_ctrlr);
1714         }
1715 err_slave:
1716         /* resources are stored in link list */
1717         list_for_each(pos, &(ca91cx42_bridge->slave_resources)) {
1718                 slave_image = list_entry(pos, struct vme_slave_resource, list);
1719                 list_del(pos);
1720                 kfree(slave_image);
1721         }
1722 err_master:
1723         /* resources are stored in link list */
1724         list_for_each(pos, &(ca91cx42_bridge->master_resources)) {
1725                 master_image = list_entry(pos, struct vme_master_resource,
1726                         list);
1727                 list_del(pos);
1728                 kfree(master_image);
1729         }
1730
1731         ca91cx42_irq_exit(ca91cx42_device, pdev);
1732 err_irq:
1733 err_test:
1734         iounmap(ca91cx42_device->base);
1735 err_remap:
1736         pci_release_regions(pdev);
1737 err_resource:
1738         pci_disable_device(pdev);
1739 err_enable:
1740         kfree(ca91cx42_device);
1741 err_driver:
1742         kfree(ca91cx42_bridge);
1743 err_struct:
1744         return retval;
1745
1746 }
1747
1748 void ca91cx42_remove(struct pci_dev *pdev)
1749 {
1750         struct list_head *pos = NULL;
1751         struct vme_master_resource *master_image;
1752         struct vme_slave_resource *slave_image;
1753         struct vme_dma_resource *dma_ctrlr;
1754         struct vme_lm_resource *lm;
1755         struct ca91cx42_driver *bridge;
1756         struct vme_bridge *ca91cx42_bridge = pci_get_drvdata(pdev);
1757
1758         bridge = ca91cx42_bridge->driver_priv;
1759
1760
1761         /* Turn off Ints */
1762         iowrite32(0, bridge->base + LINT_EN);
1763
1764         /* Turn off the windows */
1765         iowrite32(0x00800000, bridge->base + LSI0_CTL);
1766         iowrite32(0x00800000, bridge->base + LSI1_CTL);
1767         iowrite32(0x00800000, bridge->base + LSI2_CTL);
1768         iowrite32(0x00800000, bridge->base + LSI3_CTL);
1769         iowrite32(0x00800000, bridge->base + LSI4_CTL);
1770         iowrite32(0x00800000, bridge->base + LSI5_CTL);
1771         iowrite32(0x00800000, bridge->base + LSI6_CTL);
1772         iowrite32(0x00800000, bridge->base + LSI7_CTL);
1773         iowrite32(0x00F00000, bridge->base + VSI0_CTL);
1774         iowrite32(0x00F00000, bridge->base + VSI1_CTL);
1775         iowrite32(0x00F00000, bridge->base + VSI2_CTL);
1776         iowrite32(0x00F00000, bridge->base + VSI3_CTL);
1777         iowrite32(0x00F00000, bridge->base + VSI4_CTL);
1778         iowrite32(0x00F00000, bridge->base + VSI5_CTL);
1779         iowrite32(0x00F00000, bridge->base + VSI6_CTL);
1780         iowrite32(0x00F00000, bridge->base + VSI7_CTL);
1781
1782         vme_unregister_bridge(ca91cx42_bridge);
1783
1784         ca91cx42_crcsr_exit(ca91cx42_bridge, pdev);
1785
1786         /* resources are stored in link list */
1787         list_for_each(pos, &(ca91cx42_bridge->lm_resources)) {
1788                 lm = list_entry(pos, struct vme_lm_resource, list);
1789                 list_del(pos);
1790                 kfree(lm);
1791         }
1792
1793         /* resources are stored in link list */
1794         list_for_each(pos, &(ca91cx42_bridge->dma_resources)) {
1795                 dma_ctrlr = list_entry(pos, struct vme_dma_resource, list);
1796                 list_del(pos);
1797                 kfree(dma_ctrlr);
1798         }
1799
1800         /* resources are stored in link list */
1801         list_for_each(pos, &(ca91cx42_bridge->slave_resources)) {
1802                 slave_image = list_entry(pos, struct vme_slave_resource, list);
1803                 list_del(pos);
1804                 kfree(slave_image);
1805         }
1806
1807         /* resources are stored in link list */
1808         list_for_each(pos, &(ca91cx42_bridge->master_resources)) {
1809                 master_image = list_entry(pos, struct vme_master_resource,
1810                         list);
1811                 list_del(pos);
1812                 kfree(master_image);
1813         }
1814
1815         ca91cx42_irq_exit(bridge, pdev);
1816
1817         iounmap(bridge->base);
1818
1819         pci_release_regions(pdev);
1820
1821         pci_disable_device(pdev);
1822
1823         kfree(ca91cx42_bridge);
1824 }
1825
1826 static void __exit ca91cx42_exit(void)
1827 {
1828         pci_unregister_driver(&ca91cx42_driver);
1829 }
1830
1831 MODULE_PARM_DESC(geoid, "Override geographical addressing");
1832 module_param(geoid, int, 0);
1833
1834 MODULE_DESCRIPTION("VME driver for the Tundra Universe II VME bridge");
1835 MODULE_LICENSE("GPL");
1836
1837 module_init(ca91cx42_init);
1838 module_exit(ca91cx42_exit);