* Author: Michael Vogel <https://pirati.ca/profile/heluecht>
*
* @todo
- * Piece of cake?
- * - Process facets
- * - create facets
- *
- * Possible but less important:
- * - Block, unblock, mute and unmute contacts
- *
- * Need inspiration:
- * - alternate link for contacts
- * - plink for posts
+ * Nice to have:
+ * - Probing for contacts
*
* Need more information:
* - only fetch new posts
- * - detect incoming reshares
* - detect contact relations
* - receive likes
+ * - follow contacts
+ * - unfollow contacts
+ *
+ * Possible but less important:
+ * - Block contacts
+ * - unblock contacts
+ * - mute contacts
+ * - unmute contacts
*/
use Friendica\Content\Text\BBCode;
use Friendica\Network\HTTPClient\Client\HttpClientOptions;
use Friendica\Protocol\Activity;
use Friendica\Util\DateTimeFormat;
+use Friendica\Util\Strings;
-define('BLUESKY_DEFAULT_POLL_INTERVAL', 10); // given in minutes
+const BLUESKY_DEFAULT_POLL_INTERVAL = 10; // given in minutes
+const BLUESKY_HOST = 'https://bsky.app'; // Hard wired until Bluesky will run on multiple systems
function bluesky_install()
{
// Hook::register('unblock', __FILE__, 'bluesky_unblock');
Hook::register('check_item_notification', __FILE__, 'bluesky_check_item_notification');
// Hook::register('probe_detect', __FILE__, 'bluesky_probe_detect');
- // Hook::register('item_by_link', __FILE__, 'bluesky_item_by_link');
+ Hook::register('item_by_link', __FILE__, 'bluesky_item_by_link');
}
function bluesky_load_config(ConfigFileManager $loader)
}
}
+function bluesky_item_by_link(array &$hookData)
+{
+ // Don't overwrite an existing result
+ if (isset($hookData['item_id'])) {
+ return;
+ }
+
+ $token = bluesky_get_token($hookData['uid']);
+ if (empty($token)) {
+ return;
+ }
+
+ if (!preg_match('#^' . BLUESKY_HOST . '/profile/(.+)/post/(.+)#', $hookData['uri'], $matches)) {
+ return;
+ }
+
+ $did = bluesky_get_did($hookData['uid'], $matches[1]);
+ if (empty($did)) {
+ return;
+ }
+
+ Logger::debug('Found bluesky post', ['url' => $hookData['uri'], 'handle' => $matches[1], 'did' => $did, 'cid' => $matches[2]]);
+
+ $uri = 'at://' . $did . '/app.bsky.feed.post/' . $matches[2];
+
+ $uri = bluesky_fetch_missing_post($uri, $hookData['uid'], 0, true);
+ Logger::debug('Got post', ['profile' => $matches[1], 'cid' => $matches[2], 'result' => $uri]);
+ if (!empty($uri)) {
+ $item = Post::selectFirst(['id'], ['uri' => $uri, 'uid' => $hookData['uid']]);
+ if (!empty($item['id'])) {
+ $hookData['item_id'] = $item['id'];
+ }
+ }
+}
+
function bluesky_settings(array &$data)
{
if (!DI::userSession()->getLocalUserId()) {
if (!empty($host) && !empty($handle)) {
if (empty($old_did) || $old_host != $host || $old_handle != $handle) {
- DI::pConfig()->set(DI::userSession()->getLocalUserId(), 'bluesky', 'did', bluesky_get_did(DI::userSession()->getLocalUserId()));
+ DI::pConfig()->set(DI::userSession()->getLocalUserId(), 'bluesky', 'did', bluesky_get_did(DI::userSession()->getLocalUserId(), DI::pConfig()->get(DI::userSession()->getLocalUserId(), 'bluesky', 'handle')));
}
} else {
DI::pConfig()->delete(DI::userSession()->getLocalUserId(), 'bluesky', 'did');
if (!empty($_POST['bluesky_password'])) {
bluesky_create_token(DI::userSession()->getLocalUserId(), $_POST['bluesky_password']);
}
-
}
function bluesky_jot_nets(array &$jotnets_fields)
'createdAt' => DateTimeFormat::utcNow(DateTimeFormat::ATOM),
'$type' => 'app.bsky.feed.like'
];
-
+
$post = [
'collection' => 'app.bsky.feed.like',
'repo' => $did,
}
$did = DI::pConfig()->get($uid, 'bluesky', 'did');
+ $urls = bluesky_get_urls($item['body']);
$msg = Plaintext::getPost($item, 300, false, BBCode::CONNECTORS);
foreach ($msg['parts'] as $key => $part) {
+
+ $facets = bluesky_get_facets($part, $urls);
+
$record = [
- 'text' => $part,
+ 'text' => $facets['body'],
'createdAt' => DateTimeFormat::utcNow(DateTimeFormat::ATOM),
'$type' => 'app.bsky.feed.post'
];
+ if (!empty($facets['facets'])) {
+ $record['facets'] = $facets['facets'];
+ }
+
if (!empty($root)) {
$record['reply'] = ['root' => $root, 'parent' => $parent];
}
}
}
+function bluesky_get_urls(string $body): array
+{
+ // Remove all hashtags and mentions
+ $body = preg_replace("/([#@!])\[url\=(.*?)\](.*?)\[\/url\]/ism", '', $body);
+
+ $urls = [];
+
+ // Search for pure links
+ if (preg_match_all("/\[url\](https?:.*?)\[\/url\]/ism", $body, $matches)) {
+ foreach ($matches[1] as $url) {
+ $urls[] = $url;
+ }
+ }
+
+ // Search for links with descriptions
+ if (preg_match_all("/\[url\=(https?:.*?)\].*?\[\/url\]/ism", $body, $matches)) {
+ foreach ($matches[1] as $url) {
+ $urls[] = $url;
+ }
+ }
+ return $urls;
+}
+
+function bluesky_get_facets(string $body, array $urls): array
+{
+ $facets = [];
+
+ foreach ($urls as $url) {
+ $pos = strpos($body, $url);
+ if ($pos === false) {
+ continue;
+ }
+ if ($pos > 0) {
+ $prefix = substr($body, 0, $pos);
+ } else {
+ $prefix = '';
+ }
+ $linktext = Strings::getStyledURL($url);
+ $body = $prefix . $linktext . substr($body, $pos + strlen($url));
+
+ $facet = new stdClass;
+ $facet->index = new stdClass;
+ $facet->index->byteEnd = $pos + strlen($linktext);
+ $facet->index->byteStart = $pos;
+
+ $feature = new stdClass;
+ $feature->uri = $url;
+ $type = '$type';
+ $feature->$type = 'app.bsky.richtext.facet#link';
+
+ $facet->features = [$feature];
+ $facets[] = $facet;
+ }
+
+ return ['facets' => $facets, 'body' => $body];
+}
+
function bluesky_add_embed(int $uid, array $msg, array $record): array
{
if (($msg['type'] != 'link') && !empty($msg['images'])) {
foreach (array_reverse($data->feed) as $entry) {
bluesky_process_post($entry->post, $uid);
+ if (!empty($entry->reason)) {
+ bluesky_process_reason($entry->reason, bluesky_get_uri($entry->post), $uid);
+ }
}
// @todo Support paging
// [cursor] => 1684670516000::bafyreidq3ilwslmlx72jf5vrk367xcc63s6lrhzlyup2bi3zwcvso6w2vi
}
+function bluesky_process_reason(stdClass $reason, string $uri, int $uid)
+{
+ $type = '$type';
+ if ($reason->$type != 'app.bsky.feed.defs#reasonRepost') {
+ return;
+ }
+
+ $contact = bluesky_get_contact($reason->by, $uid);
+
+ $item = [
+ 'network' => Protocol::BLUESKY,
+ 'uid' => $uid,
+ 'wall' => false,
+ 'uri' => $reason->by->did . '/app.bsky.feed.repost/' . $reason->indexedAt,
+ 'private' => Item::UNLISTED,
+ 'verb' => Activity::POST,
+ '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;
+ }
+
+ $item['owner-name'] = $item['author-name'];
+ $item['owner-link'] = $item['author-link'];
+ $item['owner-avatar'] = $item['author-avatar'];
+ if (Item::insert($item)) {
+ $cdata = Contact::getPublicAndUserContactID($contact['id'], $uid);
+ Item::update(['post-reason' => Item::PR_ANNOUNCEMENT, 'causer-id' => $cdata['public']], ['uri' => $uri, 'uid' => $uid]);
+ }
+}
+
function bluesky_process_post(stdClass $post, int $uid): int
{
$uri = bluesky_get_uri($post);
function bluesky_get_header(stdClass $post, string $uri, int $uid): array
{
+ $parts = bluesky_get_uri_parts($uri);
+ if (empty($post->author)) {
+ return [];
+ }
$contact = bluesky_get_contact($post->author, $uid);
$item = [
'network' => Protocol::BLUESKY,
'author-name' => $contact['name'],
'author-link' => $contact['url'],
'author-avatar' => $contact['avatar'],
- // 'plink' => '', @todo Path to a web representation
+ 'plink' => $contact['alias'] . '/post/' . $parts->rkey,
];
$item['uri-id'] = ItemURI::getIdByURI($uri);
{
if (!empty($record->reply)) {
$item['parent-uri'] = bluesky_get_uri($record->reply->root);
- bluesky_fetch_missing_post($item['parent-uri'], $uid);
+ $item['parent-uri'] = bluesky_fetch_missing_post($item['parent-uri'], $uid, $item['contact-id']);
$item['thr-parent'] = bluesky_get_uri($record->reply->parent);
- bluesky_fetch_missing_post($item['thr-parent'], $uid);
+ $item['thr-parent'] = bluesky_fetch_missing_post($item['thr-parent'], $uid, $item['contact-id']);
}
- $body = $record->text;
+ $item['body'] = bluesky_get_text($record, $uid);
+ $item['created'] = DateTimeFormat::utc($record->createdAt, DateTimeFormat::MYSQL);
+ return $item;
+}
- if (!empty($record->facets)) {
- // @todo add Links
+function bluesky_get_text(stdClass $record, int $uid): string
+{
+ $text = $record->text;
+
+ if (empty($record->facets)) {
+ return $text;
}
- $item['body'] = $body;
- $item['created'] = DateTimeFormat::utc($record->createdAt, DateTimeFormat::MYSQL);
- return $item;
+ $facets = [];
+ foreach ($record->facets as $facet) {
+ $facets[$facet->index->byteStart] = $facet;
+ }
+ krsort($facets);
+
+ foreach ($facets as $facet) {
+ $prefix = substr($text, 0, $facet->index->byteStart);
+ $linktext = substr($text, $facet->index->byteStart, $facet->index->byteEnd - $facet->index->byteStart);
+ $suffix = substr($text, $facet->index->byteEnd);
+
+ $url = '';
+
+ foreach ($facet->features as $feature) {
+ if (!empty($feature->uri)) {
+ $url = $feature->uri;
+ }
+ if (!empty($feature->did)) {
+ $contact = Contact::selectFirst(['id'], ['nurl' => $feature->did, 'uid' => [0, $uid]]);
+ if (!empty($contact['id'])) {
+ $url = DI::baseUrl() . '/contact/' . $contact['id'];
+ if (substr($linktext, 0, 1) == '@') {
+ $prefix .= '@';
+ $linktext = substr($linktext, 1);
+ }
+ }
+ }
+ }
+ if (!empty($url)) {
+ $text = $prefix . '[url=' . $url . ']' . $linktext . '[/url]' . $suffix;
+ }
+ }
+ return $text;
}
function bluesky_add_media(stdClass $embed, array $item): array
Post\Media::insert($media);
}
} elseif (!empty($embed->external)) {
- $media = ['uri-id' => $item['uri-id'],
+ $media = [
+ 'uri-id' => $item['uri-id'],
'type' => Post\Media::HTML,
'url' => $embed->external->uri,
'name' => $embed->external->title,
$shared = Post::selectFirst(['uri-id'], ['uri' => $uri, 'uid' => $item['uid']]);
if (empty($shared)) {
$shared = bluesky_get_header($embed->record, $uri, 0);
- $shared = bluesky_get_content($shared, $embed->record->value, $item['uid']);
+ if (!empty($shared)) {
+ $shared = bluesky_get_content($shared, $embed->record->value, $item['uid']);
- if (!empty($embed->record->embeds)) {
- foreach ($embed->record->embeds as $single) {
- $shared = bluesky_add_media($single, $shared);
+ if (!empty($embed->record->embeds)) {
+ foreach ($embed->record->embeds as $single) {
+ $shared = bluesky_add_media($single, $shared);
+ }
}
+ $id = Item::insert($shared);
+ $shared = Post::selectFirst(['uri-id'], ['id' => $id]);
}
- $id = Item::insert($shared);
- $shared = Post::selectFirst(['uri-id'], ['id' => $id]);
}
if (!empty($shared)) {
$item['quote-uri-id'] = $shared['uri-id'];
return $class;
}
-function bluesky_fetch_missing_post(string $uri, int $uid)
+function bluesky_fetch_missing_post(string $uri, int $uid, int $causer, bool $original = false): string
{
if (Post::exists(['uri' => $uri, 'uid' => [$uid, 0]])) {
Logger::debug('Post exists', ['uri' => $uri]);
- return;
+ return $uri;
+ }
+
+ $reply = Post::selectFirst(['uri'], ['extid' => $uri, 'uid' => [$uid, 0]]);
+ if (!empty($reply['uri'])) {
+ return $reply['uri'];
}
Logger::debug('Fetch missing post', ['uri' => $uri]);
- $class = bluesky_get_uri_class($uri);
-
- $data = bluesky_get($uid, '/xrpc/app.bsky.feed.getPosts?uris=' . $class->uri, HttpClientAccept::JSON, [HttpClientOptions::HEADERS => ['Authorization' => ['Bearer ' . bluesky_get_token($uid)]]]);
+ if (!$original) {
+ $class = bluesky_get_uri_class($uri);
+ $fetch_uri = $class->uri;
+ } else {
+ $fetch_uri = $uri;
+ }
+
+ $data = bluesky_get($uid, '/xrpc/app.bsky.feed.getPosts?uris=' . urlencode($fetch_uri), HttpClientAccept::JSON, [HttpClientOptions::HEADERS => ['Authorization' => ['Bearer ' . bluesky_get_token($uid)]]]);
if (empty($data)) {
- return;
+ return '';
+ }
+
+ if ($causer != 0) {
+ $cdata = Contact::getPublicAndUserContactID($causer, $uid);
}
foreach ($data->posts as $post) {
+ $uri = bluesky_get_uri($post);
$item = bluesky_get_header($post, $uri, $uid);
$item = bluesky_get_content($item, $post->record, $uid);
+
+ $item['post-reason'] = Item::PR_FETCHED;
+
+ if (!empty($cdata['public'])) {
+ $item['causer-id'] = $cdata['public'];
+ }
+
if (!empty($post->embed)) {
$item = bluesky_add_media($post->embed, $item);
}
$id = Item::insert($item);
Logger::debug('Stored item', ['id' => $id, 'uri' => $uri]);
}
+
+ return $uri;
}
function bluesky_get_contact(stdClass $author, int $uid): array
$condition = ['network' => Protocol::BLUESKY, 'uid' => $uid, 'url' => $author->did];
$fields = [
- 'name' => $author->displayName,
- 'nick' => $author->handle,
- 'addr' => $author->handle,
+ 'alias' => BLUESKY_HOST . '/profile/' . $author->handle,
+ 'name' => $author->displayName,
+ 'nick' => $author->handle,
+ 'addr' => $author->handle,
];
$contact = Contact::selectFirst([], $condition);
$cid = bluesky_insert_contact($author, $uid);
} else {
$cid = $contact['id'];
- if ($fields['name'] != $contact['name'] || $fields['nick'] != $contact['nick'] || $fields['addr'] != $contact['addr']) {
+ if ($fields['alias'] != $contact['alias'] || $fields['name'] != $contact['name'] || $fields['nick'] != $contact['nick'] || $fields['addr'] != $contact['addr']) {
Contact::update($fields, ['id' => $cid]);
}
}
$pcid = bluesky_insert_contact($author, 0);
} else {
$pcid = $contact['id'];
- if ($fields['name'] != $contact['name'] || $fields['nick'] != $contact['nick'] || $fields['addr'] != $contact['addr']) {
+ if ($fields['alias'] != $contact['alias'] || $fields['name'] != $contact['name'] || $fields['nick'] != $contact['nick'] || $fields['addr'] != $contact['addr']) {
Contact::update($fields, ['id' => $pcid]);
}
}
'pending' => false,
'url' => $author->did,
'nurl' => $author->did,
- // 'alias' => '', @todo Path to a web representation
+ 'alias' => BLUESKY_HOST . '/profile/' . $author->handle,
'name' => $author->displayName,
'nick' => $author->handle,
'addr' => $author->handle,
}
$fields = [
+ 'alias' => BLUESKY_HOST . '/profile/' . $data->handle,
'name' => $data->displayName,
'nick' => $data->handle,
'addr' => $data->handle,
- 'about' => HTML::toBBCode($data->description),
'updated' => DateTimeFormat::utcNow(DateTimeFormat::MYSQL),
];
+ if (!empty($data->description)) {
+ $fields['about'] = HTML::toBBCode($data->description);
+ }
+
if (!empty($data->banner)) {
$fields['header'] = $data->banner;
}
Contact::update($fields, ['id' => $pcid]);
}
-function bluesky_get_did(int $uid): string
+function bluesky_get_did(int $uid, string $handle): string
{
- $data = bluesky_get($uid, '/xrpc/com.atproto.identity.resolveHandle?handle=' . DI::pConfig()->get($uid, 'bluesky', 'handle'));
+ $data = bluesky_get($uid, '/xrpc/com.atproto.identity.resolveHandle?handle=' . $handle);
if (empty($data)) {
return '';
}
https://reisub.nsupdate.info/git / friendica-addons.git / .git / commitdiff