eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

TOP10: callers, posts, downloads, uploads so far

This commit is contained in:
mysticbbs 2012-03-04 17:00:14 -05:00
parent b4b9678212
commit 45abe1b057
3 changed files with 24 additions and 28 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

45
mystic/mutil.cfg
View File

@ -154,36 +154,27 @@
; ;
; The number of items in each list is determined by the template. It ; The number of items in each list is determined by the template. It
; could be any number between 1 and 100. ; could be any number between 1 and 100.
;
; Additionally, each list can have an exclude list so that certain
; people or files will not be factored into the list.
top_caller = 1 exclude_list = mutil.toplist.exclude.txt
top_caller_template = mutil.top10.template
top_caller_desc = Callers
top_caller_out = topcallers.asc
top_caller_exclude = mutil.top10.exclude
top_caller_namelen = 30
top_caller_namepad = 0;
top_caller_datalen = 6;
top_caller_datapad = 1;
top_download_template = mutil.top10.template ; configuration for top callers generator
top_download_desc = Downloaders
top_download_out = topdownloads.asc
top_upload_template = mutil.top10.txt top_call = 1
top_upload_desc = Uploaders top_call_template = mutil.toplist.template.txt
top_upload_out = topuploads.asc top_call_output = topcallers.asc
top_call_desc = Callers
top_poster_template = mutil.top10.txt top_dl = 1
top_poster_desc = Posters top_dl_template = mutil.toplist.template.txt
top_poster_out = topposts.asc top_dl_output = topdownload.asc
top_dl_desc = Downloaders
top_files_template = mutil.top10.txt top_ul = 1
top_files_desc = File Downloads top_ul_template = mutil.toplist.template.txt
top_files_out = topfiles.asc top_ul_output = topupload.asc
top_file_exclude = 1 top_ul_desc = Uploaders
; nameformat length, data length? etc? top_post = 1
; |DA00-99 |NA00-99 |DS top_post_template = mutil.toplist.template.txt
top_post_output = topposts.asc
top_post_desc = Posters

6
mystic/mutil.pas
View File

@ -46,7 +46,8 @@ Uses
mutil_Status, mutil_Status,
mutil_ImportNA, mutil_ImportNA,
mutil_FileBone, mutil_FileBone,
mutil_Upload; mutil_Upload,
mutil_TopLists;
{$I MUTIL_ANSI.PAS} {$I MUTIL_ANSI.PAS}
@ -150,6 +151,7 @@ Var
DoImportNA : Boolean; DoImportNA : Boolean;
DoFileBone : Boolean; DoFileBone : Boolean;
DoMassUpload : Boolean; DoMassUpload : Boolean;
DoTopLists : Boolean;
Begin Begin
ApplicationStartup; ApplicationStartup;
@ -158,6 +160,7 @@ Begin
DoImportNA := CheckProcess(Header_IMPORTNA); DoImportNA := CheckProcess(Header_IMPORTNA);
DoFileBone := CheckProcess(Header_FILEBONE); DoFileBone := CheckProcess(Header_FILEBONE);
DoMassUpload := CheckProcess(Header_UPLOAD); DoMassUpload := CheckProcess(Header_UPLOAD);
DoTopLists := CheckProcess(Header_TOPLISTS);
// Exit with an error if nothing is configured // Exit with an error if nothing is configured
@ -174,4 +177,5 @@ Begin
If DoImportNA Then uImportNA; If DoImportNA Then uImportNA;
If DoFileBone Then uImportFileBone; If DoFileBone Then uImportFileBone;
If DoMassUpload Then uMassUpload; If DoMassUpload Then uMassUpload;
If DoTopLists Then uTopLists;
End. End.

1
mystic/mutil_common.pas
View File

@ -27,6 +27,7 @@ Const
Header_IMPORTNA = 'Import_FIDONET.NA'; Header_IMPORTNA = 'Import_FIDONET.NA';
Header_FILEBONE = 'Import_FILEBONE.NA'; Header_FILEBONE = 'Import_FILEBONE.NA';
Header_UPLOAD = 'MassUpload'; Header_UPLOAD = 'MassUpload';
Header_TOPLISTS = 'GenerateTopLists';
Function strAddr2Str (Addr : RecEchoMailAddr) : String; Function strAddr2Str (Addr : RecEchoMailAddr) : String;
Function GenerateMBaseIndex : LongInt; Function GenerateMBaseIndex : LongInt;