Windows NT 4.0 source code leak
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 
 
 

315 lines
6.8 KiB

/***
*fullpath.c -
*
* Copyright (c) 1987-1995, Microsoft Corporation. All rights reserved.
*
*Purpose: contains the function _fullpath which makes an absolute path out
* of a relative path. i.e. ..\pop\..\main.c => c:\src\main.c if the
* current directory is c:\src\src
*
*Revision History:
*
* 12-21-87 WAJ Initial version
* 01-08-88 WAJ now treats / as an \
* 06-22-88 WAJ now handles network paths ie \\sl\users
* 01-31-89 SKS/JCR Renamed _canonic to _fullpath
* 04-03-89 WAJ Now returns "d:\dir" for "."
* 05-09-89 SKS Do not change the case of arguments
* 11-30-89 JCR Preserve errno setting from _getdcwd() call on errors
* 03-07-90 GJF Replaced _LOAD_DS with _CALLTYPE1, added #include
* <cruntime.h>, removed #include <register.h> and fixed
* the copyright.
* 04-25-90 JCR Fixed an incorrect errno setting
* 06-14-90 SBM Fixed bugs in which case of user provided drive letter
* was not always preserved, and c:\foo\\bar did not
* generate an error
* 08-10-90 SBM Compiles cleanly with -W3
* 08-28-90 SBM Fixed bug in which UNC names were being rejected
* 09-27-90 GJF New-style function declarator.
* 01-18-91 GJF ANSI naming.
* 11-30-92 KRS Ported _MBCS code from 16-bit tree.
* 04-06-93 SKS Replace _CRTAPI* with __cdecl
* 04-26-93 SKS Add check for drive validity
* 08-03-93 KRS Change to use _ismbstrail instead of isdbcscode.
* 09-27-93 CFW Avoid cast bug.
* 12-07-93 CFW Wide char enable.
* 01-26-94 CFW Remove unused isdbcscode function.
* 11-08-94 GJF Revised to use GetFullPathName.
* 02-08-95 JWM Spliced _WIN32 & Mac versions.
*
*******************************************************************************/
#ifdef _WIN32
#include <cruntime.h>
#include <stdio.h>
#include <direct.h>
#include <errno.h>
#include <stdlib.h>
#include <internal.h>
#include <tchar.h>
#include <windows.h>
/***
*_TSCHAR *_fullpath( _TSCHAR *buf, const _TSCHAR *path, maxlen );
*
*Purpose:
*
* _fullpath - combines the current directory with path to form
* an absolute path. i.e. _fullpath takes care of .\ and ..\
* in the path.
*
* The result is placed in buf. If the length of the result
* is greater than maxlen NULL is returned, otherwise
* the address of buf is returned.
*
* If buf is NULL then a buffer is malloc'ed and maxlen is
* ignored. If there are no errors then the address of this
* buffer is returned.
*
* If path specifies a drive, the curent directory of this
* drive is combined with path. If the drive is not valid
* and _fullpath needs the current directory of this drive
* then NULL is returned. If the current directory of this
* non existant drive is not needed then a proper value is
* returned.
* For example: path = "z:\\pop" does not need z:'s current
* directory but path = "z:pop" does.
*
*
*
*Entry:
* _TSCHAR *buf - pointer to a buffer maintained by the user;
* _TSCHAR *path - path to "add" to the current directory
* int maxlen - length of the buffer pointed to by buf
*
*Exit:
* Returns pointer to the buffer containing the absolute path
* (same as buf if non-NULL; otherwise, malloc is
* used to allocate a buffer)
*
*Exceptions:
*
*******************************************************************************/
_TSCHAR * __cdecl _tfullpath (
_TSCHAR *UserBuf,
const _TSCHAR *path,
size_t maxlen
)
{
_TSCHAR *buf;
_TSCHAR *pfname;
unsigned long count;
if ( !path || !*path ) /* no work to do */
return( _tgetcwd( UserBuf, maxlen ) );
/* allocate buffer if necessary */
if ( !UserBuf )
if ( !(buf = malloc(_MAX_PATH * sizeof(_TSCHAR))) ) {
errno = ENOMEM;
return( NULL );
}
else
maxlen = _MAX_PATH;
else
buf = UserBuf;
count = GetFullPathName ( path,
maxlen,
buf,
&pfname );
if ( count >= maxlen ) {
errno = ERANGE;
return( NULL );
}
else if ( count == 0 ) {
_dosmaperr( GetLastError() );
return( NULL );
}
return( buf );
}
#else /* ndef _WIN32 */
#include <cruntime.h>
#include <stdio.h>
#include <direct.h>
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <internal.h>
#include <macos\osutils.h>
#include <macos\files.h>
#include <macos\errors.h>
#ifdef _MBCS
#include <mbdata.h>
#include <mbctype.h>
#include <mbstring.h>
int isdbcscode (const char *, const char *);
#endif
/***
*char *_fullpath( char *buf, const char *path, maxlen );
*
*Purpose:
*
* _fullpath - combines the current directory with path to form
* an absolute path. i.e. _fullpath takes care of ::
* in the path.
*
* The result is placed in buf. If the length of the result
* is greater than maxlen NULL is returned, otherwise
* the address of buf is returned.
*
* If buf is NULL then a buffer is malloc'ed and maxlen is
* ignored. If there are no errors then the address of this
* buffer is returned.
*
*
*Entry:
* char *buf - pointer to a buffer maintained by the user;
* char *path - path to "add" to the current directory
* int maxlen - length of the buffer pointed to by buf
*
*Exit:
* Returns pointer to the buffer containing the absolute path
* (same as buf if non-NULL; otherwise, malloc is
* used to allocate a buffer)
*
*Exceptions:
*
*******************************************************************************/
char * _CALLTYPE1 _fullpath (
char *UserBuf,
const char *path,
size_t maxlen
)
{
char *buf;
size_t cbPath;
if( !path || !*path ) /* no work to do */
return( _getcwd( UserBuf, maxlen ) );
if (UserBuf && (strlen(path) > maxlen))
return NULL;
/* allocate buffer if necessary */
if( !UserBuf )
{
if( !(buf = malloc(_MAX_PATH)) )
{
errno = ENOMEM;
return( NULL );
}
else
{
maxlen = _MAX_PATH;
}
}
else
{
buf = UserBuf;
}
cbPath = strlen(path);
if (cbPath > maxlen)
{
errno = ERANGE;
return NULL;
}
maxlen = maxlen - cbPath;
if (*path == ':')
{
maxlen++; //this ":" is not counted
}
if ((*path == ':') ||
#ifndef _MBCS
(strstr(path, ":") == NULL) )
#else
(_mbsstr(path, ":") == NULL) )
#endif
{
//partial path
if (_getcwd( buf, maxlen ) != NULL)
{
if (*path == ':')
{
strcat(buf, path+1);
}
else
{
strcat(buf, path);
}
}
else
{
if (!UserBuf)
{
free(buf);
}
return( NULL);
}
}
else
{
//fullpath
strcpy(buf, path);
}
return buf;
}
#ifdef _MBCS
/***
* int isdbcscode( char *path, char *buf );
*
*Purpose:
*
* isdbcscode - Check DBCS Code
*
*Entry:
* char *path - full path
* char *buf - pointer to a buffer maintained by the user;
*
*Exit:
* TRUE : -1
* FALSE : 0
*
*Exceptions:
*
*******************************************************************************/
int isdbcscode(const char *path, const char *buf)
{
while(path <= buf && *path++) {
if(_ISLEADBYTE( *(path - 1) ) )
if(path == buf)
return(-1);
else
path++;
}
return 0;
}
#endif
#endif /* _WIN32 */