Possible fix for badly rewritten links
[mailer.git] / inc / libs / rewrite_functions.php
1 <?php
2 /************************************************************************
3  * MXChange v0.2.1                                    Start: 10/24/2004 *
4  * ===============                              Last change: 11/14/2004 *
5  *                                                                      *
6  * -------------------------------------------------------------------- *
7  * File              : rewrite_functions.php                            *
8  * -------------------------------------------------------------------- *
9  * Short description : Special functions for rewrite extension          *
10  * -------------------------------------------------------------------- *
11  * Kurzbeschreibung  : Spezielle Funktion fuer rewrite-Erweiterung      *
12  * -------------------------------------------------------------------- *
13  * $Revision::                                                        $ *
14  * $Date::                                                            $ *
15  * $Tag:: 0.2.1-FINAL                                                 $ *
16  * $Author::                                                          $ *
17  * Needs to be in all Files and every File needs "svn propset           *
18  * svn:keywords Date Revision" (autoprobset!) at least!!!!!!            *
19  * -------------------------------------------------------------------- *
20  * Copyright (c) 2003 - 2008 by Roland Haeder                           *
21  * For more information visit: http://www.mxchange.org                  *
22  *                                                                      *
23  * This program is free software; you can redistribute it and/or modify *
24  * it under the terms of the GNU General Public License as published by *
25  * the Free Software Foundation; either version 2 of the License, or    *
26  * (at your option) any later version.                                  *
27  *                                                                      *
28  * This program is distributed in the hope that it will be useful,      *
29  * but WITHOUT ANY WARRANTY; without even the implied warranty of       *
30  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the        *
31  * GNU General Public License for more details.                         *
32  *                                                                      *
33  * You should have received a copy of the GNU General Public License    *
34  * along with this program; if not, write to the Free Software          *
35  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,               *
36  * MA  02110-1301  USA                                                  *
37  ************************************************************************/
38
39 // Some security stuff...
40 if (!defined('__SECURITY')) {
41         $INC = substr(dirname(__FILE__), 0, strpos(dirname(__FILE__), "/inc") + 4) . "/security.php";
42         require($INC);
43 }
44
45 //
46 function REWRITE_LINKS ($HTML) {
47         // Skip rewriting for the admin area (which search engine may enter here???)
48         if (ereg($GLOBALS['module'], getConfig('rewrite_skip'))) return $HTML;
49
50         // Strip slashes with double-backslashes for the preg_replace() function
51         $URL = str_replace("/", "\\/", constant('URL'));
52
53         // Generate target URL
54         $target = constant('URL')."/cms/";
55
56         // Convert modules.php?module=...
57         $test = preg_replace("/".$URL."/modules.php?module=/i", $target, $HTML);
58
59         if (eregi(SERVER_URL, $test)) {
60                 // Convert URLs from my server
61                 $test = preg_replace("/".constant('SERVER_URL')."/modules.php?module=/i", constant('SERVER_URL')."/cms/", $test);
62         } // END - if
63
64         // Strip slashes as above for the main URL
65         $target2 = str_replace("/", "\\/", $target);
66
67         // Action variable
68         $act = $target."\$1/act/";
69
70         // Convert &amp;|&action=...
71         $test = preg_replace("/".$target2."(.*)&amp;action=/i", $act, $test);
72
73         // "The same procedure as last variable"... now for &amp;what=
74         $wht = $target."\$1/wht/";
75         $target2 = str_replace("/", "\\/", $target);
76         $test = preg_replace("/".$target2."(.*)&amp;what=/i", $wht, $test);
77
78         if ((EXT_IS_ACTIVE("rallye")) && (eregi("rallye=", $test))) {
79                 // Replace data when rallye extension is active
80                 // Add more if you need more like these entries
81                 $REPLACE = array("rallye", "activate", "auto", "notify", "sub");
82                 foreach ($REPLACE as $var) {
83                         // This will replace "&amp;var=" to "/var/"
84                         $test = preg_replace("/&amp;".$var."=/i", "/".$var."/", $test);
85                 } // END - foreach
86         } // END - if
87
88         // Simple from->to replacements
89         $REPLACE = array(
90                 'search'  => array("uid", "url", "page", "offset", "mid", "bid", "sub", "home"),
91                 'replace' => array("u"   , "url", "page", "offset", "m"  , "b"  , "s"  , "h")
92         );
93
94         if ((EXT_IS_ACTIVE("admins")) && (eregi("admin=", $test))) {
95                 // Replace &amp;admin= with "/aid/"
96                 $REPLACE['search'][]  = "admin";
97                 $REPLACE['replace'][] = "aid";
98         } // END - if
99
100         // Replace all array elements through
101         foreach ($REPLACE['search'] as $k => $v) {
102                 if (eregi("$v=", $test)) {
103                         // Replace &amp;uid= with /u/
104                         $test = preg_replace("/&amp;".$v."=/i", "/".$REPLACE['replace'][$k]."/", $test);
105                 } // END - if
106         } // END - foreach
107
108         // Repair missed &amp;what=??? entries
109         while (preg_match("/&amp;what=(.*)\/(.*)\/(.*)/i", $test)) {
110                 $test = preg_replace("/&amp;what=(.*)\/(.*)\/(.*)/i", "/wht/\$1/\$2/\$3", $test);
111         } // END - while
112
113         // Return rewritten code
114         return $test;
115 }
116 //
117 ?>