86Box/src/i430fx.c

/* Copyright holders: Sarah Walker, Tenshi
   see COPYING for more details
*/
#include <string.h>

#include "ibm.h"
#include "mem.h"
#include "pci.h"

#include "i430fx.h"

static uint8_t card_i430fx[256];

static void i430fx_map(uint32_t addr, uint32_t size, int state)
{
        switch (state & 3)
        {
                case 0:
                mem_set_mem_state(addr, size, MEM_READ_EXTERNAL | MEM_WRITE_EXTERNAL);
                break;
                case 1:
                mem_set_mem_state(addr, size, MEM_READ_INTERNAL | MEM_WRITE_EXTERNAL);
                break;
                case 2:
                mem_set_mem_state(addr, size, MEM_READ_EXTERNAL | MEM_WRITE_INTERNAL);
                break;
                case 3:
                mem_set_mem_state(addr, size, MEM_READ_INTERNAL | MEM_WRITE_INTERNAL);
                break;
        }
        flushmmucache_nopc();        
}

void i430fx_write(int func, int addr, uint8_t val, void *priv)
{
        if (func)
           return;

        switch (addr)
        {
                case 0x00: case 0x01: case 0x02: case 0x03:
                case 0x08: case 0x09: case 0x0a: case 0x0b:
                case 0x0e:
                return;
                
                case 0x59: /*PAM0*/
                if ((card_i430fx[0x59] ^ val) & 0xf0)
                {
                        i430fx_map(0xf0000, 0x10000, val >> 4);
                        shadowbios = (val & 0x10);
                }
                pclog("i430fx_write : PAM0 write %02X\n", val);
                break;
                case 0x5a: /*PAM1*/
                if ((card_i430fx[0x5a] ^ val) & 0x0f)
                        i430fx_map(0xc0000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5a] ^ val) & 0xf0)
                        i430fx_map(0xc4000, 0x04000, val >> 4);
                break;
                case 0x5b: /*PAM2*/
                if ((card_i430fx[0x5b] ^ val) & 0x0f)
                        i430fx_map(0xc8000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5b] ^ val) & 0xf0)
                        i430fx_map(0xcc000, 0x04000, val >> 4);
                break;
                case 0x5c: /*PAM3*/
                if ((card_i430fx[0x5c] ^ val) & 0x0f)
                        i430fx_map(0xd0000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5c] ^ val) & 0xf0)
                        i430fx_map(0xd4000, 0x04000, val >> 4);
                break;
                case 0x5d: /*PAM4*/
                if ((card_i430fx[0x5d] ^ val) & 0x0f)
                        i430fx_map(0xd8000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5d] ^ val) & 0xf0)
                        i430fx_map(0xdc000, 0x04000, val >> 4);
                break;
                case 0x5e: /*PAM5*/
                if ((card_i430fx[0x5e] ^ val) & 0x0f)
                        i430fx_map(0xe0000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5e] ^ val) & 0xf0)
                        i430fx_map(0xe4000, 0x04000, val >> 4);
                pclog("i430fx_write : PAM5 write %02X\n", val);
                break;
                case 0x5f: /*PAM6*/
                if ((card_i430fx[0x5f] ^ val) & 0x0f)
                        i430fx_map(0xe8000, 0x04000, val & 0xf);
                if ((card_i430fx[0x5f] ^ val) & 0xf0)
                        i430fx_map(0xec000, 0x04000, val >> 4);
                pclog("i430fx_write : PAM6 write %02X\n", val);
                break;
        }
                
        card_i430fx[addr] = val;
}

uint8_t i430fx_read(int func, int addr, void *priv)
{
        if (func)
                return 0xff;

        return card_i430fx[addr];
}

/*The Turbo-Reset Control Register isn't listed in the i430FX datasheet, however
  the Advanced/EV BIOS seems to assume it exists. It aliases with one of the PCI
  registers.*/ 
static uint8_t trc = 0;

void i430fx_trc_write(uint16_t port, uint8_t val, void *p)
{
        if ((val & 4) && !(trc & 4))
        {
                if (val & 2) /*Hard reset*/
                        i430fx_write(0, 0x59, 0xf, NULL); /*Should reset all PCI devices, but just set PAM0 to point to ROM for now*/
                resetx86();
        }
                
        trc = val;
}

void i430fx_init()
{
        pci_add_specific(0, i430fx_read, i430fx_write, NULL);
        
        memset(card_i430fx, 0, 256);
        card_i430fx[0x00] = 0x86; card_i430fx[0x01] = 0x80; /*Intel*/
        card_i430fx[0x02] = 0x22; card_i430fx[0x03] = 0x01; /*SB82437FX-66*/
        card_i430fx[0x04] = 0x06; card_i430fx[0x05] = 0x00;
        card_i430fx[0x06] = 0x00; card_i430fx[0x07] = 0x82;
	if (romset == ROM_MB500N)  card_i430fx[0x07] = 0x02;
        card_i430fx[0x08] = 0x00; /*A0 stepping*/
        card_i430fx[0x09] = 0x00; card_i430fx[0x0a] = 0x00; card_i430fx[0x0b] = 0x06;
        card_i430fx[0x52] = 0x40; /*256kb PLB cache*/
	if (romset == ROM_MB500N)
	{
		card_i430fx[0x52] = 0x42;
	        card_i430fx[0x53] = 0x14;
	        card_i430fx[0x56] = 0x52; /*DRAM control*/
	}
//        card_i430fx[0x53] = 0x14;
//        card_i430fx[0x56] = 0x52; /*DRAM control*/
        card_i430fx[0x57] = 0x01;
        card_i430fx[0x60] = card_i430fx[0x61] = card_i430fx[0x62] = card_i430fx[0x63] = card_i430fx[0x64] = 0x02;
	if (romset == ROM_MB500N)
	{
	        card_i430fx[0x67] = 0x11;
	        card_i430fx[0x69] = 0x03;
	        card_i430fx[0x70] = 0x20;
	}
//        card_i430fx[0x67] = 0x11;
//        card_i430fx[0x69] = 0x03;
//        card_i430fx[0x70] = 0x20;
        card_i430fx[0x72] = 0x02;
//        card_i430fx[0x74] = 0x0e;
//        card_i430fx[0x78] = 0x23;
	if (romset == ROM_MB500N)
	{
	        card_i430fx[0x74] = 0x0e;
	        card_i430fx[0x78] = 0x23;
	}

        if (romset != ROM_MB500N)  io_sethandler(0x0cf9, 0x0001, NULL, NULL, NULL, i430fx_trc_write, NULL, NULL, NULL);
}