Mercurial > libavcodec.hg

view i386/dsputil_mmx_rnd.h @ 536:6fac683d9997 libavcodec

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change licence to LGPL since there are no objections from side of original author
author nickols_k
date Thu, 11 Jul 2002 15:03:41 +0000
parents b94e82d31b06
children 72d9661683f2
line wrap: on
line source

/*
 * DSP utils mmx functions are compiled twice for rnd/no_rnd
 * Copyright (c) 2000, 2001 Fabrice Bellard.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 * MMX optimization by Nick Kurshev <nickols_k@mail.ru>
 * mostly rewritten by Michael Niedermayer <michaelni@gmx.at>
 * and improved by Zdenek Kabelac <kabi@users.sf.net>
 */

// put_pixels
static void DEF(put, pixels_x2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_BFE(mm6);
    __asm __volatile(
	"lea	(%3, %3), %%eax		\n\t"
	".balign 8			\n\t"
	"1:				\n\t"
	"movq	(%1), %%mm0		\n\t"
	"movq	1(%1), %%mm1		\n\t"
	"movq	(%1, %3), %%mm2		\n\t"
	"movq	1(%1, %3), %%mm3	\n\t"
	PAVGBP(%%mm0, %%mm1, %%mm4,   %%mm2, %%mm3, %%mm5)
	"movq	%%mm4, (%2)		\n\t"
	"movq	%%mm5, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"
	"movq	(%1), %%mm0		\n\t"
	"movq	1(%1), %%mm1		\n\t"
	"movq	(%1, %3), %%mm2		\n\t"
	"movq	1(%1, %3), %%mm3	\n\t"
	PAVGBP(%%mm0, %%mm1, %%mm4,   %%mm2, %%mm3, %%mm5)
	"movq	%%mm4, (%2)		\n\t"
	"movq	%%mm5, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"
	"subl	$4, %0			\n\t"
	"jnz	1b			\n\t"
	:"+g"(h), "+S"(pixels), "+D"(block)
	:"r"(line_size)
	:"eax", "memory");
}

static void DEF(put, pixels_y2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_BFE(mm6);
    __asm __volatile(
	"lea (%3, %3), %%eax		\n\t"
	"movq (%1), %%mm0		\n\t"
	".balign 8			\n\t"
	"1:				\n\t"
	"movq	(%1, %3), %%mm1		\n\t"
	"movq	(%1, %%eax),%%mm2	\n\t"
	PAVGBP(%%mm1, %%mm0, %%mm4,   %%mm2, %%mm1, %%mm5)
	"movq	%%mm4, (%2)		\n\t"
	"movq	%%mm5, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"
	"movq	(%1, %3), %%mm1		\n\t"
	"movq	(%1, %%eax),%%mm0	\n\t"
	PAVGBP(%%mm1, %%mm2, %%mm4,   %%mm0, %%mm1, %%mm5)
	"movq	%%mm4, (%2)		\n\t"
	"movq	%%mm5, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"
	"subl	$4, %0			\n\t"
	"jnz	1b			\n\t"
	:"+g"(h), "+S"(pixels), "+D"(block)
	:"r"(line_size)
	:"eax", "memory");
}

static void DEF(put, pixels_xy2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_ZERO(mm7);
    SET_RND(mm6); // =2 for rnd  and  =1 for no_rnd version
    __asm __volatile(
	"movq	(%1), %%mm0		\n\t"
	"movq	1(%1), %%mm4		\n\t"
	"movq	%%mm0, %%mm1		\n\t"
	"movq	%%mm4, %%mm5		\n\t"
	"punpcklbw %%mm7, %%mm0		\n\t"
	"punpcklbw %%mm7, %%mm4		\n\t"
	"punpckhbw %%mm7, %%mm1		\n\t"
	"punpckhbw %%mm7, %%mm5		\n\t"
	"paddusw %%mm0, %%mm4		\n\t"
	"paddusw %%mm1, %%mm5		\n\t"
	"xorl	%%eax, %%eax		\n\t"
	"addl	%3, %1			\n\t"
	".balign 8      		\n\t"
	"1:				\n\t"
	"movq	(%1, %%eax), %%mm0	\n\t"
	"movq	1(%1, %%eax), %%mm2	\n\t"
	"movq	%%mm0, %%mm1		\n\t"
	"movq	%%mm2, %%mm3		\n\t"
	"punpcklbw %%mm7, %%mm0		\n\t"
	"punpcklbw %%mm7, %%mm2		\n\t"
	"punpckhbw %%mm7, %%mm1		\n\t"
	"punpckhbw %%mm7, %%mm3		\n\t"
	"paddusw %%mm2, %%mm0	 	\n\t"
	"paddusw %%mm3, %%mm1		\n\t"
	"paddusw %%mm6, %%mm4		\n\t"
	"paddusw %%mm6, %%mm5		\n\t"
	"paddusw %%mm0, %%mm4		\n\t"
	"paddusw %%mm1, %%mm5		\n\t"
	"psrlw	$2, %%mm4		\n\t"
	"psrlw	$2, %%mm5		\n\t"
	"packuswb  %%mm5, %%mm4		\n\t"
	"movq	%%mm4, (%2, %%eax)	\n\t"
	"addl	%3, %%eax		\n\t"

	"movq	(%1, %%eax), %%mm2	\n\t" // 0 <-> 2   1 <-> 3
	"movq	1(%1, %%eax), %%mm4	\n\t"
	"movq	%%mm2, %%mm3		\n\t"
	"movq	%%mm4, %%mm5		\n\t"
	"punpcklbw %%mm7, %%mm2		\n\t"
	"punpcklbw %%mm7, %%mm4		\n\t"
	"punpckhbw %%mm7, %%mm3		\n\t"
	"punpckhbw %%mm7, %%mm5		\n\t"
	"paddusw %%mm2, %%mm4	 	\n\t"
	"paddusw %%mm3, %%mm5		\n\t"
	"paddusw %%mm6, %%mm0		\n\t"
	"paddusw %%mm6, %%mm1		\n\t"
	"paddusw %%mm4, %%mm0		\n\t"
	"paddusw %%mm5, %%mm1		\n\t"
	"psrlw	$2, %%mm0		\n\t"
	"psrlw	$2, %%mm1		\n\t"
	"packuswb  %%mm1, %%mm0		\n\t"
	"movq	%%mm0, (%2, %%eax)	\n\t"
	"addl	%3, %%eax		\n\t"

	"subl	$2, %0			\n\t"
	"jnz	1b			\n\t"
	:"+g"(h), "+S"(pixels)
	:"D"(block), "r"(line_size)
	:"eax", "memory");
}

// avg_pixels
// in case more speed is needed - unroling would certainly help
static void DEF(avg, pixels)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_BFE(mm6);
    JUMPALIGN();
    do {
	__asm __volatile(
	     "movq  %0, %%mm0		\n\t"
	     "movq  %1, %%mm1		\n\t"
	     PAVGB(%%mm0, %%mm1, %%mm2, %%mm6)
	     "movq  %%mm2, %0		\n\t"
	     :"+m"(*block)
	     :"m"(*pixels)
	     :"memory");
	pixels += line_size;
	block += line_size;
    }
    while (--h);
}

static void DEF(avg, pixels_x2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_BFE(mm6);
    JUMPALIGN();
    do {
	__asm __volatile(
	    "movq  %1, %%mm0		\n\t"
	    "movq  1%1, %%mm1		\n\t"
	    "movq  %0, %%mm3		\n\t"
	    PAVGB(%%mm0, %%mm1, %%mm2, %%mm6)
	    PAVGB(%%mm3, %%mm2, %%mm0, %%mm6)
	    "movq  %%mm0, %0		\n\t"
	    :"+m"(*block)
	    :"m"(*pixels)
	    :"memory");
	pixels += line_size;
	block += line_size;
    } while (--h);
}

static void DEF(avg, pixels_y2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_BFE(mm6);
    __asm __volatile(
	"lea	(%3, %3), %%eax		\n\t"
	"movq	(%1), %%mm0		\n\t"
	".balign 8			\n\t"
	"1:				\n\t"
	"movq	(%1, %3), %%mm1		\n\t"
	"movq	(%1, %%eax), %%mm2	\n\t"
	PAVGBP(%%mm1, %%mm0, %%mm4,   %%mm2, %%mm1, %%mm5)
	"movq	(%2), %%mm3		\n\t"
	PAVGB(%%mm3, %%mm4, %%mm0, %%mm6)
	"movq	(%2, %3), %%mm3		\n\t"
	PAVGB(%%mm3, %%mm5, %%mm1, %%mm6)
	"movq	%%mm0, (%2)		\n\t"
	"movq	%%mm1, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"

	"movq	(%1, %3), %%mm1		\n\t"
	"movq	(%1, %%eax), %%mm0	\n\t"
	PAVGBP(%%mm1, %%mm2, %%mm4,   %%mm0, %%mm1, %%mm5)
	"movq	(%2), %%mm3		\n\t"
	PAVGB(%%mm3, %%mm4, %%mm0, %%mm6)
	"movq	(%2, %3), %%mm3		\n\t"
	PAVGB(%%mm3, %%mm5, %%mm1, %%mm6)
	"movq	%%mm0, (%2)		\n\t"
	"movq	%%mm1, (%2, %3)		\n\t"
	"addl	%%eax, %1		\n\t"
	"addl	%%eax, %2		\n\t"

	"subl	$4, %0			\n\t"
	"jnz	1b			\n\t"
	:"+g"(h), "+S"(pixels), "+D"(block)
	:"r"(line_size)
	:"eax", "memory");
}

// this routine is 'slightly' suboptimal but mostly unused
static void DEF(avg, pixels_xy2)(UINT8 *block, const UINT8 *pixels, int line_size, int h)
{
    MOVQ_ZERO(mm7);
    SET_RND(mm6); // =2 for rnd  and  =1 for no_rnd version
    __asm __volatile(
	"movq	(%1), %%mm0		\n\t"
	"movq	1(%1), %%mm4		\n\t"
	"movq	%%mm0, %%mm1		\n\t"
	"movq	%%mm4, %%mm5		\n\t"
	"punpcklbw %%mm7, %%mm0		\n\t"
	"punpcklbw %%mm7, %%mm4		\n\t"
	"punpckhbw %%mm7, %%mm1		\n\t"
	"punpckhbw %%mm7, %%mm5		\n\t"
	"paddusw %%mm0, %%mm4		\n\t"
	"paddusw %%mm1, %%mm5		\n\t"
	"xorl	%%eax, %%eax		\n\t"
	"addl	%3, %1			\n\t"
	".balign 8			\n\t"
	"1:				\n\t"
	"movq	(%1, %%eax), %%mm0	\n\t"
	"movq	1(%1, %%eax), %%mm2	\n\t"
	"movq	%%mm0, %%mm1		\n\t"
	"movq	%%mm2, %%mm3		\n\t"
	"punpcklbw %%mm7, %%mm0		\n\t"
	"punpcklbw %%mm7, %%mm2		\n\t"
	"punpckhbw %%mm7, %%mm1		\n\t"
	"punpckhbw %%mm7, %%mm3		\n\t"
	"paddusw %%mm2, %%mm0	 	\n\t"
	"paddusw %%mm3, %%mm1		\n\t"
	"paddusw %%mm6, %%mm4		\n\t"
	"paddusw %%mm6, %%mm5		\n\t"
	"paddusw %%mm0, %%mm4		\n\t"
	"paddusw %%mm1, %%mm5		\n\t"
	"psrlw	$2, %%mm4		\n\t"
	"psrlw	$2, %%mm5		\n\t"
		"movq	(%2, %%eax), %%mm3	\n\t"
	"packuswb  %%mm5, %%mm4		\n\t"
		"pcmpeqd %%mm2, %%mm2	\n\t"
		"paddb %%mm2, %%mm2	\n\t"
		PAVGB(%%mm3, %%mm4, %%mm5, %%mm2)
		"movq	%%mm5, (%2, %%eax)	\n\t"
	"addl	%3, %%eax		\n\t"

	"movq	(%1, %%eax), %%mm2	\n\t" // 0 <-> 2   1 <-> 3
	"movq	1(%1, %%eax), %%mm4	\n\t"
	"movq	%%mm2, %%mm3		\n\t"
	"movq	%%mm4, %%mm5		\n\t"
	"punpcklbw %%mm7, %%mm2		\n\t"
	"punpcklbw %%mm7, %%mm4		\n\t"
	"punpckhbw %%mm7, %%mm3		\n\t"
	"punpckhbw %%mm7, %%mm5		\n\t"
	"paddusw %%mm2, %%mm4	 	\n\t"
	"paddusw %%mm3, %%mm5		\n\t"
	"paddusw %%mm6, %%mm0		\n\t"
	"paddusw %%mm6, %%mm1		\n\t"
	"paddusw %%mm4, %%mm0		\n\t"
	"paddusw %%mm5, %%mm1		\n\t"
	"psrlw	$2, %%mm0		\n\t"
	"psrlw	$2, %%mm1		\n\t"
		"movq	(%2, %%eax), %%mm3	\n\t"
	"packuswb  %%mm1, %%mm0		\n\t"
		"pcmpeqd %%mm2, %%mm2	\n\t"
		"paddb %%mm2, %%mm2	\n\t"
		PAVGB(%%mm3, %%mm0, %%mm1, %%mm2)
		"movq	%%mm1, (%2, %%eax)	\n\t"
	"addl	%3, %%eax		\n\t"

	"subl	$2, %0			\n\t"
	"jnz	1b			\n\t"
	:"+g"(h), "+S"(pixels)
	:"D"(block), "r"(line_size)
	:"eax", "memory");
}