Code cleanups.

Two GDT descriptors for all applications.
Unnecessary interrupt masking from commouse.inc has beed deleted.

git-svn-id: svn://kolibrios.org@4 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Ivan Poddubny 2005-10-12 11:35:35 +00:00
parent b37db20eb6
commit b420f2df50
5 changed files with 43 additions and 1065 deletions

View File

@ -50,6 +50,11 @@ find_new_process_place:
pop ebx pop ebx
ret ret
;----------------------------------------------------------------------------- ;-----------------------------------------------------------------------------
safe_sti:
cmp byte [0xe000], 1
jne @f
sti
@@:ret
new_start_application_floppy: new_start_application_floppy:
;input: ;input:
@ -230,7 +235,7 @@ new_start_application_fl:
push ebx push ebx
push eax push eax
call find_new_process_place ;find empty process slot call find_new_process_place ;find empty process slot
sti call safe_sti
test eax,eax test eax,eax
jz .failed jz .failed
@ -257,7 +262,7 @@ new_start_application_fl:
mov esi,12 ;file name length mov esi,12 ;file name length
cli cli
call fileread ;read file from RD call fileread ;read file from RD
sti call safe_sti
cmp eax,0 cmp eax,0
jne .cleanfailed jne .cleanfailed
;check MENUET signature ;check MENUET signature
@ -308,7 +313,7 @@ new_start_application_fl:
cli cli
call fileread call fileread
;ebx=file size ;ebx=file size
sti call safe_sti
pop ecx pop ecx
shr ebx,9 shr ebx,9
cmp ecx,ebx cmp ecx,ebx
@ -343,7 +348,7 @@ new_start_application_fl:
add esp,8 add esp,8
mov [application_table_status],0 mov [application_table_status],0
popad popad
sti call safe_sti
mov eax,-1 mov eax,-1
ret ret
@ -439,13 +444,13 @@ new_start_application_fl:
mov [l.esp],eax ;set stack in TSS mov [l.esp],eax ;set stack in TSS
;gdt ;gdt
mov ebx,[new_process_place] ;mov ebx,[new_process_place]
shl ebx,3 ;shl ebx,3
mov ax,app_code ;ax - selector of code segment mov ax,app_code ;ax - selector of code segment
add ax,bx ;add ax,bx
mov [l.cs],ax mov [l.cs],ax
mov ax,app_data mov ax,app_data
add ax,bx ;ax - selector of data segment ;add ax,bx ;ax - selector of data segment
mov [l.ss],ax mov [l.ss],ax
mov [l.ds],ax mov [l.ds],ax
mov [l.es],ax mov [l.es],ax
@ -455,11 +460,10 @@ new_start_application_fl:
mov [l.io],word 128 mov [l.io],word 128
mov [l.eflags],dword 0x11202 mov [l.eflags],dword 0x11202
mov [l.ss0],os_data mov [l.ss0],os_data
shl ebx,9 mov ebx,[new_process_place]
shl ebx,12
add ebx,sysint_stack_data add ebx,sysint_stack_data
mov [l.esp0],ebx mov [l.esp0],ebx
; mov [l.esp1],0x56000
; mov [l.esp2],0x57000
;copy tss to it place ;copy tss to it place
mov eax,tss_sceleton mov eax,tss_sceleton
@ -490,28 +494,6 @@ new_start_application_fl:
mov [edi+gdts+tss0+7],ah ;part of offset mov [edi+gdts+tss0+7],ah ;part of offset
mov [edi+gdts+tss0+5],word 01010000b*256+11101001b ;system flags mov [edi+gdts+tss0+5],word 01010000b*256+11101001b ;system flags
;set code and data segments
mov eax,[new_process_place]
shl eax,3
;set base address of code segment
mov word [eax+gdts+app_code-3+2],0
mov byte [eax+gdts+app_code-3+4],0
mov byte [eax+gdts+app_code-3+7],std_application_base_address shr 24
;set limit of code segment
; mov ebx,[app_mem]
; add ebx,4095
; shr ebx,12
mov ebx,(0x80000000-std_application_base_address) shr 12
mov [eax+gdts+app_code-3+0],bx
mov [eax+gdts+app_code-3+5],word 11010000b*256+11111010b+256*((0x80000000-std_application_base_address) shr 28)
;set base address of data segment
mov word [eax+gdts+app_data-3+2],0
mov byte [eax+gdts+app_data-3+4],0
mov byte [eax+gdts+app_data-3+7],std_application_base_address shr 24
;set limit of data segment
mov [eax+gdts+app_data-3+0],bx
mov [eax+gdts+app_data-3+5],word 11010000b*256+11110010b+256*((0x80000000-std_application_base_address) shr 28)
;flush keyboard and buttons queue ;flush keyboard and buttons queue
mov [0xf400],byte 0 mov [0xf400],byte 0
@ -536,7 +518,7 @@ new_start_application_fl:
; popad ; popad
mov eax,[process_number] ;set result mov eax,[process_number] ;set result
mov [application_table_status],0 ;unlock application_table_status mutex mov [application_table_status],0 ;unlock application_table_status mutex
sti call safe_sti
ret 4 ret 4
;----------------------------------------------------------------------------- ;-----------------------------------------------------------------------------
new_sys_threads: new_sys_threads:

View File

@ -62,7 +62,6 @@ irq0:
.waiting_for_termination: .waiting_for_termination:
.waiting_for_reuse: .waiting_for_reuse:
.waiting_on_queue:
add edi,0x20 add edi,0x20
inc ebx inc ebx
@ -73,10 +72,6 @@ irq0:
je .waiting_for_termination je .waiting_for_termination
cmp al, 9 cmp al, 9
je .waiting_for_reuse je .waiting_for_reuse
cmp al, 16
je .waiting_on_queue
cmp al, 17
je .waiting_on_queue
cmp ebx,[0x3004] cmp ebx,[0x3004]
jbe nsched0 jbe nsched0
@ -90,8 +85,8 @@ irq0:
do_not_change_task: do_not_change_task:
mov edx,[0x3000] ;mov edx,[0x3000]
lea edx,[tss0sys+8*edx] ;lea edx,[tss0sys+8*edx]
;mov [8*0x40+idts+8+0], word 0 ;mov [8*0x40+idts+8+0], word 0
;mov [8*0x40+idts+8+2],dx ;mov [8*0x40+idts+8+2],dx
;mov [8*0x40+idts+8+4],word 11100101b*256 ;mov [8*0x40+idts+8+4],word 11100101b*256
@ -155,132 +150,3 @@ updatecputimes:
jnz .newupdate jnz .newupdate
ret ret
;
; Wait queue is 16 bytes
; dd return code +12
; dd pointer to process +8
; dd prev +4
; dd next +0
;
; eax - pointer to pointer to the wait queue
; return:
; ecx - return code
sleep_on_queue:
sub esp,16 ; reserve space for wait node
mov ecx,esp ; ecx=this_node, [eax]=queue
pusha
mov ebx,[0x3010] ; get pointer to the current process
mov [ecx+8],ebx
pushf
cli ; adding element to the wait queue must be atomic
mov edi,[eax] ; edi=queue
and edi,edi ; check if queue is empty
jz .is_empty
; add element at the end of wait queue
mov edx,[edi+4] ; get pointer to prev edx=queue->prev
mov [ecx+4],edx ; this_node->prev=queue->prev
mov [ecx+0],edi ; this_node->next=queue
mov [edx+0],ecx ; this_node->prev->next=this_node
mov [edi+4],ecx ; queue->prev=this_node
jmp .added_ok
.is_empty:
; set this element as first in the queue
mov [ecx+0],ecx ; this_node->next=this_node
mov [ecx+4],ecx ; this_node->prev=this_node
mov [eax],ecx ; [queue]=this_node
.added_ok:
popf ; we can safely restore interrupts
mov [ebx+0xa],byte 17 ; set current task state as sleeping
call change_task ; schedule new thread
; someone has called wake_up_queue
pushf ; disable interrupts
cli
mov edx,[ecx+0] ; edx=this_node->next
mov esi,[ecx+4] ; esi=this_node->prev
; check if we need to remove this node from head
cmp [eax],ecx
jne .no_head
cmp [ecx+0],ecx ; check if queue is empty
jne .not_empty
mov [eax],dword 0
jmp .no_head
.not_empty:
mov [eax],edx
; remove our node from the queue (this must be atomic)
.no_head:
mov [edx+4],esi ; this_node->next->prev=this_node->prev
mov [esi+0],edx ; this_node->prev->next=this_node->next
popf
popa
add esp,12
pop ecx
ret
; eax - pointer to the wait queue
; ebx - wake up all (1=yes, 0=no)
; ecx - return code
; return:
; ebx - number of processes woken
wake_up_queue:
and eax,eax
jnz .nz
ret
.nz:
push eax
push ebx
push ecx
push edx
push esi
pushf
cli
xor ebx,ebx
mov edx,eax
.wake_loop:
mov [edx+12],ecx
mov esi,[edx+8]
mov byte [esi+0xa],0
inc ebx
mov edx,[edx+0]
cmp edx,eax
jne .wake_loop
and ebx,ebx
jz .wake_up_1
.return_it:
popf
pop esi
pop edx
pop ecx
add esp,4
pop eax
ret
.wake_up_1:
mov [eax+12],ecx
mov ecx,[eax+8]
mov byte [ecx+0xa],0
jmp .return_it

View File

@ -50,13 +50,19 @@ tss0i_l:
times 0x41 dq 0 ;(256+10) dd 0,0 times 0x41 dq 0 ;(256+10) dd 0,0
app_code_l: app_code_l:
times (max_processes+10) dd 0,0 dw ((0x80000000-std_application_base_address) shr 12) and 0xffff
dw 0
db 0
dw 11010000b*256+11111010b+256*((0x80000000-std_application_base_address) shr 28)
db std_application_base_address shr 24
app_data_l: app_data_l:
times (max_processes+10) dd 0,0 dw (0x80000000-std_application_base_address) shr 12 and 0xffff
dw 0
db 0
dw 11010000b*256+11110010b+256*((0x80000000-std_application_base_address) shr 28)
db std_application_base_address shr 24
tss0sys_l:
times (max_processes+10) dd 0,0
gdte: gdte:
@ -103,22 +109,6 @@ build_process_gdt_tss_pointer:
ret ret
;build_process_gdt_gate_pointer:
; mov edi,0
; mov dx,tss0
; setidtl1:
; mov ecx,[esi]
; mov [edi+gdts+ tss0t +0], word 0
; mov [edi+gdts+ tss0t +2], dx
; mov [edi+gdts+ tss0t +4], word 11100101b*256
; mov [edi+gdts+ tss0t +6], word 0
; add dx,8
; add edi,8
; cmp edi,8*(max_processes+5)
; jb setidtl1
; ret
build_interrupt_table: build_interrupt_table:
@ -230,62 +220,6 @@ build_interrupt_table:
build_syscall_interrupt_table: build_syscall_interrupt_table:
mov [l.eflags],dword 0x11002
mov [l.ss0], int_data ;code
;mov [l.ss1], ring1_data ;code
;mov [l.ss2], ring2_data ;code
mov [l.esp0], 0x52000
mov [l.esp1], 0x53000
mov [l.esp2], 0x54000
mov eax,cr3
mov [l.cr3],eax
mov [l.cs],int_code
mov [l.ss],int_data
mov [l.ds],int_data
mov [l.es],int_data
mov [l.fs],int_data
mov [l.gs],int_data
mov [l.esp],sysint_stack_data
mov edi,0x298000
newint2:
push edi
mov ebx,i40
mov [l.eip],ebx
mov esi,tss_sceleton
mov ecx,120/4
cld
rep movsd
pop edi
add [l.esp],4096
add edi,128
;add eax,4
cmp edi,0x298000+128*(max_processes+5)
jb newint2
;;
mov ecx,0x298000
mov edi,0
setgdtl2i2:
mov [edi+gdts+ tss0sys +0], word 128
mov [edi+gdts+ tss0sys +2], cx
mov eax,ecx
shr eax,16
mov [edi+gdts+ tss0sys +4], al
mov [edi+gdts+ tss0sys +7], ah
mov [edi+gdts+ tss0sys +5], word 01010000b *256 +11101001b
add ecx,128
add edi,8
cmp edi,8*(max_processes+5)
jbe setgdtl2i2
;;
;mov dx,tss0sys ;mov dx,tss0sys
mov edi,8*0x40+idts+8 mov edi,8*0x40+idts+8
mov [edi + 0], word (i40 and ((1 shl 16)-1)) mov [edi + 0], word (i40 and ((1 shl 16)-1))
@ -293,14 +227,6 @@ build_syscall_interrupt_table:
mov [edi + 4], word 11101110b*256 mov [edi + 4], word 11101110b*256
mov [edi + 6], word (i40 shr 16) mov [edi + 6], word (i40 shr 16)
mov edi,8*0x38+idts+8
mov eax, i38
mov [edi], ax ; lower part of offset
mov [edi+2], word os_code ; segment selector
shr eax, 16
mov [edi+4], word 11101110b shl 8 ; 32-bit interrupt gate, DPL 3
mov [edi+6], ax
ret ret
@ -1059,137 +985,6 @@ unknown_interrupt:
compare_to_thread:
push ebx
mov eax,edx
shl eax, 3
add eax,gdts+ app_code-3
mov ebx,[eax]
cmp ebx,[old_code_0]
jne ctt0
mov ebx,[eax+4]
cmp ebx,[old_code_1]
jne ctt0
pop ebx
mov eax,1
ret
ctt0:
pop ebx
mov eax,0
ret
check_for_thread_mem:
pusha
mov ecx,[0x3004]
cftm0:
mov eax,ecx
shl eax, 8
add eax,gdts+ app_code-3
mov ebx,[eax]
cmp ebx,[old_code_0]
jne cftm1
mov ebx,[eax+4]
cmp ebx,[old_code_1]
jne cftm1
mov eax,ecx ; new code segments
shl eax, 3 ;imul eax,8
add eax,gdts+ app_code-3
mov ebx,[new_code_0]
mov [eax],ebx
mov ebx,[new_code_1]
mov [eax+4],ebx
mov eax,ecx ; new data segments
shl eax, 3
add eax,gdts+ app_data-3
mov ebx,[new_data_0]
mov [eax],ebx
mov ebx,[new_data_1]
mov [eax+4],ebx
cmp [new_pos],0 ; new memory position segments
je no_new_postition_for_thread
mov eax,ecx
shl eax, 5
add eax,0x3000
mov ebx,[new_pos]
mov [eax+0x10],ebx
no_new_postition_for_thread:
mov eax,ecx ; new amount of memory
shl eax, 8
add eax,0x80000
mov ebx,[new_amount]
mov [eax+0x8C],ebx
cftm1:
dec ecx
jnz cftm0
popa
ret
save_for_thread_check:
; save for thread check
pusha
mov esi,[0x3000]
;imul esi,8
shl esi, 3
add esi,gdts+ app_code-3 +0
mov edi,old_code_0
mov ecx,8
cld
rep movsb
popa
ret
save_new_position_for_threads:
; new code segment for thread check
pusha
mov esi,[0x3000]
;imul esi,8
shl esi, 3
add esi,gdts+ app_code-3 +0
mov edi,new_code_0
mov ecx,8
cld
rep movsb
popa
; new data segment for thread check
pusha
mov esi,[0x3000]
;imul esi,8
shl esi, 3
add esi,gdts+ app_data-3 +0
mov edi,new_data_0
mov ecx,8
cld
rep movsb
popa
ret
set_application_table_status: set_application_table_status:
push eax push eax
@ -1247,325 +1042,15 @@ sys_resize_app_memory:
; ebx = new amount of memory ; ebx = new amount of memory
cmp eax,1 cmp eax,1
jne no_application_mem_resize jne .no_application_mem_resize
mov eax,[0x3010] jmp new_mem_resize ;resize for new type of processes
cmp dword [eax+0x10],std_application_base_address
jz new_mem_resize ;resize for new type of processes
add ebx,4095
shr ebx,12
shl ebx,12
mov ebp,ebx
; wait for process table to be free .no_application_mem_resize:
rsm0:
cli
cmp [application_table_status],0
je rsm1
sti
call change_task
jmp rsm0
rsm1:
call set_application_table_status
sti
cmp ebx,0 ; other than zero
je mem_resize_unsuccess
call save_for_thread_check
; find a free place
mov esi,[0xfe84] ; application memory start
mov edi,ebp
add edi,esi
dec edi
rfgdt:
mov edx,2
rfindgdtl1:
call compare_to_thread
cmp eax,1
je rfindfl3
mov ecx,edx
shl ecx,3
; eax run base -> ebx limit
mov al,[ecx+gdts+ app_code-3 +4]
mov ah,[ecx+gdts+ app_code-3 +7]
shl eax,16
mov ax,[ecx+gdts+ app_code-3 +2]
;!!mem
cmp eax,std_application_base_address
jz rfindfl3
;!!mem
movzx ebx,word [ecx+gdts+ app_code-3 +0]
shl ebx,12
add ebx,eax
cmp eax,edi
jg rfindfl3
cmp ebx,esi
jb rfindfl3
add esi,4096
add edi,4096
cmp edi,[0xfe8c] ; < c_memory
jbe rfgdt
jmp rfind_free_ret_2 ;; not enough memory
rfindfl3:
inc edx
cmp edx,[0x3004]
jbe rfindgdtl1
rfindfl1:
rthread_c:
mov ecx,[0x3000]
shl ecx,3
inc edi
sub edi,esi
add edi,4095
shr edi,12
dec edi
; code
mov eax,esi
mov ebx,edi
mov [ecx+gdts+ app_code-3 +2], ax ; base 0:15
shr eax,16
mov [ecx+gdts+ app_code-3 +4], al ; base 23:16
mov [ecx+gdts+ app_code-3 +7], ah ; base 31:24
mov [ecx+gdts+ app_code-3 +0], bx ; limit
; data
mov eax,esi
mov [ecx+gdts+ app_data-3 +2], ax ; base 0:15
shr eax,16
mov [ecx+gdts+ app_data-3 +4], al ; base 23:16
mov [ecx+gdts+ app_data-3 +7], ah ; base 31:24
movzx edx,word [ecx+gdts+ app_code-3 +0] ; save limit
mov [ecx+gdts+ app_data-3 +0], bx ; limit
and ebx,0xffff
cmp ebx,edx ; copy smaller from memory sizes
jge noedxebxxchg
mov edx,ebx
noedxebxxchg:
movzx ecx,dx
shl ecx,12
add ecx,4096
mov edi,esi
mov eax,[0x3010]
mov esi,[eax+0x10]
mov [eax+0x10],edi ; new memory position
mov eax,[0x3000] ; new memory size
shl eax,8
add eax,0x80000
mov [eax+0x8c],ebp
mov [new_pos],edi ; new position for threads
mov [new_amount],ebp ; new amount of mem for threads
cmp esi,edi
je no_app_move
cld
rep movsb ; move the app image to the new position
no_app_move:
call save_new_position_for_threads
call check_for_thread_mem
mov [application_table_status],0
mov [esp+36],dword 0 ; eax <- 0 ; successfull
ret ret
rfind_free_ret_2:
mem_resize_unsuccess:
mov [application_table_status],0
mov [esp+36],dword 1 ; eax <- 1 ; unsuccessfull
ret
no_application_mem_resize:
ret
align 4
find_free_mem:
push eax
push ebx
push ecx
push edx
push edi
call find_free_process_slot
mov eax,[new_process_place]
cmp eax,max_processes
jg find_free_ret_2
cmp [thread_create],1
je thread_c
mov esi,[0xfe84]
add edi,esi
dec edi
mov eax,2
cmp dword [0x3004],1
je findf4
fgdt:
mov edx,2
findgdtl1:
mov ecx,edx
shl ecx,3
; eax run base -> ebx limit
mov al,[ecx+gdts+ app_code-3 +4]
mov ah,[ecx+gdts+ app_code-3 +7]
shl eax,16
mov ax,[ecx+gdts+ app_code-3 +2]
;!!mem
cmp eax,std_application_base_address
jz findfl3
;!!mem
movzx ebx,word [ecx+gdts+ app_code-3 +0]
shl ebx,12
add ebx,eax
cmp eax,edi
jg findfl3
cmp ebx,esi
jb findfl3
add esi,4096
add edi,4096
cmp edi,[0xfe8c] ; < c_memory
jbe fgdt
jmp find_free_ret_2
findfl3:
inc edx
cmp edx,[check_processes]
jbe findgdtl1
findfl1:
thread_c:
mov eax,[new_process_place]
findf4:
mov [first_gdt_search],eax
mov [gdt_place],eax
mov ecx,eax
shl ecx,3
inc edi
sub edi,esi
add edi,4095
shr edi,12
dec edi
; code
mov eax,esi
mov ebx,edi
mov [ecx+gdts+ app_code-3 +2], ax ; base 0:15
shr eax,16
mov [ecx+gdts+ app_code-3 +4], al ; base 23:16
mov [ecx+gdts+ app_code-3 +7], ah ; base 31:24
mov [ecx+gdts+ app_code-3 +0], bx ; limit
mov [ecx+gdts+ app_code-3 +5], word 11010000b *256 +11111010b
; data
mov eax,esi
mov [ecx+gdts+ app_data-3 +2], ax ; base 0:15
shr eax,16
mov [ecx+gdts+ app_data-3 +4], al ; base 23:16
mov [ecx+gdts+ app_data-3 +7], ah ; base 31:24
mov [ecx+gdts+ app_data-3 +0], bx ; limit
mov [ecx+gdts+ app_data-3 +5], word 11010000b *256 +11110010b
push esi
mov esi,process_loading
call sys_msg_board_str
pop esi
find_free_ret:
pop edi
pop edx
pop ecx
pop ebx
pop eax
ret
find_free_ret_2:
cmp [dec3004],0
je no3004inc
dec dword [0x3004]
no3004inc:
pop edi
pop edx
pop ecx
pop ebx
pop eax
mov esi,0
ret
get_app_params: get_app_params:
@ -1636,10 +1121,10 @@ start_application_hd:
jmp new_start_application_hd jmp new_start_application_hd
uglobal uglobal
threadstring dd 0x0 ;threadstring dd 0x0
new_process_place dd 0x0 new_process_place dd 0x0
check_processes dd 0x0 ;check_processes dd 0x0
dec3004 db 0x0 ;dec3004 db 0x0
app_start dd 0x0 app_start dd 0x0
app_i_end dd 0x0 app_i_end dd 0x0
app_mem dd 0x0 app_mem dd 0x0
@ -1647,8 +1132,8 @@ uglobal
app_i_param dd 0x0 app_i_param dd 0x0
app_i_icon dd 0x0 app_i_icon dd 0x0
app_mem_pos dd 0x0 app_mem_pos dd 0x0
thread_create dd 0x0 ;thread_create dd 0x0
gdt_place dd 0x0 ;gdt_place dd 0x0
endg endg
iglobal iglobal
@ -1668,289 +1153,8 @@ sys_threads:
; ;
; on return : eax = pid ; on return : eax = pid
jmp new_sys_threads jmp new_sys_threads
cli
cmp [application_table_status],0
je stth9
sti
call change_task
jmp sys_threads
stth9:
call set_application_table_status
sti
cmp eax,1
jne no_sys_thread_create
cli
mov eax,[0x3010]
mov eax,[eax+0x10]
mov [app_mem_pos],eax
mov [app_i_param],0
mov [app_i_icon],0
mov [app_start],ebx
mov [app_esp],ecx
mov ebx,[0x3000]
shl ebx,8
add ebx,0x80000
mov [threadstring],ebx
mov ebx,[ebx+0x8c]
mov [app_mem],ebx
mov esi,[app_mem_pos]
mov edi,[app_mem]
add edi,esi
dec edi
mov [thread_create],1
call find_free_mem
cmp esi,0
jne th_cr1
mov [application_table_status],0
mov eax,1 ; no free memory
sti
ret
th_cr1:
push dword 0
push dword [threadstring]
jmp add_app_parameters
no_sys_thread_create:
mov eax,-1
mov [application_table_status],0
ret
find_free_process_slot:
pusha
mov ebx,[0x3004]
mov [check_processes],ebx
inc ebx
mov [new_process_place],ebx
mov ebx,2
newfps:
mov eax,ebx
;imul eax,0x20
shl eax, 5
add eax,0x3000+0xa
cmp [eax],byte 9
je ffpl
inc ebx
cmp ebx,[0x3004]
jbe newfps
;mov [dec3004],0
mov [dec3004],1
shl ebx,5
mov [0x3000+0xa+ebx],byte 9
inc dword [0x3004]
popa
ret
ffpl:
;mov [dec3004],1
;dec dword [0x3004]
mov [dec3004],0
mov [new_process_place],ebx
popa
ret
add_app_parameters:
; returns: eax = pid or -1 if unsuccesfull
cmp [app_i_param],dword 0 ; parameter
jz no_app_params
xor eax, eax
mov edi,[app_i_param]
add edi,[app_mem_pos]
mov ecx,256/4
cld
rep stosd
mov esi,[esp+4]
test esi, esi
jz no_app_params
mov eax,[app_i_param]
add eax,[app_mem_pos]
mov edi,eax
mov ecx,256
cld
app_new_param:
cmp [esi],byte 0
jz no_app_params
movsb
loop app_new_param
no_app_params:
;inc dword [0x3004] ; increase number of processes
mov ebx,[new_process_place]
mov edi,ebx ; clear 0x80000 (256 bytes)
shl edi,8
add edi,0x80000
mov ecx,256 / 4
mov eax,0
cld
rep stosd
shl ebx,5 ; * 32 +0x3000
add ebx,0x3000
mov al,byte [new_process_place] ; screen id ?
mov [ebx+0xe],al
mov [ebx],dword 1+2+4 ; report events: windowdraw, key, button
inc dword [process_number] ; process id number
mov eax,[process_number]
mov [ebx+4],eax
mov ecx,ebx ; set draw limits
add ecx,draw_data-0x3000
mov [ecx+0],dword 0
mov [ecx+4],dword 0
mov eax,[0xfe00]
mov [ecx+8],eax
mov eax,[0xfe04]
mov [ecx+12],eax
mov eax,[app_mem_pos] ; position in memory
mov [ebx+0x10],eax
; TSS
xor ebx,ebx
cmp [thread_create],ebx
jnz clone_cr3_table
mov eax,[new_process_place]
call create_app_cr3_table
jmp set_cr3
clone_cr3_table:
; mov eax,[new_process_place]
; mov ebx,[0x3000]
; call addreference_app_cr3_table
mov eax,[0x3000]
call get_cr3_table
set_cr3:
add eax,8+16
mov [l.cr3],eax
mov eax,[app_start]
mov [l.eip],eax
mov eax,[app_esp]
mov [l.esp],eax
mov ebx,[new_process_place] ; gdt's
shl ebx,3
mov ax,app_code
add ax,bx
mov [l.cs],ax
mov ax,app_data
add ax,bx
mov [l.ss],ax
mov [l.ds],ax
mov [l.es],ax
mov [l.fs],ax
mov ax,graph_data
mov [l.gs],ax
mov [l.io],word 128
mov [l.eflags],dword 0x11202
mov [l.ss0], os_data
;mov [l.ss1], ring1_data
;mov [l.ss2], ring2_data
; [Ivan 07.03.2005]
mov [l.esp0], 0x8000 ;0x55000 ; used by i38 handler
; [/Ivan 07.03.2005]
mov [l.esp1], 0x56000
mov [l.esp2], 0x57000
mov eax,tss_sceleton ; move tss to tss_data+
mov ebx,[new_process_place]
imul ebx,tss_step
add ebx,tss_data
mov ecx,120
call memmove
; Add IO access table
or eax, -1
mov edi, [new_process_place]
imul edi, tss_step
add edi, tss_data + 128
mov ecx, 2048 ; for 2048 * 4 * 8 bits = 65536 ports
cld
rep stosd
; make sure gdt is pointing to the process
; and not to i40 handler
mov ecx,ebx
mov edi,[new_process_place]
; imul edi,8
shl edi, 3
mov [edi+gdts+ tss0 +0], word tss_step ; limit 0:15
mov [edi+gdts+ tss0 +2], cx ; base 0:15
mov eax,ecx
shr eax,16
mov [edi+gdts+ tss0 +4], al ; base 23:16
mov [edi+gdts+ tss0 +7], ah ; base 31:24
mov [edi+gdts+ tss0 +5], word 01010000b *256 +11101001b
pop eax
pop ebx
mov ebx,[new_process_place] ; save name of the process
shl ebx,8
add ebx,0x80000
mov ecx,11
call memmove
mov ebx,[new_process_place] ; save image size
shl ebx,8
add ebx,0x80000+0x8C
mov eax,[app_mem]
mov [ebx],eax
mov [0xf400],byte 0 ; empty keyboard buffer
mov [0xf500],byte 0 ; empty button buffer
mov [application_table_status],0
mov eax,[process_number]
mov ebx,[new_process_place]
shl ebx, 5 ;imul ebx,0x20
mov [0x3000+ebx+0xa],byte 0
mov edi,[new_process_place]
shl edi,5
add edi,window_data
mov ebx,[new_process_place]
movzx esi, word [0xC000 + ebx*2]
lea esi, [0xC400 + esi*2]
call windowactivate
sti
push esi
mov esi,process_running
call sys_msg_board_str
pop esi
ret
iglobal iglobal
process_terminating db 'K : Process - terminating',13,10,0 process_terminating db 'K : Process - terminating',13,10,0
@ -1992,47 +1196,18 @@ terminate: ; terminate application
mov [0xf400],byte 0 ; empty keyboard buffer mov [0xf400],byte 0 ; empty keyboard buffer
mov [0xf500],byte 0 ; empty button buffer mov [0xf500],byte 0 ; empty button buffer
mov ecx,esi ; clear memory reserv. ; mov ecx,esi ; clear memory reserv.
shl ecx,3 ; shl ecx,3
mov [ecx+gdts+ app_code-3 +0],dword 0 ; mov [ecx+gdts+ app_code-3 +0],dword 0
mov [ecx+gdts+ app_code-3 +4],dword 0 ; mov [ecx+gdts+ app_code-3 +4],dword 0
mov [ecx+gdts+ app_data-3 +0],dword 0 ; mov [ecx+gdts+ app_data-3 +0],dword 0
mov [ecx+gdts+ app_data-3 +4],dword 0 ; mov [ecx+gdts+ app_data-3 +4],dword 0
mov edi, esi mov edi, esi
; shl edi, 5
; add edi, 0x3000
; cmp [edi+0xa],byte 3 ; if normal terminate then clear int40 handler
; jne nocl40
; mov edi,esi ; free the used interrupt 0x40 handler
; shl edi, 8 ;imul edi,256
; mov eax,[edi+0x80000+0xb0]
; cmp eax,0 ; is application using a systemcall interrupt ?
; je nocl40
mov [usedi40+eax],byte 0 mov [usedi40+eax],byte 0
; mov edi,8
; imul edi,eax
mov edi, eax
shl edi, 3
mov [edi+tss0sys_l +5], word 01010000b *256 +11101001b
; mov edi,128
; imul edi,eax
mov edi, eax
shl edi, 7
mov [edi+0x298000+l.eip-tss_sceleton],dword i40
mov [edi+0x298000+l.eflags-tss_sceleton],dword 0x11002
mov ebx,eax
shl ebx, 12 ;imul ebx,4096
add ebx,sysint_stack_data
mov [edi+0x298000+l.esp-tss_sceleton],ebx
nocl40:
mov ecx,esi ; remove buttons mov ecx,esi ; remove buttons
bnewba2: bnewba2:
@ -2146,12 +1321,6 @@ terminate: ; terminate application
mov [0xC400 + ecx*2], si mov [0xC400 + ecx*2], si
jmp nlc40 jmp nlc40
nlc41: nlc41:
; ivan 08.12.2004 begin
;mov ebx, [0x3004]
;dec ebx
;lea esi, [0xC400 + ebx*2]
;call windowactivate
; ivan 08.12.2004 end
popa popa
pusha ; remove hd1 reservation pusha ; remove hd1 reservation

View File

@ -24,17 +24,6 @@ i40:
;clear busy flag in application's TSS ;clear busy flag in application's TSS
mov [edi+gdts+ tss0 +5], word 01010000b *256 +11101001b mov [edi+gdts+ tss0 +5], word 01010000b *256 +11101001b
;save GDT TSS entry
; mov edx,[edi+tss0_l]
; mov [reg1+eax*4],edx
; mov edx,[edi+tss0_l+4]
; mov [reg2+eax*4],edx
;and then write there i40's descriptor
; mov edx,[tss0sys_l+edi]
; mov [edi+tss0_l],edx
; mov edx,[tss0sys_l+edi+4]
; mov [edi+tss0_l+4],edx
shl edi,5 shl edi,5
mov [edi+0x80000+0xB0],eax ; used i40 handler mov [edi+0x80000+0xB0],eax ; used i40 handler
@ -88,33 +77,11 @@ i40:
mov [esi+16],ebx;[esi+l.ebx-tss_sceleton], ebx mov [esi+16],ebx;[esi+l.ebx-tss_sceleton], ebx
mov [esi+24],ecx;[esi+l.ecx-tss_sceleton], ecx mov [esi+24],ecx;[esi+l.ecx-tss_sceleton], ecx
; calculate app's TSS address
; mov ebx, [0x3000]
; shl ebx, 3
; add ebx, tss0_l
; mov ecx, [0x3000]
; restore saved TSS descriptor
; mov eax, [reg1+ecx*4]
; mov [ebx], eax
; mov eax, [reg2+ecx*4]
; mov [ebx+4], eax
xor eax, eax xor eax, eax
mov edi, [0x3000] ; no syscall interrupt in use anymore mov edi, [0x3000] ; no syscall interrupt in use anymore
shl edi, 8 shl edi, 8
mov [edi+0x80000+0xB0],eax mov [edi+0x80000+0xB0],eax
; clear busy flag in TSS of this handler
; mov edi, [0x3000]
; shl edi, 3
; mov [edi+tss0sys_l +5], word 01010000b *256 +11101001b
; add edi,tss0
; mov [0xB004], di
; jmp pword [0xB000]
pop eax pop eax
mov ds,ax mov ds,ax
mov es,ax mov es,ax

View File

@ -9,12 +9,6 @@
MSMouseSearch: MSMouseSearch:
pusha pusha
; Запретить прерывание COM1 и COM2
cli
in AL,21h ;прочитать маску прерываний
or AL,18h ;запретить IRQ3 и IRQ4
out 21h,AL ;заменить маску
sti
; ПОИСК МЫШИ ЧЕРЕЗ COM-ПОРТЫ ; ПОИСК МЫШИ ЧЕРЕЗ COM-ПОРТЫ
MouseSearch: MouseSearch:
; Устанавливаем скорость ; Устанавливаем скорость