270 lines
7.2 KiB
C++
270 lines
7.2 KiB
C++
// This may look like C code, but it is really -*- C++ -*-
|
|
|
|
// ------------------------------------------------------------------
|
|
// The Goldware Library
|
|
// Copyright (C) 1999-2002 Alexander S. Aganichev
|
|
// ------------------------------------------------------------------
|
|
// 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 Crashmail II/CrashEcho
|
|
// ------------------------------------------------------------------
|
|
|
|
#include <cstdlib>
|
|
#include <gcrcall.h>
|
|
#include <gstrall.h>
|
|
#undef GCFG_NOCMAIL
|
|
#include <gedacfg.h>
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
bool gareafile::jbstrcpy(char *dest, char *src, size_t maxlen, size_t *jbc) {
|
|
size_t d=0;
|
|
size_t stopchar1,stopchar2;
|
|
size_t jbcpos;
|
|
|
|
jbcpos= *jbc;
|
|
|
|
while(isspace(src[jbcpos])) jbcpos++;
|
|
|
|
if(src[jbcpos]=='\"') {
|
|
jbcpos++;
|
|
stopchar1='\"';
|
|
stopchar2=0;
|
|
}
|
|
else {
|
|
stopchar1=' ';
|
|
stopchar2=9;
|
|
}
|
|
|
|
while(src[jbcpos]!=stopchar1 and src[jbcpos]!=stopchar2 and src[jbcpos]!='\n' and src[jbcpos]!=NUL and d<maxlen-1) {
|
|
if(src[jbcpos]=='\\' and src[jbcpos+1]!=NUL and src[jbcpos+1]!='\n') {
|
|
jbcpos++;
|
|
dest[d++]=src[jbcpos++];
|
|
}
|
|
else
|
|
dest[d++]=src[jbcpos++];
|
|
}
|
|
dest[d]=0;
|
|
if(isspace(src[jbcpos]) or src[jbcpos]=='\"') jbcpos++;
|
|
|
|
*jbc=jbcpos;
|
|
|
|
if(d!=0 or stopchar1=='\"') return true;
|
|
return false;
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
// Read areas from Crashmail II/CrashEcho (echomail processor)
|
|
|
|
void gareafile::ReadCrashmailCfg(const char* file) {
|
|
|
|
FILE* fp = fsopen(file, "rb", sharemode);
|
|
if(fp) {
|
|
setvbuf(fp, NULL, _IOFBF, 8192);
|
|
|
|
if(not quiet)
|
|
std::cout << "* Reading " << file << std::endl;
|
|
|
|
char buf[4000];
|
|
char key[30];
|
|
char tmp[100], address[50], domain[50];
|
|
Path path;
|
|
bool unconfirmed = true;
|
|
size_t jbcpos;
|
|
AreaCfg aa;
|
|
aa.reset();
|
|
aa.type = GMB_NONE;
|
|
address[0] = NUL;
|
|
domain[0] = NUL;
|
|
|
|
const word CRC_AKA = 0x13A4;
|
|
const word CRC_AREA = 0x010B;
|
|
#ifndef GCFG_NOCECHO
|
|
const word CRC_AREAFILE = 0xB487;
|
|
#endif
|
|
const word CRC_LOCALAREA = 0xAEC1;
|
|
const word CRC_DESCRIPTION = 0x2DF1;
|
|
const word CRC_DOMAIN = 0xFFCA;
|
|
const word CRC_GROUP = 0x1C9B;
|
|
const word CRC_NETMAIL = 0xE42E;
|
|
#ifndef GCFG_NOCECHO
|
|
const word CRC_NETMAILDIR = 0x180A;
|
|
#endif
|
|
const word CRC_SYSOP = 0x967F;
|
|
const word CRC_UNCONFIRMED = 0x195E;
|
|
|
|
const word CRC_MSG = 0xCA2E;
|
|
const word CRC_JAM = 0xA8C3;
|
|
const word CRC_SQUISH = 0xFCF6;
|
|
|
|
word crc16;
|
|
|
|
while(fgets(buf, 4000, fp) != NULL) {
|
|
jbcpos=0;
|
|
jbstrcpy(key, buf, 30, &jbcpos);
|
|
switch(crc16 = strCrc16(key)) {
|
|
case CRC_SYSOP:
|
|
jbstrcpy(tmp, buf, 100, &jbcpos);
|
|
CfgUsername(tmp);
|
|
break;
|
|
case CRC_AKA:
|
|
if(address[0]) {
|
|
strxmerge(tmp, 100, address, "@", domain, NULL);
|
|
CfgAddress(tmp);
|
|
}
|
|
jbstrcpy(address, buf, 50, &jbcpos);
|
|
break;
|
|
case CRC_DOMAIN:
|
|
jbstrcpy(domain, buf, 50, &jbcpos);
|
|
break;
|
|
#ifndef GCFG_NOCECHO
|
|
case CRC_AREAFILE:
|
|
jbstrcpy(path, buf, sizeof(Path), &jbcpos);
|
|
ReadCrashmail(path);
|
|
break;
|
|
case CRC_NETMAILDIR:
|
|
if(aa.type != GMB_NONE) {
|
|
if(not unconfirmed)
|
|
AddNewArea(aa);
|
|
aa.reset();
|
|
}
|
|
aa.aka = primary_aka;
|
|
aa.type = GMB_NET;
|
|
aa.attr = attribsnet;
|
|
aa.msgbase = fidomsgtype;
|
|
jbstrcpy(path, buf, sizeof(Path), &jbcpos);
|
|
aa.setpath(path);
|
|
aa.setdesc("CrashEcho Netmail");
|
|
aa.setautoid("NETMAIL");
|
|
unconfirmed = false;
|
|
break;
|
|
#endif
|
|
case CRC_AREA:
|
|
case CRC_NETMAIL:
|
|
case CRC_LOCALAREA:
|
|
if(aa.type != GMB_NONE) {
|
|
if(not unconfirmed)
|
|
AddNewArea(aa);
|
|
aa.reset();
|
|
}
|
|
unconfirmed = false;
|
|
jbstrcpy(tmp, buf, 100, &jbcpos);
|
|
if(strieql(tmp, "DEFAULT") or strnieql(tmp, "DEFAULT_", 8)) {
|
|
aa.type = GMB_NONE;
|
|
break;
|
|
}
|
|
switch(crc16) {
|
|
case CRC_NETMAIL:
|
|
aa.type = GMB_NET;
|
|
aa.attr = attribsnet;
|
|
break;
|
|
case CRC_AREA:
|
|
aa.type = GMB_ECHO;
|
|
aa.attr = attribsecho;
|
|
break;
|
|
case CRC_LOCALAREA:
|
|
aa.type = GMB_LOCAL;
|
|
aa.attr = attribslocal;
|
|
break;
|
|
}
|
|
aa.setechoid(tmp);
|
|
jbstrcpy(tmp, buf, 50, &jbcpos);
|
|
aa.aka = primary_aka;
|
|
aa.aka.set(tmp);
|
|
jbstrcpy(tmp, buf, 10, &jbcpos);
|
|
switch(strCrc16(tmp)) {
|
|
case CRC_MSG:
|
|
aa.msgbase = fidomsgtype;
|
|
break;
|
|
case CRC_JAM:
|
|
aa.msgbase = GMB_JAM;
|
|
break;
|
|
case CRC_SQUISH:
|
|
aa.msgbase = GMB_SQUISH;
|
|
break;
|
|
default:
|
|
aa.reset();
|
|
aa.type = GMB_NONE;
|
|
break;
|
|
}
|
|
if(aa.type == GMB_NONE)
|
|
break;
|
|
jbstrcpy(path, buf, sizeof(Path), &jbcpos);
|
|
aa.setpath(path);
|
|
break;
|
|
case CRC_DESCRIPTION:
|
|
jbstrcpy(tmp, buf, 100, &jbcpos);
|
|
aa.setdesc(tmp);
|
|
break;
|
|
case CRC_UNCONFIRMED:
|
|
unconfirmed = true;
|
|
break;
|
|
case CRC_GROUP:
|
|
if(jbstrcpy(tmp, buf, 100, &jbcpos)) {
|
|
if(isdigit(tmp[0]))
|
|
aa.groupid = 0x8000+atoi(tmp);
|
|
else if(isalpha(tmp[0]))
|
|
aa.groupid = toupper(tmp[0]);
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if(aa.type != GMB_NONE) {
|
|
if(not unconfirmed) {
|
|
AddNewArea(aa);
|
|
}
|
|
}
|
|
if(address[0]) {
|
|
strxmerge(tmp, 100, address, "@", domain, NULL);
|
|
CfgAddress(tmp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
// Initialize parser
|
|
|
|
void gareafile::ReadCrashmail(char* tag) {
|
|
|
|
Path file, path;
|
|
char options[80];
|
|
|
|
strcpy(options, tag);
|
|
char* ptr = strtok(tag, " \t");
|
|
while(ptr) {
|
|
if(*ptr != '-') {
|
|
strcpy(file, ptr);
|
|
strschg_environ(file);
|
|
}
|
|
ptr = strtok(NULL, " \t");
|
|
}
|
|
|
|
extractdirname(path, file);
|
|
|
|
CfgSquishuserpath(path);
|
|
|
|
ReadCrashmailCfg(file);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|