139 lines
2.8 KiB
C
139 lines
2.8 KiB
C
/* Copyright (c) 1990 UNIX System Laboratories, Inc. */
|
|
/* Copyright (c) 1984, 1986, 1987, 1988, 1989, 1990 AT&T */
|
|
/* All Rights Reserved */
|
|
|
|
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF */
|
|
/* UNIX System Laboratories, Inc. */
|
|
/* The copyright notice above does not evidence any */
|
|
/* actual or intended publication of such source code. */
|
|
|
|
/*#ident "@(#)cmd-streams:log/strclean.c 1.2.1.2" */
|
|
|
|
#ident "$Revision: 1.2 $"
|
|
|
|
#include <stdio.h>
|
|
#include <fcntl.h>
|
|
#include <ftw.h>
|
|
#include "sys/types.h"
|
|
#include "sys/stat.h"
|
|
#include "sys/stropts.h"
|
|
#include "sys/strlog.h"
|
|
|
|
#define MSGSIZE 128
|
|
#define NSECDAY (60*60*24)
|
|
#define LOGDELAY 2
|
|
#define LOGDEFAULT "/var/adm/streams"
|
|
#define AGEDEFAULT 3
|
|
#define DIRECTORY 040000
|
|
#define ACCESS 07
|
|
|
|
static char prefix[128];
|
|
static time_t cutoff;
|
|
|
|
main(ac, av)
|
|
int ac;
|
|
char **av;
|
|
{
|
|
int age;
|
|
int c, errflg;
|
|
int fd;
|
|
struct stat stbuf;
|
|
struct strbuf ctl, dat;
|
|
struct log_ctl lctl;
|
|
char msg[MSGSIZE];
|
|
char *logname;
|
|
extern char *optarg;
|
|
extern int optind;
|
|
int clean();
|
|
|
|
logname = LOGDEFAULT;
|
|
age = AGEDEFAULT;
|
|
errflg = 0;
|
|
|
|
while ((c = getopt(ac, av, "d:a:")) != EOF)
|
|
switch (c) {
|
|
|
|
case 'd' :
|
|
if (*optarg == '\0')
|
|
errflg++;
|
|
else
|
|
logname = optarg;
|
|
break;
|
|
|
|
case 'a' :
|
|
if (*optarg == '\0')
|
|
errflg++;
|
|
else
|
|
age = atoi(optarg);
|
|
break;
|
|
|
|
default :
|
|
errflg++;
|
|
}
|
|
|
|
if (errflg) {
|
|
fprintf(stderr, "Usage: strclean [-d <logdir>] [-a <age>]\n");
|
|
exit(1);
|
|
}
|
|
|
|
if (age < 1) {
|
|
fprintf(stderr, "strclean: <age> must be at least 1\n");
|
|
exit(2);
|
|
}
|
|
|
|
if ((stat(logname, &stbuf) < 0) || !(stbuf.st_mode & DIRECTORY)) {
|
|
fprintf(stderr, "strclean: %s not a directory\n", logname);
|
|
exit(3);
|
|
}
|
|
|
|
if (access(logname, ACCESS) < 0) {
|
|
fprintf(stderr, "strclean: cannot access directory %s\n", logname);
|
|
exit(4);
|
|
}
|
|
|
|
cutoff = time((long*)0) - age * NSECDAY;
|
|
|
|
ctl.len = sizeof(struct log_ctl);
|
|
ctl.maxlen = sizeof(struct log_ctl);
|
|
ctl.buf = (caddr_t)&lctl;
|
|
lctl.level = 0;
|
|
lctl.flags = SL_ERROR|SL_NOTIFY;
|
|
dat.buf = msg;
|
|
dat.maxlen = MSGSIZE;
|
|
sprintf(dat.buf,
|
|
"strclean - removing log files more than %d days old", age);
|
|
dat.len = strlen(dat.buf) + 1;
|
|
|
|
if ((fd = open("/dev/log", O_RDWR)) >= 0) {
|
|
putmsg(fd, &ctl, &dat, 0);
|
|
close(fd);
|
|
sleep(LOGDELAY);
|
|
}
|
|
|
|
strcpy(prefix, logname);
|
|
strcat(prefix, "/error.");
|
|
|
|
ftw(logname, clean, 1);
|
|
}
|
|
|
|
/*
|
|
* clean out all files in the log directory prefixed by 'prefix'
|
|
* and that are older than 'cutoff' (these are globals above).
|
|
*/
|
|
clean(name, stp, info)
|
|
char *name;
|
|
struct stat *stp;
|
|
int info;
|
|
{
|
|
if (info != FTW_F) return(0);
|
|
|
|
if (strncmp(name, prefix, strlen(prefix)) == 0) {
|
|
if (stp->st_mtime < cutoff) {
|
|
if (unlink(name) < 0)
|
|
fprintf(stderr, "strclean: unable to unlink file %s\n", name);
|
|
}
|
|
}
|
|
return(0);
|
|
}
|
|
|