This repository has been archived on 2024-04-08. You can view files and clone it, but cannot push or open issues or pull requests.
deb-goldedplus/golded3/gcalst.cpp

415 lines
11 KiB
C++
Raw Normal View History

2000-02-25 11:04:07 +00:00
// ------------------------------------------------------------------
// GoldED+
// Copyright (C) 1990-1999 Odinn Sorensen
// Copyright (C) 1999-2000 Alexander S. Aganichev
// ------------------------------------------------------------------
// 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.
//
// This program 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
// General Public License for more details.
//
// You should have received a copy of the GNU 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$
// ------------------------------------------------------------------
// Arealist configuration and other one-time stuff.
// ------------------------------------------------------------------
#include <cerrno>
#include <fcntl.h>
#include <golded.h>
#include <gmoprot.h>
2006-05-14 14:33:21 +00:00
#include "geglob.h"
2000-02-25 11:04:07 +00:00
// FTS-0001 is FTS so leave it anyway :-)
#include <gmofido.h>
#ifndef GMB_NOEZY
#include <gmoezyc.h>
#endif
#if !defined(GMB_NOHUDS) || !defined(GMB_NOGOLD)
2000-02-25 11:04:07 +00:00
#include <gmohuds.h>
#endif
#ifndef GMB_NOJAM
#include <gmojamm.h>
#endif
#ifndef GMB_NOSQSH
#include <gmosqsh.h>
#endif
#ifndef GMB_NOPCB
#include <gmopcbd.h>
#endif
#ifndef GMB_NOWCAT
#include <gmowcat.h>
#endif
#ifndef GMB_NOXBBS
#include <gmoxbbs.h>
#endif
#ifndef GMB_NOSMB
#include <gmosmb.h>
#endif
// ------------------------------------------------------------------
// Arealist constructor
AreaList::AreaList() : idx() {
item = idx.begin();
*sortspec = NUL;
for(uint i = 0; i < 16; i++)
*alistselections[0] = NUL;
}
// ------------------------------------------------------------------
// Arealist destructor
AreaList::~AreaList() {
Reset();
}
// ------------------------------------------------------------------
void AreaList::SetDefaultMarks() {
strcpy(alistselections[0], LNG->ArealistSelections1);
for(uint i = 1; i < 16; i++)
strcpy(alistselections[i], LNG->ArealistSelections2);
}
// ------------------------------------------------------------------
// Arealist deallocate and reset data
void AreaList::Reset() {
ListScan.Reset();
while(not idx.empty()) {
delete idx.back();
idx.pop_back();
}
}
// ------------------------------------------------------------------
// Return a new'ed area of the specified format
2003-12-10 08:35:16 +00:00
Area* AreaList::NewArea(const char *basetype) {
2000-02-25 11:04:07 +00:00
gmo_area* ap = NULL;
2003-12-10 08:35:16 +00:00
if(streql(basetype, "SEPARATOR")) ap = new SepArea;
else if(streql(basetype, "FTS1") or streql(basetype, "OPUS")) ap = new FidoArea;
#ifndef GMB_NOEZY
else if(streql(basetype, "EZYCOM")) ap = new EzycomArea;
#endif
#ifndef GMB_NOGOLD
else if(streql(basetype, "GOLDBASE")) ap = new GoldArea;
#endif
#ifndef GMB_NOHUDS
else if(streql(basetype, "HUDSON")) ap = new HudsArea;
#endif
#ifndef GMB_NOJAM
else if(streql(basetype, "JAM")) ap = new JamArea;
#endif
#ifndef GMB_NOPCB
else if(streql(basetype, "PCBOARD")) ap = new PcbArea;
#endif
#ifndef GMB_NOSQSH
else if(streql(basetype, "SQUISH")) ap = new SquishArea;
#endif
#ifndef GMB_NOWCAT
else if(streql(basetype, "WILDCAT")) ap = new WCatArea;
#endif
#ifndef GMB_NOXBBS
else if(streql(basetype, "ADEPTXBBS")) ap = new XbbsArea;
#endif
#ifndef GMB_NOSMB
else if(streql(basetype, "SMB")) ap = new SMBArea;
#endif
2000-02-25 11:04:07 +00:00
return new Area(ap);
}
2007-01-08 12:09:42 +00:00
Area* AreaList::NewArea(const std::string &basetype)
{
return NewArea(basetype.c_str());
}
2000-02-25 11:04:07 +00:00
// ------------------------------------------------------------------
// Write lastreads for the next session
2006-04-24 16:38:44 +00:00
void AreaList::WriteGoldLast()
{
2000-02-25 11:04:07 +00:00
word GOLDLAST_VER = CUR_GOLDLAST_VER;
ggoldlast entry;
Path lst;
strcpy(lst, AddPath(CFG->goldpath, CFG->goldlast));
2006-04-24 16:38:44 +00:00
gfile fp(lst, "wb", CFG->sharemode);
if (fp.isopen())
{
fp.SetvBuf(NULL, _IOFBF, 8192);
fp.Fwrite(&GOLDLAST_VER, sizeof(word));
fp.Fwrite(AL.alistselections, sizeof(AL.alistselections));
2000-02-25 11:04:07 +00:00
for(area_iterator ap = idx.begin(); ap != idx.end(); ap++) {
if((*ap)->isscanned and not (*ap)->isseparator()) {
// Write fixed header
entry.crcechoid = strCrc32((*ap)->echoid(), false);
entry.lastread = (*ap)->lastread();
entry.msgncount = (*ap)->Msgn.Count();
entry.unread = (*ap)->unread;
entry.marks = (*ap)->marks;
entry.flags = 0;
if((*ap)->isscanned)
entry.flags |= 1;
if((*ap)->isvalidchg)
entry.flags |= 2;
if((*ap)->isunreadchg)
entry.flags |= 4;
2006-04-24 16:38:44 +00:00
fp.Fwrite(&entry, sizeof(entry));
2000-02-25 11:04:07 +00:00
// Write variable length extensions
(*ap)->Mark.Save(fp);
(*ap)->PMrk.Save(fp);
}
}
}
}
// ------------------------------------------------------------------
// Read the lastreads from the last session
2006-04-24 16:38:44 +00:00
void AreaList::ReadGoldLast()
{
2000-02-25 11:04:07 +00:00
word GOLDLAST_VER;
ggoldlast entry;
2006-05-14 14:33:21 +00:00
2006-04-24 16:38:44 +00:00
gfile fp(AddPath(CFG->goldpath, CFG->goldlast), "rb", CFG->sharemode);
if (fp.isopen())
{
fp.SetvBuf(NULL, _IOFBF, 8192);
fp.Fread(&GOLDLAST_VER, sizeof(word));
if (GOLDLAST_VER != CUR_GOLDLAST_VER)
2000-02-25 11:04:07 +00:00
return;
2006-04-24 16:38:44 +00:00
fp.Fread(AL.alistselections, sizeof(AL.alistselections));
2000-02-25 11:04:07 +00:00
2006-04-24 16:38:44 +00:00
while (fp.Fread(&entry, sizeof(entry)))
{
2000-02-25 11:04:07 +00:00
bool found = false;
2006-05-14 14:33:21 +00:00
2000-02-25 11:04:07 +00:00
for(area_iterator ap = idx.begin(); ap != idx.end(); ap++) {
if(strCrc32((*ap)->echoid(), false) == entry.crcechoid) {
(*ap)->set_lastread(entry.lastread);
(*ap)->Msgn.count = entry.msgncount;
(*ap)->unread = entry.unread;
(*ap)->marks = entry.marks;
2005-10-25 06:11:09 +00:00
(*ap)->isscanned = make_bool(entry.flags & 1);
(*ap)->isvalidchg = make_bool(entry.flags & 2);
2000-02-25 11:04:07 +00:00
(*ap)->UpdateAreadata();
2005-10-25 06:11:09 +00:00
(*ap)->isunreadchg = make_bool(entry.flags & 4);
2000-02-25 11:04:07 +00:00
(*ap)->Mark.Load(fp);
(*ap)->PMrk.Load(fp);
2006-05-14 14:33:21 +00:00
2000-02-25 11:04:07 +00:00
found = true;
break;
}
}
2006-05-14 14:33:21 +00:00
2006-04-24 16:38:44 +00:00
if (not found)
{
2000-02-25 11:04:07 +00:00
// skip stored message marks
dword dw;
2006-04-24 16:38:44 +00:00
fp.Fread(&dw, sizeof(dword));
fp.Fseek(dw*sizeof(dword), SEEK_CUR);
fp.Fread(&dw, sizeof(dword));
fp.Fseek(dw*sizeof(dword), SEEK_CUR);
2000-02-25 11:04:07 +00:00
}
}
}
}
// ------------------------------------------------------------------
// Write all areas to GOLDAREA.INC in AREADEF format
2006-04-26 17:06:23 +00:00
void AreaList::WriteAreaDef(const char* file)
{
2000-02-25 11:04:07 +00:00
int tmp;
Path path;
char groupid[10], echoid[sizeof(Echo)+2];
int maxechoid=0, maxdesc=0, maxgroupid=0, maxpath=0, maxaddr=0, maxattr=0;
2003-12-10 08:35:16 +00:00
char desc[sizeof(Desc)+2], type[6], msgbase[9], addr[40], attr[150], origin[163];
2000-02-25 11:04:07 +00:00
2006-04-26 17:06:23 +00:00
gfile fp(file, "wt", CFG->sharemode);
if (fp.isopen())
{
2000-02-25 11:04:07 +00:00
area_iterator aa;
for(aa = idx.begin(); aa != idx.end(); aa++) {
tmp = strlen((*aa)->echoid());
if(strchr((*aa)->echoid(), ' '))
tmp += 2;
maxechoid = MaxV(maxechoid, tmp);
tmp = strlen((*aa)->desc())+2;
maxdesc = MaxV(maxdesc, tmp);
tmp = strlen((*aa)->path());
if(strchr((*aa)->path(), ' '))
tmp += 2;
maxpath = MaxV(maxpath, tmp);
2006-05-14 17:17:32 +00:00
if ((*aa)->groupid() & 0x8000u)
gsprintf(PRINTF_DECLARE_BUFFER(groupid), "#%u", (*aa)->groupid()&0x7FFF);
else if (g_isupper((*aa)->groupid()))
2000-02-25 11:04:07 +00:00
*groupid = (char)(*aa)->groupid(), groupid[1] = NUL;
else
*groupid = '0', groupid[1] = NUL;
tmp = strlen(groupid);
maxgroupid = MaxV(maxgroupid, tmp);
if(memcmp(&(*aa)->aka(), &CFG->aka[0], sizeof(Addr)))
(*aa)->aka().make_string(addr);
else
strcpy(addr, ".");
tmp = strlen(addr);
maxaddr = MaxV(maxaddr, tmp);
2001-03-03 13:16:14 +00:00
tmp = strlen(MakeAttrStr(attr, sizeof(attr), &(*aa)->attr()));
2000-02-25 11:04:07 +00:00
maxattr = MaxV(maxattr, tmp+2);
}
2006-05-14 17:17:32 +00:00
for (aa = idx.begin(); aa != idx.end(); aa++)
{
gsprintf(PRINTF_DECLARE_BUFFER(desc), "\"%s\"", (*aa)->desc());
if ((*aa)->groupid() & 0x8000u)
gsprintf(PRINTF_DECLARE_BUFFER(groupid), "#%u", (*aa)->groupid()&0x7FFF);
else if (g_isupper((*aa)->groupid()))
2000-02-25 11:04:07 +00:00
*groupid = (char)(*aa)->groupid(), groupid[1] = NUL;
else
*groupid = '0', groupid[1] = NUL;
if((*aa)->isemail())
strcpy(type, "EMail");
else if((*aa)->isnewsgroup())
strcpy(type, "News ");
else if((*aa)->isnet())
strcpy(type, "Net ");
else if((*aa)->isecho())
strcpy(type, "Echo ");
else if((*aa)->islocal())
strcpy(type, "Local");
2003-12-10 08:35:16 +00:00
#ifndef GMB_NOXBBS
2007-01-08 12:09:42 +00:00
if ((*aa)->basetype() == "ADEPTXBBS")
2003-12-10 08:35:16 +00:00
strcpy(msgbase, "XBBS");
else
#endif
2007-01-08 12:09:42 +00:00
strxcpy(msgbase, (*aa)->basetype().c_str(), sizeof(msgbase));
2006-05-14 17:17:32 +00:00
if (strchr((*aa)->echoid(), ' '))
gsprintf(PRINTF_DECLARE_BUFFER(echoid), "\"%s\"", (*aa)->echoid());
2000-02-25 11:04:07 +00:00
else
strcpy(echoid, (*aa)->echoid());
2006-04-26 17:06:23 +00:00
if ((*aa)->isseparator())
{
fp.Printf("AREASEP %-*s %-*s %*s %s\n",
2000-02-25 11:04:07 +00:00
maxechoid, echoid,
maxdesc, desc,
maxgroupid, groupid,
strtrim(type)
);
}
2006-05-14 17:17:32 +00:00
else
{
if (strchr((*aa)->path(), ' '))
gsprintf(PRINTF_DECLARE_BUFFER(path), "\"%s\"", (*aa)->path());
2000-02-25 11:04:07 +00:00
else
strcpy(path, (*aa)->path());
if(memcmp(&(*aa)->aka(), &CFG->aka[0], sizeof(Addr)))
(*aa)->aka().make_string(addr);
else
strcpy(addr, ".");
*attr = '('; /*)*/
2001-03-03 13:16:14 +00:00
MakeAttrStr(attr+1, sizeof(attr)-2, &(*aa)->attr());
2000-02-25 11:04:07 +00:00
strcat(attr, /*(*/ ")");
2006-05-14 17:17:32 +00:00
if ((*aa)->originno())
gsprintf(PRINTF_DECLARE_BUFFER(origin), " \"%.*s\"", (int)sizeof(origin)-4, CFG->origin[(*aa)->originno()].c_str());
2000-02-25 11:04:07 +00:00
else
*origin = NUL;
2006-04-26 17:06:23 +00:00
fp.Printf("AREADEF %-*s %-*s %*s %s %s %-*s %-*s %-*s%s\n",
2000-02-25 11:04:07 +00:00
maxechoid, echoid,
maxdesc, desc,
maxgroupid, groupid,
type,
msgbase,
maxpath, path,
maxaddr, addr,
maxattr, attr,
origin
);
}
}
}
}
// ------------------------------------------------------------------
void SetAreaDesc(char* echoid, char* desc) {
AL.SetAreaDesc(echoid, desc);
}
// ------------------------------------------------------------------
void AreaList::SetAreaDesc(char* echoid, char* desc) {
for(area_iterator ap = idx.begin(); ap != idx.end(); ap++) {
if(strieql(echoid, (*ap)->echoid())) {
(*ap)->set_desc(desc);
break;
}
}
}
// ------------------------------------------------------------------
2003-12-10 08:35:16 +00:00
#ifndef GMB_NOPCB
2007-01-08 12:09:42 +00:00
void PcbAdjustArea(uint rec, const char* msgfile)
{
for (uint n=0; n<AL.size(); n++)
{
2000-02-25 11:04:07 +00:00
Area* a = AL[n];
2007-01-08 12:09:42 +00:00
if (a->basetype() == "PCBOARD")
{
2000-02-25 11:04:07 +00:00
if((a->board() == rec) and (*a->path() == NUL)) {
a->set_path(msgfile);
break;
}
else if(strieql(a->path(), msgfile)) {
a->set_board(rec);
break;
}
}
}
}
2003-12-10 08:35:16 +00:00
#endif
2000-02-25 11:04:07 +00:00
// ------------------------------------------------------------------