e3aaff8e |
/* |
f893c0f3 |
* Copyright (C) 2002 - 2004 Tomasz Kojm <tkojm@clamav.net> |
6d6e8271 |
* With enhancements from Thomas Lamy <Thomas.Lamy@in-online.net> |
e3aaff8e |
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
|
6d6e8271 |
#if HAVE_CONFIG_H
#include "clamav-config.h"
#endif
|
e3aaff8e |
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#include <dirent.h>
|
414abe87 |
#include <mspack.h>
|
e3aaff8e |
#ifdef CL_THREAD_SAFE
# include <pthread.h>
pthread_mutex_t cli_scanrar_mutex = PTHREAD_MUTEX_INITIALIZER;
#endif |
6d6e8271 |
int cli_scanrar_inuse = 0; |
e3aaff8e |
|
414abe87 |
extern short cli_leavetemps_flag;
|
e3aaff8e |
#include "clamav.h"
#include "others.h"
#include "matcher.h"
#include "unrarlib.h" |
47bbbc56 |
#include "ole2_extract.h"
#include "vba_extract.h" |
341e5433 |
#include "msexpand.h" |
9b8e00a0 |
#include "scanners.h" |
e3aaff8e |
#ifdef HAVE_ZLIB_H
#include <zlib.h>
#include <zzip.h>
#endif
#ifdef HAVE_BZLIB_H
#include <bzlib.h>
#endif
|
0f34221a |
#define SCAN_ARCHIVE (options & CL_ARCHIVE)
#define SCAN_MAIL (options & CL_MAIL)
#define SCAN_OLE2 (options & CL_OLE2)
#define DISABLE_RAR (options & CL_DISABLERAR)
#define DETECT_ENCRYPTED (options & CL_ENCRYPTED) |
6d6e8271 |
|
9b8e00a0 |
struct cli_magic_s { |
6d6e8271 |
int offset; |
68a6f51f |
const char *magic; |
6d6e8271 |
size_t length; |
68a6f51f |
const char *descr; |
9b8e00a0 |
cli_file_t type; |
6d6e8271 |
};
|
a487b2a8 |
#define MAGIC_BUFFER_SIZE 26 |
9b8e00a0 |
static const struct cli_magic_s cli_magic[] = { |
be492dd1 |
|
6307ca15 |
/* Executables */
|
414abe87 |
/* {0, "MZ", 2, "DOS/W32 executable", CL_DOSEXE},*/ |
6307ca15 |
|
be492dd1 |
/* Archives */
|
427ebb81 |
{0, "Rar!", 4, "RAR", CL_RARFILE},
{0, "PK\003\004", 4, "ZIP", CL_ZIPFILE},
{0, "\037\213", 2, "GZip", CL_GZFILE},
{0, "BZh", 3, "BZip", CL_BZFILE}, |
341e5433 |
{0, "SZDD", 4, "compress.exe'd", CL_MSCFILE}, |
414abe87 |
{0, "MSCF", 4, "MS CAB", CL_MSCABFILE}, |
be492dd1 |
/* Mail */
|
c695dab4 |
{0, "From ", 5, "MBox", CL_MAILFILE},
{0, "Received", 8, "Raw mail", CL_MAILFILE}, |
427ebb81 |
{0, "Return-Path: ", 13, "Maildir", CL_MAILFILE},
{0, "Return-path: ", 13, "Maildir", CL_MAILFILE},
{0, "Delivered-To: ", 14, "Mail", CL_MAILFILE}, |
c695dab4 |
{0, "X-UIDL: ", 8, "Mail", CL_MAILFILE},
{0, "X-Apparently-To: ", 17, "Mail", CL_MAILFILE},
{0, "X-Envelope-From: ", 17, "Mail", CL_MAILFILE}, |
b782aece |
{0, "X-Original-To: ", 15, "Mail", CL_MAILFILE}, |
c695dab4 |
{0, "X-Symantec-", 11, "Symantec", CL_MAILFILE},
{0, "X-EVS", 5, "EVS mail", CL_MAILFILE}, |
5467c418 |
{0, "X-Real-To: ", 11, "Mail", CL_MAILFILE}, |
c695dab4 |
{0, ">From ", 6, "Mail", CL_MAILFILE},
{0, "Date: ", 6, "Mail", CL_MAILFILE}, |
467f8b1e |
{0, "Message-Id: ", 12, "Mail", CL_MAILFILE},
{0, "Message-ID: ", 12, "Mail", CL_MAILFILE}, |
be492dd1 |
{0, "Envelope-to: ", 13, "Mail", CL_MAILFILE},
{0, "Delivery-date: ", 15, "Mail", CL_MAILFILE}, |
c695dab4 |
{0, "To: ", 4, "Mail", CL_MAILFILE},
{0, "Subject: ", 9, "Mail", CL_MAILFILE},
{0, "For: ", 5, "Eserv mail", CL_MAILFILE},
{0, "From: ", 6, "Exim mail", CL_MAILFILE}, |
427ebb81 |
{0, "v:\015\012Received: ", 14, "VPOP3 Mail (DOS)", CL_MAILFILE},
{0, "v:\012Received: ", 13, "VPOP3 Mail (UNIX)", CL_MAILFILE},
{0, "Hi. This is the qmail-send", 26, "Qmail bounce", CL_MAILFILE}, |
be492dd1 |
/* Others */
|
6d6e8271 |
{0, "\320\317\021\340\241\261\032\341",
8, "OLE2 container", CL_OLE2FILE}, |
32c970f8 |
|
467f8b1e |
/* Ignored types */
{0, "\000\000\001\263", 4, "MPEG video stream", CL_DATAFILE},
{0, "\000\000\001\272", 4, "MPEG sys stream", CL_DATAFILE}, |
56bfccb2 |
{0, "RIFF", 4, "RIFF", CL_DATAFILE}, |
32c970f8 |
{0, "GIF", 3, "GIF", CL_DATAFILE},
{0, "\x89PNG", 4, "PNG", CL_DATAFILE},
{0, "\377\330\377", 4, "JPEG", CL_DATAFILE},
{0, "BM", 2, "BMP", CL_DATAFILE}, |
467f8b1e |
{0, "OggS", 4, "Ogg Stream", CL_DATAFILE}, |
56bfccb2 |
{0, "ID3", 3, "MP3", CL_DATAFILE},
{0, "\377\373\220", 3, "MP3", CL_DATAFILE},
{0, "\%PDF-", 5, "PDF document", CL_DATAFILE}, |
32c970f8 |
{0, "\%!PS-Adobe-", 11, "PostScript", CL_DATAFILE}, |
56bfccb2 |
{0, "\060\046\262\165\216\146\317", 7, "WMA/WMV/ASF", CL_DATAFILE}, |
0b1cf39c |
{0, ".RMF" , 4, "Real Media File", CL_DATAFILE}, |
467f8b1e |
|
56bfccb2 |
{-1, NULL, 0, NULL, CL_UNKNOWN_TYPE} |
6d6e8271 |
};
|
9b8e00a0 |
cli_file_t cli_filetype(const char *buf, size_t buflen) |
6d6e8271 |
{
int i;
|
9b8e00a0 |
for (i = 0; cli_magic[i].magic; i++) {
if (buflen >= cli_magic[i].offset+cli_magic[i].length) {
if (memcmp(buf+cli_magic[i].offset, cli_magic[i].magic, cli_magic[i].length) == 0) {
cli_dbgmsg("Recognized %s file\n", cli_magic[i].descr);
return cli_magic[i].type; |
6d6e8271 |
}
}
} |
ba5b830f |
|
6d6e8271 |
return CL_UNKNOWN_TYPE;
} |
e3aaff8e |
|
68a6f51f |
static int cli_magic_scandesc(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev); |
21cf4aeb |
static int cli_scanfile(const char *filename, const char **virname, unsigned long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev); |
e3aaff8e |
|
32c970f8 |
static int cli_scandesc(int desc, const char **virname, long int *scanned, const struct cl_node *root) |
e3aaff8e |
{
char *buffer, *buff, *endbl, *pt; |
b5b62ca7 |
int bytes, buffsize, length, ret, *partcnt; |
e3aaff8e |
/* prepare the buffer */ |
f7148839 |
buffsize = root->maxpatlen + SCANBUFF; |
9e431a95 |
if(!(buffer = (char *) cli_calloc(buffsize, sizeof(char)))) { |
ed026d36 |
cli_dbgmsg("cli_scandesc(): unable to cli_malloc(%d)\n", buffsize); |
e3aaff8e |
return CL_EMEM; |
9e431a95 |
} |
e3aaff8e |
|
b5b62ca7 |
if((partcnt = (int *) cli_calloc(root->partsigs + 1, sizeof(int))) == NULL) { |
ed026d36 |
cli_dbgmsg("cli_scandesc(): unable to cli_calloc(%d, %d)\n", root->partsigs + 1, sizeof(int)); |
b5b62ca7 |
free(buffer);
return CL_EMEM;
}
|
e3aaff8e |
buff = buffer;
buff += root->maxpatlen; /* pointer to read data block */ |
f7148839 |
endbl = buff + SCANBUFF - root->maxpatlen; /* pointer to the last block |
e3aaff8e |
* length of root->maxpatlen
*/
pt= buff; |
f7148839 |
length = SCANBUFF;
while((bytes = read(desc, buff, SCANBUFF)) > 0) { |
e3aaff8e |
if(scanned != NULL)
*scanned += bytes / CL_COUNT_PRECISION;
|
f7148839 |
if(bytes < SCANBUFF)
length -= SCANBUFF - bytes; |
e3aaff8e |
|
b5b62ca7 |
if((ret = cli_scanbuff(pt, length, virname, root, partcnt)) != CL_CLEAN) { |
e3aaff8e |
free(buffer); |
b5b62ca7 |
free(partcnt); |
6d6e8271 |
return ret; |
e3aaff8e |
}
|
f7148839 |
if(bytes == SCANBUFF) |
e3aaff8e |
memmove(buffer, endbl, root->maxpatlen);
pt = buffer;
length=buffsize;
}
free(buffer); |
b5b62ca7 |
free(partcnt); |
e3aaff8e |
return CL_CLEAN;
}
#ifdef CL_THREAD_SAFE |
68a6f51f |
static void cli_unlock_mutex(void *mtx) |
e3aaff8e |
{
cli_dbgmsg("Pthread cancelled. Unlocking mutex.\n");
pthread_mutex_unlock(mtx);
}
#endif
|
68a6f51f |
static int cli_scanrar(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{ |
fc56deed |
FILE *tmp = NULL; |
b5f8af0d |
int files = 0, fd, ret = CL_CLEAN, afiles; |
e3aaff8e |
ArchiveList_struct *rarlist = NULL; |
68a6f51f |
ArchiveList_struct *rarlist_head = NULL; |
e3aaff8e |
char *rar_data_ptr;
unsigned long rar_data_size;
cli_dbgmsg("Starting scanrar()\n");
#ifdef CL_THREAD_SAFE
pthread_cleanup_push(cli_unlock_mutex, &cli_scanrar_mutex);
pthread_mutex_lock(&cli_scanrar_mutex);
cli_scanrar_inuse = 1;
#endif
|
b5f8af0d |
if(! (afiles = urarlib_list(desc, (ArchiveList_struct *) &rarlist))) { |
e3aaff8e |
#ifdef CL_THREAD_SAFE
pthread_mutex_unlock(&cli_scanrar_mutex);
cli_scanrar_inuse = 0;
#endif
return CL_ERAR;
}
|
b5f8af0d |
cli_dbgmsg("Rar -> Number of archived files: %d\n", afiles);
|
68a6f51f |
rarlist_head = rarlist;
|
e3aaff8e |
while(rarlist) { |
dfe7ca62 |
if(DETECT_ENCRYPTED && (rarlist->item.Flags & 4)) {
files++;
cli_dbgmsg("Rar -> Encrypted files found in archive.\n"); |
32c970f8 |
lseek(desc, 0, SEEK_SET);
if(cli_scandesc(desc, virname, scanned, root) != CL_VIRUS)
*virname = "Encrypted.RAR"; |
dfe7ca62 |
ret = CL_VIRUS;
break;
} |
e3aaff8e |
if(limits) { |
ba174707 |
if(limits->maxfilesize && (rarlist->item.UnpSize > (unsigned int) limits->maxfilesize)) {
cli_dbgmsg("RAR->%s: Size exceeded (%u, max: %lu)\n", rarlist->item.Name, (unsigned int) rarlist->item.UnpSize, limits->maxfilesize); |
e3aaff8e |
rarlist = rarlist->next;
files++; |
6ccc6990 |
/* ret = CL_EMAXSIZE; */ |
e3aaff8e |
continue;
}
if(limits->maxfiles && (files > limits->maxfiles)) {
cli_dbgmsg("RAR: Files limit reached (max: %d)\n", limits->maxfiles); |
6ccc6990 |
/* ret = CL_EMAXFILES; */ |
e3aaff8e |
break;
}
}
|
68a6f51f |
if(!!( rarlist->item.FileAttr & RAR_FENTRY_ATTR_DIRECTORY)) {
rarlist = rarlist->next;
files++;
continue;
}
|
e3aaff8e |
if((tmp = tmpfile()) == NULL) {
cli_dbgmsg("RAR -> Can't generate tmpfile().\n");
#ifdef CL_THREAD_SAFE
pthread_mutex_unlock(&cli_scanrar_mutex);
cli_scanrar_inuse = 0;
#endif
return CL_ETMPFILE;
}
fd = fileno(tmp);
|
68a6f51f |
if( urarlib_get(&rar_data_ptr, &rar_data_size, rarlist->item.Name, desc, "clam")) { |
ba174707 |
cli_dbgmsg("RAR -> Extracted: %s, size: %lu\n", rarlist->item.Name, rar_data_size); |
68a6f51f |
if(fwrite(rar_data_ptr, 1, rar_data_size, tmp) != rar_data_size) { |
e3aaff8e |
cli_dbgmsg("RAR -> Can't write() file.\n"); |
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
tmp = NULL;
ret = CL_ERAR; |
cdb0ae9c |
if(rar_data_ptr) { |
e3aaff8e |
free(rar_data_ptr); |
cdb0ae9c |
rar_data_ptr = NULL;
} |
27a3f44a |
break; |
e3aaff8e |
}
|
cdb0ae9c |
if(rar_data_ptr) { |
e3aaff8e |
free(rar_data_ptr); |
cdb0ae9c |
rar_data_ptr = NULL;
}
if(fflush(tmp) != 0) {
cli_dbgmsg("fflush() failed: %s\n", strerror(errno));
fclose(tmp); |
68a6f51f |
urarlib_freelist(rarlist_head); |
e3aaff8e |
#ifdef CL_THREAD_SAFE
pthread_mutex_unlock(&cli_scanrar_mutex);
cli_scanrar_inuse = 0;
#endif
return CL_EFSYNC;
}
lseek(fd, 0, SEEK_SET); |
68a6f51f |
if((ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev)) == CL_VIRUS ) {
cli_dbgmsg("RAR -> Found %s virus.\n", *virname); |
6d6e8271 |
|
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
urarlib_freelist(rarlist);
#ifdef CL_THREAD_SAFE
pthread_mutex_unlock(&cli_scanrar_mutex);
cli_scanrar_inuse = 0;
#endif |
68a6f51f |
return ret; |
e3aaff8e |
}
} else {
cli_dbgmsg("RAR -> Can't decompress file %s\n", rarlist->item.Name); |
cdb0ae9c |
fclose(tmp); |
7761c6eb |
tmp = NULL; |
cdb0ae9c |
ret = CL_ERAR; /* WinRAR 3.0 ? */
break; |
e3aaff8e |
}
|
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
tmp = NULL;
rarlist = rarlist->next;
files++;
}
|
68a6f51f |
urarlib_freelist(rarlist_head); |
e3aaff8e |
#ifdef CL_THREAD_SAFE
pthread_mutex_unlock(&cli_scanrar_mutex);
cli_scanrar_inuse = 0;
pthread_cleanup_pop(0);
#endif |
7761c6eb |
cli_dbgmsg("RAR -> Exit code: %d\n", ret);
|
e3aaff8e |
return ret;
}
#ifdef HAVE_ZLIB_H |
68a6f51f |
static int cli_scanzip(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{
ZZIP_DIR *zdir;
ZZIP_DIRENT zdirent;
ZZIP_FILE *zfp; |
fc56deed |
FILE *tmp = NULL; |
f7148839 |
char *buff; |
ee039e40 |
int fd, bytes, files = 0, ret = CL_CLEAN; |
fc56deed |
struct stat source; |
ee039e40 |
zzip_error_t err; |
e3aaff8e |
cli_dbgmsg("Starting scanzip()\n");
|
049a18b9 |
if((zdir = zzip_dir_fdopen(dup(desc), &err)) == NULL) {
cli_dbgmsg("Zip -> Not supported file format ?.\n");
cli_dbgmsg("zzip_dir_fdopen() return code: %d\n", err); |
77be7ea9 |
/* no return with CL_EZIP due to password protected zips */
return CL_CLEAN; |
e3aaff8e |
}
|
fc56deed |
fstat(desc, &source);
|
33f40ee5 |
if(!(buff = (char *) cli_malloc(FILEBUFF))) { |
9e431a95 |
cli_dbgmsg("cli_scanzip(): unable to malloc(%d)\n", FILEBUFF); |
33f40ee5 |
zzip_dir_close(zdir);
return CL_EMEM;
}
|
e3aaff8e |
while(zzip_dir_read(zdir, &zdirent)) { |
fc56deed |
if(!zdirent.d_name || !strlen(zdirent.d_name)) { /* Mimail fix */
cli_dbgmsg("strlen(zdirent.d_name) == %d\n", strlen(zdirent.d_name)); |
a0977bfe |
*virname = "Suspected.Zip"; |
fc56deed |
ret = CL_VIRUS;
break;
}
|
467f8b1e |
cli_dbgmsg("Zip -> %s, compressed: %u, normal: %u, ratio: %d (max: %d)\n", zdirent.d_name, zdirent.d_csize, zdirent.st_size, zdirent.st_size / (zdirent.d_csize+1), limits ? limits->maxratio : -1 ); |
fc56deed |
|
19ca43de |
if(!zdirent.st_size) { /* omit directories and empty files */ |
e3aaff8e |
files++;
continue;
}
/* work-around for problematic zips (zziplib crashes with them) */ |
19ca43de |
if(zdirent.d_csize <= 0 || zdirent.st_size < 0) { |
e3aaff8e |
files++;
cli_dbgmsg("Zip -> Malformed archive detected.\n"); |
fc56deed |
/* ret = CL_EMALFZIP; */
/* report it as a virus */ |
a0977bfe |
*virname = "Suspected.Zip"; |
fc56deed |
ret = CL_VIRUS; |
e3aaff8e |
break;
}
|
19ca43de |
if(limits && limits->maxratio > 0 && ((unsigned) zdirent.st_size / (unsigned) zdirent.d_csize) >= limits->maxratio) {
*virname = "Oversized.Zip";
ret = CL_VIRUS;
break;
}
|
bddfdc19 |
if(DETECT_ENCRYPTED && (zdirent.d_flags & 1 )) { |
0f34221a |
files++;
cli_dbgmsg("Zip -> Encrypted files found in archive.\n"); |
32c970f8 |
lseek(desc, 0, SEEK_SET);
if(cli_scandesc(desc, virname, scanned, root) != CL_VIRUS)
*virname = "Encrypted.Zip"; |
0f34221a |
ret = CL_VIRUS;
break;
}
|
e3aaff8e |
if(limits) {
if(limits->maxfilesize && (zdirent.st_size > limits->maxfilesize)) { |
ba174707 |
cli_dbgmsg("Zip -> %s: Size exceeded (%d, max: %ld)\n", zdirent.d_name, zdirent.st_size, limits->maxfilesize); |
e3aaff8e |
files++; |
6ccc6990 |
/* ret = CL_EMAXSIZE; */ |
fc56deed |
continue; /* this is not a bug */ |
e3aaff8e |
}
if(limits->maxfiles && (files > limits->maxfiles)) {
cli_dbgmsg("Zip: Files limit reached (max: %d)\n", limits->maxfiles); |
6ccc6990 |
/* ret = CL_EMAXFILES; */ |
e3aaff8e |
break;
}
}
/* generate temporary file and get its descriptor */
if((tmp = tmpfile()) == NULL) {
cli_dbgmsg("Zip -> Can't generate tmpfile().\n"); |
fc56deed |
ret = CL_ETMPFILE;
break; |
e3aaff8e |
}
if((zfp = zzip_file_open(zdir, zdirent.d_name, 0)) == NULL) {
cli_dbgmsg("Zip -> %s: Can't open file.\n", zdirent.d_name);
ret = CL_EZIP; |
fc56deed |
break; |
e3aaff8e |
}
|
f7148839 |
while((bytes = zzip_file_read(zfp, buff, FILEBUFF)) > 0) { |
467f8b1e |
if(fwrite(buff, 1, bytes, tmp) != (size_t) bytes) { |
cdb0ae9c |
cli_dbgmsg("Zip -> Can't fwrite() file: %s\n", strerror(errno)); |
e3aaff8e |
zzip_file_close(zfp); |
33f40ee5 |
zzip_dir_close(zdir);
fclose(tmp); |
f7148839 |
free(buff); |
33f40ee5 |
return CL_EZIP; |
e3aaff8e |
}
}
zzip_file_close(zfp);
|
cdb0ae9c |
if(fflush(tmp) != 0) { |
414abe87 |
cli_dbgmsg("fflush() failed: %s\n", strerror(errno)); |
fc56deed |
ret = CL_EFSYNC;
break; |
e3aaff8e |
}
|
cdb0ae9c |
fd = fileno(tmp);
|
e3aaff8e |
lseek(fd, 0, SEEK_SET);
if((ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev)) == CL_VIRUS ) {
cli_dbgmsg("Zip -> Found %s virus.\n", *virname);
ret = CL_VIRUS;
break;
} else if(ret == CL_EMALFZIP) {
/* |
fc56deed |
* The trick with detection of ZoD only works with higher (>= 5) |
e3aaff8e |
* recursion limit level.
*/
cli_dbgmsg("Zip -> Malformed Zip, scanning stopped.\n"); |
a0977bfe |
*virname = "Suspected.Zip"; |
e3aaff8e |
ret = CL_VIRUS;
break;
}
|
cdb0ae9c |
if (tmp) {
fclose(tmp);
tmp = NULL;
} |
e3aaff8e |
files++;
}
zzip_dir_close(zdir); |
cdb0ae9c |
if (tmp) {
fclose(tmp);
tmp = NULL;
} |
33f40ee5 |
free(buff); |
e3aaff8e |
return ret;
}
|
68a6f51f |
static int cli_scangzip(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{
int fd, bytes, ret = CL_CLEAN;
long int size = 0; |
f7148839 |
char *buff; |
fc56deed |
FILE *tmp = NULL; |
e3aaff8e |
gzFile gd;
|
fc56deed |
cli_dbgmsg("in cli_scangzip()\n");
|
e3aaff8e |
if((gd = gzdopen(dup(desc), "rb")) == NULL) {
cli_dbgmsg("Can't gzdopen() descriptor %d.\n", desc);
return CL_EGZIP;
}
if((tmp = tmpfile()) == NULL) {
cli_dbgmsg("Can't generate tmpfile().\n");
gzclose(gd);
return CL_ETMPFILE;
}
fd = fileno(tmp);
|
fc56deed |
if(!(buff = (char *) cli_malloc(FILEBUFF))) { |
9e431a95 |
cli_dbgmsg("cli_scangzip(): unable to malloc(%d)\n", FILEBUFF); |
fc56deed |
gzclose(gd); |
f7148839 |
return CL_EMEM; |
fc56deed |
} |
f7148839 |
|
fc56deed |
while((bytes = gzread(gd, buff, FILEBUFF)) > 0) { |
e3aaff8e |
size += bytes;
if(limits) |
fc56deed |
if(limits->maxfilesize && (size + FILEBUFF > limits->maxfilesize)) { |
68a6f51f |
cli_dbgmsg("Gzip->desc(%d): Size exceeded (stopped at %ld, max: %ld)\n", desc, size, limits->maxfilesize); |
6ccc6990 |
/* ret = CL_EMAXSIZE; */ |
e3aaff8e |
break;
}
|
4152ad50 |
if(cli_writen(fd, buff, bytes) != bytes) { |
e3aaff8e |
cli_dbgmsg("Gzip -> Can't write() file.\n"); |
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
gzclose(gd); |
f7148839 |
free(buff); |
e3aaff8e |
return CL_EGZIP;
}
}
|
f7148839 |
free(buff); |
e3aaff8e |
gzclose(gd);
if(fsync(fd) == -1) {
cli_dbgmsg("fsync() failed for descriptor %d\n", fd); |
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
return CL_EFSYNC;
}
lseek(fd, 0, SEEK_SET);
if((ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev)) == CL_VIRUS ) {
cli_dbgmsg("Gzip -> Found %s virus.\n", *virname); |
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
return CL_VIRUS;
} |
cdb0ae9c |
fclose(tmp); |
e3aaff8e |
return ret;
}
#endif
#ifdef HAVE_BZLIB_H
#ifdef NOBZ2PREFIX
#define BZ2_bzReadOpen bzReadOpen
#define BZ2_bzReadClose bzReadClose
#define BZ2_bzRead bzRead
#endif
|
68a6f51f |
static int cli_scanbzip(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{
int fd, bytes, ret = CL_CLEAN, bzerror = 0;
short memlim = 0;
long int size = 0; |
f7148839 |
char *buff; |
fc56deed |
FILE *fs, *tmp = NULL; |
e3aaff8e |
BZFILE *bfd;
|
9e431a95 |
if((fs = fdopen(dup(desc), "rb")) == NULL) { |
414abe87 |
cli_dbgmsg("Can't fdopen() descriptor %d.\n", desc); |
e3aaff8e |
return CL_EBZIP;
}
if(limits)
if(limits->archivememlim)
memlim = 1;
|
68b96877 |
if((bfd = BZ2_bzReadOpen(&bzerror, fs, 0, memlim, NULL, 0)) == NULL) { |
e3aaff8e |
cli_dbgmsg("Can't initialize bzip2 library (descriptor %d).\n", desc); |
9e431a95 |
fclose(fs); |
e3aaff8e |
return CL_EBZIP;
}
if((tmp = tmpfile()) == NULL) {
cli_dbgmsg("Can't generate tmpfile().\n");
BZ2_bzReadClose(&bzerror, bfd); |
9e431a95 |
fclose(fs); |
e3aaff8e |
return CL_ETMPFILE;
}
fd = fileno(tmp);
|
9e431a95 |
if(!(buff = (char *) malloc(FILEBUFF))) {
cli_dbgmsg("cli_scanbzip(): unable to malloc(%d)\n", FILEBUFF);
fclose(tmp);
fclose(fs);
BZ2_bzReadClose(&bzerror, bfd); |
f7148839 |
return CL_EMEM; |
9e431a95 |
} |
f7148839 |
|
fc56deed |
while((bytes = BZ2_bzRead(&bzerror, bfd, buff, FILEBUFF)) > 0) { |
e3aaff8e |
size += bytes;
if(limits) |
fc56deed |
if(limits->maxfilesize && (size + FILEBUFF > limits->maxfilesize)) { |
68a6f51f |
cli_dbgmsg("Bzip2->desc(%d): Size exceeded (stopped at %ld, max: %ld)\n", desc, size, limits->maxfilesize); |
6ccc6990 |
/* ret = CL_EMAXSIZE; */ |
e3aaff8e |
break;
}
|
4152ad50 |
if(cli_writen(fd, buff, bytes) != bytes) { |
e3aaff8e |
cli_dbgmsg("Bzip2 -> Can't write() file.\n");
BZ2_bzReadClose(&bzerror, bfd); |
cdb0ae9c |
fclose(tmp); |
f7148839 |
free(buff); |
9e431a95 |
fclose(fs); |
e3aaff8e |
return CL_EGZIP;
}
}
|
f7148839 |
free(buff); |
e3aaff8e |
BZ2_bzReadClose(&bzerror, bfd);
if(fsync(fd) == -1) {
cli_dbgmsg("fsync() failed for descriptor %d\n", fd); |
cdb0ae9c |
fclose(tmp); |
9e431a95 |
fclose(fs); |
e3aaff8e |
return CL_EFSYNC;
}
lseek(fd, 0, SEEK_SET);
if((ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev)) == CL_VIRUS ) {
cli_dbgmsg("Bzip2 -> Found %s virus.\n", *virname);
} |
cdb0ae9c |
fclose(tmp); |
9e431a95 |
fclose(fs); |
e3aaff8e |
return ret;
}
#endif
|
341e5433 |
static int cli_scanmscomp(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev)
{
int fd, ret = CL_CLEAN;
FILE *tmp = NULL, *in;
cli_dbgmsg("in cli_scanmscomp()\n");
if((in = fdopen(dup(desc), "rb")) == NULL) {
cli_dbgmsg("Can't fdopen() descriptor %d.\n", desc);
return CL_EMSCOMP;
}
if((tmp = tmpfile()) == NULL) {
cli_dbgmsg("Can't generate tmpfile().\n");
fclose(in);
return CL_ETMPFILE;
}
if(cli_msexpand(in, tmp) == -1) {
cli_dbgmsg("msexpand failed.\n");
return CL_EMSCOMP;
}
fclose(in);
if(fflush(tmp)) {
cli_dbgmsg("fflush() failed\n");
fclose(tmp);
return CL_EFSYNC;
}
fd = fileno(tmp);
lseek(fd, 0, SEEK_SET);
if((ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev)) == CL_VIRUS) {
cli_dbgmsg("MSCompress -> Found %s virus.\n", *virname);
fclose(tmp);
return CL_VIRUS;
}
fclose(tmp);
return ret;
}
|
414abe87 |
static int cli_scanmscab(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev)
{
struct mscab_decompressor *cabd = NULL;
struct mscabd_cabinet *base, *cab;
struct mscabd_file *file;
const char *tmpdir;
char *tempname;
int ret = CL_CLEAN;
cli_dbgmsg("in cli_scanmscab()\n");
if((cabd = mspack_create_cab_decompressor(NULL)) == NULL) {
cli_dbgmsg("Can't create libmspack CAB decompressor\n");
return CL_EMSCAB;
}
if((base = cabd->dsearch(cabd, desc)) == NULL) {
cli_dbgmsg("I/O error or no valid cabinets found\n");
mspack_destroy_cab_decompressor(cabd);
return CL_EMSCAB;
}
if((tmpdir = getenv("TMPDIR")) == NULL)
#ifdef P_tmpdir
tmpdir = P_tmpdir;
#else
tmpdir = "/tmp";
#endif
for(cab = base; cab; cab = cab->next) {
for(file = cab->files; file; file = file->next) {
tempname = cl_gentemp(tmpdir);
cli_dbgmsg("Extracting data to %s\n", tempname);
if(cabd->extract(cabd, file, tempname)) {
cli_dbgmsg("libmscab error code: %d\n", cabd->last_error(cabd));
} else {
ret = cli_scanfile(tempname, virname, scanned, root, limits, options, reclev);
}
if(!cli_leavetemps_flag)
unlink(tempname);
free(tempname);
if(ret == CL_VIRUS)
break;
}
if(ret == CL_VIRUS)
break;
}
cabd->close(cabd, base);
mspack_destroy_cab_decompressor(cabd);
return ret;
}
|
467f8b1e |
static int cli_scandir(const char *dirname, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
47bbbc56 |
{ |
467f8b1e |
DIR *dd;
struct dirent *dent;
struct stat statbuf;
char *fname; |
47bbbc56 |
|
467f8b1e |
if((dd = opendir(dirname)) != NULL) {
while((dent = readdir(dd))) { |
feeaa333 |
#ifndef C_INTERIX
if(dent->d_ino)
#endif
{ |
467f8b1e |
if(strcmp(dent->d_name, ".") && strcmp(dent->d_name, "..")) {
/* build the full name */
fname = cli_calloc(strlen(dirname) + strlen(dent->d_name) + 2, sizeof(char));
sprintf(fname, "%s/%s", dirname, dent->d_name); |
47bbbc56 |
|
467f8b1e |
/* stat the file */
if(lstat(fname, &statbuf) != -1) {
if(S_ISDIR(statbuf.st_mode) && !S_ISLNK(statbuf.st_mode)) {
if (cli_scandir(fname, virname, scanned, root, limits, options, reclev) == CL_VIRUS) {
free(fname);
closedir(dd);
return CL_VIRUS;
}
} else
if(S_ISREG(statbuf.st_mode))
if(cli_scanfile(fname, virname, scanned, root, limits, options, reclev) == CL_VIRUS) {
free(fname);
closedir(dd);
return CL_VIRUS;
} |
47bbbc56 |
|
bbb90786 |
} |
467f8b1e |
free(fname); |
47bbbc56 |
}
}
} |
467f8b1e |
} else { |
414abe87 |
cli_dbgmsg("ScanDir -> Can't open directory %s.\n", dirname); |
467f8b1e |
return CL_EOPEN;
} |
47bbbc56 |
|
467f8b1e |
closedir(dd);
return 0; |
47bbbc56 |
} |
467f8b1e |
static int cli_vba_scandir(const char *dirname, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{ |
467f8b1e |
int ret = CL_CLEAN, i, fd, data_len;
vba_project_t *vba_project; |
e3aaff8e |
DIR *dd;
struct dirent *dent;
struct stat statbuf; |
56bfccb2 |
char *fname, *fullname; |
467f8b1e |
unsigned char *data;
cli_dbgmsg("VBA scan dir: %s\n", dirname);
if((vba_project = (vba_project_t *) vba56_dir_read(dirname))) { |
e3aaff8e |
|
467f8b1e |
for(i = 0; i < vba_project->count; i++) {
fullname = (char *) cli_malloc(strlen(vba_project->dir) + strlen(vba_project->name[i]) + 2);
sprintf(fullname, "%s/%s", vba_project->dir, vba_project->name[i]);
fd = open(fullname, O_RDONLY);
if(fd == -1) { |
414abe87 |
cli_dbgmsg("Scan->OLE2 -> Can't open file %s\n", fullname); |
467f8b1e |
free(fullname);
ret = CL_EOPEN;
break;
}
free(fullname);
cli_dbgmsg("decompress VBA project '%s'\n", vba_project->name[i]);
data = (unsigned char *) vba_decompress(fd, vba_project->offset[i], &data_len);
close(fd);
if(!data) {
cli_dbgmsg("WARNING: VBA project '%s' decompressed to NULL\n", vba_project->name[i]);
} else {
if(cl_scanbuff(data, data_len, virname, root) == CL_VIRUS) {
free(data);
ret = CL_VIRUS;
break;
}
free(data);
}
}
for(i = 0; i < vba_project->count; i++)
free(vba_project->name[i]);
free(vba_project->name);
free(vba_project->dir);
free(vba_project->offset);
free(vba_project); |
c240c32c |
} else if ((fullname = ppt_vba_read(dirname))) {
if(cli_scandir(fullname, virname, scanned, root, limits, options, reclev) == CL_VIRUS) {
ret = CL_VIRUS;
}
cli_rmdirs(fullname);
free(fullname); |
2e53806b |
} else if ((vba_project = (vba_project_t *) wm_dir_read(dirname))) {
for (i = 0; i < vba_project->count; i++) {
fullname = (char *) cli_malloc(strlen(vba_project->dir) + strlen(vba_project->name[i]) + 2);
sprintf(fullname, "%s/%s", vba_project->dir, vba_project->name[i]);
fd = open(fullname, O_RDONLY);
if(fd == -1) { |
414abe87 |
cli_dbgmsg("Scan->OLE2 -> Can't open file %s\n", fullname); |
2e53806b |
free(fullname);
ret = CL_EOPEN;
break;
}
free(fullname);
cli_dbgmsg("decompress WM project '%s' macro:%d key:%d\n", vba_project->name[i], i, vba_project->key[i]);
data = (unsigned char *) wm_decrypt_macro(fd, vba_project->offset[i], vba_project->length[i], vba_project->key[i]);
close(fd);
if(!data) {
cli_dbgmsg("WARNING: WM project '%s' macro %d decrypted to NULL\n", vba_project->name[i], i);
} else {
if(cl_scanbuff(data, vba_project->length[i], virname, root) == CL_VIRUS) {
free(data);
ret = CL_VIRUS;
break;
}
free(data);
}
}
for(i = 0; i < vba_project->count; i++)
free(vba_project->name[i]);
free(vba_project->key);
free(vba_project->length);
free(vba_project->offset);
free(vba_project->name);
free(vba_project->dir);
free(vba_project); |
467f8b1e |
} |
2e53806b |
|
467f8b1e |
if(ret != CL_CLEAN)
return ret; |
e3aaff8e |
if((dd = opendir(dirname)) != NULL) {
while((dent = readdir(dd))) { |
feeaa333 |
#ifndef C_INTERIX
if(dent->d_ino)
#endif
{ |
e3aaff8e |
if(strcmp(dent->d_name, ".") && strcmp(dent->d_name, "..")) {
/* build the full name */
fname = cli_calloc(strlen(dirname) + strlen(dent->d_name) + 2, sizeof(char));
sprintf(fname, "%s/%s", dirname, dent->d_name);
/* stat the file */
if(lstat(fname, &statbuf) != -1) {
if(S_ISDIR(statbuf.st_mode) && !S_ISLNK(statbuf.st_mode)) |
467f8b1e |
if (cli_vba_scandir(fname, virname, scanned, root, limits, options, reclev) == CL_VIRUS) {
ret = CL_VIRUS;
free(fname);
break;
} |
e3aaff8e |
}
free(fname);
}
}
}
} else { |
414abe87 |
cli_dbgmsg("ScanDir -> Can't open directory %s.\n", dirname); |
e3aaff8e |
return CL_EOPEN;
}
closedir(dd); |
467f8b1e |
return ret;
}
static int cli_scanole2(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev)
{
const char *tmpdir; |
56bfccb2 |
char *dir;
int ret = CL_CLEAN; |
467f8b1e |
cli_dbgmsg("in cli_scanole2()\n");
|
414abe87 |
if((tmpdir = getenv("TMPDIR")) == NULL) |
467f8b1e |
#ifdef P_tmpdir
tmpdir = P_tmpdir;
#else
tmpdir = "/tmp";
#endif
/* generate the temporary directory */
dir = cl_gentemp(tmpdir);
if(mkdir(dir, 0700)) { |
414abe87 |
cli_dbgmsg("ScanOLE2 -> Can't create temporary directory %s\n", dir); |
467f8b1e |
return CL_ETMPDIR;
}
|
e5a5b2f2 |
if((ret = cli_ole2_extract(desc, dir, limits))) { |
414abe87 |
cli_dbgmsg("ScanOLE2 -> %s\n", cl_strerror(ret)); |
467f8b1e |
cli_rmdirs(dir);
free(dir);
return ret;
}
if((ret = cli_vba_scandir(dir, virname, scanned, root, limits, options, reclev)) != CL_VIRUS) {
if(cli_scandir(dir, virname, scanned, root, limits, options, reclev) == CL_VIRUS) { |
56bfccb2 |
ret = CL_VIRUS; |
467f8b1e |
}
}
cli_rmdirs(dir);
free(dir);
return ret; |
e3aaff8e |
}
|
68a6f51f |
static int cli_scanmail(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{
const char *tmpdir;
char *dir;
int ret;
|
21cf4aeb |
cli_dbgmsg("Starting cli_scanmail(), reclev %d\n", *reclev); |
5920e217 |
|
e1e5b905 |
if(*reclev > 5) /* FIXME: a temporary workaround */ |
5920e217 |
return CL_CLEAN; |
e3aaff8e |
|
414abe87 |
if((tmpdir = getenv("TMPDIR")) == NULL) |
e3aaff8e |
#ifdef P_tmpdir
tmpdir = P_tmpdir;
#else
tmpdir = "/tmp";
#endif
/* generate the temporary directory */ |
8139fd99 |
dir = cl_gentemp(tmpdir); |
e3aaff8e |
if(mkdir(dir, 0700)) { |
414abe87 |
cli_dbgmsg("ScanMail -> Can't create temporary directory %s\n", dir); |
e3aaff8e |
return CL_ETMPDIR;
}
/*
* Extract the attachments into the temporary directory
*/
ret = cl_mbox(dir, desc);
/* FIXME: check mbox return code */
ret = cli_scandir(dir, virname, scanned, root, limits, options, reclev);
cli_rmdirs(dir);
free(dir);
return ret;
}
|
68a6f51f |
static int cli_magic_scandesc(int desc, const char **virname, long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
e3aaff8e |
{ |
cdb0ae9c |
char magic[MAGIC_BUFFER_SIZE+1]; |
e3aaff8e |
int ret = CL_CLEAN; |
cdb0ae9c |
int bread = 0; |
9b8e00a0 |
cli_file_t type; |
e3aaff8e |
if(!root) { |
414abe87 |
cli_errmsg("CRITICAL: root == NULL\n"); |
e3aaff8e |
return -1;
}
|
d6b5ae47 |
if(!options) { /* raw mode (stdin, etc.) */
if((ret = cli_scandesc(desc, virname, scanned, root) == CL_VIRUS))
cli_dbgmsg("%s virus found in descriptor %d.\n", *virname, desc);
return ret;
}
|
467f8b1e |
if(SCAN_ARCHIVE && limits && limits->maxreclevel)
if(*reclev > limits->maxreclevel)
/* return CL_EMAXREC; */
return CL_CLEAN; |
e3aaff8e |
|
467f8b1e |
(*reclev)++;
lseek(desc, 0, SEEK_SET);
bread = read(desc, magic, MAGIC_BUFFER_SIZE);
magic[MAGIC_BUFFER_SIZE] = '\0';
lseek(desc, 0, SEEK_SET); |
e3aaff8e |
|
467f8b1e |
if (bread != MAGIC_BUFFER_SIZE) {
/* short read: No need to do magic */
(*reclev)--;
return ret;
} |
e3aaff8e |
|
467f8b1e |
type = cli_filetype(magic, bread); |
6d6e8271 |
|
467f8b1e |
switch(type) { |
6307ca15 |
case CL_DOSEXE:
/* temporarily the return code is ignored */
cli_scanpe(desc, virname, scanned, root, limits, options, reclev);
break;
|
467f8b1e |
case CL_RARFILE:
if(!DISABLE_RAR && SCAN_ARCHIVE && !cli_scanrar_inuse)
ret = cli_scanrar(desc, virname, scanned, root, limits, options, reclev);
break; |
6d6e8271 |
|
467f8b1e |
case CL_ZIPFILE:
if(SCAN_ARCHIVE)
ret = cli_scanzip(desc, virname, scanned, root, limits, options, reclev);
break; |
6d6e8271 |
|
467f8b1e |
case CL_GZFILE:
if(SCAN_ARCHIVE)
ret = cli_scangzip(desc, virname, scanned, root, limits, options, reclev);
break; |
6d6e8271 |
|
467f8b1e |
case CL_BZFILE: |
68a6f51f |
#ifdef HAVE_BZLIB_H |
467f8b1e |
if(SCAN_ARCHIVE)
ret = cli_scanbzip(desc, virname, scanned, root, limits, options, reclev); |
e3aaff8e |
#endif |
467f8b1e |
break; |
6d6e8271 |
|
341e5433 |
case CL_MSCFILE:
if(SCAN_ARCHIVE)
ret = cli_scanmscomp(desc, virname, scanned, root, limits, options, reclev);
break;
|
414abe87 |
case CL_MSCABFILE:
if(SCAN_ARCHIVE)
ret = cli_scanmscab(desc, virname, scanned, root, limits, options, reclev);
break;
|
467f8b1e |
case CL_MAILFILE:
if(SCAN_MAIL)
ret = cli_scanmail(desc, virname, scanned, root, limits, options, reclev);
break; |
6d6e8271 |
|
467f8b1e |
case CL_OLE2FILE:
if(SCAN_OLE2)
ret = cli_scanole2(desc, virname, scanned, root, limits, options, reclev);
break; |
6d6e8271 |
|
467f8b1e |
case CL_DATAFILE:
/* it could be a false positive and a standard DOS .COM file */
{
struct stat s;
if(fstat(desc, &s) == 0 && S_ISREG(s.st_mode) && s.st_size < 65536)
type = CL_UNKNOWN_TYPE;
}
case CL_UNKNOWN_TYPE:
break; |
e3aaff8e |
}
|
467f8b1e |
(*reclev)--;
if(type != CL_DATAFILE && ret != CL_VIRUS) { /* scan the raw file */ |
cdb0ae9c |
lseek(desc, 0, SEEK_SET); /* If archive scan didn't rewind desc */ |
e3aaff8e |
if(cli_scandesc(desc, virname, scanned, root) == CL_VIRUS) {
cli_dbgmsg("%s virus found in descriptor %d.\n", *virname, desc);
return CL_VIRUS;
} |
46c2e927 |
} |
e3aaff8e |
return ret;
}
|
68a6f51f |
int cl_scandesc(int desc, const char **virname, unsigned long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options) |
e3aaff8e |
{
int reclev = 0;
return cli_magic_scandesc(desc, virname, scanned, root, limits, options, &reclev);
}
|
2b278a02 |
static int cli_scanfile(const char *filename, const char **virname, unsigned long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options, int *reclev) |
21cf4aeb |
{
int fd, ret;
/* internal version of cl_scanfile with reclev preserved */
if((fd = open(filename, O_RDONLY)) == -1)
return CL_EOPEN;
ret = cli_magic_scandesc(fd, virname, scanned, root, limits, options, reclev);
close(fd);
return ret;
}
|
68a6f51f |
int cl_scanfile(const char *filename, const char **virname, unsigned long int *scanned, const struct cl_node *root, const struct cl_limits *limits, int options) |
e3aaff8e |
{
int fd, ret;
if((fd = open(filename, O_RDONLY)) == -1)
return CL_EOPEN;
ret = cl_scandesc(fd, virname, scanned, root, limits, options);
close(fd);
return ret;
} |