blob: 18d1699da0ef298853098a950693a2f53b42d12f [file] [log] [blame]
% 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
% 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.
-export([init/1, handle_call/3, handle_cast/2, handle_info/2, terminate/2,
start_link() ->
gen_server:start_link({local, ?MODULE}, ?MODULE, [], []).
init([]) ->
LibDir = util_driver_dir(),
case erl_ddll:load(LibDir, "couch_icu_driver") of
ok ->
{ok, nil};
{error, already_loaded} ->
?LOG_INFO("~p reloading couch_icu_driver", [?MODULE]),
ok = erl_ddll:reload(LibDir, "couch_icu_driver"),
{ok, nil};
{error, Error} ->
{stop, erl_ddll:format_error(Error)}
handle_call(_Request, _From, State) ->
{reply, ok, State}.
handle_cast(_Request, State) ->
{noreply, State}.
handle_info(_Info, State) ->
{noreply, State}.
terminate(_Reason, _State) ->
code_change(_OldVsn, State, _Extra) ->
{ok, State}.
% private API
util_driver_dir() ->
case couch_config:get("couchdb", "util_driver_dir", null) of
null ->
filename:join(couch_util:priv_dir(), "lib");
LibDir0 ->