Wednesday 10 February 2016

Moodle: Create zip file with all course resources

Hello,

How to create a zip file with all resource modules of a course:

<?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/>.

require_once('../../config.php');

$id = required_param('id', PARAM_INT);

$course = get_course($id);
if (!$course) {
    die();
}

$context = context_course::instance($course->id);

require_login($course);

$filename = 'contents.zip';
$new_names = array();

// Get files resources
$query_resources = "SELECT {resource}.*
FROM {resource}, {course_modules}, {modules}
WHERE {course_modules}.instance = {resource}.id
AND {modules}.id = {course_modules}.module
AND {modules}.name = 'resource'
AND {resource}.course = ?
AND {course_modules}.course = ?";
$resources = $DB->get_records_sql($query_resources, array($course->id, $course->id));

foreach ($resources as $resource) {
    $cm = get_coursemodule_from_instance('resource', $resource->id, $resource->course, false, MUST_EXIST);
    $context_resource = context_module::instance($cm->id);
    $fs = get_file_storage();
    
    $resource_files = $fs->get_area_files($context_resource->id, 'mod_resource', 'content', 0, 'sortorder DESC, id ASC', false);
    if (count($resource_files) < 1) continue;
    
    $resource_file = reset($resource_files);
    unset($resource_files);
    
    $contenthash = $resource_file->get_contenthash();
    $l1 = $contenthash[0].$contenthash[1];
    $l2 = $contenthash[2].$contenthash[3];
    $filedir = ((isset($CFG->filedir))) ? $CFG->filedir : $CFG->dataroot.'/filedir';
    $path = "$filedir/$l1/$l2/$contenthash";
    
    $new_names['/'.$resource->name.'/'.$resource_file->get_filename()] = $path;
}
// End get files resources

// Create zip file
$packer = get_file_packer('application/zip');
$fs = get_file_storage();
$result = $packer->archive_to_storage($new_names, $context->id, 'local_zip', 'zip_files', 0, '/', $filename);
// End Create zip file

print_r($result);

Best regards,
Iban Cardona.

Tuesday 2 February 2016

Moodle: Use config.php vars (CFG) loading minimum data

Hello,

Sometimes, in a custom moodle script or in your local plugin you need $CFG vars but you don't need all moodle features.
The best option is write:

<?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/>.

define('NO_DEBUG_DISPLAY', true);
define('ABORT_AFTER_CONFIG', true);
require_once('../../config.php');

...

With this code, you could, for example, execute echo $CFG->dbhost

Best regards,
Iban Cardona.