/*
 * Copyright 2005 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 * Copyright (c) 1983 Regents of the University of California.
 * All rights reserved. The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#include "tip.h"

static  FILE *flog = NULL;

/*
 * Log file maintenance routines
 */
void
logent(char *group, char *num, char *acu, char *message)
{
        char *user, *timestamp;
        struct passwd *pwd;
        time_t t;

        if (flog == NULL)
                return;
#ifndef USG
        if (flock(fileno(flog), LOCK_EX) < 0) {
                perror("tip: flock");
                return;
        }
#endif
        if ((user = getlogin()) == NOSTR)
                if ((pwd = getpwuid(uid)) == NOPWD)
                        user = "???";
                else
                        user = pwd->pw_name;
        t = time(0);
        timestamp = ctime(&t);
        timestamp[24] = '\0';
        (void) fprintf(flog, "%s (%s) <%s, %s, %s> %s\n",
            user, timestamp, group,
#ifdef PRISTINE
            "",
#else
            num,
#endif
            acu, message);
        (void) fflush(flog);
#ifndef USG
        (void) flock(fileno(flog), LOCK_UN);
#endif
}

void
loginit(void)
{

#ifdef ACULOG
        flog = fopen(value(LOG), "a");
        if (flog == NULL)
                (void) fprintf(stderr, "tip: can't open log file %s\r\n",
                    value(LOG));
#endif
}