3 * @copyright Copyright (C) 2010-2022, the Friendica project
5 * @license GNU AGPL version 3 or any later version
7 * This program is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU Affero General Public License as
9 * published by the Free Software Foundation, either version 3 of the
10 * License, or (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU Affero General Public License for more details.
17 * You should have received a copy of the GNU Affero General Public License
18 * along with this program. If not, see <https://www.gnu.org/licenses/>.
22 namespace Friendica\Model\Post;
24 use Friendica\Core\Logger;
25 use Friendica\Core\System;
26 use Friendica\Database\Database;
27 use Friendica\Database\DBA;
29 use Friendica\Network\HTTPClient\Client\HttpClientAccept;
30 use Friendica\Network\HTTPClient\Client\HttpClientOptions;
31 use Friendica\Util\Proxy;
36 * This Model class handles post related external links
41 * Check if the link is stored
44 * @param string $url URL
45 * @return bool Whether record has been found
47 public static function exists(int $uriId, string $url): bool
49 return DBA::exists('post-link', ['uri-id' => $uriId, 'url' => $url]);
53 * Returns URL by URI id and other URL
58 * @return string Found link URL + id on success, $url on failture
60 public static function getByLink(int $uriId, string $url, string $size = ''): string
62 if (empty($uriId) || empty($url) || Proxy::isLocalImage($url)) {
66 if (!in_array(parse_url($url, PHP_URL_SCHEME), ['http', 'https'])) {
67 Logger::info('Bad URL, quitting', ['uri-id' => $uriId, 'url' => $url, 'callstack' => System::callstack(20)]);
71 $link = DBA::selectFirst('post-link', ['id'], ['uri-id' => $uriId, 'url' => $url]);
72 if (!empty($link['id'])) {
74 Logger::info('Found', ['id' => $id, 'uri-id' => $uriId, 'url' => $url]);
76 $mime = self::fetchMimeType($url);
78 DBA::insert('post-link', ['uri-id' => $uriId, 'url' => $url, 'mimetype' => $mime], Database::INSERT_IGNORE);
79 $id = DBA::lastInsertId();
80 Logger::info('Inserted', ['id' => $id, 'uri-id' => $uriId, 'url' => $url]);
87 $url = DI::baseUrl() . '/photo/link/';
89 case Proxy::SIZE_MICRO:
90 $url .= Proxy::PIXEL_MICRO . '/';
93 case Proxy::SIZE_THUMB:
94 $url .= Proxy::PIXEL_THUMB . '/';
97 case Proxy::SIZE_SMALL:
98 $url .= Proxy::PIXEL_SMALL . '/';
101 case Proxy::SIZE_MEDIUM:
102 $url .= Proxy::PIXEL_MEDIUM . '/';
105 case Proxy::SIZE_LARGE:
106 $url .= Proxy::PIXEL_LARGE . '/';
113 * Fetches MIME type by URL and Accept: header
115 * @param string $url URL to fetch
116 * @param string $accept Comma-separated list of expected response MIME type(s)
117 * @return string Discovered MIME type or empty string on failure
119 private static function fetchMimeType(string $url, string $accept = HttpClientAccept::DEFAULT): string
121 $timeout = DI::config()->get('system', 'xrd_timeout');
123 $curlResult = DI::httpClient()->head($url, [HttpClientOptions::TIMEOUT => $timeout, HttpClientOptions::ACCEPT_CONTENT => $accept]);
125 if ($curlResult->isSuccess() && empty($media['mimetype'])) {
126 return $curlResult->getHeader('Content-Type')[0] ?? '';
133 * Add external links and replace them in the body
135 * @param integer $uriId
136 * @param string $body Item body formatted with BBCodes
137 * @return string Body with replaced links
139 public static function insertFromBody(int $uriId, string $body): string
141 if (preg_match_all("/\[img\=([0-9]*)x([0-9]*)\](http.*?)\[\/img\]/ism", $body, $pictures, PREG_SET_ORDER)) {
142 foreach ($pictures as $picture) {
143 $body = str_replace($picture[3], self::getByLink($uriId, $picture[3]), $body);
147 if (preg_match_all("/\[img=(http[^\[\]]*)\]([^\[\]]*)\[\/img\]/Usi", $body, $pictures, PREG_SET_ORDER)) {
148 foreach ($pictures as $picture) {
149 $body = str_replace($picture[1], self::getByLink($uriId, $picture[1]), $body);
153 if (preg_match_all("/\[img\](http[^\[\]]*)\[\/img\]/ism", $body, $pictures, PREG_SET_ORDER)) {
154 foreach ($pictures as $picture) {
155 $body = str_replace($picture[1], self::getByLink($uriId, $picture[1]), $body);