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         console_init();
 137
 138         /* Halt if there was a built in self test failure */
 139         report_bist_failure(bist);
 140
 141         val = cpuid_eax(1);
 142         printk(BIOS_DEBUG, "BSP Family_Model: %08x \n", val);
 143         printk(BIOS_DEBUG, "*sysinfo range: [%p,%p]\n", sysinfo, sysinfo + 1);
 144         printk(BIOS_DEBUG, "bsp_apicid = %02x \n", bsp_apicid);
 145         printk(BIOS_DEBUG, "cpu_init_detectedx = %08lx \n", cpu_init_detectedx);
 146
 147         /* Setup sysinfo defaults */
 148         set_sysinfo_in_ram(0);
 149
 150 #if CONFIG_UPDATE_CPU_MICROCODE
 151         update_microcode(val);
 152 #endif
 153         post_code(0x33);
 154
 155         cpuSetAMDMSR();
 156         post_code(0x34);
 157
 158         amd_ht_init(sysinfo);
 159         post_code(0x35);
 160
 161         /* Setup nodes PCI space and start core 0 AP init. */
 162         finalize_node_setup(sysinfo);
 163
 164         /* Setup any mainboard PCI settings etc. */
 165         setup_mb_resource_map();
 166         post_code(0x36);
 167
 168         /* wait for all the APs core0 started by finalize_node_setup. */
 169
 170         /* FIXME: A bunch of cores are going to start output to serial at once.
 171          * It would be nice to fixup prink spinlocks for ROM XIP mode.
 172          * I think it could be done by putting the spinlock flag in the cache
 173          * of the BSP located right after sysinfo.
 174          */
 175
 176         wait_all_core0_started();
 177 #if CONFIG_LOGICAL_CPUS==1
 178         /* Core0 on each node is configured. Now setup any additional cores. */
 179         printk(BIOS_DEBUG, "start_other_cores()\n");
 180         start_other_cores();
 181         post_code(0x37);
 182         wait_all_other_cores_started(bsp_apicid);
 183 #endif
 184
 185         post_code(0x38);
 186
 187 #if CONFIG_SET_FIDVID
 188         msr = rdmsr(0xc0010071);
 189         printk(BIOS_DEBUG, "\nBegin FIDVID MSR 0xc0010071 0x%08x 0x%08x \n",
 190                 msr.hi, msr.lo);
 191
 192         /* FIXME: The sb fid change may survive the warm reset and only
 193          * need to be done once.*/
 194
 195         enable_fid_change_on_sb(sysinfo->sbbusn, sysinfo->sbdn);
 196         post_code(0x39);
 197
 198         if (!warm_reset_detect(0)) {    // BSP is node 0
 199                 init_fidvid_bsp(bsp_apicid, sysinfo->nodes);
 200         } else {
 201                 init_fidvid_stage2(bsp_apicid, 0);      // BSP is node 0
 202         }
 203
 204         post_code(0x3A);
 205
 206         /* show final fid and vid */
 207         msr = rdmsr(0xc0010071);
 208         printk(BIOS_DEBUG, "End FIDVIDMSR 0xc0010071 0x%08x 0x%08x \n",
 209                msr.hi, msr.lo);
 210 #endif
 211
 212         init_timer(); // Need to use TMICT to synconize FID/VID
 213
 214         wants_reset = mcp55_early_setup_x();
 215
 216         /* Reset for HT, FIDVID, PLL and errata changes to take affect. */
 217         if (!warm_reset_detect(0)) {
 218                 print_info("...WARM RESET...\n\n\n");
 219                 soft_reset();
 220                 die("After soft_reset_x - shouldn't see this message!!!\n");
 221         }
 222
 223         if (wants_reset)
 224                 printk(BIOS_DEBUG, "mcp55_early_setup_x wants additional reset!\n");
 225
 226         post_code(0x3B);
 227
 228         /* It's the time to set ctrl in sysinfo now; */
 229         printk(BIOS_DEBUG, "fill_mem_ctrl()\n");
 230         fill_mem_ctrl(sysinfo->nodes, sysinfo->ctrl, spd_addr);
 231
 232         post_code(0x3D);
 233
 234         // printk(BIOS_DEBUG, "enable_smbus()\n");
 235         // enable_smbus(); /* enable in sio_setup */
 236
 237         post_code(0x40);
 238
 239         printk(BIOS_DEBUG, "raminit_amdmct()\n");
 240         raminit_amdmct(sysinfo);
 241         post_code(0x41);
 242
 243         post_cache_as_ram(); // BSP switch stack to ram, copy + execute stage 2
 244         post_code(0x42);     // Should never see this post code.
 245 }
 246
 247 /**
 248  * BOOL AMD_CB_ManualBUIDSwapList(u8 Node, u8 Link, u8 **List)
 249  * Description:
 250  *      This routine is called every time a non-coherent chain is processed.
 251  *      BUID assignment may be controlled explicitly on a non-coherent chain. Provide a
 252  *      swap list. The first part of the list controls the BUID assignment and the
 253  *      second part of the list provides the device to device linking.  Device orientation
 254  *      can be detected automatically, or explicitly.  See documentation for more details.
 255  *
 256  *      Automatic non-coherent init assigns BUIDs starting at 1 and incrementing sequentially
 257  *      based on each device's unit count.
 258  *
 259  * Parameters:
 260  *      @param[in]  u8  node    = The node on which this chain is located
 261  *      @param[in]  u8  link    = The link on the host for this chain
 262  *      @param[out] u8** list   = supply a pointer to a list
 263  *      @param[out] BOOL result = true to use a manual list
 264  *                                false to initialize the link automatically
 265  */
 266 BOOL AMD_CB_ManualBUIDSwapList (u8 node, u8 link, const u8 **List)
 267 {
 268         static const u8 swaplist[] = { 0xFF, CONFIG_HT_CHAIN_UNITID_BASE, CONFIG_HT_CHAIN_END_UNITID_BASE, 0xFF };
 269         /* If the BUID was adjusted in early_ht we need to do the manual override */
 270         if ((CONFIG_HT_CHAIN_UNITID_BASE != 0) && (CONFIG_HT_CHAIN_END_UNITID_BASE != 0)) {
 271                 printk(BIOS_DEBUG, "AMD_CB_ManualBUIDSwapList()\n");
 272                 if ((node == 0) && (link == 0)) {       /* BSP SB link */
 273                         *List = swaplist;
 274                         return 1;
 275                 }
 276         }
 277
 278         return 0;
 279 }