util/datamanager.lua
changeset 5065 acfaf771f10e
parent 5057 1e44678b5de2
child 5069 7b298f8bcbcb
--- a/util/datamanager.lua	Wed Aug 01 01:36:30 2012 +0500
+++ b/util/datamanager.lua	Wed Aug 01 01:36:34 2012 +0500
@@ -171,6 +171,18 @@
 	return nil, msg;
 end
 
+if prosody.platform ~= "posix" then
+	-- os.rename does not overwrite existing files on Windows
+	-- TODO We could use Transactional NTFS on Vista and above
+	function atomic_store(filename, data)
+		local f, err = io_open(filename, "w");
+		if not f then return f, err; end
+		local ok, msg = f:write(data);
+		if not ok then f:close(); return ok, msg; end
+		return f:close();
+	end
+end
+
 function store(username, host, datastore, data)
 	if not data then
 		data = {};