From 5a58786a39bbef7ed4805821cc921f1d40f12068 Mon Sep 17 00:00:00 2001 From: Paul Kulchenko Date: Sun, 7 Apr 2013 12:39:56 -0700 Subject: [PATCH 1/2] Added inet_pton/inet_ntop for MinGW on Windows; compiles with Lua52. --- build-mingw.sh | 9 +++++++++ src/inet.c | 50 ++++++++++++++++++++++++++++++++++++++++++++++++++ src/inet.h | 6 ++++++ 3 files changed, 65 insertions(+) create mode 100644 build-mingw.sh diff --git a/build-mingw.sh b/build-mingw.sh new file mode 100644 index 0000000..2387ae6 --- /dev/null +++ b/build-mingw.sh @@ -0,0 +1,9 @@ +LUA=../lua-5.2.1/src/ +BUILD_FLAGS="-Wl,-s -O2 -shared -D LUA_COMPAT_MODULE -D IPV6_V6ONLY=1 -D WINVER=0x0501 -s -I src -I $LUA -L $LUA" + +mkdir -p lib/mime lib/socket +gcc $BUILD_FLAGS -o "lib/mime/core.dll" src/mime.c -llua \ + || { echo "Error: failed to build LuaSocket/mime"; exit 1; } +gcc $BUILD_FLAGS -o "lib/socket/core.dll" \ + src/{luasocket.c,auxiliar.c,buffer.c,except.c,inet.c,io.c,options.c,select.c,tcp.c,timeout.c,udp.c,wsocket.c} -lwsock32 -lws2_32 -llua \ + || { echo "Error: failed to build LuaSocket/socket"; exit 1; } diff --git a/src/inet.c b/src/inet.c index 69d32e6..1017022 100644 --- a/src/inet.c +++ b/src/inet.c @@ -507,4 +507,54 @@ int inet_aton(const char *cp, struct in_addr *inp) } #endif +// inet_ntop/inet_pton for MinGW from http://mingw-users.1079350.n2.nabble.com/IPv6-getaddrinfo-amp-inet-ntop-td5891996.html +#ifdef INET_PTON +const char *inet_ntop(int af, const void *src, char *dst, socklen_t cnt) +{ + if (af == AF_INET) + { + struct sockaddr_in in; + memset(&in, 0, sizeof(in)); + in.sin_family = AF_INET; + memcpy(&in.sin_addr, src, sizeof(struct in_addr)); + getnameinfo((struct sockaddr *)&in, sizeof(struct sockaddr_in), dst, cnt, NULL, 0, NI_NUMERICHOST); + return dst; + } + else if (af == AF_INET6) + { + struct sockaddr_in6 in; + memset(&in, 0, sizeof(in)); + in.sin6_family = AF_INET6; + memcpy(&in.sin6_addr, src, sizeof(struct in_addr6)); + getnameinfo((struct sockaddr *)&in, sizeof(struct sockaddr_in6), dst, cnt, NULL, 0, NI_NUMERICHOST); + return dst; + } + return NULL; +} + +int inet_pton(int af, const char *src, void *dst) +{ + struct addrinfo hints, *res, *ressave; + + memset(&hints, 0, sizeof(struct addrinfo)); + hints.ai_family = af; + + if (getaddrinfo(src, NULL, &hints, &res) != 0) + { + return -1; + } + + ressave = res; + + while (res) + { + memcpy(dst, res->ai_addr, res->ai_addrlen); + res = res->ai_next; + } + + freeaddrinfo(ressave); + return 0; +} + +#endif diff --git a/src/inet.h b/src/inet.h index 4678ba6..2f72533 100644 --- a/src/inet.h +++ b/src/inet.h @@ -20,6 +20,7 @@ #ifdef _WIN32 #define INET_ATON +#define INET_PTON #endif int inet_open(lua_State *L); @@ -42,4 +43,9 @@ int inet_optsocktype(lua_State* L, int narg, const char* def); int inet_aton(const char *cp, struct in_addr *inp); #endif +#ifdef INET_PTON +const char *inet_ntop(int af, const void *src, char *dst, socklen_t cnt); +int inet_pton(int af, const char *src, void *dst); +#endif + #endif /* INET_H */ From 571308a94e30f15669c1c5e2df4d7713885e8859 Mon Sep 17 00:00:00 2001 From: Paul Kulchenko Date: Tue, 9 Apr 2013 09:25:40 -0700 Subject: [PATCH 2/2] Updated IPV6_V6ONLY to match header files on Windows. --- build-mingw.sh | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/build-mingw.sh b/build-mingw.sh index 2387ae6..e636c2c 100644 --- a/build-mingw.sh +++ b/build-mingw.sh @@ -1,5 +1,5 @@ LUA=../lua-5.2.1/src/ -BUILD_FLAGS="-Wl,-s -O2 -shared -D LUA_COMPAT_MODULE -D IPV6_V6ONLY=1 -D WINVER=0x0501 -s -I src -I $LUA -L $LUA" +BUILD_FLAGS="-Wl,-s -O2 -shared -D LUA_COMPAT_MODULE -D IPV6_V6ONLY=27 -D WINVER=0x0501 -s -I src -I $LUA -L $LUA" mkdir -p lib/mime lib/socket gcc $BUILD_FLAGS -o "lib/mime/core.dll" src/mime.c -llua \