remove unnecessary assertion for unknown phdr_type (#757)
[dyninst.git] / dyninstAPI_RT / src / RTstatic_ctors_dtors-x86.c
1 /*
2  * See the dyninst/COPYRIGHT file for copyright information.
3  * 
4  * We provide the Paradyn Tools (below described as "Paradyn")
5  * on an AS IS basis, and do not warrant its validity or performance.
6  * We reserve the right to update, modify, or discontinue this
7  * software at any time.  We shall have no obligation to supply such
8  * updates or modifications or any other form of support to you.
9  * 
10  * By your use of Paradyn, you understand and agree that we (or any
11  * other person or entity with proprietary rights in Paradyn) are
12  * under no obligation to provide either maintenance services,
13  * update services, notices of latent defects, or correction of
14  * defects for Paradyn.
15  * 
16  * This library is free software; you can redistribute it and/or
17  * modify it under the terms of the GNU Lesser General Public
18  * License as published by the Free Software Foundation; either
19  * version 2.1 of the License, or (at your option) any later version.
20  * 
21  * This library is distributed in the hope that it will be useful,
22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
24  * Lesser General Public License for more details.
25  * 
26  * You should have received a copy of the GNU Lesser General Public
27  * License along with this library; if not, write to the Free Software
28  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
29  */
30
31 #if defined(DYNINST_RT_STATIC_LIB)
32 void *DYNINSTirel_start;
33 void *DYNINSTirel_end;
34
35 extern void (*DYNINSTctors_begin)(void);
36 extern void (*DYNINSTdtors_begin)(void);
37 extern void (*DYNINSTctors_end)(void);
38 extern void (*DYNINSTdtors_end)(void);
39
40 extern void DYNINSTBaseInit();
41
42 typedef struct {
43   long *offset;
44   long info;
45   long (*ptr)(void);
46 } rela_t;
47
48 typedef struct {
49   long *offset;
50   long info;
51 } rel_t;
52
53 /*
54  * When rewritting a static binary, .ctors and .dtors sections of
55  * instrumentation code needs to be combined with the existing .ctors
56  * and .dtors sections of the static binary.
57  *
58  * The following functions process the .ctors and .dtors sections
59  * that have been rewritten. The rewriter will relocate the 
60  * address of DYNINSTctors_addr and DYNINSTdtors_addr to point to
61  * new .ctors and .dtors sections.
62  */
63
64 void DYNINSTglobal_ctors_handler() {
65     void (**ctor)(void) = &DYNINSTctors_begin;
66
67     while( ctor != ( &DYNINSTctors_end )) {
68         if(*ctor && (*ctor != (void*)-1))
69             (*ctor)();
70         ctor++;
71     }
72
73     // This ensures that instrumentation cannot execute until all global
74     // constructors have run
75     DYNINSTBaseInit();
76 }
77
78 void DYNINSTglobal_dtors_handler() {
79     void (**dtor)(void) = &DYNINSTdtors_begin;
80
81     // Destructors are called in the forward order that they are listed
82     while( dtor != (&DYNINSTdtors_end )) {
83         if(*dtor && (*dtor != (void*)-1))
84             (*dtor)();
85         dtor++;
86     }
87 }
88
89 void DYNINSTglobal_irel_handler() {
90   if (sizeof(long) == 8) {
91     rela_t *rel = 0;
92     for (rel = (rela_t *)(&DYNINSTirel_start); rel != (rela_t *)(&DYNINSTirel_end); ++rel) {
93       long result = 0;
94       if (rel->info != 0x25) continue;
95       result = (rel->ptr());
96       *(rel->offset) = result;
97     }
98   }
99   else {
100     rel_t *rel = 0;
101     for (rel = (rel_t *)(&DYNINSTirel_start); rel != (rel_t *)(&DYNINSTirel_end); ++rel) {
102       long (*ptr)(void) = 0;
103       long result = 0;
104       if (rel->info != 0x2a) continue;
105       ptr = (void*)*(rel->offset);
106       result = ptr();
107       *(rel->offset) = result;
108     }
109   }
110 }
111
112 #endif