1/*- 2 * PMC (Power Management Controller of NEC PC-98Note) Driver 3 * 4 * Copyright (c) 2001 Chiharu Shibata. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. The name of the author may not be used to endorse or promote products 16 * derived from this software without specific prior written permission 17 * 18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 28 * SUCH DAMAGE. 29 * 30 * $FreeBSD$ 31 */ 32 33#include <sys/param.h> 34#include <sys/systm.h> 35#include <sys/eventhandler.h> 36#include <sys/kernel.h> 37#include <sys/module.h> 38#include <sys/bus.h> 39#include <sys/types.h> 40#include <sys/conf.h> 41#include <sys/reboot.h> 42 43#include <machine/bus.h> 44#include <machine/resource.h> 45#include <sys/rman.h> 46 47#include <isa/isavar.h> 48 49struct pmc_isa_softc { 50 struct resource *port_res; 51 eventhandler_tag evt; 52 int flags; 53}; 54 55static int pmc_isa_alloc_resources(device_t); 56static void pmc_isa_release_resources(device_t); 57static int pmc_isa_probe(device_t); 58static int pmc_isa_attach(device_t); 59static int pmc_isa_detach(device_t); 60 61#define PMC_ISA_PORT 0x8f0 62#define PMC_ISA_PORTSIZE 4 63 64#define sc_inw(sc, port) \ 65 bus_space_read_2(rman_get_bustag((sc)->port_res), \ 66 rman_get_bushandle((sc)->port_res), (port)) 67 68#define sc_outw(sc, port, value) \ 69 bus_space_write_2(rman_get_bustag((sc)->port_res), \ 70 rman_get_bushandle((sc)->port_res), (port), (value)) 71 72static void 73pmc_poweroff(void *arg, int howto) 74{ 75 struct pmc_isa_softc *sc = (struct pmc_isa_softc *)arg; 76 77 if (!sc->flags) { 78 outb(0x5e8e, inb(0x5e8e) & ~0x11); /* FDD LED off */ 79 } 80 81 if (!(howto & RB_POWEROFF)) { 82 return; 83 } 84 85 sc_outw(sc, 0, 0x0044); 86 sc_outw(sc, 2, 1 << 10); 87#if 1 88 /* for 9801NS/T */ 89 sc_outw(sc, 0, 0xf00a); 90 sc_outw(sc, 2, 1 << 9); 91#endif 92} 93 94static int 95pmc_isa_alloc_resources(device_t dev) 96{ 97 struct pmc_isa_softc *sc = device_get_softc(dev); 98 int rid; 99 100 bzero(sc, sizeof(*sc)); 101 102 rid = 0; 103 sc->port_res = bus_alloc_resource(dev, SYS_RES_IOPORT, &rid, 104 0ul, ~0ul, PMC_ISA_PORTSIZE, 105 RF_ACTIVE); 106 if (sc->port_res == NULL) { 107 return (ENOMEM); 108 } 109 110 return 0; 111} 112 113static void 114pmc_isa_release_resources(device_t dev) 115{ 116 struct pmc_isa_softc *sc = device_get_softc(dev); 117 118 if (sc->port_res != NULL) { 119 bus_release_resource(dev, SYS_RES_IOPORT, 0, sc->port_res); 120 } 121 sc->port_res = NULL; 122} 123 124static int 125pmc_isa_probe(device_t dev) 126{ 127 struct pmc_isa_softc *sc = device_get_softc(dev); 128 u_int port; 129 u_int16_t save, tmp; 130 131#if 0 132 if (isa_get_vendorid(dev)) { 133 return ENXIO; 134 } 135 if (device_get_unit(dev) > 0) { 136 printf("pmc: Only one PMC driver supported.\n"); 137 return ENXIO; 138 } 139#endif 140 port = isa_get_port(dev); 141 if (port == -1) { 142 port = PMC_ISA_PORT; 143 } 144 if (bootverbose) { 145 device_printf(dev, "port = 0x%x\n", port); 146 } 147 148 if (bus_set_resource(dev, SYS_RES_IOPORT, 0, port, PMC_ISA_PORTSIZE)) { 149 if (bootverbose) { 150 device_printf(dev, "bus_set_resource failed\n"); 151 } 152 return ENXIO; 153 } 154 if (pmc_isa_alloc_resources(dev)) { 155 if (bootverbose) { 156 device_printf(dev, "pmc_isa_alloc_resources failed\n"); 157 } 158 return ENXIO; 159 } 160 161 /* Check the existence of PMC */ 162 sc_outw(sc, 0, 0x0052); 163 save = sc_inw(sc, 2); 164 tmp = save & ~0x3f; 165 sc_outw(sc, 2, tmp); 166 if (sc_inw(sc, 2) != tmp) { 167 if (bootverbose) { 168 device_printf(dev, "failed to clear index(0x0052)\n"); 169 } 170 171 pmc_isa_release_resources(dev); 172 return ENXIO; 173 } 174 175 tmp |= 0x3e; 176 sc_outw(sc, 2, tmp); 177 if (sc_inw(sc, 2) != tmp) { 178 if (bootverbose) { 179 device_printf(dev, "failed to set index(0x0052)\n"); 180 } 181 182 pmc_isa_release_resources(dev); 183 return ENXIO; 184 } 185 sc_outw(sc, 2, save); 186 187 pmc_isa_release_resources(dev); 188 189 device_set_desc(dev, "Power Management Controller"); 190 return 0; 191} 192 193static int 194pmc_isa_attach(device_t dev) 195{ 196 struct pmc_isa_softc *sc = device_get_softc(dev); 197 int error; 198 199 error = pmc_isa_alloc_resources(dev); 200 if (error) { 201 device_printf(dev, "resource allocation failed\n"); 202 return error; 203 } 204 205 /* Power the system off using PMC */ 206 sc->evt = EVENTHANDLER_REGISTER(shutdown_final, pmc_poweroff, sc, 207 SHUTDOWN_PRI_LAST); 208 sc->flags = device_get_flags(dev); 209 return 0; 210} 211 212static int 213pmc_isa_detach(device_t dev) 214{ 215 struct pmc_isa_softc *sc = device_get_softc(dev); 216 217 if (bootverbose) { 218 device_printf(dev, "pmc_isa_detach called\n"); 219 } 220 221 if (sc->evt != NULL) { 222 EVENTHANDLER_DEREGISTER(shutdown_final, sc->evt); 223 } 224 sc->evt = NULL; 225 226 pmc_isa_release_resources(dev); 227 return 0; 228} 229 230static device_method_t pmc_isa_methods[] = { 231 /* Device interface */ 232 DEVMETHOD(device_probe, pmc_isa_probe), 233 DEVMETHOD(device_attach, pmc_isa_attach), 234 DEVMETHOD(device_detach, pmc_isa_detach), 235 {0, 0} 236}; 237 238static driver_t pmc_isa_driver = { 239 "pmc", 240 pmc_isa_methods, sizeof(struct pmc_isa_softc), 241}; 242 243devclass_t pmc_devclass; 244 245DRIVER_MODULE(pmc, isa, pmc_isa_driver, pmc_devclass, 0, 0); 246