xenia/fox32os
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Add '%' debug prefix to shell

Browse Source
This commit is contained in:
mebibytedraco 2023-12-24 20:43:47 -05:00
parent 956c527391
commit 460166b746
1 changed files with 42 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
applications/sh/launch.asm
View File

@ -15,13 +15,24 @@ launch_fxf:
call copy_memory_bytes
pop r0
launch_fxf_check_suspend_prefix:
; if the name was prefixed with a '*' character then
; clear a flag to have the shell return control immediately
cmp.8 [r0], '*'
ifnz mov.8 [launch_fxf_yield_should_suspend], 1
ifnz jmp launch_fxf_no_prefix
ifnz jmp launch_fxf_check_debug_prefix
inc r0
mov.8 [launch_fxf_yield_should_suspend], 0
jmp launch_fxf_no_prefix
launch_fxf_check_debug_prefix:
; if the name was prefixed with a '%' character then
; set a flag to cause a breakpoint at the beginning of the
; program
cmp.8 [r0], '%'
ifnz mov.8 [launch_fxf_debug_mode], 0
ifnz jmp launch_fxf_no_prefix
inc r0
mov.8 [launch_fxf_debug_mode], 1
launch_fxf_no_prefix:
; copy the name into the launch_fxf_name buffer
mov r1, launch_fxf_name
@ -66,6 +77,9 @@ launch_fxf_name_loop_done:
; push the argument pointers and terminal stream struct pointer to the task's stack
call shell_parse_arguments
mov r4, rsp
; disable interrupts, because if an interrupt tried to use the stack
; during this then that probably wouldn't end well
icl
mov rsp, [launch_fxf_stack_ptr]
add rsp, 65536 ; point to the end of the stack (stack grows down!!)
push r3
@ -73,13 +87,28 @@ launch_fxf_name_loop_done:
push r1
push r0
push [shell_stream_struct_ptr]
sub rsp, 65516
mov [launch_fxf_stack_ptr], rsp
; if we are in debug mode, push interrupt return info onto the stack
cmp.8 [launch_fxf_debug_mode], 0
ifz jmp launch_fxf_skip_push_reti_info
push 0 ; return address, will be filled in once we have start address
mov r1, rsp ; save address of return address to fill in later
push.8 0x04 ; enable interrupts upon return
push 0 ; don't care about exception parameter
launch_fxf_skip_push_reti_info:
mov rsp, r4
ise
; relocate the binary
mov r0, [launch_fxf_binary_ptr]
call parse_fxf_binary
; if we are in debug mode, fill in the return adress with the relocation
; address of the loaded binary
cmp.8 [launch_fxf_debug_mode], 0
ifz jmp launch_fxf_skip_fill_reti_addr
mov [r1], r0
; set initial ip to launch_fxf_debug_start
mov r0, launch_fxf_debug_start
launch_fxf_skip_fill_reti_addr:
; create a new task
mov r1, r0
@ -87,6 +116,9 @@ launch_fxf_name_loop_done:
mov.8 [launch_fxf_task_id], r0
mov r2, [launch_fxf_stack_ptr]
add r2, 65516 ; point to the end of the stack (stack grows down!!)
; if we are in debug mode, there are 9 extra bytes on top of the stack
cmp.8 [launch_fxf_debug_mode], 0
ifnz sub r2, 9
mov r3, [launch_fxf_binary_ptr]
mov r4, [launch_fxf_stack_ptr]
call new_task
@ -108,6 +140,12 @@ allocate_error:
call print_str_to_terminal
ret
; entry point for a program started in debug mode
launch_fxf_debug_start:
icl
; jump indirect through system exception vector
jmp [0x00000410]
launch_fxf_name: data.str " fxf"
launch_fxf_spaces: data.str " "
launch_fxf_struct: data.fill 0, 32
@ -116,5 +154,6 @@ launch_fxf_binary_ptr: data.32 0
launch_fxf_stack_ptr: data.32 0
launch_fxf_yield_should_suspend: data.8 0
launch_fxf_debug_mode: data.8 0
out_of_memory_string: data.str "failed to allocate for new task!" data.8 10 data.8 0