mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

more inode cache debugging

Browse source
This commit is contained in:
Joey Hess 2021-07-26 12:57:35 -04:00
parent e676cd43c0
commit f195f3b541
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 9 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Annex/Content.hs
View file

@ -6,6 +6,7 @@
-} -}
{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
{-# LANGUAGE OverloadedStrings #-}
module Annex.Content ( module Annex.Content (
inAnnex, inAnnex,
@ -478,9 +479,13 @@ prepSendAnnex key = withObjectLoc key $ \f -> do
-- change while the transfer is in progress, so -- change while the transfer is in progress, so
-- generate an inode cache for the starting -- generate an inode cache for the starting
-- content. -- content.
then maybeToList <$> then do
withTSDelta (liftIO . genInodeCache f) fastDebug "Annex.Content" ("found no inode cache for " ++ show f)
else pure cache maybeToList <$>
withTSDelta (liftIO . genInodeCache f)
else do
fastDebug "Annex.Content" ("found inode cache for " ++ show f)
pure cache
return $ if null cache' return $ if null cache'
then Nothing then Nothing
else Just (fromRawFilePath f, sameInodeCache f cache') else Just (fromRawFilePath f, sameInodeCache f cache')

2
doc/bugs/__34__failed_to_send_content_to_remote__34__/comment_16_6ef33d110d709e46768549c59b02841a._comment
View file

@ -11,6 +11,6 @@ AFAICS.) It's the stat of that file that's relevant.
I've added some debugging now, so --debug with a fresh git-annex build I've added some debugging now, so --debug with a fresh git-annex build
should explain what's going on with the stats. should explain what's going on with the stats.
Use -c annex.debugfilter=Annex.InodeSentinal Use -c annex.debugfilter=Annex.InodeSentinal,Annex.Content
to limit debug output to the relevant ones. to limit debug output to the relevant ones.
"""]] """]]