busybox/coreutils/sum.c

/* vi: set sw=4 ts=4: */
/*
 * sum -- checksum and count the blocks in a file
 *     Like BSD sum or SysV sum -r, except like SysV sum if -s option is given.
 *
 * Copyright (C) 86, 89, 91, 1995-2002, 2004 Free Software Foundation, Inc.
 * Copyright (C) 2005 by Erik Andersen <andersen@codepoet.org>
 * Copyright (C) 2005 by Mike Frysinger <vapier@gentoo.org>
 *
 * Written by Kayvan Aghaiepour and David MacKenzie
 * Taken from coreutils and turned into a busybox applet by Mike Frysinger
 *
 * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
 */

#include "libbb.h"

enum { SUM_BSD, PRINT_NAME, SUM_SYSV };

/* BSD: calculate and print the rotated checksum and the size in 1K blocks
   The checksum varies depending on sizeof (int). */
/* SYSV: calculate and print the checksum and the size in 512-byte blocks */
/* Return 1 if successful.  */
static unsigned sum_file(const char *file, unsigned type)
{
#define buf bb_common_bufsiz1
	unsigned long long total_bytes = 0;
	int fd, r;
	/* The sum of all the input bytes, modulo (UINT_MAX + 1).  */
	unsigned s = 0;

	fd = open_or_warn_stdin(file);
	if (fd == -1)
		return 0;

	while (1) {
		size_t bytes_read = safe_read(fd, buf, BUFSIZ);

		if ((ssize_t)bytes_read <= 0) {
			r = (fd && close(fd) != 0);
			if (!bytes_read && !r)
				/* no error */
				break;
			bb_simple_perror_msg(file);
			return 0;
		}

		total_bytes += bytes_read;
		if (type >= SUM_SYSV) {
			do s += buf[--bytes_read]; while (bytes_read);
		} else {
			r = 0;
			do {
				s = (s >> 1) + ((s & 1) << 15);
				s += buf[r++];
				s &= 0xffff; /* Keep it within bounds. */
			} while (--bytes_read);
		}
	}

	if (type < PRINT_NAME)
		file = "";
	if (type >= SUM_SYSV) {
		r = (s & 0xffff) + ((s & 0xffffffff) >> 16);
		s = (r & 0xffff) + (r >> 16);
		printf("%d %llu %s\n", s, (total_bytes + 511) / 512, file);
	} else
		printf("%05d %5llu %s\n", s, (total_bytes + 1023) / 1024, file);
	return 1;
#undef buf
}

int sum_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int sum_main(int argc UNUSED_PARAM, char **argv)
{
	unsigned n;
	unsigned type = SUM_BSD;

	n = getopt32(argv, "sr");
	argv += optind;
	if (n & 1) type = SUM_SYSV;
	/* give the bsd priority over sysv func */
	if (n & 2) type = SUM_BSD;

	if (!argv[0]) {
		/* Do not print the name */
		n = sum_file("-", type);
	} else {
		/* Need to print the name if either
		   - more than one file given
		   - doing sysv */
		type += (argv[1] || type == SUM_SYSV);
		n = 1;
		do {
			n &= sum_file(*argv, type);
		} while (*++argv);
	}
	return !n;
}
1	niro	532	/* vi: set sw=4 ts=4: */
2			/*
3			* sum -- checksum and count the blocks in a file
4			* Like BSD sum or SysV sum -r, except like SysV sum if -s option is given.
5			*
6			* Copyright (C) 86, 89, 91, 1995-2002, 2004 Free Software Foundation, Inc.
7			* Copyright (C) 2005 by Erik Andersen <andersen@codepoet.org>
8			* Copyright (C) 2005 by Mike Frysinger <vapier@gentoo.org>
9			*
10			* Written by Kayvan Aghaiepour and David MacKenzie
11			* Taken from coreutils and turned into a busybox applet by Mike Frysinger
12			*
13			* Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
14			*/
15
16	niro	816	#include "libbb.h"
17	niro	532
18	niro	816	enum { SUM_BSD, PRINT_NAME, SUM_SYSV };
19	niro	532
20			/* BSD: calculate and print the rotated checksum and the size in 1K blocks
21			The checksum varies depending on sizeof (int). */
22			/* SYSV: calculate and print the checksum and the size in 512-byte blocks */
23			/* Return 1 if successful. */
24	niro	816	static unsigned sum_file(const char *file, unsigned type)
25	niro	532	{
26			#define buf bb_common_bufsiz1
27	niro	816	unsigned long long total_bytes = 0;
28			int fd, r;
29	niro	532	/* The sum of all the input bytes, modulo (UINT_MAX + 1). */
30			unsigned s = 0;
31
32	niro	816	fd = open_or_warn_stdin(file);
33			if (fd == -1)
34			return 0;
35	niro	532
36			while (1) {
37			size_t bytes_read = safe_read(fd, buf, BUFSIZ);
38
39			if ((ssize_t)bytes_read <= 0) {
40			r = (fd && close(fd) != 0);
41			if (!bytes_read && !r)
42			/* no error */
43			break;
44	niro	984	bb_simple_perror_msg(file);
45	niro	532	return 0;
46			}
47
48			total_bytes += bytes_read;
49	niro	816	if (type >= SUM_SYSV) {
50	niro	532	do s += buf[--bytes_read]; while (bytes_read);
51			} else {
52			r = 0;
53			do {
54			s = (s >> 1) + ((s & 1) << 15);
55			s += buf[r++];
56			s &= 0xffff; /* Keep it within bounds. */
57			} while (--bytes_read);
58			}
59			}
60
61	niro	816	if (type < PRINT_NAME)
62			file = "";
63			if (type >= SUM_SYSV) {
64	niro	532	r = (s & 0xffff) + ((s & 0xffffffff) >> 16);
65			s = (r & 0xffff) + (r >> 16);
66	niro	816	printf("%d %llu %s\n", s, (total_bytes + 511) / 512, file);
67	niro	532	} else
68	niro	816	printf("%05d %5llu %s\n", s, (total_bytes + 1023) / 1024, file);
69	niro	532	return 1;
70			#undef buf
71			}
72
73	niro	816	int sum_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
74			int sum_main(int argc UNUSED_PARAM, char **argv)
75	niro	532	{
76	niro	816	unsigned n;
77			unsigned type = SUM_BSD;
78	niro	532
79	niro	816	n = getopt32(argv, "sr");
80			argv += optind;
81			if (n & 1) type = SUM_SYSV;
82	niro	532	/* give the bsd priority over sysv func */
83	niro	816	if (n & 2) type = SUM_BSD;
84	niro	532
85	niro	816	if (!argv[0]) {
86			/* Do not print the name */
87			n = sum_file("-", type);
88			} else {
89			/* Need to print the name if either
90			- more than one file given
91			- doing sysv */
92			type += (argv[1] \|\| type == SUM_SYSV);
93			n = 1;
94			do {
95			n &= sum_file(*argv, type);
96			} while (*++argv);
97			}
98	niro	532	return !n;
99			}