xref: /illumos-gate/usr/src/cmd/mdb/intel/kmdb/kctl/kctl_isadep.c (revision 1f5207b7604fb44407eb4342aff613f7c4508508)
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 /*
23  * Copyright (c) 2012 Gary Mills
24  *
25  * Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
26  * Use is subject to license terms.
27  */
28 
29 #include <kmdb/kmdb_auxv.h>
30 #include <kmdb/kctl/kctl.h>
31 
32 #include <sys/bootconf.h>
33 #include <sys/kobj.h>
34 #include <sys/kobj_impl.h>
35 #include <sys/cpuvar.h>
36 #include <sys/kdi_impl.h>
37 #include <sys/x86_archext.h>
38 #include <sys/controlregs.h>
39 #include <sys/archsystm.h>
40 
41 static int
42 kctl_boot_prop_read(char *pname, char *prop_buf, int buf_len)
43 {
44 	struct bootops *ops = kctl.kctl_boot_ops;
45 	int len;
46 
47 	len = BOP_GETPROPLEN(ops, pname);
48 	if (len > 0 && len <= buf_len) {
49 		(void) BOP_GETPROP(ops, pname, (void *)prop_buf);
50 		return (1);
51 	}
52 
53 	return (0);
54 }
55 
56 static int
57 kctl_ddi_prop_read(char *pname, char *prop_buf, int buf_len)
58 {
59 	dev_info_t *dip = ddi_root_node();
60 	char *val;
61 	int ret = 0;
62 
63 	if (ddi_prop_lookup_string(DDI_DEV_T_ANY, dip,
64 	    DDI_PROP_DONTPASS, pname, &val) != DDI_SUCCESS)
65 		return (0);
66 
67 	if (strlen(val) < buf_len) {
68 		(void) strcpy(prop_buf, val);
69 		ret = 1;
70 	}
71 
72 	ddi_prop_free(val);
73 	return (ret);
74 }
75 
76 /*
77  * We don't have any property-walking routines, so we have to specifically
78  * query and thus have guilty knowledge of the properties that the
79  * debugger wants to see.
80  *
81  * Here actually we only support six console properties:
82  *     input-device, output-device, tty[a-d]-mode.
83  */
84 #define	KCTL_PROPNV_NIODEV	2
85 #define	KCTL_PROPNV_NTTYMD	4
86 #define	KCTL_PROPNV_NENT	(KCTL_PROPNV_NIODEV + KCTL_PROPNV_NTTYMD)
87 
88 static kmdb_auxv_nv_t *
89 kctl_pcache_create(int *nprops)
90 {
91 	int (*preader)(char *, char *, int);
92 	kmdb_auxv_nv_t *pnv;
93 	size_t psz = sizeof (kmdb_auxv_nv_t) * KCTL_PROPNV_NENT;
94 	char *inputdev, *outputdev;
95 	int i;
96 	char ttymode[] = "ttyX-mode";
97 
98 	if (kctl.kctl_boot_loaded) {
99 		preader = kctl_boot_prop_read;
100 	} else {
101 		preader = kctl_ddi_prop_read;
102 	}
103 
104 	pnv = kobj_alloc(psz, KM_WAIT);
105 	inputdev = (&pnv[0])->kanv_val;
106 	outputdev = (&pnv[1])->kanv_val;
107 
108 	/* Set the property names. */
109 	(void) strcpy((&pnv[0])->kanv_name, "input-device");
110 	(void) strcpy((&pnv[1])->kanv_name, "output-device");
111 	for (i = 0; i < KCTL_PROPNV_NTTYMD; i++) {
112 		ttymode[3] = 'a' + i;
113 		(void) strcpy((&pnv[i + KCTL_PROPNV_NIODEV])->kanv_name,
114 		    ttymode);
115 	}
116 
117 	(void) strcpy(inputdev, "text");	/* default to screen */
118 	if (!preader("diag-device", inputdev, sizeof ((&pnv[0])->kanv_val)) &&
119 	    !preader("console", inputdev, sizeof ((&pnv[0])->kanv_val))) {
120 		(void) preader("input-device", inputdev,
121 		    sizeof ((&pnv[0])->kanv_val));
122 	}
123 
124 	if (strncmp(inputdev, "tty", 3) == 0 &&
125 	    inputdev[4] == '\0' &&
126 	    inputdev[3] >= 'a' &&
127 	    inputdev[3] < 'a' + KCTL_PROPNV_NTTYMD) {
128 		(void) strcpy(outputdev, inputdev);
129 	} else {
130 		(void) strcpy(inputdev, "keyboard");
131 		(void) strcpy(outputdev, "screen");
132 	}
133 
134 	/* Set tty modes or defaults. */
135 	for (i = KCTL_PROPNV_NIODEV; i < KCTL_PROPNV_NENT; i++) {
136 		if (!preader((&pnv[i])->kanv_name, (&pnv[i])->kanv_val,
137 		    sizeof ((&pnv[0])->kanv_val)))
138 			(void) strcpy((&pnv[i])->kanv_val, "9600,8,n,1,-");
139 	}
140 
141 	*nprops = KCTL_PROPNV_NENT;
142 	return (pnv);
143 }
144 
145 static void
146 kctl_pcache_destroy(kmdb_auxv_nv_t *pnv)
147 {
148 	kobj_free(pnv, sizeof (kmdb_auxv_nv_t) * KCTL_PROPNV_NENT);
149 }
150 
151 void
152 kctl_auxv_init_isadep(kmdb_auxv_t *kav, void *romp)
153 {
154 	kav->kav_pcache = kctl_pcache_create(&kav->kav_nprops);
155 	kav->kav_romp = romp;
156 }
157 
158 void
159 kctl_auxv_fini_isadep(kmdb_auxv_t *kav)
160 {
161 	if (kav->kav_pcache != NULL)
162 		kctl_pcache_destroy(kav->kav_pcache);
163 }
164 
165 int
166 kctl_preactivate_isadep(void)
167 {
168 	return (0);
169 }
170 
171 /*ARGSUSED*/
172 void
173 kctl_activate_isadep(kdi_debugvec_t *dvec)
174 {
175 	dvec->dv_kctl_vmready = hat_kdi_init;
176 
177 	if (!kctl.kctl_boot_loaded)
178 		hat_kdi_init();
179 }
180 
181 void
182 kctl_depreactivate_isadep(void)
183 {
184 }
185 
186 /*
187  * Many common kernel functions assume that %gs can be deferenced, and
188  * fail horribly if it cannot.  Ask the kernel to set up a temporary
189  * mapping to a fake cpu_t so that we can call such functions during
190  * initialization.
191  */
192 void *
193 kctl_boot_tmpinit(void)
194 {
195 	return (boot_kdi_tmpinit());
196 }
197 
198 void
199 kctl_boot_tmpfini(void *old)
200 {
201 	boot_kdi_tmpfini(old);
202 }
203