first import
This commit is contained in:
60
sites/all/modules/smtp/CHANGELOG.txt
Normal file
60
sites/all/modules/smtp/CHANGELOG.txt
Normal file
@@ -0,0 +1,60 @@
|
||||
|
||||
|
||||
2009-11-12 Franz G Vanderlinde franz@chuva-inc.com
|
||||
* bug report #132903 by johngriffin: definitive integration between Mimemail and SMTP
|
||||
* feature request #132903 by mishhh,franz: Mimemail integration
|
||||
* bug report #465750 from bbirtle,franz: Better parsing and handling of charsets
|
||||
* bug report #207925 by Wim Leers,franz: Adds reply-to in case there are none.
|
||||
* file sv.po was initially added on branch DRUPAL-6--1.
|
||||
* file fr.po was initially added on branch DRUPAL-6--1.
|
||||
|
||||
2008-09-23 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Added the final touch: a workaround for a multipart/mixed
|
||||
logic error in PHPMailer.
|
||||
* po/smtp.pot: Moved to translations/.
|
||||
* class.phpmailer.php.2.0.2.patch, class.phpmailer.php.2.2.1.patch: Added
|
||||
to apply a work around to a logic error in PHPMailer, which is reported
|
||||
here:
|
||||
http://sourceforge.net/tracker/index.php?func=detail&aid=2125119&group_id=26031&atid=385707
|
||||
|
||||
2008-09-18 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: After many hours of research, code refactoring and testing,
|
||||
this module is hopefully MIME 1.0 compliant.
|
||||
|
||||
2008-08-26 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Changed admin/reports/watchdog to admin/reports/dblog, per
|
||||
greggles in IRC.
|
||||
|
||||
2008-07-17 Jason Flatt drupal@oadaeh.net
|
||||
* po: Changed to translations (http://drupal.org/node/262455).
|
||||
translations/de.po: Added (http://drupal.org/node/262455).
|
||||
Added e-mail address validation check for the settings page.
|
||||
Added additional from e-mail address validation checking during the
|
||||
processing of the e-mail message (http://drupal.org/node/281599).
|
||||
|
||||
2008-07-12 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Uncommented two functions that set the from name and e-mail
|
||||
address, per jcwatson11 in http://drupal.org/node/281599.
|
||||
Changed the way two wathcdog message were formatted.
|
||||
po/smtp.pot: Added.
|
||||
|
||||
2008-07-11 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Changed the encryption protocol variable name from
|
||||
$mail->Protocol to $mail->SMTPSecure, per root_of_roots in
|
||||
http://drupal.org/node/280081.
|
||||
Added an administrative option for enabling debugging, per dennys in
|
||||
http://drupal.org/node/199843.
|
||||
Made the "On" and "Off" radio options translatable, per
|
||||
rastatt@drupal.org in http://drupal.org/node/262455#comment-917055.
|
||||
|
||||
2008-07-06 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Continued upgrade process to Drupal 6.x compatibility.
|
||||
Tweaked the inline comments and documentation.
|
||||
Removed _smtp_initialize_language().
|
||||
|
||||
2008-07-04 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Continued upgrade process to Drupal 6.x compatibility.
|
||||
Added $mail->ContentType = 'multipart/mixed';
|
||||
|
||||
2008-07-03 Jason Flatt drupal@oadaeh.net
|
||||
* smtp.module: Began the upgrade process to Drupal 6.x compatibility.
|
339
sites/all/modules/smtp/LICENSE.txt
Normal file
339
sites/all/modules/smtp/LICENSE.txt
Normal file
@@ -0,0 +1,339 @@
|
||||
GNU GENERAL PUBLIC LICENSE
|
||||
Version 2, June 1991
|
||||
|
||||
Copyright (C) 1989, 1991 Free Software Foundation, Inc.,
|
||||
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
||||
Everyone is permitted to copy and distribute verbatim copies
|
||||
of this license document, but changing it is not allowed.
|
||||
|
||||
Preamble
|
||||
|
||||
The licenses for most software are designed to take away your
|
||||
freedom to share and change it. By contrast, the GNU General Public
|
||||
License is intended to guarantee your freedom to share and change free
|
||||
software--to make sure the software is free for all its users. This
|
||||
General Public License applies to most of the Free Software
|
||||
Foundation's software and to any other program whose authors commit to
|
||||
using it. (Some other Free Software Foundation software is covered by
|
||||
the GNU Lesser General Public License instead.) You can apply it to
|
||||
your programs, too.
|
||||
|
||||
When we speak of free software, we are referring to freedom, not
|
||||
price. Our General Public Licenses are designed to make sure that you
|
||||
have the freedom to distribute copies of free software (and charge for
|
||||
this service if you wish), that you receive source code or can get it
|
||||
if you want it, that you can change the software or use pieces of it
|
||||
in new free programs; and that you know you can do these things.
|
||||
|
||||
To protect your rights, we need to make restrictions that forbid
|
||||
anyone to deny you these rights or to ask you to surrender the rights.
|
||||
These restrictions translate to certain responsibilities for you if you
|
||||
distribute copies of the software, or if you modify it.
|
||||
|
||||
For example, if you distribute copies of such a program, whether
|
||||
gratis or for a fee, you must give the recipients all the rights that
|
||||
you have. You must make sure that they, too, receive or can get the
|
||||
source code. And you must show them these terms so they know their
|
||||
rights.
|
||||
|
||||
We protect your rights with two steps: (1) copyright the software, and
|
||||
(2) offer you this license which gives you legal permission to copy,
|
||||
distribute and/or modify the software.
|
||||
|
||||
Also, for each author's protection and ours, we want to make certain
|
||||
that everyone understands that there is no warranty for this free
|
||||
software. If the software is modified by someone else and passed on, we
|
||||
want its recipients to know that what they have is not the original, so
|
||||
that any problems introduced by others will not reflect on the original
|
||||
authors' reputations.
|
||||
|
||||
Finally, any free program is threatened constantly by software
|
||||
patents. We wish to avoid the danger that redistributors of a free
|
||||
program will individually obtain patent licenses, in effect making the
|
||||
program proprietary. To prevent this, we have made it clear that any
|
||||
patent must be licensed for everyone's free use or not licensed at all.
|
||||
|
||||
The precise terms and conditions for copying, distribution and
|
||||
modification follow.
|
||||
|
||||
GNU GENERAL PUBLIC LICENSE
|
||||
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
|
||||
|
||||
0. This License applies to any program or other work which contains
|
||||
a notice placed by the copyright holder saying it may be distributed
|
||||
under the terms of this General Public License. The "Program", below,
|
||||
refers to any such program or work, and a "work based on the Program"
|
||||
means either the Program or any derivative work under copyright law:
|
||||
that is to say, a work containing the Program or a portion of it,
|
||||
either verbatim or with modifications and/or translated into another
|
||||
language. (Hereinafter, translation is included without limitation in
|
||||
the term "modification".) Each licensee is addressed as "you".
|
||||
|
||||
Activities other than copying, distribution and modification are not
|
||||
covered by this License; they are outside its scope. The act of
|
||||
running the Program is not restricted, and the output from the Program
|
||||
is covered only if its contents constitute a work based on the
|
||||
Program (independent of having been made by running the Program).
|
||||
Whether that is true depends on what the Program does.
|
||||
|
||||
1. You may copy and distribute verbatim copies of the Program's
|
||||
source code as you receive it, in any medium, provided that you
|
||||
conspicuously and appropriately publish on each copy an appropriate
|
||||
copyright notice and disclaimer of warranty; keep intact all the
|
||||
notices that refer to this License and to the absence of any warranty;
|
||||
and give any other recipients of the Program a copy of this License
|
||||
along with the Program.
|
||||
|
||||
You may charge a fee for the physical act of transferring a copy, and
|
||||
you may at your option offer warranty protection in exchange for a fee.
|
||||
|
||||
2. You may modify your copy or copies of the Program or any portion
|
||||
of it, thus forming a work based on the Program, and copy and
|
||||
distribute such modifications or work under the terms of Section 1
|
||||
above, provided that you also meet all of these conditions:
|
||||
|
||||
a) You must cause the modified files to carry prominent notices
|
||||
stating that you changed the files and the date of any change.
|
||||
|
||||
b) You must cause any work that you distribute or publish, that in
|
||||
whole or in part contains or is derived from the Program or any
|
||||
part thereof, to be licensed as a whole at no charge to all third
|
||||
parties under the terms of this License.
|
||||
|
||||
c) If the modified program normally reads commands interactively
|
||||
when run, you must cause it, when started running for such
|
||||
interactive use in the most ordinary way, to print or display an
|
||||
announcement including an appropriate copyright notice and a
|
||||
notice that there is no warranty (or else, saying that you provide
|
||||
a warranty) and that users may redistribute the program under
|
||||
these conditions, and telling the user how to view a copy of this
|
||||
License. (Exception: if the Program itself is interactive but
|
||||
does not normally print such an announcement, your work based on
|
||||
the Program is not required to print an announcement.)
|
||||
|
||||
These requirements apply to the modified work as a whole. If
|
||||
identifiable sections of that work are not derived from the Program,
|
||||
and can be reasonably considered independent and separate works in
|
||||
themselves, then this License, and its terms, do not apply to those
|
||||
sections when you distribute them as separate works. But when you
|
||||
distribute the same sections as part of a whole which is a work based
|
||||
on the Program, the distribution of the whole must be on the terms of
|
||||
this License, whose permissions for other licensees extend to the
|
||||
entire whole, and thus to each and every part regardless of who wrote it.
|
||||
|
||||
Thus, it is not the intent of this section to claim rights or contest
|
||||
your rights to work written entirely by you; rather, the intent is to
|
||||
exercise the right to control the distribution of derivative or
|
||||
collective works based on the Program.
|
||||
|
||||
In addition, mere aggregation of another work not based on the Program
|
||||
with the Program (or with a work based on the Program) on a volume of
|
||||
a storage or distribution medium does not bring the other work under
|
||||
the scope of this License.
|
||||
|
||||
3. You may copy and distribute the Program (or a work based on it,
|
||||
under Section 2) in object code or executable form under the terms of
|
||||
Sections 1 and 2 above provided that you also do one of the following:
|
||||
|
||||
a) Accompany it with the complete corresponding machine-readable
|
||||
source code, which must be distributed under the terms of Sections
|
||||
1 and 2 above on a medium customarily used for software interchange; or,
|
||||
|
||||
b) Accompany it with a written offer, valid for at least three
|
||||
years, to give any third party, for a charge no more than your
|
||||
cost of physically performing source distribution, a complete
|
||||
machine-readable copy of the corresponding source code, to be
|
||||
distributed under the terms of Sections 1 and 2 above on a medium
|
||||
customarily used for software interchange; or,
|
||||
|
||||
c) Accompany it with the information you received as to the offer
|
||||
to distribute corresponding source code. (This alternative is
|
||||
allowed only for noncommercial distribution and only if you
|
||||
received the program in object code or executable form with such
|
||||
an offer, in accord with Subsection b above.)
|
||||
|
||||
The source code for a work means the preferred form of the work for
|
||||
making modifications to it. For an executable work, complete source
|
||||
code means all the source code for all modules it contains, plus any
|
||||
associated interface definition files, plus the scripts used to
|
||||
control compilation and installation of the executable. However, as a
|
||||
special exception, the source code distributed need not include
|
||||
anything that is normally distributed (in either source or binary
|
||||
form) with the major components (compiler, kernel, and so on) of the
|
||||
operating system on which the executable runs, unless that component
|
||||
itself accompanies the executable.
|
||||
|
||||
If distribution of executable or object code is made by offering
|
||||
access to copy from a designated place, then offering equivalent
|
||||
access to copy the source code from the same place counts as
|
||||
distribution of the source code, even though third parties are not
|
||||
compelled to copy the source along with the object code.
|
||||
|
||||
4. You may not copy, modify, sublicense, or distribute the Program
|
||||
except as expressly provided under this License. Any attempt
|
||||
otherwise to copy, modify, sublicense or distribute the Program is
|
||||
void, and will automatically terminate your rights under this License.
|
||||
However, parties who have received copies, or rights, from you under
|
||||
this License will not have their licenses terminated so long as such
|
||||
parties remain in full compliance.
|
||||
|
||||
5. You are not required to accept this License, since you have not
|
||||
signed it. However, nothing else grants you permission to modify or
|
||||
distribute the Program or its derivative works. These actions are
|
||||
prohibited by law if you do not accept this License. Therefore, by
|
||||
modifying or distributing the Program (or any work based on the
|
||||
Program), you indicate your acceptance of this License to do so, and
|
||||
all its terms and conditions for copying, distributing or modifying
|
||||
the Program or works based on it.
|
||||
|
||||
6. Each time you redistribute the Program (or any work based on the
|
||||
Program), the recipient automatically receives a license from the
|
||||
original licensor to copy, distribute or modify the Program subject to
|
||||
these terms and conditions. You may not impose any further
|
||||
restrictions on the recipients' exercise of the rights granted herein.
|
||||
You are not responsible for enforcing compliance by third parties to
|
||||
this License.
|
||||
|
||||
7. If, as a consequence of a court judgment or allegation of patent
|
||||
infringement or for any other reason (not limited to patent issues),
|
||||
conditions are imposed on you (whether by court order, agreement or
|
||||
otherwise) that contradict the conditions of this License, they do not
|
||||
excuse you from the conditions of this License. If you cannot
|
||||
distribute so as to satisfy simultaneously your obligations under this
|
||||
License and any other pertinent obligations, then as a consequence you
|
||||
may not distribute the Program at all. For example, if a patent
|
||||
license would not permit royalty-free redistribution of the Program by
|
||||
all those who receive copies directly or indirectly through you, then
|
||||
the only way you could satisfy both it and this License would be to
|
||||
refrain entirely from distribution of the Program.
|
||||
|
||||
If any portion of this section is held invalid or unenforceable under
|
||||
any particular circumstance, the balance of the section is intended to
|
||||
apply and the section as a whole is intended to apply in other
|
||||
circumstances.
|
||||
|
||||
It is not the purpose of this section to induce you to infringe any
|
||||
patents or other property right claims or to contest validity of any
|
||||
such claims; this section has the sole purpose of protecting the
|
||||
integrity of the free software distribution system, which is
|
||||
implemented by public license practices. Many people have made
|
||||
generous contributions to the wide range of software distributed
|
||||
through that system in reliance on consistent application of that
|
||||
system; it is up to the author/donor to decide if he or she is willing
|
||||
to distribute software through any other system and a licensee cannot
|
||||
impose that choice.
|
||||
|
||||
This section is intended to make thoroughly clear what is believed to
|
||||
be a consequence of the rest of this License.
|
||||
|
||||
8. If the distribution and/or use of the Program is restricted in
|
||||
certain countries either by patents or by copyrighted interfaces, the
|
||||
original copyright holder who places the Program under this License
|
||||
may add an explicit geographical distribution limitation excluding
|
||||
those countries, so that distribution is permitted only in or among
|
||||
countries not thus excluded. In such case, this License incorporates
|
||||
the limitation as if written in the body of this License.
|
||||
|
||||
9. The Free Software Foundation may publish revised and/or new versions
|
||||
of the General Public License from time to time. Such new versions will
|
||||
be similar in spirit to the present version, but may differ in detail to
|
||||
address new problems or concerns.
|
||||
|
||||
Each version is given a distinguishing version number. If the Program
|
||||
specifies a version number of this License which applies to it and "any
|
||||
later version", you have the option of following the terms and conditions
|
||||
either of that version or of any later version published by the Free
|
||||
Software Foundation. If the Program does not specify a version number of
|
||||
this License, you may choose any version ever published by the Free Software
|
||||
Foundation.
|
||||
|
||||
10. If you wish to incorporate parts of the Program into other free
|
||||
programs whose distribution conditions are different, write to the author
|
||||
to ask for permission. For software which is copyrighted by the Free
|
||||
Software Foundation, write to the Free Software Foundation; we sometimes
|
||||
make exceptions for this. Our decision will be guided by the two goals
|
||||
of preserving the free status of all derivatives of our free software and
|
||||
of promoting the sharing and reuse of software generally.
|
||||
|
||||
NO WARRANTY
|
||||
|
||||
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
|
||||
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
|
||||
OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
|
||||
PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
|
||||
OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
||||
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
|
||||
TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
|
||||
PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
|
||||
REPAIR OR CORRECTION.
|
||||
|
||||
12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
|
||||
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
|
||||
REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
|
||||
INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
|
||||
OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
|
||||
TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
|
||||
YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
|
||||
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
|
||||
POSSIBILITY OF SUCH DAMAGES.
|
||||
|
||||
END OF TERMS AND CONDITIONS
|
||||
|
||||
How to Apply These Terms to Your New Programs
|
||||
|
||||
If you develop a new program, and you want it to be of the greatest
|
||||
possible use to the public, the best way to achieve this is to make it
|
||||
free software which everyone can redistribute and change under these terms.
|
||||
|
||||
To do so, attach the following notices to the program. It is safest
|
||||
to attach them to the start of each source file to most effectively
|
||||
convey the exclusion of warranty; and each file should have at least
|
||||
the "copyright" line and a pointer to where the full notice is found.
|
||||
|
||||
<one line to give the program's name and a brief idea of what it does.>
|
||||
Copyright (C) <year> <name of author>
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License along
|
||||
with this program; if not, write to the Free Software Foundation, Inc.,
|
||||
51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
||||
|
||||
Also add information on how to contact you by electronic and paper mail.
|
||||
|
||||
If the program is interactive, make it output a short notice like this
|
||||
when it starts in an interactive mode:
|
||||
|
||||
Gnomovision version 69, Copyright (C) year name of author
|
||||
Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
|
||||
This is free software, and you are welcome to redistribute it
|
||||
under certain conditions; type `show c' for details.
|
||||
|
||||
The hypothetical commands `show w' and `show c' should show the appropriate
|
||||
parts of the General Public License. Of course, the commands you use may
|
||||
be called something other than `show w' and `show c'; they could even be
|
||||
mouse-clicks or menu items--whatever suits your program.
|
||||
|
||||
You should also get your employer (if you work as a programmer) or your
|
||||
school, if any, to sign a "copyright disclaimer" for the program, if
|
||||
necessary. Here is a sample; alter the names:
|
||||
|
||||
Yoyodyne, Inc., hereby disclaims all copyright interest in the program
|
||||
`Gnomovision' (which makes passes at compilers) written by James Hacker.
|
||||
|
||||
<signature of Ty Coon>, 1 April 1989
|
||||
Ty Coon, President of Vice
|
||||
|
||||
This General Public License does not permit incorporating your program into
|
||||
proprietary programs. If your program is a subroutine library, you may
|
||||
consider it more useful to permit linking proprietary applications with the
|
||||
library. If this is what you want to do, use the GNU Lesser General
|
||||
Public License instead of this License.
|
43
sites/all/modules/smtp/README.txt
Normal file
43
sites/all/modules/smtp/README.txt
Normal file
@@ -0,0 +1,43 @@
|
||||
|
||||
SMTP Authentication Support module for Drupal 7.x.
|
||||
This module adds SMTP functionality to Drupal.
|
||||
|
||||
REQUIREMENTS
|
||||
------------
|
||||
* Access to an SMTP server
|
||||
* The following PHP extensions need to be installed: ereg, hash, date & pcre.
|
||||
|
||||
* Optional: To connect to an SMTP server using SSL, you need to have the
|
||||
openssl package installed on your server, and your webserver and PHP
|
||||
installation need to have additional components installed and configured.
|
||||
|
||||
INSTALLATION INSTRUCTIONS
|
||||
-------------------------
|
||||
1. Copy the files included in the tarball into a directory named "smtp" in
|
||||
your Drupal sites/all/modules/ directory.
|
||||
2. Login as site administrator.
|
||||
3. Enable the SMTP Authentication Support module on the Administer -> Site
|
||||
building -> Modules page.
|
||||
4. Fill in required settings on the Administer -> Site configuration -> SMTP
|
||||
Authentication Support page.
|
||||
5. Enjoy.
|
||||
|
||||
NOTES
|
||||
-----
|
||||
This module sends email by connecting to an SMTP server. Therefore, you need
|
||||
to have access to an SMTP server for this module to work.
|
||||
|
||||
Drupal will often use the email address entered into Administrator -> Site
|
||||
configuration -> E-mail address as the from address. It is important for
|
||||
this to be the correct address and some ISPs will block email that comes from
|
||||
an invalid address.
|
||||
|
||||
This module no longer uses the PHPMailer package as an external library, instead
|
||||
a slimmed down version of the library have been relicensed and integrated with the
|
||||
smtp module.
|
||||
|
||||
Connecting to an SMTP server using SSL is possible only if PHP's openssl
|
||||
extension is working. If the SMTP module detects openssl is available it
|
||||
will display the options in the modules settings page.
|
||||
|
||||
Sending mail to Gmail requires SSL or TLS.
|
203
sites/all/modules/smtp/smtp.admin.inc
Normal file
203
sites/all/modules/smtp/smtp.admin.inc
Normal file
@@ -0,0 +1,203 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Administrative page code for the smtp module.
|
||||
*
|
||||
*/
|
||||
/**
|
||||
* Administrative settings.
|
||||
*
|
||||
* @return
|
||||
* An array containing form items to place on the module settings page.
|
||||
*/
|
||||
function smtp_admin_settings() {
|
||||
// Override the smtp_library variable.
|
||||
if (module_exists('mimemail') &&
|
||||
strpos(variable_get('smtp_library', ''), 'mimemail')) {
|
||||
// don't touch smtp_library
|
||||
}
|
||||
else {
|
||||
if (variable_get('smtp_on', 0)) {
|
||||
$smtp_path = drupal_get_filename('module', 'smtp');
|
||||
if ($smtp_path) {
|
||||
variable_set('smtp_library', $smtp_path);
|
||||
drupal_set_message(t('SMTP.module is active.'));
|
||||
}
|
||||
// If drupal can't find the path to the module, display an error.
|
||||
else {
|
||||
drupal_set_message(t("SMTP.module error: Can't find file."), 'error');
|
||||
}
|
||||
}
|
||||
// If this module is turned off, delete the variable.
|
||||
else {
|
||||
variable_del('smtp_library');
|
||||
drupal_set_message(t('SMTP.module is INACTIVE.'));
|
||||
}
|
||||
}
|
||||
|
||||
$form['onoff'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('Install options'),
|
||||
);
|
||||
$form['onoff']['smtp_on'] = array(
|
||||
'#type' => 'radios',
|
||||
'#title' => t('Turn this module on or off'),
|
||||
'#default_value' => variable_get('smtp_on', 0),
|
||||
'#options' => array(1 => t('On'), 0 => t('Off')),
|
||||
'#description' => t('To uninstall this module you must turn it off here first.'),
|
||||
);
|
||||
|
||||
$form['server'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('SMTP server settings'),
|
||||
);
|
||||
$form['server']['smtp_host'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('SMTP server'),
|
||||
'#default_value' => variable_get('smtp_host', ''),
|
||||
'#description' => t('The address of your outgoing SMTP server.'),
|
||||
);
|
||||
$form['server']['smtp_hostbackup'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('SMTP backup server'),
|
||||
'#default_value' => variable_get('smtp_hostbackup', ''),
|
||||
'#description' => t('The address of your outgoing SMTP backup server. If the primary server can\'t be found this one will be tried. This is optional.'),
|
||||
);
|
||||
$form['server']['smtp_port'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('SMTP port'),
|
||||
'#size' => 6,
|
||||
'#maxlength' => 6,
|
||||
'#default_value' => variable_get('smtp_port', '25'),
|
||||
'#description' => t('The default SMTP port is 25, if that is being blocked try 80. Gmail uses 465. See !url for more information on configuring for use with Gmail.', array('!url' => l(t('this page'), 'http://gmail.google.com/support/bin/answer.py?answer=13287'))),
|
||||
);
|
||||
// Only display the option if openssl is installed.
|
||||
if (function_exists('openssl_open')) {
|
||||
$encryption_options = array(
|
||||
'standard' => t('No'),
|
||||
'ssl' => t('Use SSL'),
|
||||
'tls' => t('Use TLS'),
|
||||
);
|
||||
$encryption_description = t('This allows connection to an SMTP server that requires SSL encryption such as Gmail.');
|
||||
}
|
||||
// If openssl is not installed, use normal protocol.
|
||||
else {
|
||||
variable_set('smtp_protocol', 'standard');
|
||||
$encryption_options = array('standard' => t('No'));
|
||||
$encryption_description = t('Your PHP installation does not have SSL enabled. See the !url page on php.net for more information. Gmail requires SSL.', array('!url' => l(t('OpenSSL Functions'), 'http://php.net/openssl')));
|
||||
}
|
||||
$form['server']['smtp_protocol'] = array(
|
||||
'#type' => 'select',
|
||||
'#title' => t('Use encrypted protocol'),
|
||||
'#default_value' => variable_get('smtp_protocol', 'standard'),
|
||||
'#options' => $encryption_options,
|
||||
'#description' => $encryption_description,
|
||||
);
|
||||
|
||||
$form['auth'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('SMTP Authentication'),
|
||||
'#description' => t('Leave blank if your SMTP server does not require authentication.'),
|
||||
);
|
||||
$form['auth']['smtp_username'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Username'),
|
||||
'#default_value' => variable_get('smtp_username', ''),
|
||||
'#description' => t('SMTP Username.'),
|
||||
);
|
||||
$form['auth']['smtp_password'] = array(
|
||||
'#type' => 'password',
|
||||
'#title' => t('Password'),
|
||||
'#default_value' => variable_get('smtp_password', ''),
|
||||
'#description' => t('SMTP password. Leave blank if you don\'t wish to change it.'),
|
||||
);
|
||||
|
||||
$form['email_options'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('E-mail options'),
|
||||
);
|
||||
$form['email_options']['smtp_from'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('E-mail from address'),
|
||||
'#default_value' => variable_get('smtp_from', ''),
|
||||
'#description' => t('The e-mail address that all e-mails will be from.'),
|
||||
);
|
||||
$form['email_options']['smtp_fromname'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('E-mail from name'),
|
||||
'#default_value' => variable_get('smtp_fromname', ''),
|
||||
'#description' => t('The name that all e-mails will be from. If left blank will use the site name of:') . ' ' . variable_get('site_name', 'Drupal powered site'),
|
||||
);
|
||||
$form['email_options']['smtp_allowhtml'] = array(
|
||||
'#type' => 'checkbox',
|
||||
'#title' => t('Allow to send e-mails formated as Html'),
|
||||
'#default_value' => variable_get('smtp_allowhtml', 0),
|
||||
'#description' => t('Cheking this box will allow Html formated e-mails to be sent with the SMTP protocol.'),
|
||||
);
|
||||
|
||||
// If an address was given, send a test e-mail message.
|
||||
$test_address = variable_get('smtp_test_address', '');
|
||||
if ($test_address != '') {
|
||||
// Clear the variable so only one message is sent.
|
||||
variable_del('smtp_test_address');
|
||||
global $language;
|
||||
$params['subject'] = t('Drupal SMTP test e-mail');
|
||||
$params['body'] = array(t('If you receive this message it means your site is capable of using SMTP to send e-mail.'));
|
||||
drupal_mail('smtp', 'smtp-test', $test_address, $language, $params);
|
||||
drupal_set_message(t('A test e-mail has been sent to @email. You may want to !check for any error messages.', array('@email' => $test_address, '!check' => l(t('check the logs'), 'admin/reports/dblog'))));
|
||||
}
|
||||
$form['email_test'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('Send test e-mail'),
|
||||
);
|
||||
$form['email_test']['smtp_test_address'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('E-mail address to send a test e-mail to'),
|
||||
'#default_value' => '',
|
||||
'#description' => t('Type in an address to have a test e-mail sent there.'),
|
||||
);
|
||||
|
||||
$form['smtp_debugging'] = array(
|
||||
'#type' => 'checkbox',
|
||||
'#title' => t('Enable debugging'),
|
||||
'#default_value' => variable_get('smtp_debugging', 0),
|
||||
'#description' => t('Checking this box will print SMTP messages from the server for every e-mail that is sent.'),
|
||||
);
|
||||
|
||||
return system_settings_form($form);
|
||||
} // End of smtp_admin_settings().
|
||||
|
||||
|
||||
|
||||
/**
|
||||
* Validation for the administrative settings form.
|
||||
*
|
||||
* @param form
|
||||
* An associative array containing the structure of the form.
|
||||
* @param form_state
|
||||
* A keyed array containing the current state of the form.
|
||||
*/
|
||||
function smtp_admin_settings_validate($form, &$form_state) {
|
||||
if ($form_state['values']['smtp_on'] == 1 && $form_state['values']['smtp_host'] == '') {
|
||||
form_set_error('smtp_host', t('You must enter an SMTP server address.'));
|
||||
}
|
||||
|
||||
if ($form_state['values']['smtp_on'] == 1 && $form_state['values']['smtp_port'] == '') {
|
||||
form_set_error('smtp_port', t('You must enter an SMTP port number.'));
|
||||
}
|
||||
|
||||
if ($form_state['values']['smtp_from'] && !valid_email_address($form_state['values']['smtp_from'])) {
|
||||
form_set_error('smtp_from', t('The provided from e-mail address is not valid.'));
|
||||
}
|
||||
// If username is set empty, we must set both username/password empty as
|
||||
// as well.
|
||||
if (empty($form_state['values']['smtp_username'])) {
|
||||
$form_state['values']['smtp_password'] = '';
|
||||
}
|
||||
// A little hack. When form is presentend, the password is not shown (Drupal way of doing).
|
||||
// So, if user submits the form without changing the password, we must prevent it from being reset.
|
||||
elseif (empty($form_state['values']['smtp_password'])) {
|
||||
unset($form_state['values']['smtp_password']);
|
||||
}
|
||||
} // End of smtp_admin_settings_validate().
|
||||
|
17
sites/all/modules/smtp/smtp.info
Normal file
17
sites/all/modules/smtp/smtp.info
Normal file
@@ -0,0 +1,17 @@
|
||||
name = SMTP Authentication Support
|
||||
description = "Allow for site emails to be sent through an SMTP server of your choice."
|
||||
core = 7.x
|
||||
package = Mail
|
||||
configure = admin/config/system/smtp
|
||||
files[] = smtp.module
|
||||
files[] = smtp.admin.inc
|
||||
files[] = smtp.mail.inc
|
||||
files[] = smtp.phpmailer.inc
|
||||
files[] = smtp.transport.inc
|
||||
|
||||
; Information added by drupal.org packaging script on 2012-09-21
|
||||
version = "7.x-1.0-beta2"
|
||||
core = "7.x"
|
||||
project = "smtp"
|
||||
datestamp = "1348254500"
|
||||
|
51
sites/all/modules/smtp/smtp.install
Normal file
51
sites/all/modules/smtp/smtp.install
Normal file
@@ -0,0 +1,51 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* @file
|
||||
* The installation instructions for the SMTP Authentication Support.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implementation of hook_install().
|
||||
*/
|
||||
function smtp_install() {
|
||||
variable_set('smtp_on', 0);
|
||||
}
|
||||
/**
|
||||
* @file
|
||||
* The uninstallation instructions for the SMTP Authentication Support.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implementation of hook_uninstall().
|
||||
*/
|
||||
function smtp_uninstall() {
|
||||
variable_del('smtp_from');
|
||||
variable_del('smtp_fromname');
|
||||
variable_del('smtp_host');
|
||||
variable_del('smtp_hostbackup');
|
||||
variable_del('smtp_on');
|
||||
variable_del('smtp_password');
|
||||
variable_del('smtp_port');
|
||||
variable_del('smtp_protocol');
|
||||
variable_del('smtp_test_address');
|
||||
variable_del('smtp_username');
|
||||
|
||||
if (variable_get('smtp_library', '') == drupal_get_path('module', 'smtp') . '/smtp.module') {
|
||||
variable_del('smtp_library');
|
||||
}
|
||||
} // End of contact_attach_uninstall().
|
||||
|
||||
function smtp_enable() {
|
||||
variable_set('mail_system', array('default-system' => 'SmtpMailSystem'));
|
||||
}
|
||||
|
||||
function smtp_disable() {
|
||||
variable_set('mail_system', array('default-system' => 'DefaultMailSystem'));
|
||||
}
|
||||
|
||||
function smtp_update_7000() {
|
||||
if (variable_get('smtp_on', 0) != 0) {
|
||||
variable_set('mail_system', array('default-system' => 'SmtpMailSystem'));
|
||||
}
|
||||
}
|
593
sites/all/modules/smtp/smtp.mail.inc
Normal file
593
sites/all/modules/smtp/smtp.mail.inc
Normal file
@@ -0,0 +1,593 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* The code processing mail in the smtp module.
|
||||
*
|
||||
*/
|
||||
|
||||
/**
|
||||
* Modify the drupal mail system to use smtp when sending emails.
|
||||
* Include the option to choose between plain text or HTML
|
||||
*/
|
||||
class SmtpMailSystem implements MailSystemInterface {
|
||||
|
||||
protected $AllowHtml;
|
||||
/**
|
||||
* Concatenate and wrap the e-mail body for either
|
||||
* plain-text or HTML emails.
|
||||
*
|
||||
* @param $message
|
||||
* A message array, as described in hook_mail_alter().
|
||||
*
|
||||
* @return
|
||||
* The formatted $message.
|
||||
*/
|
||||
public function format(array $message) {
|
||||
$this->AllowHtml = variable_get('smtp_allowhtml', 0);
|
||||
// Join the body array into one string.
|
||||
$message['body'] = implode("\n\n", $message['body']);
|
||||
if ($this->AllowHtml == 0) {
|
||||
// Convert any HTML to plain-text.
|
||||
$message['body'] = drupal_html_to_text($message['body']);
|
||||
// Wrap the mail body for sending.
|
||||
$message['body'] = drupal_wrap_mail($message['body']);
|
||||
}
|
||||
return $message;
|
||||
}
|
||||
|
||||
/**
|
||||
* Send the e-mail message.
|
||||
*
|
||||
* @see drupal_mail()
|
||||
*
|
||||
* @param $message
|
||||
* A message array, as described in hook_mail_alter().
|
||||
* @return
|
||||
* TRUE if the mail was successfully accepted, otherwise FALSE.
|
||||
*/
|
||||
public function mail(array $message) {
|
||||
$id = $message['id'];
|
||||
$to = $message['to'];
|
||||
$from = $message['from'];
|
||||
$subject = $message['subject'];
|
||||
$body = $message['body'];
|
||||
$headers = $message['headers'];
|
||||
|
||||
// Create a new PHPMailer object - autoloaded from registry.
|
||||
$mailer = new PHPMailer();
|
||||
|
||||
// Turn on debugging, if requested.
|
||||
if (variable_get('smtp_debugging', 0) == 1) {
|
||||
$mailer->SMTPDebug = TRUE;
|
||||
}
|
||||
|
||||
// Set the from name and e-mail address.
|
||||
if (variable_get('smtp_fromname', '') != '') {
|
||||
$from_name = variable_get('smtp_fromname', '');
|
||||
}
|
||||
else {
|
||||
// If value is not defined in settings, use site_name.
|
||||
$from_name = variable_get('site_name', '');
|
||||
}
|
||||
|
||||
//Hack to fix reply-to issue.
|
||||
$properfrom = variable_get('site_mail', '');
|
||||
if (!empty($properfrom)) {
|
||||
$headers['From'] = $properfrom;
|
||||
}
|
||||
if (!isset($headers['Reply-To']) || empty($headers['Reply-To'])) {
|
||||
if (strpos($from, '<')) {
|
||||
$reply = preg_replace('/>.*/', '', preg_replace('/.*</', '', $from));
|
||||
}
|
||||
else {
|
||||
$reply = $from;
|
||||
}
|
||||
$headers['Reply-To'] = $reply;
|
||||
}
|
||||
|
||||
// Blank value will let the e-mail address appear.
|
||||
|
||||
if ($from == NULL || $from == '') {
|
||||
// If from e-mail address is blank, use smtp_from config option.
|
||||
if (($from = variable_get('smtp_from', '')) == '') {
|
||||
// If smtp_from config option is blank, use site_email.
|
||||
if (($from = variable_get('site_mail', '')) == '') {
|
||||
drupal_set_message(t('There is no submitted from address.'), 'error');
|
||||
watchdog('smtp', 'There is no submitted from address.', array(), WATCHDOG_ERROR);
|
||||
return FALSE;
|
||||
}
|
||||
}
|
||||
}
|
||||
if (preg_match('/^"?.*"?\s*<.*>$/', $from)) {
|
||||
// . == Matches any single character except line break characters \r and \n.
|
||||
// * == Repeats the previous item zero or more times.
|
||||
$from_name = preg_replace('/"?([^("\t\n)]*)"?.*$/', '$1', $from); // It gives: Name
|
||||
$from = preg_replace("/(.*)\<(.*)\>/i", '$2', $from); // It gives: name@domain.tld
|
||||
}
|
||||
elseif (!valid_email_address($from)) {
|
||||
drupal_set_message(t('The submitted from address (@from) is not valid.', array('@from' => $from)), 'error');
|
||||
watchdog('smtp', 'The submitted from address (@from) is not valid.', array('@from' => $from), WATCHDOG_ERROR);
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Defines the From value to what we expect.
|
||||
$mailer->From = $from;
|
||||
$mailer->FromName = $from_name;
|
||||
$mailer->Sender = $from;
|
||||
|
||||
|
||||
// Create the list of 'To:' recipients.
|
||||
$torecipients = explode(',', $to);
|
||||
foreach ($torecipients as $torecipient) {
|
||||
if (strpos($torecipient, '<') !== FALSE) {
|
||||
$toparts = explode(' <', $torecipient);
|
||||
$toname = $toparts[0];
|
||||
$toaddr = rtrim($toparts[1], '>');
|
||||
}
|
||||
else {
|
||||
$toname = '';
|
||||
$toaddr = $torecipient;
|
||||
}
|
||||
$mailer->AddAddress($toaddr, $toname);
|
||||
}
|
||||
|
||||
|
||||
// Parse the headers of the message and set the PHPMailer object's settings
|
||||
// accordingly.
|
||||
foreach ($headers as $key => $value) {
|
||||
//watchdog('error', 'Key: ' . $key . ' Value: ' . $value);
|
||||
switch (drupal_strtolower($key)) {
|
||||
case 'from':
|
||||
if ($from == NULL or $from == '') {
|
||||
// If a from value was already given, then set based on header.
|
||||
// Should be the most common situation since drupal_mail moves the
|
||||
// from to headers.
|
||||
$from = $value;
|
||||
$mailer->From = $value;
|
||||
// then from can be out of sync with from_name !
|
||||
$mailer->FromName = '';
|
||||
$mailer->Sender = $value;
|
||||
}
|
||||
break;
|
||||
case 'content-type':
|
||||
// Parse several values on the Content-type header, storing them in an array like
|
||||
// key=value -> $vars['key']='value'
|
||||
$vars = explode(';', $value);
|
||||
foreach ($vars as $i => $var) {
|
||||
if ($cut = strpos($var, '=')) {
|
||||
$new_var = trim(drupal_strtolower(drupal_substr($var, $cut + 1)));
|
||||
$new_key = trim(drupal_substr($var, 0, $cut));
|
||||
unset($vars[$i]);
|
||||
$vars[$new_key] = $new_var;
|
||||
}
|
||||
}
|
||||
// Set the charset based on the provided value, otherwise set it to UTF-8 (which is Drupals internal default).
|
||||
$mailer->CharSet = isset($vars['charset']) ? $vars['charset'] : 'UTF-8';
|
||||
|
||||
switch ($vars[0]) {
|
||||
case 'text/plain':
|
||||
// The message includes only a plain text part.
|
||||
$mailer->IsHTML(FALSE);
|
||||
$content_type = 'text/plain';
|
||||
break;
|
||||
case 'text/html':
|
||||
// The message includes only an HTML part.
|
||||
$mailer->IsHTML(TRUE);
|
||||
$content_type = 'text/html';
|
||||
break;
|
||||
case 'multipart/related':
|
||||
// Get the boundary ID from the Content-Type header.
|
||||
$boundary = $this->_get_substring($value, 'boundary', '"', '"');
|
||||
|
||||
// The message includes an HTML part w/inline attachments.
|
||||
$mailer->ContentType = $content_type = 'multipart/related; boundary="' . $boundary . '"';
|
||||
break;
|
||||
case 'multipart/alternative':
|
||||
// The message includes both a plain text and an HTML part.
|
||||
$mailer->ContentType = $content_type = 'multipart/alternative';
|
||||
|
||||
// Get the boundary ID from the Content-Type header.
|
||||
$boundary = $this->_get_substring($value, 'boundary', '"', '"');
|
||||
break;
|
||||
case 'multipart/mixed':
|
||||
// The message includes one or more attachments.
|
||||
$mailer->ContentType = $content_type = 'multipart/mixed';
|
||||
|
||||
// Get the boundary ID from the Content-Type header.
|
||||
$boundary = $this->_get_substring($value, 'boundary', '"', '"');
|
||||
break;
|
||||
default:
|
||||
// Everything else is unsuppored by PHPMailer.
|
||||
drupal_set_message(t('The %header of your message is not supported by PHPMailer and will be sent as text/plain instead.', array('%header' => "Content-Type: $value")), 'error');
|
||||
watchdog('smtp', 'The %header of your message is not supported by PHPMailer and will be sent as text/plain instead.', array('%header' => "Content-Type: $value"), WATCHDOG_ERROR);
|
||||
|
||||
// Force the Content-Type to be text/plain.
|
||||
$mailer->IsHTML(FALSE);
|
||||
$content_type = 'text/plain';
|
||||
}
|
||||
break;
|
||||
|
||||
case 'reply-to':
|
||||
// Only add a "reply-to" if it's not the same as "return-path".
|
||||
if ($value != $headers['Return-Path']) {
|
||||
if (strpos($value, '<') !== FALSE) {
|
||||
$replyToParts = explode('<', $value);
|
||||
$replyToName = trim($replyToParts[0]);
|
||||
$replyToName = trim($replyToName, '"');
|
||||
$replyToAddr = rtrim($replyToParts[1], '>');
|
||||
$mailer->AddReplyTo($replyToAddr, $replyToName);
|
||||
}
|
||||
else {
|
||||
$mailer->AddReplyTo($value);
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
case 'content-transfer-encoding':
|
||||
$mailer->Encoding = $value;
|
||||
break;
|
||||
|
||||
case 'return-path':
|
||||
case 'mime-version':
|
||||
case 'x-mailer':
|
||||
// Let PHPMailer specify these.
|
||||
break;
|
||||
|
||||
case 'errors-to':
|
||||
$mailer->AddCustomHeader('Errors-To: ' . $value);
|
||||
break;
|
||||
|
||||
case 'cc':
|
||||
$ccrecipients = explode(',', $value);
|
||||
foreach ($ccrecipients as $ccrecipient) {
|
||||
if (strpos($ccrecipient, '<') !== FALSE) {
|
||||
$ccparts = explode(' <', $ccrecipient);
|
||||
$ccname = $ccparts[0];
|
||||
$ccaddr = rtrim($ccparts[1], '>');
|
||||
}
|
||||
else {
|
||||
$ccname = '';
|
||||
$ccaddr = $ccrecipient;
|
||||
}
|
||||
$mailer->AddBCC($ccaddr, $ccname);
|
||||
}
|
||||
break;
|
||||
|
||||
case 'bcc':
|
||||
$bccrecipients = explode(',', $value);
|
||||
foreach ($bccrecipients as $bccrecipient) {
|
||||
if (strpos($bccrecipient, '<') !== FALSE) {
|
||||
$bccparts = explode(' <', $bccrecipient);
|
||||
$bccname = $bccparts[0];
|
||||
$bccaddr = rtrim($bccparts[1], '>');
|
||||
}
|
||||
else {
|
||||
$bccname = '';
|
||||
$bccaddr = $bccrecipient;
|
||||
}
|
||||
$mailer->AddBCC($bccaddr, $bccname);
|
||||
}
|
||||
break;
|
||||
|
||||
default:
|
||||
// The header key is not special - add it as is.
|
||||
$mailer->AddCustomHeader($key . ': ' . $value);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
/**
|
||||
* TODO
|
||||
* Need to figure out the following.
|
||||
|
||||
// Add one last header item, but not if it has already been added.
|
||||
$errors_to = FALSE;
|
||||
foreach ($mailer->CustomHeader as $custom_header) {
|
||||
if ($custom_header[0] = '') {
|
||||
$errors_to = TRUE;
|
||||
}
|
||||
}
|
||||
if ($errors_to) {
|
||||
$mailer->AddCustomHeader('Errors-To: '. $from);
|
||||
}
|
||||
*/
|
||||
|
||||
|
||||
// Add the message's subject.
|
||||
$mailer->Subject = $subject;
|
||||
|
||||
|
||||
// Processes the message's body.
|
||||
switch ($content_type) {
|
||||
case 'multipart/related':
|
||||
$mailer->Body = $body;
|
||||
|
||||
/**
|
||||
* TODO
|
||||
* Firgure out if there is anything more to handling this type.
|
||||
*/
|
||||
|
||||
break;
|
||||
|
||||
case 'multipart/alternative':
|
||||
// Split the body based on the boundary ID.
|
||||
$body_parts = $this->_boundary_split($body, $boundary);
|
||||
foreach ($body_parts as $body_part) {
|
||||
// If plain/text within the body part, add it to $mailer->AltBody.
|
||||
if (strpos($body_part, 'text/plain')) {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
// Include it as part of the mail object.
|
||||
$mailer->AltBody = $body_part;
|
||||
}
|
||||
// If plain/html within the body part, add it to $mailer->Body.
|
||||
elseif (strpos($body_part, 'text/html')) {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
// Include it as part of the mail object.
|
||||
$mailer->Body = $body_part;
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
case 'multipart/mixed':
|
||||
// Split the body based on the boundary ID.
|
||||
$body_parts = $this->_boundary_split($body, $boundary);
|
||||
|
||||
// Determine if there is an HTML part for when adding the plain text part.
|
||||
$text_plain = FALSE;
|
||||
$text_html = FALSE;
|
||||
foreach ($body_parts as $body_part) {
|
||||
if (strpos($body_part, 'text/plain')) {
|
||||
$text_plain = TRUE;
|
||||
}
|
||||
if (strpos($body_part, 'text/html')) {
|
||||
$text_html = TRUE;
|
||||
}
|
||||
}
|
||||
|
||||
foreach ($body_parts as $body_part) {
|
||||
// If test/plain within the body part, add it to either
|
||||
// $mailer->AltBody or $mailer->Body, depending on whether there is
|
||||
// also a text/html part ot not.
|
||||
if (strpos($body_part, 'multipart/alternative')) {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
// Get boundary ID from the Content-Type header.
|
||||
$boundary2 = $this->_get_substring($body_part, 'boundary', '"', '"');
|
||||
// Split the body based on the boundary ID.
|
||||
$body_parts2 = $this->_boundary_split($body_part, $boundary2);
|
||||
|
||||
foreach ($body_parts2 as $body_part2) {
|
||||
// If plain/text within the body part, add it to $mailer->AltBody.
|
||||
if (strpos($body_part2, 'text/plain')) {
|
||||
// Clean up the text.
|
||||
$body_part2 = trim($this->_remove_headers(trim($body_part2)));
|
||||
// Include it as part of the mail object.
|
||||
$mailer->AltBody = $body_part2;
|
||||
$mailer->ContentType = 'multipart/mixed';
|
||||
}
|
||||
// If plain/html within the body part, add it to $mailer->Body.
|
||||
elseif (strpos($body_part2, 'text/html')) {
|
||||
// Clean up the text.
|
||||
$body_part2 = trim($this->_remove_headers(trim($body_part2)));
|
||||
// Include it as part of the mail object.
|
||||
$mailer->Body = $body_part2;
|
||||
$mailer->ContentType = 'multipart/mixed';
|
||||
}
|
||||
}
|
||||
}
|
||||
// If text/plain within the body part, add it to $mailer->Body.
|
||||
elseif (strpos($body_part, 'text/plain')) {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
|
||||
if ($text_html) {
|
||||
$mailer->AltBody = $body_part;
|
||||
$mailer->IsHTML(TRUE);
|
||||
$mailer->ContentType = 'multipart/mixed';
|
||||
}
|
||||
else {
|
||||
$mailer->Body = $body_part;
|
||||
$mailer->IsHTML(FALSE);
|
||||
$mailer->ContentType = 'multipart/mixed';
|
||||
}
|
||||
}
|
||||
// If text/html within the body part, add it to $mailer->Body.
|
||||
elseif (strpos($body_part, 'text/html')) {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
// Include it as part of the mail object.
|
||||
$mailer->Body = $body_part;
|
||||
$mailer->IsHTML(TRUE);
|
||||
$mailer->ContentType = 'multipart/mixed';
|
||||
}
|
||||
// Add the attachment.
|
||||
elseif (strpos($body_part, 'Content-Disposition: attachment;')) {
|
||||
$file_path = $this->_get_substring($body_part, 'filename=', '"', '"');
|
||||
$file_name = $this->_get_substring($body_part, ' name=', '"', '"');
|
||||
$file_encoding = $this->_get_substring($body_part, 'Content-Transfer-Encoding', ' ', "\n");
|
||||
$file_type = $this->_get_substring($body_part, 'Content-Type', ' ', ';');
|
||||
|
||||
if (file_exists($file_path)) {
|
||||
if (!$mailer->AddAttachment($file_path, $file_name, $file_encoding, $filetype)) {
|
||||
drupal_set_message(t('Attahment could not be found or accessed.'));
|
||||
}
|
||||
}
|
||||
else {
|
||||
// Clean up the text.
|
||||
$body_part = trim($this->_remove_headers(trim($body_part)));
|
||||
|
||||
if (drupal_strtolower($file_encoding) == 'base64') {
|
||||
$attachment = base64_decode($body_part);
|
||||
}
|
||||
elseif (drupal_strtolower($file_encoding) == 'quoted-printable') {
|
||||
$attachment = quoted_printable_decode($body_part);
|
||||
}
|
||||
else {
|
||||
$attachment = $body_part;
|
||||
}
|
||||
|
||||
$attachment_new_filename = tempnam(realpath(file_directory_temp()), 'smtp');
|
||||
$file_path = file_save_data($attachment, $attachment_new_filename, FILE_EXISTS_RENAME);
|
||||
|
||||
if (!$mailer->AddAttachment($file_path, $file_name)) { // , $file_encoding, $filetype);
|
||||
drupal_set_message(t('Attachment could not be found or accessed.'));
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
default:
|
||||
$mailer->Body = $body;
|
||||
break;
|
||||
}
|
||||
|
||||
|
||||
// Set the authentication settings.
|
||||
$username = variable_get('smtp_username', '');
|
||||
$password = variable_get('smtp_password', '');
|
||||
|
||||
// If username and password are given, use SMTP authentication.
|
||||
if ($username != '' && $password != '') {
|
||||
$mailer->SMTPAuth = TRUE;
|
||||
$mailer->Username = $username;
|
||||
$mailer->Password = $password;
|
||||
}
|
||||
|
||||
|
||||
// Set the protocol prefix for the smtp host.
|
||||
switch (variable_get('smtp_protocol', 'standard')) {
|
||||
case 'ssl':
|
||||
$mailer->SMTPSecure = 'ssl';
|
||||
break;
|
||||
|
||||
case 'tls':
|
||||
$mailer->SMTPSecure = 'tls';
|
||||
break;
|
||||
|
||||
default:
|
||||
$mailer->SMTPSecure = '';
|
||||
}
|
||||
|
||||
|
||||
// Set other connection settings.
|
||||
$mailer->Host = variable_get('smtp_host', '') . ';' . variable_get('smtp_hostbackup', '');
|
||||
$mailer->Port = variable_get('smtp_port', '25');
|
||||
$mailer->Mailer = 'smtp';
|
||||
|
||||
|
||||
// Let the people know what is going on.
|
||||
watchdog('smtp', 'Sending mail to: @to', array('@to' => $to));
|
||||
|
||||
// Try to send e-mail. If it fails, set watchdog entry.
|
||||
if (!$mailer->Send()) {
|
||||
watchdog('smtp', 'Error sending e-mail from @from to @to : !error_message', array('@from' => $from, '@to' => $to, '!error_message' => $mailer->ErrorInfo), WATCHDOG_ERROR);
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
$mailer->SmtpClose();
|
||||
return TRUE;
|
||||
}
|
||||
/**
|
||||
* Splits the input into parts based on the given boundary.
|
||||
*
|
||||
* Swiped from Mail::MimeDecode, with modifications based on Drupal's coding
|
||||
* standards and this bug report: http://pear.php.net/bugs/bug.php?id=6495
|
||||
*
|
||||
* @param input
|
||||
* A string containing the body text to parse.
|
||||
* @param boundary
|
||||
* A string with the boundary string to parse on.
|
||||
* @return
|
||||
* An array containing the resulting mime parts
|
||||
*/
|
||||
protected function _boundary_split($input, $boundary) {
|
||||
$parts = array();
|
||||
$bs_possible = drupal_substr($boundary, 2, -2);
|
||||
$bs_check = '\"' . $bs_possible . '\"';
|
||||
|
||||
if ($boundary == $bs_check) {
|
||||
$boundary = $bs_possible;
|
||||
}
|
||||
|
||||
$tmp = explode('--' . $boundary, $input);
|
||||
|
||||
for ($i = 1; $i < count($tmp); $i++) {
|
||||
if (trim($tmp[$i])) {
|
||||
$parts[] = $tmp[$i];
|
||||
}
|
||||
}
|
||||
|
||||
return $parts;
|
||||
} // End of _smtp_boundary_split().
|
||||
|
||||
|
||||
|
||||
/**
|
||||
* Strips the headers from the body part.
|
||||
*
|
||||
* @param input
|
||||
* A string containing the body part to strip.
|
||||
* @return
|
||||
* A string with the stripped body part.
|
||||
*/
|
||||
protected function _remove_headers($input) {
|
||||
$part_array = explode("\n", $input);
|
||||
|
||||
if (strpos($part_array[0], 'Content') !== FALSE) {
|
||||
if (strpos($part_array[1], 'Content') !== FALSE) {
|
||||
if (strpos($part_array[2], 'Content') !== FALSE) {
|
||||
array_shift($part_array);
|
||||
array_shift($part_array);
|
||||
array_shift($part_array);
|
||||
}
|
||||
else {
|
||||
array_shift($part_array);
|
||||
array_shift($part_array);
|
||||
}
|
||||
}
|
||||
else {
|
||||
array_shift($part_array);
|
||||
}
|
||||
}
|
||||
|
||||
$output = implode("\n", $part_array);
|
||||
return $output;
|
||||
} // End of _smtp_remove_headers().
|
||||
|
||||
|
||||
|
||||
/**
|
||||
* Returns a string that is contained within another string.
|
||||
*
|
||||
* Returns the string from within $source that is some where after $target
|
||||
* and is between $beginning_character and $ending_character.
|
||||
*
|
||||
* @param $source
|
||||
* A string containing the text to look through.
|
||||
* @param $target
|
||||
* A string containing the text in $source to start looking from.
|
||||
* @param $beginning_character
|
||||
* A string containing the character just before the sought after text.
|
||||
* @param $ending_character
|
||||
* A string containing the character just after the sought after text.
|
||||
* @return
|
||||
* A string with the text found between the $beginning_character and the
|
||||
* $ending_character.
|
||||
*/
|
||||
protected function _get_substring($source, $target, $beginning_character, $ending_character) {
|
||||
$search_start = strpos($source, $target) + 1;
|
||||
$first_character = strpos($source, $beginning_character, $search_start) + 1;
|
||||
$second_character = strpos($source, $ending_character, $first_character) + 1;
|
||||
$substring = drupal_substr($source, $first_character, $second_character - $first_character);
|
||||
$string_length = drupal_strlen($substring) - 1;
|
||||
|
||||
if ($substring[$string_length] == $ending_character) {
|
||||
$substring = drupal_substr($substring, 0, $string_length);
|
||||
}
|
||||
|
||||
return $substring;
|
||||
} // End of _smtp_get_substring().
|
||||
}
|
63
sites/all/modules/smtp/smtp.module
Normal file
63
sites/all/modules/smtp/smtp.module
Normal file
@@ -0,0 +1,63 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* @file
|
||||
* Enables Drupal to send e-mail directly to an SMTP server.
|
||||
*
|
||||
* This module uses a customized extract of the PHPMailer
|
||||
* library (originally by Brent R. Matzelle, now maintained
|
||||
* by Codeworx Tech.) relicensed from LGPL to GPL, included
|
||||
* as a part of the module.
|
||||
*
|
||||
* Overriding mail handling in Drupal to make SMTP the default
|
||||
* transport layer, requires to change the mail_system variable's
|
||||
* default value array('default-system' => 'DefaultMailSystem').
|
||||
* This module uses array('default-system' => 'SmtpMailSystem').
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implementation of hook_help().
|
||||
*/
|
||||
function smtp_help($path, $arg) {
|
||||
switch ($path) {
|
||||
case 'admin/help#smtp':
|
||||
return t('Allow for site emails to be sent through an SMTP server of your choice.');
|
||||
}
|
||||
} // End of smtp_help().
|
||||
|
||||
/**
|
||||
* Implementation of hook_menu().
|
||||
*/
|
||||
function smtp_menu() {
|
||||
$items['admin/config/system/smtp'] = array(
|
||||
'title' => 'SMTP Authentication Support',
|
||||
'page callback' => 'drupal_get_form',
|
||||
'page arguments' => array('smtp_admin_settings'),
|
||||
'access arguments' => array('administer smtp module'),
|
||||
'description' => 'Allow for site emails to be sent through an SMTP server of your choice.',
|
||||
'file' => 'smtp.admin.inc',
|
||||
);
|
||||
return $items;
|
||||
} // End of smtp_menu().
|
||||
|
||||
/**
|
||||
* Implementation of hook_permission().
|
||||
*/
|
||||
function smtp_permission() {
|
||||
return array(
|
||||
'administer smtp module' => array(
|
||||
'title' => t('Administer SMTP Authentication Support module'),
|
||||
'description' => t('Perform administration tasks for SMTP Authentication Support module.'))
|
||||
);
|
||||
} // End of smtp_permission().
|
||||
|
||||
|
||||
/**
|
||||
* Implementation of hook_mail().
|
||||
*/
|
||||
function smtp_mail($key, &$message, $params) {
|
||||
if ($key == 'smtp-test') {
|
||||
$message['subject'] = $params['subject'];
|
||||
$message['body'] = $params['body'];
|
||||
}
|
||||
} // End of smtp_mail().
|
2323
sites/all/modules/smtp/smtp.phpmailer.inc
Normal file
2323
sites/all/modules/smtp/smtp.phpmailer.inc
Normal file
File diff suppressed because it is too large
Load Diff
816
sites/all/modules/smtp/smtp.transport.inc
Normal file
816
sites/all/modules/smtp/smtp.transport.inc
Normal file
@@ -0,0 +1,816 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* SMTP mail transport class for the smtp module,based on code of the phpmailer
|
||||
* library, customized and relicensed to GPLv2
|
||||
*
|
||||
*/
|
||||
/*~ class.smtp.php
|
||||
Orginal release information:
|
||||
.---------------------------------------------------------------------------.
|
||||
| Software: PHPMailer - PHP email class |
|
||||
| Version: 5.1 |
|
||||
| Contact: via sourceforge.net support pages (also www.codeworxtech.com) |
|
||||
| Info: http://phpmailer.sourceforge.net |
|
||||
| Support: http://sourceforge.net/projects/phpmailer/ |
|
||||
| ------------------------------------------------------------------------- |
|
||||
| Admin: Andy Prevost (project admininistrator) |
|
||||
| Authors: Andy Prevost (codeworxtech) codeworxtech@users.sourceforge.net |
|
||||
| : Marcus Bointon (coolbru) coolbru@users.sourceforge.net |
|
||||
| Founder: Brent R. Matzelle (original founder) |
|
||||
| Copyright (c) 2004-2009, Andy Prevost. All Rights Reserved. |
|
||||
| Copyright (c) 2001-2003, Brent R. Matzelle |
|
||||
| ------------------------------------------------------------------------- |
|
||||
| License: Distributed under the Lesser General Public License (LGPL) |
|
||||
| http://www.gnu.org/copyleft/lesser.html |
|
||||
| This program is distributed in the hope that it will be useful - WITHOUT |
|
||||
| ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or |
|
||||
| FITNESS FOR A PARTICULAR PURPOSE. |
|
||||
| ------------------------------------------------------------------------- |
|
||||
| We offer a number of paid services (www.codeworxtech.com): |
|
||||
| - Web Hosting on highly optimized fast and secure servers |
|
||||
| - Technology Consulting |
|
||||
| - Oursourcing (highly qualified programmers and graphic designers) |
|
||||
'---------------------------------------------------------------------------'
|
||||
*/
|
||||
|
||||
/**
|
||||
* PHPMailer - PHP SMTP email transport class
|
||||
* NOTE: Designed for use with PHP version 5 and up
|
||||
* @package PHPMailer
|
||||
* @author Andy Prevost
|
||||
* @author Marcus Bointon
|
||||
* @copyright 2004 - 2008 Andy Prevost
|
||||
*/
|
||||
|
||||
/**
|
||||
* SMTP is rfc 821 compliant and implements all the rfc 821 SMTP
|
||||
* commands except TURN which will always return a not implemented
|
||||
* error. SMTP also provides some utility methods for sending mail
|
||||
* to an SMTP server.
|
||||
* original author: Chris Ryan
|
||||
*/
|
||||
|
||||
class SMTP {
|
||||
/**
|
||||
* SMTP server port
|
||||
* @var int
|
||||
*/
|
||||
public $SMTP_PORT = 25;
|
||||
|
||||
/**
|
||||
* SMTP reply line ending
|
||||
* @var string
|
||||
*/
|
||||
public $CRLF = "\r\n";
|
||||
|
||||
/**
|
||||
* Sets whether debugging is turned on
|
||||
* @var bool
|
||||
*/
|
||||
public $do_debug; // the level of debug to perform
|
||||
|
||||
/**
|
||||
* Sets VERP use on/off (default is off)
|
||||
* @var bool
|
||||
*/
|
||||
public $do_verp = FALSE;
|
||||
|
||||
/////////////////////////////////////////////////
|
||||
// PROPERTIES, PRIVATE AND PROTECTED
|
||||
/////////////////////////////////////////////////
|
||||
|
||||
private $smtp_conn; // the socket to the server
|
||||
private $error; // error if any on the last call
|
||||
private $helo_rply; // the reply the server sent to us for HELO
|
||||
|
||||
/**
|
||||
* Initialize the class so that the data is in a known state.
|
||||
* @access public
|
||||
* @return void
|
||||
*/
|
||||
public function __construct() {
|
||||
$this->smtp_conn = 0;
|
||||
$this->error = NULL;
|
||||
$this->helo_rply = NULL;
|
||||
|
||||
$this->do_debug = 0;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////
|
||||
// CONNECTION FUNCTIONS
|
||||
/////////////////////////////////////////////////
|
||||
|
||||
/**
|
||||
* Connect to the server specified on the port specified.
|
||||
* If the port is not specified use the default SMTP_PORT.
|
||||
* If tval is specified then a connection will try and be
|
||||
* established with the server for that number of seconds.
|
||||
* If tval is not specified the default is 30 seconds to
|
||||
* try on the connection.
|
||||
*
|
||||
* SMTP CODE SUCCESS: 220
|
||||
* SMTP CODE FAILURE: 421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Connect($host, $port = 0, $tval = 30) {
|
||||
// set the error val to NULL so there is no confusion
|
||||
$this->error = NULL;
|
||||
|
||||
// make sure we are __not__ connected
|
||||
if ($this->connected()) {
|
||||
// already connected, generate error
|
||||
$this->error = array("error" => "Already connected to a server");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
if (empty($port)) {
|
||||
$port = $this->SMTP_PORT;
|
||||
}
|
||||
|
||||
// connect to the smtp server
|
||||
$this->smtp_conn = @fsockopen($host, // the host of the server
|
||||
$port, // the port to use
|
||||
$errno, // error number if any
|
||||
$errstr, // error message if any
|
||||
$tval); // give up after ? secs
|
||||
// verify we connected properly
|
||||
if (empty($this->smtp_conn)) {
|
||||
$this->error = array("error" => "Failed to connect to server",
|
||||
"errno" => $errno,
|
||||
"errstr" => $errstr);
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": $errstr ($errno)" . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// SMTP server can take longer to respond, give longer timeout for first read
|
||||
// Windows does not have support for this timeout function
|
||||
if (substr(PHP_OS, 0, 3) != "WIN")
|
||||
socket_set_timeout($this->smtp_conn, $tval, 0);
|
||||
|
||||
// get any announcement
|
||||
$announce = $this->get_lines();
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $announce . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Initiate a TLS communication with the server.
|
||||
*
|
||||
* SMTP CODE 220 Ready to start TLS
|
||||
* SMTP CODE 501 Syntax error (no parameters allowed)
|
||||
* SMTP CODE 454 TLS not available due to temporary reason
|
||||
* @access public
|
||||
* @return bool success
|
||||
*/
|
||||
public function StartTLS() {
|
||||
$this->error = NULL; # to avoid confusion
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array("error" => "Called StartTLS() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
fputs($this->smtp_conn, "STARTTLS" . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 220) {
|
||||
$this->error =
|
||||
array("error" => "STARTTLS not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Begin encrypted connection
|
||||
if (!stream_socket_enable_crypto($this->smtp_conn, TRUE, STREAM_CRYPTO_METHOD_TLS_CLIENT)) {
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Performs SMTP authentication. Must be run after running the
|
||||
* Hello() method. Returns TRUE if successfully authenticated.
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Authenticate($username, $password) {
|
||||
// Start authentication
|
||||
fputs($this->smtp_conn, "AUTH LOGIN" . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($code != 334) {
|
||||
$this->error =
|
||||
array("error" => "AUTH not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Send encoded username
|
||||
fputs($this->smtp_conn, base64_encode($username) . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($code != 334) {
|
||||
$this->error =
|
||||
array("error" => "Username not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Send encoded password
|
||||
fputs($this->smtp_conn, base64_encode($password) . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($code != 235) {
|
||||
$this->error =
|
||||
array("error" => "Password not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Returns TRUE if connected to a server otherwise FALSE
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Connected() {
|
||||
if (!empty($this->smtp_conn)) {
|
||||
$sock_status = socket_get_status($this->smtp_conn);
|
||||
if ($sock_status["eof"]) {
|
||||
// the socket is valid but we are not connected
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> NOTICE:" . $this->CRLF . "EOF caught while checking if connected";
|
||||
}
|
||||
$this->Close();
|
||||
return FALSE;
|
||||
}
|
||||
return TRUE; // everything looks good
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Closes the socket and cleans up the state of the class.
|
||||
* It is not considered good to use this function without
|
||||
* first trying to use QUIT.
|
||||
* @access public
|
||||
* @return void
|
||||
*/
|
||||
public function Close() {
|
||||
$this->error = NULL; // so there is no confusion
|
||||
$this->helo_rply = NULL;
|
||||
if (!empty($this->smtp_conn)) {
|
||||
// close the connection and cleanup
|
||||
fclose($this->smtp_conn);
|
||||
$this->smtp_conn = 0;
|
||||
}
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////
|
||||
// SMTP COMMANDS
|
||||
/////////////////////////////////////////////////
|
||||
|
||||
/**
|
||||
* Issues a data command and sends the msg_data to the server
|
||||
* finializing the mail transaction. $msg_data is the message
|
||||
* that is to be send with the headers. Each header needs to be
|
||||
* on a single line followed by a <CRLF> with the message headers
|
||||
* and the message body being seperated by and additional <CRLF>.
|
||||
*
|
||||
* Implements rfc 821: DATA <CRLF>
|
||||
*
|
||||
* SMTP CODE INTERMEDIATE: 354
|
||||
* [data]
|
||||
* <CRLF>.<CRLF>
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE FAILURE: 552,554,451,452
|
||||
* SMTP CODE FAILURE: 451,554
|
||||
* SMTP CODE ERROR : 500,501,503,421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Data($msg_data) {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Data() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
fputs($this->smtp_conn, "DATA" . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 354) {
|
||||
$this->error =
|
||||
array("error" => "DATA command not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/* the server is ready to accept data!
|
||||
* according to rfc 821 we should not send more than 1000
|
||||
* including the CRLF
|
||||
* characters on a single line so we will break the data up
|
||||
* into lines by \r and/or \n then if needed we will break
|
||||
* each of those into smaller lines to fit within the limit.
|
||||
* in addition we will be looking for lines that start with
|
||||
* a period '.' and append and additional period '.' to that
|
||||
* line. NOTE: this does not count towards limit.
|
||||
*/
|
||||
|
||||
// normalize the line breaks so we know the explode works
|
||||
$msg_data = str_replace("\r\n", "\n", $msg_data);
|
||||
$msg_data = str_replace("\r", "\n", $msg_data);
|
||||
$lines = explode("\n", $msg_data);
|
||||
|
||||
/* we need to find a good way to determine is headers are
|
||||
* in the msg_data or if it is a straight msg body
|
||||
* currently I am assuming rfc 822 definitions of msg headers
|
||||
* and if the first field of the first line (':' sperated)
|
||||
* does not contain a space then it _should_ be a header
|
||||
* and we can process all lines before a blank "" line as
|
||||
* headers.
|
||||
*/
|
||||
|
||||
$field = substr($lines[0], 0, strpos($lines[0], ":"));
|
||||
$in_headers = FALSE;
|
||||
if (!empty($field) && !strstr($field, " ")) {
|
||||
$in_headers = TRUE;
|
||||
}
|
||||
|
||||
$max_line_length = 998; // used below; set here for ease in change
|
||||
|
||||
while (list(, $line) = @each($lines)) {
|
||||
$lines_out = NULL;
|
||||
if ($line == "" && $in_headers) {
|
||||
$in_headers = FALSE;
|
||||
}
|
||||
// ok we need to break this line up into several smaller lines
|
||||
while (strlen($line) > $max_line_length) {
|
||||
$pos = strrpos(substr($line, 0, $max_line_length), " ");
|
||||
|
||||
// Patch to fix DOS attack
|
||||
if (!$pos) {
|
||||
$pos = $max_line_length - 1;
|
||||
$lines_out[] = substr($line, 0, $pos);
|
||||
$line = substr($line, $pos);
|
||||
}
|
||||
else {
|
||||
$lines_out[] = substr($line, 0, $pos);
|
||||
$line = substr($line, $pos + 1);
|
||||
}
|
||||
|
||||
/* if processing headers add a LWSP-char to the front of new line
|
||||
* rfc 822 on long msg headers
|
||||
*/
|
||||
if ($in_headers) {
|
||||
$line = "\t" . $line;
|
||||
}
|
||||
}
|
||||
$lines_out[] = $line;
|
||||
|
||||
// send the lines to the server
|
||||
while (list(, $line_out) = @each($lines_out)) {
|
||||
if (strlen($line_out) > 0) {
|
||||
if (substr($line_out, 0, 1) == ".") {
|
||||
$line_out = "." . $line_out;
|
||||
}
|
||||
}
|
||||
fputs($this->smtp_conn, $line_out . $this->CRLF);
|
||||
}
|
||||
}
|
||||
|
||||
// message data has been sent
|
||||
fputs($this->smtp_conn, $this->CRLF . "." . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250) {
|
||||
$this->error =
|
||||
array("error" => "DATA not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sends the HELO command to the smtp server.
|
||||
* This makes sure that we and the server are in
|
||||
* the same known state.
|
||||
*
|
||||
* Implements from rfc 821: HELO <SP> <domain> <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE ERROR : 500, 501, 504, 421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Hello($host = '') {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Hello() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// if hostname for HELO was not specified send default
|
||||
if (empty($host)) {
|
||||
// determine appropriate default to send to server
|
||||
$host = "localhost";
|
||||
}
|
||||
|
||||
// Send extended hello first (RFC 2821)
|
||||
if (!$this->SendHello("EHLO", $host)) {
|
||||
if (!$this->SendHello("HELO", $host)) {
|
||||
return FALSE;
|
||||
}
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sends a HELO/EHLO command.
|
||||
* @access private
|
||||
* @return bool
|
||||
*/
|
||||
private function SendHello($hello, $host) {
|
||||
fputs($this->smtp_conn, $hello . " " . $host . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER: " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250) {
|
||||
$this->error =
|
||||
array("error" => $hello . " not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
$this->helo_rply = $rply;
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Starts a mail transaction from the email address specified in
|
||||
* $from. Returns TRUE if successful or FALSE otherwise. If True
|
||||
* the mail transaction is started and then one or more Recipient
|
||||
* commands may be called followed by a Data command.
|
||||
*
|
||||
* Implements rfc 821: MAIL <SP> FROM:<reverse-path> <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE SUCCESS: 552,451,452
|
||||
* SMTP CODE SUCCESS: 500,501,421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Mail($from) {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Mail() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
$useVerp = ($this->do_verp ? "XVERP" : "");
|
||||
fputs($this->smtp_conn, "MAIL FROM:<" . $from . ">" . $useVerp . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250) {
|
||||
$this->error =
|
||||
array("error" => "MAIL not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sends the quit command to the server and then closes the socket
|
||||
* if there is no error or the $close_on_error argument is TRUE.
|
||||
*
|
||||
* Implements from rfc 821: QUIT <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 221
|
||||
* SMTP CODE ERROR : 500
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Quit($close_on_error = TRUE) {
|
||||
$this->error = NULL; // so there is no confusion
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Quit() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// send the quit command to the server
|
||||
fputs($this->smtp_conn, "quit" . $this->CRLF);
|
||||
|
||||
// get any good-bye messages
|
||||
$byemsg = $this->get_lines();
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $byemsg . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
$rval = TRUE;
|
||||
$e = NULL;
|
||||
|
||||
$code = substr($byemsg, 0, 3);
|
||||
if ($code != 221) {
|
||||
// use e as a tmp var cause Close will overwrite $this->error
|
||||
$e = array("error" => "SMTP server rejected quit command",
|
||||
"smtp_code" => $code,
|
||||
"smtp_rply" => substr($byemsg, 4));
|
||||
$rval = FALSE;
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $e["error"] . ": " . $byemsg . $this->CRLF . '<br />';
|
||||
}
|
||||
}
|
||||
|
||||
if (empty($e) || $close_on_error) {
|
||||
$this->Close();
|
||||
}
|
||||
|
||||
return $rval;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sends the command RCPT to the SMTP server with the TO: argument of $to.
|
||||
* Returns TRUE if the recipient was accepted FALSE if it was rejected.
|
||||
*
|
||||
* Implements from rfc 821: RCPT <SP> TO:<forward-path> <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250,251
|
||||
* SMTP CODE FAILURE: 550,551,552,553,450,451,452
|
||||
* SMTP CODE ERROR : 500,501,503,421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Recipient($to) {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Recipient() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
fputs($this->smtp_conn, "RCPT TO:<" . $to . ">" . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250 && $code != 251) {
|
||||
$this->error =
|
||||
array("error" => "RCPT not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Sends the RSET command to abort and transaction that is
|
||||
* currently in progress. Returns TRUE if successful FALSE
|
||||
* otherwise.
|
||||
*
|
||||
* Implements rfc 821: RSET <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE ERROR : 500,501,504,421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Reset() {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array(
|
||||
"error" => "Called Reset() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
fputs($this->smtp_conn, "RSET" . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250) {
|
||||
$this->error =
|
||||
array("error" => "RSET failed",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Starts a mail transaction from the email address specified in
|
||||
* $from. Returns TRUE if successful or FALSE otherwise. If True
|
||||
* the mail transaction is started and then one or more Recipient
|
||||
* commands may be called followed by a Data command. This command
|
||||
* will send the message to the users terminal if they are logged
|
||||
* in and send them an email.
|
||||
*
|
||||
* Implements rfc 821: SAML <SP> FROM:<reverse-path> <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE SUCCESS: 552,451,452
|
||||
* SMTP CODE SUCCESS: 500,501,502,421
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function SendAndMail($from) {
|
||||
$this->error = NULL; // so no confusion is caused
|
||||
|
||||
if (!$this->connected()) {
|
||||
$this->error = array("error" => "Called SendAndMail() without being connected");
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
fputs($this->smtp_conn, "SAML FROM:" . $from . $this->CRLF);
|
||||
|
||||
$rply = $this->get_lines();
|
||||
$code = substr($rply, 0, 3);
|
||||
|
||||
if ($this->do_debug >= 2) {
|
||||
echo "SMTP -> FROM SERVER:" . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
|
||||
if ($code != 250) {
|
||||
$this->error =
|
||||
array("error" => "SAML not accepted from server",
|
||||
"smtp_code" => $code,
|
||||
"smtp_msg" => substr($rply, 4));
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> ERROR: " . $this->error["error"] . ": " . $rply . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
/**
|
||||
* This is an optional command for SMTP that this class does not
|
||||
* support. This method is here to make the RFC821 Definition
|
||||
* complete for this class and __may__ be implimented in the future
|
||||
*
|
||||
* Implements from rfc 821: TURN <CRLF>
|
||||
*
|
||||
* SMTP CODE SUCCESS: 250
|
||||
* SMTP CODE FAILURE: 502
|
||||
* SMTP CODE ERROR : 500, 503
|
||||
* @access public
|
||||
* @return bool
|
||||
*/
|
||||
public function Turn() {
|
||||
$this->error = array("error" => "This method, TURN, of the SMTP is not implemented");
|
||||
if ($this->do_debug >= 1) {
|
||||
echo "SMTP -> NOTICE: " . $this->error["error"] . $this->CRLF . '<br />';
|
||||
}
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/**
|
||||
* Get the current error
|
||||
* @access public
|
||||
* @return array
|
||||
*/
|
||||
public function getError() {
|
||||
return $this->error;
|
||||
}
|
||||
|
||||
/////////////////////////////////////////////////
|
||||
// INTERNAL FUNCTIONS
|
||||
/////////////////////////////////////////////////
|
||||
|
||||
/**
|
||||
* Read in as many lines as possible
|
||||
* either before eof or socket timeout occurs on the operation.
|
||||
* With SMTP we can tell if we have more lines to read if the
|
||||
* 4th character is '-' symbol. If it is a space then we don't
|
||||
* need to read anything else.
|
||||
* @access private
|
||||
* @return string
|
||||
*/
|
||||
private function get_lines() {
|
||||
$data = "";
|
||||
while ($str = @fgets($this->smtp_conn, 515)) {
|
||||
if ($this->do_debug >= 4) {
|
||||
echo "SMTP -> get_lines(): \$data was \"$data\"" . $this->CRLF . '<br />';
|
||||
echo "SMTP -> get_lines(): \$str is \"$str\"" . $this->CRLF . '<br />';
|
||||
}
|
||||
$data .= $str;
|
||||
if ($this->do_debug >= 4) {
|
||||
echo "SMTP -> get_lines(): \$data is \"$data\"" . $this->CRLF . '<br />';
|
||||
}
|
||||
// if 4th character is a space, we are done reading, break the loop
|
||||
if (substr($str, 3, 1) == " ") {
|
||||
break;
|
||||
}
|
||||
}
|
||||
return $data;
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user