friendica/mod/wallmessage.php

146 lines
3.8 KiB
PHP
Raw Normal View History

2012-04-01 07:59:35 +00:00
<?php
/**
* @file mod/wallmessage.php
*/
use Friendica\App;
2018-01-21 18:33:59 +00:00
use Friendica\Core\L10n;
2018-10-29 21:20:46 +00:00
use Friendica\Core\Logger;
use Friendica\Core\Renderer;
use Friendica\Core\System;
use Friendica\Database\DBA;
use Friendica\Model\Mail;
use Friendica\Model\Profile;
use Friendica\Util\Strings;
function wallmessage_post(App $a) {
2012-04-01 07:59:35 +00:00
$replyto = Profile::getMyURL();
2018-01-22 14:16:25 +00:00
if (!$replyto) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('Permission denied.') . EOL);
2012-04-01 07:59:35 +00:00
return;
}
$subject = (!empty($_REQUEST['subject']) ? Strings::escapeTags(trim($_REQUEST['subject'])) : '');
$body = (!empty($_REQUEST['body']) ? Strings::escapeHtml(trim($_REQUEST['body'])) : '');
2012-04-01 07:59:35 +00:00
$recipient = (($a->argc > 1) ? Strings::escapeTags($a->argv[1]) : '');
2018-01-22 14:16:25 +00:00
if ((! $recipient) || (! $body)) {
2012-04-01 07:59:35 +00:00
return;
}
$r = q("select * from user where nickname = '%s' limit 1",
2018-07-21 13:10:13 +00:00
DBA::escape($recipient)
2012-04-01 07:59:35 +00:00
);
2018-07-21 12:46:04 +00:00
if (! DBA::isResult($r)) {
2018-10-29 21:20:46 +00:00
Logger::log('wallmessage: no recipient');
2012-04-01 07:59:35 +00:00
return;
}
$user = $r[0];
2018-01-22 14:16:25 +00:00
if (! intval($user['unkmail'])) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('Permission denied.') . EOL);
2012-04-01 07:59:35 +00:00
return;
}
$r = q("select count(*) as total from mail where uid = %d and created > UTC_TIMESTAMP() - INTERVAL 1 day and unknown = 1",
intval($user['uid'])
);
2018-01-22 14:16:25 +00:00
if ($r[0]['total'] > $user['cntunkmail']) {
notice(L10n::t('Number of daily wall messages for %s exceeded. Message failed.', $user['username']));
2012-04-01 07:59:35 +00:00
return;
}
$ret = Mail::sendWall($user, $body, $subject, $replyto);
2012-04-01 07:59:35 +00:00
2018-01-22 14:16:25 +00:00
switch ($ret) {
2012-04-01 07:59:35 +00:00
case -1:
2018-01-22 14:16:25 +00:00
notice(L10n::t('No recipient selected.') . EOL);
2012-04-01 07:59:35 +00:00
break;
case -2:
2018-01-22 14:16:25 +00:00
notice(L10n::t('Unable to check your home location.') . EOL);
2012-04-01 07:59:35 +00:00
break;
case -3:
2018-01-22 14:16:25 +00:00
notice(L10n::t('Message could not be sent.') . EOL);
2012-04-01 07:59:35 +00:00
break;
case -4:
2018-01-22 14:16:25 +00:00
notice(L10n::t('Message collection failure.') . EOL);
2012-04-01 07:59:35 +00:00
break;
default:
2018-01-22 14:16:25 +00:00
info(L10n::t('Message sent.') . EOL);
2012-04-01 07:59:35 +00:00
}
$a->internalRedirect('profile/'.$user['nickname']);
}
2012-04-01 07:59:35 +00:00
function wallmessage_content(App $a) {
2012-04-01 07:59:35 +00:00
if (!Profile::getMyURL()) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('Permission denied.') . EOL);
2012-04-01 07:59:35 +00:00
return;
}
$recipient = (($a->argc > 1) ? $a->argv[1] : '');
2018-01-22 14:16:25 +00:00
if (!$recipient) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('No recipient.') . EOL);
2012-04-01 07:59:35 +00:00
return;
}
$r = q("select * from user where nickname = '%s' limit 1",
2018-07-21 13:10:13 +00:00
DBA::escape($recipient)
2012-04-01 07:59:35 +00:00
);
2018-07-21 12:46:04 +00:00
if (! DBA::isResult($r)) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('No recipient.') . EOL);
2018-10-29 21:20:46 +00:00
Logger::log('wallmessage: no recipient');
2012-04-01 07:59:35 +00:00
return;
}
$user = $r[0];
2018-01-22 14:16:25 +00:00
if (!intval($user['unkmail'])) {
2018-01-21 18:33:59 +00:00
notice(L10n::t('Permission denied.') . EOL);
2012-04-01 07:59:35 +00:00
return;
}
$r = q("select count(*) as total from mail where uid = %d and created > UTC_TIMESTAMP() - INTERVAL 1 day and unknown = 1",
2012-04-01 07:59:35 +00:00
intval($user['uid'])
);
2018-01-22 14:16:25 +00:00
if ($r[0]['total'] > $user['cntunkmail']) {
notice(L10n::t('Number of daily wall messages for %s exceeded. Message failed.', $user['username']));
2012-04-01 07:59:35 +00:00
return;
}
$tpl = Renderer::getMarkupTemplate('wallmsg-header.tpl');
$a->page['htmlhead'] .= Renderer::replaceMacros($tpl, [
2017-08-26 07:52:49 +00:00
'$baseurl' => System::baseUrl(true),
'$nickname' => $user['nickname'],
2018-01-22 14:16:25 +00:00
'$linkurl' => L10n::t('Please enter a link URL:')
]);
$tpl = Renderer::getMarkupTemplate('wallmessage.tpl');
$o = Renderer::replaceMacros($tpl, [
2018-01-22 14:16:25 +00:00
'$header' => L10n::t('Send Private Message'),
'$subheader' => L10n::t('If you wish for %s to respond, please check that the privacy settings on your site allow private mail from unknown senders.', $user['username']),
2018-01-22 14:16:25 +00:00
'$to' => L10n::t('To:'),
'$subject' => L10n::t('Subject:'),
'$recipname' => $user['username'],
'$nickname' => $user['nickname'],
'$subjtxt' => (!empty($_REQUEST['subject']) ? strip_tags($_REQUEST['subject']) : ''),
'$text' => (!empty($_REQUEST['body']) ? Strings::escapeHtml(htmlspecialchars($_REQUEST['body'])) : ''),
'$readonly' => '',
2018-01-22 14:16:25 +00:00
'$yourmessage' => L10n::t('Your message:'),
'$parent' => '',
2018-01-22 14:16:25 +00:00
'$upload' => L10n::t('Upload photo'),
'$insert' => L10n::t('Insert web link'),
'$wait' => L10n::t('Please wait')
]);
return $o;
}