mirror of
https://github.com/alsa-project/alsa-lib.git
synced 2025-10-29 05:40:25 -04:00
350 lines
6.8 KiB
C
350 lines
6.8 KiB
C
/**
|
|
* \file pcm/pcm_dmix_i386.h
|
|
* \ingroup PCM_Plugins
|
|
* \brief PCM Direct Stream Mixing (dmix) Plugin Interface - I386 assembler code
|
|
* \author Jaroslav Kysela <perex@suse.cz>
|
|
* \date 2003
|
|
*/
|
|
/*
|
|
* PCM - Direct Stream Mixing
|
|
* Copyright (c) 2003 by Jaroslav Kysela <perex@suse.cz>
|
|
*
|
|
*
|
|
* 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.1 of
|
|
* the License, or (at your option) any later version.
|
|
*
|
|
* This program 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
|
|
*
|
|
*/
|
|
|
|
/*
|
|
* for plain i386
|
|
*/
|
|
static void MIX_AREAS1(unsigned int size,
|
|
volatile signed short *dst, signed short *src,
|
|
volatile signed int *sum, size_t dst_step,
|
|
size_t src_step, size_t sum_step)
|
|
{
|
|
/*
|
|
* ESI - src
|
|
* EDI - dst
|
|
* EBX - sum
|
|
* ECX - old sample
|
|
* EAX - sample / temporary
|
|
* EDX - temporary
|
|
*/
|
|
__asm__ __volatile__ (
|
|
"\n"
|
|
|
|
/*
|
|
* initialization, load ESI, EDI, EBX registers
|
|
*/
|
|
"\tmovl %1, %%edi\n"
|
|
"\tmovl %2, %%esi\n"
|
|
"\tmovl %3, %%ebx\n"
|
|
|
|
/*
|
|
* while (size-- > 0) {
|
|
*/
|
|
"\tcmpl $0, %0\n"
|
|
"jz 6f\n"
|
|
|
|
"\t.p2align 4,,15\n"
|
|
|
|
"1:"
|
|
|
|
/*
|
|
* sample = *src;
|
|
* sum_sample = *sum;
|
|
* if (cmpxchg(*dst, 0, 1) == 0)
|
|
* sample -= sum_sample;
|
|
* xadd(*sum, sample);
|
|
*/
|
|
"\tmovw $0, %%ax\n"
|
|
"\tmovw $1, %%cx\n"
|
|
"\tmovl (%%ebx), %%edx\n"
|
|
"\t" LOCK_PREFIX "cmpxchgw %%cx, (%%edi)\n"
|
|
"\tmovswl (%%esi), %%ecx\n"
|
|
"\tjnz 2f\n"
|
|
"\tsubl %%edx, %%ecx\n"
|
|
"2:"
|
|
"\t" LOCK_PREFIX "addl %%ecx, (%%ebx)\n"
|
|
|
|
/*
|
|
* do {
|
|
* sample = old_sample = *sum;
|
|
* saturate(v);
|
|
* *dst = sample;
|
|
* } while (v != *sum);
|
|
*/
|
|
|
|
"3:"
|
|
"\tmovl (%%ebx), %%ecx\n"
|
|
"\tcmpl $0x7fff,%%ecx\n"
|
|
"\tjg 4f\n"
|
|
"\tcmpl $-0x8000,%%ecx\n"
|
|
"\tjl 5f\n"
|
|
"\tmovw %%cx, (%%edi)\n"
|
|
"\tcmpl %%ecx, (%%ebx)\n"
|
|
"\tjnz 3b\n"
|
|
|
|
/*
|
|
* while (size-- > 0)
|
|
*/
|
|
"\tadd %4, %%edi\n"
|
|
"\tadd %5, %%esi\n"
|
|
"\tadd %6, %%ebx\n"
|
|
"\tdecl %0\n"
|
|
"\tjnz 1b\n"
|
|
"\tjmp 6f\n"
|
|
|
|
/*
|
|
* sample > 0x7fff
|
|
*/
|
|
|
|
"\t.p2align 4,,15\n"
|
|
|
|
"4:"
|
|
"\tmovw $0x7fff, (%%edi)\n"
|
|
"\tcmpl %%ecx,(%%ebx)\n"
|
|
"\tjnz 3b\n"
|
|
"\tadd %4, %%edi\n"
|
|
"\tadd %5, %%esi\n"
|
|
"\tadd %6, %%ebx\n"
|
|
"\tdecl %0\n"
|
|
"\tjnz 1b\n"
|
|
"\tjmp 6f\n"
|
|
|
|
/*
|
|
* sample < -0x8000
|
|
*/
|
|
|
|
"\t.p2align 4,,15\n"
|
|
|
|
"5:"
|
|
"\tmovw $-0x8000, (%%edi)\n"
|
|
"\tcmpl %%ecx, (%%ebx)\n"
|
|
"\tjnz 3b\n"
|
|
"\tadd %4, %%edi\n"
|
|
"\tadd %5, %%esi\n"
|
|
"\tadd %6, %%ebx\n"
|
|
"\tdecl %0\n"
|
|
"\tjnz 1b\n"
|
|
// "\tjmp 6f\n"
|
|
|
|
"6:"
|
|
|
|
: /* no output regs */
|
|
: "m" (size), "m" (dst), "m" (src), "m" (sum), "m" (dst_step), "m" (src_step), "m" (sum_step)
|
|
: "esi", "edi", "edx", "ecx", "ebx", "eax"
|
|
);
|
|
}
|
|
|
|
/*
|
|
* MMX optimized
|
|
*/
|
|
static void MIX_AREAS1_MMX(unsigned int size,
|
|
volatile signed short *dst, signed short *src,
|
|
volatile signed int *sum, size_t dst_step,
|
|
size_t src_step, size_t sum_step)
|
|
{
|
|
/*
|
|
* ESI - src
|
|
* EDI - dst
|
|
* EBX - sum
|
|
* ECX - old sample
|
|
* EAX - sample / temporary
|
|
* EDX - temporary
|
|
*/
|
|
__asm__ __volatile__ (
|
|
"\n"
|
|
|
|
/*
|
|
* initialization, load ESI, EDI, EBX registers
|
|
*/
|
|
"\tmovl %1, %%edi\n"
|
|
"\tmovl %2, %%esi\n"
|
|
"\tmovl %3, %%ebx\n"
|
|
|
|
/*
|
|
* while (size-- > 0) {
|
|
*/
|
|
"\tcmpl $0, %0\n"
|
|
"jz 6f\n"
|
|
|
|
"\t.p2align 4,,15\n"
|
|
|
|
"1:"
|
|
|
|
/*
|
|
* sample = *src;
|
|
* sum_sample = *sum;
|
|
* if (cmpxchg(*dst, 0, 1) == 0)
|
|
* sample -= sum_sample;
|
|
* xadd(*sum, sample);
|
|
*/
|
|
"\tmovw $0, %%ax\n"
|
|
"\tmovw $1, %%cx\n"
|
|
"\tmovl (%%ebx), %%edx\n"
|
|
"\t" LOCK_PREFIX "cmpxchgw %%cx, (%%edi)\n"
|
|
"\tmovswl (%%esi), %%ecx\n"
|
|
"\tjnz 2f\n"
|
|
"\tsubl %%edx, %%ecx\n"
|
|
"2:"
|
|
"\t" LOCK_PREFIX "addl %%ecx, (%%ebx)\n"
|
|
|
|
/*
|
|
* do {
|
|
* sample = old_sample = *sum;
|
|
* saturate(v);
|
|
* *dst = sample;
|
|
* } while (v != *sum);
|
|
*/
|
|
|
|
"3:"
|
|
"\tmovl (%%ebx), %%ecx\n"
|
|
"\tmovd %%ecx, %%mm0\n"
|
|
"\tpackssdw %%mm1, %%mm0\n"
|
|
"\tmovd %%mm0, %%eax\n"
|
|
"\tmovw %%ax, (%%edi)\n"
|
|
"\tcmpl %%ecx, (%%ebx)\n"
|
|
"\tjnz 3b\n"
|
|
|
|
/*
|
|
* while (size-- > 0)
|
|
*/
|
|
"\tadd %4, %%edi\n"
|
|
"\tadd %5, %%esi\n"
|
|
"\tadd %6, %%ebx\n"
|
|
"\tdecl %0\n"
|
|
"\tjnz 1b\n"
|
|
"\tjmp 6f\n"
|
|
|
|
"6:"
|
|
|
|
"\temms\n"
|
|
|
|
: /* no output regs */
|
|
: "m" (size), "m" (dst), "m" (src), "m" (sum), "m" (dst_step), "m" (src_step), "m" (sum_step)
|
|
: "esi", "edi", "edx", "ecx", "ebx", "eax"
|
|
);
|
|
}
|
|
|
|
/*
|
|
* for plain i386, 32-bit version (24-bit resolution)
|
|
*/
|
|
static void MIX_AREAS2(unsigned int size,
|
|
volatile signed int *dst, signed int *src,
|
|
volatile signed int *sum, size_t dst_step,
|
|
size_t src_step, size_t sum_step)
|
|
{
|
|
/*
|
|
* ESI - src
|
|
* EDI - dst
|
|
* EBX - sum
|
|
* ECX - old sample
|
|
* EAX - sample / temporary
|
|
* EDX - temporary
|
|
*/
|
|
__asm__ __volatile__ (
|
|
"\n"
|
|
|
|
/*
|
|
* initialization, load ESI, EDI, EBX registers
|
|
*/
|
|
"\tmovl %1, %%edi\n"
|
|
"\tmovl %2, %%esi\n"
|
|
"\tmovl %3, %%ebx\n"
|
|
|
|
/*
|
|
* while (size-- > 0) {
|
|
*/
|
|
"\tcmpl $0, %0\n"
|
|
"jz 6f\n"
|
|
|
|
"\t.p2align 4,,15\n"
|
|
|
|
"1:"
|
|
|
|
/*
|
|
* sample = *src;
|
|
* sum_sample = *sum;
|
|
* if (cmpxchg(*dst, 0, 1) == 0)
|
|
* sample -= sum_sample;
|
|
* xadd(*sum, sample);
|
|
*/
|
|
"\tmovl $0, %%eax\n"
|
|
"\tmovl $1, %%ecx\n"
|
|
"\tmovl (%%ebx), %%edx\n"
|
|
"\t" LOCK_PREFIX "cmpxchgl %%ecx, (%%edi)\n"
|
|
"\tjnz 2f\n"
|
|
"\tmovl (%%esi), %%ecx\n"
|
|
/* sample >>= 8 */
|
|
"\tsarl $8, %%ecx\n"
|
|
"\tsubl %%edx, %%ecx\n"
|
|
"\tjmp 21f\n"
|
|
"2:"
|
|
"\tmovl (%%esi), %%ecx\n"
|
|
/* sample >>= 8 */
|
|
"\tsarl $8, %%ecx\n"
|
|
"21:"
|
|
"\t" LOCK_PREFIX "addl %%ecx, (%%ebx)\n"
|
|
|
|
/*
|
|
* do {
|
|
* sample = old_sample = *sum;
|
|
* saturate(v);
|
|
* *dst = sample;
|
|
* } while (v != *sum);
|
|
*/
|
|
|
|
"3:"
|
|
"\tmovl (%%ebx), %%ecx\n"
|
|
/*
|
|
* if (sample > 0x7fff00)
|
|
*/
|
|
"\tmovl $0x7fffff, %%eax\n"
|
|
"\tcmpl %%eax, %%ecx\n"
|
|
"\tjg 4f\n"
|
|
/*
|
|
* if (sample < -0x800000)
|
|
*/
|
|
"\tmovl $-0x800000, %%eax\n"
|
|
"\tcmpl %%eax, %%ecx\n"
|
|
"\tjl 4f\n"
|
|
"\tmovl %%ecx, %%eax\n"
|
|
"4:"
|
|
/*
|
|
* sample <<= 8;
|
|
*/
|
|
"\tsall $8, %%eax\n"
|
|
"\tmovl %%eax, (%%edi)\n"
|
|
"\tcmpl %%ecx, (%%ebx)\n"
|
|
"\tjnz 3b\n"
|
|
|
|
/*
|
|
* while (size-- > 0)
|
|
*/
|
|
"\tadd %4, %%edi\n"
|
|
"\tadd %5, %%esi\n"
|
|
"\tadd %6, %%ebx\n"
|
|
"\tdecl %0\n"
|
|
"\tjnz 1b\n"
|
|
// "\tjmp 6f\n"
|
|
|
|
"6:"
|
|
: /* no output regs */
|
|
: "m" (size), "m" (dst), "m" (src), "m" (sum), "m" (dst_step), "m" (src_step), "m" (sum_step)
|
|
: "esi", "edi", "edx", "ecx", "ebx", "eax"
|
|
);
|
|
}
|
|
|