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         /*
 118          * console is defined by "console" property, with
 119          * fallback on the old "input-device" property.
 120          */
 121         (void) strcpy(inputdev, "text");        /* default to screen */
 122         if (!preader("console", inputdev, sizeof ((&pnv[0])->kanv_val)))
 123                 (void) preader("input-device", inputdev,
 124                     sizeof ((&pnv[0])->kanv_val));
 125 
 126         if (strncmp(inputdev, "tty", 3) == 0 &&
 127             inputdev[4] == '\0' &&
 128             inputdev[3] >= 'a' &&
 129             inputdev[3] < 'a' + KCTL_PROPNV_NTTYMD) {
 130                 (void) strcpy(outputdev, inputdev);
 131         } else {
 132                 (void) strcpy(inputdev, "keyboard");
 133                 (void) strcpy(outputdev, "screen");
 134         }
 135 
 136         /* Set tty modes or defaults. */
 137         for (i = KCTL_PROPNV_NIODEV; i < KCTL_PROPNV_NENT; i++) {
 138                 if (!preader((&pnv[i])->kanv_name, (&pnv[i])->kanv_val,
 139                     sizeof ((&pnv[0])->kanv_val)))
 140                         (void) strcpy((&pnv[i])->kanv_val, "9600,8,n,1,-");
 141         }
 142 
 143         *nprops = KCTL_PROPNV_NENT;
 144         return (pnv);
 145 }
 146 
 147 static void
 148 kctl_pcache_destroy(kmdb_auxv_nv_t *pnv)
 149 {
 150         kobj_free(pnv, sizeof (kmdb_auxv_nv_t) * KCTL_PROPNV_NENT);
 151 }
 152 
 153 void
 154 kctl_auxv_init_isadep(kmdb_auxv_t *kav, void *romp)
 155 {
 156         kav->kav_pcache = kctl_pcache_create(&kav->kav_nprops);
 157         kav->kav_romp = romp;
 158 }
 159 
 160 void
 161 kctl_auxv_fini_isadep(kmdb_auxv_t *kav)
 162 {
 163         if (kav->kav_pcache != NULL)
 164                 kctl_pcache_destroy(kav->kav_pcache);
 165 }
 166 
 167 int
 168 kctl_preactivate_isadep(void)
 169 {
 170         return (0);
 171 }
 172 
 173 /*ARGSUSED*/
 174 void
 175 kctl_activate_isadep(kdi_debugvec_t *dvec)
 176 {
 177         dvec->dv_kctl_vmready = hat_kdi_init;
 178 
 179         if (!kctl.kctl_boot_loaded)
 180                 hat_kdi_init();
 181 }
 182 
 183 void
 184 kctl_depreactivate_isadep(void)
 185 {
 186 }
 187 
 188 /*
 189  * Many common kernel functions assume that %gs can be deferenced, and
 190  * fail horribly if it cannot.  Ask the kernel to set up a temporary
 191  * mapping to a fake cpu_t so that we can call such functions during
 192  * initialization.
 193  */
 194 void *
 195 kctl_boot_tmpinit(void)
 196 {
 197         return (boot_kdi_tmpinit());
 198 }
 199 
 200 void
 201 kctl_boot_tmpfini(void *old)
 202 {
 203         boot_kdi_tmpfini(old);
 204 }