]> git.mxchange.org Git - friendica.git/blob - include/oembed.php
There were undecoded entities in the title
[friendica.git] / include / oembed.php
1 <?php
2 function oembed_replacecb($matches){
3         $embedurl=$matches[1];
4         $j = oembed_fetch_url($embedurl);
5         $s =  oembed_format_object($j);
6         return $s;
7 }
8
9
10 function oembed_fetch_url($embedurl, $no_rich_type = false){
11         $embedurl = trim($embedurl, "'");
12         $embedurl = trim($embedurl, '"');
13
14         $a = get_app();
15
16         $r = q("SELECT * FROM `oembed` WHERE `url` = '%s'",
17                 dbesc(normalise_link($embedurl)));
18
19         if ($r)
20                 $txt = $r[0]["content"];
21         else
22                 $txt = Cache::get($a->videowidth . $embedurl);
23
24         // These media files should now be caught in bbcode.php
25         // left here as a fallback in case this is called from another source
26
27         $noexts = array("mp3","mp4","ogg","ogv","oga","ogm","webm");
28         $ext = pathinfo(strtolower($embedurl),PATHINFO_EXTENSION);
29
30
31         if(is_null($txt)){
32                 $txt = "";
33
34                 if (!in_array($ext, $noexts)){
35                         // try oembed autodiscovery
36                         $redirects = 0;
37                         $html_text = fetch_url($embedurl, false, $redirects, 15, "text/*"); /**/
38                         if($html_text){
39                                 $dom = @DOMDocument::loadHTML($html_text);
40                                 if ($dom){
41                                         $xpath = new DOMXPath($dom);
42                                         $attr = "oembed";
43                                         $xattr = oe_build_xpath("class","oembed");
44                                         $entries = $xpath->query("//link[@type='application/json+oembed']");
45                                         foreach($entries as $e){
46                                                 $href = $e->getAttributeNode("href")->nodeValue;
47                                                 $txt = fetch_url($href . '&maxwidth=' . $a->videowidth);
48                                                 break;
49                                         }
50                                         $entries = $xpath->query("//link[@type='text/json+oembed']");
51                                         foreach($entries as $e){
52                                                 $href = $e->getAttributeNode("href")->nodeValue;
53                                                 $txt = fetch_url($href . '&maxwidth=' . $a->videowidth);
54                                                 break;
55                                         }
56                                 }
57                         }
58                 }
59
60                 if ($txt==false || $txt==""){
61                         $embedly = get_config("system", "embedly");
62                         if ($embedly != "") {
63                                 // try embedly service
64                                 $ourl = "https://api.embed.ly/1/oembed?key=".$embedly."&url=".urlencode($embedurl);
65                                 $txt = fetch_url($ourl);
66
67                                 logger("oembed_fetch_url: ".$txt, LOGGER_DEBUG);
68                         }
69                 }
70
71                 $txt=trim($txt);
72
73                 if ($txt[0]!="{")
74                         $txt='{"type":"error"}';
75                 else {  //save in cache
76                         $j = json_decode($txt);
77                         if ($j->type != "error")
78                                 q("INSERT INTO `oembed` (`url`, `content`, `created`) VALUES ('%s', '%s', '%s')
79                                         ON DUPLICATE KEY UPDATE `content` = '%s', `created` = '%s'",
80                                         dbesc(normalise_link($embedurl)),
81                                         dbesc($txt), dbesc(datetime_convert()),
82                                         dbesc($txt), dbesc(datetime_convert()));
83
84                         Cache::set($a->videowidth.$embedurl,$txt, CACHE_DAY);
85                 }
86         }
87
88         $j = json_decode($txt);
89
90         if (!is_object($j))
91                 return false;
92
93         // Always embed the SSL version
94         if (isset($j->html))
95                 $j->html = str_replace(array("http://www.youtube.com/", "http://player.vimeo.com/"),
96                         array("https://www.youtube.com/", "https://player.vimeo.com/"), $j->html);
97
98         $j->embedurl = $embedurl;
99
100         // If fetching information doesn't work, then improve via internal functions
101         if (($j->type == "error") OR ($no_rich_type AND ($j->type == "rich"))) {
102                 require_once("mod/parse_url.php");
103                 $data = parseurl_getsiteinfo_cached($embedurl, true, false);
104                 $j->type = $data["type"];
105
106                 if ($j->type == "photo") {
107                         $j->url = $data["url"];
108                         //$j->width = $data["images"][0]["width"];
109                         //$j->height = $data["images"][0]["height"];
110                 }
111
112                 if (isset($data["title"]))
113                         $j->title = $data["title"];
114
115                 if (isset($data["text"]))
116                         $j->description = $data["text"];
117
118                 if (is_array($data["images"])) {
119                         $j->thumbnail_url = $data["images"][0]["src"];
120                         $j->thumbnail_width = $data["images"][0]["width"];
121                         $j->thumbnail_height = $data["images"][0]["height"];
122                 }
123         }
124
125         call_hooks('oembed_fetch_url', $embedurl, $j);
126
127         return $j;
128 }
129
130 function oembed_format_object($j){
131         require_once("mod/proxy.php");
132
133         $a = get_app();
134         $embedurl = $j->embedurl;
135         $jhtml = oembed_iframe($j->embedurl,(isset($j->width) ? $j->width : null), (isset($j->height) ? $j->height : null) );
136         $ret="<span class='oembed ".$j->type."'>";
137         switch ($j->type) {
138                 case "video": {
139                         if (isset($j->thumbnail_url)) {
140                                 $tw = (isset($j->thumbnail_width) && intval($j->thumbnail_width)) ? $j->thumbnail_width:200;
141                                 $th = (isset($j->thumbnail_height) && intval($j->thumbnail_height)) ? $j->thumbnail_height:180;
142                                 // make sure we don't attempt divide by zero, fallback is a 1:1 ratio
143                                 $tr = (($th) ? $tw/$th : 1);
144
145                                 $th=120; $tw = $th*$tr;
146                                 $tpl=get_markup_template('oembed_video.tpl');
147                                 $ret.=replace_macros($tpl, array(
148                                 '$baseurl' => $a->get_baseurl(),
149                                         '$embedurl'=>$embedurl,
150                                         '$escapedhtml'=>base64_encode($jhtml),
151                                         '$tw'=>$tw,
152                                         '$th'=>$th,
153                                         '$turl'=>$j->thumbnail_url,
154                                 ));
155
156                         } else {
157                                 $ret=$jhtml;
158                         }
159                         //$ret.="<br>";
160                 }; break;
161                 case "photo": {
162                         $ret.= "<img width='".$j->width."' src='".proxy_url($j->url)."'>";
163                 }; break;
164                 case "link": {
165                 }; break;
166                 case "rich": {
167                         // not so safe..
168                         if (!get_config("system","no_oembed_rich_content"))
169                                 $ret.= proxy_parse_html($jhtml);
170                 }; break;
171         }
172
173         // add link to source if not present in "rich" type
174         if ($j->type!='rich' || !strpos($j->html,$embedurl) ){
175                 $ret .= "<h4>";
176                 if (isset($j->title)) {
177                         if (isset($j->provider_name))
178                                 $ret .= $j->provider_name.": ";
179
180                         $embedlink = (isset($j->title))?$j->title:$embedurl;
181                         $ret .= "<a href='$embedurl' rel='oembed'>$embedlink</a>";
182                         if (isset($j->author_name))
183                                 $ret.=" (".$j->author_name.")";
184                 } elseif (isset($j->provider_name) OR isset($j->author_name)) {
185                         $embedlink = "";
186                         if (isset($j->provider_name))
187                                 $embedlink .= $j->provider_name;
188
189                         if (isset($j->author_name)) {
190                                 if ($embedlink != "")
191                                         $embedlink .= ": ";
192
193                                 $embedlink .= $j->author_name;
194                         }
195                         if (trim($embedlink) == "")
196                                 $embedlink = $embedurl;
197
198                         $ret .= "<a href='$embedurl' rel='oembed'>$embedlink</a>";
199                 }
200                 //if (isset($j->author_name)) $ret.=" by ".$j->author_name;
201                 //if (isset($j->provider_name)) $ret.=" on ".$j->provider_name;
202                 $ret .= "</h4>";
203         } else {
204                 // add <a> for html2bbcode conversion
205                 $ret .= "<a href='$embedurl' rel='oembed'>$embedurl</a>";
206         }
207         $ret.="</span>";
208         $ret = str_replace("\n","",$ret);
209         return mb_convert_encoding($ret, 'HTML-ENTITIES', mb_detect_encoding($ret));
210 }
211
212 function oembed_iframe($src,$width,$height) {
213
214         if(! $width || strstr($width,'%'))
215                 $width = '640';
216         if(! $height || strstr($height,'%')) {
217                 $height = '300';
218                 $resize = 'onload="resizeIframe(this);"';
219         } else
220                 $resize = '';
221
222         // try and leave some room for the description line.
223         $height = intval($height) + 80;
224         $width  = intval($width) + 40;
225
226         $a = get_app();
227
228         $s = $a->get_baseurl()."/oembed/".base64url_encode($src);
229         return '<iframe '.$resize.' class="embed_rich" height="'.$height.'" width="'.$width.'" src="'.$s.'" frameborder="no">'.t('Embedded content').'</iframe>';
230
231 }
232
233
234
235 function oembed_bbcode2html($text){
236         $stopoembed = get_config("system","no_oembed");
237         if ($stopoembed == true){
238                 return preg_replace("/\[embed\](.+?)\[\/embed\]/is", "<!-- oembed $1 --><i>". t('Embedding disabled') ." : $1</i><!-- /oembed $1 -->" ,$text);
239         }
240         return preg_replace_callback("/\[embed\](.+?)\[\/embed\]/is", 'oembed_replacecb' ,$text);
241 }
242
243
244 function oe_build_xpath($attr, $value){
245         // http://westhoffswelt.de/blog/0036_xpath_to_select_html_by_class.html
246         return "contains( normalize-space( @$attr ), ' $value ' ) or substring( normalize-space( @$attr ), 1, string-length( '$value' ) + 1 ) = '$value ' or substring( normalize-space( @$attr ), string-length( @$attr ) - string-length( '$value' ) ) = ' $value' or @$attr = '$value'";
247 }
248
249 function oe_get_inner_html( $node ) {
250     $innerHTML= '';
251     $children = $node->childNodes;
252     foreach ($children as $child) {
253         $innerHTML .= $child->ownerDocument->saveXML( $child );
254     }
255     return $innerHTML;
256 }
257
258 /**
259  * Find <span class='oembed'>..<a href='url' rel='oembed'>..</a></span>
260  * and replace it with [embed]url[/embed]
261  */
262 function oembed_html2bbcode($text) {
263         // start parser only if 'oembed' is in text
264         if (strpos($text, "oembed")){
265
266                 // convert non ascii chars to html entities
267                 $html_text = mb_convert_encoding($text, 'HTML-ENTITIES', mb_detect_encoding($text));
268
269                 // If it doesn't parse at all, just return the text.
270                 $dom = @DOMDocument::loadHTML($html_text);
271                 if(! $dom)
272                         return $text;
273                 $xpath = new DOMXPath($dom);
274                 $attr = "oembed";
275
276                 $xattr = oe_build_xpath("class","oembed");
277                 $entries = $xpath->query("//span[$xattr]");
278
279                 $xattr = "@rel='oembed'";//oe_build_xpath("rel","oembed");
280                 foreach($entries as $e) {
281                         $href = $xpath->evaluate("a[$xattr]/@href", $e)->item(0)->nodeValue;
282                         if(!is_null($href)) $e->parentNode->replaceChild(new DOMText("[embed]".$href."[/embed]"), $e);
283                 }
284                 return oe_get_inner_html( $dom->getElementsByTagName("body")->item(0) );
285         } else {
286                 return $text;
287         }
288 }