summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat (limited to 'src/shared/io')
-rw-r--r--src/shared/io/shr_database.erl (renamed from src/shared/io/sh_database.erl)12
-rw-r--r--src/shared/io/shr_timed_cache.erl (renamed from src/shared/io/sh_timed_cache.erl)12
-rw-r--r--src/shared/io/shr_timed_caches_manager.erl (renamed from src/shared/io/sh_timed_caches_manager.erl)2
3 files changed, 13 insertions, 13 deletions
diff --git a/src/shared/io/sh_database.erl b/src/shared/io/shr_database.erl
index 233e37d..bffcb9f 100644
--- a/src/shared/io/sh_database.erl
+++ b/src/shared/io/shr_database.erl
@@ -1,4 +1,4 @@
--module(sh_database).
+-module(shr_database).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% TYPES %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -34,12 +34,12 @@ do_remote_operation (Op, Params) ->
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%% EXPORTED FUNCTIONS %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
--spec insert (atom(), any(), sh_db_user:permission(), any()) -> 'ok'.
+-spec insert (atom(), any(), shr_db_user:permission(), any()) -> 'ok'.
insert (DB, ObjectID, Permission, Value) ->
{atomic, _} = do_remote_operation(insert, [DB, ObjectID, Permission, Value]),
io:format
(
- "~nsh_database:insert(~p) -> ok.~n",
+ "~nshr_database:insert(~p) -> ok.~n",
[{DB, ObjectID, Permission, Value}]
),
@@ -48,11 +48,11 @@ insert (DB, ObjectID, Permission, Value) ->
-spec fetch (atom(), any()) -> ({'ok', any()} | 'not_found').
fetch (DB, ObjectID) ->
{atomic, Reply} = do_remote_operation(read, [DB, ObjectID]),
- io:format("~nsh_database:fetch(~p) -> ~p.~n", [{DB, ObjectID}, Reply]),
+ io:format("~nshr_database:fetch(~p) -> ~p.~n", [{DB, ObjectID}, Reply]),
Reply.
--spec commit (sh_db_query:type()) -> 'ok'.
+-spec commit (shr_db_query:type()) -> 'ok'.
commit (Query) ->
{atomic, ok} = do_remote_operation(query, [Query]),
- io:format("~nsh_database:commit(~p) -> ok.~n", [Query]),
+ io:format("~nshr_database:commit(~p) -> ok.~n", [Query]),
ok.
diff --git a/src/shared/io/sh_timed_cache.erl b/src/shared/io/shr_timed_cache.erl
index 6f3d973..b89de48 100644
--- a/src/shared/io/sh_timed_cache.erl
+++ b/src/shared/io/shr_timed_cache.erl
@@ -1,4 +1,4 @@
--module(sh_timed_cache).
+-module(shr_timed_cache).
-behavior(gen_server).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -38,7 +38,7 @@
-spec add_to_cache (atom(), any(), any()) -> any().
add_to_cache (DB, Owner, ObjectID) ->
{ok, TimerPID} = gen_server:start(?MODULE, {DB, {Owner, ObjectID}}, []),
- {ok, Data} = sh_database:fetch(DB, ObjectID),
+ {ok, Data} = shr_database:fetch(DB, ObjectID),
ets:insert(DB, {{Owner, ObjectID}, TimerPID, Data}),
Data.
@@ -54,17 +54,17 @@ add_update_to_cache (DB, Owner, ObjectID, Data) ->
%%%% 'gen_server' functions
init ({DB, ObjectID}) ->
io:format("~nCache entry added: ~p.~n", [{DB, ObjectID}]),
- {ok, {DB, ObjectID}, sh_timed_caches_manager:get_timeout()}.
+ {ok, {DB, ObjectID}, shr_timed_caches_manager:get_timeout()}.
handle_call (invalidate, _, State) ->
{stop, normal, State};
handle_call (ping, _, State) ->
- {noreply, State, sh_timed_caches_manager:get_timeout()}.
+ {noreply, State, shr_timed_caches_manager:get_timeout()}.
handle_cast (invalidate, State) ->
{stop, normal, State};
handle_cast (ping, State) ->
- {noreply, State, sh_timed_caches_manager:get_timeout()}.
+ {noreply, State, shr_timed_caches_manager:get_timeout()}.
terminate (_, {DB, ObjectID}) ->
io:format
@@ -83,7 +83,7 @@ format_status (_, [_, State]) ->
handle_info(timeout, State) ->
{stop, normal, State};
handle_info(_, {DB, ObjectID}) ->
- {noreply, {DB, ObjectID}, sh_timed_caches_manager:get_timeout()}.
+ {noreply, {DB, ObjectID}, shr_timed_caches_manager:get_timeout()}.
%%%% Interface Functions
-spec fetch (atom(), any(), any()) -> any().
diff --git a/src/shared/io/sh_timed_caches_manager.erl b/src/shared/io/shr_timed_caches_manager.erl
index ea92c08..8303cb8 100644
--- a/src/shared/io/sh_timed_caches_manager.erl
+++ b/src/shared/io/shr_timed_caches_manager.erl
@@ -1,4 +1,4 @@
--module(sh_timed_caches_manager).
+-module(shr_timed_caches_manager).
-behavior(gen_server).
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%