OpenSolaris_b135/cmd/ttymon/tmlog.c
/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/*
* Copyright 2005 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
/* Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/* All Rights Reserved */
#pragma ident "%Z%%M% %I% %E% SMI"
/*
* error/logging/cleanup functions for ttymon.
*/
#include <unistd.h>
#include <stdlib.h>
#include <stdio.h>
#include <fcntl.h>
#include <string.h>
#include <errno.h>
#include <stdarg.h>
#include <time.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/param.h>
#include <signal.h>
#include <syslog.h>
#include "ttymon.h"
#include "tmstruct.h"
#include "tmextern.h"
# ifdef DEBUG
extern FILE *Debugfp;
# endif
const char *appname = "ttymon";
void
openttymonlog(void)
{
int fd, ret;
char logfile[MAXPATHLEN];
extern char *Tag;
/* the log file resides in /var/saf/pmtag/ */
(void) snprintf(logfile, sizeof (logfile), "%s%s/%s", LOGDIR, Tag,
LOGFILE);
Logfp = NULL;
(void)close(0);
if ((fd = open(logfile, O_WRONLY|O_CREAT|O_APPEND,0444)) != -1)
if ((ret = fcntl(fd, F_DUPFD, 3)) == 3) {
/* set close-on-exec flag */
if (fcntl(ret, F_SETFD, FD_CLOEXEC) == 0) {
Logfp = fdopen(ret, "a+");
}
}
if (!Logfp) {
cons_printf("ttymon cannot create log file \"%s\": %s\n",
logfile, strerror(errno));
exit(1);
}
log(" ");
log("********** ttymon starting **********");
#ifdef DEBUG
log("fd(log)\t = %d", fileno(Logfp));
#endif
}
static void
roll_log()
{
char logf[MAXPATHLEN];
char ologf[MAXPATHLEN];
char tlogf[MAXPATHLEN];
FILE *nlogfp;
struct stat buf;
(void) fprintf(Logfp, "Restarting log file\n");
(void) snprintf(logf, sizeof (logf), "%s%s/%s", LOGDIR, Tag, LOGFILE);
(void) snprintf(ologf, sizeof (ologf), "%s%s/%s", LOGDIR, Tag,
OLOGFILE);
(void) snprintf(tlogf, sizeof (tlogf), "%s%s/%s", LOGDIR, Tag,
TLOGFILE);
if (!stat(ologf, &buf) && rename(ologf, tlogf)) {
(void) fprintf(Logfp, "rename old to tmp file failed\n");
} else if (!stat(logf, &buf) && rename(logf, ologf)) {
(void) fprintf(Logfp, "rename log to old file failed\n");
/* Restore old log file */
if (!stat(tlogf, &buf) && rename(tlogf, ologf))
(void) fprintf(Logfp,
"rename tmp to old file failed\n");
} else if (nlogfp = fopen(logf, "w")) {
(void) fclose(Logfp);
Logfp = nlogfp;
/* reset close-on-exec */
(void) fcntl(fileno(Logfp), F_SETFD, 1);
} else {
(void) fprintf(Logfp, "log file open failed\n");
/* Restore current and old log file */
if (!stat(ologf, &buf) && rename(ologf, logf))
(void) fprintf(Logfp,
"rename old to log file failed\n");
else if (!stat(tlogf, &buf) && rename(tlogf, ologf))
(void) fprintf(Logfp,
"rename tmp to old file failed\n");
}
(void) unlink(tlogf); /* remove any stale tmp logfile */
}
/*
* vlog(msg) - common message routine.
* - if Logfp is NULL, write message to stderr or CONSOLE
*/
static void
vlog(const char *fmt, va_list ap)
{
char *timestamp; /* current time in readable form */
time_t clock; /* current time in seconds */
int fd;
struct stat buf;
if (Logfp) {
if ((fstat(fileno(Logfp), &buf) != -1) &&
(buf.st_size >= Logmaxsz) && !Splflag) {
Splflag = 1;
roll_log();
Splflag = 0;
}
(void) time(&clock);
timestamp = ctime(&clock);
*(strchr(timestamp, '\n')) = '\0';
(void) fprintf(Logfp, "%s; %ld; ", timestamp, getpid());
(void) vfprintf(Logfp, fmt, ap);
if (fmt[strlen(fmt) - 1] != '\n')
(void) fputc('\n', Logfp);
(void) fflush(Logfp);
} else if (isatty(STDERR_FILENO)) {
(void) fprintf(stderr, "%s: ", appname);
(void) vfprintf(stderr, fmt, ap);
if (fmt[strlen(fmt) - 1] != '\n')
(void) fputc('\n', stderr);
(void) fflush(stderr);
} else if ((fd = open(CONSOLE, O_WRONLY|O_NOCTTY)) != -1) {
FILE *f = fdopen(fd, "w");
(void) fprintf(f, "%s: ", appname);
(void) vfprintf(f, fmt, ap);
if (fmt[strlen(fmt) - 1] != '\n')
(void) fputc('\n', f);
(void) fclose(f);
} else {
vsyslog(LOG_CRIT, fmt, ap);
}
}
/*
* log(fmt, ...) - put a message into the log file
* - if Logfp is NULL, write message to stderr or CONSOLE
*/
/*PRINTFLIKE1*/
void
log(const char *fmt, ...)
{
va_list ap;
va_start(ap, fmt);
vlog(fmt, ap);
va_end(ap);
}
/*
* fatal(fmt, ...) - put a message into the log file, then exit.
*/
/*PRINTFLIKE1*/
void
fatal(const char *fmt, ...)
{
if (fmt) {
va_list ap;
va_start(ap, fmt);
vlog(fmt, ap);
va_end(ap);
}
log("********** ttymon exiting ***********");
exit(1);
}
# ifdef DEBUG
/*
* opendebug - open debugging file, sets global file pointer Debugfp
* arg: getty - if TRUE, ttymon is in getty_mode and use a different
* debug file
*/
void
opendebug(int getty_mode)
{
int fd, ret;
char debugfile[BUFSIZ];
extern char *Tag;
if (!getty_mode) {
(void)strcpy(debugfile, LOGDIR);
(void)strcat(debugfile, Tag);
(void)strcat(debugfile, "/");
(void)strcat(debugfile, DBGFILE);
if ((Debugfp = fopen(debugfile, "a+")) == NULL)
fatal("open debug file failed");
}
else {
if ((fd = open(EX_DBG, O_WRONLY|O_APPEND|O_CREAT)) < 0)
fatal("open %s failed: %s", EX_DBG, errno);
if (fd >= 3)
ret = fd;
else {
if ((ret = fcntl(fd, F_DUPFD, 3)) < 0)
fatal("F_DUPFD fcntl failed: %s",
strerror(errno));
}
if ((Debugfp = fdopen(ret, "a+")) == NULL)
fatal("fdopen failed: %s", strerror(errno));
if (ret != fd)
(void)close(fd);
}
/* set close-on-exec flag */
if (fcntl(fileno(Debugfp), F_SETFD, 1) == -1)
fatal("F_SETFD fcntl failed: %s", strerror(errno));
}
/*
* debug(msg) - put a message into debug file
*/
void
debug(const char *fmt, ...)
{
va_list ap;
char *timestamp; /* current time in readable form */
time_t clock; /* current time in seconds */
(void) time(&clock);
timestamp = ctime(&clock);
*(strchr(timestamp, '\n')) = '\0';
(void) fprintf(Debugfp, "%s; %ld; ", timestamp, getpid());
va_start(ap, fmt);
(void) vfprintf(Debugfp, fmt, ap);
va_end(ap);
(void) fprintf(Debugfp, "\n");
(void) fflush(Debugfp);
}
#endif