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 /* Enumerate all locally configured IP addresses */
31 const char * const type_strings[] = {
38 static int lc_local_addresses(lua_State *L)
41 /* Link-local IPv4 addresses; see RFC 3927 and RFC 5735 */
42 const long ip4_linklocal = htonl(0xa9fe0000); /* 169.254.0.0 */
43 const long ip4_mask = htonl(0xffff0000);
44 struct ifaddrs *addr = NULL, *a;
47 int type = luaL_checkoption(L, 1, "both", type_strings);
48 const char link_local = lua_toboolean(L, 2); /* defaults to 0 (false) */
49 const char ipv4 = (type == 0 || type == 1);
50 const char ipv6 = (type == 0 || type == 2);
53 if (getifaddrs(&addr) < 0) {
55 lua_pushfstring(L, "getifaddrs failed (%d): %s", errno,
63 for (a = addr; a; a = a->ifa_next) {
65 char ipaddr[INET6_ADDRSTRLEN];
66 const char *tmp = NULL;
68 if (a->ifa_addr == NULL || a->ifa_flags & IFF_LOOPBACK)
71 family = a->ifa_addr->sa_family;
73 if (ipv4 && family == AF_INET) {
74 struct sockaddr_in *sa = (struct sockaddr_in *)a->ifa_addr;
75 if (!link_local &&((sa->sin_addr.s_addr & ip4_mask) == ip4_linklocal))
77 tmp = inet_ntop(family, &sa->sin_addr, ipaddr, sizeof(ipaddr));
78 } else if (ipv6 && family == AF_INET6) {
79 struct sockaddr_in6 *sa = (struct sockaddr_in6 *)a->ifa_addr;
80 if (!link_local && IN6_IS_ADDR_LINKLOCAL(&sa->sin6_addr))
82 if (IN6_IS_ADDR_V4MAPPED(&sa->sin6_addr) || IN6_IS_ADDR_V4COMPAT(&sa->sin6_addr))
84 tmp = inet_ntop(family, &sa->sin6_addr, ipaddr, sizeof(ipaddr));
88 lua_pushstring(L, tmp);
89 lua_rawseti(L, -2, n++);
91 /* TODO: Error reporting? */
99 int luaopen_util_net(lua_State* L)
101 luaL_Reg exports[] = {
102 { "local_addresses", lc_local_addresses },
106 luaL_register(L, "net", exports);