Moving NSCP Directory Server from DirectoryBranch to TRUNK, initial drop. (foxworth)ldapserver7x

1 files changed, 266 insertions, 0 deletions

diff --git a/lib/libnt/path.c b/lib/libnt/path.c
new file mode 100644
index 00000000..6691bc98
--- /dev/null
+++ b/lib/libnt/path.c
@@ -0,0 +1,266 @@
+/** BEGIN COPYRIGHT BLOCK
+ * Copyright 2001 Sun Microsystems, Inc.
+ * Portions copyright 1999, 2001-2003 Netscape Communications Corporation.
+ * All rights reserved.
+ * END COPYRIGHT BLOCK **/
+/***********************************************************
+ *	Path functions - removing ../ from path
+ **********************************************************/
+#include <windows.h>
+#include <stdio.h>    
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <io.h>    /* For _findfirst */
+#include <direct.h>    /* For _rmdir */
+#include <errno.h>
+#include "nt/ntos.h"
+
+DWORD NS_WINAPI
+PATH_RemoveRelative ( char * path )
+{
+	char * src;
+	char * dst;
+
+    src = path;
+    dst = path;
+    while ( *src ) {
+		if ( *src == '.' ) {
+    		if (  *(src+1) == '.' ) {
+    			/* strip off the "../" */
+    			src += 2;
+
+    			/* back off least significant directory */
+                dst--;
+    			if ( ( *dst == '\\' ) || ( *dst == '/' ) ) 
+    				*dst--;
+    			while ( dst > path ) {
+    				if ( ( *dst == '\\' ) || ( *dst == '/' ) ) 
+    					break;
+                    dst--;
+                }
+			} else {
+                // remove single "."
+            }
+
+		} else
+			*dst++ = *src++;
+	}
+	*dst = '\0';						 
+
+	return TRUE;
+}
+DWORD NS_WINAPI 
+PATH_ConvertNtSlashesToUnix( LPCTSTR  lpszNtPath, LPSTR lpszUnixPath )
+{
+    if ( lpszNtPath == NULL )
+        return 0;
+
+	/* create reverse slashes and escape them */
+	while ( *lpszNtPath ) {
+		if ( *lpszNtPath == '\\' )
+			*lpszUnixPath = '/';
+        else
+			*lpszUnixPath = *lpszNtPath;
+		lpszNtPath++;
+		lpszUnixPath++;
+	}
+    *lpszUnixPath = '\0';
+    return 0;
+}
+
+static DWORD 
+PATH_DeleteRecursivelyFoundFile ( char * fullFileName, char * path, char * fileName )
+{
+    if ( strcmp ( fileName, "." ) == 0)
+        return TRUE;
+             
+    if ( strcmp ( fileName, ".." ) == 0)
+        return TRUE;
+             
+    strcpy ( fullFileName, path );
+    strcat ( fullFileName, "\\" );
+    strcat ( fullFileName,  fileName );
+    return PATH_DeleteRecursively ( fullFileName );
+}
+
+/* if the path specified is a file name, the file is deleted
+ * If the path specifies a directory, the directory is deleted
+ */
+DWORD NS_WINAPI
+PATH_DeleteRecursively ( char * path )
+{
+	int result;
+	unsigned short fileStatus;
+	struct _stat buf;
+    struct _finddata_t fileFound;
+    long hFile;
+    DWORD retStatus = TRUE;
+    char fullFileName[_MAX_PATH];
+    int error;
+    
+	/* Check if statistics are valid: */
+	result = _stat( path, &buf );
+	if( result != 0 )
+		return TRUE;					// file or directory does not exist
+
+	fileStatus = buf.st_mode & _S_IFMT;
+
+    /* check if regular file */
+	if ( fileStatus & _S_IFREG ) {
+        if ( remove ( path ) == -1 ) {
+            error = errno;
+            switch ( error ) {
+            case ENOENT:
+                break;
+
+            case EACCES:
+                break;
+
+            default:
+                break;
+            }
+
+            return FALSE;
+        }
+        return TRUE;
+    }
+    if ( (fileStatus & _S_IFDIR) == 0 )
+        return FALSE; 
+
+
+    /* path contains a directory, delete all files recursively */
+    /* Find first .c file in current directory */
+    strcpy ( fullFileName, path );
+    strcat ( fullFileName, "\\*.*");
+    if( (hFile = _findfirst( fullFileName, &fileFound )) != -1L ) { /* directory contain files? */
+        if ( !PATH_DeleteRecursivelyFoundFile ( fullFileName, path, fileFound.name ) )
+                retStatus = FALSE;
+                    
+        /* Find the rest of the .c files */
+        while( _findnext( hFile, &fileFound ) == 0 ) {
+            if ( !PATH_DeleteRecursivelyFoundFile ( fullFileName, path, fileFound.name ) )
+                    retStatus = FALSE;
+        }
+        _findclose( hFile );
+   }
+
+    /* remove the directory, now that it is empty */
+    if ( _rmdir( path ) == -1 )
+        retStatus = FALSE;
+    return retStatus;
+}
+/* GetNextFileInDirectory - gets next file in the directory
+ * Set hFile to zero, when you call it. The routine returns the
+ * next value for hFile. When the routine returns NULL, there is
+ * no more files
+ *
+ */
+DWORD NS_WINAPI
+PATH_GetNextFileInDirectory ( long hFile, char * path, char * lpFileName )
+{
+	int result;
+	unsigned short fileStatus;
+	struct _stat buf;
+    struct _finddata_t fileFound;
+    DWORD retStatus = TRUE;
+    char fullFileName[_MAX_PATH];
+
+    if ( hFile == 0 ) {    
+    	/* Check if statistics are valid: */
+    	result = _stat( path, &buf );
+    	if( result != 0 )
+    		return 0;					// file or directory does not exist
+
+    	fileStatus = buf.st_mode & _S_IFMT;
+        if ( (fileStatus & _S_IFDIR) == 0 )
+            return 0; 
+
+
+        /* path contains a directory, delete all files recursively */
+        /* Find first .c file in current directory */
+        strcpy ( fullFileName, path );
+        strcat ( fullFileName, "\\*.*");
+        if( (hFile = _findfirst( fullFileName, &fileFound )) == -1L )
+            return 0; 
+        if ( ( strcmp ( fileFound.name , "." ) != 0)
+          && ( strcmp ( fileFound.name , ".." ) != 0) ) {
+            strcpy ( lpFileName, fileFound.name );
+            return hFile;
+        }
+    }
+                    
+    /* Find the rest of the .c files */
+    while( _findnext( hFile, &fileFound ) == 0 ) {
+        if ( ( strcmp ( fileFound.name , "." ) != 0)
+          && ( strcmp ( fileFound.name , ".." ) != 0) ) {
+            strcpy ( lpFileName, fileFound.name );
+            return hFile;
+        }
+    }
+
+    _findclose( hFile );
+    return 0;
+}
+/*---------------------------------------------------------------------------*\
+ *
+ * Function:  PATH_GetNextSubDirectory
+ *
+ *  Purpose:  Gets next sub directory in the path
+ *
+ *    Input:
+ *          hFile: set to zero first time called; use return value for subsequent calls
+ *          path: directory containing sub directories
+ *          lpSubDirectoryName: buffer to store sub directorie name
+ *          lpSubDirectoryPrefix: chars to exactly match begining of directory name
+ *
+ *  Returns:
+ *          hFile to be used on subsequent call (0, if no more directories)
+ *
+ * Comments:
+\*---------------------------------------------------------------------------*/
+DWORD NS_WINAPI
+PATH_GetNextSubDirectory( long hFile, char * path, char * lpSubDirectoryName, char * lpSubDirectoryPrefix )
+{
+	int result;
+	unsigned short fileStatus;
+	struct _stat buf;
+    char * subDirectoryPrefix;
+    char * p;
+    char fullFileName[_MAX_PATH];
+    BOOL bSubDirectoryFound;
+
+    do {
+        hFile = PATH_GetNextFileInDirectory ( hFile, path, lpSubDirectoryName );
+        if ( hFile == 0 )
+            return 0;
+
+    	/* Check if file is a directory */
+        strcpy ( fullFileName, path );
+        strcat ( fullFileName, "\\" );
+        strcat ( fullFileName, lpSubDirectoryName );
+    	result = _stat( fullFileName, &buf );
+    	if( result == 0 ) {
+        	fileStatus = buf.st_mode & _S_IFMT;
+            if ( (fileStatus & _S_IFDIR) == _S_IFDIR )  {
+
+                /* check if sub directory matches prefix */
+                bSubDirectoryFound = TRUE;
+                if ( lpSubDirectoryPrefix ) {
+                    p = lpSubDirectoryName;
+                    subDirectoryPrefix = lpSubDirectoryPrefix;
+                    while ( *subDirectoryPrefix ) {
+                        if ( *subDirectoryPrefix++ != *p++ ) {
+                            bSubDirectoryFound = FALSE;
+                            break;
+                        }
+                    }
+                }
+                if ( bSubDirectoryFound )
+                    return hFile;
+            }
+        }
+    } while ( hFile );
+
+    return 0;       // no more sub directories
+}
+