Rename newtestsuite to testsuite
[dyninst.git] / testsuite / src / dyninst / test1_39.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 // $Id: test1_39.C,v 1.1 2008/10/30 19:19:28 legendre Exp $
43 /*
44  * #Name: test1_39
45  * #Desc: Regex search
46  * #Dep: 
47  * #Arch: sparc_sun_solaris2_4_test,alpha_dec_osf4_0_test,i386_unknown_solaris2_5_test,,i386_unknown_linux2_0_test,ia64_unknown_linux2_4_test,mips_sgi_irix6_4_test,rs6000_ibm_aix4_1_test,x86_64_unknown_linux2_4_test
48  * #Notes:
49  */
50
51 #include "BPatch.h"
52 #include "BPatch_Vector.h"
53
54 #include "test_lib.h"
55 #include "dyninst_comp.h"
56
57 class test1_39_Mutator : public DyninstMutator {
58         virtual test_results_t executeTest();
59 };
60
61 extern "C" DLLEXPORT  TestMutator *test1_39_factory() 
62 {
63         return new test1_39_Mutator();
64 }
65
66 //
67 //  Test case 39:  verify that regex search is working
68 //
69
70 test_results_t test1_39_Mutator::executeTest() 
71 {
72         //  Note:  regex search by module is covered in test 21
73 #if defined(sparc_sun_solaris2_4_test) \
74         || defined(alpha_dec_osf4_0_test) \
75         || defined(i386_unknown_solaris2_5_test) \
76         || defined(i386_unknown_linux2_0_test) \
77         || defined(x86_64_unknown_linux2_4_test) /* Blind duplication - Ray */ \
78         || defined(ia64_unknown_linux2_4_test) \
79         || defined(mips_sgi_irix6_4_test) \
80         || defined(rs6000_ibm_aix4_1_test) \
81         || defined(os_linux_test) /* Use OS #define instead of platform - Greg */
82
83         // ^^^ Not Windows
84
85         BPatch_Vector<BPatch_function *> bpmv;
86
87         //  Not meant to be an extensive check of all regex usage, just that
88         //  the basic mechanism that deals with regexes is not broken
89
90         //   regex "^func12" should match all functions that begin with "func12"
91
92         if (NULL == appImage->findFunction("^test1_39_", bpmv) || (bpmv.size() != 2)) 
93         {
94
95                 logerror("**Failed test #39 (regex function search)\n");
96                 logerror("  Expected 2 functions matching ^test1_39_, got %d\n",
97                                 bpmv.size());
98                 char buf[128];
99                 for (unsigned int i = 0; i < bpmv.size(); ++i)
100                         logerror("  matched function: %s\n",
101                                         bpmv[i]->getName(buf, 128));
102                 return FAILED;
103         }
104
105         bpmv.clear();
106
107         if (NULL == appImage->findFunction("^test1_39_func1", bpmv) 
108                         || (bpmv.size() != 1)) 
109         {
110                 logerror("**Failed test #39 (regex function search)\n");
111                 logerror("  Expected 1 function matching ^test1_39_func1, got %d\n",
112                                 bpmv.size());
113                 return FAILED;
114         }
115
116         if (isMutateeFortran(appImage)) 
117         {
118                 return PASSED;
119         }
120
121         //  Now lets look for a pattern that ought to match something
122         //  in libc (can't check number of hits since libc may vary,
123         //  but can check existence)
124
125         bpmv.clear();
126         const char *libc_regex = "^sp";
127
128         if (NULL == appImage->findFunction(libc_regex, bpmv) 
129                         || (!bpmv.size())) 
130         {
131                 logerror("**Failed test #39 (regex function search)\n");
132                 logerror("  Expected function(s) matching %s\n",libc_regex);
133                 return FAILED;
134         }
135
136         BPatch_variableExpr *passedExpr = appImage->findVariable("test1_39_passed");
137
138         if (passedExpr == NULL) 
139         {
140                 logerror("**Failed** test1_39 (regex function search)\n");
141                 logerror("    Unable to locate test1_39_passed\n");
142                 return FAILED;
143         } 
144
145         int pvalue = 1;
146         passedExpr->writeValue(&pvalue);
147
148         return PASSED;
149 #else // Windows
150         return SKIPPED;
151 #endif
152 }