diff --git a/ctrl/ipfilter_exempt.cfg b/ctrl/ipfilter_exempt.cfg
index b3e1e09f6a9393a218af115e80bf57bf1f636d00..067ab7c380fad1a8217edced6946373e2280a3d8 100644
--- a/ctrl/ipfilter_exempt.cfg
+++ b/ctrl/ipfilter_exempt.cfg
@@ -1,4 +1,10 @@
-; Enter IP addresses that are exempt from filtering/banning/throttling into this file
-; Wildcard characters (*, ^, ~) are allowed and ! negates the match
-127.*
-::1
\ No newline at end of file
+; IP addresses that are exempt from filtering/banning/throttling
+; Wildcard characters (*, ^, ~) are allowed
+; IPv4 CIDR notation is supported
+; ! negates the match
+::1
+127.0.0.0/8
+10.0.0.0/8
+169.254.0.0/16
+172.16.0.0/12
+192.168.0.0/16
diff --git a/ctrl/text.dat b/ctrl/text.dat
index dc203b40c836798faf9c8f5d87fc572ee143b4b5..aca41f14a586f9b56bd09b3e489cdfbb8e877f17 100644
--- a/ctrl/text.dat
+++ b/ctrl/text.dat
@@ -808,7 +808,7 @@
"\1l\1_\1g\1hFile Libraries:\r\n\r\n" 658 CfgLibLstHdr
"\1n\1g(\1h%d\1n\1g) %s\1h\r\n" 659 CfgLibLstFmt
"\1_\1c\1hListing \1n\1c(\1h%u\1n\1c) %s "\ 660 BatchFlagPrompt
- "(\1h%u\1n\1c) %s (\1h\1`?\1n\1c=Menu) (\1h%u\1n\1c of \1h%u\1n\1c Files\1n\1c): \1n\1~"
+ "(\1h%u\1n\1c) %s (\1h\1`?\1n\1c=Menu) (%5u\b\b\b\b\b\1h%u\1n\1c Files\1n\1c): \1n\1~"
"\1n\1>\1q\1l\x014 \1h\1y[\1w\1~D\1y]ownload \1h\1y[\1w\1~B\1y]atch "\ 661 FileListBatchCommands
"[\1w\1~V\1y]iew Content [\1w\1~E\1y]xtended Info "\
"[\1w\1~P\1y]revious Page [\1w\1~Q\1y]uit\1>\1n\r\n"
diff --git a/src/conio/OverhaulNotes.txt b/src/conio/OverhaulNotes.txt
index f7b5989460d7d20f4064c3a2a715b22ec39165c4..2822c71f6a9bb922d43f814db5c54ed061e875ac 100644
--- a/src/conio/OverhaulNotes.txt
+++ b/src/conio/OverhaulNotes.txt
@@ -22,6 +22,7 @@
opens a whole can of worms regarding how further updates work etc. I'll
strive to keep it sane and compatible, which may be impossible.
12) A Unicode cell will potentially have multiple codepoints "in" it.
+13) We need a way to specify the initial mode.
Some sort of state checkpoint thing... you "save" the checkpoint, and send that
ID back and you get the same state returned.
diff --git a/src/conio/bitmap_con.c b/src/conio/bitmap_con.c
index fa2ec1f0940c0a9a8323d1e40cdb89edeae39e73..ba5e67e1c00ac0854ab750c028172868d9d0ed82 100644
--- a/src/conio/bitmap_con.c
+++ b/src/conio/bitmap_con.c
@@ -1726,7 +1726,8 @@ int bitmap_drv_init(void (*drawrect_cb) (struct rectlist *data)
cio_api.options |= CONIO_OPT_LOADABLE_FONTS | CONIO_OPT_BLINK_ALT_FONT
| CONIO_OPT_BOLD_ALT_FONT | CONIO_OPT_BRIGHT_BACKGROUND
| CONIO_OPT_SET_PIXEL | CONIO_OPT_CUSTOM_CURSOR
- | CONIO_OPT_FONT_SELECT | CONIO_OPT_EXTENDED_PALETTE | CONIO_OPT_PALETTE_SETTING;
+ | CONIO_OPT_FONT_SELECT | CONIO_OPT_EXTENDED_PALETTE | CONIO_OPT_PALETTE_SETTING
+ | CONIO_OPT_BLOCKY_SCALING;
pthread_mutex_init(&blinker_lock, NULL);
pthread_mutex_init(&callbacks.lock, NULL);
pthread_mutex_init(&vstatlock, NULL);
diff --git a/src/sbbs3/file.cpp b/src/sbbs3/file.cpp
index 5dcd06db7242db55dfc4d81ebc6cdf2e6e987599..f13f3051630c922f8a8828b450d0390307c48732 100644
--- a/src/sbbs3/file.cpp
+++ b/src/sbbs3/file.cpp
@@ -346,9 +346,11 @@ bool sbbs_t::editfileinfo(file_t* f)
char uploader[LEN_ALIAS + 1];
SAFECOPY(uploader, f->from);
bputs(text[EditUploader]);
- if(!getstr(uploader, sizeof(uploader), K_EDIT|K_AUTODEL))
+ getstr(uploader, sizeof(uploader), K_EDIT|K_AUTODEL);
+ if(msgabort(true))
return false;
- smb_new_hfield_str(f, SMB_FILEUPLOADER, uploader);
+ if(*uploader != '\0' || *f->from != '\0')
+ smb_new_hfield_str(f, SMB_FILEUPLOADER, uploader);
ultoa(f->cost,str,10);
bputs(text[EditCreditValue]);
getstr(str,10,K_NUMBER|K_EDIT|K_AUTODEL);
diff --git a/src/sbbs3/filedat.c b/src/sbbs3/filedat.c
index c12dae572e05a877d894b263568b17e6b1f40caf..2b03d5aa274361e719ae9ffe2b5f041ef380cb20 100644
--- a/src/sbbs3/filedat.c
+++ b/src/sbbs3/filedat.c
@@ -893,7 +893,7 @@ long extract_files_from_archive(const char* archive, const char* outdir, const c
const void *buff;
size_t size;
- la_int64_t offset;
+ int64_t offset;
for(;;) {
result = archive_read_data_block(ar, &buff, &size, &offset);
diff --git a/src/sbbs3/js_archive.c b/src/sbbs3/js_archive.c
index 6c099181f14fa29c690e4735b496278424e85240..b2539295f23e1940e883bd281e42e133e5def893 100644
--- a/src/sbbs3/js_archive.c
+++ b/src/sbbs3/js_archive.c
@@ -386,7 +386,7 @@ js_list(JSContext *cx, uintN argc, jsval *arglist)
const void *buff;
size_t size;
- la_int64_t offset;
+ int64_t offset;
for(;;) {
result = archive_read_data_block(ar, &buff, &size, &offset);
@@ -500,7 +500,7 @@ js_read(JSContext *cx, uintN argc, jsval *arglist)
size_t total = 0;
const void *buff;
size_t size;
- la_int64_t offset;
+ int64_t offset;
for(;;) {
result = archive_read_data_block(ar, &buff, &size, &offset);
diff --git a/src/sbbs3/js_msgbase.c b/src/sbbs3/js_msgbase.c
index b23d9b0efaa1458fa46d977141c6049752276ad2..806b756bb893b7706db4d27891ef0589970af470 100644
--- a/src/sbbs3/js_msgbase.c
+++ b/src/sbbs3/js_msgbase.c
@@ -3192,8 +3192,8 @@ static jsSyncMethodSpec js_msgbase_functions[] = {
"<tr><td align=top><tt>replyto_net_addr</tt><td>Replies should be sent to this network address"
"<tr><td align=top><tt>replyto_agent</tt><td>Replies should be sent to this agent type"
"<tr><td align=top><tt>replyto_list</tt><td>Comma-separated list of mailboxes to reply-to, RFC822-style"
- "<tr><td align=top><tt>mime-version</tt><td>MIME Version (optional)"
- "<tr><td align=top><tt>content-type</tt><td>MIME Content-Type (optional)"
+ "<tr><td align=top><tt>mime_version</tt><td>MIME Version (optional)"
+ "<tr><td align=top><tt>content_type</tt><td>MIME Content-Type (optional)"
"<tr><td align=top><tt>summary</tt><td>Message Summary (optional)"
"<tr><td align=top><tt>tags</tt><td>Message Tags (space-delimited, optional)"
"<tr><td align=top><tt>id</tt><td>Message's RFC-822 compliant Message-ID"
diff --git a/src/syncdraw/load.c b/src/syncdraw/load.c
index f6ae66f15f5e7d2ca68f4c9f8921b082f643b5e8..e3fc7f9ee1e453792e5be3322c8b5c191b011a13 100644
--- a/src/syncdraw/load.c
+++ b/src/syncdraw/load.c
@@ -616,7 +616,7 @@ LoadFile(char *Name)
/* Check for "known" extensions */
ext=getfext(Name);
if(ext) {
- if(stricmp(ext,".asc")==0) {
+ if(stricmp(ext,".asc")==0 || stricmp(ext, ".msg")==0) {
PCB=FALSE;
ANSI=FALSE;
AVATAR=FALSE;
diff --git a/src/syncterm/bbslist.c b/src/syncterm/bbslist.c
index e6dca65b6eea18819291d6b2ac48c28357e68cbf..4bbbc60685f13081742b7774c9ba6587d8e5a60c 100644
--- a/src/syncterm/bbslist.c
+++ b/src/syncterm/bbslist.c
@@ -188,8 +188,8 @@ static struct sort_order_info sort_order[] = {
int sortorder[sizeof(sort_order)/sizeof(struct sort_order_info)];
-char *screen_modes[]={ "Current", "80x25", "LCD 80x25", "80x28", "80x30", "80x43", "80x50", "80x60", "132x37 (16:9)", "132x52 (5:4)", "132x25", "132x28", "132x30", "132x34", "132x43", "132x50", "132x60", "C64", "C128 (40col)", "C128 (80col)", "Atari", "Atari XEP80", "Custom", "EGA 80x25", "VGA 80x25", NULL};
-static char *screen_modes_enum[]={"Current", "80x25", "LCD80x25", "80x28", "80x30", "80x43", "80x50", "80x60", "132x37", "132x52", "132x25", "132x28", "132x30", "132x34", "132x43", "132x50", "132x60", "C64", "C128-40col", "C128-80col", "Atari", "Atari-XEP80", "Custom", "EGA80x25", "VGA80x25", NULL};
+static char *screen_modes[]={ "Current", "80x25", "LCD 80x25", "80x28", "80x30", "80x43", "80x50", "80x60", "132x37 (16:9)", "132x52 (5:4)", "132x25", "132x28", "132x30", "132x34", "132x43", "132x50", "132x60", "C64", "C128 (40col)", "C128 (80col)", "Atari", "Atari XEP80", "Custom", "EGA 80x25", "VGA 80x25", NULL};
+char *screen_modes_enum[]={"Current", "80x25", "LCD80x25", "80x28", "80x30", "80x43", "80x50", "80x60", "132x37", "132x52", "132x25", "132x28", "132x30", "132x34", "132x43", "132x50", "132x60", "C64", "C128-40col", "C128-80col", "Atari", "Atari-XEP80", "Custom", "EGA80x25", "VGA80x25", NULL};
char *log_levels[]={"Emergency", "Alert", "Critical", "Error", "Warning", "Notice", "Info", "Debug", NULL};
static char *log_level_desc[]={"None", "Alerts", "Critical Errors", "Errors", "Warnings", "Notices", "Normal", "All (Debug)", NULL};
diff --git a/src/syncterm/bbslist.h b/src/syncterm/bbslist.h
index 4cb83a2dbcbaf580e67a49151bf95a1528d5788d..772eaeb0b67719a03d233de5e603a054b4858a9d 100644
--- a/src/syncterm/bbslist.h
+++ b/src/syncterm/bbslist.h
@@ -116,7 +116,7 @@ extern char *rate_names[];
extern int rates[];
extern int sortorder[];
extern ini_style_t ini_style;
-extern char *screen_modes[];
+extern char *screen_modes_enum[];
void read_item(str_list_t listfile, struct bbslist *entry, char *bbsname, int id, int type);
void read_list(char *listpath, struct bbslist **list, struct bbslist *defaults, int *i, int type);
void free_list(struct bbslist **list, int listcount);
diff --git a/src/syncterm/syncterm.c b/src/syncterm/syncterm.c
index 92fc0eabb4a218c3936df52380de56204fe9864b..086f6f47858ee955e2ea68448c18c853256ff4a8 100644
--- a/src/syncterm/syncterm.c
+++ b/src/syncterm/syncterm.c
@@ -1248,8 +1248,8 @@ void load_settings(struct syncterm_settings *set)
inifile=fopen(inipath,"r");
set->confirm_close=iniReadBool(inifile,"SyncTERM","ConfirmClose",FALSE);
set->prompt_save=iniReadBool(inifile,"SyncTERM","PromptSave",TRUE);
- set->startup_mode=iniReadEnum(inifile,"SyncTERM","VideoMode",screen_modes,SCREEN_MODE_CURRENT);
- set->startup_mode=iniReadEnum(inifile,"SyncTERM","ScreenMode",screen_modes,set->startup_mode);
+ set->startup_mode=iniReadEnum(inifile,"SyncTERM","VideoMode",screen_modes_enum,SCREEN_MODE_CURRENT);
+ set->startup_mode=iniReadEnum(inifile,"SyncTERM","ScreenMode",screen_modes_enum,set->startup_mode);
set->output_mode=iniReadEnum(inifile,"SyncTERM","OutputMode",output_enum,CIOLIB_MODE_AUTO);
set->backlines=iniReadInteger(inifile,"SyncTERM","ScrollBackLines",2000);
set->xfer_success_keypress_timeout=iniReadInteger(inifile,"SyncTERM", "TransferSuccessKeypressTimeout", /* seconds: */0);
@@ -1624,11 +1624,11 @@ int main(int argc, char **argv)
cio_api.options &= ~CONIO_OPT_BLOCKY_SCALING;
ciolib_reaper=FALSE;
seticon(syncterm_icon.pixel_data,syncterm_icon.width);
+ textmode(text_mode);
if (settings.scaling_factor)
setscaling(settings.scaling_factor);
if (settings.window_width && settings.window_height)
setwinsize(settings.window_width, settings.window_height);
- textmode(text_mode);
gettextinfo(&txtinfo);
if((txtinfo.screenwidth<40) || txtinfo.screenheight<24) {
diff --git a/src/xpdev/gen_defs.h b/src/xpdev/gen_defs.h
index d615693e74707f72d5c6ff54195f3473de2326aa..b42e3412b49010e706da9e76af1d95ea55caeb1d 100644
--- a/src/xpdev/gen_defs.h
+++ b/src/xpdev/gen_defs.h
@@ -37,6 +37,7 @@
#ifndef _GEN_DEFS_H
#define _GEN_DEFS_H
+#include "cp437defs.h"
#include <errno.h>
/* Resolve multi-named errno constants */
@@ -451,7 +452,7 @@ typedef struct {
/* ASCIIZ char* parsing helper macros */
/* These (unsigned char) typecasts defeat MSVC debug assertion when passed a negative value */
-#define IS_WHITESPACE(c) isspace((unsigned char)(c))
+#define IS_WHITESPACE(c) (isspace((unsigned char)(c)) || c == CP437_NO_BREAK_SPACE)
#define IS_CONTROL(c) iscntrl((unsigned char)(c))
#define IS_ALPHA(c) isalpha((unsigned char)(c))
#define IS_ALPHANUMERIC(c) isalnum((unsigned char)(c))
diff --git a/xtrn/sbl/DEPRECATED.TXT b/xtrn/sbl/DEPRECATED.TXT
deleted file mode 100644
index b2f3f7d2511ebd668588acbf9e14a912c6551161..0000000000000000000000000000000000000000
--- a/xtrn/sbl/DEPRECATED.TXT
+++ /dev/null
@@ -1,6 +0,0 @@
-This project (Synchronet BBS List, SBL, the native C version) has been
-retired and deprecated in favor of the new Synchronet BBS List (v4,
-JavaScript version), a.k.a. exec/sbbslist.js.
-
-See http://wiki.synchro.net/module:sbbslist for details about migrating to the
-new Synchronet BBS List.
diff --git a/xtrn/sbl/GNUmakefile b/xtrn/sbl/GNUmakefile
deleted file mode 100644
index c6683dd1f4d2065810c8d5cc64320774e38b7ea7..0000000000000000000000000000000000000000
--- a/xtrn/sbl/GNUmakefile
+++ /dev/null
@@ -1,48 +0,0 @@
-# Makefile.gnu
-
-#########################################################################
-# Makefile for Synchronet BBS List #
-# For use with GNU make and GNU C Compiler #
-# @format.tab-size 4, @format.use-tabs true #
-# #
-# Linux: make -f Makefile.gnu #
-# Win32: make -f Makefile.gnu os=win32 #
-# FreeBSD: make -f Makefile.gnu os=freebsd #
-#########################################################################
-
-# $Id: GNUmakefile,v 1.28 2019/08/06 17:06:32 deuce Exp $
-
-# Macros
-XSDK = ../sdk
-SRC_ROOT ?= ../../src
-include $(SRC_ROOT)/build/Common.gmake
-
-ifeq ($(os),sunos)
- LDFLAGS += -lnsl -lrt
-endif
-
-LDFLAGS += $(XPDEV_LDFLAGS)
-
-vpath %.c $(XSDK)
-
-CFLAGS += -I$(SRC_ROOT)$(DIRSEP)sbbs3 -I$(XSDK) -DUSE_XPDEV $(XPDEV_CFLAGS) $(SMBLIB_CFLAGS) $(HASH_CFLAGS) $(ENCODE_CFLAGS)
-
-$(SBL): $(OBJS)
- @echo Linking $@
- $(QUIET)$(CC) $(MT_LDFLAGS) $(LDFLAGS) $^ -o $@ $(XPDEV-MT_LIBS)
-
-$(SBL2SMB): $(OBJODIR)$(DIRSEP)sbl2smb$(OFILE) $(HASH_LIB) $(ENCODE_LIB)
- @echo Linking $@
- $(QUIET)$(CC) $(LDFLAGS) $(SMBLIB_LDFLAGS) $(HASH_LDFLAGS) $(ENCODE_LDFLAGS) $^ -o $@ $(LIBS) $(SMBLIB_LIBS) $(XPDEV_LIBS) $(HASH_LIBS) $(ENCODE_LIBS)
-
-$(SMB2SBL): $(OBJODIR)$(DIRSEP)smb2sbl$(OFILE) $(HASH_LIB) $(ENCODE_LIB)
- @echo Linking $@
- $(QUIET)$(CC) $(LDFLAGS) $(SMBLIB_LDFLAGS) $(HASH_LDFLAGS) $(ENCODE_LDFLAGS) $^ -o $@ $(SMBLIB_LIBS) $(XPDEV_LIBS) $(HASH_LIBS) $(ENCODE_LIBS)
-
-$(SBLPACK): $(OBJODIR)$(DIRSEP)sblpack$(OFILE)
- @echo Linking $@
- $(QUIET)$(CC) $(LDFLAGS) $(SMBLIB_LDFLAGS) $^ -o $@ $(XPDEV_LIBS)
-
-$(SBBSLIST): $(OBJODIR)$(DIRSEP)sbbslist$(OFILE)
- @echo Linking $@
- $(QUIET)$(CC) $(LDFLAGS) $(SMBLIB_LDFLAGS) $^ -o $@ $(XPDEV_LIBS)
diff --git a/xtrn/sbl/Makefile b/xtrn/sbl/Makefile
deleted file mode 100644
index eac5f3b57763f932e3bdae99bebb91d4f7f74f93..0000000000000000000000000000000000000000
--- a/xtrn/sbl/Makefile
+++ /dev/null
@@ -1,61 +0,0 @@
-##################################################################
-# Makefile for SBL (Synchronet BBS List Online External Program) #
-# For use with Borland C++ or C++ Builder (for Win32) #
-# Tabstop=8 #
-##################################################################
-
-# Macros
-CC = bcc32
-LD = ilink32
-XSDK = ..\sdk
-!ifndef SRC_ROOT
- SRC_ROOT= ..\..\src
-!endif
-
-!ifndef XPDEV
- XPDEV = $(SRC_ROOT)\xpdev
-!endif
-!ifndef SBBS_SRC
- SBBS_SRC = $(SRC_ROOT)\sbbs3
-!endif
-!ifndef SMBLIB_SRC
- SMBLIB_SRC = $(SRC_ROOT)\smblib
-!endif
-
-CFLAGS = -WM -I$(XSDK);$(XPDEV);$(SBBS_SRC);$(SMBLIB_SRC)
-CFLAGS = $(CFLAGS) -q -d -H -X- -w-csu -w-pch -w-ccc -w-rch -w-par -w-8004
-OBJS = xsdk.obj xsdkvars.obj xsdkwrap.obj
-
-.path.c = .;$(XSDK);$(XPDEV);$(SBBS_SRC)
-
-# Enable auto-dependency checking
-.autodepend
-.cacheautodepend
-
-# Implicit C Compile Rule
-.c.obj:
- @$(CC) $(CFLAGS) -c $<
-
-all: sbl.exe smb2sbl.exe sbl2smb.exe sblpack.exe
-
-# Main EXE Link Rule
-sbl.exe: $(OBJS) sbl.obj
- @echo Linking $@
- @$(CC) $(CFLAGS) -e$@ $**
-
-SMBIO = $(XPDEV)/bcc.win32.lib.debug/xpdev_mt.lib $(SMBLIB_SRC)/bcc.win32.lib.debug/smb.lib
-
-sbl2smb.exe: sbl2smb.obj $(SMBIO)
- @echo Linking $@
- @$(CC) $(CFLAGS) -e$@ $**
-
-smb2sbl.exe: smb2sbl.obj $(SMBIO)
- @echo Linking $@
- @$(CC) $(CFLAGS) -e$@ $**
-
-sblpack.exe: sblpack.obj
- @echo Linking $@
- @$(CC) $(CFLAGS) -e$@ $**
-
-clean:
- del $(OBJS) $(SMBIO)
\ No newline at end of file
diff --git a/xtrn/sbl/objects.mk b/xtrn/sbl/objects.mk
deleted file mode 100644
index fc2de502acdd70014d46f960e8b1f7d038ad143d..0000000000000000000000000000000000000000
--- a/xtrn/sbl/objects.mk
+++ /dev/null
@@ -1,3 +0,0 @@
-OBJS = $(MTOBJODIR)$(DIRSEP)sbl$(OFILE) \
- $(MTOBJODIR)$(DIRSEP)xsdk$(OFILE) \
- $(MTOBJODIR)$(DIRSEP)xsdkvars$(OFILE)
diff --git a/xtrn/sbl/sbbslist.c b/xtrn/sbl/sbbslist.c
deleted file mode 100644
index 64a71dc09555deb603b38f89ccd60c6cc439c4fd..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbbslist.c
+++ /dev/null
@@ -1,1009 +0,0 @@
-/* SBBSLIST.C */
-
-/* Developed 1990-2003 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
-
-/* Converts Synchronet BBS List (SBL.DAB) to HTML file */
-
-#include <stdlib.h> /* realloc */
-#include <time.h> /* localtime */
-#include "genwrap.h"
-#include "telnet.h"
-#include "sbldefs.h"
-#include "filewrap.h"
-#include "sockwrap.h"
-
-char *wday[]={"Sun","Mon","Tue","Wed","Thu","Fri","Sat"};
-char *mon[]={"Jan","Feb","Mar","Apr","May","Jun"
- ,"Jul","Aug","Sep","Oct","Nov","Dec"};
-char *nulstr="";
-char tmp[256];
-
-#ifdef _WIN32
-extern int daylight=0;
-extern long timezone=0L;
-#endif
-
-#define SORT TRUE
-#define VERIFY TRUE
-
-typedef struct {
-
- time_t date;
- ulong count;
- ulong attempts;
- short offset;
-
- } sort_t;
-
-
-int sort_cmp(sort_t **str1, sort_t **str2)
-{
- int diff;
-
- /* sort descending by date */
- diff=((*str2)->date&0xffff0000)-((*str1)->date&0xffff0000);
-
- if(diff)
- return(diff);
-
- /* sort descending by verfication counter */
- diff=(((*str2)->count)-((*str1)->count));
-
- if(diff)
- return(diff);
-
- /* sort ascending by verification attempts */
- return(((*str1)->attempts)-((*str2)->attempts));
-}
-
-/****************************************************************************/
-/* Generates a 24 character ASCII string that represents the time_t pointer */
-/* Used as a replacement for ctime() */
-/****************************************************************************/
-char *timestr(time_t *intime)
-{
- static char str[256];
- char mer[3],hour;
- struct tm *gm;
-
- gm=localtime(intime);
-
- if(gm==NULL) {
- sprintf(str,"Invalid time: %08lX",*intime);
- return(str);
- }
-
- if(gm->tm_hour>=12) {
- if(gm->tm_hour==12)
- hour=12;
- else
- hour=gm->tm_hour-12;
- strcpy(mer,"pm"); }
- else {
- if(gm->tm_hour==0)
- hour=12;
- else
- hour=gm->tm_hour;
- strcpy(mer,"am"); }
- sprintf(str,"%s %s %02d %4d %02d:%02d %s"
- ,wday[gm->tm_wday],mon[gm->tm_mon],gm->tm_mday,1900+gm->tm_year
- ,hour,gm->tm_min,mer);
- return(str);
-}
-
-/****************************************************************************/
-/* Converts unix time format (long - time_t) into a char str MM/DD/YY */
-/****************************************************************************/
-char *unixtodstr(time_t t, char *str)
-{
- struct tm* tm;
-
- if(!t)
- strcpy(str,"00/00/00");
- else {
- tm=gmtime(&t);
- if(tm==NULL)
- strcpy(str,"00/00/00");
- else {
- if(tm->tm_mon>11) { /* DOS leap year bug */
- tm->tm_mon=0;
- tm->tm_year++; }
- if(tm->tm_mday>31)
- tm->tm_mday=1;
- sprintf(str,"%02u/%02u/%02u",tm->tm_mon+1,tm->tm_mday
- ,tm->tm_year%100); }
- }
- return(str);
-}
-
-char* html_encode(char *src)
-{
- static char buf[1024];
- int i;
-
- for(i=0;*src;src++)
- i+=sprintf(buf+i,"&#%u;",*src);
-
- return(buf);
-}
-
-void long_bbs_info(FILE *out, bbs_t bbs)
-{
- int i;
-
-fprintf(out,"BBS Name: %s since %s\r\n"
- ,bbs.name,unixtodstr(bbs.birth,tmp));
-fprintf(out,"Operator: ");
-for(i=0;i<bbs.total_sysops && i<MAX_SYSOPS;i++) {
- if(i) {
- if(bbs.total_sysops>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(!(i%4))
- fprintf(out,"\r\n ");
- if(i+1==bbs.total_sysops)
- fprintf(out,"and "); }
- fprintf(out,"%s",bbs.sysop[i]); }
-fprintf(out,"\r\n");
-fprintf(out,"Software: %-15.15s Nodes: %-5u "
- "Users: %-5u Doors: %u\r\n"
- ,bbs.software,bbs.nodes,bbs.users,bbs.xtrns);
-fprintf(out,"Download: %lu files in %u directories of "
- "%luMB total space\r\n"
- ,bbs.files,bbs.dirs,bbs.megs);
-fprintf(out,"Messages: %lu messages in %u sub-boards\r\n"
- ,bbs.msgs,bbs.subs);
-fprintf(out,"Networks: ");
-for(i=0;i<bbs.total_networks && i<MAX_NETS;i++) {
- if(i) {
- if(bbs.total_networks>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(!(i%3))
- fprintf(out,"\r\n ");
- if(i+1==bbs.total_networks)
- fprintf(out,"and "); }
- fprintf(out,"%s [%s]",bbs.network[i],bbs.address[i]); }
-fprintf(out,"\r\n");
-fprintf(out,"Terminal: ");
-for(i=0;i<bbs.total_terminals && i<MAX_TERMS;i++) {
- if(i) {
- if(bbs.total_terminals>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(i+1==bbs.total_terminals)
- fprintf(out,"and "); }
- fprintf(out,"%s",bbs.terminal[i]); }
-fprintf(out,"\r\n\r\n");
-for(i=0;i<bbs.total_numbers && i<MAX_NUMBERS;i++) {
- fprintf(out,"%-30.30s "
- ,i && !strcmp(bbs.number[i].modem.location,bbs.number[i-1].modem.location)
- ? nulstr : bbs.number[i].modem.location);
- if(bbs.number[i].modem.min_rate==0xffff)
- fprintf(out,"%s:%d\r\n"
- ,bbs.number[i].telnet.addr
- ,bbs.number[i].telnet.port);
- else
- fprintf(out,"%12.12s %5u %-15.15s "
- "Minimum: %u\r\n"
- ,bbs.number[i].modem.number
- ,bbs.number[i].modem.max_rate,bbs.number[i].modem.desc
- ,bbs.number[i].modem.min_rate);
-}
-fprintf(out,"\r\n");
-for(i=0;i<5;i++) {
- if(!bbs.desc[i][0])
- break;
- fprintf(out,"%15s%s\r\n",nulstr,bbs.desc[i]); }
-
-fprintf(out,"\r\n");
-fprintf(out,"Entry created on %s by %s\r\n"
- ,timestr(&bbs.created),bbs.user);
-if(bbs.updated && bbs.userupdated[0])
- fprintf(out," Last updated on %s by %s\r\n"
- ,timestr(&bbs.updated),bbs.userupdated);
-if(bbs.verified && bbs.userverified[0])
- fprintf(out,"Last verified on %s by %s\r\n"
- ,timestr(&bbs.verified),bbs.userverified);
-}
-
-#if 0 /* old way */
-u_long resolve_ip(char *addr)
-{
- HOSTENT* host;
-
- if(isdigit(addr[0]))
- return(inet_addr(addr));
- if ((host=gethostbyname(addr))==NULL) {
-// printf("!ERROR resolving hostname: %s\n",addr);
- return(0);
- }
- return(*((ulong*)host->h_addr_list[0]));
-}
-#else
-u_long resolve_ip(char *addr)
-{
- HOSTENT* host;
- char* p;
-
- if(*addr==0)
- return(INADDR_NONE);
-
- for(p=addr;*p;p++)
- if(*p!='.' && !isdigit(*p))
- break;
- if(!(*p))
- return(inet_addr(addr));
- if((host=gethostbyname(addr))==NULL)
- return(INADDR_NONE);
- return(*((ulong*)host->h_addr_list[0]));
-}
-#endif
-
-int telnet_negotiate(SOCKET sock, uchar* buf, int rd, int max_rd)
-{
- int i;
- int rsplen;
- uchar rsp[512];
-
- return(rd);
-
- do {
- rsplen=0;
- for(i=0; i<rd && rsplen<sizeof(rsp)-2;i++) {
- if(buf[i]!=TELNET_IAC)
- continue;
- i++;
- printf("telnet cmd: %02X %02X\n"
- ,buf[i],buf[i+1]);
- if(buf[i]==TELNET_DO) {
- rsp[rsplen++]=TELNET_IAC;
- rsp[rsplen++]=TELNET_WILL;
- rsp[rsplen++]=buf[i+1];
- }
- if(buf[i]==TELNET_DONT) {
- rsp[rsplen++]=TELNET_IAC;
- rsp[rsplen++]=TELNET_WONT;
- rsp[rsplen++]=buf[i+1];
- }
- i++;
- }
- if(!rsplen)
- break;
- printf("telnet rsp: ");
- for(i=0; i<rsplen; i++)
- printf("%02X ",rsp[i]);
- printf("\n");
- send(sock,rsp,rsplen,0);
- SLEEP(3000);
- rd=recv(sock,buf,max_rd,0);
-
- } while(rd>0);
-
- return(rd);
-
-}
-
-int sockreadline(SOCKET socket, char* buf, int len, int timeout)
-{
- char ch;
- int i,rd=0;
- time_t start;
- fd_set socket_set;
- struct timeval tv;
-
- start=time(NULL);
- while(rd<len-1) {
-
- tv.tv_sec=0;
- tv.tv_usec=0;
-
- FD_ZERO(&socket_set);
- FD_SET(socket,&socket_set);
-
- i=select(socket+1,&socket_set,NULL,NULL,&tv);
-
- if(i<1) {
- if(i==0) {
- if((time(NULL)-start)>=timeout)
- return(0);
- SLEEP(1);
- continue;
- }
- return(0);
- }
- i=recv(socket, &ch, 1, 0);
- if(i<1)
- return(0);
- if(ch=='\n' && rd>=1) {
- break;
- }
- buf[rd++]=ch;
- }
- buf[rd-1]=0;
-
- return(rd);
-}
-
-
-BOOL check_imsg_support(ulong ip_addr)
-{
- char buf[128];
- BOOL success=FALSE;
- int rd;
- SOCKET sock;
- SOCKADDR_IN addr;
-
- printf("\r\nFinger: ");
- if((sock = socket(AF_INET,SOCK_STREAM,IPPROTO_IP)) == INVALID_SOCKET) {
- printf("!Error %d opening socket\n",ERROR_VALUE);
- return(FALSE);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_family = AF_INET;
-
- if(bind(sock, (struct sockaddr *) &addr, sizeof (addr))!=0) {
- printf("!bind error %d\n",ERROR_VALUE);
- closesocket(sock);
- return(FALSE);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_addr.s_addr = ip_addr;
- addr.sin_family = AF_INET;
- addr.sin_port = htons(79); /* finger */
-
- if(connect(sock, (struct sockaddr *)&addr, sizeof(addr))!=0) {
- printf("!connect error %d\n",ERROR_VALUE);
- closesocket(sock);
- return(FALSE);
- }
-
- /* Send query */
- strcpy(buf,"?ver\r\n");
- send(sock,buf,strlen(buf),0);
-
- /* Get response */
- while((rd=sockreadline(sock,buf,sizeof(buf),60))>0) {
- printf("%s\n",buf);
- if(strstr(buf,"Synchronet")) {
- success=TRUE;
- break;
- }
- }
-
- closesocket(sock);
-
- if(success==FALSE)
- return(FALSE);
-
- /* Check SMTP server */
- printf("SMTP: ");
- success=FALSE;
-
- if((sock = socket(AF_INET,SOCK_STREAM,IPPROTO_IP)) == INVALID_SOCKET) {
- printf("!Error %d opening socket\n",ERROR_VALUE);
- return(FALSE);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_family = AF_INET;
-
- if(bind(sock, (struct sockaddr *) &addr, sizeof (addr))!=0) {
- printf("!bind error %d\n",ERROR_VALUE);
- closesocket(sock);
- return(FALSE);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_addr.s_addr = ip_addr;
- addr.sin_family = AF_INET;
- addr.sin_port = htons(25); /* SMTP */
-
- if(connect(sock, (struct sockaddr *)&addr, sizeof(addr))!=0) {
- printf("!connect error %d\n",ERROR_VALUE);
- closesocket(sock);
- return(FALSE);
- }
-
- /* Get response */
- while((rd=sockreadline(sock,buf,sizeof(buf),60))>0) {
- printf("%s\r\n",buf);
- if(strstr(buf,"Synchronet")) {
- success=TRUE;
- break;
- }
- }
-
- closesocket(sock);
-
- return(success);
-}
-
-int main(int argc, char **argv)
-{
- char str[128],name[128],*location,nodes[32],*sysop;
- char* mail_to = "mailto:"; /* encoded "mailto:" */
- char sysop_email[1024];
- char buf[256];
- char verify_result[128];
- char version[128];
- char* p;
- char* sp;
- char* tp;
- char* for_os;
- char* fontstr="<FONT FACE=\"Arial\" SIZE=\"-1\">";
- char telnet_addr_buf[128];
- char* telnet_addr;
- char telnet_portstr[32];
- ushort telnet_port;
- BOOL fingered;
- BOOL verified;
- ushort index;
- int i,j,file,ff,rd;
- long l;
- ulong ip_addr;
- ulong total_systems;
- ulong total_attempts=0;
- ulong total_verified=0;
- FILE *in,*shrt,*lng,*html,*mail,*syncterm;
- FILE* ibbs;
- ulong ip_list[1000];
- ulong ip_total=0;
- ulong ip;
- bbs_t bbs;
- sort_t **sort=NULL;
- time_t now;
-
- /* socket stuff */
- SOCKET sock;
- SOCKADDR_IN addr;
- int status; /* Status Code */
-#ifdef _WIN32
- WSADATA WSAData;
-
- if((status = WSAStartup(MAKEWORD(1,1), &WSAData))!=0) {
- printf("!WinSock startup ERROR %d\n", status);
- return(1);
- }
-#endif
-
-#if 0
- if(_putenv("TZ=UCT0"))
- printf("!putenv() FAILED");
- tzset();
-#endif
- now=time(NULL);
-
- if((i=sopen("sbl.dab",O_RDWR|O_BINARY,SH_DENYNO,S_IREAD|S_IWRITE))==-1) {
- printf("error opening SBL.DAB\n");
- return(1); }
-
- if((in=fdopen(i,"rb"))==NULL) {
- printf("error opening SBL.DAB\n");
- return(1); }
-
- if((shrt=fopen("sbbs.lst","wb"))==NULL) {
- printf("error opening/creating SBBS.LST\n");
- return(1); }
-
- if((lng=fopen("sbbs_det.lst","wb"))==NULL) {
- printf("error opening/creating SBBS_DET.LST\n");
- return(1); }
-
- if((html=fopen("sbbslist.html","w"))==NULL) {
- printf("error opening/creating sbbslist.html\n");
- return(1); }
-
- if((ibbs=fopen("sbbsimsg.lst","w"))==NULL) {
- printf("error opening/creating sbbsimsg.lst\n");
- return(1); }
-
- if((mail=fopen("sysop.lst","w"))==NULL) {
- printf("error opening/creating sysop.lst\n");
- return(1); }
-
- if((syncterm=fopen("syncterm.lst","w"))==NULL) {
- printf("error opening/creating syncterm.lst\n");
- return(1); }
-
- fprintf(shrt,"Synchronet BBS List exported from Vertrauen on %s\r\n"
- "======================================================="
- "\r\n\r\n"
- ,unixtodstr(time(NULL),str));
-
- fprintf(lng,"Detailed Synchronet BBS List exported from Vertrauen on %s\r\n"
- "================================================================"
- "\r\n\r\n"
- ,unixtodstr(time(NULL),str));
-
- fprintf(html,"<HTML><HEAD><TITLE>Synchronet BBS List</TITLE></HEAD>\n");
- fprintf(html,"<BODY><FONT FACE=\"Arial\" SIZE=\"-1\">\n");
-
- printf("Sorting...");
- fseek(in,0L,SEEK_SET);
- i=j=0;
- while(1) {
- if(!fread(&bbs,sizeof(bbs_t),1,in))
- break;
- j++;
- printf("%4u\b\b\b\b",j);
- if(!bbs.name[0] || strnicmp(bbs.software,"SYNCHRONET",10)) {
-// printf("%s\n",bbs.software);
- continue;
- }
- i++;
- if((sort=(sort_t **)realloc(sort
- ,sizeof(sort_t *)*i))==NULL) {
- printf("\r\n\7Memory allocation error\r\n");
- return(1); }
- if((sort[i-1]=(sort_t *)malloc(sizeof(sort_t)
- ))==NULL) {
- printf("\r\n\7Memory allocation error\r\n");
- return(1); }
- sort[i-1]->date=bbs.verified;
- sort[i-1]->count=bbs.verification_count;
- sort[i-1]->attempts=bbs.verification_attempts;
- sort[i-1]->offset=j-1;
- }
- total_systems=i;
-
-#if SORT
- qsort((void *)sort,total_systems,sizeof(sort[0])
- ,(int(*)(const void *, const void *))sort_cmp);
-#endif
- printf(" Done.\n");
-
- printf("Creating index...");
- sprintf(str,"SBBSSORT.NDX");
- if((file=open(str,O_RDWR|O_CREAT|O_TRUNC|O_BINARY,S_IWRITE|S_IREAD))==-1) {
- printf("\n\7Error creating %s\n",str);
- return(1); }
- for(j=0;j<(int)total_systems;j++)
- write(file,&sort[j]->offset,2);
- lseek(file,0L,SEEK_SET);
- printf(" Done.\n");
-
-
- printf("Creating lists...\n");
-
- fprintf(html,"<CENTER>");
- fprintf(html,"<H1><I><A HREF=http://www.synchro.net>Synchronet"
- "</A> BBS List</H1></I>\n");
-
- fprintf(html,"(%d systems) exported from "
- "<B><A HREF=http://vert.synchro.net>Vertrauen</A></B> on %s\n"
- ,total_systems ,timestr(&now));
-
- fprintf(html,"<P></CENTER>\n");
-
- fprintf(html,"<TABLE WIDTH=\"100%%\">\n");
- fprintf(html,"<COLGROUP ALIGN=LEFT><COLGROUP ALIGN=LEFT>"
- "<COLGROUP ALIGN=CENTER><COLGROUP ALIGN=CENTER>"
- "<COLGROUP ALIGN=RIGHT><COLGROUP ALIGN=CENTER>\n");
- fprintf(html,"<TR BGCOLOR=\"#000000\">\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">BBS Name\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">Sysop\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">Location\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">Nodes\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">Modem/Telnet Address\n");
- fprintf(html,"<TH><FONT FACE=\"Arial\" SIZE=\"-1\" COLOR=\"#FFFFFF\">Verification Results\n");
- ff=0;
- while(1) {
- if(read(file,&index,2)!=2)
- break;
- fseek(in,(long)index*sizeof(bbs_t),SEEK_SET);
- if(!fread(&bbs,sizeof(bbs_t),1,in))
- break;
- long_bbs_info(lng,bbs);
- if(ff)
- fprintf(lng,"\x0c\r\n");
- else
- fprintf(lng,"\r\n---------------------------------------------"
- "----------------------------------\r\n\r\n");
- ff=!ff;
- verified=FALSE;
- fingered=FALSE;
- total_attempts++;
- for(i=0;i<bbs.total_numbers && i<MAX_NUMBERS;i++) {
- if(!i) {
- if(strchr(bbs.sysop_email,'@')) {
- sprintf(sysop_email,"<A HREF=%s%s>%s</A>"
- ,mail_to,html_encode(bbs.sysop_email),bbs.sysop[0]);
- sysop=sysop_email;
- } else
- sysop=bbs.sysop[0];
- sprintf(nodes,"%u",bbs.nodes);
- } else {
- sysop="";
- nodes[0]=0;
- }
- if(bbs.number[i].modem.min_rate==0xffff) {
-
- telnet_port=bbs.number[i].telnet.port;
- if(telnet_port==0)
- telnet_port=23;
- strcpy(telnet_addr_buf,bbs.number[i].telnet.addr);
- telnet_addr=telnet_addr_buf;
-
- if(!strnicmp(telnet_addr,"TELNET:",7))
- telnet_addr+=7;
- if(!strnicmp(telnet_addr,"//",2))
- telnet_addr+=2;
- p=strchr(telnet_addr,':');
- if(p!=NULL) {
- *p=0;
- telnet_port=atoi(p+1);
- }
- printf("Resolving IP address for: %s",telnet_addr);
- ip_addr=resolve_ip(telnet_addr);
- printf("\n");
-
- if(i) {
- if(ip_addr==0 || ip_addr==INADDR_NONE)
- continue; /* bad hostname/IP, ignore */
- for(ip=0;ip<ip_total;ip++)
- if(ip_addr==ip_list[ip])
- break;
- if(ip<ip_total) /* already verified, ignore */
- continue;
- }
- }
-
- if(i && !stricmp(bbs.number[i].modem.number,bbs.number[i-1].modem.number))
- continue; // duplicate
- if(i && !stricmp(bbs.number[i].modem.location,bbs.number[i-1].modem.location))
- location="";
- else
- location=bbs.number[i].modem.location;
- fprintf(shrt,"%-25.25s %-25.25s %s\r\n"
- ,i ? "" : bbs.name, location
- ,bbs.number[i].modem.number);
- if(!i) {
- fprintf(html,"<A NAME=\"%s.index\">",bbs.name);
- fprintf(html,"<TR BGCOLOR=\"#EEEEEE\">");
- } else
- fprintf(html,"<TR>");
- sprintf(name,"<A HREF=\"#%s\">%s</A>",bbs.name,bbs.name);
-
- if(bbs.number[i].modem.min_rate==0xffff) {
-
-#if 0 // moved
- telnet_port=bbs.number[i].telnet.port;
- if(telnet_port==0)
- telnet_port=23;
- strcpy(telnet_addr_buf,bbs.number[i].telnet.addr);
- telnet_addr=telnet_addr_buf;
-
- if(!strnicmp(telnet_addr,"TELNET:",7))
- telnet_addr+=7;
- if(!strnicmp(telnet_addr,"//",2))
- telnet_addr+=2;
- p=strchr(telnet_addr,':');
- if(p!=NULL) {
- *p=0;
- telnet_port=atoi(p+1);
- }
-#endif
-
-#if !VERIFY /* set to 1 for no-verification */
- verified=TRUE;
- strcpy(verify_result,"<B>v3.00x for Win32</B>");
-#else
- printf("Verifying %d/%d %s:%d "
- ,total_attempts,total_systems,telnet_addr,telnet_port);
-
-// ip_addr=resolve_ip(telnet_addr); /* already done above */
- if(!ip_addr || ip_addr==INADDR_NONE)
- strcpy(verify_result,"bad hostname");
- else {
-
- if((sock = socket(AF_INET,SOCK_STREAM,IPPROTO_IP)) == INVALID_SOCKET) {
- printf("\n\7Error %d opening socket",ERROR_VALUE);
- return(1);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_family = AF_INET;
-
- if(bind(sock, (struct sockaddr *) &addr, sizeof (addr))!=0) {
- closesocket(sock);
- printf("!ERROR %d binding to socket %d",ERROR_VALUE, sock);
- return(1);
- }
-
- memset(&addr,0,sizeof(addr));
- addr.sin_addr.s_addr = ip_addr;
- addr.sin_family = AF_INET;
- addr.sin_port = htons(telnet_port);
-
- if(connect(sock, (struct sockaddr *)&addr, sizeof(addr))!=0)
- sprintf(verify_result,"no connect (%ld)"
- ,ERROR_VALUE);
- else {
- l=1;
- ioctlsocket(sock, FIONBIO, &l);
- SLEEP(3000);
-
- buf[0]=0;
- rd=recv(sock,buf,sizeof(buf)-1,0);
- if((rd=telnet_negotiate(sock,buf,rd,sizeof(buf)-1))<1)
- sprintf(verify_result,"no data (%ld)"
- ,rd==SOCKET_ERROR ? ERROR_VALUE : rd);
- else {
-
- buf[rd]=0;
- sp=buf+(rd-1);
- while(*sp && sp!=buf) sp--; // Skip garbage (with null)
- if(*sp==0)
- sp++;
- p=strstr(sp,"Synchronet");
- if(p!=NULL && (for_os=strstr(sp," for "))!=NULL) {
- verified=TRUE;
- p=strstr(sp,"Version ");
- if(p==NULL)
- version[0]=0;
- else {
- for_os[12]=0;
- p+=8; /* skip "version" */
- tp=strchr(p,'\r');
- if(tp!=NULL) *tp=0;
- truncsp(p);
- tp=strchr(for_os+5,' ');
- if(tp!=NULL) *tp=0;
- truncsp(for_os);
- sprintf(version,"v%s%s",p,for_os);
- }
- sprintf(verify_result,"<B>%s</B>"
- ,version[0] ? version : "Verified");
- } else {
- printf("rd=%d buf='%s' sp='%s'\n",rd,buf,sp);
- sprintf(verify_result,"non-Synchronet");
- }
- /* Check Finger */
- if(!fingered) { /* not already checked */
- for(ip=0;ip<ip_total;ip++)
- if(ip_addr==ip_list[ip])
- break;
- if(ip>=ip_total && check_imsg_support(ip_addr)) {
- fingered=TRUE;
- printf("[IM]");
- fprintf(ibbs,"%-63s %s\n"
- ,telnet_addr, inet_ntoa(addr.sin_addr));
- }
- }
- }
- }
-
- ip_list[ip_total++]=ip_addr;
- closesocket(sock);
- }
-
- printf("%s\n",verify_result);
- bbs.verification_attempts++;
-#endif
-
- if(telnet_port==23)
- telnet_portstr[0]=0;
- else
- sprintf(telnet_portstr,":%d",telnet_port);
-
- if(verified && i==0) {
- fprintf(syncterm,"[%s]\nConnectionType=Telnet\nPort=%d\nAddress=%s\n\n"
- ,bbs.name
- ,telnet_port
- ,telnet_addr);
- }
-
- fprintf(html,"<TD><B>%s%s</B><TD>%s%s<TD>%s%s<TD>%s%s<TD%s>"
- "<A HREF=telnet://%s%s>%s%s%s%s%s</A><TD%s>%s%s\n"
- ,fontstr,i ? "":name
- ,fontstr,sysop
- ,fontstr,location
- ,fontstr,nodes
- ,i ? " BGCOLOR=\"#EEEEEE\"":""
- ,telnet_addr, telnet_portstr
- ,fontstr
- ,verified ? "<B>":"", telnet_addr, telnet_portstr
- , verified ? "</B>":""
- ,i ? " BGCOLOR=\"#EEEEEE\"":""
- ,fontstr,verify_result);
- } else {
- fprintf(syncterm,"[%s (%s)]\nConnectionType=Modem\nAddress=1-%s\n\n"
- ,bbs.name
- ,bbs.number[i].modem.number
- ,bbs.number[i].modem.number);
- fprintf(html,"<TD><B>%s%s</B><TD>%s%s<TD>%s%s<TD>%s%s<TD%s>%s%s"
- "<TD%s>%s%s\n"
- ,fontstr,i ? "":name
- ,fontstr,sysop
- ,fontstr,location
- ,fontstr,nodes
- ,i ? " BGCOLOR=\"#EEEEEE\"":""
- ,fontstr,bbs.number[i].modem.number
- ,i ? " BGCOLOR=\"#EEEEEE\"":""
- ,fontstr,"N/A");
- }
- } /* for(numbers) */
-#if VERIFY
- if(verified) {
- total_verified++;
- bbs.verified=time(NULL);
- bbs.verification_count++;
- strcpy(bbs.userverified,"SBBS List Verifier");
- }
- fseek(in,(long)index*sizeof(bbs_t),SEEK_SET);
- fwrite(&bbs,sizeof(bbs_t),1,in);
-#endif
- }
- fprintf(html,"</TABLE>\n");
-
- now=time(NULL);
- fprintf(html,"<CENTER>\n");
- fprintf(html,"%d systems verified from "
- "<B><A HREF=http://vert.synchro.net>Vertrauen</A></B> on %s\n"
- ,total_verified ,timestr(&now));
- fprintf(html,"<H1><I>Detailed Synchronet BBS List</I></H1>\n");
- fprintf(html,"</CENTER>\n");
-
- /* Generate Detailed List */
- lseek(file,0L,SEEK_SET);
- while(1) {
- if(read(file,&index,2)!=2)
- break;
- fseek(in,(long)index*sizeof(bbs_t),SEEK_SET);
- if(!fread(&bbs,sizeof(bbs_t),1,in))
- break;
-
- fprintf(html,"<P><A NAME=\"%s\">\n",bbs.name);
-
- fprintf(html,"<H2><A HREF=\"#%s.index\">%s</A></H2>",bbs.name,bbs.name);
- fprintf(html,"<FONT FACE=\"Arial\" SIZE=\"-1\">\n");
-
- fprintf(html,"Online since: %s<BR>\n",unixtodstr(bbs.birth,tmp));
-
- if(strchr(bbs.sysop_email,'@')) {
- fprintf(mail,"%s\n",bbs.sysop_email);
- sprintf(sysop_email,"<A HREF=%s%s>%s</A>"
- ,mail_to,html_encode(bbs.sysop_email),bbs.sysop[0]);
- sysop=sysop_email;
- } else
- sysop=bbs.sysop[0];
-
- fprintf(html,"Operator: %s", sysop);
-
- for(i=1;i<bbs.total_sysops && i<MAX_SYSOPS;i++) {
- if(bbs.total_sysops>2)
- fprintf(html,", ");
- else
- fputc(' ',html);
- if(i+1==bbs.total_sysops)
- fprintf(html,"and ");
- fprintf(html,"%s",bbs.sysop[i]);
- }
- fprintf(html,"<BR>\n");
-
- if(bbs.web_url[0])
- fprintf(html,"Web-site: <A HREF=http://%s>%s</A><BR>\n",bbs.web_url,bbs.web_url);
-
- fprintf(html,"Nodes: %u, "
- "Users: %u, Doors: %u<BR>\n"
- ,bbs.nodes,bbs.users,bbs.xtrns);
- fprintf(html,"Download: %lu files in %u directories of "
- "%luMB total space<BR>\n"
- ,bbs.files,bbs.dirs,bbs.megs);
- fprintf(html,"Messages: %lu messages in %u sub-boards<BR>\n"
- ,bbs.msgs,bbs.subs);
-
- if(bbs.total_networks) {
- fprintf(html,"Networks: ");
- for(i=0;i<bbs.total_networks && i<MAX_NETS;i++) {
- if(i) {
- if(bbs.total_networks>2)
- fprintf(html,", ");
- else
- fputc(' ',html);
- if(!(i%2))
- fprintf(html,"<BR>");
- if(i+1==bbs.total_networks)
- fprintf(html,"and ");
- }
- fprintf(html,"%s [%s]",bbs.network[i],bbs.address[i]); }
- fprintf(html,"<BR>\n");
- }
-
- if(bbs.total_terminals) {
- fprintf(html,"Terminal: ");
- for(i=0;i<bbs.total_terminals && i<MAX_TERMS;i++) {
- if(i) {
- if(bbs.total_terminals>2)
- fprintf(html,", ");
- else
- fputc(' ',html);
- if(i+1==bbs.total_terminals)
- fprintf(html,"and "); }
- fprintf(html,"%s",bbs.terminal[i]); }
- fprintf(html,"<BR>\n");
- }
-
- fprintf(html,"<BR>\n");
- for(i=0;i<bbs.total_numbers && i<MAX_NUMBERS;i++) {
- if(bbs.number[i].modem.min_rate==0xffff) {
-
- telnet_port=bbs.number[i].telnet.port;
- if(telnet_port==0)
- telnet_port=23;
- strcpy(telnet_addr_buf,bbs.number[i].telnet.addr);
- telnet_addr=telnet_addr_buf;
-
- if(!strnicmp(telnet_addr,"TELNET:",7))
- telnet_addr+=7;
- if(!strnicmp(telnet_addr,"//",2))
- telnet_addr+=2;
- p=strchr(telnet_addr,':');
- if(p!=NULL) {
- *p=0;
- telnet_port=atoi(p+1);
- }
-
- if(telnet_port==23)
- telnet_portstr[0]=0;
- else
- sprintf(telnet_portstr,":%d",telnet_port);
-
- fprintf(html,"<A HREF=telnet://%s%s>telnet://%s%s</A>"
- ,telnet_addr
- ,telnet_portstr
- ,telnet_addr
- ,telnet_portstr);
- } else
- fprintf(html,"%s %u %s "
- "Minimum: %u"
- ,bbs.number[i].modem.number
- ,bbs.number[i].modem.max_rate,bbs.number[i].modem.desc
- ,bbs.number[i].modem.min_rate);
-
- fprintf(html," %s<BR>\n"
- ,i && !strcmp(bbs.number[i].modem.location,bbs.number[i-1].modem.location)
- ? nulstr : bbs.number[i].modem.location);
- }
- fprintf(html,"<BR>\n");
-
- fprintf(html,"<BLOCKQUOTE>\n");
- for(i=0;i<5;i++) {
- if(!bbs.desc[i][0])
- break;
- fprintf(html,"%s<BR>\n",bbs.desc[i]);
- }
- fprintf(html,"</BLOCKQUOTE>\n");
-
- fprintf(html,"<PRE>\n");
- fprintf(html,"Entry created on %s by %s\n"
- ,timestr(&bbs.created),bbs.user);
- if(bbs.updated && bbs.userupdated[0])
- fprintf(html," Last updated on %s by %s\n"
- ,timestr(&bbs.updated),bbs.userupdated);
- if(bbs.verified && bbs.userverified[0])
- fprintf(html,"Last verified on %s by %s\n"
- ,timestr(&bbs.verified),bbs.userverified);
-
- fprintf(html,"</PRE></P>\n");
- }
- fprintf(html,"<CENTER><H1>End</H1></CENTER>\n");
-
- fprintf(html,"<P>If you are a sysop of a <B>Synchronet BBS</B> and you would "
- "like to add your system to this list, please do one of the following:\n");
- fprintf(html,"<UL>\n");
- fprintf(html,"<LI>Install <I>Synchronet BBS List <B>v2.00+</B></I> on your BBS and "
- "link it into the <B>SYNCDATA</B> message conference (on <B>DOVE-Net</B> or <B>FidoNet</B>)\n");
- fprintf(html,"<LI><B>OR</B> log on to <A HREF=telnet://vert.synchro.net>Vertrauen</A> and "
- "manually add your system into the online BBS List database.\n");
- fprintf(html,"</UL>\n");
- fprintf(html,"</BODY></HTML>\n");
- printf(" Done.\n");
- return(0);
-}
diff --git a/xtrn/sbl/sbl b/xtrn/sbl/sbl
deleted file mode 100755
index e7cb7a22369d1d2bff3a456259c95e2d31c020cf..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl
+++ /dev/null
@@ -1,2 +0,0 @@
-#!/bin/sh
-. ${SBBSEXEC}unixstub.sh
diff --git a/xtrn/sbl/sbl.bpf b/xtrn/sbl/sbl.bpf
deleted file mode 100644
index 4d4d9faa08980844713ed3f91c478a19f80780b7..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.bpf
+++ /dev/null
@@ -1,9 +0,0 @@
-USEUNIT("Sbl.c");
-USEUNIT("..\SDK\Xsdkvars.c");
-USEUNIT("..\SDK\Xsdk.c");
-USELIB("D:\Borland\CBuilder5\Lib\ws2_32.lib");
-USEUNIT("..\sdk\xsdkwrap.c");
-//---------------------------------------------------------------------------
-This file is used by the project manager only and should be treated like the project file
-
-
main
\ No newline at end of file
diff --git a/xtrn/sbl/sbl.bpr b/xtrn/sbl/sbl.bpr
deleted file mode 100644
index 00d8b4fdb9483164008b8b7b2af217ff88fb58c5..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.bpr
+++ /dev/null
@@ -1,120 +0,0 @@
-<?xml version='1.0' encoding='utf-8' ?>
-<!-- C++Builder XML Project -->
-<PROJECT>
- <MACROS>
- <VERSION value="BCB.05.03"/>
- <PROJECT value="sbl.exe"/>
- <OBJFILES value="Sbl.obj ..\SDK\Xsdkvars.obj ..\SDK\Xsdk.obj ..\sdk\xsdkwrap.obj"/>
- <RESFILES value=""/>
- <IDLFILES value=""/>
- <IDLGENFILES value=""/>
- <DEFFILE value=""/>
- <RESDEPEN value="$(RESFILES)"/>
- <LIBFILES value="D:\Borland\CBuilder5\Lib\ws2_32.lib"/>
- <LIBRARIES value=""/>
- <SPARELIBS value=""/>
- <PACKAGES value="VCL50.bpi VCLX50.bpi bcbsmp50.bpi VCLDB50.bpi VCLADO50.bpi ibsmp50.bpi
- VCLBDE50.bpi VCLDBX50.bpi QRPT50.bpi TEEUI50.bpi TEEDB50.bpi TEE50.bpi
- DSS50.bpi TEEQR50.bpi VCLIB50.bpi VCLMID50.bpi VCLIE50.bpi INETDB50.bpi
- INET50.bpi NMFAST50.bpi WEBMID50.bpi bcbie50.bpi dclocx50.bpi"/>
- <PATHCPP value=".;..\SDK"/>
- <PATHPAS value=".;"/>
- <PATHRC value=".;"/>
- <PATHASM value=".;"/>
- <DEBUGLIBPATH value="$(BCB)\lib\debug"/>
- <RELEASELIBPATH value="$(BCB)\lib\release"/>
- <LINKER value="tlink32"/>
- <USERDEFINES value="_DEBUG"/>
- <SYSDEFINES value="NO_STRICT;_NO_VCL"/>
- <MAINSOURCE value="sbl.bpf"/>
- <INCLUDEPATH value="$(BCB)\include;$(BCB)\include\vcl;..\sdk"/>
- <LIBPATH value="..\SDK;$(BCB)\lib\obj;$(BCB)\lib"/>
- <WARNINGS value="-w-par"/>
- </MACROS>
- <OPTIONS>
- <IDLCFLAGS value="-I$(BCB)\include -I$(BCB)\include\vcl -I..\sdk -src_suffix cpp -D_DEBUG -boa"/>
- <CFLAG1 value="-Od -H=$(BCB)\lib\vcl50.csm -Hc -Vx -Ve -X- -r- -a8 -b- -k -y -v -vi- -tWC
- -tWM -c"/>
- <PFLAGS value="-$YD -$W -$O- -v -JPHNE -M"/>
- <RFLAGS value=""/>
- <AFLAGS value="/mx /w2 /zd"/>
- <LFLAGS value="-D"" -ap -Tpe -x -Gn -v"/>
- </OPTIONS>
- <LINKER>
- <ALLOBJ value="c0x32.obj $(OBJFILES)"/>
- <ALLRES value="$(RESFILES)"/>
- <ALLLIB value="$(LIBFILES) $(LIBRARIES) import32.lib cw32mt.lib"/>
- </LINKER>
- <IDEOPTIONS>
-[Version Info]
-IncludeVerInfo=0
-AutoIncBuild=0
-MajorVer=1
-MinorVer=0
-Release=0
-Build=0
-Debug=0
-PreRelease=0
-Special=0
-Private=0
-DLL=0
-Locale=1033
-CodePage=1252
-
-[Version Info Keys]
-CompanyName=
-FileDescription=
-FileVersion=1.0.0.0
-InternalName=
-LegalCopyright=
-LegalTrademarks=
-OriginalFilename=
-ProductName=
-ProductVersion=1.0.0.0
-Comments=
-
-[HistoryLists\hlIncludePath]
-Count=3
-Item0=$(BCB)\include;$(BCB)\include\vcl;..\sdk
-Item1=$(BCB)\include;$(BCB)\include\vcl;c:\sbbs\xtrn\sdk
-Item2=$(BCB)\include;$(BCB)\include\vcl
-
-[HistoryLists\hlLibraryPath]
-Count=2
-Item0=..\SDK;$(BCB)\lib\obj;$(BCB)\lib
-Item1=$(BCB)\lib\obj;$(BCB)\lib
-
-[HistoryLists\hlDebugSourcePath]
-Count=1
-Item0=$(BCB)\source\vcl
-
-[HistoryLists\hlConditionals]
-Count=1
-Item0=_DEBUG
-
-[Debugging]
-DebugSourceDirs=$(BCB)\source\vcl
-
-[Parameters]
-RunParams=
-HostApplication=
-RemoteHost=
-RemotePath=
-RemoteDebug=0
-
-[Compiler]
-ShowInfoMsgs=0
-LinkDebugVcl=0
-LinkCGLIB=0
-
-[CORBA]
-AddServerUnit=1
-AddClientUnit=1
-PrecompiledHeaders=1
-
-[Language]
-ActiveLang=
-ProjectLang=
-RootDir=
- </IDEOPTIONS>
-</PROJECT>
\ No newline at end of file
diff --git a/xtrn/sbl/sbl.c b/xtrn/sbl/sbl.c
deleted file mode 100644
index 3bcb77d4561e3f10df359a0cb2ecfb3de067b603..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.c
+++ /dev/null
@@ -1,1674 +0,0 @@
-/* sbl.c */
-
-/* Synchronet BBS List Door */
-
-/* $Id: sbl.c,v 1.25 2013/09/15 19:10:46 deuce Exp $ */
-
-/****************************************************************************
- * @format.tab-size 4 (Plain Text/Source Code File Header) *
- * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
- * *
- * Copyright 2013 Rob Swindell - http://www.synchro.net/copyright.html *
- * *
- * This program is free software; you can redistribute it and/or *
- * modify it under the terms of the GNU General Public License *
- * as published by the Free Software Foundation; either version 2 *
- * of the License, or (at your option) any later version. *
- * See the GNU General Public License for more details: gpl.txt or *
- * http://www.fsf.org/copyleft/gpl.html *
- * *
- * Anonymous FTP access to the most recent released source is available at *
- * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
- * *
- * Anonymous CVS access to the development source and modification history *
- * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login *
- * (just hit return, no password is necessary) *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src *
- * *
- * For Synchronet coding style and modification guidelines, see *
- * http://www.synchro.net/source.html *
- * *
- * You are encouraged to submit any modifications (preferably in Unix diff *
- * format) via e-mail to mods@synchro.net *
- * *
- * Note: If this box doesn't appear square, then you need to fix your tabs. *
- ****************************************************************************/
-
-/***********
- * History *
- ***********
-
-******************
-* RELEASE: v1.00 *
-******************
-
-07/03/93 03:16am
-Fixed bug with "Auto-deleting" already deleted entries. This would cause a
-long list of "Auto-deletion" messages once a day.
-
-07/03/93 03:30am
-The name of the user who last updated the entry is now stored and displayed.
-
-07/03/93 03:45am
-Adding/Updating entries is now much easier and user friendly.
-
-07/03/93 04:00am
-Added support for user "verification" of BBS entries.
-
-07/03/93 04:10am
-Users may now update or remove entries using partial system names.
-
-07/03/93 04:30am
-Sysops may now un-delete purged entries with the '*' key.
-
-******************
-* RELEASE: v1.10 *
-******************
-
-10/18/93 06:04pm
-Fixed bug that would cause entries to be purged almost immediately.
-
-10/18/93 07:01pm
-(F)ind text now searches user names who last updated and verified.
-
-10/19/93 01:34am
-Added option for users to change the format of BBS listings.
-
-******************
-* RELEASE: v1.20 *
-******************
-
-10/20/93 04:44pm
-Fixed cosmetic problem with opening menu (for users, not sysop).
-
-******************
-* RELEASE: v1.21 *
-******************
-
-11/29/93 09:40pm
-More cosmetic changes. Added "Saving..." message.
-
-******************
-* RELEASE: v1.22 *
-******************
-
-02/02/94
-Added warning for pending auto-deletion of BBS entries.
-
-02/02/94
-Added option for turning screen pause off/on.
-
-02/03/94
-Added option in SBL.CFG for sysop/co-sysop notification of changes made to
-BBS list by users.
-
-02/03/94
-Converted all file operations from handles to streams for buffered i/o (speed).
-
-02/09/94
-Added options for generating a sort index and displaying sorted list based on
-various criteria.
-
-02/09/94
-Added nodesync() calls to display any messages waiting for this user/node.
-
-02/10/94
-Added search for duplicate names when adding new BBS entries.
-
-02/10/94
-Notification notice of actual auto-deletion sent to author of BBS entry upon
-auto-deletion.
-
-******************
-* RELEASE: v1.30 *
-******************
-
-03/14/94
-Added /M switch to force daily maintenance.
-
-03/22/94
-Fixed occasional double pause after listings.
-
-03/22/94
-Added total entries found to find text listings.
-
-03/22/94
-If a user verifies an entry, the user who created the entry is notified.
-
-03/29/94
-Sysop can define/change the "owner" of an entry when adding or updating.
-
-04/18/94
-Fixed bug in the sort-by-string functions that caused lock-ups when sorting
-more than 312 entries.
-
-04/18/94
-Lowered memory requirements for all sort functions.
-
-******************
-* RELEASE: v1.31 *
-******************
-
-08/23/94
-BBS entries now know whether they were created by a user or by SMB2SBL (via
-message base).
-
-08/23/94
-Fixed problem with hitting Ctrl-C locally during regular (not extended)
-listing. Returning to main menu would not clear screen or have correct colors.
-'aborted' variable is now reset in main() loop.
-
-******************
-* RELEASE: v1.32 *
-******************
-
-08/30/94
-Fixed stack overflow that would cause periodic lock-ups on some systems.
-
-******************
-* RELEASE: v1.33 *
-******************
-
-09/08/94
-When deleting an entry, the name of the BBS deleted wasn't being printed.
-
-02/01/95
-Import utility made mistake of ignoring READ messages to SBL. This has been
-fixed.
-
-12/16/99
-Fixed Y2K window bug in dstrtounix().
-
-12/16/99
-Fixed bug that caused SMB imported entries to never be autodeleted.
-
-06/01/00
-Added support for XSDK 3.0
-
-06/01/00
-Added support for MSVC 5+
-
-06/01/00
-Changed cosmetic appearance of main menu a bit
-
-06/14/99
-Added support for C++Builder 5
-*/
-
-#include <stddef.h> /* offsetof() macro */
-#include <xsdk.h>
-#include "sbldefs.h"
-
-unsigned _stklen = 16000; /* Set stack size in code, not header */
-
-#define Y2K_2DIGIT_WINDOW 70
-#define VERIFICATION_MOD FALSE
-
-typedef struct {
-
- char str[32];
- short offset;
-
-} sortstr_t;
-
-typedef struct {
-
- long i;
- short offset;
-
-} sortint_t;
-
-char *nulstr = "";
-char *wday[] = {"Sun", "Mon", "Tue", "Wed", "Thu", "Fri", "Sat"};
-char *mon[] = {"Jan", "Feb", "Mar", "Apr", "May", "Jun"
-,"Jul", "Aug", "Sep", "Oct", "Nov", "Dec"};
-char tmp[256];
-char list_fmt[128];
-uint del_days, add_ml, update_ml, remove_ml, verify_ml, sbl_pause = 1,
- notify_user;
-time_t now;
-
-/****************************************************************************/
-/* Generates a 24 character ASCII string that represents the 32b-ti time_t */
-/* Used as a replacement for ctime() */
-/****************************************************************************/
-char *timestr(uint32_t intime)
-{
- static char str[256];
- char mer[3], hour;
- struct tm *gm;
- time_t t = intime;
-
- gm = localtime(&t);
- if (gm == NULL)
- return "invalid date/time";
- if (gm->tm_hour >= 12) {
- if (gm->tm_hour == 12)
- hour = 12;
- else
- hour = gm->tm_hour - 12;
- strcpy(mer, "pm");
- }
- else {
- if (gm->tm_hour == 0)
- hour = 12;
- else
- hour = gm->tm_hour;
- strcpy(mer, "am");
- }
- sprintf(str, "%s %s %02d %4d %02d:%02d %s"
- ,wday[gm->tm_wday], mon[gm->tm_mon], gm->tm_mday, 1900 + gm->tm_year
- ,hour, gm->tm_min, mer);
- return (str);
-}
-
-
-/****************************************************************************/
-/* Converts a date string in format MM/DD/YY into unix time format */
-/****************************************************************************/
-time_t dstrtounix(char *str)
-{
- struct tm tm;
-
- if (!strncmp(str, "00/00/00", 8))
- return (0);
- memset(&tm, 0, sizeof(tm));
- tm.tm_year = ((str[6] & 0xf) * 10) + (str[7] & 0xf);
- if (tm.tm_year < Y2K_2DIGIT_WINDOW)
- tm.tm_year += 100;
- tm.tm_mon = ((str[0] & 0xf) * 10) + (str[1] & 0xf);
- tm.tm_mday = ((str[3] & 0xf) * 10) + (str[4] & 0xf);
- if (tm.tm_mon)
- tm.tm_mon--; /* zero-based month field */
- return (mktime(&tm));
-}
-
-/****************************************************************************/
-/* Converts unix time format (long - time_t) into a char str MM/DD/YY */
-/****************************************************************************/
-char *unixtodstr(time_t t, char *str)
-{
- struct tm *tm;
-
- if (t == 0)
- strcpy(str, "00/00/00");
- else {
- tm = gmtime(&t);
- if (tm == NULL) {
- strcpy(str, "00/00/00");
- return (str);
- }
- if (tm->tm_mon > 11) { /* DOS leap year bug */
- tm->tm_mon = 0;
- tm->tm_year++;
- }
- if (tm->tm_mday > 31)
- tm->tm_mday = 1;
- sprintf(str, "%02u/%02u/%02u", tm->tm_mon + 1, tm->tm_mday
- ,tm->tm_year % 100);
- }
- return (str);
-}
-
-void dots(int show)
-{
- static int i;
-
- if (!show) { /* reset */
- i = 0;
- return;
- }
- if (++i > 5) {
- bputs("\b\b\b\b\b \b\b\b\b\b");
- i = 0;
- return;
- }
- outchar('.');
-}
-
-
-/* Displays short information about BBS. Returns 0 if aborted. */
-
-char short_bbs_info(bbs_t bbs)
-{
- char str[128];
- int i, j;
-
- for (i = 0; i < bbs.total_numbers && i < MAX_NUMBERS; i++) {
- for (j = 0; list_fmt[j]; j++) {
- if (j)
- bputs(" ");
- switch (toupper(list_fmt[j])) {
- case 'N':
- bprintf("\1h\1m%-25.25s", i ? nulstr : bbs.name);
- break;
- case 'S':
- bprintf("\1h\1c%-15.15s", i ? nulstr : bbs.software);
- break;
- case 'P':
- if (bbs.number[i].modem.min_rate == 0xffff) {
- if (bbs.number[i].telnet.port != 0
- && bbs.number[i].telnet.port != IPPORT_TELNET)
- sprintf(str, "%s:%hu"
- ,bbs.number[i].telnet.addr
- ,bbs.number[i].telnet.port);
- else
- strcpy(str, bbs.number[i].telnet.addr);
- bprintf("\1h\1b%-28.28s", str);
- }
- else
- bprintf("\1n\1g%12.12s", bbs.number[i].modem.number);
- break;
- case 'B':
- if (bbs.number[i].modem.min_rate != 0xffff)
- bprintf("\1h\1g%5u", bbs.number[i].modem.max_rate);
- break;
- case 'M':
- if (bbs.number[i].modem.min_rate != 0xffff)
- bprintf("\1h\1b%-15.15s", bbs.number[i].modem.desc);
- break;
- case 'Y':
- bprintf("\1h\1y%-25.25s", i ? nulstr : bbs.sysop[0]);
- break;
- case 'T':
- if (i)
- bputs(" ");
- else
- bprintf("\1y\1h%3u", bbs.nodes);
- break;
- case 'U':
- if (i)
- bputs(" ");
- else
- bprintf("\1n\1r%5u", bbs.users);
- break;
- case 'H':
- if (i)
- bprintf("%10.10s", nulstr);
- else
- bprintf("\1h\1r%10u", bbs.megs);
- break;
- case 'L':
- bprintf("\1n\1c%-20.20s", bbs.number[i].modem.location);
- break;
- case 'F':
- bprintf("\1n\1b%s", i ? nulstr : unixtodstr(bbs.birth, tmp));
- break;
- case 'V':
- bprintf("\1n\1m%s", i ? nulstr : unixtodstr(bbs.verified, tmp));
- break;
- case 'D':
- bprintf("\1n%s", i ? nulstr : unixtodstr(bbs.updated, tmp));
- break;
- case 'C':
- bprintf("\1n\1y%s", i ? nulstr : unixtodstr(bbs.created, tmp));
- break;
- default:
- bprintf("%c", list_fmt[j]);
- break;
- }
- }
- bputs("\r\n");
- }
-#if 0
- if (kbhit())
- return (0);
-#endif
- return (1);
-}
-
-char long_bbs_info(bbs_t bbs)
-{
- int i;
-
- cls();
- bprintf("\1n\1gBBS Name: \1h%s \1n\1gsince \1h%s\r\n"
- ,bbs.name, unixtodstr(bbs.birth, tmp));
- bprintf("\1n\1gOperator: ");
- for (i = 0; i < bbs.total_sysops && i < MAX_SYSOPS; i++) {
- if (i) {
- if (bbs.total_sysops > 2)
- bputs(", ");
- else
- outchar(' ');
- if (!(i % 4))
- bputs("\r\n ");
- if (i + 1 == bbs.total_sysops)
- bputs("and ");
- }
- bprintf("\1h%s\1n\1g", bbs.sysop[i]);
- if (!i && bbs.sysop_email[0])
- bprintf(" <\1h%s\1n\1g>", bbs.sysop_email);
- }
- CRLF;
- bprintf("\1n\1gSoftware: \1h%-15.15s \1n\1gNodes: \1h%-5u \1n\1g"
- "Users: \1h%-5u \1n\1gDoors: \1h%u\r\n"
- ,bbs.software, bbs.nodes, bbs.users, bbs.xtrns);
- bprintf("\1n\1gDownload: \1h%lu \1n\1gfiles in \1h%u \1n\1gdirectories of \1h"
- "%luMB \1n\1gtotal space\r\n"
- ,bbs.files, bbs.dirs, bbs.megs);
- bprintf("Messages: \1h%lu \1n\1gmessages in \1h%u \1n\1gsub-boards\r\n"
- ,bbs.msgs, bbs.subs);
- bprintf("Networks: ");
- for (i = 0; i < bbs.total_networks && i < MAX_NETS; i++) {
- if (i) {
- if (bbs.total_networks > 2)
- bputs(", ");
- else
- outchar(' ');
- if (!(i % 3))
- bputs("\r\n ");
- if (i + 1 == bbs.total_networks)
- bputs("and ");
- }
- bprintf("\1h%s [%s]\1n\1g", bbs.network[i], bbs.address[i]);
- }
- CRLF;
- bprintf("Terminal: ");
- for (i = 0; i < bbs.total_terminals && i < MAX_TERMS; i++) {
- if (i) {
- if (bbs.total_terminals > 2)
- bputs(", ");
- else
- outchar(' ');
- if (i + 1 == bbs.total_terminals)
- bputs("and ");
- }
- bprintf("\1h%s\1n\1g", bbs.terminal[i]);
- }
- CRLF;
- if (bbs.web_url[0])
- bprintf("Web-site: http://\1h%s\r\n", bbs.web_url);
- CRLF;
- for (i = 0; i < bbs.total_numbers && i < MAX_NUMBERS; i++) {
- bprintf("\1h\1b%-30.30s "
- ,i && !strcmp(bbs.number[i].modem.location, bbs.number[i - 1].modem.location)
- ? nulstr : bbs.number[i].modem.location);
- if (bbs.number[i].modem.min_rate == 0xffff) {
- if (bbs.number[i].telnet.port != 0
- && bbs.number[i].telnet.port != IPPORT_TELNET)
- bprintf("\1n\1mtelnet://\1h%s:%hu\r\n"
- ,bbs.number[i].telnet.addr
- ,bbs.number[i].telnet.port);
- else
- bprintf("\1n\1mtelnet://\1h%s\r\n"
- ,bbs.number[i].telnet.addr);
- }
- else
- bprintf("\1n\1g%12.12s \1h%5u \1b%-15.15s \1n\1cMinimum: \1h%u\r\n"
- ,bbs.number[i].modem.number
- ,bbs.number[i].modem.max_rate
- ,bbs.number[i].modem.desc
- ,bbs.number[i].modem.min_rate);
- }
- bputs("\r\n\1w\1h");
- for (i = 0; i < DESC_LINES; i++) {
- if (!bbs.desc[i][0])
- break;
- bprintf("%15s%s\r\n", nulstr, bbs.desc[i]);
- }
-
- CRLF;
- if (bbs.misc & FROM_SMB)
- bputs("\1r\1hImported from message base.\r\n");
- bprintf("\1n\1cEntry created on \1h%s\1n\1c by \1h%s\r\n"
- ,timestr(bbs.created), bbs.user);
- if (bbs.updated && bbs.userupdated[0])
- bprintf("\1n\1c Last updated on \1h%s\1n\1c by \1h%s\r\n"
- ,timestr(bbs.updated), bbs.userupdated);
- if (bbs.verified && bbs.userverified[0])
- bprintf("\1n\1cLast verified on \1h%s\1n\1c by \1h%s"
-#if VERIFICATION_MOD
- " \1y(%d/%d)"
-#endif
- "\r\n"
- ,timestr(bbs.verified), bbs.userverified
- ,bbs.verification_count, bbs.verification_attempts);
- CRLF;
- if (aborted) {
- aborted = 0;
- return (0);
- }
- if (!sbl_pause) {
-#if 0
- if (kbhit())
- return (0);
-#endif
- return (1);
- }
- nodesync();
-#if VERIFICATION_MOD
- bputs("More? Y/N/V ");
- switch (getkeys("YNV\r", 0)) {
- case '\r':
- case 'Y':
- return (1);
- case 'V':
- return (2);
- default:
- return (0);
- }
-#else
- return (yesno("More"));
-#endif
-}
-
-/* Gets/updates BBS info from user. Returns 0 if aborted. */
-
-char get_bbs_info(bbs_t * bbs)
-{
- char str[128];
- int i;
-
- aborted = 0;
- if (!(bbs->user[0]))
- strcpy(bbs->user, user_name);
- if (SYSOP) {
- bputs("\1y\1hUser Name (Creator/Owner of Entry): ");
- if (!getstr(bbs->user, 25, K_EDIT | K_LINE | K_AUTODEL))
- return (0);
- }
- bputs("\1y\1hSystem Name: ");
- if (getstr(bbs->name, 25, K_EDIT | K_LINE | K_AUTODEL) < 2)
- return (0);
- if (!bbs->software[0])
- strcpy(bbs->software, "Synchronet");
- bprintf("\1y\1hSoftware: \1w", bbs->software);
- if (!getstr(bbs->software, 15, K_AUTODEL | K_EDIT))
- return (0);
-
- for (i = 0; i < MAX_SYSOPS && !aborted; i++) {
- bprintf("\1y\1hName of System Operator #%d [\1wNone\1y]: ", i + 1);
- if (!getstr(bbs->sysop[i], 25, K_EDIT | K_LINE | K_AUTODEL))
- break;
- if (!i) {
- bprintf("\1y\1hInternet E-mail Address [\1wNone\1y]:\1w ");
- getstr(bbs->sysop_email, 40, K_EDIT | K_AUTODEL);
- }
- }
- bbs->total_sysops = i;
- if (aborted)
- return (0);
-
- unixtodstr(bbs->birth, str);
- bprintf("\1y\1hFirst Day Online (MM/DD/YY): \1w");
- if (getstr(str, 8, K_UPPER | K_EDIT | K_AUTODEL))
- bbs->birth = dstrtounix(str);
- if (aborted)
- return (0);
-
- for (i = 0; i < MAX_NETS && !aborted; i++) {
- bprintf("\1y\1hName of Message Network #%d [\1wNone\1y]: ", i + 1);
- if (!getstr(bbs->network[i], 15, K_EDIT | K_AUTODEL | K_LINE))
- break;
- bprintf("\1y\1hNetwork Message \1wAddress\1y #%d [\1wNone\1y]: \1w", i + 1);
- getstr(bbs->address[i], 25, K_EDIT | K_AUTODEL);
- }
- bbs->total_networks = i;
- if (aborted)
- return (0);
-
- for (i = 0; i < MAX_TERMS && !aborted; i++) {
- bprintf("\1y\1hSupported Terminal Type #%d (i.e. TTY, ANSI, RIP) "
- "[\1wNone\1y]: ", i + 1);
- if (!getstr(bbs->terminal[i], 15, K_EDIT | K_AUTODEL | K_LINE))
- break;
- }
- bbs->total_terminals = i;
- if (aborted)
- return (0);
-
- bprintf("\1y\1hWeb-site [\1wNone\1y] http://\1w");
- getstr(bbs->web_url, 60, K_EDIT | K_AUTODEL);
-
- if (!bbs->nodes)
- bbs->nodes = 1;
- bprintf("\1y\1hNodes (maximum number of simultaneous REMOTE users): \1w");
- sprintf(str, "%u", bbs->nodes);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->nodes = atoi(str);
- if (!bbs->nodes)
- bbs->nodes = 1;
- if (aborted)
- return (0);
-
- for (i = 0; i < MAX_NUMBERS; i++) {
-#if 0
- if (!i && !bbs->number[i].modem.number[0])
- sprintf(bbs->number[i].modem.number, "%.8s", user_phone);
-#endif
- bprintf("\1y\1hPhone Number or \1mTelnet address\1y #%d [\1wNone\1y]: ", i + 1);
- if (!getstr(bbs->number[i].telnet.addr, 28, K_EDIT | K_LINE))
- break;
- if (!bbs->number[i].modem.location[0]) {
- if (!i)
- strcpy(bbs->number[i].modem.location, user_location);
- else
- strcpy(bbs->number[i].modem.location, bbs->number[i - 1].modem.location);
- }
- if (aborted)
- return (0);
- if (isalpha(bbs->number[i].telnet.addr[0])
- || yesno("Is the above a Telnet address")) {
- bbs->number[i].modem.min_rate = 0xffff;
- if (bbs->number[i].telnet.port == 0)
- bbs->number[i].telnet.port = IPPORT_TELNET;
- bprintf("\1y\1hTCP Port: \1w");
- sprintf(str, "%u", bbs->number[i].telnet.port);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->number[i].telnet.port = atoi(str);
- if (aborted)
- return (0);
-
- }
- else {
- if (bbs->number[i].modem.min_rate == 0xffff)
- bbs->number[i].modem.min_rate = 300;
- bbs->number[i].modem.number[13] = 0;
- if (!bbs->number[i].modem.min_rate) {
- if (i)
- bbs->number[i].modem.min_rate = bbs->number[i - 1].modem.min_rate;
- else
- bbs->number[i].modem.min_rate = 300;
- }
- bprintf("\1y\1hMinimum Connect Rate: \1w");
- sprintf(str, "%u", bbs->number[i].modem.min_rate);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->number[i].modem.min_rate = atoi(str);
- if (aborted)
- return (0);
-
- if (!bbs->number[i].modem.max_rate) {
- if (i)
- bbs->number[i].modem.max_rate = bbs->number[i - 1].modem.max_rate;
- else
- bbs->number[i].modem.max_rate = 2400;
- }
- if (bbs->number[i].modem.max_rate < bbs->number[i].modem.min_rate)
- bbs->number[i].modem.max_rate = bbs->number[i].modem.min_rate;
- bprintf("\1y\1hMaximum Connect Rate (i.e. 2400, 9600, 14400, etc): \1w");
- sprintf(str, "%u", bbs->number[i].modem.max_rate);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->number[i].modem.max_rate = atoi(str);
- if (aborted)
- return (0);
- bprintf("\1y\1hModem Description (i.e. Hayes, HST, V.32, etc): \1w");
- getstr(bbs->number[i].modem.desc, 15, K_EDIT | K_AUTODEL);
- }
-
- bprintf("\1y\1hLocation (City, State): \1w");
- if (!getstr(bbs->number[i].modem.location, 30, K_EDIT | K_AUTODEL))
- break;
-
- }
- if (!i)
- return (0);
- bbs->total_numbers = i;
- if (aborted)
- return (0);
-
- if (!bbs->users)
- bbs->users = 100;
- bprintf("\1y\1hTotal Number of Users: \1w");
- sprintf(str, "%u", bbs->users);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->users = atoi(str);
- if (aborted)
- return (0);
-
- if (!bbs->subs)
- bbs->subs = 10;
- bprintf("\1y\1hTotal Number of Sub-boards (Message Areas): \1w");
- sprintf(str, "%u", bbs->subs);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->subs = atoi(str);
- if (aborted)
- return (0);
-
- if (!bbs->msgs)
- bbs->msgs = 500;
- bprintf("\1y\1hTotal Number of Public Messages: \1w");
- sprintf(str, "%"PRIu32, bbs->msgs);
- if (getstr(str, 10, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->msgs = atol(str);
- if (aborted)
- return (0);
-
- if (!bbs->dirs)
- bbs->dirs = 5;
- bprintf("\1y\1hTotal Number of Directories (File Areas): \1w");
- sprintf(str, "%u", bbs->dirs);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->dirs = atoi(str);
- if (aborted)
- return (0);
-
- if (!bbs->files)
- bbs->files = 250;
- bprintf("\1y\1hTotal Number of Downloadable Files: \1w");
- sprintf(str, "%"PRIu32, bbs->files);
- if (getstr(str, 10, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->files = atol(str);
- if (aborted)
- return (0);
-
- if (!bbs->xtrns)
- bbs->xtrns = 5;
- bprintf("\1y\1hTotal Number of External Programs (Doors): \1w");
- sprintf(str, "%u", bbs->xtrns);
- if (getstr(str, 5, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->xtrns = atoi(str);
- if (aborted)
- return (0);
-
- if (!bbs->megs)
- bbs->megs = 40;
- bprintf("\1y\1hTotal Storage Space (in Megabytes): \1w");
- sprintf(str, "%"PRIu32, bbs->megs);
- if (getstr(str, 10, K_NUMBER | K_EDIT | K_AUTODEL))
- bbs->megs = atol(str);
- if (aborted)
- return (0);
-
- for (i = 0; i < DESC_LINES; i++) {
- bprintf("\1y\1hBBS Description (%d of %d): ", i + 1, DESC_LINES);
- if (!getstr(bbs->desc[i], 50, K_EDIT | K_AUTODEL | K_LINE))
- break;
- }
-
- return (1);
-}
-
-char partname(char *inname, char *inpart)
-{
- char name[128], part[128], str[256];
-
- strcpy(name, inname);
- strupr(name);
- strcpy(part, inpart);
- strupr(part);
- if (inname[0] && (strstr(name, part) || strstr(part, name))) {
- sprintf(str, "\r\nDo you mean %s", inname);
- if (yesno(str))
- return (1);
- }
- return (0);
-}
-
-int sortint_cmp(sortint_t * int1, sortint_t * int2)
-{
-
- if (int1->i > int2->i)
- return (-1);
- if (int1->i < int2->i)
- return (1);
- return (0);
-}
-
-int sortstr_cmp(sortstr_t * str1, sortstr_t * str2)
-{
- return (stricmp(str1->str, str2->str));
-}
-
-int main(int argc, char **argv)
-{
- char str[512], name[128], *p, ch;
- char *database = "sbl.dab";
- short i, j, file, done, sort_by_str;
- int maint = 0;
- long l, found;
- bbs_t bbs, tmpbbs;
- FILE *stream;
- sortstr_t *sortstr;
- sortint_t *sortint;
-
- for (i = 1; i < argc; i++)
- if (
-#ifndef __unix__
- argv[i][0] == '/' ||
-#endif
- argv[i][0] == '-') {
- switch (toupper(argv[i][1])) {
- case 'M':
- maint = 1;
- xsdk_mode &= ~XSDK_MODE_NOCONSOLE;
- break;
- case 'W':
- xsdk_mode &= ~XSDK_MODE_NOCONSOLE;
- break;
- }
- }
- else
- database = argv[i];
-
- p = getenv("SBBSNODE");
- if (p)
- strcpy(node_dir, p);
- else {
- printf("\nSBBSNODE environment variable must be set\n");
- exit(0);
- }
-
- if (node_dir[strlen(node_dir) - 1] != '\\' && node_dir[strlen(node_dir) - 1] != '/')
- strcat(node_dir, "/");
-
- strcpy(str, "sbl.cfg");
- if ((file = sopen(str, O_RDONLY, SH_DENYNO)) == -1) {
- printf("error opening %s\r\n", str);
- exit(1);
- }
- if ((stream = fdopen(file, "rb")) == NULL) {
- printf("fdopen error with %s\r\n", str);
- exit(1);
- }
- fgets(str, 81, stream);
- del_days = atoi(str);
- fgets(str, 81, stream);
- add_ml = atoi(str);
- fgets(str, 81, stream);
- update_ml = atoi(str);
- fgets(str, 81, stream);
- remove_ml = atoi(str);
- fgets(str, 81, stream);
- verify_ml = atoi(str);
- fgets(str, 81, stream);
- notify_user = atoi(str);
- fclose(stream);
-
- initdata();
- if (maint)
- client_socket = INVALID_SOCKET;
-
- mnehigh = HIGH | LIGHTGRAY;
- mnelow = HIGH | YELLOW;
- if (maint)
- user_misc = (ANSI | COLOR);
-
- if ((file = sopen(database, O_RDWR | O_BINARY | O_CREAT, SH_DENYNO, S_IREAD | S_IWRITE)) == -1) {
- bprintf("\r\n\7Error opening/creating %s\r\n", database);
- exit(1);
- }
- if ((stream = fdopen(file, "w+b")) == NULL) {
- bprintf("\r\n\7Error converting %s file handle to stream\r\n", database);
- exit(1);
- }
- setvbuf(stream, 0L, _IOFBF, 2048);
-
- if (del_days) {
- now = time(NULL);
- strcpy(str, "sblpurge.dab");
- if ((file = nopen(str, O_RDWR | O_CREAT)) == -1) {
- printf("Error creating %s\r\n", str);
- exit(1);
- }
- l = 0;
- read(file, &l, 4);
- if (now - l > (24L * 60L * 60L) || maint) { /* more than a day since
- * update */
- bputs("\r\n\1n\1hRunning daily maintenance for Synchronet BBS List...");
- lseek(file, 0L, SEEK_SET);
- write(file, &now, 4);
- close(file);
- fseek(stream, 0L, SEEK_SET);
- while (!feof(stream)) {
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (bbs.name[0]) {
- if ((now - bbs.updated) / (24L * 60L * 60L) > (time_t) del_days
- && (now - bbs.created) / (24L * 60L * 60L) > (time_t) del_days
- && (now - bbs.verified) / (24L * 60L * 60L) > (time_t) del_days) {
- lncntr = 0;
- bprintf("\r\n\1n\1hAuto-deleting \1m%s\r\n", bbs.name);
- if (!(bbs.misc & FROM_SMB)) {
- sprintf(str, "\1n\1hSBL: \1mYour BBS entry for \1y%s\1m\r\n"
- " was auto-deleted from the \1cSynchronet BBS "
- "List\r\n", bbs.name);
- i = usernumber(bbs.user);
- if (i)
- putsmsg(i, str);
- }
- bbs.name[0] = 0;
- fseek(stream, -(long)(sizeof(bbs_t)), SEEK_CUR);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- }
- else if (!(bbs.misc & FROM_SMB)) { /* Warn user */
- l = bbs.created;
- if (l < bbs.updated)
- l = bbs.updated;
- if (l < bbs.verified)
- l = bbs.verified;
- if ((now - l) / (24L * 60L * 60L) >= (time_t) (del_days / 2)) {
- bprintf("\r\n\1n\1hWarning \1y%s\r\n", bbs.user);
- lncntr = 0;
- sprintf(str, "\1n\1hSBL: \1mPlease verify your BBS "
- "entry for \1y%s\1m\r\n "
- "in the \1cSynchronet BBS List "
- "\1mor it will be deleted in \1i\1r%lu "
- "\1n\1h\1mdays.\r\n"
- ,bbs.name
- ,del_days - ((now - l) / (24L * 60L * 60L)));
- i = usernumber(bbs.user);
- if (i)
- putsmsg(i, str);
- }
- }
- }
- }
- }
- else
- close(file);
- }
-
- if (maint)
- return (0);
-
- strcpy(list_fmt, DEF_LIST_FMT);
- while (1) {
- aborted = 0;
- attr(LIGHTGRAY);
- cls();
- COMPILER_DESC(str);
- bprintf("\1n\1m\1hSynchronet \1wBBS List \1mv3.20 for %s\r\n (XSDK v%s %s %s) "
- "\r\n\r\n"
- ,PLATFORM_DESC
- ,xsdk_ver
- ,str
- ,__DATE__
- );
-
-#define SBL_INDENT " "
- sprintf(str, SBL_INDENT "~List all systems (condensed)\r\n"
- SBL_INDENT "~Change list format\r\n"
- SBL_INDENT "~Extended information on all systems\r\n"
- SBL_INDENT "~Turn screen pause %s\r\n"
- SBL_INDENT "~Find text in BBS entries\r\n"
- SBL_INDENT "~Generate sorted list\r\n"
- SBL_INDENT "~Display sorted list\r\n"
- SBL_INDENT "~New entry scan\r\n"
- SBL_INDENT "~Add a BBS entry\r\n"
- SBL_INDENT "~Update a BBS entry\r\n"
- SBL_INDENT "~Verify a BBS entry\r\n"
- SBL_INDENT "~Remove a BBS entry\r\n"
- SBL_INDENT "~Quit back to BBS\r\n"
- ,sbl_pause ? "OFF" : "ON");
- mnemonics(str);
- if (SYSOP)
- mnemonics(SBL_INDENT "~* Undelete entries\r\n");
-
- bputs("\r\n");
-
- l = filelength(fileno(stream));
- if (l > 0)
- bprintf(SBL_INDENT "\1n\1cThere are \1h%lu\1n\1c entries in the online BBS list "
- "database.\r\n", l / (long)sizeof(bbs_t));
-
- if (del_days) {
- bprintf(SBL_INDENT "\1n\1cEntries are auto-deleted \1h%u\1n\1c days after "
- "last update or verification.\r\n", del_days);
- bputs(SBL_INDENT "Users are encouraged to \1hV\1n\1cerify (vouch for) any listed "
- "systems they call.\r\n");
- }
-
- nodesync(); /* Display any waiting messages */
-
- bputs("\r\n" SBL_INDENT "\1y\1hWhich: \1w");
- switch (getkeys("CLGDEFSNAURTQV!*", 0)) {
- case '!':
- bprintf("\r\nsizeof(bbs_t)=%u\r\n", sizeof(bbs_t));
- bprintf("\r\noffsetof(verification_count=%x)\r\n", offsetof(bbs_t, verification_count));
- pause();
- break;
- case '*':
- cls();
- if (!SYSOP)
- break;
- fseek(stream, 0L, SEEK_SET);
- while (!feof(stream) && !aborted) {
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] && bbs.total_numbers > 0) {
- bbs.name[0] = '?';
- bbs.verified = time(NULL);
- sprintf(bbs.userverified, "%.25s", user_name);
- if (yesno(bbs.name)) {
- bprintf("\1n\1gFirst char: \1h");
- bbs.name[0] = getkey(0);
- bprintf("%s\r\n", bbs.name);
- fseek(stream, -(long)sizeof(bbs_t), SEEK_CUR);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- }
- }
- }
- break;
- case 'L':
- cls();
- fseek(stream, 0L, SEEK_SET);
- i = 0;
- while (!feof(stream) && !aborted) {
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] || bbs.total_numbers < 1)
- continue;
- i++;
- if (!short_bbs_info(bbs))
- break;
- if (!sbl_pause)
- lncntr = 0;
- }
- bprintf("\r\n\1n\1h%u systems listed.\r\n", i);
-#if 0
- if (kbhit())
- getch();
-#endif
- if (lncntr)
- pause();
- break;
- case 'C':
- cls();
- bputs("\1n\1c\1hList Format Specifier Definitions:\1n\r\n\r\n");
- bputs("\1h\1w(\1mN\1w) \1n\1mName of System\r\n");
- bputs("\1h\1w(\1mS\1w) \1n\1mSoftware Used\r\n");
- bputs("\1h\1w(\1mP\1w) \1n\1mPhone Number\r\n");
- bputs("\1h\1w(\1mB\1w) \1n\1mMaximum Connect Rate (in bps)\r\n");
- bputs("\1h\1w(\1mM\1w) \1n\1mModem Type\r\n");
- bputs("\1h\1w(\1mY\1w) \1n\1mSysop's Name\r\n");
- bputs("\1h\1w(\1mT\1w) \1n\1mTotal Number of Nodes\r\n");
- bputs("\1h\1w(\1mU\1w) \1n\1mTotal Number of Users\r\n");
- bputs("\1h\1w(\1mH\1w) \1n\1mTotal Storage Capacity (in megabytes)\r\n");
- bputs("\1h\1w(\1mL\1w) \1n\1mLocation (City, State)\r\n");
- bputs("\1h\1w(\1mF\1w) \1n\1mDate System was First Online\r\n");
- bputs("\1h\1w(\1mC\1w) \1n\1mDate Entry was Created\r\n");
- bputs("\1h\1w(\1mV\1w) \1n\1mDate Entry was Last Verified\r\n");
- bputs("\1h\1w(\1mD\1w) \1n\1mDate Entry was Last Updated\r\n");
- bprintf("\r\n\1n\1gDefault Format: \1h%s", DEF_LIST_FMT);
- bprintf("\r\n\1n\1gCurrent Format: \1h%s\r\n", list_fmt);
- bprintf("\r\n\1y\1hNew Format: ");
- if (getstr(tmp, 10, K_UPPER | K_LINE)) {
- if (!strchr(tmp, 'P') || !strchr(tmp, 'N')) {
- bputs("\r\n\1h\1mP\1n\1mhone and \1hN\1n\1mame specifiers "
- "must be present in format.\r\n\r\n");
- pause();
- }
- else
- strcpy(list_fmt, tmp);
- }
- break;
- case 'E':
- fseek(stream, 0L, SEEK_SET);
- while (!feof(stream) && !aborted) {
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] || bbs.total_numbers < 1)
- continue;
- i = long_bbs_info(bbs);
- if (bbs.name[0] && !i)
- break;
-#if VERIFICATION_MOD
- if (i == 2) {
- bbs.verification_count++;
- fseek(stream, -(int)sizeof(bbs_t), SEEK_CUR);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- fseek(stream, -(int)sizeof(bbs_t), SEEK_CUR);
- }
-#endif
- if (!sbl_pause)
- lncntr = 0;
- }
- break;
- case 'F': /* Find text */
- cls();
- bputs("\1y\1hText to search for: ");
- if (!getstr(name, 25, K_UPPER | K_LINE))
- break;
- ch = yesno("\r\nDisplay extended information");
-
- found = 0;
- bputs("\1n\1h\r\nSearching...\r\n\r\n");
- fseek(stream, 0L, SEEK_SET);
- while (!feof(stream) && !aborted) {
- if (!sbl_pause)
- lncntr = 0;
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] || bbs.total_numbers < 1)
- continue;
- tmpbbs = bbs;
- strupr(tmpbbs.name);
- strupr(tmpbbs.user);
- strupr(tmpbbs.software);
- strupr(tmpbbs.userverified);
- strupr(tmpbbs.userupdated);
- strupr(tmpbbs.web_url);
- for (i = 0; i < DESC_LINES; i++) {
- strupr(tmpbbs.desc[i]);
- if (strstr(tmpbbs.desc[i], name))
- break;
- }
- if (i < DESC_LINES
- || strstr(tmpbbs.name, name)
- || strstr(tmpbbs.user, name)
- || strstr(tmpbbs.software, name)
- || strstr(tmpbbs.userverified, name)
- || strstr(tmpbbs.userupdated, name)
- || strstr(tmpbbs.web_url, name)
- ) {
- found++;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- continue;
- }
-
- for (i = 0; i < tmpbbs.total_sysops; i++) {
- strupr(tmpbbs.sysop[i]);
- if (strstr(tmpbbs.sysop[i], name))
- break;
- }
- if (i < tmpbbs.total_sysops) {
- found++;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- continue;
- }
-
- for (i = 0; i < tmpbbs.total_networks; i++) {
- strupr(tmpbbs.network[i]);
- strupr(tmpbbs.address[i]);
- if (strstr(tmpbbs.network[i], name)
- || strstr(tmpbbs.address[i], name))
- break;
- }
- if (i < tmpbbs.total_networks) {
- found++;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- continue;
- }
-
- for (i = 0; i < tmpbbs.total_terminals; i++) {
- strupr(tmpbbs.terminal[i]);
- if (strstr(tmpbbs.terminal[i], name))
- break;
- }
- if (i < tmpbbs.total_terminals) {
- found++;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- continue;
- }
-
- for (i = 0; i < tmpbbs.total_numbers; i++) {
- strupr(tmpbbs.number[i].modem.number);
- strupr(tmpbbs.number[i].modem.desc);
- strupr(tmpbbs.number[i].modem.location);
- if (strstr(tmpbbs.number[i].modem.number, name)
- || strstr(tmpbbs.number[i].modem.desc, name)
- || strstr(tmpbbs.number[i].modem.location, name))
- break;
- }
- if (i < tmpbbs.total_numbers) {
- found++;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- continue;
- }
- }
- if (!ch || !found) {
- CRLF;
-#if 0
- if (kbhit())
- getch();
-#endif
- if (found)
- bprintf("\1n\1h%u systems listed.\r\n", found);
- pause();
- }
- break;
- case 'G': /* Generated sorted list */
- cls();
- if (!filelength(fileno(stream))) {
- bprintf("No BBS list exists.\r\n");
- pause();
- break;
- }
- bputs("\1n\1c\1hSort Options:\1n\r\n\r\n");
- bputs("\1h\1w(\1mN\1w) \1n\1mName of System\r\n");
- bputs("\1h\1w(\1mS\1w) \1n\1mSoftware Used\r\n");
- bputs("\1h\1w(\1mP\1w) \1n\1mPhone Number\r\n");
- bputs("\1h\1w(\1mB\1w) \1n\1mMaximum Connect Rate (in bps)\r\n");
- bputs("\1h\1w(\1mM\1w) \1n\1mModem Type\r\n");
- bputs("\1h\1w(\1mY\1w) \1n\1mSysop's Name\r\n");
- bputs("\1h\1w(\1mT\1w) \1n\1mTotal Number of Nodes\r\n");
- bputs("\1h\1w(\1mU\1w) \1n\1mTotal Number of Users\r\n");
- bputs("\1h\1w(\1mH\1w) \1n\1mTotal Storage Capacity (in megabytes)\r\n");
- bputs("\1h\1w(\1mL\1w) \1n\1mLocation (City, State)\r\n");
- bputs("\1h\1w(\1mF\1w) \1n\1mDate System was First Online\r\n");
- bputs("\1h\1w(\1mC\1w) \1n\1mDate Entry was Created\r\n");
- bputs("\1h\1w(\1mV\1w) \1n\1mDate Entry was Last Verified\r\n");
- bputs("\1h\1w(\1mD\1w) \1n\1mDate Entry was Last Updated\r\n");
- bprintf("\r\n\1y\1hSort by (\1wQ\1y=Quit): \1w");
- ch = getkeys("NSPBMYTUHLFCVDQ", 0);
- if (!ch || ch == 'Q')
- break;
- cls();
- bputs("\1n\1hSorting... \1m");
- fseek(stream, 0L, SEEK_SET);
- i = j = done = 0;
- sort_by_str = 0;
- sortstr = NULL;
- sortint = NULL;
- while (!feof(stream) && !done) {
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- j++;
- bprintf("\b\b\b\b%4u", j);
- if (!bbs.name[0]) /* don't sort deleted
- * entries */
- continue;
- if (bbs.total_numbers < 1) /* don't sort corrupted
- * entries */
- continue;
- i++;
- switch (ch) {
- case 'N':
- sprintf(str, "%.30s", bbs.name);
- sort_by_str = 1;
- break;
- case 'S':
- sprintf(str, "%.30s", bbs.software);
- sort_by_str = 1;
- break;
- case 'P':
- sprintf(str, "%.30s", bbs.number[0].modem.number);
- sort_by_str = 1;
- break;
- case 'M':
- sprintf(str, "%.30s", bbs.number[0].modem.desc);
- sort_by_str = 1;
- break;
- case 'Y':
- sprintf(str, "%.30s", bbs.sysop[0]);
- sort_by_str = 1;
- break;
- case 'L':
- sprintf(str, "%.30s", bbs.number[0].modem.location);
- sort_by_str = 1;
- break;
- case 'B':
- l = bbs.number[0].modem.max_rate;
- break;
- case 'T':
- l = bbs.nodes;
- break;
- case 'U':
- l = bbs.users;
- break;
- case 'H':
- l = bbs.megs;
- break;
- case 'F':
- l = bbs.birth;
- break;
- case 'C':
- l = bbs.created;
- break;
- case 'V':
- l = bbs.verified;
- break;
- case 'D':
- l = bbs.updated;
- break;
- }
- if (sort_by_str) {
- if ((sortstr = (sortstr_t *) realloc(sortstr
- ,sizeof(sortstr_t) * i)) == NULL) {
- bprintf("\r\n\7Memory allocation error\r\n");
- free(sortstr);
- done = 1;
- continue;
- }
- strcpy(sortstr[i - 1].str, str);
- sortstr[i - 1].offset = j - 1;
- }
- else {
- if ((sortint = (sortint_t *) realloc(sortint
- ,sizeof(sortint_t) * i)) == NULL) {
- bprintf("\r\n\7Memory allocation error\r\n");
- free(sortint);
- done = 1;
- continue;
- }
- sortint[i - 1].i = l;
- sortint[i - 1].offset = j - 1;
- }
- }
-
- if (done) {
- pause();
- break;
- }
-
- if (sort_by_str)
- qsort((void *)sortstr, i, sizeof(sortstr[0])
- ,(int (*) (const void *, const void *))sortstr_cmp);
- else
- qsort((void *)sortint, i, sizeof(sortint[0])
- ,(int (*) (const void *, const void *))sortint_cmp);
-
- bprintf("\r\n\r\n\1h\1gCreating index...");
- sprintf(str, "sort_%03d.ndx", node_num);
- if ((file = nopen(str, O_WRONLY | O_CREAT | O_TRUNC)) == -1) {
- bprintf("\r\n\7Error creating %s\r\n", str);
- if (sort_by_str)
- free(sortstr);
- else
- free(sortint);
- pause();
- break;
- }
- for (j = 0; j < i; j++)
- if (sort_by_str)
- write(file, &sortstr[j].offset, 2);
- else
- write(file, &sortint[j].offset, 2);
- close(file);
- if (sort_by_str)
- free(sortstr);
- else
- free(sortint);
- bputs("\r\n\r\n\1n\1hDone.\r\n");
- pause();
- break;
- case 'D':
- cls();
- sprintf(str, "sort_%03d.ndx", node_num);
- if ((file = nopen(str, O_RDONLY)) == -1) {
- bputs("\1n\1r\1hSorted list not generated.\r\n");
- pause();
- }
- ch = yesno("Display extended information");
- cls();
- while ( /* !eof(file) && not on unix */ !aborted) {
- if (read(file, &i, 2) != 2)
- break;
- fseek(stream, (long)i * sizeof(bbs_t), SEEK_SET);
- if (!sbl_pause)
- lncntr = 0;
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] || bbs.total_numbers < 1)
- continue;
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- }
- close(file);
-#if 0
- if (kbhit())
- getch();
-#endif
- if (lncntr)
- pause();
- break;
- case 'N': /* New (updated) entry scan */
- cls();
- bputs("\1y\1hLast update (MM/DD/YY): ");
- if (!getstr(str, 8, K_UPPER | K_LINE))
- break;
- l = dstrtounix(str);
- ch = yesno("\r\nDisplay extended information");
- found = 0;
- bputs("\1n\1h\r\nSearching...\r\n\r\n");
- fseek(stream, 0L, SEEK_SET);
- while (!feof(stream) && !aborted) {
- if (!sbl_pause)
- lncntr = 0;
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!bbs.name[0] || bbs.total_numbers < 1)
- continue;
- if (bbs.updated >= l || bbs.created >= l) {
- if (ch && !long_bbs_info(bbs))
- break;
- if (!ch && !short_bbs_info(bbs))
- break;
- found++;
- continue;
- }
- }
- if (!ch || !found) {
- CRLF;
- pause();
- }
- break;
- case 'A':
- cls();
- if ((uint) user_level < add_ml) {
- bprintf("\1h\1rYou have insufficient access.\r\n\r\n");
- pause();
- break;
- }
- bputs("\1g\1hAdding a BBS entry:\1n\r\n\r\n");
- bputs("\1n\1gHit ENTER for unknown data items.\r\n\r\n");
- memset(&bbs, 0, sizeof(bbs_t));
- if (!get_bbs_info(&bbs))
- break;
- bputs("\1n\1h\r\nSearching for duplicates...");
- fseek(stream, 0L, SEEK_SET);
- i = 0;
- dots(0);
- while (!feof(stream) && !i) {
- dots(1);
- if (!fread(&tmpbbs, sizeof(bbs_t), 1, stream))
- break;
- if (!stricmp(tmpbbs.name, bbs.name))
- i = 1;
- }
- if (i) {
- bprintf("\7\1n\1h\1r\1i\r\n\r\n%s \1n\1h\1ralready exists!"
- "\r\n\r\n"
- ,bbs.name);
- pause();
- break;
- }
-
- bputs("\1n\1h\r\nSaving...");
- fseek(stream, 0L, SEEK_SET);
- dots(0);
- while (!feof(stream)) {
- dots(1);
- if (!fread(&ch, 1, 1, stream))
- break;
- if (!ch) { /* first byte is null */
- fseek(stream, -1L, SEEK_CUR);
- break;
- }
- fseek(stream, (long)sizeof(bbs_t) - 1L, SEEK_CUR);
- }
- bbs.created = time(NULL);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- if (notify_user && notify_user != user_number) {
- sprintf(str, "\1n\1hSBL: \1y%s \1madded \1c%s\1m "
- "to the BBS List\r\n", user_name, bbs.name);
- putsmsg(notify_user, str);
- }
- break;
- case 'R': /* Remove an entry */
- cls();
- if ((uint) user_level < remove_ml) {
- bprintf("\1h\1rYou have insufficient access.\r\n\r\n");
- pause();
- break;
- }
- bprintf("\1y\1hRemove which system: ");
- if (!getstr(name, 25, K_LINE | K_UPPER))
- break;
- bputs("\1n\1h\r\nSearching...");
- fseek(stream, 0L, SEEK_SET);
- found = 0;
- dots(0);
- while (!feof(stream) && !aborted) {
- dots(1);
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!stricmp(bbs.name, name) || partname(bbs.name, name)) {
- found = 1;
- for (i = 0; i < bbs.total_sysops && i < MAX_SYSOPS; i++)
- if (!stricmp(bbs.sysop[i], user_name))
- break;
- if (SYSOP || !stricmp(bbs.user, user_name)
- || i < bbs.total_sysops) {
- fseek(stream, -(long)(sizeof(bbs_t)), SEEK_CUR);
- strcpy(tmp, bbs.name);
- bbs.name[0] = 0;
- bbs.updated = time(NULL);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- bprintf("\r\n\r\n\1m%s\1c deleted."
- ,tmp);
- if (notify_user && notify_user != user_number) {
- sprintf(str, "\1n\1hSBL: \1y%s \1mremoved \1c%s\1m "
- "from the BBS List\r\n", user_name, tmp);
- putsmsg(notify_user, str);
- }
- }
- else
- bprintf("\r\n\r\n\1rYou did not create \1m%s\1n."
- ,bbs.name);
- break;
- }
- }
- if (!found)
- bprintf("\r\n\r\n\1m%s\1c not found.", name);
- CRLF;
- CRLF;
- pause();
- break;
- case 'T':
- sbl_pause = !sbl_pause;
- break;
- case 'V': /* Verify an entry */
- cls();
- if ((uint) user_level < verify_ml) {
- bprintf("\1h\1rYou have insufficient access.\r\n\r\n");
- pause();
- break;
- }
- bprintf("\1y\1hVerify which system: ");
- if (!getstr(name, 25, K_LINE | K_UPPER))
- break;
- bputs("\1n\1h\r\nSearching...");
- fseek(stream, 0L, SEEK_SET);
- found = 0;
- dots(0);
- while (!feof(stream) && !aborted) {
- dots(1);
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!stricmp(bbs.name, name) || partname(bbs.name, name)) {
- found = 1;
- bbs.verified = time(NULL);
- sprintf(bbs.userverified, "%.25s", user_name);
- fseek(stream, -(long)(sizeof(bbs_t)), SEEK_CUR);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- bprintf("\r\n\r\n\1m%s\1c verified. \1r\1h\1iThank you!"
- ,bbs.name);
- sprintf(str, "\1n\1hSBL: \1y%s \1mverified \1c%s\1m "
- "in the BBS List\r\n", user_name, bbs.name);
- if (notify_user && notify_user != user_number)
- putsmsg(notify_user, str);
- if (stricmp(bbs.user, user_name)) {
- i = usernumber(bbs.user);
- if (i && i != (int)user_number)
- putsmsg(i, str);
- }
- break;
- }
- }
- if (!found)
- bprintf("\r\n\r\n\1m%s\1c not found.", name);
- CRLF;
- CRLF;
- pause();
- break;
- case 'U': /* Update an entry */
- cls();
- if ((uint) user_level < update_ml) {
- bprintf("\1h\1rYou have insufficient access.\r\n\r\n");
- pause();
- break;
- }
- bprintf("\1y\1hUpdate which system: ");
- if (!getstr(name, 25, K_LINE | K_UPPER))
- break;
- bputs("\1n\1h\r\nSearching...");
- fseek(stream, 0L, SEEK_SET);
- found = 0;
- dots(0);
- while (!feof(stream) && !aborted) {
- dots(1);
- l = ftell(stream);
- if (!fread(&bbs, sizeof(bbs_t), 1, stream))
- break;
- if (!stricmp(bbs.name, name) || partname(bbs.name, name)) {
- found = 1;
- break;
- }
- }
- if (found) {
- for (i = 0; i < bbs.total_sysops && i < MAX_SYSOPS; i++)
- if (!bbs.sysop[i][0] || !stricmp(bbs.sysop[i], user_name))
- break;
- if (SYSOP || !stricmp(bbs.user, user_name)
- || i < bbs.total_sysops) {
- CRLF;
- CRLF;
- if (get_bbs_info(&bbs)) {
- bbs.misc &= ~FROM_SMB;
- bbs.updated = time(NULL);
- sprintf(bbs.userupdated, "%.25s", user_name);
- fseek(stream, l, SEEK_SET);
- fwrite(&bbs, sizeof(bbs_t), 1, stream);
- fflush(stream);
- bprintf("\r\n\1h\1m%s\1c updated.", bbs.name);
- if (notify_user && notify_user != user_number) {
- sprintf(str, "\1n\1hSBL: \1y%s \1mupdated \1c%s\1m "
- "in the BBS List\r\n", user_name, bbs.name);
- putsmsg(notify_user, str);
- }
- }
- }
- else
- bprintf("\r\n\r\n\1h\1rYou did not create \1m%s\1n."
- ,bbs.name);
- }
- else
- bprintf("\r\n\r\n\1h\1m%s\1c not found.", name);
- CRLF;
- CRLF;
- pause();
- break;
- case 'Q':
- return (0);
- }
- }
- return (-1);
-}
-
-/* End of SBL.C */
diff --git a/xtrn/sbl/sbl.cfg b/xtrn/sbl/sbl.cfg
deleted file mode 100644
index 32aceba935d8b29f554121da667024cb15d2c4ec..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.cfg
+++ /dev/null
@@ -1,6 +0,0 @@
-30 Days to keep non-updated entries
-50 Minimum security level to add
-50 Minimum security level to update
-50 Minimum security level to remove
-10 Minimum security level to verify
-1 User to notify of changes (0=none)
diff --git a/xtrn/sbl/sbl.doc b/xtrn/sbl/sbl.doc
deleted file mode 100644
index 1d89b4eeb770f5be956385484aa9de2e61376aa8..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.doc
+++ /dev/null
@@ -1,96 +0,0 @@
-Synchronet BBS List v3.20 (native 32-bit for Win32 and Unix)
-=========================
-
-Create the directory: SBL off of your Synchronet XTRN directory.
-(Example: C:\SBBS\XTRN\SBL)
-
-Make sure SBL.CFG are is this directory.
-
-Use an ASCII editor to edit the Synchronet BBS List config file (SBL.CFG) to
-your liking.
-
-Under SCFG->External Programs->Online Programs->Main, hit INS (if it doesn't
-already exist) and add Synchronet BBS List with the following configuration:
-
-Name Synchronet BBS List
-Internal Code SBL
-Start-up Directory ..\xtrn\sbl
-Command Line sbl%.
-Clean-up Command Line
-Execution Cost None
-Access Requirements
-Execution Requirements
-Multiple Concurrent Users Yes
-Intercept Standard I/O No
-Native (32-bit) Executable Yes
-Use Shell to Execute No
-Modify User Data No
-Execute on Event No
-BBS Drop File Type Synchronet XTRN.DAT
-Place Drop File In Node Directory
-
-SBL Utilities
-=============
-
-SBLPACK Remove deleted entries to save disk space and speed up listings
-
-Networking the Synchronet BBS List
-==================================
-
-If you wish to link your SBL database with other Synchronet BBSes, you must
-carry the Synchronet Data echo via DOVE-Net, FidoNet, or RIME and add
-the following two events in SCFG->External Programs->Timed Events:
-
-Internal Code SMB2SBL
-Start-up Directory ..\xtrn\sbl
-Command Line smb2sbl%. %jsubs\syncdata sbl.dab
-Execution Node 1
-Execution Days of Month Any
-Execution Days of Week All
-Execution Time 00:00
-Requires Exclusive Execution No
-Force Users Off-line For Event No
-Native (32-bit) Executable Yes
-Use Shell to Execute No
-Background Execution No
-
-Internal Code SBL2SMB
-Start-up Directory ..\xtrn\sbl
-Command Line sbl2smb%. sbl.dab %jsubs\syncdata
-Execution Node 11
-Execution Days of Month Any
-Execution Days of Week All
-Execution Time 00:00
-Requires Exclusive Execution No
-Force Users Off-line For Event No
-Native (32-bit) Executable Yes
-Use Shell to Execute No
-Background Execution No
-
-Change "SYNCDATA" to the internal code of the Synchronet Data sub-board on
-your BBS. We used SYNCDATA, since that is the example given in the Synchronet
-manual for the DOVE-Net Synchronet Data sub-board internal code. It is okay
-if you used a completely different internal code, as long as you specify that
-code instead of "SYNCDATA" on the above command lines.
-
-Make note that all networked SBL entries will be deleted from Vertrauen
-(Home of the Synchronet BBS List) after 90 days unless the entry is
-retransmitted in the message base or updated manually on Vertrauen in that
-time. To cause a retransmission from your BBS, you must (U)pdate the entry
-using SBL and then SBL2SMB will re-export it automatically next time it is run
-(via Timed Event). (V)erified entries are not re-exported by SBL2SMB, only new
-and updated entries. You can also create a BBS entry message by hand (not
-using SBL). Download SBBSLIST.ZIP from Vertrauen for more details.
-
-Source Code
-===========
-
-If you are a C programmer, you may find the included source code interesting
-and/or useful as an example for writing your own XSDK and/or SMB utilities.
-
-Makefile is for use with Borland C++ or C++Builder and the Synchronet XSDK
-to create SBL.EXE. GNUmakefile is for use with the GNU C Compiler.
-And sbl.dsp is for use with Microsoft Visual C++ v6.0.
-
-/* End of SBL.DOC */
-
\ No newline at end of file
diff --git a/xtrn/sbl/sbl.dsp b/xtrn/sbl/sbl.dsp
deleted file mode 100644
index f697b91ee4a32d449ea6996c27a0009011678b86..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl.dsp
+++ /dev/null
@@ -1,106 +0,0 @@
-# Microsoft Developer Studio Project File - Name="sbl" - Package Owner=<4>
-# Microsoft Developer Studio Generated Build File, Format Version 6.00
-# ** DO NOT EDIT **
-
-# TARGTYPE "Win32 (x86) Console Application" 0x0103
-
-CFG=sbl - Win32 Debug
-!MESSAGE This is not a valid makefile. To build this project using NMAKE,
-!MESSAGE use the Export Makefile command and run
-!MESSAGE
-!MESSAGE NMAKE /f "sbl.mak".
-!MESSAGE
-!MESSAGE You can specify a configuration when running NMAKE
-!MESSAGE by defining the macro CFG on the command line. For example:
-!MESSAGE
-!MESSAGE NMAKE /f "sbl.mak" CFG="sbl - Win32 Debug"
-!MESSAGE
-!MESSAGE Possible choices for configuration are:
-!MESSAGE
-!MESSAGE "sbl - Win32 Release" (based on "Win32 (x86) Console Application")
-!MESSAGE "sbl - Win32 Debug" (based on "Win32 (x86) Console Application")
-!MESSAGE
-
-# Begin Project
-# PROP AllowPerConfigDependencies 0
-# PROP Scc_ProjName ""
-# PROP Scc_LocalPath ""
-CPP=cl.exe
-RSC=rc.exe
-
-!IF "$(CFG)" == "sbl - Win32 Release"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 0
-# PROP BASE Output_Dir "sbl___Win32_Release"
-# PROP BASE Intermediate_Dir "sbl___Win32_Release"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 0
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.release"
-# PROP Ignore_Export_Lib 0
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD CPP /nologo /MT /W3 /GX /O2 /I "..\sdk" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD BASE RSC /l 0x409 /d "NDEBUG"
-# ADD RSC /l 0x409 /d "NDEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib wsock32.lib /nologo /subsystem:console /machine:I386
-
-!ELSEIF "$(CFG)" == "sbl - Win32 Debug"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 1
-# PROP BASE Output_Dir "sbl___Win32_Debug"
-# PROP BASE Intermediate_Dir "sbl___Win32_Debug"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 1
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.debug"
-# PROP Ignore_Export_Lib 0
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD CPP /nologo /MTd /W3 /Gm /GX /ZI /Od /I "..\sdk" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD BASE RSC /l 0x409 /d "_DEBUG"
-# ADD RSC /l 0x409 /d "_DEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib wsock32.lib /nologo /subsystem:console /map /debug /machine:I386 /pdbtype:sept
-
-!ENDIF
-
-# Begin Target
-
-# Name "sbl - Win32 Release"
-# Name "sbl - Win32 Debug"
-# Begin Source File
-
-SOURCE=.\sbl.c
-# End Source File
-# Begin Source File
-
-SOURCE=.\sbldefs.h
-# End Source File
-# Begin Source File
-
-SOURCE=..\Sdk\xsdk.c
-# End Source File
-# Begin Source File
-
-SOURCE=..\Sdk\xsdkvars.c
-# End Source File
-# Begin Source File
-
-SOURCE=..\sdk\xsdkwrap.c
-# End Source File
-# End Target
-# End Project
diff --git a/xtrn/sbl/sbl2smb b/xtrn/sbl/sbl2smb
deleted file mode 100755
index e7cb7a22369d1d2bff3a456259c95e2d31c020cf..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl2smb
+++ /dev/null
@@ -1,2 +0,0 @@
-#!/bin/sh
-. ${SBBSEXEC}unixstub.sh
diff --git a/xtrn/sbl/sbl2smb.c b/xtrn/sbl/sbl2smb.c
deleted file mode 100644
index 287b8c466e784c8931b35d1e71c064980d19d023..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl2smb.c
+++ /dev/null
@@ -1,378 +0,0 @@
-/* sbl2smb.c */
-
-/* Scans SBL database and posts any additions/updates into the an SMB base */
-
-/* $Id: sbl2smb.c,v 1.14 2019/08/06 17:06:32 deuce Exp $ */
-
-/****************************************************************************
- * @format.tab-size 4 (Plain Text/Source Code File Header) *
- * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
- * *
- * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html *
- * *
- * This program is free software; you can redistribute it and/or *
- * modify it under the terms of the GNU General Public License *
- * as published by the Free Software Foundation; either version 2 *
- * of the License, or (at your option) any later version. *
- * See the GNU General Public License for more details: gpl.txt or *
- * http://www.fsf.org/copyleft/gpl.html *
- * *
- * Anonymous FTP access to the most recent released source is available at *
- * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
- * *
- * Anonymous CVS access to the development source and modification history *
- * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login *
- * (just hit return, no password is necessary) *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout xtrn *
- * *
- * For Synchronet coding style and modification guidelines, see *
- * http://www.synchro.net/source.html *
- * *
- * You are encouraged to submit any modifications (preferably in Unix diff *
- * format) via e-mail to mods@synchro.net *
- * *
- * Note: If this box doesn't appear square, then you need to fix your tabs. *
- ****************************************************************************/
-
-#ifdef _WIN32
- #include <windows.h>
- #include <io.h> /* access */
- #include <share.h>
-#endif
-
-#include <time.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <fcntl.h>
-#include <sys/stat.h>
-
-#include "md5.h"
-#include "genwrap.h"
-#include "filewrap.h"
-#include "dirwrap.h"
-#include "sbbsdefs.h"
-#include "smblib.h"
-#include "sbldefs.h"
-
-smb_t smb;
-char revision[16];
-
-/****************************************************************************/
-/* Converts unix time format (long - time_t) into a char str MM/DD/YY */
-/****************************************************************************/
-char* unixtodstr(time_t unix_time, char *str)
-{
- struct tm* tm;
-
- if(!unix_time)
- strcpy(str,"00/00/00");
- else {
- tm=gmtime(&unix_time);
- if(tm==NULL) {
- strcpy(str,"00/00/00");
- return(str);
- }
- if(tm->tm_mon>11) { /* DOS leap year bug */
- tm->tm_mon=0;
- tm->tm_year++; }
- if(tm->tm_mday>31)
- tm->tm_mday=1;
- sprintf(str,"%02u/%02u/%02u",tm->tm_mday,tm->tm_mon+1
- ,TM_YEAR(tm->tm_year));
- }
- return(str);
-}
-
-
-
-#define BUF_LEN (32*1024)
-
-int main(int argc, char **argv)
-{
- uchar str[128],tmp[128],*buf,*p,software[128];
- int i,file;
- ushort xlat;
- long length;
- ulong offset;
- time_t last,now;
- bbs_t bbs;
- smbmsg_t msg;
- FILE *stream;
-
- sscanf("$Revision: 1.14 $" + 11, "%s", revision);
-
- fprintf(stderr,"\nSBL2SMB v2.%s-%s - Write SBL to SMB - Coyright 2002 "
- "Rob Swindell\n\n",revision,PLATFORM_DESC);
- if(argc<3) {
- fprintf(stderr,"usage: sbl2smb <sbl.dab> <smb_file> [/s:software]\n\n");
- fprintf(stderr,"ex: sbl2smb /sbbs/xtrn/sbl/sbl.dab "
- "/sbbs/data/subs/syncdata\n");
- return(1);
- }
-
- if((buf = malloc(BUF_LEN)) == NULL) {
- fprintf(stderr,"!malloc failure\n");
- return(2);
- }
- now=time(NULL);
-
- software[0]=0;
- if(argc>3 && !strnicmp(argv[3],"/S:",3))
- SAFECOPY(software,argv[3]+3);
-
- SAFECOPY(smb.file,argv[2]);
-
- SAFECOPY(str,argv[1]);
- if((file=sopen(str,O_RDWR|O_BINARY,SH_DENYNO))==-1) {
- printf("error opening %s\n",str);
- return(1); }
- if((stream=fdopen(file,"rb"))==NULL) {
- printf("error fdopening %s\n",str);
- return(1); }
- strcpy(tmp,str);
- p=strrchr(tmp,'.');
- if(p) {
- (*p)=0;
- strcat(tmp,"2smb.dab");
- if((file=open(tmp,O_RDWR|O_BINARY|O_CREAT,S_IWRITE|S_IREAD))==-1) {
- printf("error opening %s\n",str);
- return(1); }
- if(read(file,&last,sizeof(time_t))!=sizeof(time_t))
- last=0;
- lseek(file,0L,SEEK_SET);
- write(file,&now,sizeof(now));
- close(file); }
-
- sprintf(str,"%s.shd",smb.file);
- if(!fexist(str)) {
- printf("%s doesn't exist\n",smb.file);
- return(0); }
- fprintf(stderr,"Opening %s\n",smb.file);
- smb.retry_time=30;
- if((i=smb_open(&smb))!=0) {
- printf("smb_open returned %d\n",i);
- return(1); }
- i=smb_locksmbhdr(&smb);
- if(i) {
- printf("smb_locksmbhdr returned %d\n",i);
- return(1); }
- i=smb_getstatus(&smb);
- smb_unlocksmbhdr(&smb);
- if(i) {
- printf("smb_getstatus returned %d\n",i);
- return(1); }
-
- while(!feof(stream)) {
- if(!fread(&bbs,sizeof(bbs_t),1,stream))
- break;
- if(bbs.total_numbers<1 /* corrupted? */
- || bbs.total_numbers>MAX_NUMBERS)
- continue;
- truncsp(bbs.name);
- if(bbs.name[0]<=' ' /* corrupted? */
- || bbs.misc&FROM_SMB
- || (bbs.updated<last && bbs.created<last
- && bbs.verified<last))
- continue;
- if(software[0] && strnicmp(software,bbs.software,strlen(software)))
- continue;
-
- truncsp(bbs.user);
- if(bbs.user[0]<=' ') /* corrupted? */
- continue;
- truncsp(bbs.software);
- if(bbs.software[0]<=' ') /* corrupted? */
- continue;
-
- printf("%s\r\n",bbs.name);
- memset(buf,0,BUF_LEN);
-
- sprintf(str,"%-15.15s%s\r\n"
- ,"Name:",bbs.name);
- strcat(buf,str);
-
- sprintf(str,"%-15.15s%s\r\n"
- ,"Birth:",unixtodstr(bbs.birth,tmp));
- strcat(buf,str);
-
- sprintf(str,"%-15.15s%s\r\n"
- ,"Software:",bbs.software);
- strcat(buf,str);
-
- for(i=0;i<bbs.total_sysops;i++) {
- truncsp(bbs.sysop[i]);
- sprintf(str,"%-15.15s%s\r\n"
- ,"Sysop:",bbs.sysop[i]);
- strcat(buf,str); }
-
- strcat(buf,"\r\n");
-
- truncsp(bbs.sysop_email);
- if(bbs.sysop_email[0]) {
- sprintf(str,"%-15.15s%s\r\n"
- ,"E-mail:",bbs.sysop_email);
- strcat(buf,str);
- }
-
- truncsp(bbs.web_url);
- if(bbs.web_url[0]) {
- sprintf(str,"%-15.15s%s\r\n"
- ,"Web-site:",bbs.web_url);
- strcat(buf,str);
- }
-
- strcat(buf,"\r\n");
-
- for(i=0;i<bbs.total_numbers;i++) {
- truncsp(bbs.number[i].modem.number);
- sprintf(str,"%-15.15s%s\r\n"
- ,"Number:",bbs.number[i].modem.number);
- strcat(buf,str);
-
- sprintf(str,"%-15.15s%u\r\n"
- ,"MinRate:",bbs.number[i].modem.min_rate);
- strcat(buf,str);
-
- sprintf(str,"%-15.15s%u\r\n"
- ,"MaxRate:",bbs.number[i].modem.max_rate);
- strcat(buf,str);
-
- if(bbs.number[i].modem.min_rate!=0xffff) {
-
- sprintf(str,"%-15.15s%s\r\n"
- ,"Modem:",bbs.number[i].modem.desc);
- strcat(buf,str);
- }
- truncsp(bbs.number[i].modem.location);
- sprintf(str,"%-15.15s%s\r\n"
- ,"Location:",bbs.number[i].modem.location);
- strcat(buf,str);
- if(i+1<bbs.total_numbers)
- strcat(buf,"\r\n"); }
-
- if(bbs.total_networks)
- strcat(buf,"\r\n");
- for(i=0;i<bbs.total_networks;i++) {
- sprintf(str,"%-15.15s%s\r\n"
- ,"Network:",bbs.network[i]);
- strcat(buf,str);
- sprintf(str,"%-15.15s%s\r\n"
- ,"Address:",bbs.address[i]);
- strcat(buf,str);
- if(i+1<bbs.total_networks)
- strcat(buf,"\r\n"); }
-
- strcat(buf,"\r\n");
- for(i=0;i<bbs.total_terminals;i++) {
- sprintf(str,"%-15.15s%s\r\n"
- ,"Terminal:",bbs.terminal[i]);
- strcat(buf,str); }
-
- strcat(buf,"\r\n");
- sprintf(str,"%-15.15s%lu\r\n"
- ,"Megs:",bbs.megs);
- strcat(buf,str);
- sprintf(str,"%-15.15s%lu\r\n"
- ,"Msgs:",bbs.msgs);
- strcat(buf,str);
- sprintf(str,"%-15.15s%lu\r\n"
- ,"Files:",bbs.files);
- strcat(buf,str);
- sprintf(str,"%-15.15s%u\r\n"
- ,"Nodes:",bbs.nodes);
- strcat(buf,str);
- sprintf(str,"%-15.15s%u\r\n"
- ,"Users:",bbs.users);
- strcat(buf,str);
- sprintf(str,"%-15.15s%u\r\n"
- ,"Subs:",bbs.subs);
- strcat(buf,str);
- sprintf(str,"%-15.15s%u\r\n"
- ,"Dirs:",bbs.dirs);
- strcat(buf,str);
- sprintf(str,"%-15.15s%u\r\n"
- ,"Xtrns:",bbs.xtrns);
- strcat(buf,str);
-
- if(bbs.desc[0][0])
- strcat(buf,"\r\n");
- for(i=0;i<5;i++) {
- if(!bbs.desc[i][0])
- break;
- sprintf(str,"%-15.15s%s\r\n"
- ,"Desc:",bbs.desc[i]);
- strcat(buf,str); }
-
- sprintf(buf+strlen(buf),"\r\n--- SBL2SMB 2.%s-%s",revision,PLATFORM_DESC);
-
- length=strlen(buf); /* +2 for translation string */
-
- if(smb.status.attr&SMB_HYPERALLOC)
- offset=smb_hallocdat(&smb);
- else {
- i=smb_open_da(&smb);
- if(i) {
- printf("smb_open_da returned %d\n",i);
- exit(1); }
- offset=smb_allocdat(&smb,length+2,1);
- fclose(smb.sda_fp); }
-
- fseek(smb.sdt_fp,offset,SEEK_SET);
- xlat=XLAT_NONE;
- fwrite(&xlat,2,1,smb.sdt_fp);
- fwrite(buf,length,1,smb.sdt_fp);
- length+=2;
-
- memset(&msg,0,sizeof(smbmsg_t));
- memcpy(msg.hdr.msghdr_id,"SHD\x1a",4);
- msg.hdr.version=smb_ver();
- msg.hdr.when_written.time=now;
- msg.hdr.when_imported.time=now;
-
- msg.hdr.offset=offset;
-
- strcpy(str,"SBL");
- i=smb_hfield(&msg,RECIPIENT,(ushort)strlen(str),str);
- if(i) {
- printf("smb_hfield returned %d\n",i);
- smb_freemsgdat(&smb,offset,length,1);
- exit(1); }
- strlwr(str);
- msg.idx.to=crc16(str);
-
- strcpy(str,bbs.user);
- i=smb_hfield(&msg,SENDER,(ushort)strlen(str),str);
- if(i) {
- printf("smb_hfield returned %d\n",i);
- smb_freemsgdat(&smb,offset,length,1);
- exit(1); }
- strlwr(str);
- msg.idx.from=crc16(str);
-
- strcpy(str,bbs.name);
- i=smb_hfield(&msg,SUBJECT,(ushort)strlen(str),str);
- if(i) {
- printf("smb_hfield returned %d\n",i);
- smb_freemsgdat(&smb,offset,length,1);
- exit(1); }
- strlwr(str);
- msg.idx.subj=crc16(str);
-
- i=smb_dfield(&msg,TEXT_BODY,length);
- if(i) {
- printf("smb_dfield returned %d\n",i);
- smb_freemsgdat(&smb,offset,length,1);
- exit(1); }
-
- i=smb_addmsghdr(&smb,&msg,smb.status.attr&SMB_HYPERALLOC);
- if(i) {
- printf("smb_addmsghdr returned %d\n",i);
- smb_freemsgdat(&smb,offset,length,1);
- exit(1); }
- smb_freemsgmem(&msg); }
- return(0);
-}
-
-/* End of SBL2SMB.C */
diff --git a/xtrn/sbl/sbl2smb.dsp b/xtrn/sbl/sbl2smb.dsp
deleted file mode 100644
index 8a722ddbfe59e2e4f22d2783159396f624ccd9e1..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl2smb.dsp
+++ /dev/null
@@ -1,104 +0,0 @@
-# Microsoft Developer Studio Project File - Name="sbl2smb" - Package Owner=<4>
-# Microsoft Developer Studio Generated Build File, Format Version 6.00
-# ** DO NOT EDIT **
-
-# TARGTYPE "Win32 (x86) Console Application" 0x0103
-
-CFG=sbl2smb - Win32 Debug
-!MESSAGE This is not a valid makefile. To build this project using NMAKE,
-!MESSAGE use the Export Makefile command and run
-!MESSAGE
-!MESSAGE NMAKE /f "sbl2smb.mak".
-!MESSAGE
-!MESSAGE You can specify a configuration when running NMAKE
-!MESSAGE by defining the macro CFG on the command line. For example:
-!MESSAGE
-!MESSAGE NMAKE /f "sbl2smb.mak" CFG="sbl2smb - Win32 Debug"
-!MESSAGE
-!MESSAGE Possible choices for configuration are:
-!MESSAGE
-!MESSAGE "sbl2smb - Win32 Release" (based on "Win32 (x86) Console Application")
-!MESSAGE "sbl2smb - Win32 Debug" (based on "Win32 (x86) Console Application")
-!MESSAGE
-
-# Begin Project
-# PROP AllowPerConfigDependencies 0
-# PROP Scc_ProjName ""
-# PROP Scc_LocalPath ""
-CPP=cl.exe
-RSC=rc.exe
-
-!IF "$(CFG)" == "sbl2smb - Win32 Release"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 0
-# PROP BASE Output_Dir "Release"
-# PROP BASE Intermediate_Dir "Release"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 0
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.release"
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD CPP /nologo /W3 /GX /O2 /I "c:\src\sbbs3" /I "c:\src\xpdev" /I "..\sdk" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD BASE RSC /l 0x409 /d "NDEBUG"
-# ADD RSC /l 0x409 /d "NDEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-
-!ELSEIF "$(CFG)" == "sbl2smb - Win32 Debug"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 1
-# PROP BASE Output_Dir "sbl2smb___Win32_Debug"
-# PROP BASE Intermediate_Dir "sbl2smb___Win32_Debug"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 1
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.debug"
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /I "c:\src\sbbs3" /I "c:\src\xpdev" /I "..\sdk" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD BASE RSC /l 0x409 /d "_DEBUG"
-# ADD RSC /l 0x409 /d "_DEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-
-!ENDIF
-
-# Begin Target
-
-# Name "sbl2smb - Win32 Release"
-# Name "sbl2smb - Win32 Debug"
-# Begin Source File
-
-SOURCE=c:\src\xpdev\dirwrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=c:\src\xpdev\filewrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=c:\src\xpdev\genwrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=.\sbl2smb.c
-# End Source File
-# Begin Source File
-
-SOURCE=C:\src\sbbs3\smblib.c
-# End Source File
-# End Target
-# End Project
diff --git a/xtrn/sbl/sbl2txt.c b/xtrn/sbl/sbl2txt.c
deleted file mode 100644
index 30b3417d5059eab574713e16e1e619e4bbafc235..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbl2txt.c
+++ /dev/null
@@ -1,190 +0,0 @@
-/* SBL2TXT.C */
-
-/* Developed 1990-1997 by Rob Swindell; PO Box 501, Yorba Linda, CA 92885 */
-
-/* Converts Synchronet BBS List (SBL.DAB) to text file */
-
-#include "xsdk.h"
-#include "sbldefs.h"
-
-char *wday[]={"Sun","Mon","Tue","Wed","Thu","Fri","Sat"};
-char *mon[]={"Jan","Feb","Mar","Apr","May","Jun"
- ,"Jul","Aug","Sep","Oct","Nov","Dec"};
-char *nulstr="";
-char tmp[256];
-struct date date;
-struct time curtime;
-
-extern int daylight=0;
-extern long timezone=0L;
-
-/****************************************************************************/
-/* Generates a 24 character ASCII string that represents the time_t pointer */
-/* Used as a replacement for ctime() */
-/****************************************************************************/
-char *timestr(time_t *intime)
-{
- static char str[256];
- char mer[3],hour;
- struct tm *gm;
-
-gm=localtime(intime);
-if(gm->tm_hour>=12) {
- if(gm->tm_hour==12)
- hour=12;
- else
- hour=gm->tm_hour-12;
- strcpy(mer,"pm"); }
-else {
- if(gm->tm_hour==0)
- hour=12;
- else
- hour=gm->tm_hour;
- strcpy(mer,"am"); }
-sprintf(str,"%s %s %02d %4d %02d:%02d %s"
- ,wday[gm->tm_wday],mon[gm->tm_mon],gm->tm_mday,gm->tm_year%100
- ,hour,gm->tm_min,mer);
-return(str);
-}
-
-/****************************************************************************/
-/* Converts unix time format (long - time_t) into a char str MM/DD/YY */
-/****************************************************************************/
-char *unixtodstr(time_t unix, char *str)
-{
-
-if(!unix)
- strcpy(str,"00/00/00");
-else {
- unixtodos(unix,&date,&curtime);
- if((unsigned)date.da_mon>12) { /* DOS leap year bug */
- date.da_mon=1;
- date.da_year++; }
- if((unsigned)date.da_day>31)
- date.da_day=1;
- sprintf(str,"%02u/%02u/%02u",date.da_mon,date.da_day
- ,date.da_year>=2000 ? date.da_year-2000 : date.da_year-1900); }
-return(str);
-}
-
-
-void long_bbs_info(FILE *out, bbs_t bbs)
-{
- int i;
-
-fprintf(out,"BBS Name: %s since %s\r\n"
- ,bbs.name,unixtodstr(bbs.birth,tmp));
-fprintf(out,"Operator: ");
-for(i=0;i<bbs.total_sysops;i++) {
- if(i) {
- if(bbs.total_sysops>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(!(i%4))
- fprintf(out,"\r\n ");
- if(i+1==bbs.total_sysops)
- fprintf(out,"and "); }
- fprintf(out,"%s",bbs.sysop[i]); }
-fprintf(out,"\r\n");
-fprintf(out,"Software: %-15.15s Nodes: %-5u "
- "Users: %-5u Doors: %u\r\n"
- ,bbs.software,bbs.nodes,bbs.users,bbs.xtrns);
-fprintf(out,"Download: %lu files in %u directories of "
- "%luMB total space\r\n"
- ,bbs.files,bbs.dirs,bbs.megs);
-fprintf(out,"Messages: %lu messages in %u sub-boards\r\n"
- ,bbs.msgs,bbs.subs);
-fprintf(out,"Networks: ");
-for(i=0;i<bbs.total_networks;i++) {
- if(i) {
- if(bbs.total_networks>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(!(i%3))
- fprintf(out,"\r\n ");
- if(i+1==bbs.total_networks)
- fprintf(out,"and "); }
- fprintf(out,"%s [%s]",bbs.network[i],bbs.address[i]); }
-fprintf(out,"\r\n");
-fprintf(out,"Terminal: ");
-for(i=0;i<bbs.total_terminals;i++) {
- if(i) {
- if(bbs.total_terminals>2)
- fprintf(out,", ");
- else
- fputc(' ',out);
- if(i+1==bbs.total_terminals)
- fprintf(out,"and "); }
- fprintf(out,"%s",bbs.terminal[i]); }
-fprintf(out,"\r\n\r\n");
-for(i=0;i<bbs.total_numbers;i++)
- fprintf(out,"%-30.30s %12.12s %5u %-15.15s "
- "Minimum: %u\r\n"
- ,i && !strcmp(bbs.number[i].modem.location,bbs.number[i-1].modem.location)
- ? nulstr : bbs.number[i].modem.location
- ,bbs.number[i].modem.number
- ,bbs.number[i].modem.max_rate
- ,bbs.number[i].modem.desc
- ,bbs.number[i].modem.min_rate);
-
-fprintf(out,"\r\n");
-for(i=0;i<5;i++) {
- if(!bbs.desc[i][0])
- break;
- fprintf(out,"%15s%s\r\n",nulstr,bbs.desc[i]); }
-
-fprintf(out,"\r\n");
-fprintf(out,"Entry created on %s by %s\r\n"
- ,timestr(&bbs.created),bbs.user);
-fprintf(out," Last updated on %s\r\n\r\n",timestr(&bbs.updated));
-}
-
-
-void main(int argc, char **argv)
-{
- char software[16]="";
- char telnet_port[16];
- int i,in;
- FILE *out;
- bbs_t bbs;
-
-for(i=1;i<argc;i++)
- if(argv[i][0]=='s' && argv[i][1]=='=')
- sprintf(software,"%.15s",argv[i]+2);
-
-if((in=open("SBL.DAB",O_RDONLY|O_BINARY))==-1) {
- printf("error opening SBL.DAB\n");
- return; }
-
-if((out=fopen("SBL.TXT","wb"))==NULL) {
- printf("error opening/creating SBL.TXT\n");
- return; }
-
-while(!eof(in)) {
- read(in,&bbs,sizeof(bbs_t));
- if(!bbs.name[0])
- continue;
- if(software[0] && strnicmp(bbs.software,software,strlen(software)))
- continue;
- // long_bbs_info(out,bbs);
- for(i=0;i<bbs.total_numbers;i++)
- if(bbs.number[i].modem.min_rate==0xffff) {
- if(bbs.number[i].telnet.port && bbs.number[i].telnet.port!=23)
- sprintf(telnet_port,":%u",bbs.number[i].telnet.port);
- else
- telnet_port[0]=0;
- fprintf(out,"%-25.25s telnet://%s%s\r\n"
- ,bbs.name
- ,bbs.number[i].telnet.addr
- ,telnet_port);
- } else
- fprintf(out,"%-25.25s %12.12s %5u %s\r\n"
- ,bbs.name,bbs.number[i].modem.number
- ,bbs.number[i].modem.max_rate
- ,bbs.number[i].modem.desc);
- }
-close(in);
-fclose(out);
-}
diff --git a/xtrn/sbl/sbldefs.h b/xtrn/sbl/sbldefs.h
deleted file mode 100644
index 32182b86c28f9c594d11a21c18ef644756650c3a..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sbldefs.h
+++ /dev/null
@@ -1,138 +0,0 @@
-/* sbldefs.h */
-
-/* Synchronet BBS List Macros, constants, and type definitions */
-
-/* $Id: sbldefs.h,v 1.11 2013/09/15 09:16:47 rswindell Exp $ */
-
-/****************************************************************************
- * @format.tab-size 4 (Plain Text/Source Code File Header) *
- * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
- * *
- * Copyright 2013 Rob Swindell - http://www.synchro.net/copyright.html *
- * *
- * This program is free software; you can redistribute it and/or *
- * modify it under the terms of the GNU General Public License *
- * as published by the Free Software Foundation; either version 2 *
- * of the License, or (at your option) any later version. *
- * See the GNU General Public License for more details: gpl.txt or *
- * http://www.fsf.org/copyleft/gpl.html *
- * *
- * Anonymous FTP access to the most recent released source is available at *
- * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
- * *
- * Anonymous CVS access to the development source and modification history *
- * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login *
- * (just hit return, no password is necessary) *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout src *
- * *
- * For Synchronet coding style and modification guidelines, see *
- * http://www.synchro.net/source.html *
- * *
- * You are encouraged to submit any modifications (preferably in Unix diff *
- * format) via e-mail to mods@synchro.net *
- * *
- * Note: If this box doesn't appear square, then you need to fix your tabs. *
- ****************************************************************************/
-
-#include "gen_defs.h"
-
-#define MAX_SYSOPS 5
-#define MAX_NUMBERS 20
-#define MAX_NETS 10
-#define MAX_TERMS 5
-#define DESC_LINES 5
-#define DEF_LIST_FMT "NSTP"
-
-#ifndef IPPORT_TELNET
-#define IPPORT_TELNET 23
-#endif
-
-#define Y2K_2DIGIT_WINDOW 70
-
-/* Misc bits */
-
-#define FROM_SMB (1L<<0) /* BBS info imported from message base */
-
-#ifdef _WIN32 /* necessary for compatibility with SBL */
-#pragma pack(push)
-#pragma pack(1)
-#endif
-
-#ifndef _PACK
- #ifdef __GNUC__
- #define _PACK __attribute__ ((packed))
- #else
- #define _PACK
- #endif
-#endif
-
-typedef union _PACK {
-
- struct {
- char number[13]; /* Phone number */
- char desc[16]; /* Modem description */
- char location[31]; /* Location of phone number */
- uint16_t min_rate; /* Minimum connect rate */
- uint16_t max_rate; /* Maximum connect rate */
- } modem;
-
- struct {
- char addr[29]; /* Telnet address */
- char location[31]; /* Location */
- uint16_t unused; /* 0xffff */
- uint16_t port; /* TCP port number */
- } telnet;
-
-} number_t;
-
-typedef struct _PACK {
- char name[26] /* System name */
- ,user[26] /* User who created entry */
- ,software[16] /* BBS software */
- ,total_sysops
- ,sysop[MAX_SYSOPS][26] /* Sysop names */
- ,total_numbers
- ,total_networks
- ,network[MAX_NETS][16] /* Network names */
- ,address[MAX_NETS][26] /* Network addresses */
- ,total_terminals
- ,terminal[MAX_TERMS][16] /* Terminals supported */
- ,desc[DESC_LINES][51] /* 5 line description */
- ;
- uint16_t nodes /* Total nodes */
- ,users /* Total users */
- ,subs /* Total sub-boards */
- ,dirs /* Total file dirs */
- ,xtrns /* Total external programs */
- ;
- uint32_t created /* Time/date entry was created */
- ,updated /* Time/date last updated */
- ,birth /* Birthdate of BBS */
- ;
- uint32_t megs /* Storage space in megabytes */
- ,msgs /* Total messages */
- ,files /* Total files */
- ,misc /* Miscellaneous bits */
- ;
- number_t number[MAX_NUMBERS]; /* Access numbers */
-
- char userupdated[26]; /* User who last updated */
- uint32_t verified; /* Time/Date last vouched for */
- char userverified[26]; /* User who last vouched */
- char web_url[61]; /* Web-site address */
- char sysop_email[61]; /* Sysop's e-mail address */
- uint32_t exported; /* Date last exported to SMB */
- uint32_t verification_count; /* Number of successful auto-verifications */
- uint32_t verification_attempts; /* Number of auto-verification attempts */
- char unused[310]; /* Unused space */
-} bbs_t;
-
-#ifdef _WIN32
-#pragma pack(pop) /* original packing */
-#endif
-
-
-
-/* End of SBL.H */
-
diff --git a/xtrn/sbl/sblpack b/xtrn/sbl/sblpack
deleted file mode 100755
index e7cb7a22369d1d2bff3a456259c95e2d31c020cf..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sblpack
+++ /dev/null
@@ -1,2 +0,0 @@
-#!/bin/sh
-. ${SBBSEXEC}unixstub.sh
diff --git a/xtrn/sbl/sblpack.c b/xtrn/sbl/sblpack.c
deleted file mode 100644
index 7586a253332d63ce1bc1d0168605020195044482..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sblpack.c
+++ /dev/null
@@ -1,100 +0,0 @@
-/* sblpack.c */
-
-/* Synchronet BBS List Database Packer */
-
-/* $Id: sblpack.c,v 1.5 2004/07/16 18:02:41 deuce Exp $ */
-
-/****************************************************************************
- * @format.tab-size 4 (Plain Text/Source Code File Header) *
- * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
- * *
- * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html *
- * *
- * This program is free software; you can redistribute it and/or *
- * modify it under the terms of the GNU General Public License *
- * as published by the Free Software Foundation; either version 2 *
- * of the License, or (at your option) any later version. *
- * See the GNU General Public License for more details: gpl.txt or *
- * http://www.fsf.org/copyleft/gpl.html *
- * *
- * Anonymous FTP access to the most recent released source is available at *
- * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
- * *
- * Anonymous CVS access to the development source and modification history *
- * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login *
- * (just hit return, no password is necessary) *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout xtrn *
- * *
- * For Synchronet coding style and modification guidelines, see *
- * http://www.synchro.net/source.html *
- * *
- * You are encouraged to submit any modifications (preferably in Unix diff *
- * format) via e-mail to mods@synchro.net *
- * *
- * Note: If this box doesn't appear square, then you need to fix your tabs. *
- ****************************************************************************/
-
-#include <stdio.h>
-#include <stdlib.h> /* exit() */
-#include <time.h>
-#include <fcntl.h>
-#include <sys/stat.h>
-#include "filewrap.h" /* sopen() */
-#include "genwrap.h" /* PLATFORM_DESC */
-#include "sbldefs.h"
-
-int main(void)
-{
- int file;
- FILE * in;
- FILE * out;
- bbs_t bbs;
- ulong records=0;
- ulong deleted=0;
- char revision[16];
-
- sscanf("$Revision: 1.5 $", "%*s %s", revision);
-
- printf("\nSBLPACK %s-%s Copyright 2003 Rob Swindell\n\n"
- ,revision,PLATFORM_DESC);
-
- if((file=sopen("sbl.dab",O_RDWR|O_BINARY,SH_DENYNO))==-1) {
- printf("\n\7Error opening/creating sbl.dab\n");
- exit(1); }
- if((in=fdopen(file,"w+b"))==NULL) {
- printf("\n\7Error converting sbl.dab file handle to stream\n");
- exit(1); }
- setvbuf(in,0L,_IOFBF,2048);
- if((out=fopen("sbl.tmp","wb"))==NULL) {
- printf("\n\7Error opening sbl.tmp file\n");
- exit(1); }
-
- while(!feof(in)) {
- if(!fread(&bbs,sizeof(bbs_t),1,in))
- break;
- records++;
- putchar('.');
- if(bbs.name[0]==0
- || bbs.user[0]==0
- || bbs.total_numbers<1) {
- deleted++;
- continue;
- }
- fwrite(&bbs,sizeof(bbs_t),1,out);
- }
- fclose(in);
- fclose(out);
- putchar('\n');
- if(remove("sbl.dab")) {
- printf("\n\7Data file in use, can't remove.\n");
- remove("sbl.tmp");
- exit(1);
- }
- rename("sbl.tmp","sbl.dab");
- printf("\nDone.\n");
- printf("\n%lu records in original file, %lu deleted (packed), new total = %lu.\n"
- ,records,deleted,records-deleted);
- return(0);
-}
-
diff --git a/xtrn/sbl/sblpack.dsp b/xtrn/sbl/sblpack.dsp
deleted file mode 100644
index 435611f416b5031b6c58c02bf398feca8d7e4c5e..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sblpack.dsp
+++ /dev/null
@@ -1,89 +0,0 @@
-# Microsoft Developer Studio Project File - Name="sblpack" - Package Owner=<4>
-# Microsoft Developer Studio Generated Build File, Format Version 6.00
-# ** DO NOT EDIT **
-
-# TARGTYPE "Win32 (x86) Console Application" 0x0103
-
-CFG=sblpack - Win32 Debug
-!MESSAGE This is not a valid makefile. To build this project using NMAKE,
-!MESSAGE use the Export Makefile command and run
-!MESSAGE
-!MESSAGE NMAKE /f "sblpack.mak".
-!MESSAGE
-!MESSAGE You can specify a configuration when running NMAKE
-!MESSAGE by defining the macro CFG on the command line. For example:
-!MESSAGE
-!MESSAGE NMAKE /f "sblpack.mak" CFG="sblpack - Win32 Debug"
-!MESSAGE
-!MESSAGE Possible choices for configuration are:
-!MESSAGE
-!MESSAGE "sblpack - Win32 Release" (based on "Win32 (x86) Console Application")
-!MESSAGE "sblpack - Win32 Debug" (based on "Win32 (x86) Console Application")
-!MESSAGE
-
-# Begin Project
-# PROP AllowPerConfigDependencies 0
-# PROP Scc_ProjName ""
-# PROP Scc_LocalPath ""
-CPP=cl.exe
-RSC=rc.exe
-
-!IF "$(CFG)" == "sblpack - Win32 Release"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 0
-# PROP BASE Output_Dir "Release"
-# PROP BASE Intermediate_Dir "Release"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 0
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.release"
-# PROP Ignore_Export_Lib 0
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD CPP /nologo /W3 /GX /O2 /I "..\sdk" /I "c:\src\xpdev" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD BASE RSC /l 0x409 /d "NDEBUG"
-# ADD RSC /l 0x409 /d "NDEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-
-!ELSEIF "$(CFG)" == "sblpack - Win32 Debug"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 1
-# PROP BASE Output_Dir "sblpack___Win32_Debug"
-# PROP BASE Intermediate_Dir "sblpack___Win32_Debug"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 1
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.debug"
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /I "..\sdk" /I "c:\src\xpdev" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD BASE RSC /l 0x409 /d "_DEBUG"
-# ADD RSC /l 0x409 /d "_DEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-
-!ENDIF
-
-# Begin Target
-
-# Name "sblpack - Win32 Release"
-# Name "sblpack - Win32 Debug"
-# Begin Source File
-
-SOURCE=.\sblpack.c
-# End Source File
-# End Target
-# End Project
diff --git a/xtrn/sbl/smb2sbl b/xtrn/sbl/smb2sbl
deleted file mode 100755
index e7cb7a22369d1d2bff3a456259c95e2d31c020cf..0000000000000000000000000000000000000000
--- a/xtrn/sbl/smb2sbl
+++ /dev/null
@@ -1,2 +0,0 @@
-#!/bin/sh
-. ${SBBSEXEC}unixstub.sh
diff --git a/xtrn/sbl/smb2sbl.c b/xtrn/sbl/smb2sbl.c
deleted file mode 100644
index f564d7e6072f2091b35057d20225812f78b38299..0000000000000000000000000000000000000000
--- a/xtrn/sbl/smb2sbl.c
+++ /dev/null
@@ -1,480 +0,0 @@
-/* smb2sbl.c */
-
-/* Scans SMB message base for messages to "SBL" and adds them to the SBL */
-
-/* $Id: smb2sbl.c,v 1.20 2006/08/07 22:58:01 rswindell Exp $ */
-
-/****************************************************************************
- * @format.tab-size 4 (Plain Text/Source Code File Header) *
- * @format.use-tabs true (see http://www.synchro.net/ptsc_hdr.html) *
- * *
- * Copyright 2000 Rob Swindell - http://www.synchro.net/copyright.html *
- * *
- * This program is free software; you can redistribute it and/or *
- * modify it under the terms of the GNU General Public License *
- * as published by the Free Software Foundation; either version 2 *
- * of the License, or (at your option) any later version. *
- * See the GNU General Public License for more details: gpl.txt or *
- * http://www.fsf.org/copyleft/gpl.html *
- * *
- * Anonymous FTP access to the most recent released source is available at *
- * ftp://vert.synchro.net, ftp://cvs.synchro.net and ftp://ftp.synchro.net *
- * *
- * Anonymous CVS access to the development source and modification history *
- * is available at cvs.synchro.net:/cvsroot/sbbs, example: *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs login *
- * (just hit return, no password is necessary) *
- * cvs -d :pserver:anonymous@cvs.synchro.net:/cvsroot/sbbs checkout xtrn *
- * *
- * For Synchronet coding style and modification guidelines, see *
- * http://www.synchro.net/source.html *
- * *
- * You are encouraged to submit any modifications (preferably in Unix diff *
- * format) via e-mail to mods@synchro.net *
- * *
- * Note: If this box doesn't appear square, then you need to fix your tabs. *
- ****************************************************************************/
-
-#include <time.h> /* struct tm */
-#include <fcntl.h> /* O_RDWR */
-#include <sys/stat.h> /* S_IWRITE */
-#include <ctype.h> /* isdigit */
-#include <stdlib.h> /* atoi */
-#include <string.h>
-#include <errno.h> /* errno */
-#include "smblib.h"
-#include "sbldefs.h"
-#include "genwrap.h" /* PLATFORM_DESC */
-#include "dirwrap.h" /* fexist/flength */
-#include "filewrap.h" /* O_BINARY */
-
-smb_t smb;
-char revision[16];
-
-char *loadmsgtxt(smbmsg_t msg, int tails)
-{
- char *buf=NULL,*lzhbuf;
- ushort xlat;
- int i,lzh;
- long l=0,lzhlen,length;
-
- for(i=0;i<msg.hdr.total_dfields;i++) {
- if(!(msg.dfield[i].type==TEXT_BODY
- || (tails && msg.dfield[i].type==TEXT_TAIL)))
- continue;
- fseek(smb.sdt_fp,msg.hdr.offset+msg.dfield[i].offset
- ,SEEK_SET);
- fread(&xlat,2,1,smb.sdt_fp);
- lzh=0;
- if(xlat==XLAT_LZH) {
- lzh=1;
- fread(&xlat,2,1,smb.sdt_fp); }
- if(xlat!=XLAT_NONE) /* no other translations supported */
- continue;
-
- length=msg.dfield[i].length-2;
- if(lzh) {
- length-=2;
- if((lzhbuf=malloc(length))==NULL) {
- printf("ERR_ALLOC lzhbuf of %lu\n",length);
- return(buf); }
- fread(lzhbuf,1,length,smb.sdt_fp);
- lzhlen=*(long *)lzhbuf;
- if((buf=realloc(buf,l+lzhlen+3))==NULL) {
- free(lzhbuf);
- printf("ERR_ALLOC lzhoutbuf of %ld\n",l+lzhlen+1);
- return(buf); }
- lzh_decode(lzhbuf,length,buf+l);
- free(lzhbuf);
- l+=lzhlen; }
- else {
- if((buf=realloc(buf,l+msg.dfield[i].length+3))==NULL) {
- printf("ERR_ALLOC of %lu\n",l+msg.dfield[i].length+1);
- return(buf); }
- l+=fread(buf+l,1,length,smb.sdt_fp); }
- buf[l]=CR;
- l++;
- buf[l]=LF;
- l++;
- buf[l]=0; }
- return(buf);
-}
-
-/****************************************************************************/
-/* Converts a date string in format MM/DD/YY into unix time format */
-/****************************************************************************/
-time_t dstrtounix(char *instr)
-{
- char* p;
- char* day;
- char str[16];
- struct tm tm;
-
- if(!instr[0] || !strncmp(instr,"00/00/00",8))
- return(0);
-
- if(isdigit(instr[0]) && isdigit(instr[1])
- && isdigit(instr[3]) && isdigit(instr[4])
- && isdigit(instr[6]) && isdigit(instr[7]))
- p=instr; /* correctly formatted */
- else {
- p=instr; /* incorrectly formatted */
- while(*p && isdigit(*p)) p++;
- if(*p==0)
- return(0);
- p++;
- day=p;
- while(*p && isdigit(*p)) p++;
- if(*p==0)
- return(0);
- p++;
- sprintf(str,"%02u/%02u/%02u"
- ,atoi(instr)%100,atoi(day)%100,atoi(p)%100);
- p=str;
- }
-
- memset(&tm,0,sizeof(tm));
- tm.tm_year=((p[6]&0xf)*10)+(p[7]&0xf);
- if (tm.tm_year<Y2K_2DIGIT_WINDOW)
- tm.tm_year+=100;
- tm.tm_mon=((p[0]&0xf)*10)+(p[1]&0xf);
- tm.tm_mday=((p[3]&0xf)*10)+(p[4]&0xf);
- if (tm.tm_mon)
- tm.tm_mon--; /* zero-based month field */
- return(mktime(&tm));
-}
-
-/****************************************************************************/
-/* Truncates white-space chars off end of 'str' */
-/* This is a *special* version of trunccrsp that truncates at first CR char */
-/****************************************************************************/
-static void trunccrsp(char *str)
-{
- uint org,c;
-
- org=strlen(str);
- str[strcspn(str,"\r")]=0;
- c=strlen(str);
- memset(str+c,0,org-c); /* clear the remainder of the buffer */
- while(c && (uchar)str[c-1]<=' ') c--;
- str[c]=0;
-}
-
-int main(int argc, char **argv)
-{
- uchar str[128],*buf;
- int i,file,sysop,number,network,terminal,desc;
- ulong l,last,high;
- ushort sbl;
- bbs_t bbs;
- smbmsg_t msg;
- FILE *stream;
-
- sscanf("$Revision: 1.20 $", "%*s %s", revision);
-
- fprintf(stderr,"\nSMB2SBL v2.%s-%s - Updates SBL via SMB - Copyright 2003 "
- "Rob Swindell\n\n",revision,PLATFORM_DESC);
-
- if(argc<3) {
- fprintf(stderr,"usage: smb2sbl <smb_file> <sbl.dab>\n\n");
- fprintf(stderr,"ex: smb2sbl /sbbs/data/subs/syncdata "
- "/sbbs/xtrn/sbl/sbl.dab\n");
- return(1);
- }
-
- SAFECOPY(smb.file,argv[1]);
-
- SAFECOPY(str,argv[2]);
- if((file=sopen(str,O_RDWR|O_BINARY|O_CREAT,SH_DENYNO,S_IREAD|S_IWRITE))==-1) {
- printf("error opening %s\n",str);
- return(1); }
- if((stream=fdopen(file,"r+b"))==NULL) {
- printf("error fdopening %s\n",str);
- return(1); }
- setvbuf(stream,NULL,_IOFBF,4096);
-
- sprintf(str,"%s.SBL",smb.file);
- if((file=open(str,O_RDWR|O_BINARY|O_CREAT,S_IWRITE|S_IREAD))==-1) {
- printf("error opening %s\n",str);
- return(1); }
- if(read(file,&last,4)!=4)
- last=0;
- high=last;
-
- sprintf(str,"%s.shd",smb.file);
- if(!fexist(str)) {
- printf("%s doesn't exist\n",smb.file);
- return(0); }
- sprintf(str,"%s.sid",smb.file);
- if(!flength(str)) {
- printf("%s is empty\n",smb.file);
- return(0); }
- fprintf(stderr,"Opening %s\n",smb.file);
- smb.retry_time=30;
- if((i=smb_open(&smb))!=0) {
- printf("smb_open returned %d\n",i);
- return(1); }
-
- sbl=crc16("sbl");
-
- if((i=smb_locksmbhdr(&smb))!=0) { /* Be sure noone deletes or */
- printf("Error locking %d\n",i); /* adds while we're reading */
- return(1); }
-
- while(!feof(smb.sid_fp)) {
- if(!fread(&msg.idx,sizeof(idxrec_t),1,smb.sid_fp))
- break;
- fprintf(stderr,"\r%lu ",msg.idx.number);
- if(msg.idx.number<=last || msg.idx.to!=sbl)
- continue;
- high=msg.idx.number;
- if((i=smb_lockmsghdr(&smb,&msg))!=0) {
- printf("\7Error %d locking msg #%lu\n",i,msg.idx.number);
- continue; }
- if((i=smb_getmsghdr(&smb,&msg))!=0) {
- smb_unlockmsghdr(&smb,&msg);
- printf("\7Error %d reading msg #%lu\n",i,msg.idx.number);
- continue; }
- smb_unlockmsghdr(&smb,&msg);
- if(!msg.from_net.type /* ignore local message */
- || msg.from[0]<=' ' /* corrupted? */
- || msg.subj[0]<=' ' /* corrupted */
- ) {
- smb_freemsgmem(&msg);
- continue;
- }
-
- printf("\nMessage #%lu by %s on %.24s\n"
- ,msg.hdr.number,msg.from,ctime((time_t*)&msg.hdr.when_written.time));
-
- trunccrsp(msg.subj);
- if(!msg.subj[0]) {
- smb_freemsgmem(&msg);
- continue; }
- fprintf(stderr,"Searching for %s...",msg.subj);
- fseek(stream,0L,SEEK_SET);
- memset(&bbs,0,sizeof(bbs_t));
- while(1) {
- l=ftell(stream);
- if(!fread(&bbs,sizeof(bbs_t),1,stream)) {
- memset(&bbs,0,sizeof(bbs_t));
- break; }
- if(msg.subj[0] && !stricmp(bbs.name,msg.subj)) {
- fseek(stream,l,SEEK_SET);
- break; } }
- fprintf(stderr,"\n");
- if(bbs.name[0] && strnicmp(bbs.user,msg.from,25)) {
- printf("%s didn't create the entry for %s\n",msg.from,msg.subj);
- smb_freemsgmem(&msg);
- continue; }
- if(!bbs.name[0]) {
- fprintf(stderr,"Searching for unused record...");
- fseek(stream,0L,SEEK_SET);
- while(1) { /* Find deleted record */
- l=ftell(stream);
- if(!fread(&bbs,sizeof(bbs_t),1,stream))
- break;
- if(!bbs.name[0]) {
- fseek(stream,l,SEEK_SET);
- break; } }
- fprintf(stderr,"\n");
- memset(&bbs,0,sizeof(bbs_t));
- bbs.created=time(NULL);
- if(!bbs.birth)
- bbs.birth=bbs.created;
- SAFECOPY(bbs.user,msg.from);
- }
- SAFECOPY(bbs.name,msg.subj);
- bbs.updated=time(NULL);
- bbs.misc|=FROM_SMB;
- SAFECOPY(bbs.userupdated,msg.from);
- if((buf=loadmsgtxt(msg,FALSE)) != NULL) {
- sysop=number=network=terminal=desc=0;
- l=0;
- while(buf[l]) {
- while(buf[l] && buf[l]<=' ') /* Find first text on line */
- l++;
- if(!strnicmp(buf+l,"NAME:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.name,buf+l);
- trunccrsp(bbs.name);
- }
- if(!strnicmp(buf+l,"BIRTH:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.birth=dstrtounix(buf+l); }
- if(!strnicmp(buf+l,"SOFTWARE:",9)) {
- l+=9;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.software,buf+l);
- trunccrsp(bbs.software); }
- if(!strnicmp(buf+l,"WEB-SITE:",9)) {
- l+=9;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.web_url,buf+l);
- trunccrsp(bbs.web_url); }
- if(!strnicmp(buf+l,"E-MAIL:",7)) {
- l+=7;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.sysop_email,buf+l);
- trunccrsp(bbs.sysop_email); }
-
- if(!strnicmp(buf+l,"SYSOP:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.sysop[sysop],buf+l);
- trunccrsp(bbs.sysop[sysop]);
- if(sysop<MAX_SYSOPS-1)
- sysop++; }
- if(!strnicmp(buf+l,"NUMBER:",7) || !strnicmp(buf+l,"TELNET:",7)) {
- l+=7;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.number[number].telnet.addr,buf+l);
- trunccrsp(bbs.number[number].telnet.addr);
- if(!strnicmp(buf+l,"TELNET:",7)) {
- bbs.number[number].telnet.unused=0xffff;
- bbs.number[number].telnet.port=23;
- }
- if(number<MAX_NUMBERS-1)
- number++;
- }
- if(!strnicmp(buf+l,"MODEM:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=number;
- if(i) i--;
- SAFECOPY(bbs.number[i].modem.desc,buf+l);
- trunccrsp(bbs.number[i].modem.desc); }
- if(!strnicmp(buf+l,"LOCATION:",9)) {
- l+=9;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=number;
- if(i) i--;
- SAFECOPY(bbs.number[i].modem.location,buf+l);
- trunccrsp(bbs.number[i].modem.location); }
- if(!strnicmp(buf+l,"MINRATE:",8)) {
- l+=8;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=number;
- if(i) i--;
- bbs.number[i].modem.min_rate=atoi(buf+l); }
- if(!strnicmp(buf+l,"MAXRATE:",8)) {
- l+=8;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=number;
- if(i) i--;
- bbs.number[i].modem.max_rate=atoi(buf+l); }
- if(!strnicmp(buf+l,"PORT:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=number;
- if(i) i--;
- bbs.number[i].telnet.port=atoi(buf+l); }
- if(!strnicmp(buf+l,"NETWORK:",8)) {
- l+=8;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.network[network],buf+l);
- trunccrsp(bbs.network[network]);
- if(network<MAX_NETS-1)
- network++; }
- if(!strnicmp(buf+l,"ADDRESS:",8)) {
- l+=8;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- i=network;
- if(i) i--;
- SAFECOPY(bbs.address[i],buf+l);
- trunccrsp(bbs.address[i]); }
- if(!strnicmp(buf+l,"TERMINAL:",9)) {
- l+=9;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.terminal[terminal],buf+l);
- trunccrsp(bbs.terminal[terminal]);
- if(terminal<MAX_TERMS-1)
- terminal++; }
- if(!strnicmp(buf+l,"DESC:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- SAFECOPY(bbs.desc[desc],buf+l);
- trunccrsp(bbs.desc[desc]);
- if(desc<4)
- desc++; }
-
- if(!strnicmp(buf+l,"MEGS:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.megs=atol(buf+l); }
- if(!strnicmp(buf+l,"MSGS:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.msgs=atol(buf+l); }
- if(!strnicmp(buf+l,"FILES:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.files=atol(buf+l); }
- if(!strnicmp(buf+l,"NODES:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.nodes=atoi(buf+l); }
- if(!strnicmp(buf+l,"USERS:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.users=atoi(buf+l); }
- if(!strnicmp(buf+l,"SUBS:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.subs=atoi(buf+l); }
- if(!strnicmp(buf+l,"DIRS:",5)) {
- l+=5;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.dirs=atoi(buf+l); }
- if(!strnicmp(buf+l,"XTRNS:",6)) {
- l+=6;
- while(buf[l] && buf[l]<=' ' && buf[l]!=CR)
- l++;
- bbs.xtrns=atoi(buf+l); }
- while(buf[l] && buf[l]>=' ') { /* Go to end of line */
- putchar(buf[l]);
- l++;
- }
- printf("\n");
- }
- bbs.total_sysops=sysop;
- bbs.total_networks=network;
- bbs.total_terminals=terminal;
- bbs.total_numbers=number;
- if(fwrite(&bbs,1,sizeof(bbs_t),stream)!=sizeof(bbs_t))
- fprintf(stderr,"!WRITE ERROR %d\n",errno);
- free(buf);
- }
- smb_freemsgmem(&msg);
- }
- lseek(file,0L,SEEK_SET);
- write(file,&high,4);
- close(file);
- return(0);
-}
-
diff --git a/xtrn/sbl/smb2sbl.dsp b/xtrn/sbl/smb2sbl.dsp
deleted file mode 100644
index 7c1e3ddfb71d18c405b8836d341d8be5577cf536..0000000000000000000000000000000000000000
--- a/xtrn/sbl/smb2sbl.dsp
+++ /dev/null
@@ -1,110 +0,0 @@
-# Microsoft Developer Studio Project File - Name="smb2sbl" - Package Owner=<4>
-# Microsoft Developer Studio Generated Build File, Format Version 6.00
-# ** DO NOT EDIT **
-
-# TARGTYPE "Win32 (x86) Console Application" 0x0103
-
-CFG=smb2sbl - Win32 Debug
-!MESSAGE This is not a valid makefile. To build this project using NMAKE,
-!MESSAGE use the Export Makefile command and run
-!MESSAGE
-!MESSAGE NMAKE /f "smb2sbl.mak".
-!MESSAGE
-!MESSAGE You can specify a configuration when running NMAKE
-!MESSAGE by defining the macro CFG on the command line. For example:
-!MESSAGE
-!MESSAGE NMAKE /f "smb2sbl.mak" CFG="smb2sbl - Win32 Debug"
-!MESSAGE
-!MESSAGE Possible choices for configuration are:
-!MESSAGE
-!MESSAGE "smb2sbl - Win32 Release" (based on "Win32 (x86) Console Application")
-!MESSAGE "smb2sbl - Win32 Debug" (based on "Win32 (x86) Console Application")
-!MESSAGE
-
-# Begin Project
-# PROP AllowPerConfigDependencies 0
-# PROP Scc_ProjName ""
-# PROP Scc_LocalPath ""
-CPP=cl.exe
-RSC=rc.exe
-
-!IF "$(CFG)" == "smb2sbl - Win32 Release"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 0
-# PROP BASE Output_Dir "Release"
-# PROP BASE Intermediate_Dir "Release"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 0
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.release"
-# PROP Ignore_Export_Lib 0
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /GX /O2 /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD CPP /nologo /W3 /GX /O2 /I "c:\src\sbbs3" /I "c:\src\xpdev" /I "..\sdk" /D "WIN32" /D "NDEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /c
-# ADD BASE RSC /l 0x409 /d "NDEBUG"
-# ADD RSC /l 0x409 /d "NDEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /machine:I386
-
-!ELSEIF "$(CFG)" == "smb2sbl - Win32 Debug"
-
-# PROP BASE Use_MFC 0
-# PROP BASE Use_Debug_Libraries 1
-# PROP BASE Output_Dir "Debug"
-# PROP BASE Intermediate_Dir "Debug"
-# PROP BASE Target_Dir ""
-# PROP Use_MFC 0
-# PROP Use_Debug_Libraries 1
-# PROP Output_Dir ""
-# PROP Intermediate_Dir "msvc.win32.debug"
-# PROP Ignore_Export_Lib 0
-# PROP Target_Dir ""
-# ADD BASE CPP /nologo /W3 /Gm /GX /ZI /Od /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD CPP /nologo /W3 /Gm /GX /ZI /Od /I "c:\src\sbbs3" /I "..\sdk" /I "c:\src\xpdev" /D "WIN32" /D "_DEBUG" /D "_CONSOLE" /D "_MBCS" /YX /FD /GZ /c
-# ADD BASE RSC /l 0x409 /d "_DEBUG"
-# ADD RSC /l 0x409 /d "_DEBUG"
-BSC32=bscmake.exe
-# ADD BASE BSC32 /nologo
-# ADD BSC32 /nologo
-LINK32=link.exe
-# ADD BASE LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-# ADD LINK32 kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib uuid.lib odbc32.lib odbccp32.lib /nologo /subsystem:console /debug /machine:I386 /pdbtype:sept
-
-!ENDIF
-
-# Begin Target
-
-# Name "smb2sbl - Win32 Release"
-# Name "smb2sbl - Win32 Debug"
-# Begin Source File
-
-SOURCE=C:\src\xpdev\dirwrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=C:\src\xpdev\filewrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=C:\src\xpdev\genwrap.c
-# End Source File
-# Begin Source File
-
-SOURCE=C:\src\sbbs3\lzh.c
-# End Source File
-# Begin Source File
-
-SOURCE=.\smb2sbl.c
-# End Source File
-# Begin Source File
-
-SOURCE=C:\src\sbbs3\smblib.c
-# End Source File
-# End Target
-# End Project
diff --git a/xtrn/sbl/sysop.txt b/xtrn/sbl/sysop.txt
deleted file mode 100644
index d3351eaf0abce9548b29193bd326ad60d205d670..0000000000000000000000000000000000000000
--- a/xtrn/sbl/sysop.txt
+++ /dev/null
@@ -1,139 +0,0 @@
-Synchronet BBS List Sysop Information
-=====================================
-
-This list is created and distributed every Monday. It is exported from the
-online BBS List database on Vertrauen and distributed via the SYNCMAIN FidoNet
-filebone file echo as SBBSLIST.ZIP.
-
-If you are a sysop of a Synchronet BBS and would like to have your BBS included
-in future versions of this list, do any one of the following:
-
- o Call Vertrauen at 714-529-9525 and use the Synchronet BBS List
- (external program) to add your system information.
-
- o See \SBBS\XTRN\SBL\SBL.DOC for instructions on networking your SBL
- database (v1.32+) with Vertrauen through DOVE-Net or FidoNet.
-
- o Post a message on the Synchronet Data echo (via DOVE-Net or the
- SYNCDATA echo on FidoNet backbone) in the following format:
-
-To: SBL
-Subj: bbs name
-
-Body Text:
-------------------------------------------------------------------------------
-Name: bbs name (max length: 25)
-Birth: MM/DD/YY (first day online)
-Sysop: your name (max length: 25)
-Sysop: co-sysop (up to 5 sysops)
-Software: Synchronet
-
-Desc: description (max length: 50)
-Desc: more description (up to 5 description lines)
-
-Nodes: number of nodes (numbers only)
-Megs: megabytes of storage (numbers only)
-Users: number of users (numbers only)
-Subs: message areas (numbers only)
-Msgs: total messages (numbers only)
-Dirs: file directories (numbers only)
-Files: total files online (numbers only)
-Xtrns: externals (doors) (numbers only)
-
-Network: name of network (max length: 15)
-Address: network address (max length: 25)
-Network: another network (up to 10 networks)
-Address: another address
-
-Terminal: supported terminnal (max length: 15)
-Terminal: another terminal (up to 5 terminals)
-
-Number: phone number (max length: 12)
-Location: city, state (max length: 30)
-Modem: modem description (max length: 15)
-MaxRate: maximum connect rate (numbers only)
-MinRate: minimum connect rate (numbers only)
- (up to 20 phone numbers)
--------------------------------------------------------------------------------
-
-The message must be posted to "SBL". If updating an existing entry, the message
-must be posted by the person who created the original entry. The title
-(subject) must be your BBS name. If changing the BBS name, the title must be
-the original name, and "NAME:" must be specified in the body text.
-
-All entry fields are optional. Only one field can be specified per line. The
-amount of whitespace between the colon and the data is irrelevant. All lines
-that do not begin with a valid field name and colon (like these) are ignored.
-Field names are not case sensitive (e.g. NAME: and Name: are equivalent).
-The order of the entry fields in the body text is not significant.
-
-Entries must be updated at least once every 90 days or they are automatically
-deleted. If you wish to delete your entry, send a message to SBL with the BBS
-name in the title and include a blank "Name:" field.
-
-If you want to just update an entry (to keep it from being auto-deleted), you
-do not have to specify any fields in the body text. But, it is suggested that
-you re-post all of your fields for all updates so that any new systems that are
-"watching" this sub-board can add your complete entry to their list.
-
-Up to 20 phone numbers can be specified. The number is limited to 12
-characters (so please use AAA-PPP-SSSS format), location is limited to 30
-characters, and modem description is limited to 15 characters. Do NOT put
-38400 or 57600 for maximum connect rate (MaxRate), as such standards do not
-yet exist.
-
-For all numeric files (noted as: "numbers only"), do not use commas, symbols,
-or letters. A MaxRate of 14,400bps must be specified as "14400".
-
-An example of a valid BBS post body text:
--------------------------------------------------------------------------------
-Name: Vertrauen
-Birth: 08/01/88
-Software: Synchronet
-Sysop: Digital Man
-Sysop: Ille Homine Albe
-
-Desc: Home of Synchronet Multinode BBS Software
-
-Nodes: 6
-Megs: 1800
-Users: 1600
-Subs: 100
-Msgs: 45000
-Dirs: 150
-Files: 7000
-Xtrns: 10
-
-Network: FidoNet
-Address: 1:103/705
-Network: RIME
-Address: 5115
-Network: DOVE-Net
-Address: VERT
-
-Terminal: TTY
-Terminal: ANSI
-Terminal: RIP
-
-Number: 714-529-9525
-Location: Yorba Linda, Ca
-Modem: V.32bis
-MaxRate: 14400
-MinRate: 300
-
-Number: 714-529-9547
-Location: Yorba Linda, Ca
-Modem: V.FC
-MaxRate: 28800
-MinRate: 16800
-
-Number: 714-529-9721
-Location: Yorba Linda, Ca
-Modem: ZyXEL
-MaxRate: 19200
-MinRate: 16800
--------------------------------------------------------------------------------
-
-Rob Swindell, Digital Dynamics
-(Keeper of the Synchronet BBS List)
-
diff --git a/xtrn/sbl/targets.mk b/xtrn/sbl/targets.mk
deleted file mode 100644
index a245ff00f4a288041fb814fae076d2b9d684ad45..0000000000000000000000000000000000000000
--- a/xtrn/sbl/targets.mk
+++ /dev/null
@@ -1,9 +0,0 @@
-SBL = $(EXEODIR)$(DIRSEP)sbl$(EXEFILE)
-SBL2SMB = $(EXEODIR)$(DIRSEP)sbl2smb$(EXEFILE)
-SMB2SBL = $(EXEODIR)$(DIRSEP)smb2sbl$(EXEFILE)
-SBLPACK = $(EXEODIR)$(DIRSEP)sblpack$(EXEFILE)
-SBBSLIST = $(EXEODIR)$(DIRSEP)sbbslist$(EXEFILE)
-
-all: xpdev xpdev-mt smblib $(EXEODIR) $(MTOBJODIR) $(OBJODIR) \
- $(SBL) $(SBL2SMB) $(SMB2SBL) $(SBLPACK)
-