当前位置: 首页 >> 程序设计 >> Lua 的C接口-解释器源码
 

Lua 的C接口-解释器源码

作者:      来源:blog.csdn.net/nightfallrove     发表时间:2008-05-30     浏览次数:      字号:    

用lua快一年了,因为引擎部分比较少改动,所以一直没用过它的C接口,都是在写脚本。年前看书时写了一个小的demo做学习用,好像当时遇到些困难,但是没有记录下来,几乎都忘了。这里贴点源码出来做备忘吧:)lua的语法还是比较简单,其官网(www.lua.org)上有电子文档(www.lua.org/pil/),看一看就会了。不过学会一门语言的语法跟用好一门语言还是两回事,好在它的源码也不多,多看看源码理解就深了。
首先说我比较讨厌lua的几个地方:
1、把数组和table混在一起,数组可以很方便取得size,而table就只能自己遍历去数。
2、没有continue,经常出现循环里面嵌套N层if。
3、最最无聊的就是变量默认是global的,要显示声明local才是本地变量。
大概就这几个公认的问题了,下面贴代码:)

 

程序实现了一个lua解释器,其实就是读入lua语句然后解释执行,用了readline是为了输入方便。另外启动的时候load了一个叫init.lua的脚本文件,提供了几个api供脚本使用,全部代码如下:(csdn怎么不提供附件功能呢)
main.hpp
#include <unistd.h>
#include 
<sys/param.h>
#include 
<errno.h>
#include 
<stdlib.h>
#include 
<iostream>
#include 
<readline/readline.h>
#include 
<readline/history.h>
#include 
<lua.hpp>

extern lua_State *L; 

bool exelua(const char*);

bool init_script();

int lua_getcwd(lua_State*);
int lua_dir(lua_State*);
void register_api(lua_State*);
void create_table(lua_State*);
main.cpp
#include "main.hpp"

lua_State 
*L; 

int main(int argc, char** argv)

        L 
= luaL_newstate();//创建一个lua运行环境,可以传入一个内存管理参数
        luaL_openlibs(L);//打开常用lib
        
if ( ! init_script() )//load脚本
                
return -1
        register_api(L);//注册api
        create_table(L);//创建一个table
        
char* input = NULL;
        
while(1)
        
{   
                input 
= readline(">>");//提示输入
                
if (input)
                
{   
                        
if ( *input )
                        
{   
                                
if( exelua(input) )//执行输入的语句
                                        add_history(input);//增加到历史命令
                        }
   
                        free(input);
                        input 
= NULL;
                }
   
                
else
                
{   
                        
break;
                }
   
        }
   
        lua_close(L);
        
return 0;
}



bool exelua(const char* line)
{
        
int error = luaL_loadbuffer(L, line, strlen(line), "line"|| lua_pcall(L, 000);//load并执行 
        
if ( error )
        
{   
                std::cerr 
<< lua_tostring(L, -1<< std::endl;
                lua_pop(L, 
1); 
                
return false;
        }
   
        
return true;
}


bool init_script()
{
        
if ( luaL_dofile(L, "init.lua"!= 0 ) 
        
{
                std::cerr 
<< "load init.lua failed ";
                
return false;
        }

        lua_pushnumber(L, 
1);//传入参数
        lua_getglobal(L, 
"__init__");//获取脚本中__init__变量
        
if ( lua_isfunction(L, -1) )//判断__init__是否一个函数
        
{
                
if ( lua_pcall(L, 01, NULL) != 0 )//调用__init__
                
{
                        std::cerr 
<< "call __init__ error ";
                        
return false;
                }

                
int ret = lua_tonumber(L, -1|| lua_toboolean(L, -1);//取得__init__的返回值
                lua_pop(L, 
1);
                
if ( !ret )
                
{
                        std::cerr 
<< "__init__ failed ";
                        
return false;
                }

        }

        
return true;
}
 

[1] [2]

责任编辑 webmaster

 
 
 
 
 
评论更多>>
 
 
 
发表
 
姓名: QQ:
性别: MSN:
E-mail: 主页:
评分: 1 2 3 4 5
评论内容:
验证码:
  
  • 请遵守《互联网电子公告服务管理规定》及中华人民共和国其他各项有关法律法规。
  • 严禁发表危害国家安全、损害国家利益、破坏民族团结、破坏国家宗教政策、破坏社会稳定、侮辱、诽谤、教唆、淫秽等内容的评论 。
  • 用户需对自己在使用本站服务过程中的行为承担法律责任(直接或间接导致的)。
  • 本站管理员有权保留或删除评论内容。
  • 评论内容只代表网友个人观点,与本网站立场无关。
  •