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 2007 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 #pragma ident "%Z%%M% %I% %E% SMI"
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 four console properties:
82 * input-device, output-device, ttya-mode, ttyb-mode.
83 */
84 #define KCTL_PROPNV_NENT 4
85
86 static kmdb_auxv_nv_t *
87 kctl_pcache_create(int *nprops)
88 {
89 int (*preader)(char *, char *, int);
90 kmdb_auxv_nv_t *pnv;
91 size_t psz = sizeof (kmdb_auxv_nv_t) * KCTL_PROPNV_NENT;
92
93 if (kctl.kctl_boot_loaded) {
94 preader = kctl_boot_prop_read;
95 } else {
96 preader = kctl_ddi_prop_read;
97 }
98
99 pnv = kobj_alloc(psz, KM_WAIT);
100
101 (void) strcpy((&pnv[0])->kanv_name, "input-device");
102 (void) strcpy((&pnv[1])->kanv_name, "output-device");
103 (void) strcpy((&pnv[2])->kanv_name, "ttya-mode");
104 (void) strcpy((&pnv[3])->kanv_name, "ttyb-mode");
105
106 /*
107 * console is defined by "console" property, with
108 * fallback on the old "input-device" property.
109 */
110 (void) strcpy((&pnv[0])->kanv_val, "text"); /* default to screen */
111 if (!preader("console", (&pnv[0])->kanv_val,
112 sizeof ((&pnv[0])->kanv_val)))
113 (void) preader("input-device", (&pnv[0])->kanv_val,
114 sizeof ((&pnv[0])->kanv_val));
115
116 if (strcmp((&pnv[0])->kanv_val, "ttya") == 0 ||
117 strcmp((&pnv[0])->kanv_val, "ttyb") == 0) {
118 (void) strcpy((&pnv[1])->kanv_val, (&pnv[0])->kanv_val);
119 } else {
120 (void) strcpy((&pnv[0])->kanv_val, "keyboard");
121 (void) strcpy((&pnv[1])->kanv_val, "screen");
122 }
123
124 if (!preader((&pnv[2])->kanv_name, (&pnv[2])->kanv_val,
125 sizeof ((&pnv[2])->kanv_val)))
126 (void) strcpy((&pnv[2])->kanv_val, "9600,8,n,1,-");
127
128 if (!preader((&pnv[3])->kanv_name, (&pnv[3])->kanv_val,
129 sizeof ((&pnv[3])->kanv_val)))
130 (void) strcpy((&pnv[3])->kanv_val, "9600,8,n,1,-");
131
132 *nprops = KCTL_PROPNV_NENT;
133 return (pnv);
134 }
135
136 static void
137 kctl_pcache_destroy(kmdb_auxv_nv_t *pnv)
138 {
139 kobj_free(pnv, sizeof (kmdb_auxv_nv_t) * KCTL_PROPNV_NENT);
140 }
141
142 void
143 kctl_auxv_init_isadep(kmdb_auxv_t *kav, void *romp)
144 {
145 kav->kav_pcache = kctl_pcache_create(&kav->kav_nprops);
146 kav->kav_romp = romp;
147 }
148
149 void
150 kctl_auxv_fini_isadep(kmdb_auxv_t *kav)
151 {
152 if (kav->kav_pcache != NULL)
153 kctl_pcache_destroy(kav->kav_pcache);
154 }
155
156 int
157 kctl_preactivate_isadep(void)
158 {
159 return (0);
160 }
161
162 /*ARGSUSED*/
163 void
164 kctl_activate_isadep(kdi_debugvec_t *dvec)
165 {
166 dvec->dv_kctl_vmready = hat_kdi_init;
167
168 if (!kctl.kctl_boot_loaded)
169 hat_kdi_init();
170 }
171
172 void
173 kctl_depreactivate_isadep(void)
174 {
175 }
176
177 /*
178 * Many common kernel functions assume that %gs can be deferenced, and
179 * fail horribly if it cannot. Ask the kernel to set up a temporary
180 * mapping to a fake cpu_t so that we can call such functions during
181 * initialization.
182 */
183 void *
184 kctl_boot_tmpinit(void)
185 {
186 return (boot_kdi_tmpinit());
187 }
188
189 void
190 kctl_boot_tmpfini(void *old)
191 {
192 boot_kdi_tmpfini(old);
193 }