• 设为首页
  • 点击收藏
  • 手机版
    手机扫一扫访问
    迪恩网络手机版
  • 关注官方公众号
    微信扫一扫关注
    公众号

C 可变长参数运用-----编写Lua的通用调用函数

原作者: [db:作者] 来自: [db:来源] 收藏 邀请

1.C可变长参数

printf这个使用频繁的C语言函数的参数列表包含一个const char*的描述串,还有一个可变长参数(...) ,如下为printf的函数声明。

int printf(const char * __restrict, ...)

在stdarg.h这个头文件中包含着对可变长参数进行操作的一些宏(x86平台为例): 

#define va_start(ap,v)( ap = (va_list)&v + _INTSIZEOF(v) )

#define va_arg(ap,t) ( *(t *)((ap += _INTSIZEOF(t)) - _INTSIZEOF(t)) )

#define va_end(ap) ( ap = (va_list)0 ) 

其中运行va_start(ap, v)可以使得ap指向可变长参数列表的第一个参数的地址。其中v为最后一个固定参数。

va_arg(ap,T)使ap指向可变长参数列表的下一个参数,并且用输入的类型T进行数据强转换,返回一个用户需要的参数值。

va_end(ap),置ap为NULL。

详细的可变长参数解释请参见这个博客:imjacob的专栏——c语言中的printf实现

 

2.C语言对Lua的通用调用函数

 1 #include <stdarg.h>
 2 
 3 void call_va(const char * func,const char *sig,...)
 4 {
 5     va_list vl;//定义一个可变长参数指针,无初始值
 6     int narg;//可变长参数的数量
 7     int nres;//Lua函数返回值的数量
 8 
 9     va_start(vl,sig);//让指针指向可变长参数的第一个参数首地址
10     lua_getglobal(L,func);//函数入栈
11 
12     //---参数入栈
13     for(narg=0;*sig;narg++)//遍历参数
14     {
15         //检查栈中空间
16         luaL_checkstack(L,1,"too many arguments");
17 
18         switch(*sig++)
19         {
20             //根据参数的约束符,按类型入栈,d-double i-int s-char*
21             case 'd':
22             lua_pushnumber(L,va_arg(vl,double));
23             break;
24             case 'i':
25             lua_pushinteger(L,va_arg(vl,int));
26             break;
27             case 's':
28             lua_pushstring(L,va_arg(vl,char*));
29             break;
30             case '>':
31             //输入参数结束
32             goto endargs;
33             default:
34             error(L,"invalid option (%c)",*(sig-1));
35         }
36     }
37     //---参数入栈
38     endargs:
39     nres=strlen(sig);//期望的Lua函数返回值数量
40 
41     //调用Lua函数
42     if(lua_pcall(L,narg,nres,0)!=0)
43     {
44         error(L,"error calling '%s':%s",func,lua_tostring(L,-1));
45     }
46 
47     //调用之后的返回值检索
48     //栈索引从栈顶往下依次是-1,-2,-3,所以第一个结果的栈索引是-nres
49     nres=-nres;
50     while(*sig)
51     {
52         //依次得到返回值的类型描述符 *sig
53         switch(*sig++)
54         {
55             case 'd':
56             if(!lua_isnumber(L,nres))
57                 error(L,"wrong result type");
58             *va_arg(vl,double*)=lua_tonumber(L,nres);
59             break;
60 
61             case 'i':
62             if(!lua_isnumber(L,nres))
63                 error(L,"wrong result type");
64             *va_arg(vl,int*)=lua_tointeger(L,nres);
65             break;
66 
67             case 's':
68             if(!lua_isstring(L,nres))
69                 error(L,"wrong result type");
70             *va_arg(vl,const char**)=lua_tostring(L,nres);
71             break;
72 
73             default:
74             error(L,"invalid option (%c)",*(sig-1));
75         }
76         //结果的参数索引+1
77         nres++;
78     }
79     va_end(vl);
80 
81 }

 

这样,如果我们需要调用一个lua函数,只需要如下的调用形式:

call_va("func","dd>ds",x,y,&z,&s); 

表示这个lua函数的函数名为func,接受两个double,返回一个double和一个字符串,'>'表示参数和返回值结果的分割符。


鲜花

握手

雷人

路过

鸡蛋
该文章已有0人参与评论

请发表评论

全部评论

专题导读
上一篇:
lua_string_pattern发布时间:2022-07-22
下一篇:
Lua服务器与客户端实例发布时间:2022-07-22
热门推荐
热门话题
阅读排行榜

扫描微信二维码

查看手机版网站

随时了解更新最新资讯

139-2527-9053

在线客服(服务时间 9:00~18:00)

在线QQ客服
地址:深圳市南山区西丽大学城创智工业园
电邮:jeky_zhao#qq.com
移动电话:139-2527-9053

Powered by 互联科技 X3.4© 2001-2213 极客世界.|Sitemap