mirror of
https://gitea.wildfiregames.com/0ad/0ad
synced 2026-06-18 06:13:55 -07:00
358 lines
8.8 KiB
C++
358 lines
8.8 KiB
C++
/* Copyright (c) 2011 Wildfire Games
|
|
*
|
|
* Permission is hereby granted, free of charge, to any person obtaining
|
|
* a copy of this software and associated documentation files (the
|
|
* "Software"), to deal in the Software without restriction, including
|
|
* without limitation the rights to use, copy, modify, merge, publish,
|
|
* distribute, sublicense, and/or sell copies of the Software, and to
|
|
* permit persons to whom the Software is furnished to do so, subject to
|
|
* the following conditions:
|
|
*
|
|
* The above copyright notice and this permission notice shall be included
|
|
* in all copies or substantial portions of the Software.
|
|
*
|
|
* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
* MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
|
|
* IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
|
|
* CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
|
|
* TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
|
|
* SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
*/
|
|
|
|
#include "precompiled.h"
|
|
#include "smbios.h"
|
|
|
|
#include "lib/bits.h"
|
|
#include "lib/byte_order.h" // FOURCC_BE
|
|
#include "lib/module_init.h"
|
|
|
|
#if OS_WIN
|
|
# include "lib/sysdep/os/win/wutil.h"
|
|
# include "lib/sysdep/os/win/wfirmware.h"
|
|
#endif
|
|
|
|
namespace SMBIOS {
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
#if OS_WIN
|
|
|
|
static LibError GetTable(wfirmware::Table& table)
|
|
{
|
|
// (MSDN mentions 'RSMB', but multi-character literals are implementation-defined.)
|
|
const DWORD provider = FOURCC_BE('R','S','M','B');
|
|
|
|
// (MSDN says this will be 0, but we'll retrieve it for 100% correctness.)
|
|
wfirmware::TableIds tableIds = wfirmware::GetTableIDs(provider);
|
|
if(tableIds.empty())
|
|
WARN_RETURN(ERR::_1);
|
|
|
|
table = wfirmware::GetTable(provider, tableIds[0]);
|
|
if(table.empty())
|
|
WARN_RETURN(ERR::_2);
|
|
|
|
// strip the WmiHeader
|
|
struct WmiHeader
|
|
{
|
|
u8 used20CallingMethod;
|
|
u8 majorVersion;
|
|
u8 minorVersion;
|
|
u8 dmiRevision;
|
|
u32 length;
|
|
};
|
|
const WmiHeader* wmiHeader = (const WmiHeader*)&table[0];
|
|
debug_assert(table.size() == sizeof(WmiHeader) + wmiHeader->length);
|
|
memmove(&table[0], &table[sizeof(WmiHeader)], sizeof(WmiHeader));
|
|
|
|
return INFO::OK;
|
|
}
|
|
|
|
#endif // OS_WIN
|
|
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
// pointers to the strings (if any) at the end of an SMBIOS structure
|
|
typedef std::vector<const char*> Strings;
|
|
|
|
static Strings ExtractStrings(const Header* header, const char* end, const Header*& next)
|
|
{
|
|
Strings strings;
|
|
|
|
const char* pos = ((const char*)header) + header->length;
|
|
while(pos <= end-2)
|
|
{
|
|
if(*pos == '\0')
|
|
{
|
|
pos++;
|
|
if(*pos == 0)
|
|
{
|
|
pos++;
|
|
break;
|
|
}
|
|
}
|
|
|
|
strings.push_back(pos);
|
|
pos += strlen(pos);
|
|
}
|
|
|
|
next = (const Header*)pos;
|
|
return strings;
|
|
}
|
|
|
|
|
|
// storage for all structures' strings
|
|
static char* stringStorage;
|
|
static char* stringStoragePos;
|
|
|
|
// pointers to dynamically allocated structures
|
|
static Structures structures;
|
|
|
|
static void Cleanup()
|
|
{
|
|
SAFE_FREE(stringStorage);
|
|
stringStoragePos = 0;
|
|
|
|
// free each allocated structure
|
|
#define STRUCTURE(name, id) SAFE_FREE(structures.name##_);
|
|
STRUCTURES
|
|
#undef STRUCTURE
|
|
}
|
|
|
|
|
|
// initialize each of a structure's fields by copying from the SMBIOS data
|
|
class FieldInitializer
|
|
{
|
|
NONCOPYABLE(FieldInitializer); // reference member
|
|
public:
|
|
FieldInitializer(const Header* header, const Strings& strings)
|
|
: data((const u8*)(header+1))
|
|
, end(data + header->length)
|
|
, strings(strings)
|
|
{
|
|
}
|
|
|
|
template<typename T>
|
|
void operator()(size_t flags, T& t, const char* UNUSED(name), const char* UNUSED(units))
|
|
{
|
|
if((flags & F_DERIVED) || data >= end)
|
|
{
|
|
t = (T)0;
|
|
return;
|
|
}
|
|
|
|
if(flags & F_ENUM)
|
|
t = (T)*data++;
|
|
else
|
|
{
|
|
memcpy(&t, data, sizeof(t));
|
|
data += sizeof(t);
|
|
}
|
|
}
|
|
|
|
private:
|
|
const u8* data;
|
|
const u8* end;
|
|
const Strings& strings;
|
|
};
|
|
|
|
|
|
// C++03 14.7.3(2): "An explicit specialization shall be declared [..] in the
|
|
// namespace of which the enclosing class [..] is a member.
|
|
template<>
|
|
void FieldInitializer::operator()<const char*>(size_t flags, const char*& t, const char* UNUSED(name), const char* UNUSED(units))
|
|
{
|
|
u8 number;
|
|
operator()(flags, number, 0, 0);
|
|
if(number == 0)
|
|
{
|
|
t = "(unspecified)";
|
|
return;
|
|
}
|
|
|
|
if(number > strings.size())
|
|
{
|
|
debug_printf(L"SMBIOS: invalid string number %d (count=%d)\n", number, strings.size());
|
|
t = "(unknown)";
|
|
return;
|
|
}
|
|
|
|
if(strings[number-1] == 0)
|
|
{
|
|
t = "(null)";
|
|
return;
|
|
}
|
|
|
|
// copy to stringStorage
|
|
strcpy(stringStoragePos, strings[number-1]);
|
|
t = stringStoragePos;
|
|
stringStoragePos += strlen(t)+1;
|
|
}
|
|
|
|
|
|
//-----------------------------------------------------------------------------
|
|
// Fixup (e.g. compute derived fields)
|
|
|
|
template<class Structure>
|
|
void Fixup(Structure& UNUSED(structure))
|
|
{
|
|
// primary template: do nothing
|
|
}
|
|
|
|
template<>
|
|
void Fixup<Processor>(Processor& p)
|
|
{
|
|
// clear "populated" bit that interferes with the interpretation of ProcessorStatus
|
|
p.status = (ProcessorStatus)(p.status & ~0x40);
|
|
}
|
|
|
|
template<>
|
|
void Fixup<Cache>(Cache& p)
|
|
{
|
|
struct DecodeSize
|
|
{
|
|
size_t operator()(u16 size) const
|
|
{
|
|
const size_t granularity = IsBitSet(size, 15)? 64*KiB : 1*KiB;
|
|
return size_t(bits(size, 0, 14)) * granularity;
|
|
}
|
|
};
|
|
p.maxSize = DecodeSize()(p.maxSize16);
|
|
p.installedSize = DecodeSize()(p.installedSize16);
|
|
p.level = bits(p.configuration, 0, 2)+1;
|
|
p.location = (CacheLocation)bits(p.configuration, 5, 6);
|
|
p.mode = (CacheMode)bits(p.configuration, 8, 9);
|
|
}
|
|
|
|
template<>
|
|
void Fixup<MemoryArray>(MemoryArray& p)
|
|
{
|
|
if(p.maxCapacity32 != (u32)INT32_MIN)
|
|
p.maxCapacity = u64(p.maxCapacity32) * KiB;
|
|
}
|
|
|
|
template<>
|
|
void Fixup<MemoryDevice>(MemoryDevice& p)
|
|
{
|
|
if(p.size16 != INT16_MAX)
|
|
p.size = u64(bits(p.size16, 0, 14)) * (IsBitSet(p.size16, 15)? 1*KiB : 1*MiB);
|
|
else
|
|
p.size = u64(bits(p.size32, 0, 30)) * MiB;
|
|
}
|
|
|
|
template<>
|
|
void Fixup<MemoryArrayMappedAddress>(MemoryArrayMappedAddress& p)
|
|
{
|
|
if(p.startAddress32 != UINT32_MAX)
|
|
p.startAddress = u64(p.startAddress32) * KiB;
|
|
if(p.endAddress32 != UINT32_MAX)
|
|
p.endAddress = u64(p.endAddress32) * KiB;
|
|
}
|
|
|
|
template<>
|
|
void Fixup<MemoryDeviceMappedAddress>(MemoryDeviceMappedAddress& p)
|
|
{
|
|
if(p.startAddress32 != UINT32_MAX)
|
|
p.startAddress = u64(p.startAddress32) * KiB;
|
|
if(p.endAddress32 != UINT32_MAX)
|
|
p.endAddress = u64(p.endAddress32) * KiB;
|
|
}
|
|
|
|
|
|
//-----------------------------------------------------------------------------
|
|
|
|
template<class Structure>
|
|
void InitStructure(Structure*& listHead, const Header* header, const Strings& strings)
|
|
{
|
|
Structure* const p = (Structure*)calloc(1, sizeof(Structure)); // freed in Cleanup
|
|
p->header = *header;
|
|
|
|
if(listHead)
|
|
{
|
|
// insert at end of list to preserve order of caches/slots
|
|
Structure* last = listHead;
|
|
while(last->next)
|
|
last = last->next;
|
|
last->next = p;
|
|
}
|
|
else
|
|
listHead = p;
|
|
|
|
FieldInitializer fieldInitializer(header, strings);
|
|
VisitFields(*p, fieldInitializer);
|
|
|
|
Fixup(*p);
|
|
}
|
|
|
|
|
|
static LibError InitStructures()
|
|
{
|
|
#if OS_WIN
|
|
wfirmware::Table table;
|
|
RETURN_ERR(GetTable(table));
|
|
#else
|
|
std::vector<u8> table;
|
|
return ERR::NOT_IMPLEMENTED;
|
|
#endif
|
|
|
|
// workaround for stupid AMIBIOS that repeats the first 8 bytes
|
|
if(memcmp(&table[0], &table[8], 8) == 0)
|
|
{
|
|
memmove(&table[8], &table[16], table.size()-8);
|
|
table.resize(table.size()-8);
|
|
table[1] += 8; // the first length field is 8 bytes short, too
|
|
}
|
|
|
|
// (instead of counting the total string size, just use the
|
|
// SMBIOS size - typically 1-2 KB - as an upper bound.)
|
|
stringStoragePos = stringStorage = (char*)calloc(table.size(), sizeof(char)); // freed in Cleanup
|
|
if(!stringStorage)
|
|
WARN_RETURN(ERR::NO_MEM);
|
|
|
|
atexit(Cleanup);
|
|
|
|
const Header* header = (const Header*)&table[0];
|
|
const Header* const end = (const Header*)(&table[0] + table.size());
|
|
while(header+1 <= end)
|
|
{
|
|
if(header->length < sizeof(Header))
|
|
WARN_RETURN(ERR::_3);
|
|
|
|
const Header* next;
|
|
const Strings strings = ExtractStrings(header, (const char*)end, next);
|
|
|
|
switch(header->id)
|
|
{
|
|
#define STRUCTURE(name, id) case id: InitStructure(structures.name##_, header, strings); break;
|
|
STRUCTURES
|
|
#undef STRUCTURE
|
|
|
|
case 126: // inactive
|
|
break;
|
|
case 127: // end
|
|
return INFO::OK;
|
|
|
|
default:
|
|
debug_printf(L"SMBIOS: unknown structure type %d\n", header->id);
|
|
break;
|
|
}
|
|
|
|
header = next;
|
|
}
|
|
|
|
debug_printf(L"SMBIOS: table not terminated\n");
|
|
return INFO::OK;
|
|
}
|
|
|
|
|
|
const Structures* GetStructures()
|
|
{
|
|
static ModuleInitState initState;
|
|
LibError ret = ModuleInit(&initState, InitStructures);
|
|
if(ret != INFO::OK)
|
|
return 0;
|
|
return &structures;
|
|
}
|
|
|
|
} // namespace SMBIOS
|