2 // This file is part of Moodle - http://moodle.org/
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
9 // Moodle is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 // GNU General Public License for more details.
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
21 * @copyright 2015 Andrew Hancox <andrewdchancox@googlemail.com>
22 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
25 require_once(__DIR__
. "/../../config.php");
27 $id = required_param('id', PARAM_INT
); // Course module ID.
28 $cm = get_coursemodule_from_id('folder', $id, 0, true, MUST_EXIST
);
30 $course = $DB->get_record('course', array('id' => $cm->course
), '*', MUST_EXIST
);
32 require_course_login($course, true, $cm);
33 $context = context_module
::instance($cm->id
);
34 require_capability('mod/folder:view', $context);
36 $folder = $DB->get_record('folder', array('id' => $cm->instance
), '*', MUST_EXIST
);
38 $downloadable = folder_archive_available($folder, $cm);
40 print_error('cannotdownloaddir', 'repository');
43 $fs = get_file_storage();
44 $files = $fs->get_area_files($context->id
, 'mod_folder', 'content');
46 print_error('cannotdownloaddir', 'repository');
49 // Log zip as downloaded.
50 folder_downloaded($folder, $course, $cm, $context);
53 \core\session\manager
::write_close();
55 $foldername = format_string($folder->name
, true, ["context" => $context]);
56 $filename = shorten_filename(clean_filename($foldername . "-" . date("Ymd")) . ".zip");
57 $zipwriter = \core_files\archive_writer
::get_stream_writer($filename, \core_files\archive_writer
::ZIP_WRITER
);
59 foreach ($files as $file) {
60 if ($file->is_directory()) {
63 $pathinzip = $file->get_filepath() . $file->get_filename();
64 $zipwriter->add_file_from_stored_file($pathinzip, $file);
67 // Finish the archive.