-module(themis@histogram).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([register/4, init_record/3, observe/4, unregister/2]).

-file("/git/Themis/src/themis/histogram.gleam", 31).
-spec register(
    themis:store(),
    binary(),
    binary(),
    gleam@set:set(themis@number:number_())
) -> {ok, themis:store()} | {error, themis:store_error()}.
register(Store, Name_string, Description, Buckets) ->
    gleam@result:'try'(
        begin
            _pipe = internal@metric@histogram:new(
                Name_string,
                Description,
                Buckets
            ),
            gleam@result:try_recover(
                _pipe,
                fun(E) -> {error, {histogram_error, E}} end
            )
        end,
        fun(_use0) ->
            {Name, Histogram} = _use0,
            gleam@bool:guard(
                themis:is_metric_name_used(Store, Name),
                {error, metric_name_already_in_use},
                fun() ->
                    {ok,
                        erlang:setelement(
                            4,
                            Store,
                            gleam@dict:insert(
                                erlang:element(4, Store),
                                Name,
                                Histogram
                            )
                        )}
                end
            )
        end
    ).

-file("/git/Themis/src/themis/histogram.gleam", 79).
-spec init_record(themis:store(), binary(), gleam@dict:dict(binary(), binary())) -> {ok,
        themis:store()} |
    {error, themis:store_error()}.
init_record(Store, Name_string, Labels_dict) ->
    gleam@result:'try'(
        begin
            _pipe = internal@label:from_dict(Labels_dict),
            gleam@result:try_recover(
                _pipe,
                fun(E) -> {error, {label_error, E}} end
            )
        end,
        fun(Labels) ->
            gleam@result:'try'(
                begin
                    _pipe@1 = internal@metric@histogram:new_name(Name_string),
                    gleam@result:try_recover(
                        _pipe@1,
                        fun(E@1) -> {error, {metric_error, E@1}} end
                    )
                end,
                fun(Name) ->
                    gleam@result:'try'(
                        begin
                            _pipe@2 = gleam_stdlib:map_get(
                                erlang:element(4, Store),
                                Name
                            ),
                            gleam@result:replace_error(
                                _pipe@2,
                                metric_name_not_found
                            )
                        end,
                        fun(Histogram) ->
                            Updated_histogram = internal@metric@histogram:init_record(
                                Histogram,
                                Labels
                            ),
                            {ok,
                                erlang:setelement(
                                    4,
                                    Store,
                                    gleam@dict:insert(
                                        erlang:element(4, Store),
                                        Name,
                                        Updated_histogram
                                    )
                                )}
                        end
                    )
                end
            )
        end
    ).

-file("/git/Themis/src/themis/histogram.gleam", 126).
-spec observe(
    themis:store(),
    binary(),
    gleam@dict:dict(binary(), binary()),
    themis@number:number_()
) -> {ok, themis:store()} | {error, themis:store_error()}.
observe(Store, Name_string, Labels_dict, Value) ->
    gleam@result:'try'(
        begin
            _pipe = internal@label:from_dict(Labels_dict),
            gleam@result:try_recover(
                _pipe,
                fun(E) -> {error, {label_error, E}} end
            )
        end,
        fun(Labels) ->
            gleam@result:'try'(
                begin
                    _pipe@1 = internal@metric@histogram:new_name(Name_string),
                    gleam@result:try_recover(
                        _pipe@1,
                        fun(E@1) -> {error, {metric_error, E@1}} end
                    )
                end,
                fun(Name) ->
                    gleam@result:'try'(
                        begin
                            _pipe@2 = gleam_stdlib:map_get(
                                erlang:element(4, Store),
                                Name
                            ),
                            gleam@result:replace_error(
                                _pipe@2,
                                metric_name_not_found
                            )
                        end,
                        fun(Histogram) ->
                            Updated_histogram = internal@metric@histogram:observe(
                                Histogram,
                                Labels,
                                Value
                            ),
                            {ok,
                                erlang:setelement(
                                    4,
                                    Store,
                                    gleam@dict:insert(
                                        erlang:element(4, Store),
                                        Name,
                                        Updated_histogram
                                    )
                                )}
                        end
                    )
                end
            )
        end
    ).

-file("/git/Themis/src/themis/histogram.gleam", 167).
-spec unregister(themis:store(), binary()) -> {ok, themis:store()} |
    {error, themis:store_error()}.
unregister(Store, Name_string) ->
    gleam@result:'try'(
        begin
            _pipe = internal@metric@histogram:new_name(Name_string),
            gleam@result:try_recover(
                _pipe,
                fun(E) -> {error, {metric_error, E}} end
            )
        end,
        fun(Name) ->
            gleam@bool:guard(
                not gleam@dict:has_key(erlang:element(4, Store), Name),
                {error, metric_name_not_found},
                fun() ->
                    New_histograms = gleam@dict:delete(
                        erlang:element(4, Store),
                        Name
                    ),
                    {ok, erlang:setelement(4, Store, New_histograms)}
                end
            )
        end
    ).