X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=admin%2Fdb%2Fmaintenance_db.inc;h=29790b6658ad29bebd26aa92dbd8d7fae718c479;hb=34c15f2f88c2b4d8a18ca40f76df3b9748e463e1;hp=2d233d874b6a273fdce771b5b0b23dad28efc172;hpb=bb28e21c206894803222151e73a36feee629766c;p=fa-stable.git diff --git a/admin/db/maintenance_db.inc b/admin/db/maintenance_db.inc index 2d233d87..29790b66 100644 --- a/admin/db/maintenance_db.inc +++ b/admin/db/maintenance_db.inc @@ -1,4 +1,14 @@ . +***********************************************************************/ function write_config_db($new = false) { @@ -18,8 +28,8 @@ function write_config_db($new = false) $msg .= "- DatabaseName is the name of the database as defined in the RDMS being used. Typically RDMS allow many databases to be maintained under the same server.\n"; $msg .= " The scripts for MySQL provided use the name logicworks */\n\n\n"; - $msg .= "\$def_coy = " . $def_coy . ";\n\n"; - $msg .= "\$tb_pref_counter = " . $tb_pref_counter . ";\n\n"; + $msg .= "\$def_coy = " . $def_coy . ";\n\n"; + $msg .= "\$tb_pref_counter = " . $tb_pref_counter . ";\n\n"; $msg .= "\$db_connections = array (\n"; $msg .= "\t0 => "; for ($i = 0; $i < $n; $i++) @@ -42,15 +52,15 @@ 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($filename)) { - if (!$zp = fopen($filename, 'w')) + if (!$zp = fopen($filename, 'w')) { return -1; - } - else + } + else { - if (!fwrite($zp, $msg)) + if (!fwrite($zp, $msg)) { fclose($zp); return -2; @@ -58,8 +68,8 @@ function write_config_db($new = false) // Close file fclose($zp); } - } - else + } + else { return -3; } @@ -75,13 +85,14 @@ function db_create_db($connection) $sql = "CREATE DATABASE " . $connection["dbname"] . ""; if (!mysql_query($sql)) return 0; - mysql_select_db($connection["dbname"], $db); - } + mysql_select_db($connection["dbname"], $db); + } return $db; } function db_drop_db($connection) { + if ($connection["tbpref"] == "") { $sql = "DROP DATABASE " . $connection["dbname"] . ""; @@ -91,145 +102,161 @@ function db_drop_db($connection) { $res = db_query("show table status"); $all_tables = array(); - while($row = db_fetch($res)) + while($row = db_fetch($res)) $all_tables[] = $row; // get table structures - foreach ($all_tables as $table) + foreach ($all_tables as $table) { - if (strpos($table['Name'], $connection["tbpref"]) !== false) + if (strpos($table['Name'], $connection["tbpref"]) === 0) db_query("DROP TABLE `".$table['Name'] . "`"); } //deleting the tables, how?? return true; } -} +} -function db_import($filename, $connection) +function db_import($filename, $connection, $force=true) { + global $db; + $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); - else + else $lines = file("". $filename); - // divide insert and create sql queries - // $table is set to TRUE if the next line belongs to a create sql query - $table = false; - foreach($lines as $line) + // parse input file + $query_table = ''; + foreach($lines as $line_no => $line) { $line = trim($line); - + $line = str_replace("0_", $connection["tbpref"], $line); - $line = str_replace("Y_", "0_", $line); - // the last line did not belong to a 'create' sql query - if (!$table) - { - - // this line does not, too - if (strtolower(substr($line,0,6)) == "insert") - { - $data_queries[] = substr($line, 0, strlen($line) - 1); - // this line does not, too - } - elseif (strtolower(substr($line, 0, 20)) == "drop table if exists") + if ($query_table == '') + { // check if line begins with one of allowed queries + foreach($allowed_commands as $cmd => $table) { - $drop_queries[] = substr($line, 0, strlen($line) - 1); - - // this line does! - } - elseif (strtolower(substr($line, 0, 6)) == "create") + if (strtolower(substr($line, 0, strlen($cmd))) == $cmd) + { + $query_table = $table; + ${$query_table}[] = array('', $line_no+1); + break; + } + } + } + if($query_table != '') // inside allowed query + { + $table = $query_table; + if (substr($line, -1) == ';') // end of query found { - $table = true; - $table_queries[] = $line . "\n"; + $line = substr($line, 0, strlen($line) - 1); // strip ';' + $query_table = ''; } - - // the current line belongs to a create sql query - } - else - { - - // create sql query ending in this line - if (strtolower(substr($line, 0, 1)) == ")") - $table = false; - $table_queries[count($table_queries) - 1] .= $line . "\n"; + ${$table}[count(${$table}) - 1][0] .= $line . "\n"; } + } - - $sql_error = false; - +/* + { // for debugging purposes + global $path_to_root; + $f = fopen($path_to_root.'/tmp/dbimport.txt', 'w+'); + fwrite($f, print_r($drop_queries,true) ."\n"); + fwrite($f, print_r($table_queries,true) ."\n"); + fwrite($f, print_r($data_queries,true)); + fclose($f); + } +*/ // execute drop tables if exists queries - if (is_array($drop_queries)) + if ($force && is_array($drop_queries)) { - foreach($drop_queries as $drop_query) + foreach($drop_queries as $drop_query) { - $sql_error = false; - if (!db_query($drop_query)) + if (!db_query($drop_query[0])) { - $sql_error = true; - //if ($CONF['import_error']) echo nl2br($drop_query)."\n
".mysql_error()."

\n"; + if (!in_array(db_error_no(), $ignored_mysql_errors)) + $sql_errors[] = array(db_error_msg($db), $drop_query[1]); } } } // execute create tables queries - if (is_array($table_queries)) + if (is_array($table_queries)) { - foreach($table_queries as $table_query) + foreach($table_queries as $table_query) { - $sql_error = false; - if (!db_query($table_query)) - { - $sql_error = true; - //if ($CONF['import_error']) echo nl2br($table_query)."\n
".mysql_error()."

\n"; + if (!db_query($table_query[0])) + { + if (!in_array(db_error_no(), $ignored_mysql_errors) || !$force) { + $sql_errors[] = array(db_error_msg($db), $table_query[1]); + } } } } // execute insert data queries - if (is_array($data_queries)) + if (is_array($data_queries)) { - foreach($data_queries as $data_query) + foreach($data_queries as $data_query) { - $sql_error = false; - if (!db_query($data_query)) + if (!db_query($data_query[0])) { - //if ($CONF['import_error']) echo $data_query."\n
".mysql_error()."

\n"; - $sql_error = true; + 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"); - // show number successful executed querys or if an error did occur - if ($sql_error == 1) + if (count($sql_errors)) { + // display first failure message; the rest are probably derivative + $err = $sql_errors[0]; + display_error(sprintf(_("SQL script execution failed in line %d: %s"), + $err[1], $err[0])); return false; - //echo "
".IM_ERROR.".
\n"; - else + } else return true; - //echo "
".IM_SUCCESS." ".count($table_queries)." ".IM_TABLES." ".count($data_queries)." ".IM_ROWS." (".$import_file.")
\n"; //$shell_command = C_MYSQL_PATH . " -h $host -u $user -p{$password} $dbname < $filename"; //shell_exec($shell_command); } // returns the content of the gziped $path backup file. use of $mode see below -function db_ungzip($mode, $path) +function db_ungzip($mode, $path) { $file_data = gzfile($path); // returns one string or an array of lines - if ($mode != "lines") - return implode("",$file_data); - else + if ($mode != "lines") + return implode("",$file_data); + else return $file_data; } // returns the content of the ziped $path backup file. use of $mode see below -function db_unzip($mode, $path) +function db_unzip($mode, $path) { $all = false; $all = implode("", file($path)); @@ -237,28 +264,26 @@ function db_unzip($mode, $path) // convert path to name of ziped file $filename = ereg_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; - } - else + 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; ) + 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; @@ -266,66 +291,68 @@ function db_unzip($mode, $path) } // returns one string or an array of lines - if ($mode != "lines") - return $file_data; - else + if ($mode != "lines") + return $file_data; + else return explode("\n", $file_data); } // 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 - if (ini_get("memory_limit")) + if (ini_get("memory_limit")) $max_size = 900000 * ini_get("memory_limit"); - + // set backupfile name - if ($zip == "gzip") + if ($zip == "gzip") $backupfile = $filename . ".gz"; - elseif ($zip == "zip") + elseif ($zip == "zip") $backupfile = $filename . ".zip"; - else + 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: ".$company."\n"; + $out.="# Company: ". @html_entity_decode($company, ENT_COMPAT, $_SESSION['language']->encoding)."\n"; $out.="# User: ".$_SESSION["wa_current_user"]->name."\n\n"; // write users comment - if ($comment) + if ($comment) { $out .= "# Comment:\n"; $comment=preg_replace("'\n'","\n# ","# ".$comment); //$comment=str_replace("\n", "\n# ", $comment); - foreach(explode("\n",$comment) as $line) + foreach(explode("\n",$comment) as $line) $out .= $line."\n"; $out.="\n"; } - + //$out.="use ".$db.";\n"; we don't use this option. // get auto_increment values and names of all tables $res = db_query("show table status"); $all_tables = array(); - while($row = db_fetch($res)) + while($row = db_fetch($res)) { - if ($conn["tbpref"] == "" || strpos($row['Name'], $conn["tbpref"]) !== false) + //if ($conn["tbpref"] == "" || strpos($row['Name'], $conn["tbpref"]) !== false) replaced + if (($conn["tbpref"] == "" && !preg_match('/[0-9]+_/', $row['Name'])) || + ($conn["tbpref"] != "" && strpos($row['Name'], $conn["tbpref"]) !== false)) $all_tables[] = $row; - } + } // get table structures - foreach ($all_tables as $table) + foreach ($all_tables as $table) { $res1 = db_query("SHOW CREATE TABLE `" . $table['Name'] . "`"); $tmp = db_fetch($res1); @@ -336,11 +363,11 @@ function db_export($conn, $filename, $zip='no', $comment='') $fks = array(); if (isset($table_sql)) { - foreach($table_sql as $tablenme=>$table) + foreach($table_sql as $tablenme=>$table) { $tmp_table=$table; // save all tables, needed for creating this table in $fks - while (($ref_pos = strpos($tmp_table, " REFERENCES ")) > 0) + while (($ref_pos = strpos($tmp_table, " REFERENCES ")) > 0) { $tmp_table = substr($tmp_table, $ref_pos + 12); $ref_pos = strpos($tmp_table, "("); @@ -352,10 +379,10 @@ function db_export($conn, $filename, $zip='no', $comment='') $all_tables = order_sql_tables($all_tables, $fks); // as long as no error occurred - if (!$error) + if (!$error) { - //while($row=@mysql_fetch_array($res)) - foreach ($all_tables as $row) + //while($row=@mysql_fetch_array($res)) + foreach ($all_tables as $row) { $tablename = $row['Name']; $auto_incr[$tablename] = $row['Auto_increment']; @@ -368,13 +395,13 @@ function db_export($conn, $filename, $zip='no', $comment='') $out.=$table_sql[$tablename]; // add auto_increment value - if ($auto_incr[$tablename]) + if ($auto_incr[$tablename]) $out.=" AUTO_INCREMENT=".$auto_incr[$tablename]; $out.=" ;"; $out.="\n\n\n"; // export data - if (!$error) + if (!$error) { $out.="### Data of table `".$tablename."` ###\n\n"; @@ -394,66 +421,62 @@ function db_export($conn, $filename, $zip='no', $comment='') $out .= "INSERT INTO `" . $tablename . "` VALUES ("; $row2 = db_fetch_row($res2); // run through each field - for ($k = 0; $k < $nf = db_num_fields($res2); $k++) + for ($k = 0; $k < $nf = db_num_fields($res2); $k++) { - // identify null values and save them as null instead of '' - if ($field_type[$k] != "" && $row2[$k] == "") - $out .= "NULL"; - else - $out .= "'" . db_escape($row2[$k]) . "'"; - if ($k < ($nf - 1)) + $out .= db_escape(@html_entity_decode($row2[$k], ENT_COMPAT, $_SESSION['language']->encoding)); + if ($k < ($nf - 1)) $out .= ", "; } $out .= ");\n"; // if saving is successful, then empty $out, else set error flag - if (strlen($out) > $max_size && $zip != "zip") + if (strlen($out) > $max_size && $zip != "zip") { - if (save_to_file($backupfile, $zip, $out)) - $out = ""; - else + if (save_to_file($backupfile, $zip, $out)) + $out = ""; + else $error = true; } } // an error occurred! Try to delete file and return error status - } - elseif ($error) + } + elseif ($error) { - @unlink($path_to_root . BACKUP_PATH . $backupfile); + @unlink(BACKUP_PATH . $backupfile); return false; } // if saving is successful, then empty $out, else set error flag - if (strlen($out) > $max_size && $zip != "zip") + if (strlen($out) > $max_size && $zip != "zip") { - if (save_to_file($backupfile, $zip, $out)) - $out= ""; - else + if (save_to_file($backupfile, $zip, $out)) + $out= ""; + else $error = true; } } // an error occurred! Try to delete file and return error status - } - else + } + else { - @unlink($path_to_root . BACKUP_PATH . $backupfile); + @unlink(BACKUP_PATH . $backupfile); return false; } // if (mysql_error()) return "DB_ERROR"; //@mysql_close($con); - //if ($zip == "zip") + //if ($zip == "zip") // $zip = $time; - if (save_to_file($backupfile, $zip, $out)) + if (save_to_file($backupfile, $zip, $out)) { $out = ""; - } - else + } + else { - @unlink($path_to_root . BACKUP_PATH . $backupfile); + @unlink(BACKUP_PATH . $backupfile); return false; } return $backupfile; @@ -461,28 +484,28 @@ function db_export($conn, $filename, $zip='no', $comment='') // orders the tables in $tables according to the constraints in $fks // $fks musst be filled like this: $fks[tablename][0]=needed_table1; $fks[tablename][1]=needed_table2; ... -function order_sql_tables($tables, $fks) +function order_sql_tables($tables, $fks) { // do not order if no contraints exist - if (!count($fks)) + if (!count($fks)) return $tables; // order $new_tables = array(); $existing = array(); $modified = true; - while (count($tables) && $modified == true) + while (count($tables) && $modified == true) { $modified = false; - foreach ($tables as $key=>$row) + foreach ($tables as $key=>$row) { // delete from $tables and add to $new_tables - if (isset($fks[$row['Name']])) + if (isset($fks[$row['Name']])) { - foreach($fks[$row['Name']] as $needed) + foreach($fks[$row['Name']] as $needed) { // go to next table if not all needed tables exist in $existing - if (!in_array($needed,$existing)) + if (!in_array($needed,$existing)) continue 2; } } @@ -496,12 +519,12 @@ function order_sql_tables($tables, $fks) } } - if (count($tables)) + if (count($tables)) { // probably there are 'circles' in the constraints, bacause of that no proper backups can be created yet // TODO: this will be fixed sometime later through using 'alter table' commands to add the constraints after generating the tables // until now, just add the lasting tables to $new_tables, return them and print a warning - foreach($tables as $row) + foreach($tables as $row) $new_tables[] = $row; echo "
THIS DATABASE SEEMS TO CONTAIN 'RING CONSTRAINTS'. WA DOES NOT SUPPORT THEM. PROBABLY THE FOLOWING BACKUP IS DEFECT!
"; } @@ -510,30 +533,30 @@ function order_sql_tables($tables, $fks) // saves the string in $fileData to the file $backupfile as gz file or not ($zip) // returns backup file name if name has changed (zip), else TRUE. If saving failed, return value is FALSE -function save_to_file($backupfile, $zip, $fileData) +function save_to_file($backupfile, $zip, $fileData) { global $path_to_root; - - if ($zip == "gzip") + + if ($zip == "gzip") { - if ($zp = @gzopen($path_to_root . BACKUP_PATH . $backupfile, "a9")) + if ($zp = @gzopen(BACKUP_PATH . $backupfile, "a9")) { @gzwrite($zp, $fileData); @gzclose($zp); return true; - } - else + } + else { return false; } - + // $zip contains the timestamp - } - elseif ($zip == "zip") + } + elseif ($zip == "zip") { // based on zip.lib.php 2.2 from phpMyBackupAdmin // offical zip format: http://www.pkware.com/appnote.txt - + // End of central directory record $eof_ctrl_dir = "\x50\x4b\x05\x06\x00\x00\x00\x00"; @@ -542,13 +565,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); @@ -567,9 +591,9 @@ function save_to_file($backupfile, $zip, $fileData) // crc32, compressed filesize, uncompressed filesize $sub2 = pack('V', $crc) . pack('V', $c_len) . pack('V', $unc_len); - + $fr = "\x50\x4b\x03\x04" . $sub1. $sub2; - + // length of filename, extra field length $fr .= pack('v', strlen($name)) . pack('v', 0); $fr .= $name; @@ -581,44 +605,60 @@ function save_to_file($backupfile, $zip, $fileData) $cdrec = "\x50\x4b\x01\x02"; $cdrec .= "\x00\x00"; // version made by $cdrec .= $sub1 . $sub2; - + // length of filename, extra field length, file comment length, disk number start, internal file attributes, external file attributes - 'archive' bit set, offset $cdrec .= pack('v', strlen($name)) . pack('v', 0) . pack('v', 0) . pack('v', 0) . pack('v', 0) . pack('V', 32) . pack('V',0); $cdrec .= $name; // combine data $fileData = $fr . $cdrec . $eof_ctrl_dir; - + // total # of entries "on this disk", total # of entries overall, size of central dir, offset to start of central dir, .zip file comment length $fileData .= pack('v', 1) . pack('v', 1) . pack('V', strlen($cdrec)) . pack('V', strlen($fr)) . "\x00\x00"; - - if ($zp = @fopen($path_to_root . BACKUP_PATH . $backupfile, "a")) + + if ($zp = @fopen(BACKUP_PATH . $backupfile, "a")) { @fwrite($zp, $fileData); @fclose($zp); return true; - } - else + } + else { return false; } - + // uncompressed - } - else + } + else { - if ($zp = @fopen($path_to_root . BACKUP_PATH . $backupfile, "a")) + if ($zp = @fopen(BACKUP_PATH . $backupfile, "a")) { @fwrite($zp, $fileData); @fclose($zp); return true; - } - else + } + else { return false; } } } - +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