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-mbse/mbfido/dirsession.c

221 lines
5.6 KiB
C
Raw Normal View History

2002-08-03 19:52:57 +00:00
/*****************************************************************************
*
* $Id$
* Purpose ...............: Directory Mail/Files sessions
*
*****************************************************************************
2005-08-28 15:33:23 +00:00
* Copyright (C) 1997-2005
2002-08-03 19:52:57 +00:00
*
* Michiel Broek FIDO: 2:280/2802
* Beekmansbos 10
* 1971 BV IJmuiden
* the Netherlands
*
* This file is part of MBSE BBS.
*
* This BBS 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, or (at your option) any
* later version.
*
* MBSE BBS 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 MBSE BBS; see the file COPYING. If not, write to the Free
2003-08-15 20:05:34 +00:00
* Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
2002-08-03 19:52:57 +00:00
*****************************************************************************/
#include "../config.h"
2004-02-21 17:22:00 +00:00
#include "../lib/mbselib.h"
2002-08-03 19:52:57 +00:00
#include "dirsession.h"
extern int do_unprot;
/*
* Check for lock, return TRUE if node is locked.
*/
2002-08-05 13:30:44 +00:00
int islocked(char *lockfile, int chklck, int waitclr, int loglvl)
2002-08-03 19:52:57 +00:00
{
int i;
time_t now, ftime;
if (chklck && strlen(lockfile)) {
2002-08-05 13:30:44 +00:00
Syslog(loglvl, "Checking lockfile %s", lockfile);
2002-08-03 19:52:57 +00:00
/*
* First check for stale lockfile.
*/
if (! file_exist(lockfile, R_OK)) {
ftime = file_time(lockfile);
now = time(NULL);
if ((now - ftime) > 21600) {
Syslog('+', "Removing stale lockfile %s, older then 6 hours", lockfile);
file_rm(lockfile);
}
}
/*
* Next check for lockfile with wait for clear
*/
if ((file_exist(lockfile, R_OK) == 0) && waitclr) {
Syslog('+', "Node is locked, waiting 10 minutes");
i = 120;
while (TRUE) {
sleep(5);
Nopper();
if (file_exist(lockfile, R_OK))
break;
i--;
if (i == 0) {
Syslog('+', "Timeout waiting for lock %s", lockfile);
break;
}
}
}
/*
* Check again if lockfile exists.
*/
if (file_exist(lockfile, R_OK)) {
return FALSE;
} else {
Syslog('+', "Lockfile exists, skipping this node");
return TRUE;
}
}
return FALSE;
}
/*
* Create a 1 byte lockfile if create is TRUE.
* Returns FALSE if failed.
*/
2002-08-05 13:30:44 +00:00
int setlock(char *lockfile, int create, int loglvl)
2002-08-03 19:52:57 +00:00
{
FILE *fp;
char temp[1];
if (create && strlen(lockfile)) {
2002-08-05 13:30:44 +00:00
Syslog(loglvl, "create lockfile %s", lockfile);
2002-08-03 19:52:57 +00:00
if ((fp = fopen(lockfile, "w")) == NULL) {
WriteError("$Can't create lock %s", lockfile);
return FALSE;
}
fwrite(temp, 1, sizeof(char), fp);
fsync(fileno(fp));
fclose(fp);
chmod(lockfile, 0664);
}
return TRUE;
}
/*
* Removing lockfile
*/
2002-08-05 13:30:44 +00:00
void remlock(char *lockfile, int create, int loglvl)
2002-08-03 19:52:57 +00:00
{
if (create) {
if (file_rm(lockfile))
WriteError("$Can't remove lock %s", lockfile);
else
2002-08-05 13:30:44 +00:00
Syslog(loglvl, "Removed lock %s", lockfile);
2002-08-03 19:52:57 +00:00
}
}
2002-11-11 12:56:19 +00:00
/*
* Process directory inbound. Return TRUE if something is moved
* to the inbound for processing.
*/
int dirinbound(void)
2002-08-03 19:52:57 +00:00
{
FILE *fp;
char *temp, *from, *too;
long fileptr;
struct dirent *de;
DIR *dp;
2002-11-11 12:56:19 +00:00
int Something = FALSE;
2002-08-03 19:52:57 +00:00
Syslog('m', "Starting directory inbound sessions");
temp = calloc(PATH_MAX, sizeof(char));
2005-08-28 15:33:23 +00:00
snprintf(temp, PATH_MAX, "%s/etc/nodes.data", getenv("MBSE_ROOT"));
2002-08-03 19:52:57 +00:00
if ((fp = fopen(temp, "r")) != NULL) {
fread(&nodeshdr, sizeof(nodeshdr), 1, fp);
while (fread(&nodes, nodeshdr.recsize, 1, fp) == 1) {
if (nodes.Session_in == S_DIR && strlen(nodes.Dir_in_path)) {
fileptr = ftell(fp) - nodeshdr.recsize;
Syslog('+', "Directory inbound session for node %s", aka2str(nodes.Aka[0]));
2002-08-05 13:30:44 +00:00
if (! islocked(nodes.Dir_in_clock, nodes.Dir_in_chklck, nodes.Dir_in_waitclr, 'm')) {
2002-08-03 19:52:57 +00:00
Syslog('m', "Node is free, start processing");
2002-08-05 13:30:44 +00:00
setlock(nodes.Dir_in_mlock, nodes.Dir_in_mklck, 'm');
2002-08-03 19:52:57 +00:00
if ((dp = opendir(nodes.Dir_in_path)) == NULL) {
WriteError("$Can't open directory %s", nodes.Dir_in_path);
} else {
from = calloc(PATH_MAX, sizeof(char));
too = calloc(PATH_MAX, sizeof(char));
while ((de = readdir(dp))) {
if (strcmp(de->d_name, ".") && strcmp(de->d_name, "..")) {
2005-08-28 15:33:23 +00:00
snprintf(from, PATH_MAX, "%s/%s", nodes.Dir_in_path, de->d_name);
2002-08-03 19:52:57 +00:00
if (access(from, R_OK | W_OK)) {
WriteError("$No rights to move %s", from);
} else {
/*
* Inbound is set by previous toss or tic to
* protected or unprotected inbound.
*/
if (do_unprot)
2005-08-28 15:33:23 +00:00
snprintf(too, PATH_MAX, "%s/%s", CFG.inbound, de->d_name);
2002-08-03 19:52:57 +00:00
else
2005-08-28 15:33:23 +00:00
snprintf(too, PATH_MAX, "%s/%s", CFG.pinbound, de->d_name);
2002-08-03 19:52:57 +00:00
if (access(too, F_OK) == 0) {
WriteError("File %s already in inbound, skip", too);
} else {
Syslog('m', "Move %s to %s", from, too);
if (file_mv(from, too)) {
WriteError("$Move %s to %s failed", from, too);
2002-11-11 12:56:19 +00:00
} else {
Something = TRUE;
Syslog('+', "Moved \"%s\" to %s", de->d_name, do_unprot ? CFG.inbound : CFG.pinbound);
2002-08-03 19:52:57 +00:00
}
}
}
}
}
free(too);
free(from);
}
2002-08-05 13:30:44 +00:00
remlock(nodes.Dir_in_mlock, nodes.Dir_in_mklck, 'm');
2002-08-03 19:52:57 +00:00
}
/*
* Reread noderecord
*/
fseek(fp, fileptr, SEEK_SET);
fread(&nodes, nodeshdr.recsize, 1, fp);
}
fseek(fp, nodeshdr.filegrp + nodeshdr.mailgrp, SEEK_CUR);
}
2003-12-04 22:07:33 +00:00
fclose(fp);
2002-08-03 19:52:57 +00:00
}
free(temp);
Syslog('m', "Finished directory inbound sessions");
2002-11-11 12:56:19 +00:00
return Something;
2002-08-03 19:52:57 +00:00
}