229 lines
6.0 KiB
C
229 lines
6.0 KiB
C
/*
|
|
* 86Box A hypervisor and IBM PC system emulator that specializes in
|
|
* running old operating systems and software designed for IBM
|
|
* PC systems and compatibles from 1981 through fairly recent
|
|
* system designs based on the PCI bus.
|
|
*
|
|
* This file is part of the 86Box distribution.
|
|
*
|
|
* Emulation of the VIA VT82C686A/B integrated hardware monitor.
|
|
*
|
|
*
|
|
*
|
|
* Authors: RichardG, <richardg867@gmail.com>
|
|
*
|
|
* Copyright 2020 RichardG.
|
|
*/
|
|
#include <stdarg.h>
|
|
#include <stdio.h>
|
|
#include <stdint.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#define HAVE_STDARG_H
|
|
#include <wchar.h>
|
|
#include <86box/86box.h>
|
|
#include <86box/device.h>
|
|
#include <86box/io.h>
|
|
#include <86box/hwm.h>
|
|
#include <86box/plat_unused.h>
|
|
|
|
#define CLAMP(a, min, max) (((a) < (min)) ? (min) : (((a) > (max)) ? (max) : (a)))
|
|
/* Formulas and factors derived from Linux's via686a.c driver. */
|
|
#define VT82C686_RPM_TO_REG(r, d) ((r) ? CLAMP(1350000 / (r * d), 1, 255) : 0)
|
|
#define VT82C686_TEMP_TO_REG(t) (-1.160370e-10 * (t * t * t * t * t * t) + 3.193693e-08 * (t * t * t * t * t) - 1.464447e-06 * (t * t * t * t) - 2.525453e-04 * (t * t * t) + 1.424593e-02 * (t * t) + 2.148941e+00 * t + 7.275808e+01)
|
|
#define VT82C686_VOLTAGE_TO_REG(v, f) CLAMP((((v) * (2.628 / (f))) - 120.5) / 25, 0, 255)
|
|
|
|
typedef struct vt82c686_t {
|
|
hwm_values_t *values;
|
|
|
|
uint8_t enable;
|
|
uint16_t io_base;
|
|
uint8_t regs[128];
|
|
} vt82c686_t;
|
|
|
|
static double voltage_factors[5] = { 1.25, 1.25, 1.67, 2.6, 6.3 };
|
|
|
|
static void vt82c686_reset(vt82c686_t *dev, uint8_t initialization);
|
|
|
|
static uint8_t
|
|
vt82c686_read(uint16_t addr, void *priv)
|
|
{
|
|
const vt82c686_t *dev = (vt82c686_t *) priv;
|
|
uint8_t ret;
|
|
|
|
addr -= dev->io_base;
|
|
|
|
switch (addr) {
|
|
case 0x00 ... 0x0f:
|
|
case 0x50 ... 0x7f: /* undefined registers */
|
|
/* Real 686B returns the contents of 0x40. */
|
|
ret = dev->regs[0x40];
|
|
break;
|
|
|
|
case 0x1f:
|
|
case 0x20:
|
|
case 0x21: /* temperatures */
|
|
ret = VT82C686_TEMP_TO_REG(dev->values->temperatures[(addr == 0x1f) ? 2 : (addr & 1)]);
|
|
break;
|
|
|
|
case 0x22:
|
|
case 0x23:
|
|
case 0x24:
|
|
case 0x25:
|
|
case 0x26: /* voltages */
|
|
ret = VT82C686_VOLTAGE_TO_REG(dev->values->voltages[addr - 0x22], voltage_factors[addr - 0x22]);
|
|
break;
|
|
|
|
case 0x29:
|
|
case 0x2a: /* fan speeds */
|
|
ret = VT82C686_RPM_TO_REG(dev->values->fans[addr - 0x29], 1 << ((dev->regs[0x47] >> ((addr == 0x29) ? 4 : 6)) & 0x3));
|
|
break;
|
|
|
|
default: /* other registers */
|
|
ret = dev->regs[addr];
|
|
break;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
static void
|
|
vt82c686_write(uint16_t port, uint8_t val, void *priv)
|
|
{
|
|
vt82c686_t *dev = (vt82c686_t *) priv;
|
|
uint8_t reg = port & 0x7f;
|
|
|
|
switch (reg) {
|
|
case 0x00 ... 0x0f:
|
|
case 0x3f:
|
|
case 0x41:
|
|
case 0x42:
|
|
case 0x4a:
|
|
case 0x4c ... 0x7f:
|
|
/* Read-only registers. */
|
|
return;
|
|
|
|
case 0x40:
|
|
/* Reset if requested. */
|
|
if (val & 0x80) {
|
|
vt82c686_reset(dev, 1);
|
|
return;
|
|
}
|
|
break;
|
|
|
|
case 0x48:
|
|
val &= 0x7f;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
dev->regs[reg] = val;
|
|
}
|
|
|
|
/* Writes to hardware monitor-related configuration space registers
|
|
of the VT82C686 power management function are sent here by via_pipc.c */
|
|
void
|
|
vt82c686_hwm_write(uint8_t addr, uint8_t val, void *priv)
|
|
{
|
|
vt82c686_t *dev = (vt82c686_t *) priv;
|
|
|
|
if (dev->io_base)
|
|
io_removehandler(dev->io_base, 128,
|
|
vt82c686_read, NULL, NULL, vt82c686_write, NULL, NULL, dev);
|
|
|
|
switch (addr) {
|
|
case 0x70:
|
|
dev->io_base &= 0xff00;
|
|
dev->io_base |= val & 0x80;
|
|
break;
|
|
|
|
case 0x71:
|
|
dev->io_base &= 0x00ff;
|
|
dev->io_base |= val << 8;
|
|
break;
|
|
|
|
case 0x74:
|
|
dev->enable = val & 0x01;
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
|
|
if (dev->enable && dev->io_base)
|
|
io_sethandler(dev->io_base, 128,
|
|
vt82c686_read, NULL, NULL, vt82c686_write, NULL, NULL, dev);
|
|
}
|
|
|
|
static void
|
|
vt82c686_reset(vt82c686_t *dev, uint8_t initialization)
|
|
{
|
|
memset(dev->regs, 0, sizeof(dev->regs));
|
|
|
|
dev->regs[0x17] = 0x80;
|
|
dev->regs[0x3f] = 0xa2;
|
|
dev->regs[0x40] = 0x08;
|
|
dev->regs[0x47] = 0x50;
|
|
dev->regs[0x4b] = 0x15;
|
|
|
|
if (!initialization)
|
|
vt82c686_hwm_write(0x74, 0x00, dev);
|
|
}
|
|
|
|
static void
|
|
vt82c686_close(void *priv)
|
|
{
|
|
vt82c686_t *dev = (vt82c686_t *) priv;
|
|
|
|
free(dev);
|
|
}
|
|
|
|
static void *
|
|
vt82c686_init(UNUSED(const device_t *info))
|
|
{
|
|
vt82c686_t *dev = (vt82c686_t *) calloc(1, sizeof(vt82c686_t));
|
|
|
|
/* Set default values. Since this hardware monitor has a complex voltage factor system,
|
|
the values struct contains voltage values *before* applying their respective factors. */
|
|
hwm_values_t defaults = {
|
|
// clang-format off
|
|
{ /* fan speeds */
|
|
3000, /* usually CPU */
|
|
3000 /* usually Chassis */
|
|
}, { /* temperatures */
|
|
30, /* usually CPU */
|
|
30, /* usually System */
|
|
30
|
|
}, { /* voltages */
|
|
hwm_get_vcore(), /* Vcore */
|
|
2500, /* +2.5V */
|
|
3300, /* +3.3V */
|
|
5000, /* +5V */
|
|
12000 /* +12V */
|
|
}
|
|
// clang-format on
|
|
};
|
|
hwm_values = defaults;
|
|
dev->values = &hwm_values;
|
|
|
|
vt82c686_reset(dev, 0);
|
|
|
|
return dev;
|
|
}
|
|
|
|
const device_t via_vt82c686_hwm_device = {
|
|
.name = "VIA VT82C686 Integrated Hardware Monitor",
|
|
.internal_name = "via_vt82c686_hwm",
|
|
.flags = DEVICE_ISA,
|
|
.local = 0,
|
|
.init = vt82c686_init,
|
|
.close = vt82c686_close,
|
|
.reset = NULL,
|
|
.available = NULL,
|
|
.speed_changed = NULL,
|
|
.force_redraw = NULL,
|
|
.config = NULL
|
|
};
|