-module(cake@internal@prepared_statement).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([new/2, append_sql/2, get_prefix/1, get_sql/1, get_params/1, get_dialect/1, append_param/2]).
-export_type([prepared_statement/0]).

-if(?OTP_RELEASE >= 27).
-define(MODULEDOC(Str), -moduledoc(Str)).
-define(DOC(Str), -doc(Str)).
-else.
-define(MODULEDOC(Str), -compile([])).
-define(DOC(Str), -compile([])).
-endif.

?MODULEDOC(false).

-opaque prepared_statement() :: {prepared_statement,
        binary(),
        binary(),
        list(cake@param:param()),
        integer(),
        cake@internal@dialect:dialect()}.

-file("src/cake/internal/prepared_statement.gleam", 28).
?DOC(false).
-spec new(binary(), cake@internal@dialect:dialect()) -> prepared_statement().
new(Plchldr_bs, Db_adptr) ->
    _pipe = Plchldr_bs,
    {prepared_statement, _pipe, <<""/utf8>>, [], 0, Db_adptr}.

-file("src/cake/internal/prepared_statement.gleam", 55).
?DOC(false).
-spec append_sql(prepared_statement(), binary()) -> prepared_statement().
append_sql(Prp_stm, Nw_sql) ->
    _record = Prp_stm,
    {prepared_statement,
        erlang:element(2, _record),
        <<(erlang:element(3, Prp_stm))/binary, Nw_sql/binary>>,
        erlang:element(4, _record),
        erlang:element(5, _record),
        erlang:element(6, _record)}.

-file("src/cake/internal/prepared_statement.gleam", 64).
?DOC(false).
-spec get_prefix(prepared_statement()) -> binary().
get_prefix(Prp_stm) ->
    erlang:element(2, Prp_stm).

-file("src/cake/internal/prepared_statement.gleam", 70).
?DOC(false).
-spec get_sql(prepared_statement()) -> binary().
get_sql(Prp_stm) ->
    erlang:element(3, Prp_stm).

-file("src/cake/internal/prepared_statement.gleam", 76).
?DOC(false).
-spec get_params(prepared_statement()) -> list(cake@param:param()).
get_params(Prp_stm) ->
    erlang:element(4, Prp_stm).

-file("src/cake/internal/prepared_statement.gleam", 82).
?DOC(false).
-spec get_dialect(prepared_statement()) -> cake@internal@dialect:dialect().
get_dialect(Prp_stm) ->
    erlang:element(6, Prp_stm).

-file("src/cake/internal/prepared_statement.gleam", 98).
?DOC(false).
-spec append_sql_and_params(
    prepared_statement(),
    binary(),
    list(cake@param:param())
) -> prepared_statement().
append_sql_and_params(Prp_stm, Nw_sql, Nw_prms) ->
    _record = Prp_stm,
    {prepared_statement,
        erlang:element(2, _record),
        <<(erlang:element(3, Prp_stm))/binary, Nw_sql/binary>>,
        begin
            _pipe = erlang:element(4, Prp_stm),
            lists:append(_pipe, Nw_prms)
        end,
        erlang:element(5, Prp_stm) + erlang:length(Nw_prms),
        erlang:element(6, _record)}.

-file("src/cake/internal/prepared_statement.gleam", 88).
?DOC(false).
-spec append_sql_and_param(prepared_statement(), binary(), cake@param:param()) -> prepared_statement().
append_sql_and_param(Prp_stm, Nw_sql, Nw_prm) ->
    _pipe = Prp_stm,
    append_sql_and_params(_pipe, Nw_sql, [Nw_prm]).

-file("src/cake/internal/prepared_statement.gleam", 111).
?DOC(false).
-spec next_placeholder(prepared_statement(), cake@internal@dialect:dialect()) -> binary().
next_placeholder(Prp_stm, Dlct) ->
    case Dlct of
        postgres ->
            <<(erlang:element(2, Prp_stm))/binary,
                (begin
                    _pipe = erlang:element(5, Prp_stm),
                    _pipe@1 = gleam@int:add(_pipe, 1),
                    erlang:integer_to_binary(_pipe@1)
                end)/binary>>;

        sqlite ->
            <<(erlang:element(2, Prp_stm))/binary,
                (begin
                    _pipe = erlang:element(5, Prp_stm),
                    _pipe@1 = gleam@int:add(_pipe, 1),
                    erlang:integer_to_binary(_pipe@1)
                end)/binary>>;

        maria ->
            erlang:element(2, Prp_stm);

        mysql ->
            erlang:element(2, Prp_stm)
    end.

-file("src/cake/internal/prepared_statement.gleam", 39).
?DOC(false).
-spec append_param(prepared_statement(), cake@param:param()) -> prepared_statement().
append_param(Prp_stm, Nw_prm) ->
    New_sql = begin
        _pipe = Prp_stm,
        next_placeholder(_pipe, erlang:element(6, Prp_stm))
    end,
    _pipe@1 = Prp_stm,
    append_sql_and_param(_pipe@1, New_sql, Nw_prm).