forked from KolibriOS/kolibrios
132 lines
3.6 KiB
C
132 lines
3.6 KiB
C
/***************************************************************************************************
|
|
* Copyright (C) Vasiliy Kosenko (vkos), 2009 *
|
|
* This program is free software: you can redistribute it and/or modify it under the terms of the *
|
|
* GNU General Public License as published by the Free Software Foundation, either version 3 *
|
|
* of the License, or (at your option) any later version. *
|
|
* *
|
|
* This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; *
|
|
* without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See *
|
|
* the GNU General Public License for more details. *
|
|
* *
|
|
* You should have received a copy of the GNU General Public License along with this program. *
|
|
* If not, see <http://www.gnu.org/licenses/>. *
|
|
***************************************************************************************************/
|
|
|
|
/***************************************************************************************************
|
|
* kolibri.c - KolibriOS system functions *
|
|
***************************************************************************************************/
|
|
|
|
#include "kolibri.h"
|
|
#include "malloc.h"
|
|
|
|
/*
|
|
* IPC functions & data
|
|
*/
|
|
|
|
kolibri_IPC_area_t *kolibri_IPC_area;
|
|
|
|
int kolibri_IPC_set_area(void *area, int size){
|
|
int result;
|
|
|
|
asm("int $0x40":"=a"(result):"a"(60),"b"(1),"c"(area),"d"(size));
|
|
|
|
return result;
|
|
}
|
|
|
|
int kolibri_IPC_send(int tid, void *msg, int length){
|
|
int result;
|
|
|
|
asm("movl %5, %%esi\nint $0x40":"=a"(result):"a"(60),"b"(2),"c"(tid),"d"(msg),"g"(length));
|
|
|
|
return result;
|
|
}
|
|
|
|
void kolibri_IPC_unlock(){
|
|
kolibri_IPC_area->lock = 0;
|
|
}
|
|
|
|
void kolibri_IPC_lock(){
|
|
kolibri_IPC_area->lock = 1;
|
|
}
|
|
|
|
int kolibri_IPC_init(void *area, int size){
|
|
kolibri_IPC_area = (kolibri_IPC_area_t *)area;
|
|
kolibri_IPC_area->size = 8;
|
|
|
|
return kolibri_IPC_set_area(area, size);
|
|
}
|
|
|
|
kolibri_IPC_message_t *kolibri_IPC_get_next_message(){
|
|
kolibri_IPC_lock();
|
|
return (kolibri_IPC_message_t *)((char *)kolibri_IPC_area+sizeof(kolibri_IPC_area_t));
|
|
}
|
|
|
|
void kolibri_IPC_clear_buff(){
|
|
kolibri_IPC_area->size = 8;
|
|
kolibri_IPC_unlock();
|
|
}
|
|
|
|
/*
|
|
* Other process/thread functions
|
|
*/
|
|
|
|
int kolibri_get_my_tid(){
|
|
kolibri_process_info_t *info = malloc(0x400);
|
|
int tid;
|
|
|
|
kolibri_get_process_info(info, -1);
|
|
tid = info->tid;
|
|
free(info);
|
|
|
|
return tid;
|
|
}
|
|
|
|
int kolibri_get_process_info(kolibri_process_info_t *info, int slot){
|
|
int max_slot;
|
|
|
|
asm("int $0x40":"=a"(max_slot):"a"(9),"b"(info),"c"(slot));
|
|
|
|
return max_slot;
|
|
}
|
|
|
|
/*
|
|
* Memory functions
|
|
*/
|
|
|
|
kolibri_memarea_t kolibri_new_named_memory(char *name, int size, int flags){
|
|
kolibri_memarea_t area;
|
|
|
|
asm("pushl %%esi\nmovl %6, %%esi\nint $0x40\npopl %%esi":"=a"(area.addr),"=d"(area.error):"a"(68),"b"(22),"c"(name),"d"(size),"g"(flags));
|
|
|
|
return area;
|
|
}
|
|
|
|
int kolibri_heap_init(){
|
|
int size;
|
|
|
|
asm("int $0x40":"=a"(size):"a"(68),"b"(11));
|
|
|
|
return size;
|
|
}
|
|
|
|
void *kolibri_malloc(int nbytes){
|
|
void *addr;
|
|
|
|
asm("int $0x40":"=a"(addr):"a"(68),"b"(12),"c"(nbytes));
|
|
|
|
return addr;
|
|
}
|
|
|
|
/*
|
|
* Events functions
|
|
*/
|
|
void kolibri_set_event_mask(int mask){
|
|
asm("int $0x40"::"a"(40),"b"(mask));
|
|
}
|
|
|
|
int kolibri_event_wait(){
|
|
int event;
|
|
asm("int $0x40":"=a"(event):"a"(10));
|
|
return event;
|
|
}
|