Mix/Src/stats.c

/* Mixmaster version 3  --  (C) 1999 Anonymizer Inc.

   Mixmaster may be redistributed and modified under certain conditions.
   This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF
   ANY KIND, either express or implied. See the file COPYRIGHT for
   details.

   Remailer statistics
   $Id: stats.c,v 1.19 2003/05/03 05:31:07 weaselp Exp $ */


#include "mix3.h"
#include <stdio.h>
#include <string.h>
#include <time.h>

/* log that a message of type t has been received. Statistics for type 2
   messages are taken from the IDLOG instead of calling this function */
int stats_log(int t)
{
  FILE *f;

  f = mix_openfile(STATS, "a");
  if (f == NULL) {
    errlog(ERRORMSG, "Can't open %s!\n", STATS);
    return (-1);
  }
  lock(f);
  fprintf(f, "%d 1 %ld\n", t, (long) time(NULL));
  unlock(f);
  fclose(f);
  return (0);
}

/* log the current pool size after sending messages */
int stats_out(int pool)
{
  FILE *f;

  if (REMAIL == 0)
    return (0); /* don't keep statistics for the client */

  f = mix_openfile(STATS, "a");
  if (f == NULL) {
    errlog(ERRORMSG, "Can't open %s!\n", STATS);
    return (-1);
  }
  lock(f);
  fprintf(f, "p 1 %d %ld\n", pool, (long) time(NULL));
  unlock(f);
  fclose(f);
  return (0);
}

int stats(BUFFER *b)
{
  FILE *s, *f;
  char line[LINELEN];
  long now, today, then;
  time_t t;
  long updated = 0, havestats = 0;
  int msgd[7][24], msg[7][80];
  /* 0 .. Unencrypted
   * 1 .. Type I PGP
   * 2 .. Mix
   *
   * 3 .. intermediate
   * 4 .. final hop mail
   * 5 .. final hop news
   * 6 .. randhopped (will get counted in intermediate again)
   */
  int poold[2][24], pool[2][80];
  int i, num, type, assigned, daysum;
  char c;
  idlog_t idbuf;

  now = (time(NULL) / (60 * 60) + 1) * 60 * 60;
  today = (now / SECONDSPERDAY) * SECONDSPERDAY;

  for (i = 0; i < 24; i++)
    msgd[0][i] = msgd[1][i] = msgd[2][i] = msgd[3][i] = msgd[4][i] = msgd[5][i] = msgd[6][i]= poold[0][i] = poold[1][i] = 0;
  for (i = 0; i < 80; i++)
    msg[0][i] = msg[1][i] = msg[2][i] = msg[3][i] = msg[4][i] = msg[5][i] = msg[6][i] = pool[0][i] = pool[1][i] = 0;

  s = mix_openfile(STATS, "r");
  if (s != NULL) {
    lock(s);
    fscanf(s, "%ld", &updated);
    while (fgets(line, sizeof(line), s) != NULL) {
      switch (line[0]) {
      case '0':
      case '1':
      case '2':
      case '3':
      case '4':
      case '5':
      case '6':
        c = '\0';
        assigned = sscanf(line, "%d %d %ld %c", &type, &num, &then, &c);
        daysum = (assigned == 4 && c == 'd');

        if (now - then < 0 || (daysum && today - then < 0))
          break;                /* keep memory consistent even if the time
                                   suddenly goes backwards :) */
        if (now - then < SECONDSPERDAY && !daysum)
          msgd[type][(now - then) / (60 * 60)] += num;
        else if (today - then < 80 * SECONDSPERDAY)
          msg[type][(today - then) / SECONDSPERDAY] += num;
        if (havestats == 0 || then < havestats)
          havestats = then;
        break;
      case 'p':
        c = '\0';
        assigned = sscanf(line, "p %d %d %ld %c", &num, &i, &then, &c);
        daysum = (assigned == 4 && c == 'd');

        if (now - then < 0 || (daysum && today - then < 0))
          break;
        if (now - then < SECONDSPERDAY && !daysum) {
          poold[0][(now - then) / (60 * 60)] += num;
          poold[1][(now - then) / (60 * 60)] += i;
        } else if (today - then < 80 * SECONDSPERDAY) {
          poold[0][(today - then) / (24 * 60 * 60)] += num;
          poold[1][(today - then) / (24 * 60 * 60)] += i;
        }
        if (havestats == 0 || then < havestats)
          havestats = then;
        break;
      }
    }
    unlock(s);
    fclose(s);
  }
  f = mix_openfile(IDLOG, "rb");
  if (f != NULL) {
    while (fread(&idbuf, 1, sizeof(idlog_t), f) == sizeof(idlog_t)) {
      then = idbuf.time;
      if (then < updated || now - then < 0)
        continue;
      if (now - then < SECONDSPERDAY)
        msgd[2][(now - then) / (60 * 60)]++;
      else if (today - then < 80 * SECONDSPERDAY)
        msg[2][(today - then) / SECONDSPERDAY]++;
      if (havestats == 0 || then < havestats)
        havestats = then;
    }
    fclose(f);
  }
  if (havestats == 0) {
    if (b != NULL)
      errlog(NOTICE, "No statistics available.\n");
    return (-1);
  }
  s = mix_openfile(STATS, "w");
  if (s == NULL) {
    errlog(ERRORMSG, "Can't create %s!\n", STATS);
    return (-1);
  }
  lock(s);
  fprintf(s, "%ld\n", (long) time(NULL));       /* time of stats.log update */
  for (i = 0; i < 24; i++) {
    for (type = 0; type < 7; type++)
      if (msgd[type][i] > 0)
        fprintf(s, "%d %d %ld\n", type, msgd[type][i], now - i * 60 * 60);
    if (poold[0][i] > 0)
      fprintf(s, "p %d %d %ld\n", poold[0][i], poold[1][i], now - i * 60 * 60);
  }
  for (i = 0; i < 80; i++) {
    for (type = 0; type < 7; type++)
      if (msg[type][i] > 0)
        fprintf(s, "%d %d %ld d\n", type, msg[type][i],
                today - i * 24 * 60 * 60);
    if (pool[0][i] > 0)
      fprintf(s, "p %d %d %ld d\n", pool[0][i], pool[1][i],
              today - i * 24 * 60 * 60);
  }
  unlock(s);
  fclose(s);
  if (b != NULL) {
    struct tm *gt;

    buf_sets(b, "Subject: Statistics for the ");
    buf_appends(b, SHORTNAME);
    buf_appends(b, " remailer\n\n");

    buf_appends(b, "Number of messages in the past 24 hours:\n");
    t = now;
    gt = gmtime(&t);
    for (i = 23; i >= 0; i--) {
      buf_appendf(b, "   %2dh: ", (24 + gt->tm_hour - i) % 24);
      if (MIX) {
        if (PGP || UNENCRYPTED)
          buf_appends(b, "   Mix:");
        buf_appendf(b, "%4d", msgd[2][i]);
      }
      if (PGP)
        buf_appendf(b, "     PGP: %4d", msgd[1][i]);
      if (UNENCRYPTED)
        buf_appendf(b, "     Unencrypted:%4d", msgd[0][i]);
      if (poold[0][i] > 0)
        buf_appendf(b, "  [Pool size:%4d]", poold[1][i] / poold[0][i]);
#if 0
      else
        buf_appends(b, "  [ no remailing ]");
#endif /* 0 */
      buf_nl(b);
    }
    if ((today - havestats) / SECONDSPERDAY >= 1)
      buf_appends(b, "\nNumber of messages per day:\n");
    for ((i = (today - havestats) / SECONDSPERDAY) > 79 ? 79 : i;
         i >= 1; i--) {
      t = now - i * SECONDSPERDAY;
      gt = localtime(&t);
      strftime(line, LINELEN, "%d %b: ", gt);
      buf_appends(b, line);

      if (MIX) {
        if (PGP || UNENCRYPTED)
          buf_appends(b, "   Mix:");
        buf_appendf(b, "%4d", msg[2][i]);
      }
      if (PGP)
        buf_appendf(b, "     PGP: %4d", msg[1][i]);
      if (UNENCRYPTED)
        buf_appendf(b, "     Unencrypted:%4d", msg[0][i]);
      if (pool[0][i] > 0)
        buf_appendf(b, "  [Pool size:%4d]", pool[1][i] / pool[0][i]);
      if (STATSDETAILS) {
        buf_appendf(b, "  Intermediate:%4d", msg[3][i]);
        buf_appendf(b, "  Mail:%4d", msg[4][i]);
        buf_appendf(b, "  Postings:%4d", msg[5][i]);
        if (MIDDLEMAN)
          buf_appendf(b, "  Randhopped:%4d", msg[6][i]);
      }
#if 0
      else
        buf_appends(b, "  [ no remailing ]");
#endif /* 0 */
      buf_nl(b);
    }
  }
  return (0);
}

int conf(BUFFER *out)
{
  FILE *f;
  BUFFER *b, *line;
  int flag = 0;
  REMAILER remailer[MAXREM];
  int pgpkeyid[MAXREM];
  int i, num;
  char tmpline[LINELEN];

  b = buf_new();
  line = buf_new();

  buf_sets(out, "Subject: Capabilities of the ");
  buf_appends(out, SHORTNAME);
  buf_appends(out, " remailer\n\n");
  buf_appends(out, remailer_type);
  buf_appends(out, VERSION);
  buf_nl(out);

  if (MIX + PGP + UNENCRYPTED == 1)
    buf_appends(out, "Supported format:");
  else
    buf_appends(out, "Supported formats:\n");
  if (MIX)
    buf_appends(out, "   Mixmaster\n");
  if (PGP)
    buf_appends(out, "   Cypherpunk with PGP encryption\n");
  if (UNENCRYPTED)
    buf_appends(out, "   Cypherpunk (unencrypted)\n");

  buf_appendf(out, "Pool size: %d\n", POOLSIZE);
  if (SIZELIMIT)
    buf_appendf(out, "Maximum message size: %d kB\n", SIZELIMIT);

  /* display destinations to which delivery is explicitly permitted
     when in middleman mode (contents of DESTALLOW file.)  */

  if (MIDDLEMAN) {
    f = mix_openfile(DESTALLOW, "r");
    if (f != NULL) {
      buf_read(b, f);
      fclose(f);
      while(buf_getline(b, line) != -1) {
        if (line->length > 0 && line->data[0] != '#') {
          if (flag == 0) {
            buf_appends(out, "In addition to other remailers, this remailer also sends mail to these\n addresses directly:\n");
            flag = 1;
          }
          buf_appendf(out, "   %b\n", line);
        }
      }
    }
  }

  flag = 0;
  f = mix_openfile(HDRFILTER, "r");
  if (f != NULL) {
    buf_read(b, f);
    fclose(f);
    while(buf_getline(b, line) != -1)
      if (line->length > 0 && line->data[0] != '#') {
        if (flag == 0) {
          buf_appends(out, "The following header lines will be filtered:\n");
          flag = 1;
        }
        buf_appends(out, "   ");
        if (line->length > 3 && streq(line->data + line->length - 2, "/q")) {
          buf_append(out, line->data, line->length - 1);
          buf_appends(out, " => delete message");
        }
        else
          buf_cat(out, line);
        buf_nl(out);
      }
    buf_free(b);
  }
  flag = 0;
  b = readdestblk( );
  if ( b != NULL ) {
    while(buf_getline(b, line) != -1)
      if (line->length > 0 && !bufleft(line, "#") && !buffind(line, "@")) {
        /* mail addresses are not listed */
        if (flag == 0) {
          if (NEWS[0])
            buf_appends(out,
                        "The following newsgroups/domains are blocked:\n");
          else
            buf_appends(out, "The following domains are blocked:\n");
          flag = 1;
        }
        buf_appendf(out, "   %b\n", line);
      }
    if (flag == 0 && NEWS[0])
      buf_appends(out, "Note that other newsgroups may be unavailable at the remailer's news server.\n");
  }

  buf_nl(out);
  conf_premail(out);

  if (LISTSUPPORTED) {
   /* SUPPORTED CPUNK (TYPE I) REMAILERS
    * 0xDC7532F9        "Heex Remailer <remailer@xmailer.ods.org>"
    * 0x759ED311        "znar <ka5tkn@cox-internet.com>"
    *
    * SUPPORTED MIXMASTER (TYPE II) REMAILERS
    * aarg remailer@aarg.net 475f3f9fe8da22896c10082695a92c2d 2.9b33 C
    * anon mixmaster@anon.978.org 7384ba1eec585bfd7d2b0e9b307f0b1d 2.9b36 MCNm
    */

    buf_nl(out);
    if (PGP) {
      buf_appends(out, "SUPPORTED CPUNK (TYPE I) REMAILERS\n");
      num = t1_rlist(remailer, NULL);
      pgp_rkeylist(remailer, pgpkeyid, num);
      for (i=1; i<=num; i++) {
        if (remailer[i].flags.pgp) {
          snprintf(tmpline, LINELEN, "0x%08X    \"%s <%s>\"\n", pgpkeyid[i], remailer[i].name, remailer[i].addr);
          tmpline[LINELEN-1] = '\0';
          buf_appends(out, tmpline);
        }
      }
      buf_nl(out);
    }
    if (MIX) {
      buf_appends(out, "SUPPORTED MIXMASTER (TYPE II) REMAILERS\n");
      prepare_type2list(out);
      buf_nl(out);
    }
  }


  if ( b ) buf_free(b);
  buf_free(line);
  return (0);
}

void conf_premail(BUFFER *out)
{
  buf_appends(out, "$remailer{\"");
  buf_appends(out, SHORTNAME);
  buf_appends(out, "\"} = \"<");
  buf_appends(out, REMAILERADDR);
  buf_appendc(out, '>');
  if (PGP || UNENCRYPTED)
    buf_appends(out, " cpunk max");
  if (MIX)
    buf_appends(out, " mix");
  if (MIDDLEMAN)
    buf_appends(out, " middle");
  if (PGP)
    buf_appends(out, " pgp");
  if (PGP && !UNENCRYPTED)
    buf_appends(out, " pgponly");
  if (PGP && REPGP) {
    if (REMIX == 1)
      buf_appends(out, " repgp");
    else
      buf_appends(out, " repgp2");
  }
  if (REMIX == 1)
    buf_appends(out, " remix");
  else if (REMIX)
    buf_appends(out, " remix2");
  if (PGP || UNENCRYPTED)
    buf_appends(out, " latent hash cut test");
  if (PGP) {
#ifdef USE_IDEA
    buf_appends(out, " ek");
#endif /* USE_IDEA */
    buf_appends(out, " ekx");
  }
#ifdef USE_IDEA
  buf_appends(out, " esub");
#endif /* USE_IDEA */
#if 0                           /* obsolete */
#ifdef USE_NSUB
  buf_appends(out, " nsub");
#else /* end of USE_NSUB */
  buf_appends(out, " ksub");
#endif /* else if not USE_NSUB */
#endif /* 0 */
  if (INFLATEMAX)
    buf_appendf(out, " inflt%d", INFLATEMAX);
  if (MAXRANDHOPS)
    buf_appendf(out, " rhop%d", MAXRANDHOPS);
  if (POOLSIZE >= 5)
    buf_appends(out, " reord");
  if (NEWS[0])
    buf_appends(out, " post");
  if (SIZELIMIT)
    buf_appendf(out, " klen%d", SIZELIMIT);
  buf_appends(out, "\";\n");
}
1	rabbi	1	/* Mixmaster version 3 -- (C) 1999 Anonymizer Inc.
2
3			Mixmaster may be redistributed and modified under certain conditions.
4			This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF
5			ANY KIND, either express or implied. See the file COPYRIGHT for
6			details.
7
8			Remailer statistics
9	weaselp	500	$Id: stats.c,v 1.19 2003/05/03 05:31:07 weaselp Exp $ */
10	rabbi	1
11
12			#include "mix3.h"
13			#include <stdio.h>
14			#include <string.h>
15			#include <time.h>
16
17			/* log that a message of type t has been received. Statistics for type 2
18			messages are taken from the IDLOG instead of calling this function */
19			int stats_log(int t)
20			{
21			FILE *f;
22
23			f = mix_openfile(STATS, "a");
24			if (f == NULL) {
25			errlog(ERRORMSG, "Can't open %s!\n", STATS);
26			return (-1);
27			}
28			lock(f);
29			fprintf(f, "%d 1 %ld\n", t, (long) time(NULL));
30			unlock(f);
31			fclose(f);
32			return (0);
33			}
34
35			/* log the current pool size after sending messages */
36			int stats_out(int pool)
37			{
38			FILE *f;
39
40	ulfm	315	if (REMAIL == 0)
41			return (0); /* don't keep statistics for the client */
42
43	rabbi	1	f = mix_openfile(STATS, "a");
44			if (f == NULL) {
45			errlog(ERRORMSG, "Can't open %s!\n", STATS);
46			return (-1);
47			}
48			lock(f);
49			fprintf(f, "p 1 %d %ld\n", pool, (long) time(NULL));
50			unlock(f);
51			fclose(f);
52			return (0);
53			}
54
55			int stats(BUFFER *b)
56			{
57			FILE s, f;
58			char line[LINELEN];
59			long now, today, then;
60			time_t t;
61			long updated = 0, havestats = 0;
62	weaselp	392	int msgd[7][24], msg[7][80];
63			/* 0 .. Unencrypted
64			* 1 .. Type I PGP
65			* 2 .. Mix
66			*
67			* 3 .. intermediate
68			* 4 .. final hop mail
69			* 5 .. final hop news
70			* 6 .. randhopped (will get counted in intermediate again)
71			*/
72	rabbi	1	int poold[2][24], pool[2][80];
73	weaselp	178	int i, num, type, assigned, daysum;
74			char c;
75	rabbi	82	idlog_t idbuf;
76	rabbi	1
77			now = (time(NULL) / (60 * 60) + 1) * 60 * 60;
78			today = (now / SECONDSPERDAY) * SECONDSPERDAY;
79
80			for (i = 0; i < 24; i++)
81	weaselp	392	msgd[0][i] = msgd[1][i] = msgd[2][i] = msgd[3][i] = msgd[4][i] = msgd[5][i] = msgd[6][i]= poold[0][i] = poold[1][i] = 0;
82	rabbi	1	for (i = 0; i < 80; i++)
83	weaselp	392	msg[0][i] = msg[1][i] = msg[2][i] = msg[3][i] = msg[4][i] = msg[5][i] = msg[6][i] = pool[0][i] = pool[1][i] = 0;
84	rabbi	1
85			s = mix_openfile(STATS, "r");
86			if (s != NULL) {
87			lock(s);
88			fscanf(s, "%ld", &updated);
89			while (fgets(line, sizeof(line), s) != NULL) {
90			switch (line[0]) {
91			case '0':
92			case '1':
93			case '2':
94	weaselp	392	case '3':
95			case '4':
96			case '5':
97			case '6':
98	weaselp	178	c = '\0';
99			assigned = sscanf(line, "%d %d %ld %c", &type, &num, &then, &c);
100			daysum = (assigned == 4 && c == 'd');
101
102			if (now - then < 0 \|\| (daysum && today - then < 0))
103	rabbi	1	break; /* keep memory consistent even if the time
104			suddenly goes backwards :) */
105	weaselp	178	if (now - then < SECONDSPERDAY && !daysum)
106	rabbi	1	msgd[type][(now - then) / (60 * 60)] += num;
107			else if (today - then < 80 * SECONDSPERDAY)
108			msg[type][(today - then) / SECONDSPERDAY] += num;
109			if (havestats == 0 \|\| then < havestats)
110			havestats = then;
111			break;
112			case 'p':
113	weaselp	178	c = '\0';
114			assigned = sscanf(line, "p %d %d %ld %c", &num, &i, &then, &c);
115			daysum = (assigned == 4 && c == 'd');
116
117			if (now - then < 0 \|\| (daysum && today - then < 0))
118	rabbi	1	break;
119	weaselp	178	if (now - then < SECONDSPERDAY && !daysum) {
120	rabbi	1	poold[0][(now - then) / (60 * 60)] += num;
121			poold[1][(now - then) / (60 * 60)] += i;
122			} else if (today - then < 80 * SECONDSPERDAY) {
123			poold[0][(today - then) / (24 * 60 * 60)] += num;
124			poold[1][(today - then) / (24 * 60 * 60)] += i;
125			}
126			if (havestats == 0 \|\| then < havestats)
127			havestats = then;
128			break;
129			}
130			}
131			unlock(s);
132			fclose(s);
133			}
134	rabbi	82	f = mix_openfile(IDLOG, "rb");
135	rabbi	1	if (f != NULL) {
136	rabbi	82	while (fread(&idbuf, 1, sizeof(idlog_t), f) == sizeof(idlog_t)) {
137			then = idbuf.time;
138	rabbi	1	if (then < updated \|\| now - then < 0)
139			continue;
140			if (now - then < SECONDSPERDAY)
141			msgd[2][(now - then) / (60 * 60)]++;
142			else if (today - then < 80 * SECONDSPERDAY)
143			msg[2][(today - then) / SECONDSPERDAY]++;
144			if (havestats == 0 \|\| then < havestats)
145			havestats = then;
146			}
147			fclose(f);
148			}
149			if (havestats == 0) {
150			if (b != NULL)
151			errlog(NOTICE, "No statistics available.\n");
152			return (-1);
153			}
154			s = mix_openfile(STATS, "w");
155			if (s == NULL) {
156			errlog(ERRORMSG, "Can't create %s!\n", STATS);
157			return (-1);
158			}
159			lock(s);
160			fprintf(s, "%ld\n", (long) time(NULL)); /* time of stats.log update */
161			for (i = 0; i < 24; i++) {
162	weaselp	392	for (type = 0; type < 7; type++)
163	rabbi	1	if (msgd[type][i] > 0)
164			fprintf(s, "%d %d %ld\n", type, msgd[type][i], now - i * 60 * 60);
165			if (poold[0][i] > 0)
166			fprintf(s, "p %d %d %ld\n", poold[0][i], poold[1][i], now - i * 60 * 60);
167			}
168			for (i = 0; i < 80; i++) {
169	weaselp	392	for (type = 0; type < 7; type++)
170	rabbi	1	if (msg[type][i] > 0)
171	weaselp	178	fprintf(s, "%d %d %ld d\n", type, msg[type][i],
172	rabbi	1	today - i * 24 * 60 * 60);
173			if (pool[0][i] > 0)
174	weaselp	178	fprintf(s, "p %d %d %ld d\n", pool[0][i], pool[1][i],
175	rabbi	1	today - i * 24 * 60 * 60);
176			}
177			unlock(s);
178			fclose(s);
179			if (b != NULL) {
180			struct tm *gt;
181
182			buf_sets(b, "Subject: Statistics for the ");
183			buf_appends(b, SHORTNAME);
184			buf_appends(b, " remailer\n\n");
185
186			buf_appends(b, "Number of messages in the past 24 hours:\n");
187			t = now;
188			gt = gmtime(&t);
189			for (i = 23; i >= 0; i--) {
190			buf_appendf(b, " %2dh: ", (24 + gt->tm_hour - i) % 24);
191			if (MIX) {
192			if (PGP \|\| UNENCRYPTED)
193			buf_appends(b, " Mix:");
194			buf_appendf(b, "%4d", msgd[2][i]);
195			}
196			if (PGP)
197			buf_appendf(b, " PGP: %4d", msgd[1][i]);
198			if (UNENCRYPTED)
199			buf_appendf(b, " Unencrypted:%4d", msgd[0][i]);
200			if (poold[0][i] > 0)
201			buf_appendf(b, " [Pool size:%4d]", poold[1][i] / poold[0][i]);
202			#if 0
203			else
204			buf_appends(b, " [ no remailing ]");
205	rabbi	262	#endif /* 0 */
206	rabbi	1	buf_nl(b);
207			}
208			if ((today - havestats) / SECONDSPERDAY >= 1)
209			buf_appends(b, "\nNumber of messages per day:\n");
210			for ((i = (today - havestats) / SECONDSPERDAY) > 79 ? 79 : i;
211			i >= 1; i--) {
212			t = now - i * SECONDSPERDAY;
213			gt = localtime(&t);
214			strftime(line, LINELEN, "%d %b: ", gt);
215			buf_appends(b, line);
216
217			if (MIX) {
218			if (PGP \|\| UNENCRYPTED)
219			buf_appends(b, " Mix:");
220			buf_appendf(b, "%4d", msg[2][i]);
221			}
222			if (PGP)
223			buf_appendf(b, " PGP: %4d", msg[1][i]);
224			if (UNENCRYPTED)
225			buf_appendf(b, " Unencrypted:%4d", msg[0][i]);
226			if (pool[0][i] > 0)
227			buf_appendf(b, " [Pool size:%4d]", pool[1][i] / pool[0][i]);
228	weaselp	392	if (STATSDETAILS) {
229			buf_appendf(b, " Intermediate:%4d", msg[3][i]);
230			buf_appendf(b, " Mail:%4d", msg[4][i]);
231			buf_appendf(b, " Postings:%4d", msg[5][i]);
232			if (MIDDLEMAN)
233			buf_appendf(b, " Randhopped:%4d", msg[6][i]);
234			}
235	rabbi	1	#if 0
236			else
237			buf_appends(b, " [ no remailing ]");
238	rabbi	262	#endif /* 0 */
239	rabbi	1	buf_nl(b);
240			}
241			}
242			return (0);
243			}
244
245			int conf(BUFFER *out)
246			{
247			FILE *f;
248			BUFFER b, line;
249			int flag = 0;
250	weaselp	171	REMAILER remailer[MAXREM];
251			int pgpkeyid[MAXREM];
252			int i, num;
253			char tmpline[LINELEN];
254
255	rabbi	1	b = buf_new();
256			line = buf_new();
257
258			buf_sets(out, "Subject: Capabilities of the ");
259			buf_appends(out, SHORTNAME);
260			buf_appends(out, " remailer\n\n");
261			buf_appends(out, remailer_type);
262			buf_appends(out, VERSION);
263			buf_nl(out);
264
265			if (MIX + PGP + UNENCRYPTED == 1)
266			buf_appends(out, "Supported format:");
267			else
268			buf_appends(out, "Supported formats:\n");
269			if (MIX)
270			buf_appends(out, " Mixmaster\n");
271			if (PGP)
272			buf_appends(out, " Cypherpunk with PGP encryption\n");
273			if (UNENCRYPTED)
274			buf_appends(out, " Cypherpunk (unencrypted)\n");
275
276			buf_appendf(out, "Pool size: %d\n", POOLSIZE);
277			if (SIZELIMIT)
278			buf_appendf(out, "Maximum message size: %d kB\n", SIZELIMIT);
279
280	rabbi	143	/* display destinations to which delivery is explicitly permitted
281	weaselp	149	when in middleman mode (contents of DESTALLOW file.) */
282	rabbi	143
283	weaselp	90	if (MIDDLEMAN) {
284			f = mix_openfile(DESTALLOW, "r");
285			if (f != NULL) {
286			buf_read(b, f);
287			fclose(f);
288			while(buf_getline(b, line) != -1) {
289	weaselp	332	if (line->length > 0 && line->data[0] != '#') {
290			if (flag == 0) {
291			buf_appends(out, "In addition to other remailers, this remailer also sends mail to these\n addresses directly:\n");
292			flag = 1;
293			}
294			buf_appendf(out, " %b\n", line);
295			}
296	weaselp	90	}
297			}
298			}
299
300	weaselp	107	flag = 0;
301	rabbi	1	f = mix_openfile(HDRFILTER, "r");
302			if (f != NULL) {
303			buf_read(b, f);
304			fclose(f);
305			while(buf_getline(b, line) != -1)
306			if (line->length > 0 && line->data[0] != '#') {
307			if (flag == 0) {
308			buf_appends(out, "The following header lines will be filtered:\n");
309			flag = 1;
310			}
311	weaselp	332	buf_appends(out, " ");
312	rabbi	1	if (line->length > 3 && streq(line->data + line->length - 2, "/q")) {
313			buf_append(out, line->data, line->length - 1);
314			buf_appends(out, " => delete message");
315			}
316			else
317			buf_cat(out, line);
318			buf_nl(out);
319			}
320			buf_free(b);
321			}
322			flag = 0;
323			b = readdestblk( );
324			if ( b != NULL ) {
325			while(buf_getline(b, line) != -1)
326			if (line->length > 0 && !bufleft(line, "#") && !buffind(line, "@")) {
327			/* mail addresses are not listed */
328			if (flag == 0) {
329			if (NEWS[0])
330			buf_appends(out,
331			"The following newsgroups/domains are blocked:\n");
332			else
333			buf_appends(out, "The following domains are blocked:\n");
334			flag = 1;
335			}
336			buf_appendf(out, " %b\n", line);
337			}
338			if (flag == 0 && NEWS[0])
339			buf_appends(out, "Note that other newsgroups may be unavailable at the remailer's news server.\n");
340			}
341
342			buf_nl(out);
343			conf_premail(out);
344	weaselp	332
345	weaselp	168	if (LISTSUPPORTED) {
346			/* SUPPORTED CPUNK (TYPE I) REMAILERS
347			* 0xDC7532F9 "Heex Remailer <remailer@xmailer.ods.org>"
348			* 0x759ED311 "znar <ka5tkn@cox-internet.com>"
349			*
350			* SUPPORTED MIXMASTER (TYPE II) REMAILERS
351			* aarg remailer@aarg.net 475f3f9fe8da22896c10082695a92c2d 2.9b33 C
352			* anon mixmaster@anon.978.org 7384ba1eec585bfd7d2b0e9b307f0b1d 2.9b36 MCNm
353	weaselp	332	*/
354
355	weaselp	169	buf_nl(out);
356			if (PGP) {
357			buf_appends(out, "SUPPORTED CPUNK (TYPE I) REMAILERS\n");
358	weaselp	500	num = t1_rlist(remailer, NULL);
359	weaselp	171	pgp_rkeylist(remailer, pgpkeyid, num);
360			for (i=1; i<=num; i++) {
361			if (remailer[i].flags.pgp) {
362			snprintf(tmpline, LINELEN, "0x%08X \"%s <%s>\"\n", pgpkeyid[i], remailer[i].name, remailer[i].addr);
363			tmpline[LINELEN-1] = '\0';
364			buf_appends(out, tmpline);
365			}
366			}
367	weaselp	169	buf_nl(out);
368			}
369			if (MIX) {
370			buf_appends(out, "SUPPORTED MIXMASTER (TYPE II) REMAILERS\n");
371			prepare_type2list(out);
372			buf_nl(out);
373			}
374	weaselp	168	}
375
376	weaselp	332
377	rabbi	1	if ( b ) buf_free(b);
378			buf_free(line);
379			return (0);
380			}
381
382			void conf_premail(BUFFER *out)
383			{
384			buf_appends(out, "$remailer{\"");
385			buf_appends(out, SHORTNAME);
386			buf_appends(out, "\"} = \"<");
387			buf_appends(out, REMAILERADDR);
388			buf_appendc(out, '>');
389			if (PGP \|\| UNENCRYPTED)
390	weaselp	477	buf_appends(out, " cpunk max");
391	rabbi	1	if (MIX)
392			buf_appends(out, " mix");
393			if (MIDDLEMAN)
394			buf_appends(out, " middle");
395			if (PGP)
396			buf_appends(out, " pgp");
397			if (PGP && !UNENCRYPTED)
398			buf_appends(out, " pgponly");
399	rabbi	64	if (PGP && REPGP) {
400	rabbi	62	if (REMIX == 1)
401			buf_appends(out, " repgp");
402			else
403			buf_appends(out, " repgp2");
404			}
405	rabbi	1	if (REMIX == 1)
406			buf_appends(out, " remix");
407			else if (REMIX)
408			buf_appends(out, " remix2");
409			if (PGP \|\| UNENCRYPTED)
410			buf_appends(out, " latent hash cut test");
411			if (PGP) {
412			#ifdef USE_IDEA
413			buf_appends(out, " ek");
414	rabbi	262	#endif /* USE_IDEA */
415	rabbi	1	buf_appends(out, " ekx");
416			}
417			#ifdef USE_IDEA
418			buf_appends(out, " esub");
419	rabbi	262	#endif /* USE_IDEA */
420	rabbi	1	#if 0 /* obsolete */
421			#ifdef USE_NSUB
422			buf_appends(out, " nsub");
423	rabbi	262	#else /* end of USE_NSUB */
424	rabbi	1	buf_appends(out, " ksub");
425	rabbi	262	#endif /* else if not USE_NSUB */
426			#endif /* 0 */
427	rabbi	1	if (INFLATEMAX)
428			buf_appendf(out, " inflt%d", INFLATEMAX);
429			if (MAXRANDHOPS)
430			buf_appendf(out, " rhop%d", MAXRANDHOPS);
431			if (POOLSIZE >= 5)
432			buf_appends(out, " reord");
433			if (NEWS[0])
434			buf_appends(out, " post");
435			if (SIZELIMIT)
436			buf_appendf(out, " klen%d", SIZELIMIT);
437			buf_appends(out, "\";\n");
438			}