X-Git-Url: http://git.onelab.eu/?a=blobdiff_plain;f=unixsocketwatcher.ml;h=01cc0b680595ce69025e4b747ff8018cd375d676;hb=e56b5ef0bbec1c22df1f8f82d4e75ec1785fc2ea;hp=f9971562efe802c11784b30718cabbe45c957c82;hpb=870c980d0502271eb5a3edcdeb8374365c9721c3;p=vsys.git

diff --git a/unixsocketwatcher.ml b/unixsocketwatcher.ml
index f997156..01cc0b6 100644
--- a/unixsocketwatcher.ml
+++ b/unixsocketwatcher.ml
@@ -56,9 +56,14 @@ let receive_event (listening_socket_spec:fname_and_fd) (_:fname_and_fd) =
                 match entry_info with
                   | Some(execpath,slice_name,fd) ->
                       begin
-
-
-
+                        let child = fork () in
+                          if (child == 0) then
+                               begin
+                                 (*Child*)
+                                 (* Close all fds except for the socket *)
+                                 execv execpath,[execpath];
+                                 logprint "Could not execve %s" execpath
+                               end
                       end
                   | None -> ()
             end