| 1 | /* |
| 2 | SDL - Simple DirectMedia Layer |
| 3 | Copyright (C) 1997-2009 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 | #include "SDL_mixer_MMX_VC.h" |
| 25 | |
| 26 | #if defined(SDL_BUGGY_MMX_MIXERS) /* buggy, so we're disabling them. --ryan. */ |
| 27 | #if ((defined(_MSC_VER) && defined(_M_IX86)) || defined(__WATCOMC__)) && defined(SDL_ASSEMBLY_ROUTINES) |
| 28 | // MMX assembler version of SDL_MixAudio for signed little endian 16 bit samples and signed 8 bit samples |
| 29 | // Copyright 2002 Stephane Marchesin (stephane.marchesin@wanadoo.fr) |
| 30 | // Converted to Intel ASM notation by Cth |
| 31 | // This code is licensed under the LGPL (see COPYING for details) |
| 32 | // |
| 33 | // Assumes buffer size in bytes is a multiple of 16 |
| 34 | // Assumes SDL_MIX_MAXVOLUME = 128 |
| 35 | |
| 36 | |
| 37 | //////////////////////////////////////////////// |
| 38 | // Mixing for 16 bit signed buffers |
| 39 | //////////////////////////////////////////////// |
| 40 | |
| 41 | void SDL_MixAudio_MMX_S16_VC(char* dst,char* src,unsigned int nSize,int volume) |
| 42 | { |
| 43 | __asm |
| 44 | { |
| 45 | |
| 46 | push edi |
| 47 | push esi |
| 48 | push ebx |
| 49 | |
| 50 | mov edi, dst // edi = dst |
| 51 | mov esi, src // esi = src |
| 52 | mov eax, volume // eax = volume |
| 53 | mov ebx, nSize // ebx = size |
| 54 | shr ebx, 4 // process 16 bytes per iteration = 8 samples |
| 55 | jz endS16 |
| 56 | |
| 57 | pxor mm0, mm0 |
| 58 | movd mm0, eax //%%eax,%%mm0 |
| 59 | movq mm1, mm0 //%%mm0,%%mm1 |
| 60 | psllq mm0, 16 //$16,%%mm0 |
| 61 | por mm0, mm1 //%%mm1,%%mm0 |
| 62 | psllq mm0, 16 //$16,%%mm0 |
| 63 | por mm0, mm1 //%%mm1,%%mm0 |
| 64 | psllq mm0, 16 //$16,%%mm0 |
| 65 | por mm0, mm1 //%%mm1,%%mm0 // mm0 = vol|vol|vol|vol |
| 66 | |
| 67 | #ifndef __WATCOMC__ |
| 68 | align 16 |
| 69 | #endif |
| 70 | mixloopS16: |
| 71 | movq mm1, [esi] //(%%esi),%%mm1\n" // mm1 = a|b|c|d |
| 72 | movq mm2, mm1 //%%mm1,%%mm2\n" // mm2 = a|b|c|d |
| 73 | movq mm4, [esi + 8] //8(%%esi),%%mm4\n" // mm4 = e|f|g|h |
| 74 | // pre charger le buffer dst dans mm7 |
| 75 | movq mm7, [edi] //(%%edi),%%mm7\n" // mm7 = dst[0]" |
| 76 | // multiplier par le volume |
| 77 | pmullw mm1, mm0 //%%mm0,%%mm1\n" // mm1 = l(a*v)|l(b*v)|l(c*v)|l(d*v) |
| 78 | pmulhw mm2, mm0 //%%mm0,%%mm2\n" // mm2 = h(a*v)|h(b*v)|h(c*v)|h(d*v) |
| 79 | movq mm5, mm4 //%%mm4,%%mm5\n" // mm5 = e|f|g|h |
| 80 | pmullw mm4, mm0 //%%mm0,%%mm4\n" // mm4 = l(e*v)|l(f*v)|l(g*v)|l(h*v) |
| 81 | pmulhw mm5, mm0 //%%mm0,%%mm5\n" // mm5 = h(e*v)|h(f*v)|h(g*v)|h(h*v) |
| 82 | movq mm3, mm1 //%%mm1,%%mm3\n" // mm3 = l(a*v)|l(b*v)|l(c*v)|l(d*v) |
| 83 | punpckhwd mm1, mm2 //%%mm2,%%mm1\n" // mm1 = a*v|b*v |
| 84 | movq mm6, mm4 //%%mm4,%%mm6\n" // mm6 = l(e*v)|l(f*v)|l(g*v)|l(h*v) |
| 85 | punpcklwd mm3, mm2 //%%mm2,%%mm3\n" // mm3 = c*v|d*v |
| 86 | punpckhwd mm4, mm5 //%%mm5,%%mm4\n" // mm4 = e*f|f*v |
| 87 | punpcklwd mm6, mm5 //%%mm5,%%mm6\n" // mm6 = g*v|h*v |
| 88 | // pre charger le buffer dst dans mm5 |
| 89 | movq mm5, [edi + 8] //8(%%edi),%%mm5\n" // mm5 = dst[1] |
| 90 | // diviser par 128 |
| 91 | psrad mm1, 7 //$7,%%mm1\n" // mm1 = a*v/128|b*v/128 , 128 = SDL_MIX_MAXVOLUME |
| 92 | add esi, 16 //$16,%%esi\n" |
| 93 | psrad mm3, 7 //$7,%%mm3\n" // mm3 = c*v/128|d*v/128 |
| 94 | psrad mm4, 7 //$7,%%mm4\n" // mm4 = e*v/128|f*v/128 |
| 95 | // mm1 = le sample avec le volume modifie |
| 96 | packssdw mm3, mm1 //%%mm1,%%mm3\n" // mm3 = s(a*v|b*v|c*v|d*v) |
| 97 | psrad mm6, 7 //$7,%%mm6\n" // mm6= g*v/128|h*v/128 |
| 98 | paddsw mm3, mm7 //%%mm7,%%mm3\n" // mm3 = adjust_volume(src)+dst |
| 99 | // mm4 = le sample avec le volume modifie |
| 100 | packssdw mm6, mm4 //%%mm4,%%mm6\n" // mm6 = s(e*v|f*v|g*v|h*v) |
| 101 | movq [edi], mm3 //%%mm3,(%%edi)\n" |
| 102 | paddsw mm6, mm5 //%%mm5,%%mm6\n" // mm6 = adjust_volume(src)+dst |
| 103 | movq [edi + 8], mm6 //%%mm6,8(%%edi)\n" |
| 104 | add edi, 16 //$16,%%edi\n" |
| 105 | dec ebx //%%ebx\n" |
| 106 | jnz mixloopS16 |
| 107 | |
| 108 | endS16: |
| 109 | emms |
| 110 | |
| 111 | pop ebx |
| 112 | pop esi |
| 113 | pop edi |
| 114 | } |
| 115 | |
| 116 | } |
| 117 | |
| 118 | //////////////////////////////////////////////// |
| 119 | // Mixing for 8 bit signed buffers |
| 120 | //////////////////////////////////////////////// |
| 121 | |
| 122 | void SDL_MixAudio_MMX_S8_VC(char* dst,char* src,unsigned int nSize,int volume) |
| 123 | { |
| 124 | _asm |
| 125 | { |
| 126 | |
| 127 | push edi |
| 128 | push esi |
| 129 | push ebx |
| 130 | |
| 131 | mov edi, dst //movl %0,%%edi // edi = dst |
| 132 | mov esi, src //%1,%%esi // esi = src |
| 133 | mov eax, volume //%3,%%eax // eax = volume |
| 134 | |
| 135 | movd mm0, eax //%%eax,%%mm0 |
| 136 | movq mm1, mm0 //%%mm0,%%mm1 |
| 137 | psllq mm0, 16 //$16,%%mm0 |
| 138 | por mm0, mm1 //%%mm1,%%mm0 |
| 139 | psllq mm0, 16 //$16,%%mm0 |
| 140 | por mm0, mm1 //%%mm1,%%mm0 |
| 141 | psllq mm0, 16 //$16,%%mm0 |
| 142 | por mm0, mm1 //%%mm1,%%mm0 |
| 143 | |
| 144 | mov ebx, nSize //%2,%%ebx // ebx = size |
| 145 | shr ebx, 3 //$3,%%ebx // process 8 bytes per iteration = 8 samples |
| 146 | cmp ebx, 0 //$0,%%ebx |
| 147 | je endS8 |
| 148 | |
| 149 | #ifndef __WATCOMC__ |
| 150 | align 16 |
| 151 | #endif |
| 152 | mixloopS8: |
| 153 | pxor mm2, mm2 //%%mm2,%%mm2 // mm2 = 0 |
| 154 | movq mm1, [esi] //(%%esi),%%mm1 // mm1 = a|b|c|d|e|f|g|h |
| 155 | movq mm3, mm1 //%%mm1,%%mm3 // mm3 = a|b|c|d|e|f|g|h |
| 156 | // on va faire le "sign extension" en faisant un cmp avec 0 qui retourne 1 si <0, 0 si >0 |
| 157 | pcmpgtb mm2, mm1 //%%mm1,%%mm2 // mm2 = 11111111|00000000|00000000.... |
| 158 | punpckhbw mm1, mm2 //%%mm2,%%mm1 // mm1 = 0|a|0|b|0|c|0|d |
| 159 | punpcklbw mm3, mm2 //%%mm2,%%mm3 // mm3 = 0|e|0|f|0|g|0|h |
| 160 | movq mm2, [edi] //(%%edi),%%mm2 // mm2 = destination |
| 161 | pmullw mm1, mm0 //%%mm0,%%mm1 // mm1 = v*a|v*b|v*c|v*d |
| 162 | add esi, 8 //$8,%%esi |
| 163 | pmullw mm3, mm0 //%%mm0,%%mm3 // mm3 = v*e|v*f|v*g|v*h |
| 164 | psraw mm1, 7 //$7,%%mm1 // mm1 = v*a/128|v*b/128|v*c/128|v*d/128 |
| 165 | psraw mm3, 7 //$7,%%mm3 // mm3 = v*e/128|v*f/128|v*g/128|v*h/128 |
| 166 | packsswb mm3, mm1 //%%mm1,%%mm3 // 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 |
| 167 | paddsb mm3, mm2 //%%mm2,%%mm3 // add to destination buffer |
| 168 | movq [edi], mm3 //%%mm3,(%%edi) // store back to ram |
| 169 | add edi, 8 //$8,%%edi |
| 170 | dec ebx //%%ebx |
| 171 | jnz mixloopS8 |
| 172 | |
| 173 | endS8: |
| 174 | emms |
| 175 | |
| 176 | pop ebx |
| 177 | pop esi |
| 178 | pop edi |
| 179 | } |
| 180 | } |
| 181 | |
| 182 | #endif /* SDL_ASSEMBLY_ROUTINES */ |
| 183 | #endif /* SDL_BUGGY_MMX_MIXERS */ |