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=array())
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        /*
52         $f = DB_DataObject::Factory('Events');
53         $f->query("
54             DELETE FROM Events where 
55                   event_when < NOW() - INTERVAL {$inM} MONTH
56                   AND
57                   action != 'NOTIFY'
58                   LIMIT 100000
59         ");
60         */
61         // notificication events occur alot - so we should trash them more frequently..
62       /*  $f = DB_DataObject::Factory('reader_article');
63         $f->query("
64             DELETE FROM Events where 
65                   event_when < NOW() - INTERVAL 1 MONTH
66                   AND
67                   action IN ('NOTIFY')
68                   LIMIT 100000
69         ");
70         */
71         // rather than deleting them all, it's probably best to just delete notify events that occured to often.
72         // eg. when we tried to deliver multiple times without success...
73         /*
74          *
75          SELECT on_id, on_table, min(id) as min_id, max(id) as max_id, count(*) as mm FROM Events
76          WHERE action = 'NOTIFY' and event_when < NOW() - INTERVAL 1 WEEK GROUP BY  on_id, on_table HAVING  mm > 2 ORDER BY mm desc;
77          */
78         
79         //DB_DataObject::debugLevel(1);
80         $f = DB_DataObject::Factory('Events');
81         $f->selectAdd();
82         $f->selectAdd("on_id, on_table, min(id) as min_id, max(id) as max_id, count(*) as mm");
83         $f->whereAdd("action = 'NOTIFY' and event_when < NOW() - INTERVAL 1 WEEK");
84         $f->groupBy('on_id, on_table');
85         $f->having("mm > 2");
86         $f->orderBy('mm desc') ;
87         $f->limit(10000);
88         $ar = $f->fetchAll();
89         foreach($ar as $f) {
90             $q = DB_DataObject::Factory('Events');
91             $q->query("DELETE FROM Events where 
92                   action = 'NOTIFY'
93                   AND
94                   on_id = {$f->on_id}
95                   AND
96                   on_table = '{$q->escape($f->on_table)}'
97                   AND
98                   id > {$f->min_id}
99                   AND
100                   id < {$f->max_id}
101             ");
102         }
103         
104         
105
106         
107         
108         
109         // pruning is for our press project - so we do not clean up dependant tables at present..
110         
111         if (function_exists('posix_getpwuid')) {
112             $uinfo = posix_getpwuid( posix_getuid () ); 
113          
114             $user = $uinfo['name'];
115         } else {
116             $user = getenv('USERNAME'); // windows.
117         }
118         
119         $ff = HTML_Flexyframework::get()->Pman;
120         
121         $y = date("Y");
122         $m = date("m");
123         $rootDir = $ff['storedir'].'/_events_/'.$user;
124         
125         $dirs = array_filter(glob($rootDir."/*"), 'is_dir');
126         foreach($dirs as $d){
127             $mdirs = array_filter(glob($d."/*"), 'is_dir');
128             foreach($mdirs as $md){
129                 $dirDate = str_replace($rootDir."/", '', $md);
130                 if(strtotime($dirDate."/01") < strtotime("now - {$inM} months")){
131                     //echo "remove $md\n";
132                     $this->delTree($md);
133                       //  echo $md . " is removed. \n";
134                     
135                 }
136             }
137         }
138         
139         exit;
140     }
141     
142     function delTree($dir)
143     {
144         $files = array_diff(scandir($dir), array('.','..'));
145         echo "$dir : Removing " . count($files) . " files\n";
146         clearstatcache();
147         foreach ($files as $file){
148             if (!file_exists("$dir/$file")) {
149                 continue;
150             }
151             if (is_dir("$dir/$file")) {
152                 $this->delTree("$dir/$file");
153                 continue;
154             }
155             unlink("$dir/$file");
156         }
157         return rmdir($dir); 
158     }
159     
160 }