<?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>";