2 * QEMU System Emulator, accelerator interfaces
4 * Copyright (c) 2003-2008 Fabrice Bellard
5 * Copyright (c) 2014 Red Hat Inc.
7 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 * of this software and associated documentation files (the "Software"), to deal
9 * in the Software without restriction, including without limitation the rights
10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11 * copies of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
26 #include "qemu/osdep.h"
27 #include "qemu-common.h"
28 #include "sysemu/tcg.h"
29 #include "sysemu/cpu-timers.h"
31 #include "qapi/error.h"
32 #include "qemu/error-report.h"
33 #include "qemu/accel.h"
34 #include "qapi/qapi-builtin-visit.h"
37 AccelState parent_obj
;
41 unsigned long tb_size
;
43 typedef struct TCGState TCGState
;
45 #define TYPE_TCG_ACCEL ACCEL_CLASS_NAME("tcg")
47 DECLARE_INSTANCE_CHECKER(TCGState
, TCG_STATE
,
51 * We default to false if we know other options have been enabled
52 * which are currently incompatible with MTTCG. Otherwise when each
53 * guest (target) has been updated to support:
54 * - atomic instructions
55 * - memory ordering primitives (barriers)
56 * they can set the appropriate CONFIG flags in ${target}-softmmu.mak
58 * Once a guest architecture has been converted to the new primitives
59 * there are two remaining limitations to check.
61 * - The guest can't be oversized (e.g. 64 bit guest on 32 bit host)
62 * - The host must have a stronger memory order than the guest
64 * It may be possible in future to support strong guests on weak hosts
65 * but that will require tagging all load/stores in a guest with their
66 * implicit memory order requirements which would likely slow things
70 static bool check_tcg_memory_orders_compatible(void)
72 #if defined(TCG_GUEST_DEFAULT_MO) && defined(TCG_TARGET_DEFAULT_MO)
73 return (TCG_GUEST_DEFAULT_MO
& ~TCG_TARGET_DEFAULT_MO
) == 0;
79 static bool default_mttcg_enabled(void)
81 if (icount_enabled() || TCG_OVERSIZED_GUEST
) {
84 #ifdef TARGET_SUPPORTS_MTTCG
85 return check_tcg_memory_orders_compatible();
92 static void tcg_accel_instance_init(Object
*obj
)
94 TCGState
*s
= TCG_STATE(obj
);
96 s
->mttcg_enabled
= default_mttcg_enabled();
98 /* If debugging enabled, default "auto on", otherwise off. */
99 #if defined(CONFIG_DEBUG_TCG) && !defined(CONFIG_USER_ONLY)
100 s
->splitwx_enabled
= -1;
102 s
->splitwx_enabled
= 0;
108 static int tcg_init(MachineState
*ms
)
110 TCGState
*s
= TCG_STATE(current_accel());
112 tcg_exec_init(s
->tb_size
* 1024 * 1024, s
->splitwx_enabled
);
113 mttcg_enabled
= s
->mttcg_enabled
;
116 * Initialize TCG regions only for softmmu.
118 * This needs to be done later for user mode, because the prologue
119 * generation needs to be delayed so that GUEST_BASE is already set.
121 #ifndef CONFIG_USER_ONLY
123 #endif /* !CONFIG_USER_ONLY */
128 static char *tcg_get_thread(Object
*obj
, Error
**errp
)
130 TCGState
*s
= TCG_STATE(obj
);
132 return g_strdup(s
->mttcg_enabled
? "multi" : "single");
135 static void tcg_set_thread(Object
*obj
, const char *value
, Error
**errp
)
137 TCGState
*s
= TCG_STATE(obj
);
139 if (strcmp(value
, "multi") == 0) {
140 if (TCG_OVERSIZED_GUEST
) {
141 error_setg(errp
, "No MTTCG when guest word size > hosts");
142 } else if (icount_enabled()) {
143 error_setg(errp
, "No MTTCG when icount is enabled");
145 #ifndef TARGET_SUPPORTS_MTTCG
146 warn_report("Guest not yet converted to MTTCG - "
147 "you may get unexpected results");
149 if (!check_tcg_memory_orders_compatible()) {
150 warn_report("Guest expects a stronger memory ordering "
151 "than the host provides");
152 error_printf("This may cause strange/hard to debug errors\n");
154 s
->mttcg_enabled
= true;
156 } else if (strcmp(value
, "single") == 0) {
157 s
->mttcg_enabled
= false;
159 error_setg(errp
, "Invalid 'thread' setting %s", value
);
163 static void tcg_get_tb_size(Object
*obj
, Visitor
*v
,
164 const char *name
, void *opaque
,
167 TCGState
*s
= TCG_STATE(obj
);
168 uint32_t value
= s
->tb_size
;
170 visit_type_uint32(v
, name
, &value
, errp
);
173 static void tcg_set_tb_size(Object
*obj
, Visitor
*v
,
174 const char *name
, void *opaque
,
177 TCGState
*s
= TCG_STATE(obj
);
180 if (!visit_type_uint32(v
, name
, &value
, errp
)) {
187 static bool tcg_get_splitwx(Object
*obj
, Error
**errp
)
189 TCGState
*s
= TCG_STATE(obj
);
190 return s
->splitwx_enabled
;
193 static void tcg_set_splitwx(Object
*obj
, bool value
, Error
**errp
)
195 TCGState
*s
= TCG_STATE(obj
);
196 s
->splitwx_enabled
= value
;
199 static void tcg_accel_class_init(ObjectClass
*oc
, void *data
)
201 AccelClass
*ac
= ACCEL_CLASS(oc
);
203 ac
->init_machine
= tcg_init
;
204 ac
->allowed
= &tcg_allowed
;
206 object_class_property_add_str(oc
, "thread",
210 object_class_property_add(oc
, "tb-size", "int",
211 tcg_get_tb_size
, tcg_set_tb_size
,
213 object_class_property_set_description(oc
, "tb-size",
214 "TCG translation block cache size");
216 object_class_property_add_bool(oc
, "split-wx",
217 tcg_get_splitwx
, tcg_set_splitwx
);
218 object_class_property_set_description(oc
, "split-wx",
219 "Map jit pages into separate RW and RX regions");
222 static const TypeInfo tcg_accel_type
= {
223 .name
= TYPE_TCG_ACCEL
,
224 .parent
= TYPE_ACCEL
,
225 .instance_init
= tcg_accel_instance_init
,
226 .class_init
= tcg_accel_class_init
,
227 .instance_size
= sizeof(TCGState
),
230 static void register_accel_types(void)
232 type_register_static(&tcg_accel_type
);
235 type_init(register_accel_types
);