<?php
/**
 * classHeadPublisherTest.php
 *
 * ProcessMaker Open Source Edition
 * Copyright (C) 2004 - 2008 Colosa Inc.23
 *
 * This program is free software: you can redistribute it and/or modify
 * it under the terms of the GNU Affero General Public License as
 * published by the Free Software Foundation, either version 3 of the
 * License, or (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Affero General Public License for more details.
 *
 * You should have received a copy of the GNU Affero General Public License
 * along with this program.  If not, see <http://www.gnu.org/licenses/>.
 *
 * 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 ( 'headPublisher');
		$counter=1;
		$t = new lime_test( 13 , new lime_output_color());
		
		$obj =& headPublisher::getSingleton();
		
		$method = array ( );
		$testItems = 0;
		$methods = get_class_methods('headPublisher');
		
		$t->diag('class headPublisher' );
		$t->is(  10 ,count($methods) ,  "class headPublisher " . count($methods) . " methods." );
		$t->isa_ok( $obj, 		 'headPublisher',    $counter++.' class headPublisher created');
		$t->can_ok( $obj,      'getSingleton',     $counter++.' getSingleton()');
		$t->can_ok( $obj,      'setTitle',   			 $counter++.' setTitle()');
		$t->can_ok( $obj,      'addScriptFile',    $counter++.' addScriptFile()');
		$t->can_ok( $obj,      'addInstanceModule',$counter++.' addInstanceModule()');
		$t->can_ok( $obj,      'addClassModule',   $counter++.' addClassModule()');
		$t->can_ok( $obj,      'addScriptCode',  	 $counter++.' addScriptCode()');
		$t->can_ok( $obj,      'printHeader',   	 $counter++.' printHeader()');
		$t->can_ok( $obj,      'printRawHeader',   $counter++.' printRawHeader()');
		$t->can_ok( $obj,      'clearScripts',   	 $counter++.' clearScripts()');
		$t->is(  count($methods) ,--$counter ,  " methods ". $counter." OK" );
		$t->todo(  'review all pendings in this class');