Subversion Repositories Kolibri OS

format binary as "mnt"

format binary as "mnt"

include 'macros.inc'

include 'macros.inc'

$Revision: 8962 $

$Revision: 9045 $

display_number:

display_number:

; add check pointers

; add check pointers

        test    bl, bl

        test    bl, bl

        jz      @f

        jz      @f

        stdcall is_region_userspace, ecx, 1

        stdcall is_region_userspace, ecx, 1

        ret

        ret

@@:

@@:

        test    esi, 0x08000000

        test    esi, 0x08000000

        jz      @f

        jz      @f

        stdcall is_region_userspace, edi, 1

        stdcall is_region_userspace, edi, 1

        ret

        ret

@@:

@@:

;It is not optimization

;It is not optimization

        mov     eax, ebx

        mov     eax, ebx

        mov     ebx, ecx

        mov     ebx, ecx

        dec     ecx

        dec     ecx

        jnz     .shift

        jnz     .shift

        ; if given memory address belongs to kernel then error

        ; if given memory address belongs to kernel then error

        jz      .addr_error

        jnz     .addr_error

        mov     eax, keymap

        mov     eax, keymap

        mov     ecx, 128

        mov     ecx, 128

; 2 = layout with pressed Shift

; 2 = layout with pressed Shift

        dec     ecx

        dec     ecx

        jnz     .alt

        jnz     .alt

        jz      .addr_error

        jnz     .addr_error

        mov     eax, keymap_shift

        mov     eax, keymap_shift

        mov     ecx, 128

        mov     ecx, 128

; 3 = layout with pressed Alt

; 3 = layout with pressed Alt

        dec     ecx

        dec     ecx

        jne     .country

        jne     .country

        jz      .addr_error

        jnz     .addr_error

        mov     eax, keymap_alt

        mov     eax, keymap_alt

        mov     ecx, 128

        mov     ecx, 128

sysfn_getdiskinfo:      ; 18.11 = get disk info table

sysfn_getdiskinfo:      ; 18.11 = get disk info table

        dec     ecx

        dec     ecx

        jnz     .exit

        jnz     .exit

.small_table:

.small_table:

        stdcall is_region_userspace, edx, DRIVE_DATA_SIZE

        stdcall is_region_userspace, edx, DRIVE_DATA_SIZE

        mov     edi, edx

        mov     edi, edx

        mov     esi, DRIVE_DATA

        mov     esi, DRIVE_DATA

        mov     ecx, DRIVE_DATA_SIZE ;10

        mov     ecx, DRIVE_DATA_SIZE ;10

        cld

        cld

        rep movsb

        rep movsb

        ret

        ret

;------------------------------------------------------------------------------

;------------------------------------------------------------------------------

sysfn_getversion:       ; 18.13 = get kernel ID and version

sysfn_getversion:       ; 18.13 = get kernel ID and version

        ; if given memory address belongs to kernel then error

        ; if given memory address belongs to kernel then error

        stdcall is_region_userspace, ecx, version_end-version_inf

        stdcall is_region_userspace, ecx, version_end-version_inf

        mov     edi, ecx

        mov     edi, ecx

        mov     esi, version_inf

        mov     esi, version_inf

        mov     ecx, version_end-version_inf

        mov     ecx, version_end-version_inf

        cmp     ebx, 5                     ; BLOCK MOVE TO BGR

        cmp     ebx, 5                     ; BLOCK MOVE TO BGR

        jnz     nosb5

        jnz     nosb5

; add check pointer

; add check pointer

        jz      .fin

        jnz     .fin

        cmp     [img_background], static_background_data

        cmp     [img_background], static_background_data

        jnz     @f

        jnz     @f

;  +26 dword     used mem

;  +26 dword     used mem

;  +30 dword     PID , process idenfification number

;  +30 dword     PID , process idenfification number

;

;

        ; if given memory address belongs to kernel then error

        ; if given memory address belongs to kernel then error

        stdcall is_region_userspace, ebx, 0x4C

        stdcall is_region_userspace, ebx, 0x4C

        cmp     ecx, -1 ; who am I ?

        cmp     ecx, -1 ; who am I ?

        jne     .no_who_am_i

        jne     .no_who_am_i

        mov     ecx, [current_slot_idx]

        mov     ecx, [current_slot_idx]

        shr     ecx, 16

        shr     ecx, 16

        imul    eax, ecx

        imul    eax, ecx

        lea     eax, [eax*3]

        lea     eax, [eax*3]

        stdcall is_region_userspace, ebx, eax

        stdcall is_region_userspace, ebx, eax

        pop     ecx

        pop     ecx

sys_putimage:

sys_putimage:

        test    ecx, 0x80008000

        test    ecx, 0x80008000

        jnz     .exit

        jnz     .exit

        mov     ax, cx

        mov     ax, cx

        shr     ecx, 16

        shr     ecx, 16

        imul    eax, ecx

        imul    eax, ecx

        stdcall is_region_userspace, ebx, eax

        stdcall is_region_userspace, ebx, eax

        pop     ecx

        pop     ecx

        mov     eax, [current_slot_idx]

        mov     eax, [current_slot_idx]

        shl     eax, 8

        shl     eax, 8

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]

        add     dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]

align 4

align 4

syscall_writetext:                      ; WriteText

syscall_writetext:                      ; WriteText

        stdcall is_region_userspace, edx, esi

        stdcall is_region_userspace, edx, esi

        jz      .err

        jnz     .err

        mov     eax, [TASK_BASE]

        mov     eax, [TASK_BASE]

        xor     edi, edi

        xor     edi, edi

        jmp     dtext

        jmp     dtext

@@:     ;  check pointer

@@:     ;  check pointer

        jz      .err

        jnz     .err

        jmp     dtext

        jmp     dtext

.err:

.err:

        ret

        ret

        mov     ebp, edx

        mov     ebp, edx

        lea     ebp, [ebp*3]

        lea     ebp, [ebp*3]

        imul    ebp, esi

        imul    ebp, esi

        jz      .exit

        jnz     .exit

        mov     ebp, edx

        mov     ebp, edx

        mov     ebp, edx

        mov     ebp, edx

        lea     ebp, [ebp*4]

        lea     ebp, [ebp*4]

        imul    ebp, esi

        imul    ebp, esi

        jz      .exit

        jnz     .exit

        mov     ebp, edx

        mov     ebp, edx

; @param base Base address of region

; @param base Base address of region

; @param len Lenght of region

; @param len Lenght of region

; @return ZF = 1 if region in userspace memory,

; @return ZF = 1 if region in userspace memory,

;         ZF = 0 otherwise

;         ZF = 0 otherwise

proc is_region_userspace stdcall, base:dword, len:dword

proc is_region_userspace stdcall, base:dword, len:dword

        mov     eax, [base]

        mov     eax, [base]

        ja      @f

        ja      @f              ; zf

        add     eax, [len]

        ja      @f              ; zf

.ret:

        cmp     eax, eax        ; ZF

        test    eax, eax

@@:

        pop     ebx eax

        pop     eax

        ret 

        ret