Merge remote-tracking branch 'remotes/dgibson/tags/ppc-for-2.9-20170303' into staging
[qemu/ar7.git] / backends / hostmem.c
blob7f5de70609fead611271e1caa94ce6970ae9a396
1 /*
2 * QEMU Host Memory Backend
4 * Copyright (C) 2013-2014 Red Hat Inc
6 * Authors:
7 * Igor Mammedov <imammedo@redhat.com>
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.
12 #include "qemu/osdep.h"
13 #include "sysemu/hostmem.h"
14 #include "hw/boards.h"
15 #include "qapi/error.h"
16 #include "qapi/visitor.h"
17 #include "qapi-types.h"
18 #include "qapi-visit.h"
19 #include "qemu/config-file.h"
20 #include "qom/object_interfaces.h"
22 #ifdef CONFIG_NUMA
23 #include <numaif.h>
24 QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_DEFAULT != MPOL_DEFAULT);
25 QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_PREFERRED != MPOL_PREFERRED);
26 QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_BIND != MPOL_BIND);
27 QEMU_BUILD_BUG_ON(HOST_MEM_POLICY_INTERLEAVE != MPOL_INTERLEAVE);
28 #endif
30 static void
31 host_memory_backend_get_size(Object *obj, Visitor *v, const char *name,
32 void *opaque, Error **errp)
34 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
35 uint64_t value = backend->size;
37 visit_type_size(v, name, &value, errp);
40 static void
41 host_memory_backend_set_size(Object *obj, Visitor *v, const char *name,
42 void *opaque, Error **errp)
44 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
45 Error *local_err = NULL;
46 uint64_t value;
48 if (memory_region_size(&backend->mr)) {
49 error_setg(&local_err, "cannot change property value");
50 goto out;
53 visit_type_size(v, name, &value, &local_err);
54 if (local_err) {
55 goto out;
57 if (!value) {
58 error_setg(&local_err, "Property '%s.%s' doesn't take value '%"
59 PRIu64 "'", object_get_typename(obj), name, value);
60 goto out;
62 backend->size = value;
63 out:
64 error_propagate(errp, local_err);
67 static uint16List **host_memory_append_node(uint16List **node,
68 unsigned long value)
70 *node = g_malloc0(sizeof(**node));
71 (*node)->value = value;
72 return &(*node)->next;
75 static void
76 host_memory_backend_get_host_nodes(Object *obj, Visitor *v, const char *name,
77 void *opaque, Error **errp)
79 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
80 uint16List *host_nodes = NULL;
81 uint16List **node = &host_nodes;
82 unsigned long value;
84 value = find_first_bit(backend->host_nodes, MAX_NODES);
86 node = host_memory_append_node(node, value);
88 if (value == MAX_NODES) {
89 goto out;
92 do {
93 value = find_next_bit(backend->host_nodes, MAX_NODES, value + 1);
94 if (value == MAX_NODES) {
95 break;
98 node = host_memory_append_node(node, value);
99 } while (true);
101 out:
102 visit_type_uint16List(v, name, &host_nodes, errp);
105 static void
106 host_memory_backend_set_host_nodes(Object *obj, Visitor *v, const char *name,
107 void *opaque, Error **errp)
109 #ifdef CONFIG_NUMA
110 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
111 uint16List *l = NULL;
113 visit_type_uint16List(v, name, &l, errp);
115 while (l) {
116 bitmap_set(backend->host_nodes, l->value, 1);
117 l = l->next;
119 #else
120 error_setg(errp, "NUMA node binding are not supported by this QEMU");
121 #endif
124 static int
125 host_memory_backend_get_policy(Object *obj, Error **errp G_GNUC_UNUSED)
127 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
128 return backend->policy;
131 static void
132 host_memory_backend_set_policy(Object *obj, int policy, Error **errp)
134 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
135 backend->policy = policy;
137 #ifndef CONFIG_NUMA
138 if (policy != HOST_MEM_POLICY_DEFAULT) {
139 error_setg(errp, "NUMA policies are not supported by this QEMU");
141 #endif
144 static bool host_memory_backend_get_merge(Object *obj, Error **errp)
146 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
148 return backend->merge;
151 static void host_memory_backend_set_merge(Object *obj, bool value, Error **errp)
153 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
155 if (!memory_region_size(&backend->mr)) {
156 backend->merge = value;
157 return;
160 if (value != backend->merge) {
161 void *ptr = memory_region_get_ram_ptr(&backend->mr);
162 uint64_t sz = memory_region_size(&backend->mr);
164 qemu_madvise(ptr, sz,
165 value ? QEMU_MADV_MERGEABLE : QEMU_MADV_UNMERGEABLE);
166 backend->merge = value;
170 static bool host_memory_backend_get_dump(Object *obj, Error **errp)
172 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
174 return backend->dump;
177 static void host_memory_backend_set_dump(Object *obj, bool value, Error **errp)
179 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
181 if (!memory_region_size(&backend->mr)) {
182 backend->dump = value;
183 return;
186 if (value != backend->dump) {
187 void *ptr = memory_region_get_ram_ptr(&backend->mr);
188 uint64_t sz = memory_region_size(&backend->mr);
190 qemu_madvise(ptr, sz,
191 value ? QEMU_MADV_DODUMP : QEMU_MADV_DONTDUMP);
192 backend->dump = value;
196 static bool host_memory_backend_get_prealloc(Object *obj, Error **errp)
198 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
200 return backend->prealloc || backend->force_prealloc;
203 static void host_memory_backend_set_prealloc(Object *obj, bool value,
204 Error **errp)
206 Error *local_err = NULL;
207 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
209 if (backend->force_prealloc) {
210 if (value) {
211 error_setg(errp,
212 "remove -mem-prealloc to use the prealloc property");
213 return;
217 if (!memory_region_size(&backend->mr)) {
218 backend->prealloc = value;
219 return;
222 if (value && !backend->prealloc) {
223 int fd = memory_region_get_fd(&backend->mr);
224 void *ptr = memory_region_get_ram_ptr(&backend->mr);
225 uint64_t sz = memory_region_size(&backend->mr);
227 os_mem_prealloc(fd, ptr, sz, &local_err);
228 if (local_err) {
229 error_propagate(errp, local_err);
230 return;
232 backend->prealloc = true;
236 static void host_memory_backend_init(Object *obj)
238 HostMemoryBackend *backend = MEMORY_BACKEND(obj);
239 MachineState *machine = MACHINE(qdev_get_machine());
241 backend->merge = machine_mem_merge(machine);
242 backend->dump = machine_dump_guest_core(machine);
243 backend->prealloc = mem_prealloc;
246 MemoryRegion *
247 host_memory_backend_get_memory(HostMemoryBackend *backend, Error **errp)
249 return memory_region_size(&backend->mr) ? &backend->mr : NULL;
252 void host_memory_backend_set_mapped(HostMemoryBackend *backend, bool mapped)
254 backend->is_mapped = mapped;
257 bool host_memory_backend_is_mapped(HostMemoryBackend *backend)
259 return backend->is_mapped;
262 static void
263 host_memory_backend_memory_complete(UserCreatable *uc, Error **errp)
265 HostMemoryBackend *backend = MEMORY_BACKEND(uc);
266 HostMemoryBackendClass *bc = MEMORY_BACKEND_GET_CLASS(uc);
267 Error *local_err = NULL;
268 void *ptr;
269 uint64_t sz;
271 if (bc->alloc) {
272 bc->alloc(backend, &local_err);
273 if (local_err) {
274 goto out;
277 ptr = memory_region_get_ram_ptr(&backend->mr);
278 sz = memory_region_size(&backend->mr);
280 if (backend->merge) {
281 qemu_madvise(ptr, sz, QEMU_MADV_MERGEABLE);
283 if (!backend->dump) {
284 qemu_madvise(ptr, sz, QEMU_MADV_DONTDUMP);
286 #ifdef CONFIG_NUMA
287 unsigned long lastbit = find_last_bit(backend->host_nodes, MAX_NODES);
288 /* lastbit == MAX_NODES means maxnode = 0 */
289 unsigned long maxnode = (lastbit + 1) % (MAX_NODES + 1);
290 /* ensure policy won't be ignored in case memory is preallocated
291 * before mbind(). note: MPOL_MF_STRICT is ignored on hugepages so
292 * this doesn't catch hugepage case. */
293 unsigned flags = MPOL_MF_STRICT | MPOL_MF_MOVE;
295 /* check for invalid host-nodes and policies and give more verbose
296 * error messages than mbind(). */
297 if (maxnode && backend->policy == MPOL_DEFAULT) {
298 error_setg(errp, "host-nodes must be empty for policy default,"
299 " or you should explicitly specify a policy other"
300 " than default");
301 return;
302 } else if (maxnode == 0 && backend->policy != MPOL_DEFAULT) {
303 error_setg(errp, "host-nodes must be set for policy %s",
304 HostMemPolicy_lookup[backend->policy]);
305 return;
308 /* We can have up to MAX_NODES nodes, but we need to pass maxnode+1
309 * as argument to mbind() due to an old Linux bug (feature?) which
310 * cuts off the last specified node. This means backend->host_nodes
311 * must have MAX_NODES+1 bits available.
313 assert(sizeof(backend->host_nodes) >=
314 BITS_TO_LONGS(MAX_NODES + 1) * sizeof(unsigned long));
315 assert(maxnode <= MAX_NODES);
316 if (mbind(ptr, sz, backend->policy,
317 maxnode ? backend->host_nodes : NULL, maxnode + 1, flags)) {
318 if (backend->policy != MPOL_DEFAULT || errno != ENOSYS) {
319 error_setg_errno(errp, errno,
320 "cannot bind memory to host NUMA nodes");
321 return;
324 #endif
325 /* Preallocate memory after the NUMA policy has been instantiated.
326 * This is necessary to guarantee memory is allocated with
327 * specified NUMA policy in place.
329 if (backend->prealloc) {
330 os_mem_prealloc(memory_region_get_fd(&backend->mr), ptr, sz,
331 &local_err);
332 if (local_err) {
333 goto out;
337 out:
338 error_propagate(errp, local_err);
341 static bool
342 host_memory_backend_can_be_deleted(UserCreatable *uc, Error **errp)
344 if (host_memory_backend_is_mapped(MEMORY_BACKEND(uc))) {
345 return false;
346 } else {
347 return true;
351 static char *get_id(Object *o, Error **errp)
353 HostMemoryBackend *backend = MEMORY_BACKEND(o);
355 return g_strdup(backend->id);
358 static void set_id(Object *o, const char *str, Error **errp)
360 HostMemoryBackend *backend = MEMORY_BACKEND(o);
362 if (backend->id) {
363 error_setg(errp, "cannot change property value");
364 return;
366 backend->id = g_strdup(str);
369 static void
370 host_memory_backend_class_init(ObjectClass *oc, void *data)
372 UserCreatableClass *ucc = USER_CREATABLE_CLASS(oc);
374 ucc->complete = host_memory_backend_memory_complete;
375 ucc->can_be_deleted = host_memory_backend_can_be_deleted;
377 object_class_property_add_bool(oc, "merge",
378 host_memory_backend_get_merge,
379 host_memory_backend_set_merge, &error_abort);
380 object_class_property_add_bool(oc, "dump",
381 host_memory_backend_get_dump,
382 host_memory_backend_set_dump, &error_abort);
383 object_class_property_add_bool(oc, "prealloc",
384 host_memory_backend_get_prealloc,
385 host_memory_backend_set_prealloc, &error_abort);
386 object_class_property_add(oc, "size", "int",
387 host_memory_backend_get_size,
388 host_memory_backend_set_size,
389 NULL, NULL, &error_abort);
390 object_class_property_add(oc, "host-nodes", "int",
391 host_memory_backend_get_host_nodes,
392 host_memory_backend_set_host_nodes,
393 NULL, NULL, &error_abort);
394 object_class_property_add_enum(oc, "policy", "HostMemPolicy",
395 HostMemPolicy_lookup,
396 host_memory_backend_get_policy,
397 host_memory_backend_set_policy, &error_abort);
398 object_class_property_add_str(oc, "id", get_id, set_id, &error_abort);
401 static void host_memory_backend_finalize(Object *o)
403 HostMemoryBackend *backend = MEMORY_BACKEND(o);
404 g_free(backend->id);
407 static const TypeInfo host_memory_backend_info = {
408 .name = TYPE_MEMORY_BACKEND,
409 .parent = TYPE_OBJECT,
410 .abstract = true,
411 .class_size = sizeof(HostMemoryBackendClass),
412 .class_init = host_memory_backend_class_init,
413 .instance_size = sizeof(HostMemoryBackend),
414 .instance_init = host_memory_backend_init,
415 .instance_finalize = host_memory_backend_finalize,
416 .interfaces = (InterfaceInfo[]) {
417 { TYPE_USER_CREATABLE },
422 static void register_types(void)
424 type_register_static(&host_memory_backend_info);
427 type_init(register_types);