1/* $NetBSD: pwctl.c,v 1.19 2009/05/12 14:22:39 cegger 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.19 2009/05/12 14:22:39 cegger Exp $"); 41 42#ifdef _KERNEL_OPT 43#include "opt_pwctl.h" 44#endif 45 46#include <sys/param.h> 47#include <sys/systm.h> 48#include <sys/device.h> 49#include <sys/reboot.h> 50 51#include <sys/bus.h> 52#include <machine/config_hook.h> 53#include <machine/platid.h> 54#include <machine/platid_mask.h> 55 56#include <dev/hpc/hpciovar.h> 57 58#include "locators.h" 59 60#ifdef PWCTLDEBUG 61#ifndef PWCTLDEBUG_CONF 62#define PWCTLDEBUG_CONF 0 63#endif 64int pwctl_debug = PWCTLDEBUG_CONF; 65#define DPRINTF(arg) if (pwctl_debug) printf arg; 66#define VPRINTF(arg) if (bootverbose) printf arg; 67#else 68#define DPRINTF(arg) 69#define VPRINTF(arg) if (bootverbose) printf arg; 70#endif 71 72struct pwctl_softc { 73 hpcio_chip_t sc_hc; 74 int sc_port; 75 long sc_id; 76 int sc_on, sc_off; 77 config_hook_tag sc_hook_tag; 78 config_hook_tag sc_hook_hardpower; 79 config_hook_tag sc_ghook_tag; 80 int sc_save; 81 int sc_initvalue; 82}; 83 84static int pwctl_match(device_t, cfdata_t, void *); 85static void pwctl_attach(device_t, device_t, void *); 86static int pwctl_hook(void *, int, long, void *); 87static int pwctl_ghook(void *, int, long, void *); 88int pwctl_hardpower(void *, int, long, void *); 89 90CFATTACH_DECL_NEW(pwctl, sizeof(struct pwctl_softc), 91 pwctl_match, pwctl_attach, NULL, NULL); 92 93int 94pwctl_match(device_t parent, cfdata_t match, void *aux) 95{ 96 struct hpcio_attach_args *haa = aux; 97 platid_mask_t mask; 98 99 if (strcmp(haa->haa_busname, HPCIO_BUSNAME)) 100 return (0); 101 if (match->cf_loc[HPCIOIFCF_PLATFORM] == 0) 102 return (0); 103 mask = PLATID_DEREF(match->cf_loc[HPCIOIFCF_PLATFORM]); 104 if (!platid_match(&platid, &mask)) 105 return (0); 106 return (1); 107} 108 109void 110pwctl_attach(device_t parent, device_t self, void *aux) 111{ 112 struct hpcio_attach_args *haa = aux; 113 int *loc; 114 struct pwctl_softc *sc = device_private(self); 115 116 loc = device_cfdata(self)->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 124 printf(" port=%d id=%ld on=%d%s", 125 sc->sc_port, sc->sc_id, sc->sc_on, 126 sc->sc_initvalue == -1 ? "" : 127 sc->sc_initvalue ? " init=on" : " init=off"); 128 129 if (sc->sc_port == HPCIOIFCF_PORT_DEFAULT || 130 sc->sc_id == HPCIOIFCF_ID_DEFAULT) { 131 printf(" (ignored)"); 132 } else { 133 sc->sc_hook_tag = config_hook(CONFIG_HOOK_POWERCONTROL, 134 sc->sc_id, CONFIG_HOOK_SHARE, pwctl_hook, sc); 135 sc->sc_ghook_tag = config_hook(CONFIG_HOOK_GET, 136 sc->sc_id, CONFIG_HOOK_SHARE, pwctl_ghook, sc); 137 sc->sc_hook_hardpower = config_hook(CONFIG_HOOK_PMEVENT, 138 CONFIG_HOOK_PMEVENT_HARDPOWER, CONFIG_HOOK_SHARE, 139 pwctl_hardpower, sc); 140 } 141 142 if (sc->sc_initvalue != -1) 143 hpcio_portwrite(sc->sc_hc, sc->sc_port, 144 sc->sc_initvalue ? sc->sc_on : sc->sc_off); 145 printf("\n"); 146} 147 148int 149pwctl_hook(void *ctx, int type, long id, void *msg) 150{ 151 struct pwctl_softc *sc = ctx; 152 153 DPRINTF(("pwctl hook: port %d %s(%d)", sc->sc_port, 154 msg ? "ON" : "OFF", msg ? sc->sc_on : sc->sc_off)); 155 hpcio_portwrite(sc->sc_hc, sc->sc_port, 156 msg ? sc->sc_on : sc->sc_off); 157 158 return (0); 159} 160 161int 162pwctl_ghook(void *ctx, int type, long id, void *msg) 163{ 164 struct pwctl_softc *sc = ctx; 165 166 if (CONFIG_HOOK_VALUEP(msg)) 167 return (1); 168 169 *(int*)msg = hpcio_portread(sc->sc_hc, sc->sc_port) == sc->sc_on; 170 DPRINTF(("pwctl ghook: port %d %s(%d)", sc->sc_port, 171 *(int*)msg? "ON" : "OFF", *(int*)msg ? sc->sc_on : sc->sc_off)); 172 173 return (0); 174} 175 176int 177pwctl_hardpower(void *ctx, int type, long id, void *msg) 178{ 179 struct pwctl_softc *sc = ctx; 180 int why =(int)msg; 181 182 VPRINTF(("pwctl hardpower: port %d %s: %s(%d)\n", sc->sc_port, 183 why == PWR_RESUME? "resume" 184 : why == PWR_SUSPEND? "suspend" : "standby", 185 sc->sc_save == sc->sc_on ? "on": "off", sc->sc_save)); 186 187 switch (why) { 188 case PWR_STANDBY: 189 break; 190 case PWR_SUSPEND: 191 sc->sc_save = hpcio_portread(sc->sc_hc, sc->sc_port); 192 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_off); 193 break; 194 case PWR_RESUME: 195 hpcio_portwrite(sc->sc_hc, sc->sc_port, sc->sc_save); 196 break; 197 } 198 199 return (0); 200} 201