1 /* Routines required for instrumenting a program. */
2 /* Compile this one with gcc. */
3 /* Copyright (C) 1989-2014 Free Software Foundation, Inc.
5 This file is part of GCC.
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 Under Section 7 of GPL version 3, you are granted additional
18 permissions described in the GCC Runtime Library Exception, version
19 3.1, as published by the Free Software Foundation.
21 You should have received a copy of the GNU General Public License and
22 a copy of the GCC Runtime Library Exception along with this program;
23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
24 <http://www.gnu.org/licenses/>. */
29 #if defined(inhibit_libc)
32 void __gcov_flush (void) {}
36 void __gcov_reset (void) {}
40 void __gcov_dump (void) {}
45 extern void gcov_clear (void) ATTRIBUTE_HIDDEN
;
46 extern void gcov_exit (void) ATTRIBUTE_HIDDEN
;
47 extern __gthread_mutex_t __gcov_flush_mx ATTRIBUTE_HIDDEN
;
50 #ifdef __GTHREAD_MUTEX_INIT
51 __gthread_mutex_t __gcov_flush_mx
= __GTHREAD_MUTEX_INIT
;
52 #define init_mx_once()
54 __gthread_mutex_t __gcov_flush_mx
;
59 __GTHREAD_MUTEX_INIT_FUNCTION (&__gcov_flush_mx
);
65 static __gthread_once_t once
= __GTHREAD_ONCE_INIT
;
66 __gthread_once (&once
, init_mx
);
70 /* Called before fork or exec - write out profile information gathered so
71 far and reset it to zero. This avoids duplication or loss of the
72 profile information gathered so far. */
78 __gthread_mutex_lock (&__gcov_flush_mx
);
83 __gthread_mutex_unlock (&__gcov_flush_mx
);
86 #endif /* L_gcov_flush */
90 /* Function that can be called from application to reset counters to zero,
91 in order to collect profile in region of interest. */
99 #endif /* L_gcov_reset */
103 /* Function that can be called from application to write profile collected
104 so far, in order to collect profile in region of interest. */
112 #endif /* L_gcov_dump */
116 /* A wrapper for the fork function. Flushes the accumulated profiling data, so
117 that they are not counted twice. */
123 extern __gthread_mutex_t __gcov_flush_mx
;
127 __GTHREAD_MUTEX_INIT_FUNCTION (&__gcov_flush_mx
);
133 /* A wrapper for the execl function. Flushes the accumulated profiling data, so
134 that they are not lost. */
137 __gcov_execl (const char *path
, char *arg
, ...)
149 while (va_arg (ap
, char *))
153 args
= (char **) alloca (length
* sizeof (void *));
155 for (i
= 1; i
< length
; i
++)
156 args
[i
] = va_arg (aq
, char *);
159 return execv (path
, args
);
164 /* A wrapper for the execlp function. Flushes the accumulated
165 profiling data, so that they are not lost. */
168 __gcov_execlp (const char *path
, char *arg
, ...)
180 while (va_arg (ap
, char *))
184 args
= (char **) alloca (length
* sizeof (void *));
186 for (i
= 1; i
< length
; i
++)
187 args
[i
] = va_arg (aq
, char *);
190 return execvp (path
, args
);
195 /* A wrapper for the execle function. Flushes the accumulated
196 profiling data, so that they are not lost. */
199 __gcov_execle (const char *path
, char *arg
, ...)
212 while (va_arg (ap
, char *))
216 args
= (char **) alloca (length
* sizeof (void *));
218 for (i
= 1; i
< length
; i
++)
219 args
[i
] = va_arg (aq
, char *);
220 envp
= va_arg (aq
, char **);
223 return execve (path
, args
, envp
);
228 /* A wrapper for the execv function. Flushes the accumulated
229 profiling data, so that they are not lost. */
232 __gcov_execv (const char *path
, char *const argv
[])
235 return execv (path
, argv
);
240 /* A wrapper for the execvp function. Flushes the accumulated
241 profiling data, so that they are not lost. */
244 __gcov_execvp (const char *path
, char *const argv
[])
247 return execvp (path
, argv
);
252 /* A wrapper for the execve function. Flushes the accumulated
253 profiling data, so that they are not lost. */
256 __gcov_execve (const char *path
, char *const argv
[], char *const envp
[])
259 return execve (path
, argv
, envp
);
262 #endif /* inhibit_libc */