busybox/coreutils/md5_sha1_sum.c

/* vi: set sw=4 ts=4: */
/*
 *  Copyright (C) 2003 Glenn L. McGrath
 *  Copyright (C) 2003-2004 Erik Andersen
 *
 * Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
 */

#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 useful elsewhere */
static unsigned char *hash_bin_to_hex(unsigned char *hash_value,
				unsigned hash_length)
{
	/* 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, hash_algo_t hash_algo)
{
	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 {
		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;
}

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;

	if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK)
		flags = getopt32(argc, argv, "scw");
	else optind = 1;

	if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && !(flags & FLAG_CHECK)) {
		if (flags & FLAG_SILENT) {
			bb_error_msg_and_die
				("-%c is meaningful only when verifying checksums", 's');
		} else if (flags & FLAG_WARN) {
			bb_error_msg_and_die
				("-%c is meaningful only when verifying checksums", 'w');
		}
	}

	if (argc == optind) {
		argv[argc++] = "-";
	}

	if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && (flags & FLAG_CHECK)) {
		FILE *pre_computed_stream;
		int count_total = 0;
		int count_failed = 0;
		char *file_ptr = argv[optind];
		char *line;

		if (optind + 1 != argc) {
			bb_error_msg_and_die
				("only one argument may be specified when using -c");
		}

		pre_computed_stream = stdin;
		if (NOT_LONE_DASH(file_ptr)) {
			pre_computed_stream = xfopen(file_ptr, "r");
		}

		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");
				}
				count_failed++;
				return_value = EXIT_FAILURE;
				free(line);
				continue;
			}
			*filename_ptr = '\0';
			filename_ptr += 2;

			hash_value = hash_file(filename_ptr, hash_algo);

			if (hash_value && (strcmp((char*)hash_value, line) == 0)) {
				if (!(flags & FLAG_SILENT))
					printf("%s: OK\n", filename_ptr);
			} else {
				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 && !(flags & FLAG_SILENT)) {
			bb_error_msg("WARNING: %d of %d computed checksums did NOT match",
						 count_failed, count_total);
		}
		/*
		if (fclose_if_not_stdin(pre_computed_stream) == EOF) {
			bb_perror_msg_and_die("cannot close file %s", file_ptr);
		}
		*/
	} else {
		while (optind < argc) {
			char *file_ptr = argv[optind++];

			hash_value = hash_file(file_ptr, hash_algo);
			if (hash_value == NULL) {
				return_value = EXIT_FAILURE;
			} else {
				printf("%s  %s\n", hash_value, file_ptr);
				free(hash_value);
			}
		}
	}
	return return_value;
}
1	niro	532	/* vi: set sw=4 ts=4: */
2			/*
3			* Copyright (C) 2003 Glenn L. McGrath
4			* Copyright (C) 2003-2004 Erik Andersen
5			*
6			* Licensed under the GPL v2 or later, see the file LICENSE in this tarball.
7			*/
8
9			#include "busybox.h"
10
11			typedef enum { HASH_SHA1, HASH_MD5 } hash_algo_t;
12
13			#define FLAG_SILENT 1
14			#define FLAG_CHECK 2
15			#define FLAG_WARN 4
16
17			/* This might be useful elsewhere */
18			static unsigned char hash_bin_to_hex(unsigned char hash_value,
19			unsigned hash_length)
20			{
21			/* xzalloc zero-terminates */
22			char hex_value = xzalloc((hash_length 2) + 1);
23			bin2hex(hex_value, (char*)hash_value, hash_length);
24			return hex_value;
25			}
26
27			static uint8_t hash_file(const char filename, hash_algo_t hash_algo)
28			{
29			int src_fd, hash_len, count;
30			union _ctx_ {
31			sha1_ctx_t sha1;
32			md5_ctx_t md5;
33			} context;
34			uint8_t *hash_value = NULL;
35			RESERVE_CONFIG_UBUFFER(in_buf, 4096);
36			void (update)(const void, size_t, void*);
37			void (final)(void, void*);
38
39			src_fd = STDIN_FILENO;
40			if (NOT_LONE_DASH(filename)) {
41			src_fd = open(filename, O_RDONLY);
42			if (src_fd < 0) {
43			bb_perror_msg("%s", filename);
44			return NULL;
45			}
46			}
47
48			/* figure specific hash algorithims */
49			if (ENABLE_MD5SUM && hash_algo==HASH_MD5) {
50			md5_begin(&context.md5);
51			update = (void ()(const void, size_t, void*))md5_hash;
52			final = (void ()(void, void*))md5_end;
53			hash_len = 16;
54			} else if (ENABLE_SHA1SUM && hash_algo==HASH_SHA1) {
55			sha1_begin(&context.sha1);
56			update = (void ()(const void, size_t, void*))sha1_hash;
57			final = (void ()(void, void*))sha1_end;
58			hash_len = 20;
59			} else {
60			bb_error_msg_and_die("algorithm not supported");
61			}
62
63			while (0 < (count = safe_read(src_fd, in_buf, 4096))) {
64			update(in_buf, count, &context);
65			}
66
67			if (count == 0) {
68			final(in_buf, &context);
69			hash_value = hash_bin_to_hex(in_buf, hash_len);
70			}
71
72			RELEASE_CONFIG_BUFFER(in_buf);
73
74			if (src_fd != STDIN_FILENO) {
75			close(src_fd);
76			}
77
78			return hash_value;
79			}
80
81			int md5_sha1_sum_main(int argc, char **argv)
82			{
83			int return_value = EXIT_SUCCESS;
84			uint8_t *hash_value;
85			unsigned flags;
86			hash_algo_t hash_algo = ENABLE_MD5SUM
87			? (ENABLE_SHA1SUM ? (**argv=='m' ? HASH_MD5 : HASH_SHA1) : HASH_MD5)
88			: HASH_SHA1;
89
90			if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK)
91			flags = getopt32(argc, argv, "scw");
92			else optind = 1;
93
94			if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && !(flags & FLAG_CHECK)) {
95			if (flags & FLAG_SILENT) {
96			bb_error_msg_and_die
97			("-%c is meaningful only when verifying checksums", 's');
98			} else if (flags & FLAG_WARN) {
99			bb_error_msg_and_die
100			("-%c is meaningful only when verifying checksums", 'w');
101			}
102			}
103
104			if (argc == optind) {
105			argv[argc++] = "-";
106			}
107
108			if (ENABLE_FEATURE_MD5_SHA1_SUM_CHECK && (flags & FLAG_CHECK)) {
109			FILE *pre_computed_stream;
110			int count_total = 0;
111			int count_failed = 0;
112			char *file_ptr = argv[optind];
113			char *line;
114
115			if (optind + 1 != argc) {
116			bb_error_msg_and_die
117			("only one argument may be specified when using -c");
118			}
119
120			pre_computed_stream = stdin;
121			if (NOT_LONE_DASH(file_ptr)) {
122			pre_computed_stream = xfopen(file_ptr, "r");
123			}
124
125			while ((line = xmalloc_getline(pre_computed_stream)) != NULL) {
126			char *filename_ptr;
127
128			count_total++;
129			filename_ptr = strstr(line, " ");
130			/* handle format for binary checksums */
131			if (filename_ptr == NULL) {
132			filename_ptr = strstr(line, " *");
133			}
134			if (filename_ptr == NULL) {
135			if (flags & FLAG_WARN) {
136			bb_error_msg("invalid format");
137			}
138			count_failed++;
139			return_value = EXIT_FAILURE;
140			free(line);
141			continue;
142			}
143			*filename_ptr = '\0';
144			filename_ptr += 2;
145
146			hash_value = hash_file(filename_ptr, hash_algo);
147
148			if (hash_value && (strcmp((char*)hash_value, line) == 0)) {
149			if (!(flags & FLAG_SILENT))
150			printf("%s: OK\n", filename_ptr);
151			} else {
152			if (!(flags & FLAG_SILENT))
153			printf("%s: FAILED\n", filename_ptr);
154			count_failed++;
155			return_value = EXIT_FAILURE;
156			}
157			/* possible free(NULL) */
158			free(hash_value);
159			free(line);
160			}
161			if (count_failed && !(flags & FLAG_SILENT)) {
162			bb_error_msg("WARNING: %d of %d computed checksums did NOT match",
163			count_failed, count_total);
164			}
165			/*
166			if (fclose_if_not_stdin(pre_computed_stream) == EOF) {
167			bb_perror_msg_and_die("cannot close file %s", file_ptr);
168			}
169			*/
170			} else {
171			while (optind < argc) {
172			char *file_ptr = argv[optind++];
173
174			hash_value = hash_file(file_ptr, hash_algo);
175			if (hash_value == NULL) {
176			return_value = EXIT_FAILURE;
177			} else {
178			printf("%s %s\n", hash_value, file_ptr);
179			free(hash_value);
180			}
181			}
182			}
183			return return_value;
184			}