1 /*-
2 * Copyright (c) 2009 Marius Strobl <marius@FreeBSD.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD: stable/9/sys/sparc64/ebus/epic.c 229093 2011-12-31 14:12:12Z hselasky $");
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/bus.h>
33 #include <sys/kernel.h>
34 #include <sys/lock.h>
35 #include <sys/module.h>
36 #include <sys/mutex.h>
37 #include <sys/resource.h>
38 #include <sys/rman.h>
39
40 #include <dev/led/led.h>
41 #include <dev/ofw/ofw_bus.h>
42
43 #include <machine/bus.h>
44 #include <machine/resource.h>
45
46 #define EPIC_DELAY 10000
47
48 #define EPIC_NREG 1
49 #define EPIC_FW_LED 0
50
51 #define EPIC_FW_LED_DATA 0x40
52 #define EPIC_FW_LED_ADDR 0x41
53 #define EPIC_FW_LED_WRITE_MASK 0x80
54
55 #define EPIC_FW_VERSION 0x05
56 #define EPIC_LED_STATE0 0x06
57
58 #define EPIC_LED_ALERT_MASK 0x0c
59 #define EPIC_LED_ALERT_OFF 0x00
60 #define EPIC_LED_ALERT_ON 0x04
61
62 #define EPIC_LED_POWER_MASK 0x30
63 #define EPIC_LED_POWER_OFF 0x00
64 #define EPIC_LED_POWER_ON 0x10
65 #define EPIC_LED_POWER_SB_BLINK 0x20
66 #define EPIC_LED_POWER_FAST_BLINK 0x30
67
68 static struct resource_spec epic_res_spec[] = {
69 { SYS_RES_MEMORY, EPIC_FW_LED, RF_ACTIVE },
70 { -1, 0 }
71 };
72
73 struct epic_softc {
74 struct mtx sc_mtx;
75 struct resource *sc_res[EPIC_NREG];
76 struct cdev *sc_led_dev_alert;
77 struct cdev *sc_led_dev_power;
78 };
79
80 #define EPIC_FW_LED_READ(sc, off) ({ \
81 uint8_t __val; \
82 bus_write_1((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_ADDR, (off));\
83 bus_barrier((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_ADDR, 1, \
84 BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE); \
85 DELAY(EPIC_DELAY); \
86 __val = bus_read_1((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_DATA);\
87 bus_barrier((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_DATA, 1, \
88 BUS_SPACE_BARRIER_READ); \
89 DELAY(EPIC_DELAY); \
90 __val; \
91 })
92
93 #define EPIC_FW_LED_WRITE(sc, off, mask, val) do { \
94 bus_write_1((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_ADDR, (off));\
95 bus_barrier((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_ADDR, 1, \
96 BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE); \
97 DELAY(EPIC_DELAY); \
98 bus_write_1((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_WRITE_MASK, \
99 (mask)); \
100 bus_barrier((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_WRITE_MASK, \
101 1, BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE); \
102 DELAY(EPIC_DELAY); \
103 bus_write_1((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_DATA, (val));\
104 bus_barrier((sc)->sc_res[EPIC_FW_LED], EPIC_FW_LED_DATA, 1, \
105 BUS_SPACE_BARRIER_READ | BUS_SPACE_BARRIER_WRITE); \
106 DELAY(EPIC_DELAY); \
107 } while (0)
108
109 #define EPIC_LOCK_INIT(sc) \
110 mtx_init(&(sc)->sc_mtx, "epic mtx", NULL, MTX_DEF)
111 #define EPIC_LOCK_DESTROY(sc) mtx_destroy(&(sc)->sc_mtx)
112 #define EPIC_LOCK(sc) mtx_lock(&(sc)->sc_mtx)
113 #define EPIC_UNLOCK(sc) mtx_unlock(&(sc)->sc_mtx)
114
115 static device_probe_t epic_probe;
116 static device_attach_t epic_attach;
117 static device_detach_t epic_detach;
118
119 static void epic_led_alert(void *arg, int onoff);
120 static void epic_led_power(void *arg, int onoff);
121
122 static device_method_t epic_methods[] = {
123 /* Device interface */
124 DEVMETHOD(device_probe, epic_probe),
125 DEVMETHOD(device_attach, epic_attach),
126 DEVMETHOD(device_detach, epic_detach),
127
128 DEVMETHOD_END
129 };
130
131 static devclass_t epic_devclass;
132
133 DEFINE_CLASS_0(epic, epic_driver, epic_methods,
134 sizeof(struct epic_softc));
135 DRIVER_MODULE(epic, ebus, epic_driver, epic_devclass, 0, 0);
136
137 static int
epic_probe(device_t dev)138 epic_probe(device_t dev)
139 {
140 const char* compat;
141
142 compat = ofw_bus_get_compat(dev);
143 if (compat != NULL && strcmp(ofw_bus_get_name(dev),
144 "env-monitor") == 0 && strcmp(compat, "epic") == 0) {
145 device_set_desc(dev, "Sun Fire V215/V245 LEDs");
146 return (BUS_PROBE_DEFAULT);
147 }
148 return (ENXIO);
149 }
150
151 static int
epic_attach(device_t dev)152 epic_attach(device_t dev)
153 {
154 struct epic_softc *sc;
155
156 sc = device_get_softc(dev);
157 if (bus_alloc_resources(dev, epic_res_spec, sc->sc_res)) {
158 device_printf(dev, "failed to allocate resources\n");
159 bus_release_resources(dev, epic_res_spec, sc->sc_res);
160 return (ENXIO);
161 }
162
163 EPIC_LOCK_INIT(sc);
164
165 if (bootverbose)
166 device_printf(dev, "version 0x%x\n",
167 EPIC_FW_LED_READ(sc, EPIC_FW_VERSION));
168
169 sc->sc_led_dev_alert = led_create(epic_led_alert, sc, "alert");
170 sc->sc_led_dev_power = led_create(epic_led_power, sc, "power");
171
172 return (0);
173 }
174
175 static int
epic_detach(device_t dev)176 epic_detach(device_t dev)
177 {
178 struct epic_softc *sc;
179
180 sc = device_get_softc(dev);
181
182 led_destroy(sc->sc_led_dev_alert);
183 led_destroy(sc->sc_led_dev_power);
184
185 bus_release_resources(dev, epic_res_spec, sc->sc_res);
186
187 EPIC_LOCK_DESTROY(sc);
188
189 return (0);
190 }
191
192 static void
epic_led_alert(void * arg,int onoff)193 epic_led_alert(void *arg, int onoff)
194 {
195 struct epic_softc *sc;
196
197 sc = (struct epic_softc *)arg;
198
199 EPIC_LOCK(sc);
200 EPIC_FW_LED_WRITE(sc, EPIC_LED_STATE0, EPIC_LED_ALERT_MASK,
201 onoff ? EPIC_LED_ALERT_ON : EPIC_LED_ALERT_OFF);
202 EPIC_UNLOCK(sc);
203 }
204
205 static void
epic_led_power(void * arg,int onoff)206 epic_led_power(void *arg, int onoff)
207 {
208 struct epic_softc *sc;
209
210 sc = (struct epic_softc *)arg;
211
212 EPIC_LOCK(sc);
213 EPIC_FW_LED_WRITE(sc, EPIC_LED_STATE0, EPIC_LED_POWER_MASK,
214 onoff ? EPIC_LED_POWER_ON : EPIC_LED_POWER_OFF);
215 EPIC_UNLOCK(sc);
216 }
217