Fix #8059 - being splitting of Roo.php into Traits
[Pman.Base] / Pman.php
1 <?php 
2 /**
3  * Pman Base class
4  * 
5  * Provides:
6  *  - base application setup (variables etc to javascript)
7  * 
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..)
13  * 
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?!? ;)
18  *
19  *
20  *  OPTIONS
21  *  Pman['local_autoauth']   // who to login as when using localhost
22  *  Pman['isDev']  // can the site show develpment info.?
23  *  Pman['uiConfig']  // extra variable to export to front end..
24  *  Pman['auth_comptype'] // -- if set to 'OWNER' then only users with company=OWNER can log in
25  *  Pman['authTable'] // the authentication table (default 'person')
26  *
27  * 
28  * Usefull implemetors
29  * DB_DataObject*:*toEventString (for logging - this is generically prefixed to all database operations.)
30  *   - any data object where this method exists, the result will get prefixed to the log remarks
31  */
32
33  
34      
35  
36 require_once 'Pman/Core/AssetTrait.php';
37 require_once 'Pman/Core/JsonOutputTrait.php';
38
39
40 class Pman extends HTML_FlexyFramework_Page 
41 {
42     use Pman_Core_AssetTrait,
43         //outputJavascriptDir()
44         //outputCssDir();
45     
46         Pman_Core_JsonOutputTrait;
47         // jerr()
48         // jnotice()
49         // jerrAuth()
50         // jerror();
51         // jok()
52         // jdata()
53         // jdataCache()
54     
55     var $isDev = false;
56     var $appName= "";
57     var $appLogo= "";
58     var $appShortName= "";
59     var $appVersion = "1.8";
60     var $version = 'dev';
61     var $onloadTrack = 0;
62     var $linkFail = "";
63     var $showNewPass = 0;
64     var $logoPrefix = '';
65     var $appModules = '';
66     var $appDisabled = array(); // array of disabled modules..
67                     // (based on config option disable)
68      
69     var $authUser; // always contains the authenticated user..
70     
71     var $disable_jstemplate = false; /// disable inclusion of jstemplate code..
72     var $company = false;
73     
74     var $css_path = ''; // can inject a specific path into the base HTML page.
75     
76     
77     var $transObj = false; // used to rollback or commit in JOK/JERR
78     
79     // these are used somewhere - 
80     var $builderJs = false;//
81     var $serverName = false;
82     var $lang = false;
83     var $allowSignup = false;
84     var $_hasInit;
85     var $appNameShort;
86     var $appDisable;
87     var $uiConfig;
88      
89     /**
90      * ------------- Standard getAuth/get/post methods of framework.
91      * 
92      * 
93      */
94     
95     function getAuth() // everyone allowed in!!!!!
96     {
97         $this->loadOwnerCompany();
98         
99         return true;
100     }
101     
102     function init($base = false) 
103     {
104         
105         if (isset($this->_hasInit)) {
106             return;
107         }
108         $this->_hasInit = true;
109          // move away from doing this ... you can access bootLoader.XXXXXX in the master template..
110         $boot = HTML_FlexyFramework::get();
111         // echo'<PRE>';print_R($boot);exit;
112         $this->appName      = $boot->appName;
113         
114         $this->appNameShort = $boot->appNameShort;
115         
116         $this->appModules   = $boot->enable;
117         
118 //        echo $this->arrayToJsInclude($files);        
119         $this->isDev = empty($boot->Pman['isDev']) ? false : $boot->Pman['isDev'];
120         
121         $this->css_path = empty($boot->Pman['css_path']) ? '' : $boot->Pman['css_path'];
122         
123         $this->appDisable = $boot->disable;
124         $this->appDisabled = explode(',', $boot->disable);
125         $this->version = $boot->version;
126         $this->appVersion = $boot->version; 
127         $this->uiConfig = empty($boot->Pman['uiConfig']) ? false : $boot->Pman['uiConfig']; 
128         
129         if (!empty($boot->Pman['local_autoauth']) &&
130             !empty($_SERVER['SERVER_ADDR']) &&
131             !empty($_SERVER['REMOTE_ADDR']) &&            
132             ($_SERVER['SERVER_ADDR'] == '127.0.0.1') &&
133             ($_SERVER['REMOTE_ADDR'] == '127.0.0.1') 
134         ) {
135             $this->isDev = true;
136         }
137         
138         if (
139             !empty($_REQUEST['isDev'])
140             &&
141             (
142                 (
143                     !empty($_SERVER['SERVER_ADDR']) &&
144                     (
145                         (($_SERVER['SERVER_ADDR'] == '127.0.0.1') && ($_SERVER['REMOTE_ADDR'] == '127.0.0.1'))
146                         ||
147                         (($_SERVER['SERVER_ADDR'] == '::1') && ($_SERVER['REMOTE_ADDR'] == '::1'))
148                         ||
149                         (preg_match('/^192\.168/', $_SERVER['SERVER_ADDR']) && $_SERVER['SERVER_ADDR'] == $_SERVER['HTTP_HOST'])
150                     )
151                 )
152                 ||
153                 !empty($boot->Pman['enable_isdev_url'])
154             )
155             
156         ) {
157             $boot->Pman['isDev'] = true;
158             $this->isDev = true;
159         }
160         
161         // if a file Pman_{module}_Pman exists.. and it has an init function... - call that..
162         
163         //var_dump($this->appModules);
164         
165         
166         
167     }
168     /*
169      * call a method on {module}/Pman.php
170      * * initially used on the main page load to call init();
171      * * also used for ccsIncludes?? 
172      *
173      * // usage: $this->callModules('init', $base)
174      * 
175      */
176      
177     function callModules($fn) 
178     {
179         $args = func_get_args();
180         array_shift($args);
181         foreach(explode(',',$this->appModules) as $m) {
182             $cls = 'Pman_'. $m . '_Pman';
183             if (!file_exists($this->rootDir . '/'.str_replace('_','/', $cls). '.php')) {
184                 continue;
185             }
186             require_once str_replace('_','/', $cls). '.php';
187             $c = new $cls();
188             if (method_exists($c, $fn)) {
189                 call_user_func_array(array($c,$fn),$args);
190             }
191         }
192          
193      }
194     
195     function get($base, $opts=array()) 
196     {
197         $this->init();
198         if (empty($base)) {
199             $this->callModules('init', $this, $base);
200         }
201         
202             //$this->allowSignup= empty($opts['allowSignup']) ? 0 : 1;
203         $bits = explode('/', $base);
204       
205         
206         // should really be moved to Login...
207         /*
208         if ($bits[0] == 'PasswordReset') {
209             $this->linkFail = $this->resetPassword(@$bits[1],@$bits[2],@$bits[3]);
210             header('Content-type: text/html; charset=utf-8');
211             return;
212         }
213         */
214          
215         $au = $this->getAuthUser();
216         if ($au) {
217             $ff= HTML_FlexyFramework::get();
218            
219             if (!empty($ff->Pman['auth_comptype']) && $au->id > 0 &&
220                 ( !$au->company_id || ($ff->Pman['auth_comptype'] != $au->company()->comptype))) {
221          
222                 $au->logout();
223                 
224                 $this->jerr("Login not permited to outside companies - please reload");
225             }
226             $this->addEvent("RELOAD");
227         }
228         
229         
230         if (strlen($base) && $bits[0] != 'PasswordReset') {
231             $this->jerror("NOTICE-BADURL","invalid url: $base");
232         }
233         // deliver template
234         if (isset($_GET['onloadTrack'])) {
235             $this->onloadTrack = (int)$_GET['onloadTrack'];
236         }
237         // getting this to work with xhtml is a nightmare
238         // = nbsp / <img> issues screw everyting up.
239          //var_dump($this->isDev);
240         // force regeneration on load for development enviroments..
241         
242         HTML_FlexyFramework::get()->generateDataobjectsCache($this->isDev && !empty($_REQUEST['isDev']));
243         
244         //header('Content-type: application/xhtml+xml; charset=utf-8');
245         
246         
247         
248         if ($this->company && $this->company->logo_id) {
249             $im = DB_DataObject::Factory('Images');
250             $im->get($this->company->logo_id);
251             $this->appLogo = $this->baseURL . '/Images/Thumb/x100/'. $this->company->logo_id .'/' . $im->filename;
252         }
253         
254         header('Content-type: text/html; charset=utf-8');
255          
256     }
257     function post($base) {
258         return $this->get($base);
259     }
260     
261     
262     // --------------- AUTHENTICATION or  system information
263     /**
264      * loadOwnerCompany:
265      * finds the compay with comptype=='OWNER'
266      * ?? what about comptype_id-name ?????
267      *
268      * @return {Pman_Core_DataObjects_Companies} the owner company
269      */
270     function loadOwnerCompany()
271     {
272         // only applies if authtable is person..
273         $ff = HTML_FlexyFramework::get();
274         if (!empty($ff->Pman['authTable']) && !in_array($ff->Pman['authTable'] , [ 'core_person', 'Person' ])) {
275             return false;
276         }
277         
278         $this->company = DB_DataObject::Factory('core_company');
279         if (!is_a($this->company, 'DB_DataObject')) { // non-core pman projects
280             return false; 
281         }
282         $e = DB_DataObject::Factory('core_enum')->lookupObject('COMPTYPE', 'OWNER');
283
284         $this->company->get('comptype_id', $e->id);
285         return $this->company;
286     }
287     
288     
289     static function staticGetAuthUser($t) {
290         if (!empty($t->authUser)) {
291             return $t->authUser;
292         }
293         $ff = HTML_FlexyFramework::get();
294         $tbl = empty($ff->Pman['authTable']) ? 'core_person' : $ff->Pman['authTable'];
295         
296         $u = DB_DataObject::factory( $tbl );
297         
298         if (is_a($u,'PEAR_Error') || !$u->isAuth()) {
299             return false;
300         }
301         $t->authUser =$u->getAuthUser();
302         return $t->authUser ;
303         
304     }
305     
306     /**
307      * getAuthUser: - get the authenticated user..
308      *
309      * @return {DB_DataObject} of type Pman[authTable] if authenticated.
310      */
311     
312     function getAuthUser()
313     {
314         return self::staticGetAuthUser($this);
315     }
316     /**
317      * hasPerm:
318      * wrapper arround authuser->hasPerm
319      * @see Pman_Core_DataObject_Core_person::hasPerm
320      *
321      * @param {String} $name  The permission name (eg. Projects.List)
322      * @param {String} $lvl   eg. (C)reate (E)dit (D)elete ... etc.
323      * 
324      */
325     function hasPerm($name, $lvl)  // do we have a permission
326     {
327         static $pcache = array();
328         $au = $this->getAuthUser();
329         return $au && $au->hasPerm($name,$lvl);
330         
331     }   
332     /**
333      * modulesList:  List the modules in the application
334      *
335      * @return {Array} list of modules
336      */
337     function modulesList()
338     {
339         $boot = HTML_FlexyFramework::get();
340         // echo'<PRE>';print_R($boot);exit;
341          
342          
343         $mods = explode(',', $boot->enable);
344         if (in_array('Core',$mods)) { // core has to be the first  modules loaded as it contains Pman.js
345             array_unshift($mods,   'Core');
346         }
347         
348         if (in_array($boot->appNameShort,$mods)) { // Project has to be the last  modules loaded as it contains Pman.js
349             unset($mods[array_search($boot->appNameShort, $mods)]);
350             $mods[] = $boot->appNameShort;
351         }
352         
353         $mods = array_unique($mods);
354          
355         $disabled =  explode(',', $boot->disable ? $boot->disable : '');
356         $ret = array();
357         foreach($mods as $mod) {
358             // add the css file..
359             if (in_array($mod, $disabled)) {
360                 continue;
361             }
362             $ret[] = $mod;
363         }
364         return $ret;
365     }
366     
367      
368     
369     
370     function hasModule($name) 
371     {
372         $this->init();
373         if (!strpos( $name,'.') ) {
374             // use enable / disable..
375             return in_array($name, $this->modules()); 
376         }
377         
378         $x = DB_DataObject::factory('core_group_right');
379         $ar = $x->defaultPermData();
380         if (empty($ar[$name]) || empty($ar[$name][0])) {
381             return false;
382         }
383         return true;
384     }
385     
386      
387     
388     function jsencode($v, $header = false)
389     {
390         if ($header) {
391             header("Content-type: text/javascript");
392         }
393         if (function_exists("json_encode")) {
394             $ret=  json_encode($v);
395             if ($ret !== false) {
396                 return $ret;
397             }
398         }
399         require_once 'Services/JSON.php';
400         $js = new Services_JSON();
401         return $js->encodeUnsafe($v);
402         
403         
404         
405     }
406
407      
408         
409     /**
410      * ---------------- Global Tools ---------------   
411      */
412     function checkFileUploadError()  // check for file upload errors.
413     {    
414         if (
415             empty($_FILES['File']) 
416             || empty($_FILES['File']['name']) 
417             || empty($_FILES['File']['tmp_name']) 
418             || empty($_FILES['File']['type']) 
419             || !empty($_FILES['File']['error']) 
420             || empty($_FILES['File']['size']) 
421         ) {
422             $this->jerr("File upload error: <PRE>" . print_r($_FILES,true) . print_r($_POST,true) . "</PRE>");
423         }
424     }
425     
426     static $deleteOnExit = false;
427     /**
428      * generate a tempory file with an extension (dont forget to delete it)
429      */
430     
431     function deleteOnExitAdd($name)
432     {
433         if (self::$deleteOnExit === false) {
434             register_shutdown_function(array('Pman','deleteOnExit'));
435             self::$deleteOnExit  = array();
436         }
437         self::$deleteOnExit[] = $name;
438     }
439     
440     function tempName($ext, $deleteOnExit=false)
441     {
442         
443         $x = tempnam(ini_get('session.save_path'), HTML_FlexyFramework::get()->appNameShort.'TMP');
444         unlink($x);
445         $ret = $x .'.'. $ext;
446         if ($deleteOnExit) {
447             $this->deleteOnExitAdd($ret);
448         }
449         return $ret;
450     
451     }
452    
453      static function deleteOnExit()
454     {
455         
456         foreach(self::$deleteOnExit as $fn) {
457             if (file_exists($fn)) {
458                 unlink($fn);
459             }
460         }
461     }
462     
463     /**
464      * ------------- Authentication password reset ------ ??? MOVEME?
465      * 
466      * 
467      */
468     
469     
470     
471    
472    
473     
474    
475     
476     /**
477      * ---------------- OUTPUT
478      */
479     function hasBg($fn) // used on front page to check if logos exist..
480     {
481         return file_exists($this->rootDir.'/Pman/'.$this->appNameShort.'/templates/images/'.  $fn);
482     }
483      /**
484      * outputJavascriptIncludes:
485      *
486      * output <script....> for all the modules in the applcaiton
487      *
488      */
489     function outputJavascriptIncludes()  
490     {
491         // BC support - currently 1 project still relies on this.. (MO portal)
492         $ff = HTML_FlexyFramework::get();
493         $o = isset($ff->Pman_Core)  ? $ff->Pman_Core : array();
494         if (isset($o['packseed'])) {
495             return $this->outputJavascriptIncludesBC();
496         }
497         
498         
499         $mods = $this->modulesList();
500         
501        
502         $is_bootstrap = in_array('BAdmin', $mods);
503         
504         foreach($mods as $mod) {
505             // add the css file..
506             
507             if ($is_bootstrap) {
508                 if (!file_exists($this->rootDir."/Pman/$mod/is_bootstrap")) {
509                     echo '<!-- missing '. $this->rootDir."/Pman/$mod/is_bootstrap  - skipping -->";
510                     continue;
511                 }
512                 
513             }
514         
515             $this->outputJavascriptDir("Pman/$mod/widgets", "*.js");
516             $this->outputJavascriptDir("Pman/$mod", "*.js");
517             
518         }
519         
520         if (empty($this->disable_jstemplate)) {
521         // and finally the JsTemplate...
522             echo '<script type="text/javascript" src="'. $this->baseURL. '/Core/JsTemplate"></script>'."\n";
523         }
524         
525         $this->callModules('outputJavascriptIncludes', $this);
526         return '';
527     }
528     var $css_includes = array();
529      /**
530      * outputCSSIncludes:
531      *
532      * output <link rel=stylesheet......> for all the modules in the applcaiton
533      *
534      *
535      * This could css minify as well.
536      */
537     function outputCSSIncludes() // includes on CSS links.
538     {
539        
540         
541         $mods = $this->modulesList();
542         $is_bootstrap = in_array('BAdmin', $mods);
543
544         $this->callModules('applyCSSIncludes', $this);
545         foreach($this->css_includes as $module => $ar) {
546             
547             if ($ar) {
548                 $this->assetArrayToHtml( $ar , 'css');
549             }
550         }
551         
552         // old style... - probably remove this...
553         $this->callModules('outputCSSIncludes', $this);
554         
555         foreach($mods as $mod) {
556             // add the css file..
557             if ($is_bootstrap  && !file_exists($this->rootDir."/Pman/$mod/is_bootstrap")) {
558                 echo '<!-- missing '. $this->rootDir."/Pman/$mod/is_bootstrap  - skipping -->";
559                 continue;
560             }
561             $this->outputCSSDir("Pman/$mod","*.css");
562            
563             $this->outputSCSS($mod);
564             
565             
566         }
567         return ''; // needs to return something as we output it..
568         
569     }
570     
571     
572     
573     
574     
575     
576     
577     
578      
579     
580     // --- OLD CODE - in for BC on MO project.... - needs removing...
581     
582     // used on old versions.....
583     function outputJavascriptIncludesBC()  
584     {
585         
586         $mods = $this->modulesList();
587         
588         foreach($mods as $mod) {
589             // add the css file..
590         
591              
592             $files = $this->moduleJavascriptList($mod.'/widgets');
593             foreach($files as $f) {
594                 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
595             }
596             
597             $files = $this->moduleJavascriptList($mod);
598             foreach($files as $f) {
599                 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
600             }
601             
602         }
603         if (empty($this->disable_jstemplate)) {
604         // and finally the JsTemplate...
605             echo '<script type="text/javascript" src="'. $this->baseURL. '/Core/JsTemplate"></script>'."\n";
606         }
607         return '';
608     }
609     /**
610      * Gather infor for javascript files..
611      *
612      * @param {String} $mod the module to get info about.
613      * @return {StdClass}  details about module.
614      */
615     function moduleJavascriptFilesInfo($mod)
616     {
617         
618         static $cache = array();
619         
620         if (isset($cache[$mod])) {
621             return $cache[$mod];
622         }
623         
624         
625         $ff = HTML_FlexyFramework::get();
626         
627         $base = dirname($_SERVER['SCRIPT_FILENAME']);
628         $dir =   $this->rootDir.'/Pman/'. $mod;
629         $path = $this->rootURL ."/Pman/$mod/";
630         
631         $ar = glob($dir . '/*.js');
632         
633         $files = array();
634         $arfiles = array();
635         $maxtime = 0;
636         $mtime = 0;
637         foreach($ar as $fn) {
638             $f = basename($fn);
639             // got the 'module file..'
640             $mtime = filemtime($dir . '/'. $f);
641             $maxtime = max($mtime, $maxtime);
642             $arfiles[$fn] = $mtime;
643             $files[] = $path . $f . '?ts='.$mtime;
644         }
645         
646         ksort($arfiles); // just sort by name so it's consistant for serialize..
647         
648         // The original idea of this was to serve the files direct from a publicly available 'cache' directory.
649         // but that doesnt really make sense - as we can just serve it from the session directory where we stick
650         // cached data anyway.
651         
652         /*
653         $compile  = empty($ff->Pman['public_cache_dir']) ? 0 : 1;
654         $basedir = $compile ? $ff->Pman['public_cache_dir'] : false;
655         $baseurl = $compile ? $ff->Pman['public_cache_url'] : false;
656         */
657        
658         $compile = 1;
659         $basedir = session_save_path().   '/translate-cache/';
660         if (!file_exists($basedir)) {
661             mkdir($basedir,0755);
662         }
663         $baseurl = $this->baseURL .  '/Admin/Translations';
664         
665         if (PHP_VERSION_ID < 70000 ) {
666             $lsort = create_function('$a,$b','return strlen($a) > strlen($b) ? 1 : -1;');
667             usort($files, $lsort);
668         } else {
669             usort($files, function($a,$b) { return strlen($a) > strlen($b) ? 1 : -1; });
670         }
671         
672         $smod = str_replace('/','.',$mod);
673         
674         $output = date('Y-m-d-H-i-s-', $maxtime). $smod .'-'.md5(serialize($arfiles)) .'.js';
675         
676         
677         // why are translations done like this - we just build them on the fly frmo the database..
678         $tmtime = file_exists($this->rootDir.'/_translations_/'. $smod.'.js')
679             ? filemtime($this->rootDir.'/_translations_/'. $smod.'.js') : 0;
680         
681         $cache[$mod]  = (object) array(
682             'smod' =>               $smod, // module name without '/'
683             'files' =>              $files, // list of all files.
684             'filesmtime' =>         $arfiles,  // map of mtime=>file
685             'maxtime' =>            $maxtime, // max mtime
686             'compile' =>            $this->isDev ? false : $compile,
687             'translation_file' =>   $base .'/_translations_/' . $smod .  '.js',
688             'translation_mtime' =>  $tmtime,
689             'output' =>             $output,
690             'translation_data' =>   preg_replace('/\.js$/', '.__translation__.js', $output),
691             'translation_base' =>   $dir .'/', //prefix of filename (without moudle name))
692             'basedir' =>            $basedir,   
693             'baseurl' =>            $baseurl,
694             'module_dir' =>         $dir,  
695         );
696         return $cache[$mod];
697     }
698      
699     
700     /**
701      *  moduleJavascriptList: list the javascript files in a module
702      *
703      *  The original version of this.. still needs more thought...
704      *
705      *  Compiled is in Pman/_compiled_/{$mod}/{LATEST...}.js
706      *  Translations are in Pman/_translations_/{$mod}.js
707      *  
708      *  if that stuff does not exist just list files in  Pman/{$mod}/*.js
709      *
710      *  Compiled could be done on the fly..
711      * 
712      *
713      *
714      *  @param {String} $mod  the module to look at - eg. Pman/{$mod}/*.js
715      *  @return {Array} list of include paths (either compiled or raw)
716      *
717      */
718
719     
720     
721     function moduleJavascriptList($mod)
722     {
723         
724         
725         $dir =   $this->rootDir.'/Pman/'. $mod;
726         
727         
728         if (!file_exists($dir)) {
729             echo '<!-- missing directory '. htmlspecialchars($dir) .' -->';
730             return array();
731         }
732         
733         $info = $this->moduleJavascriptFilesInfo($mod);
734        
735         
736           
737         if (empty($info->files)) {
738             return array();
739         }
740         // finally sort the files, so they are in the right order..
741         
742         // only compile this stuff if public_cache is set..
743         
744          
745         // suggestions...
746         //  public_cache_dir =   /var/www/myproject_cache
747         //  public_cache_url =   /myproject_cache    (with Alias apache /myproject_cache/ /var/www/myproject_cache/)
748         
749         // bit of debugging
750         if (!$info->compile) {
751             echo "<!-- Javascript compile turned off (isDev on, or public_cache_dir not set) -->\n";
752             return $info->files;
753         }
754         
755         // where are we going to write all of this..
756         // This has to be done via a 
757         if (!file_exists($info->basedir.'/'.$info->output) || !filesize($info->basedir.'/'.$info->output)) {
758             require_once 'Pman/Core/JsCompile.php';
759             $x = new Pman_Core_JsCompile();
760             
761             $x->pack($info->filesmtime,$info->basedir.'/'.$info->output, $info->translation_base);
762         } else {
763             echo "<!-- file exists not exist: {$info->basedir}/{$info->output} -->\n";
764         }
765         
766         if (file_exists($info->basedir.'/'.$info->output) &&
767                 filesize($info->basedir.'/'.$info->output)) {
768             
769             $ret =array(
770                 $info->baseurl.'/'. $info->output,
771               
772             );
773             // output all the ava
774             // fixme  - this needs the max datetime for the translation file..
775             $ret[] = $this->baseURL."/Admin/InterfaceTranslations/".$mod.".js"; //?ts=".$info->translation_mtime;
776             
777             //if ($info->translation_mtime) {
778             //    $ret[] = $this->rootURL."/_translations_/". $info->smod.".js?ts=".$info->translation_mtime;
779             //}
780             return $ret;
781         }
782         
783         
784         
785         // give up and output original files...
786         
787          
788         return $info->files;
789
790         
791     }
792     
793     /**
794      * Error handling...
795      *  PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
796      */
797     function initErrorHandling()
798     {
799         if (!class_exists('HTML_FlexyFramework2')) {
800             // what about older code that still users PEAR?
801             PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
802         }
803         set_exception_handler(array($this,'onException'));
804         
805     }
806     
807     
808     static $permitError = false; // static why?
809     
810     var $showErrorToUser = true;
811     
812     function onPearError($err)
813     {
814         return $this->onException($err);
815         
816     }
817     
818     
819     function onException($ex)
820     {
821         static $reported = false;
822         if ($reported) {
823             return;
824         }
825         
826         if (Pman::$permitError) {
827             return;
828         }
829         
830         
831         $reported = true;
832         
833         $out = (is_a($ex,'Exception') || is_a($ex, 'Error') ? $ex->getMessage() : $ex->toString()) .
834             ' ' . (empty($_SERVER['REQUEST_METHOD']) ? 'cli' :  $_SERVER['REQUEST_METHOD'] ) . ' ' .
835             (empty($_SERVER['REQUEST_URI'])      ? 'No URL' : $_SERVER['REQUEST_URI']) .
836               ' ' .    (empty($POST) ? '' : file_get_contents('php://input')) ;
837         
838         
839         //print_R($bt); exit;
840         $ret = array();
841         $n = 0;
842         $bt = is_a($ex,'Exception')|| is_a($ex, 'Error')  ? $ex->getTrace() : $ex->backtrace;
843         if (is_a($ex,'Exception')|| is_a($ex, 'Error') ) {
844             $ret[] = $ex->getFile() . '('. $ex->getLine() . ')';
845         }
846         foreach( $bt as $b) {
847             $ret[] = @$b['file'] . '(' . @$b['line'] . ')@' .   @$b['class'] . '::' . @$b['function'];
848             if ($n > 20) {
849                 break;
850             }
851             $n++;
852         }
853         //convert the huge backtrace into something that is readable..
854         $out .= "\n" . implode("\n",  $ret);
855         
856            
857         $this->addEvent("EXCEPTION", false, $out);
858         
859         if ($this->showErrorToUser) {
860             print_R($out);exit;
861         }
862         // not sure why this is here... - perhaps doing a jerr() was actually caught by the UI, and hidden from the user..?
863         $this->jerror(false,"An error Occured, please contact the website owner");
864         
865         //$this->jerr($out);
866         
867         
868     }
869     
870     
871     /**
872      * ---------------- Logging ---------------   
873      */
874     
875     /**
876      * addEventOnce:
877      * Log an action (only if it has not been logged already.
878      * 
879      * @param {String} action  - group/name of event
880      * @param {DataObject|false} obj - dataobject action occured on.
881      * @param {String} any remarks
882      * @return {false|DB_DataObject} Event object.,
883      */
884     
885     function addEventOnce($act, $obj = false, $remarks = '') 
886     {
887         if (!empty(HTML_FlexyFramework::get()->Pman['disable_events'])) {
888             return;
889         }
890         $e = DB_DataObject::factory('Events');
891         $e->init($act,$obj,$remarks); 
892         if ($e->find(true)) {
893             return false;
894         }
895         return $this->addEvent($act, $obj, $remarks);
896     }
897     /**
898      * addEvent:
899      * Log an action.
900      * 
901      * @param {String} action  - group/name of event
902      * @param {DataObject|false} obj - dataobject action occured on.
903      * @param {String} any remarks
904      * @return {DB_DataObject} Event object.,
905      */
906     
907     function addEvent($act, $obj = false, $remarks = '') 
908     {
909         
910         $ff = HTML_FlexyFramework::get();
911         
912       
913         if (!empty($ff->Pman['disable_events'])
914          || !empty($ff->database_is_readonly)
915          || substr($act, 0, 7) === 'NOTICE-'
916         ) {
917             if (!preg_match('/^(ERROR|EXCEPTION)/', $act)) {
918                return false;
919             }
920             $str = $obj !== false ? "{$obj->tableName()}:{$obj->id} " : '';
921             $de = ini_set('display_errors', 0);
922             trigger_error("{$act} {$str} {$remarks}" , E_USER_NOTICE);
923             ini_set('display_errors', $de );
924             return false;
925         }
926         
927         $au = $this->getAuthUser();
928        
929         $e = DB_DataObject::factory('Events');
930         $e->init($act,$obj,$remarks); 
931          
932         $e->event_when = $e->sqlValue('NOW()');
933         
934         $eid = $e->insert();
935         
936         // fixme - this should be in onInsert..
937         $wa = DB_DataObject::factory('core_watch');
938         if (method_exists($wa,'notifyEvent')) {
939             $wa->notifyEvent($e); // trigger any actions..
940         }
941         
942         
943         $e->onInsert(isset($_REQUEST) ? $_REQUEST : array() , $this);
944         if (!preg_match('/^(ERROR|EXCEPTION)/', $act)) {
945             return $e;
946         }
947         $str = $obj !== false ? "{$obj->tableName()}:{$obj->id} " : '';
948         $de = ini_set('display_errors', 0);
949         trigger_error("{$act} [event_id={$e->id}] {$str} {$remarks}" , E_USER_NOTICE);
950         ini_set('display_errors', $de );
951         
952         return $e;
953         
954     }
955     
956     function addEventNotifyOnly($act, $obj = false, $remarks = '')
957     {
958          $au = $this->getAuthUser();
959        
960         $e = DB_DataObject::factory('Events');
961         $e->init($act,$obj,$remarks); 
962          
963         $e->event_when = $e->sqlValue('NOW()');
964         $wa = DB_DataObject::factory('core_watch');
965         if (method_exists($wa,'notifyEvent')) {
966             $wa->notifyEvent($e); // trigger any actions..
967         }
968     }
969     
970     
971     // ------------------ DEPERCIATED ----------------------------
972      
973     // DEPRECITAED - use moduleslist
974     function modules()  { return $this->modulesList();  }
975     
976    
977     // DEPRICATED  USE Pman_Core_Mailer
978     
979     function emailTemplate($templateFile, $args)
980     {
981     
982         require_once 'Pman/Core/Mailer.php';
983         $r = new Pman_Core_Mailer(array(
984             'template'=>$templateFile,
985             'contents' => $args,
986             'page' => $this
987         ));
988         return $r->toData();
989          
990     }
991     // DEPRICATED - USE Pman_Core_Mailer 
992     // WHAT Part about DEPRICATED Does no one understand??
993     function sendTemplate($templateFile, $args)
994     {
995         require_once 'Pman/Core/Mailer.php';
996         $r = new Pman_Core_Mailer(array(
997             'template'=>$templateFile,
998             'contents' => array(),
999             'page' => $this
1000         ));
1001         return $r->send();
1002         
1003     
1004     }
1005 }