免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
123下一页
最近访问板块 发新帖
查看: 6267 | 回复: 24
打印 上一主题 下一主题

如何提取一个c文件中的函数原型 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2009-03-04 16:11 |只看该作者 |倒序浏览
如题,只获得c文件中所有函数原型的列表,比如文件a.c如下
void a()
{
...
}

int b(int)
{
while(true)
{...}
}
bool c(int xxx, char* yyy)
{
...
}

要提取出如下内容:
void a()
int b(int)
bool c(int xxx, char* yyy)

谢谢

论坛徽章:
9
2015亚冠之阿尔纳斯尔
日期:2015-09-10 16:21:162015亚冠之塔什干火车头
日期:2015-07-01 16:23:022015年亚洲杯之巴勒斯坦
日期:2015-04-20 17:19:46子鼠
日期:2014-11-13 09:51:26未羊
日期:2014-08-28 18:13:36技术图书徽章
日期:2014-02-21 09:30:15酉鸡
日期:2014-01-14 11:12:49天蝎座
日期:2013-12-09 17:56:53平安夜徽章
日期:2015-12-26 00:06:30
2 [报告]
发表于 2009-03-04 16:13 |只看该作者
grep

论坛徽章:
0
3 [报告]
发表于 2009-03-04 16:15 |只看该作者
[test@erpdataserver ~]$ sed -n '/^[a-zA-Z]* [a-z]/p' 1              
void a()
int b(int)
bool c(int xxx, char* yyy)

论坛徽章:
0
4 [报告]
发表于 2009-03-04 16:19 |只看该作者

回复 #3 我是DBA 的帖子

那我要是在函数体里面定义变量比如
int a = 10;
不是也会被匹配吗?

论坛徽章:
1
处女座
日期:2014-12-23 17:59:27
5 [报告]
发表于 2009-03-04 16:19 |只看该作者
grep ' [a-z]\+(' urfile

其实主要还是要看样本文件是怎么样的, 方法应该也挺多.

论坛徽章:
0
6 [报告]
发表于 2009-03-04 16:27 |只看该作者

回复 #4 youshuang 的帖子

改一下吧
这样
sed -n '/^[a-zA-Z]* [a-z]*(.*)/p'

论坛徽章:
0
7 [报告]
发表于 2009-03-04 16:31 |只看该作者

回复 #6 我是DBA 的帖子

但是你的方法和前面那个兄弟的都能匹配到如下语句:
  while(a>9)
(有个空格)

论坛徽章:
23
15-16赛季CBA联赛之吉林
日期:2017-12-21 16:39:27白羊座
日期:2014-10-27 11:14:37申猴
日期:2014-10-23 08:36:23金牛座
日期:2014-09-30 08:26:49午马
日期:2014-09-29 09:40:16射手座
日期:2014-11-25 08:56:112015年辞旧岁徽章
日期:2015-03-03 16:54:152015年迎新春徽章
日期:2015-03-04 09:49:0315-16赛季CBA联赛之山东
日期:2017-12-21 16:39:1915-16赛季CBA联赛之广东
日期:2016-01-19 13:33:372015亚冠之山东鲁能
日期:2015-10-13 09:39:062015亚冠之西悉尼流浪者
日期:2015-09-21 08:27:57
8 [报告]
发表于 2009-03-04 16:40 |只看该作者

回复 #7 youshuang 的帖子

try:

awk '/{/{do{i+=gsub("{","");i-=gsub("}","");if(i==0)break}while(getline)}/)/' urfile

论坛徽章:
0
9 [报告]
发表于 2009-03-04 16:46 |只看该作者

回复 #8 ly5066113 的帖子

这个厉害了,不过不明白。。。
谢谢先

论坛徽章:
0
10 [报告]
发表于 2009-03-04 16:47 |只看该作者
sed -nr '/^ *[a-zA-Z]+\s+[^() ]+\([^()]*\)/p' file
这个就是要找到正确的正则表达式,所以要看看运行后还有哪些多匹配了,然后再改正则表达式。
或者用perl 去掉所有的{与}以及多余的空行
perl -e 'local $/;$_=<>;1 while(s/^(.*){[^}]+}(.*)$/$1$2/s || s/\n\n/\n/s);print;' file

[ 本帖最后由 dream3401 于 2009-3-4 17:00 编辑 ]
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP