kmx git

\ ========== Copyright Header Begin ==========================================
\ 
\ Hypervisor Software File: reset.fth
\ 
\ Copyright (c) 2006 Sun Microsystems, Inc. All Rights Reserved.
\ 
\  - Do no alter or remove copyright notices
\ 
\  - Redistribution and use of this software in source and binary forms, with 
\    or without modification, are permitted provided that the following 
\    conditions are met: 
\ 
\  - Redistribution of source code must retain the above copyright notice, 
\    this list of conditions and the following disclaimer.
\ 
\  - Redistribution in binary form must reproduce the above copyright notice,
\    this list of conditions and the following disclaimer in the
\    documentation and/or other materials provided with the distribution. 
\ 
\    Neither the name of Sun Microsystems, Inc. or the names of contributors 
\ may be used to endorse or promote products derived from this software 
\ without specific prior written permission. 
\ 
\     This software is provided "AS IS," without a warranty of any kind. 
\ ALL EXPRESS OR IMPLIED CONDITIONS, REPRESENTATIONS AND WARRANTIES, 
\ INCLUDING ANY IMPLIED WARRANTY OF MERCHANTABILITY, FITNESS FOR A 
\ PARTICULAR PURPOSE OR NON-INFRINGEMENT, ARE HEREBY EXCLUDED. SUN 
\ MICROSYSTEMS, INC. ("SUN") AND ITS LICENSORS SHALL NOT BE LIABLE FOR 
\ ANY DAMAGES SUFFERED BY LICENSEE AS A RESULT OF USING, MODIFYING OR 
\ DISTRIBUTING THIS SOFTWARE OR ITS DERIVATIVES. IN NO EVENT WILL SUN 
\ OR ITS LICENSORS BE LIABLE FOR ANY LOST REVENUE, PROFIT OR DATA, OR 
\ FOR DIRECT, INDIRECT, SPECIAL, CONSEQUENTIAL, INCIDENTAL OR PUNITIVE 
\ DAMAGES, HOWEVER CAUSED AND REGARDLESS OF THE THEORY OF LIABILITY, 
\ ARISING OUT OF THE USE OF OR INABILITY TO USE THIS SOFTWARE, EVEN IF 
\ SUN HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
\ 
\ You acknowledge that this software is not designed, licensed or
\ intended for use in the design, construction, operation or maintenance of
\ any nuclear facility. 
\ 
\ ========== Copyright Header End ============================================
id: @(#)reset.fth 1.2 06/02/28
purpose:
copyright: Copyright 2006 Sun Microsystems, Inc.  All Rights Reserved
copyright: Use is subject to license terms.

\ [define] verify-dropin-copy?
\ [define] dropin-checksum?

resident headerless

h# 4f.42.4d.44  constant  dropin-magic

1               constant  core-api-group
1               constant  current-major-version
0               constant  current-minor-version

fload ${BP}/arch/sun4s/reset/common.fth
fload ${BP}/arch/sun/auto-field.fth

: save-binary
   new-file
   obj-base  obj-size ofd @  fputs
   ofd @ fclose
;

begin-obj

label reset-vector
   resident-assembler

   nop nop nop nop
   nop nop nop nop

   0 F: always brif annul nop
   nop nop nop nop nop nop

   1 F: always brif annul nop
   nop nop nop nop nop nop

   2 F: always brif annul nop
   nop nop nop nop nop nop

   3 F: always brif annul nop
   nop nop nop nop nop nop

   4 F: always brif annul nop
   nop nop nop nop nop nop

   5 F: always brif annul nop
   nop nop nop nop nop nop

end-code

label sccs-string  sccs-id cscount ", align  end-code

label boot-name$ " bootprom" bounds do i c@ c, loop 0 c, end-code
label obp-name$  " OBP" bounds do i c@ c, loop 0 c, end-code

fload ${BP}/cpu/sparc/ultra4v/tlbasm.fth
fload ${BP}/arch/sun4v/niagara/tlbsetup.fth
fload ${BP}/arch/sun4v/savestate.fth
fload ${BP}/arch/sun4v/error-reset.fth
fload ${BP}/arch/sun4v/diagprint.fth
fload ${BP}/pkg/dropins/sparc/find-dropin.fth
fload ${BP}/arch/sun/reset-dropin.fth

label power-on-reset
   %i0			%g1	move		\ membase
   %i1			%g2	move		\ memsize
   %i2			%g3	move		\ pd base
   %g0  h# f			wrpil
   %g0  4			wrpstate
   %g0  0			wrtba
   %g0  7			wrcleanwin
   %g0  0			wrotherwin
   %g0  0			wrwstate
   %g0  0			wrcanrestore
   %g0  6			wrcansave
   %g0  0			wrcwp
   %g1			%i0	move		\ restore %i's
   %g2			%i1	move
   %g3			%i2	move
   %g0  0			wrtl		\ TL = 0
   %g0  0                       wrgl
  
   \ At start up, all hypervisor API calls are disabled.  Any calls
   \ we need must be enabled with appropriate calls to
   \ API_SET_VERSION.
   core-api-group        %o0    set             \ core API group
   current-major-version %o1    set             \ current major version
   current-minor-version %o2    set             \ current minor version
   %g0  0               %o5     add             \ api_set_version function
   %g0  h# 7f  always           htrapif
                                nop
 
   %i0			%o0	move
   setup-i/d-tlbs		call
   %i1			%o1	move

   \ DTLB: 0 -> membase + 8M
   %g0			%o0	move
   8meg			%o1	set
   %i0  %o1		%o1	add
   %g0  3		%o2	add
   setup-dtlb-entry		call
   %g0  0		%o3	add

   \ ITLB: 0 -> membase + 8M
   %g0			%o0	move
   8meg			%o1	set
   %i0  %o1		%o1	add
   %g0  3		%o2	add
   setup-itlb-entry		call
   %g0  0		%o3	add

   %g0  1		%o0	add
   %g0  h# 27		%o5	add		\ MMU_ENABLE
   %g4				rdpc
   %g4  h# 10 		%o1	add
   %g0  0  always		htrapif
				nop

   \ bclear the first 512KB of memory (@0)
   1meg 2/		%l4	set		\ 512Kb
   8meg			%l3	set
   %i0  %l3		%l3	add		\ offset
   %g0  h# 31		%o5	add		\ mem_scrub
   begin
     %l4		%o1	move		\ Len
     %l3		%o0	move		\ RA
     %g0  0		always	htrapif
     %o0  7		%g0	subcc		\ error?
     0<> if
        %g0  %g0	%g0	subcc		\ BAIL!
	%l3  %o1	%l3	add		\ dump RA
	%l4  %o1	%l4	subcc
     then
   0<= until
     %g0  h# 31		%o5	add		\ (mem scrub) delay

   obp-name$  obj-base -
		%o1	%o0	setx
   %i0  %o0		%o0	add
   %i0			%o1	move
   %g0  h# 20		%o2	add
   %g0  %g0		%o3	add
   find&copy-dropin		call
   %g0	1		%o4	add

   %o0  h# 20		%i7	add

h# 10 .align

   here obj-base - h# 20 +  scr set
   scr		%g0	%g0	jmpl
   nop		nop	nop	nop
   nop		nop	nop	nop
   nop		nop

   boot-name$ obj-base -
		%o1	%o0  setx
   %i0  %o0		%o0	add
   %i0			%o1	move
   ROMbase		%o2	set
   %i7  %g0		%o3	add
   find&copy-dropin		call
   %g0	1		%o4	add

   ROMbase		%o0	set
   %o0 h# 30		%g0	jmpl  nop

   begin again nop

h# 20 .align

0 L:				\ Power On Reset        0x20
   power-on-reset always brif annul nop
1 L:                            \ Watchdog Reset        0x40

   save-reset-state             call  nop

   %g0  2               %o1     add     \ error code
   %o1  %o0 offset-of last-trap#  %asi  stxa    \ last-trap = error-reset-trap
   %o1  %o0 offset-of error-reset-trap %asi stxa

   error-reset-recovery         call  nop

   ROMbase           %o0     set
   %o0 h# 40         %g0     jmpl  nop

   begin again nop
2 L:                            \ XIR                   0x60

   save-reset-state             call  nop

   %g0  3               %o1     add     \ error code
   %o1  %o0 offset-of last-trap#  %asi  stxa    \ last-trap = error-reset-trap
   %o1  %o0 offset-of error-reset-trap %asi stxa

   error-reset-recovery		call  nop

   ROMbase           %o0     set
   %o0 h# 60         %g0     jmpl  nop

   begin again nop
3 L:                            \ SIR                   0x80

   save-reset-state             call  nop
   %g0  4               %o1     add     \ error code
   %o1  %o0 offset-of last-trap#  %asi  stxa    \ last-trap = error-reset-trap
   %o1  %o0 offset-of error-reset-trap %asi stxa

   error-reset-recovery         call  nop

   ROMbase           %o0     set
   %o0 h# 80         %g0     jmpl  nop

   begin again nop
4 L:                            \ RED                   0xa0

   save-reset-state             call  nop
   %g0  5               %o1     add     \ error code
   %o1  %o0 offset-of last-trap#  %asi  stxa    \ last-trap = error-reset-trap
   %o1  %o0 offset-of error-reset-trap %asi stxa

   error-reset-recovery         call  nop

   ROMbase           %o0     set
   %o0 h# 80         %g0     jmpl  nop

   begin again nop
5 L:
   begin again nop
   -1 ,

end-code
end-obj

" reset-vector"		" reset" 	$export-procedure

fload ${BP}/arch/sun/reset-cleanup.fth
openbios/openboot/obp/arch/sun4v/niagara/reset.fth

Commit

obp/arch/sun4v/niagara/reset.fth
