pwctl.c revision 1.4 1 /* $NetBSD: pwctl.c,v 1.4 2001/05/06 14:25:15 takemura 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/param.h>
40 #include <sys/systm.h>
41 #include <sys/device.h>
42
43 #include <machine/bus.h>
44 #include <machine/config_hook.h>
45 #include <machine/platid.h>
46 #include <machine/platid_mask.h>
47
48 #include <dev/hpc/hpciovar.h>
49
50 #include "locators.h"
51
52 #define PWCTLVRGIUDEBUG
53 #ifdef PWCTLVRGIUDEBUG
54 int pwctl_debug = 0;
55 #define DPRINTF(arg) if (pwctl_debug) printf arg;
56 #else
57 #define DPRINTF(arg)
58 #endif
59
60 struct pwctl_softc {
61 struct device sc_dev;
62 hpcio_chip_t sc_hc;
63 int sc_port;
64 long sc_id;
65 int sc_on, sc_off;
66 config_hook_tag sc_hook_tag;
67 config_hook_tag sc_hook_hardpower;
68 config_hook_tag sc_ghook_tag;
69 int sc_save;
70 int sc_initvalue;
71 };
72
73 static int pwctl_match __P((struct device *, struct cfdata *,
74 void *));
75 static void pwctl_attach __P((struct device *, struct device *,
76 void *));
77 static int pwctl_hook __P((void *ctx, int type, long id,
78 void *msg));
79 static int pwctl_ghook __P((void *ctx, int type, long id,
80 void *msg));
81 int pwctl_hardpower __P((void *, int, long, void *));
82
83 struct cfattach pwctl_ca = {
84 sizeof(struct pwctl_softc), pwctl_match, pwctl_attach
85 };
86
87 int
88 pwctl_match(parent, match, aux)
89 struct device *parent;
90 struct cfdata *match;
91 void *aux;
92 {
93 struct hpcio_attach_args *haa = aux;
94 platid_mask_t mask;
95
96 if (strcmp(haa->haa_busname, HPCIO_BUSNAME))
97 return 0;
98 if (match->cf_loc[HPCIOIFCF_PLATFORM] == 0)
99 return 0;
100 mask = PLATID_DEREF(match->cf_loc[HPCIOIFCF_PLATFORM]);
101 if (!platid_match(&platid, &mask))
102 return 0;
103 return 1;
104 }
105
106 void
107 pwctl_attach(parent, self, aux)
108 struct device *parent;
109 struct device *self;
110 void *aux;
111 {
112 struct hpcio_attach_args *haa = aux;
113 int *loc;
114 struct pwctl_softc *sc = (void*)self;
115
116 loc = sc->sc_dev.dv_cfdata->cf_loc;
117 sc->sc_hc = (*haa->haa_getchip)(haa->haa_sc, loc[HPCIOIFCF_IOCHIP]);
118 sc->sc_port = loc[HPCIOIFCF_PORT];
119 sc->sc_id = loc[HPCIOIFCF_ID];
120 sc->sc_on = loc[HPCIOIFCF_ACTIVE] ? 1 : 0;
121 sc->sc_off = loc[HPCIOIFCF_ACTIVE] ? 0 : 1;
122 sc->sc_initvalue = loc[HPCIOIFCF_INITVALUE];
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,
134 pwctl_hook, sc);
135 sc->sc_ghook_tag = config_hook(CONFIG_HOOK_GET,
136 sc->sc_id, CONFIG_HOOK_SHARE,
137 pwctl_ghook, sc);
138 sc->sc_hook_hardpower = config_hook(CONFIG_HOOK_PMEVENT,
139 CONFIG_HOOK_PMEVENT_HARDPOWER,
140 CONFIG_HOOK_SHARE,
141 pwctl_hardpower, sc);
142
143 }
144 if (sc->sc_initvalue != -1)
145 hpcio_portwrite(sc->sc_hc, sc->sc_port,
146 sc->sc_initvalue ? sc->sc_on : sc->sc_off);
147 printf("\n");
148 }
149
150 int
151 pwctl_hook(ctx, type, id, msg)
152 void *ctx;
153 int type;
154 long id;
155 void *msg;
156 {
157 struct pwctl_softc *sc = ctx;
158
159 DPRINTF(("pwctl hook: port %d %s(%d)", sc->sc_port,
160 msg ? "ON" : "OFF", msg ? sc->sc_on : sc->sc_off));
161 hpcio_portwrite(sc->sc_hc, sc->sc_port,
162 msg ? sc->sc_on : sc->sc_off);
163 return (0);
164 }
165
166 int
167 pwctl_ghook(ctx, type, id, msg)
168 void *ctx;
169 int type;
170 long id;
171 void *msg;
172 {
173 struct pwctl_softc *sc = ctx;
174
175 if (CONFIG_HOOK_VALUEP(msg))
176 return 1;
177
178 *(int*)msg = hpcio_portread(sc->sc_hc, sc->sc_port) == sc->sc_on;
179 DPRINTF(("pwctl ghook: port %d %s(%d)", sc->sc_port,
180 *(int*)msg? "ON" : "OFF", *(int*)msg ? sc->sc_on : sc->sc_off));
181 return 0;
182 }
183
184 int
185 pwctl_hardpower(ctx, type, id, msg)
186 void *ctx;
187 int type;
188 long id;
189 void *msg;
190 {
191 struct pwctl_softc *sc = ctx;
192 int why =(int)msg;
193
194 #if 0
195 /* XXX debug print cause hang system... Huum...*/
196 DPRINTF(("pwctl hardpower: port %d %s: %s(%d)\n", sc->sc_port,
197 why == PWR_RESUME? "resume"
198 : why == PWR_SUSPEND? "suspend" : "standby",
199 sc->sc_save == sc->sc_on ? "on": "off", sc->sc_save));
200 #endif /* 0 */
201 switch (why) {
202 case PWR_STANDBY:
203 break;
204 case PWR_SUSPEND:
205 sc->sc_save = hpcio_portread(sc->sc_hc, sc->sc_port);
206 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_off);
207 break;
208 case PWR_RESUME:
209 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_save);
210 break;
211 }
212 return (0);
213 }
214