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 -------------------------------------------------*/