1 | /* $NetBSD: linux32_time.c,v 1.37 2012/10/02 01:44:28 christos Exp $ */ |
2 | |
3 | /*- |
4 | * Copyright (c) 2006 Emmanuel Dreyfus, all rights reserved. |
5 | * |
6 | * Redistribution and use in source and binary forms, with or without |
7 | * modification, are permitted provided that the following conditions |
8 | * are met: |
9 | * 1. Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * 2. Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
14 | * 3. All advertising materials mentioning features or use of this software |
15 | * must display the following acknowledgement: |
16 | * This product includes software developed by Emmanuel Dreyfus |
17 | * 4. The name of the author may not be used to endorse or promote |
18 | * products derived from this software without specific prior written |
19 | * permission. |
20 | * |
21 | * THIS SOFTWARE IS PROVIDED BY THE THE AUTHOR AND CONTRIBUTORS ``AS IS'' |
22 | * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, |
23 | * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR |
24 | * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS |
25 | * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR |
26 | * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF |
27 | * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS |
28 | * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN |
29 | * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) |
30 | * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
31 | * POSSIBILITY OF SUCH DAMAGE. |
32 | */ |
33 | |
34 | #include <sys/cdefs.h> |
35 | |
36 | __KERNEL_RCSID(0, "$NetBSD: linux32_time.c,v 1.37 2012/10/02 01:44:28 christos Exp $" ); |
37 | |
38 | #include <sys/types.h> |
39 | #include <sys/param.h> |
40 | #include <sys/fstypes.h> |
41 | #include <sys/signal.h> |
42 | #include <sys/dirent.h> |
43 | #include <sys/kauth.h> |
44 | #include <sys/kernel.h> |
45 | #include <sys/fcntl.h> |
46 | #include <sys/namei.h> |
47 | #include <sys/select.h> |
48 | #include <sys/proc.h> |
49 | #include <sys/resourcevar.h> |
50 | #include <sys/ucred.h> |
51 | #include <sys/swap.h> |
52 | #include <sys/vfs_syscalls.h> |
53 | |
54 | #include <machine/types.h> |
55 | |
56 | #include <sys/syscallargs.h> |
57 | |
58 | #include <compat/netbsd32/netbsd32.h> |
59 | #include <compat/netbsd32/netbsd32_conv.h> |
60 | #include <compat/netbsd32/netbsd32_syscallargs.h> |
61 | |
62 | #include <compat/linux/common/linux_types.h> |
63 | #include <compat/linux/common/linux_signal.h> |
64 | #include <compat/linux/common/linux_machdep.h> |
65 | #include <compat/linux/common/linux_misc.h> |
66 | #include <compat/linux/common/linux_oldolduname.h> |
67 | #include <compat/linux/common/linux_sched.h> |
68 | #include <compat/linux/common/linux_ipc.h> |
69 | #include <compat/linux/common/linux_sem.h> |
70 | #include <compat/linux/linux_syscallargs.h> |
71 | |
72 | #include <compat/linux32/common/linux32_types.h> |
73 | #include <compat/linux32/common/linux32_signal.h> |
74 | #include <compat/linux32/common/linux32_machdep.h> |
75 | #include <compat/linux32/common/linux32_sysctl.h> |
76 | #include <compat/linux32/common/linux32_socketcall.h> |
77 | #include <compat/linux32/common/linux32_sched.h> |
78 | #include <compat/linux32/linux32_syscallargs.h> |
79 | |
80 | extern struct timezone linux_sys_tz; |
81 | |
82 | void native_to_linux32_timespec(struct linux32_timespec *, struct timespec *); |
83 | void linux32_to_native_timespec(struct timespec *, struct linux32_timespec *); |
84 | |
85 | int |
86 | linux32_sys_gettimeofday(struct lwp *l, const struct linux32_sys_gettimeofday_args *uap, register_t *retval) |
87 | { |
88 | /* { |
89 | syscallarg(netbsd32_timeval50p_t) tp; |
90 | syscallarg(netbsd32_timezonep_t) tzp; |
91 | } */ |
92 | struct timeval tv; |
93 | struct netbsd32_timeval50 tv32; |
94 | int error; |
95 | |
96 | if (SCARG_P32(uap, tp) != NULL) { |
97 | microtime(&tv); |
98 | netbsd32_from_timeval50(&tv, &tv32); |
99 | if ((error = copyout(&tv32, SCARG_P32(uap, tp), |
100 | sizeof(tv32))) != 0) |
101 | return error; |
102 | } |
103 | |
104 | /* timezone size does not change */ |
105 | if (SCARG_P32(uap, tzp) != NULL) { |
106 | if ((error = copyout(&linux_sys_tz, SCARG_P32(uap, tzp), |
107 | sizeof(linux_sys_tz))) != 0) |
108 | return error; |
109 | } |
110 | |
111 | return 0; |
112 | } |
113 | |
114 | int |
115 | linux32_sys_settimeofday(struct lwp *l, const struct linux32_sys_settimeofday_args *uap, register_t *retval) |
116 | { |
117 | /* { |
118 | syscallarg(netbsd32_timeval50p_t) tp; |
119 | syscallarg(netbsd32_timezonep_t) tzp; |
120 | } */ |
121 | struct linux_sys_settimeofday_args ua; |
122 | |
123 | NETBSD32TOP_UAP(tp, struct timeval50); |
124 | NETBSD32TOP_UAP(tzp, struct timezone); |
125 | |
126 | return linux_sys_settimeofday(l, &ua, retval); |
127 | } |
128 | |
129 | int |
130 | linux32_sys_time(struct lwp *l, const struct linux32_sys_time_args *uap, register_t *retval) |
131 | { |
132 | /* { |
133 | syscallarg(linux32_timep_t) t; |
134 | } */ |
135 | struct timeval atv; |
136 | linux32_time_t tt; |
137 | int error; |
138 | |
139 | microtime(&atv); |
140 | |
141 | tt = (linux32_time_t)atv.tv_sec; |
142 | |
143 | if (SCARG_P32(uap, t) && (error = copyout(&tt, |
144 | SCARG_P32(uap, t), sizeof(tt)))) |
145 | return error; |
146 | |
147 | retval[0] = tt; |
148 | |
149 | return 0; |
150 | } |
151 | |
152 | |
153 | #define CONVTCK(r) (r.tv_sec * hz + r.tv_usec / (1000000 / hz)) |
154 | |
155 | int |
156 | linux32_sys_times(struct lwp *l, const struct linux32_sys_times_args *uap, register_t *retval) |
157 | { |
158 | /* { |
159 | syscallarg(linux32_tmsp_t) tms; |
160 | } */ |
161 | struct proc *p = l->l_proc; |
162 | struct timeval t; |
163 | int error; |
164 | |
165 | if (SCARG_P32(uap, tms)) { |
166 | struct linux32_tms ltms32; |
167 | struct rusage ru; |
168 | |
169 | mutex_enter(p->p_lock); |
170 | calcru(p, &ru.ru_utime, &ru.ru_stime, NULL, NULL); |
171 | ltms32.ltms32_utime = CONVTCK(ru.ru_utime); |
172 | ltms32.ltms32_stime = CONVTCK(ru.ru_stime); |
173 | ltms32.ltms32_cutime = CONVTCK(p->p_stats->p_cru.ru_utime); |
174 | ltms32.ltms32_cstime = CONVTCK(p->p_stats->p_cru.ru_stime); |
175 | mutex_exit(p->p_lock); |
176 | |
177 | error = copyout(<ms32, SCARG_P32(uap, tms), sizeof(ltms32)); |
178 | if (error) |
179 | return error; |
180 | } |
181 | |
182 | getmicrouptime(&t); |
183 | |
184 | retval[0] = ((linux32_clock_t)(CONVTCK(t))); |
185 | return 0; |
186 | } |
187 | |
188 | #undef CONVTCK |
189 | |
190 | int |
191 | linux32_sys_stime(struct lwp *l, const struct linux32_sys_stime_args *uap, register_t *retval) |
192 | { |
193 | /* { |
194 | syscallarg(linux32_timep_t) t; |
195 | } */ |
196 | struct timespec ts; |
197 | linux32_time_t tt32; |
198 | int error; |
199 | |
200 | if ((error = copyin(SCARG_P32(uap, t), &tt32, sizeof tt32)) != 0) |
201 | return error; |
202 | |
203 | ts.tv_sec = (long)tt32; |
204 | ts.tv_nsec = 0; |
205 | |
206 | return settime(l->l_proc, &ts); |
207 | } |
208 | |
209 | int |
210 | linux32_sys_utime(struct lwp *l, const struct linux32_sys_utime_args *uap, register_t *retval) |
211 | { |
212 | /* { |
213 | syscallarg(const netbsd32_charp) path; |
214 | syscallarg(linux32_utimbufp_t) times; |
215 | } */ |
216 | struct timeval tv[2], *tvp; |
217 | struct linux32_utimbuf lut; |
218 | int error; |
219 | |
220 | if (SCARG_P32(uap, times) != NULL) { |
221 | if ((error = copyin(SCARG_P32(uap, times), &lut, sizeof lut))) |
222 | return error; |
223 | |
224 | tv[0].tv_sec = (long)lut.l_actime; |
225 | tv[0].tv_usec = 0; |
226 | tv[1].tv_sec = (long)lut.l_modtime; |
227 | tv[1].tv_usec = 0; |
228 | tvp = tv; |
229 | } else { |
230 | tvp = NULL; |
231 | } |
232 | |
233 | return do_sys_utimes(l, NULL, SCARG_P32(uap, path), FOLLOW, |
234 | tvp, UIO_SYSSPACE); |
235 | } |
236 | |
237 | void |
238 | native_to_linux32_timespec(struct linux32_timespec *ltp, struct timespec *ntp) |
239 | { |
240 | ltp->tv_sec = ntp->tv_sec; |
241 | ltp->tv_nsec = ntp->tv_nsec; |
242 | } |
243 | |
244 | void |
245 | linux32_to_native_timespec(struct timespec *ntp, struct linux32_timespec *ltp) |
246 | { |
247 | ntp->tv_sec = ltp->tv_sec; |
248 | ntp->tv_nsec = ltp->tv_nsec; |
249 | } |
250 | |
251 | int |
252 | linux32_sys_nanosleep(struct lwp *l, |
253 | const struct linux32_sys_nanosleep_args *uap, register_t *retval) |
254 | { |
255 | /* { |
256 | syscallarg(linux32_timespecp_t) rqtp; |
257 | syscallarg(linux32_timespecp_t) rmtp; |
258 | } */ |
259 | struct timespec rqts, rmts; |
260 | struct linux32_timespec lrqts, lrmts; |
261 | int error, error1; |
262 | |
263 | error = copyin(SCARG_P32(uap, rqtp), &lrqts, sizeof(lrqts)); |
264 | if (error != 0) |
265 | return error; |
266 | linux32_to_native_timespec(&rqts, &lrqts); |
267 | |
268 | error = nanosleep1(l, CLOCK_MONOTONIC, 0, &rqts, |
269 | SCARG_P32(uap, rmtp) ? &rmts : NULL); |
270 | if (SCARG_P32(uap, rmtp) == NULL || (error != 0 && error != EINTR)) |
271 | return error; |
272 | |
273 | native_to_linux32_timespec(&lrmts, &rmts); |
274 | error1 = copyout(&lrmts, SCARG_P32(uap, rmtp), sizeof(lrmts)); |
275 | return error1 ? error1 : error; |
276 | } |
277 | |
278 | int |
279 | linux32_sys_clock_settime(struct lwp *l, |
280 | const struct linux32_sys_clock_settime_args *uap, register_t *retval) |
281 | { |
282 | /* { |
283 | syscallarg(clockid_t) which; |
284 | syscallarg(linux32_timespecp_t) tp; |
285 | } */ |
286 | int error; |
287 | struct timespec ts; |
288 | struct linux32_timespec lts; |
289 | clockid_t id; |
290 | |
291 | error = linux_to_native_clockid(&id, SCARG(uap, which)); |
292 | if (error != 0) |
293 | return error; |
294 | |
295 | if ((error = copyin(SCARG_P32(uap, tp), <s, sizeof lts))) |
296 | return error; |
297 | |
298 | linux32_to_native_timespec(&ts, <s); |
299 | return clock_settime1(l->l_proc, id, &ts, true); |
300 | } |
301 | |
302 | int |
303 | linux32_sys_clock_gettime(struct lwp *l, |
304 | const struct linux32_sys_clock_gettime_args *uap, register_t *retval) |
305 | { |
306 | /* { |
307 | syscallarg(clockid_t) which; |
308 | syscallarg(linux32_timespecp_t) tp; |
309 | } */ |
310 | int error; |
311 | clockid_t id; |
312 | struct timespec ts; |
313 | struct linux32_timespec lts; |
314 | |
315 | error = linux_to_native_clockid(&id, SCARG(uap, which)); |
316 | if (error != 0) |
317 | return error; |
318 | |
319 | error = clock_gettime1(id, &ts); |
320 | if (error != 0) |
321 | return error; |
322 | |
323 | native_to_linux32_timespec(<s, &ts); |
324 | return copyout(<s, SCARG_P32(uap, tp), sizeof lts); |
325 | } |
326 | |
327 | int |
328 | linux32_sys_clock_getres(struct lwp *l, |
329 | const struct linux32_sys_clock_getres_args *uap, register_t *retval) |
330 | { |
331 | /* { |
332 | syscallarg(clockid_t) which; |
333 | syscallarg(linux32_timespecp_t) tp; |
334 | } */ |
335 | int error; |
336 | clockid_t id; |
337 | struct timespec ts; |
338 | struct linux32_timespec lts; |
339 | |
340 | error = linux_to_native_clockid(&id, SCARG(uap, which)); |
341 | if (error != 0 || SCARG_P32(uap, tp) == NULL) |
342 | return error; |
343 | |
344 | error = clock_getres1(id, &ts); |
345 | if (error != 0) |
346 | return error; |
347 | |
348 | native_to_linux32_timespec(<s, &ts); |
349 | return copyout(<s, SCARG_P32(uap, tp), sizeof lts); |
350 | } |
351 | |
352 | int |
353 | linux32_sys_clock_nanosleep(struct lwp *l, |
354 | const struct linux32_sys_clock_nanosleep_args *uap, register_t *retval) |
355 | { |
356 | /* { |
357 | syscallarg(clockid_t) which; |
358 | syscallarg(int) flags; |
359 | syscallarg(linux32_timespecp_t) rqtp; |
360 | syscallarg(linux32_timespecp_t) rmtp; |
361 | } */ |
362 | struct linux32_timespec lrqts, lrmts; |
363 | struct timespec rqts, rmts; |
364 | int error, error1, flags; |
365 | clockid_t id; |
366 | |
367 | flags = SCARG(uap, flags) != 0 ? TIMER_ABSTIME : 0; |
368 | |
369 | error = linux_to_native_clockid(&id, SCARG(uap, which)); |
370 | if (error != 0) |
371 | return error; |
372 | |
373 | error = copyin(SCARG_P32(uap, rqtp), &lrqts, sizeof lrqts); |
374 | if (error != 0) |
375 | return error; |
376 | linux32_to_native_timespec(&rqts, &lrqts); |
377 | |
378 | error = nanosleep1(l, id, flags, &rqts, |
379 | SCARG_P32(uap, rmtp) ? &rmts : NULL); |
380 | if (SCARG_P32(uap, rmtp) == NULL || (error != 0 && error != EINTR)) |
381 | return error; |
382 | |
383 | native_to_linux32_timespec(&lrmts, &rmts); |
384 | error1 = copyout(&lrmts, SCARG_P32(uap, rmtp), sizeof lrmts); |
385 | return error1 ? error1 : error; |
386 | } |
387 | |