mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 20:37:33 +00:00
chore: strip temporary PerfLog instrumentation
Профилирование завершено (кадр спектра 8.3мс -> 1.7мс, UI 45% -> 26% ядра): удаляем PerfLog.pas, doc/PERF_PROFILING.md и все // PERF-замеры из WDSPEngine/HPSDRNetwork/PlutoBackend/AudioOutput/SpectrumView(+GL)/ WaterfallViewOpengl/WidebandView/MainForm. Сами оптимизации (full-raw рендерер, дворд-блендеры, порог бэндплана) остаются. Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
+1
-11
@@ -26,8 +26,7 @@ interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, ctypes,
|
||||
RadioBackend, IIOBindings, HPSDRProtocol, Settings,
|
||||
PerfLog; // ВРЕМЕННО (perf/cpu-profiling): зонные CPU-таймеры
|
||||
RadioBackend, IIOBindings, HPSDRProtocol, Settings;
|
||||
|
||||
type
|
||||
{ TPlutoBackend }
|
||||
@@ -196,7 +195,6 @@ var
|
||||
outc: Integer;
|
||||
vi, vq: LongInt;
|
||||
u: LongWord;
|
||||
T0: Int64; // PERF
|
||||
|
||||
procedure FlushPkt;
|
||||
begin
|
||||
@@ -222,7 +220,6 @@ begin
|
||||
if Terminated then Break;
|
||||
if n <= 0 then begin Sleep(2); Continue; end;
|
||||
|
||||
T0 := PerfNow; // PERF: только конверсия, без блокирующего refill
|
||||
step := iio_buffer_step(FBk.FRxBuf);
|
||||
pFirst := iio_buffer_first(FBk.FRxBuf, FBk.FRxChI);
|
||||
pEnd := iio_buffer_end(FBk.FRxBuf);
|
||||
@@ -249,7 +246,6 @@ begin
|
||||
Inc(p, step);
|
||||
end;
|
||||
if outc > 0 then FlushPkt; // хвост блока
|
||||
PerfAdd(pzPlutoRxConv, T0); // PERF: int16→24bit BE + FOnDDCIQ на весь iio-буфер
|
||||
end;
|
||||
end;
|
||||
|
||||
@@ -266,12 +262,10 @@ var
|
||||
pFirst, pEnd, p: PByte;
|
||||
h: Integer;
|
||||
n: ptrint;
|
||||
T0: Int64; // PERF
|
||||
begin
|
||||
while not Terminated do
|
||||
begin
|
||||
if FBk.FTxBuf = nil then begin Sleep(5); Continue; end;
|
||||
T0 := PerfNow; // PERF
|
||||
step := iio_buffer_step(FBk.FTxBuf);
|
||||
pFirst := iio_buffer_first(FBk.FTxBuf, FBk.FTxChI);
|
||||
pEnd := iio_buffer_end(FBk.FTxBuf);
|
||||
@@ -297,7 +291,6 @@ begin
|
||||
Inc(p, step);
|
||||
end;
|
||||
LeaveCriticalSection(FBk.FTxLock);
|
||||
PerfAdd(pzPlutoTxFill, T0); // PERF: наполнение буфера (без блокирующего push)
|
||||
|
||||
if Terminated then Break;
|
||||
n := iio_buffer_push(FBk.FTxBuf); // блокирует → пейсинг на device-rate
|
||||
@@ -860,10 +853,8 @@ procedure TPlutoBackend.SendDUCIQ(const IData, QData: array of Integer);
|
||||
var
|
||||
i, p, k, t, L, taps, base, n: Integer;
|
||||
ai, aq: Double;
|
||||
T0: Int64; // PERF
|
||||
begin
|
||||
if (not FTxStreaming) or (FTxRatio < 1) or (Length(FTxCoef) = 0) then Exit;
|
||||
T0 := PerfNow; // PERF
|
||||
n := Length(IData);
|
||||
if Length(QData) < n then n := Length(QData);
|
||||
L := FTxRatio;
|
||||
@@ -902,7 +893,6 @@ begin
|
||||
finally
|
||||
LeaveCriticalSection(FTxLock);
|
||||
end;
|
||||
PerfAdd(pzPlutoTxResamp, T0); // PERF: полифазный интерполятор + 24→16 + FIFO
|
||||
end;
|
||||
|
||||
procedure TPlutoBackend.ClearDUCIQQueue;
|
||||
|
||||
Reference in New Issue
Block a user