diff options
| -rw-r--r-- | lua/common.c | 47 |
1 files changed, 47 insertions, 0 deletions
diff --git a/lua/common.c b/lua/common.c index e7368771..e1d3e98b 100644 --- a/lua/common.c +++ b/lua/common.c @@ -1,6 +1,7 @@ #include "nest/bird.h" #include "nest/protocol.h" #include "nest/route.h" +#include "nest/iface.h" #include "conf/conf.h" #include "filter/filter.h" #include "lua.h" @@ -66,6 +67,7 @@ static int luaB_trace(lua_State *L) { } while (0) #define lua_settableaddr(L, idx, val) lua_sett(L, idx, val, addr) +#define lua_settableipaddr(L, idx, val) lua_sett(L, idx, val, ipaddr) #define lua_settablecfunction(L, idx, val) lua_sett(L, idx, val, cfunction) #define lua_settableinteger(L, idx, val) lua_sett(L, idx, val, integer) #define lua_settableip4(L, idx, val) lua_sett(L, idx, val, ip4) @@ -169,6 +171,43 @@ static void lua_pushaddr(lua_State *L, net_addr *addr) { lua_setmetatable(L, -2); } +static int luaB_ipaddr_tostring(lua_State *L) { + int n = lua_gettop(L); + if (n != 1) { + log(L_WARN "__tostring needs exactly 1 argument"); + return 0; + } + + lua_pushliteral(L, "_internal"); + lua_gettable(L, 1); + if (!lua_isuserdata(L, -1)) + luaL_error(L, "fatal: bird internal state not found, type %d", lua_type(L, -1)); + + ip_addr *addr = lua_touserdata(L, -1); + log(L_DEBUG "luaB_ipaddr_tostring %p", addr); + lua_pop(L, 1); + + if (!addr) + return 0; + char c[IPA_MAX_TEXT_LENGTH+1]; + if (ipa_is_ip4(*addr)) + ip4_ntop(ipa_to_ip4(*addr), c); + else + ip6_ntop(ipa_to_ip6(*addr), c); + lua_pushstring(L, c); + return 1; +} + +static void lua_pushipaddr(lua_State *L, ip_addr *addr) { + lua_newtable(L); + lua_settablelightuserdata(L, "_internal", addr); + + lua_newtable(L); + lua_settablecfunction(L, "__tostring", luaB_ipaddr_tostring); + lua_settablecfunction(L, "__concat", luaB_generic_concat); + lua_setmetatable(L, -2); +} + static void lua_pusheattr(lua_State *L, eattr *ea) { /* if (ea->type == EAF_TYPE_IP_ADDRESS) { */ /* lua_settableinteger(L, "data", 17); */ @@ -311,6 +350,14 @@ void luaB_push_route(lua_State *L, struct rte *e) { lua_newtable(L); lua_settablelightuserdata(L, "_internal", e); lua_settableaddr(L, "prefix", e->net->n.addr); + lua_settableipaddr(L, "gw", &e->attrs->nh.gw); + const char *ifname = "<unknown>"; + if (e->attrs->nh.iface) { + ifname = e->attrs->nh.iface->name; + } + lua_pushliteral(L, "ifname"); + lua_pushlstring(L, ifname, strlen(ifname)); + lua_settable(L, -3); lua_settablecfunction(L, "ea_find", luaB_route_ea_find); lua_settablecfunction(L, "ea_set_attr_data", luaB_route_ea_set_attr_data); |