改造Emacs GDB调试的多窗口布局

转自：http://ppgunjack.iteye.com/blog/1179657

Emacs支持多窗口的GDB调试，要打开GDB的多窗口模式只需要设置Emacs全局变量gdb-many-windows 为true。

但默认的多窗口感觉并不够用，没有汇编窗口，在学习一些语言底层实现的时候有时还需要看看汇编和寄存器内容。

 

研究Emacs的GBD ui脚本发现Emacs的GDB多窗口布局不是定义在配置文件，而是固化在程序中实现的。

这里写了个函数改造了一下窗口布局，下面代码在Linux下应该放入.emacs文件，如果window下则放入_emacs文件。

该函数注册成一个切面函数，会在Emacs构建GDB的多窗口结束时被调用，额外再创建出几个窗口，用来显示汇编、内存和寄存器。

 

Lisp代码  

1. ;;启动gdb-many-windows时加载的钩子函数，改变many-windows的默认布局，这个钩子函数不能勾在gdb-setup-windows，因为此时assamble-buffer还没完成初始化，不能set到window  
2. (defadvice gdb-frame-handler-1 (after activate)  
3.   (if gdb-use-separate-io-buffer  
4.       (advice_separate_io)  
5.     (advice_no_separate_io)))  
6.   
7. ;;生成没有单独IO窗口的gdb布局  
8. (defun advice_no_separate_io()  
9. ;;默认的生成gdb-assembler-buffer的函数本身也会设计调用gdb-frame-handler-1，加入此条件发生避免无限递归调用  
10.   (if (not (gdb-get-buffer 'gdb-assembler-buffer))  
11.       (progn  
12.     (shrink-window-horizontally ( / (window-width) 3))  
13.   
14.     (other-window 1)  
15.     (split-window-horizontally)  
16.   
17.     (other-window 1)  
18.     (gdb-set-window-buffer (gdb-stack-buffer-name))  
19.   
20.     (other-window 1)  
21.     (split-window-horizontally)  
22.   
23.     (other-window 1)  
24.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-assembler-buffer))  
25.   
26.     (split-window-horizontally  (/ ( * (window-width) 2) 3))  
27.   
28.     (other-window 1)  
29.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-registers-buffer))  
30.   
31.     (other-window 1)  
32.     (toggle-current-window-dedication)  
33.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-memory-buffer))  
34.     (toggle-current-window-dedication)  
35.   
36.     (other-window 2)  
37.     )))  
38.   
39. ;;生成有单独IO窗口的gdb布局  
40. (defun advice_separate_io()  
41. ;;默认的生成gdb-assembler-buffer的函数本身也会设计调用gdb-frame-handler-1，加入此条件发生避免无限递归调用  
42.   (if (not (gdb-get-buffer 'gdb-assembler-buffer))  
43.       (progn  
44.     (split-window-horizontally)  
45.     (enlarge-window-horizontally ( / (window-width) 3))  
46.     (other-window 1)  
47.   
48.     ;;此处不能使用(gdb-set-window-buffer (gdb-get-buffer-create 'gdb-inferior-io))代替，  
49.     ;;因为在打开gdb-use-separate-io-buffer的状态时，它还会额外调用一些函数将gdb的input，output定位到该buffer  
50.     (gdb-set-window-buffer (gdb-inferior-io-name))  
51.   
52.     (other-window 1)  
53.     (split-window-horizontally)  
54.   
55.     (other-window 1)  
56.     (gdb-set-window-buffer (gdb-stack-buffer-name))  
57.   
58.     (other-window 1)  
59.   
60.     (other-window 1)  
61.     (toggle-current-window-dedication)  
62.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-assembler-buffer))  
63.     (toggle-current-window-dedication)  
64.   
65.     (split-window-horizontally  (/ ( * (window-width) 2) 3))  
66.   
67.     (other-window 1)  
68.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-registers-buffer))  
69.   
70.     (other-window 1)  
71.     (toggle-current-window-dedication)  
72.     (gdb-set-window-buffer (gdb-get-buffer-create 'gdb-memory-buffer))  
73.     (toggle-current-window-dedication)  
74.   
75.     (other-window 2)  
76.     )))  

 

语句defadvice gdb-frame-handler-1 (after activate) 这里定义了一个切面函数，和spring中切面函数一样，Lisp中的切面函数也可以在pre，post，around三种模式下被调用，这里after activate相当于是post，即该函数会在函数gdb-frame-handler-1被调用完毕后才被调用。

 

GDB的多窗口有两种模式，一种是程序的标准输入输出和GDB自身命令的输入输出会在分离的两个窗口显示，另一种则是程序输入输出都会在GDB命令行中一起输出，具体区别看图就知道了。

下面是分离出程序IO的多窗口模式：

下面是没有分离IO的多窗口模式：

 

激活分离IO模式的多窗口调试可以通过在.emacs/_emacs文件中添加：

(setq gdb-use-separate-io-buffer 1)

该语句作用是定义变量gdb-use-separate-io-buffer为非空。

 

如果要不单独分离出程序IO的窗口模式，则可以注释掉上面的语句，或者设置成：

(setq gdb-use-separate-io-buffer nil)

 

已知的问题：

如果该函数是在ECB已经被activate的情况下被调用（即在ECB环境下启动GDB）会出错。

原因应该是ECB默认的起始窗口不同，导致我代码中的（other-window 1）焦点会移动到错位的窗口上从而引发错误。可以通过在这段代码启动阶段增加重定位窗口焦点来解决，不过因为暂时还用不着ECB并且窗口函数也不熟，先不花力气了，有兴趣的人可以自己尝试。

 

下面也是要注意的问题，但是来自Emacs

1.Input/output窗口需要在程序运行后用鼠标滚动一下，或者按up键，才能显示出程序输出的内容，不过这应该是Emacs实现的问题，默认Emacs也是这种情况(似乎和字体大小和分辨率都相关，在我笔记本上11号Consolas字体就正常，而同样配置在台式机会出现这个问题)

2.Emacs窗口在反复最大化和窗口化过程中，窗口大小的相对比例会逐渐改变，每个水平、竖直方向的窗口大小都会慢慢变一致，水平分割的窗口平分宽度，垂直划分的窗口平分高度。不过同样这也是Emacs的问题。