pwctl.c revision 1.8 1 /* $NetBSD: pwctl.c,v 1.8 2001/11/13 12:47:56 lukem Exp $ */
2
3 /*-
4 * Copyright (c) 1999-2001
5 * TAKEMURA Shin and PocketBSD Project. All rights reserved.
6 * Copyright (c) 2000,2001
7 * SATO Kazumi. All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3. All advertising materials mentioning features or use of this software
18 * must display the following acknowledgement:
19 * This product includes software developed by the PocketBSD project
20 * and its contributors.
21 * 4. Neither the name of the project nor the names of its contributors
22 * may be used to endorse or promote products derived from this software
23 * without specific prior written permission.
24 *
25 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
26 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
27 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
28 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
29 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
30 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
31 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
32 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
33 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
34 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
35 * SUCH DAMAGE.
36 *
37 */
38
39 #include <sys/cdefs.h>
40 __KERNEL_RCSID(0, "$NetBSD: pwctl.c,v 1.8 2001/11/13 12:47:56 lukem Exp $");
41
42 #include <sys/param.h>
43 #include <sys/systm.h>
44 #include <sys/device.h>
45 #include <sys/reboot.h>
46
47 #include <machine/bus.h>
48 #include <machine/config_hook.h>
49 #include <machine/platid.h>
50 #include <machine/platid_mask.h>
51
52 #include <dev/hpc/hpciovar.h>
53
54 #include "locators.h"
55
56 #define PWCTLDEBUG
57 #ifndef PWCTLDEBUG_CONF
58 #define PWCTLDEBUG_CONF 0
59 #endif
60 #ifdef PWCTLDEBUG
61 int pwctl_debug = PWCTLDEBUG_CONF;
62 #define DPRINTF(arg) if (pwctl_debug) printf arg;
63 #define VPRINTF(arg) if (bootverbose) printf arg;
64 #else
65 #define DPRINTF(arg)
66 #define VPRINTF(arg) if (bootverbose) printf arg;
67 #endif
68
69 struct pwctl_softc {
70 struct device sc_dev;
71 hpcio_chip_t sc_hc;
72 int sc_port;
73 long sc_id;
74 int sc_on, sc_off;
75 config_hook_tag sc_hook_tag;
76 config_hook_tag sc_hook_hardpower;
77 config_hook_tag sc_ghook_tag;
78 int sc_save;
79 int sc_initvalue;
80 };
81
82 static int pwctl_match(struct device *, struct cfdata *, void *);
83 static void pwctl_attach(struct device *, struct device *, void *);
84 static int pwctl_hook(void *, int, long, void *);
85 static int pwctl_ghook(void *, int, long, void *);
86 int pwctl_hardpower(void *, int, long, void *);
87
88 struct cfattach pwctl_ca = {
89 sizeof(struct pwctl_softc), pwctl_match, pwctl_attach
90 };
91
92 int
93 pwctl_match(struct device *parent, struct cfdata *match, void *aux)
94 {
95 struct hpcio_attach_args *haa = aux;
96 platid_mask_t mask;
97
98 if (strcmp(haa->haa_busname, HPCIO_BUSNAME))
99 return (0);
100 if (match->cf_loc[HPCIOIFCF_PLATFORM] == 0)
101 return (0);
102 mask = PLATID_DEREF(match->cf_loc[HPCIOIFCF_PLATFORM]);
103 if (!platid_match(&platid, &mask))
104 return (0);
105 return (1);
106 }
107
108 void
109 pwctl_attach(struct device *parent, struct device *self, void *aux)
110 {
111 struct hpcio_attach_args *haa = aux;
112 int *loc;
113 struct pwctl_softc *sc = (void*)self;
114
115 loc = sc->sc_dev.dv_cfdata->cf_loc;
116 sc->sc_hc = (*haa->haa_getchip)(haa->haa_sc, loc[HPCIOIFCF_IOCHIP]);
117 sc->sc_port = loc[HPCIOIFCF_PORT];
118 sc->sc_id = loc[HPCIOIFCF_ID];
119 sc->sc_on = loc[HPCIOIFCF_ACTIVE] ? 1 : 0;
120 sc->sc_off = loc[HPCIOIFCF_ACTIVE] ? 0 : 1;
121 sc->sc_initvalue = loc[HPCIOIFCF_INITVALUE];
122
123 printf(" port=%d id=%ld on=%d%s",
124 sc->sc_port, sc->sc_id, sc->sc_on,
125 sc->sc_initvalue == -1 ? "" :
126 sc->sc_initvalue ? " init=on" : " init=off");
127
128 if (sc->sc_port == HPCIOIFCF_PORT_DEFAULT ||
129 sc->sc_id == HPCIOIFCF_ID_DEFAULT) {
130 printf(" (ignored)");
131 } else {
132 sc->sc_hook_tag = config_hook(CONFIG_HOOK_POWERCONTROL,
133 sc->sc_id, CONFIG_HOOK_SHARE, pwctl_hook, sc);
134 sc->sc_ghook_tag = config_hook(CONFIG_HOOK_GET,
135 sc->sc_id, CONFIG_HOOK_SHARE, pwctl_ghook, sc);
136 sc->sc_hook_hardpower = config_hook(CONFIG_HOOK_PMEVENT,
137 CONFIG_HOOK_PMEVENT_HARDPOWER, CONFIG_HOOK_SHARE,
138 pwctl_hardpower, sc);
139 }
140
141 if (sc->sc_initvalue != -1)
142 hpcio_portwrite(sc->sc_hc, sc->sc_port,
143 sc->sc_initvalue ? sc->sc_on : sc->sc_off);
144 printf("\n");
145 }
146
147 int
148 pwctl_hook(void *ctx, int type, long id, void *msg)
149 {
150 struct pwctl_softc *sc = ctx;
151
152 DPRINTF(("pwctl hook: port %d %s(%d)", sc->sc_port,
153 msg ? "ON" : "OFF", msg ? sc->sc_on : sc->sc_off));
154 hpcio_portwrite(sc->sc_hc, sc->sc_port,
155 msg ? sc->sc_on : sc->sc_off);
156
157 return (0);
158 }
159
160 int
161 pwctl_ghook(void *ctx, int type, long id, void *msg)
162 {
163 struct pwctl_softc *sc = ctx;
164
165 if (CONFIG_HOOK_VALUEP(msg))
166 return (1);
167
168 *(int*)msg = hpcio_portread(sc->sc_hc, sc->sc_port) == sc->sc_on;
169 DPRINTF(("pwctl ghook: port %d %s(%d)", sc->sc_port,
170 *(int*)msg? "ON" : "OFF", *(int*)msg ? sc->sc_on : sc->sc_off));
171
172 return (0);
173 }
174
175 int
176 pwctl_hardpower(void *ctx, int type, long id, void *msg)
177 {
178 struct pwctl_softc *sc = ctx;
179 int why =(int)msg;
180
181 VPRINTF(("pwctl hardpower: port %d %s: %s(%d)\n", sc->sc_port,
182 why == PWR_RESUME? "resume"
183 : why == PWR_SUSPEND? "suspend" : "standby",
184 sc->sc_save == sc->sc_on ? "on": "off", sc->sc_save));
185
186 switch (why) {
187 case PWR_STANDBY:
188 break;
189 case PWR_SUSPEND:
190 sc->sc_save = hpcio_portread(sc->sc_hc, sc->sc_port);
191 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_off);
192 break;
193 case PWR_RESUME:
194 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_save);
195 break;
196 }
197
198 return (0);
199 }
200