/*++

Copyright (c) 2005 - 2009, Intel Corporation. All rights reserved.<BR>
This program and the accompanying materials
are licensed and made available under the terms and conditions of the Software
License Agreement which accompanies this distribution.


Module Name:

  open.c

Abstract:

  Routines dealing with file open

Revision History

--*/

#include <sys/stat.h>
#include <fcntl.h>
#include "Ntfs.h"
#include "ntfs/ntfsdir.h"
#include "ntfs/ntfsfile.h"

/*static CHAR16 whd = L"0123456789ABCDEF";

int ReverseLookup(NTFS_VOLUME *Volume, CHAR16 *FileName, CHAR* FileName)
{
	MFT_REF mft;
	int pos = 0;
	CHAR16 *ptr;
	CHAR16 digit;
	UINT8 bcd;

	ptr = FileName;

	while(*ptr != 0x00)
		ptr++;

	mft = 0;
	ptr--;	// move on latest char16
	while(ptr >= FileName)
	{	// reconstruct path..
		digit = *ptr;

		if (digit >= L'0' && digit <= L'9')
			digit = digit - L'0';

		if (digit >= 'A' && digit <= 'F')
			digit = (digit - L'A' + 10);

		bcd = digit;

		mft = mft & bcd;
		mft = mft << 4;
	}

	// now we have INODE!
	ntfs_inode *ni = ntfs_inode_open(Volume->vol, mft);

	ntfs_inode_get
}*/

EFI_STATUS
EFIAPI
NtfsOpen (
  IN  EFI_FILE_PROTOCOL   *FHand,
  OUT EFI_FILE_PROTOCOL   **NewHandle,
  IN  CHAR16              *FileName,
  IN  UINT64              OpenMode,
  IN  UINT64              Attributes
  )
/*++
Routine Description:

  Implements Open() of Simple File System Protocol.

Arguments:

  FHand                 - File handle of the file serves as a starting reference point.
  NewHandle             - Handle of the file that is newly opened.
  FileName              - File name relative to FHand.
  OpenMode              - Open mode.
  Attributes            - Attributes to set if the file is created.

Returns:

  EFI_INVALID_PARAMETER - The FileName is NULL or the file string is empty.
                          The OpenMode is not supported.
                          The Attributes is not the valid attributes.
  EFI_OUT_OF_RESOURCES  - Can not allocate the memory for file string.
  EFI_SUCCESS           - Open the file successfully.
  Others                - The status of open file.

--*/
{
	NTFS_IFILE   *IFile;
	NTFS_IFILE   *NewIFile;
	//NTFS_OFILE   *OFile;
	EFI_STATUS  Status;
	ntfs_inode	*inode;
	NTFS_VOLUME *Volume;
	struct _reent r;
	CHAR8	AsciiFileName[260], TempPath[260];
	int flags, mode, FileNameSize, i;
	CHAR8	*LastSeparator;

	//
	// Perform some parameter checking
	//
	if (FileName == NULL || (NewHandle == NULL)) {
		Print("NtfsOpen: FileName is null!\n\r");
		return EFI_INVALID_PARAMETER;
	}

	IFile = IFILE_FROM_FHAND (FHand);

	memset(AsciiFileName, 0, 260);
	memset(TempPath, 0, 260);

	FileNameSize = StrLen(FileName);
		//FileNameSize +=  (IFile->FileName != NULL) ? StrLen(IFile->FileName) : 0;

	UnicodeStrToAsciiStr(FileName, TempPath);	// local name
	
	FileNameSize++;
	//Print(L"NtfsOpen(%a, %s)\n", IFile->FullPath, FileName);

	//AsciiPrint("FillFileName(%a,%a)\n", IFile->FullPath, TempPath);
	FileNameSize = CreateFileName(AsciiFileName, IFile->FullPath, TempPath);

 
  //
  // Check for a valid mode
  //
  switch (OpenMode) {
  case EFI_FILE_MODE_READ:
	  flags = O_RDONLY; mode = 0; break;
  case EFI_FILE_MODE_READ | EFI_FILE_MODE_WRITE:
	  flags = O_RDWR; mode = 0; break;
  case EFI_FILE_MODE_READ | EFI_FILE_MODE_WRITE | EFI_FILE_MODE_CREATE:
	  flags = O_CREAT | O_RDWR; mode = 0; break;
    break;

  default:
	  //Print(L"NtfsOpen -> OpenMode invalid! %x\n\r", OpenMode);
	  flags = 0; mode = 0;
    return EFI_INVALID_PARAMETER;
  }
  
  //
  // Check for valid Attributes for file creation case. 
  //
  if (((OpenMode & EFI_FILE_MODE_CREATE) != 0) && (Attributes & (EFI_FILE_READ_ONLY | (~EFI_FILE_VALID_ATTR))) != 0) {
	  //Print(L"NtfsOpen -> Attributes for file creation case failed.\n\r");
	return EFI_INVALID_PARAMETER;
  }
  
  //OFile = IFile->OFile;
  Volume = IFile->Volume;
  //Print(L"IFile %x\n\rVolume %x\n\rMFT no. %d\n\r", IFile, Volume, (UINTN) IFile->inode->mft_no);
  //
  // Lock
  //
  NtfsAcquireLock ();
  
	if (IFile->Type == FSW_EFI_FILE_TYPE_DIR)
	{
		IFile->Volume->vd->cwd_ni = IFile->inode;	// set root parent
	}

	if ((OpenMode & EFI_FILE_MODE_CREATE) && (Attributes & EFI_FILE_DIRECTORY))
	{	// Create a directory!
		inode = ntfsCreate(IFile->Volume->vd, AsciiFileName, S_IFDIR, NULL);
	}
	else if ((OpenMode & EFI_FILE_MODE_CREATE))
	{	// Create a file or open if exists...
		inode = ntfsCreate(IFile->Volume->vd, AsciiFileName, S_IFREG, NULL);
		if (inode == NULL)
		{	// file exists.. try to open!
			inode = ntfsOpenEntry(IFile->Volume->vd, AsciiFileName);
		}
	}
	else if ((AsciiStrCmp(AsciiFileName, "\\" ) == 0) || (AsciiStrCmp(AsciiFileName, "/") == 0) || (AsciiStrCmp(AsciiFileName, "") == 0) ||  (AsciiStrCmp(AsciiFileName, L".") == 0))
	{
		inode = ntfs_inode_open(Volume->vd->vol, FILE_root);	// access to root!
	}
	else
	{	// try to open ...
		inode = ntfsOpenEntry(IFile->Volume->vd, AsciiFileName);
	}

	if (inode != NULL)
	{	// return a valid handle!
		Ntfs_inode_to_FileHandle(inode, NewHandle);

		NewIFile = IFILE_FROM_FHAND(*NewHandle);
		
		CopyMem(NewIFile->FullPath, AsciiFileName, FileNameSize * sizeof(CHAR8));

		if (AsciiStrCmp(TempPath, ".") == 0 || AsciiStrCmp(TempPath, "..") == 0)
		{
			CopyMem(NewIFile->FileName, AsciiFileName, FileNameSize * sizeof(CHAR8));
		}
		else
		{
			CopyMem(NewIFile->FileName, TempPath, AsciiStrLen(TempPath) * sizeof(CHAR8));
		}

		NewIFile->Position = 0;
		NewIFile->Volume = Volume;
		if (inode->mft_no == FILE_root)
		{	// mark as root directory!
			NewIFile->RootDir = TRUE;
		}
		NewIFile->inode = inode;			//	current element
		NewIFile->dir_ni = IFile->inode;	//	root!

		if (NewIFile->Type == FSW_EFI_FILE_TYPE_FILE)
		{	// open file
			NewIFile->fileState = AllocateZeroPool(sizeof(struct _ntfs_file_state));

			NewIFile->fileState->vd = Volume->vd;	// sete reference
			NewIFile->fileState->ni = inode;
			ntfs_open_r(&r, NewIFile->fileState, AsciiFileName, flags, 0);
		}
		else if (NewIFile->Type == FSW_EFI_FILE_TYPE_DIR)
		{	//
			NewIFile->dirState = AllocateZeroPool(sizeof(ntfs_dir_state));
		}

		Status = EFI_SUCCESS;
	} 
	else 
	{
		Status = EFI_INVALID_PARAMETER;
		*NewHandle = INVALID_HANDLE_VALUE;
	}
	
	NtfsReleaseLock();
  	return Status;
}