ExASIC
分享让工作更轻松

Emacs如何在当前verilog文件中根据选中的文本快速查找并高亮显示

我们在写verilog代码时常常有这样的需求:看看当前的信号或变量在哪里出现过。如果用emacs自带的incremental search(就是不停的按C-s)可以实现。但有两个问题。一是复制需要搜索的关键字到mini-buffer,或者手动输入一长串字符串,比较麻烦。二是不停的按C-s手指头会疼。所以我在想有没有更好的办法来解决。

分析需求

我的思路如下:

  1. 获取当前选中的文本,即需要搜索和高亮的关键字
  2. 把关键字和正在编辑的文件名传递给外部命令grep
  3. 抓取grep的结果,并显示在新的window中
  4. 并高亮grep结果中的关键字

实现过程

上面的过程看起来很复杂,所以我们写了一个elisp函数来实现。

(defun grep-current-buffer ()
  "grep string in current buffer"
  (interactive)
  (progn
    ;;grep
    (setq filename (buffer-file-name))
    (setq selected-text (buffer-substring-no-properties (region-beginning) (region-end)))
    (setq grep-result (shell-command-to-string (concat "grep -w -B 1 -A 1 -n " selected-text " " filename)))
    ;;print to *grep*
    (switch-to-buffer-other-window (get-buffer-create "*grep*"))
    (insert (concat filename "\n\n"))
    (insert grep-result)
    ;;highlight
    (setq face 'hi-yellow)
    (hi-lock-face-buffer selected-text face)
  )
)

第6行:用buffer-file-name取得当前正在编辑的文件名
第7行:用buffer-substring-no-properties取得当前选中的文本,其中region-beginning和region-end是选中文件的开头和结尾。
第8行:用shell-command-to-string来调用外部命令,并取得外部的结果。

传递给外部grep的参数如下,
grep -w -B 1 -A 1 -n selected-text filename
-w //匹配完整字符串
-B 1 //前面额外显示一行
-A 1 //后面额外显示一行
-n //显示行号
selected-text //要搜过的字符串
filename //指定在当前文件中搜索

第10行:在新window中打开临时的buffer,取名为*grep*
第11行:往*grep*中写入文件名
第12行:往*grep*中写入grep的结果
第14-15行:在*grep*中高亮显示选中的字符串

绑定快捷键

把上面的elisp函数写到~/.emacs中,并绑定快捷键win+g,如下

(global-set-key (kbd "s-g") 'grep-current-buffer)

最终效果

emacs fast open

阅读数:
更多文章:文章目录
解惑专区
(支持markdown插入源代码)
欢迎使用ExASIC订阅服务
仅用于ExASIC最新文章通知,方便及时阅读。
友情链接: 白山头NingHeChuanShuang'Blog
成都奥卡思微电科技有限公司,主要产品有AVE自动化验证工具软件和MegaEC等价验证工具软件。硅知识,上海市集成电路高技能人才培养基地NanDigits中国,主要产品GOF。2020年元旦,我们,十多位IC行业的公众号号主,共同建立了一个 “ IC技术圈 ” 。我们将在这里或分享经验,或传授技巧,或聊求职就业,或谈人生规划。陕西纳宇测量设备有限公司AD