]> git.sur5r.net Git - openldap/blob - servers/slapd/back-ldbm/delete.c
c773929ffb43a64eb73ba3e3b7c28124a5655b08
[openldap] / 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
10 extern Entry            *dn2entry();
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         if ( (e = dn2entry( be, dn, &matched )) == NULL ) {
26                 send_ldap_result( conn, op, LDAP_NO_SUCH_OBJECT, matched, "" );
27                 if ( matched != NULL ) {
28                         free( matched );
29                 }
30                 return( -1 );
31         }
32
33         if ( has_children( be, e ) ) {
34                 send_ldap_result( conn, op, LDAP_NOT_ALLOWED_ON_NONLEAF, "",
35                     "" );
36                 cache_return_entry( &li->li_cache, e );
37                 return( -1 );
38         }
39
40         if ( ! access_allowed( be, conn, op, e, "entry", NULL, op->o_dn,
41             ACL_WRITE ) ) {
42                 send_ldap_result( conn, op, LDAP_INSUFFICIENT_ACCESS, "", "" );
43                 cache_return_entry( &li->li_cache, e );
44                 return( -1 );
45         }
46
47         /* XXX delete from parent's id2children entry XXX */
48
49         /* delete from dn2id mapping */
50         if ( dn2id_delete( be, e->e_dn ) != 0 ) {
51                 send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR, "", "" );
52                 cache_return_entry( &li->li_cache, e );
53                 return( -1 );
54         }
55
56         /* delete from disk and cache */
57         if ( id2entry_delete( be, e ) != 0 ) {
58                 send_ldap_result( conn, op, LDAP_OPERATIONS_ERROR, "", "" );
59                 cache_return_entry( &li->li_cache, e );
60                 return( -1 );
61         }
62         cache_return_entry( &li->li_cache, e );
63
64         send_ldap_result( conn, op, LDAP_SUCCESS, "", "" );
65
66         return( 0 );
67 }