starting on repl
[sped.git] / sped.asm
index d0a634b..1e20038 100644 (file)
--- a/sped.asm
+++ b/sped.asm
@@ -1,12 +1,12 @@
 ; sped - the stupidly pointless editor
 ; written by pinosaur
 
+%include "fileutils.S"
+
 global main
 extern printf
-extern malloc
-extern realloc
-extern free
-extern memset
+extern fflush
+extern stdout
 
 ; macros
 %macro write_str 2
@@ -19,12 +19,15 @@ extern memset
 
 section .data
     banner_str db `SPED - the stupidly pointless editor\n`, 0x00
-    readfile_str db `reading file %s\n`, 0x00
     nofile_str db `no file provided\n`, 0x00
-    argcount_str db `there are %d args\n`, 0x00
-    wrongfile_str db `unable to open file, error code: %i\n`, 0x00
-    char_str db `read this char: %i\n`, 0x00
-    printfint_str db `int: %i\n`, 0x00
+    prompt_str db `sped > `, 0x00
+    invalidcommand_str db `invalid command\n`, 0x00
+    charcount_str db `read %i chars\n`, 0x00
+
+section .bss
+    buffer resb 4
+    buffer_lines resb 4
+    cur_line resb 4
 
 section .text
 main:
@@ -47,13 +50,16 @@ main:
 
     _main_existing:
     mov ebx, DWORD [ebp+_ARGV]
-    add ebx, 4
+    add ebx, 4 ; first user arg is filename
     push DWORD [ebx]
-    ; push readfile_str
-    ; call printf
-
     call readFile
 
+    mov [buffer], eax
+    mov [buffer_lines], ebx
+    mov DWORD [cur_line], 0x00
+
+    call repl
+
     mov eax, 0
     jmp _main_exit
 
@@ -65,142 +71,59 @@ main:
     pop ebp
     ret
 
+; prompt for user
+; no args - reads from globals
+repl:
 
-; reads file line by line
-; args: filename
-; return:
-;    eax - pointer to mem
-;    ecx - lines read
-readFile:
-    %define _FILE_NAME 8
-    %define FILE_HANDLE 4
+    %define CMDSTR 4 ; the previous line read from user
 
     push ebp
     mov ebp, esp
-    
-    ; allocate vars
-    sub esp, 4
-    mov DWORD [ebp-FILE_HANDLE], 0x00
 
-    ; open existing file
-    mov eax, 5
-    mov ebx, [ebp+_FILE_NAME]
-    mov ecx, 0
-    mov edx, 0777
-    int 0x80
-    mov [ebp-FILE_HANDLE], eax
-
-    ; check if file was open successfully
-    cmp eax, 0
-    jge _readFile_noerror
-    push eax
-    push wrongfile_str
-    call printf
-    jmp _readFile_exit
-
-    _readFile_noerror:
-    push DWORD [ebp-FILE_HANDLE]
-    call readLine 
+    sub esp, 4
 
-    push eax
+    _repl_loop:
+    
+    ; print the prompt
+    push prompt_str
     call printf
+    push DWORD [stdout]
+    call fflush
 
-    jmp _readFile_exit
+    ; read line from stdin
+    push 0
+    call readLine
 
-    _readFile_exit:
-    ; close file
-    mov eax, 6
-    mov ebx, [ebp-FILE_HANDLE]
-    int 0x80
+    mov DWORD [ebp-CMDSTR], eax
 
-    %undef _FILE_NAME
-    %undef FILE_HANDLE
+    ; commands are single char for now
+    cmp ecx, 1 
+    jne _repl_invalid
 
-    mov esp, ebp
-    pop ebp
-    ret
+    ; parse commands
+    mov eax, DWORD [ebp-CMDSTR]
+    mov eax, [eax]
 
+    ; q exists program
+    mov eax, DWORD [ebp-CMDSTR]
+    cmp BYTE [eax], 'q'
+    jne _repl_cmd_quit_end
+    jmp _repl_exit
+    _repl_cmd_quit_end:
 
-; reads a line until newline character is reached
-; args: file_handle
-; return:
-;   eax: location to buffer
-;   ebx: contains eof
-readLine:
-    %define _FILE_HANDLE 8
-    %define CHAR_COUNT   4   ; count number of characters read
-    %define BLOCK_COUNT  8   ; number of 64 blocks we've read
-    %define STR_PTR      12  ; malloced buffer to store read string
 
-    push ebp
-    mov ebp, esp
-    
-    ; allocate vars
-    sub esp, 8
-    mov DWORD [ebp-CHAR_COUNT], 0x00
-    mov DWORD [ebp-BLOCK_COUNT], 0x00
-
-    push 64
-    call malloc
-    mov [ebp-STR_PTR], eax
-
-    push DWORD [ebp-STR_PTR]
-    push 0x00
-    push 64
-
-    _readLine_loop:
-    ; if buffer is full
-    cmp BYTE [ebp-CHAR_COUNT], 63 ; leave one byte for null byte
-    jne _readLine_notfull
-    jmp _readLine_exit
-
-    _readLine_notfull:
-    ; read a single character
-    mov eax, 3
-    mov ebx, [ebp+_FILE_HANDLE]
-    mov ecx, [ebp-STR_PTR]
-    add ecx, [ebp-CHAR_COUNT]
-    mov edx, 1
-    int 0x80
+    _repl_invalid:
+    push invalidcommand_str
+    call printf
 
-    ; mov eax, 4
-    ; mov ebx, 1
-    ; mov ecx, [ebp-STR_PTR]
-    ; add ecx, [ebp-CHAR_COUNT]
-    ; mov edx, 1
-    ; int 0x80
-
-    ; check for newline
-    mov eax, [ebp-STR_PTR]
-    add eax, [ebp-CHAR_COUNT]
-    cmp DWORD [eax], 0x0a
-    jne _readLine_not_newline
-    mov ebx, 0
-    jmp _readLine_exit
-    _readLine_not_newline:
+    _repl_continue:
+    jmp _repl_loop
     
-    ; check for eof
-    mov eax, [ebp-STR_PTR]
-    add eax, [ebp-CHAR_COUNT]
-    cmp DWORD [eax], 0x05
-    jne _readLine_not_eof
-    mov ebx, 1
-    jmp _readLine_exit 
-    _readLine_not_eof:
-
-    add DWORD [ebp-CHAR_COUNT], 1
-    jmp _readLine_loop
-
-    _readLine_exit:
+    _repl_exit:
 
-    mov eax, DWORD [ebp-STR_PTR]
-
-    %undef _FILE_HANDLE
-    %undef CHAR_COUNT
-    %undef BLOCK_COUNT 
-    %undef STR_PTR
+    %undef CMDSTR
 
     mov esp, ebp
     pop ebp
     ret
-
+