Merge from vendor branch BIND:
[dragonfly.git] / sbin / jscan / jscan.c
1 /*
2  * Copyright (c) 2003,2004 The DragonFly Project.  All rights reserved.
3  * 
4  * This code is derived from software contributed to The DragonFly Project
5  * by Matthew Dillon <dillon@backplane.com>
6  * 
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  * 
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  * 
34  * $DragonFly: src/sbin/jscan/jscan.c,v 1.10 2005/11/06 12:32:56 swildner Exp $
35  */
36
37 #include "jscan.h"
38
39 static int donecheck(enum jdirection direction, struct jdata *jd,
40                      int64_t transid);
41 static void usage(const char *av0);
42
43 int jmodes;
44 int fsync_opt;
45 int verbose_opt;
46 off_t prefix_file_size = 100 * 1024 * 1024;
47 off_t trans_count;
48 static enum jdirection jdirection = JD_FORWARDS;
49
50 static void jscan_do_output(struct jfile *, const char *, 
51                             const char *, int64_t);
52 static void jscan_do_mirror(struct jfile *, const char *,
53                             const char *, int64_t);
54 static void jscan_do_record(struct jfile *, const char *,
55                             const char *, int64_t);
56 static void jscan_do_debug(struct jfile *, const char *,
57                             const char *, int64_t);
58 static void fork_subprocess(struct jfile *,
59                             void (*)(struct jfile *, const char *,
60                                      const char *, int64_t),
61                             const char *,
62                             const char *, const char *, int64_t);
63
64 int
65 main(int ac, char **av)
66 {
67     const char *input_prefix = NULL;
68     char *output_transid_file = NULL;
69     char *mirror_transid_file = NULL;
70     const char *mirror_directory = ".";
71     char *record_prefix = NULL;
72     char *record_transid_file = NULL;
73     struct jsession jsdebug;
74     struct jsession jsoutput;
75     struct jsession jsmirror;
76     char *ptr;
77     int64_t mirror_transid;
78     int64_t output_transid;
79     int64_t record_transid;
80     int64_t transid;
81     int input_fd;
82     struct stat st;
83     struct jfile *jf;
84     struct jdata *jd;
85     int ch;
86
87     while ((ch = getopt(ac, av, "2c:dfm:o:s:uvw:D:O:W:F")) != -1) {
88         switch(ch) {
89         case '2':
90             jmodes |= JMODEF_INPUT_FULL;
91             break;
92         case 'c':
93             trans_count = strtoll(optarg, &ptr, 0);
94             switch(*ptr) {
95             case 't':
96                 trans_count *= 1024;
97                 /* fall through */
98             case 'g':
99                 trans_count *= 1024;
100                 /* fall through */
101             case 'm':
102                 trans_count *= 1024;
103                 /* fall through */
104             case 'k':
105                 trans_count *= 1024;
106                 break;
107             case 0:
108                 break;
109             default:
110                 fprintf(stderr, "Bad suffix for value specified with -c, use 'k', 'm', 'g', 't', or nothing\n");
111                 usage(av[0]);
112             }
113             break;
114         case 'd':
115             jmodes |= JMODEF_DEBUG;
116             break;
117         case 'f':
118             jmodes |= JMODEF_LOOP_FOREVER;
119             break;
120         case 'v':
121             ++verbose_opt;
122             break;
123         case 'm':
124             jmodes |= JMODEF_MIRROR;
125             if (strcmp(optarg, "none") != 0)
126                 mirror_transid_file = optarg;
127             break;
128         case 'O':
129             jmodes |= JMODEF_OUTPUT_FULL;
130             /* fall through */
131         case 'o':
132             jmodes |= JMODEF_OUTPUT;
133             if (strcmp(optarg, "none") != 0)
134                 output_transid_file = optarg;
135             break;
136         case 's':
137             prefix_file_size = strtoll(optarg, &ptr, 0);
138             switch(*ptr) {
139             case 't':
140                 prefix_file_size *= 1024;
141                 /* fall through */
142             case 'g':
143                 prefix_file_size *= 1024;
144                 /* fall through */
145             case 'm':
146                 prefix_file_size *= 1024;
147                 /* fall through */
148             case 'k':
149                 prefix_file_size *= 1024;
150                 break;
151             case 0:
152                 break;
153             default:
154                 fprintf(stderr, "Bad suffix for value specified with -s, use 'k', 'm', 'g', 't', or nothing\n");
155                 usage(av[0]);
156             }
157             break;
158         case 'u':
159             jdirection = JD_BACKWARDS;
160             break;
161         case 'W':
162             jmodes |= JMODEF_RECORD_TMP;
163             /* fall through */
164         case 'w':
165             jmodes |= JMODEF_RECORD;
166             record_prefix = optarg;
167             asprintf(&record_transid_file, "%s.transid", record_prefix);
168             break;
169         case 'D':
170             mirror_directory = optarg;
171             break;
172         case 'F':
173             ++fsync_opt;
174             break;
175         default:
176             fprintf(stderr, "unknown option: -%c\n", optopt);
177             usage(av[0]);
178         }
179     }
180
181     /*
182      * Sanity checks
183      */
184     if ((jmodes & JMODEF_COMMAND_MASK) == 0)
185         usage(av[0]);
186     if (optind > ac + 1)  {
187         fprintf(stderr, "Only one input file or prefix may be specified,\n"
188                         "or zero if stdin is to be the input.\n");
189         usage(av[0]);
190     }
191     if (jdirection == JD_BACKWARDS && (jmodes & (JMODEF_RECORD|JMODEF_OUTPUT))) {
192         fprintf(stderr, "Undo mode is only good in mirroring mode and "
193                         "cannot be mixed with other modes.\n");
194         exit(1);
195     }
196
197     /*
198      * STEP1 - OPEN INPUT
199      *
200      * The input will either be a pipe, a regular file, or a journaling 
201      * file prefix.
202      */
203     jf = NULL;
204     if (optind == ac) {
205         input_prefix = "<stdin>";
206         input_fd = 0;
207         if (fstat(0, &st) < 0 || !S_ISREG(st.st_mode)) {
208             jmodes |= JMODEF_INPUT_PIPE;
209             if (jdirection == JD_BACKWARDS) {
210                 fprintf(stderr, "Cannot scan journals on pipes backwards\n");
211                 usage(av[0]);
212             }
213         }
214         jf = jopen_fd(input_fd);
215     } else if (stat(av[optind], &st) == 0 && S_ISREG(st.st_mode)) {
216         input_prefix = av[optind];
217         if ((input_fd = open(av[optind], O_RDONLY)) != NULL) {
218             jf = jopen_fd(input_fd);
219         } else {
220             jf = NULL;
221         }
222     } else {
223         input_prefix = av[optind];
224         jf = jopen_prefix(input_prefix, 0);
225         jmodes |= JMODEF_INPUT_PREFIX;
226     }
227     if (jf == NULL) {
228         fprintf(stderr, "Unable to open input %s: %s\n", 
229                 input_prefix, strerror(errno));
230         exit(1);
231     }
232
233     /*
234      * STEP 1 - SYNCHRONIZING THE INPUT STREAM
235      *
236      * Figure out the starting point for our various output modes.  Figure
237      * out the earliest transaction id and try to seek to that point,
238      * otherwise we might have to scan through terrabytes of data.
239      *
240      * Invalid transid's will be set to 0, but it should also be noted
241      * that 0 is also a valid transid.
242      */
243     get_transid_from_file(output_transid_file, &output_transid,
244                           JMODEF_OUTPUT_TRANSID_GOOD);
245     get_transid_from_file(mirror_transid_file, &mirror_transid, 
246                           JMODEF_MIRROR_TRANSID_GOOD);
247     get_transid_from_file(record_transid_file, &record_transid, 
248                           JMODEF_RECORD_TRANSID_GOOD);
249     transid = LLONG_MAX;
250     if ((jmodes & JMODEF_OUTPUT_TRANSID_GOOD) && output_transid < transid)
251         transid = output_transid;
252     if ((jmodes & JMODEF_MIRROR_TRANSID_GOOD) && mirror_transid < transid)
253         transid = mirror_transid;
254     if ((jmodes & JMODEF_RECORD_TRANSID_GOOD) && record_transid < transid)
255         transid = record_transid;
256     if ((jmodes & JMODEF_TRANSID_GOOD_MASK) == 0)
257         transid = 0;
258     if (verbose_opt) {
259         if (jmodes & JMODEF_OUTPUT) {
260             fprintf(stderr, "Starting transid for OUTPUT: %016llx\n",
261                     output_transid);
262         }
263         if (jmodes & JMODEF_MIRROR) {
264             fprintf(stderr, "Starting transid for MIRROR: %016llx\n",
265                     mirror_transid);
266         }
267         if (jmodes & JMODEF_RECORD) {
268             fprintf(stderr, "Starting transid for RECORD: %016llx\n",
269                     record_transid);
270         }
271     }
272
273     /*
274      * Now it gets more difficult.  If we are recording then the input
275      * could be representative of continuing data and not have any
276      * prior, older data that the output or mirror modes might need.  Those
277      * modes must work off the recording data even as we write to it.
278      * In that case we fork and have the sub-processes work off the
279      * record output.
280      *
281      * Then we take the input and start recording.
282      */
283     if (jmodes & JMODEF_RECORD) {
284         if (jrecord_init(record_prefix) < 0) {
285             fprintf(stderr, "Unable to initialize file set for: %s\n", 
286                     record_prefix);
287             exit(1);
288         }
289         if (jmodes & JMODEF_MIRROR) {
290             fork_subprocess(jf, jscan_do_mirror, record_prefix, 
291                             mirror_transid_file,
292                             mirror_directory, mirror_transid);
293             /* XXX ack stream for temporary record file removal */
294         }
295         if (jmodes & JMODEF_OUTPUT) {
296             fork_subprocess(jf, jscan_do_output, record_prefix,
297                             record_transid_file,
298                             NULL, output_transid);
299             /* XXX ack stream for temporary record file removal */
300         }
301         jscan_do_record(jf, record_transid_file, record_prefix, record_transid);
302         exit(0);
303     }
304
305     /*
306      * If the input is a prefix set we can just pass it to the appropriate
307      * jscan_do_*() function.  If we are doing both output and mirroring
308      * we fork the mirror and do the output in the foreground since that
309      * is going to stdout.
310      */
311     if (jmodes & JMODEF_INPUT_PREFIX) {
312         if ((jmodes & JMODEF_OUTPUT) && (jmodes & JMODEF_MIRROR)) {
313             fork_subprocess(jf, jscan_do_mirror, input_prefix, 
314                             mirror_transid_file,
315                             mirror_directory, mirror_transid);
316             jscan_do_output(jf, output_transid_file, NULL, output_transid);
317         } else if (jmodes & JMODEF_OUTPUT) {
318             jscan_do_output(jf, output_transid_file, NULL, output_transid);
319         } else if (jmodes & JMODEF_MIRROR) {
320             jscan_do_mirror(jf, mirror_transid_file, mirror_directory,
321                             mirror_transid);
322         } else if (jmodes & JMODEF_DEBUG) {
323             jscan_do_debug(jf, NULL, NULL, 0);
324         }
325         exit(0);
326     }
327
328     /*
329      * The input is not a prefix set and we are not recording, which means
330      * we have to transfer the data on the input pipe to the output and
331      * mirroring code on the fly.  This also means that we must keep track
332      * of meta-data records in-memory.  However, if the input is a regular
333      * file we *CAN* try to optimize where we start reading.
334      *
335      * NOTE: If the mirroring code encounters a transaction record that is
336      * not marked begin, and it does not have the begin record, it will
337      * attempt to locate the begin record if the input is not a pipe, then
338      * seek back.
339      */
340     if ((jmodes & JMODEF_TRANSID_GOOD_MASK) && !(jmodes & JMODEF_INPUT_PIPE))
341         jd = jseek(jf, transid, jdirection);
342     else
343         jd = jread(jf, NULL, jdirection);
344     jmodes |= JMODEF_MEMORY_TRACKING;
345
346     jsession_init(&jsdebug, jf, jdirection,
347                   NULL, 0);
348     jsession_init(&jsoutput, jf, jdirection, 
349                   output_transid_file, output_transid);
350     jsession_init(&jsmirror, jf, jdirection,
351                   mirror_transid_file, mirror_transid);
352     jsmirror.ss_mirror_directory = mirror_directory;
353
354     while (jd != NULL) {
355         if ((jmodes & JMODEF_DEBUG) && jsession_check(&jsdebug, jd))
356             dump_debug(&jsdebug, jd);
357         if ((jmodes & JMODEF_OUTPUT) && jsession_check(&jsoutput, jd))
358             dump_output(&jsoutput, jd);
359         if ((jmodes & JMODEF_MIRROR) && jsession_check(&jsmirror, jd))
360             dump_mirror(&jsmirror, jd);
361         if (donecheck(jdirection, jd, transid)) {
362             jfree(jf, jd);
363             break;
364         }
365         jd = jread(jf, jd, jdirection);
366     }
367     jclose(jf);
368     jsession_term(&jsdebug);
369     jsession_term(&jsoutput);
370     jsession_term(&jsmirror);
371     return(0);
372 }
373
374 /*
375  * Returns one if we need to break out of our scanning loop, zero otherwise.
376  */
377 static int
378 donecheck(enum jdirection direction, struct jdata *jd, int64_t transid)
379 {
380     if (direction == JD_FORWARDS) {
381         if (jd->jd_transid > transid && trans_count && --trans_count == 0)
382             return(1);
383     } else {
384         if (jd->jd_transid <= transid && trans_count && --trans_count == 0)
385             return(1);
386     }
387     return(0);
388 }
389
390 /*
391  * When we have multiple commands and are writing to a prefix set, we can
392  * 'background' the output and/or mirroring command and have the background
393  * processes feed off the prefix set the foreground process is writing to.
394  */
395 static void
396 fork_subprocess(struct jfile *jftoclose,
397         void (*func)(struct jfile *, const char *, const char *, int64_t),
398         const char *input_prefix, const char *transid_file, const char *info,
399         int64_t transid)
400 {
401     pid_t pid;
402     struct jfile *jf;
403
404     if ((pid = fork()) == 0) {
405         jmodes &= ~(JMODEF_DEBUG | JMODEF_INPUT_PIPE);
406         jmodes |= JMODEF_LOOP_FOREVER;  /* keep checking for new input */
407         jclose(jftoclose);
408         jf = jopen_prefix(input_prefix, 0);
409         jmodes |= JMODEF_INPUT_PREFIX;
410         func(jf, transid_file, info, transid);
411         jclose(jf);
412         exit(0);
413     } else if (pid < 0) {
414         fprintf(stderr, "fork(): %s\n", strerror(errno));
415         exit(1);
416     }
417 }
418
419 static void
420 jscan_do_output(struct jfile *jf, const char *output_transid_file, const char *dummy __unused, int64_t transid)
421 {
422     struct jdata *jd;
423     struct jsession jsdebug;
424     struct jsession jsoutput;
425
426     jsession_init(&jsdebug, jf, jdirection,
427                   NULL, 0);
428     jsession_init(&jsoutput, jf, jdirection,
429                   output_transid_file, transid);
430
431     if ((jmodes & JMODEF_OUTPUT_TRANSID_GOOD) && !(jmodes & JMODEF_INPUT_PIPE))
432         jd = jseek(jf, transid, jdirection);
433     else
434         jd = jread(jf, NULL, jdirection);
435     while (jd != NULL) {
436         if ((jmodes & JMODEF_DEBUG) && jsession_check(&jsdebug, jd))
437             dump_debug(&jsdebug, jd);
438         if (jsession_check(&jsoutput, jd))
439             dump_output(&jsoutput, jd);
440         if (donecheck(jdirection, jd, transid)) {
441             jfree(jf, jd);
442             break;
443         }
444         jd = jread(jf, jd, jdirection);
445     }
446     jsession_term(&jsdebug);
447     jsession_term(&jsoutput);
448 }
449
450 static void
451 jscan_do_mirror(struct jfile *jf, const char *mirror_transid_file, const char *mirror_directory, int64_t transid)
452 {
453     struct jsession jsdebug;
454     struct jsession jsmirror;
455     struct jdata *jd;
456
457     jsession_init(&jsdebug, jf, jdirection,
458                   NULL, 0);
459     jsession_init(&jsmirror, jf, jdirection,
460                   mirror_transid_file, transid);
461     jsmirror.ss_mirror_directory = mirror_directory;
462
463     if ((jmodes & JMODEF_MIRROR_TRANSID_GOOD) && !(jmodes & JMODEF_INPUT_PIPE))
464         jd = jseek(jf, transid, jdirection);
465     else
466         jd = jread(jf, NULL, jdirection);
467     while (jd != NULL) {
468         if ((jmodes & JMODEF_DEBUG) && jsession_check(&jsdebug, jd))
469             dump_debug(&jsdebug, jd);
470         if (jsession_check(&jsmirror, jd))
471             dump_mirror(&jsmirror, jd);
472         if (donecheck(jdirection, jd, transid)) {
473             jfree(jf, jd);
474             break;
475         }
476         jd = jread(jf, jd, jdirection);
477     }
478     jsession_term(&jsdebug);
479     jsession_term(&jsmirror);
480 }
481
482 static void
483 jscan_do_record(struct jfile *jfin, const char *record_transid_file, const char *prefix, int64_t transid)
484 {
485     struct jsession jsdebug;
486     struct jsession jsrecord;
487     struct jdata *jd;
488
489     jsession_init(&jsdebug, jfin, jdirection,
490                   NULL, 0);
491     jsession_init(&jsrecord, jfin, jdirection,
492                   record_transid_file, transid);
493
494     assert(jdirection == JD_FORWARDS);
495     jsrecord.ss_jfout = jopen_prefix(prefix, 1);
496     if (jsrecord.ss_jfout == NULL) {
497         fprintf(stderr, "Unable to open prefix set for writing: %s\n", prefix);
498         exit(1);
499     }
500     if ((jmodes & JMODEF_RECORD_TRANSID_GOOD) && !(jmodes & JMODEF_INPUT_PIPE))
501         jd = jseek(jfin, transid, jdirection);
502     else
503         jd = jread(jfin, NULL, jdirection);
504     while (jd != NULL) {
505         if ((jmodes & JMODEF_DEBUG) && jsession_check(&jsdebug, jd))
506             dump_debug(&jsdebug, jd);
507         if (jsession_check(&jsrecord, jd))
508             dump_record(&jsrecord, jd);
509         if (donecheck(jdirection, jd, transid)) {
510             jfree(jfin, jd);
511             break;
512         }
513         jd = jread(jfin, jd, jdirection);
514     }
515     jclose(jsrecord.ss_jfout);
516     jsrecord.ss_jfout = NULL;
517     jsession_term(&jsdebug);
518     jsession_term(&jsrecord);
519 }
520
521 static void
522 jscan_do_debug(struct jfile *jf, const char *dummy1 __unused,
523                const char *dummy __unused, int64_t transid __unused)
524 {
525     struct jsession jsdebug;
526     struct jdata *jd;
527
528     jsession_init(&jsdebug, jf, jdirection,
529                   NULL, 0);
530     jd = NULL;
531     while ((jd = jread(jf, jd, jdirection)) != NULL) {
532         if (jsession_check(&jsdebug, jd))
533             dump_debug(&jsdebug, jd);
534         if (donecheck(jdirection, jd, transid)) {
535             jfree(jf, jd);
536             break;
537         }
538     }
539     jsession_term(&jsdebug);
540 }
541
542 static void
543 usage(const char *av0)
544 {
545     fprintf(stderr, 
546         "%s [-2duF] [-D dir] [-m mirror_transid_file/none]\n"
547         "\t[-o/O output_trnasid_file/none]\n"
548         "\t[-s size[kmgt]] -w/W record_prefix] [input_file/input_prefix]\n",
549         av0);
550     exit(1);
551 }
552