git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/delete.c

   1 /* delete.c - ldbm backend delete routine */
   2
   3 #include <stdio.h>
   4 #include <string.h>
   5 #include <sys/types.h>
   6 #include <sys/socket.h>
   7 #include "slap.h"
   8 #include "back-ldbm.h"
   9 #include "proto-back-ldbm.h"
  10
  11 extern Attribute        *attr_find();
  12
  13 int
  14 ldbm_back_delete(
  15     Backend     *be,
  16     Connection  *conn,
  17     Operation   *op,
  18     char        *dn
  19 )
  20 {
  21         struct ldbminfo *li = (struct ldbminfo *) be->be_private;
  22         char            *matched = NULL;
  23         Entry           *e;
  24
  25         Debug(LDAP_DEBUG_ARGS, "==> ldbm_back_delete: %s\n", dn, 0, 0);
  26
  27         /* get entry with writer lock */
  28         if ( (e = dn2entry_w( be, dn, &matched )) == NULL ) {
  29                 Debug(LDAP_DEBUG_ARGS, "<=- ldbm_back_delete: no such object %s\n",
  30                         dn, 0, 0);
  31                 send_ldap_result( conn, op, LDAP_NO_SUCH_OBJECT, matched, "" );
  32                 if ( matched != NULL ) {
  33                         free( matched );
  34                 }
  35                 return( -1 );
  36         }
  37
  38         Debug (LDAP_DEBUG_TRACE,
  39                 "rdwr_Xchk: readers_reading: %d writer_writing: %d\n",
  40                 e->e_rdwr.readers_reading, e->e_rdwr.writer_writing, 0);
  41
  42         /* check for deleted */
  43
  44         if ( has_children( be, e ) ) {
  45                 Debug(LDAP_DEBUG_ARGS, "<=- ldbm_back_delete: non leaf %s\n",
  46                         dn, 0, 0);
  47                 send_ldap_result( conn, op, LDAP_NOT_ALLOWED_ON_NONLEAF, "",
  48                     "" );
  49                 goto error_return;
  50         }
  51
  52         if ( ! access_allowed( be, conn, op, e, "entry", NULL, op->o_dn,
  53             ACL_WRITE ) ) {
  54                 Debug(LDAP_DEBUG_ARGS,
  55                         "<=- ldbm_back_delete: insufficient access %s\n",
  56                         dn, 0, 0);
  57                 send_ldap_result( conn, op, LDAP_INSUFFICIENT_ACCESS, "", "" );
  58                 goto error_return;
  59         }
  60
  61         Debug (LDAP_DEBUG_TRACE,
  62                 "rdwr_Xchk: readers_reading: %d writer_writing: %d\n",
  63                 e->e_rdwr.readers_reading, e->e_rdwr.writer_writing, 0);
  64
  65         /* XXX delete from parent's id2children entry XXX */
  66
  67         /* delete from dn2id mapping */
  68         if ( dn2id_delete( be, e->e_dn ) != 0 ) {
  69                 Debug(LDAP_DEBUG_ARGS,
  70                         "<=- ldbm_back_delete: operations error %s\n",
  71                         dn, 0, 0);
  72                 send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR, "", "" );
  73                 goto error_return;
  74         }
  75
  76         /* delete from disk and cache */
  77         if ( id2entry_delete( be, e ) != 0 ) {
  78                 Debug(LDAP_DEBUG_ARGS,
  79                         "<=- ldbm_back_delete: operations error %s\n",
  80                         dn, 0, 0);
  81                 send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR, "", "" );
  82                 goto error_return;
  83         }
  84
  85         /* free entry and writer lock */
  86         cache_return_entry_w( &li->li_cache, e );
  87
  88         send_ldap_result( conn, op, LDAP_SUCCESS, "", "" );
  89
  90         return( 0 );
  91
  92 error_return:;
  93         /* free entry and writer lock */
  94         cache_return_entry_w( &li->li_cache, e );
  95
  96         return( -1 );
  97 }