2005-10-06 21:56:22 +04:00
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
;;
|
2008-02-04 18:31:59 +03:00
|
|
|
|
;; Copyright (C) KolibriOS team 2004-2008. All rights reserved.
|
2007-03-26 16:18:08 +04:00
|
|
|
|
;; PROGRAMMING:
|
|
|
|
|
;; Ivan Poddubny
|
|
|
|
|
;; Marat Zakiyanov (Mario79)
|
|
|
|
|
;; VaStaNi
|
|
|
|
|
;; Trans
|
|
|
|
|
;; Mihail Semenyako (mike.dld)
|
|
|
|
|
;; Sergey Kuzmin (Wildwest)
|
|
|
|
|
;; Andrey Halyavin (halyavin)
|
|
|
|
|
;; Mihail Lisovin (Mihasik)
|
|
|
|
|
;; Andrey Ignatiev (andrew_programmer)
|
|
|
|
|
;; NoName
|
|
|
|
|
;; Evgeny Grechnikov (Diamond)
|
|
|
|
|
;; Iliya Mihailov (Ghost)
|
|
|
|
|
;; Sergey Semyonov (Serge)
|
|
|
|
|
;; Johnny_B
|
2007-06-14 22:21:03 +04:00
|
|
|
|
;; SPraid (simba)
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;
|
2007-03-26 16:18:08 +04:00
|
|
|
|
;; Data in this file was originally part of MenuetOS project which is
|
|
|
|
|
;; distributed under the terms of GNU GPL. It is modified and redistributed as
|
|
|
|
|
;; part of KolibriOS project under the terms of GNU GPL.
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;
|
2007-03-26 16:18:08 +04:00
|
|
|
|
;; Copyright (C) MenuetOS 2000-2004 Ville Mikael Turjanmaa
|
|
|
|
|
;; PROGRAMMING:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;
|
2007-03-26 16:18:08 +04:00
|
|
|
|
;; Ville Mikael Turjanmaa, villemt@itu.jyu.fi
|
|
|
|
|
;; - main os coding/design
|
|
|
|
|
;; Jan-Michael Brummer, BUZZ2@gmx.de
|
|
|
|
|
;; Felix Kaiser, info@felix-kaiser.de
|
|
|
|
|
;; Paolo Minazzi, paolo.minazzi@inwind.it
|
|
|
|
|
;; quickcode@mail.ru
|
|
|
|
|
;; Alexey, kgaz@crosswinds.net
|
|
|
|
|
;; Juan M. Caravaca, bitrider@wanadoo.es
|
|
|
|
|
;; kristol@nic.fi
|
|
|
|
|
;; Mike Hibbett, mikeh@oceanfree.net
|
|
|
|
|
;; Lasse Kuusijarvi, kuusijar@lut.fi
|
|
|
|
|
;; Jarek Pelczar, jarekp3@wp.pl
|
|
|
|
|
;;
|
|
|
|
|
;; KolibriOS is distributed in the hope that it will be useful, but WITHOUT ANY
|
|
|
|
|
;; WARRANTY. No author or distributor accepts responsibility to anyone for the
|
|
|
|
|
;; consequences of using it or for whether it serves any particular purpose or
|
|
|
|
|
;; works at all, unless he says so in writing. Refer to the GNU General Public
|
|
|
|
|
;; License (the "GPL") for full details.
|
|
|
|
|
;
|
|
|
|
|
;; Everyone is granted permission to copy, modify and redistribute KolibriOS,
|
|
|
|
|
;; but only under the conditions described in the GPL. A copy of this license
|
|
|
|
|
;; is supposed to have been given to you along with KolibriOS so you can know
|
|
|
|
|
;; your rights and responsibilities. It should be in a file named COPYING.
|
|
|
|
|
;; Among other things, the copyright notice and this notice must be preserved
|
|
|
|
|
;; on all copies.
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
2007-03-22 04:09:49 +03:00
|
|
|
|
|
|
|
|
|
include 'macros.inc'
|
|
|
|
|
|
2007-03-22 01:58:33 +03:00
|
|
|
|
$Revision$
|
2007-03-22 04:09:49 +03:00
|
|
|
|
|
2007-07-27 17:52:03 +04:00
|
|
|
|
|
2007-07-06 12:12:11 +04:00
|
|
|
|
USE_COM_IRQ equ 0 ;make irq 3 and irq 4 available for PCI devices
|
|
|
|
|
|
2006-10-06 10:09:41 +04:00
|
|
|
|
include "proc32.inc"
|
2005-10-14 19:40:15 +04:00
|
|
|
|
include "kglobals.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
include "lang.inc"
|
|
|
|
|
|
2006-10-06 10:09:41 +04:00
|
|
|
|
include "const.inc"
|
2007-04-18 10:37:14 +04:00
|
|
|
|
max_processes equ 255
|
|
|
|
|
tss_step equ (128+8192) ; tss & i/o - 65535 ports, * 256=557056*4
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
os_stack equ (os_data_l-gdts) ; GDTs
|
|
|
|
|
os_code equ (os_code_l-gdts)
|
|
|
|
|
graph_data equ (3+graph_data_l-gdts)
|
|
|
|
|
tss0 equ (tss0_l-gdts)
|
|
|
|
|
app_code equ (3+app_code_l-gdts)
|
|
|
|
|
app_data equ (3+app_data_l-gdts)
|
2007-07-23 21:50:42 +04:00
|
|
|
|
pci_code_sel equ (pci_code_32-gdts)
|
|
|
|
|
pci_data_sel equ (pci_data_32-gdts)
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
;;
|
|
|
|
|
;; Included files:
|
|
|
|
|
;;
|
|
|
|
|
;; Kernel16.inc
|
|
|
|
|
;; - Booteng.inc English text for bootup
|
|
|
|
|
;; - Bootcode.inc Hardware setup
|
|
|
|
|
;; - Pci16.inc PCI functions
|
|
|
|
|
;;
|
|
|
|
|
;; Kernel32.inc
|
|
|
|
|
;; - Sys32.inc Process management
|
|
|
|
|
;; - Shutdown.inc Shutdown and restart
|
|
|
|
|
;; - Fat32.inc Read / write hd
|
|
|
|
|
;; - Vesa12.inc Vesa 1.2 driver
|
|
|
|
|
;; - Vesa20.inc Vesa 2.0 driver
|
|
|
|
|
;; - Vga.inc VGA driver
|
|
|
|
|
;; - Stack.inc Network interface
|
|
|
|
|
;; - Mouse.inc Mouse pointer
|
|
|
|
|
;; - Scincode.inc Window skinning
|
|
|
|
|
;; - Pci32.inc PCI functions
|
|
|
|
|
;;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
;; ;;
|
|
|
|
|
;; 16 BIT ENTRY FROM BOOTSECTOR ;;
|
|
|
|
|
;; ;;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
|
|
|
|
use16
|
2007-03-23 06:11:34 +03:00
|
|
|
|
org 0x0
|
|
|
|
|
jmp start_of_code
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-09-24 00:58:50 +04:00
|
|
|
|
version db 'Kolibri OS version 0.7.1.0 ',13,10,13,10,0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
include "boot/bootstr.inc" ; language-independent boot messages
|
|
|
|
|
include "boot/preboot.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
if lang eq en
|
|
|
|
|
include "boot/booteng.inc" ; english system boot messages
|
|
|
|
|
else if lang eq ru
|
|
|
|
|
include "boot/bootru.inc" ; russian system boot messages
|
|
|
|
|
include "boot/ru.inc" ; Russian font
|
|
|
|
|
else if lang eq et
|
|
|
|
|
include "boot/bootet.inc" ; estonian system boot messages
|
|
|
|
|
include "boot/et.inc" ; Estonian font
|
|
|
|
|
else
|
|
|
|
|
include "boot/bootge.inc" ; german system boot messages
|
|
|
|
|
end if
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
include "boot/bootcode.inc" ; 16 bit system boot code
|
|
|
|
|
include "bus/pci/pci16.inc"
|
2008-02-04 18:31:59 +03:00
|
|
|
|
include "detect/biosdisk.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
;; ;;
|
|
|
|
|
;; SWITCH TO 32 BIT PROTECTED MODE ;;
|
|
|
|
|
;; ;;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; CR0 Flags - Protected mode and Paging
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx, CR0_PE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; Enabling 32 bit protected mode
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
sidt [cs:old_ints_h]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
cli ; disable all irqs
|
|
|
|
|
cld
|
|
|
|
|
mov al,255 ; mask all irqs
|
|
|
|
|
out 0xa1,al
|
|
|
|
|
out 0x21,al
|
|
|
|
|
l.5: in al, 0x64 ; Enable A20
|
|
|
|
|
test al, 2
|
|
|
|
|
jnz l.5
|
|
|
|
|
mov al, 0xD1
|
|
|
|
|
out 0x64, al
|
|
|
|
|
l.6: in al, 0x64
|
|
|
|
|
test al, 2
|
|
|
|
|
jnz l.6
|
|
|
|
|
mov al, 0xDF
|
|
|
|
|
out 0x60, al
|
|
|
|
|
l.7: in al, 0x64
|
|
|
|
|
test al, 2
|
|
|
|
|
jnz l.7
|
|
|
|
|
mov al, 0xFF
|
|
|
|
|
out 0x64, al
|
2007-04-18 10:37:14 +04:00
|
|
|
|
|
|
|
|
|
lgdt [cs:tmp_gdt] ; Load GDT
|
|
|
|
|
mov eax, cr0 ; protected mode
|
2007-03-23 06:11:34 +03:00
|
|
|
|
or eax, ecx
|
|
|
|
|
and eax, 10011111b *65536*256 + 0xffffff ; caching enabled
|
|
|
|
|
mov cr0, eax
|
|
|
|
|
jmp pword os_code:B32 ; jmp to enable 32 bit mode
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
align 8
|
|
|
|
|
tmp_gdt:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
dw 23
|
|
|
|
|
dd tmp_gdt+0x10000
|
|
|
|
|
dw 0
|
2007-02-25 17:20:50 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
dw 0xffff
|
|
|
|
|
dw 0x0000
|
|
|
|
|
db 0x00
|
|
|
|
|
dw 11011111b *256 +10011010b
|
|
|
|
|
db 0x00
|
2006-10-16 16:17:49 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
dw 0xffff
|
|
|
|
|
dw 0x0000
|
|
|
|
|
db 0x00
|
|
|
|
|
dw 11011111b *256 +10010010b
|
|
|
|
|
db 0x00
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
include "data16.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
use32
|
|
|
|
|
org $+0x10000
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
align 4
|
|
|
|
|
B32:
|
|
|
|
|
mov ax,os_stack ; Selector for os
|
|
|
|
|
mov ds,ax
|
|
|
|
|
mov es,ax
|
|
|
|
|
mov fs,ax
|
|
|
|
|
mov gs,ax
|
|
|
|
|
mov ss,ax
|
|
|
|
|
mov esp,0x3ec00 ; Set stack
|
|
|
|
|
|
|
|
|
|
; CLEAR 0x280000 - HEAP_BASE
|
|
|
|
|
|
|
|
|
|
xor eax,eax
|
|
|
|
|
mov edi,0x280000
|
|
|
|
|
mov ecx,(HEAP_BASE-OS_BASE-0x280000) / 4
|
|
|
|
|
cld
|
|
|
|
|
rep stosd
|
|
|
|
|
|
|
|
|
|
mov edi,0x40000
|
|
|
|
|
mov ecx,(0x90000-0x40000)/4
|
|
|
|
|
rep stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; CLEAR KERNEL UNDEFINED GLOBALS
|
|
|
|
|
mov edi, endofcode-OS_BASE
|
|
|
|
|
mov ecx, (uglobals_size/4)+4
|
|
|
|
|
rep stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; SAVE & CLEAR 0-0xffff
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
xor esi, esi
|
|
|
|
|
mov edi,0x2F0000
|
|
|
|
|
mov ecx,0x10000 / 4
|
|
|
|
|
rep movsd
|
|
|
|
|
xor edi, edi
|
|
|
|
|
mov ecx,0x10000 / 4
|
|
|
|
|
rep stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
call test_cpu
|
|
|
|
|
bts [cpu_caps-OS_BASE], CAPS_TSC ;force use rdtsc
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-07-23 21:50:42 +04:00
|
|
|
|
call init_BIOS32
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; MEMORY MODEL
|
|
|
|
|
call mem_test
|
|
|
|
|
call init_mem
|
|
|
|
|
call init_page_map
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; ENABLE PAGING
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax, sys_pgdir-OS_BASE
|
|
|
|
|
mov cr3, eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax,cr0
|
|
|
|
|
or eax,CR0_PG+CR0_WP
|
|
|
|
|
mov cr0,eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
lgdt [gdts]
|
|
|
|
|
jmp pword os_code:high_code
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-05-20 14:01:18 +04:00
|
|
|
|
align 4
|
2007-07-23 21:50:42 +04:00
|
|
|
|
bios32_entry dd ?
|
2007-05-20 14:01:18 +04:00
|
|
|
|
tmp_page_tabs dd ?
|
2007-07-23 21:50:42 +04:00
|
|
|
|
|
2007-05-16 17:43:21 +04:00
|
|
|
|
use16
|
|
|
|
|
org $-0x10000
|
|
|
|
|
include "boot/shutdown.inc" ; shutdown or restart
|
|
|
|
|
org $+0x10000
|
|
|
|
|
use32
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
__DEBUG__ fix 1
|
|
|
|
|
__DEBUG_LEVEL__ fix 1
|
|
|
|
|
include 'init.inc'
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
org OS_BASE+$
|
2007-02-28 13:51:05 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
align 4
|
|
|
|
|
high_code:
|
2007-05-23 15:26:19 +04:00
|
|
|
|
mov ax,os_stack
|
|
|
|
|
mov bx,app_data
|
|
|
|
|
mov ss,ax
|
|
|
|
|
add esp, OS_BASE
|
|
|
|
|
|
|
|
|
|
mov ds,bx
|
|
|
|
|
mov es,bx
|
|
|
|
|
mov fs,bx
|
|
|
|
|
mov gs,bx
|
|
|
|
|
|
|
|
|
|
bt [cpu_caps], CAPS_PGE
|
|
|
|
|
jnc @F
|
|
|
|
|
|
|
|
|
|
or dword [sys_pgdir+(OS_BASE shr 20)], PG_GLOBAL
|
|
|
|
|
|
|
|
|
|
mov ebx, cr4
|
|
|
|
|
or ebx, CR4_PGE
|
|
|
|
|
mov cr4, ebx
|
|
|
|
|
@@:
|
|
|
|
|
xor eax, eax
|
|
|
|
|
mov dword [sys_pgdir], eax
|
|
|
|
|
mov dword [sys_pgdir+4], eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax, cr3
|
|
|
|
|
mov cr3, eax ; flush TLB
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SAVE REAL MODE VARIABLES
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ax, [BOOT_VAR + 0x9031]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [IDEContrRegsBaseAddr], ax
|
2006-05-06 18:34:30 +04:00
|
|
|
|
; --------------- APM ---------------------
|
2007-04-18 10:37:14 +04:00
|
|
|
|
|
|
|
|
|
; init selectors
|
|
|
|
|
mov ebx, [BOOT_VAR+0x9040] ; offset of APM entry point
|
|
|
|
|
movzx eax, word [BOOT_VAR+0x9050] ; real-mode segment base address of
|
|
|
|
|
; protected-mode 32-bit code segment
|
|
|
|
|
movzx ecx, word [BOOT_VAR+0x9052] ; real-mode segment base address of
|
|
|
|
|
; protected-mode 16-bit code segment
|
|
|
|
|
movzx edx, word [BOOT_VAR+0x9054] ; real-mode segment base address of
|
|
|
|
|
; protected-mode 16-bit data segment
|
|
|
|
|
|
|
|
|
|
shl eax, 4
|
|
|
|
|
mov [dword apm_code_32 + 2], ax
|
|
|
|
|
shr eax, 16
|
|
|
|
|
mov [dword apm_code_32 + 4], al
|
|
|
|
|
|
|
|
|
|
shl ecx, 4
|
|
|
|
|
mov [dword apm_code_16 + 2], cx
|
|
|
|
|
shr ecx, 16
|
|
|
|
|
mov [dword apm_code_16 + 4], cl
|
|
|
|
|
|
|
|
|
|
shl edx, 4
|
|
|
|
|
mov [dword apm_data_16 + 2], dx
|
|
|
|
|
shr edx, 16
|
|
|
|
|
mov [dword apm_data_16 + 4], dl
|
|
|
|
|
|
|
|
|
|
mov dword[apm_entry], ebx
|
2006-05-06 18:34:30 +04:00
|
|
|
|
mov word [apm_entry + 4], apm_code_32 - gdts
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax, [BOOT_VAR + 0x9044] ; version & flags
|
2006-05-06 18:34:30 +04:00
|
|
|
|
mov [apm_vf], eax
|
|
|
|
|
; -----------------------------------------
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; movzx eax,byte [BOOT_VAR+0x9010] ; mouse port
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; mov [0xF604],byte 1 ;al
|
2007-05-21 17:25:02 +04:00
|
|
|
|
mov al, [BOOT_VAR+0x901F] ; DMA access
|
|
|
|
|
mov [allow_dma_access], al
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov al,[BOOT_VAR+0x9000] ; bpp
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [ScreenBPP],al
|
2007-04-18 10:37:14 +04:00
|
|
|
|
movzx eax,word [BOOT_VAR+0x900A] ; X max
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax
|
|
|
|
|
mov [ScreenWidth],eax
|
|
|
|
|
mov [screen_workarea.right],eax
|
2007-04-18 10:37:14 +04:00
|
|
|
|
movzx eax,word [BOOT_VAR+0x900C] ; Y max
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax
|
|
|
|
|
mov [ScreenHeight],eax
|
|
|
|
|
mov [screen_workarea.bottom],eax
|
2007-04-18 10:37:14 +04:00
|
|
|
|
movzx eax,word [BOOT_VAR+0x9008] ; screen mode
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [SCR_MODE],eax
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax,[BOOT_VAR+0x9014] ; Vesa 1.2 bnk sw add
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [BANK_SWITCH],eax
|
|
|
|
|
mov [BytesPerScanLine],word 640*4 ; Bytes PerScanLine
|
|
|
|
|
cmp [SCR_MODE],word 0x13 ; 320x200
|
|
|
|
|
je @f
|
|
|
|
|
cmp [SCR_MODE],word 0x12 ; VGA 640x480
|
|
|
|
|
je @f
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ax,[BOOT_VAR+0x9001] ; for other modes
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [BytesPerScanLine],ax
|
2007-04-18 10:37:14 +04:00
|
|
|
|
@@:
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov esi, BOOT_VAR+0x9080
|
|
|
|
|
movzx ecx, byte [esi-1]
|
|
|
|
|
mov [NumBiosDisks], ecx
|
|
|
|
|
mov edi, BiosDisksData
|
|
|
|
|
rep movsd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; GRAPHICS ADDRESSES
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov byte [BOOT_VAR+0x901e],0x0
|
|
|
|
|
mov eax,[BOOT_VAR+0x9018]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [LFBAddress],eax
|
|
|
|
|
|
|
|
|
|
cmp [SCR_MODE],word 0100000000000000b
|
|
|
|
|
jge setvesa20
|
|
|
|
|
cmp [SCR_MODE],word 0x13
|
|
|
|
|
je v20ga32
|
|
|
|
|
mov [PUTPIXEL],dword Vesa12_putpixel24 ; Vesa 1.2
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [GETPIXEL],dword Vesa12_getpixel24
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [ScreenBPP],byte 24
|
|
|
|
|
jz ga24
|
|
|
|
|
mov [PUTPIXEL],dword Vesa12_putpixel32
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [GETPIXEL],dword Vesa12_getpixel32
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ga24:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jmp v20ga24
|
2005-10-06 21:56:22 +04:00
|
|
|
|
setvesa20:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [PUTPIXEL],dword Vesa20_putpixel24 ; Vesa 2.0
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [GETPIXEL],dword Vesa20_getpixel24
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [ScreenBPP],byte 24
|
|
|
|
|
jz v20ga24
|
2005-10-06 21:56:22 +04:00
|
|
|
|
v20ga32:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [PUTPIXEL],dword Vesa20_putpixel32
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [GETPIXEL],dword Vesa20_getpixel32
|
2005-10-06 21:56:22 +04:00
|
|
|
|
v20ga24:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x12 ; 16 C VGA 640x480
|
|
|
|
|
jne no_mode_0x12
|
|
|
|
|
mov [PUTPIXEL],dword VGA_putpixel
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [GETPIXEL],dword Vesa20_getpixel32
|
2005-10-06 21:56:22 +04:00
|
|
|
|
no_mode_0x12:
|
|
|
|
|
|
2007-02-25 17:20:50 +03:00
|
|
|
|
; -------- Fast System Call init ----------
|
2007-02-27 14:47:52 +03:00
|
|
|
|
; Intel SYSENTER/SYSEXIT (AMD CPU support it too)
|
2007-03-23 06:11:34 +03:00
|
|
|
|
bt [cpu_caps], CAPS_SEP
|
|
|
|
|
jnc .SEnP ; SysEnter not Present
|
|
|
|
|
xor edx, edx
|
|
|
|
|
mov ecx, MSR_SYSENTER_CS
|
|
|
|
|
mov eax, os_code
|
|
|
|
|
wrmsr
|
|
|
|
|
mov ecx, MSR_SYSENTER_ESP
|
2007-03-28 18:51:04 +04:00
|
|
|
|
; mov eax, sysenter_stack ; Check it
|
|
|
|
|
xor eax, eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
wrmsr
|
|
|
|
|
mov ecx, MSR_SYSENTER_EIP
|
|
|
|
|
mov eax, sysenter_entry
|
|
|
|
|
wrmsr
|
2007-02-25 17:20:50 +03:00
|
|
|
|
.SEnP:
|
2007-02-27 14:47:52 +03:00
|
|
|
|
; AMD SYSCALL/SYSRET
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp byte[cpu_vendor], 'A'
|
|
|
|
|
jne .noSYSCALL
|
|
|
|
|
mov eax, 0x80000001
|
|
|
|
|
cpuid
|
|
|
|
|
test edx, 0x800 ; bit_11 - SYSCALL/SYSRET support
|
|
|
|
|
jz .noSYSCALL
|
|
|
|
|
mov ecx, MSR_AMD_EFER
|
|
|
|
|
rdmsr
|
|
|
|
|
or eax, 1 ; bit_0 - System Call Extension (SCE)
|
|
|
|
|
wrmsr
|
2007-02-25 17:20:50 +03:00
|
|
|
|
|
|
|
|
|
; !!!! It`s dirty hack, fix it !!!
|
|
|
|
|
; Bits of EDX :
|
|
|
|
|
; Bit 31<33>16 During the SYSRET instruction, this field is copied into the CS register
|
|
|
|
|
; and the contents of this field, plus 8, are copied into the SS register.
|
|
|
|
|
; Bit 15<31>0 During the SYSCALL instruction, this field is copied into the CS register
|
|
|
|
|
; and the contents of this field, plus 8, are copied into the SS register.
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; mov edx, (os_code + 16) * 65536 + os_code
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edx, 0x1B0008
|
2007-02-25 17:20:50 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, syscall_entry
|
|
|
|
|
mov ecx, MSR_AMD_STAR
|
|
|
|
|
wrmsr
|
2007-02-25 17:20:50 +03:00
|
|
|
|
.noSYSCALL:
|
|
|
|
|
; -----------------------------------------
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; LOAD IDT
|
2007-02-27 14:47:52 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
call build_interrupt_table
|
|
|
|
|
lidt [idtreg]
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call init_kernel_heap
|
|
|
|
|
stdcall kernel_alloc, RING0_STACK_SIZE+512
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [os_stack_seg], eax
|
|
|
|
|
|
|
|
|
|
lea esp, [eax+RING0_STACK_SIZE]
|
|
|
|
|
|
|
|
|
|
mov [tss._ss0], os_stack
|
|
|
|
|
mov [tss._esp0], esp
|
|
|
|
|
mov [tss._esp], esp
|
|
|
|
|
mov [tss._cs],os_code
|
|
|
|
|
mov [tss._ss],os_stack
|
|
|
|
|
mov [tss._ds],app_data
|
|
|
|
|
mov [tss._es],app_data
|
|
|
|
|
mov [tss._fs],app_data
|
|
|
|
|
mov [tss._gs],app_data
|
|
|
|
|
mov [tss._io],128
|
|
|
|
|
;Add IO access table - bit array of permitted ports
|
|
|
|
|
mov edi, tss._io_map_0
|
|
|
|
|
xor eax, eax
|
|
|
|
|
not eax
|
|
|
|
|
mov ecx, 8192/4
|
|
|
|
|
rep stosd ; access to 4096*8=65536 ports
|
|
|
|
|
|
|
|
|
|
mov ax,tss0
|
|
|
|
|
ltr ax
|
|
|
|
|
|
|
|
|
|
mov [LFBSize], 0x800000
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call init_LFB
|
|
|
|
|
call init_fpu
|
|
|
|
|
call init_malloc
|
2007-01-17 07:43:21 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
stdcall alloc_kernel_space, 0x51000
|
|
|
|
|
mov [default_io_map], eax
|
|
|
|
|
|
|
|
|
|
add eax, 0x2000
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [ipc_tmp], eax
|
|
|
|
|
mov ebx, 0x1000
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, 0x40000
|
|
|
|
|
mov [proc_mem_map], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, 0x8000
|
|
|
|
|
mov [proc_mem_pdir], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, ebx
|
|
|
|
|
mov [proc_mem_tab], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, ebx
|
|
|
|
|
mov [tmp_task_pdir], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, ebx
|
|
|
|
|
mov [tmp_task_ptab], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, ebx
|
|
|
|
|
mov [ipc_pdir], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
add eax, ebx
|
|
|
|
|
mov [ipc_ptab], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2008-02-07 07:50:50 +03:00
|
|
|
|
stdcall kernel_alloc, (unpack.LZMA_BASE_SIZE+(unpack.LZMA_LIT_SIZE shl \
|
|
|
|
|
(unpack.lc+unpack.lp)))*4
|
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov [unpack.p], eax
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call init_events
|
|
|
|
|
mov eax, srv.fd-SRV_FD_OFFSET
|
|
|
|
|
mov [srv.fd], eax
|
|
|
|
|
mov [srv.bk], eax
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi, irq_tab
|
|
|
|
|
xor eax, eax
|
|
|
|
|
mov ecx, 16
|
|
|
|
|
rep stosd
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
|
|
|
|
;Set base of graphic segment to linear address of LFB
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[LFBAddress] ; set for gs
|
|
|
|
|
mov [graph_data_l+2],ax
|
|
|
|
|
shr eax,16
|
|
|
|
|
mov [graph_data_l+4],al
|
|
|
|
|
mov [graph_data_l+7],ah
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [CURRENT_TASK],dword 1
|
|
|
|
|
mov [TASK_COUNT],dword 1
|
|
|
|
|
mov [TASK_BASE],dword TASK_DATA
|
|
|
|
|
mov [current_slot], SLOT_BASE+256
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-24 12:56:03 +04:00
|
|
|
|
; set background
|
|
|
|
|
xor eax,eax
|
|
|
|
|
inc eax
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov [BgrDrawMode],eax
|
|
|
|
|
mov [BgrDataWidth],eax
|
|
|
|
|
mov [BgrDataHeight],eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
mov [mem_BACKGROUND],4095
|
|
|
|
|
stdcall kernel_alloc, [mem_BACKGROUND]
|
|
|
|
|
mov [img_background], eax
|
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov [SLOT_BASE + 256 + APPDATA.dir_table], sys_pgdir - OS_BASE
|
|
|
|
|
|
|
|
|
|
; REDIRECT ALL IRQ'S TO INT'S 0x20-0x2f
|
|
|
|
|
|
|
|
|
|
call rerouteirqs
|
|
|
|
|
|
|
|
|
|
; Initialize system V86 machine
|
|
|
|
|
call init_sys_v86
|
2007-04-24 12:56:03 +04:00
|
|
|
|
|
2008-02-10 13:16:46 +03:00
|
|
|
|
; TIMER SET TO 1/100 S
|
|
|
|
|
|
|
|
|
|
mov al,0x34 ; set to 100Hz
|
|
|
|
|
out 0x43,al
|
|
|
|
|
mov al,0x9b ; lsb 1193180 / 1193
|
|
|
|
|
out 0x40,al
|
|
|
|
|
mov al,0x2e ; msb
|
|
|
|
|
out 0x40,al
|
|
|
|
|
|
|
|
|
|
; Enable timer IRQ (IRQ0) and hard drives IRQs (IRQ14, IRQ15)
|
|
|
|
|
; they are used: when partitions are scanned, hd_read relies on timer
|
|
|
|
|
mov al, 0xFE
|
|
|
|
|
out 0x21, al
|
|
|
|
|
mov al, 0x3F
|
|
|
|
|
out 0xA1, al
|
|
|
|
|
|
2006-12-29 18:42:36 +03:00
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'detect/disks.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
|
2007-05-24 15:27:05 +04:00
|
|
|
|
call Parser_params
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; READ RAMDISK IMAGE FROM HD
|
|
|
|
|
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'boot/rdload.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
; mov [dma_hdd],1
|
|
|
|
|
; CALCULATE FAT CHAIN FOR RAMDISK
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call calculatefatchain
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; LOAD VMODE DRIVER
|
|
|
|
|
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'vmodeld.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
|
2007-05-18 17:41:21 +04:00
|
|
|
|
mov ax,[OS_BASE+0x10000+bx_from_load]
|
2007-06-07 16:56:40 +04:00
|
|
|
|
cmp ax,'r1' ; if using not ram disk, then load librares and parameters {SPraid.simba}
|
2007-05-11 23:38:23 +04:00
|
|
|
|
je no_lib_load
|
|
|
|
|
; LOADING LIBRARES
|
2008-02-15 19:15:47 +03:00
|
|
|
|
stdcall dll.Load,@IMPORT ; loading librares for kernel (.obj files)
|
|
|
|
|
call load_file_parse_table ; prepare file parse table
|
|
|
|
|
call set_kernel_conf ; configure devices and gui
|
2007-05-11 23:38:23 +04:00
|
|
|
|
no_lib_load:
|
2007-03-21 21:36:27 +03:00
|
|
|
|
|
2007-05-11 23:38:23 +04:00
|
|
|
|
; LOAD FONTS I and II
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2008-02-10 13:16:46 +03:00
|
|
|
|
stdcall read_file, char, FONT_I, 0, 2304
|
2007-05-16 23:12:34 +04:00
|
|
|
|
stdcall read_file, char2, FONT_II, 0, 2560
|
2007-05-14 08:27:51 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_fonts
|
|
|
|
|
call boot_log
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; PRINT AMOUNT OF MEMORY
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi, boot_memdetect
|
|
|
|
|
call boot_log
|
|
|
|
|
|
|
|
|
|
movzx ecx, word [boot_y]
|
|
|
|
|
or ecx, (10+29*6) shl 16 ; "Determining amount of memory"
|
|
|
|
|
sub ecx, 10
|
|
|
|
|
mov edx, 0xFFFFFF
|
|
|
|
|
mov ebx, [MEM_AMOUNT]
|
|
|
|
|
shr ebx, 20
|
|
|
|
|
mov edi, 1
|
|
|
|
|
mov eax, 0x00040000
|
|
|
|
|
call display_number_force
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; BUILD SCHEDULER
|
|
|
|
|
|
|
|
|
|
call build_scheduler ; sys32.inc
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_devices
|
|
|
|
|
call boot_log
|
2007-07-07 11:25:17 +04:00
|
|
|
|
|
|
|
|
|
mov [pci_access_enabled],1
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call detect_devices
|
2007-05-08 15:32:58 +04:00
|
|
|
|
stdcall load_driver, szPS2MDriver
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SET MOUSE
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_setmouse
|
|
|
|
|
call boot_log
|
|
|
|
|
call setmouse
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-11-27 13:07:51 +03:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; SET PRELIMINARY WINDOW STACK AND POSITIONS
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_windefs
|
|
|
|
|
call boot_log
|
|
|
|
|
call setwindowdefaults
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SET BACKGROUND DEFAULTS
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_bgr
|
|
|
|
|
call boot_log
|
2007-06-26 19:52:28 +04:00
|
|
|
|
call init_background
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call calculatebackground
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; RESERVE SYSTEM IRQ'S JA PORT'S
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_resirqports
|
|
|
|
|
call boot_log
|
|
|
|
|
call reserve_irqs_ports
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SET PORTS FOR IRQ HANDLERS
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_setrports
|
|
|
|
|
call boot_log
|
|
|
|
|
call setirqreadports
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SET UP OS TASK
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_setostask
|
|
|
|
|
call boot_log
|
|
|
|
|
|
2007-05-16 23:12:34 +04:00
|
|
|
|
xor eax, eax
|
|
|
|
|
mov dword [SLOT_BASE+APPDATA.fpu_state], fpu_data
|
|
|
|
|
mov dword [SLOT_BASE+APPDATA.fpu_handler], eax
|
|
|
|
|
mov dword [SLOT_BASE+APPDATA.sse_handler], eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
; name for OS/IDLE process
|
|
|
|
|
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.app_name], dword 'OS/I'
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.app_name+4], dword 'DLE '
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edi, [os_stack_seg]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.pl0_stack], edi
|
2007-04-18 10:37:14 +04:00
|
|
|
|
add edi, 0x2000-512
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.fpu_state], edi
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.saved_esp0], edi ; just for case
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.io_map],\
|
|
|
|
|
(tss._io_map_0-OS_BASE+PG_MAP)
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.io_map+4],\
|
|
|
|
|
(tss._io_map_1-OS_BASE+PG_MAP)
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
mov esi, fpu_data
|
|
|
|
|
mov ecx, 512/4
|
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
|
|
|
|
|
2007-05-16 23:12:34 +04:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.fpu_handler], eax
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.sse_handler], eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
mov ebx, SLOT_BASE+256+APP_OBJ_OFFSET
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.fd_obj], ebx
|
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.bk_obj], ebx
|
|
|
|
|
|
2007-05-24 15:27:05 +04:00
|
|
|
|
mov dword [SLOT_BASE+256+APPDATA.cur_dir], sysdir_path
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; task list
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [CURRENT_TASK],dword 1
|
|
|
|
|
mov [TASK_COUNT],dword 1
|
|
|
|
|
mov [current_slot], SLOT_BASE+256
|
|
|
|
|
mov [TASK_BASE],dword TASK_DATA
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [TASK_DATA+TASKDATA.wnd_number], 1 ; on screen number
|
|
|
|
|
mov [TASK_DATA+TASKDATA.pid], 1 ; process id number
|
|
|
|
|
mov [TASK_DATA+TASKDATA.mem_start], 0 ; process base address
|
|
|
|
|
|
|
|
|
|
call init_cursors
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov eax, [def_cursor]
|
|
|
|
|
mov [SLOT_BASE+APPDATA.cursor],eax
|
|
|
|
|
mov [SLOT_BASE+APPDATA.cursor+256],eax
|
2007-01-19 06:58:46 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; READ TSC / SECOND
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_tsc
|
|
|
|
|
call boot_log
|
2008-02-10 13:16:46 +03:00
|
|
|
|
cli
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call _rdtsc
|
|
|
|
|
mov ecx,eax
|
|
|
|
|
mov esi,250 ; wait 1/4 a second
|
|
|
|
|
call delay_ms
|
|
|
|
|
call _rdtsc
|
2008-02-10 13:16:46 +03:00
|
|
|
|
sti
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sub eax,ecx
|
|
|
|
|
shl eax,2
|
|
|
|
|
mov [CPU_FREQ],eax ; save tsc / sec
|
|
|
|
|
mov ebx, 1000000
|
|
|
|
|
div ebx
|
|
|
|
|
mov [stall_mcs], eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; SET VARIABLES
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call set_variables
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; STACK AND FDC
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call stack_init
|
|
|
|
|
call fdc_init
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; PALETTE FOR 320x200 and 640x480 16 col
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x12
|
|
|
|
|
jne no_pal_vga
|
|
|
|
|
mov esi,boot_pal_vga
|
|
|
|
|
call boot_log
|
|
|
|
|
call paletteVGA
|
2005-10-06 21:56:22 +04:00
|
|
|
|
no_pal_vga:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x13
|
|
|
|
|
jne no_pal_ega
|
|
|
|
|
mov esi,boot_pal_ega
|
|
|
|
|
call boot_log
|
|
|
|
|
call palette320x200
|
2005-10-06 21:56:22 +04:00
|
|
|
|
no_pal_ega:
|
|
|
|
|
|
|
|
|
|
; LOAD DEFAULT SKIN
|
|
|
|
|
|
2007-05-25 13:37:08 +04:00
|
|
|
|
call load_default_skin
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
;protect io permission map
|
|
|
|
|
|
|
|
|
|
mov esi, [default_io_map]
|
|
|
|
|
stdcall map_page,esi,(tss._io_map_0-OS_BASE), PG_MAP
|
|
|
|
|
add esi, 0x1000
|
|
|
|
|
stdcall map_page,esi,(tss._io_map_1-OS_BASE), PG_MAP
|
|
|
|
|
|
|
|
|
|
stdcall map_page,tss._io_map_0,\
|
|
|
|
|
(tss._io_map_0-OS_BASE), PG_MAP
|
|
|
|
|
stdcall map_page,tss._io_map_1,\
|
|
|
|
|
(tss._io_map_1-OS_BASE), PG_MAP
|
|
|
|
|
|
2007-05-20 13:04:59 +04:00
|
|
|
|
mov ax,[OS_BASE+0x10000+bx_from_load]
|
2007-06-07 16:56:40 +04:00
|
|
|
|
cmp ax,'r1' ; if not rused ram disk - load network configuration from files {SPraid.simba}
|
2007-05-20 13:04:59 +04:00
|
|
|
|
je no_st_network
|
|
|
|
|
call set_network_conf
|
|
|
|
|
no_st_network:
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; LOAD FIRST APPLICATION
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
cmp byte [BOOT_VAR+0x9030],1
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jne no_load_vrr_m
|
|
|
|
|
|
2007-05-24 15:27:05 +04:00
|
|
|
|
mov ebp, vrr_m
|
|
|
|
|
call fs_execute_from_sysdir
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,2 ; if vrr_m app found (PID=2)
|
|
|
|
|
je first_app_found
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2006-12-17 09:22:59 +03:00
|
|
|
|
no_load_vrr_m:
|
2007-05-11 23:38:23 +04:00
|
|
|
|
|
2007-05-24 15:27:05 +04:00
|
|
|
|
mov ebp, firstapp
|
|
|
|
|
call fs_execute_from_sysdir
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
|
|
|
|
cmp eax,2 ; continue if a process has been loaded
|
|
|
|
|
je first_app_found
|
|
|
|
|
|
2007-10-17 11:05:33 +04:00
|
|
|
|
mov esi, boot_failed
|
|
|
|
|
call boot_log
|
|
|
|
|
|
2007-05-16 23:12:34 +04:00
|
|
|
|
mov eax, 0xDEADBEEF ; otherwise halt
|
|
|
|
|
hlt
|
2007-05-11 23:38:23 +04:00
|
|
|
|
|
2006-12-17 09:22:59 +03:00
|
|
|
|
first_app_found:
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
;mov [TASK_COUNT],dword 2
|
|
|
|
|
mov [CURRENT_TASK],dword 1 ; set OS task fisrt
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2005-11-07 18:50:30 +03:00
|
|
|
|
; SET KEYBOARD PARAMETERS
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al, 0xf6 ; reset keyboard, scan enabled
|
|
|
|
|
call kb_write
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; wait until 8042 is ready
|
|
|
|
|
xor ecx,ecx
|
2007-01-09 14:34:31 +03:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,64h
|
|
|
|
|
and al,00000010b
|
|
|
|
|
loopnz @b
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; mov al, 0xED ; svetodiody - only for testing!
|
|
|
|
|
; call kb_write
|
|
|
|
|
; call kb_read
|
|
|
|
|
; mov al, 111b
|
|
|
|
|
; call kb_write
|
|
|
|
|
; call kb_read
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al, 0xF3 ; set repeat rate & delay
|
|
|
|
|
call kb_write
|
2007-01-09 14:34:31 +03:00
|
|
|
|
; call kb_read
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al, 0 ; 30 250 ;00100010b ; 24 500 ;00100100b ; 20 500
|
|
|
|
|
call kb_write
|
2007-01-09 14:34:31 +03:00
|
|
|
|
; call kb_read
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;// mike.dld [
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call set_lights
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;// mike.dld ]
|
|
|
|
|
|
2005-11-07 18:50:30 +03:00
|
|
|
|
; START MULTITASKING
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_tasking
|
|
|
|
|
call boot_log
|
2005-11-07 18:50:30 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; mov [ENABLE_TASKSWITCH],byte 1 ; multitasking enabled
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; UNMASK ALL IRQ'S
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi,boot_allirqs
|
|
|
|
|
call boot_log
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli ;guarantee forbidance of interrupts.
|
|
|
|
|
mov al,0 ; unmask all irq's
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
out 0x21,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,32
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
ready_for_irqs:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,0x20 ; ready for irqs
|
|
|
|
|
out 0x20,al
|
|
|
|
|
out 0xa0,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
loop ready_for_irqs ; flush the queue
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
stdcall attach_int_handler, dword 1, irq1
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; mov [dma_hdd],1
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [IDEContrRegsBaseAddr], 0
|
|
|
|
|
setnz [dma_hdd]
|
2007-06-08 18:17:17 +04:00
|
|
|
|
mov [timer_ticks_enable],1 ; for cd driver
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; stdcall init_uart_service, DRV_ENTRY
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sti
|
2007-04-18 10:37:14 +04:00
|
|
|
|
call change_task
|
|
|
|
|
|
|
|
|
|
jmp osloop
|
|
|
|
|
|
2008-02-10 13:16:46 +03:00
|
|
|
|
; jmp $ ; wait here for timer to take control
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; Fly :)
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
include 'unpacker.inc'
|
|
|
|
|
include 'fdo.inc'
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
boot_log:
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ebx,10*65536
|
|
|
|
|
mov bx,word [boot_y]
|
2007-04-18 10:37:14 +04:00
|
|
|
|
add [boot_y],dword 10
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ecx,0x80ffffff ; ASCIIZ string with white color
|
|
|
|
|
mov edx,esi
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edi,1
|
|
|
|
|
call dtext
|
|
|
|
|
|
|
|
|
|
mov [novesachecksum],1000
|
|
|
|
|
call checkVga_N13
|
|
|
|
|
|
|
|
|
|
cmp [preboot_blogesc+OS_BASE+0x10000],byte 1
|
|
|
|
|
je .bll2
|
|
|
|
|
|
|
|
|
|
cmp esi,boot_tasking
|
|
|
|
|
jne .bll2
|
|
|
|
|
; begin ealex 04.08.05
|
|
|
|
|
; in al,0x61
|
|
|
|
|
; and al,01111111b
|
|
|
|
|
; out 0x61,al
|
|
|
|
|
; end ealex 04.08.05
|
|
|
|
|
.bll1: in al,0x60 ; wait for ESC key press
|
|
|
|
|
cmp al,129
|
|
|
|
|
jne .bll1
|
|
|
|
|
|
|
|
|
|
.bll2: popad
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
; ;
|
2006-01-06 14:46:26 +03:00
|
|
|
|
; MAIN OS LOOP START ;
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; ;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
align 32
|
|
|
|
|
osloop:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call [draw_pointer]
|
|
|
|
|
call checkbuttons
|
|
|
|
|
call checkwindows
|
2006-02-18 13:41:47 +03:00
|
|
|
|
; call check_window_move_request
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call checkmisc
|
|
|
|
|
call checkVga_N13
|
|
|
|
|
call stack_handler
|
|
|
|
|
call checkidle
|
|
|
|
|
call check_fdd_motor_status
|
2007-09-03 00:44:43 +04:00
|
|
|
|
call check_ATAPI_device_event
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jmp osloop
|
2006-01-06 14:46:26 +03:00
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
; ;
|
|
|
|
|
; MAIN OS LOOP END ;
|
|
|
|
|
; ;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
checkidle:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pushad
|
|
|
|
|
|
|
|
|
|
cmp [check_idle_semaphore],0
|
|
|
|
|
jne no_idle_state
|
|
|
|
|
|
|
|
|
|
call change_task
|
|
|
|
|
mov eax,[idlemem]
|
|
|
|
|
mov ebx,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
cmp eax,ebx
|
|
|
|
|
jnz idle_exit
|
|
|
|
|
call _rdtsc
|
|
|
|
|
mov ecx,eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
idle_loop:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
hlt
|
|
|
|
|
cmp [check_idle_semaphore],0
|
|
|
|
|
jne idle_loop_exit
|
|
|
|
|
mov eax,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
cmp ebx,eax
|
|
|
|
|
jz idle_loop
|
2005-10-06 21:56:22 +04:00
|
|
|
|
idle_loop_exit:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [idlemem],eax
|
|
|
|
|
call _rdtsc
|
|
|
|
|
sub eax,ecx
|
|
|
|
|
mov ebx,[idleuse]
|
|
|
|
|
add ebx,eax
|
|
|
|
|
mov [idleuse],ebx
|
2007-03-22 01:58:33 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
idle_exit:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ebx,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
mov [idlemem],ebx
|
|
|
|
|
call change_task
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
no_idle_state:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec [check_idle_semaphore]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ebx,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
mov [idlemem],ebx
|
|
|
|
|
call change_task
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
uglobal
|
2007-03-23 06:11:34 +03:00
|
|
|
|
idlemem dd 0x0
|
|
|
|
|
idleuse dd 0x0
|
|
|
|
|
idleusesec dd 0x0
|
|
|
|
|
check_idle_semaphore dd 0x0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
; ;
|
|
|
|
|
; INCLUDED SYSTEM FILES ;
|
|
|
|
|
; ;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
|
|
|
|
|
2005-10-14 19:40:15 +04:00
|
|
|
|
include "kernel32.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
; ;
|
|
|
|
|
; KERNEL FUNCTIONS ;
|
|
|
|
|
; ;
|
|
|
|
|
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
|
|
|
|
|
|
|
|
|
reserve_irqs_ports:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pushad
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [irq_owner+4*0], 1 ; timer
|
|
|
|
|
mov [irq_owner+4*1], 1 ; keyboard
|
|
|
|
|
mov [irq_owner+4*5], 1 ; sound blaster
|
|
|
|
|
mov [irq_owner+4*6], 1 ; floppy diskette
|
|
|
|
|
mov [irq_owner+4*13], 1 ; math co-pros
|
|
|
|
|
mov [irq_owner+4*14], 1 ; ide I
|
|
|
|
|
mov [irq_owner+4*15], 1 ; ide II
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
; RESERVE PORTS
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi,1 ; 0x00-0x2d
|
|
|
|
|
mov [RESERVED_PORTS],edi
|
|
|
|
|
shl edi,4
|
|
|
|
|
mov [RESERVED_PORTS+edi+0],dword 1
|
|
|
|
|
mov [RESERVED_PORTS+edi+4],dword 0x0
|
|
|
|
|
mov [RESERVED_PORTS+edi+8],dword 0x2d
|
|
|
|
|
|
|
|
|
|
inc dword [RESERVED_PORTS] ; 0x30-0x4d
|
|
|
|
|
mov edi,[RESERVED_PORTS]
|
|
|
|
|
shl edi,4
|
|
|
|
|
mov [RESERVED_PORTS+edi+0],dword 1
|
|
|
|
|
mov [RESERVED_PORTS+edi+4],dword 0x30
|
|
|
|
|
mov [RESERVED_PORTS+edi+8],dword 0x4d
|
|
|
|
|
|
|
|
|
|
inc dword [RESERVED_PORTS] ; 0x50-0xdf
|
|
|
|
|
mov edi,[RESERVED_PORTS]
|
|
|
|
|
shl edi,4
|
|
|
|
|
mov [RESERVED_PORTS+edi+0],dword 1
|
|
|
|
|
mov [RESERVED_PORTS+edi+4],dword 0x50
|
|
|
|
|
mov [RESERVED_PORTS+edi+8],dword 0xdf
|
|
|
|
|
|
|
|
|
|
inc dword [RESERVED_PORTS] ; 0xe5-0xff
|
|
|
|
|
mov edi,[RESERVED_PORTS]
|
|
|
|
|
shl edi,4
|
|
|
|
|
mov [RESERVED_PORTS+edi+0],dword 1
|
|
|
|
|
mov [RESERVED_PORTS+edi+4],dword 0xe5
|
|
|
|
|
mov [RESERVED_PORTS+edi+8],dword 0xff
|
2006-12-12 00:48:12 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
iglobal
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mouseirqtable db 12 ; ps2
|
|
|
|
|
db 4 ; com1
|
|
|
|
|
db 3 ; com2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
setirqreadports:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [irq12read+0],dword 0x60 + 0x01000000 ; read port 0x60 , byte
|
|
|
|
|
mov [irq12read+4],dword 0 ; end of port list
|
|
|
|
|
mov [irq04read+0],dword 0x3f8 + 0x01000000 ; read port 0x3f8 , byte
|
|
|
|
|
mov [irq04read+4],dword 0 ; end of port list
|
|
|
|
|
mov [irq03read+0],dword 0x2f8 + 0x01000000 ; read port 0x2f8 , byte
|
|
|
|
|
mov [irq03read+4],dword 0 ; end of port list
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
iglobal
|
|
|
|
|
process_number dd 0x1
|
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
set_variables:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,0x100 ; flush port 0x60
|
|
|
|
|
.fl60: in al,0x60
|
|
|
|
|
loop .fl60
|
|
|
|
|
mov [MOUSE_BUFF_COUNT],byte 0 ; mouse buffer
|
|
|
|
|
mov [KEY_COUNT],byte 0 ; keyboard buffer
|
|
|
|
|
mov [BTN_COUNT],byte 0 ; button buffer
|
2007-03-01 23:32:19 +03:00
|
|
|
|
; mov [MOUSE_X],dword 100*65536+100 ; mouse x/y
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push eax
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ax,[BOOT_VAR+0x900c]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
shr ax,1
|
|
|
|
|
shl eax,16
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ax,[BOOT_VAR+0x900A]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
shr ax,1
|
|
|
|
|
mov [MOUSE_X],eax
|
|
|
|
|
pop eax
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov byte [SB16_Status],0 ; Minazzi Paolo
|
|
|
|
|
mov [BTN_ADDR],dword BUTTON_INFO ; address of button list
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
;!! IP 04.02.2005:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [next_usage_update], 100
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov byte [DONT_SWITCH], 0 ; change task if possible
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
;* mouse centered - start code- Mario79
|
|
|
|
|
mouse_centered:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push eax
|
|
|
|
|
mov eax,[ScreenWidth]
|
|
|
|
|
shr eax,1
|
|
|
|
|
mov [MOUSE_X],ax
|
|
|
|
|
mov eax,[ScreenHeight]
|
|
|
|
|
shr eax,1
|
|
|
|
|
mov [MOUSE_Y],ax
|
|
|
|
|
pop eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;* mouse centered - end code- Mario79
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_outport:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi,ebx ; separate flag for read / write
|
2005-10-06 21:56:22 +04:00
|
|
|
|
and ebx,65535
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov ecx,[RESERVED_PORTS]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
test ecx,ecx
|
|
|
|
|
jne sopl8
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
sopl8:
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edx,[TASK_BASE]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edx,[edx+0x4]
|
|
|
|
|
and ebx,65535
|
|
|
|
|
cld
|
|
|
|
|
sopl1:
|
|
|
|
|
|
|
|
|
|
mov esi,ecx
|
|
|
|
|
shl esi,4
|
2007-03-01 23:32:19 +03:00
|
|
|
|
add esi,RESERVED_PORTS
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp edx,[esi+0]
|
|
|
|
|
jne sopl2
|
|
|
|
|
cmp ebx,[esi+4]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jb sopl2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp ebx,[esi+8]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jg sopl2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jmp sopl3
|
|
|
|
|
|
|
|
|
|
sopl2:
|
|
|
|
|
|
|
|
|
|
dec ecx
|
|
|
|
|
jnz sopl1
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
sopl3:
|
|
|
|
|
|
|
|
|
|
test edi,0x80000000 ; read ?
|
|
|
|
|
jnz sopl4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,bx ; write
|
2005-10-06 21:56:22 +04:00
|
|
|
|
out dx,al
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
sopl4:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,bx ; read
|
|
|
|
|
in al,dx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
and eax,0xff
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
mov [esp+24],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
sys_sb16:
|
|
|
|
|
|
|
|
|
|
cmp word [sb16],word 0
|
|
|
|
|
jnz sb16l1
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
sb16l1:
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
cmp eax,1 ; set volume - main
|
|
|
|
|
jnz sb16l2
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x22
|
|
|
|
|
out dx,al
|
|
|
|
|
mov esi,1
|
|
|
|
|
call delay_ms
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
inc edx
|
|
|
|
|
out dx,al
|
|
|
|
|
ret
|
|
|
|
|
sb16l2:
|
|
|
|
|
|
|
|
|
|
cmp eax,2 ; set volume - cd
|
|
|
|
|
jnz sb16l3
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x28
|
|
|
|
|
out dx,al
|
|
|
|
|
mov esi,1
|
|
|
|
|
call delay_ms
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
add edx,1
|
|
|
|
|
out dx,al
|
|
|
|
|
ret
|
|
|
|
|
sb16l3:
|
|
|
|
|
mov [esp+36],dword 2
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_sb16II:
|
|
|
|
|
|
|
|
|
|
cmp word [sb16],word 0
|
|
|
|
|
jnz IIsb16l1
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
IIsb16l1:
|
|
|
|
|
|
|
|
|
|
cmp eax,1 ; set volume - main
|
|
|
|
|
jnz IIsb16l2
|
|
|
|
|
; L
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x30
|
|
|
|
|
out dx,al
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
inc edx
|
|
|
|
|
out dx,al
|
|
|
|
|
; R
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x31
|
|
|
|
|
out dx,al
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
inc edx
|
|
|
|
|
out dx,al
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
ret
|
|
|
|
|
IIsb16l2:
|
|
|
|
|
|
|
|
|
|
cmp eax,2 ; set volume - cd
|
|
|
|
|
jnz IIsb16l3
|
|
|
|
|
; L
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x36
|
|
|
|
|
out dx,al
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
inc edx
|
|
|
|
|
out dx,al
|
|
|
|
|
; R
|
|
|
|
|
mov dx,word [sb16]
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0x37
|
|
|
|
|
out dx,al
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
inc edx
|
|
|
|
|
out dx,al
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
ret
|
|
|
|
|
IIsb16l3:
|
|
|
|
|
|
|
|
|
|
mov [esp+36],dword 2
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
display_number:
|
|
|
|
|
|
|
|
|
|
; eax = print type, al=0 -> ebx is number
|
|
|
|
|
; al=1 -> ebx is pointer
|
|
|
|
|
; ah=0 -> display decimal
|
|
|
|
|
; ah=1 -> display hexadecimal
|
|
|
|
|
; ah=2 -> display binary
|
|
|
|
|
; eax bits 16-21 = number of digits to display (0-32)
|
|
|
|
|
; eax bits 22-31 = reserved
|
|
|
|
|
;
|
|
|
|
|
; ebx = number or pointer
|
|
|
|
|
; ecx = x shl 16 + y
|
|
|
|
|
; edx = color
|
2007-10-18 20:27:26 +04:00
|
|
|
|
xor edi, edi
|
2006-11-16 08:47:31 +03:00
|
|
|
|
display_number_force:
|
2007-10-17 01:19:12 +04:00
|
|
|
|
push eax
|
2007-10-18 20:27:26 +04:00
|
|
|
|
and eax,0x3fffffff
|
|
|
|
|
cmp eax,0xffff ; length > 0 ?
|
|
|
|
|
pop eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jge cont_displ
|
|
|
|
|
ret
|
|
|
|
|
cont_displ:
|
2007-10-17 01:19:12 +04:00
|
|
|
|
push eax
|
2007-10-18 20:27:26 +04:00
|
|
|
|
and eax,0x3fffffff
|
|
|
|
|
cmp eax,61*0x10000 ; length <= 60 ?
|
|
|
|
|
pop eax
|
2006-05-05 16:40:02 +04:00
|
|
|
|
jb cont_displ2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
cont_displ2:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-10-18 20:27:26 +04:00
|
|
|
|
cmp al,1 ; ecx is a pointer ?
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne displnl1
|
2007-10-18 20:27:26 +04:00
|
|
|
|
mov ebp,ebx
|
|
|
|
|
add ebp,4
|
|
|
|
|
mov ebp,[ebp+std_application_base_address]
|
2006-08-28 17:34:54 +04:00
|
|
|
|
mov ebx,[ebx+std_application_base_address]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
displnl1:
|
|
|
|
|
sub esp,64
|
|
|
|
|
|
2007-10-18 20:27:26 +04:00
|
|
|
|
cmp ah,0 ; DECIMAL
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_display_desnum
|
|
|
|
|
shr eax,16
|
2007-10-18 20:27:26 +04:00
|
|
|
|
and eax,0xC03f
|
2007-10-17 01:19:12 +04:00
|
|
|
|
; and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
push eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edi,esp
|
2006-10-25 14:28:41 +04:00
|
|
|
|
add edi,4+64-1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ecx,eax
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
mov ebx,10
|
|
|
|
|
d_desnum:
|
|
|
|
|
xor edx,edx
|
2007-10-18 20:27:26 +04:00
|
|
|
|
call division_64_bits
|
2005-10-06 21:56:22 +04:00
|
|
|
|
div ebx
|
|
|
|
|
add dl,48
|
|
|
|
|
mov [edi],dl
|
|
|
|
|
dec edi
|
|
|
|
|
loop d_desnum
|
|
|
|
|
pop eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
call normalize_number
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call draw_num_text
|
|
|
|
|
add esp,64
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
no_display_desnum:
|
|
|
|
|
|
2007-10-18 20:27:26 +04:00
|
|
|
|
cmp ah,0x01 ; HEXADECIMAL
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_display_hexnum
|
|
|
|
|
shr eax,16
|
2007-10-18 20:27:26 +04:00
|
|
|
|
and eax,0xC03f
|
2007-10-17 01:19:12 +04:00
|
|
|
|
; and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
push eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edi,esp
|
2006-10-25 14:28:41 +04:00
|
|
|
|
add edi,4+64-1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ecx,eax
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
mov ebx,16
|
|
|
|
|
d_hexnum:
|
|
|
|
|
xor edx,edx
|
2007-10-18 20:27:26 +04:00
|
|
|
|
call division_64_bits
|
2005-10-06 21:56:22 +04:00
|
|
|
|
div ebx
|
|
|
|
|
add edx,hexletters
|
|
|
|
|
mov dl,[edx]
|
|
|
|
|
mov [edi],dl
|
|
|
|
|
dec edi
|
|
|
|
|
loop d_hexnum
|
|
|
|
|
pop eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
call normalize_number
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call draw_num_text
|
|
|
|
|
add esp,64
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
no_display_hexnum:
|
|
|
|
|
|
2007-10-18 20:27:26 +04:00
|
|
|
|
cmp ah,0x02 ; BINARY
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_display_binnum
|
|
|
|
|
shr eax,16
|
2007-10-18 20:27:26 +04:00
|
|
|
|
and eax,0xC03f
|
2007-10-17 01:19:12 +04:00
|
|
|
|
; and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
push eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
and eax,0x3f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edi,esp
|
2006-10-25 14:28:41 +04:00
|
|
|
|
add edi,4+64-1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ecx,eax
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
mov ebx,2
|
|
|
|
|
d_binnum:
|
|
|
|
|
xor edx,edx
|
2007-10-18 20:27:26 +04:00
|
|
|
|
call division_64_bits
|
2005-10-06 21:56:22 +04:00
|
|
|
|
div ebx
|
|
|
|
|
add dl,48
|
|
|
|
|
mov [edi],dl
|
|
|
|
|
dec edi
|
|
|
|
|
loop d_binnum
|
|
|
|
|
pop eax
|
2007-10-17 01:19:12 +04:00
|
|
|
|
call normalize_number
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call draw_num_text
|
|
|
|
|
add esp,64
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
no_display_binnum:
|
|
|
|
|
|
|
|
|
|
add esp,64
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
|
2007-10-17 01:19:12 +04:00
|
|
|
|
normalize_number:
|
|
|
|
|
test ah,0x80
|
|
|
|
|
jz .continue
|
|
|
|
|
mov ecx,48
|
|
|
|
|
and eax,0x3f
|
|
|
|
|
@@:
|
|
|
|
|
inc edi
|
|
|
|
|
cmp [edi],cl
|
|
|
|
|
jne .continue
|
|
|
|
|
dec eax
|
|
|
|
|
cmp eax,1
|
2007-10-25 15:20:02 +04:00
|
|
|
|
ja @r
|
|
|
|
|
mov al,1
|
2007-10-17 01:19:12 +04:00
|
|
|
|
.continue:
|
|
|
|
|
and eax,0x3f
|
|
|
|
|
ret
|
|
|
|
|
|
2007-10-18 20:27:26 +04:00
|
|
|
|
division_64_bits:
|
|
|
|
|
test [esp+1+4],byte 0x40
|
|
|
|
|
jz .continue
|
|
|
|
|
push eax
|
|
|
|
|
mov eax,ebp
|
|
|
|
|
div ebx
|
|
|
|
|
mov ebp,eax
|
|
|
|
|
pop eax
|
|
|
|
|
.continue:
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
draw_num_text:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov esi,eax
|
|
|
|
|
mov edx,64+4
|
|
|
|
|
sub edx,eax
|
|
|
|
|
add edx,esp
|
|
|
|
|
mov ebx,[esp+64+32-8+4]
|
|
|
|
|
; add window start x & y
|
|
|
|
|
mov ecx,[TASK_BASE]
|
2007-04-18 10:37:14 +04:00
|
|
|
|
|
|
|
|
|
mov edi,[CURRENT_TASK]
|
|
|
|
|
shl edi,8
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax,[ecx-twdw+WDATA.box.left]
|
|
|
|
|
add eax,[edi+SLOT_BASE+APPDATA.wnd_clientbox.left]
|
|
|
|
|
shl eax,16
|
|
|
|
|
add eax,[ecx-twdw+WDATA.box.top]
|
|
|
|
|
add eax,[edi+SLOT_BASE+APPDATA.wnd_clientbox.top]
|
|
|
|
|
add ebx,eax
|
|
|
|
|
mov ecx,[esp+64+32-12+4]
|
|
|
|
|
and ecx, not 0x80000000 ; force counted string
|
|
|
|
|
mov eax, [esp+64+8] ; background color (if given)
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi, [esp+64+4]
|
2006-08-28 17:34:54 +04:00
|
|
|
|
jmp dtext
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_setup:
|
|
|
|
|
|
|
|
|
|
; 1=roland mpu midi base , base io address
|
|
|
|
|
; 2=keyboard 1, base kaybap 2, shift keymap, 9 country 1eng 2fi 3ger 4rus
|
|
|
|
|
; 3=cd base 1, pri.master 2, pri slave 3 sec master, 4 sec slave
|
|
|
|
|
; 4=sb16 base , base io address
|
|
|
|
|
; 5=system language, 1eng 2fi 3ger 4rus
|
|
|
|
|
; 7=hd base 1, pri.master 2, pri slave 3 sec master, 4 sec slave
|
|
|
|
|
; 8=fat32 partition in hd
|
|
|
|
|
; 9
|
|
|
|
|
; 10 = sound dma channel
|
|
|
|
|
; 11 = enable lba read
|
|
|
|
|
; 12 = enable pci access
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
mov [esp+36],dword 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,1 ; MIDI
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nsyse1
|
|
|
|
|
cmp ebx,0x100
|
|
|
|
|
jb nsyse1
|
|
|
|
|
mov edx,65535
|
|
|
|
|
cmp edx,ebx
|
|
|
|
|
jb nsyse1
|
|
|
|
|
mov [midi_base],bx
|
|
|
|
|
mov word [mididp],bx
|
|
|
|
|
inc bx
|
|
|
|
|
mov word [midisp],bx
|
|
|
|
|
ret
|
|
|
|
|
|
2007-01-19 18:02:33 +03:00
|
|
|
|
iglobal
|
2005-10-06 21:56:22 +04:00
|
|
|
|
midi_base dw 0
|
2007-01-19 18:02:33 +03:00
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
nsyse1:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,2 ; KEYBOARD
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nsyse2
|
|
|
|
|
cmp ebx,1
|
|
|
|
|
jnz kbnobase
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov eax,ecx
|
|
|
|
|
mov ebx,keymap
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnobase:
|
|
|
|
|
cmp ebx,2
|
|
|
|
|
jnz kbnoshift
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov eax,ecx
|
|
|
|
|
mov ebx,keymap_shift
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnoshift:
|
|
|
|
|
cmp ebx,3
|
|
|
|
|
jne kbnoalt
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov eax,ecx
|
|
|
|
|
mov ebx,keymap_alt
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnoalt:
|
|
|
|
|
cmp ebx,9
|
|
|
|
|
jnz kbnocountry
|
|
|
|
|
mov word [keyboard],cx
|
|
|
|
|
ret
|
|
|
|
|
kbnocountry:
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
nsyse2:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,3 ; CD
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nsyse3
|
2006-05-05 16:40:02 +04:00
|
|
|
|
test ebx,ebx
|
|
|
|
|
jz nosesl
|
|
|
|
|
cmp ebx, 4
|
|
|
|
|
ja nosesl
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [cd_base],bl
|
|
|
|
|
cmp ebx,1
|
|
|
|
|
jnz noprma
|
|
|
|
|
mov [cdbase],0x1f0
|
|
|
|
|
mov [cdid],0xa0
|
|
|
|
|
noprma:
|
|
|
|
|
cmp ebx,2
|
|
|
|
|
jnz noprsl
|
|
|
|
|
mov [cdbase],0x1f0
|
|
|
|
|
mov [cdid],0xb0
|
|
|
|
|
noprsl:
|
|
|
|
|
cmp ebx,3
|
|
|
|
|
jnz nosema
|
|
|
|
|
mov [cdbase],0x170
|
|
|
|
|
mov [cdid],0xa0
|
|
|
|
|
nosema:
|
|
|
|
|
cmp ebx,4
|
|
|
|
|
jnz nosesl
|
|
|
|
|
mov [cdbase],0x170
|
|
|
|
|
mov [cdid],0xb0
|
|
|
|
|
nosesl:
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
cd_base db 0
|
|
|
|
|
|
|
|
|
|
nsyse3:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,4 ; SB
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nsyse4
|
|
|
|
|
cmp ebx,0x100
|
|
|
|
|
jb nsyse4
|
|
|
|
|
mov edx,65535
|
|
|
|
|
cmp edx,ebx
|
|
|
|
|
jb nsyse4
|
|
|
|
|
mov word [sb16],bx
|
|
|
|
|
ret
|
|
|
|
|
nsyse4:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,5 ; SYSTEM LANGUAGE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nsyse5
|
|
|
|
|
mov [syslang],ebx
|
|
|
|
|
ret
|
|
|
|
|
nsyse5:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,7 ; HD BASE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nsyse7
|
2006-05-05 16:40:02 +04:00
|
|
|
|
test ebx,ebx
|
|
|
|
|
jz nosethd
|
|
|
|
|
cmp ebx,4
|
|
|
|
|
ja nosethd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [hd_base],bl
|
|
|
|
|
cmp ebx,1
|
|
|
|
|
jnz noprmahd
|
|
|
|
|
mov [hdbase],0x1f0
|
|
|
|
|
mov [hdid],0x0
|
|
|
|
|
mov [hdpos],1
|
|
|
|
|
; call set_FAT32_variables
|
|
|
|
|
noprmahd:
|
|
|
|
|
cmp ebx,2
|
|
|
|
|
jnz noprslhd
|
|
|
|
|
mov [hdbase],0x1f0
|
|
|
|
|
mov [hdid],0x10
|
|
|
|
|
mov [hdpos],2
|
|
|
|
|
; call set_FAT32_variables
|
|
|
|
|
noprslhd:
|
|
|
|
|
cmp ebx,3
|
|
|
|
|
jnz nosemahd
|
|
|
|
|
mov [hdbase],0x170
|
|
|
|
|
mov [hdid],0x0
|
|
|
|
|
mov [hdpos],3
|
|
|
|
|
; call set_FAT32_variables
|
|
|
|
|
nosemahd:
|
|
|
|
|
cmp ebx,4
|
|
|
|
|
jnz noseslhd
|
|
|
|
|
mov [hdbase],0x170
|
|
|
|
|
mov [hdid],0x10
|
|
|
|
|
mov [hdpos],4
|
|
|
|
|
; call set_FAT32_variables
|
|
|
|
|
noseslhd:
|
|
|
|
|
call reserve_hd1
|
2007-02-05 17:20:36 +03:00
|
|
|
|
call reserve_hd_channel
|
|
|
|
|
call free_hd_channel
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [hd1_status],0 ; free
|
2006-05-05 16:40:02 +04:00
|
|
|
|
nosethd:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2007-01-19 18:02:33 +03:00
|
|
|
|
iglobal
|
2005-10-06 21:56:22 +04:00
|
|
|
|
hd_base db 0
|
2007-01-19 18:02:33 +03:00
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
nsyse7:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,8 ; HD PARTITION
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nsyse8
|
|
|
|
|
mov [fat32part],ebx
|
|
|
|
|
; call set_FAT32_variables
|
|
|
|
|
call reserve_hd1
|
2007-02-05 17:20:36 +03:00
|
|
|
|
call reserve_hd_channel
|
|
|
|
|
call free_hd_channel
|
2005-10-06 21:56:22 +04:00
|
|
|
|
pusha
|
|
|
|
|
call choice_necessity_partition_1
|
|
|
|
|
popa
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [hd1_status],0 ; free
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
nsyse8:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,10 ; SOUND DMA CHANNEL
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_set_sound_dma
|
2006-05-05 16:40:02 +04:00
|
|
|
|
cmp ebx,3
|
|
|
|
|
ja sys_setup_err
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [sound_dma],ebx
|
|
|
|
|
ret
|
|
|
|
|
no_set_sound_dma:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,11 ; ENABLE LBA READ
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_set_lba_read
|
|
|
|
|
and ebx,1
|
|
|
|
|
mov [lba_read_enabled],ebx
|
|
|
|
|
ret
|
|
|
|
|
no_set_lba_read:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,12 ; ENABLE PCI ACCESS
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_set_pci_access
|
|
|
|
|
and ebx,1
|
|
|
|
|
mov [pci_access_enabled],ebx
|
|
|
|
|
ret
|
|
|
|
|
no_set_pci_access:
|
|
|
|
|
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'vmodeint.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
sys_setup_err:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [esp+36],dword -1
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_getsetup:
|
|
|
|
|
|
|
|
|
|
; 1=roland mpu midi base , base io address
|
|
|
|
|
; 2=keyboard 1, base kaybap 2, shift keymap, 9 country 1eng 2fi 3ger 4rus
|
|
|
|
|
; 3=cd base 1, pri.master 2, pri slave 3 sec master, 4 sec slave
|
|
|
|
|
; 4=sb16 base , base io address
|
|
|
|
|
; 5=system language, 1eng 2fi 3ger 4rus
|
|
|
|
|
; 7=hd base 1, pri.master 2, pri slave 3 sec master, 4 sec slave
|
|
|
|
|
; 8=fat32 partition in hd
|
|
|
|
|
; 9=get hs timer tic
|
|
|
|
|
|
|
|
|
|
cmp eax,1
|
|
|
|
|
jne ngsyse1
|
|
|
|
|
movzx eax,[midi_base]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse1:
|
|
|
|
|
|
|
|
|
|
cmp eax,2
|
|
|
|
|
jne ngsyse2
|
|
|
|
|
cmp ebx,1
|
|
|
|
|
jnz kbnobaseret
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ebx,ecx
|
|
|
|
|
mov eax,keymap
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnobaseret:
|
|
|
|
|
cmp ebx,2
|
|
|
|
|
jnz kbnoshiftret
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ebx,ecx
|
|
|
|
|
mov eax,keymap_shift
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnoshiftret:
|
|
|
|
|
cmp ebx,3
|
|
|
|
|
jne kbnoaltret
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add ecx,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov ebx,ecx
|
|
|
|
|
mov eax,keymap_alt
|
|
|
|
|
mov ecx,128
|
|
|
|
|
call memmove
|
|
|
|
|
ret
|
|
|
|
|
kbnoaltret:
|
|
|
|
|
cmp ebx,9
|
|
|
|
|
jnz ngsyse2
|
|
|
|
|
movzx eax,word [keyboard]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse2:
|
|
|
|
|
|
|
|
|
|
cmp eax,3
|
|
|
|
|
jnz ngsyse3
|
|
|
|
|
movzx eax,[cd_base]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse3:
|
|
|
|
|
|
|
|
|
|
cmp eax,4
|
|
|
|
|
jne ngsyse4
|
|
|
|
|
mov eax,[sb16]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse4:
|
|
|
|
|
|
|
|
|
|
cmp eax,5
|
|
|
|
|
jnz ngsyse5
|
|
|
|
|
mov eax,[syslang]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse5:
|
|
|
|
|
cmp eax,7
|
|
|
|
|
jnz ngsyse7
|
|
|
|
|
movzx eax,[hd_base]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse7:
|
|
|
|
|
cmp eax,8
|
|
|
|
|
jnz ngsyse8
|
|
|
|
|
mov eax,[fat32part]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse8:
|
|
|
|
|
cmp eax,9
|
|
|
|
|
jne ngsyse9
|
|
|
|
|
mov eax,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse9:
|
|
|
|
|
cmp eax,10
|
|
|
|
|
jnz ngsyse10
|
|
|
|
|
mov eax,[sound_dma]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse10:
|
|
|
|
|
cmp eax,11
|
|
|
|
|
jnz ngsyse11
|
|
|
|
|
mov eax,[lba_read_enabled]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse11:
|
|
|
|
|
cmp eax,12
|
|
|
|
|
jnz ngsyse12
|
|
|
|
|
mov eax,[pci_access_enabled]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
ngsyse12:
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
|
2007-05-08 15:32:58 +04:00
|
|
|
|
get_timer_ticks:
|
|
|
|
|
mov eax,[timer_ticks]
|
|
|
|
|
ret
|
|
|
|
|
|
2007-01-19 18:02:33 +03:00
|
|
|
|
iglobal
|
2005-10-06 21:56:22 +04:00
|
|
|
|
align 4
|
2006-11-27 13:07:51 +03:00
|
|
|
|
mousefn dd msscreen, mswin, msbutton, msset
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dd app_load_cursor
|
|
|
|
|
dd app_set_cursor
|
|
|
|
|
dd app_delete_cursor
|
2007-05-08 15:32:58 +04:00
|
|
|
|
dd msz
|
2007-01-19 18:02:33 +03:00
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
readmousepos:
|
|
|
|
|
|
|
|
|
|
; eax=0 screen relative
|
|
|
|
|
; eax=1 window relative
|
|
|
|
|
; eax=2 buttons pressed
|
2006-11-27 13:07:51 +03:00
|
|
|
|
; eax=3 set mouse pos ; reserved
|
|
|
|
|
; eax=4 load cursor
|
|
|
|
|
; eax=5 set cursor
|
|
|
|
|
; eax=6 delete cursor ; reserved
|
2007-05-08 15:32:58 +04:00
|
|
|
|
; eax=7 get mouse_z
|
2006-11-27 13:07:51 +03:00
|
|
|
|
|
2007-05-08 15:32:58 +04:00
|
|
|
|
cmp eax, 7
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ja msset
|
|
|
|
|
jmp [mousefn+eax*4]
|
2006-11-27 13:07:51 +03:00
|
|
|
|
msscreen:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[MOUSE_X]
|
|
|
|
|
shl eax,16
|
|
|
|
|
mov ax,[MOUSE_Y]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
2006-11-27 13:07:51 +03:00
|
|
|
|
mswin:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[MOUSE_X]
|
|
|
|
|
shl eax,16
|
|
|
|
|
mov ax,[MOUSE_Y]
|
|
|
|
|
mov esi,[TASK_BASE]
|
|
|
|
|
mov bx, word [esi-twdw+WDATA.box.left]
|
|
|
|
|
shl ebx,16
|
|
|
|
|
mov bx, word [esi-twdw+WDATA.box.top]
|
|
|
|
|
sub eax,ebx
|
|
|
|
|
|
|
|
|
|
mov edi,[CURRENT_TASK]
|
|
|
|
|
shl edi,8
|
|
|
|
|
sub ax,word[edi+SLOT_BASE+APPDATA.wnd_clientbox.top]
|
|
|
|
|
rol eax,16
|
|
|
|
|
sub ax,word[edi+SLOT_BASE+APPDATA.wnd_clientbox.left]
|
|
|
|
|
rol eax,16
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
2006-11-27 13:07:51 +03:00
|
|
|
|
msbutton:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
movzx eax,byte [BTN_DOWN]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
2007-05-08 15:32:58 +04:00
|
|
|
|
msz:
|
|
|
|
|
mov edi, [TASK_COUNT]
|
|
|
|
|
movzx edi, word [WIN_POS + edi*2]
|
|
|
|
|
cmp edi, [CURRENT_TASK]
|
|
|
|
|
jne @f
|
|
|
|
|
mov ax,[MOUSE_SCROLL_H]
|
|
|
|
|
shl eax,16
|
|
|
|
|
mov ax,[MOUSE_SCROLL_V]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
mov [MOUSE_SCROLL_H],word 0
|
|
|
|
|
mov [MOUSE_SCROLL_V],word 0
|
|
|
|
|
ret
|
|
|
|
|
@@:
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
ret
|
2006-11-27 13:07:51 +03:00
|
|
|
|
msset:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2006-11-27 13:07:51 +03:00
|
|
|
|
|
|
|
|
|
app_load_cursor:
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; add ebx, new_app_base
|
|
|
|
|
cmp ebx, OS_BASE
|
|
|
|
|
jae msset
|
2007-03-23 06:11:34 +03:00
|
|
|
|
stdcall load_cursor, ebx, ecx
|
|
|
|
|
mov [esp+36], eax
|
|
|
|
|
ret
|
2006-11-27 13:07:51 +03:00
|
|
|
|
|
|
|
|
|
app_set_cursor:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
stdcall set_cursor, ebx
|
|
|
|
|
mov [esp+36], eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-12-12 00:48:12 +03:00
|
|
|
|
app_delete_cursor:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
stdcall delete_cursor, ebx
|
|
|
|
|
mov [esp+36], eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
is_input:
|
|
|
|
|
|
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,word [midisp]
|
|
|
|
|
in al,dx
|
|
|
|
|
and al,0x80
|
|
|
|
|
pop edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
is_output:
|
|
|
|
|
|
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,word [midisp]
|
|
|
|
|
in al,dx
|
|
|
|
|
and al,0x40
|
|
|
|
|
pop edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
get_mpu_in:
|
|
|
|
|
|
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,word [mididp]
|
|
|
|
|
in al,dx
|
|
|
|
|
pop edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
put_mpu_out:
|
|
|
|
|
|
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,word [mididp]
|
|
|
|
|
out dx,al
|
|
|
|
|
pop edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
setuart:
|
|
|
|
|
|
|
|
|
|
su1:
|
|
|
|
|
call is_output
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp al,0
|
|
|
|
|
jnz su1
|
|
|
|
|
mov dx,word [midisp]
|
|
|
|
|
mov al,0xff
|
|
|
|
|
out dx,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
su2:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dx,word [midisp]
|
|
|
|
|
mov al,0xff
|
|
|
|
|
out dx,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call is_input
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp al,0
|
|
|
|
|
jnz su2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call get_mpu_in
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp al,0xfe
|
|
|
|
|
jnz su2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
su3:
|
|
|
|
|
call is_output
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp al,0
|
|
|
|
|
jnz su3
|
|
|
|
|
mov dx,word [midisp]
|
|
|
|
|
mov al,0x3f
|
|
|
|
|
out dx,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_midi:
|
|
|
|
|
|
|
|
|
|
cmp [mididp],0
|
|
|
|
|
jnz sm0
|
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
sm0:
|
|
|
|
|
|
|
|
|
|
cmp eax,1
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
jnz smn1
|
|
|
|
|
call setuart
|
|
|
|
|
ret
|
|
|
|
|
smn1:
|
|
|
|
|
|
|
|
|
|
cmp eax,2
|
|
|
|
|
jnz smn2
|
|
|
|
|
sm10:
|
|
|
|
|
call get_mpu_in
|
|
|
|
|
call is_output
|
|
|
|
|
test al,al
|
|
|
|
|
jnz sm10
|
|
|
|
|
mov al,bl
|
|
|
|
|
call put_mpu_out
|
|
|
|
|
ret
|
|
|
|
|
smn2:
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
detect_devices:
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'detect/commouse.inc'
|
2007-05-08 15:32:58 +04:00
|
|
|
|
;include 'detect/ps2mouse.inc'
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;include 'detect/dev_fd.inc'
|
|
|
|
|
;include 'detect/dev_hdcd.inc'
|
|
|
|
|
;include 'detect/sear_par.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sys_end:
|
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov [eax+TASKDATA.state], 3 ; terminate this program
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
waitterm: ; wait here for termination
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ebx,100
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call delay_hs
|
|
|
|
|
jmp waitterm
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
iglobal
|
2006-10-08 11:48:38 +04:00
|
|
|
|
align 4
|
2006-05-05 16:40:02 +04:00
|
|
|
|
sys_system_table:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dd sysfn_shutdown ; 1 = system shutdown
|
|
|
|
|
dd sysfn_terminate ; 2 = terminate thread
|
|
|
|
|
dd sysfn_activate ; 3 = activate window
|
|
|
|
|
dd sysfn_getidletime ; 4 = get idle time
|
|
|
|
|
dd sysfn_getcpuclock ; 5 = get cpu clock
|
|
|
|
|
dd sysfn_saveramdisk ; 6 = save ramdisk
|
|
|
|
|
dd sysfn_getactive ; 7 = get active window
|
|
|
|
|
dd sysfn_sound_flag ; 8 = get/set sound_flag
|
|
|
|
|
dd sysfn_shutdown_param ; 9 = shutdown with parameter
|
|
|
|
|
dd sysfn_minimize ; 10 = minimize window
|
|
|
|
|
dd sysfn_getdiskinfo ; 11 = get disk subsystem info
|
|
|
|
|
dd sysfn_lastkey ; 12 = get last pressed key
|
|
|
|
|
dd sysfn_getversion ; 13 = get kernel version
|
|
|
|
|
dd sysfn_waitretrace ; 14 = wait retrace
|
|
|
|
|
dd sysfn_centermouse ; 15 = center mouse cursor
|
|
|
|
|
dd sysfn_getfreemem ; 16 = get free memory size
|
|
|
|
|
dd sysfn_getallmem ; 17 = get total memory size
|
|
|
|
|
dd sysfn_terminate2 ; 18 = terminate thread using PID
|
|
|
|
|
; instead of slot
|
|
|
|
|
dd sysfn_mouse_acceleration; 19 = set/get mouse acceleration
|
|
|
|
|
dd sysfn_meminfo ; 20 = get extended memory info
|
2007-08-23 02:34:57 +04:00
|
|
|
|
dd sysfn_pid_to_slot ; 21 = get slot number for pid
|
|
|
|
|
dd sysfn_min_rest_window ; 22 = minimize and restore any window
|
2006-05-05 16:40:02 +04:00
|
|
|
|
sysfn_num = ($ - sys_system_table)/4
|
|
|
|
|
endg
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sys_system:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
dec ebx
|
|
|
|
|
cmp ebx, sysfn_num
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jae @f
|
2007-12-17 14:04:07 +03:00
|
|
|
|
jmp dword [sys_system_table + ebx*4]
|
2006-05-05 16:40:02 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_shutdown: ; 18.1 = BOOT
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov [BOOT_VAR+0x9030],byte 0
|
2006-02-01 09:07:36 +03:00
|
|
|
|
for_shutdown_parameter:
|
2006-11-20 10:06:00 +03:00
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax,[TASK_COUNT]
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov [SYS_SHUTDOWN],al
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov [shutdown_processes],eax
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and dword [esp+32], 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
uglobal
|
|
|
|
|
shutdown_processes: dd 0x0
|
|
|
|
|
endg
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_terminate: ; 18.2 = TERMINATE
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jb noprocessterminate
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edx,[TASK_COUNT]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,edx
|
2006-05-05 16:40:02 +04:00
|
|
|
|
ja noprocessterminate
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax,[TASK_COUNT]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
shl ecx,5
|
|
|
|
|
mov edx,[ecx+CURRENT_TASK+TASKDATA.pid]
|
|
|
|
|
add ecx,CURRENT_TASK+TASKDATA.state
|
|
|
|
|
cmp byte [ecx], 9
|
2006-05-05 16:40:02 +04:00
|
|
|
|
jz noprocessterminate
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;call MEM_Heap_Lock ;guarantee that process isn't working with heap
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [ecx],byte 3 ; clear possible i40's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;call MEM_Heap_UnLock
|
|
|
|
|
|
|
|
|
|
cmp edx,[application_table_status] ; clear app table stat
|
|
|
|
|
jne noatsc
|
|
|
|
|
mov [application_table_status],0
|
|
|
|
|
noatsc:
|
|
|
|
|
noprocessterminate:
|
2006-05-05 16:40:02 +04:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-06-14 11:42:59 +04:00
|
|
|
|
sysfn_terminate2:
|
|
|
|
|
;lock application_table_status mutex
|
2006-10-06 10:09:41 +04:00
|
|
|
|
.table_status:
|
2006-06-14 11:42:59 +04:00
|
|
|
|
cli
|
|
|
|
|
cmp [application_table_status],0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je .stf
|
2006-06-14 11:42:59 +04:00
|
|
|
|
sti
|
|
|
|
|
call change_task
|
|
|
|
|
jmp .table_status
|
|
|
|
|
.stf:
|
|
|
|
|
call set_application_table_status
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax,ecx
|
2006-06-14 11:42:59 +04:00
|
|
|
|
call pid_to_slot
|
|
|
|
|
test eax,eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz .not_found
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ecx,eax
|
2006-06-14 11:42:59 +04:00
|
|
|
|
cli
|
|
|
|
|
call sysfn_terminate
|
|
|
|
|
mov [application_table_status],0
|
|
|
|
|
sti
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and dword [esp+32],0
|
2006-06-14 11:42:59 +04:00
|
|
|
|
ret
|
|
|
|
|
.not_found:
|
|
|
|
|
mov [application_table_status],0
|
2007-12-17 14:04:07 +03:00
|
|
|
|
or dword [esp+32],-1
|
2006-06-14 11:42:59 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_activate: ; 18.3 = ACTIVATE WINDOW
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,2
|
2006-07-25 14:48:35 +04:00
|
|
|
|
jb .nowindowactivate
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,[TASK_COUNT]
|
2006-07-25 14:48:35 +04:00
|
|
|
|
ja .nowindowactivate
|
|
|
|
|
|
|
|
|
|
mov [window_minimize], 2 ; restore window if minimized
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
movzx esi, word [WIN_STACK + ecx*2]
|
2007-02-28 11:52:06 +03:00
|
|
|
|
cmp esi, [TASK_COUNT]
|
2006-07-25 14:48:35 +04:00
|
|
|
|
je .nowindowactivate ; already active
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov edi, ecx
|
2006-07-25 14:48:35 +04:00
|
|
|
|
shl edi, 5
|
|
|
|
|
add edi, window_data
|
2007-12-17 14:04:07 +03:00
|
|
|
|
movzx esi, word [WIN_STACK + ecx * 2]
|
2007-02-28 13:51:05 +03:00
|
|
|
|
lea esi, [WIN_POS + esi * 2]
|
2006-07-25 14:48:35 +04:00
|
|
|
|
call waredraw
|
|
|
|
|
.nowindowactivate:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
2006-02-01 09:07:36 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_getidletime: ; 18.4 = GET IDLETIME
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov eax,[idleusesec]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_getcpuclock: ; 18.5 = GET TSC/SEC
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov eax,[CPU_FREQ]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
; SAVE ramdisk to /hd/1/menuet.img
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!
|
|
|
|
|
include 'blkdev/rdsave.inc'
|
|
|
|
|
;!!!!!!!!!!!!!!!!!!!!!!!!
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_getactive: ; 18.7 = get active window
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax, [TASK_COUNT]
|
2007-02-28 13:51:05 +03:00
|
|
|
|
movzx eax, word [WIN_POS + eax*2]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_sound_flag: ; 18.8 = get/set sound_flag
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nogetsoundflag
|
|
|
|
|
movzx eax,byte [sound_flag] ; get sound_flag
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
nogetsoundflag:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosoundflag
|
2006-05-05 16:40:02 +04:00
|
|
|
|
xor byte [sound_flag], 1
|
|
|
|
|
nosoundflag:
|
2006-02-01 09:07:36 +03:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_shutdown_param: ; 18.9 = system shutdown with param
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,1
|
2006-05-05 16:40:02 +04:00
|
|
|
|
jl exit_for_anyone
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jg exit_for_anyone
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [BOOT_VAR+0x9030],cl
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jmp for_shutdown_parameter
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_minimize: ; 18.10 = minimize window
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [window_minimize],1
|
|
|
|
|
exit_for_anyone:
|
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_getdiskinfo: ; 18.11 = get disk info table
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz full_table
|
|
|
|
|
small_table:
|
|
|
|
|
call for_all_tables
|
2006-05-05 16:40:02 +04:00
|
|
|
|
mov ecx,10
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cld
|
|
|
|
|
rep movsb
|
|
|
|
|
ret
|
|
|
|
|
for_all_tables:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov edi,edx
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov esi,DRIVE_DATA
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
full_table:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz exit_for_anyone
|
|
|
|
|
call for_all_tables
|
2006-05-05 16:40:02 +04:00
|
|
|
|
mov ecx,16384
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_lastkey: ; 18.12 = return 0 (backward compatibility)
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and dword [esp+32], 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_getversion: ; 18.13 = get kernel ID and version
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov edi,ebx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov esi,version_inf
|
|
|
|
|
mov ecx,version_end-version_inf
|
|
|
|
|
rep movsb
|
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
|
|
|
|
sysfn_waitretrace: ; 18.14 = sys wait retrace
|
2006-02-01 09:07:36 +03:00
|
|
|
|
;wait retrace functions
|
|
|
|
|
sys_wait_retrace:
|
|
|
|
|
mov edx,0x3da
|
|
|
|
|
WaitRetrace_loop:
|
|
|
|
|
in al,dx
|
|
|
|
|
test al,1000b
|
|
|
|
|
jz WaitRetrace_loop
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and [esp+32],dword 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sysfn_centermouse: ; 18.15 = mouse centered
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call mouse_centered
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and [esp+32],dword 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
2006-08-13 17:02:57 +04:00
|
|
|
|
sysfn_mouse_acceleration: ; 18.19 = set/get mouse features
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,0 ; get mouse speed factor
|
2006-08-13 17:02:57 +04:00
|
|
|
|
jnz .set_mouse_acceleration
|
2006-10-06 10:09:41 +04:00
|
|
|
|
xor eax,eax
|
2006-08-13 17:02:57 +04:00
|
|
|
|
mov ax,[mouse_speed_factor]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2006-08-13 17:02:57 +04:00
|
|
|
|
ret
|
|
|
|
|
.set_mouse_acceleration:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,1 ; set mouse speed factor
|
2006-08-13 17:02:57 +04:00
|
|
|
|
jnz .get_mouse_delay
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [mouse_speed_factor],dx
|
2006-08-13 17:02:57 +04:00
|
|
|
|
ret
|
|
|
|
|
.get_mouse_delay:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,2 ; get mouse delay
|
2006-08-13 17:02:57 +04:00
|
|
|
|
jnz .set_mouse_delay
|
|
|
|
|
mov eax,[mouse_delay]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2006-08-13 17:02:57 +04:00
|
|
|
|
ret
|
|
|
|
|
.set_mouse_delay:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,3 ; set mouse delay
|
2006-08-13 17:02:57 +04:00
|
|
|
|
jnz .set_pointer_position
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [mouse_delay],edx
|
2006-08-13 17:02:57 +04:00
|
|
|
|
ret
|
|
|
|
|
.set_pointer_position:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,4 ; set mouse pointer position
|
2007-09-06 01:30:16 +04:00
|
|
|
|
jnz .set_mouse_button
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [MOUSE_Y],dx ;y
|
|
|
|
|
ror edx,16
|
|
|
|
|
mov [MOUSE_X],dx ;x
|
|
|
|
|
rol edx,16
|
2007-09-06 01:30:16 +04:00
|
|
|
|
ret
|
|
|
|
|
.set_mouse_button:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,5 ; set mouse button features
|
2007-09-06 01:30:16 +04:00
|
|
|
|
jnz .end
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [BTN_DOWN],dl
|
2007-09-06 01:30:16 +04:00
|
|
|
|
mov [mouse_active],1
|
2006-08-13 17:02:57 +04:00
|
|
|
|
.end:
|
|
|
|
|
ret
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
sysfn_getfreemem:
|
2006-10-08 11:48:38 +04:00
|
|
|
|
mov eax, [pg_data.pages_free]
|
|
|
|
|
shl eax, 2
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2006-01-03 14:15:05 +03:00
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
|
|
|
|
|
sysfn_getallmem:
|
2006-10-08 11:48:38 +04:00
|
|
|
|
mov eax,[MEM_AMOUNT]
|
|
|
|
|
shr eax, 10
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2006-01-03 14:15:05 +03:00
|
|
|
|
ret
|
|
|
|
|
|
2007-08-23 02:34:57 +04:00
|
|
|
|
; // Alver, 2007-22-08 // {
|
|
|
|
|
sysfn_pid_to_slot:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, ecx
|
2007-08-23 02:34:57 +04:00
|
|
|
|
call pid_to_slot
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2007-08-23 02:34:57 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
sysfn_min_rest_window:
|
|
|
|
|
pushad
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, edx ; ebx - operating
|
|
|
|
|
shr ecx, 1
|
2007-08-23 02:34:57 +04:00
|
|
|
|
jnc @f
|
|
|
|
|
call pid_to_slot
|
|
|
|
|
@@:
|
|
|
|
|
or eax, eax ; eax - number of slot
|
|
|
|
|
jz .error
|
|
|
|
|
cmp eax, 255 ; varify maximal slot number
|
|
|
|
|
ja .error
|
2007-12-17 14:04:07 +03:00
|
|
|
|
movzx eax, word [WIN_STACK + eax*2]
|
|
|
|
|
shr ecx, 1
|
2007-08-23 02:34:57 +04:00
|
|
|
|
jc .restore
|
|
|
|
|
; .minimize:
|
|
|
|
|
call minimize_window
|
|
|
|
|
jmp .exit
|
|
|
|
|
.restore:
|
|
|
|
|
call restore_minimized_window
|
|
|
|
|
.exit:
|
|
|
|
|
popad
|
|
|
|
|
xor eax, eax
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2007-08-23 02:34:57 +04:00
|
|
|
|
ret
|
|
|
|
|
.error:
|
|
|
|
|
popad
|
|
|
|
|
xor eax, eax
|
|
|
|
|
dec eax
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2007-08-23 02:34:57 +04:00
|
|
|
|
ret
|
|
|
|
|
; } \\ Alver, 2007-22-08 \\
|
|
|
|
|
|
2006-02-01 09:07:36 +03:00
|
|
|
|
uglobal
|
|
|
|
|
;// mike.dld, 2006-29-01 [
|
|
|
|
|
screen_workarea RECT
|
|
|
|
|
;// mike.dld, 2006-29-01 ]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
window_minimize db 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sound_flag db 0
|
2006-02-01 09:07:36 +03:00
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-02-01 09:07:36 +03:00
|
|
|
|
iglobal
|
|
|
|
|
version_inf:
|
2007-09-24 00:58:50 +04:00
|
|
|
|
db 0,7,1,0 ; version 0.7.1.0
|
2006-02-01 09:07:36 +03:00
|
|
|
|
db UID_KOLIBRI
|
2007-06-11 19:42:19 +04:00
|
|
|
|
dd __REV__
|
2006-02-01 09:07:36 +03:00
|
|
|
|
version_end:
|
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-02-01 09:07:36 +03:00
|
|
|
|
UID_NONE=0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
UID_MENUETOS=1 ;official
|
|
|
|
|
UID_KOLIBRI=2 ;russian
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
sys_cachetodiskette:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
cmp ebx, 1
|
|
|
|
|
jne .no_floppy_a_save
|
|
|
|
|
mov [flp_number], 1
|
|
|
|
|
jmp .save_image_on_floppy
|
|
|
|
|
.no_floppy_a_save:
|
|
|
|
|
cmp ebx, 2
|
|
|
|
|
jne .no_floppy_b_save
|
|
|
|
|
mov [flp_number], 2
|
|
|
|
|
.save_image_on_floppy:
|
|
|
|
|
call save_image
|
|
|
|
|
mov [esp + 32], dword 0
|
|
|
|
|
cmp [FDC_Status], 0
|
|
|
|
|
je .yes_floppy_save
|
|
|
|
|
.no_floppy_b_save:
|
|
|
|
|
mov [esp + 32], dword 1
|
|
|
|
|
.yes_floppy_save:
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
uglobal
|
|
|
|
|
; bgrchanged dd 0x0
|
2007-06-18 20:39:42 +04:00
|
|
|
|
bgrlock db 0
|
|
|
|
|
bgrlockpid dd 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
sys_background:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx,1 ; BACKGROUND SIZE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosb1
|
|
|
|
|
cmp ecx,0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je sbgrr
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp edx,0
|
|
|
|
|
je sbgrr
|
2007-06-18 20:39:42 +04:00
|
|
|
|
@@:
|
|
|
|
|
mov al, 1
|
|
|
|
|
xchg [bgrlock], al
|
|
|
|
|
test al, al
|
|
|
|
|
jz @f
|
|
|
|
|
call change_task
|
|
|
|
|
jmp @b
|
|
|
|
|
@@:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [BgrDataWidth],ecx
|
|
|
|
|
mov [BgrDataHeight],edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; mov [bgrchanged],1
|
2007-04-24 12:56:03 +04:00
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
; return memory for old background
|
|
|
|
|
stdcall kernel_free, [img_background]
|
|
|
|
|
; calculate RAW size
|
|
|
|
|
xor eax,eax
|
|
|
|
|
inc eax
|
2007-05-30 17:48:21 +04:00
|
|
|
|
cmp [BgrDataWidth],eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
jae @f
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov [BgrDataWidth],eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
@@:
|
2007-05-30 17:48:21 +04:00
|
|
|
|
cmp [BgrDataHeight],eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
jae @f
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov [BgrDataHeight],eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
@@:
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov eax,[BgrDataWidth]
|
|
|
|
|
imul eax,[BgrDataHeight]
|
|
|
|
|
lea eax,[eax*3]
|
2007-04-24 12:56:03 +04:00
|
|
|
|
mov [mem_BACKGROUND],eax
|
|
|
|
|
; get memory for new background
|
2007-06-18 20:39:42 +04:00
|
|
|
|
stdcall kernel_alloc, eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
test eax, eax
|
|
|
|
|
jz .exit_mem
|
|
|
|
|
mov [img_background], eax
|
|
|
|
|
.exit_mem:
|
|
|
|
|
popad
|
2007-06-18 20:39:42 +04:00
|
|
|
|
mov [bgrlock], 0
|
2007-04-24 12:56:03 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sbgrr:
|
|
|
|
|
ret
|
2007-04-24 12:56:03 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
nosb1:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx,2 ; SET PIXEL
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosb2
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,[mem_BACKGROUND]
|
|
|
|
|
jae nosb2
|
2007-04-24 12:56:03 +04:00
|
|
|
|
mov eax,[img_background]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ebx,[eax+ecx]
|
|
|
|
|
and ebx,0xFF000000 ;255*256*256*256
|
|
|
|
|
and edx,0x00FFFFFF ;255*256*256+255*256+255
|
|
|
|
|
add edx,ebx
|
|
|
|
|
mov [eax+ecx],edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; mov [bgrchanged],1
|
|
|
|
|
ret
|
|
|
|
|
nosb2:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx,3 ; DRAW BACKGROUND
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosb3
|
|
|
|
|
draw_background_temp:
|
|
|
|
|
; cmp [bgrchanged],1 ;0
|
|
|
|
|
; je nosb31
|
|
|
|
|
;draw_background_temp:
|
|
|
|
|
; mov [bgrchanged],1 ;0
|
2006-05-06 18:34:30 +04:00
|
|
|
|
mov [background_defined], 1
|
2008-02-04 18:31:59 +03:00
|
|
|
|
call force_redraw_background
|
|
|
|
|
mov [REDRAW_BACKGROUND], byte 2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
nosb31:
|
|
|
|
|
ret
|
|
|
|
|
nosb3:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx,4 ; TILED / STRETCHED
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosb4
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,[BgrDrawMode]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je nosb41
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [BgrDrawMode],ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; mov [bgrchanged],1
|
|
|
|
|
nosb41:
|
|
|
|
|
ret
|
|
|
|
|
nosb4:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx,5 ; BLOCK MOVE TO BGR
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nosb5
|
|
|
|
|
; bughere
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, ecx
|
|
|
|
|
mov ebx, edx
|
2007-04-24 12:56:03 +04:00
|
|
|
|
add ebx, [img_background] ;IMG_BACKGROUND
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ecx, esi
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call memmove
|
|
|
|
|
.fin:
|
|
|
|
|
ret
|
|
|
|
|
nosb5:
|
2007-05-08 15:32:58 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx, 6
|
2007-06-18 20:39:42 +04:00
|
|
|
|
jnz nosb6
|
|
|
|
|
@@:
|
|
|
|
|
mov al, 1
|
|
|
|
|
xchg [bgrlock], al
|
|
|
|
|
test al, al
|
|
|
|
|
jz @f
|
|
|
|
|
call change_task
|
|
|
|
|
jmp @b
|
|
|
|
|
@@:
|
|
|
|
|
mov eax, [CURRENT_TASK]
|
|
|
|
|
mov [bgrlockpid], eax
|
|
|
|
|
stdcall user_alloc, [mem_BACKGROUND]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2007-06-18 20:39:42 +04:00
|
|
|
|
test eax, eax
|
|
|
|
|
jz .nomem
|
|
|
|
|
mov ebx, eax
|
|
|
|
|
shr ebx, 12
|
|
|
|
|
or dword [page_tabs+(ebx-1)*4], DONT_FREE_BLOCK
|
|
|
|
|
mov esi, [img_background]
|
|
|
|
|
shr esi, 12
|
|
|
|
|
mov ecx, [mem_BACKGROUND]
|
|
|
|
|
add ecx, 0xFFF
|
|
|
|
|
shr ecx, 12
|
|
|
|
|
.z:
|
|
|
|
|
mov eax, [page_tabs+ebx*4]
|
|
|
|
|
test al, 1
|
|
|
|
|
jz @f
|
|
|
|
|
call free_page
|
|
|
|
|
@@:
|
|
|
|
|
mov eax, [page_tabs+esi*4]
|
|
|
|
|
or al, PG_UW
|
|
|
|
|
mov [page_tabs+ebx*4], eax
|
|
|
|
|
mov eax, ebx
|
|
|
|
|
shl eax, 12
|
|
|
|
|
invlpg [eax]
|
|
|
|
|
inc ebx
|
|
|
|
|
inc esi
|
|
|
|
|
loop .z
|
|
|
|
|
ret
|
|
|
|
|
.nomem:
|
|
|
|
|
and [bgrlockpid], 0
|
|
|
|
|
mov [bgrlock], 0
|
|
|
|
|
nosb6:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ebx, 7
|
2007-06-18 20:39:42 +04:00
|
|
|
|
jnz nosb7
|
|
|
|
|
cmp [bgrlock], 0
|
|
|
|
|
jz .err
|
|
|
|
|
mov eax, [CURRENT_TASK]
|
|
|
|
|
cmp [bgrlockpid], eax
|
|
|
|
|
jnz .err
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, ecx
|
|
|
|
|
mov ebx, ecx
|
2007-06-18 20:39:42 +04:00
|
|
|
|
shr eax, 12
|
|
|
|
|
mov ecx, [page_tabs+(eax-1)*4]
|
|
|
|
|
test cl, USED_BLOCK+DONT_FREE_BLOCK
|
|
|
|
|
jz .err
|
|
|
|
|
jnp .err
|
|
|
|
|
push eax
|
|
|
|
|
shr ecx, 12
|
|
|
|
|
@@:
|
|
|
|
|
and dword [page_tabs+eax*4], 0
|
|
|
|
|
mov edx, eax
|
|
|
|
|
shl edx, 12
|
|
|
|
|
invlpg [edx]
|
|
|
|
|
inc eax
|
|
|
|
|
loop @b
|
|
|
|
|
pop eax
|
|
|
|
|
and dword [page_tabs+(eax-1)*4], not DONT_FREE_BLOCK
|
|
|
|
|
stdcall user_free, ebx
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32], eax
|
2007-06-18 20:39:42 +04:00
|
|
|
|
and [bgrlockpid], 0
|
|
|
|
|
mov [bgrlock], 0
|
|
|
|
|
ret
|
|
|
|
|
.err:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
and dword [esp+32], 0
|
2007-06-18 20:39:42 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
nosb7:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
force_redraw_background:
|
|
|
|
|
mov [draw_data+32 + RECT.left],dword 0
|
|
|
|
|
mov [draw_data+32 + RECT.top],dword 0
|
|
|
|
|
push eax ebx
|
|
|
|
|
mov eax,[ScreenWidth]
|
|
|
|
|
mov ebx,[ScreenHeight]
|
|
|
|
|
mov [draw_data+32 + RECT.right],eax
|
|
|
|
|
mov [draw_data+32 + RECT.bottom],ebx
|
|
|
|
|
pop ebx eax
|
|
|
|
|
mov byte [REDRAW_BACKGROUND], 1
|
|
|
|
|
ret
|
2007-05-08 15:32:58 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_getbackground:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,1 ; SIZE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nogb1
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov eax,[BgrDataWidth]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
shl eax,16
|
2007-06-04 12:58:32 +04:00
|
|
|
|
mov ax,[BgrDataHeight]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
nogb1:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,2 ; PIXEL
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nogb2
|
2007-04-24 12:56:03 +04:00
|
|
|
|
; mov edx,0x160000-16
|
|
|
|
|
; cmp edx,ebx
|
|
|
|
|
; jbe nogb2
|
|
|
|
|
; mov eax, [ebx+IMG_BACKGROUND]
|
|
|
|
|
mov eax,[img_background]
|
|
|
|
|
mov eax,[ebx+eax]
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
and eax, 0xFFFFFF
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
nogb2:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,4 ; TILED / STRETCHED
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jnz nogb4
|
2007-05-30 17:48:21 +04:00
|
|
|
|
mov eax,[BgrDrawMode]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
nogb4:
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_getkey:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [esp + 32],dword 1
|
|
|
|
|
; test main buffer
|
|
|
|
|
mov ebx, [CURRENT_TASK] ; TOP OF WINDOW STACK
|
|
|
|
|
movzx ecx, word [WIN_STACK + ebx * 2]
|
|
|
|
|
mov edx, [TASK_COUNT]
|
|
|
|
|
cmp ecx, edx
|
|
|
|
|
jne .finish
|
|
|
|
|
cmp [KEY_COUNT], byte 0
|
|
|
|
|
je .finish
|
|
|
|
|
movzx eax, byte [KEY_BUFF]
|
|
|
|
|
shl eax, 8
|
|
|
|
|
push eax
|
|
|
|
|
dec byte [KEY_COUNT]
|
|
|
|
|
and byte [KEY_COUNT], 127
|
|
|
|
|
movzx ecx, byte [KEY_COUNT]
|
|
|
|
|
add ecx, 2
|
|
|
|
|
mov eax, KEY_BUFF + 1
|
|
|
|
|
mov ebx, KEY_BUFF
|
|
|
|
|
call memmove
|
|
|
|
|
pop eax
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.ret_eax:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [esp + 32], eax
|
|
|
|
|
ret
|
|
|
|
|
.finish:
|
2006-06-30 16:23:15 +04:00
|
|
|
|
; test hotkeys buffer
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ecx, hotkey_buffer
|
2006-06-30 16:23:15 +04:00
|
|
|
|
@@:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
cmp [ecx], ebx
|
|
|
|
|
jz .found
|
|
|
|
|
add ecx, 8
|
|
|
|
|
cmp ecx, hotkey_buffer + 120 * 8
|
|
|
|
|
jb @b
|
|
|
|
|
ret
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.found:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ax, [ecx + 6]
|
|
|
|
|
shl eax, 16
|
|
|
|
|
mov ah, [ecx + 4]
|
|
|
|
|
mov al, 2
|
|
|
|
|
and dword [ecx + 4], 0
|
|
|
|
|
and dword [ecx], 0
|
|
|
|
|
jmp .ret_eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_getbutton:
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ebx, [CURRENT_TASK] ; TOP OF WINDOW STACK
|
|
|
|
|
mov [esp + 32], dword 1
|
|
|
|
|
movzx ecx, word [WIN_STACK + ebx * 2]
|
|
|
|
|
mov edx, [TASK_COUNT] ; less than 256 processes
|
|
|
|
|
cmp ecx, edx
|
|
|
|
|
jne .exit
|
|
|
|
|
movzx eax, byte [BTN_COUNT]
|
|
|
|
|
test eax, eax
|
|
|
|
|
jz .exit
|
|
|
|
|
mov eax, [BTN_BUFF]
|
|
|
|
|
shl eax, 8
|
|
|
|
|
mov [BTN_COUNT], byte 0
|
|
|
|
|
mov [esp + 32], eax
|
|
|
|
|
.exit:
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_cpuusage:
|
|
|
|
|
|
|
|
|
|
; RETURN:
|
|
|
|
|
;
|
|
|
|
|
; +00 dword process cpu usage
|
|
|
|
|
; +04 word position in windowing stack
|
|
|
|
|
; +06 word windowing stack value at current position (cpu nro)
|
|
|
|
|
; +10 12 bytes name
|
|
|
|
|
; +22 dword start in mem
|
|
|
|
|
; +26 dword used mem
|
|
|
|
|
; +30 dword PID , process idenfification number
|
|
|
|
|
;
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp ecx,-1 ; who am I ?
|
|
|
|
|
jne .no_who_am_i
|
|
|
|
|
mov ecx,[CURRENT_TASK]
|
|
|
|
|
.no_who_am_i:
|
|
|
|
|
cmp ecx, max_processes
|
|
|
|
|
ja .nofillbuf
|
|
|
|
|
|
|
|
|
|
; +4: word: position of the window of thread in the window stack
|
|
|
|
|
mov ax, [WIN_STACK + ecx * 2]
|
|
|
|
|
mov [ebx+4], ax
|
|
|
|
|
; +6: word: number of the thread slot, which window has in the window stack
|
|
|
|
|
; position ecx (has no relation to the specific thread)
|
|
|
|
|
mov ax, [WIN_POS + ecx * 2]
|
|
|
|
|
mov [ebx+6], ax
|
|
|
|
|
|
|
|
|
|
shl ecx, 5
|
|
|
|
|
|
|
|
|
|
; +0: dword: memory usage
|
|
|
|
|
mov eax, [ecx+CURRENT_TASK+TASKDATA.cpu_usage]
|
|
|
|
|
mov [ebx], eax
|
|
|
|
|
; +10: 11 bytes: name of the process
|
|
|
|
|
push ecx
|
|
|
|
|
lea eax, [ecx*8+SLOT_BASE+APPDATA.app_name]
|
|
|
|
|
add ebx, 10
|
|
|
|
|
mov ecx, 11
|
|
|
|
|
call memmove
|
|
|
|
|
pop ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
; +22: address of the process in memory
|
|
|
|
|
; +26: size of used memory - 1
|
|
|
|
|
push edi
|
|
|
|
|
lea edi, [ebx+12]
|
|
|
|
|
xor eax, eax
|
|
|
|
|
mov edx, 0x100000*16
|
|
|
|
|
cmp ecx, 1 shl 5
|
|
|
|
|
je .os_mem
|
|
|
|
|
mov edx, [SLOT_BASE+ecx*8+APPDATA.mem_size]
|
|
|
|
|
mov eax, std_application_base_address
|
|
|
|
|
.os_mem:
|
|
|
|
|
stosd
|
|
|
|
|
lea eax, [edx-1]
|
|
|
|
|
stosd
|
|
|
|
|
|
|
|
|
|
; +30: PID/TID
|
|
|
|
|
mov eax, [ecx+CURRENT_TASK+TASKDATA.pid]
|
|
|
|
|
stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
; window position and size
|
|
|
|
|
push esi
|
|
|
|
|
lea esi, [ecx + window_data + WDATA.box]
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; Process state (+50)
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, dword [ecx+CURRENT_TASK+TASKDATA.state]
|
|
|
|
|
stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-08-27 21:42:37 +04:00
|
|
|
|
; Window client area box
|
2007-12-17 14:04:07 +03:00
|
|
|
|
lea esi, [ecx*8 + SLOT_BASE + APPDATA.wnd_clientbox]
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
|
|
|
|
; Window state
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov al, [ecx+window_data+WDATA.fl_wstate]
|
|
|
|
|
stosb
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
pop esi
|
|
|
|
|
pop edi
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
.nofillbuf:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; return number of processes
|
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax,[TASK_COUNT]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [esp+32],eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
sys_clock:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; Mikhail Lisovin xx Jan 2005
|
2007-03-23 06:11:34 +03:00
|
|
|
|
@@: mov al, 10
|
|
|
|
|
out 0x70, al
|
|
|
|
|
in al, 0x71
|
|
|
|
|
test al, al
|
|
|
|
|
jns @f
|
|
|
|
|
mov esi, 1
|
|
|
|
|
call delay_ms
|
|
|
|
|
jmp @b
|
2005-10-06 21:56:22 +04:00
|
|
|
|
@@:
|
|
|
|
|
; end Lisovin's fix
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor al,al ; seconds
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
movzx ecx,al
|
|
|
|
|
mov al,02 ; minutes
|
|
|
|
|
shl ecx,16
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
movzx edx,al
|
|
|
|
|
mov al,04 ; hours
|
|
|
|
|
shl edx,8
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
add ecx,edx
|
|
|
|
|
movzx edx,al
|
|
|
|
|
add ecx,edx
|
|
|
|
|
sti
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [esp + 32], ecx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_date:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli
|
|
|
|
|
@@: mov al, 10
|
|
|
|
|
out 0x70, al
|
|
|
|
|
in al, 0x71
|
|
|
|
|
test al, al
|
|
|
|
|
jns @f
|
|
|
|
|
mov esi, 1
|
|
|
|
|
call delay_ms
|
|
|
|
|
jmp @b
|
2006-05-05 16:40:02 +04:00
|
|
|
|
@@:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ch,0
|
|
|
|
|
mov al,7 ; date
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
mov cl,al
|
|
|
|
|
mov al,8 ; month
|
|
|
|
|
shl ecx,16
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
mov ch,al
|
|
|
|
|
mov al,9 ; year
|
|
|
|
|
out 0x70,al
|
|
|
|
|
in al,0x71
|
|
|
|
|
mov cl,al
|
|
|
|
|
sti
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [esp+32], ecx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; redraw status
|
|
|
|
|
|
|
|
|
|
sys_redrawstat:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
cmp ebx, 1
|
|
|
|
|
jne no_widgets_away
|
|
|
|
|
; buttons away
|
|
|
|
|
mov ecx,[CURRENT_TASK]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sys_newba2:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov edi,[BTN_ADDR]
|
|
|
|
|
cmp [edi], dword 0 ; empty button list ?
|
|
|
|
|
je end_of_buttons_away
|
|
|
|
|
movzx ebx, word [edi]
|
|
|
|
|
inc ebx
|
|
|
|
|
mov eax,edi
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sys_newba:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
dec ebx
|
|
|
|
|
jz end_of_buttons_away
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
add eax, 0x10
|
|
|
|
|
cmp cx, [eax]
|
|
|
|
|
jnz sys_newba
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
push eax ebx ecx
|
|
|
|
|
mov ecx,ebx
|
|
|
|
|
inc ecx
|
|
|
|
|
shl ecx, 4
|
|
|
|
|
mov ebx, eax
|
|
|
|
|
add eax, 0x10
|
|
|
|
|
call memmove
|
|
|
|
|
dec dword [edi]
|
|
|
|
|
pop ecx ebx eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
jmp sys_newba2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
end_of_buttons_away:
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
no_widgets_away:
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
cmp ebx, 2
|
|
|
|
|
jnz srl1
|
|
|
|
|
|
|
|
|
|
mov edx, [TASK_BASE] ; return whole screen draw area for this app
|
|
|
|
|
add edx, draw_data - CURRENT_TASK
|
|
|
|
|
mov [edx + RECT.left], 0
|
|
|
|
|
mov [edx + RECT.top], 0
|
|
|
|
|
mov eax, [ScreenWidth]
|
|
|
|
|
mov [edx + RECT.right], eax
|
|
|
|
|
mov eax, [ScreenHeight]
|
|
|
|
|
mov [edx + RECT.bottom], eax
|
|
|
|
|
|
|
|
|
|
mov edi, [TASK_BASE]
|
|
|
|
|
or [edi - twdw + WDATA.fl_wdrawn], 1 ; no new position & buttons from app
|
|
|
|
|
call sys_window_mouse
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
srl1:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sys_drawwindow:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax,edx
|
|
|
|
|
shr eax,16+8
|
|
|
|
|
and eax,15
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
; cmp eax,0 ; type I - original style
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nosyswI
|
2006-01-06 14:46:26 +03:00
|
|
|
|
inc [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call sys_set_window
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call drawwindow_I
|
2006-08-03 23:30:32 +04:00
|
|
|
|
;dec [mouse_pause]
|
|
|
|
|
;call [draw_pointer]
|
|
|
|
|
;ret
|
|
|
|
|
jmp draw_window_caption.2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
nosyswI:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp al,1 ; type II - only reserve area, no draw
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nosyswII
|
2006-01-06 14:46:26 +03:00
|
|
|
|
inc [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call sys_set_window
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call sys_window_mouse
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
nosyswII:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp al,2 ; type III - new style
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne nosyswIII
|
2006-01-06 14:46:26 +03:00
|
|
|
|
inc [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call sys_set_window
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [disable_mouse]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call drawwindow_III
|
2006-08-03 23:30:32 +04:00
|
|
|
|
;dec [mouse_pause]
|
|
|
|
|
;call [draw_pointer]
|
|
|
|
|
;ret
|
|
|
|
|
jmp draw_window_caption.2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
nosyswIII:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp al,3 ; type IV - skinned window
|
2007-06-22 04:17:28 +04:00
|
|
|
|
je draw_skin_window
|
2007-12-17 14:04:07 +03:00
|
|
|
|
cmp al,4 ; type V - skinned window not sized! {not_sized_skin_window}
|
2007-06-22 04:17:28 +04:00
|
|
|
|
jne nosyswV
|
|
|
|
|
draw_skin_window:
|
2007-07-07 11:25:17 +04:00
|
|
|
|
|
2007-07-07 15:42:26 +04:00
|
|
|
|
inc [mouse_pause]
|
|
|
|
|
call [disable_mouse]
|
|
|
|
|
call sys_set_window
|
|
|
|
|
call [disable_mouse]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, [TASK_COUNT]
|
|
|
|
|
movzx eax, word [WIN_POS + eax*2]
|
|
|
|
|
cmp eax, [CURRENT_TASK]
|
|
|
|
|
setz al
|
|
|
|
|
movzx eax, al
|
|
|
|
|
push eax
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call drawwindow_IV
|
2006-08-03 23:30:32 +04:00
|
|
|
|
;dec [mouse_pause]
|
|
|
|
|
;call [draw_pointer]
|
|
|
|
|
;ret
|
|
|
|
|
jmp draw_window_caption.2
|
2007-06-22 04:17:28 +04:00
|
|
|
|
nosyswV:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
2006-08-03 23:30:32 +04:00
|
|
|
|
draw_window_caption:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
inc [mouse_pause]
|
|
|
|
|
call [disable_mouse]
|
|
|
|
|
|
|
|
|
|
xor eax,eax
|
|
|
|
|
mov edx,[TASK_COUNT]
|
|
|
|
|
movzx edx,word[WIN_POS+edx*2]
|
|
|
|
|
cmp edx,[CURRENT_TASK]
|
|
|
|
|
jne @f
|
|
|
|
|
inc eax
|
|
|
|
|
@@: mov edx,[CURRENT_TASK]
|
|
|
|
|
shl edx,5
|
|
|
|
|
add edx,window_data
|
|
|
|
|
movzx ebx,[edx+WDATA.fl_wstyle]
|
|
|
|
|
and bl,0x0F
|
|
|
|
|
cmp bl,3
|
2007-06-22 04:17:28 +04:00
|
|
|
|
je .draw_caption_style_3 ;{for 3 and 4 style write caption}
|
|
|
|
|
cmp bl,4
|
|
|
|
|
je .draw_caption_style_3
|
2007-07-07 11:25:17 +04:00
|
|
|
|
|
2007-06-22 04:17:28 +04:00
|
|
|
|
jmp .not_style_3
|
|
|
|
|
.draw_caption_style_3:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
push edx
|
|
|
|
|
call drawwindow_IV_caption
|
|
|
|
|
add esp,4
|
|
|
|
|
jmp .2
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
.not_style_3:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp bl,2
|
|
|
|
|
jne .not_style_2
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call drawwindow_III_caption
|
|
|
|
|
jmp .2
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
.not_style_2:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp bl,0
|
|
|
|
|
jne .2
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call drawwindow_I_caption
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
;--------------------------------------------------------------
|
2007-03-23 06:11:34 +03:00
|
|
|
|
.2: ;jmp @f
|
|
|
|
|
mov edi,[CURRENT_TASK]
|
|
|
|
|
shl edi,5
|
|
|
|
|
test [edi+window_data+WDATA.fl_wstyle],WSTYLE_HASCAPTION
|
|
|
|
|
jz @f
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov edx,[edi*8+SLOT_BASE+APPDATA.wnd_caption]
|
|
|
|
|
or edx,edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz @f
|
|
|
|
|
|
|
|
|
|
movzx eax,[edi+window_data+WDATA.fl_wstyle]
|
|
|
|
|
and al,0x0F
|
|
|
|
|
cmp al,3
|
2007-06-22 04:17:28 +04:00
|
|
|
|
je .skinned
|
|
|
|
|
cmp al,4
|
|
|
|
|
je .skinned
|
2007-07-07 11:25:17 +04:00
|
|
|
|
|
2007-06-22 04:17:28 +04:00
|
|
|
|
jmp .not_skinned
|
2007-07-07 11:25:17 +04:00
|
|
|
|
.skinned:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ebp,[edi+window_data+WDATA.box.left-2]
|
|
|
|
|
mov bp,word[edi+window_data+WDATA.box.top]
|
|
|
|
|
movzx eax,word[edi+window_data+WDATA.box.width]
|
|
|
|
|
sub ax,[_skinmargins.left]
|
|
|
|
|
sub ax,[_skinmargins.right]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cwde
|
|
|
|
|
cdq
|
|
|
|
|
mov ebx,6
|
|
|
|
|
idiv ebx
|
2007-12-17 14:04:07 +03:00
|
|
|
|
pop edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
or eax,eax
|
|
|
|
|
js @f
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov esi,eax
|
|
|
|
|
mov ebx,dword[_skinmargins.left-2]
|
|
|
|
|
mov bx,word[_skinh]
|
|
|
|
|
sub bx,[_skinmargins.bottom]
|
|
|
|
|
sub bx,[_skinmargins.top]
|
|
|
|
|
sar bx,1
|
|
|
|
|
adc bx,0
|
|
|
|
|
add bx,[_skinmargins.top]
|
|
|
|
|
add bx,-3
|
|
|
|
|
add ebx,ebp
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jmp .dodraw
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
.not_skinned:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp al,1
|
|
|
|
|
je @f
|
|
|
|
|
|
|
|
|
|
mov ebp,[edi+window_data+WDATA.box.left-2]
|
|
|
|
|
mov bp,word[edi+window_data+WDATA.box.top]
|
|
|
|
|
movzx eax,word[edi+window_data+WDATA.box.width]
|
|
|
|
|
sub eax,16
|
2007-12-17 14:04:07 +03:00
|
|
|
|
push edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cwde
|
|
|
|
|
cdq
|
|
|
|
|
mov ebx,6
|
|
|
|
|
idiv ebx
|
2007-12-17 14:04:07 +03:00
|
|
|
|
pop edx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
or eax,eax
|
|
|
|
|
js @f
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov esi,eax
|
|
|
|
|
mov ebx,0x00080007
|
|
|
|
|
add ebx,ebp
|
2006-08-28 17:34:54 +04:00
|
|
|
|
.dodraw:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov ecx,[common_colours+16];0x00FFFFFF
|
|
|
|
|
or ecx, 0x80000000
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor edi,edi
|
|
|
|
|
call dtext
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
@@:
|
|
|
|
|
;--------------------------------------------------------------
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec [mouse_pause]
|
|
|
|
|
call [draw_pointer]
|
|
|
|
|
ret
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
iglobal
|
|
|
|
|
align 4
|
|
|
|
|
window_topleft dd \
|
2007-06-22 04:17:28 +04:00
|
|
|
|
1, 21,\ ;type 0
|
|
|
|
|
0, 0,\ ;type 1
|
|
|
|
|
5, 20,\ ;type 2
|
|
|
|
|
5, ?,\ ;type 3 {set by skin}
|
|
|
|
|
5, ? ;type 4 {set by skin}
|
2006-08-03 23:30:32 +04:00
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
set_window_clientbox:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push eax ecx edi
|
|
|
|
|
|
|
|
|
|
mov eax,[_skinh]
|
|
|
|
|
mov [window_topleft+4*7],eax
|
2007-06-22 04:17:28 +04:00
|
|
|
|
mov [window_topleft+4*9],eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
|
|
|
|
|
mov ecx,edi
|
|
|
|
|
sub edi,window_data
|
|
|
|
|
shl edi,3
|
|
|
|
|
test [ecx+WDATA.fl_wstyle],WSTYLE_CLIENTRELATIVE
|
|
|
|
|
jz @f
|
|
|
|
|
|
|
|
|
|
movzx eax,[ecx+WDATA.fl_wstyle]
|
|
|
|
|
and eax,0x0F
|
|
|
|
|
mov eax,[eax*8+window_topleft+0]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.left],eax
|
|
|
|
|
shl eax,1
|
|
|
|
|
neg eax
|
|
|
|
|
add eax,[ecx+WDATA.box.width]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.width],eax
|
|
|
|
|
|
|
|
|
|
movzx eax,[ecx+WDATA.fl_wstyle]
|
|
|
|
|
and eax,0x0F
|
|
|
|
|
push [eax*8+window_topleft+0]
|
|
|
|
|
mov eax,[eax*8+window_topleft+4]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.top],eax
|
|
|
|
|
neg eax
|
|
|
|
|
sub eax,[esp]
|
|
|
|
|
add eax,[ecx+WDATA.box.height]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.height],eax
|
|
|
|
|
add esp,4
|
|
|
|
|
|
|
|
|
|
pop edi ecx eax
|
|
|
|
|
ret
|
2006-08-03 23:30:32 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor eax,eax
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.left],eax
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.top],eax
|
|
|
|
|
mov eax,[ecx+WDATA.box.width]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.width],eax
|
|
|
|
|
mov eax,[ecx+WDATA.box.height]
|
|
|
|
|
mov [edi+SLOT_BASE+APPDATA.wnd_clientbox.height],eax
|
|
|
|
|
|
|
|
|
|
pop edi ecx eax
|
|
|
|
|
ret
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sys_set_window:
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax,[CURRENT_TASK]
|
|
|
|
|
shl eax,5
|
|
|
|
|
add eax,window_data
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; colors
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [eax+WDATA.cl_workarea],edx
|
|
|
|
|
mov [eax+WDATA.cl_titlebar],esi
|
|
|
|
|
mov [eax+WDATA.cl_frames],edi
|
|
|
|
|
|
|
|
|
|
mov edi, eax
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; check flag (?)
|
2006-10-18 15:29:50 +04:00
|
|
|
|
test [edi+WDATA.fl_wdrawn],1
|
|
|
|
|
jnz newd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
mov eax,[timer_ticks] ;[0xfdf0]
|
|
|
|
|
add eax,100
|
|
|
|
|
mov [new_window_starting],eax
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov word[edi+WDATA.box.width],bx
|
|
|
|
|
mov word[edi+WDATA.box.height],cx
|
2006-08-03 23:30:32 +04:00
|
|
|
|
sar ebx,16
|
2007-12-17 14:04:07 +03:00
|
|
|
|
sar ecx,16
|
|
|
|
|
mov word[edi+WDATA.box.left],bx
|
|
|
|
|
mov word[edi+WDATA.box.top],cx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
call check_window_position
|
|
|
|
|
|
2006-10-06 10:09:41 +04:00
|
|
|
|
call set_window_clientbox
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ecx esi edi ; save for window fullscreen/resize
|
2006-08-03 23:30:32 +04:00
|
|
|
|
;mov esi,edi
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov cl, [edi+WDATA.fl_wstyle]
|
|
|
|
|
mov eax, [edi+WDATA.cl_frames]
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sub edi,window_data
|
2006-08-03 23:30:32 +04:00
|
|
|
|
shl edi,3
|
2007-02-28 13:51:05 +03:00
|
|
|
|
add edi,SLOT_BASE
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
and cl,0x0F
|
|
|
|
|
mov [edi+APPDATA.wnd_caption],0
|
|
|
|
|
cmp cl,3
|
2007-06-22 04:17:28 +04:00
|
|
|
|
je set_APPDATA_wnd_caption
|
|
|
|
|
cmp cl,4 ; {SPraid.simba}
|
|
|
|
|
je set_APPDATA_wnd_caption
|
2007-07-07 11:25:17 +04:00
|
|
|
|
|
|
|
|
|
jmp @f
|
2007-06-22 04:17:28 +04:00
|
|
|
|
set_APPDATA_wnd_caption:
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov [edi+APPDATA.wnd_caption],eax
|
2007-03-23 06:11:34 +03:00
|
|
|
|
@@: mov esi,[esp+0]
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add edi, APPDATA.saved_box
|
2007-03-23 06:11:34 +03:00
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
|
|
|
|
movsd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
pop edi esi ecx
|
|
|
|
|
|
2007-07-07 15:42:26 +04:00
|
|
|
|
mov esi, [CURRENT_TASK]
|
|
|
|
|
movzx esi, word [WIN_STACK+esi*2]
|
|
|
|
|
lea esi, [WIN_POS+esi*2]
|
|
|
|
|
call waredraw
|
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
;;; mov ebx, 1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;; call delay_hs
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov eax, [edi+WDATA.box.left]
|
|
|
|
|
mov ebx, [edi+WDATA.box.top]
|
|
|
|
|
mov ecx, [edi+WDATA.box.width]
|
|
|
|
|
mov edx, [edi+WDATA.box.height]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add ecx, eax
|
|
|
|
|
add edx, ebx
|
|
|
|
|
call calculatescreen
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [KEY_COUNT],byte 0 ; empty keyboard buffer
|
|
|
|
|
mov [BTN_COUNT],byte 0 ; empty button buffer
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
newd:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [edi+WDATA.fl_redraw],byte 0 ; no redraw
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edx,edi
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
2006-08-03 23:30:32 +04:00
|
|
|
|
syscall_windowsettings:
|
|
|
|
|
|
|
|
|
|
.set_window_caption:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax ; subfunction #1 - set window caption
|
|
|
|
|
jnz .get_window_caption
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; NOTE: only window owner thread can set its caption,
|
|
|
|
|
; so there's no parameter for PID/TID
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi,[CURRENT_TASK]
|
|
|
|
|
shl edi,5
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; have to check if caption is within application memory limit
|
|
|
|
|
; check is trivial, and if application resizes its memory,
|
|
|
|
|
; caption still can become over bounds
|
2006-10-31 19:11:04 +03:00
|
|
|
|
; diamond, 31.10.2006: check removed because with new memory manager
|
|
|
|
|
; there can be valid data after APPDATA.mem_size bound
|
2007-02-28 13:51:05 +03:00
|
|
|
|
; mov ecx,[edi*8+SLOT_BASE+APPDATA.mem_size]
|
2006-10-31 19:11:04 +03:00
|
|
|
|
; add ecx,255 ; max caption length
|
|
|
|
|
; cmp ebx,ecx
|
|
|
|
|
; ja .exit_fail
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [edi*8+SLOT_BASE+APPDATA.wnd_caption],ebx
|
|
|
|
|
or [edi+window_data+WDATA.fl_wstyle],WSTYLE_HASCAPTION
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call draw_window_caption
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor eax,eax ; eax = 0 (success)
|
|
|
|
|
ret
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
.get_window_caption:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax ; subfunction #2 - get window caption
|
|
|
|
|
jnz .exit_fail
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; not implemented yet
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
|
|
|
|
.exit_fail:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor eax,eax
|
|
|
|
|
inc eax ; eax = 1 (fail)
|
|
|
|
|
ret
|
2006-08-03 23:30:32 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
sys_window_move:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi,[CURRENT_TASK]
|
|
|
|
|
shl edi,5
|
|
|
|
|
add edi,window_data
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
test [edi+WDATA.fl_wstate],WSTATE_MAXIMIZED
|
|
|
|
|
jnz .window_move_return
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push dword [edi + WDATA.box.left] ; save old coordinates
|
|
|
|
|
push dword [edi + WDATA.box.top]
|
|
|
|
|
push dword [edi + WDATA.box.width]
|
|
|
|
|
push dword [edi + WDATA.box.height]
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,-1 ; set new position and size
|
|
|
|
|
je .no_x_reposition
|
|
|
|
|
mov [edi + WDATA.box.left], eax
|
2006-02-18 13:41:47 +03:00
|
|
|
|
.no_x_reposition:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ebx,-1
|
|
|
|
|
je .no_y_reposition
|
|
|
|
|
mov [edi + WDATA.box.top], ebx
|
2006-02-18 13:41:47 +03:00
|
|
|
|
.no_y_reposition:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
test [edi+WDATA.fl_wstate],WSTATE_ROLLEDUP
|
|
|
|
|
jnz .no_y_resizing
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ecx,-1
|
|
|
|
|
je .no_x_resizing
|
|
|
|
|
mov [edi + WDATA.box.width], ecx
|
2006-02-18 13:41:47 +03:00
|
|
|
|
.no_x_resizing:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp edx,-1
|
|
|
|
|
je .no_y_resizing
|
|
|
|
|
mov [edi + WDATA.box.height], edx
|
2006-02-18 13:41:47 +03:00
|
|
|
|
.no_y_resizing:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call check_window_position
|
|
|
|
|
call set_window_clientbox
|
|
|
|
|
|
|
|
|
|
pushad ; save for window fullscreen/resize
|
|
|
|
|
mov esi,edi
|
|
|
|
|
sub edi,window_data
|
|
|
|
|
shr edi,5
|
|
|
|
|
shl edi,8
|
|
|
|
|
add edi, SLOT_BASE + APPDATA.saved_box
|
|
|
|
|
mov ecx,4
|
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
pushad ; calculcate screen at new position
|
|
|
|
|
mov eax, [edi + WDATA.box.left]
|
|
|
|
|
mov ebx, [edi + WDATA.box.top]
|
|
|
|
|
mov ecx, [edi + WDATA.box.width]
|
|
|
|
|
mov edx, [edi + WDATA.box.height]
|
|
|
|
|
add ecx,eax
|
|
|
|
|
add edx,ebx
|
|
|
|
|
|
|
|
|
|
call calculatescreen
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
pop edx ; calculcate screen at old position
|
|
|
|
|
pop ecx
|
|
|
|
|
pop ebx
|
|
|
|
|
pop eax
|
|
|
|
|
add ecx,eax
|
|
|
|
|
add edx,ebx
|
|
|
|
|
mov [dlx],eax ; save for drawlimits
|
|
|
|
|
mov [dly],ebx
|
|
|
|
|
mov [dlxe],ecx
|
|
|
|
|
mov [dlye],edx
|
|
|
|
|
call calculatescreen
|
|
|
|
|
|
|
|
|
|
mov [edi + WDATA.fl_redraw], 1 ; flag the process as redraw
|
|
|
|
|
|
|
|
|
|
mov eax,edi ; redraw screen at old position
|
|
|
|
|
xor esi,esi
|
|
|
|
|
call redrawscreen
|
|
|
|
|
|
|
|
|
|
mov [DONT_DRAW_MOUSE],byte 0 ; mouse pointer
|
|
|
|
|
mov [MOUSE_BACKGROUND],byte 0 ; no mouse under
|
|
|
|
|
mov [MOUSE_DOWN],byte 0 ; react to mouse up/down
|
|
|
|
|
|
|
|
|
|
call [draw_pointer]
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [window_move_pr],0
|
2006-02-18 13:41:47 +03:00
|
|
|
|
|
|
|
|
|
.window_move_return:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
uglobal
|
|
|
|
|
window_move_pr dd 0x0
|
|
|
|
|
window_move_eax dd 0x0
|
|
|
|
|
window_move_ebx dd 0x0
|
|
|
|
|
window_move_ecx dd 0x0
|
|
|
|
|
window_move_edx dd 0x0
|
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
;ok - 100% work
|
|
|
|
|
;nt - not tested
|
|
|
|
|
;---------------------------------------------------------------------------------------------
|
|
|
|
|
;eax
|
|
|
|
|
;0 - task switch counter. Ret switch counter in eax. Block. ok.
|
|
|
|
|
;1 - change task. Ret nothing. Block. ok.
|
|
|
|
|
;2 - performance control
|
|
|
|
|
; ebx
|
|
|
|
|
; 0 - enable or disable (inversion) PCE flag on CR4 for rdmpc in user mode.
|
|
|
|
|
; returned new cr4 in eax. Ret cr4 in eax. Block. ok.
|
|
|
|
|
; 1 - is cache enabled. Ret cr0 in eax if enabled else zero in eax. Block. ok.
|
|
|
|
|
; 2 - enable cache. Ret 1 in eax. Ret nothing. Block. ok.
|
|
|
|
|
; 3 - disable cache. Ret 0 in eax. Ret nothing. Block. ok.
|
|
|
|
|
;eax
|
|
|
|
|
;3 - rdmsr. Counter in edx. (edx:eax) [esi:edi, edx] => [edx:esi, ecx]. Ret in ebx:eax. Block. ok.
|
|
|
|
|
;4 - wrmsr. Counter in edx. (edx:eax) [esi:edi, edx] => [edx:esi, ecx]. Ret in ebx:eax. Block. ok.
|
|
|
|
|
;---------------------------------------------------------------------------------------------
|
|
|
|
|
sys_sheduler: ;noname & halyavin
|
|
|
|
|
cmp eax,0
|
|
|
|
|
je shed_counter
|
|
|
|
|
cmp eax,2
|
|
|
|
|
je perf_control
|
|
|
|
|
cmp eax,3
|
|
|
|
|
je rdmsr_instr
|
|
|
|
|
cmp eax,4
|
|
|
|
|
je wrmsr_instr
|
|
|
|
|
cmp eax,1
|
|
|
|
|
jne not_supported
|
|
|
|
|
call change_task ;delay,0
|
|
|
|
|
ret
|
|
|
|
|
shed_counter:
|
|
|
|
|
mov eax,[context_counter]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
not_supported:
|
|
|
|
|
ret
|
|
|
|
|
perf_control:
|
|
|
|
|
inc eax ;now eax=3
|
|
|
|
|
cmp ebx,eax
|
|
|
|
|
je cache_disable
|
|
|
|
|
dec eax
|
|
|
|
|
cmp ebx,eax
|
|
|
|
|
je cache_enable
|
|
|
|
|
dec eax
|
|
|
|
|
cmp ebx,eax
|
|
|
|
|
je is_cache_enabled
|
|
|
|
|
dec eax
|
|
|
|
|
cmp ebx,eax
|
|
|
|
|
je modify_pce
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
rdmsr_instr:
|
|
|
|
|
;now counter in ecx
|
|
|
|
|
;(edx:eax) esi:edi => edx:esi
|
|
|
|
|
mov eax,esi
|
|
|
|
|
rdmsr
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
mov [esp+24],edx ;ret in ebx?
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
wrmsr_instr:
|
|
|
|
|
;now counter in ecx
|
|
|
|
|
;(edx:eax) esi:edi => edx:esi
|
2007-05-09 20:43:35 +04:00
|
|
|
|
; Fast Call MSR can't be destroy
|
|
|
|
|
; <20><> MSR_AMD_EFER <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20>.<2E>. <20> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD>
|
|
|
|
|
; <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>/<2F><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
|
|
|
|
cmp ecx, MSR_SYSENTER_CS
|
|
|
|
|
je @f
|
|
|
|
|
cmp ecx, MSR_SYSENTER_ESP
|
|
|
|
|
je @f
|
|
|
|
|
cmp ecx, MSR_SYSENTER_EIP
|
|
|
|
|
je @f
|
|
|
|
|
cmp ecx, MSR_AMD_STAR
|
|
|
|
|
je @f
|
|
|
|
|
|
|
|
|
|
mov eax, esi
|
|
|
|
|
wrmsr
|
|
|
|
|
; mov [esp + 36], eax
|
|
|
|
|
; mov [esp + 24], edx ;ret in ebx?
|
|
|
|
|
@@:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
cache_disable:
|
|
|
|
|
mov eax,cr0
|
|
|
|
|
or eax,01100000000000000000000000000000b
|
|
|
|
|
mov cr0,eax
|
|
|
|
|
wbinvd ;set MESI
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
cache_enable:
|
|
|
|
|
mov eax,cr0
|
|
|
|
|
and eax,10011111111111111111111111111111b
|
|
|
|
|
mov cr0,eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
is_cache_enabled:
|
|
|
|
|
mov eax,cr0
|
|
|
|
|
mov ebx,eax
|
|
|
|
|
and eax,01100000000000000000000000000000b
|
|
|
|
|
jz cache_disabled
|
|
|
|
|
mov [esp+36],ebx
|
|
|
|
|
cache_disabled:
|
|
|
|
|
mov dword [esp+36],eax ;0
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
modify_pce:
|
|
|
|
|
mov eax,cr4
|
|
|
|
|
; mov ebx,0
|
|
|
|
|
; or bx,100000000b ;pce
|
|
|
|
|
; xor eax,ebx ;invert pce
|
2005-10-29 23:25:03 +04:00
|
|
|
|
bts eax,8 ;pce=cr4[8]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov cr4,eax
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
;---------------------------------------------------------------------------------------------
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; check if pixel is allowed to be drawn
|
|
|
|
|
|
|
|
|
|
checkpixel:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push eax edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edx,[ScreenWidth] ; screen x size
|
|
|
|
|
inc edx
|
|
|
|
|
imul edx, ebx
|
|
|
|
|
mov dl, [eax+edx+display_data] ; lea eax, [...]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor ecx, ecx
|
|
|
|
|
mov eax, [CURRENT_TASK]
|
|
|
|
|
cmp al, dl
|
|
|
|
|
setne cl
|
2005-11-07 18:50:30 +03:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop edx eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
iglobal
|
2007-05-24 15:27:05 +04:00
|
|
|
|
cpustring db 'CPU',0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
endg
|
|
|
|
|
|
2006-04-12 17:15:06 +04:00
|
|
|
|
uglobal
|
2007-03-23 06:11:34 +03:00
|
|
|
|
background_defined db 0 ; diamond, 11.04.2006
|
2006-04-12 17:15:06 +04:00
|
|
|
|
endg
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
; check misc
|
|
|
|
|
|
|
|
|
|
checkmisc:
|
|
|
|
|
|
|
|
|
|
cmp [ctrl_alt_del], 1
|
|
|
|
|
jne nocpustart
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
2007-05-24 15:27:05 +04:00
|
|
|
|
mov ebp, cpustring
|
|
|
|
|
call fs_execute_from_sysdir
|
2007-05-16 23:12:34 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [ctrl_alt_del], 0
|
2007-04-18 10:37:14 +04:00
|
|
|
|
|
|
|
|
|
nocpustart:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp [mouse_active], 1
|
|
|
|
|
jne mouse_not_active
|
|
|
|
|
mov [mouse_active], 0
|
|
|
|
|
xor edi, edi
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ecx, [TASK_COUNT]
|
|
|
|
|
set_mouse_event:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add edi, 256
|
2007-04-18 10:37:14 +04:00
|
|
|
|
or [edi+SLOT_BASE+APPDATA.event_mask], dword 100000b
|
2005-10-06 21:56:22 +04:00
|
|
|
|
loop set_mouse_event
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mouse_not_active:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [REDRAW_BACKGROUND],byte 0 ; background update ?
|
|
|
|
|
jz nobackgr
|
2006-05-06 18:34:30 +04:00
|
|
|
|
cmp [background_defined], 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz nobackgr
|
2008-02-04 18:31:59 +03:00
|
|
|
|
cmp [REDRAW_BACKGROUND], byte 2
|
|
|
|
|
jnz no_set_bgr_event
|
2007-05-02 16:06:10 +04:00
|
|
|
|
xor edi, edi
|
|
|
|
|
mov ecx, [TASK_COUNT]
|
|
|
|
|
set_bgr_event:
|
|
|
|
|
add edi, 256
|
|
|
|
|
or [edi+SLOT_BASE+APPDATA.event_mask], 16
|
|
|
|
|
loop set_bgr_event
|
2008-02-04 18:31:59 +03:00
|
|
|
|
no_set_bgr_event:
|
|
|
|
|
; mov [draw_data+32 + RECT.left],dword 0
|
|
|
|
|
; mov [draw_data+32 + RECT.top],dword 0
|
|
|
|
|
; mov eax,[ScreenWidth]
|
|
|
|
|
; mov ebx,[ScreenHeight]
|
|
|
|
|
; mov [draw_data+32 + RECT.right],eax
|
|
|
|
|
; mov [draw_data+32 + RECT.bottom],ebx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call drawbackground
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov [REDRAW_BACKGROUND],byte 0
|
|
|
|
|
mov [MOUSE_BACKGROUND],byte 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
nobackgr:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; system shutdown request
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SYS_SHUTDOWN],byte 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je noshutdown
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
mov edx,[shutdown_processes]
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SYS_SHUTDOWN],dl
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_mark_system_shutdown
|
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
lea ecx,[edx-1]
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edx,OS_BASE+0x3040
|
2008-02-04 18:31:59 +03:00
|
|
|
|
jecxz @f
|
2007-04-18 10:37:14 +04:00
|
|
|
|
markz:
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov [edx+TASKDATA.state],byte 3
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add edx,0x20
|
|
|
|
|
loop markz
|
2008-02-04 18:31:59 +03:00
|
|
|
|
@@:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
no_mark_system_shutdown:
|
|
|
|
|
|
|
|
|
|
call [disable_mouse]
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
dec byte [SYS_SHUTDOWN]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je system_shutdown
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
noshutdown:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[TASK_COUNT] ; termination
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov ebx,TASK_DATA+TASKDATA.state
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov esi,1
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
newct:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov cl,[ebx]
|
|
|
|
|
cmp cl,byte 3
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz terminate
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp cl,byte 4
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz terminate
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
add ebx,0x20
|
|
|
|
|
inc esi
|
|
|
|
|
dec eax
|
|
|
|
|
jnz newct
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
; redraw screen
|
|
|
|
|
|
|
|
|
|
redrawscreen:
|
|
|
|
|
|
|
|
|
|
; eax , if process window_data base is eax, do not set flag/limits
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pushad
|
|
|
|
|
push eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
;;; mov ebx,2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;;; call delay_hs
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
;mov ecx,0 ; redraw flags for apps
|
|
|
|
|
xor ecx,ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
newdw2:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
inc ecx
|
|
|
|
|
push ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,ecx
|
|
|
|
|
shl eax,5
|
|
|
|
|
add eax,window_data
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,[esp+4]
|
|
|
|
|
je not_this_task
|
|
|
|
|
; check if window in redraw area
|
|
|
|
|
mov edi,eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ecx,1 ; limit for background
|
|
|
|
|
jz bgli
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, [edi + WDATA.box.left]
|
|
|
|
|
mov ebx, [edi + WDATA.box.top]
|
|
|
|
|
mov ecx, [edi + WDATA.box.width]
|
|
|
|
|
mov edx, [edi + WDATA.box.height]
|
|
|
|
|
add ecx,eax
|
|
|
|
|
add edx,ebx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,[dlye] ; ecx = area y end ebx = window y start
|
|
|
|
|
cmp ecx,ebx
|
|
|
|
|
jb ricino
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,[dlxe] ; ecx = area x end eax = window x start
|
|
|
|
|
cmp ecx,eax
|
|
|
|
|
jb ricino
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, [edi + WDATA.box.left]
|
|
|
|
|
mov ebx, [edi + WDATA.box.top]
|
|
|
|
|
mov ecx, [edi + WDATA.box.width]
|
|
|
|
|
mov edx, [edi + WDATA.box.height]
|
|
|
|
|
add ecx, eax
|
|
|
|
|
add edx, ebx
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[dly] ; eax = area y start edx = window y end
|
|
|
|
|
cmp edx,eax
|
|
|
|
|
jb ricino
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,[dlx] ; eax = area x start ecx = window x end
|
|
|
|
|
cmp ecx,eax
|
|
|
|
|
jb ricino
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
bgli:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
cmp ecx,1
|
|
|
|
|
jnz .az
|
|
|
|
|
mov al,[REDRAW_BACKGROUND]
|
|
|
|
|
cmp al,2
|
|
|
|
|
jz newdw8
|
|
|
|
|
test al,al
|
|
|
|
|
jz .az
|
|
|
|
|
lea eax,[edi+draw_data-window_data]
|
|
|
|
|
mov ebx,[dlx]
|
|
|
|
|
cmp ebx,[eax+RECT.left]
|
|
|
|
|
jae @f
|
|
|
|
|
mov [eax+RECT.left],ebx
|
|
|
|
|
@@:
|
|
|
|
|
mov ebx,[dly]
|
|
|
|
|
cmp ebx,[eax+RECT.top]
|
|
|
|
|
jae @f
|
|
|
|
|
mov [eax+RECT.top],ebx
|
|
|
|
|
@@:
|
|
|
|
|
mov ebx,[dlxe]
|
|
|
|
|
cmp ebx,[eax+RECT.right]
|
|
|
|
|
jbe @f
|
|
|
|
|
mov [eax+RECT.right],ebx
|
|
|
|
|
@@:
|
|
|
|
|
mov ebx,[dlye]
|
|
|
|
|
cmp ebx,[eax+RECT.bottom]
|
|
|
|
|
jbe @f
|
|
|
|
|
mov [eax+RECT.bottom],ebx
|
|
|
|
|
@@:
|
|
|
|
|
jmp newdw8
|
|
|
|
|
.az:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax,edi
|
|
|
|
|
add eax,draw_data-window_data
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ebx,[dlx] ; set limits
|
|
|
|
|
mov [eax + RECT.left], ebx
|
|
|
|
|
mov ebx,[dly]
|
|
|
|
|
mov [eax + RECT.top], ebx
|
|
|
|
|
mov ebx,[dlxe]
|
|
|
|
|
mov [eax + RECT.right], ebx
|
|
|
|
|
mov ebx,[dlye]
|
|
|
|
|
mov [eax + RECT.bottom], ebx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sub eax,draw_data-window_data
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
cmp dword [esp],1
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jne nobgrd
|
2008-02-04 18:31:59 +03:00
|
|
|
|
mov byte [REDRAW_BACKGROUND], 1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
newdw8:
|
|
|
|
|
nobgrd:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [eax + WDATA.fl_redraw],byte 1 ; mark as redraw
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
ricino:
|
|
|
|
|
|
|
|
|
|
not_this_task:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ecx,[TASK_COUNT]
|
|
|
|
|
jle newdw2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop eax
|
|
|
|
|
popad
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
calculatebackground: ; background
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; all black
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-24 12:56:03 +04:00
|
|
|
|
mov edi, [img_background] ;IMG_BACKGROUND ; set background to black
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor eax, eax
|
2007-04-24 12:56:03 +04:00
|
|
|
|
mov ecx, 1023 ;0x0fff00 / 4
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cld
|
|
|
|
|
rep stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi,display_data ; set os to use all pixels
|
|
|
|
|
mov eax,0x01010101
|
2007-04-28 16:45:22 +04:00
|
|
|
|
mov ecx,1280*1024 / 4
|
2007-03-23 06:11:34 +03:00
|
|
|
|
rep stosd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov byte [REDRAW_BACKGROUND], 0 ; do not draw background!
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
uglobal
|
2007-03-23 06:11:34 +03:00
|
|
|
|
imax dd 0x0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
delay_ms: ; delay in 1/1000 sec
|
|
|
|
|
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push eax
|
|
|
|
|
push ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,esi
|
|
|
|
|
; <CPU clock fix by Sergey Kuzmin aka Wildwest>
|
|
|
|
|
imul ecx, 33941
|
|
|
|
|
shr ecx, 9
|
|
|
|
|
; </CPU clock fix>
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x61
|
|
|
|
|
and al,0x10
|
|
|
|
|
mov ah,al
|
|
|
|
|
cld
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cnt1: in al,0x61
|
|
|
|
|
and al,0x10
|
|
|
|
|
cmp al,ah
|
|
|
|
|
jz cnt1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ah,al
|
|
|
|
|
loop cnt1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop ecx
|
|
|
|
|
pop eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
set_app_param:
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov edi, [TASK_BASE]
|
|
|
|
|
mov [edi + TASKDATA.event_mask], ebx
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
delay_hs: ; delay in 1/100 secs
|
2007-12-17 14:04:07 +03:00
|
|
|
|
; ebx = delay time
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ecx
|
|
|
|
|
push edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edx,[timer_ticks]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
newtic:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,[timer_ticks]
|
2007-12-17 14:04:07 +03:00
|
|
|
|
sub ecx,edx
|
|
|
|
|
cmp ecx,ebx
|
|
|
|
|
jae zerodelay
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call change_task
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jmp newtic
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
zerodelay:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop edx
|
|
|
|
|
pop ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
memmove: ; memory move in bytes
|
|
|
|
|
|
|
|
|
|
; eax = from
|
|
|
|
|
; ebx = to
|
|
|
|
|
; ecx = no of bytes
|
|
|
|
|
test ecx, ecx
|
|
|
|
|
jle .ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
push esi edi ecx
|
|
|
|
|
|
|
|
|
|
mov edi, ebx
|
|
|
|
|
mov esi, eax
|
|
|
|
|
|
|
|
|
|
test ecx, not 11b
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz @f
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
push ecx
|
|
|
|
|
shr ecx, 2
|
|
|
|
|
rep movsd
|
|
|
|
|
pop ecx
|
|
|
|
|
and ecx, 11b
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jz .finish
|
2005-10-06 21:56:22 +04:00
|
|
|
|
@@:
|
|
|
|
|
rep movsb
|
|
|
|
|
|
|
|
|
|
.finish:
|
|
|
|
|
pop ecx edi esi
|
|
|
|
|
.ret:
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
; <diamond> Sysfunction 34, read_floppy_file, is obsolete. Use 58 or 70 function instead.
|
|
|
|
|
;align 4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;
|
2006-05-05 16:40:02 +04:00
|
|
|
|
;read_floppy_file:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;
|
2006-05-05 16:40:02 +04:00
|
|
|
|
;; as input
|
|
|
|
|
;;
|
|
|
|
|
;; eax pointer to file
|
|
|
|
|
;; ebx file lenght
|
|
|
|
|
;; ecx start 512 byte block number
|
|
|
|
|
;; edx number of blocks to read
|
|
|
|
|
;; esi pointer to return/work area (atleast 20 000 bytes)
|
|
|
|
|
;;
|
|
|
|
|
;;
|
|
|
|
|
;; on return
|
|
|
|
|
;;
|
|
|
|
|
;; eax = 0 command succesful
|
|
|
|
|
;; 1 no fd base and/or partition defined
|
|
|
|
|
;; 2 yet unsupported FS
|
|
|
|
|
;; 3 unknown FS
|
|
|
|
|
;; 4 partition not defined at hd
|
|
|
|
|
;; 5 file not found
|
|
|
|
|
;; ebx = size of file
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;
|
2007-02-28 11:52:06 +03:00
|
|
|
|
; mov edi,[TASK_BASE]
|
2006-05-05 16:40:02 +04:00
|
|
|
|
; add edi,0x10
|
|
|
|
|
; add esi,[edi]
|
|
|
|
|
; add eax,[edi]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
;
|
2006-05-05 16:40:02 +04:00
|
|
|
|
; pushad
|
|
|
|
|
; mov edi,esi
|
|
|
|
|
; add edi,1024
|
|
|
|
|
; mov esi,0x100000+19*512
|
|
|
|
|
; sub ecx,1
|
|
|
|
|
; shl ecx,9
|
|
|
|
|
; add esi,ecx
|
|
|
|
|
; shl edx,9
|
|
|
|
|
; mov ecx,edx
|
|
|
|
|
; cld
|
|
|
|
|
; rep movsb
|
|
|
|
|
; popad
|
|
|
|
|
;
|
|
|
|
|
; mov [esp+36],eax
|
|
|
|
|
; mov [esp+24],ebx
|
|
|
|
|
; ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
sys_programirq:
|
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add eax,[edi+TASKDATA.mem_start]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
cmp ebx,16
|
|
|
|
|
jae .not_owner
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov edi,[edi+TASKDATA.pid]
|
2006-05-05 16:40:02 +04:00
|
|
|
|
cmp edi,[irq_owner+ebx*4]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je spril1
|
2006-05-05 16:40:02 +04:00
|
|
|
|
.not_owner:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [esp+36],dword 1
|
|
|
|
|
ret
|
|
|
|
|
spril1:
|
|
|
|
|
|
|
|
|
|
mov esi,eax
|
|
|
|
|
shl ebx,6
|
|
|
|
|
add ebx,irq00read
|
|
|
|
|
mov edi,ebx
|
|
|
|
|
mov ecx,16
|
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
|
|
|
|
mov [esp+36],dword 0
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
get_irq_data:
|
2006-05-05 16:40:02 +04:00
|
|
|
|
cmp eax,16
|
|
|
|
|
jae .not_owner
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edx,eax ; check for correct owner
|
2005-10-06 21:56:22 +04:00
|
|
|
|
shl edx,2
|
|
|
|
|
add edx,irq_owner
|
|
|
|
|
mov edx,[edx]
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov edi,[edi+TASKDATA.pid]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp edx,edi
|
|
|
|
|
je gidril1
|
2006-05-05 16:40:02 +04:00
|
|
|
|
.not_owner:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [esp+32],dword 2 ; ecx=2
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
gidril1:
|
|
|
|
|
|
|
|
|
|
mov ebx,eax
|
|
|
|
|
shl ebx,12
|
2007-03-01 23:32:19 +03:00
|
|
|
|
add ebx,IRQ_SAVE
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov eax,[ebx]
|
|
|
|
|
mov ecx,1
|
|
|
|
|
test eax,eax
|
|
|
|
|
jz gid1
|
|
|
|
|
|
|
|
|
|
dec eax
|
|
|
|
|
mov esi,ebx
|
|
|
|
|
mov [ebx],eax
|
|
|
|
|
movzx ebx,byte [ebx+0x10]
|
|
|
|
|
add esi,0x10
|
|
|
|
|
mov edi,esi
|
|
|
|
|
inc esi
|
|
|
|
|
mov ecx,4000 / 4
|
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
2006-05-05 16:40:02 +04:00
|
|
|
|
; xor ecx,ecx ; as result of 'rep' ecx=0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
gid1:
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
mov [esp+32],ecx
|
|
|
|
|
mov [esp+24],ebx
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
set_io_access_rights:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edi, tss._io_map_0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; mov ecx,eax
|
|
|
|
|
; and ecx,7 ; offset in byte
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; shr eax,3 ; number of byte
|
|
|
|
|
; add edi,eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; mov ebx,1
|
|
|
|
|
; shl ebx,cl
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ebp,0 ; enable access - ebp = 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne siar1
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
; not ebx
|
|
|
|
|
; and [edi],byte bl
|
|
|
|
|
btr [edi], eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
siar1:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
bts [edi], eax
|
|
|
|
|
; or [edi],byte bl ; disable access - ebp = 1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
r_f_port_area:
|
|
|
|
|
|
|
|
|
|
test eax, eax
|
|
|
|
|
jnz free_port_area
|
|
|
|
|
; je r_port_area
|
|
|
|
|
; jmp free_port_area
|
|
|
|
|
|
|
|
|
|
; r_port_area:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp ebx,ecx ; beginning > end ?
|
2006-05-05 16:40:02 +04:00
|
|
|
|
ja rpal1
|
|
|
|
|
cmp ecx,65536
|
|
|
|
|
jae rpal1
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov esi,[RESERVED_PORTS]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
test esi,esi ; no reserved areas ?
|
2005-10-06 21:56:22 +04:00
|
|
|
|
je rpal2
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp esi,255 ; max reserved
|
2006-05-05 16:40:02 +04:00
|
|
|
|
jae rpal1
|
2007-04-18 10:37:14 +04:00
|
|
|
|
rpal3:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edi,esi
|
|
|
|
|
shl edi,4
|
2007-03-01 23:32:19 +03:00
|
|
|
|
add edi,RESERVED_PORTS
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp ebx,[edi+8]
|
2006-05-05 16:40:02 +04:00
|
|
|
|
ja rpal4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp ecx,[edi+4]
|
|
|
|
|
jae rpal1
|
|
|
|
|
; jb rpal4
|
|
|
|
|
; jmp rpal1
|
2007-04-18 10:37:14 +04:00
|
|
|
|
rpal4:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
dec esi
|
|
|
|
|
jnz rpal3
|
|
|
|
|
jmp rpal2
|
|
|
|
|
rpal1:
|
|
|
|
|
popad
|
|
|
|
|
mov eax,1
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
rpal2:
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; enable port access at port IO map
|
|
|
|
|
cli
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pushad ; start enable io map
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
cmp ecx,65536 ;16384
|
|
|
|
|
jae no_unmask_io ; jge
|
|
|
|
|
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
|
|
|
|
|
new_port_access:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor ebp,ebp ; enable - eax = port
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call set_io_access_rights
|
|
|
|
|
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
inc eax
|
|
|
|
|
cmp eax,ecx
|
|
|
|
|
jbe new_port_access
|
|
|
|
|
|
|
|
|
|
no_unmask_io:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad ; end enable io map
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sti
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov edi,[RESERVED_PORTS]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add edi,1
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov [RESERVED_PORTS],edi
|
2005-10-06 21:56:22 +04:00
|
|
|
|
shl edi,4
|
2007-03-01 23:32:19 +03:00
|
|
|
|
add edi,RESERVED_PORTS
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov esi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov esi,[esi+TASKDATA.pid]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [edi],esi
|
|
|
|
|
mov [edi+4],ebx
|
|
|
|
|
mov [edi+8],ecx
|
|
|
|
|
|
|
|
|
|
xor eax, eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
free_port_area:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov esi,[RESERVED_PORTS] ; no reserved areas ?
|
2006-05-05 16:40:02 +04:00
|
|
|
|
test esi,esi
|
2005-10-06 21:56:22 +04:00
|
|
|
|
je frpal2
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edx,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov edx,[edx+TASKDATA.pid]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
frpal3:
|
|
|
|
|
mov edi,esi
|
|
|
|
|
shl edi,4
|
2007-03-01 23:32:19 +03:00
|
|
|
|
add edi,RESERVED_PORTS
|
2005-10-06 21:56:22 +04:00
|
|
|
|
cmp edx,[edi]
|
|
|
|
|
jne frpal4
|
|
|
|
|
cmp ebx,[edi+4]
|
|
|
|
|
jne frpal4
|
|
|
|
|
cmp ecx,[edi+8]
|
|
|
|
|
jne frpal4
|
|
|
|
|
jmp frpal1
|
|
|
|
|
frpal4:
|
|
|
|
|
dec esi
|
|
|
|
|
jnz frpal3
|
|
|
|
|
frpal2:
|
|
|
|
|
popad
|
|
|
|
|
mov eax,1
|
|
|
|
|
ret
|
|
|
|
|
frpal1:
|
|
|
|
|
mov ecx,256
|
|
|
|
|
sub ecx,esi
|
|
|
|
|
shl ecx,4
|
|
|
|
|
mov esi,edi
|
|
|
|
|
add esi,16
|
|
|
|
|
cld
|
|
|
|
|
rep movsb
|
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
dec dword [RESERVED_PORTS]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; disable port access at port IO map
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pushad ; start disable io map
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
cmp ecx,65536 ;16384
|
|
|
|
|
jge no_mask_io
|
|
|
|
|
|
|
|
|
|
mov eax,ebx
|
|
|
|
|
|
|
|
|
|
new_port_access_disable:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ebp,1 ; disable - eax = port
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call set_io_access_rights
|
|
|
|
|
|
|
|
|
|
popad
|
|
|
|
|
|
|
|
|
|
inc eax
|
|
|
|
|
cmp eax,ecx
|
|
|
|
|
jbe new_port_access_disable
|
|
|
|
|
|
|
|
|
|
no_mask_io:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
popad ; end disable io map
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
xor eax, eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
reserve_free_irq:
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
mov ecx, 1
|
|
|
|
|
cmp ebx, 16
|
|
|
|
|
jae fril1
|
|
|
|
|
test eax,eax
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jz reserve_irq
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
lea edi,[irq_owner+ebx*4]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov edx,[edi]
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov eax,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
cmp edx,[eax+TASKDATA.pid]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne fril1
|
2006-05-05 16:40:02 +04:00
|
|
|
|
dec ecx
|
|
|
|
|
mov [edi],ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
fril1:
|
|
|
|
|
mov [esp+36],ecx ; return in eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
reserve_irq:
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
lea edi,[irq_owner+ebx*4]
|
|
|
|
|
cmp dword [edi], 0
|
|
|
|
|
jnz ril1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edx,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
mov edx,[edx+TASKDATA.pid]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [edi],edx
|
2006-05-05 16:40:02 +04:00
|
|
|
|
dec ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ril1:
|
|
|
|
|
mov [esp+36],ecx ; return in eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
drawbackground:
|
2006-01-06 14:46:26 +03:00
|
|
|
|
inc [mouse_pause]
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x12
|
2006-08-10 22:18:33 +04:00
|
|
|
|
je dbrv20
|
2005-10-06 21:56:22 +04:00
|
|
|
|
dbrv12:
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0100000000000000b
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jge dbrv20
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x13
|
2005-10-06 21:56:22 +04:00
|
|
|
|
je dbrv20
|
|
|
|
|
call vesa12_drawbackground
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
dbrv20:
|
2007-05-30 17:48:21 +04:00
|
|
|
|
cmp [BgrDrawMode],dword 1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne bgrstr
|
|
|
|
|
call vesa20_drawbackground_tiled
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
bgrstr:
|
|
|
|
|
call vesa20_drawbackground_stretch
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2006-05-05 16:40:02 +04:00
|
|
|
|
align 4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_putimage: ; PutImage
|
2006-01-06 14:46:26 +03:00
|
|
|
|
sys_putimage:
|
2006-03-04 15:58:59 +03:00
|
|
|
|
test ecx,0x80008000
|
|
|
|
|
jnz .exit
|
|
|
|
|
test ecx,0x0000FFFF
|
|
|
|
|
jz .exit
|
|
|
|
|
test ecx,0xFFFF0000
|
|
|
|
|
jnz @f
|
|
|
|
|
.exit:
|
|
|
|
|
ret
|
|
|
|
|
@@:
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edi,[current_slot]
|
|
|
|
|
add dx,word[edi+APPDATA.wnd_clientbox.top]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
rol edx,16
|
2007-04-18 10:37:14 +04:00
|
|
|
|
add dx,word[edi+APPDATA.wnd_clientbox.left]
|
2007-03-23 06:11:34 +03:00
|
|
|
|
rol edx,16
|
2006-08-03 23:30:32 +04:00
|
|
|
|
.forced:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ebp esi 0
|
|
|
|
|
mov ebp, putimage_get24bpp
|
|
|
|
|
mov esi, putimage_init24bpp
|
2007-01-19 18:02:33 +03:00
|
|
|
|
sys_putimage_bpp:
|
|
|
|
|
; call [disable_mouse] ; this will be done in xxx_putimage
|
2006-08-10 22:18:33 +04:00
|
|
|
|
; mov eax, vga_putimage
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp [SCR_MODE], word 0x12
|
|
|
|
|
jz @f ;.doit
|
|
|
|
|
mov eax, vesa12_putimage
|
|
|
|
|
cmp [SCR_MODE], word 0100000000000000b
|
|
|
|
|
jae @f
|
|
|
|
|
cmp [SCR_MODE], word 0x13
|
|
|
|
|
jnz .doit
|
2006-05-05 16:40:02 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, vesa20_putimage
|
2006-05-05 16:40:02 +04:00
|
|
|
|
.doit:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
inc [mouse_pause]
|
|
|
|
|
call eax
|
|
|
|
|
dec [mouse_pause]
|
|
|
|
|
pop ebp esi ebp
|
|
|
|
|
jmp [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-01-19 18:02:33 +03:00
|
|
|
|
syscall_putimage_palette:
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov edi, esi
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov esi, edx
|
|
|
|
|
mov edx, ecx
|
|
|
|
|
mov ecx, ebx
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov ebx, eax
|
2007-01-19 18:02:33 +03:00
|
|
|
|
sys_putimage_palette:
|
|
|
|
|
; ebx = pointer to image
|
|
|
|
|
; ecx = [xsize]*65536 + [ysize]
|
|
|
|
|
; edx = [xstart]*65536 + [ystart]
|
2007-02-02 18:09:14 +03:00
|
|
|
|
; esi = number of bits per pixel, must be 8, 24 or 32
|
2007-01-19 18:02:33 +03:00
|
|
|
|
; edi = pointer to palette
|
2007-02-02 18:09:14 +03:00
|
|
|
|
; ebp = row delta
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, [CURRENT_TASK]
|
|
|
|
|
shl eax, 8
|
|
|
|
|
add dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.top]
|
|
|
|
|
rol edx, 16
|
|
|
|
|
add dx, word [eax+SLOT_BASE+APPDATA.wnd_clientbox.left]
|
|
|
|
|
rol edx, 16
|
2007-01-19 18:02:33 +03:00
|
|
|
|
.forced:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ebp esi ebp
|
|
|
|
|
cmp esi, 8
|
|
|
|
|
jnz @f
|
|
|
|
|
mov ebp, putimage_get8bpp
|
|
|
|
|
mov esi, putimage_init8bpp
|
|
|
|
|
jmp sys_putimage_bpp
|
2007-02-02 18:09:14 +03:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp esi, 24
|
|
|
|
|
jnz @f
|
|
|
|
|
mov ebp, putimage_get24bpp
|
|
|
|
|
mov esi, putimage_init24bpp
|
|
|
|
|
jmp sys_putimage_bpp
|
2007-02-02 18:09:14 +03:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp esi, 32
|
|
|
|
|
jnz @f
|
|
|
|
|
mov ebp, putimage_get32bpp
|
|
|
|
|
mov esi, putimage_init32bpp
|
|
|
|
|
jmp sys_putimage_bpp
|
2007-02-02 18:09:14 +03:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop ebp esi
|
|
|
|
|
ret
|
2007-01-19 18:02:33 +03:00
|
|
|
|
|
|
|
|
|
putimage_init24bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
lea eax, [eax*3]
|
2007-01-19 18:02:33 +03:00
|
|
|
|
putimage_init8bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2007-01-19 18:02:33 +03:00
|
|
|
|
|
|
|
|
|
putimage_get24bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, [esi]
|
|
|
|
|
add esi, 3
|
|
|
|
|
ret 4
|
2007-01-19 18:02:33 +03:00
|
|
|
|
putimage_get8bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
movzx eax, byte [esi]
|
|
|
|
|
push edx
|
|
|
|
|
mov edx, [esp+8]
|
|
|
|
|
mov eax, [edx+eax*4]
|
|
|
|
|
pop edx
|
|
|
|
|
inc esi
|
|
|
|
|
ret 4
|
2007-01-19 18:02:33 +03:00
|
|
|
|
|
2007-02-02 18:09:14 +03:00
|
|
|
|
putimage_init32bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
shl eax, 2
|
|
|
|
|
ret
|
2007-02-02 18:09:14 +03:00
|
|
|
|
putimage_get32bpp:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
lodsd
|
|
|
|
|
ret 4
|
2007-02-02 18:09:14 +03:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; eax x beginning
|
|
|
|
|
; ebx y beginning
|
|
|
|
|
; ecx x end
|
2007-01-19 18:02:33 +03:00
|
|
|
|
; edx y end
|
2005-10-06 21:56:22 +04:00
|
|
|
|
; edi color
|
|
|
|
|
|
|
|
|
|
__sys_drawbar:
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov esi,[current_slot]
|
|
|
|
|
add eax,[esi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
add ecx,[esi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
add ebx,[esi+APPDATA.wnd_clientbox.top]
|
|
|
|
|
add edx,[esi+APPDATA.wnd_clientbox.top]
|
2006-08-03 23:30:32 +04:00
|
|
|
|
.forced:
|
2006-01-06 14:46:26 +03:00
|
|
|
|
inc [mouse_pause]
|
2007-01-19 18:02:33 +03:00
|
|
|
|
; call [disable_mouse]
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x12
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je dbv20
|
2005-10-06 21:56:22 +04:00
|
|
|
|
sdbv20:
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0100000000000000b
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jge dbv20
|
2007-03-01 23:32:19 +03:00
|
|
|
|
cmp [SCR_MODE],word 0x13
|
2007-03-23 06:11:34 +03:00
|
|
|
|
je dbv20
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call vesa12_drawbar
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
dbv20:
|
|
|
|
|
call vesa20_drawbar
|
2006-01-06 14:46:26 +03:00
|
|
|
|
dec [mouse_pause]
|
2006-01-13 21:30:12 +03:00
|
|
|
|
call [draw_pointer]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
kb_read:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ecx edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kr_loop:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,1
|
|
|
|
|
jnz kr_ready
|
|
|
|
|
loop kr_loop
|
|
|
|
|
mov ah,1
|
|
|
|
|
jmp kr_exit
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kr_ready:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ecx
|
|
|
|
|
mov ecx,32
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kr_delay:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
loop kr_delay
|
|
|
|
|
pop ecx
|
|
|
|
|
in al,0x60
|
|
|
|
|
xor ah,ah
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kr_exit:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop edx ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
kb_write:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
push ecx edx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dl,al
|
2007-01-09 14:34:31 +03:00
|
|
|
|
; mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
|
|
|
|
; kw_loop1:
|
|
|
|
|
; in al,0x64
|
|
|
|
|
; test al,0x20
|
|
|
|
|
; jz kw_ok1
|
|
|
|
|
; loop kw_loop1
|
|
|
|
|
; mov ah,1
|
|
|
|
|
; jmp kw_exit
|
|
|
|
|
; kw_ok1:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x60
|
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_loop:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,2
|
|
|
|
|
jz kw_ok
|
|
|
|
|
loop kw_loop
|
|
|
|
|
mov ah,1
|
|
|
|
|
jmp kw_exit
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_ok:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,dl
|
|
|
|
|
out 0x60,al
|
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_loop3:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,2
|
|
|
|
|
jz kw_ok3
|
|
|
|
|
loop kw_loop3
|
|
|
|
|
mov ah,1
|
|
|
|
|
jmp kw_exit
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_ok3:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ah,8
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_loop4:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_loop5:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,1
|
|
|
|
|
jnz kw_ok4
|
|
|
|
|
loop kw_loop5
|
|
|
|
|
dec ah
|
|
|
|
|
jnz kw_loop4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_ok4:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor ah,ah
|
2005-10-06 21:56:22 +04:00
|
|
|
|
kw_exit:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
pop edx ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
kb_cmd:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_wait:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,2
|
|
|
|
|
jz c_send
|
|
|
|
|
loop c_wait
|
|
|
|
|
jmp c_error
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_send:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,bl
|
|
|
|
|
out 0x64,al
|
|
|
|
|
mov ecx,0x1ffff ; last 0xffff, new value in view of fast CPU's
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_accept:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
in al,0x64
|
|
|
|
|
test al,2
|
|
|
|
|
jz c_ok
|
|
|
|
|
loop c_accept
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_error:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ah,1
|
|
|
|
|
jmp c_exit
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_ok:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
xor ah,ah
|
2005-10-06 21:56:22 +04:00
|
|
|
|
c_exit:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
setmouse: ; set mousepicture -pointer
|
2007-03-23 06:11:34 +03:00
|
|
|
|
; ps2 mouse enable
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov [MOUSE_PICTURE],dword mousepointer
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
cli
|
2006-01-06 14:46:26 +03:00
|
|
|
|
; mov bl,0xa8 ; enable mouse cmd
|
|
|
|
|
; call kb_cmd
|
|
|
|
|
; call kb_read ; read status
|
|
|
|
|
; mov bl,0x20 ; get command byte
|
|
|
|
|
; call kb_cmd
|
|
|
|
|
; call kb_read
|
|
|
|
|
; or al,3 ; enable interrupt
|
|
|
|
|
; mov bl,0x60 ; write command
|
|
|
|
|
; push eax
|
|
|
|
|
; call kb_cmd
|
|
|
|
|
; pop eax
|
|
|
|
|
; call kb_write
|
|
|
|
|
; mov bl,0xd4 ; for mouse
|
|
|
|
|
; call kb_cmd
|
|
|
|
|
; mov al,0xf4 ; enable mouse device
|
|
|
|
|
; call kb_write
|
|
|
|
|
; call kb_read ; read status return
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; com1 mouse enable
|
|
|
|
|
|
|
|
|
|
mov bx,0x3f8 ; combase
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,3
|
|
|
|
|
mov al,0x80
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,1
|
|
|
|
|
mov al,0
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,0x30*2 ; 0x30 / 4
|
2005-10-06 21:56:22 +04:00
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,3
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,2 ; 3
|
2005-10-06 21:56:22 +04:00
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0xb
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,1
|
|
|
|
|
mov al,1
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
; com2 mouse enable
|
|
|
|
|
|
|
|
|
|
mov bx,0x2f8 ; combase
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,3
|
|
|
|
|
mov al,0x80
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,1
|
|
|
|
|
mov al,0
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,0
|
|
|
|
|
mov al,0x30*2
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,3
|
|
|
|
|
mov al,2
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,4
|
|
|
|
|
mov al,0xb
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
mov dx,bx
|
|
|
|
|
add dx,1
|
|
|
|
|
mov al,1
|
|
|
|
|
out dx,al
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
_rdtsc:
|
2006-10-06 10:09:41 +04:00
|
|
|
|
bt [cpu_caps], CAPS_TSC
|
|
|
|
|
jnc ret_rdtsc
|
2005-10-06 21:56:22 +04:00
|
|
|
|
rdtsc
|
|
|
|
|
ret
|
|
|
|
|
ret_rdtsc:
|
|
|
|
|
mov edx,0xffffffff
|
|
|
|
|
mov eax,0xffffffff
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
rerouteirqs:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cli
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov al,0x11 ; icw4, edge triggered
|
|
|
|
|
out 0x20,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
out 0xA0,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
mov al,0x20 ; generate 0x20 +
|
|
|
|
|
out 0x21,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
mov al,0x28 ; generate 0x28 +
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
mov al,0x04 ; slave at irq2
|
|
|
|
|
out 0x21,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
mov al,0x02 ; at irq9
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
mov al,0x01 ; 8086 mode
|
|
|
|
|
out 0x21,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
mov al,255 ; mask all irq's
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
out 0x21,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
mov ecx,0x1000
|
|
|
|
|
cld
|
|
|
|
|
picl1: call pic_delay
|
|
|
|
|
loop picl1
|
|
|
|
|
|
|
|
|
|
mov al,255 ; mask all irq's
|
|
|
|
|
out 0xA1,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
out 0x21,al
|
|
|
|
|
call pic_delay
|
|
|
|
|
|
|
|
|
|
cli
|
|
|
|
|
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
pic_delay:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
jmp pdl1
|
|
|
|
|
pdl1: ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sys_msg_board_str:
|
|
|
|
|
|
|
|
|
|
pushad
|
|
|
|
|
@@:
|
|
|
|
|
cmp [esi],byte 0
|
|
|
|
|
je @f
|
|
|
|
|
mov eax,1
|
|
|
|
|
movzx ebx,byte [esi]
|
|
|
|
|
call sys_msg_board
|
|
|
|
|
inc esi
|
|
|
|
|
jmp @b
|
|
|
|
|
@@:
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
sys_msg_board_byte:
|
|
|
|
|
; in: al = byte to display
|
|
|
|
|
; out: nothing
|
|
|
|
|
; destroys: nothing
|
|
|
|
|
pushad
|
|
|
|
|
mov ecx, 2
|
|
|
|
|
shl eax, 24
|
|
|
|
|
jmp @f
|
|
|
|
|
|
|
|
|
|
sys_msg_board_word:
|
|
|
|
|
; in: ax = word to display
|
|
|
|
|
; out: nothing
|
|
|
|
|
; destroys: nothing
|
|
|
|
|
pushad
|
|
|
|
|
mov ecx, 4
|
|
|
|
|
shl eax, 16
|
|
|
|
|
jmp @f
|
|
|
|
|
|
|
|
|
|
sys_msg_board_dword:
|
|
|
|
|
; in: eax = dword to display
|
|
|
|
|
; out: nothing
|
|
|
|
|
; destroys: nothing
|
|
|
|
|
pushad
|
|
|
|
|
mov ecx, 8
|
|
|
|
|
@@:
|
|
|
|
|
push ecx
|
|
|
|
|
rol eax, 4
|
|
|
|
|
push eax
|
|
|
|
|
and al, 0xF
|
|
|
|
|
cmp al, 10
|
|
|
|
|
sbb al, 69h
|
|
|
|
|
das
|
|
|
|
|
mov bl, al
|
|
|
|
|
xor eax, eax
|
|
|
|
|
inc eax
|
|
|
|
|
call sys_msg_board
|
|
|
|
|
pop eax
|
|
|
|
|
pop ecx
|
|
|
|
|
loop @b
|
|
|
|
|
popad
|
|
|
|
|
ret
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
uglobal
|
2007-02-25 01:43:17 +03:00
|
|
|
|
msg_board_data: times 4096 db 0
|
2005-10-06 21:56:22 +04:00
|
|
|
|
msg_board_count dd 0x0
|
|
|
|
|
endg
|
|
|
|
|
|
|
|
|
|
sys_msg_board:
|
|
|
|
|
|
|
|
|
|
; eax=1 : write : bl byte to write
|
|
|
|
|
; eax=2 : read : ebx=0 -> no data, ebx=1 -> data in al
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ecx, [msg_board_count]
|
|
|
|
|
cmp eax, 1
|
|
|
|
|
jne .smbl1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [msg_board_data+ecx],bl
|
|
|
|
|
inc ecx
|
|
|
|
|
and ecx, 4095
|
|
|
|
|
mov [msg_board_count], ecx
|
|
|
|
|
mov [check_idle_semaphore], 5
|
|
|
|
|
ret
|
|
|
|
|
.smbl1:
|
|
|
|
|
cmp eax, 2
|
|
|
|
|
jne .smbl2
|
|
|
|
|
test ecx, ecx
|
|
|
|
|
jz .smbl21
|
|
|
|
|
mov eax, msg_board_data+1
|
|
|
|
|
mov ebx, msg_board_data
|
|
|
|
|
movzx edx, byte [ebx]
|
|
|
|
|
call memmove
|
|
|
|
|
dec [msg_board_count]
|
|
|
|
|
mov [esp + 36], edx ;eax
|
|
|
|
|
mov [esp + 24], dword 1
|
|
|
|
|
ret
|
|
|
|
|
.smbl21:
|
|
|
|
|
mov [esp+36], ecx
|
|
|
|
|
mov [esp+24], ecx
|
|
|
|
|
.smbl2:
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sys_process_def:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov edi, [CURRENT_TASK]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax ; 1 = set keyboard mode
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_set_keyboard_setup
|
|
|
|
|
|
|
|
|
|
shl edi,8
|
2007-02-28 13:51:05 +03:00
|
|
|
|
mov [edi+SLOT_BASE + APPDATA.keyboard_mode],bl
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
no_set_keyboard_setup:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax ; 2 = get keyboard mode
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_get_keyboard_setup
|
|
|
|
|
|
|
|
|
|
shl edi,8
|
2007-02-28 13:51:05 +03:00
|
|
|
|
movzx eax, byte [SLOT_BASE+edi + APPDATA.keyboard_mode]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
no_get_keyboard_setup:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax ; 3 = get keyboard ctrl, alt, shift
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_get_keyboard_cas
|
|
|
|
|
|
|
|
|
|
; xor eax,eax
|
|
|
|
|
; movzx eax,byte [shift]
|
|
|
|
|
; movzx ebx,byte [ctrl]
|
|
|
|
|
; shl ebx,2
|
|
|
|
|
; add eax,ebx
|
|
|
|
|
; movzx ebx,byte [alt]
|
|
|
|
|
; shl ebx,3
|
|
|
|
|
; add eax,ebx
|
|
|
|
|
|
|
|
|
|
;// mike.dld [
|
|
|
|
|
mov eax, [kb_state]
|
|
|
|
|
;// mike.dld ]
|
|
|
|
|
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
no_get_keyboard_cas:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax
|
|
|
|
|
jnz no_add_keyboard_hotkey
|
2006-06-30 16:23:15 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, hotkey_list
|
2006-06-30 16:23:15 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp dword [eax+8], 0
|
|
|
|
|
jz .found_free
|
|
|
|
|
add eax, 16
|
|
|
|
|
cmp eax, hotkey_list+16*256
|
|
|
|
|
jb @b
|
|
|
|
|
mov dword [esp+36], 1
|
|
|
|
|
ret
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.found_free:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov [eax+8], edi
|
|
|
|
|
mov [eax+4], ecx
|
|
|
|
|
movzx ebx, bl
|
|
|
|
|
lea ebx, [hotkey_scancodes+ebx*4]
|
|
|
|
|
mov ecx, [ebx]
|
|
|
|
|
mov [eax], ecx
|
|
|
|
|
mov [ebx], eax
|
|
|
|
|
mov [eax+12], ebx
|
|
|
|
|
jecxz @f
|
|
|
|
|
mov [ecx+12], eax
|
2006-06-30 16:23:15 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
and dword [esp+36], 0
|
|
|
|
|
ret
|
2006-06-30 16:23:15 +04:00
|
|
|
|
|
|
|
|
|
no_add_keyboard_hotkey:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
dec eax
|
|
|
|
|
jnz no_del_keyboard_hotkey
|
2006-06-30 16:23:15 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
movzx ebx, bl
|
|
|
|
|
lea ebx, [hotkey_scancodes+ebx*4]
|
|
|
|
|
mov eax, [ebx]
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.scan:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
test eax, eax
|
|
|
|
|
jz .notfound
|
|
|
|
|
cmp [eax+8], edi
|
|
|
|
|
jnz .next
|
|
|
|
|
cmp [eax+4], ecx
|
|
|
|
|
jz .found
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.next:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov eax, [eax]
|
|
|
|
|
jmp .scan
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.notfound:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov dword [esp+36], 1
|
|
|
|
|
ret
|
2006-06-30 16:23:15 +04:00
|
|
|
|
.found:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx, [eax]
|
|
|
|
|
jecxz @f
|
|
|
|
|
mov edx, [eax+12]
|
|
|
|
|
mov [ecx+12], edx
|
2006-06-30 16:23:15 +04:00
|
|
|
|
@@:
|
2007-03-23 06:11:34 +03:00
|
|
|
|
mov ecx, [eax+12]
|
|
|
|
|
mov edx, [eax]
|
|
|
|
|
mov [ecx], edx
|
|
|
|
|
xor edx, edx
|
|
|
|
|
mov [eax+4], edx
|
|
|
|
|
mov [eax+8], edx
|
|
|
|
|
mov [eax+12], edx
|
|
|
|
|
mov [eax], edx
|
|
|
|
|
mov [esp+36], edx
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2006-06-30 16:23:15 +04:00
|
|
|
|
no_del_keyboard_hotkey:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
sys_gs: ; direct screen access
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,1 ; resolution
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_gs1
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov eax,[ScreenWidth]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
shl eax,16
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov ax,[ScreenHeight]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add eax,0x00010001
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
no_gs1:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,2 ; bits per pixel
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_gs2
|
2007-03-01 23:32:19 +03:00
|
|
|
|
movzx eax,byte [ScreenBPP]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
no_gs2:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
cmp eax,3 ; bytes per scanline
|
2005-10-06 21:56:22 +04:00
|
|
|
|
jne no_gs3
|
2007-03-01 23:32:19 +03:00
|
|
|
|
mov eax,[BytesPerScanLine]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
no_gs3:
|
|
|
|
|
|
|
|
|
|
mov [esp+36],dword -1
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4 ; PCI functions
|
|
|
|
|
|
|
|
|
|
sys_pci:
|
|
|
|
|
|
|
|
|
|
call pci_api
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4 ; system functions
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_setpixel: ; SetPixel
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, ebx
|
|
|
|
|
mov ebx, ecx
|
|
|
|
|
mov ecx, edx
|
|
|
|
|
mov edx, [TASK_BASE]
|
|
|
|
|
add eax, [edx-twdw+WDATA.box.left]
|
|
|
|
|
add ebx, [edx-twdw+WDATA.box.top]
|
|
|
|
|
mov edi, [current_slot]
|
|
|
|
|
add eax, [edi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
add ebx, [edi+APPDATA.wnd_clientbox.top]
|
|
|
|
|
xor edi, edi ; no force
|
|
|
|
|
; mov edi, 1
|
|
|
|
|
call [disable_mouse]
|
|
|
|
|
jmp [putpixel]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_writetext: ; WriteText
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax,[TASK_BASE]
|
|
|
|
|
mov ebp,[eax-twdw+WDATA.box.left]
|
2007-04-18 10:37:14 +04:00
|
|
|
|
push esi
|
|
|
|
|
mov esi,[current_slot]
|
|
|
|
|
add ebp,[esi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
shl ebp,16
|
2007-12-17 14:04:07 +03:00
|
|
|
|
add ebp,[eax-twdw+WDATA.box.top]
|
2007-04-18 10:37:14 +04:00
|
|
|
|
add bp,word[esi+APPDATA.wnd_clientbox.top]
|
|
|
|
|
pop esi
|
2007-12-17 14:04:07 +03:00
|
|
|
|
add ebx,ebp
|
|
|
|
|
mov eax,edi
|
2007-04-18 10:37:14 +04:00
|
|
|
|
xor edi,edi
|
|
|
|
|
jmp dtext
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_openramdiskfile: ; OpenRamdiskFile
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-17 14:04:07 +03:00
|
|
|
|
mov eax, ebx
|
|
|
|
|
mov ebx, ecx
|
|
|
|
|
mov ecx, edx
|
|
|
|
|
mov edx, esi
|
|
|
|
|
mov esi, 12
|
|
|
|
|
call fileread
|
|
|
|
|
mov [esp+32], eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_drawrect: ; DrawRect
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov edi, edx ; color + gradient
|
|
|
|
|
and edi, 0x80FFFFFF
|
|
|
|
|
test bx, bx ; x.size
|
|
|
|
|
je .drectr
|
|
|
|
|
test cx, cx ; y.size
|
|
|
|
|
je .drectr
|
|
|
|
|
|
|
|
|
|
mov eax, ebx ; bad idea
|
|
|
|
|
mov ebx, ecx
|
|
|
|
|
|
|
|
|
|
movzx ecx, ax ; ecx - x.size
|
|
|
|
|
shr eax, 16 ; eax - x.coord
|
|
|
|
|
movzx edx, bx ; edx - y.size
|
|
|
|
|
shr ebx, 16 ; ebx - y.coord
|
|
|
|
|
mov esi, [current_slot]
|
|
|
|
|
|
|
|
|
|
add eax, [esi + APPDATA.wnd_clientbox.left]
|
|
|
|
|
add ebx, [esi + APPDATA.wnd_clientbox.top]
|
|
|
|
|
add ecx, eax
|
|
|
|
|
add edx, ebx
|
|
|
|
|
jmp [drawbar]
|
|
|
|
|
.drectr:
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_getscreensize: ; GetScreenSize
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ax, [ScreenWidth]
|
|
|
|
|
shl eax, 16
|
|
|
|
|
mov ax, [ScreenHeight]
|
|
|
|
|
mov [esp + 32], eax
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_cdaudio: ; CD
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-07-26 16:25:17 +04:00
|
|
|
|
cmp eax, 4
|
|
|
|
|
jb .audio
|
|
|
|
|
jz .eject
|
|
|
|
|
cmp eax, 5
|
|
|
|
|
jnz .ret
|
|
|
|
|
.load:
|
|
|
|
|
call .reserve
|
|
|
|
|
call LoadMedium
|
|
|
|
|
call .free
|
|
|
|
|
ret
|
|
|
|
|
.eject:
|
|
|
|
|
call .reserve
|
|
|
|
|
call clear_CD_cache
|
|
|
|
|
call allow_medium_removal
|
|
|
|
|
call EjectMedium
|
|
|
|
|
call .free
|
|
|
|
|
ret
|
|
|
|
|
.audio:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call sys_cd_audio
|
|
|
|
|
mov [esp+36],eax
|
2007-07-26 16:25:17 +04:00
|
|
|
|
.ret:
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2007-07-26 16:25:17 +04:00
|
|
|
|
.reserve:
|
|
|
|
|
call reserve_cd
|
|
|
|
|
mov eax, ebx
|
|
|
|
|
shr eax, 1
|
|
|
|
|
and eax, 1
|
|
|
|
|
inc eax
|
2007-07-27 00:21:13 +04:00
|
|
|
|
mov [ChannelNumber], ax
|
2007-07-26 16:25:17 +04:00
|
|
|
|
mov eax, ebx
|
|
|
|
|
and eax, 1
|
2007-07-27 00:21:13 +04:00
|
|
|
|
mov [DiskNumber], al
|
2007-07-26 16:25:17 +04:00
|
|
|
|
call reserve_cd_channel
|
2007-07-26 19:57:15 +04:00
|
|
|
|
and ebx, 3
|
2007-07-26 16:25:17 +04:00
|
|
|
|
inc ebx
|
|
|
|
|
mov [cdpos], ebx
|
2007-07-26 19:57:15 +04:00
|
|
|
|
add ebx, ebx
|
|
|
|
|
mov cl, 8
|
|
|
|
|
sub cl, bl
|
|
|
|
|
mov al, [DRIVE_DATA+1]
|
|
|
|
|
shr al, cl
|
|
|
|
|
test al, 2
|
|
|
|
|
jz .err
|
2007-07-26 16:25:17 +04:00
|
|
|
|
ret
|
|
|
|
|
.free:
|
|
|
|
|
call free_cd_channel
|
|
|
|
|
and [cd_status], 0
|
|
|
|
|
ret
|
2007-07-26 19:57:15 +04:00
|
|
|
|
.err:
|
|
|
|
|
call .free
|
|
|
|
|
pop eax
|
|
|
|
|
ret
|
2007-07-26 16:25:17 +04:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_delramdiskfile: ; DelRamdiskFile
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-10-06 10:09:41 +04:00
|
|
|
|
add edi,TASKDATA.mem_start
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add eax,[edi]
|
|
|
|
|
call filedelete
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_writeramdiskfile: ; WriteRamdiskFile
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-10-06 10:09:41 +04:00
|
|
|
|
add edi,TASKDATA.mem_start
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add eax,[edi]
|
|
|
|
|
add ebx,[edi]
|
|
|
|
|
call filesave
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_getpixel: ; GetPixel
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ecx, [ScreenWidth]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
inc ecx
|
2007-11-13 02:08:54 +03:00
|
|
|
|
xor edx, edx
|
|
|
|
|
mov eax, ebx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
div ecx
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov ebx, edx
|
|
|
|
|
xchg eax, ebx
|
|
|
|
|
call dword [GETPIXEL] ; eax - x, ebx - y
|
|
|
|
|
mov [esp + 32], ecx
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_drawline: ; DrawLine
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov edi, [TASK_BASE]
|
|
|
|
|
movzx edx, word[edi-twdw+WDATA.box.left]
|
|
|
|
|
mov ebp, edx
|
|
|
|
|
mov esi, [current_slot]
|
|
|
|
|
add ebp, [esi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
add dx, word[esi+APPDATA.wnd_clientbox.left]
|
|
|
|
|
shl edx, 16
|
|
|
|
|
add ebp, edx
|
|
|
|
|
movzx edx, word[edi-twdw+WDATA.box.top]
|
|
|
|
|
add eax, ebp
|
|
|
|
|
mov ebp, edx
|
|
|
|
|
add ebp, [esi+APPDATA.wnd_clientbox.top]
|
|
|
|
|
add dx, word[esi+APPDATA.wnd_clientbox.top]
|
|
|
|
|
shl edx, 16
|
|
|
|
|
xor edi, edi
|
|
|
|
|
add edx, ebp
|
|
|
|
|
add ebx, edx
|
|
|
|
|
jmp [draw_line]
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_getirqowner: ; GetIrqOwner
|
2006-05-05 16:40:02 +04:00
|
|
|
|
cmp eax,16
|
|
|
|
|
jae .err
|
2005-10-06 21:56:22 +04:00
|
|
|
|
shl eax,2
|
|
|
|
|
add eax,irq_owner
|
|
|
|
|
mov eax,[eax]
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
2006-05-05 16:40:02 +04:00
|
|
|
|
.err:
|
|
|
|
|
or dword [esp+36], -1
|
|
|
|
|
ret
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_reserveportarea: ; ReservePortArea and FreePortArea
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
call r_f_port_area
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
syscall_threads: ; CreateThreads
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
call sys_threads
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
|
|
|
|
stack_driver_stat:
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
call app_stack_handler ; Stack status
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
|
|
|
|
; mov [check_idle_semaphore],5 ; enable these for zero delay
|
|
|
|
|
; call change_task ; between sent packet
|
|
|
|
|
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
socket: ; Socket interface
|
2005-10-06 21:56:22 +04:00
|
|
|
|
call app_socket_handler
|
|
|
|
|
|
|
|
|
|
; mov [check_idle_semaphore],5 ; enable these for zero delay
|
|
|
|
|
; call change_task ; between sent packet
|
|
|
|
|
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
mov [esp+24],ebx
|
|
|
|
|
ret
|
|
|
|
|
|
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
read_from_hd: ; Read from hd - fn not in use
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-02-28 11:52:06 +03:00
|
|
|
|
mov edi,[TASK_BASE]
|
2006-08-06 14:29:45 +04:00
|
|
|
|
add edi,TASKDATA.mem_start
|
2005-10-06 21:56:22 +04:00
|
|
|
|
add eax,[edi]
|
|
|
|
|
add ecx,[edi]
|
|
|
|
|
add edx,[edi]
|
|
|
|
|
call file_read
|
|
|
|
|
|
|
|
|
|
mov [esp+36],eax
|
|
|
|
|
mov [esp+24],ebx
|
|
|
|
|
|
|
|
|
|
ret
|
|
|
|
|
|
2007-02-25 17:20:50 +03:00
|
|
|
|
paleholder:
|
2008-02-04 18:31:59 +03:00
|
|
|
|
ret
|
|
|
|
|
|
2007-02-27 14:47:52 +03:00
|
|
|
|
|
2006-05-06 18:34:30 +04:00
|
|
|
|
; --------------- APM ---------------------
|
|
|
|
|
apm_entry dp 0
|
2007-03-23 06:11:34 +03:00
|
|
|
|
apm_vf dd 0
|
2006-05-06 18:34:30 +04:00
|
|
|
|
align 4
|
|
|
|
|
sys_apm:
|
|
|
|
|
cmp word [apm_vf], 0 ; Check APM BIOS enable
|
|
|
|
|
jne @f
|
2007-03-23 06:11:34 +03:00
|
|
|
|
or [esp + 56], byte 1 ; error
|
|
|
|
|
mov [esp + 36], dword 8 ; 32-bit protected-mode interface not supported
|
2006-05-06 18:34:30 +04:00
|
|
|
|
ret
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
@@:
|
|
|
|
|
xchg eax, ecx
|
2006-05-06 18:34:30 +04:00
|
|
|
|
xchg ebx, ecx
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2006-05-06 18:34:30 +04:00
|
|
|
|
cmp al, 3
|
2007-03-23 06:11:34 +03:00
|
|
|
|
ja @f
|
2006-05-12 16:47:52 +04:00
|
|
|
|
and [esp + 56], byte 0xfe ; emulate func 0..3 as func 0
|
2006-05-06 18:34:30 +04:00
|
|
|
|
mov eax, [apm_vf]
|
|
|
|
|
mov [esp + 36], eax
|
|
|
|
|
shr eax, 16
|
|
|
|
|
mov [esp + 32], eax
|
|
|
|
|
ret
|
2006-05-12 16:47:52 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
@@:
|
|
|
|
|
|
|
|
|
|
mov esi, [master_tab+(OS_BASE shr 20)]
|
|
|
|
|
xchg [master_tab], esi
|
|
|
|
|
push esi
|
|
|
|
|
mov edi, cr3
|
|
|
|
|
mov cr3, edi ;flush TLB
|
|
|
|
|
|
|
|
|
|
call pword [apm_entry] ; call APM BIOS
|
|
|
|
|
|
|
|
|
|
xchg eax, [esp]
|
|
|
|
|
mov [master_tab], eax
|
|
|
|
|
mov eax, cr3
|
|
|
|
|
mov cr3, eax
|
|
|
|
|
pop eax
|
|
|
|
|
|
2006-05-06 18:34:30 +04:00
|
|
|
|
mov [esp + 8 ], edi
|
|
|
|
|
mov [esp + 12], esi
|
|
|
|
|
mov [esp + 24], ebx
|
|
|
|
|
mov [esp + 28], edx
|
|
|
|
|
mov [esp + 32], ecx
|
|
|
|
|
mov [esp + 36], eax
|
|
|
|
|
setc al
|
2006-05-12 16:47:52 +04:00
|
|
|
|
and [esp + 56], byte 0xfe
|
2007-03-23 06:11:34 +03:00
|
|
|
|
or [esp + 56], al
|
2007-04-18 10:37:14 +04:00
|
|
|
|
|
|
|
|
|
|
2006-05-06 18:34:30 +04:00
|
|
|
|
ret
|
|
|
|
|
; -----------------------------------------
|
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
align 4
|
|
|
|
|
|
2007-03-23 06:11:34 +03:00
|
|
|
|
undefined_syscall: ; Undefined system call
|
2007-11-13 02:08:54 +03:00
|
|
|
|
mov [esp + 32], dword -1
|
2005-10-06 21:56:22 +04:00
|
|
|
|
ret
|
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
align 4
|
|
|
|
|
system_shutdown: ; shut down the system
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
cmp byte [BOOT_VAR+0x9030], 1
|
|
|
|
|
jne @F
|
|
|
|
|
ret
|
|
|
|
|
@@:
|
|
|
|
|
call stop_all_services
|
|
|
|
|
push 3 ; stop playing cd
|
|
|
|
|
pop eax
|
|
|
|
|
call sys_cd_audio
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
yes_shutdown_param:
|
|
|
|
|
cli
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-12-13 21:45:44 +03:00
|
|
|
|
mov eax, kernel_file ; load kernel.mnt to 0x7000:0
|
2007-04-18 10:37:14 +04:00
|
|
|
|
push 12
|
|
|
|
|
pop esi
|
|
|
|
|
xor ebx,ebx
|
|
|
|
|
or ecx,-1
|
2007-12-13 21:45:44 +03:00
|
|
|
|
mov edx, OS_BASE+0x70000
|
2007-04-18 10:37:14 +04:00
|
|
|
|
call fileread
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov esi, restart_kernel_4000+OS_BASE+0x10000 ; move kernel re-starter to 0x4000:0
|
|
|
|
|
mov edi,OS_BASE+0x40000
|
|
|
|
|
mov ecx,1000
|
|
|
|
|
rep movsb
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov esi,OS_BASE+0x2F0000 ; restore 0x0 - 0xffff
|
|
|
|
|
mov edi, OS_BASE
|
|
|
|
|
mov ecx,0x10000/4
|
|
|
|
|
cld
|
|
|
|
|
rep movsd
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
call restorefatchain
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov al, 0xFF
|
|
|
|
|
out 0x21, al
|
|
|
|
|
out 0xA1, al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
if 1
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov word [OS_BASE+0x467+0],pr_mode_exit
|
|
|
|
|
mov word [OS_BASE+0x467+2],0x1000
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov al,0x0F
|
|
|
|
|
out 0x70,al
|
|
|
|
|
mov al,0x05
|
|
|
|
|
out 0x71,al
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
mov al,0xFE
|
|
|
|
|
out 0x64,al
|
2008-02-04 18:31:59 +03:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
hlt
|
2006-10-06 10:09:41 +04:00
|
|
|
|
|
2008-02-04 18:31:59 +03:00
|
|
|
|
else
|
|
|
|
|
cmp byte [OS_BASE + 0x9030], 2
|
|
|
|
|
jnz no_acpi_power_off
|
|
|
|
|
|
|
|
|
|
; scan for RSDP
|
|
|
|
|
; 1) The first 1 Kb of the Extended BIOS Data Area (EBDA).
|
|
|
|
|
movzx eax, word [OS_BASE + 0x40E]
|
|
|
|
|
shl eax, 4
|
|
|
|
|
jz @f
|
|
|
|
|
mov ecx, 1024/16
|
|
|
|
|
call scan_rsdp
|
|
|
|
|
jnc .rsdp_found
|
|
|
|
|
@@:
|
|
|
|
|
; 2) The BIOS read-only memory space between 0E0000h and 0FFFFFh.
|
|
|
|
|
mov eax, 0xE0000
|
|
|
|
|
mov ecx, 0x2000
|
|
|
|
|
call scan_rsdp
|
|
|
|
|
jc no_acpi_power_off
|
|
|
|
|
.rsdp_found:
|
|
|
|
|
mov esi, [eax+16] ; esi contains physical address of the RSDT
|
|
|
|
|
mov ebp, [ipc_tmp]
|
|
|
|
|
stdcall map_page, ebp, esi, PG_MAP
|
|
|
|
|
lea eax, [esi+1000h]
|
|
|
|
|
lea edx, [ebp+1000h]
|
|
|
|
|
stdcall map_page, edx, eax, PG_MAP
|
|
|
|
|
and esi, 0xFFF
|
|
|
|
|
add esi, ebp
|
|
|
|
|
cmp dword [esi], 'RSDT'
|
|
|
|
|
jnz no_acpi_power_off
|
|
|
|
|
mov ecx, [esi+4]
|
|
|
|
|
sub ecx, 24h
|
|
|
|
|
jbe no_acpi_power_off
|
|
|
|
|
shr ecx, 2
|
|
|
|
|
add esi, 24h
|
|
|
|
|
.scan_fadt:
|
|
|
|
|
lodsd
|
|
|
|
|
mov ebx, eax
|
|
|
|
|
lea eax, [ebp+2000h]
|
|
|
|
|
stdcall map_page, eax, ebx, PG_MAP
|
|
|
|
|
lea eax, [ebp+3000h]
|
|
|
|
|
add ebx, 0x1000
|
|
|
|
|
stdcall map_page, eax, ebx, PG_MAP
|
|
|
|
|
and ebx, 0xFFF
|
|
|
|
|
lea ebx, [ebx+ebp+2000h]
|
|
|
|
|
cmp dword [ebx], 'FACP'
|
|
|
|
|
jz .fadt_found
|
|
|
|
|
loop .scan_fadt
|
|
|
|
|
jmp no_acpi_power_off
|
|
|
|
|
.fadt_found:
|
|
|
|
|
; ebx is linear address of FADT
|
|
|
|
|
mov edx, [ebx+48]
|
|
|
|
|
test edx, edx
|
|
|
|
|
jz .nosmi
|
|
|
|
|
mov al, [ebx+52]
|
|
|
|
|
out dx, al
|
|
|
|
|
mov edx, [ebx+64]
|
|
|
|
|
@@:
|
|
|
|
|
in ax, dx
|
|
|
|
|
test al, 1
|
|
|
|
|
jz @b
|
|
|
|
|
.nosmi:
|
|
|
|
|
mov edx, [ebx+64]
|
|
|
|
|
in ax, dx
|
|
|
|
|
and ax, 203h
|
|
|
|
|
or ax, 3C00h
|
|
|
|
|
out dx, ax
|
|
|
|
|
mov edx, [ebx+68]
|
|
|
|
|
test edx, edx
|
|
|
|
|
jz @f
|
|
|
|
|
in ax, dx
|
|
|
|
|
and ax, 203h
|
|
|
|
|
or ax, 3C00h
|
|
|
|
|
out dx, ax
|
|
|
|
|
@@:
|
|
|
|
|
jmp $
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
no_acpi_power_off:
|
|
|
|
|
mov word [OS_BASE+0x467+0],pr_mode_exit
|
|
|
|
|
mov word [OS_BASE+0x467+2],0x1000
|
|
|
|
|
|
|
|
|
|
mov al,0x0F
|
|
|
|
|
out 0x70,al
|
|
|
|
|
mov al,0x05
|
|
|
|
|
out 0x71,al
|
|
|
|
|
|
|
|
|
|
mov al,0xFE
|
|
|
|
|
out 0x64,al
|
|
|
|
|
|
|
|
|
|
hlt
|
|
|
|
|
|
|
|
|
|
scan_rsdp:
|
|
|
|
|
add eax, OS_BASE
|
|
|
|
|
.s:
|
|
|
|
|
cmp dword [eax], 'RSD '
|
|
|
|
|
jnz .n
|
|
|
|
|
cmp dword [eax+4], 'PTR '
|
|
|
|
|
jnz .n
|
|
|
|
|
xor edx, edx
|
|
|
|
|
xor esi, esi
|
|
|
|
|
@@:
|
|
|
|
|
add dl, [eax+esi]
|
|
|
|
|
inc esi
|
|
|
|
|
cmp esi, 20
|
|
|
|
|
jnz @b
|
|
|
|
|
test dl, dl
|
|
|
|
|
jz .ok
|
|
|
|
|
.n:
|
|
|
|
|
add eax, 10h
|
|
|
|
|
loop .s
|
|
|
|
|
stc
|
|
|
|
|
.ok:
|
|
|
|
|
ret
|
|
|
|
|
end if
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
include "data32.inc"
|
2005-10-06 21:56:22 +04:00
|
|
|
|
|
2007-04-18 10:37:14 +04:00
|
|
|
|
__REV__ = __REV
|
2007-02-25 17:20:50 +03:00
|
|
|
|
|
2005-10-06 21:56:22 +04:00
|
|
|
|
uglobals_size = $ - endofcode
|
2006-02-01 09:07:36 +03:00
|
|
|
|
diff16 "end of kernel code",0,$
|
2007-03-22 04:09:49 +03:00
|
|
|
|
|