| /* SPDX-License-Identifier: GPL-2.0-only */ |
| |
| #include <commonlib/helpers.h> |
| #include <cpu/intel/msr.h> |
| #include <cpu/x86/cache.h> |
| #include <cpu/x86/cr.h> |
| #include <cpu/x86/msr.h> |
| #include <cpu/x86/mtrr.h> |
| #include <cpu/x86/post_code.h> |
| #include <rules.h> |
| #include <intelblocks/msr.h> |
| |
| .section .init, "ax", @progbits |
| |
| .code32 |
| |
| /* |
| * macro: find_free_mtrr |
| * Clobbers: %eax, %ebx, %ecx, %edx. |
| * Returns: |
| * %ebx contains the number of freely available MTRR's. |
| * It should be checked against 0. |
| * %ecx holds the MTRR_BASE of the free MTRR. |
| */ |
| .macro find_free_mtrr |
| /* Figure out how many MTRRs we have */ |
| mov $MTRR_CAP_MSR, %ecx |
| rdmsr |
| movzb %al, %ebx /* Number of variable MTRRs */ |
| |
| /* Find a free variable MTRR */ |
| movl $MTRR_PHYS_MASK(0), %ecx |
| 1: |
| rdmsr |
| test $MTRR_PHYS_MASK_VALID, %eax |
| jz 2f |
| addl $2, %ecx |
| dec %ebx |
| jnz 1b |
| 2: |
| /* %ecx needs to hold the MTRR_BASE */ |
| decl %ecx |
| .endm |
| |
| /* |
| * macro: clear_car |
| * Clears the region between CONFIG_DCACHE_RAM_BASE and |
| * CONFIG_DCACHE_RAM_BASE + CONFIG_DCACHE_RAM_SIZE to populate |
| * cachelines. |
| * Clobbers %eax, %ecx, %edi. |
| */ |
| .macro clear_car |
| /* Clear the cache memory region. This will also fill up the cache */ |
| movl $CONFIG_DCACHE_RAM_BASE, %edi |
| movl $CONFIG_DCACHE_RAM_SIZE, %ecx |
| shr $0x02, %ecx |
| xor %eax, %eax |
| cld |
| rep stosl |
| .endm |
| |
| /* |
| * macro: is_bootguard_nem |
| * Checks if the Bootguard ACM has enabled non eviction mode |
| * Clobbers %eax, %ecx, %edx |
| * Returns %eax and sets/unsets zero flag |
| */ |
| .macro is_bootguard_nem |
| movl $MSR_BOOT_GUARD_SACM_INFO, %ecx |
| rdmsr |
| andl $B_BOOT_GUARD_SACM_INFO_NEM_ENABLED, %eax |
| .endm |
| |
| .global bootblock_pre_c_entry |
| bootblock_pre_c_entry: |
| |
| post_code(0x20) |
| |
| /* Bootguard sets up its own CAR and needs separate handling */ |
| check_boot_guard: |
| is_bootguard_nem |
| jz no_bootguard |
| |
| /* Disable PBE timer */ |
| movl $MSR_BC_PBEC, %ecx |
| movl $B_STOP_PBET, %eax |
| xorl %edx, %edx |
| wrmsr |
| |
| jmp setup_car_mtrr |
| |
| no_bootguard: |
| movl $no_reset, %esp /* return address */ |
| jmp check_mtrr /* Check if CPU properly reset */ |
| |
| no_reset: |
| post_code(0x21) |
| |
| /* Clear/disable fixed MTRRs */ |
| mov $fixed_mtrr_list_size, %ebx |
| xor %eax, %eax |
| xor %edx, %edx |
| |
| clear_fixed_mtrr: |
| add $-2, %ebx |
| movzwl fixed_mtrr_list(%ebx), %ecx |
| wrmsr |
| jnz clear_fixed_mtrr |
| |
| post_code(0x22) |
| |
| /* Figure out how many MTRRs we have, and clear them out */ |
| mov $MTRR_CAP_MSR, %ecx |
| rdmsr |
| movzb %al, %ebx /* Number of variable MTRRs */ |
| mov $MTRR_PHYS_BASE(0), %ecx |
| xor %eax, %eax |
| xor %edx, %edx |
| |
| clear_var_mtrr: |
| wrmsr |
| inc %ecx |
| wrmsr |
| inc %ecx |
| dec %ebx |
| jnz clear_var_mtrr |
| |
| post_code(0x23) |
| |
| /* Configure default memory type to uncacheable (UC) */ |
| mov $MTRR_DEF_TYPE_MSR, %ecx |
| rdmsr |
| /* Clear enable bits and set default type to UC. */ |
| and $~(MTRR_DEF_TYPE_MASK | MTRR_DEF_TYPE_EN | \ |
| MTRR_DEF_TYPE_FIX_EN), %eax |
| wrmsr |
| |
| setup_car_mtrr: |
| /* Configure MTRR_PHYS_MASK_HIGH for proper addressing above 4GB |
| * based on the physical address size supported for this processor |
| * This is based on read from CPUID EAX = 080000008h, EAX bits [7:0] |
| * |
| * Examples: |
| * MTRR_PHYS_MASK_HIGH = 00000000Fh For 36 bit addressing |
| * MTRR_PHYS_MASK_HIGH = 0000000FFh For 40 bit addressing |
| */ |
| |
| movl $0x80000008, %eax /* Address sizes leaf */ |
| cpuid |
| sub $32, %al |
| movzx %al, %eax |
| xorl %esi, %esi |
| bts %eax, %esi |
| dec %esi /* esi <- MTRR_PHYS_MASK_HIGH */ |
| |
| post_code(0x24) |
| |
| #if ((CONFIG_DCACHE_RAM_SIZE & (CONFIG_DCACHE_RAM_SIZE - 1)) == 0) |
| find_free_mtrr |
| test %ebx, %ebx |
| jz .halt_forever |
| |
| /* Configure CAR region as write-back (WB) */ |
| mov $CONFIG_DCACHE_RAM_BASE, %eax |
| or $MTRR_TYPE_WRBACK, %eax |
| xor %edx,%edx |
| wrmsr |
| |
| /* Configure the MTRR mask for the size region */ |
| inc %ecx |
| mov $CONFIG_DCACHE_RAM_SIZE, %eax /* size mask */ |
| dec %eax |
| not %eax |
| or $MTRR_PHYS_MASK_VALID, %eax |
| movl %esi, %edx /* edx <- MTRR_PHYS_MASK_HIGH */ |
| wrmsr |
| #elif (CONFIG_DCACHE_RAM_SIZE == 768 * KiB) /* 768 KiB */ |
| find_free_mtrr |
| test %ebx, %ebx |
| jz .halt_forever |
| |
| /* Configure CAR region as write-back (WB) */ |
| mov $CONFIG_DCACHE_RAM_BASE, %eax |
| or $MTRR_TYPE_WRBACK, %eax |
| xor %edx,%edx |
| wrmsr |
| |
| incl %ecx |
| mov $(512 * KiB), %eax /* size mask */ |
| dec %eax |
| not %eax |
| or $MTRR_PHYS_MASK_VALID, %eax |
| movl %esi, %edx /* edx <- MTRR_PHYS_MASK_HIGH */ |
| wrmsr |
| |
| find_free_mtrr |
| test %ebx, %ebx |
| jz .halt_forever |
| 1: |
| mov $(CONFIG_DCACHE_RAM_BASE + 512 * KiB), %eax |
| or $MTRR_TYPE_WRBACK, %eax |
| xor %edx,%edx |
| wrmsr |
| |
| incl %ecx |
| mov $(256 * KiB), %eax /* size mask */ |
| dec %eax |
| not %eax |
| or $MTRR_PHYS_MASK_VALID, %eax |
| movl %esi, %edx /* edx <- MTRR_PHYS_MASK_HIGH */ |
| wrmsr |
| #else |
| #error "DCACHE_RAM_SIZE is not a power of 2 and setup code is missing" |
| #endif |
| post_code(0x25) |
| |
| is_bootguard_nem |
| jz no_bootguard_car_continue |
| |
| clear_car |
| |
| jmp car_init_done |
| |
| no_bootguard_car_continue: |
| /* Enable variable MTRRs */ |
| mov $MTRR_DEF_TYPE_MSR, %ecx |
| rdmsr |
| or $MTRR_DEF_TYPE_EN, %eax |
| wrmsr |
| |
| /* Enable caching */ |
| mov %cr0, %eax |
| and $~(CR0_CD | CR0_NW), %eax |
| invd |
| mov %eax, %cr0 |
| |
| #if CONFIG(INTEL_CAR_NEM) |
| jmp car_nem |
| #elif CONFIG(INTEL_CAR_CQOS) |
| jmp car_cqos |
| #elif CONFIG(INTEL_CAR_NEM_ENHANCED) |
| jmp car_nem_enhanced |
| #else |
| jmp .halt_forever /* In case nothing has selected */ |
| #endif |
| |
| .global car_init_done |
| car_init_done: |
| |
| post_code(0x29) |
| |
| /* Setup bootblock stack */ |
| mov $_ecar_stack, %esp |
| |
| /* Need to align stack to 16 bytes at call instruction. Account for |
| the two pushes below. */ |
| andl $0xfffffff0, %esp |
| |
| #if ENV_X86_64 |
| #include <cpu/x86/64bit/entry64.inc> |
| movd %mm2, %rdi |
| shlq $32, %rdi |
| movd %mm1, %rsi |
| or %rsi, %rdi |
| movd %mm0, %rsi |
| #else |
| sub $8, %esp |
| |
| /* push TSC value to stack */ |
| movd %mm2, %eax |
| pushl %eax /* tsc[63:32] */ |
| movd %mm1, %eax |
| pushl %eax /* tsc[31:0] */ |
| #endif |
| |
| before_carstage: |
| post_code(0x2A) |
| |
| call bootblock_c_entry |
| /* Never reached */ |
| |
| .halt_forever: |
| post_code(POST_DEAD_CODE) |
| hlt |
| jmp .halt_forever |
| |
| fixed_mtrr_list: |
| .word MTRR_FIX_64K_00000 |
| .word MTRR_FIX_16K_80000 |
| .word MTRR_FIX_16K_A0000 |
| .word MTRR_FIX_4K_C0000 |
| .word MTRR_FIX_4K_C8000 |
| .word MTRR_FIX_4K_D0000 |
| .word MTRR_FIX_4K_D8000 |
| .word MTRR_FIX_4K_E0000 |
| .word MTRR_FIX_4K_E8000 |
| .word MTRR_FIX_4K_F0000 |
| .word MTRR_FIX_4K_F8000 |
| fixed_mtrr_list_size = . - fixed_mtrr_list |
| |
| #if CONFIG(INTEL_CAR_NEM) |
| .global car_nem |
| car_nem: |
| /* Disable cache eviction (setup stage) */ |
| mov $MSR_EVICT_CTL, %ecx |
| rdmsr |
| or $0x1, %eax |
| wrmsr |
| |
| post_code(0x26) |
| |
| clear_car |
| |
| post_code(0x27) |
| |
| /* Disable cache eviction (run stage) */ |
| mov $MSR_EVICT_CTL, %ecx |
| rdmsr |
| or $0x2, %eax |
| wrmsr |
| |
| post_code(0x28) |
| |
| jmp car_init_done |
| |
| #elif CONFIG(INTEL_CAR_CQOS) |
| .global car_cqos |
| car_cqos: |
| /* |
| * Create CBM_LEN_MASK based on CBM_LEN |
| * Get CPUID.(EAX=10H, ECX=2H):EAX.CBM_LEN[bits 4:0] |
| */ |
| mov $0x10, %eax |
| mov $0x2, %ecx |
| cpuid |
| and $0x1F, %eax |
| add $1, %al |
| |
| mov $1, %ebx |
| mov %al, %cl |
| shl %cl, %ebx |
| sub $1, %ebx |
| |
| /* Store the CBM_LEN_MASK in mm3 for later use. */ |
| movd %ebx, %mm3 |
| |
| /* |
| * Disable both L1 and L2 prefetcher. For yet-to-understood reason, |
| * prefetchers slow down filling cache with rep stos in CQOS mode. |
| */ |
| mov $MSR_PREFETCH_CTL, %ecx |
| rdmsr |
| or $(PREFETCH_L1_DISABLE | PREFETCH_L2_DISABLE), %eax |
| wrmsr |
| |
| #if (CONFIG_DCACHE_RAM_SIZE == CONFIG_L2_CACHE_SIZE) |
| /* |
| * If CAR size is set to full L2 size, mask is calculated as all-zeros. |
| * This is not supported by the CPU/uCode. |
| */ |
| #error "CQOS CAR may not use whole L2 cache area" |
| #endif |
| |
| /* Calculate how many bits to be used for CAR */ |
| xor %edx, %edx |
| mov $CONFIG_DCACHE_RAM_SIZE, %eax /* dividend */ |
| mov $CONFIG_CACHE_QOS_SIZE_PER_BIT, %ecx /* divisor */ |
| div %ecx /* result is in eax */ |
| mov %eax, %ecx /* save to ecx */ |
| mov $1, %ebx |
| shl %cl, %ebx |
| sub $1, %ebx /* resulting mask is is in ebx */ |
| |
| /* Set this mask for initial cache fill */ |
| mov $MSR_L2_QOS_MASK(0), %ecx |
| rdmsr |
| mov %ebx, %eax |
| wrmsr |
| |
| /* Set CLOS selector to 0 */ |
| mov $IA32_PQR_ASSOC, %ecx |
| rdmsr |
| and $~IA32_PQR_ASSOC_MASK, %edx /* select mask 0 */ |
| wrmsr |
| |
| /* We will need to block CAR region from evicts */ |
| mov $MSR_L2_QOS_MASK(1), %ecx |
| rdmsr |
| /* Invert bits that are to be used for cache */ |
| mov %ebx, %eax |
| xor $~0, %eax /* invert 32 bits */ |
| |
| /* |
| * Use CBM_LEN_MASK stored in mm3 to set bits based on Capacity Bit |
| * Mask Length. |
| */ |
| movd %mm3, %ebx |
| and %ebx, %eax |
| wrmsr |
| |
| post_code(0x26) |
| |
| clear_car |
| |
| post_code(0x27) |
| |
| /* Cache is populated. Use mask 1 that will block evicts */ |
| mov $IA32_PQR_ASSOC, %ecx |
| rdmsr |
| and $~IA32_PQR_ASSOC_MASK, %edx /* clear index bits first */ |
| or $1, %edx /* select mask 1 */ |
| wrmsr |
| |
| /* Enable prefetchers */ |
| mov $MSR_PREFETCH_CTL, %ecx |
| rdmsr |
| and $~(PREFETCH_L1_DISABLE | PREFETCH_L2_DISABLE), %eax |
| wrmsr |
| |
| post_code(0x28) |
| |
| jmp car_init_done |
| |
| #elif CONFIG(INTEL_CAR_NEM_ENHANCED) |
| .global car_nem_enhanced |
| car_nem_enhanced: |
| /* Disable cache eviction (setup stage) */ |
| mov $MSR_EVICT_CTL, %ecx |
| rdmsr |
| or $0x1, %eax |
| wrmsr |
| post_code(0x26) |
| |
| /* Create n-way set associativity of cache */ |
| xorl %edi, %edi |
| find_llc_subleaf: |
| movl %edi, %ecx |
| movl $0x04, %eax |
| cpuid |
| inc %edi |
| and $0xe0, %al /* EAX[7:5] = Cache Level */ |
| cmp $0x60, %al /* Check to see if it is LLC */ |
| jnz find_llc_subleaf |
| |
| /* |
| * Calculate the total LLC size |
| * (Line_Size + 1) * (Sets + 1) * (Partitions + 1) * (Ways + 1) |
| * (EBX[11:0] + 1) * (ECX + 1) * (EBX[21:12] + 1) * EBX[31:22] + 1) |
| */ |
| |
| mov %ebx, %eax |
| and $0xFFF, %eax |
| inc %eax |
| inc %ecx |
| mul %ecx |
| mov %eax, %ecx |
| mov %ebx, %eax |
| shr $12, %eax |
| and $0x3FF, %eax |
| inc %eax |
| mul %ecx |
| shr $22, %ebx |
| inc %ebx |
| mov %ebx, %edx |
| mul %ebx /* eax now holds total LLC size */ |
| |
| /* |
| * The number of the ways that we want to protect from eviction |
| * can be calculated as RW data stack size / way size where way |
| * size is Total LLC size / Total number of LLC ways. |
| */ |
| div %ebx /* way size */ |
| mov %eax, %ecx |
| |
| /* |
| * Check if way size if bigger than the cache ram size. |
| * Then we need to allocate just one way for non-eviction |
| * of RW data. |
| */ |
| movl $0x01, %eax |
| cmp $CONFIG_DCACHE_RAM_SIZE, %ecx |
| jnc set_eviction_mask |
| |
| /* |
| * RW data size / way size is equal to number of |
| * ways to be configured for non-eviction |
| */ |
| mov $CONFIG_DCACHE_RAM_SIZE, %eax |
| div %ecx |
| mov %eax, %ecx |
| movl $0x01, %eax |
| shl %cl, %eax |
| subl $0x01, %eax |
| |
| set_eviction_mask: |
| mov %ebx, %ecx /* back up number of ways */ |
| mov %eax, %ebx /* back up the non-eviction mask*/ |
| #if CONFIG(CAR_HAS_SF_MASKS) |
| mov %ecx, %edi /* use number of ways to prepare SF mask */ |
| /* |
| * SF mask is programmed with the double number of bits than |
| * the number of ways |
| */ |
| mov $0x01, %eax |
| shl %cl, %eax |
| shl %cl, %eax |
| subl $0x01, %eax /* contains SF mask */ |
| /* |
| * Program MSR 0x1891 IA32_CR_SF_QOS_MASK_1 with |
| * total number of LLC ways |
| */ |
| movl $IA32_CR_SF_QOS_MASK_1, %ecx |
| xorl %edx, %edx |
| wrmsr |
| mov %edi, %ecx /* restore number of ways */ |
| #endif |
| /* |
| * Program MSR 0xC91 IA32_L3_MASK_1 |
| * This MSR contain one bit per each way of LLC |
| * - If this bit is '0' - the way is protected from eviction |
| * - If this bit is '1' - the way is not protected from eviction |
| */ |
| mov $0x1, %eax |
| shl %cl, %eax |
| subl $0x01, %eax |
| mov %eax, %ecx |
| mov %ebx, %eax |
| |
| xor $~0, %eax /* invert 32 bits */ |
| and %ecx, %eax |
| movl $IA32_L3_MASK_1, %ecx |
| xorl %edx, %edx |
| wrmsr |
| /* |
| * Program MSR 0xC92 IA32_L3_MASK_2 |
| * This MSR contain one bit per each way of LLC |
| * - If this bit is '0' - the way is protected from eviction |
| * - If this bit is '1' - the way is not protected from eviction |
| */ |
| mov %ebx, %eax |
| movl $IA32_L3_MASK_2, %ecx |
| xorl %edx, %edx |
| wrmsr |
| /* |
| * Set IA32_PQR_ASSOC |
| * |
| * Possible values: |
| * 0: Default value, no way mask should be applied |
| * 1: Apply way mask 1 to LLC |
| * 2: Apply way mask 2 to LLC |
| * 3: Shouldn't be use in NEM Mode |
| */ |
| movl $IA32_PQR_ASSOC, %ecx |
| xorl %eax, %eax |
| xorl %edx, %edx |
| #if CONFIG(COS_MAPPED_TO_MSB) |
| movl $0x02, %edx |
| #else |
| movl $0x02, %eax |
| #endif |
| wrmsr |
| |
| clear_car |
| |
| /* |
| * Set IA32_PQR_ASSOC |
| * At this stage we apply LLC_WAY_MASK_1 to the cache. |
| */ |
| movl $IA32_PQR_ASSOC, %ecx |
| xorl %eax, %eax |
| xorl %edx, %edx |
| #if CONFIG(COS_MAPPED_TO_MSB) |
| movl $0x01, %edx |
| #else |
| movl $0x01, %eax |
| #endif |
| wrmsr |
| |
| post_code(0x27) |
| /* |
| * Enable No-Eviction Mode Run State by setting |
| * NO_EVICT_MODE MSR 2E0h bit [1] = '1'. |
| */ |
| |
| movl $MSR_EVICT_CTL, %ecx |
| rdmsr |
| orl $0x02, %eax |
| wrmsr |
| |
| post_code(0x28) |
| |
| jmp car_init_done |
| #endif |