source: branches/eraser6/6.0/Eraser.Manager/DirectExecutor.cs @ 1643

/* 
 * $Id$
 * Copyright 2008-2009 The Eraser Project
 * Original Author: Joel Low <lowjoel@users.sourceforge.net>
 * Modified By: Kasra Nassiri <cjax@users.sourceforge.net> @17/10/2008
 * Modified By: 
 * 
 * This file is part of Eraser.
 * 
 * Eraser is free software: you can redistribute it and/or modify it under the
 * terms of the GNU General Public License as published by the Free Software
 * Foundation, either version 3 of the License, or (at your option) any later
 * version.
 * 
 * Eraser is distributed in the hope that it will be useful, but WITHOUT ANY
 * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
 * A PARTICULAR PURPOSE. See the GNU General Public License for more details.
 * 
 * A copy of the GNU General Public License can be found at
 * <http://www.gnu.org/licenses/>.
 */

using System;
using System.Collections.Generic;
using System.Collections.Specialized;
using System.Text;
using System.Threading;
using System.IO;

using Eraser.Util;
using System.Security.Principal;
using System.Runtime.Serialization;
using System.Runtime.Serialization.Formatters.Binary;
using System.Security.Permissions;

namespace Eraser.Manager
{
    /// <summary>
    /// The DirectExecutor class is used by the Eraser GUI directly when the program
    /// is run without the help of a Service.
    /// </summary>
    public class DirectExecutor : Executor
    {
        public DirectExecutor()
        {
            TaskAdded += OnTaskAdded;
            TaskDeleted += OnTaskDeleted;
            tasks = new DirectExecutorTasksCollection(this);
            thread = new Thread(Main);
        }

        protected override void Dispose(bool disposing)
        {
            if (disposing)
            {
                thread.Abort();
                schedulerInterrupt.Set();
                schedulerInterrupt.Close();
            }

            base.Dispose(disposing);
        }

        public override void Run()
        {
            thread.CurrentUICulture = Thread.CurrentThread.CurrentUICulture;
            thread.Start();
        }

        public override void QueueTask(Task task)
        {
            lock (tasksLock)
            {
                //Queue the task to be run immediately.
                DateTime executionTime = DateTime.Now;
                if (!scheduledTasks.ContainsKey(executionTime))
                    scheduledTasks.Add(executionTime, new List<Task>());
                scheduledTasks[executionTime].Add(task);
                schedulerInterrupt.Set();
            }
        }

        public override void ScheduleTask(Task task)
        {
            RecurringSchedule schedule = task.Schedule as RecurringSchedule;
            if (schedule == null)
                return;

            DateTime executionTime = (schedule.MissedPreviousSchedule &&
                ManagerLibrary.Settings.ExecuteMissedTasksImmediately) ?
                    DateTime.Now : schedule.NextRun;

            lock (tasksLock)
            {
                if (!scheduledTasks.ContainsKey(executionTime))
                    scheduledTasks.Add(executionTime, new List<Task>());
                scheduledTasks[executionTime].Add(task);
            }
        }

        public override void QueueRestartTasks()
        {
            lock (tasksLock)
            {
                foreach (Task task in Tasks)
                    if (task.Schedule == Schedule.RunOnRestart)
                        QueueTask(task);
            }
        }

        public override void UnqueueTask(Task task)
        {
            lock (tasksLock)
                for (int i = 0; i != scheduledTasks.Count; ++i)
                    for (int j = 0; j < scheduledTasks.Values[i].Count; )
                    {
                        Task currentTask = scheduledTasks.Values[i][j];
                        if (currentTask == task &&
                            (!(currentTask.Schedule is RecurringSchedule) ||
                                ((RecurringSchedule)currentTask.Schedule).NextRun != scheduledTasks.Keys[i]))
                        {
                            scheduledTasks.Values[i].RemoveAt(j);
                        }
                        else
                        {
                            ++j;
                        }
                    }
        }

        internal override bool IsTaskQueued(Task task)
        {
            lock (tasksLock)
                foreach (KeyValuePair<DateTime, List<Task>> tasks in scheduledTasks)
                    foreach (Task i in tasks.Value)
                        if (task == i)
                            if (task.Schedule is RecurringSchedule)
                            {
                                if (((RecurringSchedule)task.Schedule).NextRun != tasks.Key)
                                    return true;
                            }
                            else
                                return true;

            return false;
        }

        private void OnTaskAdded(object sender, TaskEventArgs e)
        {
            e.Task.TaskEdited += OnTaskEdited;
        }

        private void OnTaskEdited(object sender, TaskEventArgs e)
        {
            //Find all schedule entries containing the task - since the user cannot make
            //edits to the task when it is queued (only if it is scheduled) remove
            //all task references and add them back
            lock (tasksLock)
                for (int i = 0; i != scheduledTasks.Count; ++i)
                    for (int j = 0; j < scheduledTasks.Values[i].Count; )
                    {
                        Task currentTask = scheduledTasks.Values[i][j];
                        if (currentTask == e.Task)
                            scheduledTasks.Values[i].RemoveAt(j);
                        else
                            j++;
                    }

            //Then reschedule the task
            if (e.Task.Schedule is RecurringSchedule)
                ScheduleTask(e.Task);
        }

        private void OnTaskDeleted(object sender, TaskEventArgs e)
        {
            e.Task.TaskEdited -= OnTaskEdited;
        }

        public override ExecutorTasksCollection Tasks
        {
            get
            {
                return tasks;
            }
        }

        /// <summary>
        /// The thread entry point for this object. This object operates on a queue
        /// and hence the thread will sequentially execute tasks.
        /// </summary>
        private void Main()
        {
            //The waiting thread will utilize a polling loop to check for new
            //scheduled tasks. This will be checked every 30 seconds. However,
            //when the thread is waiting for a new task, it can be interrupted.
            while (thread.ThreadState != ThreadState.AbortRequested)
            {
                //Check for a new task
                Task task = null;
                lock (tasksLock)
                {
                    while (scheduledTasks.Count != 0)
                        if (scheduledTasks.Values[0].Count == 0)
                        {
                            //Clean all all time slots at the start of the queue which are
                            //empty
                            scheduledTasks.RemoveAt(0);
                        }
                        else
                        {
                            if (scheduledTasks.Keys[0] <= DateTime.Now)
                            {
                                List<Task> tasks = scheduledTasks.Values[0];
                                task = tasks[0];
                                tasks.RemoveAt(0);
                            }

                            //Do schedule queue maintenance: clean up all empty timeslots
                            if (task == null)
                            {
                                for (int i = 0; i < scheduledTasks.Count; )
                                    if (scheduledTasks.Values[i].Count == 0)
                                        scheduledTasks.RemoveAt(i);
                                    else
                                        ++i;
                            }

                            break;
                        }
                }

                if (task != null)
                {
                    //Set the currently executing task.
                    currentTask = task;

                    try
                    {
                        //Prevent the system from sleeping.
                        KernelApi.SetThreadExecutionState(ThreadExecutionState.Continuous |
                            ThreadExecutionState.SystemRequired);

                        //Broadcast the task started event.
                        task.Canceled = false;
                        task.OnTaskStarted(new TaskEventArgs(task));
                        OnTaskProcessing(new TaskEventArgs(task));

                        //Start a new log session to separate this session's events
                        //from previous ones.
                        task.Log.Entries.NewSession();

                        //Run the task
                        TaskProgressManager progress = new TaskProgressManager(task);
                        foreach (ErasureTarget target in task.Targets)
                            try
                            {
                                progress.Event.CurrentTarget = target;
                                ++progress.Event.CurrentTargetIndex;

                                UnusedSpaceTarget unusedSpaceTarget =
                                    target as UnusedSpaceTarget;
                                FileSystemObjectTarget fileSystemObjectTarget =
                                    target as FileSystemObjectTarget;

                                if (unusedSpaceTarget != null)
                                    EraseUnusedSpace(task, unusedSpaceTarget, progress);
                                else if (fileSystemObjectTarget != null)
                                    EraseFilesystemObject(task, fileSystemObjectTarget, progress);
                                else
                                    throw new ArgumentException(S._("Unknown erasure target."));
                            }
                            catch (FatalException)
                            {
                                throw;
                            }
                            catch (OperationCanceledException)
                            {
                                throw;
                            }
                            catch (Exception e)
                            {
                                task.Log.LastSessionEntries.Add(new LogEntry(e.Message, LogLevel.Error));
                            }
                    }
                    catch (FatalException e)
                    {
                        task.Log.LastSessionEntries.Add(new LogEntry(e.Message, LogLevel.Fatal));
                    }
                    catch (OperationCanceledException e)
                    {
                        task.Log.LastSessionEntries.Add(new LogEntry(e.Message, LogLevel.Fatal));
                    }
                    catch (Exception e)
                    {
                        task.Log.LastSessionEntries.Add(new LogEntry(e.Message, LogLevel.Error));
                    }
                    finally
                    {
                        //Allow the system to sleep again.
                        KernelApi.SetThreadExecutionState(ThreadExecutionState.Continuous);

                        //If the task is a recurring task, reschedule it since we are done.
                        if (task.Schedule is RecurringSchedule)
                            ((RecurringSchedule)task.Schedule).Reschedule(DateTime.Now);

                        //If the task is an execute on restart task, it is only run
                        //once and can now be restored to an immediately executed task
                        if (task.Schedule == Schedule.RunOnRestart)
                            task.Schedule = Schedule.RunNow;

                        //And the task finished event.
                        task.OnTaskFinished(new TaskEventArgs(task));
                        OnTaskProcessed(new TaskEventArgs(task));

                        //Remove the actively executing task from our instance variable
                        currentTask = null;
                    }
                }

                //Wait for half a minute to check for the next scheduled task.
                schedulerInterrupt.WaitOne(30000, false);
            }
        }

        /// <summary>
        /// Manages the progress for any operation.
        /// </summary>
        private class ProgressManager
        {
            /// <summary>
            /// Starts measuring the speed of the task.
            /// </summary>
            public void Start()
            {
                startTime = DateTime.Now;
            }

            /// <summary>
            /// Tracks the amount of the operation completed.
            /// </summary>
            public long Completed
            {
                get
                {
                    return completed;
                }
                set
                {
                    lastCompleted += value - completed;
                    completed = value;
                }
            }

            /// <summary>
            /// The amount to reach before the operation completes.
            /// </summary>
            public long Total
            {
                get
                {
                    return total;
                }
                set
                {
                    total = value;
                }
            }

            /// <summary>
            /// Gets the percentage of the operation completed.
            /// </summary>
            public float Progress
            {
                get
                {
                    return (float)((double)Completed / Total);
                }
            }

            /// <summary>
            /// Computes the speed of the erase, in units of completion per second,
            /// based on the information collected in the previous 15 seconds.
            /// </summary>
            public int Speed
            {
                get
                {
                    if (DateTime.Now == startTime)
                        return 0;

                    if ((DateTime.Now - lastSpeedCalc).Seconds < 5 && lastSpeed != 0)
                        return lastSpeed;

                    //Calculate how much time has passed
                    double timeElapsed = (DateTime.Now - lastSpeedCalc).TotalSeconds;
                    if (timeElapsed == 0.0)
                        return 0;

                    //Then compute the speed of the calculation
                    lastSpeed = (int)(lastCompleted / timeElapsed);
                    lastSpeedCalc = DateTime.Now;
                    lastCompleted = 0;
                    return lastSpeed;
                }
            }

            /// <summary>
            /// Calculates the estimated amount of time left based on the total
            /// amount of information to erase and the current speed of the erase
            /// </summary>
            public TimeSpan TimeLeft
            {
                get
                {
                    if (Speed == 0)
                        return new TimeSpan(0, 0, -1);
                    return new TimeSpan(0, 0, (int)((Total - Completed) / Speed));
                }
            }

            /// <summary>
            /// The starting time of the operation, used to determine average speed.
            /// </summary>
            private DateTime startTime;

            /// <summary>
            /// The last time a speed calculation was computed so that speed is not
            /// computed too often.
            /// </summary>
            private DateTime lastSpeedCalc;

            /// <summary>
            /// The last calculated speed of the operation.
            /// </summary>
            private int lastSpeed;

            /// <summary>
            /// The amount of the operation completed since the last speed computation.
            /// </summary>
            private long lastCompleted;

            /// <summary>
            /// The amount of the operation completed.
            /// </summary>
            private long completed;

            /// <summary>
            /// The amount to reach before the operation is completed.
            /// </summary>
            private long total;
        }

        /// <summary>
        /// Provides a common interface to track the progress made by the Erase functions.
        /// </summary>
        private class TaskProgressManager : ProgressManager
        {
            /// <summary>
            /// Constructor.
            /// </summary>
            public TaskProgressManager(Task task)
            {
                foreach (ErasureTarget target in task.Targets)
                    Total += target.TotalData;

                Event = new TaskProgressEventArgs(task);
                Start();
            }

            /// <summary>
            /// The TaskProgressEventArgs object representing the progress of the current
            /// task.
            /// </summary>
            public TaskProgressEventArgs Event
            {
                get
                {
                    return evt;
                }
                set
                {
                    evt = value;
                }
            }

            private TaskProgressEventArgs evt;
        }

        /// <summary>
        /// Executes a unused space erase.
        /// </summary>
        /// <param name="task">The task currently being executed</param>
        /// <param name="target">The target of the unused space erase.</param>
        /// <param name="progress">The progress manager object managing the progress of the task</param>
        private void EraseUnusedSpace(Task task, UnusedSpaceTarget target, TaskProgressManager progress)
        {
            //Check for sufficient privileges to run the unused space erasure.
            if (!AdvApi.IsAdministrator())
            {
                if (Environment.OSVersion.Platform == PlatformID.Win32NT &&
                    Environment.OSVersion.Version >= new Version(6, 0))
                {
                    throw new UnauthorizedAccessException(S._("The program does not have the " +
                        "required permissions to erase the unused space on disk. Run the program " +
                        "as an administrator and retry the operation."));
                }
                else
                    throw new UnauthorizedAccessException(S._("The program does not have the " +
                        "required permissions to erase the unused space on disk"));
            }

            //If the user is under disk quotas, log a warning message
            if (VolumeInfo.FromMountpoint(target.Drive).HasQuota)
                task.Log.LastSessionEntries.Add(new LogEntry(S._("The drive which is having its " +
                    "unused space erased has disk quotas active. This will prevent the complete " +
                    "erasure of unused space and will pose a security concern"), LogLevel.Warning));

            //Get the erasure method if the user specified he wants the default.
            ErasureMethod method = target.Method;

            //Make a folder to dump our temporary files in
            DirectoryInfo info = new DirectoryInfo(target.Drive);
            VolumeInfo volInfo = VolumeInfo.FromMountpoint(target.Drive);
            FileSystem fsManager = FileSystemManager.Get(volInfo);
            
            //Erase the cluster tips of every file on the drive.
            if (target.EraseClusterTips)
            {
                progress.Event.CurrentTargetStatus = S._("Searching for files' cluster tips...");
                progress.Event.CurrentTargetTotalPasses = method.Passes;
                progress.Event.CurrentItemProgress = -1.0f;
                progress.Event.TimeLeft = new TimeSpan(0, 0, -1);

                //Start counting statistics
                ProgressManager tipProgress = new ProgressManager();
                tipProgress.Start();

                //Define the callback handlers
                ClusterTipsSearchProgress searchProgress = delegate(string path)
                    {
                        progress.Event.CurrentItemName = path;
                        task.OnProgressChanged(progress.Event);

                        if (currentTask.Canceled)
                            throw new OperationCanceledException(S._("The task was cancelled."));
                    };

                ClusterTipsEraseProgress eraseProgress =
                    delegate(int currentFile, int totalFiles, string currentFilePath)
                    {
                        tipProgress.Total = totalFiles;
                        tipProgress.Completed = currentFile;

                        progress.Event.CurrentTargetStatus = S._("Erasing cluster tips...");
                        progress.Event.CurrentItemName = currentFilePath;
                        progress.Event.CurrentItemProgress = tipProgress.Progress;
                        progress.Event.CurrentTargetProgress = progress.Event.CurrentItemProgress / 10;
                        progress.Event.TimeLeft = tipProgress.TimeLeft;
                        task.OnProgressChanged(progress.Event);

                        if (currentTask.Canceled)
                            throw new OperationCanceledException(S._("The task was cancelled."));
                    };

                fsManager.EraseClusterTips(VolumeInfo.FromMountpoint(target.Drive),
                    method, task.Log, searchProgress, eraseProgress);
            }

            info = info.CreateSubdirectory(Path.GetFileName(
                FileSystem.GenerateRandomFileName(info, 18)));
            try
            {
                //Set the folder's compression flag off since we want to use as much
                //space as possible
                if (Eraser.Util.File.IsCompressed(info.FullName))
                    Eraser.Util.File.SetCompression(info.FullName, false);

                //Continue creating files while there is free space.
                progress.Event.CurrentTargetStatus = S._("Erasing unused space...");
                progress.Event.CurrentItemName = target.Drive;
                task.OnProgressChanged(progress.Event);
                while (volInfo.AvailableFreeSpace > 0)
                {
                    //Generate a non-existant file name
                    string currFile = FileSystem.GenerateRandomFileName(info, 18);

                    //Create the stream
                    using (FileStream stream = new FileStream(currFile, FileMode.CreateNew,
                        FileAccess.Write, FileShare.None, 8, FileOptions.WriteThrough))
                    {
                        //Set the length of the file to be the amount of free space left
                        //or the maximum size of one of these dumps.
                        long streamLength = Math.Min(ErasureMethod.FreeSpaceFileUnit,
                            volInfo.AvailableFreeSpace);

                        //Handle IO exceptions gracefully, because the filesystem
                        //may require more space than demanded by us for file allocation.
                        while (true)
                            try
                            {
                                stream.SetLength(streamLength);
                                break;
                            }
                            catch (IOException)
                            {
                                if (streamLength > volInfo.ClusterSize)
                                    streamLength -= volInfo.ClusterSize;
                                else
                                    throw;
                            }

                        //Then run the erase task
                        method.Erase(stream, long.MaxValue,
                            PrngManager.GetInstance(ManagerLibrary.Settings.ActivePrng),
                            delegate(long lastWritten, long totalData, int currentPass)
                            {
                                progress.Completed = Math.Min(progress.Total,
                                    progress.Completed + lastWritten);
                                progress.Event.CurrentItemPass = currentPass;
                                progress.Event.CurrentItemProgress = progress.Progress;
                                if (target.EraseClusterTips)
                                    progress.Event.CurrentTargetProgress = (float)
                                        (0.1f + progress.Event.CurrentItemProgress * 0.8f);
                                else
                                    progress.Event.CurrentTargetProgress = (float)
                                        (progress.Event.CurrentItemProgress * 0.9f);
                                progress.Event.TimeLeft = progress.TimeLeft;
                                task.OnProgressChanged(progress.Event);

                                if (currentTask.Canceled)
                                    throw new OperationCanceledException(S._("The task was cancelled."));
                            }
                        );
                    }
                }

                //Erase old resident file system table files
                progress.Event.CurrentItemName = S._("Old resident file system table files");
                task.OnProgressChanged(progress.Event);
                ProgressManager residentFilesProgress = new ProgressManager();
                residentFilesProgress.Start();
                fsManager.EraseOldFileSystemResidentFiles(volInfo, info, method,
                    delegate(int currentFile, int totalFiles)
                    {
                        residentFilesProgress.Completed = currentFile;
                        residentFilesProgress.Total = totalFiles;
                        progress.Event.CurrentItemProgress = residentFilesProgress.Progress;
                        progress.Event.TimeLeft = residentFilesProgress.TimeLeft;
                        task.OnProgressChanged(progress.Event);

                        if (currentTask.Canceled)
                            throw new OperationCanceledException(S._("The task was cancelled."));
                    }
                );
            }
            finally
            {
                //Remove the folder holding all our temporary files.
                progress.Event.CurrentTargetStatus = S._("Removing temporary files...");
                task.OnProgressChanged(progress.Event);
                fsManager.DeleteFolder(info);
            }

            //Then clean the old file system entries
            progress.Event.CurrentTargetStatus = S._("Erasing unused directory structures...");
            ProgressManager fsEntriesProgress = new ProgressManager();
            fsEntriesProgress.Start();
            fsManager.EraseDirectoryStructures(volInfo,
                delegate(int currentFile, int totalFiles)
                {
                    if (currentTask.Canceled)
                        throw new OperationCanceledException(S._("The task was cancelled."));

                    //Compute the progress
                    fsEntriesProgress.Total = totalFiles;
                    fsEntriesProgress.Completed = currentFile;

                    //Set the event parameters, then broadcast the progress event.
                    progress.Event.TimeLeft = fsEntriesProgress.TimeLeft;
                    progress.Event.CurrentItemProgress = fsEntriesProgress.Progress;
                    progress.Event.CurrentTargetProgress = (float)(
                        0.9 + progress.Event.CurrentItemProgress / 10);
                    task.OnProgressChanged(progress.Event);
                }
            );
        }

        /// <summary>
        /// Traverses the given folder and deletes it securely only if it is
        /// empty.
        /// </summary>
        /// <param name="info">The folder to check.</param>
        private delegate void FolderEraseDelegate(DirectoryInfo info);

        /// <summary>
        /// Erases a file or folder on the volume.
        /// </summary>
        /// <param name="task">The task currently being processed.</param>
        /// <param name="target">The target of the erasure.</param>
        /// <param name="progress">The progress manager for the current task.</param>
        private void EraseFilesystemObject(Task task, FileSystemObjectTarget target,
            TaskProgressManager progress)
        {
            //Retrieve the list of files to erase.
            long dataTotal = 0;
            List<string> paths = target.GetPaths(out dataTotal);

            //Get the erasure method if the user specified he wants the default.
            ErasureMethod method = target.Method;

            //Calculate the total amount of data required to finish the wipe.
            dataTotal = method.CalculateEraseDataSize(paths, dataTotal);

            //Set the event's current target status.
            progress.Event.CurrentTargetStatus = S._("Erasing files...");

            //Iterate over every path, and erase the path.
            for (int i = 0; i < paths.Count; ++i)
            {
                //Update the task progress
                progress.Event.CurrentTargetProgress = i / (float)paths.Count;
                progress.Event.CurrentTarget = target;
                progress.Event.CurrentItemName = paths[i];
                progress.Event.CurrentItemProgress = 0;
                progress.Event.CurrentTargetTotalPasses = method.Passes;
                task.OnProgressChanged(progress.Event);
                
                //Check that the file exists - we do not want to bother erasing nonexistant files
                StreamInfo info = new StreamInfo(paths[i]);
                if (!info.Exists)
                {
                    task.Log.LastSessionEntries.Add(new LogEntry(S._("The file {0} was not erased " +
                        "as the file does not exist.", paths[i]), LogLevel.Notice));
                    continue;
                }

                //Get the filesystem provider to handle the secure file erasures
                FileSystem fsManager = FileSystemManager.Get(
                    VolumeInfo.FromMountpoint(info.DirectoryName));

                bool isReadOnly = false;
                
                try
                {
                    //Remove the read-only flag, if it is set.
                    if (isReadOnly = info.IsReadOnly)
                        info.IsReadOnly = false;

                    //Make sure the file does not have any attributes which may affect
                    //the erasure process
                    if ((info.Attributes & FileAttributes.Compressed) != 0 || 
                        (info.Attributes & FileAttributes.Encrypted) != 0 ||
                        (info.Attributes & FileAttributes.SparseFile) != 0)
                    {
                        //Log the error
                        task.Log.LastSessionEntries.Add(new LogEntry(S._("The file {0} could " +
                            "not be erased because the file was either compressed, encrypted or " +
                            "a sparse file.", info.FullName), LogLevel.Error));
                    }

                    long itemWritten = 0;
                    fsManager.EraseFileSystemObject(info, method,
                        delegate(long lastWritten, long totalData, int currentPass)
                        {
                            dataTotal -= lastWritten;
                            progress.Completed += lastWritten;
                            progress.Event.CurrentItemPass = currentPass;
                            progress.Event.CurrentItemProgress = (float)
                                ((itemWritten += lastWritten) / (float)totalData);
                            progress.Event.CurrentTargetProgress =
                                (i + progress.Event.CurrentItemProgress) /
                                (float)paths.Count;
                            progress.Event.TimeLeft = progress.TimeLeft;
                            task.OnProgressChanged(progress.Event);

                            if (currentTask.Canceled)
                                throw new OperationCanceledException(S._("The task was cancelled."));
                        });

                    //Remove the file.
                    FileInfo fileInfo = info.File;
                    if (fileInfo != null)
                        fsManager.DeleteFile(fileInfo);
                }
                catch (UnauthorizedAccessException)
                {
                    task.Log.LastSessionEntries.Add(new LogEntry(S._("The file {0} could not " +
                        "be erased because the file's permissions prevent access to the file.",
                        info.FullName), LogLevel.Error));
                }
                catch (FileLoadException)
                {
                    if (!ManagerLibrary.Settings.ForceUnlockLockedFiles)
                        throw;

                    List<System.Diagnostics.Process> processes = new List<System.Diagnostics.Process>();
                    foreach (OpenHandle handle in OpenHandle.Items)
                        if (handle.Path == paths[i])
                            processes.Add(System.Diagnostics.Process.GetProcessById(handle.ProcessId));

                    string lockedBy = null;
                    if (processes.Count > 0)
                    {
                        StringBuilder processStr = new StringBuilder();
                        foreach (System.Diagnostics.Process process in processes)
                            processStr.AppendFormat(System.Globalization.CultureInfo.InvariantCulture,
                                "{0}, ", process.MainModule.FileName);

                        lockedBy = S._("(locked by {0})", processStr.ToString().Remove(processStr.Length - 2));
                    }

                    task.Log.LastSessionEntries.Add(new LogEntry(S._(
                        "Could not force closure of file \"{0}\" {1}", paths[i],
                        lockedBy == null ? string.Empty : lockedBy).Trim(), LogLevel.Error));
                }
                finally
                {
                    //Re-set the read-only flag if the file exists (i.e. there was an error)
                    if (isReadOnly && info.Exists && !info.IsReadOnly)
                        info.IsReadOnly = isReadOnly;
                }
            }

            //If the user requested a folder removal, do it.
            if (target is FolderTarget)
            {
                progress.Event.CurrentTargetStatus = S._("Removing folders...");
                
                //Remove all subfolders which are empty.
                FolderTarget fldr = (FolderTarget)target;
                FileSystem fsManager = FileSystemManager.Get(VolumeInfo.FromMountpoint(fldr.Path));
                FolderEraseDelegate eraseEmptySubFolders = null;
                eraseEmptySubFolders = delegate(DirectoryInfo info)
                {
                    foreach (DirectoryInfo subDir in info.GetDirectories())
                        eraseEmptySubFolders(subDir);

                    progress.Event.CurrentItemName = info.FullName;
                    task.OnProgressChanged(progress.Event);

                    FileSystemInfo[] files = info.GetFileSystemInfos();
                    if (files.Length == 0)
                        fsManager.DeleteFolder(info);
                };
                eraseEmptySubFolders(new DirectoryInfo(fldr.Path));

                if (fldr.DeleteIfEmpty)
                {
                    DirectoryInfo info = new DirectoryInfo(fldr.Path);
                    progress.Event.CurrentItemName = info.FullName;
                    task.OnProgressChanged(progress.Event);

                    //See if this is the root of a volume.
                    bool isVolumeRoot = info.Parent == null;
                    foreach (VolumeInfo volume in VolumeInfo.Volumes)
                        foreach (string mountPoint in volume.MountPoints)
                            if (info.FullName == mountPoint)
                                isVolumeRoot = true;

                    //If the folder is a mount point, then don't delete it. If it isn't,
                    //search for files under the folder to see if it is empty.
                    if (!isVolumeRoot && info.Exists && info.GetFiles("*", SearchOption.AllDirectories).Length == 0)
                        fsManager.DeleteFolder(info);
                }
            }

            //If the user was erasing the recycle bin, clear the bin.
            if (target is RecycleBinTarget)
            {
                progress.Event.CurrentTargetStatus = S._("Emptying recycle bin...");
                task.OnProgressChanged(progress.Event);

                ShellApi.EmptyRecycleBin(EmptyRecycleBinOptions.NoConfirmation |
                    EmptyRecycleBinOptions.NoProgressUI | EmptyRecycleBinOptions.NoSound);
            }
        }

        /// <summary>
        /// The thread object.
        /// </summary>
        private Thread thread;

        /// <summary>
        /// The lock preventing concurrent access for the tasks list and the
        /// tasks queue.
        /// </summary>
        private object tasksLock = new object();

        /// <summary>
        /// The queue of tasks. This queue is executed when the first element's
        /// timestamp (the key) has been past. This list assumes that all tasks
        /// are sorted by timestamp, smallest one first.
        /// </summary>
        private SortedList<DateTime, List<Task>> scheduledTasks =
            new SortedList<DateTime, List<Task>>();

        /// <summary>
        /// The task list associated with this executor instance.
        /// </summary>
        private DirectExecutorTasksCollection tasks;

        /// <summary>
        /// The currently executing task.
        /// </summary>
        Task currentTask;

        /// <summary>
        /// An automatically reset event allowing the addition of new tasks to
        /// interrupt the thread's sleeping state waiting for the next recurring
        /// task to be due.
        /// </summary>
        AutoResetEvent schedulerInterrupt = new AutoResetEvent(true);

        private class DirectExecutorTasksCollection : ExecutorTasksCollection
        {
            /// <summary>
            /// Constructor.
            /// </summary>
            /// <param name="executor">The <see cref="DirectExecutor"/> object owning
            /// this list.</param>
            public DirectExecutorTasksCollection(DirectExecutor executor)
                : base(executor)
            {
            }

            #region IList<Task> Members
            public override int IndexOf(Task item)
            {
                return list.IndexOf(item);
            }

            public override void Insert(int index, Task item)
            {
                item.Executor = Owner;
                lock (list)
                    list.Insert(index, item);

                //Call all the event handlers who registered to be notified of tasks
                //being added.
                Owner.OnTaskAdded(new TaskEventArgs(item));

                //If the task is scheduled to run now, break the waiting thread and
                //run it immediately
                if (item.Schedule == Schedule.RunNow)
                {
                    Owner.QueueTask(item);
                }
                //If the task is scheduled, add the next execution time to the list
                //of schduled tasks.
                else if (item.Schedule != Schedule.RunOnRestart)
                {
                    Owner.ScheduleTask(item);
                }
            }

            public override void RemoveAt(int index)
            {
                lock (list)
                {
                    Task task = list[index];
                    task.Cancel();
                    task.Executor = null;
                    list.RemoveAt(index);

                    //Call all event handlers registered to be notified of task deletions.
                    Owner.OnTaskDeleted(new TaskEventArgs(task));
                }
            }

            public override Task this[int index]
            {
                get
                {
                    lock (list)
                        return list[index];
                }
                set
                {
                    lock (list)
                        list[index] = value;
                }
            }
            #endregion

            #region ICollection<Task> Members
            public override void Add(Task item)
            {
                Insert(Count, item);
            }

            public override void Clear()
            {
                foreach (Task task in list)
                    Remove(task);
            }

            public override bool Contains(Task item)
            {
                lock (list)
                    return list.Contains(item);
            }

            public override void CopyTo(Task[] array, int arrayIndex)
            {
                lock (list)
                    list.CopyTo(array, arrayIndex);
            }

            public override int Count
            {
                get
                {
                    lock (list)
                        return list.Count;
                }
            }

            public override bool Remove(Task item)
            {
                lock (list)
                {
                    int index = list.IndexOf(item);
                    if (index < 0)
                        return false;

                    RemoveAt(index);
                }

                return true;
            }
            #endregion

            #region IEnumerable<Task> Members
            public override IEnumerator<Task> GetEnumerator()
            {
                return list.GetEnumerator();
            }
            #endregion

            public override void SaveToStream(Stream stream)
            {
                lock (list)
                    new BinaryFormatter().Serialize(stream, list);
            }

            public override void LoadFromStream(Stream stream)
            {
                //Load the list into the dictionary
                StreamingContext context = new StreamingContext(
                    StreamingContextStates.All, Owner);
                BinaryFormatter formatter = new BinaryFormatter(null, context);
                List<Task> deserialised = (List<Task>)formatter.Deserialize(stream);
                list.AddRange(deserialised);

                foreach (Task task in deserialised)
                {
                    Owner.OnTaskAdded(new TaskEventArgs(task));
                    if (task.Schedule is RecurringSchedule)
                        Owner.ScheduleTask(task);
                }
            }

            /// <summary>
            /// The data store for this object.
            /// </summary>
            private List<Task> list = new List<Task>();
        }
    }
}