git.sur5r.net Git - openldap/blob - servers/slapd/back-meta/compare.c

   1 /*
   2  * Copyright 1998-2003 The OpenLDAP Foundation, All Rights Reserved.
   3  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
   4  *
   5  * Copyright 2001, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
   6  *
   7  * This work has been developed to fulfill the requirements
   8  * of SysNet s.n.c. <http:www.sys-net.it> and it has been donated
   9  * to the OpenLDAP Foundation in the hope that it may be useful
  10  * to the Open Source community, but WITHOUT ANY WARRANTY.
  11  *
  12  * Permission is granted to anyone to use this software for any purpose
  13  * on any computer system, and to alter it and redistribute it, subject
  14  * to the following restrictions:
  15  *
  16  * 1. The author and SysNet s.n.c. are not responsible for the consequences
  17  *    of use of this software, no matter how awful, even if they arise from
  18  *    flaws in it.
  19  *
  20  * 2. The origin of this software must not be misrepresented, either by
  21  *    explicit claim or by omission.  Since few users ever read sources,
  22  *    credits should appear in the documentation.
  23  *
  24  * 3. Altered versions must be plainly marked as such, and must not be
  25  *    misrepresented as being the original software.  Since few users
  26  *    ever read sources, credits should appear in the documentation.
  27  *    SysNet s.n.c. cannot be responsible for the consequences of the
  28  *    alterations.
  29  *
  30  * 4. This notice may not be removed or altered.
  31  *
  32  *
  33  * This software is based on the backend back-ldap, implemented
  34  * by Howard Chu <hyc@highlandsun.com>, and modified by Mark Valence
  35  * <kurash@sassafras.com>, Pierangelo Masarati <ando@sys-net.it> and other
  36  * contributors. The contribution of the original software to the present
  37  * implementation is acknowledged in this copyright statement.
  38  *
  39  * A special acknowledgement goes to Howard for the overall architecture
  40  * (and for borrowing large pieces of code), and to Mark, who implemented
  41  * from scratch the attribute/objectclass mapping.
  42  *
  43  * The original copyright statement follows.
  44  *
  45  * Copyright 1999, Howard Chu, All rights reserved. <hyc@highlandsun.com>
  46  *
  47  * Permission is granted to anyone to use this software for any purpose
  48  * on any computer system, and to alter it and redistribute it, subject
  49  * to the following restrictions:
  50  *
  51  * 1. The author is not responsible for the consequences of use of this
  52  *    software, no matter how awful, even if they arise from flaws in it.
  53  *
  54  * 2. The origin of this software must not be misrepresented, either by
  55  *    explicit claim or by omission.  Since few users ever read sources,
  56  *    credits should appear in the documentation.
  57  *
  58  * 3. Altered versions must be plainly marked as such, and must not be
  59  *    misrepresented as being the original software.  Since few users
  60  *    ever read sources, credits should appear in the
  61  *    documentation.
  62  *
  63  * 4. This notice may not be removed or altered.
  64  *
  65  */
  66
  67 #include "portable.h"
  68
  69 #include <stdio.h>
  70
  71 #include <ac/string.h>
  72 #include <ac/socket.h>
  73
  74 #include "slap.h"
  75 #include "../back-ldap/back-ldap.h"
  76 #include "back-meta.h"
  77
  78 int
  79 meta_back_compare( Operation *op, SlapReply *rs )
  80 {
  81         struct metainfo *li = ( struct metainfo * )op->o_bd->be_private;
  82         struct metaconn *lc;
  83         struct metasingleconn *lsc;
  84         char *match = NULL, *err = NULL, *mmatch = NULL;
  85         int candidates = 0, last = 0, i, count, rc;
  86         int cres = LDAP_SUCCESS, rres = LDAP_SUCCESS;
  87         int *msgid;
  88
  89         lc = meta_back_getconn( op, rs, META_OP_ALLOW_MULTIPLE,
  90                         &op->o_req_ndn, NULL );
  91         if ( !lc ) {
  92                 send_ldap_result( op, rs );
  93                 return -1;
  94         }
  95
  96         if ( !meta_back_dobind( lc, op ) ) {
  97                 rs->sr_err = LDAP_OTHER;
  98                 send_ldap_result( op, rs );
  99                 return -1;
 100         }
 101
 102         msgid = ch_calloc( sizeof( int ), li->ntargets );
 103         if ( msgid == NULL ) {
 104                 return -1;
 105         }
 106
 107         /*
 108          * start an asynchronous compare for each candidate target
 109          */
 110         for ( i = 0, lsc = lc->conns; !META_LAST(lsc); ++i, ++lsc ) {
 111                 char *mdn = NULL;
 112                 struct berval mapped_attr = op->oq_compare.rs_ava->aa_desc->ad_cname;
 113                 struct berval mapped_value = op->oq_compare.rs_ava->aa_value;
 114
 115                 if ( lsc->candidate != META_CANDIDATE ) {
 116                         msgid[ i ] = -1;
 117                         continue;
 118                 }
 119
 120                 /*
 121                  * Rewrite the compare dn, if needed
 122                  */
 123                 switch ( rewrite_session( li->targets[ i ]->rwinfo,
 124                                         "compareDn",
 125                                         op->o_req_dn.bv_val, op->o_conn, &mdn ) ) {
 126                 case REWRITE_REGEXEC_OK:
 127                         if ( mdn == NULL ) {
 128                                 mdn = ( char * )op->o_req_dn.bv_val;
 129                         }
 130 #ifdef NEW_LOGGING
 131                         LDAP_LOG( BACK_META, DETAIL1,
 132                                 "[rw] compareDn: \"%s\" -> \"%s\"\n",
 133                                 op->o_req_dn.bv_val, mdn, 0 );
 134 #else /* !NEW_LOGGING */
 135                         Debug( LDAP_DEBUG_ARGS,
 136                                         "rw> compareDn: \"%s\" -> \"%s\"\n",
 137                                         op->o_req_dn.bv_val, mdn, 0 );
 138 #endif /* !NEW_LOGGING */
 139                         break;
 140
 141                 case REWRITE_REGEXEC_UNWILLING:
 142                         rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
 143                         rs->sr_text = "Operation not allowed";
 144                         send_ldap_result( op, rs );
 145                         return -1;
 146
 147                 case REWRITE_REGEXEC_ERR:
 148                         rs->sr_err = LDAP_OTHER;
 149                         rs->sr_text = "Rewrite error";
 150                         send_ldap_result( op, rs );
 151                         return -1;
 152                 }
 153
 154                 /*
 155                  * if attr is objectClass, try to remap the value
 156                  */
 157                 if ( op->oq_compare.rs_ava->aa_desc == slap_schema.si_ad_objectClass ) {
 158                         ldap_back_map( &li->targets[ i ]->oc_map,
 159                                         &op->oq_compare.rs_ava->aa_value,
 160                                         &mapped_value, BACKLDAP_MAP );
 161
 162                         if ( mapped_value.bv_val == NULL || mapped_value.bv_val[0] == '\0' ) {
 163                                 continue;
 164                         }
 165                 /*
 166                  * else try to remap the attribute
 167                  */
 168                 } else {
 169                         ldap_back_map( &li->targets[ i ]->at_map,
 170                                 &op->oq_compare.rs_ava->aa_desc->ad_cname,
 171                                 &mapped_attr, BACKLDAP_MAP );
 172                         if ( mapped_attr.bv_val == NULL || mapped_attr.bv_val[0] == '\0' ) {
 173                                 continue;
 174                         }
 175                 }
 176
 177                 /*
 178                  * the compare op is spawned across the targets and the first
 179                  * that returns determines the result; a constraint on unicity
 180                  * of the result ought to be enforced
 181                  */
 182                 msgid[ i ] = ldap_compare( lc->conns[ i ].ld, mdn,
 183                                 mapped_attr.bv_val, mapped_value.bv_val );
 184                 if ( mdn != op->o_req_dn.bv_val ) {
 185                         free( mdn );
 186                 }
 187                 if ( mapped_attr.bv_val != op->oq_compare.rs_ava->aa_desc->ad_cname.bv_val ) {
 188                         free( mapped_attr.bv_val );
 189                 }
 190                 if ( mapped_value.bv_val != op->oq_compare.rs_ava->aa_value.bv_val ) {
 191                         free( mapped_value.bv_val );
 192                 }
 193
 194                 if ( msgid[ i ] == -1 ) {
 195                         continue;
 196                 }
 197
 198                 ++candidates;
 199         }
 200
 201         /*
 202          * wait for replies
 203          */
 204         for ( rc = 0, count = 0; candidates > 0; ) {
 205
 206                 /*
 207                  * FIXME: should we check for abandon?
 208                  */
 209                 for ( i = 0, lsc = lc->conns; !META_LAST(lsc); lsc++, i++ ) {
 210                         int             lrc;
 211                         LDAPMessage     *res = NULL;
 212
 213                         if ( msgid[ i ] == -1 ) {
 214                                 continue;
 215                         }
 216
 217                         lrc = ldap_result( lsc->ld, msgid[ i ],
 218                                         0, NULL, &res );
 219
 220                         if ( lrc == 0 ) {
 221                                 /*
 222                                  * FIXME: should we yield?
 223                                  */
 224                                 if ( res ) {
 225                                         ldap_msgfree( res );
 226                                 }
 227                                 continue;
 228
 229                         } else if ( lrc == LDAP_RES_COMPARE ) {
 230                                 if ( count > 0 ) {
 231                                         rres = LDAP_OTHER;
 232                                         rc = -1;
 233                                         goto finish;
 234                                 }
 235
 236                                 cres = ldap_result2error( lsc->ld, res, 1 );
 237                                 switch ( cres ) {
 238                                 case LDAP_COMPARE_TRUE:
 239                                 case LDAP_COMPARE_FALSE:
 240
 241                                         /*
 242                                          * true or flase, got it;
 243                                          * sending to cache ...
 244                                          */
 245                                         if ( li->cache.ttl != META_DNCACHE_DISABLED ) {
 246                                                 ( void )meta_dncache_update_entry( &li->cache, &op->o_req_ndn, i );
 247                                         }
 248
 249                                         count++;
 250                                         rc = 0;
 251                                         break;
 252
 253                                 default:
 254                                         rres = ldap_back_map_result( cres );
 255
 256                                         if ( err != NULL ) {
 257                                                 free( err );
 258                                         }
 259                                         ldap_get_option( lsc->ld,
 260                                                 LDAP_OPT_ERROR_STRING, &err );
 261
 262                                         if ( match != NULL ) {
 263                                                 free( match );
 264                                         }
 265                                         ldap_get_option( lsc->ld,
 266                                                 LDAP_OPT_MATCHED_DN, &match );
 267
 268                                         last = i;
 269                                         break;
 270                                 }
 271                                 msgid[ i ] = -1;
 272                                 --candidates;
 273
 274                         } else {
 275                                 msgid[ i ] = -1;
 276                                 --candidates;
 277                                 if ( res ) {
 278                                         ldap_msgfree( res );
 279                                 }
 280                                 break;
 281                         }
 282                 }
 283         }
 284
 285 finish:;
 286
 287         /*
 288          * Rewrite the matched portion of the search base, if required
 289          *
 290          * FIXME: only the last one gets caught!
 291          */
 292         if ( count == 1 ) {
 293                 if ( match != NULL ) {
 294                         free( match );
 295                         match = NULL;
 296                 }
 297
 298                 /*
 299                  * the result of the compare is assigned to the res code
 300                  * that will be returned
 301                  */
 302                 rres = cres;
 303
 304         } else if ( match != NULL ) {
 305
 306                 /*
 307                  * At least one compare failed with matched portion,
 308                  * and none was successful
 309                  */
 310                 switch ( rewrite_session( li->targets[ last ]->rwinfo,
 311                                         "matchedDn", match, op->o_conn,
 312                                         &mmatch ) ) {
 313                 case REWRITE_REGEXEC_OK:
 314                         if ( mmatch == NULL ) {
 315                                 mmatch = ( char * )match;
 316                         }
 317 #ifdef NEW_LOGGING
 318                         LDAP_LOG( BACK_META, DETAIL1,
 319                                         "[rw] matchedDn: \"%s\" -> \"%s\"\n",
 320                                         match, mmatch, 0 );
 321 #else /* !NEW_LOGGING */
 322                         Debug( LDAP_DEBUG_ARGS, "rw> matchedDn:"
 323                                         " \"%s\" -> \"%s\"\n",
 324                                         match, mmatch, 0 );
 325 #endif /* !NEW_LOGGING */
 326                         break;
 327
 328
 329                 case REWRITE_REGEXEC_UNWILLING:
 330                         rs->sr_err = LDAP_UNWILLING_TO_PERFORM;
 331                         rs->sr_text = "Operation not allowed";
 332                         send_ldap_result( op, rs );
 333                         rc = -1;
 334                         goto cleanup;
 335
 336                 case REWRITE_REGEXEC_ERR:
 337                         rs->sr_err = LDAP_OTHER;
 338                         rs->sr_text = "Rewrite error";
 339                         send_ldap_result( op, rs );
 340                         rc = -1;
 341                         goto cleanup;
 342                 }
 343         }
 344
 345         rs->sr_err = rres;
 346         rs->sr_matched = mmatch;
 347         send_ldap_result( op, rs );
 348         rs->sr_matched = NULL;
 349
 350 cleanup:;
 351         if ( match != NULL ) {
 352                 if ( mmatch != match ) {
 353                         free( mmatch );
 354                 }
 355                 free( match );
 356         }
 357
 358         if ( msgid ) {
 359                 free( msgid );
 360         }
 361
 362         return rc;
 363 }
 364