Changes to the files table and interface. Changed "age" to
[jigit.git] / jigsum.c
1 /*
2  * jigsum
3  *
4  * Tool to calculate and print MD5 checksums in jigdo's awkward
5  * base64-ish encoding.
6  *
7  * Copyright (c) 2004 Steve McIntyre <steve@einval.com>
8  *
9  * GPL v2 - see COPYING
10  */
11
12 #include <stdio.h>
13 #include <errno.h>
14 #include <stdlib.h>
15 #include <sys/types.h>
16 #include <sys/stat.h>
17 #include <string.h>
18 #include <fcntl.h>
19 #include <unistd.h>
20 #include "md5.h"
21 #include "jigdb.h"
22
23 #define BUF_SIZE 65536
24 #define OLD_FILE_RECORD_AGE 86400
25 #define DB_NAME "jigit_db.sql"
26
27 #ifndef MIN
28 #define MIN(x,y)        ( ((x) < (y)) ? (x) : (y))
29 #endif
30
31 JIGDB *database = NULL;
32
33 static int check_cache(char *filename, struct stat *sb, char **base64_md5)
34 {
35     int error = 0;
36     db_file_entry_t *entry;
37
38     error = db_lookup_file_by_name(database, filename, &entry);
39     if (!error)
40     {
41         if ( (sb->st_mtime <= entry->mtime) &&
42              (sb->st_size == entry->file_size) )
43             /* We have a cache entry already; simply return
44              * the cached sum */
45         {
46             *base64_md5 = entry->md5;
47             return 1;
48         }
49         else
50         {
51             /* We have an entry for this file, but the mtime or size
52              * has changed. Delete the old entry and replace it later
53              * on */
54             error = db_delete_file_by_name(database, entry->md5, entry->type, entry->filename);
55             if (error)
56                 printf("check_cache: unable to delete old entry for file %s\n", filename);
57         }
58     }
59     return 0;
60 }
61
62 static unsigned long long calculate_md5(char *filename, FILE *file, char **base64_md5)
63 {
64     char buf[BUF_SIZE];
65     unsigned char file_md5[16] = {0};
66     int done = 0;
67     struct mk_MD5Context file_context;
68     unsigned long long bytes_read = 0;
69     
70     mk_MD5Init(&file_context);
71     while (!done)
72     {
73         int used = 0;
74         memset(buf, 0, BUF_SIZE);
75
76         used = fread(buf, 1, BUF_SIZE, file);
77         bytes_read += used;
78         if (used)
79             mk_MD5Update(&file_context, (unsigned char *)buf, used);
80         else
81         {
82             if (ferror(file) && (EISDIR != errno))
83                 fprintf(stderr, "Unable to read from file %s; error %d\n",
84                         filename, errno);
85             break;
86         }
87     }    
88     mk_MD5Final(file_md5, &file_context);
89     *base64_md5 = base64_dump(file_md5, 16);
90     return bytes_read;
91 }
92
93 static int md5_file(char *filename)
94 {
95     FILE *file = NULL;
96     char *base64_md5 = NULL;
97     unsigned long long bytes_read = 0;
98     db_file_entry_t entry;
99     struct stat sb;
100     int found_in_db = 0;
101     int error = 0;
102     char buf[PATH_MAX];
103     char *fullpath = NULL;
104
105     /* Check if we're reading from stdin */
106     if (!strcmp("-", filename))
107     {
108         (void)calculate_md5("<STDIN>", stdin, &base64_md5);
109         printf("%s\n", base64_md5);
110         fflush(stdout);
111         return 0;
112     }
113
114     /* Make an absolute pathname if necessary */
115     if (filename[0] == '/')
116         fullpath = filename;
117     else
118     {
119         size_t wdlen = 0;
120         if (buf != getcwd(buf, sizeof(buf)))
121         {
122             fprintf(stderr, "md5_file: Unable to get CWD!; giving up on file %s, error %d\n",
123                     filename, errno);
124             return errno;
125         }
126         wdlen = strlen(buf);
127         strcpy(buf + wdlen, "/");
128         strcpy(buf + wdlen + 1, filename);
129         fullpath = buf;
130     }
131
132     /* Check the DB to see if we already have a checksum for this file */
133     error = stat(fullpath, &sb);
134     if (error)
135     {
136         fprintf(stderr, "md5_file: Unable to stat file %s, error %d\n", fullpath, errno);
137         return errno;
138     }
139     if (S_ISDIR(sb.st_mode))
140         return EISDIR;
141     found_in_db = check_cache(fullpath, &sb, &base64_md5);
142     if (!found_in_db)
143     {
144         file = fopen(fullpath, "rb");
145         if (!file)
146         {
147             switch (errno)
148             {
149                 case EACCES:
150                 case EISDIR:
151                     break;
152                 default:
153                     fprintf(stderr, "Unable to open file %s; error %d\n", fullpath, errno);
154                     break;
155             }
156             return errno;
157         }
158         bytes_read = calculate_md5(fullpath, file, &base64_md5);
159         fclose(file);
160         memset(&entry, 0, sizeof(entry));
161         strncpy(&entry.md5[0], base64_md5, sizeof(entry.md5));
162         entry.type = FT_LOCAL;
163         entry.mtime = sb.st_mtime;
164         entry.time_added = time(NULL);
165         entry.file_size = bytes_read;
166         strncpy(&entry.filename[0], fullpath, sizeof(entry.filename));
167         /* "extra" blanked already */
168         error = db_store_file(database, &entry);
169         if (error)
170             fprintf(stderr, "Unable to write database entry; error %d\n", error);
171     }
172
173     printf("%s  %s\n", base64_md5, fullpath);
174     fflush(stdout);
175     return 0;
176 }
177
178 /* Walk through the database deleting entries more than <n> seconds old */
179 static void jigsum_db_cleanup(int delay)
180 {
181     (void)db_delete_files_by_age(database, time(NULL) - delay);
182 }
183
184 int main(int argc, char **argv)
185 {
186     int i = 0;
187
188     database = db_open(DB_NAME);
189     if (!database)
190     {
191         fprintf(stderr, "Unable to open database, error %d\n", errno);
192         return errno;
193     }                
194
195     /* Clear out old records */
196     jigsum_db_cleanup(OLD_FILE_RECORD_AGE);
197     
198     for (i = 1; i < argc; i++)
199         (void) md5_file(argv[i]);
200
201     db_dump(database);
202
203     db_close(database);
204
205     return 0;
206 }
207