1 /*-
2 * SPDX-License-Identifier: BSD-2-Clause
3 *
4 * Copyright (c) 2007 Bruce M. Simpson.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26 * SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 #include <sys/param.h>
31 #include <sys/kdb.h>
32 #include <sys/kernel.h>
33 #include <sys/priv.h>
34 #include <sys/systm.h>
35 #include <sys/types.h>
36 #include <sys/conf.h>
37 #include <sys/cons.h>
38 #include <sys/consio.h>
39 #include <sys/tty.h>
40
41 #include <dev/cfe/cfe_api.h>
42 #include <dev/cfe/cfe_error.h>
43
44 #include <ddb/ddb.h>
45
46 #ifndef CFECONS_POLL_HZ
47 #define CFECONS_POLL_HZ 4
48 #endif
49 #define CFEBURSTLEN 128 /* max number of bytes to write in one chunk */
50
51 static tsw_open_t cfe_tty_open;
52 static tsw_close_t cfe_tty_close;
53 static tsw_outwakeup_t cfe_tty_outwakeup;
54
55 static struct ttydevsw cfe_ttydevsw = {
56 .tsw_flags = TF_NOPREFIX,
57 .tsw_open = cfe_tty_open,
58 .tsw_close = cfe_tty_close,
59 .tsw_outwakeup = cfe_tty_outwakeup,
60 };
61
62 static int conhandle = -1;
63 /* XXX does cfe have to poll? */
64 static int polltime;
65 static struct callout cfe_timer;
66
67 #if defined(KDB)
68 static int alt_break_state;
69 #endif
70
71 static void cfe_timeout(void *);
72
73 static cn_probe_t cfe_cnprobe;
74 static cn_init_t cfe_cninit;
75 static cn_term_t cfe_cnterm;
76 static cn_getc_t cfe_cngetc;
77 static cn_putc_t cfe_cnputc;
78 static cn_grab_t cfe_cngrab;
79 static cn_ungrab_t cfe_cnungrab;
80
81 CONSOLE_DRIVER(cfe);
82
83 static void
cn_drvinit(void * unused)84 cn_drvinit(void *unused)
85 {
86 struct tty *tp;
87
88 if (cfe_consdev.cn_pri != CN_DEAD &&
89 cfe_consdev.cn_name[0] != '\0') {
90 tp = tty_alloc(&cfe_ttydevsw, NULL);
91 callout_init_mtx(&cfe_timer, tty_getlock(tp), 0);
92 tty_makedev(tp, NULL, "cfecons");
93 }
94 }
95
96 static int
cfe_tty_open(struct tty * tp)97 cfe_tty_open(struct tty *tp)
98 {
99 polltime = hz / CFECONS_POLL_HZ;
100 if (polltime < 1)
101 polltime = 1;
102 callout_reset(&cfe_timer, polltime, cfe_timeout, tp);
103
104 return (0);
105 }
106
107 static void
cfe_tty_close(struct tty * tp)108 cfe_tty_close(struct tty *tp)
109 {
110
111 callout_stop(&cfe_timer);
112 }
113
114 static void
cfe_tty_outwakeup(struct tty * tp)115 cfe_tty_outwakeup(struct tty *tp)
116 {
117 int len, written, rc;
118 u_char buf[CFEBURSTLEN];
119
120 for (;;) {
121 len = ttydisc_getc(tp, buf, sizeof buf);
122 if (len == 0)
123 break;
124
125 written = 0;
126 while (written < len) {
127 rc = cfe_write(conhandle, &buf[written], len - written);
128 if (rc < 0)
129 break;
130 written += rc;
131 }
132 }
133 }
134
135 static void
cfe_timeout(void * v)136 cfe_timeout(void *v)
137 {
138 struct tty *tp;
139 int c;
140
141 tp = (struct tty *)v;
142
143 tty_assert_locked(tp);
144 while ((c = cfe_cngetc(NULL)) != -1)
145 ttydisc_rint(tp, c, 0);
146 ttydisc_rint_done(tp);
147
148 callout_reset(&cfe_timer, polltime, cfe_timeout, tp);
149 }
150
151 static void
cfe_cnprobe(struct consdev * cp)152 cfe_cnprobe(struct consdev *cp)
153 {
154
155 conhandle = cfe_getstdhandle(CFE_STDHANDLE_CONSOLE);
156 if (conhandle < 0) {
157 cp->cn_pri = CN_DEAD;
158 return;
159 }
160
161 /* XXX */
162 if (bootverbose) {
163 char *bootmsg = "Using CFE firmware console.\n";
164 int i;
165
166 for (i = 0; i < strlen(bootmsg); i++)
167 cfe_cnputc(cp, bootmsg[i]);
168 }
169
170 cp->cn_pri = CN_LOW;
171 }
172
173 static void
cfe_cninit(struct consdev * cp)174 cfe_cninit(struct consdev *cp)
175 {
176
177 strcpy(cp->cn_name, "cfecons");
178 }
179
180 static void
cfe_cnterm(struct consdev * cp)181 cfe_cnterm(struct consdev *cp)
182 {
183
184 }
185
186 static void
cfe_cngrab(struct consdev * cp)187 cfe_cngrab(struct consdev *cp)
188 {
189
190 }
191
192 static void
cfe_cnungrab(struct consdev * cp)193 cfe_cnungrab(struct consdev *cp)
194 {
195
196 }
197
198 static int
cfe_cngetc(struct consdev * cp)199 cfe_cngetc(struct consdev *cp)
200 {
201 unsigned char ch;
202
203 if (cfe_read(conhandle, &ch, 1) == 1) {
204 #if defined(KDB)
205 kdb_alt_break(ch, &alt_break_state);
206 #endif
207 return (ch);
208 }
209
210 return (-1);
211 }
212
213 static void
cfe_cnputc(struct consdev * cp,int c)214 cfe_cnputc(struct consdev *cp, int c)
215 {
216 char cbuf;
217
218 if (c == '\n')
219 cfe_cnputc(cp, '\r');
220
221 cbuf = c;
222 while (cfe_write(conhandle, &cbuf, 1) == 0)
223 continue;
224 }
225
226 SYSINIT(cndev, SI_SUB_CONFIGURE, SI_ORDER_MIDDLE, cn_drvinit, NULL);
227