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.13 2002/08/25 07:52:28 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;

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