b23f9c96d0
* Refactor language information classes * Implement SimpleLanguageInformation abstract class * Move some properties to SimpleLanguageInformation * Implement format and debug buttons disabling if Intellisense is not supported for current language * Add Intellisense available check in FormsExtensions to deactivate menu items if needed * Change function interfaces in VisibilityService * Replace CodeCompletionController.CurrentParser null checks with IntellisenseAvailable method call * Refactor IParser and BaseParser to deduplicate code * Fix BuildTreeInSpecialMode in SPythonParser * Add SimpleParser class for new languages without Intellisense * Delete duplicate SetDebugButtonsEnabled function * Add Intellisense available check in RunService when attaching debugger * Delete inner check in SetDebugButtonsEnabled to improve architecture * Change CurrentParser property in CodeCompletion to be CurrentLanguage * Divide ILanguageInformation into two interfaces (creating new ILanguageIntellisenseSupport) * Fix LanguageIntellisenseSupport initialization in BaseLanguage * Fix RunService fictive_attach logic * Disable Intellisense parsing for languages without Intellisense support * Add DefaultLanguageInformation abstract class * Add default implementation for SetSemanticConstants in BaseLanguage * Simplify IParser interface * Update developer guide documentation
278 lines
14 KiB
C#
278 lines
14 KiB
C#
// Copyright (c) Ivan Bondarev, Stanislav Mikhalkovich (for details please see \doc\copyright.txt)
|
|
// This code is distributed under the GNU LGPL (for details please see \doc\license.txt)
|
|
using System;
|
|
using System.Collections;
|
|
using System.Collections.Generic;
|
|
using System.Drawing;
|
|
using System.Windows.Forms;
|
|
using System.IO;
|
|
using System.Threading;
|
|
|
|
using ICSharpCode.TextEditor;
|
|
using ICSharpCode.TextEditor.Gui;
|
|
using ICSharpCode.TextEditor.Document;
|
|
using ICSharpCode.TextEditor.Gui.CompletionWindow;
|
|
using ICSharpCode.TextEditor.Gui.InsightWindow;
|
|
|
|
namespace VisualPascalABC
|
|
{
|
|
|
|
class CodeCompletionKeyHandler
|
|
{
|
|
public TextEditorControl editor;
|
|
public PABCNETCodeCompletionWindow codeCompletionWindow;
|
|
public PABCNETInsightWindow insightWindow;
|
|
public CodeCompletionProvider completionDataProvider;
|
|
|
|
private static Hashtable ht = new Hashtable();
|
|
|
|
private CodeCompletionKeyHandler(TextEditorControl editor)
|
|
{
|
|
this.editor = editor;
|
|
}
|
|
|
|
public static CodeCompletionKeyHandler Attach(TextEditorControl editor)
|
|
{
|
|
CodeCompletionKeyHandler h = new CodeCompletionKeyHandler(editor);
|
|
ht[editor] = h;
|
|
editor.ActiveTextAreaControl.TextArea.KeyEventHandler += h.TextAreaKeyEventHandler;
|
|
editor.ActiveTextAreaControl.TextArea.Caret.PositionChanged += h.CaretPositionChangedEventHandler;
|
|
//editor.ActiveTextAreaControl.TextArea.KeyDown += new System.Windows.Forms.KeyEventHandler(TextArea_KeyDown);
|
|
//editor.ActiveTextAreaControl.KeyDown += h.TextControlEventHandler;
|
|
// When the editor is disposed, close the code completion window
|
|
editor.Disposed += h.OnCodeCompletionWindowClosed;
|
|
return h;
|
|
}
|
|
|
|
public static void Detach(TextEditorControl editor)
|
|
{
|
|
if (ht.ContainsKey(editor))
|
|
ht.Remove(editor);
|
|
}
|
|
|
|
void CaretPositionChangedEventHandler(object sender, EventArgs e)
|
|
{
|
|
if (!VisualPABCSingleton.MainForm.UserOptions.HighlightOperatorBrackets || WorkbenchServiceFactory.DebuggerManager.IsRunning)
|
|
return;
|
|
CodeCompletionHighlighter.Highlight(editor.ActiveTextAreaControl.TextArea);
|
|
}
|
|
|
|
/// <summary>
|
|
/// Return true to handle the keypress, return false to let the text area handle the keypress
|
|
/// </summary>
|
|
bool TextAreaKeyEventHandler(char key)
|
|
{
|
|
if (!WorkbenchServiceFactory.Workbench.UserOptions.AllowCodeCompletion || !VisualPABCSingleton.MainForm.VisualEnvironmentCompiler.compilerLoaded)
|
|
return false;
|
|
if (!CodeCompletion.CodeCompletionController.IntellisenseAvailable()) return false;
|
|
if (codeCompletionWindow != null)
|
|
{
|
|
// If completion window is open and wants to handle the key, don't let the text area
|
|
// handle it
|
|
if (codeCompletionWindow.ProcessKeyEvent(key))
|
|
return true;
|
|
}
|
|
else
|
|
{
|
|
PABCNETCodeCompletionWindow ccw = CodeCompletionShiftSpaceActions.comp_windows[editor.ActiveTextAreaControl.TextArea] as PABCNETCodeCompletionWindow;
|
|
|
|
if (ccw != null && CodeCompletionShiftSpaceActions.is_begin)
|
|
{
|
|
CodeCompletionShiftSpaceActions.is_begin = false;
|
|
if (key != ' ')
|
|
ccw.ProcessKeyEvent(key);
|
|
else
|
|
{
|
|
ccw.ProcessKeyEvent('_');
|
|
ccw.Close();
|
|
}
|
|
|
|
}
|
|
else if (ccw != null && ccw.ProcessKeyEvent(key))
|
|
return true;
|
|
}
|
|
if (key == '.')
|
|
{
|
|
if (!string.IsNullOrEmpty(WorkbenchServiceFactory.DocumentService.CurrentCodeFileDocument.TextEditor.ActiveTextAreaControl.SelectionManager.SelectedText))
|
|
{
|
|
WorkbenchServiceFactory.DocumentService.CurrentCodeFileDocument.TextEditor.ActiveTextAreaControl.Caret.Position = WorkbenchServiceFactory.DocumentService.CurrentCodeFileDocument.TextEditor.ActiveTextAreaControl.SelectionManager.SelectionCollection[0].StartPosition;
|
|
WorkbenchServiceFactory.DocumentService.CurrentCodeFileDocument.TextEditor.ActiveTextAreaControl.SelectionManager.RemoveSelectedText();
|
|
}
|
|
|
|
if (WorkbenchServiceFactory.Workbench.UserOptions.CodeCompletionDot)
|
|
{
|
|
completionDataProvider = new CodeCompletionProvider();
|
|
|
|
codeCompletionWindow = PABCNETCodeCompletionWindow.ShowCompletionWindow(
|
|
VisualPABCSingleton.MainForm, // The parent window for the completion window
|
|
editor, // The text editor to show the window for
|
|
editor.FileName, // Filename - will be passed back to the provider
|
|
completionDataProvider, // Provider to get the list of possible completions
|
|
key, // Key pressed - will be passed to the provider
|
|
true,
|
|
true,
|
|
PascalABCCompiler.Parsers.KeywordKind.None
|
|
);
|
|
CodeCompletionShiftSpaceActions.is_begin = true;
|
|
CodeCompletionShiftSpaceActions.comp_windows[editor.ActiveTextAreaControl.TextArea] = codeCompletionWindow;
|
|
if (codeCompletionWindow != null)
|
|
codeCompletionWindow.Closed += new EventHandler(OnCodeCompletionWindowClosed);
|
|
}
|
|
}
|
|
else if (key == '(' || key == '[' || key == ',')
|
|
{
|
|
if (VisualPABCSingleton.MainForm.UserOptions.CodeCompletionParams)
|
|
{
|
|
ICSharpCode.TextEditor.Gui.InsightWindow.IInsightDataProvider idp = new DefaultInsightDataProvider(-1, false, key);
|
|
if (insightWindow == null || insightWindow.InsightProviderStackLength == 0)
|
|
{
|
|
insightWindow = new PABCNETInsightWindow(VisualPABCSingleton.MainForm, editor);
|
|
insightWindow.Font = new Font(Constants.CompletionInsightWindowFontName, insightWindow.Font.Size);
|
|
insightWindow.Closed += new EventHandler(OnInsightWindowClosed);
|
|
}
|
|
else
|
|
{
|
|
(idp as DefaultInsightDataProvider).defaultIndex = insightWindow.GetCurrentData();
|
|
(idp as DefaultInsightDataProvider).cur_param_num = (insightWindow.GetInsightProvider() as DefaultInsightDataProvider).param_count;
|
|
|
|
}
|
|
insightWindow.AddInsightDataProvider(idp, editor.FileName);
|
|
insightWindow.ShowInsightWindow();
|
|
}
|
|
}
|
|
else if (key == ' ')
|
|
{
|
|
if (VisualPABCSingleton.MainForm.UserOptions.CodeCompletionDot)
|
|
{
|
|
PascalABCCompiler.Parsers.KeywordKind keyw = KeywordChecker.TestForKeyword(editor.Document.TextContent, editor.ActiveTextAreaControl.TextArea.Caret.Offset - 1);
|
|
if (keyw == PascalABCCompiler.Parsers.KeywordKind.New || keyw == PascalABCCompiler.Parsers.KeywordKind.Uses)
|
|
{
|
|
completionDataProvider = new CodeCompletionProvider();
|
|
codeCompletionWindow = PABCNETCodeCompletionWindow.ShowCompletionWindow(
|
|
VisualPABCSingleton.MainForm, // The parent window for the completion window
|
|
editor, // The text editor to show the window for
|
|
editor.FileName, // Filename - will be passed back to the provider
|
|
completionDataProvider, // Provider to get the list of possible completions
|
|
' ', // Key pressed - will be passed to the provider
|
|
true,
|
|
false,
|
|
keyw
|
|
);
|
|
CodeCompletionShiftSpaceActions.comp_windows[editor.ActiveTextAreaControl.TextArea] = codeCompletionWindow;
|
|
if (codeCompletionWindow != null)
|
|
codeCompletionWindow.Closed += new EventHandler(OnCodeCompletionWindowClosed);
|
|
//return true;
|
|
}
|
|
}
|
|
}
|
|
else if (key == '\n')
|
|
{
|
|
if (VisualPABCSingleton.MainForm.UserOptions.AllowCodeCompletion)
|
|
{
|
|
try
|
|
{
|
|
CodeCompletion.DomConverter dconv = (CodeCompletion.DomConverter)CodeCompletion.CodeCompletionController.comp_modules[editor.FileName];
|
|
if (dconv != null)
|
|
{
|
|
// TODO: check endl error | added null check EVA
|
|
CodeCompletion.SymScope ss = dconv.FindScopeByLocation(editor.ActiveTextAreaControl.TextArea.Caret.Line + 1, editor.ActiveTextAreaControl.TextArea.Caret.Column + 1);
|
|
ss?.IncreaseEndLine();
|
|
}
|
|
}
|
|
catch
|
|
{
|
|
|
|
}
|
|
}
|
|
}
|
|
else if (codeCompletionWindow == null && VisualPABCSingleton.MainForm.UserOptions.EnableSmartIntellisense && (char.IsLetter(key) || key == '_'))
|
|
{
|
|
if (VisualPABCSingleton.MainForm.UserOptions.CodeCompletionDot)
|
|
{
|
|
PascalABCCompiler.Parsers.KeywordKind keyw = KeywordChecker.TestForKeyword(editor.Document.TextContent, editor.ActiveTextAreaControl.TextArea.Caret.Offset - 1);
|
|
if (CodeCompletion.CodeCompletionController.CurrentLanguage.LanguageIntellisenseSupport.IsDefinitionIdentifierAfterKeyword(keyw))
|
|
return false;
|
|
|
|
// если не первый символ выражения (предыдущий тоже буква или "_"), то не открываем новое окно
|
|
if (editor.ActiveTextAreaControl.TextArea.Caret.Offset > 0 && (char.IsLetterOrDigit(editor.Document.TextContent[editor.ActiveTextAreaControl.TextArea.Caret.Offset - 1]) || editor.Document.TextContent[editor.ActiveTextAreaControl.TextArea.Caret.Offset - 1] == '_'))
|
|
return false;
|
|
|
|
completionDataProvider = new CodeCompletionProvider();
|
|
codeCompletionWindow = PABCNETCodeCompletionWindow.ShowCompletionWindowWithFirstChar(
|
|
VisualPABCSingleton.MainForm, // The parent window for the completion window
|
|
editor, // The text editor to show the window for
|
|
editor.FileName, // Filename - will be passed back to the provider
|
|
completionDataProvider, // Provider to get the list of possible completions
|
|
key, // Key pressed - will be passed to the provider
|
|
keyw
|
|
);
|
|
CodeCompletionShiftSpaceActions.comp_windows[editor.ActiveTextAreaControl.TextArea] = codeCompletionWindow;
|
|
if (codeCompletionWindow != null)
|
|
codeCompletionWindow.Closed += new EventHandler(OnCodeCompletionWindowClosed);
|
|
|
|
}
|
|
}
|
|
/*else if (codeCompletionWindow == null && key == '\n')
|
|
{
|
|
if (mainForm.UserOptions.AllowCodeFormatting)
|
|
{
|
|
string bracket = CodeCompletion.CodeCompletionController.currentParser.LanguageInformation.GetBodyStartBracket();
|
|
string end_bracket = CodeCompletion.CodeCompletionController.currentParser.LanguageInformation.GetBodyEndBracket();
|
|
if (bracket != null)
|
|
{
|
|
int i = editor.ActiveTextAreaControl.TextArea.Caret.Offset-1;
|
|
int j = bracket.Length-1;
|
|
bool eq=true;
|
|
while (i >= 0 && j >= 0)
|
|
{
|
|
if (editor.Document.TextContent[i] != bracket[j])
|
|
{
|
|
eq = false;
|
|
break;
|
|
}
|
|
i--; j--;
|
|
}
|
|
if (eq && j<0)
|
|
{
|
|
TextArea textArea = editor.ActiveTextAreaControl.TextArea;
|
|
int col = textArea.Caret.Column-bracket.Length;
|
|
textArea.InsertString("\n\n"+end_bracket);
|
|
textArea.Caret.Column = 0;
|
|
textArea.Caret.Line = textArea.Caret.Line-1;
|
|
textArea.Caret.Column = VisualPABCSingleton.MainForm.UserOptions.CursorTabCount+col;
|
|
return true;
|
|
}
|
|
}
|
|
}
|
|
}*/
|
|
|
|
return false;
|
|
}
|
|
|
|
void OnInsightWindowClosed(object sender, EventArgs e)
|
|
{
|
|
if (insightWindow != null)
|
|
{
|
|
insightWindow.Closed -= new EventHandler(OnInsightWindowClosed);
|
|
insightWindow.Dispose();
|
|
insightWindow = null;
|
|
}
|
|
}
|
|
|
|
void OnCodeCompletionWindowClosed(object sender, EventArgs e)
|
|
{
|
|
if (codeCompletionWindow != null)
|
|
{
|
|
codeCompletionWindow.Closed -= new EventHandler(OnCodeCompletionWindowClosed);
|
|
CodeCompletionProvider.disp.Reset();
|
|
CodeCompletion.AssemblyDocCache.Reset();
|
|
CodeCompletion.UnitDocCache.Reset();
|
|
codeCompletionWindow.Dispose();
|
|
CodeCompletionShiftSpaceActions.comp_windows[editor.ActiveTextAreaControl.TextArea] = null;
|
|
codeCompletionWindow = null;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|