Fix listing files in ASL File Requester

This commit is contained in:
deadwood 2024-04-07 17:26:43 +02:00
parent 502ce2c5e5
commit 528b0f83b4
1 changed files with 21 additions and 2 deletions

View File

@ -301,14 +301,33 @@ LONG abiv0_Examine(BPTR lock, struct FileInfoBlockV0 *fib, struct DosLibraryV0 *
LONG res = Examine(flproxy->native, fibproxy->native);
if (res)
{
fibproxy->base.fib_Date = fibproxy->native->fib_Date;
fibproxy->base.fib_Size = fibproxy->native->fib_Size;
fibproxy->base.fib_Date = fibproxy->native->fib_Date;
fibproxy->base.fib_Size = fibproxy->native->fib_Size;
fibproxy->base.fib_DirEntryType = fibproxy->native->fib_DirEntryType;
CopyMem(fibproxy->native->fib_FileName, fibproxy->base.fib_FileName, 108);
bug("abiv0_Examine: STUB\n");
}
return res;
}
MAKE_PROXY_ARG_3(Examine)
LONG abiv0_ExNext(BPTR lock, struct FileInfoBlockV0 *fileInfoBlock, struct DosLibraryV0 *DOSBaseV0)
{
struct FileLockProxy *flproxy = (struct FileLockProxy *)lock;
struct FileInfoBlockProxy *fibproxy = (struct FileInfoBlockProxy *)fileInfoBlock;
LONG res = ExNext(flproxy->native, fibproxy->native);
if (res)
{
fibproxy->base.fib_Date = fibproxy->native->fib_Date;
fibproxy->base.fib_Size = fibproxy->native->fib_Size;
fibproxy->base.fib_DirEntryType = fibproxy->native->fib_DirEntryType;
CopyMem(fibproxy->native->fib_FileName, fibproxy->base.fib_FileName, 108);
bug("abiv0_ExNext: STUB\n");
}
return res;
}
MAKE_PROXY_ARG_3(ExNext)
BOOL abiv0_ExamineFH(BPTR fh, struct FileInfoBlockV0 *fib, struct DosLibraryV0 *DOSBaseV0)
{
struct FileHandleProxy *fhproxy = (struct FileHandleProxy *)fh;