riscv
/
qemu
mirror of https://gitea.goldendeliverer.com/riscv/qemu.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity
Browse Source

x86_64 test program 

git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@1321 c046a42c-6fe2-441c-8c8c-71466251a162
stable-0.10
bellard 22 years ago
parent
d785e6be4d
commit
776f2227f6
5 changed files with 588 additions and 248 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 13
      tests/Makefile
  2. 46
      tests/test-i386-muldiv.h
  3. 110
      tests/test-i386-shift.h
  4. 568
      tests/test-i386.c
  5. 99
      tests/test-i386.h

13
tests/Makefile
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

46
tests/test-i386-muldiv.h
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

110
tests/test-i386-shift.h
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)
{
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("q", "", 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) "q", s0, s2, s1, res, iflags, flags & CC_MASK);
}
#endif
void exec_opl(long s2, long s0, long s1, long iflags)
{
int res, flags;
long res, flags;
res = s0;
flags = iflags;
EXECSHIFT("", res, s1, s2, flags);
EXECSHIFT("l", "k", 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) "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);
}

568
tests/test-i386.c
View File

File diff suppressed because it is too large

99
tests/test-i386.h
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);
EXECOP1("q", "", res, flags);
}
#endif
void exec_opw(int s0, int s1, int iflags)
void exec_opl(long s0, long s1, long iflags)
{
int res, flags;
long 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);
EXECOP1("l", "k", res, flags);
}
void exec_opb(int s0, int s1, int iflags)
void exec_opw(long s0, long s1, long iflags)
{
int res, flags;
long 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);
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
void exec_opl(int s0, int s1, int iflags)
#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)
{
int res, flags;
long 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);
EXECOP2("l", "k", res, s1, flags);
}
void exec_opw(int s0, int s1, int iflags)
void exec_opw(long s0, long s1, long iflags)
{
int res, flags;
long 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);
EXECOP2("w", "w", res, s1, flags);
}
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;
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);
EXECOP2("b", "b", res, s1, flags);
}
#endif
void exec_op(int s0, int s1)
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);

Write Preview
Loading…
Cancel
Save