1/*-
2 * Copyright (c) 2020 The FreeBSD Foundation
3 *
4 * This software was developed by Emmanuel Vadot under sponsorship
5 * from the FreeBSD Foundation.
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/param.h>
30#include <sys/systm.h>
31#include <sys/kernel.h>
32
33#include <linux/dmi.h>
34
35static char *dmi_data[DMI_STRING_MAX];
36
37static void
38linux_dmi_preload(void *arg)
39{
40
41	dmi_data[DMI_BIOS_VENDOR] = kern_getenv("smbios.bios.vendor");
42	dmi_data[DMI_BIOS_VERSION] = kern_getenv("smbios.bios.version");
43	dmi_data[DMI_BIOS_DATE] = kern_getenv("smbios.bios.reldate");
44	dmi_data[DMI_SYS_VENDOR] = kern_getenv("smbios.system.maker");
45	dmi_data[DMI_PRODUCT_NAME] = kern_getenv("smbios.system.product");
46	dmi_data[DMI_PRODUCT_VERSION] = kern_getenv("smbios.system.version");
47	dmi_data[DMI_PRODUCT_SERIAL] = kern_getenv("smbios.system.serial");
48	dmi_data[DMI_PRODUCT_UUID] = kern_getenv("smbios.system.uuid");
49	dmi_data[DMI_BOARD_VENDOR] = kern_getenv("smbios.planar.maker");
50	dmi_data[DMI_BOARD_NAME] = kern_getenv("smbios.planar.product");
51	dmi_data[DMI_BOARD_VERSION] = kern_getenv("smbios.planar.version");
52	dmi_data[DMI_BOARD_SERIAL] = kern_getenv("smbios.planar.serial");
53	dmi_data[DMI_BOARD_ASSET_TAG] = kern_getenv("smbios.planar.tag");
54	dmi_data[DMI_CHASSIS_VENDOR] = kern_getenv("smbios.chassis.maker");
55	dmi_data[DMI_CHASSIS_TYPE] = kern_getenv("smbios.chassis.type");
56	dmi_data[DMI_CHASSIS_VERSION] = kern_getenv("smbios.chassis.version");
57	dmi_data[DMI_CHASSIS_SERIAL] = kern_getenv("smbios.chassis.serial");
58	dmi_data[DMI_CHASSIS_ASSET_TAG] = kern_getenv("smbios.chassis.tag");
59}
60SYSINIT(linux_dmi_preload, SI_SUB_DRIVERS, SI_ORDER_ANY, linux_dmi_preload, NULL);
61
62/* Match a system against a field */
63bool
64linux_dmi_match(enum dmi_field f, const char *str)
65{
66
67	if (f < DMI_STRING_MAX &&
68	    dmi_data[f] != NULL &&
69	    strcmp(dmi_data[f], str) == 0)
70		return(true);
71	return (false);
72}
73
74/* Match a system against the struct, all matches must be ok */
75static bool
76linux_dmi_matches(const struct dmi_system_id *dsi)
77{
78	enum dmi_field slot;
79	int i;
80
81	for (i = 0; i < nitems(dsi->matches); i++) {
82		slot = dsi->matches[i].slot;
83		if (slot == DMI_NONE)
84			break;
85		if (slot >= DMI_STRING_MAX ||
86		    dmi_data[slot] == NULL)
87			return (false);
88		if (dsi->matches[i].exact_match) {
89			if (dmi_match(slot, dsi->matches[i].substr))
90				continue;
91		} else if (strstr(dmi_data[slot],
92			dsi->matches[i].substr) != NULL) {
93			continue;
94		}
95		return (false);
96	}
97	return (true);
98}
99
100/* Return the string matching the field */
101const char *
102linux_dmi_get_system_info(int field)
103{
104
105	if (field < DMI_STRING_MAX)
106		return (dmi_data[field]);
107	return (NULL);
108}
109
110/*
111 * Match a system against the structs list
112 * If a match is found return the corresponding structure.
113 */
114const struct dmi_system_id *
115linux_dmi_first_match(const struct dmi_system_id *list)
116{
117	const struct dmi_system_id *dsi;
118
119	for (dsi = list; dsi->matches[0].slot != 0; dsi++) {
120		if (linux_dmi_matches(dsi))
121			return (dsi);
122	}
123
124	return (NULL);
125}
126
127/*
128 * Match a system against the structs list
129 * For each match call the callback with the corresponding data
130 * Return the number of matches.
131 */
132int
133linux_dmi_check_system(const struct dmi_system_id *sysid)
134{
135	const struct dmi_system_id *dsi;
136	int matches = 0;
137
138	for (dsi = sysid; dsi->matches[0].slot != 0; dsi++) {
139		if (linux_dmi_matches(dsi)) {
140			matches++;
141			if (dsi->callback && dsi->callback(dsi))
142				break;
143		}
144	}
145
146	return (matches);
147}
148