4 * Placeholder page which generates a redirect
8 * <path>civicrm/admin/options/case_type</path>
9 * <page_callback>CRM_Core_Page_Redirect</page_callback>
10 * <page_arguments>url=civicrm/foo/bar?whiz=bang&passthru=%%passthru%%</page_arguments>
14 class CRM_Core_Page_Redirect
extends CRM_Core_Page
{
20 * @param array $pageArgs
22 public function run($path = NULL, $pageArgs = array()) {
23 $url = self
::createUrl($path, $_REQUEST, $pageArgs, TRUE);
24 CRM_Utils_System
::redirect($url);
28 * @param array $requestPath
29 * The parts of the path in the current page request.
30 * @param array $requestArgs
32 * @param array $pageArgs
33 * The page_arguments registered in the router.
34 * @param bool $absolute
35 * Whether to return an absolute URL.
39 public static function createUrl($requestPath, $requestArgs, $pageArgs, $absolute) {
40 if (empty($pageArgs['url'])) {
41 CRM_Core_Error
::fatal('This page is configured as a redirect, but it does not have a target.');
45 // note: %% isn't legal in a well-formed URL, so it's not a bad variable-delimiter
46 foreach ($requestPath as $pathPos => $pathPart) {
47 $vars["%%{$pathPos}%%"] = urlencode($pathPart);
49 foreach ($requestArgs as $var => $value) {
50 $vars["%%{$var}%%"] = urlencode($value);
52 $urlString = strtr($pageArgs['url'], $vars);
53 $urlString = preg_replace('/%%[a-zA-Z0-9]+%%/', '', $urlString);
55 $urlParts = parse_url($urlString);
56 $url = CRM_Utils_System
::url(
58 CRM_Utils_Array
::value('query', $urlParts, NULL),
60 CRM_Utils_Array
::value('fragment', $urlParts, NULL)