+ foreach (self::extractWebfingerIds($text, '@') as $wmatch) {
+ list($target, $pos) = $wmatch;
+ $this->log(LOG_INFO, "Checking webfinger person '$target'");
+ $profile = null;
+ try {
+ $oprofile = Ostatus_profile::ensureWebfinger($target);
+ if (!$oprofile instanceof Ostatus_profile || !$oprofile->isPerson()) {
+ continue;
+ }
+ $profile = $oprofile->localProfile();
+ } catch (OStatusShadowException $e) {
+ // This means we got a local user in the webfinger lookup
+ $profile = $e->profile;
+ } catch (Exception $e) {
+ $this->log(LOG_ERR, "Webfinger check failed: " . $e->getMessage());
+ continue;
+ }
+
+ assert($profile instanceof Profile);
+
+ $displayName = !empty($profile->nickname) && mb_strlen($profile->nickname) < mb_strlen($target)
+ ? $profile->getNickname() // TODO: we could do getBestName() or getFullname() here
+ : $target;
+ $url = $profile->getUri();
+ if (!common_valid_http_url($url)) {
+ $url = $profile->getUrl();
+ }
+ $matches[$pos] = array('mentioned' => array($profile),
+ 'type' => 'mention',
+ 'text' => $displayName,
+ 'position' => $pos,
+ 'length' => mb_strlen($target),
+ 'url' => $url);
+ }
+
+ // Doing groups in a separate routine because webfinger lookups don't work
+ // remotely until everyone updates etc. etc.
+ foreach (self::extractWebfingerIds($text, '!') as $wmatch) {
+ list($target, $pos) = $wmatch;
+ list($target_nickname, $target_hostname) = explode('@', parse_url($target, PHP_URL_PATH));
+ $this->log(LOG_INFO, sprintf('Checking webfinger group %s as user %s on server %s', $target, $target_nickname, $target_hostname));
+
+ $profile = null;
+ if ($target_hostname === mb_strtolower(common_config('site', 'server'))) {
+ try {
+ $profile = Local_group::getKV('nickname', $target_nickname)->getProfile();
+ } catch (NoSuchGroupException $e) {
+ // referenced a local group which does not exist, so not returning it as a mention
+ $this->log(LOG_ERR, "Local group lookup failed: " . _ve($e->getMessage()));
+ continue;
+ }
+ } else {
+ // XXX: Superhacky. Domain name can be incorrectly matched
+ // here. But since users are only members of groups
+ // they trust (of course they are!), the likelihood of
+ // a mention-hijacking is very very low... for now.
+ $possible_groups = new User_group();
+ $possible_groups->nickname = $target_nickname;
+ if (!$possible_groups->find()) {
+ common_debug('No groups at all found with nickname: '._ve($target_nickname));
+ continue;
+ }
+ while ($possible_groups->fetch()) {
+ if (!$sender->isMember($possible_groups)) {
+ continue;
+ }
+ $group_hostname = mb_strtolower(parse_url($possible_groups->mainpage, PHP_URL_HOST));
+ if ($target_hostname === $group_hostname) {
+ common_debug(sprintf('Found group with nick@host (%s@%s) matching %s', _ve($possible_groups->nickname), _ve($group_hostname), _ve($target)));
+ $profile = $possible_groups->getProfile();
+ break;
+ }
+ }
+ $possible_groups->free();
+ if (!$profile instanceof Profile) {
+ common_debug('Found groups with correct nickname but not hostname for: '._ve($target));
+ continue;
+ }
+ }
+
+ assert($profile instanceof Profile);
+
+ $displayName = !empty($profile->nickname) && mb_strlen($profile->nickname) < mb_strlen($target)
+ ? $profile->getNickname() // TODO: we could do getBestName() or getFullname() here
+ : $target;
+ $url = $profile->getUri();
+ if (!common_valid_http_url($url)) {
+ $url = $profile->getUrl();
+ }
+ $matches[$pos] = array('mentioned' => array($profile),
+ 'type' => 'group',
+ 'text' => $displayName,
+ 'position' => $pos,
+ 'length' => mb_strlen($target),
+ 'url' => $url);
+ }
+
+ foreach (self::extractUrlMentions($text) as $wmatch) {
+ list($target, $pos) = $wmatch;
+ $schemes = array('https', 'http');
+ foreach ($schemes as $scheme) {
+ $url = "$scheme://$target";
+ $this->log(LOG_INFO, "Checking profile address '$url'");