From ff067255b028f0c3ba80b7100fba13863e94ed40 Mon Sep 17 00:00:00 2001
From: Hannes Mehnert <hannes@mehnert.org>
Date: Mon, 11 Nov 2019 22:11:22 +0100
Subject: [PATCH] albatrossd: acquire lock for restore

---
 daemon/albatrossd.ml | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/daemon/albatrossd.ml b/daemon/albatrossd.ml
index 2c0c376..4398471 100644
--- a/daemon/albatrossd.ml
+++ b/daemon/albatrossd.ml
@@ -177,7 +177,8 @@ let jump _ influx =
        in
 
        Lwt_list.iter_s (fun (name, config) ->
-           create stat_out log_out cons_out stub_data_out name config)
+           Lwt_mutex.with_lock create_lock (fun () ->
+               create stat_out log_out cons_out stub_data_out name config))
          (Vmm_trie.all old_unikernels) >>= fun () ->
 
        Lwt.catch (fun () ->