Fixes a PHP warning due to usage of mktime(); fixes capitalization in bin/cron/clean...
[platal.git] / bin / cron / clean.php
CommitLineData
ee68ddc1 1#!/usr/bin/php5 -q
0337d704 2<?php
3/***************************************************************************
179afa7f 4 * Copyright (C) 2003-2008 Polytechnique.org *
0337d704 5 * http://opensource.polytechnique.org/ *
6 * *
7 * This program is free software; you can redistribute it and/or modify *
8 * it under the terms of the GNU General Public License as published by *
9 * the Free Software Foundation; either version 2 of the License, or *
10 * (at your option) any later version. *
11 * *
12 * This program is distributed in the hope that it will be useful, *
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
15 * GNU General Public License for more details. *
16 * *
17 * You should have received a copy of the GNU General Public License *
18 * along with this program; if not, write to the Free Software *
19 * Foundation, Inc., *
20 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
21 ***************************************************************************/
22
23require('./connect.db.inc.php');
24
25function query ($sql) {
08cce2ff 26 XDB::execute($sql);
0380bf85 27 if (XDB::errno() != 0) {
28 echo "error in \"$sql\" :\n", XDB::error(), "\n";
0337d704 29 }
30}
31
a7de4ef7 32// la table des notifs est nettoyée
69e3c9f3 33$eight_days_ago = date("YmdHis", time() - 8*24*60*60);
0337d704 34query("DELETE FROM watch_ops WHERE known<$eight_days_ago");
35
36query("DELETE FROM register_pending WHERE TO_DAYS(NOW()) - TO_DAYS(date) >= 365");
69e3c9f3 37query("DELETE FROM register_pending WHERE hash = 'INSCRIT'");
0337d704 38
a7de4ef7 39// quelques tables sont triées pour que la lecture triée soit plus facile
69e3c9f3
VZ
40query("ALTER TABLE applis_def ORDER BY text");
41query("ALTER TABLE binets_def ORDER BY text");
42query("ALTER TABLE groupesx_def ORDER BY text");
43query("ALTER TABLE secteur ORDER BY text");
44query("ALTER TABLE sections ORDER BY text");
0337d704 45
46
a7de4ef7 47// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
0337d704 48?>