Algorithm

Development Platform:
Unix_Linux

x86check.c：Code Content
							/* 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 3 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.  If not, see http://www.gnu.org/licenses/.  */
#include <stdio.h>
#include "gmp.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%08Xn",      
              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 0n",
              header, DIR_BIT (calling_conventions_eflags));
      header = "";
      ret = 0;
    }
  if ((calling_conventions_fenv.tag & 0xFFFF) != 0xFFFF)
    {
      printf ("%s   fpu tags  got 0x%X want 0xFFFFn",
              header, calling_conventions_fenv.tag & 0xFFFF);
      header = "";
      ret = 0;
    }
  return ret;
}

						