// Walk all of the tk files and age them... we do this
// once a day to try and keep the number of files down.

PurgeTkFiles()
{
    new sMasterFilename[MAX_TEXT_LENGTH];
    new sFilename[MAX_TEXT_LENGTH];
    new sData[MAX_DATA_LENGTH];
    new iCurLine = 1;
    new iCurTime = systemtime();
    new iTotal = 0;
    new iRemoved = 0;

    // get the current master file name
    GetMasterTkFileName(sMasterFilename);

    if (fileexists(sMasterFilename))
    {
        while (readfile(sMasterFilename, sData, iCurLine, MAX_DATA_LENGTH))
        {
            if (strlen(sData) > 0)
            {
                iTotal++;

                // get the filename for later
                GetTkFileName(sData, sFilename);

                // age the tks for this guy
                AgeTksEx(sData, 1, 0);

                // if the file is gone, then remove from the master list
                if (!fileexists(sFilename))
                {
                    writefile(sMasterFilename, "", iCurLine);
                    iRemoved++;
                }
            }

            iCurLine++;
        }
    }

    snprintf(sData,
             MAX_DATA_LENGTH,
             "%d of %d entries removed in %d seconds w/%d players online",
             iRemoved,
             iTotal,
             iCurTime - systemtime(),
             playercount());
    LogMessage(sData);
}

// add this WONID to the master file that keeps track of all the
// TK files we have.  We do this so we can purge the files at
// some later date.  The reason we need this stupid master file
// is because no functionality exists to walk the files in the
// directory on linux.