/*
* Copyright (C) 2007 - 2008 Sourcefire, Inc.
* Copyright (C) 2002 - 2007 Tomasz Kojm <tkojm@clamav.net>
* CDIFF code (C) 2006 Sensory Networks, Inc.
* Author: Tomasz Kojm <tkojm@clamav.net>
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License version 2 as
* published by the Free Software Foundation.
*
* 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., 51 Franklin Street, Fifth Floor, Boston,
* MA 02110-1301, USA.
*/
#if HAVE_CONFIG_H
#include "clamav-config.h"
#endif
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <zlib.h>
#include <time.h>
#include <locale.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>
#ifndef _WIN32
#include <sys/socket.h>
#include <sys/un.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/wait.h>
#endif
#include <dirent.h>
#ifdef HAVE_TERMIOS_H
#include <termios.h>
#endif
#include "vba.h"
#include "shared/output.h"
#include "shared/optparser.h"
#include "shared/misc.h"
#include "shared/cdiff.h"
#include "libclamav/sha256.h"
#include "shared/tar.h"
#include "libclamav/clamav.h"
#include "libclamav/matcher.h"
#include "libclamav/cvd.h"
#include "libclamav/others.h"
#include "libclamav/str.h"
#include "libclamav/ole2_extract.h"
#include "libclamav/htmlnorm.h"
#include "libclamav/default.h"
#include "libclamav/fmap.h"
#include "libclamav/readdb.h"
#define MAX_DEL_LOOKAHEAD 200
/*
* Force backward compatibility with the cdiff interpreter of clamav < 0.95
*/
#define COMPATIBILITY_LIMIT 980
static const struct dblist_s {
const char *name;
unsigned int count;
} dblist[] = {
/* special files */
{ "COPYING", 0 },
{ "daily.cfg", 0 },
{ "daily.ign", 0 },
{ "daily.ign2", 0 },
{ "daily.ftm", 0 },
{ "main.info", 0 }, { "daily.info", 0 }, { "safebrowsing.info", 0 },
/* databases */
{ "main.db", 1 }, { "daily.db", 1 },
{ "main.hdb", 1 }, { "daily.hdb", 1 },
{ "main.hdu", 1 }, { "daily.hdu", 1 },
{ "main.mdb", 1 }, { "daily.mdb", 1 },
{ "main.mdu", 1 }, { "daily.mdu", 1 },
{ "main.ndb", 1 }, { "daily.ndb", 1 },
{ "main.ndu", 1 }, { "daily.ndu", 1 },
{ "main.ldb", 1 }, { "daily.ldb", 1 },
{ "main.ldu", 1 }, { "daily.ldu", 1 },
{ "main.sdb", 1 }, { "daily.sdb", 1 },
{ "main.zmd", 1 }, { "daily.zmd", 1 },
{ "main.rmd", 1 }, { "daily.rmd", 1 },
{ "main.fp", 0 }, { "daily.fp", 0 },
{ "main.pdb", 1 }, { "daily.pdb", 1 }, { "safebrowsing.gdb", 1 },
{ "main.wdb", 0 }, { "daily.wdb", 0 }, { "safebrowsing.wdb", 0 },
{ NULL, 0 }
};
struct dblist_scan
{
char *name;
struct dblist_scan *next;
};
static const char *getdbname(const char *str)
{
if(strstr(str, "main"))
return "main";
else if(strstr(str, "daily"))
return "daily";
else if(strstr(str, "safebrowsing"))
return "safebrowsing";
else if(strstr(str, "bytecode"))
return "bytecode";
else {
mprintf("!getdbname: Can't extract db name\n");
return "UNKNOWN";
}
}
static int hexdump(void)
{
char buffer[FILEBUFF], *pt;
int bytes;
while((bytes = read(0, buffer, FILEBUFF)) > 0) {
pt = cli_str2hex(buffer, bytes);
if(write(1, pt, 2 * bytes) == -1) {
mprintf("!hexdump: Can't write to stdout\n");
free(pt);
return -1;
}
free(pt);
}
if(bytes == -1)
return -1;
return 0;
}
static int md5sig(const struct optstruct *opts, unsigned int mdb)
{
char *md5;
unsigned int i;
struct stat sb;
if(opts->filename) {
for(i = 0; opts->filename[i]; i++) {
if(stat(opts->filename[i], &sb) == -1) {
mprintf("!md5sig: Can't access file %s\n", opts->filename[i]);
perror("md5sig");
return -1;
} else {
if((sb.st_mode & S_IFMT) == S_IFREG) {
if((md5 = cli_md5file(opts->filename[i]))) {
if(mdb)
mprintf("%u:%s:%s\n", (unsigned int) sb.st_size, md5, opts->filename[i]);
else
mprintf("%s:%u:%s\n", md5, (unsigned int) sb.st_size, opts->filename[i]);
free(md5);
} else {
mprintf("!md5sig: Can't generate MD5 checksum for %s\n", opts->filename[i]);
return -1;
}
}
}
}
} else { /* stream */
md5 = cli_md5stream(stdin, NULL);
if(!md5) {
mprintf("!md5sig: Can't generate MD5 checksum for input stream\n");
return -1;
}
mprintf("%s\n", md5);
free(md5);
}
return 0;
}
static int htmlnorm(const struct optstruct *opts)
{
int fd;
fmap_t *map;
if((fd = open(optget(opts, "html-normalise")->strarg, O_RDONLY)) == -1) {
mprintf("!htmlnorm: Can't open file %s\n", optget(opts, "html-normalise")->strarg);
return -1;
}
if((map = fmap(fd, 0, 0))) {
html_normalise_map(map, ".", NULL, NULL);
funmap(map);
} else
mprintf("!fmap failed\n");
close(fd);
return 0;
}
static int utf16decode(const struct optstruct *opts)
{
const char *fname;
char *newname, buff[512], *decoded;
int fd1, fd2, bytes;
fname = optget(opts, "utf16-decode")->strarg;
if((fd1 = open(fname, O_RDONLY)) == -1) {
mprintf("!utf16decode: Can't open file %s\n", fname);
return -1;
}
newname = malloc(strlen(fname) + 7);
if(!newname) {
mprintf("!utf16decode: Can't allocate memory\n");
close(fd1);
return -1;
}
sprintf(newname, "%s.ascii", fname);
if((fd2 = open(newname, O_WRONLY|O_CREAT|O_TRUNC, S_IRWXU)) < 0) {
mprintf("!utf16decode: Can't create file %s\n", newname);
free(newname);
close(fd1);
return -1;
}
while((bytes = read(fd1, buff, sizeof(buff))) > 0) {
decoded = cli_utf16toascii(buff, bytes);
if(decoded) {
if(write(fd2, decoded, strlen(decoded)) == -1) {
mprintf("!utf16decode: Can't write to file %s\n", newname);
free(decoded);
unlink(newname);
free(newname);
close(fd1);
close(fd2);
return -1;
}
free(decoded);
}
}
free(newname);
close(fd1);
close(fd2);
return 0;
}
static unsigned int countlines(const char *filename)
{
FILE *fh;
char buff[1024];
unsigned int lines = 0;
if((fh = fopen(filename, "r")) == NULL)
return 0;
while(fgets(buff, sizeof(buff), fh)) {
if(buff[0] == '#') continue;
lines++;
}
fclose(fh);
return lines;
}
static char *getdsig(const char *host, const char *user, const unsigned char *data, unsigned int datalen, unsigned short mode)
{
char buff[512], cmd[128], pass[30], *pt;
struct sockaddr_in server;
int sockd, bread, len;
#ifdef HAVE_TERMIOS_H
struct termios old, new;
#endif
if((pt = getenv("SIGNDPASS"))) {
strncpy(pass, pt, sizeof(pass));
pass[sizeof(pass)-1]='\0';
} else {
mprintf("Password: ");
#ifdef HAVE_TERMIOS_H
if(tcgetattr(0, &old)) {
mprintf("!getdsig: tcgetattr() failed\n");
return NULL;
}
new = old;
new.c_lflag &= ~ECHO;
if(tcsetattr(0, TCSAFLUSH, &new)) {
mprintf("!getdsig: tcsetattr() failed\n");
return NULL;
}
#endif
if(scanf("%as", &pt) == EOF || !pt) {
mprintf("!getdsig: Can't get password\n");
#ifdef HAVE_TERMIOS_H
tcsetattr(0, TCSAFLUSH, &old);
#endif
return NULL;
}
strncpy(pass, pt, sizeof(pass));
pass[sizeof(pass)-1]='\0';
free(pt);
#ifdef HAVE_TERMIOS_H
if(tcsetattr(0, TCSAFLUSH, &old)) {
mprintf("!getdsig: tcsetattr() failed\n");
memset(pass, 0, sizeof(pass));
return NULL;
}
#endif
mprintf("\n");
}
if((sockd = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
perror("socket()");
mprintf("!getdsig: Can't create socket\n");
memset(pass, 0, sizeof(pass));
return NULL;
}
server.sin_family = AF_INET;
server.sin_addr.s_addr = inet_addr(host);
server.sin_port = htons(33101);
if(connect(sockd, (struct sockaddr *) &server, sizeof(struct sockaddr_in)) < 0) {
closesocket(sockd);
perror("connect()");
mprintf("!getdsig: Can't connect to ClamAV Signing Service at %s\n", host);
memset(pass, 0, sizeof(pass));
return NULL;
}
memset(cmd, 0, sizeof(cmd));
if(mode == 1)
snprintf(cmd, sizeof(cmd) - datalen, "ClamSign:%s:%s:", user, pass);
else if(mode == 2)
snprintf(cmd, sizeof(cmd) - datalen, "ClamSignPSS:%s:%s:", user, pass);
else
snprintf(cmd, sizeof(cmd) - datalen, "ClamSignPSS2:%s:%s:", user, pass);
len = strlen(cmd);
pt = cmd + len;
memcpy(pt, data, datalen);
len += datalen;
if(send(sockd, cmd, len, 0) < 0) {
mprintf("!getdsig: Can't write to socket\n");
closesocket(sockd);
memset(cmd, 0, sizeof(cmd));
memset(pass, 0, sizeof(pass));
return NULL;
}
memset(cmd, 0, sizeof(cmd));
memset(pass, 0, sizeof(pass));
memset(buff, 0, sizeof(buff));
if((bread = recv(sockd, buff, sizeof(buff), 0)) > 0) {
if(!strstr(buff, "Signature:")) {
mprintf("!getdsig: Error generating digital signature\n");
mprintf("!getdsig: Answer from remote server: %s\n", buff);
closesocket(sockd);
return NULL;
} else {
mprintf("Signature received (length = %lu)\n", strlen(buff) - 10);
}
} else {
mprintf("!getdsig: Communication error with remote server\n");
closesocket(sockd);
return NULL;
}
closesocket(sockd);
pt = buff;
pt += 10;
return strdup(pt);
}
static char *sha256file(const char *file, unsigned int *size)
{
FILE *fh;
unsigned int i, bytes;
unsigned char digest[32], buffer[FILEBUFF];
char *sha;
SHA256_CTX ctx;
sha256_init(&ctx);
if(!(fh = fopen(file, "r"))) {
mprintf("!sha256file: Can't open file %s\n", file);
return NULL;
}
if(size)
*size = 0;
while((bytes = fread(buffer, 1, sizeof(buffer), fh))) {
sha256_update(&ctx, buffer, bytes);
if(size)
*size += bytes;
}
sha256_final(&ctx, digest);
sha = (char *) malloc(65);
if(!sha)
return NULL;
for(i = 0; i < 32; i++)
sprintf(sha + i * 2, "%02x", digest[i]);
return sha;
}
static int writeinfo(const char *dbname, const char *builder, const char *header, const struct optstruct *opts, const struct dblist_scan *dbl)
{
FILE *fh;
unsigned int i, bytes;
char file[32], *pt;
unsigned char digest[32], buffer[FILEBUFF];
SHA256_CTX ctx;
snprintf(file, sizeof(file), "%s.info", dbname);
if(!access(file, R_OK)) {
if(unlink(file) == -1) {
mprintf("!writeinfo: Can't unlink %s\n", file);
return -1;
}
}
if(!(fh = fopen(file, "w+"))) {
mprintf("!writeinfo: Can't create file %s\n", file);
return -1;
}
if(fprintf(fh, "%s\n", header) < 0) {
mprintf("!writeinfo: Can't write to %s\n", file);
fclose(fh);
return -1;
}
if(dbl) {
while(dbl) {
if(!(pt = sha256file(dbl->name, &bytes))) {
mprintf("!writeinfo: Can't generate SHA256 for %s\n", file);
fclose(fh);
return -1;
}
if(fprintf(fh, "%s:%u:%s\n", dbl->name, bytes, pt) < 0) {
mprintf("!writeinfo: Can't write to info file\n");
fclose(fh);
free(pt);
return -1;
}
free(pt);
dbl = dbl->next;
}
} else {
for(i = 0; dblist[i].name; i++) {
if(!cli_strbcasestr(dblist[i].name, ".info") && strstr(dblist[i].name, dbname) && !access(dblist[i].name, R_OK)) {
if(!(pt = sha256file(dblist[i].name, &bytes))) {
mprintf("!writeinfo: Can't generate SHA256 for %s\n", file);
fclose(fh);
return -1;
}
if(fprintf(fh, "%s:%u:%s\n", dblist[i].name, bytes, pt) < 0) {
mprintf("!writeinfo: Can't write to info file\n");
fclose(fh);
free(pt);
return -1;
}
free(pt);
}
}
}
rewind(fh);
sha256_init(&ctx);
while((bytes = fread(buffer, 1, sizeof(buffer), fh)))
sha256_update(&ctx, buffer, bytes);
sha256_final(&ctx, digest);
if(!(pt = getdsig(optget(opts, "server")->strarg, builder, digest, 32, 3))) {
mprintf("!writeinfo: Can't get digital signature from remote server\n");
fclose(fh);
return -1;
}
fprintf(fh, "DSIG:%s\n", pt);
free(pt);
fclose(fh);
return 0;
}
static int diffdirs(const char *old, const char *new, const char *patch);
static int verifydiff(const char *diff, const char *cvd, const char *incdir);
static int script2cdiff(const char *script, const char *builder, const struct optstruct *opts)
{
char *cdiff, *pt, buffer[FILEBUFF];
unsigned char digest[32];
SHA256_CTX ctx;
struct stat sb;
FILE *scripth, *cdiffh;
gzFile *gzh;
unsigned int ver, osize;
int bytes;
if(stat(script, &sb) == -1) {
mprintf("!script2diff: Can't stat file %s\n", script);
return -1;
}
osize = (unsigned int) sb.st_size;
cdiff = strdup(script);
pt = strstr(cdiff, ".script");
if(!pt) {
mprintf("!script2cdiff: Incorrect file name (no .script extension)\n");
free(cdiff);
return -1;
}
strcpy(pt, ".cdiff");
if(!(pt = strchr(script, '-'))) {
mprintf("!script2cdiff: Incorrect file name syntax\n");
free(cdiff);
return -1;
}
if(sscanf(++pt, "%u.script", &ver) == EOF) {
mprintf("!script2cdiff: Incorrect file name syntax\n");
free(cdiff);
return -1;
}
if(!(cdiffh = fopen(cdiff, "wb"))) {
mprintf("!script2cdiff: Can't open %s for writing\n", cdiff);
free(cdiff);
return -1;
}
if(fprintf(cdiffh, "ClamAV-Diff:%u:%u:", ver, osize) < 0) {
mprintf("!script2cdiff: Can't write to %s\n", cdiff);
fclose(cdiffh);
free(cdiff);
return -1;
}
fclose(cdiffh);
if(!(scripth = fopen(script, "rb"))) {
mprintf("!script2cdiff: Can't open file %s for reading\n", script);
unlink(cdiff);
free(cdiff);
return -1;
}
if(!(gzh = gzopen(cdiff, "ab9f"))) {
mprintf("!script2cdiff: Can't open file %s for appending\n", cdiff);
unlink(cdiff);
free(cdiff);
fclose(scripth);
return -1;
}
while((bytes = fread(buffer, 1, sizeof(buffer), scripth)) > 0) {
if(!gzwrite(gzh, buffer, bytes)) {
mprintf("!script2cdiff: Can't gzwrite to %s\n", cdiff);
unlink(cdiff);
free(cdiff);
fclose(scripth);
gzclose(gzh);
return -1;
}
}
fclose(scripth);
gzclose(gzh);
if(!(cdiffh = fopen(cdiff, "rb"))) {
mprintf("!script2cdiff: Can't open %s for reading/writing\n", cdiff);
unlink(cdiff);
free(cdiff);
return -1;
}
sha256_init(&ctx);
while((bytes = fread(buffer, 1, sizeof(buffer), cdiffh)))
sha256_update(&ctx, (unsigned char *) buffer, bytes);
fclose(cdiffh);
sha256_final(&ctx, digest);
if(!(pt = getdsig(optget(opts, "server")->strarg, builder, digest, 32, 2))) {
mprintf("!script2cdiff: Can't get digital signature from remote server\n");
unlink(cdiff);
free(cdiff);
return -1;
}
if(!(cdiffh = fopen(cdiff, "ab"))) {
mprintf("!script2cdiff: Can't open %s for appending\n", cdiff);
unlink(cdiff);
free(cdiff);
return -1;
}
fprintf(cdiffh, ":%s", pt);
free(pt);
fclose(cdiffh);
mprintf("Created %s\n", cdiff);
free(cdiff);
return 0;
}
static int build(const struct optstruct *opts)
{
int ret, bc = 0;
size_t bytes;
unsigned int i, sigs = 0, oldsigs = 0, entries = 0, version, real_header, fl;
struct stat foo;
unsigned char buffer[FILEBUFF];
char *tarfile, header[513], smbuff[32], builder[32], *pt, olddb[512], patch[32], broken[32];
const char *dbname, *newcvd;
struct cl_engine *engine;
FILE *cvd, *fh;
gzFile *tar;
time_t timet;
struct tm *brokent;
struct cl_cvd *oldcvd;
struct dblist_scan *dblist2 = NULL, *lspt;
DIR *dd;
struct dirent *dent;
#define FREE_LS(x) \
while(x) { \
lspt = x; \
x = x->next; \
free(lspt->name); \
free(lspt); \
}
if(!optget(opts, "server")->enabled) {
mprintf("!build: --server is required for --build\n");
return -1;
}
if(stat("COPYING", &foo) == -1) {
mprintf("!build: COPYING file not found in current working directory.\n");
return -1;
}
dbname = getdbname(optget(opts, "build")->strarg);
if(!strcmp(dbname, "bytecode"))
bc = 1;
if(!(engine = cl_engine_new())) {
mprintf("!build: Can't initialize antivirus engine\n");
return 50;
}
if((ret = cl_load(".", engine, &sigs, CL_DB_STDOPT | CL_DB_PUA))) {
mprintf("!build: Can't load database: %s\n", cl_strerror(ret));
cl_engine_free(engine);
return -1;
}
cl_engine_free(engine);
if(!sigs) {
mprintf("!build: There are no signatures in database files\n");
} else {
if(bc) {
if((dd = opendir(".")) == NULL) {
mprintf("!build: Can't open current directory\n");
return -1;
}
while((dent = readdir(dd))) {
if(dent->d_ino) {
if(cli_strbcasestr(dent->d_name, ".cbc")) {
lspt = (struct dblist_scan *) malloc(sizeof(struct dblist_scan));
if(!lspt) {
FREE_LS(dblist2);
mprintf("!build: Memory allocation error\n");
return -1;
}
lspt->name = strdup(dent->d_name);
if(!lspt->name) {
FREE_LS(dblist2);
free(lspt);
mprintf("!build: Memory allocation error\n");
return -1;
}
lspt->next = dblist2;
dblist2 = lspt;
entries++;
}
}
}
closedir(dd);
} else {
for(i = 0; dblist[i].name; i++)
if(dblist[i].count && strstr(dblist[i].name, dbname) && !access(dblist[i].name, R_OK))
entries += countlines(dblist[i].name);
}
if(entries != sigs)
mprintf("^build: Signatures in %s db files: %u, loaded by libclamav: %u\n", dbname, entries, sigs);
if(!entries || (sigs > entries && sigs - entries >= 1000)) {
mprintf("!Bad number of signatures in database files\n");
FREE_LS(dblist2);
return -1;
}
}
/* try to read cvd header of current database */
if(opts->filename) {
if(cli_strbcasestr(opts->filename[0], ".cvd") || cli_strbcasestr(opts->filename[0], ".cld")) {
strncpy(olddb, opts->filename[0], sizeof(olddb));
olddb[sizeof(olddb)-1]='\0';
} else {
mprintf("!build: Not a CVD/CLD file\n");
FREE_LS(dblist2);
return -1;
}
} else {
pt = freshdbdir();
snprintf(olddb, sizeof(olddb), "%s"PATHSEP"%s.cvd", pt, dbname);
if(access(olddb, R_OK))
snprintf(olddb, sizeof(olddb), "%s"PATHSEP"%s.cld", pt, dbname);
free(pt);
}
if(!(oldcvd = cl_cvdhead(olddb))) {
mprintf("^build: CAN'T READ CVD HEADER OF CURRENT DATABASE %s (wait 3 s)\n", olddb);
sleep(3);
}
if(oldcvd) {
version = oldcvd->version + 1;
oldsigs = oldcvd->sigs;
cl_cvdfree(oldcvd);
} else {
mprintf("Version number: ");
if(scanf("%u", &version) == EOF) {
mprintf("!build: scanf() failed\n");
FREE_LS(dblist2);
return -1;
}
}
mprintf("Total sigs: %u\n", sigs);
if(sigs > oldsigs)
mprintf("New sigs: %u\n", sigs - oldsigs);
strcpy(header, "ClamAV-VDB:");
/* time */
time(&timet);
brokent = localtime(&timet);
setlocale(LC_TIME, "C");
strftime(smbuff, sizeof(smbuff), "%d %b %Y %H-%M %z", brokent);
strcat(header, smbuff);
/* version */
sprintf(header + strlen(header), ":%u:", version);
/* number of signatures */
sprintf(header + strlen(header), "%u:", sigs);
/* functionality level */
if(!strcmp(dbname, "main")) {
mprintf("Functionality level: ");
if(scanf("%u", &fl) == EOF || !fl || fl > 99) {
mprintf("!build: Incorrect functionality level\n");
FREE_LS(dblist2);
return -1;
}
} else {
fl = cl_retflevel();
}
sprintf(header + strlen(header), "%u:", fl);
real_header = strlen(header);
/* add fake MD5 and dsig (for writeinfo) */
strcat(header, "X:X:");
if((pt = getenv("SIGNDUSER"))) {
strncpy(builder, pt, sizeof(builder));
builder[sizeof(builder)-1]='\0';
} else {
mprintf("Builder name: ");
if(scanf("%as", &pt) == EOF || !pt) {
mprintf("!build: Can't get builder name\n");
return -1;
}
strncpy(builder, pt, sizeof(builder));
builder[sizeof(builder)-1]='\0';
free(pt);
}
/* add builder */
strcat(header, builder);
/* add current time */
sprintf(header + strlen(header), ":%u", (unsigned int) timet);
if(writeinfo(dbname, builder, header, opts, dblist2) == -1) {
mprintf("!build: Can't generate info file\n");
FREE_LS(dblist2);
return -1;
}
header[real_header] = 0;
if(!(tarfile = cli_gentemp("."))) {
mprintf("!build: Can't generate temporary name for tarfile\n");
FREE_LS(dblist2);
return -1;
}
if((tar = gzopen(tarfile, "wb9f")) == NULL) {
mprintf("!build: Can't open file %s for writing\n", tarfile);
free(tarfile);
FREE_LS(dblist2);
return -1;
}
if(tar_addfile(-1, tar, "COPYING") == -1) {
mprintf("!build: Can't add COPYING to tar archive\n");
gzclose(tar);
unlink(tarfile);
free(tarfile);
FREE_LS(dblist2);
return -1;
}
if(bc) {
if(tar_addfile(-1, tar, "bytecode.info") == -1) {
gzclose(tar);
unlink(tarfile);
free(tarfile);
FREE_LS(dblist2);
return -1;
}
lspt = dblist2;
while(lspt) {
if(tar_addfile(-1, tar, lspt->name) == -1) {
gzclose(tar);
unlink(tarfile);
free(tarfile);
FREE_LS(dblist2);
return -1;
}
lspt = lspt->next;
}
} else {
for(i = 0; dblist[i].name; i++) {
if(strstr(dblist[i].name, dbname) && !access(dblist[i].name, R_OK)) {
if(tar_addfile(-1, tar, dblist[i].name) == -1) {
gzclose(tar);
unlink(tarfile);
free(tarfile);
FREE_LS(dblist2);
return -1;
}
}
}
}
gzclose(tar);
FREE_LS(dblist2);
/* MD5 + dsig */
if(!(fh = fopen(tarfile, "rb"))) {
mprintf("!build: Can't open file %s for reading\n", tarfile);
unlink(tarfile);
free(tarfile);
return -1;
}
if(!(pt = cli_md5stream(fh, buffer))) {
mprintf("!build: Can't generate MD5 checksum for %s\n", tarfile);
fclose(fh);
unlink(tarfile);
free(tarfile);
return -1;
}
rewind(fh);
sprintf(header + strlen(header), "%s:", pt);
free(pt);
if(!(pt = getdsig(optget(opts, "server")->strarg, builder, buffer, 16, 1))) {
mprintf("!build: Can't get digital signature from remote server\n");
fclose(fh);
unlink(tarfile);
free(tarfile);
return -1;
}
sprintf(header + strlen(header), "%s:", pt);
free(pt);
/* add builder */
strcat(header, builder);
/* add current time */
sprintf(header + strlen(header), ":%u", (unsigned int) timet);
/* fill up with spaces */
while(strlen(header) < sizeof(header) - 1)
strcat(header, " ");
/* build the final database */
newcvd = optget(opts, "build")->strarg;
if(!(cvd = fopen(newcvd, "wb"))) {
mprintf("!build: Can't create final database %s\n", newcvd);
fclose(fh);
unlink(tarfile);
free(tarfile);
return -1;
}
if(fwrite(header, 1, 512, cvd) != 512) {
mprintf("!build: Can't write to %s\n", newcvd);
fclose(fh);
unlink(tarfile);
free(tarfile);
fclose(cvd);
unlink(newcvd);
return -1;
}
while((bytes = fread(buffer, 1, FILEBUFF, fh)) > 0) {
if(fwrite(buffer, 1, bytes, cvd) != bytes) {
mprintf("!build: Can't write to %s\n", newcvd);
fclose(fh);
unlink(tarfile);
free(tarfile);
fclose(cvd);
unlink(newcvd);
return -1;
}
}
fclose(fh);
fclose(cvd);
if(unlink(tarfile) == -1) {
mprintf("^build: Can't unlink %s\n", tarfile);
unlink(tarfile);
free(tarfile);
unlink(newcvd);
return -1;
}
free(tarfile);
mprintf("Created %s\n", newcvd);
if(!oldcvd || optget(opts, "no-cdiff")->enabled) {
mprintf("Skipping .cdiff creation\n");
return 0;
}
/* generate patch */
if(!(pt = cli_gentemp(NULL))) {
mprintf("!build: Can't generate temporary name\n");
unlink(newcvd);
return -1;
}
if(mkdir(pt, 0700)) {
mprintf("!build: Can't create temporary directory %s\n", pt);
free(pt);
unlink(newcvd);
return -1;
}
if(cli_cvdunpack(olddb, pt) == -1) {
mprintf("!build: Can't unpack CVD file %s\n", olddb);
cli_rmdirs(pt);
free(pt);
unlink(newcvd);
return -1;
}
strncpy(olddb, pt, sizeof(olddb));
olddb[sizeof(olddb)-1]='\0';
free(pt);
if(!(pt = cli_gentemp(NULL))) {
mprintf("!build: Can't generate temporary name\n");
cli_rmdirs(olddb);
unlink(newcvd);
return -1;
}
if(mkdir(pt, 0700)) {
mprintf("!build: Can't create temporary directory %s\n", pt);
free(pt);
cli_rmdirs(olddb);
unlink(newcvd);
return -1;
}
if(cli_cvdunpack(newcvd, pt) == -1) {
mprintf("!build: Can't unpack CVD file %s\n", newcvd);
cli_rmdirs(pt);
free(pt);
cli_rmdirs(olddb);
unlink(newcvd);
return -1;
}
snprintf(patch, sizeof(patch), "%s-%u.script", dbname, version);
ret = diffdirs(olddb, pt, patch);
cli_rmdirs(pt);
free(pt);
if(ret == -1) {
cli_rmdirs(olddb);
unlink(newcvd);
return -1;
}
ret = verifydiff(patch, NULL, olddb);
cli_rmdirs(olddb);
if(ret == -1) {
snprintf(broken, sizeof(broken), "%s.broken", patch);
if(rename(patch, broken)) {
unlink(patch);
mprintf("!Generated file is incorrect, removed");
} else {
mprintf("!Generated file is incorrect, renamed to %s\n", broken);
}
} else {
ret = script2cdiff(patch, builder, opts);
}
return ret;
}
static int unpack(const struct optstruct *opts)
{
char name[512], *dbdir;
if(optget(opts, "unpack-current")->enabled) {
dbdir = freshdbdir();
snprintf(name, sizeof(name), "%s"PATHSEP"%s.cvd", dbdir, optget(opts, "unpack-current")->strarg);
if(access(name, R_OK)) {
snprintf(name, sizeof(name), "%s"PATHSEP"%s.cld", dbdir, optget(opts, "unpack-current")->strarg);
if(access(name, R_OK)) {
mprintf("!unpack: Couldn't find %s CLD/CVD database\n", optget(opts, "unpack-current")->strarg);
free(dbdir);
return -1;
}
}
free(dbdir);
} else {
strncpy(name, optget(opts, "unpack")->strarg, sizeof(name));
name[sizeof(name)-1]='\0';
}
if(cli_cvdunpack(name, ".") == -1) {
mprintf("!unpack: Can't unpack file %s\n", name);
return -1;
}
return 0;
}
static int cvdinfo(const struct optstruct *opts)
{
struct cl_cvd *cvd;
char *pt;
int ret;
pt = optget(opts, "info")->strarg;
if((cvd = cl_cvdhead(pt)) == NULL) {
mprintf("!cvdinfo: Can't read/parse CVD header of %s\n", pt);
return -1;
}
mprintf("File: %s\n", pt);
pt = strchr(cvd->time, '-');
*pt = ':';
mprintf("Build time: %s\n", cvd->time);
mprintf("Version: %u\n", cvd->version);
mprintf("Signatures: %u\n", cvd->sigs);
mprintf("Functionality level: %u\n", cvd->fl);
mprintf("Builder: %s\n", cvd->builder);
pt = optget(opts, "info")->strarg;
if(cli_strbcasestr(pt, ".cvd")) {
mprintf("MD5: %s\n", cvd->md5);
mprintf("Digital signature: %s\n", cvd->dsig);
cl_cvdfree(cvd);
if((ret = cl_cvdverify(pt))) {
mprintf("!cvdinfo: Verification: %s\n", cl_strerror(ret));
return -1;
} else {
mprintf("Verification OK.\n");
return 0;
}
}
cl_cvdfree(cvd);
return 0;
}
static int listdb(const char *filename, const regex_t *regex);
static int listdir(const char *dirname, const regex_t *regex)
{
DIR *dd;
struct dirent *dent;
char *dbfile;
if((dd = opendir(dirname)) == NULL) {
mprintf("!listdir: Can't open directory %s\n", dirname);
return -1;
}
while((dent = readdir(dd))) {
if(dent->d_ino)
{
if(strcmp(dent->d_name, ".") && strcmp(dent->d_name, "..") &&
(cli_strbcasestr(dent->d_name, ".db") ||
cli_strbcasestr(dent->d_name, ".hdb") ||
cli_strbcasestr(dent->d_name, ".hdu") ||
cli_strbcasestr(dent->d_name, ".mdb") ||
cli_strbcasestr(dent->d_name, ".mdu") ||
cli_strbcasestr(dent->d_name, ".ndb") ||
cli_strbcasestr(dent->d_name, ".ndu") ||
cli_strbcasestr(dent->d_name, ".ldb") ||
cli_strbcasestr(dent->d_name, ".ldu") ||
cli_strbcasestr(dent->d_name, ".sdb") ||
cli_strbcasestr(dent->d_name, ".zmd") ||
cli_strbcasestr(dent->d_name, ".rmd") ||
cli_strbcasestr(dent->d_name, ".cld") ||
cli_strbcasestr(dent->d_name, ".cvd"))) {
dbfile = (char *) malloc(strlen(dent->d_name) + strlen(dirname) + 2);
if(!dbfile) {
mprintf("!listdir: Can't allocate memory for dbfile\n");
closedir(dd);
return -1;
}
sprintf(dbfile, "%s"PATHSEP"%s", dirname, dent->d_name);
if(listdb(dbfile, regex) == -1) {
mprintf("!listdb: Error listing database %s\n", dbfile);
free(dbfile);
closedir(dd);
return -1;
}
free(dbfile);
}
}
}
closedir(dd);
return 0;
}
static int listdb(const char *filename, const regex_t *regex)
{
FILE *fh;
char *buffer, *pt, *start, *dir;
unsigned int line = 0;
if((fh = fopen(filename, "rb")) == NULL) {
mprintf("!listdb: Can't open file %s\n", filename);
return -1;
}
if(!(buffer = (char *) malloc(FILEBUFF))) {
mprintf("!listdb: Can't allocate memory for buffer\n");
fclose(fh);
return -1;
}
/* check for CVD file */
if(!fgets(buffer, 12, fh)) {
mprintf("!listdb: fgets failed\n");
free(buffer);
fclose(fh);
return -1;
}
rewind(fh);
if(!strncmp(buffer, "ClamAV-VDB:", 11)) {
free(buffer);
fclose(fh);
if(!(dir = cli_gentemp(NULL))) {
mprintf("!listdb: Can't generate temporary name\n");
return -1;
}
if(mkdir(dir, 0700)) {
mprintf("!listdb: Can't create temporary directory %s\n", dir);
free(dir);
return -1;
}
if(cli_cvdunpack(filename, dir) == -1) {
mprintf("!listdb: Can't unpack CVD file %s\n", filename);
cli_rmdirs(dir);
free(dir);
return -1;
}
/* list extracted directory */
if(listdir(dir, regex) == -1) {
mprintf("!listdb: Can't list directory %s\n", filename);
cli_rmdirs(dir);
free(dir);
return -1;
}
cli_rmdirs(dir);
free(dir);
return 0;
}
if(cli_strbcasestr(filename, ".db")) { /* old style database */
while(fgets(buffer, FILEBUFF, fh)) {
if(regex) {
if(!cli_regexec(regex, buffer, 0, NULL, 0))
mprintf("%s", buffer);
continue;
}
line++;
pt = strchr(buffer, '=');
if(!pt) {
mprintf("!listdb: Malformed pattern line %u (file %s)\n", line, filename);
fclose(fh);
free(buffer);
return -1;
}
start = buffer;
*pt = 0;
if((pt = strstr(start, " (Clam)")))
*pt = 0;
mprintf("%s\n", start);
}
} else if(cli_strbcasestr(filename, ".hdb") || cli_strbcasestr(filename, ".hdu") || cli_strbcasestr(filename, ".mdb") || cli_strbcasestr(filename, ".mdu")) { /* hash database */
while(fgets(buffer, FILEBUFF, fh)) {
if(regex) {
if(!cli_regexec(regex, buffer, 0, NULL, 0))
mprintf("%s", buffer);
continue;
}
line++;
cli_chomp(buffer);
start = cli_strtok(buffer, 2, ":");
if(!start) {
mprintf("!listdb: Malformed pattern line %u (file %s)\n", line, filename);
fclose(fh);
free(buffer);
return -1;
}
if((pt = strstr(start, " (Clam)")))
*pt = 0;
mprintf("%s\n", start);
free(start);
}
} else if(cli_strbcasestr(filename, ".ndb") || cli_strbcasestr(filename, ".ndu") || cli_strbcasestr(filename, ".ldb") || cli_strbcasestr(filename, ".ldu") || cli_strbcasestr(filename, ".sdb") || cli_strbcasestr(filename, ".zmd") || cli_strbcasestr(filename, ".rmd")) {
while(fgets(buffer, FILEBUFF, fh)) {
if(regex) {
if(!cli_regexec(regex, buffer, 0, NULL, 0))
mprintf("%s", buffer);
continue;
}
line++;
cli_chomp(buffer);
if(cli_strbcasestr(filename, ".ldb") || cli_strbcasestr(filename, ".ldu"))
start = cli_strtok(buffer, 0, ";");
else
start = cli_strtok(buffer, 0, ":");
if(!start) {
mprintf("!listdb: Malformed pattern line %u (file %s)\n", line, filename);
fclose(fh);
free(buffer);
return -1;
}
if((pt = strstr(start, " (Clam)")))
*pt = 0;
mprintf("%s\n", start);
free(start);
}
}
fclose(fh);
free(buffer);
return 0;
}
static int listsigs(const struct optstruct *opts, int mode)
{
int ret;
const char *name;
char *dbdir;
struct stat sb;
regex_t reg;
if(mode == 0) {
name = optget(opts, "list-sigs")->strarg;
if(stat(name, &sb) == -1) {
mprintf("--list-sigs: Can't get status of %s\n", name);
return -1;
}
mprintf_stdout = 1;
if(S_ISDIR(sb.st_mode)) {
if(!strcmp(name, DATADIR)) {
dbdir = freshdbdir();
ret = listdir(dbdir, NULL);
free(dbdir);
} else {
ret = listdir(name, NULL);
}
} else {
ret = listdb(name, NULL);
}
} else {
if(cli_regcomp(®, optget(opts, "find-sigs")->strarg, REG_EXTENDED | REG_NOSUB) != 0) {
mprintf("--find-sigs: Can't compile regex\n");
return -1;
}
mprintf_stdout = 1;
dbdir = freshdbdir();
ret = listdir(dbdir, ®);
free(dbdir);
cli_regfree(®);
}
return ret;
}
static int vbadump(const struct optstruct *opts)
{
int fd, hex_output;
char *dir;
const char *pt;
struct uniq *vba = NULL;
cli_ctx ctx;
if(optget(opts, "vba-hex")->enabled) {
hex_output = 1;
pt = optget(opts, "vba-hex")->strarg;
} else {
hex_output = 0;
pt = optget(opts, "vba")->strarg;
}
if((fd = open(pt, O_RDONLY|O_BINARY)) == -1) {
mprintf("!vbadump: Can't open file %s\n", pt);
return -1;
}
/* generate the temporary directory */
if(!(dir = cli_gentemp(NULL))) {
mprintf("!vbadump: Can't generate temporary name\n");
close(fd);
return -1;
}
if(mkdir(dir, 0700)) {
mprintf("!vbadump: Can't create temporary directory %s\n", dir);
free(dir);
close(fd);
return -1;
}
ctx.fmap = cli_malloc(sizeof(struct F_MAP *));
if(!ctx.fmap) {
printf("malloc failed\n");
return 1;
}
*ctx.fmap = fmap(fd, 0, 0);
if(*ctx.fmap) {
printf("fmap failed\n");
return 1;
}
if(cli_ole2_extract(dir, NULL, &vba)) {
cli_rmdirs(dir);
free(dir);
close(fd);
return -1;
}
close(fd);
if (vba)
sigtool_vba_scandir(dir, hex_output, vba);
cli_rmdirs(dir);
free(dir);
return 0;
}
static int comparesha(const char *dbname)
{
char info[32], buff[FILEBUFF], *sha;
const char *tokens[3];
FILE *fh;
int ret = 0, tokens_count;
snprintf(info, sizeof(info), "%s.info", getdbname(dbname));
if(!(fh = fopen(info, "r"))) {
mprintf("!verifydiff: Can't open %s\n", info);
return -1;
}
if(!fgets(buff, sizeof(buff), fh) || strncmp(buff, "ClamAV-VDB", 10)) {
mprintf("!verifydiff: Incorrect info file %s\n", info);
fclose(fh);
return -1;
}
while(fgets(buff, sizeof(buff), fh)) {
cli_chomp(buff);
tokens_count = cli_strtokenize(buff, ':', 3, tokens);
if(tokens_count != 3) {
if(!strcmp(tokens[0], "DSIG"))
continue;
mprintf("!verifydiff: Incorrect format of %s\n", info);
ret = -1;
break;
}
if(!(sha = sha256file(tokens[0], NULL))) {
mprintf("!verifydiff: Can't generate MD5 for %s\n", buff);
ret = -1;
break;
}
if(strcmp(sha, tokens[2])) {
mprintf("!verifydiff: %s has incorrect checksum\n", buff);
ret = -1;
free(sha);
break;
}
free(sha);
}
fclose(fh);
return ret;
}
static int rundiff(const struct optstruct *opts)
{
int fd, ret;
unsigned short mode;
const char *diff;
diff = optget(opts, "run-cdiff")->strarg;
if(strstr(diff, ".cdiff")) {
mode = 1;
} else if(strstr(diff, ".script")) {
mode = 0;
} else {
mprintf("!rundiff: Incorrect file name (no .cdiff/.script extension)\n");
return -1;
}
if((fd = open(diff, O_RDONLY)) == -1) {
mprintf("!rundiff: Can't open file %s\n", diff);
return -1;
}
ret = cdiff_apply(fd, mode);
close(fd);
if(!ret)
ret = comparesha(diff);
return ret;
}
static int compare(const char *oldpath, const char *newpath, FILE *diff)
{
FILE *old, *new;
char obuff[CLI_DEFAULT_LSIG_BUFSIZE + 1], nbuff[CLI_DEFAULT_LSIG_BUFSIZE + 1], tbuff[CLI_DEFAULT_LSIG_BUFSIZE + 1], *pt, *omd5, *nmd5;
unsigned int oline = 0, tline, found, i;
long opos;
if((omd5 = cli_md5file(oldpath))) {
if(!(nmd5 = cli_md5file(newpath))) {
mprintf("!compare: Can't get MD5 checksum of %s\n", newpath);
free(omd5);
return -1;
}
if(!strcmp(omd5, nmd5)) {
free(omd5);
free(nmd5);
return 0;
}
free(omd5);
free(nmd5);
}
fprintf(diff, "OPEN %s\n", newpath);
if(!(new = fopen(newpath, "r"))) {
mprintf("!compare: Can't open file %s for reading\n", newpath);
return -1;
}
old = fopen(oldpath, "r");
while(fgets(nbuff, sizeof(nbuff), new)) {
i = strlen(nbuff);
if(i >= 2 && (nbuff[i - 1] == '\r' || (nbuff[i - 1] == '\n' && nbuff[i - 2] == '\r'))) {
mprintf("!compare: New %s file contains lines terminated with CRLF or CR\n", newpath);
if(old)
fclose(old);
fclose(new);
return -1;
}
cli_chomp(nbuff);
if(!old) {
fprintf(diff, "ADD %s\n", nbuff);
} else {
if(fgets(obuff, sizeof(obuff), old)) {
oline++;
cli_chomp(obuff);
if(!strcmp(nbuff, obuff)) {
continue;
} else {
tline = 0;
found = 0;
opos = ftell(old);
while(fgets(tbuff, sizeof(tbuff), old)) {
tline++;
cli_chomp(tbuff);
if(tline > MAX_DEL_LOOKAHEAD)
break;
if(!strcmp(tbuff, nbuff)) {
found = 1;
break;
}
}
fseek(old, opos, SEEK_SET);
if(found) {
strncpy(tbuff, obuff, sizeof(tbuff));
tbuff[sizeof(tbuff)-1]='\0';
for(i = 0; i < tline; i++) {
tbuff[16] = 0;
if((pt = strchr(tbuff, ' ')))
*pt = 0;
fprintf(diff, "DEL %u %s\n", oline + i, tbuff);
if(!fgets(tbuff, sizeof(tbuff), old))
break;
}
oline += tline;
} else {
obuff[16] = 0;
if((pt = strchr(obuff, ' ')))
*pt = 0;
fprintf(diff, "XCHG %u %s %s\n", oline, obuff, nbuff);
}
}
} else {
fclose(old);
old = NULL;
fprintf(diff, "ADD %s\n", nbuff);
}
}
#ifdef COMPATIBILITY_LIMIT
if(strlen(nbuff) > COMPATIBILITY_LIMIT) {
mprintf("!compare: COMPATIBILITY_LIMIT: Found too long line in new %s\n", newpath);
if(old)
fclose(old);
fclose(new);
return -1;
}
#endif
}
fclose(new);
if(old) {
while(fgets(obuff, sizeof(obuff), old)) {
oline++;
obuff[16] = 0;
if((pt = strchr(obuff, ' ')))
*pt = 0;
fprintf(diff, "DEL %u %s\n", oline, obuff);
}
fclose(old);
}
fprintf(diff, "CLOSE\n");
return 0;
}
static int dircopy(const char *src, const char *dest)
{
DIR *dd;
struct dirent *dent;
struct stat sb;
char spath[512], dpath[512];
if(stat(dest, &sb) == -1) {
if(mkdir(dest, 0755)) {
/* mprintf("!dircopy: Can't create temporary directory %s\n", dest); */
return -1;
}
}
if((dd = opendir(src)) == NULL) {
/* mprintf("!dircopy: Can't open directory %s\n", src); */
return -1;
}
while((dent = readdir(dd))) {
if(dent->d_ino)
{
if(!strcmp(dent->d_name, ".") || !strcmp(dent->d_name, ".."))
continue;
snprintf(spath, sizeof(spath), "%s"PATHSEP"%s", src, dent->d_name);
snprintf(dpath, sizeof(dpath), "%s"PATHSEP"%s", dest, dent->d_name);
if(filecopy(spath, dpath) == -1) {
/* mprintf("!dircopy: Can't copy %s to %s\n", spath, dpath); */
cli_rmdirs(dest);
closedir(dd);
return -1;
}
}
}
closedir(dd);
return 0;
}
static int verifydiff(const char *diff, const char *cvd, const char *incdir)
{
char *tempdir, cwd[512];
int ret = 0, fd;
unsigned short mode;
if(strstr(diff, ".cdiff")) {
mode = 1;
} else if(strstr(diff, ".script")) {
mode = 0;
} else {
mprintf("!verifydiff: Incorrect file name (no .cdiff/.script extension)\n");
return -1;
}
tempdir = cli_gentemp(NULL);
if(!tempdir) {
mprintf("!verifydiff: Can't generate temporary name for tempdir\n");
return -1;
}
if(mkdir(tempdir, 0700) == -1) {
mprintf("!verifydiff: Can't create directory %s\n", tempdir);
free(tempdir);
return -1;
}
if(cvd) {
if(cli_cvdunpack(cvd, tempdir) == -1) {
mprintf("!verifydiff: Can't unpack CVD file %s\n", cvd);
cli_rmdirs(tempdir);
free(tempdir);
return -1;
}
} else {
if(dircopy(incdir, tempdir) == -1) {
mprintf("!verifydiff: Can't copy dir %s to %s\n", incdir, tempdir);
cli_rmdirs(tempdir);
free(tempdir);
return -1;
}
}
if(!getcwd(cwd, sizeof(cwd))) {
mprintf("!verifydiff: getcwd() failed\n");
cli_rmdirs(tempdir);
free(tempdir);
return -1;
}
if((fd = open(diff, O_RDONLY)) == -1) {
mprintf("!verifydiff: Can't open diff file %s\n", diff);
cli_rmdirs(tempdir);
free(tempdir);
return -1;
}
if(chdir(tempdir) == -1) {
mprintf("!verifydiff: Can't chdir to %s\n", tempdir);
cli_rmdirs(tempdir);
free(tempdir);
close(fd);
return -1;
}
if(cdiff_apply(fd, mode) == -1) {
mprintf("!verifydiff: Can't apply %s\n", diff);
if(chdir(cwd) == -1)
mprintf("^verifydiff: Can't chdir to %s\n", cwd);
cli_rmdirs(tempdir);
free(tempdir);
close(fd);
return -1;
}
close(fd);
ret = comparesha(diff);
if(chdir(cwd) == -1)
mprintf("^verifydiff: Can't chdir to %s\n", cwd);
cli_rmdirs(tempdir);
free(tempdir);
if(!ret) {
if(cvd)
mprintf("Verification: %s correctly applies to %s\n", diff, cvd);
else
mprintf("Verification: %s correctly applies to the previous version\n", diff);
}
return ret;
}
static int matchsig(const char *sig, int fd)
{
struct cl_engine *engine;
int ret;
if(!(engine = cl_engine_new())) {
mprintf("!matchsig: Can't create new engine\n");
return 0;
}
if(cli_initroots(engine, 0) != CL_SUCCESS) {
mprintf("!matchsig: cli_initroots() failed\n");
cl_engine_free(engine);
return 0;
}
if(cli_parse_add(engine->root[0], "test", sig, 0, 0, "*", 0, NULL, 0) != CL_SUCCESS) {
mprintf("!matchsig: Can't parse signature\n");
cl_engine_free(engine);
return 0;
}
if(cl_engine_compile(engine) != CL_SUCCESS) {
mprintf("!matchsig: Can't compile engine\n");
cl_engine_free(engine);
return 0;
}
lseek(fd, 0, SEEK_SET);
ret = cl_scandesc(fd, NULL, NULL, engine, CL_SCAN_STDOPT);
cl_engine_free(engine);
return (ret == CL_VIRUS) ? 1 : 0;
}
static char *decodehexstr(const char *hex, unsigned int *dlen)
{
uint16_t *str16;
char *decoded;
unsigned int i, p = 0, wildcard = 0, len = strlen(hex)/2;
str16 = cli_hex2ui(hex);
if(!str16)
return NULL;
for(i = 0; i < len; i++)
if(str16[i] & CLI_MATCH_WILDCARD)
wildcard++;
decoded = calloc(len + 1 + wildcard * 32, sizeof(char));
for(i = 0; i < len; i++) {
if(str16[i] & CLI_MATCH_WILDCARD) {
switch(str16[i] & CLI_MATCH_WILDCARD) {
case CLI_MATCH_IGNORE:
p += sprintf(decoded + p, "{WILDCARD_IGNORE}");
break;
case CLI_MATCH_NIBBLE_HIGH:
p += sprintf(decoded + p, "{WILDCARD_NIBBLE_HIGH:0x%x}", str16[i] & 0x00f0);
break;
case CLI_MATCH_NIBBLE_LOW:
p += sprintf(decoded + p, "{WILDCARD_NIBBLE_LOW:0x%x}", str16[i] & 0x000f);
break;
default:
mprintf("!decodehexstr: Unknown wildcard (0x%x@%u)\n", str16[i] & CLI_MATCH_WILDCARD, i);
free(decoded);
return NULL;
}
} else {
decoded[p] = str16[i];
p++;
}
}
if(dlen)
*dlen = p;
return decoded;
}
static char *decodehexspecial(const char *hex, unsigned int *dlen)
{
char *pt, *start, *hexcpy, *decoded, *h, *c;
unsigned int i, len = 0, hlen, negative, altnum, alttype;
char *buff;
hexcpy = strdup(hex);
if(!hexcpy) {
mprintf("!decodehexspecial: strdup(hex) failed\n");
return NULL;
}
pt = strchr(hexcpy, '(');
if(!pt) {
free(hexcpy);
return decodehexstr(hex, dlen);
} else {
buff = calloc(strlen(hex) + 512, sizeof(char));
if(!buff) {
mprintf("!decodehexspecial: Can't allocate memory for buff\n");
return NULL;
}
start = hexcpy;
do {
negative = 0;
*pt++ = 0;
if(!start) {
mprintf("!decodehexspecial: Unexpected EOL\n");
return NULL;
}
if(pt >= hexcpy + 2) {
if(pt[-2] == '!') {
negative = 1;
pt[-2] = 0;
}
}
if(!(decoded = decodehexstr(start, &hlen))) {
mprintf("!Decoding failed (1): %s\n", pt);
free(hexcpy);
return NULL;
}
memcpy(&buff[len], decoded, hlen);
len += hlen;
free(decoded);
if(!(start = strchr(pt, ')'))) {
mprintf("!decodehexspecial: Missing closing parethesis\n");
free(hexcpy);
return NULL;
}
*start++ = 0;
if(!strlen(pt)) {
mprintf("!decodehexspecial: Empty block\n");
free(hexcpy);
return NULL;
}
if(!strcmp(pt, "B")) {
if(!*start) {
if(negative)
len += sprintf(buff + len, "{NOT_BOUNDARY_RIGHT}");
else
len += sprintf(buff + len, "{BOUNDARY_RIGHT}");
continue;
} else if(pt - 1 == hexcpy) {
if(negative)
len += sprintf(buff + len, "{NOT_BOUNDARY_LEFT}");
else
len += sprintf(buff + len, "{BOUNDARY_LEFT}");
continue;
}
} else if(!strcmp(pt, "L")) {
if(!*start) {
if(negative)
len += sprintf(buff + len, "{NOT_LINE_MARKER_RIGHT}");
else
len += sprintf(buff + len, "{LINE_MARKER_RIGHT}");
continue;
} else if(pt - 1 == hexcpy) {
if(negative)
len += sprintf(buff + len, "{NOT_LINE_MARKER_LEFT}");
else
len += sprintf(buff + len, "{LINE_MARKER_LEFT}");
continue;
}
} else {
altnum = 0;
for(i = 0; i < strlen(pt); i++)
if(pt[i] == '|')
altnum++;
if(!altnum) {
mprintf("!decodehexspecial: Empty block\n");
free(hexcpy);
return NULL;
}
altnum++;
if(3 * altnum - 1 == (uint16_t) strlen(pt)) {
alttype = 1; /* char */
if(negative)
len += sprintf(buff + len, "{EXCLUDING_CHAR_ALTERNATIVE:");
else
len += sprintf(buff + len, "{CHAR_ALTERNATIVE:");
} else {
alttype = 2; /* str */
if(negative)
len += sprintf(buff + len, "{EXCLUDING_STRING_ALTERNATIVE:");
else
len += sprintf(buff + len, "{STRING_ALTERNATIVE:");
}
for(i = 0; i < altnum; i++) {
if(!(h = cli_strtok(pt, i, "|"))) {
free(hexcpy);
return NULL;
}
if(!(c = cli_hex2str(h))) {
free(h);
free(hexcpy);
return NULL;
}
if(alttype == 1) {
buff[len++] = *c;
} else {
memcpy(&buff[len], c, strlen(h) / 2);
len += strlen(h) / 2;
}
if(i + 1 != altnum)
buff[len++] = '|';
}
buff[len++] = '}';
}
} while((pt = strchr(start, '(')));
if(start) {
if(!(decoded = decodehexstr(start, &hlen))) {
mprintf("!Decoding failed (2)\n");
free(hexcpy);
return NULL;
}
memcpy(&buff[len], decoded, hlen);
len += hlen;
}
}
free(hexcpy);
if(dlen)
*dlen = len;
return buff;
}
static int decodehex(const char *hexsig)
{
char *pt, *hexcpy, *start, *n, *decoded;
int asterisk = 0;
unsigned int i, j, hexlen, dlen, parts = 0, bw;
int mindist = 0, maxdist = 0, error = 0;
hexlen = strlen(hexsig);
if(strchr(hexsig, '{') || strchr(hexsig, '[')) {
if(!(hexcpy = strdup(hexsig)))
return -1;
for(i = 0; i < hexlen; i++)
if(hexsig[i] == '{' || hexsig[i] == '[' || hexsig[i] == '*')
parts++;
if(parts)
parts++;
start = pt = hexcpy;
for(i = 1; i <= parts; i++) {
if(i != parts) {
for(j = 0; j < strlen(start); j++) {
if(start[j] == '{' || start[j] == '[') {
asterisk = 0;
pt = start + j;
break;
}
if(start[j] == '*') {
asterisk = 1;
pt = start + j;
break;
}
}
*pt++ = 0;
}
if(mindist && maxdist) {
if(mindist == maxdist)
mprintf("{WILDCARD_ANY_STRING(LENGTH==%u)}", mindist);
else
mprintf("{WILDCARD_ANY_STRING(LENGTH>=%u&&<=%u)}", mindist, maxdist);
} else if(mindist)
mprintf("{WILDCARD_ANY_STRING(LENGTH>=%u)}", mindist);
else if(maxdist)
mprintf("{WILDCARD_ANY_STRING(LENGTH<=%u)}", maxdist);
if(!(decoded = decodehexspecial(start, &dlen))) {
mprintf("!Decoding failed\n");
free(hexcpy);
return -1;
}
bw = write(1, decoded, dlen);
free(decoded);
if(i == parts)
break;
if(asterisk)
mprintf("{WILDCARD_ANY_STRING}");
mindist = maxdist = 0;
if(asterisk) {
start = pt;
continue;
}
if(!(start = strchr(pt, '}')) && !(start = strchr(pt, ']'))) {
error = 1;
break;
}
*start++ = 0;
if(!pt) {
error = 1;
break;
}
if(!strchr(pt, '-')) {
if(!cli_isnumber(pt) || (mindist = maxdist = atoi(pt)) < 0) {
error = 1;
break;
}
} else {
if((n = cli_strtok(pt, 0, "-"))) {
if(!cli_isnumber(n) || (mindist = atoi(n)) < 0) {
error = 1;
free(n);
break;
}
free(n);
}
if((n = cli_strtok(pt, 1, "-"))) {
if(!cli_isnumber(n) || (maxdist = atoi(n)) < 0) {
error = 1;
free(n);
break;
}
free(n);
}
if((n = cli_strtok(pt, 2, "-"))) { /* strict check */
error = 1;
free(n);
break;
}
}
}
free(hexcpy);
if(error)
return -1;
} else if(strchr(hexsig, '*')) {
for(i = 0; i < hexlen; i++)
if(hexsig[i] == '*')
parts++;
if(parts)
parts++;
for(i = 1; i <= parts; i++) {
if((pt = cli_strtok(hexsig, i - 1, "*")) == NULL) {
mprintf("!Can't extract part %u of partial signature\n", i);
return -1;
}
if(!(decoded = decodehexspecial(pt, &dlen))) {
mprintf("!Decoding failed\n");
return -1;
}
bw = write(1, decoded, dlen);
free(decoded);
if(i < parts)
mprintf("{WILDCARD_ANY_STRING}");
free(pt);
}
} else {
if(!(decoded = decodehexspecial(hexsig, &dlen))) {
mprintf("!Decoding failed\n");
return -1;
}
bw = write(1, decoded, dlen);
free(decoded);
}
mprintf("\n");
return 0;
}
static int decodesig(char *sig, int fd)
{
char *pt;
const char *tokens[68];
int tokens_count, subsigs, i, bc = 0;
if(strchr(sig, ';')) { /* lsig */
tokens_count = cli_strtokenize(sig, ';', 67 + 1, (const char **) tokens);
if(tokens_count < 4) {
mprintf("!decodesig: Invalid or not supported signature format\n");
return -1;
}
mprintf("VIRUS NAME: %s\n", tokens[0]);
if(strlen(tokens[0]) && strstr(tokens[0], ".{") && tokens[0][strlen(tokens[0]) - 1] == '}')
bc = 1;
mprintf("TDB: %s\n", tokens[1]);
mprintf("LOGICAL EXPRESSION: %s\n", tokens[2]);
subsigs = cli_ac_chklsig(tokens[2], tokens[2] + strlen(tokens[2]), NULL, NULL, NULL, 1);
if(subsigs == -1) {
mprintf("!decodesig: Broken logical expression\n");
return -1;
}
subsigs++;
if(subsigs > 64) {
mprintf("!decodesig: Too many subsignatures\n");
return -1;
}
if(!bc && subsigs != tokens_count - 3) {
mprintf("!decodesig: The number of subsignatures (==%u) doesn't match the IDs in the logical expression (==%u)\n", tokens_count - 3, subsigs);
return -1;
}
for(i = 0; i < tokens_count - 3; i++) {
if(i >= subsigs)
mprintf(" * BYTECODE SUBSIG\n");
else
mprintf(" * SUBSIG ID %d\n", i);
if((pt = strchr(tokens[3 + i], ':'))) {
*pt++ = 0;
mprintf(" +-> OFFSET: %s\n", tokens[3 + i]);
} else {
mprintf(" +-> OFFSET: ANY\n");
}
if(fd == -1) {
mprintf(" +-> DECODED SUBSIGNATURE:\n");
decodehex(pt ? pt : tokens[3 + i]);
} else {
mprintf(" +-> MATCH: %s\n", matchsig(pt ? pt : tokens[3 + i], fd) ? "YES" : "** NO **");
}
}
} else if(strchr(sig, ':')) { /* ndb */
tokens_count = cli_strtokenize(sig, ':', 6 + 1, tokens);
if(tokens_count < 4 || tokens_count > 6) {
mprintf("!decodesig: Invalid or not supported signature format\n");
mprintf("TOKENS COUNT: %u\n", tokens_count);
return -1;
}
mprintf("VIRUS NAME: %s\n", tokens[0]);
if(tokens_count == 5)
mprintf("FUNCTIONALITY LEVEL: >=%s\n", tokens[4]);
else if(tokens_count == 6)
mprintf("FUNCTIONALITY LEVEL: %s..%s\n", tokens[4], tokens[5]);
if(!cli_isnumber(tokens[1])) {
mprintf("!decodesig: Invalid target type\n");
return -1;
}
mprintf("TARGET TYPE: ");
switch(atoi(tokens[1])) {
case 0:
mprintf("ANY FILE\n");
break;
case 1:
mprintf("PE\n");
break;
case 2:
mprintf("OLE2\n");
break;
case 3:
mprintf("HTML\n");
break;
case 4:
mprintf("MAIL\n");
break;
case 5:
mprintf("GRAPHICS\n");
break;
case 6:
mprintf("ELF\n");
break;
case 7:
mprintf("NORMALIZED ASCII TEXT\n");
break;
case 8:
mprintf("DISASM DATA\n");
break;
case 9:
mprintf("MACHO\n");
break;
default:
mprintf("!decodesig: Invalid target type\n");
return -1;
}
mprintf("OFFSET: %s\n", tokens[2]);
if(fd == -1) {
mprintf("DECODED SIGNATURE:\n");
decodehex(tokens[3]);
} else {
mprintf("MATCH: %s\n", matchsig(tokens[3], fd) ? "YES" : "** NO **");
}
} else if((pt = strchr(sig, '='))) {
*pt++ = 0;
mprintf("VIRUS NAME: %s\n", sig);
if(fd == -1) {
mprintf("DECODED SIGNATURE:\n");
decodehex(pt);
} else {
mprintf("MATCH: %s\n", matchsig(pt, fd) ? "YES" : "** NO **");
}
} else {
mprintf("decodesig: Not supported signature format\n");
return -1;
}
return 0;
}
static int decodesigs(void)
{
char buffer[32769];
fflush(stdin);
while(fgets(buffer, sizeof(buffer), stdin)) {
cli_chomp(buffer);
if(!strlen(buffer))
break;
if(decodesig(buffer, -1) == -1)
return -1;
}
return 0;
}
static int testsigs(const struct optstruct *opts)
{
char buffer[32769];
FILE *sigs;
int ret = 0, fd;
if(!opts->filename) {
mprintf("!--test-sigs requires two arguments\n");
return -1;
}
if(cl_init(CL_INIT_DEFAULT) != CL_SUCCESS) {
mprintf("!testsigs: Can't initialize libclamav: %s\n", cl_strerror(ret));
return -1;
}
sigs = fopen(optget(opts, "test-sigs")->strarg, "rb");
if(!sigs) {
mprintf("!testsigs: Can't open file %s\n", optget(opts, "test-sigs")->strarg);
return -1;
}
fd = open(opts->filename[0], O_RDONLY|O_BINARY);
if(fd == -1) {
mprintf("!testsigs: Can't open file %s\n", optget(opts, "test-sigs")->strarg);
fclose(sigs);
return -1;
}
while(fgets(buffer, sizeof(buffer), sigs)) {
cli_chomp(buffer);
if(!strlen(buffer))
break;
if(decodesig(buffer, fd) == -1) {
ret = -1;
break;
}
}
close(fd);
fclose(sigs);
return ret;
}
static int diffdirs(const char *old, const char *new, const char *patch)
{
FILE *diff;
DIR *dd;
struct dirent *dent;
char cwd[512], path[1024];
if(!getcwd(cwd, sizeof(cwd))) {
mprintf("!diffdirs: getcwd() failed\n");
return -1;
}
if(!(diff = fopen(patch, "w"))) {
mprintf("!diffdirs: Can't open %s for writing\n", patch);
return -1;
}
if(chdir(new) == -1) {
mprintf("!diffdirs: Can't chdir to %s\n", new);
fclose(diff);
return -1;
}
if((dd = opendir(new)) == NULL) {
mprintf("!diffdirs: Can't open directory %s\n", new);
fclose(diff);
return -1;
}
while((dent = readdir(dd))) {
if(dent->d_ino)
{
if(!strcmp(dent->d_name, ".") || !strcmp(dent->d_name, ".."))
continue;
snprintf(path, sizeof(path), "%s"PATHSEP"%s", old, dent->d_name);
if(compare(path, dent->d_name, diff) == -1) {
if(chdir(cwd) == -1)
mprintf("^diffdirs: Can't chdir to %s\n", cwd);
fclose(diff);
unlink(patch);
closedir(dd);
return -1;
}
}
}
closedir(dd);
/* check for removed files */
if((dd = opendir(old)) == NULL) {
mprintf("!diffdirs: Can't open directory %s\n", old);
fclose(diff);
return -1;
}
while((dent = readdir(dd))) {
if(dent->d_ino)
{
if(!strcmp(dent->d_name, ".") || !strcmp(dent->d_name, ".."))
continue;
snprintf(path, sizeof(path), "%s"PATHSEP"%s", new, dent->d_name);
if(access(path, R_OK))
fprintf(diff, "UNLINK %s\n", dent->d_name);
}
}
closedir(dd);
fclose(diff);
mprintf("Generated diff file %s\n", patch);
if(chdir(cwd) == -1)
mprintf("^diffdirs: Can't chdir to %s\n", cwd);
return 0;
}
static int makediff(const struct optstruct *opts)
{
char *odir, *ndir, name[32], broken[32];
struct cl_cvd *cvd;
unsigned int oldver, newver;
int ret;
if(!opts->filename) {
mprintf("!makediff: --diff requires two arguments\n");
return -1;
}
if(!(cvd = cl_cvdhead(opts->filename[0]))) {
mprintf("!makediff: Can't read CVD header from %s\n", opts->filename[0]);
return -1;
}
newver = cvd->version;
free(cvd);
if(!(cvd = cl_cvdhead(optget(opts, "diff")->strarg))) {
mprintf("!makediff: Can't read CVD header from %s\n", optget(opts, "diff")->strarg);
return -1;
}
oldver = cvd->version;
free(cvd);
if(oldver + 1 != newver) {
mprintf("!makediff: The old CVD must be %u\n", newver - 1);
return -1;
}
odir = cli_gentemp(NULL);
if(!odir) {
mprintf("!makediff: Can't generate temporary name for odir\n");
return -1;
}
if(mkdir(odir, 0700) == -1) {
mprintf("!makediff: Can't create directory %s\n", odir);
free(odir);
return -1;
}
if(cli_cvdunpack(optget(opts, "diff")->strarg, odir) == -1) {
mprintf("!makediff: Can't unpack CVD file %s\n", optget(opts, "diff")->strarg);
cli_rmdirs(odir);
free(odir);
return -1;
}
ndir = cli_gentemp(NULL);
if(!ndir) {
mprintf("!makediff: Can't generate temporary name for ndir\n");
cli_rmdirs(odir);
free(odir);
return -1;
}
if(mkdir(ndir, 0700) == -1) {
mprintf("!makediff: Can't create directory %s\n", ndir);
free(ndir);
cli_rmdirs(odir);
free(odir);
return -1;
}
if(cli_cvdunpack(opts->filename[0], ndir) == -1) {
mprintf("!makediff: Can't unpack CVD file %s\n", opts->filename[0]);
cli_rmdirs(odir);
cli_rmdirs(ndir);
free(odir);
free(ndir);
return -1;
}
snprintf(name, sizeof(name), "%s-%u.script", getdbname(opts->filename[0]), newver);
ret = diffdirs(odir, ndir, name);
cli_rmdirs(odir);
cli_rmdirs(ndir);
free(odir);
free(ndir);
if(ret == -1)
return -1;
if(verifydiff(name, optget(opts, "diff")->strarg, NULL) == -1) {
snprintf(broken, sizeof(broken), "%s.broken", name);
if(rename(name, broken)) {
unlink(name);
mprintf("!Generated file is incorrect, removed");
} else {
mprintf("!Generated file is incorrect, renamed to %s\n", broken);
}
return -1;
}
return 0;
}
static void help(void)
{
mprintf("\n");
mprintf(" Clam AntiVirus: Signature Tool (sigtool) %s\n", get_version());
printf(" By The ClamAV Team: http://www.clamav.net/team\n");
printf(" (C) 2007-2009 Sourcefire, Inc. et al.\n\n");
mprintf(" --help -h show help\n");
mprintf(" --version -V print version number and exit\n");
mprintf(" --quiet be quiet, output only error messages\n");
mprintf(" --debug enable debug messages\n");
mprintf(" --stdout write to stdout instead of stderr\n");
mprintf(" --hex-dump convert data from stdin to a hex\n");
mprintf(" string and print it on stdout\n");
mprintf(" --md5 [FILES] generate MD5 checksum from stdin\n");
mprintf(" or MD5 sigs for FILES\n");
mprintf(" --mdb [FILES] generate .mdb sigs\n");
mprintf(" --html-normalise=FILE create normalised parts of HTML file\n");
mprintf(" --utf16-decode=FILE decode UTF16 encoded files\n");
mprintf(" --info=FILE -i FILE print database information\n");
mprintf(" --build=NAME [cvd] -b NAME build a CVD file\n");
mprintf(" --no-cdiff Don't generate .cdiff file\n");
mprintf(" --server=ADDR ClamAV Signing Service address\n");
mprintf(" --unpack=FILE -u FILE Unpack a CVD/CLD file\n");
mprintf(" --unpack-current=SHORTNAME Unpack local CVD/CLD into cwd\n");
mprintf(" --list-sigs[=FILE] -l[FILE] List signature names\n");
mprintf(" --find-sigs=REGEX -fREGEX Find signatures matching REGEX\n");
mprintf(" --decode-sigs Decode signatures from stdin\n");
mprintf(" --test-sigs=DATABASE TARGET_FILE Test signatures from DATABASE against TARGET_FILE\n");
mprintf(" --vba=FILE Extract VBA/Word6 macro code\n");
mprintf(" --vba-hex=FILE Extract Word6 macro code with hex values\n");
mprintf(" --diff=OLD NEW -d OLD NEW Create diff for OLD and NEW CVDs\n");
mprintf(" --run-cdiff=FILE -r FILE Execute update script FILE in cwd\n");
mprintf(" --verify-cdiff=DIFF CVD/CLD Verify DIFF against CVD/CLD\n");
mprintf("\n");
return;
}
int main(int argc, char **argv)
{
int ret = 1;
struct optstruct *opts;
struct stat sb;
opts = optparse(NULL, argc, argv, 1, OPT_SIGTOOL, 0, NULL);
if(!opts) {
mprintf("!Can't parse command line options\n");
return 1;
}
if(optget(opts, "quiet")->enabled)
mprintf_quiet = 1;
if(optget(opts, "stdout")->enabled)
mprintf_stdout = 1;
if(optget(opts, "debug")->enabled)
cl_debug();
if(optget(opts, "version")->enabled) {
print_version(NULL);
optfree(opts);
return 0;
}
if(optget(opts, "help")->enabled) {
optfree(opts);
help();
return 0;
}
if(optget(opts, "hex-dump")->enabled)
ret = hexdump();
else if(optget(opts, "md5")->enabled)
ret = md5sig(opts, 0);
else if(optget(opts, "mdb")->enabled)
ret = md5sig(opts, 1);
else if(optget(opts, "html-normalise")->enabled)
ret = htmlnorm(opts);
else if(optget(opts, "utf16-decode")->enabled)
ret = utf16decode(opts);
else if(optget(opts, "build")->enabled)
ret = build(opts);
else if(optget(opts, "unpack")->enabled)
ret = unpack(opts);
else if(optget(opts, "unpack-current")->enabled)
ret = unpack(opts);
else if(optget(opts, "info")->enabled)
ret = cvdinfo(opts);
else if(optget(opts, "list-sigs")->active)
ret = listsigs(opts, 0);
else if(optget(opts, "find-sigs")->active)
ret = listsigs(opts, 1);
else if(optget(opts, "decode-sigs")->active)
ret = decodesigs();
else if(optget(opts, "test-sigs")->enabled)
ret = testsigs(opts);
else if(optget(opts, "vba")->enabled || optget(opts, "vba-hex")->enabled)
ret = vbadump(opts);
else if(optget(opts, "diff")->enabled)
ret = makediff(opts);
else if(optget(opts, "run-cdiff")->enabled)
ret = rundiff(opts);
else if(optget(opts, "verify-cdiff")->enabled) {
if(!opts->filename) {
mprintf("!--verify-cdiff requires two arguments\n");
ret = -1;
} else {
if(stat(opts->filename[0], &sb) == -1) {
mprintf("--verify-cdiff: Can't get status of %s\n", opts->filename[0]);
ret = -1;
} else {
if(S_ISDIR(sb.st_mode))
ret = verifydiff(optget(opts, "verify-cdiff")->strarg, NULL, opts->filename[0]);
else
ret = verifydiff(optget(opts, "verify-cdiff")->strarg, opts->filename[0], NULL);
}
}
} else
help();
optfree(opts);
return ret ? 1 : 0;
}