分享ncl 源代码的自动搜索脚本（以bash编写）

packard

对进阶ncl用户来说，有时候需要搜索ncl的一些函数是怎么实现的。特别是一些Built-in的函数，源代码的位置并不好找，里面也有一些包装又包装的情况。最近写了个Bash脚本，专门自动搜索这个源代码的。

假设你使用Linux，已经装好了ncl，设好了环境变量NCARG_ROOT。要做的有几步：
1. 下载ncl的源代码（不是precompiled 预编译的）。如： https://www.earthsystemgrid.org/ ... _ncarg-6.4.0.tar.gz
2. 解压(tar -zxvf ncl_ncarg-6.4.0.tar.gz)到一个目录（我这里解压在 ${NCARG_ROOT}/source-6.4.0/)
3. mkdir ~/bin; （如果文件夹还没存在）
4. 新建~/bin/gncl 文件，把以下代码复制进去，
5. 修改NCL_SOURCE变量为源代码的路径，保存退出。
6. chmod a+x ~/bin/gncl
7. 默认~/bin 应该在PATH里，如果不是，把它加进PATH里，方便以后调用。
8. `gncl 函数全名` 即可使用。

20180408更新：wrkb的grep 匹配有误，已修复。谢谢@今朝几朵白云生 的帖子

http://bbs.06climate.com/forum.php?mod=viewthread&tid=59958&fromuid=75422

1. #!/bin/bash
   
2. #set -x
   
3. #NCARG_ROOT="/n/home05/packard/sw/ncl-6.4.0"
   
4. NCL_SOURCE="${NCARG_ROOT}/source-6.4.0/"  # https://www.earthsystemgrid.org/dataset/ncl.640.src/file/ncl_ncarg-6.4.0.tar.gz
   
5. 
   
6. grep -rin "undef("$1")" "${NCARG_ROOT}/lib/ncarg/nclscripts/"
   
7. 
   
8. wrka=$1
   
9. nl=0
   
10. while [ -n "$wrka" ] && [ $nl -lt 5 ]; do
    
11.   wrkz=$wrka
    
12. #  wrkb=`grep -l ${wrka} "${NCARG_ROOT}"/lib/*`
    
13. #  wrkb=`nm -A --defined-only "${NCARG_ROOT}"/lib/*.a |grep -i "T ${wrka}[_$]"`
    
14.   wrkb=`nm -A --defined-only "${NCARG_ROOT}"/lib/*.a |grep -Ei "T ${wrka}_(W)?$"`
    
15.   echo $wrkb
    
16. #  wrkc=`sed 's?^.*lib\([^/]*\)\.a?\1?' <<< "$wrkb"`
    
17.   wrkc=`sed 's?^[^:]*lib\([^/]*\)\.a:.*$?\1?' <<< "$wrkb"`
    
18.   echo $wrkc
    
19.   wrkd=`find "${NCL_SOURCE}" -name "$wrkc" -type d`
    
20.   echo $wrkd
    
21. #  grep -l ${wrka}_W ${wrkd}/*W.c  # only nfp
    
22.   grep -il ${wrka} ${wrkd}/*
    
23.   #sed -sn "/${wrka}_W/,/NhlErrorTypes/p" ${wrkd}/*W.c |grep NGCALLF
    
24. #  wrka=`sed -sn "/${wrka}_W/,/NhlErrorTypes/s/^\s*NGCALLF(\([a-zA-Z]*\>\).*$/\1/p" ${wrkd}/*W.c`
    
25.   wrka=`sed -sn "/${wrka}_W/,/NhlErrorTypes/s/^\s*NGCALLF(\([a-zA-Z]*\>\).*$/\1/p" ${wrkd}/*`
    
26.   echo $wrka
    
27.   nl=$((nl+1))
    
28. done
    
29. grep -in $wrkz ${wrkd}/*
    
30. 
    
31. # \grep '^syn keyword nclBUILTIN' ~/.vim/syntax/ncl.vim
    
32. #grep "$1" ~/.vim/syntax/ncl.vim | awk '{print $3}'
    
33. 
    

复制代码

效果图1：

效果图2：


这个脚本在公测阶段，欢迎任何建议和反馈～
Enjoy！

packard

吵吵人 发表于 2018-3-27 15:47
请问“新建~/bin/gncl 文件”中的gncl文件后缀是什么，cygwin的新建命令是什么？（纯小白一个，跪谢赐教！ ...

谢谢你对本帖的关注。这个脚本使用了很多Linux Bash的语法和命令，大概是不适用在Cygwin。
如果你非常需要这样的脚本，鼓励你试试按下面的链接安装 Win10（64位）系统下的Linux子系统的ncl。这样的话，应该就跟真正的Linux Bash没有区别了。在Linux系统下，gncl 文件可以不用后缀。
http://bbs.06climate.com/forum.p ... 1&fromuid=87401
但话又说回来，如果还是初学者的话，短期内可能还用不着搜索理解ncl的源代码吧。

weinihou

{:eb502:}{:eb502:}

threedeng

神人啊，必须顶起

zhangqqqf

很不错的东西，谢谢！

打破砂锅纹到底

楼主Powerful！

x6xin

很不错的东西，谢谢！

流浪的心

神人，赞赞赞！

heohd

感谢你的分享，对我有很大帮助

吵吵人

你好，因为我的等级太低，不能发消息，不知道能不能留一个可以联系的方式，指导一二？

吵吵人

请问“新建~/bin/gncl 文件”中的gncl文件后缀是什么，cygwin的新建命令是什么？（纯小白一个，跪谢赐教！）