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