2011-01-31 09:38:49 +00:00
|
|
|
<?php
|
|
|
|
|
function oembed_replacecb($matches){
|
2011-10-25 03:10:46 +00:00
|
|
|
logger('oembedcb');
|
2011-05-22 21:03:34 +00:00
|
|
|
$embedurl=$matches[1];
|
|
|
|
|
$j = oembed_fetch_url($embedurl);
|
2011-10-25 03:10:46 +00:00
|
|
|
$s = oembed_format_object($j);
|
|
|
|
|
return oembed_iframe($s,$j->width,$j->height);
|
|
|
|
|
|
|
|
|
|
|
2011-05-22 21:03:34 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
function oembed_fetch_url($embedurl){
|
2011-10-24 15:28:28 +00:00
|
|
|
|
2011-10-24 11:02:38 +00:00
|
|
|
$txt = Cache::get($embedurl);
|
2011-05-22 21:03:34 +00:00
|
|
|
|
2011-10-24 11:02:38 +00:00
|
|
|
if(is_null($txt)){
|
2011-05-22 21:03:34 +00:00
|
|
|
$txt = "";
|
|
|
|
|
|
|
|
|
|
// try oembed autodiscovery
|
2011-08-17 03:05:02 +00:00
|
|
|
$redirects = 0;
|
|
|
|
|
$html_text = fetch_url($embedurl, false, $redirects, 15);
|
2011-10-24 15:28:28 +00:00
|
|
|
if($html_text){
|
|
|
|
|
$dom = @DOMDocument::loadHTML($html_text);
|
|
|
|
|
if ($dom){
|
|
|
|
|
$xpath = new DOMXPath($dom);
|
|
|
|
|
$attr = "oembed";
|
|
|
|
|
|
|
|
|
|
$xattr = oe_build_xpath("class","oembed");
|
|
|
|
|
$entries = $xpath->query("//link[@type='application/json+oembed']");
|
|
|
|
|
foreach($entries as $e){
|
|
|
|
|
$href = $e->getAttributeNode("href")->nodeValue;
|
|
|
|
|
$txt = fetch_url($href);
|
|
|
|
|
}
|
2011-05-22 21:03:34 +00:00
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if ($txt==false || $txt==""){
|
|
|
|
|
// try oohembed service
|
|
|
|
|
$ourl = "http://oohembed.com/oohembed/?url=".urlencode($embedurl);
|
|
|
|
|
$txt = fetch_url($ourl);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
$txt=trim($txt);
|
|
|
|
|
if ($txt[0]!="{") $txt='{"type":"error"}';
|
|
|
|
|
|
|
|
|
|
//save in cache
|
2011-10-24 11:02:38 +00:00
|
|
|
Cache::set($embedurl,$txt);
|
|
|
|
|
|
2011-05-22 21:03:34 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
$j = json_decode($txt);
|
|
|
|
|
$j->embedurl = $embedurl;
|
|
|
|
|
return $j;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function oembed_format_object($j){
|
|
|
|
|
$embedurl = $j->embedurl;
|
|
|
|
|
$ret="<span class='oembed ".$j->type."'>";
|
|
|
|
|
switch ($j->type) {
|
|
|
|
|
case "video": {
|
|
|
|
|
if (isset($j->thumbnail_url)) {
|
2011-10-24 15:31:14 +00:00
|
|
|
$tw = (isset($j->thumbnail_width)) ? $j->thumbnail_width:200;
|
|
|
|
|
$th = (isset($j->thumbnail_height)) ? $j->thumbnail_height:180;
|
|
|
|
|
$tr = $tw/$th;
|
|
|
|
|
|
|
|
|
|
$th=120; $tw = $th*$tr;
|
2011-10-24 15:28:28 +00:00
|
|
|
$tpl=get_markup_template('oembed_video.tpl');
|
|
|
|
|
$ret.=replace_macros($tpl, array(
|
|
|
|
|
'$embedurl'=>$embedurl,
|
|
|
|
|
'$escapedhtml'=>urlencode($j->html),
|
|
|
|
|
'$tw'=>$tw,
|
|
|
|
|
'$th'=>$th,
|
|
|
|
|
'$turl'=>$j->thumbnail_url,
|
|
|
|
|
));
|
|
|
|
|
|
2011-05-22 21:03:34 +00:00
|
|
|
} else {
|
|
|
|
|
$ret=$j->html;
|
|
|
|
|
}
|
|
|
|
|
$ret.="<br>";
|
|
|
|
|
}; break;
|
|
|
|
|
case "photo": {
|
|
|
|
|
$ret.= "<img width='".$j->width."' height='".$j->height."' src='".$j->url."'>";
|
|
|
|
|
$ret.="<br>";
|
|
|
|
|
}; break;
|
|
|
|
|
case "link": {
|
|
|
|
|
//$ret = "<a href='".$embedurl."'>".$j->title."</a>";
|
|
|
|
|
}; break;
|
|
|
|
|
case "rich": {
|
|
|
|
|
// not so safe..
|
2011-10-21 14:26:29 +00:00
|
|
|
$ret.= $j->html;
|
2011-05-22 21:03:34 +00:00
|
|
|
}; break;
|
|
|
|
|
}
|
|
|
|
|
|
2011-10-21 14:26:29 +00:00
|
|
|
// add link to source if not present in "rich" type
|
|
|
|
|
if ( $j->type!='rich' || !strpos($ret,$embedurl) ){
|
|
|
|
|
$embedlink = (isset($j->title))?$j->title:$embedurl;
|
|
|
|
|
$ret .= "<a href='$embedurl' rel='oembed'>$embedlink</a>";
|
|
|
|
|
if (isset($j->author_name)) $ret.=" by ".$j->author_name;
|
|
|
|
|
if (isset($j->provider_name)) $ret.=" on ".$j->provider_name;
|
|
|
|
|
} else {
|
|
|
|
|
// add <a> for html2bbcode conversion
|
|
|
|
|
$ret .= "<a href='$embedurl' rel='oembed'/>";
|
|
|
|
|
}
|
2011-05-22 21:03:34 +00:00
|
|
|
$ret.="<br style='clear:left'></span>";
|
2011-10-21 14:26:29 +00:00
|
|
|
return mb_convert_encoding($ret, 'HTML-ENTITIES', mb_detect_encoding($ret));
|
2011-01-31 09:38:49 +00:00
|
|
|
}
|
|
|
|
|
|
2011-10-25 03:10:46 +00:00
|
|
|
function oembed_iframe($src,$width,$height) {
|
|
|
|
|
|
|
|
|
|
if(! $width || strstr($width,'%'))
|
|
|
|
|
$width = '640';
|
|
|
|
|
if(! $height || strstr($height,'%'))
|
|
|
|
|
$height = '300';
|
|
|
|
|
// try and leave some room for the description line.
|
|
|
|
|
$height = intval($height) + 80;
|
|
|
|
|
$width = intval($width) + 40;
|
|
|
|
|
|
|
|
|
|
$s = 'data:text/html;base64,' . base64_encode('<html><body>' . $src . '</body></html>');
|
|
|
|
|
return '<iframe height="' . $height . '" width="' . $width . '" src="' . $s . '" frameborder="no" >' . t('Embedded content') . '</iframe>';
|
|
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2011-01-31 15:45:58 +00:00
|
|
|
function oembed_bbcode2html($text){
|
2011-01-31 09:38:49 +00:00
|
|
|
$stopoembed = get_config("system","no_oembed");
|
2011-01-31 10:00:35 +00:00
|
|
|
if ($stopoembed == true){
|
|
|
|
|
return preg_replace("/\[embed\](.+?)\[\/embed\]/is", "<!-- oembed $1 --><i>". t('Embedding disabled') ." : $1</i><!-- /oembed $1 -->" ,$text);
|
|
|
|
|
}
|
2011-02-01 07:06:45 +00:00
|
|
|
return preg_replace_callback("/\[embed\](.+?)\[\/embed\]/is", 'oembed_replacecb' ,$text);
|
2011-01-31 09:38:49 +00:00
|
|
|
}
|
2011-01-31 15:45:58 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
function oe_build_xpath($attr, $value){
|
|
|
|
|
// http://westhoffswelt.de/blog/0036_xpath_to_select_html_by_class.html
|
|
|
|
|
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'";
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
function oe_get_inner_html( $node ) {
|
|
|
|
|
$innerHTML= '';
|
|
|
|
|
$children = $node->childNodes;
|
|
|
|
|
foreach ($children as $child) {
|
|
|
|
|
$innerHTML .= $child->ownerDocument->saveXML( $child );
|
|
|
|
|
}
|
|
|
|
|
return $innerHTML;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Find <span class='oembed'>..<a href='url' rel='oembed'>..</a></span>
|
|
|
|
|
* and replace it with [embed]url[/embed]
|
|
|
|
|
*/
|
|
|
|
|
function oembed_html2bbcode($text) {
|
2011-02-16 08:22:32 +00:00
|
|
|
// start parser only if 'oembed' is in text
|
|
|
|
|
if (strpos($text, "oembed")){
|
|
|
|
|
|
|
|
|
|
// convert non ascii chars to html entities
|
|
|
|
|
$html_text = mb_convert_encoding($text, 'HTML-ENTITIES', mb_detect_encoding($text));
|
|
|
|
|
|
|
|
|
|
// If it doesn't parse at all, just return the text.
|
|
|
|
|
$dom = @DOMDocument::loadHTML($html_text);
|
|
|
|
|
if(! $dom)
|
|
|
|
|
return $text;
|
|
|
|
|
$xpath = new DOMXPath($dom);
|
|
|
|
|
$attr = "oembed";
|
|
|
|
|
|
|
|
|
|
$xattr = oe_build_xpath("class","oembed");
|
|
|
|
|
$entries = $xpath->query("//span[$xattr]");
|
2011-10-21 14:26:29 +00:00
|
|
|
|
|
|
|
|
$xattr = "@rel='oembed'";//oe_build_xpath("rel","oembed");
|
2011-02-16 08:22:32 +00:00
|
|
|
foreach($entries as $e) {
|
|
|
|
|
$href = $xpath->evaluate("a[$xattr]/@href", $e)->item(0)->nodeValue;
|
2011-05-22 19:56:47 +00:00
|
|
|
if(!is_null($href)) $e->parentNode->replaceChild(new DOMText("[embed]".$href."[/embed]"), $e);
|
2011-02-16 08:22:32 +00:00
|
|
|
}
|
|
|
|
|
return oe_get_inner_html( $dom->getElementsByTagName("body")->item(0) );
|
|
|
|
|
} else {
|
2011-02-09 04:55:34 +00:00
|
|
|
return $text;
|
2011-02-16 08:22:32 +00:00
|
|
|
}
|
2011-01-31 15:45:58 +00:00
|
|
|
}
|
|
|
|
|
|
2011-10-24 11:02:38 +00:00
|
|
|
|
|
|
|
|
|
