From dd954c5d0950476532d63b6c05435018de388b87 Mon Sep 17 00:00:00 2001 From: Adam Kocoloski Date: Tue, 22 Sep 2009 18:16:50 +0000 Subject: _externals should respect os_process_timeout setting git-svn-id: https://svn.apache.org/repos/asf/couchdb/trunk@817749 13f79535-47bb-0310-9956-ffa450edef68 --- src/couchdb/couch_external_server.erl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'src') diff --git a/src/couchdb/couch_external_server.erl b/src/couchdb/couch_external_server.erl index 7e81cae1..8e632510 100644 --- a/src/couchdb/couch_external_server.erl +++ b/src/couchdb/couch_external_server.erl @@ -34,7 +34,12 @@ execute(Pid, JsonReq) -> init([Name, Command]) -> ?LOG_INFO("EXTERNAL: Starting process for: ~s", [Name]), ?LOG_INFO("COMMAND: ~s", [Command]), - {ok, Pid} = couch_os_process:start_link(Command), + Timeout = list_to_integer(couch_config:get("couchdb", "os_process_timeout", + "5000")), + {ok, Pid} = couch_os_process:start_link(Command, [{timeout, Timeout}]), + couch_config:register(fun("couchdb", "os_process_timeout", NewTimeout) -> + couch_os_process:set_timeout(Pid, list_to_integer(NewTimeout)) + end), {ok, {Name, Command, Pid}}. terminate(_Reason, {_Name, _Command, Pid}) -> -- cgit v1.2.3