| 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 | |