mirror of
https://github.com/autc04/Retro68.git
synced 2024-12-27 07:31:35 +00:00
145 lines
3.4 KiB
ArmAsm
145 lines
3.4 KiB
ArmAsm
; crt0_2.s - Startup code for the mrisc1. This code initializes the C
|
|
; run-time model.
|
|
;
|
|
; 12Nov01 (DJK) - The return code from main was not being passed to exit().
|
|
; Now it is passed as a parameter in R1.
|
|
;
|
|
; 10Sep01 (DJK) - The function exit() does not return. However, in the
|
|
; the case of device error (if the halt bit does not
|
|
; function properly, for instance), then a catch loop
|
|
; has been added.
|
|
;
|
|
;
|
|
; Copyright 2001, 2002, 2003, 2004 Morpho Technologies, Inc.
|
|
;
|
|
|
|
; Create a label for the start of the eh_frame section.
|
|
.section .eh_frame
|
|
__eh_frame_begin:
|
|
|
|
.equ HALT_REG, 0x300
|
|
.section .text
|
|
.global _start
|
|
_start:
|
|
;; Initialize the stack pointer
|
|
ldui sp, #%hi16(__stack)
|
|
addui sp, sp, #%lo16(__stack)
|
|
or fp, sp, sp
|
|
|
|
;; Copy data from ROM to Frame Buffer (on-chip memory)
|
|
ldui r9, #%hi16(_fbdata_start)
|
|
ori r9, r9, #%lo16(_fbdata_start)
|
|
ldui r10, #%hi16(_fbdata_end)
|
|
ori r10, r10, #%lo16(_fbdata_end)
|
|
ldui r11, #%hi16(__FRAME_BUFFER_START)
|
|
brle r10, r9, .Lnext1
|
|
ori r11, r11, #%lo16(__FRAME_BUFFER_START)
|
|
.Lcpy0:
|
|
ldw r5, r9, #$0
|
|
addi r9, r9, #$4
|
|
stw r5, r11, #$0
|
|
brlt r9, r10, .Lcpy0
|
|
addi r11, r11, #$4
|
|
|
|
.Lnext1:
|
|
;; Copy data from ROM to External Memory (off-chip memory)
|
|
ldui r9, #%hi16(_extdata_start)
|
|
ori r9, r9, #%lo16(_extdata_start)
|
|
ldui r10, #%hi16(_extdata_end)
|
|
ori r10, r10, #%lo16(_extdata_end)
|
|
ldui r11, #%hi16(__EXTERNAL_MEMORY_START)
|
|
brle r10, r9, .Lnext2
|
|
ori r11, r11, #%lo16(__EXTERNAL_MEMORY_START)
|
|
.Lcpy1:
|
|
ldw r5, r9, #$0
|
|
addi r9, r9, #$4
|
|
stw r5, r11, #$0
|
|
brlt r9, r10, .Lcpy1
|
|
addi r11, r11, #$4
|
|
|
|
|
|
.Lnext2:
|
|
;; Zero the bss space
|
|
ldui r9, #%hi16(__bss_start)
|
|
addui r9, r9, #%lo16(__bss_start)
|
|
ldui r10, #%hi16(__bss_end)
|
|
addui r10, r10, #%lo16(__bss_end)
|
|
or r0, r0, r0
|
|
brle r10, r9, .Lnext3
|
|
or r0, r0, r0
|
|
.Lcpy2:
|
|
stw r0, r9, #0
|
|
addi r9, r9, #4
|
|
or r0, r0, r0 ; nop
|
|
brle r9, r10, .Lcpy2
|
|
or r0, r0, r0 ; nop
|
|
|
|
.Lnext3:
|
|
;; Zero the external memory bss section
|
|
ldui r9, #%hi16(_extbss_start)
|
|
ori r9, r9, #%lo16(_extbss_start)
|
|
ldui r10, #%hi16(_extbss_end)
|
|
ori r10, r10, #%lo16(_extbss_end)
|
|
or r0, r0, r0
|
|
brle r10, r9, .Lnext4
|
|
or r0, r0, r0
|
|
.Lcpy3:
|
|
stw r0, r9, #$0
|
|
addi r9, r9, #$4
|
|
or r0, r0, r0
|
|
brle r9, r10, .Lcpy3
|
|
or r0, r0, r0
|
|
|
|
.Lnext4:
|
|
;; Call global and static constructors
|
|
ldui r10, #%hi16(_init)
|
|
ori r10, r10, #%lo16(_init)
|
|
or r0, r0, r0 ; nop
|
|
jal r14, r10
|
|
or r0, r0, r0 ; nop
|
|
|
|
;; Setup destructors to be called from exit.
|
|
;; (Just in case main never returns....)
|
|
ldui r10, #%hi16(atexit)
|
|
ori r10, r10, #%lo16(atexit)
|
|
ldui r1, #%hi16(_fini)
|
|
ori r1, r1, #%lo16(_fini)
|
|
or r0, r0, r0 ; nop
|
|
jal r14, r10
|
|
or r0, r0, r0 ; nop
|
|
|
|
;; Initialise argc, argv and envp to empty
|
|
addi r1, r0, #0
|
|
addi r2, r0, #0
|
|
addi r3, r0, #0
|
|
|
|
;; Call main
|
|
ldui r10, #%hi16(main)
|
|
ori r10, r10, #%lo16(main)
|
|
or r0, r0, r0 ; nop
|
|
jal r14, r10
|
|
or r0, r0, r0 ; nop
|
|
|
|
;; DJK - Added 12Nov01. Pass main's return value to exit.
|
|
or r1, r11, r0
|
|
|
|
;; Jump to exit
|
|
ldui r10, #%hi16(exit)
|
|
ori r10, r10, #%lo16(exit)
|
|
or r0, r0, r0 ; nop
|
|
jal r14, r10
|
|
or r0, r0, r0 ; nop
|
|
|
|
;; Exit does not return, however, this code is to catch an
|
|
;; error if it does. Set the processor into sleep mode.
|
|
ori r1, r0, #$1
|
|
stw r1, r0, #HALT_REG
|
|
or r0, r0, r0
|
|
or r0, r0, r0
|
|
or r0, r0, r0
|
|
or r0, r0, r0
|
|
or r0, r0, r0
|
|
.Lend:
|
|
jmp .Lend
|
|
or r0, r0, r0
|