clockctl.c revision 1.32 1 /* $NetBSD: clockctl.c,v 1.32 2014/07/25 08:10:35 dholland 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 * 3. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: clockctl.c,v 1.32 2014/07/25 08:10:35 dholland Exp $");
35
36 #include "opt_ntp.h"
37 #include "opt_compat_netbsd.h"
38
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/proc.h>
42 #include <sys/errno.h>
43 #include <sys/ioctl.h>
44 #include <sys/device.h>
45 #include <sys/time.h>
46 #include <sys/conf.h>
47 #ifdef NTP
48 #include <sys/timex.h>
49 #endif /* NTP */
50 #include <sys/kauth.h>
51
52 #include <sys/clockctl.h>
53 #ifdef COMPAT_50
54 #include <compat/sys/clockctl.h>
55 #endif
56
57 dev_type_ioctl(clockctlioctl);
58
59 const struct cdevsw clockctl_cdevsw = {
60 .d_open = nullopen,
61 .d_close = nullclose,
62 .d_read = noread,
63 .d_write = nowrite,
64 .d_ioctl = clockctlioctl,
65 .d_stop = nostop,
66 .d_tty = notty,
67 .d_poll = nopoll,
68 .d_mmap = nommap,
69 .d_kqfilter = nokqfilter,
70 .d_discard = nodiscard,
71 .d_flag = D_OTHER,
72 };
73
74 static kauth_listener_t clockctl_listener;
75
76 static int
77 clockctl_listener_cb(kauth_cred_t cred, kauth_action_t action, void *cookie,
78 void *arg0, void *arg1, void *arg2, void *arg3)
79 {
80 int result;
81 enum kauth_system_req req;
82 bool device_context;
83
84 result = KAUTH_RESULT_DEFER;
85 req = (enum kauth_system_req)arg0;
86
87 if ((action != KAUTH_SYSTEM_TIME) ||
88 (req != KAUTH_REQ_SYSTEM_TIME_SYSTEM))
89 return result;
90
91 device_context = (bool)arg3;
92
93 /* Device is controlled by permissions, so allow. */
94 if (device_context)
95 result = KAUTH_RESULT_ALLOW;
96
97 return result;
98 }
99
100 /*ARGSUSED*/
101 void
102 clockctlattach(int num)
103 {
104
105 clockctl_listener = kauth_listen_scope(KAUTH_SCOPE_SYSTEM,
106 clockctl_listener_cb, NULL);
107 }
108
109 int
110 clockctlioctl(
111 dev_t dev,
112 u_long cmd,
113 void *data,
114 int flags,
115 struct lwp *l)
116 {
117 int error = 0;
118
119 switch (cmd) {
120 case CLOCKCTL_SETTIMEOFDAY: {
121 struct clockctl_settimeofday *args = data;
122
123 error = settimeofday1(args->tv, true, args->tzp, l, false);
124 break;
125 }
126 case CLOCKCTL_ADJTIME: {
127 struct timeval atv, oldatv;
128 struct clockctl_adjtime *args = data;
129
130 if (args->delta) {
131 error = copyin(args->delta, &atv, sizeof(atv));
132 if (error)
133 return (error);
134 }
135 adjtime1(args->delta ? &atv : NULL,
136 args->olddelta ? &oldatv : NULL, l->l_proc);
137 if (args->olddelta)
138 error = copyout(&oldatv, args->olddelta,
139 sizeof(oldatv));
140 break;
141 }
142 case CLOCKCTL_CLOCK_SETTIME: {
143 struct clockctl_clock_settime *args = data;
144 struct timespec ts;
145
146 error = copyin(args->tp, &ts, sizeof ts);
147 if (error)
148 return (error);
149 error = clock_settime1(l->l_proc, args->clock_id, &ts, false);
150 break;
151 }
152 #ifdef NTP
153 case CLOCKCTL_NTP_ADJTIME: {
154 struct clockctl_ntp_adjtime *args = data;
155 struct timex ntv;
156
157 error = copyin(args->tp, &ntv, sizeof(ntv));
158 if (error)
159 return (error);
160
161 ntp_adjtime1(&ntv);
162
163 error = copyout(&ntv, args->tp, sizeof(ntv));
164 if (error == 0)
165 args->retval = ntp_timestatus();
166 break;
167 }
168 #endif /* NTP */
169 default:
170 #ifdef COMPAT_50
171 error = compat50_clockctlioctl(dev, cmd, data, flags, l);
172 #else
173 error = EINVAL;
174 #endif
175 }
176
177 return (error);
178 }
179
180
181