Update copyright to LGPL on all files
[dyninst.git] / testsuite / src / dyninst / snip_ref_shlib_var_mutatee.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 #include "mutatee_util.h"
32
33 /* Global variables accessed by the mutator.  These must have globally unique
34  * names.
35  */
36
37 /* Internally used function prototypes.  These should be declared with the
38  * keyword static so they don't interfere with other mutatees in the group.
39  */
40
41 /* Global variables used internally by the mutatee.  These should be declared
42  * with the keyword static so they don't interfere with other mutatees in the
43  * group.
44  */
45
46 static volatile int _unused; /* move decl here to dump compiler warning - jkh */
47
48 #if 0
49 //  from libtestB -- the expected end values
50 int snip_ref_shlib_var1 = 5;
51 long snip_ref_shlib_var2 = 5L;
52 char snip_ref_shlib_var3 = 'e';
53 char * snip_ref_shlib_var4 = 0x5;
54 float snip_ref_shlib_var5 = 5.5e5;
55 double snip_ref_shlib_var6 = 5.5e50;
56 #endif
57
58 volatile int gv_srsv1 = 0;
59 volatile long gv_srsv2 = 0L;
60 volatile char gv_srsv3 = '\0';
61 volatile char *gv_srsv4 = NULL;
62 volatile float gv_srsv5 = 0.0;
63 volatile double gv_srsv6 = 0.0;
64
65 int srsv1(int x)
66 {
67         return 8 * x;
68 }
69
70 int snip_ref_shlib_var_mutatee()
71 {
72         int failed = 0;
73         /*  mutator instruments srsv1 entry with assignments from variables in 
74             a shared library (libtestB) */
75
76         int dont_care = 0;
77         dont_care = srsv1(5);
78
79         if (gv_srsv1 != 5) {failed = 1; goto finish_up;}
80         if (gv_srsv2 != 5L) {failed = 2; goto finish_up;}
81         if (gv_srsv3 != 'e') {failed = 3; goto finish_up;}
82         if (gv_srsv4 != (char *)0x5) {failed = 4; goto finish_up;}
83         if (gv_srsv5 != 5.5e5) {failed = 5; goto finish_up;}
84 #if 0
85         if (gv_srsv6 != 5.5e50) {failed = 6; goto finish_up;}
86 #endif
87
88 finish_up:
89         if (failed)
90         {
91       logerror("Failed snip_ref_shlib_var test with code %d\n", failed);
92           logerror("\tgv_srsv1 = %d\n", gv_srsv1);
93           logerror("\tgv_srsv2 = %lu\n", gv_srsv2);
94           logerror("\tgv_srsv3 = %c\n", gv_srsv3);
95           logerror("\tgv_srsv4 = %p\n", gv_srsv4);
96           logerror("\tgv_srsv5 = %f\n", gv_srsv5);
97 #if 0
98           logerror("\tgv_srsv6 = %e\n", gv_srsv6);
99 #endif
100           return -1;
101         }
102
103         logerror("Passed snip_ref_shlib_var test\n");
104         test_passes(testname);
105
106         return 0;
107 }
108