SingOS
/
lsfs_16-bit
3
0
Fork 0
Código Issues Pull requests Versões Wiki Atividade
Você não pode selecionar mais de 25 tópicos Os tópicos devem começar com uma letra ou um número, podem incluir traços ('-') e podem ter até 35 caracteres.
2 Commits
2 Branches
0 Tags
99 KiB
 
 
 
Tag: ded978bb38
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Criar branch ${ searchTerm }
de ded978bb38
${ noResults }
lsfs_16-bit/main.s

579 linhas
10 KiB
Original Anotar Histórico Escape

push bp
mov bp,sp
push 12[bp]
push 10[bp]
push 8[bp]
push 6[bp]
call _main
add sp, 0x4
pop bp
retf ! 1
! 1 # 1 "main.c"
! 1 # 1 "std_singos/string.h"
! 1 void strcpy (destination, destination_segment, source, source_segment );
!BCC_EOS
! 2
! 3 void strcpy (destination, destination_segment, source, source_segment )
! 4 char *destination;
export _strcpy
_strcpy:
!BCC_EOS
! 5 int destination_segment;
!BCC_EOS
! 6 char *source;
!BCC_EOS
! 7 int source_segment;
!BCC_EOS
! 8 {
! 9 #asm
!BCC_ASM
_strcpy.source set 6
_strcpy.destination set 2
_strcpy.source_segment set 8
_strcpy.destination_segment set 4
; copy two strings
; IN si: the first (zero terminated) string
; IN di: the second (zero terminated) string
; OUT SF and ZF (same semantics as cmp)
! 15 19
push bp
mov bp,sp
stringcompare:
push ax
push bx
push di
push es
push si
push ds
mov ax, 4[bp]; ;
mov di, ax
mov ax, 6[bp]; ;
mov es, ax
mov ax, 8[bp]; ;
mov si, ax
mov ax, 10[bp]; ;
mov ds, ax
mov cx, 0x050
.loop:
movsb
cmp cx, 0x0
je .end
dec cx
jmp .loop
.end:
pop ds
pop si
pop es
pop di
pop bx
pop ax
pop bp
! 53 endasm
!BCC_ENDASM
! 54 }
ret
! 55 # 1 "driver/disk.h"
! 1 int data_from_disk(index, number_sectors, data_buffer, data_buffer_segment);
!BCC_EOS
! 2 int sec_stub();
!BCC_EOS
! 3 int stub(index, number_sectors, data_buffer, data_buffer_segment);
!BCC_EOS
! 4
! 5 int stub(index, number_sectors, data_buffer, data_buffer_segment)
! 6 long* index;
export _stub
_stub:
!BCC_EOS
! 7 long number_sectors;
!BCC_EOS
! 8 void* data_buffer;
!BCC_EOS
! 9 int data_buffer_segment;
!BCC_EOS
! 10 {
! 11
! 12 #asm
!BCC_ASM
_stub.data_buffer set 8
_stub.number_sectors set 4
_stub.data_buffer_segment set $A
_stub.index set 2
! 13 17
push bp
mov bp,sp
pusha
mov ax, #DAPACK
call 0x0000:0x7C2A
lsfs_load_data:
mov ax, 4[bp];
mov WORD [DAPACK.lba_addr_dw_low], ax
mov bx, 6[bp];
mov WORD [DAPACK.blkcnt], bx
mov cx, 10[bp];
mov WORD [DAPACK.db_addr_segment], cx
mov dx, 8[bp]; ;
mov WORD [DAPACK.db_addr_offset], dx
mov si, #DAPACK ; address of
mov ah, #0x42 ; READ
mov dl, [global_disk_identifier]
int #0x13
call 0x0000:0x7C2A
popa
pop bp
ret
DAPACK:
DAPACK.dap_Size: db 0x10
DAPACK.rev_byte: db 0x0
DAPACK.blkcnt: dw 0x0
DAPACK.db_addr_offset: dw 0x0
DAPACK.db_addr_segment: dw 0x0
DAPACK.lba_addr_dw_low: dd 0x0
DAPACK.lba_addr_dw_high: dd 0x0
global_disk_identifier: db 0x80
! 58 endasm
!BCC_ENDASM
! 59 }
ret
! 60
! 61 int sec_stub()
! 62 {
export _sec_stub
_sec_stub:
! 63 return 42;
push bp
mov bp,sp
push di
push si
mov ax,*$2A
pop si
pop di
pop bp
ret
!BCC_EOS
! 64 # 7 "main.c"
! 7 }
! 8
! 9
! 10 #define SPACE_VBR_RECORD 2048
! 11
! 12 #define DEFAULT_ENTRY_SIZE 1
! 13
! 14 #define NUMBER_OF_MBR_PARTITIONS 4
! 15
! 16 #define DEFAULT_DATA_POINTER_SIZE 4
! 17
! 18
! 19
! 20 void dump_ax(input);
!BCC_EOS
! 21 void print_stack(argument);
!BCC_EOS
! 22
! 23 typedef struct Directory_Table Directory_Table;
!BCC_EOS
! 24 typedef struct struct_table_entry struct_table_entry;
!BCC_EOS
! 25 typedef struct struct_partition_control partition_control;
!BCC_EOS
! 26 typedef struct File_System_Control_Information FSCI;
!BCC_EOS
! 27 typedef struct meta_information_format mif;
!BCC_EOS
! 28 typedef struct tag_record tag_record;
!BCC_EOS
! 29 typedef struct lsfs_file lsfs_file;
!BCC_EOS
! 30
! 31 typedef enum Table_Entry_Kind
! 32 {
! 33
! 34 ENTRY_EMPTY = 0,
! 35 ENTRY_FILE = 1,
! 36 ENTRY_DIRECTORY = 2,
! 37 } Table_Entry_Kind;
!BCC_EOS
! 38
! 39 int number_low;
!BCC_EOS
! 40 int selector;
!BCC_EOS
! 41
! 42 struct File_System_Control_Information
! 43 {
! 44 char filesystem_information[256];
!BCC_EOS
! 45 long master_table_index[2];
!BCC_EOS
! 46 long this_partition_offset_on_disk[2];
!BCC_EOS
! 47 long next_free_sector[2];
!BCC_EOS
! 48 long next_uniqe_id[2];
!BCC_EOS
! 49 long next_sector_reuse_pointer[2];
!BCC_EOS
! 50 long last_sector_index_on_partition[2];
!BCC_EOS
! 51 long maximum_sectors_on_disk[2];
!BCC_EOS
! 52 long sector_size_on_disk[2];
!BCC_EOS
! 53 long not_used[48];
!BCC_EOS
! 54
! 55 };
!BCC_EOS
! 56
! 57 struct test
! 58 {
! 59 char* first;
!BCC_EOS
! 60 char* second;
!BCC_EOS
! 61 };
!BCC_EOS
! 62
! 63 int argument;
!BCC_EOS
! 64 void print(argument);
!BCC_EOS
! 65
! 66 int main(selector, path, path_segment, fsci_lba_index)
! 67 int path_segment;
export _main
_main:
!BCC_EOS
! 68 int fsci_lba_index;
!BCC_EOS
! 69 char path[256];
!BCC_EOS
! 70 {
! 71
! 72
! 73
! 74
! 75 int local_segment = 0x7e0;
push bp
mov bp,sp
push di
push si
dec sp
dec sp
! Debug: eq int = const $7E0 to int local_segment = [S+8-8] (used reg = )
mov ax,#$7E0
mov -6[bp],ax
!BCC_EOS
! 76 char* local_path = "Hello world";
dec sp
dec sp
! Debug: eq [$40] char = .1+0 to * char local_path = [S+$A-$A] (used reg = )
mov bx,#.1
mov -8[bp],bx
!BCC_EOS
! 77 struct test my_struct;
!BCC_EOS
! 78 char *fs_info;
!BCC_EOS
! 79 char *hello = "LessSimpleFileSystem_Hello";
add sp,*-8
! Debug: eq [$1B] char = .2+0 to * char hello = [S+$12-$12] (used reg = )
mov bx,#.2
mov -$10[bp],bx
!BCC_EOS
! 80 char *yes = "Read file: ";
dec sp
dec sp
! Debug: eq [$C] char = .3+0 to * char yes = [S+$14-$14] (used reg = )
mov bx,#.3
mov -$12[bp],bx
!BCC_EOS
! 81 int nubmer;
!BCC_EOS
! 82
! 83
! 84 my_struct.first = hello;
dec sp
dec sp
! Debug: eq * char hello = [S+$16-$12] to * char my_struct = [S+$16-$E] (used reg = )
mov bx,-$10[bp]
mov -$C[bp],bx
!BCC_EOS
! 85 my_struct.second = yes;
! Debug: eq * char yes = [S+$16-$14] to * char my_struct = [S+$16-$C] (used reg = )
mov bx,-$12[bp]
mov -$A[bp],bx
!BCC_EOS
! 86
! 87 if (selector == 1)
! Debug: logeq int = const 1 to int selector = [S+$16+2] (used reg = )
mov ax,4[bp]
cmp ax,*1
jne .4
.5:
! 88 {
! 89
! 90 FSCI fsci;
!BCC_EOS
! 91 print(my_struct.first);
add sp,#-$200
! Debug: list * char my_struct = [S+$216-$E] (used reg = )
push -$C[bp]
! Debug: func () void = print+0 (used reg = )
call _print
inc sp
inc sp
!BCC_EOS
! 92 print(my_struct.second);
! Debug: list * char my_struct = [S+$216-$C] (used reg = )
push -$A[bp]
! Debug: func () void = print+0 (used reg = )
call _print
inc sp
inc sp
!BCC_EOS
! 93
! 94 print(local_path);
! Debug: list * char local_path = [S+$216-$A] (used reg = )
push -8[bp]
! Debug: func () void = print+0 (used reg = )
call _print
inc sp
inc sp
!BCC_EOS
! 95 fsci.master_table_index[0] = 42;
! Debug: eq int = const $2A to long fsci = [S+$216-$116] (used reg = )
mov ax,*$2A
xor bx,bx
mov -$114[bp],ax
mov -$112[bp],bx
!BCC_EOS
! 96 nubmer = 0x55;
! Debug: eq int = const $55 to int nubmer = [S+$216-$16] (used reg = )
mov ax,*$55
mov -$14[bp],ax
!BCC_EOS
! 97
! 98 dump_ax(nubmer);
! Debug: list int nubmer = [S+$216-$16] (used reg = )
push -$14[bp]
! Debug: func () void = dump_ax+0 (used reg = )
call _dump_ax
inc sp
inc sp
!BCC_EOS
! 99
! 99 fsci.filesystem_information[0] = 'i';
! Debug: eq int = const $69 to char fsci = [S+$216-$216] (used reg = )
mov al,*$69
mov -$214[bp],al
!BCC_EOS
! 100 fsci.filesystem_information[1] = '';
! Debug: eq int = const 0 to char fsci = [S+$216-$215] (used reg = )
xor al,al
mov -$213[bp],al
!BCC_EOS
! 101 stub(fsci_lba_index, 1, &fsci, 0x8fc0);
! Debug: list unsigned int = const $8FC0 (used reg = )
mov ax,#$8FC0
push ax
! Debug: list * struct File_System_Control_Information fsci = S+$218-$216 (used reg = )
lea bx,-$214[bp]
push bx
! Debug: list int = const 1 (used reg = )
mov ax,*1
push ax
! Debug: list int fsci_lba_index = [S+$21C+8] (used reg = )
push $A[bp]
! Debug: func () int = stub+0 (used reg = )
call _stub
add sp,*8
!BCC_EOS
! 102 fs_info = fsci.filesystem_information;
! Debug: eq [$100] char fsci = S+$216-$216 to * char fs_info = [S+$216-$10] (used reg = )
lea bx,-$214[bp]
mov -$E[bp],bx
!BCC_EOS
! 103
! 104 print_stack( fs_info );
! Debug: list * char fs_info = [S+$216-$10] (used reg = )
push -$E[bp]
! Debug: func () void = print_stack+0 (used reg = )
call _print_stack
inc sp
inc sp
!BCC_EOS
! 105
! 106 }
add sp,#$200
! 107 else
! 108 {
jmp .6
.4:
! 109 print(my_struct.first);
! Debug: list * char my_struct = [S+$16-$E] (used reg = )
push -$C[bp]
! Debug: func () void = print+0 (used reg = )
call _print
inc sp
inc sp
!BCC_EOS
! 110 return 0;
xor ax,ax
add sp,*$10
pop si
pop di
pop bp
ret
!BCC_EOS
! 111 }
! 112
! 113 return 0;
.6:
xor ax,ax
add sp,*$10
pop si
pop di
pop bp
ret
!BCC_EOS
! 114
! 115 }
! 116
! 117 void print(argument)
! Register BX used in function main
! 118 {
export _print
_print:
! 119 #asm
!BCC_ASM
_print.argument set 2
push bp
mov bp,sp
mov si,4[bp]
call 0x0000:0x7C47
pop bp
! 125 endasm
!BCC_ENDASM
! 126 }
ret
! 127
! 128 void print_stack(argument)
! 129 {
export _print_stack
_print_stack:
! 130 #asm
!BCC_ASM
_print_stack.argument set 2
push bp
mov bp,sp
push ds
push ax
mov ax, ss
mov ds, ax
mov si,4[bp]
call 0x0000:0x7C47
pop ax
pop ds
pop bp
! 144 endasm
!BCC_ENDASM
! 145 }
ret
! 146
! 147 dump_ax_return(input)
! 148 void* input;
export _dump_ax_return
_dump_ax_return:
!BCC_EOS
! 149 {
! 150 return input;
push bp
mov bp,sp
push di
push si
mov ax,4[bp]
pop si
pop di
pop bp
ret
!BCC_EOS
! 151 }
! 152
! 153 void dump_ax(input)
! 154 void* input;
export _dump_ax
_dump_ax:
!BCC_EOS
! 155 {
! 156
! 157 dump_ax_return(input)
push bp
mov bp,sp
push di
push si
! 158 #asm
! Debug: list * void input = [S+6+2] (used reg = )
push 4[bp]
! Debug: func () int = dump_ax_return+0 (used reg = )
call _dump_ax_return
inc sp
inc sp
!BCC_EOS
!BCC_ASM
_dump_ax.input set 8
.dump_ax.input set 4
push bp
mov bp,sp
call 0x000:0x7C2A
pop bp
! 163 endasm
!BCC_ENDASM
!BCC_EOS
! 164 }
pop si
pop di
pop bp
ret
! 165
.3:
.7:
.ascii "Read file: "
.byte 0
.2:
.8:
.ascii "LessSimpleFileSystem_Hello"
.byte 0
.1:
.9:
.ascii "Hello world"
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0,0,0,0,0,0,0,0,0
.byte 0,0
.byte 0
.bss
.comm _argument,2
.comm _selector,2
.comm _number_low,2
! 0 errors detected