commit | author | age
|
80b1b4
|
1 |
/* |
NJ |
2 |
* CDDL HEADER START |
|
3 |
* |
|
4 |
* The contents of this file are subject to the terms of the |
|
5 |
* Common Development and Distribution License (the "License"). |
|
6 |
* You may not use this file except in compliance with the License. |
|
7 |
* |
|
8 |
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE |
|
9 |
* or http://www.opensolaris.org/os/licensing. |
|
10 |
* See the License for the specific language governing permissions |
|
11 |
* and limitations under the License. |
|
12 |
* |
|
13 |
* When distributing Covered Code, include this CDDL HEADER in each |
|
14 |
* file and include the License file at usr/src/OPENSOLARIS.LICENSE. |
|
15 |
* If applicable, add the following below this CDDL HEADER, with the |
|
16 |
* fields enclosed by brackets "[]" replaced with your own identifying |
|
17 |
* information: Portions Copyright [yyyy] [name of copyright owner] |
|
18 |
* |
|
19 |
* CDDL HEADER END |
|
20 |
* |
|
21 |
* Copyright (c) 2010, Oracle and/or it's affiliates. All rights reserved. |
|
22 |
*/ |
|
23 |
|
|
24 |
/* |
|
25 |
* This compiles to a module that can be preloaded during a build. If this |
61c373
|
26 |
* is preloaded, it interposes on time(2), gettimeofday(3C), and |
NJ |
27 |
* clock_gethrtime(3C) and returns a constant number of seconds since epoch |
|
28 |
* when the execname matches one of the desired "programs" and TIME_CONSTANT |
80b1b4
|
29 |
* contains an integer value to be returned. |
NJ |
30 |
*/ |
|
31 |
|
|
32 |
#include <stdlib.h> |
|
33 |
#include <ucontext.h> |
|
34 |
#include <dlfcn.h> |
|
35 |
#include <strings.h> |
61c373
|
36 |
#include <time.h> |
80b1b4
|
37 |
|
NJ |
38 |
/* The list of programs that we want to use a constant time. */ |
acd5ac
|
39 |
static char *programs[] = { |
RB |
40 |
"autogen", "bash", "cpp", "cc1", "date", "doxygen", |
|
41 |
"erl", "grops", "gs", "gtroff", "javadoc", "ksh", "ksh93", "ld", |
|
42 |
"perl", "perl5.8.4", "perl5.10", "ruby", "sh", NULL |
|
43 |
}; |
80b1b4
|
44 |
|
NJ |
45 |
static int |
|
46 |
stack_info(uintptr_t pc, int signo, void *arg) |
|
47 |
{ |
|
48 |
Dl_info info; |
|
49 |
void *sym; |
|
50 |
|
d03bb1
|
51 |
if (dladdr1((void *)pc, &info, &sym, RTLD_DL_SYMENT) != 0) { |
61c373
|
52 |
if (strstr(info.dli_fname, ".so") == NULL) |
NJ |
53 |
*(char **)arg = (char *)info.dli_fname; |
80b1b4
|
54 |
} |
NJ |
55 |
|
|
56 |
return (0); |
|
57 |
} |
|
58 |
|
|
59 |
static char * |
|
60 |
my_execname() |
|
61 |
{ |
|
62 |
static char *execname; |
|
63 |
|
|
64 |
if (execname == NULL) { |
|
65 |
ucontext_t ctx; |
|
66 |
|
|
67 |
if (getcontext(&ctx) == 0) |
|
68 |
walkcontext(&ctx, stack_info, &execname); |
|
69 |
|
|
70 |
if (execname != NULL) { |
|
71 |
char *s = strrchr(execname, '/'); |
|
72 |
|
|
73 |
if (s != NULL) |
|
74 |
execname = ++s; |
|
75 |
} |
|
76 |
} |
|
77 |
|
|
78 |
return (execname); |
|
79 |
} |
|
80 |
|
|
81 |
static time_t |
61c373
|
82 |
time_constant() |
80b1b4
|
83 |
{ |
NJ |
84 |
char *execname = my_execname(); |
|
85 |
time_t result = -1; |
|
86 |
|
|
87 |
if (execname != NULL) { |
|
88 |
int i; |
|
89 |
|
|
90 |
for (i = 0; programs[i] != NULL; i++) |
|
91 |
if (strcmp(execname, programs[i]) == 0) { |
61c373
|
92 |
static char *time_string; |
80b1b4
|
93 |
|
61c373
|
94 |
if (time_string == NULL) |
NJ |
95 |
time_string = getenv("TIME_CONSTANT"); |
80b1b4
|
96 |
|
61c373
|
97 |
if (time_string != NULL) |
NJ |
98 |
result = atoll(time_string); |
80b1b4
|
99 |
|
NJ |
100 |
break; |
|
101 |
} |
|
102 |
} |
|
103 |
|
|
104 |
return (result); |
|
105 |
} |
|
106 |
|
|
107 |
time_t |
|
108 |
time(time_t *ptr) |
|
109 |
{ |
61c373
|
110 |
time_t result = time_constant(); |
80b1b4
|
111 |
|
NJ |
112 |
if (result == (time_t)-1) { |
|
113 |
static time_t (*fptr)(time_t *); |
|
114 |
|
|
115 |
if (fptr == NULL) |
|
116 |
fptr = (time_t (*)(time_t *))dlsym(RTLD_NEXT, "time"); |
|
117 |
|
|
118 |
result = (fptr)(ptr); |
|
119 |
} else if (ptr != NULL) |
|
120 |
*ptr = result; |
|
121 |
|
|
122 |
return (result); |
|
123 |
} |
61c373
|
124 |
|
NJ |
125 |
int |
|
126 |
gettimeofday(struct timeval *tp, void *tzp) |
|
127 |
{ |
|
128 |
static int (*fptr)(struct timeval *, void *); |
|
129 |
int result = -1; |
|
130 |
|
|
131 |
if (fptr == NULL) |
|
132 |
fptr = (int (*)(struct timeval *, void *))dlsym(RTLD_NEXT, |
|
133 |
"gettimeofday"); |
|
134 |
|
|
135 |
if ((result = (fptr)(tp, tzp)) == 0) { |
|
136 |
time_t curtime = time_constant(); |
|
137 |
|
|
138 |
if (curtime != (time_t)-1) |
|
139 |
tp->tv_sec = curtime; |
|
140 |
} |
|
141 |
|
|
142 |
return (result); |
|
143 |
} |
|
144 |
|
|
145 |
int |
|
146 |
clock_gettime(clockid_t clock_id, struct timespec *tp) |
|
147 |
{ |
|
148 |
static int (*fptr)(clockid_t, struct timespec *); |
|
149 |
int result = -1; |
|
150 |
|
|
151 |
if (fptr == NULL) |
|
152 |
fptr = (int (*)(clockid_t, struct timespec *))dlsym(RTLD_NEXT, |
|
153 |
"clock_gettime"); |
|
154 |
|
|
155 |
if ((result = (fptr)(clock_id, tp)) == 0) { |
|
156 |
time_t curtime = time_constant(); |
|
157 |
|
|
158 |
if (curtime != (time_t)-1) |
|
159 |
tp->tv_sec = curtime; |
|
160 |
} |
|
161 |
|
|
162 |
return (result); |
|
163 |
} |