- if(! $twitter_enable)
- return;
-
- if(strlen($b['postopts']))
- $b['postopts'] .= ',';
- $b['postopts'] .= 'twitter';
- }
-}
-
-if (! function_exists('short_link')) {
-function short_link ($url) {
- require_once('library/slinky.php');
- $slinky = new Slinky( $url );
- $yourls_url = get_config('yourls','url1');
- if ($yourls_url) {
- $yourls_username = get_config('yourls','username1');
- $yourls_password = get_config('yourls', 'password1');
- $yourls_ssl = get_config('yourls', 'ssl1');
- $yourls = new Slinky_YourLS();
- $yourls->set( 'username', $yourls_username );
- $yourls->set( 'password', $yourls_password );
- $yourls->set( 'ssl', $yourls_ssl );
- $yourls->set( 'yourls-url', $yourls_url );
- $slinky->set_cascade( array( $yourls, new Slinky_UR1ca(), new Slinky_Trim(), new Slinky_IsGd(), new Slinky_TinyURL() ) );
- }
- else {
- // setup a cascade of shortening services
- // try to get a short link from these services
- // in the order ur1.ca, trim, id.gd, tinyurl
- $slinky->set_cascade( array( new Slinky_UR1ca(), new Slinky_Trim(), new Slinky_IsGd(), new Slinky_TinyURL() ) );
- }
- return $slinky->short();
-} };
-
-function twitter_shortenmsg($b, $shortlink = false) {
- require_once("include/bbcode.php");
- require_once("include/html2plain.php");
-
- $max_char = 140;
-
- // Looking for the first image
- $image = '';
- if(preg_match("/\[img\=([0-9]*)x([0-9]*)\](.*?)\[\/img\]/is",$b['body'],$matches))
- $image = $matches[3];
-
- if ($image == '')
- if(preg_match("/\[img\](.*?)\[\/img\]/is",$b['body'],$matches))
- $image = $matches[1];
-
- $multipleimages = (strpos($b['body'], "[img") != strrpos($b['body'], "[img"));
-
- // When saved into the database the content is sent through htmlspecialchars
- // That means that we have to decode all image-urls
- $image = htmlspecialchars_decode($image);
-
- $body = $b["body"];
- if ($b["title"] != "")
- $body = $b["title"]."\n\n".$body;
-
- if (strpos($body, "[bookmark") !== false) {
- // splitting the text in two parts:
- // before and after the bookmark
- $pos = strpos($body, "[bookmark");
- $body1 = substr($body, 0, $pos);
- $body2 = substr($body, $pos);
-
- // Removing all quotes after the bookmark
- // they are mostly only the content after the bookmark.
- $body2 = preg_replace("/\[quote\=([^\]]*)\](.*?)\[\/quote\]/ism",'',$body2);
- $body2 = preg_replace("/\[quote\](.*?)\[\/quote\]/ism",'',$body2);
- $body = $body1.$body2;
- }
-
- // Add some newlines so that the message could be cut better
- $body = str_replace(array("[quote", "[bookmark", "[/bookmark]", "[/quote]"),
- array("\n[quote", "\n[bookmark", "[/bookmark]\n", "[/quote]\n"), $body);
-
- // remove the recycle signs and the names since they aren't helpful on twitter
- // recycle 1
- $recycle = html_entity_decode("♲ ", ENT_QUOTES, 'UTF-8');
- $body = preg_replace( '/'.$recycle.'\[url\=(\w+.*?)\](\w+.*?)\[\/url\]/i', "\n", $body);
- // recycle 2 (Test)
- $recycle = html_entity_decode("◌ ", ENT_QUOTES, 'UTF-8');
- $body = preg_replace( '/'.$recycle.'\[url\=(\w+.*?)\](\w+.*?)\[\/url\]/i', "\n", $body);
-
- // remove the share element
- //$body = preg_replace("/\[share(.*?)\](.*?)\[\/share\]/ism","\n\n$2\n\n",$body);
-
- // At first convert the text to html
- $html = bbcode($body, false, false, 2);
-
- // Then convert it to plain text
- $msg = trim(html2plain($html, 0, true));
- $msg = html_entity_decode($msg,ENT_QUOTES,'UTF-8');
-
- // Removing multiple newlines
- while (strpos($msg, "\n\n\n") !== false)
- $msg = str_replace("\n\n\n", "\n\n", $msg);
-
- // Removing multiple spaces
- while (strpos($msg, " ") !== false)
- $msg = str_replace(" ", " ", $msg);
-
- $origmsg = trim($msg);
-
- // Removing URLs
- $msg = preg_replace('/(https?\:\/\/[a-zA-Z0-9\:\/\-\?\&\;\.\=\_\~\#\%\$\!\+\,]+)/i', "", $msg);
-
- $msg = trim($msg);
-
- $link = '';
- // look for bookmark-bbcode and handle it with priority
- if(preg_match("/\[bookmark\=([^\]]*)\](.*?)\[\/bookmark\]/is",$b['body'],$matches))
- $link = $matches[1];
-
- $multiplelinks = (strpos($b['body'], "[bookmark") != strrpos($b['body'], "[bookmark"));
-
- // If there is no bookmark element then take the first link
- if ($link == '') {
- $links = collecturls($html);
-
- foreach($links AS $singlelink) {
- $img_str = fetch_url($singlelink);
-
- $tempfile = tempnam(get_config("system","temppath"), "cache");
- file_put_contents($tempfile, $img_str);
- $mime = image_type_to_mime_type(exif_imagetype($tempfile));
- unlink($tempfile);
-
- if (substr($mime, 0, 6) == "image/") {
- $image = $singlelink;
- unset($links[$singlelink]);
- }
- }
-
- if (sizeof($links) > 0) {
- reset($links);
- $link = current($links);
- }
- $multiplelinks = (sizeof($links) > 1);
- }
-
- $msglink = "";
- if ($multiplelinks)
- $msglink = $b["plink"];
- else if ($link != "")
- $msglink = $link;
- else if ($multipleimages)
- $msglink = $b["plink"];
- else if ($image != "")
- $msglink = $image;
-
- if (($msglink == "") and strlen($msg) > $max_char)
- $msglink = $b["plink"];
-
- // If the message is short enough then don't modify it.
- if ((strlen($origmsg) <= $max_char) AND ($msglink == ""))
- return(array("msg"=>$origmsg, "image"=>""));
-
- // If the message is short enough and contains a picture then post the picture as well
- if ((strlen($origmsg) <= ($max_char - 23)) AND strpos($origmsg, $msglink))
- return(array("msg"=>$origmsg, "image"=>$image));
-
- // If the message is short enough and the link exists in the original message don't modify it as well
- // -3 because of the bad shortener of twitter
- if ((strlen($origmsg) <= ($max_char - 3)) AND strpos($origmsg, $msglink))
- return(array("msg"=>$origmsg, "image"=>""));
-
- // Preserve the unshortened link
- $orig_link = $msglink;
-
- // Just replace the message link with a 22 character long string
- // Twitter calculates with this length
- if (trim($msglink) <> '')
- $msglink = "1234567890123456789012";
-
- if (strlen(trim($msg." ".$msglink)) > ($max_char)) {
- $msg = substr($msg, 0, ($max_char) - (strlen($msglink)));
- $lastchar = substr($msg, -1);
- $msg = substr($msg, 0, -1);
- $pos = strrpos($msg, "\n");
- if ($pos > 0)
- $msg = substr($msg, 0, $pos);
- else if ($lastchar != "\n")
- $msg = substr($msg, 0, -3)."...";
-
- // if the post contains a picture and a link then the system tries to cut the post earlier.
- // So the link and the picture can be posted.
- if (($image != "") AND ($orig_link != $image)) {
- $msg2 = substr($msg, 0, ($max_char - 20) - (strlen($msglink)));
- $lastchar = substr($msg2, -1);
- $msg2 = substr($msg2, 0, -1);
- $pos = strrpos($msg2, "\n");
- if ($pos > 0)
- $msg = substr($msg2, 0, $pos);
- else if ($lastchar == "\n")
- $msg = trim($msg2);
- }
-
- }
- // Removing multiple spaces - again
- while (strpos($msg, " ") !== false)
- $msg = str_replace(" ", " ", $msg);
-
- $msg = trim($msg);
-
- // Removing multiple newlines
- //while (strpos($msg, "\n\n") !== false)
- // $msg = str_replace("\n\n", "\n", $msg);
-
- // Looking if the link points to an image
- $img_str = fetch_url($orig_link);
-
- $tempfile = tempnam(get_config("system","temppath"), "cache");
- file_put_contents($tempfile, $img_str);
- $mime = image_type_to_mime_type(exif_imagetype($tempfile));
- unlink($tempfile);
-
- if (($image == $orig_link) OR (substr($mime, 0, 6) == "image/"))
- return(array("msg"=>$msg, "image"=>$orig_link));
- else if (($image != $orig_link) AND ($image != "") AND (strlen($msg." ".$msglink) <= ($max_char - 23))) {
- if ($shortlink)
- $orig_link = short_link($orig_link);
-
- return(array("msg"=>$msg." ".$orig_link, "image"=>$image));
- } else {
- if ($shortlink)
- $orig_link = short_link($orig_link);