git.sur5r.net Git - openldap/blob - servers/slapd/dn.c

   1 /* dn.c - routines for dealing with distinguished names */
   2 /* $OpenLDAP$ */
   3 /*
   4  * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
   5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   6  */
   7
   8 #include "portable.h"
   9
  10 #include <stdio.h>
  11
  12 #include <ac/ctype.h>
  13 #include <ac/socket.h>
  14 #include <ac/string.h>
  15 #include <ac/time.h>
  16
  17 #include "ldap_pvt.h"
  18
  19 #include "slap.h"
  20
  21 #define SLAP_LDAPDN_PRETTY 0x1
  22
  23 /*
  24  * The DN syntax-related functions take advantage of the dn representation
  25  * handling functions ldap_str2dn/ldap_dn2str.  The latter are not schema-
  26  * aware, so the attributes and their values need be validated (and possibly
  27  * normalized).  In the current implementation the required validation/nor-
  28  * malization/"pretty"ing are done on newly created DN structural represen-
  29  * tations; however the idea is to move towards DN handling in structural
  30  * representation instead of the current string representation.  To this
  31  * purpose, we need to do only the required operations and keep track of
  32  * what has been done to minimize their impact on performances.
  33  *
  34  * Developers are strongly encouraged to use this feature, to speed-up
  35  * its stabilization.
  36  */
  37
  38 #define AVA_PRIVATE( ava ) ( ( AttributeDescription * )(ava)->la_private )
  39
  40 /*
  41  * In-place, schema-aware validation of the
  42  * structural representation of a distinguished name.
  43  */
  44 static int
  45 LDAPDN_validate( LDAPDN *dn )
  46 {
  47         int             iRDN;
  48         int             rc;
  49
  50         assert( dn );
  51
  52         for ( iRDN = 0; dn[ iRDN ]; iRDN++ ) {
  53                 LDAPRDN         *rdn = dn[ iRDN ][ 0 ];
  54                 int             iAVA;
  55
  56                 assert( rdn );
  57
  58                 for ( iAVA = 0; rdn[ iAVA ]; iAVA++ ) {
  59                         LDAPAVA                 *ava = rdn[ iAVA ][ 0 ];
  60                         AttributeDescription    *ad;
  61                         slap_syntax_validate_func *validate = NULL;
  62
  63                         assert( ava );
  64
  65                         if ( ( ad = AVA_PRIVATE( ava ) ) == NULL ) {
  66                                 const char      *text = NULL;
  67
  68                                 rc = slap_bv2ad( ava->la_attr, &ad, &text );
  69                                 if ( rc != LDAP_SUCCESS ) {
  70                                         return LDAP_INVALID_SYNTAX;
  71                                 }
  72
  73                                 ava->la_private = ( void * )ad;
  74                         }
  75
  76                         /*
  77                          * Replace attr oid/name with the canonical name
  78                          */
  79                         ber_bvfree( ava->la_attr );
  80                         ava->la_attr = ber_bvdup( &ad->ad_cname );
  81
  82                         validate = ad->ad_type->sat_syntax->ssyn_validate;
  83
  84                         if ( validate ) {
  85                                 /*
  86                                  * validate value by validate function
  87                                  */
  88                                 rc = ( *validate )( ad->ad_type->sat_syntax,
  89                                         ava->la_value );
  90
  91                                 if ( rc != LDAP_SUCCESS ) {
  92                                         return LDAP_INVALID_SYNTAX;
  93                                 }
  94                         }
  95                 }
  96         }
  97
  98         return LDAP_SUCCESS;
  99 }
 100
 101 /*
 102  * dn validate routine
 103  */
 104 int
 105 dnValidate(
 106         Syntax *syntax,
 107         struct berval *in )
 108 {
 109         int             rc;
 110         LDAPDN          *dn = NULL;
 111
 112         assert( in );
 113
 114         if ( in->bv_len == 0 ) {
 115                 return( LDAP_SUCCESS );
 116         }
 117
 118         rc = ldap_str2dn( in->bv_val, &dn, LDAP_DN_FORMAT_LDAP );
 119
 120         /*
 121          * Schema-aware validate
 122          */
 123         if ( rc == LDAP_SUCCESS ) {
 124                 rc = LDAPDN_validate( dn );
 125         }
 126
 127         ldapava_free_dn( dn );
 128
 129         if ( rc != LDAP_SUCCESS ) {
 130                 return( LDAP_INVALID_SYNTAX );
 131         }
 132
 133         return( LDAP_SUCCESS );
 134 }
 135
 136 /*
 137  * AVA sorting inside a RDN
 138  *
 139  * rule: sort attributeTypes in alphabetical order; in case of multiple
 140  * occurrences of the same attributeType, sort values in byte order
 141  * (use memcmp, which implies alphabetical order in case of IA5 value;
 142  * this should guarantee the repeatability of the operation).
 143  *
 144  * uses a linear search; should be fine since the number of AVAs in
 145  * a RDN should be limited.
 146  */
 147 static void
 148 AVA_Sort( LDAPRDN *rdn, int iAVA )
 149 {
 150         int             i;
 151         LDAPAVA         *ava_in = rdn[ iAVA ][ 0 ];
 152
 153         assert( rdn );
 154         assert( ava_in );
 155
 156         for ( i = 0; i < iAVA; i++ ) {
 157                 LDAPAVA         *ava = rdn[ i ][ 0 ];
 158                 int             a, j;
 159
 160                 assert( ava );
 161
 162                 a = strcmp( ava_in->la_attr->bv_val, ava->la_attr->bv_val );
 163
 164                 if ( a > 0 ) {
 165                         break;
 166                 }
 167
 168                 while ( a == 0 ) {
 169                         int             v, d;
 170
 171                         d = ava_in->la_value->bv_len - ava->la_value->bv_len;
 172
 173                         v = memcmp( ava_in->la_value->bv_val,
 174                                         ava->la_value->bv_val,
 175                                         d <= 0 ? ava_in->la_value->bv_len
 176                                                 : ava->la_value->bv_len );
 177
 178                         if ( v == 0 && d != 0 ) {
 179                                 v = d;
 180                         }
 181
 182                         if ( v <= 0 ) {
 183                                 /*
 184                                  * got it!
 185                                  */
 186                                 break;
 187                         }
 188
 189                         if ( ++i == iAVA ) {
 190                                 /*
 191                                  * already sorted
 192                                  */
 193                                 return;
 194                         }
 195
 196                         ava = rdn[ i ][ 0 ];
 197                         a = strcmp( ava_in->la_value->bv_val,
 198                                         ava->la_value->bv_val );
 199                 }
 200
 201                 /*
 202                  * move ahead
 203                  */
 204                 for ( j = iAVA; j > i; j-- ) {
 205                         rdn[ j ][ 0 ] = rdn[ j - 1 ][ 0 ];
 206                 }
 207                 rdn[ i ][ 0 ] = ava_in;
 208
 209                 return;
 210         }
 211 }
 212
 213 /*
 214  * In-place, schema-aware normalization / "pretty"ing of the
 215  * structural representation of a distinguished name.
 216  */
 217 static int
 218 LDAPDN_rewrite( LDAPDN *dn, unsigned flags )
 219 {
 220         int             iRDN;
 221         int             rc;
 222
 223         assert( dn );
 224
 225         for ( iRDN = 0; dn[ iRDN ]; iRDN++ ) {
 226                 LDAPRDN         *rdn = dn[ iRDN ][ 0 ];
 227                 int             iAVA;
 228
 229                 assert( rdn );
 230
 231                 for ( iAVA = 0; rdn[ iAVA ]; iAVA++ ) {
 232                         LDAPAVA                 *ava = rdn[ iAVA ][ 0 ];
 233                         AttributeDescription    *ad;
 234                         slap_syntax_transform_func *transf = NULL;
 235                         MatchingRule *mr;
 236                         struct berval           *bv = NULL;
 237
 238                         assert( ava );
 239
 240                         if ( ( ad = AVA_PRIVATE( ava ) ) == NULL ) {
 241                                 const char      *text = NULL;
 242
 243                                 rc = slap_bv2ad( ava->la_attr, &ad, &text );
 244                                 if ( rc != LDAP_SUCCESS ) {
 245                                         return LDAP_INVALID_SYNTAX;
 246                                 }
 247
 248                                 ava->la_private = ( void * )ad;
 249                         }
 250
 251                         /*
 252                          * Replace attr oid/name with the canonical name
 253                          */
 254                         ber_bvfree( ava->la_attr );
 255                         ava->la_attr = ber_bvdup( &ad->ad_cname );
 256
 257                         if( flags & SLAP_LDAPDN_PRETTY ) {
 258                                 transf = ad->ad_type->sat_syntax->ssyn_pretty;
 259                                 mr = NULL;
 260                         } else {
 261                                 transf = ad->ad_type->sat_syntax->ssyn_normalize;
 262                                 mr = ad->ad_type->sat_equality;
 263                         }
 264
 265                         if ( transf ) {
 266                                 /*
 267                                  * transform value by normalize/pretty function
 268                                  */
 269                                 rc = ( *transf )( ad->ad_type->sat_syntax,
 270                                         ava->la_value, &bv );
 271
 272                                 if ( rc != LDAP_SUCCESS ) {
 273                                         return LDAP_INVALID_SYNTAX;
 274                                 }
 275                         }
 276
 277                         if( mr && ( mr->smr_usage & SLAP_MR_DN_FOLD ) ) {
 278                                 struct berval *s = bv;
 279
 280                                 bv = ber_bvstr( UTF8normalize( bv ? bv : ava->la_value,
 281                                         UTF8_CASEFOLD ) );
 282
 283                                 ber_bvfree( s );
 284                         }
 285
 286                         if( bv ) {
 287                                 ber_bvfree( ava->la_value );
 288                                 ava->la_value = bv;
 289                         }
 290
 291                         AVA_Sort( rdn, iAVA );
 292                 }
 293         }
 294
 295         return LDAP_SUCCESS;
 296 }
 297
 298 /*
 299  * dn normalize routine
 300  */
 301 int
 302 dnNormalize(
 303         Syntax *syntax,
 304         struct berval *val,
 305         struct berval **normalized )
 306 {
 307         struct berval *out = NULL;
 308
 309         Debug( LDAP_DEBUG_TRACE, ">>> dnNormalize: <%s>\n", val->bv_val, 0, 0 );
 310
 311         assert( val );
 312         assert( normalized );
 313
 314         if ( val->bv_len != 0 ) {
 315                 LDAPDN          *dn = NULL;
 316                 char            *dn_out = NULL;
 317                 int             rc;
 318
 319                 /*
 320                  * Go to structural representation
 321                  */
 322                 rc = ldap_str2dn( val->bv_val, &dn, LDAP_DN_FORMAT_LDAP );
 323                 if ( rc != LDAP_SUCCESS ) {
 324                         return LDAP_INVALID_SYNTAX;
 325                 }
 326
 327                 /*
 328                  * Schema-aware rewrite
 329                  */
 330                 if ( LDAPDN_rewrite( dn, 0 ) != LDAP_SUCCESS ) {
 331                         ldapava_free_dn( dn );
 332                         return LDAP_INVALID_SYNTAX;
 333                 }
 334
 335                 /*
 336                  * Back to string representation
 337                  */
 338                 rc = ldap_dn2str( dn, &dn_out, LDAP_DN_FORMAT_LDAPV3 );
 339
 340                 ldapava_free_dn( dn );
 341
 342                 if ( rc != LDAP_SUCCESS ) {
 343                         return LDAP_INVALID_SYNTAX;
 344                 }
 345
 346                 out = ber_bvstr( dn_out );
 347
 348         } else {
 349                 out = ber_bvdup( val );
 350         }
 351
 352         Debug( LDAP_DEBUG_TRACE, "<<< dnNormalize: <%s>\n", out->bv_val, 0, 0 );
 353
 354         *normalized = out;
 355
 356         return LDAP_SUCCESS;
 357 }
 358
 359 /*
 360  * dn "pretty"ing routine
 361  */
 362 int
 363 dnPretty(
 364         Syntax *syntax,
 365         struct berval *val,
 366         struct berval **pretty)
 367 {
 368         struct berval *out = NULL;
 369
 370         Debug( LDAP_DEBUG_TRACE, ">>> dnPretty: <%s>\n", val->bv_val, 0, 0 );
 371
 372         assert( val );
 373         assert( pretty );
 374
 375         if ( val->bv_len != 0 ) {
 376                 LDAPDN          *dn = NULL;
 377                 char            *dn_out = NULL;
 378                 int             rc;
 379
 380                 /* FIXME: should be liberal in what we accept */
 381                 rc = ldap_str2dn( val->bv_val, &dn, LDAP_DN_FORMAT_LDAP );
 382                 if ( rc != LDAP_SUCCESS ) {
 383                         return LDAP_INVALID_SYNTAX;
 384                 }
 385
 386                 /*
 387                  * Schema-aware rewrite
 388                  */
 389                 if ( LDAPDN_rewrite( dn, SLAP_LDAPDN_PRETTY ) != LDAP_SUCCESS ) {
 390                         ldapava_free_dn( dn );
 391                         return LDAP_INVALID_SYNTAX;
 392                 }
 393
 394                 /* FIXME: not sure why the default isn't pretty */
 395                 /* RE: the default is the form that is used as
 396                  * an internal representation; the pretty form
 397                  * is a variant */
 398                 rc = ldap_dn2str( dn, &dn_out,
 399                         LDAP_DN_FORMAT_LDAPV3 | LDAP_DN_PRETTY );
 400
 401                 ldapava_free_dn( dn );
 402
 403                 if ( rc != LDAP_SUCCESS ) {
 404                         return LDAP_INVALID_SYNTAX;
 405                 }
 406
 407                 out = ber_bvstr( dn_out );
 408
 409         } else {
 410                 out = ber_bvdup( val );
 411         }
 412
 413         Debug( LDAP_DEBUG_TRACE, "<<< dnPretty: <%s>\n", out->bv_val, 0, 0 );
 414
 415         *pretty = out;
 416
 417         return LDAP_SUCCESS;
 418 }
 419
 420 /*
 421  * dn match routine
 422  *
 423  * note: uses exact string match (strcmp) because it is supposed to work
 424  * on normalized DNs.
 425  */
 426 int
 427 dnMatch(
 428         int *matchp,
 429         slap_mask_t flags,
 430         Syntax *syntax,
 431         MatchingRule *mr,
 432         struct berval *value,
 433         void *assertedValue )
 434 {
 435         int match;
 436         struct berval *asserted = (struct berval *) assertedValue;
 437
 438         assert( matchp );
 439         assert( value );
 440         assert( assertedValue );
 441
 442         match = value->bv_len - asserted->bv_len;
 443
 444         if ( match == 0 ) {
 445                 match = strcmp( value->bv_val, asserted->bv_val );
 446         }
 447
 448 #ifdef NEW_LOGGING
 449         LDAP_LOG(( "schema", LDAP_LEVEL_ENTRY,
 450                 "dnMatch: %d\n    %s\n    %s\n", match,
 451                 value->bv_val, asserted->bv_val ));
 452 #else
 453         Debug( LDAP_DEBUG_ARGS, "dnMatch %d\n\t\"%s\"\n\t\"%s\"\n",
 454                 match, value->bv_val, asserted->bv_val );
 455 #endif
 456
 457         *matchp = match;
 458         return( LDAP_SUCCESS );
 459 }
 460
 461 /*
 462  * dn_validate - validate and compress dn.  the dn is
 463  * compressed in place are returned if valid.
 464  */
 465
 466 char *
 467 dn_validate( char *dn_in )
 468 {
 469         struct berval   val, *normalized;
 470         int             rc;
 471
 472         if ( dn_in == NULL || dn_in[ 0 ] == '\0' ) {
 473                 return( dn_in );
 474         }
 475
 476         val.bv_val = dn_in;
 477         val.bv_len = strlen( dn_in );
 478
 479         rc = dnPretty( NULL, &val, &normalized );
 480         if ( rc != LDAP_SUCCESS ) {
 481                 return( NULL );
 482         }
 483
 484         if ( val.bv_len < normalized->bv_len ) {
 485                 ber_bvfree( normalized );
 486                 return( NULL );
 487         }
 488
 489         AC_MEMCPY( dn_in, normalized->bv_val, normalized->bv_len + 1 );
 490         ber_bvfree( normalized );
 491
 492         return( dn_in );
 493 }
 494
 495 /*
 496  * dn_normalize - put dn into a canonical form suitable for storing
 497  * in a hash database.  this involves normalizing the case as well as
 498  * the format.  the dn is normalized in place as well as returned if valid.
 499  */
 500
 501 char *
 502 dn_normalize( char *dn )
 503 {
 504         struct berval   val, *normalized;
 505         int             rc;
 506
 507         if ( dn == NULL || dn[ 0 ] == '\0' ) {
 508                 return( dn );
 509         }
 510
 511         val.bv_val = dn;
 512         val.bv_len = strlen( dn );
 513
 514         rc = dnNormalize( NULL, &val, &normalized );
 515         if ( rc != LDAP_SUCCESS ) {
 516                 return( NULL );
 517         }
 518
 519         if ( val.bv_len < normalized->bv_len ) {
 520                 ber_bvfree( normalized );
 521                 return( NULL );
 522         }
 523
 524         AC_MEMCPY( dn, normalized->bv_val, normalized->bv_len + 1 );
 525         ber_bvfree( normalized );
 526
 527         return( dn );
 528 }
 529
 530 int
 531 dn_match( const char *val, const char *asserted )
 532 {
 533         struct berval   bval, basserted;
 534
 535         if ( val == NULL || asserted == NULL ) {
 536                 return 0;
 537         }
 538
 539         bval.bv_val = ( char * )val;
 540         bval.bv_len = strlen( val );
 541
 542         basserted.bv_val = ( char * )asserted;
 543         basserted.bv_len = strlen( asserted);
 544
 545         return dnMatch( NULL, 0, NULL, NULL, &bval, &basserted);
 546 }
 547
 548 /*
 549  * dn_parent - return the dn's parent, in-place
 550  */
 551
 552 char *
 553 dn_parent(
 554         Backend *be,
 555         const char      *dn )
 556 {
 557         const char      *s;
 558         int     inquote;
 559
 560         if( dn == NULL ) {
 561                 return NULL;
 562         }
 563
 564         while(*dn != '\0' && ASCII_SPACE(*dn)) {
 565                 dn++;
 566         }
 567
 568         if( *dn == '\0' ) {
 569                 return NULL;
 570         }
 571
 572         if ( be != NULL && be_issuffix( be, dn ) ) {
 573                 return NULL;
 574         }
 575
 576         /*
 577          * assume it is an X.500-style name, which looks like
 578          * foo=bar,sha=baz,...
 579          */
 580
 581         inquote = 0;
 582         for ( s = dn; *s; s++ ) {
 583                 if ( *s == '\\' ) {
 584                         if ( *(s + 1) ) {
 585                                 s++;
 586                         }
 587                         continue;
 588                 }
 589                 if ( inquote ) {
 590                         if ( *s == '"' ) {
 591                                 inquote = 0;
 592                         }
 593                 } else {
 594                         if ( *s == '"' ) {
 595                                 inquote = 1;
 596                         } else if ( DN_SEPARATOR( *s ) ) {
 597                                 return (char *)s + 1;
 598                         }
 599                 }
 600         }
 601
 602         return "";
 603 }
 604
 605 int dn_rdnlen(
 606         Backend *be,
 607         const char      *dn_in )
 608 {
 609         char    *s;
 610         int     inquote;
 611
 612         if( dn_in == NULL ) {
 613                 return 0;
 614         }
 615
 616         while(*dn_in && ASCII_SPACE(*dn_in)) {
 617                 dn_in++;
 618         }
 619
 620         if( *dn_in == '\0' ) {
 621                 return( 0 );
 622         }
 623
 624         if ( be != NULL && be_issuffix( be, dn_in ) ) {
 625                 return( 0 );
 626         }
 627
 628         inquote = 0;
 629
 630         for ( s = (char *)dn_in; *s; s++ ) {
 631                 if ( *s == '\\' ) {
 632                         if ( *(s + 1) ) {
 633                                 s++;
 634                         }
 635                         continue;
 636                 }
 637                 if ( inquote ) {
 638                         if ( *s == '"' ) {
 639                                 inquote = 0;
 640                         }
 641                 } else {
 642                         if ( *s == '"' ) {
 643                                 inquote = 1;
 644                         } else if ( DN_SEPARATOR( *s ) ) {
 645                                 break;
 646                         }
 647                 }
 648         }
 649
 650         return( s - dn_in );
 651 }
 652
 653 char * dn_rdn(
 654         Backend *be,
 655         const char      *dn_in )
 656 {
 657         char *rdn;
 658         int i = dn_rdnlen( be, dn_in );
 659
 660         rdn = ch_malloc( i + 1 );
 661         strncpy(rdn, dn_in, i);
 662         rdn[i] = '\0';
 663         return rdn;
 664 }
 665
 666 /*
 667  * return a charray of all subtrees to which the DN resides in
 668  */
 669 char **dn_subtree(
 670         Backend *be,
 671         const char      *dn )
 672 {
 673         char **subtree = NULL;
 674
 675         do {
 676                 charray_add( &subtree, dn );
 677
 678                 dn = dn_parent( be, dn );
 679
 680         } while ( dn != NULL );
 681
 682         return subtree;
 683 }
 684
 685
 686 int
 687 dn_issuffixbv(
 688         const struct berval *dn,
 689         const struct berval *suffix
 690 )
 691 {
 692         int     d = dn->bv_len - suffix->bv_len;
 693
 694         assert( dn );
 695         assert( suffix );
 696
 697         /* empty suffix matches any dn */
 698         if ( suffix->bv_len == 0 ) {
 699                 return 1;
 700         }
 701
 702         /* suffix longer than dn */
 703         if ( d < 0 ) {
 704                 return 0;
 705         }
 706
 707         /* no rdn separator or escaped rdn separator */
 708         if ( d > 1 && ( !DN_SEPARATOR( dn->bv_val[ d - 1 ] )
 709                                 || DN_ESCAPE( dn->bv_val[ d - 2 ] ) ) ) {
 710                 return 0;
 711         }
 712
 713         /* no possible match or malformed dn */
 714         if ( d == 1 ) {
 715                 return 0;
 716         }
 717
 718         /* compare */
 719         return( strcmp( dn->bv_val + d, suffix->bv_val ) == 0 );
 720 }
 721
 722 /*
 723  * dn_issuffix - tells whether suffix is a suffix of dn. Both dn
 724  * and suffix must be normalized.
 725  */
 726
 727 int
 728 dn_issuffix(
 729         const char      *dn,
 730         const char      *suffix
 731 )
 732 {
 733         struct berval   bvdn, bvsuffix;
 734
 735         assert( dn );
 736         assert( suffix );
 737
 738         bvdn.bv_val = (char *) dn;
 739         bvdn.bv_len = strlen( dn );
 740         bvsuffix.bv_val = (char *) suffix;
 741         bvsuffix.bv_len = strlen( suffix );
 742
 743         return dn_issuffixbv( &bvdn, &bvsuffix );
 744 }
 745
 746 /*
 747  * get_next_substring(), rdn_attr_type(), rdn_attr_value(), and
 748  * build_new_dn().
 749  *
 750  * Copyright 1999, Juan C. Gomez, All rights reserved.
 751  * This software is not subject to any license of Silicon Graphics
 752  * Inc. or Purdue University.
 753  *
 754  * Redistribution and use in source and binary forms are permitted
 755  * without restriction or fee of any kind as long as this notice
 756  * is preserved.
 757  *
 758  */
 759
 760 /* get_next_substring:
 761  *
 762  * Gets next substring in s, using d (or the end of the string '\0') as a
 763  * string delimiter, and places it in a duplicated memory space. Leading
 764  * spaces are ignored. String s **must** be null-terminated.
 765  */
 766
 767 static char *
 768 get_next_substring( const char * s, char d )
 769 {
 770
 771         char    *str, *r;
 772
 773         r = str = ch_malloc( strlen(s) + 1 );
 774
 775         /* Skip leading spaces */
 776
 777         while ( *s && ASCII_SPACE(*s) ) {
 778                 s++;
 779         }
 780
 781         /* Copy word */
 782
 783         while ( *s && (*s != d) ) {
 784
 785                 /* Don't stop when you see trailing spaces may be a multi-word
 786                 * string, i.e. name=John Doe!
 787                 */
 788
 789                 *str++ = *s++;
 790         }
 791
 792         *str = '\0';
 793
 794         return r;
 795
 796 }
 797
 798
 799 /* rdn_attr_type:
 800  *
 801  * Given a string (i.e. an rdn) of the form:
 802  *       "attribute_type = attribute_value"
 803  * this function returns the type of an attribute, that is the
 804  * string "attribute_type" which is placed in newly allocated
 805  * memory. The returned string will be null-terminated.
 806  */
 807
 808 char * rdn_attr_type( const char * s )
 809 {
 810         return get_next_substring( s, '=' );
 811 }
 812
 813
 814 /* rdn_attr_value:
 815  *
 816  * Given a string (i.e. an rdn) of the form:
 817  *       "attribute_type = attribute_value"
 818  * this function returns "attribute_type" which is placed in newly allocated
 819  * memory. The returned string will be null-terminated and may contain
 820  * spaces (i.e. "John Doe\0").
 821  */
 822
 823 char *
 824 rdn_attr_value( const char * rdn )
 825 {
 826
 827         const char      *str;
 828
 829         if ( (str = strchr( rdn, '=' )) != NULL ) {
 830                 return get_next_substring(++str, '\0');
 831         }
 832
 833         return NULL;
 834
 835 }
 836
 837
 838 /* rdn_attrs:
 839  *
 840  * Given a string (i.e. an rdn) of the form:
 841  *   "attribute_type=attribute_value[+attribute_type=attribute_value[...]]"
 842  * this function stores the types of the attributes in ptypes, that is the
 843  * array of strings "attribute_type" which is placed in newly allocated
 844  * memory, and the values of the attributes in pvalues, that is the
 845  * array of strings "attribute_value" which is placed in newly allocated
 846  * memory. Returns 0 on success, -1 on failure.
 847  *
 848  * note: got part of the code from dn_validate
 849  */
 850
 851 int
 852 rdn_attrs( const char * rdn_in, char ***ptypes, char ***pvalues)
 853 {
 854         char **parts, **p;
 855
 856         *ptypes = NULL;
 857         *pvalues = NULL;
 858
 859         /*
 860          * explode the rdn in parts
 861          */
 862         parts = ldap_explode_rdn( rdn_in, 0 );
 863
 864         if ( parts == NULL ) {
 865                 return( -1 );
 866         }
 867
 868         for ( p = parts; p[0]; p++ ) {
 869                 char *s, *e, *d;
 870
 871                 /* split each rdn part in type value */
 872                 s = strchr( p[0], '=' );
 873                 if ( s == NULL ) {
 874                         charray_free( *ptypes );
 875                         charray_free( *pvalues );
 876                         charray_free( parts );
 877                         return( -1 );
 878                 }
 879
 880                 /* type should be fine */
 881                 charray_add_n( ptypes, p[0], ( s-p[0] ) );
 882
 883                 /* value needs to be unescaped
 884                  * (maybe this should be moved to ldap_explode_rdn?) */
 885                 for ( e = d = s + 1; e[0]; e++ ) {
 886                         if ( *e != '\\' ) {
 887                                 *d++ = *e;
 888                         }
 889                 }
 890                 d[0] = '\0';
 891                 charray_add( pvalues, s + 1 );
 892         }
 893
 894         /* free array */
 895         charray_free( parts );
 896
 897         return( 0 );
 898 }
 899
 900
 901 /* rdn_validate:
 902  *
 903  * 1 if rdn is a legal rdn;
 904  * 0 otherwise (including a sequence of rdns)
 905  *
 906  * note: got it from dn_rdn; it should be rewritten
 907  * according to dn_validate
 908  */
 909 int
 910 rdn_validate( const char * rdn )
 911 {
 912         int     inquote;
 913
 914         if ( rdn == NULL ) {
 915                 return( 0 );
 916         }
 917
 918         if ( strchr( rdn, '=' ) == NULL ) {
 919                 return( 0 );
 920         }
 921
 922         while ( *rdn && ASCII_SPACE( *rdn ) ) {
 923                 rdn++;
 924         }
 925
 926         if( *rdn == '\0' ) {
 927                 return( 0 );
 928         }
 929
 930         inquote = 0;
 931
 932         for ( ; *rdn; rdn++ ) {
 933                 if ( *rdn == '\\' ) {
 934                         if ( *(rdn + 1) ) {
 935                                 rdn++;
 936                         }
 937                         continue;
 938                 }
 939                 if ( inquote ) {
 940                         if ( *rdn == '"' ) {
 941                                 inquote = 0;
 942                         }
 943                 } else {
 944                         if ( *rdn == '"' ) {
 945                                 inquote = 1;
 946                         } else if ( DN_SEPARATOR( *rdn ) ) {
 947                                 return( 0 );
 948                         }
 949                 }
 950         }
 951
 952         return( 1 );
 953 }
 954
 955
 956 /* build_new_dn:
 957  *
 958  * Used by ldbm/bdb2 back_modrdn to create the new dn of entries being
 959  * renamed.
 960  *
 961  * new_dn = parent (p_dn) + separator(s) + rdn (newrdn) + null.
 962  */
 963
 964 void
 965 build_new_dn( char ** new_dn,
 966         const char *e_dn,
 967         const char * p_dn,
 968         const char * newrdn )
 969 {
 970
 971         if ( p_dn == NULL ) {
 972                 *new_dn = ch_strdup( newrdn );
 973                 return;
 974         }
 975
 976         *new_dn = (char *) ch_malloc( strlen( p_dn ) + strlen( newrdn ) + 3 );
 977
 978         strcpy( *new_dn, newrdn );
 979         strcat( *new_dn, "," );
 980         strcat( *new_dn, p_dn );
 981 }