• Home
  • History
  • Annotate
  • Line#
  • Navigate
  • Raw
  • Download
  • only in /netgear-R7000-V1.0.7.12_1.2.5/components/opensource/linux/linux-2.6.36/arch/ia64/kernel/
1/*
2 * File:	mca_asm.S
3 * Purpose:	assembly portion of the IA64 MCA handling
4 *
5 * Mods by cfleck to integrate into kernel build
6 *
7 * 2000-03-15 David Mosberger-Tang <davidm@hpl.hp.com>
8 *		Added various stop bits to get a clean compile
9 *
10 * 2000-03-29 Chuck Fleckenstein <cfleck@co.intel.com>
11 *		Added code to save INIT handoff state in pt_regs format,
12 *		switch to temp kstack, switch modes, jump to C INIT handler
13 *
14 * 2002-01-04 J.Hall <jenna.s.hall@intel.com>
15 *		Before entering virtual mode code:
16 *		 1. Check for TLB CPU error
17 *		 2. Restore current thread pointer to kr6
18 *		 3. Move stack ptr 16 bytes to conform to C calling convention
19 *
20 * 2004-11-12 Russ Anderson <rja@sgi.com>
21 *		Added per cpu MCA/INIT stack save areas.
22 *
23 * 2005-12-08 Keith Owens <kaos@sgi.com>
24 *		Use per cpu MCA/INIT stacks for all data.
25 */
26#include <linux/threads.h>
27
28#include <asm/asmmacro.h>
29#include <asm/pgtable.h>
30#include <asm/processor.h>
31#include <asm/mca_asm.h>
32#include <asm/mca.h>
33
34#include "entry.h"
35
36#define GET_IA64_MCA_DATA(reg)						\
37	GET_THIS_PADDR(reg, ia64_mca_data)				\
38	;;								\
39	ld8 reg=[reg]
40
41	.global ia64_do_tlb_purge
42	.global ia64_os_mca_dispatch
43	.global ia64_os_init_on_kdump
44	.global ia64_os_init_dispatch_monarch
45	.global ia64_os_init_dispatch_slave
46
47	.text
48	.align 16
49
50//StartMain////////////////////////////////////////////////////////////////////
51
52/*
53 * Just the TLB purge part is moved to a separate function
54 * so we can re-use the code for cpu hotplug code as well
55 * Caller should now setup b1, so we can branch once the
56 * tlb flush is complete.
57 */
58
59ia64_do_tlb_purge:
60#define O(member)	IA64_CPUINFO_##member##_OFFSET
61
62	GET_THIS_PADDR(r2, ia64_cpu_info) // load phys addr of cpu_info into r2
63	;;
64	addl r17=O(PTCE_STRIDE),r2
65	addl r2=O(PTCE_BASE),r2
66	;;
67	ld8 r18=[r2],(O(PTCE_COUNT)-O(PTCE_BASE));;	// r18=ptce_base
68	ld4 r19=[r2],4					// r19=ptce_count[0]
69	ld4 r21=[r17],4					// r21=ptce_stride[0]
70	;;
71	ld4 r20=[r2]					// r20=ptce_count[1]
72	ld4 r22=[r17]					// r22=ptce_stride[1]
73	mov r24=0
74	;;
75	adds r20=-1,r20
76	;;
77#undef O
78
792:
80	cmp.ltu p6,p7=r24,r19
81(p7)	br.cond.dpnt.few 4f
82	mov ar.lc=r20
833:
84	ptc.e r18
85	;;
86	add r18=r22,r18
87	br.cloop.sptk.few 3b
88	;;
89	add r18=r21,r18
90	add r24=1,r24
91	;;
92	br.sptk.few 2b
934:
94	srlz.i 			// srlz.i implies srlz.d
95	;;
96
97        // Now purge addresses formerly mapped by TR registers
98	// 1. Purge ITR&DTR for kernel.
99	movl r16=KERNEL_START
100	mov r18=KERNEL_TR_PAGE_SHIFT<<2
101	;;
102	ptr.i r16, r18
103	ptr.d r16, r18
104	;;
105	srlz.i
106	;;
107	srlz.d
108	;;
109	// 3. Purge ITR for PAL code.
110	GET_THIS_PADDR(r2, ia64_mca_pal_base)
111	;;
112	ld8 r16=[r2]
113	mov r18=IA64_GRANULE_SHIFT<<2
114	;;
115	ptr.i r16,r18
116	;;
117	srlz.i
118	;;
119	// 4. Purge DTR for stack.
120	mov r16=IA64_KR(CURRENT_STACK)
121	;;
122	shl r16=r16,IA64_GRANULE_SHIFT
123	movl r19=PAGE_OFFSET
124	;;
125	add r16=r19,r16
126	mov r18=IA64_GRANULE_SHIFT<<2
127	;;
128	ptr.d r16,r18
129	;;
130	srlz.i
131	;;
132	// Now branch away to caller.
133	br.sptk.many b1
134	;;
135
136//EndMain//////////////////////////////////////////////////////////////////////
137
138//StartMain////////////////////////////////////////////////////////////////////
139
140ia64_os_mca_dispatch:
141	mov r3=IA64_MCA_CPU_MCA_STACK_OFFSET	// use the MCA stack
142	LOAD_PHYSICAL(p0,r2,1f)			// return address
143	mov r19=1				// All MCA events are treated as monarch (for now)
144	br.sptk ia64_state_save			// save the state that is not in minstate
1451:
146
147	GET_IA64_MCA_DATA(r2)
148	// Using MCA stack, struct ia64_sal_os_state, variable proc_state_param
149	;;
150	add r3=IA64_MCA_CPU_MCA_STACK_OFFSET+MCA_SOS_OFFSET+SOS(PROC_STATE_PARAM), r2
151	;;
152	ld8 r18=[r3]				// Get processor state parameter on existing PALE_CHECK.
153	;;
154	tbit.nz p6,p7=r18,60
155(p7)	br.spnt done_tlb_purge_and_reload
156
157	// The following code purges TC and TR entries. Then reload all TC entries.
158	// Purge percpu data TC entries.
159begin_tlb_purge_and_reload:
160	movl r18=ia64_reload_tr;;
161	LOAD_PHYSICAL(p0,r18,ia64_reload_tr);;
162	mov b1=r18;;
163	br.sptk.many ia64_do_tlb_purge;;
164
165ia64_reload_tr:
166	// Finally reload the TR registers.
167	// 1. Reload DTR/ITR registers for kernel.
168	mov r18=KERNEL_TR_PAGE_SHIFT<<2
169	movl r17=KERNEL_START
170	;;
171	mov cr.itir=r18
172	mov cr.ifa=r17
173        mov r16=IA64_TR_KERNEL
174	mov r19=ip
175	movl r18=PAGE_KERNEL
176	;;
177        dep r17=0,r19,0, KERNEL_TR_PAGE_SHIFT
178	;;
179	or r18=r17,r18
180	;;
181        itr.i itr[r16]=r18
182	;;
183        itr.d dtr[r16]=r18
184        ;;
185	srlz.i
186	srlz.d
187	;;
188	// 3. Reload ITR for PAL code.
189	GET_THIS_PADDR(r2, ia64_mca_pal_pte)
190	;;
191	ld8 r18=[r2]			// load PAL PTE
192	;;
193	GET_THIS_PADDR(r2, ia64_mca_pal_base)
194	;;
195	ld8 r16=[r2]			// load PAL vaddr
196	mov r19=IA64_GRANULE_SHIFT<<2
197	;;
198	mov cr.itir=r19
199	mov cr.ifa=r16
200	mov r20=IA64_TR_PALCODE
201	;;
202	itr.i itr[r20]=r18
203	;;
204	srlz.i
205	;;
206	// 4. Reload DTR for stack.
207	mov r16=IA64_KR(CURRENT_STACK)
208	;;
209	shl r16=r16,IA64_GRANULE_SHIFT
210	movl r19=PAGE_OFFSET
211	;;
212	add r18=r19,r16
213	movl r20=PAGE_KERNEL
214	;;
215	add r16=r20,r16
216	mov r19=IA64_GRANULE_SHIFT<<2
217	;;
218	mov cr.itir=r19
219	mov cr.ifa=r18
220	mov r20=IA64_TR_CURRENT_STACK
221	;;
222	itr.d dtr[r20]=r16
223	GET_THIS_PADDR(r2, ia64_mca_tr_reload)
224	mov r18 = 1
225	;;
226	srlz.d
227	;;
228	st8 [r2] =r18
229	;;
230
231done_tlb_purge_and_reload:
232
233	// switch to per cpu MCA stack
234	mov r3=IA64_MCA_CPU_MCA_STACK_OFFSET	// use the MCA stack
235	LOAD_PHYSICAL(p0,r2,1f)			// return address
236	br.sptk ia64_new_stack
2371:
238
239	// everything saved, now we can set the kernel registers
240	mov r3=IA64_MCA_CPU_MCA_STACK_OFFSET	// use the MCA stack
241	LOAD_PHYSICAL(p0,r2,1f)			// return address
242	br.sptk ia64_set_kernel_registers
2431:
244
245	// This must be done in physical mode
246	GET_IA64_MCA_DATA(r2)
247	;;
248	mov r7=r2
249
250        // Enter virtual mode from physical mode
251	VIRTUAL_MODE_ENTER(r2, r3, ia64_os_mca_virtual_begin, r4)
252
253	// This code returns to SAL via SOS r2, in general SAL has no unwind
254	// data.  To get a clean termination when backtracing the C MCA/INIT
255	// handler, set a dummy return address of 0 in this routine.  That
256	// requires that ia64_os_mca_virtual_begin be a global function.
257ENTRY(ia64_os_mca_virtual_begin)
258	.prologue
259	.save rp,r0
260	.body
261
262	mov ar.rsc=3				// set eager mode for C handler
263	mov r2=r7				// see GET_IA64_MCA_DATA above
264	;;
265
266	// Call virtual mode handler
267	alloc r14=ar.pfs,0,0,3,0
268	;;
269	DATA_PA_TO_VA(r2,r7)
270	;;
271	add out0=IA64_MCA_CPU_MCA_STACK_OFFSET+MCA_PT_REGS_OFFSET, r2
272	add out1=IA64_MCA_CPU_MCA_STACK_OFFSET+MCA_SWITCH_STACK_OFFSET, r2
273	add out2=IA64_MCA_CPU_MCA_STACK_OFFSET+MCA_SOS_OFFSET, r2
274	br.call.sptk.many    b0=ia64_mca_handler
275
276	// Revert back to physical mode before going back to SAL
277	PHYSICAL_MODE_ENTER(r2, r3, ia64_os_mca_virtual_end, r4)
278ia64_os_mca_virtual_end:
279
280END(ia64_os_mca_virtual_begin)
281
282	// switch back to previous stack
283	alloc r14=ar.pfs,0,0,0,0		// remove the MCA handler frame
284	mov r3=IA64_MCA_CPU_MCA_STACK_OFFSET	// use the MCA stack
285	LOAD_PHYSICAL(p0,r2,1f)			// return address
286	br.sptk ia64_old_stack
2871:
288
289	mov r3=IA64_MCA_CPU_MCA_STACK_OFFSET	// use the MCA stack
290	LOAD_PHYSICAL(p0,r2,1f)			// return address
291	br.sptk ia64_state_restore		// restore the SAL state
2921:
293
294	mov		b0=r12			// SAL_CHECK return address
295
296	br		b0
297
298//EndMain//////////////////////////////////////////////////////////////////////
299
300//StartMain////////////////////////////////////////////////////////////////////
301
302//
303// NOP init handler for kdump.  In panic situation, we may receive INIT
304// while kernel transition.  Since we initialize registers on leave from
305// current kernel, no longer monarch/slave handlers of current kernel in
306// virtual mode are called safely.
307// We can unregister these init handlers from SAL, however then the INIT
308// will result in warmboot by SAL and we cannot retrieve the crashdump.
309// Therefore register this NOP function to SAL, to prevent entering virtual
310// mode and resulting warmboot by SAL.
311//
312ia64_os_init_on_kdump:
313	mov		r8=r0		// IA64_INIT_RESUME
314	mov             r9=r10		// SAL_GP
315	mov		r22=r17		// *minstate
316	;;
317	mov		r10=r0		// return to same context
318	mov		b0=r12		// SAL_CHECK return address
319	br		b0
320
321//
322// SAL to OS entry point for INIT on all processors.  This has been defined for
323// registration purposes with SAL as a part of ia64_mca_init.  Monarch and
324// slave INIT have identical processing, except for the value of the
325// sos->monarch flag in r19.
326//
327
328ia64_os_init_dispatch_monarch:
329	mov r19=1				// Bow, bow, ye lower middle classes!
330	br.sptk ia64_os_init_dispatch
331
332ia64_os_init_dispatch_slave:
333	mov r19=0				// <igor>yeth, mathter</igor>
334
335ia64_os_init_dispatch:
336
337	mov r3=IA64_MCA_CPU_INIT_STACK_OFFSET	// use the INIT stack
338	LOAD_PHYSICAL(p0,r2,1f)			// return address
339	br.sptk ia64_state_save			// save the state that is not in minstate
3401:
341
342	// switch to per cpu INIT stack
343	mov r3=IA64_MCA_CPU_INIT_STACK_OFFSET	// use the INIT stack
344	LOAD_PHYSICAL(p0,r2,1f)			// return address
345	br.sptk ia64_new_stack
3461:
347
348	// everything saved, now we can set the kernel registers
349	mov r3=IA64_MCA_CPU_INIT_STACK_OFFSET	// use the INIT stack
350	LOAD_PHYSICAL(p0,r2,1f)			// return address
351	br.sptk ia64_set_kernel_registers
3521:
353
354	// This must be done in physical mode
355	GET_IA64_MCA_DATA(r2)
356	;;
357	mov r7=r2
358
359        // Enter virtual mode from physical mode
360	VIRTUAL_MODE_ENTER(r2, r3, ia64_os_init_virtual_begin, r4)
361
362	// This code returns to SAL via SOS r2, in general SAL has no unwind
363	// data.  To get a clean termination when backtracing the C MCA/INIT
364	// handler, set a dummy return address of 0 in this routine.  That
365	// requires that ia64_os_init_virtual_begin be a global function.
366ENTRY(ia64_os_init_virtual_begin)
367	.prologue
368	.save rp,r0
369	.body
370
371	mov ar.rsc=3				// set eager mode for C handler
372	mov r2=r7				// see GET_IA64_MCA_DATA above
373	;;
374
375	// Call virtual mode handler
376	alloc r14=ar.pfs,0,0,3,0
377	;;
378	DATA_PA_TO_VA(r2,r7)
379	;;
380	add out0=IA64_MCA_CPU_INIT_STACK_OFFSET+MCA_PT_REGS_OFFSET, r2
381	add out1=IA64_MCA_CPU_INIT_STACK_OFFSET+MCA_SWITCH_STACK_OFFSET, r2
382	add out2=IA64_MCA_CPU_INIT_STACK_OFFSET+MCA_SOS_OFFSET, r2
383	br.call.sptk.many    b0=ia64_init_handler
384
385	// Revert back to physical mode before going back to SAL
386	PHYSICAL_MODE_ENTER(r2, r3, ia64_os_init_virtual_end, r4)
387ia64_os_init_virtual_end:
388
389END(ia64_os_init_virtual_begin)
390
391	mov r3=IA64_MCA_CPU_INIT_STACK_OFFSET	// use the INIT stack
392	LOAD_PHYSICAL(p0,r2,1f)			// return address
393	br.sptk ia64_state_restore		// restore the SAL state
3941:
395
396	// switch back to previous stack
397	alloc r14=ar.pfs,0,0,0,0		// remove the INIT handler frame
398	mov r3=IA64_MCA_CPU_INIT_STACK_OFFSET	// use the INIT stack
399	LOAD_PHYSICAL(p0,r2,1f)			// return address
400	br.sptk ia64_old_stack
4011:
402
403	mov		b0=r12			// SAL_CHECK return address
404	br		b0
405
406//EndMain//////////////////////////////////////////////////////////////////////
407
408// common defines for the stubs
409#define	ms		r4
410#define	regs		r5
411#define	temp1		r2	/* careful, it overlaps with input registers */
412#define	temp2		r3	/* careful, it overlaps with input registers */
413#define	temp3		r7
414#define	temp4		r14
415
416
417//++
418// Name:
419//	ia64_state_save()
420//
421// Stub Description:
422//
423//	Save the state that is not in minstate.  This is sensitive to the layout of
424//	struct ia64_sal_os_state in mca.h.
425//
426//	r2 contains the return address, r3 contains either
427//	IA64_MCA_CPU_MCA_STACK_OFFSET or IA64_MCA_CPU_INIT_STACK_OFFSET.
428//
429//	The OS to SAL section of struct ia64_sal_os_state is set to a default
430//	value of cold boot (MCA) or warm boot (INIT) and return to the same
431//	context.  ia64_sal_os_state is also used to hold some registers that
432//	need to be saved and restored across the stack switches.
433//
434//	Most input registers to this stub come from PAL/SAL
435//	r1  os gp, physical
436//	r8  pal_proc entry point
437//	r9  sal_proc entry point
438//	r10 sal gp
439//	r11 MCA - rendevzous state, INIT - reason code
440//	r12 sal return address
441//	r17 pal min_state
442//	r18 processor state parameter
443//	r19 monarch flag, set by the caller of this routine
444//
445//	In addition to the SAL to OS state, this routine saves all the
446//	registers that appear in struct pt_regs and struct switch_stack,
447//	excluding those that are already in the PAL minstate area.  This
448//	results in a partial pt_regs and switch_stack, the C code copies the
449//	remaining registers from PAL minstate to pt_regs and switch_stack.  The
450//	resulting structures contain all the state of the original process when
451//	MCA/INIT occurred.
452//
453//--
454
455ia64_state_save:
456	add regs=MCA_SOS_OFFSET, r3
457	add ms=MCA_SOS_OFFSET+8, r3
458	mov b0=r2		// save return address
459	cmp.eq p1,p2=IA64_MCA_CPU_MCA_STACK_OFFSET, r3
460	;;
461	GET_IA64_MCA_DATA(temp2)
462	;;
463	add temp1=temp2, regs	// struct ia64_sal_os_state on MCA or INIT stack
464	add temp2=temp2, ms	// struct ia64_sal_os_state+8 on MCA or INIT stack
465	;;
466	mov regs=temp1		// save the start of sos
467	st8 [temp1]=r1,16	// os_gp
468	st8 [temp2]=r8,16	// pal_proc
469	;;
470	st8 [temp1]=r9,16	// sal_proc
471	st8 [temp2]=r11,16	// rv_rc
472	mov r11=cr.iipa
473	;;
474	st8 [temp1]=r18		// proc_state_param
475	st8 [temp2]=r19		// monarch
476	mov r6=IA64_KR(CURRENT)
477	add temp1=SOS(SAL_RA), regs
478	add temp2=SOS(SAL_GP), regs
479	;;
480	st8 [temp1]=r12,16	// sal_ra
481	st8 [temp2]=r10,16	// sal_gp
482	mov r12=cr.isr
483	;;
484	st8 [temp1]=r17,16	// pal_min_state
485	st8 [temp2]=r6,16	// prev_IA64_KR_CURRENT
486	mov r6=IA64_KR(CURRENT_STACK)
487	;;
488	st8 [temp1]=r6,16	// prev_IA64_KR_CURRENT_STACK
489	st8 [temp2]=r0,16	// prev_task, starts off as NULL
490	mov r6=cr.ifa
491	;;
492	st8 [temp1]=r12,16	// cr.isr
493	st8 [temp2]=r6,16	// cr.ifa
494	mov r12=cr.itir
495	;;
496	st8 [temp1]=r12,16	// cr.itir
497	st8 [temp2]=r11,16	// cr.iipa
498	mov r12=cr.iim
499	;;
500	st8 [temp1]=r12		// cr.iim
501(p1)	mov r12=IA64_MCA_COLD_BOOT
502(p2)	mov r12=IA64_INIT_WARM_BOOT
503	mov r6=cr.iha
504	add temp1=SOS(OS_STATUS), regs
505	;;
506	st8 [temp2]=r6		// cr.iha
507	add temp2=SOS(CONTEXT), regs
508	st8 [temp1]=r12		// os_status, default is cold boot
509	mov r6=IA64_MCA_SAME_CONTEXT
510	;;
511	st8 [temp2]=r6		// context, default is same context
512
513	// Save the pt_regs data that is not in minstate.  The previous code
514	// left regs at sos.
515	add regs=MCA_PT_REGS_OFFSET-MCA_SOS_OFFSET, regs
516	;;
517	add temp1=PT(B6), regs
518	mov temp3=b6
519	mov temp4=b7
520	add temp2=PT(B7), regs
521	;;
522	st8 [temp1]=temp3,PT(AR_CSD)-PT(B6)		// save b6
523	st8 [temp2]=temp4,PT(AR_SSD)-PT(B7)		// save b7
524	mov temp3=ar.csd
525	mov temp4=ar.ssd
526	cover						// must be last in group
527	;;
528	st8 [temp1]=temp3,PT(AR_UNAT)-PT(AR_CSD)	// save ar.csd
529	st8 [temp2]=temp4,PT(AR_PFS)-PT(AR_SSD)		// save ar.ssd
530	mov temp3=ar.unat
531	mov temp4=ar.pfs
532	;;
533	st8 [temp1]=temp3,PT(AR_RNAT)-PT(AR_UNAT)	// save ar.unat
534	st8 [temp2]=temp4,PT(AR_BSPSTORE)-PT(AR_PFS)	// save ar.pfs
535	mov temp3=ar.rnat
536	mov temp4=ar.bspstore
537	;;
538	st8 [temp1]=temp3,PT(LOADRS)-PT(AR_RNAT)	// save ar.rnat
539	st8 [temp2]=temp4,PT(AR_FPSR)-PT(AR_BSPSTORE)	// save ar.bspstore
540	mov temp3=ar.bsp
541	;;
542	sub temp3=temp3, temp4	// ar.bsp - ar.bspstore
543	mov temp4=ar.fpsr
544	;;
545	shl temp3=temp3,16	// compute ar.rsc to be used for "loadrs"
546	;;
547	st8 [temp1]=temp3,PT(AR_CCV)-PT(LOADRS)		// save loadrs
548	st8 [temp2]=temp4,PT(F6)-PT(AR_FPSR)		// save ar.fpsr
549	mov temp3=ar.ccv
550	;;
551	st8 [temp1]=temp3,PT(F7)-PT(AR_CCV)		// save ar.ccv
552	stf.spill [temp2]=f6,PT(F8)-PT(F6)
553	;;
554	stf.spill [temp1]=f7,PT(F9)-PT(F7)
555	stf.spill [temp2]=f8,PT(F10)-PT(F8)
556	;;
557	stf.spill [temp1]=f9,PT(F11)-PT(F9)
558	stf.spill [temp2]=f10
559	;;
560	stf.spill [temp1]=f11
561
562	// Save the switch_stack data that is not in minstate nor pt_regs.  The
563	// previous code left regs at pt_regs.
564	add regs=MCA_SWITCH_STACK_OFFSET-MCA_PT_REGS_OFFSET, regs
565	;;
566	add temp1=SW(F2), regs
567	add temp2=SW(F3), regs
568	;;
569	stf.spill [temp1]=f2,32
570	stf.spill [temp2]=f3,32
571	;;
572	stf.spill [temp1]=f4,32
573	stf.spill [temp2]=f5,32
574	;;
575	stf.spill [temp1]=f12,32
576	stf.spill [temp2]=f13,32
577	;;
578	stf.spill [temp1]=f14,32
579	stf.spill [temp2]=f15,32
580	;;
581	stf.spill [temp1]=f16,32
582	stf.spill [temp2]=f17,32
583	;;
584	stf.spill [temp1]=f18,32
585	stf.spill [temp2]=f19,32
586	;;
587	stf.spill [temp1]=f20,32
588	stf.spill [temp2]=f21,32
589	;;
590	stf.spill [temp1]=f22,32
591	stf.spill [temp2]=f23,32
592	;;
593	stf.spill [temp1]=f24,32
594	stf.spill [temp2]=f25,32
595	;;
596	stf.spill [temp1]=f26,32
597	stf.spill [temp2]=f27,32
598	;;
599	stf.spill [temp1]=f28,32
600	stf.spill [temp2]=f29,32
601	;;
602	stf.spill [temp1]=f30,SW(B2)-SW(F30)
603	stf.spill [temp2]=f31,SW(B3)-SW(F31)
604	mov temp3=b2
605	mov temp4=b3
606	;;
607	st8 [temp1]=temp3,16	// save b2
608	st8 [temp2]=temp4,16	// save b3
609	mov temp3=b4
610	mov temp4=b5
611	;;
612	st8 [temp1]=temp3,SW(AR_LC)-SW(B4)	// save b4
613	st8 [temp2]=temp4	// save b5
614	mov temp3=ar.lc
615	;;
616	st8 [temp1]=temp3	// save ar.lc
617
618	// cached data.  The C code uses region 6, uncached virtual.  Ensure
619	// that there is no cache data lying around for the first 1K of the
620	// minstate area.
621	// Remove this code in September 2006, that gives platforms a year to
622	// fix their proms and get their customers updated.
623
624	add r1=32*1,r17
625	add r2=32*2,r17
626	add r3=32*3,r17
627	add r4=32*4,r17
628	add r5=32*5,r17
629	add r6=32*6,r17
630	add r7=32*7,r17
631	;;
632	fc r17
633	fc r1
634	fc r2
635	fc r3
636	fc r4
637	fc r5
638	fc r6
639	fc r7
640	add r17=32*8,r17
641	add r1=32*8,r1
642	add r2=32*8,r2
643	add r3=32*8,r3
644	add r4=32*8,r4
645	add r5=32*8,r5
646	add r6=32*8,r6
647	add r7=32*8,r7
648	;;
649	fc r17
650	fc r1
651	fc r2
652	fc r3
653	fc r4
654	fc r5
655	fc r6
656	fc r7
657	add r17=32*8,r17
658	add r1=32*8,r1
659	add r2=32*8,r2
660	add r3=32*8,r3
661	add r4=32*8,r4
662	add r5=32*8,r5
663	add r6=32*8,r6
664	add r7=32*8,r7
665	;;
666	fc r17
667	fc r1
668	fc r2
669	fc r3
670	fc r4
671	fc r5
672	fc r6
673	fc r7
674	add r17=32*8,r17
675	add r1=32*8,r1
676	add r2=32*8,r2
677	add r3=32*8,r3
678	add r4=32*8,r4
679	add r5=32*8,r5
680	add r6=32*8,r6
681	add r7=32*8,r7
682	;;
683	fc r17
684	fc r1
685	fc r2
686	fc r3
687	fc r4
688	fc r5
689	fc r6
690	fc r7
691
692	br.sptk b0
693
694//EndStub//////////////////////////////////////////////////////////////////////
695
696
697//++
698// Name:
699//	ia64_state_restore()
700//
701// Stub Description:
702//
703//	Restore the SAL/OS state.  This is sensitive to the layout of struct
704//	ia64_sal_os_state in mca.h.
705//
706//	r2 contains the return address, r3 contains either
707//	IA64_MCA_CPU_MCA_STACK_OFFSET or IA64_MCA_CPU_INIT_STACK_OFFSET.
708//
709//	In addition to the SAL to OS state, this routine restores all the
710//	registers that appear in struct pt_regs and struct switch_stack,
711//	excluding those in the PAL minstate area.
712//
713//--
714
715ia64_state_restore:
716	// Restore the switch_stack data that is not in minstate nor pt_regs.
717	add regs=MCA_SWITCH_STACK_OFFSET, r3
718	mov b0=r2		// save return address
719	;;
720	GET_IA64_MCA_DATA(temp2)
721	;;
722	add regs=temp2, regs
723	;;
724	add temp1=SW(F2), regs
725	add temp2=SW(F3), regs
726	;;
727	ldf.fill f2=[temp1],32
728	ldf.fill f3=[temp2],32
729	;;
730	ldf.fill f4=[temp1],32
731	ldf.fill f5=[temp2],32
732	;;
733	ldf.fill f12=[temp1],32
734	ldf.fill f13=[temp2],32
735	;;
736	ldf.fill f14=[temp1],32
737	ldf.fill f15=[temp2],32
738	;;
739	ldf.fill f16=[temp1],32
740	ldf.fill f17=[temp2],32
741	;;
742	ldf.fill f18=[temp1],32
743	ldf.fill f19=[temp2],32
744	;;
745	ldf.fill f20=[temp1],32
746	ldf.fill f21=[temp2],32
747	;;
748	ldf.fill f22=[temp1],32
749	ldf.fill f23=[temp2],32
750	;;
751	ldf.fill f24=[temp1],32
752	ldf.fill f25=[temp2],32
753	;;
754	ldf.fill f26=[temp1],32
755	ldf.fill f27=[temp2],32
756	;;
757	ldf.fill f28=[temp1],32
758	ldf.fill f29=[temp2],32
759	;;
760	ldf.fill f30=[temp1],SW(B2)-SW(F30)
761	ldf.fill f31=[temp2],SW(B3)-SW(F31)
762	;;
763	ld8 temp3=[temp1],16	// restore b2
764	ld8 temp4=[temp2],16	// restore b3
765	;;
766	mov b2=temp3
767	mov b3=temp4
768	ld8 temp3=[temp1],SW(AR_LC)-SW(B4)	// restore b4
769	ld8 temp4=[temp2]	// restore b5
770	;;
771	mov b4=temp3
772	mov b5=temp4
773	ld8 temp3=[temp1]	// restore ar.lc
774	;;
775	mov ar.lc=temp3
776
777	// Restore the pt_regs data that is not in minstate.  The previous code
778	// left regs at switch_stack.
779	add regs=MCA_PT_REGS_OFFSET-MCA_SWITCH_STACK_OFFSET, regs
780	;;
781	add temp1=PT(B6), regs
782	add temp2=PT(B7), regs
783	;;
784	ld8 temp3=[temp1],PT(AR_CSD)-PT(B6)		// restore b6
785	ld8 temp4=[temp2],PT(AR_SSD)-PT(B7)		// restore b7
786	;;
787	mov b6=temp3
788	mov b7=temp4
789	ld8 temp3=[temp1],PT(AR_UNAT)-PT(AR_CSD)	// restore ar.csd
790	ld8 temp4=[temp2],PT(AR_PFS)-PT(AR_SSD)		// restore ar.ssd
791	;;
792	mov ar.csd=temp3
793	mov ar.ssd=temp4
794	ld8 temp3=[temp1]				// restore ar.unat
795	add temp1=PT(AR_CCV)-PT(AR_UNAT), temp1
796	ld8 temp4=[temp2],PT(AR_FPSR)-PT(AR_PFS)	// restore ar.pfs
797	;;
798	mov ar.unat=temp3
799	mov ar.pfs=temp4
800	// ar.rnat, ar.bspstore, loadrs are restore in ia64_old_stack.
801	ld8 temp3=[temp1],PT(F6)-PT(AR_CCV)		// restore ar.ccv
802	ld8 temp4=[temp2],PT(F7)-PT(AR_FPSR)		// restore ar.fpsr
803	;;
804	mov ar.ccv=temp3
805	mov ar.fpsr=temp4
806	ldf.fill f6=[temp1],PT(F8)-PT(F6)
807	ldf.fill f7=[temp2],PT(F9)-PT(F7)
808	;;
809	ldf.fill f8=[temp1],PT(F10)-PT(F8)
810	ldf.fill f9=[temp2],PT(F11)-PT(F9)
811	;;
812	ldf.fill f10=[temp1]
813	ldf.fill f11=[temp2]
814
815	// Restore the SAL to OS state. The previous code left regs at pt_regs.
816	add regs=MCA_SOS_OFFSET-MCA_PT_REGS_OFFSET, regs
817	;;
818	add temp1=SOS(SAL_RA), regs
819	add temp2=SOS(SAL_GP), regs
820	;;
821	ld8 r12=[temp1],16	// sal_ra
822	ld8 r9=[temp2],16	// sal_gp
823	;;
824	ld8 r22=[temp1],16	// pal_min_state, virtual
825	ld8 r13=[temp2],16	// prev_IA64_KR_CURRENT
826	;;
827	ld8 r16=[temp1],16	// prev_IA64_KR_CURRENT_STACK
828	ld8 r20=[temp2],16	// prev_task
829	;;
830	ld8 temp3=[temp1],16	// cr.isr
831	ld8 temp4=[temp2],16	// cr.ifa
832	;;
833	mov cr.isr=temp3
834	mov cr.ifa=temp4
835	ld8 temp3=[temp1],16	// cr.itir
836	ld8 temp4=[temp2],16	// cr.iipa
837	;;
838	mov cr.itir=temp3
839	mov cr.iipa=temp4
840	ld8 temp3=[temp1]	// cr.iim
841	ld8 temp4=[temp2]		// cr.iha
842	add temp1=SOS(OS_STATUS), regs
843	add temp2=SOS(CONTEXT), regs
844	;;
845	mov cr.iim=temp3
846	mov cr.iha=temp4
847	dep r22=0,r22,62,1	// pal_min_state, physical, uncached
848	mov IA64_KR(CURRENT)=r13
849	ld8 r8=[temp1]		// os_status
850	ld8 r10=[temp2]		// context
851
852	/* Wire IA64_TR_CURRENT_STACK to the stack that we are resuming to.  To
853	 * avoid any dependencies on the algorithm in ia64_switch_to(), just
854	 * purge any existing CURRENT_STACK mapping and insert the new one.
855	 *
856	 * r16 contains prev_IA64_KR_CURRENT_STACK, r13 contains
857	 * prev_IA64_KR_CURRENT, these values may have been changed by the C
858	 * code.  Do not use r8, r9, r10, r22, they contain values ready for
859	 * the return to SAL.
860	 */
861
862	mov r15=IA64_KR(CURRENT_STACK)		// physical granule mapped by IA64_TR_CURRENT_STACK
863	;;
864	shl r15=r15,IA64_GRANULE_SHIFT
865	;;
866	dep r15=-1,r15,61,3			// virtual granule
867	mov r18=IA64_GRANULE_SHIFT<<2		// for cr.itir.ps
868	;;
869	ptr.d r15,r18
870	;;
871	srlz.d
872
873	extr.u r19=r13,61,3			// r13 = prev_IA64_KR_CURRENT
874	shl r20=r16,IA64_GRANULE_SHIFT		// r16 = prev_IA64_KR_CURRENT_STACK
875	movl r21=PAGE_KERNEL			// page properties
876	;;
877	mov IA64_KR(CURRENT_STACK)=r16
878	cmp.ne p6,p0=RGN_KERNEL,r19		// new stack is in the kernel region?
879	or r21=r20,r21				// construct PA | page properties
880(p6)	br.spnt 1f				// the dreaded cpu 0 idle task in region 5:(
881	;;
882	mov cr.itir=r18
883	mov cr.ifa=r13
884	mov r20=IA64_TR_CURRENT_STACK
885	;;
886	itr.d dtr[r20]=r21
887	;;
888	srlz.d
8891:
890
891	br.sptk b0
892
893//EndStub//////////////////////////////////////////////////////////////////////
894
895
896//++
897// Name:
898//	ia64_new_stack()
899//
900// Stub Description:
901//
902//	Switch to the MCA/INIT stack.
903//
904//	r2 contains the return address, r3 contains either
905//	IA64_MCA_CPU_MCA_STACK_OFFSET or IA64_MCA_CPU_INIT_STACK_OFFSET.
906//
907//	On entry RBS is still on the original stack, this routine switches RBS
908//	to use the MCA/INIT stack.
909//
910//	On entry, sos->pal_min_state is physical, on exit it is virtual.
911//
912//--
913
914ia64_new_stack:
915	add regs=MCA_PT_REGS_OFFSET, r3
916	add temp2=MCA_SOS_OFFSET+SOS(PAL_MIN_STATE), r3
917	mov b0=r2			// save return address
918	GET_IA64_MCA_DATA(temp1)
919	invala
920	;;
921	add temp2=temp2, temp1		// struct ia64_sal_os_state.pal_min_state on MCA or INIT stack
922	add regs=regs, temp1		// struct pt_regs on MCA or INIT stack
923	;;
924	// Address of minstate area provided by PAL is physical, uncacheable.
925	// Convert to Linux virtual address in region 6 for C code.
926	ld8 ms=[temp2]			// pal_min_state, physical
927	;;
928	dep temp1=-1,ms,62,2		// set region 6
929	mov temp3=IA64_RBS_OFFSET-MCA_PT_REGS_OFFSET
930	;;
931	st8 [temp2]=temp1		// pal_min_state, virtual
932
933	add temp4=temp3, regs		// start of bspstore on new stack
934	;;
935	mov ar.bspstore=temp4		// switch RBS to MCA/INIT stack
936	;;
937	flushrs				// must be first in group
938	br.sptk b0
939
940//EndStub//////////////////////////////////////////////////////////////////////
941
942
943//++
944// Name:
945//	ia64_old_stack()
946//
947// Stub Description:
948//
949//	Switch to the old stack.
950//
951//	r2 contains the return address, r3 contains either
952//	IA64_MCA_CPU_MCA_STACK_OFFSET or IA64_MCA_CPU_INIT_STACK_OFFSET.
953//
954//	On entry, pal_min_state is virtual, on exit it is physical.
955//
956//	On entry RBS is on the MCA/INIT stack, this routine switches RBS
957//	back to the previous stack.
958//
959//	The psr is set to all zeroes.  SAL return requires either all zeroes or
960//	just psr.mc set.  Leaving psr.mc off allows INIT to be issued if this
961//	code does not perform correctly.
962//
963//	The dirty registers at the time of the event were flushed to the
964//	MCA/INIT stack in ia64_pt_regs_save().  Restore the dirty registers
965//	before reverting to the previous bspstore.
966//--
967
968ia64_old_stack:
969	add regs=MCA_PT_REGS_OFFSET, r3
970	mov b0=r2			// save return address
971	GET_IA64_MCA_DATA(temp2)
972	LOAD_PHYSICAL(p0,temp1,1f)
973	;;
974	mov cr.ipsr=r0
975	mov cr.ifs=r0
976	mov cr.iip=temp1
977	;;
978	invala
979	rfi
9801:
981
982	add regs=regs, temp2		// struct pt_regs on MCA or INIT stack
983	;;
984	add temp1=PT(LOADRS), regs
985	;;
986	ld8 temp2=[temp1],PT(AR_BSPSTORE)-PT(LOADRS)	// restore loadrs
987	;;
988	ld8 temp3=[temp1],PT(AR_RNAT)-PT(AR_BSPSTORE)	// restore ar.bspstore
989	mov ar.rsc=temp2
990	;;
991	loadrs
992	ld8 temp4=[temp1]		// restore ar.rnat
993	;;
994	mov ar.bspstore=temp3		// back to old stack
995	;;
996	mov ar.rnat=temp4
997	;;
998
999	br.sptk b0
1000
1001//EndStub//////////////////////////////////////////////////////////////////////
1002
1003
1004//++
1005// Name:
1006//	ia64_set_kernel_registers()
1007//
1008// Stub Description:
1009//
1010//	Set the registers that are required by the C code in order to run on an
1011//	MCA/INIT stack.
1012//
1013//	r2 contains the return address, r3 contains either
1014//	IA64_MCA_CPU_MCA_STACK_OFFSET or IA64_MCA_CPU_INIT_STACK_OFFSET.
1015//
1016//--
1017
1018ia64_set_kernel_registers:
1019	add temp3=MCA_SP_OFFSET, r3
1020	mov b0=r2		// save return address
1021	GET_IA64_MCA_DATA(temp1)
1022	;;
1023	add r12=temp1, temp3	// kernel stack pointer on MCA/INIT stack
1024	add r13=temp1, r3	// set current to start of MCA/INIT stack
1025	add r20=temp1, r3	// physical start of MCA/INIT stack
1026	;;
1027	DATA_PA_TO_VA(r12,temp2)
1028	DATA_PA_TO_VA(r13,temp3)
1029	;;
1030	mov IA64_KR(CURRENT)=r13
1031
1032	/* Wire IA64_TR_CURRENT_STACK to the MCA/INIT handler stack.  To avoid
1033	 * any dependencies on the algorithm in ia64_switch_to(), just purge
1034	 * any existing CURRENT_STACK mapping and insert the new one.
1035	 */
1036
1037	mov r16=IA64_KR(CURRENT_STACK)		// physical granule mapped by IA64_TR_CURRENT_STACK
1038	;;
1039	shl r16=r16,IA64_GRANULE_SHIFT
1040	;;
1041	dep r16=-1,r16,61,3			// virtual granule
1042	mov r18=IA64_GRANULE_SHIFT<<2		// for cr.itir.ps
1043	;;
1044	ptr.d r16,r18
1045	;;
1046	srlz.d
1047
1048	shr.u r16=r20,IA64_GRANULE_SHIFT	// r20 = physical start of MCA/INIT stack
1049	movl r21=PAGE_KERNEL			// page properties
1050	;;
1051	mov IA64_KR(CURRENT_STACK)=r16
1052	or r21=r20,r21				// construct PA | page properties
1053	;;
1054	mov cr.itir=r18
1055	mov cr.ifa=r13
1056	mov r20=IA64_TR_CURRENT_STACK
1057
1058	movl r17=FPSR_DEFAULT
1059	;;
1060	mov.m ar.fpsr=r17			// set ar.fpsr to kernel default value
1061	;;
1062	itr.d dtr[r20]=r21
1063	;;
1064	srlz.d
1065
1066	br.sptk b0
1067
1068//EndStub//////////////////////////////////////////////////////////////////////
1069
1070#undef	ms
1071#undef	regs
1072#undef	temp1
1073#undef	temp2
1074#undef	temp3
1075#undef	temp4
1076
1077
1078// Support function for mca.c, it is here to avoid using inline asm.  Given the
1079// address of an rnat slot, if that address is below the current ar.bspstore
1080// then return the contents of that slot, otherwise return the contents of
1081// ar.rnat.
1082GLOBAL_ENTRY(ia64_get_rnat)
1083	alloc r14=ar.pfs,1,0,0,0
1084	mov ar.rsc=0
1085	;;
1086	mov r14=ar.bspstore
1087	;;
1088	cmp.lt p6,p7=in0,r14
1089	;;
1090(p6)	ld8 r8=[in0]
1091(p7)	mov r8=ar.rnat
1092	mov ar.rsc=3
1093	br.ret.sptk.many rp
1094END(ia64_get_rnat)
1095
1096
1097// void ia64_set_psr_mc(void)
1098//
1099// Set psr.mc bit to mask MCA/INIT.
1100GLOBAL_ENTRY(ia64_set_psr_mc)
1101	rsm psr.i | psr.ic		// disable interrupts
1102	;;
1103	srlz.d
1104	;;
1105	mov r14 = psr			// get psr{36:35,31:0}
1106	movl r15 = 1f
1107	;;
1108	dep r14 = -1, r14, PSR_MC, 1	// set psr.mc
1109	;;
1110	dep r14 = -1, r14, PSR_IC, 1	// set psr.ic
1111	;;
1112	dep r14 = -1, r14, PSR_BN, 1	// keep bank1 in use
1113	;;
1114	mov cr.ipsr = r14
1115	mov cr.ifs = r0
1116	mov cr.iip = r15
1117	;;
1118	rfi
11191:
1120	br.ret.sptk.many rp
1121END(ia64_set_psr_mc)
1122