1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License (the "License").
6 * You may not use this file except in compliance with the License.
7 *
8 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9 * or http://www.opensolaris.org/os/licensing.
10 * See the License for the specific language governing permissions
11 * and limitations under the License.
12 *
13 * When distributing Covered Code, include this CDDL HEADER in each
14 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15 * If applicable, add the following below this CDDL HEADER, with the
16 * fields enclosed by brackets "[]" replaced with your own identifying
17 * information: Portions Copyright [yyyy] [name of copyright owner]
18 *
19 * CDDL HEADER END
20 */
21 /*
22 * Copyright 2009 Sun Microsystems, Inc. All rights reserved.
23 * Use is subject to license terms.
24 * Copyright (c) 2011 Bayard G. Bell. All rights reserved.
25 */
26
27
28 /*
29 * MT STREAMS Virtual Console Redirection Device Driver
30 */
31
32 #include <sys/types.h>
33 #include <sys/param.h>
34 #include <sys/errno.h>
35 #include <sys/kmem.h>
36 #include <sys/stat.h>
37 #include <sys/stream.h>
38 #include <sys/stropts.h>
39 #include <sys/strsun.h>
40 #include <sys/debug.h>
41 #include <sys/thread.h>
42 #include <sys/conf.h>
43 #include <sys/ddi.h>
44 #include <sys/sunddi.h>
45 #include <sys/tty.h>
46 #include <sys/cvc.h>
47 #include <sys/conf.h>
48 #include <sys/modctl.h>
49
50
51 /*
52 * Routine to to register/unregister our queue for console output and pass
53 * redirected data to the console. The cvc driver will do a putnext using
54 * our queue, so we will not see the redirected console data.
55 */
56 extern int cvc_redir(mblk_t *);
57 extern int cvc_register(queue_t *);
58 extern int cvc_unregister(queue_t *);
59
60 static int cvcr_info(dev_info_t *, ddi_info_cmd_t, void *, void **);
61 static int cvcr_attach(dev_info_t *, ddi_attach_cmd_t);
62 static int cvcr_detach(dev_info_t *, ddi_detach_cmd_t);
63 static int cvcr_wput(queue_t *, mblk_t *);
64 static int cvcr_open(queue_t *, dev_t *, int, int, cred_t *);
65 static int cvcr_close(queue_t *, int, cred_t *);
66 static void cvcr_ioctl(queue_t *, mblk_t *);
67
68 static dev_info_t *cvcr_dip;
69 static int cvcr_suspend = 0;
70
71 static struct module_info minfo = {
72 1314, /* mi_idnum Bad luck number +1 ;-) */
73 "cvcredir", /* mi_idname */
74 0, /* mi_minpsz */
75 INFPSZ, /* mi_maxpsz */
76 2048, /* mi_hiwat */
77 2048 /* mi_lowat */
78 };
79
80 static struct qinit cvcr_rinit = {
81 NULL, /* qi_putp */
82 NULL, /* qi_srvp */
83 cvcr_open, /* qi_qopen */
84 cvcr_close, /* qi_qclose */
85 NULL, /* qi_qadmin */
86 &minfo, /* qi_minfo */
87 NULL /* qi_mstat */
88 };
89
90 static struct qinit cvcr_winit = {
91 cvcr_wput, /* qi_putp */
92 NULL, /* qi_srvp */
93 cvcr_open, /* qi_qopen */
94 cvcr_close, /* qi_qclose */
95 NULL, /* qi_qadmin */
96 &minfo, /* qi_minfo */
97 NULL /* qi_mstat */
98 };
99
100 struct streamtab cvcrinfo = {
101 &cvcr_rinit, /* st_rdinit */
102 &cvcr_winit, /* st_wrinit */
103 NULL, /* st_muxrinit */
104 NULL /* st_muxwrinit */
105 };
106
107 DDI_DEFINE_STREAM_OPS(cvcrops, nulldev, nulldev, cvcr_attach,
108 cvcr_detach, nodev, cvcr_info, (D_MTPERQ | D_MP), &cvcrinfo,
109 ddi_quiesce_not_supported);
110
111 static struct modldrv modldrv = {
112 &mod_driverops, /* Type of module. This one is a pseudo driver */
113 "CVC redirect driver 'cvcredir'",
114 &cvcrops, /* driver ops */
115 };
116
117 static struct modlinkage modlinkage = {
118 MODREV_1,
119 &modldrv,
120 NULL
121 };
122
123 int
_init(void)124 _init(void)
125 {
126 return (mod_install(&modlinkage));
127 }
128
129 int
_fini(void)130 _fini(void)
131 {
132 return (mod_remove(&modlinkage));
133 }
134
135 int
_info(struct modinfo * modinfop)136 _info(struct modinfo *modinfop)
137 {
138 return (mod_info(&modlinkage, modinfop));
139 }
140
141 static int
cvcr_attach(dev_info_t * devi,ddi_attach_cmd_t cmd)142 cvcr_attach(dev_info_t *devi, ddi_attach_cmd_t cmd)
143 {
144 #ifdef lint
145 cvcr_suspend = cvcr_suspend;
146 #endif
147 if (cmd == DDI_RESUME) {
148 cvcr_suspend = 0;
149 } else {
150 if (ddi_create_minor_node(devi, "cvcredir", S_IFCHR,
151 0, DDI_PSEUDO, NULL) == DDI_FAILURE) {
152 ddi_remove_minor_node(devi, NULL);
153 return (-1);
154 }
155 cvcr_dip = devi;
156 }
157 return (DDI_SUCCESS);
158 }
159
160 static int
cvcr_detach(dev_info_t * dip,ddi_detach_cmd_t cmd)161 cvcr_detach(dev_info_t *dip, ddi_detach_cmd_t cmd)
162 {
163 if (cmd == DDI_SUSPEND) {
164 cvcr_suspend = 1;
165 } else {
166 if (cmd != DDI_DETACH) {
167 return (DDI_FAILURE);
168 }
169 ddi_remove_minor_node(dip, NULL);
170 }
171 return (DDI_SUCCESS);
172 }
173
174 /* ARGSUSED */
175 static int
cvcr_info(dev_info_t * dip,ddi_info_cmd_t infocmd,void * arg,void ** result)176 cvcr_info(dev_info_t *dip, ddi_info_cmd_t infocmd, void *arg, void **result)
177 {
178 register int error;
179
180 switch (infocmd) {
181 case DDI_INFO_DEVT2DEVINFO:
182 if (cvcr_dip == NULL) {
183 error = DDI_FAILURE;
184 } else {
185 *result = (void *)cvcr_dip;
186 error = DDI_SUCCESS;
187 }
188 break;
189 case DDI_INFO_DEVT2INSTANCE:
190 *result = (void *)0;
191 error = DDI_SUCCESS;
192 break;
193 default:
194 error = DDI_FAILURE;
195 }
196 return (error);
197 }
198
199 /* ARGSUSED */
200 static int
cvcr_open(queue_t * q,dev_t * dev,int flag,int sflag,cred_t * cred)201 cvcr_open(queue_t *q, dev_t *dev, int flag, int sflag, cred_t *cred)
202 {
203 WR(q)->q_ptr = q->q_ptr = (char *)2;
204 /*
205 * call into the cvc driver to register our queue. cvc will use
206 * our queue to send console output data upstream (our stream)to
207 * cvcd which has us open and is reading console data.
208 */
209 if (cvc_register(RD(q)) == -1) {
210 cmn_err(CE_WARN, "cvcr_open: cvc_register failed for q = 0x%p",
211 (void *)q);
212 }
213 return (0);
214 }
215
216 /* ARGSUSED */
217 static int
cvcr_close(queue_t * q,int flag,cred_t * cred)218 cvcr_close(queue_t *q, int flag, cred_t *cred)
219 {
220 /*
221 * call into the cvc driver to un-register our queue. cvc will
222 * no longer use our queue to send console output data upstream.
223 */
224 (void) cvc_unregister(RD(q));
225 WR(q)->q_ptr = q->q_ptr = NULL;
226 return (0);
227 }
228
229 static int
cvcr_wput(queue_t * q,mblk_t * mp)230 cvcr_wput(queue_t *q, mblk_t *mp)
231 {
232 /*
233 * Handle BREAK key for debugger and TIOCSWINSZ.
234 */
235 if (mp->b_datap->db_type == M_IOCTL) {
236 cvcr_ioctl(q, mp);
237 return (0);
238 }
239 /*
240 * Call into the cvc driver to put console input data on
241 * its upstream queue to be picked up by the console driver.
242 */
243 if (cvc_redir(mp) != 0)
244 freemsg(mp);
245 return (0);
246 }
247
248 static void
cvcr_ioctl(queue_t * q,mblk_t * mp)249 cvcr_ioctl(queue_t *q, mblk_t *mp)
250 {
251 struct iocblk *iocp = (struct iocblk *)mp->b_rptr;
252 int error;
253
254 switch (iocp->ioc_cmd) {
255 case CVC_BREAK:
256 abort_sequence_enter(NULL);
257 miocack(q, mp, 0, 0);
258 break;
259
260 case CVC_DISCONNECT:
261 case TIOCSWINSZ:
262 /*
263 * Generate a SIGHUP or SIGWINCH to the console. Note in this
264 * case cvc_redir does not free up mp, so we can reuse it for
265 * the ACK/NAK.
266 */
267 error = cvc_redir(mp);
268 if (error != 0)
269 miocnak(q, mp, 0, error);
270 else
271 miocack(q, mp, 0, 0);
272 break;
273
274 default:
275 miocnak(q, mp, 0, EINVAL);
276 break;
277 }
278 }
279