xref: /openbsd/sys/dev/pci/wdt.c (revision 09467b48)
1 /*	$OpenBSD: wdt.c,v 1.24 2020/01/05 01:07:59 jsg Exp $	*/
2 
3 /*-
4  * Copyright (c) 1998,1999 Alex Nash
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  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  */
29 
30 #include <sys/param.h>
31 #include <sys/device.h>
32 #include <sys/kernel.h>
33 #include <sys/systm.h>
34 
35 #include <machine/bus.h>
36 
37 #include <dev/pci/pcivar.h>
38 #include <dev/pci/pcireg.h>
39 #include <dev/pci/pcidevs.h>
40 
41 struct wdt_softc {
42 	/* wdt_dev must be the first item in the struct */
43 	struct device		sc_dev;
44 
45 	/* feature set: 0 = none   1 = temp, buzzer, etc. */
46 	int			sc_features;
47 
48 	/* device access through bus space */
49 	bus_space_tag_t		sc_iot;
50 	bus_space_handle_t	sc_ioh;
51 };
52 
53 int	wdt_probe(struct device *, void *, void *);
54 void	wdt_attach(struct device *, struct device *, void *);
55 int	wdt_activate(struct device *, int);
56 
57 int	wdt_is501(struct wdt_softc *);
58 void	wdt_8254_count(struct wdt_softc *, int, u_int16_t);
59 void	wdt_8254_mode(struct wdt_softc *, int, int);
60 int	wdt_set_timeout(void *, int);
61 void	wdt_init_timer(struct wdt_softc *);
62 void	wdt_buzzer_off(struct wdt_softc *);
63 void	wdt_timer_disable(struct wdt_softc *);
64 void	wdt_buzzer_enable(struct wdt_softc *);
65 
66 struct cfattach wdt_ca = {
67 	sizeof(struct wdt_softc), wdt_probe, wdt_attach,
68 	NULL, wdt_activate
69 };
70 
71 struct cfdriver wdt_cd = {
72 	NULL, "wdt", DV_DULL
73 };
74 
75 const struct pci_matchid wdt_devices[] = {
76 	{ PCI_VENDOR_INDCOMPSRC, PCI_PRODUCT_INDCOMPSRC_WDT50X }
77 };
78 
79 /*
80  *	8254 counter mappings
81  */
82 #define WDT_8254_TC_LO		0	/* low 16 bits of timeout counter  */
83 #define	WDT_8254_TC_HI		1	/* high 16 bits of timeout counter */
84 #define WDT_8254_BUZZER		2
85 
86 /*
87  *	WDT500/501 ports
88  */
89 #define WDT_8254_BASE		0
90 #define WDT_8254_CTL		(WDT_8254_BASE + 3)
91 #define WDT_DISABLE_TIMER	7
92 #define WDT_ENABLE_TIMER	7
93 
94 /*
95  *	WDT501 specific ports
96  */
97 #define WDT_STATUS_REG		4
98 #define WDT_START_BUZZER	4
99 #define WDT_TEMPERATURE		5
100 #define WDT_STOP_BUZZER		5
101 
102 int
103 wdt_probe(struct device *parent, void *match, void *aux)
104 {
105 	return (pci_matchbyid((struct pci_attach_args *)aux, wdt_devices,
106 	    nitems(wdt_devices)));
107 }
108 
109 void
110 wdt_attach(struct device *parent, struct device *self, void *aux)
111 {
112 	struct wdt_softc *wdt = (struct wdt_softc *)self;
113 	struct pci_attach_args *const pa = (struct pci_attach_args *)aux;
114 	bus_size_t iosize;
115 
116 	/* retrieve the I/O region (BAR2) */
117 	if (pci_mapreg_map(pa, 0x18, PCI_MAPREG_TYPE_IO, 0,
118 	    &wdt->sc_iot, &wdt->sc_ioh, NULL, &iosize, 0) != 0) {
119 		printf("%s: couldn't find PCI I/O region\n",
120 		    wdt->sc_dev.dv_xname);
121 		return;
122 	}
123 
124 	/* sanity check I/O size */
125 	if (iosize != (bus_size_t)16) {
126 		printf("%s: invalid I/O region size\n",
127 		    wdt->sc_dev.dv_xname);
128 		return;
129 	}
130 
131 	/* initialize the watchdog timer structure */
132 
133 	/* check the feature set available */
134 	if (wdt_is501(wdt))
135 		wdt->sc_features = 1;
136 	else
137 		wdt->sc_features = 0;
138 
139 	if (wdt->sc_features) {
140 		/*
141 		 * turn off the buzzer, it may have been activated
142 		 * by a previous timeout
143 		 */
144 		wdt_buzzer_off(wdt);
145 
146 		wdt_buzzer_enable(wdt);
147 	}
148 
149 	/* initialize the timer modes and the lower 16-bit counter */
150 	wdt_init_timer(wdt);
151 
152 	/*
153 	 * ensure that the watchdog is disabled
154 	 */
155 	wdt_timer_disable(wdt);
156 
157 	/*
158 	 * register with the watchdog framework
159 	 */
160 	wdog_register(wdt_set_timeout, wdt);
161 }
162 
163 int
164 wdt_activate(struct device *self, int act)
165 {
166 	switch (act) {
167 	case DVACT_POWERDOWN:
168 		wdog_shutdown(self);
169 		break;
170 	}
171 
172 	return (0);
173 }
174 
175 /*
176  *	wdt_is501
177  *
178  *	Returns non-zero if the card is a 501 model.
179  */
180 int
181 wdt_is501(struct wdt_softc *wdt)
182 {
183 	/*
184 	 *	It makes too much sense to detect the card type
185 	 *	by the device ID, so we have to resort to testing
186 	 *	the presence of a register to determine the type.
187 	 */
188 	int v = bus_space_read_1(wdt->sc_iot, wdt->sc_ioh, WDT_TEMPERATURE);
189 
190 	/* XXX may not be reliable */
191 	if (v == 0 || v == 0xFF)
192 		return(0);
193 
194 	return(1);
195 }
196 
197 /*
198  *	wdt_8254_count
199  *
200  *	Loads the specified counter with the 16-bit value 'v'.
201  */
202 void
203 wdt_8254_count(struct wdt_softc *wdt, int counter, u_int16_t v)
204 {
205 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh,
206 			WDT_8254_BASE + counter, v & 0xFF);
207 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh, WDT_8254_BASE + counter, v >> 8);
208 }
209 
210 /*
211  *	wdt_8254_mode
212  *
213  *	Sets the mode of the specified counter.
214  */
215 void
216 wdt_8254_mode(struct wdt_softc *wdt, int counter, int mode)
217 {
218 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh, WDT_8254_CTL,
219 		(counter << 6) | 0x30 | (mode << 1));
220 }
221 
222 /*
223  *	wdt_set_timeout
224  *
225  *	Load the watchdog timer with the specified number of seconds.
226  *	Clamp seconds to be in the interval [2; 1800].
227  */
228 int
229 wdt_set_timeout(void *self, int seconds)
230 {
231 	struct wdt_softc *wdt = (struct wdt_softc *)self;
232 
233 	u_int16_t v;
234 	int s;
235 
236 	s = splclock();
237 
238 	wdt_timer_disable(wdt);
239 
240 	if (seconds == 0) {
241 		splx(s);
242 		return (0);
243 	} else if (seconds < 2)
244 		seconds = 2;
245 	else if (seconds > 1800)
246 		seconds = 1800;
247 
248 	/* 8254 has been programmed with a 2ms period */
249 	v = (u_int16_t)seconds * 50;
250 
251 	/* load the new timeout count */
252 	wdt_8254_count(wdt, WDT_8254_TC_HI, v);
253 
254 	/* enable the timer */
255 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh, WDT_ENABLE_TIMER, 0);
256 
257 	splx(s);
258 
259 	return (seconds);
260 }
261 
262 /*
263  *	wdt_timer_disable
264  *
265  *	Disables the watchdog timer and cancels the scheduled (if any)
266  *	kernel timeout.
267  */
268 void
269 wdt_timer_disable(struct wdt_softc *wdt)
270 {
271 	(void)bus_space_read_1(wdt->sc_iot, wdt->sc_ioh, WDT_DISABLE_TIMER);
272 }
273 
274 /*
275  *	wdt_init_timer
276  *
277  *	Configure the modes for the watchdog counters and initialize
278  *	the low 16-bits of the watchdog counter to have a period of
279  *	approximately 1/50th of a second.
280  */
281 void
282 wdt_init_timer(struct wdt_softc *wdt)
283 {
284 	wdt_8254_mode(wdt, WDT_8254_TC_LO, 3);
285 	wdt_8254_mode(wdt, WDT_8254_TC_HI, 2);
286 	wdt_8254_count(wdt, WDT_8254_TC_LO, 41666);
287 }
288 
289 /*******************************************************************
290  *	WDT501 specific functions
291  *******************************************************************/
292 
293 /*
294  *	wdt_buzzer_off
295  *
296  *	Turns the buzzer off.
297  */
298 void
299 wdt_buzzer_off(struct wdt_softc *wdt)
300 {
301 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh, WDT_STOP_BUZZER, 0);
302 }
303 
304 #ifndef WDT_DISABLE_BUZZER
305 /*
306  *	wdt_buzzer_enable
307  *
308  *	Enables the buzzer when the watchdog counter expires.
309  */
310 void
311 wdt_buzzer_enable(struct wdt_softc *wdt)
312 {
313 	bus_space_write_1(wdt->sc_iot, wdt->sc_ioh, WDT_8254_BUZZER, 1);
314 	wdt_8254_mode(wdt, WDT_8254_BUZZER, 1);
315 }
316 #else
317 /*
318  *	wdt_buzzer_disable
319  *
320  *	Disables the buzzer from sounding when the watchdog counter
321  *	expires.
322  */
323 void
324 wdt_buzzer_disable(struct wdt_softc *wdt)
325 {
326 	wdt_8254_mode(wdt, WDT_8254_BUZZER, 0);
327 }
328 #endif
329