david
802479ed64
git-svn-id: https://192.168.0.254/svn/Proyectos.FundacionLQDVI_WebCongresos/trunk@2 94ccb1af-fd9d-d947-8d90-7f70ea60afc8
712 lines
26 KiB
PHP
712 lines
26 KiB
PHP
<?php
|
|
/**
|
|
* @version 2.3
|
|
* @copyright Copyright (C) 2007-2010 Stephen Brandon
|
|
* @license GNU/GPL
|
|
*/
|
|
|
|
// no direct access
|
|
defined('_JEXEC') or die('Restricted access');
|
|
include_once 'changecache.php';
|
|
|
|
class modMetaModHelper
|
|
{
|
|
function version() {
|
|
return modMetaModHelper::versionMajor() . '.' . modMetaModHelper::versionMinor();
|
|
}
|
|
function versionMajor() { return 2; }
|
|
function versionMinor() { return 1; }
|
|
|
|
function locateGeoIPInclude($use_geoip) {
|
|
|
|
// determine which file we are going to import, based on MetaMod parameter
|
|
$geoIPDataFiles = array('','GeoIP.dat','GeoLiteCity.dat','GeoIPCity.dat');
|
|
|
|
$geoip_folders = //MetaModParameters::geoIPFolders();
|
|
array(
|
|
"geoip",
|
|
"administrator".DS."components".DS."com_metatemplate".DS."geoip",
|
|
"GeoIP",
|
|
"geoIP",
|
|
"GEOIP",
|
|
"GEO IP",
|
|
'',
|
|
"geo_ip",
|
|
"geo_IP",
|
|
"Geo_IP"
|
|
);
|
|
$file = '';
|
|
// find the file in any of the standard locations
|
|
foreach ($geoip_folders as $folder) {
|
|
$target = $geoIPDataFiles[$use_geoip];
|
|
$proposed_file = JPATH_SITE.DS.$folder.DS.$target;
|
|
if (is_file($proposed_file) && is_readable($proposed_file)) {
|
|
$file = $proposed_file;
|
|
break;
|
|
}
|
|
}
|
|
return $file;
|
|
}
|
|
|
|
function languages(&$params)
|
|
{
|
|
$debug = trim( $params->get( 'debug', '0' ) );
|
|
$opt_option = trim( $params->get( 'language_option', '0' ) );
|
|
$opt_compare_strict = trim( $params->get( 'language_compare_strict', '1' ) );
|
|
$opt_preferred = trim( $params->get( 'language_preferred', '' ) );
|
|
// for $language_preferred, order doesn't matter. MetaMod will just
|
|
// look through the browser's list of languages one at a time, and
|
|
// use the first one that also appears in $language_preferred.
|
|
|
|
$language = '';
|
|
$language_code = '';
|
|
$language_region = '';
|
|
$languages = explode(",",array_key_exists('HTTP_ACCEPT_LANGUAGE',$_SERVER) ? $_SERVER['HTTP_ACCEPT_LANGUAGE'] : '');
|
|
|
|
|
|
if ($opt_option == 0) {
|
|
// main browser lang
|
|
if (count($languages)) {
|
|
$language = strtolower($languages[0]);
|
|
}
|
|
}
|
|
|
|
if ($opt_option == 1) { // preferred language from list
|
|
// want to go through each of the languages in the browser string, from the 1st one,
|
|
// and see if any of these are in the list that the admin supplied.
|
|
$preferred_languages = explode(",",$opt_preferred);
|
|
for ($i = 0 ; $i < count($preferred_languages); $i++) {
|
|
$preferred_languages[$i] = trim(strtolower( $preferred_languages[$i] ));
|
|
}
|
|
|
|
for ($i = 0 ; $i < count($languages); $i++) {
|
|
// first get rid of ";q=XX" suffixes
|
|
$l = explode( ";", trim(strtolower( $languages[$i] )));
|
|
$try_this = $l[0];
|
|
preg_match("/([a-z]+)-/",$try_this,$try_this_matches);
|
|
if (
|
|
// strict or not strict, both need this
|
|
in_array($try_this, $preferred_languages)
|
|
||
|
|
// if not strict, try the browser "major" type against "preferred" ones
|
|
( !$opt_compare_strict && count($try_this_matches) > 0 && in_array($try_this_matches[1], $preferred_languages) )
|
|
|
|
) {
|
|
$language = $try_this;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
|
|
if ($opt_option == 2) {
|
|
// The language of the Joomla front-end
|
|
$langObj =& JFactory::getLanguage();
|
|
$language = strtolower($langObj->getTag());
|
|
}
|
|
|
|
if ($language != '') {
|
|
preg_match("/([a-z]+)(-([a-z]+))?/",$language,$language_matches);
|
|
$language_code = $language_matches[1];
|
|
if (count($language_matches) > 3) $language_region = $language_matches[3];
|
|
}
|
|
|
|
if ($debug) {
|
|
echo '<i>$language:</i> '.htmlentities($language).'<br>';
|
|
echo '<i>$language_code:</i> '.htmlentities($language_code).'<br>';
|
|
echo '<i>$language_region:</i> '.htmlentities($language_region).'<br>';
|
|
}
|
|
|
|
return array($language,$language_code,$language_region);
|
|
}
|
|
|
|
function move_to_end_of_array( $key, &$array ) {
|
|
if (array_key_exists( $key, $array ) ) {
|
|
$item = $array[$key];
|
|
unset( $array[$key] );
|
|
$array[$key] = $item; /* it will get reversed */
|
|
}
|
|
}
|
|
|
|
function advanced_debug() {
|
|
$gets = $_GET;
|
|
$posts = $_POST;
|
|
//print_r($gets);
|
|
//print_r($posts);
|
|
//print_r($_SERVER);
|
|
$operand = '<span style="color:#0000FF">';
|
|
$color_end = '</span>';
|
|
$var = '<span style="color:rgb(49,132,149)">';
|
|
$constant = '<span style="color:rgb(3,106,7)">';
|
|
|
|
echo '<div style="padding-bottom: 10px;">';
|
|
echo '<b>' . JText::_('Page Identification') . "</b><br />\n";
|
|
|
|
if ( $gets != null ) {
|
|
|
|
echo '<small>';
|
|
echo JText::_('The PHP code below may be used to help MetaMod to identify the exact page that you are viewing. For help using this feature, please see this page');
|
|
echo '</small>';
|
|
|
|
/* make an array of items that were present in _GET, but were *not* present
|
|
* in the original query string. These will be marked as "optional".
|
|
* $_GET often contains extra variables that were not actually passed
|
|
* into the application - they are added by various components etc.
|
|
* We may or may not want to include these extra ones in the rule.
|
|
* Therefore we get a list of the *actual* ones that the user passed
|
|
* in, via the apache server string $_SERVER['QUERY_STRING'].
|
|
* Any that are not on this list get tagged to tell the operator that
|
|
* they may not be required.
|
|
*/
|
|
|
|
$qs_orig = explode( '&', $_SERVER['QUERY_STRING'] );
|
|
$qs = array();
|
|
foreach ( $qs_orig as $q ) {
|
|
$qs[] = ( ( $where = strpos($q, '=') ) === false ) ? $q : substr( $q, 0, $where ) ;
|
|
}
|
|
|
|
$optional = array(); /* this array will hold all the items that were not explicitly requested */
|
|
foreach ( array_keys($gets) as $get) {
|
|
if ( array_search( $get, $qs ) === false
|
|
&& $get != 'option'
|
|
&& $get != 'Itemid'
|
|
&& $get != 'view'
|
|
&& $get != 'id'
|
|
) $optional[] = $get;
|
|
}
|
|
|
|
/* add post data, if the page was a post */
|
|
if ( $posts != null && count($posts) ) {
|
|
$gets = $gets + $posts;
|
|
}
|
|
|
|
/* we always want 'option' to be first in the list, for usability reasons - primarily because
|
|
* we can almost guarantee that it's there every single time.
|
|
*/
|
|
|
|
foreach ( array( 'Itemid','category_id','catid','section_id','sectionid','id','page','view','option') as $key ) {
|
|
modMetaModHelper::move_to_end_of_array ( $key, $gets );
|
|
}
|
|
|
|
$gets = array_reverse( $gets );
|
|
|
|
echo '<div style="background-color: white; color:black; margin:0; padding:2px; background-image:none; font-size:80%; ' .
|
|
'font-family:\'Andale Mono\', \'Courier New\', courier-new, Courier, courier, monospace; border:1px solid #b0b0b0;">';
|
|
echo "{$operand}if{$color_end} ( <br>\n";
|
|
|
|
$first = true;
|
|
$found_optional = false;
|
|
|
|
foreach( array_keys($gets) as $get ) {
|
|
// get rid of common problems with URLs, namely what happens with "%22" in URLs...
|
|
if ( substr( $get, 0, 5 ) == 'quot;' ) continue;
|
|
if ( substr( $get, 0, 3 ) == 'lt;' ) continue;
|
|
if ( substr( $get, 0, 3 ) == 'gt;' ) continue;
|
|
|
|
echo '<div style="padding-left:0.5em">';
|
|
if ( $first ) {
|
|
$first = false;
|
|
} else {
|
|
echo " {$operand}and{$color_end} ";
|
|
}
|
|
$val = JRequest::getVar($get); // put in a var_export here somewhere?
|
|
// $val = str_replace("'", '\\\'', $val); // escape single quotes
|
|
$get = str_replace("'", '\\\'', $get); // escape single quotes
|
|
|
|
if ($get == 'Itemid' or $get == 'option' or $get == 'view' or $get == 'id') {
|
|
echo $var . '$' . htmlentities( $get, ENT_QUOTES, 'UTF-8' ) . $color_end;
|
|
} else {
|
|
echo "JRequest::getVar({$constant}'" . htmlentities( $get, ENT_QUOTES, 'UTF-8' ) . "'{$color_end}) ";
|
|
}
|
|
echo " $operand==$color_end $constant" . htmlentities( var_export( $val, true ), ENT_QUOTES, 'UTF-8' ) . "$color_end ";
|
|
if ( array_search( $get, $optional ) !== false ) {
|
|
echo '/*!*/';
|
|
$found_optional = true;
|
|
}
|
|
echo '</div>';
|
|
}
|
|
echo " ) {$operand}return{$color_end} XXX; <i>/* " . JText::_('replace XXX with the module ID or position to display') . ' */</i>';
|
|
echo '</div>';
|
|
|
|
if ($found_optional) {
|
|
echo '<small><i>' . JText::_( 'OPTIONAL_RULES') . '</i></small>';
|
|
}
|
|
}
|
|
echo '</div>';
|
|
|
|
}
|
|
|
|
function timezone_offset($timestamp,$zone) {
|
|
$old_tz = getenv('TZ');
|
|
putenv("TZ=$zone");
|
|
$offset = date("Z",$timestamp);
|
|
putenv("TZ=$old_tz");
|
|
return $offset;
|
|
}
|
|
|
|
function getUserIP() {
|
|
if ( isset( $_SERVER ) ) {
|
|
if ( isset( $_SERVER["HTTP_X_FORWARDED_FOR"]) ) {
|
|
$ip = $_SERVER["HTTP_X_FORWARDED_FOR"];
|
|
if ( $ip != '' && strtolower($ip) != 'unknown' ) {
|
|
$addresses = explode( ',', $ip);
|
|
return $addresses[ count($addresses) - 1 ];
|
|
}
|
|
}
|
|
|
|
if (isset($_SERVER["HTTP_CLIENT_IP"]) && $_SERVER["HTTP_CLIENT_IP"] != '' )
|
|
return $_SERVER["HTTP_CLIENT_IP"];
|
|
|
|
return $_SERVER["REMOTE_ADDR"];
|
|
}
|
|
|
|
if ( $ip = getenv( 'HTTP_X_FORWARDED_FOR' )) {
|
|
if ( strtolower($ip) != 'unknown' ) {
|
|
$addresses = explode( ',', $ip);
|
|
return $addresses[ count($addresses) - 1 ];
|
|
}
|
|
}
|
|
|
|
if ($ip = getenv('HTTP_CLIENT_IP')) {
|
|
return $ip;
|
|
}
|
|
|
|
return getenv('REMOTE_ADDR');
|
|
}
|
|
|
|
function convertToUtf8( &$geoip ) {
|
|
if ($geoip == null) return;
|
|
$attributes = get_object_vars($geoip);
|
|
foreach($attributes as $key => $value) $geoip->$key = utf8_encode($value);
|
|
}
|
|
|
|
function moduleIdsAndChanges( &$params, $position ) {
|
|
return modMetaModHelper::moduleIds( $params, true, $position );
|
|
}
|
|
|
|
// params: the params of the MetaMod we are expanding
|
|
// doChangeCache: whether to do it or not. WIll only be false if called by legacy (1.0.3) MetaMod Pro.
|
|
// position: the module position that the MetaMod is in. We give it this so we can filter this out
|
|
// of the list of module positions returned (so we don't get an infinite loop of the MetaMod including
|
|
// its own position)
|
|
function moduleIds( &$params, $doChangeCache = false, $position = null )
|
|
{
|
|
global $Itemid;
|
|
$id = JRequest::getVar('id');
|
|
$view = JRequest::getWord('view');
|
|
$option = JRequest::getVar('option');
|
|
|
|
// Retrieve parameters
|
|
$php = trim( $params->get( 'php', '' ) );
|
|
$logged_in_users = intval( $params->get( 'logged_in_users', '0' ) );
|
|
$start_datetime = trim( $params->get( 'start_datetime', '' ) );
|
|
$end_datetime = trim( $params->get( 'end_datetime', '' ) );
|
|
$timezone = trim( $params->get( 'timezone', 'default' ) );
|
|
$use_geoip = intval( $params->get( 'use_geoip', '0' ) );
|
|
$module_ids = trim( $params->get( 'module_ids', '0' ) );
|
|
$debug = trim( $params->get( 'debug', '0' ) );
|
|
|
|
if ($debug == 2) { /* advanced debug */
|
|
modMetaModHelper::advanced_debug();
|
|
}
|
|
|
|
if ($timezone == "default") {
|
|
$config =& JFactory::getConfig();
|
|
$offset = $config->getValue('config.offset') * 3600;
|
|
} else {
|
|
$offset = modMetaModHelper::timezone_offset( time(), $timezone );
|
|
}
|
|
|
|
$now_time = time() + $offset; // can now be compared directly with getData($start_datetime)
|
|
// if you were to print this date, it should print in the locale set up in Joomla
|
|
|
|
if ($debug) {
|
|
echo '<b>' . JText::_('MetaMod debug info:') .'</b><br />';
|
|
echo '<i>$option:</i> '.htmlentities($option).'<br />';
|
|
echo '<i>$view:</i> '.htmlentities($view).'<br />';
|
|
echo '<i>$id:</i> '.htmlentities($id).'<br />';
|
|
echo '<i>$Itemid:</i> '.htmlentities($Itemid).'<br />';
|
|
echo '<i>$timezone:</i> '.htmlentities($timezone).'<br />';
|
|
}
|
|
|
|
// LANGUAGE HANDLING
|
|
list($language,$language_code,$language_region) = modMetaModHelper::languages($params);
|
|
|
|
// START AND END TIMES
|
|
// quit if we're not to start yet
|
|
|
|
if ($start_datetime != '') {
|
|
$then = &JFactory::getDate($start_datetime);
|
|
if ($then->toUnix() > $now_time) {
|
|
if ($debug) {
|
|
echo JText::_('Start date/time has not been reached.') . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ($debug) {
|
|
echo JText::_('Start date/time has been reached.') . '<br />';
|
|
}
|
|
}
|
|
|
|
// quit if we are too late to display this item
|
|
if ($end_datetime != '') {
|
|
$then = &JFactory::getDate($end_datetime);
|
|
if ($then->toUnix() <= $now_time) {
|
|
if ($debug) {
|
|
echo JText::_('End date/time has already passed.') . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ($debug) {
|
|
echo JText::_('End date/time has not passed.') . '<br />';
|
|
}
|
|
}
|
|
|
|
// INCLUDE AND EXCLUDE COUNTRIES, & GEOIP FUNCTIONALITY
|
|
$include_countries = strtoupper(trim( $params->get( 'include_countries', '' ) ));
|
|
$exclude_countries = strtoupper(trim( $params->get( 'exclude_countries', '' ) ));
|
|
|
|
static $geoip = null;
|
|
|
|
$fromCountryId = defined('_GEOIP_FROM_COUNTRY_ID') ? _GEOIP_FROM_COUNTRY_ID : '';
|
|
$fromCountryName = defined('_GEOIP_FROM_COUNTRY_NAME') ? _GEOIP_FROM_COUNTRY_NAME : '';
|
|
|
|
$ip = modMetaModHelper::getUserIP();
|
|
|
|
if ($use_geoip) {
|
|
if ($fromCountryId == '' && $fromCountryName == '' && $geoip == null) {
|
|
|
|
// find the location of the geoip data file, depending on which we are to use
|
|
$include_file = modMetaModHelper::locateGeoIPInclude($use_geoip);
|
|
if ($include_file == null) {
|
|
$use_geoip = 0;
|
|
if ($debug) {
|
|
echo '<b>' . JText::_('ERROR: cannot locate GeoIP data file in any standard location. Disabling GeoIP.') . '</b><br />';
|
|
}
|
|
} else {
|
|
$geoIPFiles = array('','geoip.inc','geoipcity.inc','geoipcity.inc');
|
|
|
|
// grab the appropriate code for whichever geoip stuff we have
|
|
if (!function_exists("geoip_open")) {
|
|
include_once(JPATH_SITE . DS . "modules" . DS . "mod_metamod" . DS . "mod_metamod" . DS . "geoip-php4" . DS . $geoIPFiles[$use_geoip]);
|
|
}
|
|
|
|
// open the data file
|
|
$gi = geoip_open( $include_file, GEOIP_STANDARD );
|
|
|
|
if ($use_geoip == 1) { // GeoIP Country (free or commercial)
|
|
$fromCountryId = utf8_encode(geoip_country_code_by_addr($gi, $ip));
|
|
$fromCountryName = utf8_encode(geoip_country_name_by_addr($gi, $ip));
|
|
} else { // GeoCity or GeoLiteCity
|
|
$geoip = geoip_record_by_addr($gi, $ip);
|
|
modMetaModHelper::convertToUtf8($geoip);
|
|
$fromCountryId = $geoip->country_code;
|
|
$fromCountryName = $geoip->country_name;
|
|
if ($geoip == null && $debug) {
|
|
echo JText::sprintf('No GeoCity info found for %s. Using default country.', htmlentities($ip) ) . '<br />';
|
|
}
|
|
}
|
|
geoip_close( $gi );
|
|
|
|
// set some defaults if necessary (probably can't happen)
|
|
if ($fromCountryId == '') $fromCountryId = "GB";
|
|
if ($fromCountryName == '') $fromCountryName = "United Kingdom";
|
|
// save these away for next time
|
|
define ( "_GEOIP_FROM_COUNTRY_ID", $fromCountryId );
|
|
define ( "_GEOIP_FROM_COUNTRY_NAME", $fromCountryName );
|
|
} // we found the geoip data file
|
|
} // we needed to cache the geoip for the current request
|
|
} // we were told to use a particular variant of GeoIP
|
|
|
|
if (($fromCountryId || $fromCountryName) && $debug) {
|
|
echo "<i>" . JText::_("Country:") ."</i> " .$fromCountryId . "<br />";
|
|
echo "<i>" . JText::_("Country Name:") ."</i> " . $fromCountryName . "<br />";
|
|
}
|
|
|
|
if($geoip && $debug)
|
|
{
|
|
echo "<i>" . JText::_("Country Code 2:") ."</i> " . $geoip->country_code3 . "<br />";
|
|
echo "<i>" . JText::_("Region:") ."</i> " .$geoip->region . "<br />";
|
|
echo "<i>" . JText::_("City:") ."</i> " .$geoip->city . "<br />";
|
|
echo "<i>" . JText::_("Postal Code:") ."</i> " .$geoip->postal_code . "<br />";
|
|
echo "<i>" . JText::_("Latitude:") ."</i> " .$geoip->latitude . "<br />";
|
|
echo "<i>" . JText::_("Longitude:") ."</i> " .$geoip->longitude . "<br />";
|
|
echo "<i>" . JText::_("DMA Code:") ."</i> " .$geoip->dma_code . "<br />";
|
|
echo "<i>" . JText::_("Area Code:") ."</i> " .$geoip->area_code . "<br />";
|
|
}
|
|
|
|
if ( $use_geoip ) {
|
|
if ( strlen( $include_countries ) ) {
|
|
// reject if fromCountryId is not in the list
|
|
if ( strpos( $include_countries, $fromCountryId ) === false) {
|
|
if ( $debug ) {
|
|
echo JText::sprintf('Rejecting: %s is not in include list', $fromCountryId ) . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ( $debug ) {
|
|
echo JText::sprintf('Accepting: %s is in include list', $fromCountryId ) . '<br />';
|
|
}
|
|
}
|
|
if ( strlen( $exclude_countries ) ) {
|
|
// reject if fromCountryId is in the list
|
|
if (! ( strpos( $exclude_countries, $fromCountryId ) === false ) ) {
|
|
if ( $debug ) {
|
|
echo JText::sprintf('Rejecting: %s is in exclude list', $fromCountryId ) . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ( $debug ) {
|
|
echo JText::sprintf('Accepting: %s is not in exclude list', $fromCountryId ) . '<br />';
|
|
}
|
|
}
|
|
}
|
|
|
|
// for access by eval'ed script
|
|
$db =& JFactory::getDBO();
|
|
$user =& JFactory::getUser();
|
|
|
|
// set some useful for access by eval'ed script
|
|
$user_type = strtolower($user->usertype);
|
|
$user_types = array("Public Frontend", "Registered", "Author",
|
|
"Editor", "Publisher", "Manager", "Administrator", "Super Administrator");
|
|
foreach ($user_types as $u) {
|
|
$constant = "MM_USER_" . strtoupper(str_replace(" ","_",$u));
|
|
$constant_not = "MM_USER_NOT_" . strtoupper(str_replace(" ","_",$u));
|
|
if (!defined($constant)) define($constant, ($user_type == strtolower($u)));
|
|
if (!defined($constant_not)) define($constant_not, ($user_type != strtolower($u)));
|
|
}
|
|
|
|
if (!defined("MM_NOT_LOGGED_IN")) define("MM_NOT_LOGGED_IN", ($user->id == 0));
|
|
if (!defined("MM_LOGGED_IN")) define("MM_LOGGED_IN", ! MM_NOT_LOGGED_IN);
|
|
|
|
if (!defined("MM_DAY_OF_WEEK")) define("MM_DAY_OF_WEEK", gmdate("w",$now_time)); // 0=Sunday, 6-Saturday
|
|
if (!defined("MM_DAY_OF_MONTH")) define("MM_DAY_OF_MONTH", gmdate("j",$now_time)); // 1-31
|
|
if (!defined("MM_MONTH")) define("MM_MONTH", gmdate("n",$now_time)); // 1-12
|
|
if (!defined("MM_YEAR")) define("MM_YEAR", gmdate("Y",$now_time));
|
|
if (!defined("MM_HOUR")) define("MM_HOUR", gmdate("G",$now_time)); // 0-23
|
|
if (!defined("MM_MINUTE")) define("MM_MINUTE", (int)gmdate("i",$now_time)); // 0-59
|
|
if (!defined("MM_SECOND")) define("MM_SECOND", (int)gmdate("s",$now_time)); // 0-59
|
|
if (!defined("MM_TIME")) define("MM_TIME", gmdate("His",$now_time)); // 164523 = 16:45:23 = 4:45:23 PM
|
|
if (!defined("MM_DATE")) define("MM_DATE", gmdate("Ymd",$now_time)); // 20081225 = 25th Dec 2008
|
|
|
|
// now check the logged-in-user status.
|
|
// If MM is set up for "only logged in users", and the user is not logged in, quit immediately.
|
|
if ($logged_in_users == 1 ) {
|
|
if ( MM_NOT_LOGGED_IN ) {
|
|
if ($debug) {
|
|
echo JText::_('Logged-in users only; no logged-in user found.') . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ($debug) {
|
|
echo JText::_('Logged-in users only; found logged-in user.') . '<br />';
|
|
}
|
|
}
|
|
// If MM is set up for "only non-logged-in users", and the user is logged in, quit immediately.
|
|
if ($logged_in_users == 2 ) {
|
|
if ( MM_LOGGED_IN ) {
|
|
if ($debug) {
|
|
echo JText::_('Non-logged-in users only; a logged-in user was found.') . '<br />';
|
|
}
|
|
return;
|
|
}
|
|
if ($debug) {
|
|
echo JText::_('Non-logged-in users only; found non-logged-in user.') . '<br />';
|
|
}
|
|
}
|
|
|
|
// set up the changecache
|
|
// this can now be used inside the rules like this:
|
|
// $changes->mod(N)->accessLevel("1")->showTitle()->title("New Title")
|
|
$changes = new MMChangeCache;
|
|
|
|
// get results from php script. Add leading and trailing spaces so it's possible to end with < ? p h p
|
|
$mods = strlen($php) ? eval( str_replace( "\r<br />", "\n", str_replace( "\n<br />", "\n", " " . $php . " ") ) ) : '';
|
|
|
|
|
|
// convert comma-separated list of module identifiers (specified statically) to an array of identifiers.
|
|
// identifiers can be module ids, or module positions.
|
|
$static_ids = strlen( $module_ids ) ? array_map( "trim", explode( ",", $module_ids ) ) : array();
|
|
|
|
// convert comma-separated list of module ids (returned from PHP code) to an array of identifiers
|
|
if ( !is_array( $mods ) ) {
|
|
if ( is_numeric( $mods ) ) $mods = array( $mods );
|
|
if ( is_string( $mods) ) $mods = array_map( "trim", explode( ",", $mods ) );
|
|
if ( !is_array( $mods ) ) $mods = array();
|
|
}
|
|
|
|
// combine the 2 sets of identifiers
|
|
$mods = array_merge( $static_ids, $mods );
|
|
|
|
// finally, ensure that we are not including the module position that this MetaMod is in.
|
|
if ( strlen( $position ) ) {
|
|
for ( $i = 0; $i < count($mods); $i++ ) {
|
|
if ( $mods[$i] == $position ) {
|
|
unset( $mods[$i] );
|
|
if ( $debug ) {
|
|
echo JText::sprintf('Ignoring module position %s. A MetaMod cannot include the module position that it is in.', $position) . '<br>';
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
// remove everything equating to "0" / false / ""
|
|
$mods = array_filter( $mods );
|
|
|
|
if ($debug) {
|
|
echo JText::_('Including modules:') . ' ' . implode( ', ', $mods ).'<br />';
|
|
}
|
|
|
|
return $doChangeCache ? array( $mods, $changes->modules ) : $mods;
|
|
}
|
|
|
|
function quotedEscapedListFromModuleArray( &$db, $all_mod_array ) {
|
|
return "'". implode( "','", array_map( array( $db, 'getEscaped'), $all_mod_array ) ) . "'";
|
|
}
|
|
|
|
function displayModules( &$all_mod_array, &$params, $attribs = array(), $changeCache = null) {
|
|
|
|
if (is_array($all_mod_array) && count($all_mod_array)) {
|
|
|
|
$app =& JFactory::getApplication();
|
|
$db =& JFactory::getDBO();
|
|
$user =& JFactory::getUser();
|
|
$aid = $user->get('aid', 0);
|
|
|
|
$quoted_mod_identifiers = modMetaModHelper::quotedEscapedListFromModuleArray( $db, $all_mod_array );
|
|
|
|
// If we are using the changecache system, (non-legacy), then we
|
|
// select all available modules EVEN IF THEY ARE DISABLED. Then we
|
|
// trim the list again at the end, removing any that are (still)
|
|
// disabled.
|
|
// This allows the MetaMod rules to include modules that are known
|
|
// to be disabled, and it enables them automatically.
|
|
|
|
$autoenable = $params->get( 'autoenable', 'all' );
|
|
|
|
$query = "SELECT id, title, module, position, content, showtitle, control, params, published, ordering"
|
|
. ", m.id in ( $quoted_mod_identifiers ) as in_id"
|
|
. ", m.position in ( $quoted_mod_identifiers ) as in_position"
|
|
. "\n FROM #__modules AS m WHERE"
|
|
. ( ( !$changeCache && $autoenable == 'none') ? "\n m.published = 1 AND " : "")
|
|
. "\n m.access <= ". (int)$aid
|
|
. "\n AND m.client_id = ". (int)$app->getClientId()
|
|
. "\n AND ( m.id in ( $quoted_mod_identifiers ) OR m.position in ( $quoted_mod_identifiers ) )"
|
|
. "\n ORDER BY ( field( "
|
|
. "\n case when m.position in ( $quoted_mod_identifiers ) then m.position else m.id end,"
|
|
. "\n $quoted_mod_identifiers )), ordering ";
|
|
|
|
$db->setQuery($query);
|
|
$modules = array();
|
|
|
|
if ( !( $modules = $db->loadObjectList() ) ) {
|
|
JError::raiseWarning( 'SOME_ERROR_CODE', "Error loading Modules: " . $db->getErrorMsg());
|
|
return false; // FIXME - what to do here? Ignore?
|
|
}
|
|
|
|
// do some stuff that is found in libraries/joomla/application/module/helper.php
|
|
$total = count( $modules );
|
|
|
|
for( $i = 0; $i < $total; $i++ ) {
|
|
// autoenabling, according to our parameters
|
|
if ( $autoenable == 'all'
|
|
|| ( $autoenable == 'id' && $modules[$i]->in_id == 1)
|
|
|| ( $autoenable == 'position' && $modules[$i]->in_position == 1 ) ) {
|
|
$modules[$i]->published = 1;
|
|
}
|
|
// determine if this is a custom module
|
|
$file = $modules[$i]->module;
|
|
$custom = substr( $file, 0, 4 ) == 'mod_' ? 0 : 1;
|
|
$modules[$i]->user = $custom;
|
|
// CHECK: custom module name is given by the title field, otherwise it's just 'om' ??
|
|
$modules[$i]->name = $custom ? $modules[$i]->title : substr( $file, 4 );
|
|
$modules[$i]->style = null;
|
|
$modules[$i]->position = strtolower( $modules[$i]->position );
|
|
}
|
|
|
|
modMetaModHelper::applyParamChanges( $modules, $changeCache );
|
|
|
|
$document = &JFactory::getDocument();
|
|
$renderer = $document->loadRenderer( 'module' );
|
|
$style = trim( $params->get( 'force_style', trim( $params->get( 'style', 'table' ) ) ) );
|
|
|
|
$contents = '';
|
|
if ( !is_array( $attribs ) ) {
|
|
$attribs = array();
|
|
}
|
|
$attribs['style'] = $style;
|
|
|
|
foreach ( $modules as $mod ) {
|
|
if ( $mod->published ) {
|
|
$contents .= $renderer->render($mod, $attribs);
|
|
}
|
|
}
|
|
return $contents;
|
|
|
|
}
|
|
}
|
|
|
|
/**
|
|
* $modules The list of all modules on the page (after processing by the MetaMod Pro plugin, where appropriate),
|
|
* or enclosed in this MetaMod (when not using MetaMod Pro). These are OBJECTS as per the db table.
|
|
* No more modules should be added to this list after processing here.
|
|
* $changeCache The array of new parameters that are to be substituted into the list of modules.
|
|
* It's an array keyed on "modX" where X is the module number to be modified.
|
|
* $changes['title'] // string
|
|
* $changes['showtitle'] // 0 = don't show, 1 = show
|
|
* $changes['published'] // 0 = not published, 1 = published
|
|
* $changes['access'] // 0 = public, 1 = registered, 2 = special
|
|
* $changes['position'] // e.g. right
|
|
* $changes['module'] // e.g. mod_mainmenu or mod_custom
|
|
* $changes['content'] // the HTML content of mod_custom
|
|
* $changes['ordering'] // numerical ordering of the modules in the position. You probably
|
|
* // don't want to change this since it only affects the modules inside
|
|
* // this particular MetaMod (though with MetaMod Pro, arguably more useful).
|
|
* $changes['params'] // another array, where the key is the name of the parameter, and value is the new value.
|
|
*/
|
|
function applyParamChanges( &$modules, &$changeCache ) {
|
|
if ( $changeCache == null || $modules == null ) return;
|
|
|
|
$c = count($modules);
|
|
for ( $i = 0; $i < $c; $i++ ) {
|
|
$module = &$modules[$i];
|
|
$modX = 'mod' . $module->id;
|
|
if ( array_key_exists( $modX, $changeCache )) {
|
|
/* the admin wants to apply changes to this module id.
|
|
* Now we need to make those changes.
|
|
*/
|
|
$changes = $changeCache[ $modX ]->cache;
|
|
// apply basic changes
|
|
foreach ( array(
|
|
'title', 'showtitle', 'published',
|
|
'access', 'position', 'module',
|
|
'content', 'ordering') as $type ) {
|
|
if ( array_key_exists( $type, $changes ) ) {
|
|
$module->$type = $changes[ $type ];
|
|
}
|
|
}
|
|
|
|
// now apply changes to the parameter string.
|
|
// do we even have a $changes['params] for this modX?
|
|
if ( array_key_exists( 'params', $changes ) ) {
|
|
$paramchanges = $changes[ 'params' ];
|
|
|
|
if ( is_array( $paramchanges ) && count( $paramchanges ) ) { // no point in messing with it if no changes were requested
|
|
$registry = new JParameter( $module->params );
|
|
$registry->loadArray( $paramchanges );
|
|
$module->params = $registry->toString();
|
|
}
|
|
}
|
|
}
|
|
}
|
|
// now process any deletions from the list of modules.
|
|
//
|
|
for ( $i = 0; $i < count($modules); $i++ ) {
|
|
if ( !isset( $modules[$i]->published ) || $modules[$i]->published == 0 ) {
|
|
array_splice( $modules, $i, 1 );
|
|
$i--;
|
|
}
|
|
}
|
|
}
|
|
|
|
} |