Cosmos/source/Cosmos.Build.Windows/DebugWindow.xaml.cs

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Windows;
using System.Windows.Controls;
using System.Windows.Data;
using System.Windows.Documents;
using System.Windows.Input;
using System.Windows.Media;
using System.Windows.Media.Imaging;
using System.Windows.Shapes;
using System.Windows.Threading;
using Indy.IL2CPU;
using System.IO;

namespace Cosmos.Build.Windows {
    public partial class DebugWindow : Window {
        protected DebugModeEnum mDebugMode;
        protected SourceInfos mSourceMapping;
        protected List<Run> mLines = new List<Run>();
        protected FontFamily mFont = new FontFamily("Courier New");
        protected bool mAutoDisplay = false;
        protected bool mTracing = true;
        protected bool mBreak = false;
        protected RoutedCommand mStepCommand;
        protected DebugConnector mDebugConnector;

        protected void UpdateCaptions() {
            butnTrace.Content = "Trace " + (mTracing ? "Off" : "On");
            butnBreak.Content = mBreak ? "Continue" : "Break";
        }

        public DebugWindow() {
            InitializeComponent();

            mStepCommand = new RoutedCommand();
            UpdateCaptions();

            lboxLog.SelectionChanged += new SelectionChangedEventHandler(lboxLog_SelectionChanged);
            butnTrace.Click += new RoutedEventHandler(butnTrace_Click);
            butnTest.Click += new RoutedEventHandler(butnTest_Click);
            butnStep.Click += new RoutedEventHandler(butnStep_Click);
            butnBreak.Click += new RoutedEventHandler(butnBreak_Click);
            butnLogClear.Click += new RoutedEventHandler(butnLogClear_Click);
        }

        private void butnTrace_Click(object sender, RoutedEventArgs e) {
            mDebugConnector.SendCommand((byte)(mTracing ? 1 : 2));
            mTracing = !mTracing;
            UpdateCaptions();
        }

        private void butnLogClear_Click(object sender, RoutedEventArgs e) {
            lboxLog.Items.Clear();
        }

        private void butnBreak_Click(object sender, RoutedEventArgs e) {
            mDebugConnector.SendCommand(3);
            mBreak = !mBreak;
            UpdateCaptions();
            if (mBreak) {
                mAutoDisplay = true;
            }
        }

        private void butnStep_Click(object sender, RoutedEventArgs e) {
            mDebugConnector.SendCommand(4);
            mAutoDisplay = true;
        }

        private void butnTest_Click(object sender, RoutedEventArgs e) {
        }

        public void LoadSourceFile(string aPathname) {
            var xSourceCode = System.IO.File.ReadAllLines(aPathname);
            lablSourceFilename.Content = System.IO.Path.GetFileName(aPathname);
            var xPara = new Paragraph();
            mLines.Clear();
            fdsvSource.Document = new FlowDocument();
            fdsvSource.Document.PageWidth = 100 * 96;
            fdsvSource.Document.Blocks.Add(xPara);
            int xLineNo = 0;
            foreach (var xLine in xSourceCode) {
                Run xRun;

                xLineNo++;
                xRun = new Run(xLineNo.ToString().PadLeft(6) + " ");
                xRun.MouseDown += new MouseButtonEventHandler(xRun_MouseDown);
                xRun.FontFamily = mFont;
                xRun.Cursor = Cursors.Arrow;
                xRun.Background = Brushes.LightGray;
                xPara.Inlines.Add(xRun);

                xRun = new Run(xLine);
                xRun.FontFamily = mFont;
                mLines.Add(xRun);
                xPara.Inlines.Add(xRun);

                xPara.Inlines.Add(new LineBreak());
            }
        }

        private void xRun_MouseDown(object sender, MouseButtonEventArgs e) {
            var xRun = (Run)sender;
            xRun.Background = (xRun.Background == Brushes.Red) ? Brushes.LightGray : Brushes.Red;
        }

        protected Run Select(int aLine, int aColBegin, int aLength) {
            Run xRunSelected = null;
            if (aLength != 0) {
                var xPara = (Paragraph)fdsvSource.Document.Blocks.FirstBlock;
                var xSelectedLine = mLines[aLine];
                string xText = xSelectedLine.Text;
                if (aLength == -1) {
                    aLength = xText.Length - aColBegin;
                }

                if (aColBegin > 0) {
                    var xRunLeft = new Run(xText.Substring(0,
                                                           aColBegin - 1));
                    xRunLeft.FontFamily = mFont;
                    xPara.Inlines.InsertBefore(xSelectedLine,
                                               xRunLeft);
                }

                xRunSelected = new Run(xText.Substring(aColBegin,
                                                       aLength));
                xRunSelected.FontFamily = mFont;
                xRunSelected.Background = Brushes.Red;
                xPara.Inlines.InsertBefore(xSelectedLine,
                                           xRunSelected);

                if (aColBegin + aLength < xText.Length) {
                    var xRunRight = new Run(xText.Substring(aColBegin + aLength));
                    xRunRight.FontFamily = mFont;
                    xPara.Inlines.InsertBefore(xSelectedLine,
                                               xRunRight);
                }

                xPara.Inlines.Remove(xSelectedLine);
            }
            return xRunSelected;
        }

        public void SelectText(int aLineBegin, int aColBegin, int aLineEnd, int aColEnd) {
            aLineBegin--;
            aColBegin--;
            aLineEnd--;
            aColEnd--;
            //Currently can only be called once - need to fix it to reset so it can be called multiple times
            Run xRunSelected;
            if (aLineBegin == aLineEnd) {
                xRunSelected = Select(aLineBegin,
                                      aColBegin,
                                      aColEnd - aColBegin);
            } else {
                xRunSelected = Select(aLineBegin, aColBegin, -1);
                for (int i = aLineBegin + 1; i <= aLineEnd - 1; i++) {
                    Select(i, 0, -1);
                }
                Select(aLineEnd, 0, aColEnd + 1);
            }
            fdsvSource.UpdateLayout();
            if (xRunSelected != null) {
                xRunSelected.PreviousInline.BringIntoView();
            }
        }

        public void SetSourceInfoMap(SourceInfos aSourceMapping, DebugConnector aDebugConnector) {
            mDebugMode = DebugModeEnum.Source;
            mSourceMapping = aSourceMapping;
            
            mDebugConnector = aDebugConnector;
            mDebugConnector.Dispatcher = Dispatcher;
            mDebugConnector.ConnectionLost += ConnectionLost;
            mDebugConnector.DebugPacketReceived += DebugPacketReceived;
        }

        protected void DebugPacketReceived(UInt32 aEIP) {
            string xEIP = aEIP.ToString("X8");
            Log("0x" + xEIP);
            if (mAutoDisplay) {
                try {
                    lboxLog.SelectedIndex = lboxLog.Items.Count - 1;
                } catch { }
                mAutoDisplay = false;
            }
        }

        protected void Log(string aText) {
            lboxLog.Items.Add(
                new EIPEntry() {
                    EIP = aText,
                    Index = lboxLog.Items.Count
                 }
             );
        }

        protected void ConnectionLost(Exception ex) {
            Title = "No debug connection.";
            lboxLog.Background = Brushes.Red;
            while (ex != null) {
                Log(ex.Message);
                ex = ex.InnerException;
            }
        }

        protected void Anaylyze() {
            List<string> xItems = new List<string>();
            for (int i = lboxLog.Items.Count - 1; i >= 0; i--) {
                string xEIP = lboxLog.Items[i] as string;
                if (xItems.Contains(xEIP, StringComparer.InvariantCultureIgnoreCase)) {
                    lboxLog.Items.RemoveAt(i);
                    continue;
                }
                var xSourceInfo = mSourceMapping.GetMapping(UInt32.Parse(xEIP.Substring(2),
                                                                          System.Globalization.NumberStyles.HexNumber));
                if (xSourceInfo == null) {
                    lboxLog.Items.RemoveAt(i);
                    continue;
                }
            }
            //foreach (var xEIP in (from item in lboxLog.Items.Cast<string>()
            //                      select item).Distinct(StringComparer.InvariantCultureIgnoreCase)) {

            //    //var xViewSrc = new ViewSourceWindow();
            //    //int xCharStart;
            //    //int xCharCount;
            //    //GetLineInfo(xViewSrc.tboxSource.Text, xSourceInfo.Line, xSourceInfo.Column, xSourceInfo.LineEnd, xSourceInfo.ColumnEnd, out xCharStart, out xCharCount);
            //    //if(
            //    int xCharStart = xViewSrc.tboxSource.GetCharacterIndexFromLineIndex(xSourceInfo.Line);
            //    int xCharEnd = xViewSrc.tboxSource.GetCharacterIndexFromLineIndex(xSourceInfo.LineEnd);
            //    if ((xCharEnd - xCharStart) > 4) {
            //        MessageBox.Show(xEIP);
            //        return;
            //    }
            //}
            MessageBox.Show("Analysis finished!");
        }

        protected void SelectCode(uint aEIP) {
            var xSourceInfo = mSourceMapping.GetMapping(aEIP);
            if (xSourceInfo != null) {
                LoadSourceFile(xSourceInfo.SourceFile);
                SelectText(xSourceInfo.Line,
                           xSourceInfo.Column,
                           xSourceInfo.LineEnd,
                           xSourceInfo.ColumnEnd);
            }
        }

        private void lboxLog_SelectionChanged(object sender, SelectionChangedEventArgs e) {
            var xItem = lboxLog.SelectedItem as EIPEntry;
            if (xItem != null) {
                if (mDebugMode == DebugModeEnum.Source) {
                    SelectCode(UInt32.Parse(xItem.EIP.Substring(2)
                        , System.Globalization.NumberStyles.HexNumber));
                } else {
                    throw new Exception("Current debug mode is not supported!");
                }
            }
        }
    }

    public class EIPEntry {
        public string EIP;
        public long Index;

        public override int GetHashCode() {
            return Index.GetHashCode();
        }

        public override string ToString() {
            return EIP;
        }
    }
}