function file_copy in Drupal 5

Same name and namespace in other branches

1. 8 core/modules/file/file.module \file_copy()
2. 4 includes/file.inc \file_copy()
3. 6 includes/file.inc \file_copy()
4. 7 includes/file.inc \file_copy()
5. 9 core/modules/file/file.module \file_copy()

Copies a file to a new location. This is a powerful function that in many ways performs like an advanced version of copy().

• Checks if $source and $dest are valid and readable/writable.
• Performs a file copy if $source is not equal to $dest.
• If file already exists in $dest either the call will error out, replace the file or rename the file based on the $replace parameter.

Parameters

$source A string specifying the file location of the original file.: This parameter will contain the resulting destination filename in case of success.

$dest A string containing the directory $source should be copied to.: If this value is omitted, Drupal's 'files' directory will be used.

$replace Replace behavior when the destination file already exists.:

• FILE_EXISTS_REPLACE - Replace the existing file
• FILE_EXISTS_RENAME - Append _{incrementing number} until the filename is unique
• FILE_EXISTS_ERROR - Do nothing and return FALSE.

Return value

True for success, FALSE for failure.

Related topics

2 calls to file_copy()

color_scheme_form_submit in modules/color/color.module

Submit handler for color change form.

file_move in includes/file.inc

Moves a file to a new location.

File

includes/file.inc, line 310

API for handling file uploads and server file management.

Code

function file_copy(&$source, $dest = 0, $replace = FILE_EXISTS_RENAME) {
  $dest = file_create_path($dest);
  $directory = $dest;
  $basename = file_check_path($directory);

  // Make sure we at least have a valid directory.
  if ($basename === FALSE) {
    $source = is_object($source) ? $source->filepath : $source;
    drupal_set_message(t('The selected file %file could not be uploaded, because the destination %directory is not properly configured.', array(
      '%file' => $source,
      '%directory' => $dest,
    )), 'error');
    watchdog('file system', t('The selected file %file could not be uploaded, because the destination %directory could not be found, or because its permissions do not allow the file to be written.', array(
      '%file' => $source,
      '%directory' => $dest,
    )), WATCHDOG_ERROR);
    return 0;
  }

  // Process a file upload object.
  if (is_object($source)) {
    $file = $source;
    $source = $file->filepath;
    if (!$basename) {
      $basename = $file->filename;
    }
  }
  $source = realpath($source);
  if (!file_exists($source)) {
    drupal_set_message(t('The selected file %file could not be copied, because no file by that name exists. Please check that you supplied the correct filename.', array(
      '%file' => $source,
    )), 'error');
    return 0;
  }

  // If the destination file is not specified then use the filename of the source file.
  $basename = $basename ? $basename : basename($source);
  $dest = $directory . '/' . $basename;

  // Make sure source and destination filenames are not the same, makes no sense
  // to copy it if they are. In fact copying the file will most likely result in
  // a 0 byte file. Which is bad. Real bad.
  if ($source != realpath($dest)) {
    if (file_exists($dest)) {
      switch ($replace) {
        case FILE_EXISTS_RENAME:

          // Destination file already exists and we can't replace is so we try and
          // and find a new filename.
          if ($pos = strrpos($basename, '.')) {
            $name = substr($basename, 0, $pos);
            $ext = substr($basename, $pos);
          }
          else {
            $name = $basename;
          }
          $counter = 0;
          do {
            $dest = $directory . '/' . $name . '_' . $counter++ . $ext;
          } while (file_exists($dest));
          break;
        case FILE_EXISTS_ERROR:
          drupal_set_message(t('The selected file %file could not be copied, because a file by that name already exists in the destination.', array(
            '%file' => $source,
          )), 'error');
          return 0;
      }
    }
    if (!@copy($source, $dest)) {
      drupal_set_message(t('The selected file %file could not be copied.', array(
        '%file' => $source,
      )), 'error');
      return 0;
    }

    // Give everyone read access so that FTP'd users or
    // non-webserver users can see/read these files.
    @chmod($dest, 0664);
  }
  if (is_object($file)) {
    $file->filename = $basename;
    $file->filepath = $dest;
    $source = $file;
  }
  else {
    $source = $dest;
  }
  return 1;

  // Everything went ok.
}