ShuriZma
/
FPPS4
mirror of https://github.com/red-prig/fpPS4.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

+

This commit is contained in:
Pavel 2022-11-29 12:20:51 +03:00
parent 00d34bbb33
commit 7438e599a5
1 changed files with 30 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
src/audio/ps4_libsceaudioout.pas
View File

@ -18,6 +18,7 @@ uses
implementation
uses
ps4_time,
sys_signal;
const
@ -180,6 +181,8 @@ type
bufsize:Integer;
buf:Pointer;
last_time:QWORD;
//d:QWORD;
Destructor Destroy; override;
@ -688,6 +691,8 @@ begin
//Writeln('sceAudioOutOutput:',handle,':',HexStr(ptr));
H.last_time:=ps4_sceKernelGetProcessTime;
_sig_lock;
H.Release;
_sig_unlock;
@ -708,6 +713,30 @@ begin
end;
end;
function ps4_sceAudioOutGetLastOutputTime(handle:Integer;outputTime:PQWORD):Integer; SysV_ABI_CDecl;
Var
H:TAudioOutHandle;
begin
if (HAudioOuts=nil) then Exit(SCE_AUDIO_OUT_ERROR_NOT_INIT);
if (outputTime=nil) then Exit(SCE_AUDIO_OUT_ERROR_INVALID_POINTER);
_sig_lock;
H:=TAudioOutHandle(HAudioOuts.Acqure(handle));
_sig_unlock;
if (H=nil) then Exit(SCE_AUDIO_OUT_ERROR_INVALID_PORT);
outputTime^:=H.last_time;
_sig_lock;
H.Release;
_sig_unlock;
Result:=0;
end;
function Load_libSceAudioOut(Const name:RawByteString):TElf_node;
var
lib:PLIBRARY;
@ -725,6 +754,7 @@ begin
lib^.set_proc($C15C0F539D294B57,@ps4_sceAudioOutSetMixLevelPadSpk);
lib^.set_proc($40E42D6DE0EAB13E,@ps4_sceAudioOutOutput);
lib^.set_proc($C373DD6924D2C061,@ps4_sceAudioOutOutputs);
lib^.set_proc($3ED96DB37DBAA5DB,@ps4_sceAudioOutGetLastOutputTime);
end;
const