Prune.php
[Pman.Core] / Prune.php
1 <?php
2
3
4 /**
5  * Description of Prune
6  *
7  * @author chris
8  */
9
10 require_once 'Pman.php';
11 class Pman_Core_Prune extends Pman
12 {
13     //put your code here
14     static $cli_desc = "Core Prune -- remove old event data (6 months is normally a good idea).";
15     static $cli_opts = array(
16         'months' => array(
17             'desc' => 'How many months',
18             //'default' => 0,
19             'short' => 'm',
20             'min' => 1,
21             'max' => 1,
22             
23         )
24     );
25     var $cli = false;
26     
27     function getAuth() {
28         $ff = HTML_FlexyFramework::get();
29         if (!empty($ff->cli)) {
30             $this->cli = true;
31             return true;
32         }
33 //        return true;// for test only
34         return false;
35     }
36     
37     function get($m="", $opts)
38     {
39         
40         // prune irrelivant stuff..
41        
42         
43         
44         $this->prune((int)$opts['months']);
45     }
46     
47     function prune($inM)
48     {
49         // 40 seconds ? to delete 100K records..
50        // DB_DataObject::debugLevel(1);
51         $f = DB_DataObject::Factory('reader_article');
52         $f->query("
53             DELETE FROM Events where 
54                   event_when < NOW() - INTERVAL {$inM} MONTH
55                   AND
56                   action != 'NOTIFY'
57                   LIMIT 100000
58         ");
59         
60         // notificication events occur alot - so we should trash them more frequently..
61       /*  $f = DB_DataObject::Factory('reader_article');
62         $f->query("
63             DELETE FROM Events where 
64                   event_when < NOW() - INTERVAL 1 MONTH
65                   AND
66                   action IN ('NOTIFY')
67                   LIMIT 100000
68         ");
69         */
70         // rather than deleting them all, it's probably best to just delete notify events that occured to often.
71         // eg. when we tried to deliver multiple times without success...
72         /*
73          *
74          SELECT on_id, on_table, min(id) as min_id, max(id) as max_id, count(*) as mm FROM Events
75          WHERE action = 'NOTIFY' and event_when < NOW() - INTERVAL 1 WEEK GROUP BY  on_id, on_table HAVING  mm > 2 ORDER BY mm desc;
76          */
77         
78         //DB_DataObject::debugLevel(1);
79         $f = DB_DataObject::Factory('Events');
80         $f->selectAdd();
81         $f->selectAdd("on_id, on_table, min(id) as min_id, max(id) as max_id, count(*) as mm");
82         $f->whereAdd("action = 'NOTIFY' and event_when < NOW() - INTERVAL 1 WEEK");
83         $f->groupBy('on_id, on_table');
84         $f->having("mm > 2");
85         $f->orderBy('mm desc') ;
86         $f->limit(10000);
87         $ar = $f->fetchAll();
88         foreach($ar as $f) {
89             $q = DB_DataObject::Factory('Events');
90             $q->query("DELETE FROM Events where 
91                   action = 'NOTIFY'
92                   AND
93                   on_id = {$f->on_id}
94                   AND
95                   on_table = '{$q->escape($f->on_table)}'
96                   AND
97                   id > {$f->min_id}
98                   AND
99                   id < {$f->max_id}
100             ");
101         }
102         
103         
104
105         
106         
107         
108         // pruning is for our press project - so we do not clean up dependant tables at present..
109         
110         if (function_exists('posix_getpwuid')) {
111             $uinfo = posix_getpwuid( posix_getuid () ); 
112          
113             $user = $uinfo['name'];
114         } else {
115             $user = getenv('USERNAME'); // windows.
116         }
117         
118         $ff = HTML_Flexyframework::get()->Pman;
119         
120         $y = date("Y");
121         $m = date("m");
122         $rootDir = $ff['storedir'].'/_events_/'.$user;
123         
124         $dirs = array_filter(glob($rootDir."/*"), 'is_dir');
125         foreach($dirs as $d){
126             $mdirs = array_filter(glob($d."/*"), 'is_dir');
127             foreach($mdirs as $md){
128                 $dirDate = str_replace($rootDir."/", '', $md);
129                 if(strtotime($dirDate."/01") < strtotime("now - {$inM} months")){
130                     //echo "remove $md\n";
131                     $this->delTree($md);
132                       //  echo $md . " is removed. \n";
133                     
134                 }
135             }
136         }
137         
138         exit;
139     }
140     
141     function delTree($dir)
142     {
143         $files = array_diff(scandir($dir), array('.','..'));
144         echo "$dir : Removing " . count($files) . " files\n";
145         clearstatcache();
146         foreach ($files as $file){
147             if (!file_exists("$dir/$file")) {
148                 continue;
149             }
150             if (is_dir("$dir/$file")) {
151                 $this->delTree("$dir/$file");
152                 continue;
153             }
154             unlink("$dir/$file");
155         }
156         return rmdir($dir); 
157     }
158     
159 }