6 * - base application setup (variables etc to javascript)
8 * - authentication and permission info about user / application
9 * - json output methods.
10 * - file upload error checking - checkFileUploadError
11 * - logging to event table
12 * - sendTemplate code (normally use the Person version for sending to specific people..)
14 * - doc managment code?? - remarks and tracking??? - MOVEME
15 * - authentication link checking?? MOVEME?
16 * - authentication reset password ?? MOVEME?
17 * ?? arrayClean.. what's it doing here?!? ;)
20 * DB_DataObject*:*toEventString (for logging - this is generically prefixed to all database operations.)
21 * - any data object where this method exists, the result will get prefixed to the log remarks
24 class Pman extends HTML_FlexyFramework_Page
28 var $appShortName= "";
29 var $appVersion = "1.8";
36 var $appDisabled = array(); // array of disabled modules..
37 // (based on config option disable)
39 var $authUser; // always contains the authenticated user..
41 var $disable_jstemplate = false; /// disable inclusion of jstemplate code..
45 * ------------- Standard getAuth/get/post methods of framework.
50 function getAuth() // everyone allowed in!!!!!
52 $this->loadOwnerCompany();
60 if (isset($this->_hasInit)) {
63 $this->_hasInit = true;
64 // move away from doing this ... you can access bootLoader.XXXXXX in the master template..
65 $boot = HTML_FlexyFramework::get();
66 // echo'<PRE>';print_R($boot);exit;
67 $this->appName= $boot->appName;
68 $this->appNameShort= $boot->appNameShort;
71 $this->appModules= $boot->enable;
73 // echo $this->arrayToJsInclude($files);
74 $this->isDev = empty($boot->Pman['isDev']) ? false : $boot->Pman['isDev'];
76 $this->appDisable = $boot->disable;
77 $this->appDisabled = explode(',', $boot->disable);
78 $this->version = $boot->version;
79 $this->uiConfig = empty($boot->Pman['uiConfig']) ? false : $boot->Pman['uiConfig'];
81 if (!empty($ff->Pman['local_autoauth']) &&
82 ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
83 ($_SERVER['REMOTE_ADDR'] == '127.0.0.1')
88 // if a file Pman_{module}_Pman exists.. and it has an init function... - call that..
90 //var_dump($this->appModules);
96 * module init is only loaded on main page call, and includes checks for configuration settings.
98 function initModules()
100 foreach(explode(',',$this->appModules) as $m) {
101 $cls = 'Pman_'. $m . '_Pman';
103 //echo $this->rootDir . '/'.str_replace('_','/', $cls). '.php';
105 if (!file_exists($this->rootDir . '/'.str_replace('_','/', $cls). '.php')) {
108 require_once str_replace('_','/', $cls). '.php';
110 if (method_exists($c,'init')) {
122 $this->initModules();
125 //$this->allowSignup= empty($opts['allowSignup']) ? 0 : 1;
126 $bits = explode('/', $base);
128 if ($bits[0] == 'Link') {
129 $this->linkFail = $this->linkAuth(@$bits[1],@$bits[2]);
130 header('Content-type: text/html; charset=utf-8');
134 // should really be moved to Login...
136 if ($bits[0] == 'PasswordReset') {
137 $this->linkFail = $this->resetPassword(@$bits[1],@$bits[2],@$bits[3]);
138 header('Content-type: text/html; charset=utf-8');
142 $au = $this->getAuthUser();
144 $ff= HTML_FlexyFramework::get();
146 if (!empty($ff->Pman['auth_comptype']) && $au->id > 0 &&
147 ( !$au->company_id || ($ff->Pman['auth_comptype'] != $au->company()->comptype))) {
151 $this->jerr("Login not permited to outside companies - please reload");
153 $this->addEvent("RELOAD");
158 $this->addEvent("BADURL", false, $base);
159 $this->jerr("invalid url");
162 if (isset($_GET['onloadTrack'])) {
163 $this->onloadTrack = (int)$_GET['onloadTrack'];
165 // getting this to work with xhtml is a nightmare
166 // = nbsp / <img> issues screw everyting up.
167 //var_dump($this->isDev);
168 // force regeneration on load for development enviroments..
170 HTML_FlexyFramework::get()->generateDataobjectsCache($this->isDev);
172 //header('Content-type: application/xhtml+xml; charset=utf-8');
176 if ($this->company && $this->company->logo_id) {
177 $im = DB_DataObject::Factory('Images');
178 $im->get($this->company->logo_id);
179 $this->appLogo = $this->baseURL . '/Images/Thumb/300x100/'. $this->company->logo_id .'/' . $im->filename;
182 header('Content-type: text/html; charset=utf-8');
185 function post($base) {
186 return $this->get($base);
190 // --------------- AUTHENTICATION or system information
193 * finds the compay with comptype=='OWNER'
195 * @return {Pman_Core_DataObjects_Companies} the owner company
197 function loadOwnerCompany()
199 // only applies if authtable is person..
200 $ff = HTML_FlexyFramework::get();
201 if (!empty($ff->Pman['authTable']) && $ff->Pman['authTable'] != 'Person') {
205 $this->company = DB_DataObject::Factory('Companies');
206 if (!is_a($this->company, 'DB_DataObject')) { // non-core pman projects
209 $this->company->get('comptype', 'OWNER');
210 return $this->company;
216 * getAuthUser: - get the authenticated user..
218 * @return {DB_DataObject} of type Pman[authTable] if authenticated.
221 function getAuthUser()
223 if (!empty($this->authUser)) {
224 return $this->authUser;
226 $ff = HTML_FlexyFramework::get();
227 $tbl = empty($ff->Pman['authTable']) ? 'Person' : $ff->Pman['authTable'];
229 $u = DB_DataObject::factory( $tbl );
233 $this->authUser =$u->getAuthUser();
234 return $this->authUser ;
238 * wrapper arround authuser->hasPerm
239 * @see Pman_Core_DataObjects_User::hasPerm
241 * @param {String} $name The permission name (eg. Projects.List)
242 * @param {String} $lvl eg. (C)reate (E)dit (D)elete ... etc.
245 function hasPerm($name, $lvl) // do we have a permission
247 static $pcache = array();
248 $au = $this->getAuthUser();
249 return $au && $au->hasPerm($name,$lvl);
254 * modulesList: List the modules in the application
256 * @return {Array} list of modules
258 function modulesList()
260 $boot = HTML_FlexyFramework::get();
261 // echo'<PRE>';print_R($boot);exit;
264 $mods = explode(',', $boot->enable);
265 if (in_array('Core',$mods)) { // core has to be the first modules loaded as it contains Pman.js
266 array_unshift($mods, 'Core');
269 if (in_array($boot->appNameShort,$mods)) { // Project has to be the last modules loaded as it contains Pman.js
270 unset($mods[array_search($boot->appNameShort, $mods)]);
271 $mods[] = $boot->appNameShort;
274 $mods = array_unique($mods);
276 $disabled = explode(',', $boot->disable ? $boot->disable : '');
278 foreach($mods as $mod) {
279 // add the css file..
280 if (in_array($mod, $disabled)) {
291 function hasModule($name)
294 if (!strpos( $name,'.') ) {
295 // use enable / disable..
296 return in_array($name, $this->modules());
299 $x = DB_DataObject::factory('Group_Rights');
300 $ar = $x->defaultPermData();
301 if (empty($ar[$name]) || empty($ar[$name][0])) {
316 * ---------------- Global Tools ---------------
318 function checkFileUploadError() // check for file upload errors.
321 empty($_FILES['File'])
322 || empty($_FILES['File']['name'])
323 || empty($_FILES['File']['tmp_name'])
324 || empty($_FILES['File']['type'])
325 || !empty($_FILES['File']['error'])
326 || empty($_FILES['File']['size'])
328 $this->jerr("File upload error: <PRE>" . print_r($_FILES,true) . print_r($_POST,true) . "</PRE>");
334 * generate a tempory file with an extension (dont forget to delete it)
337 function tempName($ext)
339 $x = tempnam(ini_get('session.save_path'), HTML_FlexyFramework::get()->appNameShort.'TMP');
341 return $x .'.'. $ext;
344 * ------------- Authentication testing ------ ??? MOVEME?
348 function linkAuth($trid, $trkey)
350 $tr = DB_DataObject::factory('Documents_Tracking');
351 if (!$tr->get($trid)) {
352 return "Invalid URL";
354 if (strtolower($tr->authkey) != strtolower($trkey)) {
355 $this->AddEvent("ERROR-L", false, "Invalid Key");
356 return "Invalid KEY";
359 $this->onloadTrack = (int) $tr->doc_id;
360 if (strtotime($tr->date_sent) < strtotime("NOW - 14 DAYS")) {
361 $this->AddEvent("ERROR-L", false, "Key Expired");
362 return "Key Expired";
364 // user logged in and not
365 $au = $this->getAuthUser();
366 if ($au && $au->id && $au->id != $tr->person_id) {
369 return "Logged Out existing Session\n - reload to log in with correct key";
371 if ($au) { // logged in anyway..
372 $this->AddEvent("LOGIN", false, "With Key (ALREADY)");
373 header('Location: ' . $this->baseURL.'?onloadTrack='.$this->onloadTrack);
378 // authenticate the user...
380 $u = DB_DataObject::factory('Person');
382 $u->get($tr->person_id);
384 $this->AddEvent("LOGIN", false, "With Key");
386 // we need to redirect out - otherwise refererer url will include key!
387 header('Location: ' . $this->baseURL.'?onloadTrack='.$this->onloadTrack);
399 * ------------- Authentication password reset ------ ??? MOVEME?
405 function resetPassword($id,$t, $key)
408 $au = $this->getAuthUser();
410 return "Already Logged in - no need to use Password Reset";
413 $u = DB_DataObject::factory('Person');
414 //$u->company_id = $this->company->id;
416 if (!$u->get($id) || !strlen($u->passwd)) {
421 if ($key != $u->genPassKey($t)) {
422 return "invalid key";
425 $u->no_reset_sent = 0;
428 if ($t < strtotime("NOW - 1 DAY")) {
431 $this->showNewPass = implode("/", array($id,$t,$key));
436 * jerrAuth: standard auth failure - with data that let's the UI know..
440 $au = $this->authUser();
442 // is it an authfailure?
443 $this->jerr("Permission denied to view this resource", array('authFailure' => true));
445 $this->jerr("Not authenticated", array('authFailure' => true));
451 * ---------------- Standard JSON outputers. - used everywhere
454 function jerr($str, $errors=array(), $content_type = false) // standard error reporting..
456 return $this->jerror('ERROR', $str,$errors,$content_type);
459 * Recomended JSON error indicator
460 * @param string $type - normally 'ERROR' - you can use this to track error types.
461 * @param string $message - error message displayed to user.
465 function jerror($type, $str, $errors=array(), $content_type = false) // standard error reporting..
467 $this->addEvent($type, false, $str);
469 $cli = HTML_FlexyFramework::get()->cli;
471 echo "ERROR: " .$str . "\n";
476 if ($content_type == 'text/plain') {
477 header('Content-Disposition: attachment; filename="error.txt"');
478 header('Content-type: '. $content_type);
479 echo "ERROR: " .$str . "\n";
485 require_once 'Services/JSON.php';
486 $json = new Services_JSON();
491 if (!empty($_REQUEST['returnHTML']) ||
492 (isset($_SERVER['CONTENT_TYPE']) && preg_match('#multipart/form-data#i', $_SERVER['CONTENT_TYPE']))
494 header('Content-type: text/html');
495 echo "<HTML><HEAD></HEAD><BODY>";
496 echo $json->encodeUnsafe(array(
499 'message' => $str, // compate with exeption / loadexception.
501 'errors' => $errors ? $errors : true, // used by forms to flag errors.
502 'authFailure' => !empty($errors['authFailure']),
504 echo "</BODY></HTML>";
508 if (isset($_REQUEST['_debug'])) {
509 echo '<PRE>'.htmlspecialchars(print_r(array(
513 'message' => $str, // compate with exeption / loadexception.
514 'errors' => $errors ? $errors : true, // used by forms to flag errors.
515 'authFailure' => !empty($errors['authFailure']),
521 echo $json->encode(array(
525 'message' => $str, // compate with exeption / loadexception.
526 'errors' => $errors ? $errors : true, // used by forms to flag errors.
527 'authFailure' => !empty($errors['authFailure']),
536 $cli = HTML_FlexyFramework::get()->cli;
538 echo "OK: " .$str . "\n";
541 require_once 'Services/JSON.php';
542 $json = new Services_JSON();
544 if (!empty($_REQUEST['returnHTML']) ||
545 (isset($_SERVER['CONTENT_TYPE']) && preg_match('#multipart/form-data#i', $_SERVER['CONTENT_TYPE']))
548 header('Content-type: text/html');
549 echo "<HTML><HEAD></HEAD><BODY>";
550 // encode html characters so they can be read..
551 echo str_replace(array('<','>'), array('\u003c','\u003e'),
552 $json->encodeUnsafe(array('success'=> true, 'data' => $str)));
553 echo "</BODY></HTML>";
558 echo $json->encode(array('success'=> true, 'data' => $str));
564 * output data for grids or tree
565 * @ar {Array} ar Array of data
566 * @total {Number|false} total number of records (or false to return count(ar)
567 * @extra {Array} extra key value list of data to pass as extra data.
570 function jdata($ar,$total=false, $extra=array(), $cachekey = false)
572 // should do mobile checking???
573 if ($total == false) {
576 $extra= $extra ? $extra : array();
577 require_once 'Services/JSON.php';
578 $json = new Services_JSON();
579 if (isset($_SERVER['CONTENT_TYPE']) && preg_match('#multipart/form-data#i', $_SERVER['CONTENT_TYPE'])) {
581 header('Content-type: text/html');
582 echo "<HTML><HEAD></HEAD><BODY>";
583 // encode html characters so they can be read..
584 echo str_replace(array('<','>'), array('\u003c','\u003e'),
585 $json->encodeUnsafe(array('success' => true, 'total'=> $total, 'data' => $ar) + $extra));
586 echo "</BODY></HTML>";
591 // see if trimming will help...
592 if (!empty($_REQUEST['_pman_short'])) {
595 foreach($ar as $as) {
597 foreach($as as $k=>$v) {
598 if (is_string($v) && !strlen(trim($v))) {
610 $ret = $json->encode(array('success' => true, 'total'=> $total, 'data' => $ar) + $extra);
612 if (!empty($cachekey)) {
614 $fn = ini_get('session.save_path') . '/json-cache'.date('/Y/m/d').'.'. $cachekey . '.cache.json';
615 if (!file_exists(dirname($fn))) {
616 mkdir(dirname($fn), 0777,true);
618 file_put_contents($fn, $ret);
626 /** a daily cache **/
627 function jdataCache($cachekey)
629 $fn = ini_get('session.save_path') . '/json-cache'.date('/Y/m/d').'.'. $cachekey . '.cache.json';
630 if (file_exists($fn)) {
631 header('Content-type: application/json');
632 echo file_get_contents($fn);
642 * ---------------- OUTPUT
644 function hasBg($fn) // used on front page to check if logos exist..
646 return file_exists($this->rootDir.'/Pman/'.$this->appNameShort.'/templates/images/'. $fn);
649 * outputJavascriptIncludes:
651 * output <script....> for all the modules in the applcaiton
654 function outputJavascriptIncludes()
657 $mods = $this->modulesList();
659 foreach($mods as $mod) {
660 // add the css file..
663 $files = $this->moduleJavascriptList($mod.'/widgets');
664 foreach($files as $f) {
665 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
668 $files = $this->moduleJavascriptList($mod);
669 foreach($files as $f) {
670 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
674 if (empty($this->disable_jstemplate)) {
675 // and finally the JsTemplate...
676 echo '<script type="text/javascript" src="'. $this->baseURL. '/Core/JsTemplate"></script>'."\n";
683 * output <link rel=stylesheet......> for all the modules in the applcaiton
686 * This could css minify as well.
688 function outputCSSIncludes() // includes on CSS links.
691 $mods = $this->modulesList();
694 foreach($mods as $mod) {
695 // add the css file..
696 $dir = $this->rootDir.'/Pman/'.$mod;
697 $ar = glob($dir . '/*.css');
698 foreach($ar as $fn) {
699 $css = $this->rootURL .'/Pman/'.$mod.'/'.basename($fn) . '?ts=' . filemtime($fn);
700 echo '<link rel="stylesheet" type="text/css" href="'.$css.'" />'."\n";
709 * Gather infor for javascript files..
711 * @param {String} $mod the module to get info about.
712 * @return {StdClass} details about module.
714 function moduleJavascriptFilesInfo($mod)
717 static $cache = array();
719 if (isset($cache[$mod])) {
724 $ff = HTML_FlexyFramework::get();
726 $base = dirname($_SERVER['SCRIPT_FILENAME']);
727 $dir = $this->rootDir.'/Pman/'. $mod;
728 $path = $this->rootURL ."/Pman/$mod/";
730 $ar = glob($dir . '/*.js');
736 foreach($ar as $fn) {
738 // got the 'module file..'
739 $mtime = filemtime($dir . '/'. $f);
740 $maxtime = max($mtime, $maxtime);
741 $arfiles[$fn] = $mtime;
742 $files[] = $path . $f . '?ts='.$mtime;
745 ksort($arfiles); // just sort by name so it's consistant for serialize..
747 $compile = empty($ff->Pman['public_cache_dir']) ? 0 : 1;
748 $basedir = $compile ? $ff->Pman['public_cache_dir'] : false;
749 $baseurl = $compile ? $ff->Pman['public_cache_url'] : false;
751 $lsort = create_function('$a,$b','return strlen($a) > strlen($b) ? 1 : -1;');
752 usort($files, $lsort);
754 $smod = str_replace('/','.',$mod);
756 $output = date('Y-m-d-H-i-s-', $maxtime). $smod .'-'.md5(serialize($arfiles)) .'.js';
759 // why are translations done like this - we just build them on the fly frmo the database..
760 $tmtime = file_exists($this->rootDir.'/_translations_/'. $smod.'.js')
761 ? filemtime($this->rootDir.'/_translations_/'. $smod.'.js') : 0;
763 $cache[$mod] = (object) array(
764 'smod' => $smod, // module name without '/'
765 'files' => $files, // list of all files.
766 'filesmtime' => $arfiles, // map of mtime=>file
767 'maxtime' => $maxtime, // max mtime
768 'compile' => $this->isDev ? false : $compile,
769 'translation_file' => $base .'/_translations_/' . $smod . '.js',
770 'translation_mtime' => $tmtime,
772 'translation_data' => preg_replace('/\.js$/', '.__translation__.js', $output),
773 'translation_base' => $dir .'/', //prefix of filename (without moudle name))
774 'basedir' => $basedir,
775 'baseurl' => $baseurl,
776 'module_dir' => $dir,
783 * moduleJavascriptList: list the javascript files in a module
785 * The original version of this.. still needs more thought...
787 * Compiled is in Pman/_compiled_/{$mod}/{LATEST...}.js
788 * Translations are in Pman/_translations_/{$mod}.js
790 * if that stuff does not exist just list files in Pman/{$mod}/*.js
792 * Compiled could be done on the fly..
796 * @param {String} $mod the module to look at - eg. Pman/{$mod}/*.js
797 * @return {Array} list of include paths (either compiled or raw)
803 function moduleJavascriptList($mod)
807 $dir = $this->rootDir.'/Pman/'. $mod;
810 if (!file_exists($dir)) {
811 echo '<!-- missing directory '. htmlspecialchars($dir) .' -->';
815 $info = $this->moduleJavascriptFilesInfo($mod);
819 if (empty($info->files)) {
822 // finally sort the files, so they are in the right order..
824 // only compile this stuff if public_cache is set..
828 // public_cache_dir = /var/www/myproject_cache
829 // public_cache_url = /myproject_cache (with Alias apache /myproject_cache/ /var/www/myproject_cache/)
832 if (!$info->compile) {
833 echo "<!-- Javascript compile turned off (isDev on, or public_cache_dir not set) -->\n";
837 // where are we going to write all of this..
838 // This has to be done via a
839 if (!file_exists($info->basedir.'/'.$info->output) || !filesize($info->basedir.'/'.$info->output)) {
840 require_once 'Pman/Core/JsCompile.php';
841 $x = new Pman_Core_JsCompile();
843 $x->pack($info->filesmtime,$info->basedir.'/'.$info->output, $info->translation_base);
845 echo "<!-- file exists not exist: {$info->basedir}/{$info->output} -->\n";
848 if (file_exists($info->basedir.'/'.$info->output) &&
849 filesize($info->basedir.'/'.$info->output)) {
852 $info->baseurl.'/'. $info->output,
855 // output all the ava
856 // fixme - this needs the max datetime for the translation file..
857 $ret[] = $this->baseURL."/Admin/InterfaceTranslations/".$mod.".js"; //?ts=".$info->translation_mtime;
859 //if ($info->translation_mtime) {
860 // $ret[] = $this->rootURL."/_translations_/". $info->smod.".js?ts=".$info->translation_mtime;
867 // give up and output original files...
877 * PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
880 static $permitError = false;
882 function onPearError($err)
884 static $reported = false;
889 if (Pman::$permitError) {
897 $out = $err->toString();
900 //print_R($bt); exit;
903 foreach($err->backtrace as $b) {
904 $ret[] = @$b['file'] . '(' . @$b['line'] . ')@' . @$b['class'] . '::' . @$b['function'];
910 //convert the huge backtrace into something that is readable..
911 $out .= "\n" . implode("\n", $ret);
922 * ---------------- Logging ---------------
927 * Log an action (only if it has not been logged already.
929 * @param {String} action - group/name of event
930 * @param {DataObject|false} obj - dataobject action occured on.
931 * @param {String} any remarks
932 * @return {false|DB_DataObject} Event object.,
935 function addEventOnce($act, $obj = false, $remarks = '')
937 if (!empty(HTML_FlexyFramework::get()->Pman['disable_events'])) {
940 $e = DB_DataObject::factory('Events');
941 $e->init($act,$obj,$remarks);
942 if ($e->find(true)) {
945 return $this->addEvent($act, $obj, $remarks);
951 * @param {String} action - group/name of event
952 * @param {DataObject|false} obj - dataobject action occured on.
953 * @param {String} any remarks
954 * @return {DB_DataObject} Event object.,
957 function addEvent($act, $obj = false, $remarks = '')
960 if (!empty(HTML_FlexyFramework::get()->Pman['disable_events'])) {
963 $au = $this->getAuthUser();
965 $e = DB_DataObject::factory('Events');
966 $e->init($act,$obj,$remarks);
968 $e->event_when = date('Y-m-d H:i:s');
972 // fixme - this should be in onInsert..
973 $wa = DB_DataObject::factory('core_watch');
974 if (method_exists($wa,'notifyEvent')) {
975 $wa->notifyEvent($e); // trigger any actions..
979 $e->onInsert(isset($_REQUEST) ? $_REQUEST : array() , $this);
985 // ------------------ DEPERCIATED ----------------------------
987 // DEPRECITAED - use moduleslist
988 function modules() { return $this->modulesList(); }
990 // DEPRECIATED.. - use getAuthUser...
991 function staticGetAuthUser() { $x = new Pman(); return $x->getAuthUser(); }
994 // DEPRICATED USE Pman_Core_Mailer
996 function emailTemplate($templateFile, $args)
999 require_once 'Pman/Core/Mailer.php';
1000 $r = new Pman_Core_Mailer(array(
1001 'template'=>$templateFile,
1002 'contents' => $args,
1005 return $r->toData();
1008 // DEPRICATED - USE Pman_Core_Mailer
1009 // WHAT Part about DEPRICATED Does no one understand??
1010 function sendTemplate($templateFile, $args)
1012 require_once 'Pman/Core/Mailer.php';
1013 $r = new Pman_Core_Mailer(array(
1014 'template'=>$templateFile,
1015 'contents' => array(),