Packages
diint_utilites_common_app
1.0.2
1.4.23
1.4.22
1.4.21
1.4.20
1.4.19
1.4.18
1.4.17
1.4.16
1.4.15
1.4.14
1.4.12
1.4.11
1.4.10
1.4.9
1.4.8
1.4.7
1.4.6
1.4.5
1.4.4
1.4.3
1.4.2
1.4.1
1.4.0
1.3.9
1.3.8
1.3.7
1.3.6
1.3.5
1.3.4
1.3.3
1.3.2
1.3.1
1.3.0
1.2.101
1.2.11
1.2.10
1.2.9
1.2.8
1.2.7
1.2.6
1.2.5
1.2.4
1.2.3
1.2.2
1.2.1
1.2.0
1.1.7
1.1.6
1.1.5
1.1.4
1.1.3
1.1.2
1.1.1
1.1.0
1.0.13
1.0.12
1.0.11
1.0.10
1.0.9
1.0.8
1.0.7
1.0.6
1.0.5
1.0.4
1.0.3
1.0.2
1.0.1
библиотеки для работы с ребитом и протоколы
Current section
Files
Jump to
Current section
Files
src/utilites/application_info.erl
%%%-------------------------------------------------------------------
%%% @author cheese
%%% @copyright (C) 2016, <COMPANY>
%%% @doc
%%%
%%% @end
%%% Created : 27. Apr 2016 13:48
%%%-------------------------------------------------------------------
-module(application_info).
-author("cheese").
%% API
-export([init/1, get_start_time/0, get_version/0, add_key_value/2, get_value/1]).
init(Version) ->
ets:new(application_info, [set, named_table]),
ets:insert(application_info, {start_time, calendar:local_time()}),
ets:insert(application_info, {version, Version}),
IP = socket_utilites:get_gurrent_ip(),
ets:insert(application_info, {current_ip, IP}),
{IP1, IP2, IP3, IP4} = IP,
IPSTR = list_to_binary(io_lib:format("~w.~w.~w.~w", [IP1, IP2, IP3, IP4])),
ets:insert(application_info, {current_ip_str, IPSTR}).
get_start_time() ->
get_value(start_time).
get_version() ->
get_value(version).
add_key_value(Key, Value) ->
ets:insert(application_info, {Key, Value}).
get_value(Key) ->
case ets:lookup(application_info, Key) of
[] ->
undefined;
[{Key, Value} | _] ->
Value
end.