Delete ctm_scan program. There is no manpage for ctm_scan

and nobody use it.

Reviewed by: phk & Richard Wackerbarth
This commit is contained in:
Wolfram Schneider 1997-10-12 19:58:53 +00:00
parent 43990fb0dc
commit 175dffc0f6
Notes: svn2git 2020-12-20 02:59:44 +00:00
svn path=/head/; revision=30353
3 changed files with 2 additions and 208 deletions

View File

@ -1,5 +1,5 @@
# $Id$
# $Id: Makefile,v 1.5 1997/02/22 16:05:14 peter Exp $
SUBDIR= ctm ctm_scan ctm_rmail ctm_smail ctm_dequeue
SUBDIR= ctm ctm_rmail ctm_smail ctm_dequeue
.include <bsd.subdir.mk>

View File

@ -1,18 +0,0 @@
#
# ----------------------------------------------------------------------------
# "THE BEER-WARE LICENSE" (Revision 42):
# <phk@login.dkuug.dk> wrote this file. As long as you retain this notice you
# can do whatever you want with this stuff. If we meet some day, and you think
# this stuff is worth it, you can buy me a beer in return. Poul-Henning Kamp
# ----------------------------------------------------------------------------
#
# $Id$
#
PROG= ctm_scan
LDADD+= -lmd
DPADD+= ${LIBMD}
NOMAN= 1
CFLAGS+= -Wall
.include "../../Makefile.inc"
.include <bsd.prog.mk>

View File

@ -1,188 +0,0 @@
/*
* ----------------------------------------------------------------------------
* "THE BEER-WARE LICENSE" (Revision 42):
* <phk@login.dkuug.dk> wrote this file. As long as you retain this notice you
* can do whatever you want with this stuff. If we meet some day, and you think
* this stuff is worth it, you can buy me a beer in return. Poul-Henning Kamp
* ----------------------------------------------------------------------------
*
* $Id: ctm_scan.c,v 1.15 1997/02/22 16:05:40 peter Exp $
*
*/
#include <err.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <sys/file.h>
#include <dirent.h>
#include <md5.h>
int barf[256];
int CheckMode = 0;
int
pstrcmp(const void *pp, const void *qq)
{
return strcmp(*(char **)pp,*(char **)qq);
}
int
Do(char *path)
{
DIR *d;
struct dirent *de;
struct stat st;
int ret=0;
u_char buf[BUFSIZ];
u_char data[BUFSIZ],*q;
int bufp;
MD5_CTX ctx;
int fd,i,j,k,l,npde,nde=0;
char **pde, md5[33];
npde = 1;
pde = malloc(sizeof *pde * (npde+1));
d = opendir(path);
if(!d) { warn("%s", path); return 2; }
if(!strcmp(path,".")) {
*buf = 0;
} else {
strcpy(buf,path);
if(buf[strlen(buf)-1] != '/')
strcat(buf,"/");
}
bufp = strlen(buf);
while((de=readdir(d))) {
if(!strcmp(de->d_name,".")) continue;
if(!strcmp(de->d_name,"..")) continue;
if(nde >= npde) {
npde *= 2;
pde = realloc(pde,sizeof *pde * (npde+1));
}
strcpy(buf+bufp,de->d_name);
if(stat(buf,&st)) {
ret |= 1;
continue;
}
pde[nde] = malloc(strlen(buf+bufp)+1);
strcpy(pde[nde++],buf+bufp);
}
closedir(d);
if(!nde) return 0;
qsort(pde,nde,sizeof *pde, pstrcmp);
for(k=0;k<nde;k++) {
strcpy(buf+bufp,pde[k]);
free(pde[k]);
if(stat(buf,&st)) {
ret |= 1;
continue;
}
switch(st.st_mode & S_IFMT) {
case S_IFDIR:
if(!CheckMode) {
i = printf("d %s %o %u %u - - -\n",
buf,st.st_mode & (~S_IFMT),st.st_uid,st.st_gid);
if(!i)
exit(-1);
}
ret |= Do(buf);
break;
case S_IFREG:
fd = open(buf,O_RDONLY);
if(fd < 0) {
ret |= 1;
continue;
}
MD5Init(&ctx);
l = 1;
j = 0;
while(0 < (i = read(fd,data,sizeof data))) {
l = (data[i-1] == '\n');
if(!CheckMode)
MD5Update(&ctx,data,i);
for(q=data;i && !j;i--)
if(barf[*q++])
j=1;
}
close(fd);
if(CheckMode) {
if(j || !l) {
i = printf("%s",buf);
if(!i) exit(-1);
if(j) printf(" Illegal characters.");
if(!l) printf(" No final newline.");
i = printf(".\n");
if(!i) exit(-1);
}
} else {
if(!l)
j=2;
i = printf("f %s %o %u %u %u %lu %s\n",
buf,st.st_mode & (~S_IFMT),st.st_uid,st.st_gid,
j,(u_long)st.st_size,MD5End(&ctx,md5));
if(!i) exit(-1);
}
break;
default:
fprintf(stderr,"%s: type 0%o\n",buf, st.st_mode & S_IFMT);
ret |= 4;
break;
}
}
free(pde);
return ret;
}
int
main(int argc, char **argv)
{
int i;
/*
* Initialize barf[], characters diff/patch will not appreciate.
*/
barf[0x00] = 1;
barf[0x7f] = 1;
barf[0x80] = 1;
barf[0xff] = 1;
/*
* -c is CheckMode
*/
if (argc > 1 && !strcmp(argv[1],"-c")) {
CheckMode=1;
argc--;
argv++;
}
/*
* First argument, if any, is where to do the work.
*/
if (argc > 1) {
if(chdir(argv[1])) {
warn("%s", argv[1]);
return 2;
}
argc--;
argv++;
}
/*
* Scan the directories recursively.
*/
if (argc > 1) {
while (argc > 1) {
i = Do(argv[1]);
argc--;
argv++;
if (i)
return i;
}
return i;
} else
return Do(".");
}