gsmtp

-module(gsmtp).
-compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function, nowarn_nomatch]).

-export([main/0]).

-file("/home/andre/Code/gleam/gsmtp/src/gsmtp.gleam", 6).
-spec main() -> {ok, nil} | {error, smtp:error()}.
main() ->
    logging_ffi:configure(),
    logging:set_level(debug),
    Message = begin
        _pipe = builder:new_builder(),
        _pipe@1 = builder:from_email(_pipe, <<"send@gleam.com"/utf8>>),
        _pipe@2 = builder:to_emails(_pipe@1, [<<"receive@gleam.com"/utf8>>]),
        _pipe@3 = builder:subject(_pipe@2, <<"Test Gleam E-Mail"/utf8>>),
        _pipe@4 = builder:body(_pipe@3, <<"Mail from Gleam"/utf8>>),
        builder:create(_pipe@4)
    end,
    Auth = {some, {<<"testuser"/utf8>>, <<"start123"/utf8>>}},
    _assert_subject = smtp:send(<<"127.0.0.1"/utf8>>, 2525, Auth, Message),
    {ok, nil} = case _assert_subject of
        {ok, nil} -> _assert_subject;
        _assert_fail ->
            erlang:error(#{gleam_error => let_assert,
                        message => <<"Pattern match failed, no pattern matched the value."/utf8>>,
                        value => _assert_fail,
                        module => <<"gsmtp"/utf8>>,
                        function => <<"main"/utf8>>,
                        line => 20})
    end.