master
h 80 lines 2.44 KB
Raw
1 /* SPDX-License-Identifier: MIT */
2 /*
3 * Define target-specific opcode support
4 * Copyright (c) 2009 Ulrich Hecht <uli@suse.de>
5 */
6
7 #ifndef TCG_TARGET_HAS_H
8 #define TCG_TARGET_HAS_H
9
10 /* Facilities required for proper operation; checked at startup. */
11
12 #define FACILITY_ZARCH_ACTIVE 2
13 #define FACILITY_LONG_DISP 18
14 #define FACILITY_EXT_IMM 21
15 #define FACILITY_GEN_INST_EXT 34
16 #define FACILITY_45 45
17
18 /* Facilities that are checked at runtime. */
19
20 #define FACILITY_LOAD_ON_COND2 53
21 #define FACILITY_MISC_INSN_EXT2 58
22 #define FACILITY_MISC_INSN_EXT3 61
23 #define FACILITY_VECTOR 129
24 #define FACILITY_VECTOR_ENH1 135
25
26 extern uint64_t s390_facilities[3];
27
28 #define HAVE_FACILITY(X) \
29 ((s390_facilities[FACILITY_##X / 64] >> (63 - FACILITY_##X % 64)) & 1)
30
31 /* optional instructions */
32 #define TCG_TARGET_HAS_extr_i64_i32 0
33 #define TCG_TARGET_HAS_qemu_ldst_i128 1
34 #define TCG_TARGET_HAS_tst 1
35
36 #define TCG_TARGET_HAS_v64 HAVE_FACILITY(VECTOR)
37 #define TCG_TARGET_HAS_v128 HAVE_FACILITY(VECTOR)
38 #define TCG_TARGET_HAS_v256 0
39
40 #define TCG_TARGET_HAS_andc_vec 1
41 #define TCG_TARGET_HAS_orc_vec HAVE_FACILITY(VECTOR_ENH1)
42 #define TCG_TARGET_HAS_nand_vec HAVE_FACILITY(VECTOR_ENH1)
43 #define TCG_TARGET_HAS_nor_vec 1
44 #define TCG_TARGET_HAS_eqv_vec HAVE_FACILITY(VECTOR_ENH1)
45 #define TCG_TARGET_HAS_not_vec 1
46 #define TCG_TARGET_HAS_neg_vec 1
47 #define TCG_TARGET_HAS_abs_vec 1
48 #define TCG_TARGET_HAS_roti_vec 1
49 #define TCG_TARGET_HAS_rots_vec 1
50 #define TCG_TARGET_HAS_rotv_vec 1
51 #define TCG_TARGET_HAS_shi_vec 1
52 #define TCG_TARGET_HAS_shs_vec 1
53 #define TCG_TARGET_HAS_shv_vec 1
54 #define TCG_TARGET_HAS_mul_vec 1
55 #define TCG_TARGET_HAS_sat_vec 0
56 #define TCG_TARGET_HAS_minmax_vec 1
57 #define TCG_TARGET_HAS_bitsel_vec 1
58 #define TCG_TARGET_HAS_cmpsel_vec 1
59 #define TCG_TARGET_HAS_tst_vec 0
60
61 #define TCG_TARGET_extract_valid(type, ofs, len) 1
62 #define TCG_TARGET_deposit_valid(type, ofs, len) 1
63
64 static inline bool
65 tcg_target_sextract_valid(TCGType type, unsigned ofs, unsigned len)
66 {
67 if (ofs == 0) {
68 switch (len) {
69 case 8:
70 case 16:
71 return true;
72 case 32:
73 return type == TCG_TYPE_I64;
74 }
75 }
76 return false;
77 }
78 #define TCG_TARGET_sextract_valid tcg_target_sextract_valid
79
80 #endif