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"
15226efd35SChris Lattner #include "llvm/System/Path.h"
16*f77e11baSChris Lattner 
17*f77e11baSChris Lattner // FIXME: This is terrible, we need this for ::close.
18*f77e11baSChris Lattner #if !defined(_MSC_VER) && !defined(__MINGW32__)
19*f77e11baSChris Lattner #include <unistd.h>
20*f77e11baSChris Lattner #include <sys/uio.h>
21*f77e11baSChris Lattner #else
22*f77e11baSChris Lattner #include <io.h>
23*f77e11baSChris Lattner #endif
24226efd35SChris Lattner using namespace clang;
25226efd35SChris Lattner 
26ea61b32cSChris Lattner #if defined(_MSC_VER)
27ea61b32cSChris Lattner #define S_ISDIR(s) (_S_IFDIR & s)
28ea61b32cSChris Lattner #endif
29ea61b32cSChris Lattner 
30dd278430SChris Lattner /// FileSystemStatCache::get - Get the 'stat' information for the specified
31dd278430SChris Lattner /// path, using the cache to accellerate it if possible.  This returns true if
32dd278430SChris Lattner /// the path does not exist or false if it exists.
33dd278430SChris Lattner ///
34dd278430SChris Lattner /// If FileDescriptor is non-null, then this lookup should only return success
35dd278430SChris Lattner /// for files (not directories).  If it is null this lookup should only return
36dd278430SChris Lattner /// success for directories (not files).  On a successful file lookup, the
37dd278430SChris Lattner /// implementation can optionally fill in FileDescriptor with a valid
38dd278430SChris Lattner /// descriptor and the client guarantees that it will close it.
39dd278430SChris Lattner bool FileSystemStatCache::get(const char *Path, struct stat &StatBuf,
40dd278430SChris Lattner                               int *FileDescriptor, FileSystemStatCache *Cache) {
41dd278430SChris Lattner   LookupResult R;
42dd278430SChris Lattner 
43dd278430SChris Lattner   if (Cache)
44dd278430SChris Lattner     R = Cache->getStat(Path, StatBuf, FileDescriptor);
45dd278430SChris Lattner   else
46dd278430SChris Lattner     R = ::stat(Path, &StatBuf) != 0 ? CacheMissing : CacheExists;
47dd278430SChris Lattner 
48*f77e11baSChris Lattner   // If the path doesn't exist, return failure.
49dd278430SChris Lattner   if (R == CacheMissing) return true;
50dd278430SChris Lattner 
51*f77e11baSChris Lattner   // If the path exists, make sure that its "directoryness" matches the clients
52*f77e11baSChris Lattner   // demands.
53dd278430SChris Lattner   bool isForDir = FileDescriptor == 0;
54*f77e11baSChris Lattner   if (S_ISDIR(StatBuf.st_mode) != isForDir) {
55*f77e11baSChris Lattner     // If not, close the file if opened.
56*f77e11baSChris Lattner     if (FileDescriptor && *FileDescriptor != -1) {
57*f77e11baSChris Lattner       ::close(*FileDescriptor);
58*f77e11baSChris Lattner       *FileDescriptor = -1;
59*f77e11baSChris Lattner     }
60*f77e11baSChris Lattner 
61*f77e11baSChris Lattner     return true;
62*f77e11baSChris Lattner   }
63*f77e11baSChris Lattner 
64*f77e11baSChris Lattner   return false;
65dd278430SChris Lattner }
66dd278430SChris Lattner 
67dd278430SChris Lattner 
68226efd35SChris Lattner MemorizeStatCalls::LookupResult
69dd278430SChris Lattner MemorizeStatCalls::getStat(const char *Path, struct stat &StatBuf,
70dd278430SChris Lattner                            int *FileDescriptor) {
71dd278430SChris Lattner   LookupResult Result = statChained(Path, StatBuf, FileDescriptor);
72226efd35SChris Lattner 
73226efd35SChris Lattner   // Do not cache failed stats, it is easy to construct common inconsistent
74226efd35SChris Lattner   // situations if we do, and they are not important for PCH performance (which
75226efd35SChris Lattner   // currently only needs the stats to construct the initial FileManager
76226efd35SChris Lattner   // entries).
778f0583daSChris Lattner   if (Result == CacheMissing)
78226efd35SChris Lattner     return Result;
79226efd35SChris Lattner 
80226efd35SChris Lattner   // Cache file 'stat' results and directories with absolutely paths.
81226efd35SChris Lattner   if (!S_ISDIR(StatBuf.st_mode) || llvm::sys::Path(Path).isAbsolute())
822a6fa47bSChris Lattner     StatCalls[Path] = StatBuf;
83226efd35SChris Lattner 
84226efd35SChris Lattner   return Result;
85226efd35SChris Lattner }
86