#include "driver.h"
#include "device.h"
#include "lock.h"
#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <AGP.h>
#include <KernelExport.h>
#include <OS.h>
#include <PCI.h>
#include <SupportDefs.h>
#define TRACE_DRIVER
#ifdef TRACE_DRIVER
# define TRACE(x...) dprintf("intel_extreme: " x)
#else
# define TRACE(x) ;
#endif
#define ERROR(x...) dprintf("intel_extreme: " x)
#define CALLED(x...) TRACE("CALLED %s\n", __PRETTY_FUNCTION__)
#define MAX_CARDS 4
const struct supported_device {
uint32 device_id;
int32 type;
const char* name;
} kSupportedDevices[] = {
{0x3577, INTEL_GROUP_83x, "i830GM"},
{0x2562, INTEL_GROUP_83x, "i845G"},
{0x2572, INTEL_GROUP_85x, "i865G"},
{0x3582, INTEL_GROUP_85x, "i855G"},
{0x358e, INTEL_GROUP_85x, "i855G"},
{0x2582, INTEL_MODEL_915, "i915G"},
{0x258a, INTEL_MODEL_915, "i915"},
{0x2592, INTEL_MODEL_915M, "i915GM"},
{0x2792, INTEL_MODEL_915, "i910"},
{0x2772, INTEL_MODEL_945, "i945G"},
{0x27a2, INTEL_MODEL_945M, "i945GM"},
{0x27ae, INTEL_MODEL_945M, "i945GME"},
{0x2972, INTEL_MODEL_965, "i946G"},
{0x2982, INTEL_MODEL_965, "G35"},
{0x2992, INTEL_MODEL_965, "i965Q"},
{0x29a2, INTEL_MODEL_965, "i965G"},
{0x2a02, INTEL_MODEL_965M, "i965GM"},
{0x2a12, INTEL_MODEL_965M, "i965GME"},
{0x29b2, INTEL_MODEL_G33, "G33G"},
{0x29c2, INTEL_MODEL_G33, "Q35G"},
{0x29d2, INTEL_MODEL_G33, "Q33G"},
{0x2a42, INTEL_MODEL_GM45, "GM45"},
{0x2e02, INTEL_MODEL_G45, "IGD"},
{0x2e12, INTEL_MODEL_G45, "Q45"},
{0x2e22, INTEL_MODEL_G45, "G45"},
{0x2e32, INTEL_MODEL_G45, "G41"},
{0x2e42, INTEL_MODEL_G45, "B43"},
{0x2e92, INTEL_MODEL_G45, "B43"},
{0xa001, INTEL_MODEL_PINE, "Atom D4xx"},
{0xa002, INTEL_MODEL_PINE, "Atom D5xx"},
{0xa011, INTEL_MODEL_PINEM, "Atom N4xx"},
{0xa012, INTEL_MODEL_PINEM, "Atom N5xx"},
{0x0042, INTEL_MODEL_ILKG, "IronLake Desktop"},
{0x0046, INTEL_MODEL_ILKGM, "IronLake Mobile"},
{0x0046, INTEL_MODEL_ILKGM, "IronLake Mobile"},
{0x0046, INTEL_MODEL_ILKGM, "IronLake Mobile"},
{0x0102, INTEL_MODEL_SNBG, "SandyBridge Desktop GT1"},
{0x0112, INTEL_MODEL_SNBG, "SandyBridge Desktop GT2"},
{0x0122, INTEL_MODEL_SNBG, "SandyBridge Desktop GT2+"},
{0x0106, INTEL_MODEL_SNBGM, "SandyBridge Mobile GT1"},
{0x0116, INTEL_MODEL_SNBGM, "SandyBridge Mobile GT2"},
{0x0126, INTEL_MODEL_SNBGM, "SandyBridge Mobile GT2+"},
{0x010a, INTEL_MODEL_SNBGS, "SandyBridge Server"},
{0x0152, INTEL_MODEL_IVBG, "IvyBridge Desktop GT1"},
{0x0162, INTEL_MODEL_IVBG, "IvyBridge Desktop GT2"},
{0x0156, INTEL_MODEL_IVBGM, "IvyBridge Mobile GT1"},
{0x0166, INTEL_MODEL_IVBGM, "IvyBridge Mobile GT2"},
{0x0152, INTEL_MODEL_IVBGS, "IvyBridge Server"},
{0x015a, INTEL_MODEL_IVBGS, "IvyBridge Server GT1"},
{0x016a, INTEL_MODEL_IVBGS, "IvyBridge Server GT2"},
{0x0a06, INTEL_MODEL_HASM, "Haswell ULT GT1 Mobile"},
{0x0412, INTEL_MODEL_HAS, "Haswell GT2 Desktop"},
{0x0416, INTEL_MODEL_HASM, "Haswell GT2 Mobile"},
{0x0a16, INTEL_MODEL_HASM, "Haswell ULT GT2 Mobile"},
{0x0a2e, INTEL_MODEL_HASM, "Haswell ULT GT3 Mobile"},
{0x0d26, INTEL_MODEL_HASM, "Haswell CRW GT3 Mobile"},
#if 0
{0x0f30, INTEL_MODEL_VLVM, "ValleyView Mobile"},
{0x0f31, INTEL_MODEL_VLVM, "ValleyView Mobile"},
{0x0f32, INTEL_MODEL_VLVM, "ValleyView Mobile"},
{0x0f33, INTEL_MODEL_VLVM, "ValleyView Mobile"},
#endif
{0x1606, INTEL_MODEL_BDWM, "Broadwell GT1 ULT"},
{0x160b, INTEL_MODEL_BDWM, "Broadwell GT1 Iris"},
{0x160e, INTEL_MODEL_BDWM, "Broadwell GT1 ULX"},
{0x1602, INTEL_MODEL_BDWM, "Broadwell GT1 ULT"},
{0x160a, INTEL_MODEL_BDWS, "Broadwell GT1 Server"},
{0x160d, INTEL_MODEL_BDW, "Broadwell GT1 Workstation"},
{0x1616, INTEL_MODEL_BDWM, "Broadwell GT2 ULT"},
{0x161b, INTEL_MODEL_BDWM, "Broadwell GT2 ULT"},
{0x161e, INTEL_MODEL_BDWM, "Broadwell GT2 ULX"},
{0x1612, INTEL_MODEL_BDWM, "Broadwell GT2 Halo"},
{0x161a, INTEL_MODEL_BDWS, "Broadwell GT2 Server"},
{0x161d, INTEL_MODEL_BDW, "Broadwell GT2 Workstation"},
{0x1626, INTEL_MODEL_BDWM, "Broadwell GT3 ULT"},
{0x162b, INTEL_MODEL_BDWM, "Broadwell GT3 Iris"},
{0x162e, INTEL_MODEL_BDWM, "Broadwell GT3 ULX"},
{0x1622, INTEL_MODEL_BDWM, "Broadwell GT3 ULT"},
{0x162a, INTEL_MODEL_BDWS, "Broadwell GT3 Server"},
{0x162d, INTEL_MODEL_BDW, "Broadwell GT3 Workstation"},
{0x1902, INTEL_MODEL_SKY, "Skylake GT1"},
{0x1906, INTEL_MODEL_SKYM, "Skylake GT1"},
{0x190a, INTEL_MODEL_SKYS, "Skylake GT1"},
{0x190b, INTEL_MODEL_SKY, "Skylake GT1"},
{0x190e, INTEL_MODEL_SKYM, "Skylake GT1"},
{0x1912, INTEL_MODEL_SKY, "Skylake GT2"},
{0x1916, INTEL_MODEL_SKYM, "Skylake GT2"},
{0x191a, INTEL_MODEL_SKYS, "Skylake GT2"},
{0x191b, INTEL_MODEL_SKY, "Skylake GT2"},
{0x191d, INTEL_MODEL_SKY, "Skylake GT2"},
{0x191e, INTEL_MODEL_SKYM, "Skylake GT2"},
{0x1921, INTEL_MODEL_SKYM, "Skylake GT2F"},
{0x1926, INTEL_MODEL_SKYM, "Skylake GT3"},
{0x192a, INTEL_MODEL_SKYS, "Skylake GT3"},
{0x192b, INTEL_MODEL_SKY, "Skylake GT3"},
{0x5a84, INTEL_MODEL_KBYM, "Apollo Lake GT1.5"},
{0x5a85, INTEL_MODEL_KBYM, "Apollo Lake GT1"},
{0x5906, INTEL_MODEL_KBY, "Kabylake ULT GT1"},
{0x5902, INTEL_MODEL_KBY, "Kabylake DT GT1"},
{0x5916, INTEL_MODEL_KBYM, "Kabylake ULT GT2"},
{0x5921, INTEL_MODEL_KBYM, "Kabylake ULT GT2F"},
{0x591c, INTEL_MODEL_KBY, "Kabylake ULX GT2"},
{0x591e, INTEL_MODEL_KBY, "Kabylake ULX GT2"},
{0x5912, INTEL_MODEL_KBY, "Kabylake DT GT2"},
{0x5917, INTEL_MODEL_KBYM, "Kabylake Mobile GT2"},
{0x591b, INTEL_MODEL_KBYM, "Kabylake Halo GT2"},
{0x591d, INTEL_MODEL_KBY, "Kabylake WKS GT2"},
{0x5926, INTEL_MODEL_KBY, "Kabylake ULT GT3"},
{0x5927, INTEL_MODEL_KBY, "Kabylake ULT GT3"},
{0x3185, INTEL_MODEL_KBYM, "GeminiLake GT1"},
{0x3184, INTEL_MODEL_KBYM, "GeminiLake GT1.5"},
{0x3e90, INTEL_MODEL_CFL, "CoffeeLake GT1"},
{0x3e93, INTEL_MODEL_CFL, "CoffeeLake GT1"},
{0x3e91, INTEL_MODEL_CFL, "CoffeeLake GT2"},
{0x3e92, INTEL_MODEL_CFL, "CoffeeLake GT2"},
{0x3e96, INTEL_MODEL_CFL, "CoffeeLake GT2"},
{0x3e98, INTEL_MODEL_CFL, "CoffeeLake GT2"},
{0x3e9a, INTEL_MODEL_CFL, "CoffeeLake GT2"},
{0x3e9b, INTEL_MODEL_CFLM, "CoffeeLake Halo GT2"},
{0x3eab, INTEL_MODEL_CFLM, "CoffeeLake Halo GT2"},
{0x3ea5, INTEL_MODEL_CFL, "CoffeeLake GT3"},
{0x3ea6, INTEL_MODEL_CFL, "CoffeeLake GT3"},
{0x8a56, INTEL_MODEL_CFLM, "IceLake GT1"},
{0x8a5c, INTEL_MODEL_CFLM, "IceLake GT1.5"},
{0x8a5a, INTEL_MODEL_CFLM, "IceLake GT1.5"},
{0x8a51, INTEL_MODEL_CFLM, "IceLake GT2"},
{0x8a52, INTEL_MODEL_CFLM, "IceLake GT2"},
{0x8a53, INTEL_MODEL_CFLM, "IceLake GT2"},
{0x9ba4, INTEL_MODEL_CML, "CometLake GT1"},
{0x9ba8, INTEL_MODEL_CML, "CometLake GT1"},
{0x9b21, INTEL_MODEL_CMLM, "CometLake U GT1"},
{0x9baa, INTEL_MODEL_CMLM, "CometLake U GT1"},
{0x9bc4, INTEL_MODEL_CML, "CometLake GT2"},
{0x9bc5, INTEL_MODEL_CML, "CometLake GT2"},
{0x9bc6, INTEL_MODEL_CML, "CometLake GT2"},
{0x9bc8, INTEL_MODEL_CML, "CometLake GT2"},
{0x9be6, INTEL_MODEL_CML, "CometLake GT2"},
{0x9bf6, INTEL_MODEL_CML, "CometLake GT2"},
{0x9b41, INTEL_MODEL_CMLM, "CometLake U GT2"},
{0x9bca, INTEL_MODEL_CMLM, "CometLake U GT2"},
{0x9bcc, INTEL_MODEL_CMLM, "CometLake U GT2"},
{0x4e55, INTEL_MODEL_JSL, "JasperLake"},
{0x4e61, INTEL_MODEL_JSL, "JasperLake"},
{0x4e71, INTEL_MODEL_JSLM, "JasperLake"},
{0x9a49, INTEL_MODEL_TGLM, "TigerLake"},
{0x9a78, INTEL_MODEL_TGLM, "TigerLake"},
{0x9a40, INTEL_MODEL_TGLM, "TigerLake"},
{0x9a60, INTEL_MODEL_TGLM, "TigerLake"},
{0x9a68, INTEL_MODEL_TGLM, "TigerLake"},
{0x9a70, INTEL_MODEL_TGLM, "TigerLake"},
{0x46a6, INTEL_MODEL_ALDM, "Alder Lake-P GT2"},
{0x46d1, INTEL_MODEL_ALDM, "Alder Lake-N"},
};
int32 api_version = B_CUR_DRIVER_API_VERSION;
char* gDeviceNames[MAX_CARDS + 1];
intel_info* gDeviceInfo[MAX_CARDS];
pci_module_info* gPCI;
agp_gart_module_info* gGART;
mutex gLock;
static status_t
get_next_intel_extreme(int32* _cookie, pci_info &info, uint32 &type)
{
int32 index = *_cookie;
for (; gPCI->get_nth_pci_info(index, &info) == B_OK; index++) {
if (info.vendor_id != VENDOR_ID_INTEL
|| info.class_base != PCI_display
|| (info.class_sub != PCI_vga && info.class_sub != PCI_display_other))
continue;
for (uint32 i = 0; i < sizeof(kSupportedDevices)
/ sizeof(kSupportedDevices[0]); i++) {
if (info.device_id == kSupportedDevices[i].device_id) {
type = i;
*_cookie = index + 1;
ERROR("%s: Intel gfx deviceID: 0x%04x\n", __func__, info.device_id);
return B_OK;
}
}
}
return B_ENTRY_NOT_FOUND;
}
static enum pch_info
detect_intel_pch()
{
pci_info info;
for (int32 i = 0; gPCI->get_nth_pci_info(i, &info) == B_OK; i++) {
if (info.vendor_id != VENDOR_ID_INTEL
|| info.class_base != PCI_bridge
|| info.class_sub != PCI_isa) {
continue;
}
unsigned short id = info.device_id & INTEL_PCH_DEVICE_ID_MASK;
ERROR("%s: Intel PCH deviceID: 0x%04x\n", __func__, info.device_id);
switch(id) {
case INTEL_PCH_IBX_DEVICE_ID:
ERROR("%s: Found Ibex Peak PCH\n", __func__);
return INTEL_PCH_IBX;
case INTEL_PCH_CPT_DEVICE_ID:
ERROR("%s: Found CougarPoint PCH\n", __func__);
return INTEL_PCH_CPT;
case INTEL_PCH_PPT_DEVICE_ID:
ERROR("%s: Found PantherPoint PCH\n", __func__);
return INTEL_PCH_CPT;
case INTEL_PCH_LPT_DEVICE_ID:
case INTEL_PCH_LPT_LP_DEVICE_ID:
ERROR("%s: Found LynxPoint PCH\n", __func__);
return INTEL_PCH_LPT;
case INTEL_PCH_WPT_DEVICE_ID:
case INTEL_PCH_WPT_LP_DEVICE_ID:
ERROR("%s: Found WildcatPoint PCH\n", __func__);
return INTEL_PCH_LPT;
case INTEL_PCH_SPT_DEVICE_ID:
case INTEL_PCH_SPT_LP_DEVICE_ID:
ERROR("%s: Found SunrisePoint PCH\n", __func__);
return INTEL_PCH_SPT;
case INTEL_PCH_KBP_DEVICE_ID:
ERROR("%s: Found Kaby Lake PCH\n", __func__);
return INTEL_PCH_SPT;
case INTEL_PCH_GMP_DEVICE_ID:
ERROR("%s: Found Gemini Lake PCH\n", __func__);
return INTEL_PCH_CNP;
case INTEL_PCH_CNP_DEVICE_ID:
case INTEL_PCH_CNP_LP_DEVICE_ID:
ERROR("%s: Found Cannon Lake PCH\n", __func__);
return INTEL_PCH_CNP;
case INTEL_PCH_APL_LP_DEVICE_ID:
ERROR("%s: Found Apollo Lake PCH\n", __func__);
return INTEL_PCH_CNP;
case INTEL_PCH_CMP_DEVICE_ID:
case INTEL_PCH_CMP2_DEVICE_ID:
ERROR("%s: Found Comet Lake PCH\n", __func__);
return INTEL_PCH_CNP;
case INTEL_PCH_CMP_V_DEVICE_ID:
ERROR("%s: Found Comet Lake V PCH\n", __func__);
return INTEL_PCH_SPT;
case INTEL_PCH_ICP_DEVICE_ID:
case INTEL_PCH_ICP2_DEVICE_ID:
ERROR("%s: Found Ice Lake PCH\n", __func__);
return INTEL_PCH_ICP;
case INTEL_PCH_MCC_DEVICE_ID:
ERROR("%s: Found Mule Creek Canyon PCH\n", __func__);
return INTEL_PCH_MCC;
case INTEL_PCH_TGP_DEVICE_ID:
case INTEL_PCH_TGP2_DEVICE_ID:
ERROR("%s: Found Tiger Lake PCH\n", __func__);
return INTEL_PCH_TGP;
case INTEL_PCH_JSP_DEVICE_ID:
ERROR("%s: Found Jasper Lake PCH\n", __func__);
return INTEL_PCH_JSP;
case INTEL_PCH_ADP_DEVICE_ID:
case INTEL_PCH_ADP2_DEVICE_ID:
case INTEL_PCH_ADP3_DEVICE_ID:
case INTEL_PCH_ADP4_DEVICE_ID:
case INTEL_PCH_ADP5_DEVICE_ID:
ERROR("%s: Found Alder Lake PCH\n", __func__);
return INTEL_PCH_ADP;
}
}
ERROR("%s: No PCH detected.\n", __func__);
return INTEL_PCH_NONE;
}
extern "C" const char**
publish_devices(void)
{
CALLED();
return (const char**)gDeviceNames;
}
extern "C" status_t
init_hardware(void)
{
CALLED();
status_t status = get_module(B_PCI_MODULE_NAME,(module_info**)&gPCI);
if (status != B_OK) {
ERROR("pci module unavailable\n");
return status;
}
int32 cookie = 0;
uint32 type;
pci_info info;
status = get_next_intel_extreme(&cookie, info, type);
put_module(B_PCI_MODULE_NAME);
return status;
}
extern "C" status_t
init_driver(void)
{
CALLED();
status_t status = get_module(B_PCI_MODULE_NAME, (module_info**)&gPCI);
if (status != B_OK) {
ERROR("pci module unavailable\n");
return status;
}
status = get_module(B_AGP_GART_MODULE_NAME, (module_info**)&gGART);
if (status != B_OK) {
ERROR("AGP GART module unavailable\n");
put_module(B_PCI_MODULE_NAME);
return status;
}
mutex_init(&gLock, "intel extreme ksync");
enum pch_info pchInfo = detect_intel_pch();
int32 found = 0;
for (int32 cookie = 0; found < MAX_CARDS;) {
pci_info* info = (pci_info*)malloc(sizeof(pci_info));
if (info == NULL)
break;
uint32 type;
status = get_next_intel_extreme(&cookie, *info, type);
if (status < B_OK) {
free(info);
break;
}
char name[64];
sprintf(name, "graphics/intel_extreme_%02x%02x%02x",
info->bus, info->device,
info->function);
gDeviceNames[found] = strdup(name);
if (gDeviceNames[found] == NULL)
break;
gDeviceInfo[found] = (intel_info*)malloc(sizeof(intel_info));
if (gDeviceInfo[found] == NULL) {
free(gDeviceNames[found]);
break;
}
memset((void*)gDeviceInfo[found], 0, sizeof(intel_info));
gDeviceInfo[found]->init_status = B_NO_INIT;
gDeviceInfo[found]->id = found;
gDeviceInfo[found]->pci = info;
gDeviceInfo[found]->registers = info->u.h0.base_registers[0];
gDeviceInfo[found]->device_identifier = kSupportedDevices[type].name;
gDeviceInfo[found]->device_type = kSupportedDevices[type].type;
gDeviceInfo[found]->pch_info = pchInfo;
dprintf(DEVICE_NAME ": (%" B_PRId32 ") %s, revision = 0x%x\n", found,
kSupportedDevices[type].name, info->revision);
found++;
}
gDeviceNames[found] = NULL;
if (found == 0) {
mutex_destroy(&gLock);
put_module(B_AGP_GART_MODULE_NAME);
put_module(B_PCI_MODULE_NAME);
return ENODEV;
}
return B_OK;
}
extern "C" void
uninit_driver(void)
{
CALLED();
mutex_destroy(&gLock);
char* name;
for (int32 index = 0; (name = gDeviceNames[index]) != NULL; index++) {
free(gDeviceInfo[index]);
free(name);
}
put_module(B_AGP_GART_MODULE_NAME);
put_module(B_PCI_MODULE_NAME);
}
extern "C" device_hooks*
find_device(const char* name)
{
CALLED();
int index;
for (index = 0; gDeviceNames[index] != NULL; index++) {
if (!strcmp(name, gDeviceNames[index]))
return &gDeviceHooks;
}
return NULL;
}
