pcons.c revision 1.1.10.3 1 1.1.10.3 jdolecek /* $NetBSD: pcons.c,v 1.1.10.3 2002/10/10 18:36:53 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/cpu.h>
53 1.1.10.2 jdolecek #include <machine/psl.h>
54 1.1.10.2 jdolecek
55 1.1.10.2 jdolecek #include <dev/cons.h>
56 1.1.10.2 jdolecek
57 1.1.10.2 jdolecek #include <sun2/dev/cons.h>
58 1.1.10.2 jdolecek
59 1.1.10.2 jdolecek static int pconsmatch __P((struct device *, struct cfdata *, void *));
60 1.1.10.2 jdolecek static void pconsattach __P((struct device *, struct device *, void *));
61 1.1.10.2 jdolecek
62 1.1.10.3 jdolecek CFATTACH_DECL(pcons, sizeof(struct pconssoftc),
63 1.1.10.3 jdolecek pconsmatch, pconsattach, NULL, NULL);
64 1.1.10.2 jdolecek
65 1.1.10.2 jdolecek extern struct cfdriver pcons_cd;
66 1.1.10.2 jdolecek static struct cnm_state pcons_cnm_state;
67 1.1.10.2 jdolecek
68 1.1.10.2 jdolecek static int pconsprobe __P((void));
69 1.1.10.2 jdolecek extern struct consdev *cn_tab;
70 1.1.10.2 jdolecek
71 1.1.10.3 jdolecek dev_type_open(pconsopen);
72 1.1.10.3 jdolecek dev_type_close(pconsclose);
73 1.1.10.3 jdolecek dev_type_read(pconsread);
74 1.1.10.3 jdolecek dev_type_write(pconswrite);
75 1.1.10.3 jdolecek dev_type_ioctl(pconsioctl);
76 1.1.10.3 jdolecek dev_type_tty(pconstty);
77 1.1.10.3 jdolecek dev_type_poll(pconspoll);
78 1.1.10.3 jdolecek
79 1.1.10.3 jdolecek const struct cdevsw pcons_cdevsw = {
80 1.1.10.3 jdolecek pconsopen, pconsclose, pconsread, pconswrite, pconsioctl,
81 1.1.10.3 jdolecek nostop, pconstty, pconspoll, nommap, ttykqfilter, D_TTY
82 1.1.10.3 jdolecek };
83 1.1.10.3 jdolecek
84 1.1.10.2 jdolecek static int
85 1.1.10.2 jdolecek pconsmatch(parent, match, aux)
86 1.1.10.2 jdolecek struct device *parent;
87 1.1.10.2 jdolecek struct cfdata *match;
88 1.1.10.2 jdolecek void *aux;
89 1.1.10.2 jdolecek {
90 1.1.10.2 jdolecek struct mainbus_attach_args *ma = aux;
91 1.1.10.2 jdolecek extern int prom_cngetc __P((dev_t));
92 1.1.10.2 jdolecek
93 1.1.10.2 jdolecek /* Only attach if no other console has attached. */
94 1.1.10.2 jdolecek return ((ma->ma_name != NULL) &&
95 1.1.10.2 jdolecek (strcmp("pcons", ma->ma_name) == 0) &&
96 1.1.10.2 jdolecek (cn_tab->cn_getc == prom_cngetc));
97 1.1.10.2 jdolecek
98 1.1.10.2 jdolecek }
99 1.1.10.2 jdolecek
100 1.1.10.2 jdolecek static void
101 1.1.10.2 jdolecek pconsattach(parent, self, aux)
102 1.1.10.2 jdolecek struct device *parent, *self;
103 1.1.10.2 jdolecek void *aux;
104 1.1.10.2 jdolecek {
105 1.1.10.2 jdolecek struct pconssoftc *sc = (struct pconssoftc *) self;
106 1.1.10.2 jdolecek
107 1.1.10.2 jdolecek printf("\n");
108 1.1.10.2 jdolecek if (!pconsprobe())
109 1.1.10.2 jdolecek return;
110 1.1.10.2 jdolecek
111 1.1.10.2 jdolecek cn_init_magic(&pcons_cnm_state);
112 1.1.10.2 jdolecek cn_set_magic("+++++");
113 1.1.10.2 jdolecek callout_init(&sc->sc_poll_ch);
114 1.1.10.2 jdolecek }
115 1.1.10.2 jdolecek
116 1.1.10.2 jdolecek static void pconsstart __P((struct tty *));
117 1.1.10.2 jdolecek static int pconsparam __P((struct tty *, struct termios *));
118 1.1.10.2 jdolecek static void pcons_poll __P((void *));
119 1.1.10.2 jdolecek
120 1.1.10.2 jdolecek int
121 1.1.10.2 jdolecek pconsopen(dev, flag, mode, p)
122 1.1.10.2 jdolecek dev_t dev;
123 1.1.10.2 jdolecek int flag, mode;
124 1.1.10.2 jdolecek struct proc *p;
125 1.1.10.2 jdolecek {
126 1.1.10.2 jdolecek struct pconssoftc *sc;
127 1.1.10.2 jdolecek int unit = minor(dev);
128 1.1.10.2 jdolecek struct tty *tp;
129 1.1.10.2 jdolecek
130 1.1.10.2 jdolecek if (unit >= pcons_cd.cd_ndevs)
131 1.1.10.2 jdolecek return ENXIO;
132 1.1.10.2 jdolecek sc = pcons_cd.cd_devs[unit];
133 1.1.10.2 jdolecek if (!sc)
134 1.1.10.2 jdolecek return ENXIO;
135 1.1.10.2 jdolecek if (!(tp = sc->of_tty))
136 1.1.10.2 jdolecek sc->of_tty = tp = ttymalloc();
137 1.1.10.2 jdolecek tp->t_oproc = pconsstart;
138 1.1.10.2 jdolecek tp->t_param = pconsparam;
139 1.1.10.2 jdolecek tp->t_dev = dev;
140 1.1.10.2 jdolecek cn_tab->cn_dev = dev;
141 1.1.10.2 jdolecek if (!(tp->t_state & TS_ISOPEN)) {
142 1.1.10.2 jdolecek ttychars(tp);
143 1.1.10.2 jdolecek tp->t_iflag = TTYDEF_IFLAG;
144 1.1.10.2 jdolecek tp->t_oflag = TTYDEF_OFLAG;
145 1.1.10.2 jdolecek tp->t_cflag = TTYDEF_CFLAG;
146 1.1.10.2 jdolecek tp->t_lflag = TTYDEF_LFLAG;
147 1.1.10.2 jdolecek tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
148 1.1.10.2 jdolecek pconsparam(tp, &tp->t_termios);
149 1.1.10.2 jdolecek ttsetwater(tp);
150 1.1.10.2 jdolecek } else if ((tp->t_state&TS_XCLUDE) && suser(p->p_ucred, &p->p_acflag))
151 1.1.10.2 jdolecek return EBUSY;
152 1.1.10.2 jdolecek tp->t_state |= TS_CARR_ON;
153 1.1.10.2 jdolecek
154 1.1.10.2 jdolecek if (!(sc->of_flags & OFPOLL)) {
155 1.1.10.2 jdolecek sc->of_flags |= OFPOLL;
156 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
157 1.1.10.2 jdolecek }
158 1.1.10.2 jdolecek
159 1.1.10.2 jdolecek return (*tp->t_linesw->l_open)(dev, tp);
160 1.1.10.2 jdolecek }
161 1.1.10.2 jdolecek
162 1.1.10.2 jdolecek int
163 1.1.10.2 jdolecek pconsclose(dev, flag, mode, p)
164 1.1.10.2 jdolecek dev_t dev;
165 1.1.10.2 jdolecek int flag, mode;
166 1.1.10.2 jdolecek struct proc *p;
167 1.1.10.2 jdolecek {
168 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
169 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
170 1.1.10.2 jdolecek
171 1.1.10.2 jdolecek callout_stop(&sc->sc_poll_ch);
172 1.1.10.2 jdolecek sc->of_flags &= ~OFPOLL;
173 1.1.10.2 jdolecek (*tp->t_linesw->l_close)(tp, flag);
174 1.1.10.2 jdolecek ttyclose(tp);
175 1.1.10.2 jdolecek return 0;
176 1.1.10.2 jdolecek }
177 1.1.10.2 jdolecek
178 1.1.10.2 jdolecek int
179 1.1.10.2 jdolecek pconsread(dev, uio, flag)
180 1.1.10.2 jdolecek dev_t dev;
181 1.1.10.2 jdolecek struct uio *uio;
182 1.1.10.2 jdolecek int flag;
183 1.1.10.2 jdolecek {
184 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
185 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
186 1.1.10.2 jdolecek
187 1.1.10.2 jdolecek return (*tp->t_linesw->l_read)(tp, uio, flag);
188 1.1.10.2 jdolecek }
189 1.1.10.2 jdolecek
190 1.1.10.2 jdolecek int
191 1.1.10.2 jdolecek pconswrite(dev, uio, flag)
192 1.1.10.2 jdolecek dev_t dev;
193 1.1.10.2 jdolecek struct uio *uio;
194 1.1.10.2 jdolecek int flag;
195 1.1.10.2 jdolecek {
196 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
197 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
198 1.1.10.2 jdolecek
199 1.1.10.2 jdolecek return (*tp->t_linesw->l_write)(tp, uio, flag);
200 1.1.10.2 jdolecek }
201 1.1.10.2 jdolecek
202 1.1.10.2 jdolecek int
203 1.1.10.2 jdolecek pconspoll(dev, events, p)
204 1.1.10.2 jdolecek dev_t dev;
205 1.1.10.2 jdolecek int events;
206 1.1.10.2 jdolecek struct proc *p;
207 1.1.10.2 jdolecek {
208 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
209 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
210 1.1.10.2 jdolecek
211 1.1.10.2 jdolecek return ((*tp->t_linesw->l_poll)(tp, events, p));
212 1.1.10.2 jdolecek }
213 1.1.10.2 jdolecek
214 1.1.10.2 jdolecek int
215 1.1.10.2 jdolecek pconsioctl(dev, cmd, data, flag, p)
216 1.1.10.2 jdolecek dev_t dev;
217 1.1.10.2 jdolecek u_long cmd;
218 1.1.10.2 jdolecek caddr_t data;
219 1.1.10.2 jdolecek int flag;
220 1.1.10.2 jdolecek struct proc *p;
221 1.1.10.2 jdolecek {
222 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
223 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
224 1.1.10.2 jdolecek int error;
225 1.1.10.2 jdolecek
226 1.1.10.2 jdolecek if ((error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, p)) >= 0)
227 1.1.10.2 jdolecek return error;
228 1.1.10.2 jdolecek if ((error = ttioctl(tp, cmd, data, flag, p)) >= 0)
229 1.1.10.2 jdolecek return error;
230 1.1.10.2 jdolecek return ENOTTY;
231 1.1.10.2 jdolecek }
232 1.1.10.2 jdolecek
233 1.1.10.2 jdolecek struct tty *
234 1.1.10.2 jdolecek pconstty(dev)
235 1.1.10.2 jdolecek dev_t dev;
236 1.1.10.2 jdolecek {
237 1.1.10.2 jdolecek struct pconssoftc *sc = pcons_cd.cd_devs[minor(dev)];
238 1.1.10.2 jdolecek
239 1.1.10.2 jdolecek return sc->of_tty;
240 1.1.10.2 jdolecek }
241 1.1.10.2 jdolecek
242 1.1.10.2 jdolecek static void
243 1.1.10.2 jdolecek pconsstart(tp)
244 1.1.10.2 jdolecek struct tty *tp;
245 1.1.10.2 jdolecek {
246 1.1.10.2 jdolecek struct clist *cl;
247 1.1.10.2 jdolecek int s, len;
248 1.1.10.2 jdolecek u_char buf[OFBURSTLEN];
249 1.1.10.2 jdolecek
250 1.1.10.2 jdolecek s = spltty();
251 1.1.10.2 jdolecek if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP)) {
252 1.1.10.2 jdolecek splx(s);
253 1.1.10.2 jdolecek return;
254 1.1.10.2 jdolecek }
255 1.1.10.2 jdolecek tp->t_state |= TS_BUSY;
256 1.1.10.2 jdolecek splx(s);
257 1.1.10.2 jdolecek cl = &tp->t_outq;
258 1.1.10.2 jdolecek len = q_to_b(cl, buf, OFBURSTLEN);
259 1.1.10.2 jdolecek prom_putstr(buf, len);
260 1.1.10.2 jdolecek s = spltty();
261 1.1.10.2 jdolecek tp->t_state &= ~TS_BUSY;
262 1.1.10.2 jdolecek if (cl->c_cc) {
263 1.1.10.2 jdolecek tp->t_state |= TS_TIMEOUT;
264 1.1.10.2 jdolecek callout_reset(&tp->t_rstrt_ch, 1, ttrstrt, (void *)tp);
265 1.1.10.2 jdolecek }
266 1.1.10.2 jdolecek if (cl->c_cc <= tp->t_lowat) {
267 1.1.10.2 jdolecek if (tp->t_state & TS_ASLEEP) {
268 1.1.10.2 jdolecek tp->t_state &= ~TS_ASLEEP;
269 1.1.10.2 jdolecek wakeup(cl);
270 1.1.10.2 jdolecek }
271 1.1.10.2 jdolecek selwakeup(&tp->t_wsel);
272 1.1.10.2 jdolecek }
273 1.1.10.2 jdolecek splx(s);
274 1.1.10.2 jdolecek }
275 1.1.10.2 jdolecek
276 1.1.10.2 jdolecek static int
277 1.1.10.2 jdolecek pconsparam(tp, t)
278 1.1.10.2 jdolecek struct tty *tp;
279 1.1.10.2 jdolecek struct termios *t;
280 1.1.10.2 jdolecek {
281 1.1.10.2 jdolecek tp->t_ispeed = t->c_ispeed;
282 1.1.10.2 jdolecek tp->t_ospeed = t->c_ospeed;
283 1.1.10.2 jdolecek tp->t_cflag = t->c_cflag;
284 1.1.10.2 jdolecek return 0;
285 1.1.10.2 jdolecek }
286 1.1.10.2 jdolecek
287 1.1.10.2 jdolecek static void
288 1.1.10.2 jdolecek pcons_poll(aux)
289 1.1.10.2 jdolecek void *aux;
290 1.1.10.2 jdolecek {
291 1.1.10.2 jdolecek struct pconssoftc *sc = aux;
292 1.1.10.2 jdolecek struct tty *tp = sc->of_tty;
293 1.1.10.2 jdolecek int c;
294 1.1.10.2 jdolecek char ch;
295 1.1.10.2 jdolecek
296 1.1.10.2 jdolecek while ((c = prom_peekchar()) >= 0) {
297 1.1.10.2 jdolecek ch = c;
298 1.1.10.2 jdolecek cn_check_magic(tp->t_dev, ch, pcons_cnm_state);
299 1.1.10.2 jdolecek if (tp && (tp->t_state & TS_ISOPEN))
300 1.1.10.2 jdolecek (*tp->t_linesw->l_rint)(ch, tp);
301 1.1.10.2 jdolecek }
302 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
303 1.1.10.2 jdolecek }
304 1.1.10.2 jdolecek
305 1.1.10.2 jdolecek int
306 1.1.10.2 jdolecek pconsprobe()
307 1.1.10.2 jdolecek {
308 1.1.10.2 jdolecek switch (prom_version()) {
309 1.1.10.2 jdolecek #ifdef PROM_OLDMON
310 1.1.10.2 jdolecek case PROM_OLDMON:
311 1.1.10.2 jdolecek case PROM_OBP_V0:
312 1.1.10.2 jdolecek return (1);
313 1.1.10.2 jdolecek #endif /* PROM_OLDMON */
314 1.1.10.2 jdolecek #ifdef PROM_OBP_V2
315 1.1.10.2 jdolecek case PROM_OBP_V2:
316 1.1.10.2 jdolecek case PROM_OBP_V3:
317 1.1.10.2 jdolecek case PROM_OPENFIRM:
318 1.1.10.2 jdolecek return (prom_stdin() && prom_stdout());
319 1.1.10.2 jdolecek #endif /* PROM_OBP_V2 */
320 1.1.10.2 jdolecek default: break;
321 1.1.10.2 jdolecek }
322 1.1.10.2 jdolecek return (0);
323 1.1.10.2 jdolecek }
324 1.1.10.2 jdolecek
325 1.1.10.2 jdolecek void
326 1.1.10.2 jdolecek pcons_cnpollc(dev, on)
327 1.1.10.2 jdolecek dev_t dev;
328 1.1.10.2 jdolecek int on;
329 1.1.10.2 jdolecek {
330 1.1.10.2 jdolecek struct pconssoftc *sc = NULL;
331 1.1.10.2 jdolecek
332 1.1.10.2 jdolecek if (pcons_cd.cd_devs)
333 1.1.10.2 jdolecek sc = pcons_cd.cd_devs[minor(dev)];
334 1.1.10.2 jdolecek
335 1.1.10.2 jdolecek if (on) {
336 1.1.10.2 jdolecek if (!sc) return;
337 1.1.10.2 jdolecek if (sc->of_flags & OFPOLL)
338 1.1.10.2 jdolecek callout_stop(&sc->sc_poll_ch);
339 1.1.10.2 jdolecek sc->of_flags &= ~OFPOLL;
340 1.1.10.2 jdolecek } else {
341 1.1.10.2 jdolecek /* Resuming kernel. */
342 1.1.10.2 jdolecek if (sc && !(sc->of_flags & OFPOLL)) {
343 1.1.10.2 jdolecek sc->of_flags |= OFPOLL;
344 1.1.10.2 jdolecek callout_reset(&sc->sc_poll_ch, 1, pcons_poll, sc);
345 1.1.10.2 jdolecek }
346 1.1.10.2 jdolecek }
347 1.1.10.2 jdolecek }
348 1.1.10.2 jdolecek
349 1.1.10.2 jdolecek void pcons_dopoll __P((void));
350 1.1.10.2 jdolecek void
351 1.1.10.2 jdolecek pcons_dopoll() {
352 1.1.10.2 jdolecek pcons_poll((void*)pcons_cd.cd_devs[0]);
353 1.1.10.2 jdolecek }
354