Linux ip-172-26-7-228 5.4.0-1103-aws #111~18.04.1-Ubuntu SMP Tue May 23 20:04:10 UTC 2023 x86_64
Your IP : 3.21.105.46
<?php
/**
* ExcelWriterXML Package
* Used the schema documentation from Microsoft
* @link http://msdn.microsoft.com/en-us/library/aa140066(office.10).aspx
* @package ExcelWriterXML
*/
/**
* Includes the other class file to create Sheets
*/
include('ExcelWriterXML_Sheet.php');
/**
* Includes the other class file to create Styles
*/
include('ExcelWriterXML_Style.php');
/**
* Class for generating the initial Excel XML document
* <code>
* <?php
* $xml = new ExcelWriterXML;
* $format = $xml->addStyle('StyleHeader');
* $format->fontBold();
* $sheet = $xml->addSheet('Test Sheet');
* $sheet->writeString (1,1,'Header1','StyleHeader');
* $sheet->writeString(2,1,'My String');
* $xml->sendHeaders();
* $xml->writeData();
* ?>
* </code>
* @link http://msdn.microsoft.com/en-us/library/aa140066(office.10).aspx
* @author Robert F Greer
* @version 1.0
* @package ExcelWriterXML
*/
class ExcelWriterXML{
// Private Variables //
private $styles = array();
public $formatErrors = array();
private $sheets = array();
private $showErrorSheet = false;
private $overwriteFile = false;
private $docFileName;
private $docTitle;
private $docSubject;
private $docAuthor;
private $docCreated;
private $docManager;
private $docCompany;
private $docVersion = 11.9999;
///////////////////////
/**
* Constructor for the ExcelWriterXML class.
* A default style is created, a filename is generated (if not supplied) and
* the create time of the document is stored.
* @param string $fileName This is the filename that will be passed to the
* browser. If not present it will default to "file.xml"
* @return ExcelWriterXML Instance of the class
*/
function ExcelWriterXML($fileName = 'file.xml'){
// Add default style
$style = $this->addStyle('Default');
$style->name('Normal');
$style->alignVertical('Bottom');
if ($fileName == ''){
$fileName = 'file.xml';
$this->addError(__FUNCTION__,'File name was blank, default to "file.xml"');
}
$this->docFileName = $fileName;
$this->docCreated = date('Y-m-d').'T'.date('H:i:s').'Z';
EWXcreateStylesDB($this);
}
/**
* Whether or not to overwrite a file (when writing to disk)
* @param boolean $overwrite True or False
*/
public function overwriteFile($overwrite = true){
if (!is_bool($overwrite)){
$this->overwriteFile = false;
return;
}
else{
$this->overwriteFile = $overwrite;
}
}
/**
* Whether or not to show the sheet containing the Formatting Errors
* @param boolean $show
*/
public function showErrorSheet($show = true){
if (!is_bool($show)){
$this->showErrorSheet = true;
return;
}
else{
$this->showErrorSheet = $show;
}
}
/**
* Adds a format error. When the document is generated if there are any
* errors they will be listed on a seperate sheet.
@param string $function The name of the function that was called
* @param string $message Details of the error
*/
public function addError($function, $message){
$tmp = array(
'function' => $function,
'message' => $message,
);
$this->formatErrors[] = $tmp;
}
/**
* Sends the HTML headers to the client.
* This is only necessary if the XML doc is to be delivered from the server
* to the browser.
*/
public function sendHeaders(){
header('content-type: text/xml');
header('Content-Disposition: attachment; filename="'.$this->docFileName.'"');
header('Expires: 0');
header('Cache-Control: must-revalidate, post-check=0,pre-check=0');
header('Pragma: public');
}
/**
* Gets the default style that was created by the contructor.
* This is used when modifications to the default style are required.
* @return ExcelWriterXML_Style Reference to a style class
*/
public function getDefaultStyle(){
return($this->styles[0]);
}
/**
* Creates a new style within the spreadsheet.
* Styles cannot have the same name as any other style. If a style has the
* same name as another style then it will follow the default naming
* convention as if $id was null
* @param string $id The name of the style. If left blank then the style
* will default to "CustomStyle" + n (e.g. "CustomStyle1")
* @return ExcelWriterXML_Style Reference to a new style class
*/
public function addStyle($id = null){
static $styleNum = 1;
if (trim($id) == '') $id = null;
if ($id == null){
$id = 'CustomStyle'.$styleNum;
$styleNum++;
//$this->addError(__FUNCTION__,'Style name was blank, renamed to "'.$id.'"');
}
while (!$this->checkStyleID($id)){
$old_id = $id;
$id = 'CustomStyle'.$styleNum;
$this->addError(__FUNCTION__,'Style name was duplicate ("'.$old_id.'"), renamed to "'.$id.'"');
$styleNum++;
}
$style =new ExcelWriterXML_Style($id);
$this->styles[] = $style;
return ($style);
}
/**
* Creates a new sheet within the spreadsheet
* At least one sheet is required.
* Additional sheets cannot have the same name as any other sheet.
* If a sheet has the same name as another sheet then it will follow the
* default naming convention as if $id was null
* @param string $id The name of the sheet. If left blank then the sheet
* will default to "Sheet" + n (e.g. "Sheet1")
* @return ExcelWriterXML_Sheet Reference to a new sheet class
*/
public function addSheet($id = null){
static $sheetNum = 1;
if (trim($id) == '') $id = null;
if ($id == null){
$id = 'Sheet'.$sheetNum;
$sheetNum++;
$this->addError(__FUNCTION__,'Sheet name was blank, renamed to "'.$id.'"');
}
while (!$this->checkSheetID($id)){
$old_id = $id;
$id = 'Sheet'.$sheetNum;
$this->addError(__FUNCTION__,'Sheet name was duplicate ("'.$old_id.'"), renamed to "'.$id.'"');
$sheetNum++;
}
$sheet =new ExcelWriterXML_Sheet($id);
$this->sheets[] = $sheet;
return ($sheet);
}
/**
* Checks whether a proposed Sheet ID has already been used
* @param string $id The sheet id to be checked
* @return boolean True if the id is unique, false otherwise
*/
private function checkSheetID($id){
foreach($this->sheets as $sheet){
$sheetID = $sheet->getID();
if ($id == $sheetID){
return false;
}
}
return true;
}
/**
* Checks whether a proposed Style ID has already been used
* @param string $id The style id to be checked
* @return boolean True if the id is unique, false otherwise
*/
public function checkStyleID($id){
foreach($this->styles as $style){
$styleID = $style->getID();
if ($id == $styleID){
return false;
}
}
return true;
}
/**
* Writes the XML data
* @param string $target If left null the function will output to STD OUT
* (e. g. browser or console)
*/
public function writeData($target = null){
$docTitle = '';
$docSubject = '';
$docAuthor = '';
$docCreated = '';
$docManager = '';
$docCompany = '';
$docVersion = 12;
$errors = false;
if ($this->showErrorSheet == true){
$format = $this->addStyle('formatErrorsHeader');
$format->fontBold();
$format->bgColor('red');
}
if (!empty($this->docTitle)) $docTitle = '<Title>'.htmlspecialchars($this->docTitle).'</Title>'."\r";
if (!empty($this->docSubject)) $docSubject = '<Subject>'.htmlspecialchars($this->docSubject).'</Subject>'."\r";
if (!empty($this->docAuthor)) $docAuthor = '<Author>'.htmlspecialchars($this->docAuthor).'</Author>'."\r";
if (!empty($this->docCreated)) $docCreated = '<Created>'.htmlspecialchars($this->docCreated).'</Created>'."\r";
if (!empty($this->docManager)) $docManager = '<Manager>'.htmlspecialchars($this->docManager).'</Manager>'."\r";
if (!empty($this->docCompany)) $docCompany = '<Company>'.htmlspecialchars($this->docCompany).'</Company>'."\r";
$xml = '
<?xml version="1.0"?>'."\r";
$xml .= '
<?mso-application progid="Excel.Sheet"?>'."\r";
$xml .= '<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns:ss="urn:schemas-microsoft-com:office:spreadsheet" xmlns:html="http://www.w3.org/TR/REC-html40">'."\r";
$xml .= '<DocumentProperties xmlns="urn:schemas-microsoft-com:office:office">'."\r";
if (!empty($this->docTitle)) $xml .= ' '.$docTitle;
if (!empty($this->docSubject)) $xml .= ' '.$docSubject;
if (!empty($this->docAuthor)) $xml .= ' '.$docAuthor;
if (!empty($this->docCreated)) $xml .= ' '.$docCreated;
if (!empty($this->docManager)) $xml .= ' '.$docManager;
if (!empty($this->docCompany)) $xml .= ' '.$docCompany;
$xml .= ' <Version>'.$this->docVersion.'</Version>'."\r";
$xml .= '</DocumentProperties>'."\r";
$xml .= '
<ExcelWorkbook xmlns="urn:schemas-microsoft-com:office:excel" />'."\r";
$xml .= '<Styles>'."\r";
foreach($this->styles as $style){
$xml .= $style->getStyleXML();
if (count($style->getErrors()) > 0){
$errors = true;
}
}
$xml .= '</Styles>'."\r";
if (count($this->sheets) == 0){
$this->addSheet();
}
foreach($this->sheets as $sheet){
$xml .= $sheet->getSheetXML();
if (count($sheet->getErrors()) > 0){
$errors = true;
}
}
if (count($this->formatErrors) > 0){
$errors = true;
}
if ($errors == true && $this->showErrorSheet == true){
$sheet = $this->addSheet('formatErrors');
$sheet->cellMerge(1,1,3,0); // Merge the first three cells across in row 1
$sheet->writeString(1,1,'Formatting Errors');
$sheet->writeString(2,1,'Type','formatErrorsHeader');
$sheet->writeString(2,2,'Function','formatErrorsHeader');
$sheet->cellWidth(2,1,200);
$sheet->cellWidth(2,2,200);
$sheet->cellWidth(2,3,400);
$sheet->writeString(2,3,'Error Message','formatErrorsHeader');
$row = 3;
foreach($this->formatErrors as $error){
$function = $error['function'];
$message = $error['message'];
$sheet->writeString($row,1,'Document');
$sheet->writeString($row,2,$function);
$sheet->writeString($row,3,$message);
$row++;
}
foreach($this->styles as $styleObject){
$formatErrors = $styleObject->getErrors();
$styleID = 'Style='.$styleObject->getID();
foreach($formatErrors as $error){
$function = $error['function'];
$message = $error['message'];
$sheet->writeString($row,1,$styleID);
$sheet->writeString($row,2,$function);
$sheet->writeString($row,3,$message);
$row++;
}
}
foreach($this->sheets as $sheetObject){
$formatErrors = $sheetObject->getErrors();
$sheetID = 'Sheet='.$sheetObject->getID();
foreach($formatErrors as $error){
$function = $error['function'];
$message = $error['message'];
$sheet->writeString($row,1,$sheetID);
$sheet->writeString($row,2,$function);
$sheet->writeString($row,3,$message);
$row++;
}
}
$xml .= $sheet->getSheetXML();
}
$xml .= '
</Workbook>';
if ($target == null){
// We aren't writing this file to disk, so echo back to the client.
echo $xml;
return true;
}
else{
$fileExists = file_exists($target);
if ($fileExists == true && $this->overwriteFile == false){
die('"'.$target.'" exists and "overwriteFile" is set to "false"');
}
$handle = fopen($target, 'w');
if ($handle){
fwrite($handle,$xml);
fclose($handle);
return true;
}
else{
echo('<br />Not able to open "'.$target.'" for writing');
return false;
}
}
}
/**
* Sets the Title of the document
* @param string $title Part of the properties of the document.
*/
public function docTitle($title = ''){$this->docTitle = $title;}
/**
* Sets the Subject of the document
* @param string $subject Part of the properties of the document.
*/
public function docSubject($subject = ''){$this->docSubject = $subject;}
/**
* Sets the Author of the document
* @param string $author Part of the properties of the document.
*/
public function docAuthor($author = ''){$this->docAuthor = $author;}
/**
* Sets the Manager of the document
* @param string $manager Part of the properties of the document.
*/
public function docManager($manager = ''){$this->docManager = $manager;}
/**
* Sets the Company of the document
* @param string $company Part of the properties of the document.
*/
public function docCompany($company = ''){$this->docCompany = $company;}
/**
* Outputs a MYSQL table or list of tables to an Excel doc
* @param string $host MySQL host to connect to
* @param string $username Username to connect with
* @param string $password Password to connect with
* @param string $db Database to use
* @param mixed $table If string, out specific table. If array, each table will have it's own sheet
* @param mixed $alternateName For multiple tables this does nothing. For table, overrides auto naming of the sheet
(table name)
*/
public function mysqlTableDump($host,$username,$password,$db,$table,$alternateName = null){
EWXcheckDriverDB('mysql');
if (empty($host)) $this->addError('Database','HOSTNAME is empty');
if (empty($username)) $this->addError('Database','USERNAME is empty');
if (empty($db)) $this->addError('Database','DB is empty');
if (empty($table)) $this->addError('Database','TABLE(S) is empty');
if (count($this->formatErrors) > 0){$this->showErrorSheet();return false;}
$link = mysql_connect($host,$username,$password);
if (!$link) $this->addError('Database','UNABLE to connect to '.$host.'('.mysql_error().')');
if (count($this->formatErrors) > 0){ $this->showErrorSheet(); return false; }
$db_selected = mysql_select_db($db);
if (!$db_selected) $this->addError('Database','DB "'.$db.'" does not exist');
if (count($this->formatErrors) > 0){ $this->showErrorSheet(); return false; }
if (gettype($table) == 'array'){
foreach($table as $table2){
$sheet = $this->addSheet($table2);
$query = 'SELECT * FROM `'.$db.'`.`'.$table2.'` ';
EWXmysqlGenerateByQuery($sheet,$link,$query);
}
}
else{
if ($alternateName == null || empty($alternateName)) $sheet = $this->addSheet($table);
else $sheet = $this->addSheet($alternateName);
$query = 'SELECT * FROM `'.$db.'`.`'.$table.'` ';
EWXmysqlGenerateByQuery($sheet,$link,$query);
}
if (count($this->formatErrors) > 0){ $this->showErrorSheet(); return false; }
}
}
function EWXmysqlGenerateByQuery(&$sheet,$link,$query){
$res = mysql_query($query,$link);
if (!$res) $sheet->addError('Database','Unable to execute query ('.mysql_error().')');
if (count($sheet->formatErrors) > 0){return false;}
if (mysql_num_rows($res) == 0){
$sheet->writeString(1,1,'No data');
return true;
}
$row = 0;
$headersWritten = false;
while($data = mysql_fetch_row($res)){
$row++;$col=1;
if ($headersWritten == false){
$numFields = mysql_num_fields($res);
for($x=0; $x<$numFields;$x++){ $name=mysql_field_name($res,$x); $sheet->writeString($row,$col++,$name,'db_header');
}
$row++;$col=1;
$headersWritten = true;
}
foreach($data as $offset => $value){
$field = mysql_field_name($res,$offset);
$type = mysql_field_type($res,$offset);
$value = htmlentities(trim($value));
if (strstr($type,'int')){
$sheet->writeNumber($row,$col++,$value);
}
else if ($type == 'datetime'){
$value = $sheet->convertMysqlDateTime($value);
$sheet->writeDateTime($row,$col++,$value,'db_datetime');
}
else if ($type == 'date'){
$value = $sheet->convertMysqlDate($value);
$sheet->writeDateTime($row,$col++,$value,'db_date');
}
else if ($type == 'time'){
$value = $sheet->convertMysqlTime($value);
$sheet->writeDateTime($row,$col++,$value,'db_time');
}
else if (is_numeric($value)){
$sheet->writeNumber($row,$col++,$value);
}
else{
$sheet->writeString($row,$col++,$value);
}
}
}
return true;
}
function EWXcheckDriverDB($driver){
if (!extension_loaded($driver)){
$this->addError('Database','DB driver "'.$driver.'" could not be loaded');
return false;
}
return true;
}
function EWXcreateStylesDB(&$xml){
if ($xml->checkStyleID('db_header')){
$sHeader = $xml->addStyle('db_header');
$sHeader->fontBold();
$sHeader->fontFamily('Swiss');
$sHeader->fontColor('0000FF');
}
if ($xml->checkStyleID('db_datetime')){
$hDateTime = $xml->addStyle('db_datetime');
$hDateTime->numberFormatDateTime();
}
if ($xml->checkStyleID('db_date')){
$hDate = $xml->addStyle('db_date');
$hDate->numberFormatDate();
}
if ($xml->checkStyleID('db_time')){
$hTime = $xml->addStyle('db_time');
$hTime->numberFormatTime();
}
}
?>
|