able/windows-nt
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity
windows-nt/Source/XPSP1/NT/multimedia/media/avi/drawdib.16/setdi24.asm
CryptoAlgo Inc b3cac27891 Add source files
2020-09-26 16:20:57 +08:00

382 lines
10 KiB
NASM
Raw Blame History

page ,132
;----------------------------Module-Header------------------------------;
; Module Name: SETDI24.ASM
;
; move bits from one DIB format into another. doing color conversion if
; needed.
;
; convert_8_24
; convert_16_24
; convert_24_24
; convert_32_24
;
; NOTES:
;
; AUTHOR: ToddLa (Todd Laney) Microsoft
;
;-----------------------------------------------------------------------;
?PLM=1
?WIN=0
.xlist
include cmacro32.inc
include windows.inc
.list
sBegin Data
sEnd Data
ifndef SEGNAME
SEGNAME equ <_TEXT32>
endif
.386
createSeg %SEGNAME, CodeSeg, word, public, CODE
sBegin CodeSeg
assumes cs,CodeSeg
assumes ds,nothing
assumes es,nothing
;--------------------------------------------------------------------------;
;--------------------------------------------------------------------------;
nxtscan macro reg, next_scan, fill_bytes
ifb <fill_bytes>
add e&reg,next_scan
else
mov eax,e&reg
add e&reg,next_scan
cmp ax,reg
sbb eax,eax
and eax,fill_bytes
add e&reg,eax
endif
endm
;--------------------------------------------------------------------------;
;
; convert_8_24
;
;--------------------------------------------------------------------------;
assumes ds,nothing
assumes es,nothing
cProc convert_8_24,<FAR,PUBLIC,PASCAL>,<esi,edi,ds>
ParmD dst_ptr ; --> dst.
ParmD dst_offset ; offset to start at
ParmD dst_next_scan ; dst_next_scan.
ParmD dst_fill_bytes ; dst_fill_bytes
ParmD src_ptr ; --> src.
ParmD src_offset ; offset to start at
ParmD src_next_scan ; dst_next_scan.
ParmD pel_count ; pixel count.
ParmD scan_count ; scan count.
ParmD xlat_table ; pixel convert table.
cBegin
xor esi,esi
xor edi,edi
xor ebx,ebx
lfs si,src_ptr
les di,dst_ptr
lds bx,xlat_table
add esi,src_offset
add edi,dst_offset
mov eax,pel_count
sub src_next_scan,eax
add eax,eax
add eax,pel_count
sub dst_next_scan,eax
xor eax,eax
align 4
convert_8_24_start:
mov ecx,pel_count
align 4
convert_8_24_loop:
mov bl,fs:[esi] ; grab a pel
mov edx,[ebx*4] ; convert to 24bpp
mov es:[edi],dl
shr edx,8
mov es:[edi+1],dx
inc esi
add edi,3
dec ecx
jnz short convert_8_24_loop ;; ack
convert_8_24_next:
nxtscan si,src_next_scan
nxtscan di,dst_next_scan,dst_fill_bytes
dec scan_count
jnz short convert_8_24_start
cEnd
;--------------------------------------------------------------------------;
;
; STOSB32 - store a byte, every four times doing a STOSD
;
;--------------------------------------------------------------------------;
STOSB32_N = 0
STOSB32 macro
ror eax,8 ; rotate pixel (al) into eax
STOSB32_N = STOSB32_N + 1
if (STOSB32_N mod 4) eq 0
mov es:[edi], eax
add edi,4
endif
endm
;--------------------------------------------------------------------------;
;
; LODSB32 - get a byte, every four times doing a LODSD
;
;--------------------------------------------------------------------------;
LODSB32_N = 0
LODSB32 macro
if (LODSB32_N mod 4) eq 0
mov eax,[esi]
add esi,4
else
ror eax,8
endif
LODSB32_N = LODSB32_N + 1
endm
;--------------------------------------------------------------------------;
;
; MAP16
;
;--------------------------------------------------------------------------;
MAP16 macro n
if n and 1
shr ebx,16 ; get pel from last time
else
mov ebx, [esi] ; grab two pels
add esi,4
endif
;
; BX contains 5:5:5 RGB convert it to a 8:8:8 RGB
;
mov al,bl
shl al,3
STOSB32
shr bx,2
mov al,bl
and al,dh ; F8h
STOSB32
mov al,bh
shl al,3
STOSB32
endm
;--------------------------------------------------------------------------;
;
; convert_16_24
;
;--------------------------------------------------------------------------;
assumes ds,nothing
assumes es,nothing
cProc convert_16_24,<FAR,PUBLIC,PASCAL>,<esi,edi,ds>
ParmD dst_ptr ; --> dst.
ParmD dst_offset ; offset to start at
ParmD dst_next_scan ; dst_next_scan.
ParmD dst_fill_bytes ; dst_fill_bytes
ParmD src_ptr ; --> src.
ParmD src_offset ; offset to start at
ParmD src_next_scan ; dst_next_scan.
ParmD pel_count ; pixel count.
ParmD scan_count ; scan count.
ParmD xlat_table ; pixel convert table.
cBegin
xor esi,esi
xor edi,edi
lds si,src_ptr
les di,dst_ptr
add esi,src_offset
add edi,dst_offset
and pel_count,not 3 ;;!!!
mov eax,pel_count
add eax,eax
sub src_next_scan,eax
add eax,pel_count
sub dst_next_scan,eax
mov ecx,pel_count
shr ecx,2
mov pel_count,ecx
mov dh,0F8h
align 4
convert_16_24_start:
mov ecx,pel_count
align 4
convert_16_24_loop:
MAP16 0
MAP16 1
MAP16 2
MAP16 3
dec ecx
jnz convert_16_24_loop
convert_16_24_next:
nxtscan si,src_next_scan
nxtscan di,dst_next_scan,dst_fill_bytes
dec scan_count
jnz convert_16_24_start
cEnd
;--------------------------------------------------------------------------;
;
; convert_24_24
;
;--------------------------------------------------------------------------;
assumes ds,nothing
assumes es,nothing
cProc convert_24_24,<FAR,PUBLIC,PASCAL>,<esi,edi,ds>
ParmD dst_ptr ; --> dst.
ParmD dst_offset ; offset to start at
ParmD dst_next_scan ; dst_next_scan.
ParmD dst_fill_bytes ; dst_fill_bytes
ParmD src_ptr ; --> src.
ParmD src_offset ; offset to start at
ParmD src_next_scan ; dst_next_scan.
ParmD pel_count ; pixel count.
ParmD scan_count ; scan count.
ParmD xlat_table ; pixel convert table.
cBegin
xor esi,esi
xor edi,edi
lds si,src_ptr
les di,dst_ptr
add esi,src_offset
add edi,dst_offset
mov eax,pel_count
add eax,eax
add eax,pel_count
sub dst_next_scan,eax
sub src_next_scan,eax
mov ebx,eax
mov edx,eax
shr ebx,2
and edx,3
align 4
convert_24_24_start:
mov ecx,ebx
rep movs dword ptr es:[edi],dword ptr ds:[esi]
mov ecx,edx
rep movs byte ptr es:[edi],byte ptr ds:[esi]
nxtscan si,src_next_scan
nxtscan di,dst_next_scan,dst_fill_bytes
dec scan_count
jnz short convert_24_24_start
cEnd
;--------------------------------------------------------------------------;
;
; convert_32_24
;
;--------------------------------------------------------------------------;
assumes ds,nothing
assumes es,nothing
cProc convert_32_24,<FAR,PUBLIC,PASCAL>,<esi,edi,ds>
ParmD dst_ptr ; --> dst.
ParmD dst_offset ; offset to start at
ParmD dst_next_scan ; dst_next_scan.
ParmD dst_fill_bytes ; dst_fill_bytes
ParmD src_ptr ; --> src.
ParmD src_offset ; offset to start at
ParmD src_next_scan ; dst_next_scan.
ParmD pel_count ; pixel count.
ParmD scan_count ; scan count.
ParmD xlat_table ; pixel convert table.
cBegin
xor esi,esi
xor edi,edi
lds si,src_ptr
les di,dst_ptr
add esi,src_offset
add edi,dst_offset
and pel_count,not 3 ; !!!
mov eax,pel_count
add eax,eax
add eax,eax
sub src_next_scan,eax
sub eax,pel_count
sub dst_next_scan,eax
mov ecx,pel_count
shr ecx,2
jz short convert_32_24_exit
mov pel_count,ecx
align 4
convert_32_24_start:
mov ecx,pel_count
align 4
convert_32_24_loop:
mov eax,[esi] ; eax = XRGB
mov ebx,[esi+4] ; ebx = xrgb
shl eax,8 ; eax = RGB0
shrd eax,ebx,8 ; eax = bRGB
mov es:[edi],eax ; store pels
shl ebx,8 ; ebx = rgb0
mov eax,[esi+8] ; eax = XRGB
shrd ebx,eax,16 ; ebx = GBrg
mov es:[edi+4],ebx ; store pels
shl eax,8 ; eax = RGB0
mov ebx,[esi+12] ; ebx = xrgb
shrd eax,ebx,24 ; eax = rgbR
mov es:[edi+8],eax ; store pels
add esi,16
add edi,12
dec ecx
jnz short convert_32_24_loop
convert_32_24_next:
nxtscan si,src_next_scan
nxtscan di,dst_next_scan,dst_fill_bytes
dec scan_count
jnz short convert_32_24_start
convert_32_24_exit:
cEnd
sEnd CodeSeg
end
Reference in a new issue View git blame Copy permalink