3 files changed, 31 insertions, 24 deletions

diff --git a/sw/z80/kernel/boot_loader.c b/sw/z80/kernel/boot_loader.c
index ddca4f9..03a52b5 100644
--- a/sw/z80/kernel/boot_loader.c
+++ b/sw/z80/kernel/boot_loader.c
@@ -1,5 +1,6 @@
 #include "boot.h"
 #include "progman.h"
+#include "string.h"
 
 #define DEFAULT_EXEC_STATUS 0x4000
 
@@ -14,30 +15,10 @@ void boot_init() {
 
 int8_t authenticate(const char *pwd) {
 
-    const char *c_pwd = PWD_ADDR, *c_req = pwd;
-    
-    for (uint8_t i = 0; i < PWD_SIZE; i++) {
-
-        if (*c_pwd != *c_req)
-            return 0;
-
-        c_pwd++;
-        c_req++;
-    }
-
-    return 1;
+    return !memcmp(PWD_ADDR, pwd, PWD_SIZE);
 }
 
 void set_pwd(const char *pwd) {
 
-    char *c_pwd = PWD_ADDR;
-    const char *c_req = pwd;
-
-    for (uint8_t i = 0; i < PWD_SIZE; i++) {
-
-        *c_pwd = *c_req;
-
-        c_pwd++;
-        c_req++;
-    }
+    memcpy(PWD_ADDR, pwd, PWD_SIZE);
 }
\ No newline at end of file
diff --git a/sw/z80/kernel/include/progman.h b/sw/z80/kernel/include/progman.h
index 0f56bb3..5d01f1c 100644
--- a/sw/z80/kernel/include/progman.h
+++ b/sw/z80/kernel/include/progman.h
@@ -51,7 +51,6 @@ struct program_base {
     size_t inst_size;   // size of the instructions set
     void * bss_data;    // pointer to the bss/data space
     size_t data_size;   // size of the bss/data space
-    size_t stack_size;  // size of the stack to determine the stack limit
 };
 
 void prog_alloc(int8_t id, struct program_info *info, const struct program_base *base);
diff --git a/sw/z80/kernel/programs.c b/sw/z80/kernel/programs.c
index 0f75887..705ea96 100644
--- a/sw/z80/kernel/programs.c
+++ b/sw/z80/kernel/programs.c
@@ -1,4 +1,5 @@
 #include "progman.h"
+#include "string.h"
 
 #define EMPTY_PROG_INFO 0x0
 
@@ -37,9 +38,35 @@ int8_t prog_req(struct program_info *info) {
 
 void prog_alloc(int8_t id, struct program_info *info, const struct program_base *base) {
 
-    // TODO, implements program allocation
+    void *addr = (id ? PROG_1_PREFIX : PROG_0_PREFIX) + PROG_VSTART;
+
+    if (info->enabled) {
+
+        if (id)
+            prog_1_fquit(); // force quit operation
+        else
+            prog_0_fquit();
+    }
+        
+
+    memcpy(addr, base->inst_set, base->inst_size);
+
+    addr += base->inst_size;
+
+    memcpy(addr, base->bss_data, base->data_size);
+
+    addr += base->data_size;
+
+    // TODO, empty heap and stack
 }
 
+/*
+*   TODO Called from the assembly, system calls
+*/
+
+extern void exec_0(void);
+extern void exec_1(void);
+
 void prog_exec(int8_t id, struct program_info *info) {
 
     // TODO, perform a program counter jump