forked from KolibriOS/kolibrios
106 lines
1.8 KiB
C
106 lines
1.8 KiB
C
#ifndef INCLUDE_MEM_H
|
|
#define INCLUDE_MEM_H
|
|
#print "[include <mem.h>]\n"
|
|
|
|
#ifndef INCLUDE_KOLIBRI_H
|
|
#include "../lib/kolibri.h"
|
|
#endif
|
|
|
|
dword mem_init()
|
|
{
|
|
$push ebx
|
|
$mov eax, 68
|
|
$mov ebx, 11
|
|
$int 0x40
|
|
|
|
$pop ebx
|
|
return EAX;
|
|
}
|
|
|
|
dword malloc(dword size)
|
|
{
|
|
$push ebx
|
|
$push ecx
|
|
$mov eax, 68
|
|
$mov ebx, 12
|
|
$mov ecx, size
|
|
$int 0x40
|
|
|
|
$pop ecx
|
|
$pop ebx
|
|
return EAX;
|
|
}
|
|
|
|
stdcall dword realloc(dword mptr, size)
|
|
{
|
|
$push ebx
|
|
$push ecx
|
|
$push edx
|
|
$mov eax, 68
|
|
$mov ebx, 20
|
|
$mov ecx, size
|
|
$mov edx, mptr
|
|
$int 0x40
|
|
|
|
$pop edx
|
|
$pop ecx
|
|
$pop ebx
|
|
return EAX;
|
|
}
|
|
|
|
dword free(dword mptr)
|
|
{
|
|
$push eax
|
|
$push ebx
|
|
$push ecx
|
|
$mov eax, 68
|
|
$mov ebx, 13
|
|
$mov ecx, mptr
|
|
$test ecx, ecx
|
|
$jz end0
|
|
$int 0x40
|
|
@end0:
|
|
$pop ecx
|
|
$pop ebx
|
|
$pop eax
|
|
return 0;
|
|
}
|
|
|
|
inline fastcall memmov( EDI, ESI, ECX)
|
|
{
|
|
asm {
|
|
MOV EAX, ECX
|
|
CMP EDI, ESI
|
|
JG L1
|
|
JE L2
|
|
SAR ECX, 2
|
|
JS L2
|
|
REP MOVSD
|
|
MOV ECX, EAX
|
|
AND ECX, 3
|
|
REP MOVSB
|
|
JMP SHORT L2
|
|
L1: LEA ESI, DSDWORD[ ESI+ECX-4]
|
|
LEA EDI, DSDWORD[ EDI+ECX-4]
|
|
SAR ECX, 2
|
|
JS L2
|
|
STD
|
|
REP MOVSD
|
|
MOV ECX, EAX
|
|
AND ECX, 3
|
|
ADD ESI, 3
|
|
ADD EDI, 3
|
|
REP MOVSB
|
|
CLD
|
|
L2:
|
|
}
|
|
}
|
|
|
|
|
|
|
|
#define mem_Alloc malloc
|
|
#define mem_ReAlloc realloc
|
|
#define mem_Free free
|
|
#define mem_Init mem_init
|
|
|
|
#endif |