2 * Physical memory management
4 * Copyright 2011 Red Hat, Inc. and/or its affiliates
7 * Avi Kivity <avi@redhat.com>
9 * This work is licensed under the terms of the GNU GPL, version 2. See
10 * the COPYING file in the top-level directory.
15 #include "exec-memory.h"
18 typedef struct AddrRange AddrRange
;
25 static AddrRange
addrrange_make(uint64_t start
, uint64_t size
)
27 return (AddrRange
) { start
, size
};
30 static bool addrrange_equal(AddrRange r1
, AddrRange r2
)
32 return r1
.start
== r2
.start
&& r1
.size
== r2
.size
;
35 static uint64_t addrrange_end(AddrRange r
)
37 return r
.start
+ r
.size
;
40 static AddrRange
addrrange_shift(AddrRange range
, int64_t delta
)
46 static bool addrrange_intersects(AddrRange r1
, AddrRange r2
)
48 return (r1
.start
>= r2
.start
&& r1
.start
< r2
.start
+ r2
.size
)
49 || (r2
.start
>= r1
.start
&& r2
.start
< r1
.start
+ r1
.size
);
52 static AddrRange
addrrange_intersection(AddrRange r1
, AddrRange r2
)
54 uint64_t start
= MAX(r1
.start
, r2
.start
);
55 /* off-by-one arithmetic to prevent overflow */
56 uint64_t end
= MIN(addrrange_end(r1
) - 1, addrrange_end(r2
) - 1);
57 return addrrange_make(start
, end
- start
+ 1);
60 struct CoalescedMemoryRange
{
62 QTAILQ_ENTRY(CoalescedMemoryRange
) link
;
65 typedef struct FlatRange FlatRange
;
66 typedef struct FlatView FlatView
;
68 /* Range of memory in the global map. Addresses are absolute. */
71 target_phys_addr_t offset_in_region
;
73 uint8_t dirty_log_mask
;
76 /* Flattened global view of current active memory hierarchy. Kept in sorted
82 unsigned nr_allocated
;
85 typedef struct AddressSpace AddressSpace
;
86 typedef struct AddressSpaceOps AddressSpaceOps
;
88 /* A system address space - I/O, memory, etc. */
90 const AddressSpaceOps
*ops
;
95 struct AddressSpaceOps
{
96 void (*range_add
)(AddressSpace
*as
, FlatRange
*fr
);
97 void (*range_del
)(AddressSpace
*as
, FlatRange
*fr
);
98 void (*log_start
)(AddressSpace
*as
, FlatRange
*fr
);
99 void (*log_stop
)(AddressSpace
*as
, FlatRange
*fr
);
102 #define FOR_EACH_FLAT_RANGE(var, view) \
103 for (var = (view)->ranges; var < (view)->ranges + (view)->nr; ++var)
105 static bool flatrange_equal(FlatRange
*a
, FlatRange
*b
)
107 return a
->mr
== b
->mr
108 && addrrange_equal(a
->addr
, b
->addr
)
109 && a
->offset_in_region
== b
->offset_in_region
;
112 static void flatview_init(FlatView
*view
)
116 view
->nr_allocated
= 0;
119 /* Insert a range into a given position. Caller is responsible for maintaining
122 static void flatview_insert(FlatView
*view
, unsigned pos
, FlatRange
*range
)
124 if (view
->nr
== view
->nr_allocated
) {
125 view
->nr_allocated
= MAX(2 * view
->nr
, 10);
126 view
->ranges
= qemu_realloc(view
->ranges
,
127 view
->nr_allocated
* sizeof(*view
->ranges
));
129 memmove(view
->ranges
+ pos
+ 1, view
->ranges
+ pos
,
130 (view
->nr
- pos
) * sizeof(FlatRange
));
131 view
->ranges
[pos
] = *range
;
135 static void flatview_destroy(FlatView
*view
)
137 qemu_free(view
->ranges
);
140 static bool can_merge(FlatRange
*r1
, FlatRange
*r2
)
142 return addrrange_end(r1
->addr
) == r2
->addr
.start
144 && r1
->offset_in_region
+ r1
->addr
.size
== r2
->offset_in_region
145 && r1
->dirty_log_mask
== r2
->dirty_log_mask
;
148 /* Attempt to simplify a view by merging ajacent ranges */
149 static void flatview_simplify(FlatView
*view
)
154 while (i
< view
->nr
) {
157 && can_merge(&view
->ranges
[j
-1], &view
->ranges
[j
])) {
158 view
->ranges
[i
].addr
.size
+= view
->ranges
[j
].addr
.size
;
162 memmove(&view
->ranges
[i
], &view
->ranges
[j
],
163 (view
->nr
- j
) * sizeof(view
->ranges
[j
]));
168 static void as_memory_range_add(AddressSpace
*as
, FlatRange
*fr
)
170 ram_addr_t phys_offset
, region_offset
;
172 phys_offset
= fr
->mr
->ram_addr
;
173 region_offset
= fr
->offset_in_region
;
174 /* cpu_register_physical_memory_log() wants region_offset for
175 * mmio, but prefers offseting phys_offset for RAM. Humour it.
177 if ((phys_offset
& ~TARGET_PAGE_MASK
) <= IO_MEM_ROM
) {
178 phys_offset
+= region_offset
;
182 cpu_register_physical_memory_log(fr
->addr
.start
,
189 static void as_memory_range_del(AddressSpace
*as
, FlatRange
*fr
)
191 cpu_register_physical_memory(fr
->addr
.start
, fr
->addr
.size
,
195 static void as_memory_log_start(AddressSpace
*as
, FlatRange
*fr
)
197 cpu_physical_log_start(fr
->addr
.start
, fr
->addr
.size
);
200 static void as_memory_log_stop(AddressSpace
*as
, FlatRange
*fr
)
202 cpu_physical_log_stop(fr
->addr
.start
, fr
->addr
.size
);
205 static const AddressSpaceOps address_space_ops_memory
= {
206 .range_add
= as_memory_range_add
,
207 .range_del
= as_memory_range_del
,
208 .log_start
= as_memory_log_start
,
209 .log_stop
= as_memory_log_stop
,
212 static AddressSpace address_space_memory
= {
213 .ops
= &address_space_ops_memory
,
216 /* Render a memory region into the global view. Ranges in @view obscure
219 static void render_memory_region(FlatView
*view
,
221 target_phys_addr_t base
,
224 MemoryRegion
*subregion
;
226 target_phys_addr_t offset_in_region
;
234 tmp
= addrrange_make(base
, mr
->size
);
236 if (!addrrange_intersects(tmp
, clip
)) {
240 clip
= addrrange_intersection(tmp
, clip
);
243 base
-= mr
->alias
->addr
;
244 base
-= mr
->alias_offset
;
245 render_memory_region(view
, mr
->alias
, base
, clip
);
249 /* Render subregions in priority order. */
250 QTAILQ_FOREACH(subregion
, &mr
->subregions
, subregions_link
) {
251 render_memory_region(view
, subregion
, base
, clip
);
254 if (!mr
->terminates
) {
258 offset_in_region
= clip
.start
- base
;
262 /* Render the region itself into any gaps left by the current view. */
263 for (i
= 0; i
< view
->nr
&& remain
; ++i
) {
264 if (base
>= addrrange_end(view
->ranges
[i
].addr
)) {
267 if (base
< view
->ranges
[i
].addr
.start
) {
268 now
= MIN(remain
, view
->ranges
[i
].addr
.start
- base
);
270 fr
.offset_in_region
= offset_in_region
;
271 fr
.addr
= addrrange_make(base
, now
);
272 fr
.dirty_log_mask
= mr
->dirty_log_mask
;
273 flatview_insert(view
, i
, &fr
);
276 offset_in_region
+= now
;
279 if (base
== view
->ranges
[i
].addr
.start
) {
280 now
= MIN(remain
, view
->ranges
[i
].addr
.size
);
282 offset_in_region
+= now
;
288 fr
.offset_in_region
= offset_in_region
;
289 fr
.addr
= addrrange_make(base
, remain
);
290 fr
.dirty_log_mask
= mr
->dirty_log_mask
;
291 flatview_insert(view
, i
, &fr
);
295 /* Render a memory topology into a list of disjoint absolute ranges. */
296 static FlatView
generate_memory_topology(MemoryRegion
*mr
)
300 flatview_init(&view
);
302 render_memory_region(&view
, mr
, 0, addrrange_make(0, UINT64_MAX
));
303 flatview_simplify(&view
);
308 static void address_space_update_topology(AddressSpace
*as
)
310 FlatView old_view
= as
->current_map
;
311 FlatView new_view
= generate_memory_topology(as
->root
);
313 FlatRange
*frold
, *frnew
;
315 /* Generate a symmetric difference of the old and new memory maps.
316 * Kill ranges in the old map, and instantiate ranges in the new map.
319 while (iold
< old_view
.nr
|| inew
< new_view
.nr
) {
320 if (iold
< old_view
.nr
) {
321 frold
= &old_view
.ranges
[iold
];
325 if (inew
< new_view
.nr
) {
326 frnew
= &new_view
.ranges
[inew
];
333 || frold
->addr
.start
< frnew
->addr
.start
334 || (frold
->addr
.start
== frnew
->addr
.start
335 && !flatrange_equal(frold
, frnew
)))) {
336 /* In old, but (not in new, or in new but attributes changed). */
338 as
->ops
->range_del(as
, frold
);
340 } else if (frold
&& frnew
&& flatrange_equal(frold
, frnew
)) {
341 /* In both (logging may have changed) */
343 if (frold
->dirty_log_mask
&& !frnew
->dirty_log_mask
) {
344 as
->ops
->log_stop(as
, frnew
);
345 } else if (frnew
->dirty_log_mask
&& !frold
->dirty_log_mask
) {
346 as
->ops
->log_start(as
, frnew
);
354 as
->ops
->range_add(as
, frnew
);
358 as
->current_map
= new_view
;
359 flatview_destroy(&old_view
);
362 static void memory_region_update_topology(void)
364 address_space_update_topology(&address_space_memory
);
367 void memory_region_init(MemoryRegion
*mr
,
376 mr
->terminates
= false;
378 mr
->may_overlap
= false;
380 QTAILQ_INIT(&mr
->subregions
);
381 memset(&mr
->subregions_link
, 0, sizeof mr
->subregions_link
);
382 QTAILQ_INIT(&mr
->coalesced
);
383 mr
->name
= qemu_strdup(name
);
384 mr
->dirty_log_mask
= 0;
387 static bool memory_region_access_valid(MemoryRegion
*mr
,
388 target_phys_addr_t addr
,
391 if (!mr
->ops
->valid
.unaligned
&& (addr
& (size
- 1))) {
395 /* Treat zero as compatibility all valid */
396 if (!mr
->ops
->valid
.max_access_size
) {
400 if (size
> mr
->ops
->valid
.max_access_size
401 || size
< mr
->ops
->valid
.min_access_size
) {
407 static uint32_t memory_region_read_thunk_n(void *_mr
,
408 target_phys_addr_t addr
,
411 MemoryRegion
*mr
= _mr
;
412 unsigned access_size
, access_size_min
, access_size_max
;
413 uint64_t access_mask
;
414 uint32_t data
= 0, tmp
;
417 if (!memory_region_access_valid(mr
, addr
, size
)) {
418 return -1U; /* FIXME: better signalling */
421 /* FIXME: support unaligned access */
423 access_size_min
= mr
->ops
->impl
.min_access_size
;
424 if (!access_size_min
) {
427 access_size_max
= mr
->ops
->impl
.max_access_size
;
428 if (!access_size_max
) {
431 access_size
= MAX(MIN(size
, access_size_max
), access_size_min
);
432 access_mask
= -1ULL >> (64 - access_size
* 8);
434 for (i
= 0; i
< size
; i
+= access_size
) {
435 /* FIXME: big-endian support */
436 tmp
= mr
->ops
->read(mr
->opaque
, addr
+ i
, access_size
);
437 data
|= (tmp
& access_mask
) << (i
* 8);
443 static void memory_region_write_thunk_n(void *_mr
,
444 target_phys_addr_t addr
,
448 MemoryRegion
*mr
= _mr
;
449 unsigned access_size
, access_size_min
, access_size_max
;
450 uint64_t access_mask
;
453 if (!memory_region_access_valid(mr
, addr
, size
)) {
454 return; /* FIXME: better signalling */
457 /* FIXME: support unaligned access */
459 access_size_min
= mr
->ops
->impl
.min_access_size
;
460 if (!access_size_min
) {
463 access_size_max
= mr
->ops
->impl
.max_access_size
;
464 if (!access_size_max
) {
467 access_size
= MAX(MIN(size
, access_size_max
), access_size_min
);
468 access_mask
= -1ULL >> (64 - access_size
* 8);
470 for (i
= 0; i
< size
; i
+= access_size
) {
471 /* FIXME: big-endian support */
472 mr
->ops
->write(mr
->opaque
, addr
+ i
, (data
>> (i
* 8)) & access_mask
,
477 static uint32_t memory_region_read_thunk_b(void *mr
, target_phys_addr_t addr
)
479 return memory_region_read_thunk_n(mr
, addr
, 1);
482 static uint32_t memory_region_read_thunk_w(void *mr
, target_phys_addr_t addr
)
484 return memory_region_read_thunk_n(mr
, addr
, 2);
487 static uint32_t memory_region_read_thunk_l(void *mr
, target_phys_addr_t addr
)
489 return memory_region_read_thunk_n(mr
, addr
, 4);
492 static void memory_region_write_thunk_b(void *mr
, target_phys_addr_t addr
,
495 memory_region_write_thunk_n(mr
, addr
, 1, data
);
498 static void memory_region_write_thunk_w(void *mr
, target_phys_addr_t addr
,
501 memory_region_write_thunk_n(mr
, addr
, 2, data
);
504 static void memory_region_write_thunk_l(void *mr
, target_phys_addr_t addr
,
507 memory_region_write_thunk_n(mr
, addr
, 4, data
);
510 static CPUReadMemoryFunc
* const memory_region_read_thunk
[] = {
511 memory_region_read_thunk_b
,
512 memory_region_read_thunk_w
,
513 memory_region_read_thunk_l
,
516 static CPUWriteMemoryFunc
* const memory_region_write_thunk
[] = {
517 memory_region_write_thunk_b
,
518 memory_region_write_thunk_w
,
519 memory_region_write_thunk_l
,
522 void memory_region_init_io(MemoryRegion
*mr
,
523 const MemoryRegionOps
*ops
,
528 memory_region_init(mr
, name
, size
);
531 mr
->terminates
= true;
532 mr
->ram_addr
= cpu_register_io_memory(memory_region_read_thunk
,
533 memory_region_write_thunk
,
535 mr
->ops
->endianness
);
538 void memory_region_init_ram(MemoryRegion
*mr
,
543 memory_region_init(mr
, name
, size
);
544 mr
->terminates
= true;
545 mr
->ram_addr
= qemu_ram_alloc(dev
, name
, size
);
548 void memory_region_init_ram_ptr(MemoryRegion
*mr
,
554 memory_region_init(mr
, name
, size
);
555 mr
->terminates
= true;
556 mr
->ram_addr
= qemu_ram_alloc_from_ptr(dev
, name
, size
, ptr
);
559 void memory_region_init_alias(MemoryRegion
*mr
,
562 target_phys_addr_t offset
,
565 memory_region_init(mr
, name
, size
);
567 mr
->alias_offset
= offset
;
570 void memory_region_destroy(MemoryRegion
*mr
)
572 assert(QTAILQ_EMPTY(&mr
->subregions
));
573 memory_region_clear_coalescing(mr
);
574 qemu_free((char *)mr
->name
);
577 uint64_t memory_region_size(MemoryRegion
*mr
)
582 void memory_region_set_offset(MemoryRegion
*mr
, target_phys_addr_t offset
)
587 void memory_region_set_log(MemoryRegion
*mr
, bool log
, unsigned client
)
589 uint8_t mask
= 1 << client
;
591 mr
->dirty_log_mask
= (mr
->dirty_log_mask
& ~mask
) | (log
* mask
);
592 memory_region_update_topology();
595 bool memory_region_get_dirty(MemoryRegion
*mr
, target_phys_addr_t addr
,
598 assert(mr
->terminates
);
599 return cpu_physical_memory_get_dirty(mr
->ram_addr
+ addr
, 1 << client
);
602 void memory_region_set_dirty(MemoryRegion
*mr
, target_phys_addr_t addr
)
604 assert(mr
->terminates
);
605 return cpu_physical_memory_set_dirty(mr
->ram_addr
+ addr
);
608 void memory_region_sync_dirty_bitmap(MemoryRegion
*mr
)
612 FOR_EACH_FLAT_RANGE(fr
, &address_space_memory
.current_map
) {
614 cpu_physical_sync_dirty_bitmap(fr
->addr
.start
,
615 fr
->addr
.start
+ fr
->addr
.size
);
620 void memory_region_set_readonly(MemoryRegion
*mr
, bool readonly
)
625 void memory_region_reset_dirty(MemoryRegion
*mr
, target_phys_addr_t addr
,
626 target_phys_addr_t size
, unsigned client
)
628 assert(mr
->terminates
);
629 cpu_physical_memory_reset_dirty(mr
->ram_addr
+ addr
,
630 mr
->ram_addr
+ addr
+ size
,
634 void *memory_region_get_ram_ptr(MemoryRegion
*mr
)
637 return memory_region_get_ram_ptr(mr
->alias
) + mr
->alias_offset
;
640 assert(mr
->terminates
);
642 return qemu_get_ram_ptr(mr
->ram_addr
);
645 static void memory_region_update_coalesced_range(MemoryRegion
*mr
)
648 CoalescedMemoryRange
*cmr
;
651 FOR_EACH_FLAT_RANGE(fr
, &address_space_memory
.current_map
) {
653 qemu_unregister_coalesced_mmio(fr
->addr
.start
, fr
->addr
.size
);
654 QTAILQ_FOREACH(cmr
, &mr
->coalesced
, link
) {
655 tmp
= addrrange_shift(cmr
->addr
,
656 fr
->addr
.start
- fr
->offset_in_region
);
657 if (!addrrange_intersects(tmp
, fr
->addr
)) {
660 tmp
= addrrange_intersection(tmp
, fr
->addr
);
661 qemu_register_coalesced_mmio(tmp
.start
, tmp
.size
);
667 void memory_region_set_coalescing(MemoryRegion
*mr
)
669 memory_region_clear_coalescing(mr
);
670 memory_region_add_coalescing(mr
, 0, mr
->size
);
673 void memory_region_add_coalescing(MemoryRegion
*mr
,
674 target_phys_addr_t offset
,
677 CoalescedMemoryRange
*cmr
= qemu_malloc(sizeof(*cmr
));
679 cmr
->addr
= addrrange_make(offset
, size
);
680 QTAILQ_INSERT_TAIL(&mr
->coalesced
, cmr
, link
);
681 memory_region_update_coalesced_range(mr
);
684 void memory_region_clear_coalescing(MemoryRegion
*mr
)
686 CoalescedMemoryRange
*cmr
;
688 while (!QTAILQ_EMPTY(&mr
->coalesced
)) {
689 cmr
= QTAILQ_FIRST(&mr
->coalesced
);
690 QTAILQ_REMOVE(&mr
->coalesced
, cmr
, link
);
693 memory_region_update_coalesced_range(mr
);
696 static void memory_region_add_subregion_common(MemoryRegion
*mr
,
697 target_phys_addr_t offset
,
698 MemoryRegion
*subregion
)
702 assert(!subregion
->parent
);
703 subregion
->parent
= mr
;
704 subregion
->addr
= offset
;
705 QTAILQ_FOREACH(other
, &mr
->subregions
, subregions_link
) {
706 if (subregion
->may_overlap
|| other
->may_overlap
) {
709 if (offset
>= other
->offset
+ other
->size
710 || offset
+ subregion
->size
<= other
->offset
) {
713 printf("warning: subregion collision %llx/%llx vs %llx/%llx\n",
714 (unsigned long long)offset
,
715 (unsigned long long)subregion
->size
,
716 (unsigned long long)other
->offset
,
717 (unsigned long long)other
->size
);
719 QTAILQ_FOREACH(other
, &mr
->subregions
, subregions_link
) {
720 if (subregion
->priority
>= other
->priority
) {
721 QTAILQ_INSERT_BEFORE(other
, subregion
, subregions_link
);
725 QTAILQ_INSERT_TAIL(&mr
->subregions
, subregion
, subregions_link
);
727 memory_region_update_topology();
731 void memory_region_add_subregion(MemoryRegion
*mr
,
732 target_phys_addr_t offset
,
733 MemoryRegion
*subregion
)
735 subregion
->may_overlap
= false;
736 subregion
->priority
= 0;
737 memory_region_add_subregion_common(mr
, offset
, subregion
);
740 void memory_region_add_subregion_overlap(MemoryRegion
*mr
,
741 target_phys_addr_t offset
,
742 MemoryRegion
*subregion
,
745 subregion
->may_overlap
= true;
746 subregion
->priority
= priority
;
747 memory_region_add_subregion_common(mr
, offset
, subregion
);
750 void memory_region_del_subregion(MemoryRegion
*mr
,
751 MemoryRegion
*subregion
)
753 assert(subregion
->parent
== mr
);
754 subregion
->parent
= NULL
;
755 QTAILQ_REMOVE(&mr
->subregions
, subregion
, subregions_link
);
756 memory_region_update_topology();
759 void set_system_memory_map(MemoryRegion
*mr
)
761 address_space_memory
.root
= mr
;
762 memory_region_update_topology();