Files
perfaware/code/duffle/win32.h
T

317 lines
12 KiB
C

#if INTELLISENSE_DIRECTIVES
# pragma once
# include "dsl.h"
# include "memory.h"
#endif
WinAPI void ms_exit_process(U4 uExitCode) asm("ExitProcess"); // Kernel 32
#pragma region IO
enum {
MS_STD_INPUT_CODE = u4_(-10),
MS_STD_OUTPUT_CODE = u4_(-11),
#define MS_STD_INPUT u4_(MS_STD_INPUT_CODE)
#define MS_STD_OUTPUT u4_(MS_STD_OUTPUT_CODE)
};
typedef Struct_(MS_Handle){U8 id;};
#pragma endregion IO
// --- WinAPI Minimal Definitions ---
typedef Struct_(MS_OVERLAPPED) {
void* Internal;
void* InternalHigh;
union {
struct {
U4 Offset;
U4 OffsetHigh;
};
void* Pointer;
};
MS_Handle hEvent;
};
typedef Struct_(MS_SECURITY_ATTRIBUTES) {
U4 nLength;
void* lpSecurityDescriptor;
B4 bInheritHandle;
};
typedef struct MS_SYSTEMTIME {
U2 wYear;
U2 wMonth;
U2 wDayOfWeek;
U2 wDay;
U2 wHour;
U2 wMinute;
U2 wSecond;
U2 wMilliseconds;
} MS_SYSTEMTIME;
typedef struct MS_FILETIME {
U4 dwLowDateTime;
U4 dwHighDateTime;
} MS_FILETIME;
typedef struct MS_BY_HANDLE_FILE_INFORMATION {
U4 dwFileAttributes;
MS_FILETIME ftCreationTime;
MS_FILETIME ftLastAccessTime;
MS_FILETIME ftLastWriteTime;
U4 dwVolumeSerialNumber;
U4 nFileSizeHigh;
U4 nFileSizeLow;
U4 nNumberOfLinks;
U4 nFileIndexHigh;
U4 nFileIndexLow;
} MS_BY_HANDLE_FILE_INFORMATION;
typedef struct MS_WNDCLASSA {
U4 style;
S8 (*lpfnWndProc)(void*, U4, U8, S8);
S4 cbClsExtra;
S4 cbWndExtra;
void* hInstance;
void* hIcon;
void* hCursor;
void* hbrBackground;
char const* lpszMenuName;
char const* lpszClassName;
} MS_WNDCLASSA;
typedef struct MS_POINT { S4 x, y; } MS_POINT;
typedef struct MS_MSG { void* hwnd; U4 message; U8 wParam; S8 lParam; U4 time; MS_POINT pt; } MS_MSG;
typedef struct MS_RECT { S4 left, top, right, bottom; } MS_RECT;
typedef struct MS_PAINTSTRUCT { void* hdc; S4 fErase; MS_RECT rcPaint; S4 fRestore; S4 fIncUpdate; U1 rgbReserved[32]; } MS_PAINTSTRUCT;
// --- Kernel32 ---
WinAPI U4 ms_get_last_error() asm("GetLastError");
WinAPI void ms_exit_process(U4 uExitCode) asm("ExitProcess");
WinAPI MS_Handle ms_get_std_handle(U4 handle_type) asm("GetStdHandle");
WinAPI void* ms_virtual_alloc(void* lpAddress, U8 dwSize, U4 flAllocationType, U4 flProtect) asm("VirtualAlloc");
WinAPI B4 ms_read_console(
MS_Handle handle,
UTF8_R buffer,
U4 to_read,
U4_R num_read,
U8 reserved_input_control
) asm("ReadConsoleA");
WinAPI B4 ms_write_console(
MS_Handle handle,
UTF8 const*R_ buffer,
U4 chars_to_write,
U4_V chars_written,
U8 reserved
) asm("WriteConsoleA");
WinAPI B4 ms_get_file_information_by_handle(MS_Handle* handle, MS_BY_HANDLE_FILE_INFORMATION* file_information) asm("GetFileInformationByHandle");
WinAPI MS_Handle* ms_create_file_a(char const* lpFileName, U4 dwDesiredAccess, U4 dwShareMode, void* lpSecurityAttributes, U4 dwCreationDisposition, U4 dwFlagsAndAttributes, void* hTemplateFile) asm("CreateFileA");
WinAPI MS_Handle* ms_create_file_w(U2 const* lpFileName, U4 dwDesiredAccess, U4 dwShareMode, void* lpSecurityAttributes, U4 dwCreationDisposition, U4 dwFlagsAndAttributes, void* hTemplateFile) asm("CreateFileW");
WinAPI B4 ms_write_file(void* hFile, void const* lpBuffer, U4 nNumberOfBytesToWrite, U4* lpNumberOfBytesWritten, void* lpOverlapped) asm("WriteFile");
WinAPI B4 ms_read_file(MS_Handle* hFile, void* lpBuffer, U4 nNumberOfBytesToRead, U4* lpNumberOfBytesRead, void* lpOverlapped) asm("ReadFile");
WinAPI B4 ms_close_handle(void* hObject) asm("CloseHandle");
WinAPI B4 ms_filetime_to_systemtime(void const* lpFileTime, void* lpSystemTime) asm("FileTimeToSystemTime");
// --- User32 ---
WinAPI U2 ms_register_class_a(MS_WNDCLASSA const* lpWndClass) asm("RegisterClassA");
WinAPI void* ms_create_window_ex_a(
U4 dwExStyle,
char const* lpClassName,
char const* lpWindowName,
U4 dwStyle,
S4 X,
S4 Y,
S4 nWidth,
S4 nHeight,
void* hWndParent,
void* hMenu,
void* hInstance,
void* lpParam
) asm("CreateWindowExA");
WinAPI S4 ms_show_window(void* hWnd, S4 nCmdShow) asm("ShowWindow");
WinAPI S4 ms_get_message_a(MS_MSG* lpMsg, void* hWnd, U4 wMsgFilterMin, U4 wMsgFilterMax) asm("GetMessageA");
WinAPI S4 ms_translate_message(MS_MSG const* lpMsg) asm("TranslateMessage");
WinAPI S8 ms_dispatch_message_a(MS_MSG const* lpMsg) asm("DispatchMessageA");
WinAPI S8 ms_def_window_proc_a(void* hWnd, U4 Msg, U8 wParam, S8 lParam) asm("DefWindowProcA");
WinAPI void ms_post_quit_message(S4 nExitCode) asm("PostQuitMessage");
WinAPI S4 ms_invalidate_rect(void* hWnd, MS_RECT const* lpRect, S4 bErase) asm("InvalidateRect");
WinAPI S2 ms_get_async_key_state(S4 vKey) asm("GetAsyncKeyState");
// --- GDI32 ---
WinAPI void* ms_begin_paint(void* hWnd, MS_PAINTSTRUCT* lpPaint) asm("BeginPaint");
WinAPI S4 ms_end_paint(void* hWnd, MS_PAINTSTRUCT const* lpPaint) asm("EndPaint");
WinAPI U4 ms_set_text_color(void* hdc, U4 color) asm("SetTextColor");
WinAPI U4 ms_set_bk_color(void* hdc, U4 color) asm("SetBkColor");
WinAPI S4 ms_text_out_a(void* hdc, S4 x, S4 y, char const* lpString, S4 c) asm("TextOutA");
WinAPI void* ms_get_stock_object(S4 i) asm("GetStockObject");
WinAPI void* ms_create_font_a(
S4 cHeight,
S4 cWidth,
S4 cEscapement,
S4 cOrientation,
S4 cWeight,
U4 bItalic,
U4 bUnderline,
U4 bStrikeOut,
U4 iCharSet,
U4 iOutPrecision,
U4 iClipPrecision,
U4 iQuality,
U4 iPitchAndFamily,
char const* pszFaceName
) asm("CreateFontA");
WinAPI void* ms_create_compatible_dc(void* hdc) asm("CreateCompatibleDC");
WinAPI void* ms_create_compatible_bitmap(void* hdc, S4 cx, S4 cy) asm("CreateCompatibleBitmap");
WinAPI B4 ms_bit_blt(void* hdcDest, S4 x, S4 y, S4 w, S4 h, void* hdcSrc, S4 xSrc, S4 ySrc, U4 rop) asm("BitBlt");
WinAPI B4 ms_delete_dc(void* hdc) asm("DeleteDC");
WinAPI B4 ms_get_client_rect(void* hwnd, MS_RECT* lpRect) asm("GetClientRect");
WinAPI void* ms_select_object(void* hdc, void* h) asm("SelectObject");
WinAPI S4 ms_rectangle(void* hdc, S4 left, S4 top, S4 right, S4 bottom) asm("Rectangle");
WinAPI S4 ms_set_bk_mode(void* hdc, S4 mode) asm("SetBkMode");
WinAPI void* ms_create_solid_brush(U4 color) asm("CreateSolidBrush");
WinAPI S4 ms_delete_object(void* ho) asm("DeleteObject");
#define MS_INVALID_HANDLE_VALUE ((MS_Handle*)(U8) - 1)
enum {
MS_GENERIC_READ = 0x80000000,
MS_GENERIC_WRITE = 0x40000000,
MS_GENERIC_EXECUTE = 0x20000000L,
MS_CREATE_ALWAYS = 2,
MS_OPEN_EXISTING = 3,
MS_OPEN_ALWAYS = 4,
MS_FILE_APPEND_DATA = 0x0004,
MS_FILE_ATTRIBUTE_NORMAL = 0x80,
MS_FILE_ATTRIBUTE_DIRECTORY = 0x00000010,
MS_FILE_SHARE_READ = 0x00000001,
MS_FILE_SHARE_WRITE = 0x00000002,
MS_FILE_SHARE_DELETE = 0x00000004,
MS_MEM_COMMIT = 0x00001000,
MS_MEM_RESERVE = 0x00002000,
MS_PAGE_READWRITE = 0x04,
MS_SRCCOPY = 0x00CC0020,
MS_WM_DESTROY = 0x0002,
MS_WM_SIZE = 0x0005,
MS_WM_PAINT = 0x000F,
MS_WM_ERASEBKGND = 0x0014,
MS_WM_KEYDOWN = 0x0100,
MS_WM_KEYUP = 0x0101,
MS_WM_MOUSEMOVE = 0x0200,
MS_WM_LBUTTONDOWN = 0x0201,
MS_WM_LBUTTONUP = 0x0202,
MS_WM_RBUTTONDOWN = 0x0204,
MS_WM_RBUTTONUP = 0x0205,
MS_WM_MBUTTONDOWN = 0x0207,
MS_WM_MBUTTONUP = 0x0208,
MS_WM_MOUSEWHEEL = 0x020A,
MS_WS_OVERLAPPEDWINDOW = 0x00CF0000,
MS_WS_VISIBLE = 0x10000000,
MS_PAGE_EXECUTE_READWRITE = 0x40,
MS_VK_BACK = 0x08,
MS_VK_TAB = 0x09,
MS_VK_RETURN = 0x0D,
MS_VK_SHIFT =0x10,
MS_VK_SPACE = 0x20,
MS_VK_PRIOR = 0x21,
MS_VK_NEXT = 0x22,
MS_VK_LEFT = 0x25,
MS_VK_UP = 0x26,
MS_VK_RIGHT = 0x27,
MS_VK_DOWN = 0x28,
MS_VK_F1 = 0x70,
MS_VK_F2 = 0x71,
MS_VK_F5 = 0x74,
MS_WM_CHAR = 0x0102,
};
#if BUILD_DEBUG
FI_ void assert(U8 cond) { if(cond){return;} else{debug_trap(); ms_exit_process(1);} }
#endif
// Layer Implementation
#if DUFFLE_WINDOWS
I_ void
w32_date_time_from_system_time(DateTime* out, MS_SYSTEMTIME* in) {
out->year = in->wYear;
out->month = in->wMonth - 1;
out->week_day = in->wDayOfWeek;
out->day = in->wDay;
out->hour = in->wHour;
out->min = in->wMinute;
out->sec = in->wSecond;
out->msec = in->wMilliseconds;
}
I_ void
w32_dense_time_from_file_time(DenseTime* out, MS_FILETIME* in) {
MS_SYSTEMTIME systime = {0}; ms_filetime_to_systemtime(in, &systime); DateTime date_time = {0};
w32_date_time_from_system_time(&date_time, &systime); *out = dense_time_from_date_time(date_time);
}
I_ FilePropertyFlags
w32_file_property_flags_from_dwFileAttributes(U4 dwFileAttributes) {
FilePropertyFlags flags = 0; if (dwFileAttributes & MS_FILE_ATTRIBUTE_DIRECTORY) { flags |= FilePropertyFlag_IsFolder; } return flags;
}
I_ FileProperties
properties_from_file(File file) {
if (file_match(file, file_zero())) { FileProperties r = {0}; return r; }
FileProperties props = {0}; MS_Handle* handle = C_(MS_Handle*,file.ptr[0]);
MS_BY_HANDLE_FILE_INFORMATION info; S4 info_good = ms_get_file_information_by_handle(handle, &info);
if (info_good) {
U4 size_lo = info.nFileSizeLow; U4 size_hi = info.nFileSizeHigh;
props.size = C_(U8,size_lo) | (C_(U8,size_hi)<<32);
w32_dense_time_from_file_time(& props.modified, & info.ftLastWriteTime);
w32_dense_time_from_file_time(& props.created, & info.ftCreationTime);
props.flags = w32_file_property_flags_from_dwFileAttributes(info.dwFileAttributes);
}
return props;
}
internal File
file_open(FArena* scratch, AccessFlags flags, Str8 path) {
File result = {0};
Str16 path16 = str16_from_8(scratch, path);
U4 access_flags = 0;
U4 share_mode = 0;
U4 creation_disposition = MS_OPEN_EXISTING;
MS_SECURITY_ATTRIBUTES security_attributes = {sizeof(security_attributes), 0, 0};
if (flags & AccessFlag_Read) { access_flags |= MS_GENERIC_READ; }
if (flags & AccessFlag_Write) { access_flags |= MS_GENERIC_WRITE; }
if (flags & AccessFlag_Execute) { access_flags |= MS_GENERIC_EXECUTE; }
if (flags & AccessFlag_ShareRead) { share_mode |= MS_FILE_SHARE_READ; }
if (flags & AccessFlag_ShareWrite) { share_mode |= MS_FILE_SHARE_WRITE | MS_FILE_SHARE_DELETE; }
if (flags & AccessFlag_Write) { creation_disposition = MS_CREATE_ALWAYS; }
if (flags & AccessFlag_Append) { creation_disposition = MS_OPEN_ALWAYS; access_flags |= MS_FILE_APPEND_DATA; }
if (flags & AccessFlag_Inherited) { security_attributes.bInheritHandle = 1; }
MS_Handle* file = ms_create_file_w(C_(U2 const*,path16.ptr), access_flags, share_mode, &security_attributes, creation_disposition, MS_FILE_ATTRIBUTE_NORMAL, 0);
if(file != MS_INVALID_HANDLE_VALUE) { result.ptr[0] = C_(U8,file); }
else {
U4 err = ms_get_last_error(); (void)err;
}
return result;
}
internal void file_close(File file) {
if(file_match(file, file_zero())) { return; }
MS_Handle* handle = C_(MS_Handle*,file.ptr[0]);
B4 result = ms_close_handle(handle); (void)result;
}
internal U8 file_read(File file, R1_U8 rng, U1* out_data) {
if (file_match(file, file_zero())) { return 0; }
MS_Handle* handle = C_(MS_Handle*,file.ptr[0]);
U1* ptr = out_data;
U8 off = rng.p0; while (off != rng.p1) {
U8 amt64 = rng.p1 - off;
U4 amt32 = C_(U4, min(mega(32), amt64));
U4 read_size = 0;
MS_OVERLAPPED overlapped = { .Offset = C_(U4,off), .OffsetHigh = (U4)(off >> 32) };
if( ! ms_read_file(handle, ptr, amt32, &read_size, &overlapped)) { break; }
ptr += read_size;
off += read_size;
}
U8 total_read_size = off - rng.p0; return total_read_size;
}
#endif