Merge branch 'x86/setup' of git://git.kernel.org/pub/scm/linux/kernel/git/tip/linux...
[linux-2.6] / arch / mips / sgi-ip27 / ip27-nmi.c
1 #include <linux/kernel.h>
2 #include <linux/mmzone.h>
3 #include <linux/nodemask.h>
4 #include <linux/spinlock.h>
5 #include <linux/smp.h>
6 #include <asm/atomic.h>
7 #include <asm/sn/types.h>
8 #include <asm/sn/addrs.h>
9 #include <asm/sn/nmi.h>
10 #include <asm/sn/arch.h>
11 #include <asm/sn/sn0/hub.h>
12
13 #if 0
14 #define NODE_NUM_CPUS(n)        CNODE_NUM_CPUS(n)
15 #else
16 #define NODE_NUM_CPUS(n)        CPUS_PER_NODE
17 #endif
18
19 #define CNODEID_NONE (cnodeid_t)-1
20 #define enter_panic_mode()      spin_lock(&nmi_lock)
21
22 typedef unsigned long machreg_t;
23
24 DEFINE_SPINLOCK(nmi_lock);
25
26 /*
27  * Lets see what else we need to do here. Set up sp, gp?
28  */
29 void nmi_dump(void)
30 {
31         void cont_nmi_dump(void);
32
33         cont_nmi_dump();
34 }
35
36 void install_cpu_nmi_handler(int slice)
37 {
38         nmi_t *nmi_addr;
39
40         nmi_addr = (nmi_t *)NMI_ADDR(get_nasid(), slice);
41         if (nmi_addr->call_addr)
42                 return;
43         nmi_addr->magic = NMI_MAGIC;
44         nmi_addr->call_addr = (void *)nmi_dump;
45         nmi_addr->call_addr_c =
46                 (void *)(~((unsigned long)(nmi_addr->call_addr)));
47         nmi_addr->call_parm = 0;
48 }
49
50 /*
51  * Copy the cpu registers which have been saved in the IP27prom format
52  * into the eframe format for the node under consideration.
53  */
54
55 void nmi_cpu_eframe_save(nasid_t nasid, int slice)
56 {
57         struct reg_struct *nr;
58         int             i;
59
60         /* Get the pointer to the current cpu's register set. */
61         nr = (struct reg_struct *)
62                 (TO_UNCAC(TO_NODE(nasid, IP27_NMI_KREGS_OFFSET)) +
63                 slice * IP27_NMI_KREGS_CPU_SIZE);
64
65         printk("NMI nasid %d: slice %d\n", nasid, slice);
66
67         /*
68          * Saved main processor registers
69          */
70         for (i = 0; i < 32; ) {
71                 if ((i % 4) == 0)
72                         printk("$%2d   :", i);
73                 printk(" %016lx", nr->gpr[i]);
74
75                 i++;
76                 if ((i % 4) == 0)
77                         printk("\n");
78         }
79
80         printk("Hi    : (value lost)\n");
81         printk("Lo    : (value lost)\n");
82
83         /*
84          * Saved cp0 registers
85          */
86         printk("epc   : %016lx %pS\n", nr->epc, (void *) nr->epc);
87         printk("%s\n", print_tainted());
88         printk("ErrEPC: %016lx %pS\n", nr->error_epc, (void *) nr->error_epc);
89         printk("ra    : %016lx %pS\n", nr->gpr[31], (void *) nr->gpr[31]);
90         printk("Status: %08lx         ", nr->sr);
91
92         if (nr->sr & ST0_KX)
93                 printk("KX ");
94         if (nr->sr & ST0_SX)
95                 printk("SX      ");
96         if (nr->sr & ST0_UX)
97                 printk("UX ");
98
99         switch (nr->sr & ST0_KSU) {
100         case KSU_USER:
101                 printk("USER ");
102                 break;
103         case KSU_SUPERVISOR:
104                 printk("SUPERVISOR ");
105                 break;
106         case KSU_KERNEL:
107                 printk("KERNEL ");
108                 break;
109         default:
110                 printk("BAD_MODE ");
111                 break;
112         }
113
114         if (nr->sr & ST0_ERL)
115                 printk("ERL ");
116         if (nr->sr & ST0_EXL)
117                 printk("EXL ");
118         if (nr->sr & ST0_IE)
119                 printk("IE ");
120         printk("\n");
121
122         printk("Cause : %08lx\n", nr->cause);
123         printk("PrId  : %08x\n", read_c0_prid());
124         printk("BadVA : %016lx\n", nr->badva);
125         printk("CErr  : %016lx\n", nr->cache_err);
126         printk("NMI_SR: %016lx\n", nr->nmi_sr);
127
128         printk("\n");
129 }
130
131 void nmi_dump_hub_irq(nasid_t nasid, int slice)
132 {
133         hubreg_t mask0, mask1, pend0, pend1;
134
135         if (slice == 0) {                               /* Slice A */
136                 mask0 = REMOTE_HUB_L(nasid, PI_INT_MASK0_A);
137                 mask1 = REMOTE_HUB_L(nasid, PI_INT_MASK1_A);
138         } else {                                        /* Slice B */
139                 mask0 = REMOTE_HUB_L(nasid, PI_INT_MASK0_B);
140                 mask1 = REMOTE_HUB_L(nasid, PI_INT_MASK1_B);
141         }
142
143         pend0 = REMOTE_HUB_L(nasid, PI_INT_PEND0);
144         pend1 = REMOTE_HUB_L(nasid, PI_INT_PEND1);
145
146         printk("PI_INT_MASK0: %16Lx PI_INT_MASK1: %16Lx\n", mask0, mask1);
147         printk("PI_INT_PEND0: %16Lx PI_INT_PEND1: %16Lx\n", pend0, pend1);
148         printk("\n\n");
149 }
150
151 /*
152  * Copy the cpu registers which have been saved in the IP27prom format
153  * into the eframe format for the node under consideration.
154  */
155 void nmi_node_eframe_save(cnodeid_t  cnode)
156 {
157         nasid_t nasid;
158         int slice;
159
160         /* Make sure that we have a valid node */
161         if (cnode == CNODEID_NONE)
162                 return;
163
164         nasid = COMPACT_TO_NASID_NODEID(cnode);
165         if (nasid == INVALID_NASID)
166                 return;
167
168         /* Save the registers into eframe for each cpu */
169         for (slice = 0; slice < NODE_NUM_CPUS(slice); slice++) {
170                 nmi_cpu_eframe_save(nasid, slice);
171                 nmi_dump_hub_irq(nasid, slice);
172         }
173 }
174
175 /*
176  * Save the nmi cpu registers for all cpus in the system.
177  */
178 void
179 nmi_eframes_save(void)
180 {
181         cnodeid_t       cnode;
182
183         for_each_online_node(cnode)
184                 nmi_node_eframe_save(cnode);
185 }
186
187 void
188 cont_nmi_dump(void)
189 {
190 #ifndef REAL_NMI_SIGNAL
191         static atomic_t nmied_cpus = ATOMIC_INIT(0);
192
193         atomic_inc(&nmied_cpus);
194 #endif
195         /*
196          * Use enter_panic_mode to allow only 1 cpu to proceed
197          */
198         enter_panic_mode();
199
200 #ifdef REAL_NMI_SIGNAL
201         /*
202          * Wait up to 15 seconds for the other cpus to respond to the NMI.
203          * If a cpu has not responded after 10 sec, send it 1 additional NMI.
204          * This is for 2 reasons:
205          *      - sometimes a MMSC fail to NMI all cpus.
206          *      - on 512p SN0 system, the MMSC will only send NMIs to
207          *        half the cpus. Unfortunately, we don't know which cpus may be
208          *        NMIed - it depends on how the site chooses to configure.
209          *
210          * Note: it has been measure that it takes the MMSC up to 2.3 secs to
211          * send NMIs to all cpus on a 256p system.
212          */
213         for (i=0; i < 1500; i++) {
214                 for_each_online_node(node)
215                         if (NODEPDA(node)->dump_count == 0)
216                                 break;
217                 if (node == MAX_NUMNODES)
218                         break;
219                 if (i == 1000) {
220                         for_each_online_node(node)
221                                 if (NODEPDA(node)->dump_count == 0) {
222                                         cpu = cpumask_first(cpumask_of_node(node));
223                                         for (n=0; n < CNODE_NUM_CPUS(node); cpu++, n++) {
224                                                 CPUMASK_SETB(nmied_cpus, cpu);
225                                                 /*
226                                                  * cputonasid, cputoslice
227                                                  * needs kernel cpuid
228                                                  */
229                                                 SEND_NMI((cputonasid(cpu)), (cputoslice(cpu)));
230                                         }
231                                 }
232
233                 }
234                 udelay(10000);
235         }
236 #else
237         while (atomic_read(&nmied_cpus) != num_online_cpus());
238 #endif
239
240         /*
241          * Save the nmi cpu registers for all cpu in the eframe format.
242          */
243         nmi_eframes_save();
244         LOCAL_HUB_S(NI_PORT_RESET, NPR_PORTRESET | NPR_LOCALRESET);
245 }