<?php
// This file is part of Moodle - http://moodle.org/
//
// Moodle 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, either version 3 of the License, or
// (at your option) any later version.
//
// Moodle 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 Moodle.  If not, see <http://www.gnu.org/licenses/>.

/**
 * IMSCP external API
 *
 * @package    mod_imscp
 * @category   external
 * @copyright  2015 Juan Leyva <juan@moodle.com>
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 * @since      Moodle 3.0
 */


< defined('MOODLE_INTERNAL') || die;
< 
< require_once("$CFG->libdir/externallib.php");



> use core_course\external\helper_for_get_mods_by_courses;
> use core_external\external_api;
> use core_external\external_function_parameters;
> use core_external\external_multiple_structure;
> use core_external\external_single_structure;
> use core_external\external_value;
> use core_external\external_warnings;
> use core_external\util;



/**
 * IMSCP external functions
 *
 * @package    mod_imscp
 * @category   external
 * @copyright  2015 Juan Leyva <juan@moodle.com>
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 * @since      Moodle 3.0
 */
class mod_imscp_external extends external_api {

    /**
     * Returns description of method parameters
     *
     * @return external_function_parameters
     * @since Moodle 3.0
     */
    public static function view_imscp_parameters() {
        return new external_function_parameters(
            array(
                'imscpid' => new external_value(PARAM_INT, 'imscp instance id')
            )
        );
    }

    /**
     * Simulate the imscp/view.php web interface page: trigger events, completion, etc...
     *
     * @param int $imscpid the imscp instance id
     * @return array of warnings and status result
     * @since Moodle 3.0
     * @throws moodle_exception
     */
    public static function view_imscp($imscpid) {
        global $DB, $CFG;
        require_once($CFG->dirroot . "/mod/imscp/lib.php");

        $params = self::validate_parameters(self::view_imscp_parameters(),
                                            array(
                                                'imscpid' => $imscpid
                                            ));
        $warnings = array();

        // Request and permission validation.
        $imscp = $DB->get_record('imscp', array('id' => $params['imscpid']), '*', MUST_EXIST);
        list($course, $cm) = get_course_and_cm_from_instance($imscp, 'imscp');

        $context = context_module::instance($cm->id);
        self::validate_context($context);

        require_capability('mod/imscp:view', $context);

        // Call the imscp/lib API.
        imscp_view($imscp, $course, $cm, $context);

        $result = array();
        $result['status'] = true;
        $result['warnings'] = $warnings;
        return $result;
    }

    /**
     * Returns description of method result value
     *

<      * @return external_description



>      * @return \core_external\external_description


     * @since Moodle 3.0
     */
    public static function view_imscp_returns() {
        return new external_single_structure(
            array(
                'status' => new external_value(PARAM_BOOL, 'status: true if success'),
                'warnings' => new external_warnings()
            )
        );
    }

    /**
     * Describes the parameters for get_imscps_by_courses.
     *
     * @return external_function_parameters
     * @since Moodle 3.0
     */
    public static function get_imscps_by_courses_parameters() {
        return new external_function_parameters (
            array(
                'courseids' => new external_multiple_structure(
                    new external_value(PARAM_INT, 'course id'), 'Array of course ids', VALUE_DEFAULT, array()
                ),
            )
        );
    }

    /**
     * Returns a list of IMSCP packages in a provided list of courses,
     * if no list is provided all IMSCP packages that the user can view will be returned.
     *
     * @param array $courseids the course ids
     * @return array of IMSCP packages details and possible warnings
     * @since Moodle 3.0
     */
    public static function get_imscps_by_courses($courseids = array()) {
        global $CFG;

        $returnedimscps = array();
        $warnings = array();

        $params = self::validate_parameters(self::get_imscps_by_courses_parameters(), array('courseids' => $courseids));

        $courses = array();
        if (empty($params['courseids'])) {
            $courses = enrol_get_my_courses();
            $params['courseids'] = array_keys($courses);
        }

        // Ensure there are courseids to loop through.
        if (!empty($params['courseids'])) {


<             list($courses, $warnings) = external_util::validate_courses($params['courseids'], $courses);



>             list($courses, $warnings) = util::validate_courses($params['courseids'], $courses);



            // Get the imscps in this course, this function checks users visibility permissions.
            // We can avoid then additional validate_context calls.
            $imscps = get_all_instances_in_courses("imscp", $courses);
            foreach ($imscps as $imscp) {

<                 $context = context_module::instance($imscp->coursemodule);
< 
<                 // Entry to return.
<                 $imscpdetails = array();
<                 // First, we return information that any user can see in the web interface.
<                 $imscpdetails['id'] = $imscp->id;
<                 $imscpdetails['coursemodule']      = $imscp->coursemodule;
<                 $imscpdetails['course']            = $imscp->course;
<                 $imscpdetails['name']              = external_format_string($imscp->name, $context->id);
< 
<                 if (has_capability('mod/imscp:view', $context)) {
<                     // Format intro.
<                     $options = array('noclean' => true);
<                     list($imscpdetails['intro'], $imscpdetails['introformat']) =
<                         external_format_text($imscp->intro, $imscp->introformat, $context->id, 'mod_imscp', 'intro', null,
<                             $options);
<                     $imscpdetails['introfiles'] = external_util::get_area_files($context->id, 'mod_imscp', 'intro', false, false);
<                 }



>                 $imscpdetails = helper_for_get_mods_by_courses::standard_coursemodule_element_values(
>                         $imscp, 'mod_imscp', 'moodle/course:manageactivities', 'mod/imscp:view');




<                 if (has_capability('moodle/course:manageactivities', $context)) {



>                 if (has_capability('moodle/course:manageactivities', context_module::instance($imscp->coursemodule))) {


                    $imscpdetails['revision']      = $imscp->revision;
                    $imscpdetails['keepold']       = $imscp->keepold;
                    $imscpdetails['structure']     = $imscp->structure;
                    $imscpdetails['timemodified']  = $imscp->timemodified;

<                     $imscpdetails['section']       = $imscp->section;
<                     $imscpdetails['visible']       = $imscp->visible;
<                     $imscpdetails['groupmode']     = $imscp->groupmode;
<                     $imscpdetails['groupingid']    = $imscp->groupingid;


                }
                $returnedimscps[] = $imscpdetails;
            }
        }
        $result = array();
        $result['imscps'] = $returnedimscps;
        $result['warnings'] = $warnings;
        return $result;
    }

    /**
     * Describes the get_imscps_by_courses return value.
     *
     * @return external_single_structure
     * @since Moodle 3.0
     */
    public static function get_imscps_by_courses_returns() {
        return new external_single_structure(
            array(
                'imscps' => new external_multiple_structure(

<                     new external_single_structure(
<                         array(
<                             'id' => new external_value(PARAM_INT, 'IMSCP id'),
<                             'coursemodule' => new external_value(PARAM_INT, 'Course module id'),
<                             'course' => new external_value(PARAM_INT, 'Course id'),
<                             'name' => new external_value(PARAM_RAW, 'Activity name'),
<                             'intro' => new external_value(PARAM_RAW, 'The IMSCP intro', VALUE_OPTIONAL),
<                             'introformat' => new external_format_value('intro', VALUE_OPTIONAL),
<                             'introfiles' => new external_files('Files in the introduction text', VALUE_OPTIONAL),



>                     new external_single_structure(array_merge(
>                         helper_for_get_mods_by_courses::standard_coursemodule_elements_returns(true),
>                         [


                            'revision' => new external_value(PARAM_INT, 'Revision', VALUE_OPTIONAL),
                            'keepold' => new external_value(PARAM_INT, 'Number of old IMSCP to keep', VALUE_OPTIONAL),
                            'structure' => new external_value(PARAM_RAW, 'IMSCP structure', VALUE_OPTIONAL),
                            'timemodified' => new external_value(PARAM_RAW, 'Time of last modification', VALUE_OPTIONAL),

<                             'section' => new external_value(PARAM_INT, 'Course section id', VALUE_OPTIONAL),
<                             'visible' => new external_value(PARAM_BOOL, 'If visible', VALUE_OPTIONAL),
<                             'groupmode' => new external_value(PARAM_INT, 'Group mode', VALUE_OPTIONAL),
<                             'groupingid' => new external_value(PARAM_INT, 'Group id', VALUE_OPTIONAL),
<                         ), 'IMS content packages'
<                     )



>                         ]
>                     ), 'IMS content packages')


                ),
                'warnings' => new external_warnings(),
            )
        );
    }

}