Merge pull request #9870 from annando/uri-id
[friendica.git/.git] / mod / parse_url.php
1 <?php
2 /**
3  * @copyright Copyright (C) 2020, Friendica
4  *
5  * @license GNU AGPL version 3 or any later version
6  *
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.
11  *
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.
16  *
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/>.
19  *
20  * This module does parse an url for embeddable content (audio, video, image files or link)
21  * information and does format this information to BBCode
22  *
23  * @see ParseUrl::getSiteinfo() for more information about scraping embeddable content
24  */
25
26 use Friendica\App;
27 use Friendica\Content\PageInfo;
28 use Friendica\Core\Hook;
29 use Friendica\Core\Logger;
30 use Friendica\Core\System;
31 use Friendica\DI;
32 use Friendica\Util\ParseUrl;
33 use Friendica\Util\Strings;
34
35 function parse_url_content(App $a)
36 {
37         $text = null;
38         $str_tags = '';
39         $format = '';
40         $ret= ['success' => false, 'contentType' => ''];
41
42         $br = "\n";
43
44         if (!empty($_GET['binurl']) && Strings::isHex($_GET['binurl'])) {
45                 $url = trim(hex2bin($_GET['binurl']));
46         } elseif (!empty($_GET['url'])) {
47                 $url = trim($_GET['url']);
48         // fallback in case no url is valid
49         } else {
50                 Logger::info('No url given');
51                 exit();
52         }
53
54         if (!empty($_GET['title'])) {
55                 $title = strip_tags(trim($_GET['title']));
56         }
57
58         if (!empty($_GET['description'])) {
59                 $text = strip_tags(trim($_GET['description']));
60         }
61
62         if (!empty($_GET['tags'])) {
63                 $arr_tags = ParseUrl::convertTagsToArray($_GET['tags']);
64                 if (count($arr_tags)) {
65                         $str_tags = $br . implode(' ', $arr_tags) . $br;
66                 }
67         }
68
69         if (isset($_GET['format']) && $_GET['format'] == 'json') {
70                 $format = 'json';
71         }
72
73         // Add url scheme if it is missing
74         $arrurl = parse_url($url);
75         if (empty($arrurl['scheme'])) {
76                 if (!empty($arrurl['host'])) {
77                         $url = 'http:' . $url;
78                 } else {
79                         $url = 'http://' . $url;
80                 }
81         }
82
83         Logger::log($url);
84
85         // Check if the URL is an image, video or audio file. If so format
86         // the URL with the corresponding BBCode media tag
87         // Fetch the header of the URL
88         $curlResponse = DI::httpRequest()->head($url);
89
90         if ($curlResponse->isSuccess()) {
91                 $hdrs = $curlResponse->getHeaderArray();
92
93                 $type = null;
94                 $content_type = '';
95                 $bbcode = '';
96                 if (array_key_exists('Content-Type', $hdrs)) {
97                         $type = $hdrs['Content-Type'];
98                 }
99                 if ($type) {
100                         if (stripos($type, 'image/') !== false) {
101                                 $content_type = 'image';
102                                 $bbcode = $br . '[img]' . $url . '[/img]' . $br;
103                         }
104                         if (stripos($type, 'video/') !== false) {
105                                 $content_type = 'video';
106                                 $bbcode = $br . '[video]' . $url . '[/video]' . $br;
107                         }
108                         if (stripos($type, 'audio/') !== false) {
109                                 $content_type = 'audio';
110                                 $bbcode = $br . '[audio]' . $url . '[/audio]' . $br;
111                         }
112                 }
113                 if (!empty($content_type)) {
114                         if ($format == 'json') {
115                                 $ret['contentType'] = $content_type;
116                                 $ret['data'] = ['url' => $url];
117                                 $ret['success'] = true;
118                                 System::jsonExit($ret);
119                         }
120
121                         echo $bbcode;
122                         exit();
123                 }
124         }
125
126
127         $template = '[bookmark=%s]%s[/bookmark]%s';
128
129         $arr = ['url' => $url, 'format' => $format, 'text' => null];
130
131         Hook::callAll('parse_link', $arr);
132
133         if ($arr['text']) {
134                 if ($format == 'json') {
135                         System::jsonExit($arr['text']);
136                 } else {
137                         echo $arr['text'];
138                         exit();
139                 }
140         }
141
142         // If there is already some content information submitted we don't
143         // need to parse the url for content.
144         if (!empty($url) && !empty($title) && !empty($text)) {
145                 $title = str_replace(["\r", "\n"], ['', ''], $title);
146
147                 $text = '[quote]' . trim($text) . '[/quote]' . $br;
148
149                 $result = sprintf($template, $url, ($title) ? $title : $url, $text) . $str_tags;
150
151                 Logger::log('(unparsed): returns: ' . $result);
152
153                 echo $result;
154                 exit();
155         }
156
157         // Fetch the information directly from the webpage
158         $siteinfo = ParseUrl::getSiteinfo($url);
159
160         unset($siteinfo['keywords']);
161
162         // Bypass attachment if parse url for a comment
163         if (!empty($_GET['noAttachment'])) {
164                 echo $br . '[url=' . $url . ']' . $siteinfo['title'] . '[/url]';
165                 exit();
166         }
167
168         if ($format == 'json') {
169                 $ret['data'] = $siteinfo;
170                 $ret['contentType'] = 'attachment';
171                 $ret['success'] = true;
172
173                 System::jsonExit($ret);
174         }
175
176         // Format it as BBCode attachment
177         $info = "\n" . PageInfo::getFooterFromData($siteinfo);
178
179         echo $info;
180
181         exit();
182 }
183
184 /**
185  * Legacy function to call ParseUrl::getSiteinfoCached
186  *
187  * Note: We have moved the function to ParseUrl.php. This function is only for
188  * legacy support and will be remove in the future
189  *
190  * @param string $url         The url of the page which should be scraped
191  * @param bool   $no_guessing If true the parse doens't search for
192  *                            preview pictures
193  * @param bool   $do_oembed   The false option is used by the function fetch_oembed()
194  *                            to avoid endless loops
195  *
196  * @return array which contains needed data for embedding
197  *
198  * @throws \Friendica\Network\HTTPException\InternalServerErrorException
199  * @see   ParseUrl::getSiteinfoCached()
200  *
201  * @deprecated since version 3.6 use ParseUrl::getSiteinfoCached instead
202  */
203 function parseurl_getsiteinfo_cached($url, $no_guessing = false, $do_oembed = true)
204 {
205         $siteinfo = ParseUrl::getSiteinfoCached($url, $no_guessing, $do_oembed);
206         return $siteinfo;
207 }