]> git.mxchange.org Git - quix0rs-gnu-social.git/blobdiff - lib/util.php
use a static rather than a constant for code chars
[quix0rs-gnu-social.git] / lib / util.php
index ab25d74696f36d36faf33bedf955eee103a1246d..d990b8e1f0970973ae2db300d6852ea48293603a 100644 (file)
 
 # Show a server error
 
-function common_server_error($msg) {
-       header('Status: 500 Server Error');
+function common_server_error($msg, $code=500) {
+       static $status = array(500 => 'Internal Server Error',
+                                                  501 => 'Not Implemented',
+                                                  502 => 'Bad Gateway',
+                                                  503 => 'Service Unavailable',
+                                                  504 => 'Gateway Timeout',
+                                                  505 => 'HTTP Version Not Supported');
+
+       if (!array_key_exists($code, $status)) {
+               $code = 500;
+       }
+
+       $status_string = $status[$code];
+
+       header('HTTP/1.1 '.$code.' '.$status_string);
        header('Content-type: text/plain');
 
        print $msg;
+       print "\n";
        exit();
 }
 
 # Show a user error
-function common_user_error($msg, $code=200) {
+function common_user_error($msg, $code=400) {
+       static $status = array(400 => 'Bad Request',
+                                                  401 => 'Unauthorized',
+                                                  402 => 'Payment Required',
+                                                  403 => 'Forbidden',
+                                                  404 => 'Not Found',
+                                                  405 => 'Method Not Allowed',
+                                                  406 => 'Not Acceptable',
+                                                  407 => 'Proxy Authentication Required',
+                                                  408 => 'Request Timeout',
+                                                  409 => 'Conflict',
+                                                  410 => 'Gone',
+                                                  411 => 'Length Required',
+                                                  412 => 'Precondition Failed',
+                                                  413 => 'Request Entity Too Large',
+                                                  414 => 'Request-URI Too Long',
+                                                  415 => 'Unsupported Media Type',
+                                                  416 => 'Requested Range Not Satisfiable',
+                                                  417 => 'Expectation Failed');
+
+       if (!array_key_exists($code, $status)) {
+               $code = 400;
+       }
+
+       $status_string = $status[$code];
+
+       header('HTTP/1.1 '.$code.' '.$status_string);
+
        common_show_header('Error');
        common_element('div', array('class' => 'error'), $msg);
        common_show_footer();
@@ -82,10 +123,24 @@ function common_end_xml() {
        $xw->flush();
 }
 
-function common_show_header($pagetitle, $callable=NULL, $data=NULL) {
+define('PAGE_TYPE_PREFS', 'application/xhtml+xml,text/html;q=0.7,application/xml;q=0.3,text/xml;q=0.2');
+
+function common_show_header($pagetitle, $callable=NULL, $data=NULL, $headercall=NULL) {
        global $config, $xw;
 
-       header('Content-Type: application/xhtml+xml');
+       $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_client_error(_t('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',
@@ -102,16 +157,20 @@ function common_show_header($pagetitle, $callable=NULL, $data=NULL) {
                                   $pagetitle . " - " . $config['site']['name']);
        common_element('link', array('rel' => 'stylesheet',
                                                                 'type' => 'text/css',
-                                                                'href' => $config['site']['path'] . 'theme/default/style/html.css',
+                                                                'href' => theme_path('display.css'),
                                                                 'media' => 'screen, projection, tv'));
-       common_element('link', array('rel' => 'stylesheet',
-                                                                'type' => 'text/css',
-                                                                'href' => $config['site']['path'] . 'theme/default/style/layout.css',
-                                                                'media' => 'screen, projection, tv'));
-       common_element('link', array('rel' => 'stylesheet',
-                                                                'type' => 'text/css',
-                                                                'href' => $config['site']['path'] . 'theme/default/style/print.css',
-                                                                'media' => 'print'));
+       foreach (array(6,7) as $ver) {
+               if (file_exists(theme_file('ie'.$ver.'.css'))) {
+                       # Yes, IE people should be put in jail.
+                       $xw->writeComment('[if lte IE '.$ver.']><link rel="stylesheet" type="text/css" '.
+                                                         'href="'.theme_path('ie'.$ver.'.css').' /><![endif]');
+               }
+       }
+
+       common_element('script', array('type' => 'text/javascript',
+                                                                  'src' => common_path('js/jquery.min.js')),
+                                  ' ');
+
        if ($callable) {
                if ($data) {
                        call_user_func($callable, $data);
@@ -121,23 +180,64 @@ function common_show_header($pagetitle, $callable=NULL, $data=NULL) {
        }
        common_element_end('head');
        common_element_start('body');
-       common_element_start('div', array('id' => 'wrapper'));
-       common_element_start('div', array('id' => 'content'));
+       common_element_start('div', array('id' => 'wrap'));
        common_element_start('div', array('id' => 'header'));
-       common_element('h1', 'title', $pagetitle);
-       common_element('h2', 'subtitle', $config['site']['name']);
+       common_nav_menu();
+       if ((is_string($config['site']['logo']) && (strlen($config['site']['logo']) > 0))
+               || file_exists(theme_file('logo.png')))
+       {
+               common_element_start('a', array('href' => common_local_url('public')));
+               common_element('img', array('src' => ($config['site']['logo']) ?
+                                                                       ($config['site']['logo']) : theme_path('logo.png'),
+                                                                       'alt' => $config['site']['name'],
+                                                                       'id' => 'logo'));
+               common_element_end('a');
+       } else {
+               common_element_start('p', array('id' => 'branding'));
+               common_element('a', array('href' => common_local_url('public')),
+                                          $config['site']['name']);
+               common_element_end('p');
+       }
+
+       common_element('h1', 'pagetitle', $pagetitle);
+
+       if ($headercall) {
+               if ($data) {
+                       call_user_func($headercall, $data);
+               } else {
+                       call_user_func($headercall);
+               }
+       }
        common_element_end('div');
-       common_head_menu();
-       common_element_start('div', array('id' => 'page'));
+       common_element_start('div', array('id' => 'content'));
 }
 
 function common_show_footer() {
        global $xw, $config;
-       common_element_start('div', 'footer');
+       common_element_end('div'); # content div
        common_foot_menu();
-       common_license_block();
-       common_element_end('div');
-       common_element_end('div');
+       common_element_start('div', array('id' => 'footer'));
+       common_element_start('p', 'laconica');
+       common_text(_t('This site is running the '));
+       common_element('a', array('class' => 'software',
+                                                         href => 'http://laconi.ca/'),
+                                  'Laconica');
+       common_text(_t('microblogging tool, version ' . LACONICA_VERSION . ', available under the '));
+       common_element('a', array(href => 'http://www.fsf.org/licensing/licenses/agpl-3.0.html'),
+                                  'GNU Affero General Public License');
+       common_text(_t('.'));
+       common_element_end('p');
+       common_element('img', array('id' => 'cc',
+                                                               'src' => $config['license']['image'],
+                                                               'alt' => $config['license']['title']));
+       common_element_start('p');
+       common_text(_t('Unless otherwise specified, contents of this site are copyright by the contributors and available under the '));
+       common_element('a', array('class' => 'license',
+                                                         'rel' => 'license',
+                                                         href => $config['license']['url']),
+                                  $config['license']['title']);
+       common_text(_t('. Contributors should be attributed by full name or nickname.'));
+       common_element_end('p');
        common_element_end('div');
        common_element_end('div');
        common_element_end('body');
@@ -150,59 +250,38 @@ function common_text($txt) {
        $xw->text($txt);
 }
 
-function common_license_block() {
-       global $config, $xw;
-       common_element_start('p', 'license');
-       common_element_start('span', 'floatLeft width25');
-       common_element_start('a', array('class' => 'license',
-                                                                       'rel' => 'license',
-                                                                       href => $config['license']['url']));
-       common_element('img', array('class' => 'license',
-                                                               'src' => $config['license']['image'],
-                                                               'alt' => $config['license']['title']));
-       common_element_end('a');
-       common_element_end('span');
-       common_element_start('span', 'floatRight width75');
-       common_text(_t('Unless otherwise specified, contents of this site are copyright by the contributors and available under the '));
-       common_element('a', array('class' => 'license',
-                                                         'rel' => 'license',
-                                                         href => $config['license']['url']),
-                                  $config['license']['title']);
-       common_text(_t('. Contributors should be attributed by full name or nickname.'));
-       common_element_end('span');
-       common_element_end('p');
+function common_raw($xml) {
+       global $xw;
+       $xw->writeRaw($xml);
 }
 
-function common_head_menu() {
+function common_nav_menu() {
        $user = common_current_user();
-       common_element_start('ul', array('id' => 'menu', 'class' => ($user) ? 'five' : 'three'));
-       common_menu_item(common_local_url('public'), _t('Public'));
+       common_element_start('ul', array('id' => 'nav'));
        if ($user) {
-               common_menu_item(common_local_url('all', array('nickname' =>
-                                                                                                          $user->nickname)),
+               common_menu_item(common_local_url('all', array('nickname' => $user->nickname)),
                                                 _t('Home'));
-               common_menu_item(common_local_url('showstream', array('nickname' =>
-                                                                                                                         $user->nickname)),
-                                                _t('Profile'),  $user->fullname || $user->nickname);
+       }
+       common_menu_item(common_local_url('public'), _t('Public'));
+       common_menu_item(common_local_url('doc', array('title' => 'help')),
+                                        _t('Help'));
+       if ($user) {
                common_menu_item(common_local_url('profilesettings'),
                                                 _t('Settings'));
                common_menu_item(common_local_url('logout'),
                                                 _t('Logout'));
        } else {
-               common_menu_item(common_local_url('login'),
-                                                _t('Login'));
-               common_menu_item(common_local_url('register'),
-                                                _t('Register'));
+               common_menu_item(common_local_url('login'), _t('Login'));
+               common_menu_item(common_local_url('register'), _t('Register'));
+               common_menu_item(common_local_url('openidlogin'), _t('OpenID'));
        }
        common_element_end('ul');
 }
 
 function common_foot_menu() {
-       common_element_start('ul', 'footmenu menuish');
+       common_element_start('ul', array('id' => 'nav_sub'));
        common_menu_item(common_local_url('doc', array('title' => 'about')),
                                         _t('About'));
-       common_menu_item(common_local_url('doc', array('title' => 'help')),
-                                        _t('Help'));
        common_menu_item(common_local_url('doc', array('title' => 'privacy')),
                                         _t('Privacy'));
        common_menu_item(common_local_url('doc', array('title' => 'source')),
@@ -210,17 +289,21 @@ function common_foot_menu() {
        common_element_end('ul');
 }
 
-function common_menu_item($url, $text, $title=NULL) {
+function common_menu_item($url, $text, $title=NULL, $is_selected=false) {
+       $lattrs = array();
+       if ($is_selected) {
+               $lattrs['class'] = 'current';
+       }
+       common_element_start('li', $lattrs);
        $attrs['href'] = $url;
        if ($title) {
                $attrs['title'] = $title;
        }
-       common_element_start('li', 'menuitem');
        common_element('a', $attrs, $text);
        common_element_end('li');
 }
 
-function common_input($id, $label, $value=NULL) {
+function common_input($id, $label, $value=NULL,$instructions=NULL) {
        common_element_start('p');
        common_element('label', array('for' => $id), $label);
        $attrs = array('name' => $id,
@@ -230,49 +313,61 @@ function common_input($id, $label, $value=NULL) {
                $attrs['value'] = htmlspecialchars($value);
        }
        common_element('input', $attrs);
+       if ($instructions) {
+               common_element('span', 'input_instructions', $instructions);
+       }
        common_element_end('p');
 }
 
-function common_password($id, $label) {
+function common_hidden($id, $value) {
+       common_element('input', array('name' => $id,
+                                                                 'type' => 'hidden',
+                                                                 'id' => $id,
+                                                                 'value' => $value));
+}
+
+function common_password($id, $label, $instructions=NULL) {
        common_element_start('p');
        common_element('label', array('for' => $id), $label);
        $attrs = array('name' => $id,
                                   'type' => 'password',
                                   'id' => $id);
        common_element('input', $attrs);
+       if ($instructions) {
+               common_element('span', 'input_instructions', $instructions);
+       }
        common_element_end('p');
 }
 
 function common_submit($id, $label) {
        global $xw;
        common_element_start('p');
-       common_element_start('label', array('for' => $id));
-       $xw->writeRaw('&nbsp;');
-       common_element_end('label');
        common_element('input', array('type' => 'submit',
                                                                  'id' => $id,
                                                                  'name' => $id,
-                                                                 'value' => $label,
-                                                                 'class' => 'button'));
+                                                                 'class' => 'submit',
+                                                                 'value' => $label));
        common_element_end('p');
 }
 
-function common_textarea($id, $label, $content=NULL) {
+function common_textarea($id, $label, $content=NULL, $instructions=NULL) {
        common_element_start('p');
        common_element('label', array('for' => $id), $label);
        common_element('textarea', array('rows' => 3,
                                                                         'cols' => 40,
                                                                         'name' => $id,
-                                                                        'id' => $id, 
-                                                                        'class' => 'width50'),
+                                                                        'id' => $id),
                                   ($content) ? $content : ' ');
+       if ($instructions) {
+               common_element('span', 'input_instructions', $instructions);
+       }
        common_element_end('p');
 }
 
 # salted, hashed passwords are stored in the DB
 
-function common_munge_password($id, $password) {
-       return md5($id . $password);
+function common_munge_password($password, $id) {
+       return md5($password . $id);
 }
 
 # check if a username exists and has matching password
@@ -320,13 +415,10 @@ function common_set_user($nickname) {
 
 # who is the current user?
 function common_current_user() {
-       static $user = NULL; # FIXME: global memcached
-       if (is_null($user)) {
-               common_ensure_session();
-               $id = $_SESSION['userid'];
-               if ($id) {
-                       $user = User::staticGet($id);
-               }
+       common_ensure_session();
+       $id = $_SESSION['userid'];
+       if ($id) {
+               $user = User::staticGet($id);
        }
        return $user;
 }
@@ -334,7 +426,7 @@ function common_current_user() {
 # get canonical version of nickname for comparison
 function common_canonical_nickname($nickname) {
        # XXX: UTF-8 canonicalization (like combining chars)
-       return $nickname;
+       return strtolower($nickname);
 }
 
 # get canonical version of email for comparison
@@ -344,44 +436,150 @@ 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('@https?://\S+@', '<a href="\0" class="extlink">\0</a>', $r);
+       $r = preg_replace('/(^|\s+)@([a-z0-9]{1,64})/e', "'\\1@'.common_at_link($id, '\\2')", $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) {
+                       return '<a href="'.htmlspecialchars(common_profile_url($nickname)).'" 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?
 
-function common_avatar_filename($user, $extension, $size=NULL, $extra=NULL) {
+function common_avatar_filename($id, $extension, $size=NULL, $extra=NULL) {
        global $config;
 
        if ($size) {
-               return $user->id . '-' . $size . (($extra) ? ('-' . $extra) : '') . $extension;
+               return $id . '-' . $size . (($extra) ? ('-' . $extra) : '') . $extension;
        } else {
-               return $user->id . '-original' . (($extra) ? ('-' . $extra) : '') . $extension;
+               return $id . '-original' . (($extra) ? ('-' . $extra) : '') . $extension;
        }
 }
 
 function common_avatar_path($filename) {
        global $config;
-       return $config['avatar']['directory'] . '/' . $filename;
+       return INSTALLDIR . '/avatar/' . $filename;
 }
 
 function common_avatar_url($filename) {
-       global $config;
-       return "http://".$config['site']['server'].$config['avatar']['path'].'/'.$filename;
+       return common_path('avatar/'.$filename);
 }
 
 function common_default_avatar($size) {
        static $sizenames = array(AVATAR_PROFILE_SIZE => 'profile',
                                                          AVATAR_STREAM_SIZE => 'stream',
                                                          AVATAR_MINI_SIZE => 'mini');
-       global $config;
-       return "http://".$config['site']['server'].$config['site']['path'].'/'.$config['avatar']['default'][$sizenames[$size]];
+       return theme_path('default-avatar-'.$sizenames[$size].'.png');
 }
 
 function common_local_url($action, $args=NULL) {
+       global $config;
+       if ($config['site']['fancy']) {
+               return common_fancy_url($action, $args);
+       } else {
+               return common_simple_url($action, $args);
+       }
+}
+
+function common_fancy_url($action, $args=NULL) {
+       switch (strtolower($action)) {
+        case 'public':
+               if ($args && $args['page']) {
+                       return common_path('?page=' . $args['page']);
+               } else {
+                       return common_path('');
+               }
+        case 'publicrss':
+               return common_path('rss');
+        case 'publicxrds':
+               return common_path('xrds');
+        case 'doc':
+               return common_path('doc/'.$args['title']);
+        case 'login':
+        case 'logout':
+        case 'register':
+        case 'subscribe':
+        case 'unsubscribe':
+               return common_path('main/'.$action);
+        case 'openidlogin':
+               return common_path('main/openid');
+        case 'avatar':
+        case 'password':
+               return common_path('settings/'.$action);
+        case 'profilesettings':
+               return common_path('settings/profile');
+        case 'openidsettings':
+               return common_path('settings/openid');
+        case 'newnotice':
+               return common_path('notice/new');
+        case 'shownotice':
+               return common_path('notice/'.$args['notice']);
+        case 'xrds':
+        case 'foaf':
+               return common_path($args['nickname'].'/'.$action);
+        case 'subscriptions':
+        case 'subscribers':
+        case 'all':
+               if ($args && $args['page']) {
+                       return common_path($args['nickname'].'/'.$action.'?page=' . $args['page']);
+               } else {
+                       return common_path($args['nickname'].'/'.$action);
+               }
+        case 'allrss':
+               return common_path($args['nickname'].'/all/rss');
+        case 'userrss':
+               return common_path($args['nickname'].'/rss');
+        case 'showstream':
+               if ($args && $args['page']) {
+                       return common_path($args['nickname'].'?page=' . $args['page']);
+               } else {
+                       return common_path($args['nickname']);
+               }
+        case 'confirmaddress':
+               return common_path('main/confirmaddress/'.$args['code']);
+        case 'userbyid':
+               return common_path('user/'.$args['id']);
+        default:
+               return common_simple_url($action, $args);
+       }
+}
+
+function common_simple_url($action, $args=NULL) {
        global $config;
        /* XXX: pretty URLs */
        $extra = '';
@@ -390,8 +588,13 @@ function common_local_url($action, $args=NULL) {
                        $extra .= "&${key}=${value}";
                }
        }
+       return common_path("index.php?action=${action}${extra}");
+}
+
+function common_path($relative) {
+       global $config;
        $pathpart = ($config['site']['path']) ? $config['site']['path']."/" : '';
-       return "http://".$config['site']['server'].'/'.$pathpart."index.php?action=${action}${extra}";
+       return "http://".$config['site']['server'].'/'.$pathpart.$relative;
 }
 
 function common_date_string($dt) {
@@ -412,15 +615,32 @@ function common_redirect($url, $code=307) {
                                                   307 => "Temporary Redirect");
        header("Status: ${code} $status[$code]");
        header("Location: $url");
+
+       common_start_xml('a',
+                                        '-//W3C//DTD XHTML 1.0 Strict//EN',
+                                        'http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd');
        common_element('a', array('href' => $url), $url);
+       common_end_xml();
 }
 
-function common_broadcast_notice($notice) {
-       // XXX: broadcast notices to remote subscribers
-       // XXX: broadcast notices to SMS
+function common_broadcast_notice($notice, $remote=false) {
+       // XXX: optionally use a queue system like http://code.google.com/p/microapps/wiki/NQDQ
+       if (!$remote) {
+               # Make sure we have the OMB stuff
+               require_once(INSTALLDIR.'/lib/omb.php');
+               omb_broadcast_remote_subscribers($notice);
+       }
        // XXX: broadcast notices to Jabber
+       // XXX: broadcast notices to SMS
        // XXX: broadcast notices to other IM
-       // XXX: use a queue system like http://code.google.com/p/microapps/wiki/NQDQ
+       return true;
+}
+
+function common_broadcast_profile($profile) {
+       // XXX: optionally use a queue system like http://code.google.com/p/microapps/wiki/NQDQ
+       require_once(INSTALLDIR.'/lib/omb.php');
+       omb_broadcast_profile($profile);
+       // XXX: Other broadcasts...?
        return true;
 }
 
@@ -428,17 +648,35 @@ function common_profile_url($nickname) {
        return common_local_url('showstream', array('nickname' => $nickname));
 }
 
-function common_notice_form() {
-       common_element_start('form', array('id' => 'newnotice', 'method' => 'POST',
+# Don't call if nobody's logged in
+
+function common_notice_form($action=NULL) {
+       $user = common_current_user();
+       assert(!is_null($user));
+       common_element_start('form', array('id' => 'status_form',
+                                                                          'method' => 'POST',
                                                                           'action' => common_local_url('newnotice')));
-       common_textarea('noticecontent', _t('What\'s up?'));
-       common_submit('submit', _t('Send'));
+       common_element_start('p');
+       common_element('label', array('for' => 'status_update',
+                                                                 'id' => 'status_label'),
+                                  _t('What\'s up, ').$user->nickname.'?');
+       common_element('textarea', array('id' => 'status_textarea',
+                                                                        'name' => 'status_textarea'),
+                                  ' ');
+       if ($action) {
+               common_hidden('returnto', $action);
+       }
+       common_element('input', array('id' => 'status_submit',
+                                                                 'name' => 'status_submit',
+                                                                 'type' => 'submit',
+                                                                 'value' => _t('Send')));
+       common_element_end('p');
        common_element_end('form');
 }
 
 function common_mint_tag($extra) {
        global $config;
-       return 
+       return
          'tag:'.$config['tag']['authority'].','.
          $config['tag']['date'].':'.$config['tag']['prefix'].$extra;
 }
@@ -446,9 +684,7 @@ function common_mint_tag($extra) {
 # Should make up a reasonable root URL
 
 function common_root_url() {
-       global $config;
-       $pathpart = ($config['site']['path']) ? $config['site']['path']."/" : '';
-       return "http://".$config['site']['server'].'/'.$pathpart;
+       return common_path('');
 }
 
 # returns $bytes bytes of random data as a hexadecimal string
@@ -483,12 +719,226 @@ function common_mtrand($bytes) {
        return $enc;
 }
 
+function common_set_returnto($url) {
+       common_ensure_session();
+       $_SESSION['returnto'] = $url;
+}
+
+function common_get_returnto() {
+       common_ensure_session();
+       return $_SESSION['returnto'];
+}
+
 function common_timestamp() {
        return date('YmdHis');
 }
-       
+
 // XXX: set up gettext
 
 function _t($str) {
        return $str;
 }
+
+function common_ensure_syslog() {
+       static $initialized = false;
+       if (!$initialized) {
+               global $config;
+               define_syslog_variables();
+               openlog($config['syslog']['appname'], 0, LOG_USER);
+               $initialized = true;
+       }
+}
+
+function common_log($priority, $msg, $filename=NULL) {
+       common_ensure_syslog();
+       syslog($priority, $msg);
+}
+
+function common_debug($msg, $filename=NULL) {
+       if ($filename) {
+               common_log(LOG_DEBUG, basename($filename).' - '.$msg);
+       } else {
+               common_log(LOG_DEBUG, $msg);
+       }
+}
+
+function common_log_db_error(&$object, $verb, $filename=NULL) {
+       $objstr = common_log_objstring($object);
+       $last_error = &PEAR::getStaticProperty('DB_DataObject','lastError');
+       common_log(LOG_ERROR, $last_error->message . '(' . $verb . ' on ' . $objstr . ')', $filename);
+}
+
+function common_log_objstring(&$object) {
+       if (is_null($object)) {
+               return "NULL";
+       }
+       $arr = $object->toArray();
+       $fields = array();
+       foreach ($arr as $k => $v) {
+               $fields[] = "$k='$v'";
+       }
+       $objstring = $object->tableName() . '[' . implode(',', $fields) . ']';
+       return $objstring;
+}
+
+function common_valid_http_url($url) {
+       return Validate::uri($url, array('allowed_schemes' => array('http', 'https')));
+}
+
+function common_valid_tag($tag) {
+       if (preg_match('/^tag:(.*?),(\d{4}(-\d{2}(-\d{2})?)?):(.*)$/', $tag, $matches)) {
+               return (Validate::email($matches[1]) ||
+                               preg_match('/^([\w-\.]+)$/', $matches[1]));
+       }
+       return false;
+}
+
+# Does a little before-after block for next/prev page
+
+function common_pagination($have_before, $have_after, $page, $action, $args=NULL) {
+
+       if ($have_before || $have_after) {
+               common_element_start('div', array('id' => 'pagination'));
+               common_element_start('ul', array('id' => 'nav_pagination'));
+       }
+
+       if ($have_before) {
+               $pargs = array('page' => $page-1);
+               $newargs = ($args) ? array_merge($args,$pargs) : $pargs;
+
+               common_element_start('li', 'before');
+               common_element('a', array('href' => common_local_url($action, $newargs)),
+                                          _t('« After'));
+               common_element_end('li');
+       }
+
+       if ($have_after) {
+               $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)),
+                                                  _t('Before »'));
+               common_element_end('li');
+       }
+
+       if ($have_before || $have_after) {
+               common_element_end('ul');
+               common_element_end('div');
+       }
+}
+
+/* Following functions are copied from MediaWiki GlobalFunctions.php
+ * and written by Evan Prodromou. */
+
+function common_accept_to_prefs($accept, $def = '*/*') {
+       # No arg means accept anything (per HTTP spec)
+       if(!$accept) {
+               return array($def => 1);
+       }
+
+       $prefs = array();
+
+       $parts = explode(',', $accept);
+
+       foreach($parts as $part) {
+               # FIXME: doesn't deal with params like 'text/html; level=1'
+               @list($value, $qpart) = explode(';', $part);
+               $match = array();
+               if(!isset($qpart)) {
+                       $prefs[$value] = 1;
+               } elseif(preg_match('/q\s*=\s*(\d*\.\d+)/', $qpart, $match)) {
+                       $prefs[$value] = $match[1];
+               }
+       }
+
+       return $prefs;
+}
+
+function common_mime_type_match($type, $avail) {
+       if(array_key_exists($type, $avail)) {
+               return $type;
+       } else {
+               $parts = explode('/', $type);
+               if(array_key_exists($parts[0] . '/*', $avail)) {
+                       return $parts[0] . '/*';
+               } elseif(array_key_exists('*/*', $avail)) {
+                       return '*/*';
+               } else {
+                       return NULL;
+               }
+       }
+}
+
+function common_negotiate_type($cprefs, $sprefs) {
+       $combine = array();
+
+       foreach(array_keys($sprefs) as $type) {
+               $parts = explode('/', $type);
+               if($parts[1] != '*') {
+                       $ckey = common_mime_type_match($type, $cprefs);
+                       if($ckey) {
+                               $combine[$type] = $sprefs[$type] * $cprefs[$ckey];
+                       }
+               }
+       }
+
+       foreach(array_keys($cprefs) as $type) {
+               $parts = explode('/', $type);
+               if($parts[1] != '*' && !array_key_exists($type, $sprefs)) {
+                       $skey = common_mime_type_match($type, $sprefs);
+                       if($skey) {
+                               $combine[$type] = $sprefs[$skey] * $cprefs[$type];
+                       }
+               }
+       }
+
+       $bestq = 0;
+       $besttype = NULL;
+
+       foreach(array_keys($combine) as $type) {
+               if($combine[$type] > $bestq) {
+                       $besttype = $type;
+                       $bestq = $combine[$type];
+               }
+       }
+
+       return $besttype;
+}
+
+function common_config($main, $sub) {
+       global $config;
+       return $config[$main][$sub];
+}
+
+function common_copy_args($from) {
+       $to = array();
+       $strip = get_magic_quotes_gpc();
+       foreach ($from as $k => $v) {
+               $to[$k] = ($strip) ? stripslashes($v) : $v;
+       }
+       return $to;
+}
+
+function common_user_uri(&$user) {
+       return common_local_url('userbyid', array('id' => $user->id));
+}
+
+function common_notice_uri(&$notice) {
+       return common_local_url('shownotice', 
+               array('notice' => $notice->id));
+}
+
+# 36 alphanums - lookalikes (0, O, 1, I) = 32 chars = 5 bits
+
+function common_confirmation_code($bits) {
+       # 36 alphanums - lookalikes (0, O, 1, I) = 32 chars = 5 bits
+       static $codechars = '23456789ABCDEFGHJKLMNPQRSTUVWXYZ';
+       $chars = ceil($bits/5);
+       $code = '';
+       for ($i = 0; $i < $chars; $i++) {
+               # XXX: convert to string and back
+               $num = hexdec(common_good_rand(1));
+               $code .= $codechars[$num%32];
+       }
+       return $code;
+}