<?php
/*
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; under version 2
 * of the License (non-upgradable).
 *
 * 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 General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 *
 * Copyright (c) 2008-2010 (original work) Deutsche Institut für Internationale Pädagogische Forschung (under the project TAO-TRANSFER);
 *               2009-2012 (update and modification) Public Research Centre Henri Tudor (under the project TAO-SUSTAIN & TAO-DEV);
 *               2017 (update and modification) Open Assessment Technologies SA (under the project TAO-PRODUCT);
 */
error_reporting(E_ALL);

use oat\generis\model\GenerisRdf;
use oat\generis\model\OntologyRdfs;
use oat\generis\model\RulesRdf;
use oat\generis\test\GenerisPhpUnitTestRunner;

class TermTest extends GenerisPhpUnitTestRunner
{


    public function setUp(): void
    {
        GenerisPhpUnitTestRunner::initTest();
    }

    public function testEvaluate()
    {


        //bad term
        $badTermResource = core_kernel_classes_ResourceFactory::create(
            new core_kernel_classes_Class(RulesRdf::CLASS_TERM),
            'bad term',
            __METHOD__
        );
        $badTerm = new core_kernel_rules_Term($badTermResource->getUri());
        try {
            $badTerm->evaluate();
            $this->fail('should raise exception : Forbidden type');
        } catch (common_Exception $e) {
            $this->assertEquals($e->getMessage(), 'Forbidden Type of Term');
        }

        // eval const
        $constantResource = core_kernel_rules_TermFactory::createConst('test1');
        $term = $constantResource->evaluate();
        $this->assertIsA($term, 'core_kernel_classes_Literal');
        $this->assertEquals($term, 'test1');
        $constantResource->delete();

        //eval SPX
        $booleanClass = new core_kernel_classes_Class(GenerisRdf::GENERIS_BOOLEAN);

        $maybe = core_kernel_classes_ResourceFactory::create($booleanClass, 'testCase testCreateSPX', __METHOD__);
        $SPXResource = core_kernel_rules_TermFactory::createSPX($maybe, new core_kernel_classes_Property(OntologyRdfs::RDFS_COMMENT));
        $spxResult = $SPXResource->evaluate();
        $this->assertIsA($spxResult, 'core_kernel_classes_Literal');
        $this->assertEquals($spxResult, __METHOD__);

        // eval operation
        $constant5 = core_kernel_rules_TermFactory::createConst('5');
        $constant12 = core_kernel_rules_TermFactory::createConst('12');
        $operation = core_kernel_rules_OperationFactory::createOperation(
            $constant5,
            $constant12,
            new core_kernel_classes_Resource(RulesRdf::INSTANCE_OPERATOR_ADD)
        );
        $operationTerm = new core_kernel_rules_Term($operation->getUri());
        $result = $operationTerm->evaluate();
        $this->assertEquals($result->literal, '17');


        $fakeTerm = new core_kernel_rules_Term($maybe->getUri());
        try {
            $fakeTerm->evaluate();
            $this->fail('should raise exception : Forbidden type');
        } catch (common_Exception $e) {
            $this->assertEquals($e->getMessage(), 'problem evaluating Term');
        }

        $badTermResource->delete();
        $constant5->delete();
        $constant12->delete();
        $SPXResource->delete();
        $operation->delete();
        $maybe->delete();
    }
}