Added NOTIFICATION_STORAGE_MAILER which allow to store the email in a storage (could be just output, file, database ...) Added SMTP implementation, based on EiffelNet SMTP_PROTOCOL. note: it is possible to exclude this by setting ecf variable "smtp_notification_email_disabled" to "True" this way help to manage dependencies, since the Eiffel Net library would not be included neither. Fixed Date header value computation.
55 lines
1.1 KiB
Plaintext
55 lines
1.1 KiB
Plaintext
note
|
|
description: "Summary description for {NOTIFICATION_STORAGE_MAILER}."
|
|
author: ""
|
|
date: "$Date: 2015-06-30 15:49:56 +0200 (mar., 30 juin 2015) $"
|
|
revision: "$Revision: 97588 $"
|
|
|
|
class
|
|
NOTIFICATION_STORAGE_MAILER
|
|
|
|
inherit
|
|
NOTIFICATION_MAILER
|
|
|
|
create
|
|
make
|
|
|
|
feature {NONE} -- Initialization
|
|
|
|
make (a_storage: NOTIFICATION_EMAIL_STORAGE)
|
|
do
|
|
storage := a_storage
|
|
end
|
|
|
|
storage: NOTIFICATION_EMAIL_STORAGE
|
|
|
|
feature -- Status report
|
|
|
|
is_available: BOOLEAN
|
|
-- <Precursor>
|
|
do
|
|
Result := storage.is_available
|
|
end
|
|
|
|
feature -- Basic operation
|
|
|
|
process_email (a_email: NOTIFICATION_EMAIL)
|
|
-- <Precursor>
|
|
do
|
|
storage.put (a_email)
|
|
if storage.has_error then
|
|
report_error ("Issue storing email.")
|
|
end
|
|
end
|
|
|
|
note
|
|
copyright: "2011-2015, Jocelyn Fiat, Javier Velilla, Olivier Ligot, Eiffel Software and others"
|
|
license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)"
|
|
source: "[
|
|
Eiffel Software
|
|
5949 Hollister Ave., Goleta, CA 93117 USA
|
|
Telephone 805-685-1006, Fax 805-685-6869
|
|
Website http://www.eiffel.com
|
|
Customer support http://support.eiffel.com
|
|
]"
|
|
end
|