sys/x86/bios/vpd.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
   3  *
   4  * Copyright (c) 2003 Matthew N. Dodd <winter@jurai.net>
   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 __FBSDID("$FreeBSD$");
  31
  32 /*
  33  * VPD decoder for IBM systems (Thinkpads)
  34  * http://www-1.ibm.com/support/docview.wss?uid=psg1MIGR-45120
  35  */
  36
  37 #include <sys/param.h>
  38 #include <sys/systm.h>
  39 #include <sys/kernel.h>
  40 #include <sys/socket.h>
  41 #include <sys/sysctl.h>
  42
  43 #include <sys/module.h>
  44 #include <sys/bus.h>
  45
  46 #include <machine/bus.h>
  47 #include <machine/resource.h>
  48 #include <sys/rman.h>
  49
  50 #include <vm/vm.h>
  51 #include <vm/vm_param.h>
  52 #include <vm/pmap.h>
  53 #include <machine/md_var.h>
  54 #include <machine/pc/bios.h>
  55
  56 /*
  57  * Vital Product Data
  58  */
  59 struct vpd {
  60         u_int16_t       Header;                 /* 0x55AA */
  61         u_int8_t        Signature[3];           /* Always 'VPD' */
  62         u_int8_t        Length;                 /* Sructure Length */
  63
  64         u_int8_t        Reserved[7];            /* Reserved */
  65
  66         u_int8_t        BuildID[9];             /* BIOS Build ID */
  67         u_int8_t        BoxSerial[7];           /* Box Serial Number */
  68         u_int8_t        PlanarSerial[11];       /* Motherboard Serial Number */
  69         u_int8_t        MachType[7];            /* Machine Type/Model */
  70         u_int8_t        Checksum;               /* Checksum */
  71 } __packed;
  72
  73 struct vpd_softc {
  74         device_t                dev;
  75         struct resource *       res;
  76         int                     rid;
  77
  78         struct vpd *            vpd;
  79
  80         struct sysctl_ctx_list  ctx;
  81
  82         char            BuildID[10];
  83         char            BoxSerial[8];
  84         char            PlanarSerial[12];
  85         char            MachineType[5];
  86         char            MachineModel[4];
  87 };
  88
  89 #define VPD_START       0xf0000
  90 #define VPD_STEP        0x10
  91 #define VPD_OFF         2
  92 #define VPD_LEN         3
  93 #define VPD_SIG         "VPD"
  94
  95 #define RES2VPD(res)    ((struct vpd *)rman_get_virtual(res))
  96 #define ADDR2VPD(addr)  ((struct vpd *)BIOS_PADDRTOVADDR(addr))
  97
  98 static devclass_t vpd_devclass;
  99
 100 static void     vpd_identify    (driver_t *, device_t);
 101 static int      vpd_probe       (device_t);
 102 static int      vpd_attach      (device_t);
 103 static int      vpd_detach      (device_t);
 104 static int      vpd_modevent    (module_t, int, void *);
 105
 106 static int      vpd_cksum       (struct vpd *);
 107
 108 static SYSCTL_NODE(_hw, OID_AUTO, vpd, CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 109     NULL);
 110 static SYSCTL_NODE(_hw_vpd, OID_AUTO, machine,
 111     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 112     NULL);
 113 static SYSCTL_NODE(_hw_vpd_machine, OID_AUTO, type,
 114     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 115     NULL);
 116 static SYSCTL_NODE(_hw_vpd_machine, OID_AUTO, model,
 117     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 118     NULL);
 119 static SYSCTL_NODE(_hw_vpd, OID_AUTO, build_id,
 120     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 121     NULL);
 122 static SYSCTL_NODE(_hw_vpd, OID_AUTO, serial,
 123     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 124     NULL);
 125 static SYSCTL_NODE(_hw_vpd_serial, OID_AUTO, box,
 126     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 127     NULL);
 128 static SYSCTL_NODE(_hw_vpd_serial, OID_AUTO, planar,
 129     CTLFLAG_RD | CTLFLAG_MPSAFE, NULL,
 130     NULL);
 131
 132 static void
 133 vpd_identify (driver_t *driver, device_t parent)
 134 {
 135         device_t child;
 136         u_int32_t addr;
 137         int length;
 138         int rid;
 139
 140         if (!device_is_alive(parent))
 141                 return;
 142
 143         addr = bios_sigsearch(VPD_START, VPD_SIG, VPD_LEN, VPD_STEP, VPD_OFF);
 144         if (addr != 0) {
 145                 rid = 0;
 146                 length = ADDR2VPD(addr)->Length;
 147
 148                 child = BUS_ADD_CHILD(parent, 5, "vpd", -1);
 149                 device_set_driver(child, driver);
 150                 bus_set_resource(child, SYS_RES_MEMORY, rid, addr, length);
 151                 device_set_desc(child, "Vital Product Data Area");
 152         }
 153
 154         return;
 155 }
 156
 157 static int
 158 vpd_probe (device_t dev)
 159 {
 160         struct resource *res;
 161         int rid;
 162         int error;
 163
 164         error = 0;
 165         rid = 0;
 166         res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &rid, RF_ACTIVE);
 167         if (res == NULL) {
 168                 device_printf(dev, "Unable to allocate memory resource.\n");
 169                 error = ENOMEM;
 170                 goto bad;
 171         }
 172
 173         if (vpd_cksum(RES2VPD(res)))
 174                 device_printf(dev, "VPD checksum failed.  BIOS update may be required.\n");
 175
 176 bad:
 177         if (res)
 178                 bus_release_resource(dev, SYS_RES_MEMORY, rid, res);
 179         return (error);
 180 }
 181
 182 static int
 183 vpd_attach (device_t dev)
 184 {
 185         struct vpd_softc *sc;
 186         char unit[4];
 187         int error;
 188
 189         sc = device_get_softc(dev);
 190         error = 0;
 191
 192         sc->dev = dev;
 193         sc->rid = 0;
 194         sc->res = bus_alloc_resource_any(dev, SYS_RES_MEMORY, &sc->rid,
 195                 RF_ACTIVE);
 196         if (sc->res == NULL) {
 197                 device_printf(dev, "Unable to allocate memory resource.\n");
 198                 error = ENOMEM;
 199                 goto bad;
 200         }
 201         sc->vpd = RES2VPD(sc->res);
 202
 203         snprintf(unit, sizeof(unit), "%d", device_get_unit(sc->dev));
 204         snprintf(sc->MachineType, 5, "%.4s", sc->vpd->MachType);
 205         snprintf(sc->MachineModel, 4, "%.3s", sc->vpd->MachType+4);
 206         snprintf(sc->BuildID, 10, "%.9s", sc->vpd->BuildID);
 207         snprintf(sc->BoxSerial, 8, "%.7s", sc->vpd->BoxSerial);
 208         snprintf(sc->PlanarSerial, 12, "%.11s", sc->vpd->PlanarSerial);
 209
 210         sysctl_ctx_init(&sc->ctx);
 211         SYSCTL_ADD_STRING(&sc->ctx,
 212                 SYSCTL_STATIC_CHILDREN(_hw_vpd_machine_type), OID_AUTO,
 213                 unit, CTLFLAG_RD, sc->MachineType, 0, NULL);
 214         SYSCTL_ADD_STRING(&sc->ctx,
 215                 SYSCTL_STATIC_CHILDREN(_hw_vpd_machine_model), OID_AUTO,
 216                 unit, CTLFLAG_RD, sc->MachineModel, 0, NULL);
 217         SYSCTL_ADD_STRING(&sc->ctx,
 218                 SYSCTL_STATIC_CHILDREN(_hw_vpd_build_id), OID_AUTO,
 219                 unit, CTLFLAG_RD, sc->BuildID, 0, NULL);
 220         SYSCTL_ADD_STRING(&sc->ctx,
 221                 SYSCTL_STATIC_CHILDREN(_hw_vpd_serial_box), OID_AUTO,
 222                 unit, CTLFLAG_RD, sc->BoxSerial, 0, NULL);
 223         SYSCTL_ADD_STRING(&sc->ctx,
 224                 SYSCTL_STATIC_CHILDREN(_hw_vpd_serial_planar), OID_AUTO,
 225                 unit, CTLFLAG_RD, sc->PlanarSerial, 0, NULL);
 226
 227         device_printf(dev, "Machine Type: %.4s, Model: %.3s, Build ID: %.9s\n",
 228                 sc->MachineType, sc->MachineModel, sc->BuildID);
 229         device_printf(dev, "Box Serial: %.7s, Planar Serial: %.11s\n",
 230                 sc->BoxSerial, sc->PlanarSerial);
 231
 232         return (0);
 233 bad:
 234         if (sc->res)
 235                 bus_release_resource(dev, SYS_RES_MEMORY, sc->rid, sc->res);
 236         return (error);
 237 }
 238
 239 static int
 240 vpd_detach (device_t dev)
 241 {
 242         struct vpd_softc *sc;
 243
 244         sc = device_get_softc(dev);
 245
 246         if (sc->res)
 247                 bus_release_resource(dev, SYS_RES_MEMORY, sc->rid, sc->res);
 248
 249         sysctl_ctx_free(&sc->ctx);
 250
 251         return (0);
 252 }
 253
 254 static int
 255 vpd_modevent (mod, what, arg)
 256         module_t        mod;
 257         int             what;
 258         void *          arg;
 259 {
 260         device_t *      devs;
 261         int             count;
 262         int             i;
 263
 264         switch (what) {
 265         case MOD_LOAD:
 266                 break;
 267         case MOD_UNLOAD:
 268                 devclass_get_devices(vpd_devclass, &devs, &count);
 269                 for (i = 0; i < count; i++) {
 270                         device_delete_child(device_get_parent(devs[i]), devs[i]);
 271                 }
 272                 break;
 273         default:
 274                 break;
 275         }
 276
 277         return (0);
 278 }
 279
 280 static device_method_t vpd_methods[] = {
 281         /* Device interface */
 282         DEVMETHOD(device_identify,      vpd_identify),
 283         DEVMETHOD(device_probe,         vpd_probe),
 284         DEVMETHOD(device_attach,        vpd_attach),
 285         DEVMETHOD(device_detach,        vpd_detach),
 286         { 0, 0 }
 287 };
 288
 289 static driver_t vpd_driver = {
 290         "vpd",
 291         vpd_methods,
 292         sizeof(struct vpd_softc),
 293 };
 294
 295 DRIVER_MODULE(vpd, nexus, vpd_driver, vpd_devclass, vpd_modevent, 0);
 296 MODULE_VERSION(vpd, 1);
 297
 298 /*
 299  * Perform a checksum over the VPD structure, starting with
 300  * the BuildID.  (Jean Delvare <khali@linux-fr.org>)
 301  */
 302 static int
 303 vpd_cksum (struct vpd *v)
 304 {
 305         u_int8_t *ptr;
 306         u_int8_t cksum;
 307         int i;
 308
 309         ptr = (u_int8_t *)v;
 310         cksum = 0;
 311         for (i = offsetof(struct vpd, BuildID); i < v->Length ; i++)
 312                 cksum += ptr[i];
 313         return (cksum);
 314 }