, 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.
diff --git a/sites/all/modules/contrib/mail/mailgun/mailgun.admin.inc b/sites/all/modules/contrib/mail/mailgun/mailgun.admin.inc
new file mode 100644
index 00000000..b5f99f1f
--- /dev/null
+++ b/sites/all/modules/contrib/mail/mailgun/mailgun.admin.inc
@@ -0,0 +1,221 @@
+documentation for more information.', array('@url' => url('https://www.drupal.org/node/2547591'))), 'error');
+ }
+
+ $key = variable_get('mailgun_api_key', '');
+
+ $form['mailgun_api_key'] = array(
+ '#title' => t('Mailgun API key'),
+ '#type' => 'textfield',
+ '#description' => t('Get your Secret API key from the Mailgun dashboard.', array('@url' => url('https://mailgun.com/app/dashboard'))),
+ '#default_value' => $key,
+ '#required' => TRUE,
+ );
+
+ $client = FALSE;
+ if (!empty($key)) {
+ try {
+ $client = mailgun_get_client($key);
+ } catch (Exception $e) {
+ watchdog('mailgun', 'An exception occurred. @code: @message', array('@code' => $e->getCode(), '@message' => $e->getMessage()), WATCHDOG_WARNING, 'admin/config/system/mailgun');
+ drupal_set_message(t('Mailgun: %message', array('%message' => $e->getMessage())), 'error');
+ }
+ }
+
+ // Display settings only when a valid API key is present and client is active
+ if ($client) {
+ $domain_options = array(
+ '_sender' => t('Get domain from sender address'),
+ );
+ $domains = array();
+ $result = $client->get('domains');
+ if ($result && $result->http_response_code == 200) {
+ foreach ($result->http_response_body->items as $domain) {
+ $domains[$domain->name] = $domain;
+ $domain_options[$domain->name] = $domain->name;
+ }
+ }
+
+ $form['mailgun_domain'] = array(
+ '#title' => t('Domain'),
+ '#type' => 'select',
+ '#options' => $domain_options,
+ '#description' => t('Mails will be sent using this domain'),
+ '#default_value' => variable_get('mailgun_domain', '_sender'),
+ );
+
+ $form['mailgun_test'] = array(
+ '#title' => t('Test mode'),
+ '#type' => 'checkbox',
+ '#default_value' => variable_get('mailgun_test', FALSE),
+ '#description' => t('Enables sending in test mode'),
+ );
+
+ $form['mailgun_queue'] = array(
+ '#title' => t('Queue mails'),
+ '#type' => 'checkbox',
+ '#description' => t('Mails will be queued and sent during cron runs. Useful for sending a large number of emails.'),
+ '#default_value' => variable_get('mailgun_queue', FALSE),
+ );
+
+ $form['mailgun_log'] = array(
+ '#title' => t('Log mails'),
+ '#type' => 'checkbox',
+ '#description' => t('Log mails sent through Mailgun. Should not be enabled on production sites. Messages fail to send will be logged regardless of this setting.'),
+ '#default_value' => variable_get('mailgun_log', FALSE),
+ );
+
+ $formats = array('_none' => t('- None -'));
+ foreach (filter_formats() as $format) {
+ if ($format->format == 'php_code') {
+ continue;
+ }
+ $formats[$format->format] = t($format->name);
+ }
+ $form['mailgun_format'] = array(
+ '#title' => t('Text format'),
+ '#type' => 'select',
+ '#description' => t('Specify an additional text format to filter the message through before sending the email.'),
+ '#options' => $formats,
+ '#default_value' => variable_get('mailgun_format', '_none'),
+ );
+
+ $form['defaults'] = array(
+ '#type' => 'fieldset',
+ '#title' => t('Default settings'),
+ '#description' => t('These default settings apply to messages sent using Mailgun and may be overriden on a per-message basis.'),
+ '#collapsible' => FALSE,
+ '#collapsed' => FALSE,
+ );
+
+ $form['defaults']['mailgun_tracking'] = array(
+ '#title' => t('Enable tracking'),
+ '#type' => 'select',
+ '#options' => array('default' => t('Use default setting'), 'enabled' => t('Enabled'), 'disabled' => t('Disabled')),
+ '#description' => t('Whether to enable event tracking by default or not. See Tracking Messages for details.', array('@url' => url('https://documentation.mailgun.com/user_manual.html#tracking-messages'))),
+ '#default_value' => variable_get('mailgun_tracking', 'default'),
+ );
+
+ $form['defaults']['mailgun_tracking_clicks'] = array(
+ '#title' => t('Enable click tracking'),
+ '#type' => 'select',
+ '#options' => array('default' => t('Use default setting'), 'enabled' => t('Enabled'), 'disabled' => t('Disabled')),
+ '#description' => t('Whether to enable click tracking by default or not.'),
+ '#default_value' => variable_get('mailgun_tracking_clicks', 'default'),
+ );
+
+ $form['defaults']['mailgun_tracking_opens'] = array(
+ '#title' => t('Enable open tracking'),
+ '#type' => 'select',
+ '#options' => array('default' => t('Use default setting'), 'enabled' => t('Enabled'), 'disabled' => t('Disabled')),
+ '#description' => t('Whether to enable open tracking by default or not.'),
+ '#default_value' => variable_get('mailgun_tracking_opens', 'default'),
+ );
+ }
+
+ $form = system_settings_form($form);
+ $form['#validate'][] = 'mailgun_admin_settings_validate';
+
+ return $form;
+}
+
+/**
+ * Form validation handler for mailgun_admin_settings().
+ *
+ * Perform additional validation to ensure the API key entered is valid.
+ */
+function mailgun_admin_settings_validate($form, &$form_state) {
+ if ($form['mailgun_api_key']['#default_value'] != $form_state['values']['mailgun_api_key']) {
+ // The API key has changed. Perform validation.
+ $form_state['values']['mailgun_api_key'] = trim($form_state['values']['mailgun_api_key']);
+ $client = mailgun_get_client($form_state['values']['mailgun_api_key']);
+ try {
+ $result = $client->get('domains');
+ drupal_set_message(t('Your API key has been successfully validated.'));
+ } catch (Exception $e) {
+ form_set_error('mailgun_api_key', t('An exception occurred. @code: @message', array('@code' => $e->getCode(), '@message' => $e->getMessage())));
+ }
+ }
+}
+
+/**
+ * Form builder. Display a form for sending a test e-mail.
+ */
+function mailgun_test_form($form, &$form_state) {
+ drupal_set_title(t('Send test mail'));
+
+ $form['to'] = array(
+ '#type' => 'textfield',
+ '#title' => t('To'),
+ '#default_value' => variable_get('site_mail', ''),
+ '#description' => t('Type in an address to have the test email sent there.'),
+ '#required' => TRUE,
+ );
+
+ $message = "Howdy!\n\nIf this e-mail is displayed correctly and delivered sound and safe, congrats! You have successfully configured Mailgun.";
+ $message .= ' Visit the project page to contribute or read documentation to learn more.';
+ $message = t($message, array('@project' => url('https://www.drupal.org/project/mailgun'), '@documentation' => url('https://www.drupal.org/node/2547591')));
+ $form['message'] = array(
+ '#type' => 'textarea',
+ '#title' => t('Message'),
+ '#default_value' => $message,
+ '#required' => TRUE,
+ );
+
+ $form['attachment'] = array(
+ '#title' => t('Include attachment'),
+ '#type' => 'checkbox',
+ '#description' => t('If checked, the Drupal icon will be included as an attachment with the test e-mail.'),
+ '#default_value' => TRUE,
+ );
+
+ $form['submit'] = array(
+ '#type' => 'submit',
+ '#value' => t('Send'),
+ );
+ $form['cancel'] = array(
+ '#type' => 'link',
+ '#href' => 'admin/config/system/mailgun',
+ '#title' => t('Cancel'),
+ );
+
+ return $form;
+}
+
+/**
+ * Form submission handler for mailgun_test_form().
+ * Send the test e-mail.
+ */
+function mailgun_test_form_submit($form, &$form_state) {
+ $to = $form_state['values']['to'];
+ $params = array(
+ 'message' => $form_state['values']['message'],
+ 'attachment' => $form_state['values']['attachment'],
+ );
+ $site_name = variable_get('site_name', '');
+ $default_from = variable_get('site_mail', ini_get('sendmail_from'));
+ $from = (!empty($site_name)) ? $site_name . ' <' . $default_from . '>' : $default_from;
+ $result = drupal_mail('mailgun', 'test', $to, $GLOBALS['language'], $params, $from);
+ drupal_set_message(t('Test email sent from %from to %to. If you have the "Log mails" setting enabled, check the database log for details.', array('%from' => $result['from'], '%to' => $result['to'], '@url' => url('admin/reports/dblog'))), 'status');
+}
diff --git a/sites/all/modules/contrib/mail/mailgun/mailgun.info b/sites/all/modules/contrib/mail/mailgun/mailgun.info
new file mode 100644
index 00000000..f9822c4a
--- /dev/null
+++ b/sites/all/modules/contrib/mail/mailgun/mailgun.info
@@ -0,0 +1,16 @@
+name = Mailgun
+description = "Provides integration with Mailgun's email sending API."
+core = 7.x
+package = Mailgun
+
+dependencies[] = libraries
+dependencies[] = mailsystem
+
+files[] = mailgun.mail.inc
+
+; Information added by Drupal.org packaging script on 2016-06-26
+version = "7.x-1.6+0-dev"
+core = "7.x"
+project = "mailgun"
+datestamp = "1466914444"
+
diff --git a/sites/all/modules/contrib/mail/mailgun/mailgun.install b/sites/all/modules/contrib/mail/mailgun/mailgun.install
new file mode 100644
index 00000000..52c72700
--- /dev/null
+++ b/sites/all/modules/contrib/mail/mailgun/mailgun.install
@@ -0,0 +1,34 @@
+ 'MailgunMailSystem'));
+}
+
+/**
+ * Implements hook_disable().
+ */
+function mailgun_disable() {
+ // Tell Mail System to remove Mailgun and restore to defaults.
+ mailsystem_clear(array('mailgun_test' => 'MailgunMailSystem'));
+ watchdog('mailgun', 'Mailgun has been disabled.');
+}
diff --git a/sites/all/modules/contrib/mail/mailgun/mailgun.mail.inc b/sites/all/modules/contrib/mail/mailgun/mailgun.mail.inc
new file mode 100644
index 00000000..6dbd22f0
--- /dev/null
+++ b/sites/all/modules/contrib/mail/mailgun/mailgun.mail.inc
@@ -0,0 +1,123 @@
+ $message['from'],
+ 'to' => $message['to'],
+ 'subject' => $message['subject'],
+ 'text' => check_plain($message['body']),
+ 'html' => $message['body'],
+ );
+
+ // Add CC, BCC and Reply-To fields if not empty.
+ $headers = array_change_key_case($message['headers']);
+
+ if (!empty($headers['cc'])) {
+ $mailgun_message['cc'] = $headers['cc'];
+ }
+ if (!empty($headers['bcc'])) {
+ $mailgun_message['bcc'] = $headers['bcc'];
+ }
+ if (!empty($headers['reply-to'])) {
+ $mailgun_message['h:Reply-To'] = $headers['reply-to'];
+ }
+
+ $params = array();
+
+ // Populate default settings.
+ if ($variable = variable_get('mailgun_tracking', 'default') != 'default') {
+ $params['o:tracking'] = $variable;
+ }
+ if ($variable = variable_get('mailgun_tracking_clicks', 'default') != 'default') {
+ $params['o:tracking-clicks'] = $variable;
+ }
+ if ($variable = variable_get('mailgun_tracking_opens', 'default') != 'default') {
+ $params['o:tracking-opens'] = $variable;
+ }
+
+ // For a full list of allowed parameters, see: https://documentation.mailgun.com/api-sending.html#sending.
+ $allowed_params = array('o:tag', 'o:campaign', 'o:deliverytime', 'o:dkim', 'o:testmode', 'o:tracking', 'o:tracking-clicks', 'o:tracking-opens');
+ foreach ($message['params'] as $key => $value) {
+ // Check if it's one of the known parameters.
+ $allowed = (in_array($key, $allowed_params)) ? TRUE : FALSE;
+ // If more options become available but are not yet supported by the module, uncomment the following line.
+ //$allowed = (substr($key, 0, 2) == 'o:') ? TRUE : FALSE;
+ if ($allowed) {
+ $params[$key] = $value;
+ }
+ // Check for custom MIME headers or custom JSON data.
+ if (substr($key, 0, 2) == 'h:' || substr($key, 0, 2) == 'v:') {
+ $params[$key] = $value;
+ }
+ }
+
+ // Make sure the files provided in the attachments array exist.
+ if (!empty($message['params']['attachments'])) {
+ $params['attachments'] = array();
+ foreach ($message['params']['attachments'] as $attachment) {
+ if (file_exists($attachment)) {
+ $params['attachments'][] = $attachment;
+ }
+ }
+ }
+
+ $mailgun_message['params'] = $params;
+
+ // Queue the message if the setting is enabled.
+ if (variable_get('mailgun_queue', FALSE)) {
+ $queue = DrupalQueue::get('mailgun_queue', TRUE);
+ $queue->createItem($mailgun_message);
+ return TRUE;
+ }
+
+ return mailgun_send($mailgun_message);
+ }
+
+}
diff --git a/sites/all/modules/contrib/mail/mailgun/mailgun.module b/sites/all/modules/contrib/mail/mailgun/mailgun.module
new file mode 100644
index 00000000..a5bb037b
--- /dev/null
+++ b/sites/all/modules/contrib/mail/mailgun/mailgun.module
@@ -0,0 +1,261 @@
+ 'Mailgun',
+ 'description' => 'Configure Mailgun settings.',
+ 'page callback' => 'drupal_get_form',
+ 'page arguments' => array('mailgun_admin_settings'),
+ 'access arguments' => array('administer mailgun'),
+ 'file' => 'mailgun.admin.inc',
+ );
+ $items['admin/config/system/mailgun/settings'] = array(
+ 'title' => 'Settings',
+ 'type' => MENU_DEFAULT_LOCAL_TASK,
+ 'weight' => 0,
+ );
+ $items['admin/config/system/mailgun/test'] = array(
+ 'title' => 'Send test email',
+ 'page callback' => 'drupal_get_form',
+ 'page arguments' => array('mailgun_test_form'),
+ 'access arguments' => array('administer mailgun'),
+ 'description' => 'Send a test e-mail using the Mailgun API.',
+ 'file' => 'mailgun.admin.inc',
+ 'type' => MENU_LOCAL_TASK,
+ 'weight' => 1,
+ );
+
+ return $items;
+}
+
+/**
+ * Implements hook_permission().
+ */
+function mailgun_permission() {
+ return array(
+ 'administer mailgun' => array(
+ 'title' => t('Administer Mailgun'),
+ 'description' => t('Perform administration tasks for the Mailgun e-mail sending service.'),
+ "restrict access" => TRUE,
+ ),
+ );
+}
+
+/**
+ * Implements hook_help().
+ */
+function mailgun_help($path, $arg) {
+ switch ($path) {
+ case 'admin/config/system/mailgun':
+ return '' . t('See documentation for instructions on installing and configuring Mailgun.', array('@url' => url('https://www.drupal.org/node/2547591'))) . '
';
+ break;
+ case 'admin/config/system/mailgun/test':
+ return '' . t('Use this form to send a test e-mail to ensure you have correctly configured Mailgun.') . '
';
+ break;
+ }
+}
+
+/**
+ * Implements hook_cron_queue_info().
+ */
+function mailgun_cron_queue_info() {
+ $queues = array();
+ $queues['mailgun_queue'] = array(
+ 'worker callback' => 'mailgun_send',
+ 'time' => 60,
+ );
+ return $queues;
+}
+
+/**
+ * Implements hook_mail().
+ */
+function mailgun_mail($key, &$message, $params) {
+ switch ($key) {
+ case 'test':
+ $message['subject'] = t('Mailgun test email');
+ $message['body'] = $params['message'];
+ if ($params['attachment']) {
+ $message['params']['attachments'] = array(drupal_realpath('misc/druplicon.png'));
+ }
+ break;
+ }
+}
+
+/**
+ * Implements hook_libraries_info().
+ */
+function mailgun_libraries_info() {
+ $libraries['mailgun'] = array(
+ 'name' => 'Mailgun PHP library',
+ 'vendor url' => 'https://documentation.mailgun.com/wrappers.html#php',
+ 'download url' => 'https://github.com/mailgun/mailgun-php/archive/v1.7.2.zip',
+ 'path' => 'vendor',
+ 'version arguments' => array(
+ 'file' => 'src/Mailgun/Constants/Constants.php',
+ // const SDK_VERSION = "1.7";
+ 'pattern' => '/const SDK_VERSION = \"((\d+)\.(\d+))\";/',
+ ),
+ 'files' => array(
+ 'php' => array('autoload.php'),
+ ),
+ );
+
+ return $libraries;
+}
+
+/**
+ * Get the Mailgun client to access Mailgun's endpoints.
+ *
+ * @param string $key
+ * The Mailgun API key. Leave empty to use the API key saved in database.
+ */
+function mailgun_get_client($key = '') {
+ // Check if the Mailgun PHP library is installed.
+ $library = libraries_load('mailgun');
+ if (!$library['installed']) {
+ watchdog('mailgun', 'Mailgun client initialization failed: Unable to load the Mailgun PHP library.', NULL, WATCHDOG_ERROR);
+ return FALSE;
+ }
+
+ $key = (empty($key)) ? variable_get('mailgun_api_key', '') : $key;
+ if (empty($key)) {
+ watchdog('mailgun', 'Mailgun client initialization failed: Missing API key.', NULL, WATCHDOG_ERROR);
+ return FALSE;
+ }
+
+ $client = new \Mailgun\Mailgun($key);
+ return $client;
+}
+
+/**
+ * Send an e-mail using the Mailgun API.
+ *
+ * @param array $mailgun_message
+ * A Mailgun message array. Contains the following keys:
+ * - from: The e-mail addressthe message will be sent from.
+ * - to: The e-mail addressthe message will be sent to.
+ * - subject: The subject of the message.
+ * - text: The plain-text version of the message. Processed using check_plain().
+ * - html: The original message content. May contain HTML tags.
+ * - cc: One or more carbon copy recipients. If multiple, separate with commas.
+ * - bcc: One or more blind carbon copy recipients. If multiple, separate with commas.
+ * - o:tag: An array containing the tags to add to the message. See: https://documentation.mailgun.com/user_manual.html#tagging.
+ * - o:campaign: The campaign ID this message belongs to. See: https://documentation.mailgun.com/user_manual.html#um-campaign-analytics.
+ * - o:deliverytime: Desired time of delivery. Messages can be scheduled for a maximum of 3 days in the future. See: https://documentation.mailgun.com/api-intro.html#date-format.
+ * - o:dkim: Boolean indicating whether or not to enable DKIM signatures on per-message basis.
+ * - o:testmode: Boolean indicating whether or not to enable test mode. See: https://documentation.mailgun.com/user_manual.html#manual-testmode.
+ * - o:tracking: Boolean indicating whether or not to toggle tracking on a per-message basis. See: https://documentation.mailgun.com/user_manual.html#tracking-messages.
+ * - o:tracking-clicks: Boolean or string "htmlonly" indicating whether or not to toggle clicks tracking on a per-message basis. Has higher priority than domain-level setting.
+ * - o:tracking-opens: Boolean indicating whether or not to toggle clicks tracking on a per-message basis. Has higher priority than domain-level setting.
+ * - h:X-My-Header: h: prefix followed by an arbitrary value allows to append a custom MIME header to the message (X-My-Header in this case). For example, h:Reply-To to specify Reply-To address.
+ * - v:my-var: v: prefix followed by an arbitrary name allows to attach a custom JSON data to the message. See: https://documentation.mailgun.com/user_manual.html#manual-customdata.
+ *
+ * @return bool
+ * TRUE if the mail was successfully accepted, FALSE otherwise.
+ */
+function mailgun_send($mailgun_message) {
+ $client = mailgun_get_client();
+ if (!$client) {
+ return FALSE;
+ }
+
+ // Test mode
+ if (variable_get('mailgun_test', FALSE)) {
+ $mailgun_message['o:testmode'] = 'yes';
+ }
+
+ // Merge the $mailgun_message array with options.
+ $mailgun_message += $mailgun_message['params'];
+ unset($mailgun_message['params']);
+
+ if (variable_get('mailgun_domain', '_sender') == '_sender') {
+ // Extract the domain from the sender's email address. Use regular expression to check since it could be either a plain email address or in the form "Name ".
+ $tokens = (preg_match('/^\s*(.+?)\s*<\s*([^>]+)\s*>$/', $mailgun_message['from'], $matches) === 1) ? explode('@', $matches[2]) : explode('@', $mailgun_message['from']);
+ $mail_domain = array_pop($tokens);
+
+ // Retrieve a list of available domains first.
+ $domains = array();
+ try {
+ $result = $client->get('domains');
+ if ($result->http_response_code == 200) {
+ foreach ($result->http_response_body->items as $item) {
+ $domains[$item->name] = $item->name;
+ }
+ }
+ else {
+ watchdog('mailgun', 'Mailgun server returned a %code error. Could not retrieve domain list.', array('%code' => $result->http_response_code), WATCHDOG_ERROR);
+ }
+ } catch (Exception $e) {
+ watchdog('mailgun', 'An exception occurred while retrieving domains. @code: @message', array('@code' => $e->getCode(), '@message' => $e->getMessage()), WATCHDOG_ERROR);
+ }
+
+ if (empty($domains)) {
+ // No domain available. Although this shouldn't happen, doesn't hurt to check.
+ return FALSE;
+ }
+
+ // Now, we need to get the working domain. This is generally the domain the From address is on or the root domain of it.
+ $working_domain = '';
+ if ($key = array_search($mail_domain, $domains) !== FALSE) {
+ // Great. Found it.
+ $working_domain = $mail_domain;
+ }
+ else {
+ // Oops. No match. Perhaps it's a subdomain instead.
+ foreach ($domains as $domain) {
+ if (strpos($domain, $mail_domain) !== FALSE) {
+ // Got it.
+ $working_domain = $domain;
+ break;
+ }
+ }
+ }
+
+ // There is a chance that the user is attempting to send from an email address that's on a domain not yet added to the Mailgun account.
+ // In that case, abort sending and report error.
+ if (empty($working_domain)) {
+ watchdog('mailgun', 'Unable to locate a working domain for From address %mail. Aborting sending.', array('%mail' => $mailgun_message['from']), WATCHDOG_ERROR);
+ return FALSE;
+ }
+ }
+ else {
+ $working_domain = variable_get('mailgun_domain', '');
+ }
+
+ // Attachments
+ $post_data = array();
+ if (!empty($mailgun_message['attachments'])) {
+ // Send message with attachments.
+ $post_data['attachment'] = $mailgun_message['attachments'];
+ unset($mailgun_message['attachments']);
+ }
+
+ try {
+ $result = $client->sendMessage($working_domain, $mailgun_message, $post_data);
+
+ // For a list of HTTP response codes, see: https://documentation.mailgun.com/api-intro.html#errors.
+ if ($result->http_response_code == 200) {
+ if (variable_get('mailgun_log', FALSE)) {
+ watchdog('mailgun', 'Successfully sent message from %from to %to. %code: %message.', array('%from' => $mailgun_message['from'], '%to' => $mailgun_message['to'], '%code' => $result->http_response_code, '%message' => $result->http_response_body->message));
+ }
+ return TRUE;
+ }
+ else {
+ watchdog('mailgun', 'Failed to send message from %from to %to. %code: %message.', array('%from' => $mailgun_message['from'], '%to' => $mailgun_message['to'], '%code' => $result->http_response_code, '%message' => $result->http_response_body->message), WATCHDOG_ERROR);
+ return FALSE;
+ }
+ } catch (Exception $e) {
+ watchdog('mailgun', 'Exception occurred while trying to send test email from %from to %to. @code: @message.', array('%from' => $mailgun_message['from'], '%to' => $mailgun_message['to'], '@code' => $e->getCode(), '@message' => $e->getMessage()));
+ }
+}