void GSDrawScanlineCodeGenerator::clamp16(const Xmm& a, const Xmm& temp)
{
#if _M_SSE >= 0x500
vpackuswb(a, a);
vpmovzxbw(a, a);
#elif _M_SSE >= 0x401
packuswb(a, a);
pmovzxbw(a, a);
#else
packuswb(a, a);
pxor(temp, temp);
punpcklbw(a, temp);
#endif
}
void GSDrawScanlineCodeGenerator::clamp16(const Xmm& a, const Xmm& temp)
{
packuswb(a, a);
if(m_cpu.has(util::Cpu::tSSE41))
{
pmovzxbw(a, a);
}
else
{
pxor(temp, temp);
punpcklbw(a, temp);
}
}
template<class _mm> void TimgFilterNoiseMplayer::Tprocess::lineNoiseAvg_simd(uint8_t *dst,const uint8_t *src, int len, int8_t **shift_)
{
if (_mm::align && (intptr_t(src)&15 || intptr_t(dst)&15)) {
lineNoiseAvg_simd<typename _mm::T64>(dst,src,len,shift_);
return;
}
const int mmx_len=len&(~(_mm::size-1));
int8_t *shift2[3]= {shift_[0]+mmx_len, shift_[1]+mmx_len, shift_[2]+mmx_len};
for (int x=-mmx_len; x<0; x+=_mm::size) {
//".balign 16 \n\t"
typename _mm::__m mm0,mm1,mm2,mm3;
movdqu (mm1,shift2[0]+mmx_len+x);
movq (mm0,src+mmx_len+x);
typename _mm::__m shift1_8;
movVqu(shift1_8, shift2[1]+mmx_len+x);
paddb (mm1,shift1_8);
typename _mm::__m shift2_8;
movVqu(shift2_8, shift2[2]+mmx_len+x);
paddb (mm1,shift2_8);
movq (mm2,mm0);
movq (mm3,mm1);
punpcklbw (mm0,mm0);
punpckhbw (mm2,mm2);
punpcklbw (mm1,mm1);
punpckhbw (mm3,mm3);
pmulhw (mm1,mm0);
pmulhw (mm3,mm2);
paddw (mm1,mm1);
paddw (mm3,mm3);
paddw (mm1,mm0);
paddw (mm3,mm2);
psrlw (mm1,8);
psrlw (mm3,8);
packuswb (mm1,mm3);
movq (dst+mmx_len+x,mm1);
}
if (mmx_len!=len) {
lineNoiseAvg_C(dst+mmx_len, src+mmx_len, len-mmx_len, shift2);
}
}
int main()
{
int rval;
mmx_t ma;
mmx_t mb;
movq_r2r(mm0, mm1);
rval = mmx_ok();
/* Announce return value of mmx_ok() */
// printf("Value returned from init was %x.", rval);
// printf(" (Indicates MMX %s available)\n\n",(rval)? "is" : "not");
// fflush(stdout); fflush(stderr);
// if(rval)
{
/* PADD *****************************************************/
ma.q = 0x1111111180000000LL;
mb.q = 0x7fffffff00000001LL;
paddd(ma, mb);
fprintf(stdout, "paddd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddd: mb.q is 9111111080000001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x0001000100010001LL;
mb.q = 0x80007fffffff0001LL;
paddw(ma, mb);
fprintf(stdout, "paddw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddw: mb.q is 8001800000000002\n");
fflush(stdout); fflush(stderr);
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010000LL;
paddw(ma, mb);
fprintf(stdout, "paddw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddw: mb.q is 8001800000000001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x01010101807fff01LL;
mb.q = 0x807fff0101010101LL;
paddb(ma, mb);
fprintf(stdout, "paddb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddb: mb.q is 8180000281800002\n");
fflush(stdout); fflush(stderr);
/* PADDS ****************************************************/
ma.q = 0x0001000100010001LL;
mb.q = 0x80007fffffff0001LL;
paddsw(ma, mb);
fprintf(stdout, "paddsw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddsw: mb.q is 80017fff00000002\n");
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010000LL;
paddsw(ma, mb);
fprintf(stdout, "paddsw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddsw: mb.q is 80017fff00000001\n");
ma.q = 0x01010101807fff01LL;
mb.q = 0x807fff0101010101LL;
paddsb(ma, mb);
fprintf(stdout, "paddsb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddsb: mb.q is 817f0002817f0002\n");
fflush(stdout); fflush(stderr);
/* PADDUS ***************************************************/
ma.q = 0x0001000100010001LL;
mb.q = 0x80007fffffff0001LL;
paddusw(ma, mb);
fprintf(stdout, "paddusw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddusw: mb.q is 80018000ffff0002\n");
fflush(stdout); fflush(stderr);
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010000LL;
paddusw(ma, mb);
fprintf(stdout, "paddusw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddusw: mb.q is 80018000ffff0001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x01010101807fff01LL;
mb.q = 0x807fff0101010101LL;
paddusb(ma, mb);
fprintf(stdout, "paddusb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "paddusb: mb.q is 8180ff028180ff02\n");
fflush(stdout); fflush(stderr);
/* PSUB *****************************************************/
ma.q = 0x7fffffff00000001LL;
mb.q = 0x1111111180000000LL;
psubd(ma, mb);
fprintf(stdout, "psubd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubd: mb.q is 911111127fffffff\n");
fflush(stdout); fflush(stderr);
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010001LL;
psubw(ma, mb);
fprintf(stdout, "psubw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubw: mb.q is 8001800200020000\n");
fflush(stdout); fflush(stderr);
ma.q = 0x0001000100010000LL;
mb.q = 0x80007fffffff0001LL;
psubw(ma, mb);
fprintf(stdout, "psubw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubw: mb.q is 7fff7ffefffe0001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x807fff0101010101LL;
mb.q = 0x01010101807fff01LL;
psubb(ma, mb);
fprintf(stdout, "psubb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubb: mb.q is 818202007f7efe00\n");
fflush(stdout); fflush(stderr);
/* PSUBS ****************************************************/
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010001LL;
psubsw(ma, mb);
fprintf(stdout, "psubsw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubsw: mb.q is 7fff800200020000\n");
fflush(stdout); fflush(stderr);
ma.q = 0x0001000100010000LL;
mb.q = 0x80007fffffff0001LL;
psubsw(ma, mb);
fprintf(stdout, "psubsw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubsw: mb.q is 80007ffefffe0001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x807fff0101010101LL;
mb.q = 0x01010101807fff01LL;
psubsb(ma, mb);
fprintf(stdout, "psubsb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubsb: mb.q is 7f820200807efe00\n");
fflush(stdout); fflush(stderr);
/* PSUBUS ***************************************************/
ma.q = 0x80007fffffff0001LL;
mb.q = 0x0001000100010001LL;
psubusw(ma, mb);
fprintf(stdout, "psubusw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubusw: mb.q is 0000000000000000\n");
fflush(stdout); fflush(stderr);
ma.q = 0x0001000100010000LL;
mb.q = 0x80007fffffff0001LL;
psubusw(ma, mb);
fprintf(stdout, "psubusw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubusw: mb.q is 7fff7ffefffe0001\n");
fflush(stdout); fflush(stderr);
ma.q = 0x807fff0101010101LL;
mb.q = 0x01010101807fff01LL;
psubusb(ma, mb);
fprintf(stdout, "psubusb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psubusb: mb.q is 000000007f7efe00\n");
fflush(stdout); fflush(stderr);
/* PMUL *****************************************************/
ma.q = 0x8000ffff00ff0000LL;
mb.q = 0x0200ffff00ffffffLL;
pmulhw(ma, mb);
fprintf(stdout, "pmulhw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pmulhw: mb.q is ff00000000000000\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0200ffff00ffffffLL;
pmullw(ma, mb);
fprintf(stdout, "pmullw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pmullw: mb.q is 00000001fe010000\n");
fflush(stdout); fflush(stderr);
/* PMADD ****************************************************/
ma.q = 0x8000345680007f34LL;
mb.q = 0x93234a27ffff1707LL;
pmaddwd(ma, mb);
fprintf(stdout, "pmaddwd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pmaddwd: mb.q is 4597551a0b71a66c\n");
fflush(stdout); fflush(stderr);
/* PCMPEQ ***************************************************/
ma.q = 0x800034568f237f34LL;
mb.q = 0x93009a568f237f34LL;
pcmpeqd(ma, mb);
fprintf(stdout, "pcmpeqd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpeqd: mb.q is 00000000ffffffff\n");
fflush(stdout); fflush(stderr);
mb.q = 0x93009a568f237f34LL;
pcmpeqw(ma, mb);
fprintf(stdout, "pcmpeqw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpeqw: mb.q is 00000000ffffffff\n");
fflush(stdout); fflush(stderr);
mb.q = 0x93009a568f237f34LL;
pcmpeqb(ma, mb);
fprintf(stdout, "pcmpeqb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpeqb: mb.q is 00ff00ffffffffff\n");
fflush(stdout); fflush(stderr);
/* PCMPGT ***************************************************/
ma.q = 0x666688884477aaffLL;
mb.q = 0x1234567890abcdefLL;
pcmpgtd(ma, mb);
fprintf(stdout, "pcmpgtd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpgtd: mb.q is 0000000000000000\n");
fflush(stdout); fflush(stderr);
mb.q = 0x1234567890abcdefLL;
pcmpgtw(ma, mb);
fprintf(stdout, "pcmpgtw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpgtw: mb.q is 0000ffff0000ffff\n");
fflush(stdout); fflush(stderr);
mb.q = 0x1234567890abcdefLL;
pcmpgtb(ma, mb);
fprintf(stdout, "pcmpgtb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pcmpgtb: mb.q is 0000ffff0000ff00\n");
fflush(stdout); fflush(stderr);
/* PACKSS ***************************************************/
ma.q = 0x00012222000abbbbLL;
mb.q = 0x0000888800003333LL;
packssdw(ma, mb);
fprintf(stdout, "packssdw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "packssdw: mb.q is 7fff7fff7fff3333\n");
fflush(stdout); fflush(stderr);
ma.q = 0x00aa00dd01009999LL;
mb.q = 0x0011002200330044LL;
packsswb(ma, mb);
fprintf(stdout, "packsswb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "packsswb: mb.q is 7f7f7f8011223344\n");
fflush(stdout); fflush(stderr);
/* PACKUS ***************************************************/
ma.q = 0x00aa00dd01009999LL;
mb.q = 0x0011002200330044LL;
packuswb(ma, mb);
fprintf(stdout, "packuswb: mb.q is %016llx\n", mb.q);
fprintf(stderr, "packuswb: mb.q is aaddff0011223344\n");
fflush(stdout); fflush(stderr);
/* PUNPCKH **************************************************/
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
punpckhdq(ma, mb);
fprintf(stdout, "punpckhdq: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpckhdq: mb.q is 090a0b0c01020304\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0102030405060708LL;
punpckhwd(ma, mb);
fprintf(stdout, "punpckhwd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpckhwd: mb.q is 090a01020b0c0304\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0102030405060708LL;
punpckhbw(ma, mb);
fprintf(stdout, "punpckhbw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpckhbw: mb.q is 09010a020b030c04\n");
fflush(stdout); fflush(stderr);
/* PUNPCKL **************************************************/
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
punpckldq(ma, mb);
fprintf(stdout, "punpckldq: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpckldq: mb.q is 0d0e0f0005060708\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0102030405060708LL;
punpcklwd(ma, mb);
fprintf(stdout, "punpcklwd: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpcklwd: mb.q is 0d0e05060f000708\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0102030405060708LL;
punpcklbw(ma, mb);
fprintf(stdout, "punpcklbw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "punpcklbw: mb.q is 0d050e060f070008\n");
fflush(stdout); fflush(stderr);
/* PAND, PANDN, POR, PXOR ***********************************/
ma.q = 0x5555555555555555LL;
mb.q = 0x3333333333333333LL;
pand(ma, mb);
fprintf(stdout, "pand: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pand: mb.q is 1111111111111111\n");
fflush(stdout); fflush(stderr);
mb.q = 0x3333333333333333LL;
pandn(ma, mb);
fprintf(stdout, "pandn: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pandn: mb.q is 4444444444444444\n");
fflush(stdout); fflush(stderr);
mb.q = 0x3333333333333333LL;
por(ma, mb);
fprintf(stdout, "por: mb.q is %016llx\n", mb.q);
fprintf(stderr, "por: mb.q is 7777777777777777\n");
fflush(stdout); fflush(stderr);
mb.q = 0x3333333333333333LL;
pxor(ma, mb);
fprintf(stdout, "pxor: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pxor: mb.q is 6666666666666666\n");
fflush(stdout); fflush(stderr);
/* PSLL *****************************************************/
ma.q = 0x0000000000000018LL;
mb.q = 0x0123456789abcdefLL;
psllq(ma, mb);
fprintf(stdout, "psllq: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psllq: mb.q is 6789abcdef000000\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0123456789abcdefLL;
pslld(ma, mb);
fprintf(stdout, "pslld: mb.q is %016llx\n", mb.q);
fprintf(stderr, "pslld: mb.q is 67000000ef000000\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0123456789abcdefLL;
psllw(ma, mb);
fprintf(stdout, "psllw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psllw: mb.q is 0000000000000000\n");
fflush(stdout); fflush(stderr);
/* PSRL *****************************************************/
ma.q = 0x0000000000000018LL;
mb.q = 0x0123456789abcdefLL;
psrlq(ma, mb);
fprintf(stdout, "psrlq: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psrlq: mb.q is 0000000123456789\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0123456789abcdefLL;
psrld(ma, mb);
fprintf(stdout, "psrld: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psrld: mb.q is 0000000100000089\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0123456789abcdefLL;
psrlw(ma, mb);
fprintf(stdout, "psrlw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psrlw: mb.q is 0000000000000000\n");
fflush(stdout); fflush(stderr);
/* PSRA *****************************************************/
ma.q = 0x0000000000000018LL;
mb.q = 0x0123456789abcdefLL;
psrad(ma, mb);
fprintf(stdout, "psrad: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psrad: mb.q is 00000001ffffff89\n");
fflush(stdout); fflush(stderr);
mb.q = 0x0123456789abcdefLL;
psraw(ma, mb);
fprintf(stdout, "psraw: mb.q is %016llx\n", mb.q);
fprintf(stderr, "psraw: mb.q is 00000000ffffffff\n");
fflush(stdout); fflush(stderr);
/* Exit MXX *************************************************/
emms();
}
/* Clean-up and exit nicely */
exit(0);
}
template <class _mm, int src_aligned, int dst_aligned> void TffdshowConverters2::convert_NV12toYV12(
const uint8_t* srcY,
const uint8_t* srcCbCr,
uint8_t* dstY,
uint8_t* dstCb,
uint8_t* dstCr,
int dx,
int dy,
stride_t stride_Y,
stride_t stride_CbCr,
stride_t stride_dstY,
stride_t stride_dstCbCr)
{
int xCount = dx / (_mm::size*2);
if (xCount <= 0)
return;
_mm::__m _mm0,_mm1,_mm2,_mm3,_mm_00ff;
// fill with 0xff
pxor(_mm_00ff,_mm_00ff);
pcmpeqb(_mm_00ff,_mm_00ff);
psllw(_mm_00ff, 8);
psrlw(_mm_00ff, 8);
for (int y = 0 ; y < dy ; y++) {
const uint8_t *src = srcY + y * stride_Y;
uint8_t *dst = dstY + y * stride_dstY;
int x = xCount;
do {
if (src_aligned) {
movVqa(_mm0, src);
movVqa(_mm1, src + _mm::size);
} else {
movVqu(_mm0, src);
movVqu(_mm1, src + _mm::size);
}
src += _mm::size * 2;
if (dst_aligned) {
_mm::movntVq(dst, _mm0);
_mm::movntVq(dst + _mm::size, _mm1);
} else {
movVqu(dst, _mm0);
movVqu(dst + _mm::size, _mm1);
}
dst += _mm::size * 2;
} while(--x);
}
int dyCbCr = dy/2;
for (int y = 0 ; y < dyCbCr ; y++) {
const uint8_t *srcCbCrLn = srcCbCr + y * stride_CbCr;
uint8_t *dstCbLn = dstCb + y * stride_dstCbCr;
uint8_t *dstCrLn = dstCr + y * stride_dstCbCr;
int x = xCount;
do {
if (src_aligned) {
movVqa(_mm0, srcCbCrLn);
movVqa(_mm1, srcCbCrLn + _mm::size);
} else {
movVqu(_mm0, srcCbCrLn);
movVqu(_mm1, srcCbCrLn + _mm::size);
}
_mm2 = _mm0;
_mm3 = _mm1;
srcCbCrLn += _mm::size * 2;
pand(_mm0, _mm_00ff);
pand(_mm1, _mm_00ff);
psrlw(_mm2,8);
psrlw(_mm3,8);
packuswb(_mm0, _mm1);
packuswb(_mm2, _mm3);
if (dst_aligned) {
_mm::movntVq(dstCbLn, _mm0);
_mm::movntVq(dstCrLn, _mm2);
} else {
movVqu(dstCbLn, _mm0);
movVqu(dstCrLn, _mm2);
}
dstCbLn += _mm::size;
dstCrLn += _mm::size;
} while(--x);
}
if (xCount * (int)_mm::size * 2 < dx && dx > _mm::size * 2) {
int dxDone = dx - _mm::size * 2;
srcY += dxDone;
srcCbCr += dxDone;
dstY += dxDone;
dstCb += dxDone/2;
dstCr += dxDone/2;
convert_NV12toYV12<_mm, 0, 0>(srcY, srcCbCr, dstY, dstCb, dstCr, _mm::size * 2, dy, stride_Y, stride_CbCr, stride_dstY, stride_dstCbCr);
}
_mm::empty();
}
void GSDrawScanlineCodeGenerator::WriteFrame(int params)
{
const int _top = params + 4;
if(!m_sel.fwrite)
{
return;
}
if(m_sel.colclamp == 0)
{
// c[0] &= 0x000000ff;
// c[1] &= 0x000000ff;
pcmpeqd(xmm7, xmm7);
psrlw(xmm7, 8);
pand(xmm5, xmm7);
pand(xmm6, xmm7);
}
if(m_sel.fpsm == 2 && m_sel.dthe)
{
mov(eax, dword[esp + _top]);
and(eax, 3);
shl(eax, 5);
paddw(xmm5, xmmword[eax + (size_t)&m_env.dimx[0]]);
paddw(xmm6, xmmword[eax + (size_t)&m_env.dimx[1]]);
}
// GSVector4i fs = c[0].upl16(c[1]).pu16(c[0].uph16(c[1]));
movdqa(xmm7, xmm5);
punpcklwd(xmm5, xmm6);
punpckhwd(xmm7, xmm6);
packuswb(xmm5, xmm7);
if(m_sel.fba && m_sel.fpsm != 1)
{
// fs |= 0x80000000;
pcmpeqd(xmm7, xmm7);
pslld(xmm7, 31);
por(xmm5, xmm7);
}
if(m_sel.fpsm == 2)
{
// GSVector4i rb = fs & 0x00f800f8;
// GSVector4i ga = fs & 0x8000f800;
mov(eax, 0x00f800f8);
movd(xmm6, eax);
pshufd(xmm6, xmm6, _MM_SHUFFLE(0, 0, 0, 0));
mov(eax, 0x8000f800);
movd(xmm7, eax);
pshufd(xmm7, xmm7, _MM_SHUFFLE(0, 0, 0, 0));
movdqa(xmm4, xmm5);
pand(xmm4, xmm6);
pand(xmm5, xmm7);
// fs = (ga >> 16) | (rb >> 9) | (ga >> 6) | (rb >> 3);
movdqa(xmm6, xmm4);
movdqa(xmm7, xmm5);
psrld(xmm4, 3);
psrld(xmm6, 9);
psrld(xmm5, 6);
psrld(xmm7, 16);
por(xmm5, xmm4);
por(xmm7, xmm6);
por(xmm5, xmm7);
}
if(m_sel.rfb)
{
// fs = fs.blend(fd, fm);
blend(xmm5, xmm2, xmm3); // TODO: could be skipped in certain cases, depending on fpsm and fm
}
bool fast = m_sel.rfb && m_sel.fpsm < 2;
WritePixel(xmm5, xmm0, ebx, dl, fast, m_sel.fpsm);
}
int main()
{
int rval, i, co, tmp; //, j;
mmx_t ma, mb; //, mm0, mm1, *pm0, *pm1;
tmp = calc_cpu_speed();
printf(" Calculating CPU-Speed....running at %d MHz\n", tmp);
printf(" Calculating CPU-OFFSET...found : ");
co = calc_cpu_ofs();
printf(" %d\n",co);
rval = 1; //mmx_ok(); /* Announce return value of mmx_ok() */
printf(" *** Bogus message since we are emulating so MMX does allways exist ***\n");
printf(" Value returned from init was %x.", rval);
printf(" (Indicates MMX %s available)\n\n",(rval)? "is" : "not");
if(rval) {
/* PADD *****************************************************/
ma.q = 0x1111111180000000LL;
mb.q = 0x7fffffff00000001LL;
mmx_regdump(ma);
mmx_regdump(mb);
paddd( &ma, &mb);
printf("paddd: mb.q is %016llx\n", mb.q);
mmx_regdump(mb);
paddw( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
ma.q = 0x0000000000000008LL;
mb.q = 0x0001000200030004LL;
mmx_regdump(ma);
mmx_regdump(mb);
psllw( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
ma.q = 0x0000000000000000LL;
mb.q = 0x888044a87f06fe80LL;
mmx_regdump(ma);
mmx_regdump(mb);
// packuswb( &ma,&mb);
ma.q = 0x00aa00dd01009999LL;
mb.q = 0x0011002200330044LL;
mmx_regdump(ma);
mmx_regdump(mb);
packuswb( &ma, &mb);
// punpckhdq(&ma,&mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpckhdq */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpckhdq( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpckhwd */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpckhwd( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpckhbw */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpckhbw( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpckldq */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpckldq( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpcklwd */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpcklwd( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* punpcklbw */
ma.q = 0x090a0b0c0d0e0f00LL;
mb.q = 0x0102030405060708LL;
mmx_regdump(ma);
mmx_regdump(mb);
punpcklbw( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* pmaddwd */
ma.q = 0x8000800080008000LL;
mb.q = 0x8000800080008000LL;
mmx_regdump(ma);
mmx_regdump(mb);
pmaddwd( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* packsswb */
ma.q = 0x00aa00dd01009999LL;
mb.q = 0x0011002200330044LL;
mmx_regdump(ma);
mmx_regdump(mb);
packsswb( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
/* packsswb */
ma.q = 0x007e7f00ef9dff88LL;
mb.q = 0xff020085007e81cfLL;
mmx_regdump(ma);
mmx_regdump(mb);
packsswb( &ma, &mb);
mmx_regdump(ma);
mmx_regdump(mb);
for (i=0; i< 0x0F; i++){
printf ("%d. Test running\n", i);
GET_TSC(tsc1);
mb.w[0] = i;
ma.w[0] = i;
GET_TSC(tsc2);
tick_dump(co);
GET_TSC(tsc1); /* Let's test some real asm */
asm("
// pushl %eax\n
// movl $0, %eax\n
// cpuid\n
packsswb %mm0, %mm1\n
pmaddwd %mm0, %mm1\n
punpcklbw %mm0, %mm1\n
punpcklbw %mm0, %mm1\n
pmaddwd %mm0, %mm1\n
punpcklbw %mm0, %mm1\n
// popl %eax\n
");
GET_TSC(tsc2);
tick_dump(co);
ma.q = 0x8000800080008000LL;
mb.q = 0x8000800080008000LL;
GET_TSC(tsc1); /* Here some emulated routines */
pmaddwd( &ma, &mb);
// packsswb( &ma, &mb);
GET_TSC(tsc2);
tick_dump(co);
// mmx_regdump(mb);
}
}
exit(0); /* Clean-up and exit nicely */
}
