2 /**********************************************************************
3 Copyright (C) FrontAccounting, LLC.
4 Released under the terms of the GNU General Public License, GPL,
5 as published by the Free Software Foundation, either version 3
6 of the License, or (at your option) any later version.
7 This program is distributed in the hope that it will be useful,
8 but WITHOUT ANY WARRANTY; without even the implied warranty of
9 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
10 See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
11 ***********************************************************************/
13 include_once($path_to_root . "/includes/prefs/userprefs.inc");
14 if (!defined('TB_PREF')) {
15 define('TB_PREF', '&TB_PREF&');
17 //--------------------------------------------------------------------------
26 var $company; // user's company
31 var $role_set = false;
37 var $cur_con; // current db connection (can be different from $company for superuser)
39 function current_user()
43 $this->loginname = $this->username = $this->name = "";
44 $this->company = isset($def_coy)? $def_coy : 0;
45 $this->logged = false;
47 $this->prefs = new user_prefs();
55 function set_company($company)
57 $this->company = (int)$company;
60 function login($company, $loginname, $password)
62 global $security_areas, $security_groups, $security_headings, $path_to_root, $login_delay;
64 $this->set_company($company);
65 $this->logged = false;
67 set_global_connection();
69 // Use external authentication source if any.
70 // Keep in mind you need to have user data set for $loginname
71 // in FA users table anyway to successfully log in.
72 $Auth_Result = hook_authenticate($loginname, $password);
74 if (!isset($Auth_Result)) // if not used: standard method
75 $Auth_Result = get_user_auth($loginname, md5($password));
78 write_login_filelog($loginname, $Auth_Result);
82 $myrow = get_user_by_login($loginname);
83 $this->old_db = isset($myrow["full_access"]);
84 if (! @$myrow["inactive"]) {
87 // db was not yet upgraded after source update to v.2.2
88 // give enough access for admin user to continue upgrade
89 if (!isset($security_groups) || !isset($security_headings)) {
90 echo "<center><br><br><font size='5' color='red'><b>";
91 echo _('Before software upgrade you have to include old $security_groups and $security_headings arrays from old config.php file to the new one.');
92 echo '<br>'."<a href=$path_to_root/index.php>"._("Back")."</a>";
93 echo "</b></font><br><br></center>";
96 $this->access = $myrow["full_access"];
97 if (in_array(20, $security_groups[$this->access]))
98 // temporary access for admin users
99 $this->role_set[] = $security_areas['SA_SOFTWAREUPGRADE'][0];
101 echo "<center><br><br><font size='5' color='red'><b>";
102 echo _('System is available for site admin only until full database upgrade');
103 echo "</b></font><br><br></center>";
107 $this->role_set = array();
108 $this->access = $myrow["role_id"];
109 // store area codes available for current user role
110 $role = get_security_role($this->access);
113 foreach( $role['areas'] as $code )
114 // filter only area codes for enabled security sections
115 if (in_array($code&~0xff, $role['sections']))
116 $this->role_set[] = $code;
118 $this->name = $myrow["real_name"];
119 $this->pos = $myrow["pos"];
120 $this->loginname = $loginname;
121 $this->username = $this->loginname;
122 $this->prefs = new user_prefs($myrow);
123 $this->user = @$myrow["id"];
124 $this->email = @$myrow["email"];
125 update_user_visitdate($this->username);
126 $this->logged = true;
127 $this->last_act = time();
128 $this->timeout = session_timeout();
131 return $this->logged;
134 function reset_password($company, $email) {
137 $this->set_company($company);
138 $this->logged = false;
140 set_global_connection();
142 $myrow = get_user_by_email($email);
144 if ($myrow['id'] != "") {
146 $bytes = openssl_random_pseudo_bytes(8, $cstrong);
147 $password = base64_encode($bytes);
149 $hash = md5($password);
151 update_user_password($myrow['id'], $myrow['user_id'], $hash);
153 mail($myrow['email'], _("New password for")." ".$app_title, $password);
160 function check_user_access()
162 global $security_groups;
164 // notification after upgrade from pre-2.2 version
165 return isset($security_groups) && is_array(@$security_groups[$this->access]);
167 return !isset($security_groups) && is_array($this->role_set);
170 function can_access($page_level)
172 global $security_groups, $security_areas;
173 if (isset($security_groups)) {
174 return $this->company == 0 &&
175 in_array(20, $security_groups[$this->access]);
178 if ($page_level === 'SA_OPEN')
180 if ($page_level === 'SA_DENIED' || $page_level === '')
183 $code = $security_areas[$page_level][0];
185 // only first registered company has site admin privileges
186 return $code && in_array($code, $this->role_set)
187 && ($this->company == 0 || (($code&~0xff) != SS_SADMIN));
190 function can_access_page($page_level)
192 return $this->can_access($page_level);
195 function check_application_access($waapp)
197 if (!$this->hide_inaccessible_menu_items())
202 foreach ($waapp->modules as $module)
204 if ($this->check_module_access($module))
214 function check_module_access($module)
217 if (!$this->hide_inaccessible_menu_items())
222 if (sizeof($module->lappfunctions) > 0)
224 foreach ($module->lappfunctions as $appfunction)
226 if ($appfunction->label != "" && $this->can_access_page($appfunction->access))
233 if (sizeof($module->rappfunctions) > 0)
235 foreach ($module->rappfunctions as $appfunction)
237 if ($appfunction->label != "" && $this->can_access_page($appfunction->access))
248 function hide_inaccessible_menu_items()
250 global $hide_inaccessible_menu_items;
252 if (!isset($hide_inaccessible_menu_items) || $hide_inaccessible_menu_items == 0)
263 function set_db_connection($id = -1)
265 return set_global_connection($id);
268 function update_prefs($prefs)
270 global $allow_demo_mode;
272 if(!$allow_demo_mode) {
273 update_user_prefs($this->user, $prefs);
276 $this->prefs = new user_prefs(get_user($this->user));
280 //--------------------------------------------------------------------------
282 function round2($number, $decimals=0)
284 $delta = ($number < 0 ? -.0000000001 : .0000000001);
285 return round($number+$delta, $decimals);
289 Returns number formatted according to user setup and using $decimals digits after dot
290 (defualt is 0). When $decimals is set to 'max' maximum available precision is used
291 (decimals depend on value) and trailing zeros are trimmed.
293 function number_format2($number, $decimals=0)
295 global $thoseps, $decseps;
296 $tsep = $thoseps[$_SESSION["wa_current_user"]->prefs->tho_sep()];
297 $dsep = $decseps[$_SESSION["wa_current_user"]->prefs->dec_sep()];
298 //return number_format($number, $decimals, $dsep, $tsep);
299 if($decimals==='max')
300 $dec = 15 - floor(log10(abs($number)));
302 $delta = ($number < 0 ? -.0000000001 : .0000000001);
307 $num = number_format($number, $dec, $dsep, $tsep);
309 return $decimals==='max' ? rtrim($num, '0') : $num;
313 /* price/float comparision helper to be used in any suspicious place for zero values?
315 if (!floatcmp($value1, $value2))
319 define('FLOAT_COMP_DELTA', 0.004);
321 function floatcmp($a, $b)
323 return $a - $b > FLOAT_COMP_DELTA ? 1 : ($b - $a > FLOAT_COMP_DELTA ? -1 : 0);
329 function fallback_mode() {
330 return $_SESSION["wa_current_user"]->ui_mode==0;
333 function price_format($number) {
334 return number_format2($number,
335 $_SESSION["wa_current_user"]->prefs->price_dec());
338 function price_decimal_format($number, &$dec)
340 $dec = user_price_dec();
341 $str = strval($number);
342 $pos = strpos($str, '.');
345 $len = strlen(substr($str, $pos + 1));
349 return number_format2($number, $dec);
351 // function money_format doesn't exist in OS Win.
352 if (!function_exists('money_format'))
354 function money_format($format, $number)
356 return price_format($number);
360 // 2008-06-15. Added extra parameter $stock_id and reference for $dec
361 //--------------------------------------------------------------------
362 function qty_format($number, $stock_id=null, &$dec) {
363 $dec = get_qty_dec($stock_id);
364 return number_format2($number, $dec);
368 function get_qty_dec($stock_id=null)
370 global $path_to_root;
371 include_once($path_to_root."/inventory/includes/db/items_units_db.inc");
372 if ($stock_id != null)
373 $dec = get_unit_dec($stock_id);
374 if ($stock_id == null || $dec == -1 || $dec == null)
375 $dec = $_SESSION["wa_current_user"]->prefs->qty_dec();
378 //-------------------------------------------------------------------
380 // Maximum precision format. Strips trailing unsignificant digits.
382 function maxprec_format($number) {
383 return number_format2($number, 'max');
386 function exrate_format($number) {
387 return number_format2($number,
388 $_SESSION["wa_current_user"]->prefs->exrate_dec());
391 function percent_format($number) {
392 return number_format2($number,
393 $_SESSION["wa_current_user"]->prefs->percent_dec());
396 function user_numeric($input) {
397 global $decseps, $thoseps;
400 $sep = $thoseps[user_tho_sep()];
402 $num = str_replace( $sep, '', $num);
404 $sep = $decseps[user_dec_sep()];
406 $num = str_replace( $sep, '.', $num);
408 if (!is_numeric($num))
411 if ($num == (int)$num)
417 function user_company()
421 return isset($_SESSION["wa_current_user"]) ? $_SESSION["wa_current_user"]->company : $def_coy;
426 return $_SESSION["wa_current_user"]->pos;
429 function user_language()
431 return $_SESSION["wa_current_user"]->prefs->language();
434 function user_qty_dec()
436 return $_SESSION["wa_current_user"]->prefs->qty_dec();
439 function user_price_dec()
441 return $_SESSION["wa_current_user"]->prefs->price_dec();
444 function user_exrate_dec()
446 return $_SESSION["wa_current_user"]->prefs->exrate_dec();
449 function user_percent_dec()
451 return $_SESSION["wa_current_user"]->prefs->percent_dec();
454 function user_show_gl_info()
456 return $_SESSION["wa_current_user"]->prefs->show_gl_info();
459 function user_show_codes()
461 return $_SESSION["wa_current_user"]->prefs->show_codes();
464 function user_date_format()
466 return $_SESSION["wa_current_user"]->prefs->date_format();
469 function user_date_display()
471 return $_SESSION["wa_current_user"]->prefs->date_display();
474 function user_date_sep()
476 return $_SESSION["wa_current_user"]->prefs->date_sep();
479 function user_tho_sep()
481 return $_SESSION["wa_current_user"]->prefs->tho_sep();
484 function user_dec_sep()
486 return $_SESSION["wa_current_user"]->prefs->dec_sep();
489 function user_theme()
491 return isset($_SESSION["wa_current_user"]) ?
492 $_SESSION["wa_current_user"]->prefs->get_theme() : 'default';
495 function user_pagesize()
497 return $_SESSION["wa_current_user"]->prefs->get_pagesize();
500 function user_hints()
502 return $_SESSION["wa_current_user"]->prefs->show_hints();
505 function user_print_profile()
507 return $_SESSION["wa_current_user"]->prefs->print_profile();
510 function user_rep_popup()
512 return $_SESSION["wa_current_user"]->prefs->rep_popup();
515 function user_query_size()
517 return $_SESSION["wa_current_user"]->prefs->query_size();
520 function user_graphic_links()
522 return $_SESSION["wa_current_user"]->prefs->graphic_links();
525 function sticky_doc_date()
527 return $_SESSION["wa_current_user"]->prefs->sticky_date();
530 function user_startup_tab()
532 return $_SESSION["wa_current_user"]->prefs->start_up_tab();
535 function set_user_prefs($prefs)
537 $_SESSION["wa_current_user"]->update_prefs($prefs);
540 function add_user_js_data() {
541 global $path_to_root, $thoseps, $decseps, $date_system, $dateseps;
543 $ts = $thoseps[user_tho_sep()];
544 $ds = $decseps[user_dec_sep()];
548 . "theme: '". $path_to_root . '/themes/'. user_theme().'/'."',\n"
549 . "loadtxt: '"._('Requesting data...')."',\n"
550 . "date: '".Today()."',\n" // server date
551 . "datesys: ".$date_system.",\n"
552 . "datefmt: ".user_date_format().",\n"
553 . "datesep: '".$dateseps[user_date_sep()]."',\n"
556 . "pdec : " . user_price_dec() . "}\n";
561 //--------------------------------------------------------------------------
563 function session_timeout()
565 $tout = @get_company_pref('login_tout'); // mask warning for db ver. 2.2
566 return $tout ? $tout : ini_get('session.gc_maxlifetime');
569 //-----------------------------------------------------------------------------
570 // Inserts $elements into $array at position $index.
571 // $elements is list of any objects
573 function array_insert(&$array, $index, $elements)
575 if (!is_array($elements)) $elements = array($elements);
577 $head = array_splice($array, 0, $index);
578 $array = array_merge($head, $elements, $array);
581 function array_remove(&$array, $index, $len=1)
583 array_splice($array, $index, $len);
586 function array_substitute(&$array, $index, $len, $elements)
588 array_splice($array, $index, $len);
589 array_insert($array, $index, $elements);
592 function array_append(&$array, $elements)
594 foreach($elements as $key => $el) {
602 // Search $needle in $haystack or in $haystack[][$valuekey]
603 // returns $needle found or null.
605 function array_search_value($needle, $haystack, $valuekey=null)
607 foreach($haystack as $key => $value) {
608 $val = isset($valuekey) ? @$value[$valuekey] : $value;
609 if ($needle == $val){
616 // Search $needle in $haystack or in $haystack[][$valuekey]
617 // returns array of keys of $haystack elements found
619 function array_search_keys($needle, $haystack, $valuekey=null)
623 foreach($haystack as $key => $value) {
624 $val = isset($valuekey) ? @$value[$valuekey] : $value;
625 if ($needle == $val){
632 // Find first (single) $needle in $haystack or in $haystack[][$valuekey]
633 // returns $haystack element found or null
635 function array_search_key($needle, $haystack, $valuekey=null)
637 $keys = array_search_keys($needle, $haystack, $valuekey);
641 // Recalculate report columns if orientation is landscape.
642 function recalculate_cols(&$cols)
644 $factor = (user_pagesize() == "A4" ? 1.4 : 1.3);
645 foreach($cols as $key => $col)
646 $cols[$key] = intval($col * $factor);
649 function flush_dir($path, $wipe = false)
651 $dir = opendir($path);
654 while(false !== ($fname = readdir($dir))) {
655 if($fname=='.' || $fname=='..' || $fname=='CVS' || (!$wipe && $fname=='index.php')) continue;
656 if(is_dir($path.'/'.$fname)) {
657 flush_dir($path.'/'.$fname, $wipe);
658 if ($wipe) @rmdir($path.'/'.$fname);
660 @unlink($path.'/'.$fname);
664 Returns current path to company private folder.
665 (Current path can change after chdir).
667 function company_path($comp=null)
669 global $path_to_root, $comp_path;
672 $comp = user_company();
674 // if path is relative, set current path_to_root
675 return ($comp_path[0]=='.' ? $path_to_root.'/'.basename($comp_path) : $comp_path)