<?php// Copyright (c) 2004-2005 ars Cognita Inc., all rights reserved/* ******************************************************************************    Released under both BSD license and Lesser GPL library license.  	Whenever there is any discrepancy between the two licenses,  	the BSD license will take precedence. *******************************************************************************//** * xmlschema is a class that allows the user to quickly and easily * build a database on any ADOdb-supported platform using a simple * XML schema. * * Last Editor: $Author: jlim $ * @author Richard Tango-Lowy & Dan Cech * @version $Revision: 1.62 $ * * @package axmls * @tutorial getting_started.pkg */ function _file_get_contents($file) { 	if (function_exists('file_get_contents')) return file_get_contents($file);		$f = fopen($file,'r');	if (!$f) return '';	$t = '';		while ($s = fread($f,100000)) $t .= $s;	fclose($f);	return $t;}/*** Debug on or off*/if( !defined( 'XMLS_DEBUG' ) ) {	define( 'XMLS_DEBUG', FALSE );}/*** Default prefix key*/if( !defined( 'XMLS_PREFIX' ) ) {	define( 'XMLS_PREFIX', '%%P' );}/*** Maximum length allowed for object prefix*/if( !defined( 'XMLS_PREFIX_MAXLEN' ) ) {	define( 'XMLS_PREFIX_MAXLEN', 10 );}/*** Execute SQL inline as it is generated*/if( !defined( 'XMLS_EXECUTE_INLINE' ) ) {	define( 'XMLS_EXECUTE_INLINE', FALSE );}/*** Continue SQL Execution if an error occurs?*/if( !defined( 'XMLS_CONTINUE_ON_ERROR' ) ) {	define( 'XMLS_CONTINUE_ON_ERROR', FALSE );}/*** Current Schema Version*/if( !defined( 'XMLS_SCHEMA_VERSION' ) ) {	define( 'XMLS_SCHEMA_VERSION', '0.3' );}/*** Default Schema Version.  Used for Schemas without an explicit version set.*/if( !defined( 'XMLS_DEFAULT_SCHEMA_VERSION' ) ) {	define( 'XMLS_DEFAULT_SCHEMA_VERSION', '0.1' );}/*** How to handle data rows that already exist in a database during and upgrade.* Options are INSERT (attempts to insert duplicate rows), UPDATE (updates existing* rows) and IGNORE (ignores existing rows).*/if( !defined( 'XMLS_MODE_INSERT' ) ) {	define( 'XMLS_MODE_INSERT', 0 );}if( !defined( 'XMLS_MODE_UPDATE' ) ) {	define( 'XMLS_MODE_UPDATE', 1 );}if( !defined( 'XMLS_MODE_IGNORE' ) ) {	define( 'XMLS_MODE_IGNORE', 2 );}if( !defined( 'XMLS_EXISTING_DATA' ) ) {	define( 'XMLS_EXISTING_DATA', XMLS_MODE_INSERT );}/*** Default Schema Version.  Used for Schemas without an explicit version set.*/if( !defined( 'XMLS_DEFAULT_UPGRADE_METHOD' ) ) {	define( 'XMLS_DEFAULT_UPGRADE_METHOD', 'ALTER' );}/*** Include the main ADODB library*/if( !defined( '_ADODB_LAYER' ) ) {	require( 'adodb.inc.php' );	require( 'adodb-datadict.inc.php' );}/*** Abstract DB Object. This class provides basic methods for database objects, such* as tables and indexes.** @package axmls* @access private*/class dbObject {		/**	* var object Parent	*/	var $parent;		/**	* var string current element	*/	var $currentElement;		/**	* NOP	*/	function dbObject( &$parent, $attributes = NULL ) {		$this->parent =& $parent;	}		/**	* XML Callback to process start elements	*	* @access private	*/	function _tag_open( &$parser, $tag, $attributes ) {			}		/**	* XML Callback to process CDATA elements	*	* @access private	*/	function _tag_cdata( &$parser, $cdata ) {			}		/**	* XML Callback to process end elements	*	* @access private	*/	function _tag_close( &$parser, $tag ) {			}		function create() {		return array();	}		/**	* Destroys the object	*/	function destroy() {		unset( $this );	}		/**	* Checks whether the specified RDBMS is supported by the current	* database object or its ranking ancestor.	*	* @param string $platform RDBMS platform name (from ADODB platform list).	* @return boolean TRUE if RDBMS is supported; otherwise returns FALSE.	*/	function supportedPlatform( $platform = NULL ) {		return is_object( $this->parent ) ? $this->parent->supportedPlatform( $platform ) : TRUE;	}		/**	* Returns the prefix set by the ranking ancestor of the database object.	*	* @param string $name Prefix string.	* @return string Prefix.	*/	function prefix( $name = '' ) {		return is_object( $this->parent ) ? $this->parent->prefix( $name ) : $name;	}		/**	* Extracts a field ID from the specified field.	*	* @param string $field Field.	* @return string Field ID.	*/	function FieldID( $field ) {		return strtoupper( preg_replace( '/^`(.+)`$/', '$1', $field ) );	}}/*** Creates a table object in ADOdb's datadict format** This class stores information about a database table. As charactaristics* of the table are loaded from the external source, methods and properties* of this class are used to build up the table description in ADOdb's* datadict format.** @package axmls* @access private*/class dbTable extends dbObject {		/**	* @var string Table name	*/	var $name;		/**	* @var array Field specifier: Meta-information about each field	*/	var $fields = array();		/**	* @var array List of table indexes.	*/	var $indexes = array();		/**	* @var array Table options: Table-level options	*/	var $opts = array();		/**	* @var string Field index: Keeps track of which field is currently being processed	*/	var $current_field;		/**	* @var boolean Mark table for destruction	* @access private	*/	var $drop_table;		/**	* @var boolean Mark field for destruction (not yet implemented)	* @access private	*/	var $drop_field = array();		/**	* @var array Platform-specific options	* @access private	*/	var $currentPlatform = true;			/**	* Iniitializes a new table object.	*	* @param string $prefix DB Object prefix	* @param array $attributes Array of table attributes.	*/	function dbTable( &$parent, $attributes = NULL ) {		$this->parent =& $parent;		$this->name = $this->prefix($attributes['NAME']);	}		/**	* XML Callback to process start elements. Elements currently 	* processed are: INDEX, DROP, FIELD, KEY, NOTNULL, AUTOINCREMENT & DEFAULT. 	*	* @access private	*/	function _tag_open( &$parser, $tag, $attributes ) {		$this->currentElement = strtoupper( $tag );				switch( $this->currentElement ) {			case 'INDEX':				if( !isset( $attributes['PLATFORM'] ) OR $this->supportedPlatform( $attributes['PLATFORM'] ) ) {					xml_set_object( $parser, $this->addIndex( $attributes ) );				}				break;			case 'DATA':				if( !isset( $attributes['PLATFORM'] ) OR $this->supportedPlatform( $attributes['PLATFORM'] ) ) {					xml_set_object( $parser, $this->addData( $attributes ) );				}				break;			case 'DROP':				$this->drop();				break;			case 'FIELD':				// Add a field				$fieldName = $attributes['NAME'];				$fieldType = $attributes['TYPE'];				$fieldSize = isset( $attributes['SIZE'] ) ? $attributes['SIZE'] : NULL;				$fieldOpts = !empty( $attributes['OPTS'] ) ? $attributes['OPTS'] : NULL;								$this->addField( $fieldName, $fieldType, $fieldSize, $fieldOpts );				break;			case 'KEY':			case 'NOTNULL':			case 'AUTOINCREMENT':			case 'DEFDATE':			case 'DEFTIMESTAMP':			case 'UNSIGNED':				// Add a field option				$this->addFieldOpt( $this->current_field, $this->currentElement );				break;			case 'DEFAULT':				// Add a field option to the table object								// Work around ADOdb datadict issue that misinterprets empty strings.				if( $attributes['VALUE'] == '' ) {					$attributes['VALUE'] = " '' ";				}								$this->addFieldOpt( $this->current_field, $this->currentElement, $attributes['VALUE'] );				break;			case 'OPT':			case 'CONSTRAINT':				// Accept platform-specific options				$this->currentPlatform = ( !isset( $attributes['PLATFORM'] ) OR $this->supportedPlatform( $attributes['PLATFORM'] ) );				break;			default:				// print_r( array( $tag, $attributes ) );		}	}		/**	* XML Callback to process CDATA elements	*	* @access private	*/	function _tag_cdata( &$parser, $cdata ) {		switch( $this->currentElement ) {			// Table/field constraint			case 'CONSTRAINT':				if( isset( $this->current_field ) ) {					$this->addFieldOpt( $this->current_field, $this->currentElement, $cdata );				} else {					$this->addTableOpt( $cdata );				}				break;			// Table/field option			case 'OPT':				if( isset( $this->current_field ) ) {					$this->addFieldOpt( $this->current_field, $cdata );				} else {				$this->addTableOpt( $cdata );				}				break;			default:						}	}		/**	* XML Callback to process end elements	*	* @access private	*/	function _tag_close( &$parser, $tag ) {		$this->currentElement = '';				switch( strtoupper( $tag ) ) {			case 'TABLE':				$this->parent->addSQL( $this->create( $this->parent ) );				xml_set_object( $parser, $this->parent );				$this->destroy();				break;			case 'FIELD':				unset($this->current_field);				break;			case 'OPT':			case 'CONSTRAINT':				$this->currentPlatform = true;				break;			default:		}	}		/**	* Adds an index to a table object	*	* @param array $attributes Index attributes	* @return object dbIndex object	*/	function &addIndex( $attributes ) {		$name = strtoupper( $attributes['NAME'] );		$this->indexes[$name] =& new dbIndex( $this, $attributes );		return $this->indexes[$name];	}		/**	* Adds data to a table object	*	* @param array $attributes Data attributes	* @return object dbData object	*/	function &addData( $attributes ) {		if( !isset( $this->data ) ) {			$this->data =& new dbData( $this, $attributes );		}		return $this->data;	}		/**	* Adds a field to a table object	*	* $name is the name of the table to which the field should be added. 	* $type is an ADODB datadict field type. The following field types	* are supported as of ADODB 3.40:	* 	- C:  varchar	*	- X:  CLOB (character large object) or largest varchar size	*	   if CLOB is not supported	*	- C2: Multibyte varchar	*	- X2: Multibyte CLOB	*	- B:  BLOB (binary large object)	*	- D:  Date (some databases do not support this, and we return a datetime type)	*	- T:  Datetime or Timestamp	*	- L:  Integer field suitable for storing booleans (0 or 1)	*	- I:  Integer (mapped to I4)	*	- I1: 1-byte integer	*	- I2: 2-byte integer	*	- I4: 4-byte integer	*	- I8: 8-byte integer	*	- F:  Floating point number	*	- N:  Numeric or decimal number	*	* @param string $name Name of the table to which the field will be added.	* @param string $type	ADODB datadict field type.	* @param string $size	Field size	* @param array $opts	Field options array	* @return array Field specifier array	*/	function addField( $name, $type, $size = NULL, $opts = NULL ) {		$field_id = $this->FieldID( $name );				// Set the field index so we know where we are		$this->current_field = $field_id;				// Set the field name (required)		$this->fields[$field_id]['NAME'] = $name;				// Set the field type (required)		$this->fields[$field_id]['TYPE'] = $type;				// Set the field size (optional)		if( isset( $size ) ) {			$this->fields[$field_id]['SIZE'] = $size;		}				// Set the field options		if( isset( $opts ) ) {			$this->fields[$field_id]['OPTS'] = array($opts);		} else {			$this->fields[$field_id]['OPTS'] = array();		}	}		/**	* Adds a field option to the current field specifier	*	* This method adds a field option allowed by the ADOdb datadict 	* and appends it to the given field.	*	* @param string $field	Field name