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:
Pierre Ossman 2009-03-09 13:28:10 +00:00
Родитель 5eb84ff97f a2e6a9dd47
Коммит 65d0317346
9 изменённых файлов: 1114 добавлений и 1 удалений

Просмотреть файл

@ -25,7 +25,8 @@ libjpeg_la_SOURCES += simd/jsimd.h simd/jsimdcfg.inc.h \
simd/jccolmmx.asm simd/jdcolmmx.asm \ simd/jccolmmx.asm simd/jdcolmmx.asm \
simd/jcsammmx.asm simd/jdsammmx.asm simd/jdmermmx.asm \ simd/jcsammmx.asm simd/jdsammmx.asm simd/jdmermmx.asm \
simd/jcqntmmx.asm simd/jfmmxfst.asm simd/jfmmxint.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 endif

66
jsimd.c
Просмотреть файл

@ -364,6 +364,19 @@ jsimd_can_convsamp_float (void)
{ {
init_simd(); 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; return 0;
} }
@ -381,6 +394,10 @@ GLOBAL(void)
jsimd_convsamp_float (JSAMPARRAY sample_data, JDIMENSION start_col, jsimd_convsamp_float (JSAMPARRAY sample_data, JDIMENSION start_col,
FAST_FLOAT * workspace) FAST_FLOAT * workspace)
{ {
#ifdef WITH_SIMD
if (simd_support & JSIMD_3DNOW)
jsimd_convsamp_float_3dnow(sample_data, start_col, workspace);
#endif
} }
GLOBAL(int) GLOBAL(int)
@ -422,6 +439,15 @@ jsimd_can_fdct_float (void)
{ {
init_simd(); 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; return 0;
} }
@ -446,6 +472,10 @@ jsimd_fdct_ifast (DCTELEM * data)
GLOBAL(void) GLOBAL(void)
jsimd_fdct_float (FAST_FLOAT * data) jsimd_fdct_float (FAST_FLOAT * data)
{ {
#ifdef WITH_SIMD
if (simd_support & JSIMD_3DNOW)
jsimd_fdct_float_3dnow(data);
#endif
} }
GLOBAL(int) GLOBAL(int)
@ -472,6 +502,17 @@ jsimd_can_quantize_float (void)
{ {
init_simd(); 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; return 0;
} }
@ -489,6 +530,10 @@ GLOBAL(void)
jsimd_quantize_float (JCOEFPTR coef_block, FAST_FLOAT * divisors, jsimd_quantize_float (JCOEFPTR coef_block, FAST_FLOAT * divisors,
FAST_FLOAT * workspace) FAST_FLOAT * workspace)
{ {
#ifdef WITH_SIMD
if (simd_support & JSIMD_3DNOW)
jsimd_quantize_float_3dnow(coef_block, divisors, workspace);
#endif
} }
GLOBAL(int) GLOBAL(int)
@ -612,6 +657,22 @@ jsimd_can_idct_float (void)
{ {
init_simd(); 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; return 0;
} }
@ -642,5 +703,10 @@ jsimd_idct_float (j_decompress_ptr cinfo, jpeg_component_info * compptr,
JCOEFPTR coef_block, JSAMPARRAY output_buf, JCOEFPTR coef_block, JSAMPARRAY output_buf,
JDIMENSION output_col) 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
} }

230
simd/jcqnt3dn.asm Normal file
Просмотреть файл

@ -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

317
simd/jf3dnflt.asm Normal file
Просмотреть файл

@ -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

449
simd/ji3dnflt.asm Normal file
Просмотреть файл

@ -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

Просмотреть файл

@ -12,6 +12,7 @@
#define JSIMD_NONE 0x00 #define JSIMD_NONE 0x00
#define JSIMD_MMX 0x01 #define JSIMD_MMX 0x01
#define JSIMD_3DNOW 0x02
/* Short forms of external names for systems with brain-damaged linkers. */ /* Short forms of external names for systems with brain-damaged linkers. */
@ -28,13 +29,17 @@
#define jsimd_h2v2_merged_upsample_mmx jSMUpH2V2M #define jsimd_h2v2_merged_upsample_mmx jSMUpH2V2M
#define jsimd_h2v1_merged_upsample_mmx jSMUpH2V1M #define jsimd_h2v1_merged_upsample_mmx jSMUpH2V1M
#define jsimd_convsamp_mmx jSConvM #define jsimd_convsamp_mmx jSConvM
#define jsimd_convsamp_float_3dnow jSConvF3D
#define jsimd_fdct_islow_mmx jSFDMIS #define jsimd_fdct_islow_mmx jSFDMIS
#define jsimd_fdct_ifast_mmx jSFDMIF #define jsimd_fdct_ifast_mmx jSFDMIF
#define jsimd_fdct_float_3dnow jSFD3DF
#define jsimd_quantize_mmx jSQuantM #define jsimd_quantize_mmx jSQuantM
#define jsimd_quantize_float_3dnow jSQuantF3D
#define jsimd_idct_2x2_mmx jSIDM22 #define jsimd_idct_2x2_mmx jSIDM22
#define jsimd_idct_4x4_mmx jSIDM44 #define jsimd_idct_4x4_mmx jSIDM44
#define jsimd_idct_islow_mmx jSIDMIS #define jsimd_idct_islow_mmx jSIDMIS
#define jsimd_idct_ifast_mmx jSIDMIF #define jsimd_idct_ifast_mmx jSIDMIF
#define jsimd_idct_float_3dnow jSID3DF
#endif /* NEED_SHORT_EXTERNAL_NAMES */ #endif /* NEED_SHORT_EXTERNAL_NAMES */
/* SIMD Ext: retrieve SIMD/CPU information */ /* SIMD Ext: retrieve SIMD/CPU information */
@ -87,15 +92,25 @@ EXTERN(void) jsimd_convsamp_mmx JPP((JSAMPARRAY sample_data,
JDIMENSION start_col, JDIMENSION start_col,
DCTELEM * workspace)); DCTELEM * workspace));
EXTERN(void) jsimd_convsamp_float_3dnow JPP((JSAMPARRAY sample_data,
JDIMENSION start_col,
FAST_FLOAT * workspace));
/* SIMD Forward DCT */ /* SIMD Forward DCT */
EXTERN(void) jsimd_fdct_islow_mmx JPP((DCTELEM * data)); EXTERN(void) jsimd_fdct_islow_mmx JPP((DCTELEM * data));
EXTERN(void) jsimd_fdct_ifast_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 */ /* SIMD Quantization */
EXTERN(void) jsimd_quantize_mmx JPP((JCOEFPTR coef_block, EXTERN(void) jsimd_quantize_mmx JPP((JCOEFPTR coef_block,
DCTELEM * divisors, DCTELEM * divisors,
DCTELEM * workspace)); DCTELEM * workspace));
EXTERN(void) jsimd_quantize_float_3dnow JPP((JCOEFPTR coef_block,
FAST_FLOAT * divisors,
FAST_FLOAT * workspace));
/* SIMD Reduced Inverse DCT */ /* SIMD Reduced Inverse DCT */
EXTERN(void) jsimd_idct_2x2_mmx JPP((void * dct_table, EXTERN(void) jsimd_idct_2x2_mmx JPP((void * dct_table,
JCOEFPTR coef_block, JCOEFPTR coef_block,
@ -116,3 +131,8 @@ EXTERN(void) jsimd_idct_ifast_mmx JPP((void * dct_table,
JSAMPARRAY output_buf, JSAMPARRAY output_buf,
JDIMENSION output_col)); 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 DCTELEM word ; short
%define SIZEOF_DCTELEM SIZEOF_WORD ; sizeof(DCTELEM) %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. ; To maximize parallelism, Type MULTIPLIER is changed to short.
; ;
%define ISLOW_MULT_TYPE word ; must be 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 SIZEOF_IFAST_MULT_TYPE SIZEOF_WORD ; sizeof(IFAST_MULT_TYPE)
%define IFAST_SCALE_BITS 2 ; fractional bits in scale factors %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 ; -- jsimd.h
; ;
definev(JSIMD_NONE) definev(JSIMD_NONE)
definev(JSIMD_MMX) definev(JSIMD_MMX)
definev(JSIMD_3DNOW)
; Short forms of external names for systems with brain-damaged linkers. ; 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_h2v1_merged_upsample_mmx)
definev(jsimd_h2v2_merged_upsample_mmx) definev(jsimd_h2v2_merged_upsample_mmx)
definev(jsimd_convsamp_mmx) definev(jsimd_convsamp_mmx)
definev(jsimd_convsamp_float_3dnow)
definev(jsimd_fdct_islow_mmx) definev(jsimd_fdct_islow_mmx)
definev(jsimd_fdct_ifast_mmx) definev(jsimd_fdct_ifast_mmx)
definev(jsimd_fdct_float_3dnow)
definev(jsimd_quantize_mmx) definev(jsimd_quantize_mmx)
definev(jsimd_quantize_float_3dnow)
definev(jsimd_idct_2x2_mmx) definev(jsimd_idct_2x2_mmx)
definev(jsimd_idct_4x4_mmx) definev(jsimd_idct_4x4_mmx)
definev(jsimd_idct_islow_mmx) definev(jsimd_idct_islow_mmx)
definev(jsimd_idct_ifast_mmx) definev(jsimd_idct_ifast_mmx)
definev(jsimd_idct_float_3dnow)
#endif /* NEED_SHORT_EXTERNAL_NAMES */ #endif /* NEED_SHORT_EXTERNAL_NAMES */

Просмотреть файл

@ -67,6 +67,21 @@ EXTN(jpeg_simd_cpu_support):
or edi, byte JSIMD_MMX or edi, byte JSIMD_MMX
.no_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: .return:
mov eax,edi mov eax,edi

Просмотреть файл

@ -111,6 +111,10 @@
%define SIZEOF_INT SIZEOF_DWORD ; sizeof(INT) %define SIZEOF_INT SIZEOF_DWORD ; sizeof(INT)
%define INT_BIT DWORD_BIT ; sizeof(INT)*BYTE_BIT %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 MMWORD qword ; int64 (MMX register)
%define SIZEOF_MMWORD SIZEOF_QWORD ; sizeof(MMWORD) %define SIZEOF_MMWORD SIZEOF_QWORD ; sizeof(MMWORD)
%define MMWORD_BIT QWORD_BIT ; sizeof(MMWORD)*BYTE_BIT %define MMWORD_BIT QWORD_BIT ; sizeof(MMWORD)*BYTE_BIT