/*

 * 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 "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:  Implementation of link/symlink.

 *

 */

 // INCLUDE FILES

 #include <sys/errno.h>

 #include <sys/types.h>

 #include <wchar.h>

 #include <string.h>

 #include <unistd.h>

 #include "lposix.h"

 #include <sys/stat.h>

 #include <sys/limits.h>

 #include "sysreent.h"

 #include <stdlib.h>

 #include "sysif.h"

 #include "systemspecialfilercg.h"

 #include "link.h"

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

 // Funcation name: link

 // Description: Provides link functionality.

 // Returns:  0    : On success

 //          -1    : On error

 // In case of error, errno value set

 // Remark: This is a simulated functionality and not supported by the platform     

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

 //

 extern "C" {

 #define	MAXPATHLEN	260	/* E32STD.H: KMaxFullName + 4 to avoid data loss */

 EXPORT_C int link(const char *oldpath, const char *newpath)

 	{

     wchar_t _oldwidename[MAXPATHLEN+1];

     wchar_t _newwidename[MAXPATHLEN+1];

 	if ((size_t)-1 != mbstowcs(_oldwidename, oldpath, MAXPATHLEN) && \

 	    (size_t)-1 != mbstowcs(_newwidename, newpath, MAXPATHLEN)) 

 		{

 	    return _link_r(&errno, _oldwidename, _newwidename);		

 		}

 	errno = EILSEQ;

 	return -1;

 	}

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

 // Funcation name: symlink

 // Description: Provides symlink functionality which is exactly similar to link

 // in our case.

 // Returns: ssize_t : On success

 //          -1      : On error

 // In case of error, errno value set

 //      

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

 //

 EXPORT_C int symlink(const char *oldpath, const char *newpath)

 	{

     wchar_t _oldwidename[MAXPATHLEN+1];

     wchar_t _newwidename[MAXPATHLEN+1];

 	if ((size_t)-1 != mbstowcs(_oldwidename, oldpath, MAXPATHLEN) && \

 	    (size_t)-1 != mbstowcs(_newwidename, newpath, MAXPATHLEN)) 

 		{

 	    return _link_r(&errno, _oldwidename, _newwidename);		

 		}            

 	errno = EILSEQ;

 	return -1;	

 	}

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

 // Funcation name: readlink

 // Description: Reads the link file.

 // Returns: ssize_t : On success

 //          -1      : On error

 // In case of error, errno value set

 //      

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

 //

 EXPORT_C ssize_t readlink(const char *path, char *buf, int bufsize)

 {

 	TSpecialFileType fileType;

 	struct SLinkInfo enBuf;

 	int err = KErrNone;

 	char name[MAXPATHLEN+1];

 	wchar_t widename[MAXPATHLEN+1];

 	if(path)

 		{	

 		if ((size_t)-1 != mbstowcs(widename, path, MAXPATHLEN)) 

 			{	

 			/*Special file identification and read of IPC is utilized here*/

 			if( (fileType = _SystemSpecialFileBasedFilePath(widename, err, Backend()->FileSession())) == EFileTypeSymLink)

 				{

 				if (err)

 				    {

 			    	return MapError(err, errno);

 					}

 				err = _ReadSysSplFile(widename, (char*)&enBuf, sizeof(struct SLinkInfo), errno, Backend()->FileSession());

 				if (err == KErrNone)

 					{

 					if((0 < bufsize && bufsize <= SSIZE_MAX) && NULL != buf )	

 						{

 						if ((size_t)-1 != wcstombs(name, enBuf.iParentPath, sizeof(enBuf.iParentPath)))

 							{

 							strncpy(buf, name, bufsize);

 							return (strlen(name) >= bufsize ? bufsize : strlen(buf));

 							}

 						}

 					else

 						{

 						errno = EINVAL;

 						return -1;	

 						}

 					}

 				}

 			else if(err || (EFileNotFound == fileType))

 				{

 				return MapError(err, errno);

 				}				

 			errno = EINVAL;

 			return -1;		

 			}

 		return MapError(EILSEQ, errno);	

 		}

 	return MapError(EINVAL, errno);	

 	}

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

 // Funcation name: unlink

 // Description: Provides unlink functionality.

 // Returns:  0    : On success

 //          -1    : On error

 // In case of error, errno value set

 //      

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

 //

 EXPORT_C int unlink(const char *pathname)

 {

 	wchar_t _pathwidename[MAXPATHLEN+1];    

 	if ((size_t)-1 != mbstowcs(_pathwidename, pathname, MAXPATHLEN)) 

 	{

 	    return _unlink_r(&errno, _pathwidename);		

 	}            

 	errno  = EILSEQ;

 	return -1;	      

 }

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

 // Funcation name: lstat, __xstat, __lxstat

 // Description: All these functions directly call stat by themself .

 // Returns:  0      : On success

 //          -1      : On error

 // In case of error, errno value set

 //      

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

 //

 EXPORT_C int lstat(const char *file_name, struct stat *buf)

 	{

     if(!buf)

        {

         errno = EFAULT ;

         return -1 ; 

        }

     wchar_t tmpbuf[MAXPATHLEN+1];   

     if ((size_t)-1 != mbstowcs(tmpbuf, file_name, MAXPATHLEN))

         {

         return _lstat_r(&errno, tmpbuf, buf);

         }

     errno = EILSEQ;     

     return -1;    

 	}

 EXPORT_C int __xstat(int /*vers*/, const char *file, struct stat *buf)

 	{

 	return stat(file, buf);

 	}

 EXPORT_C int __lxstat (int /*version*/, const char *file, struct stat *buf)

 	{

 	return lstat(file, buf);

 	}

 } // extern "C"

 //  End of File