pcons.c revision 1.1.10.2 1 1.1.10.2 jdolecek /* $NetBSD: pcons.c,v 1.1.10.2 2002/06/23 17:42:30 jdolecek Exp $ */
2 1.1.10.2 jdolecek
3 1.1.10.2 jdolecek /*-
4 1.1.10.2 jdolecek * Copyright (c) 2000 Eduardo E. Horvath
5 1.1.10.2 jdolecek * All rights reserved.
6 1.1.10.2 jdolecek *
7 1.1.10.2 jdolecek * Redistribution and use in source and binary forms, with or without
8 1.1.10.2 jdolecek * modification, are permitted provided that the following conditions
9 1.1.10.2 jdolecek * are met:
10 1.1.10.2 jdolecek * 1. Redistributions of source code must retain the above copyright
11 1.1.10.2 jdolecek * notice, this list of conditions and the following disclaimer.
12 1.1.10.2 jdolecek * 2. Redistributions in binary form must reproduce the above copyright
13 1.1.10.2 jdolecek * notice, this list of conditions and the following disclaimer in the
14 1.1.10.2 jdolecek * documentation and/or other materials provided with the distribution.
15 1.1.10.2 jdolecek * 3. The name of the author may not be used to endorse or promote products
16 1.1.10.2 jdolecek * derived from this software without specific prior written permission.
17 1.1.10.2 jdolecek *
18 1.1.10.2 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 1.1.10.2 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 1.1.10.2 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 1.1.10.2 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.1.10.2 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
23 1.1.10.2 jdolecek * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24 1.1.10.2 jdolecek * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
25 1.1.10.2 jdolecek * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
26 1.1.10.2 jdolecek * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 1.1.10.2 jdolecek * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 1.1.10.2 jdolecek * SUCH DAMAGE.
29 1.1.10.2 jdolecek */
30 1.1.10.2 jdolecek
31 1.1.10.2 jdolecek /*
32 1.1.10.2 jdolecek * Default console driver. Uses the PROM or whatever
33 1.1.10.2 jdolecek * driver(s) are appropriate.
34 1.1.10.2 jdolecek */
35 1.1.10.2 jdolecek
36 1.1.10.2 jdolecek #include "opt_ddb.h"
37 1.1.10.2 jdolecek
38 1.1.10.2 jdolecek #include <sys/param.h>
39 1.1.10.2 jdolecek #include <sys/systm.h>
40 1.1.10.2 jdolecek #include <sys/conf.h>
41 1.1.10.2 jdolecek #include <sys/device.h>
42 1.1.10.2 jdolecek #include <sys/file.h>
43 1.1.10.2 jdolecek #include <sys/ioctl.h>
44 1.1.10.2 jdolecek #include <sys/kernel.h>
45 1.1.10.2 jdolecek #include <sys/proc.h>
46 1.1.10.2 jdolecek #include <sys/tty.h>
47 1.1.10.2 jdolecek #include <sys/time.h>
48 1.1.10.2 jdolecek #include <sys/syslog.h>
49 1.1.10.2 jdolecek
50 1.1.10.2 jdolecek #include <machine/autoconf.h>
51 1.1.10.2 jdolecek #include <machine/promlib.h>
52 1.1.10.2 jdolecek #include <machine/conf.h>
53 1.1.10.2 jdolecek #include <machine/cpu.h>
54 1.1.10.2 jdolecek #include <machine/psl.h>
55 1.1.10.2 jdolecek
56 1.1.10.2 jdolecek #include <dev/cons.h>
57 1.1.10.2 jdolecek
58 1.1.10.2 jdolecek #include <sun2/dev/cons.h>
59 1.1.10.2 jdolecek
60 1.1.10.2 jdolecek static int pconsmatch __P((struct device *, struct cfdata *, void *));
61 1.1.10.2 jdolecek static void pconsattach __P((struct device *, struct device *, void *));
62 1.1.10.2 jdolecek
63 1.1.10.2 jdolecek struct cfattach pcons_ca = {
64 1.1.10.2 jdolecek sizeof(struct pconssoftc), pconsmatch, pconsattach
65 1.1.10.2 jdolecek };
66 1.1.10.2 jdolecek
67 1.1.10.2 jdolecek extern struct cfdriver pcons_cd;
68 1.1.10.2 jdolecek static struct cnm_state pcons_cnm_state;
69 1.1.10.2 jdolecek
70 1.1.10.2 jdolecek static int pconsprobe __P((void));
71 1.1.10.2 jdolecek extern struct consdev *cn_tab;
72 1.1.10.2 jdolecek
73 1.1.10.2 jdolecek static int
74 1.1.10.2 jdolecek pconsmatch(parent, match, aux)
75 1.1.10.2 jdolecek struct device *parent;
76 1.1.10.2 jdolecek struct cfdata *match;
77 1.1.10.2 jdolecek void *aux;
78 1.1.10.2 jdolecek {
79 1.1.10.2 jdolecek struct mainbus_attach_args *ma = aux;
80 1.1.10.2 jdolecek extern int prom_cngetc __P((dev_t));
81 1.1.10.2 jdolecek
82 1.1.10.2 jdolecek /* Only attach if no other console has attached. */
83 1.1.10.2 jdolecek return ((ma->ma_name != NULL) &&
84 1.1.10.2 jdolecek (strcmp("pcons", ma->ma_name) == 0) &&
85 1.1.10.2 jdolecek (cn_tab->cn_getc == prom_cngetc));
86 1.1.10.2 jdolecek
87 1.1.10.2 jdolecek }
88 1.1.10.2 jdolecek
89 1.1.10.2 jdolecek static void
90 1.1.10.2 jdolecek pconsattach(parent, self, aux)
91 1.1.10.2 jdolecek struct device *parent, *self;
92 1.1.10.2 jdolecek void *aux;
93 1.1.10.2 jdolecek {
94 1.1.10.2 jdolecek struct pconssoftc *sc = (struct pconssoftc *) self;
95 1.1.10.2 jdolecek
96 1.1.10.2 jdolecek printf("\n");
97 1.1.10.2 jdolecek if (!pconsprobe())
98 1.1.10.2 jdolecek return;
99 1.1.10.2 jdolecek
100 1.1.10.2 jdolecek cn_init_magic(&pcons_cnm_state);
101 1.1.10.2 jdolecek cn_set_magic("+++++");
102 1.1.10.2 jdolecek callout_init(&sc->sc_poll_ch);
103 1.1.10.2 jdolecek }
104 1.1.10.2 jdolecek
105 1.1.10.2 jdolecek static void pconsstart __P((struct tty *));
106 1.1.10.2 jdolecek static int pconsparam __P((struct tty *, struct termios *));
107 1.1.10.2 jdolecek static void pcons_poll __P((void *));
108 1.1.10.2 jdolecek
109 1.1.10.2 jdolecek int
110 1.1.10.2 jdolecek pconsopen(dev, flag, mode, p)
111 1.1.10.2 jdolecek dev_t dev;
112 1.1.10.2 jdolecek int flag, mode;
113 1.1.10.2 jdolecek struct proc *p;
114 1.1.10.2 jdolecek {
115 1.1.10.2 jdolecek struct pconssoftc *sc;
116 1.1.10.2 jdolecek int unit = minor(dev);
117 1.1.10.2 jdolecek struct tty *tp;
118 1.1.10.2 jdolecek
119 1.1.10.2 jdolecek if (unit >= pcons_cd.cd_ndevs)
120 1.1.10.2 jdolecek return ENXIO;
121 1.1.10.2 jdolecek sc = pcons_cd.cd_devs[unit];
122 1.1.10.2 jdolecek if (!sc)
123 1.1.10.2 jdolecek return ENXIO;
124 1.1.10.2 jdolecek if (!(tp = sc->of_tty))
125 1.1.10.2 jdolecek sc->of_tty = tp = ttymalloc();
126 1.1.10.2 jdolecek tp->t_oproc = pconsstart;
127 1.1.10.2 jdolecek tp->t_param = pconsparam;
128 1.1.10.2 jdolecek tp->t_dev = dev;
129 1.1.10.2 jdolecek cn_tab->cn_dev = dev;
130 1.1.10.2 jdolecek if (!(tp->t_state & TS_ISOPEN)) {
131 1.1.10.2 jdolecek ttychars(tp);
132 1.1.10.2 jdolecek tp->t_iflag = TTYDEF_IFLAG;
133 1.1.10.2 jdolecek tp->t_oflag = TTYDEF_OFLAG;
134 1.1.10.2 jdolecek tp->t_cflag = TTYDEF_CFLAG;
135 1.1.10.2 jdolecek tp->t_lflag = TTYDEF_LFLAG;
136 1.1.10.2 jdolecek tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
137 1.1.10.2 jdolecek pconsparam(tp, &tp->t_termios);
138 1.1.10.2 jdolecek ttsetwater(tp);
139 1.1.10.2 jdolecek } else if ((tp->t_state&TS_XCLUDE) && suser(p->p_ucred, &p->p_acflag))
140 1.1.10.2 jdolecek return EBUSY;
141 1.1.10.2 jdolecek tp->t_state |= TS_CARR_ON;
142 1.1.10.2 jdolecek
143 1.1.10.2 jdolecek if (!(sc->of_flags & OFPOLL)) {
144 1.1.10.2 jdolecek sc->of_flags |= OFPOLL;
145 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
146 1.1.10.2 jdolecek }
147 1.1.10.2 jdolecek
148 1.1.10.2 jdolecek return (*tp->t_linesw->l_open)(dev, tp);
149 1.1.10.2 jdolecek }
150 1.1.10.2 jdolecek
151 1.1.10.2 jdolecek int
152 1.1.10.2 jdolecek pconsclose(dev, flag, mode, p)
153 1.1.10.2 jdolecek dev_t dev;
154 1.1.10.2 jdolecek int flag, mode;
155 1.1.10.2 jdolecek struct proc *p;
156 1.1.10.2 jdolecek {
157 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
158 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
159 1.1.10.2 jdolecek
160 1.1.10.2 jdolecek callout_stop(&sc->sc_poll_ch);
161 1.1.10.2 jdolecek sc->of_flags &= ~OFPOLL;
162 1.1.10.2 jdolecek (*tp->t_linesw->l_close)(tp, flag);
163 1.1.10.2 jdolecek ttyclose(tp);
164 1.1.10.2 jdolecek return 0;
165 1.1.10.2 jdolecek }
166 1.1.10.2 jdolecek
167 1.1.10.2 jdolecek int
168 1.1.10.2 jdolecek pconsread(dev, uio, flag)
169 1.1.10.2 jdolecek dev_t dev;
170 1.1.10.2 jdolecek struct uio *uio;
171 1.1.10.2 jdolecek int flag;
172 1.1.10.2 jdolecek {
173 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
174 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
175 1.1.10.2 jdolecek
176 1.1.10.2 jdolecek return (*tp->t_linesw->l_read)(tp, uio, flag);
177 1.1.10.2 jdolecek }
178 1.1.10.2 jdolecek
179 1.1.10.2 jdolecek int
180 1.1.10.2 jdolecek pconswrite(dev, uio, flag)
181 1.1.10.2 jdolecek dev_t dev;
182 1.1.10.2 jdolecek struct uio *uio;
183 1.1.10.2 jdolecek int flag;
184 1.1.10.2 jdolecek {
185 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
186 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
187 1.1.10.2 jdolecek
188 1.1.10.2 jdolecek return (*tp->t_linesw->l_write)(tp, uio, flag);
189 1.1.10.2 jdolecek }
190 1.1.10.2 jdolecek
191 1.1.10.2 jdolecek int
192 1.1.10.2 jdolecek pconspoll(dev, events, p)
193 1.1.10.2 jdolecek dev_t dev;
194 1.1.10.2 jdolecek int events;
195 1.1.10.2 jdolecek struct proc *p;
196 1.1.10.2 jdolecek {
197 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
198 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
199 1.1.10.2 jdolecek
200 1.1.10.2 jdolecek return ((*tp->t_linesw->l_poll)(tp, events, p));
201 1.1.10.2 jdolecek }
202 1.1.10.2 jdolecek
203 1.1.10.2 jdolecek int
204 1.1.10.2 jdolecek pconsioctl(dev, cmd, data, flag, p)
205 1.1.10.2 jdolecek dev_t dev;
206 1.1.10.2 jdolecek u_long cmd;
207 1.1.10.2 jdolecek caddr_t data;
208 1.1.10.2 jdolecek int flag;
209 1.1.10.2 jdolecek struct proc *p;
210 1.1.10.2 jdolecek {
211 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
212 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
213 1.1.10.2 jdolecek int error;
214 1.1.10.2 jdolecek
215 1.1.10.2 jdolecek if ((error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, p)) >= 0)
216 1.1.10.2 jdolecek return error;
217 1.1.10.2 jdolecek if ((error = ttioctl(tp, cmd, data, flag, p)) >= 0)
218 1.1.10.2 jdolecek return error;
219 1.1.10.2 jdolecek return ENOTTY;
220 1.1.10.2 jdolecek }
221 1.1.10.2 jdolecek
222 1.1.10.2 jdolecek struct tty *
223 1.1.10.2 jdolecek pconstty(dev)
224 1.1.10.2 jdolecek dev_t dev;
225 1.1.10.2 jdolecek {
226 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
227 1.1.10.2 jdolecek
228 1.1.10.2 jdolecek return sc->of_tty;
229 1.1.10.2 jdolecek }
230 1.1.10.2 jdolecek
231 1.1.10.2 jdolecek void
232 1.1.10.2 jdolecek pconsstop(tp, flag)
233 1.1.10.2 jdolecek struct tty *tp;
234 1.1.10.2 jdolecek int flag;
235 1.1.10.2 jdolecek {
236 1.1.10.2 jdolecek }
237 1.1.10.2 jdolecek
238 1.1.10.2 jdolecek static void
239 1.1.10.2 jdolecek pconsstart(tp)
240 1.1.10.2 jdolecek struct tty *tp;
241 1.1.10.2 jdolecek {
242 1.1.10.2 jdolecek struct clist *cl;
243 1.1.10.2 jdolecek int s, len;
244 1.1.10.2 jdolecek u_char buf[OFBURSTLEN];
245 1.1.10.2 jdolecek
246 1.1.10.2 jdolecek s = spltty();
247 1.1.10.2 jdolecek if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP)) {
248 1.1.10.2 jdolecek splx(s);
249 1.1.10.2 jdolecek return;
250 1.1.10.2 jdolecek }
251 1.1.10.2 jdolecek tp->t_state |= TS_BUSY;
252 1.1.10.2 jdolecek splx(s);
253 1.1.10.2 jdolecek cl = &tp->t_outq;
254 1.1.10.2 jdolecek len = q_to_b(cl, buf, OFBURSTLEN);
255 1.1.10.2 jdolecek prom_putstr(buf, len);
256 1.1.10.2 jdolecek s = spltty();
257 1.1.10.2 jdolecek tp->t_state &= ~TS_BUSY;
258 1.1.10.2 jdolecek if (cl->c_cc) {
259 1.1.10.2 jdolecek tp->t_state |= TS_TIMEOUT;
260 1.1.10.2 jdolecek callout_reset(&tp->t_rstrt_ch, 1, ttrstrt, (void *)tp);
261 1.1.10.2 jdolecek }
262 1.1.10.2 jdolecek if (cl->c_cc <= tp->t_lowat) {
263 1.1.10.2 jdolecek if (tp->t_state & TS_ASLEEP) {
264 1.1.10.2 jdolecek tp->t_state &= ~TS_ASLEEP;
265 1.1.10.2 jdolecek wakeup(cl);
266 1.1.10.2 jdolecek }
267 1.1.10.2 jdolecek selwakeup(&tp->t_wsel);
268 1.1.10.2 jdolecek }
269 1.1.10.2 jdolecek splx(s);
270 1.1.10.2 jdolecek }
271 1.1.10.2 jdolecek
272 1.1.10.2 jdolecek static int
273 1.1.10.2 jdolecek pconsparam(tp, t)
274 1.1.10.2 jdolecek struct tty *tp;
275 1.1.10.2 jdolecek struct termios *t;
276 1.1.10.2 jdolecek {
277 1.1.10.2 jdolecek tp->t_ispeed = t->c_ispeed;
278 1.1.10.2 jdolecek tp->t_ospeed = t->c_ospeed;
279 1.1.10.2 jdolecek tp->t_cflag = t->c_cflag;
280 1.1.10.2 jdolecek return 0;
281 1.1.10.2 jdolecek }
282 1.1.10.2 jdolecek
283 1.1.10.2 jdolecek static void
284 1.1.10.2 jdolecek pcons_poll(aux)
285 1.1.10.2 jdolecek void *aux;
286 1.1.10.2 jdolecek {
287 1.1.10.2 jdolecek struct pconssoftc *sc = aux;
288 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
289 1.1.10.2 jdolecek int c;
290 1.1.10.2 jdolecek char ch;
291 1.1.10.2 jdolecek
292 1.1.10.2 jdolecek while ((c = prom_peekchar()) >= 0) {
293 1.1.10.2 jdolecek ch = c;
294 1.1.10.2 jdolecek cn_check_magic(tp->t_dev, ch, pcons_cnm_state);
295 1.1.10.2 jdolecek if (tp && (tp->t_state & TS_ISOPEN))
296 1.1.10.2 jdolecek (*tp->t_linesw->l_rint)(ch, tp);
297 1.1.10.2 jdolecek }
298 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
299 1.1.10.2 jdolecek }
300 1.1.10.2 jdolecek
301 1.1.10.2 jdolecek int
302 1.1.10.2 jdolecek pconsprobe()
303 1.1.10.2 jdolecek {
304 1.1.10.2 jdolecek switch (prom_version()) {
305 1.1.10.2 jdolecek #ifdef PROM_OLDMON
306 1.1.10.2 jdolecek case PROM_OLDMON:
307 1.1.10.2 jdolecek case PROM_OBP_V0:
308 1.1.10.2 jdolecek return (1);
309 1.1.10.2 jdolecek #endif /* PROM_OLDMON */
310 1.1.10.2 jdolecek #ifdef PROM_OBP_V2
311 1.1.10.2 jdolecek case PROM_OBP_V2:
312 1.1.10.2 jdolecek case PROM_OBP_V3:
313 1.1.10.2 jdolecek case PROM_OPENFIRM:
314 1.1.10.2 jdolecek return (prom_stdin() && prom_stdout());
315 1.1.10.2 jdolecek #endif /* PROM_OBP_V2 */
316 1.1.10.2 jdolecek default: break;
317 1.1.10.2 jdolecek }
318 1.1.10.2 jdolecek return (0);
319 1.1.10.2 jdolecek }
320 1.1.10.2 jdolecek
321 1.1.10.2 jdolecek void
322 1.1.10.2 jdolecek pcons_cnpollc(dev, on)
323 1.1.10.2 jdolecek dev_t dev;
324 1.1.10.2 jdolecek int on;
325 1.1.10.2 jdolecek {
326 1.1.10.2 jdolecek struct pconssoftc *sc = NULL;
327 1.1.10.2 jdolecek
328 1.1.10.2 jdolecek if (pcons_cd.cd_devs)
329 1.1.10.2 jdolecek sc = pcons_cd.cd_devs[minor(dev)];
330 1.1.10.2 jdolecek
331 1.1.10.2 jdolecek if (on) {
332 1.1.10.2 jdolecek if (!sc) return;
333 1.1.10.2 jdolecek if (sc->of_flags & OFPOLL)
334 1.1.10.2 jdolecek callout_stop(&sc->sc_poll_ch);
335 1.1.10.2 jdolecek sc->of_flags &= ~OFPOLL;
336 1.1.10.2 jdolecek } else {
337 1.1.10.2 jdolecek /* Resuming kernel. */
338 1.1.10.2 jdolecek if (sc && !(sc->of_flags & OFPOLL)) {
339 1.1.10.2 jdolecek sc->of_flags |= OFPOLL;
340 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
341 1.1.10.2 jdolecek }
342 1.1.10.2 jdolecek }
343 1.1.10.2 jdolecek }
344 1.1.10.2 jdolecek
345 1.1.10.2 jdolecek void pcons_dopoll __P((void));
346 1.1.10.2 jdolecek void
347 1.1.10.2 jdolecek pcons_dopoll() {
348 1.1.10.2 jdolecek pcons_poll((void*)pcons_cd.cd_devs[0]);
349 1.1.10.2 jdolecek }
350