General fixes for getting Dyninst working on Windows
[dyninst.git] / dyninstAPI / src / BPatch_instruction.C
1 /*
2  * Copyright (c) 1996-2004 Barton P. Miller
3  * 
4  * We provide the Paradyn Parallel Performance Tools (below
5  * described as "Paradyn") on an AS IS basis, and do not warrant its
6  * validity or performance.  We reserve the right to update, modify,
7  * or discontinue this software at any time.  We shall have no
8  * obligation to supply such updates or modifications or any other
9  * form of support to you.
10  * 
11  * This license is for research uses.  For such uses, there is no
12  * charge. We define "research use" to mean you may freely use it
13  * inside your organization for whatever purposes you see fit. But you
14  * may not re-distribute Paradyn or parts of Paradyn, in any form
15  * source or binary (including derivatives), electronic or otherwise,
16  * to any other organization or entity without our permission.
17  * 
18  * (for other uses, please contact us at paradyn@cs.wisc.edu)
19  * 
20  * All warranties, including without limitation, any warranty of
21  * merchantability or fitness for a particular purpose, are hereby
22  * excluded.
23  * 
24  * By your use of Paradyn, you understand and agree that we (or any
25  * other person or entity with proprietary rights in Paradyn) are
26  * under no obligation to provide either maintenance services,
27  * update services, notices of latent defects, or correction of
28  * defects for Paradyn.
29  * 
30  * Even if advised of the possibility of such damages, under no
31  * circumstances shall we (or any other person or entity with
32  * proprietary rights in the software licensed hereunder) be liable
33  * to you or any third party for direct, indirect, or consequential
34  * damages of any character regardless of type of action, including,
35  * without limitation, loss of profits, loss of use, loss of good
36  * will, or computer failure or malfunction.  You agree to indemnify
37  * us (and any other person or entity with proprietary rights in the
38  * software licensed hereunder) for any and all liability it may
39  * incur to third parties resulting from your use of Paradyn.
40  */
41
42 #include "common/h/Types.h"
43
44 #include <stdlib.h>
45 #include <string.h>
46 #include <assert.h>
47 #include "BPatch.h"
48 #include "BPatch_instruction.h"
49 #include "BPatch_basicBlock.h"
50 #include "BPatch_libInfo.h"
51 #include "BPatch_process.h"
52 #include "arch.h"
53 #include "util.h"
54 #include "function.h"
55 #include "process.h"
56 #include "instPoint.h"
57
58 /**************************************************************************
59  * BPatch_instruction
60  *************************************************************************/
61
62 #if defined(arch_x86) || defined(arch_x86_64)
63 const unsigned int BPatch_instruction::nmaxacc_NP = 2;
64 #else
65 const unsigned int BPatch_instruction::nmaxacc_NP = 1;
66 #endif
67
68 BPatch_instruction::BPatch_instruction(const void *_buffer,
69                                        unsigned char _length,
70                                        Address addr_) : nacc(0), length(_length), addr(addr_)
71 {
72   assert(_buffer);
73
74   isLoad = new bool[nmaxacc_NP];
75   isStore = new bool[nmaxacc_NP];
76   preFcn = new int[nmaxacc_NP];
77   condition = new int[nmaxacc_NP];
78   nonTemporal = new bool[nmaxacc_NP];
79
80   for (unsigned int i=0; i < nmaxacc_NP; i++) {
81     isLoad[i] = false;
82     isStore[i] = false;
83     preFcn[i] = -1;
84     condition[i] = -1;
85     nonTemporal[i] = false;
86   }
87
88   buffer = new unsigned char[length];
89   memcpy(buffer, _buffer, length * sizeof(unsigned char));
90 }
91
92 BPatch_instruction::~BPatch_instruction() {
93    if (buffer)
94       delete[] buffer;
95
96    delete[] isLoad;
97    delete[] isStore;
98    delete[] preFcn;
99    delete[] condition;
100    delete[] nonTemporal;
101 }
102
103 BPatch_basicBlock *BPatch_instruction::getParentInt()
104 {
105   return parent;
106 }
107
108 void *BPatch_instruction::getAddressInt()
109 {
110   return (void *)addr;
111 }
112 BPatch_point *BPatch_instruction::getInstPointInt()
113 {
114   //const unsigned char *insn_ptr = ((instruction *)instr)->ptr();
115   int_basicBlock *iblock = parent->iblock;
116   process *proc = iblock->proc();
117   int_function *func = iblock->func();
118
119   assert(proc);
120   assert(func);
121
122   BPatch_process *bpproc = BPatch::bpatch->getProcessByPid(proc->getPid());
123   assert(bpproc); 
124
125   // If it's in an uninstrumentable function, just return an error.
126   if ( !func || !((int_function*)func)->isInstrumentable()){
127     fprintf(stderr, "%s[%d]:  function is not instrumentable\n", FILE__, __LINE__);
128     return NULL;
129   }
130
131  /* See if there is an instPoint at this address */
132   instPoint *p = NULL;
133
134   if ((p = proc->findInstPByAddr((Address)addr))) {
135     fprintf(stderr, "%s[%d]:  point exists at requested address\n", FILE__, __LINE__);
136     return bpproc->findOrCreateBPPoint(NULL, p, BPatch_locInstruction);
137   }
138
139   /* We don't have an instPoint for this address, so make one. */
140   instPoint *newInstP = instPoint::createArbitraryInstPoint((Address)addr, proc);
141   
142   if (!newInstP) {
143      fprintf(stderr, "%s[%d]:  createArbitraryInstPoint for %p failed\n", FILE__, __LINE__, (void *) addr);
144      return NULL;
145   }
146   BPatch_point *ret = bpproc->findOrCreateBPPoint(NULL, newInstP, BPatch_locInstruction);
147
148   if (!ret)
149     fprintf(stderr, "%s[%d]:  getInstPoint failing!\n", FILE__, __LINE__);
150   return ret;
151 }
152
153