????
Your IP : 216.73.216.152
<?php
// LOADED FROM: core.php, periodic_cleanup().
// INCOMING VARIABLES: $backup_age_limit = 172800, $die_on_fail = true
$max_site_log_size = pb_backupbuddy::$options['max_site_log_size'] * 1024 * 1024; // in bytes.
pb_backupbuddy::status( 'message', 'Starting cleanup procedure for BackupBuddy v' . pb_backupbuddy::settings( 'version' ) . '.' );
if ( !isset( pb_backupbuddy::$options ) ) {
pb_backupbuddy::load();
}
// Validate that all internal schedules are properly registered in the WordPress cron
backupbuddy_core::validateSchedules();
// Clean up any old rollback undo files hanging around.
$files = (array)glob( ABSPATH . 'backupbuddy_rollback*' );
foreach( $files as $file ) {
$file_stats = stat( $file );
if ( ( time() - $file_stats['mtime'] ) > backupbuddy_constants::CLEANUP_MAX_STATUS_LOG_AGE ) {
@unlink( $file );
}
}
// If temp directory exists (should only be transient but just in case it is hanging around) make sure it's secured. BB will try to delete this directory but if it can't it will at least be checked to be secure.
if ( file_exists( backupbuddy_core::getTempDirectory() ) ) {
pb_backupbuddy::anti_directory_browsing( backupbuddy_core::getTempDirectory(), $die = false );
}
// Clean up any old cron file transfer locks.
$files = (array)glob( backupbuddy_core::getLogDirectory() . 'cronSend-*' );
foreach( $files as $file ) {
$file_stats = stat( $file );
if ( ( time() - $file_stats['mtime'] ) > backupbuddy_constants::CLEANUP_MAX_STATUS_LOG_AGE ) {
@unlink( $file );
}
}
// Alert user if no new backups FINISHED within X number of days if enabled. Max 1 email notification per 24 hours period.
if ( pb_backupbuddy::$options['no_new_backups_error_days'] > 0 ) {
if ( pb_backupbuddy::$options['last_backup_finish'] > 0 ) {
$time_since_last = time() - pb_backupbuddy::$options['last_backup_finish'];
$days_since_last = $time_since_last / 60 / 60 / 24;
if ( $days_since_last > pb_backupbuddy::$options['no_new_backups_error_days'] ) {
$last_sent = get_transient( 'pb_backupbuddy_no_new_backup_error' );
if ( false === $last_sent ) {
$last_sent = time();
set_transient( 'pb_backupbuddy_no_new_backup_error', $last_sent, (60*60*24) );
}
if ( ( time() - $last_sent ) > (60*60*24) ) { // 24hrs+ elapsed since last email sent.
$message = 'Alert! BackupBuddy is configured to notify you if no new backups have completed in `' . pb_backupbuddy::$options['no_new_backups_error_days'] . '` days. It has been `' . $days_since_last . '` days since your last completed backups.';
pb_backupbuddy::status( 'warning', $message );
backupbuddy_core::mail_error( $message );
}
}
}
}
// TODO: Check for orphaned .gz files in root from PCLZip.
// Cleanup backup itegrity portion of array (status logging info inside function).
/***** BEGIN CLEANUP LOGS *****/
// Purge old logs.
pb_backupbuddy::status( 'details', 'Cleaning up old logs.' );
$log_directory = backupbuddy_core::getLogDirectory();
// Purge individual backup status logs unmodified in certain number of hours.
$files = glob( $log_directory . 'status-*.txt' );
if ( is_array( $files ) && !empty( $files ) ) { // For robustness. Without open_basedir the glob() function returns an empty array for no match. With open_basedir in effect the glob() function returns a boolean false for no match.
foreach( $files as $file ) {
$file_stats = stat( $file );
if ( ( time() - $file_stats['mtime'] ) > backupbuddy_constants::CLEANUP_MAX_STATUS_LOG_AGE ) {
@unlink( $file );
}
}
}
// Purge site-wide log if over certain size.
$files = glob( $log_directory . 'log-*.txt' );
if ( is_array( $files ) && !empty( $files ) ) { // For robustness. Without open_basedir the glob() function returns an empty array for no match. With open_basedir in effect the glob() function returns a boolean false for no match.
foreach( $files as $file ) {
$file_stats = stat( $file );
if ( $file_stats['size'] > ( $max_site_log_size ) ) {
backupbuddy_core::mail_error( 'NOTICE ONLY (not an error): A BackupBuddy log file has exceeded the size threshold of ' . $max_site_log_size . ' KB and has been deleted to maintain performance. This is only a notice. Deleted log file: ' . $file . '.' );
@unlink( $file );
}
}
}
/***** END CLEANUP LOGS *****/
// Cleanup any temporary local destinations.
pb_backupbuddy::status( 'details', 'Cleaning up any temporary local destinations.' );
foreach( pb_backupbuddy::$options['remote_destinations'] as $destination_id => $destination ) {
if ( ( $destination['type'] == 'local' ) && ( isset( $destination['temporary'] ) && ( $destination['temporary'] === true ) ) ) { // If local and temporary.
if ( ( time() - $destination['created'] ) > $backup_age_limit ) { // Older than 12 hours; clear out!
pb_backupbuddy::status( 'details', 'Cleaned up stale local destination `' . $destination_id . '`.' );
unset( pb_backupbuddy::$options['remote_destinations'][$destination_id] );
pb_backupbuddy::save();
}
}
}
// Cleanup excess remote sending stats.
pb_backupbuddy::status( 'details', 'Cleaning up remote send stats.' );
backupbuddy_core::trim_remote_send_stats();
// Verify directory existance and anti-directory browsing is in place everywhere.
backupbuddy_core::verify_directories( $skipTempGeneration = true );
require_once( pb_backupbuddy::plugin_path() . '/classes/fileoptions.php' );
// Mark any backups noted as in progress to timed out if taking too long. Send error email is scheduled and failed or timed out.
// Also, Purge fileoptions files without matching backup file in existance that are older than 30 days.
pb_backupbuddy::status( 'details', 'Cleaning up old backup fileoptions option files.' );
$fileoptions_directory = backupbuddy_core::getLogDirectory() . 'fileoptions/';
$files = glob( $fileoptions_directory . '*.txt' );
if ( ! is_array( $files ) ) {
$files = array();
}
foreach( $files as $file ) {
pb_backupbuddy::status( 'details', 'Fileoptions instance #43.' );
$backup_options = new pb_backupbuddy_fileoptions( $file, $read_only = false );
if ( true !== ( $result = $backup_options->is_ok() ) ) {
pb_backupbuddy::status( 'error', 'Error retrieving fileoptions file `' . $file . '`. Err 335353266.' );
} else {
if ( isset( $backup_options->options['archive_file'] ) ) {
//error_log( print_r( $backup_options->options, true ) );
if ( FALSE === $backup_options->options['finish_time'] ) {
// Failed & already handled sending notification.
} elseif ( $backup_options->options['finish_time'] == -1 ) {
// Cancelled manually
} elseif ( ( $backup_options->options['finish_time'] >= $backup_options->options['start_time'] ) && ( 0 != $backup_options->options['start_time'] ) ) {
// Completed
} else { // Timed out or in progress.
$secondsAgo = time() - $backup_options->options['updated_time'];
if ( $secondsAgo > backupbuddy_constants::TIME_BEFORE_CONSIDERED_TIMEOUT ) { // If 24hrs passed since last update to backup then mark this timeout as failed.
if ( 'scheduled' == $backup_options->options['trigger'] ) { // SCHEDULED BACKUP TIMED OUT.
// Determine the first step to not finish.
$timeoutStep = '';
foreach( $backup_options->options['steps'] as $step ) {
if ( 0 == $step['finish_time'] ) {
$timeoutStep = $step['function'];
break;
}
}
$timeoutMessage = '';
if ( '' != $timeoutStep ) {
if ( 'backup_create_database_dump' == $timeoutStep ) {
$timeoutMessage = 'The database dump step appears to have timed out. Make sure your database is not full of unwanted logs or clutter.';
} elseif ( 'backup_zip_files' == $timeoutStep ) {
$timeoutMessage = 'The zip archive creation step appears to have timed out. Try turning off zip compression to significantly speed up the process or exclude large files.';
} elseif ( 'send_remote_destination' == $timeoutStep ) {
$timeoutMessage = 'The remote transfer step appears to have timed out. Try turning on chunking in the destination settings to break up the file transfer into multiple steps.';
} else {
$timeoutMessage = 'The step function `' . $timeoutStep . '` appears to have timed out.';
}
}
$error_message = 'Scheduled BackupBuddy backup started `' . pb_backupbuddy::$format->time_ago( $backup_options->options['start_time'] ) . '` ago likely timed out. ' . $timeoutMessage . ' Check the error log for further details and/or manually create a backup to test for problems.';
pb_backupbuddy::status( 'error', $error_message );
if ( $secondsAgo < backupbuddy_constants::CLEANUP_MAX_AGE_TO_NOTIFY_TIMEOUT ) { // Prevents very old timed out backups from triggering email send.
backupbuddy_core::mail_error( $error_message );
}
} // end scheduled.
$backup_options->options['finish_time'] = FALSE; // Consider officially timed out. If scheduled backup then an error notification will have been sent.
$backup_options->save();
}
}
if ( ! file_exists( $backup_options->options['archive_file'] ) ) { // No corresponding backup ZIP file.
$modified = filemtime( $file );
if ( ( time() - $modified ) > backupbuddy_constants::MAX_SECONDS_TO_KEEP_ORPHANED_FILEOPTIONS_FILES ) { // Too many days old so delete.
if ( false === unlink( $file ) ) {
pb_backupbuddy::status( 'error', 'Unable to delete orphaned fileoptions file `' . $file . '`.' );
}
if ( file_exists( $file . '.lock' ) ) {
@unlink( $file . '.lock' );
}
} else {
// Do not delete orphaned fileoptions because it is not old enough. Recent backups page needs these to list the backup.
}
} else { // Backup ZIP file exists.
}
}
}
} // end foreach.
// Mark any timed out remote sends as timed out.
$remote_sends = array();
$send_fileoptions = pb_backupbuddy::$filesystem->glob_by_date( backupbuddy_core::getLogDirectory() . 'fileoptions/send-*.txt' );
if ( ! is_array( $send_fileoptions ) ) {
$send_fileoptions = array();
}
foreach( $send_fileoptions as $send_fileoption ) {
$send_id = str_replace( '.txt', '', str_replace( 'send-', '', basename( $send_fileoption ) ) );
pb_backupbuddy::status( 'details', 'About to load fileoptions data.' );
require_once( pb_backupbuddy::plugin_path() . '/classes/fileoptions.php' );
pb_backupbuddy::status( 'details', 'Fileoptions instance #23.' );
$fileoptions_obj = new pb_backupbuddy_fileoptions( backupbuddy_core::getLogDirectory() . 'fileoptions/send-' . $send_id . '.txt', $read_only = false, $ignore_lock = false, $create_file = false );
if ( true !== ( $result = $fileoptions_obj->is_ok() ) ) {
pb_backupbuddy::status( 'error', __('Fatal Error #9034.32393. Unable to access fileoptions data.', 'it-l10n-backupbuddy' ) . ' Error: ' . $result );
return false;
}
// Don't do anything for success, failure, or already-marked as -1 finish time.
if ( ( 'success' == $fileoptions_obj->options['status'] ) || ( 'failure' == $fileoptions_obj->options['status'] ) || ( -1 == $fileoptions_obj->options['finish_time'] ) ) {
continue;
}
// Older format did not include updated_time.
if ( ! isset( $fileoptions_obj->options['update_time'] ) ) {
continue;
}
$secondsAgo = time() - $fileoptions_obj->options['update_time'];
if ( $secondsAgo > backupbuddy_constants::TIME_BEFORE_CONSIDERED_TIMEOUT ) { // If 24hrs passed since last update to backup then mark this timeout as failed.
backupbuddy_core::remoteSendRetry( $fileoptions_obj, $send_id, pb_backupbuddy::$options['remote_send_timeout_retries'] );
if ( 'timeout' != $fileoptions_obj->options['status'] ) { // Do not send email if status is 'timeout' since either already sent or old-style status marking (pre-v6.0).
// Calculate destination title and type for error email.
$destination_title = '';
$destination_type = '';
if ( isset( pb_backupbuddy::$options['remote_destinations'][$fileoptions_obj->options['destination'] ] ) ) {
$destination_title = pb_backupbuddy::$options['remote_destinations'][$fileoptions_obj->options['destination'] ]['title'];
$destination_type = backupbuddy_core::pretty_destination_type( pb_backupbuddy::$options['remote_destinations'][$fileoptions_obj->options['destination'] ]['type'] );
}
$error_message = 'A remote destination send started `' . pb_backupbuddy::$format->time_ago( $fileoptions_obj->options['start_time'] ) . '` ago sending to the destination titled `' . $destination_title . '` of type `' . $destination_type . '` likely timed out. BackupBuddy will attempt to retry this failed transfer ONCE. If the second atempt succeeds the failed attempt will be replaced in the recent sends list. Check the error log for further details and/or manually send a backup to test for problems.';
pb_backupbuddy::status( 'error', $error_message );
if ( $secondsAgo < backupbuddy_constants::CLEANUP_MAX_AGE_TO_NOTIFY_TIMEOUT ) { // Prevents very old timed out backups from triggering email send.
backupbuddy_core::mail_error( $error_message );
}
}
$fileoptions_obj->options['status'] = 'timeout';
$fileoptions_obj->options['finish_time'] = -1;
$fileoptions_obj->save();
}
unset( $fileoptions_obj );
}
// Handle high security mode archives directory .htaccess system. If high security backup directory mode: Make sure backup archives are NOT downloadable by default publicly. This is only lifted for ~8 seconds during a backup download for security. Overwrites any existing .htaccess in this location.
if ( pb_backupbuddy::$options['lock_archives_directory'] == '0' ) { // Normal security mode. Put normal .htaccess.
pb_backupbuddy::status( 'details', 'Removing .htaccess high security mode for backups directory. Normal mode .htaccess to be added next.' );
// Remove high security .htaccess.
if ( file_exists( backupbuddy_core::getBackupDirectory() . '.htaccess' ) ) {
$unlink_status = @unlink( backupbuddy_core::getBackupDirectory() . '.htaccess' );
if ( $unlink_status === false ) {
pb_backupbuddy::alert( 'Error #844594. Unable to temporarily remove .htaccess security protection on archives directory to allow downloading. Please verify permissions of the BackupBuddy archives directory or manually download via FTP.' );
}
}
// Place normal .htaccess.
pb_backupbuddy::anti_directory_browsing( backupbuddy_core::getBackupDirectory(), $die_on_fail );
} else { // High security mode. Make sure high security .htaccess in place.
pb_backupbuddy::status( 'details', 'Adding .htaccess high security mode for backups directory.' );
$htaccess_creation_status = @file_put_contents( backupbuddy_core::getBackupDirectory() . '.htaccess', 'deny from all' );
if ( $htaccess_creation_status === false ) {
pb_backupbuddy::alert( 'Error #344894545. Security Warning! Unable to create security file (.htaccess) in backups archive directory. This file prevents unauthorized downloading of backups should someone be able to guess the backup location and filenames. This is unlikely but for best security should be in place. Please verify permissions on the backups directory.' );
}
}
$temp_dir = get_temp_dir();
// Remove any copy of importbuddy.php in root.
pb_backupbuddy::status( 'details', 'Cleaning up any importbuddy scripts in site root if it exists & is not very recent.' );
$importbuddyFiles = glob( $temp_dir . 'importbuddy*.php' );
if ( ! is_array( $importbuddyFiles ) ) {
$importbuddyFiles = array();
}
foreach( $importbuddyFiles as $importbuddyFile ) {
$modified = filemtime( $importbuddyFile );
if ( ( FALSE === $modified ) || ( time() > ( $modified + backupbuddy_constants::CLEANUP_MAX_IMPORTBUDDY_AGE ) ) ) { // If time modified unknown OR was modified long enough ago.
pb_backupbuddy::status( 'details', 'Unlinked `' . basename( $importbuddyFile ) . '` in root of site.' );
unlink( $importbuddyFile );
} else {
pb_backupbuddy::status( 'details', 'SKIPPED unlinking `' . basename( $importbuddyFile ) . '` in root of site as it is fresh and may still be in use.' );
}
}
// Remove any copy of importbuddy directory in root.
pb_backupbuddy::status( 'details', 'Cleaning up importbuddy directory in site root if it exists & is not very recent.' );
if ( file_exists( ABSPATH . 'importbuddy/' ) ) {
$modified = filemtime( ABSPATH . 'importbuddy/' );
if ( ( FALSE === $modified ) || ( time() > ( $modified + backupbuddy_constants::CLEANUP_MAX_IMPORTBUDDY_AGE ) ) ) { // If time modified unknown OR was modified long enough ago.
pb_backupbuddy::status( 'details', 'Unlinked importbuddy directory recursively in root of site.' );
pb_backupbuddy::$filesystem->unlink_recursive( ABSPATH . 'importbuddy/' );
} else {
pb_backupbuddy::status( 'details', 'SKIPPED unlinked importbuddy directory recursively in root of site as it is fresh and may still be in use.' );
}
}
backupbuddy_core::cleanTempDir( $backup_age_limit );
// Cleanup any temp files from a failed restore within WordPress. (extract file feature).
pb_backupbuddy::status( 'details', 'Cleaning up temporary files from individual file / directory restores in directory `' . $temp_dir . '`...' );
$possibly_temp_restore_dirs = glob( $temp_dir . 'backupbuddy-*' );
if ( ! is_array( $possibly_temp_restore_dirs ) ) { $possibly_temp_restore_dirs = array(); }
foreach( $possibly_temp_restore_dirs as $possibly_temp_restore_dir ) {
if ( false === pb_backupbuddy::$filesystem->unlink_recursive( $possibly_temp_restore_dir ) ) { // Delete.
pb_backupbuddy::status( 'details', 'Unable to delete temporary holding directory `' . $possibly_temp_restore_dir . '`.' );
} else {
pb_backupbuddy::status( 'details', 'Cleaned up temporary files.' );
}
}
pb_backupbuddy::status( 'details', 'Individual file / directory restore cleanup complete.' );
// Remove any old temporary zip directories: wp-content/uploads/backupbuddy_backups/temp_zip_XXXX/. Logs any directories it cannot delete.
pb_backupbuddy::status( 'details', 'Cleaning up any old temporary zip directories in backup directory temp location `' . backupbuddy_core::getBackupDirectory() . 'temp_zip_XXXX/`.' );
$temp_directory = backupbuddy_core::getBackupDirectory() . 'temp_zip_*';
$files = glob( $temp_directory . '*' );
if ( is_array( $files ) && !empty( $files ) ) { // For robustness. Without open_basedir the glob() function returns an empty array for no match. With open_basedir in effect the glob() function returns a boolean false for no match.
foreach( $files as $file ) {
if ( ( strpos( $file, 'index.' ) !== false ) || ( strpos( $file, '.htaccess' ) !== false ) ) { // Index file or htaccess dont get deleted so go to next file.
continue;
}
$file_stats = stat( $file );
if ( ( time() - $file_stats['mtime'] ) > $backup_age_limit ) { // If older than 12 hours, delete the log.
if ( @pb_backupbuddy::$filesystem->unlink_recursive( $file ) === false ) {
$message = 'BackupBuddy was unable to clean up (delete) temporary directory/file: `' . $file . '`. You should manually delete it and/or verify proper file permissions to allow BackupBuddy to clean up for you.';
pb_backupbuddy::status( 'error', $message );
backupbuddy_core::mail_error( $message );
}
}
}
}
// Cleanup remote S3 multipart chunking.
foreach( pb_backupbuddy::$options['remote_destinations'] as $destination ) {
if ( $destination['type'] != 's3' ) { continue; }
if ( isset( $destination['max_chunk_size'] ) && ( $destination['max_chunk_size'] == '0' ) ) { continue; }
pb_backupbuddy::status( 'details', 'Found S3 Multipart Chunking Destinations to cleanup.' );
require_once( pb_backupbuddy::plugin_path() . '/destinations/bootstrap.php' );
$cleanup_result = pb_backupbuddy_destinations::multipart_cleanup( $destination );
/*
if ( true === $cleanup_result ) {
pb_backupbuddy::status( 'details', 'S3 Multipart Chunking Cleanup Success.' );
} else {
pb_backupbuddy::status( 'error', 'S3 Multipart Chunking Cleanup FAILURE. Manually cleanup stalled multipart send via S3 or try again later.' );
}
*/
}
// Clean up any temp rollback or deployment database tables.
backupbuddy_core::cleanup_temp_tables();
// Cleanup any cron schedules pointing to non-existing schedules.
$cron = get_option('cron');
// Loop through each cron time to create $crons array for displaying later.
$crons = array();
foreach ( (array) $cron as $time => $cron_item ) {
if ( is_numeric( $time ) ) {
// Loop through each schedule for this time
foreach ( (array) $cron_item as $hook_name => $event ) {
foreach ( (array) $event as $item_name => $item ) {
if ( 'pb_backupbuddy-cron_scheduled_backup' == $hook_name ) { // scheduled backup
if ( !empty( $item['args'] ) ) {
if ( ! isset( pb_backupbuddy::$options['schedules'][ $item['args'][0] ] ) ) { // BB schedule does not exist so delete this cron item.
if ( FALSE === backupbuddy_core::unschedule_event( $time, $hook_name, $item['args'] ) ) { // Delete the scheduled cron.
pb_backupbuddy::status( 'error', 'Error #5657667675b. Unable to delete CRON job. Please see your BackupBuddy error log for details.' );
} else {
pb_backupbuddy::status( 'details', 'Removed stale cron scheduled backup.' );
}
}
} else { // No args, something wrong so delete it.
if ( FALSE === backupbuddy_core::unschedule_event( $time, $hook_name, $item['args'] ) ) { // Delete the scheduled cron.
pb_backupbuddy::status( 'error', 'Error #5657667675c. Unable to delete CRON job. Please see your BackupBuddy error log for details.' );
} else {
pb_backupbuddy::status( 'details', 'Removed stale cron scheduled backup which had no arguments.' );
}
}
}
} // End foreach.
unset( $item );
unset( $item_name );
} // End foreach.
unset( $event );
unset( $hook_name );
} // End if is_numeric.
} // End foreach.
unset( $cron_item );
unset( $time );
@clearstatcache(); // Clears file info stat cache.
pb_backupbuddy::status( 'message', 'Finished cleanup procedure.' );