-
Notifications
You must be signed in to change notification settings - Fork 10
/
daemonize.mli
73 lines (57 loc) · 3.4 KB
/
daemonize.mli
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
(**************************************************************************)
(* Copyright 2014, 2015: *)
(* Sebastien Mondet <seb@mondet.org>, *)
(* Leonid Rozenberg <leonidr@gmail.com>, *)
(* Arun Ahuja <aahuja11@gmail.com>, *)
(* Jeff Hammerbacher <jeff.hammerbacher@gmail.com> *)
(* *)
(* Licensed under the Apache License, Version 2.0 (the "License"); *)
(* you may not use this file except in compliance with the License. *)
(* You may obtain a copy of the License at *)
(* *)
(* http://www.apache.org/licenses/LICENSE-2.0 *)
(* *)
(* Unless required by applicable law or agreed to in writing, software *)
(* distributed under the License is distributed on an "AS IS" BASIS, *)
(* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or *)
(* implied. See the License for the specific language governing *)
(* permissions and limitations under the License. *)
(**************************************************************************)
(** Implementation of the {!LONG_RUNNING} API with [nohup setsid] unix
processes or generated Python scripts. *)
(** This module implements the {!Long_running.LONG_RUNNING} plugin-API.
Shell commands are put in a {!Ketrew_pure.Monitored_script.t}, and
run in the background (detached in a new process group).
There are two methods for starting/detaching the computation
(set with the [~using] parameter):
- [`Nohup_setsid] (the default) means that the script will be started with
["nohup setsid bash <script> &"].
This method is the {i POSIX-ly} portable one; but, sadly,
it is broken on MacOSX
(c.f. people having
{{:https://github.com/ChrisJohnsen/tmux-MacOSX-pasteboard}TMux problems},
{{:http://stackoverflow.com/questions/23898623/nohup-cant-detach-from-console}Nohup problems}).
- [`Python_daemon] means that the script will be started by
a generated Python script.
Obviously, this works only when the host can run Python scripts (which
includes MacOSX).
The {!update} function uses the log-file of the monitored-script, and the
command ["ps -p <Group-PID>"].
The {!kill} function kills the process group (created thanks to ["setsid"])
with ["kill -- <N>"] (where ["<N>"] is the negative PID of the group).
*)
type run_parameters
[@@deriving yojson]
(** The “standard” plugin-API. *)
include Long_running.LONG_RUNNING with type run_parameters := run_parameters
val create:
?starting_timeout:float ->
?call_script:(string -> string list) ->
?using:[ `Nohup_setsid | `Python_daemon] ->
?host:Ketrew_pure.Host.t -> ?no_log_is_ok: bool -> Ketrew_pure.Program.t ->
[> `Long_running of string * string ]
(** Create a “long-running” {!Ketrew_pure.Target.build_process} (run parameters
are already serialized), see {!Edsl.daemonize} for more
details *)
val markup : run_parameters -> Ketrew_pure.Internal_pervasives.Display_markup.t
val get_playground: run_parameters -> Ketrew_pure.Path.t option