| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230 |
- ;
- ; jquant.asm - sample data conversion and quantization (3DNow! & MMX)
- ;
- ; Copyright 2009 Pierre Ossman <ossman@cendio.se> 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"
- %include "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 32
- GLOBAL_FUNCTION(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 32
- GLOBAL_FUNCTION(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
- ; For some reason, the OS X linker does not honor the request to align the
- ; segment unless we do this.
- align 32
|
