[platal.git] / htdocs / listes_redirect.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2007 Polytechnique.org                              *
 *  http://opensource.polytechnique.org/                                   *
 *                                                                         *
 *  This program is free software; you can redistribute it and/or modify   *
 *  it under the terms of the GNU General Public License as published by   *
 *  the Free Software Foundation; either version 2 of the License, or      *
 *  (at your option) any later version.                                    *
 *                                                                         *
 *  This program is distributed in the hope that it will be useful,        *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
 *  GNU General Public License for more details.                           *
 *                                                                         *
 *  You should have received a copy of the GNU General Public License      *
 *  along with this program; if not, write to the Free Software            *
 *  Foundation, Inc.,                                                      *
 *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
 ***************************************************************************/

require_once dirname(__FILE__).'/../include/xorg.inc.php';

preg_match('/^\/(moderate|admin|members|archives)\/(.*)_([^_]*)(/.*)?$/', $_SERVER['REQUEST_URI'], $matches);

if ($matches) {

    $action = $matches[1];
    $mbox   = $matches[2];
    $fqdn   = strtolower($matches[3]);
    $sup    = $matches[4];

    if ($fqdn == 'polytechnique.org') {
        http_redirect("https://www.polytechnique.org/lists/$action/$mbox$sup");
    }

    $res = XDB::query("select diminutif from groupex.asso where mail_domain = {?}", $fqdn);
    if ($gpx = $res->fetchOneCell()) {
        http_redirect("http://www.polytechnique.net/$gpx/lists/$action/$mbox$sup");
    }
}
?>
<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
<html>
  <head>
    <title>404 Not Found</title>
  </head>
  <body>
    <h1>Not Found</h1>
    The requested URL <?php echo $_SERVER['REQUEST_URI'] ?> was not found on this server.<p>
    <hr>
    <address>Apache Server at www.carva.org Port 80</address>
  </body>
</html>
<?php
// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
?>
Commit	Line	Data
0337d704	1	<?php
0337d704	2	/***************************************************************************
5ddeb07c	3	* Copyright (C) 2003-2007 Polytechnique.org *
0337d704	4	* http://opensource.polytechnique.org/ *
	5	* *
	6	* This program is free software; you can redistribute it and/or modify *
	7	* it under the terms of the GNU General Public License as published by *
	8	* the Free Software Foundation; either version 2 of the License, or *
	9	* (at your option) any later version. *
	10	* *
	11	* This program is distributed in the hope that it will be useful, *
	12	* but WITHOUT ANY WARRANTY; without even the implied warranty of *
	13	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
	14	* GNU General Public License for more details. *
	15	* *
	16	* You should have received a copy of the GNU General Public License *
	17	* along with this program; if not, write to the Free Software *
	18	* Foundation, Inc., *
	19	* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
	20	***************************************************************************/
	21
e9e9306b	22	require_once dirname(__FILE__).'/../include/xorg.inc.php';
e9e9306b	23
19413120	24	preg_match('/^\/(moderate\|admin\|members\|archives)\/(.)_([^_])(/.*)?$/', $_SERVER['REQUEST_URI'], $matches);
e9e9306b	25
e9e9306b	26	if ($matches) {
0337d704	27
e9e9306b	28	$action = $matches[1];
	29	$mbox = $matches[2];
	30	$fqdn = strtolower($matches[3]);
19413120	31	$sup = $matches[4];
eaf30d86	32
e9e9306b	33	if ($fqdn == 'polytechnique.org') {
19413120	34	http_redirect("https://www.polytechnique.org/lists/$action/$mbox$sup");
e9e9306b	35	}
	36
	37	$res = XDB::query("select diminutif from groupex.asso where mail_domain = {?}", $fqdn);
	38	if ($gpx = $res->fetchOneCell()) {
19413120	39	http_redirect("http://www.polytechnique.net/$gpx/lists/$action/$mbox$sup");
e9e9306b	40	}
	41	}
	42	?>
0337d704	43	<!DOCTYPE HTML PUBLIC "-//IETF//DTD HTML 2.0//EN">
e9e9306b	44	<html>
	45	<head>
	46	<title>404 Not Found</title>
	47	</head>
	48	<body>
	49	<h1>Not Found</h1>
	50	The requested URL <?php echo $_SERVER['REQUEST_URI'] ?> was not found on this server.<p>
	51	<hr>
	52	<address>Apache Server at www.carva.org Port 80</address>
	53	</body>
19413120	54	</html>
19413120	55	<?php
a7de4ef7	56	// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
a7de4ef7	57	?>