Subversion Repositories Kolibri OS

;; Copyright (C) KolibriOS team 2004-2022. All rights reserved. ;;

;; Copyright (C) KolibriOS team 2004-2022. All rights reserved. ;;

;; Distributed under terms of the GNU General Public License    ;;

;; Distributed under terms of the GNU General Public License    ;;

;;                                                              ;;

;;                                                              ;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

$Revision: 9910 $

$Revision: 9911 $

; this will allocate physical page and a linear address somewhere,

; this will allocate physical page and a linear address somewhere,

; and deallocate only linear address with free_kernel_space.

; and deallocate only linear address with free_kernel_space.

        stdcall kernel_alloc, PAGE_SIZE

        stdcall kernel_alloc, PAGE_SIZE

        mov     edi, eax

        mov     edi, eax

        mov     esi, master_tab

        mov     esi, master_tab

        rep movsd

        rep movsd

        mov     ecx, [master_tab + (OS_BASE shr 20)]

        mov     ecx, [master_tab + (OS_BASE shr 20)]

        mov     [eax], ecx

        mov     [eax], ecx

        mov     edi, eax

        mov     edi, eax

        call    get_pg_addr

        call    get_pg_addr

        cmp     [ebx + PROC.heap_base], 0

        cmp     [ebx + PROC.heap_base], 0

        jne     .exit

        jne     .exit

        mov     edi, [new_size]

        mov     edi, [new_size]

        and     edi, not 4095

        and     edi, -PAGE_SIZE

        mov     [new_size], edi

        mov     [new_size], edi

        add     esi, PAGE_SIZE-1

        add     esi, PAGE_SIZE-1

        and     esi, not 4095

        and     esi, -PAGE_SIZE