2000-02-25 10:15:17 +00:00
|
|
|
// This may look like C code, but it is really -*- C++ -*-
|
|
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
// The Goldware Library
|
|
|
|
// Copyright (C) 1990-1999 Odinn Sorensen
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
// This library is free software; you can redistribute it and/or
|
|
|
|
// modify it under the terms of the GNU Library General Public
|
|
|
|
// License as published by the Free Software Foundation; either
|
|
|
|
// version 2 of the License, or (at your option) any later version.
|
|
|
|
//
|
|
|
|
// This library is distributed in the hope that it will be useful,
|
|
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
// Library General Public License for more details.
|
|
|
|
//
|
|
|
|
// You should have received a copy of the GNU Library General Public
|
|
|
|
// License along with this program; if not, write to the Free
|
|
|
|
// Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
|
|
|
|
// MA 02111-1307, USA
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
// $Id$
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
// Read areas from AdeptXBBS
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
|
|
|
|
#include <cstdlib>
|
|
|
|
#include <gcrcall.h>
|
|
|
|
#include <gstrall.h>
|
2000-08-23 19:24:19 +00:00
|
|
|
#undef GCFG_NOXBBS
|
2000-02-25 10:15:17 +00:00
|
|
|
#include <gedacfg.h>
|
|
|
|
#include <gs_xbbs.h>
|
|
|
|
|
|
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
|
|
|
|
void gareafile::ReadAdeptXbbsFile(char* path, char* file, char* options) {
|
|
|
|
|
|
|
|
const word CRC_ADDRESS = 0xFDD6;
|
|
|
|
const word CRC_AREABEGIN = 0x44D7;
|
|
|
|
const word CRC_AREAEND = 0xBDEF;
|
|
|
|
const word CRC_DESC = 0x8A2A;
|
|
|
|
const word CRC_FLAGS = 0xF81A;
|
|
|
|
const word CRC_NAME = 0x3B63;
|
|
|
|
const word CRC_NUMBER = 0x2FBC;
|
|
|
|
const word CRC_ORIGIN = 0x4CE5;
|
|
|
|
const word CRC_PATH = 0x0212;
|
|
|
|
const word CRC_USENET = 0xD087;
|
|
|
|
|
|
|
|
AreaCfg aa;
|
2005-10-20 21:41:32 +00:00
|
|
|
uint32_t flags;
|
2000-02-25 10:15:17 +00:00
|
|
|
char buf[512];
|
|
|
|
char name[256];
|
|
|
|
char usenet[256];
|
|
|
|
Path apath;
|
|
|
|
|
|
|
|
FILE* fp = fsopen(file, "rb", sharemode);
|
|
|
|
if(fp) {
|
|
|
|
setvbuf(fp, NULL, _IOFBF, 8192);
|
|
|
|
|
|
|
|
if(not quiet)
|
2001-07-16 20:35:42 +00:00
|
|
|
std::cout << "* Reading " << file << std::endl;
|
2000-02-25 10:15:17 +00:00
|
|
|
|
|
|
|
aa.reset();
|
|
|
|
|
|
|
|
while(fgets(buf, sizeof(buf), fp)) {
|
|
|
|
|
|
|
|
char* ptr = strskip_wht(strtrim(buf));
|
|
|
|
if(*ptr != ';' and *ptr) {
|
|
|
|
|
|
|
|
char* key;
|
|
|
|
char* val = ptr;
|
|
|
|
switch(getkeyvalcrc(&key, &val)) {
|
|
|
|
case CRC_AREABEGIN:
|
|
|
|
aa.reset();
|
|
|
|
sprintf(apath, "%sMessage_Bases\\", path);
|
|
|
|
*usenet = NUL;
|
|
|
|
break;
|
|
|
|
case CRC_AREAEND:
|
|
|
|
aa.setechoid(*usenet ? usenet : name);
|
2003-12-10 08:35:16 +00:00
|
|
|
if(streql(aa.basetype, "OPUS") or streql(aa.basetype, "FTS1"))
|
|
|
|
aa.setpath(apath);
|
|
|
|
else {
|
|
|
|
sprintf(buf, "%s%s", apath, name);
|
|
|
|
aa.setpath(buf);
|
|
|
|
}
|
2000-02-25 10:15:17 +00:00
|
|
|
AddNewArea(aa);
|
|
|
|
aa.reset();
|
|
|
|
break;
|
|
|
|
case CRC_ADDRESS:
|
|
|
|
aa.aka.set(val);
|
|
|
|
break;
|
|
|
|
case CRC_DESC:
|
|
|
|
aa.setdesc(val);
|
|
|
|
break;
|
|
|
|
case CRC_FLAGS:
|
|
|
|
flags = atol(val);
|
|
|
|
if(flags & (M_NET | M_EMAIL)) {
|
|
|
|
if(flags & M_EMAIL) {
|
|
|
|
aa.type = GMB_NET|GMB_EMAIL;
|
|
|
|
aa.attr = attribsemail;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
aa.type = GMB_NET;
|
|
|
|
aa.attr = attribsnet;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else if(flags & (M_ECHO | M_GROUP | M_USENET)) {
|
|
|
|
if(flags & M_USENET) {
|
|
|
|
aa.type = GMB_ECHO|GMB_NEWSGROUP;
|
|
|
|
aa.attr = attribsnews;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
aa.type = GMB_ECHO;
|
|
|
|
aa.attr = attribsecho;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
aa.type = GMB_LOCAL;
|
|
|
|
aa.attr = attribslocal;
|
|
|
|
}
|
|
|
|
if(flags & M_SQUISH)
|
2003-12-10 08:35:16 +00:00
|
|
|
aa.basetype = "SQUISH";
|
2000-02-25 10:15:17 +00:00
|
|
|
else if(flags & M_FIDO)
|
2003-12-10 08:35:16 +00:00
|
|
|
aa.basetype = "OPUS";
|
2000-02-25 10:15:17 +00:00
|
|
|
else if(flags & M_JAM)
|
2003-12-10 08:35:16 +00:00
|
|
|
aa.basetype = "JAM";
|
2000-02-25 10:15:17 +00:00
|
|
|
else
|
2003-12-10 08:35:16 +00:00
|
|
|
aa.basetype = "ADEPTXBBS";
|
2000-02-25 10:15:17 +00:00
|
|
|
break;
|
|
|
|
case CRC_USENET:
|
|
|
|
strcpy(usenet, val);
|
|
|
|
break;
|
|
|
|
case CRC_NAME:
|
|
|
|
strcpy(name, val);
|
|
|
|
break;
|
|
|
|
case CRC_NUMBER:
|
|
|
|
aa.board = atoi(val);
|
|
|
|
break;
|
|
|
|
case CRC_ORIGIN:
|
|
|
|
aa.setorigin(val);
|
|
|
|
break;
|
|
|
|
case CRC_PATH:
|
|
|
|
PathCopy(apath, val);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
fclose(fp);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
// Read areas from AdeptXBBS
|
|
|
|
|
|
|
|
void gareafile::ReadAdeptXBBS(char* tag) {
|
|
|
|
|
|
|
|
char options[80];
|
|
|
|
Path file, path, cfg;
|
|
|
|
|
|
|
|
*path = NUL;
|
2005-12-08 18:48:15 +00:00
|
|
|
options[79] = 0;
|
2000-02-25 10:15:17 +00:00
|
|
|
strcpy(cfg, "System\\Message_Areas");
|
2005-12-08 18:48:15 +00:00
|
|
|
strncpy(options, tag, 79);
|
2000-02-25 10:15:17 +00:00
|
|
|
char* ptr = strtok(tag, " \t");
|
|
|
|
while(ptr) {
|
|
|
|
if(*ptr != '-')
|
|
|
|
AddBackslash(strcpy(path, ptr));
|
|
|
|
ptr = strtok(NULL, " \t");
|
|
|
|
}
|
|
|
|
if(*path == NUL)
|
|
|
|
strcpy(path, areapath);
|
|
|
|
|
|
|
|
strcpy(stpcpy(file, path), cfg);
|
|
|
|
|
2001-05-05 21:41:41 +00:00
|
|
|
CfgAdeptxbbspath(path);
|
2000-02-25 10:15:17 +00:00
|
|
|
|
|
|
|
ReadAdeptXbbsFile(path, file, options);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
// ------------------------------------------------------------------
|