315 lines
8.3 KiB
C
315 lines
8.3 KiB
C
/*-
|
|
* Copyright (c) 2006 IronPort Systems Inc. <ambrisko@ironport.com>
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
__FBSDID("$FreeBSD$");
|
|
|
|
#include <sys/param.h>
|
|
#include <sys/systm.h>
|
|
#include <sys/bus.h>
|
|
#include <sys/condvar.h>
|
|
#include <sys/eventhandler.h>
|
|
#include <sys/kernel.h>
|
|
#include <sys/selinfo.h>
|
|
|
|
#include <vm/vm.h>
|
|
#include <vm/pmap.h>
|
|
#include <machine/pc/bios.h>
|
|
|
|
#ifdef LOCAL_MODULE
|
|
#include <ipmi.h>
|
|
#include <ipmivars.h>
|
|
#else
|
|
#include <sys/ipmi.h>
|
|
#include <dev/ipmi/ipmivars.h>
|
|
#endif
|
|
|
|
#if __FreeBSD_version < 700020
|
|
#define pmap_mapbios pmap_mapdev
|
|
#define pmap_unmapbios pmap_unmapdev
|
|
#endif
|
|
|
|
struct smbios_table_entry {
|
|
uint8_t anchor_string[4];
|
|
uint8_t checksum;
|
|
uint8_t length;
|
|
uint8_t major_version;
|
|
uint8_t minor_version;
|
|
uint16_t maximum_structure_size;
|
|
uint8_t entry_point_revision;
|
|
uint8_t formatted_area[5];
|
|
uint8_t DMI_anchor_string[5];
|
|
uint8_t intermediate_checksum;
|
|
uint16_t structure_table_length;
|
|
uint32_t structure_table_address;
|
|
uint16_t number_structures;
|
|
uint8_t BCD_revision;
|
|
};
|
|
|
|
struct structure_header {
|
|
uint8_t type;
|
|
uint8_t length;
|
|
uint16_t handle;
|
|
};
|
|
|
|
struct ipmi_entry {
|
|
uint8_t type;
|
|
uint8_t length;
|
|
uint16_t handle;
|
|
uint8_t interface_type;
|
|
uint8_t spec_revision;
|
|
uint8_t i2c_slave_address;
|
|
uint8_t NV_storage_device_address;
|
|
uint64_t base_address;
|
|
uint8_t base_address_modifier;
|
|
uint8_t interrupt_number;
|
|
};
|
|
|
|
/* Fields in the base_address field of an IPMI entry. */
|
|
#define IPMI_BAR_MODE(ba) ((ba) & 0x0000000000000001)
|
|
#define IPMI_BAR_ADDR(ba) ((ba) & 0xfffffffffffffffe)
|
|
|
|
/* Fields in the base_address_modifier field of an IPMI entry. */
|
|
#define IPMI_BAM_IRQ_TRIGGER 0x01
|
|
#define IPMI_BAM_IRQ_POLARITY 0x02
|
|
#define IPMI_BAM_IRQ_VALID 0x08
|
|
#define IPMI_BAM_ADDR_LSB(bam) (((bam) & 0x10) >> 4)
|
|
#define IPMI_BAM_REG_SPACING(bam) (((bam) & 0xc0) >> 6)
|
|
#define SPACING_8 0x0
|
|
#define SPACING_32 0x1
|
|
#define SPACING_16 0x2
|
|
|
|
#define SMBIOS_START 0xf0000
|
|
#define SMBIOS_STEP 0x10
|
|
#define SMBIOS_OFF 0
|
|
#define SMBIOS_LEN 4
|
|
#define SMBIOS_SIG "_SM_"
|
|
|
|
typedef void (*dispatchproc_t)(uint8_t *p, char **table,
|
|
struct ipmi_get_info *info);
|
|
|
|
static struct ipmi_get_info ipmi_info;
|
|
static int ipmi_probed;
|
|
static struct mtx ipmi_info_mtx;
|
|
MTX_SYSINIT(ipmi_info, &ipmi_info_mtx, "ipmi info", MTX_DEF);
|
|
|
|
static char *get_strings(char *, char **);
|
|
static void ipmi_smbios_probe(struct ipmi_get_info *);
|
|
static int smbios_cksum (struct smbios_table_entry *);
|
|
static void smbios_run_table(uint8_t *, int, dispatchproc_t *,
|
|
struct ipmi_get_info *);
|
|
static void smbios_t38_proc_info(uint8_t *, char **,
|
|
struct ipmi_get_info *);
|
|
|
|
static void
|
|
smbios_t38_proc_info(uint8_t *p, char **table, struct ipmi_get_info *info)
|
|
{
|
|
struct ipmi_entry *s = (struct ipmi_entry *)p;
|
|
|
|
bzero(info, sizeof(struct ipmi_get_info));
|
|
switch (s->interface_type) {
|
|
case KCS_MODE:
|
|
case SMIC_MODE:
|
|
info->address = IPMI_BAR_ADDR(s->base_address) |
|
|
IPMI_BAM_ADDR_LSB(s->base_address_modifier);
|
|
info->io_mode = IPMI_BAR_MODE(s->base_address);
|
|
switch (IPMI_BAM_REG_SPACING(s->base_address_modifier)) {
|
|
case SPACING_8:
|
|
info->offset = 1;
|
|
break;
|
|
case SPACING_32:
|
|
info->offset = 4;
|
|
break;
|
|
case SPACING_16:
|
|
info->offset = 2;
|
|
break;
|
|
default:
|
|
printf("SMBIOS: Invalid register spacing\n");
|
|
return;
|
|
}
|
|
break;
|
|
case SSIF_MODE:
|
|
if ((s->base_address & 0xffffffffffffff00) != 0) {
|
|
printf("SMBIOS: Invalid SSIF SMBus address, using BMC I2C slave address instead\n");
|
|
info->address = s->i2c_slave_address >> 1;
|
|
break;
|
|
}
|
|
info->address = IPMI_BAR_ADDR(s->base_address) >> 1;
|
|
break;
|
|
default:
|
|
return;
|
|
}
|
|
if (s->length > offsetof(struct ipmi_entry, interrupt_number)) {
|
|
if (s->interrupt_number > 15)
|
|
printf("SMBIOS: Non-ISA IRQ %d for IPMI\n",
|
|
s->interrupt_number);
|
|
else
|
|
info->irq = s->interrupt_number;
|
|
}
|
|
info->iface_type = s->interface_type;
|
|
}
|
|
|
|
static char *
|
|
get_strings(char *p, char **table)
|
|
{
|
|
/* Scan for strings, stoping at a single null byte */
|
|
while (*p != 0) {
|
|
*table++ = p;
|
|
p += strlen(p) + 1;
|
|
}
|
|
*table = 0;
|
|
|
|
/* Skip past terminating null byte */
|
|
return (p + 1);
|
|
}
|
|
|
|
|
|
static void
|
|
smbios_run_table(uint8_t *p, int entries, dispatchproc_t *dispatchstatus,
|
|
struct ipmi_get_info *info)
|
|
{
|
|
struct structure_header *s;
|
|
char *table[20];
|
|
uint8_t *nextp;
|
|
|
|
while(entries--) {
|
|
s = (struct structure_header *) p;
|
|
nextp = get_strings(p + s->length, table);
|
|
|
|
/*
|
|
* No strings still has a double-null at the end,
|
|
* skip over it
|
|
*/
|
|
if (table[0] == 0)
|
|
nextp++;
|
|
|
|
if (dispatchstatus[*p]) {
|
|
(dispatchstatus[*p])(p, table, info);
|
|
}
|
|
p = nextp;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Walk the SMBIOS table looking for an IPMI (type 38) entry. If we find
|
|
* one, return the parsed data in the passed in ipmi_get_info structure and
|
|
* return true. If we don't find one, return false.
|
|
*/
|
|
static void
|
|
ipmi_smbios_probe(struct ipmi_get_info *info)
|
|
{
|
|
dispatchproc_t dispatch_smbios_ipmi[256];
|
|
struct smbios_table_entry *header;
|
|
void *table;
|
|
u_int32_t addr;
|
|
|
|
bzero(info, sizeof(struct ipmi_get_info));
|
|
|
|
/* Find the SMBIOS table header. */
|
|
addr = bios_sigsearch(SMBIOS_START, SMBIOS_SIG, SMBIOS_LEN,
|
|
SMBIOS_STEP, SMBIOS_OFF);
|
|
if (addr == 0)
|
|
return;
|
|
|
|
/*
|
|
* Map the header. We first map a fixed size to get the actual
|
|
* length and then map it a second time with the actual length so
|
|
* we can verify the checksum.
|
|
*/
|
|
header = pmap_mapbios(addr, sizeof(struct smbios_table_entry));
|
|
table = pmap_mapbios(addr, header->length);
|
|
pmap_unmapbios((vm_offset_t)header, sizeof(struct smbios_table_entry));
|
|
header = table;
|
|
if (smbios_cksum(header) != 0) {
|
|
pmap_unmapbios((vm_offset_t)header, header->length);
|
|
return;
|
|
}
|
|
|
|
/* Now map the actual table and walk it looking for an IPMI entry. */
|
|
table = pmap_mapbios(header->structure_table_address,
|
|
header->structure_table_length);
|
|
bzero((void *)dispatch_smbios_ipmi, sizeof(dispatch_smbios_ipmi));
|
|
dispatch_smbios_ipmi[38] = (void *)smbios_t38_proc_info;
|
|
smbios_run_table(table, header->number_structures, dispatch_smbios_ipmi,
|
|
info);
|
|
|
|
/* Unmap everything. */
|
|
pmap_unmapbios((vm_offset_t)table, header->structure_table_length);
|
|
pmap_unmapbios((vm_offset_t)header, header->length);
|
|
}
|
|
|
|
/*
|
|
* Return the SMBIOS IPMI table entry info to the caller. If we haven't
|
|
* searched the IPMI table yet, search it. Otherwise, return a cached
|
|
* copy of the data.
|
|
*/
|
|
int
|
|
ipmi_smbios_identify(struct ipmi_get_info *info)
|
|
{
|
|
|
|
mtx_lock(&ipmi_info_mtx);
|
|
switch (ipmi_probed) {
|
|
case 0:
|
|
/* Need to probe the SMBIOS table. */
|
|
ipmi_probed++;
|
|
mtx_unlock(&ipmi_info_mtx);
|
|
ipmi_smbios_probe(&ipmi_info);
|
|
mtx_lock(&ipmi_info_mtx);
|
|
ipmi_probed++;
|
|
wakeup(&ipmi_info);
|
|
break;
|
|
case 1:
|
|
/* Another thread is currently probing the table, so wait. */
|
|
while (ipmi_probed == 1)
|
|
msleep(&ipmi_info, &ipmi_info_mtx, 0, "ipmi info", 0);
|
|
break;
|
|
default:
|
|
/* The cached data is available. */
|
|
break;
|
|
}
|
|
|
|
bcopy(&ipmi_info, info, sizeof(ipmi_info));
|
|
mtx_unlock(&ipmi_info_mtx);
|
|
|
|
return (info->iface_type != 0);
|
|
}
|
|
|
|
static int
|
|
smbios_cksum (struct smbios_table_entry *e)
|
|
{
|
|
u_int8_t *ptr;
|
|
u_int8_t cksum;
|
|
int i;
|
|
|
|
ptr = (u_int8_t *)e;
|
|
cksum = 0;
|
|
for (i = 0; i < e->length; i++) {
|
|
cksum += ptr[i];
|
|
}
|
|
|
|
return (cksum);
|
|
}
|