Implement flock for Windows in compiler-rt

[marco-c]

Summary

This patch implements flock for Windows, needed to make gcda writing work in a multiprocessing scenario.

Fixes https://bugs.llvm.org/show_bug.cgi?id=34923.

[zturner]

lib/profile/WindowsMMap.c

131–132

There is a subtle incompatibility here. If fd was originally opened for asynchronous IO, then this function will return immediately. This is basically the same as if you had called flock with LOCK_NB, but the difference is that with flock, the caller has to opt into it, where as with LockFileEx, it's an inherent property of the file descriptor.

Actually, it's a bit more than just a semantic difference. Since the function will return immediately, the OS will be holding onto destroyed stack memory (i.e. the OVERLAPPED structure).

I don't know if you want to handle this, but you should at least be aware, and perhaps leave a comment.

146

I know you're only implementing part of the functionality, but why not all? Seems easy enough to handle LOCK_SH, just change LOCKFILE_EXCLUSIVE_LOCK to LOCKFILE_SHARED_LOCK and the code is the same.

[marco-c]

Updated patch to handle asynchronous I/O case and to implement all flock functionality as suggested.

It's better to implement it in its entirety and correctly handling all cases, otherwise problems in the future could be hard to debug, especially since we are talking about locking.

lib/profile/WindowsMMap.c

 }
 
 COMPILER_RT_VISIBILITY
-int flock(int fd, int operation)
-{
-  return -1; /* Not supported. */
+int flock(int fd, int operation) {
+  HANDLE handle = (HANDLE)_get_osfhandle(fd);
+  if (handle == INVALID_HANDLE_VALUE)
+    return -1;
+
+  switch (operation) {
+  case LOCK_EX: {
+    OVERLAPPED overlapped = { 0 };
+    if (!LockFileEx(handle, LOCKFILE_EXCLUSIVE_LOCK, 0, MAXDWORD, MAXDWORD,
+                    &overlapped))
+      return -1;
+
+    break;
+  }
+
+  case LOCK_UN: {
+    if (!UnlockFile(handle, 0, 0, MAXDWORD, MAXDWORD))
+      return -1;
+
+    break;
+  }
+
+  default:
+    return -1; /* Not supported. */
+  }
+
+  return 0;
 }
 
 #undef DWORD_HI