brejela
/
lua-zmq
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use opaque struct types instead of 'void *'.

Browse Source
pull/10/head
Robert G. Jakabosky 15 years ago
parent f17bf0a4b3
commit ec8409ffeb
7 changed files with 88 additions and 103 deletions
Show Stats Download Patch File Download Diff File

8
src/ctx.nobj.lua
Unescape Escape View File

@ -20,12 +20,8 @@
object "ZMQ_Ctx" { object "ZMQ_Ctx" {
error_on_null = "get_zmq_strerror()", error_on_null = "get_zmq_strerror()",
ffi_cdef [[
typedef void * ZMQ_Ctx;
]],
c_source [[ c_source [[
typedef void * ZMQ_Ctx; typedef struct ZMQ_Ctx ZMQ_Ctx;
]], ]],
destructor "term" { destructor "term" {
c_method_call "ZMQ_Error" "zmq_term" {} c_method_call "ZMQ_Error" "zmq_term" {}
@ -37,7 +33,7 @@ typedef void * ZMQ_Ctx;
]] ]]
}, },
method "socket" { method "socket" {
c_method_call "!ZMQ_Socket" "zmq_socket" { "int", "type"} c_method_call "!ZMQ_Socket *" "zmq_socket" { "int", "type"}
}, },
} }

4
src/msg.nobj.lua
Unescape Escape View File

@ -26,13 +26,13 @@ object "zmq_msg_t" {
-- --
ffi_cdef[[ ffi_cdef[[
typedef struct zmq_msg_t struct zmq_msg_t
{ {
void *content; void *content;
unsigned char flags; unsigned char flags;
unsigned char vsm_size; unsigned char vsm_size;
unsigned char vsm_data [30]; /* that '30' is from 'MAX_VSM_SIZE' */ unsigned char vsm_data [30]; /* that '30' is from 'MAX_VSM_SIZE' */
} zmq_msg_t; };
typedef void (zmq_free_fn) (void *data, void *hint); typedef void (zmq_free_fn) (void *data, void *hint);

9
src/poller.nobj.lua
Unescape Escape View File

@ -19,13 +19,13 @@
-- THE SOFTWARE. -- THE SOFTWARE.
local ZMQ_Poller_type = [[ local ZMQ_Poller_type = [[
typedef struct ZMQ_Poller { struct ZMQ_Poller {
zmq_pollitem_t *items; zmq_pollitem_t *items;
int next; int next;
int count; int count;
int free_list; int free_list;
int len; int len;
} ZMQ_Poller; };
]] ]]
object "ZMQ_Poller" { object "ZMQ_Poller" {
@ -33,6 +33,9 @@ object "ZMQ_Poller" {
userdata_type = "embed", userdata_type = "embed",
c_source(ZMQ_Poller_type), c_source(ZMQ_Poller_type),
c_source[[ c_source[[
typedef struct ZMQ_Poller ZMQ_Poller;
#define FREE_ITEM_EVENTS_TAG ((short)0xFFFF) #define FREE_ITEM_EVENTS_TAG ((short)0xFFFF)
#define ITEM_TO_INDEX(items, item) (item - (items)) #define ITEM_TO_INDEX(items, item) (item - (items))
@ -203,7 +206,7 @@ static int poller_poll(ZMQ_Poller *this, long timeout) {
ffi_cdef[[ ffi_cdef[[
typedef int socket_t; typedef int socket_t;
typedef struct zmq_pollitem_t { typedef struct zmq_pollitem_t {
ZMQ_Socket socket; ZMQ_Socket *socket;
socket_t fd; socket_t fd;
short events; short events;
short revents; short revents;

134
src/pre_generated-zmq.nobj.c
Unescape Escape View File

@ -894,18 +894,27 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"end\n" "end\n"
"\n" "\n"
"ffi.cdef[[\n" "ffi.cdef[[\n"
"typedef struct zmq_msg_t zmq_msg_t;\n"
"typedef struct ZMQ_Socket ZMQ_Socket;\n"
"typedef struct ZMQ_Poller ZMQ_Poller;\n"
"typedef struct ZMQ_Ctx ZMQ_Ctx;\n"
"typedef struct ZMQ_StopWatch ZMQ_StopWatch;\n"
"\n"
"]]\n"
"\n"
"ffi.cdef[[\n"
"typedef const char * (*get_zmq_strerror_func)();\n" "typedef const char * (*get_zmq_strerror_func)();\n"
"\n" "\n"
"typedef int ZMQ_Error;\n" "typedef int ZMQ_Error;\n"
"\n" "\n"
"\n" "\n"
"typedef struct zmq_msg_t\n" "struct zmq_msg_t\n"
"{\n" "{\n"
" void *content;\n" " void *content;\n"
" unsigned char flags;\n" " unsigned char flags;\n"
" unsigned char vsm_size;\n" " unsigned char vsm_size;\n"
" unsigned char vsm_data [30]; /* that '30' is from 'MAX_VSM_SIZE' */\n" " unsigned char vsm_data [30]; /* that '30' is from 'MAX_VSM_SIZE' */\n"
"} zmq_msg_t;\n" "};\n"
"\n" "\n"
"typedef void (zmq_free_fn) (void *data, void *hint);\n" "typedef void (zmq_free_fn) (void *data, void *hint);\n"
"\n" "\n"
@ -926,8 +935,6 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"\n" "\n"
"size_t zmq_msg_size(zmq_msg_t * this);\n" "size_t zmq_msg_size(zmq_msg_t * this);\n"
"\n" "\n"
"typedef void * ZMQ_Socket;\n"
"\n"
"ZMQ_Error zmq_close(ZMQ_Socket * this);\n" "ZMQ_Error zmq_close(ZMQ_Socket * this);\n"
"\n" "\n"
"ZMQ_Error zmq_bind(ZMQ_Socket * this, const char * addr);\n" "ZMQ_Error zmq_bind(ZMQ_Socket * this, const char * addr);\n"
@ -939,13 +946,13 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"\n" "\n"
"ZMQ_Error zmq_send(ZMQ_Socket * this, zmq_msg_t * msg, int flags);\n" "ZMQ_Error zmq_send(ZMQ_Socket * this, zmq_msg_t * msg, int flags);\n"
"\n" "\n"
"typedef ZMQ_Error (*simple_zmq_send_func)(ZMQ_Socket sock, const char *data, size_t data_len, int flags);\n" "typedef ZMQ_Error (*simple_zmq_send_func)(ZMQ_Socket *sock, const char *data, size_t data_len, int flags);\n"
"\n" "\n"
"ZMQ_Error zmq_recv(ZMQ_Socket * this, zmq_msg_t * msg, int flags);\n" "ZMQ_Error zmq_recv(ZMQ_Socket * this, zmq_msg_t * msg, int flags);\n"
"\n" "\n"
"typedef int socket_t;\n" "typedef int socket_t;\n"
"typedef struct zmq_pollitem_t {\n" "typedef struct zmq_pollitem_t {\n"
" ZMQ_Socket socket;\n" " ZMQ_Socket *socket;\n"
" socket_t fd;\n" " socket_t fd;\n"
" short events;\n" " short events;\n"
" short revents;\n" " short revents;\n"
@ -953,13 +960,13 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"\n" "\n"
"int zmq_poll(zmq_pollitem_t *items, int nitems, long timeout);\n" "int zmq_poll(zmq_pollitem_t *items, int nitems, long timeout);\n"
"\n" "\n"
"typedef struct ZMQ_Poller {\n" "struct ZMQ_Poller {\n"
" zmq_pollitem_t *items;\n" " zmq_pollitem_t *items;\n"
" int next;\n" " int next;\n"
" int count;\n" " int count;\n"
" int free_list;\n" " int free_list;\n"
" int len;\n" " int len;\n"
"} ZMQ_Poller;\n" "};\n"
"\n" "\n"
"typedef int (*poller_find_sock_item_func)(ZMQ_Poller *this, ZMQ_Socket *sock);\n" "typedef int (*poller_find_sock_item_func)(ZMQ_Poller *this, ZMQ_Socket *sock);\n"
"\n" "\n"
@ -971,29 +978,38 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"\n" "\n"
"typedef void (*poller_remove_item_func)(ZMQ_Poller *this, int idx);\n" "typedef void (*poller_remove_item_func)(ZMQ_Poller *this, int idx);\n"
"\n" "\n"
"typedef void * ZMQ_Ctx;\n"
"\n"
"ZMQ_Error zmq_term(ZMQ_Ctx * this);\n" "ZMQ_Error zmq_term(ZMQ_Ctx * this);\n"
"\n" "\n"
"ZMQ_Socket zmq_socket(ZMQ_Ctx * this, int type);\n" "ZMQ_Socket * zmq_socket(ZMQ_Ctx * this, int type);\n"
"\n"
"typedef void * ZMQ_StopWatch;\n"
"\n" "\n"
"unsigned long zmq_stopwatch_stop (ZMQ_StopWatch watch_);\n" "ZMQ_StopWatch * zmq_stopwatch_start();\n"
"\n" "\n"
"ZMQ_StopWatch zmq_stopwatch_start();\n" "unsigned long zmq_stopwatch_stop(ZMQ_StopWatch * this);\n"
"\n" "\n"
"ZMQ_Ctx zmq_init(int io_threads);\n" "ZMQ_Ctx * zmq_init(int io_threads);\n"
"\n" "\n"
"ZMQ_Error zmq_device(int device, ZMQ_Socket insock, ZMQ_Socket outsock);\n" "ZMQ_Error zmq_device(int device, ZMQ_Socket * insock, ZMQ_Socket * outsock);\n"
"\n" "\n"
"ZMQ_StopWatch zmq_stopwatch_start();\n" "ZMQ_StopWatch * zmq_stopwatch_start();\n"
"\n" "\n"
"void zmq_sleep(int seconds_);\n" "void zmq_sleep(int seconds_);\n"
"\n" "\n"
"\n" "\n"
"]]\n" "]]\n"
"\n" "\n"
"local _pub = {}\n"
"local _meth = {}\n"
"for obj_name,mt in pairs(_priv) do\n"
" if type(mt) == 'table' and mt.__index then\n"
" _meth[obj_name] = mt.__index\n"
" end\n"
"end\n"
"_pub.zmq = _M\n"
"for obj_name,pub in pairs(_M) do\n"
" _pub[obj_name] = pub\n"
"end\n"
"\n"
"\n"
"local obj_type_zmq_msg_t_check\n" "local obj_type_zmq_msg_t_check\n"
"local obj_type_zmq_msg_t_delete\n" "local obj_type_zmq_msg_t_delete\n"
"local obj_type_zmq_msg_t_push\n" "local obj_type_zmq_msg_t_push\n"
@ -1154,26 +1170,25 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"end)()\n" "end)()\n"
"\n" "\n"
"\n" "\n"
"local _pub = {}\n" "local get_zmq_strerror = ffi.new(\"get_zmq_strerror_func\", _priv[\"get_zmq_strerror\"])\n"
"local _meth = {}\n"
"for obj_name,mt in pairs(_priv) do\n"
" if type(mt) == 'table' and mt.__index then\n"
" _meth[obj_name] = mt.__index\n"
" end\n"
"end\n"
"_pub.zmq = _M\n"
"for obj_name,pub in pairs(_M) do\n"
" _pub[obj_name] = pub\n"
"end\n"
"\n" "\n"
"local simple_zmq_send = ffi.new(\"simple_zmq_send_func\", _priv[\"simple_zmq_send\"])\n"
"\n"
"local poller_find_sock_item = ffi.new(\"poller_find_sock_item_func\", _priv[\"poller_find_sock_item\"])\n"
"\n"
"local poller_find_fd_item = ffi.new(\"poller_find_fd_item_func\", _priv[\"poller_find_fd_item\"])\n"
"\n"
"local poller_get_free_item = ffi.new(\"poller_get_free_item_func\", _priv[\"poller_get_free_item\"])\n"
"\n"
"local poller_poll = ffi.new(\"poller_poll_func\", _priv[\"poller_poll\"])\n"
"\n"
"local poller_remove_item = ffi.new(\"poller_remove_item_func\", _priv[\"poller_remove_item\"])\n"
"\n" "\n"
"local os_lib_table = {\n" "local os_lib_table = {\n"
" [\"Windows\"] = \"libzmq\",\n" " [\"Windows\"] = \"libzmq\",\n"
"}\n" "}\n"
"local C = ffi.load(os_lib_table[ffi.os] or \"zmq\")\n" "local C = ffi.load(os_lib_table[ffi.os] or \"zmq\")\n"
"\n" "\n"
"local get_zmq_strerror = ffi.new(\"get_zmq_strerror_func\", _priv[\"get_zmq_strerror\"])\n"
"\n"
"local C_get_zmq_strerror = get_zmq_strerror\n" "local C_get_zmq_strerror = get_zmq_strerror\n"
"-- make nicer wrapper for exported error function.\n" "-- make nicer wrapper for exported error function.\n"
"local function get_zmq_strerror()\n" "local function get_zmq_strerror()\n"
@ -1531,8 +1546,6 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
" return rc_zmq_send, rc_zmq_send_err\n" " return rc_zmq_send, rc_zmq_send_err\n"
"end\n" "end\n"
"\n" "\n"
"local simple_zmq_send = ffi.new(\"simple_zmq_send_func\", _priv[\"simple_zmq_send\"])\n"
"\n"
"-- method: send\n" "-- method: send\n"
"function _meth.ZMQ_Socket.send(self, data, flags)\n" "function _meth.ZMQ_Socket.send(self, data, flags)\n"
" local this = obj_type_ZMQ_Socket_check(self)\n" " local this = obj_type_ZMQ_Socket_check(self)\n"
@ -1610,16 +1623,6 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"\n" "\n"
"\n" "\n"
"-- Start \"ZMQ_Poller\" FFI interface\n" "-- Start \"ZMQ_Poller\" FFI interface\n"
"local poller_find_sock_item = ffi.new(\"poller_find_sock_item_func\", _priv[\"poller_find_sock_item\"])\n"
"\n"
"local poller_find_fd_item = ffi.new(\"poller_find_fd_item_func\", _priv[\"poller_find_fd_item\"])\n"
"\n"
"local poller_get_free_item = ffi.new(\"poller_get_free_item_func\", _priv[\"poller_get_free_item\"])\n"
"\n"
"local poller_poll = ffi.new(\"poller_poll_func\", _priv[\"poller_poll\"])\n"
"\n"
"local poller_remove_item = ffi.new(\"poller_remove_item_func\", _priv[\"poller_remove_item\"])\n"
"\n"
"-- method: poll\n" "-- method: poll\n"
"function _meth.ZMQ_Poller.poll(self, timeout)\n" "function _meth.ZMQ_Poller.poll(self, timeout)\n"
" local this = obj_type_ZMQ_Poller_check(self)\n" " local this = obj_type_ZMQ_Poller_check(self)\n"
@ -1738,11 +1741,9 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
"function _pub.ZMQ_StopWatch.start()\n" "function _pub.ZMQ_StopWatch.start()\n"
" local this_flags = OBJ_UDATA_FLAG_OWN\n" " local this_flags = OBJ_UDATA_FLAG_OWN\n"
" local this\n" " local this\n"
" local rc_zmq_stopwatch_start\n" " this = C.zmq_stopwatch_start()\n"
" rc_zmq_stopwatch_start = C.zmq_stopwatch_start()\n"
" this = obj_type_ZMQ_StopWatch_push(this, this_flags)\n" " this = obj_type_ZMQ_StopWatch_push(this, this_flags)\n"
" rc_zmq_stopwatch_start = obj_type_ZMQ_StopWatch_push(rc_zmq_stopwatch_start, 0)\n" " return this\n"
" return this, rc_zmq_stopwatch_start\n"
"end\n" "end\n"
"\n" "\n"
"-- method: stop\n" "-- method: stop\n"
@ -1750,9 +1751,8 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
" local this,this_flags = obj_type_ZMQ_StopWatch_delete(self)\n" " local this,this_flags = obj_type_ZMQ_StopWatch_delete(self)\n"
" if(band(this_flags,OBJ_UDATA_FLAG_OWN) == 0) then return end\n" " if(band(this_flags,OBJ_UDATA_FLAG_OWN) == 0) then return end\n"
" local usecs\n" " local usecs\n"
" usecs = tonumber(C.zmq_stopwatch_stop(this))\n" " usecs = C.zmq_stopwatch_stop(this)\n"
"\n" " usecs = tonumber(usecs)\n"
" usecs = usecs\n"
" return usecs\n" " return usecs\n"
"end\n" "end\n"
"\n" "\n"
@ -1844,7 +1844,7 @@ static const char zmq_ffi_lua_code[] = "local error = error\n"
#error "Your version of ZeroMQ is too old. Please upgrade to version 2.1 or to the latest 2.0.x" #error "Your version of ZeroMQ is too old. Please upgrade to version 2.1 or to the latest 2.0.x"
#endif #endif
typedef void * ZMQ_Socket; typedef struct ZMQ_Socket ZMQ_Socket;
#ifdef _WIN32 #ifdef _WIN32
#include <winsock2.h> #include <winsock2.h>
@ -1894,7 +1894,7 @@ static const int opt_types[] = {
#endif #endif
static ZMQ_Error simple_zmq_send(ZMQ_Socket sock, const char *data, size_t data_len, int flags) { static ZMQ_Error simple_zmq_send(ZMQ_Socket *sock, const char *data, size_t data_len, int flags) {
ZMQ_Error err; ZMQ_Error err;
zmq_msg_t msg; zmq_msg_t msg;
/* initialize message */ /* initialize message */
@ -1910,13 +1910,16 @@ static ZMQ_Error simple_zmq_send(ZMQ_Socket sock, const char *data, size_t data_
return err; return err;
} }
typedef struct ZMQ_Poller { struct ZMQ_Poller {
zmq_pollitem_t *items; zmq_pollitem_t *items;
int next; int next;
int count; int count;
int free_list; int free_list;
int len; int len;
} ZMQ_Poller; };
typedef struct ZMQ_Poller ZMQ_Poller;
#define FREE_ITEM_EVENTS_TAG ((short)0xFFFF) #define FREE_ITEM_EVENTS_TAG ((short)0xFFFF)
@ -2082,9 +2085,9 @@ static int poller_poll(ZMQ_Poller *this, long timeout) {
} }
typedef void * ZMQ_Ctx; typedef struct ZMQ_Ctx ZMQ_Ctx;
typedef void * ZMQ_StopWatch; typedef struct ZMQ_StopWatch ZMQ_StopWatch;
/* /*
* This wrapper function is to make the EAGAIN/ETERM error messages more like * This wrapper function is to make the EAGAIN/ETERM error messages more like
@ -2883,7 +2886,7 @@ static int ZMQ_Ctx__socket__meth(lua_State *L) {
ZMQ_Ctx * this = obj_type_ZMQ_Ctx_check(L,1); ZMQ_Ctx * this = obj_type_ZMQ_Ctx_check(L,1);
int type = luaL_checkinteger(L,2); int type = luaL_checkinteger(L,2);
int rc_zmq_socket_flags = OBJ_UDATA_FLAG_OWN; int rc_zmq_socket_flags = OBJ_UDATA_FLAG_OWN;
ZMQ_Socket rc_zmq_socket; ZMQ_Socket * rc_zmq_socket;
rc_zmq_socket = zmq_socket(this, type); rc_zmq_socket = zmq_socket(this, type);
if((NULL == rc_zmq_socket)) { if((NULL == rc_zmq_socket)) {
lua_pushnil(L); lua_pushnil(L);
@ -2898,11 +2901,9 @@ static int ZMQ_Ctx__socket__meth(lua_State *L) {
static int ZMQ_StopWatch__start__meth(lua_State *L) { static int ZMQ_StopWatch__start__meth(lua_State *L) {
int this_flags = OBJ_UDATA_FLAG_OWN; int this_flags = OBJ_UDATA_FLAG_OWN;
ZMQ_StopWatch * this; ZMQ_StopWatch * this;
ZMQ_StopWatch rc_zmq_stopwatch_start; this = zmq_stopwatch_start();
rc_zmq_stopwatch_start = zmq_stopwatch_start();
obj_type_ZMQ_StopWatch_push(L, this, this_flags); obj_type_ZMQ_StopWatch_push(L, this, this_flags);
obj_type_ZMQ_StopWatch_push(L, rc_zmq_stopwatch_start, 0); return 1;
return 2;
} }
/* method: stop */ /* method: stop */
@ -2912,7 +2913,6 @@ static int ZMQ_StopWatch__stop__meth(lua_State *L) {
unsigned long usecs = 0; unsigned long usecs = 0;
if(!(this_flags & OBJ_UDATA_FLAG_OWN)) { return 0; } if(!(this_flags & OBJ_UDATA_FLAG_OWN)) { return 0; }
usecs = zmq_stopwatch_stop(this); usecs = zmq_stopwatch_stop(this);
lua_pushinteger(L, usecs); lua_pushinteger(L, usecs);
return 1; return 1;
} }
@ -2938,7 +2938,7 @@ static int zmq__version__func(lua_State *L) {
static int zmq__init__func(lua_State *L) { static int zmq__init__func(lua_State *L) {
int io_threads = luaL_checkinteger(L,1); int io_threads = luaL_checkinteger(L,1);
int rc_zmq_init_flags = OBJ_UDATA_FLAG_OWN; int rc_zmq_init_flags = OBJ_UDATA_FLAG_OWN;
ZMQ_Ctx rc_zmq_init; ZMQ_Ctx * rc_zmq_init;
rc_zmq_init = zmq_init(io_threads); rc_zmq_init = zmq_init(io_threads);
if((NULL == rc_zmq_init)) { if((NULL == rc_zmq_init)) {
lua_pushnil(L); lua_pushnil(L);
@ -2951,7 +2951,7 @@ static int zmq__init__func(lua_State *L) {
/* method: init_ctx */ /* method: init_ctx */
static int zmq__init_ctx__func(lua_State *L) { static int zmq__init_ctx__func(lua_State *L) {
ZMQ_Ctx ctx; ZMQ_Ctx * ctx;
if(lua_isuserdata(L, 1)) { if(lua_isuserdata(L, 1)) {
ctx = lua_touserdata(L, 1); ctx = lua_touserdata(L, 1);
} else { } else {
@ -2970,8 +2970,8 @@ static int zmq__init_ctx__func(lua_State *L) {
/* method: device */ /* method: device */
static int zmq__device__func(lua_State *L) { static int zmq__device__func(lua_State *L) {
int device = luaL_checkinteger(L,1); int device = luaL_checkinteger(L,1);
ZMQ_Socket insock = obj_type_ZMQ_Socket_check(L,2); ZMQ_Socket * insock = obj_type_ZMQ_Socket_check(L,2);
ZMQ_Socket outsock = obj_type_ZMQ_Socket_check(L,3); ZMQ_Socket * outsock = obj_type_ZMQ_Socket_check(L,3);
ZMQ_Error rc_zmq_device = 0; ZMQ_Error rc_zmq_device = 0;
rc_zmq_device = zmq_device(device, insock, outsock); rc_zmq_device = zmq_device(device, insock, outsock);
/* check for error. */ /* check for error. */
@ -2988,7 +2988,7 @@ static int zmq__device__func(lua_State *L) {
/* method: stopwatch_start */ /* method: stopwatch_start */
static int zmq__stopwatch_start__func(lua_State *L) { static int zmq__stopwatch_start__func(lua_State *L) {
int rc_zmq_stopwatch_start_flags = OBJ_UDATA_FLAG_OWN; int rc_zmq_stopwatch_start_flags = OBJ_UDATA_FLAG_OWN;
ZMQ_StopWatch rc_zmq_stopwatch_start; ZMQ_StopWatch * rc_zmq_stopwatch_start;
rc_zmq_stopwatch_start = zmq_stopwatch_start(); rc_zmq_stopwatch_start = zmq_stopwatch_start();
obj_type_ZMQ_StopWatch_push(L, rc_zmq_stopwatch_start, rc_zmq_stopwatch_start_flags); obj_type_ZMQ_StopWatch_push(L, rc_zmq_stopwatch_start, rc_zmq_stopwatch_start_flags);
return 1; return 1;

9
src/socket.nobj.lua
Unescape Escape View File

@ -20,9 +20,6 @@
object "ZMQ_Socket" { object "ZMQ_Socket" {
error_on_null = "get_zmq_strerror()", error_on_null = "get_zmq_strerror()",
ffi_cdef[[
typedef void * ZMQ_Socket;
]],
c_source [[ c_source [[
/* detect zmq version >= 2.1.0 */ /* detect zmq version >= 2.1.0 */
#define VERSION_2_1 0 #define VERSION_2_1 0
@ -38,7 +35,7 @@ typedef void * ZMQ_Socket;
#error "Your version of ZeroMQ is too old. Please upgrade to version 2.1 or to the latest 2.0.x" #error "Your version of ZeroMQ is too old. Please upgrade to version 2.1 or to the latest 2.0.x"
#endif #endif
typedef void * ZMQ_Socket; typedef struct ZMQ_Socket ZMQ_Socket;
#ifdef _WIN32 #ifdef _WIN32
#include <winsock2.h> #include <winsock2.h>
@ -347,7 +344,7 @@ local ZMQ_EVENTS = _M.EVENTS
}, },
-- create helper function for `zmq_send` -- create helper function for `zmq_send`
c_source[[ c_source[[
static ZMQ_Error simple_zmq_send(ZMQ_Socket sock, const char *data, size_t data_len, int flags) { static ZMQ_Error simple_zmq_send(ZMQ_Socket *sock, const char *data, size_t data_len, int flags) {
ZMQ_Error err; ZMQ_Error err;
zmq_msg_t msg; zmq_msg_t msg;
/* initialize message */ /* initialize message */
@ -365,7 +362,7 @@ static ZMQ_Error simple_zmq_send(ZMQ_Socket sock, const char *data, size_t data_
]], ]],
-- export helper function. -- export helper function.
ffi_export_function "ZMQ_Error" "simple_zmq_send" ffi_export_function "ZMQ_Error" "simple_zmq_send"
"(ZMQ_Socket sock, const char *data, size_t data_len, int flags)", "(ZMQ_Socket *sock, const char *data, size_t data_len, int flags)",
method "send" { method "send" {
var_in{ "const char *", "data" }, var_in{ "const char *", "data" },
var_in{ "int", "flags?" }, var_in{ "int", "flags?" },

17
src/stopwatch.nobj.lua
Unescape Escape View File

@ -20,25 +20,14 @@
object "ZMQ_StopWatch" { object "ZMQ_StopWatch" {
include "zmq_utils.h", include "zmq_utils.h",
ffi_cdef[[
typedef void * ZMQ_StopWatch;
unsigned long zmq_stopwatch_stop (ZMQ_StopWatch watch_);
]],
c_source[[ c_source[[
typedef void * ZMQ_StopWatch; typedef struct ZMQ_StopWatch ZMQ_StopWatch;
]], ]],
constructor "start" { constructor "start" {
c_call "ZMQ_StopWatch" "zmq_stopwatch_start" {}, c_call "ZMQ_StopWatch *" "zmq_stopwatch_start" {},
}, },
destructor "stop" { destructor "stop" {
var_out{ "unsigned long", "usecs" }, c_method_call { "unsigned long", "usecs", ffi_wrap = 'tonumber' } "zmq_stopwatch_stop" {},
c_source[[
${usecs} = zmq_stopwatch_stop(${this});
]],
ffi_source[[
${usecs} = tonumber(C.zmq_stopwatch_stop(${this}))
]],
}, },
} }

8
zmq.nobj.lua
Unescape Escape View File

@ -159,11 +159,11 @@ c_function "version" {
]], ]],
}, },
c_function "init" { c_function "init" {
c_call "!ZMQ_Ctx" "zmq_init" { "int", "io_threads" }, c_call "!ZMQ_Ctx *" "zmq_init" { "int", "io_threads" },
}, },
c_function "init_ctx" { c_function "init_ctx" {
var_in{ "<any>", "ptr" }, var_in{ "<any>", "ptr" },
var_out{ "ZMQ_Ctx", "ctx" }, var_out{ "ZMQ_Ctx *", "ctx" },
c_source[[ c_source[[
if(lua_isuserdata(L, ${ptr::idx})) { if(lua_isuserdata(L, ${ptr::idx})) {
${ctx} = lua_touserdata(L, ${ptr::idx}); ${ctx} = lua_touserdata(L, ${ptr::idx});
@ -184,7 +184,7 @@ c_function "init_ctx" {
}, },
c_function "device" { c_function "device" {
c_call "ZMQ_Error" "zmq_device" c_call "ZMQ_Error" "zmq_device"
{ "int", "device", "ZMQ_Socket", "insock", "ZMQ_Socket", "outsock" }, { "int", "device", "ZMQ_Socket *", "insock", "ZMQ_Socket *", "outsock" },
}, },
-- --
@ -192,7 +192,7 @@ c_function "device" {
-- --
include "zmq_utils.h", include "zmq_utils.h",
c_function "stopwatch_start" { c_function "stopwatch_start" {
c_call "!ZMQ_StopWatch" "zmq_stopwatch_start" {}, c_call "!ZMQ_StopWatch *" "zmq_stopwatch_start" {},
}, },
c_function "sleep" { c_function "sleep" {
c_call "void" "zmq_sleep" { "int", "seconds_" }, c_call "void" "zmq_sleep" { "int", "seconds_" },

Write Preview
Loading…
Cancel
Save