lib/smbios.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * Copyright (C) 2015, Bin Meng <bmeng.cn@gmail.com>
   4  *
   5  * Adapted from coreboot src/arch/x86/smbios.c
   6  */
   7
   8 #include <common.h>
   9 #include <dm.h>
  10 #include <env.h>
  11 #include <mapmem.h>
  12 #include <smbios.h>
  13 #include <sysinfo.h>
  14 #include <tables_csum.h>
  15 #include <version.h>
  16 #ifdef CONFIG_CPU
  17 #include <cpu.h>
  18 #include <dm/uclass-internal.h>
  19 #endif
  20
  21 DECLARE_GLOBAL_DATA_PTR;
  22
  23 enum {
  24         SMBIOS_STR_MAX  = 64,   /* Maximum length allowed for a string */
  25 };
  26
  27 /**
  28  * struct smbios_ctx - context for writing SMBIOS tables
  29  *
  30  * @node:       node containing the information to write (ofnode_null() if none)
  31  * @dev:        sysinfo device to use (NULL if none)
  32  * @eos:        end-of-string pointer for the table being processed. This is set
  33  *              up when we start processing a table
  34  * @next_ptr:   pointer to the start of the next string to be added. When the
  35  *              table is nopt empty, this points to the byte after the \0 of the
  36  *              previous string.
  37  * @last_str:   points to the last string that was written to the table, or NULL
  38  *              if none
  39  */
  40 struct smbios_ctx {
  41         ofnode node;
  42         struct udevice *dev;
  43         char *eos;
  44         char *next_ptr;
  45         char *last_str;
  46 };
  47
  48 /**
  49  * Function prototype to write a specific type of SMBIOS structure
  50  *
  51  * @addr:       start address to write the structure
  52  * @handle:     the structure's handle, a unique 16-bit number
  53  * @ctx:        context for writing the tables
  54  * @return:     size of the structure
  55  */
  56 typedef int (*smbios_write_type)(ulong *addr, int handle,
  57                                  struct smbios_ctx *ctx);
  58
  59 /**
  60  * struct smbios_write_method - Information about a table-writing function
  61  *
  62  * @write: Function to call
  63  * @subnode_name: Name of subnode which has the information for this function,
  64  *      NULL if none
  65  */
  66 struct smbios_write_method {
  67         smbios_write_type write;
  68         const char *subnode_name;
  69 };
  70
  71 /**
  72  * smbios_add_string() - add a string to the string area
  73  *
  74  * This adds a string to the string area which is appended directly after
  75  * the formatted portion of an SMBIOS structure.
  76  *
  77  * @ctx:        SMBIOS context
  78  * @str:        string to add
  79  * @return:     string number in the string area (1 or more)
  80  */
  81 static int smbios_add_string(struct smbios_ctx *ctx, const char *str)
  82 {
  83         int i = 1;
  84         char *p = ctx->eos;
  85
  86         if (!*str)
  87                 str = "Unknown";
  88
  89         for (;;) {
  90                 if (!*p) {
  91                         ctx->last_str = p;
  92                         strcpy(p, str);
  93                         p += strlen(str);
  94                         *p++ = '\0';
  95                         ctx->next_ptr = p;
  96                         *p++ = '\0';
  97
  98                         return i;
  99                 }
 100
 101                 if (!strcmp(p, str)) {
 102                         ctx->last_str = p;
 103                         return i;
 104                 }
 105
 106                 p += strlen(p) + 1;
 107                 i++;
 108         }
 109 }
 110
 111 /**
 112  * smbios_add_prop_si() - Add a property from the devicetree or sysinfo
 113  *
 114  * Sysinfo is used if available, with a fallback to devicetree
 115  *
 116  * @ctx:        context for writing the tables
 117  * @prop:       property to write
 118  * @return 0 if not found, else SMBIOS string number (1 or more)
 119  */
 120 static int smbios_add_prop_si(struct smbios_ctx *ctx, const char *prop,
 121                               int sysinfo_id)
 122 {
 123         if (sysinfo_id && ctx->dev) {
 124                 char val[SMBIOS_STR_MAX];
 125                 int ret;
 126
 127                 ret = sysinfo_get_str(ctx->dev, sysinfo_id, sizeof(val), val);
 128                 if (!ret)
 129                         return smbios_add_string(ctx, val);
 130         }
 131         if (IS_ENABLED(CONFIG_OF_CONTROL)) {
 132                 const char *str;
 133
 134                 str = ofnode_read_string(ctx->node, prop);
 135                 if (str)
 136                         return smbios_add_string(ctx, str);
 137         }
 138
 139         return 0;
 140 }
 141
 142 /**
 143  * smbios_add_prop() - Add a property from the devicetree
 144  *
 145  * @prop:       property to write
 146  * @return 0 if not found, else SMBIOS string number (1 or more)
 147  */
 148 static int smbios_add_prop(struct smbios_ctx *ctx, const char *prop)
 149 {
 150         return smbios_add_prop_si(ctx, prop, SYSINFO_ID_NONE);
 151 }
 152
 153 static void smbios_set_eos(struct smbios_ctx *ctx, char *eos)
 154 {
 155         ctx->eos = eos;
 156         ctx->next_ptr = eos;
 157         ctx->last_str = NULL;
 158 }
 159
 160 int smbios_update_version(const char *version)
 161 {
 162         char *ptr = gd->smbios_version;
 163         uint old_len, len;
 164
 165         if (!ptr)
 166                 return log_ret(-ENOENT);
 167
 168         /*
 169          * This string is supposed to have at least enough bytes and is
 170          * padded with spaces. Update it, taking care not to move the
 171          * \0 terminator, so that other strings in the string table
 172          * are not disturbed. See smbios_add_string()
 173          */
 174         old_len = strnlen(ptr, SMBIOS_STR_MAX);
 175         len = strnlen(version, SMBIOS_STR_MAX);
 176         if (len > old_len)
 177                 return log_ret(-ENOSPC);
 178
 179         log_debug("Replacing SMBIOS type 0 version string '%s'\n", ptr);
 180         memcpy(ptr, version, len);
 181 #ifdef LOG_DEBUG
 182         print_buffer((ulong)ptr, ptr, 1, old_len + 1, 0);
 183 #endif
 184
 185         return 0;
 186 }
 187
 188 /**
 189  * smbios_string_table_len() - compute the string area size
 190  *
 191  * This computes the size of the string area including the string terminator.
 192  *
 193  * @ctx:        SMBIOS context
 194  * @return:     string area size
 195  */
 196 static int smbios_string_table_len(const struct smbios_ctx *ctx)
 197 {
 198         /* Allow for the final \0 after all strings */
 199         return (ctx->next_ptr + 1) - ctx->eos;
 200 }
 201
 202 static int smbios_write_type0(ulong *current, int handle,
 203                               struct smbios_ctx *ctx)
 204 {
 205         struct smbios_type0 *t;
 206         int len = sizeof(struct smbios_type0);
 207
 208         t = map_sysmem(*current, len);
 209         memset(t, 0, sizeof(struct smbios_type0));
 210         fill_smbios_header(t, SMBIOS_BIOS_INFORMATION, len, handle);
 211         smbios_set_eos(ctx, t->eos);
 212         t->vendor = smbios_add_string(ctx, "U-Boot");
 213
 214         t->bios_ver = smbios_add_prop(ctx, "version");
 215         if (!t->bios_ver)
 216                 t->bios_ver = smbios_add_string(ctx, PLAIN_VERSION);
 217         if (t->bios_ver)
 218                 gd->smbios_version = ctx->last_str;
 219         log_debug("smbios_version = %p: '%s'\n", gd->smbios_version,
 220                   gd->smbios_version);
 221 #ifdef LOG_DEBUG
 222         print_buffer((ulong)gd->smbios_version, gd->smbios_version,
 223                      1, strlen(gd->smbios_version) + 1, 0);
 224 #endif
 225         t->bios_release_date = smbios_add_string(ctx, U_BOOT_DMI_DATE);
 226 #ifdef CONFIG_ROM_SIZE
 227         t->bios_rom_size = (CONFIG_ROM_SIZE / 65536) - 1;
 228 #endif
 229         t->bios_characteristics = BIOS_CHARACTERISTICS_PCI_SUPPORTED |
 230                                   BIOS_CHARACTERISTICS_SELECTABLE_BOOT |
 231                                   BIOS_CHARACTERISTICS_UPGRADEABLE;
 232 #ifdef CONFIG_GENERATE_ACPI_TABLE
 233         t->bios_characteristics_ext1 = BIOS_CHARACTERISTICS_EXT1_ACPI;
 234 #endif
 235 #ifdef CONFIG_EFI_LOADER
 236         t->bios_characteristics_ext1 |= BIOS_CHARACTERISTICS_EXT1_UEFI;
 237 #endif
 238         t->bios_characteristics_ext2 = BIOS_CHARACTERISTICS_EXT2_TARGET;
 239
 240         /* bios_major_release has only one byte, so drop century */
 241         t->bios_major_release = U_BOOT_VERSION_NUM % 100;
 242         t->bios_minor_release = U_BOOT_VERSION_NUM_PATCH;
 243         t->ec_major_release = 0xff;
 244         t->ec_minor_release = 0xff;
 245
 246         len = t->length + smbios_string_table_len(ctx);
 247         *current += len;
 248         unmap_sysmem(t);
 249
 250         return len;
 251 }
 252
 253 static int smbios_write_type1(ulong *current, int handle,
 254                               struct smbios_ctx *ctx)
 255 {
 256         struct smbios_type1 *t;
 257         int len = sizeof(struct smbios_type1);
 258         char *serial_str = env_get("serial#");
 259
 260         t = map_sysmem(*current, len);
 261         memset(t, 0, sizeof(struct smbios_type1));
 262         fill_smbios_header(t, SMBIOS_SYSTEM_INFORMATION, len, handle);
 263         smbios_set_eos(ctx, t->eos);
 264         t->manufacturer = smbios_add_prop(ctx, "manufacturer");
 265         t->product_name = smbios_add_prop(ctx, "product");
 266         t->version = smbios_add_prop_si(ctx, "version",
 267                                         SYSINFO_ID_SMBIOS_SYSTEM_VERSION);
 268         if (serial_str) {
 269                 t->serial_number = smbios_add_string(ctx, serial_str);
 270                 strncpy((char *)t->uuid, serial_str, sizeof(t->uuid));
 271         } else {
 272                 t->serial_number = smbios_add_prop(ctx, "serial");
 273         }
 274         t->sku_number = smbios_add_prop(ctx, "sku");
 275         t->family = smbios_add_prop(ctx, "family");
 276
 277         len = t->length + smbios_string_table_len(ctx);
 278         *current += len;
 279         unmap_sysmem(t);
 280
 281         return len;
 282 }
 283
 284 static int smbios_write_type2(ulong *current, int handle,
 285                               struct smbios_ctx *ctx)
 286 {
 287         struct smbios_type2 *t;
 288         int len = sizeof(struct smbios_type2);
 289
 290         t = map_sysmem(*current, len);
 291         memset(t, 0, sizeof(struct smbios_type2));
 292         fill_smbios_header(t, SMBIOS_BOARD_INFORMATION, len, handle);
 293         smbios_set_eos(ctx, t->eos);
 294         t->manufacturer = smbios_add_prop(ctx, "manufacturer");
 295         t->product_name = smbios_add_prop(ctx, "product");
 296         t->version = smbios_add_prop_si(ctx, "version",
 297                                         SYSINFO_ID_SMBIOS_BASEBOARD_VERSION);
 298         t->asset_tag_number = smbios_add_prop(ctx, "asset-tag");
 299         t->feature_flags = SMBIOS_BOARD_FEATURE_HOSTING;
 300         t->board_type = SMBIOS_BOARD_MOTHERBOARD;
 301
 302         len = t->length + smbios_string_table_len(ctx);
 303         *current += len;
 304         unmap_sysmem(t);
 305
 306         return len;
 307 }
 308
 309 static int smbios_write_type3(ulong *current, int handle,
 310                               struct smbios_ctx *ctx)
 311 {
 312         struct smbios_type3 *t;
 313         int len = sizeof(struct smbios_type3);
 314
 315         t = map_sysmem(*current, len);
 316         memset(t, 0, sizeof(struct smbios_type3));
 317         fill_smbios_header(t, SMBIOS_SYSTEM_ENCLOSURE, len, handle);
 318         smbios_set_eos(ctx, t->eos);
 319         t->manufacturer = smbios_add_prop(ctx, "manufacturer");
 320         t->chassis_type = SMBIOS_ENCLOSURE_DESKTOP;
 321         t->bootup_state = SMBIOS_STATE_SAFE;
 322         t->power_supply_state = SMBIOS_STATE_SAFE;
 323         t->thermal_state = SMBIOS_STATE_SAFE;
 324         t->security_status = SMBIOS_SECURITY_NONE;
 325
 326         len = t->length + smbios_string_table_len(ctx);
 327         *current += len;
 328         unmap_sysmem(t);
 329
 330         return len;
 331 }
 332
 333 static void smbios_write_type4_dm(struct smbios_type4 *t,
 334                                   struct smbios_ctx *ctx)
 335 {
 336         u16 processor_family = SMBIOS_PROCESSOR_FAMILY_UNKNOWN;
 337         const char *vendor = "Unknown";
 338         const char *name = "Unknown";
 339
 340 #ifdef CONFIG_CPU
 341         char processor_name[49];
 342         char vendor_name[49];
 343         struct udevice *cpu = NULL;
 344
 345         uclass_find_first_device(UCLASS_CPU, &cpu);
 346         if (cpu) {
 347                 struct cpu_plat *plat = dev_get_parent_plat(cpu);
 348
 349                 if (plat->family)
 350                         processor_family = plat->family;
 351                 t->processor_id[0] = plat->id[0];
 352                 t->processor_id[1] = plat->id[1];
 353
 354                 if (!cpu_get_vendor(cpu, vendor_name, sizeof(vendor_name)))
 355                         vendor = vendor_name;
 356                 if (!cpu_get_desc(cpu, processor_name, sizeof(processor_name)))
 357                         name = processor_name;
 358         }
 359 #endif
 360
 361         t->processor_family = processor_family;
 362         t->processor_manufacturer = smbios_add_string(ctx, vendor);
 363         t->processor_version = smbios_add_string(ctx, name);
 364 }
 365
 366 static int smbios_write_type4(ulong *current, int handle,
 367                               struct smbios_ctx *ctx)
 368 {
 369         struct smbios_type4 *t;
 370         int len = sizeof(struct smbios_type4);
 371
 372         t = map_sysmem(*current, len);
 373         memset(t, 0, sizeof(struct smbios_type4));
 374         fill_smbios_header(t, SMBIOS_PROCESSOR_INFORMATION, len, handle);
 375         smbios_set_eos(ctx, t->eos);
 376         t->processor_type = SMBIOS_PROCESSOR_TYPE_CENTRAL;
 377         smbios_write_type4_dm(t, ctx);
 378         t->status = SMBIOS_PROCESSOR_STATUS_ENABLED;
 379         t->processor_upgrade = SMBIOS_PROCESSOR_UPGRADE_NONE;
 380         t->l1_cache_handle = 0xffff;
 381         t->l2_cache_handle = 0xffff;
 382         t->l3_cache_handle = 0xffff;
 383         t->processor_family2 = t->processor_family;
 384
 385         len = t->length + smbios_string_table_len(ctx);
 386         *current += len;
 387         unmap_sysmem(t);
 388
 389         return len;
 390 }
 391
 392 static int smbios_write_type32(ulong *current, int handle,
 393                                struct smbios_ctx *ctx)
 394 {
 395         struct smbios_type32 *t;
 396         int len = sizeof(struct smbios_type32);
 397
 398         t = map_sysmem(*current, len);
 399         memset(t, 0, sizeof(struct smbios_type32));
 400         fill_smbios_header(t, SMBIOS_SYSTEM_BOOT_INFORMATION, len, handle);
 401         smbios_set_eos(ctx, t->eos);
 402
 403         *current += len;
 404         unmap_sysmem(t);
 405
 406         return len;
 407 }
 408
 409 static int smbios_write_type127(ulong *current, int handle,
 410                                 struct smbios_ctx *ctx)
 411 {
 412         struct smbios_type127 *t;
 413         int len = sizeof(struct smbios_type127);
 414
 415         t = map_sysmem(*current, len);
 416         memset(t, 0, sizeof(struct smbios_type127));
 417         fill_smbios_header(t, SMBIOS_END_OF_TABLE, len, handle);
 418
 419         *current += len;
 420         unmap_sysmem(t);
 421
 422         return len;
 423 }
 424
 425 static struct smbios_write_method smbios_write_funcs[] = {
 426         { smbios_write_type0, "bios", },
 427         { smbios_write_type1, "system", },
 428         { smbios_write_type2, "baseboard", },
 429         { smbios_write_type3, "chassis", },
 430         { smbios_write_type4, },
 431         { smbios_write_type32, },
 432         { smbios_write_type127 },
 433 };
 434
 435 ulong write_smbios_table(ulong addr)
 436 {
 437         ofnode parent_node = ofnode_null();
 438         struct smbios_entry *se;
 439         struct smbios_ctx ctx;
 440         ulong table_addr;
 441         ulong tables;
 442         int len = 0;
 443         int max_struct_size = 0;
 444         int handle = 0;
 445         char *istart;
 446         int isize;
 447         int i;
 448
 449         ctx.node = ofnode_null();
 450         if (IS_ENABLED(CONFIG_OF_CONTROL)) {
 451                 uclass_first_device(UCLASS_SYSINFO, &ctx.dev);
 452                 if (ctx.dev)
 453                         parent_node = dev_read_subnode(ctx.dev, "smbios");
 454         } else {
 455                 ctx.dev = NULL;
 456         }
 457
 458         /* 16 byte align the table address */
 459         addr = ALIGN(addr, 16);
 460
 461         se = map_sysmem(addr, sizeof(struct smbios_entry));
 462         memset(se, 0, sizeof(struct smbios_entry));
 463
 464         addr += sizeof(struct smbios_entry);
 465         addr = ALIGN(addr, 16);
 466         tables = addr;
 467
 468         /* populate minimum required tables */
 469         for (i = 0; i < ARRAY_SIZE(smbios_write_funcs); i++) {
 470                 const struct smbios_write_method *method;
 471                 int tmp;
 472
 473                 method = &smbios_write_funcs[i];
 474                 if (IS_ENABLED(CONFIG_OF_CONTROL) && method->subnode_name)
 475                         ctx.node = ofnode_find_subnode(parent_node,
 476                                                        method->subnode_name);
 477                 tmp = method->write((ulong *)&addr, handle++, &ctx);
 478
 479                 max_struct_size = max(max_struct_size, tmp);
 480                 len += tmp;
 481         }
 482
 483         memcpy(se->anchor, "_SM_", 4);
 484         se->length = sizeof(struct smbios_entry);
 485         se->major_ver = SMBIOS_MAJOR_VER;
 486         se->minor_ver = SMBIOS_MINOR_VER;
 487         se->max_struct_size = max_struct_size;
 488         memcpy(se->intermediate_anchor, "_DMI_", 5);
 489         se->struct_table_length = len;
 490
 491         /*
 492          * We must use a pointer here so things work correctly on sandbox. The
 493          * user of this table is not aware of the mapping of addresses to
 494          * sandbox's DRAM buffer.
 495          */
 496         table_addr = (ulong)map_sysmem(tables, 0);
 497         if (sizeof(table_addr) > sizeof(u32) && table_addr > (ulong)UINT_MAX) {
 498                 /*
 499                  * We need to put this >32-bit pointer into the table but the
 500                  * field is only 32 bits wide.
 501                  */
 502                 printf("WARNING: SMBIOS table_address overflow %llx\n",
 503                        (unsigned long long)table_addr);
 504                 table_addr = 0;
 505         }
 506         se->struct_table_address = table_addr;
 507
 508         se->struct_count = handle;
 509
 510         /* calculate checksums */
 511         istart = (char *)se + SMBIOS_INTERMEDIATE_OFFSET;
 512         isize = sizeof(struct smbios_entry) - SMBIOS_INTERMEDIATE_OFFSET;
 513         se->intermediate_checksum = table_compute_checksum(istart, isize);
 514         se->checksum = table_compute_checksum(se, sizeof(struct smbios_entry));
 515         unmap_sysmem(se);
 516
 517         return addr;
 518 }