led.c revision 1.2.6.2 1 1.2.6.2 skrll /* $NetBSD: led.c,v 1.2.6.2 2017/08/28 17:52:00 skrll Exp $ */
2 1.2.6.2 skrll
3 1.2.6.2 skrll /*-
4 1.2.6.2 skrll * Copyright (c) 2017 Jared McNeill <jmcneill (at) invisible.ca>
5 1.2.6.2 skrll * All rights reserved.
6 1.2.6.2 skrll *
7 1.2.6.2 skrll * Redistribution and use in source and binary forms, with or without
8 1.2.6.2 skrll * modification, are permitted provided that the following conditions
9 1.2.6.2 skrll * are met:
10 1.2.6.2 skrll * 1. Redistributions of source code must retain the above copyright
11 1.2.6.2 skrll * notice, this list of conditions and the following disclaimer.
12 1.2.6.2 skrll * 2. Redistributions in binary form must reproduce the above copyright
13 1.2.6.2 skrll * notice, this list of conditions and the following disclaimer in the
14 1.2.6.2 skrll * documentation and/or other materials provided with the distribution.
15 1.2.6.2 skrll *
16 1.2.6.2 skrll * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17 1.2.6.2 skrll * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 1.2.6.2 skrll * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 1.2.6.2 skrll * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 1.2.6.2 skrll * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 1.2.6.2 skrll * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
22 1.2.6.2 skrll * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
23 1.2.6.2 skrll * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
24 1.2.6.2 skrll * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 1.2.6.2 skrll * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 1.2.6.2 skrll * SUCH DAMAGE.
27 1.2.6.2 skrll */
28 1.2.6.2 skrll
29 1.2.6.2 skrll #include <sys/cdefs.h>
30 1.2.6.2 skrll __KERNEL_RCSID(0, "$NetBSD: led.c,v 1.2.6.2 2017/08/28 17:52:00 skrll Exp $");
31 1.2.6.2 skrll
32 1.2.6.2 skrll #include <sys/param.h>
33 1.2.6.2 skrll #include <sys/systm.h>
34 1.2.6.2 skrll #include <sys/device.h>
35 1.2.6.2 skrll #include <sys/kmem.h>
36 1.2.6.2 skrll #include <sys/queue.h>
37 1.2.6.2 skrll #include <sys/sysctl.h>
38 1.2.6.2 skrll #include <sys/once.h>
39 1.2.6.2 skrll
40 1.2.6.2 skrll #include <dev/led.h>
41 1.2.6.2 skrll
42 1.2.6.2 skrll struct led_device {
43 1.2.6.2 skrll char *name;
44 1.2.6.2 skrll led_getstate_fn getstate;
45 1.2.6.2 skrll led_setstate_fn setstate;
46 1.2.6.2 skrll void *priv;
47 1.2.6.2 skrll
48 1.2.6.2 skrll struct sysctllog *slog;
49 1.2.6.2 skrll
50 1.2.6.2 skrll TAILQ_ENTRY(led_device) devices;
51 1.2.6.2 skrll };
52 1.2.6.2 skrll
53 1.2.6.2 skrll static TAILQ_HEAD(, led_device) led_devices =
54 1.2.6.2 skrll TAILQ_HEAD_INITIALIZER(led_devices);
55 1.2.6.2 skrll static kmutex_t led_lock;
56 1.2.6.2 skrll
57 1.2.6.2 skrll static int
58 1.2.6.2 skrll led_init(void)
59 1.2.6.2 skrll {
60 1.2.6.2 skrll mutex_init(&led_lock, MUTEX_DEFAULT, IPL_NONE);
61 1.2.6.2 skrll
62 1.2.6.2 skrll return 0;
63 1.2.6.2 skrll }
64 1.2.6.2 skrll
65 1.2.6.2 skrll static struct led_device *
66 1.2.6.2 skrll led_lookup(const char *name)
67 1.2.6.2 skrll {
68 1.2.6.2 skrll struct led_device *led;
69 1.2.6.2 skrll
70 1.2.6.2 skrll KASSERT(mutex_owned(&led_lock));
71 1.2.6.2 skrll
72 1.2.6.2 skrll TAILQ_FOREACH(led, &led_devices, devices)
73 1.2.6.2 skrll if (strcmp(led->name, name) == 0)
74 1.2.6.2 skrll return led;
75 1.2.6.2 skrll
76 1.2.6.2 skrll return NULL;
77 1.2.6.2 skrll }
78 1.2.6.2 skrll
79 1.2.6.2 skrll static void
80 1.2.6.2 skrll led_normalize_name(char *name)
81 1.2.6.2 skrll {
82 1.2.6.2 skrll unsigned char *p;
83 1.2.6.2 skrll
84 1.2.6.2 skrll for (p = (unsigned char *)name; *p; p++)
85 1.2.6.2 skrll if (!isalpha(*p) && !isdigit(*p) && *p != '-' && *p != '_')
86 1.2.6.2 skrll *p = '_';
87 1.2.6.2 skrll }
88 1.2.6.2 skrll
89 1.2.6.2 skrll static void
90 1.2.6.2 skrll led_free(struct led_device *led)
91 1.2.6.2 skrll {
92 1.2.6.2 skrll KASSERT(mutex_owned(&led_lock));
93 1.2.6.2 skrll
94 1.2.6.2 skrll kmem_free(led->name, strlen(led->name) + 1);
95 1.2.6.2 skrll kmem_free(led, sizeof(*led));
96 1.2.6.2 skrll }
97 1.2.6.2 skrll
98 1.2.6.2 skrll static int
99 1.2.6.2 skrll led_sysctl_handler(SYSCTLFN_ARGS)
100 1.2.6.2 skrll {
101 1.2.6.2 skrll struct sysctlnode node;
102 1.2.6.2 skrll struct led_device *led;
103 1.2.6.2 skrll int error, state;
104 1.2.6.2 skrll
105 1.2.6.2 skrll mutex_enter(&led_lock);
106 1.2.6.2 skrll
107 1.2.6.2 skrll node = *rnode;
108 1.2.6.2 skrll led = node.sysctl_data;
109 1.2.6.2 skrll state = led->getstate(led->priv);
110 1.2.6.2 skrll node.sysctl_data = &state;
111 1.2.6.2 skrll error = sysctl_lookup(SYSCTLFN_CALL(&node));
112 1.2.6.2 skrll if (error || newp == NULL) {
113 1.2.6.2 skrll mutex_exit(&led_lock);
114 1.2.6.2 skrll return error;
115 1.2.6.2 skrll }
116 1.2.6.2 skrll
117 1.2.6.2 skrll if (state < LED_STATE_OFF || state > LED_STATE_ON) {
118 1.2.6.2 skrll mutex_exit(&led_lock);
119 1.2.6.2 skrll return EINVAL;
120 1.2.6.2 skrll }
121 1.2.6.2 skrll
122 1.2.6.2 skrll led->setstate(led->priv, state);
123 1.2.6.2 skrll
124 1.2.6.2 skrll mutex_exit(&led_lock);
125 1.2.6.2 skrll
126 1.2.6.2 skrll return 0;
127 1.2.6.2 skrll }
128 1.2.6.2 skrll
129 1.2.6.2 skrll void *
130 1.2.6.2 skrll led_attach(const char *name, void *priv, led_getstate_fn getstate,
131 1.2.6.2 skrll led_setstate_fn setstate)
132 1.2.6.2 skrll {
133 1.2.6.2 skrll static ONCE_DECL(control);
134 1.2.6.2 skrll struct led_device *led;
135 1.2.6.2 skrll const struct sysctlnode *node;
136 1.2.6.2 skrll int error;
137 1.2.6.2 skrll
138 1.2.6.2 skrll if (RUN_ONCE(&control, led_init) != 0)
139 1.2.6.2 skrll return NULL;
140 1.2.6.2 skrll
141 1.2.6.2 skrll led = kmem_zalloc(sizeof(*led), KM_SLEEP);
142 1.2.6.2 skrll led->name = kmem_asprintf("%s", name);
143 1.2.6.2 skrll led->getstate = getstate;
144 1.2.6.2 skrll led->setstate = setstate;
145 1.2.6.2 skrll led->priv = priv;
146 1.2.6.2 skrll
147 1.2.6.2 skrll /* Convert invalid sysctl node name characters to underscores */
148 1.2.6.2 skrll led_normalize_name(led->name);
149 1.2.6.2 skrll
150 1.2.6.2 skrll mutex_enter(&led_lock);
151 1.2.6.2 skrll if (led_lookup(name) != NULL) {
152 1.2.6.2 skrll led_free(led);
153 1.2.6.2 skrll led = NULL;
154 1.2.6.2 skrll } else {
155 1.2.6.2 skrll error = sysctl_createv(&led->slog, 0, NULL, &node,
156 1.2.6.2 skrll CTLFLAG_PERMANENT, CTLTYPE_NODE, "led", NULL,
157 1.2.6.2 skrll NULL, 0, NULL, 0,
158 1.2.6.2 skrll CTL_HW, CTL_CREATE, CTL_EOL);
159 1.2.6.2 skrll if (error == 0) {
160 1.2.6.2 skrll error = sysctl_createv(&led->slog, 0, &node, NULL,
161 1.2.6.2 skrll CTLFLAG_READWRITE, CTLTYPE_BOOL, led->name, NULL,
162 1.2.6.2 skrll led_sysctl_handler, 0,
163 1.2.6.2 skrll (void *)led, 0,
164 1.2.6.2 skrll CTL_CREATE, CTL_EOL);
165 1.2.6.2 skrll }
166 1.2.6.2 skrll if (error != 0) {
167 1.2.6.2 skrll printf("led: failed to create sysctl hw.led.%s: %d\n",
168 1.2.6.2 skrll led->name, error);
169 1.2.6.2 skrll led_free(led);
170 1.2.6.2 skrll led = NULL;
171 1.2.6.2 skrll }
172 1.2.6.2 skrll }
173 1.2.6.2 skrll if (led != NULL)
174 1.2.6.2 skrll TAILQ_INSERT_TAIL(&led_devices, led, devices);
175 1.2.6.2 skrll mutex_exit(&led_lock);
176 1.2.6.2 skrll
177 1.2.6.2 skrll return led;
178 1.2.6.2 skrll }
179 1.2.6.2 skrll
180 1.2.6.2 skrll void
181 1.2.6.2 skrll led_detach(void *handle)
182 1.2.6.2 skrll {
183 1.2.6.2 skrll struct led_device *led = handle;
184 1.2.6.2 skrll
185 1.2.6.2 skrll mutex_enter(&led_lock);
186 1.2.6.2 skrll
187 1.2.6.2 skrll TAILQ_REMOVE(&led_devices, led, devices);
188 1.2.6.2 skrll sysctl_teardown(&led->slog);
189 1.2.6.2 skrll led_free(led);
190 1.2.6.2 skrll
191 1.2.6.2 skrll mutex_exit(&led_lock);
192 1.2.6.2 skrll }
193