3 * Table Definition for Person
5 require_once 'DB/DataObject.php';
7 class Pman_Core_DataObjects_Person extends DB_DataObject
10 /* the code below is auto generated do not remove the above tag */
12 public $__table = 'Person'; // table name
13 public $id; // int(11) not_null primary_key auto_increment
14 public $email; // string(128) not_null
16 public $company_id; // int(11)
17 public $office_id; // int(11)
19 public $name; // string(128) not_null
20 public $firstname; // string(128) not_null
21 public $lastname; // string(128) not_null
22 public $phone; // string(32) not_null
23 public $fax; // string(32) not_null
25 public $role; // string(32) not_null
26 public $remarks; // blob(65535) not_null blob
27 public $passwd; // string(64) not_null
28 public $owner_id; // int(11) not_null
29 public $lang; // string(8)
30 public $no_reset_sent; // int(11)
31 public $action_type; // string(32)
32 public $project_id; // int(11)
35 public $active; // int(11) not_null
36 public $deleted_by; // int(11) not_null
37 public $deleted_dt; // datetime(19) binary
40 /* the code above is auto generated do not remove the tag below */
47 * FIXME !!!! -- USE Pman_Core_Mailer !!!!!
53 function buildMail($templateFile, $args)
56 $args = (array) $args;
57 $content = clone($this);
59 foreach((array)$args as $k=>$v) {
63 $ff = HTML_FlexyFramework::get();
66 //?? is this really the place for this???
69 empty($args['no_auth']) &&
70 !in_array($templateFile, array(
71 // templates that can be sent without authentication.
77 $content->authUser = $this->getAuthUser();
78 if (!$content->authUser) {
79 return PEAR::raiseError("Not authenticated");
83 // should handle x-forwarded...
85 $content->HTTP_HOST = isset($_SERVER["HTTP_HOST"]) ?
86 $_SERVER["HTTP_HOST"] :
87 (isset($ff->HTTP_HOST) ? $ff->HTTP_HOST : 'localhost');
89 /* use the regex compiler, as it doesnt parse <tags */
92 'compiler' => 'Flexy',
94 'filters' => array('SimpleTags','Mail'),
100 if (!empty($args['templateDir'])) {
101 $tops['templateDir'] = $args['templateDir'];
106 require_once 'HTML/Template/Flexy.php';
107 $template = new HTML_Template_Flexy( $tops );
108 $template->compile("mail/$templateFile.txt");
110 /* use variables from this object to ouput data. */
111 $mailtext = $template->bufferedOutputObject($content);
114 // if a html file with the same name exists, use that as the body
115 // I've no idea where this code went, it was here before..
116 if (false !== $template->resolvePath ( "mail/$templateFile.html" )) {
117 $tops['nonHTML'] = false;
118 $template = new HTML_Template_Flexy( $tops );
119 $template->compile("mail/$templateFile.html");
120 $htmlbody = $template->bufferedOutputObject($content);
126 //echo "<PRE>";print_R($mailtext);
127 //print_R($mailtext);exit;
128 /* With the output try and send an email, using a few tricks in Mail_MimeDecode. */
129 require_once 'Mail/mimeDecode.php';
130 require_once 'Mail.php';
132 $decoder = new Mail_mimeDecode($mailtext);
133 $parts = $decoder->getSendArray();
135 if (PEAR::isError($parts)) {
137 //echo "PROBLEM: {$parts->message}";
140 list($recipents,$headers,$body) = $parts;
141 $recipents = array($this->email);
142 if (!empty($content->bcc) && is_array($content->bcc)) {
143 $recipents =array_merge($recipents, $content->bcc);
145 $headers['Date'] = date('r');
147 if ($htmlbody !== false) {
148 require_once 'Mail/mime.php';
149 $mime = new Mail_mime(array('eol' => "\n"));
150 $mime->setTXTBody($body);
151 $mime->setHTMLBody($htmlbody);
152 // I think there might be code in mediaoutreach toEmail somewhere
153 // h embeds images here..
154 $body = $mime->get();
155 $headers = $mime->headers($headers);
162 'recipients' => $recipents,
163 'headers' => $headers,
173 * - user must be authenticate or args[no_auth] = true
174 * or template = password_[reset|welcome]
177 function sendTemplate($templateFile, $args)
180 $ar = $this->buildMail($templateFile, $args);
183 //print_r($recipents);exit;
184 $mailOptions = PEAR::getStaticProperty('Mail','options');
185 $mail = Mail::factory("SMTP",$mailOptions);
187 if (PEAR::isError($mail)) {
190 $oe = error_reporting(E_ALL & ~E_NOTICE & ~E_STRICT);
191 $ret = $mail->send($ar['recipients'],$ar['headers'],$ar['body']);
192 error_reporting($oe);
201 function getEmailFrom()
203 return '"' . addslashes($this->name) . '" <' . $this->email . '>';
205 function toEventString()
207 return empty($this->name) ? $this->email : $this->name;
209 function verifyAuth()
211 $ff= HTML_FlexyFramework::get();
212 if (!empty($ff->Pman['auth_comptype']) && $ff->Pman['auth_comptype'] != $this->company()->comptype) {
213 $ff->page->jerr("Login not permited to outside companies");
220 // ---------------- authentication / passwords and keys stuff ----------------
223 $db = $this->getDatabaseConnection();
224 // we combine db + project names,
225 // otherwise if projects use different 'auth' objects
226 // then we get unserialize issues.
227 $sesPrefix = get_class($this) .'-'.$db->dsn['database'] ;
231 if (!empty($_SESSION[__CLASS__][$sesPrefix .'-auth'])) {
233 $a = unserialize($_SESSION[__CLASS__][$sesPrefix .'-auth']);
235 $u = DB_DataObject::factory('Person');
236 if ($u->get($a->id)) { //&& strlen($u->passwd)) {
242 $_SESSION[__CLASS__][$sesPrefix .'-auth'] = '';
246 $u = DB_DataObject::factory('Person');
247 $ff = HTML_FlexyFramework::get();
248 if (!empty($ff->Pman['local_autoauth']) &&
249 (!empty($_SERVER['SERVER_ADDR'])) &&
250 ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
251 ($_SERVER['REMOTE_ADDR'] == '127.0.0.1') &&
252 $u->get('email', $ff->Pman['local_autoauth'])
254 $_SESSION[__CLASS__][$sesPrefix .'-auth'] = serialize($u);
259 $u = DB_DataObject::factory('Person');
261 if (!empty($_SERVER['PHP_AUTH_USER'])
263 !empty($_SERVER['PHP_AUTH_PW'])
265 $u->get('email', $_SERVER['PHP_AUTH_USER'])
267 $u->checkPassword($_SERVER['PHP_AUTH_PW'])
269 $_SESSION[__CLASS__][$sesPrefix .'-auth'] = serialize($u);
276 // not in session or not matched...
277 $u = DB_DataObject::factory('Person');
278 $u->whereAdd(' LENGTH(passwd) > 0');
280 $error = PEAR::getStaticProperty('DB_DataObject','lastError');
282 die($error->toString()); // not really a good thing to do...
284 if (!$n){ // authenticated as there are no users in the system...
291 function getAuthUser()
293 if (!$this->isAuth()) {
296 $db = $this->getDatabaseConnection();
297 $sesPrefix = get_class($this) .'-'.$db->dsn['database'] ;
299 if (!empty($_SESSION[__CLASS__][$sesPrefix .'-auth'])) {
300 $a = unserialize($_SESSION[__CLASS__][$sesPrefix .'-auth']);
302 $u = DB_DataObject::factory('Person');
303 if ($u->get($a->id)) { /// && strlen($u->passwd)) {
309 $u = DB_DataObject::factory('Person');
310 $u->whereAdd(' LENGTH(passwd) > 0');
313 // fake person - open system..
314 $ce = DB_DataObject::factory('core_enum');
318 $u = DB_DataObject::factory('Person');
327 $this->isAuth(); // force session start..
329 $db = $this->getDatabaseConnection();
330 // refresh admin group if we are logged in as one..
331 //DB_DataObject::debugLevel(1);
332 $g = DB_DataObject::factory('Groups');
334 $g->get('name', 'Administrators');
335 $gm = DB_DataObject::Factory('group_members');
336 if (in_array($g->id,$gm->listGroupMembership($this))) {
337 // refresh admin groups.
338 $gr = DB_DataObject::Factory('group_rights');
339 $gr->applyDefs($g, 0);
342 $sesPrefix = get_class($this) .'-'.$db->dsn['database'] ;
343 $_SESSION[__CLASS__][$sesPrefix .'-auth'] = serialize($this);
348 $this->isAuth(); // force session start..
349 $db = $this->getDatabaseConnection();
350 $sesPrefix = get_class($this) .'-'.$db->dsn['database'] ;
351 $_SESSION[__CLASS__][$sesPrefix .'-auth'] = "";
354 function genPassKey ($t)
356 return md5($this->email . $t. $this->passwd);
358 function simpleAuthKey($m = 0)
360 $month = $m > -1 ? date('Y-m') : date('Y-m', strtotime('LAST MONTH'));
362 return md5(implode(',' , array($month, $this->email , $this->passwd, $this->id)));
364 function checkPassword($val)
367 if (substr($this->passwd,0,1) == '$') {
368 return crypt($val,$this->passwd) == $this->passwd ;
370 // old style md5 passwords...- cant be used with courier....
371 return md5($val) == $this->passwd;
373 function setPassword($value)
376 while(strlen($salt)<9) {
377 $salt.=chr(rand(64,126));
378 //php -r var_dump(crypt('testpassword', '$1$'. (rand(64,126)). '$'));
380 $this->passwd = crypt($value, '$1$'. $salt. '$');
387 $x = DB_DataObject::factory('Companies');
388 $x->get($this->company_id);
391 function loadCompany()
393 $this->company = $this->company();
398 return $this->active;
400 function authUserName($n) // set username prior to acheck user exists query.
403 $this->whereAdd('LENGTH(passwd) > 1');
408 if ($val == $this->lang) {
418 function authUserArray()
421 $aur = $this->toArray();
428 //DB_DataObject::debugLevel(1);
429 $c = DB_Dataobject::factory('Companies');
430 $im = DB_Dataobject::factory('Images');
431 $c->joinAdd($im, 'LEFT');
433 $c->selectAs($c, 'company_id_%s');
434 $c->selectAs($im, 'company_id_logo_id_%s');
435 $c->id = $this->company_id;
439 $aur = array_merge( $c->toArray(),$aur);
441 if (empty($c->company_id_logo_id_id)) {
443 $im = DB_Dataobject::factory('Images');
444 $im->ontable = 'Companies';
446 $im->imgtype = 'LOGO';
449 $im->selectAs($im, 'company_id_logo_id_%s');
450 if ($im->find(true)) {
452 foreach($im->toArray() as $k=>$v) {
459 $aur['perms'] = $this->getPerms();
460 $g = DB_DataObject::Factory('group_members');
461 $aur['groups'] = $g->listGroupMembership($this, 'name');
464 $aur['dailykey'] = '';
471 // ----------PERMS------ ----------------
474 //DB_DataObject::debugLevel(1);
475 // find out all the groups they are a member of.. + Default..
477 // ------ INIITIALIZE IF NO GROUPS ARE SET UP.
479 $g = DB_DataObject::Factory('group_rights');
485 return $g->adminRights(); // system is not set up - so they get full rights.
487 //DB_DataObject::debugLevel(1);
488 $g = DB_DataObject::Factory('group_members');
489 $g->whereAdd('group_id is NOT NULL AND user_id IS NOT NULL');
491 // add the current user to the admin group..
492 $g = DB_DataObject::Factory('Groups');
493 if ($g->get('name', 'Administrators')) {
494 $gm = DB_DataObject::Factory('group_members');
495 $gm->group_id = $g->id;
496 $gm->user_id = $this->id;
502 // ------ STANDARD PERMISSION HANDLING.
503 $isOwner = $this->company()->comptype == 'OWNER';
504 $g = DB_DataObject::Factory('group_members');
505 $grps = $g->listGroupMembership($this);
507 $isAdmin = $g->inAdmin;
508 //echo '<PRE>'; print_r($grps);var_dump($isAdmin);
509 // the load all the perms for those groups, and add them all together..
510 // then load all those
511 $g = DB_DataObject::Factory('group_rights');
512 $ret = $g->listPermsFromGroupIds($grps, $isAdmin, $isOwner);
513 //echo '<PRE>';print_r($ret);
519 *Basic group fetching - probably needs to filter by type eventually.
521 *@param String $what - fetchall() argument - eg. 'name' returns names of all groups that they are members of.
524 function groups($what=false)
526 $g = DB_DataObject::Factory('group_members');
527 $grps = $g->listGroupMembership($this);
528 $g = DB_DataObject::Factory('Groups');
529 $g->whereAddIn('id', $grps, 'int');
530 return $g->fetchAll($what);
536 function hasPerm($name, $lvl)
538 static $pcache = array();
540 if (!isset($pcache[$this->id])) {
541 $pcache[$this->id] = $this->getPerms();
543 // echo "<PRE>";print_r($pcache[$au->id]);
544 // var_dump($pcache[$au->id]);
545 if (empty($pcache[$this->id][$name])) {
549 return strpos($pcache[$this->id][$name], $lvl) > -1;
553 // ------------ROO HOOKS------------------------------------
554 function applyFilters($q, $au, $roo)
556 //DB_DataObject::DebugLevel(1);
557 if (!empty($q['query']['person_not_internal'])) {
558 $this->whereAdd(" join_company_id_id.isOwner = 0 ");
562 if (!empty($q['query']['person_internal_only_all'])) {
565 // must be internal and not current user (need for distribution list)
566 // user has a projectdirectory entry and role is not blank.
567 //DB_DataObject::DebugLevel(1);
568 $pd = DB_DataObject::factory('ProjectDirectory');
569 $pd->whereAdd("role != ''");
571 $pd->selectAdd('distinct(person_id) as person_id');
572 $roled = $pd->fetchAll('person_id');
574 {$this->tableName()}.id IN (".implode(',', $roled) . ")
576 $this->whereAdd(" join_company_id_id.comptype = 'OWNER' $rs ");
579 // -- for distribution
580 if (!empty($q['query']['person_internal_only'])) {
581 // must be internal and not current user (need for distribution list)
582 $this->whereAdd(" join_company_id_id.comptype = 'OWNER'");
584 //$this->whereAdd(($this->tableName() == 'Person' ? 'Person' : "join_person_id_id") .
585 // ".id != ".$au->id);
586 $this->whereAdd("Person.id != {$au->id}");
589 if (!empty($q['query']['comptype_or_company_id'])) {
590 // DB_DataObject::debugLevel(1);
591 $bits = explode(',', $q['query']['comptype_or_company_id']);
592 $id = (int) array_pop($bits);
593 $ct = $this->escape($bits[0]);
595 $this->whereAdd(" join_company_id_id.comptype = '$ct' OR Person.company_id = $id");
601 if (!empty($q['query']['person_inactive'])) {
602 // DB_Dataobject::debugLevel(1);
605 $tn_p = $this->tableName();
606 $tn_gm = DB_DataObject::Factory('group_members')->tableName();
607 $tn_g = DB_DataObject::Factory('Groups')->tableName();
609 ///---------------- Group views --------
610 if (!empty($q['query']['in_group'])) {
611 // DB_DataObject::debugLevel(1);
612 $ing = (int) $q['query']['in_group'];
613 if ($q['query']['in_group'] == -1) {
615 // list all staff who are not in a group.
616 $this->whereAdd("Person.id NOT IN (
617 SELECT distinct(user_id) FROM $tn_gm LEFT JOIN
618 $tn_g ON $tn_g.id = $tn_gm.group_id
619 WHERE $tn_g.type = ".$q['query']['type']."
625 $this->whereAdd("$tn_p.id IN (
626 SELECT distinct(user_id) FROM $tn_gm
627 WHERE group_id = $ing
633 if (!empty($q['query']['not_in_directory'])) {
634 // it's a Person list..
635 // DB_DATaobjecT::debugLevel(1);
637 // specific to project directory which is single comp. login
639 $owncomp = DB_DataObject::Factory('Companies');
640 $owncomp->get('comptype', 'OWNER');
641 if ($q['company_id'] == $owncomp->id) {
647 if ( $q['query']['not_in_directory'] > -1) {
648 $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
649 // can list current - so that it does not break!!!
650 $this->whereAdd("$tn_p.id NOT IN
651 ( SELECT distinct person_id FROM $tn_pd WHERE
652 project_id = " . $q['query']['not_in_directory'] . " AND
653 company_id = " . $this->company_id . ')');
657 if (!empty($q['query']['role'])) {
658 // it's a Person list..
659 // DB_DATaobjecT::debugLevel(1);
661 // specific to project directory which is single comp. login
663 $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
664 // can list current - so that it does not break!!!
665 $this->whereAdd("$tn_p.id IN
666 ( SELECT distinct person_id FROM $tn_pd WHERE
667 role = '". $this->escape($q['query']['role']) ."'
673 if (!empty($q['query']['project_member_of'])) {
674 // this is also a flag to return if they are a member..
675 //DB_DataObject::debugLevel(1);
676 $do = DB_DataObject::factory('ProjectDirectory');
677 $do->project_id = $q['query']['project_member_of'];
678 $tn_pd = DB_DataObject::Factory('ProjectDirectory')->tableName();
679 $this->joinAdd($do,array('joinType' => 'LEFT', 'useWhereAsOn' => true));
680 $this->selectAdd("IF($tn_pd.id IS NULL, 0, $tn_pd.id ) as is_member");
683 if (!empty($q['query']['project_member_filter'])) {
684 $this->having('is_member !=0');
690 if (!empty($q['query']['search'])) {
691 $s = $this->escape($q['query']['search']);
693 $tn_p.name LIKE '%$s%' OR
694 $tn_p.email LIKE '%$s%' OR
695 $tn_p.role LIKE '%$s%' OR
696 $tn_p.phone LIKE '%$s%' OR
697 $tn_p.remarks LIKE '%$s%'
704 function setFromRoo($ar, $roo)
707 if (!empty($ar['passwd1'])) {
708 $this->setPassword($ar['passwd1']);
713 ($this->email == $roo->old->email)&&
714 ($this->company_id == $roo->old->company_id)
718 if (empty($this->email)) {
721 $xx = DB_Dataobject::factory('Person');
723 'email' => $this->email,
724 // 'company_id' => $x->company_id
728 return "Duplicate Email found";
734 * before Delete - delete significant dependancies..
735 * this is called after checkPerm..
738 function beforeDelete()
741 $e = DB_DataObject::Factory('Events');
742 $e->whereAdd('person_id = ' . $this->id);
751 * Check if the a user has access to modify this item.
752 * @param String $lvl Level (eg. Core.Projects)
753 * @param Pman_Core_DataObjects_Person $au The authenticated user.
754 * @param boolean $changes alllow changes???
756 * @return false if no access..
758 function checkPerm($lvl, $au, $changes=false) //heck who is trying to access this. false == access denied..
761 // do we have an empty system..
762 if ($au && $au->id == -1) {
766 // determine if it's staff!!!
768 if ($au->company()->comptype != 'OWNER') {
770 // - can not change company!!!
772 isset($changes['company_id']) &&
773 $changes['company_id'] != $au->company_id) {
776 // can only set new emails..
778 !empty($this->email) &&
779 isset($changes['email']) &&
780 $changes['email'] != $this->email) {
784 // edit self... - what about other staff members...
786 return $this->company_id == $au->company_id;
790 // yes, only owner company can mess with this...
791 $owncomp = DB_DataObject::Factory('Companies');
792 $owncomp->get('comptype', 'OWNER');
794 $isStaff = ($this->company_id == $owncomp->id);
798 // extra case change passwod?
799 case 'P': //??? password
800 // standard perms -- for editing + if the user is dowing them selves..
801 $ret = $isStaff ? $au->hasPerm("Core.Staff", "E") : $au->hasPerm("Core.Person", "E");
802 return $ret || $au->id == $this->id;
805 return $isStaff ? $au->hasPerm("Core.Staff", $lvl) : $au->hasPerm("Core.Person", $lvl);
810 function onInsert($req, $roo)
813 $p = DB_DataObject::factory('person');
814 if ($roo->authUser->id < 0 && $p->count() == 1) {
815 // this seems a bit risky...
817 $g = DB_DataObject::factory('Groups');
821 $g->get('name', 'Administrators');
823 $p = DB_DataObject::factory('group_members');
824 $p->group_id = $g->id;
825 $p->user_id = $this->id;
828 $roo->addEvent("ADD", $p, $g->toEventString(). " Added " . $this->toEventString());
832 if (!empty($req['project_id_addto'])) {
833 $pd = DB_DataObject::factory('ProjectDirectory');
834 $pd->project_id = $req['project_id_addto'];
835 $pd->person_id = $this->id;
837 $pd->office_id = $this->office_id;
838 $pd->company_id = $this->company_id;