Update copyright to LGPL on all files
[dyninst.git] / testsuite / src / dyninst / test1_29.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_29.C,v 1.1 2008/10/30 19:18:45 legendre Exp $
33 /*
34  * #Name: test1_29
35  * #Desc: getParent/Child
36  * #Dep: 
37  * #Arch:
38  * #Notes:
39  */
40
41 #include "BPatch.h"
42 #include "BPatch_Vector.h"
43 #include "BPatch_thread.h"
44 #include "BPatch_snippet.h"
45
46 #include "test_lib.h"
47 #include "Callbacks.h"
48 #include "dyninst_comp.h"
49
50 class test1_29_Mutator : public DyninstMutator {
51         virtual test_results_t executeTest();
52 };
53
54 extern "C" DLLEXPORT  TestMutator *test1_29_factory() 
55 {
56         return new test1_29_Mutator();
57 }
58
59 static bool printSrcObj(BPatch_sourceObj *p, int level)
60 {
61         unsigned int i;
62         bool ret = true;
63
64         BPatch_Vector<BPatch_sourceObj *> curr;
65
66         if (!p) return(true);
67
68         switch (p->getSrcType()) 
69         {
70                 case BPatch_sourceProgram:
71                         if (level != 0) ret = false;
72                         break;
73
74                 case BPatch_sourceModule: 
75                         if (level != 1) ret = false;
76                         break;
77
78                 case BPatch_sourceFunction: 
79                         if (level != 2) ret = false;
80                         break;
81
82                 default:
83                         logerror("<unknown type>");
84         }
85
86         if (!p->getSourceObj(curr)) 
87         {
88                 // eveything down to functions should have something
89                 return((level == 2) ? true : false);
90         }
91
92         for (i=0; i < curr.size(); i++) 
93         {
94                 p = curr[i];
95                 ret = printSrcObj(p, level+1) && ret;
96         }
97
98         return ret;
99 }
100
101 //
102 // Start Test Case #29 - getParent/Child
103 //
104
105 test_results_t test1_29_Mutator::executeTest() 
106 {
107         BPatch_sourceObj *p;
108         bool passedTest;
109
110         p = (BPatch_sourceObj *) appImage;
111         passedTest = printSrcObj(p, 0);
112
113         if (!passedTest) 
114         {
115                 logerror("**Failed** test #29 (class BPatch_srcObj)\n");
116                 return FAILED;
117         }
118
119         const char *funcName = "test1_29_func1";
120         BPatch_Vector<BPatch_function *> found_funcs;
121
122         if ((NULL == appImage->findFunction(funcName, found_funcs)) || !found_funcs.size()) 
123         {
124                 logerror("    Unable to find function %s\n", funcName);
125                 return FAILED;
126         }
127
128         if (1 < found_funcs.size()) 
129         {
130                 logerror("%s[%d]:  WARNING  : found %d functions named %s.  Using the first.\n", 
131                                 __FILE__, __LINE__, found_funcs.size(), funcName);
132         }
133
134         BPatch_Vector<BPatch_point *> *point29_1 = found_funcs[0]->findPoint(BPatch_entry);
135
136         assert (point29_1);
137
138         //BPatch_variableExpr *expr29_1 = findVariable(appImage, "test1_29_globalVariable1", point29_1);
139         BPatch_variableExpr *expr29_1 = appImage->findVariable("test1_29_globalVariable1");
140
141         if (expr29_1 == NULL) 
142         {
143                 logerror("**Failed** test #29 (class BPatch_srcObj)\n");
144                 logerror("    Unable to locate test1_29_globalVariable1\n");
145                 return FAILED;
146         }
147         setExpectError(DYNINST_NO_ERROR);
148
149         int n = 1;
150         if (!expr29_1->writeValue(&n,true))
151         {
152                 logerror("**Failed** test #29 (class BPatch_srcObj)\n");
153                 logerror("    Unable to write test1_29_globalVariable1\n");
154                 return FAILED;
155         }
156
157         return PASSED;
158 }