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>
28 /* Enumerate all locally configured IP addresses */
30 const char * const type_strings[] = {
37 static int lc_local_addresses(lua_State *L)
39 /* Link-local IPv4 addresses; see RFC 3927 and RFC 5735 */
40 const long ip4_linklocal = htonl(0xa9fe0000); /* 169.254.0.0 */
41 const long ip4_mask = htonl(0xffff0000);
43 struct ifaddrs *addr = NULL, *a;
46 int type = luaL_checkoption(L, 1, "both", type_strings);
47 const char link_local = lua_toboolean(L, 2); /* defaults to 0 (false) */
48 const char ipv4 = (type == 0 || type == 1);
49 const char ipv6 = (type == 0 || type == 2);
52 if (getifaddrs(&addr) < 0) {
54 lua_pushfstring(L, "getifaddrs failed (%d): %s", errno,
61 for (a = addr; a; a = a->ifa_next) {
63 char ipaddr[INET6_ADDRSTRLEN];
64 const char *tmp = NULL;
66 if (a->ifa_addr == NULL || a->ifa_flags & IFF_LOOPBACK)
69 family = a->ifa_addr->sa_family;
71 if (ipv4 && family == AF_INET) {
72 struct sockaddr_in *sa = (struct sockaddr_in *)a->ifa_addr;
73 if (!link_local &&((sa->sin_addr.s_addr & ip4_mask) == ip4_linklocal))
75 tmp = inet_ntop(family, &sa->sin_addr, ipaddr, sizeof(ipaddr));
76 } else if (ipv6 && family == AF_INET6) {
77 struct sockaddr_in6 *sa = (struct sockaddr_in6 *)a->ifa_addr;
78 if (!link_local && IN6_IS_ADDR_LINKLOCAL(&sa->sin6_addr))
80 if (IN6_IS_ADDR_V4MAPPED(&sa->sin6_addr) || IN6_IS_ADDR_V4COMPAT(&sa->sin6_addr))
82 tmp = inet_ntop(family, &sa->sin6_addr, ipaddr, sizeof(ipaddr));
86 lua_pushstring(L, tmp);
87 lua_rawseti(L, -2, n++);
89 /* TODO: Error reporting? */
98 int luaopen_util_net(lua_State* L)
100 luaL_Reg exports[] = {
101 { "local_addresses", lc_local_addresses },
105 luaL_register(L, "net", exports);