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() ";
202 TRACE(
Error, tpfx <<
"Failed opening local file, falling back to remote access " << io->
Path());
210 ((loc && loc[0] != 0) ? loc :
"<deferred open>"));
230 m_writeQ.condVar.Lock();
232 m_writeQ.queue.push_back(b);
234 m_writeQ.queue.push_front(b);
236 m_writeQ.condVar.Signal();
237 m_writeQ.condVar.UnLock();
242 std::list<Block*> removed_blocks;
243 long long sum_size = 0;
245 m_writeQ.condVar.Lock();
246 std::list<Block*>::iterator i = m_writeQ.queue.begin();
247 while (i != m_writeQ.queue.end())
249 if ((*i)->m_file == file)
251 TRACE(Dump,
"Remove entries for " << (
void*)(*i) <<
" path " << file->
lPath());
252 std::list<Block*>::iterator j = i++;
253 removed_blocks.push_back(*j);
254 sum_size += (*j)->get_size();
255 m_writeQ.queue.erase(j);
263 m_writeQ.condVar.UnLock();
267 m_RAM_write_queue -= sum_size;
279 m_writeQ.condVar.Lock();
280 while (m_writeQ.size == 0)
282 m_writeQ.condVar.Wait();
288 int n_pushed = std::min(m_writeQ.size, m_configuration.
m_wqueue_blocks);
289 long long sum_size = 0;
291 for (
int bi = 0; bi < n_pushed; ++bi)
293 Block* block = m_writeQ.queue.front();
294 m_writeQ.queue.pop_front();
295 m_writeQ.writes_between_purges += block->
get_size();
298 blks_to_write[bi] = block;
300 TRACE(Dump,
"ProcessWriteTasks for block " << (
void*)(block) <<
" path " << block->
m_file->
lPath());
302 m_writeQ.size -= n_pushed;
304 m_writeQ.condVar.UnLock();
308 m_RAM_write_queue -= sum_size;
311 for (
int bi = 0; bi < n_pushed; ++bi)
313 Block* block = blks_to_write[bi];
324 long long ret = m_writeQ.writes_between_purges;
325 m_writeQ.writes_between_purges = 0;
333 static const size_t s_block_align = sysconf(_SC_PAGESIZE);
339 long long total = m_RAM_used + size;
344 if (std_size && m_RAM_std_size > 0)
346 char *buf = m_RAM_std_blocks.back();
347 m_RAM_std_blocks.pop_back();
358 if (posix_memalign((
void**) &buf, s_block_align, (
size_t) size))
381 m_RAM_std_blocks.push_back(buf);
393 TRACE(
Debug,
"GetFile " << path <<
", io " << io);
402 it = m_active.find(path);
406 if (it == m_active.end())
408 it = m_active.insert(std::make_pair(path, (
File*) 0)).first;
414 it->second->AddIO(io);
415 inc_ref_cnt(it->second,
false,
true);
422 m_active_cond.
Wait();
431 int res = io->
Fstat(st);
434 TRACE(
Error,
"GetFile, could not get valid stat");
435 }
else if (res > 0) {
437 TRACE(
Error,
"GetFile, stat returned positive value, this should NOT happen here");
439 filesize = st.st_size;
455 inc_ref_cnt(file,
false,
true);
482 dec_ref_cnt(f,
true);
489 class DiskSyncer :
public XrdJob
496 DiskSyncer(
File *f,
bool high_debug,
const char *desc =
"") :
499 m_high_debug(high_debug)
511 class CommandExecutor :
public XrdJob
514 std::string m_command_url;
517 CommandExecutor(
const std::string& command,
const char *desc =
"") :
519 m_command_url(command)
533 void Cache::schedule_file_sync(
File* f,
bool ref_cnt_already_set,
bool high_debug)
535 DiskSyncer* ds =
new DiskSyncer(f, high_debug);
537 if ( ! ref_cnt_already_set) inc_ref_cnt(f,
true, high_debug);
544 dec_ref_cnt(f, high_debug);
547 void Cache::inc_ref_cnt(
File* f,
bool lock,
bool high_debug)
553 if (lock) m_active_cond.
Lock();
555 if (lock) m_active_cond.
UnLock();
560 void Cache::dec_ref_cnt(
File* f,
bool high_debug)
568 bool emergency_close =
false;
583 <<
" -- closing and deleting File object without further ado");
584 emergency_close =
true;
615 schedule_file_sync(f,
true,
true);
620 bool finished_p =
false;
626 TRACE_INT(tlvl,
"dec_ref_cnt " << f->
GetLocalPath() <<
", cnt after sync_check and dec_ref_cnt = " << cnt);
640 m_active.erase(act_it);
649 int len = snprintf(buf, 4096,
"{\"event\":\"file_close\","
650 "\"lfn\":\"%s\",\"size\":%lld,\"blk_size\":%d,\"n_blks\":%d,\"n_blks_done\":%d,"
651 "\"access_cnt\":%lu,\"attach_t\":%lld,\"detach_t\":%lld,\"remotes\":%s,"
652 "\"b_hit\":%lld,\"b_miss\":%lld,\"b_bypass\":%lld,"
653 "\"b_todisk\":%lld,\"b_prefetch\":%lld,\"n_cks_errs\":%d}",
664 suc = m_gstream->
Insert(buf, len + 1);
668 TRACE(
Error,
"Failed g-stream insertion of file_close record, len=" << len);
680 return m_active.find(path) != m_active.end() ||
681 m_purge_delay_set.find(path) != m_purge_delay_set.end();
687 m_purge_delay_set.clear();
698 if ( ! m_prefetch_enabled)
703 m_prefetch_condVar.
Lock();
704 m_prefetchList.push_back(file);
705 m_prefetch_condVar.
Signal();
706 m_prefetch_condVar.
UnLock();
714 if ( ! m_prefetch_enabled)
719 m_prefetch_condVar.
Lock();
720 for (PrefetchList::iterator it = m_prefetchList.begin(); it != m_prefetchList.end(); ++it)
724 m_prefetchList.erase(it);
728 m_prefetch_condVar.
UnLock();
734 m_prefetch_condVar.
Lock();
735 while (m_prefetchList.empty())
737 m_prefetch_condVar.
Wait();
742 size_t l = m_prefetchList.size();
743 int idx = rand() % l;
744 File* f = m_prefetchList[idx];
746 m_prefetch_condVar.
UnLock();
758 bool doPrefetch = (m_RAM_used < limit_RAM);
796 static const mode_t groupReadable = S_IRUSR | S_IWUSR | S_IRGRP;
797 static const mode_t worldReadable = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
798 static const char *lfpReason[] = {
"ForAccess",
"ForInfo",
"ForPath" };
800 TRACE(
Debug,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why]);
802 if (buff && blen > 0) buff[0] = 0;
805 std::string f_name = url.
GetPath();
810 int ret = m_oss->
Lfn2Pfn(f_name.c_str(), buff, blen);
811 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> " << ret);
817 m_purge_delay_set.insert(f_name);
820 struct stat sbuff, sbuff2;
824 if (S_ISDIR(sbuff.st_mode))
826 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> EISDIR");
831 bool read_ok =
false;
832 bool is_complete =
false;
844 m_active_cond.
Lock();
846 bool is_active = m_active.find(f_name) != m_active.end();
848 if (is_active) m_active_cond.
UnLock();
852 int res = infoFile->
Open(i_name.c_str(), O_RDWR, 0600, myEnv);
855 Info info(m_trace, 0);
856 if (info.
Read(infoFile, i_name.c_str()))
863 if ( ! is_active && is_complete && why ==
ForAccess)
866 info.
Write(infoFile, i_name.c_str());
873 if ( ! is_active) m_active_cond.
UnLock();
877 if ((is_complete || why ==
ForInfo) && buff != 0)
879 int res2 = m_oss->
Lfn2Pfn(f_name.c_str(), buff, blen);
886 {mode_t mode = (forall ? worldReadable : groupReadable);
887 if (((sbuff.st_mode & worldReadable) != mode)
889 {is_complete =
false;
895 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
896 (is_complete ?
" -> FILE_COMPLETE_IN_CACHE" :
" -> EREMOTE"));
898 return is_complete ? 0 : -EREMOTE;
903 TRACE(
Info,
"LocalFilePath '" << curl <<
"', why=" << lfpReason[why] <<
" -> ENOENT");
915 TRACE(
Debug,
"WriteFileSizeXAttr error setting xattr " << res);
929 m_oss->
Lfn2Pfn(cinfo_fname.c_str(), pfn, 4096);
930 long long fsize = -1ll;
932 if (res ==
sizeof(
long long))
938 TRACE(
Debug,
"DetermineFullFileSize error getting xattr " << res);
945 int res = infoFile->
Open(cinfo_fname.c_str(), O_RDONLY, 0600, env);
949 Info info(m_trace, 0);
950 if ( ! info.
Read(infoFile, cinfo_fname.c_str())) {
968 if (file_size == 0 || bytes_on_disk >= file_size)
971 double frac_on_disk = (double) bytes_on_disk / file_size;
1001 static const char* tpfx =
"ConsiderCached ";
1006 std::string f_name = url.
GetPath();
1008 File *file =
nullptr;
1011 auto it = m_active.find(f_name);
1012 if (it != m_active.end()) {
1019 inc_ref_cnt(file,
false,
false);
1025 int res = file->
Fstat(sbuff);
1026 dec_ref_cnt(file,
false);
1030 return sbuff.st_atime > 0 ? 0 : -EREMOTE;
1034 int res = m_oss->
Stat(f_name.c_str(), &sbuff);
1039 if (S_ISDIR(sbuff.st_mode))
1046 if (file_size < 0) {
1047 TRACE(
Debug, tpfx << curl <<
" -> " << file_size);
1048 return (
int) file_size;
1052 return is_cached ? 0 : -EREMOTE;
1068 std::string f_name = url.
GetPath();
1072 if (oflags & (O_WRONLY | O_RDWR | O_APPEND | O_CREAT))
1074 TRACE(
Warning,
"Prepare write access requested on file " << f_name <<
". Denying access.");
1083 CommandExecutor *ce =
new CommandExecutor(f_name,
"CommandExecutor");
1093 m_purge_delay_set.insert(f_name);
1099 TRACE(Dump,
"Prepare defer open " << f_name);
1118 const char *tpfx =
"Stat ";
1121 std::string f_name = url.
GetPath();
1123 File *file =
nullptr;
1126 auto it = m_active.find(f_name);
1127 if (it != m_active.end()) {
1133 inc_ref_cnt(file,
false,
false);
1138 int res = file->
Fstat(sbuff);
1139 dec_ref_cnt(file,
false);
1140 TRACE(
Debug, tpfx <<
"from active file " << curl <<
" -> " << res);
1144 int res = m_oss->
Stat(f_name.c_str(), &sbuff);
1149 if (S_ISDIR(sbuff.st_mode))
1156 if (file_size < 0) {
1157 TRACE(
Debug, tpfx << curl <<
" -> " << file_size);
1160 sbuff.st_size = file_size;
1163 sbuff.st_ctime = sbuff.st_mtime = sbuff.st_atime = 0;
1166 TRACE(
Debug, tpfx <<
"from disk " << curl <<
" -> " << res);
1181 std::string f_name = url.
GetPath();
1190 static const char* trc_pfx =
"UnlinkFile ";
1193 long long st_blocks_to_purge = 0;
1197 it = m_active.find(f_name);
1199 if (it != m_active.end())
1203 TRACE(
Info, trc_pfx << f_name <<
", file currently open and force not requested - denying request");
1209 if (it->second == 0)
1211 TRACE(
Info, trc_pfx << f_name <<
", an operation on this file is ongoing - denying request");
1221 it = m_active.insert(std::make_pair(f_name, (
File*) 0)).first;
1230 st_blocks_to_purge = f_stat.st_blocks;
1236 int f_ret = m_oss->
Unlink(f_name.c_str());
1237 int i_ret = m_oss->
Unlink(i_name.c_str());
1239 if (st_blocks_to_purge)
1242 TRACE(
Debug, trc_pfx << f_name <<
", f_ret=" << f_ret <<
", i_ret=" << i_ret);
1250 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)
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