<?php
function addNodox($obj, $padre, $indice, $contenido='', $atributos)
{ 
  if(is_object($padre))
   { 
   	 if($contenido=='')
  	 		$nodo = $obj->createElement($indice);
  	 else		
  	 		$nodo = $obj->createElement($indice, $contenido);  	 
  	 		
  	 $padre->appendChild($nodo);  	
   }
  else
   { if($contenido=='')
  	 		$nodo = $obj->createElement($indice);
  	 else		
  	 		$nodo = $obj->createElement($indice, $contenido);		
     
     $obj->appendChild($nodo); 
   }	
  if(is_array($atributos)) 
   {
  		foreach($atributos as $key => $value)
  			{  
  					$atributo = $obj->createAttribute($key);
						$nodo->appendChild($atributo);
						
						$texto = $obj->createTextNode($value);
						$atributo->appendChild($texto);   
  			}
   }			 
  return $nodo;
}

function derivationRules($aRoute, $doc, $nodo_derivationrule)
{   $tam = count($aRoute);
	  $c=0; 	  
		switch($aRoute[$c]['ROU_TYPE'])
		{
		 	case 'SEQUENTIAL':
		 		$nodo_routeType = addNodox($doc, $nodo_derivationrule, 'Sequential', '', '');
  			$nodo_nexttask  = addNodox($doc, $nodo_routeType, 'NextTask', '', '');  			
  			if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
  		  break;
		  case 'EVALUATE':		    
		    $nodo_routeType = addNodox($doc, $nodo_derivationrule, 'Evaluations', '', '');
		    while($c < $tam)
		    {
			    $nodo_evaluation= addNodox($doc, $nodo_routeType, 'Evaluation', '', array('Condition'=> $aRoute[$c]['ROU_CONDITION']));  			
	  			$nodo_nexttask  = addNodox($doc, $nodo_evaluation, 'NextTask', '', '');  			
	  			if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			  else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
	  			$c++;
  		  }  		  
  			break;
		 	case 'SELECT':
		 		$nodo_routeType = addNodox($doc, $nodo_derivationrule, 'Selections', '', '');
		    while($c < $tam)
		    {
		    	$nodo_selection= addNodox($doc, $nodo_routeType, 'Selection', '', array('Description'=> $aRoute[$c]['ROU_CONDITION']));  			
  				$nodo_nexttask  = addNodox($doc, $nodo_selection, 'NextTask', '', '');  			
  				if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			  else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
  				$c++;
  			}	  			
  			break;
		 	case 'PARALLEL':
		 		$nodo_routeType = addNodox($doc, $nodo_derivationrule, 'ParallelForks', '', '');
		    while($c < $tam)
		    {       
		    	$nodo_parallelfork= addNodox($doc, $nodo_routeType, 'ParallelFork', '', '');  			
  				$nodo_nexttask  = addNodox($doc, $nodo_parallelfork, 'NextTask', '', '');  			
  				if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			  else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
  				$c++;
  			}	  			
  			break;
		 	case 'PARALLEL-BY-EVALUATION':
		 		$nodo_routeType = addNodox($doc, $nodo_derivationrule, 'ParallelForksByEvaluation', '', '');
		 		while($c < $tam)
		    {  
		    	$nodo_evaluation= addNodox($doc, $nodo_routeType, 'Evaluation', '', array('Condition'=> $aRoute[$c]['ROU_CONDITION']));  			
  			  $nodo_nexttask  = addNodox($doc, $nodo_evaluation, 'NextTask', '', '');  			  			
  			  if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			  else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
  			  $c++;
  			}    			
		 	  break;		 	
		 	case 'SEC-JOIN':
		 		$nodo_routeType = addNodox($doc, $nodo_derivationrule, 'ParallelJoin', '', '');
  			$nodo_nexttask  = addNodox($doc, $nodo_routeType, 'NextTask', '', '');  			  			
  			if($aRoute[$c]['ROU_NEXT_TASK'] != -1)
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'TaskRef', '', array('TaskId'=> 'ID'.$aRoute[$c]['ROU_NEXT_TASK']));
  			else
  					$nodo_taskref = addNodox($doc, $nodo_nexttask, 'End', '', ''); 
		 	  break;
		}							 		
}

/****-_--__---___----___---__--_-****/

G::LoadClass('tasks');
require_once 'classes/model/Process.php';		  	

$doc = new DOMDocument('1.0', 'UTF-8');
$nodo_padre = addNodox($doc, '', 'Processes', '', array('xmlns:xsi'=>'http://www.w3.org/2001/XMLSchema-instance','xsi:noNamespaceSchemaLocation'=>'ColosaSchema.xsd'));

$aProcesses   = array();
$oCriteria = new Criteria('workflow');
$oCriteria->addSelectColumn(ProcessPeer::PRO_UID);
//$oCriteria->add(ProcessPeer::PRO_STATUS, 'DISABLED', Criteria::NOT_EQUAL);
//$oCriteria->add(ProcessPeer::PRO_UID, '946679494980c3d0ba0814088444708');
$oDataset = ProcessPeer::doSelectRS($oCriteria);
$oDataset->setFetchmode(ResultSet::FETCHMODE_ASSOC);
$oDataset->next();
$oProcess = new Process();    

while ($aRow = $oDataset->getRow()) {
  $aProcess     = $oProcess->load($aRow['PRO_UID']);    
  $nodo_process = addNodox($doc, $nodo_padre, 'Process', '', array('Title'=> $aProcess['PRO_TITLE'],'Description'=> $aProcess['PRO_DESCRIPTION']));  
  $nodo_tasks = addNodox($doc, $nodo_process, 'Tasks', '', '');
  
  $oTask = new Tasks();  
  $aTasks= $oTask->getAllTasks($aProcess['PRO_UID']);
  foreach($aTasks as $key => $value)
  { //print_r($value); echo "<br>";  	
  	$aRoute = $oTask->getRoute($aProcess['PRO_UID'], $value['TAS_UID']);  	  	
  	//print_r($aRoute[0]['ROU_UID']); echo "<hr>";  	
  	/*foreach($aRoute as $k => $v)
  			echo $k."-->".$v."<br>";
  	*/
  	if($value['TAS_TYPE']=='NORMAL')
  	 { 
  			$ini = ($value['TAS_START']=='TRUE') ? 'true' : 'false';
  					
  			$nodo_task = addNodox($doc, $nodo_tasks, 'Task', '', array('Title'=> $value['TAS_TITLE'],'Description'=> $value['TAS_DESCRIPTION'],'Id'=> 'ID'.$value['TAS_UID'],'StartingTask'=> $ini));    	
  			$nodo_coordinates = addNodox($doc, $nodo_task, 'Coordinates', '', array('XCoordinate'=> $value['TAS_POSX'],'YCoordinate'=> $value['TAS_POSY']));
  			$nodo_derivationrule = addNodox($doc, $nodo_task, 'DerivationRule', '', '');  			
  			  			  			
  			derivationRules($aRoute, $doc, $nodo_derivationrule);
  			
  			$nodo_assignmentrules = addNodox($doc, $nodo_task, 'AssignmentRules', '', '');
  			$nodo_cyclicalassignment = addNodox($doc, $nodo_assignmentrules, 'CyclicalAssignment', '', '');
  			$nodo_timingcontrol = addNodox($doc, $nodo_task, 'TimingControl', '', array('TaskDuration'=> $value['TAS_DURATION']));
  			$nodo_permissions = addNodox($doc, $nodo_task, 'Permissions', '', '');
  			$nodo_caselabels = addNodox($doc, $nodo_task, 'CaseLabels', '', '');
  			$nodo_notifications = addNodox($doc, $nodo_task, 'Notifications', '', '');  		
  	 } 
  	 else
  	 {	require_once ( "classes/model/SubProcess.php" );  	 	
				$oCriteria = new Criteria('workflow');			
				$oCriteria->add(SubProcessPeer::PRO_PARENT, $value['PRO_UID']);
				$oCriteria->add(SubProcessPeer::TAS_PARENT, $value['TAS_UID']);
				$oDataset = SubProcessPeer::doSelectRS($oCriteria);
				$oDataset->setFetchmode(ResultSet::FETCHMODE_ASSOC);
				$oDataset->next();
			  $aRow = $oDataset->getRow();  	 	  
  	 	  $nodo_task = addNodox($doc, $nodo_tasks, 'SubProcess', '', array('Title'=> $value['TAS_TITLE'],'Description'=> $value['TAS_DESCRIPTION'],'Id'=> 'ID'.$value['TAS_UID'], 'ProcessRef'=>$aRow['PRO_UID']));    		 	  	 	  
  	 	  $nodo_coordinates = addNodox($doc, $nodo_task, 'Coordinates', '', array('XCoordinate'=> $value['TAS_POSX'],'YCoordinate'=> $value['TAS_POSY']));
  			$nodo_derivationrule = addNodox($doc, $nodo_task, 'DerivationRule', '', '');
  			
  			derivationRules($aRoute, $doc, $nodo_derivationrule);
  	 }
  }  
	$oDataset->next();
}
//die;
$doc->preserveWhiteSpace = false;
$doc->formatOutput   = true;
$doc->save(PATH_METHODS.'services/test_xpdl.xml');
echo "xml for xpdl creado!!!<br>";
		
?>