mirror of https://github.com/red-prig/fpPS4.git
68 lines
1.5 KiB
Plaintext
68 lines
1.5 KiB
Plaintext
unit ps4_libSceRudp;
|
|
|
|
{$mode ObjFPC}{$H+}
|
|
|
|
interface
|
|
|
|
uses
|
|
ps4_program,
|
|
Classes,
|
|
SysUtils;
|
|
|
|
implementation
|
|
|
|
uses
|
|
ps4_time;
|
|
|
|
function ps4_sceRudpInit(pool:Pointer;poolSize:QWORD):Integer; SysV_ABI_CDecl;
|
|
begin
|
|
Writeln('sceRudpInit:',HexStr(pool),':',poolSize);
|
|
Result:=0;
|
|
end;
|
|
|
|
function ps4_sceRudpSetEventHandler(handler:Pointer; //SceRudpEventHandler
|
|
arg:Pointer):Integer; SysV_ABI_CDecl;
|
|
begin
|
|
Writeln('sceRudpSetEventHandler:',HexStr(handler),':',HexStr(arg));
|
|
Result:=0;
|
|
end;
|
|
|
|
function ps4_sceRudpEnableInternalIOThread(stackSize,priority:DWORD):Integer; SysV_ABI_CDecl;
|
|
begin
|
|
Writeln('sceRudpEnableInternalIOThread:',stackSize,':',priority);
|
|
Result:=0;
|
|
end;
|
|
|
|
function ps4_sceRudpNetFlush:Integer; SysV_ABI_CDecl;
|
|
begin
|
|
Result:=0;
|
|
end;
|
|
|
|
function ps4_sceRudpProcessEvents(timeout:QWORD // SceRudpUsec
|
|
):Integer; SysV_ABI_CDecl;
|
|
begin
|
|
ps4_usleep(timeout);
|
|
Result:=0;
|
|
end;
|
|
|
|
function Load_libSceRudp(Const name:RawByteString):TElf_node;
|
|
var
|
|
lib:PLIBRARY;
|
|
begin
|
|
Result:=TElf_node.Create;
|
|
Result.pFileName:=name;
|
|
lib:=Result._add_lib('libSceRudp');
|
|
|
|
lib^.set_proc($6A6B817C8FC041CE,@ps4_sceRudpInit);
|
|
lib^.set_proc($4941157ACF20BE6C,@ps4_sceRudpSetEventHandler);
|
|
lib^.set_proc($E8F04DA6C8326B1C,@ps4_sceRudpEnableInternalIOThread);
|
|
lib^.set_proc($F8127DB2F0E68D8B,@ps4_sceRudpNetFlush);
|
|
lib^.set_proc($F54F66D581F449C4,@ps4_sceRudpProcessEvents);
|
|
end;
|
|
|
|
initialization
|
|
ps4_app.RegistredPreLoad('libSceRudp.prx',@Load_libSceRudp);
|
|
|
|
end.
|
|
|