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->selectAdd();
 353             $im->selectAs($im,  'company_id_logo_id_%s');
 354             if ($im->find(true)) {
 355
 356                 foreach($im->toArray() as $k=>$v) {
 357                     $aur[$k] = $v;
 358                 }
 359             }
 360         }
 361
 362         // perms + groups.
 363         $aur['perms']  = $this->getPerms();
 364         $g = DB_DataObject::Factory('Group_Members');
 365         $aur['groups']  = $g->listGroupMembership($this, 'name');
 366
 367         $aur['passwd'] = '';
 368         $aur['dailykey'] = '';
 369
 370
 371
 372         return $aur;
 373     }
 374
 375     //   ----------PERMS------  ----------------
 376     function getPerms()
 377     {
 378          //DB_DataObject::debugLevel(1);
 379         // find out all the groups they are a member of.. + Default..
 380
 381         // ------ INIITIALIZE IF NO GROUPS ARE SET UP.
 382
 383         $g = DB_DataObject::Factory('Group_Rights');
 384         if (!$g->count()) {
 385             $g->genDefault();
 386         }
 387
 388         if ($this->id < 0) {
 389             return $g->adminRights(); // system is not set up - so they get full rights.
 390         }
 391         DB_DataObject::debugLevel(1);
 392         $g = DB_DataObject::Factory('Group_Members');
 393         $g->whereAdd('group_id is NO NULL AND user_id IS NOT NULL');
 394         if (!$g->count()) {
 395             // add the current user to the admin group..
 396             $g = DB_DataObject::Factory('Groups');
 397             if ($g->get('name', 'Administrators')) {
 398                 $gm = DB_DataObject::Factory('Group_Members');
 399                 $gm->group_id = $g->id;
 400                 $gm->user_id = $this->id;
 401                 $gm->insert();
 402             }
 403
 404         }
 405
 406         // ------ STANDARD PERMISSION HANDLING.
 407
 408         $g = DB_DataObject::Factory('Group_Members');
 409         $grps = $g->listGroupMembership($this);
 410        //var_dump($grps);
 411         $isAdmin = $g->inAdmin;
 412         //echo '<PRE>'; print_r($grps);var_dump($isAdmin);
 413         // the load all the perms for those groups, and add them all together..
 414         // then load all those
 415         $g = DB_DataObject::Factory('Group_Rights');
 416         $ret =  $g->listPermsFromGroupIds($grps, $isAdmin);
 417         //echo '<PRE>';print_r($ret);
 418         return $ret;
 419
 420
 421     }
 422     /**
 423      *Basic group fetching - probably needs to filter by type eventually.
 424      *
 425      */
 426
 427     function groups()
 428     {
 429         $g = DB_DataObject::Factory('Group_Members');
 430         $grps = $g->listGroupMembership($this);
 431         $g = DB_DataObject::Factory('Groups');
 432         $g->whereAddIn('id', $grps, 'int');
 433         return $g->fetchAll();
 434
 435     }
 436
 437     function hasPerm($name, $lvl)
 438     {
 439         static $pcache = array();
 440
 441         if (!isset($pcache[$this->id])) {
 442             $pcache[$this->id] = $this->getPerms();
 443         }
 444        // echo "<PRE>";print_r($pcache[$au->id]);
 445        // var_dump($pcache[$au->id]);
 446         if (empty($pcache[$this->id][$name])) {
 447             return false;
 448         }
 449
 450         return strpos($pcache[$this->id][$name], $lvl) > -1;
 451
 452     }
 453
 454     //  ------------ROO HOOKS------------------------------------
 455     function applyFilters($q, $au)
 456     {
 457         if (!empty($q['query']['person_not_internal'])) {
 458             $this->whereAdd(" join_company_id_id.isOwner = 0 ");
 459         }
 460         if (!empty($q['query']['person_internal_only_all'])) {
 461
 462
 463             // must be internal and not current user (need for distribution list)
 464             // user has a projectdirectory entry and role is not blank.
 465             //DB_DataObject::DebugLevel(1);
 466             $pd = DB_DataObject::factory('ProjectDirectory');
 467             $pd->whereAdd("role != ''");
 468             $pd->selectAdd();
 469             $pd->selectAdd('distinct(person_id) as person_id');
 470             $roled = $pd->fetchAll('person_id');
 471             $rs = $roled  ? "  OR
 472                     {$this->tableName()}.id IN (".implode(',', $roled) . ")
 473                     " : '';
 474             $this->whereAdd(" join_company_id_id.comptype = 'OWNER' $rs ");
 475
 476         }
 477         // -- for distribution
 478         if (!empty($q['query']['person_internal_only'])) {
 479             // must be internal and not current user (need for distribution list)
 480             $this->whereAdd(" join_company_id_id.comptype = 'OWNER'");
 481
 482             //$this->whereAdd(($this->tableName() == 'Person' ? 'Person' : "join_person_id_id") .
 483             //    ".id  != ".$au->id);
 484             $this->whereAdd("Person.id != {$au->id}");
 485         }
 486
 487         if (!empty($q['query']['comptype_or_company_id'])) {
 488            // DB_DataObject::debugLevel(1);
 489             $bits = explode(',', $q['query']['comptype_or_company_id']);
 490             $id = (int) array_pop($bits);
 491             $ct = $this->escape($bits[0]);
 492
 493             $this->whereAdd(" join_company_id_id.comptype = '$ct' OR Person.company_id = $id");
 494
 495         }
 496
 497
 498         // staff list..
 499         if (!empty($q['query']['person_inactive'])) {
 500            // DB_Dataobject::debugLevel(1);
 501             $this->active = 1;
 502         }
 503
 504         ///---------------- Group views --------
 505         if (!empty($q['query']['in_group'])) {
 506             // DB_DataObject::debugLevel(1);
 507             $ing = (int) $q['query']['in_group'];
 508             if ($q['query']['in_group'] == -1) {
 509                 // list all staff who are not in a group.
 510                 $this->whereAdd("Person.id NOT IN (
 511                     SELECT distinct(user_id) FROM Group_Members LEFT JOIN
 512                         Groups ON Groups.id = Group_Members.group_id
 513                         WHERE Groups.type = ".$q['query']['type']."
 514                     )");
 515
 516
 517             } else {
 518
 519                 $this->whereAdd("Person.id IN (
 520                     SELECT distinct(user_id) FROM Group_Members
 521                         WHERE group_id = $ing
 522                     )");
 523                }
 524
 525         }
 526
 527         if (!empty($q['query']['not_in_directory'])) {
 528             // it's a Person list..
 529             // DB_DATaobjecT::debugLevel(1);
 530
 531             // specific to project directory which is single comp. login
 532             //
 533             $owncomp = DB_DataObject::Factory('Companies');
 534             $owncomp->get('comptype', 'OWNER');
 535             if ($q['company_id'] == $owncomp->id) {
 536                 $this->active =1;
 537             }
 538
 539
 540             if ( $q['query']['not_in_directory'] > -1) {
 541                 // can list current - so that it does not break!!!
 542                 $x->whereAdd('Person.id NOT IN
 543                     ( SELECT distinct person_id FROM ProjectDirectory WHERE
 544                         project_id = ' . $q['query']['not_in_directory'] . ' AND
 545                         company_id = ' . $this->company_id . ')');
 546             }
 547         }
 548
 549
 550         if (!empty($q['query']['project_member_of'])) {
 551                // this is also a flag to return if they are a member..
 552             //DB_DataObject::debugLevel(1);
 553             $do = DB_DataObject::factory('ProjectDirectory');
 554             $do->project_id = $q['query']['project_member_of'];
 555
 556             $this->joinAdd($do,array('joinType' => 'LEFT', 'useWhereAsOn' => true));
 557             $this->selectAdd('IF(ProjectDirectory.id IS NULL, 0,  ProjectDirectory.id )  as is_member');
 558
 559
 560             if (!empty($q['query']['project_member_filter'])) {
 561                 $this->having('is_member !=0');
 562
 563             }
 564
 565         }
 566
 567
 568         if (!empty($q['query']['search'])) {
 569             $s = $this->escape($q['query']['search']);
 570                     $this->whereAdd("
 571                         Person.name LIKE '%$s%'  OR
 572                         Person.email LIKE '%$s%'  OR
 573                         Person.role LIKE '%$s%'  OR
 574                         Person.remarks LIKE '%$s%'
 575
 576                     ");
 577         }
 578
 579         //
 580     }
 581     function setFromRoo($ar, $roo)
 582     {
 583         $this->setFrom($ar);
 584         if (!empty($ar['passwd1'])) {
 585             $this->setPassword($ar['passwd1']);
 586         }
 587
 588
 589         if (    $this->id &&
 590                 ($this->email == $roo->old->email)&&
 591                 ($this->company_id == $roo->old->company_id)
 592             ) {
 593             return true;
 594         }
 595         if (empty($this->email)) {
 596             return true;
 597         }
 598         $xx = DB_Dataobject::factory('Person');
 599         $xx->setFrom(array(
 600             'email' => $this->email,
 601            // 'company_id' => $x->company_id
 602         ));
 603
 604         if ($xx->count()) {
 605             return "Duplicate Email found";
 606         }
 607         return true;
 608     }
 609     /**
 610      *
 611      * before Delete - delete significant dependancies..
 612      * this is called after checkPerm..
 613      */
 614
 615     function beforeDelete()
 616     {
 617
 618         $e = DB_DataObject::Factory('Events');
 619         $e->whereAdd('person_id = ' . $this->id);
 620         $e->delete(true);
 621
 622         // anything else?
 623
 624     }
 625
 626
 627     /***
 628      * Check if the a user has access to modify this item.
 629      * @param String $lvl Level (eg. Core.Projects)
 630      * @param Pman_Core_DataObjects_Person $au The authenticated user.
 631      * @param boolean $changes alllow changes???
 632      *
 633      * @return false if no access..
 634      */
 635     function checkPerm($lvl, $au, $changes=false) //heck who is trying to access this. false == access denied..
 636     {
 637
 638        // do we have an empty system..
 639         if ($au && $au->id == -1) {
 640             return true;
 641         }
 642
 643         // determine if it's staff!!!
 644
 645         if ($au->company()->comptype != 'OWNER') {
 646
 647             // - can not change company!!!
 648             if ($changes &&
 649                 isset($changes['company_id']) &&
 650                 $changes['company_id'] != $au->company_id) {
 651                 return false;
 652             }
 653             // can only set new emails..
 654             if ($changes &&
 655                     !empty($this->email) &&
 656                     isset($changes['email']) &&
 657                     $changes['email'] != $this->email) {
 658                 return false;
 659             }
 660
 661             // edit self... - what about other staff members...
 662
 663             return $this->company_id == $au->company_id;
 664         }
 665
 666
 667         // yes, only owner company can mess with this...
 668         $owncomp = DB_DataObject::Factory('Companies');
 669         $owncomp->get('comptype', 'OWNER');
 670
 671         $isStaff = ($this->company_id ==  $owncomp->id);
 672
 673
 674         switch ($lvl) {
 675             // extra case change passwod?
 676             case 'P': //??? password
 677                 // standard perms -- for editing + if the user is dowing them selves..
 678                 $ret = $isStaff ? $au->hasPerm("Core.Person", "E") : $au->hasPerm("Core.Staff", "E");
 679                 return $ret || $au->id == $this->id;
 680
 681             case 'S': // list..
 682                 return $au->hasPerm("Core.Person", "S");
 683
 684             case 'E': // edit
 685                 return $isStaff ? $au->hasPerm("Core.Person", "E") : $au->hasPerm("Core.Staff", "E");
 686
 687             case 'A': // add
 688                 return $isStaff ? $au->hasPerm("Core.Person", "A") : $au->hasPerm("Core.Staff", "A");
 689
 690             case 'D': // add
 691                 return $isStaff ? $au->hasPerm("Core.Person", "D") : $au->hasPerm("Core.Staff", "D");
 692
 693         }
 694         return false;
 695     }
 696     function onInsert($req, $roo)
 697     {
 698
 699         if ($roo->authUser->id < 0) {
 700             $g = DB_DataObject::factory('Groups');
 701             $g->type = 0;
 702             $g->get('name', 'Administrators');
 703
 704             $p = DB_DataObject::factory('Group_Members');
 705             $p->group_id = $g->id;
 706             $p->user_id = $this->id;
 707             if (!$p->count()) {
 708                 $p->insert();
 709                 $roo->addEvent("ADD", $p, $g->toEventString(). " Added " . $this->toEventString());
 710             }
 711             $this->login();
 712         }
 713         if (!empty($req['project_id_addto'])) {
 714             $pd = DB_DataObject::factory('ProjectDirectory');
 715             $pd->project_id = $req['project_id_addto'];
 716             $pd->person_id = $this->id;
 717             $pd->ispm =0;
 718             $pd->office_id = $this->office_id;
 719             $pd->company_id = $this->company_id;
 720             $pd->insert();
 721         }
 722
 723     }
 724  }