22 #include <sys/statvfs.h>
50 Cache *Cache::m_instance =
nullptr;
77 const char *config_filename,
78 const char *parameters,
82 err.
Say(
"++++++ Proxy file cache initialization started.");
93 if (! instance.
Config(config_filename, parameters))
95 err.
Say(
"Config Proxy file cache initialization failed.");
98 err.
Say(
"++++++ Proxy file cache initialization completed.");
105 for (
int wti = 0; wti < instance.
RefConfiguration().m_wqueue_threads; ++wti)
117 env->
PutPtr(
"XrdFSCtl_PC*", pfcFSctl);
127 assert (m_instance == 0);
128 m_instance =
new Cache(logger, env);
139 if (! m_decisionpoints.empty())
142 std::string filename = url.
GetPath();
143 std::vector<Decision*>::const_iterator it;
144 for (it = m_decisionpoints.begin(); it != m_decisionpoints.end(); ++it)
148 if (! d->
Decide(filename, *m_oss))
161 m_log(logger,
"XrdPfc_"),
167 m_prefetch_condVar(0),
168 m_prefetch_enabled(false),
170 m_RAM_write_queue(0),
181 const char* tpfx =
"Attach() ";
206 TRACE(
Error, tpfx <<
"Failed opening local file, falling back to remote access " << io->
Path());
214 ((loc && loc[0] != 0) ? loc :
"<deferred open>"));
234 m_writeQ.condVar.Lock();
236 m_writeQ.queue.push_back(b);
238 m_writeQ.queue.push_front(b);
240 m_writeQ.condVar.Signal();
241 m_writeQ.condVar.UnLock();
246 std::list<Block*> removed_blocks;
247 long long sum_size = 0;
249 m_writeQ.condVar.Lock();
250 std::list<Block*>::iterator i = m_writeQ.queue.begin();
251 while (i != m_writeQ.queue.end())
253 if ((*i)->m_file == file)
255 TRACE(Dump,
"Remove entries for " << (
void*)(*i) <<
" path " << file->
lPath());
256 std::list<Block*>::iterator j = i++;
257 removed_blocks.push_back(*j);
258 sum_size += (*j)->get_size();
259 m_writeQ.queue.erase(j);
267 m_writeQ.condVar.UnLock();
271 m_RAM_write_queue -= sum_size;
283 m_writeQ.condVar.Lock();
284 while (m_writeQ.size == 0)
286 m_writeQ.condVar.Wait();
292 int n_pushed = std::min(m_writeQ.size, m_configuration.
m_wqueue_blocks);
293 long long sum_size = 0;
295 for (
int bi = 0; bi < n_pushed; ++bi)
297 Block* block = m_writeQ.queue.front();
298 m_writeQ.queue.pop_front();
299 m_writeQ.writes_between_purges += block->
get_size();
302 blks_to_write[bi] = block;
304 TRACE(Dump,
"ProcessWriteTasks for block " << (
void*)(block) <<
" path " << block->
m_file->
lPath());
306 m_writeQ.size -= n_pushed;
308 m_writeQ.condVar.UnLock();
312 m_RAM_write_queue -= sum_size;
315 for (
int bi = 0; bi < n_pushed; ++bi)
317 Block* block = blks_to_write[bi];
328 long long ret = m_writeQ.writes_between_purges;
329 m_writeQ.writes_between_purges = 0;
337 static const size_t s_block_align = sysconf(_SC_PAGESIZE);
343 long long total = m_RAM_used + size;
348 if (std_size && m_RAM_std_size > 0)
350 char *buf = m_RAM_std_blocks.back();
351 m_RAM_std_blocks.pop_back();
362 if (posix_memalign((
void**) &buf, s_block_align, (
size_t) size))
385 m_RAM_std_blocks.push_back(buf);
397 TRACE(
Debug,
"GetFile " << path <<
", io " << io);
406 it = m_active.find(path);
410 if (it == m_active.end())
412 it = m_active.insert(std::make_pair(path, (
File*) 0)).first;
418 it->second->AddIO(io);
419 inc_ref_cnt(it->second,
false,
true);
426 m_active_cond.
Wait();
435 int res = io->
Fstat(st);
438 TRACE(
Error,
"GetFile, could not get valid stat");
439 }
else if (res > 0) {
441 TRACE(
Error,
"GetFile, stat returned positive value, this should NOT happen here");
443 filesize = st.st_size;
459 inc_ref_cnt(file,
false,
true);
486 dec_ref_cnt(f,
true);
493 class DiskSyncer :
public XrdJob
500 DiskSyncer(
File *f,
bool high_debug,
const char *desc =
"") :
503 m_high_debug(high_debug)
515 class CommandExecutor :
public XrdJob
518 std::string m_command_url;
521 CommandExecutor(
const std::string& command,
const char *desc =
"") :
523 m_command_url(command)
537 void Cache::schedule_file_sync(
File* f,
bool ref_cnt_already_set,
bool high_debug)
539 DiskSyncer* ds =
new DiskSyncer(f, high_debug);
541 if ( ! ref_cnt_already_set) inc_ref_cnt(f,
true, high_debug);
548 dec_ref_cnt(f, high_debug);
551 void Cache::inc_ref_cnt(
File* f,
bool lock,
bool high_debug)
557 if (lock) m_active_cond.
Lock();
559 if (lock) m_active_cond.
UnLock();
564 void Cache::dec_ref_cnt(
File* f,
bool high_debug)
572 bool emergency_close =
false;
587 <<
" -- closing and deleting File object without further ado");
588 emergency_close =
true;
619 schedule_file_sync(f,
true,
true);
624 bool finished_p =
false;
630 TRACE_INT(tlvl,
"dec_ref_cnt " << f->
GetLocalPath() <<
", cnt after sync_check and dec_ref_cnt = " << cnt);
644 m_active.erase(act_it);
653 int len = snprintf(buf, 4096,
"{\"event\":\"file_close\","
654 "\"lfn\":\"%s\",\"size\":%lld,\"blk_size\":%d,\"n_blks\":%d,\"n_blks_done\":%d,"
655 "\"access_cnt\":%lu,\"attach_t\":%lld,\"detach_t\":%lld,\"remotes\":%s,"
656 "\"b_hit\":%lld,\"b_miss\":%lld,\"b_bypass\":%lld,"
657 "\"b_todisk\":%lld,\"b_prefetch\":%lld,\"n_cks_errs\":%d}",
668 suc = m_gstream->
Insert(buf, len + 1);
672 TRACE(
Error,
"Failed g-stream insertion of file_close record, len=" << len);
684 return m_active.find(path) != m_active.end() ||
685 m_purge_delay_set.find(path) != m_purge_delay_set.end();
691 m_purge_delay_set.clear();
702 if ( ! m_prefetch_enabled)
707 m_prefetch_condVar.
Lock();
708 m_prefetchList.push_back(file);
709 m_prefetch_condVar.
Signal();
710 m_prefetch_condVar.
UnLock();
718 if ( ! m_prefetch_enabled)
723 m_prefetch_condVar.
Lock();
724 for (PrefetchList::iterator it = m_prefetchList.begin(); it != m_prefetchList.end(); ++it)
728 m_prefetchList.erase(it);
732 m_prefetch_condVar.
UnLock();
738 m_prefetch_condVar.
Lock();
739 while (m_prefetchList.empty())
741 m_prefetch_condVar.
Wait();
746 size_t l = m_prefetchList.size();
747 int idx = rand() % l;
748 File* f = m_prefetchList[idx];
750 m_prefetch_condVar.
UnLock();
762 bool doPrefetch = (m_RAM_used < limit_RAM);
800 static const mode_t groupReadable = S_IRUSR | S_IWUSR | S_IRGRP;
801 static const mode_t worldReadable = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
802 static const char *lfpReason[] = {
"ForAccess",
"ForInfo",
"ForPath" };
804 TRACE(
Debug,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why]);
806 if (buff && blen > 0) buff[0] = 0;
809 std::string f_name = url.
GetPath();
814 int ret = m_oss->
Lfn2Pfn(f_name.c_str(), buff, blen);
815 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> " << ret);
821 m_purge_delay_set.insert(f_name);
824 struct stat sbuff, sbuff2;
828 if (S_ISDIR(sbuff.st_mode))
830 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> EISDIR");
835 bool read_ok =
false;
836 bool is_complete =
false;
848 m_active_cond.
Lock();
850 bool is_active = m_active.find(f_name) != m_active.end();
852 if (is_active) m_active_cond.
UnLock();
856 int res = infoFile->
Open(i_name.c_str(), O_RDWR, 0600, myEnv);
859 Info info(m_trace, 0);
860 if (info.
Read(infoFile, i_name.c_str()))
867 if ( ! is_active && is_complete && why ==
ForAccess)
870 info.
Write(infoFile, i_name.c_str());
877 if ( ! is_active) m_active_cond.
UnLock();
881 if ((is_complete || why ==
ForInfo) && buff != 0)
883 int res2 = m_oss->
Lfn2Pfn(f_name.c_str(), buff, blen);
890 {mode_t mode = (forall ? worldReadable : groupReadable);
891 if (((sbuff.st_mode & worldReadable) != mode)
893 {is_complete =
false;
899 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
900 (is_complete ?
" -> FILE_COMPLETE_IN_CACHE" :
" -> EREMOTE"));
902 return is_complete ? 0 : -EREMOTE;
907 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> ENOENT");
919 TRACE(
Debug,
"WriteFileSizeXAttr error setting xattr " << res);
933 m_oss->
Lfn2Pfn(cinfo_fname.c_str(), pfn, 4096);
934 long long fsize = -1ll;
936 if (res ==
sizeof(
long long))
942 TRACE(
Debug,
"DetermineFullFileSize error getting xattr " << res);
949 int res = infoFile->
Open(cinfo_fname.c_str(), O_RDONLY, 0600, env);
953 Info info(m_trace, 0);
954 if ( ! info.
Read(infoFile, cinfo_fname.c_str())) {
972 if (file_size == 0 || bytes_on_disk >= file_size)
975 double frac_on_disk = (double) bytes_on_disk / file_size;
1005 static const char* tpfx =
"ConsiderCached ";
1010 std::string f_name = url.
GetPath();
1012 File *file =
nullptr;
1015 auto it = m_active.find(f_name);
1016 if (it != m_active.end()) {
1023 inc_ref_cnt(file,
false,
false);
1029 int res = file->
Fstat(sbuff);
1030 dec_ref_cnt(file,
false);
1034 return sbuff.st_atime > 0 ? 0 : -EREMOTE;
1038 int res = m_oss->
Stat(f_name.c_str(), &sbuff);
1043 if (S_ISDIR(sbuff.st_mode))
1050 if (file_size < 0) {
1051 TRACE(
Debug, tpfx << curl <<
" -> " << file_size);
1052 return (
int) file_size;
1056 return is_cached ? 0 : -EREMOTE;
1072 std::string f_name = url.
GetPath();
1076 if ((oflags & O_ACCMODE) != O_RDONLY)
1082 TRACE(
Warning,
"Prepare write access requested on file " << f_name <<
". Denying access.");
1091 CommandExecutor *ce =
new CommandExecutor(f_name,
"CommandExecutor");
1101 m_purge_delay_set.insert(f_name);
1107 TRACE(Dump,
"Prepare defer open " << f_name);
1126 const char *tpfx =
"Stat ";
1129 std::string f_name = url.
GetPath();
1131 File *file =
nullptr;
1134 auto it = m_active.find(f_name);
1135 if (it != m_active.end()) {
1141 inc_ref_cnt(file,
false,
false);
1146 int res = file->
Fstat(sbuff);
1147 dec_ref_cnt(file,
false);
1148 TRACE(
Debug, tpfx <<
"from active file " << curl <<
" -> " << res);
1152 int res = m_oss->
Stat(f_name.c_str(), &sbuff);
1157 if (S_ISDIR(sbuff.st_mode))
1164 if (file_size < 0) {
1165 TRACE(
Debug, tpfx << curl <<
" -> " << file_size);
1168 sbuff.st_size = file_size;
1173 TRACE(
Debug, tpfx <<
"from disk " << curl <<
" -> " << res);
1188 std::string f_name = url.
GetPath();
1197 static const char* trc_pfx =
"UnlinkFile ";
1200 long long st_blocks_to_purge = 0;
1204 it = m_active.find(f_name);
1206 if (it != m_active.end())
1210 TRACE(
Info, trc_pfx << f_name <<
", file currently open and force not requested - denying request");
1216 if (it->second == 0)
1218 TRACE(
Info, trc_pfx << f_name <<
", an operation on this file is ongoing - denying request");
1228 it = m_active.insert(std::make_pair(f_name, (
File*) 0)).first;
1237 st_blocks_to_purge = f_stat.st_blocks;
1243 int f_ret = m_oss->
Unlink(f_name.c_str());
1244 int i_ret = m_oss->
Unlink(i_name.c_str());
1246 if (st_blocks_to_purge)
1249 TRACE(
Debug, trc_pfx << f_name <<
", f_ret=" << f_ret <<
", i_ret=" << i_ret);
1257 return std::min(f_ret, i_ret);
int DoIt(int argpnt, int argc, char **argv, bool singleshot)
std::string obfuscateAuth(const std::string &input)
#define TRACE_PC(act, pre_code, x)
#define TRACE_INT(act, x)
void * ResourceMonitorThread(void *)
XrdOucCache * XrdOucGetCache(XrdSysLogger *logger, const char *config_filename, const char *parameters, XrdOucEnv *env)
void * PrefetchThread(void *)
XrdSysXAttr * XrdSysXAttrActive
void * ProcessWriteTaskThread(void *)
int stat(const char *path, struct stat *buf)
const std::string & GetPath() const
Get the path.
virtual int Close(long long *retsz=0)=0
virtual int Open(const char *path, int Oflag, mode_t Mode, XrdOucEnv &env)
virtual int Chmod(const char *path, mode_t mode, XrdOucEnv *envP=0)=0
virtual int Lfn2Pfn(const char *Path, char *buff, int blen)
virtual XrdOssDF * newFile(const char *tident)=0
virtual int Stat(const char *path, struct stat *buff, int opts=0, XrdOucEnv *envP=0)=0
virtual int Unlink(const char *path, int Opts=0, XrdOucEnv *envP=0)=0
virtual const char * Path()=0
virtual int Fstat(struct stat &sbuff)
virtual const char * Location(bool refresh=false)
static const int optRW
File is read/write (o/w read/only)
void * GetPtr(const char *varname)
void PutPtr(const char *varname, void *value)
Attaches/creates and detaches/deletes cache-io objects for disk based cache.
long long DetermineFullFileSize(const std::string &cinfo_fname)
void FileSyncDone(File *, bool high_debug)
File * GetFile(const std::string &, IO *, long long off=0, long long filesize=0)
static const Configuration & Conf()
bool Config(const char *config_filename, const char *parameters)
Parse configuration file.
virtual int LocalFilePath(const char *url, char *buff=0, int blen=0, LFP_Reason why=ForAccess, bool forall=false)
virtual int Stat(const char *url, struct stat &sbuff)
const Configuration & RefConfiguration() const
Reference XrdPfc configuration.
static ResourceMonitor & ResMon()
bool IsFileActiveOrPurgeProtected(const std::string &) const
void ClearPurgeProtectedSet()
void ReleaseRAM(char *buf, long long size)
virtual int ConsiderCached(const char *url)
static Cache & GetInstance()
Singleton access.
void DeRegisterPrefetchFile(File *)
void ExecuteCommandUrl(const std::string &command_url)
void RegisterPrefetchFile(File *)
void WriteFileSizeXAttr(int cinfo_fd, long long file_size)
void ReleaseFile(File *, IO *)
void AddWriteTask(Block *b, bool from_read)
Add downloaded block in write queue.
Cache(XrdSysLogger *logger, XrdOucEnv *env)
Constructor.
bool Decide(XrdOucCacheIO *)
Makes decision if the original XrdOucCacheIO should be cached.
int UnlinkFile(const std::string &f_name, bool fail_if_open)
Remove cinfo and data files from cache.
virtual XrdOucCacheIO * Attach(XrdOucCacheIO *ioP, int opts=0)=0
Obtain a new IO object that fronts existing XrdOucCacheIO.
static XrdScheduler * schedP
File * GetNextFileToPrefetch()
ResourceMonitor & RefResMon()
long long WritesSinceLastCall()
void ProcessWriteTasks()
Separate task which writes blocks from ram to disk.
virtual int Unlink(const char *url)
void RemoveWriteQEntriesFor(File *f)
Remove blocks from write queue which belong to given prefetch. This method is used at the time of Fil...
static const Cache & TheOne()
char * RequestRAM(long long size)
virtual int Prepare(const char *url, int oflags, mode_t mode)
bool DecideIfConsideredCached(long long file_size, long long bytes_on_disk)
static Cache & CreateInstance(XrdSysLogger *logger, XrdOucEnv *env)
Singleton creation.
Base class for selecting which files should be cached.
virtual bool Decide(const std::string &, XrdOss &) const =0
bool FinalizeSyncBeforeExit()
Returns true if any of blocks need sync. Called from Cache::dec_ref_cnt on zero ref cnt.
const char * lPath() const
Log path.
void WriteBlockToDisk(Block *b)
static File * FileOpen(const std::string &path, long long offset, long long fileSize)
Static constructor that also does Open. Returns null ptr if Open fails.
std::string GetRemoteLocations() const
const Info::AStat * GetLastAccessStats() const
size_t GetAccessCnt() const
int Fstat(struct stat &sbuff)
long long GetPrefetchedBytes() const
int GetNDownloadedBlocks() const
void BlocksRemovedFromWriteQ(std::list< Block * > &)
Handle removal of a set of blocks from Cache's write queue.
void Sync()
Sync file cache inf o and output data with disk.
long long initiate_emergency_shutdown()
long long GetFileSize() const
const Stats & RefStats() const
const std::string & GetLocalPath() const
bool is_in_emergency_shutdown()
Downloads original file into multiple files, chunked into blocks. Only blocks that are asked for are ...
Downloads original file into a single file on local disk. Handles read requests as they come along.
bool HasFile() const
Check if File was opened successfully.
Base cache-io class that implements some XrdOucCacheIO abstract methods.
Status of cached file. Can be read from and written into a binary file.
static const char * s_infoExtension
void WriteIOStatSingle(long long bytes_disk)
Write single open/close time for given bytes read from disk.
bool Write(XrdOssDF *fp, const char *dname, const char *fname=0)
bool IsComplete() const
Get complete status.
long long GetFileSize() const
Get file size.
bool Read(XrdOssDF *fp, const char *dname, const char *fname=0)
Read content of cinfo file into this object.
void register_file_purge(DirState *target, long long size_in_st_blocks)
void main_thread_function()
Statistics of cache utilisation by a File object.
int m_NCksumErrors
number of checksum errors while getting data from remote
long long m_BytesWritten
number of bytes written to disk
void Schedule(XrdJob *jp)
void Say(const char *text1, const char *text2=0, const char *txt3=0, const char *text4=0, const char *text5=0, const char *txt6=0)
static int Run(pthread_t *, void *(*proc)(void *), void *arg, int opts=0, const char *desc=0)
static void Wait(int milliseconds)
virtual int Get(const char *Aname, void *Aval, int Avsz, const char *Path, int fd=-1)=0
virtual int Set(const char *Aname, const void *Aval, int Avsz, const char *Path, int fd=-1, int isNew=0)=0
bool Insert(const char *data, int dlen)
Contains parameters configurable from the xrootd config file.
long long m_RamAbsAvailable
available from configuration
bool m_allow_xrdpfc_command
flag for enabling access to /xrdpfc-command/ functionality.
int m_prefetch_max_blocks
maximum number of blocks to prefetch per file
int m_RamKeepStdBlocks
number of standard-sized blocks kept after release
long long m_bufferSize
prefetch buffer size, default 1MB
int m_wqueue_blocks
maximum number of blocks written per write-queue loop
std::string m_username
username passed to oss plugin
double m_onlyIfCachedMinFrac
minimum fraction of downloaded file, used by only-if-cached CGI option
long long m_onlyIfCachedMinSize
minumum size of downloaded file, used by only-if-cached CGI option
long long BytesHit
read from cache
long long BytesBypassed
read from remote and dropped
time_t DetachTime
close time
long long BytesMissed
read from remote and cached
time_t AttachTime
open time