WebSVN – Kolibri OS – Diff – /kernel/branches/Kolibri-acpi/kernel.asm

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
-;; Copyright (C) KolibriOS team 2004-2012. All rights reserved.
+;; Copyright (C) KolibriOS team 2004-2013. All rights reserved.
 ;; PROGRAMMING:
 ;; Ivan Poddubny
 ;; Marat Zakiyanov (Mario79)
 ;; VaStaNi
 ;; Trans
 format binary as "mnt"
 include 'macros.inc'
 include 'struct.inc'
-$Revision: 3725 $
+$Revision: 3908 $
-USE_COM_IRQ     equ 1      ; make irq 3 and irq 4 available for PCI devices
-VESA_1_2_VIDEO  equ 0      ; enable vesa 1.2 bank switch functions
 USE_COM_IRQ     equ 1      ; make irq 3 and irq 4 available for PCI devices
-; Enabling the next line will enable serial output console
+VESA_1_2_VIDEO  equ 0      ; enable vesa 1.2 bank switch functions
 ;debug_com_base  equ 0x3f8  ; 0x3f8 is com1, 0x2f8 is com2, 0x3e8 is com3, 0x2e8 is com4, no irq's are used
-; The following constant, if nonzero, duplicates debug output to the screen.
+; Enabling the next line will enable serial output console
-debug_direct_print equ 0
+;debug_com_base  equ 0x3f8  ; 0x3f8 is com1, 0x2f8 is com2, 0x3e8 is com3, 0x2e8 is com4, no irq's are used
+include "proc32.inc"
+include "kglobals.inc"
+include "lang.inc"
+include "encoding.inc"
+include "const.inc"
 iglobal
-include "proc32.inc"
+; The following variable, if equal to 1, duplicates debug output to the screen.
-include "kglobals.inc"
-include "lang.inc"
+debug_direct_print db 0
-include "encoding.inc"
+; Start the first app (LAUNCHER) after kernel is loaded? (1=yes, 2 or 0=no)
 launcher_start db 1
-include "const.inc"
+endg
 max_processes    equ   255
         shr     ecx, 2
         rep stosd
-; SAVE & CLEAR 0-0xffff
-        xor     esi, esi
-        mov     edi, (BOOT_VAR-OS_BASE)
-        mov     ecx, 0x10000 / 4
+; SAVE & CLEAR 0-0xffff
-        rep movsd
+        mov     edi, 0x1000
+        mov     ecx, 0x8000 / 4
+        rep stosd
-        mov     edi, 0x1000
+        mov     edi, 0xa000
-        mov     ecx, 0xf000 / 4
+        mov     ecx, 0x6000 / 4
         rep stosd
         call    mutex_init
         mov     ecx, application_table_mutex
+        call    mutex_init
+        mov     ecx, ide_mutex
+        call    mutex_init
+        mov     ecx, ide_channel1_mutex
+        call    mutex_init
+        mov     ecx, ide_channel2_mutex
         call    mutex_init
+;-----------------------------------------------------------------------------
+; SAVE REAL MODE VARIABLES
 ;-----------------------------------------------------------------------------
+save_variables_IDE_controller:
+        xor     eax, eax
+        mov     ax, [BOOT_VARS + BOOT_IDE_INTERR_16]
-; SAVE REAL MODE VARIABLES
+        mov     [IDE_Interrupt], ax
-        xor     eax, eax
+;--------------------------------------
+        mov     ax, [BOOT_VARS + BOOT_IDE_PI_16]
-        mov     ax, [BOOT_VAR + BOOT_IDE_PI_16]
+        mov     [IDEContrProgrammingInterface], ax
-        mov     [IDEContrProgrammingInterface], ax
+;--------------------------------------
+        mov     ax, [BOOT_VARS + BOOT_IDE_BASE_ADDR]
-        mov     ax, [BOOT_VAR + BOOT_IDE_BASE_ADDR]
+        mov     [IDEContrRegsBaseAddr], ax
-        mov     [IDEContrRegsBaseAddr], ax
-        mov     ax, [BOOT_VAR + BOOT_IDE_BAR0_16]
-        mov     [IDE_BAR0_val], ax
+;--------------------------------------
         mov     ax, [BOOT_VARS + BOOT_IDE_BAR0_16]
-        cmp     ax, 0
-        je      @f
+        cmp     ax, 0
+        je      @f
         cmp     ax, 1
+        jne     .no_PATA_BAR0
+@@:
+        mov     ax, 0x1F0
-        je      @f
+        jmp     @f
+.no_PATA_BAR0:
         and     ax, 0xFFFC
-        and     ax, 0xfff0
+@@:
         mov     [StandardATABases], ax
+        mov     [hd_address_table], eax
+        mov     [hd_address_table+8], eax
+        mov     [IDE_BAR0_val], ax
+;--------------------------------------
+        mov     ax, [BOOT_VARS + BOOT_IDE_BAR1_16]
+        cmp     ax, 0
+        je      @f
+        cmp     ax, 1
+        jne     .no_PATA_BAR1
+@@:
+        mov     ax, 0x3F4
+        jmp     @f
-        mov     [hd_address_table], eax
+.no_PATA_BAR1:
-        mov     [hd_address_table+8], eax
-@@:
+        and     ax, 0xFFFC
+@@:
-        mov     ax, [BOOT_VAR + BOOT_IDE_BAR1_16]
+        mov     [IDE_BAR1_val], ax
-        mov     [IDE_BAR1_val], ax
-        mov     ax, [BOOT_VAR + BOOT_IDE_BAR2_16]
-        mov     [IDE_BAR2_val], ax
+;--------------------------------------
         mov     ax, [BOOT_VARS + BOOT_IDE_BAR2_16]
-        cmp     ax, 0
-        je      @f
+        cmp     ax, 0
+        je      @f
         cmp     ax, 1
+        jne     .no_PATA_BAR2
+@@:
+        mov     ax, 0x170
-        je      @f
+        jmp     @f
+.no_PATA_BAR2:
         and     ax, 0xFFFC
-        and     ax, 0xfff0
+@@:
         mov     [StandardATABases+2], ax
+        mov     [hd_address_table+16], eax
+        mov     [hd_address_table+24], eax
+        mov     [IDE_BAR2_val], ax
+;--------------------------------------
+        mov     ax, [BOOT_VARS + BOOT_IDE_BAR3_16]
+        cmp     ax, 0
+        je      @f
+        cmp     ax, 1
+        jne     .no_PATA_BAR3
+@@:
+        mov     ax, 0x374
+        jmp     @f
-        mov     [hd_address_table+16], eax
+.no_PATA_BAR3:
-        mov     [hd_address_table+24], eax
-@@:
+        and     ax, 0xFFFC
-        mov     ax, [BOOT_VAR + BOOT_IDE_BAR3_16]
+@@:
         mov     [IDE_BAR3_val], ax
 ; --------------- APM ---------------------
 ; init selectors
-        mov     ebx, [BOOT_VAR+BOOT_APM_ENTRY]        ; offset of APM entry point
+        mov     ebx, [BOOT_VARS+BOOT_APM_ENTRY]        ; offset of APM entry point
-        movzx   eax, word [BOOT_VAR+BOOT_APM_CODE_32] ; real-mode segment base address of
+        movzx   eax, word [BOOT_VARS+BOOT_APM_CODE_32] ; real-mode segment base address of
-                                                      ; protected-mode 32-bit code segment
+                                                                                ; protected-mode 32-bit code segment
-        movzx   ecx, word [BOOT_VAR+BOOT_APM_CODE_16]; real-mode segment base address of
+        movzx   ecx, word [BOOT_VARS+BOOT_APM_CODE_16]; real-mode segment base address of
-                                               ; protected-mode 16-bit code segment
+                                                                                ; protected-mode 16-bit code segment
-        movzx   edx, word [BOOT_VAR+BOOT_APM_DATA_16]; real-mode segment base address of
+        movzx   edx, word [BOOT_VARS+BOOT_APM_DATA_16]; real-mode segment base address of
         mov     [dword apm_data_16 + 4], dl
         mov     dword[apm_entry], ebx
         mov     word [apm_entry + 4], apm_code_32 - gdts
-        mov     eax, [BOOT_VAR + BOOT_APM_VERSION] ; version & flags
+        mov     eax, [BOOT_VARS + BOOT_APM_VERSION] ; version & flags
         mov     [apm_vf], eax
 ; -----------------------------------------
-        mov     al, [BOOT_VAR+BOOT_DMA]            ; DMA access
+        mov     al, [BOOT_VARS+BOOT_DMA]            ; DMA access
         mov     [allow_dma_access], al
-        movzx   eax, byte [BOOT_VAR+BOOT_BPP]      ; bpp
+        movzx   eax, byte [BOOT_VARS+BOOT_BPP]      ; bpp
-        mov     [_display.bpp], eax
+        mov     [_display.bpp], eax
+        mov     [_display.vrefresh], 60
+        mov     al, [BOOT_VARS+BOOT_DEBUG_PRINT]    ; If nonzero, duplicates debug output to the screen
+        mov     [debug_direct_print], al
-        mov     [_display.vrefresh], 60
+        mov     al, [BOOT_VARS+BOOT_LAUNCHER_START] ; Start the first app (LAUNCHER) after kernel is loaded?
         mov     [launcher_start], al
-        movzx   eax, word [BOOT_VAR+BOOT_X_RES]; X max
+        movzx   eax, word [BOOT_VARS+BOOT_X_RES]; X max
         mov     [_display.width], eax
         mov     [display_width_standard], eax
         dec     eax
         mov     [Screen_Max_X], eax
         mov     [screen_workarea.right], eax
-        movzx   eax, word [BOOT_VAR+BOOT_Y_RES]; Y max
+        movzx   eax, word [BOOT_VARS+BOOT_Y_RES]; Y max
         mov     [_display.height], eax
         mov     [display_height_standard], eax
         dec     eax
         mov     [Screen_Max_Y], eax
         mov     [screen_workarea.bottom], eax
-        movzx   eax, word [BOOT_VAR+BOOT_VESA_MODE] ; screen mode
+        movzx   eax, word [BOOT_VARS+BOOT_VESA_MODE] ; screen mode
         mov     dword [SCR_MODE], eax
-;        mov     eax, [BOOT_VAR+0x9014]    ; Vesa 1.2 bnk sw add
+;        mov     eax, [BOOT_VAR+0x9014]             ; Vesa 1.2 bnk sw add
 ;        mov     [BANK_SWITCH], eax
         mov     eax, 640 *4                         ; Bytes PerScanLine
-        cmp     [SCR_MODE], word 0x13       ; 320x200
+        cmp     [SCR_MODE], word 0x13               ; 320x200
         je      @f
-        cmp     [SCR_MODE], word 0x12       ; VGA 640x480
+        cmp     [SCR_MODE], word 0x12               ; VGA 640x480
         je      @f
-        movzx   eax, word[BOOT_VAR+BOOT_PITCH]      ; for other modes
+        movzx   eax, word[BOOT_VARS+BOOT_PITCH]      ; for other modes
 @@:
         mov     [_display.pitch], eax
         mov     eax, [_display.width]
 ; for Qemu or non standart video cards
 ; Unfortunately [BytesPerScanLine] does not always
 ;                             equal to [_display.width] * [ScreenBPP] / 8
         call    calculate_fast_getting_offset_for_LFB
-        mov     esi, BOOT_VAR+0x9080
+        mov     esi, BOOT_VARS+0x9080
         movzx   ecx, byte [esi-1]
         mov     [NumBiosDisks], ecx
         mov     edi, BiosDisksData
         rep movsd
 ; GRAPHICS ADDRESSES
-        mov     eax, [BOOT_VAR+BOOT_LFB]
+        mov     eax, [BOOT_VARS+BOOT_LFB]
         mov     [LFBAddress], eax
 ; Try to Initialize APIC
         call    APIC_init
         mov     esi, boot_enableirq
         call    boot_log
-; Enable timer IRQ (IRQ0) and hard drives IRQs (IRQ14, IRQ15)
+; Enable timer IRQ (IRQ0) and co-processor IRQ (IRQ13)
 ; they are used: when partitions are scanned, hd_read relies on timer
         call    unmask_timer
-        stdcall enable_irq, 2               ; @#$%! PIC
-        stdcall enable_irq, 6               ; FDD
+        stdcall enable_irq, 2               ; @#$%! PIC
-        stdcall enable_irq, 13              ; co-processor
-        stdcall enable_irq, 14
+        stdcall enable_irq, 13              ; co-processor
+        cmp     [IDEContrProgrammingInterface], 0
-        stdcall enable_irq, 15
+        je      @f
+        mov     esi, boot_disabling_ide
+        call    boot_log
+;--------------------------------------
+; Disable IDE interrupts, because the search
+; for IDE partitions is in the PIO mode.
-        mov     esi, boot_enablint_ide
+;--------------------------------------
-        call    boot_log
+.disable_IDE_interrupt:
+; Disable interrupts in IDE controller for PIO
-; Enable interrupts in IDE controller
+        mov     al, 2
-        mov     al, 0
+        mov     dx, [IDE_BAR1_val] ;0x3F4
+        add     dx, 2 ;0x3F6
-        mov     dx, 0x3F6
+        out     dx, al
-        out     dx, al
+        mov     dx, [IDE_BAR3_val] ;0x374
-        mov     dl, 0x76
+        add     dx, 2 ;0x376
+        out     dx, al
-        out     dx, al
+@@:
 ;-----------------------------------------------------------------------------
 ;!!!!!!!!!!!!!!!!!!!!!!!!!!
 ;        mov     esi, boot_detectdisks
 ;        call    boot_log
                 [SLOT_BASE+256+APPDATA.io_map], PG_MAP
         stdcall map_page, tss._io_map_1, \
                 [SLOT_BASE+256+APPDATA.io_map+4], PG_MAP
-; LOAD FIRST APPLICATION
-        cli
-;        cmp   byte [BOOT_VAR+0x9030],1
-;        jne   no_load_vrr_m
-;        mov     ebp, vrr_m
-;        call    fs_execute_from_sysdir
-;
+; LOAD FIRST APPLICATION
-;;        cmp   eax,2                  ; if vrr_m app found (PID=2)
-;       sub   eax,2
+        cmp     byte [launcher_start], 1        ; Check if starting LAUNCHER is selected on blue screen (1 = yes)
-;        jz    first_app_found
-;
+        jnz     first_app_found
 ;no_load_vrr_m:
         cli
-        mov     ebp, firstapp
-        call    fs_execute_from_sysdir
         mov     ebp, firstapp
-;        cmp   eax,2                  ; continue if a process has been loaded
+        call    fs_execute_from_sysdir
         test    eax, eax
         jns     first_app_found
 ;        call  kb_read
      ;// mike.dld [
         call    set_lights
      ;// mike.dld ]
         stdcall attach_int_handler, 1, irq1, 0
+        DEBUGF  1, "K : IRQ1 error code %x\n", eax
 .no_keyboard:
 ; SET MOUSE
         DEBUGF  1, "K : BAR1 %x \n", [IDE_BAR1_val]:4
         DEBUGF  1, "K : BAR2 %x \n", [IDE_BAR2_val]:4
         DEBUGF  1, "K : BAR3 %x \n", [IDE_BAR3_val]:4
         DEBUGF  1, "K : BAR4 %x \n", [IDEContrRegsBaseAddr]:4
         DEBUGF  1, "K : IDEContrProgrammingInterface %x \n", [IDEContrProgrammingInterface]:4
+        DEBUGF  1, "K : IDE_Interrupt %x \n", [IDE_Interrupt]:4
 ; START MULTITASKING
 ; A 'All set - press ESC to start' messages if need
 if preboot_blogesc
         in      al, 0x60        ; wait for ESC key press
         cmp     al, 129
         jne     .bll1
 end if
+        push    eax edx
+        mov     dx, [IDEContrRegsBaseAddr]
+        xor     eax, eax
+        add     dx, 2
+        in      al, dx
+        DEBUGF  1, "K : Primary Bus Master IDE Status Register %x\n", eax
+        add     dx, 8
+        in      al, dx
+        DEBUGF  1, "K : Secondary Bus Master IDE Status Register %x\n", eax
+        pop     edx eax
         cmp     [IDEContrRegsBaseAddr], 0
+        setnz   [dma_hdd]
+        cmp     [IDEContrProgrammingInterface], 0
+        je      set_interrupts_for_IDE_controllers.continue
+        mov     ax, [IDE_Interrupt]
+        cmp     al, 0xff
+        jne     @f
+        mov     [dma_hdd], 0
+        jmp     set_interrupts_for_IDE_controllers.end_set_interrupts
+@@:
+;-----------------------------------------------------------------------------
+; set interrupts for IDE Controller
+;-----------------------------------------------------------------------------
+        mov     esi, boot_set_int_IDE
+        call    boot_log
+set_interrupts_for_IDE_controllers:
+        mov     ax, [IDEContrProgrammingInterface]
+        cmp     ax, 0x0180
+        je      .pata_ide
+        cmp     ax, 0x018a
+        jne     .sata_ide
+;--------------------------------------
+.pata_ide:
+        cmp     [IDEContrRegsBaseAddr], 0
+        je      .end_set_interrupts
+        stdcall attach_int_handler, 14, IDE_irq_14_handler, 0
+        DEBUGF  1, "K : Set IDE IRQ14 return code %x\n", eax
+        stdcall attach_int_handler, 15, IDE_irq_15_handler, 0
+        DEBUGF  1, "K : Set IDE IRQ15 return code %x\n", eax
+        jmp     .enable_IDE_interrupt
+;--------------------------------------
+.sata_ide:
+        cmp     ax, 0x0185
+        je      .sata_ide_1
+        cmp     ax, 0x018f
+        jne     .end_set_interrupts
+;--------------------------------------
+.sata_ide_1:
+        cmp     [IDEContrRegsBaseAddr], 0
+        je      .end_set_interrupts
+        mov     ax, [IDE_Interrupt]
+        movzx   eax, al
+        stdcall attach_int_handler, eax, IDE_common_irq_handler, 0
+        DEBUGF  1, "K : Set IDE IRQ%d return code %x\n", [IDE_Interrupt]:1, eax
+;--------------------------------------
+.enable_IDE_interrupt:
+        mov     esi, boot_enabling_ide
+        call    boot_log
+; Enable interrupts in IDE controller for DMA
+        mov     al, 0
+        mov     dx, [IDE_BAR1_val] ;0x3F4
+        add     dx, 2 ;0x3F6
+        out     dx, al
+        mov     dx, [IDE_BAR3_val] ;0x374
+        add     dx, 2 ;0x376
+        out     dx, al
+;--------------------------------------
-        setnz   [dma_hdd]
+.end_set_interrupts:
 ;-----------------------------------------------------------------------------
         cmp     [dma_hdd], 0
         je      .print_pio
 .print_dma:
 proc osloop_has_work?
         cmp     [osloop_nonperiodic_work], 0
         jnz     .yes
         call    stack_handler_has_work?
         jnz     .yes
-        call    check_fdd_motor_status_has_work?
+;        call    check_fdd_motor_status_has_work?
-        jnz     .yes
+;        jnz     .yes
         call    check_ATAPI_device_event_has_work?
         jnz     .yes
         call    check_lights_state_has_work?
         jnz     .yes
         call    check_timers_has_work?
 .fl60:
         in      al, 0x60
         loop    .fl60
         push    eax
-        mov     ax, [BOOT_VAR+BOOT_Y_RES]
+        mov     ax, [BOOT_VARS+BOOT_Y_RES]
         shr     ax, 1
         shl     eax, 16
-        mov     ax, [BOOT_VAR+BOOT_X_RES]
+        mov     ax, [BOOT_VARS+BOOT_X_RES]
         shr     ax, 1
         mov     [MOUSE_X], eax
         call    wakeup_osloop
         jnz     nsyse5
         mov     [syslang], ecx
         ret
    nsyse5:
-        sub     ebx, 2          ; HD BASE
+        sub     ebx, 2          ; HD BASE - obsolete
-        jnz     nsyse7
-        test    ecx, ecx
-        jz      nosethd
-        cmp     ecx, 4
-        ja      nosethd
-        mov     [hd_base], cl
-        cmp     ecx, 1
-        jnz     noprmahd
-        mov     eax, [hd_address_table]
-        mov     [hdbase], eax    ;0x1f0
-        and     dword [hdid], 0x0
-        mov     dword [hdpos], ecx
-;     call set_FAT32_variables
-   noprmahd:
-        cmp     ecx, 2
-        jnz     noprslhd
-        mov     eax, [hd_address_table]
-        mov     [hdbase], eax  ;0x1f0
-        mov     [hdid], 0x10
-        mov     dword [hdpos], ecx
-;     call set_FAT32_variables
-   noprslhd:
-        cmp     ecx, 3
-        jnz     nosemahd
-        mov     eax, [hd_address_table+16]
-        mov     [hdbase], eax	;0x170
-        and     dword [hdid], 0x0
-        mov     dword [hdpos], ecx
-;     call set_FAT32_variables
-   nosemahd:
-        cmp     ecx, 4
-        jnz     noseslhd
-	mov	eax,[hd_address_table+16]
-        mov     [hdbase], eax	;0x170
-        mov     [hdid], 0x10
-        mov     dword [hdpos], ecx
-;     call set_FAT32_variables
-   noseslhd:
-        call    reserve_hd1
-        call    reserve_hd_channel
-        call    free_hd_channel
+        jnz     nsyse7
         and     dword [hd1_status], 0     ; free
-   nosethd:
-        ret
-iglobal
-hd_base db 0
+   nosethd:
-endg
+        ret
 nsyse7:
-;     cmp  eax,8                      ; HD PARTITION
-        dec     ebx
-        jnz     nsyse8
-        mov     [fat32part], ecx
-;     call set_FAT32_variables
-        call    reserve_hd1
-        call    reserve_hd_channel
-        call    free_hd_channel
 ;       pusha
-        call    choice_necessity_partition_1
+;     cmp  eax,8                      ; HD PARTITION - obsolete
-;       popa
+        dec     ebx
-        and     dword [hd1_status], 0   ; free
+        jnz     nsyse8
         ret
 ngsyse5:
 ;     cmp  eax,7
         sub     ebx, 2
         jnz     ngsyse7
-        movzx   eax, [hd_base]
+        xor     eax, eax
         mov     [esp+32], eax
         ret
 ngsyse7:
 ;     cmp  eax,8
         dec     ebx
 sysfn_shutdown:          ; 18.9 = system shutdown
         cmp     ecx, 1
         jl      exit_for_anyone
         cmp     ecx, 4
         jg      exit_for_anyone
-        mov     [BOOT_VAR+0x9030], cl
+        mov     [BOOT_VARS+0x9030], cl
         mov     eax, [TASK_COUNT]
         mov     [SYS_SHUTDOWN], al
         mov     [shutdown_processes], eax
         pop     ax dx
 end if
+        mov     [msg_board_data+ecx], bl
+; // if debug_direct_print == 1
-        mov     [msg_board_data+ecx], bl
+        cmp     byte [debug_direct_print], 1
-if debug_direct_print
+        jnz     @f
         pusha
 iglobal
-msg_board_pos   dd      234*65536+10
+msg_board_pos   dd      (42*6)*65536+10 ; for printing debug output on the screen
 endg
         lea     edx, [msg_board_data+ecx]
         mov     ecx, 0x40FFFFFF
         call    dtext
         popa
         add     word [msg_board_pos+2], 6
         cmp     bl, 10
         jnz     @f
-        mov     word [msg_board_pos+2], 234
+        mov     word [msg_board_pos+2], (42*6)
         add     word [msg_board_pos], 10
         mov     ax, word [Screen_Max_Y]
         cmp     word [msg_board_pos], ax
         jbe     @f
         mov     word [msg_board_pos], 10
 @@:
-end if
+; // end if
 if 0
         pusha
         mov     al, bl
         mov     edx, 402h
         out     dx, al
         ret
 align 4
 system_shutdown:          ; shut down the system
-        cmp     byte [BOOT_VAR+0x9030], 1
+        cmp     byte [BOOT_VARS+0x9030], 1
         jne     @F
         ret
 @@:
         mov     edi, OS_BASE+0x40000
         mov     ecx, 1000
         rep movsb
 end if
-        mov     esi, BOOT_VAR    ; restore 0x0 - 0xffff
+;        mov     esi, BOOT_VAR    ; restore 0x0 - 0xffff
-        mov     edi, OS_BASE
+;        mov     edi, OS_BASE
-        mov     ecx, 0x10000/4
+;        mov     ecx, 0x10000/4
-        cld
+;        cld
-        rep movsd
+;        rep movsd

Subversion Repositories Kolibri OS

(root)/kernel/branches/Kolibri-acpi/kernel.asm – Rev 3725 → 3908