Weak hands cannot be planted, meager skills have no foundation. Shallow wisdom is futile, how can one hope for a good name?扰扰从役倦，屑屑身事微。少壮轻年月，迟暮惜光辉。
base = $base;
}
/**
* Writes EXIF data to the given image path and file, preserving existing EXIF data
*
* @since 2.3.9
*
* @param int $image_id WordPress Media Library Attachment ID.
* @param bool|string $description Image Description.
* @param bool|string $comment Image Comment.
* @param bool|float $latitude Latitude.
* @param bool|float $longitude Longitude.
*
* @throws Exception Error.
*
* @return WP_Error|bool
*/
public function write( $image_id, $description = false, $comment = false, $latitude = false, $longitude = false ) {
// If all of our attributes are empty or false, don't write anything.
// This retains the original EXIF metadata on the image.
if ( ! $description && ! $comment && ! $latitude && ! $longitude ) {
return true;
}
// Get image.
$image = get_attached_file( $image_id );
// Bail if image doesn't exist.
if ( ! file_exists( $image ) ) {
return new WP_Error(
'page_generator_pro_exif_write_error',
sprintf(
/* translators: Image path and filename */
__( 'EXIF: %s does not exist on the server.', 'page-generator-pro' ),
$image
)
);
}
// Silently exit if the file type isn't supported, as we don't need to do anything.
$file_type = wp_check_filetype( $image );
if ( ! in_array( $file_type['type'], $this->get_supported_file_types(), true ) ) {
return true;
}
try {
// Read Exif data.
$data = new lsolesen\pel\PelDataWindow( $this->base->get_class( 'common' )->file_get_contents( $image ) );
// Determine if it's JPEG or TIFF data.
if ( lsolesen\pel\PelJpeg::isValid( $data ) ) {
$jpeg = new lsolesen\pel\PelJpeg();
$file = $jpeg;
$jpeg->load( $data );
// Get Exif data.
$exif = $jpeg->getExif();
// If no Exif data exists, create an empty structure we can use.
if ( $exif === null ) {
// Create and add empty Exif data to the image.
$exif = new lsolesen\pel\PelExif();
$jpeg->setExif( $exif );
// Create and add TIFF data to the Exif data.
// Exif data is stored in a TIFF format.
$tiff = new lsolesen\pel\PelTiff();
$exif->setTiff( $tiff );
} else {
// Use existing data.
$tiff = $exif->getTiff();
}
} elseif ( lsolesen\pel\PelTiff::isValid( $data ) ) {
$tiff = new lsolesen\pel\PelTiff();
$file = $tiff;
$tiff->load( $data );
} else {
// Something went wrong.
throw new Exception( __( 'Unrecoginzed image format.', 'page-generator-pro' ) );
}
// Bail if no TIFF data.
if ( ! isset( $tiff ) || is_null( $tiff ) ) { // @phpstan-ignore-line
throw new Exception( __( 'Unrecoginzed image format.', 'page-generator-pro' ) );
}
// See https://www.media.mit.edu/pia/Research/deepview/exif.html#ExifTags for IDF0 and IDF1 structure.
// Get root IFD, called IFD0 (main image).
// If it doesn't exist, create it.
$ifd0 = $tiff->getIfd();
if ( $ifd0 === null ) { // @phpstan-ignore-line
$ifd0 = new lsolesen\pel\PelIfd( lsolesen\pel\PelIfd::IFD0 );
$tiff->setIfd( $ifd0 );
}
// Get EXIF sub IFD.
// If it doesn't exist, create it.
$subifd = $ifd0->getSubIfd( lsolesen\pel\PelIfd::EXIF );
if ( $subifd === null ) { // @phpstan-ignore-line
$ifd0->addSubIfd( new lsolesen\pel\PelIfd( lsolesen\pel\PelIfd::EXIF ) );
$subifd = $ifd0->getSubIfd( lsolesen\pel\PelIfd::EXIF );
}
// Description.
if ( $description ) {
$this->set_description( $description, $ifd0 );
}
// User Comment.
if ( $comment ) {
$this->set_comment( $comment, $subifd );
}
// Latitude and Longitude.
if ( $latitude || $longitude ) {
$this->set_latitude_longitude( $latitude, $longitude, $ifd0 );
}
// Save changes to image file.
return $file->saveFile( $image );
} catch ( Exception $e ) {
return new WP_Error(
'page_generator_pro_exif_write_error',
sprintf(
/* translators: Error message */
__( 'EXIF: Error when writing data: %s', 'page-generator-pro' ),
$e->getMessage()
)
);
}
}
/**
* Returns an array of file types that support EXIF metadata
*
* @since 2.5.0
*
* @return array Supported File Types
*/
private function get_supported_file_types() {
$file_types = array(
'image/jpeg',
'image/tiff',
);
return $file_types;
}
/**
* Set Comment EXIF data
*
* @since 2.5.0
*
* @param string $value Comment.
* @param object $subifd EXIF SubIFD Data Object.
*/
private function set_comment( $value, $subifd ) {
$existing = $subifd->getEntry( lsolesen\pel\PelTag::USER_COMMENT );
if ( $existing === null ) {
$subifd->addEntry( new lsolesen\pel\PelEntryUserComment( $value, 'Unicode' ) );
} else {
$existing->setValue( $value, 'Unicode' );
}
}
/**
* Set Description EXIF data
*
* @since 2.5.0
*
* @param string $value Description.
* @param object $ifd0 EXIF Data Object.
*/
private function set_description( $value, $ifd0 ) {
$existing = $ifd0->getEntry( lsolesen\pel\PelTag::IMAGE_DESCRIPTION );
if ( $existing === null ) {
$ifd0->addEntry( new lsolesen\pel\PelEntryAscii( lsolesen\pel\PelTag::IMAGE_DESCRIPTION, $value ) );
} else {
$existing->setValue( $value );
}
}
/**
* Set Latitude and Longitude EXIF data
*
* @since 2.3.9
*
* @param float $latitude Latitude.
* @param float $longitude Longitude.
* @param object $ifd0 EXIF Data Object.
*/
private function set_latitude_longitude( $latitude, $longitude, $ifd0 ) {
// Create a sub-IFD for holding GPS information. GPS data must be below the first IFD.
$gps_ifd = new lsolesen\pel\PelIfd( lsolesen\pel\PelIfd::GPS );
$ifd0->addSubIfd( $gps_ifd );
$gps_ifd->addEntry( new lsolesen\pel\PelEntryByte( lsolesen\pel\PelTag::GPS_VERSION_ID, 2, 2, 0, 0 ) );
// Convert Latitude from 12.34 to 12 20' 42".
list( $hours, $minutes, $seconds ) = $this->convert_decimal_to_degrees_minutes_seconds( $latitude );
// Interpret a negative latitude as being south.
$latitude_ref = ( $latitude < 0 ) ? 'S' : 'N';
// Write latitude.
$gps_ifd->addEntry( new lsolesen\pel\PelEntryAscii( lsolesen\pel\PelTag::GPS_LATITUDE_REF, $latitude_ref ) );
$gps_ifd->addEntry( new lsolesen\pel\PelEntryRational( lsolesen\pel\PelTag::GPS_LATITUDE, $hours, $minutes, $seconds ) );
// Convert Longitude from 12.34 to 12 20' 42".
list( $hours, $minutes, $seconds) = $this->convert_decimal_to_degrees_minutes_seconds( $longitude );
// Interpret a negative longitude as being west.
$longitude_ref = ( $longitude < 0 ) ? 'W' : 'E';
// Write longitude.
$gps_ifd->addEntry( new lsolesen\pel\PelEntryAscii( lsolesen\pel\PelTag::GPS_LONGITUDE_REF, $longitude_ref ) );
$gps_ifd->addEntry( new lsolesen\pel\PelEntryRational( lsolesen\pel\PelTag::GPS_LONGITUDE, $hours, $minutes, $seconds ) );
}
/**
* Converts a given latitude or longitude to degrees, minutes and seconds
*
* @since 2.5.0
*
* @param float $degree Latitude / Longitude.
* @return bool|array
*/
private function convert_decimal_to_degrees_minutes_seconds( $degree ) {
// Bail if the latitude/longitude isn't in a valid range.
if ( $degree > 180 || $degree < - 180 ) {
return false;
}
// Make sure number is positive.
$degree = abs( $degre