]>
Commit | Line | Data |
---|---|---|
11c981a9 | 1 | /* Code to enable profiling at program startup. |
b168057a | 2 | Copyright (C) 1995-2015 Free Software Foundation, Inc. |
6d52618b | 3 | This file is part of the GNU C Library. |
11c981a9 | 4 | |
6d52618b | 5 | The GNU C Library is free software; you can redistribute it and/or |
41bdb6e2 AJ |
6 | modify it under the terms of the GNU Lesser General Public |
7 | License as published by the Free Software Foundation; either | |
8 | version 2.1 of the License, or (at your option) any later version. | |
11c981a9 | 9 | |
85bd816a RM |
10 | In addition to the permissions in the GNU Lesser General Public |
11 | License, the Free Software Foundation gives you unlimited | |
12 | permission to link the compiled version of this file with other | |
13 | programs, and to distribute those programs without any restriction | |
14 | coming from the use of this file. (The GNU Lesser General Public | |
15 | License restrictions do apply in other respects; for example, they | |
16 | cover modification of the file, and distribution when not linked | |
17 | into another program.) | |
18 | ||
19 | Note that people who make modified versions of this file are not | |
20 | obligated to grant this special exception for their modified | |
21 | versions; it is their choice whether to do so. The GNU Lesser | |
22 | General Public License gives permission to release a modified | |
23 | version without this exception; this exception also makes it | |
24 | possible to release a modified version which carries forward this | |
25 | exception. | |
26 | ||
6d52618b UD |
27 | The GNU C Library is distributed in the hope that it will be useful, |
28 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
29 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
41bdb6e2 | 30 | Lesser General Public License for more details. |
11c981a9 | 31 | |
41bdb6e2 | 32 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 PE |
33 | License along with the GNU C Library; if not, see |
34 | <http://www.gnu.org/licenses/>. */ | |
11c981a9 RM |
35 | |
36 | #include <sys/types.h> | |
37 | #include <sys/gmon.h> | |
38 | #include <stdlib.h> | |
39 | #include <unistd.h> | |
6ef77f19 UD |
40 | #define __ASSEMBLY__ |
41 | #include <entry.h> | |
11c981a9 | 42 | |
dfcaa642 UD |
43 | /* Beginning and end of our code segment. We cannot declare them |
44 | as the external functions since we want the addresses of those | |
45 | labels. Taking the address of a function may have different | |
46 | meanings on different platforms. */ | |
ca13ce66 UD |
47 | #ifdef ENTRY_POINT_DECL |
48 | ENTRY_POINT_DECL(extern) | |
49 | #else | |
b1c1949e | 50 | extern char ENTRY_POINT[]; |
ca13ce66 | 51 | #endif |
b1c1949e | 52 | extern char etext[]; |
11c981a9 | 53 | |
65233b58 | 54 | #ifndef TEXT_START |
9bc17809 UD |
55 | # ifdef ENTRY_POINT_DECL |
56 | # define TEXT_START ENTRY_POINT | |
57 | # else | |
58 | # define TEXT_START &ENTRY_POINT | |
59 | # endif | |
65233b58 RM |
60 | #endif |
61 | ||
9967e003 RM |
62 | #ifdef GMON_START_ARRAY_SECTION |
63 | static void __gmon_start__ (void); | |
64 | static void (*const gmon_start_initializer) (void) | |
65 | __attribute__ ((used, section (GMON_START_ARRAY_SECTION))) = &__gmon_start__; | |
66 | static | |
67 | #else | |
26ecc33a | 68 | /* We cannot use the normal constructor mechanism to call |
5f3d5c2b | 69 | __gmon_start__ because gcrt1.o appears before crtbegin.o in the link. |
26ecc33a | 70 | Instead crti.o calls it specially. */ |
1eab1361 | 71 | extern void __gmon_start__ (void); |
9967e003 | 72 | #endif |
5f3d5c2b RM |
73 | |
74 | void | |
75 | __gmon_start__ (void) | |
11c981a9 | 76 | { |
57ba7bb4 UD |
77 | /* Protect from being called more than once. Since crti.o is linked |
78 | into every shared library, each of their init functions will call us. */ | |
79 | static int called; | |
80 | ||
de71a46a | 81 | if (called) |
57ba7bb4 | 82 | return; |
de71a46a UD |
83 | |
84 | called = 1; | |
57ba7bb4 | 85 | |
11c981a9 | 86 | /* Start keeping profiling records. */ |
65233b58 | 87 | __monstartup ((u_long) TEXT_START, (u_long) &etext); |
11c981a9 | 88 | |
6d52618b | 89 | /* Call _mcleanup before exiting; it will write out gmon.out from the |
11c981a9 RM |
90 | collected data. */ |
91 | atexit (&_mcleanup); | |
92 | } |