WebSVN – Kolibri OS – Diff – /kernel/branches/net/core/sys32.inc

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 $Revision: 982 $
-align 4
-idtreg:
      dw   8*0x41-1
-     dd   idts+8
-build_interrupt_table:
+align 4 ;3A08
+build_interrupt_table:
-	mov    edi, idts+8
-	mov    esi, sys_int
-	mov    ecx, 0x40
+        mov     edi, idts
-     @@:
+        mov     esi, sys_int
-	lodsd
+        mov     ecx, 0x40
-	mov    [edi],	ax	     ; lower part of offset
+        mov     eax, (10001110b shl 24) + os_code
-	mov    [edi+2], word os_code ; segment selector
+  @@:   movsw   ;low word of code-entry
-	mov	ax, word 10001110b shl 8	; type: interrupt gate
-	mov	[edi+4], eax
-	add    edi, 8
-	loop	@b
+        stosd   ;interrupt gate type : os_code selector
+        movsw   ;high word of code-entry
-	;mov    edi,8*0x40+idts+8
+        loop    @b
-	mov	dword [edi], (i40 and 0xFFFF) or (os_code shl 16)
+        movsd   ;copy low  dword of trap gate for int 0x40
-	mov	dword [edi+4], (11101111b shl 8) or (i40 and 0xFFFF0000)
+        movsd   ;copy high dword of trap gate for int 0x40
-						; type: trap gate
-	ret
+        lidt    [esi]
-iglobal
         ret
-  msg_sel_ker	db "kernel", 0
-  msg_sel_app	db "application", 0
+iglobal
-  sys_int:
+  align 4
-    dd e0,debug_exc,e2,e3
-    dd e4,e5,e6,e7
+  sys_int:
-    dd e8,e9,e10,e11
+    ;exception handlers addresses (for interrupt gate construction)
-    dd e12,e13,page_fault_handler,e15
+        dd      e0,e1,e2,e3,e4,e5,e6,except_7 ; SEE: core/fpu.inc
+        dd      e8,e9,e10,e11,e12,e13,page_fault_exc,e15
+        dd      e16, e17,e18, e19
-    dd except_16, e17,e18, except_19
+        times   12 dd unknown_interrupt ;int_20..int_31
-    times 12 dd unknown_interrupt
+    ;interrupt handlers addresses (for interrupt gate construction)
-    dd	 irq0, irq_serv.irq_1, irq_serv.irq_2
+        dd      irq0, irq_serv.irq_1, irq_serv.irq_2
-if USE_COM_IRQ
+    if  USE_COM_IRQ
-    dd	 irq_serv.irq_3, irq_serv.irq_4
+        dd      irq_serv.irq_3, irq_serv.irq_4
-else
+    else
-    dd	 p_irq3, p_irq4
+        dd      p_irq3, p_irq4 ;??? íåñòûêîâêà
+    end if
+        dd      irq_serv.irq_5,  p_irq6,          irq_serv.irq_7
+        dd      irq_serv.irq_8,  irq_serv.irq_9,  irq_serv.irq_10
+        dd      irq_serv.irq_11, irq_serv.irq_12, irqD,p_irq14,p_irq15
+        times   16 dd unknown_interrupt ;int_0x30..int_0x3F
+    ;int_0x40 gate trap (for directly copied)
+        dw      i40 and 0xFFFF, os_code, 11101111b shl 8, i40 shr 16
+  idtreg: ; data for LIDT instruction (!!! must be immediately below sys_int data)
+        dw      2*($-sys_int-4)-1
+        dd      idts ;0x8000B100
+        dw      0    ;ïðîñòî âûðàâíèâàíèå
+  msg_fault_sel dd  msg_exc_8,msg_exc_u,msg_exc_a,msg_exc_b
+                dd  msg_exc_c,msg_exc_d,msg_exc_e
+  msg_exc_8     db "Double fault", 0
+  msg_exc_u     db "Undefined Exception", 0
+  msg_exc_a     db "Invalid TSS", 0
+  msg_exc_b     db "Segment not present", 0
-end if
+  msg_exc_c     db "Stack fault", 0
-    dd	 irq_serv.irq_5,  p_irq6,	  irq_serv.irq_7
-    dd	 irq_serv.irq_8,  irq_serv.irq_9, irq_serv.irq_10
+  msg_exc_d     db "General protection fault", 0
-    dd	 irq_serv.irq_11, irq_serv.irq_12,irqD ,p_irq14,p_irq15
+  msg_exc_e     db "Page fault", 0
-    times 16 dd unknown_interrupt
   msg_sel_ker   db "kernel", 0
-    dd	 i40
+  msg_sel_app   db "application", 0
-endg
-macro save_ring3_context
+endg
-{
-    pushad
-}
-macro restore_ring3_context
-{
-    popad
-}
-; simply return control to interrupted process
+macro save_ring3_context {
-unknown_interrupt:
+        pushad
-     iret
+}
+macro restore_ring3_context {
-macro exc_wo_code [num]
+        popad
-{
+}
-  forward
-  e#num :
-      save_ring3_context
+macro exc_wo_code [num] {
-      mov bl, num
+  e#num :
-      jmp exc_c
+        save_ring3_context
-}
+        mov     bl, num
+        jmp     exc_c
-macro exc_w_code [num]
+} exc_wo_code   0,1,2,3,4,5,6,15,16,19
-{
-  forward
-  e#num :
-      add esp, 4
-      save_ring3_context
-      mov bl, num
+macro exc_w_code [num] {
+  e#num :
+        add     esp, 4
-      jmp exc_c
+        save_ring3_context
-}
+        mov     bl, num
+        jmp     exc_c
+} exc_w_code    8,9,10,11,12,13,17,18
+uglobal
+  pf_err_code   dd ?
-exc_wo_code 0, 2, 3, 4, 5, 6, 9, 15, 18
+endg
+page_fault_exc:                 ; äóðàêîóñòî÷èâîñòü: ñåëåêòîðû èñïîð÷åíû...
+        pop     [ss:pf_err_code]; äåéñòâèòåëüíî äî ñëåäóþùåãî #PF
+        save_ring3_context
+        mov     bl,14
+exc_c:                          ; èñêëþ÷åíèÿ (âñå, êðîìå 7-ãî - #NM)
+; Ôðýéì ñòåêà ïðè èñêëþ÷åíèè/ïðåðûâàíèè èç 3-ãî êîëüöà + pushad (ò.å., èìåííî çäåñü)
+  reg_ss        equ esp+0x30
+  reg_esp3      equ esp+0x2C
-exc_w_code 8, 10, 11, 12, 13, 14, 17
+  reg_eflags    equ esp+0x28
+  reg_cs3       equ esp+0x24
+  reg_eip       equ esp+0x20
+ ; ýòî ôðýéì îò pushad
+  reg_eax       equ esp+0x1C
+  reg_ecx       equ esp+0x18
+  reg_edx       equ esp+0x14
+  reg_ebx       equ esp+0x10
+  reg_esp0      equ esp+0x0C
+  reg_ebp       equ esp+0x08
+  reg_esi       equ esp+0x04
+  reg_edi       equ esp+0x00
+        Mov     ds,ax,app_data  ; çàãðóçèì ïðàâèëüíûå çíà÷åíèÿ
+        mov     es,ax           ; â ñåãìåíòíûå ðåãèñòðû
+        cld                     ; è ïðèâîäèì DF ê ñòàíäàðòó
+        movzx   ebx,bl
+; redirect to V86 manager? (EFLAGS & 0x20000) != 0?
-exc_c:
+        test    byte[reg_eflags+2],2
-	mov   ax, app_data  ;èñêëþ÷åíèå
+        jnz     v86_exc_c
-	mov   ds, ax	    ;çàãðóçèì ïðàâèëüíûå çíà÷åíè
+        cmp     bl,14           ; #PF
-	mov   es, ax	    ;â ðåãèñòðû
+        jne     @f
         call    page_fault_handler ; SEE: core/memory.inc
-; redirect to V86 manager? (EFLAGS & 0x20000) != 0?
-	test	byte [esp+20h+8+2], 2
-	jnz	v86_exc_c
+  @@:   mov     esi, [current_slot]
-; test if debugging
+        btr     [esi+APPDATA.except_mask], ebx
-	cli
+        jnc     @f
-	mov   eax, [current_slot]
-	mov   eax, [eax+APPDATA.debugger_slot]
+        mov     eax,[esi+APPDATA.exc_handler]
-	test  eax, eax
-	jnz   .debug
+        test    eax, eax
-	sti
+        jnz     IRetToUserHook
-; not debuggee => say error and terminate
+  @@:   cli
+        mov     eax, [esi+APPDATA.debugger_slot]
-	movzx eax, bl
+        test    eax, eax
+        jnz     .debug
+        sti
-	mov   [error_interrupt], eax
+; not debuggee => say error and terminate
-	call  show_error_parameters
+        call    show_error_parameters ;; only ONE using, inline ???
-	add   esp, 0x20
+       ;mov     edx, [TASK_BASE]
-	mov   edx, [TASK_BASE]
+        mov     [edx + TASKDATA.state], byte 4 ; terminate
-	mov   [edx + TASKDATA.state], byte 4
+        jmp     change_task     ; stack - here it does not matter at all, SEE: core/shed.inc
+.debug:
-	jmp   change_task
+; we are debugged process, notify debugger and suspend ourself
+; eax=debugger PID
-.debug:
+        mov     ecx,1           ; debug_message code=other_exception
+        cmp     bl,1            ; #DB
-; we are debugged process, notify debugger and suspend ourself
+        jne     .notify         ; notify debugger and suspend ourself
+        mov     ebx, dr6        ; debug_message data=DR6_image
+        xor     edx, edx
+        mov     dr6, edx
+        mov     edx, dr7
+        mov     cl, not 8
+  .l1:  shl     dl,2
-; eax=debugger PID
+        jc      @f
-	cld
+        and     bl, cl
-	movzx ecx, bl
+  @@:   sar     cl,1
-	push  ecx
+        jc      .l1
-	mov   ecx, [TASK_BASE]
+        mov     cl, 3           ; debug_message code=debug_exception
-	push  dword [ecx+TASKDATA.pid]	  ; PID of current process
+.notify:
-	push  12
+        push    ebx             ; debug_message data
+        mov     ebx, [TASK_BASE]
-	pop   ecx
+        push    [ebx+TASKDATA.pid] ; PID
+        push    ecx             ; debug_message code ((here: ecx==1/3))
+        mov     cl, 12          ; debug_message size
+        call    debugger_notify ;; only ONE using, inline ??? SEE: core/debug.inc
+        add     esp,12
-	push  1        ; 1=exception
+        mov     edx, [TASK_BASE]
-	call  debugger_notify
+        mov     byte [edx+TASKDATA.state], 1 ; suspended
-	pop   ecx
+        call    change_task     ; SEE: core/shed.inc
-	pop   ecx
+        restore_ring3_context
-	pop   ecx
+        iretd
-	mov   edx, [TASK_BASE]
-	mov   byte [edx+TASKDATA.state], 1	  ; suspended
-	call  change_task
-	restore_ring3_context
+IRetToUserHook:
-	iretd
-iglobal
+        xchg    eax, [reg_eip]
-	hexletters	db '0123456789ABCDEF'
-	error_interrupt dd  -1
+        sub     dword[reg_esp3], 8
-endg
-;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
+        mov     edi, [reg_esp3]
-show_error_parameters:
-    mov eax,[CURRENT_TASK]
+        stosd
-    shl eax, 5
-    DEBUGF  1, "K : Process - forced terminate PID: %x\n", [CURRENT_TASK + TASKDATA.pid + eax]
+        mov     [edi], ebx
-    mov eax, [error_interrupt]
-    cmp al, 0x08
-    jne @f
-    DEBUGF  1, "K : Double fault\n"
-    jmp defined_error
+        restore_ring3_context
-@@:
+unknown_interrupt:
-    cmp al, 0x0a
-    jne @f
-    DEBUGF  1, "K : Invalid TSS\n"
-    jmp defined_error
+        iretd
-@@:
-    cmp al, 0x0b
-    jne @f
+;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
-    DEBUGF  1, "K : Segment not present\n"
+show_error_parameters:
-    jmp defined_error
+        mov     edx,[TASK_BASE] ;not scratched below
-@@:
+        DEBUGF  1, "K : Process - forced terminate PID: %x\n", [edx+TASKDATA.pid]
-    cmp al, 0x0c
-    jne @f
-    DEBUGF  1, "K : Stack fault\n"
-    jmp defined_error
+        cmp     bl, 0x08
-@@:
+        jb      .l0
-    cmp al, 0x0d
+        cmp     bl, 0x0e
-    jne @f
-    DEBUGF  1, "K : General protection fault\n"
-    jmp defined_error
-@@:
-    cmp al, 0x0e
-    jne @f
-    DEBUGF  1, "K : Page fault\n"
-    jmp defined_error
-@@:
-    DEBUGF  1, "K : Undefined Exception\n"
+        jbe     .l1
-defined_error:
+  .l0:  mov     bl, 0x09
-    DEBUGF  1, "K : EAX : %x EBX : %x ECX : %x\n", [esp + 0x20], [esp - 12 + 0x20], [esp - 4 + 0x20]
+  .l1:  mov     eax,[msg_fault_sel+ebx*4 - 0x08*4]
+        DEBUGF  1, "K : %s\n", eax
+        mov     eax, [reg_cs3+4]
+        mov     edi, msg_sel_app
+        mov     ebx, [reg_esp3+4]
+        cmp     eax, app_code
+        je      @f
+        mov     edi, msg_sel_ker
+        mov     ebx, [reg_esp0+4]
+    @@: DEBUGF  1, "K : EAX : %x EBX : %x ECX : %x\n", [reg_eax+4], [reg_ebx+4], [reg_ecx+4]
+        DEBUGF  1, "K : EDX : %x ESI : %x EDI : %x\n", [reg_edx+4], [reg_esi+4], [reg_edi+4]
+        DEBUGF  1, "K : EBP : %x EIP : %x ESP : %x\n", [reg_ebp+4], [reg_eip+4], ebx
+        DEBUGF  1, "K : Flags : %x CS : %x (%s)\n", [reg_eflags+4], eax, edi
+        ret
-    DEBUGF  1, "K : EDX : %x ESI : %x EDI : %x\n", [esp - 8 + 0x20], [esp - 24 + 0x20], [esp - 28 + 0x20]
+;-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
-    DEBUGF  1, "K : EBP : %x EIP : %x ", [esp - 20 + 0x20], [esp + 4 + 0x20]
-    mov eax, [esp + 8 + 0x20]
-    mov edi, msg_sel_app
+  restore  reg_ss
-    mov ebx, [esp + 16 + 0x20]
+  restore  reg_esp3
-    cmp eax, app_code
+  restore  reg_eflags
-    je	@f
+  restore  reg_cs
-    mov edi, msg_sel_ker
-    mov ebx, [esp - 16 + 0x20]
+  restore  reg_eip
-@@:
+  restore  reg_eax
-    DEBUGF  1, "ESP : %x\nK : Flags : %x CS : %x (%s)\n", ebx, [esp + 12 + 0x20], eax, edi
+  restore  reg_ecx
         restore_ring3_context
         iret
 p_irq14:
-	save_ring3_context
+        save_ring3_context
-	mov	ax, app_data  ;os_data
+        mov     ax, app_data  ;os_data
-	mov	ds, ax
+        mov     ds, ax
-	mov	es, ax
+        mov     es, ax
-	mov	edi, 14
+        mov     edi, 14
-	cmp	[v86_irqhooks+edi*8], 0
+        cmp     [v86_irqhooks+edi*8], 0
-	jnz	v86_irq2
+        jnz     v86_irq2
-;	mov	byte [BOOT_VAR + 0x48E], 0xFF
+;       mov     byte [BOOT_VAR + 0x48E], 0xFF
-	call	[irq14_func]
+        call    [irq14_func]
-	call	ready_for_next_irq_1
+        call    ready_for_next_irq_1
-	restore_ring3_context
+        restore_ring3_context
-	iret
+        iret
 p_irq15:
-	save_ring3_context
+        save_ring3_context
-	mov	ax, app_data  ;os_data
+        mov     ax, app_data  ;os_data
-	mov	ds, ax
+        mov     ds, ax
-	mov	es, ax
+        mov     es, ax
-	mov	edi, 15
+        mov     edi, 15
-	cmp	[v86_irqhooks+edi*8], 0
+        cmp     [v86_irqhooks+edi*8], 0
-	jnz	v86_irq2
+        jnz     v86_irq2
-;	mov	byte [BOOT_VAR + 0x48E], 0xFF
+;       mov     byte [BOOT_VAR + 0x48E], 0xFF
-	call	[irq15_func]
+        call    [irq15_func]
-	call	ready_for_next_irq_1
+        call    ready_for_next_irq_1
-	restore_ring3_context
+        restore_ring3_context
-	iret
+        iret
 ready_for_next_irq:
-     mov    [check_idle_semaphore],5
+        mov     [check_idle_semaphore],5
-     mov   al, 0x20
+        mov     al, 0x20
-     out   0x20, al
+        out     0x20, al
-     ret
+        ret
 ready_for_next_irq_1:
-     mov    [check_idle_semaphore],5
+        mov     [check_idle_semaphore],5
-     mov   al, 0x20
+        mov     al, 0x20
-     out    0xa0,al
-     out   0x20, al
-     ret
+        out     0xa0,al
-irqD:
-     save_ring3_context
-     mov   ax, app_data  ;os_data
+        out     0x20, al
-     mov   ds, ax
+        ret
-     mov   es, ax
-     mov   dx,0xf0
+irqD:
-     mov   al,0
+        push  eax
-     out   dx,al
+        mov   al,0
+        out   0xf0,al
-     mov   dx,0xa0
-     mov   al,0x20
-     out   dx,al
+        mov   al,0x20
-     mov   dx,0x20
+        out   0xa0,al
-     out   dx,al
+        out   0x20,al
+        pop   eax
-     restore_ring3_context
+        iret
      iret
 irqh 2,3,4,5,7,8,9,10,11
 irqhandler:
-     mov    esi,edi	     ; 1
+     mov    esi,edi          ; 1
-     shl    esi,6	     ; 1
+     shl    esi,6            ; 1
      add    esi,irq00read    ; 1
-     shl    edi,12	     ; 1
+     shl    edi,12           ; 1
      add    edi,IRQ_SAVE
      mov    ecx,16
    irqnewread:
      dec    ecx
      js     irqover
-     movzx  edx, word [esi]	   ; 2+
+     movzx  edx, word [esi]        ; 2+
-     test   edx, edx		   ; 1
+     test   edx, edx               ; 1
      jz     irqover
-     mov    ebx, [edi]		   ; address of begin of buffer in edi      ; + 0x0 dword - data size
+     mov    ebx, [edi]             ; address of begin of buffer in edi      ; + 0x0 dword - data size
-     mov    eax, 4000							    ; + 0x4 dword - data begin offset
+     mov    eax, 4000                                                       ; + 0x4 dword - data begin offset
      cmp    ebx, eax
      je     irqfull
-     add    ebx, [edi + 0x4]	   ; add data size to data begin offset
+     add    ebx, [edi + 0x4]       ; add data size to data begin offset
-     cmp    ebx, eax		   ; if end of buffer, begin cycle again
+     cmp    ebx, eax               ; if end of buffer, begin cycle again
      jb     @f
      xor    ebx, ebx
   @@:
      add    ebx, edi
      ret
 set_application_table_status:
-	push eax
+        push eax
-	mov  eax,[CURRENT_TASK]
+        mov  eax,[CURRENT_TASK]
-	shl  eax, 5
+        shl  eax, 5
-	add  eax,CURRENT_TASK+TASKDATA.pid
+        add  eax,CURRENT_TASK+TASKDATA.pid
-	mov  eax,[eax]
+        mov  eax,[eax]
-	mov  [application_table_status],eax
+        mov  [application_table_status],eax
-	pop  eax
+        pop  eax
-	ret
+        ret
 clear_application_table_status:
-	push eax
+        push eax
-	mov  eax,[CURRENT_TASK]
+        mov  eax,[CURRENT_TASK]
-	shl  eax, 5
+        shl  eax, 5
-	add  eax,CURRENT_TASK+TASKDATA.pid
+        add  eax,CURRENT_TASK+TASKDATA.pid
-	mov  eax,[eax]
+        mov  eax,[eax]
-	cmp  eax,[application_table_status]
+        cmp  eax,[application_table_status]
-	jne  apptsl1
+        jne  apptsl1
-	mov  [application_table_status],0
+        mov  [application_table_status],0
       apptsl1:
-	pop  eax
+        pop  eax
-	ret
+        ret
+;
 ; on return : eax = pid
 jmp new_sys_threads
 iglobal
-  process_terminating	db 'K : Process - terminating',13,10,0
+;  process_terminating  db 'K : Process - terminating',13,10,0
-  process_terminated	db 'K : Process - done',13,10,0
+;  process_terminated   db 'K : Process - done',13,10,0
-  msg_obj_destroy	db 'K : destroy app object',13,10,0
+  msg_obj_destroy       db 'K : destroy app object',13,10,0
 endg
 ; param
 ;  esi= slot
 terminate: ; terminate application
-	   .slot equ esp   ;locals
+           .slot equ esp   ;locals
-	   push   esi	   ;save .slot
+           push   esi      ;save .slot
-	   shl esi, 8
+           shl esi, 8
-	   cmp [SLOT_BASE+esi+APPDATA.dir_table], 0
+           cmp [SLOT_BASE+esi+APPDATA.dir_table], 0
-	   jne @F
+           jne @F
-	   pop	  esi
+           pop    esi
-	   shl	  esi, 5
-	   mov	  [CURRENT_TASK+esi+TASKDATA.state], 9
+           shl    esi, 5
-	   ret
+           mov    [CURRENT_TASK+esi+TASKDATA.state], 9
-@@:
+           ret
-	   ;mov    esi,process_terminating
+@@:
-	   ;call   sys_msg_board_str
+           ;mov    esi,process_terminating
-	   DEBUGF 1,"%s",process_terminating
+           ;call   sys_msg_board_str
 @@:
-	   cli
+           cli
-	   cmp	 [application_table_status],0
+           cmp   [application_table_status],0
-	   je	 term9
+           je    term9
-	   sti
+           sti
-	   call  change_task
+           call  change_task
-	   jmp	 @b
+           jmp   @b
 term9:
-	   call  set_application_table_status
+           call  set_application_table_status
 ; if the process is in V86 mode...
-	mov	eax, [.slot]
+        mov     eax, [.slot]
-	shl	eax, 8
+        shl     eax, 8
-	mov	esi, [eax+SLOT_BASE+APPDATA.pl0_stack]
+        mov     esi, [eax+SLOT_BASE+APPDATA.pl0_stack]
-	add	esi, RING0_STACK_SIZE
+        add     esi, RING0_STACK_SIZE
-	cmp	[eax+SLOT_BASE+APPDATA.saved_esp0], esi
+        cmp     [eax+SLOT_BASE+APPDATA.saved_esp0], esi
-	jz	.nov86
+        jz      .nov86
 ; ...it has page directory for V86 mode
-	mov	esi, [eax+SLOT_BASE+APPDATA.saved_esp0]
+        mov     esi, [eax+SLOT_BASE+APPDATA.saved_esp0]
-	mov	ecx, [esi+4]
+        mov     ecx, [esi+4]
-	mov	[eax+SLOT_BASE+APPDATA.dir_table], ecx
+        mov     [eax+SLOT_BASE+APPDATA.dir_table], ecx
 ; ...and I/O permission map for V86 mode
-	mov	ecx, [esi+12]
+        mov     ecx, [esi+12]
-	mov	[eax+SLOT_BASE+APPDATA.io_map], ecx
+        mov     [eax+SLOT_BASE+APPDATA.io_map], ecx
-	mov	ecx, [esi+8]
+        mov     ecx, [esi+8]
-	mov	[eax+SLOT_BASE+APPDATA.io_map+4], ecx
+        mov     [eax+SLOT_BASE+APPDATA.io_map+4], ecx
 .nov86:
-	   mov esi, [.slot]
+           mov esi, [.slot]
-	   shl esi,8
+           shl esi,8
-	   add esi, SLOT_BASE+APP_OBJ_OFFSET
+           add esi, SLOT_BASE+APP_OBJ_OFFSET
 @@:
-	   mov eax, [esi+APPOBJ.fd]
+           mov eax, [esi+APPOBJ.fd]
-	   test eax, eax
+           test eax, eax
-	   jz @F
+           jz @F
-	   cmp eax, esi
+           cmp eax, esi
-	   je @F
+           je @F
-	   push esi
+           push esi
-	   call [eax+APPOBJ.destroy]
+           call [eax+APPOBJ.destroy]
-	   DEBUGF 1,"%s",msg_obj_destroy
+           DEBUGF 1,"%s",msg_obj_destroy
-	   pop esi
+           pop esi
-	   jmp @B
+           jmp @B
 @@:
-	   mov eax, [.slot]
+           mov eax, [.slot]
-	   shl eax, 8
+           shl eax, 8
-	   mov eax,[SLOT_BASE+eax+APPDATA.dir_table]
+           mov eax,[SLOT_BASE+eax+APPDATA.dir_table]
-	   stdcall destroy_app_space, eax
+           stdcall destroy_app_space, eax
-	   mov esi, [.slot]
+           mov esi, [.slot]
-	   cmp [fpu_owner],esi	 ; if user fpu last -> fpu user = 1
+           cmp [fpu_owner],esi   ; if user fpu last -> fpu user = 1
-	   jne @F
+           jne @F
-	   mov [fpu_owner],1
+           mov [fpu_owner],1
-	   mov eax, [256+SLOT_BASE+APPDATA.fpu_state]
+           mov eax, [256+SLOT_BASE+APPDATA.fpu_state]
-	   clts
+           clts
-	   bt [cpu_caps], CAPS_SSE
+           bt [cpu_caps], CAPS_SSE
-	   jnc .no_SSE
+           jnc .no_SSE
-	   fxrstor [eax]
+           fxrstor [eax]
-	   jmp @F
+           jmp @F
 .no_SSE:
-	   fnclex
+           fnclex
-	   frstor [eax]
+           frstor [eax]
 @@:
-    mov   [KEY_COUNT],byte 0	       ; empty keyboard buffer
+    mov   [KEY_COUNT],byte 0           ; empty keyboard buffer
-    mov   [BTN_COUNT],byte 0	       ; empty button buffer
+    mov   [BTN_COUNT],byte 0           ; empty button buffer
 ; remove defined hotkeys
-	mov	eax, hotkey_list
+        mov     eax, hotkey_list
 .loop:
-	cmp	[eax+8], esi
+        cmp     [eax+8], esi
-	jnz	.cont
+        jnz     .cont
-	mov	ecx, [eax]
+        mov     ecx, [eax]
-	jecxz	@f
+        jecxz   @f
-	push	dword [eax+12]
+        push    dword [eax+12]
-	pop	dword [ecx+12]
+        pop     dword [ecx+12]
 @@:
-	mov	ecx, [eax+12]
+        mov     ecx, [eax+12]
-	push	dword [eax]
+        push    dword [eax]
-	pop	dword [ecx]
+        pop     dword [ecx]
-	xor	ecx, ecx
+        xor     ecx, ecx
-	mov	[eax], ecx
+        mov     [eax], ecx
-	mov	[eax+4], ecx
+        mov     [eax+4], ecx
-	mov	[eax+8], ecx
+        mov     [eax+8], ecx
-	mov	[eax+12], ecx
+        mov     [eax+12], ecx
 .cont:
-	add	eax, 16
+        add     eax, 16
-	cmp	eax, hotkey_list+256*16
+        cmp     eax, hotkey_list+256*16
-	jb	.loop
+        jb      .loop
 ; remove hotkeys in buffer
-	mov	eax, hotkey_buffer
+        mov     eax, hotkey_buffer
 .loop2:
-	cmp	[eax], esi
+        cmp     [eax], esi
-	jnz	.cont2
+        jnz     .cont2
-	and	dword [eax+4], 0
+        and     dword [eax+4], 0
-	and	dword [eax], 0
+        and     dword [eax], 0
 .cont2:
-	add	eax, 8
+        add     eax, 8
-	cmp	eax, hotkey_buffer+120*8
+        cmp     eax, hotkey_buffer+120*8
-	jb	.loop2
+        jb      .loop2
-    mov   ecx,esi		  ; remove buttons
+    mov   ecx,esi                 ; remove buttons
   bnewba2:
     mov   edi,[BTN_ADDR]
     pushad
     mov  edi, esi
     shl  edi, 5
     mov  eax, [SLOT_BASE+edi*8+APPDATA.debugger_slot]
     test eax, eax
-    jz	 .nodebug
+    jz   .nodebug
     push 8
     pop  ecx
-    push dword [CURRENT_TASK+edi+TASKDATA.pid]	 ; PID
+    push dword [CURRENT_TASK+edi+TASKDATA.pid]   ; PID
     push 2
     call debugger_notify
     pop  ecx
     pop  ecx
 .nodebug:
     popad
-	   mov ebx, [.slot]
+           mov ebx, [.slot]
-	   shl ebx, 8
+           shl ebx, 8
-	   push ebx
+           push ebx
-	   mov ebx,[SLOT_BASE+ebx+APPDATA.pl0_stack]
+           mov ebx,[SLOT_BASE+ebx+APPDATA.pl0_stack]
-	   stdcall kernel_free, ebx
+           stdcall kernel_free, ebx
-	   pop ebx
+           pop ebx
-	   mov ebx,[SLOT_BASE+ebx+APPDATA.cur_dir]
+           mov ebx,[SLOT_BASE+ebx+APPDATA.cur_dir]
-	   stdcall kernel_free, ebx
+           stdcall kernel_free, ebx
-	   mov edi, [.slot]
+           mov edi, [.slot]
-	   shl edi,8
+           shl edi,8
-	   add edi,SLOT_BASE
+           add edi,SLOT_BASE
-	   mov eax, [edi+APPDATA.io_map]
+           mov eax, [edi+APPDATA.io_map]
-	   cmp eax, (tss._io_map_0-OS_BASE+PG_MAP)
+           cmp eax, (tss._io_map_0-OS_BASE+PG_MAP)
-	   je @F
+           je @F
-	   call free_page
+           call free_page
 @@:
-	   mov eax, [edi+APPDATA.io_map+4]
+           mov eax, [edi+APPDATA.io_map+4]
-	   cmp eax, (tss._io_map_1-OS_BASE+PG_MAP)
+           cmp eax, (tss._io_map_1-OS_BASE+PG_MAP)
-	   je @F
+           je @F
-	   call free_page
+           call free_page
 @@:
-	   mov eax, 0x20202020
+           mov eax, 0x20202020
-	   stosd
+           stosd
-	   stosd
+           stosd
-	   stosd
+           stosd
-	   mov ecx,244/4
+           mov ecx,244/4
-	   xor eax, eax
+           xor eax, eax
-	   rep stosd
+           rep stosd
   ; activate window
-	movzx  eax, word [WIN_STACK + esi*2]
+        movzx  eax, word [WIN_STACK + esi*2]
-	cmp    eax, [TASK_COUNT]
+        cmp    eax, [TASK_COUNT]
-	jne    .dont_activate
+        jne    .dont_activate
-	pushad
+        pushad
  .check_next_window:
-	dec    eax
+        dec    eax
-	cmp    eax, 1
+        cmp    eax, 1
-	jbe    .nothing_to_activate
+        jbe    .nothing_to_activate
-	lea    esi, [WIN_POS+eax*2]
+        lea    esi, [WIN_POS+eax*2]
-	movzx  edi, word [esi]		     ; edi = process
+        movzx  edi, word [esi]               ; edi = process
-	shl    edi, 5
+        shl    edi, 5
-	cmp    [CURRENT_TASK + edi + TASKDATA.state], byte 9  ; skip dead slots
+        cmp    [CURRENT_TASK + edi + TASKDATA.state], byte 9  ; skip dead slots
-	je     .check_next_window
+        je     .check_next_window
-	add    edi, window_data
+        add    edi, window_data
 ; \begin{diamond}[19.09.2006]
 ; skip minimized windows
-	test   [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
+        test   [edi + WDATA.fl_wstate], WSTATE_MINIMIZED
-	jnz    .check_next_window
+        jnz    .check_next_window
 ; \end{diamond}
-	call   waredraw
+        call   waredraw
  .nothing_to_activate:
-	popad
+        popad
  .dont_activate:
-	push	esi	; remove hd1 & cd & flp reservation
+        push    esi     ; remove hd1 & cd & flp reservation
-	shl	esi, 5
+        shl     esi, 5
-	mov	esi, [esi+CURRENT_TASK+TASKDATA.pid]
+        mov     esi, [esi+CURRENT_TASK+TASKDATA.pid]
-	cmp	[hd1_status], esi
+        cmp     [hd1_status], esi
-	jnz	@f
+        jnz     @f
-	call	free_hd_channel
+        call    free_hd_channel
-	mov	[hd1_status], 0
+        mov     [hd1_status], 0
 @@:
-	cmp	[cd_status], esi
+        cmp     [cd_status], esi
-	jnz	@f
+        jnz     @f
-	call	free_cd_channel
+        call    free_cd_channel
-	mov	[cd_status], 0
+        mov     [cd_status], 0
 @@:
-	cmp	[flp_status], esi
+        cmp     [flp_status], esi
-	jnz	@f
+        jnz     @f
-	mov	[flp_status], 0
+        mov     [flp_status], 0
 @@:
-	pop	esi
+        pop     esi
-	cmp	[bgrlockpid], esi
+        cmp     [bgrlockpid], esi
-	jnz	@f
+        jnz     @f
-	and	[bgrlockpid], 0
+        and     [bgrlockpid], 0
-	mov	[bgrlock], 0
+        mov     [bgrlock], 0
 @@:
     xor   ebx, ebx
     xor   edx, edx
   newirqfree:
     cmp   [edi + 4 * ebx], eax
     jne   nofreeirq
-    mov   [edi + 4 * ebx], edx				; remove irq reservation
+    mov   [edi + 4 * ebx], edx                          ; remove irq reservation
-    mov   [irq_tab + 4 * ebx], edx			; remove irq handler
+    mov   [irq_tab + 4 * ebx], edx                      ; remove irq handler
-    mov   [irq_rights + 4 * ebx], edx			; set access rights to full access
+    mov   [irq_rights + 4 * ebx], edx                   ; set access rights to full access
   nofreeirq:
     inc   ebx
     cmp   ebx, 16
-    jb	  newirqfree
+    jb    newirqfree
     popa
-    pusha		      ; remove all port reservations
+    pusha                     ; remove all port reservations
     mov   edx,esi
     shl   edx, 5
     add   edx,CURRENT_TASK
     mov   edx,[edx+TASKDATA.pid]
   rmpr0:
     mov   esi,[RESERVED_PORTS]
     cmp   esi,0
-    je	  rmpr9
+    je    rmpr9
   rmpr3:
     mov   edi,esi
     shl   edi,4
     jmp   rmpr0
   rmpr9:
     popa
-    mov  edi,esi	 ; do not run this process slot
+    mov  edi,esi         ; do not run this process slot
     shl  edi, 5
     mov  [edi+CURRENT_TASK + TASKDATA.state],byte 9
 ; debugger test - terminate all debuggees
     mov  eax, 2
     mov  ecx, SLOT_BASE+2*0x100+APPDATA.debugger_slot
 .xd0:
     cmp  eax, [TASK_COUNT]
-    ja	 .xd1
+    ja   .xd1
     cmp  dword [ecx], esi
     jnz  @f
     and  dword [ecx], 0
     mov   [DONT_DRAW_MOUSE],byte 0  ; draw mouse
     mov   [application_table_status],0
     ;mov   esi,process_terminated
-    ;call  sys_msg_board_str
-    DEBUGF 1,"%s",process_terminated
+    ;call  sys_msg_board_str
     add esp, 4
     ret
 restore .slot
 iglobal
-  boot_sched_1	  db   'Building gdt tss pointer',0
+  boot_sched_1    db   'Building gdt tss pointer',0
-  boot_sched_2	  db   'Building IDT table',0
+  boot_sched_2    db   'Building IDT table',0
 endg
 build_scheduler:
-	mov    esi,boot_sched_1
+        mov    esi,boot_sched_1

Subversion Repositories Kolibri OS

(root)/kernel/branches/net/core/sys32.inc @ 1206 – Rev 1161 → 1198