Skip to content

Чуть более аккуратная работа с кавычками при разборе отчёта по хранилищу #24

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 1 commit into from
Jan 15, 2020
Merged

Чуть более аккуратная работа с кавычками при разборе отчёта по хранилищу #24

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
6 changes: 4 additions & 2 deletions src/Классы/internal/ripper/Классы/ПарсерОтчетаХранилища.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -23,15 +23,17 @@

Функция ПрочитатьТекстСкобкоФайлаРегулярками(Знач Текст)

Текст = СтрЗаменить(Текст, """""", "'");
СпецСимвол = Символ(0);
Текст = СтрЗаменить(Текст, """""", СпецСимвол);

РегВыражение = Новый РегулярноеВыражение("[\{]""#"",""([^""]+)[""][\}]");
МассивСовпадений = РегВыражение.НайтиСовпадения(Текст);

Массив = Новый Массив();

Для каждого Совпадение Из МассивСовпадений Цикл
Массив.Добавить(Совпадение.Группы[1].Значение);
Значение = СтрЗаменить(Совпадение.Группы[1].Значение, СпецСимвол, """""");
Массив.Добавить(Значение);
КонецЦикла;

ТаблицаВерсий = СформироватьТаблицуВерсий(Массив);
Expand Down
Binary file added tests/fixtures/report.quoted.mxl.txt
View file
Open in desktop
Binary file not shown.
16 changes: 16 additions & 0 deletions tests/ПарсерОтчетаХранилища_test.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -12,11 +12,27 @@
ИменаТестов = Новый Массив;

ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОтчетаХранилища");
ИменаТестов.Добавить("ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии");

Возврат ИменаТестов;

КонецФункции

Процедура ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии() Экспорт

ПутьКФайлуОтчета = ОбъединитьПути(ТекущийСценарий().Каталог, "fixtures", "report.quoted.mxl.txt");
ПарсерОтчетаХранилища = Новый ПарсерОтчетаХранилища;
ТаблицаВерсийХранилища = ПарсерОтчетаХранилища.ПрочитатьФайлОтчетаХранилища(ПутьКФайлуОтчета);
Ожидаем.Что(ТаблицаВерсийХранилища.Количество(), "Количество версий должно быть равны").Равно(2);
Ожидаем.Что(ТаблицаВерсийХранилища[1].Комментарий).Равно(
"Многострочный комментарий к версии хранилища, содержащий:
|* ""двойные кавычки""
|* 'одинарные кавычки'
|* несколько кавычек подряд: """""" и '''");


КонецПроцедуры // ТестДолжен_ПроверитьЧтениеОтчетаХранилищаКавычкиВКомментарии()

Процедура ТестДолжен_ПроверитьЧтениеОтчетаХранилища() Экспорт

ПутьКФайлуОтчета = ОбъединитьПути(ТекущийСценарий().Каталог, "fixtures", "report.mxl.txt");
Expand Down