418 lines
		
	
	
	
		
			12 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
			
		
		
	
	
			418 lines
		
	
	
	
		
			12 KiB
		
	
	
	
		
			PHP
		
	
	
	
	
	
| <?php
 | |
| 
 | |
| require_once("include/Photo.php");
 | |
| 
 | |
| /**
 | |
|  * @brief Fetches attachment data that were generated the old way
 | |
|  *
 | |
|  * @param string $body Message body
 | |
|  * @return array
 | |
|  * 'type' -> Message type ("link", "video", "photo")
 | |
|  * 'text' -> Text outside of the shared message
 | |
|  * 'image' -> Preview image of the message
 | |
|  * 'url' -> Url to the attached message
 | |
|  * 'title' -> Title of the attachment
 | |
|  * 'description' -> Description of the attachment
 | |
|  */
 | |
| function get_old_attachment_data($body) {
 | |
| 
 | |
| 	$post = array();
 | |
| 
 | |
| 	// Simplify image codes
 | |
| 	$body = preg_replace("/\[img\=([0-9]*)x([0-9]*)\](.*?)\[\/img\]/ism", '[img]$3[/img]', $body);
 | |
| 
 | |
| 	if (preg_match_all("(\[class=(.*?)\](.*?)\[\/class\])ism",$body, $attached,  PREG_SET_ORDER)) {
 | |
| 		foreach ($attached AS $data) {
 | |
| 			if (!in_array($data[1], array("type-link", "type-video", "type-photo")))
 | |
| 				continue;
 | |
| 
 | |
| 			$post["type"] = substr($data[1], 5);
 | |
| 
 | |
| 			$post["text"] = trim(str_replace($data[0], "", $body));
 | |
| 
 | |
| 			$attacheddata = $data[2];
 | |
| 
 | |
| 			$URLSearchString = "^\[\]";
 | |
| 
 | |
| 			if (preg_match("/\[img\]([$URLSearchString]*)\[\/img\]/ism", $attacheddata, $matches)) {
 | |
| 
 | |
| 				$picturedata = get_photo_info($matches[1]);
 | |
| 
 | |
| 				if (($picturedata[0] >= 500) AND ($picturedata[0] >= $picturedata[1]))
 | |
| 					$post["image"] = $matches[1];
 | |
| 				else
 | |
| 					$post["preview"] = $matches[1];
 | |
| 			}
 | |
| 
 | |
| 			if (preg_match("/\[bookmark\=([$URLSearchString]*)\](.*?)\[\/bookmark\]/ism", $attacheddata, $matches)) {
 | |
| 				$post["url"] = $matches[1];
 | |
| 				$post["title"] = $matches[2];
 | |
| 			}
 | |
| 
 | |
| 			// Search for description
 | |
| 			if (preg_match("/\[quote\](.*?)\[\/quote\]/ism", $attacheddata, $matches))
 | |
| 				$post["description"] = $matches[1];
 | |
| 
 | |
| 		}
 | |
| 	}
 | |
| 
 | |
| 	return $post;
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * @brief Fetches attachment data that were generated with the "attachment" element
 | |
|  *
 | |
|  * @param string $body Message body
 | |
|  * @return array
 | |
|  * 'type' -> Message type ("link", "video", "photo")
 | |
|  * 'text' -> Text before the shared message
 | |
|  * 'after' -> Text after the shared message
 | |
|  * 'image' -> Preview image of the message
 | |
|  * 'url' -> Url to the attached message
 | |
|  * 'title' -> Title of the attachment
 | |
|  * 'description' -> Description of the attachment
 | |
|  */
 | |
| function get_attachment_data($body) {
 | |
| 
 | |
| 	$data = array();
 | |
| 
 | |
| 	if (!preg_match("/(.*)\[attachment(.*)\](.*?)\[\/attachment\](.*)/ism", $body, $match))
 | |
| 		return get_old_attachment_data($body);
 | |
| 
 | |
| 	$attributes = $match[2];
 | |
| 
 | |
| 	$data["text"] = trim($match[1]);
 | |
| 
 | |
| 	$type = "";
 | |
| 	preg_match("/type='(.*?)'/ism", $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$type = strtolower($matches[1]);
 | |
| 
 | |
| 	preg_match('/type="(.*?)"/ism', $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$type = strtolower($matches[1]);
 | |
| 
 | |
| 	if ($type == "")
 | |
| 		return(array());
 | |
| 
 | |
| 	if (!in_array($type, array("link", "audio", "photo", "video")))
 | |
| 		return(array());
 | |
| 
 | |
| 	if ($type != "")
 | |
| 		$data["type"] = $type;
 | |
| 
 | |
| 	$url = "";
 | |
| 	preg_match("/url='(.*?)'/ism", $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$url = $matches[1];
 | |
| 
 | |
| 	preg_match('/url="(.*?)"/ism', $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$url = $matches[1];
 | |
| 
 | |
| 	if ($url != "")
 | |
| 		$data["url"] = $url;
 | |
| 
 | |
| 	$title = "";
 | |
| 	preg_match("/title='(.*?)'/ism", $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$title = $matches[1];
 | |
| 
 | |
| 	preg_match('/title="(.*?)"/ism', $attributes, $matches);
 | |
| 	if ($matches[1] != "")
 | |
| 		$title = $matches[1];
 | |
| 
 | |
| 	//$title = htmlentities($title, ENT_QUOTES, 'UTF-8', false);
 | |
| 	$title = bbcode(html_entity_decode($title, ENT_QUOTES, 'UTF-8'), false, false, true);
 | |
| 	$title = str_replace(array("[", "]"), array("[", "]"), $title);
 | |
| 
 | |
| 	if ($title != "")
 | |
| 		$data["title"] = $title;
 | |
| 
 | |
| 	$image = "";
 | |
| 	if ($type != "video") {
 | |
| 		preg_match("/image='(.*?)'/ism", $attributes, $matches);
 | |
| 		if ($matches[1] != "")
 | |
| 			$image = $matches[1];
 | |
| 
 | |
| 		preg_match('/image="(.*?)"/ism', $attributes, $matches);
 | |
| 		if ($matches[1] != "")
 | |
| 			$image = $matches[1];
 | |
| 	}
 | |
| 
 | |
| 	if ($image != "")
 | |
| 		$data["image"] = $image;
 | |
| 
 | |
| 	$preview = "";
 | |
| 	if ($type != "video") {
 | |
| 		preg_match("/preview='(.*?)'/ism", $attributes, $matches);
 | |
| 		if ($matches[1] != "")
 | |
| 			$preview = $matches[1];
 | |
| 
 | |
| 		preg_match('/preview="(.*?)"/ism', $attributes, $matches);
 | |
| 		if ($matches[1] != "")
 | |
| 			$preview = $matches[1];
 | |
| 	}
 | |
| 
 | |
| 	if ($preview != "")
 | |
| 		$data["preview"] = $preview;
 | |
| 
 | |
| 	$data["description"] = trim($match[3]);
 | |
| 
 | |
| 	$data["after"] = trim($match[4]);
 | |
| 
 | |
| 	return($data);
 | |
| }
 | |
| 
 | |
| function get_attached_data($body) {
 | |
| /*
 | |
|  - text:
 | |
|  - type: link, video, photo
 | |
|  - title:
 | |
|  - url:
 | |
|  - image:
 | |
|  - description:
 | |
|  - (thumbnail)
 | |
| */
 | |
| 
 | |
| 	$post = get_attachment_data($body);
 | |
| 
 | |
| 	// if nothing is found, it maybe having an image.
 | |
| 	if (!isset($post["type"])) {
 | |
| 		require_once("mod/parse_url.php");
 | |
| 		require_once("include/Photo.php");
 | |
| 
 | |
| 		$URLSearchString = "^\[\]";
 | |
| 		if (preg_match_all("(\[url=([$URLSearchString]*)\]\s*\[img\]([$URLSearchString]*)\[\/img\]\s*\[\/url\])ism", $body, $pictures,  PREG_SET_ORDER)) {
 | |
| 			if (count($pictures) == 1) {
 | |
| 				// Checking, if the link goes to a picture
 | |
| 				$data = parseurl_getsiteinfo_cached($pictures[0][1], true);
 | |
| 				if ($data["type"] == "photo") {
 | |
| 					$post["type"] = "photo";
 | |
| 					if (isset($data["images"][0])) {
 | |
| 						$post["image"] = $data["images"][0]["src"];
 | |
| 						$post["url"] = $data["url"];
 | |
| 					} else
 | |
| 						$post["image"] = $data["url"];
 | |
| 
 | |
| 					$post["preview"] = $pictures[0][2];
 | |
| 					$post["text"] = str_replace($pictures[0][0], "", $body);
 | |
| 				} else {
 | |
| 					$imgdata = get_photo_info($pictures[0][1]);
 | |
| 					if (substr($imgdata["mime"], 0, 6) == "image/") {
 | |
| 						$post["type"] = "photo";
 | |
| 						$post["image"] = $pictures[0][1];
 | |
| 						$post["preview"] = $pictures[0][2];
 | |
| 						$post["text"] = str_replace($pictures[0][0], "", $body);
 | |
| 					}
 | |
| 				}
 | |
| 			} elseif (count($pictures) > 1) {
 | |
| 				$post["type"] = "link";
 | |
| 				$post["url"] = $b["plink"];
 | |
| 				$post["image"] = $pictures[0][2];
 | |
| 				$post["text"] = $body;
 | |
| 			}
 | |
| 		} elseif (preg_match_all("(\[img\]([$URLSearchString]*)\[\/img\])ism", $body, $pictures,  PREG_SET_ORDER)) {
 | |
| 			if (count($pictures) == 1) {
 | |
| 				$post["type"] = "photo";
 | |
| 				$post["image"] = $pictures[0][1];
 | |
| 				$post["text"] = str_replace($pictures[0][0], "", $body);
 | |
| 			} elseif (count($pictures) > 1) {
 | |
| 				$post["type"] = "link";
 | |
| 				$post["url"] = $b["plink"];
 | |
| 				$post["image"] = $pictures[0][1];
 | |
| 				$post["text"] = $body;
 | |
| 			}
 | |
| 		}
 | |
| 
 | |
| 		if (preg_match_all("(\[url\]([$URLSearchString]*)\[\/url\])ism", $body, $links,  PREG_SET_ORDER)) {
 | |
| 			if (count($links) == 1) {
 | |
| 				$post["type"] = "text";
 | |
| 				$post["url"] = $links[0][1];
 | |
| 				$post["text"] = $body;
 | |
| 			}
 | |
| 		}
 | |
| 		if (!isset($post["type"])) {
 | |
| 			$post["type"] = "text";
 | |
| 			$post["text"] = trim($body);
 | |
| 		}
 | |
| 	} elseif (isset($post["url"]) AND ($post["type"] == "video")) {
 | |
| 		require_once("mod/parse_url.php");
 | |
| 		$data = parseurl_getsiteinfo_cached($post["url"], true);
 | |
| 
 | |
| 		if (isset($data["images"][0]))
 | |
| 			$post["image"] = $data["images"][0]["src"];
 | |
| 	}
 | |
| 
 | |
| 	return($post);
 | |
| }
 | |
| 
 | |
| function shortenmsg($msg, $limit, $twitter = false) {
 | |
| 	/// @TODO
 | |
| 	/// For Twitter URLs aren't shortened, but they have to be calculated as if.
 | |
| 
 | |
| 	$lines = explode("\n", $msg);
 | |
| 	$msg = "";
 | |
| 	$recycle = html_entity_decode("♲ ", ENT_QUOTES, 'UTF-8');
 | |
| 	foreach ($lines AS $row=>$line) {
 | |
| 		if (iconv_strlen(trim($msg."\n".$line), "UTF-8") <= $limit)
 | |
| 			$msg = trim($msg."\n".$line);
 | |
| 		// Is the new message empty by now or is it a reshared message?
 | |
| 		elseif (($msg == "") OR (($row == 1) AND (substr($msg, 0, 4) == $recycle)))
 | |
| 			$msg = iconv_substr(iconv_substr(trim($msg."\n".$line), 0, $limit, "UTF-8"), 0, -3, "UTF-8")."...";
 | |
| 		else
 | |
| 			break;
 | |
| 	}
 | |
| 	return($msg);
 | |
| }
 | |
| 
 | |
| /**
 | |
|  * @brief Convert a message into plaintext for connectors to other networks
 | |
|  *
 | |
|  * @param App $a The application class
 | |
|  * @param array $b The message array that is about to be posted
 | |
|  * @param int $limit The maximum number of characters when posting to that network
 | |
|  * @param bool $includedlinks Has an attached link to be included into the message?
 | |
|  * @param int $htmlmode This triggers the behaviour of the bbcode conversion
 | |
|  * @param string $target_network Name of the network where the post should go to.
 | |
|  *
 | |
|  * @return string The converted message
 | |
|  */
 | |
| function plaintext($a, $b, $limit = 0, $includedlinks = false, $htmlmode = 2, $target_network = "") {
 | |
| 	require_once("include/bbcode.php");
 | |
| 	require_once("include/html2plain.php");
 | |
| 	require_once("include/network.php");
 | |
| 
 | |
| 	// Remove the hash tags
 | |
| 	$URLSearchString = "^\[\]";
 | |
| 	$body = preg_replace("/([#@])\[url\=([$URLSearchString]*)\](.*?)\[\/url\]/ism", '$1$3', $b["body"]);
 | |
| 
 | |
| 	// Add an URL element if the text contains a raw link
 | |
| 	$body = preg_replace("/([^\]\='".'"'."]|^)(https?\:\/\/[a-zA-Z0-9\:\/\-\?\&\;\.\=\_\~\#\%\$\!\+\,]+)/ism", '$1[url]$2[/url]', $body);
 | |
| 
 | |
| 	// Remove the abstract
 | |
| 	$body = remove_abstract($body);
 | |
| 
 | |
| 	// At first look at data that is attached via "type-..." stuff
 | |
| 	// This will hopefully replaced with a dedicated bbcode later
 | |
| 	//$post = get_attached_data($b["body"]);
 | |
| 	$post = get_attached_data($body);
 | |
| 
 | |
| 	if (($b["title"] != "") AND ($post["text"] != ""))
 | |
| 		$post["text"] = trim($b["title"]."\n\n".$post["text"]);
 | |
| 	elseif ($b["title"] != "")
 | |
| 		$post["text"] = trim($b["title"]);
 | |
| 
 | |
| 	$abstract = "";
 | |
| 
 | |
| 	// Fetch the abstract from the given target network
 | |
| 	if ($target_network != "") {
 | |
| 		$default_abstract = fetch_abstract($b["body"]);
 | |
| 		$abstract = fetch_abstract($b["body"], $target_network);
 | |
| 
 | |
| 		// If we post to a network with no limit we only fetch
 | |
| 		// an abstract exactly for this network
 | |
| 		if (($limit == 0) AND ($abstract == $default_abstract))
 | |
| 			$abstract = "";
 | |
| 
 | |
| 	} else // Try to guess the correct target network
 | |
| 		switch ($htmlmode) {
 | |
| 			case 8:
 | |
| 				$abstract = fetch_abstract($b["body"], NETWORK_TWITTER);
 | |
| 				break;
 | |
| 			case 7:
 | |
| 				$abstract = fetch_abstract($b["body"], NETWORK_STATUSNET);
 | |
| 				break;
 | |
| 			case 6:
 | |
| 				$abstract = fetch_abstract($b["body"], NETWORK_APPNET);
 | |
| 				break;
 | |
| 			default: // We don't know the exact target.
 | |
| 				 // We fetch an abstract since there is a posting limit.
 | |
| 				if ($limit > 0)
 | |
| 					$abstract = fetch_abstract($b["body"]);
 | |
| 		}
 | |
| 
 | |
| 	if ($abstract != "") {
 | |
| 		$post["text"] = $abstract;
 | |
| 
 | |
| 		if ($post["type"] == "text") {
 | |
| 			$post["type"] = "link";
 | |
| 			$post["url"] = $b["plink"];
 | |
| 		}
 | |
| 	}
 | |
| 
 | |
| 	$html = bbcode($post["text"], false, false, $htmlmode);
 | |
| 	$msg = html2plain($html, 0, true);
 | |
| 	$msg = trim(html_entity_decode($msg,ENT_QUOTES,'UTF-8'));
 | |
| 
 | |
| 	$link = "";
 | |
| 	if ($includedlinks) {
 | |
| 		if ($post["type"] == "link")
 | |
| 			$link = $post["url"];
 | |
| 		elseif ($post["type"] == "text")
 | |
| 			$link = $post["url"];
 | |
| 		elseif ($post["type"] == "video")
 | |
| 			$link = $post["url"];
 | |
| 		elseif ($post["type"] == "photo")
 | |
| 			$link = $post["image"];
 | |
| 
 | |
| 		if (($msg == "") AND isset($post["title"]))
 | |
| 			$msg = trim($post["title"]);
 | |
| 
 | |
| 		if (($msg == "") AND isset($post["description"]))
 | |
| 			$msg = trim($post["description"]);
 | |
| 
 | |
| 		// If the link is already contained in the post, then it neeedn't to be added again
 | |
| 		// But: if the link is beyond the limit, then it has to be added.
 | |
| 		if (($link != "") AND strstr($msg, $link)) {
 | |
| 			$pos = strpos($msg, $link);
 | |
| 
 | |
| 			// Will the text be shortened in the link?
 | |
| 			// Or is the link the last item in the post?
 | |
| 			if (($limit > 0) AND ($pos < $limit) AND (($pos + 23 > $limit) OR ($pos + strlen($link) == strlen($msg))))
 | |
| 				$msg = trim(str_replace($link, "", $msg));
 | |
| 			elseif (($limit == 0) OR ($pos < $limit)) {
 | |
| 				// The limit has to be increased since it will be shortened - but not now
 | |
| 				// Only do it with Twitter (htmlmode = 8)
 | |
| 				if (($limit > 0) AND (strlen($link) > 23) AND ($htmlmode == 8))
 | |
| 					$limit = $limit - 23 + strlen($link);
 | |
| 
 | |
| 				$link = "";
 | |
| 
 | |
| 				if ($post["type"] == "text")
 | |
| 					unset($post["url"]);
 | |
| 			}
 | |
| 		}
 | |
| 	}
 | |
| 
 | |
| 	if ($limit > 0) {
 | |
| 		// Reduce multiple spaces
 | |
| 		// When posted to a network with limited space, we try to gain space where possible
 | |
| 		while (strpos($msg, "  ") !== false)
 | |
| 			$msg = str_replace("  ", " ", $msg);
 | |
| 
 | |
| 		// Twitter is using its own limiter, so we always assume that shortened links will have this length
 | |
| 		if (iconv_strlen($link, "UTF-8") > 0)
 | |
| 			$limit = $limit - 23;
 | |
| 
 | |
| 		if (iconv_strlen($msg, "UTF-8") > $limit) {
 | |
| 
 | |
| 			if (($post["type"] == "text") AND isset($post["url"]))
 | |
| 				$post["url"] = $b["plink"];
 | |
| 			elseif (!isset($post["url"])) {
 | |
| 				$limit = $limit - 23;
 | |
| 				$post["url"] = $b["plink"];
 | |
| 			} elseif (strpos($b["body"], "[share") !== false)
 | |
| 				$post["url"] = $b["plink"];
 | |
| 			elseif (get_pconfig($b["uid"], "system", "no_intelligent_shortening"))
 | |
| 				$post["url"] = $b["plink"];
 | |
| 
 | |
| 			$msg = shortenmsg($msg, $limit);
 | |
| 		}
 | |
| 	}
 | |
| 
 | |
| 	$post["text"] = trim($msg);
 | |
| 
 | |
| 	return($post);
 | |
| }
 | |
| ?>
 |