PeerStreamer

;******************************************************************************

;* x86 optimized Format Conversion Utils

;* Copyright (c) 2008 Loren Merritt

;*

;* This file is part of Libav.

;*

;* Libav 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.

;*

;* Libav 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 Libav; if not, write to the Free Software

;* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA

;******************************************************************************

%include "x86inc.asm"

section .text align=16

%macro PSWAPD_SSE 2

    pshufw %1, %2, 0x4e

%endmacro

%macro PSWAPD_3DN1 2

    movq  %1, %2

    psrlq %1, 32

    punpckldq %1, %2

%endmacro

%macro FLOAT_TO_INT16_INTERLEAVE6 1

; void float_to_int16_interleave6_sse(int16_t *dst, const float **src, int len)

cglobal float_to_int16_interleave6_%1, 2,7,0, dst, src, src1, src2, src3, src4, src5

%ifdef ARCH_X86_64

    %define lend r10d

    mov     lend, r2d

%else

    %define lend dword r2m

%endif

    mov src1q, [srcq+1*gprsize]

    mov src2q, [srcq+2*gprsize]

    mov src3q, [srcq+3*gprsize]

    mov src4q, [srcq+4*gprsize]

    mov src5q, [srcq+5*gprsize]

    mov srcq,  [srcq]

    sub src1q, srcq

    sub src2q, srcq

    sub src3q, srcq

    sub src4q, srcq

    sub src5q, srcq

.loop:

    cvtps2pi   mm0, [srcq]

    cvtps2pi   mm1, [srcq+src1q]

    cvtps2pi   mm2, [srcq+src2q]

    cvtps2pi   mm3, [srcq+src3q]

    cvtps2pi   mm4, [srcq+src4q]

    cvtps2pi   mm5, [srcq+src5q]

    packssdw   mm0, mm3

    packssdw   mm1, mm4

    packssdw   mm2, mm5

    pswapd     mm3, mm0

    punpcklwd  mm0, mm1

    punpckhwd  mm1, mm2

    punpcklwd  mm2, mm3

    pswapd     mm3, mm0

    punpckldq  mm0, mm2

    punpckhdq  mm2, mm1

    punpckldq  mm1, mm3

    movq [dstq   ], mm0

    movq [dstq+16], mm2

    movq [dstq+ 8], mm1

    add srcq, 8

    add dstq, 24

    sub lend, 2

    jg .loop

    emms

    RET

%endmacro ; FLOAT_TO_INT16_INTERLEAVE6

%define pswapd PSWAPD_SSE

FLOAT_TO_INT16_INTERLEAVE6 sse

%define cvtps2pi pf2id

%define pswapd PSWAPD_3DN1

FLOAT_TO_INT16_INTERLEAVE6 3dnow

%undef pswapd

FLOAT_TO_INT16_INTERLEAVE6 3dn2

%undef cvtps2pi