X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=admin%2Fdb%2Fmaintenance_db.inc;h=0cb76d087396a87b5b27940c9c2b25b049c54a68;hb=4f89441866b40d759f43327d753b4dff31f3f02a;hp=1a08ce62539a5785e6c258bf0351dbc04493d2af;hpb=a54870eb16edb2399dfa7521b06d376906a6ec17;p=fa-stable.git diff --git a/admin/db/maintenance_db.inc b/admin/db/maintenance_db.inc index 1a08ce62..0cb76d08 100644 --- a/admin/db/maintenance_db.inc +++ b/admin/db/maintenance_db.inc @@ -1,9 +1,71 @@ . +***********************************************************************/ + +/** + * @return Returns the array sorted as required + * @param $aryData Array containing data to sort + * @param $strIndex name of column to use as an index + * @param $strSortBy Column to sort the array by + * @param $strSortType String containing either asc or desc [default to asc] + * @desc Naturally sorts an array using by the column $strSortBy + */ +function array_natsort($aryData, $strIndex, $strSortBy, $strSortType=false) +{ + // if the parameters are invalid + if (!is_array($aryData) || !$strSortBy) + // return the array + return $aryData; + + // create our temporary arrays + $arySort = $aryResult = array(); + + // loop through the array + foreach ($aryData as $key => $aryRow) + // set up the value in the array + $arySort[$strIndex ? $aryRow[$strIndex] : $key] = $aryRow[$strSortBy]; + + // apply the natural sort + natsort($arySort); + + // if the sort type is descending + if ($strSortType=="desc") + // reverse the array + arsort($arySort); + + // loop through the sorted and original data + foreach ($arySort as $arySortKey => $arySorted) + if($strIndex) + { + foreach ($aryData as $aryOriginal) + // if the key matches + if ($aryOriginal[$strIndex]==$arySortKey) + // add it to the output array + array_push($aryResult, $aryOriginal); + } else + $aryResult[$arySortKey] = $aryData[$arySortKey]; + // return the return + return $aryResult; +} + +function update_admin_password($conn, $password) +{ + $sql = "UPDATE ".$conn['tbpref']."users SET password=".db_escape($password) . " + WHERE user_id='admin'"; + db_query($sql, "could not update user password for 'admin'"); +} function write_config_db($new = false) { global $path_to_root, $def_coy, $db_connections, $tb_pref_counter; - include_once($path_to_root . "/config_db.php"); if ($new) $tb_pref_counter++; @@ -42,7 +104,7 @@ function write_config_db($new = false) $filename = $path_to_root . "/config_db.php"; // Check if the file exists and is writable first. - if (file_exists($filename) && is_writable($filename)) + if ((!file_exists($filename) && is_writable($path_to_root)) || is_writable($filename)) { if (!$zp = fopen($filename, 'w')) { @@ -66,6 +128,152 @@ function write_config_db($new = false) return 0; } +function write_extensions($extensions=null, $company = -1) +{ + global $path_to_root, $installed_extensions, $next_extension_id; + + if (!isset($extensions)) { + $extensions = $installed_extensions; + } + if (!isset($next_extension_id)) { + $next_extension_id = 1; + } +// $exts = array_natsort($extensions, 'name', 'name'); +// $extensions = $exts; + + $msg = " $ext) + { + $msg .= "\t$i => "; + $msg .= "array ( "; + $t = ''; + foreach($ext as $key => $val) { + $msg .= $t."'$key' => '$val',\n"; + $t = "\t\t\t"; + } + $msg .= "\t\t),\n"; + } + $msg .= "\t);\n?>"; + + $filename = $path_to_root . ($company==-1 ? '' : '/company/'.$company) + .'/installed_extensions.php'; + + // Check if the file is writable first. + if (!$zp = @fopen($filename, 'w')) + { + display_error(sprintf(_("Cannot open the extension setup file '%s' for writing."), + $filename)); + return false; + } + else + { + if (!fwrite($zp, $msg)) + { + display_error(sprintf(_("Cannot write to the extensions setup file '%s'."), + $filename)); + fclose($zp); + return false; + } + // Close file + fclose($zp); + } + return true; +} + +function write_lang() +{ + global $path_to_root, $installed_languages, $dflt_lang; + + $conn = array_natsort($installed_languages, 'code', 'code'); + $installed_languages = $conn; + //reset($installed_languages); + $n = count($installed_languages); + $msg = " ')\n"; + $msg .= "-- 'code' should match the name of the directory for the language under \\lang\n"; + $msg .= "-- 'name' is the name that will be displayed in the language selection list (in Users and Display Setup)\n"; + $msg .= "-- 'rtl' only needs to be set for right-to-left languages like Arabic and Hebrew\n\n"; + $msg .= "*/\n\n\n"; + + $msg .= "\$installed_languages = array (\n"; + if ($n > 0) + $msg .= "\t0 => "; + for ($i = 0; $i < $n; $i++) + { + if ($i > 0) + $msg .= "\t\tarray "; + else + $msg .= "array "; + $msg .= "('code' => '" . $installed_languages[$i]['code'] . "', "; + $msg .= "'name' => '" . $installed_languages[$i]['name'] . "', "; + $msg .= "'encoding' => '" . $installed_languages[$i]['encoding'] . "'"; + if (isset($installed_languages[$i]['rtl']) && $installed_languages[$i]['rtl']) + $msg .= ", 'rtl' => true),\n"; + else + $msg .= "),\n"; + } + + $msg .= "\t);\n"; + $msg .= "\n\$dflt_lang = '$dflt_lang';\n?>\n"; + + $path = $path_to_root . "/lang"; + $filename = $path.'/installed_languages.inc'; + // Check if directory exists and is writable first. + if (file_exists($path) && is_writable($path)) + { + if (!$zp = fopen($filename, 'w')) + { + display_error(_("Cannot open the languages file - ") . $filename); + return false; + } + else + { + if (!fwrite($zp, $msg)) + { + display_error(_("Cannot write to the language file - ") . $filename); + fclose($zp); + return false; + } + // Close file + fclose($zp); + } + } + else + { + display_error(_("The language files folder ") . $path . _(" is not writable. Change its permissions so it is, then re-run the operation.")); + return false; + } + return true; +} + function db_create_db($connection) { $db = mysql_connect($connection["host"] , @@ -105,24 +313,34 @@ function db_drop_db($connection) } } -function db_import($filename, $connection) +function db_import($filename, $connection, $force=true) { - global $db; + global $db, $go_debug; + $allowed_commands = array( "create" => 'table_queries', "alter table" => 'table_queries', "insert" => 'data_queries', "update" => 'data_queries', "drop table if exists" => 'drop_queries'); - + $ignored_mysql_errors = array( //errors ignored in normal (non forced) mode + '1022', // duplicate key + '1050', // Table %s already exists + '1060', // duplicate column name + '1061', // duplicate key name + '1062', // duplicate key entry + '1091' // can't drop key/column check if exists + ); $data_queries = array(); $drop_queries = array(); $table_queries = array(); $sql_errors = array(); ini_set("max_execution_time", "180"); + db_query("SET foreign_key_checks=0"); + // uncrompress gziped backup files - if (strpos($filename, ".gzip") || strpos($filename, ".GZIP")) + if (strpos($filename, ".gz") || strpos($filename, ".GZ")) $lines = db_ungzip("lines", $filename); elseif (strpos($filename, ".zip") || strpos($filename, ".ZIP")) $lines = db_unzip("lines", $filename); @@ -161,13 +379,13 @@ function db_import($filename, $connection) } } - -/* { // for debugging purposes +/* + { // for debugging purposes global $path_to_root; - $f = fopen($path_to_root.'/tmp/dbimport.txt', 'w'); + $f = fopen($path_to_root.'/tmp/dbimport.txt', 'w+'); fwrite($f, print_r($drop_queries,true) ."\n"); - fwrite(print_r($table_queries,true) ."\n"); - fwrite(print_r($data_queries,true)); + fwrite($f, print_r($table_queries,true) ."\n"); + fwrite($f, print_r($data_queries,true)); fclose($f); } */ @@ -178,7 +396,8 @@ function db_import($filename, $connection) { if (!db_query($drop_query[0])) { - $sql_errors[] = array(db_error_msg($db), $drop_query[1]); + if (!in_array(db_error_no(), $ignored_mysql_errors) || !$force) + $sql_errors[] = array(db_error_msg($db), $drop_query[1]); } } } @@ -189,8 +408,10 @@ function db_import($filename, $connection) foreach($table_queries as $table_query) { if (!db_query($table_query[0])) - { - $sql_errors[] = array(db_error_msg($db), $table_query[1]); + { + if (!in_array(db_error_no(), $ignored_mysql_errors) || !$force) { + $sql_errors[] = array(db_error_msg($db), $table_query[1]); + } } } } @@ -202,12 +423,14 @@ function db_import($filename, $connection) { if (!db_query($data_query[0])) { - $sql_errors[] = array(db_error_msg($db), $data_query[1]); - break; + if (!in_array(db_error_no(),$ignored_mysql_errors) || !$force) + $sql_errors[] = array(db_error_msg($db), $data_query[1]); } } } + db_query("SET foreign_key_checks=1"); + if (count($sql_errors)) { // display first failure message; the rest are probably derivative $err = $sql_errors[0]; @@ -238,30 +461,28 @@ function db_unzip($mode, $path) $all = implode("", file($path)); // convert path to name of ziped file - $filename = ereg_replace(".*/", "", $path); + $filename = preg_replace("/.*\//", "", $path); $filename = substr($filename, 0, strlen($filename) - 4); // compare filname in zip and filename from $_GET - if (substr($all, 30, strlen($filename)) != $filename) - { - return ''; - // exit if names differ - //echo F_WRONG_FILE."."; - //exit; + if (substr($all, 30, strlen($filename)-4) . substr($all, 30+strlen($filename)+9, 4) + != $filename) { + return ''; // exit if names differ } else { // get the suffix of the filename in hex - $crc_bugfix = substr(substr($filename, 0, strlen($filename) - 4), strlen($filename) - 12 - 4); + $crc_bugfix = substr($all, 30, strlen($filename)+13); + $crc_bugfix = substr(substr($crc_bugfix, 0, strlen($crc_bugfix) - 4), + strlen($crc_bugfix) - 12 - 4); $suffix = false; - // convert hex to ascii for ($i=0; $i < 12; ) $suffix .= chr($crc_bugfix[$i++] . $crc_bugfix[$i++] . $crc_bugfix[$i++]); // remove central directory information (we have always just one ziped file) - $comp = substr($all, -(strlen($all) - 30 - strlen($filename))); - $comp = substr($comp, 0, (strlen($comp) - 80 - strlen($filename))); + $comp = substr($all, -(strlen($all) - 30 - strlen($filename)-13)); + $comp = substr($comp, 0, (strlen($comp) - 80 - strlen($filename)-13)); // fix the crc bugfix (see function save_to_file) $comp = "xœ" . $comp . $suffix; @@ -275,15 +496,24 @@ function db_unzip($mode, $path) return explode("\n", $file_data); } +function db_backup($conn, $ext='no', $comm='', $tbpref = TB_PREF) +{ + if ($conn['tbpref'] != "") + $filename = $conn['dbname'] . "_" . $conn['tbpref'] . date("Ymd_Hi") . ".sql"; + else + $filename = $conn['dbname'] . "_" . date("Ymd_Hi") . ".sql"; + + return db_export($conn, $filename, $ext, $comm, $tbpref); +} + // generates a dump of $db database // $drop and $zip tell if to include the drop table statement or dry to pack -function db_export($conn, $filename, $zip='no', $comment='') +function db_export($conn, $filename, $zip='no', $comment='', $tbpref = TB_PREF) { global $app_title, $version, $power_url, $path_to_root; $error = false; - // set max string size before writing to file $max_size = 1048576 * 2; // 2 MB // changes max size if value can be retrieved @@ -297,13 +527,14 @@ function db_export($conn, $filename, $zip='no', $comment='') $backupfile = $filename . ".zip"; else $backupfile = $filename; - $company = get_company_pref('coy_name'); + $company = get_company_pref('coy_name', $tbpref); + //create comment $out="# MySQL dump of database '".$conn["dbname"]."' on host '".$conn["host"]."'\n"; $out.="# Backup Date and Time: ".date("Y-m-d H:i")."\n"; $out.="# Built by " . $app_title . " " . $version ."\n"; $out.="# ".$power_url."\n"; - $out.="# Company: ". @html_entity_decode($company, ENT_COMPAT, $_SESSION['language']->encoding)."\n"; + $out.="# Company: ". @html_entity_decode($company, ENT_QUOTES, $_SESSION['language']->encoding)."\n"; $out.="# User: ".$_SESSION["wa_current_user"]->name."\n\n"; // write users comment @@ -386,11 +617,11 @@ function db_export($conn, $filename, $zip='no', $comment='') // check if field types are NULL or NOT NULL $res3 = db_query("SHOW COLUMNS FROM `" . $tablename . "`"); - $field_type = array(); + $field_null = array(); for ($j = 0; $j < db_num_rows($res3); $j++) { $row3 = db_fetch($res3); - $field_type[] = $row3[2]; + $field_null[] = $row3[2]=='YES' && $row3[4]===null; } $res2 = db_query("SELECT * FROM `" . $tablename . "`"); @@ -401,7 +632,7 @@ function db_export($conn, $filename, $zip='no', $comment='') // run through each field for ($k = 0; $k < $nf = db_num_fields($res2); $k++) { - $out .= db_escape(@html_entity_decode($row2[$k], ENT_COMPAT, $_SESSION['language']->encoding)); + $out .= db_escape($row2[$k], $field_null[$k]); if ($k < ($nf - 1)) $out .= ", "; } @@ -543,13 +774,14 @@ function save_to_file($backupfile, $zip, $fileData) $crc = crc32($fileData); $zdata = gzcompress($fileData); - // string needed for decoding (because of crc bug) - //$name_suffix = substr($zdata, -4, 4); - //$name_suffix2 = "_"; - //for ($i = 0; $i < 4; $i++) - // $name_suffix2 .= sprintf("%03d", ord($name_suffix[$i])); - //$backupfile = substr($backupfile, 0, strlen($backupfile) - 8) . $name_suffix2 . ".sql.zip"; - $name = substr($backupfile, 0, strlen($backupfile) -4); + // extend stored file name with suffix + // needed for decoding (because of crc bug) + $name_suffix = substr($zdata, -4, 4); + $name_suffix2 = "_"; + for ($i = 0; $i < 4; $i++) + $name_suffix2 .= sprintf("%03d", ord($name_suffix[$i])); + + $name = substr($backupfile, 0, strlen($backupfile) - 8) . $name_suffix2 . ".sql"; // fix crc bug $zdata = substr(substr($zdata, 0, strlen($zdata) - 4), 2); @@ -621,5 +853,21 @@ function save_to_file($backupfile, $zip, $fileData) } } - +function create_comp_dirs($comp_path, $comp_subdirs) +{ + $index = ""; + $cdir = $comp_path; + @mkdir($cdir); + $f = @fopen("$cdir/index.php", "wb"); + @fwrite($f, $index); + @fclose($f); + + foreach($comp_subdirs as $dir) + { + @mkdir($cdir.'/'.$dir); + $f = @fopen("$cdir/$dir/index.php", "wb"); + @fwrite($f, $index); + @fclose($f); + } +} ?> \ No newline at end of file