git-svn-id: https://spexeah.com:8443/svn/Asuro@7 6dbc8c32-bb84-406f-8558-d1cf31a0ab0c
This commit is contained in:
kieron committed 2015-10-10 22:43:46 +00:00
1 parent 815d1b8199
commit 6208fac551
12 files changed
+7 -49

No files matched your search

BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
Binary file not shown.
BIN
View File
Binary file not shown.
BIN
View File
Binary file not shown.
-13
View File
@@ -1,16 +1,3 @@
{
/////////////////////////////////////////////////////////
// //
// Freepascal barebone OS //
// console.pas //
// //
/////////////////////////////////////////////////////////
//
// By: De Deyn Kim <[email protected]>
// License: Public domain
//
}
unit console; unit console;
interface interface
-13
View File
@@ -1,16 +1,3 @@
{
/////////////////////////////////////////////////////////
// //
// Freepascal barebone OS //
// kernel.pas //
// //
/////////////////////////////////////////////////////////
//
// By: De Deyn Kim <[email protected]>
// License: Public domain
//
}
unit kernel; unit kernel;
interface interface
+6 -11
View File
@@ -4,7 +4,6 @@ interface
const const
KERNEL_STACKSIZE = $4000; KERNEL_STACKSIZE = $4000;
MULTIBOOT_BOOTLOADER_MAGIC = $2BADB002; MULTIBOOT_BOOTLOADER_MAGIC = $2BADB002;
type type
@@ -19,8 +18,8 @@ type
Pmultiboot_info_t = ^multiboot_info_t; Pmultiboot_info_t = ^multiboot_info_t;
multiboot_info_t = packed record multiboot_info_t = packed record
flags: DWORD; flags: DWORD;
mem_lower: DWORD; { Amount of memory available below 1mb } mem_lower: DWORD;
mem_upper: DWORD; { Amount of memory available above 1mb } mem_upper: DWORD;
boot_device: DWORD; boot_device: DWORD;
cmdline: DWORD; cmdline: DWORD;
mods_count: DWORD; mods_count: DWORD;
@@ -41,15 +40,11 @@ type
Pmemory_map_t = ^memory_map_t; Pmemory_map_t = ^memory_map_t;
memory_map_t = packed record memory_map_t = packed record
size: DWORD; size: DWORD;
{ You can declare these two as a single qword if your compiler supports it } base_addr : QWORD;
base_addr_low: DWORD; length : QWORD;
base_addr_high: DWORD; mtype: DWORD;
{ And again, these can be made into one qword variable. }
length_low: DWORD;
length_high: DWORD;
mtype: DWORD;
end; end;
implementation implementation
end. end.
+1 -12
View File
@@ -1,14 +1,3 @@
;/////////////////////////////////////////////////////////
;// //
;// Freepascal barebone OS //
;// stub.asm //
;// //
;/////////////////////////////////////////////////////////
;//
;// By: De Deyn Kim <[email protected]>
;// License: Public domain
;//
; ;
; Kernel stub ; Kernel stub
; ;
@@ -76,4 +65,4 @@ section .bss
; ;
align 32 align 32
KERNEL_STACK: KERNEL_STACK:
resb KERNEL_STACKSIZE resb KERNEL_STACKSIZE