dm_mail_send Function

public function dm_mail_send(mail, server, error_message, error_curl, debug) result(rc)

Sends SMTP request by calling libcurl.

The function returns the following error codes:

• E_CORRUPT if mail or server type is not initialised properly.
• E_INVALID if mail or server data is invalid.
• E_MAIL if libcurl initialisation failed.
• E_MAIL_AUTH if SMTP authentication failed.
• E_MAIL_CONNECT if connection to server could not be established.
• E_MAIL_SSL if SSL/TLS error occured.

Arguments

Type	Intent	Optional	Attributes		Name
type(mail_type),	intent(inout)			::	mail	Mail type.
type(mail_server_type),	intent(inout)			::	server	Mail server type.
character(len=:),	intent(out),	optional,	allocatable	::	error_message	Error message.
integer,	intent(out),	optional		::	error_curl	cURL error code.
logical,	intent(in),	optional		::	debug	Output debug messages.

Return Value integer