/*
 * backup_test.c
 * source libplist regression test
 *
 * Copyright (c) 2009 Jonathan Beck All Rights Reserved.
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 * 
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA 
 */


#include "plist/plist.h"

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sys/stat.h>

int main(int argc, char *argv[])
{
	FILE *iplist = NULL;
	FILE *oplist = NULL;
	plist_t root_node1 = NULL;
	plist_t root_node2 = NULL;
	char *plist_xml = NULL;
	char *plist_xml2 = NULL;
	char *plist_bin = NULL;
	int size_in = 0;
	int size_out = 0;
	int size_out2 = 0;
	char *file_in = NULL;
	char *file_out[512];
	struct stat *filestats = (struct stat *) malloc(sizeof(struct stat));
	if (argc!= 2) {
		printf("Wrong input\n");
		return 1;
	}

	file_in = argv[1];
	//read input file
	iplist = fopen(file_in, "rb");

	if (!iplist) {
		printf("File does not exists\n");
		return 2;
	}
	printf("File %s is open\n", file_in);
	stat(file_in, filestats);
	size_in = filestats->st_size;
	plist_xml = (char *) malloc(sizeof(char) * (size_in + 1));
	fread(plist_xml, sizeof(char), size_in, iplist);
	fclose(iplist);


	//convert one format to another
	plist_from_xml(plist_xml, size_in, &root_node1);
	if (!root_node1) {
		printf("PList XML parsing failed\n");
		return 3;
	}
	else
		printf("PList XML parsing succeeded\n");

	plist_to_bin(root_node1, &plist_bin, &size_out);
	if (!plist_bin) {
		printf("PList BIN writing failed\n");
		return 4;
	}
	else
		printf("PList BIN writing succeeded\n");

	plist_from_bin(plist_bin, size_out, &root_node2);
	if (!root_node2) {
		printf("PList BIN parsing failed\n");
		return 5;
	}
	else
		printf("PList BIN parsing succeeded\n");

	plist_to_xml(root_node2, &plist_xml2, &size_out2);
	if (!plist_xml2) {
		printf("PList XML writing failed\n");
		return 8;
	}
	else
		printf("PList XML writing succeeded\n");

	if (plist_xml2) {
		FILE *oplist = NULL;
		char file_out[512];
		sprintf(file_out, "%s.out", file_in);
		oplist = fopen(file_out, "wb");
		fwrite(plist_xml2, size_out2, sizeof(char), oplist);
		fclose(oplist);
	}

	plist_free(root_node1);
	plist_free(root_node2);
	free(plist_bin);
	free(plist_xml);
	free(plist_xml2);
	free(filestats);

	if (size_in != size_out2) {
		printf("Size of input and output is different\n");
		printf("Input size : %i\n", size_in);
		printf("Output size : %i\n", size_out2);
	}

	//success
	return 0;
}