summaryrefslogtreecommitdiffstats
path: root/ldap/libraries/libldif/fileurl.c
diff options
context:
space:
mode:
Diffstat (limited to 'ldap/libraries/libldif/fileurl.c')
-rw-r--r--ldap/libraries/libldif/fileurl.c289
1 files changed, 289 insertions, 0 deletions
diff --git a/ldap/libraries/libldif/fileurl.c b/ldap/libraries/libldif/fileurl.c
new file mode 100644
index 00000000..b8c65aba
--- /dev/null
+++ b/ldap/libraries/libldif/fileurl.c
@@ -0,0 +1,289 @@
+/** BEGIN COPYRIGHT BLOCK
+ * Copyright 2001 Sun Microsystems, Inc.
+ * Portions copyright 1999, 2001-2003 Netscape Communications Corporation.
+ * All rights reserved.
+ * END COPYRIGHT BLOCK **/
+/*
+ * LDIF tools fileurl.c -- functions for handling file URLs.
+ * Used by ldif_parse_line.
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <errno.h>
+#include "fileurl.h"
+#include <ctype.h> /* for isalpha() */
+
+static int str_starts_with( char *s, char *prefix );
+static void hex_unescape( char *s );
+static int unhex( char c );
+static void strcpy_escaped_and_convert( char *s1, char *s2 );
+
+/*
+ * Convert a file URL to a local path.
+ *
+ * If successful, LDIF_FILEURL_SUCCESS is returned and *localpathp is
+ * set point to an allocated string. If not, an different LDIF_FILEURL_
+ * error code is returned.
+ *
+ * See RFCs 1738 and 2396 for a specification for file URLs... but
+ * Netscape Navigator seems to be a bit more lenient in what it will
+ * accept, especially on Windows).
+ *
+ * This function parses file URLs of these three forms:
+ *
+ * file:///path
+ * file:/path
+ * file://localhost/path
+ * file://host/path (rejected with a ...NONLOCAL error)
+ *
+ * On Windows, we convert leading drive letters of the form C| to C:
+ * and if a drive letter is present we strip off the slash that precedes
+ * path. Otherwise, the leading slash is returned.
+ *
+ */
+int
+ldif_fileurl2path( char *fileurl, char **localpathp )
+{
+ char *path;
+
+ /*
+ * Make sure this is a file name or URL we can handle.
+ */
+ if ( *fileurl == '/' ||
+ ( isalpha( fileurl[0] ) && ( fileurl[1] == '|' || fileurl[1] == ':' ) ) ) {
+ path = fileurl;
+ goto path_ready;
+ } else if ( !str_starts_with( fileurl, "file:" )) {
+ return( LDIF_FILEURL_NOTAFILEURL );
+ }
+
+ path = fileurl + 5; /* skip past "file:" scheme prefix */
+
+ if ( *path != '/' ) {
+ return( LDIF_FILEURL_MISSINGPATH );
+ }
+
+ ++path; /* skip past '/' at end of "file:/" */
+
+ if ( *path == '/' ) {
+ ++path; /* remainder is now host/path or /path */
+ if ( *path != '/' ) {
+ /*
+ * Make sure it is for the local host.
+ */
+ if ( str_starts_with( path, "localhost/" )) {
+ path += 9;
+ } else {
+ return( LDIF_FILEURL_NONLOCAL );
+ }
+ }
+ } else { /* URL is of the form file:/path */
+ --path;
+ }
+
+ /*
+ * The remainder is now of the form /path. On Windows, skip past the
+ * leading slash if a drive letter is present.
+ */
+#ifdef _WIN32
+ if ( isalpha( path[1] ) && ( path[2] == '|' || path[2] == ':' )) {
+ ++path;
+ }
+#endif /* _WIN32 */
+
+
+ path_ready:
+ /*
+ * Duplicate the path so we can safely alter it.
+ * Unescape any %HH sequences.
+ */
+ if (( path = strdup( path )) == NULL ) {
+ return( LDIF_FILEURL_NOMEMORY );
+ }
+ hex_unescape( path );
+
+#ifdef _WIN32
+ /*
+ * Convert forward slashes to backslashes for Windows. Also,
+ * if we see a drive letter / vertical bar combination (e.g., c|)
+ * at the beginning of the path, replace the '|' with a ':'.
+ */
+ {
+ char *p;
+
+ for ( p = path; *p != '\0'; ++p ) {
+ if ( *p == '/' ) {
+ *p = '\\';
+ }
+ }
+ }
+
+ if ( isalpha( path[0] ) && path[1] == '|' ) {
+ path[1] = ':';
+ }
+#endif /* _WIN32 */
+
+ *localpathp = path;
+ return( LDIF_FILEURL_SUCCESS );
+}
+
+
+/*
+ * Convert a local path to a file URL.
+ *
+ * If successful, LDIF_FILEURL_SUCCESS is returned and *urlp is
+ * set point to an allocated string. If not, an different LDIF_FILEURL_
+ * error code is returned. At present, the only possible error is
+ * LDIF_FILEURL_NOMEMORY.
+ *
+ * This function produces file URLs of the form file:path.
+ *
+ * On Windows, we convert leading drive letters to C|.
+ *
+ */
+int
+ldif_path2fileurl( char *path, char **urlp )
+{
+ char *p, *url, *prefix ="file:";
+
+ if ( NULL == path ) {
+ path = "/";
+ }
+
+ /*
+ * Allocate space for the URL, taking into account that path may
+ * expand during the hex escaping process.
+ */
+ if (( url = malloc( strlen( prefix ) + 3 * strlen( path ) + 1 )) == NULL ) {
+ return( LDIF_FILEURL_NOMEMORY );
+ }
+
+ strcpy( url, prefix );
+ p = url + strlen( prefix );
+
+#ifdef _WIN32
+ /*
+ * On Windows, convert leading drive letters (e.g., C:) to the correct URL
+ * syntax (e.g., C|).
+ */
+ if ( isalpha( path[0] ) && path[1] == ':' ) {
+ *p++ = path[0];
+ *p++ = '|';
+ path += 2;
+ *p = '\0';
+ }
+#endif /* _WIN32 */
+
+ /*
+ * Append the path, encoding any URL-special characters using the %HH
+ * convention.
+ * On Windows, convert backwards slashes in the path to forward ones.
+ */
+ strcpy_escaped_and_convert( p, path );
+
+ *urlp = url;
+ return( LDIF_FILEURL_SUCCESS );
+}
+
+
+/*
+ * Return a non-zero value if the string s begins with prefix and zero if not.
+ */
+static int
+str_starts_with( char *s, char *prefix )
+{
+ size_t prefix_len;
+
+ if ( s == NULL || prefix == NULL ) {
+ return( 0 );
+ }
+
+ prefix_len = strlen( prefix );
+ if ( strlen( s ) < prefix_len ) {
+ return( 0 );
+ }
+
+ return( strncmp( s, prefix, prefix_len ) == 0 );
+}
+
+
+/*
+ * Remove URL hex escapes from s... done in place. The basic concept for
+ * this routine is borrowed from the WWW library HTUnEscape() routine.
+ *
+ */
+static void
+hex_unescape( char *s )
+{
+ char *p;
+
+ for ( p = s; *s != '\0'; ++s ) {
+ if ( *s == '%' ) {
+ if ( *++s != '\0' ) {
+ *p = unhex( *s ) << 4;
+ }
+ if ( *++s != '\0' ) {
+ *p++ += unhex( *s );
+ }
+ } else {
+ *p++ = *s;
+ }
+ }
+
+ *p = '\0';
+}
+
+
+/*
+ * Return the integer equivalent of one hex digit (in c).
+ *
+ */
+static int
+unhex( char c )
+{
+ return( c >= '0' && c <= '9' ? c - '0'
+ : c >= 'A' && c <= 'F' ? c - 'A' + 10
+ : c - 'a' + 10 );
+}
+
+
+#define HREF_CHAR_ACCEPTABLE( c ) (( c >= '-' && c <= '9' ) || \
+ ( c >= '@' && c <= 'Z' ) || \
+ ( c == '_' ) || \
+ ( c >= 'a' && c <= 'z' ))
+
+/*
+ * Like strcat(), except if any URL-special characters are found in s2
+ * they are escaped using the %HH convention and backslash characters are
+ * converted to forward slashes on Windows.
+ *
+ * Maximum space needed in s1 is 3 * strlen( s2 ) + 1.
+ *
+ */
+static void
+strcpy_escaped_and_convert( char *s1, char *s2 )
+{
+ char *p, *q;
+ char *hexdig = "0123456789ABCDEF";
+
+ p = s1 + strlen( s1 );
+ for ( q = s2; *q != '\0'; ++q ) {
+#ifdef _WIN32
+ if ( *q == '\\' ) {
+ *p++ = '/';
+ } else
+#endif /* _WIN32 */
+
+ if ( HREF_CHAR_ACCEPTABLE( *q )) {
+ *p++ = *q;
+ } else {
+ *p++ = '%';
+ *p++ = hexdig[ 0x0F & ((*(unsigned char*)q) >> 4) ];
+ *p++ = hexdig[ 0x0F & *q ];
+ }
+ }
+
+ *p = '\0';
+}
generated by cgit (git 2.34.1) at 2025-07-09 18:48:58 +0000