using System.Linq;
using Microsoft.PowerShell;
using Xunit;

namespace Test
{
    public partial class ReadLine
    {
        [SkippableFact]
        public void WhatIsKey()
        {
            TestSetup(KeyMode.Cmd);

            Test("", Keys(
                _.Alt_Question,
                CheckThat(() => AssertScreenIs(2, NextLine, "what-is-key:")),
                'a',
                CheckThat(() => AssertScreenIs(2, NextLine, "a: SelfInsert - Insert the key typed"))));

            Test("", Keys(
                _.Alt_Question, _.F9,
                CheckThat(() => AssertScreenIs(2, NextLine, "F9: Key is unbound"))));

            Test("", Keys(
                _.Alt_Question, _.LeftArrow,
                CheckThat(() => AssertScreenIs(2, NextLine, "LeftArrow: BackwardChar - Move the cursor back one character"))
                ));

            TestSetup(KeyMode.Emacs);
            Test("", Keys(
                _.Alt_Question, _.Ctrl_x, _.Ctrl_u,
                CheckThat(() => AssertScreenIs(2, NextLine, "Ctrl+x,Ctrl+u: Undo - Undo a previous edit"))));
        }

        [SkippableFact]
        public void ShowKeyBindings()
        {
            // I'm too lazy to validate the output as there's a lot of output.  So
            // just run it a few times to make sure nothing crashes.

            TestSetup(KeyMode.Cmd);
            Test("", Keys(Enumerable.Repeat(_.Ctrl_Alt_Question, 3)));

            TestSetup(KeyMode.Emacs);
            Test("", Keys(Enumerable.Repeat(_.Ctrl_Alt_Question, 3)));

            TestSetup(KeyMode.Vi);
            Test("", Keys(Enumerable.Repeat(_.Ctrl_Alt_Question, 3)));
        }

        [SkippableFact]
        public void ShiftBackspace()
        {
            TestSetup(KeyMode.Cmd);
            Test("aa", Keys("aaa", _.Shift_Backspace));
        }

        [SkippableFact]
        public void ShiftEscape()
        {
            TestSetup(KeyMode.Cmd);
            Test("", Keys("aaa", _.Shift_Escape));
        }
    }
}