[L4alpha-cvscommit] CVS: L4Alpha/pal/21264 l4_pal.mar,1.13,1.14

[Daniel P. <dp...@us...>]

Update of /cvsroot/l4alpha/L4Alpha/pal/21264
In directory usw-pr-cvs1:/tmp/cvs-serv32332/pal/21264

Modified Files:
	l4_pal.mar 
Log Message:
(Finally) added support for read-only pages.

Tested on 21264 only. 
WARNING: The 21064 and 21164 updates will come in a later commit.


Index: l4_pal.mar
===================================================================
RCS file: /cvsroot/l4alpha/L4Alpha/pal/21264/l4_pal.mar,v
retrieving revision 1.13
retrieving revision 1.14
diff -C2 -d -r1.13 -r1.14
*** l4_pal.mar	7 Feb 2002 07:30:08 -0000	1.13
--- l4_pal.mar	10 Feb 2002 12:37:58 -0000	1.14
***************
*** 127,130 ****
--- 127,145 ----
  
  
+ .macro pf_stack
+        ; WHY?
+        GET_32CONS    AT, ^x12345678, zero
+        push    p_AT
+        bis     zero, zero, AT
+ .endm
+ 
+ 	
+ 
+ .macro pf_restack
+ 	addq    sp, #8, sp
+ .endm
+ 
+ 	
+ 
  ;
  ; EV6 shadow register usage 
***************
*** 748,759 ****
  
  trap__dfault_no_dismiss:
  
! 	hw_mfpr	pp1, EV6__VA				; (4-7,1L) get va
  
! 	open_frame pp7
! 	debug
  
- 	; FIXME - needs to be implemented..
- 	br	zero, pal_halt_cont
  
  ;+
--- 763,787 ----
  
  trap__dfault_no_dismiss:
+ 	hw_mfpr	pp3, EV6__VA				; (4-7,1L) get va
  
! 	fast_open_frame pp7
  
! 	; User permissions or something is astray for this page,
! 	; lets call the right handler.
! 
! 	push   p_pp0!p_pp1 	; OPTIMISATION:	needed here? (same as dtb_protection_fault)
! 	push	p_a0!p_a1!p_a2!p_AT!p_gp
! 
! 	; Lets flush it here, so we don't need to later
! 	xtb_flush_entry pp3, a0	; warning, watch out for violations (we should stall)
! 		
! 	ldq_a	a1, ^x38(sp)    ; exception address
! 
! 	mov	pp3, a0		; faulting address
! 	mov	pp5, a2		; mm_stat
! 
! 	pf_stack
! 	kernel	l4_dtb_protection_fault
  
  
  ;+
***************
*** 1704,1707 ****
--- 1732,1756 ----
  	END_CALL_PAL
  	
+ ;+------------------------------------------------------------------------------
+ ;  FUNCTION [pal 0x??]: l4_profiling
+ ;	Turns syscall profiling on/off
+ ; 
+ ;  MODE: U
+ ; 
+ ;  INPUT PARAMETERS:
+ ;       a0: phys address of area to start writing profile data.
+ ; 
+ ;  OUTPUT PARAMTERES:
+ ;	
+ ;  
+ ;  SIDE EFFECTS
+ ;-	
+ .if df profiling_enabled
+ 	START_CALL_PAL	<PROFILE>
+ 	stq_p	a0, PROFILE_OFFSET(zero)		
+ 	hw_ret	(pp7)
+ 	END_CALL_PAL
+ .endc
+ 
  	END_FREE_CODE
  
***************
*** 1869,1886 ****
  	syshalt ^xdead
  	;; FIXME
- 
- 
- .macro pf_stack
-        ; WHY?
-        GET_32CONS    AT, ^x12345678, zero
-        push    p_AT
-        bis     zero, zero, AT
- .endm
- 
- 	
- 
- .macro pf_restack
- 	addq    sp, #8, sp
- .endm
  
  
--- 1918,1921 ----