Emulator-Archive/fpPS4
1
0
Fork 0
mirror of https://github.com/red-prig/fpPS4.git synced 2024-11-23 14:29:53 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

+

Browse Source
This commit is contained in:
red-prig 2022-10-17 19:46:50 +03:00
parent 1a98b13766
commit e9ee325196
1 changed files with 10 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
chip/ps4_videodrv.pas
View File

@ -8,6 +8,7 @@ unit ps4_videodrv;
interface
uses
Windows,
Classes,
SysUtils,
LFQueue,
@ -164,10 +165,8 @@ var
GFXRing:TvCmdRing;
GFXMicroEngine:TvMicroEngine;
FIdleEvent:PRTLEvent=nil;
FSubmitEvent:PRTLEvent=nil;
FSubmitAllowed:DWORD=0;
FIdleEvent:THandle=0;
FSubmitAllowed:QWORD=0;
GPU_REGS:TGPU_REGS;
@ -427,7 +426,7 @@ begin
begin
//if (GFXMicroEngine.Current^.mode=metCmdBuffer) then
//begin
// RTLEventSetEvent(FIdleEvent);
// SetEvent(FIdleEvent);
//end;
end else
begin
@ -446,7 +445,7 @@ begin
if not work_do then
begin
RTLEventSetEvent(FIdleEvent);
SetEvent(FIdleEvent);
time:=Int64(NT_INFINITE);
NtDelayExecution(True,@time);
end;
@ -464,11 +463,7 @@ begin
GFXRing.Init;
GFXMicroEngine.Init;
FIdleEvent:=RTLEventCreate;
RTLEventSetEvent(FIdleEvent);
FSubmitEvent:=RTLEventCreate;
RTLEventSetEvent(FSubmitEvent);
FIdleEvent:=CreateEvent(nil,True,True,nil);
t:=BeginThread(@GFX_thread);
@ -608,24 +603,17 @@ begin
node^.Flip:=Flip^;
end;
RTLEventResetEvent(FIdleEvent);
ResetEvent(FIdleEvent);
GFXRing.Queue.Push(node);
NtQueueApcThread(_gfx_handle,@_apc_null,0,nil,0);
end;
procedure vSubmitDone;
begin
if (FIdleEvent<>nil) and (FSubmitEvent<>nil) then
if (FIdleEvent<>0) then
if CAS(FSubmitAllowed,0,1) then
begin
While not CAS(FSubmitAllowed,0,1) do
begin
RTLEventWaitFor(FSubmitEvent); //wait another vSubmitDone
end;
RTLEventResetEvent(FSubmitEvent);
RTLEventWaitFor(FIdleEvent,2000); //wait idle GPU
RTLEventSetEvent(FSubmitEvent);
NtWaitForSingleObject(FIdleEvent,False,nil); //wait idle GPU
store_release(FSubmitAllowed,0);
end;
end;