src/mainboard/supermicro/h8dmr_fam10/romstage.c

   1 /*
   2  * This file is part of the coreboot project.
   3  *
   4  * Copyright (C) 2007 AMD
   5  * Written by Yinghai Lu <yinghailu@amd.com> for AMD.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License as published by
   9  * the Free Software Foundation; either version 2 of the License, or
  10  * (at your option) any later version.
  11  *
  12  * This program is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  * GNU General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * along with this program; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  20  */
  21
  22 #define FAM10_SCAN_PCI_BUS 0
  23 #define FAM10_ALLOCATE_IO_RANGE 1
  24
  25 #include <stdint.h>
  26 #include <string.h>
  27 #include <device/pci_def.h>
  28 #include <device/pci_ids.h>
  29 #include <arch/io.h>
  30 #include <device/pnp_def.h>
  31 #include <arch/romcc_io.h>
  32 #include <cpu/x86/lapic.h>
  33 #include <console/console.h>
  34 #include <lib.h>
  35 #include <spd.h>
  36 #include <cpu/amd/model_10xxx_rev.h>
  37 #include "southbridge/nvidia/mcp55/early_smbus.c" // for enable the FAN
  38 #include "northbridge/amd/amdfam10/raminit.h"
  39 #include "northbridge/amd/amdfam10/amdfam10.h"
  40 #include "cpu/amd/model_10xxx/apic_timer.c"
  41 #include "lib/delay.c"
  42 #include "cpu/x86/lapic/boot_cpu.c"
  43 #include "northbridge/amd/amdfam10/reset_test.c"
  44 #include "superio/winbond/w83627hf/early_serial.c"
  45 #include "superio/winbond/w83627hf/early_init.c"
  46 #include "cpu/x86/bist.h"
  47 #include "northbridge/amd/amdfam10/debug.c"
  48 #include "cpu/x86/mtrr/earlymtrr.c"
  49 #include "northbridge/amd/amdfam10/setup_resource_map.c"
  50 #include "southbridge/nvidia/mcp55/early_ctrl.c"
  51
  52 #define SERIAL_DEV PNP_DEV(0x2e, W83627HF_SP1)
  53 #define DUMMY_DEV PNP_DEV(0x2e, 0)
  54
  55 static void activate_spd_rom(const struct mem_controller *ctrl) { }
  56
  57 static inline int spd_read_byte(unsigned device, unsigned address)
  58 {
  59         return smbus_read_byte(device, address);
  60 }
  61
  62 #include "northbridge/amd/amdfam10/amdfam10.h"
  63 #include "northbridge/amd/amdfam10/raminit_sysinfo_in_ram.c"
  64 #include "northbridge/amd/amdfam10/pci.c"
  65 #include "resourcemap.c"
  66 #include "cpu/amd/quadcore/quadcore.c"
  67 #include "southbridge/nvidia/mcp55/early_setup_ss.h"
  68 #include "southbridge/nvidia/mcp55/early_setup_car.c"
  69 #include "cpu/amd/car/post_cache_as_ram.c"
  70 #include "cpu/amd/microcode/microcode.c"
  71
  72 #if CONFIG_UPDATE_CPU_MICROCODE
  73 #include "cpu/amd/model_10xxx/update_microcode.c"
  74 #endif
  75
  76 #include "cpu/amd/model_10xxx/init_cpus.c"
  77 #include "northbridge/amd/amdfam10/early_ht.c"
  78
  79 static void sio_setup(void)
  80 {
  81         uint32_t dword;
  82         uint8_t byte;
  83
  84         enable_smbus();
  85         // smbusx_write_byte(1, (0x58>>1), 0, 0x80); /* select bank0 */
  86         /* set FAN ctrl to DC mode */
  87         smbusx_write_byte(1, (0x58 >> 1), 0xb1, 0xff);
  88
  89         byte = pci_read_config8(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0x7b);
  90         byte |= 0x20;
  91         pci_write_config8(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0x7b, byte);
  92
  93         dword = pci_read_config32(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0xa0);
  94         dword |= (1 << 0);
  95         pci_write_config32(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0xa0, dword);
  96
  97         dword = pci_read_config32(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0xa4);
  98         dword |= (1 << 16);
  99         pci_write_config32(PCI_DEV(0, MCP55_DEVN_BASE + 1, 0), 0xa4, dword);
 100 }
 101
 102 static const u8 spd_addr[] = {
 103         //first node
 104         RC00, DIMM0, DIMM2, 0, 0, DIMM1, DIMM3, 0, 0,
 105 #if CONFIG_MAX_PHYSICAL_CPUS > 1
 106         //second node
 107         RC00, DIMM4, DIMM6, 0, 0, DIMM5, DIMM7, 0, 0,
 108 #endif
 109 };
 110
 111 void cache_as_ram_main(unsigned long bist, unsigned long cpu_init_detectedx)
 112 {
 113         struct sys_info *sysinfo = (struct sys_info *)(CONFIG_DCACHE_RAM_BASE +
 114                 CONFIG_DCACHE_RAM_SIZE - CONFIG_DCACHE_RAM_GLOBAL_VAR_SIZE);
 115         u32 bsp_apicid = 0, val, wants_reset;
 116         msr_t msr;
 117
 118         if (!cpu_init_detectedx && boot_cpu()) {
 119                 /* Nothing special needs to be done to find bus 0 */
 120                 /* Allow the HT devices to be found */
 121                 set_bsp_node_CHtExtNodeCfgEn();
 122                 enumerate_ht_chain();
 123                 sio_setup();
 124         }
 125
 126         post_code(0x30);
 127
 128         if (bist == 0)
 129                 bsp_apicid = init_cpus(cpu_init_detectedx, sysinfo);
 130
 131         post_code(0x32);
 132
 133         w83627hf_set_clksel_48(DUMMY_DEV);
 134         w83627hf_enable_serial(SERIAL_DEV, CONFIG_TTYS0_BASE);
 135
 136         uart_init();
 137         console_init();
 138         printk(BIOS_DEBUG, "\n");
 139
 140         /* Halt if there was a built in self test failure */
 141         report_bist_failure(bist);
 142
 143         val = cpuid_eax(1);
 144         printk(BIOS_DEBUG, "BSP Family_Model: %08x \n", val);
 145         printk(BIOS_DEBUG, "*sysinfo range: [%p,%p]\n", sysinfo, sysinfo + 1);
 146         printk(BIOS_DEBUG, "bsp_apicid = %02x \n", bsp_apicid);
 147         printk(BIOS_DEBUG, "cpu_init_detectedx = %08lx \n", cpu_init_detectedx);
 148
 149         /* Setup sysinfo defaults */
 150         set_sysinfo_in_ram(0);
 151
 152 #if CONFIG_UPDATE_CPU_MICROCODE
 153         update_microcode(val);
 154 #endif
 155         post_code(0x33);
 156
 157         cpuSetAMDMSR();
 158         post_code(0x34);
 159
 160         amd_ht_init(sysinfo);
 161         post_code(0x35);
 162
 163         /* Setup nodes PCI space and start core 0 AP init. */
 164         finalize_node_setup(sysinfo);
 165
 166         /* Setup any mainboard PCI settings etc. */
 167         setup_mb_resource_map();
 168         post_code(0x36);
 169
 170         /* wait for all the APs core0 started by finalize_node_setup. */
 171
 172         /* FIXME: A bunch of cores are going to start output to serial at once.
 173          * It would be nice to fixup prink spinlocks for ROM XIP mode.
 174          * I think it could be done by putting the spinlock flag in the cache
 175          * of the BSP located right after sysinfo.
 176          */
 177
 178         wait_all_core0_started();
 179 #if CONFIG_LOGICAL_CPUS==1
 180         /* Core0 on each node is configured. Now setup any additional cores. */
 181         printk(BIOS_DEBUG, "start_other_cores()\n");
 182         start_other_cores();
 183         post_code(0x37);
 184         wait_all_other_cores_started(bsp_apicid);
 185 #endif
 186
 187         post_code(0x38);
 188
 189 #if CONFIG_SET_FIDVID
 190         msr = rdmsr(0xc0010071);
 191         printk(BIOS_DEBUG, "\nBegin FIDVID MSR 0xc0010071 0x%08x 0x%08x \n",
 192                 msr.hi, msr.lo);
 193
 194         /* FIXME: The sb fid change may survive the warm reset and only
 195          * need to be done once.*/
 196
 197         enable_fid_change_on_sb(sysinfo->sbbusn, sysinfo->sbdn);
 198         post_code(0x39);
 199
 200         if (!warm_reset_detect(0)) {    // BSP is node 0
 201                 init_fidvid_bsp(bsp_apicid, sysinfo->nodes);
 202         } else {
 203                 init_fidvid_stage2(bsp_apicid, 0);      // BSP is node 0
 204         }
 205
 206         post_code(0x3A);
 207
 208         /* show final fid and vid */
 209         msr = rdmsr(0xc0010071);
 210         printk(BIOS_DEBUG, "End FIDVIDMSR 0xc0010071 0x%08x 0x%08x \n",
 211                msr.hi, msr.lo);
 212 #endif
 213
 214         init_timer(); // Need to use TMICT to synconize FID/VID
 215
 216         wants_reset = mcp55_early_setup_x();
 217
 218         /* Reset for HT, FIDVID, PLL and errata changes to take affect. */
 219         if (!warm_reset_detect(0)) {
 220                 print_info("...WARM RESET...\n\n\n");
 221                 soft_reset();
 222                 die("After soft_reset_x - shouldn't see this message!!!\n");
 223         }
 224
 225         if (wants_reset)
 226                 printk(BIOS_DEBUG, "mcp55_early_setup_x wants additional reset!\n");
 227
 228         post_code(0x3B);
 229
 230         /* It's the time to set ctrl in sysinfo now; */
 231         printk(BIOS_DEBUG, "fill_mem_ctrl()\n");
 232         fill_mem_ctrl(sysinfo->nodes, sysinfo->ctrl, spd_addr);
 233
 234         post_code(0x3D);
 235
 236         // printk(BIOS_DEBUG, "enable_smbus()\n");
 237         // enable_smbus(); /* enable in sio_setup */
 238
 239         post_code(0x40);
 240
 241         printk(BIOS_DEBUG, "raminit_amdmct()\n");
 242         raminit_amdmct(sysinfo);
 243         post_code(0x41);
 244
 245         // printk(BIOS_DEBUG, "\n*** Yes, the copy/decompress is taking a while, FIXME!\n");
 246         post_cache_as_ram(); // BSP switch stack to ram, copy + execute stage 2
 247         post_code(0x42);     // Should never see this post code.
 248 }
 249
 250 /**
 251  * BOOL AMD_CB_ManualBUIDSwapList(u8 Node, u8 Link, u8 **List)
 252  * Description:
 253  *      This routine is called every time a non-coherent chain is processed.
 254  *      BUID assignment may be controlled explicitly on a non-coherent chain. Provide a
 255  *      swap list. The first part of the list controls the BUID assignment and the
 256  *      second part of the list provides the device to device linking.  Device orientation
 257  *      can be detected automatically, or explicitly.  See documentation for more details.
 258  *
 259  *      Automatic non-coherent init assigns BUIDs starting at 1 and incrementing sequentially
 260  *      based on each device's unit count.
 261  *
 262  * Parameters:
 263  *      @param[in]  u8  node    = The node on which this chain is located
 264  *      @param[in]  u8  link    = The link on the host for this chain
 265  *      @param[out] u8** list   = supply a pointer to a list
 266  *      @param[out] BOOL result = true to use a manual list
 267  *                                false to initialize the link automatically
 268  */
 269 BOOL AMD_CB_ManualBUIDSwapList (u8 node, u8 link, const u8 **List)
 270 {
 271         static const u8 swaplist[] = { 0xFF, CONFIG_HT_CHAIN_UNITID_BASE, CONFIG_HT_CHAIN_END_UNITID_BASE, 0xFF };
 272         /* If the BUID was adjusted in early_ht we need to do the manual override */
 273         if ((CONFIG_HT_CHAIN_UNITID_BASE != 0) && (CONFIG_HT_CHAIN_END_UNITID_BASE != 0)) {
 274                 printk(BIOS_DEBUG, "AMD_CB_ManualBUIDSwapList()\n");
 275                 if ((node == 0) && (link == 0)) {       /* BSP SB link */
 276                         *List = swaplist;
 277                         return 1;
 278                 }
 279         }
 280
 281         return 0;
 282 }