commit 767608d6916535e62bfd3bc8a2ec086225b13f01
author Nico Huber <nico.h@gmx.de> Sat Jan 27 18:47:05 2024 +0100
committer Nico Huber <nico.h@gmx.de> Sun Jan 28 14:25:01 2024 +0100
tree 50793db8ccd0bc3a5a6cdd34705c799c9d31690e
parent 29e1ba2343ca0d5094a37c8458186911d080692a

ext2: Ensure the directory walk progresses

src/filo-fs-ext2.adb

diff --git a/src/filo-fs-ext2.adb b/src/filo-fs-ext2.adb
index 7b138b2..89d2dbb 100644
--- a/src/filo-fs-ext2.adb
+++ b/src/filo-fs-ext2.adb
@@ -844,7 +844,8 @@
             end if;
 
             Dir_Entry_Length := File_Length (Read_LE16 (Dir_Entry_Header, 4));
-            if File_Pos > File_Length'Last - Dir_Entry_Length or
+            if Dir_Entry_Length = 0 or
+               File_Pos > File_Length'Last - Dir_Entry_Length or
                Unsigned_64 (File_Pos) >= Unsigned_64 (State.Inode.Size) - Unsigned_64 (Dir_Entry_Length)
             then
                return;