| 1 | // SPDX-License-Identifier: GPL-2.0 |
| 2 | /* |
| 3 | * Hibernation support for x86 |
| 4 | * |
| 5 | * Copyright (c) 2007 Rafael J. Wysocki <rjw@sisk.pl> |
| 6 | * Copyright (c) 2002 Pavel Machek <pavel@ucw.cz> |
| 7 | * Copyright (c) 2001 Patrick Mochel <mochel@osdl.org> |
| 8 | */ |
| 9 | #include <linux/gfp.h> |
| 10 | #include <linux/smp.h> |
| 11 | #include <linux/suspend.h> |
| 12 | #include <linux/scatterlist.h> |
| 13 | #include <linux/kdebug.h> |
| 14 | #include <linux/cpu.h> |
| 15 | #include <linux/pgtable.h> |
| 16 | #include <linux/types.h> |
| 17 | #include <linux/crc32.h> |
| 18 | |
| 19 | #include <asm/e820/api.h> |
| 20 | #include <asm/init.h> |
| 21 | #include <asm/proto.h> |
| 22 | #include <asm/page.h> |
| 23 | #include <asm/mtrr.h> |
| 24 | #include <asm/sections.h> |
| 25 | #include <asm/suspend.h> |
| 26 | #include <asm/tlbflush.h> |
| 27 | |
| 28 | /* |
| 29 | * Address to jump to in the last phase of restore in order to get to the image |
| 30 | * kernel's text (this value is passed in the image header). |
| 31 | */ |
| 32 | unsigned long restore_jump_address __visible; |
| 33 | unsigned long jump_address_phys; |
| 34 | |
| 35 | /* |
| 36 | * Value of the cr3 register from before the hibernation (this value is passed |
| 37 | * in the image header). |
| 38 | */ |
| 39 | unsigned long restore_cr3 __visible; |
| 40 | unsigned long temp_pgt __visible; |
| 41 | unsigned long relocated_restore_code __visible; |
| 42 | |
| 43 | /** |
| 44 | * pfn_is_nosave - check if given pfn is in the 'nosave' section |
| 45 | * @pfn: the page frame number to check. |
| 46 | */ |
| 47 | int pfn_is_nosave(unsigned long pfn) |
| 48 | { |
| 49 | unsigned long nosave_begin_pfn; |
| 50 | unsigned long nosave_end_pfn; |
| 51 | |
| 52 | nosave_begin_pfn = __pa_symbol(&__nosave_begin) >> PAGE_SHIFT; |
| 53 | nosave_end_pfn = PAGE_ALIGN(__pa_symbol(&__nosave_end)) >> PAGE_SHIFT; |
| 54 | |
| 55 | return pfn >= nosave_begin_pfn && pfn < nosave_end_pfn; |
| 56 | } |
| 57 | |
| 58 | struct restore_data_record { |
| 59 | unsigned long jump_address; |
| 60 | unsigned long jump_address_phys; |
| 61 | unsigned long cr3; |
| 62 | unsigned long magic; |
| 63 | unsigned long e820_checksum; |
| 64 | }; |
| 65 | |
| 66 | /** |
| 67 | * compute_e820_crc32 - calculate crc32 of a given e820 table |
| 68 | * |
| 69 | * @table: the e820 table to be calculated |
| 70 | * |
| 71 | * Return: the resulting checksum |
| 72 | */ |
| 73 | static inline u32 compute_e820_crc32(struct e820_table *table) |
| 74 | { |
| 75 | int size = offsetof(struct e820_table, entries) + |
| 76 | sizeof(struct e820_entry) * table->nr_entries; |
| 77 | |
| 78 | return ~crc32_le(crc: ~0, p: (unsigned char const *)table, len: size); |
| 79 | } |
| 80 | |
| 81 | #ifdef CONFIG_X86_64 |
| 82 | #define RESTORE_MAGIC 0x23456789ABCDEF02UL |
| 83 | #else |
| 84 | #define RESTORE_MAGIC 0x12345679UL |
| 85 | #endif |
| 86 | |
| 87 | /** |
| 88 | * arch_hibernation_header_save - populate the architecture specific part |
| 89 | * of a hibernation image header |
| 90 | * @addr: address where architecture specific header data will be saved. |
| 91 | * @max_size: maximum size of architecture specific data in hibernation header. |
| 92 | * |
| 93 | * Return: 0 on success, -EOVERFLOW if max_size is insufficient. |
| 94 | */ |
| 95 | int (void *addr, unsigned int max_size) |
| 96 | { |
| 97 | struct restore_data_record *rdr = addr; |
| 98 | |
| 99 | if (max_size < sizeof(struct restore_data_record)) |
| 100 | return -EOVERFLOW; |
| 101 | rdr->magic = RESTORE_MAGIC; |
| 102 | rdr->jump_address = (unsigned long)restore_registers; |
| 103 | rdr->jump_address_phys = __pa_symbol(restore_registers); |
| 104 | |
| 105 | /* |
| 106 | * The restore code fixes up CR3 and CR4 in the following sequence: |
| 107 | * |
| 108 | * [in hibernation asm] |
| 109 | * 1. CR3 <= temporary page tables |
| 110 | * 2. CR4 <= mmu_cr4_features (from the kernel that restores us) |
| 111 | * 3. CR3 <= rdr->cr3 |
| 112 | * 4. CR4 <= mmu_cr4_features (from us, i.e. the image kernel) |
| 113 | * [in restore_processor_state()] |
| 114 | * 5. CR4 <= saved CR4 |
| 115 | * 6. CR3 <= saved CR3 |
| 116 | * |
| 117 | * Our mmu_cr4_features has CR4.PCIDE=0, and toggling |
| 118 | * CR4.PCIDE while CR3's PCID bits are nonzero is illegal, so |
| 119 | * rdr->cr3 needs to point to valid page tables but must not |
| 120 | * have any of the PCID bits set. |
| 121 | */ |
| 122 | rdr->cr3 = restore_cr3 & ~CR3_PCID_MASK; |
| 123 | |
| 124 | rdr->e820_checksum = compute_e820_crc32(table: e820_table_firmware); |
| 125 | return 0; |
| 126 | } |
| 127 | |
| 128 | /** |
| 129 | * arch_hibernation_header_restore - read the architecture specific data |
| 130 | * from the hibernation image header |
| 131 | * @addr: address to read the data from |
| 132 | */ |
| 133 | int (void *addr) |
| 134 | { |
| 135 | struct restore_data_record *rdr = addr; |
| 136 | |
| 137 | if (rdr->magic != RESTORE_MAGIC) { |
| 138 | pr_crit("Unrecognized hibernate image header format!\n" ); |
| 139 | return -EINVAL; |
| 140 | } |
| 141 | |
| 142 | restore_jump_address = rdr->jump_address; |
| 143 | jump_address_phys = rdr->jump_address_phys; |
| 144 | restore_cr3 = rdr->cr3; |
| 145 | |
| 146 | if (rdr->e820_checksum != compute_e820_crc32(table: e820_table_firmware)) { |
| 147 | pr_crit("Hibernate inconsistent memory map detected!\n" ); |
| 148 | return -ENODEV; |
| 149 | } |
| 150 | |
| 151 | return 0; |
| 152 | } |
| 153 | |
| 154 | int relocate_restore_code(void) |
| 155 | { |
| 156 | pgd_t *pgd; |
| 157 | p4d_t *p4d; |
| 158 | pud_t *pud; |
| 159 | pmd_t *pmd; |
| 160 | pte_t *pte; |
| 161 | |
| 162 | relocated_restore_code = get_safe_page(GFP_ATOMIC); |
| 163 | if (!relocated_restore_code) |
| 164 | return -ENOMEM; |
| 165 | |
| 166 | __memcpy(to: (void *)relocated_restore_code, from: core_restore_code, PAGE_SIZE); |
| 167 | |
| 168 | /* Make the page containing the relocated code executable */ |
| 169 | pgd = (pgd_t *)__va(read_cr3_pa()) + |
| 170 | pgd_index(relocated_restore_code); |
| 171 | p4d = p4d_offset(pgd, address: relocated_restore_code); |
| 172 | if (p4d_leaf(*p4d)) { |
| 173 | set_p4d(p4dp: p4d, p4d: __p4d(val: p4d_val(p4d: *p4d) & ~_PAGE_NX)); |
| 174 | goto out; |
| 175 | } |
| 176 | pud = pud_offset(p4d, address: relocated_restore_code); |
| 177 | if (pud_leaf(pud: *pud)) { |
| 178 | set_pud(pudp: pud, pud: __pud(val: pud_val(pud: *pud) & ~_PAGE_NX)); |
| 179 | goto out; |
| 180 | } |
| 181 | pmd = pmd_offset(pud, address: relocated_restore_code); |
| 182 | if (pmd_leaf(pte: *pmd)) { |
| 183 | set_pmd(pmdp: pmd, pmd: __pmd(val: pmd_val(pmd: *pmd) & ~_PAGE_NX)); |
| 184 | goto out; |
| 185 | } |
| 186 | pte = pte_offset_kernel(pmd, address: relocated_restore_code); |
| 187 | set_pte(ptep: pte, pte: __pte(val: pte_val(pte: *pte) & ~_PAGE_NX)); |
| 188 | out: |
| 189 | __flush_tlb_all(); |
| 190 | return 0; |
| 191 | } |
| 192 | |
| 193 | int arch_resume_nosmt(void) |
| 194 | { |
| 195 | int ret; |
| 196 | |
| 197 | /* |
| 198 | * We reached this while coming out of hibernation. This means |
| 199 | * that SMT siblings are sleeping in hlt, as mwait is not safe |
| 200 | * against control transition during resume (see comment in |
| 201 | * hibernate_resume_nonboot_cpu_disable()). |
| 202 | * |
| 203 | * If the resumed kernel has SMT disabled, we have to take all the |
| 204 | * SMT siblings out of hlt, and offline them again so that they |
| 205 | * end up in mwait proper. |
| 206 | * |
| 207 | * Called with hotplug disabled. |
| 208 | */ |
| 209 | cpu_hotplug_enable(); |
| 210 | |
| 211 | ret = arch_cpu_rescan_dead_smt_siblings(); |
| 212 | |
| 213 | cpu_hotplug_disable(); |
| 214 | |
| 215 | return ret; |
| 216 | } |
| 217 | |