initial commit

2022-10-11 17:54:20 -04:00
commit 63904ea09f
14 changed files with 711 additions and 0 deletions
--- a/src/test/heap.s
+++ b/src/test/heap.s
@@ -0,0 +1,125 @@
+.section .rodata
+
+.word 0f - print_msg
+print_msg:
+    .string "Current heap:"
+0:
+
+.word 0f - dots
+dots:
+    .string "................"
+0:
+
+.word 0f - hexstr
+hexstr:
+    .string "0x"
+0:
+
+
+
+.align 2
+.section .text
+
+.global heap_test
+heap_test:
+    addi    sp, sp, -(3*8)
+    sd      ra, 0(sp)
+    sd      s0, 8(sp)
+    sd      s1, 16(sp)
+
+    # empty heap
+
+    jal     print_heap
+    jal     printnl
+
+    # put stuff on heap
+
+    li      a0, 8*4
+    jal     heap_alloc
+    li      t0, 0x1111111111111111
+    sd      t0, (a0)
+    sd      t0, 8(a0)
+    sd      t0, 24(a0)
+
+    li      s0, 0x0f
+0:
+    bltz    s0, 0f
+
+    li      a0, 8*3
+    jal     heap_alloc
+    sd      s0, (a0)
+    li      t0, 0xf000000000000000
+    add     t0, s0, t0
+    sd      t0, 16(a0)
+
+    addi    s0, s0, -1
+    j       0b
+0:
+
+    li      a0, 8*7
+    jal     heap_alloc
+    li      t0, 0xffff
+    sd      t0, 6*8(a0)
+
+    li      a0, 8*3
+    jal     heap_alloc
+
+    jal     print_heap
+
+    ld      ra, 0(sp)
+    ld      s0, 8(sp)
+    ld      s1, 16(sp)
+    addi    sp, sp, +(3*8)
+    ret
+
+print_heap:
+    addi    sp, sp, -(3*8)
+    sd      ra, 0(sp)
+    sd      s0, 8(sp)
+    sd      s1, 16(sp)
+
+    la      a0, print_msg
+    lw      a1, -4(a0)
+    jal     println
+
+    la      t0, heap_info
+    ld      s0, 0(t0)
+    ld      s1, 16(t0)
+0:
+    la      a0, hexstr
+    lw      a1, -4(a0)
+    jal     print
+    move    a0, s0
+    jal     print_hex
+    jal     print_space
+
+    ld      a0, 0(s0)
+    jal     print_hex
+    jal     print_space
+
+    ld      a0, 8(s0)
+    jal     print_hex
+    jal     print_space
+
+    la      a0, dots
+    lw      a1, -4(a0)
+    jal     print
+    jal     print_space
+
+    ld      t0, 0(s0)
+    andi    t0, t0, ~0b11
+    add     t0, s0, t0
+    ld      a0, -8(t0)
+    move    s0, t0
+    jal     print_hex
+    jal     printnl
+
+    beq     s0, s1, 0f
+    j 0b
+0:
+
+    ld      ra, 0(sp)
+    ld      s0, 8(sp)
+    ld      s1, 16(sp)
+    addi    sp, sp, +(3*8)
+    ret