From 25a6ad85cb6acc2e2751c74eed1703af56c3fe6d Mon Sep 17 00:00:00 2001
From: Pavel <68122101+red-prig@users.noreply.github.com>
Date: Tue, 7 Mar 2023 14:49:36 +0300
Subject: [PATCH] Added TTY and DBG output prefix

---
 kernel/ps4_libkernel.pas |  2 +-
 sys/sys_dev.pas          | 11 +++++++----
 2 files changed, 8 insertions(+), 5 deletions(-)

diff --git a/kernel/ps4_libkernel.pas b/kernel/ps4_libkernel.pas
index f612831..9b3c3f1 100644
--- a/kernel/ps4_libkernel.pas
+++ b/kernel/ps4_libkernel.pas
@@ -113,7 +113,7 @@ end;
 
 procedure ps4_sceKernelDebugOutText(dbg_id:Integer;text:Pchar); SysV_ABI_CDecl;
 begin
- Writeln(text);
+ Writeln('[DBG]:',text);
 end;
 
 //ps4 neo mode is support? (Ps4 Pro)
diff --git a/sys/sys_dev.pas b/sys/sys_dev.pas
index d51e275..6e2b619 100644
--- a/sys/sys_dev.pas
+++ b/sys/sys_dev.pas
@@ -506,16 +506,19 @@ begin
  Result:=readv(vector,count);
 end;
 
-function TDevStd.write (data:Pointer;size:Int64):Int64;
+function TDevStd.write(data:Pointer;size:Int64):Int64;
+var
+ S:RawByteString;
 begin
- CrtOutWriteDirect(WText,data,size);
+ SetString(S,data,size);
+ S:='[TTY]:'+S;
+ CrtOutWriteDirect(WText,PChar(S),Length(S));
  Result:=size;
 end;
 
 function TDevStd.pwrite(data:Pointer;size,offset:Int64):Int64;
 begin
- CrtOutWriteDirect(WText,data,size);
- Result:=size;
+ Result:=write(data,size);
 end;
 
 function TDevStd.writev(vector:p_iovec;count:Integer):Int64;