Home | History | Annotate | Line # | Download | only in cksum
cksum.c revision 1.23
      1  1.23  xtraeme /*	$NetBSD: cksum.c,v 1.23 2005/01/20 15:44:59 xtraeme Exp $	*/
      2   1.6    glass 
      3   1.1      cgd /*-
      4   1.3      cgd  * Copyright (c) 1991, 1993
      5   1.3      cgd  *	The Regents of the University of California.  All rights reserved.
      6   1.1      cgd  *
      7   1.1      cgd  * This code is derived from software contributed to Berkeley by
      8   1.3      cgd  * James W. Williams of NASA Goddard Space Flight Center.
      9   1.1      cgd  *
     10   1.1      cgd  * Redistribution and use in source and binary forms, with or without
     11   1.1      cgd  * modification, are permitted provided that the following conditions
     12   1.1      cgd  * are met:
     13   1.1      cgd  * 1. Redistributions of source code must retain the above copyright
     14   1.1      cgd  *    notice, this list of conditions and the following disclaimer.
     15   1.1      cgd  * 2. Redistributions in binary form must reproduce the above copyright
     16   1.1      cgd  *    notice, this list of conditions and the following disclaimer in the
     17   1.1      cgd  *    documentation and/or other materials provided with the distribution.
     18  1.18      agc  * 3. Neither the name of the University nor the names of its contributors
     19  1.18      agc  *    may be used to endorse or promote products derived from this software
     20  1.18      agc  *    without specific prior written permission.
     21  1.18      agc  *
     22  1.18      agc  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23  1.18      agc  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  1.18      agc  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  1.18      agc  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26  1.18      agc  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  1.18      agc  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  1.18      agc  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  1.18      agc  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  1.18      agc  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  1.18      agc  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  1.18      agc  * SUCH DAMAGE.
     33  1.18      agc  */
     34  1.18      agc 
     35  1.18      agc /*-
     36  1.18      agc  * Copyright (c) 1997 Jason R. Thorpe.  All rights reserved.
     37  1.18      agc  *
     38  1.18      agc  * This code is derived from software contributed to Berkeley by
     39  1.18      agc  * James W. Williams of NASA Goddard Space Flight Center.
     40  1.18      agc  *
     41  1.18      agc  * Redistribution and use in source and binary forms, with or without
     42  1.18      agc  * modification, are permitted provided that the following conditions
     43  1.18      agc  * are met:
     44  1.18      agc  * 1. Redistributions of source code must retain the above copyright
     45  1.18      agc  *    notice, this list of conditions and the following disclaimer.
     46  1.18      agc  * 2. Redistributions in binary form must reproduce the above copyright
     47  1.18      agc  *    notice, this list of conditions and the following disclaimer in the
     48  1.18      agc  *    documentation and/or other materials provided with the distribution.
     49   1.1      cgd  * 3. All advertising materials mentioning features or use of this software
     50   1.1      cgd  *    must display the following acknowledgement:
     51   1.1      cgd  *	This product includes software developed by the University of
     52   1.1      cgd  *	California, Berkeley and its contributors.
     53   1.1      cgd  * 4. Neither the name of the University nor the names of its contributors
     54   1.1      cgd  *    may be used to endorse or promote products derived from this software
     55   1.1      cgd  *    without specific prior written permission.
     56   1.1      cgd  *
     57   1.1      cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     58   1.1      cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     59   1.1      cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     60   1.1      cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     61   1.1      cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     62   1.1      cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     63   1.1      cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     64   1.1      cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     65   1.1      cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     66   1.1      cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     67   1.1      cgd  * SUCH DAMAGE.
     68   1.1      cgd  */
     69   1.1      cgd 
     70  1.20      jmc #if HAVE_NBTOOL_CONFIG_H
     71  1.20      jmc #include "nbtool_config.h"
     72  1.20      jmc #endif
     73  1.20      jmc 
     74  1.10    lukem #include <sys/cdefs.h>
     75  1.16    bjh21 #if defined(__COPYRIGHT) && !defined(lint)
     76  1.10    lukem __COPYRIGHT("@(#) Copyright (c) 1991, 1993\n\
     77  1.10    lukem 	The Regents of the University of California.  All rights reserved.\n");
     78   1.1      cgd #endif /* not lint */
     79   1.1      cgd 
     80  1.16    bjh21 #if defined(__RCSID) && !defined(lint)
     81   1.6    glass #if 0
     82   1.7      jtc static char sccsid[] = "@(#)cksum.c	8.2 (Berkeley) 4/28/95";
     83   1.6    glass #endif
     84  1.23  xtraeme __RCSID("$NetBSD: cksum.c,v 1.23 2005/01/20 15:44:59 xtraeme Exp $");
     85   1.1      cgd #endif /* not lint */
     86   1.1      cgd 
     87   1.1      cgd #include <sys/cdefs.h>
     88   1.1      cgd #include <sys/types.h>
     89   1.5  mycroft 
     90   1.5  mycroft #include <err.h>
     91   1.5  mycroft #include <errno.h>
     92   1.1      cgd #include <fcntl.h>
     93   1.9   kleink #include <locale.h>
     94   1.8  thorpej #include <md5.h>
     95  1.13   atatat #include <md4.h>
     96  1.13   atatat #include <md2.h>
     97  1.13   atatat #include <sha1.h>
     98  1.13   atatat #include <rmd160.h>
     99   1.1      cgd #include <stdio.h>
    100   1.1      cgd #include <stdlib.h>
    101   1.1      cgd #include <string.h>
    102   1.5  mycroft #include <unistd.h>
    103   1.5  mycroft 
    104   1.1      cgd #include "extern.h"
    105   1.1      cgd 
    106  1.13   atatat #define HASH_MD2	0
    107  1.13   atatat #define HASH_MD4	1
    108  1.13   atatat #define HASH_MD5	2
    109  1.13   atatat #define HASH_SHA1	3
    110  1.13   atatat #define HASH_RMD160	4
    111  1.13   atatat 
    112  1.13   atatat typedef char *(*_filefunc)(const char *, char *);
    113  1.13   atatat 
    114  1.13   atatat struct hash {
    115  1.13   atatat 	const char *progname;
    116  1.13   atatat 	const char *hashname;
    117  1.13   atatat 	void (*stringfunc)(const char *);
    118  1.13   atatat 	void (*timetrialfunc)(void);
    119  1.13   atatat 	void (*testsuitefunc)(void);
    120  1.13   atatat 	void (*filterfunc)(int);
    121  1.13   atatat 	char *(*filefunc)(const char *, char *);
    122  1.13   atatat } hashes[] = {
    123  1.13   atatat 	{ "md2", "MD2",
    124  1.13   atatat 	  MD2String, MD2TimeTrial, MD2TestSuite,
    125  1.13   atatat 	  MD2Filter, MD2File },
    126  1.13   atatat 	{ "md4", "MD4",
    127  1.13   atatat 	  MD4String, MD4TimeTrial, MD4TestSuite,
    128  1.13   atatat 	  MD4Filter, MD4File },
    129  1.13   atatat 	{ "md5", "MD5",
    130  1.13   atatat 	  MD5String, MD5TimeTrial, MD5TestSuite,
    131  1.13   atatat 	  MD5Filter, MD5File },
    132  1.13   atatat 	{ "sha1", "SHA1",
    133  1.13   atatat 	  SHA1String, SHA1TimeTrial, SHA1TestSuite,
    134  1.13   atatat 	  SHA1Filter, (_filefunc) SHA1File },
    135  1.13   atatat 	{ "rmd160", "RMD160",
    136  1.13   atatat 	  RMD160String, RMD160TimeTrial, RMD160TestSuite,
    137  1.13   atatat 	  RMD160Filter, (_filefunc) RMD160File },
    138  1.13   atatat 	{ NULL }
    139  1.13   atatat };
    140  1.13   atatat 
    141  1.23  xtraeme int	hash_digest_file(char *, struct hash *, int);
    142  1.23  xtraeme void	requirehash(const char *);
    143  1.23  xtraeme void	usage(void);
    144   1.3      cgd 
    145   1.3      cgd int
    146  1.22  xtraeme main(int argc, char **argv)
    147   1.1      cgd {
    148  1.13   atatat 	register int ch, fd, rval, dosum, pflag, nohashstdin;
    149  1.19   kleink 	u_int32_t val;
    150  1.19   kleink 	off_t len;
    151   1.1      cgd 	char *fn;
    152  1.13   atatat 	const char *progname;
    153  1.22  xtraeme 	int (*cfncn) (int, u_int32_t *, off_t *);
    154  1.22  xtraeme 	void (*pfncn) (char *, u_int32_t, off_t);
    155  1.13   atatat 	struct hash *hash;
    156  1.17   atatat 	int normal;
    157   1.1      cgd 
    158  1.10    lukem 	cfncn = NULL;
    159  1.10    lukem 	pfncn = NULL;
    160  1.13   atatat 	dosum = pflag = nohashstdin = 0;
    161  1.17   atatat 	normal = 0;
    162   1.9   kleink 
    163   1.9   kleink 	setlocale(LC_ALL, "");
    164   1.8  thorpej 
    165  1.13   atatat 	progname = getprogname();
    166  1.13   atatat 
    167  1.13   atatat 	for (hash = hashes; hash->hashname != NULL; hash++)
    168  1.13   atatat 		if (strcmp(progname, hash->progname) == 0)
    169  1.13   atatat 			break;
    170  1.13   atatat 
    171  1.13   atatat 	if (hash->hashname == NULL) {
    172  1.13   atatat 		hash = NULL;
    173  1.13   atatat 
    174  1.13   atatat 		if (!strcmp(progname, "sum")) {
    175  1.13   atatat 			dosum = 1;
    176  1.13   atatat 			cfncn = csum1;
    177  1.13   atatat 			pfncn = psum1;
    178  1.13   atatat 		} else {
    179  1.15   atatat 			cfncn = crc;
    180  1.13   atatat 			pfncn = pcrc;
    181  1.13   atatat 		}
    182   1.5  mycroft 	}
    183   1.5  mycroft 
    184  1.17   atatat 	while ((ch = getopt(argc, argv, "mno:ps:tx12456")) != -1)
    185   1.1      cgd 		switch(ch) {
    186  1.13   atatat 		case '2':
    187  1.13   atatat 			if (dosum) {
    188  1.13   atatat 				warnx("sum mutually exclusive with md2");
    189  1.13   atatat 				usage();
    190  1.13   atatat 			}
    191  1.13   atatat 			hash = &hashes[HASH_MD2];
    192  1.13   atatat 			break;
    193  1.13   atatat 		case '4':
    194  1.13   atatat 			if (dosum) {
    195  1.13   atatat 				warnx("sum mutually exclusive with md4");
    196  1.13   atatat 				usage();
    197  1.13   atatat 			}
    198  1.13   atatat 			hash = &hashes[HASH_MD4];
    199  1.13   atatat 			break;
    200   1.8  thorpej 		case 'm':
    201  1.13   atatat 		case '5':
    202   1.8  thorpej 			if (dosum) {
    203   1.8  thorpej 				warnx("sum mutually exclusive with md5");
    204   1.8  thorpej 				usage();
    205   1.8  thorpej 			}
    206  1.13   atatat 			hash = &hashes[HASH_MD5];
    207  1.13   atatat 			break;
    208  1.13   atatat 		case '1':
    209  1.13   atatat 			if (dosum) {
    210  1.13   atatat 				warnx("sum mutually exclusive with sha1");
    211  1.13   atatat 				usage();
    212  1.13   atatat 			}
    213  1.13   atatat 			hash = &hashes[HASH_SHA1];
    214  1.13   atatat 			break;
    215  1.13   atatat 		case '6':
    216  1.13   atatat 			if (dosum) {
    217  1.13   atatat 				warnx("sum mutually exclusive with rmd160");
    218  1.13   atatat 				usage();
    219  1.13   atatat 			}
    220  1.13   atatat 			hash = &hashes[HASH_RMD160];
    221   1.8  thorpej 			break;
    222  1.17   atatat 		case 'n':
    223  1.17   atatat 			normal = 1;
    224  1.17   atatat 			break;
    225   1.1      cgd 		case 'o':
    226  1.13   atatat 			if (hash) {
    227  1.13   atatat 				warnx("%s mutually exclusive with sum",
    228  1.13   atatat 				      hash->hashname);
    229   1.8  thorpej 				usage();
    230   1.8  thorpej 			}
    231   1.5  mycroft 			if (!strcmp(optarg, "1")) {
    232   1.1      cgd 				cfncn = csum1;
    233   1.1      cgd 				pfncn = psum1;
    234   1.5  mycroft 			} else if (!strcmp(optarg, "2")) {
    235   1.1      cgd 				cfncn = csum2;
    236   1.1      cgd 				pfncn = psum2;
    237   1.1      cgd 			} else {
    238   1.5  mycroft 				warnx("illegal argument to -o option");
    239   1.1      cgd 				usage();
    240   1.1      cgd 			}
    241   1.1      cgd 			break;
    242   1.8  thorpej 		case 'p':
    243  1.13   atatat 			if (hash == NULL)
    244  1.13   atatat 				requirehash("-p");
    245   1.8  thorpej 			pflag = 1;
    246   1.8  thorpej 			break;
    247   1.8  thorpej 		case 's':
    248  1.13   atatat 			if (hash == NULL)
    249  1.13   atatat 				requirehash("-s");
    250  1.13   atatat 			nohashstdin = 1;
    251  1.13   atatat 			hash->stringfunc(optarg);
    252   1.8  thorpej 			break;
    253   1.8  thorpej 		case 't':
    254  1.13   atatat 			if (hash == NULL)
    255  1.13   atatat 				requirehash("-t");
    256  1.13   atatat 			nohashstdin = 1;
    257  1.13   atatat 			hash->timetrialfunc();
    258   1.8  thorpej 			break;
    259   1.8  thorpej 		case 'x':
    260  1.13   atatat 			if (hash == NULL)
    261  1.13   atatat 				requirehash("-x");
    262  1.13   atatat 			nohashstdin = 1;
    263  1.13   atatat 			hash->testsuitefunc();
    264   1.8  thorpej 			break;
    265   1.1      cgd 		case '?':
    266   1.1      cgd 		default:
    267   1.1      cgd 			usage();
    268   1.1      cgd 		}
    269   1.1      cgd 	argc -= optind;
    270   1.1      cgd 	argv += optind;
    271   1.1      cgd 
    272   1.1      cgd 	fd = STDIN_FILENO;
    273   1.3      cgd 	fn = NULL;
    274   1.1      cgd 	rval = 0;
    275   1.1      cgd 	do {
    276   1.1      cgd 		if (*argv) {
    277   1.1      cgd 			fn = *argv++;
    278  1.13   atatat 			if (hash != NULL) {
    279  1.17   atatat 				if (hash_digest_file(fn, hash, normal)) {
    280   1.8  thorpej 					warn("%s", fn);
    281   1.8  thorpej 					rval = 1;
    282   1.8  thorpej 				}
    283   1.8  thorpej 				continue;
    284   1.8  thorpej 			}
    285   1.1      cgd 			if ((fd = open(fn, O_RDONLY, 0)) < 0) {
    286   1.5  mycroft 				warn("%s", fn);
    287   1.1      cgd 				rval = 1;
    288   1.1      cgd 				continue;
    289   1.1      cgd 			}
    290  1.13   atatat 		} else if (hash && !nohashstdin) {
    291  1.13   atatat 			hash->filterfunc(pflag);
    292  1.13   atatat 		}
    293   1.8  thorpej 
    294  1.13   atatat 		if (hash == NULL) {
    295   1.8  thorpej 			if (cfncn(fd, &val, &len)) {
    296   1.8  thorpej 				warn("%s", fn ? fn : "stdin");
    297   1.8  thorpej 				rval = 1;
    298   1.8  thorpej 			} else
    299   1.8  thorpej 				pfncn(fn, val, len);
    300   1.8  thorpej 			(void)close(fd);
    301   1.1      cgd 		}
    302   1.1      cgd 	} while (*argv);
    303   1.1      cgd 	exit(rval);
    304   1.1      cgd }
    305   1.1      cgd 
    306   1.8  thorpej int
    307  1.22  xtraeme hash_digest_file(char *fn, struct hash *hash, int normal)
    308   1.8  thorpej {
    309  1.13   atatat 	char buf[41], *cp;
    310   1.8  thorpej 
    311  1.13   atatat 	cp = hash->filefunc(fn, buf);
    312   1.8  thorpej 	if (cp == NULL)
    313  1.22  xtraeme 		return 1;
    314   1.8  thorpej 
    315  1.17   atatat 	if (normal)
    316  1.17   atatat 		printf("%s %s\n", cp, fn);
    317  1.17   atatat 	else
    318  1.17   atatat 		printf("%s (%s) = %s\n", hash->hashname, fn, cp);
    319  1.22  xtraeme 	return 0;
    320   1.8  thorpej }
    321   1.8  thorpej 
    322   1.8  thorpej void
    323  1.22  xtraeme requirehash(const char *flg)
    324   1.8  thorpej {
    325  1.13   atatat 	warnx("%s flag requires `md2', `md4', `md5', `sha1', or `rmd160'",
    326  1.13   atatat 	    flg);
    327   1.8  thorpej 	usage();
    328   1.8  thorpej }
    329   1.8  thorpej 
    330   1.3      cgd void
    331  1.22  xtraeme usage(void)
    332   1.1      cgd {
    333   1.5  mycroft 
    334  1.21      wiz 	(void)fprintf(stderr, "usage: cksum [-n] [-m | -1 | -2 | -4 | -5 | -6 | [-o 1 | 2]] [file ...]\n");
    335   1.8  thorpej 	(void)fprintf(stderr, "       sum [file ...]\n");
    336   1.8  thorpej 	(void)fprintf(stderr,
    337  1.17   atatat 	    "       md2 [-n] [-p | -t | -x | -s string] [file ...]\n");
    338  1.13   atatat 	(void)fprintf(stderr,
    339  1.17   atatat 	    "       md4 [-n] [-p | -t | -x | -s string] [file ...]\n");
    340  1.13   atatat 	(void)fprintf(stderr,
    341  1.17   atatat 	    "       md5 [-n] [-p | -t | -x | -s string] [file ...]\n");
    342  1.13   atatat 	(void)fprintf(stderr,
    343  1.17   atatat 	    "       sha1 [-n] [-p | -t | -x | -s string] [file ...]\n");
    344  1.13   atatat 	(void)fprintf(stderr,
    345  1.17   atatat 	    "       rmd160 [-n] [-p | -t | -x | -s string] [file ...]\n");
    346   1.1      cgd 	exit(1);
    347   1.1      cgd }
    348