kernel/src/holeybytes/ecah.rs

@@ -177,7 +177,9 @@ pub fn handler(vm: &mut Vm) {
                 unsafe fn x86_out(address: u16, value: u32) {
                     x86_64::instructions::port::Port::new(address).write(value);
                 }
-                vm.registers[3] = hbvm::value::Value(unsafe { x86_in(r2 as u16) } as u64);
+                let x = hbvm::value::Value(unsafe { x86_in(r2 as u16) } as u64);
+                info!("Read {:?} from Port {:?}", x, r2);
+                vm.registers[3] = x
             }
         }
         // 5

sysdata/libraries/stn/src/string.hb

@@ -6,3 +6,46 @@ length := fn(ptr: ^u8): int {
 	}
     return len;
 }
+
+display_int := fn(num: int, p: ^u8): ^u8 {
+    i := 0;
+    if num == 0 {
+        set(p, 48);
+        return p;
+    }
+    loop {
+        if num == 0 break;
+        set(p + i, num % 10 + 48);
+        num /= 10;
+        i += 1;
+    }
+    reverse(p);
+    //null terminate
+    set(p + i, 0);
+    return p;
+}
+
+reverse := fn(s: ^u8): void {
+    //reverse a string, don't remove digits
+    len := 0;
+    loop {
+        if *(s + len) == 0 break;
+        len += 1;
+    }
+    i := 0;
+    j := len - 1;
+    loop {
+        if i >= j break;
+        temp := *(s + i);
+        *(s + i) = *(s + j);
+        *(s + j) = temp;
+        i += 1;
+        j -= 1;
+    }
+    return;
+}
+
+set := fn(change: ^int, new: int): void {
+    *(change) = new;
+    return;
+}

sysdata/programs/time_driver/meta.toml

@@ -0,0 +1,11 @@
+[package]
+name = "time_driver"
+authors = ["SamBuckley"]
+
+[dependants.libraries]
+
+[dependants.binaries]
+hblang.version = "1.0.0"
+
+[build]
+command = "hblang src/main.hb"

sysdata/programs/time_driver/src/main.hb

@@ -0,0 +1,21 @@
+stn := @use("../../../libraries/stn/src/lib.hb");
+log := stn.log;
+mem := stn.memory;
+s := stn.string;
+page := 0
+
+main := fn(): void {
+    page += mem.request_page(1);
+    port_str := "\0\{47}\0";
+    a := @eca(u8, 3, 3, port_str, 2);
+    
+    n := 5000000;
+    loop {
+        if n == 0 break;
+        n -= 1;
+        stack_reclamation_edge_case := 0;
+    }
+    td := s.display_int(a, page);
+    log.debug(td);
+    return;
+}

sysdata/system_config.toml

@@ -26,3 +26,6 @@ path = "boot:///tests.hbf"
 
 [boot.limine.ableos.modules.fb_driver]
 path = "boot:///fb_driver.hbf"
+
+[boot.limine.ableos.modules.time_driver]
+path = "boot:///time_driver.hbf"