Packages

TLS/SSL OpenSSL-based NIF for Erlang

Current section

Files

Jump to
erltls src erltls_ticket_cache.erl
Raw

src/erltls_ticket_cache.erl

-module(erltls_ticket_cache).
-define(ETS_TICKET_CACHE, etls_ticket_cache_table).
-define(GET_KEY(Host, Port), {Host, Port}).
-export([
init/0,
get/2,
set/3,
delete_all/0
]).
init() ->
?ETS_TICKET_CACHE = ets:new(?ETS_TICKET_CACHE, [set, named_table, public, {read_concurrency, true}]),
ok.
get(Host, Port) ->
erltls_utils:ets_get(?ETS_TICKET_CACHE, ?GET_KEY(Host, Port)).
set(Host, Port, SessionASN1) ->
erltls_utils:ets_set(?ETS_TICKET_CACHE, ?GET_KEY(Host, Port), SessionASN1).
delete_all() ->
ets:delete_all_objects(?ETS_TICKET_CACHE).