[xiph-commits] r14784 - branches/theora-thusnelda/lib/enc/x86_64
xiphmont at svn.xiph.org
xiphmont at svn.xiph.org
Tue Apr 22 11:09:00 PDT 2008
Author: xiphmont
Date: 2008-04-22 11:09:00 -0700 (Tue, 22 Apr 2008)
New Revision: 14784
Modified:
branches/theora-thusnelda/lib/enc/x86_64/dct_decode_mmx.c
Log:
Might as well flesh out all the missing x86_64 asm.
Derf, you can stop giggling any time.
Modified: branches/theora-thusnelda/lib/enc/x86_64/dct_decode_mmx.c
===================================================================
--- branches/theora-thusnelda/lib/enc/x86_64/dct_decode_mmx.c 2008-04-22 16:23:11 UTC (rev 14783)
+++ branches/theora-thusnelda/lib/enc/x86_64/dct_decode_mmx.c 2008-04-22 18:09:00 UTC (rev 14784)
@@ -5,7 +5,7 @@
* GOVERNED BY A BSD-STYLE SOURCE LICENSE INCLUDED WITH THIS SOURCE *
* IN 'COPYING'. PLEASE READ THESE TERMS BEFORE DISTRIBUTING. *
* *
- * THE Theora SOURCE CODE IS COPYRIGHT (C) 2002-2007 *
+ * THE Theora SOURCE CODE IS COPYRIGHT (C) 2002-2008 *
* by the Xiph.Org Foundation http://www.xiph.org/ *
* *
********************************************************************
@@ -21,9 +21,165 @@
#if defined(USE_ASM)
-/* nothing implemented right now */
+static const __attribute__((aligned(8),used)) ogg_int64_t V3= 0x0003000300030003LL;
+static const __attribute__((aligned(8),used)) ogg_int64_t V804= 0x0804080408040804LL;
+
+#define OC_LOOP_H_4x4 \
+ "lea (%[ll],%[ll],2),%[s]\n" /* esi = ystride*3 */ \
+ "movd (%[pp]), %%mm0\n" /* 0 0 0 0 3 2 1 0 */ \
+ "movd (%[pp],%[ll]),%%mm1\n" /* 0 0 0 0 7 6 5 4 */ \
+ "movd (%[pp],%[ll],2),%%mm2\n" /* 0 0 0 0 b a 9 8 */ \
+ "movd (%[pp],%[s]),%%mm3\n" /* 0 0 0 0 f e d c */ \
+ "punpcklbw %%mm1,%%mm0\n" /* mm0 = 7 3 6 2 5 1 4 0 */ \
+ "punpcklbw %%mm3,%%mm2\n" /* mm2 = f b e a d 9 c 8 */ \
+ "movq %%mm0,%%mm1\n" /* mm1 = 7 3 6 2 5 1 4 0 */ \
+ "punpcklwd %%mm2,%%mm1\n" /* mm1 = d 9 5 1 c 8 4 0 */ \
+ "punpckhwd %%mm2,%%mm0\n" /* mm0 = f b 7 3 e a 6 2 */ \
+ "pxor %%mm7,%%mm7\n" \
+ "movq %%mm1,%%mm5\n" /* mm5 = d 9 5 1 c 8 4 0 */ \
+ "punpckhbw %%mm7,%%mm5\n" /* mm5 = 0 d 0 9 0 5 0 1 = pix[1]*/ \
+ "punpcklbw %%mm7,%%mm1\n" /* mm1 = 0 c 0 8 0 4 0 0 = pix[0]*/ \
+ "movq %%mm0,%%mm3\n" /* mm3 = f b 7 3 e a 6 2 */ \
+ "punpckhbw %%mm7,%%mm3\n" /* mm3 = 0 f 0 b 0 7 0 3 = pix[3]*/ \
+ "punpcklbw %%mm7,%%mm0\n" /* mm0 = 0 e 0 a 0 6 0 2 = pix[2]*/ \
+ \
+ "psubw %%mm3,%%mm1\n" /* mm1 = pix[0]-pix[3] mm1 - mm3 */ \
+ "movq %%mm0,%%mm7\n" /* mm7 = pix[2]*/ \
+ "psubw %%mm5,%%mm0\n" /* mm0 = pix[2]-pix[1] mm0 - mm5*/ \
+ "pmullw %[V3],%%mm0\n" /* *3 */ \
+ "paddw %%mm0,%%mm1\n" /* mm1 has f[0] ... f[4]*/ \
+ "paddw %[V804],%%mm1\n" /* add 4 */ /* add 256 after shift */ \
+ "psraw $3,%%mm1\n" /* >>3 */ \
+ " pextrw $0,%%mm1,%[s]\n" /* In MM1 we have 4 f coefs (16bits) */ \
+ " pextrw $1,%%mm1,%[d]\n" /* now perform MM4 = *(_bv+ f) */ \
+ " pinsrw $0,(%[bound],%[s],2),%%mm4\n" \
+ " pextrw $2,%%mm1,%[s]\n" \
+ " pinsrw $1,(%[bound],%[d],2),%%mm4\n" \
+ " pextrw $3,%%mm1,%[d]\n" \
+ " pinsrw $2,(%[bound],%[s],2),%%mm4\n" \
+ " pinsrw $3,(%[bound],%[d],2),%%mm4\n" /* new f vals loaded */ \
+ "pxor %%mm0,%%mm0\n" \
+ " paddw %%mm4,%%mm5\n" /*(pix[1]+f);*/ \
+ " psubw %%mm4,%%mm7\n" /* (pix[2]-f); */ \
+ " packuswb %%mm0,%%mm5\n" /* mm5 = x x x x newpix1 */ \
+ " packuswb %%mm0,%%mm7\n" /* mm7 = x x x x newpix2 */ \
+ " punpcklbw %%mm7,%%mm5\n" /* 2 1 2 1 2 1 2 1 */ \
+ " movd %%mm5,%[d]\n" /* edi = newpix21 */ \
+ " movw %[d],1(%[pp])\n" \
+ " psrlq $32,%%mm5\n" /* why is so big stall here ? */ \
+ " shr $16,%[d]\n" \
+ " movw %[d],1(%[pp],%[ll],1)\n" \
+ " movd %%mm5,%[d]\n" /* eax = newpix21 high part */ \
+ " lea (%[ll],%[ll],2),%[s]\n" \
+ " movw %[d],1(%[pp],%[ll],2)\n" \
+ " shr $16,%[d]\n" \
+ " movw %[d],1(%[pp],%[s])\n"
+
+static void FilterHoriz__mmx(unsigned char * PixelPtr,
+ ogg_int32_t LineLength,
+ ogg_int16_t *BoundingValuePtr){
+ long esi;
+ long edi;
+ __asm__ __volatile__(
+ OC_LOOP_H_4x4
+ : [s]"=&r"(esi),[d]"=&r"(edi)
+ : [pp]"r"(PixelPtr), [ll]"r"((long)LineLength), [bound]"r"(BoundingValuePtr-256), [V3]"m"(V3), [V804]"m"(V804)
+ : "memory"
+ );
+
+ PixelPtr += LineLength*4;
+
+ __asm__ __volatile__(
+ OC_LOOP_H_4x4
+ "emms\n"
+ : [s]"=&r"(esi),[d]"=&r"(edi) \
+ : [pp]"r"(PixelPtr), [ll]"r"((long)LineLength), [bound]"r"(BoundingValuePtr-256), [V3]"m"(V3), [V804]"m"(V804) \
+ : "memory" \
+ );
+}
+
+static void FilterVert__mmx(unsigned char * PixelPtr,
+ ogg_int32_t LineLength,
+ ogg_int16_t *BoundingValuePtr){
+ long esi,edi;
+ __asm__ __volatile__(
+ "pxor %%mm0,%%mm0\n" /* mm0 = 0 */
+ "movq (%[pp]),%%mm7\n" /* mm7 = pix[0..7] */
+ "lea (%[ll],%[ll],2),%[s]\n" /* esi = ystride*3 */
+ "movq (%[pp],%[s]),%%mm4\n" /* mm4 = pix[0..7+ystride*3] */
+ "movq %%mm7,%%mm6\n" /* mm6 = pix[0..7] */
+ "punpcklbw %%mm0,%%mm6\n" /* expand unsigned pix[0..3] to 16 bits */
+ "movq %%mm4,%%mm5\n"
+ "punpckhbw %%mm0,%%mm7\n" /* expand unsigned pix[4..7] to 16 bits */
+ "punpcklbw %%mm0,%%mm4\n" /* expand other arrays too */
+ "punpckhbw %%mm0,%%mm5\n"
+ "psubw %%mm4,%%mm6\n" /* mm6 = mm6 - mm4 */
+ "psubw %%mm5,%%mm7\n" /* mm7 = mm7 - mm5 */
+ /* mm7:mm6 = _p[0]-_p[ystride*3] */
+ "movq (%[pp],%[ll]),%%mm4\n" /* mm4 = pix[0..7+ystride] */
+ "movq %%mm4,%%mm5\n"
+ "movq (%[pp],%[ll],2),%%mm2\n" /* mm2 = pix[0..7+ystride*2] */
+ "movq %%mm2,%%mm3\n"
+ "movq %%mm2,%%mm1\n" //ystride*2
+ "punpckhbw %%mm0,%%mm5\n"
+ "punpcklbw %%mm0,%%mm4\n"
+ "punpckhbw %%mm0,%%mm3\n"
+ "punpcklbw %%mm0,%%mm2\n"
+ "psubw %%mm5,%%mm3\n"
+ "psubw %%mm4,%%mm2\n"
+ /* mm3:mm2 = (pix[ystride*2]-pix[ystride]); */
+ "pmullw %[V3],%%mm3\n" /* *3 */
+ "pmullw %[V3],%%mm2\n" /* *3 */
+ "paddw %%mm7,%%mm3\n" /* highpart */
+ "paddw %%mm6,%%mm2\n" /* lowpart of pix[0]-pix[ystride*3]+3*(pix[ystride*2]-pix[ystride]); */
+ "paddw %[V804],%%mm3\n" /* add 4 */ /* add 256 after shift */
+ "paddw %[V804],%%mm2\n" /* add 4 */ /* add 256 after shift */
+ "psraw $3,%%mm3\n" /* >>3 f coefs high */
+ "psraw $3,%%mm2\n" /* >>3 f coefs low */
+
+ " pextrw $0,%%mm2,%[s]\n" /* In MM3:MM2 we have f coefs (16bits) */
+ " pextrw $1,%%mm2,%[d]\n" /* now perform MM7:MM6 = *(_bv+ f) */
+ " pinsrw $0,(%[bound],%[s],2),%%mm6\n"
+ " pinsrw $1,(%[bound],%[d],2),%%mm6\n"
+
+ " pextrw $2,%%mm2,%[s]\n"
+ " pextrw $3,%%mm2,%[d]\n"
+ " pinsrw $2,(%[bound],%[s],2),%%mm6\n"
+ " pinsrw $3,(%[bound],%[d],2),%%mm6\n"
+
+ " pextrw $0,%%mm3,%[s]\n"
+ " pextrw $1,%%mm3,%[d]\n"
+ " pinsrw $0,(%[bound],%[s],2),%%mm7\n"
+ " pinsrw $1,(%[bound],%[d],2),%%mm7\n"
+
+ " pextrw $2,%%mm3,%[s]\n"
+ " pextrw $3,%%mm3,%[d]\n"
+ " pinsrw $2,(%[bound],%[s],2),%%mm7\n"
+ " pinsrw $3,(%[bound],%[d],2),%%mm7\n" //MM7 MM6 f=*(_bv+(f+4>>3));
+
+ "paddw %%mm6,%%mm4\n" /* (pix[ystride]+f); */
+ "paddw %%mm7,%%mm5\n" /* (pix[ystride]+f); */
+ "movq %%mm1,%%mm2\n"
+ "punpcklbw %%mm0,%%mm1\n"
+ "punpckhbw %%mm0,%%mm2\n" //[ystride*2]
+ "psubw %%mm6,%%mm1\n" /* (pix[ystride*2]-f); */
+ "psubw %%mm7,%%mm2\n" /* (pix[ystride*2]-f); */
+ "packuswb %%mm2,%%mm1\n"
+ "packuswb %%mm5,%%mm4\n"
+ "movq %%mm1,(%[pp],%[ll],2)\n" /* pix[ystride*2]= */
+ "movq %%mm4,(%[pp],%[ll])\n" /* pix[ystride]= */
+ "emms\n"
+ : [s]"=&r"(esi),[d]"=&r"(edi)
+ : [pp]"r"(PixelPtr-2*LineLength), [ll]"r"((long)LineLength), [bound]"r"(BoundingValuePtr-256), [V3]"m"(V3), [V804]"m"(V804)
+ : "memory"
+ );
+}
+
+/* install our implementation in the function table */
void dsp_mmx_dct_decode_init(DspFunctions *funcs)
{
+ funcs->FilterVert = FilterVert__mmx;
+ funcs->FilterHoriz = FilterHoriz__mmx;
}
#endif /* USE_ASM */
More information about the commits
mailing list