3 -- This project is MIT/X11 licensed. Please see the
4 -- COPYING file in the source package for more information.
6 -- Copyright (C) 2012 Paul Aurich
7 -- Copyright (C) 2013 Matthew Wild
8 -- Copyright (C) 2013 Florian Zeitz
17 #include <sys/ioctl.h>
18 #include <sys/types.h>
19 #include <sys/socket.h>
22 #include <arpa/inet.h>
23 #include <netinet/in.h>
29 #if (LUA_VERSION_NUM == 501)
30 #define luaL_setfuncs(L, R, N) luaL_register(L, NULL, R)
33 /* Enumerate all locally configured IP addresses */
35 const char* const type_strings[] = {
42 static int lc_local_addresses(lua_State* L) {
44 /* Link-local IPv4 addresses; see RFC 3927 and RFC 5735 */
45 const long ip4_linklocal = htonl(0xa9fe0000); /* 169.254.0.0 */
46 const long ip4_mask = htonl(0xffff0000);
47 struct ifaddrs* addr = NULL, *a;
50 int type = luaL_checkoption(L, 1, "both", type_strings);
51 const char link_local = lua_toboolean(L, 2); /* defaults to 0 (false) */
52 const char ipv4 = (type == 0 || type == 1);
53 const char ipv6 = (type == 0 || type == 2);
57 if(getifaddrs(&addr) < 0) {
59 lua_pushfstring(L, "getifaddrs failed (%d): %s", errno,
69 for(a = addr; a; a = a->ifa_next) {
71 char ipaddr[INET6_ADDRSTRLEN];
72 const char* tmp = NULL;
74 if(a->ifa_addr == NULL || a->ifa_flags & IFF_LOOPBACK) {
78 family = a->ifa_addr->sa_family;
80 if(ipv4 && family == AF_INET) {
81 struct sockaddr_in* sa = (struct sockaddr_in*)a->ifa_addr;
83 if(!link_local && ((sa->sin_addr.s_addr & ip4_mask) == ip4_linklocal)) {
87 tmp = inet_ntop(family, &sa->sin_addr, ipaddr, sizeof(ipaddr));
88 } else if(ipv6 && family == AF_INET6) {
89 struct sockaddr_in6* sa = (struct sockaddr_in6*)a->ifa_addr;
91 if(!link_local && IN6_IS_ADDR_LINKLOCAL(&sa->sin6_addr)) {
95 if(IN6_IS_ADDR_V4MAPPED(&sa->sin6_addr) || IN6_IS_ADDR_V4COMPAT(&sa->sin6_addr)) {
99 tmp = inet_ntop(family, &sa->sin6_addr, ipaddr, sizeof(ipaddr));
103 lua_pushstring(L, tmp);
104 lua_rawseti(L, -2, n++);
107 /* TODO: Error reporting? */
114 lua_pushstring(L, "0.0.0.0");
115 lua_rawseti(L, -2, n++);
119 lua_pushstring(L, "::");
120 lua_rawseti(L, -2, n++);
127 int luaopen_util_net(lua_State* L) {
128 luaL_Reg exports[] = {
129 { "local_addresses", lc_local_addresses },
134 luaL_setfuncs(L, exports, 0);