mirror of
https://github.com/ACSPRI/queXS
synced 2024-04-02 12:12:16 +00:00
Merging the Limesurvey 1.91+ branch of queXS in to the trunk
This commit is contained in:
azammitdcarf
@@ -1,137 +1,149 @@
|
||||
<?php
|
||||
/*
|
||||
* LimeSurvey
|
||||
* Copyright (C) 2007 The LimeSurvey Project Team / Carsten Schmitz
|
||||
* All rights reserved.
|
||||
* License: GNU/GPL License v2 or later, see LICENSE.php
|
||||
* LimeSurvey is free software. This version may have been modified pursuant
|
||||
* to the GNU General Public License, and as distributed it includes or
|
||||
* is derivative of works licensed under the GNU General Public License or
|
||||
* other free or open source software licenses.
|
||||
* See COPYRIGHT.php for copyright notices and details.
|
||||
*
|
||||
* $Id: dumpdb.php 7519 2009-08-23 21:55:32Z c_schmitz $
|
||||
*/
|
||||
* LimeSurvey
|
||||
* Copyright (C) 2007 The LimeSurvey Project Team / Carsten Schmitz
|
||||
* All rights reserved.
|
||||
* License: GNU/GPL License v2 or later, see LICENSE.php
|
||||
* LimeSurvey is free software. This version may have been modified pursuant
|
||||
* to the GNU General Public License, and as distributed it includes or
|
||||
* is derivative of works licensed under the GNU General Public License or
|
||||
* other free or open source software licenses.
|
||||
* See COPYRIGHT.php for copyright notices and details.
|
||||
*
|
||||
* $Id: dumpdb.php 10925 2011-09-02 14:12:02Z c_schmitz $
|
||||
*/
|
||||
|
||||
include_once("login_check.php"); //Login Check dies also if the script is started directly
|
||||
|
||||
if ($database_exists && ($databasetype=='mysql' || $databasetype=='mysqli') && $demoModeOnly != true) {
|
||||
if ($database_exists && ($databasetype=='mysql' || $databasetype=='mysqli') && $demoModeOnly != true && $action=='dumpdb') {
|
||||
|
||||
$tables = $connect->MetaTables();
|
||||
|
||||
$export="";
|
||||
$export .="#------------------------------------------"."\n";
|
||||
$export .="# LimeSurvey Database Dump of `$databasename`"."\n";
|
||||
if ($allowexportalldb==0) {
|
||||
$export .="# Only prefixed tables with: ". $dbprefix ."\n";
|
||||
}
|
||||
$export .="# Date of Dump: ". date("d-M-Y") ."\n";
|
||||
$export .="#------------------------------------------"."\n\n\n";
|
||||
|
||||
foreach($tables as $table) {
|
||||
if ($allowexportalldb==0) {
|
||||
if ($dbprefix==substr($table, 0, strlen($dbprefix))) {
|
||||
$export .= defdump($table);
|
||||
$export .= datadump($table);
|
||||
}
|
||||
}
|
||||
else {
|
||||
$export .= defdump($table);
|
||||
$export .= datadump($table);
|
||||
}
|
||||
}
|
||||
|
||||
$file_name = "LimeSurvey_{$databasename}_dump_".date_shift(date("Y-m-d H:i:s"), "Y-m-d", $timeadjust).".sql";
|
||||
Header("Content-type: application/octet-stream");
|
||||
Header("Content-Disposition: attachment; filename=$file_name");
|
||||
Header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
|
||||
echo $export;
|
||||
exit;
|
||||
$export=completedump();
|
||||
|
||||
$file_name = "LimeSurvey_{$databasename}_dump_".date_shift(date("Y-m-d H:i:s"), "Y-m-d", $timeadjust).".sql";
|
||||
Header("Content-type: application/octet-stream");
|
||||
Header("Content-Disposition: attachment; filename=$file_name");
|
||||
Header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
|
||||
Header("Pragma: Public");
|
||||
echo $export;
|
||||
exit; // needs to be inside the condition so the updater still can include this file
|
||||
}
|
||||
else
|
||||
{
|
||||
$dumpdboutput= "<br />\n"
|
||||
."<table class='alertbox' >\n"
|
||||
."\t<tr ><td height='4'><font size='1'><strong>".$clang->gT("Export database")."</strong></font></td></tr>\n"
|
||||
."\t<tr ><td height='4'>".$clang->gT("The database export is only available for MySQL databases. For other database types please use the according backup mechanism to create a database dump.")."</td></tr>"
|
||||
."</table><br />";
|
||||
return;
|
||||
}
|
||||
|
||||
|
||||
function defdump($tablename)
|
||||
{
|
||||
global $connect;
|
||||
$def = "";
|
||||
$def .="#------------------------------------------"."\n";
|
||||
$def .="# Table definition for $tablename"."\n";
|
||||
$def .="#------------------------------------------"."\n";
|
||||
$def .= "DROP TABLE IF EXISTS $tablename;"."\n"."\n";
|
||||
$def .= "CREATE TABLE $tablename ("."\n";
|
||||
$result = db_execute_assoc("SHOW COLUMNS FROM $tablename") or die("Table $tablename not existing in database");
|
||||
while($row = $result->FetchRow())
|
||||
{
|
||||
$def .= " `$row[Field]` $row[Type]";
|
||||
if (!is_null($row["Default"])) $def .= " DEFAULT '$row[Default]'";
|
||||
if ($row["Null"] != "YES") $def .= " NOT NULL";
|
||||
if ($row["Extra"] != "") $def .= " $row[Extra]";
|
||||
$def .= ",\n";
|
||||
}
|
||||
$def = preg_replace("#,\n$#","", $def);
|
||||
|
||||
$result = db_execute_assoc("SHOW KEYS FROM $tablename");
|
||||
while($row = $result->FetchRow())
|
||||
{
|
||||
$kname=$row["Key_name"];
|
||||
if(($kname != "PRIMARY") && ($row["Non_unique"] == 0)) $kname="UNIQUE|$kname";
|
||||
if(!isset($index[$kname])) $index[$kname] = array();
|
||||
$index[$kname][] = $row["Column_name"];
|
||||
}
|
||||
|
||||
while(list($x, $columns) = @each($index))
|
||||
{
|
||||
$def .= ",\n";
|
||||
if($x == "PRIMARY") $def .= " PRIMARY KEY (" . implode($columns, ", ") . ")";
|
||||
else if (substr($x,0,6) == "UNIQUE") $def .= " UNIQUE ".substr($x,7)." (" . implode($columns, ", ") . ")";
|
||||
else $def .= " KEY $x (" . implode($columns, ", ") . ")";
|
||||
}
|
||||
$def .= "\n);\n\n\n";
|
||||
return (stripslashes($def));
|
||||
}
|
||||
|
||||
|
||||
function datadump ($table) {
|
||||
|
||||
global $connect;
|
||||
|
||||
$result = "#------------------------------------------"."\n";
|
||||
$result .="# Table data for $table"."\n";
|
||||
$result .="#------------------------------------------"."\n";
|
||||
|
||||
$query = db_execute_num("select * from $table");
|
||||
$num_fields = $query->FieldCount();
|
||||
$numrow = $query->RecordCount();
|
||||
|
||||
while($row=$query->FetchRow()){
|
||||
@set_time_limit(5);
|
||||
$result .= "INSERT INTO ".$table." VALUES(";
|
||||
for($j=0; $j<$num_fields; $j++) {
|
||||
if (isset($row[$j]) && !is_null($row[$j]))
|
||||
{
|
||||
$row[$j] = addslashes($row[$j]);
|
||||
$row[$j] = preg_replace("#\n#","\\n",$row[$j]);
|
||||
$result .= "\"$row[$j]\"";
|
||||
}
|
||||
else
|
||||
{
|
||||
$result .= "NULL";
|
||||
}
|
||||
|
||||
if ($j<($num_fields-1)) $result .= ",";
|
||||
}
|
||||
$result .= ");\n";
|
||||
} // while
|
||||
return $result . "\n\n\n";
|
||||
}
|
||||
/**
|
||||
* Creates a full dump of the current LimeSurvey database
|
||||
*
|
||||
* @returns string Contains the dumped data
|
||||
*/
|
||||
function completedump()
|
||||
{
|
||||
global $connect, $databasename, $dbprefix, $allowexportalldb;
|
||||
$tables = $connect->MetaTables();
|
||||
$export ="#------------------------------------------"."\n";
|
||||
$export .="# LimeSurvey Database Dump of `$databasename`"."\n";
|
||||
if ($allowexportalldb==0) {
|
||||
$export .="# Only prefixed tables with: ". $dbprefix ."\n";
|
||||
}
|
||||
$export .="# Date of Dump: ". date("d-M-Y") ."\n";
|
||||
$export .="#------------------------------------------"."\n\n\n";
|
||||
|
||||
foreach($tables as $table) {
|
||||
if ($allowexportalldb==0) {
|
||||
if ($dbprefix==substr($table, 0, strlen($dbprefix))) {
|
||||
$export .= defdump($table);
|
||||
$export .= datadump($table);
|
||||
}
|
||||
}
|
||||
else {
|
||||
$export .= defdump($table);
|
||||
$export .= datadump($table);
|
||||
}
|
||||
}
|
||||
return $export;
|
||||
}
|
||||
|
||||
|
||||
|
||||
function defdump($tablename)
|
||||
{
|
||||
global $connect;
|
||||
$def = "";
|
||||
$def .="#\n";
|
||||
$def .="# Table definition for {$tablename}"."\n";
|
||||
$def .="#\n";
|
||||
$def .= "DROP TABLE IF EXISTS {$tablename};"."\n"."\n";
|
||||
$def .= "CREATE TABLE {$tablename} ("."\n";
|
||||
$result = db_execute_assoc("SHOW COLUMNS FROM {$tablename}") or die("Table $tablename not existing in database");
|
||||
while($row = $result->FetchRow())
|
||||
{
|
||||
$def .= " `$row[Field]` $row[Type]";
|
||||
if (!is_null($row["Default"])) $def .= " DEFAULT '$row[Default]'";
|
||||
if ($row["Null"] != "YES") $def .= " NOT NULL";
|
||||
if ($row["Extra"] != "") $def .= " $row[Extra]";
|
||||
$def .= ",\n";
|
||||
}
|
||||
$def = preg_replace("#,\n$#","", $def);
|
||||
|
||||
$result = db_execute_assoc("SHOW KEYS FROM $tablename");
|
||||
while($row = $result->FetchRow())
|
||||
{
|
||||
$kname=$row["Key_name"];
|
||||
if(($kname != "PRIMARY") && ($row["Non_unique"] == 0)) $kname="UNIQUE|$kname";
|
||||
if(!isset($index[$kname])) $index[$kname] = array();
|
||||
if ($row["Sub_part"]!='') $row["Column_name"].=" ({$row["Sub_part"]})";
|
||||
$index[$kname][] = $row["Column_name"];
|
||||
}
|
||||
|
||||
while(list($x, $columns) = @each($index))
|
||||
{
|
||||
$def .= ",\n";
|
||||
if($x == "PRIMARY") $def .= " PRIMARY KEY (" . implode($columns, ", ") . ")";
|
||||
else if (substr($x,0,6) == "UNIQUE") $def .= " UNIQUE ".substr($x,7)." (" . implode($columns, ", ") . ")";
|
||||
else $def .= " KEY $x (" . implode($columns, ", ") . ")";
|
||||
}
|
||||
$def .= "\n);\n\n\n";
|
||||
return (stripslashes($def));
|
||||
}
|
||||
|
||||
|
||||
function datadump ($table) {
|
||||
|
||||
global $connect;
|
||||
|
||||
$result = "#\n";
|
||||
$result .="# Table data for $table"."\n";
|
||||
$result .="#\n";
|
||||
|
||||
$query = db_execute_num("select * from $table");
|
||||
$num_fields = $query->FieldCount();
|
||||
$aFieldNames= $connect->MetaColumnNames($table, true);
|
||||
$sFieldNames= implode('`,`',$aFieldNames);
|
||||
$numrow = $query->RecordCount();
|
||||
|
||||
if ($numrow>0)
|
||||
{
|
||||
$result .= "INSERT INTO `{$table}` (`{$sFieldNames}`) VALUES";
|
||||
while($row=$query->FetchRow()){
|
||||
@set_time_limit(5);
|
||||
$result .= "(";
|
||||
for($j=0; $j<$num_fields; $j++) {
|
||||
if (isset($row[$j]) && !is_null($row[$j]))
|
||||
{
|
||||
$row[$j] = addslashes($row[$j]);
|
||||
$row[$j] = preg_replace("#\n#","\\n",$row[$j]);
|
||||
$result .= "\"$row[$j]\"";
|
||||
}
|
||||
else
|
||||
{
|
||||
$result .= "NULL";
|
||||
}
|
||||
|
||||
if ($j<($num_fields-1)) $result .= ",";
|
||||
}
|
||||
$result .= "),\n";
|
||||
} // while
|
||||
$result=substr($result,0,-2);
|
||||
}
|
||||
return $result . ";\n\n";
|
||||
}
|
||||
|
||||
?>
|
||||
|
||||
Reference in New Issue
Block a user