/* * Copyright 2002-2019 Intel Corporation. * * This software is provided to you as Sample Source Code as defined in the accompanying * End User License Agreement for the Intel(R) Software Development Products ("Agreement") * section 1.L. * * This software and the related documents are provided as is, with no express or implied * warranties, other than those that are expressly stated in the License. */ #include #include #include #ifdef TARGET_WINDOWS namespace WIND { #include } #define EXPORT_CSYM extern "C" __declspec( dllexport ) #else #define EXPORT_CSYM extern "C" #endif #if defined(__cplusplus) #define EXTERN_C extern "C" #else #define EXTERN_C #endif EXTERN_C VOID FldzToTop3(); EXTERN_C VOID SetXmmRegsToZero(); EXTERN_C VOID SetIntRegsToZero(); EXTERN_C void UnMaskZeroDivideInMxcsr(); EXTERN_C double var1; EXTERN_C double var2; EXTERN_C double var3; double var1=2.0; double var2=2.0; double var3=2.0; static UINT64 vals[]= {1,0,2,0,3,0,4,0,5,0,6,0,7,0,8,0,9,0,10,0,11,0,12,0,13,0,14,0,15,0,16,0}; extern "C" UINT64* val1; extern "C" UINT64* val2; extern "C" UINT64* val3; extern "C" UINT64* val4; extern "C" UINT64* val5; extern "C" UINT64* val6; extern "C" UINT64* val7; extern "C" UINT64* val8; extern "C" UINT64* val9; extern "C" UINT64* val10; extern "C" UINT64* val11; extern "C" UINT64* val12; extern "C" UINT64* val13; extern "C" UINT64* val14; extern "C" UINT64* val15; extern "C" UINT64* val16; extern "C" ADDRINT setFlagsX; UINT64* val1=&vals[0]; UINT64* val2=&vals[2]; UINT64* val3=&vals[4]; UINT64* val4=&vals[6]; UINT64* val5=&vals[8]; UINT64* val6=&vals[10]; UINT64* val7=&vals[12]; UINT64* val8=&vals[14]; UINT64* val9=&vals[16]; UINT64* val10=&vals[18]; UINT64* val11=&vals[20]; UINT64* val12=&vals[22]; UINT64* val13=&vals[24]; UINT64* val14=&vals[26]; UINT64* val15=&vals[28]; UINT64* val16=&vals[30]; ADDRINT setFlagsX=0; EXPORT_CSYM void TestIargPreserveInReplacement() { } EXPORT_CSYM void TestIargPreserveInReplacement1() { } EXPORT_CSYM void TestIargPreserveInReplacement2() { } EXPORT_CSYM void TestIargPreserveInProbed() { } EXPORT_CSYM void TestIargPreserveInProbed1() { } EXPORT_CSYM void TestIargPreserveInProbed2() { } #if defined(__cplusplus) extern "C" #endif VOID DummyProc() { } VOID CallToFldzToTop3() { FldzToTop3(); } VOID CallToSetXmmRegsToZero() { SetXmmRegsToZero(); } VOID CallToSetIntRegsToZero() { SetIntRegsToZero(); } VOID CallToUnMaskZeroDivideInMxcsr() { UnMaskZeroDivideInMxcsr(); } #define NUM_TESTS 4 static int testNum=0; VOID Trace (TRACE trace, VOID *v) { for (BBL bbl = TRACE_BblHead(trace); BBL_Valid(bbl); bbl = BBL_Next(bbl)) { for (INS ins = BBL_InsHead(bbl); INS_Valid(ins); ins = INS_Next(ins)) { xed_iclass_enum_t iclass1 = static_cast(INS_Opcode(ins)); if (iclass1 == XED_ICLASS_FLD1 && INS_Valid(INS_Next(ins))) { xed_iclass_enum_t iclass2 = static_cast(INS_Opcode(INS_Next(ins))); if (iclass2 == XED_ICLASS_FLD1 && INS_Valid(INS_Next(INS_Next(ins)))) { xed_iclass_enum_t iclass3 = static_cast(INS_Opcode(INS_Next(INS_Next(ins)))); if (iclass3 == XED_ICLASS_FLD1) { if (testNum == 0) { REGSET regsFP; REGSET_Clear(regsFP); REGSET_Insert (regsFP, REG_X87); INS_InsertCall(INS_Next(INS_Next(ins)), IPOINT_AFTER, AFUNPTR(CallToFldzToTop3), IARG_PRESERVE, ®sFP, IARG_END); printf ("Inserted call1 to FldzToTop3 after instruction at %lx\n", (unsigned long)(INS_Address(INS_Next(INS_Next(ins))))); testNum++; } else if(testNum == 1) { REGSET regsNone; REGSET_Clear(regsNone); INS_InsertCall(INS_Next(INS_Next(ins)), IPOINT_AFTER, AFUNPTR(CallToFldzToTop3), IARG_PRESERVE, ®sNone, IARG_END); printf ("Inserted call2 to FldzToTop3 after instruction at %lx\n", (unsigned long)(INS_Address(INS_Next(INS_Next(ins))))); testNum++; } else if(testNum == 2) { INS_InsertCall(INS_Next(INS_Next(ins)), IPOINT_AFTER, AFUNPTR(CallToFldzToTop3), IARG_END); printf ("Inserted call3 to FldzToTop3 after instruction at %lx\n", (unsigned long)(INS_Address(INS_Next(INS_Next(ins))))); testNum++; } else if(testNum == 3) { REGSET regsNone; REGSET_Clear(regsNone); REGSET_Insert (regsNone, REG_X87); REGSET_Insert (regsNone, REG_MXCSR); REGSET_Remove(regsNone, REG_X87); REGSET_Remove(regsNone, REG_MXCSR); INS_InsertCall(INS_Next(INS_Next(ins)), IPOINT_AFTER, AFUNPTR(CallToFldzToTop3), IARG_PRESERVE, ®sNone, IARG_END); printf ("Inserted call4 to FldzToTop3 after instruction at %lx\n", (unsigned long)(INS_Address(INS_Next(INS_Next(ins))))); testNum++; } return; } } } } } } VOID Fini(INT32 code, VOID *v) { if (testNum != NUM_TESTS) { printf ("***Error not all expected tests ran\n"); exit (-1); } } int main(int argc, char *argv[]) { PIN_Init(argc, argv); TRACE_AddInstrumentFunction(Trace, 0); PIN_AddFiniFunction(Fini, 0); // Never returns PIN_StartProgram(); return 0; }