2 * Copyright 1998-1999 The OpenLDAP Foundation, All Rights Reserved.
3 * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6 * Copyright (c) 1994 Regents of the University of Michigan.
16 #include <ac/stdlib.h>
19 #include <ac/socket.h>
20 #include <ac/string.h>
25 static char **explode_name( const char *name, int notypes, int is_dn );
28 ldap_get_dn( LDAP *ld, LDAPMessage *entry )
33 Debug( LDAP_DEBUG_TRACE, "ldap_get_dn\n", 0, 0, 0 );
35 if ( entry == NULL ) {
36 ld->ld_errno = LDAP_PARAM_ERROR;
40 tmp = *entry->lm_ber; /* struct copy */
41 if ( ber_scanf( &tmp, "{a" /*}*/, &dn ) == LBER_ERROR ) {
42 ld->ld_errno = LDAP_DECODING_ERROR;
50 ldap_dn2ufn( LDAP_CONST char *dn )
55 Debug( LDAP_DEBUG_TRACE, "ldap_dn2ufn\n", 0, 0, 0 );
61 if ( ldap_is_dns_dn( dn ) ) {
62 return( LDAP_STRDUP( dn ) );
65 ufn = LDAP_STRDUP( ++p );
70 for ( p = ufn, r = ufn; *p; p++ ) {
81 if ( state == INQUOTE )
89 if ( state == OUTQUOTE )
95 if ( state == INQUOTE )
101 while ( !isspace( (unsigned char) *r )
102 && *r != ';' && *r != ',' && r > ufn )
106 if ( strcasecmp( r, "c" )
107 && strcasecmp( r, "o" )
108 && strcasecmp( r, "ou" )
109 && strcasecmp( r, "st" )
110 && strcasecmp( r, "l" )
111 && strcasecmp( r, "cn" ) ) {
128 ldap_explode_dns( LDAP_CONST char *dn_in )
138 if ( (dn = LDAP_STRDUP( dn_in )) == NULL ) {
142 if ( (rdns = (char **) LDAP_MALLOC( maxcomps * sizeof(char *) )) == NULL ) {
148 for ( s = ldap_pvt_strtok( dn, "@.", &tok_r ); s != NULL;
149 s = ldap_pvt_strtok( NULL, "@.", &tok_r ) )
151 if ( ncomps == maxcomps ) {
153 if ( (rdns = (char **) LDAP_REALLOC( rdns, maxcomps *
154 sizeof(char *) )) == NULL )
160 rdns[ncomps++] = LDAP_STRDUP( s );
167 rdns = (char **) LDAP_REALLOC( rdns, (ncomps+1) * sizeof(char*) );
172 ldap_explode_dn( LDAP_CONST char *dn, int notypes )
174 Debug( LDAP_DEBUG_TRACE, "ldap_explode_dn\n", 0, 0, 0 );
176 if ( ldap_is_dns_dn( dn ) ) {
177 return( ldap_explode_dns( dn ) );
179 return explode_name( dn, notypes, 1 );
183 ldap_explode_rdn( LDAP_CONST char *rdn, int notypes )
185 Debug( LDAP_DEBUG_TRACE, "ldap_explode_rdn\n", 0, 0, 0 );
186 return explode_name( rdn, notypes, 0 );
190 explode_name( const char *name, int notypes, int is_dn )
194 int state, count = 0, endquote, len;
208 if ( state == INQUOTE )
224 if ( state == OUTQUOTE ) {
226 if ( parts == NULL ) {
227 if (( parts = (char **)LDAP_MALLOC( 8
228 * sizeof( char *))) == NULL )
230 } else if ( count >= 8 ) {
231 if (( parts = (char **)LDAP_REALLOC( parts,
232 (count+1) * sizeof( char *)))
236 parts[ count ] = NULL;
240 q < p && *q != '='; ++q ) {
246 if ( *name == '"' ) {
250 if ( *(p-1) == '"' ) {
257 if (( parts[ count-1 ] = (char *)LDAP_CALLOC( 1,
258 len + 1 )) != NULL ) {
259 SAFEMEMCPY( parts[ count-1 ], name,
261 parts[ count-1 ][ len ] = '\0';
265 * Don't forget to increment 'p' back to where
266 * it should be. If we don't, then we will
267 * never get past an "end quote."
272 name = *p ? p + 1 : p;
273 while ( isascii( *name ) && isspace( *name ) )
285 ldap_is_dns_dn( LDAP_CONST char *dn )
287 return( dn[ 0 ] != '\0'
288 && strchr( dn, '=' ) == NULL
289 && strchr( dn, ',' ) == NULL
290 && strchr( dn, ';' ) == NULL );