X-Git-Url: http://git.annexia.org/?p=whenjobs.git;a=blobdiff_plain;f=lib%2Fwhenproto.x;h=1d8980a2eab207e2d75dcb9ece0204eddaca75ca;hp=7988c78b9c22ea35698804974580b5b4aa4edb6d;hb=c8bff8ac923645d517183b130158d61f85540b33;hpb=b139baf5b616159972b0412a1794ac9e6e513196 diff --git a/lib/whenproto.x b/lib/whenproto.x index 7988c78..1d8980a 100644 --- a/lib/whenproto.x +++ b/lib/whenproto.x @@ -24,11 +24,15 @@ /* Maximum lengths and some useful typedefs. */ const MAX_VARIABLE_NAME_LENGTH = 256; const MAX_VARIABLE_VALUE_LENGTH = 65536; +const MAX_JOB_NAME_LENGTH = 256; const MAX_BIG_INT_LENGTH = 64; /* when encoded as a string */ +const MAX_PATH_LENGTH = 4096; typedef string variable_name; typedef string string_value; +typedef string job_name; typedef string string_big_int; +typedef string path; typedef variable_name variable_name_list<>; @@ -66,13 +70,37 @@ union variable switch (variable_type t) { double f; /* C 'double' maps to an OCaml 'float' */ }; +struct set_variable { + variable_name sv_name; + variable sv_value; +}; +typedef set_variable set_variable_list<>; + +struct job { + job_name job_name; + string_big_int job_serial; + path job_tmpdir; + hyper job_start_time; +}; + +typedef job job_list<>; + +typedef job_name job_name_list<>; + /* The API of the daemon. */ program When { version V1 { status reload_file (void) = 1; - status set_variable (variable_name, variable) = 2; + status set_variable (variable_name, variable) = 2; /* obsolete */ variable get_variable (variable_name) = 3; variable_name_list get_variable_names (void) = 4; status exit_daemon (void) = 5; + job_list get_jobs (void) = 6; + status cancel_job (string_big_int) = 7; + status start_job (job_name) = 8; + job get_job (string_big_int) = 9; + status set_variables (set_variable_list) = 10; + job_name_list get_job_names (void) = 11; + job_name_list test_variables (set_variable_list) = 12; } = 1; } = 0x20008081;