- add libbb function str_tolower to convert a string to lowercase.
[oweals/busybox.git] / coreutils / md5_sha1_sum.c
index 064340f2564656617e475fe117a2ec61734086a8..417e90b00d96c36a07fa7ca2d0dd493a5c1d3486 100644 (file)
@@ -1,3 +1,4 @@
+/* vi: set sw=4 ts=4: */
 /*
  *  Copyright (C) 2003 Glenn L. McGrath
  *  Copyright (C) 2003-2004 Erik Andersen
@@ -5,16 +6,9 @@
  * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
  */
 
-#include <fcntl.h>
-#include <limits.h>
-#include <stdio.h>
-#include <stdint.h>
-#include <stdlib.h>
-#include <string.h>
-#include <unistd.h>
-
 #include "busybox.h"
 
+typedef enum { HASH_SHA1, HASH_MD5 } hash_algo_t;
 
 #define FLAG_SILENT    1
 #define FLAG_CHECK     2
 
 /* This might be useful elsewhere */
 static unsigned char *hash_bin_to_hex(unsigned char *hash_value,
-                                                                         unsigned char hash_length)
+                               unsigned hash_length)
 {
-       int x, len, max;
-       unsigned char *hex_value;
-
-       max = (hash_length * 2) + 2;
-       hex_value = xmalloc(max);
-       for (x = len = 0; x < hash_length; x++) {
-               len += snprintf((char*)(hex_value + len), max - len, "%02x", hash_value[x]);
-       }
-       return (hex_value);
+       /* xzalloc zero-terminates */
+       char *hex_value = xzalloc((hash_length * 2) + 1);
+       bin2hex(hex_value, (char*)hash_value, hash_length);
+       return hex_value;
 }
 
-static uint8_t *hash_file(const char *filename, uint8_t hash_algo)
+static uint8_t *hash_file(const char *filename, hash_algo_t hash_algo)
 {
-       int src_fd = strcmp(filename, "-") == 0 ? STDIN_FILENO :
-               open(filename, O_RDONLY);
-       if (src_fd == -1) {
-               bb_perror_msg("%s", filename);
-               return NULL;
+       int src_fd, hash_len, count;
+       union _ctx_ {
+               sha1_ctx_t sha1;
+               md5_ctx_t md5;
+       } context;
+       uint8_t *hash_value = NULL;
+       RESERVE_CONFIG_UBUFFER(in_buf, 4096);
+       void (*update)(const void*, size_t, void*);
+       void (*final)(void*, void*);
+
+       src_fd = STDIN_FILENO;
+       if (NOT_LONE_DASH(filename)) {
+               src_fd = open(filename, O_RDONLY);
+               if (src_fd < 0) {
+                       bb_perror_msg("%s", filename);
+                       return NULL;
+               }
+       }
+
+       /* figure specific hash algorithims */
+       if (ENABLE_MD5SUM && hash_algo==HASH_MD5) {
+               md5_begin(&context.md5);
+               update = (void (*)(const void*, size_t, void*))md5_hash;
+               final = (void (*)(void*, void*))md5_end;
+               hash_len = 16;
+       } else if (ENABLE_SHA1SUM && hash_algo==HASH_SHA1) {
+               sha1_begin(&context.sha1);
+               update = (void (*)(const void*, size_t, void*))sha1_hash;
+               final = (void (*)(void*, void*))sha1_end;
+               hash_len = 20;
        } else {
-               uint8_t *hash_value;
-               RESERVE_CONFIG_UBUFFER(hash_value_bin, 20);
-               hash_value = hash_fd(src_fd, -1, hash_algo, hash_value_bin) != -2 ?
-                       hash_bin_to_hex(hash_value_bin, hash_algo == HASH_MD5 ? 16 : 20) :
-                       NULL;
-               RELEASE_CONFIG_BUFFER(hash_value_bin);
+               bb_error_msg_and_die("algorithm not supported");
+       }
+
+       while (0 < (count = safe_read(src_fd, in_buf, 4096))) {
+               update(in_buf, count, &context);
+       }
+
+       if (count == 0) {
+               final(in_buf, &context);
+               hash_value = hash_bin_to_hex(in_buf, hash_len);
+       }
+
+       RELEASE_CONFIG_BUFFER(in_buf);
+
+       if (src_fd != STDIN_FILENO) {
                close(src_fd);
-               return hash_value;
        }
+
+       return hash_value;
 }
 
-/* This could become a common function for md5 as well, by using md5_stream */
-static int hash_files(int argc, char **argv, const uint8_t hash_algo)
+int md5_sha1_sum_main(int argc, char **argv);
+int md5_sha1_sum_main(int argc, char **argv)
 {
        int return_value = EXIT_SUCCESS;
        uint8_t *hash_value;
+       unsigned flags;
+       hash_algo_t hash_algo = ENABLE_MD5SUM
+               ? (ENABLE_SHA1SUM ? (**argv=='m' ? HASH_MD5 : HASH_SHA1) : HASH_MD5)
+               : HASH_SHA1;
 
-#ifdef CONFIG_FEATURE_MD5_SHA1_SUM_CHECK
-       unsigned int flags;
+       if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK)
+               flags = getopt32(argc, argv, "scw");
+       else optind = 1;
 
-       flags = bb_getopt_ulflags(argc, argv, "scw");
-#endif
-
-#ifdef CONFIG_FEATURE_MD5_SHA1_SUM_CHECK
-       if (!(flags & FLAG_CHECK)) {
+       if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && !(flags & FLAG_CHECK)) {
                if (flags & FLAG_SILENT) {
                        bb_error_msg_and_die
-                               ("the -s option is meaningful only when verifying checksums");
+                               ("-%c is meaningful only when verifying checksums", 's');
                } else if (flags & FLAG_WARN) {
                        bb_error_msg_and_die
-                               ("the -w option is meaningful only when verifying checksums");
+                               ("-%c is meaningful only when verifying checksums", 'w');
                }
        }
-#endif
 
        if (argc == optind) {
-               argv[argc++] = "-";
+               argv[argc++] = (char*)"-";
        }
-#ifdef CONFIG_FEATURE_MD5_SHA1_SUM_CHECK
-       if (flags & FLAG_CHECK) {
+
+       if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && (flags & FLAG_CHECK)) {
                FILE *pre_computed_stream;
                int count_total = 0;
                int count_failed = 0;
@@ -94,20 +118,23 @@ static int hash_files(int argc, char **argv, const uint8_t hash_algo)
                                ("only one argument may be specified when using -c");
                }
 
-               if (strcmp(file_ptr, "-") == 0) {
-                       pre_computed_stream = stdin;
-               } else {
-                       pre_computed_stream = bb_xfopen(file_ptr, "r");
+               pre_computed_stream = stdin;
+               if (NOT_LONE_DASH(file_ptr)) {
+                       pre_computed_stream = xfopen(file_ptr, "r");
                }
 
-               while ((line = bb_get_chomped_line_from_file(pre_computed_stream)) != NULL) {
+               while ((line = xmalloc_getline(pre_computed_stream)) != NULL) {
                        char *filename_ptr;
 
                        count_total++;
                        filename_ptr = strstr(line, "  ");
+                       /* handle format for binary checksums */
+                       if (filename_ptr == NULL) {
+                               filename_ptr = strstr(line, " *");
+                       }
                        if (filename_ptr == NULL) {
                                if (flags & FLAG_WARN) {
-                                       bb_error_msg("Invalid format");
+                                       bb_error_msg("invalid format");
                                }
                                count_failed++;
                                return_value = EXIT_FAILURE;
@@ -136,21 +163,12 @@ static int hash_files(int argc, char **argv, const uint8_t hash_algo)
                        bb_error_msg("WARNING: %d of %d computed checksums did NOT match",
                                                 count_failed, count_total);
                }
-               if (bb_fclose_nonstdin(pre_computed_stream) == EOF) {
-                       bb_perror_msg_and_die("Couldnt close file %s", file_ptr);
+               /*
+               if (fclose_if_not_stdin(pre_computed_stream) == EOF) {
+                       bb_perror_msg_and_die("cannot close file %s", file_ptr);
                }
-       } else
-#endif
-       {
-               uint8_t hash_length;
-
-               if (hash_algo == HASH_MD5) {
-                       hash_length = 16;
-               } else {
-                       hash_length = 20;
-               }
-               hash_value = xmalloc(hash_length);
-
+               */
+       } else {
                while (optind < argc) {
                        char *file_ptr = argv[optind++];
 
@@ -163,19 +181,5 @@ static int hash_files(int argc, char **argv, const uint8_t hash_algo)
                        }
                }
        }
-       return (return_value);
-}
-
-#ifdef CONFIG_MD5SUM
-int md5sum_main(int argc, char **argv)
-{
-       return(hash_files(argc, argv, HASH_MD5));
-}
-#endif
-
-#ifdef CONFIG_SHA1SUM
-int sha1sum_main(int argc, char **argv)
-{
-       return(hash_files(argc, argv, HASH_SHA1));
+       return return_value;
 }
-#endif