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", 5).
-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, <<"test@example.com"/utf8>>),
        _pipe@2 = builder:to_emails(_pipe@1, [<<"andre@localhost"/utf8>>]),
        _pipe@3 = builder:subject(_pipe@2, <<"SMTP Mail from gleam"/utf8>>),
        _pipe@4 = builder:body(
            _pipe@3,
            <<"This is a test mail from gleam"/utf8>>
        ),
        builder:create(_pipe@4)
    end,
    _assert_subject = smtp:send(<<"127.0.0.1"/utf8>>, 25, 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 => 17})
    end.