2010-07-23 07:41:45 +02:00
|
|
|
|
<?php
|
2016-02-07 15:11:34 +01:00
|
|
|
|
/**
|
2015-12-25 23:17:34 +01:00
|
|
|
|
* @file mod/parse_url.php
|
2016-11-25 16:59:31 +01:00
|
|
|
|
* @brief The parse_url module
|
|
|
|
|
|
*
|
|
|
|
|
|
* This module does parse an url for embedable content (audio, video, image files or link)
|
|
|
|
|
|
* information and does format this information to BBCode or html (this depends
|
|
|
|
|
|
* on the user settings - default is BBCode output).
|
|
|
|
|
|
* If the user has enabled the richtext editor setting the output will be in html
|
|
|
|
|
|
* (Note: This is not always possible and in some case not useful because
|
2016-11-26 04:10:50 +01:00
|
|
|
|
* the richtext editor doesn't support all kind of html).
|
2016-11-25 16:59:31 +01:00
|
|
|
|
* Otherwise the output will be constructed BBCode.
|
2016-02-07 15:11:34 +01:00
|
|
|
|
*
|
2015-12-25 23:17:34 +01:00
|
|
|
|
* @todo https://developers.google.com/+/plugins/snippet/
|
2016-02-07 15:11:34 +01:00
|
|
|
|
*
|
2015-12-25 23:17:34 +01:00
|
|
|
|
* @verbatim
|
|
|
|
|
|
* <meta itemprop="name" content="Toller Titel">
|
|
|
|
|
|
* <meta itemprop="description" content="Eine tolle Beschreibung">
|
|
|
|
|
|
* <meta itemprop="image" content="http://maple.libertreeproject.org/images/tree-icon.png">
|
2016-02-07 15:11:34 +01:00
|
|
|
|
*
|
2015-12-25 23:17:34 +01:00
|
|
|
|
* <body itemscope itemtype="http://schema.org/Product">
|
|
|
|
|
|
* <h1 itemprop="name">Shiny Trinket</h1>
|
|
|
|
|
|
* <img itemprop="image" src="{image-url}" />
|
|
|
|
|
|
* <p itemprop="description">Shiny trinkets are shiny.</p>
|
|
|
|
|
|
* </body>
|
|
|
|
|
|
* @endverbatim
|
2012-07-18 21:06:38 +02:00
|
|
|
|
*/
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
use \Friendica\ParseUrl;
|
2012-09-06 01:26:11 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
require_once("include/items.php");
|
2012-07-12 23:41:04 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
function parse_url_content(&$a) {
|
2016-01-14 23:59:51 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$text = null;
|
|
|
|
|
|
$str_tags = "";
|
2016-01-14 23:59:51 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$textmode = false;
|
2016-01-14 23:59:51 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (local_user() && (!feature_enabled(local_user(), "richtext"))) {
|
|
|
|
|
|
$textmode = true;
|
2015-07-17 01:08:28 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$br = (($textmode) ? "\n" : "<br />");
|
2014-02-22 15:46:19 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (x($_GET,"binurl")) {
|
|
|
|
|
|
$url = trim(hex2bin($_GET["binurl"]));
|
|
|
|
|
|
} else {
|
|
|
|
|
|
$url = trim($_GET["url"]);
|
2016-11-12 21:23:00 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($_GET["title"]) {
|
|
|
|
|
|
$title = strip_tags(trim($_GET["title"]));
|
2014-07-14 08:37:40 +02:00
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($_GET["description"]) {
|
|
|
|
|
|
$text = strip_tags(trim($_GET["description"]));
|
2013-03-02 14:46:06 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($_GET["tags"]) {
|
|
|
|
|
|
$arr_tags = ParseUrl::convertTagsToArray($_GET["tags"]);
|
|
|
|
|
|
if (count($arr_tags)) {
|
|
|
|
|
|
$str_tags = $br . implode(" ", $arr_tags) . $br;
|
2015-04-05 20:40:31 +02:00
|
|
|
|
}
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
// Add url scheme if it is missing
|
|
|
|
|
|
$arrurl = parse_url($url);
|
|
|
|
|
|
if (!x($arrurl, "scheme")) {
|
|
|
|
|
|
if (x($arrurl, "host")) {
|
|
|
|
|
|
$url = "http:".$url;
|
|
|
|
|
|
} else {
|
|
|
|
|
|
$url = "http://".$url;
|
2015-03-07 23:14:26 +01:00
|
|
|
|
}
|
2013-02-24 12:54:53 +01:00
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
logger("prse_url: " . $url);
|
|
|
|
|
|
|
2016-11-25 16:59:31 +01:00
|
|
|
|
// Check if the URL is an image, video or audio file. If so format
|
|
|
|
|
|
// the URL with the corresponding BBCode media tag
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$redirects = 0;
|
|
|
|
|
|
// Fetch the header of the URL
|
|
|
|
|
|
$result = z_fetch_url($url, false, $redirects, array("novalidate" => true, "nobody" => true));
|
|
|
|
|
|
if($result["success"]) {
|
|
|
|
|
|
// Convert the header fields into an array
|
|
|
|
|
|
$hdrs = array();
|
|
|
|
|
|
$h = explode("\n", $result["header"]);
|
|
|
|
|
|
foreach ($h as $l) {
|
|
|
|
|
|
list($k,$v) = array_map("trim", explode(":", trim($l), 2));
|
|
|
|
|
|
$hdrs[$k] = $v;
|
|
|
|
|
|
}
|
|
|
|
|
|
if (array_key_exists("Content-Type", $hdrs)) {
|
|
|
|
|
|
$type = $hdrs["Content-Type"];
|
|
|
|
|
|
}
|
|
|
|
|
|
if ($type) {
|
|
|
|
|
|
if(stripos($type, "image/") !== false) {
|
|
|
|
|
|
echo $br . "[img]" . $url . "[/img]" . $br;
|
|
|
|
|
|
killme();
|
2014-04-04 10:58:31 +02:00
|
|
|
|
}
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (stripos($type, "video/") !== false) {
|
|
|
|
|
|
echo $br . "[video]" . $url . "[/video]" . $br;
|
|
|
|
|
|
killme();
|
2014-04-04 10:58:31 +02:00
|
|
|
|
}
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (stripos($type, "audio/") !== false) {
|
|
|
|
|
|
echo $br . "[audio]" . $url . "[/audio]" . $br;
|
|
|
|
|
|
killme();
|
2012-07-12 08:20:27 +02:00
|
|
|
|
}
|
2015-03-07 23:14:26 +01:00
|
|
|
|
}
|
2012-07-12 08:20:27 +02:00
|
|
|
|
}
|
2012-07-12 01:17:33 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($textmode) {
|
|
|
|
|
|
$template = "[bookmark=%s]%s[/bookmark]%s";
|
|
|
|
|
|
} else {
|
2014-02-22 15:46:19 +01:00
|
|
|
|
$template = "<a class=\"bookmark\" href=\"%s\" >%s</a>%s";
|
2016-11-24 01:11:22 +01:00
|
|
|
|
}
|
2010-07-23 07:41:45 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$arr = array("url" => $url, "text" => "");
|
2010-12-26 00:01:02 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
call_hooks("parse_link", $arr);
|
2010-12-26 00:01:02 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (strlen($arr["text"])) {
|
|
|
|
|
|
echo $arr["text"];
|
2010-12-26 00:01:02 +01:00
|
|
|
|
killme();
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-25 16:59:31 +01:00
|
|
|
|
// If there is allready some content information submitted we don't
|
|
|
|
|
|
// need to parse the url for content.
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($url && $title && $text) {
|
2011-09-20 07:21:55 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$title = str_replace(array("\r","\n"),array("",""),$title);
|
2014-02-16 17:35:01 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if ($textmode) {
|
|
|
|
|
|
$text = "[quote]" . trim($text) . "[/quote]" . $br;
|
|
|
|
|
|
} else {
|
|
|
|
|
|
$text = "<blockquote>" . htmlspecialchars(trim($text)) . "</blockquote><br />";
|
2014-02-16 17:35:01 +01:00
|
|
|
|
$title = htmlspecialchars($title);
|
|
|
|
|
|
}
|
2011-09-20 07:21:55 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$result = sprintf($template, $url, ($title) ? $title : $url, $text) . $str_tags;
|
2011-09-20 07:21:55 +02:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
logger("parse_url (unparsed): returns: " . $result);
|
2011-09-20 07:21:55 +02:00
|
|
|
|
|
|
|
|
|
|
echo $result;
|
|
|
|
|
|
killme();
|
|
|
|
|
|
}
|
|
|
|
|
|
|
2016-11-25 16:59:31 +01:00
|
|
|
|
// Fetch the information directly from the webpage
|
2016-11-24 01:11:22 +01:00
|
|
|
|
$siteinfo = ParseUrl::getSiteinfo($url);
|
2011-09-20 07:21:55 +02:00
|
|
|
|
|
2016-04-17 20:43:41 +02:00
|
|
|
|
unset($siteinfo["keywords"]);
|
2014-01-05 16:22:42 +01:00
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
// Format it as BBCode attachment
|
2016-04-18 20:57:01 +02:00
|
|
|
|
$info = add_page_info_data($siteinfo);
|
|
|
|
|
|
|
2016-11-24 01:11:22 +01:00
|
|
|
|
if (!$textmode) {
|
2016-04-18 20:57:01 +02:00
|
|
|
|
// Replace ' with ’ - not perfect - but the richtext editor has problems otherwise
|
|
|
|
|
|
$info = str_replace(array("'"), array("’"), $info);
|
2016-11-24 01:11:22 +01:00
|
|
|
|
}
|
2016-04-18 20:57:01 +02:00
|
|
|
|
|
|
|
|
|
|
echo $info;
|
|
|
|
|
|
|
2010-07-23 07:41:45 +02:00
|
|
|
|
killme();
|
2011-05-23 10:37:09 +02:00
|
|
|
|
}
|
