You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

286 lines
9.3 KiB

This file contains ambiguous Unicode characters!

This file contains ambiguous Unicode characters that may be confused with others in your current locale. If your use case is intentional and legitimate, you can safely ignore this warning. Use the Escape button to highlight these characters.

// IR 文本输出:
// - 将 IR 打印为 .ll 风格的文本
// - 支撑调试与测试对比diff
#include "ir/IR.h"
#include <cstdint>
#include <cstring>
#include <ostream>
#include <stdexcept>
#include <string>
#include "utils/Log.h"
namespace ir {
static const char* TypeToString(const Type& ty) {
switch (ty.GetKind()) {
case Type::Kind::Void:
return "void";
case Type::Kind::Int32:
return "i32";
case Type::Kind::PtrInt32:
return "i32*";
case Type::Kind::Float32:
return "float";
case Type::Kind::PtrFloat32:
return "float*";
}
throw std::runtime_error(FormatError("ir", "未知类型"));
}
static const char* OpcodeToString(Opcode op) {
switch (op) {
case Opcode::Add:
return "add";
case Opcode::Sub:
return "sub";
case Opcode::Mul:
return "mul";
case Opcode::Div:
return "sdiv";
case Opcode::Mod:
return "srem";
case Opcode::Cmp:
return "icmp";
case Opcode::Cast:
return "cast";
case Opcode::Br:
return "br";
case Opcode::CondBr:
return "br";
case Opcode::Call:
return "call";
case Opcode::Alloca:
return "alloca";
case Opcode::Load:
return "load";
case Opcode::Store:
return "store";
case Opcode::Ret:
return "ret";
case Opcode::Gep:
return "getelementptr";
}
return "?";
}
static const char* CmpOpToString(CmpOp op) {
switch (op) {
case CmpOp::Eq:
return "eq";
case CmpOp::Ne:
return "ne";
case CmpOp::Lt:
return "slt";
case CmpOp::Le:
return "sle";
case CmpOp::Gt:
return "sgt";
case CmpOp::Ge:
return "sge";
}
return "?";
}
static std::string ValueToString(const Value* v) {
if (auto* ci = dynamic_cast<const ConstantInt*>(v)) {
return std::to_string(ci->GetValue());
}
if (auto* gv = dynamic_cast<const GlobalVariable*>(v)) {
return "@" + gv->GetName();
}
if (auto* func = dynamic_cast<const Function*>(v)) {
return "@" + func->GetName();
}
if (auto* arg = dynamic_cast<const Argument*>(v)) {
return arg->GetName();
}
return v ? v->GetName() : "<null>";
}
void IRPrinter::Print(const Module& module, std::ostream& os) {
// 先打印全局变量
for (const auto& gv : module.GetGlobalVars()) {
if (!gv) continue;
const char* elem_ty = gv->IsFloat() ? "float" : "i32";
if (gv->IsArray()) {
os << "@" << gv->GetName() << " = global [" << gv->GetCount()
<< " x " << elem_ty << "] zeroinitializer\n";
} else {
if (gv->IsFloat()) {
std::int32_t bits = static_cast<std::int32_t>(gv->GetInitValue());
float fval = 0.0f;
std::memcpy(&fval, &bits, sizeof(fval));
os << "@" << gv->GetName() << " = global float " << fval << "\n";
} else {
os << "@" << gv->GetName() << " = global i32 " << gv->GetInitValue()
<< "\n";
}
}
}
if (!module.GetGlobalVars().empty()) os << "\n";
for (const auto& func : module.GetFunctions()) {
if (func->IsExternal()) {
// 外部函数声明declare rettype @name(paramtypes)
os << "declare " << TypeToString(*func->GetType()) << " @" << func->GetName() << "(";
const auto& ptypes = func->GetParamTypes();
for (size_t i = 0; i < ptypes.size(); ++i) {
if (i != 0) os << ", ";
os << TypeToString(*ptypes[i]);
}
os << ")\n";
continue;
}
std::string params;
const auto& param_types = func->GetParamTypes();
for (size_t i = 0; i < param_types.size(); ++i) {
if (i != 0) {
params += ", ";
}
params += TypeToString(*param_types[i]);
params += " %arg" + std::to_string(i);
}
os << "define " << TypeToString(*func->GetType()) << " @" << func->GetName()
<< "(" << params << ") {\n";
for (const auto& bb : func->GetBlocks()) {
if (!bb) {
continue;
}
os << bb->GetName() << ":\n";
for (const auto& instPtr : bb->GetInstructions()) {
const auto* inst = instPtr.get();
switch (inst->GetOpcode()) {
case Opcode::Add:
case Opcode::Sub:
case Opcode::Mul:
case Opcode::Div:
case Opcode::Mod: {
auto* bin = static_cast<const BinaryInst*>(inst);
os << " " << bin->GetName() << " = "
<< OpcodeToString(bin->GetOpcode()) << " "
<< TypeToString(*bin->GetLhs()->GetType()) << " "
<< ValueToString(bin->GetLhs()) << ", "
<< ValueToString(bin->GetRhs()) << "\n";
break;
}
case Opcode::Cmp: {
auto* cmp = static_cast<const CmpInst*>(inst);
os << " " << cmp->GetName() << " = " << OpcodeToString(cmp->GetOpcode())
<< " " << CmpOpToString(cmp->GetCmpOp()) << " "
<< TypeToString(*cmp->GetLhs()->GetType()) << " "
<< ValueToString(cmp->GetLhs()) << ", "
<< ValueToString(cmp->GetRhs()) << "\n";
break;
}
case Opcode::Cast: {
auto* cast = static_cast<const CastInst*>(inst);
const char* cast_name =
(cast->GetCastOp() == CastOp::IntToFloat) ? "sitofp" : "fptosi";
os << " " << cast->GetName() << " = " << cast_name << " "
<< TypeToString(*cast->GetValue()->GetType()) << " "
<< ValueToString(cast->GetValue()) << " to "
<< TypeToString(*cast->GetType()) << "\n";
break;
}
case Opcode::Alloca: {
auto* alloca = static_cast<const AllocaInst*>(inst);
const char* elem_ty = alloca->GetType()->IsPtrFloat32() ? "float" : "i32";
if (alloca->IsArray()) {
os << " " << alloca->GetName() << " = alloca " << elem_ty << ", i32 "
<< alloca->GetCount() << "\n";
} else {
os << " " << alloca->GetName() << " = alloca " << elem_ty << "\n";
}
break;
}
case Opcode::Load: {
auto* load = static_cast<const LoadInst*>(inst);
os << " " << load->GetName() << " = load "
<< TypeToString(*load->GetType()) << ", "
<< TypeToString(*load->GetPtr()->GetType()) << " "
<< ValueToString(load->GetPtr()) << "\n";
break;
}
case Opcode::Store: {
auto* store = static_cast<const StoreInst*>(inst);
os << " store " << TypeToString(*store->GetValue()->GetType())
<< " " << ValueToString(store->GetValue())
<< ", " << TypeToString(*store->GetPtr()->GetType())
<< " " << ValueToString(store->GetPtr()) << "\n";
break;
}
case Opcode::Br: {
auto* br = static_cast<const BranchInst*>(inst);
os << " br label %" << br->GetTarget()->GetName() << "\n";
break;
}
case Opcode::CondBr: {
auto* cbr = static_cast<const CondBranchInst*>(inst);
os << " br i1 " << ValueToString(cbr->GetCond()) << ", label %"
<< cbr->GetTrueBlock()->GetName() << ", label %"
<< cbr->GetFalseBlock()->GetName() << "\n";
break;
}
case Opcode::Call: {
auto* call = static_cast<const CallInst*>(inst);
if (!call->GetType()->IsVoid()) {
os << " " << call->GetName() << " = ";
} else {
os << " ";
}
os << "call " << TypeToString(*call->GetType()) << " @"
<< call->GetCallee()->GetName() << "(";
for (size_t i = 0; i < call->GetNumArgs(); ++i) {
if (i != 0) {
os << ", ";
}
auto* arg = call->GetArg(i);
os << TypeToString(*arg->GetType()) << " " << ValueToString(arg);
}
os << ")\n";
break;
}
case Opcode::Gep: {
auto* gep = static_cast<const GepInst*>(inst);
auto* base = gep->GetBase();
const char* elem_ty = base->GetType()->IsPtrFloat32() ? "float" : "i32";
// 全局数组用双下标 GEP局部 alloca 用平坦 GEP。
if (auto* gv = dynamic_cast<const GlobalVariable*>(base)) {
if (gv->IsArray()) {
os << " " << gep->GetName()
<< " = getelementptr [" << gv->GetCount() << " x " << elem_ty << "], ["
<< gv->GetCount() << " x " << elem_ty << "]* @" << gv->GetName()
<< ", i32 0, i32 " << ValueToString(gep->GetIndex()) << "\n";
break;
}
}
os << " " << gep->GetName()
<< " = getelementptr " << elem_ty << ", "
<< TypeToString(*base->GetType()) << " " << ValueToString(base)
<< ", i32 " << ValueToString(gep->GetIndex()) << "\n";
break;
}
case Opcode::Ret: {
auto* ret = static_cast<const ReturnInst*>(inst);
auto* retval = ret->GetValue();
if (!retval) {
os << " ret void\n";
} else {
os << " ret " << TypeToString(*retval->GetType()) << " "
<< ValueToString(retval) << "\n";
}
break;
}
}
}
}
os << "}\n";
}
}
} // namespace ir