X-Git-Url: https://git.mxchange.org/?a=blobdiff_plain;f=lib%2Futil.php;h=96960430247d7b68defbba46cb2bf36d289ecbc3;hb=754303ce9e8105c9d827ca2c009049ee7dec479c;hp=448c049c04827ad98ab88b7aba2578da338856d7;hpb=bdb83be1790c089b8c236cc57c1448c787a7ecef;p=quix0rs-gnu-social.git

diff --git a/lib/util.php b/lib/util.php
index 448c049c04..9696043024 100644
--- a/lib/util.php
+++ b/lib/util.php
@@ -150,6 +150,11 @@ function common_text($txt) {
 	$xw->text($txt);
 }
 
+function common_raw($xml) {
+	global $xw;
+	$xw->writeRaw($xml);
+}
+
 function common_license_block() {
 	global $config, $xw;
 	common_element_start('p', 'license greenBg');
@@ -344,11 +349,48 @@ function common_canonical_email($email) {
 	return $email;
 }
 
-function common_render_content($text) {
-	# XXX: @ messages
+define('URL_REGEX', '^|[ \t\r\n])((ftp|http|https|gopher|mailto|news|nntp|telnet|wais|file|prospero|aim|webcal):(([A-Za-z0-9$_.+!*(),;/?:@&~=-])|%[A-Fa-f0-9]{2}){2,}(#([a-zA-Z0-9][a-zA-Z0-9$_.+!*(),;/?:@&~=%-]*))?([A-Za-z0-9$_+!*();/?:~-]))');
+
+function common_render_content($text, $notice) {
+	$r = htmlspecialchars($text);
+	$id = $notice->profile_id;
+	$r = preg_replace('/(^|\b)@([\w-]+)($|\b)/e', "'\\1@'.common_at_link($id, '\\2').'\\3'", $r);
+#	$r = preg_replace('(^|\b)(https?|ftp)://[-A-Z0-9+&@#/%?=~_|!:,.;]*[-A-Z0-9+&@#/%=~_|]', '<a href="\0" class="extlink">\0</a>', $r);
 	# XXX: # tags
 	# XXX: machine tags
-	return htmlspecialchars($text);
+	return $r;
+}
+
+function common_at_link($sender_id, $nickname) {
+	# Try to find profiles this profile is subscribed to that have this nickname
+	$recipient = new Profile();
+	# XXX: chokety and bad
+	$recipient->whereAdd('EXISTS (SELECT subscribed from subscription where subscriber = '.$sender_id.' and subscribed = id)', 'AND');
+	$recipient->whereAdd('nickname = "' . trim($nickname) . '"', 'AND');
+	if ($recipient->find(TRUE)) {
+		return '<a href="'.htmlspecialchars($recipient->profileurl).'" class="atlink tolistenee">'.$nickname.'</a>';
+	}
+	# Try to find profiles that listen to this profile and that have this nickname
+	$recipient = new Profile();
+	# XXX: chokety and bad
+	$recipient->whereAdd('EXISTS (SELECT subscriber from subscription where subscribed = '.$sender_id.' and subscriber = id)', 'AND');
+	$recipient->whereAdd('nickname = "' . trim($nickname) . '"', 'AND');
+	if ($recipient->find(TRUE)) {
+		return '<a href="'.htmlspecialchars($recipient->profileurl).'" class="atlink tolistener">'.$nickname.'</a>';
+	}
+	# If this is a local user, try to find a local user with that nickname.
+	$sender = User::staticGet($sender_id);
+	if ($sender) {
+		$recipient_user = User::staticGet('nickname', $nickname);
+		if ($recipient_user) {
+			$recipient = $recipient->getProfile();
+			return '<a href="'.htmlspecialchars($recipient->profileurl).'" class="atlink usertouser">'.$nickname.'</a>';
+		}
+	}
+	# Otherwise, no links. @messages from local users to remote users,
+	# or from remote users to other remote users, are just
+	# outside our ability to make intelligent guesses about
+	return $nickname;
 }
 
 // where should the avatar go for this user?