1 /**********************************************************************
2 * gostsum.c *
3 * Copyright (c) 2005-2006 Cryptocom LTD *
4 * This file is distributed under the same license as OpenSSL *
5 * *
6 * Almost drop-in replacement for md5sum and sha1sum *
7 * which computes GOST R 34.11-94 hashsum instead *
8 * *
9 **********************************************************************/
10 #include <stdio.h>
11 #include <stdlib.h>
12 #include <unistd.h>
13 #include <limits.h>
14 #include <fcntl.h>
15 #include <string.h>
16 #include "gosthash.h"
17 #define BUF_SIZE 262144
18 int hash_file(gost_hash_ctx * ctx, char *filename, char *sum, int mode);
19 int hash_stream(gost_hash_ctx * ctx, int fd, char *sum);
20 int get_line(FILE *f, char *hash, char *filename);
help()21 void help()
22 {
23 fprintf(stderr, "gostsum [-bvt] [-c [file]]| [files]\n"
24 "\t-c check message digests (default is generate)\n"
25 "\t-v verbose, print file names when checking\n"
26 "\t-b read files in binary mode\n"
27 "\t-t use test GOST paramset (default is CryptoPro paramset)\n"
28 "The input for -c should be the list of message digests and file names\n"
29 "that is printed on stdout by this program when it generates digests.\n");
30 exit(3);
31 }
32
33 #ifndef O_BINARY
34 # define O_BINARY 0
35 #endif
36
main(int argc,char ** argv)37 int main(int argc, char **argv)
38 {
39 int c, i;
40 int verbose = 0;
41 int errors = 0;
42 int open_mode = O_RDONLY;
43 gost_subst_block *b = &GostR3411_94_CryptoProParamSet;
44 FILE *check_file = NULL;
45 gost_hash_ctx ctx;
46
47 while ((c = getopt(argc, argv, "bc::tv")) != -1) {
48 switch (c) {
49 case 'v':
50 verbose = 1;
51 break;
52 case 't':
53 b = &GostR3411_94_TestParamSet;
54 break;
55 case 'b':
56 open_mode |= O_BINARY;
57 break;
58 case 'c':
59 if (optarg) {
60 check_file = fopen(optarg, "r");
61 if (!check_file) {
62 perror(optarg);
63 exit(2);
64 }
65 } else {
66 check_file = stdin;
67 }
68 break;
69 default:
70 fprintf(stderr, "invalid option %c", optopt);
71 help();
72 }
73 }
74 init_gost_hash_ctx(&ctx, b);
75 if (check_file) {
76 char inhash[65], calcsum[65], filename[PATH_MAX];
77 int failcount = 0, count = 0;;
78 if (check_file == stdin && optind < argc) {
79 check_file = fopen(argv[optind], "r");
80 if (!check_file) {
81 perror(argv[optind]);
82 exit(2);
83 }
84 }
85 while (get_line(check_file, inhash, filename)) {
86 if (!hash_file(&ctx, filename, calcsum, open_mode)) {
87 exit(2);
88 }
89 count++;
90 if (!strncmp(calcsum, inhash, 65)) {
91 if (verbose) {
92 fprintf(stderr, "%s\tOK\n", filename);
93 }
94 } else {
95 if (verbose) {
96 fprintf(stderr, "%s\tFAILED\n", filename);
97 } else {
98 fprintf(stderr,
99 "%s: GOST hash sum check failed for '%s'\n",
100 argv[0], filename);
101 }
102 failcount++;
103 }
104 }
105 if (verbose && failcount) {
106 fprintf(stderr,
107 "%s: %d of %d file(f) failed GOST hash sum check\n",
108 argv[0], failcount, count);
109 }
110 exit(failcount ? 1 : 0);
111 }
112 if (optind == argc) {
113 char sum[65];
114 if (!hash_stream(&ctx, fileno(stdin), sum)) {
115 perror("stdin");
116 exit(1);
117 }
118 printf("%s -\n", sum);
119 exit(0);
120 }
121 for (i = optind; i < argc; i++) {
122 char sum[65];
123 if (!hash_file(&ctx, argv[i], sum, open_mode)) {
124 errors++;
125 } else {
126 printf("%s %s\n", sum, argv[i]);
127 }
128 }
129 exit(errors ? 1 : 0);
130 }
131
hash_file(gost_hash_ctx * ctx,char * filename,char * sum,int mode)132 int hash_file(gost_hash_ctx * ctx, char *filename, char *sum, int mode)
133 {
134 int fd;
135 if ((fd = open(filename, mode)) < 0) {
136 perror(filename);
137 return 0;
138 }
139 if (!hash_stream(ctx, fd, sum)) {
140 perror(filename);
141 return 0;
142 }
143 close(fd);
144 return 1;
145 }
146
hash_stream(gost_hash_ctx * ctx,int fd,char * sum)147 int hash_stream(gost_hash_ctx * ctx, int fd, char *sum)
148 {
149 unsigned char buffer[BUF_SIZE];
150 ssize_t bytes;
151 int i;
152 start_hash(ctx);
153 while ((bytes = read(fd, buffer, BUF_SIZE)) > 0) {
154 hash_block(ctx, buffer, bytes);
155 }
156 if (bytes < 0) {
157 return 0;
158 }
159 finish_hash(ctx, buffer);
160 for (i = 0; i < 32; i++) {
161 sprintf(sum + 2 * i, "%02x", buffer[31 - i]);
162 }
163 return 1;
164 }
165
get_line(FILE * f,char * hash,char * filename)166 int get_line(FILE *f, char *hash, char *filename)
167 {
168 int i;
169 if (fread(hash, 1, 64, f) < 64)
170 return 0;
171 hash[64] = 0;
172 for (i = 0; i < 64; i++) {
173 if (hash[i] < '0' || (hash[i] > '9' && hash[i] < 'A')
174 || (hash[i] > 'F' && hash[i] < 'a') || hash[i] > 'f') {
175 fprintf(stderr, "Not a hash value '%s'\n", hash);
176 return 0;
177 }
178 }
179 if (fgetc(f) != ' ') {
180 fprintf(stderr, "Malformed input line\n");
181 return 0;
182 }
183 i = strlen(fgets(filename, PATH_MAX, f));
184 while (filename[--i] == '\n' || filename[i] == '\r')
185 filename[i] = 0;
186 return 1;
187 }
188