veclavtalica/brightstone
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

freeze dos progress, maybe some day

Browse Source
This commit is contained in:
veclavtlica
2026-10-10 19:34:22 +03:00
parent fd54d48aca
commit 1ada1a12cc
11 changed files with 262 additions and 53 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Player/Display/dos.c
+195 -10
View File
@@ -1,17 +1,16 @@
#include "display.h"
#include <fcntl.h>
#include <stdbool.h>
#include <stddef.h>
#include <stdint.h>
#include <string.h>
#define WIDTH 640
#define HEIGHT 480
#define WIDTH 320
#define HEIGHT 200
#define MODE_VGA_320_200_8 0x13
#define MODE_VESA_640_480_8 0x101
/*
TODO: https://github.com/depp/elf2dos/blob/master/elf/elf.go
https://www.edm2.com/index.php/LX_-_Linear_eXecutable_Module_Format_Description
Do not use anything but Clang in the end.
*/
/* https://www.phatcode.net/res/262/files/dpmi09.html */
/* http://www.techhelpmanual.com/27-dos__bios___extensions_service_index.html */
// 8-color VGA palette gradient, lighter shades of lavender to pink
#define COLOR_OFFSET 0x50
@@ -132,13 +131,183 @@
// return NULL;
// }
/* Not really needed i guess? */
// static inline bool real_mode_interrupt(uint8_t interrupt) {
// bool carry_clear;
// __asm__ volatile("int $0x31"
// : "=@ccnc"(carry_clear)
// : "a"(0x0300), "b"(interrupt), "c"(0), "D"(&dpmi_regs)
// : "memory", "cc");
// return !carry_clear;
// }
typedef struct {
uint16_t rm_segment;
uint16_t pm_selector;
} LowMemBlock;
// Allocates low memory under 1MB
static inline LowMemBlock allocate_low_mem(uint32_t size_in_bytes) {
LowMemBlock block = {0, 0};
uint32_t paragraphs =
(size_in_bytes + 15) >> 4; // Convert bytes to paragraphs
uint16_t seg, sel;
uint8_t failed = 0;
__asm__ __volatile__(
"movw $0x0100, %%ax \n\t" // DPMI allocate DOS memory block
"int $0x31 \n\t"
"setc %2 \n\t" // Check Carry Flag for error
: "=a"(seg), "=d"(sel), "=r"(failed)
: "b"(paragraphs)
: "cc");
if (!failed) {
block.rm_segment = seg;
block.pm_selector = sel;
}
return block;
}
static inline void copy_to_low_mem(LowMemBlock block, char *data,
uint32_t size) {
__asm__ volatile("movw %0, %%es\n"
"movw %1, %%di\n"
"movw %2, %%si\n"
"movw .data, %%ax\n"
"movw %3, %%cx\n"
"cld\n"
"rep movsb" ::"r"(block.rm_segment),
"r"(block.pm_selector), "r"(data), "r"(size)
: "memory", "cc", "ax", "bx", "cx", "esi", "di");
}
// Frees the allocated low memory (DPMI Ax=0101h)
static inline void free_low_mem(uint16_t selector) {
__asm__ __volatile__("movw $0x0101, %%ax \n\t" // DPMI free DOS memory block
"int $0x31"
:
: "d"(selector)
: "ax", "cc");
}
static inline void set_video_mode(uint16_t mode) {
__asm__ volatile("int $0x10" : : "a"(mode) : "memory", "cc");
}
/* http://www.techhelpmanual.com/439-dos_fn_40h__write_to_file_via_handle.html
*/
static inline void writetest(void) {
__asm__ volatile("int $0x21" : : "a"(0x0200), "d"('Y') : "memory", "cc");
}
/* http://www.techhelpmanual.com/630-int_31h_0800h__physical_address_mapping.html
*/
static inline void *map_physical_address(uint32_t physical_addr,
uint32_t size) {
uint16_t high, low;
bool carry_clear;
__asm__ volatile("int $0x31"
: "=b"(high), "=c"(low), "=@ccnc"(carry_clear)
: "a"(0x0800), "b"(physical_addr >> 16),
"c"(physical_addr & 0xFFFF), "S"(size >> 16),
"D"(size & 0xFFFF)
: "memory", "cc");
return !carry_clear ? NULL : (void *)(intptr_t)((high << 16) | low);
}
static inline uint16_t alloc_ldt_descriptor(void) {
bool carry_clear;
uint16_t selector;
__asm__ volatile("int $0x31"
: "=a"(selector), "=@ccnc"(carry_clear)
: "a"(0x0000), "c"(1)
: "memory", "cc");
return !carry_clear ? selector : 0;
}
static inline bool set_segment_base_address(uint16_t selector,
uint32_t baseaddr) {
bool carry_clear;
__asm__ volatile("int $0x31"
: "=a"(selector), "=@ccnc"(carry_clear)
: "a"(0x0007), "c"(baseaddr >> 16), "d"(baseaddr & 0xFFFF)
: "memory", "cc");
return !carry_clear;
}
static inline bool set_segment_limit(uint16_t selector, uint32_t size) {
bool carry_clear;
__asm__ volatile("int $0x31"
: "=@ccnc"(carry_clear)
: "a"(0x0008), "b"(selector), "c"(size >> 16),
"d"(size & 0xFFFF)
: "memory", "cc");
return !carry_clear;
}
static inline bool set_segment_rights(uint16_t selector, bool read,
bool write) {
bool carry_clear;
uint16_t flags =
1 | (write << 1) | (1 << 4) | (1 << 7) | (1 << 14) | (1 << 15);
__asm__ volatile("int $0x31"
: "=@ccnc"(carry_clear)
: "a"(0x0009), "b"(selector), "c"(flags)
: "memory", "cc");
return !carry_clear;
}
static inline void use_segment(uint16_t selector) {
__asm__ volatile("" : "=S"(selector)::);
}
/* https://tippach.hier-im-netz.de/wdosx/int21api.html#f09 */
static inline void print_to_console(char *const str) {
__asm__ volatile("int $0x21" ::"a"(0x0900), "d"(str)
: "memory", "cc", "esi", "edi", "esp");
}
static uint32_t test = 0x1420124;
// extern int plr_display_dos_main(int argc, char *argv[]) {
extern int plr_display_dos_main(void) {
char *buf = (char *)0xA0000; // VGA memory address
print_to_console("Fuck you stupid shit");
return -1;
uint16_t base = alloc_ldt_descriptor();
if (!base) {
print_to_console("Cannot allocate LDT descriptor");
return -1;
}
if (!set_segment_base_address(base, 0xA0000)) {
print_to_console("Cannot set LDT base address");
return -1;
}
if (!set_segment_limit(base, 0x10000)) {
print_to_console("Cannot set LDT limit");
return -1;
}
use_segment(base);
// char *volatile buf = (void *)(intptr_t)0xA0000; // VGA memory address
// char *buf = map_physical_address(0xA0000, 0x10000); // VGA memory
char *buf = map_physical_address(0xA0000, 0x10000); // VGA memory
// address
if (!buf)
return -1;
int x, y;
// if (!buf)
// return -1;
// unsigned char saved_mode = get_video_mode(); // Save original mode
// set_vesa_video_mode(MODE_VESA_640_480_8); // Set our VGA mode
// set_vesa_video_mode(MODE_VESA_640_480_8); // Set our VGA mode
set_video_mode(MODE_VGA_320_200_8); // Set our VGA mode
// buf = find_display_memory();
@@ -162,9 +331,25 @@ extern int plr_display_dos_main(void) {
for (y = 0; y < HEIGHT; y++) {
for (x = 0; x < WIDTH; x++) {
buf[y * WIDTH + x] = COLOR_OFFSET + y / COLOR_STEP;
// __asm__ volatile("int $0x10"
// :
// : "a"(0x0C << 8 | COLOR_OFFSET + y / COLOR_STEP),
// "b"(0), "c"(x), "d"(y)
// : "memory", "cc");
}
}
// writetest();
__asm__ volatile("int $0x16" : : "a"(0x00) : "memory", "cc");
}
// dpmi_regs = (struct dpmi_regs){.eax = 0x00004C00};
// __asm__ volatile("movw $0x0300, %%ax\n"
// "movb $0x21, %%bl\n"
// "xorb %%bh, %%bh\n"
// "xorw %%cx, %%cx\n"
// "movl $dpmi_regs, %%edi\n"
// "int $0x31" ::
// : "memory", "cc", "ax", "bx", "cx", "edi");
return 0;
}