- add libbb function str_tolower to convert a string to lowercase.
[oweals/busybox.git] / coreutils / md5_sha1_sum.c
index 42a1d7acfff8c82ad1a2d2feb6aab821a2321117..417e90b00d96c36a07fa7ca2d0dd493a5c1d3486 100644 (file)
+/* vi: set sw=4 ts=4: */
 /*
  *  Copyright (C) 2003 Glenn L. McGrath
- *  Copyright (C) 2003 Erik Andersen
- * 
- *  This program is free software; you can redistribute it and/or modify
- *  it under the terms of the GNU General Public License as published by
- *  the Free Software Foundation; either version 2 of the License, or
- *  (at your option) any later version.
+ *  Copyright (C) 2003-2004 Erik Andersen
  *
- *  This program is distributed in the hope that it will be useful,
- *  but WITHOUT ANY WARRANTY; without even the implied warranty of
- *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
- *  GNU General Public License for more details.
- *
- *  You should have received a copy of the GNU General Public License
- *  along with this program; if not, write to the Free Software
- *  Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ * 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
 #define FLAG_WARN      4
 
-/* This might be usefull elsewhere */
+/* 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(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)
 {
-       uint8_t *hash_value_bin;
+       int src_fd, hash_len, count;
+       union _ctx_ {
+               sha1_ctx_t sha1;
+               md5_ctx_t md5;
+       } context;
        uint8_t *hash_value = NULL;
-       uint8_t hash_length;
-       int src_fd;
+       RESERVE_CONFIG_UBUFFER(in_buf, 4096);
+       void (*update)(const void*, size_t, void*);
+       void (*final)(void*, void*);
 
-       if (strcmp(filename, "-") == 0) {
-               src_fd = fileno(stdin);
-       } else {
+       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;
+               }
        }
 
-       if (hash_algo == HASH_MD5) {
-               hash_length = 16;
+       /* 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 {
-               hash_length = 20;
+               bb_error_msg_and_die("algorithm not supported");
        }
 
-       hash_value_bin = xmalloc(hash_length);
+       while (0 < (count = safe_read(src_fd, in_buf, 4096))) {
+               update(in_buf, count, &context);
+       }
 
-       if ((src_fd != -1) && (hash_fd(src_fd, -1, hash_algo, hash_value_bin) != -2)) {
-               hash_value = hash_bin_to_hex(hash_value_bin, hash_length);
-       } else {
-               bb_perror_msg("%s", filename);
+       if (count == 0) {
+               final(in_buf, &context);
+               hash_value = hash_bin_to_hex(in_buf, hash_len);
        }
 
-       close(src_fd);
+       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 */
-extern 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;
-
-       flags = bb_getopt_ulflags(argc, argv, "scw");
-#endif
+       if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK)
+               flags = getopt32(argc, argv, "scw");
+       else optind = 1;
 
-#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;
-               unsigned char *file_ptr = argv[optind];
+               char *file_ptr = argv[optind];
                char *line;
 
                if (optind + 1 != argc) {
@@ -119,21 +118,26 @@ extern 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;
                                free(line);
                                continue;
                        }
@@ -142,63 +146,40 @@ extern int hash_files(int argc, char **argv, const uint8_t hash_algo)
 
                        hash_value = hash_file(filename_ptr, hash_algo);
 
-                       if (hash_value && (strcmp(hash_value, line) == 0)) {
-                               printf("%s: OK\n", filename_ptr);
+                       if (hash_value && (strcmp((char*)hash_value, line) == 0)) {
+                               if (!(flags & FLAG_SILENT))
+                                       printf("%s: OK\n", filename_ptr);
                        } else {
-                               printf("%s: FAILED\n", filename_ptr);
+                               if (!(flags & FLAG_SILENT))
+                                       printf("%s: FAILED\n", filename_ptr);
                                count_failed++;
+                               return_value = EXIT_FAILURE;
                        }
                        /* possible free(NULL) */
                        free(hash_value);
                        free(line);
                }
-               if (count_failed) {
+               if (count_failed && !(flags & FLAG_SILENT)) {
                        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) {
-                       unsigned char *file_ptr = argv[optind++];
+                       char *file_ptr = argv[optind++];
 
                        hash_value = hash_file(file_ptr, hash_algo);
                        if (hash_value == NULL) {
-                               return_value++;
+                               return_value = EXIT_FAILURE;
                        } else {
-#ifdef CONFIG_FEATURE_MD5_SHA1_SUM_CHECK
-                               if (!flags & FLAG_SILENT)
-#endif
-                                       printf("%s  %s\n", hash_value, file_ptr);
+                               printf("%s  %s\n", hash_value, file_ptr);
                                free(hash_value);
                        }
                }
        }
-       return (return_value);
-}
-
-#ifdef CONFIG_MD5SUM
-extern int md5sum_main(int argc, char **argv)
-{
-       return(hash_files(argc, argv, HASH_MD5));
-}
-#endif
-
-#ifdef CONFIG_SHA1SUM
-extern int sha1sum_main(int argc, char **argv)
-{
-       return(hash_files(argc, argv, HASH_SHA1));
+       return return_value;
 }
-#endif