Explorer: drag/drop dump files

Closes #59

Author: fremag

MemoScope/MemoScopeForm.Designer.cs

@@ -8,6 +8,7 @@
 using WinFwk.UIModules;
 using WinFwk.UIServices;
 using MemoScope.Modules.Workplace;
+using System.Linq;
 
 namespace MemoScope
 {
@@ -47,5 +48,32 @@ public void HandleMessage(ClrDumpLoadedMessage message)
             var dump = message.ClrDump;
             UIModuleFactory.CreateModule<TypeStatModule>( tsm => tsm.Setup(dump), tsm => DockModule(tsm));
         }
+
+        private void MemoScopeForm_DragEnter(object sender, DragEventArgs e)
+        {
+            if (e.Data.GetDataPresent(DataFormats.FileDrop))
+            {
+                e.Effect = DragDropEffects.Copy;
+            }
+        }
+
+        private void MemoScopeForm_DragDrop(object sender, DragEventArgs e)
+        {
+            string[] files = (string[])e.Data.GetData(DataFormats.FileDrop);
+            var fileInfos = files.Select(f => new FileInfo(f));
+            var filteredFileInfos = fileInfos.Where( 
+                fi => fi.Extension.Equals(".dmp", System.StringComparison.InvariantCultureIgnoreCase)
+            );
+            if (filteredFileInfos.Any())
+            {
+                msgBus.SendMessage(new OpenDumpRequest(filteredFileInfos));
+                var directory = filteredFileInfos.First().DirectoryName;
+                UIModuleFactory.CreateModule<ExplorerModule>(module => { module.SetUp(directory); }, module => DockModule(module, DockState.DockLeft));
+            }
+            else
+            {
+                MessageBox.Show("Dropped files must have a .dmp extension !");
+            }
+        }
     }
 }

MemoScope/MemoScopeForm.cs

@@ -102,6 +102,12 @@ private void OpenFilesFromData(IEnumerable<AbstractDumpExplorerData> datas)
             MessageBus.SendMessage(new OpenDumpRequest(fileInfos));
         }
 
+        internal void SetUp(string directory)
+        {
+            tbRootDir.Text = directory;
+            RefreshRootDir();
+        }
+
         private void btnLoad_Click(object sender, System.EventArgs e)
         {
             var fileInfos = dtlvExplorer.CheckedObjects.OfType<AbstractDumpExplorerData>().Where(data => data.FileInfo != null).Select(data => data.FileInfo).ToList();