Home | History | Annotate | Line # | Download | only in boot
sio.c revision 1.3.2.2
      1  1.3.2.2  yamt /*	$NetBSD: sio.c,v 1.3.2.2 2013/01/23 00:05:54 yamt Exp $	*/
      2  1.3.2.2  yamt 
      3  1.3.2.2  yamt /*
      4  1.3.2.2  yamt  * Copyright (c) 1992 OMRON Corporation.
      5  1.3.2.2  yamt  *
      6  1.3.2.2  yamt  * This code is derived from software contributed to Berkeley by
      7  1.3.2.2  yamt  * OMRON Corporation.
      8  1.3.2.2  yamt  *
      9  1.3.2.2  yamt  * Redistribution and use in source and binary forms, with or without
     10  1.3.2.2  yamt  * modification, are permitted provided that the following conditions
     11  1.3.2.2  yamt  * are met:
     12  1.3.2.2  yamt  * 1. Redistributions of source code must retain the above copyright
     13  1.3.2.2  yamt  *    notice, this list of conditions and the following disclaimer.
     14  1.3.2.2  yamt  * 2. Redistributions in binary form must reproduce the above copyright
     15  1.3.2.2  yamt  *    notice, this list of conditions and the following disclaimer in the
     16  1.3.2.2  yamt  *    documentation and/or other materials provided with the distribution.
     17  1.3.2.2  yamt  * 3. All advertising materials mentioning features or use of this software
     18  1.3.2.2  yamt  *    must display the following acknowledgement:
     19  1.3.2.2  yamt  *	This product includes software developed by the University of
     20  1.3.2.2  yamt  *	California, Berkeley and its contributors.
     21  1.3.2.2  yamt  * 4. Neither the name of the University nor the names of its contributors
     22  1.3.2.2  yamt  *    may be used to endorse or promote products derived from this software
     23  1.3.2.2  yamt  *    without specific prior written permission.
     24  1.3.2.2  yamt  *
     25  1.3.2.2  yamt  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     26  1.3.2.2  yamt  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     27  1.3.2.2  yamt  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     28  1.3.2.2  yamt  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     29  1.3.2.2  yamt  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     30  1.3.2.2  yamt  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     31  1.3.2.2  yamt  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     32  1.3.2.2  yamt  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     33  1.3.2.2  yamt  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     34  1.3.2.2  yamt  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     35  1.3.2.2  yamt  * SUCH DAMAGE.
     36  1.3.2.2  yamt  *
     37  1.3.2.2  yamt  *	@(#)sio.c	8.1 (Berkeley) 6/10/93
     38  1.3.2.2  yamt  */
     39  1.3.2.2  yamt /*
     40  1.3.2.2  yamt  * Copyright (c) 1992, 1993
     41  1.3.2.2  yamt  *	The Regents of the University of California.  All rights reserved.
     42  1.3.2.2  yamt  *
     43  1.3.2.2  yamt  * This code is derived from software contributed to Berkeley by
     44  1.3.2.2  yamt  * OMRON Corporation.
     45  1.3.2.2  yamt  *
     46  1.3.2.2  yamt  * Redistribution and use in source and binary forms, with or without
     47  1.3.2.2  yamt  * modification, are permitted provided that the following conditions
     48  1.3.2.2  yamt  * are met:
     49  1.3.2.2  yamt  * 1. Redistributions of source code must retain the above copyright
     50  1.3.2.2  yamt  *    notice, this list of conditions and the following disclaimer.
     51  1.3.2.2  yamt  * 2. Redistributions in binary form must reproduce the above copyright
     52  1.3.2.2  yamt  *    notice, this list of conditions and the following disclaimer in the
     53  1.3.2.2  yamt  *    documentation and/or other materials provided with the distribution.
     54  1.3.2.2  yamt  * 3. Neither the name of the University nor the names of its contributors
     55  1.3.2.2  yamt  *    may be used to endorse or promote products derived from this software
     56  1.3.2.2  yamt  *    without specific prior written permission.
     57  1.3.2.2  yamt  *
     58  1.3.2.2  yamt  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     59  1.3.2.2  yamt  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     60  1.3.2.2  yamt  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     61  1.3.2.2  yamt  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     62  1.3.2.2  yamt  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     63  1.3.2.2  yamt  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     64  1.3.2.2  yamt  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     65  1.3.2.2  yamt  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     66  1.3.2.2  yamt  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     67  1.3.2.2  yamt  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     68  1.3.2.2  yamt  * SUCH DAMAGE.
     69  1.3.2.2  yamt  *
     70  1.3.2.2  yamt  *	@(#)sio.c	8.1 (Berkeley) 6/10/93
     71  1.3.2.2  yamt  */
     72  1.3.2.2  yamt 
     73  1.3.2.2  yamt /* sio.c   NOV-25-1991 */
     74  1.3.2.2  yamt 
     75  1.3.2.2  yamt #define NSIO 2
     76  1.3.2.2  yamt 
     77  1.3.2.2  yamt #include <sys/param.h>
     78  1.3.2.2  yamt #include <luna68k/stand/boot/samachdep.h>
     79  1.3.2.2  yamt #include <luna68k/stand/boot/sioreg.h>
     80  1.3.2.2  yamt #include <luna68k/stand/boot/rcvbuf.h>
     81  1.3.2.2  yamt #include <luna68k/stand/boot/kbdreg.h>
     82  1.3.2.2  yamt 
     83  1.3.2.2  yamt static void siointr(int);
     84  1.3.2.2  yamt static int sioreg(int, int);
     85  1.3.2.2  yamt 
     86  1.3.2.2  yamt struct rcvbuf	rcvbuf[NSIO];
     87  1.3.2.2  yamt 
     88  1.3.2.2  yamt int	sioconsole = -1;
     89  1.3.2.2  yamt struct	siodevice *sio_addr[2];
     90  1.3.2.2  yamt int	cur_unit;
     91  1.3.2.2  yamt 
     92  1.3.2.2  yamt 
     93  1.3.2.2  yamt #define	siounit(x)	( x & 0xffff )
     94  1.3.2.2  yamt #define isprint(c)      ((c >= 0x20) && (c < 0x7F) ? 1 : 0)
     95  1.3.2.2  yamt 
     96  1.3.2.2  yamt 
     97  1.3.2.2  yamt void
     98  1.3.2.2  yamt _siointr(void)
     99  1.3.2.2  yamt {
    100  1.3.2.2  yamt 	int unit;
    101  1.3.2.2  yamt 
    102  1.3.2.2  yamt 	for (unit = 0; unit < NSIO; unit++)
    103  1.3.2.2  yamt 		siointr(unit);
    104  1.3.2.2  yamt }
    105  1.3.2.2  yamt 
    106  1.3.2.2  yamt void
    107  1.3.2.2  yamt siointr(int unit)
    108  1.3.2.2  yamt {
    109  1.3.2.2  yamt /*	struct siodevice *sio = sio_addr[unit]; */
    110  1.3.2.2  yamt 	int rr0 = sioreg(REG(unit, RR0), 0);
    111  1.3.2.2  yamt 	int rr1 = sioreg(REG(unit, RR1), 0);
    112  1.3.2.2  yamt 
    113  1.3.2.2  yamt 	if (rr0 & RR0_RXAVAIL) {
    114  1.3.2.2  yamt 		if (rr1 & RR1_FRAMING)
    115  1.3.2.2  yamt 			return;
    116  1.3.2.2  yamt 
    117  1.3.2.2  yamt 		if (rr1 & (RR1_PARITY | RR1_OVERRUN))
    118  1.3.2.2  yamt 		    sioreg(REG(unit, WR0), WR0_ERRRST); /* Channel-A Error Reset */
    119  1.3.2.2  yamt 
    120  1.3.2.2  yamt 		if (unit == 1) {
    121  1.3.2.2  yamt 			int c = kbd_decode(sio_addr[unit]->sio_data);
    122  1.3.2.2  yamt 
    123  1.3.2.2  yamt 			if ((c & KC_TYPE) == KC_CODE)
    124  1.3.2.2  yamt 				PUSH_RBUF(unit, c);
    125  1.3.2.2  yamt 		} else {
    126  1.3.2.2  yamt 			PUSH_RBUF(unit, sio_addr[unit]->sio_data);
    127  1.3.2.2  yamt 		}
    128  1.3.2.2  yamt 	}
    129  1.3.2.2  yamt }
    130  1.3.2.2  yamt 
    131  1.3.2.2  yamt /*
    132  1.3.2.2  yamt  * Following are all routines needed for SIO to act as console
    133  1.3.2.2  yamt  */
    134  1.3.2.2  yamt #include <dev/cons.h>
    135  1.3.2.2  yamt #include <luna68k/stand/boot/romvec.h>
    136  1.3.2.2  yamt 
    137  1.3.2.2  yamt void
    138  1.3.2.2  yamt siocnprobe(struct consdev *cp)
    139  1.3.2.2  yamt {
    140  1.3.2.2  yamt 	sio_addr[0] = (struct siodevice *) 0x51000000;
    141  1.3.2.2  yamt 	sio_addr[1] = (struct siodevice *) 0x51000004;
    142  1.3.2.2  yamt 
    143  1.3.2.2  yamt 	/* make sure hardware exists */
    144  1.3.2.2  yamt 	if (badaddr((short *)sio_addr[0])) {
    145  1.3.2.2  yamt 		cp->cn_pri = CN_DEAD;
    146  1.3.2.2  yamt 		return;
    147  1.3.2.2  yamt 	}
    148  1.3.2.2  yamt 
    149  1.3.2.2  yamt 	/* locate the major number */
    150  1.3.2.2  yamt 
    151  1.3.2.2  yamt 	/* initialize required fields */
    152  1.3.2.2  yamt 	cp->cn_dev = cur_unit = 0;
    153  1.3.2.2  yamt 	cp->cn_pri = CN_NORMAL;
    154  1.3.2.2  yamt }
    155  1.3.2.2  yamt 
    156  1.3.2.2  yamt void
    157  1.3.2.2  yamt siocninit(struct consdev *cp)
    158  1.3.2.2  yamt {
    159  1.3.2.2  yamt 	int unit = siounit(cp->cn_dev);
    160  1.3.2.2  yamt 
    161  1.3.2.2  yamt 	sioinit();
    162  1.3.2.2  yamt 	sioconsole = unit;
    163  1.3.2.2  yamt }
    164  1.3.2.2  yamt 
    165  1.3.2.2  yamt int
    166  1.3.2.2  yamt siocngetc(dev_t dev)
    167  1.3.2.2  yamt {
    168  1.3.2.2  yamt 	int c, unit = siounit(dev);
    169  1.3.2.2  yamt 
    170  1.3.2.2  yamt 	if (RBUF_EMPTY(unit))
    171  1.3.2.2  yamt 		return 0;
    172  1.3.2.2  yamt 
    173  1.3.2.2  yamt 	POP_RBUF(unit, c);
    174  1.3.2.2  yamt 
    175  1.3.2.2  yamt 	return(c);
    176  1.3.2.2  yamt }
    177  1.3.2.2  yamt 
    178  1.3.2.2  yamt void
    179  1.3.2.2  yamt siocnputc(dev_t dev, int c)
    180  1.3.2.2  yamt {
    181  1.3.2.2  yamt 	int unit = siounit(dev);
    182  1.3.2.2  yamt 	int s;
    183  1.3.2.2  yamt 
    184  1.3.2.2  yamt 	if (sioconsole == -1) {
    185  1.3.2.2  yamt 		(void) sioinit();
    186  1.3.2.2  yamt 		sioconsole = unit;
    187  1.3.2.2  yamt 	}
    188  1.3.2.2  yamt 
    189  1.3.2.2  yamt 	s = splsio();
    190  1.3.2.2  yamt 
    191  1.3.2.2  yamt 	/* wait for any pending transmission to finish */
    192  1.3.2.2  yamt 	while ((sioreg(REG(unit, RR0), 0) & RR0_TXEMPTY) == 0);
    193  1.3.2.2  yamt 
    194  1.3.2.2  yamt 	sio_addr[unit]->sio_data = (c & 0xFF);
    195  1.3.2.2  yamt 
    196  1.3.2.2  yamt 	/* wait for any pending transmission to finish */
    197  1.3.2.2  yamt 	while ((sioreg(REG(unit, RR0), 0) & RR0_TXEMPTY) == 0);
    198  1.3.2.2  yamt 
    199  1.3.2.2  yamt 	splx(s);
    200  1.3.2.2  yamt }
    201  1.3.2.2  yamt 
    202  1.3.2.2  yamt /* SIO misc routines */
    203  1.3.2.2  yamt 
    204  1.3.2.2  yamt void
    205  1.3.2.2  yamt sioinit(void)
    206  1.3.2.2  yamt {
    207  1.3.2.2  yamt 	int s;
    208  1.3.2.2  yamt 
    209  1.3.2.2  yamt 	RBUF_INIT(0);
    210  1.3.2.2  yamt 	RBUF_INIT(1);
    211  1.3.2.2  yamt 
    212  1.3.2.2  yamt 	s = splsio();
    213  1.3.2.2  yamt 
    214  1.3.2.2  yamt 	sioreg(REG(0, WR0), WR0_CHANRST);		/* Channel-A Reset */
    215  1.3.2.2  yamt 
    216  1.3.2.2  yamt 	sioreg(WR2A, WR2_VEC86  | WR2_INTR_1);		/* Set CPU BUS Interface Mode */
    217  1.3.2.2  yamt 	sioreg(WR2B, 0);				/* Set Interrupt Vector */
    218  1.3.2.2  yamt 
    219  1.3.2.2  yamt 	sioreg(REG(0, WR0), WR0_RSTINT);		/* Reset E/S Interrupt */
    220  1.3.2.2  yamt 	sioreg(REG(0, WR4), WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY);	/* Tx/Rx */
    221  1.3.2.2  yamt 	sioreg(REG(0, WR3), WR3_RX8BIT | WR3_RXENBL);		/* Rx */
    222  1.3.2.2  yamt 	sioreg(REG(0, WR5), WR5_TX8BIT | WR5_TXENBL | WR5_DTR | WR5_RTS);		/* Tx */
    223  1.3.2.2  yamt 	sioreg(REG(0, WR0), WR0_RSTINT);		/* Reset E/S Interrupt */
    224  1.3.2.2  yamt 	sioreg(REG(0, WR1), WR1_RXALLS);		/* Interrupted All Char. */
    225  1.3.2.2  yamt 
    226  1.3.2.2  yamt 	sioreg(REG(1, WR0), WR0_CHANRST);		/* Channel-A Reset */
    227  1.3.2.2  yamt 
    228  1.3.2.2  yamt 	sioreg(REG(1, WR0), WR0_RSTINT);		/* Reset E/S Interrupt */
    229  1.3.2.2  yamt 	sioreg(REG(1, WR4), WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY);	/* Tx/Rx */
    230  1.3.2.2  yamt 	sioreg(REG(1, WR3), WR3_RX8BIT | WR3_RXENBL);		/* Rx */
    231  1.3.2.2  yamt 	sioreg(REG(1, WR5), WR5_TX8BIT | WR5_TXENBL);		/* Tx */
    232  1.3.2.2  yamt 	sioreg(REG(1, WR0), WR0_RSTINT);		/* Reset E/S Interrupt */
    233  1.3.2.2  yamt 	sioreg(REG(1, WR1), WR1_RXALLS);		/* Interrupted All Char. */
    234  1.3.2.2  yamt 
    235  1.3.2.2  yamt 	splx(s);
    236  1.3.2.2  yamt }
    237  1.3.2.2  yamt 
    238  1.3.2.2  yamt int
    239  1.3.2.2  yamt sioreg(int reg, int val)
    240  1.3.2.2  yamt {
    241  1.3.2.2  yamt 	int chan;
    242  1.3.2.2  yamt 
    243  1.3.2.2  yamt 	chan = CHANNEL(reg);
    244  1.3.2.2  yamt 
    245  1.3.2.2  yamt 	if (isStatusReg(reg)) {
    246  1.3.2.2  yamt 		if (REGNO(reg) != 0)
    247  1.3.2.2  yamt 		    sio_addr[chan]->sio_cmd = REGNO(reg);
    248  1.3.2.2  yamt 		return(sio_addr[chan]->sio_stat);
    249  1.3.2.2  yamt 	} else {
    250  1.3.2.2  yamt 		if (REGNO(reg) != 0)
    251  1.3.2.2  yamt 		    sio_addr[chan]->sio_cmd = REGNO(reg);
    252  1.3.2.2  yamt 		sio_addr[chan]->sio_cmd = val;
    253  1.3.2.2  yamt 		return(val);
    254  1.3.2.2  yamt 	}
    255  1.3.2.2  yamt }
    256