src/mainboard/tyan/s4882/mptable.c

   1 #include <console/console.h>
   2 #include <arch/smp/mpspec.h>
   3 #include <device/pci.h>
   4 #include <string.h>
   5 #include <stdint.h>
   6 #if CONFIG_LOGICAL_CPUS==1
   7 #include <cpu/amd/multicore.h>
   8 #endif
   9
  10
  11 static unsigned node_link_to_bus(unsigned node, unsigned link)
  12 {
  13         device_t dev;
  14         unsigned reg;
  15
  16         dev = dev_find_slot(0, PCI_DEVFN(0x18, 1));
  17         if (!dev) {
  18                 return 0;
  19         }
  20         for(reg = 0xE0; reg < 0xF0; reg += 0x04) {
  21                 uint32_t config_map;
  22                 unsigned dst_node;
  23                 unsigned dst_link;
  24                 unsigned bus_base;
  25                 config_map = pci_read_config32(dev, reg);
  26                 if ((config_map & 3) != 3) {
  27                         continue;
  28                 }
  29                 dst_node = (config_map >> 4) & 7;
  30                 dst_link = (config_map >> 8) & 3;
  31                 bus_base = (config_map >> 16) & 0xff;
  32 #if 0
  33                 printk(BIOS_DEBUG, "node.link=bus: %d.%d=%d 0x%2x->0x%08x\n",
  34                         dst_node, dst_link, bus_base,
  35                         reg, config_map);
  36 #endif
  37                 if ((dst_node == node) && (dst_link == link))
  38                 {
  39                         return bus_base;
  40                 }
  41         }
  42         return 0;
  43 }
  44
  45 static void *smp_write_config_table(void *v)
  46 {
  47         static const char sig[4] = "PCMP";
  48         static const char oem[8] = "COREBOOT";
  49         static const char productid[12] = "S4882       ";
  50         struct mp_config_table *mc;
  51
  52         unsigned char bus_num;
  53         unsigned char bus_isa;
  54         unsigned char bus_chain_0;
  55         unsigned char bus_8131_1;
  56         unsigned char bus_8131_2;
  57         unsigned char bus_8111_1;
  58         unsigned apicid_base;
  59         unsigned apicid_8111;
  60         unsigned apicid_8131_1;
  61         unsigned apicid_8131_2;
  62
  63         mc = (void *)(((char *)v) + SMP_FLOATING_TABLE_LEN);
  64         memset(mc, 0, sizeof(*mc));
  65
  66         memcpy(mc->mpc_signature, sig, sizeof(sig));
  67         mc->mpc_length = sizeof(*mc); /* initially just the header */
  68         mc->mpc_spec = 0x04;
  69         mc->mpc_checksum = 0; /* not yet computed */
  70         memcpy(mc->mpc_oem, oem, sizeof(oem));
  71         memcpy(mc->mpc_productid, productid, sizeof(productid));
  72         mc->mpc_oemptr = 0;
  73         mc->mpc_oemsize = 0;
  74         mc->mpc_entry_count = 0; /* No entries yet... */
  75         mc->mpc_lapic = LAPIC_ADDR;
  76         mc->mpe_length = 0;
  77         mc->mpe_checksum = 0;
  78         mc->reserved = 0;
  79
  80         smp_write_processors(mc);
  81
  82
  83         {
  84                 device_t dev;
  85
  86                 /* HT chain 0 */
  87                 bus_chain_0 = node_link_to_bus(0, 1);
  88                 if (bus_chain_0 == 0) {
  89                         printk(BIOS_DEBUG, "ERROR - cound not find bus for node 0 chain 0, using defaults\n");
  90                         bus_chain_0 = 1;
  91                 }
  92
  93                 /* 8111 */
  94                 dev = dev_find_slot(bus_chain_0, PCI_DEVFN(0x03,0));
  95                 if (dev) {
  96                         bus_8111_1 = pci_read_config8(dev, PCI_SECONDARY_BUS);
  97                         bus_isa    = pci_read_config8(dev, PCI_SUBORDINATE_BUS);
  98                         bus_isa++;
  99                 }
 100                 else {
 101                         printk(BIOS_DEBUG, "ERROR - could not find PCI 1:03.0, using defaults\n");
 102
 103                         bus_8111_1 = 4;
 104                         bus_isa = 5;
 105                 }
 106                 /* 8131-1 */
 107                 dev = dev_find_slot(bus_chain_0, PCI_DEVFN(0x01,0));
 108                 if (dev) {
 109                         bus_8131_1 = pci_read_config8(dev, PCI_SECONDARY_BUS);
 110
 111                 }
 112                 else {
 113                         printk(BIOS_DEBUG, "ERROR - could not find PCI 1:01.0, using defaults\n");
 114
 115                         bus_8131_1 = 2;
 116                 }
 117                 /* 8131-2 */
 118                 dev = dev_find_slot(bus_chain_0, PCI_DEVFN(0x02,0));
 119                 if (dev) {
 120                         bus_8131_2 = pci_read_config8(dev, PCI_SECONDARY_BUS);
 121
 122                 }
 123                 else {
 124                         printk(BIOS_DEBUG, "ERROR - could not find PCI 1:02.0, using defaults\n");
 125
 126                         bus_8131_2 = 3;
 127                 }
 128         }
 129
 130 /*Bus:          Bus ID  Type*/
 131         /* define bus and isa numbers */
 132         for(bus_num = 0; bus_num < bus_isa; bus_num++) {
 133                 smp_write_bus(mc, bus_num, "PCI   ");
 134         }
 135         smp_write_bus(mc, bus_isa, "ISA   ");
 136
 137
 138 /*I/O APICs:    APIC ID Version State           Address*/
 139 #if CONFIG_LOGICAL_CPUS==1
 140         apicid_base = get_apicid_base(3);
 141 #else
 142         apicid_base = CONFIG_MAX_PHYSICAL_CPUS;
 143 #endif
 144         apicid_8111 = apicid_base+0;
 145         apicid_8131_1 = apicid_base+1;
 146         apicid_8131_2 = apicid_base+2;
 147         smp_write_ioapic(mc, apicid_8111, 0x11, 0xfec00000);
 148         {
 149                 device_t dev;
 150                 struct resource *res;
 151                 dev = dev_find_slot(bus_chain_0, PCI_DEVFN(0x1,1));
 152                 if (dev) {
 153                         res = find_resource(dev, PCI_BASE_ADDRESS_0);
 154                         if (res) {
 155                                 smp_write_ioapic(mc, apicid_8131_1, 0x11, res->base);
 156                         }
 157                 }
 158                 dev = dev_find_slot(bus_chain_0, PCI_DEVFN(0x2,1));
 159                 if (dev) {
 160                         res = find_resource(dev, PCI_BASE_ADDRESS_0);
 161                         if (res) {
 162                                 smp_write_ioapic(mc, apicid_8131_2, 0x11, res->base);
 163                         }
 164                 }
 165
 166         }
 167
 168 /*I/O Ints:     Type    Polarity    Trigger     Bus ID   IRQ    APIC ID PIN#
 169 */      smp_write_intsrc(mc, mp_ExtINT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x0, apicid_8111, 0x0);
 170         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x1, apicid_8111, 0x1);
 171         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x0, apicid_8111, 0x2);
 172         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x3, apicid_8111, 0x3);
 173         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x4, apicid_8111, 0x4);
 174         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x5, apicid_8111, 0x5);
 175         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x6, apicid_8111, 0x6);
 176         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x7, apicid_8111, 0x7);
 177         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x8, apicid_8111, 0x8);
 178         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x9, apicid_8111, 0x9);
 179         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xa, apicid_8111, 0xa);
 180         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xb, apicid_8111, 0xb);
 181         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xc, apicid_8111, 0xc);
 182         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xd, apicid_8111, 0xd);
 183         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xe, apicid_8111, 0xe);
 184         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0xf, apicid_8111, 0xf);
 185
 186
 187         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_chain_0, (4<<2)|0, apicid_8111, 0x13);
 188
 189
 190 //On Board AMD USB
 191         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (0<<2)|3, apicid_8111, 0x13);
 192
 193 //On Board Via USB 1.1 and 2
 194         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (3<<2)|0, apicid_8111, 0x11); //1.1
 195         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (3<<2)|1, apicid_8111, 0x10); //1.1
 196         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (3<<2)|2, apicid_8111, 0x12); //2
 197
 198 //Slot 5 PCI 32
 199         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (4<<2)|0, apicid_8111, 0x10);
 200         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (4<<2)|1, apicid_8111, 0x11);
 201         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (4<<2)|2, apicid_8111, 0x12); //
 202         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (4<<2)|3, apicid_8111, 0x13); //
 203
 204
 205 //On Board SI Serial ATA
 206         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (5<<2)|0, apicid_8111, 0x13);
 207 //On Board ATI Display Adapter
 208         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8111_1, (6<<2)|0, apicid_8111, 0x12);
 209
 210
 211 //Slot 4 PCIX 100/66
 212         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (3<<2)|0, apicid_8131_1, 0x3);
 213         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (3<<2)|1, apicid_8131_1, 0x0);
 214         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (3<<2)|2, apicid_8131_1, 0x1);//
 215         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (3<<2)|3, apicid_8131_1, 0x2);//
 216
 217 //Slot 3 PCIX 100/66
 218         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (2<<2)|0, apicid_8131_1, 0x2);
 219         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (2<<2)|1, apicid_8131_1, 0x3);//
 220         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (2<<2)|2, apicid_8131_1, 0x0);//
 221         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (2<<2)|3, apicid_8131_1, 0x1);//
 222
 223 //On Board LSI scsi and NIC
 224         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (4<<2)|0, apicid_8131_1, 0x0);
 225         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (4<<2)|1, apicid_8131_1, 0x1);
 226         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (9<<2)|0, apicid_8131_1, 0x0);
 227         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_1, (9<<2)|1, apicid_8131_1, 0x1);
 228
 229 //Slot 2 PCI-X 133/100/66
 230         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (3<<2)|0, apicid_8131_2, 0x0);
 231         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (3<<2)|1, apicid_8131_2, 0x1);
 232         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (3<<2)|2, apicid_8131_2, 0x2); //
 233         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (3<<2)|3, apicid_8131_2, 0x3); //
 234
 235 //Slot 1 PCI-X 133/100/66
 236         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (1<<2)|0, apicid_8131_2, 0x1);
 237         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (1<<2)|1, apicid_8131_2, 0x2);
 238         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (1<<2)|2, apicid_8131_2, 0x3);//
 239         smp_write_intsrc(mc, mp_INT, MP_IRQ_TRIGGER_LEVEL|MP_IRQ_POLARITY_LOW, bus_8131_2, (1<<2)|3, apicid_8131_2, 0x0);//
 240
 241 /*Local Ints:   Type    Polarity    Trigger     Bus ID   IRQ    APIC ID PIN#*/
 242         smp_write_intsrc(mc, mp_ExtINT, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x0, MP_APIC_ALL, 0x0);
 243         smp_write_intsrc(mc, mp_NMI, MP_IRQ_TRIGGER_EDGE|MP_IRQ_POLARITY_HIGH, bus_isa, 0x0, MP_APIC_ALL, 0x1);
 244         /* There is no extension information... */
 245
 246         /* Compute the checksums */
 247         mc->mpe_checksum = smp_compute_checksum(smp_next_mpc_entry(mc), mc->mpe_length);
 248         mc->mpc_checksum = smp_compute_checksum(mc, mc->mpc_length);
 249         printk(BIOS_DEBUG, "Wrote the mp table end at: %p - %p\n",
 250                 mc, smp_next_mpe_entry(mc));
 251         return smp_next_mpe_entry(mc);
 252 }
 253
 254 unsigned long write_smp_table(unsigned long addr)
 255 {
 256         void *v;
 257         v = smp_write_floating_table(addr);
 258         return (unsigned long)smp_write_config_table(v);
 259 }