WebSVN – Kolibri OS – Diff – /kernel/branches/net/kernel.asm

 $Revision: 1025 $
+USE_COM_IRQ     equ 1      ; make irq 3 and irq 4 available for PCI devices
 USE_COM_IRQ equ 1      ;make irq 3 and irq 4 available for PCI devices
 ; Enabling the next line will enable serial output console
-debug_com_base equ 0x3f8  ; 0x3f8 is com1, 0x2f8 is com2, 0x3e8 is com3, 0x2e8 is com4, no irq's are used, comment this line out to disable
+;debug_com_base  equ 0x3f8  ; 0x3f8 is com1, 0x2f8 is com2, 0x3e8 is com3, 0x2e8 is com4, no irq's are used
-	   xor esi, esi
+           xor esi, esi
-	   mov	 edi,0x2F0000
+           mov   edi,0x2F0000
-	   mov	 ecx,0x10000 / 4
+           mov   ecx,0x10000 / 4
-	   rep	 movsd
+           rep   movsd
-	   xor edi, edi
+           mov   edi,0x1000
-	   mov	 ecx,0x10000 / 4
+           mov   ecx,0xf000 / 4
-	   rep	 stosd
+           rep   stosd
 .noSYSCALL:
 ; -----------------------------------------
 ; LOAD IDT
-	   call build_interrupt_table
+           call build_interrupt_table ;lidt is executed
-	   lidt [idtreg]
+          ;lidt [idtreg]
-	xor  eax,eax
+        xor  eax,eax
-	inc  eax
+        inc  eax
-	mov   [BgrDrawMode],eax
+        mov   [BgrDrawMode],eax
-	mov   [BgrDataWidth],eax
+        mov   [BgrDataWidth],eax
-	mov   [BgrDataHeight],eax
+        mov   [BgrDataHeight],eax
-	mov    [mem_BACKGROUND],4095
+        mov    [mem_BACKGROUND], 4
-	stdcall kernel_alloc, [mem_BACKGROUND]
-	mov [img_background], eax
+        mov [img_background], static_background_data
-	mov	[SLOT_BASE + 256 + APPDATA.dir_table], sys_pgdir - OS_BASE
+        mov     [SLOT_BASE + 256 + APPDATA.dir_table], sys_pgdir - OS_BASE
-	mov  esi,boot_setostask
+        mov  esi,boot_setostask
-	call boot_log
+        call boot_log
-	xor  eax, eax
+        xor  eax, eax
-	mov  dword [SLOT_BASE+APPDATA.fpu_state], fpu_data
+        mov  dword [SLOT_BASE+APPDATA.fpu_state], fpu_data
-	mov  dword [SLOT_BASE+APPDATA.fpu_handler], eax
+        mov  dword [SLOT_BASE+APPDATA.exc_handler], eax
-	mov  dword [SLOT_BASE+APPDATA.sse_handler], eax
+        mov  dword [SLOT_BASE+APPDATA.except_mask], eax
-	; name for OS/IDLE process
+        ; name for OS/IDLE process
-	mov esi, fpu_data
+        mov esi, fpu_data
-	mov ecx, 512/4
+        mov ecx, 512/4
-	cld
+        cld
-	rep movsd
+        rep movsd
-	mov dword [SLOT_BASE+256+APPDATA.fpu_handler], eax
+        mov dword [SLOT_BASE+256+APPDATA.exc_handler], eax
-	mov dword [SLOT_BASE+256+APPDATA.sse_handler], eax
+        mov dword [SLOT_BASE+256+APPDATA.except_mask], eax
-	mov ebx, SLOT_BASE+256+APP_OBJ_OFFSET
+        mov ebx, SLOT_BASE+256+APP_OBJ_OFFSET
   ; READ TSC / SECOND
-	mov   esi,boot_tsc
+        mov   esi,boot_tsc
-	call  boot_log
+        call  boot_log
-	cli
+        cli
-	call  _rdtsc
+        rdtsc ;call  _rdtsc
-	mov   ecx,eax
+        mov   ecx,eax
-	mov   esi,250		    ; wait 1/4 a second
+        mov   esi,250               ; wait 1/4 a second
-	call  delay_ms
+        call  delay_ms
-	call  _rdtsc
+        rdtsc ;call  _rdtsc
-	sti
+        sti
-	sub   eax,ecx
+        sub   eax,ecx
-	shl   eax,2
+        shl   eax,2
-	mov   [CPU_FREQ],eax	      ; save tsc / sec
+        mov   [CPU_FREQ],eax          ; save tsc / sec
-	mov ebx, 1000000
+;       mov ebx, 1000000
+;       div ebx
+; ¢®®¡é¥-â® ¯à®¨§¢®¤¨â¥«ì®áâì ¢ ¤ ®¬ ª®ªà¥â®¬ ¬¥áâ¥
+; á®¢¥àè¥® ¥ªà¨â¨ç , ® çâ®¡ë § âªãâì «î¡¨â¥«¥©
+; ®¯â¨¬¨§¨àãîé¨å ª®¬¯¨«ïâ®à®¢ ...
+        mov     edx, 2251799814
+        mul     edx
-	div ebx
+        shr     edx, 19
+        mov [stall_mcs], edx
+; PRINT CPU FREQUENCY
+        mov     esi, boot_cpufreq
+        call    boot_log
+        mov     ebx, edx
+        movzx   ecx, word [boot_y]
+        add     ecx, (10+17*6) shl 16 - 10 ; 'CPU frequency is '
+        mov     edx, 0xFFFFFF
+        mov     edi, 1
+        mov     eax, 0x00040000
-	mov [stall_mcs], eax
+        call    display_number_force
 ; SET VARIABLES
-	call  set_variables
+        call  set_variables
 ; SET MOUSE
-	;call   detect_devices
+        ;call   detect_devices
-	   stdcall map_page,tss._io_map_0,\
+           stdcall map_page,tss._io_map_0,\
-		   (tss._io_map_0-OS_BASE), PG_MAP
+                   (tss._io_map_0-OS_BASE), PG_MAP
-	   stdcall map_page,tss._io_map_1,\
+           stdcall map_page,tss._io_map_1,\
-		   (tss._io_map_1-OS_BASE), PG_MAP
+                   (tss._io_map_1-OS_BASE), PG_MAP
-  mov ax,[OS_BASE+0x10000+bx_from_load]
 ; LOAD FIRST APPLICATION
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;                                                                    ;
 ;                      MAIN OS LOOP END                              ;
 ;                                                                    ;
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+align 4
 checkidle:
-	pushad
+        pushad
-	cmp  [check_idle_semaphore],0
-	jne  no_idle_state
-	call change_task
+        call    change_task
-	mov  eax,[idlemem]
-	mov  ebx,[timer_ticks] ;[0xfdf0]
-	cmp  eax,ebx
-	jnz  idle_exit
+        jmp     idle_loop_entry
-	call _rdtsc
-	mov  ecx,eax
-      idle_loop:
+  idle_loop:
+        cmp     eax,[idlemem]     ; eax == [timer_ticks]
+        jne     idle_exit
+        rdtsc   ;call _rdtsc
+        mov     ecx,eax
-	hlt
+        hlt
-	cmp  [check_idle_semaphore],0
-	jne  idle_loop_exit
-	mov  eax,[timer_ticks] ;[0xfdf0]
-	cmp  ebx,eax
-	jz   idle_loop
-      idle_loop_exit:
+        rdtsc   ;call _rdtsc
-	mov  [idlemem],eax
-	call _rdtsc
-	sub  eax,ecx
+        sub     eax,ecx
-	mov  ebx,[idleuse]
-	add  ebx,eax
-	mov  [idleuse],ebx
+        add     [idleuse],eax
-	popad
-	ret
-      idle_exit:
+  idle_loop_entry:
-	mov  ebx,[timer_ticks] ;[0xfdf0]
+        mov     eax,[timer_ticks] ; eax =  [timer_ticks]
-	mov  [idlemem],ebx
+        cmp     [check_idle_semaphore],0
-	call change_task
-	popad
-	ret
-      no_idle_state:
+        je      idle_loop
-	dec  [check_idle_semaphore]
+        dec     [check_idle_semaphore]
-	mov  ebx,[timer_ticks] ;[0xfdf0]
-	mov  [idlemem],ebx
+  idle_exit:
-	call change_task
+        mov     [idlemem],eax     ; eax == [timer_ticks]
-	popad
+        popad
-	ret
+        ret
 uglobal
-	pop   eax
+        pop   eax
 	mov   [BTN_ADDR],dword BUTTON_INFO    ; address of button list
      ;!! IP 04.02.2005:
-	mov   [next_usage_update], 100
+     ;!! IP 04.02.2005:
-	mov   byte [DONT_SWITCH], 0 ; change task if possible
+        mov   byte [DONT_SWITCH], 0 ; change task if possible
      mov   ebx,16
    d_hexnum:
      xor   edx,edx
      call  division_64_bits
      div   ebx
+   hexletters = __fdo_hexdigits
      add   edx,hexletters
      mov   dl,[edx]
      mov   [edi],dl
      dec   edi
      loop  d_hexnum
 .yes_floppy_save:
-	ret
+        ret
 uglobal
 ;  bgrchanged  dd  0x0
-bgrlock db 0
+align 4
+bgrlockpid dd 0
-bgrlockpid dd 0
+bgrlock db 0
 endg
     cmp   ecx,0
-    je	  sbgrr
+    je    sbgrr
     cmp   edx,0
-    je	  sbgrr
+    je    sbgrr
 @@:
-	mov	al, 1
+;;Maxis use atomic bts for mutexes  4.4.2009
-	xchg	[bgrlock], al
+        bts     dword [bgrlock], 0
-	test	al, al
+        jnc     @f
-	jz	@f
-	call	change_task
+        call    change_task
-	jmp	@b
+        jmp     @b
 @@:
     mov   [BgrDataWidth],ecx
     mov   [BgrDataHeight],edx
 ;    mov   [bgrchanged],1
     pushad
 ; return memory for old background
+        mov     eax, [img_background]
+        cmp     eax, static_background_data
+        jz      @f
+        stdcall kernel_free, eax
-    stdcall kernel_free, [img_background]
+@@:
 ; calculate RAW size
     xor  eax,eax
     inc  eax
     cmp  [BgrDataWidth],eax
     lea  eax,[eax*3]
     mov  [mem_BACKGROUND],eax
 ; get memory for new background
     stdcall kernel_alloc, eax
     test eax, eax
-    jz .exit_mem
+    jz .memfailed
     mov [img_background], eax
+    jmp .exit
+.memfailed:
+; revert to static monotone data
+        mov     [img_background], static_background_data
+        xor     eax, eax
+        inc     eax
+        mov     [BgrDataWidth], eax
+        mov     [BgrDataHeight], eax
+        mov     [mem_BACKGROUND], 4
-.exit_mem:
+.exit:
     popad
-	mov	[bgrlock], 0
+        mov     [bgrlock], 0
   sbgrr:
 nosb1:
-    cmp   ebx,2 			   ; SET PIXEL
+    cmp   ebx,2                            ; SET PIXEL
+    jnz   nosb2
+    mov   eax, [img_background]
+    test  ecx, ecx
+    jz    @f
+    cmp   eax, static_background_data
-    jnz   nosb2
+    jz    .ret
 @@:
     mov ebx, [mem_BACKGROUND]
     add ebx, 4095
     and ebx, -4096
     sub ebx, 4
-    cmp   ecx, ebx
-    ja	 @F
+    cmp   ecx, ebx
     ja   .ret
     mov   eax,[img_background]
     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
-@@:
+.ret:
     ret
     ret
   nosb4:
-    cmp   ebx,5 			   ; BLOCK MOVE TO BGR
+    cmp   ebx,5                            ; BLOCK MOVE TO BGR
+    jnz   nosb5
+    cmp   [img_background], static_background_data
+    jnz   @f
+    test  edx, edx
+    jnz   .fin
+    cmp   esi, 4
+    ja    .fin
-    jnz   nosb5
+  @@:
   ; bughere
     mov   eax, ecx
     mov   ebx, edx
     add   ebx, [img_background]   ;IMG_BACKGROUND
     ret
   nosb5:
-	cmp	ebx, 6
+        cmp     ebx, 6
+        jnz     nosb6
-	jnz	nosb6
+;;Maxis use atomic bts for mutex 4.4.2009
-@@:
-	mov	al, 1
+@@:
-	xchg	[bgrlock], al
+        bts     dword [bgrlock], 0
-	test	al, al
-	jz	@f
+        jnc     @f
-	call	change_task
+        call    change_task
-	jmp	@b
+        jmp     @b
 @@:
-	mov	eax, [CURRENT_TASK]
+        mov     eax, [CURRENT_TASK]
+        mov     [bgrlockpid], eax
+        cmp     [img_background], static_background_data
-	mov	[bgrlockpid], eax
+        jz      .nomem
-	stdcall user_alloc, [mem_BACKGROUND]
+        stdcall user_alloc, [mem_BACKGROUND]
-	mov	[esp+32], eax
+        mov     [esp+32], eax
-	test	eax, eax
+        test    eax, eax
-	jz	.nomem
+        jz      .nomem
 nogb1:
-    cmp   eax,2 				 ; PIXEL
+    cmp   eax,2                                  ; PIXEL
+    jnz   nogb2
+        mov     eax, [img_background]
+        test    ebx, ebx
+        jz      @f
+        cmp     eax, static_background_data
-    jnz   nogb2
+        jz      .ret
 @@:
     mov ecx, [mem_BACKGROUND]
     add ecx, 4095
     and ecx, -4096
     sub ecx, 4
-    cmp ebx, ecx
-    ja	@F
+    cmp ebx, ecx
     ja  .ret
     mov   eax,[img_background]
     mov   eax,[ebx+eax]
     and   eax, 0xFFFFFF
     mov   [esp+36],eax
-@@:
+.ret:
     mov   [edi+WDATA.box.left],ebx
     mov   [edi+WDATA.box.top],ecx
-    call  check_window_position
-    call  set_window_clientbox
+    call  check_window_position
-    push  ecx esi edi		    ; save for window fullscreen/resize
+    push  ecx esi edi               ; save for window fullscreen/resize
     ;mov   esi,edi
-    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
+  newd:
     call  set_window_clientbox
   newd:
-    mov   [edi+WDATA.fl_redraw],byte 0	 ; no redraw
+    mov   [edi+WDATA.fl_redraw],byte 0   ; no redraw
-	 ret
+         ret
-calculatebackground:   ; background
-	; all black
-	mov   edi, [img_background]  ;IMG_BACKGROUND                 ; set background to black
-	xor   eax, eax
-	mov   ecx, 1023    ;0x0fff00 / 4
 	cld
-	rep   stosd
+calculatebackground:   ; background
-	mov   edi,display_data		    ; set os to use all pixels
+        mov   edi,display_data              ; set os to use all pixels
-	ret
+        ret
+set_app_param:
-set_app_param:
+        mov     edi, [TASK_BASE]
+        mov     eax, [edi + TASKDATA.event_mask]
-	mov	edi, [TASK_BASE]
+        mov     [edi + TASKDATA.event_mask], ebx
-	mov	[edi + TASKDATA.event_mask], ebx
+        mov     [esp+32], eax
      cli
      ret
 if used _rdtsc
 _rdtsc:
      bt [cpu_caps], CAPS_TSC
      jnc ret_rdtsc
      rdtsc
      ret
    ret_rdtsc:
+     mov   edx,0xffffffff
-     mov   edx,0xffffffff
+     mov   eax,0xffffffff
-     mov   eax,0xffffffff
+     ret
-apm_vf	      dd    0
+apm_vf        dd    0
 align 4
 sys_apm:
     cmp    word [apm_vf], 0    ; Check APM BIOS enable
     jne    @f
-    or	  [esp + 56], byte 1	; error
+    or     [esp + 48], byte 1    ; error
-    mov    [esp + 36], dword 8	  ; 32-bit protected-mode interface not supported
+    mov    [esp + 36], dword 8    ; 32-bit protected-mode interface not supported
     ret
 @@:
     xchg    eax, ecx
     xchg    ebx, ecx
     cmp    al, 3
-    ja	  @f
+    ja    @f
-    and    [esp + 56], byte 0xfe    ; emulate func 0..3 as func 0
+    and    [esp + 48], byte 0xfe    ; emulate func 0..3 as func 0
     mov    eax, [apm_vf]
     mov    [esp + 36], eax
     shr    eax, 16
     mov    [esp + 24], ebx
     mov    [esp + 28], edx
     mov    [esp + 32], ecx
     mov    [esp + 36], eax
-    setc    al
+    setc   al
-    and    [esp + 56], byte 0xfe
+    and    [esp + 48], byte 0xfe
-    or	  [esp + 56], al
+    or     [esp + 48], al
-	   mov al, 0xFF
+           mov al, 0xFF
-	   out 0x21, al
+           out 0x21, al
-	   out 0xA1, al
+           out 0xA1, al
-if 1
+if 0
-	   mov	word [OS_BASE+0x467+0],pr_mode_exit
+           mov  word [OS_BASE+0x467+0],pr_mode_exit
-	   mov	word [OS_BASE+0x467+2],0x1000
+           mov  word [OS_BASE+0x467+2],0x1000
-	   mov	al,0xFE
+           mov  al,0xFE
-	   out	0x64,al
+           out  0x64,al
            hlt
-	   hlt
+           jmp $-1
-	jz	.fadt_found
+        jz      .fadt_found
-	loop	.scan_fadt
+        loop    .scan_fadt
-	jmp	no_acpi_power_off
+        jmp     no_acpi_power_off
 .fadt_found:
 ; ebx is linear address of FADT
+        mov     edi, [ebx+40] ; physical address of the DSDT
+        lea     eax, [ebp+4000h]
+        stdcall map_page, eax, edi, PG_MAP
+        lea     eax, [ebp+5000h]
+        lea     esi, [edi+0x1000]
+        stdcall map_page, eax, esi, PG_MAP
+        and     esi, 0xFFF
+        sub     edi, esi
+        cmp     dword [esi+ebp+4000h], 'DSDT'
+        jnz     no_acpi_power_off
+        mov     eax, [esi+ebp+4004h] ; DSDT length
+        sub     eax, 36+4
+        jbe     no_acpi_power_off
+        add     esi, 36
+.scan_dsdt:
+        cmp     dword [esi+ebp+4000h], '_S5_'
+        jnz     .scan_dsdt_cont
+        cmp     byte [esi+ebp+4000h+4], 12h ; DefPackage opcode
+        jnz     .scan_dsdt_cont
+        mov     dl, [esi+ebp+4000h+6]
+        cmp     dl, 4 ; _S5_ package must contain 4 bytes
+                      ; ...in theory; in practice, VirtualBox has 2 bytes
+        ja      .scan_dsdt_cont
+        cmp     dl, 1
+        jb      .scan_dsdt_cont
+        lea     esi, [esi+ebp+4000h+7]
+        xor     ecx, ecx
+        cmp     byte [esi], 0 ; 0 means zero byte, 0Ah xx means byte xx
+        jz      @f
+        cmp     byte [esi], 0xA
+        jnz     no_acpi_power_off
+        inc     esi
+        mov     cl, [esi]
+@@:
+        inc     esi
+        cmp     dl, 2
+        jb      @f
+        cmp     byte [esi], 0
+        jz      @f
+        cmp     byte [esi], 0xA
+        jnz     no_acpi_power_off
+        inc     esi
+        mov     ch, [esi]
+@@:
+        jmp     do_acpi_power_off
+.scan_dsdt_cont:
+        inc     esi
+        cmp     esi, 0x1000
+        jb      @f
+        sub     esi, 0x1000
+        add     edi, 0x1000
+        push    eax
+        lea     eax, [ebp+4000h]
+        stdcall map_page, eax, edi, PG_MAP
+        push    PG_MAP
+        lea     eax, [edi+1000h]
+        push    eax
+        lea     eax, [ebp+5000h]
+        push    eax
+        stdcall map_page
+        pop     eax
+@@:
+        dec     eax
+        jnz     .scan_dsdt
+        jmp     no_acpi_power_off
+do_acpi_power_off:
-	mov	edx, [ebx+48]
+        mov     edx, [ebx+48]
-	test	edx, edx
+        test    edx, edx
-	jz	.nosmi
+        jz      .nosmi
-	mov	al, [ebx+52]
+        mov     al, [ebx+52]
-	out	dx, al
+        out     dx, al
 @@:
-	in	ax, dx
+        in      ax, dx
-	test	al, 1
+        test    al, 1
-	jz	@b
+        jz      @b
 .nosmi:
+        and     cx, 0x0707
+        shl     cx, 2
+        or      cx, 0x2020
-	mov	edx, [ebx+64]
+        mov     edx, [ebx+64]
-	in	ax, dx
+        in      ax, dx
-	and	ax, 203h
+        and     ax, 203h
-	or	ax, 3C00h
+        or      ah, cl
-	out	dx, ax
+        out     dx, ax
-	mov	edx, [ebx+68]
+        mov     edx, [ebx+68]
-	test	edx, edx
+        test    edx, edx
-	jz	@f
+        jz      @f
-	in	ax, dx
+        in      ax, dx
-	and	ax, 203h
+        and     ax, 203h
-	or	ax, 3C00h
+        or      ah, ch
-	out	dx, ax
+        out     dx, ax
 @@:
-	jmp	$
+        jmp     $
-	   mov	al,0xFE
+           mov  al,0xFE
-	   out	0x64,al
+           out  0x64,al
            hlt
-	   hlt
+           jmp $-1
 scan_rsdp:
 __REV__ = __REV
-uglobals_size = $ - endofcode

Subversion Repositories Kolibri OS

(root)/kernel/branches/net/kernel.asm – Rev 1196 → 1198