/* XXX: this program knows quite a bit about tcpto's internals */

#include "substdio.h"

#include "subfd.h"

#include "auto_qmail.h"

#include "fmt.h"

#include "ip.h"

#include "lock.h"

#include "error.h"

#include "exit.h"

#include "datetime.h"

#include "now.h"

void die(n) int n; { substdio_flush(subfdout); _exit(n); }

void warn(s) char *s;

{

 char *x;

 x = error_str(errno);

 substdio_puts(subfdout,s);

 substdio_puts(subfdout,": ");

 substdio_puts(subfdout,x);

 substdio_puts(subfdout,"\n");

}

void die_chdir() { warn("fatal: unable to chdir"); die(111); }

void die_open() { warn("fatal: unable to open tcpto"); die(111); }

void die_lock() { warn("fatal: unable to lock tcpto"); die(111); }

void die_read() { warn("fatal: unable to read tcpto"); die(111); }

char tcpto_buf[1024];

char tmp[FMT_ULONG + IPFMT];

void main()

{

 int fdlock;

 int fd;

 int r;

 int i;

 char *record;

 struct ip_address ip;

 datetime_sec when;

 datetime_sec start;

 if (chdir(auto_qmail) == -1) die_chdir();

 if (chdir("queue/lock") == -1) die_chdir();

 fdlock = open_write("tcpto");

 if (fdlock == -1) die_open();

 fd = open_read("tcpto");

 if (fd == -1) die_open();

 if (lock_ex(fdlock) == -1) die_lock();

 r = read(fd,tcpto_buf,sizeof(tcpto_buf));

 close(fd);

 close(fdlock);

 if (r == -1) die_read();

 r >>= 4;

 start = now();

 record = tcpto_buf;

 for (i = 0;i < r;++i)

  {

   if (record[4] >= 1)

    {

     byte_copy(&ip,4,record);

     when = (unsigned long) (unsigned char) record[11];

     when = (when << 8) + (unsigned long) (unsigned char) record[10];

     when = (when << 8) + (unsigned long) (unsigned char) record[9];

     when = (when << 8) + (unsigned long) (unsigned char) record[8];

     substdio_put(subfdout,tmp,ip_fmt(tmp,&ip));

     substdio_puts(subfdout," timed out ");

     substdio_put(subfdout,tmp,fmt_ulong(tmp,(unsigned long) (start - when)));

     substdio_puts(subfdout," seconds ago; # recent timeouts: ");

     substdio_put(subfdout,tmp,fmt_ulong(tmp,(unsigned long) (unsigned char) record[4]));

     substdio_puts(subfdout,"\n");

    }

   record += 16;

  }

 die(0);

}