GNUsocial/gnu-social
4
0
Fork 1
Code Issues Releases Wiki Activity

trac31 added longurl title to anchors when applicable. Also removed * url prefix feature to prevent short urls.

Browse Source 
darcs-hash:20081113182834-099f7-f55adc95eb8fb46f8cee1c176653c88f65e27ab6.gz
This commit is contained in:
millette
2008-11-13 13:28:34 -05:00
parent f2506b0339
commit 0633d0404d
2 changed files with 18 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
lib/util.php
View File

@@ -744,14 +744,28 @@ function common_render_uri_thingy($matches) {
$trailer = $final . $trailer;
}
}
return '<a href="' . $uri . '" class="extlink">' . $uri . '</a>' . $trailer;
if ($longurl = common_longurl($uri)) {
$longurl = htmlentities($longurl, ENT_QUOTES, 'UTF-8');
$title = " title=$longurl";
}
else $title = '';
return '<a href="' . $uri . '"' . $title . ' class="extlink">' . $uri . '</a>' . $trailer;
}
function common_longurl($uri) {
$uri_e = urlencode($uri);
$longurl = unserialize(file_get_contents("http://api.longurl.org/v1/expand?format=php&url=$uri_e"));
if (empty($longurl['long_url']) || $uri === $longurl['long_url']) return false;
return $longurl['long_url'];
}
function common_shorten_links($text) {
$r = htmlspecialchars($text);
// \s = not a horizontal whitespace character (since PHP 5.2.4)
$r = preg_replace('@[^*]https?://[^)\]>\s]+@e', "common_shorten_link('\\0')", $r);
// $r = preg_replace('@https?://[^)\]>\s]+@e', "common_shorten_link('\\0')", $r);
// RYM this should prevent * preceded URLs from being processed but it its a char
// $r = preg_replace('@[^*](https?://[^)\]>\s]+)@e', "common_shorten_link('\\1')", $r);
$r = preg_replace('@https?://[^)\]>\s]+@e', "common_shorten_link('\\0')", $r);
return $r;
}