/*
	This program is used to concatenate overlapping (time-stamp) log files.
	This occurs when a traced program forks and the parent continue to work
	on its own. If we want to analyse (using maplog or showleak) the
	child process, we must concatenate the start of the parent log file
	and the child log file. The start of the parent log file ends
	before the fork.

	To perform the "cat", we simply read the files until the time-stamp
	of the parent is newer than the first line of the child log file.

	For completness, the program accept many input file, assuming
	one is the parent of the next.
*/
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <tlmplib.h>
#include <string>

using namespace std;

<mod>
int main (int argc, char *argv[])
{
	glocal bool opt = false;
	int ret = <call tlmpprogram>(argc,argv);
	<f init>
		setproginfo ("catlog",PACKAGE_REV
			,"Concatenate mapmalloc overlapping log files\n"
			 "It is used when the traced program forks\n"
			 "and the parent continue to evolve.\n");
	</f>
	<f main>
		int ret = -1;
		FILE *tbf[argc];
		string tbstart[argc];
		for (int i=0; i<argc; i++){
			FILE *fin = fopen64 (argv[i],"r");
			if (fin == NULL){
				tlmp_error ("Can't open file %s (%s)\n",argv[i]
					,strerror(errno));
				exit (-1);
			}else{
				tbf[i] = fin;
				char line[2000];
				if (fgets(line,sizeof(line)-1,fin)!=NULL){
					tbstart[i] = line;
				}
			}
		}
		for (int i=0; i<argc; i++){
			printf ("%s",tbstart[i].c_str());
			const char *next = "ffffffff";
			if (i < argc - 1) next = tbstart[i+1].c_str();
			char line[2000];
			FILE *fin = tbf[i];
			while (fgets(line,sizeof(line)-1,fin)!=NULL){
				if (strcmp(line,next)>=0) break;
				fputs (line,stdout);
			}
			fclose (fin);
		}
		return ret;
	</f>
	</call>
	return ret;
}
</mod>