1 /*        $NetBSD: dcm.c,v 1.10 2023/04/21 22:44:27 tsutsui Exp $     */
2 
3 /*
4  * Copyright (c) 1988 University of Utah.
5  * Copyright (c) 1990, 1993
6  *        The Regents of the University of California.  All rights reserved.
7  *
8  * This code is derived from software contributed to Berkeley by
9  * the Systems Programming Group of the University of Utah Computer
10  * Science Department.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions and the following disclaimer.
17  * 2. Redistributions in binary form must reproduce the above copyright
18  *    notice, this list of conditions and the following disclaimer in the
19  *    documentation and/or other materials provided with the distribution.
20  * 3. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  *        @(#)dcm.c 8.1 (Berkeley) 6/10/93
37  */
38 
39 #ifdef DCMCONSOLE
40 #include <sys/param.h>
41 #include <dev/cons.h>
42 
43 #include <hp300/dev/dcmreg.h>
44 
45 #include <hp300/stand/common/consdefs.h>
46 #include <hp300/stand/common/samachdep.h>
47 #include <hp300/stand/common/device.h>
48 
49 struct dcmdevice *dcmcnaddr = NULL;
50 
51 #define   DCMCONUNIT          1         /* XXX */
52 
53 void
dcmprobe(struct consdev * cp)54 dcmprobe(struct consdev *cp)
55 {
56           struct hp_hw *hw;
57           struct dcmdevice *dcm;
58 
59           for (hw = sc_table; hw < &sc_table[MAXCTLRS]; hw++)
60                     if (HW_ISDEV(hw, D_COMMDCM) && !badaddr((void *)hw->hw_kva))
61                               break;
62           if (!HW_ISDEV(hw, D_COMMDCM)) {
63                     cp->cn_pri = CN_DEAD;
64                     return;
65           }
66           dcmcnaddr = (struct dcmdevice *) hw->hw_kva;
67 
68 #ifdef FORCEDCMCONSOLE
69           cp->cn_pri = CN_REMOTE;
70 #else
71           dcm = dcmcnaddr;
72           switch (dcm->dcm_rsid) {
73           case DCMID:
74                     cp->cn_pri = CN_NORMAL;
75                     break;
76           case DCMID|DCMCON:
77                     cp->cn_pri = CN_REMOTE;
78                     break;
79           default:
80                     cp->cn_pri = CN_DEAD;
81                     break;
82           }
83 
84           curcons_scode = hw->hw_sc;
85 #endif
86 }
87 
88 void
dcminit(struct consdev * cp)89 dcminit(struct consdev *cp)
90 {
91           struct dcmdevice *dcm = dcmcnaddr;
92           int port = DCMCONUNIT;
93 
94           dcm->dcm_ic = IC_ID;
95           while (dcm->dcm_thead[port].ptr != dcm->dcm_ttail[port].ptr)
96                     ;
97           dcm->dcm_data[port].dcm_baud = BR_9600;
98           dcm->dcm_data[port].dcm_conf = LC_8BITS | LC_1STOP;
99           SEM_LOCK(dcm);
100           dcm->dcm_cmdtab[port].dcm_data |= CT_CON;
101           dcm->dcm_cr |= (1 << port);
102           SEM_UNLOCK(dcm);
103           DELAY(15000);
104 }
105 
106 #ifndef SMALL
107 int
dcmgetchar(dev_t dev)108 dcmgetchar(dev_t dev)
109 {
110           struct dcmdevice *dcm = dcmcnaddr;
111           struct dcmrfifo *fifo;
112           struct dcmpreg *pp;
113           unsigned int head;
114           int c, port;
115 
116           port = DCMCONUNIT;
117           pp = dcm_preg(dcm, port);
118           head = pp->r_head & RX_MASK;
119           if (head == (pp->r_tail & RX_MASK))
120                     return 0;
121           fifo = &dcm->dcm_rfifos[3-port][head>>1];
122           c = fifo->data_char;
123           (void)fifo->data_stat;
124           pp->r_head = (head + 2) & RX_MASK;
125           SEM_LOCK(dcm);
126           (void)dcm->dcm_iir;
127           SEM_UNLOCK(dcm);
128           return c;
129 }
130 #else
131 int
dcmgetchar(dev_t dev)132 dcmgetchar(dev_t dev)
133 {
134 
135           return 0;
136 }
137 #endif
138 
139 void
dcmputchar(dev_t dev,int c)140 dcmputchar(dev_t dev, int c)
141 {
142           struct dcmdevice *dcm = dcmcnaddr;
143           struct dcmpreg *pp;
144           int timo;
145           unsigned int tail;
146           int port;
147 
148           port = DCMCONUNIT;
149           pp = dcm_preg(dcm, port);
150           tail = pp->t_tail & TX_MASK;
151           timo = 50000;
152           while (tail != (pp->t_head & TX_MASK) && --timo)
153                     ;
154           dcm->dcm_tfifos[3-port][tail].data_char = c;
155           pp->t_tail = tail = (tail + 1) & TX_MASK;
156           SEM_LOCK(dcm);
157           dcm->dcm_cmdtab[port].dcm_data |= CT_TX;
158           dcm->dcm_cr |= (1 << port);
159           SEM_UNLOCK(dcm);
160           timo = 1000000;
161           while (tail != (pp->t_head & TX_MASK) && --timo)
162                     ;
163           SEM_LOCK(dcm);
164           (void)dcm->dcm_iir;
165           SEM_UNLOCK(dcm);
166 }
167 #endif
168