file.module 71.5 KB
Newer Older
1 2 3 4 5 6 7
<?php

/**
 * @file
 * Defines a "managed_file" Form API field and a "file" field for Field module.
 */

8
use Drupal\Core\Datetime\Entity\DateFormat;
9
use Drupal\Core\Field\FieldDefinitionInterface;
10 11
use Drupal\Core\File\Exception\FileException;
use Drupal\Core\File\FileSystemInterface;
12
use Drupal\Core\Form\FormStateInterface;
13
use Drupal\Core\Messenger\MessengerInterface;
14
use Drupal\Core\Render\BubbleableMetadata;
15
use Drupal\Core\Render\Element;
16
use Drupal\Core\Routing\RouteMatchInterface;
17
use Drupal\Core\Link;
18
use Drupal\Core\Url;
19
use Drupal\file\Entity\File;
20
use Drupal\file\FileInterface;
21
use Drupal\Component\Utility\NestedArray;
22
use Drupal\Component\Utility\Unicode;
23
use Drupal\Core\Entity\EntityStorageInterface;
24
use Drupal\Core\Template\Attribute;
25

26 27 28
/**
 * The regex pattern used when checking for insecure file types.
 */
29
define('FILE_INSECURE_EXTENSION_REGEX', '/\.(phar|php|pl|py|cgi|asp|js)(\.|$)/i');
30

31
// Load all Field module hooks for File.
32
require_once __DIR__ . '/file.field.inc';
33

34 35 36
/**
 * Implements hook_help().
 */
37
function file_help($route_name, RouteMatchInterface $route_match) {
38 39
  switch ($route_name) {
    case 'help.page.file':
40 41
      $output = '';
      $output .= '<h3>' . t('About') . '</h3>';
42
      $output .= '<p>' . t('The File module allows you to create fields that contain files. See the <a href=":field">Field module help</a> and the <a href=":field_ui">Field UI help</a> pages for general information on fields and how to create and manage them. For more information, see the <a href=":file_documentation">online documentation for the File module</a>.', [':field' => Url::fromRoute('help.page', ['name' => 'field'])->toString(), ':field_ui' => (\Drupal::moduleHandler()->moduleExists('field_ui')) ? Url::fromRoute('help.page', ['name' => 'field_ui'])->toString() : '#', ':file_documentation' => 'https://www.drupal.org/documentation/modules/file']) . '</p>';
43 44
      $output .= '<h3>' . t('Uses') . '</h3>';
      $output .= '<dl>';
45
      $output .= '<dt>' . t('Managing and displaying file fields') . '</dt>';
46
      $output .= '<dd>' . t('The <em>settings</em> and the <em>display</em> of the file field can be configured separately. See the <a href=":field_ui">Field UI help</a> for more information on how to manage fields and their display.', [':field_ui' => (\Drupal::moduleHandler()->moduleExists('field_ui')) ? Url::fromRoute('help.page', ['name' => 'field_ui'])->toString() : '#']) . '</dd>';
47 48
      $output .= '<dt>' . t('Allowing file extensions') . '</dt>';
      $output .= '<dd>' . t('In the field settings, you can define the allowed file extensions (for example <em>pdf docx psd</em>) for the files that will be uploaded with the file field.') . '</dd>';
49
      $output .= '<dt>' . t('Storing files') . '</dt>';
50
      $output .= '<dd>' . t('Uploaded files can either be stored as <em>public</em> or <em>private</em>, depending on the <a href=":file-system">File system settings</a>. For more information, see the <a href=":system-help">System module help page</a>.', [':file-system' => Url::fromRoute('system.file_system_settings')->toString(), ':system-help' => Url::fromRoute('help.page', ['name' => 'system'])->toString()]) . '</dd>';
51 52 53 54
      $output .= '<dt>' . t('Restricting the maximum file size') . '</dt>';
      $output .= '<dd>' . t('The maximum file size that users can upload is limited by PHP settings of the server, but you can restrict by entering the desired value as the <em>Maximum upload size</em> setting. The maximum file size is automatically displayed to users in the help text of the file field.') . '</dd>';
      $output .= '<dt>' . t('Displaying files and descriptions') . '<dt>';
      $output .= '<dd>' . t('In the field settings, you can allow users to toggle whether individual files are displayed. In the display settings, you can then choose one of the following formats: <ul><li><em>Generic file</em> displays links to the files and adds icons that symbolize the file extensions. If <em>descriptions</em> are enabled and have been submitted, then the description is displayed instead of the file name.</li><li><em>URL to file</em> displays the full path to the file as plain text.</li><li><em>Table of files</em> lists links to the files and the file sizes in a table.</li><li><em>RSS enclosure</em> only displays the first file, and only in a RSS feed, formatted according to the RSS 2.0 syntax for enclosures.</li></ul> A file can still be linked to directly by its URI even if it is not displayed.') . '</dd>';
55 56 57 58 59
      $output .= '</dl>';
      return $output;
  }
}

60 61 62 63 64 65 66 67 68 69
/**
 * Implements hook_field_widget_info_alter().
 */
function file_field_widget_info_alter(array &$info) {
  // Allows using the 'uri' widget for the 'file_uri' field type, which uses it
  // as the default widget.
  // @see \Drupal\file\Plugin\Field\FieldType\FileUriItem
  $info['uri']['field_types'][] = 'file_uri';
}

70 71 72
/**
 * Loads file entities from the database.
 *
73 74 75
 * @param array|null $fids
 *   (optional) An array of entity IDs. If omitted or NULL, all entities are
 *   loaded.
76
 * @param bool $reset
77 78
 *   (optional) Whether to reset the internal file_load_multiple() cache.
 *   Defaults to FALSE.
79 80 81 82
 *
 * @return array
 *   An array of file entities, indexed by fid.
 *
83 84
 * @deprecated in Drupal 8.0.0 and will be removed before Drupal 9.0.0. Use
 *   \Drupal\file\Entity\File::loadMultiple().
85
 *
86
 * @see https://www.drupal.org/node/2266845
87
 */
88
function file_load_multiple(array $fids = NULL, $reset = FALSE) {
89
  @trigger_error('file_load_multiple() is deprecated in Drupal 8.0.0 and will be removed before Drupal 9.0.0. Use \Drupal\file\Entity\File::loadMultiple(). See https://www.drupal.org/node/2266845', E_USER_DEPRECATED);
90
  if ($reset) {
91
    \Drupal::entityTypeManager()->getStorage('file')->resetCache($fids);
92 93
  }
  return File::loadMultiple($fids);
94 95 96 97 98
}

/**
 * Loads a single file entity from the database.
 *
99
 * @param int $fid
100
 *   A file ID.
101
 * @param bool $reset
102 103
 *   (optional) Whether to reset the internal file_load_multiple() cache.
 *   Defaults to FALSE.
104
 *
105
 * @return \Drupal\file\FileInterface|null
106
 *   A file entity or NULL if the file was not found.
107
 *
108 109
 * @deprecated in Drupal 8.0.0 and will be removed before Drupal 9.0.0. Use
 *   \Drupal\file\Entity\File::load().
110
 *
111
 * @see https://www.drupal.org/node/2266845
112
 */
113
function file_load($fid, $reset = FALSE) {
114
  @trigger_error('file_load() is deprecated in Drupal 8.0.0 and will be removed before Drupal 9.0.0. Use \Drupal\file\Entity\File::load(). See https://www.drupal.org/node/2266845', E_USER_DEPRECATED);
115
  if ($reset) {
116
    \Drupal::entityTypeManager()->getStorage('file')->resetCache([$fid]);
117 118
  }
  return File::load($fid);
119 120 121 122 123 124 125 126 127 128 129
}

/**
 * Copies a file to a new location and adds a file record to the database.
 *
 * This function should be used when manipulating files that have records
 * stored in the database. This is a powerful function that in many ways
 * performs like an advanced version of copy().
 * - Checks if $source and $destination are valid and readable/writable.
 * - If file already exists in $destination either the call will error out,
 *   replace the file or rename the file based on the $replace parameter.
130
 * - If the $source and $destination are equal, the behavior depends on the
131
 *   $replace parameter. FILE_EXISTS_REPLACE will error out. FILE_EXISTS_RENAME
132
 *   will rename the file until the $destination is unique.
133 134 135 136
 * - Adds the new file to the files database. If the source file is a
 *   temporary file, the resulting file will also be a temporary file. See
 *   file_save_upload() for details on temporary files.
 *
137
 * @param \Drupal\file\FileInterface $source
138
 *   A file entity.
139
 * @param string $destination
140 141
 *   A string containing the destination that $source should be
 *   copied to. This must be a stream wrapper URI.
142
 * @param int $replace
143 144 145 146 147 148 149 150
 *   (optional) Replace behavior when the destination file already exists.
 *   Possible values include:
 *   - FILE_EXISTS_REPLACE: Replace the existing file. If a managed file with
 *     the destination name exists, then its database entry will be updated. If
 *     no database entry is found, then a new one will be created.
 *   - FILE_EXISTS_RENAME: (default) Append _{incrementing number} until the
 *     filename is unique.
 *   - FILE_EXISTS_ERROR: Do nothing and return FALSE.
151
 *
152 153
 * @return \Drupal\file\FileInterface|false
 *   File entity if the copy is successful, or FALSE in the event of an error.
154 155 156 157
 *
 * @see file_unmanaged_copy()
 * @see hook_file_copy()
 */
158
function file_copy(FileInterface $source, $destination = NULL, $replace = FILE_EXISTS_RENAME) {
159 160
  /** @var \Drupal\Core\File\FileSystemInterface $file_system */
  $file_system = \Drupal::service('file_system');
161 162 163 164
  /** @var \Drupal\Core\StreamWrapper\StreamWrapperManagerInterface $stream_wrapper_manager */
  $stream_wrapper_manager = \Drupal::service('stream_wrapper_manager');

  if (!$stream_wrapper_manager->isValidUri($destination)) {
165
    if (($realpath = $file_system->realpath($source->getFileUri())) !== FALSE) {
166
      \Drupal::logger('file')->notice('File %file (%realpath) could not be copied because the destination %destination is invalid. This is often caused by improper use of file_copy() or a missing stream wrapper.', ['%file' => $source->getFileUri(), '%realpath' => $realpath, '%destination' => $destination]);
167 168
    }
    else {
169
      \Drupal::logger('file')->notice('File %file could not be copied because the destination %destination is invalid. This is often caused by improper use of file_copy() or a missing stream wrapper.', ['%file' => $source->getFileUri(), '%destination' => $destination]);
170
    }
171
    \Drupal::messenger()->addError(t('The specified file %file could not be copied because the destination is invalid. More information is available in the system log.', ['%file' => $source->getFileUri()]));
172 173 174
    return FALSE;
  }

175 176
  try {
    $uri = $file_system->copy($source->getFileUri(), $destination, $replace);
177 178
    $file = $source->createDuplicate();
    $file->setFileUri($uri);
179
    $file->setFilename($file_system->basename($uri));
180
    // If we are replacing an existing file re-use its database record.
181 182
    // @todo Do not create a new entity in order to update it. See
    //   https://www.drupal.org/node/2241865.
183
    if ($replace == FILE_EXISTS_REPLACE) {
184
      $existing_files = \Drupal::entityTypeManager()->getStorage('file')->loadByProperties(['uri' => $uri]);
185 186
      if (count($existing_files)) {
        $existing = reset($existing_files);
187
        $file->fid = $existing->id();
188
        $file->setOriginalId($existing->id());
189
        $file->setFilename($existing->getFilename());
190 191 192 193 194
      }
    }
    // If we are renaming around an existing file (rather than a directory),
    // use its basename for the filename.
    elseif ($replace == FILE_EXISTS_RENAME && is_file($destination)) {
195
      $file->setFilename($file_system->basename($destination));
196 197 198 199 200
    }

    $file->save();

    // Inform modules that the file has been copied.
201
    \Drupal::moduleHandler()->invokeAll('file_copy', [$file, $source]);
202 203 204

    return $file;
  }
205 206 207
  catch (FileException $e) {
    return FALSE;
  }
208 209 210 211 212 213 214 215 216 217 218
}

/**
 * Moves a file to a new location and update the file's database entry.
 *
 * - Checks if $source and $destination are valid and readable/writable.
 * - Performs a file move if $source is not equal to $destination.
 * - If file already exists in $destination either the call will error out,
 *   replace the file or rename the file based on the $replace parameter.
 * - Adds the new file to the files database.
 *
219
 * @param \Drupal\file\FileInterface $source
220
 *   A file entity.
221
 * @param string $destination
222 223
 *   A string containing the destination that $source should be moved
 *   to. This must be a stream wrapper URI.
224
 * @param int $replace
225 226 227 228 229 230 231 232 233
 *   (optional) The replace behavior when the destination file already exists.
 *   Possible values include:
 *   - FILE_EXISTS_REPLACE: Replace the existing file. If a managed file with
 *     the destination name exists then its database entry will be updated and
 *     $source->delete() called after invoking hook_file_move(). If no database
 *     entry is found, then the source files record will be updated.
 *   - FILE_EXISTS_RENAME: (default) Append _{incrementing number} until the
 *     filename is unique.
 *   - FILE_EXISTS_ERROR: Do nothing and return FALSE.
234
 *
235
 * @return \Drupal\file\FileInterface|false
236 237
 *   Resulting file entity for success, or FALSE in the event of an error.
 *
238
 * @see \Drupal\Core\File\FileSystemInterface::move()
239 240
 * @see hook_file_move()
 */
241
function file_move(FileInterface $source, $destination = NULL, $replace = FILE_EXISTS_RENAME) {
242 243
  /** @var \Drupal\Core\File\FileSystemInterface $file_system */
  $file_system = \Drupal::service('file_system');
244 245 246 247
  /** @var \Drupal\Core\StreamWrapper\StreamWrapperManagerInterface $stream_wrapper_manager */
  $stream_wrapper_manager = \Drupal::service('stream_wrapper_manager');

  if (!$stream_wrapper_manager->isValidUri($destination)) {
248
    if (($realpath = $file_system->realpath($source->getFileUri())) !== FALSE) {
249
      \Drupal::logger('file')->notice('File %file (%realpath) could not be moved because the destination %destination is invalid. This may be caused by improper use of file_move() or a missing stream wrapper.', ['%file' => $source->getFileUri(), '%realpath' => $realpath, '%destination' => $destination]);
250 251
    }
    else {
252
      \Drupal::logger('file')->notice('File %file could not be moved because the destination %destination is invalid. This may be caused by improper use of file_move() or a missing stream wrapper.', ['%file' => $source->getFileUri(), '%destination' => $destination]);
253
    }
254
    \Drupal::messenger()->addError(t('The specified file %file could not be moved because the destination is invalid. More information is available in the system log.', ['%file' => $source->getFileUri()]));
255 256 257
    return FALSE;
  }

258 259
  try {
    $uri = $file_system->move($source->getFileUri(), $destination, $replace);
260 261 262
    $delete_source = FALSE;

    $file = clone $source;
263
    $file->setFileUri($uri);
264 265
    // If we are replacing an existing file re-use its database record.
    if ($replace == FILE_EXISTS_REPLACE) {
266
      $existing_files = \Drupal::entityTypeManager()->getStorage('file')->loadByProperties(['uri' => $uri]);
267 268 269
      if (count($existing_files)) {
        $existing = reset($existing_files);
        $delete_source = TRUE;
270
        $file->fid = $existing->id();
271
        $file->uuid = $existing->uuid();
272 273 274 275 276
      }
    }
    // If we are renaming around an existing file (rather than a directory),
    // use its basename for the filename.
    elseif ($replace == FILE_EXISTS_RENAME && is_file($destination)) {
277
      $file->setFilename(\Drupal::service('file_system')->basename($destination));
278 279 280 281 282
    }

    $file->save();

    // Inform modules that the file has been moved.
283
    \Drupal::moduleHandler()->invokeAll('file_move', [$file, $source]);
284 285

    // Delete the original if it's not in use elsewhere.
286
    if ($delete_source && !\Drupal::service('file.usage')->listUsage($source)) {
287 288 289 290 291
      $source->delete();
    }

    return $file;
  }
292 293 294
  catch (FileException $e) {
    return FALSE;
  }
295 296 297 298 299 300 301 302
}

/**
 * Checks that a file meets the criteria specified by the validators.
 *
 * After executing the validator callbacks specified hook_file_validate() will
 * also be called to allow other modules to report errors about the file.
 *
303
 * @param \Drupal\file\FileInterface $file
304
 *   A file entity.
305
 * @param array $validators
306 307 308 309 310 311 312
 *   (optional) An associative array of callback functions used to validate
 *   the file. The keys are function names and the values arrays of callback
 *   parameters which will be passed in after the file entity. The functions
 *   should return an array of error messages; an empty array indicates that
 *   the file passed validation. The callback functions will be called in the
 *   order specified in the array, then the hook hook_file_validate()
 *   will be invoked so other modules can validate the new file.
313
 *
314
 * @return array
315 316 317 318
 *   An array containing validation error messages.
 *
 * @see hook_file_validate()
 */
319
function file_validate(FileInterface $file, $validators = []) {
320
  // Call the validation functions specified by this function's caller.
321
  $errors = [];
322 323 324 325 326 327 328 329
  foreach ($validators as $function => $args) {
    if (function_exists($function)) {
      array_unshift($args, $file);
      $errors = array_merge($errors, call_user_func_array($function, $args));
    }
  }

  // Let other modules perform validation on the new file.
330
  return array_merge($errors, \Drupal::moduleHandler()->invokeAll('file_validate', [$file]));
331 332 333 334 335
}

/**
 * Checks for files with names longer than can be stored in the database.
 *
336
 * @param \Drupal\file\FileInterface $file
337 338
 *   A file entity.
 *
339
 * @return array
340 341
 *   An empty array if the file name length is smaller than the limit or an
 *   array containing an error message if it's not or is empty.
342
 */
343
function file_validate_name_length(FileInterface $file) {
344
  $errors = [];
345

346
  if (!$file->getFilename()) {
347 348
    $errors[] = t("The file's name is empty. Please give a name to the file.");
  }
349
  if (strlen($file->getFilename()) > 240) {
350 351 352 353 354 355 356 357
    $errors[] = t("The file's name exceeds the 240 characters limit. Please rename the file and try again.");
  }
  return $errors;
}

/**
 * Checks that the filename ends with an allowed extension.
 *
358
 * @param \Drupal\file\FileInterface $file
359
 *   A file entity.
360
 * @param string $extensions
361 362
 *   A string with a space separated list of allowed extensions.
 *
363
 * @return array
364 365
 *   An empty array if the file extension is allowed or an array containing an
 *   error message if it's not.
366 367 368
 *
 * @see hook_file_validate()
 */
369
function file_validate_extensions(FileInterface $file, $extensions) {
370
  $errors = [];
371 372

  $regex = '/\.(' . preg_replace('/ +/', '|', preg_quote($extensions)) . ')$/i';
373
  if (!preg_match($regex, $file->getFilename())) {
374
    $errors[] = t('Only files with the following extensions are allowed: %files-allowed.', ['%files-allowed' => $extensions]);
375 376 377 378 379 380 381
  }
  return $errors;
}

/**
 * Checks that the file's size is below certain limits.
 *
382
 * @param \Drupal\file\FileInterface $file
383
 *   A file entity.
384
 * @param int $file_limit
385 386
 *   (optional) The maximum file size in bytes. Zero (the default) indicates
 *   that no limit should be enforced.
387
 * @param int $user_limit
388 389
 *   (optional) The maximum number of bytes the user is allowed. Zero (the
 *   default) indicates that no limit should be enforced.
390
 *
391
 * @return array
392 393
 *   An empty array if the file size is below limits or an array containing an
 *   error message if it's not.
394 395 396
 *
 * @see hook_file_validate()
 */
397
function file_validate_size(FileInterface $file, $file_limit = 0, $user_limit = 0) {
398
  $user = \Drupal::currentUser();
399
  $errors = [];
400

401
  if ($file_limit && $file->getSize() > $file_limit) {
402
    $errors[] = t('The file is %filesize exceeding the maximum file size of %maxsize.', ['%filesize' => format_size($file->getSize()), '%maxsize' => format_size($file_limit)]);
403
  }
404

405
  // Save a query by only calling spaceUsed() when a limit is provided.
406
  if ($user_limit && (\Drupal::entityTypeManager()->getStorage('file')->spaceUsed($user->id()) + $file->getSize()) > $user_limit) {
407
    $errors[] = t('The file is %filesize which would exceed your disk quota of %quota.', ['%filesize' => format_size($file->getSize()), '%quota' => format_size($user_limit)]);
408
  }
409

410 411 412 413
  return $errors;
}

/**
414
 * Checks that the file is recognized as a valid image.
415
 *
416
 * @param \Drupal\file\FileInterface $file
417 418
 *   A file entity.
 *
419
 * @return array
420 421
 *   An empty array if the file is a valid image or an array containing an error
 *   message if it's not.
422 423 424
 *
 * @see hook_file_validate()
 */
425
function file_validate_is_image(FileInterface $file) {
426
  $errors = [];
427

428 429 430 431
  $image_factory = \Drupal::service('image.factory');
  $image = $image_factory->get($file->getFileUri());
  if (!$image->isValid()) {
    $supported_extensions = $image_factory->getSupportedExtensions();
432
    $errors[] = t('The image file is invalid or the image type is not allowed. Allowed types: %types', ['%types' => implode(', ', $supported_extensions)]);
433 434 435 436 437 438 439 440
  }

  return $errors;
}

/**
 * Verifies that image dimensions are within the specified maximum and minimum.
 *
441
 * Non-image files will be ignored. If an image toolkit is available the image
442 443
 * will be scaled to fit within the desired maximum dimensions.
 *
444
 * @param \Drupal\file\FileInterface $file
445
 *   A file entity. This function may resize the file affecting its size.
446 447 448 449 450 451 452 453 454
 * @param string|int $maximum_dimensions
 *   (optional) A string in the form WIDTHxHEIGHT; for example, '640x480' or
 *   '85x85'. If an image toolkit is installed, the image will be resized down
 *   to these dimensions. A value of zero (the default) indicates no restriction
 *   on size, so no resizing will be attempted.
 * @param string|int $minimum_dimensions
 *   (optional) A string in the form WIDTHxHEIGHT. This will check that the
 *   image meets a minimum size. A value of zero (the default) indicates that
 *   there is no restriction on size.
455
 *
456 457 458 459 460
 * @return array
 *   An empty array if the file meets the specified dimensions, was resized
 *   successfully to meet those requirements or is not an image. If the image
 *   does not meet the requirements or an attempt to resize it fails, an array
 *   containing the error message will be returned.
461 462 463
 *
 * @see hook_file_validate()
 */
464
function file_validate_image_resolution(FileInterface $file, $maximum_dimensions = 0, $minimum_dimensions = 0) {
465
  $errors = [];
466 467

  // Check first that the file is an image.
468
  $image_factory = \Drupal::service('image.factory');
469
  $image = $image_factory->get($file->getFileUri());
470

471
  if ($image->isValid()) {
472
    $scaling = FALSE;
473 474 475
    if ($maximum_dimensions) {
      // Check that it is smaller than the given dimensions.
      list($width, $height) = explode('x', $maximum_dimensions);
476
      if ($image->getWidth() > $width || $image->getHeight() > $height) {
477
        // Try to resize the image to fit the dimensions.
478
        if ($image->scale($width, $height)) {
479
          $scaling = TRUE;
480
          $image->save();
481
          if (!empty($width) && !empty($height)) {
482 483 484 485 486 487
            $message = t('The image was resized to fit within the maximum allowed dimensions of %dimensions pixels. The new dimensions of the resized image are %new_widthx%new_height pixels.',
              [
                '%dimensions' => $maximum_dimensions,
                '%new_width' => $image->getWidth(),
                '%new_height' => $image->getHeight(),
              ]);
488 489
          }
          elseif (empty($width)) {
490 491 492 493 494 495
            $message = t('The image was resized to fit within the maximum allowed height of %height pixels. The new dimensions of the resized image are %new_widthx%new_height pixels.',
              [
                '%height' => $height,
                '%new_width' => $image->getWidth(),
                '%new_height' => $image->getHeight(),
              ]);
496 497
          }
          elseif (empty($height)) {
498 499 500 501 502 503
            $message = t('The image was resized to fit within the maximum allowed width of %width pixels. The new dimensions of the resized image are %new_widthx%new_height pixels.',
              [
                '%width' => $width,
                '%new_width' => $image->getWidth(),
                '%new_height' => $image->getHeight(),
              ]);
504
          }
505
          \Drupal::messenger()->addStatus($message);
506 507
        }
        else {
508
          $errors[] = t('The image exceeds the maximum allowed dimensions and an attempt to resize it failed.');
509 510 511 512 513 514 515
        }
      }
    }

    if ($minimum_dimensions) {
      // Check that it is larger than the given dimensions.
      list($width, $height) = explode('x', $minimum_dimensions);
516
      if ($image->getWidth() < $width || $image->getHeight() < $height) {
517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532
        if ($scaling) {
          $errors[] = t('The resized image is too small. The minimum dimensions are %dimensions pixels and after resizing, the image size will be %widthx%height pixels.',
            [
              '%dimensions' => $minimum_dimensions,
              '%width' => $image->getWidth(),
              '%height' => $image->getHeight(),
            ]);
        }
        else {
          $errors[] = t('The image is too small. The minimum dimensions are %dimensions pixels and the image size is %widthx%height pixels.',
            [
              '%dimensions' => $minimum_dimensions,
              '%width' => $image->getWidth(),
              '%height' => $image->getHeight(),
            ]);
        }
533 534 535 536 537 538 539 540 541 542
      }
    }
  }

  return $errors;
}

/**
 * Saves a file to the specified destination and creates a database entry.
 *
543
 * @param string $data
544
 *   A string containing the contents of the file.
545 546 547 548 549
 * @param string|null $destination
 *   (optional) A string containing the destination URI. This must be a stream
 *   wrapper URI. If no value or NULL is provided, a randomized name will be
 *   generated and the file will be saved using Drupal's default files scheme,
 *   usually "public://".
550
 * @param int $replace
551 552 553 554 555 556 557 558
 *   (optional) The replace behavior when the destination file already exists.
 *   Possible values include:
 *   - FILE_EXISTS_REPLACE: Replace the existing file. If a managed file with
 *     the destination name exists, then its database entry will be updated. If
 *     no database entry is found, then a new one will be created.
 *   - FILE_EXISTS_RENAME: (default) Append _{incrementing number} until the
 *     filename is unique.
 *   - FILE_EXISTS_ERROR: Do nothing and return FALSE.
559
 *
560
 * @return \Drupal\file\FileInterface|false
561 562 563 564 565
 *   A file entity, or FALSE on error.
 *
 * @see file_unmanaged_save_data()
 */
function file_save_data($data, $destination = NULL, $replace = FILE_EXISTS_RENAME) {
566
  $user = \Drupal::currentUser();
567 568

  if (empty($destination)) {
569
    $destination = \Drupal::config('system.file')->get('default_scheme') . '://';
570
  }
571 572 573 574

  /** @var \Drupal\Core\StreamWrapper\StreamWrapperManagerInterface $stream_wrapper_manager */
  $stream_wrapper_manager = \Drupal::service('stream_wrapper_manager');
  if (!$stream_wrapper_manager->isValidUri($destination)) {
575
    \Drupal::logger('file')->notice('The data could not be saved because the destination %destination is invalid. This may be caused by improper use of file_save_data() or a missing stream wrapper.', ['%destination' => $destination]);
576
    \Drupal::messenger()->addError(t('The data could not be saved because the destination is invalid. More information is available in the system log.'));
577 578 579
    return FALSE;
  }

580 581
  try {
    $uri = \Drupal::service('file_system')->saveData($data, $destination, $replace);
582
    // Create a file entity.
583
    $file = File::create([
584
      'uri' => $uri,
585
      'uid' => $user->id(),
586
      'status' => FILE_STATUS_PERMANENT,
587
    ]);
588
    // If we are replacing an existing file re-use its database record.
589 590
    // @todo Do not create a new entity in order to update it. See
    //   https://www.drupal.org/node/2241865.
591
    if ($replace == FILE_EXISTS_REPLACE) {
592
      $existing_files = \Drupal::entityTypeManager()->getStorage('file')->loadByProperties(['uri' => $uri]);
593 594
      if (count($existing_files)) {
        $existing = reset($existing_files);
595
        $file->fid = $existing->id();
596
        $file->setOriginalId($existing->id());
597
        $file->setFilename($existing->getFilename());
598 599 600 601 602
      }
    }
    // If we are renaming around an existing file (rather than a directory),
    // use its basename for the filename.
    elseif ($replace == FILE_EXISTS_RENAME && is_file($destination)) {
603
      $file->setFilename(\Drupal::service('file_system')->basename($destination));
604 605 606 607 608
    }

    $file->save();
    return $file;
  }
609 610 611 612
  catch (FileException $e) {
    return FALSE;
  }

613 614 615 616 617
}

/**
 * Examines a file entity and returns appropriate content headers for download.
 *
618
 * @param \Drupal\file\FileInterface $file
619 620
 *   A file entity.
 *
621
 * @return array
622 623 624
 *   An associative array of headers, as expected by
 *   \Symfony\Component\HttpFoundation\StreamedResponse.
 */
625
function file_get_content_headers(FileInterface $file) {
626
  $type = Unicode::mimeHeaderEncode($file->getMimeType());
627

628
  return [
629
    'Content-Type' => $type,
630
    'Content-Length' => $file->getSize(),
631
    'Cache-Control' => 'private',
632
  ];
633 634
}

635
/**
636
 * Implements hook_theme().
637 638
 */
function file_theme() {
639
  return [
640
    // From file.module.
641 642 643 644
    'file_link' => [
      'variables' => ['file' => NULL, 'description' => NULL, 'attributes' => []],
    ],
    'file_managed_file' => [
645
      'render element' => 'element',
646
    ],
647 648 649 650 651 652
    'file_audio' => [
      'variables' => ['files' => [], 'attributes' => NULL],
    ],
    'file_video' => [
      'variables' => ['files' => [], 'attributes' => NULL],
    ],
653

654
    // From file.field.inc.
655
    'file_widget_multiple' => [
656
      'render element' => 'element',
657
      'file' => 'file.field.inc',
658 659 660
    ],
    'file_upload_help' => [
      'variables' => ['description' => NULL, 'upload_validators' => NULL, 'cardinality' => NULL],
661
      'file' => 'file.field.inc',
662 663
    ],
  ];
664 665 666
}

/**
667
 * Implements hook_file_download().
668
 */
669
function file_file_download($uri) {
670
  // Get the file record based on the URI. If not in the database just return.
671
  /** @var \Drupal\file\FileInterface[] $files */
672
  $files = \Drupal::entityTypeManager()->getStorage('file')->loadByProperties(['uri' => $uri]);
673
  if (count($files)) {
674 675 676
    foreach ($files as $item) {
      // Since some database servers sometimes use a case-insensitive comparison
      // by default, double check that the filename is an exact match.
677
      if ($item->getFileUri() === $uri) {
678 679 680 681
        $file = $item;
        break;
      }
    }
682
  }
683
  if (!isset($file)) {
684 685 686
    return;
  }

687 688 689 690 691 692 693 694 695 696 697 698 699 700
  // Find out if a temporary file is still used in the system.
  if ($file->isTemporary()) {
    $usage = \Drupal::service('file.usage')->listUsage($file);
    if (empty($usage) && $file->getOwnerId() != \Drupal::currentUser()->id()) {
      // Deny access to temporary files without usage that are not owned by the
      // same user. This prevents the security issue that a private file that
      // was protected by field permissions becomes available after its usage
      // was removed and before it is actually deleted from the file system.
      // Modules that depend on this behavior should make the file permanent
      // instead.
      return -1;
    }
  }

701
  // Find out which (if any) fields of this type contain the file.
702
  $references = file_get_file_references($file, NULL, EntityStorageInterface::FIELD_LOAD_CURRENT, NULL);
703

704 705 706 707 708
  // Stop processing if there are no references in order to avoid returning
  // headers for files controlled by other modules. Make an exception for
  // temporary files where the host entity has not yet been saved (for example,
  // an image preview on a node/add form) in which case, allow download by the
  // file's owner.
709
  if (empty($references) && ($file->isPermanent() || $file->getOwnerId() != \Drupal::currentUser()->id())) {
710
    return;
711 712
  }

713
  if (!$file->access('download')) {
714 715 716 717
    return -1;
  }

  // Access is granted.
718 719
  $headers = file_get_content_headers($file);
  return $headers;
720 721
}

722
/**
723
 * Implements hook_cron().
724 725
 */
function file_cron() {
726
  $age = \Drupal::config('system.file')->get('temporary_maximum_age');
727
  $file_storage = \Drupal::entityTypeManager()->getStorage('file');
728

729 730 731
  /** @var \Drupal\Core\StreamWrapper\StreamWrapperManagerInterface $stream_wrapper_manager */
  $stream_wrapper_manager = \Drupal::service('stream_wrapper_manager');

732 733 734 735 736 737 738 739
  // Only delete temporary files if older than $age. Note that automatic cleanup
  // is disabled if $age set to 0.
  if ($age) {
    $fids = Drupal::entityQuery('file')
      ->condition('status', FILE_STATUS_PERMANENT, '<>')
      ->condition('changed', REQUEST_TIME - $age, '<')
      ->range(0, 100)
      ->execute();
740
    $files = $file_storage->loadMultiple($fids);
741
    foreach ($files as $file) {
742
      $references = \Drupal::service('file.usage')->listUsage($file);
743
      if (empty($references)) {
744
        if (!file_exists($file->getFileUri())) {
745
          if (!$stream_wrapper_manager->isValidUri($file->getFileUri())) {
746 747 748 749 750
            \Drupal::logger('file system')->warning('Temporary file "%path" that was deleted during garbage collection did not exist on the filesystem. This could be caused by a missing stream wrapper.', ['%path' => $file->getFileUri()]);
          }
          else {
            \Drupal::logger('file system')->warning('Temporary file "%path" that was deleted during garbage collection did not exist on the filesystem.', ['%path' => $file->getFileUri()]);
          }
751
        }
752 753 754
        // Delete the file entity. If the file does not exist, this will
        // generate a second notice in the watchdog.
        $file->delete();
755 756
      }
      else {
757
        \Drupal::logger('file system')->info('Did not delete temporary file "%path" during garbage collection because it is in use by the following modules: %modules.', ['%path' => $file->getFileUri(), '%modules' => implode(', ', array_keys($references))]);
758 759 760 761 762
      }
    }
  }
}

763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801
/**
 * Saves form file uploads.
 *
 * The files will be added to the {file_managed} table as temporary files.
 * Temporary files are periodically cleaned. Use the 'file.usage' service to
 * register the usage of the file which will automatically mark it as permanent.
 *
 * @param array $element
 *   The FAPI element whose values are being saved.
 * @param \Drupal\Core\Form\FormStateInterface $form_state
 *   The current state of the form.
 * @param null|int $delta
 *   (optional) The delta of the file to return the file entity.
 *   Defaults to NULL.
 * @param int $replace
 *   (optional) The replace behavior when the destination file already exists.
 *   Possible values include:
 *   - FILE_EXISTS_REPLACE: Replace the existing file.
 *   - FILE_EXISTS_RENAME: (default) Append _{incrementing number} until the
 *     filename is unique.
 *   - FILE_EXISTS_ERROR: Do nothing and return FALSE.
 *
 * @return array|\Drupal\file\FileInterface|null|false
 *   An array of file entities or a single file entity if $delta != NULL. Each
 *   array element contains the file entity if the upload succeeded or FALSE if
 *   there was an error. Function returns NULL if no file was uploaded.
 *
 * @deprecated in Drupal 8.4.x, will be removed before Drupal 9.0.0.
 *   For backwards compatibility use core file upload widgets in forms.
 *
 * @internal
 *   This function wraps file_save_upload() to allow correct error handling in
 *   forms.
 *
 * @todo Revisit after https://www.drupal.org/node/2244513.
 */
function _file_save_upload_from_form(array $element, FormStateInterface $form_state, $delta = NULL, $replace = FILE_EXISTS_RENAME) {
  // Get all errors set before calling this method. This will also clear them
  // from $_SESSION.
802
  $errors_before = \Drupal::messenger()->deleteByType(MessengerInterface::TYPE_ERROR);
803 804 805 806 807 808 809 810 811

  $upload_location = isset($element['#upload_location']) ? $element['#upload_location'] : FALSE;
  $upload_name = implode('_', $element['#parents']);
  $upload_validators = isset($element['#upload_validators']) ? $element['#upload_validators'] : [];

  $result = file_save_upload($upload_name, $upload_validators, $upload_location, $delta, $replace);

  // Get new errors that are generated while trying to save the upload. This
  // will also clear them from $_SESSION.
812 813
  $errors_new = \Drupal::messenger()->deleteByType(MessengerInterface::TYPE_ERROR);
  if (!empty($errors_new)) {
814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837

    if (count($errors_new) > 1) {
      // Render multiple errors into a single message.
      // This is needed because only one error per element is supported.
      $render_array = [
        'error' => [
          '#markup' => t('One or more files could not be uploaded.'),
        ],
        'item_list' => [
          '#theme' => 'item_list',
          '#items' => $errors_new,
        ],
      ];
      $error_message = \Drupal::service('renderer')->renderPlain($render_array);
    }
    else {
      $error_message = reset($errors_new);
    }

    $form_state->setError($element, $error_message);
  }

  // Ensure that errors set prior to calling this method are still shown to the
  // user.
838 839 840
  if (!empty($errors_before)) {
    foreach ($errors_before as $error) {
      \Drupal::messenger()->addError($error);
841 842 843 844 845 846
    }
  }

  return $result;
}

847 848 849 850
/**
 * Saves file uploads to a new location.
 *
 * The files will be added to the {file_managed} table as temporary files.
851 852
 * Temporary files are periodically cleaned. Use the 'file.usage' service to
 * register the usage of the file which will automatically mark it as permanent.