Code: Select all

MAX_HEAP_SIZE = $60000000
proc mem.realloc_heap, .heapptr, .newsize, .oldsize
begin
        push    eax ebx ecx edx

        mov     eax, sys_f68
        mov     ebx, 20
        mov     ecx, [.newsize]
        mov     edx, [__ptrHeapStart]
        int     $40

        mov     eax, sys_f68
        mov     ebx, 20
        mov     ecx, MAX_HEAP_SIZE
        mov     edx, [__ptrHeapStart]
        int     $40

        cmp     eax, [__ptrHeapStart]
        jne     .error

        pop     edx ecx ebx eax
        return

.error:
        int3
endp

Code: Select all

void mutex_lock(volatile uint32_t *val)
{
    uint32_t tmp;

    __asm__ __volatile__ (
"0:\n\t"
    "mov %0, %1\n\t"
    "testl %1, %1\n\t"
    "jz 1f\n\t"

    "movl $68, %%eax\n\t"
    "movl $1,  %%ebx\n\t"
    "int  $0x40\n\t"
    "jmp 0b\n\t"
"1:\n\t"
    "incl %1\n\t"
    "xchgl %0, %1\n\t"
    "testl %1, %1\n\t"
    "jnz 0b\n"
    : "+m" (*val), "=&r"(tmp)
    ::"eax","ebx" );
}

static inline void mutex_unlock(volatile uint32_t *val)
{
    *val = 0;
}

Code: Select all

proc mutex_lock, .ptrMutex
begin
        push    ebx ecx esi
        mov     esi, [.ptrMutex]

.loop:
        mov     ecx, [esi]
        test    ecx, ecx
        jz      .free

        mov     eax, 68
        mov     ebx, 1
        int     $40
        jmp     .loop

.free:
        inc     ecx
        xchg    ecx, [esi]
        test    ecx, ecx
        jnz     .loop

        pop     esi ecx ebx
        return
endp