98f716bd92f0ce414d414f8c1c6cf68523d01f7f
[linux-2.6.git] / arch / ia64 / sn / pci / pcibr / pcibr_provider.c
1 /*
2  * This file is subject to the terms and conditions of the GNU General Public
3  * License.  See the file "COPYING" in the main directory of this archive
4  * for more details.
5  *
6  * Copyright (C) 2001-2004 Silicon Graphics, Inc. All rights reserved.
7  */
8
9 #include <linux/interrupt.h>
10 #include <linux/types.h>
11 #include <linux/pci.h>
12 #include <asm/sn/addrs.h>
13 #include <asm/sn/geo.h>
14 #include <asm/sn/pcibr_provider.h>
15 #include <asm/sn/pcibus_provider_defs.h>
16 #include <asm/sn/pcidev.h>
17 #include <asm/sn/sn_sal.h>
18 #include <asm/sn/sn2/sn_hwperf.h>
19 #include "xtalk/xwidgetdev.h"
20 #include "xtalk/hubdev.h"
21
22 int
23 sal_pcibr_slot_enable(struct pcibus_info *soft, int device, void *resp)
24 {
25         struct ia64_sal_retval ret_stuff;
26         u64 busnum;
27         u64 segment;
28
29         ret_stuff.status = 0;
30         ret_stuff.v0 = 0;
31
32         segment = soft->pbi_buscommon.bs_persist_segment;
33         busnum = soft->pbi_buscommon.bs_persist_busnum;
34         SAL_CALL_NOLOCK(ret_stuff, (u64) SN_SAL_IOIF_SLOT_ENABLE, segment,
35                         busnum, (u64) device, (u64) resp, 0, 0, 0);
36
37         return (int)ret_stuff.v0;
38 }
39
40 int
41 sal_pcibr_slot_disable(struct pcibus_info *soft, int device, int action,
42                        void *resp)
43 {
44         struct ia64_sal_retval ret_stuff;
45         u64 busnum;
46         u64 segment;
47
48         ret_stuff.status = 0;
49         ret_stuff.v0 = 0;
50
51         segment = soft->pbi_buscommon.bs_persist_segment;
52         busnum = soft->pbi_buscommon.bs_persist_busnum;
53         SAL_CALL_NOLOCK(ret_stuff, (u64) SN_SAL_IOIF_SLOT_DISABLE,
54                         segment, busnum, (u64) device, (u64) action,
55                         (u64) resp, 0, 0);
56
57         return (int)ret_stuff.v0;
58 }
59
60 static int sal_pcibr_error_interrupt(struct pcibus_info *soft)
61 {
62         struct ia64_sal_retval ret_stuff;
63         u64 busnum;
64         int segment;
65         ret_stuff.status = 0;
66         ret_stuff.v0 = 0;
67
68         segment = soft->pbi_buscommon.bs_persist_segment;
69         busnum = soft->pbi_buscommon.bs_persist_busnum;
70         SAL_CALL_NOLOCK(ret_stuff,
71                         (u64) SN_SAL_IOIF_ERROR_INTERRUPT,
72                         (u64) segment, (u64) busnum, 0, 0, 0, 0, 0);
73
74         return (int)ret_stuff.v0;
75 }
76
77 /* 
78  * PCI Bridge Error interrupt handler.  Gets invoked whenever a PCI 
79  * bridge sends an error interrupt.
80  */
81 static irqreturn_t
82 pcibr_error_intr_handler(int irq, void *arg, struct pt_regs *regs)
83 {
84         struct pcibus_info *soft = (struct pcibus_info *)arg;
85
86         if (sal_pcibr_error_interrupt(soft) < 0) {
87                 panic("pcibr_error_intr_handler(): Fatal Bridge Error");
88         }
89         return IRQ_HANDLED;
90 }
91
92 void *
93 pcibr_bus_fixup(struct pcibus_bussoft *prom_bussoft, struct pci_controller *controller)
94 {
95         int nasid, cnode, j;
96         cnodeid_t near_cnode;
97         struct hubdev_info *hubdev_info;
98         struct pcibus_info *soft;
99         struct sn_flush_device_kernel *sn_flush_device_kernel;
100         struct sn_flush_device_common *common;
101
102         if (! IS_PCI_BRIDGE_ASIC(prom_bussoft->bs_asic_type)) {
103                 return NULL;
104         }
105
106         /*
107          * Allocate kernel bus soft and copy from prom.
108          */
109
110         soft = kmalloc(sizeof(struct pcibus_info), GFP_KERNEL);
111         if (!soft) {
112                 return NULL;
113         }
114
115         memcpy(soft, prom_bussoft, sizeof(struct pcibus_info));
116         soft->pbi_buscommon.bs_base =
117             (((u64) soft->pbi_buscommon.
118               bs_base << 4) >> 4) | __IA64_UNCACHED_OFFSET;
119
120         spin_lock_init(&soft->pbi_lock);
121
122         /*
123          * register the bridge's error interrupt handler
124          */
125         if (request_irq(SGI_PCIASIC_ERROR, (void *)pcibr_error_intr_handler,
126                         SA_SHIRQ, "PCIBR error", (void *)(soft))) {
127                 printk(KERN_WARNING
128                        "pcibr cannot allocate interrupt for error handler\n");
129         }
130
131         /* 
132          * Update the Bridge with the "kernel" pagesize 
133          */
134         if (PAGE_SIZE < 16384) {
135                 pcireg_control_bit_clr(soft, PCIBR_CTRL_PAGE_SIZE);
136         } else {
137                 pcireg_control_bit_set(soft, PCIBR_CTRL_PAGE_SIZE);
138         }
139
140         nasid = NASID_GET(soft->pbi_buscommon.bs_base);
141         cnode = nasid_to_cnodeid(nasid);
142         hubdev_info = (struct hubdev_info *)(NODEPDA(cnode)->pdinfo);
143
144         if (hubdev_info->hdi_flush_nasid_list.widget_p) {
145                 sn_flush_device_kernel = hubdev_info->hdi_flush_nasid_list.
146                     widget_p[(int)soft->pbi_buscommon.bs_xid];
147                 if (sn_flush_device_kernel) {
148                         for (j = 0; j < DEV_PER_WIDGET;
149                              j++, sn_flush_device_kernel++) {
150                                 common = sn_flush_device_kernel->common;
151                                 if (common->sfdl_slot == -1)
152                                         continue;
153                                 if ((common->sfdl_persistent_segment ==
154                                      soft->pbi_buscommon.bs_persist_segment) &&
155                                      (common->sfdl_persistent_busnum ==
156                                      soft->pbi_buscommon.bs_persist_busnum))
157                                         common->sfdl_pcibus_info =
158                                             soft;
159                         }
160                 }
161         }
162
163         /* Setup the PMU ATE map */
164         soft->pbi_int_ate_resource.lowest_free_index = 0;
165         soft->pbi_int_ate_resource.ate =
166             kzalloc(soft->pbi_int_ate_size * sizeof(u64), GFP_KERNEL);
167
168         if (!soft->pbi_int_ate_resource.ate) {
169                 kfree(soft);
170                 return NULL;
171         }
172
173         if (prom_bussoft->bs_asic_type == PCIIO_ASIC_TYPE_TIOCP) {
174                 /* TIO PCI Bridge: find nearest node with CPUs */
175                 int e = sn_hwperf_get_nearest_node(cnode, NULL, &near_cnode);
176
177                 if (e < 0) {
178                         near_cnode = (cnodeid_t)-1; /* use any node */
179                         printk(KERN_WARNING "pcibr_bus_fixup: failed to find "
180                                 "near node with CPUs to TIO node %d, err=%d\n",
181                                 cnode, e);
182                 }
183                 controller->node = near_cnode;
184         }
185         else
186                 controller->node = cnode;
187         return soft;
188 }
189
190 void pcibr_force_interrupt(struct sn_irq_info *sn_irq_info)
191 {
192         struct pcidev_info *pcidev_info;
193         struct pcibus_info *pcibus_info;
194         int bit = sn_irq_info->irq_int_bit;
195
196         if (! sn_irq_info->irq_bridge)
197                 return;
198
199         pcidev_info = (struct pcidev_info *)sn_irq_info->irq_pciioinfo;
200         if (pcidev_info) {
201                 pcibus_info =
202                     (struct pcibus_info *)pcidev_info->pdi_host_pcidev_info->
203                     pdi_pcibus_info;
204                 pcireg_force_intr_set(pcibus_info, bit);
205         }
206 }
207
208 void pcibr_target_interrupt(struct sn_irq_info *sn_irq_info)
209 {
210         struct pcidev_info *pcidev_info;
211         struct pcibus_info *pcibus_info;
212         int bit = sn_irq_info->irq_int_bit;
213         u64 xtalk_addr = sn_irq_info->irq_xtalkaddr;
214
215         pcidev_info = (struct pcidev_info *)sn_irq_info->irq_pciioinfo;
216         if (pcidev_info) {
217                 pcibus_info =
218                     (struct pcibus_info *)pcidev_info->pdi_host_pcidev_info->
219                     pdi_pcibus_info;
220
221                 /* Disable the device's IRQ   */
222                 pcireg_intr_enable_bit_clr(pcibus_info, (1 << bit));
223
224                 /* Change the device's IRQ    */
225                 pcireg_intr_addr_addr_set(pcibus_info, bit, xtalk_addr);
226
227                 /* Re-enable the device's IRQ */
228                 pcireg_intr_enable_bit_set(pcibus_info, (1 << bit));
229
230                 pcibr_force_interrupt(sn_irq_info);
231         }
232 }
233
234 /*
235  * Provider entries for PIC/CP
236  */
237
238 struct sn_pcibus_provider pcibr_provider = {
239         .dma_map = pcibr_dma_map,
240         .dma_map_consistent = pcibr_dma_map_consistent,
241         .dma_unmap = pcibr_dma_unmap,
242         .bus_fixup = pcibr_bus_fixup,
243         .force_interrupt = pcibr_force_interrupt,
244         .target_interrupt = pcibr_target_interrupt
245 };
246
247 int
248 pcibr_init_provider(void)
249 {
250         sn_pci_provider[PCIIO_ASIC_TYPE_PIC] = &pcibr_provider;
251         sn_pci_provider[PCIIO_ASIC_TYPE_TIOCP] = &pcibr_provider;
252
253         return 0;
254 }
255
256 EXPORT_SYMBOL_GPL(sal_pcibr_slot_enable);
257 EXPORT_SYMBOL_GPL(sal_pcibr_slot_disable);