在 perl 中调试 SWIG 包装的共享库

Question

我在 Perl 中使用 SWIG 封装了我的 C/C++ 代码。由于包装的代码，我几乎没有分段错误。我正在尝试将 ddd 与 Perl 脚本一起使用，但不幸的是，即使我在脚本的一行（调用 C/C++ 代码的行）上设置断点，ddd 也是无法深入到 C/C++ 代码。

当我调试 Perl 代码时，有什么方法可以在我的 C lib 中设置断点，或者您知道当我运行此 Perl 脚本时调试 C lib 的好方法/工具吗？

我正在使用 Linux/gcc。

Answer 1

我做了一件简单的事。我直接在 perl 解释器上调用 gdb。

    gdb /usr/bin/perl
    (gdb) r myscript
    #block the script someway or rerun it
    (gdb) b whatever_my_function

似乎一旦 scipt 运行，共享内存也会加载到内存中。一旦发生这种情况，我就可以使用所有信息、函数和断点进行调试。

Answer 2

我只使用 SWIG 从 TCL 调用 C++，并使用 Visual Studio 对其进行调试，但相同的想法也应该适用于您的情况。我将描述我所做的调试工作，希望您能弄清楚如何将其应用到您的情况。

• 构建 C++ 模块的调试版本
• 确保 TCL 脚本包含调试版本（TCL load 命令中的路径指向模块的调试版本）
• 在 C++ 代码中放置断点
• 调用TCL脚本通过Visual Studio调试器；例如使用的命令是 tclsh85.exe MyScript.tcl

HTH