之前编译安装了lua 5.2.2,下面是编译安装LuaSocket库的详细步骤。
下载一个稳定发布版本:
下载 LuaSocket 2.0.2源码:luasocket-2.0.2.tar.gz
$ tar zxvf luasocket-2.0.2
进入目录:luasocket-2.0.2,修改config文件
添加包含文件目录,即lua 5.2.2源码目录,添加如下行:
LUAINC=-I/home/wayz/lua_study/lua-5.2.2/src
修改安装目录如下,即原来lua 5.2.2的安装目录:
INSTALL_TOP_SHARE=/usr/local/share/lua/5.2 INSTALL_TOP_LIB=/usr/local/lib/lua/5.2
这时直接make会报如下的错误:
# make cd src; make all make[1]: 进入目录“/home/wayz/lua_study/luasocket-2.0.2/src” gcc -I/home/wayz/lua_study/lua-5.2.2/src -DLUASOCKET_DEBUG -pedantic -Wall -O2 -fpic -c -o luasocket.o luasocket.c In file included from luasocket.c:31:0: auxiliar.h:38:61: 错误:unknown type name ‘luaL_reg’ luasocket.c:50:1: 错误:unknown type name ‘luaL_reg’ ...... ......
经过2.3.1中的修改确实可以编译安装,但运行时报错如下:
# lua Lua 5.2.2 Copyright (C) 1994-2013 Lua.org, PUC-Rio > require ("socket") error loading module 'socket.core' from file '/usr/local/lib/lua/5.2/socket/core.so': /usr/local/lib/lua/5.2/socket/core.so: undefined symbol: luaL_typerror stack traceback: [C]: in ? [C]: in function 'require' /usr/local/share/lua/5.2/socket.lua:13: in main chunk [C]: in function 'require' stdin:1: in main chunk [C]: in ?
修改src/auxiliar.c文件源码:
将下面的代码:
int auxiliar_checkboolean(lua_State *L, int objidx) { if (!lua_isboolean(L, objidx)) luaL_typerror(L, objidx, lua_typename(L, LUA_TBOOLEAN)); return lua_toboolean(L, objidx); }
int auxiliar_checkboolean(lua_State *L, int objidx) { luaL_checktype(L, objidx, LUA_TBOOLEAN); return lua_toboolean(L, objidx); }
if (!lua_istable(L, 3)) luaL_typerror(L, 3, lua_typename(L, LUA_TTABLE));
luaL_checktype(L, 3, LUA_TTABLE);
修改src/buffer.c 和 src/mime.c文件,将对函数luaL_putchar的使用,改为使用luaL_addlstring函数。
注意两个函数参数的不同。
修改完直接make即可。
运行make install命令进行安装
运行下面的脚本,验证socket库:
#!/usr/bin/lua -- 加载LuaSocket库 --require "socket" local socket = require("socket") host = "www.w3.org" file = "/TR/REC-htm132.html" -- 打开一个TCP连接 c = assert (socket.connect (host, 80)) c:send ("GET " .. file .. " HTTP/1.0\r\n\r\n") while (true) do local s, status, partial = c:receive (2^10) io.write (s or partial) if status == "closed" then break end end c:close ()