1 /* Compute MD5 checksum of files or strings according to the definition
2 of MD5 in RFC 1321 from April 1992.
3 Copyright (C) 1995-1999 Free Software Foundation, Inc.
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License
16 along with this program; if not, write to the Free Software Foundation,
17 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
19 /* Written by Ulrich Drepper <drepper@gnu.ai.mit.edu>. */
27 #include <sys/types.h>
29 #include "long-options.h"
35 /* The official name of this program (e.g., no `g' prefix). */
36 #define PROGRAM_NAME "md5sum"
38 /* Most systems do not distinguish between external and internal
39 text representations. */
40 /* FIXME: This begs for an autoconf test. */
42 # define OPENOPTS(BINARY) ((BINARY) != 0 ? TEXT1TO1 : TEXTCNVT)
43 # define TEXT1TO1 "rb"
47 # define OPENOPTS(BINARY) ((BINARY) != 0 ? TEXT1TO1 : TEXTCNVT)
48 # define TEXT1TO1 "rb", "ctx=stm"
49 # define TEXTCNVT "r", "ctx=stm"
51 # if UNIX || __UNIX__ || unix || __unix__ || _POSIX_VERSION
52 # define OPENOPTS(BINARY) "r"
54 /* The following line is intended to evoke an error.
55 Using #error is not portable enough. */
56 "Cannot determine system type."
61 #if _LIBC || STDC_HEADERS
62 # define TOLOWER(c) tolower (c)
64 # define TOLOWER(c) (ISUPPER (c) ? tolower (c) : (c))
67 /* The minimum length of a valid digest line in a file produced
68 by `md5sum FILE' and read by `md5sum --check'. This length does
69 not include any newline character at the end of a line. */
70 #define MIN_DIGEST_LINE_LENGTH (32 /* message digest length */ \
71 + 2 /* blank and binary indicator */ \
72 + 1 /* minimum filename length */ )
74 /* Nonzero if any of the files read were the standard input. */
75 static int have_read_stdin;
77 /* With --check, don't generate any output.
78 The exit code indicates success or failure. */
79 static int status_only = 0;
81 /* With --check, print a message to standard error warning about each
82 improperly formatted MD5 checksum line. */
85 /* The name this program was run with. */
88 static const struct option long_options[] =
90 { "binary", no_argument, 0, 'b' },
91 { "check", no_argument, 0, 'c' },
92 { "status", no_argument, 0, 2 },
93 { "string", required_argument, 0, 1 },
94 { "text", no_argument, 0, 't' },
95 { "warn", no_argument, 0, 'w' },
103 fprintf (stderr, _("Try `%s --help' for more information.\n"),
108 Usage: %s [OPTION] [FILE]...\n\
109 or: %s [OPTION] --check [FILE]\n\
110 Print or check MD5 checksums.\n\
111 With no FILE, or when FILE is -, read standard input.\n\
113 -b, --binary read files in binary mode (default on DOS/Windows)\n\
114 -c, --check check MD5 sums against given list\n\
115 -t, --text read files in text mode (default)\n\
117 The following two options are useful only when verifying checksums:\n\
118 --status don't output anything, status code shows success\n\
119 -w, --warn warn about improperly formated MD5 checksum lines\n\
121 --help display this help and exit\n\
122 --version output version information and exit\n\
124 The sums are computed as described in RFC 1321. When checking, the input\n\
125 should be a former output of this program. The default mode is to print\n\
126 a line with checksum, a character indicating type (`*' for binary, ` ' for\n\
127 text), and name for each FILE.\n"),
128 program_name, program_name);
129 puts (_("\nReport bugs to <bug-textutils@gnu.org>."));
132 exit (status == 0 ? EXIT_SUCCESS : EXIT_FAILURE);
136 split_3 (char *s, size_t s_len, unsigned char **u, int *binary, char **w)
139 int escaped_filename = 0;
141 #define ISWHITE(c) ((c) == ' ' || (c) == '\t')
144 while (ISWHITE (s[i]))
147 /* The line must have at least 35 (36 if the first is a backslash)
148 more characters to contain correct message digest information.
149 Ignore this line if it is too short. */
150 if (!(s_len - i >= MIN_DIGEST_LINE_LENGTH
151 || (s[i] == '\\' && s_len - i >= 1 + MIN_DIGEST_LINE_LENGTH)))
157 escaped_filename = 1;
159 *u = (unsigned char *) &s[i];
161 /* The first field has to be the 32-character hexadecimal
162 representation of the message digest. If it is not followed
163 immediately by a white space it's an error. */
170 if (s[i] != ' ' && s[i] != '*')
172 *binary = (s[i++] == '*');
174 /* All characters between the type indicator and end of line are
175 significant -- that includes leading and trailing white space. */
178 if (escaped_filename)
180 /* Translate each `\n' string in the file name to a NEWLINE,
181 and each `\\' string to a backslash. */
192 /* A valid line does not end with a backslash. */
205 /* Only `\' or `n' may follow a backslash. */
211 /* The file name may not contain a NUL. */
226 hex_digits (unsigned char const *s)
237 /* An interface to md5_stream. Operate on FILENAME (it may be "-") and
238 put the result in *MD5_RESULT. Return non-zero upon failure, zero
239 to indicate success. */
242 md5_file (const char *filename, int binary, unsigned char *md5_result)
247 if (STREQ (filename, "-"))
252 /* If we need binary reads from a pipe or redirected stdin, we need
253 to switch it to BINARY mode here, since stdin is already open. */
255 SET_BINARY (fileno (stdin));
260 /* OPENOPTS is a macro. It varies with the system.
261 Some systems distinguish between internal and
262 external text representations. */
264 fp = fopen (filename, OPENOPTS (binary));
267 error (0, errno, "%s", filename);
272 err = md5_stream (fp, md5_result);
275 error (0, errno, "%s", filename);
281 if (fp != stdin && fclose (fp) == EOF)
283 error (0, errno, "%s", filename);
291 md5_check (const char *checkfile_name)
293 FILE *checkfile_stream;
294 int n_properly_formated_lines = 0;
295 int n_mismatched_checksums = 0;
296 int n_open_or_read_failures = 0;
297 unsigned char md5buffer[16];
300 size_t line_chars_allocated;
302 if (STREQ (checkfile_name, "-"))
305 checkfile_name = _("standard input");
306 checkfile_stream = stdin;
310 checkfile_stream = fopen (checkfile_name, "r");
311 if (checkfile_stream == NULL)
313 error (0, errno, "%s", checkfile_name);
320 line_chars_allocated = 0;
325 unsigned char *md5num;
331 line_length = getline (&line, &line_chars_allocated, checkfile_stream);
332 if (line_length <= 0)
335 /* Ignore comment lines, which begin with a '#' character. */
339 /* Remove any trailing newline. */
340 if (line[line_length - 1] == '\n')
341 line[--line_length] = '\0';
343 err = split_3 (line, line_length, &md5num, &binary, &filename);
344 if (err || !hex_digits (md5num))
349 _("%s: %lu: improperly formatted MD5 checksum line"),
350 checkfile_name, (unsigned long) line_number);
355 static const char bin2hex[] = { '0', '1', '2', '3',
358 'c', 'd', 'e', 'f' };
361 ++n_properly_formated_lines;
363 fail = md5_file (filename, binary, md5buffer);
367 ++n_open_or_read_failures;
370 printf (_("%s: FAILED open or read\n"), filename);
377 /* Compare generated binary number with text representation
378 in check file. Ignore case of hex digits. */
379 for (cnt = 0; cnt < 16; ++cnt)
381 if (TOLOWER (md5num[2 * cnt]) != bin2hex[md5buffer[cnt] >> 4]
382 || (TOLOWER (md5num[2 * cnt + 1])
383 != (bin2hex[md5buffer[cnt] & 0xf])))
387 ++n_mismatched_checksums;
391 printf ("%s: %s\n", filename,
392 (cnt != 16 ? _("FAILED") : _("OK")));
398 while (!feof (checkfile_stream) && !ferror (checkfile_stream));
403 if (ferror (checkfile_stream))
405 error (0, 0, _("%s: read error"), checkfile_name);
409 if (checkfile_stream != stdin && fclose (checkfile_stream) == EOF)
411 error (0, errno, "%s", checkfile_name);
415 if (n_properly_formated_lines == 0)
417 /* Warn if no tests are found. */
418 error (0, 0, _("%s: no properly formatted MD5 checksum lines found"),
425 int n_computed_checkums = (n_properly_formated_lines
426 - n_open_or_read_failures);
428 if (n_open_or_read_failures > 0)
431 _("WARNING: %d of %d listed %s could not be read\n"),
432 n_open_or_read_failures, n_properly_formated_lines,
433 (n_properly_formated_lines == 1
434 ? _("file") : _("files")));
437 if (n_mismatched_checksums > 0)
440 _("WARNING: %d of %d computed %s did NOT match"),
441 n_mismatched_checksums, n_computed_checkums,
442 (n_computed_checkums == 1
443 ? _("checksum") : _("checksums")));
448 return ((n_properly_formated_lines > 0 && n_mismatched_checksums == 0
449 && n_open_or_read_failures == 0) ? 0 : 1);
453 main (int argc, char **argv)
455 unsigned char md5buffer[16];
458 char **string = NULL;
459 size_t n_strings = 0;
461 int file_type_specified = 0;
464 /* Binary is default on MSDOS, so the actual file contents
465 are used in computation. */
468 /* Text is default of the Plumb/Lankester format. */
472 /* Setting values of global variables. */
473 program_name = argv[0];
474 setlocale (LC_ALL, "");
475 bindtextdomain (PACKAGE, LOCALEDIR);
476 textdomain (PACKAGE);
478 parse_long_options (argc, argv, PROGRAM_NAME, GNU_PACKAGE, VERSION,
479 "Ulrich Drepper", usage);
481 while ((opt = getopt_long (argc, argv, "bctw", long_options, NULL)) != -1)
484 case 0: /* long option */
486 case 1: /* --string */
489 string = (char **) xmalloc ((argc - 1) * sizeof (char *));
493 string[n_strings++] = optarg;
497 file_type_specified = 1;
508 file_type_specified = 1;
516 usage (EXIT_FAILURE);
519 if (file_type_specified && do_check)
521 error (0, 0, _("the --binary and --text options are meaningless when \
522 verifying checksums"));
523 usage (EXIT_FAILURE);
526 if (n_strings > 0 && do_check)
529 _("the --string and --check options are mutually exclusive"));
530 usage (EXIT_FAILURE);
533 if (status_only && !do_check)
536 _("the --status option is meaningful only when verifying checksums"));
537 usage (EXIT_FAILURE);
540 if (warn && !do_check)
543 _("the --warn option is meaningful only when verifying checksums"));
544 usage (EXIT_FAILURE);
553 error (0, 0, _("no files may be specified when using --string"));
554 usage (EXIT_FAILURE);
556 for (i = 0; i < n_strings; ++i)
559 md5_buffer (string[i], strlen (string[i]), md5buffer);
561 for (cnt = 0; cnt < 16; ++cnt)
562 printf ("%02x", md5buffer[cnt]);
564 printf (" \"%s\"\n", string[i]);
569 if (optind + 1 < argc)
572 _("only one argument may be specified when using --check"));
573 usage (EXIT_FAILURE);
576 err = md5_check ((optind == argc) ? "-" : argv[optind]);
583 for (; optind < argc; ++optind)
586 char *file = argv[optind];
588 fail = md5_file (file, binary, md5buffer);
594 /* Output a leading backslash if the file name contains
595 a newline or backslash. */
596 if (strchr (file, '\n') || strchr (file, '\\'))
599 for (i = 0; i < 16; ++i)
600 printf ("%02x", md5buffer[i]);
608 /* Translate each NEWLINE byte to the string, "\\n",
609 and each backslash to "\\\\". */
610 for (i = 0; i < strlen (file); ++i)
615 fputs ("\\n", stdout);
619 fputs ("\\\\", stdout);
632 if (fclose (stdout) == EOF)
633 error (EXIT_FAILURE, errno, _("write error"));
635 if (have_read_stdin && fclose (stdin) == EOF)
636 error (EXIT_FAILURE, errno, _("standard input"));
638 exit (err == 0 ? EXIT_SUCCESS : EXIT_FAILURE);