diff --git a/mystic/HISTORY.txt b/mystic/HISTORY.txt index 8ccb048..9bb2044 100644 --- a/mystic/HISTORY.txt +++ b/mystic/HISTORY.txt @@ -4729,9 +4729,13 @@ telnet command line client. + In MPL including a file has been changed to its own keyword as opposed to - minicing a compile directive: + mimicing a compile directive. All MPL programs for 1.10 must be updated + if INCLUDE files are used: Old: {$include myfile.mps} New: include myfile.mps + Added an hourly usage graph to usage.mps. + + ! MUTIL FILEBONE import was not adding the trailing slash when generating a + file path. diff --git a/mystic/mutil.cfg b/mystic/mutil.cfg index 6732ee4..9d06b6b 100644 --- a/mystic/mutil.cfg +++ b/mystic/mutil.cfg @@ -40,10 +40,16 @@ Import_FIDONET.NA = false Import_FILEBONE.NA = false - Import_FILES.BBS = true + Import_FILES.BBS = false MassUpload = false GenerateTopLists = false + ; WIP next to be added: + GenerateAllFiles = true + PurgeMessageBases = false + PackMessageBases = false + + ; ========================================================================== ; ========================================================================== ; ========================================================================== @@ -254,3 +260,19 @@ top_pcr_namelen = 30 top_pcr_datalen = 10 +[GenerateAllFiles] + + ; Generate all files list [NOT COMPLETED] + + ; Path / filename of output filename. If the path is not included then the + ; file will be created in whatever the current working directory is. + + filename = allfiles.txt + + ; features needed: + ; header, footer, baseheader, basefooter, exclude bases, uploader optional + ; uploader line, format list line 1st,2nd line, space between files? + +[PurgeMessageBases] + +[PackMessageBases] diff --git a/mystic/mutil.pas b/mystic/mutil.pas index c4fee3e..19d2207 100644 --- a/mystic/mutil.pas +++ b/mystic/mutil.pas @@ -42,13 +42,16 @@ Uses m_Strings, m_FileIO, m_IniReader, - mutil_Common, - mutil_Status, - mutil_ImportNA, - mutil_FileBone, - mutil_Upload, - mutil_TopLists, - mutil_FilesBBS; + mUtil_Common, + mUtil_Status, + mUtil_ImportNA, + mUtil_FileBone, + mUtil_Upload, + mUtil_TopLists, + mUtil_FilesBBS, + mUtil_AllFiles, + mUtil_MsgPurge, + mUtil_MsgPack; {$I MUTIL_ANSI.PAS} @@ -154,6 +157,9 @@ Var DoFileBone : Boolean; DoMassUpload : Boolean; DoTopLists : Boolean; + DoAllFiles : Boolean; + DoMsgPurge : Boolean; + DoMsgPack : Boolean; Begin ApplicationStartup; @@ -164,6 +170,9 @@ Begin DoMassUpload := CheckProcess(Header_UPLOAD); DoTopLists := CheckProcess(Header_TOPLISTS); DoFilesBBS := CheckProcess(Header_FILESBBS); + DoAllFiles := CheckProcess(Header_ALLFILES); + DoMsgPurge := CheckProcess(Header_MSGPURGE); + DoMsgPack := CheckProcess(Header_MSGPACK); // Exit with an error if nothing is configured @@ -182,4 +191,7 @@ Begin If DoFilesBBS Then uImportFilesBBS; If DoMassUpload Then uMassUpload; If DoTopLists Then uTopLists; + If DoAllFiles Then uAllFilesList; + If DoMsgPurge Then uPurgeMessageBases; + If DoMsgPack Then uPackMessageBases; End.