]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/overlays/dynlist.c
ITS#5747: Only use C99 flexible array member when supported
[openldap] / servers / slapd / overlays / dynlist.c
index b0468812cc32ab06795c1b05eddacc0becb8c2e5..b7f38aa01dd7f058b26d56b69f3638ab5b575d03 100644 (file)
@@ -2,8 +2,9 @@
 /* $OpenLDAP$ */
 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
  *
- * Copyright 2003-2007 The OpenLDAP Foundation.
+ * Copyright 2003-2008 The OpenLDAP Foundation.
  * Portions Copyright 2004-2005 Pierangelo Masarati.
+ * Portions Copyright 2008 Emmanuel Dreyfus.
  * All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
@@ -60,14 +61,23 @@ static AttributeName *slap_anlist_no_attrs = anlist_no_attrs;
 
 static AttributeDescription *ad_dgIdentity, *ad_dgAuthz;
 
+typedef struct dynlist_map_t {
+       AttributeDescription *dlm_member_ad;
+       AttributeDescription *dlm_mapped_ad;
+       struct dynlist_map_t *dlm_next;
+} dynlist_map_t;
+
 typedef struct dynlist_info_t {
        ObjectClass             *dli_oc;
        AttributeDescription    *dli_ad;
-       AttributeDescription    *dli_member_ad;
+       struct dynlist_map_t    *dli_dlm;
        struct berval           dli_default_filter;
        struct dynlist_info_t   *dli_next;
 } dynlist_info_t;
 
+#define DYNLIST_USAGE \
+       "\"dynlist-attrset <oc> <URL-ad> [[<mapped-ad>:]<member-ad> ...]\": "
+
 static dynlist_info_t *
 dynlist_is_dynlist_next( Operation *op, SlapReply *rs, dynlist_info_t *old_dli )
 {
@@ -92,10 +102,10 @@ dynlist_is_dynlist_next( Operation *op, SlapReply *rs, dynlist_info_t *old_dli )
        }
 
        for ( ; dli; dli = dli->dli_next ) {
-               if ( value_find_ex( slap_schema.si_ad_objectClass, 
+               if ( attr_valfind( a,
                                SLAP_MR_ATTRIBUTE_VALUE_NORMALIZED_MATCH |
                                SLAP_MR_ASSERTED_VALUE_NORMALIZED_MATCH,
-                               a->a_nvals, &dli->dli_oc->soc_cname,
+                               &dli->dli_oc->soc_cname, NULL,
                                op->o_tmpmemctx ) == 0 )
                {
                        return dli;
@@ -149,6 +159,7 @@ dynlist_sc_update( Operation *op, SlapReply *rs )
        AccessControlState      acl_state = ACL_STATE_INIT;
 
        dynlist_sc_t            *dlc;
+       dynlist_map_t           *dlm;
 
        if ( rs->sr_type != REP_SEARCH ) {
                return 0;
@@ -167,8 +178,10 @@ dynlist_sc_update( Operation *op, SlapReply *rs )
                goto done;
        }
 
-       if ( dlc->dlc_dli->dli_member_ad ) {
-
+       /* if there is only one member_ad, and it's not mapped,
+        * consider it as old-style member listing */
+       dlm = dlc->dlc_dli->dli_dlm;
+       if ( dlm && dlm->dlm_mapped_ad == NULL && dlm->dlm_next == NULL ) {
                /* if access allowed, try to add values, emulating permissive
                 * control to silently ignore duplicates */
                if ( access_allowed( op, rs->sr_entry, slap_schema.si_ad_entry,
@@ -185,10 +198,11 @@ dynlist_sc_update( Operation *op, SlapReply *rs )
                        BER_BVZERO( &nvals[ 1 ] );
 
                        mod.sm_op = LDAP_MOD_ADD;
-                       mod.sm_desc = dlc->dlc_dli->dli_member_ad;
-                       mod.sm_type = dlc->dlc_dli->dli_member_ad->ad_cname;
+                       mod.sm_desc = dlm->dlm_member_ad;
+                       mod.sm_type = dlm->dlm_member_ad->ad_cname;
                        mod.sm_values = vals;
                        mod.sm_nvalues = nvals;
+                       mod.sm_numvals = 1;
 
                        (void)modify_add_values( e, &mod, /* permissive */ 1,
                                        &text, textbuf, sizeof( textbuf ) );
@@ -248,8 +262,7 @@ dynlist_sc_update( Operation *op, SlapReply *rs )
                }
 
                /* test access to attribute */
-               for ( i = 0; !BER_BVISNULL( &a->a_vals[i] ); i++ )
-                       /* just count */ ;
+               i = a->a_numvals;
 
                vals = op->o_tmpalloc( ( i + 1 ) * sizeof( struct berval ), op->o_tmpmemctx );
                if ( a->a_nvals != a->a_vals ) {
@@ -282,17 +295,30 @@ dynlist_sc_update( Operation *op, SlapReply *rs )
                        Modification    mod;
                        const char      *text = NULL;
                        char            textbuf[1024];
+                       dynlist_map_t   *dlm;
+                       AttributeDescription *ad;
 
                        BER_BVZERO( &vals[j] );
                        if ( nvals ) {
                                BER_BVZERO( &nvals[j] );
                        }
 
+                       ad = a->a_desc;
+                       for ( dlm = dlc->dlc_dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
+                               if ( dlm->dlm_member_ad == a->a_desc ) {
+                                       if ( dlm->dlm_mapped_ad ) {
+                                               ad = dlm->dlm_mapped_ad;
+                                       }
+                                       break;
+                               }
+                       }
+
                        mod.sm_op = LDAP_MOD_ADD;
-                       mod.sm_desc = a->a_desc;
-                       mod.sm_type = a->a_desc->ad_cname;
+                       mod.sm_desc = ad;
+                       mod.sm_type = ad->ad_cname;
                        mod.sm_values = vals;
                        mod.sm_nvalues = nvals;
+                       mod.sm_numvals = j;
 
                        (void)modify_add_values( e, &mod, /* permissive */ 1,
                                        &text, textbuf, sizeof( textbuf ) );
@@ -327,6 +353,7 @@ dynlist_prepare_entry( Operation *op, SlapReply *rs, dynlist_info_t *dli )
        int             opattrs,
                        userattrs;
        dynlist_sc_t    dlc = { 0 };
+       dynlist_map_t   *dlm;
 
        a = attrs_find( rs->sr_entry->e_attrs, dli->dli_ad );
        if ( a == NULL ) {
@@ -343,9 +370,13 @@ dynlist_prepare_entry( Operation *op, SlapReply *rs, dynlist_info_t *dli )
 #endif /* SLAP_OPATTRS */
 
        /* Don't generate member list if it wasn't requested */
-       if ( dli->dli_member_ad && !userattrs && !ad_inlist( dli->dli_member_ad, rs->sr_attrs ) ) {
-               return SLAP_CB_CONTINUE;
+       for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
+               AttributeDescription *ad = dlm->dlm_mapped_ad ? dlm->dlm_mapped_ad : dlm->dlm_member_ad;
+               if ( userattrs || ad_inlist( ad, rs->sr_attrs ) ) 
+                       break;
        }
+       if ( dli->dli_dlm && !dlm )
+               return SLAP_CB_CONTINUE;
 
        if ( ad_dgIdentity && ( id = attrs_find( rs->sr_entry->e_attrs, ad_dgIdentity ))) {
                Attribute *authz = NULL;
@@ -430,7 +461,13 @@ dynlist_prepare_entry( Operation *op, SlapReply *rs, dynlist_info_t *dli )
                }
                o.ors_scope = lud->lud_scope;
 
-               if ( dli->dli_member_ad != NULL ) {
+               for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
+                       if ( dlm->dlm_mapped_ad != NULL ) {
+                               break;
+                       }
+               }
+
+               if ( dli->dli_dlm && !dlm ) {
                        /* if ( lud->lud_attrs != NULL ),
                         * the URL should be ignored */
                        o.ors_attrs = slap_anlist_no_attrs;
@@ -462,17 +499,42 @@ dynlist_prepare_entry( Operation *op, SlapReply *rs, dynlist_info_t *dli )
                                        if ( o.ors_attrs[j].an_desc != NULL &&
                                                        is_at_operational( o.ors_attrs[j].an_desc->ad_type ) )
                                        {
-                                               if ( !opattrs && !ad_inlist( o.ors_attrs[j].an_desc, rs->sr_attrs ) )
-                                               {
+                                               if ( !opattrs ) {
                                                        continue;
                                                }
 
+                                               if ( !ad_inlist( o.ors_attrs[j].an_desc, rs->sr_attrs ) ) {
+                                                       /* lookup if mapped -- linear search,
+                                                        * not very efficient unless list
+                                                        * is very short */
+                                                       for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
+                                                               if ( dlm->dlm_member_ad == o.ors_attrs[j].an_desc ) {
+                                                                       break;
+                                                               }
+                                                       }
+
+                                                       if ( dlm == NULL ) {
+                                                               continue;
+                                                       }
+                                               }
+
                                        } else {
                                                if ( !userattrs && 
                                                                o.ors_attrs[j].an_desc != NULL &&
                                                                !ad_inlist( o.ors_attrs[j].an_desc, rs->sr_attrs ) )
                                                {
-                                                       continue;
+                                                       /* lookup if mapped -- linear search,
+                                                        * not very efficient unless list
+                                                        * is very short */
+                                                       for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
+                                                               if ( dlm->dlm_member_ad == o.ors_attrs[j].an_desc ) {
+                                                                       break;
+                                                               }
+                                                       }
+
+                                                       if ( dlm == NULL ) {
+                                                               continue;
+                                                       }
                                                }
                                        }
                                }
@@ -517,7 +579,7 @@ cleanup:;
                        slap_op_groups_free( &o );
                }
                if ( o.ors_filter ) {
-                       filter_free_x( &o, o.ors_filter );
+                       filter_free_x( &o, o.ors_filter, 1 );
                }
                if ( o.ors_attrs && o.ors_attrs != rs->sr_attrs
                                && o.ors_attrs != slap_anlist_no_attrs )
@@ -563,9 +625,14 @@ dynlist_compare( Operation *op, SlapReply *rs )
        dynlist_info_t  *dli = (dynlist_info_t *)on->on_bi.bi_private;
        Operation o = *op;
        Entry *e = NULL;
+       dynlist_map_t *dlm;
 
        for ( ; dli != NULL; dli = dli->dli_next ) {
-               if ( op->oq_compare.rs_ava->aa_desc == dli->dli_member_ad ) {
+               for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next )
+                       if ( op->oq_compare.rs_ava->aa_desc == dlm->dlm_member_ad )
+                               break;
+
+               if ( dli->dli_dlm && dlm ) {
                        /* This compare is for one of the attributes we're
                         * interested in. We'll use slapd's existing dyngroup
                         * evaluator to get the answer we want.
@@ -684,7 +751,7 @@ done:;
                }
 
                o.ors_filterstr = *slap_filterstr_objectClass_pres;
-               o.ors_filter = slap_filter_objectClass_pres;
+               o.ors_filter = (Filter *) slap_filter_objectClass_pres;
 
                o.ors_scope = LDAP_SCOPE_BASE;
                o.ors_deref = LDAP_DEREF_NEVER;
@@ -722,10 +789,10 @@ done:;
                        /* if we're here, we got a match... */
                        rs->sr_err = LDAP_COMPARE_FALSE;
 
-                       if ( value_find_ex( op->orc_ava->aa_desc,
+                       if ( attr_valfind( a,
                                SLAP_MR_ATTRIBUTE_VALUE_NORMALIZED_MATCH |
                                        SLAP_MR_ASSERTED_VALUE_NORMALIZED_MATCH,
-                               a->a_nvals, &op->orc_ava->aa_value, op->o_tmpmemctx ) == 0 )
+                               &op->orc_ava->aa_value, NULL, op->o_tmpmemctx ) == 0 )
                        {
                                rs->sr_err = LDAP_COMPARE_TRUE;
                                break;
@@ -739,7 +806,7 @@ done:;
 
 release:;
        if ( e != NULL ) {
-               overlay_entry_release_ov( &o, e, 0, on );
+               overlay_entry_release_ov( op, e, 0, on );
        }
 
        return SLAP_CB_CONTINUE;
@@ -810,7 +877,7 @@ dynlist_build_def_filter( dynlist_info_t *dli )
        ptr = lutil_strcopy( ptr, dli->dli_oc->soc_cname.bv_val );
        ptr = lutil_strcopy( ptr, "))" );
 
-       assert( dli->dli_default_filter.bv_len == ptr - dli->dli_default_filter.bv_val );
+       assert( ptr == &dli->dli_default_filter.bv_val[dli->dli_default_filter.bv_len] );
 
        return 0;
 }
@@ -833,11 +900,11 @@ dynlist_db_config(
                ObjectClass             *oc;
                AttributeDescription    *ad = NULL,
                                        *member_ad = NULL;
+               dynlist_map_t           *dlm = NULL;
                const char              *text;
 
-               if ( argc < 3 || argc > 4 ) {
-                       Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+               if ( argc < 3 ) {
+                       Debug( LDAP_DEBUG_ANY, "%s: line %d: " DYNLIST_USAGE
                                "invalid arg number #%d.\n",
                                fname, lineno, argc );
                        return 1;
@@ -845,8 +912,7 @@ dynlist_db_config(
 
                oc = oc_find( argv[1] );
                if ( oc == NULL ) {
-                       Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       Debug( LDAP_DEBUG_ANY, "%s: line %d: " DYNLIST_USAGE
                                "unable to find ObjectClass \"%s\"\n",
                                fname, lineno, argv[ 1 ] );
                        return 1;
@@ -854,41 +920,90 @@ dynlist_db_config(
 
                rc = slap_str2ad( argv[2], &ad, &text );
                if ( rc != LDAP_SUCCESS ) {
-                       Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       Debug( LDAP_DEBUG_ANY, "%s: line %d: " DYNLIST_USAGE
                                "unable to find AttributeDescription \"%s\"\n",
                                fname, lineno, argv[2] );
                        return 1;
                }
 
                if ( !is_at_subtype( ad->ad_type, slap_schema.si_ad_labeledURI->ad_type ) ) {
-                       Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       Debug( LDAP_DEBUG_ANY, "%s: line %d: " DYNLIST_USAGE
                                "AttributeDescription \"%s\" "
                                "must be a subtype of \"labeledURI\"\n",
                                fname, lineno, argv[2] );
                        return 1;
                }
 
-               if ( argc == 4 ) {
-                       rc = slap_str2ad( argv[3], &member_ad, &text );
+               for ( i = 3; i < argc; i++ ) {
+                       char *arg; 
+                       char *cp;
+                       AttributeDescription *member_ad = NULL;
+                       AttributeDescription *mapped_ad = NULL;
+                       dynlist_map_t *dlmp;
+                       dynlist_map_t *dlml;
+
+
+                       /*
+                        * If no mapped attribute is given, dn is used 
+                        * for backward compatibility.
+                        */
+                       arg = argv[i];
+                       if ( cp = strchr( arg, (int)':' ) != NULL ) {
+                               struct berval bv;
+                               ber_str2bv( arg, cp - arg, 0, &bv );
+                               rc = slap_bv2ad( &bv, &mapped_ad, &text );
+                               if ( rc != LDAP_SUCCESS ) {
+                                       Debug( LDAP_DEBUG_ANY, "%s: line %d: "
+                                               DYNLIST_USAGE
+                                               "unable to find mapped AttributeDescription \"%s\"\n",
+                                               fname, lineno, arg );
+                                       return 1;
+                               }
+                               
+                               arg = cp + 1;
+                       }
+
+                       rc = slap_str2ad( arg, &member_ad, &text );
                        if ( rc != LDAP_SUCCESS ) {
                                Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                                       "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                                       DYNLIST_USAGE
                                        "unable to find AttributeDescription \"%s\"\n",
-                                       fname, lineno, argv[3] );
+                                       fname, lineno, arg );
                                return 1;
                        }
+
+                       dlmp = (dynlist_map_t *)ch_calloc( 1, sizeof( dynlist_map_t ) );
+                       if ( dlm == NULL ) {
+                               dlm = dlmp;
+                               dlml = NULL;
+                       }
+                       dlmp->dlm_member_ad = member_ad;
+                       dlmp->dlm_mapped_ad = mapped_ad;
+                       dlmp->dlm_next = NULL;
+               
+                       if ( dlml != NULL )
+                               dlml->dlm_next = dlmp;
+                       dlml = dlmp;
                }
 
                for ( dlip = (dynlist_info_t **)&on->on_bi.bi_private;
                        *dlip; dlip = &(*dlip)->dli_next )
                {
-                       /* The same URL attribute / member attribute pair
-                        * cannot be repeated */
-                       if ( (*dlip)->dli_ad == ad && (*dlip)->dli_member_ad == member_ad ) {
+                       /* 
+                        * The same URL attribute / member attribute pair
+                        * cannot be repeated, but we enforce this only 
+                        * when the member attribute is unique. Performing
+                        * the check for multiple values would require
+                        * sorting and comparing the lists, which is left
+                        * as a future improvement
+                        */
+                       if ( (*dlip)->dli_ad == ad &&
+                            (*dlip)->dli_dlm->dlm_next == NULL &&
+                            dlm->dlm_next == NULL &&
+                            dlm->dlm_member_ad == (*dlip)->dli_dlm->dlm_member_ad &&
+                            dlm->dlm_mapped_ad == (*dlip)->dli_dlm->dlm_mapped_ad ) {
                                Debug( LDAP_DEBUG_ANY, "%s: line %d: "
-                                       "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                                       DYNLIST_USAGE
                                        "URL attributeDescription \"%s\" already mapped.\n",
                                        fname, lineno, ad->ad_cname.bv_val );
 #if 0
@@ -901,9 +1016,18 @@ dynlist_db_config(
                *dlip = (dynlist_info_t *)ch_calloc( 1, sizeof( dynlist_info_t ) );
                (*dlip)->dli_oc = oc;
                (*dlip)->dli_ad = ad;
-               (*dlip)->dli_member_ad = member_ad;
+               (*dlip)->dli_dlm = dlm;
 
                if ( dynlist_build_def_filter( *dlip ) ) {
+                       dynlist_map_t *dlm = (*dlip)->ldi_dlm;
+                       dynlist_map_t *dlm_next;
+
+                       while ( dlm != NULL ) {
+                               dlm_next = dlm->dlm_next;
+                               ch_free( dlm );
+                               dlm = dlm_next;
+                       }
+
                        ch_free( *dlip );
                        *dlip = NULL;
                        return 1;
@@ -964,9 +1088,17 @@ dynlist_db_config(
                for ( dlip = (dynlist_info_t **)&on->on_bi.bi_private;
                        *dlip; dlip = &(*dlip)->dli_next )
                {
-                       /* The same URL attribute / member attribute pair
-                        * cannot be repeated */
-                       if ( (*dlip)->dli_ad == ad && (*dlip)->dli_member_ad == member_ad ) {
+                       /* 
+                        * The same URL attribute / member attribute pair
+                        * cannot be repeated, but we enforce this only 
+                        * when the member attribute is unique. Performing
+                        * the check for multiple values would require
+                        * sorting and comparing the lists, which is left
+                        * as a future improvement
+                        */
+                       if ( (*dlip)->dli_ad == ad &&
+                            (*dlip)->dli_dlm->dlm_next == NULL &&
+                            member_ad == (*dlip)->dli_dlm->dlm_member_ad ) {
                                Debug( LDAP_DEBUG_ANY, "%s: line %d: "
                                        "\"dynlist-attrpair <member-ad> <URL-ad>\": "
                                        "URL attributeDescription \"%s\" already mapped.\n",
@@ -981,9 +1113,12 @@ dynlist_db_config(
                *dlip = (dynlist_info_t *)ch_calloc( 1, sizeof( dynlist_info_t ) );
                (*dlip)->dli_oc = oc;
                (*dlip)->dli_ad = ad;
-               (*dlip)->dli_member_ad = member_ad;
+               (*dlip)->dli_dlm = (dynlist_map_t *)ch_calloc( 1, sizeof( dynlist_map_t ) );
+               (*dlip)->dli_dlm->dlm_member_ad = member_ad;
+               (*dlip)->dli_dlm->dlm_mapped_ad = NULL;
 
                if ( dynlist_build_def_filter( *dlip ) ) {
+                       ch_free( (*dlip)->dli_dlm );
                        ch_free( *dlip );
                        *dlip = NULL;
                        return 1;
@@ -1006,9 +1141,10 @@ enum {
 
 static ConfigDriver    dl_cfgen;
 
+/* XXXmanu 255 is the maximum arguments we allow. Can we go beyond? */
 static ConfigTable dlcfg[] = {
        { "dynlist-attrset", "group-oc> <URL-ad> <member-ad",
-               3, 4, 0, ARG_MAGIC|DL_ATTRSET, dl_cfgen,
+               3, 255, 0, ARG_MAGIC|DL_ATTRSET, dl_cfgen,
                "( OLcfgOvAt:8.1 NAME 'olcDLattrSet' "
                        "DESC 'Dynamic list: <group objectClass>, <URL attributeDescription>, <member attributeDescription>' "
                        "EQUALITY caseIgnoreMatch "
@@ -1050,6 +1186,7 @@ dl_cfgen( ConfigArgs *c )
                        for ( i = 0; dli; i++, dli = dli->dli_next ) {
                                struct berval   bv;
                                char            *ptr = c->cr_msg;
+                               dynlist_map_t   *dlm;
 
                                assert( dli->dli_oc != NULL );
                                assert( dli->dli_ad != NULL );
@@ -1059,10 +1196,16 @@ dl_cfgen( ConfigArgs *c )
                                        dli->dli_oc->soc_cname.bv_val,
                                        dli->dli_ad->ad_cname.bv_val );
 
-                               if ( dli->dli_member_ad != NULL ) {
+                               for ( dlm = dli->dli_dlm; dlm; dlm = dlm->dlm_next ) {
                                        ptr[ 0 ] = ' ';
                                        ptr++;
-                                       ptr = lutil_strcopy( ptr, dli->dli_member_ad->ad_cname.bv_val );
+                                       if ( dlm->dlm_mapped_ad ) {
+                                               ptr = lutil_strcopy( ptr, dlm->dlm_mapped_ad->ad_cname.bv_val );
+                                               ptr[ 0 ] = ':';
+                                               ptr++;
+                                       }
+                                               
+                                       ptr = lutil_strcopy( ptr, dlm->dlm_member_ad->ad_cname.bv_val );
                                }
 
                                bv.bv_val = c->cr_msg;
@@ -1090,9 +1233,18 @@ dl_cfgen( ConfigArgs *c )
                                dynlist_info_t  *dli_next;
 
                                for ( dli_next = dli; dli_next; dli = dli_next ) {
+                                       dynlist_map_t *dlm = dli->dli_dlm;
+                                       dynlist_map_t *dlm_next;
+
                                        dli_next = dli->dli_next;
 
                                        ch_free( dli->dli_default_filter.bv_val );
+
+                                       while ( dlm != NULL ) {
+                                               dlm_next = dlm->dlm_next;
+                                               ch_free( dlm );
+                                               dlm = dlm_next;
+                                       }
                                        ch_free( dli );
                                }
 
@@ -1100,6 +1252,8 @@ dl_cfgen( ConfigArgs *c )
 
                        } else {
                                dynlist_info_t  **dlip;
+                               dynlist_map_t *dlm;
+                               dynlist_map_t *dlm_next;
 
                                for ( i = 0, dlip = (dynlist_info_t **)&on->on_bi.bi_private;
                                        i < c->valx; i++ )
@@ -1113,6 +1267,13 @@ dl_cfgen( ConfigArgs *c )
                                dli = *dlip;
                                *dlip = dli->dli_next;
                                ch_free( dli->dli_default_filter.bv_val );
+
+                               dlm = dli->dli_dlm;
+                               while ( dlm != NULL ) {
+                                       dlm_next = dlm->dlm_next;
+                                       ch_free( dlm );
+                                       dlm = dlm_next;
+                               }
                                ch_free( dli );
 
                                dli = (dynlist_info_t *)on->on_bi.bi_private;
@@ -1137,14 +1298,13 @@ dl_cfgen( ConfigArgs *c )
                dynlist_info_t          **dlip,
                                        *dli_next = NULL;
                ObjectClass             *oc = NULL;
-               AttributeDescription    *ad = NULL,
-                                       *member_ad = NULL;
+               AttributeDescription    *ad = NULL;
+               dynlist_map_t           *dlm = NULL;
                const char              *text;
 
                oc = oc_find( c->argv[ 1 ] );
                if ( oc == NULL ) {
-                       snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       snprintf( c->cr_msg, sizeof( c->cr_msg ), DYNLIST_USAGE
                                "unable to find ObjectClass \"%s\"",
                                c->argv[ 1 ] );
                        Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
@@ -1154,8 +1314,7 @@ dl_cfgen( ConfigArgs *c )
 
                rc = slap_str2ad( c->argv[ 2 ], &ad, &text );
                if ( rc != LDAP_SUCCESS ) {
-                       snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       snprintf( c->cr_msg, sizeof( c->cr_msg ), DYNLIST_USAGE
                                "unable to find AttributeDescription \"%s\"",
                                c->argv[ 2 ] );
                        Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
@@ -1164,8 +1323,7 @@ dl_cfgen( ConfigArgs *c )
                }
 
                if ( !is_at_subtype( ad->ad_type, slap_schema.si_ad_labeledURI->ad_type ) ) {
-                       snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                       snprintf( c->cr_msg, sizeof( c->cr_msg ), DYNLIST_USAGE
                                "AttributeDescription \"%s\" "
                                "must be a subtype of \"labeledURI\"",
                                c->argv[ 2 ] );
@@ -1174,36 +1332,59 @@ dl_cfgen( ConfigArgs *c )
                        return 1;
                }
 
-               if ( c->argc == 4 ) {
-                       rc = slap_str2ad( c->argv[ 3 ], &member_ad, &text );
+               for ( i = 3; i < c->argc; i++ ) {
+                       char *arg; 
+                       char *cp;
+                       AttributeDescription *member_ad = NULL;
+                       AttributeDescription *mapped_ad = NULL;
+                       dynlist_map_t *dlmp;
+                       dynlist_map_t *dlml;
+
+
+                       /*
+                        * If no mapped attribute is given, dn is used 
+                        * for backward compatibility.
+                        */
+                       arg = c->argv[i];
+                       if ( ( cp = strchr( arg, ':' ) ) != NULL ) {
+                               struct berval bv;
+                               ber_str2bv( arg, cp - arg, 0, &bv );
+                               rc = slap_bv2ad( &bv, &mapped_ad, &text );
+                               if ( rc != LDAP_SUCCESS ) {
+                                       snprintf( c->cr_msg, sizeof( c->cr_msg ),
+                                               DYNLIST_USAGE
+                                               "unable to find mapped AttributeDescription #%d \"%s\"\n",
+                                               i - 3, c->argv[ i ] );
+                                       Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
+                                               c->log, c->cr_msg, 0 );
+                                       return 1;
+                               }
+                               arg = cp + 1;
+                       }
+
+                       rc = slap_str2ad( arg, &member_ad, &text );
                        if ( rc != LDAP_SUCCESS ) {
                                snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                                       "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
-                                       "unable to find AttributeDescription \"%s\"\n",
-                                       c->argv[ 3 ] );
+                                       DYNLIST_USAGE
+                                       "unable to find AttributeDescription #%d \"%s\"\n",
+                                       i - 3, c->argv[ i ] );
                                Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
                                        c->log, c->cr_msg, 0 );
                                return 1;
                        }
-               }
 
-               for ( dlip = (dynlist_info_t **)&on->on_bi.bi_private;
-                       *dlip; dlip = &(*dlip)->dli_next )
-               {
-                       /* The same URL attribute / member attribute pair
-                        * cannot be repeated */
-                       if ( (*dlip)->dli_ad == ad && (*dlip)->dli_member_ad == member_ad ) {
-                               snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                                       "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
-                                       "URL attributeDescription \"%s\" already mapped.\n",
-                                       ad->ad_cname.bv_val );
-                               Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
-                                       c->log, c->cr_msg, 0 );
-#if 0
-                               /* make it a warning... */
-                               return 1;
-#endif
+                       dlmp = (dynlist_map_t *)ch_calloc( 1, sizeof( dynlist_map_t ) );
+                       if ( dlm == NULL ) {
+                               dlm = dlmp;
+                               dlml = NULL;
                        }
+                       dlmp->dlm_member_ad = member_ad;
+                       dlmp->dlm_mapped_ad = mapped_ad;
+                       dlmp->dlm_next = NULL;
+               
+                       if ( dlml != NULL ) 
+                               dlml->dlm_next = dlmp;
+                       dlml = dlmp;
                }
 
                if ( c->valx > 0 ) {
@@ -1214,7 +1395,7 @@ dl_cfgen( ConfigArgs *c )
                        {
                                if ( *dlip == NULL ) {
                                        snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                                               DYNLIST_USAGE
                                                "invalid index {%d}\n",
                                                c->valx );
                                        Debug( LDAP_DEBUG_ANY, "%s: %s.\n",
@@ -1235,7 +1416,7 @@ dl_cfgen( ConfigArgs *c )
 
                (*dlip)->dli_oc = oc;
                (*dlip)->dli_ad = ad;
-               (*dlip)->dli_member_ad = member_ad;
+               (*dlip)->dli_dlm = dlm;
                (*dlip)->dli_next = dli_next;
 
                rc = dynlist_build_def_filter( *dlip );
@@ -1290,7 +1471,7 @@ dl_cfgen( ConfigArgs *c )
 
                if ( !is_at_subtype( ad->ad_type, slap_schema.si_ad_labeledURI->ad_type ) ) {
                        snprintf( c->cr_msg, sizeof( c->cr_msg ),
-                               "\"dynlist-attrset <oc> <URL-ad> [<member-ad>]\": "
+                               DYNLIST_USAGE
                                "AttributeDescription \"%s\" "
                                "must be a subtype of \"labeledURI\"",
                                c->argv[ 2 ] );
@@ -1302,9 +1483,17 @@ dl_cfgen( ConfigArgs *c )
                for ( dlip = (dynlist_info_t **)&on->on_bi.bi_private;
                        *dlip; dlip = &(*dlip)->dli_next )
                {
-                       /* The same URL attribute / member attribute pair
-                        * cannot be repeated */
-                       if ( (*dlip)->dli_ad == ad && (*dlip)->dli_member_ad == member_ad ) {
+                       /* 
+                        * The same URL attribute / member attribute pair
+                        * cannot be repeated, but we enforce this only 
+                        * when the member attribute is unique. Performing
+                        * the check for multiple values would require
+                        * sorting and comparing the lists, which is left
+                        * as a future improvement
+                        */
+                       if ( (*dlip)->dli_ad == ad &&
+                            (*dlip)->dli_dlm->dlm_next == NULL &&
+                            member_ad == (*dlip)->dli_dlm->dlm_member_ad ) {
                                snprintf( c->cr_msg, sizeof( c->cr_msg ),
                                        "\"dynlist-attrpair <member-ad> <URL-ad>\": "
                                        "URL attributeDescription \"%s\" already mapped.\n",
@@ -1322,7 +1511,9 @@ dl_cfgen( ConfigArgs *c )
 
                (*dlip)->dli_oc = oc;
                (*dlip)->dli_ad = ad;
-               (*dlip)->dli_member_ad = member_ad;
+               (*dlip)->dli_dlm = (dynlist_map_t *)ch_calloc( 1, sizeof( dynlist_map_t ) );
+               (*dlip)->dli_dlm->dlm_member_ad = member_ad;
+               (*dlip)->dli_dlm->dlm_mapped_ad = NULL;
 
                rc = dynlist_build_def_filter( *dlip );
 
@@ -1359,7 +1550,8 @@ dynlist_db_open(
                        if ( oc == NULL ) {
                                oc = oc_find( "groupOfURLs" );
                                if ( oc == NULL ) {
-                                       sprintf( cr->msg, "unable to fetch objectClass \"groupOfURLs\"" );
+                                       snprintf( cr->msg, sizeof( cr->msg),
+                                               "unable to fetch objectClass \"groupOfURLs\"" );
                                        Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s.\n", cr->msg, 0, 0 );
                                        return 1;
                                }
@@ -1372,7 +1564,8 @@ dynlist_db_open(
                        if ( ad == NULL ) {
                                rc = slap_str2ad( "memberURL", &ad, &text );
                                if ( rc != LDAP_SUCCESS ) {
-                                       sprintf( cr->msg, "unable to fetch attributeDescription \"memberURL\": %d (%s)",
+                                       snprintf( cr->msg, sizeof( cr->msg),
+                                               "unable to fetch attributeDescription \"memberURL\": %d (%s)",
                                                rc, text );
                                        Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s.\n", cr->msg, 0, 0 );
                                        return 1;
@@ -1390,22 +1583,26 @@ dynlist_db_open(
                }
        }
 
-       rc = slap_str2ad( "dgIdentity", &ad_dgIdentity, &text );
-       if ( rc != LDAP_SUCCESS ) {
-               snprintf( cr->msg, sizeof( cr->msg),
-                       "unable to fetch attributeDescription \"dgIdentity\": %d (%s)",
-                       rc, text );
-               Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s\n", cr->msg, 0, 0 );
-               /* Just a warning */
+       if ( ad_dgIdentity == NULL ) {
+               rc = slap_str2ad( "dgIdentity", &ad_dgIdentity, &text );
+               if ( rc != LDAP_SUCCESS ) {
+                       snprintf( cr->msg, sizeof( cr->msg),
+                               "unable to fetch attributeDescription \"dgIdentity\": %d (%s)",
+                               rc, text );
+                       Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s\n", cr->msg, 0, 0 );
+                       /* Just a warning */
+               }
        }
 
-       rc = slap_str2ad( "dgAuthz", &ad_dgAuthz, &text );
-       if ( rc != LDAP_SUCCESS ) {
-               snprintf( cr->msg, sizeof( cr->msg),
-                       "unable to fetch attributeDescription \"dgAuthz\": %d (%s)",
-                       rc, text );
-               Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s\n", cr->msg, 0, 0 );
-               /* Just a warning */
+       if ( ad_dgAuthz == NULL ) {
+               rc = slap_str2ad( "dgAuthz", &ad_dgAuthz, &text );
+               if ( rc != LDAP_SUCCESS ) {
+                       snprintf( cr->msg, sizeof( cr->msg),
+                               "unable to fetch attributeDescription \"dgAuthz\": %d (%s)",
+                               rc, text );
+                       Debug( LDAP_DEBUG_ANY, "dynlist_db_open: %s\n", cr->msg, 0, 0 );
+                       /* Just a warning */
+               }
        }
 
        return 0;
@@ -1423,9 +1620,18 @@ dynlist_db_destroy(
                                *dli_next;
 
                for ( dli_next = dli; dli_next; dli = dli_next ) {
+                       dynlist_map_t *dlm;
+                       dynlist_map_t *dlm_next;
+
                        dli_next = dli->dli_next;
 
                        ch_free( dli->dli_default_filter.bv_val );
+                       dlm = dli->dli_dlm;
+                       while ( dlm != NULL ) {
+                               dlm_next = dlm->dlm_next;
+                               ch_free( dlm );
+                               dlm = dlm_next;
+                       }
                        ch_free( dli );
                }
        }