xmlview.php

<?php

    /**
    *
    * A document generator, using XML -> XSLT transform to HTML
    *
	*
	* @package mod-project
	* @category mod
	* @author Yann Ducruy (yann[dot]ducruy[at]gmail[dot]com). Contact me if needed
	* @date 12/06/2015
	* @version 3.2
	* @license http://www.gnu.org/copyleft/gpl.html GNU Public License
	*
	*/
    /**
    * Requires and includes
    */
    require_once('../../config.php');
    require_once($CFG->dirroot.'/mod/project/lib.php');
    require_once($CFG->dirroot.'/mod/project/locallib.php');
/// fixes locale for all date printing.

    setLocale(LC_TIME, substr(current_language(), 0, 2));

/// get context information

    $id = required_param('id', PARAM_INT);   // module id
    $view = optional_param('view', '', PARAM_CLEAN);   // viewed page id
    $timenow = time();
    // get some useful stuff...
    if (! $cm = $DB->get_record('course_modules', array("id" => $id))) {
        error('Course Module ID was incorrect');
    }
    if (! $course = $DB->get_record('course', array('id' => $cm->course))) {
        error('Course is misconfigured');
    }
    if (! $project = $DB->get_record('project', array('id' => $cm->instance))) {
        error('Course module is incorrect');
    }
    require_login($course->id, false, $cm);
    $context = context_module::instance($cm->id);
/// check current group and change, for anyone who could
    if (!$groupmode = groupmode($course, $cm)){ // groups are being used ?
    	$currentGroupId = 0;
    } else {
        $changegroup = isset($_GET['group']) ? $_GET['group'] : -1;  // Group change requested?
        if (isguestuser()){ // for guests, use session
            if ($changegroup >= 0){
                $_SESSION['guestgroup'] = $changegroup;
            }
            $currentGroupId = 0 + @$_SESSION['guestgroup'];
        } else { // for normal users, change current group
            $currentGroupId = 0 + groups_get_course_group($course, true);
            if (!groups_is_member($currentGroupId , $USER->id) && !is_siteadmin()) $USER->editmode = "off";
        }
    }

/// get all information about the current project    

    $xml = project_get_full_xml($project, $currentGroupId);

/// invoke XSLT transformation for making the output document

    if (phpversion() >= 5.0){
        $xsl = new XSLTProcessor();
        $doc = new DOMDocument();
        $xsl_sheet = $project->xslfilter;
        $doc->load($xsl_sheet);
        $xsl->importStyleSheet($doc);
        $doc = DOMDocument::loadXML($xml);
        if (is_object($doc)){
            $html = $xsl->transformToXML($doc);
        } else {
            $formattedxml = htmlentities($xml, ENT_QUOTES, 'UTF-8');
            $formattedxmllines = explode("\n", $formattedxml);
            $html = "XML Generation Error";
            $html .="<hr/><pre>";
            $i = 1;
            foreach($formattedxmllines as $line){
                $html .= $i . " " . $line."\n";
                $i++;
            }
            $html .="</pre><hr/>";
        }
    } else {
        /*
        $arguments = array(
             '/_xml' => $xml,
        );
        $procesor = xslt_create();
        if ($html = xslt_process($processor, "arg:/_xml", $project->xslfilter, null, $arguments)){
        }
        else{
           $html = xslt_error($processor);
        }
        */
        echo $OUTPUT->notification("Php 4 implementation of XSL processing code has not been experimented.");
    }

/// deliver the document

    header("Content-Type:text/html\n\n");
    echo $html;
?>