Search moodle.org's
Developer Documentation

See Release Notes
Long Term Support Release

  • Bug fixes for general core bugs in 4.1.x will end 13 November 2023 (12 months).
  • Bug fixes for security issues in 4.1.x will end 10 November 2025 (36 months).
  • PHP version: minimum PHP 7.4.0 Note: minimum PHP version has increased since Moodle 4.0. PHP 8.0.x is supported too.
   1  <?php
   2  // This file is part of Moodle - http://moodle.org/
   3  //
   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.
   8  //
   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.
  13  //
  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/>.
  16  
  17  /**
  18   * This debug script is used during zip support development.
  19   *
  20   * @package    core_files
  21   * @copyright  2012 Petr Skoda
  22   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  23   */
  24  
  25  define('CLI_SCRIPT', true);
  26  
  27  require(__DIR__.'/../../../../config.php');
  28  require_once($CFG->libdir.'/clilib.php');
  29  
  30  $help =
  31      "Create sample zip file for testing
  32  Example:
  33    \$php zip_create_test_file.php test.zip
  34  ";
  35  
  36  if (count($_SERVER['argv']) != 2 or file_exists($_SERVER['argv'][1])) {
  37      echo $help;
  38      exit(0);
  39  }
  40  
  41  $archive = $_SERVER['argv'][1];
  42  
  43  $packer = get_file_packer('application/zip');
  44  
  45  $file = __DIR__.'/test.txt';
  46  $files = array(
  47      'test.test' => $file,
  48      'testíček.txt' => $file,
  49      'Prüfung.txt' => $file,
  50      '测试.txt' => $file,
  51      '試験.txt' => $file,
  52      'Žluťoučký/Koníček.txt' => $file,
  53  );
  54  
  55  $packer->archive_to_pathname($files, $archive);