如何为Delphi应用创建CPU火焰图？优化调用栈采集性能

完全可以先采集原始调用栈地址，再离线映射为函数名——这是高频采样场景的最优方案，既能满足火焰图的采样频率要求，又能避开实时符号解析的性能开销。

一、快速采集原始调用栈地址 #

核心是用轻量的系统API直接捕获栈地址，跳过实时符号解析步骤，把耗时操作留到离线阶段。

1. 使用Windows原生API RtlCaptureStackBackTrace #

这个API是系统内置的栈回溯工具，调用耗时极短（通常几毫秒以内），完全支持每秒10-100次的高频采样。示例代码：

uses Windows;

// 捕获原始栈地址，返回实际捕获的地址数量
function CaptureRawStackAddresses(out Addresses: array of Pointer; MaxDepth: Integer): Integer;
begin
  Result := RtlCaptureStackBackTrace(0, MaxDepth, @Addresses[0], nil);
end;

• 参数说明：第一个参数设0表示从当前函数开始捕获，MaxDepth为最大栈深度（建议设30-50，平衡采样完整性和性能）。
• 采样时仅保存捕获到的Pointer类型地址，可写入日志文件或内存缓冲区，全程不做任何符号解析操作。

二、离线将地址映射为函数名 #

采集完成后，通过以下两种主流方式完成地址到函数名的映射：

1. 利用编译生成的Map文件解析 #

如果编译时开启了详细Map文件生成（Project Options -> Linking -> Map file -> Detailed），可以直接解析Map文件中的地址范围与函数名对应关系：

// 伪代码：基于解析后的Map数据匹配地址与函数名
type
  TFunctionEntry = record
    StartAddr: Pointer;
    EndAddr: Pointer;
    FunctionName: string;
  end;
  TMapData = array of TFunctionEntry;

function GetFunctionNameFromMap(const Address: Pointer; const MapData: TMapData): string;
var
  I: Integer;
begin
  Result := 'Unknown';
  for I := 0 to High(MapData) do
  begin
    if (Address >= MapData[I].StartAddr) and (Address < MapData[I].EndAddr) then
    begin
      Result := MapData[I].FunctionName;
      Break;
    end;
  end;
end;

• 优势：无需额外依赖，解析速度快，适合批量处理大量采样地址。

2. 利用Windows符号解析API结合PDB文件 #

如果编译时生成了PDB调试文件，可使用SymInitialize系列API直接加载PDB解析地址：

uses Windows, SysUtils;

function GetFunctionNameFromPDB(const Address: Pointer): string;
var
  hProcess: THandle;
  SymInfo: PSymInfo;
  BufSize: DWORD;
  Displacement: DWORD;
begin
  Result := 'Unknown';
  hProcess := GetCurrentProcess;
  if not SymInitialize(hProcess, nil, True) then Exit;
  try
    BufSize := SizeOf(TSymInfo) + 256;
    GetMem(SymInfo, BufSize);
    try
      SymInfo^.SizeOfStruct := SizeOf(TSymInfo);
      if SymFromAddr(hProcess, DWORD(Address), Displacement, SymInfo) then
        Result := string(SymInfo^.Name);
    finally
      FreeMem(SymInfo);
    end;
  finally
    SymCleanup(hProcess);
  end;
end;

• 优势：解析精度高，支持动态生成代码的地址解析，适合复杂项目场景。

三、火焰图生成完整流程 #

1. 高频采样：通过RtlCaptureStackBackTrace每秒采集多次栈地址，按顺序保存地址列表。
2. 离线解析：用Map文件或PDB将所有地址批量转换为函数名，生成完整的调用栈字符串。
3. 生成火焰图：将解析后的调用栈数据转换为火焰图工具（如flamegraph.pl）支持的格式，生成可视化图表。

注意事项 #

• 编译时必须开启Map或PDB文件生成，否则无法完成地址到函数名的映射。
• 采样线程建议设置较高优先级，避免采样被其他线程阻塞导致数据失真。
• 采样深度不宜过大，否则会增加采集时间，30-50层足以覆盖绝大多数调用场景。

内容的提问来源于stack exchange，提问作者blerontin