1c/gitmanager
1
0
Fork 0
mirror of https://github.com/Untru/gitmanager.git synced 2025-08-09 21:37:16 +02:00
Code Releases 1 Activity

Логирование команд

Browse Source
This commit is contained in:
Pavel Chegodaev
2025-07-20 13:07:03 +03:00
parent 6903def1c8
commit 3a1537f998
2 changed files with 683 additions and 595 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1179
src/Catalogs/Базы/Forms/ФормаЭлемента/Form.form
View File

File diff suppressed because it is too large Load Diff

99
src/CommonModules/КомандыЗапускаПриложения/Module.bsl
View File

@@ -8,7 +8,7 @@
Функция НовыйКомандаПолученияВеток() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("branch");
КомандаЗапуска.Добавить("--no-color");
@@ -23,7 +23,7 @@
Функция НовыйКомандаПерейтиНаНовуюВетку(НоваяВетка) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("switch");
ДобавитьОпцию(КомандаЗапуска, "-c", НоваяВетка);
@@ -37,7 +37,7 @@
Функция НовыйКомандаПерейтиНаВеткуЛокально(ИмяВетки) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("checkout");
КомандаЗапуска.Добавить(ИмяВетки);
@@ -51,7 +51,7 @@
Функция НовыйКомандаОтправить() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("push");
КомандаЗапуска.Добавить("--all");
@@ -66,7 +66,7 @@
//@skip-check export-procedure-missing-comment
Функция НовыйКомандаТекущаяВетка() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("symbolic-ref");
КомандаЗапуска.Добавить("--short");
@@ -83,7 +83,7 @@
//
Функция НовыйКомандаИндексироватьВсе() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("add");
КомандаЗапуска.Добавить(".");
@@ -100,7 +100,7 @@
//
Функция НовыйКомандаКоммит(Комментарий) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("commit");
КомандаЗапуска.Добавить("-m");
@@ -118,7 +118,7 @@
//
Функция НовыйКомандаНастройкаSSLVerify() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("config");
КомандаЗапуска.Добавить("--global");
@@ -137,7 +137,7 @@
//
Функция НовыйКомандаОбновитьРепозиторийИзУдаленного() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("pull");
@@ -153,7 +153,7 @@
//
Функция НовыйКомандаСтатусГит() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("status");
@@ -169,7 +169,7 @@
//
Функция НовыйКомандаКлонироватьРепозиторий(URLРепозитория) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("clone");
КомандаЗапуска.Добавить(URLРепозитория);
@@ -186,7 +186,7 @@
//
Функция НовыйКомандаИзвлечениеИзменений() Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("git");
КомандаЗапуска.Добавить("fetch");
КомандаЗапуска.Добавить("--all");
@@ -225,9 +225,8 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("pivo-cli");
КомандаЗапуска.Добавить("Branch");
ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
@@ -248,13 +247,14 @@
ДобавитьОпцию(КомандаЗапуска, "--NameDBWeb", ПараметрыБазы.БазаПубликации);
ДобавитьОпцию(КомандаЗапуска, "--ServerDBWeb", ПараметрыБазы.СерверПубликации);
//ПараметрыЗадачи
ДобавитьОпцию(КомандаЗапуска, "--NewBranch", ПараметрыЗадачи.ИмяВетки);
ДобавитьОпцию(КомандаЗапуска, "--LoadDB", Формат(ПараметрыЗадачи.ДорабатыватьКонфигурацию, "БЛ=false; БИ=true"));
ДобавитьОпцию(КомандаЗапуска, "--NamesDataProcessors", ПараметрыЗадачи.ВнешниеФайлы);
ДобавитьОпцию(КомандаЗапуска, "--Extensions", ПараметрыЗадачи.Расширения);
ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -268,7 +268,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("BranchToDevelop");
@@ -313,7 +313,7 @@
Функция НовыйКомандаПереходаНаВеткуDevelop(ПараметрыБазы) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("BranchDevelop");
@@ -350,9 +350,8 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("pivo-cli");
КомандаЗапуска.Добавить("commit");
ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
@@ -381,9 +380,9 @@
КонецЕсли;
ДобавитьОпцию(КомандаЗапуска, "--Extensions", ПараметрыЗадачи.Расширения);
//ПараметрыЗадачи
ДобавитьОпцию(КомандаЗапуска, "--TextCommit", ДополнительныеПараметры.ТекстКоммита);
ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
@@ -403,7 +402,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("CreateBranch");
@@ -420,7 +419,7 @@
КонецФункции
// Функция - Формирование строки запуска
//Функция - Формирование строки запуска
//PathRepository - Путь репозитория
//PathRemoteRepository - Путь удаленного репозитория
//UserName - Имя пользователя
@@ -431,7 +430,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("pivo-cli");
КомандаЗапуска.Добавить("init");
@@ -440,7 +439,8 @@
ДобавитьОпцию(КомандаЗапуска, "--UserName", НастройкиПользователя.ИмяПользователяGit);
ДобавитьОпцию(КомандаЗапуска, "--UserEmail", НастройкиПользователя.ПочтаПользователяGit);
ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
КомандаЗапуска = ОбщегоНазначенияСлужебныйКлиентСервер.БезопаснаяСтрокаКоманды(КомандаЗапуска);
@@ -469,7 +469,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("BuildRelease");
@@ -534,7 +534,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("CompileDataProcessors");
@@ -587,7 +587,7 @@
//
Функция НовыйКомандаПлановоеОбновлениеБазы(ПараметрыБазы, Релиз) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("UpdateDB");
@@ -674,7 +674,7 @@
//ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("UpdateDBDataProcessors");
@@ -735,7 +735,7 @@
//
Функция НовыйКомандаОбновлениеОбработкиИзПапки(ПараметрыБазы, ПутьКПапкеВнешнихОбработок) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("UpdateDataProcessorsFromFolder");
@@ -792,9 +792,8 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("pivo-cli");
КомандаЗапуска.Добавить("CreateMergeRequest");
ДобавитьОпцию(КомандаЗапуска, "--PathRepository", ПараметрыБазы.КаталогБазы);
@@ -810,6 +809,8 @@
ДобавитьОпцию(КомандаЗапуска, "--TextMR", ДополнительныеПараметры.ТекстМерджРеквеста);
ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска);
ОбернутьОпцииКомандыВЗнакРавно(КомандаЗапуска);
КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -840,7 +841,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("gh");
КомандаЗапуска.Добавить("pr");
КомандаЗапуска.Добавить("create");
@@ -882,7 +883,7 @@
ПараметрыКомандЗапуска = ПараметрыСеанса.ПараметрыКомандЗапуска;
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ПараметрыКомандЗапуска.oscript);
КомандаЗапуска.Добавить("MakeDataProcessors");
@@ -927,7 +928,7 @@
ОбщегоНазначенияКлиентСервер.Проверить(Не ПараметрыБазы.ЭтоРабочаяБаза, "Недопустимо использование скрипта в Рабочей базе!");
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("UpdateDataProcessors");
@@ -970,7 +971,7 @@
//
Функция НовыйКомандаЗаблокироватьБазу(ПараметрыБазы, Релиз) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("block");
@@ -1002,7 +1003,7 @@
//
Функция НовыйКомандаПингБазы(ПараметрыБазы) Экспорт
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить("oscript");
КомандаЗапуска.Добавить(ФайлЗапускаOscript(ПараметрыБазы));
КомандаЗапуска.Добавить("scorpion");
@@ -1033,7 +1034,7 @@
ПараметрыБазы.ИмяJobJenkins
);
КомандаЗапуска = Новый Массив;
КомандаЗапуска = Новый Массив; //Массив Из Строка
КомандаЗапуска.Добавить(ЮрлЗапускаJob);
КомандаЗапуска = СтрСоединить(КомандаЗапуска, " ");
@@ -1119,4 +1120,20 @@
КонецФункции
// Записать команду в журнал регистрации.
//
// Параметры:
// КомандаЗапуска - Массив Из Строка
Процедура ЗаписатьКомандуВЖурналРегистрации(КомандаЗапуска)
Комментарий = Новый Массив; //Массив Из Строка
Для Каждого Элемент Из КомандаЗапуска Цикл
Комментарий.Добавить(?(СтрНайти(Элемент, """")> 0 , Элемент, """" + Элемент + """"));
КонецЦикла;
ЗаписьЖурналаРегистрации("GIT.АргументыКоманды",
УровеньЖурналаРегистрации.Информация, , , СтрСоединить(Комментарий, ","));
КонецПроцедуры
#КонецОбласти