Linux Kernel  3.7.1
 All Data Structures Namespaces Files Functions Variables Typedefs Enumerations Enumerator Macros Groups Pages
sys_alcor.c
Go to the documentation of this file.
1 /*
2  * linux/arch/alpha/kernel/sys_alcor.c
3  *
4  * Copyright (C) 1995 David A Rusling
5  * Copyright (C) 1996 Jay A Estabrook
6  * Copyright (C) 1998, 1999 Richard Henderson
7  *
8  * Code supporting the ALCOR and XLT (XL-300/366/433).
9  */
10 
11 #include <linux/kernel.h>
12 #include <linux/types.h>
13 #include <linux/mm.h>
14 #include <linux/sched.h>
15 #include <linux/pci.h>
16 #include <linux/init.h>
17 #include <linux/reboot.h>
18 #include <linux/bitops.h>
19 
20 #include <asm/ptrace.h>
21 #include <asm/io.h>
22 #include <asm/dma.h>
23 #include <asm/mmu_context.h>
24 #include <asm/irq.h>
25 #include <asm/pgtable.h>
26 #include <asm/core_cia.h>
27 #include <asm/tlbflush.h>
28 
29 #include "proto.h"
30 #include "irq_impl.h"
31 #include "pci_impl.h"
32 #include "machvec_impl.h"
33 
34 
35 /* Note mask bit is true for ENABLED irqs. */
36 static unsigned long cached_irq_mask;
37 
38 static inline void
39 alcor_update_irq_hw(unsigned long mask)
40 {
41  *(vuip)GRU_INT_MASK = mask;
42  mb();
43 }
44 
45 static inline void
46 alcor_enable_irq(struct irq_data *d)
47 {
48  alcor_update_irq_hw(cached_irq_mask |= 1UL << (d->irq - 16));
49 }
50 
51 static void
52 alcor_disable_irq(struct irq_data *d)
53 {
54  alcor_update_irq_hw(cached_irq_mask &= ~(1UL << (d->irq - 16)));
55 }
56 
57 static void
58 alcor_mask_and_ack_irq(struct irq_data *d)
59 {
60  alcor_disable_irq(d);
61 
62  /* On ALCOR/XLT, need to dismiss interrupt via GRU. */
63  *(vuip)GRU_INT_CLEAR = 1 << (d->irq - 16); mb();
64  *(vuip)GRU_INT_CLEAR = 0; mb();
65 }
66 
67 static void
68 alcor_isa_mask_and_ack_irq(struct irq_data *d)
69 {
71 
72  /* On ALCOR/XLT, need to dismiss interrupt via GRU. */
73  *(vuip)GRU_INT_CLEAR = 0x80000000; mb();
74  *(vuip)GRU_INT_CLEAR = 0; mb();
75 }
76 
77 static struct irq_chip alcor_irq_type = {
78  .name = "ALCOR",
79  .irq_unmask = alcor_enable_irq,
80  .irq_mask = alcor_disable_irq,
81  .irq_mask_ack = alcor_mask_and_ack_irq,
82 };
83 
84 static void
85 alcor_device_interrupt(unsigned long vector)
86 {
87  unsigned long pld;
88  unsigned int i;
89 
90  /* Read the interrupt summary register of the GRU */
91  pld = (*(vuip)GRU_INT_REQ) & GRU_INT_REQ_BITS;
92 
93  /*
94  * Now for every possible bit set, work through them and call
95  * the appropriate interrupt handler.
96  */
97  while (pld) {
98  i = ffz(~pld);
99  pld &= pld - 1; /* clear least bit set */
100  if (i == 31) {
101  isa_device_interrupt(vector);
102  } else {
103  handle_irq(16 + i);
104  }
105  }
106 }
107 
108 static void __init
109 alcor_init_irq(void)
110 {
111  long i;
112 
113  if (alpha_using_srm)
114  alpha_mv.device_interrupt = srm_device_interrupt;
115 
116  *(vuip)GRU_INT_MASK = 0; mb(); /* all disabled */
117  *(vuip)GRU_INT_EDGE = 0; mb(); /* all are level */
118  *(vuip)GRU_INT_HILO = 0x80000000U; mb(); /* ISA only HI */
119  *(vuip)GRU_INT_CLEAR = 0; mb(); /* all clear */
120 
121  for (i = 16; i < 48; ++i) {
122  /* On Alcor, at least, lines 20..30 are not connected
123  and can generate spurious interrupts if we turn them
124  on while IRQ probing. */
125  if (i >= 16+20 && i <= 16+30)
126  continue;
127  irq_set_chip_and_handler(i, &alcor_irq_type, handle_level_irq);
128  irq_set_status_flags(i, IRQ_LEVEL);
129  }
130  i8259a_irq_type.irq_ack = alcor_isa_mask_and_ack_irq;
131 
134 
136 }
137 
138 
139 /*
140  * PCI Fixup configuration.
141  *
142  * Summary @ GRU_INT_REQ:
143  * Bit Meaning
144  * 0 Interrupt Line A from slot 2
145  * 1 Interrupt Line B from slot 2
146  * 2 Interrupt Line C from slot 2
147  * 3 Interrupt Line D from slot 2
148  * 4 Interrupt Line A from slot 1
149  * 5 Interrupt line B from slot 1
150  * 6 Interrupt Line C from slot 1
151  * 7 Interrupt Line D from slot 1
152  * 8 Interrupt Line A from slot 0
153  * 9 Interrupt Line B from slot 0
154  *10 Interrupt Line C from slot 0
155  *11 Interrupt Line D from slot 0
156  *12 Interrupt Line A from slot 4
157  *13 Interrupt Line B from slot 4
158  *14 Interrupt Line C from slot 4
159  *15 Interrupt Line D from slot 4
160  *16 Interrupt Line D from slot 3
161  *17 Interrupt Line D from slot 3
162  *18 Interrupt Line D from slot 3
163  *19 Interrupt Line D from slot 3
164  *20-30 Reserved
165  *31 EISA interrupt
166  *
167  * The device to slot mapping looks like:
168  *
169  * Slot Device
170  * 6 built-in TULIP (XLT only)
171  * 7 PCI on board slot 0
172  * 8 PCI on board slot 3
173  * 9 PCI on board slot 4
174  * 10 PCEB (PCI-EISA bridge)
175  * 11 PCI on board slot 2
176  * 12 PCI on board slot 1
177  *
178  *
179  * This two layered interrupt approach means that we allocate IRQ 16 and
180  * above for PCI interrupts. The IRQ relates to which bit the interrupt
181  * comes in on. This makes interrupt processing much easier.
182  */
183 
184 static int __init
185 alcor_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
186 {
187  static char irq_tab[7][5] __initdata = {
188  /*INT INTA INTB INTC INTD */
189  /* note: IDSEL 17 is XLT only */
190  {16+13, 16+13, 16+13, 16+13, 16+13}, /* IdSel 17, TULIP */
191  { 16+8, 16+8, 16+9, 16+10, 16+11}, /* IdSel 18, slot 0 */
192  {16+16, 16+16, 16+17, 16+18, 16+19}, /* IdSel 19, slot 3 */
193  {16+12, 16+12, 16+13, 16+14, 16+15}, /* IdSel 20, slot 4 */
194  { -1, -1, -1, -1, -1}, /* IdSel 21, PCEB */
195  { 16+0, 16+0, 16+1, 16+2, 16+3}, /* IdSel 22, slot 2 */
196  { 16+4, 16+4, 16+5, 16+6, 16+7}, /* IdSel 23, slot 1 */
197  };
198  const long min_idsel = 6, max_idsel = 12, irqs_per_slot = 5;
199  return COMMON_TABLE_LOOKUP;
200 }
201 
202 static void
203 alcor_kill_arch(int mode)
204 {
205  cia_kill_arch(mode);
206 
207 #ifndef ALPHA_RESTORE_SRM_SETUP
208  switch(mode) {
210  /* Who said DEC engineer's have no sense of humor? ;-) */
211  if (alpha_using_srm) {
212  *(vuip) GRU_RESET = 0x0000dead;
213  mb();
214  }
215  break;
217  break;
219  break;
220  }
221 
222  halt();
223 #endif
224 }
225 
226 static void __init
227 alcor_init_pci(void)
228 {
229  struct pci_dev *dev;
230 
231  cia_init_pci();
232 
233  /*
234  * Now we can look to see if we are really running on an XLT-type
235  * motherboard, by looking for a 21040 TULIP in slot 6, which is
236  * built into XLT and BRET/MAVERICK, but not available on ALCOR.
237  */
240  NULL);
241  if (dev && dev->devfn == PCI_DEVFN(6,0)) {
242  alpha_mv.sys.cia.gru_int_req_bits = XLT_GRU_INT_REQ_BITS;
243  printk(KERN_INFO "%s: Detected AS500 or XLT motherboard.\n",
244  __func__);
245  }
246  pci_dev_put(dev);
247 }
248 
249 
250 /*
251  * The System Vectors
252  */
253 
254 struct alpha_machine_vector alcor_mv __initmv = {
255  .vector_name = "Alcor",
256  DO_EV5_MMU,
258  DO_CIA_IO,
259  .machine_check = cia_machine_check,
260  .max_isa_dma_address = ALPHA_ALCOR_MAX_ISA_DMA_ADDRESS,
261  .min_io_address = EISA_DEFAULT_IO_BASE,
262  .min_mem_address = CIA_DEFAULT_MEM_BASE,
263 
264  .nr_irqs = 48,
265  .device_interrupt = alcor_device_interrupt,
266 
267  .init_arch = cia_init_arch,
268  .init_irq = alcor_init_irq,
269  .init_rtc = common_init_rtc,
270  .init_pci = alcor_init_pci,
271  .kill_arch = alcor_kill_arch,
272  .pci_map_irq = alcor_map_irq,
273  .pci_swizzle = common_swizzle,
274 
275  .sys = { .cia = {
276  .gru_int_req_bits = ALCOR_GRU_INT_REQ_BITS
277  }}
278 };
279 ALIAS_MV(alcor)
280 
281 struct alpha_machine_vector xlt_mv __initmv = {
282  .vector_name = "XLT",
283  DO_EV5_MMU,
285  DO_CIA_IO,
286  .machine_check = cia_machine_check,
287  .max_isa_dma_address = ALPHA_MAX_ISA_DMA_ADDRESS,
288  .min_io_address = EISA_DEFAULT_IO_BASE,
289  .min_mem_address = CIA_DEFAULT_MEM_BASE,
290 
291  .nr_irqs = 48,
292  .device_interrupt = alcor_device_interrupt,
293 
294  .init_arch = cia_init_arch,
295  .init_irq = alcor_init_irq,
296  .init_rtc = common_init_rtc,
297  .init_pci = alcor_init_pci,
298  .kill_arch = alcor_kill_arch,
299  .pci_map_irq = alcor_map_irq,
300  .pci_swizzle = common_swizzle,
301 
302  .sys = { .cia = {
303  .gru_int_req_bits = XLT_GRU_INT_REQ_BITS
304  }}
305 };
306 
307 /* No alpha_mv alias for XLT, since we compile it in unconditionally
308  with ALCOR; setup_arch knows how to cope. */