hush: move testsuite files from hush-bugs to hush-parsing
[oweals/busybox.git] / coreutils / sum.c
index 70b9b3a0aaca569fb39c21939a2370af22ee1377..9327ca55e3c9b40975e6f308bd8a357753c53f07 100644 (file)
  * Written by Kayvan Aghaiepour and David MacKenzie
  * Taken from coreutils and turned into a busybox applet by Mike Frysinger
  *
- * Licensed under the GPL v2, see the file LICENSE in this tarball.
+ * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
  */
 
-#include <stdio.h>
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-#include <unistd.h>
-#include <getopt.h>
-
 #include "busybox.h"
 
-/* 1 if any of the files read were the standard input */
-static int have_read_stdin;
-
-/* make a little more readable and avoid using strcmp for just 2 bytes */
-#define IS_STDIN(s) (s[0] == '-' && s[1] == '\0')
-
-/* Calculate and print the rotated checksum and the size in 1K blocks
-   of file FILE, or of the standard input if FILE is "-".
-   If PRINT_NAME is >1, print FILE next to the checksum and size.
-   The checksum varies depending on sizeof (int).
-   Return 1 if successful.  */
-static int bsd_sum_file(const char *file, int print_name)
-{
-       register FILE *fp;
-       register int checksum = 0;          /* The checksum mod 2^16. */
-       register uintmax_t total_bytes = 0; /* The number of bytes. */
-       register int ch;                    /* Each character read. */
-
-       if (IS_STDIN(file)) {
-               fp = stdin;
-               have_read_stdin = 1;
-       } else {
-               fp = bb_wfopen(file, "r");
-               if (fp == NULL)
-                       return 0;
-       }
-
-       while ((ch = getc(fp)) != EOF) {
-               ++total_bytes;
-               checksum = (checksum >> 1) + ((checksum & 1) << 15);
-               checksum += ch;
-               checksum &= 0xffff;             /* Keep it within bounds. */
-       }
-
-       if (ferror(fp)) {
-               bb_perror_msg(file);
-               bb_fclose_nonstdin(fp);
-               return 0;
-       }
-
-       if (bb_fclose_nonstdin(fp) == EOF) {
-               bb_perror_msg(file);
-               return 0;
-       }
-
-       printf("%05d %5s ", checksum,
-              make_human_readable_str(total_bytes, 1, 1024));
-       if (print_name > 1)
-               puts(file);
-       else
-               printf("\n");
-
-       return 1;
-}
+enum { SUM_BSD, PRINT_NAME, SUM_SYSV };
 
-/* Calculate and print the checksum and the size in 512-byte blocks
-   of file FILE, or of the standard input if FILE is "-".
-   If PRINT_NAME is >0, print FILE next to the checksum and size.
-   Return 1 if successful.  */
-static int sysv_sum_file(const char *file, int print_name)
+/* 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, const unsigned type)
 {
-#define MY_BUF_SIZE 8192
-       int fd;
-       unsigned char buf[MY_BUF_SIZE];
+#define buf bb_common_bufsiz1
        uintmax_t total_bytes = 0;
-       int checksum;
+       int fd = 0, r;
 
        /* The sum of all the input bytes, modulo (UINT_MAX + 1).  */
-       unsigned int s = 0;
+       unsigned s = 0;
 
-       if (IS_STDIN(file)) {
-               fd = 0;
-               have_read_stdin = 1;
-       } else {
+       if (NOT_LONE_DASH(file)) {
                fd = open(file, O_RDONLY);
-               if (fd == -1) {
-                       bb_perror_msg(file);
-                       return 0;
-               }
+               if (fd == -1)
+                       goto ret_bad;
        }
 
        while (1) {
-               size_t i;
-               size_t bytes_read = safe_read(fd, buf, MY_BUF_SIZE);
-
-               if (bytes_read == 0)
-                       break;
-
-               if (bytes_read == -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;
+ ret_bad:
                        bb_perror_msg(file);
-                       if (!IS_STDIN(file))
-                               close(fd);
                        return 0;
                }
 
-               for (i = 0; i < bytes_read; i++)
-                       s += buf[i];
                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 (!IS_STDIN(file) && close(fd) == -1) {
-               bb_perror_msg(file);
-               return 0;
-       }
-
-       {
-               int r = (s & 0xffff) + ((s & 0xffffffff) >> 16);
-               checksum = (r & 0xffff) + (r >> 16);
-       }
-
-       printf("%d %s ", checksum,
-              make_human_readable_str(total_bytes, 1, 512));
-       puts(print_name ? file : "");
-
+       if (type < PRINT_NAME)
+               file = "";
+       if (type >= SUM_SYSV) {
+               r = (s & 0xffff) + ((s & 0xffffffff) >> 16);
+               s = (r & 0xffff) + (r >> 16);
+               printf("%d %ju %s\n", s, (total_bytes+511)/512, file);
+       } else
+               printf("%05d %5ju %s\n", s, (total_bytes+1023)/1024, file);
        return 1;
+#undef buf
 }
 
+int sum_main(int argc, char **argv);
 int sum_main(int argc, char **argv)
 {
-       int flags;
-       int ok;
-       int files_given;
-       int (*sum_func)(const char *, int) = bsd_sum_file;
+       unsigned n;
+       unsigned type = SUM_BSD;
 
-       /* give the bsd func priority over sysv func */
-       flags = bb_getopt_ulflags(argc, argv, "sr");
-       if (flags & 1)
-               sum_func = sysv_sum_file;
-       if (flags & 2)
-               sum_func = bsd_sum_file;
+       n = getopt32(argc, argv, "sr");
+       if (n & 1) type = SUM_SYSV;
+       /* give the bsd priority over sysv func */
+       if (n & 2) type = SUM_BSD;
 
-       have_read_stdin = 0;
-       files_given = argc - optind;
-       if (files_given <= 0)
-               ok = sum_func("-", files_given);
-       else
-               for (ok = 1; optind < argc; optind++)
-                       ok &= sum_func(argv[optind], files_given);
-
-       if (have_read_stdin && fclose(stdin) == EOF)
-               bb_perror_msg_and_die("-");
-
-       exit(ok ? EXIT_SUCCESS : EXIT_FAILURE);
+       if (argc == optind) {
+               /* 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 += argc - 1 > optind || type == SUM_SYSV;
+               for (n = 1; optind < argc; optind++)
+                       n &= sum_file(argv[optind], type);
+       }
+       return !n;
 }