/*
* Copyright (c) 2005-2009 Nokia Corporation and/or its subsidiary(-ies).
* All rights reserved.
* This component and the accompanying materials are made available
* under the terms of the License "Eclipse Public License v1.0"
* which accompanies this distribution, and is available
* at the URL "http://www.eclipse.org/legal/epl-v10.html".
*
* Initial Contributors:
* Nokia Corporation - initial contribution.
*
* Contributors:
*
* Description: 
* @internalComponent 
* @released
*
*/


#include "image_handler.h"
#include "r_obey.h"
#include "r_romnode.h"
#include "r_coreimage.h"
#include "rofs_image_reader.h"
#include "rom_image_reader.h"
#include "e32_image_reader.h"
#include "e32rom.h"
#include "h_ver.h"
#include "sis2iby.h"
#include <time.h>

ECompression gCompress=ECompressionUnknown;
ostream *out = &cout;
string ImageReader::iE32ImgFileName = "";
string ImageReader::iZdrivePath = "";
string ImageReader::iLogFileName = "";
string ImageReader::iPattern = "";

string SisUtils::iOutputPath = ".";
string SisUtils::iExtractPath = ".";

TBool gIsOBYUTF8 = EFalse;
ImageHandler::ImageHandler() : iReader(NULL) ,iOptions(0), iSisUtils(NULL) {
}

ImageHandler::~ImageHandler() {
	if(iReader)
		delete iReader;

	if(iSisUtils)
		delete iSisUtils;
}


void ImageHandler::ProcessArgs(int argc, char*argv[]) {
	if( argc < 2) {
		throw ImageReaderUsageException("", "");
	}

	bool aOutFileGiven = false;
	int index = 1; 
	
	while( argc > index ) {
		char* arg = argv[index]; 
		if(arg[0] == '-') {
			switch(0x20 | arg[1]) {
			case 'd': 
				//dump header info
				iOptions |= DUMP_HDR_FLAG;
				break;
			case 'e': 
				iOptions |= DUMP_E32_IMG_FLAG; 
				++index ;
				if(index < argc) {
					arg = argv[index];
					ImageReader::iE32ImgFileName = string(arg);
				}
				else 
					throw ImageReaderUsageException("Usage error", arg);
				
				break;
			case 'h': 
				PrintUsage();
				exit(EXIT_SUCCESS);
			case 'o':  
				if(arg[2]) {
					if((stricmp(arg,"-OUTDIR")==0)) {
						++index;
						if(index < argc) {
							arg = argv[index];
							SisUtils::iOutputPath = string(arg);
						}
						else
							throw ImageReaderUsageException("Usage Error", arg); 
					}
					else
						throw ImageReaderUsageException("Usage Error", arg);
				}
				else {
					aOutFileGiven = true;
					++index;				
					if( index < argc ) {
						// unless using iOutFile.c_str() immediately after 
						// iOutFile = argv[index+1];
						// iOutFile will not be assign correctly,
						// is it a defect of gcc 3.4.5 ? 
						arg = argv[index];
						iOutFile = string(arg); 
					}
					else
						throw ImageReaderUsageException("Usage Error", arg); 
				}
				 
				break;
			case 'r': 				 
				if(arg[2])
					throw ImageReaderUsageException("Usage Error", arg);
				iOptions |= RECURSIVE_FLAG;				 
				break;
			case 's': 				
				if(arg[2]) {
					if(stricmp(arg,"-SIS2IBY")==0) {
						iOptions |= MODE_SIS2IBY;
					}
					else
						throw ImageReaderUsageException("Usage Error", arg);
				}
				else
					iOptions |= DUMP_DIR_ENTRIES_FLAG;
				
				break;
			case 't': 				 
				if((stricmp(argv[index],"-TMPDIR")==0)) {
					++index;
					if( index < argc ) {  
						arg = argv[index];
						SisUtils::iExtractPath = string(arg);
					}
					else
						throw ImageReaderUsageException("Usage Error", arg); 
				}
				else
					throw ImageReaderUsageException("Usage Error", arg);
				 
				break;
			case 'v':  
				if(arg[2])
					throw ImageReaderUsageException("Usage Error", arg);
				iOptions |= DUMP_VERBOSE_FLAG; 
				break;
			case 'l': 
				++index;
				if(index < argc) {
					arg = argv[index];
					ImageReader::iLogFileName = string(arg);
				}
				else
					throw ImageReaderUsageException("Usage error", arg);
				iOptions |= LOG_IMAGE_CONTENTS_FLAG;
				 
				break;
			case 'x': 
				++index;
				if(index < argc && 0 == arg[2]) {
					arg = argv[index];
					ImageReader::iPattern = string(arg);
				}
				else
					throw ImageReaderUsageException("Usage error", arg);

				iOptions |= EXTRACT_FILE_SET_FLAG; 
				 
				break;
			case 'z': 
				++index;
				if(index < argc ){
					arg = argv[index];
					ImageReader::iZdrivePath = string(arg);
				}
				else
					throw ImageReaderUsageException("Usage error", arg);					
				iOptions |= EXTRACT_FILES_FLAG; 
				
				break;
			default:
				throw ImageReaderUsageException("Invalid command", arg);
				break;
			}
		}
		else {
			if(!iInputFileName.empty()) {
				throw ImageReaderUsageException("Invalid command", "Multiple input file not supported");
			}

			SetInputFile(string(arg));
		}
		index++;
	}

	if( aOutFileGiven && !(iOptions & MODE_SIS2IBY) ) {
		ofstream* rdout = new ofstream(iOutFile.c_str(), ios_base::out | ios_base::trunc);
		if( !rdout->is_open()){
			delete rdout ;
			rdout = NULL ;
			throw ImageReaderException(iOutFile.c_str(), "Unable to open File");
		}
		out = rdout ;
	}

	// Disable -z option if -x option is passed
	if( (iOptions & EXTRACT_FILE_SET_FLAG) && (iOptions & EXTRACT_FILES_FLAG) ) {
		iOptions &= ~(EXTRACT_FILES_FLAG);
	}

	// -r option should be used along with -x option
	if( (iOptions & RECURSIVE_FLAG) && !(iOptions & EXTRACT_FILE_SET_FLAG) ) {
		throw ImageReaderUsageException("Usage error", "-r should be used with -x");
	}
}

EImageType ImageHandler::ReadMagicWord() {
	ifstream file(iInputFileName.c_str(), ios_base::in | ios_base::binary );
	
	EImageType retVal = EUNKNOWN_IMAGE;

	if( !file.is_open() ) {
		throw ImageReaderException(iInputFileName.c_str(), "Cannot open file ");
	}

	TUint8 magicWords[16];
	file.read(reinterpret_cast<char*>(magicWords),16);

	if(0 == memcmp(magicWords,"ROFS",4)) {		 
		retVal = EROFS_IMAGE; 			
	}else if(0 == memcmp(magicWords,"ROFx",4)) {
		retVal = EROFX_IMAGE;
	}
	else if(0 == memcmp(magicWords,"EPOC",4) && 0 == memcmp(&magicWords[8],"ROM",3) ) {		 
		retVal = EROM_IMAGE; 
	}
	else {
		E32ImageFile	aE32;
		TUint32			aSz;
		file.seekg(0,ios_base::end);
		aSz = file.tellg();
		file.seekg(0,ios_base::beg);			 
		aE32.Adjust(aSz);
		aE32.iFileSize = aSz;
		file  >> aE32;
	
		if(aE32.iError == KErrNone){
			retVal = EE32_IMAGE;
		}
		else {
			TExtensionRomHeader exRomHeader;
			file.seekg(0, ios_base::beg);
			file.read(reinterpret_cast<char*>(&exRomHeader), sizeof(TExtensionRomHeader));
			TUint zeroTime = time(0);
			// aExtensionRomHeader.iTime and aExtensionRomHeader.iKernelTime are 
			// in microseconds. So convert them to seconds and see if these are 
			// valid times e.g. a time(in seconds) after midnight Jan 1st, 1970
			TUint imgTime = exRomHeader.iTime / 1000000;
			TUint kernImgTime = exRomHeader.iKernelTime / 1000000;
			if( imgTime >= zeroTime && kernImgTime >= zeroTime) {
				//Check if the padding in the header has value 0xff
				retVal = EROMX_IMAGE;
				for(int i = sizeof(exRomHeader.iPad) - 1 ; i >= 0 ; i--){
					if(0xff != exRomHeader.iPad[i]){
						retVal = EUNKNOWN_IMAGE;
						break ;
					}
				}  
			}
		}		 
	}   
	
	if(retVal == EUNKNOWN_IMAGE){
		file.seekg(0,ios_base::beg);
        retVal = ReadBareImage(file);
	}

	file.close();

	return retVal;
}


/**
 * @fn ImageHandler::ReadBareImage
 * @brief this function processes image type under the condition of that if an image is given without header which means the image is not self-described
 * @return type of the image.
 */
EImageType ImageHandler::ReadBareImage(ifstream& aIfs) {
    TRomHeader romHdr ; 
    aIfs.read(reinterpret_cast<char*>(&romHdr),sizeof(TRomHeader)); 

    return ((romHdr.iRomBase >= KRomBase ) && 
		(romHdr.iRomRootDirectoryList > KRomBase ) &&
       (romHdr.iRomBase < KRomBaseMaxLimit ) && 
	   (romHdr.iRomRootDirectoryList < KRomBaseMaxLimit)) ? EBAREROM_IMAGE : EUNKNOWN_IMAGE;
     
}


void ImageHandler::HandleInputFiles() {
	if(!(iOptions & MODE_SIS2IBY)) {
		EImageType imgType = ReadMagicWord();
		
		switch(imgType)
		{
		case EROFS_IMAGE:
		case EROFX_IMAGE:
			iReader = new RofsImageReader(iInputFileName.c_str());
			break;
		case EROM_IMAGE:
			iReader = new RomImageReader(iInputFileName.c_str());
			break;
        case EBAREROM_IMAGE:
            iReader = new RomImageReader(iInputFileName.c_str(), EBAREROM_IMAGE);
            break;
		case EROMX_IMAGE:
			iReader = new RomImageReader(iInputFileName.c_str(), EROMX_IMAGE);
			break;
		case EE32_IMAGE:
			iReader = new E32ImageReader(iInputFileName.c_str());
			break;
		default:
			{
            throw ImageReaderException(iInputFileName.c_str(), "Unknown Type of Image file");
			}
			break;
		}

		if(iReader) {
			iReader->ReadImage();
			iReader->ProcessImage();
			iReader->Validate();
			iReader->SetDisplayOptions( iOptions );
			iReader->ExtractImageContents();
			iReader->Dump();
		}
	}
	else {
		if(iInputFileName.empty()) {
			throw SisUtilsException("Usage Error", "No SIS file passed");
		}

		iSisUtils = new Sis2Iby(iInputFileName.c_str());

		if(iSisUtils) {
			if(iOptions & DUMP_VERBOSE_FLAG) {
				iSisUtils->SetVerboseMode();
			}

			iSisUtils->ProcessSisFile();
			iSisUtils->GenerateOutput();
		}
		else {
			throw SisUtilsException("Error:", "Cannot create Sis2Iby object");
		}
	}
}

void ImageHandler::PrintVersion() {
	*out << "\nReadimage - reader for Rom, Rofs and E32 images V";
	out->width(1);
	*out << MajorVersion << ".";
	out->width(2);
	out->fill('0');
	*out << MinorVersion << " (";
	out->width(3);
	*out << Build  << ") " << endl;
	*out << Copyright;
}

void ImageHandler::PrintUsage() {
	PrintVersion();
	const char aUsage[] = 
		"Usage: readImage [options] [<-sis2iby> [sis-options]] <filename>\n\n"
		"Options: With no options, it prints the files and directories in image\n"
		"       -o      output file name\n"
		"       -d      dump header information(default)\n"
		"       -s      dump the directory structure\n"
		"       -v      dump image headers and directory structure\n"
		"       -e xxx  dump the xxx e32 image within the entire image when used along with -v or -s option\n"
		"       -h      this message\n"
		"       -z xxx  extract all the file(s) from the given image to xxx location\n"
		"       -l xxx  log the image contents on to xxx file\n"
		"       -x xxx  extract single or set of files as given in xxx from the given image\n"
		"       -r      recursively extract files from the sub-directories when used along with -x option\n\n"
		"SIS-options: Option -sis2iby changes the mode to generate IBY from SIS file\n"
		"       -sis2iby      generates iby file for the given SIS file\n"
		"       -tmpdir xxx   extract all sis file contents to xxx location\n"
		"       -outdir xxx   generates the iby file(s) to xxx location\n"
		"       -v            verbose output\n";
	*out << aUsage << endl;
}

int main(int argc, char* argv[]) {
	ImageHandler aIh;
	int retVal = EXIT_SUCCESS;
	try {
		aIh.ProcessArgs(argc, argv);
		aIh.HandleInputFiles();
	}
	catch(ImageReaderUsageException& aIre) {
		if(argc >= 2) {
			//This is a usage error and has to be reported
			//Otherwise, it is called just to display the usage
			aIre.Report();
		}
		aIh.PrintUsage();
		retVal = EXIT_FAILURE;
	}
	catch(ImageReaderException& aIre) {
		aIre.Report();
		retVal = EXIT_FAILURE;
	}
	catch(SisUtilsException& aSUe) {
		aSUe.Report();
		retVal = EXIT_FAILURE;
	}
	
	if(out != &cout){
		ofstream* rdout = static_cast<ofstream*>(out) ;
		rdout->close() ;
		delete rdout ; 
	}

	return retVal;
}