Use DI injection for КомандаПриложения beans and СборщикОпций for ОписаниеКоманды-based commands

Agent-Logs-Url: https://github.com/oscript-library/ovm/sessions/133e180e-c446-4b87-ab6a-acbb38796823

Co-authored-by: nixel2007 <1132840+nixel2007@users.noreply.github.com>

Author: Copilot

src/cmd/Классы/КомандаCompletions.os

@@ -3,8 +3,10 @@
 &ЛогOVM
 Перем Лог;
 
-&Пластилин
-Перем Поделка;
+&Пластилин(Тип = "ТаблицаЗначений", Значение = "КомандаПриложения")
+Перем КомандыПриложения;
+
+Перем Рефлектор;
 
 &Опция(Имя = "shell s", Описание = "Тип оболочки для генерации автодополнения (поддерживается: bash)")
 &ТСтрока
@@ -14,6 +16,7 @@
 
 &КомандаПриложения(Имя = "completions", Описание = "Вывести скрипт автодополнения команд для выбранной оболочки")
 Процедура ПриСозданииОбъекта()
+	Рефлектор = Новый Рефлектор();
 КонецПроцедуры
 
 &ВыполнениеКоманды
@@ -125,14 +128,13 @@ complete -F _ovm_completions ovm";
 
 Функция ПолучитьДеревоКоманд()
 
-	ОпределенияКоманд = Поделка.ПолучитьОпределенияЖелудей("КомандаПриложения");
-
 	// Первый проход: собрать все команды с их именами желудей и родителями
 	ВсеИнфо = Новый Соответствие();
 
-	Для Каждого КлючЗначение Из ОпределенияКоманд Цикл
-		ИмяЖелудя = КлючЗначение.Ключ;
-		ОпределениеЖелудя = КлючЗначение.Значение;
+	Для Каждого ДанныеЖелудя Из КомандыПриложения Цикл
+		ИмяЖелудя = ДанныеЖелудя.Имя;
+		ОпределениеЖелудя = ДанныеЖелудя.ОпределениеЖелудя;
+		Желудь = ДанныеЖелудя.Желудь;
 		Конструктор = ОпределениеЖелудя.Завязь().ДанныеМетода();
 
 		АннотацияКоманды = РаботаСАннотациями.НайтиАннотацию(Конструктор.Аннотации, "КомандаПриложения");
@@ -151,7 +153,7 @@ complete -F _ovm_completions ovm";
 		ИнфоКоманды.ИмяЖелудя = ИмяЖелудя;
 		ИнфоКоманды.Родитель = Родитель;
 		ИнфоКоманды.Имена = СтрРазделить(ИмяКоманды, " ");
-		ИнфоКоманды.Опции = ПолучитьОпцииКоманды(ОпределениеЖелудя);
+		ИнфоКоманды.Опции = ПолучитьОпцииКоманды(Желудь, ОпределениеЖелудя);
 
 		ВсеИнфо.Вставить(ИмяЖелудя, ИнфоКоманды);
 	КонецЦикла;
@@ -199,27 +201,35 @@ complete -F _ovm_completions ovm";
 
 КонецФункции
 
-Функция ПолучитьОпцииКоманды(ОпределениеЖелудя)
+Функция ПолучитьОпцииКоманды(Желудь, ОпределениеЖелудя)
 
 	Опции = Новый Массив();
 	Опции.Добавить("--help");
 
-	Свойства = ОпределениеЖелудя.Свойства();
-	Для Каждого Свойство Из Свойства Цикл
-		АннотацияОпции = РаботаСАннотациями.ПолучитьАннотацию(Свойство, "Опция");
-		Если АннотацияОпции = Неопределено Тогда
-			Продолжить;
-		КонецЕсли;
-
-		ИмяОпции = РаботаСАннотациями.ПолучитьЗначениеПараметраАннотации(АннотацияОпции, "Имя");
-		Для Каждого ЧастьОпции Из СтрРазделить(ИмяОпции, " ") Цикл
-			Если СтрДлина(ЧастьОпции) = 1 Тогда
-				Опции.Добавить("-" + ЧастьОпции);
-			Иначе
-				Опции.Добавить("--" + ЧастьОпции);
+	Если Рефлектор.МетодСуществует(Желудь, "ОписаниеКоманды") Тогда
+		Сборщик = Новый СборщикОпций();
+		Желудь.ОписаниеКоманды(Сборщик);
+		Для Каждого ИмяОпции Из Сборщик.ПолучитьОпции() Цикл
+			Опции.Добавить(ИмяОпции);
+		КонецЦикла;
+	Иначе
+		Свойства = ОпределениеЖелудя.Свойства();
+		Для Каждого Свойство Из Свойства Цикл
+			АннотацияОпции = РаботаСАннотациями.ПолучитьАннотацию(Свойство, "Опция");
+			Если АннотацияОпции = Неопределено Тогда
+				Продолжить;
 			КонецЕсли;
+
+			ИмяОпции = РаботаСАннотациями.ПолучитьЗначениеПараметраАннотации(АннотацияОпции, "Имя");
+			Для Каждого ЧастьОпции Из СтрРазделить(ИмяОпции, " ") Цикл
+				Если СтрДлина(ЧастьОпции) = 1 Тогда
+					Опции.Добавить("-" + ЧастьОпции);
+				Иначе
+					Опции.Добавить("--" + ЧастьОпции);
+				КонецЕсли;
+			КонецЦикла;
 		КонецЦикла;
-	КонецЦикла;
+	КонецЕсли;
 
 	Возврат Опции;
 

src/cmd/Классы/СборщикОпций.os

@@ -0,0 +1,110 @@
+// Вспомогательный класс для сбора имён опций команды.
+// Используется как заглушка вместо КомандаПриложения при вызове ОписаниеКоманды(),
+// чтобы получить зарегистрированные опции без запуска команды.
+
+Перем Опции; // Массив - собранные имена опций
+
+Процедура ПриСозданииОбъекта()
+	Опции = Новый Массив();
+КонецПроцедуры
+
+// Перехватывает регистрацию опции и возвращает себя для поддержки цепочек вызовов.
+//
+// Параметры:
+//   Имя      - Строка - имя опции (может включать синонимы через пробел, например "clean c")
+//   Значение - Произвольный - значение по умолчанию (не используется)
+//   Описание - Строка - описание (не используется)
+//
+// Возвращаемое значение:
+//   СборщикОпций - ЭтотОбъект для цепочки вызовов
+Функция Опция(Имя, Значение = "", Описание = "") Экспорт
+
+	Для Каждого ЧастьИмени Из СтрРазделить(Имя, " ", Ложь) Цикл
+		Если СтрДлина(ЧастьИмени) = 1 Тогда
+			Опции.Добавить("-" + ЧастьИмени);
+		Иначе
+			Опции.Добавить("--" + ЧастьИмени);
+		КонецЕсли;
+	КонецЦикла;
+
+	Возврат ЭтотОбъект;
+
+КонецФункции
+
+// Игнорирует регистрацию аргумента (позиционные аргументы не нужны для автодополнения опций).
+//
+// Возвращаемое значение:
+//   СборщикОпций - ЭтотОбъект для цепочки вызовов
+Функция Аргумент(Имя, Значение = "", Описание = "") Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+// Методы цепочки вызовов — возвращают ЭтотОбъект, не выполняя реальных действий.
+
+Функция ТСтрока() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТЧисло() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТБулево() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТДата(ФорматДаты = "") Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТМассивСтрок() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТМассивЧисел() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ТМассивДат() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ВОкружении(Переменная) Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция Флаговый() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция Флаг() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция СкрытьВСправке() Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ПоУмолчанию(Значение) Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция Обязательный(Признак = Истина) Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция ПодробноеОписание(Описание) Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+Функция Псевдоним(Имя) Экспорт
+	Возврат ЭтотОбъект;
+КонецФункции
+
+// Возвращает собранные имена опций.
+//
+// Возвращаемое значение:
+//   Массив - список строк вида "--name" и "-n"
+Функция ПолучитьОпции() Экспорт
+	Возврат Опции;
+КонецФункции