xref: /dragonfly/sbin/jscan/jscan.c (revision 1847e88f)
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 
553