| 0,0 → 1,643 |
|---|
| ;----------------------------------------------------------------------------- |
| ;///// PART OF ATi RADEON 9000 DRIVER //////////////////////////////////////// |
| ;----------------------------------------------------------------------------- |
| ; Copyright (c) 2004, mike.dld |
| ; Using BeOS driver - Copyright (c) 2002, Thomas Kurschel |
| ;----------------------------------------------------------------------------- |
| ; THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| ; IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| ; FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE |
| ; AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| ; LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
| ; FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER |
| ; DEALINGS IN THE SOFTWARE. |
| ;----------------------------------------------------------------------------- |
| |
| DRIVER_CODE_START: |
| |
| ;----------------------------------------------------------------------------- |
| |
| include 'normal.inc' |
| include 'clipping.asm' |
| |
| ;----------------------------------------------------------------------------- |
| |
| struct graph_funcs |
| draw_line dd ? |
| disable_mouse dd ? |
| draw_pointer dd ? |
| draw_mouse_under dd ? |
| drawbar dd ? |
| putpixel dd ? |
| getpixel dd ? |
| sys_putimage dd ? |
| drawbackground dd ? |
| calculatescreen dd ? |
| setscreen dd ? |
| ends |
| |
| SF graph_funcs |
| |
| call_cnt dd 0 |
| viewport RECT |
| |
| set_bank dd set_bank1 |
| setbnk dd set_bank0,set_bank1,set_s3_bank,set_bank3 |
| |
| virtual at esi |
| rr RECT |
| end virtual |
| |
| virtual at 0x00010008 |
| GF graph_funcs |
| end virtual |
| |
| ;----------------------------------------------------------------------------- |
| |
| CLIP_RECTS = 0x00720000 ; 0x00780000 |
| bg_address = 0x300000 |
| |
| ;label bg_bytes_per_scanline dword at 0x600000-16;0x460000-16 |
| ;label bg_type dword at 0x600000-12;0x460000-12 |
| ;label bg_width dword at 0x600000-8;0x460000-8 |
| ;label bg_height dword at 0x600000-4;0x460000-4 |
| |
| label bg_bytes_per_scanline dword at 0x460000-16 |
| label bg_type dword at 0x460000-12 |
| label bg_width dword at 0x460000-8 |
| label bg_height dword at 0x460000-4 |
| |
| label lfb_address dword at 0x0000FE80 |
| label mouse_invisible dword at 0x0000F204 |
| |
| label screen_width dword at 0x0000FE00 |
| label screen_height dword at 0x0000FE04 |
| label bytes_per_scanline dword at 0x0000FE08 |
| |
| BGT_TILE = 1 |
| BGT_STRETCH = 2 |
| |
| ;----------------------------------------------------------------------------- |
| |
| CRTC_INDX equ 3D4h |
| |
| func vm_mike_init |
| begin |
| ; jif dword[mdrvm],e,0,.exit |
| mov eax,[0x00010004] |
| jif eax,e,'ENUE',.exit |
| jif [call_cnt],a,0,.exit.2 |
| add eax, 0x00010000 |
| mov [systlb],eax |
| |
| ; SHFLOW 'System funcs table offset: 0x%x',eax |
| |
| ;-------------------------------------- |
| |
| mov esi,0x00010008 |
| mov edi,SF |
| mov ecx,sizeof.graph_funcs/4 |
| cld |
| rep movsd |
| |
| ; push dword[0x00003000] |
| ; mov dword[0x00003000],1 |
| ; call [SF.disable_mouse] |
| ; pop dword[0x00003000] |
| |
| mov [viewport.left],0 |
| mov [viewport.top],0 |
| m2m [viewport.right],[0x0000FE00] |
| m2m [viewport.bottom],[0x0000FE04] |
| |
| movzx eax,byte[0xE035] |
| cmp byte[0xE034],'2' |
| jb @f |
| mov al,0 |
| @@: mov eax,[setbnk+eax*4] |
| mov [set_bank],eax |
| |
| mov al,[0xFBF1] |
| cmp al,32 |
| jne @f |
| |
| ; SHFLOW 'Driver initialized in 32-bit mode' |
| |
| mov [GF.draw_line],vm_mike_draw_line.32 |
| ;; mov [GF.disable_mouse],vm_mike_disable_mouse.32 |
| ;; mov [GF.draw_pointer],vm_mike_draw_pointer.32 |
| mov [GF.drawbar],vm_mike_draw_rect.32 |
| mov [GF.putpixel],vm_mike_put_pixel.32 |
| mov [GF.getpixel],vm_mike_get_pixel.32 |
| mov [GF.sys_putimage],vm_mike_put_image.32 |
| mov [GF.drawbackground],vm_mike_draw_bg.32 |
| |
| jmp .exit.2 |
| |
| @@: cmp al,24 |
| jne @f |
| |
| ; SHFLOW 'Driver initialized in 24-bit mode' |
| |
| mov [GF.draw_line],vm_mike_draw_line.24 |
| ; mov [GF.disable_mouse],vm_mike_disable_mouse.24 |
| ; mov [GF.draw_pointer],vm_mike_draw_pointer.24 |
| mov [GF.drawbar],vm_mike_draw_rect.24 |
| mov [GF.putpixel],vm_mike_put_pixel.24 |
| mov [GF.getpixel],vm_mike_get_pixel.24 |
| mov [GF.sys_putimage],vm_mike_put_image.24 |
| mov [GF.drawbackground],vm_mike_draw_bg.24 |
| |
| jmp .exit.2 |
| |
| @@: cmp al,16 |
| jne @f |
| |
| ; SHFLOW 'Driver initialized in 16-bit mode' |
| |
| mov [GF.draw_line],vm_mike_draw_line.16 |
| ; mov [GF.disable_mouse],vm_mike_disable_mouse.16 |
| ; mov [GF.draw_pointer],vm_mike_draw_pointer.16 |
| mov [GF.drawbar],vm_mike_draw_rect.16 |
| mov [GF.putpixel],vm_mike_put_pixel.16 |
| mov [GF.getpixel],vm_mike_get_pixel.16 |
| mov [GF.sys_putimage],vm_mike_put_image.16 |
| mov [GF.drawbackground],vm_mike_draw_bg.16 |
| |
| jmp .exit.2 |
| |
| @@: cmp al,15 |
| jne @f |
| |
| ; SHFLOW 'Driver initialized in 15-bit mode' |
| |
| mov [GF.draw_line],vm_mike_draw_line.15 |
| ; mov [GF.disable_mouse],vm_mike_disable_mouse.15 |
| ; mov [GF.draw_pointer],vm_mike_draw_pointer.15 |
| mov [GF.drawbar],vm_mike_draw_rect.15 |
| mov [GF.putpixel],vm_mike_put_pixel.15 |
| mov [GF.getpixel],vm_mike_get_pixel.15 |
| mov [GF.sys_putimage],vm_mike_put_image.15 |
| mov [GF.drawbackground],vm_mike_draw_bg.15 |
| |
| jmp .exit.2 |
| |
| @@: cmp al,8 |
| jne @f |
| |
| ; SHFLOW 'Driver initialized in 8-bit mode' |
| |
| call setup_palette_8 |
| |
| mov [GF.draw_line],vm_mike_draw_line.08 |
| ; mov [GF.disable_mouse],vm_mike_disable_mouse.08 |
| ; mov [GF.draw_pointer],vm_mike_draw_pointer.08 |
| mov [GF.drawbar],vm_mike_draw_rect.08 |
| mov [GF.putpixel],vm_mike_put_pixel.08 |
| mov [GF.getpixel],vm_mike_get_pixel.08 |
| mov [GF.sys_putimage],vm_mike_put_image.08 |
| mov [GF.drawbackground],vm_mike_draw_bg.08 |
| |
| jmp .exit.2 |
| |
| @@: cmp al,4 |
| jne .exit |
| |
| ; SHFLOW 'Driver initialized in 4-bit mode' |
| |
| mov [GF.draw_line],vm_mike_draw_line.04 |
| ; mov [GF.disable_mouse],vm_mike_disable_mouse.04 |
| ; mov [GF.draw_pointer],vm_mike_draw_pointer.04 |
| mov [GF.drawbar],vm_mike_draw_rect.04 |
| mov [GF.putpixel],vm_mike_put_pixel.04 |
| mov [GF.getpixel],vm_mike_get_pixel.04 |
| mov [GF.sys_putimage],vm_mike_put_image.04 |
| mov [GF.drawbackground],vm_mike_draw_bg.04 |
| |
| ;-------------------------------------- |
| |
| .exit.2: |
| |
| mov [GF.calculatescreen],vm_mike_calculatescreen |
| mov [GF.setscreen],vm_mike_setscreen |
| |
| inc [call_cnt] |
| xor eax,eax |
| .exit.3: |
| retn |
| .exit: |
| xor eax,eax |
| dec eax |
| retn |
| endf |
| |
| func vm_mike_calculatescreen |
| begin |
| ; call [SF.calculatescreen] |
| .direct: |
| pushad |
| cli |
| movzx ecx,word[0x00003004] ; number of processes |
| lea edi,[CLIP_RECTS+ecx*4+4] |
| push dword[0x00003000] |
| xor eax,eax |
| .next_window: |
| inc eax |
| push ecx ebx eax edi |
| mov [0x00003000],ax |
| call calc_clipping_rects |
| pop edi eax ebx |
| mov [CLIP_RECTS+eax*4],edi |
| mov [edi],ecx |
| add edi,4 |
| shl ecx,2 |
| rep movsd |
| pop ecx |
| loop .next_window |
| pop dword[0x00003000] |
| sti |
| popad |
| ret |
| endf |
| |
| func vm_mike_setscreen |
| begin |
| ; call [SF.setscreen] |
| call vm_mike_calculatescreen.direct |
| ret |
| endf |
| |
| func vm_mike_uninit |
| begin |
| ; jif dword[mdrvm],e,0,.exit |
| jif [call_cnt],nz,,.exit.2,dec |
| mov esi,SF |
| mov edi,GF |
| mov ecx,sizeof.graph_funcs/4 |
| rep movsd |
| .exit.2: |
| xor eax,eax |
| retn |
| .exit: |
| xor eax,eax |
| dec eax |
| retn |
| endf |
| |
| ;----------------------------------------------------------------------------- |
| |
| include 'norm_04.inc' |
| include 'norm_08.inc' |
| include 'norm_15.inc' |
| include 'norm_16.inc' |
| include 'norm_24.inc' |
| include 'norm_32.inc' |
| |
| ;----------------------------------------------------------------------------- |
| |
| func is_intersect_rc |
| begin |
| jif ecx,l,[tr.left],.exit |
| jif edx,l,[tr.top],.exit |
| jif ebx,ge,[tr.bottom],.exit |
| jif eax,ge,[tr.right],.exit |
| clc |
| ret |
| .exit: |
| stc |
| ret |
| endf |
| |
| func is_intersect_hln |
| begin |
| jif edx,l,[tr.left],.exit |
| jif eax,l,[tr.top],.exit |
| jif eax,ge,[tr.bottom],.exit |
| jif ebx,ge,[tr.right],.exit |
| clc |
| ret |
| .exit: |
| stc |
| ret |
| endf |
| |
| func is_intersect_vln |
| begin |
| jif eax,l,[tr.left],.exit |
| jif edx,l,[tr.top],.exit |
| jif ebx,ge,[tr.bottom],.exit |
| jif eax,ge,[tr.right],.exit |
| clc |
| ret |
| .exit: |
| stc |
| ret |
| endf |
| |
| func is_intersect_pt |
| begin |
| jif eax,l,[tr.left],.exit |
| jif ebx,l,[tr.top],.exit |
| jif ebx,ge,[tr.bottom],.exit |
| jif eax,ge,[tr.right],.exit |
| clc |
| ret |
| .exit: |
| stc |
| ret |
| endf |
| |
| func get_cursor_rect |
| begin |
| push eax |
| movsx eax,word[0x0000FB0A] |
| mov [tr.left],eax |
| add eax,31 |
| mov [tr.right],eax |
| movsx eax,word[0x0000FB0C] |
| mov [tr.top],eax |
| add eax,31 |
| mov [tr.bottom],eax |
| pop eax |
| ret |
| endf |
| |
| ;----------------------------------------------------------------------------- |
| |
| gamma_4_0 = 0x00 |
| gamma_4_1 = 0x1F |
| gamma_4_2 = 0x2F |
| gamma_4_3 = 0x3F |
| |
| align 16 |
| palette_8_64 rb 256*3 |
| palette_8_256 rb 256*3 |
| |
| rept 4 red:0 |
| { |
| \rept 4 green:0 |
| \{ |
| \\rept 4 blue:0 |
| \\{ |
| index = ((red shl 4) or (green shl 2) or blue)*3 |
| store gamma_4_ #red at palette_8_64+index+0 |
| store gamma_4_ \#green at palette_8_64+index+1 |
| store gamma_4_\\#blue at palette_8_64+index+2 |
| store gamma_4_ #red *4+red at palette_8_256+index+0 |
| store gamma_4_ \#green*4+green at palette_8_256+index+1 |
| store gamma_4_\\#blue *4+blue at palette_8_256+index+2 |
| \\} |
| \} |
| } |
| |
| ;rept 64 clr1:0 |
| ;{ |
| ; index = clr1*3+64*3 |
| ; clr2 = clr*4+(clr shr 4) |
| ; store clr1 at palette_8_64 +index |
| ; store clr2 at palette_8_256+index |
| ; index = index + 64*3 + 1 |
| ; store clr1 at palette_8_64 +index |
| ; store clr2 at palette_8_256+index |
| ; index = index + 64*3 + 1 |
| ; store clr1 at palette_8_64 +index |
| ; store clr2 at palette_8_256+index |
| ;} |
| |
| func setup_palette_8 |
| begin |
| mov edx,0x03C8 |
| xor al,al |
| out dx,al |
| mov ecx,256*3 |
| mov edx,0x03C9 |
| mov esi,palette_8_64 |
| cld |
| rep outsb |
| ret |
| endf |
| |
| ;----------------------------------------------------------------------------- |
| |
| func set_bank0 |
| begin |
| mov ebp,[esp+4*1] |
| ret |
| endf |
| |
| |
| ; i810/i815 |
| ; by Protopopius |
| func set_bank1 |
| begin |
| cli |
| push eax edx |
| mov eax,[esp+4*3] |
| mov ebp,eax |
| shr eax,16 |
| sub al,0x0A |
| cmp al,[0xfff2] |
| je .exit |
| mov [0xfff2],al |
| |
| 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 |
| |
| .exit: |
| and ebp,0x0000FFFF |
| add ebp,0x000A0000 |
| pop edx eax |
| sti |
| ret |
| endf |
| |
| |
| ; S3 |
| ; by kmeaw |
| func set_bank2 |
| begin |
| cli |
| push eax edx ecx |
| mov eax,[esp+4*4] |
| mov ebp,eax |
| shr eax,16 |
| sub al,0x0A |
| cmp al,[0xfff2] |
| je .exit |
| mov [0xfff2],al |
| |
| mov cl,al |
| mov dx,0x3D4 |
| mov al,0x38 |
| out dx,al |
| inc dx |
| mov al,0x48 |
| out dx,al |
| dec dx |
| mov al,0x31 |
| out dx,al |
| 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 |
| 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 |
| 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 |
| |
| .exit: |
| and ebp,0x0000FFFF |
| add ebp,0x000A0000 |
| pop ecx edx eax |
| sti |
| ret |
| endf |
| |
| |
| ; from http://my.execpc.com/CE/AC/geezer/os/slfb.asm |
| func set_s3_bank |
| begin |
| cli |
| push eax edx |
| mov eax,[esp+4*3] |
| mov ebp,eax |
| shr eax,16 |
| sub al,0x0A |
| cmp al,[0xfff2] |
| je .exit |
| mov [0xfff2],al |
| |
| mov ah,al |
| ; grrrr...mode-set locked the S3 registers, so unlock them again |
| ; xxx - do this after mode-set |
| mov dx,CRTC_INDX |
| mov al,38h |
| out dx,al |
| inc edx |
| mov al,48h |
| out dx,al |
| dec edx |
| mov al,39h |
| out dx,al |
| inc edx |
| mov al,0A5h |
| out dx,al |
| ; now: do the bank-switch |
| mov dx,CRTC_INDX |
| mov al,35h |
| out dx,al |
| inc edx |
| in al,dx |
| and al,0F0h |
| or al,ah |
| out dx,al |
| |
| .exit: |
| and ebp,0x0000FFFF |
| add ebp,0x000A0000 |
| pop edx eax |
| sti |
| ret |
| endf |
| |
| |
| func set_bank3 |
| begin |
| cli |
| push eax edx |
| mov eax,[esp+4*3] |
| mov ebp,eax |
| shr eax,16 |
| sub al,0x0A |
| cmp al,[0xfff2] |
| je .exit |
| mov [0xfff2],al |
| |
| 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 |
| |
| .exit: |
| and ebp,0x0000FFFF |
| add ebp,0x000A0000 |
| pop edx eax |
| sti |
| ret |
| endf |
| |
| ;----------------------------------------------------------------------------- |
| |
| DRIVER_CODE_END: |
| |
| diff10 'driver code size',DRIVER_CODE_START,DRIVER_CODE_END |
| |
| ;----------------------------------------------------------------------------- |
| ;///// END /////////////////////////////////////////////////////////////////// |
| ;----------------------------------------------------------------------------- |
| Property changes: |
|---|
| Added: svn:executable |
|---|
| +* |
|---|
| \ No newline at end of property |
|---|