14654e4deSAdrian Lang<?php 24654e4deSAdrian Langrequire_once DOKU_PLUGIN . 'action.php'; 370f4a435SAdrian Langrequire_once DOKU_INC . 'inc/form.php'; 44654e4deSAdrian Lang 54654e4deSAdrian Langclass action_plugin_recommend extends DokuWiki_Action_Plugin { 64654e4deSAdrian Lang function getInfo(){ 74654e4deSAdrian Lang return confToHash(dirname(__FILE__).'/INFO.txt'); 84654e4deSAdrian Lang } 94654e4deSAdrian Lang 104654e4deSAdrian Lang function register($controller) { 1170f4a435SAdrian Lang foreach (array('ACTION_ACT_PREPROCESS', 'AJAX_CALL_UNKNOWN', 1270f4a435SAdrian Lang 'TPL_ACT_UNKNOWN') as $event) { 134654e4deSAdrian Lang $controller->register_hook($event, 'BEFORE', $this, '_handle'); 144654e4deSAdrian Lang } 154654e4deSAdrian Lang } 164654e4deSAdrian Lang 174654e4deSAdrian Lang function _handle($event, $param) { 1870f4a435SAdrian Lang if (!in_array($event->data, array('recommend', 'plugin_recommend')) || 1970f4a435SAdrian Lang !isset($_SERVER['REMOTE_USER'])) { 204654e4deSAdrian Lang return; 214654e4deSAdrian Lang } 224654e4deSAdrian Lang 234654e4deSAdrian Lang $event->preventDefault(); 244654e4deSAdrian Lang 254654e4deSAdrian Lang if ($event->name === 'ACTION_ACT_PREPROCESS') { 264654e4deSAdrian Lang return; 274654e4deSAdrian Lang } 284654e4deSAdrian Lang 294654e4deSAdrian Lang $event->stopPropagation(); 304654e4deSAdrian Lang 3170f4a435SAdrian Lang if ($_SERVER['REQUEST_METHOD'] == 'POST' && 3270f4a435SAdrian Lang isset($_POST['sectok']) && 3370f4a435SAdrian Lang !($err = $this->_handle_post())) { 3470f4a435SAdrian Lang if ($event->name === 'AJAX_CALL_UNKNOWN') { 3570f4a435SAdrian Lang /* To signal success to AJAX. */ 3670f4a435SAdrian Lang header('HTTP/1.1 204 No Content'); 374654e4deSAdrian Lang return; 384654e4deSAdrian Lang } 3970f4a435SAdrian Lang echo 'Thanks for recommending our site.'; 4070f4a435SAdrian Lang return; 4170f4a435SAdrian Lang } 4270f4a435SAdrian Lang /* To display msgs even via AJAX. */ 4370f4a435SAdrian Lang echo ' '; 4470f4a435SAdrian Lang if (isset($err)) { 4570f4a435SAdrian Lang msg($err, -1); 4670f4a435SAdrian Lang } 474654e4deSAdrian Lang $this->_show_form(); 484654e4deSAdrian Lang } 494654e4deSAdrian Lang 504654e4deSAdrian Lang function _show_form() { 514654e4deSAdrian Lang $name = isset($_REQUEST['r_name']) ? $_REQUEST['r_name'] : ''; 524654e4deSAdrian Lang $mail = isset($_REQUEST['r_email']) ? $_REQUEST['r_email'] : ''; 534654e4deSAdrian Lang $comment = isset($_REQUEST['comment']) ? $_REQUEST['r_comment'] : ''; 5470f4a435SAdrian Lang if (isset($_REQUEST['id'])) { 5570f4a435SAdrian Lang $id = $_REQUEST['id']; 5670f4a435SAdrian Lang } else { 5770f4a435SAdrian Lang global $ID; 5870f4a435SAdrian Lang if (!isset($ID)) { 5970f4a435SAdrian Lang throw new Exception('Unknown page'); 6070f4a435SAdrian Lang } 6170f4a435SAdrian Lang $id = $ID; 6270f4a435SAdrian Lang } 634654e4deSAdrian Lang $form = new Doku_Form('recommend_plugin', '?do=recommend'); 6470f4a435SAdrian Lang $form->addHidden('id', $id); 6570f4a435SAdrian Lang $form->startFieldset('Recommend page “' . hsc($id). '”'); 664654e4deSAdrian Lang $form->addElement(form_makeTextField('r_name', $name, 'Recipient name')); 6770f4a435SAdrian Lang $form->addElement(form_makeTextField('r_email', $mail, 6870f4a435SAdrian Lang 'Recipient email address')); 694654e4deSAdrian Lang $form->addElement('<label><span>'.hsc('Additional comment').'</span>'. 7070f4a435SAdrian Lang '<textarea name="comment" rows="3" cols="10" ' . 7170f4a435SAdrian Lang 'class="edit">' . $comment . '</textarea></label>'); 724654e4deSAdrian Lang $form->addElement(form_makeButton('submit', '', 'Send recommendation')); 73*869ed47dSAdrian Lang $form->addElement(form_makeButton('submit', 'cancel', 'Cancel')); 744654e4deSAdrian Lang $form->printForm(); 754654e4deSAdrian Lang } 764654e4deSAdrian Lang 774654e4deSAdrian Lang function _handle_post() { 782cdbf48fSAdrian Lang /* Validate input. */ 794654e4deSAdrian Lang if (!isset($_POST['r_email']) || !mail_isvalid($_POST['r_email'])) { 8070f4a435SAdrian Lang return 'Invalid email address submitted'; 814654e4deSAdrian Lang } 824654e4deSAdrian Lang $email = $_POST['r_email']; 834654e4deSAdrian Lang 844654e4deSAdrian Lang if (!isset($_POST['id']) || !page_exists($_POST['id'])) { 8570f4a435SAdrian Lang return 'Invalid page submitted'; 864654e4deSAdrian Lang } 874654e4deSAdrian Lang $page = $_POST['id']; 884654e4deSAdrian Lang 894654e4deSAdrian Lang if (!isset($_POST['r_name']) || trim($_POST['r_name']) === '') { 9070f4a435SAdrian Lang return 'Invalid name submitted'; 914654e4deSAdrian Lang } 924654e4deSAdrian Lang $name = $_POST['r_name']; 934654e4deSAdrian Lang 944654e4deSAdrian Lang $comment = isset($_POST['comment']) ? $_POST['comment'] : null; 954654e4deSAdrian Lang 962cdbf48fSAdrian Lang /* Prepare mail text. */ 974654e4deSAdrian Lang $mailtext = file_get_contents(dirname(__FILE__).'/template.txt'); 984654e4deSAdrian Lang 994654e4deSAdrian Lang global $conf; 1004654e4deSAdrian Lang global $USERINFO; 1014654e4deSAdrian Lang foreach (array('NAME' => $name, 1024654e4deSAdrian Lang 'PAGE' => $page, 1034654e4deSAdrian Lang 'SITE' => $conf['title'], 1044654e4deSAdrian Lang 'URL' => wl($page, '', true), 1054654e4deSAdrian Lang 'COMMENT' => $comment, 1064654e4deSAdrian Lang 'AUTHOR' => $USERINFO['name']) as $var => $val) { 1074654e4deSAdrian Lang $mailtext = str_replace('@' . $var . '@', $val, $mailtext); 1084654e4deSAdrian Lang } 1092cdbf48fSAdrian Lang /* Limit to two empty lines. */ 1104654e4deSAdrian Lang $mailtext = preg_replace('/\n{4,}/', "\n\n\n", $mailtext); 1114654e4deSAdrian Lang 1122cdbf48fSAdrian Lang /* Perform stuff. */ 1134654e4deSAdrian Lang mail_send($email, 'Page recommendation', $mailtext); 1142cdbf48fSAdrian Lang $this->_log($USERINFO['mail'], $email); 11570f4a435SAdrian Lang return false; 1164654e4deSAdrian Lang } 1174654e4deSAdrian Lang 1182cdbf48fSAdrian Lang function _log($sender, $receiver) { 1192cdbf48fSAdrian Lang global $ID; 1202cdbf48fSAdrian Lang $path = DOKU_INC.'data/cache/recommend'; 1212cdbf48fSAdrian Lang if (!file_exists($path)) { 1222cdbf48fSAdrian Lang mkdir($path); 1232cdbf48fSAdrian Lang } 1242cdbf48fSAdrian Lang file_put_contents($path . '/' . date('Y-m') . '.log', date('r') . ': ' . 1252cdbf48fSAdrian Lang "“${sender}” recommended “${ID}” to “${receiver}”.", 1262cdbf48fSAdrian Lang FILE_APPEND); 1272cdbf48fSAdrian Lang } 1284654e4deSAdrian Lang} 129