$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');
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('@https?://\S+@', '<a href="\0" class="extlink">\0</a>', $r);
+ $r = preg_replace('/(^|\b)@([\w-]+)($|\b)/e', "'\\1@'.common_at_link($id, '\\2').'\\3'", $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?