2023-05-21 18:54:02 +00:00
< ? php
/**
* Name : Bluesky Connector
2024-09-29 18:19:38 +00:00
* Description : Post to Bluesky , import timelines and feeds
2023-05-24 05:49:26 +00:00
* Version : 1.1
2023-05-21 18:54:02 +00:00
* Author : Michael Vogel < https :// pirati . ca / profile / heluecht >
2023-05-24 05:49:26 +00:00
*
2023-05-23 05:23:13 +00:00
* @ todo
2023-06-06 20:33:10 +00:00
* Currently technical issues in the core :
2023-06-03 23:06:31 +00:00
* - Outgoing mentions
2023-05-24 05:49:26 +00:00
*
2023-06-11 19:24:44 +00:00
* At some point in time :
2024-09-29 18:19:38 +00:00
* - post videos
* - direct messages
2023-06-11 19:24:44 +00:00
* - Sending Quote shares https :// atproto . com / lexicons / app - bsky - embed #appbskyembedrecord and https://atproto.com/lexicons/app-bsky-embed#appbskyembedrecordwithmedia
2023-06-12 22:06:31 +00:00
*
2023-06-03 23:06:31 +00:00
* Possibly not possible :
2023-05-23 05:23:13 +00:00
* - only fetch new posts
2023-05-26 20:54:00 +00:00
*
2023-06-03 23:06:31 +00:00
* Currently not possible , due to limitations in Friendica
* - mute contacts https :// atproto . com / lexicons / app - bsky - graph #appbskygraphmuteactor
* - unmute contacts https :// atproto . com / lexicons / app - bsky - graph #appbskygraphunmuteactor
2023-06-05 04:36:50 +00:00
*
* Possibly interesting :
* - https :// atproto . com / lexicons / com - atproto - label #comatprotolabelsubscribelabels
2023-05-21 18:54:02 +00:00
*/
use Friendica\Content\Text\BBCode ;
use Friendica\Content\Text\Plaintext ;
2023-06-05 04:36:50 +00:00
use Friendica\Core\Cache\Enum\Duration ;
2023-05-21 18:54:02 +00:00
use Friendica\Core\Config\Util\ConfigFileManager ;
use Friendica\Core\Hook ;
use Friendica\Core\Logger ;
2023-05-23 05:23:13 +00:00
use Friendica\Core\Protocol ;
2023-05-21 18:54:02 +00:00
use Friendica\Core\Renderer ;
2023-06-03 23:06:31 +00:00
use Friendica\Core\Worker ;
2023-05-23 05:23:13 +00:00
use Friendica\Database\DBA ;
2023-05-21 18:54:02 +00:00
use Friendica\DI ;
2023-05-23 05:23:13 +00:00
use Friendica\Model\Contact ;
2024-11-06 17:45:30 +00:00
use Friendica\Model\Conversation ;
2023-05-21 18:54:02 +00:00
use Friendica\Model\Item ;
use Friendica\Model\Photo ;
2023-05-23 05:23:13 +00:00
use Friendica\Model\Post ;
2024-02-28 03:05:57 +00:00
use Friendica\Model\User ;
2023-08-15 20:25:17 +00:00
use Friendica\Object\Image ;
2023-05-23 05:23:13 +00:00
use Friendica\Protocol\Activity ;
2024-12-14 19:03:15 +00:00
use Friendica\Protocol\ATProtocol ;
2023-06-05 04:36:50 +00:00
use Friendica\Protocol\Relay ;
2023-05-21 18:54:02 +00:00
use Friendica\Util\DateTimeFormat ;
2023-05-26 20:54:00 +00:00
use Friendica\Util\Strings ;
2023-05-21 18:54:02 +00:00
2023-05-26 20:54:00 +00:00
const BLUESKY_DEFAULT_POLL_INTERVAL = 10 ; // given in minutes
2023-08-15 20:25:17 +00:00
const BLUESKY_IMAGE_SIZE = [ 1000000 , 500000 , 100000 , 50000 ];
2023-05-23 05:23:13 +00:00
2023-05-21 18:54:02 +00:00
function bluesky_install ()
{
Hook :: register ( 'load_config' , __FILE__ , 'bluesky_load_config' );
Hook :: register ( 'hook_fork' , __FILE__ , 'bluesky_hook_fork' );
Hook :: register ( 'post_local' , __FILE__ , 'bluesky_post_local' );
Hook :: register ( 'notifier_normal' , __FILE__ , 'bluesky_send' );
Hook :: register ( 'jot_networks' , __FILE__ , 'bluesky_jot_nets' );
Hook :: register ( 'connector_settings' , __FILE__ , 'bluesky_settings' );
Hook :: register ( 'connector_settings_post' , __FILE__ , 'bluesky_settings_post' );
2023-05-23 05:23:13 +00:00
Hook :: register ( 'cron' , __FILE__ , 'bluesky_cron' );
2023-06-03 23:06:31 +00:00
Hook :: register ( 'support_follow' , __FILE__ , 'bluesky_support_follow' );
Hook :: register ( 'follow' , __FILE__ , 'bluesky_follow' );
Hook :: register ( 'unfollow' , __FILE__ , 'bluesky_unfollow' );
Hook :: register ( 'block' , __FILE__ , 'bluesky_block' );
Hook :: register ( 'unblock' , __FILE__ , 'bluesky_unblock' );
2023-05-24 05:49:26 +00:00
Hook :: register ( 'check_item_notification' , __FILE__ , 'bluesky_check_item_notification' );
2023-05-26 20:54:00 +00:00
Hook :: register ( 'item_by_link' , __FILE__ , 'bluesky_item_by_link' );
2023-05-21 18:54:02 +00:00
}
function bluesky_load_config ( ConfigFileManager $loader )
{
DI :: app () -> getConfigCache () -> load ( $loader -> loadAddonConfig ( 'bluesky' ), \Friendica\Core\Config\ValueObject\Cache :: SOURCE_STATIC );
}
2023-05-24 05:49:26 +00:00
function bluesky_check_item_notification ( array & $notification_data )
{
2024-05-03 02:58:45 +00:00
if ( empty ( $notification_data [ 'uid' ])) {
return ;
}
2024-12-14 19:03:15 +00:00
$did = DI :: atProtocol () -> getUserDid ( $notification_data [ 'uid' ]);
2024-05-12 00:53:46 +00:00
if ( empty ( $did )) {
return ;
2023-05-24 05:49:26 +00:00
}
2024-05-12 00:53:46 +00:00
$notification_data [ 'profiles' ][] = $did ;
2023-05-24 05:49:26 +00:00
}
2023-05-26 20:54:00 +00:00
function bluesky_item_by_link ( array & $hookData )
{
// Don't overwrite an existing result
if ( isset ( $hookData [ 'item_id' ])) {
return ;
}
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $hookData [ 'uid' ]);
2023-05-26 20:54:00 +00:00
if ( empty ( $token )) {
return ;
}
2024-12-14 19:03:15 +00:00
// @todo also support the URI format (at://did/app.bsky.feed.post/cid)
if ( ! preg_match ( '#^' . ATProtocol :: WEB . '/profile/(.+)/post/(.+)#' , $hookData [ 'uri' ], $matches )) {
2023-05-26 20:54:00 +00:00
return ;
}
2024-12-14 19:03:15 +00:00
$did = DI :: atProtocol () -> getDid ( $matches [ 1 ]);
2024-10-27 04:50:45 +00:00
if ( empty ( $did )) {
2023-05-26 20:54:00 +00:00
return ;
}
2024-10-27 04:50:45 +00:00
Logger :: debug ( 'Found bluesky post' , [ 'url' => $hookData [ 'uri' ], 'did' => $did , 'cid' => $matches [ 2 ]]);
2023-05-26 20:54:00 +00:00
2024-10-27 04:50:45 +00:00
$uri = 'at://' . $did . '/app.bsky.feed.post/' . $matches [ 2 ];
2023-05-26 20:54:00 +00:00
2024-12-14 19:03:15 +00:00
$uri = DI :: atpProcessor () -> fetchMissingPost ( $uri , $hookData [ 'uid' ], Item :: PR_FETCHED , 0 , 0 );
2024-10-27 04:50:45 +00:00
Logger :: debug ( 'Got post' , [ 'did' => $did , 'cid' => $matches [ 2 ], 'result' => $uri ]);
2023-05-26 20:54:00 +00:00
if ( ! empty ( $uri )) {
$item = Post :: selectFirst ([ 'id' ], [ 'uri' => $uri , 'uid' => $hookData [ 'uid' ]]);
if ( ! empty ( $item [ 'id' ])) {
$hookData [ 'item_id' ] = $item [ 'id' ];
}
}
}
2023-06-03 23:06:31 +00:00
function bluesky_support_follow ( array & $data )
{
if ( $data [ 'protocol' ] == Protocol :: BLUESKY ) {
$data [ 'result' ] = true ;
}
}
function bluesky_follow ( array & $hook_data )
{
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $token )) {
return ;
}
Logger :: debug ( 'Check if contact is bluesky' , [ 'data' => $hook_data ]);
$contact = DBA :: selectFirst ( 'contact' , [], [ 'network' => Protocol :: BLUESKY , 'url' => $hook_data [ 'url' ], 'uid' => [ 0 , $hook_data [ 'uid' ]]]);
if ( empty ( $contact )) {
return ;
}
$record = [
'subject' => $contact [ 'url' ],
'createdAt' => DateTimeFormat :: utcNow ( DateTimeFormat :: ATOM ),
'$type' => 'app.bsky.graph.follow'
];
2023-06-05 04:36:50 +00:00
2023-06-03 23:06:31 +00:00
$post = [
'collection' => 'app.bsky.graph.follow' ,
2024-12-14 19:03:15 +00:00
'repo' => DI :: atProtocol () -> getUserDid ( $hook_data [ 'uid' ]),
2023-06-03 23:06:31 +00:00
'record' => $record
];
2023-06-05 04:36:50 +00:00
2024-12-14 19:03:15 +00:00
$activity = DI :: atProtocol () -> XRPCPost ( $hook_data [ 'uid' ], 'com.atproto.repo.createRecord' , $post );
2023-06-03 23:06:31 +00:00
if ( ! empty ( $activity -> uri )) {
$hook_data [ 'contact' ] = $contact ;
Logger :: debug ( 'Successfully start following' , [ 'url' => $contact [ 'url' ], 'uri' => $activity -> uri ]);
}
}
function bluesky_unfollow ( array & $hook_data )
{
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $token )) {
return ;
}
if ( $hook_data [ 'contact' ][ 'network' ] != Protocol :: BLUESKY ) {
return ;
}
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.actor.getProfile' , [ 'actor' => $hook_data [ 'contact' ][ 'url' ]], $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $data -> viewer ) || empty ( $data -> viewer -> following )) {
return ;
}
bluesky_delete_post ( $data -> viewer -> following , $hook_data [ 'uid' ]);
$hook_data [ 'result' ] = true ;
}
function bluesky_block ( array & $hook_data )
{
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $token )) {
return ;
}
2024-10-23 12:14:40 +00:00
if ( $hook_data [ 'contact' ][ 'network' ] != Protocol :: BLUESKY ) {
2023-06-03 23:06:31 +00:00
return ;
}
$record = [
2024-10-23 12:14:40 +00:00
'subject' => $hook_data [ 'contact' ][ 'url' ],
2023-06-03 23:06:31 +00:00
'createdAt' => DateTimeFormat :: utcNow ( DateTimeFormat :: ATOM ),
'$type' => 'app.bsky.graph.block'
];
2023-06-05 04:36:50 +00:00
2023-06-03 23:06:31 +00:00
$post = [
'collection' => 'app.bsky.graph.block' ,
2024-12-14 19:03:15 +00:00
'repo' => DI :: atProtocol () -> getUserDid ( $hook_data [ 'uid' ]),
2023-06-03 23:06:31 +00:00
'record' => $record
];
2023-06-05 04:36:50 +00:00
2024-12-14 19:03:15 +00:00
$activity = DI :: atProtocol () -> XRPCPost ( $hook_data [ 'uid' ], 'com.atproto.repo.createRecord' , $post );
2023-06-03 23:06:31 +00:00
if ( ! empty ( $activity -> uri )) {
2024-08-12 20:20:32 +00:00
$ucid = Contact :: getUserContactId ( $hook_data [ 'contact' ][ 'id' ], $hook_data [ 'uid' ]);
if ( $ucid ) {
Contact :: remove ( $ucid );
2023-06-03 23:06:31 +00:00
}
Logger :: debug ( 'Successfully blocked contact' , [ 'url' => $hook_data [ 'contact' ][ 'url' ], 'uri' => $activity -> uri ]);
}
}
function bluesky_unblock ( array & $hook_data )
{
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $token )) {
return ;
}
if ( $hook_data [ 'contact' ][ 'network' ] != Protocol :: BLUESKY ) {
return ;
}
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.actor.getProfile' , [ 'actor' => $hook_data [ 'contact' ][ 'url' ]], $hook_data [ 'uid' ]);
2023-06-03 23:06:31 +00:00
if ( empty ( $data -> viewer ) || empty ( $data -> viewer -> blocking )) {
return ;
}
bluesky_delete_post ( $data -> viewer -> blocking , $hook_data [ 'uid' ]);
$hook_data [ 'result' ] = true ;
}
2024-02-28 03:05:57 +00:00
function bluesky_addon_admin ( string & $o )
{
$t = Renderer :: getMarkupTemplate ( 'admin.tpl' , 'addon/bluesky/' );
$o = Renderer :: replaceMacros ( $t , [
'$submit' => DI :: l10n () -> t ( 'Save Settings' ),
2024-03-21 07:40:46 +00:00
'$friendica_handles' => [ 'friendica_handles' , DI :: l10n () -> t ( 'Allow your users to use your hostname for their Bluesky handles' ), DI :: config () -> get ( 'bluesky' , 'friendica_handles' ), DI :: l10n () -> t ( 'Before enabling this option, you have to setup a wildcard domain configuration and you have to enable wildcard requests in your webserver configuration. On Apache this is done by adding "ServerAlias *.%s" to your HTTP configuration. You don\'t need to change the HTTPS configuration.' , DI :: baseUrl () -> getHost ())],
2024-02-28 03:05:57 +00:00
]);
}
function bluesky_addon_admin_post ()
{
DI :: config () -> set ( 'bluesky' , 'friendica_handles' , ( bool ) $_POST [ 'friendica_handles' ]);
}
2023-05-21 18:54:02 +00:00
function bluesky_settings ( array & $data )
{
if ( ! DI :: userSession () -> getLocalUserId ()) {
return ;
}
2024-09-29 18:19:38 +00:00
$enabled = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post' ) ? ? false ;
$def_enabled = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post_by_default' ) ? ? false ;
$pds = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'pds' );
$handle = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'handle' );
2024-12-14 19:03:15 +00:00
$did = DI :: atProtocol () -> getUserDid ( DI :: userSession () -> getLocalUserId ());
2024-09-29 18:19:38 +00:00
$token = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'access_token' );
$import = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'import' ) ? ? false ;
$import_feeds = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'import_feeds' ) ? ? false ;
$complete_threads = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'complete_threads' ) ? ? false ;
$custom_handle = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'friendica_handle' ) ? ? false ;
2024-02-28 03:05:57 +00:00
if ( DI :: config () -> get ( 'bluesky' , 'friendica_handles' )) {
$self = User :: getById ( DI :: userSession () -> getLocalUserId (), [ 'nickname' ]);
2024-06-09 20:32:23 +00:00
$host_handle = $self [ 'nickname' ] . '.' . DI :: baseUrl () -> getHost ();
$friendica_handle = [ 'bluesky_friendica_handle' , DI :: l10n () -> t ( 'Allow to use %s as your Bluesky handle.' , $host_handle ), $custom_handle , DI :: l10n () -> t ( 'When enabled, you can use %s as your Bluesky handle. After you enabled this option, please go to https://bsky.app/settings and select to change your handle. Select that you have got your own domain. Then enter %s and select "No DNS Panel". Then select "Verify Text File".' , $host_handle , $host_handle )];
if ( $custom_handle ) {
$handle = $host_handle ;
}
2024-02-28 03:05:57 +00:00
} else {
$friendica_handle = [];
}
2023-05-21 19:25:57 +00:00
2023-05-21 18:54:02 +00:00
$t = Renderer :: getMarkupTemplate ( 'connector_settings.tpl' , 'addon/bluesky/' );
$html = Renderer :: replaceMacros ( $t , [
2024-09-29 18:19:38 +00:00
'$enable' => [ 'bluesky' , DI :: l10n () -> t ( 'Enable Bluesky Post Addon' ), $enabled ],
'$bydefault' => [ 'bluesky_bydefault' , DI :: l10n () -> t ( 'Post to Bluesky by default' ), $def_enabled ],
'$import' => [ 'bluesky_import' , DI :: l10n () -> t ( 'Import the remote timeline' ), $import ],
'$import_feeds' => [ 'bluesky_import_feeds' , DI :: l10n () -> t ( 'Import the pinned feeds' ), $import_feeds , DI :: l10n () -> t ( 'When activated, Posts will be imported from all the feeds that you pinned in Bluesky.' )],
'$complete_threads' => [ 'bluesky_complete_threads' , DI :: l10n () -> t ( 'Complete the threads' ), $complete_threads , DI :: l10n () -> t ( 'When activated, the system fetches additional replies for the posts in the timeline. This leads to more complete threads.' )],
'$custom_handle' => $friendica_handle ,
'$pds' => [ 'bluesky_pds' , DI :: l10n () -> t ( 'Personal Data Server' ), $pds , DI :: l10n () -> t ( 'The personal data server (PDS) is the system that hosts your profile.' ), '' , 'readonly' ],
'$handle' => [ 'bluesky_handle' , DI :: l10n () -> t ( 'Bluesky handle' ), $handle , '' , '' , $custom_handle ? 'readonly' : '' ],
'$did' => [ 'bluesky_did' , DI :: l10n () -> t ( 'Bluesky DID' ), $did , DI :: l10n () -> t ( 'This is the unique identifier. It will be fetched automatically, when the handle is entered.' ), '' , 'readonly' ],
'$password' => [ 'bluesky_password' , DI :: l10n () -> t ( 'Bluesky app password' ), '' , DI :: l10n () -> t ( " Please don't add your real password here, but instead create a specific app password in the Bluesky settings. " )],
'$status' => bluesky_get_status ( $handle , $did , $pds , $token ),
2023-05-21 18:54:02 +00:00
]);
$data = [
'connector' => 'bluesky' ,
2023-05-24 05:49:26 +00:00
'title' => DI :: l10n () -> t ( 'Bluesky Import/Export' ),
2023-05-21 18:54:02 +00:00
'image' => 'images/bluesky.jpg' ,
'enabled' => $enabled ,
'html' => $html ,
];
}
2023-12-06 06:31:52 +00:00
function bluesky_get_status ( string $handle = null , string $did = null , string $pds = null , string $token = null ) : string
{
if ( empty ( $handle )) {
return DI :: l10n () -> t ( 'You are not authenticated. Please enter your handle and the app password.' );
}
2024-12-17 04:50:54 +00:00
$status = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'status' ) ? ? ATProtocol :: STATUS_UNKNOWN ;
$message = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'status-message' ) ? ? '' ;
2023-12-06 06:31:52 +00:00
// Fallback mechanism for connection that had been established before the introduction of the status
2024-12-14 19:03:15 +00:00
if ( $status == ATProtocol :: STATUS_UNKNOWN ) {
2023-12-06 06:31:52 +00:00
if ( empty ( $did )) {
2024-12-14 19:03:15 +00:00
$status = ATProtocol :: STATUS_DID_FAIL ;
2023-12-06 06:31:52 +00:00
} elseif ( empty ( $pds )) {
2024-12-14 19:03:15 +00:00
$status = ATProtocol :: STATUS_PDS_FAIL ;
2023-12-06 06:31:52 +00:00
} elseif ( ! empty ( $token )) {
2024-12-14 19:03:15 +00:00
$status = ATProtocol :: STATUS_TOKEN_OK ;
2023-12-06 06:31:52 +00:00
} else {
2024-12-14 19:03:15 +00:00
$status = ATProtocol :: STATUS_TOKEN_FAIL ;
2023-12-06 06:31:52 +00:00
}
}
switch ( $status ) {
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_TOKEN_OK :
2024-12-17 04:50:54 +00:00
return DI :: l10n () -> t ( " You are authenticated to Bluesky. For security reasons the password isn't stored. " );
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_SUCCESS :
2023-12-06 06:31:52 +00:00
return DI :: l10n () -> t ( 'The communication with the personal data server service (PDS) is established.' );
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_API_FAIL ;
2024-12-17 04:50:54 +00:00
return DI :: l10n () -> t ( 'Communication issues with the personal data server service (PDS): %s' , $message );
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_DID_FAIL :
2023-12-06 06:31:52 +00:00
return DI :: l10n () -> t ( 'The DID for the provided handle could not be detected. Please check if you entered the correct handle.' );
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_PDS_FAIL :
2023-12-06 06:31:52 +00:00
return DI :: l10n () -> t ( 'The personal data server service (PDS) could not be detected.' );
2024-12-14 19:03:15 +00:00
case ATProtocol :: STATUS_TOKEN_FAIL :
2023-12-06 06:31:52 +00:00
return DI :: l10n () -> t ( 'The authentication with the provided handle and password failed. Please check if you entered the correct password.' );
default :
return '' ;
}
}
2023-05-21 18:54:02 +00:00
function bluesky_settings_post ( array & $b )
{
if ( empty ( $_POST [ 'bluesky-submit' ])) {
return ;
}
2023-12-04 20:29:31 +00:00
2023-11-19 18:55:05 +00:00
$old_pds = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'pds' );
2023-05-21 18:54:02 +00:00
$old_handle = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'handle' );
$old_did = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'did' );
2023-12-07 12:03:53 +00:00
$handle = trim ( $_POST [ 'bluesky_handle' ], ' @' );
2023-05-21 18:54:02 +00:00
2024-02-28 03:05:57 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post' , intval ( $_POST [ 'bluesky' ]));
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post_by_default' , intval ( $_POST [ 'bluesky_bydefault' ]));
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'handle' , $handle );
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'import' , intval ( $_POST [ 'bluesky_import' ]));
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'import_feeds' , intval ( $_POST [ 'bluesky_import_feeds' ]));
2024-09-29 18:19:38 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'complete_threads' , intval ( $_POST [ 'bluesky_complete_threads' ]));
2024-06-09 20:32:23 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'friendica_handle' , intval ( $_POST [ 'bluesky_friendica_handle' ] ? ? false ));
2023-05-21 18:54:02 +00:00
2023-12-04 20:29:31 +00:00
if ( ! empty ( $handle )) {
2024-12-14 19:03:15 +00:00
$did = DI :: atProtocol () -> getUserDid ( DI :: userSession () -> getLocalUserId (), empty ( $old_did ) || $old_handle != $handle );
2023-12-06 06:31:52 +00:00
if ( ! empty ( $did ) && ( empty ( $old_pds ) || $old_handle != $handle )) {
2024-12-14 19:03:15 +00:00
$pds = DI :: atProtocol () -> getPdsOfDid ( $did );
2023-12-06 06:31:52 +00:00
if ( empty ( $pds )) {
2024-12-14 19:03:15 +00:00
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'status' , ATProtocol :: STATUS_PDS_FAIL );
2023-12-06 06:31:52 +00:00
}
DI :: pConfig () -> set ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'pds' , $pds );
} else {
$pds = DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'pds' );
2023-05-21 18:54:02 +00:00
}
} else {
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'did' );
2023-11-19 18:55:05 +00:00
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'pds' );
2024-12-12 20:20:44 +00:00
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'password' );
2023-12-06 06:31:52 +00:00
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'access_token' );
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'refresh_token' );
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'token_created' );
DI :: pConfig () -> delete ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'status' );
2023-05-21 18:54:02 +00:00
}
2023-05-21 19:25:57 +00:00
2023-12-06 06:31:52 +00:00
if ( ! empty ( $did ) && ! empty ( $pds ) && ! empty ( $_POST [ 'bluesky_password' ])) {
2024-12-14 19:03:15 +00:00
DI :: atProtocol () -> createUserToken ( DI :: userSession () -> getLocalUserId (), $_POST [ 'bluesky_password' ]);
2023-05-21 19:25:57 +00:00
}
2023-05-21 18:54:02 +00:00
}
function bluesky_jot_nets ( array & $jotnets_fields )
{
if ( ! DI :: userSession () -> getLocalUserId ()) {
return ;
}
if ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post' )) {
$jotnets_fields [] = [
'type' => 'checkbox' ,
'field' => [
'bluesky_enable' ,
DI :: l10n () -> t ( 'Post to Bluesky' ),
DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post_by_default' )
]
];
}
}
2023-05-23 05:23:13 +00:00
function bluesky_cron ()
{
2023-12-21 05:23:38 +00:00
$last = ( int ) DI :: keyValue () -> get ( 'bluesky_last_poll' );
2023-05-23 05:23:13 +00:00
$poll_interval = intval ( DI :: config () -> get ( 'bluesky' , 'poll_interval' ));
if ( ! $poll_interval ) {
$poll_interval = BLUESKY_DEFAULT_POLL_INTERVAL ;
}
if ( $last ) {
$next = $last + ( $poll_interval * 60 );
if ( $next > time ()) {
Logger :: notice ( 'poll interval 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 );
2024-06-09 20:32:23 +00:00
$pconfigs = DBA :: selectToArray ( 'pconfig' , [], [ " `cat` = ? AND `k` IN (?, ?) AND `v` " , 'bluesky' , 'import' , 'import_feeds' ]);
2023-05-23 05:23:13 +00:00
foreach ( $pconfigs as $pconfig ) {
2024-12-14 19:03:15 +00:00
if ( empty ( DI :: atProtocol () -> getUserDid ( $pconfig [ 'uid' ]))) {
2024-06-10 05:39:58 +00:00
Logger :: debug ( 'User has got no valid DID' , [ 'uid' => $pconfig [ 'uid' ]]);
2024-05-12 00:53:46 +00:00
continue ;
}
2023-05-23 05:23:13 +00:00
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 ;
}
}
2023-06-11 19:24:44 +00:00
// Refresh the token now, so that it doesn't need to be refreshed in parallel by the following workers
2024-06-10 05:39:58 +00:00
Logger :: debug ( 'Refresh the token' , [ 'uid' => $pconfig [ 'uid' ]]);
2024-12-14 19:03:15 +00:00
DI :: atProtocol () -> getUserToken ( $pconfig [ 'uid' ]);
$last_sync = DI :: pConfig () -> get ( $pconfig [ 'uid' ], 'bluesky' , 'last_contact_sync' );
if ( $last_sync < ( time () - 86400 )) {
DI :: atpActor () -> syncContacts ( $pconfig [ 'uid' ]);
DI :: pConfig () -> set ( $pconfig [ 'uid' ], 'bluesky' , 'last_contact_sync' , time ());
}
2023-06-05 04:36:50 +00:00
2024-09-29 18:19:38 +00:00
Worker :: add ([ 'priority' => Worker :: PRIORITY_MEDIUM , 'force_priority' => true ], 'addon/bluesky/bluesky_notifications.php' , $pconfig [ 'uid' ]);
2024-06-09 20:32:23 +00:00
if ( DI :: pConfig () -> get ( $pconfig [ 'uid' ], 'bluesky' , 'import' )) {
2024-09-29 18:19:38 +00:00
Worker :: add ([ 'priority' => Worker :: PRIORITY_MEDIUM , 'force_priority' => true ], 'addon/bluesky/bluesky_timeline.php' , $pconfig [ 'uid' ]);
2024-06-09 20:32:23 +00:00
}
2023-06-05 04:36:50 +00:00
if ( DI :: pConfig () -> get ( $pconfig [ 'uid' ], 'bluesky' , 'import_feeds' )) {
2024-06-10 05:39:58 +00:00
Logger :: debug ( 'Fetch feeds for user' , [ 'uid' => $pconfig [ 'uid' ]]);
2023-06-05 04:36:50 +00:00
$feeds = bluesky_get_feeds ( $pconfig [ 'uid' ]);
foreach ( $feeds as $feed ) {
2024-09-29 18:19:38 +00:00
Worker :: add ([ 'priority' => Worker :: PRIORITY_MEDIUM , 'force_priority' => true ], 'addon/bluesky/bluesky_feed.php' , $pconfig [ 'uid' ], $feed );
2023-06-05 04:36:50 +00:00
}
}
2024-06-10 05:39:58 +00:00
Logger :: debug ( 'Polling done for user' , [ 'uid' => $pconfig [ 'uid' ]]);
2023-06-03 23:06:31 +00:00
}
2024-06-10 05:39:58 +00:00
Logger :: notice ( 'Polling done for all users' );
DI :: keyValue () -> set ( 'bluesky_last_poll' , time ());
2023-06-03 23:06:31 +00:00
$last_clean = DI :: keyValue () -> get ( 'bluesky_last_clean' );
if ( empty ( $last_clean ) || ( $last_clean + 86400 < time ())) {
Logger :: notice ( 'Start contact cleanup' );
$contacts = DBA :: select ( 'account-user-view' , [ 'id' , 'pid' ], [ " `network` = ? AND `uid` != ? AND `rel` = ? " , Protocol :: BLUESKY , 0 , Contact :: NOTHING ]);
while ( $contact = DBA :: fetch ( $contacts )) {
Worker :: add ( Worker :: PRIORITY_LOW , 'MergeContact' , $contact [ 'pid' ], $contact [ 'id' ], 0 );
}
DBA :: close ( $contacts );
DI :: keyValue () -> set ( 'bluesky_last_clean' , time ());
Logger :: notice ( 'Contact cleanup done' );
2023-05-23 05:23:13 +00:00
}
Logger :: notice ( 'cron_end' );
}
2023-05-21 18:54:02 +00:00
function bluesky_hook_fork ( array & $b )
{
if ( $b [ 'name' ] != 'notifier_normal' ) {
return ;
}
$post = $b [ 'data' ];
if (( $post [ 'created' ] !== $post [ 'edited' ]) && ! $post [ 'deleted' ]) {
DI :: logger () -> info ( 'Editing is not supported by the addon' );
$b [ 'execute' ] = false ;
return ;
}
2023-05-24 05:49:26 +00:00
if ( DI :: pConfig () -> get ( $post [ 'uid' ], 'bluesky' , 'import' )) {
// Don't post if it isn't a reply to a bluesky post
2024-11-16 05:42:00 +00:00
if (( $post [ 'gravity' ] != Item :: GRAVITY_PARENT ) && ! Post :: exists ([ 'id' => $post [ 'parent' ], 'network' => Protocol :: BLUESKY ])) {
2023-05-24 05:49:26 +00:00
Logger :: notice ( 'No bluesky parent found' , [ 'item' => $post [ 'id' ]]);
$b [ 'execute' ] = false ;
return ;
}
2024-11-16 05:42:00 +00:00
} elseif ( ! strstr ( $post [ 'postopts' ] ? ? '' , 'bluesky' ) || ( $post [ 'gravity' ] != Item :: GRAVITY_PARENT ) || ( $post [ 'private' ] == Item :: PRIVATE )) {
DI :: logger () -> info ( 'Post will not be exported' , [ 'uid' => $post [ 'uid' ], 'postopts' => $post [ 'postopts' ], 'gravity' => $post [ 'gravity' ], 'private' => $post [ 'private' ]]);
2023-05-21 18:54:02 +00:00
$b [ 'execute' ] = false ;
return ;
}
}
function bluesky_post_local ( array & $b )
{
if ( ! DI :: userSession () -> getLocalUserId () || ( DI :: userSession () -> getLocalUserId () != $b [ 'uid' ])) {
return ;
}
2024-11-16 05:42:00 +00:00
if ( $b [ 'edit' ] || ( $b [ 'private' ] == Item :: PRIVATE ) || ( $b [ 'gravity' ] != Item :: GRAVITY_PARENT )) {
2023-05-21 18:54:02 +00:00
return ;
}
$bluesky_post = intval ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post' ));
$bluesky_enable = (( $bluesky_post && ! empty ( $_REQUEST [ 'bluesky_enable' ])) ? intval ( $_REQUEST [ 'bluesky_enable' ]) : 0 );
// if API is used, default to the chosen settings
if ( $b [ 'api_source' ] && intval ( DI :: pConfig () -> get ( DI :: userSession () -> getLocalUserId (), 'bluesky' , 'post_by_default' ))) {
$bluesky_enable = 1 ;
}
if ( ! $bluesky_enable ) {
return ;
}
if ( strlen ( $b [ 'postopts' ])) {
$b [ 'postopts' ] .= ',' ;
}
$b [ 'postopts' ] .= 'bluesky' ;
}
function bluesky_send ( array & $b )
{
if (( $b [ 'created' ] !== $b [ 'edited' ]) && ! $b [ 'deleted' ]) {
return ;
}
if ( $b [ 'gravity' ] != Item :: GRAVITY_PARENT ) {
2023-05-24 05:49:26 +00:00
Logger :: debug ( 'Got comment' , [ 'item' => $b ]);
if ( $b [ 'deleted' ]) {
2024-12-14 19:03:15 +00:00
$uri = DI :: atpProcessor () -> getUriClass ( $b [ 'uri' ]);
2023-05-24 05:49:26 +00:00
if ( empty ( $uri )) {
Logger :: debug ( 'Not a bluesky post' , [ 'uri' => $b [ 'uri' ]]);
return ;
}
bluesky_delete_post ( $b [ 'uri' ], $b [ 'uid' ]);
return ;
}
2024-12-14 19:03:15 +00:00
$root = DI :: atpProcessor () -> getUriClass ( $b [ 'parent-uri' ]);
$parent = DI :: atpProcessor () -> getUriClass ( $b [ 'thr-parent' ]);
2023-05-24 05:49:26 +00:00
if ( empty ( $root ) || empty ( $parent )) {
Logger :: debug ( 'No bluesky post' , [ 'parent' => $b [ 'parent' ], 'thr-parent' => $b [ 'thr-parent' ]]);
return ;
}
if ( $b [ 'gravity' ] == Item :: GRAVITY_COMMENT ) {
Logger :: debug ( 'Posting comment' , [ 'root' => $root , 'parent' => $parent ]);
bluesky_create_post ( $b , $root , $parent );
return ;
} elseif ( in_array ( $b [ 'verb' ], [ Activity :: LIKE , Activity :: ANNOUNCE ])) {
bluesky_create_activity ( $b , $parent );
}
2023-05-21 18:54:02 +00:00
return ;
2024-11-16 05:42:00 +00:00
} elseif (( $b [ 'private' ] == Item :: PRIVATE ) || ! strstr ( $b [ 'postopts' ], 'bluesky' )) {
2023-05-21 18:54:02 +00:00
return ;
}
bluesky_create_post ( $b );
}
2023-05-24 05:49:26 +00:00
function bluesky_create_activity ( array $item , stdClass $parent = null )
{
$uid = $item [ 'uid' ];
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $uid );
2023-05-24 05:49:26 +00:00
if ( empty ( $token )) {
return ;
}
2024-12-14 19:03:15 +00:00
$did = DI :: atProtocol () -> getUserDid ( $uid );
2024-05-12 00:53:46 +00:00
if ( empty ( $did )) {
return ;
}
2023-05-24 05:49:26 +00:00
if ( $item [ 'verb' ] == Activity :: LIKE ) {
$record = [
'subject' => $parent ,
'createdAt' => DateTimeFormat :: utcNow ( DateTimeFormat :: ATOM ),
'$type' => 'app.bsky.feed.like'
];
2023-05-26 20:54:00 +00:00
2023-05-24 05:49:26 +00:00
$post = [
'collection' => 'app.bsky.feed.like' ,
'repo' => $did ,
'record' => $record
];
} elseif ( $item [ 'verb' ] == Activity :: ANNOUNCE ) {
$record = [
'subject' => $parent ,
'createdAt' => DateTimeFormat :: utcNow ( DateTimeFormat :: ATOM ),
'$type' => 'app.bsky.feed.repost'
];
$post = [
'collection' => 'app.bsky.feed.repost' ,
'repo' => $did ,
'record' => $record
];
}
2024-12-14 19:03:15 +00:00
$activity = DI :: atProtocol () -> XRPCPost ( $uid , 'com.atproto.repo.createRecord' , $post );
2024-09-29 18:19:38 +00:00
if ( empty ( $activity -> uri )) {
2023-05-24 05:49:26 +00:00
return ;
}
Logger :: debug ( 'Activity done' , [ 'return' => $activity ]);
2024-12-14 19:03:15 +00:00
$uri = DI :: atpProcessor () -> getUri ( $activity );
2024-12-06 06:46:36 +00:00
Item :: update ([ 'extid' => $uri ], [ 'guid' => $item [ 'guid' ]]);
2023-05-24 05:49:26 +00:00
Logger :: debug ( 'Set extid' , [ 'id' => $item [ 'id' ], 'extid' => $activity ]);
}
function bluesky_create_post ( array $item , stdClass $root = null , stdClass $parent = null )
2023-05-21 18:54:02 +00:00
{
$uid = $item [ 'uid' ];
2024-12-14 19:03:15 +00:00
$token = DI :: atProtocol () -> getUserToken ( $uid );
2023-05-21 18:54:02 +00:00
if ( empty ( $token )) {
return ;
}
2023-11-11 05:30:07 +00:00
// Try to fetch the language from the post itself
if ( ! empty ( $item [ 'language' ])) {
$language = array_key_first ( json_decode ( $item [ 'language' ], true ));
} else {
$language = '' ;
}
2024-03-02 13:32:11 +00:00
$item [ 'body' ] = Post\Media :: removeFromBody ( $item [ 'body' ]);
foreach ( Post\Media :: getByURIId ( $item [ 'uri-id' ], [ Post\Media :: AUDIO , Post\Media :: VIDEO , Post\Media :: ACTIVITY ]) as $media ) {
if ( strpos ( $item [ 'body' ], $media [ 'url' ]) === false ) {
$item [ 'body' ] .= " \n [url] " . $media [ 'url' ] . " [/url] \n " ;
}
}
2024-04-28 10:36:47 +00:00
2024-03-02 13:32:11 +00:00
if ( ! empty ( $item [ 'quote-uri-id' ])) {
$quote = Post :: selectFirstPost ([ 'uri' , 'plink' ], [ 'uri-id' => $item [ 'quote-uri-id' ]]);
if ( ! empty ( $quote )) {
if (( strpos ( $item [ 'body' ], $quote [ 'plink' ] ? : $quote [ 'uri' ]) === false ) && ( strpos ( $item [ 'body' ], $quote [ 'uri' ]) === false )) {
$item [ 'body' ] .= " \n [url] " . ( $quote [ 'plink' ] ? : $quote [ 'uri' ]) . " [/url] \n " ;
}
}
}
2024-04-28 10:36:47 +00:00
2024-03-02 13:32:11 +00:00
$urls = bluesky_get_urls ( $item [ 'body' ]);
2023-06-06 20:33:10 +00:00
$item [ 'body' ] = $urls [ 'body' ];
2023-05-21 18:54:02 +00:00
2023-06-05 04:36:50 +00:00
$msg = Plaintext :: getPost ( $item , 300 , false , BBCode :: BLUESKY );
2023-05-21 18:54:02 +00:00
foreach ( $msg [ 'parts' ] as $key => $part ) {
2023-05-26 20:54:00 +00:00
2023-06-06 20:33:10 +00:00
$facets = bluesky_get_facets ( $part , $urls [ 'urls' ]);
2023-05-26 20:54:00 +00:00
2023-05-21 18:54:02 +00:00
$record = [
2023-05-26 20:54:00 +00:00
'text' => $facets [ 'body' ],
2023-11-11 05:30:07 +00:00
'$type' => 'app.bsky.feed.post' ,
2023-05-21 18:54:02 +00:00
'createdAt' => DateTimeFormat :: utcNow ( DateTimeFormat :: ATOM ),
];
2023-11-11 05:30:07 +00:00
if ( ! empty ( $language )) {
$record [ 'langs' ] = [ $language ];
}
2023-05-26 20:54:00 +00:00
if ( ! empty ( $facets [ 'facets' ])) {
$record [ 'facets' ] = $facets [ 'facets' ];
}
2023-05-21 18:54:02 +00:00
if ( ! empty ( $root )) {
$record [ 'reply' ] = [ 'root' => $root , 'parent' => $parent ];
}
if ( $key == count ( $msg [ 'parts' ]) - 1 ) {
$record = bluesky_add_embed ( $uid , $msg , $record );
2023-08-15 20:25:17 +00:00
if ( empty ( $record )) {
if ( Worker :: getRetrial () < 3 ) {
Worker :: defer ();
}
return ;
}
2023-05-21 18:54:02 +00:00
}
$post = [
'collection' => 'app.bsky.feed.post' ,
2024-12-14 19:03:15 +00:00
'repo' => DI :: atProtocol () -> getUserDid ( $uid ),
2023-05-21 18:54:02 +00:00
'record' => $record
];
2024-12-14 19:03:15 +00:00
$parent = DI :: atProtocol () -> XRPCPost ( $uid , 'com.atproto.repo.createRecord' , $post );
2024-09-29 18:19:38 +00:00
if ( empty ( $parent -> uri )) {
2023-08-15 20:25:17 +00:00
if ( $part == 0 ) {
Worker :: defer ();
}
2023-05-21 18:54:02 +00:00
return ;
}
Logger :: debug ( 'Posting done' , [ 'return' => $parent ]);
if ( empty ( $root )) {
$root = $parent ;
}
2023-05-24 05:49:26 +00:00
if (( $key == 0 ) && ( $item [ 'gravity' ] != Item :: GRAVITY_PARENT )) {
2024-12-14 19:03:15 +00:00
$uri = DI :: atpProcessor () -> getUri ( $parent );
2024-12-06 06:46:36 +00:00
Item :: update ([ 'extid' => $uri ], [ 'guid' => $item [ 'guid' ]]);
2023-05-24 05:49:26 +00:00
Logger :: debug ( 'Set extid' , [ 'id' => $item [ 'id' ], 'extid' => $uri ]);
}
2023-05-21 18:54:02 +00:00
}
}
2023-05-26 20:54:00 +00:00
function bluesky_get_urls ( string $body ) : array
{
2023-07-08 14:54:56 +00:00
// Remove all hashtag and mention links
2023-11-20 21:07:09 +00:00
$body = preg_replace ( " /([@!]) \ [url \ =(.*?) \ ](.*?) \ [ \ /url \ ]/ism " , '$1$3' , $body );
2023-05-26 20:54:00 +00:00
2023-08-15 20:25:17 +00:00
$body = BBCode :: expandVideoLinks ( $body );
2023-05-26 20:54:00 +00:00
$urls = [];
2023-11-20 21:07:09 +00:00
// Search for hash tags
if ( preg_match_all ( " /# \ [url \ =(https?:.*?) \ ](.*?) \ [ \ /url \ ]/ism " , $body , $matches , PREG_SET_ORDER )) {
foreach ( $matches as $match ) {
$text = '#' . $match [ 2 ];
2024-03-01 05:53:42 +00:00
$urls [ strpos ( $body , $match [ 0 ])] = [ 'tag' => $match [ 2 ], 'text' => $text , 'hash' => $text ];
2023-11-20 21:07:09 +00:00
$body = str_replace ( $match [ 0 ], $text , $body );
}
}
2023-05-26 20:54:00 +00:00
// Search for pure links
2023-06-06 20:33:10 +00:00
if ( preg_match_all ( " / \ [url \ ](https?:.*?) \ [ \ /url \ ]/ism " , $body , $matches , PREG_SET_ORDER )) {
foreach ( $matches as $match ) {
$text = Strings :: getStyledURL ( $match [ 1 ]);
$hash = bluesky_get_hash_for_url ( $match [ 0 ], mb_strlen ( $text ));
2024-03-01 05:53:42 +00:00
$urls [ strpos ( $body , $match [ 0 ])] = [ 'url' => $match [ 1 ], 'text' => $text , 'hash' => $hash ];
2023-06-06 20:33:10 +00:00
$body = str_replace ( $match [ 0 ], $hash , $body );
2023-05-26 20:54:00 +00:00
}
}
// Search for links with descriptions
2023-06-06 20:33:10 +00:00
if ( preg_match_all ( " / \ [url \ =(https?:.*?) \ ](.*?) \ [ \ /url \ ]/ism " , $body , $matches , PREG_SET_ORDER )) {
foreach ( $matches as $match ) {
if ( $match [ 1 ] == $match [ 2 ]) {
$text = Strings :: getStyledURL ( $match [ 1 ]);
} else {
$text = $match [ 2 ];
}
if ( mb_strlen ( $text ) < 100 ) {
$hash = bluesky_get_hash_for_url ( $match [ 0 ], mb_strlen ( $text ));
2024-03-01 05:53:42 +00:00
$urls [ strpos ( $body , $match [ 0 ])] = [ 'url' => $match [ 1 ], 'text' => $text , 'hash' => $hash ];
2023-06-06 20:33:10 +00:00
$body = str_replace ( $match [ 0 ], $hash , $body );
} else {
$text = Strings :: getStyledURL ( $match [ 1 ]);
$hash = bluesky_get_hash_for_url ( $match [ 0 ], mb_strlen ( $text ));
2024-03-01 05:53:42 +00:00
$urls [ strpos ( $body , $match [ 0 ])] = [ 'url' => $match [ 1 ], 'text' => $text , 'hash' => $hash ];
2023-06-06 20:33:10 +00:00
$body = str_replace ( $match [ 0 ], $text . ' ' . $hash , $body );
}
2023-05-26 20:54:00 +00:00
}
}
2023-06-06 20:33:10 +00:00
2024-03-01 05:53:42 +00:00
asort ( $urls );
2023-06-06 20:33:10 +00:00
return [ 'body' => $body , 'urls' => $urls ];
}
function bluesky_get_hash_for_url ( string $text , int $linklength ) : string
{
if ( $linklength <= 10 ) {
return '|' . hash ( 'crc32' , $text ) . '|' ;
}
return substr ( '|' . hash ( 'crc32' , $text ) . base64_encode ( $text ), 0 , $linklength - 2 ) . '|' ;
2023-05-26 20:54:00 +00:00
}
function bluesky_get_facets ( string $body , array $urls ) : array
{
$facets = [];
foreach ( $urls as $url ) {
2023-06-06 20:33:10 +00:00
$pos = strpos ( $body , $url [ 'hash' ]);
2023-05-26 20:54:00 +00:00
if ( $pos === false ) {
continue ;
}
if ( $pos > 0 ) {
$prefix = substr ( $body , 0 , $pos );
} else {
$prefix = '' ;
}
2023-06-06 20:33:10 +00:00
$body = $prefix . $url [ 'text' ] . substr ( $body , $pos + strlen ( $url [ 'hash' ]));
2023-05-26 20:54:00 +00:00
$facet = new stdClass ;
$facet -> index = new stdClass ;
2023-06-06 20:33:10 +00:00
$facet -> index -> byteEnd = $pos + strlen ( $url [ 'text' ]);
2023-05-26 20:54:00 +00:00
$facet -> index -> byteStart = $pos ;
$feature = new stdClass ;
2023-11-20 21:07:09 +00:00
2023-05-26 20:54:00 +00:00
$type = '$type' ;
2023-11-20 21:07:09 +00:00
if ( ! empty ( $url [ 'tag' ])) {
$feature -> tag = $url [ 'tag' ];
$feature -> $type = 'app.bsky.richtext.facet#tag' ;
} elseif ( ! empty ( $url [ 'url' ])) {
$feature -> uri = $url [ 'url' ];
$feature -> $type = 'app.bsky.richtext.facet#link' ;
} else {
continue ;
}
2023-05-26 20:54:00 +00:00
$facet -> features = [ $feature ];
$facets [] = $facet ;
}
return [ 'facets' => $facets , 'body' => $body ];
}
2023-05-21 18:54:02 +00:00
function bluesky_add_embed ( int $uid , array $msg , array $record ) : array
{
if (( $msg [ 'type' ] != 'link' ) && ! empty ( $msg [ 'images' ])) {
$images = [];
foreach ( $msg [ 'images' ] as $image ) {
2023-08-15 20:25:17 +00:00
if ( count ( $images ) == 4 ) {
continue ;
}
$photo = Photo :: selectFirst ([], [ 'id' => $image [ 'id' ]]);
2023-05-21 18:54:02 +00:00
$blob = bluesky_upload_blob ( $uid , $photo );
2023-08-15 20:25:17 +00:00
if ( empty ( $blob )) {
return [];
2023-05-21 18:54:02 +00:00
}
2024-12-17 04:50:54 +00:00
$images [] = [
'alt' => $image [ 'description' ] ? ? '' ,
'image' => $blob ,
'aspectRatio' => [
'width' => $photo [ 'width' ],
'height' => $photo [ 'height' ],
]
];
2023-05-21 18:54:02 +00:00
}
if ( ! empty ( $images )) {
$record [ 'embed' ] = [ '$type' => 'app.bsky.embed.images' , 'images' => $images ];
}
} elseif ( $msg [ 'type' ] == 'link' ) {
$record [ 'embed' ] = [
'$type' => 'app.bsky.embed.external' ,
'external' => [
'uri' => $msg [ 'url' ],
2023-07-22 13:38:13 +00:00
'title' => $msg [ 'title' ] ? ? '' ,
'description' => $msg [ 'description' ] ? ? '' ,
2023-05-21 18:54:02 +00:00
]
];
if ( ! empty ( $msg [ 'image' ])) {
$photo = Photo :: createPhotoForExternalResource ( $msg [ 'image' ]);
$blob = bluesky_upload_blob ( $uid , $photo );
if ( ! empty ( $blob )) {
$record [ 'embed' ][ 'external' ][ 'thumb' ] = $blob ;
}
}
}
return $record ;
}
function bluesky_upload_blob ( int $uid , array $photo ) : ? stdClass
{
2023-08-15 20:25:17 +00:00
$retrial = Worker :: getRetrial ();
2023-05-21 18:54:02 +00:00
$content = Photo :: getImageForPhoto ( $photo );
2023-08-15 20:25:17 +00:00
2024-02-16 02:29:12 +00:00
$picture = new Image ( $content , $photo [ 'type' ], $photo [ 'filename' ]);
2023-08-15 20:25:17 +00:00
$height = $picture -> getHeight ();
2023-08-22 13:01:12 +00:00
$width = $picture -> getWidth ();
2023-08-15 20:25:17 +00:00
$size = strlen ( $content );
$picture = Photo :: resizeToFileSize ( $picture , BLUESKY_IMAGE_SIZE [ $retrial ]);
$new_height = $picture -> getHeight ();
2023-08-22 13:01:12 +00:00
$new_width = $picture -> getWidth ();
2024-12-17 04:50:54 +00:00
$content = ( string ) $picture -> asString ();
2023-08-15 20:25:17 +00:00
$new_size = strlen ( $content );
2024-12-17 04:50:54 +00:00
if (( $size != 0 ) && ( $new_size == 0 ) && ( $retrial == 0 )) {
Logger :: warning ( 'Size is empty after resize, uploading original file' , [ 'uid' => $uid , 'retrial' => $retrial , 'height' => $new_height , 'width' => $new_width , 'size' => $new_size , 'orig-height' => $height , 'orig-width' => $width , 'orig-size' => $size ]);
$content = Photo :: getImageForPhoto ( $photo );
} else {
Logger :: info ( 'Uploading' , [ 'uid' => $uid , 'retrial' => $retrial , 'height' => $new_height , 'width' => $new_width , 'size' => $new_size , 'orig-height' => $height , 'orig-width' => $width , 'orig-size' => $size ]);
}
2023-08-15 20:25:17 +00:00
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> post ( $uid , '/xrpc/com.atproto.repo.uploadBlob' , $content , [ 'Content-type' => $photo [ 'type' ], 'Authorization' => [ 'Bearer ' . DI :: atProtocol () -> getUserToken ( $uid )]]);
2024-09-29 18:19:38 +00:00
if ( empty ( $data ) || empty ( $data -> blob )) {
2023-08-15 20:25:17 +00:00
Logger :: info ( 'Uploading failed' , [ 'uid' => $uid , 'retrial' => $retrial , 'height' => $new_height , 'width' => $new_width , 'size' => $new_size , 'orig-height' => $height , 'orig-width' => $width , 'orig-size' => $size ]);
2023-05-21 18:54:02 +00:00
return null ;
}
2024-08-12 20:20:32 +00:00
Item :: incrementOutbound ( Protocol :: BLUESKY );
2023-08-15 20:25:17 +00:00
Logger :: debug ( 'Uploaded blob' , [ 'return' => $data , 'uid' => $uid , 'retrial' => $retrial , 'height' => $new_height , 'width' => $new_width , 'size' => $new_size , 'orig-height' => $height , 'orig-width' => $width , 'orig-size' => $size ]);
2023-05-21 18:54:02 +00:00
return $data -> blob ;
}
2023-05-24 05:49:26 +00:00
function bluesky_delete_post ( string $uri , int $uid )
{
2024-12-14 19:03:15 +00:00
$parts = DI :: atpProcessor () -> getUriParts ( $uri );
2023-05-24 05:49:26 +00:00
if ( empty ( $parts )) {
Logger :: debug ( 'No uri delected' , [ 'uri' => $uri ]);
return ;
}
2024-12-14 19:03:15 +00:00
DI :: atProtocol () -> XRPCPost ( $uid , 'com.atproto.repo.deleteRecord' , $parts );
2023-05-24 05:49:26 +00:00
Logger :: debug ( 'Deleted' , [ 'parts' => $parts ]);
}
2024-09-29 18:19:38 +00:00
function bluesky_fetch_timeline ( int $uid )
2023-05-21 18:54:02 +00:00
{
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.feed.getTimeline' , [], $uid );
2023-05-21 18:54:02 +00:00
if ( empty ( $data )) {
return ;
}
2023-05-21 20:14:20 +00:00
if ( empty ( $data -> feed )) {
return ;
}
2023-05-23 05:23:13 +00:00
foreach ( array_reverse ( $data -> feed ) as $entry ) {
2024-12-14 19:03:15 +00:00
$causer = DI :: atpActor () -> getContactByDID ( $entry -> post -> author -> did , $uid , 0 , true );
2024-09-29 18:19:38 +00:00
if ( ! empty ( $entry -> reply )) {
if ( ! empty ( $entry -> reply -> root )) {
2024-12-14 19:03:15 +00:00
bluesky_complete_post ( $entry -> reply -> root , $uid , Item :: PR_COMMENT , $causer [ 'id' ], Conversation :: PARCEL_CONNECTOR );
2024-09-29 18:19:38 +00:00
}
if ( ! empty ( $entry -> reply -> parent )) {
2024-12-14 19:03:15 +00:00
bluesky_complete_post ( $entry -> reply -> parent , $uid , Item :: PR_COMMENT , $causer [ 'id' ], Conversation :: PARCEL_CONNECTOR );
2024-09-29 18:19:38 +00:00
}
}
2024-12-14 19:03:15 +00:00
DI :: atpProcessor () -> processPost ( $entry -> post , $uid , Item :: PR_NONE , 0 , 0 , Conversation :: PARCEL_CONNECTOR );
2023-05-26 20:54:00 +00:00
if ( ! empty ( $entry -> reason )) {
2024-12-14 19:03:15 +00:00
bluesky_process_reason ( $entry -> reason , DI :: atpProcessor () -> getUri ( $entry -> post ), $uid );
2023-05-26 20:54:00 +00:00
}
2023-05-21 20:14:20 +00:00
}
2024-09-29 18:19:38 +00:00
}
2023-05-23 05:23:13 +00:00
2024-12-14 19:03:15 +00:00
function bluesky_complete_post ( stdClass $post , int $uid , int $post_reason , int $causer , int $protocol ) : int
2024-09-29 18:19:38 +00:00
{
$complete = DI :: pConfig () -> get ( $uid , 'bluesky' , 'complete_threads' );
2024-12-14 19:03:15 +00:00
$existing_uri = DI :: atpProcessor () -> getPostUri ( DI :: atpProcessor () -> getUri ( $post ), $uid );
2024-09-29 18:19:38 +00:00
if ( ! empty ( $existing_uri )) {
$comments = Post :: countPosts ([ 'thr-parent' => $existing_uri , 'gravity' => Item :: GRAVITY_COMMENT ]);
if (( $post -> replyCount <= $comments ) || ! $complete ) {
2024-12-14 19:03:15 +00:00
return DI :: atpProcessor () -> fetchUriId ( $existing_uri , $uid );
2024-09-29 18:19:38 +00:00
}
}
if ( $complete ) {
2024-12-17 04:50:54 +00:00
$uri = DI :: atpProcessor () -> fetchMissingPost ( DI :: atpProcessor () -> getUri ( $post ), $uid , $post_reason , $causer , 0 , '' , true , $protocol );
2024-12-14 19:03:15 +00:00
$uri_id = DI :: atpProcessor () -> fetchUriId ( $uri , $uid );
2024-09-29 18:19:38 +00:00
} else {
2024-12-14 19:03:15 +00:00
$uri_id = DI :: atpProcessor () -> processPost ( $post , $uid , $post_reason , $causer , 0 , $protocol );
2024-09-29 18:19:38 +00:00
}
return $uri_id ;
2023-05-23 05:23:13 +00:00
}
2023-05-26 20:54:00 +00:00
function bluesky_process_reason ( stdClass $reason , string $uri , int $uid )
{
$type = '$type' ;
if ( $reason -> $type != 'app.bsky.feed.defs#reasonRepost' ) {
return ;
}
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $reason -> by -> did , $uid , 0 );
2023-05-26 20:54:00 +00:00
$item = [
'network' => Protocol :: BLUESKY ,
2024-11-06 17:45:30 +00:00
'protocol' => Conversation :: PARCEL_CONNECTOR ,
2023-05-26 20:54:00 +00:00
'uid' => $uid ,
'wall' => false ,
'uri' => $reason -> by -> did . '/app.bsky.feed.repost/' . $reason -> indexedAt ,
'private' => Item :: UNLISTED ,
'contact-id' => $contact [ 'id' ],
'author-name' => $contact [ 'name' ],
'author-link' => $contact [ 'url' ],
'author-avatar' => $contact [ 'avatar' ],
'verb' => Activity :: ANNOUNCE ,
'body' => Activity :: ANNOUNCE ,
'gravity' => Item :: GRAVITY_ACTIVITY ,
'object-type' => Activity\ObjectType :: NOTE ,
'thr-parent' => $uri ,
];
if ( Post :: exists ([ 'uri' => $item [ 'uri' ], 'uid' => $uid ])) {
return ;
}
2023-06-11 19:24:44 +00:00
$item [ 'guid' ] = Item :: guidFromUri ( $item [ 'uri' ], $contact [ 'alias' ]);
2023-05-26 20:54:00 +00:00
$item [ 'owner-name' ] = $item [ 'author-name' ];
$item [ 'owner-link' ] = $item [ 'author-link' ];
$item [ 'owner-avatar' ] = $item [ 'author-avatar' ];
if ( Item :: insert ( $item )) {
2024-08-12 20:20:32 +00:00
$pcid = Contact :: getPublicContactId ( $contact [ 'id' ], $uid );
Item :: update ([ 'post-reason' => Item :: PR_ANNOUNCEMENT , 'causer-id' => $pcid ], [ 'uri' => $uri , 'uid' => $uid ]);
2023-05-26 20:54:00 +00:00
}
}
2024-09-29 18:19:38 +00:00
function bluesky_fetch_notifications ( int $uid )
2023-06-03 23:06:31 +00:00
{
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.notification.listNotifications' , [], $uid );
2023-06-13 20:43:51 +00:00
if ( empty ( $data -> notifications )) {
2023-06-03 23:06:31 +00:00
return ;
}
2024-09-29 18:19:38 +00:00
2023-06-13 20:43:51 +00:00
foreach ( $data -> notifications as $notification ) {
2024-12-14 19:03:15 +00:00
$uri = DI :: atpProcessor () -> getUri ( $notification );
2023-06-03 23:06:31 +00:00
if ( Post :: exists ([ 'uri' => $uri , 'uid' => $uid ]) || Post :: exists ([ 'extid' => $uri , 'uid' => $uid ])) {
Logger :: debug ( 'Notification already processed' , [ 'uid' => $uid , 'reason' => $notification -> reason , 'uri' => $uri , 'indexedAt' => $notification -> indexedAt ]);
continue ;
}
Logger :: debug ( 'Process notification' , [ 'uid' => $uid , 'reason' => $notification -> reason , 'uri' => $uri , 'indexedAt' => $notification -> indexedAt ]);
switch ( $notification -> reason ) {
case 'like' :
2024-12-14 19:03:15 +00:00
$item = DI :: atpProcessor () -> getHeaderFromPost ( $notification , $uri , $uid , Conversation :: PARCEL_CONNECTOR );
2023-06-03 23:06:31 +00:00
$item [ 'gravity' ] = Item :: GRAVITY_ACTIVITY ;
$item [ 'body' ] = $item [ 'verb' ] = Activity :: LIKE ;
2024-12-14 19:03:15 +00:00
$item [ 'thr-parent' ] = DI :: atpProcessor () -> getUri ( $notification -> record -> subject );
$item [ 'thr-parent' ] = DI :: atpProcessor () -> fetchMissingPost ( $item [ 'thr-parent' ], $uid , Item :: PR_FETCHED , $item [ 'contact-id' ], 0 );
2023-06-11 19:24:44 +00:00
if ( ! empty ( $item [ 'thr-parent' ])) {
2023-06-13 20:43:51 +00:00
$data = Item :: insert ( $item );
Logger :: debug ( 'Got like' , [ 'uid' => $uid , 'result' => $data , 'uri' => $uri ]);
2023-06-11 19:24:44 +00:00
} else {
2023-08-22 13:01:12 +00:00
Logger :: info ( 'Thread parent not found' , [ 'uid' => $uid , 'parent' => $item [ 'thr-parent' ], 'uri' => $uri ]);
2023-06-11 19:24:44 +00:00
}
2024-02-23 14:04:06 +00:00
break ;
2023-06-03 23:06:31 +00:00
case 'repost' :
2024-12-14 19:03:15 +00:00
$item = DI :: atpProcessor () -> getHeaderFromPost ( $notification , $uri , $uid , Conversation :: PARCEL_CONNECTOR );
2023-06-03 23:06:31 +00:00
$item [ 'gravity' ] = Item :: GRAVITY_ACTIVITY ;
$item [ 'body' ] = $item [ 'verb' ] = Activity :: ANNOUNCE ;
2024-12-14 19:03:15 +00:00
$item [ 'thr-parent' ] = DI :: atpProcessor () -> getUri ( $notification -> record -> subject );
$item [ 'thr-parent' ] = DI :: atpProcessor () -> fetchMissingPost ( $item [ 'thr-parent' ], $uid , Item :: PR_FETCHED , $item [ 'contact-id' ], 0 );
2023-06-11 19:24:44 +00:00
if ( ! empty ( $item [ 'thr-parent' ])) {
2023-06-13 20:43:51 +00:00
$data = Item :: insert ( $item );
Logger :: debug ( 'Got repost' , [ 'uid' => $uid , 'result' => $data , 'uri' => $uri ]);
2023-06-11 19:24:44 +00:00
} else {
2023-08-28 04:50:15 +00:00
Logger :: info ( 'Thread parent not found' , [ 'uid' => $uid , 'parent' => $item [ 'thr-parent' ], 'uri' => $uri ]);
2023-06-11 19:24:44 +00:00
}
2024-02-23 14:04:06 +00:00
break ;
2023-06-03 23:06:31 +00:00
case 'follow' :
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $notification -> author -> did , $uid , $uid );
2023-06-06 20:33:10 +00:00
Logger :: debug ( 'New follower' , [ 'uid' => $uid , 'nick' => $contact [ 'nick' ], 'uri' => $uri ]);
2023-06-03 23:06:31 +00:00
break ;
case 'mention' :
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $notification -> author -> did , $uid , 0 );
$result = DI :: atpProcessor () -> fetchMissingPost ( $uri , $uid , Item :: PR_TO , $contact [ 'id' ], 0 );
2024-02-23 13:32:24 +00:00
Logger :: debug ( 'Got mention' , [ 'uid' => $uid , 'nick' => $contact [ 'nick' ], 'result' => $result , 'uri' => $uri ]);
2023-06-03 23:06:31 +00:00
break ;
case 'reply' :
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $notification -> author -> did , $uid , 0 );
$result = DI :: atpProcessor () -> fetchMissingPost ( $uri , $uid , Item :: PR_COMMENT , $contact [ 'id' ], 0 );
2024-02-23 13:32:24 +00:00
Logger :: debug ( 'Got reply' , [ 'uid' => $uid , 'nick' => $contact [ 'nick' ], 'result' => $result , 'uri' => $uri ]);
2023-06-03 23:06:31 +00:00
break ;
case 'quote' :
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $notification -> author -> did , $uid , 0 );
$result = DI :: atpProcessor () -> fetchMissingPost ( $uri , $uid , Item :: PR_PUSHED , $contact [ 'id' ], 0 );
2024-02-23 13:32:24 +00:00
Logger :: debug ( 'Got quote' , [ 'uid' => $uid , 'nick' => $contact [ 'nick' ], 'result' => $result , 'uri' => $uri ]);
2023-06-03 23:06:31 +00:00
break ;
default :
2023-06-06 20:33:10 +00:00
Logger :: notice ( 'Unhandled reason' , [ 'reason' => $notification -> reason , 'uri' => $uri ]);
2023-06-03 23:06:31 +00:00
break ;
}
}
}
2024-09-29 18:19:38 +00:00
function bluesky_fetch_feed ( int $uid , string $feed )
2023-06-05 04:36:50 +00:00
{
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.feed.getFeed' , [ 'feed' => $feed ], $uid );
2023-06-05 04:36:50 +00:00
if ( empty ( $data )) {
return ;
}
if ( empty ( $data -> feed )) {
return ;
}
2024-12-14 19:03:15 +00:00
$feeddata = DI :: atProtocol () -> XRPCGet ( 'app.bsky.feed.getFeedGenerator' , [ 'feed' => $feed ], $uid );
2024-09-29 18:19:38 +00:00
if ( ! empty ( $feeddata ) && ! empty ( $feeddata -> view )) {
2023-08-28 04:50:15 +00:00
$feedurl = $feeddata -> view -> uri ;
$feedname = $feeddata -> view -> displayName ;
} else {
$feedurl = $feed ;
$feedname = $feed ;
}
2023-06-05 04:36:50 +00:00
foreach ( array_reverse ( $data -> feed ) as $entry ) {
2024-12-14 19:03:15 +00:00
$contact = DI :: atpActor () -> getContactByDID ( $entry -> post -> author -> did , $uid , 0 );
2023-11-11 05:30:07 +00:00
$languages = $entry -> post -> record -> langs ? ? [];
if ( ! Relay :: isWantedLanguage ( $entry -> post -> record -> text , 0 , $contact [ 'id' ] ? ? 0 , $languages )) {
2024-09-29 18:19:38 +00:00
Logger :: debug ( 'Unwanted language detected' , [ 'languages' => $languages , 'text' => $entry -> post -> record -> text ]);
2023-06-05 04:36:50 +00:00
continue ;
}
2024-12-14 19:03:15 +00:00
$causer = DI :: atpActor () -> getContactByDID ( $entry -> post -> author -> did , $uid , 0 );
$uri_id = bluesky_complete_post ( $entry -> post , $uid , Item :: PR_TAG , $causer [ 'id' ], Conversation :: PARCEL_CONNECTOR );
2024-02-23 13:32:24 +00:00
if ( ! empty ( $uri_id )) {
$stored = Post\Category :: storeFileByURIId ( $uri_id , $uid , Post\Category :: SUBCRIPTION , $feedname , $feedurl );
Logger :: debug ( 'Stored tag subscription for user' , [ 'uri-id' => $uri_id , 'uid' => $uid , 'name' => $feedname , 'url' => $feedurl , 'stored' => $stored ]);
} else {
Logger :: notice ( 'Post not found' , [ 'entry' => $entry ]);
2023-08-28 04:50:15 +00:00
}
2023-06-05 04:36:50 +00:00
if ( ! empty ( $entry -> reason )) {
2024-12-14 19:03:15 +00:00
bluesky_process_reason ( $entry -> reason , DI :: atpProcessor () -> getUri ( $entry -> post ), $uid );
2023-05-24 05:49:26 +00:00
}
}
2023-05-21 18:54:02 +00:00
}
2023-06-05 04:36:50 +00:00
function bluesky_get_feeds ( int $uid ) : array
{
$type = '$type' ;
$preferences = bluesky_get_preferences ( $uid );
2024-06-13 04:32:00 +00:00
if ( empty ( $preferences ) || empty ( $preferences -> preferences )) {
return [];
}
2023-06-05 04:36:50 +00:00
foreach ( $preferences -> preferences as $preference ) {
if ( $preference -> $type == 'app.bsky.actor.defs#savedFeedsPref' ) {
return $preference -> pinned ? ? [];
}
}
return [];
}
2024-06-13 04:32:00 +00:00
function bluesky_get_preferences ( int $uid ) : ? stdClass
2023-06-05 04:36:50 +00:00
{
$cachekey = 'bluesky:preferences:' . $uid ;
$data = DI :: cache () -> get ( $cachekey );
if ( ! is_null ( $data )) {
return $data ;
}
2024-12-14 19:03:15 +00:00
$data = DI :: atProtocol () -> XRPCGet ( 'app.bsky.actor.getPreferences' , [], $uid );
2024-06-13 04:32:00 +00:00
if ( empty ( $data )) {
return null ;
}
2023-06-05 04:36:50 +00:00
DI :: cache () -> set ( $cachekey , $data , Duration :: HOUR );
return $data ;
}