mirror of
https://codeberg.org/ziglang/zig.git
synced 2025-12-07 14:24:43 +00:00
296 lines
11 KiB
Zig
296 lines
11 KiB
Zig
// This is the userland implementation of translate-c which will be used by both stage1
|
|
// and stage2. Currently the only way it is used is with `zig translate-c-2`.
|
|
|
|
const std = @import("std");
|
|
const ast = std.zig.ast;
|
|
const Token = std.zig.Token;
|
|
use @import("clang.zig");
|
|
|
|
pub const Mode = enum {
|
|
import,
|
|
translate,
|
|
};
|
|
|
|
// TODO merge with Type.Fn.CallingConvention
|
|
pub const CallingConvention = enum {
|
|
auto,
|
|
c,
|
|
cold,
|
|
naked,
|
|
stdcall,
|
|
};
|
|
|
|
pub const ClangErrMsg = Stage2ErrorMsg;
|
|
|
|
pub const Error = error{
|
|
OutOfMemory,
|
|
UnsupportedType,
|
|
};
|
|
|
|
const Context = struct {
|
|
tree: *ast.Tree,
|
|
source_buffer: *std.Buffer,
|
|
err: Error,
|
|
source_manager: *ZigClangSourceManager,
|
|
|
|
fn a(c: *Context) *std.mem.Allocator {
|
|
return &c.tree.arena_allocator.allocator;
|
|
}
|
|
|
|
/// Convert a null-terminated C string to a slice allocated in the arena
|
|
fn str(c: *Context, s: [*]const u8) ![]u8 {
|
|
return std.mem.dupe(c.a(), u8, std.mem.toSliceConst(u8, s));
|
|
}
|
|
|
|
/// Convert a clang source location to a file:line:column string
|
|
fn locStr(c: *Context, loc: ZigClangSourceLocation) ![]u8 {
|
|
const spelling_loc = ZigClangSourceManager_getSpellingLoc(c.source_manager, loc);
|
|
const filename_c = ZigClangSourceManager_getFilename(c.source_manager, spelling_loc);
|
|
const filename = if (filename_c) |s| try c.str(s) else ([]const u8)("(no file)");
|
|
|
|
const line = ZigClangSourceManager_getSpellingLineNumber(c.source_manager, spelling_loc);
|
|
const column = ZigClangSourceManager_getSpellingColumnNumber(c.source_manager, spelling_loc);
|
|
return std.fmt.allocPrint(c.a(), "{}:{}:{}", filename, line, column);
|
|
}
|
|
};
|
|
|
|
pub fn translate(
|
|
backing_allocator: *std.mem.Allocator,
|
|
args_begin: [*]?[*]const u8,
|
|
args_end: [*]?[*]const u8,
|
|
mode: Mode,
|
|
errors: *[]ClangErrMsg,
|
|
resources_path: [*]const u8,
|
|
) !*ast.Tree {
|
|
const ast_unit = ZigClangLoadFromCommandLine(
|
|
args_begin,
|
|
args_end,
|
|
&errors.ptr,
|
|
&errors.len,
|
|
resources_path,
|
|
) orelse {
|
|
if (errors.len == 0) return error.OutOfMemory;
|
|
return error.SemanticAnalyzeFail;
|
|
};
|
|
defer ZigClangASTUnit_delete(ast_unit);
|
|
|
|
var tree_arena = std.heap.ArenaAllocator.init(backing_allocator);
|
|
errdefer tree_arena.deinit();
|
|
const arena = &tree_arena.allocator;
|
|
|
|
const root_node = try arena.create(ast.Node.Root);
|
|
root_node.* = ast.Node.Root{
|
|
.base = ast.Node{ .id = ast.Node.Id.Root },
|
|
.decls = ast.Node.Root.DeclList.init(arena),
|
|
.doc_comments = null,
|
|
// initialized with the eof token at the end
|
|
.eof_token = undefined,
|
|
};
|
|
|
|
const tree = try arena.create(ast.Tree);
|
|
tree.* = ast.Tree{
|
|
.source = undefined, // need to use Buffer.toOwnedSlice later
|
|
.root_node = root_node,
|
|
.arena_allocator = undefined,
|
|
.tokens = ast.Tree.TokenList.init(arena),
|
|
.errors = ast.Tree.ErrorList.init(arena),
|
|
};
|
|
tree.arena_allocator = tree_arena;
|
|
|
|
var source_buffer = try std.Buffer.initSize(&tree.arena_allocator.allocator, 0);
|
|
|
|
var context = Context{
|
|
.tree = tree,
|
|
.source_buffer = &source_buffer,
|
|
.source_manager = ZigClangASTUnit_getSourceManager(ast_unit),
|
|
.err = undefined,
|
|
};
|
|
|
|
if (!ZigClangASTUnit_visitLocalTopLevelDecls(ast_unit, &context, declVisitorC)) {
|
|
return context.err;
|
|
}
|
|
|
|
try appendToken(&context, .Eof, "");
|
|
tree.source = source_buffer.toOwnedSlice();
|
|
return tree;
|
|
}
|
|
|
|
extern fn declVisitorC(context: ?*c_void, decl: *const ZigClangDecl) bool {
|
|
const c = @ptrCast(*Context, @alignCast(@alignOf(Context), context));
|
|
declVisitor(c, decl) catch |err| {
|
|
c.err = err;
|
|
return false;
|
|
};
|
|
return true;
|
|
}
|
|
|
|
fn declVisitor(c: *Context, decl: *const ZigClangDecl) Error!void {
|
|
switch (ZigClangDecl_getKind(decl)) {
|
|
.Function => {
|
|
return visitFnDecl(c, @ptrCast(*const ZigClangFunctionDecl, decl));
|
|
},
|
|
.Typedef => {
|
|
try emitWarning(c, ZigClangDecl_getLocation(decl), "TODO implement translate-c for typedefs");
|
|
},
|
|
.Enum => {
|
|
try emitWarning(c, ZigClangDecl_getLocation(decl), "TODO implement translate-c for enums");
|
|
},
|
|
.Record => {
|
|
try emitWarning(c, ZigClangDecl_getLocation(decl), "TODO implement translate-c for structs");
|
|
},
|
|
.Var => {
|
|
try emitWarning(c, ZigClangDecl_getLocation(decl), "TODO implement translate-c for variables");
|
|
},
|
|
else => {
|
|
const decl_name = try c.str(ZigClangDecl_getDeclKindName(decl));
|
|
try emitWarning(c, ZigClangDecl_getLocation(decl), "ignoring {} declaration", decl_name);
|
|
},
|
|
}
|
|
}
|
|
|
|
fn visitFnDecl(c: *Context, fn_decl: *const ZigClangFunctionDecl) Error!void {
|
|
const fn_name = c.str(ZigClangDecl_getName_bytes_begin(@ptrCast(*const ZigClangDecl, fn_decl)));
|
|
|
|
// TODO The C++ code has this:
|
|
//if (get_global(c, fn_name)) {
|
|
// // we already saw this function
|
|
// return;
|
|
//}
|
|
|
|
const fn_decl_loc = ZigClangFunctionDecl_getLocation(fn_decl);
|
|
const proto_node = transQualType(c, ZigClangFunctionDecl_getType(fn_decl), fn_decl_loc) catch |e| switch (e) {
|
|
error.UnsupportedType => {
|
|
try emitWarning(c, fn_decl_loc, "unable to resolve prototype of function '{}'", fn_name);
|
|
return;
|
|
},
|
|
else => return e,
|
|
};
|
|
|
|
try emitWarning(c, fn_decl_loc, "TODO implement translate-c for function decls");
|
|
}
|
|
|
|
fn transQualType(c: *Context, qt: ZigClangQualType, source_loc: ZigClangSourceLocation) !*ast.Node {
|
|
return transType(c, ZigClangQualType_getTypePtr(qt), source_loc);
|
|
}
|
|
|
|
fn transType(c: *Context, ty: *const ZigClangType, source_loc: ZigClangSourceLocation) !*ast.Node {
|
|
switch (ZigClangType_getTypeClass(ty)) {
|
|
.Builtin => {
|
|
const builtin_ty = @ptrCast(*const ZigClangBuiltinType, ty);
|
|
switch (ZigClangBuiltinType_getKind(builtin_ty)) {
|
|
else => {
|
|
try emitWarning(c, source_loc, "unsupported builtin type");
|
|
return error.UnsupportedType;
|
|
},
|
|
}
|
|
},
|
|
.FunctionProto => {
|
|
const fn_ty = @ptrCast(*const ZigClangFunctionType, ty);
|
|
const cc = switch (ZigClangFunctionType_getCallConv(fn_ty)) {
|
|
.C => CallingConvention.c,
|
|
.X86StdCall => CallingConvention.stdcall,
|
|
.X86FastCall => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 fastcall");
|
|
return error.UnsupportedType;
|
|
},
|
|
.X86ThisCall => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 thiscall");
|
|
return error.UnsupportedType;
|
|
},
|
|
.X86VectorCall => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 vectorcall");
|
|
return error.UnsupportedType;
|
|
},
|
|
.X86Pascal => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 pascal");
|
|
return error.UnsupportedType;
|
|
},
|
|
.Win64 => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: win64");
|
|
return error.UnsupportedType;
|
|
},
|
|
.X86_64SysV => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 64sysv");
|
|
return error.UnsupportedType;
|
|
},
|
|
.X86RegCall => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: x86 reg");
|
|
return error.UnsupportedType;
|
|
},
|
|
.AAPCS => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: aapcs");
|
|
return error.UnsupportedType;
|
|
},
|
|
.AAPCS_VFP => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: aapcs-vfp");
|
|
return error.UnsupportedType;
|
|
},
|
|
.IntelOclBicc => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: intel_ocl_bicc");
|
|
return error.UnsupportedType;
|
|
},
|
|
.SpirFunction => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: SPIR function");
|
|
return error.UnsupportedType;
|
|
},
|
|
.OpenCLKernel => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: OpenCLKernel");
|
|
return error.UnsupportedType;
|
|
},
|
|
.Swift => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: Swift");
|
|
return error.UnsupportedType;
|
|
},
|
|
.PreserveMost => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: PreserveMost");
|
|
return error.UnsupportedType;
|
|
},
|
|
.PreserveAll => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: PreserveAll");
|
|
return error.UnsupportedType;
|
|
},
|
|
.AArch64VectorCall => {
|
|
try emitWarning(c, source_loc, "unsupported calling convention: AArch64VectorCall");
|
|
return error.UnsupportedType;
|
|
},
|
|
};
|
|
try emitWarning(c, source_loc, "TODO: implement transType for FunctionProto");
|
|
return error.UnsupportedType;
|
|
},
|
|
else => {
|
|
const type_name = c.str(ZigClangType_getTypeClassName(ty));
|
|
try emitWarning(c, source_loc, "unsupported type: '{}'", type_name);
|
|
return error.UnsupportedType;
|
|
},
|
|
}
|
|
}
|
|
|
|
fn emitWarning(c: *Context, loc: ZigClangSourceLocation, comptime format: []const u8, args: ...) !void {
|
|
try appendToken(c, .LineComment, "// {}: warning: " ++ format, c.locStr(loc), args);
|
|
}
|
|
|
|
fn appendToken(c: *Context, token_id: Token.Id, comptime format: []const u8, args: ...) !void {
|
|
const S = struct {
|
|
fn callback(context: *Context, bytes: []const u8) Error!void {
|
|
return context.source_buffer.append(bytes);
|
|
}
|
|
};
|
|
const start_index = c.source_buffer.len();
|
|
errdefer c.source_buffer.shrink(start_index);
|
|
|
|
try std.fmt.format(c, Error, S.callback, format, args);
|
|
const end_index = c.source_buffer.len();
|
|
const new_token = try c.tree.tokens.addOne();
|
|
errdefer c.tree.tokens.shrink(c.tree.tokens.len - 1);
|
|
|
|
new_token.* = Token{
|
|
.id = token_id,
|
|
.start = start_index,
|
|
.end = end_index,
|
|
};
|
|
try c.source_buffer.appendByte('\n');
|
|
}
|
|
|
|
pub fn freeErrors(errors: []ClangErrMsg) void {
|
|
ZigClangErrorMsg_delete(errors.ptr, errors.len);
|
|
}
|