/* * sysinfo.c: get SMBIOS/sysinfo information from the host * * Copyright (C) 2010-2011 Red Hat, Inc. * Copyright (C) 2010 Daniel Veillard * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA * * Author: Daniel Veillard */ #include #include #include #include #include #include #include #include "virterror_internal.h" #include "sysinfo.h" #include "util.h" #include "logging.h" #include "memory.h" #include "command.h" #define VIR_FROM_THIS VIR_FROM_SYSINFO #define virSmbiosReportError(code, ...) \ virReportErrorHelper(VIR_FROM_SYSINFO, code, __FILE__, \ __FUNCTION__, __LINE__, __VA_ARGS__) #define SYSINFO_SMBIOS_DECODER "dmidecode" VIR_ENUM_IMPL(virSysinfo, VIR_SYSINFO_LAST, "smbios"); /** * virSysinfoDefFree: * @def: a sysinfo structure * * Free up the sysinfo structure */ void virSysinfoDefFree(virSysinfoDefPtr def) { int i; if (def == NULL) return; VIR_FREE(def->bios_vendor); VIR_FREE(def->bios_version); VIR_FREE(def->bios_date); VIR_FREE(def->bios_release); VIR_FREE(def->system_manufacturer); VIR_FREE(def->system_product); VIR_FREE(def->system_version); VIR_FREE(def->system_serial); VIR_FREE(def->system_uuid); VIR_FREE(def->system_sku); VIR_FREE(def->system_family); for (i = 0;i < def->nprocessor;i++) { VIR_FREE(def->processor[i].processor_socket_destination); VIR_FREE(def->processor[i].processor_type); VIR_FREE(def->processor[i].processor_family); VIR_FREE(def->processor[i].processor_manufacturer); VIR_FREE(def->processor[i].processor_signature); VIR_FREE(def->processor[i].processor_version); VIR_FREE(def->processor[i].processor_external_clock); VIR_FREE(def->processor[i].processor_max_speed); VIR_FREE(def->processor[i].processor_status); VIR_FREE(def->processor[i].processor_serial_number); VIR_FREE(def->processor[i].processor_part_number); } VIR_FREE(def->processor); for (i = 0;i < def->nmemory;i++) { VIR_FREE(def->memory[i].memory_size); VIR_FREE(def->memory[i].memory_form_factor); VIR_FREE(def->memory[i].memory_locator); VIR_FREE(def->memory[i].memory_bank_locator); VIR_FREE(def->memory[i].memory_type); VIR_FREE(def->memory[i].memory_type_detail); VIR_FREE(def->memory[i].memory_speed); VIR_FREE(def->memory[i].memory_manufacturer); VIR_FREE(def->memory[i].memory_serial_number); VIR_FREE(def->memory[i].memory_part_number); } VIR_FREE(def->memory); VIR_FREE(def); } /** * virSysinfoRead: * * Tries to read the SMBIOS information from the current host * * Returns: a filled up sysinfo structure or NULL in case of error */ #if defined(WIN32) || \ !(defined(__x86_64__) || \ defined(__i386__) || \ defined(__amd64__)) virSysinfoDefPtr virSysinfoRead(void) { /* * this can probably be extracted from Windows using API or registry * http://www.microsoft.com/whdc/system/platform/firmware/SMBIOS.mspx */ virReportSystemError(ENOSYS, "%s", _("Host sysinfo extraction not supported on this platform")); return NULL; } #else /* !WIN32 && x86 */ static char * virSysinfoParseBIOS(char *base, virSysinfoDefPtr ret) { char *cur, *eol = NULL; if ((cur = strstr(base, "BIOS Information")) == NULL) return base; base = cur; if ((cur = strstr(base, "Vendor: ")) != NULL) { cur += 8; eol = strchr(cur, '\n'); if ((eol) && ((ret->bios_vendor = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Version: ")) != NULL) { cur += 9; eol = strchr(cur, '\n'); if ((eol) && ((ret->bios_version = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Release Date: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); if ((eol) && ((ret->bios_date = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "BIOS Revision: ")) != NULL) { cur += 15; eol = strchr(cur, '\n'); if ((eol) && ((ret->bios_release = strndup(cur, eol - cur)) == NULL)) goto no_memory; } return base + strlen("BIOS Information"); no_memory: return NULL; } static char * virSysinfoParseSystem(char *base, virSysinfoDefPtr ret) { char *cur, *eol = NULL; if ((cur = strstr(base, "System Information")) == NULL) return base; base = cur; if ((cur = strstr(base, "Manufacturer: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_manufacturer = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Product Name: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_product = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Version: ")) != NULL) { cur += 9; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_version = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Serial Number: ")) != NULL) { cur += 15; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_serial = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "UUID: ")) != NULL) { cur += 6; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_uuid = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "SKU Number: ")) != NULL) { cur += 12; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_sku = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Family: ")) != NULL) { cur += 8; eol = strchr(cur, '\n'); if ((eol) && ((ret->system_family = strndup(cur, eol - cur)) == NULL)) goto no_memory; } return base + strlen("System Information"); no_memory: return NULL; } static char * virSysinfoParseProcessor(char *base, virSysinfoDefPtr ret) { char *cur, *eol, *tmp_base; virSysinfoProcessorDefPtr processor; while((tmp_base = strstr(base, "Processor Information")) != NULL) { base = tmp_base; eol = NULL; if (VIR_EXPAND_N(ret->processor, ret->nprocessor, 1) < 0) { goto no_memory; } processor = &ret->processor[ret->nprocessor - 1]; if ((cur = strstr(base, "Socket Designation: ")) != NULL) { cur += 20; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_socket_destination = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Type: ")) != NULL) { cur += 6; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_type = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Family: ")) != NULL) { cur += 8; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_family = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Manufacturer: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_manufacturer = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Signature: ")) != NULL) { cur += 11; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_signature = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Version: ")) != NULL) { cur += 9; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_version = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "External Clock: ")) != NULL) { cur += 16; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_external_clock = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Max Speed: ")) != NULL) { cur += 11; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_max_speed = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Status: ")) != NULL) { cur += 8; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_status = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Serial Number: ")) != NULL) { cur += 15; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_serial_number = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Part Number: ")) != NULL) { cur += 13; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((processor->processor_part_number = strndup(cur, eol - cur)) == NULL)) goto no_memory; } base += strlen("Processor Information"); } return base; no_memory: return NULL; } static char * virSysinfoParseMemory(char *base, virSysinfoDefPtr ret) { char *cur, *eol, *tmp_base; virSysinfoMemoryDefPtr memory; while ((tmp_base = strstr(base, "Memory Device")) != NULL) { base = tmp_base; eol = NULL; if (VIR_EXPAND_N(ret->memory, ret->nmemory, 1) < 0) { goto no_memory; } memory = &ret->memory[ret->nmemory - 1]; if ((cur = strstr(base, "Size: ")) != NULL) { cur += 6; eol = strchr(cur, '\n'); if (STREQLEN(cur, "No Module Installed", eol - cur)) goto next; virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_size = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Form Factor: ")) != NULL) { cur += 13; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_form_factor = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Locator: ")) != NULL) { cur += 9; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_locator = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Bank Locator: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_bank_locator = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Type: ")) != NULL) { cur += 6; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_type = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Type Detail: ")) != NULL) { cur += 13; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_type_detail = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Speed: ")) != NULL) { cur += 7; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_speed = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Manufacturer: ")) != NULL) { cur += 14; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_manufacturer = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Serial Number: ")) != NULL) { cur += 15; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_serial_number = strndup(cur, eol - cur)) == NULL)) goto no_memory; } if ((cur = strstr(base, "Part Number: ")) != NULL) { cur += 13; eol = strchr(cur, '\n'); virSkipSpacesBackwards(cur, &eol); if ((eol) && ((memory->memory_part_number = strndup(cur, eol - cur)) == NULL)) goto no_memory; } next: base += strlen("Memory Device"); } return base; no_memory: return NULL; } virSysinfoDefPtr virSysinfoRead(void) { char *path, *base; virSysinfoDefPtr ret = NULL; char *outbuf = NULL; virCommandPtr cmd; path = virFindFileInPath(SYSINFO_SMBIOS_DECODER); if (path == NULL) { virSmbiosReportError(VIR_ERR_INTERNAL_ERROR, _("Failed to find path for %s binary"), SYSINFO_SMBIOS_DECODER); return NULL; } cmd = virCommandNewArgList(path, "-q", "-t", "0,1,4,17", NULL); VIR_FREE(path); virCommandSetOutputBuffer(cmd, &outbuf); if (virCommandRun(cmd, NULL) < 0) { virSmbiosReportError(VIR_ERR_INTERNAL_ERROR, _("Failed to execute command %s"), path); goto cleanup; } if (VIR_ALLOC(ret) < 0) goto no_memory; ret->type = VIR_SYSINFO_SMBIOS; base = outbuf; if ((base = virSysinfoParseBIOS(base, ret)) == NULL) goto no_memory; if ((base = virSysinfoParseSystem(base, ret)) == NULL) goto no_memory; ret->nprocessor = 0; ret->processor = NULL; if ((base = virSysinfoParseProcessor(base, ret)) == NULL) goto no_memory; ret->nmemory = 0; ret->memory = NULL; if (virSysinfoParseMemory(base, ret) == NULL) goto no_memory; cleanup: VIR_FREE(outbuf); virCommandFree(cmd); return ret; no_memory: virReportOOMError(); virSysinfoDefFree(ret); ret = NULL; goto cleanup; } #endif /* !WIN32 && x86 */ static void virSysinfoBIOSFormat(virBufferPtr buf, virSysinfoDefPtr def) { if (!def->bios_vendor && !def->bios_version && !def->bios_date && !def->bios_release) return; virBufferAddLit(buf, " \n"); virBufferEscapeString(buf, " %s\n", def->bios_vendor); virBufferEscapeString(buf, " %s\n", def->bios_version); virBufferEscapeString(buf, " %s\n", def->bios_date); virBufferEscapeString(buf, " %s\n", def->bios_release); virBufferAddLit(buf, " \n"); } static void virSysinfoSystemFormat(virBufferPtr buf, virSysinfoDefPtr def) { if (!def->system_manufacturer && !def->system_product && !def->system_version && !def->system_serial && !def->system_uuid && !def->system_sku && !def->system_family) return; virBufferAddLit(buf, " \n"); virBufferEscapeString(buf, " %s\n", def->system_manufacturer); virBufferEscapeString(buf, " %s\n", def->system_product); virBufferEscapeString(buf, " %s\n", def->system_version); virBufferEscapeString(buf, " %s\n", def->system_serial); virBufferEscapeString(buf, " %s\n", def->system_uuid); virBufferEscapeString(buf, " %s\n", def->system_sku); virBufferEscapeString(buf, " %s\n", def->system_family); virBufferAddLit(buf, " \n"); } static void virSysinfoProcessorFormat(virBufferPtr buf, virSysinfoDefPtr def) { int i; virSysinfoProcessorDefPtr processor; for (i = 0; i < def->nprocessor; i++) { processor = &def->processor[i]; if (!processor->processor_socket_destination && !processor->processor_type && !processor->processor_family && !processor->processor_manufacturer && !processor->processor_signature && !processor->processor_version && !processor->processor_external_clock && !processor->processor_max_speed && !processor->processor_status && !processor->processor_serial_number && !processor->processor_part_number) continue; virBufferAddLit(buf, " \n"); virBufferAdjustIndent(buf, 4); virBufferEscapeString(buf, "%s\n", processor->processor_socket_destination); virBufferEscapeString(buf, "%s\n", processor->processor_type); virBufferEscapeString(buf, "%s\n", processor->processor_family); virBufferEscapeString(buf, "%s\n", processor->processor_manufacturer); virBufferEscapeString(buf, "%s\n", processor->processor_signature); virBufferEscapeString(buf, "%s\n", processor->processor_version); virBufferEscapeString(buf, "%s\n", processor->processor_external_clock); virBufferEscapeString(buf, "%s\n", processor->processor_max_speed); virBufferEscapeString(buf, "%s\n", processor->processor_status); virBufferEscapeString(buf, "%s\n", processor->processor_serial_number); virBufferEscapeString(buf, "%s\n", processor->processor_part_number); virBufferAdjustIndent(buf, -4); virBufferAddLit(buf, " \n"); } } static void virSysinfoMemoryFormat(virBufferPtr buf, virSysinfoDefPtr def) { int i; virSysinfoMemoryDefPtr memory; for (i = 0; i < def->nmemory; i++) { memory = &def->memory[i]; if (!memory->memory_size && !memory->memory_form_factor && !memory->memory_locator && !memory->memory_bank_locator && !memory->memory_type && !memory->memory_type_detail && !memory->memory_speed && !memory->memory_manufacturer && !memory->memory_serial_number && !memory->memory_part_number) continue; virBufferAddLit(buf, " \n"); virBufferEscapeString(buf, " %s\n", memory->memory_size); virBufferEscapeString(buf, " %s\n", memory->memory_form_factor); virBufferEscapeString(buf, " %s\n", memory->memory_locator); virBufferEscapeString(buf, " %s\n", memory->memory_bank_locator); virBufferEscapeString(buf, " %s\n", memory->memory_type); virBufferEscapeString(buf, " %s\n", memory->memory_type_detail); virBufferEscapeString(buf, " %s\n", memory->memory_speed); virBufferEscapeString(buf, " %s\n", memory->memory_manufacturer); virBufferEscapeString(buf, " %s\n", memory->memory_serial_number); virBufferEscapeString(buf, " %s\n", memory->memory_part_number); virBufferAddLit(buf, " \n"); } } /** * virSysinfoFormat: * @buf: buffer to append output to (may use auto-indentation) * @def: structure to convert to xml string * * Returns 0 on success, -1 on failure after generating an error message. */ int virSysinfoFormat(virBufferPtr buf, virSysinfoDefPtr def) { const char *type = virSysinfoTypeToString(def->type); if (!type) { virSmbiosReportError(VIR_ERR_INTERNAL_ERROR, _("unexpected sysinfo type model %d"), def->type); virBufferFreeAndReset(buf); return -1; } virBufferAsprintf(buf, "\n", type); virSysinfoBIOSFormat(buf, def); virSysinfoSystemFormat(buf, def); virSysinfoProcessorFormat(buf, def); virSysinfoMemoryFormat(buf, def); virBufferAddLit(buf, "\n"); if (virBufferError(buf)) { virReportOOMError(); return -1; } return 0; } bool virSysinfoIsEqual(virSysinfoDefPtr src, virSysinfoDefPtr dst) { bool identical = false; if (!src && !dst) return true; if ((src && !dst) || (!src && dst)) { virSmbiosReportError(VIR_ERR_CONFIG_UNSUPPORTED, "%s", _("Target sysinfo does not match source")); goto cleanup; } if (src->type != dst->type) { virSmbiosReportError(VIR_ERR_CONFIG_UNSUPPORTED, _("Target sysinfo %s does not match source %s"), virSysinfoTypeToString(dst->type), virSysinfoTypeToString(src->type)); goto cleanup; } #define CHECK_FIELD(name, desc) \ do { \ if (STRNEQ_NULLABLE(src->name, dst->name)) { \ virSmbiosReportError(VIR_ERR_CONFIG_UNSUPPORTED, \ _("Target sysinfo %s %s does not match source %s"), \ desc, NULLSTR(src->name), NULLSTR(dst->name)); \ } \ } while (0) CHECK_FIELD(bios_vendor, "BIOS vendor"); CHECK_FIELD(bios_version, "BIOS version"); CHECK_FIELD(bios_date, "BIOS date"); CHECK_FIELD(bios_release, "BIOS release"); CHECK_FIELD(system_manufacturer, "system vendor"); CHECK_FIELD(system_product, "system product"); CHECK_FIELD(system_version, "system version"); CHECK_FIELD(system_serial, "system serial"); CHECK_FIELD(system_uuid, "system uuid"); CHECK_FIELD(system_sku, "system sku"); CHECK_FIELD(system_family, "system family"); #undef CHECK_FIELD identical = true; cleanup: return identical; }