use fsync to flush metadata when reoperning a file with new headers

mirage · Apr 27, 2021 · e797fe9 · e797fe9
1 parent 6a3794c
commit e797fe9
Showing 1 changed file with 2 additions and 0 deletions.
diff --git a/src/unix/index_unix.ml b/src/unix/index_unix.ml
@@ -150,6 +150,7 @@ module IO : Index.IO = struct
     let header = { Raw.Header.offset; version; generation } in
     Raw.Header.set raw header;
     Raw.Fan.set raw "";
+    Raw.fsync raw;
     raw
 
   let clear ~generation ?(hook = fun () -> ()) t =
@@ -215,6 +216,7 @@ module IO : Index.IO = struct
           Raw.Fan.set_size raw fan_size;
           Raw.Version.set raw current_version;
           Raw.Generation.set raw generation;
+          Raw.fsync raw;
           v ~fan_size ~offset:Int63.zero raw)
         else
           let version = Raw.Version.get raw in