<?php

// config.inc - main PA 'bootstrap script' - no longer used for configuration!

// To customize your PeopleAggregator, you can override any of the
// variables set in default_config.php by editing project_config.php
// or local_config.php.

//   project_config.php is for things like the site name, which should
//   be shared by all developers on the project.

//   local_config.php is for things like the database password, which
//   are specific to this installation.

define("PA_VERSION", "1.2pre6"); // also in script/version.sh; please also update that when bumping the version number!

// gzip response to user if browser can handle it
//if (!defined("PA_DISABLE_BUFFERING") && substr_count($_SERVER['HTTP_ACCEPT_ENCODING'], "gzip")) ob_start("ob_gzhandler");

// The PA class stores certain globals - critical things which affect every page.
// Less 'global' configuration items should be member variables of $_PA (see below).
class PA {
  // Site name
  public static $site_name;
  // UI language
  public static $language;

  // Naming convention:
  // - $something_{path|url}: absolute path (e.g. /var/www/...../homepage.php) or URL (e.g. http://example.com/foobar/web/homepage.php)
  // - $something_local_url: URL relative to web root (e.g. /foobar/web/homepage.php)
  // - $something_rel_url: URL relative to web folder (e.g. homepage.php)
  public static $path; // absolute path to the root of the site files (web/..); same as $path_prefix
  public static $url; // absolute url of the web subdirectory; same as $base_url
  public static $local_url; // relative url of the web subdirectory; same as BASE_URL_REL (relative to root of url)
  public static $upload_path; // absolute path to web/files directory; same as $uploaddir - DEPRECATED; use Storage functions instead!
  public static $theme_url; // absolute url to web/Themes/Beta directory; same as $current_theme_path
  public static $theme_rel_url; // relative url to web/Themes/Beta directory; same as $current_theme_rel_path (relative to web directory)
  public static $domain_suffix = FALSE; // copy of $domain_suffix from local_config.php

  // current network
  public static $network_info = NULL; // Network object for current network

  // logged-in user
  public static $login_uid = NULL; // uid of logged-in users
  public static $login_user = NULL; // User object for logged-in user
  // user specified on the url
  public static $page_uid = NULL; // uid specified in 'uid' (user_id) or 'user' (login_name) on the query string (if valid)
  public static $page_user = NULL; // User object corresponding to $page_uid
  // user specified on the url, or logged-in user if no user specified
  public static $uid = NULL;
  public static $user = NULL;
}

// create catch-all global into which scripts can stuff things later.
global $_PA;
$_PA = new PA;

// some things need to be global as libraries are sometimes included
// within templates, which execute in function context.
global $path_prefix, $base_url, $peepagg_dsn, $domain_suffix;

// work out where we have been installed
$path_prefix = PA::$path = realpath(dirname(__FILE__));

// pull in constants that we might need during configuration
require_once "$path_prefix/web/includes/constants.php";

// include default (factory) configuration plus project-specific modifications
require_once "$path_prefix/default_config.php";
require_once "$path_prefix/project_config.php";

$uploaddir = PA::$upload_path = "$path_prefix/web/files/"; // DEPRECATED

// find include_path separator
define("WINDOWS", (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN'));
define("INCLUDE_PATH_SEP", WINDOWS ? ";" : ":");

// allow including PEAR functions
ini_set('include_path', ini_get('include_path') . INCLUDE_PATH_SEP . dirname(__FILE__).'/ext');

define('DEFAULT_DIRECTORY','pa');

//mime type of file is checked from the file /etc/mime.types
//if its not working then just to simple upload
//set it to 0 if image upload shows an error of mime type
global $global_form_data, $global_form_error;
$global_form_data = array();
$global_form_error = array();

define('CHECK_MIME_TYPE',1);

define ('SITE_UNDER_MAINTAINENCE',0);//set it to 1 if you want to redirect to maintainence page always

/* timing */

$pa_page_render_start = microtime(TRUE);
function pa_end_of_page_ob_filter($html) {
  // if headers not sent yet, and we don't have a content type specified, send text/html; charset=UTF-8
  if (!headers_sent()) {
    $ct_sent = FALSE;
    foreach (headers_list() as $hdr) {
      if (preg_match("/^Content-Type:/", $hdr)) {
	$ct_sent = TRUE;
      }
    }
    if (!$ct_sent) {
      header("Content-Type: text/html; charset=UTF-8");
    }
  }

  // work out timing
  global $pa_page_render_start;
  $duration = microtime(TRUE) - $pa_page_render_start;
  $eop_text = sprintf("[%.2f s]", $duration);

  global $debug_show_svn_version;
  if ($debug_show_svn_version) {
    // show svn version at the bottom of each page
    global $path_prefix;
    $entries_fn = "$path_prefix/.svn/entries";
    $svn_text = 'svn?';
    if (file_exists($entries_fn)) {
      $f = fopen($entries_fn, "rt");
      $line = trim(fgets($f));
      if (preg_match("/^<"."\?xml/", $line)) {
	// pre v1.4 svn entries file
	$dom = new DOMDocument;
	@$dom->load($entries_fn);
	$xp = new DOMXPath($dom);
	$xp->registerNamespace("svn", "svn:");
	$entries = $xp->query("//svn:entry[1]");
	if ($entries->length) {
	  $entry = $entries->item(0);
	  $url = $xp->query("@url", $entry)->item(0)->nodeValue;
	  $rev = $xp->query("@revision", $entry)->item(0)->nodeValue;
	  $svn_text = "<a target='_blank' href='$url'>svn r$rev</a>";
	} else {
	  $svn_text = 'svn xml?';
	}
      } elseif (is_numeric($line)) {
	// post v1.4 entries file?
	fgets($f); fgets($f);
	$rev = trim(fgets($f));
	$url = trim(fgets($f));
	if (is_numeric($rev) && preg_match("/^http/", $url)) {
	  $svn_text = "<a target='_blank' href='$url'>svn r$rev</a>";
	} else $svn_text = 'svn new?';
      } else {
	$svn_text = "svn fmt?";
      }
    }
    $eop_text .= " [$svn_text]";
  }

  // now drop timing and anything else we want to show at the bottom of the page
  return str_replace("<!--**timing**-->", $eop_text, $html);
}
if (!defined("PA_DISABLE_BUFFERING")) {
  ob_start("pa_end_of_page_ob_filter");
}

/* turn off magic quotes as much as possible */

function stripslashes_deep($value) {
  $value = is_array($value) ? array_map('stripslashes_deep', $value) : stripslashes($value);
  return $value;
}

function killslashes() {
  if (defined("SLASHES_KILLED")) return;

  // no magic quotes, thanks!
  set_magic_quotes_runtime(0);
  if (get_magic_quotes_gpc()) {
     $_POST = stripslashes_deep($_POST);
     $_GET = stripslashes_deep($_GET);
     $_REQUEST = stripslashes_deep($_REQUEST);
     $_COOKIE = stripslashes_deep($_COOKIE);
  }

  define("SLASHES_KILLED", TRUE);
}

killslashes();

/* load configuration.

procedure:

1. load local_config.php, or fail if it cannot be found.

2. detect network name and work out $base_url (which contains a
   template parameter in local_config.php).

2. check for a local_config.php (at
   $path_prefix/networks/$network_prefix/local_config.php) for the
   current network, and load that if it exists.

 */

function local_config_error($err) {
  ?>

  <h1>Configuration error</h1>

  <?php echo $err?>

  <p>Here is a sample <code>local_config.php</code> file:</p>

  <?php echo get_sample_local_config()?>

  <?php
  exit;
}

$ls_fn = "$path_prefix/local_config.php";

if (!defined("PEEPAGG_CONFIGURATION")) {
    // Load global local_config.php - as long as we're not currently in the config page
    if (!file_exists($ls_fn))
    {
        ?>
<div style="text-align: center; margin-top: 5em;">

<h1><a href="config/"><img border="0" src="images/palogo_black_bg.jpg" alt="PeopleAggregator"></a></h1>

<p><a href="config/">Click here to set up PeopleAggregator</a>.</p>

</div>

        <?php
        exit;
    //    local_config_error("<p>You need to create a file called $ls_fn to configure PeopleAggregator for your web server.</p>");
    }

    include($ls_fn);
}

// Force beta theme - disable old basic and alpha themes
$current_blockmodule_path = $path_prefix.'/web/BetaBlockModules';
$current_theme_rel_path = PA::$theme_rel_url = "Themes/Beta";

// Make sure that all the vars are set
foreach (array('peepagg_dsn', 'logger_logFile', 'base_url', 'domain_suffix', 'current_theme_rel_path') as $varname)
{
    if (!isset($$varname))
    {
        if (defined("PEEPAGG_CONFIGURATION")) throw new Installation_Failure("Config error - \$$varname should be defined by the config process");
        local_config_error("<p>Your <code>$ls_fn</code> file is missing a declaration for <code>\$$varname</code>.</p>");
    }
}

// Check for deprecated features
foreach (array('config_site_name' => 'PA::$site_name',
	       'peepagg_lang' => 'PA::$language',
	       ) as $oldvar => $newvar) {
    if (isset($$oldvar)) {
	echo "<p>Your local_config.php or project_config.php contains a definition for \$$oldvar (setting it to '".htmlspecialchars($$oldvar)."').  This is deprecated and should be replaced by $newvar.</p><p>e.g. <code>$newvar = '".htmlspecialchars(str_replace("'", "\'", $$oldvar))."';</p>";
	exit;
    }
}

// backward compatibility - remove when these vars are no longer used in the rest of the code
$config_site_name = PA::$site_name;
$peepagg_lang = PA::$language;

if (!$domain_suffix) {
    // spawning disabled
    define("CURRENT_NETWORK_URL_PREFIX", "www");
    define("CURRENT_NETWORK_FSPATH", "$path_prefix/networks/default");
} else {
    // spawning enabled - figure out which network we're on
    PA::$domain_suffix = $domain_suffix;

    // Check that $base_url includes %network_name
    if (strpos($base_url, "%network_name%") === FALSE) {
        local_config_error("<p>Your <code>\$base_url</code> variable needs to include the text <code>%network_name%</code> or spawning will not work.</p>");
    }

    // Make sure $domain_suffix is formatted correctly
    if (preg_match("/^\./", $domain_suffix)) {
        local_config_error("<p>Your <code>\$domain_suffix</code> variable must not start with a period.</p>");
    }

    // Allow sessions to persist across entire domain
    ini_set('session.cookie_domain', $domain_suffix);

    // Now see if this request is for a sub-network, and load its settings if so
    $host = @$_SERVER['SERVER_NAME'];

    if (strrpos($host, $domain_suffix) != strlen($host) - strlen($domain_suffix)) {
	// Something is wrong with $domain_suffix - it's not showing up at the end of $host.
	// (e.g. $host == "www.pa.example.com" and $domain_suffix == "pa.someotherexample.com").
	// Just assume the default network.
	define("CURRENT_NETWORK_URL_PREFIX", "www");
	$network_prefix = "default";
    } else {
	while (1) {
	    $network_prefix = substr($host, 0, strlen($host) - strlen($domain_suffix));
	    $network_prefix = preg_replace("/\.*$/", "", $network_prefix);
	    
	    if (!$network_prefix || $network_prefix == "www") {
		// special case - default network
		define("CURRENT_NETWORK_URL_PREFIX", "www");
		$network_prefix = "default";
	    }
	    
	    $network_folder = "$path_prefix/networks/$network_prefix";
	    if (is_dir($network_folder)) {
		// network exists
		if (!defined("CURRENT_NETWORK_URL_PREFIX")) define("CURRENT_NETWORK_URL_PREFIX", $network_prefix);
		define("CURRENT_NETWORK_FSPATH", $network_folder);
		if (file_exists(CURRENT_NETWORK_FSPATH."/local_config.php")) {
		    // and it has its own config file
		    include(CURRENT_NETWORK_FSPATH."/local_config.php");
		}
		break;
	    }
	    
	    header("HTTP/1.0 404 Not Found");
	    ?><h1>Network not found</h1>

<p>Unable to locate network <code><b><?php echo htmlspecialchars($network_prefix) ?></b>.<?php echo $domain_suffix ?></code>.</p>

<?php
	    exit;
	}
    }
}

// at this point, all local_config.php files have been included, so we
// can start to work with the variables they define.

// put network prefix in $base_url
$base_url_pa = str_replace("%network_name%", 'www', $base_url);
$base_url = PA::$url = str_replace("%network_name%", CURRENT_NETWORK_URL_PREFIX, $base_url);

// now we are done with $base_url - it gets define()d and we work out
// the relative version (for ajax)
define("BASE_URL_PA", $base_url_pa);
define("BASE_URL", $base_url);
$base_url_parts = parse_url($base_url);
PA::$local_url = preg_replace("|/$|", "", @$base_url_parts['path'] ? $base_url_parts['path'] : "");
define("BASE_URL_REL", PA::$local_url);

// figure out CURRENT_DB.
if (preg_match("/\/([^\/]*)$/", $peepagg_dsn, $m)) {
    if (defined("CURRENT_DB")) {
        ?><h1>CURRENT_DB should not be defined in local_config.php.</h1>

<p>Please edit <code>local_config.php</code> and remove the line that looks like this:</p>

<pre><code>define("CURRENT_DB", "<?php echo htmlspecialchars(CURRENT_DB)?>");</code></pre>
<?php
        exit;
    }
    define("CURRENT_DB", $m[1]);
} else {
?><h1>Can't parse $peepagg_dsn</h1>

<p>I can't find a database name in here: <code><?php echo htmlspecialchars($peepagg_dsn) ?></code>.</p>

<?php
    exit;
}

// work out theme path and check that it exists
$current_theme_path = PA::$theme_url = "$base_url/$current_theme_rel_path";
define("CURRENT_THEME_REL_URL", BASE_URL_REL."/$current_theme_rel_path");
define("CURRENT_THEME_FSPATH", "$path_prefix/web/$current_theme_rel_path");
define("CURRENT_THEME_FS_CACHE_PATH", "$path_prefix/web/cache");

if (!file_exists(CURRENT_THEME_FSPATH))
{
  ?>

<h1>Configuration error</h1>

<p>The <code>$current_theme_rel_path</code> variable (set to <?php echo $current_theme_rel_path ?>) seems to be incorrect.  The current setting indicates that the theme directory should be accessible at <?php echo CURRENT_THEME_FSPATH ?> or <a href="<?php echo $current_theme_path; ?>"><?php echo $current_theme_path; ?></a>, but it doesn't seem to be.</p><!-- ' -->

<p>Check your local_config.php file.</p>

  <?php
  exit;
}


function get_sample_local_config()
{
    // figure out path to the web directory
    $fn = $_SERVER['SCRIPT_FILENAME'];
    $uri = $_SERVER['REQUEST_URI'];

    // figure out domain_suffix
    $domain_bits = explode(".", $_SERVER['SERVER_NAME']);
    if (count($domain_bits) > 1) {
        array_shift($domain_bits);
    }
    $domain_suffix = implode(".", $domain_bits);

    $base_url = "http://%network_name%.$domain_suffix";

    for ($tries = 0; ($tries < 100) && (strpos($fn, "/web") !== FALSE); ++$tries) {
        if (strrpos($fn, "/web") == strlen($fn) - 4) {
            $uri = rtrim($uri, "/");
            $base_url .= $uri;
            break;
        }
        $fn = dirname($fn);
        $uri = dirname($uri);
    }

    // format results as a local_config.php file
    return '<pre>&lt;?php

// database connection string
$peepagg_dsn = "mysql://user:password@server/databasename";

// where to log messages and errors.  note that this file must be writeable by the web server.
$logger_logFile = "$path_prefix/log/pa.log";

// url of the "web" directory
$base_url = "'.$base_url.'";

// the constant part of the domain (such that if we chop this off the server name, we should get the network name).
$domain_suffix = "'.$domain_suffix.'";

?&gt;</pre>

<p>(except with your own database details).</p>';
}


define('TAG_TYPE_COLLECTION',1);
define('TAG_TYPE_CONTENT',2);
define('DEFAULT_TAG_SOUP_SIZE',1);


// Constants for forums
define('PARENT_TYPE_CATEGORY','category');
define('PARENT_TYPE_COLLECTION','collection');
define('PARENT_TYPE_NEWS','news');
define('PARENT_TYPE_MESSAGE','message');
//.... Constants for forums

define('ALPHA_USERNAME', 'paalpha');
define('ALPHA_PASSWORD', 'paalpha');

// Debug
$debug_for_user = TRUE;

define('SB_DIR_NAME','sb-files');
define('SB_UPLOAD_DIR',"$path_prefix/web/".SB_DIR_NAME);
define('SB_UPLOAD_URL',"$base_url/".SB_DIR_NAME);
define('SB_MC_LOCATION',"$path_prefix/MCdescriptions");

define('DESCRIPTION_LENGTH', 300);
/*  This will set the maximum numbers of characters to be displayed on a line */
define('CHUNK_LENGTH', 26);
define('LONGER_CHUNK_LENGTH', 60);
define('TITLE_LENGTH', 38);
define('GROUP_TITLE_LENGTH', 18);
define('GROUP_TITLE_LENGTH_LONG', 25);
define('COMMENT_LENGTH', 30);
define('NAME_LENGTH', 15);

/*  Array for displaying messages in Community blog & My page . */
$post_type_message = array(
'all'=>array('message' => 'No content published.'),
'blog'=>array('message' => 'No blog posts published.'),
'event'=>array('message' => 'No events published.', 'queryString' => 'sb_mc_type=event/generic'),
'review'=>array('message' => 'No reviews published.', 'queryString' => 'sb_mc_type=review/localservice'),
'people_showcase'=>array('message' => 'No People Showcases published.', 'queryString' => 'sb_mc_type=showcase/person'),
'video'=>array('message' => 'No video published.', 'queryString' => 'sb_mc_type=media/video'),
'audio'=>array('message' => 'No audio published.', 'queryString' => 'sb_mc_type=media/audio'),
'image'=>array('message' => 'No image published.', 'queryString' => 'sb_mc_type=media/image'),
'group_showcase'=>array('message' => 'No Group Showcase published.', 'queryString' => 'sb_mc_type=showcase/group')
);

/*  This array has all the fields in which we will allow the basic html tags  */
$allow_html_in_fields = array(
'description'=>'description',
'/event/description'=>'/event/description',
'/media/description'=>'/media/description',
'/review/description'=>'/review/description',
'/review/subject/activities'=>'/review/subject/activities',
'/review/subject/touristspots'=>'/review/subject/touristspots',
'/review/subject/historiclocations'=>'/review/subject/historiclocations',
'/group/description'=>'/group/description',
'/group/quote'=>'/group/quote',
'/group/principles'=>'/group/principles',
'/showcase/description'=>'/showcase/description',
'/showcase/contributions'=>'/showcase/contributions',
'/showcase/quote'=>'/showcase/quote',
'/showcase/wishlist"'=>'/showcase/wishlist',
'/showcase/movies'=>'/showcase/movies',
'/showcase/books'=>'/showcase/books',
'/showcase/musicians'=>'/showcase/musicians',
'/showcase/food'=>'/showcase/food',
'groupdesc'=>'groupdesc',
'comment'=>'comment',
'body'=>'body'
);

$outputthis_error_message = "You haven't specified any external blogs. Log on to <a href='http://outputthis.org' target='_blank'>OutputThis.org</a> to specify targets";
define('OUTPUTTHIS_ERROR_MESSAGE', $outputthis_error_message);

// Ping Server URL

$ping_server = "$base_url/Ping/ping.php";

//Constant for Ping Server to define the type of activity
define('PA_ACTIVITY_USER_ADDED', 1);
define('PA_ACTIVITY_CONTENT_ADDED', 2);
define('PA_ACTIVITY_GROUP_ADDED', 3);
define('PA_ACTIVITY_NETWORK_ADDED', 4);

// for query count
$query_count_on_page = 0;
$query_count_array = array();


define('FANCY_URL',0);//used to turn on or off the fancy url = now it will display fancy url

// This array has the field names in which HTML tags are allowed.
$tags_allowed_in_fields = 
  array(
    'description'=>true, 
    'groupdesc'=>true, 
    'network_description'=>true,
    'comment'=>true,
    'forum_contents'=>true,
    'ad_script'=>true
    );

// internationalization - load messages
$strings_file = "$path_prefix/web/languages/".PA::$language."/strings.php";
if (file_exists($strings_file)) {
  require_once $strings_file;
} else {
  // Either an invalid language was selected, or one (e.g. English) without a strings.php file.
  $TRANSLATED_STRINGS = array();
}

// translate string $s into the current language (specified by PA::$language, which can be changed in local_config.inc).
function __($s) {
  // If we have a translated string, return it.
  global $TRANSLATED_STRINGS;
  if (isset($TRANSLATED_STRINGS[$s]) && !preg_match("/^\s*$/", $TRANSLATED_STRINGS[$s])) {
    return $TRANSLATED_STRINGS[$s];
  }

  // No string found.
  if (defined("PA_LANG_DEBUG")) {
      return "[$s]";
  }

  // Not debugging - just return English string.
  return $s;
}

// translate string and count into the current language.
/* e.g. _n(";You have %d relations.
1;You have one relation.
0;You have no relations yet!", 42) == "You have 42 relations."
*/
function _n($fmt, $n) {
  $n = (int)$n;

  // See if we have a translated string
  global $TRANSLATED_STRINGS;
  if (isset($TRANSLATED_STRINGS[$fmt]) && !preg_match("/^\s*$/", $TRANSLATED_STRINGS[$fmt])) {
    $fmt = $TRANSLATED_STRINGS[$fmt];
    $show_brackets = FALSE;
  } else {
    // Put square brackets around the response if we are debugging - looking for places to translate or strings that need marking
    $show_brackets = defined("PA_LANG_DEBUG");
  }

  $translation = NULL;
  foreach (preg_split("/\n/", $fmt) as $line) {
    $line = trim($line);
    if (!$line) continue;
    if (!preg_match("/^(\d*)(?:\-(\d+))?;(.*)$/", $line, $m)) throw new PAException(GENERAL_SOME_ERROR, "Invalid line format for _n(): '$line'");
    list(, $first, $last, $txt) = $m;
    if ($first === "") {
      // default, e.g. ;You have %d relations
      $translation = $txt;
    } elseif ($last === "") {
      // exact value, e.g. 1;You have one relation
      if ((int)$first == $n) {
	$translation = $txt;
	break;
      }
    } else {
      // range, e.g. 1-3;You have %d relations - go get some more!
      if ((int)$first <= $n && (int)$last >= $n) {
	$translation = $txt;
	break;
      }
    }
  }
  if (!$translation) throw new PAException(GENERAL_SOME_ERROR, "Couldn't find translation for format '$fmt' and number=$n");
  $ret = sprintf($translation, $n);
  if ($show_brackets) {
    return "[$ret]";
  }
  return $ret;
}

function parse_file_size_string($sz) {
    if (preg_match("/^(\d+)([gmk])$/i", $sz, $m)) {
        $num = (int)$m[1];
        $mult = $m[2];

        switch (strtolower($mult)) {
        case 'g': $num *= 1024; // fallthrough
        case 'm': $num *= 1024; // fallthrough
        case 'k': $num *= 1024;
            break;
        }
        return $num;
    }

    // failed to parse as something like '2M' - just force it to return as an integer
    return (int)$sz;
}

$upload_max_filesize = parse_file_size_string(ini_get("upload_max_filesize"));
foreach ($GLOBALS['file_type_info'] as &$fti) {
    if ($fti['max_file_size'] > $upload_max_filesize) {
        $fti['max_file_size'] = $upload_max_filesize;
    }
}

function format_file_size($sz) {
    $sz = floatval($sz);
    if ($sz > 500*1024*1024) {
        return sprintf("%.dGB", $sz/1073741824.0);
    }
    if ($sz > 500*1024) {
        return sprintf("%.dMB", $sz/1048576.0);
    }
    if ($sz > 1023) {
        return sprintf("%.dKB", $sz/1024.0);
    }
    return sprintf("%d bytes", $sz);
}

?>