Subversion Repositories Kolibri OS

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

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

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

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

;;                                                              ;;

;;                                                              ;;

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

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

$Revision: 2212 $

$Revision: 2382 $

proc map_io_mem stdcall, base:dword, size:dword, flags:dword

proc map_io_mem stdcall, base:dword, size:dword, flags:dword

           push ebx

        push    ebx

           push edi

        push    edi

           mov eax, [size]

        add     eax, [base]

           add eax, 4095

        add     eax, 4095

           and eax, -4096

        sub     eax, ecx

           mov [size], eax

           stdcall alloc_kernel_space, eax

        stdcall alloc_kernel_space, eax

           test eax, eax

        test    eax, eax

           jz .fail

        jz      .fail

           shr ecx, 12

        shr     ecx, 12

           and edx, -4096

        and     edx, -4096

           or edx, [flags]

        or      edx, [flags]

@@:

@@:

           mov [page_tabs+eax*4], edx

        mov     [page_tabs+eax*4], edx

           invlpg [ebx]

        invlpg  [ebx]

           inc eax

        inc     eax

           add ebx, edi

        add     ebx, edi

           add edx, edi

        add     edx, edi

           loop @B

        loop    @B

;  ebx= linear address

;  ebx= linear address

;  ecx= count

;  ecx= count

align 4

align 4

           push edi

commit_pages:

           test ecx, ecx

        test    ecx, ecx

           mov edx, 0x1000

        mov     edi, ebx

           jnz @B

        add     ebx, 0x1000

           mov [pg_data.pg_mutex],ecx

        mov     ecx, pg_data.mutex

.fail:

        call    mutex_unlock

           pop edi

.fail:

           ret

        ret

align 4

align 4

release_pages:

           pushad

        mov     edi, eax

           mov ebx, pg_data.pg_mutex

           call wait_mutex      ;ebx

        shr     esi, 12

        lea     esi, [page_tabs+esi*4]

           mov esi, eax

           mov edi, eax

        push    ecx

           shr esi, 10

        mov     ecx, pg_data.mutex

        call    mutex_lock

           mov ebp, [pg_data.pages_free]

        pop     ecx

           mov ebx, [page_start]

           mov ebx, eax

        mov     ebx, eax

.next:

.next:

           add edi, 0x1000

        add     edi, 0x1000

           jnz @B

           popad

        pop     ebp

           ret

        ret

; param

; param

endp

endp

align 4

align 4

           mov ebx, pg_data.pg_mutex

        mov     ecx, pg_data.mutex

           call wait_mutex    ;ebx

        call    mutex_lock

           mov edi, [new_size]

        mov     edi, [new_size]

           push eax

        push    eax

           invlpg [ebx]

        invlpg  [ebx]

           pop eax

        pop     eax

           call free_page

        call    free_page

.next:     add edi, 1

        add     edi, 1

           cmp edi, esi

        cmp     edi, esi

           jb @B

        jb      @B

.update_size:

.update_size:

           mov     ebx, [new_size]

        mov     ecx, pg_data.mutex

        call    mutex_unlock

           xor eax, eax

           dec [pg_data.pg_mutex]

        xor     eax, eax

           ret

        ret

.out_of_memory:

.out_of_memory:

;//-

;//-

           pop edi

        pop     edi

           pop esi

        pop     esi

.exit:

.exit:

           xor eax, eax

        xor     eax, eax

           inc eax

        inc     eax

           ret

        ret

endp

endp

update_mem_size:

update_mem_size:

;           test eax, eax

;           test eax, eax

;           jz @f

;           jz @f

;          and eax, 0xFFFFF000

;          and eax, 0xFFFFF000

;           stdcall map_page, edi, eax

;           stdcall map_page, edi, eax

@@:        mov edi, [lin_addr]

        mov     edi, [lin_addr]

           and edi, 0xFFFFF000

        and     edi, 0xFFFFF000

           mov ecx, [buf_size]

        mov     ecx, [buf_size]

           add ecx, 4095

        add     ecx, 4095

           shr ecx, 12

        shr     ecx, 12

           and eax, 0xFFFFF000

        and     eax, 0xFFFFF000

           test eax, eax

        test    eax, eax

           jz .exit

        jz      .exit

           stdcall map_page,edi,eax,PG_UW

        stdcall map_page, edi, eax, PG_UW

@@:        mov edi, [lin_addr]

        mov     edi, [lin_addr]

           and edi, 0xFFFFF000

        and     edi, 0xFFFFF000

           mov ecx, [buf_size]

        mov     ecx, [buf_size]

           add ecx, 4095

        add     ecx, 4095

           shr ecx, 12

        shr     ecx, 12

        add edx, ecx

        add     edx, ecx

        add edx, 4095

        add     edx, 4095

.touch:

.touch: mov eax, [ecx]

        mov     eax, [ecx]

        add ecx, 0x1000

        add     ecx, 0x1000

        cmp ecx, edx

        cmp     ecx, edx