chksmb.c

/* Synchronet message/file base (SMB) validity checker */

/****************************************************************************
 * @format.tab-size 4		(Plain Text/Source Code File Header)			*
 * @format.use-tabs true	(see http://www.synchro.net/ptsc_hdr.html)		*
 *																			*
 * Copyright Rob Swindell - http://www.synchro.net/copyright.html			*
 *																			*
 * 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.					*
 * See the GNU General Public License for more details: gpl.txt or			*
 * http://www.fsf.org/copyleft/gpl.html										*
 *																			*
 * For Synchronet coding style and modification guidelines, see				*
 * http://www.synchro.net/source.html										*
 *																			*
 * Note: If this box doesn't appear square, then you need to fix your tabs.	*
 ****************************************************************************/

/* ANSI */
#include <stdio.h>
#include <stdlib.h>		/* exit */
#include <string.h>		/* strrchr */
#include <time.h>		/* ctime */
#include <ctype.h>		/* toupper */

#include "git_branch.h"
#include "git_hash.h"

/* SMB-specific */
#include "genwrap.h"
#include "conwrap.h"	/* getch */
#include "dirwrap.h"	/* fexist */
#include "filewrap.h"	/* filelength */
#include "smblib.h"

/****************************************************************************/
/* Returns in 'string' a character representation of the number in l with   */
/* commas.																	*/
/****************************************************************************/
char *ultoac(ulong l, char *string)
{
	char str[256];
	int i,j,k;

	SAFEPRINTF(str,"%lu",l);
	i=strlen(str)-1;
	j=i/3+1+i;
	string[j--]=0;
	for(k=1;i>-1;k++) {
		string[j--]=str[i--];
		if(j>0 && !(k%3))
			string[j--]=',';
	}
	return(string);
}

/****************************************************************************/
/* Returns an ASCII string for FidoNet address 'addr'                       */
/****************************************************************************/
char *faddrtoa(fidoaddr_t addr)
{
	static char str[25];
	char point[25];

	sprintf(str,"%hu:%hu/%hu",addr.zone,addr.net,addr.node);
	if(addr.point) {
		sprintf(point,".%u",addr.point);
		strcat(str,point);
	}
	return(str);
}

char* strip_ctrl(char *str)
{
	char tmp[1024];
	int i,j;

	for(i=j=0;str[i] && j<sizeof(tmp)-1;i++) {
		if(str[i]==CTRL_A && str[i+1]!=0)
			i++;
		else if((uchar)str[i]>=' ')
			tmp[j++]=str[i];
	}
	if(i!=j) {
		tmp[j]=0;
		strcpy(str,tmp);
	}
	return(str);
}

BOOL contains_ctrl_chars(char* str)
{
	uchar* p;

	if(str==NULL)
		return FALSE;
	for(p = (uchar *)str; *p; p++)
		if(*p < ' ')
			return TRUE;
	return FALSE;
}

void print_hash(hash_t* hash)
{
	char str[128];

	printf("\t%-20s = %lu\n"		,"hash.number"	, (ulong)hash->number);
	printf("\t%-20s = 0x%08lX\n"	,"hash.time"	, (ulong)hash->time);
	printf("\t%-20s = %lu\n"		,"hash.length"	, (ulong)hash->length);
	printf("\t%-20s = 0x%02X\n"		,"hash.source"	, (unsigned)hash->source);
	printf("\t%-20s = 0x%02X\n"		,"hash.flags"	, (unsigned)hash->flags);
	if(hash->flags & SMB_HASH_CRC16)
		printf("\t%-20s = 0x%04hX\n"	,"hash.crc16"	, hash->data.crc16);
	if(hash->flags & SMB_HASH_CRC32)
		printf("\t%-20s = 0x%08X\n"		,"hash.crc32"	, hash->data.crc32);
	if(hash->flags & SMB_HASH_MD5)
		printf("\t%-20s = %s\n"			,"hash.md5"		, MD5_hex(str, hash->data.md5));
	if(hash->flags & SMB_HASH_SHA1)
		printf("\t%-20s = %s\n"			,"hash.sha1"	, SHA1_hex(str, hash->data.sha1));
}

char *usage="\nusage: chksmb [-opts] <filespec.SHD>\n"
			"\n"
			" opts:\n"
			"       b - beep on error\n"
			"       s - stop after errored message/file base\n"
			"       p - pause after errored messsage/file base\n"
			"       h - don't check hash file\n"
			"       a - don't check allocation files\n"
			"       t - don't check translation strings\n"
			"       i - don't check message IDs\n"
			"       S - don't check subject CRCs\n"
			"       N - don't check to/from name CRCs\n"
			"       e - display extended info on corrupted msgs\n";

int main(int argc, char **argv)
{
	char		str[128],*p,*beep="";
	char		from[26];
	char*		body;
	char*		tail;
	int 		h,i,j,x,y,lzh,errors,errlast;
	BOOL		stop_on_error=FALSE,pause_on_error=FALSE,chkxlat=TRUE,chkalloc=TRUE,chkhash=TRUE
				,lzhmsg,extinfo=FALSE,msgerr;
	BOOL		chk_msgids = TRUE;
	BOOL		chk_subjcrc = TRUE;
	BOOL		chk_namecrc = TRUE;
	uint16_t	xlat;
	uint32_t	m;
	ulong		l,n,size,total=0,orphan,deleted,headers
				,*offset,*number,xlaterr
				,delidx
				,delhdrblocks,deldatblocks,hdrerr,lockerr,hdrnumerr,hdrlenerr
				,getbodyerr,gettailerr
				,hasherr,badhash
				,acthdrblocks,actdatblocks
				,dfieldlength,dfieldoffset
				,dupenum,dupenumhdr,dupeoff,attr,actalloc,types
				,datactalloc,misnumbered,timeerr,idxofferr,idxerr
				,subjcrc,fromcrc,tocrc
				,intransit,unvalidated
				,zeronum,idxzeronum,idxnumerr,packable=0L,totallzhsaved=0L
				,totalmsgs=0,totallzhmsgs=0,totaldelmsgs=0,totalmsgbytes=0L
				,lzhblocks,lzhsaved
				,ctrl_chars;
	ulong		hdr_overlap;
	off_t		shd_length;
	ulong		oldest=0;
	ulong		largest=0;
	ulong		largest_msgnum=0;
	ulong		msgids = 0;
	smb_t		smb;
	idxrec_t	idx;
	idxrec_t*	idxrec = NULL;
	fileidxrec_t* fidxrec = NULL;
	smbmsg_t	msg;
	hash_t**	hashes;
	time_t		now=time(NULL);

	fprintf(stderr,"\nCHKSMB v3.20-%s %s/%s SMBLIB %s - Check Synchronet Message/File Base\n"
		,PLATFORM_DESC, GIT_BRANCH, GIT_HASH, smb_lib_ver());

	if(argc<2) {
		printf("%s",usage);
		exit(1);
	}

	errlast=errors=0;
	for(x=1;x<argc;x++) {
		if(stop_on_error && errors)
			break;
		if(pause_on_error && errlast!=errors) {
			fprintf(stderr,"%s\nHit any key to continue...", beep);
			if(!getch())
				getch();
			printf("\n");
		}