src/audio/SDL_mixer_MMX.c
changeset 5536 05af1b9ff46d
parent 5535 96594ac5fd1a
child 5537 8a66741be632
equal deleted inserted replaced
5535:96594ac5fd1a 5536:05af1b9ff46d
     1 /*
       
     2     SDL - Simple DirectMedia Layer
       
     3     Copyright (C) 1997-2011 Sam Lantinga
       
     4 
       
     5     This library is free software; you can redistribute it and/or
       
     6     modify it under the terms of the GNU Lesser General Public
       
     7     License as published by the Free Software Foundation; either
       
     8     version 2.1 of the License, or (at your option) any later version.
       
     9 
       
    10     This library is distributed in the hope that it will be useful,
       
    11     but WITHOUT ANY WARRANTY; without even the implied warranty of
       
    12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
       
    13     Lesser General Public License for more details.
       
    14 
       
    15     You should have received a copy of the GNU Lesser General Public
       
    16     License along with this library; if not, write to the Free Software
       
    17     Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
       
    18 
       
    19     Sam Lantinga
       
    20     slouken@libsdl.org
       
    21 */
       
    22 #include "SDL_config.h"
       
    23 
       
    24 /*
       
    25     MMX assembler version of SDL_MixAudio for signed little endian 16 bit samples and signed 8 bit samples
       
    26     Copyright 2002 Stephane Marchesin (stephane.marchesin@wanadoo.fr)
       
    27     This code is licensed under the LGPL (see COPYING for details)
       
    28  
       
    29     Assumes buffer size in bytes is a multiple of 16
       
    30     Assumes SDL_MIX_MAXVOLUME = 128
       
    31 */
       
    32 
       
    33 
       
    34 /***********************************************
       
    35 *   Mixing for 16 bit signed buffers
       
    36 ***********************************************/
       
    37 
       
    38 #if defined(SDL_BUGGY_MMX_MIXERS) /* buggy, so we're disabling them. --ryan. */
       
    39 #if defined(__GNUC__) && defined(__i386__) && defined(SDL_ASSEMBLY_ROUTINES)
       
    40 void
       
    41 SDL_MixAudio_MMX_S16(char *dst, char *src, unsigned int size, int volume)
       
    42 {
       
    43     __asm__ __volatile__("	movl %3,%%eax\n"        /* eax = volume */
       
    44                          "	movl %2,%%edx\n"        /* edx = size */
       
    45                          "	shrl $4,%%edx\n"        /* process 16 bytes per iteration = 8 samples */
       
    46                          "	jz .endS16\n" "	pxor %%mm0,%%mm0\n" "	movd %%eax,%%mm0\n" "	movq %%mm0,%%mm1\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n"      /* mm0 = vol|vol|vol|vol */
       
    47                          ".align 8\n" "	.mixloopS16:\n" "	movq (%1),%%mm1\n"      /* mm1 = a|b|c|d */
       
    48                          "	movq %%mm1,%%mm2\n"     /* mm2 = a|b|c|d */
       
    49                          "	movq 8(%1),%%mm4\n"     /* mm4 = e|f|g|h */
       
    50                          /* pré charger le buffer dst dans mm7 */
       
    51                          "	movq (%0),%%mm7\n"      /* mm7 = dst[0] */
       
    52                          /* multiplier par le volume */
       
    53                          "	pmullw %%mm0,%%mm1\n"   /* mm1 = l(a*v)|l(b*v)|l(c*v)|l(d*v) */
       
    54                          "	pmulhw %%mm0,%%mm2\n"   /* mm2 = h(a*v)|h(b*v)|h(c*v)|h(d*v) */
       
    55                          "	movq %%mm4,%%mm5\n"     /* mm5 = e|f|g|h */
       
    56                          "	pmullw %%mm0,%%mm4\n"   /* mm4 = l(e*v)|l(f*v)|l(g*v)|l(h*v) */
       
    57                          "	pmulhw %%mm0,%%mm5\n"   /* mm5 = h(e*v)|h(f*v)|h(g*v)|h(h*v) */
       
    58                          "	movq %%mm1,%%mm3\n"     /* mm3 = l(a*v)|l(b*v)|l(c*v)|l(d*v) */
       
    59                          "	punpckhwd %%mm2,%%mm1\n"        /* mm1 = a*v|b*v */
       
    60                          "	movq %%mm4,%%mm6\n"     /* mm6 = l(e*v)|l(f*v)|l(g*v)|l(h*v) */
       
    61                          "	punpcklwd %%mm2,%%mm3\n"        /* mm3 = c*v|d*v */
       
    62                          "	punpckhwd %%mm5,%%mm4\n"        /* mm4 = e*f|f*v */
       
    63                          "	punpcklwd %%mm5,%%mm6\n"        /* mm6 = g*v|h*v */
       
    64                          /* pré charger le buffer dst dans mm5 */
       
    65                          "	movq 8(%0),%%mm5\n"     /* mm5 = dst[1] */
       
    66                          /* diviser par 128 */
       
    67                          "	psrad $7,%%mm1\n"       /* mm1 = a*v/128|b*v/128 , 128 = SDL_MIX_MAXVOLUME */
       
    68                          "	add $16,%1\n" "	psrad $7,%%mm3\n"       /* mm3 = c*v/128|d*v/128 */
       
    69                          "	psrad $7,%%mm4\n"       /* mm4 = e*v/128|f*v/128 */
       
    70                          /* mm1 = le sample avec le volume modifié */
       
    71                          "	packssdw %%mm1,%%mm3\n" /* mm3 = s(a*v|b*v|c*v|d*v) */
       
    72                          "	psrad $7,%%mm6\n"       /* mm6= g*v/128|h*v/128 */
       
    73                          "	paddsw %%mm7,%%mm3\n"   /* mm3 = adjust_volume(src)+dst */
       
    74                          /* mm4 = le sample avec le volume modifié */
       
    75                          "	packssdw %%mm4,%%mm6\n" /* mm6 = s(e*v|f*v|g*v|h*v) */
       
    76                          "	movq %%mm3,(%0)\n" "	paddsw %%mm5,%%mm6\n"   /* mm6 = adjust_volume(src)+dst */
       
    77                          "	movq %%mm6,8(%0)\n"
       
    78                          "	add $16,%0\n"
       
    79                          "	dec %%edx\n"
       
    80                          "	jnz .mixloopS16\n"
       
    81                          "	emms\n"
       
    82                          ".endS16:\n"::"r"(dst), "r"(src),
       
    83                          "m"(size), "m"(volume):"eax", "edx", "memory");
       
    84 }
       
    85 
       
    86 
       
    87 
       
    88 /*////////////////////////////////////////////// */
       
    89 /* Mixing for 8 bit signed buffers */
       
    90 /*////////////////////////////////////////////// */
       
    91 
       
    92 void
       
    93 SDL_MixAudio_MMX_S8(char *dst, char *src, unsigned int size, int volume)
       
    94 {
       
    95     __asm__ __volatile__("	movl %3,%%eax\n"        /* eax = volume */
       
    96                          "	movd %%eax,%%mm0\n" "	movq %%mm0,%%mm1\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n" "	psllq $16,%%mm0\n" "	por %%mm1,%%mm0\n" "	movl %2,%%edx\n"        /* edx = size */
       
    97                          "	shr $3,%%edx\n" /* process 8 bytes per iteration = 8 samples */
       
    98                          "	cmp $0,%%edx\n" "	je .endS8\n" ".align 8\n" "	.mixloopS8:\n" "	pxor %%mm2,%%mm2\n"     /* mm2 = 0 */
       
    99                          "	movq (%1),%%mm1\n"      /* mm1 = a|b|c|d|e|f|g|h */
       
   100                          "	movq %%mm1,%%mm3\n"     /* mm3 = a|b|c|d|e|f|g|h */
       
   101                          /* on va faire le "sign extension" en faisant un cmp avec 0 qui retourne 1 si <0, 0 si >0 */
       
   102                          "	pcmpgtb %%mm1,%%mm2\n"  /* mm2 = 11111111|00000000|00000000.... */
       
   103                          "	punpckhbw %%mm2,%%mm1\n"        /* mm1 = 0|a|0|b|0|c|0|d */
       
   104                          "	punpcklbw %%mm2,%%mm3\n"        /* mm3 = 0|e|0|f|0|g|0|h */
       
   105                          "	movq (%0),%%mm2\n"      /* mm2 = destination */
       
   106                          "	pmullw %%mm0,%%mm1\n"   /* mm1 = v*a|v*b|v*c|v*d */
       
   107                          "	add $8,%1\n" "	pmullw %%mm0,%%mm3\n"   /* mm3 = v*e|v*f|v*g|v*h */
       
   108                          "	psraw $7,%%mm1\n"       /* mm1 = v*a/128|v*b/128|v*c/128|v*d/128  */
       
   109                          "	psraw $7,%%mm3\n"       /* mm3 = v*e/128|v*f/128|v*g/128|v*h/128 */
       
   110                          "	packsswb %%mm1,%%mm3\n" /* mm1 = v*a/128|v*b/128|v*c/128|v*d/128|v*e/128|v*f/128|v*g/128|v*h/128 */
       
   111                          "	paddsb %%mm2,%%mm3\n"   /* add to destination buffer */
       
   112                          "	movq %%mm3,(%0)\n"      /* store back to ram */
       
   113                          "	add $8,%0\n"
       
   114                          "	dec %%edx\n"
       
   115                          "	jnz .mixloopS8\n"
       
   116                          ".endS8:\n"
       
   117                          "	emms\n"::"r"(dst), "r"(src), "m"(size),
       
   118                          "m"(volume):"eax", "edx", "memory");
       
   119 }
       
   120 #endif
       
   121 
       
   122 #endif /* SDL_BUGGY_MMX_MIXERS */
       
   123 
       
   124 /* vi: set ts=4 sw=4 expandtab: */