2012-12-22 20:36:35 +00:00
< ? php
/**
* Name : Tumblr Post Connector
* Description : Post to Tumblr
2014-05-29 10:42:25 +00:00
* Version : 2.0
2012-12-22 20:36:35 +00:00
* Author : Mike Macgirvin < http :// macgirvin . com / profile / mike >
2014-05-29 10:42:25 +00:00
* Author : Michael Vogel < https :// pirati . ca / profile / heluecht >
2012-12-22 20:36:35 +00:00
*/
2018-01-28 19:43:56 +00:00
require_once __DIR__ . DIRECTORY_SEPARATOR . 'library' . DIRECTORY_SEPARATOR . 'tumblroauth.php' ;
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
use Friendica\Content\PageInfo ;
2018-01-27 01:04:00 +00:00
use Friendica\Content\Text\BBCode ;
2023-04-18 05:56:32 +00:00
use Friendica\Content\Text\HTML ;
2023-04-06 19:10:32 +00:00
use Friendica\Content\Text\NPF ;
2023-04-18 05:56:32 +00:00
use Friendica\Core\Cache\Enum\Duration ;
2018-12-26 07:28:16 +00:00
use Friendica\Core\Hook ;
2018-10-29 23:40:18 +00:00
use Friendica\Core\Logger ;
2023-04-18 05:56:32 +00:00
use Friendica\Core\Protocol ;
2018-10-31 14:55:15 +00:00
use Friendica\Core\Renderer ;
2023-04-08 16:49:52 +00:00
use Friendica\Core\System ;
2023-04-18 05:56:32 +00:00
use Friendica\Database\DBA ;
2019-12-16 00:05:14 +00:00
use Friendica\DI ;
2023-04-18 05:56:32 +00:00
use Friendica\Model\Contact ;
2023-03-05 21:17:14 +00:00
use Friendica\Model\Item ;
2023-04-18 05:56:32 +00:00
use Friendica\Model\ItemURI ;
2023-03-09 06:37:02 +00:00
use Friendica\Model\Photo ;
2021-05-01 08:59:14 +00:00
use Friendica\Model\Post ;
2020-05-05 22:47:43 +00:00
use Friendica\Model\Tag ;
2023-04-18 05:56:32 +00:00
use Friendica\Protocol\Activity ;
2023-04-06 19:10:32 +00:00
use Friendica\Util\DateTimeFormat ;
2023-03-09 06:37:02 +00:00
use Friendica\Util\Network ;
2023-04-18 05:56:32 +00:00
use Friendica\Util\Strings ;
define ( 'TUMBLR_DEFAULT_POLL_INTERVAL' , 10 ); // given in minutes
2017-11-06 23:55:24 +00:00
2018-07-29 17:42:22 +00:00
function tumblr_install ()
{
2023-04-18 05:56:32 +00:00
Hook :: register ( 'hook_fork' , __FILE__ , 'tumblr_hook_fork' );
Hook :: register ( 'post_local' , __FILE__ , 'tumblr_post_local' );
Hook :: register ( 'notifier_normal' , __FILE__ , 'tumblr_send' );
Hook :: register ( 'jot_networks' , __FILE__ , 'tumblr_jot_nets' );
Hook :: register ( 'connector_settings' , __FILE__ , 'tumblr_settings' );
Hook :: register ( 'connector_settings_post' , __FILE__ , 'tumblr_settings_post' );
Hook :: register ( 'cron' , __FILE__ , 'tumblr_cron' );
2012-12-22 20:36:35 +00:00
}
2018-07-29 17:42:22 +00:00
2022-06-24 21:27:58 +00:00
/**
* This is a statement rather than an actual function definition . The simple
* existence of this method is checked to figure out if the addon offers a
* module .
*/
2023-03-05 21:17:14 +00:00
function tumblr_module ()
{
}
2012-12-22 20:36:35 +00:00
2023-01-14 02:16:09 +00:00
function tumblr_content ()
2018-07-29 17:42:22 +00:00
{
2022-10-20 21:51:49 +00:00
if ( ! DI :: userSession () -> getLocalUserId ()) {
2022-10-17 21:00:03 +00:00
DI :: sysmsg () -> addNotice ( DI :: l10n () -> t ( 'Permission denied.' ));
2012-12-22 20:36:35 +00:00
return '' ;
}
2023-04-18 05:56:32 +00:00
if ( ! isset ( DI :: args () -> getArgv ()[ 1 ])) {
DI :: baseUrl () -> redirect ( 'settings/connectors/tumblr' );
2018-07-29 17:42:22 +00:00
}
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
switch ( DI :: args () -> getArgv ()[ 1 ]) {
case 'connect' :
$o = tumblr_connect ();
break ;
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
case 'callback' :
$o = tumblr_callback ();
break ;
2014-06-15 13:05:04 +00:00
2023-04-18 05:56:32 +00:00
default :
DI :: baseUrl () -> redirect ( 'settings/connectors/tumblr' );
break ;
}
2014-06-15 13:05:04 +00:00
2023-04-18 05:56:32 +00:00
return $o ;
2014-06-15 13:05:04 +00:00
}
2023-01-14 02:16:09 +00:00
function tumblr_connect ()
2018-07-29 17:42:22 +00:00
{
2012-12-22 20:36:35 +00:00
// Define the needed keys
2023-04-18 05:56:32 +00:00
$consumer_key = DI :: config () -> get ( 'tumblr' , 'consumer_key' );
2020-01-19 20:21:12 +00:00
$consumer_secret = DI :: config () -> get ( 'tumblr' , 'consumer_secret' );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
if ( empty ( $consumer_key ) || empty ( $consumer_secret )) {
DI :: baseUrl () -> redirect ( 'settings/connectors/tumblr' );
}
2012-12-22 20:36:35 +00:00
// The callback URL is the script that gets called after the user authenticates with tumblr
// In this example, it would be the included callback.php
2023-02-18 19:57:09 +00:00
$callback_url = DI :: baseUrl () . '/tumblr/callback' ;
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
// Let's begin. First we need a Request Token. The request token is required to send the user
2012-12-22 20:36:35 +00:00
// to Tumblr's login page.
2023-04-18 05:56:32 +00:00
// Create a new instance of the TumblrOAuth library. For this step, all we need to give the library is our
2012-12-22 20:36:35 +00:00
// Consumer Key and Consumer Secret
$tum_oauth = new TumblrOAuth ( $consumer_key , $consumer_secret );
2023-04-18 05:56:32 +00:00
// Ask Tumblr for a Request Token. Specify the Callback URL here too (although this should be optional)
2012-12-22 20:36:35 +00:00
$request_token = $tum_oauth -> getRequestToken ( $callback_url );
2023-04-18 05:56:32 +00:00
if ( empty ( $request_token )) {
// Give an error message
return DI :: l10n () -> t ( 'Could not connect to Tumblr. Refresh the page or try again later.' );
}
2012-12-22 20:36:35 +00:00
// Store the request token and Request Token Secret as out callback.php script will need this
2023-04-06 19:10:32 +00:00
DI :: session () -> set ( 'request_token' , $request_token [ 'oauth_token' ]);
DI :: session () -> set ( 'request_token_secret' , $request_token [ 'oauth_token_secret' ]);
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
// Ask Tumblr to give us a special address to their login page
$url = $tum_oauth -> getAuthorizeURL ( $request_token [ 'oauth_token' ]);
2018-07-29 17:42:22 +00:00
2023-04-18 05:56:32 +00:00
// Redirect the user to the login URL given to us by Tumblr
System :: externalRedirect ( $url );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
/*
* That ' s it for our side . The user is sent to a Tumblr Login page and
* asked to authroize our app . After that , Tumblr sends the user back to
* our Callback URL ( callback . php ) along with some information we need to get
* an access token .
*/
2018-07-29 17:42:22 +00:00
}
2012-12-22 20:36:35 +00:00
2023-01-14 02:16:09 +00:00
function tumblr_callback ()
2018-07-29 17:42:22 +00:00
{
2012-12-22 20:36:35 +00:00
// Define the needed keys
2023-04-06 19:10:32 +00:00
$consumer_key = DI :: config () -> get ( 'tumblr' , 'consumer_key' );
2020-01-19 20:21:12 +00:00
$consumer_secret = DI :: config () -> get ( 'tumblr' , 'consumer_secret' );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
if ( empty ( $_REQUEST [ 'oauth_verifier' ]) || empty ( $consumer_key ) || empty ( $consumer_secret )) {
DI :: baseUrl () -> redirect ( 'settings/connectors/tumblr' );
}
2012-12-22 20:36:35 +00:00
// Once the user approves your app at Tumblr, they are sent back to this script.
// This script is passed two parameters in the URL, oauth_token (our Request Token)
// and oauth_verifier (Key that we need to get Access Token).
// We'll also need out Request Token Secret, which we stored in a session.
// Create instance of TumblrOAuth.
// It'll need our Consumer Key and Secret as well as our Request Token and Secret
2023-04-06 19:10:32 +00:00
$tum_oauth = new TumblrOAuth ( $consumer_key , $consumer_secret );
2012-12-22 20:36:35 +00:00
2017-06-09 01:20:27 +00:00
// Ok, let's get an Access Token. We'll need to pass along our oauth_verifier which was given to us in the URL.
2023-04-06 19:10:32 +00:00
$access_token = $tum_oauth -> getAccessToken ( $_REQUEST [ 'oauth_verifier' ], DI :: session () -> get ( 'request_token' ), DI :: session () -> get ( 'request_token_secret' ));
2012-12-22 20:36:35 +00:00
// We're done with the Request Token and Secret so let's remove those.
2023-04-06 19:10:32 +00:00
DI :: session () -> remove ( 'request_token' );
DI :: session () -> remove ( 'request_token_secret' );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
if ( empty ( $access_token )) {
return DI :: l10n () -> t ( 'Unable to authenticate' );
2012-12-22 20:36:35 +00:00
}
// What's next? Now that we have an Access Token and Secret, we can make an API call.
2022-10-20 21:51:49 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'oauth_token' , $access_token [ 'oauth_token' ]);
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'oauth_token_secret' , $access_token [ 'oauth_token_secret' ]);
2012-12-22 20:36:35 +00:00
2023-04-10 10:18:21 +00:00
DI :: baseUrl () -> redirect ( 'settings/connectors/tumblr' );
2012-12-22 20:36:35 +00:00
}
2023-04-18 05:56:32 +00:00
function tumblr_addon_admin ( string & $o )
2018-07-29 17:42:22 +00:00
{
2023-04-18 05:56:32 +00:00
$t = Renderer :: getMarkupTemplate ( 'admin.tpl' , 'addon/tumblr/' );
2014-06-10 18:13:11 +00:00
2023-04-18 05:56:32 +00:00
$o = Renderer :: replaceMacros ( $t , [
'$submit' => DI :: l10n () -> t ( 'Save Settings' ),
// name, label, value, help, [extra values]
'$consumer_key' => [ 'consumer_key' , DI :: l10n () -> t ( 'Consumer Key' ), DI :: config () -> get ( 'tumblr' , 'consumer_key' ), '' ],
'$consumer_secret' => [ 'consumer_secret' , DI :: l10n () -> t ( 'Consumer Secret' ), DI :: config () -> get ( 'tumblr' , 'consumer_secret' ), '' ],
]);
}
function tumblr_addon_admin_post ()
{
DI :: config () -> set ( 'tumblr' , 'consumer_key' , trim ( $_POST [ 'consumer_key' ] ? ? '' ));
DI :: config () -> set ( 'tumblr' , 'consumer_secret' , trim ( $_POST [ 'consumer_secret' ] ? ? '' ));
2012-12-22 20:36:35 +00:00
}
2023-01-14 02:16:09 +00:00
function tumblr_settings ( array & $data )
2018-07-29 17:42:22 +00:00
{
2022-10-20 21:51:49 +00:00
if ( ! DI :: userSession () -> getLocalUserId ()) {
2014-06-10 18:13:11 +00:00
return ;
2018-07-29 17:42:22 +00:00
}
2012-12-22 20:36:35 +00:00
2022-10-20 21:51:49 +00:00
$enabled = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post' , false );
$def_enabled = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post_by_default' , false );
2023-04-18 05:56:32 +00:00
$import = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'import' , false );
$cachekey = 'tumblr-blogs-' . DI :: userSession () -> getLocalUserId ();
$blogs = DI :: cache () -> get ( $cachekey );
if ( empty ( $blogs )) {
$blogs = tumblr_get_blogs ( DI :: userSession () -> getLocalUserId ());
if ( ! empty ( $blogs )) {
DI :: cache () -> set ( $cachekey , $blogs , Duration :: HALF_HOUR );
}
} elseif ( empty ( tumblr_connection ( DI :: userSession () -> getLocalUserId ()))) {
$blogs = null ;
DI :: cache () -> delete ( $cachekey );
}
2012-12-22 20:36:35 +00:00
2023-04-10 10:18:21 +00:00
if ( ! empty ( $blogs )) {
$page = tumblr_get_page ( DI :: userSession () -> getLocalUserId (), $blogs );
2023-04-18 05:56:32 +00:00
2023-04-06 19:10:32 +00:00
$page_select = [ 'tumblr_page' , DI :: l10n () -> t ( 'Post to page:' ), $page , '' , $blogs ];
2021-11-21 22:10:13 +00:00
}
2012-12-22 20:36:35 +00:00
2021-11-21 22:10:13 +00:00
$t = Renderer :: getMarkupTemplate ( 'connector_settings.tpl' , 'addon/tumblr/' );
$html = Renderer :: replaceMacros ( $t , [
'$l10n' => [
'connect' => DI :: l10n () -> t ( '(Re-)Authenticate your tumblr page' ),
'noconnect' => DI :: l10n () -> t ( 'You are not authenticated to tumblr' ),
],
2018-07-29 17:42:22 +00:00
2023-02-18 19:57:09 +00:00
'$authenticate_url' => DI :: baseUrl () . '/tumblr/connect' ,
2012-12-22 20:36:35 +00:00
2021-11-21 22:10:13 +00:00
'$enable' => [ 'tumblr' , DI :: l10n () -> t ( 'Enable Tumblr Post Addon' ), $enabled ],
'$bydefault' => [ 'tumblr_bydefault' , DI :: l10n () -> t ( 'Post to Tumblr by default' ), $def_enabled ],
2023-04-18 05:56:32 +00:00
'$import' => [ 'tumblr_import' , DI :: l10n () -> t ( 'Import the remote timeline' ), $import ],
2021-11-21 22:10:13 +00:00
'$page_select' => $page_select ? ? '' ,
]);
2012-12-22 20:36:35 +00:00
2021-11-21 22:10:13 +00:00
$data = [
'connector' => 'tumblr' ,
'title' => DI :: l10n () -> t ( 'Tumblr Export' ),
'image' => 'images/tumblr.png' ,
'enabled' => $enabled ,
'html' => $html ,
];
2012-12-22 20:36:35 +00:00
}
2023-04-18 05:56:32 +00:00
function tumblr_jot_nets ( array & $jotnets_fields )
{
if ( ! DI :: userSession () -> getLocalUserId ()) {
return ;
}
if ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post' )) {
$jotnets_fields [] = [
'type' => 'checkbox' ,
'field' => [
'tumblr_enable' ,
DI :: l10n () -> t ( 'Post to Tumblr' ),
DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post_by_default' )
]
];
}
}
2023-01-14 02:16:09 +00:00
function tumblr_settings_post ( array & $b )
2018-07-29 17:42:22 +00:00
{
if ( ! empty ( $_POST [ 'tumblr-submit' ])) {
2022-10-20 21:51:49 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post' , intval ( $_POST [ 'tumblr' ]));
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'page' , $_POST [ 'tumblr_page' ]);
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post_by_default' , intval ( $_POST [ 'tumblr_bydefault' ]));
2023-04-18 05:56:32 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'import' , intval ( $_POST [ 'tumblr_import' ]));
2012-12-22 20:36:35 +00:00
}
}
2023-01-14 02:16:09 +00:00
function tumblr_hook_fork ( array & $b )
2018-11-10 16:20:19 +00:00
{
if ( $b [ 'name' ] != 'notifier_normal' ) {
return ;
}
$post = $b [ 'data' ];
2023-03-05 21:17:14 +00:00
if (
$post [ 'deleted' ] || $post [ 'private' ] || ( $post [ 'created' ] !== $post [ 'edited' ]) ||
! strstr ( $post [ 'postopts' ] ? ? '' , 'tumblr' ) || ( $post [ 'parent' ] != $post [ 'id' ])
) {
2018-11-10 16:20:19 +00:00
$b [ 'execute' ] = false ;
return ;
}
}
2023-01-14 02:16:09 +00:00
function tumblr_post_local ( array & $b )
2018-07-29 17:42:22 +00:00
{
2012-12-22 20:36:35 +00:00
// This can probably be changed to allow editing by pointing to a different API endpoint
2017-09-06 16:16:33 +00:00
if ( $b [ 'edit' ]) {
2012-12-22 20:36:35 +00:00
return ;
2017-09-06 16:16:33 +00:00
}
2012-12-22 20:36:35 +00:00
2022-10-20 21:51:49 +00:00
if ( ! DI :: userSession () -> getLocalUserId () || ( DI :: userSession () -> getLocalUserId () != $b [ 'uid' ])) {
2012-12-22 20:36:35 +00:00
return ;
2017-09-06 16:16:33 +00:00
}
2012-12-22 20:36:35 +00:00
2017-09-06 16:16:33 +00:00
if ( $b [ 'private' ] || $b [ 'parent' ]) {
2012-12-22 20:36:35 +00:00
return ;
2017-09-06 16:16:33 +00:00
}
2012-12-22 20:36:35 +00:00
2022-10-20 21:51:49 +00:00
$tmbl_post = intval ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post' ));
2018-07-29 17:42:22 +00:00
$tmbl_enable = (( $tmbl_post && ! empty ( $_REQUEST [ 'tumblr_enable' ])) ? intval ( $_REQUEST [ 'tumblr_enable' ]) : 0 );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
// if API is used, default to the chosen settings
2022-10-20 21:51:49 +00:00
if ( $b [ 'api_source' ] && intval ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'tumblr' , 'post_by_default' ))) {
2012-12-22 20:36:35 +00:00
$tmbl_enable = 1 ;
2017-09-06 16:16:33 +00:00
}
2012-12-22 20:36:35 +00:00
2017-09-06 16:16:33 +00:00
if ( ! $tmbl_enable ) {
2014-06-10 18:13:11 +00:00
return ;
2017-09-06 16:16:33 +00:00
}
2012-12-22 20:36:35 +00:00
2017-09-06 16:16:33 +00:00
if ( strlen ( $b [ 'postopts' ])) {
2014-06-10 18:13:11 +00:00
$b [ 'postopts' ] .= ',' ;
2017-09-06 16:16:33 +00:00
}
2014-06-10 18:13:11 +00:00
$b [ 'postopts' ] .= 'tumblr' ;
2012-12-22 20:36:35 +00:00
}
2023-03-05 21:17:14 +00:00
function tumblr_send ( array & $b )
{
2018-07-29 17:42:22 +00:00
if ( $b [ 'deleted' ] || $b [ 'private' ] || ( $b [ 'created' ] !== $b [ 'edited' ])) {
2014-06-10 18:13:11 +00:00
return ;
2018-01-10 03:27:40 +00:00
}
2012-12-22 20:36:35 +00:00
2023-03-05 21:17:14 +00:00
if ( ! strstr ( $b [ 'postopts' ], 'tumblr' )) {
2014-06-10 18:13:11 +00:00
return ;
2018-01-10 03:27:40 +00:00
}
2012-12-22 20:36:35 +00:00
2023-03-05 21:17:14 +00:00
if ( $b [ 'gravity' ] != Item :: GRAVITY_PARENT ) {
2017-11-25 23:56:18 +00:00
return ;
}
2023-04-06 19:10:32 +00:00
if ( tumblr_send_npf ( $b )) {
return ;
}
$connection = tumblr_connection ( $b [ 'uid' ]);
if ( empty ( $connection )) {
return ;
}
2023-03-09 06:37:02 +00:00
$b [ 'body' ] = BBCode :: removeAttachment ( $b [ 'body' ]);
2021-05-01 08:59:14 +00:00
2023-04-06 19:10:32 +00:00
$title = trim ( $b [ 'title' ]);
2012-12-22 20:36:35 +00:00
2023-04-06 19:10:32 +00:00
$media = Post\Media :: getByURIId ( $b [ 'uri-id' ], [ Post\Media :: HTML , Post\Media :: AUDIO , Post\Media :: VIDEO , Post\Media :: IMAGE ]);
2020-05-05 22:47:43 +00:00
2023-04-06 19:10:32 +00:00
$photo = array_search ( Post\Media :: IMAGE , array_column ( $media , 'type' ));
$link = array_search ( Post\Media :: HTML , array_column ( $media , 'type' ));
$audio = array_search ( Post\Media :: AUDIO , array_column ( $media , 'type' ));
$video = array_search ( Post\Media :: VIDEO , array_column ( $media , 'type' ));
2012-12-22 20:36:35 +00:00
2023-04-06 19:10:32 +00:00
$params = [
'state' => 'published' ,
'tags' => implode ( ',' , array_column ( Tag :: getByURIId ( $b [ 'uri-id' ]), 'name' )),
'tweet' => 'off' ,
'format' => 'html' ,
];
2018-07-29 17:42:22 +00:00
2023-04-06 19:10:32 +00:00
$body = BBCode :: removeShareInformation ( $b [ 'body' ]);
$body = Post\Media :: removeFromEndOfBody ( $body );
if ( $photo !== false ) {
$params [ 'type' ] = 'photo' ;
$params [ 'caption' ] = BBCode :: convertForUriId ( $b [ 'uri-id' ], $body , BBCode :: CONNECTORS );
$params [ 'data' ] = [];
foreach ( $media as $photo ) {
if ( $photo [ 'type' ] == Post\Media :: IMAGE ) {
if ( Network :: isLocalLink ( $photo [ 'url' ]) && ( $data = Photo :: getResourceData ( $photo [ 'url' ]))) {
$photo = Photo :: selectFirst ([], [ " `resource-id` = ? AND `scale` > ? " , $data [ 'guid' ], 0 ]);
if ( ! empty ( $photo )) {
$params [ 'data' ][] = Photo :: getImageDataForPhoto ( $photo );
}
}
}
}
} elseif ( $link !== false ) {
$params [ 'type' ] = 'link' ;
$params [ 'title' ] = $media [ $link ][ 'name' ];
$params [ 'url' ] = $media [ $link ][ 'url' ];
$params [ 'description' ] = BBCode :: convertForUriId ( $b [ 'uri-id' ], $body , BBCode :: CONNECTORS );
if ( ! empty ( $media [ $link ][ 'preview' ])) {
$params [ 'thumbnail' ] = $media [ $link ][ 'preview' ];
}
if ( ! empty ( $media [ $link ][ 'description' ])) {
$params [ 'excerpt' ] = $media [ $link ][ 'description' ];
}
if ( ! empty ( $media [ $link ][ 'author-name' ])) {
$params [ 'author' ] = $media [ $link ][ 'author-name' ];
2018-07-29 17:42:22 +00:00
}
2023-04-06 19:10:32 +00:00
} elseif ( $audio !== false ) {
$params [ 'type' ] = 'audio' ;
$params [ 'external_url' ] = $media [ $audio ][ 'url' ];
$params [ 'caption' ] = BBCode :: convertForUriId ( $b [ 'uri-id' ], $body , BBCode :: CONNECTORS );
} elseif ( $video !== false ) {
$params [ 'type' ] = 'video' ;
$params [ 'embed' ] = $media [ $video ][ 'url' ];
$params [ 'caption' ] = BBCode :: convertForUriId ( $b [ 'uri-id' ], $body , BBCode :: CONNECTORS );
} else {
$params [ 'type' ] = 'text' ;
$params [ 'title' ] = $title ;
$params [ 'body' ] = BBCode :: convertForUriId ( $b [ 'uri-id' ], $b [ 'body' ], BBCode :: CONNECTORS );
}
2012-12-22 20:36:35 +00:00
2023-04-06 19:10:32 +00:00
if ( isset ( $params [ 'caption' ]) && ( trim ( $title ) != '' )) {
$params [ 'caption' ] = '<h1>' . $title . '</h1>' .
'<p>' . $params [ 'caption' ] . '</p>' ;
}
2012-12-22 20:36:35 +00:00
2023-04-10 10:18:21 +00:00
$page = tumblr_get_page ( $b [ 'uid' ]);
2023-03-05 21:17:14 +00:00
2023-04-18 05:56:32 +00:00
$result = $connection -> post ( 'blog/' . $page . '/post' , $params );
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
if ( $result -> meta -> status < 400 ) {
Logger :: info ( 'Success (legacy)' , [ 'blog' => $page , 'meta' => $result -> meta , 'response' => $result -> response ]);
2023-04-06 19:10:32 +00:00
return true ;
} else {
2023-04-18 05:56:32 +00:00
Logger :: notice ( 'Error posting blog (legacy)' , [ 'blog' => $page , 'meta' => $result -> meta , 'response' => $result -> response , 'errors' => $result -> errors , 'params' => $params ]);
2023-04-06 19:10:32 +00:00
return false ;
}
}
2012-12-22 20:36:35 +00:00
2023-04-06 19:10:32 +00:00
function tumblr_send_npf ( array $post ) : bool
{
2023-04-10 10:18:21 +00:00
$page = tumblr_get_page ( $post [ 'uid' ]);
2012-12-22 20:36:35 +00:00
2023-04-06 19:10:32 +00:00
$connection = tumblr_connection ( $post [ 'uid' ]);
2023-04-10 10:18:21 +00:00
if ( empty ( $page )) {
Logger :: notice ( 'Missing page, post will not be send to Tumblr.' , [ 'uid' => $post [ 'uid' ], 'page' => $page , 'id' => $post [ 'id' ]]);
2023-04-06 19:10:32 +00:00
// "true" is returned, since the legacy function will fail as well.
return true ;
}
2023-04-18 05:56:32 +00:00
2023-04-06 19:10:32 +00:00
$post [ 'body' ] = Post\Media :: addAttachmentsToBody ( $post [ 'uri-id' ], $post [ 'body' ]);
if ( ! empty ( $post [ 'title' ])) {
$post [ 'body' ] = '[h1]' . $post [ 'title' ] . " [/h1] \n " . $post [ 'body' ];
}
2014-05-29 10:42:25 +00:00
2023-04-06 19:10:32 +00:00
$params = [
'content' => NPF :: fromBBCode ( $post [ 'body' ], $post [ 'uri-id' ]),
'state' => 'published' ,
'date' => DateTimeFormat :: utc ( $post [ 'created' ], DateTimeFormat :: ATOM ),
'tags' => implode ( ',' , array_column ( Tag :: getByURIId ( $post [ 'uri-id' ]), 'name' )),
'is_private' => false ,
'interactability_reblog' => 'everyone'
];
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
$result = $connection -> post ( 'blog/' . $page . '/posts' , $params );
2023-04-06 19:10:32 +00:00
2023-04-18 05:56:32 +00:00
if ( $result -> meta -> status < 400 ) {
Logger :: info ( 'Success (NPF)' , [ 'blog' => $page , 'meta' => $result -> meta , 'response' => $result -> response ]);
2023-04-06 19:10:32 +00:00
return true ;
} else {
2023-04-18 05:56:32 +00:00
Logger :: notice ( 'Error posting blog (NPF)' , [ 'blog' => $page , 'meta' => $result -> meta , 'response' => $result -> response , 'errors' => $result -> errors , 'params' => $params ]);
2023-04-06 19:10:32 +00:00
return false ;
}
}
2012-12-22 20:36:35 +00:00
2023-04-18 05:56:32 +00:00
function tumblr_cron ()
{
$last = DI :: keyValue () -> get ( 'tumblr_last_poll' );
$poll_interval = intval ( DI :: config () -> get ( 'tumblr' , 'poll_interval' ));
if ( ! $poll_interval ) {
$poll_interval = TUMBLR_DEFAULT_POLL_INTERVAL ;
}
if ( $last ) {
$next = $last + ( $poll_interval * 60 );
if ( $next > time ()) {
Logger :: notice ( 'poll intervall not reached' );
return ;
}
}
Logger :: notice ( 'cron_start' );
$abandon_days = intval ( DI :: config () -> get ( 'system' , 'account_abandon_days' ));
if ( $abandon_days < 1 ) {
$abandon_days = 0 ;
}
$abandon_limit = date ( DateTimeFormat :: MYSQL , time () - $abandon_days * 86400 );
$pconfigs = DBA :: selectToArray ( 'pconfig' , [], [ 'cat' => 'tumblr' , 'k' => 'import' , 'v' => true ]);
foreach ( $pconfigs as $pconfig ) {
if ( $abandon_days != 0 ) {
if ( ! DBA :: exists ( 'user' , [ " `uid` = ? AND `login_date` >= ? " , $pconfig [ 'uid' ], $abandon_limit ])) {
Logger :: notice ( 'abandoned account: timeline from user will not be imported' , [ 'user' => $pconfig [ 'uid' ]]);
continue ;
}
}
Logger :: notice ( 'importing timeline - start' , [ 'user' => $pconfig [ 'uid' ]]);
tumblr_fetch_dashboard ( $pconfig [ 'uid' ]);
Logger :: notice ( 'importing timeline - done' , [ 'user' => $pconfig [ 'uid' ]]);
}
Logger :: notice ( 'cron_end' );
DI :: keyValue () -> set ( 'tumblr_last_poll' , time ());
}
function tumblr_add_npf_data ( $html )
{
$doc = new DOMDocument ();
$doc -> formatOutput = true ;
@ $doc -> loadHTML ( mb_convert_encoding ( $html , 'HTML-ENTITIES' , 'UTF-8' ));
$xpath = new DomXPath ( $doc );
$list = $xpath -> query ( '//p[@class="npf_link"]' );
foreach ( $list as $node ) {
$data = tumblr_get_npf_data ( $node );
if ( empty ( $data )) {
continue ;
}
tumblr_replace_with_npf ( $doc , $node , PageInfo :: getFooterFromUrl ( $data [ 'url' ]));
}
$list = $xpath -> query ( '//figure[@data-provider="youtube"]' );
foreach ( $list as $node ) {
$attributes = tumblr_get_attributes ( $node );
if ( empty ( $attributes [ 'data-url' ])) {
continue ;
}
tumblr_replace_with_npf ( $doc , $node , '[youtube]' . $attributes [ 'data-url' ] . '[/youtube]' );
}
return $doc -> saveHTML ();
}
function tumblr_get_attributes ( $node ) : array
{
$attributes = [];
foreach ( $node -> attributes as $key => $attribute ) {
$attributes [ $key ] = trim ( $attribute -> value );
}
return $attributes ;
}
function tumblr_get_npf_data ( $node ) : array
{
$attributes = tumblr_get_attributes ( $node );
if ( empty ( $attributes [ 'data-npf' ])) {
return [];
}
return json_decode ( $attributes [ 'data-npf' ], true );
}
function tumblr_replace_with_npf ( $doc , $node , $replacement )
{
$replace = $doc -> createTextNode ( $replacement );
$node -> parentNode -> insertBefore ( $replace , $node );
$node -> parentNode -> removeChild ( $node );
}
function tumblr_fetch_dashboard ( int $uid )
{
$page = tumblr_get_page ( $uid );
$parameters = [ 'reblog_info' => false , 'notes_info' => false , 'npf' => false ];
$last = DI :: pConfig () -> get ( $uid , 'tumblr' , 'last_id' );
if ( ! empty ( $last )) {
$parameters [ 'since_id' ] = $last ;
}
$connection = tumblr_connection ( $uid );
$dashboard = $connection -> get ( 'user/dashboard' , $parameters );
if ( $dashboard -> meta -> status > 399 ) {
Logger :: notice ( 'Error fetching dashboard' , [ 'meta' => $dashboard -> meta , 'response' => $dashboard -> response , 'errors' => $dashboard -> errors ]);
return [];
}
if ( empty ( $dashboard -> response -> posts )) {
return ;
}
foreach ( array_reverse ( $dashboard -> response -> posts ) as $post ) {
$uri = 'tumblr::' . $post -> id_string ;
if ( $post -> id > $last ) {
$last = $post -> id ;
}
if ( Post :: exists ([ 'uri' => $uri , 'uid' => $uid ]) || ( $post -> blog -> uuid == $page )) {
DI :: pConfig () -> set ( $uid , 'tumblr' , 'last_id' , $last );
continue ;
}
$item = tumblr_get_header ( $post , $uri , $uid );
$item = tumblr_get_content ( $item , $post );
item :: insert ( $item );
DI :: pConfig () -> set ( $uid , 'tumblr' , 'last_id' , $last );
}
}
function tumblr_get_header ( stdClass $post , string $uri , int $uid ) : array
{
$contact = tumblr_get_contact ( $post -> blog , $uid );
$item = [
'network' => Protocol :: TUMBLR ,
'uid' => $uid ,
'wall' => false ,
'uri' => $uri ,
'private' => Item :: UNLISTED ,
'verb' => Activity :: POST ,
'contact-id' => $contact [ 'id' ],
'author-name' => $contact [ 'name' ],
'author-link' => $contact [ 'url' ],
'author-avatar' => $contact [ 'avatar' ],
'plink' => $post -> post_url ,
'created' => date ( DateTimeFormat :: MYSQL , $post -> timestamp )
];
$item [ 'owner-name' ] = $item [ 'author-name' ];
$item [ 'owner-link' ] = $item [ 'author-link' ];
$item [ 'owner-avatar' ] = $item [ 'author-avatar' ];
// @todo process $post->tags;
return $item ;
}
function tumblr_get_content ( array $item , stdClass $post ) : array
{
switch ( $post -> type ) {
case 'text' :
$item [ 'title' ] = $post -> title ;
$item [ 'body' ] = HTML :: toBBCode ( $post -> body );
break ;
case 'quote' :
if ( empty ( $post -> text )) {
$body = HTML :: toBBCode ( $post -> text ) . " \n " ;
} else {
$body = '' ;
}
if ( ! empty ( $post -> source_title ) && ! empty ( $post -> source_url )) {
$body .= '[url=' . $post -> source_url . ']' . $post -> source_title . " [/url]: \n " ;
} elseif ( ! empty ( $post -> source_title )) {
$body .= $post -> source_title . " : \n " ;
}
$body .= '[quote]' . HTML :: toBBCode ( $post -> source ) . '[/quote]' ;
$item [ 'body' ] = $body ;
break ;
case 'link' :
$item [ 'body' ] = HTML :: toBBCode ( $post -> description ) . " \n " . PageInfo :: getFooterFromUrl ( $post -> url );
break ;
case 'answer' :
if ( ! empty ( $post -> asking_name ) && ! empty ( $post -> asking_url )) {
$body = '[url=' . $post -> asking_url . ']' . $post -> asking_name . " [/url]: \n " ;
} elseif ( ! empty ( $post -> asking_name )) {
$body = $post -> asking_name . " : \n " ;
} else {
$body = '' ;
}
$body .= '[quote]' . HTML :: toBBCode ( $post -> question ) . " [/quote] \n " . HTML :: toBBCode ( $post -> answer );
$item [ 'body' ] = $body ;
break ;
case 'video' :
$item [ 'body' ] = HTML :: toBBCode ( $post -> caption );
if ( ! empty ( $post -> video_url )) {
$item [ 'body' ] .= " \n [video] " . $post -> video_url . " [/video] \n " ;
} elseif ( ! empty ( $post -> thumbnail_url )) {
$item [ 'body' ] .= " \n [url= " . $post -> permalink_url . " ][img] " . $post -> thumbnail_url . " [/img][/url] \n " ;
} elseif ( ! empty ( $post -> permalink_url )) {
$item [ 'body' ] .= " \n [url] " . $post -> permalink_url . " [/url] \n " ;
} elseif ( ! empty ( $post -> source_url ) && ! empty ( $post -> source_title )) {
$item [ 'body' ] .= " \n [url= " . $post -> source_url . " ] " . $post -> source_title . " [/url] \n " ;
} elseif ( ! empty ( $post -> source_url )) {
$item [ 'body' ] .= " \n [url] " . $post -> source_url . " [/url] \n " ;
}
break ;
case 'audio' :
$item [ 'body' ] = HTML :: toBBCode ( $post -> caption );
if ( ! empty ( $post -> source_url ) && ! empty ( $post -> source_title )) {
$item [ 'body' ] .= " \n [url= " . $post -> source_url . " ] " . $post -> source_title . " [/url] \n " ;
} elseif ( ! empty ( $post -> source_url )) {
$item [ 'body' ] .= " \n [url] " . $post -> source_url . " [/url] \n " ;
}
break ;
case 'photo' :
$item [ 'body' ] = HTML :: toBBCode ( $post -> caption );
foreach ( $post -> photos as $photo ) {
if ( ! empty ( $photo -> original_size )) {
$item [ 'body' ] .= " \n [img] " . $photo -> original_size -> url . " [/img] " ;
} elseif ( ! empty ( $photo -> alt_sizes )) {
$item [ 'body' ] .= " \n [img] " . $photo -> alt_sizes [ 0 ] -> url . " [/img] " ;
}
}
break ;
case 'chat' :
$item [ 'title' ] = $post -> title ;
$item [ 'body' ] = " \n [ul] " ;
foreach ( $post -> dialogue as $line ) {
$item [ 'body' ] .= " \n [li] " . $line -> label . " " . $line -> phrase . " [/li] " ;
}
$item [ 'body' ] .= " [/ul] \n " ;
break ;
}
return $item ;
}
function tumblr_get_contact ( stdClass $blog , int $uid )
{
$condition = [ 'network' => Protocol :: TUMBLR , 'uid' => $uid , 'poll' => 'tumblr::' . $blog -> uuid ];
$contact = Contact :: selectFirst ([], $condition );
if ( ! empty ( $contact ) && ( strtotime ( $contact [ 'updated' ]) >= $blog -> updated )) {
return $contact ;
}
if ( empty ( $contact )) {
$cid = tumblr_insert_contact ( $blog , $uid );
} else {
$cid = $contact [ 'id' ];
}
$condition [ 'uid' ] = 0 ;
$contact = Contact :: selectFirst ([], $condition );
if ( empty ( $contact )) {
$pcid = tumblr_insert_contact ( $blog , 0 );
} else {
$pcid = $contact [ 'id' ];
}
tumblr_update_contact ( $blog , $uid , $cid , $pcid );
return Contact :: getById ( $cid );
}
function tumblr_insert_contact ( stdClass $blog , int $uid )
{
$baseurl = 'https://tumblr.com' ;
$url = $baseurl . '/' . $blog -> name ;
$fields = [
'uid' => $uid ,
'network' => Protocol :: TUMBLR ,
'poll' => 'tumblr::' . $blog -> uuid ,
'baseurl' => $baseurl ,
'priority' => 1 ,
'writable' => false , // @todo Allow interaction at a later point in time
'blocked' => false ,
'readonly' => false ,
'pending' => false ,
'url' => $url ,
'nurl' => Strings :: normaliseLink ( $url ),
'alias' => $blog -> url ,
'name' => $blog -> title ,
'nick' => $blog -> name ,
'addr' => $blog -> name . '@tumblr.com' ,
'about' => $blog -> description ,
'updated' => date ( DateTimeFormat :: MYSQL , $blog -> updated )
];
return Contact :: insert ( $fields );
}
function tumblr_update_contact ( stdClass $blog , int $uid , int $cid , int $pcid )
{
$connection = tumblr_connection ( $uid );
$info = $connection -> get ( 'blog/' . $blog -> uuid . '/info' );
if ( $info -> meta -> status > 399 ) {
Logger :: notice ( 'Error fetching dashboard' , [ 'meta' => $info -> meta , 'response' => $info -> response , 'errors' => $info -> errors ]);
return ;
}
$avatar = $info -> response -> blog -> avatar ;
if ( ! empty ( $avatar )) {
Contact :: updateAvatar ( $cid , $avatar [ 0 ] -> url );
}
$baseurl = 'https://tumblr.com' ;
$url = $baseurl . '/' . $info -> response -> blog -> name ;
if ( $info -> response -> blog -> followed && $info -> response -> blog -> subscribed ) {
$rel = Contact :: FRIEND ;
} elseif ( $info -> response -> blog -> followed && ! $info -> response -> blog -> subscribed ) {
$rel = Contact :: SHARING ;
} elseif ( ! $info -> response -> blog -> followed && $info -> response -> blog -> subscribed ) {
$rel = Contact :: FOLLOWER ;
} else {
$rel = Contact :: NOTHING ;
}
$fields = [
'url' => $url ,
'nurl' => Strings :: normaliseLink ( $url ),
'uri-id' => ItemURI :: getIdByURI ( $url ),
'alias' => $info -> response -> blog -> url ,
'name' => $info -> response -> blog -> title ,
'nick' => $info -> response -> blog -> name ,
'addr' => $info -> response -> blog -> name . '@tumblr.com' ,
'about' => $info -> response -> blog -> description ,
'updated' => date ( DateTimeFormat :: MYSQL , $info -> response -> blog -> updated ),
'header' => $info -> response -> blog -> theme -> header_image_focused ,
'rel' => $rel ,
];
Contact :: update ( $fields , [ 'id' => $cid ]);
$fields [ 'rel' ] = Contact :: NOTHING ;
Contact :: update ( $fields , [ 'id' => $pcid ]);
}
function tumblr_connection ( int $uid ) : ? TumblrOAuth
2023-04-06 19:10:32 +00:00
{
$oauth_token = DI :: pConfig () -> get ( $uid , 'tumblr' , 'oauth_token' );
$oauth_token_secret = DI :: pConfig () -> get ( $uid , 'tumblr' , 'oauth_token_secret' );
2018-07-29 17:42:22 +00:00
2023-04-06 19:10:32 +00:00
$consumer_key = DI :: config () -> get ( 'tumblr' , 'consumer_key' );
$consumer_secret = DI :: config () -> get ( 'tumblr' , 'consumer_secret' );
2023-04-10 10:18:21 +00:00
if ( ! $consumer_key || ! $consumer_secret || ! $oauth_token || ! $oauth_token_secret ) {
Logger :: notice ( 'Missing data, connection is not established' , [ 'uid' => $uid ]);
2023-04-06 19:10:32 +00:00
return null ;
}
2023-04-18 05:56:32 +00:00
return new TumblrOAuth ( $consumer_key , $consumer_secret , $oauth_token , $oauth_token_secret );
2023-04-06 19:10:32 +00:00
}
2023-04-10 10:18:21 +00:00
function tumblr_get_page ( int $uid , array $blogs = [])
{
$page = DI :: pConfig () -> get ( $uid , 'tumblr' , 'page' );
if ( ! empty ( $page ) && ( strpos ( $page , '/' ) === false )) {
return $page ;
}
if ( empty ( $blogs )) {
$blogs = tumblr_get_blogs ( $uid );
}
if ( ! empty ( $blogs )) {
$page = array_key_first ( $blogs );
DI :: pConfig () -> set ( $uid , 'tumblr' , 'page' , $page );
return $page ;
}
return '' ;
}
function tumblr_get_blogs ( int $uid )
{
$connection = tumblr_connection ( $uid );
if ( empty ( $connection )) {
return [];
}
2023-04-18 05:56:32 +00:00
$userinfo = $connection -> get ( 'user/info' );
if ( $userinfo -> meta -> status > 299 ) {
Logger :: notice ( 'Error fetching blogs' , [ 'meta' => $userinfo -> meta , 'response' => $userinfo -> response , 'errors' => $userinfo -> errors ]);
2023-04-10 10:18:21 +00:00
return [];
}
$blogs = [];
2023-04-18 05:56:32 +00:00
foreach ( $userinfo -> response -> user -> blogs as $blog ) {
2023-04-10 10:18:21 +00:00
$blogs [ $blog -> uuid ] = $blog -> name ;
}
return $blogs ;
2023-04-06 19:10:32 +00:00
}