apci.c revision 1.1 1 1.1 thorpej /* $NetBSD: apci.c,v 1.1 1997/05/12 07:41:55 thorpej Exp $ */
2 1.1 thorpej
3 1.1 thorpej /*
4 1.1 thorpej * Copyright (c) 1997 Jason R. Thorpe. All rights reserved.
5 1.1 thorpej * Copyright (c) 1988 University of Utah.
6 1.1 thorpej * Copyright (c) 1990, 1993
7 1.1 thorpej * The Regents of the University of California. All rights reserved.
8 1.1 thorpej *
9 1.1 thorpej * This code is derived from software contributed to Berkeley by
10 1.1 thorpej * the Systems Programming Group of the University of Utah Computer
11 1.1 thorpej * Science Department.
12 1.1 thorpej *
13 1.1 thorpej * Redistribution and use in source and binary forms, with or without
14 1.1 thorpej * modification, are permitted provided that the following conditions
15 1.1 thorpej * are met:
16 1.1 thorpej * 1. Redistributions of source code must retain the above copyright
17 1.1 thorpej * notice, this list of conditions and the following disclaimer.
18 1.1 thorpej * 2. Redistributions in binary form must reproduce the above copyright
19 1.1 thorpej * notice, this list of conditions and the following disclaimer in the
20 1.1 thorpej * documentation and/or other materials provided with the distribution.
21 1.1 thorpej * 3. All advertising materials mentioning features or use of this software
22 1.1 thorpej * must display the following acknowledgement:
23 1.1 thorpej * This product includes software developed by the University of
24 1.1 thorpej * California, Berkeley and its contributors.
25 1.1 thorpej * 4. Neither the name of the University nor the names of its contributors
26 1.1 thorpej * may be used to endorse or promote products derived from this software
27 1.1 thorpej * without specific prior written permission.
28 1.1 thorpej *
29 1.1 thorpej * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
30 1.1 thorpej * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
31 1.1 thorpej * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
32 1.1 thorpej * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
33 1.1 thorpej * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
34 1.1 thorpej * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
35 1.1 thorpej * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36 1.1 thorpej * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
37 1.1 thorpej * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
38 1.1 thorpej * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 1.1 thorpej * SUCH DAMAGE.
40 1.1 thorpej *
41 1.1 thorpej * @(#)dca.c 8.1 (Berkeley) 6/10/93
42 1.1 thorpej */
43 1.1 thorpej
44 1.1 thorpej #ifdef APCICONSOLE
45 1.1 thorpej #include <sys/param.h>
46 1.1 thorpej #include <dev/cons.h>
47 1.1 thorpej
48 1.1 thorpej #include <hp300/dev/frodoreg.h> /* for APCI offsets */
49 1.1 thorpej #include <hp300/dev/apcireg.h> /* for register map */
50 1.1 thorpej #include <hp300/dev/dcareg.h> /* for register bits */
51 1.1 thorpej
52 1.1 thorpej #include <hp300/stand/common/consdefs.h>
53 1.1 thorpej #include <hp300/stand/common/samachdep.h>
54 1.1 thorpej
55 1.1 thorpej struct apciregs *apcicnaddr = 0;
56 1.1 thorpej
57 1.1 thorpej void
58 1.1 thorpej apciprobe(cp)
59 1.1 thorpej struct consdev *cp;
60 1.1 thorpej {
61 1.1 thorpej struct apciregs *apci = apcicnaddr =
62 1.1 thorpej (struct apciregs *)IIOV(FRODO_BASE + FRODO_APCI_OFFSET(1));
63 1.1 thorpej struct dcadevice *dca = (struct dcadevice *)sctoaddr(9);
64 1.1 thorpej
65 1.1 thorpej cp->cn_pri = CN_DEAD;
66 1.1 thorpej
67 1.1 thorpej /* Only 400-series machines can have this. */
68 1.1 thorpej switch (machineid) {
69 1.1 thorpej case HP_400:
70 1.1 thorpej case HP_425:
71 1.1 thorpej case HP_433:
72 1.1 thorpej break;
73 1.1 thorpej default:
74 1.1 thorpej return;
75 1.1 thorpej }
76 1.1 thorpej
77 1.1 thorpej /* Make sure there's not a DCA in the way. */
78 1.1 thorpej if (badaddr((caddr_t)dca) == 0) {
79 1.1 thorpej switch (dca->dca_id) {
80 1.1 thorpej case DCAID0:
81 1.1 thorpej case DCAID1:
82 1.1 thorpej case DCAREMID0:
83 1.1 thorpej case DCAREMID1:
84 1.1 thorpej return;
85 1.1 thorpej }
86 1.1 thorpej }
87 1.1 thorpej
88 1.1 thorpej #ifdef FORCEAPCICONSOLE
89 1.1 thorpej cp->cn_pri = CN_REMOTE;
90 1.1 thorpej #else
91 1.1 thorpej cp->cn_pri = CN_NORMAL;
92 1.1 thorpej #endif
93 1.1 thorpej curcons_scode = -2;
94 1.1 thorpej }
95 1.1 thorpej
96 1.1 thorpej void
97 1.1 thorpej apciinit(cp)
98 1.1 thorpej struct consdev *cp;
99 1.1 thorpej {
100 1.1 thorpej struct apciregs *apci = (struct apciregs *)apcicnaddr;
101 1.1 thorpej
102 1.1 thorpej /*
103 1.1 thorpej * The only system on which this will happen is a 425e,
104 1.1 thorpej * which does not currently have a framebuffer console
105 1.1 thorpej * driver. We use the ROM's output method to let the
106 1.1 thorpej * operator know we're switching to the APCI.
107 1.1 thorpej */
108 1.1 thorpej userom = 1;
109 1.1 thorpej printf("Switching to APCI console.\n");
110 1.1 thorpej userom = 0;
111 1.1 thorpej
112 1.1 thorpej apci->ap_cfcr = CFCR_DLAB;
113 1.1 thorpej apci->ap_data = APCIBRD(9600) & 0xff;
114 1.1 thorpej apci->ap_ier = (APCIBRD(9600) >> 8) & 0xff;
115 1.1 thorpej apci->ap_cfcr = CFCR_8BITS;
116 1.1 thorpej apci->ap_fifo =
117 1.1 thorpej FIFO_ENABLE | FIFO_RCV_RST | FIFO_XMT_RST | FIFO_TRIGGER_1;
118 1.1 thorpej apci->ap_mcr = MCR_DTR | MCR_RTS;
119 1.1 thorpej }
120 1.1 thorpej
121 1.1 thorpej /* ARGSUSED */
122 1.1 thorpej #ifndef SMALL
123 1.1 thorpej int
124 1.1 thorpej apcigetchar(dev)
125 1.1 thorpej dev_t dev;
126 1.1 thorpej {
127 1.1 thorpej register struct apciregs *apci = apcicnaddr;
128 1.1 thorpej short stat;
129 1.1 thorpej int c;
130 1.1 thorpej
131 1.1 thorpej if (((stat = apci->ap_lsr) & LSR_RXRDY) == 0)
132 1.1 thorpej return (0);
133 1.1 thorpej c = apci->ap_data;
134 1.1 thorpej return (c);
135 1.1 thorpej }
136 1.1 thorpej #else
137 1.1 thorpej int
138 1.1 thorpej apcigetchar(dev)
139 1.1 thorpej dev_t dev;
140 1.1 thorpej {
141 1.1 thorpej return (0);
142 1.1 thorpej }
143 1.1 thorpej #endif
144 1.1 thorpej
145 1.1 thorpej /* ARGSUSED */
146 1.1 thorpej void
147 1.1 thorpej apciputchar(dev, c)
148 1.1 thorpej dev_t dev;
149 1.1 thorpej int c;
150 1.1 thorpej {
151 1.1 thorpej struct apciregs *apci = apcicnaddr;
152 1.1 thorpej int timo;
153 1.1 thorpej short stat;
154 1.1 thorpej
155 1.1 thorpej /* wait a reasonable time for the transmitter to come ready */
156 1.1 thorpej timo = 50000;
157 1.1 thorpej while (((stat = apci->ap_lsr) & LSR_TXRDY) == 0 && --timo)
158 1.1 thorpej ;
159 1.1 thorpej apci->ap_data = c;
160 1.1 thorpej /* wait for this transmission to complete */
161 1.1 thorpej timo = 1000000;
162 1.1 thorpej while (((stat = apci->ap_lsr) & LSR_TXRDY) == 0 && --timo)
163 1.1 thorpej ;
164 1.1 thorpej }
165 1.1 thorpej #endif
166