1 /* $NetBSD: linux_time.c,v 1.14 2006/05/14 03:40:54 christos Exp $ */ 2 3 /*- 4 * Copyright (c) 2001 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Emmanuel Dreyfus. 9 * 10 * Redistribution and use in source and binary forms, with or without 11 * modification, are permitted provided that the following conditions 12 * are met: 13 * 1. Redistributions of source code must retain the above copyright 14 * notice, this list of conditions and the following disclaimer. 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in the 17 * documentation and/or other materials provided with the distribution. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 __FBSDID("$FreeBSD$"); 34 #if 0 35 __KERNEL_RCSID(0, "$NetBSD: linux_time.c,v 1.14 2006/05/14 03:40:54 christos Exp $"); 36 #endif 37 38 #include "opt_compat.h" 39 40 #include <sys/param.h> 41 #include <sys/kernel.h> 42 #include <sys/ucred.h> 43 #include <sys/mount.h> 44 #include <sys/sdt.h> 45 #include <sys/signal.h> 46 #include <sys/stdint.h> 47 #include <sys/syscallsubr.h> 48 #include <sys/sysproto.h> 49 #include <sys/time.h> 50 #include <sys/systm.h> 51 #include <sys/proc.h> 52 53 #ifdef COMPAT_LINUX32 54 #include <machine/../linux32/linux.h> 55 #include <machine/../linux32/linux32_proto.h> 56 #else 57 #include <machine/../linux/linux.h> 58 #include <machine/../linux/linux_proto.h> 59 #endif 60 61 #include <compat/linux/linux_dtrace.h> 62 #include <compat/linux/linux_misc.h> 63 64 /* DTrace init */ 65 LIN_SDT_PROVIDER_DECLARE(LINUX_DTRACE); 66 67 /** 68 * DTrace probes in this module. 69 */ 70 LIN_SDT_PROBE_DEFINE2(time, native_to_linux_timespec, entry, 71 "struct l_timespec *", "struct timespec *"); 72 LIN_SDT_PROBE_DEFINE0(time, native_to_linux_timespec, return); 73 LIN_SDT_PROBE_DEFINE2(time, linux_to_native_timespec, entry, 74 "struct timespec *", "struct l_timespec *"); 75 LIN_SDT_PROBE_DEFINE1(time, linux_to_native_timespec, return, "int"); 76 LIN_SDT_PROBE_DEFINE2(time, linux_to_native_clockid, entry, "clockid_t *", 77 "clockid_t"); 78 LIN_SDT_PROBE_DEFINE1(time, linux_to_native_clockid, unsupported_clockid, 79 "clockid_t"); 80 LIN_SDT_PROBE_DEFINE1(time, linux_to_native_clockid, unknown_clockid, 81 "clockid_t"); 82 LIN_SDT_PROBE_DEFINE1(time, linux_to_native_clockid, return, "int"); 83 LIN_SDT_PROBE_DEFINE2(time, linux_clock_gettime, entry, "clockid_t", 84 "struct l_timespec *"); 85 LIN_SDT_PROBE_DEFINE1(time, linux_clock_gettime, conversion_error, "int"); 86 LIN_SDT_PROBE_DEFINE1(time, linux_clock_gettime, gettime_error, "int"); 87 LIN_SDT_PROBE_DEFINE1(time, linux_clock_gettime, copyout_error, "int"); 88 LIN_SDT_PROBE_DEFINE1(time, linux_clock_gettime, return, "int"); 89 LIN_SDT_PROBE_DEFINE2(time, linux_clock_settime, entry, "clockid_t", 90 "struct l_timespec *"); 91 LIN_SDT_PROBE_DEFINE1(time, linux_clock_settime, conversion_error, "int"); 92 LIN_SDT_PROBE_DEFINE1(time, linux_clock_settime, settime_error, "int"); 93 LIN_SDT_PROBE_DEFINE1(time, linux_clock_settime, copyin_error, "int"); 94 LIN_SDT_PROBE_DEFINE1(time, linux_clock_settime, return, "int"); 95 LIN_SDT_PROBE_DEFINE2(time, linux_clock_getres, entry, "clockid_t", 96 "struct l_timespec *"); 97 LIN_SDT_PROBE_DEFINE0(time, linux_clock_getres, nullcall); 98 LIN_SDT_PROBE_DEFINE1(time, linux_clock_getres, conversion_error, "int"); 99 LIN_SDT_PROBE_DEFINE1(time, linux_clock_getres, getres_error, "int"); 100 LIN_SDT_PROBE_DEFINE1(time, linux_clock_getres, copyout_error, "int"); 101 LIN_SDT_PROBE_DEFINE1(time, linux_clock_getres, return, "int"); 102 LIN_SDT_PROBE_DEFINE2(time, linux_nanosleep, entry, "const struct l_timespec *", 103 "struct l_timespec *"); 104 LIN_SDT_PROBE_DEFINE1(time, linux_nanosleep, conversion_error, "int"); 105 LIN_SDT_PROBE_DEFINE1(time, linux_nanosleep, nanosleep_error, "int"); 106 LIN_SDT_PROBE_DEFINE1(time, linux_nanosleep, copyout_error, "int"); 107 LIN_SDT_PROBE_DEFINE1(time, linux_nanosleep, copyin_error, "int"); 108 LIN_SDT_PROBE_DEFINE1(time, linux_nanosleep, return, "int"); 109 LIN_SDT_PROBE_DEFINE4(time, linux_clock_nanosleep, entry, "clockid_t", "int", 110 "struct l_timespec *", "struct l_timespec *"); 111 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, conversion_error, "int"); 112 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, nanosleep_error, "int"); 113 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, copyout_error, "int"); 114 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, copyin_error, "int"); 115 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, unsupported_flags, "int"); 116 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, unsupported_clockid, "int"); 117 LIN_SDT_PROBE_DEFINE1(time, linux_clock_nanosleep, return, "int"); 118 119 static void native_to_linux_timespec(struct l_timespec *, 120 struct timespec *); 121 static int linux_to_native_timespec(struct timespec *, 122 struct l_timespec *); 123 static int linux_to_native_clockid(clockid_t *, clockid_t); 124 125 static void 126 native_to_linux_timespec(struct l_timespec *ltp, struct timespec *ntp) 127 { 128 129 LIN_SDT_PROBE2(time, native_to_linux_timespec, entry, ltp, ntp); 130 131 ltp->tv_sec = ntp->tv_sec; 132 ltp->tv_nsec = ntp->tv_nsec; 133 134 LIN_SDT_PROBE0(time, native_to_linux_timespec, return); 135 } 136 137 static int 138 linux_to_native_timespec(struct timespec *ntp, struct l_timespec *ltp) 139 { 140 141 LIN_SDT_PROBE2(time, linux_to_native_timespec, entry, ntp, ltp); 142 143 if (ltp->tv_sec < 0 || ltp->tv_nsec > (l_long)999999999L) { 144 LIN_SDT_PROBE1(time, linux_to_native_timespec, return, EINVAL); 145 return (EINVAL); 146 } 147 ntp->tv_sec = ltp->tv_sec; 148 ntp->tv_nsec = ltp->tv_nsec; 149 150 LIN_SDT_PROBE1(time, linux_to_native_timespec, return, 0); 151 return (0); 152 } 153 154 static int 155 linux_to_native_clockid(clockid_t *n, clockid_t l) 156 { 157 158 LIN_SDT_PROBE2(time, linux_to_native_clockid, entry, n, l); 159 160 switch (l) { 161 case LINUX_CLOCK_REALTIME: 162 *n = CLOCK_REALTIME; 163 break; 164 case LINUX_CLOCK_MONOTONIC: 165 *n = CLOCK_MONOTONIC; 166 break; 167 case LINUX_CLOCK_PROCESS_CPUTIME_ID: 168 case LINUX_CLOCK_THREAD_CPUTIME_ID: 169 case LINUX_CLOCK_REALTIME_HR: 170 case LINUX_CLOCK_MONOTONIC_HR: 171 LIN_SDT_PROBE1(time, linux_to_native_clockid, 172 unsupported_clockid, l); 173 LIN_SDT_PROBE1(time, linux_to_native_clockid, return, EINVAL); 174 return (EINVAL); 175 break; 176 default: 177 LIN_SDT_PROBE1(time, linux_to_native_clockid, 178 unknown_clockid, l); 179 LIN_SDT_PROBE1(time, linux_to_native_clockid, return, EINVAL); 180 return (EINVAL); 181 break; 182 } 183 184 LIN_SDT_PROBE1(time, linux_to_native_clockid, return, 0); 185 return (0); 186 } 187 188 int 189 linux_clock_gettime(struct thread *td, struct linux_clock_gettime_args *args) 190 { 191 struct l_timespec lts; 192 int error; 193 clockid_t nwhich = 0; /* XXX: GCC */ 194 struct timespec tp; 195 196 LIN_SDT_PROBE2(time, linux_clock_gettime, entry, args->which, args->tp); 197 198 error = linux_to_native_clockid(&nwhich, args->which); 199 if (error != 0) { 200 LIN_SDT_PROBE1(time, linux_clock_gettime, conversion_error, 201 error); 202 LIN_SDT_PROBE1(time, linux_clock_gettime, return, error); 203 return (error); 204 } 205 error = kern_clock_gettime(td, nwhich, &tp); 206 if (error != 0) { 207 LIN_SDT_PROBE1(time, linux_clock_gettime, gettime_error, error); 208 LIN_SDT_PROBE1(time, linux_clock_gettime, return, error); 209 return (error); 210 } 211 native_to_linux_timespec(<s, &tp); 212 213 error = copyout(<s, args->tp, sizeof lts); 214 if (error != 0) 215 LIN_SDT_PROBE1(time, linux_clock_gettime, copyout_error, error); 216 217 LIN_SDT_PROBE1(time, linux_clock_gettime, return, error); 218 return (error); 219 } 220 221 int 222 linux_clock_settime(struct thread *td, struct linux_clock_settime_args *args) 223 { 224 struct timespec ts; 225 struct l_timespec lts; 226 int error; 227 clockid_t nwhich = 0; /* XXX: GCC */ 228 229 LIN_SDT_PROBE2(time, linux_clock_settime, entry, args->which, args->tp); 230 231 error = linux_to_native_clockid(&nwhich, args->which); 232 if (error != 0) { 233 LIN_SDT_PROBE1(time, linux_clock_settime, conversion_error, 234 error); 235 LIN_SDT_PROBE1(time, linux_clock_settime, return, error); 236 return (error); 237 } 238 error = copyin(args->tp, <s, sizeof lts); 239 if (error != 0) { 240 LIN_SDT_PROBE1(time, linux_clock_settime, copyin_error, error); 241 LIN_SDT_PROBE1(time, linux_clock_settime, return, error); 242 return (error); 243 } 244 error = linux_to_native_timespec(&ts, <s); 245 if (error != 0) { 246 LIN_SDT_PROBE1(time, linux_clock_settime, conversion_error, 247 error); 248 LIN_SDT_PROBE1(time, linux_clock_settime, return, error); 249 return (error); 250 } 251 252 error = kern_clock_settime(td, nwhich, &ts); 253 if (error != 0) 254 LIN_SDT_PROBE1(time, linux_clock_settime, settime_error, error); 255 256 LIN_SDT_PROBE1(time, linux_clock_settime, return, error); 257 return (error); 258 } 259 260 int 261 linux_clock_getres(struct thread *td, struct linux_clock_getres_args *args) 262 { 263 struct timespec ts; 264 struct l_timespec lts; 265 int error; 266 clockid_t nwhich = 0; /* XXX: GCC */ 267 268 LIN_SDT_PROBE2(time, linux_clock_getres, entry, args->which, args->tp); 269 270 if (args->tp == NULL) { 271 LIN_SDT_PROBE0(time, linux_clock_getres, nullcall); 272 LIN_SDT_PROBE1(time, linux_clock_getres, return, 0); 273 return (0); 274 } 275 276 error = linux_to_native_clockid(&nwhich, args->which); 277 if (error != 0) { 278 LIN_SDT_PROBE1(time, linux_clock_getres, conversion_error, 279 error); 280 LIN_SDT_PROBE1(time, linux_clock_getres, return, error); 281 return (error); 282 } 283 error = kern_clock_getres(td, nwhich, &ts); 284 if (error != 0) { 285 LIN_SDT_PROBE1(time, linux_clock_getres, getres_error, error); 286 LIN_SDT_PROBE1(time, linux_clock_getres, return, error); 287 return (error); 288 } 289 native_to_linux_timespec(<s, &ts); 290 291 error = copyout(<s, args->tp, sizeof lts); 292 if (error != 0) 293 LIN_SDT_PROBE1(time, linux_clock_getres, copyout_error, error); 294 295 LIN_SDT_PROBE1(time, linux_clock_getres, return, error); 296 return (error); 297 } 298 299 int 300 linux_nanosleep(struct thread *td, struct linux_nanosleep_args *args) 301 { 302 struct timespec *rmtp; 303 struct l_timespec lrqts, lrmts; 304 struct timespec rqts, rmts; 305 int error; 306 307 LIN_SDT_PROBE2(time, linux_nanosleep, entry, args->rqtp, args->rmtp); 308 309 error = copyin(args->rqtp, &lrqts, sizeof lrqts); 310 if (error != 0) { 311 LIN_SDT_PROBE1(time, linux_nanosleep, copyin_error, error); 312 LIN_SDT_PROBE1(time, linux_nanosleep, return, error); 313 return (error); 314 } 315 316 if (args->rmtp != NULL) 317 rmtp = &rmts; 318 else 319 rmtp = NULL; 320 321 error = linux_to_native_timespec(&rqts, &lrqts); 322 if (error != 0) { 323 LIN_SDT_PROBE1(time, linux_nanosleep, conversion_error, error); 324 LIN_SDT_PROBE1(time, linux_nanosleep, return, error); 325 return (error); 326 } 327 error = kern_nanosleep(td, &rqts, rmtp); 328 if (error != 0) { 329 LIN_SDT_PROBE1(time, linux_nanosleep, nanosleep_error, error); 330 LIN_SDT_PROBE1(time, linux_nanosleep, return, error); 331 return (error); 332 } 333 334 if (args->rmtp != NULL) { 335 native_to_linux_timespec(&lrmts, rmtp); 336 error = copyout(&lrmts, args->rmtp, sizeof(lrmts)); 337 if (error != 0) { 338 LIN_SDT_PROBE1(time, linux_nanosleep, copyout_error, 339 error); 340 LIN_SDT_PROBE1(time, linux_nanosleep, return, error); 341 return (error); 342 } 343 } 344 345 LIN_SDT_PROBE1(time, linux_nanosleep, return, 0); 346 return (0); 347 } 348 349 int 350 linux_clock_nanosleep(struct thread *td, struct linux_clock_nanosleep_args *args) 351 { 352 struct timespec *rmtp; 353 struct l_timespec lrqts, lrmts; 354 struct timespec rqts, rmts; 355 int error; 356 357 LIN_SDT_PROBE4(time, linux_clock_nanosleep, entry, args->which, 358 args->flags, args->rqtp, args->rmtp); 359 360 if (args->flags != 0) { 361 /* XXX deal with TIMER_ABSTIME */ 362 LIN_SDT_PROBE1(time, linux_clock_nanosleep, unsupported_flags, 363 args->flags); 364 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, EINVAL); 365 return (EINVAL); /* XXX deal with TIMER_ABSTIME */ 366 } 367 368 if (args->which != LINUX_CLOCK_REALTIME) { 369 LIN_SDT_PROBE1(time, linux_clock_nanosleep, unsupported_clockid, 370 args->which); 371 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, EINVAL); 372 return (EINVAL); 373 } 374 375 error = copyin(args->rqtp, &lrqts, sizeof lrqts); 376 if (error != 0) { 377 LIN_SDT_PROBE1(time, linux_clock_nanosleep, copyin_error, 378 error); 379 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, error); 380 return (error); 381 } 382 383 if (args->rmtp != NULL) 384 rmtp = &rmts; 385 else 386 rmtp = NULL; 387 388 error = linux_to_native_timespec(&rqts, &lrqts); 389 if (error != 0) { 390 LIN_SDT_PROBE1(time, linux_clock_nanosleep, conversion_error, 391 error); 392 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, error); 393 return (error); 394 } 395 error = kern_nanosleep(td, &rqts, rmtp); 396 if (error != 0) { 397 LIN_SDT_PROBE1(time, linux_clock_nanosleep, nanosleep_error, 398 error); 399 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, error); 400 return (error); 401 } 402 403 if (args->rmtp != NULL) { 404 native_to_linux_timespec(&lrmts, rmtp); 405 error = copyout(&lrmts, args->rmtp, sizeof lrmts ); 406 if (error != 0) { 407 LIN_SDT_PROBE1(time, linux_clock_nanosleep, 408 copyout_error, error); 409 LIN_SDT_PROBE1(time, linux_nanosleep, return, error); 410 return (error); 411 } 412 } 413 414 LIN_SDT_PROBE1(time, linux_clock_nanosleep, return, 0); 415 return (0); 416 } 417