PHP Decode

?><?php
/********************************************************************************
| CDSEO Pro
| Copyright (c)2008 WebsiteCM
| All rights reserved.
| License: http://www.websitecm.com/downloads/license-agreement.pdf
********************************************************************************
| Output filter. Performs data replacements.
********************************************************************************/

if (!defined('XCART_SESSION_START')) { header("Location: ../../"); die("Access denied"); }

/********************************************************************************
| All CDSEO URL replacements for category, product, manufacturer and static pages.
| They are loaded from the database (in the smarty_outputfilter_cdseopro function),
| but only when URL or title replace settings are enabled to prevent needless queries.
| The array keys (e.g. 3) match the IDs.
| Example: array(3 => array('url' => 'books', 'title' => 'Books link title'), ...)
| Also set in modules/cdseolinks/cdseo_pro.php are:
|	 $GLOBALS['wcmcdseoReplacePageTitle'];
|	 $GLOBALS['wcmcdseoReplaceMetaKeywords'];
|	 $GLOBALS['wcmcdseoReplaceMetaDescription'];
********************************************************************************/
$GLOBALS['wcmcdseoReplaceCats'] = array();
$GLOBALS['wcmcdseoReplaceManus'] = array();
$GLOBALS['wcmcdseoReplaceProds'] = array();
$GLOBALS['wcmcdseoReplacePages'] = array();

/********************************************************************************
| FUNCTION: smarty_outputfilter_cdseopro
|
| Purpose:
|    Core Smarty output filter function. Takes the source and updates
|	 URLs, titles and meta according to CDSEO settings.
|
| Parameters:
|    $source - Source code from smarty
|	 $smarty - Smarty class initalization
|
| Returns:
|    Source code containing replacements
|
********************************************************************************/
function smarty_outputfilter_cdseopro($source, $smarty)
{
	global $wcmcdseoConfig;
	global $wcmcdseoWebDir;
	global $http_location, $https_location;
	global $xcart_http_host, $xcart_https_host;
	global $php_url;

	// Update page title
	$source = preg_replace_callback('~<title>.*?</title>~is', 'wcmcdseoPageTitleCallback', $source, 1);

	// Update meta elements
	if (!empty($GLOBALS['wcmcdseoReplaceMetaKeywords']))
	{
		// Remove existing meta keywords, and insert new one
		$source = preg_replace('~<meta\s++[^>]*?name\s*+=\s*+"keywords"[^>]*+>~i', '', $source, 1);
		$source = preg_replace('~(?<=</title>)~i', "
".'<meta name="keywords" content="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplaceMetaKeywords']).'" />', $source, 1);
	}
	if (!empty($GLOBALS['wcmcdseoReplaceMetaDescription']))
	{
		// Remove existing meta description, and insert new one
		$source = preg_replace('~<meta\s++[^>]*?name\s*+=\s*+"description"[^>]*+>~i', '', $source, 1);
		$source = preg_replace('~(?<=</title>)~i', "
".'<meta name="description" content="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplaceMetaDescription']).'" />', $source, 1);
	}

	// Parse the url for path only
	$url = $GLOBALS['wcmcdseoUrlVar'];
	$url = parse_url($url);
	$url = $url['path'];

	// Append a trailing slash to the xcart directory or
	// strpos will always equal 1 due to initial slash
	$url = preg_replace('~^'.preg_quote($wcmcdseoWebDir.'/', '~').'~', '', $url);

	// Modify base href in source if in a subfolder
	if (strpos($url, '/') !== FALSE)
	{	
		// Remove existing base url, and insert new one
		$source = preg_replace('~<base[^>]*+>~i', '', $source, 1);
		$source = preg_replace('~(?=</head>)~i', '<base href="'. (($_SERVER['HTTPS'] == 'on') ? $https_location : $http_location) . $smarty->get_template_vars('dir_mall') .'/" />'."
", $source, 1);
	}
	
	// Remove existing canonical tag, and insert new one
	// Category/Product/Pages/Manufacturers
	if ($wcmcdseoConfig['use_canonical'] == 1 AND ($smarty->get_template_vars('main') == 'catalog' OR $smarty->get_template_vars('main') == 'product' OR $smarty->get_template_vars('main') == 'pages' OR $smarty->get_template_vars('main') == 'manufacturers_list' OR $smarty->get_template_vars('main') == 'manufacturer_products'))
	{
		// Set new base url based on https/http + X-Mall Compatibility
		$source = preg_replace('~<link[^>]*?\srel=["\']canonical["\'][^>]*+>~i', '', $source, 1);
		$source = preg_replace('~(?=</head>)~i', '<link rel="canonical" href="'. (($_SERVER['HTTPS'] == 'on') ? $https_location : $http_location) . '/' . ($wcmcdseoConfig['rewrite_index'] == 1 ? str_replace('home.php','',$url) : $url) . '" />'."
", $source, 1);
	}

	// Update category links with CDSEO URLs and/or CDSEO title attributes
	if ($wcmcdseoConfig['setting'][1]['url'] OR $wcmcdseoConfig['setting'][1]['linkTitle'])
	{
		$GLOBALS['wcmcdseoReplaceCats'] = wcmcdseoGetReplacements('category');
		$source = preg_replace_callback('~<a(?:rea)?\s++[^>]*?href\s*+=\s*+"home\.php([^"]*+)"[^>]*+>~i', 'wcmcdseoCategoryCallback', $source);
	}

	// Update manufacturer links with CDSEO URLs and/or CDSEO title attributes
	if ($wcmcdseoConfig['setting'][3]['url'] OR $wcmcdseoConfig['setting'][3]['linkTitle'])
	{
		$GLOBALS['wcmcdseoReplaceManus'] = wcmcdseoGetReplacements('manufacturer');
		$source = preg_replace_callback('~<a(?:rea)?\s++[^>]*?href\s*+=\s*+"manufacturers\.php([^"]*+)"[^>]*+>~i', 'wmcdseoManufacturerCallback', $source);
	}

	// Update product links with CDSEO URLs and/or CDSEO title attributes
	if ($wcmcdseoConfig['setting'][2]['url'] OR $wcmcdseoConfig['setting'][2]['linkTitle'])
	{
		$GLOBALS['wcmcdseoReplaceProds'] = wcmcdseoGetReplacements('product');
		$source = preg_replace_callback('~<a(?:rea)?\s++[^>]*?href\s*+=\s*+"product\.php([^"]*+)"[^>]*+>~i', 'wcmcdseoProductCallback', $source);
	}

	// Update staticpage links with CDSEO URLs and/or CDSEO title attributes
	if ($wcmcdseoConfig['setting'][4]['url'] OR $wcmcdseoConfig['setting'][4]['linkTitle'])
	{
		$GLOBALS['wcmcdseoReplacePages'] = wcmcdseoGetReplacements('staticpage');
		$source = preg_replace_callback('~<a(?:rea)?\s++[^>]*?href\s*+=\s*+"pages\.php([^"]*+)"[^>]*+>~i', 'wcmcdseoStaticPageCallback', $source);
	}

	return $source;
}

/********************************************************************************
| FUNCTION: wcmcdseoPageTitleCallback
|
| Purpose:
|    Replaces page titles
|
| Parameters:
|    $matches - Regex matches
|
| Returns:
|    Replacement code
|
********************************************************************************/
function wcmcdseoPageTitleCallback($matches)
{
	global $smarty;
	global $wcmcdseoConfig;

	// We are on the homepage
	if ($smarty->get_template_vars('main') == 'catalog' AND !$smarty->get_template_vars('current_category'))
	{
		// Load custom homepage title
		$title = $wcmcdseoConfig['home_page_title'];
	}
	// Setting for replacing page title has been enabled for the current page
	elseif ($GLOBALS['wcmcdseoReplacePageTitle'] != "")
	{
		// Load other custom page title
		$title = $GLOBALS['wcmcdseoReplacePageTitle'];
	}

	// If no custom title found, don't change anything
	if (empty($title))
		return $matches[0];

	// Display page number in title as well (but not for page 1)
	if (preg_match('~(?:-p|index)(\d++)\.html?$~i', $GLOBALS['wcmcdseoUrlVar'], $matches))
	{
		if ($matches[1] > 1)
		{
			$title = $title . ' (Page '.$matches[1].')';
		}
	}

	return '<title>'.htmlspecialchars_no_double_encode($title).'</title>';
}

/********************************************************************************
| FUNCTION: wcmcdseoCategoryCallback
|
| Purpose:
|    Replaces category urls
|
| Parameters:
|    $matches - Regex matches
|
| Returns:
|    Replacement code
|
********************************************************************************/
function wcmcdseoCategoryCallback($matches)
{
	global $config;
	global $wcmcdseoWebDir;
	global $wcmcdseoConfig;

	// Normalize and parse query string (qs)
	parse_str(str_replace('&amp;', '&', ltrim($matches[1], '?')), $qs);

	// If individual query setting is enabled then query specific match
	if ($wcmcdseoConfig['use_individualquery'] == 1)
		$GLOBALS['wcmcdseoReplaceCats'][$qs['cat']] = func_query_first("SELECT cdseoLinkTitle as title, cdseoUrl as url FROM wcm_cdseo WHERE cdseoType='category' AND cdseoReplaceID='" . (int)$qs['cat'] . "' LIMIT 1");

	// No or invalid category id found in URL
	if (empty($qs['cat']) OR !array_key_exists($qs['cat'], $GLOBALS['wcmcdseoReplaceCats']))
	{
		// Replace "home.php" with "/"
		if ((bool)$wcmcdseoConfig['rewrite_index'])
			return preg_replace('~(?<=")home\.php[^"]*~i', $wcmcdseoWebDir.'/'.$matches[1], $matches[0], 1);

		// Otherwise no changes
		return $matches[0];
	}

	// Link title setting is enabled
	if ($wcmcdseoConfig['setting'][1]['linkTitle'])
	{
		// Remove existing title attribute, and insert new one
		$matches[0] = preg_replace('~title\s*+=\s*+"[^"]*+"~i', '', $matches[0]);
		$matches[0] = preg_replace('~^<a(?:rea)?~i', '$0 title="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplaceCats'][$qs['cat']]['title']).'"', $matches[0], 1);
	}

	// URLs replacement is disabled or the replacement string is left empty, quit at this point
	if (!$wcmcdseoConfig['setting'][1]['url'] OR $GLOBALS['wcmcdseoReplaceCats'][$qs['cat']]['url'] == '')
		return $matches[0];

	// Build new URL starting with category CDSEO replace string
	$url = $wcmcdseoWebDir.'/'.$GLOBALS['wcmcdseoReplaceCats'][$qs['cat']]['url'];

	// Add trailing slash for "folder style"
	$url .= ($wcmcdseoConfig['setting'][1]['extension']) ? '' : '/';
	unset($qs['cat']);

	// Page number
	if (isset($qs['page']) AND ctype_digit($qs['page']))
	{
		// Hide page number for links to first page
		if ((int) $qs['page'] > 1)
		{
			$url .= (($wcmcdseoConfig['setting'][1]['extension']) ? '-p'.$qs['page'] : 'index'.$qs['page'].'.html');
		}
		unset($qs['page']);
	}

	// Add ".html" for "html style", ".htm" for "htm style"
	$temp = array('','.html','.htm');
	$url .= $temp[$wcmcdseoConfig['setting'][1]['extension']];

	// Remove default sort from query string
	if (isset($qs['sort']) AND ($qs['sort'] == $config['Appearance']['products_order'] OR $qs['sort'] == ''))
	{
		unset($qs['sort']);
	}

	// Remove default sort_direction from query string
	if (isset($qs['sort_direction']) AND ($qs['sort_direction'] == '0' OR $qs['sort_direction'] == ''))
	{
		unset($qs['sort_direction']);
	}

	// Re-append everything else
	if (!empty($qs))
	{
		$url .= '?'.http_build_query($qs);
	}

	return preg_replace('~(?<=")home\.php[^"]*~i', $url, $matches[0], 1);
}

/********************************************************************************
| FUNCTION: wmcdseoManufacturerCallback
|
| Purpose:
|    Replaces manufacturer urls
|
| Parameters:
|    $matches - Regex matches
|
| Returns:
|    Replacement code
|
********************************************************************************/
function wmcdseoManufacturerCallback($matches)
{
	global $config;
	global $wcmcdseoWebDir;
	global $wcmcdseoConfig;

	// Normalize and parse query string (qs)
	parse_str(str_replace('&amp;', '&', ltrim($matches[1], '?')), $qs);

	// If individual query setting is enabled then query specific match
	if ($wcmcdseoConfig['use_individualquery'] == 1)
		$GLOBALS['wcmcdseoReplaceManus'][$qs['manufacturerid']] = func_query_first("SELECT cdseoLinkTitle as title, cdseoUrl as url FROM wcm_cdseo WHERE cdseoType='manufacturer' AND cdseoReplaceID='" . (int)$qs['manufacturerid'] . "' LIMIT 1");
		
	// No or invalid manufacturer id found in URL, so no changes
	if (empty($qs['manufacturerid']) OR !array_key_exists($qs['manufacturerid'], $GLOBALS['wcmcdseoReplaceManus']))
		return $matches[0];

	// Link title setting is enabled
	if ($wcmcdseoConfig['setting'][3]['linkTitle'])
	{
		// Remove existing title attribute, and insert new one
		$matches[0] = preg_replace('~title\s*+=\s*+"[^"]*+"~i', '', $matches[0]);
		$matches[0] = preg_replace('~^<a(?:rea)?~i', '$0 title="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplaceManus'][$qs['manufacturerid']]['title']).'"', $matches[0], 1);
	}

	// URLs replacement is disabled or the replacement string is left empty, quit at this point
	if (!$wcmcdseoConfig['setting'][3]['url'] OR $GLOBALS['wcmcdseoReplaceManus'][$qs['manufacturerid']]['url'] == '')
		return $matches[0];

	// Build new URL starting with category CDSEO replace string
	$url = $wcmcdseoWebDir.'/'.$GLOBALS['wcmcdseoReplaceManus'][$qs['manufacturerid']]['url'];

	// Add trailing slash for "folder style"
	$url .= ($wcmcdseoConfig['setting'][3]['extension']) ? '' : '/';
	unset($qs['manufacturerid']);

	// Page number
	if (isset($qs['page']) AND ctype_digit($qs['page']))
	{
		// Hide page number for links to first page
		if ((int) $qs['page'] > 1)
		{
			$url .= (($wcmcdseoConfig['setting'][3]['extension']) ? '-p'.$qs['page'] : 'index'.$qs['page'].'.html');
		}
		unset($qs['page']);
	}

	// Add ".html" for "html style", ".htm" for "htm style"
	$temp = array('','.html','.htm');
	$url .= $temp[$wcmcdseoConfig['setting'][3]['extension']];
	
	// Remove default sort from query string
	if (isset($qs['sort']) AND ($qs['sort'] == $config['Appearance']['products_order'] OR $qs['sort'] == ''))
	{
		unset($qs['sort']);
	}

	// Remove default sort_direction from query string
	if (isset($qs['sort_direction']) AND ($qs['sort_direction'] == '0' OR $qs['sort_direction'] == ''))
	{
		unset($qs['sort_direction']);
	}

	// Re-append everything else
	if (!empty($qs))
	{
		$url .= '?'.http_build_query($qs);
	}

	return preg_replace('~(?<=")manufacturers\.php[^"]*~i', $url, $matches[0], 1);
}

/********************************************************************************
| FUNCTION: wcmcdseoProductCallback
|
| Purpose:
|    Replaces product urls
|
| Parameters:
|    $matches - Regex matches
|
| Returns:
|    Replacement code
|
********************************************************************************/
function wcmcdseoProductCallback($matches)
{
	global $config;
	global $wcmcdseoWebDir;
	global $wcmcdseoConfig;

	// Normalize and parse query string (qs)
	parse_str(str_replace('&amp;', '&', ltrim($matches[1], '?')), $qs);

	// If individual query setting is enabled then query specific match
	if ($wcmcdseoConfig['use_individualquery'] == 1)
		$GLOBALS['wcmcdseoReplaceProds'][$qs['productid']] = func_query_first("SELECT cdseoLinkTitle as title, cdseoUrl as url FROM wcm_cdseo WHERE cdseoType='product' AND cdseoReplaceID='" . (int)$qs['productid'] . "' LIMIT 1");

	// No or invalid product id found in URL, so no changes
	if (empty($qs['productid']) OR !array_key_exists($qs['productid'], $GLOBALS['wcmcdseoReplaceProds']))
		return $matches[0];

	// Link title setting is enabled
	if ($wcmcdseoConfig['setting'][2]['linkTitle'])
	{
		// Remove existing title attribute, and insert new one
		$matches[0] = preg_replace('~title\s*+=\s*+"[^"]*+"~i', '', $matches[0]);
		$matches[0] = preg_replace('~^<a(?:rea)?~i', '$0 title="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplaceProds'][$qs['productid']]['title']).'"', $matches[0], 1);
	}

	// URLs replacement is disabled or the replacement string is left empty, quit at this point
	if (!$wcmcdseoConfig['setting'][2]['url'] OR $GLOBALS['wcmcdseoReplaceProds'][$qs['productid']]['url'] == '')
		return $matches[0];

	// Build new URL starting with category CDSEO replace string
	$url = $wcmcdseoWebDir.'/'.$GLOBALS['wcmcdseoReplaceProds'][$qs['productid']]['url'];

	// Add extension: /, .html, .htm depending on setting
	$temp = array('/','.html','.htm');
	$url .= $temp[$wcmcdseoConfig['setting'][2]['extension']];
		
	unset($qs['productid']);

	// Remove useless stuff from query string
	if (isset($qs['feature'])) unset($qs['feature']);
	if (isset($qs['featured'])) unset($qs['featured']);
	if (isset($qs['bestseller'])) unset($qs['bestseller']);
	if (isset($qs['cat'])) unset($qs['cat']);
	if (isset($qs['page'])) unset($qs['page']);

	// Re-append everything else
	if (!empty($qs))
	{
		$url .= '?'.http_build_query($qs);
	}

	return preg_replace('~(?<=")product\.php[^"]*~i', $url, $matches[0], 1);
}

/********************************************************************************
| FUNCTION: wcmcdseoStaticPageCallback
|
| Purpose:
|    Replaces static page urls
|
| Parameters:
|    $matches - Regex matches
|
| Returns:
|    Replacement code
|
********************************************************************************/
function wcmcdseoStaticPageCallback($matches)
{
	global $config;
	global $wcmcdseoWebDir;
	global $wcmcdseoConfig;

	// Normalize and parse query string (qs)
	parse_str(str_replace('&amp;', '&', ltrim($matches[1], '?')), $qs);

	// If individual query setting is enabled then query specific match
	if ($wcmcdseoConfig['use_individualquery'] == 1)
		$GLOBALS['wcmcdseoReplacePages'][$qs['pageid']] = func_query_first("SELECT cdseoLinkTitle as title, cdseoUrl as url FROM wcm_cdseo WHERE cdseoType='staticpage' AND cdseoReplaceID='" . (int)$qs['pageid'] . "' LIMIT 1");

	// No or invalid page id found in URL, so no changes
	if (empty($qs['pageid']) OR !array_key_exists($qs['pageid'], $GLOBALS['wcmcdseoReplacePages']))
		return $matches[0];

	// Link title setting is enabled
	if ($wcmcdseoConfig['setting'][4]['linkTitle'])
	{
		// Remove existing title attribute, and insert new one
		$matches[0] = preg_replace('~title\s*+=\s*+"[^"]*+"~i', '', $matches[0]);
		$matches[0] = preg_replace('~^<a(?:rea)?~i', '$0 title="'.htmlspecialchars_no_double_encode($GLOBALS['wcmcdseoReplacePages'][$qs['pageid']]['title']).'"', $matches[0], 1);
	}

	// URLs replacement is disabled or the replacement string is left empty, quit at this point
	if (!$wcmcdseoConfig['setting'][4]['url'] OR $GLOBALS['wcmcdseoReplacePages'][$qs['pageid']]['url'] == '')
		return $matches[0];

	// Build new URL starting with category CDSEO replace string
	$url = $wcmcdseoWebDir.'/'.$GLOBALS['wcmcdseoReplacePages'][$qs['pageid']]['url'];

	// Add extension: /, .html, .htm depending on setting
	$temp = array('/','.html','.htm');
	$url .= $temp[$wcmcdseoConfig['setting'][4]['extension']];
	
	unset($qs['pageid']);

	// Re-append everything else
	if (!empty($qs))
	{
		$url .= '?'.http_build_query($qs);
	}

	return preg_replace('~(?<=")pages\.php[^"]*~i', $url, $matches[0], 1);
}

/********************************************************************************
| FUNCTION: wcmcdseoGetReplacements
|
| Purpose:
|    Loads CDSEO replacements for URL and title attribute from database.
|
| Parameters:
|    $in_type - category, manufacturer, product or staticpage
|
| Returns:
|    Array of replacement values
|
********************************************************************************/
function wcmcdseoGetReplacements($in_type)
{
	global $var_dirs;
	global $wcmcdseoConfig;
	
	// If individual query setting is enabled (for large stores) then don't return global query
	if ($wcmcdseoConfig['use_individualquery'] == 1)
		return array();			
	
	// Determine cache setting
	$useCache = $wcmcdseoConfig['use_cache'];

	// Normalize type
	$in_type = strtolower($in_type);

	// Validate type
	if ($in_type !== 'category' AND $in_type !== 'manufacturer' AND $in_type !== 'product' AND $in_type !== 'staticpage')
		return array();

	// Set cache file in default x-cart cache directory
	$wcmcdseoCacheDir = $var_dirs['cache'] . "/cdseo-" . $in_type . ".txt";

	if (file_exists($wcmcdseoCacheDir) AND $useCache == 1)
	{
    	$return = unserialize(file_get_contents($wcmcdseoCacheDir));
	}
	else
	{
		// Execute the query
		$query = func_query
		(
			'SELECT cdseoReplaceID AS id, cdseoUrl AS url, cdseoLinkTitle AS title '.
			'FROM wcm_cdseo '.
			'WHERE cdseoType = "'.$in_type.'"'
		);

		// No results
		if (empty($query))
			return array();

		// Put results in a practical array
		foreach ($query as $row)
		{
			$return[$row['id']] = array('url' => $row['url'], 'title' => $row['title']);
		}

		// Write the results to cache file to avoid large db queries
		if (is_writable($var_dirs["cache"]) AND is_dir($var_dirs["cache"])) {
			$fp = fopen($wcmcdseoCacheDir,"w");
			fputs($fp, serialize($return));
			fclose($fp);
		}
	}

	return $return;
}

/********************************************************************************
| FUNCTION: http_build_query
|
| Purpose:
|    Creates an HTTP query string from an array. Included by default in PHP 5.
|
| Parameters:
|    $in_array - Array of data to convert to query string
|
| Returns:
|    Array of replacement values
|
********************************************************************************/
if (!function_exists('http_build_query'))
{
	function http_build_query($in_array)
	{
		if (empty($in_array) OR !is_array($in_array))
			return '';

		$string = array();

		foreach($in_array as $key => $value)
		{
			$string[] = $key.'='.rawurlencode($value);
		}

		return implode('&', $string);
	}
}
?><?php