boot.php

   1 <?php
   2
   3 set_time_limit(0);
   4
   5 define('EOL', "<br />\r\n");
   6
   7 define('REGISTER_CLOSED',  0);
   8 define('REGISTER_APPROVE', 1);
   9 define('REGISTER_OPEN',    2);
  10
  11 define ( 'DIRECTION_ANY',  0);
  12 define ( 'DIRECTION_IN',   1);
  13 define ( 'DIRECTION_OUT',  2);
  14 define ( 'DIRECTION_BOTH', 3);
  15
  16 if(! class_exists('App')) {
  17 class App {
  18
  19         public  $module_loaded = false;
  20         public  $config;
  21         public  $page;
  22         public  $profile;
  23         public  $user;
  24         public  $cid;
  25         public  $contact;
  26         public  $content;
  27         public  $error = false;
  28         public  $cmd;
  29         public  $argv;
  30         public  $argc;
  31         public  $module;
  32         public  $pager;
  33         private $scheme;
  34         private $hostname;
  35         private $path;
  36         private $db;
  37
  38         function __construct() {
  39
  40                 $this->config = array();
  41                 $this->page = array();
  42                 $this->pager= array();
  43
  44                 $this->scheme = ((isset($_SERVER['HTTPS'])
  45                                 && ($_SERVER['HTTPS'])) ?  'https' : 'http' );
  46                 $this->hostname = str_replace('www.','',
  47                                 $_SERVER['SERVER_NAME']);
  48                 set_include_path("include/$this->hostname"
  49                                 . PATH_SEPARATOR . 'include'
  50                                 . PATH_SEPARATOR . '.' );
  51
  52                 if(substr($_SERVER['QUERY_STRING'],0,2) == "q=")
  53                         $_SERVER['QUERY_STRING'] = substr($_SERVER['QUERY_STRING'],2);
  54                 $this->cmd = trim($_GET['q'],'/');
  55
  56
  57                 $this->argv = explode('/',$this->cmd);
  58                 $this->argc = count($this->argv);
  59                 if((array_key_exists('0',$this->argv)) && strlen($this->argv[0])) {
  60                         $this->module = $this->argv[0];
  61                 }
  62                 else {
  63                         $this->module = 'home';
  64                 }
  65                 $this->pager['page'] = ((x($_GET,'page')) ? $_GET['page'] : 1);
  66                 $this->pager['itemspage'] = 50;
  67                 $this->pager['start'] = ($this->pager['page'] * $this->pager['itemspage']) - $this->pager['itemspage'];
  68                 $this->pager['total'] = 0;
  69         }
  70
  71         function get_baseurl($ssl = false) {
  72
  73                 return (($ssl) ? 'https' : $this->scheme) . "://" . $this->hostname
  74                         . ((isset($this->path) && strlen($this->path))
  75                         ? '/' . $this->path : '' );
  76         }
  77
  78         function set_path($p) {
  79                 $this->path = ltrim(trim($p),'/');
  80         }
  81
  82         function set_pager_total($n) {
  83                 $this->pager['total'] = intval($n);
  84         }
  85         function set_pager_itemspage($n) {
  86                 $this->pager['itemspage'] = intval($n);
  87                 $this->pager['start'] = ($this->pager['page'] * $this->pager['itemspage']) - $this->pager['itemspage'];
  88
  89         }
  90
  91         function init_pagehead() {
  92                 if(file_exists("view/head.tpl"))
  93                         $s = file_get_contents("view/head.tpl");
  94                 $this->page['htmlhead'] = replace_macros($s,array('$baseurl' => $this->get_baseurl()));
  95         }
  96
  97 }}
  98
  99
 100 if(! function_exists('x')) {
 101 function x($s,$k = NULL) {
 102         if($k != NULL) {
 103                 if((is_array($s)) && (array_key_exists($k,$s))) {
 104                         if($s[$k])
 105                                 return (int) 1;
 106                         return (int) 0;
 107                 }
 108                 return false;
 109         }
 110         else {
 111                 if(isset($s)) {
 112                         if($s) {
 113                                 return (int) 1;
 114                         }
 115                         return (int) 0;
 116                 }
 117                 return false;
 118         }
 119 }}
 120
 121 if(! function_exists('system_unavailable')) {
 122 function system_unavailable() {
 123         include('system_unavailable.php');
 124         killme();
 125 }}
 126
 127 if(! function_exists('replace_macros')) {
 128 function replace_macros($s,$r) {
 129
 130         $search = array();
 131         $replace = array();
 132
 133         if(is_array($r) && count($r)) {
 134                 foreach ($r as $k => $v ) {
 135                         $search[] =  $k;
 136                         $replace[] = $v;
 137                 }
 138         }
 139         return str_replace($search,$replace,$s);
 140 }}
 141
 142
 143
 144 if(! function_exists('fetch_url')) {
 145 function fetch_url($url,$binary = false) {
 146         $ch = curl_init($url);
 147         if(! $ch) return false;
 148
 149         curl_setopt($ch, CURLOPT_HEADER, 0);
 150         curl_setopt($ch, CURLOPT_FOLLOWLOCATION,true);
 151         curl_setopt($ch, CURLOPT_MAXREDIRS,8);
 152         curl_setopt($ch, CURLOPT_RETURNTRANSFER,true);
 153         if($binary)
 154                 curl_setopt($ch, CURLOPT_BINARYTRANSFER,1);
 155
 156         $s = curl_exec($ch);
 157         curl_close($ch);
 158         return($s);
 159 }}
 160
 161
 162 if(! function_exists('post_url')) {
 163 function post_url($url,$params) {
 164         $ch = curl_init($url);
 165         if(! $ch) return false;
 166
 167         curl_setopt($ch, CURLOPT_HEADER, 0);
 168         curl_setopt($ch, CURLOPT_FOLLOWLOCATION,true);
 169         curl_setopt($ch, CURLOPT_MAXREDIRS,8);
 170         curl_setopt($ch, CURLOPT_RETURNTRANSFER,true);
 171         curl_setopt($ch, CURLOPT_POST,1);
 172         curl_setopt($ch, CURLOPT_POSTFIELDS,$params);
 173
 174         $s = curl_exec($ch);
 175         curl_close($ch);
 176         return($s);
 177 }}
 178
 179
 180 if(! function_exists('random_string')) {
 181 function random_string() {
 182         return(hash('sha256',uniqid(rand(),true)));
 183 }}
 184
 185 if(! function_exists('notags')) {
 186 function notags($string) {
 187         // protect against :<> with high-bit set
 188         return(str_replace(array("<",">","\xBA","\xBC","\xBE"), array('[',']','','',''), $string));
 189 }}
 190
 191 // The PHP built-in tag escape function has traditionally been buggy
 192 if(! function_exists('escape_tags')) {
 193 function escape_tags($string) {
 194         return(str_replace(
 195                 array('&', '"', "'", '<', '>'),
 196                 array('&amp;', '&quot;', '&#39;', '&lt;', '&gt;'), $string));
 197 }}
 198
 199 if(! function_exists('login')) {
 200 function login($register = false) {
 201         $o = "";
 202         $register_html = (($register) ? file_get_contents("view/register-link.tpl") : "");
 203
 204
 205         if(x($_SESSION,'authenticated')) {
 206                 $o = file_get_contents("view/logout.tpl");
 207         }
 208         else {
 209                 $o = file_get_contents("view/login.tpl");
 210
 211                 $o = replace_macros($o,array('$register_html' => $register_html ));
 212         }
 213         return $o;
 214 }}
 215
 216
 217 if(! function_exists('autoname')) {
 218 function autoname($len) {
 219
 220         $vowels = array('a','a','ai','au','e','e','e','ee','ea','i','ie','o','ou','u');
 221         if(mt_rand(0,5) == 4)
 222                 $vowels[] = 'y';
 223
 224         $cons = array(
 225                         'b','bl','br',
 226                         'c','ch','cl','cr',
 227                         'd','dr',
 228                         'f','fl','fr',
 229                         'g','gh','gl','gr',
 230                         'h',
 231                         'j',
 232                         'k','kh','kl','kr',
 233                         'l',
 234                         'm',
 235                         'n',
 236                         'p','ph','pl','pr',
 237                         'qu',
 238                         'r','rh',
 239                         's','sc','sh','sm','sp','st',
 240                         't','th','tr',
 241                         'v',
 242                         'w','wh',
 243                         'x',
 244                         'z','zh'
 245                         );
 246
 247         $midcons = array('ck','ct','gn','ld','lf','lm','lt','mb','mm', 'mn','mp',
 248                                 'nd','ng','nk','nt','rn','rp','rt');
 249
 250         $noend = array('bl', 'br', 'cl','cr','dr','fl','fr','gl','gr',
 251                                 'kh', 'kl','kr','mn','pl','pr','rh','tr','qu','wh');
 252
 253         $start = mt_rand(0,2);
 254         if($start == 0)
 255                 $table = $vowels;
 256         else
 257                 $table = $cons;
 258
 259         $word = '';
 260
 261         for ($x = 0; $x < $len; $x ++) {
 262                 $r = mt_rand(0,count($table) - 1);
 263                 $word .= $table[$r];
 264
 265                 if($table == $vowels)
 266                         $table = array_merge($cons,$midcons);
 267                 else
 268                         $table = $vowels;
 269
 270         }
 271
 272         $word = substr($word,0,$len);
 273
 274         foreach($noend as $noe) {
 275                 if((strlen($word) > 2) && (substr($word,-2) == $noe)) {
 276                         $word = substr($word,0,-1);
 277                         break;
 278                 }
 279         }
 280         if(substr($word,-1) == 'q')
 281                 $word = substr($word,0,-1);
 282         return $word;
 283 }}
 284
 285 if(! function_exists('killme')) {
 286 function killme() {
 287         session_write_close();
 288         exit;
 289 }}
 290
 291 if(! function_exists('goaway')) {
 292 function goaway($s) {
 293         header("Location: $s");
 294         killme();
 295 }}
 296
 297
 298 if(! function_exists('xml_status')) {
 299 function xml_status($st) {
 300         header( "Content-type: text/xml");
 301         echo '<?xml version="1.0" encoding="UTF-8"?>'."\r\n";
 302         echo "<result><status>$st</status></result>\r\n";
 303         killme();
 304 }}
 305
 306 if(! function_exists('local_user')) {
 307 function local_user() {
 308         if((x($_SESSION,'authenticated')) && (x($_SESSION,'uid')))
 309                 return $_SESSION['uid'];
 310         return false;
 311 }}
 312
 313 if(! function_exists('remote_user')) {
 314 function remote_user() {
 315         if((x($_SESSION,'authenticated')) && (x($_SESSION,'cid')))
 316                 return $_SESSION['cid'];
 317         return false;
 318 }}
 319
 320 function footer(&$a) {
 321
 322         $s = fetch_url("http://fortunemod.com/cookie.php?equal=1");
 323         $a->page['content'] .= "<div class=\"fortune\" >$s</div>";
 324 }
 325
 326 if(! function_exists('notice')) {
 327 function notice($s) {
 328
 329         $_SESSION['sysmsg'] .= $s;
 330
 331 }}
 332
 333
 334 if(! function_exists('xmlify')) {
 335 function xmlify($str) {
 336         $buffer = '';
 337
 338         for($x = 0; $x < strlen($str); $x ++) {
 339                 $char = $str[$x];
 340
 341                 switch( $char ) {
 342
 343                         case "\r" :
 344                                 break;
 345                         case "&" :
 346                                 $buffer .= '&amp;';
 347                                 break;
 348                         case "'" :
 349                                 $buffer .= '&apos;';
 350                                 break;
 351
 352                         case "\"" :
 353                                 $buffer .= '&quot;';
 354                                 break;
 355                         case '<' :
 356                                 $buffer .= '&lt;';
 357                                 break;
 358                         case '>' :
 359                                 $buffer .= '&gt;';
 360                                 break;
 361                         case "\n" :
 362                                 $buffer .= ' ';
 363                                 break;
 364                         default :
 365                                 $buffer .= $char;
 366                                 break;
 367                 }
 368         }
 369         $buffer = trim($buffer);
 370         return($buffer);
 371 }}
 372
 373 function unxmlify($s) {
 374         $ret = str_replace('&amp;','&', $s);
 375         $ret = str_replace(array('&lt;','&gt;','&quot;','&apos;'),array('<','>','"',"'"),$ret);
 376         return $ret;
 377 }
 378
 379 function hex2bin($s) {
 380         return(pack("H*",$s));
 381 }
 382
 383
 384 function paginate(&$a) {
 385         $o = '';
 386         $stripped = ereg_replace("(&page=[0-9]*)","",$_SERVER['QUERY_STRING']);
 387         $stripped = str_replace('q=','',$stripped);
 388         $stripped = trim($stripped,'/');
 389         $url = $a->get_baseurl() . '/' . $stripped;
 390
 391
 392           if($a->pager['total'] > $a->pager['itemspage']) {
 393                 $o .= '<div class="pager">';
 394                 if($a->pager['page'] != 1)
 395                         $o .= '<span class="pager_prev">'."<a href=\"$url".'&page='.($a->pager['page'] - 1).'">prev</a></span> ';
 396
 397                 $o .=  "<span class=\"pager_first\"><a href=\"$url"."&page=1\">first</a></span> ";
 398
 399                 $numpages = $a->pager['total'] / $a->pager['itemspage'];
 400
 401                 $numstart = 1;
 402                 $numstop = $numpages;
 403
 404                 if($numpages > 14) {
 405                         $numstart = (($pagenum > 7) ? ($pagenum - 7) : 1);
 406                         $numstop = (($pagenum > ($numpages - 7)) ? $numpages : ($numstart + 14));
 407                 }
 408
 409                 for($i = $numstart; $i <= $numstop; $i++){
 410                         if($i == $a->pager['page'])
 411                                 $o .= '<span class="pager_current">'.(($i < 10) ? '&nbsp;'.$i : $i);
 412                         else
 413                                 $o .= "<span class=\"pager_n\"><a href=\"$url"."&page=$i\">".(($i < 10) ? '&nbsp;'.$i : $i)."</a>";
 414                         $o .= '</span> ';
 415                 }
 416
 417                 if(($a->pager['total'] % $a->pager['itemspage']) != 0) {
 418                         if($i == $a->pager['page'])
 419                                 $o .= '<span class="pager_current">'.(($i < 10) ? '&nbsp;'.$i : $i);
 420                         else
 421                                 $o .= "<span class=\"pager_n\"><a href=\"$url"."&page=$i\">".(($i < 10) ? '&nbsp;'.$i : $i)."</a>";
 422                         $o .= '</span> ';
 423                 }
 424
 425                 $lastpage = (($numpages > intval($numpages)) ? intval($numpages)+1 : $numpages);
 426                 $o .= "<span class=\"pager_last\"><a href=\"$url"."&page=$lastpage\">last</a></span> ";
 427
 428                 if(($a->pager['total'] - ($a->pager['itemspage'] * $a->pager['page'])) > 0)
 429                         $o .= '<span class="pager_next">'."<a href=\"$url"."&page=".($a->pager['page'] + 1).'">next</a></span>';
 430                 $o .= '</div>'."\r\n";
 431         }
 432         return $o;
 433 }
 434
 435 function expand_acl($s) {
 436
 437         if(strlen($s)) {
 438                 $a = explode('<',$s);
 439                 for($x = 0; $x < count($a); $x ++) {
 440                         $a[$x] = intval(str_replace(array('<','>'),array('',''),$a[$x]));
 441                 }
 442                 return $a;
 443         }
 444         return array();
 445 }