<?php

/**

 * File contains all the administration image manipulation functions.

 *

 * @package WordPress

 * @subpackage Administration

 */

/**

 * Crop an Image to a given size.

 *

 * @since 2.1.0

 *

 * @param string|int $src The source file or Attachment ID.

 * @param int $src_x The start x position to crop from.

 * @param int $src_y The start y position to crop from.

 * @param int $src_w The width to crop.

 * @param int $src_h The height to crop.

 * @param int $dst_w The destination width.

 * @param int $dst_h The destination height.

 * @param int $src_abs Optional. If the source crop points are absolute.

 * @param string $dst_file Optional. The destination file to write to.

 * @return string|WP_Error New filepath on success, WP_Error on failure.

 */

function wp_crop_image( $src, $src_x, $src_y, $src_w, $src_h, $dst_w, $dst_h, $src_abs = false, $dst_file = false ) {

	$src_file = $src;

	if ( is_numeric( $src ) ) { // Handle int as attachment ID

		$src_file = get_attached_file( $src );

		if ( ! file_exists( $src_file ) ) {

			// This can occur with certain file replication plugins.

			$src = _load_image_to_edit_path( $src, 'full' );

		} else {

			$src = $src_file;

		}

	}

	$editor = wp_get_image_editor( $src );

	if ( is_wp_error( $editor ) )

		return $editor;

	$src = $editor->crop( $src_x, $src_y, $src_w, $src_h, $dst_w, $dst_h, $src_abs );

	if ( is_wp_error( $src ) )

		return $src;

	if ( ! $dst_file )

		$dst_file = str_replace( basename( $src_file ), 'cropped-' . basename( $src_file ), $src_file );

	/*

	 * The directory containing the original file may no longer exist when

	 * using a replication plugin.

	 */

	wp_mkdir_p( dirname( $dst_file ) );

	$dst_file = dirname( $dst_file ) . '/' . wp_unique_filename( dirname( $dst_file ), basename( $dst_file ) );

	$result = $editor->save( $dst_file );

	if ( is_wp_error( $result ) )

		return $result;

	return $dst_file;

}

/**

 * Generate post thumbnail attachment meta data.

 *

 * @since 2.1.0

 *

 * @param int $attachment_id Attachment Id to process.

 * @param string $file Filepath of the Attached image.

 * @return mixed Metadata for attachment.

 */

function wp_generate_attachment_metadata( $attachment_id, $file ) {

	$attachment = get_post( $attachment_id );

	$metadata = array();

	$support = false;

		$imagesize = getimagesize( $file );

		$metadata['width'] = $imagesize[0];

		$metadata['height'] = $imagesize[1];

		// Make the file path relative to the upload dir.

		$metadata['file'] = _wp_relative_upload_path($file);

		// Make thumbnails and other intermediate sizes.

		$sizes = array();

		foreach ( get_intermediate_image_sizes() as $s ) {

			$sizes[$s] = array( 'width' => '', 'height' => '', 'crop' => false );

		}

		/**

		 *

		 * @since 2.9.0

		 *

		 */

		if ( $sizes ) {

			$editor = wp_get_image_editor( $file );

			if ( ! is_wp_error( $editor ) )

				$metadata['sizes'] = $editor->multi_resize( $sizes );

		} else {

			$metadata['sizes'] = array();

		}

		// Fetch additional metadata from EXIF/IPTC.

		$image_meta = wp_read_image_metadata( $file );

		if ( $image_meta )

			$metadata['image_meta'] = $image_meta;

	} elseif ( wp_attachment_is( 'video', $attachment ) ) {

		$metadata = wp_read_video_metadata( $file );

		$support = current_theme_supports( 'post-thumbnails', 'attachment:video' ) || post_type_supports( 'attachment:video', 'thumbnail' );

	} elseif ( wp_attachment_is( 'audio', $attachment ) ) {

		$metadata = wp_read_audio_metadata( $file );

		$support = current_theme_supports( 'post-thumbnails', 'attachment:audio' ) || post_type_supports( 'attachment:audio', 'thumbnail' );

	}

	if ( $support && ! empty( $metadata['image']['data'] ) ) {

		// Check for existing cover.

		$hash = md5( $metadata['image']['data'] );

		$posts = get_posts( array(

			'fields' => 'ids',

			'post_type' => 'attachment',

			'post_mime_type' => $metadata['image']['mime'],

			'post_status' => 'inherit',

			'posts_per_page' => 1,

			'meta_key' => '_cover_hash',

			'meta_value' => $hash

		) );

		$exists = reset( $posts );

		if ( ! empty( $exists ) ) {

			update_post_meta( $attachment_id, '_thumbnail_id', $exists );

		} else {

			$ext = '.jpg';

			switch ( $metadata['image']['mime'] ) {

			case 'image/gif':

				$ext = '.gif';

				break;

			case 'image/png':

				$ext = '.png';

				break;

			}

			$basename = str_replace( '.', '-', basename( $file ) ) . '-image' . $ext;

			$uploaded = wp_upload_bits( $basename, '', $metadata['image']['data'] );

			if ( false === $uploaded['error'] ) {

				$image_attachment = array(

					'post_mime_type' => $metadata['image']['mime'],

					'post_type' => 'attachment',

					'post_content' => '',

				);

				/**

				 *

				 * @since 3.9.0

				 *

				 * @param array $image_attachment An array of parameters to create the thumbnail.

				 * @param array $metadata         Current attachment metadata.

				 * @param array $uploaded         An array containing the thumbnail path and url.

				 */

				$image_attachment = apply_filters( 'attachment_thumbnail_args', $image_attachment, $metadata, $uploaded );

				$sub_attachment_id = wp_insert_attachment( $image_attachment, $uploaded['file'] );

				add_post_meta( $sub_attachment_id, '_cover_hash', $hash );

				$attach_data = wp_generate_attachment_metadata( $sub_attachment_id, $uploaded['file'] );

				wp_update_attachment_metadata( $sub_attachment_id, $attach_data );

				update_post_meta( $attachment_id, '_thumbnail_id', $sub_attachment_id );

			}

		}

	}

	// Remove the blob of binary data from the array.

		unset( $metadata['image']['data'] );

	/**

	 *

	 * @since 2.1.0

	 *

	 * @param array $metadata      An array of attachment meta data.

	 * @param int   $attachment_id Current attachment ID.

	 */

	return apply_filters( 'wp_generate_attachment_metadata', $metadata, $attachment_id );

}

/**

 * Convert a fraction string to a decimal.

 *

 * @since 2.5.0

 *

 * @param string $str

 * @return int|float

 */

function wp_exif_frac2dec($str) {

	@list( $n, $d ) = explode( '/', $str );

	if ( !empty($d) )

		return $n / $d;

	return $str;

}

/**

 * Convert the exif date format to a unix timestamp.

 *

 * @since 2.5.0

 *

 * @param string $str

 * @return int

 */

function wp_exif_date2ts($str) {

	@list( $date, $time ) = explode( ' ', trim($str) );

	@list( $y, $m, $d ) = explode( ':', $date );

	return strtotime( "{$y}-{$m}-{$d} {$time}" );

}

/**

 * Get extended image metadata, exif or iptc as available.

 *

 * Retrieves the EXIF metadata aperture, credit, camera, caption, copyright, iso

 * created_timestamp, focal_length, shutter_speed, and title.

 *

 * The IPTC metadata that is retrieved is APP13, credit, byline, created date

 * and time, caption, copyright, and title. Also includes FNumber, Model,

 * DateTimeDigitized, FocalLength, ISOSpeedRatings, and ExposureTime.

 *

 * @todo Try other exif libraries if available.

 * @since 2.5.0

 *

 * @param string $file

 * @return bool|array False on failure. Image metadata array on success.

 */

function wp_read_image_metadata( $file ) {

	if ( ! file_exists( $file ) )

		return false;

	/*

	 * EXIF contains a bunch of data we'll probably never need formatted in ways

	 * that are difficult to use. We'll normalize it and just extract the fields

	 * that are likely to be useful. Fractions and numbers are converted to

	 * floats, dates to unix timestamps, and everything else to strings.

	 */

	$meta = array(

		'aperture' => 0,

		'credit' => '',

		'camera' => '',

		'caption' => '',

		'created_timestamp' => 0,

		'copyright' => '',

		'focal_length' => 0,

		'iso' => 0,

		'shutter_speed' => 0,

		'title' => '',

		'orientation' => 0,

	);

	/*

	 * Read IPTC first, since it might contain data not available in exif such

	 * as caption, description etc.

	 */

	if ( is_callable( 'iptcparse' ) ) {

		if ( ! empty( $info['APP13'] ) ) {

			// Headline, "A brief synopsis of the caption."

			if ( ! empty( $iptc['2#105'][0] ) ) {

				$meta['title'] = trim( $iptc['2#105'][0] );

			/*

			 * Title, "Many use the Title field to store the filename of the image,

			 * though the field may be used in many ways."

			 */

			} elseif ( ! empty( $iptc['2#005'][0] ) ) {

				$meta['title'] = trim( $iptc['2#005'][0] );

			}

			if ( ! empty( $iptc['2#120'][0] ) ) { // description / legacy caption

				$caption = trim( $iptc['2#120'][0] );

				mbstring_binary_safe_encoding();

				$caption_length = strlen( $caption );

				reset_mbstring_encoding();

				if ( empty( $meta['title'] ) && $caption_length < 80 ) {

					// Assume the title is stored in 2:120 if it's short.

					$meta['title'] = $caption;