From 5d216ac19a99ebb6bc0506a5745e6c3dc1dffe5e Mon Sep 17 00:00:00 2001
From: Akshay Nair <phenax5@gmail.com>
Date: Thu, 25 Dec 2025 14:34:45 +0530
Subject: Handle errors with owner/group entry

---
 lib/Daffm/State.hs | 9 +++++----
 1 file changed, 5 insertions(+), 4 deletions(-)

(limited to 'lib/Daffm/State.hs')

diff --git a/lib/Daffm/State.hs b/lib/Daffm/State.hs
index 9b3d81d..f7c8aa1 100644
--- a/lib/Daffm/State.hs
+++ b/lib/Daffm/State.hs
@@ -11,6 +11,7 @@ import Control.Exception (try)
 import Control.Monad (filterM, forM)
 import Daffm.Types
 import Daffm.Utils (trim)
+import Data.Either (fromRight)
 import Data.List (findIndex, sortBy)
 import qualified Data.Map.Strict as Map
 import Data.Maybe (fromMaybe)
@@ -147,16 +148,16 @@ getFileInfo name = do
     if
       | Posix.isSymbolicLink stat -> Just . Text.pack <$> getSymbolicLinkTarget path
       | otherwise -> pure Nothing
-  user <- Posix.getUserEntryForID $ Posix.fileOwner stat
-  group <- Posix.getGroupEntryForID $ Posix.fileGroup stat
+  user <- either2Maybe <$> try (Posix.getUserEntryForID $ Posix.fileOwner stat)
+  group <- either2Maybe <$> try (Posix.getGroupEntryForID $ Posix.fileGroup stat)
   pure $
     FileInfo
       { filePath = Text.pack path,
         fileName = name,
         fileSize = Posix.fileSize stat,
         fileMode = Posix.fileMode stat,
-        fileUser = Text.pack . Posix.userName $ user,
-        fileGroup = Text.pack . Posix.groupName $ group,
+        fileUser = maybe "?" (Text.pack . Posix.userName) user,
+        fileGroup = maybe "?" (Text.pack . Posix.groupName) group,
         fileType = fileTypeFromStatus stat,
         fileLinkType = fileTypeFromStatus <$> linkStat,
         fileLinkTarget = linkTarget
-- 
cgit v1.3.1