HelpText<"Enable Objective-C Ivar layout bitmap print trace">;
def fobjc_fragile_abi : Flag<"-fobjc-fragile-abi">,
HelpText<"Use Objective-C's fragile ABI">;
+def fobjc_trace : Flag<"-fobjc-trace">,
+ HelpText<"Enable tracing of Objective-C message sends">;
def fno_objc_infer_related_result_type : Flag<
"-fno-objc-infer-related-result-type">,
HelpText<
"-fno-objc-infer-related-result-type">, Group<f_Group>;
def fobjc_link_runtime: Flag<"-fobjc-link-runtime">, Group<f_Group>;
+def fobjc_trace: Flag<"-fobjc-trace">, Group<f_Group>;
+def fno_objc_trace: Flag<"-fno-objc-trace">, Group<f_Group>;
+
// Objective-C ABI options.
def fobjc_abi_version_EQ : Joined<"-fobjc-abi-version=">, Group<f_Group>;
def fobjc_nonfragile_abi_version_EQ : Joined<"-fobjc-nonfragile-abi-version=">, Group<f_Group>;
/// use of the inline keyword.
unsigned NoNaNsFPMath : 1; /// Assume FP arguments, results not NaN.
unsigned NoZeroInitializedInBSS : 1; /// -fno-zero-initialized-in-bss
+ unsigned ObjCTrace : 1; /// Emit tracing calls for visualising code
+ /// flow in Objective-C programs
unsigned ObjCDispatchMethod : 2; /// Method of Objective-C dispatch to use.
unsigned ObjCRuntimeHasARC : 1; /// The target runtime supports ARC natively
unsigned ObjCRuntimeHasTerminate : 1; /// The ObjC runtime has objc_terminate
/// Function used for non-object declared property setters.
LazyRuntimeFunction SetStructPropertyFn;
+ /// Function called before message sends, when tracing
+ LazyRuntimeFunction TraceEnterFn;
+ /// Function called after message sends, when tracing
+ LazyRuntimeFunction TraceExitFn;
+
/// The version of the runtime that this class targets. Must match the
/// version in the runtime.
int RuntimeVersion;
SetStructPropertyFn.init(&CGM, "objc_setPropertyStruct", VoidTy, PtrTy, PtrTy,
PtrDiffTy, BoolTy, BoolTy, NULL);
+ TraceEnterFn.init(&CGM, "objc_trace_enter", VoidTy, IdTy, SelectorTy, NULL);
+ TraceExitFn.init(&CGM, "objc_trace_exit", VoidTy, IdTy, SelectorTy, NULL);
+
// IMP type
llvm::Type *IMPArgs[] = { IdTy, SelectorTy };
IMPTy = llvm::PointerType::getUnqual(llvm::FunctionType::get(IdTy, IMPArgs,
ActualArgs[0] = CallArg(RValue::get(Receiver), ASTIdTy, false);
imp = EnforceType(Builder, imp, MSI.MessengerType);
+ if (CGM.getCodeGenOpts().ObjCTrace) {
+ Builder.CreateCall2(TraceEnterFn, Receiver, cmd);
+ }
llvm::Instruction *call;
RValue msgRet = CGF.EmitCall(MSI.CallInfo, imp, Return, ActualArgs,
0, &call);
call->setMetadata(msgSendMDKind, node);
+ if (CGM.getCodeGenOpts().ObjCTrace) {
+ Builder.CreateCall2(TraceExitFn, Receiver, cmd);
+ }
+
if (!isPointerSizedReturn) {
messageBB = CGF.Builder.GetInsertBlock();
CmdArgs.push_back("-fobjc-default-synthesize-properties");
}
+ if (Args.hasFlag(options::OPT_fobjc_trace, options::OPT_fno_objc_trace,
+ false))
+ CmdArgs.push_back("-fobjc-trace");
+
// Allow -fno-objc-arr to trump -fobjc-arr/-fobjc-arc.
// NOTE: This logic is duplicated in ToolChains.cpp.
bool ARC = isObjCAutoRefCount(Args);
Res.push_back("-mconstructor-aliases");
if (Opts.ObjCAutoRefCountExceptions)
Res.push_back("-fobjc-arc-eh");
+ if (Opts.ObjCTrace)
+ Res.push_back("-fobjc-trace");
if (!Opts.DebugPass.empty()) {
Res.push_back("-mdebug-pass", Opts.DebugPass);
}
Opts.AsmVerbose = Args.hasArg(OPT_masm_verbose);
Opts.ObjCAutoRefCountExceptions = Args.hasArg(OPT_fobjc_arc_exceptions);
+ Opts.ObjCTrace = Args.hasArg(OPT_fobjc_trace);
Opts.ObjCRuntimeHasARC = Args.hasArg(OPT_fobjc_runtime_has_arc);
Opts.ObjCRuntimeHasTerminate = Args.hasArg(OPT_fobjc_runtime_has_terminate);
Opts.CUDAIsDevice = Args.hasArg(OPT_fcuda_is_device);
--- /dev/null
+///RUN: %clang_cc1 -triple x86_64-unknown-freebsd9.0 -fobjc-trace -fgnu-runtime -fobjc-dispatch-method=non-legacy -emit-llvm -o - %s | FileCheck %s
+
+
+@interface A
++ (id)msg;
+@end
+
+void f(void) {
+ [A msg];
+ // CHECK: call void @objc_trace_enter(
+ // CHECK: @objc_msgSend
+ // CHECK: call void @objc_trace_exit(
+}