qemu/target/i386/arch_memory_mapping.c
<<
>>
Prefs
   1/*
   2 * i386 memory mapping
   3 *
   4 * Copyright Fujitsu, Corp. 2011, 2012
   5 *
   6 * Authors:
   7 *     Wen Congyang <wency@cn.fujitsu.com>
   8 *
   9 * This work is licensed under the terms of the GNU GPL, version 2 or later.
  10 * See the COPYING file in the top-level directory.
  11 *
  12 */
  13
  14#include "qemu/osdep.h"
  15#include "cpu.h"
  16#include "sysemu/memory_mapping.h"
  17
  18/* PAE Paging or IA-32e Paging */
  19static void walk_pte(MemoryMappingList *list, AddressSpace *as,
  20                     hwaddr pte_start_addr,
  21                     int32_t a20_mask, target_ulong start_line_addr)
  22{
  23    hwaddr pte_addr, start_paddr;
  24    uint64_t pte;
  25    target_ulong start_vaddr;
  26    int i;
  27
  28    for (i = 0; i < 512; i++) {
  29        pte_addr = (pte_start_addr + i * 8) & a20_mask;
  30        pte = address_space_ldq(as, pte_addr, MEMTXATTRS_UNSPECIFIED, NULL);
  31        if (!(pte & PG_PRESENT_MASK)) {
  32            /* not present */
  33            continue;
  34        }
  35
  36        start_paddr = (pte & ~0xfff) & ~(0x1ULL << 63);
  37        if (cpu_physical_memory_is_io(start_paddr)) {
  38            /* I/O region */
  39            continue;
  40        }
  41
  42        start_vaddr = start_line_addr | ((i & 0x1ff) << 12);
  43        memory_mapping_list_add_merge_sorted(list, start_paddr,
  44                                             start_vaddr, 1 << 12);
  45    }
  46}
  47
  48/* 32-bit Paging */
  49static void walk_pte2(MemoryMappingList *list, AddressSpace *as,
  50                      hwaddr pte_start_addr, int32_t a20_mask,
  51                      target_ulong start_line_addr)
  52{
  53    hwaddr pte_addr, start_paddr;
  54    uint32_t pte;
  55    target_ulong start_vaddr;
  56    int i;
  57
  58    for (i = 0; i < 1024; i++) {
  59        pte_addr = (pte_start_addr + i * 4) & a20_mask;
  60        pte = address_space_ldl(as, pte_addr, MEMTXATTRS_UNSPECIFIED, NULL);
  61        if (!(pte & PG_PRESENT_MASK)) {
  62            /* not present */
  63            continue;
  64        }
  65
  66        start_paddr = pte & ~0xfff;
  67        if (cpu_physical_memory_is_io(start_paddr)) {
  68            /* I/O region */
  69            continue;
  70        }
  71
  72        start_vaddr = start_line_addr | ((i & 0x3ff) << 12);
  73        memory_mapping_list_add_merge_sorted(list, start_paddr,
  74                                             start_vaddr, 1 << 12);
  75    }
  76}
  77
  78/* PAE Paging or IA-32e Paging */
  79#define PLM4_ADDR_MASK 0xffffffffff000ULL /* selects bits 51:12 */
  80
  81static void walk_pde(MemoryMappingList *list, AddressSpace *as,
  82                     hwaddr pde_start_addr,
  83                     int32_t a20_mask, target_ulong start_line_addr)
  84{
  85    hwaddr pde_addr, pte_start_addr, start_paddr;
  86    uint64_t pde;
  87    target_ulong line_addr, start_vaddr;
  88    int i;
  89
  90    for (i = 0; i < 512; i++) {
  91        pde_addr = (pde_start_addr + i * 8) & a20_mask;
  92        pde = address_space_ldq(as, pde_addr, MEMTXATTRS_UNSPECIFIED, NULL);
  93        if (!(pde & PG_PRESENT_MASK)) {
  94            /* not present */
  95            continue;
  96        }
  97
  98        line_addr = start_line_addr | ((i & 0x1ff) << 21);
  99        if (pde & PG_PSE_MASK) {
 100            /* 2 MB page */
 101            start_paddr = (pde & ~0x1fffff) & ~(0x1ULL << 63);
 102            if (cpu_physical_memory_is_io(start_paddr)) {
 103                /* I/O region */
 104                continue;
 105            }
 106            start_vaddr = line_addr;
 107            memory_mapping_list_add_merge_sorted(list, start_paddr,
 108                                                 start_vaddr, 1 << 21);
 109            continue;
 110        }
 111
 112        pte_start_addr = (pde & PLM4_ADDR_MASK) & a20_mask;
 113        walk_pte(list, as, pte_start_addr, a20_mask, line_addr);
 114    }
 115}
 116
 117/* 32-bit Paging */
 118static void walk_pde2(MemoryMappingList *list, AddressSpace *as,
 119                      hwaddr pde_start_addr, int32_t a20_mask,
 120                      bool pse)
 121{
 122    hwaddr pde_addr, pte_start_addr, start_paddr, high_paddr;
 123    uint32_t pde;
 124    target_ulong line_addr, start_vaddr;
 125    int i;
 126
 127    for (i = 0; i < 1024; i++) {
 128        pde_addr = (pde_start_addr + i * 4) & a20_mask;
 129        pde = address_space_ldl(as, pde_addr, MEMTXATTRS_UNSPECIFIED, NULL);
 130        if (!(pde & PG_PRESENT_MASK)) {
 131            /* not present */
 132            continue;
 133        }
 134
 135        line_addr = (((unsigned int)i & 0x3ff) << 22);
 136        if ((pde & PG_PSE_MASK) && pse) {
 137            /*
 138             * 4 MB page:
 139             * bits 39:32 are bits 20:13 of the PDE
 140             * bit3 31:22 are bits 31:22 of the PDE
 141             */
 142            high_paddr = ((hwaddr)(pde & 0x1fe000) << 19);
 143            start_paddr = (pde & ~0x3fffff) | high_paddr;
 144            if (cpu_physical_memory_is_io(start_paddr)) {
 145                /* I/O region */
 146                continue;
 147            }
 148            start_vaddr = line_addr;
 149            memory_mapping_list_add_merge_sorted(list, start_paddr,
 150                                                 start_vaddr, 1 << 22);
 151            continue;
 152        }
 153
 154        pte_start_addr = (pde & ~0xfff) & a20_mask;
 155        walk_pte2(list, as, pte_start_addr, a20_mask, line_addr);
 156    }
 157}
 158
 159/* PAE Paging */
 160static void walk_pdpe2(MemoryMappingList *list, AddressSpace *as,
 161                       hwaddr pdpe_start_addr, int32_t a20_mask)
 162{
 163    hwaddr pdpe_addr, pde_start_addr;
 164    uint64_t pdpe;
 165    target_ulong line_addr;
 166    int i;
 167
 168    for (i = 0; i < 4; i++) {
 169        pdpe_addr = (pdpe_start_addr + i * 8) & a20_mask;
 170        pdpe = address_space_ldq(as, pdpe_addr, MEMTXATTRS_UNSPECIFIED, NULL);
 171        if (!(pdpe & PG_PRESENT_MASK)) {
 172            /* not present */
 173            continue;
 174        }
 175
 176        line_addr = (((unsigned int)i & 0x3) << 30);
 177        pde_start_addr = (pdpe & ~0xfff) & a20_mask;
 178        walk_pde(list, as, pde_start_addr, a20_mask, line_addr);
 179    }
 180}
 181
 182#ifdef TARGET_X86_64
 183/* IA-32e Paging */
 184static void walk_pdpe(MemoryMappingList *list, AddressSpace *as,
 185                      hwaddr pdpe_start_addr, int32_t a20_mask,
 186                      target_ulong start_line_addr)
 187{
 188    hwaddr pdpe_addr, pde_start_addr, start_paddr;
 189    uint64_t pdpe;
 190    target_ulong line_addr, start_vaddr;
 191    int i;
 192
 193    for (i = 0; i < 512; i++) {
 194        pdpe_addr = (pdpe_start_addr + i * 8) & a20_mask;
 195        pdpe = address_space_ldq(as, pdpe_addr, MEMTXATTRS_UNSPECIFIED, NULL);
 196        if (!(pdpe & PG_PRESENT_MASK)) {
 197            /* not present */
 198            continue;
 199        }
 200
 201        line_addr = start_line_addr | ((i & 0x1ffULL) << 30);
 202        if (pdpe & PG_PSE_MASK) {
 203            /* 1 GB page */
 204            start_paddr = (pdpe & ~0x3fffffff) & ~(0x1ULL << 63);
 205            if (cpu_physical_memory_is_io(start_paddr)) {
 206                /* I/O region */
 207                continue;
 208            }
 209            start_vaddr = line_addr;
 210            memory_mapping_list_add_merge_sorted(list, start_paddr,
 211                                                 start_vaddr, 1 << 30);
 212            continue;
 213        }
 214
 215        pde_start_addr = (pdpe & PLM4_ADDR_MASK) & a20_mask;
 216        walk_pde(list, as, pde_start_addr, a20_mask, line_addr);
 217    }
 218}
 219
 220/* IA-32e Paging */
 221static void walk_pml4e(MemoryMappingList *list, AddressSpace *as,
 222                       hwaddr pml4e_start_addr, int32_t a20_mask,
 223                       target_ulong start_line_addr)
 224{
 225    hwaddr pml4e_addr, pdpe_start_addr;
 226    uint64_t pml4e;
 227    target_ulong line_addr;
 228    int i;
 229
 230    for (i = 0; i < 512; i++) {
 231        pml4e_addr = (pml4e_start_addr + i * 8) & a20_mask;
 232        pml4e = address_space_ldq(as, pml4e_addr, MEMTXATTRS_UNSPECIFIED,
 233                                  NULL);
 234        if (!(pml4e & PG_PRESENT_MASK)) {
 235            /* not present */
 236            continue;
 237        }
 238
 239        line_addr = start_line_addr | ((i & 0x1ffULL) << 39);
 240        pdpe_start_addr = (pml4e & PLM4_ADDR_MASK) & a20_mask;
 241        walk_pdpe(list, as, pdpe_start_addr, a20_mask, line_addr);
 242    }
 243}
 244
 245static void walk_pml5e(MemoryMappingList *list, AddressSpace *as,
 246                       hwaddr pml5e_start_addr, int32_t a20_mask)
 247{
 248    hwaddr pml5e_addr, pml4e_start_addr;
 249    uint64_t pml5e;
 250    target_ulong line_addr;
 251    int i;
 252
 253    for (i = 0; i < 512; i++) {
 254        pml5e_addr = (pml5e_start_addr + i * 8) & a20_mask;
 255        pml5e = address_space_ldq(as, pml5e_addr, MEMTXATTRS_UNSPECIFIED,
 256                                  NULL);
 257        if (!(pml5e & PG_PRESENT_MASK)) {
 258            /* not present */
 259            continue;
 260        }
 261
 262        line_addr = (0x7fULL << 57) | ((i & 0x1ffULL) << 48);
 263        pml4e_start_addr = (pml5e & PLM4_ADDR_MASK) & a20_mask;
 264        walk_pml4e(list, as, pml4e_start_addr, a20_mask, line_addr);
 265    }
 266}
 267#endif
 268
 269void x86_cpu_get_memory_mapping(CPUState *cs, MemoryMappingList *list,
 270                                Error **errp)
 271{
 272    X86CPU *cpu = X86_CPU(cs);
 273    CPUX86State *env = &cpu->env;
 274    int32_t a20_mask;
 275
 276    if (!cpu_paging_enabled(cs)) {
 277        /* paging is disabled */
 278        return;
 279    }
 280
 281    a20_mask = x86_get_a20_mask(env);
 282    if (env->cr[4] & CR4_PAE_MASK) {
 283#ifdef TARGET_X86_64
 284        if (env->hflags & HF_LMA_MASK) {
 285            if (env->cr[4] & CR4_LA57_MASK) {
 286                hwaddr pml5e_addr;
 287
 288                pml5e_addr = (env->cr[3] & PLM4_ADDR_MASK) & a20_mask;
 289                walk_pml5e(list, cs->as, pml5e_addr, a20_mask);
 290            } else {
 291                hwaddr pml4e_addr;
 292
 293                pml4e_addr = (env->cr[3] & PLM4_ADDR_MASK) & a20_mask;
 294                walk_pml4e(list, cs->as, pml4e_addr, a20_mask,
 295                        0xffffULL << 48);
 296            }
 297        } else
 298#endif
 299        {
 300            hwaddr pdpe_addr;
 301
 302            pdpe_addr = (env->cr[3] & ~0x1f) & a20_mask;
 303            walk_pdpe2(list, cs->as, pdpe_addr, a20_mask);
 304        }
 305    } else {
 306        hwaddr pde_addr;
 307        bool pse;
 308
 309        pde_addr = (env->cr[3] & ~0xfff) & a20_mask;
 310        pse = !!(env->cr[4] & CR4_PSE_MASK);
 311        walk_pde2(list, cs->as, pde_addr, a20_mask, pse);
 312    }
 313}
 314
 315