| 0,0 → 1,973 |
|---|
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| ;; ;; |
| ;; VESA12.INC ;; |
| ;; ;; |
| ;; Vesa 1.2 functions for MenuetOS ;; |
| ;; ;; |
| ;; Copyright 2002 Ville Turjanmaa ;; |
| ;; ;; |
| ;; quickcode@mail.ru - bankswitch for S3 cards ;; |
| ;; ;; |
| ;; See file COPYING for details ;; |
| ;; ;; |
| ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
| |
| |
| ; A complete video driver should include the following types of function |
| ; |
| ; Putpixel |
| ; Getpixel |
| ; |
| ; Drawimage |
| ; Drawbar |
| ; |
| ; Drawbackground |
| ; |
| ; |
| ; Modifying the set_bank -function is mostly enough |
| ; for different Vesa 1.2 setups. |
| |
| ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!{ |
| |
| ; set_bank modified by kmeaw |
| set_bank: |
| cli |
| cmp al,[0xfff2] |
| je retsb |
| mov [0xfff2],al |
| push ax |
| push dx |
| push cx |
| mov cl, al |
| mov dx, 0x3D4 |
| mov al, 0x38 |
| out dx, al ;CR38 Register Lock 1 ;Note: Traditionally 48h is used to |
| ;unlock and 00h to lock |
| inc dx |
| mov al, 0x48 |
| out dx, al ;3d5 -? |
| dec dx |
| mov al, 0x31 |
| out dx, al ;CR31 Memory Configuration Register |
| ;0 Enable Base Address Offset (CPUA BASE). Enables bank operation if set, ;disables if clear. |
| ;4-5 Bit 16-17 of the Display Start Address. For the 801/5,928 see index 51h, |
| ;for the 864/964 see index 69h. |
| |
| inc dx |
| in al, dx |
| dec dx |
| mov ah, al |
| mov al, 0x31 |
| out dx, ax |
| mov al, ah |
| or al, 9 |
| inc dx |
| out dx, al |
| dec dx |
| mov al, 0x35 |
| out dx, al ;CR35 CRT Register Lock |
| inc dx |
| in al, dx |
| dec dx |
| and al, 0xF0 |
| mov ch, cl |
| and ch, 0x0F |
| or ch, al |
| mov al, 0x35 |
| out dx, al |
| inc dx |
| mov al, ch |
| out dx, ax |
| dec dx |
| mov al, 0x51 ;Extended System Control 2 Register |
| out dx, al |
| inc dx |
| in al, dx |
| dec dx |
| and al, 0xF3 |
| shr cl, 2 |
| and cl, 0x0C |
| or cl, al |
| mov al, 0x51 |
| out dx, al |
| inc dx |
| mov al, cl |
| out dx, al |
| dec dx |
| mov al, 0x38 |
| out dx, al |
| inc dx |
| xor al, al |
| out dx, al |
| dec dx |
| pop cx |
| pop dx |
| pop ax |
| retsb: |
| sti |
| ret |
| |
| ;Set bank function for Intel 810/815 chipsets |
| ; *****Modified by Protopopius, Russia.***** |
| ; ********* http://menuetos.hut.ru ************** |
| ; ************************************************ |
| ; |
| ;set_bank: |
| ;cli |
| ;cmp al,[0xfff2] |
| ;je retsb |
| ;mov [0xfff2],al |
| ;push ax |
| ;push dx |
| ;mov dx,3CEh |
| ;mov ah,al ; Save value for later use |
| ;mov al,10h ; Index GR10 (Address Mapping) |
| ;out dx,al ; Select GR10 |
| ;inc dl |
| ;mov al,3 ; Set bits 0 and 1 (Enable linear page mapping) |
| ;out dx,al ; Write value |
| ;dec dl |
| ;mov al,11h ; Index GR11 (Page Selector) |
| ;out dx,al ; Select GR11 |
| ;inc dl |
| ;mov al,ah ; Write address |
| ;out dx,al ; Write the value |
| ;pop dx |
| ;pop ax |
| ;retsb: |
| ;sti |
| ;ret |
| |
| ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!} |
| |
| ;set_bank: |
| ; cli |
| ; cmp al,[0xfff2] |
| ; je retsb |
| ; mov [0xfff2],al |
| ; push ax |
| ; push dx |
| ; mov ah,al |
| ; mov dx,0x03D4 |
| ; mov al,0x39 |
| ; out dx,al |
| ; inc dl |
| ; mov al,0xA5 |
| ; out dx,al |
| ; dec dl |
| ; mov al,6Ah |
| ; out dx,al |
| ; inc dl |
| ; mov al,ah |
| ; out dx,al |
| ; dec dl |
| ; mov al,0x39 |
| ; out dx,al |
| ; inc dl |
| ; mov al,0x5A |
| ; out dx,al |
| ; dec dl |
| ; pop dx |
| ; pop ax |
| ; |
| ; retsb: |
| ; ret |
| |
| |
| vesa12_drawbackground: |
| |
| call [disable_mouse] |
| |
| push eax |
| push ebx |
| push ecx |
| push edx |
| |
| xor edx,edx |
| mov eax,dword[WinMapAddress-8] |
| mov ebx,dword[WinMapAddress-4] |
| mul ebx |
| mov ebx,3 |
| mul ebx |
| mov [imax],eax |
| mov eax,[draw_data+32+0] |
| mov ebx,[draw_data+32+4] |
| mov edi,0 ;no force |
| |
| v12dp3: |
| |
| push eax |
| push ebx |
| mov esi,0x300000 |
| |
| cmp [WinMapAddress-12],dword 1 ; tiled background |
| jne no_vesa12_tiled_bgr |
| |
| push edx |
| |
| xor edx,edx |
| mov ecx,[WinMapAddress-8] |
| div ecx |
| mov eax,edx |
| |
| push eax |
| mov eax,ebx |
| xor edx,edx |
| mov ecx,[WinMapAddress-4] |
| div ecx |
| mov ebx,edx |
| pop eax |
| |
| pop edx |
| |
| no_vesa12_tiled_bgr: |
| |
| cmp [WinMapAddress-12],dword 2 ; stretched background |
| jne no_vesa12_stretched_bgr |
| |
| push edx |
| |
| imul eax,dword [WinMapAddress-8] |
| xor edx,edx |
| mov ecx,[0xfe00] |
| inc ecx |
| div ecx |
| |
| push eax |
| mov eax,ebx |
| imul eax,dword [WinMapAddress-4] |
| xor edx,edx |
| mov ecx,[0xfe04] |
| inc ecx |
| div ecx |
| mov ebx,eax |
| pop eax |
| |
| pop edx |
| |
| no_vesa12_stretched_bgr: |
| |
| |
| push eax |
| mov eax,ebx |
| xor edx,edx |
| mov ebx,[WinMapAddress-8] |
| add ebx,[WinMapAddress-8] |
| add ebx,[WinMapAddress-8] |
| mul ebx |
| mov esi,eax |
| pop eax |
| add esi,eax |
| add esi,eax |
| add esi,eax |
| add esi,0x300000 |
| pop ebx |
| pop eax |
| |
| v12di4: |
| |
| mov ecx,[esi] |
| pusha |
| mov esi,eax |
| mov edi,ebx |
| mov eax,[0xfe00] |
| add eax,1 |
| mul ebx |
| add eax,esi |
| add eax,WinMapAddress |
| cmp [eax],byte 1 |
| jnz v12nbgp |
| mov eax,[0xfe08] |
| mov ebx,edi |
| mul ebx |
| add eax,esi |
| add eax,esi |
| add eax,esi |
| cmp [0xFBF1],byte 24 |
| jz v12bgl3 |
| add eax,esi |
| |
| v12bgl3: |
| |
| push ebx |
| push eax |
| |
| sub eax,[0xfe80] |
| |
| shr eax,16 |
| call set_bank |
| pop eax |
| and eax,65535 |
| add eax,0xa0000 |
| pop ebx |
| |
| mov [eax],cx |
| add eax,2 |
| shr ecx,16 |
| mov [eax],cl |
| sti |
| |
| v12nbgp: |
| |
| popa |
| add esi,3 |
| inc eax |
| cmp eax,[draw_data+32+8] |
| jg v12nodp31 |
| jmp v12dp3 |
| |
| v12nodp31: |
| |
| mov eax,[draw_data+32+0] |
| inc ebx |
| cmp ebx,[draw_data+32+12] |
| jg v12dp4 |
| jmp v12dp3 |
| |
| v12dp4: |
| |
| pop edx |
| pop ecx |
| pop ebx |
| pop eax |
| ret |
| |
| |
| vesa12_drawbar: |
| |
| call [disable_mouse] |
| |
| ;; mov [novesachecksum],dword 0 |
| sub edx,ebx |
| sub ecx,eax |
| push esi |
| push edi |
| push eax |
| push ebx |
| push ecx |
| push edx |
| mov ecx,[0x3010] |
| add eax,[ecx-twdw] |
| add ebx,[ecx-twdw+4] |
| push eax |
| mov eax,ebx ; y |
| mov ebx,[0xfe08] |
| mul ebx |
| pop ecx |
| add eax,ecx ; x |
| add eax,ecx |
| add eax,ecx |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x start |
| jz dbpi2412 |
| add eax,ecx |
| |
| dbpi2412: |
| |
| add eax,[0xfe80] |
| mov edi,eax |
| |
| ; x size |
| |
| mov eax,[esp+4] ; [esp+6] |
| mov ecx,eax |
| add ecx,eax |
| add ecx,eax |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x size |
| jz dbpi24312 |
| add ecx,eax |
| |
| dbpi24312: |
| |
| mov ebx,[esp+0] |
| |
| ; check limits ? |
| |
| push eax |
| push ecx |
| mov eax,[0x3010] |
| mov ecx,[eax+draw_data-0x3000+0] |
| cmp ecx,0 |
| jnz dbcblimitlset12 |
| mov ecx,[eax+draw_data-0x3000+4] |
| cmp ecx,0 |
| jnz dbcblimitlset12 |
| mov ecx,[eax+draw_data-0x3000+8] |
| cmp ecx,[0xfe00] |
| jnz dbcblimitlset12 |
| mov ecx,[eax+draw_data-0x3000+12] |
| cmp ecx,[0xfe04] |
| jnz dbcblimitlset12 |
| pop ecx |
| pop eax |
| push dword 0 |
| jmp dbcblimitlno12 |
| |
| dbcblimitlset12: |
| |
| pop ecx |
| pop eax |
| push dword 1 |
| |
| dbcblimitlno12: |
| |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? |
| jz dbpi24bit12 |
| jmp dbpi32bit12 |
| |
| |
| ; DRAWBAR 24 BBP |
| |
| |
| dbpi24bit12: |
| |
| push eax |
| push ebx |
| push edx |
| mov eax,ecx |
| mov ebx,3 |
| div ebx |
| mov ecx,eax |
| pop edx |
| pop ebx |
| pop eax |
| cld |
| |
| dbnewpi12: |
| |
| push ebx |
| push edi |
| push ecx |
| |
| xor edx,edx |
| mov eax,edi |
| sub eax,[0xfe80] |
| mov ebx,3 |
| div ebx |
| add eax,WinMapAddress |
| mov ebx,[0x3010] |
| movzx ebx,byte[ebx+0xe] |
| cld |
| |
| dbnp2412: |
| |
| mov dl,[eax] |
| push eax |
| push ecx |
| cmp dl,bl |
| jnz dbimp24no12 |
| cmp [esp+5*4],dword 0 |
| jz dbimp24yes12 |
| ; call dbcplimit |
| ; jnz dbimp24no12 |
| |
| dbimp24yes12: |
| |
| push edi |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,16 |
| call set_bank |
| and edi,0xffff |
| add edi,0xa0000 |
| mov eax,[esp+8+3*4+16+4+4] |
| stosw |
| shr eax,16 |
| stosb |
| sti |
| pop edi |
| add edi,3 |
| pop ecx |
| pop eax |
| inc eax |
| loop dbnp2412 |
| jmp dbnp24d12 |
| |
| dbimp24no12: |
| |
| pop ecx |
| pop eax |
| cld |
| add edi,3 |
| inc eax |
| loop dbnp2412 |
| |
| dbnp24d12: |
| |
| mov eax,[esp+3*4+16+4] |
| test eax,0x80000000 |
| jz nodbgl2412 |
| cmp al,0 |
| jz nodbgl2412 |
| dec eax |
| mov [esp+3*4+16+4],eax |
| |
| nodbgl2412: |
| |
| pop ecx |
| pop edi |
| pop ebx |
| add edi,[0xfe08] |
| dec ebx |
| jz dbnonewpi12 |
| jmp dbnewpi12 |
| |
| dbnonewpi12: |
| |
| add esp,7*4 |
| |
| ret |
| |
| |
| ; DRAWBAR 32 BBP |
| |
| |
| dbpi32bit12: |
| |
| cld |
| shr ecx,2 |
| |
| dbnewpi3212: |
| |
| push ebx |
| push edi |
| push ecx |
| |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,2 |
| add eax,WinMapAddress |
| mov ebx,[0x3010] |
| movzx ebx,byte[ebx+0xe] |
| cld |
| |
| dbnp3212: |
| |
| mov dl,[eax] |
| push eax |
| push ecx |
| cmp dl,bl |
| jnz dbimp32no12 |
| cmp [esp+5*4],dword 0 |
| jz dbimp32yes12 |
| ; call dbcplimit |
| ; jnz dbimp32no12 |
| |
| dbimp32yes12: |
| |
| push edi |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,16 |
| call set_bank |
| and edi,0xffff |
| add edi,0xa0000 |
| mov eax,[esp+8+3*4+16+4+4] |
| stosw |
| shr eax,16 |
| stosb |
| sti |
| pop edi |
| add edi,4 |
| inc ebp |
| pop ecx |
| pop eax |
| inc eax |
| loop dbnp3212 |
| jmp dbnp32d12 |
| |
| dbimp32no12: |
| |
| pop ecx |
| pop eax |
| inc eax |
| add edi,4 |
| inc ebp |
| loop dbnp3212 |
| |
| dbnp32d12: |
| |
| mov eax,[esp+12+16+4] |
| test eax,0x80000000 |
| jz nodbgl3212 |
| cmp al,0 |
| jz nodbgl3212 |
| dec eax |
| mov [esp+12+16+4],eax |
| |
| nodbgl3212: |
| |
| pop ecx |
| pop edi |
| pop ebx |
| add edi,[0xfe08] |
| dec ebx |
| jz nodbnewpi3212 |
| jmp dbnewpi3212 |
| |
| nodbnewpi3212: |
| |
| add esp,7*4 |
| ret |
| |
| |
| Vesa12_putpixel24: |
| |
| mov edi,eax ; x |
| mov eax,ebx ; y |
| lea edi,[edi+edi*2] |
| mov ebx,[0xfe08] |
| mul ebx |
| add edi,eax |
| mov eax,edi |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov eax,[esp+28] |
| stosw |
| shr eax,16 |
| mov [edi],al |
| sti |
| ret |
| |
| |
| |
| Vesa12_putpixel32: |
| |
| mov edi,eax ; x |
| mov eax,ebx ; y |
| shl edi,2 |
| mov ebx,[0xfe08] |
| mul ebx |
| add edi,eax |
| mov eax,edi |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov ecx,[esp+28] |
| mov [edi],ecx |
| sti |
| ret |
| |
| |
| Vesa12_getpixel24: |
| |
| mov edi,eax ; x |
| mov eax,ebx ; y |
| lea edi,[edi+edi*2] |
| mov ebx,[0xfe08] |
| mul ebx |
| add edi,eax |
| mov eax,edi |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov ecx,[edi] |
| and ecx,255*256*256+255*256+255 |
| sti |
| ret |
| |
| |
| Vesa12_getpixel32: |
| |
| mov edi,eax ; x |
| mov eax,ebx ; y |
| shl edi,2 |
| mov ebx,[0xfe08] |
| xor edx,edx |
| mul ebx |
| add edi,eax |
| mov eax,edi |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov ecx,[edi] |
| and ecx,255*256*256+255*256+255 |
| sti |
| |
| ret |
| |
| |
| |
| vesa12_putimage: |
| |
| ; mov ebx,image |
| ; mov ecx,320*65536+240 |
| ; mov edx,20*65536+20 |
| |
| call [disable_mouse] |
| |
| mov [novesachecksum],dword 0 |
| push esi |
| push edi |
| push eax |
| push ebx |
| push ecx |
| push edx |
| movzx eax,word [esp+2] |
| movzx ebx,word [esp+0] |
| mov ecx,[0x3010] |
| add eax,[ecx-twdw] |
| add ebx,[ecx-twdw+4] |
| push eax |
| mov eax,ebx ; y |
| mov ebx,[0xfe08] |
| mul ebx |
| pop ecx |
| add eax,ecx ; x |
| add eax,ecx |
| add eax,ecx |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x start |
| jz pi2412 |
| add eax,ecx |
| |
| pi2412: |
| |
| add eax,[0xfe80] |
| mov edi,eax |
| |
| ; x size |
| |
| movzx eax,word [esp+6] |
| mov ecx,eax |
| add ecx,eax |
| add ecx,eax |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? - x size |
| jz pi24312 |
| add ecx,eax |
| |
| pi24312: |
| |
| mov esi,[esp+8] |
| movzx ebx,word [esp+4] |
| |
| ; check limits while draw ? |
| |
| push eax |
| push ecx |
| mov eax,[0x3010] |
| mov ecx,[eax+draw_data-0x3000+0] |
| cmp ecx,0 |
| jnz dbcblimitlset212 |
| mov ecx,[eax+draw_data-0x3000+4] |
| cmp ecx,0 |
| jnz dbcblimitlset212 |
| mov ecx,[eax+draw_data-0x3000+8] |
| cmp ecx,[0xfe00] |
| jnz dbcblimitlset212 |
| mov ecx,[eax+draw_data-0x3000+12] |
| cmp ecx,[0xfe04] |
| jnz dbcblimitlset212 |
| pop ecx |
| pop eax |
| push dword 0 |
| jmp dbcblimitlno212 |
| |
| dbcblimitlset212: |
| |
| pop ecx |
| pop eax |
| push dword 1 |
| |
| dbcblimitlno212: |
| |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? |
| jz pi24bit12 |
| jmp pi32bit12 |
| |
| pi24bit12: |
| |
| cld |
| push eax |
| push ebx |
| push edx |
| xor edx,edx |
| mov eax,ecx |
| mov ebx,3 |
| div ebx |
| mov ecx,eax |
| pop edx |
| pop ebx |
| pop eax |
| |
| newpi12: |
| |
| push edi |
| push esi |
| push ecx |
| push ebx |
| |
| xor edx,edx |
| mov eax,edi |
| sub eax,[0xfe80] |
| mov ebx,3 |
| div ebx |
| add eax,WinMapAddress |
| mov ebx,[0x3010] |
| mov bl,[ebx+0xe] |
| mov bh,[esp+4*4] |
| |
| np2412: |
| |
| cmp bl,[eax] |
| jnz imp24no12 |
| mov edx,[esi] |
| cmp bh,0 |
| jz imp24yes12 |
| ; call dbcplimit |
| ; jnz imp24no12 |
| |
| imp24yes12: |
| |
| push eax |
| push edi |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,16 |
| call set_bank |
| and edi,0xffff |
| add edi,0xa0000 |
| mov [edi],edx |
| shr edx,2 |
| mov [edi+2],dl |
| sti |
| pop edi |
| pop eax |
| |
| imp24no12: |
| |
| inc eax |
| add esi,3 |
| add edi,3 |
| dec ecx |
| jnz np2412 |
| |
| np24d12: |
| |
| pop ebx |
| pop ecx |
| pop esi |
| pop edi |
| |
| add edi,[0xfe08] |
| xor eax,eax |
| mov ax,[esp+4+2+4] |
| lea eax,[eax+eax*2] |
| add esi,eax |
| dec ebx |
| jz nonewpi12 |
| jmp newpi12 |
| |
| nonewpi12: |
| |
| add esp,7*4 |
| mov eax,0 |
| ret |
| |
| |
| pi32bit12: |
| |
| cld |
| shr ecx,2 |
| |
| newpi3212: |
| |
| push edi |
| push esi |
| push ecx |
| push ebx |
| |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,2 |
| add eax,WinMapAddress |
| mov ebx,[0x3010] |
| mov bl,[ebx+0xe] |
| mov bh,[esp+4*4] |
| |
| np3212: |
| |
| cmp bl,[eax] |
| jnz imp32no12 |
| mov edx,[esi] |
| cmp bh,0 |
| jz imp32yes12 |
| ; call dbcplimit |
| ; jnz imp32no12 |
| |
| imp32yes12: |
| |
| push eax |
| push edi |
| mov eax,edi |
| sub eax,[0xfe80] |
| shr eax,16 |
| call set_bank |
| and edi,0xffff |
| add edi,0xa0000 |
| mov [edi],edx |
| sti |
| pop edi |
| pop eax |
| |
| imp32no12: |
| |
| inc eax |
| add esi,3 |
| add edi,4 |
| dec ecx |
| jnz np3212 |
| |
| np32d12: |
| |
| pop ebx |
| pop ecx |
| pop esi |
| pop edi |
| |
| add edi,[0xfe08] |
| movzx eax,word [esp+4+2+4] |
| lea eax,[eax+eax*2] |
| add esi,eax |
| dec ebx |
| jz nonewpi3212 |
| jmp newpi3212 |
| |
| nonewpi3212: |
| |
| add esp,7*4 |
| mov eax,0 |
| ret |
| |
| |
| vesa12_read_screen_pixel: |
| |
| and eax,0x3FFFFF |
| cmp [0xfbf1],byte 24 ; 24 or 32 bpp ? |
| jz v12rsp24 |
| mov edi,eax |
| shl edi,2 |
| mov eax,edi |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov eax,[edi] |
| and eax,0x00ffffff |
| ret |
| v12rsp24: |
| |
| imul eax,3 |
| mov edi,eax |
| shr eax,16 |
| call set_bank |
| and edi,65535 |
| add edi,0xa0000 |
| mov eax,[edi] |
| and eax,0x00ffffff |
| ret |
| |
| |