#include <stdio.h>
#include <stdlib.h>
#include <string.h>

#include "util.h"
#include "crc.h"
#include "fileutil.h"
#include "filenode.h"
#include "filenodecmp.h"

void help(char *exe){
	char exeFilename[MaxPath];
	File_GetName(exe,exeFilename);
	printf("Modo de uso:\n");
	printf("    %s info [file] {[file] {..}}\n",exeFilename);
	printf("    %s scan [dir] [tree] \n",exeFilename);
	printf("    %s rescan [dir] [tree] \n",exeFilename);
	printf("    %s read [file] [tree]\n",exeFilename);
	printf("    %s dir [dir]\n",exeFilename);
	printf("\n");
	printf("    %s sync [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s resync [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s synctest [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s resynctest [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("\n");
	printf("    %s copy [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s recopy [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s copytest [dirIzquierda] [dirDerecha]\n",exeFilename);
	printf("    %s recopytest [dirIzquierda] [dirDerecha]\n",exeFilename);
}


FileNode *checkDir(char *path,int recheck);
int sync(char *pathIzquierda,char *pathDerecha,int recheck,int dryrun);


int main(int argc,char *argv[]){
	FILE *f;
	unsigned long crc=0;
	FileTime ft;
	int i;

	if(argc<2){
		help(argv[0]);
		return 0;
	}

	if(!strcmp(argv[1],"info") && argc>=3){
		// Informacion de ficheros
		for(i=2;i<argc;i++){
			if(File_ExistePath(argv[i])){
				f=fopen(argv[i],"rb");
				if(f){
					crc=CRC_File(f);
					fclose(f);
				}
				ft=FileTime_Get(argv[i]);
				printf("%s:\t[%08X]\t",argv[i],crc);
				FileTime_Print(ft);printf("\n");
			}
		}
	}else
	if(!strcmp(argv[1],"scan") && argc==4){
		// Scanear informacion de directorio y guardar arbol
		FileNode *fn;
		printf("Building FileNode..\n");
		fn=FileNode_Build(argv[2]);
		FileNode_Save(fn,argv[3]);
	}else
	if(!strcmp(argv[1],"rescan") && argc==4){
		// Scanear informacion de directorio y guardar arbol
		FileNode *fn;
		printf("Loading FileNode..\n");
		fn=FileNode_Load(argv[3]);
		if(fn){
			printf("Rebuilding FileNode..\n");
			fn=FileNode_Refresh(fn,argv[2]);
			FileNode_Save(fn,argv[3]);
		}
	}else
	if(!strcmp(argv[1],"read") && argc==3){
		// Leer informacion de arbol
		FileNode *fn;
		fn=FileNode_Load(argv[2]);
		if(fn)FileNode_Print(fn);
	}else
	if(!strcmp(argv[1],"dir") && argc==3){
		// Leer informacion de dir
		char *path=argv[2];
		char dirNodesFile[MaxPath];
		FileNode *fn;

		fn=checkDir(path,1);
		if(fn){
			FileNode_Print(fn);
		}
	}else
	if(!strcmp(argv[1],"sync") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		sync(pathIzquierda,pathDerecha,1,0);
	}else
	if(!strcmp(argv[1],"resync") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		sync(pathIzquierda,pathDerecha,1,0);
	}else
	if(!strcmp(argv[1],"synctest") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		sync(pathIzquierda,pathDerecha,1,1);
	}else
	if(!strcmp(argv[1],"resynctest") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		sync(pathIzquierda,pathDerecha,0,1);


	}else
	if(!strcmp(argv[1],"copy") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		copy(pathIzquierda,pathDerecha,1,0);
	}else
	if(!strcmp(argv[1],"recopy") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		copy(pathIzquierda,pathDerecha,1,0);
	}else
	if(!strcmp(argv[1],"copytest") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		copy(pathIzquierda,pathDerecha,1,1);
	}else
	if(!strcmp(argv[1],"recopytest") && argc==4){
		// Sincronizar dos directorios
		char *pathIzquierda=argv[2];
		char *pathDerecha=argv[3];
		copy(pathIzquierda,pathDerecha,0,1);


	}else{
		help(argv[0]);
	}

	return(0);
}



FileNode *checkDir(char *path,int recheck){
	char dirNodesFile[MaxPath];
	FileNode *fn;
	// Comprobar directorio
	snprintf(dirNodesFile,MaxPath,"%s/"FileNode_Filename,path);
	if(recheck){
		printf("Checking Directory.. %s\n",path);
		fn=FileNode_Load(dirNodesFile);
		if(fn){
			fn=FileNode_Refresh(fn,path);
		}else{
			fn=FileNode_Build(path);
		}
		FileNode_Save(fn,dirNodesFile);
	}else{
		printf("Loading Directory.. %s\n",path);
		fn=FileNode_Load(dirNodesFile);
		if(!fn){
			printf("Error, no nodesFile.fs\n");
			return NULL;
		}
	}
	return fn;
}

int sync(char *pathIzquierda,char *pathDerecha,int recheck,int dryrun){
	char dirNodesFileIzq[MaxPath];
	char dirNodesFileDer[MaxPath];
	FileNode *fnIzquierda,*fnDerecha;

	// Comprobar y cargar directorios
	if(!File_ExistePath(pathIzquierda) || !File_EsDirectorio(pathIzquierda)){
		printf("Error, directory does not exist: %s\n",pathIzquierda);
		return 0;
	}
	if(!File_ExistePath(pathDerecha) || !File_EsDirectorio(pathDerecha)){
		printf("Error, directory does not exist: %s\n",pathDerecha);
		return 0;
	}
	fnIzquierda=checkDir(pathIzquierda,recheck);
	if(!fnIzquierda){return 0;}
	fnDerecha=checkDir(pathDerecha,recheck);
	if(!fnDerecha){return 0;}


	// Construir acciones
	printf("Building action list.. \n");
	AccionFileNode *afn=NULL;
	afn=AccionFileNode_BuildSync(fnIzquierda,fnDerecha);

	if(dryrun){
		// Mostrar lista de acciones
		AccionFileNode_Print(afn);
	}else{
		// Ejecutar lista de acciones
		AccionFileNode_RunList(afn,pathIzquierda,pathDerecha);
	}

	return(1);
}

int copy(char *pathIzquierda,char *pathDerecha,int recheck,int dryrun){
	char dirNodesFileIzq[MaxPath];
	char dirNodesFileDer[MaxPath];
	FileNode *fnIzquierda,*fnDerecha;

	// Comprobar y cargar directorios
	if(!File_ExistePath(pathIzquierda) || !File_EsDirectorio(pathIzquierda)){
		printf("Error, directory does not exist: %s\n",pathIzquierda);
		return 0;
	}
	if(!File_ExistePath(pathDerecha) || !File_EsDirectorio(pathDerecha)){
		printf("Error, directory does not exist: %s\n",pathDerecha);
		return 0;
	}
	fnIzquierda=checkDir(pathIzquierda,recheck);
	if(!fnIzquierda){return 0;}
	fnDerecha=checkDir(pathDerecha,recheck);
	if(!fnDerecha){return 0;}


	// Construir acciones
	printf("Building action list.. \n");
	AccionFileNode *afn=NULL;
	afn=AccionFileNode_BuildCopy(fnIzquierda,fnDerecha);

	if(dryrun){
		// Mostrar lista de acciones
		AccionFileNode_Print(afn);
	}else{
		// Ejecutar lista de acciones
		AccionFileNode_RunList(afn,pathIzquierda,pathDerecha);
	}

	return(1);
}