BSD 4_3_Net_1 release

[unix-history] / implog / 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.6 (Berkeley) 6/18/88";
#endif /* not lint */

#include <sgtty.h>

#include <sys/time.h>
#include <sys/param.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>

#define LOGFILE "/usr/adm/implog"

u_char  request[1024];
int     marktime();
int     options;
extern  int errno;
int     log;

/*
* 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(argc, argv)
       char *argv[];
{
       int i, s;
       time_t t;
       struct sockstamp from;

       argc--, argv++;
       openlog("implogd", LOG_PID | LOG_ODELAY, LOG_DAEMON);
       if (argc > 0 && !strcmp(argv[0], "-d"))
               options |= SO_DEBUG;
       log = open(LOGFILE, O_CREAT|O_WRONLY|O_APPEND, 0644);
       if (log < 0) {
               syslog(LOG_ERR, "%s: %m\n", LOGFILE);
               perror("implogd: open");
               exit(1);
       }
       from.sin_time = time(0);
       from.sin_len = sizeof (time_t);
       write(log, (char *)&from, sizeof (from));
       if ((s = socket(AF_IMPLINK, SOCK_RAW, 0)) < 0) {
               syslog(LOG_ERR, "socket: %m\n");
               perror("implogd: socket");
               exit(5);
       }
#ifndef DEBUG
       if (fork())
               exit(0);
       for (i = 0; i < 10; i++)
               if (i != log && i != s)
                       (void) close(i);
       (void) open("/", 0);
       (void) dup2(0, 1);
       (void) dup2(0, 2);
       { int tt = open("/dev/tty", 2);
         if (tt > 0) {
               ioctl(tt, TIOCNOTTY, 0);
               close(tt);
         }
       }
#endif
       for (;;) {
               int fromlen = sizeof (from), len;

               len = recvfrom(s, request, sizeof (request), 0,
                       &from, &fromlen);
               if (len < 0) {
                       syslog(LOG_ERR, "recvfrom: %m\n");
                       perror("implogd: recvfrom");
                       continue;
               }
               if (len == 0 || len > IMPMTU)   /* sanity */
                       continue;
               from.sin_len = len;
               from.sin_time = time(0);
               write(log, (char *)&from, sizeof (from));
               write(log, request, len);
       }
       /*NOTREACHED*/
}