scif.c revision 1.44 1 1.44 thorpej /* $NetBSD: scif.c,v 1.44 2006/02/20 16:50:36 thorpej Exp $ */
2 1.1 itojun
3 1.1 itojun /*-
4 1.1 itojun * Copyright (C) 1999 T.Horiuchi and SAITOH Masanobu. All rights reserved.
5 1.1 itojun *
6 1.1 itojun * Redistribution and use in source and binary forms, with or without
7 1.1 itojun * modification, are permitted provided that the following conditions
8 1.1 itojun * are met:
9 1.1 itojun * 1. Redistributions of source code must retain the above copyright
10 1.1 itojun * notice, this list of conditions and the following disclaimer.
11 1.1 itojun * 2. Redistributions in binary form must reproduce the above copyright
12 1.1 itojun * notice, this list of conditions and the following disclaimer in the
13 1.1 itojun * documentation and/or other materials provided with the distribution.
14 1.1 itojun * 3. The name of the author may not be used to endorse or promote products
15 1.1 itojun * derived from this software without specific prior written permission.
16 1.1 itojun *
17 1.1 itojun * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18 1.1 itojun * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19 1.1 itojun * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20 1.1 itojun * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21 1.1 itojun * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22 1.1 itojun * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 1.1 itojun * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 1.1 itojun * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 1.1 itojun * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 1.1 itojun * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 1.1 itojun */
28 1.1 itojun
29 1.2 msaitoh /*-
30 1.2 msaitoh * Copyright (c) 1998, 1999 The NetBSD Foundation, Inc.
31 1.2 msaitoh * All rights reserved.
32 1.2 msaitoh *
33 1.2 msaitoh * This code is derived from software contributed to The NetBSD Foundation
34 1.2 msaitoh * by Charles M. Hannum.
35 1.2 msaitoh *
36 1.2 msaitoh * Redistribution and use in source and binary forms, with or without
37 1.2 msaitoh * modification, are permitted provided that the following conditions
38 1.2 msaitoh * are met:
39 1.2 msaitoh * 1. Redistributions of source code must retain the above copyright
40 1.2 msaitoh * notice, this list of conditions and the following disclaimer.
41 1.2 msaitoh * 2. Redistributions in binary form must reproduce the above copyright
42 1.2 msaitoh * notice, this list of conditions and the following disclaimer in the
43 1.2 msaitoh * documentation and/or other materials provided with the distribution.
44 1.2 msaitoh * 3. All advertising materials mentioning features or use of this software
45 1.2 msaitoh * must display the following acknowledgement:
46 1.2 msaitoh * This product includes software developed by the NetBSD
47 1.2 msaitoh * Foundation, Inc. and its contributors.
48 1.2 msaitoh * 4. Neither the name of The NetBSD Foundation nor the names of its
49 1.2 msaitoh * contributors may be used to endorse or promote products derived
50 1.2 msaitoh * from this software without specific prior written permission.
51 1.2 msaitoh *
52 1.2 msaitoh * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
53 1.2 msaitoh * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
54 1.2 msaitoh * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
55 1.2 msaitoh * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
56 1.2 msaitoh * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
57 1.2 msaitoh * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
58 1.2 msaitoh * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
59 1.2 msaitoh * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
60 1.2 msaitoh * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
61 1.2 msaitoh * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
62 1.2 msaitoh * POSSIBILITY OF SUCH DAMAGE.
63 1.2 msaitoh */
64 1.2 msaitoh
65 1.2 msaitoh /*
66 1.2 msaitoh * Copyright (c) 1991 The Regents of the University of California.
67 1.2 msaitoh * All rights reserved.
68 1.2 msaitoh *
69 1.2 msaitoh * Redistribution and use in source and binary forms, with or without
70 1.2 msaitoh * modification, are permitted provided that the following conditions
71 1.2 msaitoh * are met:
72 1.2 msaitoh * 1. Redistributions of source code must retain the above copyright
73 1.2 msaitoh * notice, this list of conditions and the following disclaimer.
74 1.2 msaitoh * 2. Redistributions in binary form must reproduce the above copyright
75 1.2 msaitoh * notice, this list of conditions and the following disclaimer in the
76 1.2 msaitoh * documentation and/or other materials provided with the distribution.
77 1.35 agc * 3. Neither the name of the University nor the names of its contributors
78 1.2 msaitoh * may be used to endorse or promote products derived from this software
79 1.2 msaitoh * without specific prior written permission.
80 1.2 msaitoh *
81 1.2 msaitoh * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
82 1.2 msaitoh * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
83 1.2 msaitoh * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
84 1.2 msaitoh * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
85 1.2 msaitoh * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
86 1.2 msaitoh * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
87 1.2 msaitoh * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
88 1.2 msaitoh * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
89 1.2 msaitoh * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
90 1.2 msaitoh * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
91 1.2 msaitoh * SUCH DAMAGE.
92 1.2 msaitoh *
93 1.2 msaitoh * @(#)com.c 7.5 (Berkeley) 5/16/91
94 1.2 msaitoh */
95 1.2 msaitoh
96 1.2 msaitoh /*
97 1.2 msaitoh * SH internal serial driver
98 1.2 msaitoh *
99 1.2 msaitoh * This code is derived from both z8530tty.c and com.c
100 1.2 msaitoh */
101 1.34 lukem
102 1.34 lukem #include <sys/cdefs.h>
103 1.44 thorpej __KERNEL_RCSID(0, "$NetBSD: scif.c,v 1.44 2006/02/20 16:50:36 thorpej Exp $");
104 1.2 msaitoh
105 1.17 lukem #include "opt_kgdb.h"
106 1.1 itojun #include "opt_scif.h"
107 1.1 itojun
108 1.1 itojun #include <sys/param.h>
109 1.1 itojun #include <sys/systm.h>
110 1.1 itojun #include <sys/tty.h>
111 1.1 itojun #include <sys/proc.h>
112 1.1 itojun #include <sys/conf.h>
113 1.1 itojun #include <sys/file.h>
114 1.1 itojun #include <sys/syslog.h>
115 1.1 itojun #include <sys/kernel.h>
116 1.1 itojun #include <sys/device.h>
117 1.1 itojun #include <sys/malloc.h>
118 1.22 uch #include <sys/kgdb.h>
119 1.1 itojun
120 1.1 itojun #include <dev/cons.h>
121 1.1 itojun
122 1.21 uch #include <sh3/clock.h>
123 1.24 uch #include <sh3/exception.h>
124 1.1 itojun #include <sh3/scifreg.h>
125 1.24 uch #include <machine/intr.h>
126 1.24 uch
127 1.22 uch #include <sh3/dev/scifvar.h>
128 1.1 itojun
129 1.24 uch #include "locators.h"
130 1.1 itojun
131 1.20 uch static void scifstart(struct tty *);
132 1.20 uch static int scifparam(struct tty *, struct termios *);
133 1.22 uch static int kgdb_attached;
134 1.1 itojun
135 1.20 uch void scifcnprobe(struct consdev *);
136 1.20 uch void scifcninit(struct consdev *);
137 1.20 uch void scifcnputc(dev_t, int);
138 1.20 uch int scifcngetc(dev_t);
139 1.20 uch void scifcnpoolc(dev_t, int);
140 1.20 uch void scif_intr_init(void);
141 1.20 uch int scifintr(void *);
142 1.1 itojun
143 1.1 itojun struct scif_softc {
144 1.1 itojun struct device sc_dev; /* boilerplate */
145 1.1 itojun struct tty *sc_tty;
146 1.24 uch void *sc_si;
147 1.1 itojun
148 1.8 thorpej struct callout sc_diag_ch;
149 1.8 thorpej
150 1.1 itojun #if 0
151 1.1 itojun bus_space_tag_t sc_iot; /* ISA i/o space identifier */
152 1.1 itojun bus_space_handle_t sc_ioh; /* ISA io handle */
153 1.1 itojun
154 1.1 itojun int sc_drq;
155 1.1 itojun
156 1.1 itojun int sc_frequency;
157 1.1 itojun #endif
158 1.1 itojun
159 1.1 itojun u_int sc_overflows,
160 1.1 itojun sc_floods,
161 1.1 itojun sc_errors; /* number of retries so far */
162 1.1 itojun u_char sc_status[7]; /* copy of registers */
163 1.1 itojun
164 1.1 itojun int sc_hwflags;
165 1.1 itojun int sc_swflags;
166 1.1 itojun u_int sc_fifolen;
167 1.1 itojun
168 1.1 itojun u_int sc_r_hiwat,
169 1.1 itojun sc_r_lowat;
170 1.1 itojun u_char *volatile sc_rbget,
171 1.1 itojun *volatile sc_rbput;
172 1.1 itojun volatile u_int sc_rbavail;
173 1.1 itojun u_char *sc_rbuf,
174 1.1 itojun *sc_ebuf;
175 1.1 itojun
176 1.1 itojun u_char *sc_tba; /* transmit buffer address */
177 1.1 itojun u_int sc_tbc, /* transmit byte count */
178 1.1 itojun sc_heldtbc;
179 1.1 itojun
180 1.1 itojun volatile u_char sc_rx_flags,
181 1.1 itojun #define RX_TTY_BLOCKED 0x01
182 1.1 itojun #define RX_TTY_OVERFLOWED 0x02
183 1.1 itojun #define RX_IBUF_BLOCKED 0x04
184 1.1 itojun #define RX_IBUF_OVERFLOWED 0x08
185 1.1 itojun #define RX_ANY_BLOCK 0x0f
186 1.3 msaitoh sc_tx_busy, /* working on an output chunk */
187 1.3 msaitoh sc_tx_done, /* done with one output chunk */
188 1.2 msaitoh sc_tx_stopped, /* H/W level stop (lost CTS) */
189 1.2 msaitoh sc_st_check, /* got a status interrupt */
190 1.1 itojun sc_rx_ready;
191 1.1 itojun
192 1.1 itojun volatile u_char sc_heldchange;
193 1.1 itojun };
194 1.1 itojun
195 1.1 itojun /* controller driver configuration */
196 1.20 uch static int scif_match(struct device *, struct cfdata *, void *);
197 1.20 uch static void scif_attach(struct device *, struct device *, void *);
198 1.1 itojun
199 1.20 uch void scif_break(struct scif_softc *, int);
200 1.20 uch void scif_iflush(struct scif_softc *);
201 1.1 itojun
202 1.1 itojun #define integrate static inline
203 1.15 thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
204 1.20 uch void scifsoft(void *);
205 1.1 itojun #else
206 1.1 itojun #ifndef __NO_SOFT_SERIAL_INTERRUPT
207 1.20 uch void scifsoft(void);
208 1.1 itojun #else
209 1.20 uch void scifsoft(void *);
210 1.1 itojun #endif
211 1.1 itojun #endif
212 1.20 uch integrate void scif_rxsoft(struct scif_softc *, struct tty *);
213 1.20 uch integrate void scif_txsoft(struct scif_softc *, struct tty *);
214 1.20 uch integrate void scif_stsoft(struct scif_softc *, struct tty *);
215 1.20 uch integrate void scif_schedrx(struct scif_softc *);
216 1.20 uch void scifdiag(void *);
217 1.1 itojun
218 1.1 itojun
219 1.1 itojun #define SCIFUNIT_MASK 0x7ffff
220 1.1 itojun #define SCIFDIALOUT_MASK 0x80000
221 1.1 itojun
222 1.1 itojun #define SCIFUNIT(x) (minor(x) & SCIFUNIT_MASK)
223 1.1 itojun #define SCIFDIALOUT(x) (minor(x) & SCIFDIALOUT_MASK)
224 1.1 itojun
225 1.1 itojun /* Macros to clear/set/test flags. */
226 1.25 uch #define SET(t, f) (t) |= (f)
227 1.25 uch #define CLR(t, f) (t) &= ~(f)
228 1.25 uch #define ISSET(t, f) ((t) & (f))
229 1.1 itojun
230 1.1 itojun /* Hardware flag masks */
231 1.1 itojun #define SCIF_HW_NOIEN 0x01
232 1.1 itojun #define SCIF_HW_FIFO 0x02
233 1.1 itojun #define SCIF_HW_FLOW 0x08
234 1.1 itojun #define SCIF_HW_DEV_OK 0x20
235 1.1 itojun #define SCIF_HW_CONSOLE 0x40
236 1.1 itojun #define SCIF_HW_KGDB 0x80
237 1.1 itojun
238 1.1 itojun /* Buffer size for character buffer */
239 1.1 itojun #define SCIF_RING_SIZE 2048
240 1.1 itojun
241 1.1 itojun /* Stop input when 3/4 of the ring is full; restart when only 1/4 is full. */
242 1.1 itojun u_int scif_rbuf_hiwat = (SCIF_RING_SIZE * 1) / 4;
243 1.1 itojun u_int scif_rbuf_lowat = (SCIF_RING_SIZE * 3) / 4;
244 1.1 itojun
245 1.25 uch #define CONMODE ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8) /* 8N1 */
246 1.1 itojun int scifconscflag = CONMODE;
247 1.9 msaitoh int scifisconsole = 0;
248 1.1 itojun
249 1.7 msaitoh #ifdef SCIFCN_SPEED
250 1.7 msaitoh unsigned int scifcn_speed = SCIFCN_SPEED;
251 1.7 msaitoh #else
252 1.7 msaitoh unsigned int scifcn_speed = 9600;
253 1.7 msaitoh #endif
254 1.7 msaitoh
255 1.1 itojun #define divrnd(n, q) (((n)*2/(q)+1)/2) /* divide and round off */
256 1.1 itojun
257 1.15 thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
258 1.1 itojun #ifdef __NO_SOFT_SERIAL_INTERRUPT
259 1.1 itojun volatile int scif_softintr_scheduled;
260 1.8 thorpej struct callout scif_soft_ch = CALLOUT_INITIALIZER;
261 1.1 itojun #endif
262 1.1 itojun #endif
263 1.1 itojun
264 1.1 itojun u_int scif_rbuf_size = SCIF_RING_SIZE;
265 1.1 itojun
266 1.31 thorpej CFATTACH_DECL(scif, sizeof(struct scif_softc),
267 1.32 thorpej scif_match, scif_attach, NULL, NULL);
268 1.1 itojun
269 1.1 itojun extern struct cfdriver scif_cd;
270 1.1 itojun
271 1.38 chs static int scif_attached;
272 1.38 chs
273 1.28 gehenna dev_type_open(scifopen);
274 1.28 gehenna dev_type_close(scifclose);
275 1.28 gehenna dev_type_read(scifread);
276 1.28 gehenna dev_type_write(scifwrite);
277 1.28 gehenna dev_type_ioctl(scifioctl);
278 1.28 gehenna dev_type_stop(scifstop);
279 1.28 gehenna dev_type_tty(sciftty);
280 1.28 gehenna dev_type_poll(scifpoll);
281 1.28 gehenna
282 1.28 gehenna const struct cdevsw scif_cdevsw = {
283 1.28 gehenna scifopen, scifclose, scifread, scifwrite, scifioctl,
284 1.33 jdolecek scifstop, sciftty, scifpoll, nommap, ttykqfilter, D_TTY
285 1.28 gehenna };
286 1.1 itojun
287 1.20 uch void InitializeScif (unsigned int);
288 1.1 itojun
289 1.1 itojun /*
290 1.1 itojun * following functions are debugging prupose only
291 1.1 itojun */
292 1.25 uch #define CR 0x0D
293 1.25 uch #define USART_ON (unsigned int)~0x08
294 1.1 itojun
295 1.20 uch void scif_putc(unsigned char);
296 1.20 uch unsigned char scif_getc(void);
297 1.20 uch int ScifErrCheck(void);
298 1.1 itojun
299 1.37 uwe
300 1.37 uwe /* XXX: uwe
301 1.37 uwe * Prepare for bus_spacification. The difference in access widths is
302 1.37 uwe * still handled by the magic definitions in scifreg.h
303 1.37 uwe */
304 1.37 uwe #define scif_smr_read() SHREG_SCSMR2
305 1.37 uwe #define scif_smr_write(v) (SHREG_SCSMR2 = (v))
306 1.37 uwe
307 1.37 uwe #define scif_brr_read() SHREG_SCBRR2
308 1.37 uwe #define scif_brr_write(v) (SHREG_SCBRR2 = (v))
309 1.37 uwe
310 1.37 uwe #define scif_scr_read() SHREG_SCSCR2
311 1.37 uwe #define scif_scr_write(v) (SHREG_SCSCR2 = (v))
312 1.37 uwe
313 1.37 uwe #define scif_ftdr_write(v) (SHREG_SCFTDR2 = (v))
314 1.37 uwe
315 1.37 uwe #define scif_ssr_read() SHREG_SCSSR2
316 1.37 uwe #define scif_ssr_write(v) (SHREG_SCSSR2 = (v))
317 1.37 uwe
318 1.37 uwe #define scif_frdr_read() SHREG_SCFRDR2
319 1.37 uwe
320 1.37 uwe #define scif_fcr_read() SHREG_SCFCR2
321 1.37 uwe #define scif_fcr_write(v) (SHREG_SCFCR2 = (v))
322 1.37 uwe
323 1.37 uwe #define scif_fdr_read() SHREG_SCFDR2
324 1.37 uwe
325 1.37 uwe #ifdef SH4 /* additional registers in sh4 */
326 1.37 uwe
327 1.37 uwe #define scif_sptr_read() SHREG_SCSPTR2
328 1.37 uwe #define scif_sptr_write(v) (SHREG_SCSPTR2 = (v))
329 1.37 uwe
330 1.37 uwe #define scif_lsr_read() SHREG_SCLSR2
331 1.37 uwe #define scif_lsr_write(v) (SHREG_SCLSR2 = (v))
332 1.37 uwe
333 1.37 uwe #endif /* SH4 */
334 1.37 uwe
335 1.37 uwe
336 1.1 itojun /*
337 1.1 itojun * InitializeScif
338 1.1 itojun * : unsigned int bps;
339 1.1 itojun * : SCIF(Serial Communication Interface)
340 1.1 itojun */
341 1.1 itojun
342 1.1 itojun void
343 1.20 uch InitializeScif(unsigned int bps)
344 1.1 itojun {
345 1.1 itojun
346 1.1 itojun /* Initialize SCR */
347 1.37 uwe scif_scr_write(0x00);
348 1.1 itojun
349 1.6 msaitoh #if 0
350 1.37 uwe scif_fcr_write(SCFCR2_TFRST | SCFCR2_RFRST | SCFCR2_MCE);
351 1.6 msaitoh #else
352 1.37 uwe scif_fcr_write(SCFCR2_TFRST | SCFCR2_RFRST);
353 1.6 msaitoh #endif
354 1.7 msaitoh /* Serial Mode Register */
355 1.37 uwe scif_smr_write(0x00); /* 8bit,NonParity,Even,1Stop */
356 1.1 itojun
357 1.7 msaitoh /* Bit Rate Register */
358 1.37 uwe scif_brr_write(divrnd(sh_clock_get_pclock(), 32 * bps) - 1);
359 1.1 itojun
360 1.7 msaitoh /*
361 1.40 christos * wait 2m Sec, because Send/Recv must begin 1 bit period after
362 1.7 msaitoh * BRR is set.
363 1.7 msaitoh */
364 1.40 christos delay(2000);
365 1.1 itojun
366 1.6 msaitoh #if 0
367 1.37 uwe scif_fcr_write(FIFO_RCV_TRIGGER_14 | FIFO_XMT_TRIGGER_1 | SCFCR2_MCE);
368 1.6 msaitoh #else
369 1.37 uwe scif_fcr_write(FIFO_RCV_TRIGGER_14 | FIFO_XMT_TRIGGER_1);
370 1.6 msaitoh #endif
371 1.1 itojun
372 1.18 wiz /* Send permission, Receive permission ON */
373 1.37 uwe scif_scr_write(SCSCR2_TE | SCSCR2_RE);
374 1.1 itojun
375 1.7 msaitoh /* Serial Status Register */
376 1.37 uwe scif_ssr_write(scif_ssr_read() & SCSSR2_TDFE); /* Clear Status */
377 1.1 itojun }
378 1.1 itojun
379 1.1 itojun
380 1.1 itojun /*
381 1.14 msaitoh * scif_putc
382 1.1 itojun * : unsigned char c;
383 1.1 itojun */
384 1.1 itojun
385 1.1 itojun void
386 1.20 uch scif_putc(unsigned char c)
387 1.1 itojun {
388 1.14 msaitoh
389 1.1 itojun /* wait for ready */
390 1.37 uwe while ((scif_fdr_read() & SCFDR2_TXCNT) == SCFDR2_TXF_FULL)
391 1.36 uwe continue;
392 1.1 itojun
393 1.1 itojun /* write send data to send register */
394 1.37 uwe scif_ftdr_write(c);
395 1.1 itojun
396 1.1 itojun /* clear ready flag */
397 1.37 uwe scif_ssr_write(scif_ssr_read() & ~(SCSSR2_TDFE | SCSSR2_TEND));
398 1.1 itojun }
399 1.1 itojun
400 1.1 itojun /*
401 1.1 itojun * : ScifErrCheck
402 1.1 itojun * 0x80 = error
403 1.1 itojun * 0x08 = frame error
404 1.1 itojun * 0x04 = parity error
405 1.1 itojun */
406 1.1 itojun int
407 1.1 itojun ScifErrCheck(void)
408 1.1 itojun {
409 1.1 itojun
410 1.37 uwe return (scif_ssr_read() & (SCSSR2_ER | SCSSR2_FER | SCSSR2_PER));
411 1.1 itojun }
412 1.1 itojun
413 1.1 itojun /*
414 1.14 msaitoh * scif_getc
415 1.1 itojun */
416 1.1 itojun unsigned char
417 1.14 msaitoh scif_getc(void)
418 1.1 itojun {
419 1.1 itojun unsigned char c, err_c;
420 1.26 msaitoh #ifdef SH4
421 1.43 uwe unsigned short err_c2 = 0; /* XXXGCC: -Wuninitialized */
422 1.26 msaitoh #endif
423 1.1 itojun
424 1.36 uwe for (;;) {
425 1.12 msaitoh /* wait for ready */
426 1.37 uwe while ((scif_fdr_read() & SCFDR2_RECVCNT) == 0)
427 1.36 uwe continue;
428 1.1 itojun
429 1.37 uwe c = scif_frdr_read();
430 1.37 uwe err_c = scif_ssr_read();
431 1.37 uwe scif_ssr_write(scif_ssr_read()
432 1.37 uwe & ~(SCSSR2_ER | SCSSR2_BRK | SCSSR2_RDF | SCSSR2_DR));
433 1.26 msaitoh #ifdef SH4
434 1.26 msaitoh if (CPU_IS_SH4) {
435 1.37 uwe err_c2 = scif_lsr_read();
436 1.37 uwe scif_lsr_write(scif_lsr_read() & ~SCLSR2_ORER);
437 1.26 msaitoh }
438 1.26 msaitoh #endif
439 1.12 msaitoh if ((err_c & (SCSSR2_ER | SCSSR2_BRK | SCSSR2_FER
440 1.12 msaitoh | SCSSR2_PER)) == 0) {
441 1.26 msaitoh #ifdef SH4
442 1.26 msaitoh if (CPU_IS_SH4 && ((err_c2 & SCLSR2_ORER) == 0))
443 1.26 msaitoh #endif
444 1.12 msaitoh return(c);
445 1.12 msaitoh }
446 1.12 msaitoh }
447 1.1 itojun
448 1.1 itojun }
449 1.1 itojun
450 1.1 itojun static int
451 1.20 uch scif_match(struct device *parent, struct cfdata *cfp, void *aux)
452 1.1 itojun {
453 1.1 itojun
454 1.38 chs if (strcmp(cfp->cf_name, "scif") || scif_attached)
455 1.1 itojun return 0;
456 1.1 itojun
457 1.1 itojun return 1;
458 1.1 itojun }
459 1.1 itojun
460 1.1 itojun static void
461 1.20 uch scif_attach(struct device *parent, struct device *self, void *aux)
462 1.1 itojun {
463 1.1 itojun struct scif_softc *sc = (struct scif_softc *)self;
464 1.1 itojun struct tty *tp;
465 1.1 itojun
466 1.38 chs scif_attached = 1;
467 1.38 chs
468 1.1 itojun sc->sc_hwflags = 0; /* XXX */
469 1.1 itojun sc->sc_swflags = 0; /* XXX */
470 1.1 itojun sc->sc_fifolen = 16;
471 1.1 itojun
472 1.22 uch if (scifisconsole || kgdb_attached) {
473 1.9 msaitoh /* InitializeScif(scifcn_speed); */
474 1.9 msaitoh SET(sc->sc_hwflags, SCIF_HW_CONSOLE);
475 1.9 msaitoh SET(sc->sc_swflags, TIOCFLAG_SOFTCAR);
476 1.22 uch if (kgdb_attached) {
477 1.22 uch SET(sc->sc_hwflags, SCIF_HW_KGDB);
478 1.22 uch printf("\n%s: kgdb\n", sc->sc_dev.dv_xname);
479 1.22 uch } else {
480 1.22 uch printf("\n%s: console\n", sc->sc_dev.dv_xname);
481 1.22 uch }
482 1.9 msaitoh } else {
483 1.9 msaitoh InitializeScif(9600);
484 1.9 msaitoh printf("\n");
485 1.9 msaitoh }
486 1.1 itojun
487 1.8 thorpej callout_init(&sc->sc_diag_ch);
488 1.24 uch #ifdef SH4
489 1.24 uch intc_intr_establish(SH4_INTEVT_SCIF_ERI, IST_LEVEL, IPL_SERIAL,
490 1.24 uch scifintr, sc);
491 1.24 uch intc_intr_establish(SH4_INTEVT_SCIF_RXI, IST_LEVEL, IPL_SERIAL,
492 1.24 uch scifintr, sc);
493 1.24 uch intc_intr_establish(SH4_INTEVT_SCIF_BRI, IST_LEVEL, IPL_SERIAL,
494 1.24 uch scifintr, sc);
495 1.24 uch intc_intr_establish(SH4_INTEVT_SCIF_TXI, IST_LEVEL, IPL_SERIAL,
496 1.24 uch scifintr, sc);
497 1.24 uch #else
498 1.24 uch intc_intr_establish(SH7709_INTEVT2_SCIF_ERI, IST_LEVEL, IPL_SERIAL,
499 1.24 uch scifintr, sc);
500 1.24 uch intc_intr_establish(SH7709_INTEVT2_SCIF_RXI, IST_LEVEL, IPL_SERIAL,
501 1.24 uch scifintr, sc);
502 1.24 uch intc_intr_establish(SH7709_INTEVT2_SCIF_BRI, IST_LEVEL, IPL_SERIAL,
503 1.24 uch scifintr, sc);
504 1.24 uch intc_intr_establish(SH7709_INTEVT2_SCIF_TXI, IST_LEVEL, IPL_SERIAL,
505 1.24 uch scifintr, sc);
506 1.24 uch #endif
507 1.8 thorpej
508 1.24 uch #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
509 1.24 uch sc->sc_si = softintr_establish(IPL_SOFTSERIAL, scifsoft, sc);
510 1.24 uch #endif
511 1.9 msaitoh SET(sc->sc_hwflags, SCIF_HW_DEV_OK);
512 1.1 itojun
513 1.1 itojun tp = ttymalloc();
514 1.1 itojun tp->t_oproc = scifstart;
515 1.1 itojun tp->t_param = scifparam;
516 1.1 itojun tp->t_hwiflow = NULL;
517 1.1 itojun
518 1.1 itojun sc->sc_tty = tp;
519 1.1 itojun sc->sc_rbuf = malloc(scif_rbuf_size << 1, M_DEVBUF, M_NOWAIT);
520 1.1 itojun if (sc->sc_rbuf == NULL) {
521 1.1 itojun printf("%s: unable to allocate ring buffer\n",
522 1.1 itojun sc->sc_dev.dv_xname);
523 1.1 itojun return;
524 1.1 itojun }
525 1.1 itojun sc->sc_ebuf = sc->sc_rbuf + (scif_rbuf_size << 1);
526 1.1 itojun
527 1.1 itojun tty_attach(tp);
528 1.1 itojun }
529 1.1 itojun
530 1.1 itojun /*
531 1.1 itojun * Start or restart transmission.
532 1.1 itojun */
533 1.1 itojun static void
534 1.20 uch scifstart(struct tty *tp)
535 1.1 itojun {
536 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(tp->t_dev)];
537 1.1 itojun int s;
538 1.1 itojun
539 1.1 itojun s = spltty();
540 1.1 itojun if (ISSET(tp->t_state, TS_BUSY | TS_TIMEOUT | TS_TTSTOP))
541 1.1 itojun goto out;
542 1.1 itojun if (sc->sc_tx_stopped)
543 1.1 itojun goto out;
544 1.1 itojun
545 1.1 itojun if (tp->t_outq.c_cc <= tp->t_lowat) {
546 1.1 itojun if (ISSET(tp->t_state, TS_ASLEEP)) {
547 1.1 itojun CLR(tp->t_state, TS_ASLEEP);
548 1.1 itojun wakeup(&tp->t_outq);
549 1.1 itojun }
550 1.1 itojun selwakeup(&tp->t_wsel);
551 1.1 itojun if (tp->t_outq.c_cc == 0)
552 1.1 itojun goto out;
553 1.1 itojun }
554 1.1 itojun
555 1.1 itojun /* Grab the first contiguous region of buffer space. */
556 1.1 itojun {
557 1.1 itojun u_char *tba;
558 1.1 itojun int tbc;
559 1.1 itojun
560 1.1 itojun tba = tp->t_outq.c_cf;
561 1.1 itojun tbc = ndqb(&tp->t_outq, 0);
562 1.1 itojun
563 1.1 itojun (void)splserial();
564 1.1 itojun
565 1.1 itojun sc->sc_tba = tba;
566 1.1 itojun sc->sc_tbc = tbc;
567 1.1 itojun }
568 1.1 itojun
569 1.1 itojun SET(tp->t_state, TS_BUSY);
570 1.1 itojun sc->sc_tx_busy = 1;
571 1.1 itojun
572 1.1 itojun /* Enable transmit completion interrupts if necessary. */
573 1.37 uwe scif_scr_write(scif_scr_read() | SCSCR2_TIE | SCSCR2_RIE);
574 1.1 itojun
575 1.1 itojun /* Output the first chunk of the contiguous buffer. */
576 1.1 itojun {
577 1.1 itojun int n;
578 1.39 uwe int maxchars;
579 1.1 itojun int i;
580 1.1 itojun
581 1.1 itojun n = sc->sc_tbc;
582 1.39 uwe maxchars = sc->sc_fifolen
583 1.39 uwe - ((scif_fdr_read() & SCFDR2_TXCNT) >> 8);
584 1.39 uwe if (n > maxchars)
585 1.39 uwe n = maxchars;
586 1.1 itojun
587 1.1 itojun for (i = 0; i < n; i++) {
588 1.14 msaitoh scif_putc(*(sc->sc_tba));
589 1.1 itojun sc->sc_tba++;
590 1.1 itojun }
591 1.1 itojun sc->sc_tbc -= n;
592 1.1 itojun }
593 1.1 itojun out:
594 1.1 itojun splx(s);
595 1.1 itojun return;
596 1.1 itojun }
597 1.1 itojun
598 1.1 itojun /*
599 1.1 itojun * Set SCIF tty parameters from termios.
600 1.1 itojun * XXX - Should just copy the whole termios after
601 1.1 itojun * making sure all the changes could be done.
602 1.1 itojun */
603 1.1 itojun static int
604 1.20 uch scifparam(struct tty *tp, struct termios *t)
605 1.1 itojun {
606 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(tp->t_dev)];
607 1.1 itojun int ospeed = t->c_ospeed;
608 1.1 itojun int s;
609 1.1 itojun
610 1.44 thorpej if (!device_is_active(&sc->sc_dev))
611 1.1 itojun return (EIO);
612 1.1 itojun
613 1.1 itojun /* Check requested parameters. */
614 1.1 itojun if (ospeed < 0)
615 1.1 itojun return (EINVAL);
616 1.1 itojun if (t->c_ispeed && t->c_ispeed != t->c_ospeed)
617 1.1 itojun return (EINVAL);
618 1.1 itojun
619 1.1 itojun /*
620 1.1 itojun * For the console, always force CLOCAL and !HUPCL, so that the port
621 1.1 itojun * is always active.
622 1.1 itojun */
623 1.1 itojun if (ISSET(sc->sc_swflags, TIOCFLAG_SOFTCAR) ||
624 1.1 itojun ISSET(sc->sc_hwflags, SCIF_HW_CONSOLE)) {
625 1.1 itojun SET(t->c_cflag, CLOCAL);
626 1.1 itojun CLR(t->c_cflag, HUPCL);
627 1.1 itojun }
628 1.1 itojun
629 1.1 itojun /*
630 1.1 itojun * If there were no changes, don't do anything. This avoids dropping
631 1.1 itojun * input and improves performance when all we did was frob things like
632 1.1 itojun * VMIN and VTIME.
633 1.1 itojun */
634 1.1 itojun if (tp->t_ospeed == t->c_ospeed &&
635 1.1 itojun tp->t_cflag == t->c_cflag)
636 1.1 itojun return (0);
637 1.1 itojun
638 1.1 itojun #if 0
639 1.1 itojun /* XXX (msaitoh) */
640 1.1 itojun lcr = ISSET(sc->sc_lcr, LCR_SBREAK) | cflag2lcr(t->c_cflag);
641 1.1 itojun #endif
642 1.1 itojun
643 1.1 itojun s = splserial();
644 1.1 itojun
645 1.1 itojun /*
646 1.1 itojun * Set the flow control pins depending on the current flow control
647 1.1 itojun * mode.
648 1.1 itojun */
649 1.1 itojun if (ISSET(t->c_cflag, CRTSCTS)) {
650 1.37 uwe scif_fcr_write(scif_fcr_read() | SCFCR2_MCE);
651 1.1 itojun } else {
652 1.37 uwe scif_fcr_write(scif_fcr_read() & ~SCFCR2_MCE);
653 1.1 itojun }
654 1.1 itojun
655 1.37 uwe scif_brr_write(divrnd(sh_clock_get_pclock(), 32 * ospeed) -1);
656 1.1 itojun
657 1.1 itojun /*
658 1.1 itojun * Set the FIFO threshold based on the receive speed.
659 1.1 itojun *
660 1.1 itojun * * If it's a low speed, it's probably a mouse or some other
661 1.1 itojun * interactive device, so set the threshold low.
662 1.1 itojun * * If it's a high speed, trim the trigger level down to prevent
663 1.1 itojun * overflows.
664 1.1 itojun * * Otherwise set it a bit higher.
665 1.1 itojun */
666 1.1 itojun #if 0
667 1.1 itojun /* XXX (msaitoh) */
668 1.1 itojun if (ISSET(sc->sc_hwflags, SCIF_HW_HAYESP))
669 1.1 itojun sc->sc_fifo = FIFO_DMA_MODE | FIFO_ENABLE | FIFO_TRIGGER_8;
670 1.1 itojun else if (ISSET(sc->sc_hwflags, SCIF_HW_FIFO))
671 1.1 itojun sc->sc_fifo = FIFO_ENABLE |
672 1.1 itojun (t->c_ospeed <= 1200 ? FIFO_TRIGGER_1 :
673 1.1 itojun t->c_ospeed <= 38400 ? FIFO_TRIGGER_8 : FIFO_TRIGGER_4);
674 1.1 itojun else
675 1.1 itojun sc->sc_fifo = 0;
676 1.1 itojun #endif
677 1.1 itojun
678 1.1 itojun /* And copy to tty. */
679 1.1 itojun tp->t_ispeed = 0;
680 1.1 itojun tp->t_ospeed = t->c_ospeed;
681 1.1 itojun tp->t_cflag = t->c_cflag;
682 1.1 itojun
683 1.1 itojun if (!sc->sc_heldchange) {
684 1.1 itojun if (sc->sc_tx_busy) {
685 1.1 itojun sc->sc_heldtbc = sc->sc_tbc;
686 1.1 itojun sc->sc_tbc = 0;
687 1.1 itojun sc->sc_heldchange = 1;
688 1.1 itojun }
689 1.1 itojun #if 0
690 1.1 itojun /* XXX (msaitoh) */
691 1.1 itojun else
692 1.1 itojun scif_loadchannelregs(sc);
693 1.1 itojun #endif
694 1.1 itojun }
695 1.1 itojun
696 1.1 itojun if (!ISSET(t->c_cflag, CHWFLOW)) {
697 1.1 itojun /* Disable the high water mark. */
698 1.1 itojun sc->sc_r_hiwat = 0;
699 1.1 itojun sc->sc_r_lowat = 0;
700 1.1 itojun if (ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED)) {
701 1.1 itojun CLR(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
702 1.1 itojun scif_schedrx(sc);
703 1.1 itojun }
704 1.1 itojun } else {
705 1.1 itojun sc->sc_r_hiwat = scif_rbuf_hiwat;
706 1.1 itojun sc->sc_r_lowat = scif_rbuf_lowat;
707 1.1 itojun }
708 1.1 itojun
709 1.1 itojun splx(s);
710 1.1 itojun
711 1.1 itojun #ifdef SCIF_DEBUG
712 1.1 itojun if (scif_debug)
713 1.1 itojun scifstatus(sc, "scifparam ");
714 1.1 itojun #endif
715 1.1 itojun
716 1.1 itojun if (!ISSET(t->c_cflag, CHWFLOW)) {
717 1.1 itojun if (sc->sc_tx_stopped) {
718 1.1 itojun sc->sc_tx_stopped = 0;
719 1.1 itojun scifstart(tp);
720 1.1 itojun }
721 1.1 itojun }
722 1.1 itojun
723 1.1 itojun return (0);
724 1.1 itojun }
725 1.1 itojun
726 1.1 itojun void
727 1.20 uch scif_iflush(struct scif_softc *sc)
728 1.1 itojun {
729 1.1 itojun int i;
730 1.1 itojun unsigned char c;
731 1.1 itojun
732 1.37 uwe i = scif_fdr_read() & SCFDR2_RECVCNT;
733 1.1 itojun
734 1.1 itojun while (i > 0) {
735 1.37 uwe c = scif_frdr_read();
736 1.37 uwe scif_ssr_write(scif_ssr_read() & ~(SCSSR2_RDF | SCSSR2_DR));
737 1.1 itojun i--;
738 1.1 itojun }
739 1.1 itojun }
740 1.1 itojun
741 1.1 itojun int
742 1.42 christos scifopen(dev_t dev, int flag, int mode, struct lwp *l)
743 1.1 itojun {
744 1.1 itojun int unit = SCIFUNIT(dev);
745 1.1 itojun struct scif_softc *sc;
746 1.1 itojun struct tty *tp;
747 1.1 itojun int s, s2;
748 1.1 itojun int error;
749 1.1 itojun
750 1.1 itojun if (unit >= scif_cd.cd_ndevs)
751 1.1 itojun return (ENXIO);
752 1.1 itojun sc = scif_cd.cd_devs[unit];
753 1.1 itojun if (sc == 0 || !ISSET(sc->sc_hwflags, SCIF_HW_DEV_OK) ||
754 1.1 itojun sc->sc_rbuf == NULL)
755 1.1 itojun return (ENXIO);
756 1.1 itojun
757 1.44 thorpej if (!device_is_active(&sc->sc_dev))
758 1.1 itojun return (ENXIO);
759 1.1 itojun
760 1.1 itojun #ifdef KGDB
761 1.1 itojun /*
762 1.1 itojun * If this is the kgdb port, no other use is permitted.
763 1.1 itojun */
764 1.1 itojun if (ISSET(sc->sc_hwflags, SCIF_HW_KGDB))
765 1.1 itojun return (EBUSY);
766 1.22 uch #endif /* KGDB */
767 1.1 itojun
768 1.1 itojun tp = sc->sc_tty;
769 1.1 itojun
770 1.1 itojun if (ISSET(tp->t_state, TS_ISOPEN) &&
771 1.1 itojun ISSET(tp->t_state, TS_XCLUDE) &&
772 1.42 christos suser(l->l_proc->p_ucred, &l->l_proc->p_acflag) != 0)
773 1.1 itojun return (EBUSY);
774 1.1 itojun
775 1.1 itojun s = spltty();
776 1.1 itojun
777 1.1 itojun /*
778 1.1 itojun * Do the following iff this is a first open.
779 1.1 itojun */
780 1.1 itojun if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0) {
781 1.1 itojun struct termios t;
782 1.1 itojun
783 1.1 itojun tp->t_dev = dev;
784 1.1 itojun
785 1.1 itojun s2 = splserial();
786 1.1 itojun
787 1.1 itojun /* Turn on interrupts. */
788 1.37 uwe scif_scr_write(scif_scr_read() | SCSCR2_TIE | SCSCR2_RIE);
789 1.1 itojun
790 1.1 itojun splx(s2);
791 1.1 itojun
792 1.1 itojun /*
793 1.1 itojun * Initialize the termios status to the defaults. Add in the
794 1.1 itojun * sticky bits from TIOCSFLAGS.
795 1.1 itojun */
796 1.1 itojun t.c_ispeed = 0;
797 1.1 itojun if (ISSET(sc->sc_hwflags, SCIF_HW_CONSOLE)) {
798 1.7 msaitoh t.c_ospeed = scifcn_speed; /* XXX (msaitoh) */
799 1.1 itojun t.c_cflag = scifconscflag;
800 1.1 itojun } else {
801 1.1 itojun t.c_ospeed = TTYDEF_SPEED;
802 1.1 itojun t.c_cflag = TTYDEF_CFLAG;
803 1.1 itojun }
804 1.1 itojun if (ISSET(sc->sc_swflags, TIOCFLAG_CLOCAL))
805 1.1 itojun SET(t.c_cflag, CLOCAL);
806 1.1 itojun if (ISSET(sc->sc_swflags, TIOCFLAG_CRTSCTS))
807 1.1 itojun SET(t.c_cflag, CRTSCTS);
808 1.1 itojun if (ISSET(sc->sc_swflags, TIOCFLAG_MDMBUF))
809 1.1 itojun SET(t.c_cflag, MDMBUF);
810 1.1 itojun /* Make sure scifparam() will do something. */
811 1.1 itojun tp->t_ospeed = 0;
812 1.1 itojun (void) scifparam(tp, &t);
813 1.1 itojun tp->t_iflag = TTYDEF_IFLAG;
814 1.1 itojun tp->t_oflag = TTYDEF_OFLAG;
815 1.1 itojun tp->t_lflag = TTYDEF_LFLAG;
816 1.1 itojun ttychars(tp);
817 1.1 itojun ttsetwater(tp);
818 1.1 itojun
819 1.1 itojun s2 = splserial();
820 1.1 itojun
821 1.1 itojun /* Clear the input ring, and unblock. */
822 1.1 itojun sc->sc_rbput = sc->sc_rbget = sc->sc_rbuf;
823 1.1 itojun sc->sc_rbavail = scif_rbuf_size;
824 1.1 itojun scif_iflush(sc);
825 1.1 itojun CLR(sc->sc_rx_flags, RX_ANY_BLOCK);
826 1.1 itojun #if 0
827 1.1 itojun /* XXX (msaitoh) */
828 1.1 itojun scif_hwiflow(sc);
829 1.1 itojun #endif
830 1.1 itojun
831 1.1 itojun #ifdef SCIF_DEBUG
832 1.1 itojun if (scif_debug)
833 1.1 itojun scifstatus(sc, "scifopen ");
834 1.1 itojun #endif
835 1.1 itojun
836 1.1 itojun splx(s2);
837 1.1 itojun }
838 1.1 itojun
839 1.1 itojun splx(s);
840 1.1 itojun
841 1.1 itojun error = ttyopen(tp, SCIFDIALOUT(dev), ISSET(flag, O_NONBLOCK));
842 1.1 itojun if (error)
843 1.1 itojun goto bad;
844 1.1 itojun
845 1.13 eeh error = (*tp->t_linesw->l_open)(dev, tp);
846 1.1 itojun if (error)
847 1.1 itojun goto bad;
848 1.1 itojun
849 1.1 itojun return (0);
850 1.1 itojun
851 1.1 itojun bad:
852 1.1 itojun
853 1.1 itojun return (error);
854 1.1 itojun }
855 1.1 itojun
856 1.1 itojun int
857 1.42 christos scifclose(dev_t dev, int flag, int mode, struct lwp *l)
858 1.1 itojun {
859 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
860 1.1 itojun struct tty *tp = sc->sc_tty;
861 1.1 itojun
862 1.1 itojun /* XXX This is for cons.c. */
863 1.1 itojun if (!ISSET(tp->t_state, TS_ISOPEN))
864 1.1 itojun return (0);
865 1.1 itojun
866 1.13 eeh (*tp->t_linesw->l_close)(tp, flag);
867 1.1 itojun ttyclose(tp);
868 1.1 itojun
869 1.44 thorpej if (!device_is_active(&sc->sc_dev))
870 1.1 itojun return (0);
871 1.1 itojun
872 1.1 itojun return (0);
873 1.1 itojun }
874 1.1 itojun
875 1.1 itojun int
876 1.20 uch scifread(dev_t dev, struct uio *uio, int flag)
877 1.1 itojun {
878 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
879 1.1 itojun struct tty *tp = sc->sc_tty;
880 1.1 itojun
881 1.13 eeh return ((*tp->t_linesw->l_read)(tp, uio, flag));
882 1.1 itojun }
883 1.1 itojun
884 1.1 itojun int
885 1.20 uch scifwrite(dev_t dev, struct uio *uio, int flag)
886 1.1 itojun {
887 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
888 1.1 itojun struct tty *tp = sc->sc_tty;
889 1.1 itojun
890 1.13 eeh return ((*tp->t_linesw->l_write)(tp, uio, flag));
891 1.16 scw }
892 1.16 scw
893 1.16 scw int
894 1.42 christos scifpoll(dev_t dev, int events, struct lwp *l)
895 1.16 scw {
896 1.16 scw struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
897 1.16 scw struct tty *tp = sc->sc_tty;
898 1.25 uch
899 1.42 christos return ((*tp->t_linesw->l_poll)(tp, events, l));
900 1.1 itojun }
901 1.1 itojun
902 1.1 itojun struct tty *
903 1.20 uch sciftty(dev_t dev)
904 1.1 itojun {
905 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
906 1.1 itojun struct tty *tp = sc->sc_tty;
907 1.1 itojun
908 1.1 itojun return (tp);
909 1.1 itojun }
910 1.1 itojun
911 1.1 itojun int
912 1.42 christos scifioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct lwp *l)
913 1.1 itojun {
914 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(dev)];
915 1.1 itojun struct tty *tp = sc->sc_tty;
916 1.1 itojun int error;
917 1.1 itojun int s;
918 1.1 itojun
919 1.44 thorpej if (!device_is_active(&sc->sc_dev))
920 1.1 itojun return (EIO);
921 1.1 itojun
922 1.42 christos error = (*tp->t_linesw->l_ioctl)(tp, cmd, data, flag, l);
923 1.23 atatat if (error != EPASSTHROUGH)
924 1.1 itojun return (error);
925 1.1 itojun
926 1.42 christos error = ttioctl(tp, cmd, data, flag, l);
927 1.23 atatat if (error != EPASSTHROUGH)
928 1.1 itojun return (error);
929 1.1 itojun
930 1.1 itojun error = 0;
931 1.1 itojun
932 1.1 itojun s = splserial();
933 1.1 itojun
934 1.1 itojun switch (cmd) {
935 1.1 itojun case TIOCSBRK:
936 1.1 itojun scif_break(sc, 1);
937 1.1 itojun break;
938 1.1 itojun
939 1.1 itojun case TIOCCBRK:
940 1.1 itojun scif_break(sc, 0);
941 1.1 itojun break;
942 1.6 msaitoh
943 1.1 itojun case TIOCGFLAGS:
944 1.1 itojun *(int *)data = sc->sc_swflags;
945 1.1 itojun break;
946 1.1 itojun
947 1.1 itojun case TIOCSFLAGS:
948 1.42 christos error = suser(l->l_proc->p_ucred, &l->l_proc->p_acflag);
949 1.1 itojun if (error)
950 1.1 itojun break;
951 1.1 itojun sc->sc_swflags = *(int *)data;
952 1.1 itojun break;
953 1.1 itojun
954 1.1 itojun default:
955 1.23 atatat error = EPASSTHROUGH;
956 1.1 itojun break;
957 1.1 itojun }
958 1.1 itojun
959 1.1 itojun splx(s);
960 1.1 itojun
961 1.1 itojun return (error);
962 1.1 itojun }
963 1.1 itojun
964 1.1 itojun integrate void
965 1.20 uch scif_schedrx(struct scif_softc *sc)
966 1.1 itojun {
967 1.1 itojun
968 1.1 itojun sc->sc_rx_ready = 1;
969 1.1 itojun
970 1.1 itojun /* Wake up the poller. */
971 1.15 thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
972 1.1 itojun softintr_schedule(sc->sc_si);
973 1.1 itojun #else
974 1.1 itojun #ifndef __NO_SOFT_SERIAL_INTERRUPT
975 1.1 itojun setsoftserial();
976 1.1 itojun #else
977 1.1 itojun if (!scif_softintr_scheduled) {
978 1.1 itojun scif_softintr_scheduled = 1;
979 1.8 thorpej callout_reset(&scif_soft_ch, 1, scifsoft, NULL);
980 1.1 itojun }
981 1.1 itojun #endif
982 1.1 itojun #endif
983 1.1 itojun }
984 1.1 itojun
985 1.6 msaitoh void
986 1.20 uch scif_break(struct scif_softc *sc, int onoff)
987 1.6 msaitoh {
988 1.6 msaitoh
989 1.6 msaitoh if (onoff)
990 1.37 uwe scif_ssr_write(scif_ssr_read() & ~SCSSR2_TDFE);
991 1.6 msaitoh else
992 1.37 uwe scif_ssr_write(scif_ssr_read() | SCSSR2_TDFE);
993 1.6 msaitoh
994 1.6 msaitoh #if 0 /* XXX */
995 1.6 msaitoh if (!sc->sc_heldchange) {
996 1.6 msaitoh if (sc->sc_tx_busy) {
997 1.6 msaitoh sc->sc_heldtbc = sc->sc_tbc;
998 1.6 msaitoh sc->sc_tbc = 0;
999 1.6 msaitoh sc->sc_heldchange = 1;
1000 1.6 msaitoh } else
1001 1.6 msaitoh scif_loadchannelregs(sc);
1002 1.6 msaitoh }
1003 1.6 msaitoh #endif
1004 1.6 msaitoh }
1005 1.6 msaitoh
1006 1.1 itojun /*
1007 1.1 itojun * Stop output, e.g., for ^S or output flush.
1008 1.1 itojun */
1009 1.1 itojun void
1010 1.20 uch scifstop(struct tty *tp, int flag)
1011 1.1 itojun {
1012 1.1 itojun struct scif_softc *sc = scif_cd.cd_devs[SCIFUNIT(tp->t_dev)];
1013 1.1 itojun int s;
1014 1.1 itojun
1015 1.1 itojun s = splserial();
1016 1.1 itojun if (ISSET(tp->t_state, TS_BUSY)) {
1017 1.1 itojun /* Stop transmitting at the next chunk. */
1018 1.1 itojun sc->sc_tbc = 0;
1019 1.1 itojun sc->sc_heldtbc = 0;
1020 1.1 itojun if (!ISSET(tp->t_state, TS_TTSTOP))
1021 1.1 itojun SET(tp->t_state, TS_FLUSH);
1022 1.1 itojun }
1023 1.1 itojun splx(s);
1024 1.1 itojun }
1025 1.1 itojun
1026 1.1 itojun void
1027 1.1 itojun scif_intr_init()
1028 1.1 itojun {
1029 1.1 itojun /* XXX */
1030 1.1 itojun }
1031 1.1 itojun
1032 1.1 itojun void
1033 1.20 uch scifdiag(void *arg)
1034 1.1 itojun {
1035 1.1 itojun struct scif_softc *sc = arg;
1036 1.1 itojun int overflows, floods;
1037 1.1 itojun int s;
1038 1.1 itojun
1039 1.1 itojun s = splserial();
1040 1.1 itojun overflows = sc->sc_overflows;
1041 1.1 itojun sc->sc_overflows = 0;
1042 1.1 itojun floods = sc->sc_floods;
1043 1.1 itojun sc->sc_floods = 0;
1044 1.1 itojun sc->sc_errors = 0;
1045 1.1 itojun splx(s);
1046 1.1 itojun
1047 1.1 itojun log(LOG_WARNING, "%s: %d silo overflow%s, %d ibuf flood%s\n",
1048 1.1 itojun sc->sc_dev.dv_xname,
1049 1.1 itojun overflows, overflows == 1 ? "" : "s",
1050 1.1 itojun floods, floods == 1 ? "" : "s");
1051 1.1 itojun }
1052 1.1 itojun
1053 1.1 itojun integrate void
1054 1.20 uch scif_rxsoft(struct scif_softc *sc, struct tty *tp)
1055 1.1 itojun {
1056 1.39 uwe int (*rint)(int, struct tty *) = tp->t_linesw->l_rint;
1057 1.1 itojun u_char *get, *end;
1058 1.1 itojun u_int cc, scc;
1059 1.1 itojun u_char ssr2;
1060 1.1 itojun int code;
1061 1.1 itojun int s;
1062 1.1 itojun
1063 1.1 itojun end = sc->sc_ebuf;
1064 1.1 itojun get = sc->sc_rbget;
1065 1.1 itojun scc = cc = scif_rbuf_size - sc->sc_rbavail;
1066 1.1 itojun
1067 1.1 itojun if (cc == scif_rbuf_size) {
1068 1.1 itojun sc->sc_floods++;
1069 1.1 itojun if (sc->sc_errors++ == 0)
1070 1.11 msaitoh callout_reset(&sc->sc_diag_ch, 60 * hz, scifdiag, sc);
1071 1.1 itojun }
1072 1.1 itojun
1073 1.1 itojun while (cc) {
1074 1.1 itojun code = get[0];
1075 1.1 itojun ssr2 = get[1];
1076 1.6 msaitoh if (ISSET(ssr2, SCSSR2_BRK | SCSSR2_FER | SCSSR2_PER)) {
1077 1.6 msaitoh if (ISSET(ssr2, SCSSR2_BRK | SCSSR2_FER))
1078 1.1 itojun SET(code, TTY_FE);
1079 1.1 itojun if (ISSET(ssr2, SCSSR2_PER))
1080 1.1 itojun SET(code, TTY_PE);
1081 1.1 itojun }
1082 1.1 itojun if ((*rint)(code, tp) == -1) {
1083 1.1 itojun /*
1084 1.1 itojun * The line discipline's buffer is out of space.
1085 1.1 itojun */
1086 1.1 itojun if (!ISSET(sc->sc_rx_flags, RX_TTY_BLOCKED)) {
1087 1.1 itojun /*
1088 1.1 itojun * We're either not using flow control, or the
1089 1.1 itojun * line discipline didn't tell us to block for
1090 1.1 itojun * some reason. Either way, we have no way to
1091 1.1 itojun * know when there's more space available, so
1092 1.1 itojun * just drop the rest of the data.
1093 1.1 itojun */
1094 1.1 itojun get += cc << 1;
1095 1.1 itojun if (get >= end)
1096 1.1 itojun get -= scif_rbuf_size << 1;
1097 1.1 itojun cc = 0;
1098 1.1 itojun } else {
1099 1.1 itojun /*
1100 1.1 itojun * Don't schedule any more receive processing
1101 1.1 itojun * until the line discipline tells us there's
1102 1.1 itojun * space available (through scifhwiflow()).
1103 1.1 itojun * Leave the rest of the data in the input
1104 1.1 itojun * buffer.
1105 1.1 itojun */
1106 1.1 itojun SET(sc->sc_rx_flags, RX_TTY_OVERFLOWED);
1107 1.1 itojun }
1108 1.1 itojun break;
1109 1.1 itojun }
1110 1.1 itojun get += 2;
1111 1.1 itojun if (get >= end)
1112 1.1 itojun get = sc->sc_rbuf;
1113 1.1 itojun cc--;
1114 1.1 itojun }
1115 1.1 itojun
1116 1.1 itojun if (cc != scc) {
1117 1.1 itojun sc->sc_rbget = get;
1118 1.1 itojun s = splserial();
1119 1.1 itojun cc = sc->sc_rbavail += scc - cc;
1120 1.1 itojun /* Buffers should be ok again, release possible block. */
1121 1.1 itojun if (cc >= sc->sc_r_lowat) {
1122 1.1 itojun if (ISSET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED)) {
1123 1.1 itojun CLR(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
1124 1.37 uwe scif_scr_write(scif_scr_read() | SCSCR2_RIE);
1125 1.1 itojun }
1126 1.1 itojun #if 0
1127 1.1 itojun if (ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED)) {
1128 1.1 itojun CLR(sc->sc_rx_flags, RX_IBUF_BLOCKED);
1129 1.1 itojun scif_hwiflow(sc);
1130 1.1 itojun }
1131 1.1 itojun #endif
1132 1.1 itojun }
1133 1.1 itojun splx(s);
1134 1.1 itojun }
1135 1.1 itojun }
1136 1.1 itojun
1137 1.1 itojun integrate void
1138 1.20 uch scif_txsoft(struct scif_softc *sc, struct tty *tp)
1139 1.1 itojun {
1140 1.1 itojun
1141 1.1 itojun CLR(tp->t_state, TS_BUSY);
1142 1.1 itojun if (ISSET(tp->t_state, TS_FLUSH))
1143 1.1 itojun CLR(tp->t_state, TS_FLUSH);
1144 1.1 itojun else
1145 1.1 itojun ndflush(&tp->t_outq, (int)(sc->sc_tba - tp->t_outq.c_cf));
1146 1.13 eeh (*tp->t_linesw->l_start)(tp);
1147 1.1 itojun }
1148 1.1 itojun
1149 1.1 itojun integrate void
1150 1.20 uch scif_stsoft(struct scif_softc *sc, struct tty *tp)
1151 1.1 itojun {
1152 1.1 itojun #if 0
1153 1.1 itojun /* XXX (msaitoh) */
1154 1.1 itojun u_char msr, delta;
1155 1.1 itojun int s;
1156 1.1 itojun
1157 1.1 itojun s = splserial();
1158 1.1 itojun msr = sc->sc_msr;
1159 1.1 itojun delta = sc->sc_msr_delta;
1160 1.1 itojun sc->sc_msr_delta = 0;
1161 1.1 itojun splx(s);
1162 1.1 itojun
1163 1.1 itojun if (ISSET(delta, sc->sc_msr_dcd)) {
1164 1.1 itojun /*
1165 1.1 itojun * Inform the tty layer that carrier detect changed.
1166 1.1 itojun */
1167 1.13 eeh (void) (*tp->t_linesw->l_modem)(tp, ISSET(msr, MSR_DCD));
1168 1.1 itojun }
1169 1.1 itojun
1170 1.1 itojun if (ISSET(delta, sc->sc_msr_cts)) {
1171 1.1 itojun /* Block or unblock output according to flow control. */
1172 1.1 itojun if (ISSET(msr, sc->sc_msr_cts)) {
1173 1.1 itojun sc->sc_tx_stopped = 0;
1174 1.13 eeh (*tp->t_linesw->l_start)(tp);
1175 1.1 itojun } else {
1176 1.1 itojun sc->sc_tx_stopped = 1;
1177 1.1 itojun }
1178 1.1 itojun }
1179 1.1 itojun
1180 1.1 itojun #ifdef SCIF_DEBUG
1181 1.1 itojun if (scif_debug)
1182 1.1 itojun scifstatus(sc, "scif_stsoft");
1183 1.1 itojun #endif
1184 1.1 itojun #endif
1185 1.1 itojun }
1186 1.1 itojun
1187 1.15 thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
1188 1.1 itojun void
1189 1.20 uch scifsoft(void *arg)
1190 1.1 itojun {
1191 1.1 itojun struct scif_softc *sc = arg;
1192 1.1 itojun struct tty *tp;
1193 1.1 itojun
1194 1.44 thorpej if (!device_is_active(&sc->sc_dev))
1195 1.1 itojun return;
1196 1.1 itojun
1197 1.1 itojun {
1198 1.1 itojun #else
1199 1.1 itojun void
1200 1.1 itojun #ifndef __NO_SOFT_SERIAL_INTERRUPT
1201 1.1 itojun scifsoft()
1202 1.1 itojun #else
1203 1.20 uch scifsoft(void *arg)
1204 1.1 itojun #endif
1205 1.1 itojun {
1206 1.1 itojun struct scif_softc *sc;
1207 1.1 itojun struct tty *tp;
1208 1.1 itojun int unit;
1209 1.1 itojun #ifdef __NO_SOFT_SERIAL_INTERRUPT
1210 1.1 itojun int s;
1211 1.1 itojun
1212 1.1 itojun s = splsoftserial();
1213 1.1 itojun scif_softintr_scheduled = 0;
1214 1.1 itojun #endif
1215 1.1 itojun
1216 1.1 itojun for (unit = 0; unit < scif_cd.cd_ndevs; unit++) {
1217 1.1 itojun sc = scif_cd.cd_devs[unit];
1218 1.1 itojun if (sc == NULL || !ISSET(sc->sc_hwflags, SCIF_HW_DEV_OK))
1219 1.1 itojun continue;
1220 1.1 itojun
1221 1.44 thorpej if (!device_is_active(&sc->sc_dev))
1222 1.1 itojun continue;
1223 1.1 itojun
1224 1.1 itojun tp = sc->sc_tty;
1225 1.1 itojun if (tp == NULL)
1226 1.1 itojun continue;
1227 1.1 itojun if (!ISSET(tp->t_state, TS_ISOPEN) && tp->t_wopen == 0)
1228 1.1 itojun continue;
1229 1.1 itojun #endif
1230 1.1 itojun tp = sc->sc_tty;
1231 1.1 itojun
1232 1.1 itojun if (sc->sc_rx_ready) {
1233 1.1 itojun sc->sc_rx_ready = 0;
1234 1.1 itojun scif_rxsoft(sc, tp);
1235 1.1 itojun }
1236 1.1 itojun
1237 1.1 itojun #if 0
1238 1.1 itojun if (sc->sc_st_check) {
1239 1.1 itojun sc->sc_st_check = 0;
1240 1.1 itojun scif_stsoft(sc, tp);
1241 1.1 itojun }
1242 1.1 itojun #endif
1243 1.1 itojun
1244 1.1 itojun if (sc->sc_tx_done) {
1245 1.1 itojun sc->sc_tx_done = 0;
1246 1.1 itojun scif_txsoft(sc, tp);
1247 1.1 itojun }
1248 1.1 itojun }
1249 1.1 itojun
1250 1.15 thorpej #ifndef __HAVE_GENERIC_SOFT_INTERRUPTS
1251 1.1 itojun #ifdef __NO_SOFT_SERIAL_INTERRUPT
1252 1.1 itojun splx(s);
1253 1.1 itojun #endif
1254 1.1 itojun #endif
1255 1.1 itojun }
1256 1.1 itojun
1257 1.1 itojun int
1258 1.20 uch scifintr(void *arg)
1259 1.1 itojun {
1260 1.1 itojun struct scif_softc *sc = arg;
1261 1.1 itojun u_char *put, *end;
1262 1.1 itojun u_int cc;
1263 1.1 itojun u_short ssr2;
1264 1.1 itojun int count;
1265 1.1 itojun
1266 1.44 thorpej if (!device_is_active(&sc->sc_dev))
1267 1.1 itojun return (0);
1268 1.1 itojun
1269 1.1 itojun end = sc->sc_ebuf;
1270 1.1 itojun put = sc->sc_rbput;
1271 1.1 itojun cc = sc->sc_rbavail;
1272 1.1 itojun
1273 1.26 msaitoh do {
1274 1.37 uwe ssr2 = scif_ssr_read();
1275 1.26 msaitoh if (ISSET(ssr2, SCSSR2_BRK)) {
1276 1.37 uwe scif_ssr_write(scif_ssr_read()
1277 1.37 uwe & ~(SCSSR2_ER | SCSSR2_BRK | SCSSR2_DR));
1278 1.1 itojun #ifdef DDB
1279 1.26 msaitoh if (ISSET(sc->sc_hwflags, SCIF_HW_CONSOLE)) {
1280 1.26 msaitoh console_debugger();
1281 1.26 msaitoh }
1282 1.22 uch #endif /* DDB */
1283 1.1 itojun #ifdef KGDB
1284 1.26 msaitoh if (ISSET(sc->sc_hwflags, SCIF_HW_KGDB)) {
1285 1.26 msaitoh kgdb_connect(1);
1286 1.26 msaitoh }
1287 1.22 uch #endif /* KGDB */
1288 1.1 itojun }
1289 1.37 uwe count = scif_fdr_read() & SCFDR2_RECVCNT;
1290 1.26 msaitoh if (count != 0) {
1291 1.36 uwe for (;;) {
1292 1.37 uwe u_char c = scif_frdr_read();
1293 1.37 uwe u_char err = (u_char)(scif_ssr_read() & 0x00ff);
1294 1.1 itojun
1295 1.37 uwe scif_ssr_write(scif_ssr_read()
1296 1.37 uwe & ~(SCSSR2_ER | SCSSR2_RDF | SCSSR2_DR));
1297 1.26 msaitoh #ifdef SH4
1298 1.26 msaitoh if (CPU_IS_SH4)
1299 1.37 uwe scif_lsr_write(scif_lsr_read()
1300 1.37 uwe & ~SCLSR2_ORER);
1301 1.26 msaitoh #endif
1302 1.26 msaitoh if ((cc > 0) && (count > 0)) {
1303 1.26 msaitoh put[0] = c;
1304 1.26 msaitoh put[1] = err;
1305 1.26 msaitoh put += 2;
1306 1.26 msaitoh if (put >= end)
1307 1.26 msaitoh put = sc->sc_rbuf;
1308 1.26 msaitoh cc--;
1309 1.26 msaitoh count--;
1310 1.26 msaitoh } else
1311 1.26 msaitoh break;
1312 1.26 msaitoh }
1313 1.26 msaitoh
1314 1.26 msaitoh /*
1315 1.26 msaitoh * Current string of incoming characters ended because
1316 1.26 msaitoh * no more data was available or we ran out of space.
1317 1.26 msaitoh * Schedule a receive event if any data was received.
1318 1.26 msaitoh * If we're out of space, turn off receive interrupts.
1319 1.26 msaitoh */
1320 1.26 msaitoh sc->sc_rbput = put;
1321 1.26 msaitoh sc->sc_rbavail = cc;
1322 1.26 msaitoh if (!ISSET(sc->sc_rx_flags, RX_TTY_OVERFLOWED))
1323 1.26 msaitoh sc->sc_rx_ready = 1;
1324 1.1 itojun
1325 1.26 msaitoh /*
1326 1.26 msaitoh * See if we are in danger of overflowing a buffer. If
1327 1.26 msaitoh * so, use hardware flow control to ease the pressure.
1328 1.26 msaitoh */
1329 1.26 msaitoh if (!ISSET(sc->sc_rx_flags, RX_IBUF_BLOCKED) &&
1330 1.26 msaitoh cc < sc->sc_r_hiwat) {
1331 1.26 msaitoh SET(sc->sc_rx_flags, RX_IBUF_BLOCKED);
1332 1.1 itojun #if 0
1333 1.26 msaitoh scif_hwiflow(sc);
1334 1.1 itojun #endif
1335 1.26 msaitoh }
1336 1.1 itojun
1337 1.26 msaitoh /*
1338 1.26 msaitoh * If we're out of space, disable receive interrupts
1339 1.26 msaitoh * until the queue has drained a bit.
1340 1.26 msaitoh */
1341 1.26 msaitoh if (!cc) {
1342 1.26 msaitoh SET(sc->sc_rx_flags, RX_IBUF_OVERFLOWED);
1343 1.37 uwe scif_scr_write(scif_scr_read() & ~SCSCR2_RIE);
1344 1.26 msaitoh }
1345 1.26 msaitoh } else {
1346 1.37 uwe if (scif_ssr_read() & (SCSSR2_RDF | SCSSR2_DR)) {
1347 1.37 uwe scif_scr_write(scif_scr_read()
1348 1.37 uwe & ~(SCSCR2_TIE | SCSCR2_RIE));
1349 1.26 msaitoh delay(10);
1350 1.37 uwe scif_scr_write(scif_scr_read()
1351 1.37 uwe | SCSCR2_TIE | SCSCR2_RIE);
1352 1.26 msaitoh continue;
1353 1.26 msaitoh }
1354 1.7 msaitoh }
1355 1.37 uwe } while (scif_ssr_read() & (SCSSR2_RDF | SCSSR2_DR));
1356 1.1 itojun
1357 1.1 itojun #if 0
1358 1.7 msaitoh msr = bus_space_read_1(iot, ioh, scif_msr);
1359 1.7 msaitoh delta = msr ^ sc->sc_msr;
1360 1.7 msaitoh sc->sc_msr = msr;
1361 1.7 msaitoh if (ISSET(delta, sc->sc_msr_mask)) {
1362 1.7 msaitoh SET(sc->sc_msr_delta, delta);
1363 1.1 itojun
1364 1.7 msaitoh /*
1365 1.7 msaitoh * Pulse-per-second clock signal on edge of DCD?
1366 1.7 msaitoh */
1367 1.7 msaitoh if (ISSET(delta, sc->sc_ppsmask)) {
1368 1.7 msaitoh struct timeval tv;
1369 1.7 msaitoh if (ISSET(msr, sc->sc_ppsmask) ==
1370 1.7 msaitoh sc->sc_ppsassert) {
1371 1.7 msaitoh /* XXX nanotime() */
1372 1.7 msaitoh microtime(&tv);
1373 1.7 msaitoh TIMEVAL_TO_TIMESPEC(&tv,
1374 1.7 msaitoh &sc->ppsinfo.assert_timestamp);
1375 1.7 msaitoh if (sc->ppsparam.mode & PPS_OFFSETASSERT) {
1376 1.7 msaitoh timespecadd(&sc->ppsinfo.assert_timestamp,
1377 1.1 itojun &sc->ppsparam.assert_offset,
1378 1.1 itojun &sc->ppsinfo.assert_timestamp);
1379 1.7 msaitoh TIMESPEC_TO_TIMEVAL(&tv, &sc->ppsinfo.assert_timestamp);
1380 1.7 msaitoh }
1381 1.1 itojun
1382 1.1 itojun #ifdef PPS_SYNC
1383 1.7 msaitoh if (sc->ppsparam.mode & PPS_HARDPPSONASSERT)
1384 1.7 msaitoh hardpps(&tv, tv.tv_usec);
1385 1.1 itojun #endif
1386 1.7 msaitoh sc->ppsinfo.assert_sequence++;
1387 1.7 msaitoh sc->ppsinfo.current_mode =
1388 1.7 msaitoh sc->ppsparam.mode;
1389 1.7 msaitoh
1390 1.7 msaitoh } else if (ISSET(msr, sc->sc_ppsmask) ==
1391 1.7 msaitoh sc->sc_ppsclear) {
1392 1.7 msaitoh /* XXX nanotime() */
1393 1.7 msaitoh microtime(&tv);
1394 1.7 msaitoh TIMEVAL_TO_TIMESPEC(&tv,
1395 1.7 msaitoh &sc->ppsinfo.clear_timestamp);
1396 1.7 msaitoh if (sc->ppsparam.mode & PPS_OFFSETCLEAR) {
1397 1.7 msaitoh timespecadd(&sc->ppsinfo.clear_timestamp,
1398 1.1 itojun &sc->ppsparam.clear_offset,
1399 1.1 itojun &sc->ppsinfo.clear_timestamp);
1400 1.7 msaitoh TIMESPEC_TO_TIMEVAL(&tv, &sc->ppsinfo.clear_timestamp);
1401 1.7 msaitoh }
1402 1.1 itojun
1403 1.1 itojun #ifdef PPS_SYNC
1404 1.7 msaitoh if (sc->ppsparam.mode & PPS_HARDPPSONCLEAR)
1405 1.7 msaitoh hardpps(&tv, tv.tv_usec);
1406 1.1 itojun #endif
1407 1.7 msaitoh sc->ppsinfo.clear_sequence++;
1408 1.7 msaitoh sc->ppsinfo.current_mode =
1409 1.7 msaitoh sc->ppsparam.mode;
1410 1.1 itojun }
1411 1.7 msaitoh }
1412 1.1 itojun
1413 1.7 msaitoh /*
1414 1.7 msaitoh * Stop output immediately if we lose the output
1415 1.7 msaitoh * flow control signal or carrier detect.
1416 1.7 msaitoh */
1417 1.7 msaitoh if (ISSET(~msr, sc->sc_msr_mask)) {
1418 1.7 msaitoh sc->sc_tbc = 0;
1419 1.7 msaitoh sc->sc_heldtbc = 0;
1420 1.1 itojun #ifdef SCIF_DEBUG
1421 1.7 msaitoh if (scif_debug)
1422 1.7 msaitoh scifstatus(sc, "scifintr ");
1423 1.1 itojun #endif
1424 1.7 msaitoh }
1425 1.1 itojun
1426 1.7 msaitoh sc->sc_st_check = 1;
1427 1.7 msaitoh }
1428 1.1 itojun #endif
1429 1.1 itojun
1430 1.1 itojun /*
1431 1.1 itojun * Done handling any receive interrupts. See if data can be
1432 1.1 itojun * transmitted as well. Schedule tx done event if no data left
1433 1.1 itojun * and tty was marked busy.
1434 1.1 itojun */
1435 1.37 uwe if (((scif_fdr_read() & SCFDR2_TXCNT) >> 8) != 16) { /* XXX (msaitoh) */
1436 1.1 itojun /*
1437 1.1 itojun * If we've delayed a parameter change, do it now, and restart
1438 1.1 itojun * output.
1439 1.1 itojun */
1440 1.1 itojun if (sc->sc_heldchange) {
1441 1.1 itojun sc->sc_heldchange = 0;
1442 1.1 itojun sc->sc_tbc = sc->sc_heldtbc;
1443 1.1 itojun sc->sc_heldtbc = 0;
1444 1.1 itojun }
1445 1.1 itojun
1446 1.1 itojun /* Output the next chunk of the contiguous buffer, if any. */
1447 1.1 itojun if (sc->sc_tbc > 0) {
1448 1.1 itojun int n;
1449 1.39 uwe int maxchars;
1450 1.1 itojun int i;
1451 1.1 itojun
1452 1.1 itojun n = sc->sc_tbc;
1453 1.39 uwe maxchars = sc->sc_fifolen -
1454 1.37 uwe ((scif_fdr_read() & SCFDR2_TXCNT) >> 8);
1455 1.39 uwe if (n > maxchars)
1456 1.39 uwe n = maxchars;
1457 1.1 itojun
1458 1.1 itojun for (i = 0; i < n; i++) {
1459 1.14 msaitoh scif_putc(*(sc->sc_tba));
1460 1.1 itojun sc->sc_tba++;
1461 1.1 itojun }
1462 1.1 itojun sc->sc_tbc -= n;
1463 1.1 itojun } else {
1464 1.1 itojun /* Disable transmit completion interrupts if necessary. */
1465 1.1 itojun #if 0
1466 1.1 itojun if (ISSET(sc->sc_ier, IER_ETXRDY))
1467 1.1 itojun #endif
1468 1.37 uwe scif_scr_write(scif_scr_read() & ~SCSCR2_TIE);
1469 1.1 itojun
1470 1.1 itojun if (sc->sc_tx_busy) {
1471 1.1 itojun sc->sc_tx_busy = 0;
1472 1.1 itojun sc->sc_tx_done = 1;
1473 1.1 itojun }
1474 1.1 itojun }
1475 1.1 itojun }
1476 1.1 itojun
1477 1.1 itojun /* Wake up the poller. */
1478 1.15 thorpej #ifdef __HAVE_GENERIC_SOFT_INTERRUPTS
1479 1.1 itojun softintr_schedule(sc->sc_si);
1480 1.1 itojun #else
1481 1.1 itojun #ifndef __NO_SOFT_SERIAL_INTERRUPT
1482 1.1 itojun setsoftserial();
1483 1.1 itojun #else
1484 1.1 itojun if (!scif_softintr_scheduled) {
1485 1.1 itojun scif_softintr_scheduled = 1;
1486 1.8 thorpej callout_reset(&scif_soft_ch, 1, scifsoft, NULL);
1487 1.1 itojun }
1488 1.1 itojun #endif
1489 1.1 itojun #endif
1490 1.1 itojun
1491 1.1 itojun #if NRND > 0 && defined(RND_SCIF)
1492 1.36 uwe rnd_add_uint32(&sc->rnd_source, iir | lsr);
1493 1.1 itojun #endif
1494 1.1 itojun
1495 1.1 itojun return (1);
1496 1.1 itojun }
1497 1.1 itojun
1498 1.1 itojun void
1499 1.20 uch scifcnprobe(struct consdev *cp)
1500 1.1 itojun {
1501 1.1 itojun int maj;
1502 1.1 itojun
1503 1.1 itojun /* locate the major number */
1504 1.28 gehenna maj = cdevsw_lookup_major(&scif_cdevsw);
1505 1.1 itojun
1506 1.1 itojun /* Initialize required fields. */
1507 1.1 itojun cp->cn_dev = makedev(maj, 0);
1508 1.4 msaitoh #ifdef SCIFCONSOLE
1509 1.4 msaitoh cp->cn_pri = CN_REMOTE;
1510 1.4 msaitoh #else
1511 1.1 itojun cp->cn_pri = CN_NORMAL;
1512 1.1 itojun #endif
1513 1.1 itojun }
1514 1.1 itojun
1515 1.1 itojun void
1516 1.20 uch scifcninit(struct consdev *cp)
1517 1.1 itojun {
1518 1.1 itojun
1519 1.7 msaitoh InitializeScif(scifcn_speed);
1520 1.9 msaitoh scifisconsole = 1;
1521 1.1 itojun }
1522 1.1 itojun
1523 1.1 itojun int
1524 1.20 uch scifcngetc(dev_t dev)
1525 1.1 itojun {
1526 1.1 itojun int c;
1527 1.1 itojun int s;
1528 1.1 itojun
1529 1.1 itojun s = splserial();
1530 1.1 itojun c = scif_getc();
1531 1.1 itojun splx(s);
1532 1.1 itojun
1533 1.1 itojun return (c);
1534 1.1 itojun }
1535 1.1 itojun
1536 1.1 itojun void
1537 1.20 uch scifcnputc(dev_t dev, int c)
1538 1.1 itojun {
1539 1.1 itojun int s;
1540 1.1 itojun
1541 1.1 itojun s = splserial();
1542 1.14 msaitoh scif_putc((u_char)c);
1543 1.1 itojun splx(s);
1544 1.1 itojun }
1545 1.22 uch
1546 1.22 uch #ifdef KGDB
1547 1.22 uch int
1548 1.22 uch scif_kgdb_init()
1549 1.22 uch {
1550 1.22 uch
1551 1.22 uch if (strcmp(kgdb_devname, "scif") != 0)
1552 1.22 uch return (1);
1553 1.22 uch
1554 1.22 uch if (scifisconsole)
1555 1.22 uch return (1); /* can't share with console */
1556 1.22 uch
1557 1.22 uch InitializeScif(kgdb_rate);
1558 1.22 uch
1559 1.22 uch kgdb_attach((int (*)(void *))scifcngetc,
1560 1.22 uch (void (*)(void *, int))scifcnputc, NULL);
1561 1.22 uch kgdb_dev = 123; /* unneeded, only to satisfy some tests */
1562 1.22 uch kgdb_attached = 1;
1563 1.25 uch
1564 1.22 uch return (0);
1565 1.22 uch }
1566 1.22 uch #endif /* KGDB */
1567