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_anywhere(dev, SYS_RES_IOPORT, &rid,
104						   PMC_ISA_PORTSIZE, RF_ACTIVE);
105	if (sc->port_res == NULL) {
106		return (ENOMEM);
107	}
108
109	return 0;
110}
111
112static void
113pmc_isa_release_resources(device_t dev)
114{
115	struct pmc_isa_softc *sc = device_get_softc(dev);
116
117	if (sc->port_res != NULL) {
118		bus_release_resource(dev, SYS_RES_IOPORT, 0, sc->port_res);
119	}
120	sc->port_res = NULL;
121}
122
123static int
124pmc_isa_probe(device_t dev)
125{
126	struct pmc_isa_softc *sc = device_get_softc(dev);
127	u_int	port;
128	u_int16_t	save, tmp;
129
130#if 0
131	if (isa_get_vendorid(dev)) {
132		return ENXIO;
133	}
134	if (device_get_unit(dev) > 0) {
135		printf("pmc: Only one PMC driver supported.\n");
136		return ENXIO;
137	}
138#endif
139	port = isa_get_port(dev);
140	if (port == -1) {
141		port = PMC_ISA_PORT;
142	}
143	if (bootverbose) {
144		device_printf(dev, "port = 0x%x\n", port);
145	}
146
147	if (bus_set_resource(dev, SYS_RES_IOPORT, 0, port, PMC_ISA_PORTSIZE)) {
148		if (bootverbose) {
149			device_printf(dev, "bus_set_resource failed\n");
150		}
151		return ENXIO;
152	}
153	if (pmc_isa_alloc_resources(dev)) {
154		if (bootverbose) {
155			device_printf(dev, "pmc_isa_alloc_resources failed\n");
156		}
157		return ENXIO;
158	}
159
160	/* Check the existence of PMC */
161	sc_outw(sc, 0, 0x0052);
162	save = sc_inw(sc, 2);
163	tmp = save & ~0x3f;
164	sc_outw(sc, 2, tmp);
165	if (sc_inw(sc, 2) != tmp) {
166		if (bootverbose) {
167			device_printf(dev, "failed to clear index(0x0052)\n");
168		}
169
170		pmc_isa_release_resources(dev);
171		return ENXIO;
172	}
173
174	tmp |= 0x3e;
175	sc_outw(sc, 2, tmp);
176	if (sc_inw(sc, 2) != tmp) {
177		if (bootverbose) {
178			device_printf(dev, "failed to set index(0x0052)\n");
179		}
180
181		pmc_isa_release_resources(dev);
182		return ENXIO;
183	}
184	sc_outw(sc, 2, save);
185
186	pmc_isa_release_resources(dev);
187
188	device_set_desc(dev, "Power Management Controller");
189	return 0;
190}
191
192static int
193pmc_isa_attach(device_t dev)
194{
195	struct pmc_isa_softc *sc = device_get_softc(dev);
196	int error;
197
198	error = pmc_isa_alloc_resources(dev);
199	if (error) {
200		device_printf(dev, "resource allocation failed\n");
201		return error;
202	}
203
204	/* Power the system off using PMC */
205	sc->evt = EVENTHANDLER_REGISTER(shutdown_final, pmc_poweroff, sc,
206					SHUTDOWN_PRI_LAST);
207	sc->flags = device_get_flags(dev);
208	return 0;
209}
210
211static int
212pmc_isa_detach(device_t dev)
213{
214	struct pmc_isa_softc *sc = device_get_softc(dev);
215
216	if (bootverbose) {
217		device_printf(dev, "pmc_isa_detach called\n");
218	}
219
220	if (sc->evt != NULL) {
221		EVENTHANDLER_DEREGISTER(shutdown_final, sc->evt);
222	}
223	sc->evt = NULL;
224
225	pmc_isa_release_resources(dev);
226	return 0;
227}
228
229static device_method_t pmc_isa_methods[] = {
230	/* Device interface */
231	DEVMETHOD(device_probe,		pmc_isa_probe),
232	DEVMETHOD(device_attach,	pmc_isa_attach),
233	DEVMETHOD(device_detach,	pmc_isa_detach),
234	{0, 0}
235};
236
237static driver_t pmc_isa_driver = {
238	"pmc",
239	pmc_isa_methods, sizeof(struct pmc_isa_softc),
240};
241
242devclass_t pmc_devclass;
243
244DRIVER_MODULE(pmc, isa, pmc_isa_driver, pmc_devclass, 0, 0);
245