]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - scripts/triminboxes.php
0d545b3263f5014c78c4ef75056abb14ff08f182
[quix0rs-gnu-social.git] / scripts / triminboxes.php
1 #!/usr/bin/env php
2 <?php
3 /*
4  * Laconica - a distributed open-source microblogging tool
5  * Copyright (C) 2009, Control Yourself, Inc.
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as published by
9  * the Free Software Foundation, either version 3 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 Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  */
20
21 # Abort if called from a web server
22 if (isset($_SERVER) && array_key_exists('REQUEST_METHOD', $_SERVER)) {
23     print "This script must be run from the command line\n";
24     exit(1);
25 }
26
27 ini_set("max_execution_time", "0");
28 ini_set("max_input_time", "0");
29 set_time_limit(0);
30 mb_internal_encoding('UTF-8');
31
32 define('INSTALLDIR', realpath(dirname(__FILE__) . '/..'));
33 define('LACONICA', true);
34
35 // Preset the server at the command line
36
37 $server = ($argc > 2) ? $argv[2] : null;
38 $path   = ($argc > 3) ? $argv[3] : null;
39
40 require_once(INSTALLDIR . '/lib/common.php');
41
42 $user = new User();
43 if ($argc > 1) {
44     $user->whereAdd('id > ' . $argv[1]);
45 }
46 $cnt = $user->find();
47
48 while ($user->fetch()) {
49
50     $inbox_entry = new Notice_inbox();
51     $inbox_entry->user_id = $user->id;
52     $inbox_entry->orderBy('created DESC');
53     $inbox_entry->limit(1000, 1);
54
55     $id = null;
56
57     if ($inbox_entry->find(true)) {
58         $id = $inbox_entry->notice_id;
59     }
60
61     $inbox_entry->free();
62     unset($inbox_entry);
63
64     if (is_null($id)) {
65         continue;
66     }
67
68     $start = microtime(true);
69
70     $old_inbox = new Notice_inbox();
71     $cnt = $old_inbox->query('DELETE from notice_inbox WHERE user_id = ' . $user->id . ' AND notice_id < ' . $id);
72     $old_inbox->free();
73     unset($old_inbox);
74
75     print "Deleted $cnt notices for $user->nickname ($user->id).\n";
76
77     $finish = microtime(true);
78
79     $delay = 3.0 * ($finish - $start);
80
81     print "Delaying $delay seconds...";
82
83     // Wait to let slaves catch up
84
85     usleep($delay * 1000000);
86
87     print "DONE.\n";
88 }