285 lines
6.9 KiB
C++
285 lines
6.9 KiB
C++
// 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$
|
|
// ------------------------------------------------------------------
|
|
// Squish msgbase handling and Maximus user functions.
|
|
// ------------------------------------------------------------------
|
|
|
|
#include <gdbgerr.h>
|
|
#include <gmemdbg.h>
|
|
#include <gdbgtrk.h>
|
|
#include <gstrall.h>
|
|
#include <gmosqsh.h>
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
SqshData* squishdata = NULL;
|
|
SqshWide* squishwide = NULL;
|
|
int squishdatano = 0;
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::data_open() {
|
|
|
|
wide = squishwide;
|
|
data = squishdata + (squishdatano++);
|
|
data->islocked = false;
|
|
data->softlock = false;
|
|
data->fhsqd = data->fhsqi = -1;
|
|
data->idx = NULL;
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::data_close() {
|
|
|
|
squishdatano--;
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishExit() {
|
|
|
|
if(squishwide)
|
|
delete squishwide->user;
|
|
throw_release(squishwide);
|
|
throw_release(squishdata);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishInit(const char* userpath, int userno, int direct, int recycle, int squishscan) {
|
|
|
|
squishdata = (SqshData*)throw_calloc(3, sizeof(SqshData));
|
|
squishwide = (SqshWide*)throw_calloc(1, sizeof(SqshWide));
|
|
|
|
squishwide->userpath = userpath;
|
|
squishwide->userno = userno;
|
|
squishwide->direct = direct;
|
|
squishwide->recycle = recycle;
|
|
squishwide->squishscan = squishscan;
|
|
|
|
squishwide->user = new MaximusUser;
|
|
throw_new(squishwide->user);
|
|
|
|
Path userfile;
|
|
strxcpy(userfile, AddPath(userpath, "USER.BBS"), sizeof(Path));
|
|
const char* _username = WideUsername[0];
|
|
if (squishwide->userno == -1)
|
|
{
|
|
squishwide->user->gufh = ::sopen(userfile, O_RDWR|O_CREAT|O_BINARY, WideSharemode, S_STDRW);
|
|
if (squishwide->user->gufh != -1)
|
|
{
|
|
squishwide->user->find(_username);
|
|
if(not squishwide->user->found) {
|
|
WideLog->printf("* User \"%s\" not found in %s.", _username, userfile);
|
|
squishwide->user->add(_username);
|
|
WideLog->printf("* Now added with user number %u.", squishwide->user->index);
|
|
}
|
|
close(squishwide->user->gufh);
|
|
}
|
|
squishwide->userno = squishwide->user->index;
|
|
}
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::raw_close() {
|
|
|
|
GFTRK("SquishRawClose");
|
|
|
|
if(data->fhsqi != -1) ::close(data->fhsqi); data->fhsqi = -1;
|
|
if(data->fhsqd != -1) ::close(data->fhsqd); data->fhsqd = -1;
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
int SquishArea::test_open(const char* __file) {
|
|
|
|
GFTRK("SquishTestOpen");
|
|
|
|
int _fh;
|
|
long _tries = 0;
|
|
|
|
do {
|
|
|
|
_fh = ::sopen(__file, O_RDWR|O_BINARY|O_CREAT, WideSharemode, S_STDRW);
|
|
if(_fh == -1) {
|
|
|
|
// Tell the world
|
|
if((errno != EACCES) or (PopupLocked(++_tries, false, __file) == false)) {
|
|
|
|
// User requested to exit
|
|
WideLog->ErrOpen();
|
|
raw_close();
|
|
WideLog->printf("! A Squish msgbase file could not be opened.");
|
|
WideLog->printf(": %s.", __file);
|
|
WideLog->ErrOSInfo();
|
|
OpenErrorExit();
|
|
}
|
|
}
|
|
} while(_fh == -1);
|
|
|
|
// Remove the popup window
|
|
if(_tries)
|
|
PopupLocked(0, 0, NULL);
|
|
|
|
GFTRK(0);
|
|
|
|
return _fh;
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::raw_open() {
|
|
|
|
GFTRK("SquishRawOpen");
|
|
|
|
data->fhsqd = test_open(AddPath(real_path(), ".sqd"));
|
|
data->fhsqi = test_open(AddPath(real_path(), ".sqi"));
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
// Open the Squish message base
|
|
|
|
void SquishArea::open() {
|
|
|
|
GFTRK("SquishOpen");
|
|
|
|
isopen++;
|
|
if(isopen > 2) {
|
|
WideLog->ErrTest();
|
|
WideLog->printf("! Trying to open a Squish msgbase more than twice.");
|
|
WideLog->printf(": %s, %s.", echoid(), path());
|
|
WideLog->printf("+ Info: This indicates a serious bug.");
|
|
WideLog->printf("+ Advice: Report to the Author immediately.");
|
|
TestErrorExit();
|
|
}
|
|
if(isopen == 1) {
|
|
if(ispacked()) {
|
|
isopen--;
|
|
const char* newpath = Unpack(path());
|
|
if(newpath == NULL)
|
|
packed(false);
|
|
set_real_path(newpath ? newpath : path());
|
|
isopen++;
|
|
}
|
|
data_open();
|
|
raw_open();
|
|
refresh();
|
|
scan();
|
|
}
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::save_lastread() {
|
|
|
|
GFTRK("SquishSaveLastread");
|
|
|
|
int _fh = ::sopen(AddPath(real_path(), ".sql"), O_RDWR|O_CREAT|O_BINARY, WideSharemode, S_STDRW);
|
|
if(_fh != -1) {
|
|
lseekset(_fh, wide->userno, sizeof(dword));
|
|
dword _lastread = Msgn->CvtReln(lastread);
|
|
write(_fh, &_lastread, sizeof(dword));
|
|
::close(_fh);
|
|
}
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::close() {
|
|
|
|
GFTRK("SquishClose");
|
|
|
|
if(isopen) {
|
|
if(isopen == 1) {
|
|
save_lastread();
|
|
raw_close();
|
|
Msgn->Reset();
|
|
throw_xrelease(data->idx);
|
|
data_close();
|
|
if(ispacked()) {
|
|
CleanUnpacked(real_path());
|
|
}
|
|
}
|
|
isopen--;
|
|
}
|
|
else {
|
|
WideLog->ErrTest();
|
|
WideLog->printf("! Trying to close an already closed Squish msgbase.");
|
|
WideLog->printf(": %s, %s.", echoid(), path());
|
|
WideLog->printf("+ Info: This indicates a potentially serious bug.");
|
|
WideLog->printf("+ Advice: Report to the Author immediately.");
|
|
TestErrorExit();
|
|
}
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::suspend() {
|
|
|
|
GFTRK("SquishSuspend");
|
|
|
|
save_lastread();
|
|
raw_close();
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|
|
|
|
void SquishArea::resume() {
|
|
|
|
GFTRK("SquishResume");
|
|
|
|
raw_open();
|
|
|
|
GFTRK(0);
|
|
}
|
|
|
|
|
|
// ------------------------------------------------------------------
|