. * * For more information, contact Colosa Inc, 2566 Le Jeune Rd., * Coral Gables, FL, 33134, USA, or email info@colosa.com. * */ if ( !defined ('PATH_THIRDPARTY') ) { require_once( $_SERVER['PWD']. '/test/bootstrap/unit.php'); } require_once( PATH_THIRDPARTY . 'lime/lime.php'); define ( 'G_ENVIRONMENT', G_TEST_ENV); require_once( PATH_CORE . 'config' . PATH_SEP . 'environments.php'); global $G_ENVIRONMENTS; if ( isset ( $G_ENVIRONMENTS ) ) { $dbfile = $G_ENVIRONMENTS[ G_TEST_ENV ][ 'dbfile']; if ( !file_exists ( $dbfile ) ) { printf("%s \n", pakeColor::colorize( "dbfile $dbfile doesn't exist for environment " . G_ENVIRONMENT , 'ERROR')); exit (200); } else include ( $dbfile ); } else exit (201); G::LoadThirdParty('pear/json','class.json'); G::LoadThirdParty('smarty/libs','Smarty.class'); G::LoadSystem ( 'xmlform'); G::LoadSystem ( 'xmlDocument'); G::LoadSystem ( 'form'); G::LoadSystem ( 'xmlDocument'); $t = new lime_test(11, new lime_output_color()); $obj = new Xml_Node( 'name', 'type', 'value' ); $method = array ( ); $testItems = 0; $class_methods = get_class_methods('Xml_Node'); foreach ($class_methods as $method_name) { $methods[ $testItems ] = $method_name; $testItems++; } $t->diag('class Xml_Node' ); $t->is( $testItems , 8, "class Xml_Node " . $testItems . " methods." ); $t->isa_ok( $obj , 'Xml_Node' , 'class Xml_Node created'); $t->can_ok( $obj , 'addAttribute', 'addAttribute()'); $t->can_ok( $obj , 'addChildNode', 'addChildNode()'); $t->can_ok( $obj , 'toTree' , 'toTree()'); $t->can_ok( $obj , 'findNode' , 'findNode()'); $t->can_ok( $obj , 'getXML' , 'getXML()'); $obj = new Xml_document( 'name', 'type', 'value' ); $t->diag('class Xml_document' ); $t->isa_ok( $obj , 'Xml_document', 'class Xml_document created'); $t->can_ok( $obj , 'parseXmlFile', 'parseXmlFile()'); $t->can_ok( $obj , 'getXML' , 'getXML()'); $t->todo( 'review all pendings in this class');