-module(emqx_rule_api_schema).

-behaviour(hocon_schema).

-include_lib("typerefl/include/types.hrl").
-include_lib("hocon/include/hoconsc.hrl").
-include_lib("emqx/include/logger.hrl").

-export([ check_params/2
        ]).

-export([roots/0, fields/1]).

-type tag() :: rule_creation | rule_test.

-spec check_params(map(), tag()) -> {ok, map()} | {error, term()}.
check_params(Params, Tag) ->
    BTag = atom_to_binary(Tag),
    Opts = #{atom_key => true, required => false},
    try hocon_tconf:check_plain(?MODULE, #{BTag => Params}, Opts, [Tag]) of
        #{Tag := Checked} -> {ok, Checked}
    catch
        throw : Reason ->
            ?SLOG(error, #{msg => "check_rule_params_failed",
                           reason => Reason
                          }),
            {error, Reason}
    end.

%%======================================================================================
%% Hocon Schema Definitions

roots() ->
    [ {"rule_creation", sc(ref("rule_creation"), #{desc => ?DESC("root_rule_creation")})}
    , {"rule_info", sc(ref("rule_info"), #{desc => ?DESC("root_rule_info")})}
    , {"rule_events", sc(ref("rule_events"), #{desc => ?DESC("root_rule_events")})}
    , {"rule_test", sc(ref("rule_test"), #{desc => ?DESC("root_rule_test")})}
    ].

fields("rule_creation") ->
    emqx_rule_engine_schema:fields("rules");

fields("rule_info") ->
    [ rule_id()
    , {"metrics", sc(ref("metrics"), #{desc => ?DESC("ri_metrics")})}
    , {"node_metrics", sc(hoconsc:array(ref("node_metrics")),
        #{ desc => ?DESC("ri_node_metrics")
         })}
    , {"from", sc(hoconsc:array(binary()),
        #{desc => ?DESC("ri_from"), example => "t/#"})}
    , {"created_at", sc(binary(),
        #{ desc => ?DESC("ri_created_at")
         , example => "2021-12-01T15:00:43.153+08:00"
         })}
    ] ++ fields("rule_creation");

%% TODO: we can delete this API if the Dashboard not depends on it
fields("rule_events") ->
    ETopics = [binary_to_atom(emqx_rule_events:event_topic(E)) || E <- emqx_rule_events:event_names()],
    [ {"event", sc(hoconsc:enum(ETopics), #{desc => ?DESC("rs_event"), required => true})}
    , {"title", sc(binary(), #{desc => ?DESC("rs_title"), example => "some title"})}
    , {"description", sc(binary(), #{desc => ?DESC("rs_description"), example => "some desc"})}
    , {"columns", sc(map(), #{desc => ?DESC("rs_columns")})}
    , {"test_columns", sc(map(), #{desc => ?DESC("rs_test_columns")})}
    , {"sql_example", sc(binary(), #{desc => ?DESC("rs_sql_example")})}
    ];

fields("rule_test") ->
    [ {"context", sc(hoconsc:union([ ref("ctx_pub")
                                   , ref("ctx_sub")
                                   , ref("ctx_unsub")
                                   , ref("ctx_delivered")
                                   , ref("ctx_acked")
                                   , ref("ctx_dropped")
                                   , ref("ctx_connected")
                                   , ref("ctx_disconnected")
                                   , ref("ctx_connack")
                                   , ref("ctx_check_authz_complete")
                                   , ref("ctx_bridge_mqtt")
                                   ]),
        #{desc => ?DESC("test_context"),
          default => #{}})}
    , {"sql", sc(binary(), #{desc => ?DESC("test_sql"), required => true})}
    ];

fields("metrics") ->
    [ {"sql.matched", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_sql_matched")
        })}
    , {"sql.matched.rate", sc(float(), #{desc => ?DESC("metrics_sql_matched_rate") })}
    , {"sql.matched.rate.max", sc(float(), #{desc => ?DESC("metrics_sql_matched_rate_max") })}
    , {"sql.matched.rate.last5m", sc(float(),
            #{desc => ?DESC("metrics_sql_matched_rate_last5m") })}
    , {"sql.passed", sc(non_neg_integer(), #{desc => ?DESC("metrics_sql_passed") })}
    , {"sql.failed", sc(non_neg_integer(), #{desc => ?DESC("metrics_sql_failed") })}
    , {"sql.failed.exception", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_sql_failed_exception")
        })}
    , {"sql.failed.unknown", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_sql_failed_unknown")
        })}
    , {"outputs.total", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_outputs_total")
        })}
    , {"outputs.success", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_outputs_success")
        })}
    , {"outputs.failed", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_outputs_failed")
        })}
    , {"outputs.failed.out_of_service", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_outputs_failed_out_of_service")
        })}
    , {"outputs.failed.unknown", sc(non_neg_integer(), #{
            desc => ?DESC("metrics_outputs_failed_unknown")
        })}
    ];

fields("node_metrics") ->
    [ {"node", sc(binary(), #{desc => ?DESC("node_node"), example => "emqx@127.0.0.1"})}
    ] ++ fields("metrics");

fields("ctx_pub") ->
    [ {"event_type", sc(message_publish, #{desc => ?DESC("event_event_type"), required => true})}
    , {"id", sc(binary(), #{desc => ?DESC("event_id")})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"payload", sc(binary(), #{desc => ?DESC("event_payload")})}
    , {"peerhost", sc(binary(), #{desc => ?DESC("event_peerhost")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"publish_received_at", sc(integer(), #{
        desc => ?DESC("event_publish_received_at")})}
    ] ++ [qos()];

fields("ctx_sub") ->
    [ {"event_type", sc(session_subscribed, #{desc => ?DESC("event_event_type"), required => true})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"payload", sc(binary(), #{desc => ?DESC("event_payload")})}
    , {"peerhost", sc(binary(), #{desc => ?DESC("event_peerhost")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"publish_received_at", sc(integer(), #{
        desc => ?DESC("event_publish_received_at")})}
    ] ++ [qos()];

fields("ctx_unsub") ->
    [{"event_type", sc(session_unsubscribed, #{desc => ?DESC("event_event_type"), required => true})}] ++
    proplists:delete("event_type", fields("ctx_sub"));

fields("ctx_delivered") ->
    [ {"event_type", sc(message_delivered, #{desc => ?DESC("event_event_type"), required => true})}
    , {"id", sc(binary(), #{desc => ?DESC("event_id")})}
    , {"from_clientid", sc(binary(), #{desc => ?DESC("event_from_clientid")})}
    , {"from_username", sc(binary(), #{desc => ?DESC("event_from_username")})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"payload", sc(binary(), #{desc => ?DESC("event_payload")})}
    , {"peerhost", sc(binary(), #{desc => ?DESC("event_peerhost")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"publish_received_at", sc(integer(), #{
        desc => ?DESC("event_publish_received_at")})}
    ] ++ [qos()];

fields("ctx_acked") ->
    [{"event_type", sc(message_acked, #{desc => ?DESC("event_event_type"), required => true})}] ++
    proplists:delete("event_type", fields("ctx_delivered"));

fields("ctx_dropped") ->
    [ {"event_type", sc(message_dropped, #{desc => ?DESC("event_event_type"), required => true})}
    , {"id", sc(binary(), #{desc => ?DESC("event_id")})}
    , {"reason", sc(binary(), #{desc => ?DESC("event_ctx_dropped")})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"payload", sc(binary(), #{desc => ?DESC("event_payload")})}
    , {"peerhost", sc(binary(), #{desc => ?DESC("event_peerhost")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"publish_received_at", sc(integer(), #{
        desc => ?DESC("event_publish_received_at")})}
    ] ++ [qos()];

fields("ctx_connected") ->
    [ {"event_type", sc(client_connected, #{desc => ?DESC("event_event_type"), required => true})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"mountpoint", sc(binary(), #{desc => ?DESC("event_mountpoint")})}
    , {"peername", sc(binary(), #{desc => ?DESC("event_peername")})}
    , {"sockname", sc(binary(), #{desc => ?DESC("event_sockname")})}
    , {"proto_name", sc(binary(), #{desc => ?DESC("event_proto_name")})}
    , {"proto_ver", sc(binary(), #{desc => ?DESC("event_proto_ver")})}
    , {"keepalive", sc(integer(), #{desc => ?DESC("event_keepalive")})}
    , {"clean_start", sc(boolean(), #{desc => ?DESC("event_clean_start"), default => true})}
    , {"expiry_interval", sc(integer(), #{desc => ?DESC("event_expiry_interval")})}
    , {"is_bridge", sc(boolean(), #{desc => ?DESC("event_is_bridge"), default => false})}
    , {"connected_at", sc(integer(), #{
        desc => ?DESC("event_connected_at")})}
    ];

fields("ctx_disconnected") ->
    [ {"event_type", sc(client_disconnected, #{desc => ?DESC("event_event_type"), required => true})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"reason", sc(binary(), #{desc => ?DESC("event_ctx_disconnected_reason")})}
    , {"peername", sc(binary(), #{desc => ?DESC("event_peername")})}
    , {"sockname", sc(binary(), #{desc => ?DESC("event_sockname")})}
    , {"disconnected_at", sc(integer(), #{
        desc => ?DESC("event_ctx_disconnected_da")})}
    ];

fields("ctx_connack") ->
    [ {"event_type", sc(client_connack, #{desc => ?DESC("event_event_type"), required => true})}
    , {"reason_code", sc(binary(), #{desc => ?DESC("event_ctx_connack_reason_code")})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"clean_start", sc(boolean(), #{desc => ?DESC("event_clean_start"), default => true})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"peername", sc(binary(), #{desc => ?DESC("event_peername")})}
    , {"sockname", sc(binary(), #{desc => ?DESC("event_sockname")})}
    , {"proto_name", sc(binary(), #{desc => ?DESC("event_proto_name")})}
    , {"proto_ver", sc(binary(), #{desc => ?DESC("event_proto_ver")})}
    , {"keepalive", sc(integer(), #{desc => ?DESC("event_keepalive")})}
    , {"expiry_interval", sc(integer(), #{desc => ?DESC("event_expiry_interval")})}
    , {"connected_at", sc(integer(), #{
        desc => ?DESC("event_connected_at")})}
    ];
fields("ctx_check_authz_complete") ->
    [ {"event_type", sc(client_check_authz_complete, #{desc => ?DESC("event_event_type"), required => true})}
    , {"clientid", sc(binary(), #{desc => ?DESC("event_clientid")})}
    , {"username", sc(binary(), #{desc => ?DESC("event_username")})}
    , {"peerhost", sc(binary(), #{desc => ?DESC("event_peerhost")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"action", sc(binary(), #{desc => ?DESC("event_action")})}
    , {"authz_source", sc(binary(), #{desc => ?DESC("event_authz_source")})}
    , {"result", sc(binary(), #{desc => ?DESC("event_result")})}
    ];
fields("ctx_bridge_mqtt") ->
    [ {"event_type", sc('$bridges/mqtt:*', #{desc => ?DESC("event_event_type"), required => true})}
    , {"id", sc(binary(), #{desc => ?DESC("event_id")})}
    , {"payload", sc(binary(), #{desc => ?DESC("event_payload")})}
    , {"topic", sc(binary(), #{desc => ?DESC("event_topic")})}
    , {"server", sc(binary(), #{desc => ?DESC("event_server")})}
    , {"dup", sc(binary(), #{desc => ?DESC("event_dup")})}
    , {"retain", sc(binary(), #{desc => ?DESC("event_retain")})}
    , {"message_received_at", sc(integer(), #{
        desc => ?DESC("event_publish_received_at")})}
    ] ++ [qos()].

qos() ->
    {"qos", sc(emqx_schema:qos(), #{desc => ?DESC("event_qos")})}.

rule_id() ->
    {"id", sc(binary(),
        #{ desc => ?DESC("rule_id"), required => true
         , example => "293fb66f"
         })}.

sc(Type, Meta) -> hoconsc:mk(Type, Meta).
ref(Field) -> hoconsc:ref(?MODULE, Field).