core#1182 - revert crm.menubar.js changes
[civicrm-core.git] / extern / url.php
1 <?php
2 require_once '../civicrm.config.php';
3 require_once 'CRM/Core/Config.php';
4 require_once 'CRM/Core/Error.php';
5 require_once 'CRM/Utils/Array.php';
6
7 $config = CRM_Core_Config::singleton();
8
9 // To keep backward compatibility for URLs generated
10 // by CiviCRM < 1.7, we check for the q variable as well.
11 if (isset($_GET['qid'])) {
12 $queue_id = CRM_Utils_Array::value('qid', $_GET);
13 }
14 else {
15 $queue_id = CRM_Utils_Array::value('q', $_GET);
16 }
17 $url_id = CRM_Utils_Array::value('u', $_GET);
18
19 if (!$url_id) {
20 echo "Missing input parameters\n";
21 exit();
22 }
23
24 require_once 'CRM/Mailing/Event/BAO/TrackableURLOpen.php';
25 $url = CRM_Mailing_Event_BAO_TrackableURLOpen::track($queue_id, $url_id);
26
27 // CRM-7103
28 // Looking for additional query variables and append them when redirecting.
29 $query_param = $_GET;
30 unset($query_param['q'], $query_param['qid'], $query_param['u']);
31 $query_string = http_build_query($query_param);
32
33 if (strlen($query_string) > 0) {
34 // Parse the url to preserve the fragment.
35 $pieces = parse_url($url);
36
37 if (isset($pieces['fragment'])) {
38 $url = str_replace('#' . $pieces['fragment'], '', $url);
39 }
40
41 // Handle additional query string params.
42 if ($query_string) {
43 if (stristr($url, '?')) {
44 $url .= '&' . $query_string;
45 }
46 else {
47 $url .= '?' . $query_string;
48 }
49 }
50
51 // slap the fragment onto the end per URL spec
52 if (isset($pieces['fragment'])) {
53 $url .= '#' . $pieces['fragment'];
54 }
55 }
56
57 // CRM-18320 - Fix encoded ampersands (see CRM_Utils_System::redirect)
58 $url = str_replace('&amp;', '&', $url);
59
60 // CRM-17953 - The CMS is not bootstrapped so cannot use CRM_Utils_System::redirect
61 header('Location: ' . $url);
62 CRM_Utils_System::civiExit();