1 //=- WebAssemblyInstrFormats.td - WebAssembly Instr. Formats -*- tablegen -*-=// 2 // 3 // The LLVM Compiler Infrastructure 4 // 5 // This file is distributed under the University of Illinois Open Source 6 // License. See LICENSE.TXT for details. 7 // 8 //===----------------------------------------------------------------------===// 9 /// 10 /// \file 11 /// WebAssembly instruction format definitions. 12 /// 13 //===----------------------------------------------------------------------===// 14 15 // WebAssembly Instruction Format. 16 // We instantiate 2 of these for every actual instruction (register based 17 // and stack based), see below. 18 class WebAssemblyInst<bits<32> inst, string asmstr, bit stack> : Instruction { 19 field bits<32> Inst = inst; // Instruction encoding. 20 field bit StackBased = stack; 21 let Namespace = "WebAssembly"; 22 let Pattern = []; 23 let AsmString = asmstr; 24 } 25 26 // Normal instructions. Default instantiation of a WebAssemblyInst. 27 class NI<dag oops, dag iops, list<dag> pattern, bit stack, string asmstr = "", 28 bits<32> inst = -1> 29 : WebAssemblyInst<inst, asmstr, stack> { 30 dag OutOperandList = oops; 31 dag InOperandList = iops; 32 let Pattern = pattern; 33 } 34 35 // Generates both register and stack based versions of one actual instruction. 36 // We have 2 sets of operands (oops & iops) for the register and stack 37 // based version of this instruction, as well as the corresponding asmstr. 38 // The register versions have virtual-register operands which correspond to wasm 39 // locals or stack locations. Each use and def of the register corresponds to an 40 // implicit get_local / set_local or access of stack operands in wasm. These 41 // instructions are used for ISel and all MI passes. The stack versions of the 42 // instructions do not have register operands (they implicitly operate on the 43 // stack), and get_locals and set_locals are explicit. The register instructions 44 // are converted to their corresponding stack instructions before lowering to 45 // MC. 46 // Every instruction should want to be based on this multi-class to guarantee 47 // there is always an equivalent pair of instructions. 48 multiclass I<dag oops_r, dag iops_r, dag oops_s, dag iops_s, 49 list<dag> pattern_r, string asmstr_r = "", string asmstr_s = "", 50 bits<32> inst = -1> { 51 def "" : NI<oops_r, iops_r, pattern_r, 0, asmstr_r, inst>; 52 def _S : NI<oops_s, iops_s, [], 1, asmstr_s, inst>; 53 } 54 55 // For instructions that have no register ops, so both sets are the same. 56 multiclass NRI<dag oops, dag iops, list<dag> pattern, string asmstr = "", 57 bits<32> inst = -1> { 58 defm "": I<oops, iops, oops, iops, pattern, asmstr, asmstr, inst>; 59 } 60 61 multiclass SIMD_I<dag oops_r, dag iops_r, dag oops_s, dag iops_s, 62 list<dag> pattern_r, string asmstr_r = "", 63 string asmstr_s = "", bits<32> inst = -1> { 64 defm "" : I<oops_r, iops_r, oops_s, iops_s, pattern_r, asmstr_r, asmstr_s, 65 inst>, 66 Requires<[HasSIMD128]>; 67 } 68 69 multiclass ATOMIC_I<dag oops_r, dag iops_r, dag oops_s, dag iops_s, 70 list<dag> pattern_r, string asmstr_r = "", 71 string asmstr_s = "", bits<32> inst = -1> { 72 defm "" : I<oops_r, iops_r, oops_s, iops_s, pattern_r, asmstr_r, asmstr_s, 73 inst>, 74 Requires<[HasAtomics]>; 75 } 76 77 // Unary and binary instructions, for the local types that WebAssembly supports. 78 multiclass UnaryInt<SDNode node, string name, bits<32> i32Inst, 79 bits<32> i64Inst> { 80 defm _I32 : I<(outs I32:$dst), (ins I32:$src), (outs), (ins), 81 [(set I32:$dst, (node I32:$src))], 82 !strconcat("i32.", !strconcat(name, "\t$dst, $src")), 83 !strconcat("i32.", name), i32Inst>; 84 defm _I64 : I<(outs I64:$dst), (ins I64:$src), (outs), (ins), 85 [(set I64:$dst, (node I64:$src))], 86 !strconcat("i64.", !strconcat(name, "\t$dst, $src")), 87 !strconcat("i64.", name), i64Inst>; 88 } 89 multiclass BinaryInt<SDNode node, string name, bits<32> i32Inst, 90 bits<32> i64Inst> { 91 defm _I32 : I<(outs I32:$dst), (ins I32:$lhs, I32:$rhs), (outs), (ins), 92 [(set I32:$dst, (node I32:$lhs, I32:$rhs))], 93 !strconcat("i32.", !strconcat(name, "\t$dst, $lhs, $rhs")), 94 !strconcat("i32.", name), i32Inst>; 95 defm _I64 : I<(outs I64:$dst), (ins I64:$lhs, I64:$rhs), (outs), (ins), 96 [(set I64:$dst, (node I64:$lhs, I64:$rhs))], 97 !strconcat("i64.", !strconcat(name, "\t$dst, $lhs, $rhs")), 98 !strconcat("i64.", name), i64Inst>; 99 } 100 multiclass UnaryFP<SDNode node, string name, bits<32> f32Inst, 101 bits<32> f64Inst> { 102 defm _F32 : I<(outs F32:$dst), (ins F32:$src), (outs), (ins), 103 [(set F32:$dst, (node F32:$src))], 104 !strconcat("f32.", !strconcat(name, "\t$dst, $src")), 105 !strconcat("f32.", name), f32Inst>; 106 defm _F64 : I<(outs F64:$dst), (ins F64:$src), (outs), (ins), 107 [(set F64:$dst, (node F64:$src))], 108 !strconcat("f64.", !strconcat(name, "\t$dst, $src")), 109 !strconcat("f64.", name), f64Inst>; 110 } 111 multiclass BinaryFP<SDNode node, string name, bits<32> f32Inst, 112 bits<32> f64Inst> { 113 defm _F32 : I<(outs F32:$dst), (ins F32:$lhs, F32:$rhs), (outs), (ins), 114 [(set F32:$dst, (node F32:$lhs, F32:$rhs))], 115 !strconcat("f32.", !strconcat(name, "\t$dst, $lhs, $rhs")), 116 !strconcat("f32.", name), f32Inst>; 117 defm _F64 : I<(outs F64:$dst), (ins F64:$lhs, F64:$rhs), (outs), (ins), 118 [(set F64:$dst, (node F64:$lhs, F64:$rhs))], 119 !strconcat("f64.", !strconcat(name, "\t$dst, $lhs, $rhs")), 120 !strconcat("f64.", name), f64Inst>; 121 } 122 multiclass SIMDBinary<SDNode node, SDNode fnode, string name> { 123 defm _I8x16 : SIMD_I<(outs V128:$dst), (ins V128:$lhs, V128:$rhs), 124 (outs), (ins), 125 [(set (v16i8 V128:$dst), (node V128:$lhs, V128:$rhs))], 126 !strconcat("i8x16.", 127 !strconcat(name, "\t$dst, $lhs, $rhs")), 128 !strconcat("i8x16.", name)>; 129 defm _I16x8 : SIMD_I<(outs V128:$dst), (ins V128:$lhs, V128:$rhs), 130 (outs), (ins), 131 [(set (v8i16 V128:$dst), (node V128:$lhs, V128:$rhs))], 132 !strconcat("i16x8.", 133 !strconcat(name, "\t$dst, $lhs, $rhs")), 134 !strconcat("i16x8.", name)>; 135 defm _I32x4 : SIMD_I<(outs V128:$dst), (ins V128:$lhs, V128:$rhs), 136 (outs), (ins), 137 [(set (v4i32 V128:$dst), (node V128:$lhs, V128:$rhs))], 138 !strconcat("i32x4.", 139 !strconcat(name, "\t$dst, $lhs, $rhs")), 140 !strconcat("i32x4.", name)>; 141 defm _F32x4 : SIMD_I<(outs V128:$dst), (ins V128:$lhs, V128:$rhs), 142 (outs), (ins), 143 [(set (v4f32 V128:$dst), (fnode V128:$lhs, V128:$rhs))], 144 !strconcat("f32x4.", 145 !strconcat(name, "\t$dst, $lhs, $rhs")), 146 !strconcat("f32x4.", name)>; 147 } 148 multiclass ComparisonInt<CondCode cond, string name, bits<32> i32Inst, bits<32> i64Inst> { 149 defm _I32 : I<(outs I32:$dst), (ins I32:$lhs, I32:$rhs), (outs), (ins), 150 [(set I32:$dst, (setcc I32:$lhs, I32:$rhs, cond))], 151 !strconcat("i32.", !strconcat(name, "\t$dst, $lhs, $rhs")), 152 !strconcat("i32.", name), i32Inst>; 153 defm _I64 : I<(outs I32:$dst), (ins I64:$lhs, I64:$rhs), (outs), (ins), 154 [(set I32:$dst, (setcc I64:$lhs, I64:$rhs, cond))], 155 !strconcat("i64.", !strconcat(name, "\t$dst, $lhs, $rhs")), 156 !strconcat("i64.", name), i64Inst>; 157 } 158 multiclass ComparisonFP<CondCode cond, string name, bits<32> f32Inst, bits<32> f64Inst> { 159 defm _F32 : I<(outs I32:$dst), (ins F32:$lhs, F32:$rhs), (outs), (ins), 160 [(set I32:$dst, (setcc F32:$lhs, F32:$rhs, cond))], 161 !strconcat("f32.", !strconcat(name, "\t$dst, $lhs, $rhs")), 162 !strconcat("f32.", name), f32Inst>; 163 defm _F64 : I<(outs I32:$dst), (ins F64:$lhs, F64:$rhs), (outs), (ins), 164 [(set I32:$dst, (setcc F64:$lhs, F64:$rhs, cond))], 165 !strconcat("f64.", !strconcat(name, "\t$dst, $lhs, $rhs")), 166 !strconcat("f64.", name), f64Inst>; 167 } 168
