Update copyright to LGPL on all files
[dyninst.git] / testsuite / src / dyninst / test1_12.C
1 /*
2  * Copyright (c) 1996-2009 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  * By your use of Paradyn, you understand and agree that we (or any
12  * other person or entity with proprietary rights in Paradyn) are
13  * under no obligation to provide either maintenance services,
14  * update services, notices of latent defects, or correction of
15  * defects for Paradyn.
16  * 
17  * This library is free software; you can redistribute it and/or
18  * modify it under the terms of the GNU Lesser General Public
19  * License as published by the Free Software Foundation; either
20  * version 2.1 of the License, or (at your option) any later version.
21  * 
22  * This library is distributed in the hope that it will be useful,
23  * but WITHOUT ANY WARRANTY; without even the implied warranty of
24  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
25  * Lesser General Public License for more details.
26  * 
27  * You should have received a copy of the GNU Lesser General Public
28  * License along with this library; if not, write to the Free Software
29  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
30  */
31
32 // $Id: test1_12.C,v 1.1 2008/10/30 19:17:33 legendre Exp $
33 /*
34  * #Name: test1_12
35  * #Desc: Mutator Side - Insert/Remove and Malloc/Free
36  * #Dep: 
37  * #Notes: 
38  */
39
40 #include "BPatch.h"
41 #include "BPatch_Vector.h"
42 #include "BPatch_thread.h"
43 #include "BPatch_snippet.h"
44
45 #include "test_lib.h"
46 #include "Callbacks.h"
47 #include "dyninst_comp.h"
48
49 class test1_12_Mutator : public DyninstMutator 
50 {
51         static const int HEAP_TEST_UNIT_SIZE = 5000;
52
53         BPatchSnippetHandle *snippetHandle12_1;
54         BPatch_variableExpr *varExpr12_1;
55
56         virtual bool hasCustomExecutionPath() { return true; }
57         virtual test_results_t executeTest();
58
59         int mutatorTesta();
60         int mutatorTestb();
61 };
62
63 extern "C" DLLEXPORT  TestMutator *test1_12_factory() 
64 {
65         return new test1_12_Mutator();
66 }
67
68 //
69 // Start Test Case #12 - mutator side (insert/remove and malloc/free)
70 //
71
72 int test1_12_Mutator::mutatorTesta() 
73 {
74         // Find the entry point to the procedure "test1_12_func2"
75         const char *funcName = "test1_12_func2";
76         BPatch_Vector<BPatch_function *> found_funcs;
77
78         if ((NULL == appImage->findFunction(funcName, found_funcs)) || !found_funcs.size()) 
79         {
80                 logerror("    Unable to find function %s\n", funcName);
81                 return -1;
82         }
83
84         if (1 < found_funcs.size()) 
85         {
86                 logerror("%s[%d]:  WARNING  : found %d functions named %s.  Using the first.\n", 
87                                 __FILE__, __LINE__, found_funcs.size(), funcName);
88         }
89
90         BPatch_Vector<BPatch_point *> *point12_2 = found_funcs[0]->findPoint(BPatch_entry);
91
92         if (!point12_2 || (point12_2->size() < 1)) 
93         {
94                 logerror("Unable to find point %s - entry.\n", funcName);
95                 return -1;
96         }
97
98         varExpr12_1 = appThread->malloc(100);
99
100         if (!varExpr12_1) 
101         {
102                 logerror("Unable to allocate 100 bytes in mutatee\n");
103                 return -1;
104         }
105
106         // Heap stress test - allocate memory until we run out, free it all
107         //   and then allocate a small amount of memory.
108
109         setExpectError(66); // We're expecting a heap overflow error
110         BPatch_variableExpr* memStuff[30000];
111         BPatch_variableExpr *temp;
112         int count;
113
114         for (count = 0; count < 2000; count++) 
115         {
116                 temp = appThread->malloc(HEAP_TEST_UNIT_SIZE);
117
118                 if (!temp) 
119                 {
120                         logerror("*** Inferior malloc stress test failed\n"); 
121                         exit(-1);
122                 }
123
124                 memStuff[count] = temp;
125         }
126
127         setExpectError(DYNINST_NO_ERROR);
128
129         int freeCount = 0;
130
131         for (int i =0; i < count; i++) 
132         {
133                 appThread->free(*memStuff[i]);
134                 freeCount++;
135         }
136
137         temp = appThread->malloc(500); 
138
139         if (!temp) 
140         {
141                 logerror("*** Unable to allocate memory after using then freeing heap\n");
142         }
143
144         BPatch_Vector<BPatch_function *> bpfv;
145         char *fn = "test1_12_call1";
146
147         if (NULL == appImage->findFunction(fn, bpfv) || !bpfv.size()
148                         || NULL == bpfv[0])
149         {
150                 logerror("    Unable to find function %s\n", fn);
151                 return -1;
152         }
153
154         BPatch_function *call12_1_func = bpfv[0];
155
156         BPatch_Vector<BPatch_snippet *> nullArgs;
157         BPatch_funcCallExpr call12_1Expr(*call12_1_func, nullArgs);
158
159         checkCost(call12_1Expr);
160         snippetHandle12_1 = appThread->insertSnippet(call12_1Expr, *point12_2);
161
162         if (!snippetHandle12_1) 
163         {
164                 logerror("Unable to insert snippet to call function \"%s.\"\n",
165                                 fn);
166                 return -1;
167         }
168
169         return 0;
170 }
171
172 int test1_12_Mutator::mutatorTestb() 
173 {
174         waitUntilStopped(BPatch::bpatch, appThread, 12, "insert/remove and malloc/free");
175
176         // remove instrumentation and free memory
177         if (!appThread->deleteSnippet(snippetHandle12_1)) 
178         {
179                 logerror("**Failed test #12 (insert/remove and malloc/free)\n");
180                 logerror("    deleteSnippet returned an error\n");
181                 return -1;
182         }
183
184         appThread->free(*varExpr12_1);
185
186         // Try removing NULL as a snippet
187         if (appThread->deleteSnippet(NULL)) 
188         {
189                 logerror("**Failed test #12 (insert/remove and malloc/free)\n");
190                 logerror("    deleteSnippet returned success when deleting NULL\n");
191                 return -1;
192         }
193
194         // continue process
195         appThread->continueExecution();
196
197         return 0;
198 }
199
200 test_results_t test1_12_Mutator::executeTest() 
201 {
202         test_results_t retval;
203
204         int result = mutatorTesta();
205
206         if (result != 0) 
207         {
208                 return FAILED;
209         }
210
211         appThread->continueExecution();
212         result = mutatorTestb();
213
214         if (result != 0) 
215         {
216                 retval = FAILED;
217         } 
218         else 
219         {
220                 retval = PASSED;
221         }
222
223         return retval;
224 }
225