X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=includes%2Fmain.inc;h=ef86d4383903f587fda2eda5ab7e5f6b2eac000c;hb=3613e32ad573d5faccb974a421702bdd87583878;hp=f52d88c6088a5d383ffa926f80dddab4c5d75484;hpb=c70823611ef71079c28542f4810cc50c183a8cd5;p=fa-stable.git

diff --git a/includes/main.inc b/includes/main.inc
index f52d88c6..ef86d438 100644
--- a/includes/main.inc
+++ b/includes/main.inc
@@ -15,7 +15,6 @@ include_once($path_to_root . "/includes/errors.inc");
 include_once($path_to_root . "/includes/types.inc");
 include_once($path_to_root . "/includes/systypes.inc");
 include_once($path_to_root . "/includes/references.inc");
-include_once($path_to_root . "/includes/prefs/sysprefs.inc");
 include_once($path_to_root . "/includes/db/comments_db.inc");
 include_once($path_to_root . "/includes/db/sql_functions.inc");
 include_once($path_to_root . "/includes/db/audit_trail_db.inc");
@@ -28,13 +27,15 @@ include_once($path_to_root . "/includes/ui/ui_controls.inc");
 function page($title, $no_menu=false, $is_index=false, $onload="", $js="", $script_only=false)
 {
 
-   	global $path_to_root;
+   	global $path_to_root, $page_security;
+
 
    	$hide_menu = $no_menu;
 
    	include($path_to_root . "/includes/page/header.inc");
 
    	page_header($title, $no_menu, $is_index, $onload, $js);
+	check_page_security($page_security);
 //	error_box();
 	if($script_only) {		
 		echo '<noscript>';
@@ -46,20 +47,23 @@ function page($title, $no_menu=false, $is_index=false, $onload="", $js="", $scri
 	}
 }
 
-function end_page($no_menu=false, $is_index=false)
+function end_page($no_menu=false, $is_index=false, $hide_back_link=false, $type_no=0, $trans_no=0)
 {
-   	global $path_to_root, $Ajax;
-    	$hide_menu = $no_menu;
-		div_end();	// _page_body section
-   	include($path_to_root . "/includes/page/footer.inc");
-    	page_footer($no_menu, $is_index);
+	global $path_to_root;
+
+	if (!$is_index && !$hide_back_link && function_exists('hyperlink_back'))
+		hyperlink_back(true, $no_menu, $type_no, $trans_no);
+	div_end();	// end of _page_body section
+
+	include($path_to_root . "/includes/page/footer.inc");
+	page_footer($no_menu, $is_index, $hide_back_link);
 }
 
 function flush_dir($path, $wipe = false) 
 {
 	$dir = opendir($path);
 	while(false !== ($fname = readdir($dir))) {
-		if($fname=='.' || $fname=='..' || (!$wipe && $fname=='index.php')) continue;
+		if($fname=='.' || $fname=='..' || $fname=='CVS' || (!$wipe && $fname=='index.php')) continue;
   		if(is_dir($path.'/'.$fname)) {
 		    flush_dir($path.'/'.$fname, $wipe);
 		    if ($wipe) @rmdir($path.'/'.$fname);
@@ -257,37 +261,112 @@ function js_compress($sJS)
 	}
 	return $sJS;
 }
-//-----------------------------------------------------------------------------
-//	Inserts $elements into $array at position $index.
-//	$elements is list of any objects
-//
-function array_insert(&$array, $index, $elements)
-{
-	if (!is_array($elements)) $elements = array($elements);
 
-	$head  = array_splice($array, 0, $index);
-	$array = array_merge($head, $elements, $array);
+/*
+	Check if file can be updated, restoring subdirectories 
+	if needed. Returns 1 when no confilcts, -1 when file exists and is writable
+*/
+function check_write($path)
+{
+	if ($path == ''//|| $path == '.' || $path == '..'
+	) return 0;
+	
+	return is_writable($path) ? (is_dir($path) ? 1 : -1) 
+		: ($path =='.' ? 0 : check_write(dirname($path)));
 }
 
-function array_remove(&$array, $index, $len=1)
+/*
+	Copies set of files. When $strict is set
+	also removes files from the $to which 
+	does not exists in $from directory but arelisted in $flist.
+*/
+function copy_files($flist, $from, $to, $strict=false)
 {
-	array_splice($array, $index, $len);
+	foreach ($flist as $file) {
+		if (file_exists($from.'/'.$file))
+			if (!copy_file($file, $from, $to))
+				return false;
+		if ($strict && !is_file($from.'/'.$file)) // if 
+				unlink($to.'/'.$file);
+	}
+	return true;
 }
 
-function array_replace(&$array, $index, $len, $elements)
+/*
+	Copies file from base to target directory, restoring subdirectories 
+	if needed.
+*/
+function copy_file($file, $from, $to)
 {
-	array_splice($array, $index, $len);
-	array_insert($array, $index, $elements);
+
+	if (!is_dir(dirname($file=='.' ? $to : ($to.'/'.$file)))) {
+		if (!copy_file(dirname($file), null, $to))
+			return false;
+	}
+	if (!$from) {
+	//		error_log( 'dodanie katalogu '.$to.'/'.$file);
+		return @mkdir($file=='.' ? $to : ($to.'/'.$file));
+	}
+	else {
+	//		error_log( 'skopiowanie '.$to.'/'.$file);
+		return @copy($from.'/'.$file, $to.'/'.$file);
+	}
 }
+/*
+	Returns current path to company private folder.
+	(Current path can change after chdir).
+*/
+function company_path($comp=null)
+{
+	global $path_to_root, $comp_path;
+
+	if (!isset($comp))
+		$comp = user_company();
 
-function array_append(&$array, $elements)
+	// if path is relative, set current path_to_root
+	return ($comp_path[0]=='.' ? $path_to_root.'/'.basename($comp_path) : $comp_path)
+			. '/'.$comp;
+}
+/*
+	Search for file, looking first for company specific version, then for 
+	version provided by any extension module, finally in main FA directory.
+	Also adds include path for any related files.
+	
+	Returns found file path or null.
+*/
+function find_custom_file($rep)
 {
-	foreach($elements as $key => $el) {
-		if(is_int($key))
-			$array[] = $el;
-		else
-			$array[$key] = $el;
+	global $installed_extensions, $comp_path, $path_to_root;
+
+	// customized per company version
+	$path = company_path();
+	$file = $path.'/'.$rep;
+	if (file_exists($file)) {
+		// add local include path
+		set_include_path($path.PATH_SEPARATOR.get_include_path());
+		return $file;
 	}
+	// file added by active extension modules
+	if (count($installed_extensions) > 0)
+	{
+		$extensions = $installed_extensions;
+		foreach ($extensions as $ext)
+			if (($ext['active'] && $ext['type'] == 'extension')) {
+				$path = $path_to_root.'/'.$ext['path'];
+				$file = $path.$rep;
+				if (file_exists($file)) {
+					set_include_path($path.PATH_SEPARATOR.get_include_path());
+					return $file;
+				}
+			}
+	}
+	// standard location
+	$file = $path_to_root.$rep;
+	if (file_exists($file))
+		return $file;
+
+	return null;
 }
 
+
 ?>
\ No newline at end of file