DataObjects/ProjectDirectory.php
[Pman.Core] / DataObjects / Projects.php
1 <?php
2 /**
3  * Table Definition for Projects
4  */
5 require_once 'DB/DataObject.php';
6
7 class Pman_Core_DataObjects_Projects extends DB_DataObject 
8 {
9     ###START_AUTOCODE
10     /* the code below is auto generated do not remove the above tag */
11
12     public $__table = 'Projects';                        // table name
13     public $id;                              // int(11)  not_null primary_key auto_increment
14     public $name;                            // string(254)  not_null
15     public $remarks;                         // blob(65535)  not_null blob
16     public $owner_id;                        // int(11)  
17     public $code;                            // string(32)  not_null multiple_key
18     public $active;                          // int(11)  
19     public $type;                            // string(1)  not_null
20     public $client_id;                       // int(11)  not_null
21     public $team_id;                         // int(11)  not_null
22     public $file_location;                   // string(254)  not_null
23     public $open_date;                       // date(10)  binary
24     public $open_by;                         // int(11)  not_null
25     public $countries;                       // string(128)  not_null
26     public $languages;                       // string(128)  not_null
27     public $close_date;                      // date(10)  binary
28     public $agency_id;                       // int(11)  not_null
29
30     
31     /* the code above is auto generated do not remove the tag below */
32     ###END_AUTOCODE
33     function getProjectManagers()
34     {
35         $c = DB_DataObject::factory('Companies');
36         $c->isOwner = 1;
37         if (!$c->find(true)) {
38             return array();
39         }
40         
41         
42         $pmids = array();
43         $pd = DB_DataObject::factory('ProjectDirectory');
44         $pd->project_id = $this->id;
45         $pd->company_id = $c->id;
46         $pd->ispm = 1;
47         if (!$pd->count()) {
48             return array();
49         }
50         $pd->selectAdd();
51         $pd->selectAdd('distinct (person_id)');
52         
53         $pd->find();
54         while ($pd->fetch()) {
55             $pmids[] = $pd->person_id;
56             
57         }
58         $ret = array();
59         $p =  DB_DataObject::factory('Person');
60         $p->whereAdd('id IN ('. implode(',', $pmids) .')');
61         $p->find();
62         while ($p->fetch()) {
63             $ret[] = clone($p);
64         }
65         return $ret;
66         
67     }
68
69     function toEventString() {
70         $c = $this->client();
71         return ($c->id ? $c->toEventString() : '??'). ':' . $this->name;
72     }
73     
74     /**
75      * apply filter arguemnts
76      * @param $query - see below
77      * @param $authUser  - authenticated user
78      * 
79      * Query specs:
80      *   [query]
81      *       project_search = text string.
82      *       project_indaterange - a/c/o 
83      *       project_filter = ALL || P,N,U ....
84      * 
85      * // to get a users valid project list - just use array('query' => array('project_filter'=> 'ALL'));
86      * 
87      */
88     
89     function applyFilters($q, $au)
90     {
91          
92         if (!empty($q['query']['project_search'])) {
93             $s = $this->escape($q['query']['project_search']);
94             $this->whereAdd(" (Projects.code LIKE '$s%') OR (Projects.name LIKE '%$s%')");
95         }
96         // types of project to list ... - default is only the open ones...
97         if (!empty($q['query']['project_indaterange'])) {
98             switch($q['query']['project_indaterange']) {
99                 case 'A': // all
100                     break; 
101                 case 'C': // current
102                      $this->whereAdd('Projects.close_date >= NOW()');
103                     break;
104                 case 'O': // old
105                     $this->whereAdd('Projects.close_date < NOW()');
106                     break;
107                }
108         }
109         
110         if (empty($q['query']['project_filter'])  || $q['query']['project_filter'] != 'ALL') {
111             
112                
113             $pf = empty($q['query']['project_filter']) ? 'P,N,U' : $q['query']['project_filter'];
114             $bits= explode(',' ,$pf);
115             foreach($bits as $i=>$k) {
116                 $bits[$i] = $this->escape($k);
117             }
118             $this->whereAdd("Projects.type in ('". implode("','", $bits) . "')");
119         }
120          // user projects!!!! - make sure they can only see project they are suppsed to..
121          // only applies to document stuff..
122         
123         //&& $au->hasPerm('Documents.Documents','S') << this is dependant on the doc modules
124           
125         if (!$au->hasPerm('Core.Projects_All','S') ) {
126             
127             
128             
129             $pr = DB_DataObject::factory('Projects');
130             $pr->whereAdd("Projects.type IN ('N','X')");
131             $prjs = $pr->fetchAll('id');
132             
133             DB_DataObject::debugLevel(1);
134             $pd = DB_DataObject::factory('ProjectDirectory');
135             $pd->joinAdd(DB_DataObject::factory('Projects'), 'LEFT');
136             $pd->whereAdd("Projects.type NOT IN ('N','X')");
137             $pd->person_id = $au->id;
138             
139             $prjs = array_merge($prjs, $pd->fetchAll('project_id'));
140             if (count($prjs)) {
141                 $this->whereAdd("
142                      (Projects.id IN (".implode(',', $prjs).")) 
143                 ");
144             }  else {
145                 $this->whereAdd("1=0"); // can see nothing!!!
146             }
147         }
148         
149         if (!empty($q['query']['distinct_client_id'])) {
150           // DB_DataObjecT::debuglevel(1);
151             $this->selectAdd();
152             $this->selectAdd('distinct(client_id)');
153             $this->selectAs(DB_DataObject::factory('Companies'), 'client_id_%s','join_client_id_id');
154             $this->groupBy('client_id');
155              
156         }
157         
158         // this is clipping related..  -- we should have an API for addons like this.. (and docs)
159         
160         if ($au->company()->comptype == 'SUPPLIER') {
161             $pr = DB_DataObject::factory('CampaignAssign');
162             $pr->supplier_id = $au->company_id;
163             $prjs = $pr->fetchAll('project_id');
164              if (count($prjs)) {
165                 $this->whereAdd("
166                      (Projects.id IN (".implode(',', $prjs).")) 
167                 ");
168             }  else {
169                 $this->whereAdd("1=0"); // can see nothing!!!
170             }
171         }
172         if ($au->company()->comptype == 'CLIENT') {
173             $this->client_id = $au->company()->id; // can see nothing!!!
174             
175         }
176         
177         
178         
179                  
180         
181         
182         
183     }
184     function whereAddIn($key, $list, $type) {
185         $ar = array();
186         foreach($list as $k) {
187             $ar[] = $type =='int' ? (int)$k : $this->escape($k);
188         }
189         if (!$ar) {
190             return;
191         }
192         $this->whereAdd("$key IN (". implode(',', $ar). ')');
193     }
194     function onInsert()
195     {
196         $oo = clone($this);
197         if (empty($this->code)) {
198             $this->code = 'C' + $this->client_id + '-P' + $this->id;
199             $this->update($oo);
200         }
201     }
202     
203     function onUpdate($old)
204     {
205         $oo = clone($this);
206         if (empty($this->code)) {
207             $this->code = 'C' + $this->client_id + '-P' + $this->id;
208             $this->update($oo);
209         }
210         
211         if ($old->code == $this->code) {
212             return;
213         }
214         
215         
216         $opts = PEAR::getStaticProperty('Pman', 'options');
217         
218         $olddir =  $opts['storedir'] . '/' . $old->code;
219         $newdir =  $opts['storedir'] . '/' . $this->code;
220         if ( file_exists($olddir)) {
221             move ($olddir, $newdir);
222         }
223          
224         
225     }
226     
227     function prune()
228     {
229         if (!$this->prune) { // non-expiring..
230             return;
231         }
232         
233         $d = DB_DataObject::factory('Document');
234         $d->whereAdd("date_rec < NOW - INTERVAL {$this->expires} DAYS"); 
235         $d->find();
236         while ($d->fetch()) {
237             $d->prune();
238         }
239         
240         
241         
242         
243         
244         
245         
246     }
247     /**
248      * our camp interface uses the format Cxxx-Pyyyyyy to refer to the project.
249      */
250     function getByCodeRef($str)
251     {
252         $bits = explode('-', $str);
253         if ((count($bits) != 2) || $bits[0][0] != 'C' ||  $bits[1][0] != 'P' ) {
254             return false;
255         }
256         $comp = substr($bits[0], 1);
257         $id = (int) substr($bits[1], 1);
258         return $id && $this->get($id);
259         
260     }
261     
262     
263     function i18toArray($type, $str) 
264     {
265         if (empty($str)) {
266             return array();
267         }
268         static $au;
269         static $langs;
270         static $cts;
271         
272         if (!$au) {
273             $u = DB_DataObject::factory('Person');
274             $au =$u->getAuthUser();
275             $lang = empty($au->lang ) ? 'en' : $au->lang;
276             $lbits = explode('_', strtoupper($lang));
277             // no validation here!!!!
278             require_once 'I18Nv2/Language.php';
279             require_once 'I18Nv2/Country.php';
280             $langs = new I18Nv2_Language($lbits[0]); // locale support not there??
281             $cts = new I18Nv2_Country($lbits[0]); // lo
282             
283         }
284         $lk = $type == 'c' ? $cts : $langs;
285         $ar  =explode(',', $str);
286         $ret = array();
287         foreach($ar as $k) {
288             $ret[] = array('code'=>$k, 'title' => $lk->getName($k));
289         }
290         return $ret;
291         // work out locale...
292         
293         
294         
295         
296     }
297     
298     
299     function toRooArray($req= array()) {
300         $ret = parent::toArray();
301         // sor tout 
302         $ret['countrylist'] = $this->I18toArray('c',$ret['countries']);
303         $ret['languagelist'] = $this->I18toArray('l',$ret['languages']);
304         return $ret;
305     }
306     function setFromRoo($q) 
307     {
308         $this->setFrom($q);
309         if (isset($q['open_date'])) {
310             $this->open_date = date('Y-m-d', strtotime(
311                 implode('-', array_reverse(explode('/', $q['open_date'])))
312             ));
313         }
314         return true;
315     } 
316     /**
317      * fetch a list of user projects.
318      * if you need to filter open/closed.. then add whereAdds before calling
319      */
320     function getUserProjects($au, $data='id') // COMPANY BASED!!!!
321     {
322         $id = (int) $au->company_id;
323         $this->whereAdd("
324             (client_id= $id) OR (agency_id= $id)
325         ");
326         if (!empty($data)) {
327             $this->selectAdd();
328             $this->selectAdd($data);
329         }
330         $this->find();
331         $ret = array();
332         while ($this->fetch()) {
333             $ret[] = empty($data) ? clone($this) : $this->$data;
334         }
335         return $ret;
336             
337     }
338     
339     
340     function client()
341     {
342         $c = DB_DataObject::factory('Companies');
343         $c->get($this->client_id);
344         return $c;
345     }
346     
347     /**
348      * check who is trying to access this. false == access denied..
349      */
350     function checkPerm($lvl, $au) 
351     {
352         return $au->hasPerm("Core.Projects_Member_Of",$lvl) || $au->hasPerm("Core.Projects_All",$lvl);
353     }
354 }