/*

* Copyright (c) 2002-2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of "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:

*

*/

#include "tsyscalls.h"

#include <unistd.h>

#include <fcntl.h>

#include <stdio.h>

#include <errno.h>

#include <dirent.h>

#include <sys/stat.h>

#include <stdlib.h>

#include <string.h>

#include <utime.h>

#include <time.h>

#include <sys/wait.h>

#include <sys/uio.h>

#include <sys/syslimits.h>

#include <pthread.h>

#include <sys/types.h>  

#include <sys/utsname.h>

#define CLOCKS_PER_SEC 128

/*******************************************************************************

  Test case : open1 creates a file Prog1.txt  in cdrive

              opens the file file in read-write mode 

       return : 0 on success 

*******************************************************************************/                           

TInt CTestSyscalls :: Creat(  )

	{

    int fd ;

    TPtrC String ;

    mkdir("C:\\Test" , S_IWUSR);

    _LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read input file name") ;

     	INFO_PRINTF1(Kerr) ;

		return KErrGeneral ;

		}

    TBuf8<100> string1;

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

    // Print to UI

    _LIT( KOpen1, "In create" );

    unlink(file) ; 

    INFO_PRINTF1( KOpen1 );

    if((fd = creat(file ,  0666))  < 0) 

		{

        _LIT(Kerr , "failed to open the file ") ;

        INFO_PRINTF1(Kerr) ;

    	return KErrGeneral ;

		}

    close(fd) ;

    return KErrNone ;

    }

/*******************************************************************************

  Test case : open1 creates a file Prog1.txt  in cdrive

              opens the file file in read-write mode 

       return : 0 on success 

*******************************************************************************/                           

TInt CTestSyscalls::open1(  )

    {

	int fd ;

    TPtrC String ;

    TInt IsDirectory ;        // This variable is used to find wheather a directory is 

                              //is opened    

    TInt Expected ; 

    _LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)  

		{

     	_LIT(Kerr , "Failed to read input file name") ;

     	INFO_PRINTF1(Kerr) ;

     	return KErrGeneral ;

		}

    TBuf8<100> string1;

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

	_LIT( KIsDirectory, "IsDirectory" );

	res = GetIntFromConfig(ConfigSection(), KIsDirectory, IsDirectory);

	if(!res)

		{

	 	_LIT(Kerr , "Failed to read directory flag") ;

	 	INFO_PRINTF1(Kerr) ;

	 	return KErrGeneral ;

		}

	_LIT( KExpected, "Expected" );

	res = GetIntFromConfig(ConfigSection(), KExpected, Expected);

	if(!res)

		{

	 	_LIT(Kerr , "Failed to read directory flag") ;

	 	INFO_PRINTF1(Kerr) ;

	 	return KErrGeneral ;

		}

	if(Expected < 0 ) 

		{

		fd = open(NULL , O_CREAT | O_RDWR  , 0444) ;

		if(fd < 0)  

			{

	   		if(errno != EFAULT) 

	   			{

	   			_LIT(Kerr , "Failed to set the errno value for open system call") ;

	   			INFO_PRINTF1(Kerr) ;

	   			return KErrGeneral ;

	   			}

	   		return KErrNone ; 

			}

		_LIT(Kerr , "open for NULL address should fail") ;

		INFO_PRINTF1(Kerr) ;

		return KErrGeneral ;

		}

    _LIT( KTsyscalls, "Tsyscalls" );

    INFO_PRINTF1(KTsyscalls) ;

    _LIT( KOpen1, "In open1" );

    unlink(file) ; 

    INFO_PRINTF1( KOpen1 );

    if((fd = open(file , O_CREAT | O_RDWR , 0666))  < 0) 

		{

        if(IsDirectory && (errno == EISDIR) )   

			{

        	_LIT(Kerrnone , "Directory open test case passes ") ;

        	INFO_PRINTF1(Kerrnone) ;

        	return KErrNone ;

			}

        else if(IsDirectory) 

			{

        	_LIT(Kerr , "Directory open test case fails to set err value") ;

        	INFO_PRINTF1(Kerr) ;

        	return KErrGeneral ;

			}

		_LIT(Kerr , "failed to open the file ") ;

		INFO_PRINTF1(Kerr) ;

    	return KErrGeneral ;

		}

    close(fd) ;

    return KErrNone ;

    }

//-------------------------------------------------------------------------------

//  Test case : open2 creates a file

//              opens in write only mode

//              return : 0 on success 

//              1 failure

//--------------------------------------------------------------------------------                  

TInt CTestSyscalls :: open2()

	{

	int fd ;

	TPtrC String ;

    _LIT( KString, "String" );

     TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(res)

		{

	    TBuf8<100> string1;

		string1.Copy(String);

		char* file = (char*) string1.Ptr();

		file[string1.Length()]='\0';

	    _LIT( KOpen3, "In open3" );

	    INFO_PRINTF1( KOpen3 );

	    unlink(file);

	    if((fd = open(file , O_CREAT | O_WRONLY , 0666))  < 0) 

			{

			return KErrGeneral ;

			}

	    close(fd) ;

		}

    return KErrNone ;

	}

//-------------------------------------------------------------------------------

//  Test case : open3 creates a file

//              opens in readonly mode

//              return : 0 on success 

//--------------------------------------------------------------------------------                  

TInt CTestSyscalls :: open3()

	{

	int fd ;

	TPtrC String ;

	_LIT( KString, "String" );

    TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(res)

		{

	    TBuf8<100> string1;

		string1.Copy(String);

		char* file = (char*) string1.Ptr();

		file[string1.Length()]='\0';

		_LIT( KOpen3, "In open3" );

	    INFO_PRINTF1( KOpen3 );

	    unlink(file);

	    if((fd = open(file ,  O_RDONLY | O_CREAT , 0666))  < 0) 

			{

	        return KErrGeneral ;

			}

	    close(fd) ;

	    return KErrNone  ;

		}

	else

		{

		return KErrGeneral;

		}

	}

//-------------------------------------------------------------------------------

//  Test case : open4 creates a file  (Negative testcase )

//   

//  Tries to open a fails  in invalid  mode           

//             

// Create a file Exclusively

//--------------------------------------------------------------------------------                  

TInt CTestSyscalls :: open4()

	{

	int fd ;

	TBuf8<100> string1;

	TPtrC String ;

	_LIT( KString, "String" );

	TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(!res)

		{

	    _LIT(Kerr , " Failed to  read input file name from ini file ") ;

	    INFO_PRINTF1(Kerr) ;

	    return KErrGeneral ;

		}

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

	_LIT( KOpen4, "In open4" );

	INFO_PRINTF1( KOpen4 );

    if((fd = open(file , O_CREAT | O_RDWR  , 0666))  < 0) 

		{

        _LIT(Kerr , "Failed to o given file name") ;

        INFO_PRINTF1(Kerr) ;

        return  KErrGeneral  ;

		}

    close(fd) ;

    //Now try to open the file exclusively , this open sustem call should fail

    fd = open(file , O_CREAT | O_EXCL | O_RDWR , 0666) ;

    if(fd < 0 )  

		{

    	if(errno != EEXIST) 

    		{

    		_LIT(Kerr , "Failed to set errno value for open syscall") ;

    		INFO_PRINTF1(Kerr) ;

    		return KErrGeneral ;

    		}

    	return KErrNone ;

		}

	_LIT(Kerr , "Failed to open a file in O_EXCL mode ") ;

	INFO_PRINTF1(Kerr) ;

	return KErrGeneral ;

	}

//-------------------------------------------------------------------------------

//  Test case : open5 creates a file  (Negative testcase )

//   

//  Tries to open a fails  in invalid  path

//             

// 

//--------------------------------------------------------------------------------                  

TInt CTestSyscalls :: open5()

	{

	int fd ;

    TInt ret = KErrNone ;

	TBuf8<100> string1;

    TPtrC String ;

	_LIT( KString, "String" );

	TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)    

		{

    	_LIT(Kerr , "Failed to read input file name from ini file") ;

    	INFO_PRINTF1(Kerr) ;

    	return KErrGeneral ;

		}

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

	_LIT( KOpen5, "In open5" );

    INFO_PRINTF1( KOpen5 );

    unlink(file);

    if((fd = open(file , O_CREAT | O_RDONLY , 0666))  < 0) 

		{

        if(errno != ENOENT)   

			{

        	_LIT(Kinvalidpath , "failed to  set errno value ") ;

        	INFO_PRINTF1(Kinvalidpath);

        	ret = KErrGeneral ;

			}

        }

    else 

		{

       _LIT(Kerr , "File opened in an invalid path test fails ") ;

	   close(fd);

       INFO_PRINTF1(Kerr) ;

       ret = KErrGeneral ;

		}

	close(fd) ;

	return ret ;    //This ret will be set to KErrNone if all test cases are though

	}

//-------------------------------------------------------------------------------

//  Test case : open6 truncates the file //   

//  

//             

// 

//--------------------------------------------------------------------------------                  

TInt CTestSyscalls :: open6()

	{

	int fd ;

	TBuf8<100> string1;

    TPtrC String ;

    _LIT( KString, "String" );

	TBool res = GetStringFromConfig(ConfigSection(), KString, String );

    if(!res)   

		{

    	_LIT(Kerr , "Failed to read input file value from the ini file") ;

    	INFO_PRINTF1(Kerr) ;

    	return KErrGeneral ;

		}

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

    _LIT( KOpen5, "In open6" );

    INFO_PRINTF1( KOpen5 );

    unlink(file);

    if((fd = open(file , O_CREAT|O_RDWR , 0666))  < 0) 

		{

        _LIT(Kinvalidarg , "Failed to open specified file \n")  ;

        INFO_PRINTF1(Kinvalidarg) ;

        return KErrGeneral ;

		}

    if(write(fd , "hELLO" ,6) < 0) 

		{

		_LIT(Kerr , "Failed to write to the file D:\\Prog1.txt") ;

		INFO_PRINTF1(Kerr) ;

		close(fd) ;

		return KErrGeneral ;

		}

    close(fd) ;

    if((fd = open(file , O_CREAT|O_RDWR|O_TRUNC , 0666))  < 0)  

		{

    	_LIT(Kerr , "Failed to tuncate the specified file ") ;

    	INFO_PRINTF1(Kerr) ;

    	return KErrGeneral ;

		}

    //seek  and find out the  size of the file

    if(lseek(fd , 0 , SEEK_END) != 0 )  

		{

    	_LIT(Kerr , "file could not be truncated ") ;

    	INFO_PRINTF1(Kerr) ;

		close(fd);

    	return  KErrGeneral ;

		}

	close(fd);

    return KErrNone ; 

	}

/**

 * Testcase 	:	OpenTruncate1

 * Description	: 	Open a file with O_CREAT | ORDWR flag

 * 					Re-open the same file with O_TRUNC

 * 					stat on the file to check whether the file is trunctaed or not

 * Return value	:	KErrNone

 */

TInt CTestSyscalls :: OpenTruncate1()

	{

	int fd1, fd2, ret;

	TBuf8<128> string1;

	TPtrC String ;

	struct stat fInfo;

	_LIT( KString, "String" );

	TBool res = GetStringFromConfig(ConfigSection(), KString, String );

	if(!res)   

		{

	   	_LIT(Kerr , "Failed to read input file value from the ini file") ;

	   	INFO_PRINTF1(Kerr);

	   	return KErrGeneral;

		}

	string1.Copy(String);

	char* file = (char*) string1.Ptr();

	file[string1.Length()]='\0';

	if((fd1 = open(file, O_CREAT | O_RDWR)) < 0)

		{

		INFO_PRINTF2(_L("file open failed with error number %d"), errno);

		return KErrGeneral;

		}

	if ((write(fd1, "Symbian", 7)) != 7)

		{

		INFO_PRINTF2(_L("write failed with error number %d"), errno);

		close(fd1);

		unlink(file);

		return KErrGeneral;

		}

	// re-open the same file with O_CREAT

	if((fd2 = open(file, O_TRUNC | O_WRONLY)) < 0)

		{

		INFO_PRINTF2(_L("file open with O_TRUNC failed with error number %d"), errno);

		close(fd1);

		unlink(file);

		return KErrGeneral;

		}

	ret = stat(file, &fInfo);

	if (ret == -1)

		{

		INFO_PRINTF2(_L("stat failed with error number %d"), errno);

		close(fd1);

		unlink(file);

		return KErrGeneral;		

		}

	if(fInfo.st_size != 0)

		{

		INFO_PRINTF1(_L("The file is not truncated. Testcase failed"));

		close(fd1);

		unlink(file);

		return KErrGeneral;

		}

	close(fd2);

	unlink(file);

	return KErrNone;

	}

/**

 * Testcase 	:	OpenTruncate2

 * Description	: 	open a non existing file with flag O_TRUNC

 * 					It should not create a new file 

 * Return value	:	KErrNone

 */

TInt CTestSyscalls :: OpenTruncate2()

	{