зеркало из https://github.com/mozilla/mozjpeg.git
Add 3DNow SIMD implementation of computationally intensive routines.
git-svn-id: svn+ssh://svn.code.sf.net/p/libjpeg-turbo/code/trunk@18 632fc199-4ca6-4c93-a231-07263d6284db
This commit is contained in:
Коммит
65d0317346
|
@ -25,7 +25,8 @@ libjpeg_la_SOURCES += simd/jsimd.h simd/jsimdcfg.inc.h \
|
|||
simd/jccolmmx.asm simd/jdcolmmx.asm \
|
||||
simd/jcsammmx.asm simd/jdsammmx.asm simd/jdmermmx.asm \
|
||||
simd/jcqntmmx.asm simd/jfmmxfst.asm simd/jfmmxint.asm \
|
||||
simd/jimmxred.asm simd/jimmxint.asm simd/jimmxfst.asm
|
||||
simd/jimmxred.asm simd/jimmxint.asm simd/jimmxfst.asm \
|
||||
simd/jcqnt3dn.asm simd/jf3dnflt.asm simd/ji3dnflt.asm
|
||||
|
||||
endif
|
||||
|
||||
|
|
66
jsimd.c
66
jsimd.c
|
@ -364,6 +364,19 @@ jsimd_can_convsamp_float (void)
|
|||
{
|
||||
init_simd();
|
||||
|
||||
/* The code is optimised for these values only */
|
||||
if (DCTSIZE != 8)
|
||||
return 0;
|
||||
if (BITS_IN_JSAMPLE != 8)
|
||||
return 0;
|
||||
if (sizeof(JDIMENSION) != 4)
|
||||
return 0;
|
||||
if (sizeof(FAST_FLOAT) != 4)
|
||||
return 0;
|
||||
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
return 1;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
@ -381,6 +394,10 @@ GLOBAL(void)
|
|||
jsimd_convsamp_float (JSAMPARRAY sample_data, JDIMENSION start_col,
|
||||
FAST_FLOAT * workspace)
|
||||
{
|
||||
#ifdef WITH_SIMD
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
jsimd_convsamp_float_3dnow(sample_data, start_col, workspace);
|
||||
#endif
|
||||
}
|
||||
|
||||
GLOBAL(int)
|
||||
|
@ -422,6 +439,15 @@ jsimd_can_fdct_float (void)
|
|||
{
|
||||
init_simd();
|
||||
|
||||
/* The code is optimised for these values only */
|
||||
if (DCTSIZE != 8)
|
||||
return 0;
|
||||
if (sizeof(FAST_FLOAT) != 4)
|
||||
return 0;
|
||||
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
return 1;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
@ -446,6 +472,10 @@ jsimd_fdct_ifast (DCTELEM * data)
|
|||
GLOBAL(void)
|
||||
jsimd_fdct_float (FAST_FLOAT * data)
|
||||
{
|
||||
#ifdef WITH_SIMD
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
jsimd_fdct_float_3dnow(data);
|
||||
#endif
|
||||
}
|
||||
|
||||
GLOBAL(int)
|
||||
|
@ -472,6 +502,17 @@ jsimd_can_quantize_float (void)
|
|||
{
|
||||
init_simd();
|
||||
|
||||
/* The code is optimised for these values only */
|
||||
if (DCTSIZE != 8)
|
||||
return 0;
|
||||
if (sizeof(JCOEF) != 2)
|
||||
return 0;
|
||||
if (sizeof(FAST_FLOAT) != 4)
|
||||
return 0;
|
||||
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
return 1;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
@ -489,6 +530,10 @@ GLOBAL(void)
|
|||
jsimd_quantize_float (JCOEFPTR coef_block, FAST_FLOAT * divisors,
|
||||
FAST_FLOAT * workspace)
|
||||
{
|
||||
#ifdef WITH_SIMD
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
jsimd_quantize_float_3dnow(coef_block, divisors, workspace);
|
||||
#endif
|
||||
}
|
||||
|
||||
GLOBAL(int)
|
||||
|
@ -612,6 +657,22 @@ jsimd_can_idct_float (void)
|
|||
{
|
||||
init_simd();
|
||||
|
||||
if (DCTSIZE != 8)
|
||||
return 0;
|
||||
if (sizeof(JCOEF) != 2)
|
||||
return 0;
|
||||
if (BITS_IN_JSAMPLE != 8)
|
||||
return 0;
|
||||
if (sizeof(JDIMENSION) != 4)
|
||||
return 0;
|
||||
if (sizeof(FAST_FLOAT) != 4)
|
||||
return 0;
|
||||
if (sizeof(FLOAT_MULT_TYPE) != 4)
|
||||
return 0;
|
||||
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
return 1;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
@ -642,5 +703,10 @@ jsimd_idct_float (j_decompress_ptr cinfo, jpeg_component_info * compptr,
|
|||
JCOEFPTR coef_block, JSAMPARRAY output_buf,
|
||||
JDIMENSION output_col)
|
||||
{
|
||||
#if WITH_SIMD
|
||||
if (simd_support & JSIMD_3DNOW)
|
||||
jsimd_idct_float_3dnow(compptr->dct_table, coef_block,
|
||||
output_buf, output_col);
|
||||
#endif
|
||||
}
|
||||
|
||||
|
|
|
@ -0,0 +1,230 @@
|
|||
;
|
||||
; jcqnt3dn.asm - sample data conversion and quantization (3DNow! & MMX)
|
||||
;
|
||||
; Copyright 2009 Pierre Ossman <ossman@cendio.se> for Cendio AB
|
||||
;
|
||||
; Based on
|
||||
; 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
|
||||
;
|
||||
; [TAB8]
|
||||
|
||||
%include "simd/jsimdext.inc"
|
||||
%include "simd/jdct.inc"
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
SECTION SEG_TEXT
|
||||
BITS 32
|
||||
;
|
||||
; Load data into workspace, applying unsigned->signed conversion
|
||||
;
|
||||
; GLOBAL(void)
|
||||
; jsimd_convsamp_float_3dnow (JSAMPARRAY sample_data, JDIMENSION start_col,
|
||||
; FAST_FLOAT * workspace);
|
||||
;
|
||||
|
||||
%define sample_data ebp+8 ; JSAMPARRAY sample_data
|
||||
%define start_col ebp+12 ; JDIMENSION start_col
|
||||
%define workspace ebp+16 ; FAST_FLOAT * workspace
|
||||
|
||||
align 16
|
||||
global EXTN(jsimd_convsamp_float_3dnow)
|
||||
|
||||
EXTN(jsimd_convsamp_float_3dnow):
|
||||
push ebp
|
||||
mov ebp,esp
|
||||
push ebx
|
||||
; push ecx ; need not be preserved
|
||||
; push edx ; need not be preserved
|
||||
push esi
|
||||
push edi
|
||||
|
||||
pcmpeqw mm7,mm7
|
||||
psllw mm7,7
|
||||
packsswb mm7,mm7 ; mm7 = PB_CENTERJSAMPLE (0x808080..)
|
||||
|
||||
mov esi, JSAMPARRAY [sample_data] ; (JSAMPROW *)
|
||||
mov eax, JDIMENSION [start_col]
|
||||
mov edi, POINTER [workspace] ; (DCTELEM *)
|
||||
mov ecx, DCTSIZE/2
|
||||
alignx 16,7
|
||||
.convloop:
|
||||
mov ebx, JSAMPROW [esi+0*SIZEOF_JSAMPROW] ; (JSAMPLE *)
|
||||
mov edx, JSAMPROW [esi+1*SIZEOF_JSAMPROW] ; (JSAMPLE *)
|
||||
|
||||
movq mm0, MMWORD [ebx+eax*SIZEOF_JSAMPLE]
|
||||
movq mm1, MMWORD [edx+eax*SIZEOF_JSAMPLE]
|
||||
|
||||
psubb mm0,mm7 ; mm0=(01234567)
|
||||
psubb mm1,mm7 ; mm1=(89ABCDEF)
|
||||
|
||||
punpcklbw mm2,mm0 ; mm2=(*0*1*2*3)
|
||||
punpckhbw mm0,mm0 ; mm0=(*4*5*6*7)
|
||||
punpcklbw mm3,mm1 ; mm3=(*8*9*A*B)
|
||||
punpckhbw mm1,mm1 ; mm1=(*C*D*E*F)
|
||||
|
||||
punpcklwd mm4,mm2 ; mm4=(***0***1)
|
||||
punpckhwd mm2,mm2 ; mm2=(***2***3)
|
||||
punpcklwd mm5,mm0 ; mm5=(***4***5)
|
||||
punpckhwd mm0,mm0 ; mm0=(***6***7)
|
||||
|
||||
psrad mm4,(DWORD_BIT-BYTE_BIT) ; mm4=(01)
|
||||
psrad mm2,(DWORD_BIT-BYTE_BIT) ; mm2=(23)
|
||||
pi2fd mm4,mm4
|
||||
pi2fd mm2,mm2
|
||||
psrad mm5,(DWORD_BIT-BYTE_BIT) ; mm5=(45)
|
||||
psrad mm0,(DWORD_BIT-BYTE_BIT) ; mm0=(67)
|
||||
pi2fd mm5,mm5
|
||||
pi2fd mm0,mm0
|
||||
|
||||
movq MMWORD [MMBLOCK(0,0,edi,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(0,1,edi,SIZEOF_FAST_FLOAT)], mm2
|
||||
movq MMWORD [MMBLOCK(0,2,edi,SIZEOF_FAST_FLOAT)], mm5
|
||||
movq MMWORD [MMBLOCK(0,3,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
|
||||
punpcklwd mm6,mm3 ; mm6=(***8***9)
|
||||
punpckhwd mm3,mm3 ; mm3=(***A***B)
|
||||
punpcklwd mm4,mm1 ; mm4=(***C***D)
|
||||
punpckhwd mm1,mm1 ; mm1=(***E***F)
|
||||
|
||||
psrad mm6,(DWORD_BIT-BYTE_BIT) ; mm6=(89)
|
||||
psrad mm3,(DWORD_BIT-BYTE_BIT) ; mm3=(AB)
|
||||
pi2fd mm6,mm6
|
||||
pi2fd mm3,mm3
|
||||
psrad mm4,(DWORD_BIT-BYTE_BIT) ; mm4=(CD)
|
||||
psrad mm1,(DWORD_BIT-BYTE_BIT) ; mm1=(EF)
|
||||
pi2fd mm4,mm4
|
||||
pi2fd mm1,mm1
|
||||
|
||||
movq MMWORD [MMBLOCK(1,0,edi,SIZEOF_FAST_FLOAT)], mm6
|
||||
movq MMWORD [MMBLOCK(1,1,edi,SIZEOF_FAST_FLOAT)], mm3
|
||||
movq MMWORD [MMBLOCK(1,2,edi,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(1,3,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
|
||||
add esi, byte 2*SIZEOF_JSAMPROW
|
||||
add edi, byte 2*DCTSIZE*SIZEOF_FAST_FLOAT
|
||||
dec ecx
|
||||
jnz near .convloop
|
||||
|
||||
femms ; empty MMX/3DNow! state
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
; pop edx ; need not be preserved
|
||||
; pop ecx ; need not be preserved
|
||||
pop ebx
|
||||
pop ebp
|
||||
ret
|
||||
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
;
|
||||
; Quantize/descale the coefficients, and store into coef_block
|
||||
;
|
||||
; GLOBAL(void)
|
||||
; jsimd_quantize_float_3dnow (JCOEFPTR coef_block, FAST_FLOAT * divisors,
|
||||
; FAST_FLOAT * workspace);
|
||||
;
|
||||
|
||||
%define coef_block ebp+8 ; JCOEFPTR coef_block
|
||||
%define divisors ebp+12 ; FAST_FLOAT * divisors
|
||||
%define workspace ebp+16 ; FAST_FLOAT * workspace
|
||||
|
||||
align 16
|
||||
global EXTN(jsimd_quantize_float_3dnow)
|
||||
|
||||
EXTN(jsimd_quantize_float_3dnow):
|
||||
push ebp
|
||||
mov ebp,esp
|
||||
; push ebx ; unused
|
||||
; push ecx ; unused
|
||||
; push edx ; need not be preserved
|
||||
push esi
|
||||
push edi
|
||||
|
||||
mov eax, 0x4B400000 ; (float)0x00C00000 (rndint_magic)
|
||||
movd mm7,eax
|
||||
punpckldq mm7,mm7 ; mm7={12582912.0F 12582912.0F}
|
||||
|
||||
mov esi, POINTER [workspace]
|
||||
mov edx, POINTER [divisors]
|
||||
mov edi, JCOEFPTR [coef_block]
|
||||
mov eax, DCTSIZE2/16
|
||||
alignx 16,7
|
||||
.quantloop:
|
||||
movq mm0, MMWORD [MMBLOCK(0,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(0,1,esi,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm0, MMWORD [MMBLOCK(0,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm1, MMWORD [MMBLOCK(0,1,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(0,2,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(0,3,esi,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm2, MMWORD [MMBLOCK(0,2,edx,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm3, MMWORD [MMBLOCK(0,3,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
pfadd mm0,mm7 ; mm0=(00 ** 01 **)
|
||||
pfadd mm1,mm7 ; mm1=(02 ** 03 **)
|
||||
pfadd mm2,mm7 ; mm0=(04 ** 05 **)
|
||||
pfadd mm3,mm7 ; mm1=(06 ** 07 **)
|
||||
|
||||
movq mm4,mm0
|
||||
punpcklwd mm0,mm1 ; mm0=(00 02 ** **)
|
||||
punpckhwd mm4,mm1 ; mm4=(01 03 ** **)
|
||||
movq mm5,mm2
|
||||
punpcklwd mm2,mm3 ; mm2=(04 06 ** **)
|
||||
punpckhwd mm5,mm3 ; mm5=(05 07 ** **)
|
||||
|
||||
punpcklwd mm0,mm4 ; mm0=(00 01 02 03)
|
||||
punpcklwd mm2,mm5 ; mm2=(04 05 06 07)
|
||||
|
||||
movq mm6, MMWORD [MMBLOCK(1,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(1,1,esi,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm6, MMWORD [MMBLOCK(1,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm1, MMWORD [MMBLOCK(1,1,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(1,2,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm4, MMWORD [MMBLOCK(1,3,esi,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm3, MMWORD [MMBLOCK(1,2,edx,SIZEOF_FAST_FLOAT)]
|
||||
pfmul mm4, MMWORD [MMBLOCK(1,3,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
pfadd mm6,mm7 ; mm0=(10 ** 11 **)
|
||||
pfadd mm1,mm7 ; mm4=(12 ** 13 **)
|
||||
pfadd mm3,mm7 ; mm0=(14 ** 15 **)
|
||||
pfadd mm4,mm7 ; mm4=(16 ** 17 **)
|
||||
|
||||
movq mm5,mm6
|
||||
punpcklwd mm6,mm1 ; mm6=(10 12 ** **)
|
||||
punpckhwd mm5,mm1 ; mm5=(11 13 ** **)
|
||||
movq mm1,mm3
|
||||
punpcklwd mm3,mm4 ; mm3=(14 16 ** **)
|
||||
punpckhwd mm1,mm4 ; mm1=(15 17 ** **)
|
||||
|
||||
punpcklwd mm6,mm5 ; mm6=(10 11 12 13)
|
||||
punpcklwd mm3,mm1 ; mm3=(14 15 16 17)
|
||||
|
||||
movq MMWORD [MMBLOCK(0,0,edi,SIZEOF_JCOEF)], mm0
|
||||
movq MMWORD [MMBLOCK(0,1,edi,SIZEOF_JCOEF)], mm2
|
||||
movq MMWORD [MMBLOCK(1,0,edi,SIZEOF_JCOEF)], mm6
|
||||
movq MMWORD [MMBLOCK(1,1,edi,SIZEOF_JCOEF)], mm3
|
||||
|
||||
add esi, byte 16*SIZEOF_FAST_FLOAT
|
||||
add edx, byte 16*SIZEOF_FAST_FLOAT
|
||||
add edi, byte 16*SIZEOF_JCOEF
|
||||
dec eax
|
||||
jnz near .quantloop
|
||||
|
||||
femms ; empty MMX/3DNow! state
|
||||
|
||||
pop edi
|
||||
pop esi
|
||||
; pop edx ; need not be preserved
|
||||
; pop ecx ; unused
|
||||
; pop ebx ; unused
|
||||
pop ebp
|
||||
ret
|
||||
|
|
@ -0,0 +1,317 @@
|
|||
;
|
||||
; jf3dnflt.asm - floating-point FDCT (3DNow!)
|
||||
;
|
||||
; Copyright 2009 Pierre Ossman <ossman@cendio.se> for Cendio AB
|
||||
;
|
||||
; Based on
|
||||
; 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
|
||||
;
|
||||
; This file contains a floating-point implementation of the forward DCT
|
||||
; (Discrete Cosine Transform). The following code is based directly on
|
||||
; the IJG's original jfdctflt.c; see the jfdctflt.c for more details.
|
||||
;
|
||||
; [TAB8]
|
||||
|
||||
%include "simd/jsimdext.inc"
|
||||
%include "simd/jdct.inc"
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
SECTION SEG_CONST
|
||||
|
||||
alignz 16
|
||||
global EXTN(jconst_fdct_float_3dnow)
|
||||
|
||||
EXTN(jconst_fdct_float_3dnow):
|
||||
|
||||
PD_0_382 times 2 dd 0.382683432365089771728460
|
||||
PD_0_707 times 2 dd 0.707106781186547524400844
|
||||
PD_0_541 times 2 dd 0.541196100146196984399723
|
||||
PD_1_306 times 2 dd 1.306562964876376527856643
|
||||
|
||||
alignz 16
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
SECTION SEG_TEXT
|
||||
BITS 32
|
||||
;
|
||||
; Perform the forward DCT on one block of samples.
|
||||
;
|
||||
; GLOBAL(void)
|
||||
; jsimd_fdct_float_3dnow (FAST_FLOAT * data)
|
||||
;
|
||||
|
||||
%define data(b) (b)+8 ; FAST_FLOAT * data
|
||||
|
||||
%define original_ebp ebp+0
|
||||
%define wk(i) ebp-(WK_NUM-(i))*SIZEOF_MMWORD ; mmword wk[WK_NUM]
|
||||
%define WK_NUM 2
|
||||
|
||||
align 16
|
||||
global EXTN(jsimd_fdct_float_3dnow)
|
||||
|
||||
EXTN(jsimd_fdct_float_3dnow):
|
||||
push ebp
|
||||
mov eax,esp ; eax = original ebp
|
||||
sub esp, byte 4
|
||||
and esp, byte (-SIZEOF_MMWORD) ; align to 64 bits
|
||||
mov [esp],eax
|
||||
mov ebp,esp ; ebp = aligned ebp
|
||||
lea esp, [wk(0)]
|
||||
pushpic ebx
|
||||
; push ecx ; need not be preserved
|
||||
; push edx ; need not be preserved
|
||||
; push esi ; unused
|
||||
; push edi ; unused
|
||||
|
||||
get_GOT ebx ; get GOT address
|
||||
|
||||
; ---- Pass 1: process rows.
|
||||
|
||||
mov edx, POINTER [data(eax)] ; (FAST_FLOAT *)
|
||||
mov ecx, DCTSIZE/2
|
||||
alignx 16,7
|
||||
.rowloop:
|
||||
|
||||
movq mm0, MMWORD [MMBLOCK(0,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(1,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(0,3,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(1,3,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
; mm0=(00 01), mm1=(10 11), mm2=(06 07), mm3=(16 17)
|
||||
|
||||
movq mm4,mm0 ; transpose coefficients
|
||||
punpckldq mm0,mm1 ; mm0=(00 10)=data0
|
||||
punpckhdq mm4,mm1 ; mm4=(01 11)=data1
|
||||
movq mm5,mm2 ; transpose coefficients
|
||||
punpckldq mm2,mm3 ; mm2=(06 16)=data6
|
||||
punpckhdq mm5,mm3 ; mm5=(07 17)=data7
|
||||
|
||||
movq mm6,mm4
|
||||
movq mm7,mm0
|
||||
pfsub mm4,mm2 ; mm4=data1-data6=tmp6
|
||||
pfsub mm0,mm5 ; mm0=data0-data7=tmp7
|
||||
pfadd mm6,mm2 ; mm6=data1+data6=tmp1
|
||||
pfadd mm7,mm5 ; mm7=data0+data7=tmp0
|
||||
|
||||
movq mm1, MMWORD [MMBLOCK(0,1,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(1,1,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(0,2,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm5, MMWORD [MMBLOCK(1,2,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
; mm1=(02 03), mm3=(12 13), mm2=(04 05), mm5=(14 15)
|
||||
|
||||
movq MMWORD [wk(0)], mm4 ; wk(0)=tmp6
|
||||
movq MMWORD [wk(1)], mm0 ; wk(1)=tmp7
|
||||
|
||||
movq mm4,mm1 ; transpose coefficients
|
||||
punpckldq mm1,mm3 ; mm1=(02 12)=data2
|
||||
punpckhdq mm4,mm3 ; mm4=(03 13)=data3
|
||||
movq mm0,mm2 ; transpose coefficients
|
||||
punpckldq mm2,mm5 ; mm2=(04 14)=data4
|
||||
punpckhdq mm0,mm5 ; mm0=(05 15)=data5
|
||||
|
||||
movq mm3,mm4
|
||||
movq mm5,mm1
|
||||
pfadd mm4,mm2 ; mm4=data3+data4=tmp3
|
||||
pfadd mm1,mm0 ; mm1=data2+data5=tmp2
|
||||
pfsub mm3,mm2 ; mm3=data3-data4=tmp4
|
||||
pfsub mm5,mm0 ; mm5=data2-data5=tmp5
|
||||
|
||||
; -- Even part
|
||||
|
||||
movq mm2,mm7
|
||||
movq mm0,mm6
|
||||
pfsub mm7,mm4 ; mm7=tmp13
|
||||
pfsub mm6,mm1 ; mm6=tmp12
|
||||
pfadd mm2,mm4 ; mm2=tmp10
|
||||
pfadd mm0,mm1 ; mm0=tmp11
|
||||
|
||||
pfadd mm6,mm7
|
||||
pfmul mm6,[GOTOFF(ebx,PD_0_707)] ; mm6=z1
|
||||
|
||||
movq mm4,mm2
|
||||
movq mm1,mm7
|
||||
pfsub mm2,mm0 ; mm2=data4
|
||||
pfsub mm7,mm6 ; mm7=data6
|
||||
pfadd mm4,mm0 ; mm4=data0
|
||||
pfadd mm1,mm6 ; mm1=data2
|
||||
|
||||
movq MMWORD [MMBLOCK(0,2,edx,SIZEOF_FAST_FLOAT)], mm2
|
||||
movq MMWORD [MMBLOCK(0,3,edx,SIZEOF_FAST_FLOAT)], mm7
|
||||
movq MMWORD [MMBLOCK(0,0,edx,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(0,1,edx,SIZEOF_FAST_FLOAT)], mm1
|
||||
|
||||
; -- Odd part
|
||||
|
||||
movq mm0, MMWORD [wk(0)] ; mm0=tmp6
|
||||
movq mm6, MMWORD [wk(1)] ; mm6=tmp7
|
||||
|
||||
pfadd mm3,mm5 ; mm3=tmp10
|
||||
pfadd mm5,mm0 ; mm5=tmp11
|
||||
pfadd mm0,mm6 ; mm0=tmp12, mm6=tmp7
|
||||
|
||||
pfmul mm5,[GOTOFF(ebx,PD_0_707)] ; mm5=z3
|
||||
|
||||
movq mm2,mm3 ; mm2=tmp10
|
||||
pfsub mm3,mm0
|
||||
pfmul mm3,[GOTOFF(ebx,PD_0_382)] ; mm3=z5
|
||||
pfmul mm2,[GOTOFF(ebx,PD_0_541)] ; mm2=MULTIPLY(tmp10,FIX_0_54119610)
|
||||
pfmul mm0,[GOTOFF(ebx,PD_1_306)] ; mm0=MULTIPLY(tmp12,FIX_1_30656296)
|
||||
pfadd mm2,mm3 ; mm2=z2
|
||||
pfadd mm0,mm3 ; mm0=z4
|
||||
|
||||
movq mm7,mm6
|
||||
pfsub mm6,mm5 ; mm6=z13
|
||||
pfadd mm7,mm5 ; mm7=z11
|
||||
|
||||
movq mm4,mm6
|
||||
movq mm1,mm7
|
||||
pfsub mm6,mm2 ; mm6=data3
|
||||
pfsub mm7,mm0 ; mm7=data7
|
||||
pfadd mm4,mm2 ; mm4=data5
|
||||
pfadd mm1,mm0 ; mm1=data1
|
||||
|
||||
movq MMWORD [MMBLOCK(1,1,edx,SIZEOF_FAST_FLOAT)], mm6
|
||||
movq MMWORD [MMBLOCK(1,3,edx,SIZEOF_FAST_FLOAT)], mm7
|
||||
movq MMWORD [MMBLOCK(1,2,edx,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(1,0,edx,SIZEOF_FAST_FLOAT)], mm1
|
||||
|
||||
add edx, byte 2*DCTSIZE*SIZEOF_FAST_FLOAT
|
||||
dec ecx
|
||||
jnz near .rowloop
|
||||
|
||||
; ---- Pass 2: process columns.
|
||||
|
||||
mov edx, POINTER [data(eax)] ; (FAST_FLOAT *)
|
||||
mov ecx, DCTSIZE/2
|
||||
alignx 16,7
|
||||
.columnloop:
|
||||
|
||||
movq mm0, MMWORD [MMBLOCK(0,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(1,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(6,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(7,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
; mm0=(00 10), mm1=(01 11), mm2=(60 70), mm3=(61 71)
|
||||
|
||||
movq mm4,mm0 ; transpose coefficients
|
||||
punpckldq mm0,mm1 ; mm0=(00 01)=data0
|
||||
punpckhdq mm4,mm1 ; mm4=(10 11)=data1
|
||||
movq mm5,mm2 ; transpose coefficients
|
||||
punpckldq mm2,mm3 ; mm2=(60 61)=data6
|
||||
punpckhdq mm5,mm3 ; mm5=(70 71)=data7
|
||||
|
||||
movq mm6,mm4
|
||||
movq mm7,mm0
|
||||
pfsub mm4,mm2 ; mm4=data1-data6=tmp6
|
||||
pfsub mm0,mm5 ; mm0=data0-data7=tmp7
|
||||
pfadd mm6,mm2 ; mm6=data1+data6=tmp1
|
||||
pfadd mm7,mm5 ; mm7=data0+data7=tmp0
|
||||
|
||||
movq mm1, MMWORD [MMBLOCK(2,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(3,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(4,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
movq mm5, MMWORD [MMBLOCK(5,0,edx,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
; mm1=(20 30), mm3=(21 31), mm2=(40 50), mm5=(41 51)
|
||||
|
||||
movq MMWORD [wk(0)], mm4 ; wk(0)=tmp6
|
||||
movq MMWORD [wk(1)], mm0 ; wk(1)=tmp7
|
||||
|
||||
movq mm4,mm1 ; transpose coefficients
|
||||
punpckldq mm1,mm3 ; mm1=(20 21)=data2
|
||||
punpckhdq mm4,mm3 ; mm4=(30 31)=data3
|
||||
movq mm0,mm2 ; transpose coefficients
|
||||
punpckldq mm2,mm5 ; mm2=(40 41)=data4
|
||||
punpckhdq mm0,mm5 ; mm0=(50 51)=data5
|
||||
|
||||
movq mm3,mm4
|
||||
movq mm5,mm1
|
||||
pfadd mm4,mm2 ; mm4=data3+data4=tmp3
|
||||
pfadd mm1,mm0 ; mm1=data2+data5=tmp2
|
||||
pfsub mm3,mm2 ; mm3=data3-data4=tmp4
|
||||
pfsub mm5,mm0 ; mm5=data2-data5=tmp5
|
||||
|
||||
; -- Even part
|
||||
|
||||
movq mm2,mm7
|
||||
movq mm0,mm6
|
||||
pfsub mm7,mm4 ; mm7=tmp13
|
||||
pfsub mm6,mm1 ; mm6=tmp12
|
||||
pfadd mm2,mm4 ; mm2=tmp10
|
||||
pfadd mm0,mm1 ; mm0=tmp11
|
||||
|
||||
pfadd mm6,mm7
|
||||
pfmul mm6,[GOTOFF(ebx,PD_0_707)] ; mm6=z1
|
||||
|
||||
movq mm4,mm2
|
||||
movq mm1,mm7
|
||||
pfsub mm2,mm0 ; mm2=data4
|
||||
pfsub mm7,mm6 ; mm7=data6
|
||||
pfadd mm4,mm0 ; mm4=data0
|
||||
pfadd mm1,mm6 ; mm1=data2
|
||||
|
||||
movq MMWORD [MMBLOCK(4,0,edx,SIZEOF_FAST_FLOAT)], mm2
|
||||
movq MMWORD [MMBLOCK(6,0,edx,SIZEOF_FAST_FLOAT)], mm7
|
||||
movq MMWORD [MMBLOCK(0,0,edx,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(2,0,edx,SIZEOF_FAST_FLOAT)], mm1
|
||||
|
||||
; -- Odd part
|
||||
|
||||
movq mm0, MMWORD [wk(0)] ; mm0=tmp6
|
||||
movq mm6, MMWORD [wk(1)] ; mm6=tmp7
|
||||
|
||||
pfadd mm3,mm5 ; mm3=tmp10
|
||||
pfadd mm5,mm0 ; mm5=tmp11
|
||||
pfadd mm0,mm6 ; mm0=tmp12, mm6=tmp7
|
||||
|
||||
pfmul mm5,[GOTOFF(ebx,PD_0_707)] ; mm5=z3
|
||||
|
||||
movq mm2,mm3 ; mm2=tmp10
|
||||
pfsub mm3,mm0
|
||||
pfmul mm3,[GOTOFF(ebx,PD_0_382)] ; mm3=z5
|
||||
pfmul mm2,[GOTOFF(ebx,PD_0_541)] ; mm2=MULTIPLY(tmp10,FIX_0_54119610)
|
||||
pfmul mm0,[GOTOFF(ebx,PD_1_306)] ; mm0=MULTIPLY(tmp12,FIX_1_30656296)
|
||||
pfadd mm2,mm3 ; mm2=z2
|
||||
pfadd mm0,mm3 ; mm0=z4
|
||||
|
||||
movq mm7,mm6
|
||||
pfsub mm6,mm5 ; mm6=z13
|
||||
pfadd mm7,mm5 ; mm7=z11
|
||||
|
||||
movq mm4,mm6
|
||||
movq mm1,mm7
|
||||
pfsub mm6,mm2 ; mm6=data3
|
||||
pfsub mm7,mm0 ; mm7=data7
|
||||
pfadd mm4,mm2 ; mm4=data5
|
||||
pfadd mm1,mm0 ; mm1=data1
|
||||
|
||||
movq MMWORD [MMBLOCK(3,0,edx,SIZEOF_FAST_FLOAT)], mm6
|
||||
movq MMWORD [MMBLOCK(7,0,edx,SIZEOF_FAST_FLOAT)], mm7
|
||||
movq MMWORD [MMBLOCK(5,0,edx,SIZEOF_FAST_FLOAT)], mm4
|
||||
movq MMWORD [MMBLOCK(1,0,edx,SIZEOF_FAST_FLOAT)], mm1
|
||||
|
||||
add edx, byte 2*SIZEOF_FAST_FLOAT
|
||||
dec ecx
|
||||
jnz near .columnloop
|
||||
|
||||
femms ; empty MMX/3DNow! state
|
||||
|
||||
; pop edi ; unused
|
||||
; pop esi ; unused
|
||||
; pop edx ; need not be preserved
|
||||
; pop ecx ; need not be preserved
|
||||
poppic ebx
|
||||
mov esp,ebp ; esp <- aligned ebp
|
||||
pop esp ; esp <- original ebp
|
||||
pop ebp
|
||||
ret
|
||||
|
|
@ -0,0 +1,449 @@
|
|||
;
|
||||
; ji3dnflt.asm - floating-point IDCT (3DNow! & MMX)
|
||||
;
|
||||
; Copyright 2009 Pierre Ossman <ossman@cendio.se> for Cendio AB
|
||||
;
|
||||
; Based on
|
||||
; 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
|
||||
;
|
||||
; This file contains a floating-point implementation of the inverse DCT
|
||||
; (Discrete Cosine Transform). The following code is based directly on
|
||||
; the IJG's original jidctflt.c; see the jidctflt.c for more details.
|
||||
;
|
||||
; [TAB8]
|
||||
|
||||
%include "simd/jsimdext.inc"
|
||||
%include "simd/jdct.inc"
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
SECTION SEG_CONST
|
||||
|
||||
alignz 16
|
||||
global EXTN(jconst_idct_float_3dnow)
|
||||
|
||||
EXTN(jconst_idct_float_3dnow):
|
||||
|
||||
PD_1_414 times 2 dd 1.414213562373095048801689
|
||||
PD_1_847 times 2 dd 1.847759065022573512256366
|
||||
PD_1_082 times 2 dd 1.082392200292393968799446
|
||||
PD_2_613 times 2 dd 2.613125929752753055713286
|
||||
PD_RNDINT_MAGIC times 2 dd 100663296.0 ; (float)(0x00C00000 << 3)
|
||||
PB_CENTERJSAMP times 8 db CENTERJSAMPLE
|
||||
|
||||
alignz 16
|
||||
|
||||
; --------------------------------------------------------------------------
|
||||
SECTION SEG_TEXT
|
||||
BITS 32
|
||||
;
|
||||
; Perform dequantization and inverse DCT on one block of coefficients.
|
||||
;
|
||||
; GLOBAL(void)
|
||||
; jsimd_idct_float_3dnow (void * dct_table, JCOEFPTR coef_block,
|
||||
; JSAMPARRAY output_buf, JDIMENSION output_col)
|
||||
;
|
||||
|
||||
%define dct_table(b) (b)+8 ; void * dct_table
|
||||
%define coef_block(b) (b)+12 ; JCOEFPTR coef_block
|
||||
%define output_buf(b) (b)+16 ; JSAMPARRAY output_buf
|
||||
%define output_col(b) (b)+20 ; JDIMENSION output_col
|
||||
|
||||
%define original_ebp ebp+0
|
||||
%define wk(i) ebp-(WK_NUM-(i))*SIZEOF_MMWORD ; mmword wk[WK_NUM]
|
||||
%define WK_NUM 2
|
||||
%define workspace wk(0)-DCTSIZE2*SIZEOF_FAST_FLOAT
|
||||
; FAST_FLOAT workspace[DCTSIZE2]
|
||||
|
||||
align 16
|
||||
global EXTN(jsimd_idct_float_3dnow)
|
||||
|
||||
EXTN(jsimd_idct_float_3dnow):
|
||||
push ebp
|
||||
mov eax,esp ; eax = original ebp
|
||||
sub esp, byte 4
|
||||
and esp, byte (-SIZEOF_MMWORD) ; align to 64 bits
|
||||
mov [esp],eax
|
||||
mov ebp,esp ; ebp = aligned ebp
|
||||
lea esp, [workspace]
|
||||
push ebx
|
||||
; push ecx ; need not be preserved
|
||||
; push edx ; need not be preserved
|
||||
push esi
|
||||
push edi
|
||||
|
||||
get_GOT ebx ; get GOT address
|
||||
|
||||
; ---- Pass 1: process columns from input, store into work array.
|
||||
|
||||
; mov eax, [original_ebp]
|
||||
mov edx, POINTER [dct_table(eax)] ; quantptr
|
||||
mov esi, JCOEFPTR [coef_block(eax)] ; inptr
|
||||
lea edi, [workspace] ; FAST_FLOAT * wsptr
|
||||
mov ecx, DCTSIZE/2 ; ctr
|
||||
alignx 16,7
|
||||
.columnloop:
|
||||
%ifndef NO_ZERO_COLUMN_TEST_FLOAT_3DNOW
|
||||
mov eax, DWORD [DWBLOCK(1,0,esi,SIZEOF_JCOEF)]
|
||||
or eax, DWORD [DWBLOCK(2,0,esi,SIZEOF_JCOEF)]
|
||||
jnz short .columnDCT
|
||||
|
||||
pushpic ebx ; save GOT address
|
||||
mov ebx, DWORD [DWBLOCK(3,0,esi,SIZEOF_JCOEF)]
|
||||
mov eax, DWORD [DWBLOCK(4,0,esi,SIZEOF_JCOEF)]
|
||||
or ebx, DWORD [DWBLOCK(5,0,esi,SIZEOF_JCOEF)]
|
||||
or eax, DWORD [DWBLOCK(6,0,esi,SIZEOF_JCOEF)]
|
||||
or ebx, DWORD [DWBLOCK(7,0,esi,SIZEOF_JCOEF)]
|
||||
or eax,ebx
|
||||
poppic ebx ; restore GOT address
|
||||
jnz short .columnDCT
|
||||
|
||||
; -- AC terms all zero
|
||||
|
||||
movd mm0, DWORD [DWBLOCK(0,0,esi,SIZEOF_JCOEF)]
|
||||
|
||||
punpcklwd mm0,mm0
|
||||
psrad mm0,(DWORD_BIT-WORD_BIT)
|
||||
pi2fd mm0,mm0
|
||||
|
||||
pfmul mm0, MMWORD [MMBLOCK(0,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
|
||||
movq mm1,mm0
|
||||
punpckldq mm0,mm0
|
||||
punpckhdq mm1,mm1
|
||||
|
||||
movq MMWORD [MMBLOCK(0,0,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(0,1,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(0,2,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(0,3,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(1,0,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
movq MMWORD [MMBLOCK(1,1,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
movq MMWORD [MMBLOCK(1,2,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
movq MMWORD [MMBLOCK(1,3,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
jmp near .nextcolumn
|
||||
alignx 16,7
|
||||
%endif
|
||||
.columnDCT:
|
||||
|
||||
; -- Even part
|
||||
|
||||
movd mm0, DWORD [DWBLOCK(0,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm1, DWORD [DWBLOCK(2,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm2, DWORD [DWBLOCK(4,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm3, DWORD [DWBLOCK(6,0,esi,SIZEOF_JCOEF)]
|
||||
|
||||
punpcklwd mm0,mm0
|
||||
punpcklwd mm1,mm1
|
||||
psrad mm0,(DWORD_BIT-WORD_BIT)
|
||||
psrad mm1,(DWORD_BIT-WORD_BIT)
|
||||
pi2fd mm0,mm0
|
||||
pi2fd mm1,mm1
|
||||
|
||||
pfmul mm0, MMWORD [MMBLOCK(0,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
pfmul mm1, MMWORD [MMBLOCK(2,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
|
||||
punpcklwd mm2,mm2
|
||||
punpcklwd mm3,mm3
|
||||
psrad mm2,(DWORD_BIT-WORD_BIT)
|
||||
psrad mm3,(DWORD_BIT-WORD_BIT)
|
||||
pi2fd mm2,mm2
|
||||
pi2fd mm3,mm3
|
||||
|
||||
pfmul mm2, MMWORD [MMBLOCK(4,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
pfmul mm3, MMWORD [MMBLOCK(6,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
|
||||
movq mm4,mm0
|
||||
movq mm5,mm1
|
||||
pfsub mm0,mm2 ; mm0=tmp11
|
||||
pfsub mm1,mm3
|
||||
pfadd mm4,mm2 ; mm4=tmp10
|
||||
pfadd mm5,mm3 ; mm5=tmp13
|
||||
|
||||
pfmul mm1,[GOTOFF(ebx,PD_1_414)]
|
||||
pfsub mm1,mm5 ; mm1=tmp12
|
||||
|
||||
movq mm6,mm4
|
||||
movq mm7,mm0
|
||||
pfsub mm4,mm5 ; mm4=tmp3
|
||||
pfsub mm0,mm1 ; mm0=tmp2
|
||||
pfadd mm6,mm5 ; mm6=tmp0
|
||||
pfadd mm7,mm1 ; mm7=tmp1
|
||||
|
||||
movq MMWORD [wk(1)], mm4 ; tmp3
|
||||
movq MMWORD [wk(0)], mm0 ; tmp2
|
||||
|
||||
; -- Odd part
|
||||
|
||||
movd mm2, DWORD [DWBLOCK(1,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm3, DWORD [DWBLOCK(3,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm5, DWORD [DWBLOCK(5,0,esi,SIZEOF_JCOEF)]
|
||||
movd mm1, DWORD [DWBLOCK(7,0,esi,SIZEOF_JCOEF)]
|
||||
|
||||
punpcklwd mm2,mm2
|
||||
punpcklwd mm3,mm3
|
||||
psrad mm2,(DWORD_BIT-WORD_BIT)
|
||||
psrad mm3,(DWORD_BIT-WORD_BIT)
|
||||
pi2fd mm2,mm2
|
||||
pi2fd mm3,mm3
|
||||
|
||||
pfmul mm2, MMWORD [MMBLOCK(1,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
pfmul mm3, MMWORD [MMBLOCK(3,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
|
||||
punpcklwd mm5,mm5
|
||||
punpcklwd mm1,mm1
|
||||
psrad mm5,(DWORD_BIT-WORD_BIT)
|
||||
psrad mm1,(DWORD_BIT-WORD_BIT)
|
||||
pi2fd mm5,mm5
|
||||
pi2fd mm1,mm1
|
||||
|
||||
pfmul mm5, MMWORD [MMBLOCK(5,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
pfmul mm1, MMWORD [MMBLOCK(7,0,edx,SIZEOF_FLOAT_MULT_TYPE)]
|
||||
|
||||
movq mm4,mm2
|
||||
movq mm0,mm5
|
||||
pfadd mm2,mm1 ; mm2=z11
|
||||
pfadd mm5,mm3 ; mm5=z13
|
||||
pfsub mm4,mm1 ; mm4=z12
|
||||
pfsub mm0,mm3 ; mm0=z10
|
||||
|
||||
movq mm1,mm2
|
||||
pfsub mm2,mm5
|
||||
pfadd mm1,mm5 ; mm1=tmp7
|
||||
|
||||
pfmul mm2,[GOTOFF(ebx,PD_1_414)] ; mm2=tmp11
|
||||
|
||||
movq mm3,mm0
|
||||
pfadd mm0,mm4
|
||||
pfmul mm0,[GOTOFF(ebx,PD_1_847)] ; mm0=z5
|
||||
pfmul mm3,[GOTOFF(ebx,PD_2_613)] ; mm3=(z10 * 2.613125930)
|
||||
pfmul mm4,[GOTOFF(ebx,PD_1_082)] ; mm4=(z12 * 1.082392200)
|
||||
pfsubr mm3,mm0 ; mm3=tmp12
|
||||
pfsub mm4,mm0 ; mm4=tmp10
|
||||
|
||||
; -- Final output stage
|
||||
|
||||
pfsub mm3,mm1 ; mm3=tmp6
|
||||
movq mm5,mm6
|
||||
movq mm0,mm7
|
||||
pfadd mm6,mm1 ; mm6=data0=(00 01)
|
||||
pfadd mm7,mm3 ; mm7=data1=(10 11)
|
||||
pfsub mm5,mm1 ; mm5=data7=(70 71)
|
||||
pfsub mm0,mm3 ; mm0=data6=(60 61)
|
||||
pfsub mm2,mm3 ; mm2=tmp5
|
||||
|
||||
movq mm1,mm6 ; transpose coefficients
|
||||
punpckldq mm6,mm7 ; mm6=(00 10)
|
||||
punpckhdq mm1,mm7 ; mm1=(01 11)
|
||||
movq mm3,mm0 ; transpose coefficients
|
||||
punpckldq mm0,mm5 ; mm0=(60 70)
|
||||
punpckhdq mm3,mm5 ; mm3=(61 71)
|
||||
|
||||
movq MMWORD [MMBLOCK(0,0,edi,SIZEOF_FAST_FLOAT)], mm6
|
||||
movq MMWORD [MMBLOCK(1,0,edi,SIZEOF_FAST_FLOAT)], mm1
|
||||
movq MMWORD [MMBLOCK(0,3,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(1,3,edi,SIZEOF_FAST_FLOAT)], mm3
|
||||
|
||||
movq mm7, MMWORD [wk(0)] ; mm7=tmp2
|
||||
movq mm5, MMWORD [wk(1)] ; mm5=tmp3
|
||||
|
||||
pfadd mm4,mm2 ; mm4=tmp4
|
||||
movq mm6,mm7
|
||||
movq mm1,mm5
|
||||
pfadd mm7,mm2 ; mm7=data2=(20 21)
|
||||
pfadd mm5,mm4 ; mm5=data4=(40 41)
|
||||
pfsub mm6,mm2 ; mm6=data5=(50 51)
|
||||
pfsub mm1,mm4 ; mm1=data3=(30 31)
|
||||
|
||||
movq mm0,mm7 ; transpose coefficients
|
||||
punpckldq mm7,mm1 ; mm7=(20 30)
|
||||
punpckhdq mm0,mm1 ; mm0=(21 31)
|
||||
movq mm3,mm5 ; transpose coefficients
|
||||
punpckldq mm5,mm6 ; mm5=(40 50)
|
||||
punpckhdq mm3,mm6 ; mm3=(41 51)
|
||||
|
||||
movq MMWORD [MMBLOCK(0,1,edi,SIZEOF_FAST_FLOAT)], mm7
|
||||
movq MMWORD [MMBLOCK(1,1,edi,SIZEOF_FAST_FLOAT)], mm0
|
||||
movq MMWORD [MMBLOCK(0,2,edi,SIZEOF_FAST_FLOAT)], mm5
|
||||
movq MMWORD [MMBLOCK(1,2,edi,SIZEOF_FAST_FLOAT)], mm3
|
||||
|
||||
.nextcolumn:
|
||||
add esi, byte 2*SIZEOF_JCOEF ; coef_block
|
||||
add edx, byte 2*SIZEOF_FLOAT_MULT_TYPE ; quantptr
|
||||
add edi, byte 2*DCTSIZE*SIZEOF_FAST_FLOAT ; wsptr
|
||||
dec ecx ; ctr
|
||||
jnz near .columnloop
|
||||
|
||||
; -- Prefetch the next coefficient block
|
||||
|
||||
prefetch [esi + (DCTSIZE2-8)*SIZEOF_JCOEF + 0*32]
|
||||
prefetch [esi + (DCTSIZE2-8)*SIZEOF_JCOEF + 1*32]
|
||||
prefetch [esi + (DCTSIZE2-8)*SIZEOF_JCOEF + 2*32]
|
||||
prefetch [esi + (DCTSIZE2-8)*SIZEOF_JCOEF + 3*32]
|
||||
|
||||
; ---- Pass 2: process rows from work array, store into output array.
|
||||
|
||||
mov eax, [original_ebp]
|
||||
lea esi, [workspace] ; FAST_FLOAT * wsptr
|
||||
mov edi, JSAMPARRAY [output_buf(eax)] ; (JSAMPROW *)
|
||||
mov eax, JDIMENSION [output_col(eax)]
|
||||
mov ecx, DCTSIZE/2 ; ctr
|
||||
alignx 16,7
|
||||
.rowloop:
|
||||
|
||||
; -- Even part
|
||||
|
||||
movq mm0, MMWORD [MMBLOCK(0,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(2,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm2, MMWORD [MMBLOCK(4,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(6,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
movq mm4,mm0
|
||||
movq mm5,mm1
|
||||
pfsub mm0,mm2 ; mm0=tmp11
|
||||
pfsub mm1,mm3
|
||||
pfadd mm4,mm2 ; mm4=tmp10
|
||||
pfadd mm5,mm3 ; mm5=tmp13
|
||||
|
||||
pfmul mm1,[GOTOFF(ebx,PD_1_414)]
|
||||
pfsub mm1,mm5 ; mm1=tmp12
|
||||
|
||||
movq mm6,mm4
|
||||
movq mm7,mm0
|
||||
pfsub mm4,mm5 ; mm4=tmp3
|
||||
pfsub mm0,mm1 ; mm0=tmp2
|
||||
pfadd mm6,mm5 ; mm6=tmp0
|
||||
pfadd mm7,mm1 ; mm7=tmp1
|
||||
|
||||
movq MMWORD [wk(1)], mm4 ; tmp3
|
||||
movq MMWORD [wk(0)], mm0 ; tmp2
|
||||
|
||||
; -- Odd part
|
||||
|
||||
movq mm2, MMWORD [MMBLOCK(1,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm3, MMWORD [MMBLOCK(3,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm5, MMWORD [MMBLOCK(5,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
movq mm1, MMWORD [MMBLOCK(7,0,esi,SIZEOF_FAST_FLOAT)]
|
||||
|
||||
movq mm4,mm2
|
||||
movq mm0,mm5
|
||||
pfadd mm2,mm1 ; mm2=z11
|
||||
pfadd mm5,mm3 ; mm5=z13
|
||||
pfsub mm4,mm1 ; mm4=z12
|
||||
pfsub mm0,mm3 ; mm0=z10
|
||||
|
||||
movq mm1,mm2
|
||||
pfsub mm2,mm5
|
||||
pfadd mm1,mm5 ; mm1=tmp7
|
||||
|
||||
pfmul mm2,[GOTOFF(ebx,PD_1_414)] ; mm2=tmp11
|
||||
|
||||
movq mm3,mm0
|
||||
pfadd mm0,mm4
|
||||
pfmul mm0,[GOTOFF(ebx,PD_1_847)] ; mm0=z5
|
||||
pfmul mm3,[GOTOFF(ebx,PD_2_613)] ; mm3=(z10 * 2.613125930)
|
||||
pfmul mm4,[GOTOFF(ebx,PD_1_082)] ; mm4=(z12 * 1.082392200)
|
||||
pfsubr mm3,mm0 ; mm3=tmp12
|
||||
pfsub mm4,mm0 ; mm4=tmp10
|
||||
|
||||
; -- Final output stage
|
||||
|
||||
pfsub mm3,mm1 ; mm3=tmp6
|
||||
movq mm5,mm6
|
||||
movq mm0,mm7
|
||||
pfadd mm6,mm1 ; mm6=data0=(00 10)
|
||||
pfadd mm7,mm3 ; mm7=data1=(01 11)
|
||||
pfsub mm5,mm1 ; mm5=data7=(07 17)
|
||||
pfsub mm0,mm3 ; mm0=data6=(06 16)
|
||||
pfsub mm2,mm3 ; mm2=tmp5
|
||||
|
||||
movq mm1,[GOTOFF(ebx,PD_RNDINT_MAGIC)] ; mm1=[PD_RNDINT_MAGIC]
|
||||
pcmpeqd mm3,mm3
|
||||
psrld mm3,WORD_BIT ; mm3={0xFFFF 0x0000 0xFFFF 0x0000}
|
||||
|
||||
pfadd mm6,mm1 ; mm6=roundint(data0/8)=(00 ** 10 **)
|
||||
pfadd mm7,mm1 ; mm7=roundint(data1/8)=(01 ** 11 **)
|
||||
pfadd mm0,mm1 ; mm0=roundint(data6/8)=(06 ** 16 **)
|
||||
pfadd mm5,mm1 ; mm5=roundint(data7/8)=(07 ** 17 **)
|
||||
|
||||
pand mm6,mm3 ; mm6=(00 -- 10 --)
|
||||
pslld mm7,WORD_BIT ; mm7=(-- 01 -- 11)
|
||||
pand mm0,mm3 ; mm0=(06 -- 16 --)
|
||||
pslld mm5,WORD_BIT ; mm5=(-- 07 -- 17)
|
||||
por mm6,mm7 ; mm6=(00 01 10 11)
|
||||
por mm0,mm5 ; mm0=(06 07 16 17)
|
||||
|
||||
movq mm1, MMWORD [wk(0)] ; mm1=tmp2
|
||||
movq mm3, MMWORD [wk(1)] ; mm3=tmp3
|
||||
|
||||
pfadd mm4,mm2 ; mm4=tmp4
|
||||
movq mm7,mm1
|
||||
movq mm5,mm3
|
||||
pfadd mm1,mm2 ; mm1=data2=(02 12)
|
||||
pfadd mm3,mm4 ; mm3=data4=(04 14)
|
||||
pfsub mm7,mm2 ; mm7=data5=(05 15)
|
||||
pfsub mm5,mm4 ; mm5=data3=(03 13)
|
||||
|
||||
movq mm2,[GOTOFF(ebx,PD_RNDINT_MAGIC)] ; mm2=[PD_RNDINT_MAGIC]
|
||||
pcmpeqd mm4,mm4
|
||||
psrld mm4,WORD_BIT ; mm4={0xFFFF 0x0000 0xFFFF 0x0000}
|
||||
|
||||
pfadd mm3,mm2 ; mm3=roundint(data4/8)=(04 ** 14 **)
|
||||
pfadd mm7,mm2 ; mm7=roundint(data5/8)=(05 ** 15 **)
|
||||
pfadd mm1,mm2 ; mm1=roundint(data2/8)=(02 ** 12 **)
|
||||
pfadd mm5,mm2 ; mm5=roundint(data3/8)=(03 ** 13 **)
|
||||
|
||||
pand mm3,mm4 ; mm3=(04 -- 14 --)
|
||||
pslld mm7,WORD_BIT ; mm7=(-- 05 -- 15)
|
||||
pand mm1,mm4 ; mm1=(02 -- 12 --)
|
||||
pslld mm5,WORD_BIT ; mm5=(-- 03 -- 13)
|
||||
por mm3,mm7 ; mm3=(04 05 14 15)
|
||||
por mm1,mm5 ; mm1=(02 03 12 13)
|
||||
|
||||
movq mm2,[GOTOFF(ebx,PB_CENTERJSAMP)] ; mm2=[PB_CENTERJSAMP]
|
||||
|
||||
packsswb mm6,mm3 ; mm6=(00 01 10 11 04 05 14 15)
|
||||
packsswb mm1,mm0 ; mm1=(02 03 12 13 06 07 16 17)
|
||||
paddb mm6,mm2
|
||||
paddb mm1,mm2
|
||||
|
||||
movq mm4,mm6 ; transpose coefficients(phase 2)
|
||||
punpcklwd mm6,mm1 ; mm6=(00 01 02 03 10 11 12 13)
|
||||
punpckhwd mm4,mm1 ; mm4=(04 05 06 07 14 15 16 17)
|
||||
|
||||
movq mm7,mm6 ; transpose coefficients(phase 3)
|
||||
punpckldq mm6,mm4 ; mm6=(00 01 02 03 04 05 06 07)
|
||||
punpckhdq mm7,mm4 ; mm7=(10 11 12 13 14 15 16 17)
|
||||
|
||||
pushpic ebx ; save GOT address
|
||||
|
||||
mov edx, JSAMPROW [edi+0*SIZEOF_JSAMPROW]
|
||||
mov ebx, JSAMPROW [edi+1*SIZEOF_JSAMPROW]
|
||||
movq MMWORD [edx+eax*SIZEOF_JSAMPLE], mm6
|
||||
movq MMWORD [ebx+eax*SIZEOF_JSAMPLE], mm7
|
||||
|
||||
poppic ebx ; restore GOT address
|
||||
|
||||
add esi, byte 2*SIZEOF_FAST_FLOAT ; wsptr
|
||||
add edi, byte 2*SIZEOF_JSAMPROW
|
||||
dec ecx ; ctr
|
||||
jnz near .rowloop
|
||||
|
||||
femms ; empty MMX/3DNow! state
|
||||
|
||||
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
|
||||
|
20
simd/jsimd.h
20
simd/jsimd.h
|
@ -12,6 +12,7 @@
|
|||
|
||||
#define JSIMD_NONE 0x00
|
||||
#define JSIMD_MMX 0x01
|
||||
#define JSIMD_3DNOW 0x02
|
||||
|
||||
/* Short forms of external names for systems with brain-damaged linkers. */
|
||||
|
||||
|
@ -28,13 +29,17 @@
|
|||
#define jsimd_h2v2_merged_upsample_mmx jSMUpH2V2M
|
||||
#define jsimd_h2v1_merged_upsample_mmx jSMUpH2V1M
|
||||
#define jsimd_convsamp_mmx jSConvM
|
||||
#define jsimd_convsamp_float_3dnow jSConvF3D
|
||||
#define jsimd_fdct_islow_mmx jSFDMIS
|
||||
#define jsimd_fdct_ifast_mmx jSFDMIF
|
||||
#define jsimd_fdct_float_3dnow jSFD3DF
|
||||
#define jsimd_quantize_mmx jSQuantM
|
||||
#define jsimd_quantize_float_3dnow jSQuantF3D
|
||||
#define jsimd_idct_2x2_mmx jSIDM22
|
||||
#define jsimd_idct_4x4_mmx jSIDM44
|
||||
#define jsimd_idct_islow_mmx jSIDMIS
|
||||
#define jsimd_idct_ifast_mmx jSIDMIF
|
||||
#define jsimd_idct_float_3dnow jSID3DF
|
||||
#endif /* NEED_SHORT_EXTERNAL_NAMES */
|
||||
|
||||
/* SIMD Ext: retrieve SIMD/CPU information */
|
||||
|
@ -87,15 +92,25 @@ EXTERN(void) jsimd_convsamp_mmx JPP((JSAMPARRAY sample_data,
|
|||
JDIMENSION start_col,
|
||||
DCTELEM * workspace));
|
||||
|
||||
EXTERN(void) jsimd_convsamp_float_3dnow JPP((JSAMPARRAY sample_data,
|
||||
JDIMENSION start_col,
|
||||
FAST_FLOAT * workspace));
|
||||
|
||||
/* SIMD Forward DCT */
|
||||
EXTERN(void) jsimd_fdct_islow_mmx JPP((DCTELEM * data));
|
||||
EXTERN(void) jsimd_fdct_ifast_mmx JPP((DCTELEM * data));
|
||||
|
||||
EXTERN(void) jsimd_fdct_float_3dnow JPP((FAST_FLOAT * data));
|
||||
|
||||
/* SIMD Quantization */
|
||||
EXTERN(void) jsimd_quantize_mmx JPP((JCOEFPTR coef_block,
|
||||
DCTELEM * divisors,
|
||||
DCTELEM * workspace));
|
||||
|
||||
EXTERN(void) jsimd_quantize_float_3dnow JPP((JCOEFPTR coef_block,
|
||||
FAST_FLOAT * divisors,
|
||||
FAST_FLOAT * workspace));
|
||||
|
||||
/* SIMD Reduced Inverse DCT */
|
||||
EXTERN(void) jsimd_idct_2x2_mmx JPP((void * dct_table,
|
||||
JCOEFPTR coef_block,
|
||||
|
@ -116,3 +131,8 @@ EXTERN(void) jsimd_idct_ifast_mmx JPP((void * dct_table,
|
|||
JSAMPARRAY output_buf,
|
||||
JDIMENSION output_col));
|
||||
|
||||
EXTERN(void) jsimd_idct_float_3dnow JPP((void * dct_table,
|
||||
JCOEFPTR coef_block,
|
||||
JSAMPARRAY output_buf,
|
||||
JDIMENSION output_col));
|
||||
|
||||
|
|
|
@ -76,6 +76,9 @@ definev(CENTERJSAMPLE)
|
|||
%define DCTELEM word ; short
|
||||
%define SIZEOF_DCTELEM SIZEOF_WORD ; sizeof(DCTELEM)
|
||||
|
||||
%define FAST_FLOAT FP32 ; float
|
||||
%define SIZEOF_FAST_FLOAT SIZEOF_FP32 ; sizeof(FAST_FLOAT)
|
||||
|
||||
; To maximize parallelism, Type MULTIPLIER is changed to short.
|
||||
;
|
||||
%define ISLOW_MULT_TYPE word ; must be short
|
||||
|
@ -85,12 +88,16 @@ definev(CENTERJSAMPLE)
|
|||
%define SIZEOF_IFAST_MULT_TYPE SIZEOF_WORD ; sizeof(IFAST_MULT_TYPE)
|
||||
%define IFAST_SCALE_BITS 2 ; fractional bits in scale factors
|
||||
|
||||
%define FLOAT_MULT_TYPE FP32 ; must be float
|
||||
%define SIZEOF_FLOAT_MULT_TYPE SIZEOF_FP32 ; sizeof(FLOAT_MULT_TYPE)
|
||||
|
||||
;
|
||||
; -- jsimd.h
|
||||
;
|
||||
|
||||
definev(JSIMD_NONE)
|
||||
definev(JSIMD_MMX)
|
||||
definev(JSIMD_3DNOW)
|
||||
|
||||
; Short forms of external names for systems with brain-damaged linkers.
|
||||
;
|
||||
|
@ -107,12 +114,16 @@ definev(jsimd_h2v2_fancy_upsample_mmx)
|
|||
definev(jsimd_h2v1_merged_upsample_mmx)
|
||||
definev(jsimd_h2v2_merged_upsample_mmx)
|
||||
definev(jsimd_convsamp_mmx)
|
||||
definev(jsimd_convsamp_float_3dnow)
|
||||
definev(jsimd_fdct_islow_mmx)
|
||||
definev(jsimd_fdct_ifast_mmx)
|
||||
definev(jsimd_fdct_float_3dnow)
|
||||
definev(jsimd_quantize_mmx)
|
||||
definev(jsimd_quantize_float_3dnow)
|
||||
definev(jsimd_idct_2x2_mmx)
|
||||
definev(jsimd_idct_4x4_mmx)
|
||||
definev(jsimd_idct_islow_mmx)
|
||||
definev(jsimd_idct_ifast_mmx)
|
||||
definev(jsimd_idct_float_3dnow)
|
||||
#endif /* NEED_SHORT_EXTERNAL_NAMES */
|
||||
|
||||
|
|
|
@ -67,6 +67,21 @@ EXTN(jpeg_simd_cpu_support):
|
|||
or edi, byte JSIMD_MMX
|
||||
.no_mmx:
|
||||
|
||||
; Check for 3DNow! instruction support
|
||||
mov eax, 0x80000000
|
||||
cpuid
|
||||
cmp eax, 0x80000000
|
||||
jbe short .return
|
||||
|
||||
mov eax, 0x80000001
|
||||
cpuid
|
||||
mov eax,edx ; eax = Extended feature flags
|
||||
|
||||
test eax, 1<<31 ; bit31:3DNow!(vendor independent)
|
||||
jz short .no_3dnow
|
||||
or edi, byte JSIMD_3DNOW
|
||||
.no_3dnow:
|
||||
|
||||
.return:
|
||||
mov eax,edi
|
||||
|
||||
|
|
|
@ -111,6 +111,10 @@
|
|||
%define SIZEOF_INT SIZEOF_DWORD ; sizeof(INT)
|
||||
%define INT_BIT DWORD_BIT ; sizeof(INT)*BYTE_BIT
|
||||
|
||||
%define FP32 dword ; IEEE754 single
|
||||
%define SIZEOF_FP32 SIZEOF_DWORD ; sizeof(FP32)
|
||||
%define FP32_BIT DWORD_BIT ; sizeof(FP32)*BYTE_BIT
|
||||
|
||||
%define MMWORD qword ; int64 (MMX register)
|
||||
%define SIZEOF_MMWORD SIZEOF_QWORD ; sizeof(MMWORD)
|
||||
%define MMWORD_BIT QWORD_BIT ; sizeof(MMWORD)*BYTE_BIT
|
||||
|
|
Загрузка…
Ссылка в новой задаче