forked from KolibriOS/kolibrios
6c0fca8971
2) Some corrections for "RAW to RAW" and "Rotate" modules. git-svn-id: svn://kolibrios.org@1958 a494cfbc-eb01-0410-851d-a64ba20cac60
487 lines
9.2 KiB
NASM
487 lines
9.2 KiB
NASM
;*****************************************************************************
|
|
; Scaling RAW image plugin - for zSea image viewer
|
|
; Copyright (c) 2009 - 2011, Marat Zakiyanov aka Mario79, aka Mario
|
|
; All rights reserved.
|
|
;
|
|
; Redistribution and use in source and binary forms, with or without
|
|
; modification, are permitted provided that the following conditions are met:
|
|
; * Redistributions of source code must retain the above copyright
|
|
; notice, this list of conditions and the following disclaimer.
|
|
; * Redistributions in binary form must reproduce the above copyright
|
|
; notice, this list of conditions and the following disclaimer in the
|
|
; documentation and/or other materials provided with the distribution.
|
|
; * Neither the name of the <organization> nor the
|
|
; names of its contributors may be used to endorse or promote products
|
|
; derived from this software without specific prior written permission.
|
|
;
|
|
; THIS SOFTWARE IS PROVIDED BY Marat Zakiyanov ''AS IS'' AND ANY
|
|
; EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
|
|
; WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
|
|
; DISCLAIMED. IN NO EVENT SHALL <copyright holder> BE LIABLE FOR ANY
|
|
; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
|
|
; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
|
|
; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
|
|
; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
|
; SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
;*****************************************************************************
|
|
; Scaling 32b, 24b, 16b, 8b
|
|
|
|
format MS COFF
|
|
|
|
public EXPORTS
|
|
|
|
section '.flat' code readable align 16
|
|
|
|
;include 'macros.inc'
|
|
include '../../../../macros.inc'
|
|
;---------------------------------------------------------------------
|
|
START:
|
|
pushad
|
|
mov edi,dword [esp+56]
|
|
mov esi,dword [esp+52]
|
|
mov edx,dword [esp+48]
|
|
mov ecx,dword [esp+44]
|
|
mov ebx,dword [esp+40]
|
|
mov eax,dword [esp+36]
|
|
mov [pointer],eax
|
|
test bx,bx
|
|
jnz @f
|
|
inc bx
|
|
@@:
|
|
ror ebx,16
|
|
test bx,bx
|
|
jnz @f
|
|
inc bx
|
|
@@:
|
|
rol ebx,16
|
|
mov [new_size],ebx
|
|
mov [start_coordinates],ecx
|
|
mov [scaling_mode],edx
|
|
mov [filtering],esi
|
|
mov [background_color],edi
|
|
mov eax,[eax+4]
|
|
mov [image_file],eax
|
|
|
|
mov esi,[eax+28]
|
|
add esi,eax
|
|
|
|
mov ebx,[eax+20]
|
|
add ebx,eax
|
|
mov [palette],ebx
|
|
|
|
mov ebx,[eax+12]
|
|
mov [resolution],ebx
|
|
cmp ebx,32
|
|
jne @f
|
|
mov ebp,dword START.32
|
|
jmp .1
|
|
@@:
|
|
cmp ebx,24
|
|
jne @f
|
|
mov ebp,dword START.24
|
|
jmp .1
|
|
@@:
|
|
cmp ebx,16
|
|
jne @f
|
|
mov ebp,dword START.16
|
|
jmp .1
|
|
@@:
|
|
cmp ebx,15
|
|
jne @f
|
|
inc ebx
|
|
mov ebp,dword START.16
|
|
jmp .1
|
|
@@:
|
|
cmp ebx,8
|
|
jne @f
|
|
mov ebp,dword START.8
|
|
@@:
|
|
.1:
|
|
shr ebx,3
|
|
mov [bytes_to_pixel],ebx
|
|
|
|
mov ebx,[eax+8]
|
|
mov [y],ebx
|
|
mov ebx,[eax+4]
|
|
mov [x],ebx
|
|
imul ebx,[bytes_to_pixel]
|
|
mov [size_x],ebx
|
|
|
|
mov eax,100
|
|
shl eax,12
|
|
mov ebx,[scaling_mode]
|
|
test ebx,ebx
|
|
jnz @f
|
|
inc ebx
|
|
@@:
|
|
xor edx,edx
|
|
div ebx
|
|
mov [scaling_delta],eax
|
|
|
|
call .get_memory
|
|
cmp [scaling_mode],0
|
|
jne @f
|
|
call .scaling
|
|
jmp .ret_ok
|
|
@@:
|
|
call .scaling_2
|
|
|
|
;---------------------------------------------------------------------
|
|
.ret_ok:
|
|
mcall 68,13,[area_for_x]
|
|
mov ebx,[pointer]
|
|
mov eax,[raw_area]
|
|
mov [ebx+20],eax ; store RAW pointer
|
|
; movzx eax,word [new_size.x1]
|
|
; mov [ebx+24],esi ;eax
|
|
; movzx eax,word [new_size.y1]
|
|
; mov [ebx+28],eax
|
|
; mov eax,[size_x]
|
|
; mov [ebx+32],eax
|
|
; mov eax,[bytes_to_pixel]
|
|
; mov [ebx+36],eax
|
|
; mov eax,[x]
|
|
; mov [ebx+40],eax
|
|
; mov eax,[y]
|
|
; mov [ebx+44],eax
|
|
.exit:
|
|
popad
|
|
ret 24
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.scaling:
|
|
xor ecx,ecx
|
|
.y:
|
|
xor ebx,ebx
|
|
;-------------------------
|
|
.x:
|
|
call ebp
|
|
inc ebx
|
|
cmp bx,[new_size.x1]
|
|
jb .x
|
|
;-------------------------
|
|
inc ecx
|
|
cmp cx,[new_size.y1]
|
|
jb .y
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.scaling_2:
|
|
xor eax,eax
|
|
mov ax,[start_coordinates.y]
|
|
imul eax,[size_x]
|
|
add esi,eax
|
|
xor eax,eax
|
|
mov ax,[start_coordinates.x]
|
|
imul eax,[bytes_to_pixel]
|
|
add esi,eax
|
|
|
|
xor eax,eax
|
|
dec eax
|
|
mov [temp_y],eax
|
|
|
|
xor ecx,ecx
|
|
align 4
|
|
.y_2:
|
|
xor ebx,ebx
|
|
;-------------------------
|
|
align 4
|
|
.x_2:
|
|
call ebp
|
|
inc ebx
|
|
cmp bx,[new_size.x1]
|
|
jb .x_2
|
|
;-------------------------
|
|
inc ecx
|
|
cmp cx,[new_size.y1]
|
|
jb .y_2
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.32:
|
|
push ecx ebx
|
|
call .calculate_pixel
|
|
mov eax,[ecx]
|
|
call .check_filtering_32
|
|
pop ebx ecx
|
|
cld
|
|
stosd
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.24:
|
|
push ecx ebx
|
|
call .calculate_pixel
|
|
mov eax,[ecx]
|
|
call .check_filtering_24
|
|
cld
|
|
stosw
|
|
shr eax,16
|
|
pop ebx ecx
|
|
cld
|
|
stosb
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.16:
|
|
push ecx ebx
|
|
call .calculate_pixel
|
|
xor eax,eax
|
|
mov ax,[ecx]
|
|
call .check_filtering_16
|
|
pop ebx ecx
|
|
cld
|
|
stosw
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.8:
|
|
push ecx ebx
|
|
call .calculate_pixel
|
|
cmp [filtering],0
|
|
jne @f
|
|
mov al,[ecx]
|
|
pop ebx ecx
|
|
cld
|
|
stosb
|
|
ret
|
|
@@:
|
|
call .check_filtering_8
|
|
cld
|
|
stosw
|
|
shr eax,16
|
|
pop ebx ecx
|
|
cld
|
|
stosb
|
|
ret
|
|
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.calculate_pixel:
|
|
test ecx,ecx
|
|
jz .offset_x
|
|
;.offset_y:
|
|
mov eax,ecx
|
|
|
|
mov ecx,[temp_y]
|
|
cmp eax,ecx
|
|
jne .new_y
|
|
mov eax,[temp_y_offset]
|
|
mov ecx,eax
|
|
jmp .offset_x
|
|
;--------------------------------
|
|
align 4
|
|
.new_y:
|
|
mov [temp_y],eax
|
|
|
|
mov ebx,[scaling_mode]
|
|
test ebx,ebx
|
|
jz @f
|
|
imul eax,[scaling_delta]
|
|
;--------------------------------
|
|
push ebx
|
|
mov ebx,eax
|
|
shr eax,12
|
|
and ebx,0xFFF
|
|
shl ebx,7 ;multiply 128
|
|
shr ebx,12
|
|
mov [next_pixel_y],ebx
|
|
pop ebx
|
|
;--------------------------------
|
|
jmp .ex_1
|
|
align 4
|
|
@@:
|
|
;--------------------------------
|
|
imul eax,dword [y]
|
|
mov bx,word [new_size.y1]
|
|
;--------------------------------
|
|
align 4
|
|
.y_div:
|
|
test ebx,ebx
|
|
jnz @f
|
|
inc ebx
|
|
align 4
|
|
@@:
|
|
xor edx,edx
|
|
div ebx
|
|
;--------------------------------
|
|
push eax
|
|
mov eax,edx
|
|
shl eax,7 ;multiply 128
|
|
xor edx,edx
|
|
div ebx
|
|
mov [next_pixel_y],eax
|
|
pop eax
|
|
;--------------------------------
|
|
align 4
|
|
.ex_1:
|
|
mov [temp_y1],eax
|
|
imul eax,[size_x]
|
|
|
|
mov [temp_y_offset],eax
|
|
mov ecx,eax
|
|
align 4
|
|
.offset_x:
|
|
test ebx,ebx
|
|
jz .finish
|
|
mov eax,[esp+4] ;ebx
|
|
|
|
mov edx,[esp+8]
|
|
test edx,edx
|
|
jz .continue
|
|
shl eax,3
|
|
add eax,[area_for_x]
|
|
mov edx,[eax+4]
|
|
mov [next_pixel_x],edx
|
|
mov eax,[eax]
|
|
jmp .ex_3
|
|
;--------------------------------
|
|
align 4
|
|
.continue:
|
|
mov ebx,[scaling_mode]
|
|
test ebx,ebx
|
|
jz @f
|
|
imul eax,[scaling_delta]
|
|
;--------------------------------
|
|
mov ebx,eax
|
|
shr eax,12
|
|
and ebx,0xFFF
|
|
shl ebx,7 ;multiply 128
|
|
shr ebx,12
|
|
mov [next_pixel_x],ebx
|
|
;--------------------------------
|
|
jmp .ex_2
|
|
;--------------------------------
|
|
align 4
|
|
@@:
|
|
imul eax,dword [x]
|
|
mov bx,word [new_size.x1]
|
|
;--------------------------------
|
|
align 4
|
|
.x_div:
|
|
test ebx,ebx
|
|
jnz @f
|
|
inc ebx
|
|
align 4
|
|
@@:
|
|
xor edx,edx
|
|
div ebx
|
|
;--------------------------------
|
|
push eax
|
|
mov eax,edx
|
|
shl eax,7 ;multiply 128
|
|
xor edx,edx
|
|
div ebx
|
|
mov [next_pixel_x],eax
|
|
pop eax
|
|
;--------------------------------
|
|
align 4
|
|
.ex_2:
|
|
mov edx,[bytes_to_pixel]
|
|
mov ebx,eax
|
|
xor eax,eax
|
|
align 4
|
|
@@:
|
|
add eax,ebx
|
|
dec edx
|
|
jnz @r
|
|
|
|
mov ebx,[esp+4]
|
|
shl ebx,3
|
|
add ebx,[area_for_x]
|
|
mov [ebx],eax
|
|
mov edx,[next_pixel_x]
|
|
mov [ebx+4],edx
|
|
align 4
|
|
.ex_3:
|
|
mov [temp_x1],eax
|
|
add ecx,eax
|
|
align 4
|
|
.finish:
|
|
add ecx,esi
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
.get_memory:
|
|
|
|
xor ecx,ecx
|
|
mov cx,[new_size.x1]
|
|
shl ecx,3
|
|
mcall 68,12
|
|
mov [area_for_x],eax
|
|
|
|
xor ecx,ecx
|
|
mov ebx,[new_size]
|
|
mov cx,bx
|
|
shr ebx,16
|
|
imul ecx,ebx ;[eax+8]
|
|
mov eax,[bytes_to_pixel]
|
|
cmp eax,1
|
|
jne @f
|
|
mov eax,3
|
|
@@:
|
|
imul ecx,eax
|
|
mcall 68,12
|
|
mov [raw_area],eax
|
|
mov edi,eax
|
|
ret
|
|
;---------------------------------------------------------------------
|
|
include 'b_filter.inc'
|
|
;---------------------------------------------------------------------
|
|
align 4
|
|
EXPORTS:
|
|
dd szStart, START
|
|
dd szVersion, 0x00010002
|
|
dd 0
|
|
|
|
szStart db 'START',0
|
|
szVersion db 'version',0
|
|
|
|
align 4
|
|
pointer dd 0
|
|
image_file dd 0
|
|
new_size:
|
|
.y1: dw 0
|
|
.x1: dw 0
|
|
|
|
x: dd 0
|
|
y: dd 0
|
|
|
|
size_x dd 0
|
|
bytes_to_pixel dd 0
|
|
|
|
start_coordinates:
|
|
.y dw 0
|
|
.x dw 0
|
|
|
|
scaling_mode dd 0
|
|
raw_area dd 0
|
|
scaling_delta dd 0
|
|
|
|
area_for_x dd 0
|
|
|
|
temp_y dd 0
|
|
temp_y_offset dd 0
|
|
|
|
resolution dd 0
|
|
|
|
filtering dd 0
|
|
|
|
next_pixel_y dd 0
|
|
next_pixel_x dd 0
|
|
|
|
temp_y1 dd 0
|
|
temp_x1 dd 0
|
|
|
|
B_sample dd 0
|
|
G_sample dd 0
|
|
R_sample dd 0
|
|
|
|
B_sample_1 dd 0
|
|
G_sample_1 dd 0
|
|
R_sample_1 dd 0
|
|
|
|
palette dd 0
|
|
|
|
background_color dd 0 |