]> git.mxchange.org Git - quix0rs-gnu-social.git/blobdiff - lib/util.php
add returnto information to the block form
[quix0rs-gnu-social.git] / lib / util.php
index e958a87babf867b1162fcf66a75f8ad51c46f28c..4d670edcc157a059aa84edcc67247e9529b3fde4 100644 (file)
@@ -114,11 +114,11 @@ function common_element($tag, $attrs=NULL, $content=NULL) {
        common_element_end($tag);
 }
 
-function common_start_xml($doc=NULL, $public=NULL, $system=NULL) {
+function common_start_xml($doc=NULL, $public=NULL, $system=NULL, $indent=true) {
        global $xw;
        $xw = new XMLWriter();
        $xw->openURI('php://output');
-       $xw->setIndent(true);
+       $xw->setIndent($indent);
        $xw->startDocument('1.0', 'UTF-8');
        if ($doc) {
                $xw->writeDTD($doc, $public, $system);
@@ -131,17 +131,24 @@ function common_end_xml() {
        $xw->flush();
 }
 
+function common_init_locale($language=null) {
+    if(!$language) {
+        $language = common_language();
+    }
+    putenv('LANGUAGE='.$language);
+    putenv('LANG='.$language);
+    return setlocale(LC_ALL, $language . ".utf8",
+            $language . ".UTF8",
+            $language . ".utf-8",
+            $language . ".UTF-8",
+            $language);
+}
+
 function common_init_language() {
        mb_internal_encoding('UTF-8');
        $language = common_language();
        # So we don't have to make people install the gettext locales
-       putenv('LANGUAGE='.$language);
-       putenv('LANG='.$language);
-       $locale_set = setlocale(LC_ALL, $language . ".utf8",
-                                                       $language . ".UTF8",
-                                                       $language . ".utf-8",
-                                                       $language . ".UTF-8",
-                                                       $language);
+       $locale_set = common_init_locale($language);
        bindtextdomain("laconica", common_config('site','locale_path'));
        bind_textdomain_codeset("laconica", "UTF-8");
        textdomain("laconica");
@@ -154,11 +161,12 @@ function common_init_language() {
 define('PAGE_TYPE_PREFS', 'text/html,application/xhtml+xml,application/xml;q=0.3,text/xml;q=0.2');
 
 function common_show_header($pagetitle, $callable=NULL, $data=NULL, $headercall=NULL) {
-       
+
        global $config, $xw;
+    global $action; /* XXX: kind of cheating here. */
 
        common_start_html();
-       
+
        common_element_start('head');
        common_element('title', NULL,
                                   $pagetitle . " - " . $config['site']['name']);
@@ -202,7 +210,7 @@ function common_show_header($pagetitle, $callable=NULL, $data=NULL, $headercall=
                }
        }
        common_element_end('head');
-       common_element_start('body');
+       common_element_start('body', $action);
        common_element_start('div', array('id' => 'wrap'));
        common_element_start('div', array('id' => 'header'));
        common_nav_menu();
@@ -235,27 +243,27 @@ function common_show_header($pagetitle, $callable=NULL, $data=NULL, $headercall=
        common_element_start('div', array('id' => 'content'));
 }
 
-function common_start_html($type=NULL) {
-       
+function common_start_html($type=NULL, $indent=true) {
+
        if (!$type) {
                $httpaccept = isset($_SERVER['HTTP_ACCEPT']) ? $_SERVER['HTTP_ACCEPT'] : NULL;
-               
+
                # XXX: allow content negotiation for RDF, RSS, or XRDS
-               
+
                $type = common_negotiate_type(common_accept_to_prefs($httpaccept),
                                                                          common_accept_to_prefs(PAGE_TYPE_PREFS));
-               
+
                if (!$type) {
                        common_user_error(_('This page is not available in a media type you accept'), 406);
                        exit(0);
                }
        }
-       
+
        header('Content-Type: '.$type);
 
        common_start_xml('html',
                                         '-//W3C//DTD XHTML 1.0 Strict//EN',
-                                        'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd');
+                                        'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd', $indent);
 
        # FIXME: correct language for interface
 
@@ -317,7 +325,6 @@ function common_nav_menu() {
                                                 _('Home'));
        }
        common_menu_item(common_local_url('peoplesearch'), _('Search'));
-       common_menu_item(common_local_url('tags'), _('Tags'));
        if ($user) {
                common_menu_item(common_local_url('profilesettings'),
                                                 _('Settings'));
@@ -332,6 +339,8 @@ function common_nav_menu() {
                }
                common_menu_item(common_local_url('openidlogin'), _('OpenID'));
        }
+       common_menu_item(common_local_url('doc', array('title' => 'help')),
+                                        _('Help'));
        common_element_end('ul');
 }
 
@@ -400,9 +409,8 @@ function common_checkbox($id, $label, $checked=false, $instructions=NULL, $value
                $attrs['disabled'] = 'true';
        }
        common_element('input', $attrs);
-       # XXX: use a <label>
        common_text(' ');
-       common_element('span', 'checkbox_label', $label);
+       common_element('label', array('class' => 'checkbox_label', 'for' => $id), $label);
        common_text(' ');
        if ($instructions) {
                common_element('span', 'input_instructions', $instructions);
@@ -556,8 +564,16 @@ function common_ensure_session() {
 # 2) a nickname
 # 3) NULL to clear
 
+# Initialize to false; set to NULL if none found
+
+$_cur = false;
+
 function common_set_user($user) {
+
+    global $_cur;
+
        if (is_null($user) && common_have_session()) {
+        $_cur = NULL;
                unset($_SESSION['userid']);
                return true;
        } else if (is_string($user)) {
@@ -570,7 +586,8 @@ function common_set_user($user) {
        if ($user) {
                common_ensure_session();
                $_SESSION['userid'] = $user->id;
-               return $user;
+        $_cur = $user;
+               return $_cur;
        }
        return false;
 }
@@ -592,7 +609,7 @@ function common_set_cookie($key, $value, $expiration=0) {
 }
 
 define('REMEMBERME', 'rememberme');
-define('REMEMBERME_EXPIRY', 30 * 24 * 60 * 60);
+define('REMEMBERME_EXPIRY', 30 * 24 * 60 * 60); # 30 days
 
 function common_rememberme($user=NULL) {
        if (!$user) {
@@ -602,50 +619,97 @@ function common_rememberme($user=NULL) {
                        return false;
                }
        }
+
        $rm = new Remember_me();
+
        $rm->code = common_good_rand(16);
        $rm->user_id = $user->id;
+
+    # Wrap the insert in some good ol' fashioned transaction code
+
+    $rm->query('BEGIN');
+
        $result = $rm->insert();
+
        if (!$result) {
                common_log_db_error($rm, 'INSERT', __FILE__);
                common_debug('Error adding rememberme record for ' . $user->nickname, __FILE__);
                return false;
-       }
-       common_log(LOG_INFO, 'adding rememberme cookie for ' . $user->nickname);
-       common_set_cookie(REMEMBERME,
-                                         implode(':', array($rm->user_id, $rm->code)),
-                                         time() + REMEMBERME_EXPIRY);
+    }
+
+    $rm->query('COMMIT');
+
+       common_debug('Inserted rememberme record (' . $rm->code . ', ' . $rm->user_id . '); result = ' . $result . '.', __FILE__);
+
+    $cookieval = $rm->user_id . ':' . $rm->code;
+
+       common_log(LOG_INFO, 'adding rememberme cookie "' . $cookieval . '" for ' . $user->nickname);
+
+       common_set_cookie(REMEMBERME, $cookieval, time() + REMEMBERME_EXPIRY);
+
        return true;
 }
 
 function common_remembered_user() {
+
        $user = NULL;
-       # Try to remember
-       $packed = isset($_COOKIE[REMEMBERME]) ? $_COOKIE[REMEMBERME] : '';
-       if ($packed) {
-               list($id, $code) = explode(':', $packed);
-               if ($id && $code) {
-                       $rm = Remember_me::staticGet($code);
-                       if ($rm && ($rm->user_id == $id)) {
-                               $user = User::staticGet($rm->user_id);
-                               if ($user) {
-                                       # successful!
-                                       $result = $rm->delete();
-                                       if (!$result) {
-                                               common_log_db_error($rm, 'DELETE', __FILE__);
-                                               $user = NULL;
-                                       } else {
-                                               common_log(LOG_INFO, 'logging in ' . $user->nickname . ' using rememberme code ' . $rm->code);
-                                               common_set_user($user->nickname);
-                                               common_real_login(false);
-                                               # We issue a new cookie, so they can log in
-                                               # automatically again after this session
-                                               common_rememberme($user);
-                                       }
-                               }
-                       }
-               }
-       }
+
+       $packed = isset($_COOKIE[REMEMBERME]) ? $_COOKIE[REMEMBERME] : NULL;
+
+       if (!$packed) {
+        return NULL;
+    }
+
+    list($id, $code) = explode(':', $packed);
+
+    if (!$id || !$code) {
+        common_log(LOG_WARNING, 'Malformed rememberme cookie: ' . $packed);
+        common_forgetme();
+        return NULL;
+    }
+
+    $rm = Remember_me::staticGet($code);
+
+    if (!$rm) {
+        common_log(LOG_WARNING, 'No such remember code: ' . $code);
+        common_forgetme();
+        return NULL;
+    }
+
+    if ($rm->user_id != $id) {
+        common_log(LOG_WARNING, 'Rememberme code for wrong user: ' . $rm->user_id . ' != ' . $id);
+        common_forgetme();
+        return NULL;
+    }
+
+    $user = User::staticGet($rm->user_id);
+
+    if (!$user) {
+        common_log(LOG_WARNING, 'No such user for rememberme: ' . $rm->user_id);
+        common_forgetme();
+        return NULL;
+    }
+
+       # successful!
+    $result = $rm->delete();
+
+    if (!$result) {
+        common_log_db_error($rm, 'DELETE', __FILE__);
+        common_log(LOG_WARNING, 'Could not delete rememberme: ' . $code);
+        common_forgetme();
+        return NULL;
+    }
+
+    common_log(LOG_INFO, 'logging in ' . $user->nickname . ' using rememberme code ' . $rm->code);
+
+    common_set_user($user);
+    common_real_login(false);
+
+    # We issue a new cookie, so they can log in
+    # automatically again after this session
+
+    common_rememberme($user);
+
        return $user;
 }
 
@@ -657,23 +721,31 @@ function common_forgetme() {
 
 # who is the current user?
 function common_current_user() {
-       if (isset($_REQUEST[session_name()]) || (isset($_SESSION['userid']) && $_SESSION['userid'])) {
-               common_ensure_session();
-               $id = isset($_SESSION['userid']) ? $_SESSION['userid'] : false;
-               if ($id) {
-                       # note: this should cache
-                       $user = User::staticGet($id);
-                       return $user;
-               }
-       }
-       # that didn't work; try to remember
-       $user = common_remembered_user();
-       if ($user) {
-               common_debug("Got User " . $user->nickname);
-           common_debug("Faking session on remembered user");
-           $_SESSION['userid'] = $user->id;
-       }
-       return $user;
+    global $_cur;
+
+    if ($_cur === false) {
+
+        if (isset($_REQUEST[session_name()]) || (isset($_SESSION['userid']) && $_SESSION['userid'])) {
+            common_ensure_session();
+            $id = isset($_SESSION['userid']) ? $_SESSION['userid'] : false;
+            if ($id) {
+                $_cur = User::staticGet($id);
+                return $_cur;
+            }
+        }
+
+        # that didn't work; try to remember; will init $_cur to NULL on failure
+        $_cur = common_remembered_user();
+
+        if ($_cur) {
+            common_debug("Got User " . $_cur->nickname);
+            common_debug("Faking session on remembered user");
+            # XXX: Is this necessary?
+            $_SESSION['userid'] = $_cur->id;
+        }
+    }
+
+       return $_cur;
 }
 
 # Logins that are 'remembered' aren't 'real' -- they're subject to
@@ -709,6 +781,7 @@ function common_render_content($text, $notice) {
        $id = $notice->profile_id;
        $r = preg_replace('/(^|\s+)@([A-Za-z0-9]{1,64})/e', "'\\1@'.common_at_link($id, '\\2')", $r);
        $r = preg_replace('/^T ([A-Z0-9]{1,64}) /e', "'T '.common_at_link($id, '\\1').' '", $r);
+       $r = preg_replace('/(^|\s+)@#([A-Za-z0-9]{1,64})/e', "'\\1@#'.common_at_hash_link($id, '\\2')", $r);
        return $r;
 }
 
@@ -752,11 +825,17 @@ function common_render_uri_thingy($matches) {
                $title = " title='$longurl'";
        }
        else $title = '';
-       
+
        return '<a href="' . $uri . '"' . $title . ' class="extlink">' . $uri . '</a>' . $trailer;
 }
 
-function common_longurl($uri)  {
+function common_longurl($short_url)  {
+    $long_url = common_shorten_link($short_url, true);
+    if ($long_url === $short_url) return false;
+    return $long_url;
+}
+
+function common_longurl2($uri)  {
        $uri_e = urlencode($uri);
        $longurl = unserialize(file_get_contents("http://api.longurl.org/v1/expand?format=php&url=$uri_e"));
        if (empty($longurl['long_url']) || $uri === $longurl['long_url']) return false;
@@ -764,73 +843,77 @@ function common_longurl($uri)  {
 }
 
 function common_shorten_links($text) {
+    if (mb_strlen($text) <= 140) return $text;
+    static $cache = array();
+    if (isset($cache[$text])) return $cache[$text];
     // \s = not a horizontal whitespace character (since PHP 5.2.4)
-       // RYM this should prevent * preceded URLs from being processed but it its a char
-//     $r = preg_replace('@[^*](https?://[^)\]>\s]+)@e', "common_shorten_link('\\1')", $r);
-       return preg_replace('@https?://[^)\]>\s]+@e', "common_shorten_link('\\0')", $text);
+       return $cache[$text] = preg_replace('@https?://[^)\]>\s]+@e', "common_shorten_link('\\0')", $text);
 }
 
-function common_shorten_link($long_url) {
-       
+function common_shorten_link($url, $reverse = false) {
+       static $url_cache = array();
+    if ($reverse) return isset($url_cache[$url]) ? $url_cache[$url] : $url;
+
        $user = common_current_user();
-       
+
        $curlh = curl_init();
        curl_setopt($curlh, CURLOPT_CONNECTTIMEOUT, 20); // # seconds to wait
        curl_setopt($curlh, CURLOPT_USERAGENT, 'Laconica');
        curl_setopt($curlh, CURLOPT_RETURNTRANSFER, true);
-       
+
        switch($user->urlshorteningservice) {
         case 'ur1.ca':
             $short_url_service = new LilUrl;
-            $short_url = $short_url_service->shorten($long_url);
+            $short_url = $short_url_service->shorten($url);
             break;
-            
+
         case '2tu.us':
             $short_url_service = new TightUrl;
-            $short_url = $short_url_service->shorten($long_url);
+            $short_url = $short_url_service->shorten($url);
             break;
-            
+
         case 'ptiturl.com':
             $short_url_service = new PtitUrl;
-            $short_url = $short_url_service->shorten($long_url);
+            $short_url = $short_url_service->shorten($url);
             break;
 
         case 'bit.ly':
-                       curl_setopt($curlh, CURLOPT_URL, 'http://bit.ly/api?method=shorten&long_url='.urlencode($long_url));
+                       curl_setopt($curlh, CURLOPT_URL, 'http://bit.ly/api?method=shorten&long_url='.urlencode($url));
                        $short_url = current(json_decode(curl_exec($curlh))->results)->hashUrl;
             break;
 
                case 'is.gd':
-                       curl_setopt($curlh, CURLOPT_URL, 'http://is.gd/api.php?longurl='.urlencode($long_url));
+                       curl_setopt($curlh, CURLOPT_URL, 'http://is.gd/api.php?longurl='.urlencode($url));
                        $short_url = curl_exec($curlh);
                        break;
                case 'snipr.com':
-                       curl_setopt($curlh, CURLOPT_URL, 'http://snipr.com/site/snip?r=simple&link='.urlencode($long_url));
+                       curl_setopt($curlh, CURLOPT_URL, 'http://snipr.com/site/snip?r=simple&link='.urlencode($url));
                        $short_url = curl_exec($curlh);
                        break;
                case 'metamark.net':
-                       curl_setopt($curlh, CURLOPT_URL, 'http://metamark.net/api/rest/simple?long_url='.urlencode($long_url));
+                       curl_setopt($curlh, CURLOPT_URL, 'http://metamark.net/api/rest/simple?long_url='.urlencode($url));
                        $short_url = curl_exec($curlh);
                        break;
                case 'tinyurl.com':
-                       curl_setopt($curlh, CURLOPT_URL, 'http://tinyurl.com/api-create.php?url='.urlencode($long_url));
+                       curl_setopt($curlh, CURLOPT_URL, 'http://tinyurl.com/api-create.php?url='.urlencode($url));
                        $short_url = curl_exec($curlh);
                        break;
                default:
                        $short_url = false;
        }
-       
+
        curl_close($curlh);
-       
+
        if ($short_url) {
-               return $short_url;
+        $url_cache[(string)$short_url] = $url;
+               return (string)$short_url;
        }
-       return $long_url;
+       return $url;
 }
 
 function common_xml_safe_str($str) {
        $xmlStr = htmlentities(iconv('UTF-8', 'UTF-8//IGNORE', $str), ENT_NOQUOTES, 'UTF-8');
-       
+
        // Replace control, formatting, and surrogate characters with '*', ala Twitter
        return preg_replace('/[\p{Cc}\p{Cf}\p{Cs}]/u', '*', $str);
 }
@@ -841,17 +924,37 @@ function common_tag_link($tag) {
        return '<a href="' . htmlspecialchars($url) . '" rel="tag" class="hashlink">' . htmlspecialchars($tag) . '</a>';
 }
 
-function common_canonical_tag($tag) {  
+function common_canonical_tag($tag) {
        return strtolower(str_replace(array('-', '_', '.'), '', $tag));
 }
 
+function common_valid_profile_tag($str) {
+       return preg_match('/^[A-Za-z0-9_\-\.]{1,64}$/', $str);
+}
+
 function common_at_link($sender_id, $nickname) {
        $sender = Profile::staticGet($sender_id);
        $recipient = common_relative_profile($sender, common_canonical_nickname($nickname));
        if ($recipient) {
-               return '<a href="'.htmlspecialchars($recipient->profileurl).'" class="atlink">'.$nickname.'</a>';
+               return '<span class="vcard"><a class="fn nickname url" rel="reply" href="'.htmlspecialchars($recipient->profileurl).'" class="atlink">'.$nickname.'</a></span>';
        } else {
-               return $nickname;
+               return '<span class="vcard"> <span class="fn nickname">'.$nickname.'</span> </span>';
+       }
+}
+
+function common_at_hash_link($sender_id, $tag) {
+       $user = User::staticGet($sender_id);
+       if (!$user) {
+               return $tag;
+       }
+       $tagged = Profile_tag::getTagged($user->id, common_canonical_tag($tag));
+       if ($tagged) {
+               $url = common_local_url('subscriptions',
+                                                               array('nickname' => $user->nickname,
+                                                                         'tag' => $tag));
+               return '<a href="'.htmlspecialchars($url).'" class="atlink">'.$tag.'</a>';
+       } else {
+               return $tag;
        }
 }
 
@@ -948,10 +1051,28 @@ function common_fancy_url($action, $args=NULL) {
                } else {
                        return common_path('');
                }
+        case 'featured':
+               if ($args && isset($args['page'])) {
+                       return common_path('featured?page=' . $args['page']);
+               } else {
+                       return common_path('featured');
+               }
+        case 'favorited':
+               if ($args && isset($args['page'])) {
+                       return common_path('favorited?page=' . $args['page']);
+               } else {
+                       return common_path('favorited');
+               }
         case 'publicrss':
                return common_path('rss');
+        case 'publicatom':
+               return common_path("api/statuses/public_timeline.atom");
         case 'publicxrds':
                return common_path('xrds');
+        case 'featuredrss':
+               return common_path('featuredrss');
+        case 'favoritedrss':
+               return common_path('favoritedrss');
         case 'opensearch':
                 if ($args && $args['type']) {
                         return common_path('opensearch/'.$args['type']);
@@ -960,12 +1081,15 @@ function common_fancy_url($action, $args=NULL) {
                 }
         case 'doc':
                return common_path('doc/'.$args['title']);
+     case 'block':
         case 'login':
         case 'logout':
         case 'subscribe':
         case 'unsubscribe':
         case 'invite':
                return common_path('main/'.$action);
+        case 'tagother':
+               return common_path('main/tagother?id='.$args['id']);
         case 'register':
                if ($args && $args['code']) {
                        return common_path('main/register/'.$args['code']);
@@ -978,6 +1102,8 @@ function common_fancy_url($action, $args=NULL) {
                } else {
                        return common_path('main/remote');
                }
+        case 'nudge':
+               return common_path($args['nickname'].'/nudge');
         case 'openidlogin':
                return common_path('main/openid');
         case 'profilesettings':
@@ -992,6 +1118,8 @@ function common_fancy_url($action, $args=NULL) {
                return common_path('settings/twitter');
         case 'othersettings':
                return common_path('settings/other');
+     case 'deleteprofile':
+        return common_path('settings/delete');
         case 'newnotice':
                if ($args && $args['replyto']) {
                        return common_path('notice/new?replyto='.$args['replyto']);
@@ -1006,11 +1134,10 @@ function common_fancy_url($action, $args=NULL) {
                 } else {
                         return common_path('notice/delete');
                 }
+        case 'microsummary':
         case 'xrds':
         case 'foaf':
                return common_path($args['nickname'].'/'.$action);
-        case 'subscriptions':
-        case 'subscribers':
         case 'all':
         case 'replies':
         case 'inbox':
@@ -1020,11 +1147,27 @@ function common_fancy_url($action, $args=NULL) {
                } else {
                        return common_path($args['nickname'].'/'.$action);
                }
+        case 'subscriptions':
+        case 'subscribers':
+               $nickname = $args['nickname'];
+               unset($args['nickname']);
+               if (isset($args['tag'])) {
+                       $tag = $args['tag'];
+                       unset($args['tag']);
+               }
+               $params = http_build_query($args);
+               if ($params) {
+                       return common_path($nickname.'/'.$action . (($tag) ? '/' . $tag : '') . '?' . $params);
+               } else {
+                       return common_path($nickname.'/'.$action . (($tag) ? '/' . $tag : ''));
+               }
         case 'allrss':
                return common_path($args['nickname'].'/all/rss');
         case 'repliesrss':
                return common_path($args['nickname'].'/replies/rss');
         case 'userrss':
+        if (isset($args['limit']))
+                   return common_path($args['nickname'].'/rss?limit=' . $args['limit']);
                return common_path($args['nickname'].'/rss');
         case 'showstream':
                if ($args && isset($args['page'])) {
@@ -1063,6 +1206,10 @@ function common_fancy_url($action, $args=NULL) {
                        $path = 'tags';
                }
                return common_path($path . (($args) ? ('?' . http_build_query($args)) : ''));
+        case 'peopletag':
+               $path = 'peopletag/' . $args['tag'];
+               unset($args['tag']);
+               return common_path($path . (($args) ? ('?' . http_build_query($args)) : ''));
         case 'tags':
                return common_path('tags' . (($args) ? ('?' . http_build_query($args)) : ''));
         case 'favor':
@@ -1088,19 +1235,19 @@ function common_fancy_url($action, $args=NULL) {
                        switch (strtolower($args['method'])) {
                         case 'user_timeline.rss':
                                return common_path('api/statuses/user_timeline/'.$args['argument'].'.rss');
-                        case 'user_timeline.atom':                             
-                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.rss');
-                        case 'user_timeline.rss':
-                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.rss');
-                        case 'user_timeline.atom':                             
-                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.rss');
+                        case 'user_timeline.atom':
+                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.atom');
+                        case 'user_timeline.json':
+                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.json');
+                        case 'user_timeline.xml':
+                               return common_path('api/statuses/user_timeline/'.$args['argument'].'.xml');
                         default: return common_simple_url($action, $args);
                        }
                 default: return common_simple_url($action, $args);
                }
         case 'sup':
                if ($args && isset($args['seconds'])) {
-                       return common_path('main/sup?seconds='.$args['seconds']);                       
+                       return common_path('main/sup?seconds='.$args['seconds']);
                } else {
                        return common_path('main/sup');
                }
@@ -1225,14 +1372,21 @@ function common_save_replies($notice) {
        }
        # extract all @messages
        $cnt = preg_match_all('/(?:^|\s)@([a-z0-9]{1,64})/', $notice->content, $match);
-       if (!$cnt && !$tname) {
-               return true;
+
+       $names = array();
+
+       if ($cnt || $tname) {
+               # XXX: is there another way to make an array copy?
+               $names = ($tname) ? array_unique(array_merge(array(strtolower($tname)), $match[1])) : array_unique($match[1]);
        }
-       # XXX: is there another way to make an array copy?
-       $names = ($tname) ? array_unique(array_merge(array(strtolower($tname)), $match[1])) : array_unique($match[1]);
+
        $sender = Profile::staticGet($notice->profile_id);
+
+       $replied = array();
+
        # store replied only for first @ (what user/notice what the reply directed,
        # we assume first @ is it)
+
        for ($i=0; $i<count($names); $i++) {
                $nickname = $names[$i];
                $recipient = common_relative_profile($sender, $nickname, $notice->created);
@@ -1248,6 +1402,11 @@ function common_save_replies($notice) {
                                $notice->update($orig);
                        }
                }
+        # Don't save replies from blocked profile to local user
+        $recipient_user = User::staticGet('id', $recipient->id);
+        if ($recipient_user && $recipient_user->hasBlocked($sender)) {
+            continue;
+        }
                $reply = new Reply();
                $reply->notice_id = $notice->id;
                $reply->profile_id = $recipient->id;
@@ -1257,6 +1416,33 @@ function common_save_replies($notice) {
                        common_log(LOG_ERR, 'DB error inserting reply: ' . $last_error->message);
                        common_server_error(sprintf(_('DB error inserting reply: %s'), $last_error->message));
                        return;
+               } else {
+                       $replied[$recipient->id] = 1;
+               }
+       }
+
+       # Hash format replies, too
+       $cnt = preg_match_all('/(?:^|\s)@#([a-z0-9]{1,64})/', $notice->content, $match);
+       if ($cnt) {
+               foreach ($match[1] as $tag) {
+                       $tagged = Profile_tag::getTagged($sender->id, $tag);
+                       foreach ($tagged as $t) {
+                               if (!$replied[$t->id]) {
+                    # Don't save replies from blocked profile to local user
+                    $t_user = User::staticGet('id', $t->id);
+                    if ($t_user && $t_user->hasBlocked($sender)) {
+                        continue;
+                    }
+                                       $reply = new Reply();
+                                       $reply->notice_id = $notice->id;
+                                       $reply->profile_id = $t->id;
+                                       $id = $reply->insert();
+                                       if (!$id) {
+                                               common_log_db_error($reply, 'INSERT', __FILE__);
+                                               return;
+                                       }
+                               }
+                       }
                }
        }
 }
@@ -1264,7 +1450,7 @@ function common_save_replies($notice) {
 function common_broadcast_notice($notice, $remote=false) {
 
        // Check to see if notice should go to Twitter
-       $flink = Foreign_link::getForeignLink($notice->profile_id, 1); // 1 == Twitter
+       $flink = Foreign_link::getByUserID($notice->profile_id, 1); // 1 == Twitter
        if (($flink->noticesync & FOREIGN_NOTICE_SEND) == FOREIGN_NOTICE_SEND) {
 
                // If it's not a Twitter-style reply, or if the user WANTS to send replies...
@@ -1590,7 +1776,7 @@ function common_pagination($have_before, $have_after, $page, $action, $args=NULL
                $newargs = ($args) ? array_merge($args,$pargs) : $pargs;
 
                common_element_start('li', 'before');
-               common_element('a', array('href' => common_local_url($action, $newargs)),
+               common_element('a', array('href' => common_local_url($action, $newargs), 'rel' => 'prev'),
                                           _('« After'));
                common_element_end('li');
        }
@@ -1599,7 +1785,7 @@ function common_pagination($have_before, $have_after, $page, $action, $args=NULL
                $pargs = array('page' => $page+1);
                $newargs = ($args) ? array_merge($args,$pargs) : $pargs;
                common_element_start('li', 'after');
-               common_element('a', array('href' => common_local_url($action, $newargs)),
+               common_element('a', array('href' => common_local_url($action, $newargs), 'rel' => 'next'),
                                                   _('Before »'));
                common_element_end('li');
        }
@@ -1851,7 +2037,7 @@ function common_favor_form($notice) {
                                                                  'id' => 'notice-n'. $notice->id,
                                                                  'class' => 'notice',
                                                                  'value' => $notice->id));
-       
+
        common_element('input', array('type' => 'submit',
                                                                  'id' => 'favor-submit-' . $notice->id,
                                                                  'name' => 'favor-submit-' . $notice->id,
@@ -1861,6 +2047,69 @@ function common_favor_form($notice) {
        common_element_end('form');
 }
 
+function common_nudge_form($profile) {
+       common_element_start('form', array('id' => 'nudge', 'method' => 'post',
+                                                                          'action' => common_local_url('nudge', array('nickname' => $profile->nickname))));
+       common_hidden('token', common_session_token());
+       common_element('input', array('type' => 'submit',
+                                                                 'class' => 'submit',
+                                                                 'value' => _('Send a nudge')));
+       common_element_end('form');
+}
+function common_nudge_response() {
+       common_element('p', array('id' => 'nudge_response'), _('Nudge sent!'));
+}
+
+function common_subscribe_form($profile) {
+       common_element_start('form', array('id' => 'subscribe-' . $profile->id,
+                                                                          'method' => 'post',
+                                                                          'class' => 'subscribe',
+                                                                          'action' => common_local_url('subscribe')));
+       common_hidden('token', common_session_token());
+       common_element('input', array('id' => 'subscribeto-' . $profile->id,
+                                                                 'name' => 'subscribeto',
+                                                                 'type' => 'hidden',
+                                                                 'value' => $profile->id));
+       common_element('input', array('type' => 'submit',
+                                                                 'class' => 'submit',
+                                                                 'value' => _('Subscribe')));
+       common_element_end('form');
+}
+
+function common_unsubscribe_form($profile) {
+       common_element_start('form', array('id' => 'unsubscribe-' . $profile->nickname,
+                                                                          'method' => 'post',
+                                                                          'class' => 'unsubscribe',
+                                                                          'action' => common_local_url('unsubscribe')));
+       common_hidden('token', common_session_token());
+       common_element('input', array('id' => 'unsubscribeto-' . $profile->id,
+                                                                 'name' => 'unsubscribeto',
+                                                                 'type' => 'hidden',
+                                                                 'value' => $profile->id));
+       common_element('input', array('type' => 'submit',
+                                                                 'class' => 'submit',
+                                                                 'value' => _('Unsubscribe')));
+       common_element_end('form');
+}
+
+// XXX: Refactor this code
+function common_profile_new_message_nudge ($cur, $profile) {
+       $user = User::staticGet('id', $profile->id);
+
+       if ($cur && $cur->id != $user->id && $cur->mutuallySubscribed($user)) {
+        common_element_start('li', array('id' => 'profile_send_a_new_message'));
+               common_element('a', array('href' => common_local_url('newmessage', array('to' => $user->id))),
+                                          _('Send a message'));
+        common_element_end('li');
+
+           if ($user->email && $user->emailnotifynudge) {
+            common_element_start('li', array('id' => 'profile_nudge'));
+            common_nudge_form($user);
+            common_element_end('li');
+        }
+       }
+}
+
 function common_cache_key($extra) {
        return 'laconica:' . common_keyize(common_config('site', 'name')) . ':' . $extra;
 }
@@ -1872,41 +2121,41 @@ function common_keyize($str) {
 }
 
 function common_message_form($content, $user, $to) {
-       
+
        common_element_start('form', array('id' => 'message_form',
                                                                           'method' => 'post',
                                                                           'action' => common_local_url('newmessage')));
-       
+
        $mutual_users = $user->mutuallySubscribedUsers();
-       
+
        $mutual = array();
-       
+
        while ($mutual_users->fetch()) {
                if ($mutual_users->id != $user->id) {
                        $mutual[$mutual_users->id] = $mutual_users->nickname;
                }
        }
-       
+
        $mutual_users->free();
        unset($mutual_users);
-       
+
        common_dropdown('to', _('To'), $mutual, NULL, FALSE, $to->id);
-       
+
        common_element_start('p');
-       
+
        common_element('textarea', array('id' => 'message_content',
                                                                         'cols' => 60,
                                                                         'rows' => 3,
                                                                         'name' => 'content'),
                                   ($content) ? $content : '');
-       
+
        common_element('input', array('id' => 'message_send',
                                                                  'name' => 'message_send',
                                                                  'type' => 'submit',
                                                                  'value' => _('Send')));
-       
+
        common_hidden('token', common_session_token());
-       
+
        common_element_end('p');
        common_element_end('form');
 }
@@ -1930,3 +2179,31 @@ function common_memcache() {
                return $cache;
        }
 }
+
+function common_compatible_license($from, $to) {
+       # XXX: better compatibility check needed here!
+       return ($from == $to);
+}
+
+function common_block_form($profile, $args=NULL) {
+    common_element_start('form', array('id' => 'block-' . $profile->id,
+                                       'method' => 'post',
+                                       'class' => 'block',
+                                       'action' => common_local_url('block')));
+    common_hidden('token', common_session_token());
+    common_element('input', array('id' => 'blockto-' . $profile->id,
+                                  'name' => 'blockto',
+                                  'type' => 'hidden',
+                                  'value' => $profile->id));
+    common_element('input', array('type' => 'submit',
+                                  'class' => 'submit',
+                                  'name' => 'block',
+                                  'value' => _('Block')));
+    if ($args) {
+        foreach ($args as $k => $v) {
+            common_hidden('returnto-' . $k, $v);
+        }
+    }
+    common_element_end('form');
+    return;
+}