Commit 776f2227 authored by Fabrice Bellard's avatar Fabrice Bellard
Browse files

x86_64 test program 


git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@1321 c046a42c-6fe2-441c-8c8c-71466251a162
parent d785e6be

tests/Makefile

+10 −3
Original line number Diff line number Diff line
@@ -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

tests/test-i386-muldiv.h

+33 −13
Original line number Diff line number Diff line 


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

tests/test-i386-shift.h

+77 −33
Original line number Diff line number Diff line 


#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);

}

tests/test-i386.c

+408 −160

File changed.

Preview size limit exceeded, changes collapsed.

tests/test-i386.h

+60 −39
Original line number Diff line number Diff line 


#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);