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