+ 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;