| /* |
| * This file is part of the coreboot project. |
| * |
| * Copyright (C) 2014 Google Inc. |
| * Copyright (C) 2015 Intel Corporation. |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License as published by |
| * the Free Software Foundation; version 2 of the License. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| */ |
| |
| #include <types.h> |
| #include <string.h> |
| #include <device/device.h> |
| #include <device/pci.h> |
| #include <cpu/cpu.h> |
| #include <cpu/x86/cache.h> |
| #include <cpu/x86/lapic.h> |
| #include <cpu/x86/mp.h> |
| #include <cpu/x86/msr.h> |
| #include <cpu/x86/mtrr.h> |
| #include <cpu/x86/smm.h> |
| #include <console/console.h> |
| #include <soc/cpu.h> |
| #include <soc/msr.h> |
| #include <soc/pci_devs.h> |
| #include <soc/smm.h> |
| #include <soc/systemagent.h> |
| #include "chip.h" |
| |
| /* This gets filled in and used during relocation. */ |
| static struct smm_relocation_params smm_reloc_params; |
| |
| static inline void write_smrr(struct smm_relocation_params *relo_params) |
| { |
| printk(BIOS_DEBUG, "Writing SMRR. base = 0x%08x, mask=0x%08x\n", |
| relo_params->smrr_base.lo, relo_params->smrr_mask.lo); |
| wrmsr(SMRR_PHYS_BASE, relo_params->smrr_base); |
| wrmsr(SMRR_PHYS_MASK, relo_params->smrr_mask); |
| } |
| |
| static inline void write_uncore_emrr(struct smm_relocation_params *relo_params) |
| { |
| printk(BIOS_DEBUG, |
| "Writing UNCORE_EMRR. base = 0x%08x, mask=0x%08x\n", |
| relo_params->uncore_emrr_base.lo, |
| relo_params->uncore_emrr_mask.lo); |
| wrmsr(UNCORE_PRMRR_PHYS_BASE_MSR, relo_params->uncore_emrr_base); |
| wrmsr(UNCORE_PRMRR_PHYS_MASK_MSR, relo_params->uncore_emrr_mask); |
| } |
| |
| static void update_save_state(int cpu, uintptr_t curr_smbase, |
| uintptr_t staggered_smbase, |
| struct smm_relocation_params *relo_params) |
| { |
| u32 smbase; |
| u32 iedbase; |
| |
| /* |
| * The relocated handler runs with all CPUs concurrently. Therefore |
| * stagger the entry points adjusting SMBASE downwards by save state |
| * size * CPU num. |
| */ |
| smbase = staggered_smbase; |
| iedbase = relo_params->ied_base; |
| |
| printk(BIOS_DEBUG, "New SMBASE=0x%08x IEDBASE=0x%08x\n", |
| smbase, iedbase); |
| |
| /* |
| * All threads need to set IEDBASE and SMBASE to the relocated |
| * handler region. However, the save state location depends on the |
| * smm_save_state_in_msrs field in the relocation parameters. If |
| * smm_save_state_in_msrs is non-zero then the CPUs are relocating |
| * the SMM handler in parallel, and each CPUs save state area is |
| * located in their respective MSR space. If smm_save_state_in_msrs |
| * is zero then the SMM relocation is happening serially so the |
| * save state is at the same default location for all CPUs. |
| */ |
| if (relo_params->smm_save_state_in_msrs) { |
| msr_t smbase_msr; |
| msr_t iedbase_msr; |
| |
| smbase_msr.lo = smbase; |
| smbase_msr.hi = 0; |
| |
| /* |
| * According the BWG the IEDBASE MSR is in bits 63:32. It's |
| * not clear why it differs from the SMBASE MSR. |
| */ |
| iedbase_msr.lo = 0; |
| iedbase_msr.hi = iedbase; |
| |
| wrmsr(SMBASE_MSR, smbase_msr); |
| wrmsr(IEDBASE_MSR, iedbase_msr); |
| } else { |
| em64t101_smm_state_save_area_t *save_state; |
| |
| save_state = (void *)(curr_smbase + SMM_DEFAULT_SIZE - |
| sizeof(*save_state)); |
| |
| save_state->smbase = smbase; |
| save_state->iedbase = iedbase; |
| } |
| } |
| |
| /* Returns 1 if SMM MSR save state was set. */ |
| static int bsp_setup_msr_save_state(struct smm_relocation_params *relo_params) |
| { |
| msr_t smm_mca_cap; |
| |
| smm_mca_cap = rdmsr(SMM_MCA_CAP_MSR); |
| if (smm_mca_cap.hi & SMM_CPU_SVRSTR_MASK) { |
| msr_t smm_feature_control; |
| |
| smm_feature_control = rdmsr(SMM_FEATURE_CONTROL_MSR); |
| smm_feature_control.hi = 0; |
| smm_feature_control.lo |= SMM_CPU_SAVE_EN; |
| wrmsr(SMM_FEATURE_CONTROL_MSR, smm_feature_control); |
| relo_params->smm_save_state_in_msrs = 1; |
| } |
| return relo_params->smm_save_state_in_msrs; |
| } |
| |
| /* |
| * The relocation work is actually performed in SMM context, but the code |
| * resides in the ramstage module. This occurs by trampolining from the default |
| * SMRAM entry point to here. |
| */ |
| void smm_relocation_handler(int cpu, uintptr_t curr_smbase, |
| uintptr_t staggered_smbase) |
| { |
| msr_t mtrr_cap; |
| struct smm_relocation_params *relo_params = &smm_reloc_params; |
| |
| printk(BIOS_DEBUG, "In relocation handler: CPU %d\n", cpu); |
| |
| /* |
| * Determine if the processor supports saving state in MSRs. If so, |
| * enable it before the non-BSPs run so that SMM relocation can occur |
| * in parallel in the non-BSP CPUs. |
| */ |
| if (cpu == 0) { |
| /* |
| * If smm_save_state_in_msrs is 1 then that means this is the |
| * 2nd time through the relocation handler for the BSP. |
| * Parallel SMM handler relocation is taking place. However, |
| * it is desired to access other CPUs save state in the real |
| * SMM handler. Therefore, disable the SMM save state in MSRs |
| * feature. |
| */ |
| if (relo_params->smm_save_state_in_msrs) { |
| msr_t smm_feature_control; |
| |
| smm_feature_control = rdmsr(SMM_FEATURE_CONTROL_MSR); |
| smm_feature_control.lo &= ~SMM_CPU_SAVE_EN; |
| wrmsr(SMM_FEATURE_CONTROL_MSR, smm_feature_control); |
| } else if (bsp_setup_msr_save_state(relo_params)) |
| /* |
| * Just return from relocation handler if MSR save |
| * state is enabled. In that case the BSP will come |
| * back into the relocation handler to setup the new |
| * SMBASE as well disabling SMM save state in MSRs. |
| */ |
| return; |
| } |
| |
| /* Make appropriate changes to the save state map. */ |
| update_save_state(cpu, curr_smbase, staggered_smbase, relo_params); |
| |
| /* Write EMRR and SMRR MSRs based on indicated support. */ |
| mtrr_cap = rdmsr(MTRR_CAP_MSR); |
| if (mtrr_cap.lo & SMRR_SUPPORTED) |
| write_smrr(relo_params); |
| } |
| |
| static void fill_in_relocation_params(device_t dev, |
| struct smm_relocation_params *params) |
| { |
| void *handler_base; |
| size_t handler_size; |
| void *ied_base; |
| size_t ied_size; |
| void *tseg_base; |
| size_t tseg_size; |
| u32 emrr_base; |
| u32 emrr_size; |
| int phys_bits; |
| /* All range registers are aligned to 4KiB */ |
| const u32 rmask = ~((1 << 12) - 1); |
| |
| /* |
| * Some of the range registers are dependent on the number of physical |
| * address bits supported. |
| */ |
| phys_bits = cpuid_eax(0x80000008) & 0xff; |
| |
| smm_region(&tseg_base, &tseg_size); |
| smm_subregion(SMM_SUBREGION_HANDLER, &handler_base, &handler_size); |
| smm_subregion(SMM_SUBREGION_CHIPSET, &ied_base, &ied_size); |
| |
| params->smram_size = handler_size; |
| params->smram_base = (uintptr_t)handler_base; |
| |
| params->ied_base = (uintptr_t)ied_base; |
| params->ied_size = ied_size; |
| |
| /* SMRR has 32-bits of valid address aligned to 4KiB. */ |
| params->smrr_base.lo = (params->smram_base & rmask) | MTRR_TYPE_WRBACK; |
| params->smrr_base.hi = 0; |
| params->smrr_mask.lo = (~(tseg_size - 1) & rmask) | MTRR_PHYS_MASK_VALID; |
| params->smrr_mask.hi = 0; |
| |
| /* The EMRR and UNCORE_EMRR are at IEDBASE + 2MiB */ |
| emrr_base = (params->ied_base + (2 << 20)) & rmask; |
| emrr_size = params->ied_size - (2 << 20); |
| |
| /* |
| * EMRR has 46 bits of valid address aligned to 4KiB. It's dependent |
| * on the number of physical address bits supported. |
| */ |
| params->emrr_base.lo = emrr_base | MTRR_TYPE_WRBACK; |
| params->emrr_base.hi = 0; |
| params->emrr_mask.lo = (~(emrr_size - 1) & rmask) | MTRR_PHYS_MASK_VALID; |
| params->emrr_mask.hi = (1 << (phys_bits - 32)) - 1; |
| |
| /* UNCORE_EMRR has 39 bits of valid address aligned to 4KiB. */ |
| params->uncore_emrr_base.lo = emrr_base; |
| params->uncore_emrr_base.hi = 0; |
| params->uncore_emrr_mask.lo = (~(emrr_size - 1) & rmask) | |
| MTRR_PHYS_MASK_VALID; |
| params->uncore_emrr_mask.hi = (1 << (39 - 32)) - 1; |
| } |
| |
| static void setup_ied_area(struct smm_relocation_params *params) |
| { |
| char *ied_base; |
| |
| struct ied_header ied = { |
| .signature = "INTEL RSVD", |
| .size = params->ied_size, |
| .reserved = {0}, |
| }; |
| |
| ied_base = (void *)params->ied_base; |
| |
| printk(BIOS_DEBUG, "IED base = 0x%08x\n", params->ied_base); |
| printk(BIOS_DEBUG, "IED size = 0x%08x\n", params->ied_size); |
| |
| /* Place IED header at IEDBASE. */ |
| memcpy(ied_base, &ied, sizeof(ied)); |
| |
| /* Zero out 32KiB at IEDBASE + 1MiB */ |
| memset(ied_base + (1 << 20), 0, (32 << 10)); |
| } |
| |
| void smm_info(uintptr_t *perm_smbase, size_t *perm_smsize, |
| size_t *smm_save_state_size) |
| { |
| device_t dev = SA_DEV_ROOT; |
| |
| printk(BIOS_DEBUG, "Setting up SMI for CPU\n"); |
| |
| fill_in_relocation_params(dev, &smm_reloc_params); |
| |
| if (smm_reloc_params.ied_size) |
| setup_ied_area(&smm_reloc_params); |
| |
| *perm_smbase = smm_reloc_params.smram_base; |
| *perm_smsize = smm_reloc_params.smram_size; |
| *smm_save_state_size = sizeof(em64t101_smm_state_save_area_t); |
| } |
| |
| void smm_initialize(void) |
| { |
| /* Clear the SMM state in the southbridge. */ |
| southbridge_smm_clear_state(); |
| |
| /* |
| * Run the relocation handler for on the BSP to check and set up |
| * parallel SMM relocation. |
| */ |
| smm_initiate_relocation(); |
| |
| if (smm_reloc_params.smm_save_state_in_msrs) |
| printk(BIOS_DEBUG, "Doing parallel SMM relocation.\n"); |
| } |
| |
| void smm_relocate(void) |
| { |
| /* |
| * If smm_save_state_in_msrs is non-zero then parallel SMM relocation |
| * shall take place. Run the relocation handler a second time on the |
| * BSP to do * the final move. For APs, a relocation handler always |
| * needs to be run. |
| */ |
| if (smm_reloc_params.smm_save_state_in_msrs) |
| smm_initiate_relocation_parallel(); |
| else if (!boot_cpu()) |
| smm_initiate_relocation(); |
| } |
| |
| void smm_lock(void) |
| { |
| /* |
| * LOCK the SMM memory window and enable normal SMM. |
| * After running this function, only a full reset can |
| * make the SMM registers writable again. |
| */ |
| printk(BIOS_DEBUG, "Locking SMM.\n"); |
| pci_write_config8(SA_DEV_ROOT, SMRAM, D_LCK | G_SMRAME | C_BASE_SEG); |
| } |