fixed locked
[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         
389     /**
390      * ---------------- Global Tools ---------------   
391      */
392     function checkFileUploadError()  // check for file upload errors.
393     {    
394         if (
395             empty($_FILES['File']) 
396             || empty($_FILES['File']['name']) 
397             || empty($_FILES['File']['tmp_name']) 
398             || empty($_FILES['File']['type']) 
399             || !empty($_FILES['File']['error']) 
400             || empty($_FILES['File']['size']) 
401         ) {
402             $this->jerr("File upload error: <PRE>" . print_r($_FILES,true) . print_r($_POST,true) . "</PRE>");
403         }
404     }
405     
406     static $deleteOnExit = false;
407     /**
408      * generate a tempory file with an extension (dont forget to delete it)
409      */
410     
411     function deleteOnExitAdd($name)
412     {
413         if (self::$deleteOnExit === false) {
414             register_shutdown_function(array('Pman','deleteOnExit'));
415             self::$deleteOnExit  = array();
416         }
417         self::$deleteOnExit[] = $name;
418     }
419     
420     function tempName($ext, $deleteOnExit=false)
421     {
422         
423         $x = tempnam(ini_get('session.save_path'), HTML_FlexyFramework::get()->appNameShort.'TMP');
424         unlink($x);
425         $ret = $x .'.'. $ext;
426         if ($deleteOnExit) {
427             $this->deleteOnExitAdd($ret);
428         }
429         return $ret;
430     
431     }
432    
433      static function deleteOnExit()
434     {
435         
436         foreach(self::$deleteOnExit as $fn) {
437             if (file_exists($fn)) {
438                 unlink($fn);
439             }
440         }
441     }
442     
443     /**
444      * ------------- Authentication password reset ------ ??? MOVEME?
445      * 
446      * 
447      */
448     
449     
450     
451    
452    
453     
454    
455     
456     /**
457      * ---------------- OUTPUT
458      */
459     function hasBg($fn) // used on front page to check if logos exist..
460     {
461         return file_exists($this->rootDir.'/Pman/'.$this->appNameShort.'/templates/images/'.  $fn);
462     }
463      /**
464      * outputJavascriptIncludes:
465      *
466      * output <script....> for all the modules in the applcaiton
467      *
468      */
469     function outputJavascriptIncludes()  
470     {
471         // BC support - currently 1 project still relies on this.. (MO portal)
472         $ff = HTML_FlexyFramework::get();
473         $o = isset($ff->Pman_Core)  ? $ff->Pman_Core : array();
474         if (isset($o['packseed'])) {
475             return $this->outputJavascriptIncludesBC();
476         }
477         
478         
479         $mods = $this->modulesList();
480         
481        
482         $is_bootstrap = in_array('BAdmin', $mods);
483         
484         foreach($mods as $mod) {
485             // add the css file..
486             
487             if ($is_bootstrap) {
488                 if (!file_exists($this->rootDir."/Pman/$mod/is_bootstrap")) {
489                     echo '<!-- missing '. $this->rootDir."/Pman/$mod/is_bootstrap  - skipping -->";
490                     continue;
491                 }
492                 
493             }
494         
495             $this->outputJavascriptDir("Pman/$mod/widgets", "*.js");
496             $this->outputJavascriptDir("Pman/$mod", "*.js");
497             
498         }
499         
500         if (empty($this->disable_jstemplate)) {
501         // and finally the JsTemplate...
502             echo '<script type="text/javascript" src="'. $this->baseURL. '/Core/JsTemplate"></script>'."\n";
503         }
504         
505         $this->callModules('outputJavascriptIncludes', $this);
506         return '';
507     }
508     var $css_includes = array();
509      /**
510      * outputCSSIncludes:
511      *
512      * output <link rel=stylesheet......> for all the modules in the applcaiton
513      *
514      *
515      * This could css minify as well.
516      */
517     function outputCSSIncludes() // includes on CSS links.
518     {
519        
520         
521         $mods = $this->modulesList();
522         $is_bootstrap = in_array('BAdmin', $mods);
523
524         $this->callModules('applyCSSIncludes', $this);
525         foreach($this->css_includes as $module => $ar) {
526             
527             if ($ar) {
528                 $this->assetArrayToHtml( $ar , 'css');
529             }
530         }
531         
532         // old style... - probably remove this...
533         $this->callModules('outputCSSIncludes', $this);
534         
535         foreach($mods as $mod) {
536             // add the css file..
537             if ($is_bootstrap  && !file_exists($this->rootDir."/Pman/$mod/is_bootstrap")) {
538                 echo '<!-- missing '. $this->rootDir."/Pman/$mod/is_bootstrap  - skipping -->";
539                 continue;
540             }
541             $this->outputCSSDir("Pman/$mod","*.css");
542            
543             $this->outputSCSS($mod);
544             
545             
546         }
547         return ''; // needs to return something as we output it..
548         
549     }
550     
551     /**
552      * while doing batch processes, the database sometimes get's locked up.
553      * if we are doing another batch process that can be avoided - we should just stop for a while..
554      */
555     
556      function database_is_locked()
557     {
558         $cd = DB_DataObject::Factory('core_enum');
559         $cd->query("show processlist");
560          $locked = 0;
561         while ($cd->fetch()) {
562             if ($cd->State == 'Waiting for table metadata lock') {
563                 $locked++;
564             }
565             if ($locked>  10) {
566                 return true;
567             }
568         }
569         return false;
570     }
571     
572     
573     
574     
575      
576     
577     // --- OLD CODE - in for BC on MO project.... - needs removing...
578     
579     // used on old versions.....
580     function outputJavascriptIncludesBC()  
581     {
582         
583         $mods = $this->modulesList();
584         
585         foreach($mods as $mod) {
586             // add the css file..
587         
588              
589             $files = $this->moduleJavascriptList($mod.'/widgets');
590             foreach($files as $f) {
591                 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
592             }
593             
594             $files = $this->moduleJavascriptList($mod);
595             foreach($files as $f) {
596                 echo '<script type="text/javascript" src="'. $f. '"></script>'."\n";
597             }
598             
599         }
600         if (empty($this->disable_jstemplate)) {
601         // and finally the JsTemplate...
602             echo '<script type="text/javascript" src="'. $this->baseURL. '/Core/JsTemplate"></script>'."\n";
603         }
604         return '';
605     }
606     /**
607      * Gather infor for javascript files..
608      *
609      * @param {String} $mod the module to get info about.
610      * @return {StdClass}  details about module.
611      */
612     function moduleJavascriptFilesInfo($mod)
613     {
614         
615         static $cache = array();
616         
617         if (isset($cache[$mod])) {
618             return $cache[$mod];
619         }
620         
621         
622         $ff = HTML_FlexyFramework::get();
623         
624         $base = dirname($_SERVER['SCRIPT_FILENAME']);
625         $dir =   $this->rootDir.'/Pman/'. $mod;
626         $path = $this->rootURL ."/Pman/$mod/";
627         
628         $ar = glob($dir . '/*.js');
629         
630         $files = array();
631         $arfiles = array();
632         $maxtime = 0;
633         $mtime = 0;
634         foreach($ar as $fn) {
635             $f = basename($fn);
636             // got the 'module file..'
637             $mtime = filemtime($dir . '/'. $f);
638             $maxtime = max($mtime, $maxtime);
639             $arfiles[$fn] = $mtime;
640             $files[] = $path . $f . '?ts='.$mtime;
641         }
642         
643         ksort($arfiles); // just sort by name so it's consistant for serialize..
644         
645         // The original idea of this was to serve the files direct from a publicly available 'cache' directory.
646         // but that doesnt really make sense - as we can just serve it from the session directory where we stick
647         // cached data anyway.
648         
649         /*
650         $compile  = empty($ff->Pman['public_cache_dir']) ? 0 : 1;
651         $basedir = $compile ? $ff->Pman['public_cache_dir'] : false;
652         $baseurl = $compile ? $ff->Pman['public_cache_url'] : false;
653         */
654        
655         $compile = 1;
656         $basedir = session_save_path().   '/translate-cache/';
657         if (!file_exists($basedir)) {
658             mkdir($basedir,0755);
659         }
660         $baseurl = $this->baseURL .  '/Admin/Translations';
661         
662         if (PHP_VERSION_ID < 70000 ) {
663             $lsort = create_function('$a,$b','return strlen($a) > strlen($b) ? 1 : -1;');
664             usort($files, $lsort);
665         } else {
666             usort($files, function($a,$b) { return strlen($a) > strlen($b) ? 1 : -1; });
667         }
668         
669         $smod = str_replace('/','.',$mod);
670         
671         $output = date('Y-m-d-H-i-s-', $maxtime). $smod .'-'.md5(serialize($arfiles)) .'.js';
672         
673         
674         // why are translations done like this - we just build them on the fly frmo the database..
675         $tmtime = file_exists($this->rootDir.'/_translations_/'. $smod.'.js')
676             ? filemtime($this->rootDir.'/_translations_/'. $smod.'.js') : 0;
677         
678         $cache[$mod]  = (object) array(
679             'smod' =>               $smod, // module name without '/'
680             'files' =>              $files, // list of all files.
681             'filesmtime' =>         $arfiles,  // map of mtime=>file
682             'maxtime' =>            $maxtime, // max mtime
683             'compile' =>            $this->isDev ? false : $compile,
684             'translation_file' =>   $base .'/_translations_/' . $smod .  '.js',
685             'translation_mtime' =>  $tmtime,
686             'output' =>             $output,
687             'translation_data' =>   preg_replace('/\.js$/', '.__translation__.js', $output),
688             'translation_base' =>   $dir .'/', //prefix of filename (without moudle name))
689             'basedir' =>            $basedir,   
690             'baseurl' =>            $baseurl,
691             'module_dir' =>         $dir,  
692         );
693         return $cache[$mod];
694     }
695      
696     
697     /**
698      *  moduleJavascriptList: list the javascript files in a module
699      *
700      *  The original version of this.. still needs more thought...
701      *
702      *  Compiled is in Pman/_compiled_/{$mod}/{LATEST...}.js
703      *  Translations are in Pman/_translations_/{$mod}.js
704      *  
705      *  if that stuff does not exist just list files in  Pman/{$mod}/*.js
706      *
707      *  Compiled could be done on the fly..
708      * 
709      *
710      *
711      *  @param {String} $mod  the module to look at - eg. Pman/{$mod}/*.js
712      *  @return {Array} list of include paths (either compiled or raw)
713      *
714      */
715
716     
717     
718     function moduleJavascriptList($mod)
719     {
720         
721         
722         $dir =   $this->rootDir.'/Pman/'. $mod;
723         
724         
725         if (!file_exists($dir)) {
726             echo '<!-- missing directory '. htmlspecialchars($dir) .' -->';
727             return array();
728         }
729         
730         $info = $this->moduleJavascriptFilesInfo($mod);
731        
732         
733           
734         if (empty($info->files)) {
735             return array();
736         }
737         // finally sort the files, so they are in the right order..
738         
739         // only compile this stuff if public_cache is set..
740         
741          
742         // suggestions...
743         //  public_cache_dir =   /var/www/myproject_cache
744         //  public_cache_url =   /myproject_cache    (with Alias apache /myproject_cache/ /var/www/myproject_cache/)
745         
746         // bit of debugging
747         if (!$info->compile) {
748             echo "<!-- Javascript compile turned off (isDev on, or public_cache_dir not set) -->\n";
749             return $info->files;
750         }
751         
752         // where are we going to write all of this..
753         // This has to be done via a 
754         if (!file_exists($info->basedir.'/'.$info->output) || !filesize($info->basedir.'/'.$info->output)) {
755             require_once 'Pman/Core/JsCompile.php';
756             $x = new Pman_Core_JsCompile();
757             
758             $x->pack($info->filesmtime,$info->basedir.'/'.$info->output, $info->translation_base);
759         } else {
760             echo "<!-- file exists not exist: {$info->basedir}/{$info->output} -->\n";
761         }
762         
763         if (file_exists($info->basedir.'/'.$info->output) &&
764                 filesize($info->basedir.'/'.$info->output)) {
765             
766             $ret =array(
767                 $info->baseurl.'/'. $info->output,
768               
769             );
770             // output all the ava
771             // fixme  - this needs the max datetime for the translation file..
772             $ret[] = $this->baseURL."/Admin/InterfaceTranslations/".$mod.".js"; //?ts=".$info->translation_mtime;
773             
774             //if ($info->translation_mtime) {
775             //    $ret[] = $this->rootURL."/_translations_/". $info->smod.".js?ts=".$info->translation_mtime;
776             //}
777             return $ret;
778         }
779         
780         
781         
782         // give up and output original files...
783         
784          
785         return $info->files;
786
787         
788     }
789     
790     /**
791      * Error handling...
792      *  PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
793      */
794     function initErrorHandling()
795     {
796         if (!class_exists('HTML_FlexyFramework2')) {
797             // what about older code that still users PEAR?
798             PEAR::setErrorHandling(PEAR_ERROR_CALLBACK, array($this, 'onPearError'));
799         }
800         set_exception_handler(array($this,'onException'));
801         
802     }
803     
804     
805     static $permitError = false; // static why?
806     
807     var $showErrorToUser = true;
808     
809     function onPearError($err)
810     {
811         return $this->onException($err);
812         
813     }
814     
815     
816     function onException($ex)
817     {
818         static $reported = false;
819         if ($reported) {
820             return;
821         }
822         
823         if (Pman::$permitError) {
824             return;
825         }
826         
827         
828         $reported = true;
829         
830         $out = (is_a($ex,'Exception') || is_a($ex, 'Error') ? $ex->getMessage() : $ex->toString()) .
831             ' ' . (empty($_SERVER['REQUEST_METHOD']) ? 'cli' :  $_SERVER['REQUEST_METHOD'] ) . ' ' .
832             (empty($_SERVER['REQUEST_URI'])      ? 'No URL' : $_SERVER['REQUEST_URI']) .
833               ' ' .    (empty($POST) ? '' : file_get_contents('php://input')) ;
834         
835         
836         //print_R($bt); exit;
837         $ret = array();
838         $n = 0;
839         $bt = is_a($ex,'Exception')|| is_a($ex, 'Error')  ? $ex->getTrace() : $ex->backtrace;
840         if (is_a($ex,'Exception')|| is_a($ex, 'Error') ) {
841             $ret[] = $ex->getFile() . '('. $ex->getLine() . ')';
842         }
843         foreach( $bt as $b) {
844             $ret[] = @$b['file'] . '(' . @$b['line'] . ')@' .   @$b['class'] . '::' . @$b['function'];
845             if ($n > 20) {
846                 break;
847             }
848             $n++;
849         }
850         //convert the huge backtrace into something that is readable..
851         $out .= "\n" . implode("\n",  $ret);
852         
853            
854         $this->addEvent("EXCEPTION", false, $out);
855         
856         if ($this->showErrorToUser) {
857             print_R($out);exit;
858         }
859         // not sure why this is here... - perhaps doing a jerr() was actually caught by the UI, and hidden from the user..?
860         $this->jerror(false,"An error Occured, please contact the website owner");
861         
862         //$this->jerr($out);
863         
864         
865     }
866     
867     
868     /**
869      * ---------------- Logging ---------------   
870      */
871     
872     /**
873      * addEventOnce:
874      * Log an action (only if it has not been logged already.
875      * 
876      * @param {String} action  - group/name of event
877      * @param {DataObject|false} obj - dataobject action occured on.
878      * @param {String} any remarks
879      * @return {false|DB_DataObject} Event object.,
880      */
881     
882     function addEventOnce($act, $obj = false, $remarks = '') 
883     {
884         if (!empty(HTML_FlexyFramework::get()->Pman['disable_events'])) {
885             return;
886         }
887         $e = DB_DataObject::factory('Events');
888         $e->init($act,$obj,$remarks); 
889         if ($e->find(true)) {
890             return false;
891         }
892         return $this->addEvent($act, $obj, $remarks);
893     }
894     /**
895      * addEvent:
896      * Log an action.
897      * 
898      * @param {String} action  - group/name of event
899      * @param {DataObject|false} obj - dataobject action occured on.
900      * @param {String} any remarks
901      * @return {DB_DataObject} Event object.,
902      */
903     
904     function addEvent($act, $obj = false, $remarks = '') 
905     {
906         
907         $ff = HTML_FlexyFramework::get();
908         
909       
910         if (!empty($ff->Pman['disable_events'])
911          || !empty($ff->database_is_readonly)
912          || substr($act, 0, 7) === 'NOTICE-'
913         ) {
914             if (!preg_match('/^(ERROR|EXCEPTION)/', $act)) {
915                return false;
916             }
917             $str = $obj !== false ? "{$obj->tableName()}:{$obj->id} " : '';
918             $de = ini_set('display_errors', 0);
919             trigger_error("{$act} {$str} {$remarks}" , E_USER_NOTICE);
920             ini_set('display_errors', $de );
921             return false;
922         }
923         
924         $au = $this->getAuthUser();
925        
926         $e = DB_DataObject::factory('Events');
927         $e->init($act,$obj,$remarks); 
928          
929         $e->event_when = $e->sqlValue('NOW()');
930         
931         $eid = $e->insert();
932         
933         // fixme - this should be in onInsert..
934         $wa = DB_DataObject::factory('core_watch');
935         if (method_exists($wa,'notifyEvent')) {
936             $wa->notifyEvent($e); // trigger any actions..
937         }
938         
939         
940         $e->onInsert(isset($_REQUEST) ? $_REQUEST : array() , $this);
941         if (!preg_match('/^(ERROR|EXCEPTION)/', $act)) {
942             return $e;
943         }
944         $str = $obj !== false ? "{$obj->tableName()}:{$obj->id} " : '';
945         $de = ini_set('display_errors', 0);
946         trigger_error("{$act} [event_id={$e->id}] {$str} {$remarks}" , E_USER_NOTICE);
947         ini_set('display_errors', $de );
948         
949         return $e;
950         
951     }
952     
953     function addEventNotifyOnly($act, $obj = false, $remarks = '')
954     {
955          $au = $this->getAuthUser();
956        
957         $e = DB_DataObject::factory('Events');
958         $e->init($act,$obj,$remarks); 
959          
960         $e->event_when = $e->sqlValue('NOW()');
961         $wa = DB_DataObject::factory('core_watch');
962         if (method_exists($wa,'notifyEvent')) {
963             $wa->notifyEvent($e); // trigger any actions..
964         }
965     }
966     
967     
968     // ------------------ DEPERCIATED ----------------------------
969      
970     // DEPRECITAED - use moduleslist
971     function modules()  { return $this->modulesList();  }
972     
973    
974     // DEPRICATED  USE Pman_Core_Mailer
975     
976     function emailTemplate($templateFile, $args)
977     {
978     
979         require_once 'Pman/Core/Mailer.php';
980         $r = new Pman_Core_Mailer(array(
981             'template'=>$templateFile,
982             'contents' => $args,
983             'page' => $this
984         ));
985         return $r->toData();
986          
987     }
988     // DEPRICATED - USE Pman_Core_Mailer 
989     // WHAT Part about DEPRICATED Does no one understand??
990     function sendTemplate($templateFile, $args)
991     {
992         require_once 'Pman/Core/Mailer.php';
993         $r = new Pman_Core_Mailer(array(
994             'template'=>$templateFile,
995             'contents' => array(),
996             'page' => $this
997         ));
998         return $r->send();
999         
1000     
1001     }
1002 }