5020fb6d8b1e585413d5c9fbb0c757345a571688
[Pman.Core] / DataObjects / Core_person.php
1 <?php
2 /**
3  * Table Definition for Person
4  */
5 class_exists('DB_DataObject') ? '' : require_once 'DB/DataObject.php';
6
7
8 class Pman_Core_DataObjects_Core_person extends DB_DataObject 
9 {
10     ###START_AUTOCODE
11     /* the code below is auto generated do not remove the above tag */
12
13     public $__table = 'core_person';                          // table name
14     public $id;                              // int(11)  not_null primary_key auto_increment
15     public $email;                           // string(128)  not_null
16     public $alt_email;
17     
18     public $company_id;                      // int(11)  
19     public $office_id;                       // int(11)  
20     public $name;                            // string(128)  not_null
21     public $firstname;                            // string(128)  not_null
22     public $lastname;                            // string(128)  not_null
23     public $phone;                           // string(32)  not_null
24     public $fax;                             // string(32)  not_null
25     
26     public $role;                            // string(32)  not_null
27     public $remarks;                         // blob(65535)  not_null blob
28     public $passwd;                          // string(64)  not_null
29     public $owner_id;                        // int(11)  not_null
30     public $lang;                            // string(8)  
31     public $no_reset_sent;                   // int(11)  
32     public $action_type;                     // string(32)  
33     public $project_id;                      // int(11)
34
35     
36     public $active;                          // int(11)  not_null
37     public $deleted_by;                      // int(11)  not_null
38     public $deleted_dt;                      // datetime(19)  binary
39
40
41     public $name_facebook; // VARCHAR(128) NULL;
42     public $url_blog; // VARCHAR(256) NULL ;
43     public $url_twitter; // VARCHAR(256) NULL ;
44     public $url_linkedin; // VARCHAR(256) NULL ;
45     public $linkedin_id; // VARCHAR(256) NULL ;
46     
47     public $phone_mobile; // varchar(32)  NOT NULL  DEFAULT '';
48     public $phone_direct; // varchar(32)  NOT NULL  DEFAULT '';
49     public $countries; // VARCHAR(128) NULL;
50     
51     /* the code above is auto generated do not remove the tag below */
52     ###END_AUTOCODE
53     
54     function owner()
55     {
56         $p = DB_DataObject::Factory($this->tableName());
57         $p->get($this->owner_id);
58         return $p;
59     }
60     
61     /**
62      *
63      *
64      *
65      *
66      *  FIXME !!!! -- USE Pman_Core_Mailer !!!!!
67      *
68      *
69      *
70      *  
71      */
72     function buildMail($templateFile, $args)
73     {
74           
75         $args = (array) $args;
76         $content  = clone($this);
77         
78         foreach((array)$args as $k=>$v) {
79             $content->$k = $v;
80         }
81         
82         $ff = HTML_FlexyFramework::get();
83         
84         
85         //?? is this really the place for this???
86         if (
87                 !$ff->cli && 
88                 empty($args['no_auth']) &&
89                 !in_array($templateFile, array(
90                     // templates that can be sent without authentication.
91                      'password_reset' ,
92                      'password_welcome'
93                  ))
94             ) {
95             
96             $content->authUser = $this->getAuthUser();
97             if (!$content->authUser) {
98                 return PEAR::raiseError("Not authenticated");
99             }
100         }
101         
102         // should handle x-forwarded...
103         
104         $content->HTTP_HOST = isset($_SERVER["HTTP_HOST"]) ?
105             $_SERVER["HTTP_HOST"] :
106             (isset($ff->HTTP_HOST) ? $ff->HTTP_HOST : 'localhost');
107             
108         /* use the regex compiler, as it doesnt parse <tags */
109         
110         $tops = array(
111             'compiler'    => 'Flexy',
112             'nonHTML' => true,
113             'filters' => array('SimpleTags','Mail'),
114             //     'debug'=>1,
115         );
116         
117         
118         
119         if (!empty($args['templateDir'])) {
120             $tops['templateDir'] = $args['templateDir'];
121         }
122         
123         
124         
125         require_once 'HTML/Template/Flexy.php';
126         $template = new HTML_Template_Flexy( $tops );
127         $template->compile("mail/$templateFile.txt");
128         
129         /* use variables from this object to ouput data. */
130         $mailtext = $template->bufferedOutputObject($content);
131         
132         $htmlbody = false;
133         // if a html file with the same name exists, use that as the body
134         // I've no idea where this code went, it was here before..
135         if (false !== $template->resolvePath ( "mail/$templateFile.html" )) {
136             $tops['nonHTML'] = false;
137             $template = new HTML_Template_Flexy( $tops );
138             $template->compile("mail/$templateFile.html");
139             $htmlbody = $template->bufferedOutputObject($content);
140             
141         }
142         
143         
144         
145         //echo "<PRE>";print_R($mailtext);
146         //print_R($mailtext);exit;
147         /* With the output try and send an email, using a few tricks in Mail_MimeDecode. */
148         require_once 'Mail/mimeDecode.php';
149         require_once 'Mail.php';
150         
151         $decoder = new Mail_mimeDecode($mailtext);
152         $parts = $decoder->getSendArray();
153         
154         if (PEAR::isError($parts)) {
155             return $parts;
156             //echo "PROBLEM: {$parts->message}";
157             //exit;
158         } 
159         list($recipents,$headers,$body) = $parts;
160         $recipents = array($this->email);
161         if (!empty($content->bcc) && is_array($content->bcc)) {
162             $recipents =array_merge($recipents, $content->bcc);
163         }
164         $headers['Date'] = date('r');
165         
166         if ($htmlbody !== false) {
167             require_once 'Mail/mime.php';
168             $mime = new Mail_mime(array('eol' => "\n"));
169             $mime->setTXTBody($body);
170             $mime->setHTMLBody($htmlbody);
171             // I think there might be code in mediaoutreach toEmail somewhere
172             // h embeds images here..
173             $body = $mime->get();
174             $headers = $mime->headers($headers);
175             
176         }
177         
178          
179         
180         return array(
181             'recipients' => $recipents,
182             'headers'    => $headers,
183             'body'      => $body
184         );
185         
186         
187     }
188     
189     
190     /**
191      * send a template
192      * - user must be authenticate or args[no_auth] = true
193      *   or template = password_[reset|welcome]
194      * 
195      */
196     function sendTemplate($templateFile, $args)
197     {
198         
199         $ar = $this->buildMail($templateFile, $args);
200       
201         
202         //print_r($recipents);exit;
203         $mailOptions = PEAR::getStaticProperty('Mail','options');
204         $mail = Mail::factory("SMTP",$mailOptions);
205         
206         if (PEAR::isError($mail)) {
207             return $mail;
208         } 
209         $oe = error_reporting(E_ALL & ~E_NOTICE & ~E_STRICT);
210         $ret = $mail->send($ar['recipients'],$ar['headers'],$ar['body']);
211         error_reporting($oe);
212        
213         return $ret;
214     
215     }
216     
217   
218     
219     
220     function getEmailFrom()
221     {
222         if (empty($this->name)) {
223             return $this->email;
224         }
225         return '"' . addslashes($this->name) . '" <' . $this->email . '>';
226     }
227     
228     function toEventString() 
229     {
230         return empty($this->name) ? $this->email : $this->name;
231     } 
232     
233     function verifyAuth()
234     { 
235         $ff= HTML_FlexyFramework::get();
236         if (!empty($ff->Pman['auth_comptype']) &&
237             (!$this->company_id || ($ff->Pman['auth_comptype'] != $this->company()->comptype))
238            ){
239             
240             $sesPrefix = $this->sesPrefix();
241        
242             $_SESSION[get_class($this)][$sesPrefix .'-auth'] = "";
243             
244             return false;
245             
246             //$ff->page->jerr("Login not permited to outside companies");
247         }
248         return true;
249         
250     }    
251    
252    
253     //   ---------------- authentication / passwords and keys stuff  ----------------
254     function isAuth()
255     {
256         
257         @session_start();
258        
259         $ff= HTML_FlexyFramework::get();
260        
261         $sesPrefix = $this->sesPrefix();
262         
263         if (!empty($_SESSION[get_class($this)][$sesPrefix .'-auth'])) {
264             // in session...
265             $a = unserialize($_SESSION[get_class($this)][$sesPrefix .'-auth']);
266              
267             $u = DB_DataObject::factory($this->tableName());
268             if ($a->id && $u->get($a->id)) { //&& strlen($u->passwd)) {
269               
270                 return $u->verifyAuth();  // got authentication...
271                 
272     
273             }
274             
275             unset($_SESSION[get_class($this)][$sesPrefix .'-auth']);
276             unset($_SESSION[get_class($this)][$sesPrefix .'-timeout']);
277             setcookie('Pman.timeout', -1, time() + (30*60), '/');
278             
279         }
280         
281         // http basic auth..
282         $u = DB_DataObject::factory($this->tableName());
283         
284         if (!empty($_SERVER['PHP_AUTH_USER']) 
285             &&
286             !empty($_SERVER['PHP_AUTH_PW'])
287             &&
288             $u->get('email', $_SERVER['PHP_AUTH_USER'])
289             &&
290             $u->checkPassword($_SERVER['PHP_AUTH_PW'])
291            ) {
292             $_SESSION[get_class($this)][$sesPrefix .'-auth'] = serialize($u);
293             return true; 
294         }
295         //die("test init");
296         if (!$this->canInitializeSystem()) {
297           //  die("can not init");
298             return false;
299         }
300         
301         
302         // local auth - 
303         $default_admin = false;
304         if (!empty($ff->Pman['local_autoauth']) && 
305             ($ff->Pman['local_autoauth'] === true) &&
306             (!empty($_SERVER['SERVER_ADDR'])) &&
307             ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
308             ($_SERVER['REMOTE_ADDR'] == '127.0.0.1')  
309         ) {
310             $group = DB_DataObject::factory('core_group');
311             $group->get('name', 'Administrators');
312             
313             $member = DB_DataObject::factory('core_group_member');
314             $member->autoJoin();
315             $member->group_id = $group->id;
316             $member->whereAdd("
317                 join_user_id_id.id IS NOT NULL
318             ");
319             if($member->find(true)){
320                 $default_admin = DB_DataObject::factory($this->tableName());
321                 if(!$default_admin->get($member->user_id)){
322                     $default_admin = false;
323                 }
324             }
325         }
326         
327         //var_dump($ff->Pman['local_autoauth']);         var_dump($_SERVER); exit;
328         $u = DB_DataObject::factory($this->tableName());
329         $ff = HTML_FlexyFramework::get();
330         
331         if (!empty($ff->Pman['local_autoauth']) && 
332             (!empty($_SERVER['SERVER_ADDR'])) &&
333             ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
334             ($_SERVER['REMOTE_ADDR'] == '127.0.0.1')  &&
335             ($default_admin ||  $u->get('email', $ff->Pman['local_autoauth']))
336         ) {
337             $_SESSION[get_class($this)][$sesPrefix .'-auth'] = serialize($default_admin ? $default_admin : $u);
338             return true;
339         }
340         
341         //var_dump(session_id());
342         //var_dump($_SESSION[__CLASS__]);
343         
344         //if (!empty(   $_SESSION[__CLASS__][$sesPrefix .'-empty'] )) {
345         //    return false;
346         //}
347         //die("got this far?");
348         // not in session or not matched...
349         $u = DB_DataObject::factory($this->tableName());
350         $u->whereAdd(' LENGTH(passwd) > 0');
351         $n = $u->count();
352         $_SESSION[get_class($this)][$sesPrefix .'-empty']  = $n;
353         $error =  PEAR::getStaticProperty('DB_DataObject','lastError');
354         if ($error) {
355             die($error->toString()); // not really a good thing to do...
356         }
357         if (!$n){ // authenticated as there are no users in the system...
358             return true;
359         }
360         
361         return false;
362         
363     }
364     
365     function canInitializeSystem()
366     {
367         
368         return !strcasecmp(get_class($this) , __CLASS__);
369     }
370     
371     function getAuthUser()
372     {
373         if (!$this->isAuth()) {
374             return false;
375         }
376         
377         $ff= HTML_FlexyFramework::get();
378         
379         $sesPrefix = $this->sesPrefix();
380         
381         //var_dump(array(get_class($this),$sesPrefix .'-auth'));
382        
383         if (!empty($_SESSION[get_class($this)][$sesPrefix .'-auth'])) {
384             $a = unserialize($_SESSION[get_class($this)][$sesPrefix .'-auth']);
385             
386             $u = DB_DataObject::factory($this->tableName()); // allow extending this ...
387             $u->autoJoin();
388             if ($u->get($a->id)) { /// && strlen($u->passwd)) {  // should work out the pid .. really..
389                 
390                 $_SESSION[get_class($this)][$sesPrefix .'-auth-timeout'] = time() + (30*60); // eg. 30 minutes
391                 setcookie('Pman.timeout', time() + (30*60), time() + (30*60), '/');
392                 
393                 $user = clone ($u);
394                 return clone($user);
395             
396             }
397             unset($_SESSION[get_class($this)][$sesPrefix .'-auth']);
398             unset($_SESSION[get_class($this)][$sesPrefix .'-timeout']);
399             setcookie('Pman.timeout', -1, time() + (30*60), '/');
400             
401         }
402         
403         
404         
405         if (!$this->canInitializeSystem()) {
406             return false;
407         }
408         
409         
410         
411         if (empty(   $_SESSION[get_class($this)][$sesPrefix .'-empty'] )) {
412             $u = DB_DataObject::factory($this->tableName());
413             $u->whereAdd(' LENGTH(passwd) > 0');
414             $_SESSION[get_class($this)][$sesPrefix .'-empty']  = $u->count();
415         }
416                 
417              
418         if (isset(   $_SESSION[get_class($this)][$sesPrefix .'-empty'] ) && $_SESSION[get_class($this)][$sesPrefix .'-empty']  < 1) {
419             
420             // fake person - open system..
421             //$ce = DB_DataObject::factory('core_enum');
422             //$ce->initEnums();
423             
424             
425             $u = DB_DataObject::factory($this->tableName());
426             $u->id = -1;
427             
428             // if a company has been created fill that in in company_id_id
429             $c = DB_DAtaObject::factory('core_company')->lookupOwner();
430             if ($c) {
431                 $u->company_id_id = $c->pid();
432                 $u->company_id = $c->pid();
433             }
434             
435             return $u;
436             
437         }
438         return false;
439     }     
440     function login()
441     {
442         $this->isAuth(); // force session start..
443         if (!$this->verifyAuth()) { // check for company valid..
444             return false;
445         }
446         
447         // open up iptables at login..
448         $dbname = $this->databaseNickname();
449         touch( '/tmp/run_pman_admin_iptables-'.$dbname);
450          
451         // refresh admin group if we are logged in as one..
452         //DB_DataObject::debugLevel(1);
453         $g = DB_DataObject::factory('core_group');
454         $g->type = 0;
455         $g->get('name', 'Administrators');
456         $gm = DB_DataObject::Factory('core_group_member');
457         if (in_array($g->id,$gm->listGroupMembership($this))) {
458             // refresh admin groups.
459             $gr = DB_DataObject::Factory('core_group_right');
460             $gr->applyDefs($g, 0);
461         }
462         
463         $sesPrefix = $this->sesPrefix();
464         
465         // we should not store the whole data in the session - otherwise it get's huge.
466         $p = DB_DAtaObject::Factory($this->tableName());
467         $p->get($this->pid());
468         
469         $d = $p->toArray();
470         
471         $_SESSION[get_class($this)][$sesPrefix .'-auth-timeout'] = time() + (30*60); // eg. 30 minutes
472         setcookie('Pman.timeout', time() + (30*60), time() + (30*60), '/');
473         
474         //var_dump(array(get_class($this),$sesPrefix .'-auth'));
475         $_SESSION[get_class($this)][$sesPrefix .'-auth'] = serialize((object)$d);
476         // ensure it's written so that ajax calls can fetch it..
477         
478         
479         
480     }
481     function logout()
482     {
483         $this->isAuth(); // force session start..
484         
485         $sesPrefix = $this->sesPrefix();
486         
487         $_SESSION[get_class($this)][$sesPrefix .'-auth-timeout'] = -1;
488         
489         $_SESSION[get_class($this)][$sesPrefix .'-auth'] = "";
490         
491     }    
492     function genPassKey ($t) 
493     {
494         return md5($this->email . $t. $this->passwd);
495     }
496     function simpleAuthKey($m = 0)
497     {
498         $month = $m > -1 ? date('Y-m') : date('Y-m', strtotime('LAST MONTH'));
499         
500         return md5(implode(',' ,  array($month, $this->email , $this->passwd, $this->id)));
501     } 
502     function checkPassword($val)
503     {
504         
505         
506         if (substr($this->passwd,0,1) == '$') {
507             if (password_e)
508             
509             return crypt($val,$this->passwd) == $this->passwd ;
510         }
511         // old style md5 passwords...- cant be used with courier....
512         return md5($val) == $this->passwd;
513     }
514     
515     function setPassword($value) 
516     {
517         if (func_exists('pasword_hash')) {
518             return password_hash($value);
519         }
520         
521         $salt='';
522         while(strlen($salt)<9) {
523             $salt.=chr(rand(64,126));
524             //php -r var_dump(crypt('testpassword', '$1$'. (rand(64,126)). '$'));
525         }
526         $this->passwd = crypt($value, '$1$'. $salt. '$');
527        
528        
529     }      
530     
531     function generatePassword($length = 5) // genearte a password (add set 'rawPasswd' to it's value)
532     {
533         require_once 'Text/Password.php';
534         $this->rawPasswd = strtr(ucfirst(Text_Password::create($length)).ucfirst(Text_Password::create($length)), array(
535         "a"=>"4", "e"=>"3",  "i"=>"1",  "o"=>"0", "s"=>"5",  "t"=>"7"));
536         $this->setPassword($this->rawPasswd);
537         return $this->rawPasswd;
538     }
539     
540     function company()
541     {
542         $x = DB_DataObject::factory('core_company');
543         $x->autoJoin();
544         $x->get($this->company_id);
545         return $x;
546     }
547     function loadCompany()
548     {
549         $this->company = $this->company();
550     }
551     
552     function active()
553     { 
554         return $this->active;
555     }
556     function authUserName($n) // set username prior to acheck user exists query.
557     {
558         
559         $this->whereAdd('LENGTH(passwd) > 1'); 
560         $this->email = $n;
561     }
562     function lang()
563     {
564         if (!func_num_args()) {
565             return $this->lang;
566         }
567         $val = array_shift(func_get_args());
568         if ($val == $this->lang) {
569             return;
570         }
571         $uu = clone($this);
572         $this->lang = $val;
573         $this->update($uu);
574         return $this->lang;
575     }
576             
577     
578     function authUserArray()
579     {
580         
581         $aur = $this->toArray();
582         
583         if ($this->id < 1) {
584             return $aur;
585         }
586         
587         
588         //DB_DataObject::debugLevel(1);
589         $c = DB_Dataobject::factory('core_company');
590         $im = DB_Dataobject::factory('Images');
591         $c->joinAdd($im, 'LEFT');
592         $c->selectAdd();
593         $c->selectAs($c, 'company_id_%s');
594         $c->selectAs($im, 'company_id_logo_id_%s');
595         $c->id = $this->company_id;
596         $c->limit(1);
597         $c->find(true);
598         
599         $aur = array_merge( $c->toArray(),$aur);
600         
601         if (empty($c->company_id_logo_id_id))  {
602                  
603             $im = DB_Dataobject::factory('Images');
604             $im->ontable = DB_DataObject::factory('core_company')->tableName();
605             $im->onid = $c->id;
606             $im->imgtype = 'LOGO';
607             $im->limit(1);
608             $im->selectAdd();
609             $im->selectAs($im,  'company_id_logo_id_%s');
610             if ($im->find(true)) {
611                     
612                 foreach($im->toArray() as $k=>$v) {
613                     $aur[$k] = $v;
614                 }
615             }
616         }
617       
618         // perms + groups.
619         $aur['perms']  = $this->getPerms();
620         $g = DB_DataObject::Factory('core_group_member');
621         $aur['groups']  = $g->listGroupMembership($this, 'name');
622         
623         $aur['passwd'] = '';
624         $aur['dailykey'] = '';
625         
626         
627         
628         return $aur;
629     }
630     
631     //   ----------PERMS------  ----------------
632     function getPerms() 
633     {
634          //DB_DataObject::debugLevel(1);
635         // find out all the groups they are a member of.. + Default..
636         
637         // ------ INIITIALIZE IF NO GROUPS ARE SET UP.
638         
639         $g = DB_DataObject::Factory('core_group_right');
640         if (!$g->count()) {
641             $g->genDefault();
642         }
643         
644         if ($this->id < 0) {
645             return $g->adminRights(); // system is not set up - so they get full rights.
646         }
647         //DB_DataObject::debugLevel(1);
648         $g = DB_DataObject::Factory('core_group_member');
649         $g->whereAdd('group_id is NOT NULL AND user_id IS NOT NULL');
650         if (!$g->count()) {
651             // add the current user to the admin group..
652             $g = DB_DataObject::Factory('core_group');
653             if ($g->get('name', 'Administrators')) {
654                 $gm = DB_DataObject::Factory('core_group_member');
655                 $gm->group_id = $g->id;
656                 $gm->user_id = $this->id;
657                 $gm->insert();
658             }
659             
660         }
661         
662         // ------ STANDARD PERMISSION HANDLING.
663         $isOwner = $this->company()->comptype == 'OWNER';
664         $g = DB_DataObject::Factory('core_group_member');
665         $grps = $g->listGroupMembership($this);
666        //var_dump($grps);
667         $isAdmin = $g->inAdmin;   //???  what???
668         //echo '<PRE>'; print_r($grps);var_dump($isAdmin);
669         // the load all the perms for those groups, and add them all together..
670         // then load all those 
671         $g = DB_DataObject::Factory('core_group_right');
672         $ret =  $g->listPermsFromGroupIds($grps, $isAdmin, $isOwner);
673         //echo '<PRE>';print_r($ret);
674         return $ret;
675          
676         
677     }
678     /**
679      *Basic group fetching - probably needs to filter by type eventually.
680      *
681      *@param String $what - fetchall() argument - eg. 'name' returns names of all groups that they are members of.
682      */
683     
684     function groups($what=false)
685     {
686         $g = DB_DataObject::Factory('core_group_member');
687         $grps = $g->listGroupMembership($this);
688         $g = DB_DataObject::Factory('core_group');
689         $g->whereAddIn('id', $grps, 'int');
690         return $g->fetchAll($what);
691         
692     }
693     
694     
695     
696     function hasPerm($name, $lvl) 
697     {
698         static $pcache = array();
699         
700         if (!isset($pcache[$this->id])) {
701             $pcache[$this->id] = $this->getPerms();
702         }
703         
704        // echo "<PRE>";print_r($pcache[$au->id]);
705        // var_dump($pcache[$au->id]);
706         if (empty($pcache[$this->id][$name])) {
707             return false;
708         }
709         
710         return strpos($pcache[$this->id][$name], $lvl) > -1;
711         
712     }    
713     
714     //  ------------ROO HOOKS------------------------------------
715     function applyFilters($q, $au, $roo)
716     {
717         //DB_DataObject::DebugLevel(1);
718         
719         if (!empty($q['query']['is_owner'])) {
720             $this->whereAdd(" join_company_id_id.comptype = 'OWNER'");
721         }
722         
723         if (!empty($q['query']['person_not_internal'])) {
724             $this->whereAdd(" join_company_id_id.isOwner = 0 ");
725         }
726         
727         if (!empty($q['query']['person_internal_only_all'])) {
728             
729             
730             // must be internal and not current user (need for distribution list)
731             // user has a projectdirectory entry and role is not blank.
732             //DB_DataObject::DebugLevel(1);
733             $pd = DB_DataObject::factory('ProjectDirectory');
734             $pd->whereAdd("role != ''");
735             $pd->selectAdd();
736             $pd->selectAdd('distinct(person_id) as person_id');
737             $roled = $pd->fetchAll('person_id');
738             $rs = $roled  ? "  OR
739                     {$this->tableName()}.id IN (".implode(',', $roled) . ") 
740                     " : '';
741             $this->whereAdd(" join_company_id_id.comptype = 'OWNER' $rs ");
742             
743         }
744         // -- for distribution
745         if (!empty($q['query']['person_internal_only'])) {
746             // must be internal and not current user (need for distribution list)
747             $this->whereAdd(" join_company_id_id.comptype = 'OWNER'");
748             
749             //$this->whereAdd(($this->tableName() == 'Person' ? 'Person' : "join_person_id_id") .
750             //    ".id  != ".$au->id);
751             $this->whereAdd("{$this->tableName()}.id != {$au->id}");
752         } 
753         
754         if (!empty($q['query']['comptype_or_company_id'])) {
755            // DB_DataObject::debugLevel(1);
756             $bits = explode(',', $q['query']['comptype_or_company_id']);
757             $id = (int) array_pop($bits);
758             $ct = $this->escape($bits[0]);
759             
760             $this->whereAdd(" join_company_id_id.comptype = '$ct' OR {$this->tableName()}.company_id = $id");
761             
762         }
763         
764         
765         // staff list..
766         if (!empty($q['query']['person_inactive'])) {
767            // DB_Dataobject::debugLevel(1);
768             $this->active = 1;
769         }
770         $tn_p = $this->tableName();
771         $tn_gm = DB_DataObject::Factory('core_group_member')->tableName();
772         $tn_g = DB_DataObject::Factory('core_group')->tableName();
773
774         ///---------------- Group views --------
775         if (!empty($q['query']['in_group'])) {
776             // DB_DataObject::debugLevel(1);
777             $ing = (int) $q['query']['in_group'];
778             if ($q['query']['in_group'] == -1) {
779              
780                 // list all staff who are not in a group.
781                 $this->whereAdd("{$this->tableName()}.id NOT IN (
782                     SELECT distinct(user_id) FROM $tn_gm LEFT JOIN
783                         $tn_g ON $tn_g.id = $tn_gm.group_id
784                         WHERE $tn_g.type = ".$q['query']['type']."
785                     )");
786                 
787                 
788             } else {
789                 
790                 $this->whereAdd("$tn_p.id IN (
791                     SELECT distinct(user_id) FROM $tn_gm
792                         WHERE group_id = $ing
793                     )");
794                }
795             
796         }
797         
798         // #2307 Search Country!!
799         if (!empty($q['query']['in_country'])) {
800             // DB_DataObject::debugLevel(1);
801             $inc = $q['query']['in_country'];
802             $this->whereAdd("$tn_p.countries LIKE '%{$inc}%'");
803         }
804         
805         if (!empty($q['query']['not_in_directory'])) { 
806             // it's a Person list..
807             // DB_DATaobjecT::debugLevel(1);
808             
809             // specific to project directory which is single comp. login
810             //
811             $owncomp = DB_DataObject::Factory('core_company');
812             $owncomp->get('comptype', 'OWNER');
813             if ($q['company_id'] == $owncomp->id) {
814                 $this->active =1;
815             }
816             
817             
818
819             if ( $q['query']['not_in_directory'] > -1) {
820                 $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
821                 // can list current - so that it does not break!!!
822                 $this->whereAdd("$tn_p.id NOT IN 
823                     ( SELECT distinct person_id FROM $tn_pd WHERE
824                         project_id = " . $q['query']['not_in_directory'] . " AND 
825                         company_id = " . $this->company_id . ')');
826             }
827         }
828            
829         if (!empty($q['query']['role'])) { 
830             // it's a Person list..
831             // DB_DATaobjecT::debugLevel(1);
832             
833             // specific to project directory which is single comp. login
834             //
835             $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
836                 // can list current - so that it does not break!!!
837             $this->whereAdd("$tn_p.id IN 
838                     ( SELECT distinct person_id FROM $tn_pd WHERE
839                         role = '". $this->escape($q['query']['role']) ."'
840             )");
841         
842         }
843         
844         
845         if (!empty($q['query']['project_member_of'])) {
846                // this is also a flag to return if they are a member..
847             //DB_DataObject::debugLevel(1);
848             $do = DB_DataObject::factory('ProjectDirectory');
849             $do->project_id = $q['query']['project_member_of'];
850             $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
851             $this->joinAdd($do,array('joinType' => 'LEFT', 'useWhereAsOn' => true));
852             $this->selectAdd("IF($tn_pd.id IS NULL, 0,  $tn_pd.id )  as is_member");
853                 
854                 
855             if (!empty($q['query']['project_member_filter'])) {
856                 $this->having('is_member !=0');
857             
858             }
859             
860         }
861         
862         if(!empty($q['query']['name'])){
863             $this->whereAdd("
864                 {$this->tableName()}.name LIKE '%{$this->escape($q['query']['name'])}%'
865             ");
866         }
867          if(!empty($q['query']['name_starts'])){
868             $this->whereAdd("
869                 {$this->tableName()}.name LIKE '{$this->escape($q['query']['name_starts'])}%'
870             ");
871         }
872         
873         if (!empty($q['query']['search'])) {
874             
875             // use our magic search builder...
876             
877              require_once 'Text/SearchParser.php';
878             $x = new Text_SearchParser($q['query']['search']);
879             
880             $props = array(
881                     "$tn_p.name",
882                     "$tn_p.email",
883                     "$tn_p.role",
884                     "$tn_p.phone",
885                     "$tn_p.remarks",
886                     "join_company_id_id.name"
887             );
888             $tbcols = $this->table();
889             foreach(array('firstname','lastname') as $k) {
890                 if (isset($tbcols[$k])) {
891                     $props[] = "{$tn_p}.{$k}";
892                 }
893             }
894             
895             
896             
897             
898             $str =  $x->toSQL(array(
899                 'default' => $props,
900                 'map' => array(
901                     'company' => 'join_company_id_id.name',
902                     //'country' => 'Clipping.country',
903                     //  'media' => 'Clipping.media_name',
904                 ),
905                 'escape' => array($this->getDatabaseConnection(), 'escapeSimple'), /// pear db or mdb object..
906
907             ));
908             
909             
910             $this->whereAdd($str); /*
911                         $tn_p.name LIKE '%$s%'  OR
912                         $tn_p.email LIKE '%$s%'  OR
913                         $tn_p.role LIKE '%$s%'  OR
914                         $tn_p.phone LIKE '%$s%' OR
915                         $tn_p.remarks LIKE '%$s%' 
916                         
917                     ");*/
918         }
919         
920         // project directory rules -- this may distrupt things.
921         $p = DB_DataObject::factory('ProjectDirectory');
922         // if project directories are set up, then we can apply project query rules..
923         if ($p->count()) {
924             $p->autoJoin();
925             $pids = $p->projects($au);
926             if (isset($q['query']['project_id'])) {   
927                 $pid = (int)$q['query']['project_id'];
928                 if (!in_array($pid, $pids)) {
929                     $roo->jerr("Project not in users valid projects");
930                 }
931                 $pids = array($pid);
932             }
933             // project roles..
934             //if (empty($q['_anyrole'])) {  // should be project_directry_role
935             //    $p->whereAdd("{$p->tableName()}.role != ''");
936             // }
937             if (!empty($q['query']['role'])) {  // should be project_directry_role
938                 $role = $this->escape($q['query']['role']); 
939                
940                 $p->whereAdd("{$p->tableName()}.role LIKE '%{$role}%'");
941                  
942             }
943             
944             if (!$roo->hasPerm('Core.Projects_All', 'S')) {
945                 $peps = $p->people($pids);
946                 $this->whereAddIn("{$tn}.id", $peps, 'int');
947             }
948         }    
949         
950         // fixme - this needs a more generic fix - it was from the mtrack_person code...
951         if (isset($q['query']['ticket_id'])) {  
952             // find out what state the ticket is in.
953             $t = DB_DataObject::Factory('mtrack_ticket');
954             $t->autoJoin();
955             $t->get($q['query']['ticket_id']);
956             
957             if (!$this->checkPerm('S', $au)) {
958                 $roo->jerr("permssion denied to query state of ticket");
959             }
960             
961             $p = DB_DataObject::factory('ProjectDirectory');
962             $pids = array($t->project_id);
963            
964             $peps = $p->people($pids);
965             
966             $this->whereAddIn($this->tableName().'.id', $peps, 'int');
967             
968             //$this->whereAdd('join_prole != ''");
969             
970         }  
971     }
972     function setFromRoo($ar, $roo)
973     {
974          $this->setFrom($ar);
975         if (!empty($ar['passwd1'])) {
976             $this->setPassword($ar['passwd1']);
977         }
978         
979         if (    $this->id &&
980                 ($this->email == $roo->old->email)&&
981                 ($this->company_id == $roo->old->company_id)
982             ) {
983             return true;
984         }
985         if (empty($this->email)) {
986             return true;
987         }
988         // this only applies to our owner company..
989         $c = $this->company();
990         if (empty($c->comptype_name) || $c->comptype_name != 'OWNER') {
991             return true;
992         }
993         
994         
995         $xx = DB_Dataobject::factory($this->tableName());
996         $xx->setFrom(array(
997             'email' => $this->email,
998            // 'company_id' => $x->company_id
999         ));
1000         
1001         if ($xx->count()) {
1002             return "Duplicate Email found";
1003         }
1004         return true;
1005     }
1006     /**
1007      *
1008      * before Delete - delete significant dependancies..
1009      * this is called after checkPerm..
1010      */
1011     
1012     function beforeDelete()
1013     {
1014         
1015         $e = DB_DataObject::Factory('Events');
1016         $e->whereAdd('person_id = ' . $this->id);
1017         $e->delete(true);
1018         
1019         // anything else?  
1020         
1021     }
1022     
1023     
1024     /***
1025      * Check if the a user has access to modify this item.
1026      * @param String $lvl Level (eg. Core.Projects)
1027      * @param Pman_Core_DataObjects_Person $au The authenticated user.
1028      * @param boolean $changes alllow changes???
1029      *
1030      * @return false if no access..
1031      */
1032     function checkPerm($lvl, $au, $changes=false) //heck who is trying to access this. false == access denied..
1033     {
1034          
1035        // do we have an empty system..
1036         if ($au && $au->id == -1) {
1037             return true;
1038         }
1039         // if not authenticated... do not allow in???
1040         if (!$au ) {
1041             return false;
1042         }
1043         
1044         // determine if it's staff!!!
1045         $owncomp = DB_DataObject::Factory('core_company');
1046         $owncomp->get('comptype', 'OWNER');
1047         $isStaff = ($au->company_id ==  $owncomp->id);
1048        
1049        
1050         if (!$isStaff) {
1051             
1052             // - can not change company!!!
1053             if ($changes && 
1054                 isset($changes['company_id']) && 
1055                 $changes['company_id'] != $au->company_id) {
1056                 return false;
1057             }
1058             // can only set new emails..
1059             if ($changes && 
1060                     !empty($this->email) && 
1061                     isset($changes['email']) && 
1062                     $changes['email'] != $this->email) {
1063                 return false;
1064             }
1065             
1066             
1067             // mtrack had the idea that all 'S' should be allowed.. - but filtered later..
1068             // ???? do we want this?
1069             
1070             // edit self... - what about other staff members...
1071             
1072             //return $this->company_id == $au->company_id;
1073         }
1074         
1075          
1076         // yes, only owner company can mess with this...
1077         
1078         
1079         
1080     
1081         switch ($lvl) {
1082             // extra case change passwod?
1083             case 'P': //??? password
1084                 // standard perms -- for editing + if the user is dowing them selves..
1085                 $ret = $isStaff ? $au->hasPerm("Core.Staff", "E") : $au->hasPerm("Core.Person", "E");
1086                 return $ret || $au->id == $this->id;
1087             
1088             default:                
1089                 return $isStaff ? $au->hasPerm("Core.Staff", $lvl) : $au->hasPerm("Core.Person", $lvl);
1090         
1091         }
1092         return false;
1093     }
1094     
1095     function beforeInsert($req, $roo)
1096     {
1097         $p = DB_DataObject::factory('core_person');
1098         if ($roo->authUser->id > -1 ||  $p->count() > 1) {
1099             return;
1100         }
1101         $c = DB_DAtaObject::Factory('core_company');
1102         $tc =$c->count();
1103         if (!$tc || $tc> 1) {
1104             $roo->jerr("can not create initial user as multiple companies already exist");
1105         }
1106         $c->find(true);
1107         $this->company_id = $c->id;
1108         
1109     }
1110     
1111     function onInsert($req, $roo)
1112     {
1113          
1114         $p = DB_DataObject::factory('core_person');
1115         if ($roo->authUser->id < 0 && $p->count() == 1) {
1116             // this seems a bit risky...
1117             
1118             $g = DB_DataObject::factory('core_group');
1119             $g->initGroups();
1120             
1121             $g->type = 0;
1122             $g->get('name', 'Administrators');
1123             
1124             $p = DB_DataObject::factory('core_group_member');
1125             $p->group_id = $g->id;
1126             $p->user_id = $this->id;     
1127             if (!$p->count()) {
1128                 $p->insert();
1129                 $roo->addEvent("ADD", $p, $g->toEventString(). " Added " . $this->toEventString());
1130             }
1131             $this->login();
1132         }
1133         if (!empty($req['project_id_addto'])) {
1134             $pd = DB_DataObject::factory('ProjectDirectory');
1135             $pd->project_id = $req['project_id_addto'];
1136             $pd->person_id = $this->id; 
1137             $pd->ispm =0;
1138             $pd->office_id = $this->office_id;
1139             $pd->company_id = $this->company_id;
1140             $pd->insert();
1141         }
1142         
1143     }
1144     
1145     function importFromArray($roo, $persons, $opts)
1146     {
1147         if (empty($opts['prefix'])) {
1148             $roo->jerr("opts[prefix] is empty - you can not just create passwords based on the user names");
1149         }
1150         
1151         if (!is_array($persons) || empty($persons)) {
1152             $roo->jerr("error in the person data. - empty on not valid");
1153         }
1154         DB_DataObject::factory('core_group')->initGroups();
1155         
1156         foreach($persons as $person){
1157             $p = DB_DataObject::factory('core_person');
1158             if($p->get('name', $person['name'])){
1159                 continue;
1160             }
1161             $p->setFrom($person);
1162             
1163             $companies = DB_DataObject::factory('core_company');
1164             if(!$companies->get('comptype', 'OWNER')){
1165                 $roo->jerr("Missing OWNER companies!");
1166             }
1167             $p->company_id = $companies->pid();
1168             // strip the 'spaces etc.. make lowercase..
1169             $name = strtolower(str_replace(' ', '', $person['name']));
1170             $p->setPassword("{$opts['prefix']}{$name}");
1171             $p->insert();
1172             // set up groups
1173             // if $person->groups is set.. then
1174             // add this person to that group eg. groups : [ 'Administrator' ] 
1175             if(!empty($person['groups'])){
1176                 $groups = DB_DataObject::factory('core_group');
1177                 if(!$groups->get('name', $person['groups'])){
1178                     $roo->jerr("Missing groups : {$person['groups']}");
1179                 }
1180                 $gm = DB_DataObject::factory('core_group_member');
1181                 $gm->change($p, $groups, true);
1182             }
1183             
1184             $p->onInsert(array(), $roo);
1185         }
1186     }
1187     
1188     // this is for the To: "{getEmailName()}" <email@address>
1189     // not good for Dear XXXX, - use {person.firstname} for that.
1190     function getEmailName()
1191     {
1192         $name = array();
1193         
1194         if(!empty($this->honor)){
1195             array_push($name, $this->honor);
1196         }
1197         
1198         if(!empty($this->name)){
1199             array_push($name, $this->name);
1200             
1201             return implode(' ', $name);
1202         }
1203         
1204         if(!empty($this->firstname) || !empty($this->lastname)){
1205             array_push($name, $this->firstname);
1206             array_push($name, $this->lastname);
1207             
1208             $name = array_filter($name);
1209             
1210             return implode(' ', $name);
1211         }
1212         
1213         return $this->email;
1214     }
1215     
1216     function sesPrefix()
1217     {
1218         $ff= HTML_FlexyFramework::get();
1219         
1220         $appname = empty($ff->appNameShort) ? $ff->project : $ff->project . '-' . $ff->appNameShort;
1221         
1222         $dname = method_exists($this, 'getDatabaseConnection') ? $this->getDatabaseConnection()->dsn['database'] : $this->databaseNickname();
1223         
1224         $sesPrefix = $appname.'-' .get_class($this) .'-' . $dname;
1225
1226         return $sesPrefix;
1227     }
1228     
1229     function loginPublic()
1230     {
1231         $this->isAuth(); // force session start..
1232          
1233         $db = $this->getDatabaseConnection();
1234         
1235         $ff = HTML_FlexyFramework::get();
1236         
1237         if(empty($ff->Pman) || empty($ff->Pman['login_public'])){
1238             return false;
1239         }
1240         
1241         $sesPrefix = $ff->Pman['login_public'] . '-' .get_class($this) .'-'.$db->dsn['database'] ;
1242         
1243         $p = DB_DAtaObject::Factory($this->tableName());
1244         $p->get($this->pid());
1245         
1246         $_SESSION[get_class($this)][$sesPrefix .'-auth'] = serialize((object)$p->toArray());
1247         
1248         return true;
1249     }
1250     
1251  }