3 * $Id: qmail-checkspam.c,v 1.2 2004/04/08 01:36:26 mdw Exp $
5 * Filter messages for spam
7 * (c) 2003 Mark Wooding
10 /*----- Licensing notice --------------------------------------------------*
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
17 * This program is distributed in the hope that it will be useful,
18 * but WITHOUT ANY WARRANTY; without even the implied warranty of
19 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 * GNU General Public License for more details.
22 * You should have received a copy of the GNU General Public License
23 * along with this program; if not, write to the Free Software Foundation,
24 * Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
27 /*----- Header files ------------------------------------------------------*/
36 #include <sys/types.h>
37 #include <sys/unistd.h>
41 /*----- Main code ---------------------------------------------------------*/
43 static const char *strenv(const char *e, const char *d)
45 const char *p = getenv(e);
50 static double dblenv(const char *e, double d)
52 const char *p = getenv(e);
59 if (errno) return (d);
64 static int intenv(const char *e, int d)
66 const char *p = getenv(e);
73 if (errno) return (d);
75 if (l < 0 || l > INT_MAX) return (d);
79 int shovel(int from, int to)
87 n = read(from, buf, sizeof(buf));
88 if (n < 0 && errno != EINTR && errno != EAGAIN)
96 if (n <= 0 && errno != EINTR && errno != EAGAIN)
104 int main(int argc, char *argv[])
108 int fd_m[2], fd_e[2];
113 if (getenv("RELAYCLIENT")) goto exec;
114 m.max_len = intenv("QMAIL_CHECKSPAM_MAXLEN", 2 * 1024 * 1024);
115 m.timeout = intenv("QMAIL_CHECKSPAM_TIMEOUT", 300);
116 rc = message_read(0, 0, &m);
117 if (rc != 0 && rc != EX_TOOBIG)
120 if (lookup_host(strenv("QMAIL_CHECKSPAM_SPAMDHOST", "localhost"),
121 intenv("QMAIL_CHECKSPAM_SPAMDPORT", 783),
124 if (message_filter(&sa, "spamd", 0, &m))
126 if (m.score >= dblenv("QMAIL_CHECKSPAM_THRESH", m.threshold))
129 if (pipe(fd_m) || pipe(fd_e))
131 if ((kid = fork()) < 0)
136 if (message_write(fd_m[1], &m) < 0)
138 if (rc == EX_TOOBIG && shovel(0, fd_m[1]))
141 if (shovel(1, fd_e[1]))
154 qmq = strenv("QMAIL_CHECKSPAM_QUEUE", "/var/qmail/bin/qmail-queue");
155 execlp(qmq, qmq, (char *)0);
156 fprintf(stderr, "failed to exec: %s\n", strerror(errno));
160 /*----- That's all, folks -------------------------------------------------*/