# HG changeset patch
# User Kim Alvefur <zash@zash.se>
# Date 1343770682 -7200
# Node ID 7db1056c63a926ca906733bde60effaea3b53d44
# Parent  4be7093edde9a4b2e265e837ec31be5db85aa54e
util.pposix: Try posix_fallocate() if fallocate() is unsupported by the file system

diff -r 4be7093edde9 -r 7db1056c63a9 util-src/pposix.c
--- a/util-src/pposix.c	Tue Jul 31 23:34:11 2012 +0200
+++ b/util-src/pposix.c	Tue Jul 31 23:38:02 2012 +0200
@@ -662,23 +662,34 @@
 	len = luaL_checkinteger(L, 3);
 
 #if defined(_GNU_SOURCE)
-	if(fallocate(fileno(f), FALLOC_FL_KEEP_SIZE, offset, len) != 0)
-#elif _XOPEN_SOURCE >= 600 || _POSIX_C_SOURCE >= 200112L
-#warning Using posix_fallocate() fallback. Linux fallocate() is strongly recommended if available: recompile with -D_GNU_SOURCE
-	if(posix_fallocate(fileno(f), offset, len) != 0)
-#endif
+	if(fallocate(fileno(f), FALLOC_FL_KEEP_SIZE, offset, len) == 0)
 	{
-#if ! defined(_GNU_SOURCE)
-		/* posix_fallocate() can leave a bunch of NULs at the end, so we cut that
-		 * this assumes that offset == length of the file */
-		ftruncate(fileno(f), offset);
-#endif
+		lua_pushboolean(L, 1);
+		return 1;
+	}
+
+	if(errno != ENOSYS && errno != EOPNOTSUPP)
+	{
 		lua_pushnil(L);
 		lua_pushstring(L, strerror(errno));
 		return 2;
 	}
-	lua_pushboolean(L, 1);
-	return 1;
+#endif
+
+	if(posix_fallocate(fileno(f), offset, len) == 0)
+	{
+		lua_pushboolean(L, 1);
+		return 1;
+	}
+	else
+	{
+		lua_pushnil(L);
+		lua_pushstring(L, strerror(errno));
+		/* posix_fallocate() can leave a bunch of NULs at the end, so we cut that
+		 * this assumes that offset == length of the file */
+		ftruncate(fileno(f), offset);
+		return 2;
+	}
 }
 #endif