FINAL suepr merge step : added all modules to this super repos
This commit is contained in:
339
sites/all/modules/contrib/mail/Mailjet/LICENSE.txt
Normal file
339
sites/all/modules/contrib/mail/Mailjet/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.
|
26
sites/all/modules/contrib/mail/Mailjet/README.txt
Normal file
26
sites/all/modules/contrib/mail/Mailjet/README.txt
Normal file
@@ -0,0 +1,26 @@
|
||||
This module for Drupal 7.x. provides complete control of Email settings with
|
||||
Drupal and Mailjet.
|
||||
It simply replaces your default SMTP settings in order to make all your emails
|
||||
go through Mailjet: this will improve your deliverability and allow you to
|
||||
optimize your campaigns.
|
||||
|
||||
Mailjet helps to send and track emails in real time, while ensuring their
|
||||
deliverability.
|
||||
You'll take advantage of our reporting tools and get advanced statistics to
|
||||
monitor and optimize your emails.
|
||||
|
||||
Installation
|
||||
------------
|
||||
|
||||
1) Download a release.
|
||||
2) Upload all its content in your Drupal sites/all/modules/ directory.
|
||||
3) Make sure you are using libraries module and you have correctly installed PHPMailer with "phpmailer" as key.
|
||||
4) Log in as administrator in Drupal.
|
||||
5) Enable the Mailjet settings module on the Administer > Site building > Modules page.
|
||||
6) Fill in required settings on the Administer > Site configuration > Mailjet settings page.
|
||||
|
||||
|
||||
Author
|
||||
------
|
||||
Mailjet SAS
|
||||
plugins@mailjet.com
|
142
sites/all/modules/contrib/mail/Mailjet/mailjet.admin.inc
Normal file
142
sites/all/modules/contrib/mail/Mailjet/mailjet.admin.inc
Normal file
@@ -0,0 +1,142 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* The backoffice of module.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implements hook_settings().
|
||||
*/
|
||||
function mailjet_admin_settings() {
|
||||
$form['onoff'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('General settings'),
|
||||
);
|
||||
$form['onoff']['mailjet_on'] = array(
|
||||
'#type' => 'radios',
|
||||
'#title' => t('Send emails through Mailjet'),
|
||||
'#default_value' => variable_get('mailjet_on', FALSE),
|
||||
'#options' => array(1 => t('Yes'), 0 => t('No')),
|
||||
);
|
||||
|
||||
$form['onoff']['mailjet_from'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('E-mail from address'),
|
||||
'#default_value' => variable_get('mailjet_from', variable_get('site_mail', '')),
|
||||
'#description' => t('The e-mail address that all e-mails will be from.'),
|
||||
'#required' => TRUE,
|
||||
);
|
||||
|
||||
$form['onoff']['mailjet_test'] = array(
|
||||
'#type' => 'radios',
|
||||
'#title' => t('Send test mail now'),
|
||||
'#default_value' => variable_get('mailjet_test', FALSE),
|
||||
'#options' => array(1 => t('Yes'), 0 => t('No')),
|
||||
);
|
||||
|
||||
$form['onoff']['mailjet_test_address'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Recipient of test mail'),
|
||||
'#default_value' => variable_get('mailjet_test_address', ''),
|
||||
);
|
||||
|
||||
$form['auth'] = array(
|
||||
'#type' => 'fieldset',
|
||||
'#title' => t('Mailjet settings'),
|
||||
);
|
||||
$form['auth']['mailjet_username'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('API Key'),
|
||||
'#default_value' => variable_get('mailjet_username', ''),
|
||||
'#required' => TRUE,
|
||||
);
|
||||
$form['auth']['mailjet_password'] = array(
|
||||
'#type' => 'textfield',
|
||||
'#title' => t('Secret Key'),
|
||||
'#default_value' => variable_get('mailjet_password', ''),
|
||||
'#required' => TRUE,
|
||||
);
|
||||
|
||||
$test_address = variable_get('mailjet_test_address', '');
|
||||
|
||||
if (variable_get('mailjet_test', FALSE) && valid_email_address($test_address)) {
|
||||
$mailjet_on = variable_get('mailjet_on', FALSE);
|
||||
|
||||
variable_set('mail_system', array('default-system' => 'MailjetSmtpMailSystem'));
|
||||
variable_set('mailjet_test', FALSE);
|
||||
|
||||
global $language;
|
||||
|
||||
$params['subject'] = t('Your test mail from Mailjet');
|
||||
$params['body'] = array(t('Your Mailjet configuration is ok!'));
|
||||
$mail = drupal_mail('mailjet', 'mailjet-test', $test_address, $language, $params);
|
||||
|
||||
variable_set('mailjet_on', $mailjet_on);
|
||||
|
||||
if (isset($mail['result']) && $mail['result']) {
|
||||
drupal_set_message(t('A test e-mail has been sent to @email.', array('@email' => check_plain($test_address))));
|
||||
}
|
||||
}
|
||||
|
||||
if (variable_get('mailjet_on', FALSE)) {
|
||||
variable_set('mail_system', array('default-system' => 'MailjetSmtpMailSystem'));
|
||||
}
|
||||
else {
|
||||
variable_set('mail_system', array('default-system' => 'DefaultMailSystem'));
|
||||
}
|
||||
|
||||
return system_settings_form($form);
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_admin_settings_validat().
|
||||
*/
|
||||
function mailjet_admin_settings_validate($form, &$form_state) {
|
||||
|
||||
if (!valid_email_address($form_state['values']['mailjet_from'])) {
|
||||
form_set_error('mailjet_from', t('The provided from e-mail address is not valid.'));
|
||||
}
|
||||
|
||||
if ($form_state['values']['mailjet_test'] && !valid_email_address($form_state['values']['mailjet_test_address'])) {
|
||||
form_set_error('mailjet_test_address', t('The provided test e-mail address is not valid.'));
|
||||
}
|
||||
|
||||
$configs = array(array('ssl://', 465),
|
||||
array('tls://', 587),
|
||||
array('', 587),
|
||||
array('', 588),
|
||||
array('tls://', 25),
|
||||
array('', 25));
|
||||
|
||||
$host = variable_get('mailjet_host', 'in.mailjet.com');
|
||||
$connected = FALSE;
|
||||
|
||||
for ($i = 0; $i < count($configs); ++$i) {
|
||||
$soc = @ fsockopen($configs[$i][0] . $host, $configs[$i][1], $errno, $errstr, 5);
|
||||
|
||||
if ($soc) {
|
||||
fClose($soc);
|
||||
|
||||
$connected = TRUE;
|
||||
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if ($connected) {
|
||||
if ('ssl://' == $configs[$i][0]) {
|
||||
variable_set('mailjet_protocol', 'ssl');
|
||||
}
|
||||
elseif ('tls://' == $configs[$i][0]) {
|
||||
variable_set('mailjet_protocol', 'tls');
|
||||
}
|
||||
else {
|
||||
variable_set('mailjet_protocol', 'standard');
|
||||
}
|
||||
|
||||
variable_set('mailjet_port', $configs[$i][1]);
|
||||
}
|
||||
else {
|
||||
form_set_error('mailjet_on', t('Please contact Mailjet support to sort this out.<br /><br />Error @errno - @errstr', array ('@errno' => $errno, '@errstr' => $errstr)));
|
||||
}
|
||||
}
|
14
sites/all/modules/contrib/mail/Mailjet/mailjet.info
Normal file
14
sites/all/modules/contrib/mail/Mailjet/mailjet.info
Normal file
@@ -0,0 +1,14 @@
|
||||
name = Mailjet
|
||||
description = "Send your emails by your Mailjet API."
|
||||
core = 7.x
|
||||
package = Mail
|
||||
configure = admin/config/system/mailjet
|
||||
files[] = mailjet.mail.inc
|
||||
dependencies[] = libraries
|
||||
|
||||
; Information added by drupal.org packaging script on 2012-05-07
|
||||
version = "7.x-1.1"
|
||||
core = "7.x"
|
||||
project = "Mailjet"
|
||||
datestamp = "1336426255"
|
||||
|
46
sites/all/modules/contrib/mail/Mailjet/mailjet.install
Normal file
46
sites/all/modules/contrib/mail/Mailjet/mailjet.install
Normal file
@@ -0,0 +1,46 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Functions called while installing, uninstalling or activation of the module.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implements hook_install().
|
||||
*/
|
||||
function mailjet_install() {
|
||||
variable_set('mailjet_debug', FALSE);
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_uninstall().
|
||||
*/
|
||||
function mailjet_uninstall() {
|
||||
variable_del('mailjet_from');
|
||||
variable_del('mailjet_host');
|
||||
variable_del('mailjet_on');
|
||||
variable_del('mailjet_password');
|
||||
variable_del('mailjet_port');
|
||||
variable_del('mailjet_protocol');
|
||||
variable_del('mailjet_test');
|
||||
variable_del('mailjet_test_address');
|
||||
variable_del('mailjet_username');
|
||||
variable_del('mailjet_allowhtml');
|
||||
variable_del('mailjet_debug');
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_disable().
|
||||
*/
|
||||
function mailjet_disable() {
|
||||
variable_set('mailjet_on', FALSE);
|
||||
variable_set('mail_system', array('default-system' => 'DefaultMailSystem'));
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_update().
|
||||
*/
|
||||
function mailjet_update_7000() {
|
||||
if (variable_get('mailjet_on', FALSE)) {
|
||||
variable_set('mail_system', array('default-system' => 'MailjetSmtpMailSystem'));
|
||||
}
|
||||
}
|
592
sites/all/modules/contrib/mail/Mailjet/mailjet.mail.inc
Normal file
592
sites/all/modules/contrib/mail/Mailjet/mailjet.mail.inc
Normal file
@@ -0,0 +1,592 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Mail processing.
|
||||
*/
|
||||
|
||||
class MailjetSmtpMailSystem implements MailSystemInterface {
|
||||
|
||||
protected $AllowHtml;
|
||||
/**
|
||||
* Concatenate and wrap the e-mail body for either
|
||||
* plain-text or HTML emails.
|
||||
*
|
||||
* @param array $message
|
||||
* A message array, as described in hook_mail_alter().
|
||||
*
|
||||
* @return string
|
||||
* The formatted $message.
|
||||
*/
|
||||
public function format(array $message) {
|
||||
$this->AllowHtml = variable_get('mailjet_allowhtml', TRUE);
|
||||
// Join the body array into one string.
|
||||
$message['body'] = implode("\n\n", $message['body']);
|
||||
if (! $this->AllowHtml) {
|
||||
// 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 array $message
|
||||
* A message array, as described in hook_mail_alter().
|
||||
*
|
||||
* @return bool
|
||||
* 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'];
|
||||
|
||||
if (isset($message['params']['subject'])) {
|
||||
$subject = $message['params']['subject'];
|
||||
}
|
||||
|
||||
if (isset($message['params']['body'][0])) {
|
||||
$body = $message['params']['body'][0];
|
||||
}
|
||||
|
||||
$path = libraries_get_path('phpmailer');
|
||||
|
||||
if (file_exists($path . '/class.phpmailer.php')) {
|
||||
require_once $path . '/class.phpmailer.php';
|
||||
}
|
||||
else {
|
||||
drupal_set_message(t('Unable to send mail : PHPMailer library does not exist.'), 'error');
|
||||
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Create a new PHPMailer object - autoloaded from registry.
|
||||
$mailer = new PHPMailer();
|
||||
|
||||
$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('mailjet_from', '')) == '') {
|
||||
// If smtp_from config option is blank, use site_email.
|
||||
if (($from = variable_get('site_email', '')) == '') {
|
||||
drupal_set_message(t('There is no submitted from address.'), 'error');
|
||||
|
||||
if (variable_get('mailjet_debug')) {
|
||||
watchdog('mailjet', '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);
|
||||
$from = preg_replace("/(.*)\<(.*)\>/i", '$2', $from);
|
||||
}
|
||||
elseif (!valid_email_address($from)) {
|
||||
drupal_set_message(t('The submitted from address (@from) is not valid.', array('@from' => $from)), 'error');
|
||||
|
||||
if (variable_get('mailjet_debug')) {
|
||||
watchdog('mailjet', 'The submitted from address (@from) is not valid.', array('@from' => $from), WATCHDOG_ERROR);
|
||||
}
|
||||
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
// Defines the From value $from_nameto what we expect.
|
||||
$mailer->SetFrom($from, $from_name);
|
||||
|
||||
// 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) {
|
||||
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 = drupal_strtolower(drupal_substr($var, $cut + 1));
|
||||
$new_key = drupal_substr($var, 0, $cut);
|
||||
unset($vars[$i]);
|
||||
$vars[$new_key] = $new_var;
|
||||
}
|
||||
}
|
||||
|
||||
// Set the charset based on the provided value, if there is one.
|
||||
$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->getSubstrings($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->getSubstrings($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->getSubstrings($value, 'boundary', '"', '"');
|
||||
break;
|
||||
|
||||
default:
|
||||
// Everything else is unsuppored by PHPMailer.
|
||||
drupal_set_message(t('The Content-Type of your message is not supported by PHPMailer and will be sent as text/plain instead.'), 'error');
|
||||
|
||||
if (variable_get('mailjet_debug')) {
|
||||
watchdog('mailjet', 'The Content-Type of your message is not supported by PHPMailer and will be sent as text/plain instead.', array(), 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) {
|
||||
$reply_to_parts = explode('<', $value);
|
||||
$reply_to_name = trim($reply_to_parts[0]);
|
||||
$reply_to_name = trim($reply_to_name, '"');
|
||||
$reply_to_addr = rtrim($reply_to_parts[1], '>');
|
||||
$mailer->AddReplyTo($reply_to_addr, $reply_to_name);
|
||||
}
|
||||
else {
|
||||
$mailer->AddReplyTo($value);
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
case 'content-transfer-encoding':
|
||||
$mailer->Encoding = $value;
|
||||
break;
|
||||
|
||||
case 'return-path':
|
||||
case 'mime-version':
|
||||
case 'x-mailer':
|
||||
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);
|
||||
}
|
||||
}
|
||||
|
||||
$mailer->AddCustomHeader('X-Mailer:Mailjet-for-Drupal/1.0');
|
||||
|
||||
$mailer->Subject = $subject;
|
||||
|
||||
// Processes the message's body.
|
||||
switch ($content_type) {
|
||||
case 'multipart/related':
|
||||
$mailer->Body = $body;
|
||||
|
||||
break;
|
||||
|
||||
case 'multipart/alternative':
|
||||
// Split the body based on the boundary ID.
|
||||
$body_parts = $this->boundarySplit($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->removeHeaders(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->removeHeaders(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->boundarySplit($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->removeHeaders(trim($body_part)));
|
||||
// Get boundary ID from the Content-Type header.
|
||||
$boundary2 = $this->getSubstrings($body_part, 'boundary', '"', '"');
|
||||
// Split the body based on the boundary ID.
|
||||
$body_parts2 = $this->boundarySplit($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->removeHeaders(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->removeHeaders(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->removeHeaders(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->removeHeaders(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->getSubstrings($body_part, 'filename=', '"', '"');
|
||||
$file_name = $this->getSubstrings($body_part, ' name=', '"', '"');
|
||||
$file_encoding = $this->getSubstrings($body_part, 'Content-Transfer-Encoding', ' ', "\n");
|
||||
$file_type = $this->getSubstrings($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->removeHeaders(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)) {
|
||||
drupal_set_message(t('Attachment could not be found or accessed.'));
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
break;
|
||||
|
||||
default:
|
||||
$mailer->Body = $body;
|
||||
break;
|
||||
}
|
||||
|
||||
// Set the authentication settings.
|
||||
$username = variable_get('mailjet_username', '');
|
||||
$password = variable_get('mailjet_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('mailjet_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('mailjet_host', 'in.mailjet.com');
|
||||
$mailer->Port = variable_get('mailjet_port', '25');
|
||||
$mailer->Mailer = 'smtp';
|
||||
|
||||
if (variable_get('mailjet_debug')) {
|
||||
watchdog('mailjet', 'Sending mail to: @to', array('@to' => $to));
|
||||
}
|
||||
|
||||
// Try to send e-mail. If it fails, set watchdog entry.
|
||||
if (!$mailer->Send()) {
|
||||
if (variable_get('mailjet_debug')) {
|
||||
watchdog('mailjet',
|
||||
'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 string $input
|
||||
* A string containing the body text to parse.
|
||||
* @param string $boundary
|
||||
* A string with the boundary string to parse on.
|
||||
*
|
||||
* @return array
|
||||
* An array containing the resulting mime parts
|
||||
*/
|
||||
protected function boundarySplit($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;
|
||||
}
|
||||
|
||||
/**
|
||||
* Strips the headers from the body part.
|
||||
*
|
||||
* @param string $input
|
||||
* A string containing the body part to strip.
|
||||
*
|
||||
* @return string
|
||||
* A string with the stripped body part.
|
||||
*/
|
||||
protected function removeHeaders($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;
|
||||
}
|
||||
|
||||
/**
|
||||
* 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 string $source
|
||||
* A string containing the text to look through.
|
||||
* @param string $target
|
||||
* A string containing the text in $source to start looking from.
|
||||
* @param string $beginning_character
|
||||
* A string containing the character just before the sought after text.
|
||||
* @param string $ending_character
|
||||
* A string containing the character just after the sought after text.
|
||||
*
|
||||
* @return string
|
||||
* A string with the text found between the $beginning_character and the
|
||||
* $ending_character.
|
||||
*/
|
||||
protected function getSubstrings($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;
|
||||
}
|
||||
}
|
44
sites/all/modules/contrib/mail/Mailjet/mailjet.module
Normal file
44
sites/all/modules/contrib/mail/Mailjet/mailjet.module
Normal file
@@ -0,0 +1,44 @@
|
||||
<?php
|
||||
/**
|
||||
* @file
|
||||
* Hooks and functions of module.
|
||||
*/
|
||||
|
||||
/**
|
||||
* Implements hook_help().
|
||||
*/
|
||||
function mailjet_help($path, $arg) {
|
||||
switch ($path) {
|
||||
case 'admin/help#mailjet':
|
||||
return t('Send your emails by your Mailjet API.');
|
||||
}
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_menu().
|
||||
*/
|
||||
function mailjet_menu() {
|
||||
$items['admin/config/system/mailjet'] = array(
|
||||
'title' => 'Mailjet settings',
|
||||
'page callback' => 'drupal_get_form',
|
||||
'page arguments' => array('mailjet_admin_settings'),
|
||||
'access arguments' => array('administer mailjet module'),
|
||||
'description' => 'Send your emails by your Mailjet API.',
|
||||
'file' => 'mailjet.admin.inc',
|
||||
);
|
||||
return $items;
|
||||
}
|
||||
|
||||
/**
|
||||
* Implements hook_permission().
|
||||
*
|
||||
* Defines a permission for managing the mailjet variables.
|
||||
*/
|
||||
function mailjet_permission() {
|
||||
return array(
|
||||
'administer mailjet module' => array(
|
||||
'title' => t('Administer Mailjet settings module'),
|
||||
'description' => t('Perform administration tasks for Mailjet settings module.'),
|
||||
),
|
||||
);
|
||||
}
|
Reference in New Issue
Block a user