1226efd35SChris Lattner //===--- FileSystemStatCache.cpp - Caching for 'stat' calls ---------------===//
2226efd35SChris Lattner //
3226efd35SChris Lattner //                     The LLVM Compiler Infrastructure
4226efd35SChris Lattner //
5226efd35SChris Lattner // This file is distributed under the University of Illinois Open Source
6226efd35SChris Lattner // License. See LICENSE.TXT for details.
7226efd35SChris Lattner //
8226efd35SChris Lattner //===----------------------------------------------------------------------===//
9226efd35SChris Lattner //
10226efd35SChris Lattner //  This file defines the FileSystemStatCache interface.
11226efd35SChris Lattner //
12226efd35SChris Lattner //===----------------------------------------------------------------------===//
13226efd35SChris Lattner 
14226efd35SChris Lattner #include "clang/Basic/FileSystemStatCache.h"
15c8130a74SBen Langmuir #include "clang/Basic/VirtualFileSystem.h"
168aaf4995SMichael J. Spencer #include "llvm/Support/Path.h"
17f77e11baSChris Lattner 
18f77e11baSChris Lattner // FIXME: This is terrible, we need this for ::close.
19f77e11baSChris Lattner #if !defined(_MSC_VER) && !defined(__MINGW32__)
20f77e11baSChris Lattner #include <unistd.h>
21f77e11baSChris Lattner #include <sys/uio.h>
22f77e11baSChris Lattner #else
23f77e11baSChris Lattner #include <io.h>
24f77e11baSChris Lattner #endif
25226efd35SChris Lattner using namespace clang;
26226efd35SChris Lattner 
27ea61b32cSChris Lattner #if defined(_MSC_VER)
2831ee8bfbSFrancois Pichet #define S_ISDIR(s) ((_S_IFDIR & s) !=0)
29ea61b32cSChris Lattner #endif
30ea61b32cSChris Lattner 
3168e081d6SDavid Blaikie void FileSystemStatCache::anchor() { }
3268e081d6SDavid Blaikie 
33c8130a74SBen Langmuir static void copyStatusToFileData(const vfs::Status &Status,
34f8f91b89SRafael Espindola                                  FileData &Data) {
35d066d4c8SBen Langmuir   Data.Name = Status.getName();
36f8f91b89SRafael Espindola   Data.Size = Status.getSize();
37f8f91b89SRafael Espindola   Data.ModTime = Status.getLastModificationTime().toEpochTime();
38f8f91b89SRafael Espindola   Data.UniqueID = Status.getUniqueID();
39c8130a74SBen Langmuir   Data.IsDirectory = Status.isDirectory();
40c8130a74SBen Langmuir   Data.IsNamedPipe = Status.getType() == llvm::sys::fs::file_type::fifo_file;
41f8f91b89SRafael Espindola   Data.InPCH = false;
425de00f3bSBen Langmuir   Data.IsVFSMapped = Status.IsVFSMapped;
43f8f91b89SRafael Espindola }
44f8f91b89SRafael Espindola 
45dd278430SChris Lattner /// FileSystemStatCache::get - Get the 'stat' information for the specified
464fc8fb09SChris Lattner /// path, using the cache to accelerate it if possible.  This returns true if
47dd278430SChris Lattner /// the path does not exist or false if it exists.
48dd278430SChris Lattner ///
493b779379SArgyrios Kyrtzidis /// If isFile is true, then this lookup should only return success for files
503b779379SArgyrios Kyrtzidis /// (not directories).  If it is false this lookup should only return
51dd278430SChris Lattner /// success for directories (not files).  On a successful file lookup, the
52dd278430SChris Lattner /// implementation can optionally fill in FileDescriptor with a valid
53dd278430SChris Lattner /// descriptor and the client guarantees that it will close it.
54f8f91b89SRafael Espindola bool FileSystemStatCache::get(const char *Path, FileData &Data, bool isFile,
55*326ffb36SDavid Blaikie                               std::unique_ptr<vfs::File> *F,
56*326ffb36SDavid Blaikie                               FileSystemStatCache *Cache, vfs::FileSystem &FS) {
57dd278430SChris Lattner   LookupResult R;
583b779379SArgyrios Kyrtzidis   bool isForDir = !isFile;
59dd278430SChris Lattner 
605ea7d07dSChris Lattner   // If we have a cache, use it to resolve the stat query.
61dd278430SChris Lattner   if (Cache)
62c8130a74SBen Langmuir     R = Cache->getStat(Path, Data, isFile, F, FS);
63c8130a74SBen Langmuir   else if (isForDir || !F) {
643b779379SArgyrios Kyrtzidis     // If this is a directory or a file descriptor is not needed and we have
653b779379SArgyrios Kyrtzidis     // no cache, just go to the file system.
66c8130a74SBen Langmuir     llvm::ErrorOr<vfs::Status> Status = FS.status(Path);
67c8130a74SBen Langmuir     if (!Status) {
68f8f91b89SRafael Espindola       R = CacheMissing;
69f8f91b89SRafael Espindola     } else {
70f8f91b89SRafael Espindola       R = CacheExists;
71c8130a74SBen Langmuir       copyStatusToFileData(*Status, Data);
72f8f91b89SRafael Espindola     }
735ea7d07dSChris Lattner   } else {
745ea7d07dSChris Lattner     // Otherwise, we have to go to the filesystem.  We can always just use
755ea7d07dSChris Lattner     // 'stat' here, but (for files) the client is asking whether the file exists
765ea7d07dSChris Lattner     // because it wants to turn around and *open* it.  It is more efficient to
775ea7d07dSChris Lattner     // do "open+fstat" on success than it is to do "stat+open".
785ea7d07dSChris Lattner     //
795ea7d07dSChris Lattner     // Because of this, check to see if the file exists with 'open'.  If the
805ea7d07dSChris Lattner     // open succeeds, use fstat to get the stat info.
81b8984329SAhmed Charles     std::unique_ptr<vfs::File> OwnedFile;
82c080917eSRafael Espindola     std::error_code EC = FS.openFileForRead(Path, OwnedFile);
835ea7d07dSChris Lattner 
8416125fb6SRafael Espindola     if (EC) {
855ea7d07dSChris Lattner       // If the open fails, our "stat" fails.
865ea7d07dSChris Lattner       R = CacheMissing;
875ea7d07dSChris Lattner     } else {
885ea7d07dSChris Lattner       // Otherwise, the open succeeded.  Do an fstat to get the information
895ea7d07dSChris Lattner       // about the file.  We'll end up returning the open file descriptor to the
905ea7d07dSChris Lattner       // client to do what they please with it.
91c8130a74SBen Langmuir       llvm::ErrorOr<vfs::Status> Status = OwnedFile->status();
92c8130a74SBen Langmuir       if (Status) {
935ea7d07dSChris Lattner         R = CacheExists;
94c8130a74SBen Langmuir         copyStatusToFileData(*Status, Data);
95*326ffb36SDavid Blaikie         *F = std::move(OwnedFile);
96f8f91b89SRafael Espindola       } else {
975ea7d07dSChris Lattner         // fstat rarely fails.  If it does, claim the initial open didn't
985ea7d07dSChris Lattner         // succeed.
995ea7d07dSChris Lattner         R = CacheMissing;
100f1186c5aSCraig Topper         *F = nullptr;
1015ea7d07dSChris Lattner       }
1025ea7d07dSChris Lattner     }
1035ea7d07dSChris Lattner   }
104dd278430SChris Lattner 
105f77e11baSChris Lattner   // If the path doesn't exist, return failure.
106dd278430SChris Lattner   if (R == CacheMissing) return true;
107dd278430SChris Lattner 
108f77e11baSChris Lattner   // If the path exists, make sure that its "directoryness" matches the clients
109f77e11baSChris Lattner   // demands.
110f8f91b89SRafael Espindola   if (Data.IsDirectory != isForDir) {
111f77e11baSChris Lattner     // If not, close the file if opened.
112*326ffb36SDavid Blaikie     if (F)
113f1186c5aSCraig Topper       *F = nullptr;
114f77e11baSChris Lattner 
115f77e11baSChris Lattner     return true;
116f77e11baSChris Lattner   }
117f77e11baSChris Lattner 
118f77e11baSChris Lattner   return false;
119dd278430SChris Lattner }
120dd278430SChris Lattner 
121226efd35SChris Lattner MemorizeStatCalls::LookupResult
122f8f91b89SRafael Espindola MemorizeStatCalls::getStat(const char *Path, FileData &Data, bool isFile,
123*326ffb36SDavid Blaikie                            std::unique_ptr<vfs::File> *F, vfs::FileSystem &FS) {
124c8130a74SBen Langmuir   LookupResult Result = statChained(Path, Data, isFile, F, FS);
125226efd35SChris Lattner 
126226efd35SChris Lattner   // Do not cache failed stats, it is easy to construct common inconsistent
127226efd35SChris Lattner   // situations if we do, and they are not important for PCH performance (which
128226efd35SChris Lattner   // currently only needs the stats to construct the initial FileManager
129226efd35SChris Lattner   // entries).
1308f0583daSChris Lattner   if (Result == CacheMissing)
131226efd35SChris Lattner     return Result;
132226efd35SChris Lattner 
133226efd35SChris Lattner   // Cache file 'stat' results and directories with absolutely paths.
134f8f91b89SRafael Espindola   if (!Data.IsDirectory || llvm::sys::path::is_absolute(Path))
135f8f91b89SRafael Espindola     StatCalls[Path] = Data;
136226efd35SChris Lattner 
137226efd35SChris Lattner   return Result;
138226efd35SChris Lattner }
139