soon to be completed mUtil stuff

This commit is contained in:
mysticbbs 2012-09-08 04:27:20 -04:00
parent 91e3286d7f
commit 7288affa28
3 changed files with 47 additions and 9 deletions

View File

@ -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.

View File

@ -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]

View File

@ -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.