[unix-history] / usr / src / old / implogd / implogd.c

/*
* Copyright (c) 1983, 1988 Regents of the University of California.
* All rights reserved.
*
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice and this paragraph are
* duplicated in all such forms and that any documentation,
* advertising materials, and other materials related to such
* distribution and use acknowledge that the software was developed
* by the University of California, Berkeley.  The name of the
* University may not be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
*/

#ifndef lint
char copyright[] =
"@(#) Copyright (c) 1983, 1988 Regents of the University of California.\n\
All rights reserved.\n";
#endif /* not lint */

#ifndef lint
static char sccsid[] = "@(#)implogd.c   5.7 (Berkeley) %G%";
#endif /* not lint */

#include <sys/param.h>
#include <sys/time.h>
#include <sys/socket.h>
#include <sys/syslog.h>
#include <sys/file.h>

#include <net/if.h>

#include <netinet/in.h>
#include <netimp/if_imp.h>

#include <sgtty.h>
#include "pathnames.h"

/*
* Socket address, internet style, with
* unused space taken by timestamp and packet
* size.
*/
struct sockstamp {
       short   sin_family;
       u_short sin_port;
       struct  in_addr sin_addr;
       time_t  sin_time;
       int     sin_len;
};

main()
{
       register int len, log, s;
       struct sockstamp from;
       int fromlen;
       u_char request[1024];
       time_t time();

       openlog("implogd", LOG_PID|LOG_ODELAY|LOG_PERROR, LOG_DAEMON);
       log = open(_PATH_IMPLOG, O_CREAT|O_WRONLY|O_APPEND, 0644);
       if (log < 0) {
               syslog(LOG_ERR, "%s: %m\n", _PATH_IMPLOG);
               exit(1);
       }
       from.sin_time = time((time_t *)NULL);
       from.sin_len = sizeof(time_t);
       (void)write(log, (char *)&from, sizeof(from));
       if ((s = socket(AF_IMPLINK, SOCK_RAW, 0)) < 0) {
               syslog(LOG_ERR, "socket: %m\n");
               exit(1);
       }
#ifndef DEBUG
       {
               register int i, tt;

               if (fork())
                       exit(0);
               for (i = 0; i < 10; i++)
                       if (i != log && i != s)
                               (void) close(i);
               (void) open("/", O_RDONLY, 0);
               (void) dup2(0, 1);
               (void) dup2(0, 2);
               tt = open("/dev/tty", O_RDWR, 0);
               if (tt > 0) {
                       ioctl(tt, TIOCNOTTY, 0);
                       (void)close(tt);
               }
       }
#endif
       for (fromlen = sizeof(from);;) {
               len = recvfrom(s, request, sizeof(request), 0,
                   &from, &fromlen);
               if (len < 0) {
                       syslog(LOG_ERR, "recvfrom: %m\n");
                       continue;
               }
               if (len == 0 || len > IMPMTU)           /* sanity */
                       continue;
               from.sin_len = len;
               from.sin_time = time((time_t *)NULL);
               (void)write(log, (char *)&from, sizeof(from));
               (void)write(log, request, len);
       }
       /*NOTREACHED*/
}