kolibrios/programs/develop/ktcc/trunk/libc.obj/include/sys/ksys.h
turbocat 52dd2872bf libc,obj:
- changed wrapper names

git-svn-id: svn://kolibrios.org@9094 a494cfbc-eb01-0410-851d-a64ba20cac60
2021-07-27 00:20:54 +00:00

1424 lines
32 KiB
C
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* Copyright (C) KolibriOS team 2004-2021. All rights reserved. */
/* Distributed under terms of the GNU General Public License */
/* This file contains basic wrappers over KolibriOS system calls. */
/* See sysfuncs.txt file for details. */
/*
* This file was created with you in mind. Lest you reinvent the wheel.
* If for some reason there is not enough wrapper add! I ask you to stick to the same style: snake_case.
* Structure names must start with "ksys_" and end with "_t".
* All wrappers must start with the "_ksys_" prefix.
* I consider it mandatory to place the wrappers in the correct order in the official documentation.
* Enjoy writing your code :)
*/
// Warning! The end of the file is the old definitions of function/structure names.
// They are for compatibility... Better not to use them. */
#ifndef _KSYS_H_
#define _KSYS_H_
#include <stddef.h>
#define asm_inline __asm__ __volatile__
/*============== General structures ==============*/
#pragma pack(push,1)
typedef struct {
uint8_t blue;
uint8_t green;
uint8_t red;
}rgb_t;
typedef union {
uint32_t val;
struct{
uint8_t hour;
uint8_t min;
uint8_t sec;
uint8_t _zero;
};
}ksys_time_t;
typedef union {
uint32_t val;
struct{
uint8_t year;
uint8_t month;
uint8_t day;
uint8_t _zero;
};
}ksys_date_t;
typedef union{
uint32_t val;
struct{
uint16_t x;
uint16_t y;
};
}ksys_pos_t;
typedef union ksys_oskey_t{
uint32_t val;
struct{
uint8_t state;
uint8_t code;
uint8_t ctrl_key;
};
}ksys_oskey_t;
typedef struct{
void *data;
size_t size;
}ksys_ufile_t;
typedef struct{
uint32_t p00;
union{
uint64_t p04;
struct {
uint32_t p04dw;
uint32_t p08dw;
};
};
uint32_t p12;
union {
uint32_t p16;
const char *new_name;
void *bdfe;
void *buf16;
const void *cbuf16;
};
char p20;
const char *p21;
}ksys70_t;
typedef struct {
uint32_t attributes;
uint32_t name_cp;
ksys_time_t creation_time;
ksys_date_t creation_date;
ksys_time_t last_access_time;
ksys_date_t last_access_date;
ksys_time_t last_modification_time;
ksys_date_t last_modification_date;
unsigned long long size;
char name[0];
}ksys_bdfe_t;
typedef struct {
int cpu_usage; //+0
int window_pos_info; //+4
short int reserved1; //+8
char name[12]; //+10
int memstart; //+22
int memused; //+26
int pid; //+30
int winx_start; //+34
int winy_start; //+38
int winx_size; //+42
int winy_size; //+46
short int slot_info; //+50
short int reserved2; //+52
int clientx; //+54
int clienty; //+58
int clientwidth; //+62
int clientheight; //+66
unsigned char window_state;//+70
char reserved3[1024-71]; //+71
}ksys_thread_t;
typedef unsigned int ksys_color_t;
typedef struct{
ksys_color_t frame_area;
ksys_color_t grab_bar;
ksys_color_t grab_bar_button;
ksys_color_t grab_button_text;
ksys_color_t grab_text;
ksys_color_t work_area;
ksys_color_t work_button;
ksys_color_t work_button_text;
ksys_color_t work_text;
ksys_color_t work_graph;
}ksys_colors_table_t;
typedef struct{
unsigned pid; // PID of sending thread
unsigned datalen; // data bytes
char *data; // data begin
}ksys_ipc_msg;
typedef struct{
unsigned lock; // nonzero is locked
unsigned used; // used bytes in buffer
ksys_ipc_msg *data; // data begin
}ksys_ipc_buffer;
typedef struct {
char* func_name;
void* func_ptr;
}ksys_dll_t;
typedef unsigned ksys_drv_hand_t;
typedef struct{
ksys_drv_hand_t handler;
unsigned func_num;
void* in_data_ptr;
unsigned in_data_size;
void* out_data_ptr;
unsigned out_data_size;
}ksys_ioctl_t;
typedef struct{
char key[64];
char path[64];
}ksys_dir_key_t;
#pragma pack(pop)
typedef rgb_t ksys_bitmap_t;
enum KSYS_FS_ERRORS {
KSYS_FS_ERR_SUCCESS = 0, // Success
KSYS_FS_ERR_1 = 1, // Base and/or partition of a hard disk is not defined (fn21.7 & fn21.8)
KSYS_FS_ERR_2 = 2, // Function is not supported for the given file system
KSYS_FS_ERR_3 = 3, // Unknown file system
KSYS_FS_ERR_4 = 4, // Reserved, is never returned in the current implementation
KSYS_FS_ERR_5 = 5, // File not found
KSYS_FS_ERR_EOF = 6, // End of file, EOF
KSYS_FS_ERR_7 = 7, // Pointer lies outside of application memory
KSYS_FS_ERR_8 = 8, // Disk is full
KSYS_FS_ERR_9 = 9, // FAT table is destroyed
KSYS_FS_ERR_10 = 10, // Access denied
KSYS_FS_ERR_11 = 11 // Device error
};
enum KSYS_EVENTS {
KSYS_EVENT_NONE = 0, /* Event queue is empty */
KSYS_EVENT_REDRAW = 1, /* Window and window elements should be redrawn */
KSYS_EVENT_KEY = 2, /* A key on the keyboard was pressed */
KSYS_EVENT_BUTTON = 3, /* A button was clicked with the mouse */
KSYS_EVENT_DESKTOP = 5, /* Desktop redraw finished */
KSYS_EVENT_MOUSE = 6, /* Mouse activity (movement, button press) was detected */
KSYS_EVENT_IPC = 7, /* Interprocess communication notify */
KSYS_EVENT_NETWORK = 8, /* Network event */
KSYS_EVENT_DEBUG = 9, /* Debug subsystem event */
KSYS_EVENT_IRQBEGIN = 16 /* 16..31 IRQ0..IRQ15 interrupt =IRQBEGIN+IRQn */
};
enum KSYS_FILE_ENCODING{
KSYS_FILE_CP866 =1,
KSYS_FILE_UTF16LE = 2,
KSYS_FILE_UTF8 = 3
};
static inline
int _ksys_strcmp(const char * s1, const char * s2 )
{
while ((*s1) && (*s1 == *s2)){ ++s1; ++s2; }
return(*(unsigned char*)s1 - *(unsigned char *)s2);
}
/* ####################################################################### */
/* ############### С wrappers for system calls Kolibri OS ################ */
/* ####################################################################### */
/*=============== Function -1 - terminate thread/process ===============*/
static inline
void _ksys_exit(){
asm_inline("int $0x40"::"a"(-1));
}
/*============== Function 0 - define and draw the window. ==============*/
static inline
void _ksys_create_window(uint32_t x, uint32_t y, uint32_t w, uint32_t h, const char *name, ksys_color_t workcolor, uint32_t style) {
asm_inline(
"int $0x40"
::"a"(0),
"b"((x << 16) | ((w-1) & 0xFFFF)),
"c"((y << 16) | ((h-1) & 0xFFFF)),
"d"((style << 24) | (workcolor & 0xFFFFFF)),
"D"(name),
"S"(0)
:"memory"
);
};
/*================ Function 1 - put pixel in the window. ===============*/
static inline
void _ksys_draw_pixel(uint32_t x, uint32_t y, ksys_color_t color){
asm_inline(
"int $0x40"
::"a"(1), "b"(x), "c"(y), "d"(color)
);
}
/*============ Function 2 - get the code of the pressed key. ===========*/
static inline
ksys_oskey_t _ksys_get_key(void){
ksys_oskey_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(2)
);
return val;
}
/*==================== Function 3 - get system time. ===================*/
static inline
ksys_time_t _ksys_get_time(){
ksys_time_t c_time;
asm_inline(
"int $0x40"
:"=a"(c_time)
:"a"(3)
:"memory"
);
return c_time;
}
/*=================== Function 4 - draw text string. ===================*/
static inline
void _ksys_draw_text(const char *text, uint32_t x, uint32_t y, uint32_t len, ksys_color_t color) {
asm_inline(
"int $0x40"
::"a"(4),"d"(text),
"b"((x << 16) | y),
"S"(len),"c"(color)
:"memory"
);
}
/*========================= Function 5 - delay. ========================*/
static inline
void _ksys_delay(uint32_t time){
asm_inline(
"int $0x40"
::"a"(5), "b"(time)
:"memory"
);
}
/*=============== Function 7 - draw image in the window. ===============*/
static inline
void _ksys_draw_bitmap(void *bitmap, int x, int y, int w, int h)
{
asm_inline(
"int $0x40"
::"a"(7), "b"(bitmap),
"c"((w << 16) | h),
"d"((x << 16) | y)
:"memory"
);
}
/*=============== Function 8 - define/delete the button. ===============*/
static inline
void _ksys_define_button(uint32_t x, uint32_t y, uint32_t w, uint32_t h, uint32_t id, ksys_color_t color) {
asm_inline(
"int $0x40"
::"a"(8),
"b"((x<<16)+w),
"c"((y<<16)+h),
"d"(id),
"S"(color)
);
};
static inline
void _ksys_delete_button(uint32_t id){
asm_inline(
"int $0x40"
::"a"(8),"d"(id & 0x00FFFFFF | 0x80000000)
);
}
/*============ Function 9 - information on execution thread. ===========*/
static inline
int _ksys_thread_info(ksys_thread_t* table, int slot){
int val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(9), "b"(table), "c"(slot)
:"memory"
);
return val;
}
/*==================== Function 10 - wait for event. ===================*/
static inline
uint32_t _ksys_wait_event(void){
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(10)
);
return val;
}
/*=============== Function 11 - check for event, no wait. ==============*/
static inline
uint32_t _ksys_check_event(void){
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(11)
);
return val;
}
/*=============== Function 12 - begin/end window redraw. ===============*/
static inline
void _ksys_start_draw(){
asm_inline("int $0x40"::"a"(12),"b"(1));
}
static inline
void _ksys_end_draw(){
asm_inline("int $0x40" ::"a"(12),"b"(2));
}
/*============ Function 13 - draw a rectangle in the window. ===========*/
static inline
void _ksys_draw_bar(uint32_t x, uint32_t y, uint32_t w, uint32_t h, ksys_color_t color){
asm_inline(
"int $0x40"
::"a"(13), "d"(color),
"b"((x << 16) | w),
"c"((y << 16) | h)
);
}
/*=================== Function 14 - get screen size. ===================*/
static inline
ksys_pos_t _ksys_screen_size(){
ksys_pos_t size;
ksys_pos_t size_tmp;
asm_inline(
"int $0x40"
:"=a"(size_tmp)
:"a"(14)
);
size.x = size_tmp.y;
size.y = size_tmp.x;
return size;
}
/*== Function 15, subfunction 1 - set a size of the background image. ==*/
static inline
void _ksys_bg_set_size(uint32_t w, uint32_t h){
asm_inline(
"int $0x40"
::"a"(15), "b"(1), "c"(w), "d"(h)
);
}
/*=== Function 15, subfunction 2 - put pixel on the background image. ==*/
static inline
void _ksys_bg_put_pixel(uint32_t x, uint32_t y, uint32_t w, ksys_color_t color){
asm_inline(
"int $0x40"
::"a"(15), "b"(2), "c"((x+y*w)*3), "d"(color)
);
}
/*=========== Function 15, subfunction 3 - redraw background. ==========*/
static inline
void _ksys_bg_redraw(void){
asm_inline(
"int $0x40"
::"a"(15), "b"(3)
);
}
/*== Function 15, subfunction 4 - set drawing mode for the background. =*/
enum KSYS_BG_MODES{
KSYS_BG_MODE_PAVE=1,
KSYS_BG_MODE_STRETCH=2
};
static inline
void _ksys_bg_set_mode(uint32_t mode){
asm_inline(
"int $0x40"
::"a"(15), "b"(4), "c"(mode)
);
}
/*===================== Function 15, subfunction 5 =====================*/
/*============ Put block of pixels on the background image. ============*/
static inline
void _ksys_bg_put_bitmap(ksys_bitmap_t* bitmap, size_t bitmap_size, uint32_t x, uint32_t y, uint32_t w){
asm_inline(
"int $0x40"
::"a"(15), "b"(5), "c"(bitmap), "d"((x+y*w)*3), "S"(bitmap_size)
);
}
/*===================== Function 15, subfunction 6 =====================*/
/*======= Map background data to the address space of process. ==========*/
static inline
ksys_bitmap_t* _ksys_bg_get_map()
{
ksys_bitmap_t *bitmap;
asm_inline(
"int $0x40"
:"=a"(bitmap)
:"a"(15), "b"(6)
);
return bitmap;
}
/*===== Function 15, subfunction 7 - close mapped background data. =====*/
static inline
int _ksys_bg_close_map(ksys_bitmap_t* bitmap)
{
int status; // 1 - OK, 0 - ERROR
asm_inline(
"int $0x40"
:"=a"(status)
:"a"(15), "b"(7), "c"(bitmap)
);
return status;
}
/*===================== Function 15, subfunction 9 =====================*/
/*============= Redraws a rectangular part of the background ===========*/
static inline
void _ksys_bg_redraw_bar(ksys_pos_t angle1, ksys_pos_t angle2)
{
asm_inline(
"int $0x40"
::"a"(15), "b"(9),
"c"(angle1.x*(1<<16)+angle2.x),
"d"(angle1.y*(1<<16)+angle2.y)
);
}
/*=============== Function 16 - save ramdisk on a floppy. ==============*/
static inline
int _ksys_save_ramdisk_fd(uint32_t floppy_id)
{
int status; // 0 - OK, 1 - ERROR
asm_inline(
"int $0x40"
:"=a"(status)
:"a"(16), "b"(floppy_id)
);
return status;
}
/*======= Function 17 - get the identifier of the pressed button. ======*/
static inline
uint32_t _ksys_get_button()
{
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(17)
);
return val>>8;
}
/*===================== Function 18, subfunction 1 =====================*/
/*============= Make deactive the window of the given thread. ==========*/
static inline
void _ksys_unfocus_window(int slot)
{
asm_inline(
"int $0x40"
::"a"(18), "b"(1), "c"(slot)
);
}
/*= Function 18, subfunction 2 - terminate process/thread by the slot. =*/
static inline
void _ksys_kill_by_slot(int slot)
{
asm_inline(
"int $0x40"
::"a"(18), "b"(2), "c"(slot)
);
}
/*===================== Function 18, subfunction 3 =====================*/
/*============= Make active the window of the given thread. ============*/
static inline
void _ksys_focus_window(int slot){
asm_inline(
"int $0x40"
::"a"(18), "b"(3), "c"(slot)
);
}
/*===================== Function 18, subfunction 4 =====================*/
/*=========== Get counter of idle time units per one second. ===========*/
static inline
uint32_t _ksys_get_idle(void){
uint32_t sec;
asm_inline(
"int $0x40"
:"=a"(sec)
:"a"(18), "b"(4)
);
return sec;
}
/*========== Function 18, subfunction 5 - get CPU clock rate. ==========*/
/*================ modulo 2^32 clock ticks = 4GHz ======================*/
static inline
uint32_t _ksys_get_cpu_clock(void){
uint32_t clock;
asm_inline(
"int $0x40"
:"=a"(clock)
:"a"(18), "b"(5)
);
return clock;
}
/* Function 18, subfunction 6 - save ramdisk to the file on hard drive. */
static inline
uint32_t _ksys_save_ramdisk_hd(const char* ramdisk_path){
uint32_t fs_err;
asm_inline(
"int $0x40"
:"=a"(fs_err)
:"a"(18), "b"(6), "c"(ramdisk_path)
);
return fs_err;
}
/* Function 18, subfunction 9 - system shutdown with the parameter. */
enum KSYS_SHD_PARAM {
KSYS_SHD_POWEROFF = 2,
KSYS_SHD_REBOOT = 3,
KSYS_SHD_RESTART_KRN = 4
};
static inline
void _ksys_shutdown(uint32_t shd_param){
asm_inline(
"int $0x40"
::"a"(18), "b"(9), "c"(shd_param)
);
}
/*========= Function 18, subfunction 16 - get size of free RAM. ========*/
static inline
size_t _ksys_get_ram_size(void){
size_t size;
asm_inline(
"int $0x40"
:"=a"(size)
:"a"(18), "b"(16)
);
return size;
}
/*======== Function 18, subfunction 17 - get full amount of RAM. =======*/
static inline
size_t _ksys_get_full_ram(void){
size_t size;
asm_inline(
"int $0x40"
:"=a"(size)
:"a"(18), "b"(17)
);
return size;
}
/*===================== Function 18, subfunction 18 ====================*/
/*============= Terminate process/thread by the identifier. ============*/
static inline
void _ksys_kill_by_pid(uint32_t PID)
{
asm_inline(
"int $0x40"
::"a"(18), "b"(18), "c"(PID)
);
}
static inline
int _ksys_get_thread_slot(int PID){
int val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(18), "b"(21), "c"(PID)
);
return val;
}
/*============= Function 23 - wait for event with timeout. =============*/
static inline
uint32_t _ksys_wait_event_timeout(uint32_t timeout){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(23), "b"(timeout)
);
return val;
}
/*=== Function 26, subfunction 9 - get the value of the time counter. ==*/
static inline
uint32_t _ksys_get_tick_count(){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(26),"b"(9)
);
return val;
}
/*===================== Function 26, subfunction 10 ====================*/
/*========== Get the value of the high precision time counter. =========*/
static inline
uint64_t _ksys_get_ns_count(){
uint64_t val;
asm_inline(
"int $0x40"
:"=A"(val)
:"a"(26), "b"(10)
);
return val;
}
/*=================== Function 29 - get system date. ===================*/
static inline
ksys_date_t _ksys_get_date(){
ksys_date_t val;
asm_inline("int $0x40":"=a"(val):"a"(29));
return val;
}
/*===========+ Function 30 - work with the current folder.==============*/
/*--------- Subfunction 1 - set current folder for the thread. ---------*/
static inline
void _ksys_setcwd(char* dir){
asm_inline(
"int $0x40"
::"a"(30), "b"(1), "c"(dir)
);
}
/*--------- Subfunction 2 - get current folder for the thread. ---------*/
static inline
int _ksys_getcwd(char* buf, int bufsize){
register int val;
asm_inline(
"int $0x40"
:"=a"(val):"a"(30), "b"(2), "c"(buf), "d"(bufsize)
);
return val;
}
/* ---- Subfunction 3 - install the add.system directory for the kernel ------*/
static inline
int _ksys_set_kernel_dir(ksys_dir_key_t *table){
register int val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(30), "b"(3), "c"(table)
:"memory"
);
return val;
}
/*=================== Function 37 - work with mouse. ===================*/
enum KSYS_MOUSE_POS{
KSYS_MOUSE_SCREEN_POS = 0,
KSYS_MOUSE_WINDOW_POS = 1
};
static inline
ksys_pos_t _ksys_get_mouse_pos(int origin){
ksys_pos_t pos;
asm_inline(
"int $0x40 \n\t"
"rol $16, %%eax"
:"=a"(pos)
:"a"(37),"b"(origin)
);
return pos;
}
static inline
uint32_t _ksys_get_mouse_buttons(void){ // subfunction 2 - states of the mouse buttons
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(37),"b"(2)
);
return val;
}
static inline
uint32_t _ksys_get_mouse_eventstate(void){ // subfunction 3 - states and events of the mouse buttons
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(37),"b"(3)
);
return val;
}
static inline
uint32_t _ksys_load_cursor(void *path, uint32_t flags) { // subfunction 4 - load cursor
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(37), "b"(4), "c"(path), "d"(flags)
:"memory"
);
return val;
}
static inline
uint32_t _ksys_set_cursor(uint32_t cursor){ // subfunction 5 - set curso
uint32_t old;
asm_inline(
"int $0x40"
:"=a"(old)
:"a"(37), "b"(5), "c"(cursor)
);
return old;
}
static inline
int _ksys_delete_cursor(uint32_t cursor){ // subfunction 6 - delete curso
int ret;
asm_inline(
"int $0x40"
:"=a"(ret)
:"a"(37), "b"(6), "c"(cursor)
:"memory"
);
return ret;
}
static inline
uint32_t _ksys_get_mouse_wheels(void) // subfunction 7 - get scroll data
{
uint32_t val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(37),"b"(7)
);
return val;
}
/*=========== Function 40 - set the mask for expected events. ==========*/
enum KSYS_EVENT_MASK{
KSYS_EVM_REDRAW = 1,
KSYS_EVM_KEY = 2,
KSYS_EVM_BUTTON = 4,
KSYS_EVM_EXIT = 8,
KSYS_EVM_BACKGROUND = 16,
KSYS_EVM_MOUSE = 32,
KSYS_EVM_IPC = 64,
KSYS_EVM_STACK = 128,
KSYS_EVM_DEBUG = 256,
KSYS_EVM_STACK2 = 512,
KSYS_EVM_MOUSE_FILTER = 0x80000000,
KSYS_EVM_CURSOR_FILTER = 0x40000000,
};
static inline
uint32_t _ksys_set_event_mask(uint32_t mask){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(40), "b"(mask)
);
return val;
}
/*====================== Function 38 - draw line. ======================*/
static inline
void _ksys_draw_line(int xs, int ys, int xe, int ye, ksys_color_t color)
{
asm_inline(
"int $0x40"
::"a"(38), "d"(color),
"b"((xs << 16) | xe),
"c"((ys << 16) | ye)
);
}
/*============= Function 47 - draw a number in the window. =============*/
static inline
void _ksys_draw_number(int number, int x, int y, int len, ksys_color_t color){
unsigned fmt;
fmt = len << 16 | 0x80000000; // no leading zeros + width
asm_inline(
"int $0x40"
::"a"(47), "b"(fmt), "c"(number), "d"((x << 16) | y), "S"(color)
);
}
static inline
void _ksys_draw_number_bg(unsigned number, int x, int y, int len, ksys_color_t color, ksys_color_t bg){
unsigned fmt;
fmt = len << 16 | 0x80000000; // no leading zeros + width
asm_inline(
"int $0x40"
::"a"(47), "b"(fmt), "c"(number), "d"((x << 16) | y), "S"(color), "D"(bg)
);
}
/*====== Function 48, subfunction 3 - get standard window colors. ======*/
static inline
void _ksys_get_system_colors(ksys_colors_table_t *color_table)
{
asm_inline(
"int $0x40"
::"a"(48),"b"(3),"c"(color_table),"d"(40)
);
}
/*============ Function 48, subfunction 4 - get skin height. ===========*/
static inline
uint32_t _ksys_get_skin_height(){
unsigned height;
asm_inline(
"int $0x40"
:"=a"(height)
:"a"(48),"b"(4)
);
return height;
}
/*==================== Function 51 - create thread. ====================*/
static inline
int _ksys_start_thread(void* thread_entry, void* stack_top){
int val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(51), "b"(1), "c"(thread_entry), "d"(stack_top)
);
return val;
}
/*==================== Function 54, subfunction 0 ======================*/
/*============== Get the number of slots in the clipboard. =============*/
enum KSYS_CLIP_ENCODING{
KSYS_CLIP_UTF8 = 0,
KSYS_CLIP_CP866 = 1,
KSYS_CLIP_CP1251 = 2
};
enum KSYS_CLIP_TYPES{
KSYS_CLIP_TEXT = 0,
KSYS_CLIP_IMAGE = 1,
KSYS_CLIP_RAW = 2
};
static inline
int _ksys_clip_num(){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(54), "b"(0)
);
return val;
}
/*==================== Function 54, subfunction 1 ======================*/
/*================= Read the data from the clipboard. ==================-*/
static inline
char* _ksys_clip_get(int n) { // returned buffer must be freed by _ksys_free()
char* val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(54), "b"(1), "c"(n)
);
return val;
}
/*==================== Function 54, subfunction 2 ======================*/
/*================= Write the data to the clipboard. ===================*/
static inline
int _ksys_clip_set(int n, char *buffer){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(54), "b"(2), "c"(n), "d"(buffer)
:"memory"
);
return val;
}
/*===================== Function 54, subfunction 3 =====================*/
/*================ Delete the last slot in the clipboard ===============*/
static inline
int _ksys_clip_pop(){
unsigned val;
asm_inline (
"int $0x40"
:"=a"(val)
:"a"(54), "b"(3)
);
return val;
}
/*===================== Function 54, subfunction 4 =====================*/
/*===================== Alarm reset the lock buffer ====================*/
static inline
int _ksys_clip_unlock(){
unsigned val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(54), "b"(4)
);
return val;
}
/*============== Function 63 - work with the debug board. ==============*/
static inline
void _ksys_debug_putc(char c){
asm_inline("int $0x40"::"a"(63), "b"(1), "c"(c));
}
static inline
void _ksys_debug_puts(char *s){
unsigned i=0;
while (*(s+i)){
asm_inline ("int $0x40"::"a"(63), "b"(1), "c"(*(s+i)));
i++;
}
}
/*========= Function 67 - change position/sizes of the window. =========*/
static inline
void _ksys_change_window(int new_x, int new_y, int new_w, int new_h){
asm_inline(
"int $0x40"
::"a"(67), "b"(new_x), "c"(new_y), "d"(new_w),"S"(new_h)
);
}
/*======== Function 68, subfunction 12 - allocate memory block. ========*/
static inline
void* _ksys_alloc(size_t size){
void *val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(68),"b"(12),"c"(size)
);
return val;
}
/*========== Function 68, subfunction 13 - free memory block. ==========*/
static inline
int _ksys_free(void *mem){
int val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(68),"b"(13),"c"(mem)
);
return val;
}
/*============= Function 68, subfunction 16 - load driver. =============*/
static inline
ksys_drv_hand_t _ksys_load_driver(char *driver_name)
{
ksys_drv_hand_t driver_h;
asm_inline(
"int $0x40"
:"=a"(driver_h)
:"a"(68), "b"(16), "c"(driver_name)
);
return driver_h;
}
/*============ Function 68, subfunction 17 - driver control. ===========*/
static inline
unsigned _ksys_driver_control(ksys_ioctl_t *ioctl)
{
unsigned status;
asm_inline(
"int $0x40"
:"=a"(status)
:"a"(68), "b"(17), "c"(ioctl)
:"memory"
);
return status;
}
/*== Function 68, subfunction 18 - subfunction 19 - load DLL (MS COFF) ==*/
static inline
ksys_dll_t* _ksys_dlopen(const char* path){
ksys_dll_t *table;
asm_inline(
"int $0x40"
:"=a"(table)
:"a"(68),"b"(19), "c"(path)
:"memory"
);
return table;
}
/* It is not a system call, it serves as an auxiliary tool*/
static inline
void* _ksys_dlsym(ksys_dll_t *table, const char* fun_name){
unsigned i=0;
while (1){
if (!(table+i)->func_name){
break;
}else{
if (!_ksys_strcmp(fun_name, (table+i)->func_name)){
return (table+i)->func_ptr;
}
}
i++;
}
return NULL;
}
/* Function 68, subfunction 20 - reallocate memory block.*/
static inline
void* _ksys_realloc(void *mem, size_t size){
void *val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(68),"b"(20),"c"(size),"d"(mem)
:"memory"
);
return val;
}
/* Function 68, subfunction 21 - load driver by full name. */
static inline
ksys_drv_hand_t _ksys_load_driver_opt(char *driver_path, char *cmd_line)
{
ksys_drv_hand_t driver_h;
asm_inline(
"int $0x40"
:"=a"(driver_h)
:"a"(68), "b"(21), "c"(driver_path), "d"(cmd_line)
);
return driver_h;
}
/*======== Function 68, subfunction 22 - open named memory area. =======*/
enum KSYS_SHM_MODE{
KSYS_SHM_OPEN = 0x00,
KSYS_SHM_OPEN_ALWAYS = 0x04,
KSYS_SHM_CREATE = 0x08,
KSYS_SHM_READ = 0x00,
KSYS_SHM_WRITE = 0x01,
};
static inline
int _ksys_shm_open(char *name, int mode, int size, char **new_shm)
{
int error;
asm_inline(
"int $0x40"
:"=a"(*new_shm), "=d"(error)
:"a"(68), "b"(22), "c"(name), "d"(size), "S"(mode)
);
return error;
}
/*======= Function 68, subfunction 23 - close named memory area. =======*/
static inline
void _ksys_shm_close(char *shm_name)
{
asm_inline(
"int $0x40":
:"a"(68), "b"(23), "c"(shm_name)
);
}
/*====== Function 68, subfunction 26 - release memory pages ============*/
static inline
int* _ksys_unmap(void *base, size_t offset, size_t size){
int *val;
asm_inline(
"int $0x40"
:"=a"(val)
:"a"(68),"b"(26),"c"(base),"d"(offset),"S"(size)
);
return val;
}
/*========== Function 68, subfunction 27 - load file ===================*/
static inline
ksys_ufile_t _ksys_load_file(const char *path)
{
ksys_ufile_t uf;
asm_inline(
"int $0x40"
:"=a"(uf.data), "=d"(uf.size)
:"a"(68), "b"(27),"c"(path)
:"memory"
);
return uf;
}
/*==== Function 68, subfunction 28 - load file, specifying the encoding ===*/
static inline
ksys_ufile_t _ksys_load_file_enc(const char *path, unsigned file_encoding)
{
ksys_ufile_t uf;
asm_inline(
"int $0x40"
:"=a"(uf.data), "=d"(uf.size)
:"a"(68), "b"(28),"c"(path), "d"(file_encoding)
:"memory"
);
return uf;
}
/*==== Function 70 - work with file system with long names support. ====*/
static inline
int _ksys_work_files(const ksys70_t *k)
{
int status;
asm_inline(
"int $0x40"
:"=a"(status)
:"a"(70), "b"(k)
:"memory"
);
return status;
}
/*====== Function 70, subfunction 0 - read file with long names support. ======*/
static inline
int _ksys_file_read_file(const char *name, unsigned long long offset, unsigned size, void *buf, unsigned *bytes_read)
{
ksys70_t k;
k.p00 = 0;
k.p04 = offset;
k.p12 = size;
k.buf16 = buf;
k.p20 = 0;
k.p21 = name;
int status;
unsigned bytes_read_v;
asm_inline(
"int $0x40"
:"=a"(status), "=b"(bytes_read_v)
:"a"(70), "b"(&k)
:"memory"
);
if (!status) {
*bytes_read = bytes_read_v;
}
return status;
}
/*===================== Function 70, subfunction 2 =====================*/
/*============ Create/rewrite file with long names support. ============*/
static inline
int _ksys_file_create(const char* name){
ksys70_t k;
k.p00 = 2;
k.p12 = 0;
k.p21 = name;
return _ksys_work_files(&k);
}
/*===================== Function 70, subfunction 3 =====================*/
/*=========== Write to existing file with long names support. ==========*/
static inline
int _ksys_file_write_file(const char *name, unsigned long long offset, unsigned size, const void *buf, unsigned *bytes_written)
{
ksys70_t k;
k.p00 = 3;
k.p04 = offset;
k.p12 = size;
k.cbuf16 = buf;
k.p20 = 0;
k.p21 = name;
int status;
unsigned bytes_written_v;
asm_inline(
"int $0x40"
:"=a"(status), "=b"(bytes_written_v)
:"a"(70), "b"(&k)
:"memory"
);
if (!status) {
*bytes_written = bytes_written_v;
}
return status;
}
/*========== Function 70, subfunction 5 - get information on file/folder. =====*/
static inline
int _ksys_file_get_info(const char *name, ksys_bdfe_t *bdfe)
{
ksys70_t k;
k.p00 = 5;
k.bdfe = bdfe;
k.p20 = 0;
k.p21 = name;
return _ksys_work_files(&k);
}
/*=========== Function 70, subfunction 7 - start application. ===========*/
static inline
int _ksys_exec(char *app_name, char *args)
{
ksys70_t file_opt;
file_opt.p00 = 7;
file_opt.p04dw = 0;
file_opt.p08dw = (unsigned)args;
file_opt.p21 = app_name;
return _ksys_work_files(&file_opt);
}
/*========== Function 70, subfunction 8 - delete file/folder. ==========*/
static inline
int _ksys_file_delete(const char *name)
{
ksys70_t k;
k.p00 = 8;
k.p20 = 0;
k.p21 = name;
return _ksys_work_files(&k);
}
/*============= Function 70, subfunction 9 - create folder. ============*/
static inline
int _ksys_mkdir(const char *path)
{
ksys70_t dir_opt;
dir_opt.p00 = 9;
dir_opt.p21 = path;
return _ksys_work_files(&dir_opt);
}
/*============= Function 70, subfunction 10 - rename/move. =============*/
static inline
int _ksys_file_rename(const char *name, const char *new_name)
{
ksys70_t k;
k.p00 = 10;
k.new_name = new_name;
k.p20 = 0;
k.p21 = name;
return _ksys_work_files(&k);
}
/* ######### Old names of functions and structures. Do not use again! ##########*/
#define _ksys_get_event _ksys_wait_event
#endif // _KSYS_H_