mpir/tests/x86check.c
jasonmoxham e554550755 for file in $(find -name \*.c ) ; do sed -e "s/#include \"gmp\.h\"/#include \"mpir.h\"/g" $file > temp ; mv temp $file ; done
for file in $(find -name \*.h ) ; do sed -e "s/#include \"gmp\.h\"/#include \"mpir.h\"/g" $file > temp ; mv temp $file ; done
for file in $(find -name \*.cc) ; do sed -e "s/#include \"gmp\.h\"/#include \"mpir.h\"/g" $file > temp ; mv temp $file ; done
2009-02-12 10:24:24 +00:00

100 lines
2.9 KiB
C

/* x86 calling conventions checking. */
/*
Copyright 2000, 2001 Free Software Foundation, Inc.
This file is part of the GNU MP Library.
The GNU MP 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.1 of the License, or (at your
option) any later version.
The GNU MP 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 the GNU MP Library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
MA 02110-1301, USA.
*/
#include <stdio.h>
#include "mpir.h"
#include "gmp-impl.h"
#include "tests.h"
/* temporaries */
int calling_conventions_save_ebx;
int calling_conventions_save_esi;
int calling_conventions_save_edi;
int calling_conventions_save_ebp;
int calling_conventions_retaddr;
int calling_conventions_retval;
/* values to check */
struct {
unsigned control;
unsigned status;
unsigned tag;
unsigned other[4];
} calling_conventions_fenv;
int calling_conventions_ebx;
int calling_conventions_esi;
int calling_conventions_edi;
int calling_conventions_ebp;
int calling_conventions_eflags;
/* expected values, as per x86call.asm */
#define VALUE_EBX 0x01234567
#define VALUE_ESI 0x89ABCDEF
#define VALUE_EDI 0xFEDCBA98
#define VALUE_EBP 0x76543210
#define DIR_BIT(eflags) (((eflags) & (1<<10)) != 0)
/* Return 1 if ok, 0 if not */
int
calling_conventions_check (void)
{
const char *header = "Violated calling conventions:\n";
int ret = 1;
#define CHECK(callreg, regstr, value) \
if (callreg != value) \
{ \
printf ("%s %s got 0x%08X want 0x%08X\n", \
header, regstr, callreg, value); \
header = ""; \
ret = 0; \
}
CHECK (calling_conventions_ebx, "ebx", VALUE_EBX);
CHECK (calling_conventions_esi, "esi", VALUE_ESI);
CHECK (calling_conventions_edi, "edi", VALUE_EDI);
CHECK (calling_conventions_ebp, "ebp", VALUE_EBP);
if (DIR_BIT (calling_conventions_eflags) != 0)
{
printf ("%s eflags dir bit got %d want 0\n",
header, DIR_BIT (calling_conventions_eflags));
header = "";
ret = 0;
}
if ((calling_conventions_fenv.tag & 0xFFFF) != 0xFFFF)
{
printf ("%s fpu tags got 0x%X want 0xFFFF\n",
header, calling_conventions_fenv.tag & 0xFFFF);
header = "";
ret = 0;
}
return ret;
}