annotate sites/all/modules/recaptcha/recaptcha_mailhide.module @ 9:830c812b520f

added smtp module
author root <root@paio.local>
date Mon, 28 Oct 2013 15:34:27 +0000
parents b74b41bb73f0
children
rev   line source
danielebarchiesi@2 1 <?php
danielebarchiesi@2 2
danielebarchiesi@2 3 /**
danielebarchiesi@2 4 * @file
danielebarchiesi@2 5 * Protects email addresses using the reCAPTCHA web service.
danielebarchiesi@2 6 */
danielebarchiesi@2 7
danielebarchiesi@2 8 /**
danielebarchiesi@2 9 * Implements hook_help().
danielebarchiesi@2 10 */
danielebarchiesi@2 11 function recaptcha_mailhide_help($path, $arg) {
danielebarchiesi@2 12 $output = '';
danielebarchiesi@2 13 switch ($path) {
danielebarchiesi@2 14 case 'admin/modules#name':
danielebarchiesi@2 15 $output .= t('reCAPTCHA');
danielebarchiesi@2 16 break;
danielebarchiesi@2 17 case 'admin/modules#description':
danielebarchiesi@2 18 $output .= t('Uses the <a href="@url" target="_blank">reCAPTCHA</a> web service to protect email addresses.', array('@url' => url('https://www.google.com/recaptcha')));
danielebarchiesi@2 19 break;
danielebarchiesi@2 20 case 'admin/help#recaptcha':
danielebarchiesi@2 21 $output .= '<p>' .
danielebarchiesi@2 22 t('Uses the reCAPTCHA web service to protect email addresses. For more information on what reCAPTCHA Mailhide is, visit <a href="@url" target="_blank">the official website</a>.', array('@url' => url('https://www.google.com/recaptcha/mailhide/'))) .
danielebarchiesi@2 23 '</p><h3>' .
danielebarchiesi@2 24 t('Configuration') .
danielebarchiesi@2 25 '</h3><p>' .
danielebarchiesi@2 26 t('Head over to the <a href="@inputformats">input format settings</a> and add the <a href="@url" target="_blank">reCAPTCHA Mailhide</a> input filter to hide posted emails.', array('@inputformats' => url('admin/settings/filter'), '@url' => url('https://www.google.com/recaptcha/mailhide/'))) .
danielebarchiesi@2 27 '</p>';
danielebarchiesi@2 28 break;
danielebarchiesi@2 29 }
danielebarchiesi@2 30 return $output;
danielebarchiesi@2 31 }
danielebarchiesi@2 32
danielebarchiesi@2 33 /**
danielebarchiesi@2 34 * Implements hook_filter_info().
danielebarchiesi@2 35 */
danielebarchiesi@2 36 function recaptcha_mailhide_filter_info() {
danielebarchiesi@2 37 $filters['filter_recaptcha_mailhide'] = array(
danielebarchiesi@2 38 'title' => t('reCAPTCHA Mailhide'),
danielebarchiesi@2 39 'description' => _filter_recaptcha_mailhide_tips('', ''),
danielebarchiesi@2 40 'process callback' => '_filter_recaptcha_mailhide',
danielebarchiesi@2 41 'settings callback' => '_filter_recaptcha_mailhide_settings',
danielebarchiesi@2 42 'tips callback' => '_filter_recaptcha_mailhide_tips',
danielebarchiesi@2 43 'cache' => FALSE,
danielebarchiesi@2 44 );
danielebarchiesi@2 45 return $filters;
danielebarchiesi@2 46 }
danielebarchiesi@2 47
danielebarchiesi@2 48 /**
danielebarchiesi@2 49 * Filter callbacks.
danielebarchiesi@2 50 */
danielebarchiesi@2 51 function _filter_recaptcha_mailhide($text, $filter, $format) {
danielebarchiesi@2 52 global $_recaptcha_mailhide_public_key, $_recaptcha_mailhide_private_key, $_recaptcha_mailhide_nokey_warn;
danielebarchiesi@2 53 _recaptcha_mailhide_load_library();
danielebarchiesi@2 54 $_recaptcha_mailhide_public_key = $filter->settings['recaptcha_mailhide_public_key'];
danielebarchiesi@2 55 $_recaptcha_mailhide_private_key = $filter->settings['recaptcha_mailhide_private_key'];
danielebarchiesi@2 56
danielebarchiesi@2 57 $text = ' ' . $text . ' ';
danielebarchiesi@2 58 $text = preg_replace_callback("!(<p>|<li>|<br\s*/?>|[ \n\r\t\(])([A-Za-z0-9._-]+@[A-Za-z0-9._+-]+\.[A-Za-z]{2,4})([.,?]?)(?=(</p>|</li>|<br\s*/?>|[ \n\r\t\)]))!i", '_recaptcha_replace', $text);
danielebarchiesi@2 59 $text = drupal_substr($text, 1, -1);
danielebarchiesi@2 60
danielebarchiesi@2 61 unset($_recaptcha_mailhide_public_key);
danielebarchiesi@2 62 unset($_recaptcha_mailhide_private_key);
danielebarchiesi@2 63 unset($_recaptcha_mailhide_nokey_warn);
danielebarchiesi@2 64 return $text;
danielebarchiesi@2 65 }
danielebarchiesi@2 66
danielebarchiesi@2 67 function _filter_recaptcha_mailhide_settings($form, &$form_state, $filter, $format, $defaults, $filters) {
danielebarchiesi@2 68 _recaptcha_mailhide_load_library();
danielebarchiesi@2 69 $public = isset($filter->settings['recaptcha_mailhide_public_key']) ? $filter->settings['recaptcha_mailhide_public_key'] : '';
danielebarchiesi@2 70 $private = isset($filter->settings['recaptcha_mailhide_private_key']) ? $filter->settings['recaptcha_mailhide_private_key'] : '';
danielebarchiesi@2 71 $settings['recaptcha_mailhide_public_key'] = array(
danielebarchiesi@2 72 '#type' => 'textfield',
danielebarchiesi@2 73 '#title' => t('Public Key'),
danielebarchiesi@2 74 '#default_value' => $public,
danielebarchiesi@2 75 '#maxlength' => 50,
danielebarchiesi@2 76 '#description' => t('Your public Mailhide key obtained from <a href="@url" target="_blank">reCAPTCHA</a>.', array('@url' => 'https://www.google.com/recaptcha/mailhide/apikey')),
danielebarchiesi@2 77 );
danielebarchiesi@2 78 $settings['recaptcha_mailhide_private_key'] = array(
danielebarchiesi@2 79 '#type' => 'textfield',
danielebarchiesi@2 80 '#title' => t('Private Key'),
danielebarchiesi@2 81 '#default_value' => $private,
danielebarchiesi@2 82 '#maxlength' => 50,
danielebarchiesi@2 83 '#description' => t('Your private Mailhide key obtained from <a href="@url" target="_blank">reCAPTCHA</a>.', array('@url' => 'https://www.google.com/recaptcha/mailhide/apikey')),
danielebarchiesi@2 84 );
danielebarchiesi@2 85 return $settings;
danielebarchiesi@2 86 }
danielebarchiesi@2 87
danielebarchiesi@2 88 function _filter_recaptcha_mailhide_tips($filter, $format, $long = FALSE) {
danielebarchiesi@2 89 return t('E-Mail addresses are hidden with <a href="@url" target="_blank">reCAPTCHA Mailhide</a>.', array('@url' => 'https://www.google.com/recaptcha/mailhide/'));
danielebarchiesi@2 90 }
danielebarchiesi@2 91
danielebarchiesi@2 92 /**
danielebarchiesi@2 93 * Private reCAPTCHA function to replace an email regex match
danielebarchiesi@2 94 */
danielebarchiesi@2 95 function _recaptcha_replace($match) {
danielebarchiesi@2 96 global $_recaptcha_mailhide_public_key, $_recaptcha_mailhide_private_key, $_recaptcha_mailhide_nokey_warn;
danielebarchiesi@2 97 // recaptchalib will die if we invoke without setting the keys. Fail gracefully in this case.
danielebarchiesi@2 98 if (empty($_recaptcha_mailhide_public_key) || empty($_recaptcha_mailhide_private_key) || !function_exists('mcrypt_encrypt')) {
danielebarchiesi@2 99 if ($_recaptcha_mailhide_nokey_warn != TRUE) {
danielebarchiesi@2 100 if (!function_exists('mcrypt_encrypt')) {
danielebarchiesi@2 101 drupal_set_message(t('Addresses cannot be hidden because Mcrypt is not installed.'), 'error');
danielebarchiesi@2 102 }
danielebarchiesi@2 103 else {
danielebarchiesi@2 104 drupal_set_message(t('Addresses cannot be hidden because the administrator has not set the reCAPTCHA Mailhide keys.'), 'error');
danielebarchiesi@2 105 }
danielebarchiesi@2 106 $_recaptcha_mailhide_nokey_warn = TRUE;
danielebarchiesi@2 107 }
danielebarchiesi@2 108 $email = $match[2];
danielebarchiesi@2 109 }
danielebarchiesi@2 110 else {
danielebarchiesi@2 111 $email = recaptcha_mailhide_html($_recaptcha_mailhide_public_key, $_recaptcha_mailhide_private_key, $match[2]);
danielebarchiesi@2 112 }
danielebarchiesi@2 113 return $match[1] . $email . $match[3];
danielebarchiesi@2 114 }
danielebarchiesi@2 115
danielebarchiesi@2 116 /**
danielebarchiesi@2 117 * Load the recaptcha library.
danielebarchiesi@2 118 */
danielebarchiesi@2 119 function _recaptcha_mailhide_load_library() {
danielebarchiesi@2 120 module_load_include('php', 'recaptcha', 'recaptcha-php-1.11/recaptchalib');
danielebarchiesi@2 121 }