/*
 *  MMX/3DNow!/SSE/SSE2/SSE3/PNI support
 *
 *  Copyright (c) 2005 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
 */
#if SHIFT == 0
#define Reg MMXReg
#define SUFFIX _mmx
#else
#define Reg XMMReg
#define SUFFIX _xmm
#endif

void glue(helper_psrlw, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psraw, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psllw, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psrld, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psrad, SUFFIX)(Reg *d, Reg *s);
void glue(helper_pslld, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psrlq, SUFFIX)(Reg *d, Reg *s);
void glue(helper_psllq, SUFFIX)(Reg *d, Reg *s);

#if SHIFT == 1
void glue(helper_psrldq, SUFFIX)(Reg *d, Reg *s);
void glue(helper_pslldq, SUFFIX)(Reg *d, Reg *s);
#endif

#define SSE_HELPER_B(name, F)\
    void glue(name, SUFFIX) (Reg *d, Reg *s);

#define SSE_HELPER_W(name, F)\
    void glue(name, SUFFIX) (Reg *d, Reg *s);

#define SSE_HELPER_L(name, F)\
    void glue(name, SUFFIX) (Reg *d, Reg *s);

#define SSE_HELPER_Q(name, F)\
    void glue(name, SUFFIX) (Reg *d, Reg *s);

SSE_HELPER_B(helper_paddb, FADD);
SSE_HELPER_W(helper_paddw, FADD);
SSE_HELPER_L(helper_paddl, FADD);
SSE_HELPER_Q(helper_paddq, FADD);

SSE_HELPER_B(helper_psubb, FSUB);
SSE_HELPER_W(helper_psubw, FSUB);
SSE_HELPER_L(helper_psubl, FSUB);
SSE_HELPER_Q(helper_psubq, FSUB);

SSE_HELPER_B(helper_paddusb, FADDUB);
SSE_HELPER_B(helper_paddsb, FADDSB);
SSE_HELPER_B(helper_psubusb, FSUBUB);
SSE_HELPER_B(helper_psubsb, FSUBSB);

SSE_HELPER_W(helper_paddusw, FADDUW);
SSE_HELPER_W(helper_paddsw, FADDSW);
SSE_HELPER_W(helper_psubusw, FSUBUW);
SSE_HELPER_W(helper_psubsw, FSUBSW);

SSE_HELPER_B(helper_pminub, FMINUB);
SSE_HELPER_B(helper_pmaxub, FMAXUB);

SSE_HELPER_W(helper_pminsw, FMINSW);
SSE_HELPER_W(helper_pmaxsw, FMAXSW);

SSE_HELPER_Q(helper_pand, FAND);
SSE_HELPER_Q(helper_pandn, FANDN);
SSE_HELPER_Q(helper_por, FOR);
SSE_HELPER_Q(helper_pxor, FXOR);

SSE_HELPER_B(helper_pcmpgtb, FCMPGTB);
SSE_HELPER_W(helper_pcmpgtw, FCMPGTW);
SSE_HELPER_L(helper_pcmpgtl, FCMPGTL);

SSE_HELPER_B(helper_pcmpeqb, FCMPEQ);
SSE_HELPER_W(helper_pcmpeqw, FCMPEQ);
SSE_HELPER_L(helper_pcmpeql, FCMPEQ);

SSE_HELPER_W(helper_pmullw, FMULLW);
#if SHIFT == 0
SSE_HELPER_W(helper_pmulhrw, FMULHRW);
#endif
SSE_HELPER_W(helper_pmulhuw, FMULHUW);
SSE_HELPER_W(helper_pmulhw, FMULHW);

SSE_HELPER_B(helper_pavgb, FAVG);
SSE_HELPER_W(helper_pavgw, FAVG);

void glue(helper_pmuludq, SUFFIX) (Reg *d, Reg *s);
void glue(helper_pmaddwd, SUFFIX) (Reg *d, Reg *s);

void glue(helper_psadbw, SUFFIX) (Reg *d, Reg *s);
void glue(helper_maskmov, SUFFIX) (Reg *d, Reg *s, target_ulong a0);
void glue(helper_movl_mm_T0, SUFFIX) (Reg *d, uint32_t val);
#ifdef TARGET_X86_64
void glue(helper_movq_mm_T0, SUFFIX) (Reg *d, uint64_t val);
#endif

#if SHIFT == 0
void glue(helper_pshufw, SUFFIX) (Reg *d, Reg *s, int order);
#else
void helper_shufps(Reg *d, Reg *s, int order);
void helper_shufpd(Reg *d, Reg *s, int order);
void glue(helper_pshufd, SUFFIX) (Reg *d, Reg *s, int order);
void glue(helper_pshuflw, SUFFIX) (Reg *d, Reg *s, int order);
void glue(helper_pshufhw, SUFFIX) (Reg *d, Reg *s, int order);
#endif

#if SHIFT == 1
/* FPU ops */
/* XXX: not accurate */

#define SSE_HELPER_S(name, F)\
    void helper_ ## name ## ps (Reg *d, Reg *s);        \
    void helper_ ## name ## ss (Reg *d, Reg *s);        \
    void helper_ ## name ## pd (Reg *d, Reg *s);        \
    void helper_ ## name ## sd (Reg *d, Reg *s);

SSE_HELPER_S(add, FPU_ADD);
SSE_HELPER_S(sub, FPU_SUB);
SSE_HELPER_S(mul, FPU_MUL);
SSE_HELPER_S(div, FPU_DIV);
SSE_HELPER_S(min, FPU_MIN);
SSE_HELPER_S(max, FPU_MAX);
SSE_HELPER_S(sqrt, FPU_SQRT);


void helper_cvtps2pd(Reg *d, Reg *s);
void helper_cvtpd2ps(Reg *d, Reg *s);
void helper_cvtss2sd(Reg *d, Reg *s);
void helper_cvtsd2ss(Reg *d, Reg *s);
void helper_cvtdq2ps(Reg *d, Reg *s);
void helper_cvtdq2pd(Reg *d, Reg *s);
void helper_cvtpi2ps(XMMReg *d, MMXReg *s);
void helper_cvtpi2pd(XMMReg *d, MMXReg *s);
void helper_cvtsi2ss(XMMReg *d, uint32_t val);
void helper_cvtsi2sd(XMMReg *d, uint32_t val);

#ifdef TARGET_X86_64
void helper_cvtsq2ss(XMMReg *d, uint64_t val);
void helper_cvtsq2sd(XMMReg *d, uint64_t val);
#endif

void helper_cvtps2dq(XMMReg *d, XMMReg *s);
void helper_cvtpd2dq(XMMReg *d, XMMReg *s);
void helper_cvtps2pi(MMXReg *d, XMMReg *s);
void helper_cvtpd2pi(MMXReg *d, XMMReg *s);
int32_t helper_cvtss2si(XMMReg *s);
int32_t helper_cvtsd2si(XMMReg *s);
#ifdef TARGET_X86_64
int64_t helper_cvtss2sq(XMMReg *s);
int64_t helper_cvtsd2sq(XMMReg *s);
#endif

void helper_cvttps2dq(XMMReg *d, XMMReg *s);
void helper_cvttpd2dq(XMMReg *d, XMMReg *s);
void helper_cvttps2pi(MMXReg *d, XMMReg *s);
void helper_cvttpd2pi(MMXReg *d, XMMReg *s);
int32_t helper_cvttss2si(XMMReg *s);
int32_t helper_cvttsd2si(XMMReg *s);
#ifdef TARGET_X86_64
int64_t helper_cvttss2sq(XMMReg *s);
int64_t helper_cvttsd2sq(XMMReg *s);
#endif

void helper_rsqrtps(XMMReg *d, XMMReg *s);
void helper_rsqrtss(XMMReg *d, XMMReg *s);
void helper_rcpps(XMMReg *d, XMMReg *s);
void helper_rcpss(XMMReg *d, XMMReg *s);
void helper_haddps(XMMReg *d, XMMReg *s);
void helper_haddpd(XMMReg *d, XMMReg *s);
void helper_hsubps(XMMReg *d, XMMReg *s);
void helper_hsubpd(XMMReg *d, XMMReg *s);
void helper_addsubps(XMMReg *d, XMMReg *s);
void helper_addsubpd(XMMReg *d, XMMReg *s);

#define SSE_HELPER_CMP(name, F)\
    void helper_ ## name ## ps (Reg *d, Reg *s);        \
    void helper_ ## name ## ss (Reg *d, Reg *s);        \
    void helper_ ## name ## pd (Reg *d, Reg *s);        \
    void helper_ ## name ## sd (Reg *d, Reg *s);

SSE_HELPER_CMP(cmpeq, FPU_CMPEQ);
SSE_HELPER_CMP(cmplt, FPU_CMPLT);
SSE_HELPER_CMP(cmple, FPU_CMPLE);
SSE_HELPER_CMP(cmpunord, FPU_CMPUNORD);
SSE_HELPER_CMP(cmpneq, FPU_CMPNEQ);
SSE_HELPER_CMP(cmpnlt, FPU_CMPNLT);
SSE_HELPER_CMP(cmpnle, FPU_CMPNLE);
SSE_HELPER_CMP(cmpord, FPU_CMPORD);

void helper_ucomiss(Reg *d, Reg *s);
void helper_comiss(Reg *d, Reg *s);
void helper_ucomisd(Reg *d, Reg *s);
void helper_comisd(Reg *d, Reg *s);
uint32_t helper_movmskps(Reg *s);
uint32_t helper_movmskpd(Reg *s);
#endif

uint32_t glue(helper_pmovmskb, SUFFIX)(Reg *s);
void glue(helper_packsswb, SUFFIX) (Reg *d, Reg *s);
void glue(helper_packuswb, SUFFIX) (Reg *d, Reg *s);
void glue(helper_packssdw, SUFFIX) (Reg *d, Reg *s);
#define UNPCK_OP(base_name, base)                               \
    void glue(helper_punpck ## base_name ## bw, SUFFIX) (Reg *d, Reg *s); \
    void glue(helper_punpck ## base_name ## wd, SUFFIX) (Reg *d, Reg *s); \
    void glue(helper_punpck ## base_name ## dq, SUFFIX) (Reg *d, Reg *s);

UNPCK_OP(l, 0);
UNPCK_OP(h, 1);

#if SHIFT == 1
void glue(helper_punpcklqdq, SUFFIX) (Reg *d, Reg *s);
void glue(helper_punpckhqdq, SUFFIX) (Reg *d, Reg *s);
#endif

/* 3DNow! float ops */
#if SHIFT == 0
void helper_pi2fd(MMXReg *d, MMXReg *s);
void helper_pi2fw(MMXReg *d, MMXReg *s);
void helper_pf2id(MMXReg *d, MMXReg *s);
void helper_pf2iw(MMXReg *d, MMXReg *s);
void helper_pfacc(MMXReg *d, MMXReg *s);
void helper_pfadd(MMXReg *d, MMXReg *s);
void helper_pfcmpeq(MMXReg *d, MMXReg *s);
void helper_pfcmpge(MMXReg *d, MMXReg *s);
void helper_pfcmpgt(MMXReg *d, MMXReg *s);
void helper_pfmax(MMXReg *d, MMXReg *s);
void helper_pfmin(MMXReg *d, MMXReg *s);
void helper_pfmul(MMXReg *d, MMXReg *s);
void helper_pfnacc(MMXReg *d, MMXReg *s);
void helper_pfpnacc(MMXReg *d, MMXReg *s);
void helper_pfrcp(MMXReg *d, MMXReg *s);
void helper_pfrsqrt(MMXReg *d, MMXReg *s);
void helper_pfsub(MMXReg *d, MMXReg *s);
void helper_pfsubr(MMXReg *d, MMXReg *s);
void helper_pswapd(MMXReg *d, MMXReg *s);
#endif

#undef SHIFT
#undef Reg
#undef SUFFIX

#undef SSE_HELPER_B
#undef SSE_HELPER_W
#undef SSE_HELPER_L
#undef SSE_HELPER_Q
#undef SSE_HELPER_S
#undef SSE_HELPER_CMP
#undef UNPCK_OP