; ; jdsample.asm - upsampling (SSE2) ; ; Copyright 2009 Pierre Ossman for Cendio AB ; Copyright (C) 2016, D. R. Commander. ; ; Based on the x86 SIMD extension for IJG JPEG library ; Copyright (C) 1999-2006, MIYASAKA Masaru. ; For conditions of distribution and use, see copyright notice in jsimdext.inc ; ; This file should be assembled with NASM (Netwide Assembler), ; can *not* be assembled with Microsoft's MASM or any compatible ; assembler (including Borland's Turbo Assembler). ; NASM is available from http://nasm.sourceforge.net/ or ; http://sourceforge.net/project/showfiles.php?group_id=6208 %include "jsimdext.inc" ; -------------------------------------------------------------------------- SECTION SEG_CONST alignz 32 GLOBAL_DATA(jconst_fancy_upsample_sse2) EXTN(jconst_fancy_upsample_sse2): PW_ONE times 8 dw 1 PW_TWO times 8 dw 2 PW_THREE times 8 dw 3 PW_SEVEN times 8 dw 7 PW_EIGHT times 8 dw 8 alignz 32 ; -------------------------------------------------------------------------- SECTION SEG_TEXT BITS 32 ; ; Fancy processing for the common case of 2:1 horizontal and 1:1 vertical. ; ; The upsampling algorithm is linear interpolation between pixel centers, ; also known as a "triangle filter". This is a good compromise between ; speed and visual quality. The centers of the output pixels are 1/4 and 3/4 ; of the way between input pixel centers. ; ; GLOBAL(void) ; jsimd_h2v1_fancy_upsample_sse2(int max_v_samp_factor, ; JDIMENSION downsampled_width, ; JSAMPARRAY input_data, ; JSAMPARRAY *output_data_ptr); ; %define max_v_samp(b) (b) + 8 ; int max_v_samp_factor %define downsamp_width(b) (b) + 12 ; JDIMENSION downsampled_width %define input_data(b) (b) + 16 ; JSAMPARRAY input_data %define output_data_ptr(b) (b) + 20 ; JSAMPARRAY *output_data_ptr align 32 GLOBAL_FUNCTION(jsimd_h2v1_fancy_upsample_sse2) EXTN(jsimd_h2v1_fancy_upsample_sse2): push ebp mov ebp, esp pushpic ebx ; push ecx ; need not be preserved ; push edx ; need not be preserved push esi push edi get_GOT ebx ; get GOT address mov eax, JDIMENSION [downsamp_width(ebp)] ; colctr test eax, eax jz near .return mov ecx, INT [max_v_samp(ebp)] ; rowctr test ecx, ecx jz near .return mov esi, JSAMPARRAY [input_data(ebp)] ; input_data mov edi, POINTER [output_data_ptr(ebp)] mov edi, JSAMPARRAY [edi] ; output_data alignx 16, 7 .rowloop: push eax ; colctr push edi push esi mov esi, JSAMPROW [esi] ; inptr mov edi, JSAMPROW [edi] ; outptr test eax, SIZEOF_XMMWORD-1 jz short .skip mov dl, JSAMPLE [esi+(eax-1)*SIZEOF_JSAMPLE] mov JSAMPLE [esi+eax*SIZEOF_JSAMPLE], dl ; insert a dummy sample .skip: pxor xmm0, xmm0 ; xmm0=(all 0's) pcmpeqb xmm7, xmm7 psrldq xmm7, (SIZEOF_XMMWORD-1) pand xmm7, XMMWORD [esi+0*SIZEOF_XMMWORD] add eax, byte SIZEOF_XMMWORD-1 and eax, byte -SIZEOF_XMMWORD cmp eax, byte SIZEOF_XMMWORD ja short .columnloop alignx 16, 7 .columnloop_last: pcmpeqb xmm6, xmm6 pslldq xmm6, (SIZEOF_XMMWORD-1) pand xmm6, XMMWORD [esi+0*SIZEOF_XMMWORD] jmp short .upsample alignx 16, 7 .columnloop: movdqa xmm6, XMMWORD [esi+1*SIZEOF_XMMWORD] pslldq xmm6, (SIZEOF_XMMWORD-1) .upsample: movdqa xmm1, XMMWORD [esi+0*SIZEOF_XMMWORD] movdqa xmm2, xmm1 movdqa xmm3, xmm1 ; xmm1=( 0 1 2 ... 13 14 15) pslldq xmm2, 1 ; xmm2=(-- 0 1 ... 12 13 14) psrldq xmm3, 1 ; xmm3=( 1 2 3 ... 14 15 --) por xmm2, xmm7 ; xmm2=(-1 0 1 ... 12 13 14) por xmm3, xmm6 ; xmm3=( 1 2 3 ... 14 15 16) movdqa xmm7, xmm1 psrldq xmm7, (SIZEOF_XMMWORD-1) ; xmm7=(15 -- -- ... -- -- --) movdqa xmm4, xmm1 punpcklbw xmm1, xmm0 ; xmm1=( 0 1 2 3 4 5 6 7) punpckhbw xmm4, xmm0 ; xmm4=( 8 9 10 11 12 13 14 15) movdqa xmm5, xmm2 punpcklbw xmm2, xmm0 ; xmm2=(-1 0 1 2 3 4 5 6) punpckhbw xmm5, xmm0 ; xmm5=( 7 8 9 10 11 12 13 14) movdqa xmm6, xmm3 punpcklbw xmm3, xmm0 ; xmm3=( 1 2 3 4 5 6 7 8) punpckhbw xmm6, xmm0 ; xmm6=( 9 10 11 12 13 14 15 16) pmullw xmm1, [GOTOFF(ebx,PW_THREE)] pmullw xmm4, [GOTOFF(ebx,PW_THREE)] paddw xmm2, [GOTOFF(ebx,PW_ONE)] paddw xmm5, [GOTOFF(ebx,PW_ONE)] paddw xmm3, [GOTOFF(ebx,PW_TWO)] paddw xmm6, [GOTOFF(ebx,PW_TWO)] paddw xmm2, xmm1 paddw xmm5, xmm4 psrlw xmm2, 2 ; xmm2=OutLE=( 0 2 4 6 8 10 12 14) psrlw xmm5, 2 ; xmm5=OutHE=(16 18 20 22 24 26 28 30) paddw xmm3, xmm1 paddw xmm6, xmm4 psrlw xmm3, 2 ; xmm3=OutLO=( 1 3 5 7 9 11 13 15) psrlw xmm6, 2 ; xmm6=OutHO=(17 19 21 23 25 27 29 31) psllw xmm3, BYTE_BIT psllw xmm6, BYTE_BIT por xmm2, xmm3 ; xmm2=OutL=( 0 1 2 ... 13 14 15) por xmm5, xmm6 ; xmm5=OutH=(16 17 18 ... 29 30 31) movdqa XMMWORD [edi+0*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [edi+1*SIZEOF_XMMWORD], xmm5 sub eax, byte SIZEOF_XMMWORD add esi, byte 1*SIZEOF_XMMWORD ; inptr add edi, byte 2*SIZEOF_XMMWORD ; outptr cmp eax, byte SIZEOF_XMMWORD ja near .columnloop test eax, eax jnz near .columnloop_last pop esi pop edi pop eax add esi, byte SIZEOF_JSAMPROW ; input_data add edi, byte SIZEOF_JSAMPROW ; output_data dec ecx ; rowctr jg near .rowloop .return: pop edi pop esi ; pop edx ; need not be preserved ; pop ecx ; need not be preserved poppic ebx pop ebp ret ; -------------------------------------------------------------------------- ; ; Fancy processing for the common case of 2:1 horizontal and 2:1 vertical. ; Again a triangle filter; see comments for h2v1 case, above. ; ; GLOBAL(void) ; jsimd_h2v2_fancy_upsample_sse2(int max_v_samp_factor, ; JDIMENSION downsampled_width, ; JSAMPARRAY input_data, ; JSAMPARRAY *output_data_ptr); ; %define max_v_samp(b) (b) + 8 ; int max_v_samp_factor %define downsamp_width(b) (b) + 12 ; JDIMENSION downsampled_width %define input_data(b) (b) + 16 ; JSAMPARRAY input_data %define output_data_ptr(b) (b) + 20 ; JSAMPARRAY *output_data_ptr %define original_ebp ebp + 0 %define wk(i) ebp - (WK_NUM - (i)) * SIZEOF_XMMWORD ; xmmword wk[WK_NUM] %define WK_NUM 4 %define gotptr wk(0) - SIZEOF_POINTER ; void *gotptr align 32 GLOBAL_FUNCTION(jsimd_h2v2_fancy_upsample_sse2) EXTN(jsimd_h2v2_fancy_upsample_sse2): push ebp mov eax, esp ; eax = original ebp sub esp, byte 4 and esp, byte (-SIZEOF_XMMWORD) ; align to 128 bits mov [esp], eax mov ebp, esp ; ebp = aligned ebp lea esp, [wk(0)] pushpic eax ; make a room for GOT address push ebx ; push ecx ; need not be preserved ; push edx ; need not be preserved push esi push edi get_GOT ebx ; get GOT address movpic POINTER [gotptr], ebx ; save GOT address mov edx, eax ; edx = original ebp mov eax, JDIMENSION [downsamp_width(edx)] ; colctr test eax, eax jz near .return mov ecx, INT [max_v_samp(edx)] ; rowctr test ecx, ecx jz near .return mov esi, JSAMPARRAY [input_data(edx)] ; input_data mov edi, POINTER [output_data_ptr(edx)] mov edi, JSAMPARRAY [edi] ; output_data alignx 16, 7 .rowloop: push eax ; colctr push ecx push edi push esi mov ecx, JSAMPROW [esi-1*SIZEOF_JSAMPROW] ; inptr1(above) mov ebx, JSAMPROW [esi+0*SIZEOF_JSAMPROW] ; inptr0 mov esi, JSAMPROW [esi+1*SIZEOF_JSAMPROW] ; inptr1(below) mov edx, JSAMPROW [edi+0*SIZEOF_JSAMPROW] ; outptr0 mov edi, JSAMPROW [edi+1*SIZEOF_JSAMPROW] ; outptr1 test eax, SIZEOF_XMMWORD-1 jz short .skip push edx mov dl, JSAMPLE [ecx+(eax-1)*SIZEOF_JSAMPLE] mov JSAMPLE [ecx+eax*SIZEOF_JSAMPLE], dl mov dl, JSAMPLE [ebx+(eax-1)*SIZEOF_JSAMPLE] mov JSAMPLE [ebx+eax*SIZEOF_JSAMPLE], dl mov dl, JSAMPLE [esi+(eax-1)*SIZEOF_JSAMPLE] mov JSAMPLE [esi+eax*SIZEOF_JSAMPLE], dl ; insert a dummy sample pop edx .skip: ; -- process the first column block movdqa xmm0, XMMWORD [ebx+0*SIZEOF_XMMWORD] ; xmm0=row[ 0][0] movdqa xmm1, XMMWORD [ecx+0*SIZEOF_XMMWORD] ; xmm1=row[-1][0] movdqa xmm2, XMMWORD [esi+0*SIZEOF_XMMWORD] ; xmm2=row[+1][0] pushpic ebx movpic ebx, POINTER [gotptr] ; load GOT address pxor xmm3, xmm3 ; xmm3=(all 0's) movdqa xmm4, xmm0 punpcklbw xmm0, xmm3 ; xmm0=row[ 0]( 0 1 2 3 4 5 6 7) punpckhbw xmm4, xmm3 ; xmm4=row[ 0]( 8 9 10 11 12 13 14 15) movdqa xmm5, xmm1 punpcklbw xmm1, xmm3 ; xmm1=row[-1]( 0 1 2 3 4 5 6 7) punpckhbw xmm5, xmm3 ; xmm5=row[-1]( 8 9 10 11 12 13 14 15) movdqa xmm6, xmm2 punpcklbw xmm2, xmm3 ; xmm2=row[+1]( 0 1 2 3 4 5 6 7) punpckhbw xmm6, xmm3 ; xmm6=row[+1]( 8 9 10 11 12 13 14 15) pmullw xmm0, [GOTOFF(ebx,PW_THREE)] pmullw xmm4, [GOTOFF(ebx,PW_THREE)] pcmpeqb xmm7, xmm7 psrldq xmm7, (SIZEOF_XMMWORD-2) paddw xmm1, xmm0 ; xmm1=Int0L=( 0 1 2 3 4 5 6 7) paddw xmm5, xmm4 ; xmm5=Int0H=( 8 9 10 11 12 13 14 15) paddw xmm2, xmm0 ; xmm2=Int1L=( 0 1 2 3 4 5 6 7) paddw xmm6, xmm4 ; xmm6=Int1H=( 8 9 10 11 12 13 14 15) movdqa XMMWORD [edx+0*SIZEOF_XMMWORD], xmm1 ; temporarily save movdqa XMMWORD [edx+1*SIZEOF_XMMWORD], xmm5 ; the intermediate data movdqa XMMWORD [edi+0*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [edi+1*SIZEOF_XMMWORD], xmm6 pand xmm1, xmm7 ; xmm1=( 0 -- -- -- -- -- -- --) pand xmm2, xmm7 ; xmm2=( 0 -- -- -- -- -- -- --) movdqa XMMWORD [wk(0)], xmm1 movdqa XMMWORD [wk(1)], xmm2 poppic ebx add eax, byte SIZEOF_XMMWORD-1 and eax, byte -SIZEOF_XMMWORD cmp eax, byte SIZEOF_XMMWORD ja short .columnloop alignx 16, 7 .columnloop_last: ; -- process the last column block pushpic ebx movpic ebx, POINTER [gotptr] ; load GOT address pcmpeqb xmm1, xmm1 pslldq xmm1, (SIZEOF_XMMWORD-2) movdqa xmm2, xmm1 pand xmm1, XMMWORD [edx+1*SIZEOF_XMMWORD] pand xmm2, XMMWORD [edi+1*SIZEOF_XMMWORD] movdqa XMMWORD [wk(2)], xmm1 ; xmm1=(-- -- -- -- -- -- -- 15) movdqa XMMWORD [wk(3)], xmm2 ; xmm2=(-- -- -- -- -- -- -- 15) jmp near .upsample alignx 16, 7 .columnloop: ; -- process the next column block movdqa xmm0, XMMWORD [ebx+1*SIZEOF_XMMWORD] ; xmm0=row[ 0][1] movdqa xmm1, XMMWORD [ecx+1*SIZEOF_XMMWORD] ; xmm1=row[-1][1] movdqa xmm2, XMMWORD [esi+1*SIZEOF_XMMWORD] ; xmm2=row[+1][1] pushpic ebx movpic ebx, POINTER [gotptr] ; load GOT address pxor xmm3, xmm3 ; xmm3=(all 0's) movdqa xmm4, xmm0 punpcklbw xmm0, xmm3 ; xmm0=row[ 0]( 0 1 2 3 4 5 6 7) punpckhbw xmm4, xmm3 ; xmm4=row[ 0]( 8 9 10 11 12 13 14 15) movdqa xmm5, xmm1 punpcklbw xmm1, xmm3 ; xmm1=row[-1]( 0 1 2 3 4 5 6 7) punpckhbw xmm5, xmm3 ; xmm5=row[-1]( 8 9 10 11 12 13 14 15) movdqa xmm6, xmm2 punpcklbw xmm2, xmm3 ; xmm2=row[+1]( 0 1 2 3 4 5 6 7) punpckhbw xmm6, xmm3 ; xmm6=row[+1]( 8 9 10 11 12 13 14 15) pmullw xmm0, [GOTOFF(ebx,PW_THREE)] pmullw xmm4, [GOTOFF(ebx,PW_THREE)] paddw xmm1, xmm0 ; xmm1=Int0L=( 0 1 2 3 4 5 6 7) paddw xmm5, xmm4 ; xmm5=Int0H=( 8 9 10 11 12 13 14 15) paddw xmm2, xmm0 ; xmm2=Int1L=( 0 1 2 3 4 5 6 7) paddw xmm6, xmm4 ; xmm6=Int1H=( 8 9 10 11 12 13 14 15) movdqa XMMWORD [edx+2*SIZEOF_XMMWORD], xmm1 ; temporarily save movdqa XMMWORD [edx+3*SIZEOF_XMMWORD], xmm5 ; the intermediate data movdqa XMMWORD [edi+2*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [edi+3*SIZEOF_XMMWORD], xmm6 pslldq xmm1, (SIZEOF_XMMWORD-2) ; xmm1=(-- -- -- -- -- -- -- 0) pslldq xmm2, (SIZEOF_XMMWORD-2) ; xmm2=(-- -- -- -- -- -- -- 0) movdqa XMMWORD [wk(2)], xmm1 movdqa XMMWORD [wk(3)], xmm2 .upsample: ; -- process the upper row movdqa xmm7, XMMWORD [edx+0*SIZEOF_XMMWORD] movdqa xmm3, XMMWORD [edx+1*SIZEOF_XMMWORD] movdqa xmm0, xmm7 ; xmm7=Int0L=( 0 1 2 3 4 5 6 7) movdqa xmm4, xmm3 ; xmm3=Int0H=( 8 9 10 11 12 13 14 15) psrldq xmm0, 2 ; xmm0=( 1 2 3 4 5 6 7 --) pslldq xmm4, (SIZEOF_XMMWORD-2) ; xmm4=(-- -- -- -- -- -- -- 8) movdqa xmm5, xmm7 movdqa xmm6, xmm3 psrldq xmm5, (SIZEOF_XMMWORD-2) ; xmm5=( 7 -- -- -- -- -- -- --) pslldq xmm6, 2 ; xmm6=(-- 8 9 10 11 12 13 14) por xmm0, xmm4 ; xmm0=( 1 2 3 4 5 6 7 8) por xmm5, xmm6 ; xmm5=( 7 8 9 10 11 12 13 14) movdqa xmm1, xmm7 movdqa xmm2, xmm3 pslldq xmm1, 2 ; xmm1=(-- 0 1 2 3 4 5 6) psrldq xmm2, 2 ; xmm2=( 9 10 11 12 13 14 15 --) movdqa xmm4, xmm3 psrldq xmm4, (SIZEOF_XMMWORD-2) ; xmm4=(15 -- -- -- -- -- -- --) por xmm1, XMMWORD [wk(0)] ; xmm1=(-1 0 1 2 3 4 5 6) por xmm2, XMMWORD [wk(2)] ; xmm2=( 9 10 11 12 13 14 15 16) movdqa XMMWORD [wk(0)], xmm4 pmullw xmm7, [GOTOFF(ebx,PW_THREE)] pmullw xmm3, [GOTOFF(ebx,PW_THREE)] paddw xmm1, [GOTOFF(ebx,PW_EIGHT)] paddw xmm5, [GOTOFF(ebx,PW_EIGHT)] paddw xmm0, [GOTOFF(ebx,PW_SEVEN)] paddw xmm2, [GOTOFF(ebx,PW_SEVEN)] paddw xmm1, xmm7 paddw xmm5, xmm3 psrlw xmm1, 4 ; xmm1=Out0LE=( 0 2 4 6 8 10 12 14) psrlw xmm5, 4 ; xmm5=Out0HE=(16 18 20 22 24 26 28 30) paddw xmm0, xmm7 paddw xmm2, xmm3 psrlw xmm0, 4 ; xmm0=Out0LO=( 1 3 5 7 9 11 13 15) psrlw xmm2, 4 ; xmm2=Out0HO=(17 19 21 23 25 27 29 31) psllw xmm0, BYTE_BIT psllw xmm2, BYTE_BIT por xmm1, xmm0 ; xmm1=Out0L=( 0 1 2 ... 13 14 15) por xmm5, xmm2 ; xmm5=Out0H=(16 17 18 ... 29 30 31) movdqa XMMWORD [edx+0*SIZEOF_XMMWORD], xmm1 movdqa XMMWORD [edx+1*SIZEOF_XMMWORD], xmm5 ; -- process the lower row movdqa xmm6, XMMWORD [edi+0*SIZEOF_XMMWORD] movdqa xmm4, XMMWORD [edi+1*SIZEOF_XMMWORD] movdqa xmm7, xmm6 ; xmm6=Int1L=( 0 1 2 3 4 5 6 7) movdqa xmm3, xmm4 ; xmm4=Int1H=( 8 9 10 11 12 13 14 15) psrldq xmm7, 2 ; xmm7=( 1 2 3 4 5 6 7 --) pslldq xmm3, (SIZEOF_XMMWORD-2) ; xmm3=(-- -- -- -- -- -- -- 8) movdqa xmm0, xmm6 movdqa xmm2, xmm4 psrldq xmm0, (SIZEOF_XMMWORD-2) ; xmm0=( 7 -- -- -- -- -- -- --) pslldq xmm2, 2 ; xmm2=(-- 8 9 10 11 12 13 14) por xmm7, xmm3 ; xmm7=( 1 2 3 4 5 6 7 8) por xmm0, xmm2 ; xmm0=( 7 8 9 10 11 12 13 14) movdqa xmm1, xmm6 movdqa xmm5, xmm4 pslldq xmm1, 2 ; xmm1=(-- 0 1 2 3 4 5 6) psrldq xmm5, 2 ; xmm5=( 9 10 11 12 13 14 15 --) movdqa xmm3, xmm4 psrldq xmm3, (SIZEOF_XMMWORD-2) ; xmm3=(15 -- -- -- -- -- -- --) por xmm1, XMMWORD [wk(1)] ; xmm1=(-1 0 1 2 3 4 5 6) por xmm5, XMMWORD [wk(3)] ; xmm5=( 9 10 11 12 13 14 15 16) movdqa XMMWORD [wk(1)], xmm3 pmullw xmm6, [GOTOFF(ebx,PW_THREE)] pmullw xmm4, [GOTOFF(ebx,PW_THREE)] paddw xmm1, [GOTOFF(ebx,PW_EIGHT)] paddw xmm0, [GOTOFF(ebx,PW_EIGHT)] paddw xmm7, [GOTOFF(ebx,PW_SEVEN)] paddw xmm5, [GOTOFF(ebx,PW_SEVEN)] paddw xmm1, xmm6 paddw xmm0, xmm4 psrlw xmm1, 4 ; xmm1=Out1LE=( 0 2 4 6 8 10 12 14) psrlw xmm0, 4 ; xmm0=Out1HE=(16 18 20 22 24 26 28 30) paddw xmm7, xmm6 paddw xmm5, xmm4 psrlw xmm7, 4 ; xmm7=Out1LO=( 1 3 5 7 9 11 13 15) psrlw xmm5, 4 ; xmm5=Out1HO=(17 19 21 23 25 27 29 31) psllw xmm7, BYTE_BIT psllw xmm5, BYTE_BIT por xmm1, xmm7 ; xmm1=Out1L=( 0 1 2 ... 13 14 15) por xmm0, xmm5 ; xmm0=Out1H=(16 17 18 ... 29 30 31) movdqa XMMWORD [edi+0*SIZEOF_XMMWORD], xmm1 movdqa XMMWORD [edi+1*SIZEOF_XMMWORD], xmm0 poppic ebx sub eax, byte SIZEOF_XMMWORD add ecx, byte 1*SIZEOF_XMMWORD ; inptr1(above) add ebx, byte 1*SIZEOF_XMMWORD ; inptr0 add esi, byte 1*SIZEOF_XMMWORD ; inptr1(below) add edx, byte 2*SIZEOF_XMMWORD ; outptr0 add edi, byte 2*SIZEOF_XMMWORD ; outptr1 cmp eax, byte SIZEOF_XMMWORD ja near .columnloop test eax, eax jnz near .columnloop_last pop esi pop edi pop ecx pop eax add esi, byte 1*SIZEOF_JSAMPROW ; input_data add edi, byte 2*SIZEOF_JSAMPROW ; output_data sub ecx, byte 2 ; rowctr jg near .rowloop .return: pop edi pop esi ; pop edx ; need not be preserved ; pop ecx ; need not be preserved pop ebx mov esp, ebp ; esp <- aligned ebp pop esp ; esp <- original ebp pop ebp ret ; -------------------------------------------------------------------------- ; ; Fast processing for the common case of 2:1 horizontal and 1:1 vertical. ; It's still a box filter. ; ; GLOBAL(void) ; jsimd_h2v1_upsample_sse2(int max_v_samp_factor, JDIMENSION output_width, ; JSAMPARRAY input_data, JSAMPARRAY *output_data_ptr); ; %define max_v_samp(b) (b) + 8 ; int max_v_samp_factor %define output_width(b) (b) + 12 ; JDIMENSION output_width %define input_data(b) (b) + 16 ; JSAMPARRAY input_data %define output_data_ptr(b) (b) + 20 ; JSAMPARRAY *output_data_ptr align 32 GLOBAL_FUNCTION(jsimd_h2v1_upsample_sse2) EXTN(jsimd_h2v1_upsample_sse2): push ebp mov ebp, esp ; push ebx ; unused ; push ecx ; need not be preserved ; push edx ; need not be preserved push esi push edi mov edx, JDIMENSION [output_width(ebp)] add edx, byte (2*SIZEOF_XMMWORD)-1 and edx, byte -(2*SIZEOF_XMMWORD) jz short .return mov ecx, INT [max_v_samp(ebp)] ; rowctr test ecx, ecx jz short .return mov esi, JSAMPARRAY [input_data(ebp)] ; input_data mov edi, POINTER [output_data_ptr(ebp)] mov edi, JSAMPARRAY [edi] ; output_data alignx 16, 7 .rowloop: push edi push esi mov esi, JSAMPROW [esi] ; inptr mov edi, JSAMPROW [edi] ; outptr mov eax, edx ; colctr alignx 16, 7 .columnloop: movdqa xmm0, XMMWORD [esi+0*SIZEOF_XMMWORD] movdqa xmm1, xmm0 punpcklbw xmm0, xmm0 punpckhbw xmm1, xmm1 movdqa XMMWORD [edi+0*SIZEOF_XMMWORD], xmm0 movdqa XMMWORD [edi+1*SIZEOF_XMMWORD], xmm1 sub eax, byte 2*SIZEOF_XMMWORD jz short .nextrow movdqa xmm2, XMMWORD [esi+1*SIZEOF_XMMWORD] movdqa xmm3, xmm2 punpcklbw xmm2, xmm2 punpckhbw xmm3, xmm3 movdqa XMMWORD [edi+2*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [edi+3*SIZEOF_XMMWORD], xmm3 sub eax, byte 2*SIZEOF_XMMWORD jz short .nextrow add esi, byte 2*SIZEOF_XMMWORD ; inptr add edi, byte 4*SIZEOF_XMMWORD ; outptr jmp short .columnloop alignx 16, 7 .nextrow: pop esi pop edi add esi, byte SIZEOF_JSAMPROW ; input_data add edi, byte SIZEOF_JSAMPROW ; output_data dec ecx ; rowctr jg short .rowloop .return: pop edi pop esi ; pop edx ; need not be preserved ; pop ecx ; need not be preserved ; pop ebx ; unused pop ebp ret ; -------------------------------------------------------------------------- ; ; Fast processing for the common case of 2:1 horizontal and 2:1 vertical. ; It's still a box filter. ; ; GLOBAL(void) ; jsimd_h2v2_upsample_sse2(int max_v_samp_factor, JDIMENSION output_width, ; JSAMPARRAY input_data, JSAMPARRAY *output_data_ptr); ; %define max_v_samp(b) (b) + 8 ; int max_v_samp_factor %define output_width(b) (b) + 12 ; JDIMENSION output_width %define input_data(b) (b) + 16 ; JSAMPARRAY input_data %define output_data_ptr(b) (b) + 20 ; JSAMPARRAY *output_data_ptr align 32 GLOBAL_FUNCTION(jsimd_h2v2_upsample_sse2) EXTN(jsimd_h2v2_upsample_sse2): push ebp mov ebp, esp push ebx ; push ecx ; need not be preserved ; push edx ; need not be preserved push esi push edi mov edx, JDIMENSION [output_width(ebp)] add edx, byte (2*SIZEOF_XMMWORD)-1 and edx, byte -(2*SIZEOF_XMMWORD) jz near .return mov ecx, INT [max_v_samp(ebp)] ; rowctr test ecx, ecx jz near .return mov esi, JSAMPARRAY [input_data(ebp)] ; input_data mov edi, POINTER [output_data_ptr(ebp)] mov edi, JSAMPARRAY [edi] ; output_data alignx 16, 7 .rowloop: push edi push esi mov esi, JSAMPROW [esi] ; inptr mov ebx, JSAMPROW [edi+0*SIZEOF_JSAMPROW] ; outptr0 mov edi, JSAMPROW [edi+1*SIZEOF_JSAMPROW] ; outptr1 mov eax, edx ; colctr alignx 16, 7 .columnloop: movdqa xmm0, XMMWORD [esi+0*SIZEOF_XMMWORD] movdqa xmm1, xmm0 punpcklbw xmm0, xmm0 punpckhbw xmm1, xmm1 movdqa XMMWORD [ebx+0*SIZEOF_XMMWORD], xmm0 movdqa XMMWORD [ebx+1*SIZEOF_XMMWORD], xmm1 movdqa XMMWORD [edi+0*SIZEOF_XMMWORD], xmm0 movdqa XMMWORD [edi+1*SIZEOF_XMMWORD], xmm1 sub eax, byte 2*SIZEOF_XMMWORD jz short .nextrow movdqa xmm2, XMMWORD [esi+1*SIZEOF_XMMWORD] movdqa xmm3, xmm2 punpcklbw xmm2, xmm2 punpckhbw xmm3, xmm3 movdqa XMMWORD [ebx+2*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [ebx+3*SIZEOF_XMMWORD], xmm3 movdqa XMMWORD [edi+2*SIZEOF_XMMWORD], xmm2 movdqa XMMWORD [edi+3*SIZEOF_XMMWORD], xmm3 sub eax, byte 2*SIZEOF_XMMWORD jz short .nextrow add esi, byte 2*SIZEOF_XMMWORD ; inptr add ebx, byte 4*SIZEOF_XMMWORD ; outptr0 add edi, byte 4*SIZEOF_XMMWORD ; outptr1 jmp short .columnloop alignx 16, 7 .nextrow: pop esi pop edi add esi, byte 1*SIZEOF_JSAMPROW ; input_data add edi, byte 2*SIZEOF_JSAMPROW ; output_data sub ecx, byte 2 ; rowctr jg short .rowloop .return: pop edi pop esi ; pop edx ; need not be preserved ; pop ecx ; need not be preserved pop ebx pop ebp ret ; For some reason, the OS X linker does not honor the request to align the ; segment unless we do this. align 32