Skip to content

Собственная реализация хронометра #36

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
Stivo182 merged 1 commit into from
Feb 19, 2026
Merged

Собственная реализация хронометра #36

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
76 changes: 47 additions & 29 deletions build/ПодготовкаКомпонентов.os
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -2,28 +2,35 @@
#Использовать 1commands
#Использовать fs

#Область ПрограммныйИнтерфейс

Процедура Подготовить() Экспорт

ИменаПроектов = Новый Массив();
ИменаПроектов.Добавить("Chronometer");
ИменаПроектов.Добавить("BenchmarkOneScript.Extensions");

ИменаФайловБиблиотек = Новый Массив();
ИменаФайловБиблиотек.Добавить("1script_Chronometer.dll");
ИменаФайловБиблиотек.Добавить("1script_BenchmarkOneScriptExtensions.dll");
ИменаФайловБиблиотек.Добавить("Perfolizer.dll");
ИменаФайловКомпонентов = Новый Массив();
ИменаФайловКомпонентов.Добавить("1script_Chronometer.dll");
ИменаФайловКомпонентов.Добавить("1script_BenchmarkOneScriptExtensions.dll");

СобратьБиблиотекуDotNET(ИменаПроектов);
ПодготовитьКаталогСКомпонентами(ИменаПроектов, ИменаФайловБиблиотек);
ПроверитьНаличиеБиблиотекиDotNET(ИменаФайловБиблиотек);
СобратьКомпоненты(ИменаПроектов);
ПереместитьКомпоненты(ИменаПроектов, ИменаФайловКомпонентов);
ПроверитьНаличиеКомпонентов(ИменаФайловКомпонентов);

КонецПроцедуры

Процедура СобратьБиблиотекуDotNET(ИменаПроектов)
#КонецОбласти

#Область СлужебныеПроцедурыИФункции

Процедура СобратьКомпоненты(ИменаПроектов)

ТекущийКаталог = ТекущийКаталог();

Для Каждого ИмяПроекта Из ИменаПроектов Цикл

КаталогРелиза = ОбъединитьПути(ТекущийКаталог(), "src/" + ИмяПроекта + "/bin/Release");
КаталогРелиза = ОбъединитьПути(ТекущийКаталог, "src/" + ИмяПроекта + "/bin/Release");
ФС.ОбеспечитьПустойКаталог(КаталогРелиза);

Команда = Новый Команда;
Expand All @@ -33,55 +40,66 @@

КодВозврата = Команда.Исполнить();
Если Не КодВозврата = 0 Тогда
ВызватьИсключение "Не удалось выполнить сборку .NET библиотеки";
ВызватьИсключение "Не удалось выполнить сборку .NET компоненты";
КонецЕсли;

КонецЦикла;

КонецПроцедуры

Процедура ПодготовитьКаталогСКомпонентами(ИменаПроектов, ИменаФайловБиблиотек)
Процедура ПереместитьКомпоненты(ИменаПроектов, ИменаФайловКомпонентов)

СоответствиеПапок = Новый Соответствие();
СоответствиеПапок.Вставить("net4", "net48");
СоответствиеПапок.Вставить("dotnet", "net6.0");

КаталогСКомпонентами = ОбъединитьПути(ТекущийКаталог(), "Components");
КаталогКомпонентов = ОбъединитьПути(ТекущийКаталог(), "Components");

ФС.ОбеспечитьПустойКаталог(КаталогКомпонентов);

ФС.ОбеспечитьПустойКаталог(КаталогСКомпонентами);
Для Каждого ПараИменПапок Из СоответствиеПапок Цикл

Для Каждого Соответствие Из СоответствиеПапок Цикл
ИмяКаталогаOscript = Соответствие.Ключ;
ИмяКаталогаDotnet = Соответствие.Значение;
ИмяКаталогаПриемник = ПараИменПапок.Ключ;
ИмяКаталогаИсточник = ПараИменПапок.Значение;

ПутьККаталгуOscript = ОбъединитьПути(КаталогСКомпонентами, ИмяКаталогаOscript);
ФС.ОбеспечитьПустойКаталог(ПутьККаталгуOscript);
КаталогПриемник = ОбъединитьПути(КаталогКомпонентов, ИмяКаталогаПриемник);
ФС.ОбеспечитьПустойКаталог(КаталогПриемник);

Для Каждого ИмяПроекта Из ИменаПроектов Цикл
ПутьККаталгуDotnet = ОбъединитьПути(ТекущийКаталог(), "src/" + ИмяПроекта + "/bin/Release", ИмяКаталогаDotnet);

Для Каждого ИмяФайла Из ИменаФайловБиблиотек Цикл
ПутьИсточник = ОбъединитьПути(ПутьККаталгуDotnet, ИмяФайла);
ПутьПриемник = ОбъединитьПути(ПутьККаталгуOscript, ИмяФайла);
КаталогСборки = ОбъединитьПути(ТекущийКаталог(), "src/" + ИмяПроекта + "/bin/Release", ИмяКаталогаИсточник);

Для Каждого ИмяФайла Из ИменаФайловКомпонентов Цикл

Если ФС.ФайлСуществует(ПутьИсточник) Тогда
ПереместитьФайл(ПутьИсточник, ПутьПриемник);
ПутьКФайлуИсточник = ОбъединитьПути(КаталогСборки, ИмяФайла);
ПутьКФайлуНазначение = ОбъединитьПути(КаталогПриемник, ИмяФайла);

Если ФС.ФайлСуществует(ПутьКФайлуИсточник) Тогда
ПереместитьФайл(ПутьКФайлуИсточник, ПутьКФайлуНазначение);
КонецЕсли;

КонецЦикла;

КонецЦикла;

КонецЦикла;

КонецПроцедуры

Процедура ПроверитьНаличиеБиблиотекиDotNET(ИменаФайлов)
Процедура ПроверитьНаличиеКомпонентов(ИменаФайлов)

Для Каждого ИмяПапки Из СтрРазделить("net4,dotnet", ",") Цикл
ТекущийКаталог = ТекущийКаталог();
Папки = СтрРазделить("net4,dotnet", ",");

Для Каждого ИмяПапки Из Папки Цикл
Для Каждого ИмяФайла Из ИменаФайлов Цикл
ПутьКФайлу = ОбъединитьПути(ТекущийКаталог(), "Components", ИмяПапки, ИмяФайла);
ПутьКФайлу = ОбъединитьПути(ТекущийКаталог, "Components", ИмяПапки, ИмяФайла);
Если Не ФС.ФайлСуществует(ПутьКФайлу) Тогда
ВызватьИсключение СтрШаблон("Отсутсвует .NET библиотека %1 в папке Components/%2", ИмяФайла, ИмяПапки);
ВызватьИсключение СтрШаблон("Отсутсвует .NET компонента %1 в папке Components/%2", ИмяФайла, ИмяПапки);
Copy link

@coderabbitai coderabbitai bot Feb 19, 2026

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

⚠️ Potential issue | 🟡 Minor

Typo in user-facing error message: "Отсутсвует" → "Отсутствует"

"Отсутсвует" is missing the letter 'т' — the correct spelling is "Отсутствует".

📝 Proposed fix 
-			ВызватьИсключение СтрШаблон("Отсутсвует .NET компонента %1 в папке Components/%2", ИмяФайла, ИмяПапки);
+			ВызватьИсключение СтрШаблон("Отсутствует .NET компонента %1 в папке Components/%2", ИмяФайла, ИмяПапки);
📝 Committable suggestion

‼️ IMPORTANT
Carefully review the code before committing. Ensure that it accurately replaces the highlighted code, contains no missing lines, and has no issues with indentation. Thoroughly test & benchmark the code to ensure it meets the requirements.

Suggested change
ВызватьИсключение СтрШаблон("Отсутсвует .NET компонента %1 в папке Components/%2", ИмяФайла, ИмяПапки);
ВызватьИсключение СтрШаблон("Отсутствует .NET компонента %1 в папке Components/%2", ИмяФайла, ИмяПапки);
🤖 Prompt for AI Agents 
Verify each finding against the current code and only fix it if needed.

In `@build/ПодготовкаКомпонентов.os` at line 98, Fix the typo in the user-facing
error message passed to ВызватьИсключение: change the string in the СтрШаблон
call from "Отсутсвует .NET компонента %1 в папке Components/%2" to "Отсутствует
.NET компонента %1 в папке Components/%2" so the message spelled correctly when
thrown (the call uses ВызватьИсключение and the template parameters ИмяФайла and
ИмяПапки).

КонецЕсли;
КонецЦикла;
КонецЦикла;

КонецПроцедуры
КонецПроцедуры

#КонецОбласти
33 changes: 24 additions & 9 deletions src/Chronometer/Chronometer.cs
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,6 +1,5 @@
using System;
using System.IO;
using System.Reflection;
using System.Diagnostics;
using System.Runtime.CompilerServices;
using ScriptEngine.Machine.Contexts;

#if NET6_0_OR_GREATER
Expand All @@ -12,11 +11,15 @@ namespace OscriptChronometer
[ContextClass("Хронометр", "Chronometer")]
public class Chronometer : AutoContext<Chronometer>
{
private static readonly long Frequency = Stopwatch.Frequency;
private static readonly double TicksToNs = 1_000_000_000.0 / Frequency;

[ContextProperty("Наносекунд", "Nanoseconds")]
public decimal Nanoseconds { get; private set; }
public decimal Nanoseconds => (decimal) (_elapsedTicks * TicksToNs);

private Perfolizer.Horology.StartedClock _Clock;
private long _startTick;
private long _elapsedTicks;
private bool _isRunning;

[ScriptConstructor]
public static Chronometer Constructor()
Expand All @@ -25,16 +28,28 @@ public static Chronometer Constructor()
}

[ContextMethod("Старт", "Start")]
[MethodImpl(MethodImplOptions.AggressiveInlining)]
public void Start()
{
_Clock = Perfolizer.Horology.Chronometer.Start();
if (!_isRunning)
{
_startTick = GetTick();
_isRunning = true;
}
Comment on lines +34 to +38
Copy link

@coderabbitai coderabbitai bot Feb 19, 2026

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

⚠️ Potential issue | 🟡 Minor

_elapsedTicks is not reset on Start(), leaving a stale Nanoseconds reading while running.

After a Start→Stop cycle, calling Start() again does not clear _elapsedTicks. This means Nanoseconds still returns the previous measurement's value until the next Stop(). Consider zeroing it on start for predictable behavior:

Proposed fix 
         if (!_isRunning)
-        {     
+        {
+            _elapsedTicks = 0;
             _startTick = GetTick();
             _isRunning = true;
         }
📝 Committable suggestion

‼️ IMPORTANT
Carefully review the code before committing. Ensure that it accurately replaces the highlighted code, contains no missing lines, and has no issues with indentation. Thoroughly test & benchmark the code to ensure it meets the requirements.

Suggested change
if (!_isRunning)
{
_startTick = GetTick();
_isRunning = true;
}
if (!_isRunning)
{
_elapsedTicks = 0;
_startTick = GetTick();
_isRunning = true;
}
🤖 Prompt for AI Agents 
Verify each finding against the current code and only fix it if needed.

In `@src/Chronometer/Chronometer.cs` around lines 34 - 38, In Chronometer.Start(),
reset the accumulated timer state by setting _elapsedTicks = 0 (or equivalent
zeroing) when transitioning from stopped to running so Nanoseconds reflects only
the current run; update the Start() method (which sets _startTick = GetTick()
and _isRunning = true) to also clear _elapsedTicks so subsequent Start→Stop
cycles don't return stale values from previous runs.

}

[ContextMethod("Стоп", "Stop")]
[MethodImpl(MethodImplOptions.AggressiveInlining)]
public void Stop()
{
var clockElapsed = _Clock.GetElapsed();
Nanoseconds = (decimal) clockElapsed.GetNanoseconds();
{
if (_isRunning)
{
_elapsedTicks = GetTick() - _startTick;
_isRunning = false;
}
}

[MethodImpl(MethodImplOptions.AggressiveInlining)]
private static long GetTick() => Stopwatch.GetTimestamp();
}
}
4 changes: 0 additions & 4 deletions src/Chronometer/ChronometerOneScript.csproj
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -21,9 +21,5 @@
<ItemGroup Condition="'$(TargetFramework)'=='net48'">
<PackageReference Include="OneScript.StandardLibrary" Version="1.9.2" />
</ItemGroup>

<ItemGroup>
<PackageReference Include="Perfolizer" Version="0.5.3" />
</ItemGroup>

</Project>
Loading