Merge pull request #1504 from Mr-Rm/fix/1424

v1 fix #1424: рефлексия свойств у загруженного с контекстом сценария, рефлексия приватных +тест

Author: EvilBeaver

src/ScriptEngine/Machine/Contexts/UserScriptContextInstance.cs

@@ -215,6 +215,8 @@ protected override int GetOwnVariableCount()
                 return _ownProperties.Count;
         }
 
+        public int GetOwnPropCount() => GetOwnVariableCount();
+
         protected override void UpdateState()
         {
         }
@@ -242,7 +244,7 @@ protected override string GetOwnPropName(int index)
 
             return _ownPropertyIndexes.Where(x => x.Value == index).First().Key;
         }
-        
+
         public override int GetMethodsCount()
         {
             return GetOwnMethodCount() + _module.Methods.Length;

src/ScriptEngine/Machine/IRuntimeContextInstance.cs

@@ -8,6 +8,7 @@ This Source Code Form is subject to the terms of the
 using System;
 using System.Collections.Generic;
 using System.Diagnostics;
+using System.Linq;
 using ScriptEngine.Machine.Contexts;
 
 namespace ScriptEngine.Machine
@@ -58,25 +59,28 @@ public static IEnumerable<VariableInfo> GetProperties(this IRuntimeContextInstan
         private static IEnumerable<VariableInfo> GetPropertiesWithPrivate(IRuntimeContextInstance context)
         {
             if (!(context is UserScriptContextInstance userScript))
-                return Array.Empty<VariableInfo>();
+                return GetPropertiesWithoutPrivate(context);
 
-            List<VariableInfo> infos = new List<VariableInfo>();
-            foreach (var variable in userScript.Module.Variables)
+            var infos = new List<VariableInfo>();
+            for (int i = 1; i < userScript.GetOwnPropCount(); i++) // skip ThisObject == _ownProperties[0]
             {
                 infos.Add(new VariableInfo() { 
-                    Identifier = variable.Identifier,
-                    Type = variable.Type,
-                    Index = variable.Index,
-                    Annotations = HackGetAnnotations(context, variable.Index),
-                    IsExport = variable.IsExport
+                    Identifier = userScript.GetPropName(i),
+                    Type = SymbolType.ContextProperty,
+                    Index = i,
+                    Annotations = Array.Empty<AnnotationDefinition>(),
+                    IsExport = false
                 });
             }
 
-            return infos;
+            return infos.Concat(userScript.Module.Variables);
         }
 
         private static IEnumerable<VariableInfo> GetPropertiesWithoutPrivate(IRuntimeContextInstance context)
         {
+            if (context is UserScriptContextInstance userScript)
+                return userScript.Module.Variables.Where(x => x.IsExport).ToList();
+
             VariableInfo[] infos = new VariableInfo[context.GetPropCount()];
             for (int i = 0; i < infos.Length; i++)
             {
@@ -85,26 +89,14 @@ private static IEnumerable<VariableInfo> GetPropertiesWithoutPrivate(IRuntimeCon
                     Identifier = context.GetPropName(i),
                     Type = SymbolType.ContextProperty,
                     Index = i,
-                    Annotations = HackGetAnnotations(context, i),
+                    Annotations = Array.Empty<AnnotationDefinition>(),
                     IsExport = true
                 };
             }
 
             return infos;
         }
 
-        private static AnnotationDefinition[] HackGetAnnotations(IRuntimeContextInstance context, int i)
-        {
-            if (!(context is UserScriptContextInstance userScript)) 
-                return Array.Empty<AnnotationDefinition>();
-            
-            if (i == 0)
-                return Array.Empty<AnnotationDefinition>();
-            
-            var variable = userScript.Module.Variables[i - 1];
-            return variable.Annotations;
-        }
-
         public static IValue GetPropValue(this IRuntimeContextInstance context, string propName)
         {
             int propNum = context.FindProperty(propName);

tests/annotations.os

@@ -13,6 +13,7 @@
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьПолучениеАннотацийПараметров");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьАннотацииПолейЗагрузитьСценарий");
 	ВсеТесты.Добавить("ТестДолжен_ПроверитьАннотацииПолейЗагрузитьСценарийИзСтроки");
+	ВсеТесты.Добавить("ТестДолжен_ПроверитьАннотацииПолейЗагрузитьСценарийСКонтекстом");
 
 	Возврат ВсеТесты;
 
@@ -197,4 +198,16 @@
 
 	КонецЕсли;
 
+КонецПроцедуры
+
+Процедура ТестДолжен_ПроверитьАннотацииПолейЗагрузитьСценарийСКонтекстом() Экспорт
+
+	ТекстСценария = "
+	|Рефлектор = Новый Рефлектор();
+	|ТаблицаСвойств = Рефлектор.ПолучитьТаблицуСвойств(ЭтотОбъект);
+	|";
+	Контекст = Новый Структура(	"АргументыКоманднойСтроки",	Новый Массив );
+
+	Сценарий = ЗагрузитьСценарийИзСтроки(ТекстСценария, Контекст);
+
 КонецПроцедуры