x86_64 test program

git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@1321 c046a42c-6fe2-441c-8c8c-71466251a162
This commit is contained in:
bellard 2005-03-02 22:19:12 +00:00
parent d785e6be4d
commit 776f2227f6
5 changed files with 614 additions and 274 deletions

View File

@ -6,6 +6,9 @@ LDFLAGS=
ifeq ($(ARCH),i386)
TESTS=linux-test testthread sha1-i386 test-i386 runcom
endif
ifeq ($(ARCH),x86_64)
TESTS=test-x86_64
endif
TESTS+=sha1# test_path
#TESTS+=test_path
@ -24,11 +27,15 @@ test_path: test_path.c
$(CC) $(CFLAGS) $(LDFLAGS) -o $@ $<
./$@ || { rm $@; exit 1; }
# i386 emulation test (test various opcodes) */
# i386/x86_64 emulation test (test various opcodes) */
test-i386: test-i386.c test-i386-code16.S test-i386-vm86.S \
test-i386.h test-i386-shift.h test-i386-muldiv.h
$(CC) $(CFLAGS) $(LDFLAGS) -static -o $@ test-i386.c \
test-i386-code16.S test-i386-vm86.S -lm
$(CC) $(CFLAGS) $(LDFLAGS) -static -o $@ \
test-i386.c test-i386-code16.S test-i386-vm86.S -lm
test-x86_64: test-i386.c \
test-i386.h test-i386-shift.h test-i386-muldiv.h
$(CC) $(CFLAGS) $(LDFLAGS) -static -o $@ test-i386.c -lm
ifeq ($(ARCH),i386)
test: test-i386

View File

@ -1,7 +1,7 @@
void glue(glue(test_, OP), b)(int op0, int op1)
void glue(glue(test_, OP), b)(long op0, long op1)
{
int res, s1, s0, flags;
long res, s1, s0, flags;
s0 = op0;
s1 = op1;
res = s0;
@ -10,16 +10,16 @@ void glue(glue(test_, OP), b)(int op0, int op1)
"popf\n\t"
stringify(OP)"b %b2\n\t"
"pushf\n\t"
"popl %1\n\t"
"pop %1\n\t"
: "=a" (res), "=g" (flags)
: "q" (s1), "0" (res), "1" (flags));
printf("%-10s A=%08x B=%08x R=%08x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CC=%04lx\n",
stringify(OP) "b", s0, s1, res, flags & CC_MASK);
}
void glue(glue(test_, OP), w)(int op0h, int op0, int op1)
void glue(glue(test_, OP), w)(long op0h, long op0, long op1)
{
int res, s1, flags, resh;
long res, s1, flags, resh;
s1 = op1;
resh = op0h;
res = op0;
@ -28,29 +28,49 @@ void glue(glue(test_, OP), w)(int op0h, int op0, int op1)
"popf\n\t"
stringify(OP) "w %w3\n\t"
"pushf\n\t"
"popl %1\n\t"
"pop %1\n\t"
: "=a" (res), "=g" (flags), "=d" (resh)
: "q" (s1), "0" (res), "1" (flags), "2" (resh));
printf("%-10s AH=%08x AL=%08x B=%08x RH=%08x RL=%08x CC=%04x\n",
printf("%-10s AH=" FMTLX " AL=" FMTLX " B=" FMTLX " RH=" FMTLX " RL=" FMTLX " CC=%04lx\n",
stringify(OP) "w", op0h, op0, s1, resh, res, flags & CC_MASK);
}
void glue(glue(test_, OP), l)(int op0h, int op0, int op1)
void glue(glue(test_, OP), l)(long op0h, long op0, long op1)
{
int res, s1, flags, resh;
long res, s1, flags, resh;
s1 = op1;
resh = op0h;
res = op0;
flags = 0;
asm ("push %5\n\t"
"popf\n\t"
stringify(OP) "l %3\n\t"
stringify(OP) "l %k3\n\t"
"pushf\n\t"
"popl %1\n\t"
"pop %1\n\t"
: "=a" (res), "=g" (flags), "=d" (resh)
: "q" (s1), "0" (res), "1" (flags), "2" (resh));
printf("%-10s AH=%08x AL=%08x B=%08x RH=%08x RL=%08x CC=%04x\n",
printf("%-10s AH=" FMTLX " AL=" FMTLX " B=" FMTLX " RH=" FMTLX " RL=" FMTLX " CC=%04lx\n",
stringify(OP) "l", op0h, op0, s1, resh, res, flags & CC_MASK);
}
#if defined(__x86_64__)
void glue(glue(test_, OP), q)(long op0h, long op0, long op1)
{
long res, s1, flags, resh;
s1 = op1;
resh = op0h;
res = op0;
flags = 0;
asm ("push %5\n\t"
"popf\n\t"
stringify(OP) "q %3\n\t"
"pushf\n\t"
"pop %1\n\t"
: "=a" (res), "=g" (flags), "=d" (resh)
: "q" (s1), "0" (res), "1" (flags), "2" (resh));
printf("%-10s AH=" FMTLX " AL=" FMTLX " B=" FMTLX " RH=" FMTLX " RL=" FMTLX " CC=%04lx\n",
stringify(OP) "q", op0h, op0, s1, resh, res, flags & CC_MASK);
}
#endif
#undef OP

View File

@ -1,5 +1,6 @@
#define exec_op glue(exec_, OP)
#define exec_opq glue(glue(exec_, OP), q)
#define exec_opl glue(glue(exec_, OP), l)
#define exec_opw glue(glue(exec_, OP), w)
#define exec_opb glue(glue(exec_, OP), b)
@ -7,106 +8,141 @@
#ifndef OP_SHIFTD
#ifdef OP_NOBYTE
#define EXECSHIFT(size, res, s1, s2, flags) \
#define EXECSHIFT(size, rsize, res, s1, s2, flags) \
asm ("push %4\n\t"\
"popf\n\t"\
stringify(OP) size " %" size "2, %" size "0\n\t" \
stringify(OP) size " %" rsize "2, %" rsize "0\n\t" \
"pushf\n\t"\
"popl %1\n\t"\
"pop %1\n\t"\
: "=g" (res), "=g" (flags)\
: "r" (s1), "0" (res), "1" (flags));
#else
#define EXECSHIFT(size, res, s1, s2, flags) \
#define EXECSHIFT(size, rsize, res, s1, s2, flags) \
asm ("push %4\n\t"\
"popf\n\t"\
stringify(OP) size " %%cl, %" size "0\n\t" \
stringify(OP) size " %%cl, %" rsize "0\n\t" \
"pushf\n\t"\
"popl %1\n\t"\
"pop %1\n\t"\
: "=q" (res), "=g" (flags)\
: "c" (s1), "0" (res), "1" (flags));
#endif
void exec_opl(int s2, int s0, int s1, int iflags)
#if defined(__x86_64__)
void exec_opq(long s2, long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("", res, s1, s2, flags);
EXECSHIFT("q", "", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "q", s0, s1, res, iflags, flags & CC_MASK);
}
#endif
void exec_opl(long s2, long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("l", "k", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "l", s0, s1, res, iflags, flags & CC_MASK);
}
void exec_opw(int s2, int s0, int s1, int iflags)
void exec_opw(long s2, long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("w", res, s1, s2, flags);
EXECSHIFT("w", "w", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "w", s0, s1, res, iflags, flags & CC_MASK);
}
#else
#define EXECSHIFT(size, res, s1, s2, flags) \
#define EXECSHIFT(size, rsize, res, s1, s2, flags) \
asm ("push %4\n\t"\
"popf\n\t"\
stringify(OP) size " %%cl, %" size "5, %" size "0\n\t" \
stringify(OP) size " %%cl, %" rsize "5, %" rsize "0\n\t" \
"pushf\n\t"\
"popl %1\n\t"\
"pop %1\n\t"\
: "=g" (res), "=g" (flags)\
: "c" (s1), "0" (res), "1" (flags), "r" (s2));
void exec_opl(int s2, int s0, int s1, int iflags)
#if defined(__x86_64__)
void exec_opq(long s2, long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("", res, s1, s2, flags);
EXECSHIFT("q", "", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=%08x B=%08x C=%08x R=%08x CCIN=%04x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " C=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "q", s0, s2, s1, res, iflags, flags & CC_MASK);
}
#endif
void exec_opl(long s2, long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("l", "k", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=" FMTLX " B=" FMTLX " C=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "l", s0, s2, s1, res, iflags, flags & CC_MASK);
}
void exec_opw(int s2, int s0, int s1, int iflags)
void exec_opw(long s2, long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("w", res, s1, s2, flags);
EXECSHIFT("w", "w", res, s1, s2, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=%08x B=%08x C=%08x R=%08x CCIN=%04x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " C=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "w", s0, s2, s1, res, iflags, flags & CC_MASK);
}
#endif
#ifndef OP_NOBYTE
void exec_opb(int s0, int s1, int iflags)
void exec_opb(long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("b", res, s1, 0, flags);
EXECSHIFT("b", "b", res, s1, 0, flags);
/* overflow is undefined if count != 1 */
if (s1 != 1)
flags &= ~CC_O;
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n",
stringify(OP) "b", s0, s1, res, iflags, flags & CC_MASK);
}
#endif
void exec_op(int s2, int s0, int s1)
void exec_op(long s2, long s0, long s1)
{
s2 = i2l(s2);
s0 = i2l(s0);
#if defined(__x86_64__)
exec_opq(s2, s0, s1, 0);
#endif
exec_opl(s2, s0, s1, 0);
#ifdef OP_SHIFTD
if (s1 <= 15)
@ -118,6 +154,9 @@ void exec_op(int s2, int s0, int s1)
exec_opb(s0, s1, 0);
#endif
#ifdef OP_CC
#if defined(__x86_64__)
exec_opq(s2, s0, s1, CC_C);
#endif
exec_opl(s2, s0, s1, CC_C);
exec_opw(s2, s0, s1, CC_C);
exec_opb(s0, s1, CC_C);
@ -126,10 +165,15 @@ void exec_op(int s2, int s0, int s1)
void glue(test_, OP)(void)
{
int i;
for(i = 0; i < 32; i++)
int i, n;
#if defined(__x86_64__)
n = 64;
#else
n = 32;
#endif
for(i = 0; i < n; i++)
exec_op(0x21ad3d34, 0x12345678, i);
for(i = 0; i < 32; i++)
for(i = 0; i < n; i++)
exec_op(0x813f3421, 0x82345678, i);
}

File diff suppressed because it is too large Load Diff

View File

@ -1,95 +1,116 @@
#define exec_op glue(exec_, OP)
#define exec_opq glue(glue(exec_, OP), q)
#define exec_opl glue(glue(exec_, OP), l)
#define exec_opw glue(glue(exec_, OP), w)
#define exec_opb glue(glue(exec_, OP), b)
#define EXECOP2(size, res, s1, flags) \
#define EXECOP2(size, rsize, res, s1, flags) \
asm ("push %4\n\t"\
"popf\n\t"\
stringify(OP) size " %" size "2, %" size "0\n\t" \
stringify(OP) size " %" rsize "2, %" rsize "0\n\t" \
"pushf\n\t"\
"popl %1\n\t"\
"pop %1\n\t"\
: "=q" (res), "=g" (flags)\
: "q" (s1), "0" (res), "1" (flags));
: "q" (s1), "0" (res), "1" (flags)); \
printf("%-10s A=" FMTLX " B=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n", \
stringify(OP) size, s0, s1, res, iflags, flags & CC_MASK);
#define EXECOP1(size, res, flags) \
#define EXECOP1(size, rsize, res, flags) \
asm ("push %3\n\t"\
"popf\n\t"\
stringify(OP) size " %" size "0\n\t" \
stringify(OP) size " %" rsize "0\n\t" \
"pushf\n\t"\
"popl %1\n\t"\
"pop %1\n\t"\
: "=q" (res), "=g" (flags)\
: "0" (res), "1" (flags));
: "0" (res), "1" (flags)); \
printf("%-10s A=" FMTLX " R=" FMTLX " CCIN=%04lx CC=%04lx\n", \
stringify(OP) size, s0, res, iflags, flags & CC_MASK);
#ifdef OP1
void exec_opl(int s0, int s1, int iflags)
#if defined(__x86_64__)
void exec_opq(long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECOP1("", res, flags);
printf("%-10s A=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "l", s0, res, iflags, flags & CC_MASK);
}
void exec_opw(int s0, int s1, int iflags)
{
int res, flags;
res = s0;
flags = iflags;
EXECOP1("w", res, flags);
printf("%-10s A=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "w", s0, res, iflags, flags & CC_MASK);
}
void exec_opb(int s0, int s1, int iflags)
{
int res, flags;
res = s0;
flags = iflags;
EXECOP1("b", res, flags);
printf("%-10s A=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "b", s0, res, iflags, flags & CC_MASK);
}
#else
void exec_opl(int s0, int s1, int iflags)
{
int res, flags;
res = s0;
flags = iflags;
EXECOP2("", res, s1, flags);
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "l", s0, s1, res, iflags, flags & CC_MASK);
}
void exec_opw(int s0, int s1, int iflags)
{
int res, flags;
res = s0;
flags = iflags;
EXECOP2("w", res, s1, flags);
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "w", s0, s1, res, iflags, flags & CC_MASK);
}
void exec_opb(int s0, int s1, int iflags)
{
int res, flags;
res = s0;
flags = iflags;
EXECOP2("b", res, s1, flags);
printf("%-10s A=%08x B=%08x R=%08x CCIN=%04x CC=%04x\n",
stringify(OP) "b", s0, s1, res, iflags, flags & CC_MASK);
EXECOP1("q", "", res, flags);
}
#endif
void exec_op(int s0, int s1)
void exec_opl(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP1("l", "k", res, flags);
}
void exec_opw(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP1("w", "w", res, flags);
}
void exec_opb(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP1("b", "b", res, flags);
}
#else
#if defined(__x86_64__)
void exec_opq(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP2("q", "", res, s1, flags);
}
#endif
void exec_opl(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP2("l", "k", res, s1, flags);
}
void exec_opw(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP2("w", "w", res, s1, flags);
}
void exec_opb(long s0, long s1, long iflags)
{
long res, flags;
res = s0;
flags = iflags;
EXECOP2("b", "b", res, s1, flags);
}
#endif
void exec_op(long s0, long s1)
{
s0 = i2l(s0);
s1 = i2l(s1);
#if defined(__x86_64__)
exec_opq(s0, s1, 0);
#endif
exec_opl(s0, s1, 0);
exec_opw(s0, s1, 0);
exec_opb(s0, s1, 0);
#ifdef OP_CC
#if defined(__x86_64__)
exec_opq(s0, s1, CC_C);
#endif
exec_opl(s0, s1, CC_C);
exec_opw(s0, s1, CC_C);
exec_opb(s0, s1, CC_C);