425 lines
9.8 KiB
C
425 lines
9.8 KiB
C
/*****************************************************************************
|
|
*
|
|
* $Id$
|
|
* Purpose ...............: Statistic rollover util.
|
|
*
|
|
*****************************************************************************
|
|
* Copyright (C) 1997-2001
|
|
*
|
|
* 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
|
|
* Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
*****************************************************************************/
|
|
|
|
#include "../lib/libs.h"
|
|
#include "../lib/structs.h"
|
|
#include "../lib/records.h"
|
|
#include "../lib/common.h"
|
|
#include "../lib/clcomm.h"
|
|
#include "rollover.h"
|
|
|
|
|
|
extern int do_quiet;
|
|
|
|
|
|
void StatAdd(statcnt *S, unsigned long V)
|
|
{
|
|
S->total += V;
|
|
S->tweek += V;
|
|
S->tdow[Diw] += V;
|
|
S->month[Miy] += V;
|
|
}
|
|
|
|
|
|
|
|
void RollWeek(statcnt *);
|
|
void RollWeek(statcnt *S)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < 7; i++) {
|
|
S->ldow[i] = S->tdow[i];
|
|
S->tdow[i] = 0L;
|
|
}
|
|
|
|
S->lweek = S->tweek;
|
|
S->tweek = 0L;
|
|
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
|
|
|
|
|
|
FILE *OpenData(char *);
|
|
FILE *OpenData(char *Name)
|
|
{
|
|
char *temp;
|
|
FILE *fp;
|
|
|
|
temp = calloc(128, sizeof(char));
|
|
|
|
sprintf(temp, "%s/etc/%s", getenv("MBSE_ROOT"), Name);
|
|
if ((fp = fopen(temp, "r+")) == NULL) {
|
|
WriteError("$Can't open %s", temp);
|
|
free(temp);
|
|
return NULL;
|
|
}
|
|
|
|
free(temp);
|
|
return fp;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* Test all files with statistic counters if a new week has started
|
|
* or a new month has started. All the record counters will be
|
|
* updated if one of these is the case.
|
|
*/
|
|
void Rollover()
|
|
{
|
|
time_t Now, Temp;
|
|
struct tm *t;
|
|
FILE *fp, *ft;
|
|
int do_week, do_month, Day, i;
|
|
char *temp, *temp1;
|
|
struct _history history;
|
|
|
|
IsDoing("Date rollover");
|
|
Now = time(NULL);
|
|
t = localtime(&Now);
|
|
|
|
Diw = t->tm_wday;
|
|
Miy = t->tm_mon;
|
|
Day = t->tm_yday;
|
|
|
|
if ((fp = OpenData((char *)"nodes.data")) != NULL) {
|
|
fread(&nodeshdr, sizeof(nodeshdr), 1, fp);
|
|
Temp = nodeshdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
/*
|
|
* Test if it's sunday, and the last update wasn't today.
|
|
* If it's not sunday, and the last update was more then
|
|
* 7 days ago, we maybe missed last sunday and the update
|
|
* is still done.
|
|
*/
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
|
|
/*
|
|
* If the month is different then the last update, we must
|
|
* be in a new month.
|
|
*/
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover nodes.data");
|
|
|
|
while (fread(&nodes, nodeshdr.recsize, 1, fp) == 1) {
|
|
if (do_week) {
|
|
RollWeek(&nodes.FilesSent);
|
|
RollWeek(&nodes.FilesRcvd);
|
|
RollWeek(&nodes.F_KbSent);
|
|
RollWeek(&nodes.F_KbRcvd);
|
|
RollWeek(&nodes.MailSent);
|
|
RollWeek(&nodes.MailRcvd);
|
|
}
|
|
if (do_month) {
|
|
nodes.FilesSent.month[Miy] = 0;
|
|
nodes.FilesRcvd.month[Miy] = 0;
|
|
nodes.F_KbSent.month[Miy] = 0;
|
|
nodes.F_KbRcvd.month[Miy] = 0;
|
|
nodes.MailSent.month[Miy] = 0;
|
|
nodes.MailRcvd.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - nodeshdr.recsize, SEEK_CUR);
|
|
fwrite(&nodes, nodeshdr.recsize, 1, fp);
|
|
fseek(fp, nodeshdr.filegrp + nodeshdr.mailgrp, SEEK_CUR);
|
|
}
|
|
|
|
fseek(fp, 0, SEEK_SET);
|
|
nodeshdr.lastupd = time(NULL);
|
|
fwrite(&nodeshdr, nodeshdr.hdrsize, 1, fp);
|
|
}
|
|
|
|
fclose(fp);
|
|
}
|
|
|
|
if ((fp = OpenData((char *)"mareas.data")) != NULL) {
|
|
fread(&msgshdr, sizeof(msgshdr), 1, fp);
|
|
Temp = msgshdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover mareas.data");
|
|
|
|
while (fread(&msgs, msgshdr.recsize, 1, fp) == 1) {
|
|
if (do_week) {
|
|
RollWeek(&msgs.Received);
|
|
RollWeek(&msgs.Posted);
|
|
}
|
|
if (do_month) {
|
|
msgs.Received.month[Miy] = 0;
|
|
msgs.Posted.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - msgshdr.recsize, SEEK_CUR);
|
|
fwrite(&msgs, msgshdr.recsize, 1, fp);
|
|
fseek(fp, msgshdr.syssize, SEEK_CUR);
|
|
}
|
|
|
|
msgshdr.lastupd = time(NULL);
|
|
fseek(fp, 0, SEEK_SET);
|
|
fwrite(&msgshdr, msgshdr.hdrsize, 1, fp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
|
|
if ((fp = OpenData((char *)"mgroups.data")) != NULL) {
|
|
fread(&mgrouphdr, sizeof(mgrouphdr), 1, fp);
|
|
Temp = mgrouphdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover mgroups.data");
|
|
|
|
while (fread(&mgroup, mgrouphdr.recsize, 1, fp) == 1) {
|
|
if (do_week) {
|
|
RollWeek(&mgroup.MsgsRcvd);
|
|
RollWeek(&mgroup.MsgsSent);
|
|
}
|
|
if (do_month) {
|
|
mgroup.MsgsRcvd.month[Miy] = 0;
|
|
mgroup.MsgsSent.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - mgrouphdr.recsize, SEEK_CUR);
|
|
fwrite(&mgroup, mgrouphdr.recsize, 1, fp);
|
|
}
|
|
|
|
mgrouphdr.lastupd = time(NULL);
|
|
fseek(fp, 0, SEEK_SET);
|
|
fwrite(&mgrouphdr, mgrouphdr.hdrsize, 1, fp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
|
|
if ((fp = OpenData((char *)"tic.data")) != NULL) {
|
|
fread(&tichdr, sizeof(tichdr), 1, fp);
|
|
Temp = tichdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover tic.data");
|
|
|
|
while (fread(&tic, tichdr.recsize, 1, fp) == 1) {
|
|
if (do_week) {
|
|
RollWeek(&tic.Files);
|
|
RollWeek(&tic.KBytes);
|
|
}
|
|
if (do_month) {
|
|
tic.Files.month[Miy] = 0;
|
|
tic.KBytes.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - tichdr.recsize, SEEK_CUR);
|
|
fwrite(&tic, tichdr.recsize, 1, fp);
|
|
fseek(fp, tichdr.syssize, SEEK_CUR);
|
|
}
|
|
|
|
tichdr.lastupd = time(NULL);
|
|
fseek(fp, 0, SEEK_SET);
|
|
fwrite(&tichdr, tichdr.hdrsize, 1, fp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
|
|
if ((fp = OpenData((char *)"fgroups.data")) != NULL) {
|
|
fread(&fgrouphdr, sizeof(fgrouphdr), 1, fp);
|
|
Temp = fgrouphdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover fgroups.data");
|
|
|
|
while (fread(&fgroup, fgrouphdr.recsize, 1, fp) == 1) {
|
|
if (do_week) {
|
|
RollWeek(&fgroup.Files);
|
|
RollWeek(&fgroup.KBytes);
|
|
}
|
|
if (do_month) {
|
|
fgroup.Files.month[Miy] = 0;
|
|
fgroup.KBytes.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - fgrouphdr.recsize, SEEK_CUR);
|
|
fwrite(&fgroup, fgrouphdr.recsize, 1, fp);
|
|
}
|
|
|
|
fgrouphdr.lastupd = time(NULL);
|
|
fseek(fp, 0, SEEK_SET);
|
|
fwrite(&fgrouphdr, fgrouphdr.hdrsize, 1, fp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
|
|
if ((fp = OpenData((char *)"hatch.data")) != NULL) {
|
|
fread(&hatchhdr, sizeof(hatchhdr), 1, fp);
|
|
Temp = hatchhdr.lastupd;
|
|
t = localtime(&Temp);
|
|
|
|
if (((Diw == 0) && (Day != t->tm_yday)) || ((Day - t->tm_yday) > 7))
|
|
do_week = TRUE;
|
|
else
|
|
do_week = FALSE;
|
|
if (Miy != t->tm_mon)
|
|
do_month = TRUE;
|
|
else
|
|
do_month = FALSE;
|
|
|
|
if (do_week || do_month) {
|
|
Syslog('+', "Rollover hatch.data");
|
|
|
|
while (fread(&hatch, hatchhdr.recsize, 1, fp) == 1) {
|
|
if (do_week)
|
|
RollWeek(&hatch.Hatched);
|
|
if (do_month) {
|
|
hatch.Hatched.month[Miy] = 0;
|
|
if (CFG.slow_util && do_quiet)
|
|
usleep(1);
|
|
}
|
|
fseek(fp, - hatchhdr.recsize, SEEK_CUR);
|
|
fwrite(&hatch, hatchhdr.recsize, 1, fp);
|
|
}
|
|
|
|
hatchhdr.lastupd = time(NULL);
|
|
fseek(fp, 0, SEEK_SET);
|
|
fwrite(&hatchhdr, hatchhdr.hdrsize, 1, fp);
|
|
}
|
|
fclose(fp);
|
|
}
|
|
|
|
temp = calloc(128, sizeof(char));
|
|
temp1 = calloc(128, sizeof(char));
|
|
sprintf(temp, "%s/var/mailer.hist", getenv("MBSE_ROOT"));
|
|
if ((fp = fopen(temp, "r"))) {
|
|
fread(&history, sizeof(history), 1, fp);
|
|
Temp = history.online;
|
|
t = localtime(&Temp);
|
|
if (t->tm_mon != Miy) {
|
|
/*
|
|
* Calculate date/time for records to delete
|
|
*/
|
|
t = localtime(&Now);
|
|
if (t->tm_mon == 0) {
|
|
t->tm_mon = 11;
|
|
t->tm_year--;
|
|
} else {
|
|
t->tm_mon--;
|
|
}
|
|
t->tm_mday = 1;
|
|
t->tm_hour = 0;
|
|
t->tm_min = 0;
|
|
t->tm_sec = 0;
|
|
Now = mktime(t);
|
|
Syslog('+', "Packing mailer history since %s", rfcdate(Now));
|
|
sprintf(temp1, "%s/var/mailer.temp", getenv("MBSE_ROOT"));
|
|
if ((ft = fopen(temp1, "a")) == NULL) {
|
|
WriteError("$Can't create %s", temp1);
|
|
fclose(fp);
|
|
} else {
|
|
memset(&history, 0, sizeof(history));
|
|
history.online = time(NULL);
|
|
history.offline = time(NULL);
|
|
fwrite(&history, sizeof(history), 1, ft);
|
|
|
|
i = 0;
|
|
while (fread(&history, sizeof(history), 1, fp)) {
|
|
if (history.online >= Now) {
|
|
fwrite(&history, sizeof(history), 1, ft);
|
|
i++;
|
|
}
|
|
}
|
|
fclose(ft);
|
|
fclose(fp);
|
|
unlink(temp);
|
|
rename(temp1, temp);
|
|
Syslog('+', "Written %d records", i);
|
|
}
|
|
} else {
|
|
fclose(fp);
|
|
}
|
|
}
|
|
free(temp);
|
|
free(temp1);
|
|
}
|
|
|
|
|
|
|