git.roojs.org Git - Pman.Core/blob - DataObjects/Person.php

   1 <?php
   2 /**
   3  * Table Definition for Person
   4  */
   5 require_once 'DB/DataObject.php';
   6
   7 class Pman_Core_DataObjects_Person extends DB_DataObject
   8 {
   9     ###START_AUTOCODE
  10     /* the code below is auto generated do not remove the above tag */
  11
  12     public $__table = 'Person';                          // table name
  13     public $id;                              // int(11)  not_null primary_key auto_increment
  14     public $office_id;                       // int(11)
  15     public $name;                            // string(128)  not_null
  16     public $phone;                           // string(32)  not_null
  17     public $fax;                             // string(32)  not_null
  18     public $email;                           // string(128)  not_null
  19     public $company_id;                      // int(11)
  20     public $role;                            // string(32)  not_null
  21     public $active;                          // int(11)  not_null
  22     public $remarks;                         // blob(65535)  not_null blob
  23     public $passwd;                          // string(64)  not_null
  24     public $owner_id;                        // int(11)  not_null
  25     public $lang;                            // string(8)
  26     public $no_reset_sent;                   // int(11)
  27     public $action_type;                     // string(32)
  28     public $project_id;                      // int(11)
  29     public $deleted_by;                      // int(11)  not_null
  30     public $deleted_dt;                      // datetime(19)  binary
  31
  32
  33     /* the code above is auto generated do not remove the tag below */
  34     ###END_AUTOCODE
  35     /**
  36      *
  37      * @param {String} $templateFile  (mail/XXXXXXX.txt) exclude the mail and .txt bit.
  38      * @param {Array|Object} $args   data to send out..
  39      * @return {Array|PEAR_Error} array of $recipents, $header, $body
  40      */
  41     function buildMail($templateFile, $args)
  42     {
  43
  44         $args = (array) $args;
  45         $content  = clone($this);
  46
  47         foreach((array)$args as $k=>$v) {
  48             $content->$k = $v;
  49         }
  50
  51         $ff = HTML_FlexyFramework::get();
  52
  53
  54         //?? is this really the place for this???
  55         if (
  56                 !$ff->cli &&
  57                 empty($args['no_auth']) &&
  58                 !in_array($templateFile, array(
  59                     // templates that can be sent without authentication.
  60                      'password_reset' ,
  61                      'password_welcome'
  62                  ))
  63             ) {
  64
  65             $content->authUser = $this->getAuthUser();
  66             if (!$content->authUser) {
  67                 return PEAR::raiseError("Not authenticated");
  68             }
  69         }
  70
  71         // should handle x-forwarded...
  72
  73         $content->HTTP_HOST = isset($_SERVER["HTTP_HOST"]) ?
  74             $_SERVER["HTTP_HOST"] :
  75             (isset($ff->HTTP_HOST) ? $ff->HTTP_HOST : 'localhost');
  76
  77         /* use the regex compiler, as it doesnt parse <tags */
  78         require_once 'HTML/Template/Flexy.php';
  79         $template = new HTML_Template_Flexy( array(
  80             'compiler'    => 'Flexy',
  81             'nonHTML' => true,
  82             'filters' => array('SimpleTags','Mail'),
  83             //     'debug'=>1,
  84         ));
  85
  86
  87
  88
  89         $template->compile("mail/$templateFile.txt");
  90
  91         /* use variables from this object to ouput data. */
  92         $mailtext = $template->bufferedOutputObject($content);
  93         //echo "<PRE>";print_R($mailtext);
  94         //print_R($mailtext);exit;
  95         /* With the output try and send an email, using a few tricks in Mail_MimeDecode. */
  96         require_once 'Mail/mimeDecode.php';
  97         require_once 'Mail.php';
  98
  99         $decoder = new Mail_mimeDecode($mailtext);
 100         $parts = $decoder->getSendArray();
 101         if (PEAR::isError($parts)) {
 102             return $parts;
 103             //echo "PROBLEM: {$parts->message}";
 104             //exit;
 105         }
 106         list($recipents,$headers,$body) = $parts;
 107         $recipents = array($this->email);
 108         if (!empty($content->bcc) && is_array($content->bcc)) {
 109             $recipents =array_merge($recipents, $content->bcc);
 110         }
 111         $headers['Date'] = date('r');
 112
 113         return array(
 114             'recipents' => $recipents,
 115             'headers'    => $headers,
 116             'body'      => $body
 117         );
 118
 119
 120     }
 121
 122
 123     /**
 124      * send a template
 125      * - user must be authenticate or args[no_auth] = true
 126      *   or template = password_[reset|welcome]
 127      *
 128      */
 129     function sendTemplate($templateFile, $args)
 130     {
 131
 132         $ar = $this->buildMail($templateFile, $args);
 133
 134         //print_r($recipents);exit;
 135         $mailOptions = PEAR::getStaticProperty('Mail','options');
 136         $mail = Mail::factory("SMTP",$mailOptions);
 137
 138         if (PEAR::isError($mail)) {
 139             return $mail;
 140         }
 141         $oe = error_reporting(E_ALL ^ E_NOTICE);
 142         $ret = $mail->send($ar['recipents'],$ar['headers'],$ar['body']);
 143         error_reporting($oe);
 144
 145         return $ret;
 146
 147     }
 148     function getEmailFrom()
 149     {
 150         return '"' . addslashes($this->name) . '" <' . $this->email . '>';
 151     }
 152     function toEventString()
 153     {
 154         return empty($this->name) ? $this->email : $this->name;
 155     }
 156     function verifyAuth()
 157     {
 158         $ff= HTML_FlexyFramework::get();
 159         if (!empty($ff->Pman['auth_comptype']) && $ff->Pman['auth_comptype'] != $this->company()->comptype) {
 160             $ff->page->jerr("Login not permited to outside companies");
 161         }
 162         return true;
 163
 164     }
 165
 166
 167     //   ---------------- authentication / passwords and keys stuff  ----------------
 168     function isAuth()
 169     {
 170         $db = $this->getDatabaseConnection();
 171         $sesPrefix = $db->dsn['database'];
 172         @session_start();
 173         if (!empty($_SESSION[__CLASS__][$sesPrefix .'-auth'])) {
 174             // in session...
 175             $a = unserialize($_SESSION[__CLASS__][$sesPrefix .'-auth']);
 176             $u = DB_DataObject::factory('Person');
 177             if ($u->get($a->id)) { //&& strlen($u->passwd)) {
 178                 $u->verifyAuth();
 179
 180                 return true;
 181             }
 182
 183             $_SESSION[__CLASS__][$sesPrefix .'-auth'] = '';
 184
 185         }
 186         // local auth -
 187         $u = DB_DataObject::factory('Person');
 188         $ff = HTML_FlexyFramework::get();
 189         if (!empty($ff->Pman['local_autoauth']) &&
 190             (!empty($_SERVER['SERVER_ADDR'])) &&
 191             ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
 192             ($_SERVER['REMOTE_ADDR'] == '127.0.0.1') &&
 193             $u->get('email', $ff->Pman['local_autoauth'])
 194         ) {
 195             $db = $this->getDatabaseConnection();
 196             $sesPrefix = $db->dsn['database'];
 197             $_SESSION[__CLASS__][$sesPrefix .'-auth'] = serialize($u);
 198             return true;
 199         }
 200
 201
 202         // not in session or not matched...
 203         $u = DB_DataObject::factory('Person');
 204         $u->whereAdd(' LENGTH(passwd) > 0');
 205         $n = $u->count();
 206         $error =  PEAR::getStaticProperty('DB_DataObject','lastError');
 207         if ($error) {
 208             die($error->toString()); // not really a good thing to do...
 209         }
 210         if (!$n){ // authenticated as there are no users in the system...
 211             return true;
 212         }
 213
 214         return false;
 215
 216     }
 217     function getAuthUser()
 218     {
 219         if (!$this->isAuth()) {
 220             return false;
 221         }
 222         $db = $this->getDatabaseConnection();
 223         $sesPrefix = $db->dsn['database'];
 224         if (!empty($_SESSION[__CLASS__][$sesPrefix .'-auth'])) {
 225             $a = unserialize($_SESSION[__CLASS__][$sesPrefix .'-auth']);
 226
 227             $u = DB_DataObject::factory('Person');
 228             if ($u->get($a->id)) { /// && strlen($u->passwd)) {
 229                 return clone($u);
 230             }
 231
 232         }
 233
 234         $u = DB_DataObject::factory('Person');
 235         $u->whereAdd(' LENGTH(passwd) > 0');
 236         if (!$u->count()){
 237             $u = DB_DataObject::factory('Person');
 238             $u->id = -1;
 239             return $u;
 240
 241         }
 242         return false;
 243     }
 244     function login()
 245     {
 246         $this->isAuth(); // force session start..
 247         $this->verifyAuth();
 248          $db = $this->getDatabaseConnection();
 249         $sesPrefix = $db->dsn['database'];
 250         $_SESSION[__CLASS__][$sesPrefix .'-auth'] = serialize($this);
 251
 252     }
 253     function logout()
 254     {
 255         $this->isAuth(); // force session start..
 256          $db = $this->getDatabaseConnection();
 257         $sesPrefix = $db->dsn['database'];
 258         $_SESSION[__CLASS__][$sesPrefix .'-auth'] = "";
 259
 260     }
 261     function genPassKey ($t)
 262     {
 263         return md5($this->email . $t. $this->passwd);
 264     }
 265     function simpleAuthKey($m = 0)
 266     {
 267         $month = $m > -1 ? date('Y-m') : date('Y-m', strtotime('LAST MONTH'));
 268
 269         return md5(implode(',' ,  array($month, $this->email , $this->passwd, $this->id)));
 270     }
 271     function checkPassword($val)
 272     {
 273
 274         if (substr($this->passwd,0,1) == '$') {
 275             return crypt($val,$this->passwd) == $this->passwd ;
 276         }
 277         // old style md5 passwords...- cant be used with courier....
 278         return md5($val) == $this->passwd;
 279     }
 280     function setPassword($value)
 281     {
 282         $salt='';
 283         while(strlen($salt)<9) {
 284             $salt.=chr(rand(64,126));
 285             //php -r var_dump(crypt('testpassword', '$1$'. (rand(64,126)). '$'));
 286         }
 287         $this->passwd = crypt($value, '$1$'. $salt. '$');
 288
 289
 290     }
 291
 292     function company()
 293     {
 294         $x = DB_DataObject::factory('Companies');
 295         $x->get($this->company_id);
 296         return $x;
 297     }
 298
 299
 300     function active()
 301     {
 302         return $this->active;
 303     }
 304     function authUserName($n) // set username prior to acheck user exists query.
 305     {
 306
 307         $this->whereAdd('LENGTH(passwd) > 1');
 308         $this->email = $n;
 309     }
 310     function lang($val)
 311     {
 312         if ($val == $this->lang) {
 313             return;
 314         }
 315         $uu = clone($this);
 316         $this->lang = $val;
 317         $this->update($uu);
 318
 319     }
 320
 321
 322     function authUserArray()
 323     {
 324
 325         $aur = $this->toArray();
 326
 327         if ($this->id < 1) {
 328             return $aur;
 329         }
 330
 331
 332         // DB_DataObject::debugLevel(1);
 333         $c = DB_Dataobject::factory('Companies');
 334         $im = DB_Dataobject::factory('Images');
 335         $c->joinAdd($im, 'LEFT');
 336         $c->selectAdd();
 337         $c->selectAs($c, 'company_id_%s');
 338         $c->selectAs($im, 'company_id_logo_id_%s');
 339         $c->id = $this->company_id;
 340         $c->limit(1);
 341         $c->find(true);
 342
 343         $aur = array_merge( $c->toArray(),$aur);
 344
 345         if (empty($c->company_id_logo_id_id))  {
 346
 347             $im = DB_Dataobject::factory('Images');
 348             $im->ontable = 'Companies';
 349             $im->onid = $c->id;
 350             $im->imgtype = 'LOGO';
 351             $im->limit(1);
 352             $im->selectAs($im,  'company_id_logo_id_%s');
 353             if ($im->find(true)) {
 354
 355                 foreach($im->toArray() as $k=>$v) {
 356                     $aur[$k] = $v;
 357                 }
 358             }
 359         }
 360
 361         // perms + groups.
 362         $aur['perms']  = $this->getPerms();
 363         $g = DB_DataObject::Factory('Group_Members');
 364         $aur['groups']  = $g->listGroupMembership($this, 'name');
 365
 366         $aur['passwd'] = '';
 367         $aur['dailykey'] = '';
 368
 369
 370
 371         return $aur;
 372     }
 373
 374     //   ----------PERMS------  ----------------
 375     function getPerms()
 376     {
 377          //DB_DataObject::debugLevel(1);
 378         // find out all the groups they are a member of.. + Default..
 379
 380         // ------ INIITIALIZE IF NO GROUPS ARE SET UP.
 381
 382         $g = DB_DataObject::Factory('Group_Rights');
 383         if (!$g->count()) {
 384             $g->genDefault();
 385         }
 386
 387         if ($this->id < 0) {
 388             return $g->adminRights(); // system is not set up - so they get full rights.
 389         }
 390
 391         $g = DB_DataObject::Factory('Group_Members');
 392         if (!$g->count()) {
 393             // add the current user to the admin group..
 394             $g = DB_DataObject::Factory('Groups');
 395             if ($g->get('name', 'Administrators')) {
 396                 $gm = DB_DataObject::Factory('Group_Members');
 397                 $gm->group_id = $g->id;
 398                 $gm->user_id = $this->id;
 399                 $gm->insert();
 400             }
 401
 402         }
 403
 404         // ------ STANDARD PERMISSION HANDLING.
 405
 406         $g = DB_DataObject::Factory('Group_Members');
 407         $grps = $g->listGroupMembership($this);
 408        // print_r($grps);
 409         $isAdmin = $g->inAdmin;
 410         //echo '<PRE>'; print_r($grps);var_dump($isAdmin);
 411         // the load all the perms for those groups, and add them all together..
 412         // then load all those
 413         $g = DB_DataObject::Factory('Group_Rights');
 414         $ret =  $g->listPermsFromGroupIds($grps, $isAdmin);
 415         //echo '<PRE>';print_r($ret);
 416         return $ret;
 417
 418
 419     }
 420     /**
 421      *Basic group fetching - probably needs to filter by type eventually.
 422      *
 423      */
 424
 425     function groups()
 426     {
 427         $g = DB_DataObject::Factory('Group_Members');
 428         $grps = $g->listGroupMembership($this);
 429         $g = DB_DataObject::Factory('Groups');
 430         $g->whereAddIn('id', $grps, 'int');
 431         return $g->fetchAll();
 432
 433     }
 434
 435     function hasPerm($name, $lvl)
 436     {
 437         static $pcache = array();
 438
 439         if (!isset($pcache[$this->id])) {
 440             $pcache[$this->id] = $this->getPerms();
 441         }
 442        // echo "<PRE>";print_r($pcache[$au->id]);
 443        // var_dump($pcache[$au->id]);
 444         if (empty($pcache[$this->id][$name])) {
 445             return false;
 446         }
 447
 448         return strpos($pcache[$this->id][$name], $lvl) > -1;
 449
 450     }
 451
 452     //  ------------ROO HOOKS------------------------------------
 453     function applyFilters($q, $au)
 454     {
 455         if (!empty($q['query']['person_not_internal'])) {
 456             $this->whereAdd(" join_company_id_id.isOwner = 0 ");
 457         }
 458         if (!empty($q['query']['person_internal_only_all'])) {
 459
 460
 461             // must be internal and not current user (need for distribution list)
 462             // user has a projectdirectory entry and role is not blank.
 463             //DB_DataObject::DebugLevel(1);
 464             $pd = DB_DataObject::factory('ProjectDirectory');
 465             $pd->whereAdd("role != ''");
 466             $pd->selectAdd();
 467             $pd->selectAdd('distinct(person_id) as person_id');
 468             $roled = $pd->fetchAll('person_id');
 469             $rs = $roled  ? "  OR
 470                     {$this->tableName()}.id IN (".implode(',', $roled) . ")
 471                     " : '';
 472             $this->whereAdd(" join_company_id_id.comptype = 'OWNER' $rs ");
 473
 474         }
 475         // -- for distribution
 476         if (!empty($q['query']['person_internal_only'])) {
 477             // must be internal and not current user (need for distribution list)
 478             $this->whereAdd(" join_company_id_id.comptype = 'OWNER'");
 479
 480             //$this->whereAdd(($this->tableName() == 'Person' ? 'Person' : "join_person_id_id") .
 481             //    ".id  != ".$au->id);
 482             $this->whereAdd("Person.id != {$au->id}");
 483         }
 484
 485         if (!empty($q['query']['comptype_or_company_id'])) {
 486            // DB_DataObject::debugLevel(1);
 487             $bits = explode(',', $q['query']['comptype_or_company_id']);
 488             $id = (int) array_pop($bits);
 489             $ct = $this->escape($bits[0]);
 490
 491             $this->whereAdd(" join_company_id_id.comptype = '$ct' OR Person.company_id = $id");
 492
 493         }
 494
 495
 496         // staff list..
 497         if (!empty($q['query']['person_inactive'])) {
 498            // DB_Dataobject::debugLevel(1);
 499             $this->active = 1;
 500         }
 501
 502         ///---------------- Group views --------
 503         if (!empty($q['query']['in_group'])) {
 504             // DB_DataObject::debugLevel(1);
 505             $ing = (int) $q['query']['in_group'];
 506             if ($q['query']['in_group'] == -1) {
 507                 // list all staff who are not in a group.
 508                 $this->whereAdd("Person.id NOT IN (
 509                     SELECT distinct(user_id) FROM Group_Members LEFT JOIN
 510                         Groups ON Groups.id = Group_Members.group_id
 511                         WHERE Groups.type = ".$q['query']['type']."
 512                     )");
 513
 514
 515             } else {
 516
 517                 $this->whereAdd("Person.id IN (
 518                     SELECT distinct(user_id) FROM Group_Members
 519                         WHERE group_id = $ing
 520                     )");
 521                }
 522
 523         }
 524
 525         if (!empty($q['query']['not_in_directory'])) {
 526             // it's a Person list..
 527             // DB_DATaobjecT::debugLevel(1);
 528
 529             // specific to project directory which is single comp. login
 530             //
 531             $owncomp = DB_DataObject::Factory('Companies');
 532             $owncomp->get('comptype', 'OWNER');
 533             if ($q['company_id'] == $owncomp->id) {
 534                 $this->active =1;
 535             }
 536
 537
 538             if ( $q['query']['not_in_directory'] > -1) {
 539                 // can list current - so that it does not break!!!
 540                 $x->whereAdd('Person.id NOT IN
 541                     ( SELECT distinct person_id FROM ProjectDirectory WHERE
 542                         project_id = ' . $q['query']['not_in_directory'] . ' AND
 543                         company_id = ' . $this->company_id . ')');
 544             }
 545         }
 546
 547
 548         if (!empty($q['query']['project_member_of'])) {
 549                // this is also a flag to return if they are a member..
 550             //DB_DataObject::debugLevel(1);
 551             $do = DB_DataObject::factory('ProjectDirectory');
 552             $do->project_id = $q['query']['project_member_of'];
 553
 554             $this->joinAdd($do,array('joinType' => 'LEFT', 'useWhereAsOn' => true));
 555             $this->selectAdd('IF(ProjectDirectory.id IS NULL, 0,  ProjectDirectory.id )  as is_member');
 556
 557
 558             if (!empty($q['query']['project_member_filter'])) {
 559                 $this->having('is_member !=0');
 560
 561             }
 562
 563         }
 564
 565
 566         if (!empty($q['query']['search'])) {
 567             $s = $this->escape($q['query']['search']);
 568                     $this->whereAdd("
 569                         Person.name LIKE '%$s%'  OR
 570                         Person.email LIKE '%$s%'  OR
 571                         Person.role LIKE '%$s%'  OR
 572                         Person.remarks LIKE '%$s%'
 573
 574                     ");
 575         }
 576
 577         //
 578     }
 579     function setFromRoo($ar, $roo)
 580     {
 581         $this->setFrom($ar);
 582         if (!empty($ar['passwd1'])) {
 583             $this->setPassword($ar['passwd1']);
 584         }
 585
 586
 587         if (    $this->id &&
 588                 ($this->email == $roo->old->email)&&
 589                 ($this->company_id == $roo->old->company_id)
 590             ) {
 591             return true;
 592         }
 593         if (empty($this->email)) {
 594             return true;
 595         }
 596         $xx = DB_Dataobject::factory('Person');
 597         $xx->setFrom(array(
 598             'email' => $this->email,
 599            // 'company_id' => $x->company_id
 600         ));
 601
 602         if ($xx->count()) {
 603             return "Duplicate Email found";
 604         }
 605         return true;
 606     }
 607     /**
 608      *
 609      * before Delete - delete significant dependancies..
 610      * this is called after checkPerm..
 611      */
 612
 613     function beforeDelete()
 614     {
 615
 616         $e = DB_DataObject::Factory('Events');
 617         $e->whereAdd('person_id = ' . $this->id);
 618         $e->delete(true);
 619
 620         // anything else?
 621
 622     }
 623
 624
 625     /***
 626      * Check if the a user has access to modify this item.
 627      * @param String $lvl Level (eg. Core.Projects)
 628      * @param Pman_Core_DataObjects_Person $au The authenticated user.
 629      * @param boolean $changes alllow changes???
 630      *
 631      * @return false if no access..
 632      */
 633     function checkPerm($lvl, $au, $changes=false) //heck who is trying to access this. false == access denied..
 634     {
 635
 636        // do we have an empty system..
 637         if ($au && $au->id == -1) {
 638             return true;
 639         }
 640
 641         // determine if it's staff!!!
 642
 643         if ($au->company()->comptype != 'OWNER') {
 644
 645             // - can not change company!!!
 646             if ($changes &&
 647                 isset($changes['company_id']) &&
 648                 $changes['company_id'] != $au->company_id) {
 649                 return false;
 650             }
 651             // can only set new emails..
 652             if ($changes &&
 653                     !empty($this->email) &&
 654                     isset($changes['email']) &&
 655                     $changes['email'] != $this->email) {
 656                 return false;
 657             }
 658
 659             // edit self... - what about other staff members...
 660
 661             return $this->company_id == $au->company_id;
 662         }
 663
 664
 665         // yes, only owner company can mess with this...
 666         $owncomp = DB_DataObject::Factory('Companies');
 667         $owncomp->get('comptype', 'OWNER');
 668
 669         $isStaff = ($this->company_id ==  $owncomp->id);
 670
 671
 672         switch ($lvl) {
 673             // extra case change passwod?
 674             case 'P': //??? password
 675                 // standard perms -- for editing + if the user is dowing them selves..
 676                 $ret = $isStaff ? $au->hasPerm("Core.Person", "E") : $au->hasPerm("Core.Staff", "E");
 677                 return $ret || $au->id == $this->id;
 678
 679             case 'S': // list..
 680                 return $au->hasPerm("Core.Person", "S");
 681
 682             case 'E': // edit
 683                 return $isStaff ? $au->hasPerm("Core.Person", "E") : $au->hasPerm("Core.Staff", "E");
 684
 685             case 'A': // add
 686                 return $isStaff ? $au->hasPerm("Core.Person", "A") : $au->hasPerm("Core.Staff", "A");
 687
 688             case 'D': // add
 689                 return $isStaff ? $au->hasPerm("Core.Person", "D") : $au->hasPerm("Core.Staff", "D");
 690
 691         }
 692         return false;
 693     }
 694     function onInsert($req, $roo)
 695     {
 696
 697         if ($roo->authUser->id < 0) {
 698             $g = DB_DataObject::factory('Groups');
 699             $g->type = 0;
 700             $g->get('name', 'Administrators');
 701
 702             $p = DB_DataObject::factory('Group_Members');
 703             $p->group_id = $g->id;
 704             $p->user_id = $this->id;
 705             if (!$p->count()) {
 706                 $p->insert();
 707                 $roo->addEvent("ADD", $p, $g->toEventString(). " Added " . $this->toEventString());
 708             }
 709             $this->login();
 710         }
 711         if (!empty($req['project_id_addto'])) {
 712             $pd = DB_DataObject::factory('ProjectDirectory');
 713             $pd->project_id = $req['project_id_addto'];
 714             $pd->person_id = $this->id;
 715             $pd->ispm =0;
 716             $pd->office_id = $this->office_id;
 717             $pd->company_id = $this->company_id;
 718             $pd->insert();
 719         }
 720
 721     }
 722  }