Now imports FILEBONE

This commit is contained in:
mysticbbs 2012-03-03 23:38:56 -05:00
parent 5e5e04aa95
commit f4831612f6
3 changed files with 91 additions and 5 deletions

View File

@ -3981,3 +3981,7 @@
Gender, and if the user was a new user or not. In addition, it will now Gender, and if the user was a new user or not. In addition, it will now
save all 10 custom user questions (not implemented yet). save all 10 custom user questions (not implemented yet).
+ MUTIL can now import FILEBONE.NA format files, creating both file bases
and their directories (if they do not already exist). See MUTIL.CFG for
more information.

View File

@ -32,8 +32,9 @@
; list of functions to perform on startup ; list of functions to perform on startup
Import_FIDONET.NA = true Import_FIDONET.NA = true
Import_FILEBONE.NA = false Import_FILEBONE.NA = true
MassUpload = true MassUpload = true
GenerateTopLists = true
; ========================================================================== ; ==========================================================================
; ========================================================================== ; ==========================================================================
@ -45,7 +46,7 @@
filename = fidonet.na filename = fidonet.na
; convert tags to lower case for message base filename ; convert tags to lower case for message base filename 1=yes
lowercase_filename = 1 lowercase_filename = 1
@ -66,7 +67,7 @@
max_msgs = 500 max_msgs = 500
max_msgs_age = 365 max_msgs_age = 365
; true/false type values 0=false 1=true ; true/false type values 0=false 1=true (newscan 2=forced)
use_autosig = 1 use_autosig = 1
use_realname = 0 use_realname = 0
@ -85,8 +86,39 @@
[Import_FILEBONE.NA] [Import_FILEBONE.NA]
; filename of filebone.na
filename = filebone.na filename = filebone.na
; root directory to create file paths under. when a new filebone echo
; is found, mUtil will create a file using "root_dir" + areatag. So
; for example if root is "c:\mystic\filebase\" and the areatag is MYSTICBBS
; it will create "c:\mystic\filebase\MYSTICBBS". This root directory MUST
; exist.
root_dir = \code\mystic1\filebase
; convert tags to lower case for filebase base filename/dir 1=yes
lowercase_filename = 1
; Default values when creating a new file base
dispfile =
template = ansiflst
acs_list =
acs_ftp =
acs_download =
acs_upload =
acs_comment =
acs_sysop = s255
; true/false type values 0=false 1=true (newscan 2=forced)
free_files = 0
show_uploader = 1
new_scan = 1
; ========================================================================== ; ==========================================================================
; ========================================================================== ; ==========================================================================
; ========================================================================== ; ==========================================================================
@ -109,3 +141,49 @@
; No description string used when no FILE_ID.DIZ is imported. ; No description string used when no FILE_ID.DIZ is imported.
no_description = No Description no_description = No Description
; ==========================================================================
; ==========================================================================
; ==========================================================================
[GenerateTopLists]
; Top list generator can generate up to top 100 for various different
; statistics. Each individual top file can be enabled or disabled and
; can each have their own template files that are totally configurable.
;
; The number of items in each list is determined by the template. It
; 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
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
top_download_desc = Downloaders
top_download_out = topdownloads.asc
top_upload_template = mutil.top10.txt
top_upload_desc = Uploaders
top_upload_out = topuploads.asc
top_poster_template = mutil.top10.txt
top_poster_desc = Posters
top_poster_out = topposts.asc
top_files_template = mutil.top10.txt
top_files_desc = File Downloads
top_files_out = topfiles.asc
top_file_exclude = 1
; nameformat length, data length? etc?
; |DA00-99 |NA00-99 |DS

View File

@ -45,6 +45,7 @@ Uses
mutil_Common, mutil_Common,
mutil_Status, mutil_Status,
mutil_ImportNA, mutil_ImportNA,
mutil_FileBone,
mutil_Upload; mutil_Upload;
{$I MUTIL_ANSI.PAS} {$I MUTIL_ANSI.PAS}
@ -147,6 +148,7 @@ End;
Var Var
DoImportNA : Boolean; DoImportNA : Boolean;
DoFileBone : Boolean;
DoMassUpload : Boolean; DoMassUpload : Boolean;
Begin Begin
ApplicationStartup; ApplicationStartup;
@ -154,6 +156,7 @@ Begin
// Build process list // Build process list
DoImportNA := CheckProcess(Header_IMPORTNA); DoImportNA := CheckProcess(Header_IMPORTNA);
DoFileBone := CheckProcess(Header_FILEBONE);
DoMassUpload := CheckProcess(Header_UPLOAD); DoMassUpload := CheckProcess(Header_UPLOAD);
// Exit with an error if nothing is configured // Exit with an error if nothing is configured
@ -169,5 +172,6 @@ Begin
// We're good lets execute this stuff! // We're good lets execute this stuff!
If DoImportNA Then uImportNA; If DoImportNA Then uImportNA;
If DoFileBone Then uImportFileBone;
If DoMassUpload Then uMassUpload; If DoMassUpload Then uMassUpload;
End. End.