*/
use Friendica\Content\Text\BBCode;
use Friendica\Content\Text\HTML;
use Friendica\Core\Hook;
use Friendica\Core\L10n;
use Friendica\Core\Logger;
use Friendica\Core\PConfig;
use Friendica\Database\DBA;
use Friendica\DI;
use Friendica\Util\Network;
use Friendica\Util\Strings;
use Friendica\Util\XML;
function wppost_install()
{
Hook::register('hook_fork', 'addon/wppost/wppost.php', 'wppost_hook_fork');
Hook::register('post_local', 'addon/wppost/wppost.php', 'wppost_post_local');
Hook::register('notifier_normal', 'addon/wppost/wppost.php', 'wppost_send');
Hook::register('jot_networks', 'addon/wppost/wppost.php', 'wppost_jot_nets');
Hook::register('connector_settings', 'addon/wppost/wppost.php', 'wppost_settings');
Hook::register('connector_settings_post', 'addon/wppost/wppost.php', 'wppost_settings_post');
}
function wppost_uninstall()
{
Hook::unregister('hook_fork', 'addon/wppost/wppost.php', 'wppost_hook_fork');
Hook::unregister('post_local', 'addon/wppost/wppost.php', 'wppost_post_local');
Hook::unregister('notifier_normal', 'addon/wppost/wppost.php', 'wppost_send');
Hook::unregister('jot_networks', 'addon/wppost/wppost.php', 'wppost_jot_nets');
Hook::unregister('connector_settings', 'addon/wppost/wppost.php', 'wppost_settings');
Hook::unregister('connector_settings_post', 'addon/wppost/wppost.php', 'wppost_settings_post');
// obsolete - remove
Hook::unregister('post_local_end', 'addon/wppost/wppost.php', 'wppost_send');
Hook::unregister('addon_settings', 'addon/wppost/wppost.php', 'wppost_settings');
Hook::unregister('addon_settings_post', 'addon/wppost/wppost.php', 'wppost_settings_post');
}
function wppost_jot_nets(\Friendica\App &$a, array &$jotnets_fields)
{
if (!local_user()) {
return;
}
if (DI::pConfig()->get(local_user(),'wppost','post')) {
$jotnets_fields[] = [
'type' => 'checkbox',
'field' => [
'wppost_enable',
L10n::t('Post to Wordpress'),
DI::pConfig()->get(local_user(),'wppost','post_by_default')
]
];
}
}
function wppost_settings(&$a,&$s) {
if(! local_user())
return;
/* Add our stylesheet to the page so we can make our settings look nice */
DI::page()['htmlhead'] .= '' . "\r\n";
/* Get the current state of our config variables */
$enabled = DI::pConfig()->get(local_user(),'wppost','post');
$checked = (($enabled) ? ' checked="checked" ' : '');
$css = (($enabled) ? '' : '-disabled');
$def_enabled = DI::pConfig()->get(local_user(),'wppost','post_by_default');
$back_enabled = DI::pConfig()->get(local_user(),'wppost','backlink');
$shortcheck_enabled = DI::pConfig()->get(local_user(),'wppost','shortcheck');
$def_checked = (($def_enabled) ? ' checked="checked" ' : '');
$back_checked = (($back_enabled) ? ' checked="checked" ' : '');
$shortcheck_checked = (($shortcheck_enabled) ? ' checked="checked" ' : '');
$wp_username = DI::pConfig()->get(local_user(), 'wppost', 'wp_username');
$wp_password = DI::pConfig()->get(local_user(), 'wppost', 'wp_password');
$wp_blog = DI::pConfig()->get(local_user(), 'wppost', 'wp_blog');
$wp_backlink_text = DI::pConfig()->get(local_user(), 'wppost', 'wp_backlink_text');
/* Add some HTML to the existing form */
$s .= '';
$s .= '
'. L10n::t('Wordpress Export').'
';
$s .= '';
$s .= '
';
$s .= '';
$s .= '
'. L10n::t('Wordpress Export').'
';
$s .= '';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
$s .= '
';
$s .= '';
$s .= '';
$s .= '
';
/* provide a submit button */
$s .= '
';
}
function wppost_settings_post(&$a,&$b) {
if(!empty($_POST['wppost-submit'])) {
DI::pConfig()->set(local_user(),'wppost','post',intval($_POST['wppost']));
DI::pConfig()->set(local_user(),'wppost','post_by_default',intval($_POST['wp_bydefault'] ?? false));
DI::pConfig()->set(local_user(),'wppost','wp_username',trim($_POST['wp_username']));
DI::pConfig()->set(local_user(),'wppost','wp_password',trim($_POST['wp_password']));
DI::pConfig()->set(local_user(),'wppost','wp_blog',trim($_POST['wp_blog']));
DI::pConfig()->set(local_user(),'wppost','backlink',trim($_POST['wp_backlink'] ?? ''));
DI::pConfig()->set(local_user(),'wppost','shortcheck',trim($_POST['wp_shortcheck']));
$wp_backlink_text = Strings::escapeTags(trim($_POST['wp_backlink_text']));
$wp_backlink_text = BBCode::convert($wp_backlink_text, false, 8);
$wp_backlink_text = HTML::toPlaintext($wp_backlink_text, 0, true);
DI::pConfig()->set(local_user(),'wppost','wp_backlink_text', $wp_backlink_text);
}
}
function wppost_hook_fork(&$a, &$b)
{
if ($b['name'] != 'notifier_normal') {
return;
}
$post = $b['data'];
if ($post['deleted'] || $post['private'] || ($post['created'] !== $post['edited']) ||
!strstr($post['postopts'], 'wppost') || ($post['parent'] != $post['id'])) {
$b['execute'] = false;
return;
}
}
function wppost_post_local(&$a, &$b) {
// This can probably be changed to allow editing by pointing to a different API endpoint
if ($b['edit']) {
return;
}
if (!local_user() || (local_user() != $b['uid'])) {
return;
}
if ($b['private'] || $b['parent']) {
return;
}
$wp_post = intval(DI::pConfig()->get(local_user(),'wppost','post'));
$wp_enable = (($wp_post && !empty($_REQUEST['wppost_enable'])) ? intval($_REQUEST['wppost_enable']) : 0);
if ($b['api_source'] && intval(DI::pConfig()->get(local_user(),'wppost','post_by_default'))) {
$wp_enable = 1;
}
if (!$wp_enable) {
return;
}
if (strlen($b['postopts'])) {
$b['postopts'] .= ',';
}
$b['postopts'] .= 'wppost';
}
function wppost_send(&$a, &$b)
{
if($b['deleted'] || $b['private'] || ($b['created'] !== $b['edited'])) {
return;
}
if(! strstr($b['postopts'],'wppost')) {
return;
}
if($b['parent'] != $b['id']) {
return;
}
// Dont't post if the post doesn't belong to us.
// This is a check for forum postings
$self = DBA::selectFirst('contact', ['id'], ['uid' => $b['uid'], 'self' => true]);
if ($b['contact-id'] != $self['id']) {
return;
}
$wp_username = XML::escape(DI::pConfig()->get($b['uid'], 'wppost', 'wp_username'));
$wp_password = XML::escape(DI::pConfig()->get($b['uid'], 'wppost', 'wp_password'));
$wp_blog = DI::pConfig()->get($b['uid'],'wppost','wp_blog');
$wp_backlink_text = DI::pConfig()->get($b['uid'],'wppost','wp_backlink_text');
if ($wp_backlink_text == '') {
$wp_backlink_text = L10n::t('Read the original post and comment stream on Friendica');
}
if ($wp_username && $wp_password && $wp_blog) {
$wptitle = trim($b['title']);
if (intval(DI::pConfig()->get($b['uid'], 'wppost', 'shortcheck'))) {
// Checking, if its a post that is worth a blog post
$postentry = false;
$siteinfo = BBCode::getAttachedData($b["body"]);
// Is it a link to an aricle, a video or a photo?
if (isset($siteinfo["type"])) {
if (in_array($siteinfo["type"], ["link", "audio", "video", "photo"])) {
$postentry = true;
}
}
// Does it have a title?
if ($wptitle != "") {
$postentry = true;
}
// Is it larger than 500 characters?
if (strlen($b['body']) > 500) {
$postentry = true;
}
if (!$postentry) {
return;
}
}
// If the title is empty then try to guess
if ($wptitle == '') {
// Fetch information about the post
$siteinfo = BBCode::getAttachedData($b["body"]);
if (isset($siteinfo["title"])) {
$wptitle = $siteinfo["title"];
}
// If no bookmark is found then take the first line
if ($wptitle == '') {
// Remove the share element before fetching the first line
$title = trim(preg_replace("/\[share.*?\](.*?)\[\/share\]/ism","\n$1\n",$b['body']));
$title = HTML::toPlaintext(BBCode::convert($title, false), 0, true)."\n";
$pos = strpos($title, "\n");
$trailer = "";
if (($pos == 0) || ($pos > 100)) {
$pos = 100;
$trailer = "...";
}
$wptitle = substr($title, 0, $pos).$trailer;
}
}
$title = '' . (($wptitle) ? $wptitle : L10n::t('Post from Friendica')) . '';
$post = BBCode::convert($b['body'], false, 4);
// If a link goes to youtube then remove the stuff around it. Wordpress detects youtube links and embeds it
$post = preg_replace('/(.*?)<\/a>/ism',"\n$1\n",$post);
$post = preg_replace('/(.*?)<\/a>/ism',"\n$1\n",$post);
$post = $title.$post;
$wp_backlink = intval(DI::pConfig()->get($b['uid'],'wppost','backlink'));
if($wp_backlink && $b['plink']) {
$post .= EOL . EOL . ''
. $wp_backlink_text . '' . EOL . EOL;
}
$post = XML::escape($post);
$xml = <<< EOT
blogger.newPost$wp_username$wp_password$post1
EOT;
Logger::log('wppost: data: ' . $xml, Logger::DATA);
if ($wp_blog !== 'test') {
$x = Network::post($wp_blog, $xml)->getBody();
}
Logger::log('posted to wordpress: ' . (($x) ? $x : ''), Logger::DEBUG);
}
}
