4abf7d1f92723d63aab7327b909237ef646732cd
[exim.git] / src / src / malware.c
1 /* $Cambridge: exim/src/src/malware.c,v 1.5 2005/01/11 08:55:29 tom Exp $ */
2
3 /*************************************************
4 * Exim - an Internet mail transport agent *
5 *************************************************/
6
7 /* Copyright (c) Tom Kistner <tom@duncanthrax.net> 2003-???? */
8 /* License: GPL */
9
10 /* Code for calling virus (malware) scanners. Called from acl.c. */
11
12 #include "exim.h"
13 #ifdef WITH_CONTENT_SCAN
14
15 /* declaration of private routines */
16 int mksd_scan_packed(int sock);
17
18 /* SHUT_WR seems to be undefined on Unixware? */
19 #ifndef SHUT_WR
20 #define SHUT_WR 1
21 #endif
22
23 #define DRWEBD_SCAN_CMD (1) /* scan file, buffer or diskfile */
24 #define DRWEBD_RETURN_VIRUSES (1<<0) /* ask daemon return to us viruses names from report */
25 #define DRWEBD_IS_MAIL (1<<19) /* say to daemon that format is "archive MAIL" */
26
27 #define DERR_READ_ERR (1<<0) /* read error */
28 #define DERR_NOMEMORY (1<<2) /* no memory */
29 #define DERR_TIMEOUT (1<<9) /* scan timeout has run out */
30 #define DERR_BAD_CALL (1<<15) /* wrong command */
31
32 /* Routine to check whether a system is big- or litte-endian.
33 Ripped from http://www.faqs.org/faqs/graphics/fileformats-faq/part4/section-7.html
34 Needed for proper kavdaemon implementation. Sigh. */
35 #define BIG_MY_ENDIAN 0
36 #define LITTLE_MY_ENDIAN 1
37 int test_byte_order(void);
38 int test_byte_order() {
39 short int word = 0x0001;
40 char *byte = (char *) &word;
41 return(byte[0] ? LITTLE_MY_ENDIAN : BIG_MY_ENDIAN);
42 }
43
44 uschar malware_name_buffer[256];
45 int malware_ok = 0;
46
47 int malware(uschar **listptr) {
48 int sep = 0;
49 uschar *list = *listptr;
50 uschar *av_scanner_work = av_scanner;
51 uschar *scanner_name;
52 uschar scanner_name_buffer[16];
53 uschar *malware_regex;
54 uschar malware_regex_buffer[64];
55 uschar malware_regex_default[] = ".+";
56 unsigned long mbox_size;
57 FILE *mbox_file;
58 int roffset;
59 const pcre *re;
60 const uschar *rerror;
61
62 /* make sure the eml mbox file is spooled up */
63 mbox_file = spool_mbox(&mbox_size);
64 if (mbox_file == NULL) {
65 /* error while spooling */
66 log_write(0, LOG_MAIN|LOG_PANIC,
67 "malware acl condition: error while creating mbox spool file");
68 return DEFER;
69 };
70 /* none of our current scanners need the mbox
71 file as a stream, so we can close it right away */
72 fclose(mbox_file);
73
74 /* extract the malware regex to match against from the option list */
75 if ((malware_regex = string_nextinlist(&list, &sep,
76 malware_regex_buffer,
77 sizeof(malware_regex_buffer))) != NULL) {
78
79 /* parse 1st option */
80 if ( (strcmpic(malware_regex,US"false") == 0) ||
81 (Ustrcmp(malware_regex,"0") == 0) ) {
82 /* explicitly no matching */
83 return FAIL;
84 };
85
86 /* special cases (match anything except empty) */
87 if ( (strcmpic(malware_regex,US"true") == 0) ||
88 (Ustrcmp(malware_regex,"*") == 0) ||
89 (Ustrcmp(malware_regex,"1") == 0) ) {
90 malware_regex = malware_regex_default;
91 };
92 }
93 else {
94 /* empty means "don't match anything" */
95 return FAIL;
96 };
97
98 /* Reset sep that is set by previous string_nextinlist() call */
99 sep = 0;
100
101 /* compile the regex, see if it works */
102 re = pcre_compile(CS malware_regex, PCRE_COPT, (const char **)&rerror, &roffset, NULL);
103 if (re == NULL) {
104 log_write(0, LOG_MAIN|LOG_PANIC,
105 "malware acl condition: regular expression error in '%s': %s at offset %d", malware_regex, rerror, roffset);
106 return DEFER;
107 };
108
109 /* if av_scanner starts with a dollar, expand it first */
110 if (*av_scanner == '$') {
111 av_scanner_work = expand_string(av_scanner);
112 if (av_scanner_work == NULL) {
113 log_write(0, LOG_MAIN|LOG_PANIC,
114 "malware acl condition: av_scanner starts with $, but expansion failed: %s", expand_string_message);
115 return DEFER;
116 }
117 else {
118 debug_printf("Expanded av_scanner global: %s\n", av_scanner_work);
119 /* disable result caching in this case */
120 malware_name = NULL;
121 malware_ok = 0;
122 };
123 }
124
125 /* Do not scan twice. */
126 if (malware_ok == 0) {
127
128 /* find the scanner type from the av_scanner option */
129 if ((scanner_name = string_nextinlist(&av_scanner_work, &sep,
130 scanner_name_buffer,
131 sizeof(scanner_name_buffer))) == NULL) {
132 /* no scanner given */
133 log_write(0, LOG_MAIN|LOG_PANIC,
134 "malware acl condition: av_scanner configuration variable is empty");
135 return DEFER;
136 };
137
138 /* "drweb" scanner type ----------------------------------------------- */
139 /* v0.1 - added support for tcp sockets */
140 /* v0.0 - initial release -- support for unix sockets */
141 if (strcmpic(scanner_name,US"drweb") == 0) {
142 uschar *drweb_options;
143 uschar drweb_options_buffer[1024];
144 uschar drweb_options_default[] = "/usr/local/drweb/run/drwebd.sock";
145 struct sockaddr_un server;
146 int sock, result, ovector[30];
147 unsigned int port, fsize;
148 uschar tmpbuf[1024], *drweb_fbuf;
149 uschar scanrequest[1024];
150 uschar drweb_match_string[128];
151 int drweb_rc, drweb_cmd, drweb_flags = 0x0000, drweb_fd,
152 drweb_vnum, drweb_slen, drweb_fin = 0x0000;
153 unsigned long bread;
154 uschar hostname[256];
155 struct hostent *he;
156 struct in_addr in;
157 pcre *drweb_re;
158
159 if ((drweb_options = string_nextinlist(&av_scanner_work, &sep,
160 drweb_options_buffer, sizeof(drweb_options_buffer))) == NULL) {
161 /* no options supplied, use default options */
162 drweb_options = drweb_options_default;
163 };
164
165 if (*drweb_options != '/') {
166
167 /* extract host and port part */
168 if( sscanf(CS drweb_options, "%s %u", hostname, &port) != 2 ) {
169 log_write(0, LOG_MAIN|LOG_PANIC,
170 "malware acl condition: drweb: invalid socket '%s'", drweb_options);
171 return DEFER;
172 }
173
174 /* Lookup the host */
175 if((he = gethostbyname(CS hostname)) == 0) {
176 log_write(0, LOG_MAIN|LOG_PANIC,
177 "malware acl condition: drweb: failed to lookup host '%s'", hostname);
178 return DEFER;
179 }
180
181 in = *(struct in_addr *) he->h_addr_list[0];
182
183 /* Open the drwebd TCP socket */
184 if ( (sock = ip_socket(SOCK_STREAM, AF_INET)) < 0) {
185 log_write(0, LOG_MAIN|LOG_PANIC,
186 "malware acl condition: drweb: unable to acquire socket (%s)",
187 strerror(errno));
188 return DEFER;
189 }
190
191 if (ip_connect(sock, AF_INET, (uschar*)inet_ntoa(in), port, 5) < 0) {
192 close(sock);
193 log_write(0, LOG_MAIN|LOG_PANIC,
194 "malware acl condition: drweb: connection to %s, port %u failed (%s)",
195 inet_ntoa(in), port, strerror(errno));
196 return DEFER;
197 }
198
199 /* prepare variables */
200 drweb_cmd = htonl(DRWEBD_SCAN_CMD);
201 drweb_flags = htonl(DRWEBD_RETURN_VIRUSES | DRWEBD_IS_MAIL);
202 snprintf(CS scanrequest, 1024,CS"%s/scan/%s/%s.eml",
203 spool_directory, message_id, message_id);
204
205 /* calc file size */
206 drweb_fd = open(CS scanrequest, O_RDONLY);
207 if (drweb_fd == -1) {
208 close(sock);
209 log_write(0, LOG_MAIN|LOG_PANIC,
210 "malware acl condition: drweb: can't open spool file %s: %s",
211 scanrequest, strerror(errno));
212 return DEFER;
213 }
214 fsize = lseek(drweb_fd, 0, SEEK_END);
215 if (fsize == -1) {
216 close(sock);
217 close(drweb_fd);
218 log_write(0, LOG_MAIN|LOG_PANIC,
219 "malware acl condition: drweb: can't seek spool file %s: %s",
220 scanrequest, strerror(errno));
221 return DEFER;
222 }
223 drweb_slen = htonl(fsize);
224 lseek(drweb_fd, 0, SEEK_SET);
225
226 /* send scan request */
227 if ((send(sock, &drweb_cmd, sizeof(drweb_cmd), 0) < 0) ||
228 (send(sock, &drweb_flags, sizeof(drweb_flags), 0) < 0) ||
229 (send(sock, &drweb_fin, sizeof(drweb_fin), 0) < 0) ||
230 (send(sock, &drweb_slen, sizeof(drweb_slen), 0) < 0)) {
231 close(sock);
232 close(drweb_fd);
233 log_write(0, LOG_MAIN|LOG_PANIC,
234 "malware acl condition: drweb: unable to send commands to socket (%s)", drweb_options);
235 return DEFER;
236 }
237
238 drweb_fbuf = (uschar *) malloc (fsize);
239 if (!drweb_fbuf) {
240 close(sock);
241 close(drweb_fd);
242 log_write(0, LOG_MAIN|LOG_PANIC,
243 "malware acl condition: drweb: unable to allocate memory %u for file (%s)",
244 fsize, scanrequest);
245 return DEFER;
246 }
247
248 result = read (drweb_fd, drweb_fbuf, fsize);
249 if (result == -1) {
250 close(sock);
251 close(drweb_fd);
252 free(drweb_fbuf);
253 log_write(0, LOG_MAIN|LOG_PANIC,
254 "malware acl condition: drweb: can't read spool file %s: %s",
255 scanrequest, strerror(errno));
256 return DEFER;
257 }
258 close(drweb_fd);
259
260 /* send file body to socket */
261 if (send(sock, drweb_fbuf, fsize, 0) < 0) {
262 close(sock);
263 free(drweb_fbuf);
264 log_write(0, LOG_MAIN|LOG_PANIC,
265 "malware acl condition: drweb: unable to send file body to socket (%s)", drweb_options);
266 return DEFER;
267 }
268 close(drweb_fd);
269 }
270 else {
271 /* open the drwebd UNIX socket */
272 sock = socket(AF_UNIX, SOCK_STREAM, 0);
273 if (sock < 0) {
274 log_write(0, LOG_MAIN|LOG_PANIC,
275 "malware acl condition: drweb: can't open UNIX socket");
276 return DEFER;
277 }
278 server.sun_family = AF_UNIX;
279 Ustrcpy(server.sun_path, drweb_options);
280 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
281 close(sock);
282 log_write(0, LOG_MAIN|LOG_PANIC,
283 "malware acl condition: drweb: unable to connect to socket (%s). errno=%d", drweb_options, errno);
284 return DEFER;
285 }
286
287 /* prepare variables */
288 drweb_cmd = htonl(DRWEBD_SCAN_CMD);
289 drweb_flags = htonl(DRWEBD_RETURN_VIRUSES | DRWEBD_IS_MAIL);
290 snprintf(CS scanrequest, 1024,CS"%s/scan/%s/%s.eml", spool_directory, message_id, message_id);
291 drweb_slen = htonl(Ustrlen(scanrequest));
292
293 /* send scan request */
294 if ((send(sock, &drweb_cmd, sizeof(drweb_cmd), 0) < 0) ||
295 (send(sock, &drweb_flags, sizeof(drweb_flags), 0) < 0) ||
296 (send(sock, &drweb_slen, sizeof(drweb_slen), 0) < 0) ||
297 (send(sock, scanrequest, Ustrlen(scanrequest), 0) < 0) ||
298 (send(sock, &drweb_fin, sizeof(drweb_fin), 0) < 0)) {
299 close(sock);
300 log_write(0, LOG_MAIN|LOG_PANIC,
301 "malware acl condition: drweb: unable to send commands to socket (%s)", drweb_options);
302 return DEFER;
303 }
304 }
305
306 /* wait for result */
307 if ((bread = recv(sock, &drweb_rc, sizeof(drweb_rc), 0) != sizeof(drweb_rc))) {
308 close(sock);
309 log_write(0, LOG_MAIN|LOG_PANIC,
310 "malware acl condition: drweb: unable to read return code");
311 return DEFER;
312 }
313 drweb_rc = ntohl(drweb_rc);
314
315 if ((bread = recv(sock, &drweb_vnum, sizeof(drweb_vnum), 0) != sizeof(drweb_vnum))) {
316 close(sock);
317 log_write(0, LOG_MAIN|LOG_PANIC,
318 "malware acl condition: drweb: unable to read the number of viruses");
319 return DEFER;
320 }
321 drweb_vnum = ntohl(drweb_vnum);
322
323 /* "virus(es) found" if virus number is > 0 */
324 if (drweb_vnum)
325 {
326 int i;
327 uschar pre_malware_nb[256];
328
329 malware_name = malware_name_buffer;
330
331 /* setup default virus name */
332 Ustrcpy(malware_name_buffer,"unknown");
333
334 /* read and concatenate virus names into one string */
335 for (i=0;i<drweb_vnum;i++)
336 {
337 /* read the size of report */
338 if ((bread = recv(sock, &drweb_slen, sizeof(drweb_slen), 0) != sizeof(drweb_slen))) {
339 close(sock);
340 log_write(0, LOG_MAIN|LOG_PANIC,
341 "malware acl condition: drweb: cannot read report size");
342 return DEFER;
343 };
344 drweb_slen = ntohl(drweb_slen);
345
346 /* read report body */
347 if ((bread = recv(sock, tmpbuf, drweb_slen, 0)) != drweb_slen) {
348 close(sock);
349 log_write(0, LOG_MAIN|LOG_PANIC,
350 "malware acl condition: drweb: cannot read report string");
351 return DEFER;
352 };
353 tmpbuf[drweb_slen] = '\0';
354
355 /* set up match regex, depends on retcode */
356 Ustrcpy(drweb_match_string, "infected\\swith\\s*(.+?)$");
357
358 drweb_re = pcre_compile( CS drweb_match_string,
359 PCRE_COPT,
360 (const char **)&rerror,
361 &roffset,
362 NULL );
363
364 /* try matcher on the line, grab substring */
365 result = pcre_exec(drweb_re, NULL, CS tmpbuf, Ustrlen(tmpbuf), 0, 0, ovector, 30);
366 if (result >= 2) {
367 pcre_copy_substring(CS tmpbuf, ovector, result, 1, CS pre_malware_nb, 255);
368 }
369 /* the first name we just copy to malware_name */
370 if (i==0)
371 Ustrcpy(CS malware_name_buffer, CS pre_malware_nb);
372 else {
373 /* concatenate each new virus name to previous */
374 int slen = Ustrlen(malware_name_buffer);
375 if (slen < (slen+Ustrlen(pre_malware_nb))) {
376 Ustrcat(malware_name_buffer, "/");
377 Ustrcat(malware_name_buffer, pre_malware_nb);
378 }
379 }
380 }
381 }
382 else {
383 char *drweb_s = NULL;
384
385 if (drweb_rc & DERR_READ_ERR) drweb_s = "read error";
386 if (drweb_rc & DERR_NOMEMORY) drweb_s = "no memory";
387 if (drweb_rc & DERR_TIMEOUT) drweb_s = "timeout";
388 if (drweb_rc & DERR_BAD_CALL) drweb_s = "wrong command";
389 /* retcodes DERR_SYMLINK, DERR_NO_REGFILE, DERR_SKIPPED.
390 * DERR_TOO_BIG, DERR_TOO_COMPRESSED, DERR_SPAM,
391 * DERR_CRC_ERROR, DERR_READSOCKET, DERR_WRITE_ERR
392 * and others are ignored */
393 if (drweb_s) {
394 log_write(0, LOG_MAIN|LOG_PANIC,
395 "malware acl condition: drweb: drweb daemon retcode 0x%x (%s)", drweb_rc, drweb_s);
396 close(sock);
397 return DEFER;
398 }
399 /* no virus found */
400 malware_name = NULL;
401 };
402 close(sock);
403 }
404 /* ----------------------------------------------------------------------- */
405 else if (strcmpic(scanner_name,US"aveserver") == 0) {
406 uschar *kav_options;
407 uschar kav_options_buffer[1024];
408 uschar kav_options_default[] = "/var/run/aveserver";
409 uschar buf[32768];
410 struct sockaddr_un server;
411 int sock;
412
413 if ((kav_options = string_nextinlist(&av_scanner_work, &sep,
414 kav_options_buffer,
415 sizeof(kav_options_buffer))) == NULL) {
416 /* no options supplied, use default options */
417 kav_options = kav_options_default;
418 };
419
420 /* open the aveserver socket */
421 sock = socket(AF_UNIX, SOCK_STREAM, 0);
422 if (sock < 0) {
423 log_write(0, LOG_MAIN|LOG_PANIC,
424 "malware acl condition: can't open UNIX socket.");
425 return DEFER;
426 }
427 server.sun_family = AF_UNIX;
428 Ustrcpy(server.sun_path, kav_options);
429 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
430 close(sock);
431 log_write(0, LOG_MAIN|LOG_PANIC,
432 "malware acl condition: unable to connect to aveserver UNIX socket (%s). errno=%d", kav_options, errno);
433 return DEFER;
434 }
435
436 /* read aveserver's greeting and see if it is ready (2xx greeting) */
437 recv_line(sock, buf, 32768);
438
439 if (buf[0] != '2') {
440 /* aveserver is having problems */
441 close(sock);
442 log_write(0, LOG_MAIN|LOG_PANIC,
443 "malware acl condition: aveserver is unavailable (Responded: %s).", ((buf[0] != 0) ? buf : (uschar *)"nothing") );
444 return DEFER;
445 };
446
447 /* prepare our command */
448 snprintf(CS buf, 32768, "SCAN bPQRSTUW %s/scan/%s/%s.eml\r\n", spool_directory, message_id, message_id);
449
450 /* and send it */
451 if (send(sock, buf, Ustrlen(buf), 0) < 0) {
452 close(sock);
453 log_write(0, LOG_MAIN|LOG_PANIC,
454 "malware acl condition: unable to write to aveserver UNIX socket (%s)", kav_options);
455 return DEFER;
456 }
457
458 malware_name = NULL;
459 /* read response lines, find malware name and final response */
460 while (recv_line(sock, buf, 32768) > 0) {
461 debug_printf("aveserver: %s\n", buf);
462 if (buf[0] == '2') break;
463 if (Ustrncmp(buf,"322",3) == 0) {
464 uschar *p = Ustrchr(&buf[4],' ');
465 *p = '\0';
466 Ustrcpy(malware_name_buffer,&buf[4]);
467 malware_name = malware_name_buffer;
468 };
469 }
470
471 close(sock);
472 }
473 /* "fsecure" scanner type ------------------------------------------------- */
474 else if (strcmpic(scanner_name,US"fsecure") == 0) {
475 uschar *fsecure_options;
476 uschar fsecure_options_buffer[1024];
477 uschar fsecure_options_default[] = "/var/run/.fsav";
478 struct sockaddr_un server;
479 int sock, i, j, bread = 0;
480 uschar file_name[1024];
481 uschar av_buffer[1024];
482 pcre *fs_inf;
483 static uschar *cmdoptions[] = { US"CONFIGURE\tARCHIVE\t1\n",
484 US"CONFIGURE\tTIMEOUT\t0\n",
485 US"CONFIGURE\tMAXARCH\t5\n",
486 US"CONFIGURE\tMIME\t1\n" };
487
488 malware_name = NULL;
489 if ((fsecure_options = string_nextinlist(&av_scanner_work, &sep,
490 fsecure_options_buffer,
491 sizeof(fsecure_options_buffer))) == NULL) {
492 /* no options supplied, use default options */
493 fsecure_options = fsecure_options_default;
494 };
495
496 /* open the fsecure socket */
497 sock = socket(AF_UNIX, SOCK_STREAM, 0);
498 if (sock < 0) {
499 log_write(0, LOG_MAIN|LOG_PANIC,
500 "malware acl condition: unable to open fsecure socket %s (%s)",
501 fsecure_options, strerror(errno));
502 return DEFER;
503 }
504 server.sun_family = AF_UNIX;
505 Ustrcpy(server.sun_path, fsecure_options);
506 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
507 close(sock);
508 log_write(0, LOG_MAIN|LOG_PANIC,
509 "malware acl condition: unable to connect to fsecure socket %s (%s)",
510 fsecure_options, strerror(errno));
511 return DEFER;
512 }
513
514 /* pass options */
515 memset(av_buffer, 0, sizeof(av_buffer));
516 for (i=0; i != 4; i++) {
517 /* debug_printf("send option \"%s\"",cmdoptions[i]); */
518 if (write(sock, cmdoptions[i], Ustrlen(cmdoptions[i])) < 0) {
519 close(sock);
520 log_write(0, LOG_MAIN|LOG_PANIC,
521 "malware acl condition: unable to write fsecure option %d to %s (%s)",
522 i, fsecure_options, strerror(errno));
523 return DEFER;
524 };
525
526 bread = read(sock, av_buffer, sizeof(av_buffer));
527 if (bread >0) av_buffer[bread]='\0';
528 if (bread < 0) {
529 close(sock);
530 log_write(0, LOG_MAIN|LOG_PANIC,
531 "malware acl condition: unable to read fsecure answer %d (%s)", i, strerror(errno));
532 return DEFER;
533 };
534 for (j=0;j<bread;j++) if((av_buffer[j]=='\r')||(av_buffer[j]=='\n')) av_buffer[j] ='@';
535 /* debug_printf("read answer %d read=%d \"%s\"\n", i, bread, av_buffer ); */
536 /* while (Ustrstr(av_buffer, "OK\tServer configured.@") == NULL); */
537 };
538
539 /* pass the mailfile to fsecure */
540 snprintf(CS file_name,1024,"SCAN\t%s/scan/%s/%s.eml\n", spool_directory, message_id, message_id);
541 /* debug_printf("send scan %s",file_name); */
542 if (write(sock, file_name, Ustrlen(file_name)) < 0) {
543 close(sock);
544 log_write(0, LOG_MAIN|LOG_PANIC,
545 "malware acl condition: unable to write fsecure scan to %s (%s)",
546 fsecure_options, strerror(errno));
547 return DEFER;
548 };
549
550 /* set up match */
551 /* todo also SUSPICION\t */
552 fs_inf = pcre_compile("\\S{0,5}INFECTED\\t[^\\t]*\\t([^\\t]+)\\t\\S*$", PCRE_COPT, (const char **)&rerror, &roffset, NULL);
553
554 /* read report, linewise */
555 do {
556 int ovector[30];
557 i = 0;
558 memset(av_buffer, 0, sizeof(av_buffer));
559 do {
560 bread=read(sock, &av_buffer[i], 1);
561 if (bread < 0) {
562 close(sock);
563 log_write(0, LOG_MAIN|LOG_PANIC,
564 "malware acl condition: unable to read fsecure result (%s)", strerror(errno));
565 return DEFER;
566 };
567 i++;
568 }
569 while ((i < sizeof(av_buffer)-1 ) && (av_buffer[i-1] != '\n'));
570 av_buffer[i-1] = '\0';
571 /* debug_printf("got line \"%s\"\n",av_buffer); */
572
573 /* Really search for virus again? */
574 if (malware_name == NULL) {
575 /* try matcher on the line, grab substring */
576 i = pcre_exec(fs_inf, NULL, CS av_buffer, Ustrlen(av_buffer), 0, 0, ovector, 30);
577 if (i >= 2) {
578 /* Got it */
579 pcre_copy_substring(CS av_buffer, ovector, i, 1, CS malware_name_buffer, 255);
580 malware_name = malware_name_buffer;
581 };
582 };
583 }
584 while (Ustrstr(av_buffer, "OK\tScan ok.") == NULL);
585 close(sock);
586 }
587 /* ----------------------------------------------------------------------- */
588
589 /* "kavdaemon" scanner type ------------------------------------------------ */
590 else if (strcmpic(scanner_name,US"kavdaemon") == 0) {
591 uschar *kav_options;
592 uschar kav_options_buffer[1024];
593 uschar kav_options_default[] = "/var/run/AvpCtl";
594 struct sockaddr_un server;
595 int sock;
596 time_t t;
597 uschar tmpbuf[1024];
598 uschar scanrequest[1024];
599 uschar kav_match_string[128];
600 int kav_rc;
601 unsigned long kav_reportlen, bread;
602 pcre *kav_re;
603
604 if ((kav_options = string_nextinlist(&av_scanner_work, &sep,
605 kav_options_buffer,
606 sizeof(kav_options_buffer))) == NULL) {
607 /* no options supplied, use default options */
608 kav_options = kav_options_default;
609 };
610
611 /* open the kavdaemon socket */
612 sock = socket(AF_UNIX, SOCK_STREAM, 0);
613 if (sock < 0) {
614 log_write(0, LOG_MAIN|LOG_PANIC,
615 "malware acl condition: can't open UNIX socket.");
616 return DEFER;
617 }
618 server.sun_family = AF_UNIX;
619 Ustrcpy(server.sun_path, kav_options);
620 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
621 close(sock);
622 log_write(0, LOG_MAIN|LOG_PANIC,
623 "malware acl condition: unable to connect to kavdaemon UNIX socket (%s). errno=%d", kav_options, errno);
624 return DEFER;
625 }
626
627 /* get current date and time, build scan request */
628 time(&t);
629 strftime(CS tmpbuf, sizeof(tmpbuf), "<0>%d %b %H:%M:%S:%%s/scan/%%s", localtime(&t));
630 snprintf(CS scanrequest, 1024,CS tmpbuf, spool_directory, message_id);
631
632 /* send scan request */
633 if (send(sock, scanrequest, Ustrlen(scanrequest)+1, 0) < 0) {
634 close(sock);
635 log_write(0, LOG_MAIN|LOG_PANIC,
636 "malware acl condition: unable to write to kavdaemon UNIX socket (%s)", kav_options);
637 return DEFER;
638 }
639
640 /* wait for result */
641 if ((bread = recv(sock, tmpbuf, 2, 0) != 2)) {
642 close(sock);
643 log_write(0, LOG_MAIN|LOG_PANIC,
644 "malware acl condition: unable to read 2 bytes from kavdaemon socket.");
645 return DEFER;
646 }
647
648 /* get errorcode from one nibble */
649 if (test_byte_order() == LITTLE_MY_ENDIAN) {
650 kav_rc = tmpbuf[0] & 0x0F;
651 }
652 else {
653 kav_rc = tmpbuf[1] & 0x0F;
654 };
655
656 /* improper kavdaemon configuration */
657 if ( (kav_rc == 5) || (kav_rc == 6) ) {
658 close(sock);
659 log_write(0, LOG_MAIN|LOG_PANIC,
660 "malware acl condition: please reconfigure kavdaemon to NOT disinfect or remove infected files.");
661 return DEFER;
662 };
663
664 if (kav_rc == 1) {
665 close(sock);
666 log_write(0, LOG_MAIN|LOG_PANIC,
667 "malware acl condition: kavdaemon reported 'scanning not completed' (code 1).");
668 return DEFER;
669 };
670
671 if (kav_rc == 7) {
672 close(sock);
673 log_write(0, LOG_MAIN|LOG_PANIC,
674 "malware acl condition: kavdaemon reported 'kavdaemon damaged' (code 7).");
675 return DEFER;
676 };
677
678 /* code 8 is not handled, since it is ambigous. It appears mostly on
679 bounces where part of a file has been cut off */
680
681 /* "virus found" return codes (2-4) */
682 if ((kav_rc > 1) && (kav_rc < 5)) {
683 int report_flag = 0;
684
685 /* setup default virus name */
686 Ustrcpy(malware_name_buffer,"unknown");
687 malware_name = malware_name_buffer;
688
689 if (test_byte_order() == LITTLE_MY_ENDIAN) {
690 report_flag = tmpbuf[1];
691 }
692 else {
693 report_flag = tmpbuf[0];
694 };
695
696 /* read the report, if available */
697 if( report_flag == 1 ) {
698 /* read report size */
699 if ((bread = recv(sock, &kav_reportlen, 4, 0)) != 4) {
700 close(sock);
701 log_write(0, LOG_MAIN|LOG_PANIC,
702 "malware acl condition: cannot read report size from kavdaemon");
703 return DEFER;
704 };
705
706 /* it's possible that avp returns av_buffer[1] == 1 but the
707 reportsize is 0 (!?) */
708 if (kav_reportlen > 0) {
709 /* set up match regex, depends on retcode */
710 if( kav_rc == 3 )
711 Ustrcpy(kav_match_string, "suspicion:\\s*(.+?)\\s*$");
712 else
713 Ustrcpy(kav_match_string, "infected:\\s*(.+?)\\s*$");
714
715 kav_re = pcre_compile( CS kav_match_string,
716 PCRE_COPT,
717 (const char **)&rerror,
718 &roffset,
719 NULL );
720
721 /* read report, linewise */
722 while (kav_reportlen > 0) {
723 int result = 0;
724 int ovector[30];
725
726 bread = 0;
727 while ( recv(sock, &tmpbuf[bread], 1, 0) == 1 ) {
728 kav_reportlen--;
729 if ( (tmpbuf[bread] == '\n') || (bread > 1021) ) break;
730 bread++;
731 };
732 bread++;
733 tmpbuf[bread] = '\0';
734
735 /* try matcher on the line, grab substring */
736 result = pcre_exec(kav_re, NULL, CS tmpbuf, Ustrlen(tmpbuf), 0, 0, ovector, 30);
737 if (result >= 2) {
738 pcre_copy_substring(CS tmpbuf, ovector, result, 1, CS malware_name_buffer, 255);
739 break;
740 };
741 };
742 };
743 };
744 }
745 else {
746 /* no virus found */
747 malware_name = NULL;
748 };
749
750 close(sock);
751 }
752 /* ----------------------------------------------------------------------- */
753
754
755 /* "cmdline" scanner type ------------------------------------------------ */
756 else if (strcmpic(scanner_name,US"cmdline") == 0) {
757 uschar *cmdline_scanner;
758 uschar cmdline_scanner_buffer[1024];
759 uschar *cmdline_trigger;
760 uschar cmdline_trigger_buffer[1024];
761 const pcre *cmdline_trigger_re;
762 uschar *cmdline_regex;
763 uschar cmdline_regex_buffer[1024];
764 const pcre *cmdline_regex_re;
765 uschar file_name[1024];
766 uschar commandline[1024];
767 void (*eximsigchld)(int);
768 void (*eximsigpipe)(int);
769 FILE *scanner_out = NULL;
770 FILE *scanner_record = NULL;
771 uschar linebuffer[32767];
772 int trigger = 0;
773 int result;
774 int ovector[30];
775
776 /* find scanner command line */
777 if ((cmdline_scanner = string_nextinlist(&av_scanner_work, &sep,
778 cmdline_scanner_buffer,
779 sizeof(cmdline_scanner_buffer))) == NULL) {
780 /* no command line supplied */
781 log_write(0, LOG_MAIN|LOG_PANIC,
782 "malware acl condition: missing commandline specification for cmdline scanner type.");
783 return DEFER;
784 };
785
786 /* find scanner output trigger */
787 if ((cmdline_trigger = string_nextinlist(&av_scanner_work, &sep,
788 cmdline_trigger_buffer,
789 sizeof(cmdline_trigger_buffer))) == NULL) {
790 /* no trigger regex supplied */
791 log_write(0, LOG_MAIN|LOG_PANIC,
792 "malware acl condition: missing trigger specification for cmdline scanner type.");
793 return DEFER;
794 };
795
796 /* precompile trigger regex */
797 cmdline_trigger_re = pcre_compile(CS cmdline_trigger, PCRE_COPT, (const char **)&rerror, &roffset, NULL);
798 if (cmdline_trigger_re == NULL) {
799 log_write(0, LOG_MAIN|LOG_PANIC,
800 "malware acl condition: regular expression error in '%s': %s at offset %d", cmdline_trigger_re, rerror, roffset);
801 return DEFER;
802 };
803
804 /* find scanner name regex */
805 if ((cmdline_regex = string_nextinlist(&av_scanner_work, &sep,
806 cmdline_regex_buffer,
807 sizeof(cmdline_regex_buffer))) == NULL) {
808 /* no name regex supplied */
809 log_write(0, LOG_MAIN|LOG_PANIC,
810 "malware acl condition: missing virus name regex specification for cmdline scanner type.");
811 return DEFER;
812 };
813
814 /* precompile name regex */
815 cmdline_regex_re = pcre_compile(CS cmdline_regex, PCRE_COPT, (const char **)&rerror, &roffset, NULL);
816 if (cmdline_regex_re == NULL) {
817 log_write(0, LOG_MAIN|LOG_PANIC,
818 "malware acl condition: regular expression error in '%s': %s at offset %d", cmdline_regex_re, rerror, roffset);
819 return DEFER;
820 };
821
822 /* prepare scanner call */
823 snprintf(CS file_name,1024,"%s/scan/%s", spool_directory, message_id);
824 snprintf(CS commandline,1024, CS cmdline_scanner,file_name);
825 /* redirect STDERR too */
826 Ustrcat(commandline," 2>&1");
827
828 /* store exims signal handlers */
829 eximsigchld = signal(SIGCHLD,SIG_DFL);
830 eximsigpipe = signal(SIGPIPE,SIG_DFL);
831
832 scanner_out = popen(CS commandline,"r");
833 if (scanner_out == NULL) {
834 log_write(0, LOG_MAIN|LOG_PANIC,
835 "malware acl condition: calling cmdline scanner (%s) failed: %s.", commandline, strerror(errno));
836 signal(SIGCHLD,eximsigchld);
837 signal(SIGPIPE,eximsigpipe);
838 return DEFER;
839 };
840
841 snprintf(CS file_name,1024,"%s/scan/%s/%s_scanner_output", spool_directory, message_id, message_id);
842 scanner_record = fopen(CS file_name,"w");
843
844 if (scanner_record == NULL) {
845 log_write(0, LOG_MAIN|LOG_PANIC,
846 "malware acl condition: opening scanner output file (%s) failed: %s.", file_name, strerror(errno));
847 pclose(scanner_out);
848 signal(SIGCHLD,eximsigchld);
849 signal(SIGPIPE,eximsigpipe);
850 return DEFER;
851 };
852
853 /* look for trigger while recording output */
854 while(fgets(CS linebuffer,32767,scanner_out) != NULL) {
855 if ( Ustrlen(linebuffer) > fwrite(linebuffer, 1, Ustrlen(linebuffer), scanner_record) ) {
856 /* short write */
857 log_write(0, LOG_MAIN|LOG_PANIC,
858 "malware acl condition: short write on scanner output file (%s).", file_name);
859 pclose(scanner_out);
860 signal(SIGCHLD,eximsigchld);
861 signal(SIGPIPE,eximsigpipe);
862 return DEFER;
863 };
864 /* try trigger match */
865 if (!trigger && regex_match_and_setup(cmdline_trigger_re, linebuffer, 0, -1))
866 trigger = 1;
867 };
868
869 fclose(scanner_record);
870 pclose(scanner_out);
871 signal(SIGCHLD,eximsigchld);
872 signal(SIGPIPE,eximsigpipe);
873
874 if (trigger) {
875 /* setup default virus name */
876 Ustrcpy(malware_name_buffer,"unknown");
877 malware_name = malware_name_buffer;
878
879 /* re-open the scanner output file, look for name match */
880 scanner_record = fopen(CS file_name,"r");
881 while(fgets(CS linebuffer,32767,scanner_record) != NULL) {
882 /* try match */
883 result = pcre_exec(cmdline_regex_re, NULL, CS linebuffer, Ustrlen(linebuffer), 0, 0, ovector, 30);
884 if (result >= 2) {
885 pcre_copy_substring(CS linebuffer, ovector, result, 1, CS malware_name_buffer, 255);
886 };
887 };
888 fclose(scanner_record);
889 }
890 else {
891 /* no virus found */
892 malware_name = NULL;
893 };
894 }
895 /* ----------------------------------------------------------------------- */
896
897
898 /* "sophie" scanner type ------------------------------------------------- */
899 else if (strcmpic(scanner_name,US"sophie") == 0) {
900 uschar *sophie_options;
901 uschar sophie_options_buffer[1024];
902 uschar sophie_options_default[] = "/var/run/sophie";
903 int bread = 0;
904 struct sockaddr_un server;
905 int sock;
906 uschar file_name[1024];
907 uschar av_buffer[1024];
908
909 if ((sophie_options = string_nextinlist(&av_scanner_work, &sep,
910 sophie_options_buffer,
911 sizeof(sophie_options_buffer))) == NULL) {
912 /* no options supplied, use default options */
913 sophie_options = sophie_options_default;
914 };
915
916 /* open the sophie socket */
917 sock = socket(AF_UNIX, SOCK_STREAM, 0);
918 if (sock < 0) {
919 log_write(0, LOG_MAIN|LOG_PANIC,
920 "malware acl condition: can't open UNIX socket.");
921 return DEFER;
922 }
923 server.sun_family = AF_UNIX;
924 Ustrcpy(server.sun_path, sophie_options);
925 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
926 close(sock);
927 log_write(0, LOG_MAIN|LOG_PANIC,
928 "malware acl condition: unable to connect to sophie UNIX socket (%s). errno=%d", sophie_options, errno);
929 return DEFER;
930 }
931
932 /* pass the scan directory to sophie */
933 snprintf(CS file_name,1024,"%s/scan/%s", spool_directory, message_id);
934 if (write(sock, file_name, Ustrlen(file_name)) < 0) {
935 close(sock);
936 log_write(0, LOG_MAIN|LOG_PANIC,
937 "malware acl condition: unable to write to sophie UNIX socket (%s)", sophie_options);
938 return DEFER;
939 };
940
941 write(sock, "\n", 1);
942
943 /* wait for result */
944 memset(av_buffer, 0, sizeof(av_buffer));
945 if ((!(bread = read(sock, av_buffer, sizeof(av_buffer))) > 0)) {
946 close(sock);
947 log_write(0, LOG_MAIN|LOG_PANIC,
948 "malware acl condition: unable to read from sophie UNIX socket (%s)", sophie_options);
949 return DEFER;
950 };
951
952 close(sock);
953
954 /* infected ? */
955 if (av_buffer[0] == '1') {
956 if (Ustrchr(av_buffer, '\n')) *Ustrchr(av_buffer, '\n') = '\0';
957 Ustrcpy(malware_name_buffer,&av_buffer[2]);
958 malware_name = malware_name_buffer;
959 }
960 else if (!strncmp(CS av_buffer, "-1", 2)) {
961 log_write(0, LOG_MAIN|LOG_PANIC,
962 "malware acl condition: malware acl condition: sophie reported error");
963 return DEFER;
964 }
965 else {
966 /* all ok, no virus */
967 malware_name = NULL;
968 };
969 }
970 /* ----------------------------------------------------------------------- */
971
972
973 /* "clamd" scanner type ------------------------------------------------- */
974 /* This code was contributed by David Saez <david@ols.es> */
975 else if (strcmpic(scanner_name,US"clamd") == 0) {
976 uschar *clamd_options;
977 uschar clamd_options_buffer[1024];
978 uschar clamd_options_default[] = "/tmp/clamd";
979 uschar *p,*vname;
980 struct sockaddr_un server;
981 int sock,bread=0;
982 unsigned int port;
983 uschar file_name[1024];
984 uschar av_buffer[1024];
985 uschar hostname[256];
986 struct hostent *he;
987 struct in_addr in;
988 uschar *clamd_options2;
989 uschar clamd_options2_buffer[1024];
990 uschar clamd_options2_default[] = "";
991 uschar av_buffer2[1024];
992 uschar *clamav_fbuf;
993 uschar scanrequest[1024];
994 int sockData, clam_fd, result;
995 unsigned int fsize;
996
997 if ((clamd_options = string_nextinlist(&av_scanner_work, &sep,
998 clamd_options_buffer,
999 sizeof(clamd_options_buffer))) == NULL) {
1000 /* no options supplied, use default options */
1001 clamd_options = clamd_options_default;
1002 }
1003 if ((clamd_options2 = string_nextinlist(&av_scanner_work, &sep,
1004 clamd_options2_buffer,
1005 sizeof(clamd_options2_buffer))) == NULL) {
1006 clamd_options2 = clamd_options2_default;
1007 }
1008
1009 /* socket does not start with '/' -> network socket */
1010 if (*clamd_options != '/') {
1011
1012 /* extract host and port part */
1013 if( sscanf(CS clamd_options, "%s %u", hostname, &port) != 2 ) {
1014 log_write(0, LOG_MAIN|LOG_PANIC,
1015 "malware acl condition: clamd: invalid socket '%s'", clamd_options);
1016 return DEFER;
1017 };
1018
1019 /* Lookup the host */
1020 if((he = gethostbyname(CS hostname)) == 0) {
1021 log_write(0, LOG_MAIN|LOG_PANIC,
1022 "malware acl condition: clamd: failed to lookup host '%s'", hostname);
1023 return DEFER;
1024 }
1025
1026 in = *(struct in_addr *) he->h_addr_list[0];
1027
1028 /* Open the ClamAV Socket */
1029 if ( (sock = ip_socket(SOCK_STREAM, AF_INET)) < 0) {
1030 log_write(0, LOG_MAIN|LOG_PANIC,
1031 "malware acl condition: clamd: unable to acquire socket (%s)",
1032 strerror(errno));
1033 return DEFER;
1034 }
1035
1036 if (ip_connect(sock, AF_INET, (uschar*)inet_ntoa(in), port, 5) < 0) {
1037 close(sock);
1038 log_write(0, LOG_MAIN|LOG_PANIC,
1039 "malware acl condition: clamd: connection to %s, port %u failed (%s)",
1040 inet_ntoa(in), port, strerror(errno));
1041 return DEFER;
1042 }
1043
1044 if (strcmpic(clamd_options2,US"local") == 0) {
1045
1046 /* Pass the string to ClamAV (7 = "SCAN \n" + \0) */
1047
1048 snprintf(CS file_name,1024,"SCAN %s/scan/%s\n", spool_directory, message_id);
1049
1050 if (send(sock, file_name, Ustrlen(file_name), 0) < 0) {
1051 close(sock);
1052 log_write(0, LOG_MAIN|LOG_PANIC,"malware acl condition: clamd: unable to write to socket (%s)",
1053 strerror(errno));
1054 return DEFER;
1055 }
1056 } else {
1057
1058 /* Pass the string to ClamAV (7 = "STREAM\n") */
1059
1060 if (send(sock, "STREAM\n", 7, 0) < 0) {
1061 close(sock);
1062 log_write(0, LOG_MAIN|LOG_PANIC,"malware acl condition: clamd: unable to write to socket (%s)",
1063 strerror(errno));
1064 return DEFER;
1065 }
1066 memset(av_buffer2, 0, sizeof(av_buffer2));
1067 bread = read(sock, av_buffer2, sizeof(av_buffer2));
1068
1069 if (bread < 0) {
1070 log_write(0, LOG_MAIN|LOG_PANIC,
1071 "malware acl condition: clamd: unable to read PORT from socket (%s)",
1072 strerror(errno));
1073 return DEFER;
1074 }
1075
1076 if (bread == sizeof(av_buffer)) {
1077 log_write(0, LOG_MAIN|LOG_PANIC,
1078 "malware acl condition: clamd: buffer too small");
1079 return DEFER;
1080 }
1081
1082 if (!(*av_buffer2)) {
1083 log_write(0, LOG_MAIN|LOG_PANIC,
1084 "malware acl condition: clamd: ClamAV returned null");
1085 return DEFER;
1086 }
1087
1088 av_buffer2[bread] = '\0';
1089 if( sscanf(CS av_buffer2, "PORT %hu\n", &port) != 1 ) {
1090 log_write(0, LOG_MAIN|LOG_PANIC,
1091 "malware acl condition: clamd: Expected port information from clamd, got '%s'", av_buffer2);
1092 return DEFER;
1093 };
1094
1095 if ( (sockData = ip_socket(SOCK_STREAM, AF_INET)) < 0) {
1096 log_write(0, LOG_MAIN|LOG_PANIC,
1097 "malware acl condition: clamd: unable to acquire socket (%s)",
1098 strerror(errno));
1099 return DEFER;
1100 }
1101
1102 if (ip_connect(sockData, AF_INET, (uschar*)inet_ntoa(in), port, 5) < 0) {
1103 close(sockData);
1104 log_write(0, LOG_MAIN|LOG_PANIC,
1105 "malware acl condition: clamd: connection to %s, port %u failed (%s)",
1106 inet_ntoa(in), port, strerror(errno));
1107 return DEFER;
1108 }
1109
1110 snprintf(CS scanrequest, 1024,CS"%s/scan/%s/%s.eml",
1111 spool_directory, message_id, message_id);
1112
1113 /* calc file size */
1114 clam_fd = open(CS scanrequest, O_RDONLY);
1115 if (clam_fd == -1) {
1116 log_write(0, LOG_MAIN|LOG_PANIC,
1117 "malware acl condition: clamd: can't open spool file %s: %s",
1118 scanrequest, strerror(errno));
1119 return DEFER;
1120 }
1121 fsize = lseek(clam_fd, 0, SEEK_END);
1122 if (fsize == -1) {
1123 log_write(0, LOG_MAIN|LOG_PANIC,
1124 "malware acl condition: clamd: can't seek spool file %s: %s",
1125 scanrequest, strerror(errno));
1126 return DEFER;
1127 }
1128 lseek(clam_fd, 0, SEEK_SET);
1129
1130 clamav_fbuf = (uschar *) malloc (fsize);
1131 if (!clamav_fbuf) {
1132 close(sockData);
1133 close(clam_fd);
1134 log_write(0, LOG_MAIN|LOG_PANIC,
1135 "malware acl condition: clamd: unable to allocate memory %u for file (%s)",
1136 fsize, scanrequest);
1137 return DEFER;
1138 }
1139
1140 result = read (clam_fd, clamav_fbuf, fsize);
1141 if (result == -1) {
1142 close(sockData);
1143 close(clam_fd);
1144 free(clamav_fbuf);
1145 log_write(0, LOG_MAIN|LOG_PANIC,
1146 "malware acl condition: clamd: can't read spool file %s: %s",
1147 scanrequest, strerror(errno));
1148 return DEFER;
1149 }
1150 close(clam_fd);
1151
1152 /* send file body to socket */
1153 if (send(sockData, clamav_fbuf, fsize, 0) < 0) {
1154 close(sockData);
1155 free(clamav_fbuf);
1156 log_write(0, LOG_MAIN|LOG_PANIC,
1157 "malware acl condition: clamd: unable to send file body to socket (%s:%u)", hostname, port);
1158 return DEFER;
1159 }
1160 free(clamav_fbuf);
1161 close(sockData);
1162 }
1163 }
1164 else {
1165 /* open the local socket */
1166 if ((sock = socket(AF_UNIX, SOCK_STREAM, 0)) < 0) {
1167 log_write(0, LOG_MAIN|LOG_PANIC,
1168 "malware acl condition: clamd: unable to acquire socket (%s)",
1169 strerror(errno));
1170 return DEFER;
1171 }
1172
1173 server.sun_family = AF_UNIX;
1174 Ustrcpy(server.sun_path, clamd_options);
1175
1176 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
1177 close(sock);
1178 log_write(0, LOG_MAIN|LOG_PANIC,
1179 "malware acl condition: clamd: unable to connect to UNIX socket %s (%s)",
1180 clamd_options, strerror(errno) );
1181 return DEFER;
1182 }
1183 }
1184
1185 /* Pass the string to ClamAV (7 = "SCAN \n" + \0) */
1186
1187 snprintf(CS file_name,1024,"SCAN %s/scan/%s\n", spool_directory, message_id);
1188
1189 if (send(sock, file_name, Ustrlen(file_name), 0) < 0) {
1190 close(sock);
1191 log_write(0, LOG_MAIN|LOG_PANIC,"malware acl condition: clamd: unable to write to socket (%s)",
1192 strerror(errno));
1193 return DEFER;
1194 }
1195
1196 /*
1197 We're done sending, close socket for writing.
1198
1199 One user reported that clamd 0.70 does not like this any more ...
1200
1201 */
1202
1203 /* shutdown(sock, SHUT_WR); */
1204
1205 /* Read the result */
1206 memset(av_buffer, 0, sizeof(av_buffer));
1207 bread = read(sock, av_buffer, sizeof(av_buffer));
1208 close(sock);
1209
1210 if (!(bread > 0)) {
1211 log_write(0, LOG_MAIN|LOG_PANIC,
1212 "malware acl condition: clamd: unable to read from socket (%s)",
1213 strerror(errno));
1214 return DEFER;
1215 }
1216
1217 if (bread == sizeof(av_buffer)) {
1218 log_write(0, LOG_MAIN|LOG_PANIC,
1219 "malware acl condition: clamd: buffer too small");
1220 return DEFER;
1221 }
1222
1223 /* Check the result. ClamAV Returns
1224 infected: -> "<filename>: <virusname> FOUND"
1225 not-infected: -> "<filename>: OK"
1226 error: -> "<filename>: <errcode> ERROR */
1227
1228 if (!(*av_buffer)) {
1229 log_write(0, LOG_MAIN|LOG_PANIC,
1230 "malware acl condition: clamd: ClamAV returned null");
1231 return DEFER;
1232 }
1233
1234 /* colon in returned output? */
1235 if((p = Ustrrchr(av_buffer,':')) == NULL) {
1236 log_write(0, LOG_MAIN|LOG_PANIC,
1237 "malware acl condition: clamd: ClamAV returned malformed result: %s",
1238 av_buffer);
1239 return DEFER;
1240 }
1241
1242 /* strip filename strip CR at the end */
1243 ++p;
1244 while (*p == ' ') ++p;
1245 vname = p;
1246 p = vname + Ustrlen(vname) - 1;
1247 if( *p == '\n' ) *p = '\0';
1248
1249 if ((p = Ustrstr(vname, "FOUND"))!=NULL) {
1250 *p=0;
1251 for (--p;p>vname && *p<=32;p--) *p=0;
1252 for (;*vname==32;vname++);
1253 Ustrcpy(malware_name_buffer,vname);
1254 malware_name = malware_name_buffer;
1255 }
1256 else {
1257 if (Ustrstr(vname, "ERROR")!=NULL) {
1258 /* ClamAV reports ERROR
1259 Find line start */
1260 for (;*vname!='\n' && vname>av_buffer; vname--);
1261 if (*vname=='\n') vname++;
1262
1263 log_write(0, LOG_MAIN|LOG_PANIC,
1264 "malware acl condition: clamd: ClamAV returned %s",vname);
1265 return DEFER;
1266 }
1267 else {
1268 /* Everything should be OK */
1269 malware_name = NULL;
1270 }
1271 }
1272 }
1273 /* ----------------------------------------------------------------------- */
1274
1275
1276 /* "mksd" scanner type --------------------------------------------------- */
1277 else if (strcmpic(scanner_name,US"mksd") == 0) {
1278 uschar *mksd_options;
1279 char *mksd_options_end;
1280 uschar mksd_options_buffer[32];
1281 int mksd_maxproc = 1; /* default, if no option supplied */
1282 struct sockaddr_un server;
1283 int sock;
1284 int retval;
1285
1286 if ((mksd_options = string_nextinlist(&av_scanner_work, &sep,
1287 mksd_options_buffer,
1288 sizeof(mksd_options_buffer))) != NULL) {
1289 mksd_maxproc = (int) strtol(CS mksd_options, &mksd_options_end, 10);
1290 if ((*mksd_options == '\0') || (*mksd_options_end != '\0') ||
1291 (mksd_maxproc < 1) || (mksd_maxproc > 32)) {
1292 log_write(0, LOG_MAIN|LOG_PANIC,
1293 "malware acl condition: mksd: invalid option '%s'", mksd_options);
1294 return DEFER;
1295 }
1296 }
1297
1298 /* open the mksd socket */
1299 sock = socket(AF_UNIX, SOCK_STREAM, 0);
1300 if (sock < 0) {
1301 log_write(0, LOG_MAIN|LOG_PANIC,
1302 "malware acl condition: can't open UNIX socket.");
1303 return DEFER;
1304 }
1305 server.sun_family = AF_UNIX;
1306 Ustrcpy(server.sun_path, "/var/run/mksd/socket");
1307 if (connect(sock, (struct sockaddr *) &server, sizeof(struct sockaddr_un)) < 0) {
1308 close(sock);
1309 log_write(0, LOG_MAIN|LOG_PANIC,
1310 "malware acl condition: unable to connect to mksd UNIX socket (/var/run/mksd/socket). errno=%d", errno);
1311 return DEFER;
1312 }
1313
1314 malware_name = NULL;
1315
1316 retval = mksd_scan_packed(sock);
1317
1318 if (retval != OK)
1319 return retval;
1320 }
1321 /* ----------------------------------------------------------------------- */
1322
1323 /* "unknown" scanner type ------------------------------------------------- */
1324 else {
1325 log_write(0, LOG_MAIN|LOG_PANIC,
1326 "malware condition: unknown scanner type '%s'", scanner_name);
1327 return DEFER;
1328 };
1329 /* ----------------------------------------------------------------------- */
1330
1331 /* set "been here, done that" marker */
1332 malware_ok = 1;
1333 };
1334
1335 /* match virus name against pattern (caseless ------->----------v) */
1336 if ( (malware_name != NULL) &&
1337 (regex_match_and_setup(re, malware_name, 0, -1)) ) {
1338 return OK;
1339 }
1340 else {
1341 return FAIL;
1342 };
1343 }
1344
1345
1346 /* simple wrapper for reading lines from sockets */
1347 int recv_line(int sock, uschar *buffer, int size) {
1348 uschar *p = buffer;
1349
1350 memset(buffer,0,size);
1351 /* read until \n */
1352 while(recv(sock,p,1,0) > -1) {
1353 if ((p-buffer) > (size-2)) break;
1354 if (*p == '\n') break;
1355 if (*p != '\r') p++;
1356 };
1357 *p = '\0';
1358
1359 return (p-buffer);
1360 }
1361
1362
1363 /* ============= private routines for the "mksd" scanner type ============== */
1364
1365 #include <sys/uio.h>
1366
1367 int mksd_writev (int sock, struct iovec *iov, int iovcnt)
1368 {
1369 int i;
1370
1371 for (;;) {
1372 do
1373 i = writev (sock, iov, iovcnt);
1374 while ((i < 0) && (errno == EINTR));
1375 if (i <= 0) {
1376 close (sock);
1377 log_write(0, LOG_MAIN|LOG_PANIC,
1378 "malware acl condition: unable to write to mksd UNIX socket (/var/run/mksd/socket)");
1379 return -1;
1380 }
1381
1382 for (;;)
1383 if (i >= iov->iov_len) {
1384 if (--iovcnt == 0)
1385 return 0;
1386 i -= iov->iov_len;
1387 iov++;
1388 } else {
1389 iov->iov_len -= i;
1390 iov->iov_base = CS iov->iov_base + i;
1391 break;
1392 }
1393 }
1394 }
1395
1396 int mksd_read_lines (int sock, uschar *av_buffer, int av_buffer_size)
1397 {
1398 int offset = 0;
1399 int i;
1400
1401 do {
1402 if ((i = recv (sock, av_buffer+offset, av_buffer_size-offset, 0)) <= 0) {
1403 close (sock);
1404 log_write(0, LOG_MAIN|LOG_PANIC,
1405 "malware acl condition: unable to read from mksd UNIX socket (/var/run/mksd/socket)");
1406 return -1;
1407 }
1408
1409 offset += i;
1410 /* offset == av_buffer_size -> buffer full */
1411 if (offset == av_buffer_size) {
1412 close (sock);
1413 log_write(0, LOG_MAIN|LOG_PANIC,
1414 "malware acl condition: malformed reply received from mksd");
1415 return -1;
1416 }
1417 } while (av_buffer[offset-1] != '\n');
1418
1419 av_buffer[offset] = '\0';
1420 return offset;
1421 }
1422
1423 int mksd_parse_line (char *line)
1424 {
1425 char *p;
1426
1427 switch (*line) {
1428 case 'O':
1429 /* OK */
1430 return OK;
1431 case 'E':
1432 case 'A':
1433 /* ERR */
1434 if ((p = strchr (line, '\n')) != NULL)
1435 (*p) = '\0';
1436 log_write(0, LOG_MAIN|LOG_PANIC,
1437 "malware acl condition: mksd scanner failed: %s", line);
1438 return DEFER;
1439 default:
1440 /* VIR */
1441 if ((p = strchr (line, '\n')) != NULL) {
1442 (*p) = '\0';
1443 if (((p-line) > 5) && ((p-line) < sizeof (malware_name_buffer)) && (line[3] == ' '))
1444 if (((p = strchr (line+4, ' ')) != NULL) && ((p-line) > 4)) {
1445 (*p) = '\0';
1446 Ustrcpy (malware_name_buffer, line+4);
1447 malware_name = malware_name_buffer;
1448 return OK;
1449 }
1450 }
1451 log_write(0, LOG_MAIN|LOG_PANIC,
1452 "malware acl condition: malformed reply received from mksd: %s", line);
1453 return DEFER;
1454 }
1455 }
1456
1457 int mksd_scan_packed (int sock)
1458 {
1459 struct iovec iov[7];
1460 char *cmd = "MSQ/scan/.eml\n";
1461 uschar av_buffer[1024];
1462
1463 iov[0].iov_base = cmd;
1464 iov[0].iov_len = 3;
1465 iov[1].iov_base = CS spool_directory;
1466 iov[1].iov_len = Ustrlen (spool_directory);
1467 iov[2].iov_base = cmd + 3;
1468 iov[2].iov_len = 6;
1469 iov[3].iov_base = iov[5].iov_base = CS message_id;
1470 iov[3].iov_len = iov[5].iov_len = Ustrlen (message_id);
1471 iov[4].iov_base = cmd + 3;
1472 iov[4].iov_len = 1;
1473 iov[6].iov_base = cmd + 9;
1474 iov[6].iov_len = 5;
1475
1476 if (mksd_writev (sock, iov, 7) < 0)
1477 return DEFER;
1478
1479 if (mksd_read_lines (sock, av_buffer, sizeof (av_buffer)) < 0)
1480 return DEFER;
1481
1482 close (sock);
1483
1484 return mksd_parse_line (CS av_buffer);
1485 }
1486
1487 #endif