]> git.sur5r.net Git - openldap/blob - servers/slapd/delete.c
SLAPD compiles. Needs LDBM work to link.
[openldap] / servers / slapd / delete.c
1 /*
2  * Copyright (c) 1995 Regents of the University of Michigan.
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms are permitted
6  * provided that this notice is preserved and that due credit is given
7  * to the University of Michigan at Ann Arbor. The name of the University
8  * may not be used to endorse or promote products derived from this
9  * software without specific prior written permission. This software
10  * is provided ``as is'' without express or implied warranty.
11  */
12
13 #include "portable.h"
14
15 #include <stdio.h>
16
17 #include <ac/string.h>
18 #include <ac/socket.h>
19
20 #include "slap.h"
21
22 extern Backend  *select_backend();
23
24 extern char     *default_referral;
25
26 void
27 do_delete(
28     Connection  *conn,
29     Operation   *op
30 )
31 {
32         char    *dn, *odn;
33         Backend *be;
34
35         Debug( LDAP_DEBUG_TRACE, "do_delete\n", 0, 0, 0 );
36
37         /*
38          * Parse the delete request.  It looks like this:
39          *
40          *      DelRequest := DistinguishedName
41          */
42
43         if ( ber_scanf( op->o_ber, "a", &dn ) == LBER_ERROR ) {
44                 Debug( LDAP_DEBUG_ANY, "ber_scanf failed\n", 0, 0, 0 );
45                 send_ldap_result( conn, op, LDAP_PROTOCOL_ERROR, NULL, "" );
46                 return;
47         }
48         odn = strdup( dn );
49         dn_normalize( dn );
50
51         Debug( LDAP_DEBUG_ARGS, "do_delete: dn (%s)\n", dn, 0, 0 );
52
53         Debug( LDAP_DEBUG_STATS, "DEL dn=\"%s\"\n", dn, 0, 0 );
54
55         /*
56          * We could be serving multiple database backends.  Select the
57          * appropriate one, or send a referral to our "referral server"
58          * if we don't hold it.
59          */
60         if ( (be = select_backend( dn )) == NULL ) {
61                 free( dn );
62                 free( odn );
63                 send_ldap_result( conn, op, LDAP_PARTIAL_RESULTS, NULL,
64                     default_referral );
65                 return;
66         }
67
68         /*
69          * do the delete if 1 && (2 || 3)
70          * 1) there is a delete function implemented in this backend;
71          * 2) this backend is master for what it holds;
72          * 3) it's a replica and the dn supplied is the updatedn.
73          */
74         if ( be->be_delete != NULL ) {
75                 /* do the update here */
76                 if ( be->be_updatedn == NULL || strcasecmp( be->be_updatedn,
77                     op->o_dn ) == 0 ) {
78                         if ( (*be->be_delete)( be, conn, op, dn ) == 0 ) {
79                                 replog( be, LDAP_REQ_DELETE, odn, NULL, 0 );
80                         }
81                 } else {
82                         send_ldap_result( conn, op, LDAP_PARTIAL_RESULTS, NULL,
83                             default_referral );
84                 }
85         } else {
86                 send_ldap_result( conn, op, LDAP_UNWILLING_TO_PERFORM, NULL,
87                     "Function not implemented" );
88         }
89
90         free( dn );
91         free( odn );
92 }