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
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
Import_FIDONET.NA = true
Import_FILEBONE.NA = false
Import_FILEBONE.NA = true
MassUpload = true
GenerateTopLists = true
; ==========================================================================
; ==========================================================================
@ -45,7 +46,7 @@
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
@ -66,7 +67,7 @@
max_msgs = 500
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_realname = 0
@ -85,8 +86,39 @@
[Import_FILEBONE.NA]
; filename of 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
; ==========================================================================
; ==========================================================================
; ==========================================================================
@ -100,12 +132,58 @@
; Name to save has the uploader
uploader_name = Mystic BBS
uploader_name = Mystic BBS
; Import FILE_ID.DIZ? 1=yes
import_fileid = 1
import_fileid = 1
; No description string used when no FILE_ID.DIZ is imported.
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_Status,
mutil_ImportNA,
mutil_FileBone,
mutil_Upload;
{$I MUTIL_ANSI.PAS}
@ -147,6 +148,7 @@ End;
Var
DoImportNA : Boolean;
DoFileBone : Boolean;
DoMassUpload : Boolean;
Begin
ApplicationStartup;
@ -154,6 +156,7 @@ Begin
// Build process list
DoImportNA := CheckProcess(Header_IMPORTNA);
DoFileBone := CheckProcess(Header_FILEBONE);
DoMassUpload := CheckProcess(Header_UPLOAD);
// Exit with an error if nothing is configured
@ -169,5 +172,6 @@ Begin
// We're good lets execute this stuff!
If DoImportNA Then uImportNA;
If DoFileBone Then uImportFileBone;
If DoMassUpload Then uMassUpload;
End.