]> git.sur5r.net Git - openldap/blobdiff - servers/slapd/back-ldap/add.c
error message from be_entry_put tool backend function
[openldap] / servers / slapd / back-ldap / add.c
index 656a6e6cbfad6e91e6c34da5110f93ed901acc35..7dfcd9ad0897fafce4220b561e09c74d7ad98fe7 100644 (file)
@@ -1,7 +1,7 @@
 /* add.c - ldap backend add function */
 /* $OpenLDAP$ */
 /*
- * Copyright 1998-2000 The OpenLDAP Foundation, All Rights Reserved.
+ * Copyright 1998-2002 The OpenLDAP Foundation, All Rights Reserved.
  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
  */
 /* This is an altered version */
  *    ever read sources, credits should appear in the documentation.
  * 
  * 4. This notice may not be removed or altered.
+ *
+ *
+ *
+ * Copyright 2000, Pierangelo Masarati, All rights reserved. <ando@sys-net.it>
+ *
+ * This software is being modified by Pierangelo Masarati.
+ * The previously reported conditions apply to the modified code as well.
+ * Changes in the original code are highlighted where required.
+ * Credits for the original code go to the author, Howard Chu.
  */
 
 #include "portable.h"
@@ -46,38 +55,182 @@ ldap_back_add(
 {
        struct ldapinfo *li = (struct ldapinfo *) be->be_private;
        struct ldapconn *lc;
-       int i;
+       int i, j;
        Attribute *a;
        LDAPMod **attrs;
+       struct berval mapped;
+       struct berval mdn = { 0, NULL };
 
+#ifdef NEW_LOGGING
+       LDAP_LOG(( "backend", LDAP_LEVEL_ENTRY, "ldap_back_add: %s\n",
+                               e->e_dn ));
+#else /* !NEW_LOGGING */
+       Debug(LDAP_DEBUG_ARGS, "==> ldap_back_add: %s\n", e->e_dn, 0, 0);
+#endif /* !NEW_LOGGING */
+       
        lc = ldap_back_getconn(li, conn, op);
-       if (!lc)
+       if ( !lc || !ldap_back_dobind( lc, op ) ) {
                return( -1 );
+       }
 
-       if (!lc->bound) {
-               ldap_back_dobind(lc, op);
-               if (!lc->bound)
-                       return( -1 );
+       /*
+        * Rewrite the add dn, if needed
+        */
+#ifdef ENABLE_REWRITE
+       switch (rewrite_session( li->rwinfo, "addDn", e->e_dn, conn, &mdn.bv_val )) {
+       case REWRITE_REGEXEC_OK:
+               if ( mdn.bv_val != NULL && mdn.bv_val[ 0 ] != '\0' ) {
+                       mdn.bv_len = strlen( mdn.bv_val );
+               } else {
+                       mdn = e->e_name;
+               }
+#ifdef NEW_LOGGING
+               LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
+                                       "[rw] addDn: \"%s\" -> \"%s\"\n",
+                                       e->e_dn, mdn.bv_val ));         
+#else /* !NEW_LOGGING */
+               Debug( LDAP_DEBUG_ARGS, "rw> addDn: \"%s\" -> \"%s\"\n%s", 
+                               e->e_dn, mdn.bv_val, "" );
+#endif /* !NEW_LOGGING */
+               break;
+               
+       case REWRITE_REGEXEC_UNWILLING:
+               send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM,
+                               NULL, "Unwilling to perform", NULL, NULL );
+               return( -1 );
+               
+       case REWRITE_REGEXEC_ERR:
+               send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR,
+                               NULL, "Operations error", NULL, NULL );
+               return( -1 );
        }
+#else /* !ENABLE_REWRITE */
+       ldap_back_dn_massage( li, &e->e_name, &mdn, 0, 1 );
+#endif /* !ENABLE_REWRITE */
 
        /* Count number of attributes in entry */
-       for (i=1, a=e->e_attrs; a; i++, a=a->a_next)
+       for (i = 1, a = e->e_attrs; a; i++, a = a->a_next)
                ;
        
        /* Create array of LDAPMods for ldap_add() */
        attrs = (LDAPMod **)ch_malloc(sizeof(LDAPMod *)*i);
-       attrs[i-1] = 0;
 
-       for (i=0, a=e->e_attrs; a; i++, a=a->a_next) {
+       for (i=0, a=e->e_attrs; a; a=a->a_next) {
+               /*
+                * lastmod should always be <off>, so that
+                * creation/modification operational attrs
+                * of the target directory are used, if available
+                */
+#if 0
+               if ( !strcasecmp( a->a_desc->ad_cname.bv_val,
+                       slap_schema.si_ad_creatorsName->ad_cname.bv_val )
+                       || !strcasecmp( a->a_desc->ad_cname.bv_val,
+                       slap_schema.si_ad_createTimestamp->ad_cname.bv_val )
+                       || !strcasecmp( a->a_desc->ad_cname.bv_val,
+                       slap_schema.si_ad_modifiersName->ad_cname.bv_val )
+                       || !strcasecmp( a->a_desc->ad_cname.bv_val,
+                       slap_schema.si_ad_modifyTimestamp->ad_cname.bv_val )
+               ) {
+                       continue;
+               }
+#endif
+               
+               ldap_back_map(&li->at_map, &a->a_desc->ad_cname, &mapped, 0);
+               if (mapped.bv_val == NULL) {
+                       continue;
+               }
+
                attrs[i] = (LDAPMod *)ch_malloc(sizeof(LDAPMod));
+               if (attrs[i] == NULL) {
+                       continue;
+               }
+
                attrs[i]->mod_op = LDAP_MOD_BVALUES;
-               attrs[i]->mod_type = a->a_desc->ad_cname->bv_val;
-               attrs[i]->mod_vals.modv_bvals = a->a_vals;
+               attrs[i]->mod_type = mapped.bv_val;
+
+#ifdef ENABLE_REWRITE
+               /*
+                * FIXME: dn-valued attrs should be rewritten
+                * to allow their use in ACLs at the back-ldap
+                * level.
+                */
+               if ( strcmp( a->a_desc->ad_type->sat_syntax->ssyn_oid,
+                                       SLAPD_DN_SYNTAX ) == 0 ) {
+                       ldap_dnattr_rewrite( li->rwinfo, a->a_vals, conn );
+               }
+#endif /* ENABLE_REWRITE */
+
+               for (j=0; a->a_vals[j].bv_val; j++);
+               attrs[i]->mod_vals.modv_bvals = ch_malloc((j+1)*sizeof(struct berval *));
+               for (j=0; a->a_vals[j].bv_val; j++)
+                       attrs[i]->mod_vals.modv_bvals[j] = &a->a_vals[j];
+               attrs[i]->mod_vals.modv_bvals[j] = NULL;
+               i++;
        }
+       attrs[i] = NULL;
 
-       ldap_add_s(lc->ld, e->e_dn, attrs);
-       for (--i; i>= 0; --i)
+       ldap_add_s(lc->ld, mdn.bv_val, attrs);
+       for (--i; i>= 0; --i) {
+               free(attrs[i]->mod_vals.modv_bvals);
                free(attrs[i]);
+       }
        free(attrs);
-       return( ldap_back_op_result( lc, op ));
+       if ( mdn.bv_val != e->e_dn ) {
+               free( mdn.bv_val );
+       }
+       
+       return( ldap_back_op_result( lc, op ) );
 }
+
+#ifdef ENABLE_REWRITE
+int
+ldap_dnattr_rewrite(
+               struct rewrite_info     *rwinfo,
+               BVarray                 a_vals,
+               void                    *cookie
+)
+{
+       char *mattr;
+       
+       for ( ; a_vals->bv_val != NULL; a_vals++ ) {
+               switch ( rewrite_session( rwinfo, "bindDn", a_vals->bv_val,
+                                       cookie, &mattr )) {
+               case REWRITE_REGEXEC_OK:
+                       if ( mattr == NULL ) {
+                               /* no substitution */
+                               continue;
+                       }
+#ifdef NEW_LOGGING
+                       LDAP_LOG(( "backend", LDAP_LEVEL_DETAIL1,
+                                       "[rw] bindDn (in add of dn-valued"
+                                       " attr): \"%s\" -> \"%s\"\n",
+                                       a_vals->bv_val, mattr ));
+#else /* !NEW_LOGGING */
+                       Debug( LDAP_DEBUG_ARGS,
+                                       "rw> bindDn (in add of dn-valued attr):"
+                                       " \"%s\" -> \"%s\"\n%s",
+                                       a_vals->bv_val, mattr, "" );
+#endif /* !NEW_LOGGING */
+
+                       free( a_vals->bv_val );
+                       a_vals->bv_val = mattr;
+                       a_vals->bv_len = strlen( mattr );
+                       
+                       break;
+                       
+               case REWRITE_REGEXEC_UNWILLING:
+                       
+               case REWRITE_REGEXEC_ERR:
+                       /*
+                        * FIXME: better give up,
+                        * skip the attribute
+                        * or leave it untouched?
+                        */
+                       break;
+               }
+       }
+       
+       return 0;
+}
+#endif /* ENABLE_REWRITE */
+