themis

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

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

-file("/git/Themis/src/themis/gauge.gleam", 29).
-spec register(themis:store(), binary(), binary()) -> {ok, themis:store()} |
    {error, themis:store_error()}.
register(Store, Name_string, Description) ->
    gleam@result:'try'(
        begin
            _pipe = themis@internal@metric@gauge:new(Name_string, Description),
            gleam@result:try_recover(
                _pipe,
                fun(E) -> {error, {metric_error, E}} end
            )
        end,
        fun(_use0) ->
            {Name, Gauge} = _use0,
            gleam@bool:guard(
                themis:is_metric_name_used(Store, Name),
                {error, metric_name_already_in_use},
                fun() ->
                    {ok,
                        erlang:setelement(
                            2,
                            Store,
                            gleam@dict:insert(
                                erlang:element(2, Store),
                                Name,
                                Gauge
                            )
                        )}
                end
            )
        end
    ).

-file("/git/Themis/src/themis/gauge.gleam", 66).
-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 = themis@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 = themis@internal@metric@gauge: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(2, Store),
                                Name
                            ),
                            gleam@result:replace_error(
                                _pipe@2,
                                metric_name_not_found
                            )
                        end,
                        fun(Gauge) ->
                            Updated_gauge = themis@internal@metric@gauge:observe(
                                Gauge,
                                Labels,
                                Value
                            ),
                            {ok,
                                erlang:setelement(
                                    2,
                                    Store,
                                    gleam@dict:insert(
                                        erlang:element(2, Store),
                                        Name,
                                        Updated_gauge
                                    )
                                )}
                        end
                    )
                end
            )
        end
    ).

-file("/git/Themis/src/themis/gauge.gleam", 99).
-spec unregister(themis:store(), binary()) -> {ok, themis:store()} |
    {error, themis:store_error()}.
unregister(Store, Name_string) ->
    gleam@result:'try'(
        begin
            _pipe = themis@internal@metric@gauge: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(2, Store), Name),
                {error, metric_name_not_found},
                fun() ->
                    New_gauges = gleam@dict:delete(
                        erlang:element(2, Store),
                        Name
                    ),
                    {ok, erlang:setelement(2, Store, New_gauges)}
                end
            )
        end
    ).