]> git.sur5r.net Git - openldap/blob - servers/slapd/back-sql/modify.c
79644cb969b2339883a26129e88d65ee6863a6f5
[openldap] / servers / slapd / back-sql / modify.c
1 /* $OpenLDAP$ */
2 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
3  *
4  * Copyright 1999-2005 The OpenLDAP Foundation.
5  * Portions Copyright 1999 Dmitry Kovalev.
6  * Portions Copyright 2002 Pierangelo Masarati.
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted only as authorized by the OpenLDAP
11  * Public License.
12  *
13  * A copy of this license is available in the file LICENSE in the
14  * top-level directory of the distribution or, alternatively, at
15  * <http://www.OpenLDAP.org/license.html>.
16  */
17 /* ACKNOWLEDGEMENTS:
18  * This work was initially developed by Dmitry Kovalev for inclusion
19  * by OpenLDAP Software.  Additional significant contributors include
20  * Pierangelo Masarati.
21  */
22
23 #include "portable.h"
24
25 #include <stdio.h>
26 #include <sys/types.h>
27 #include "ac/string.h"
28
29 #include "slap.h"
30 #include "proto-sql.h"
31
32 int
33 backsql_modify( Operation *op, SlapReply *rs )
34 {
35         backsql_info            *bi = (backsql_info*)op->o_bd->be_private;
36         SQLHDBC                 dbh = SQL_NULL_HDBC;
37         backsql_oc_map_rec      *oc = NULL;
38         backsql_srch_info       bsi = { 0 };
39         Entry                   m = { 0 }, *e = NULL;
40         int                     manageDSAit = get_manageDSAit( op );
41         SQLUSMALLINT            CompletionType = SQL_ROLLBACK;
42
43         /*
44          * FIXME: in case part of the operation cannot be performed
45          * (missing mapping, SQL write fails or so) the entire operation
46          * should be rolled-back
47          */
48         Debug( LDAP_DEBUG_TRACE, "==>backsql_modify(): modifying entry \"%s\"\n",
49                 op->o_req_ndn.bv_val, 0, 0 );
50
51         rs->sr_err = backsql_get_db_conn( op, &dbh );
52         if ( rs->sr_err != LDAP_SUCCESS ) {
53                 Debug( LDAP_DEBUG_TRACE, "   backsql_modify(): "
54                         "could not get connection handle - exiting\n", 
55                         0, 0, 0 );
56                 /*
57                  * FIXME: we don't want to send back 
58                  * excessively detailed messages
59                  */
60                 rs->sr_text = ( rs->sr_err == LDAP_OTHER )
61                         ? "SQL-backend error" : NULL;
62                 goto done;
63         }
64
65         bsi.bsi_e = &m;
66         rs->sr_err = backsql_init_search( &bsi, &op->o_req_ndn,
67                         LDAP_SCOPE_BASE, 
68                         SLAP_NO_LIMIT, SLAP_NO_LIMIT,
69                         (time_t)(-1), NULL, dbh, op, rs,
70                         slap_anlist_all_attributes,
71                         ( BACKSQL_ISF_MATCHED | BACKSQL_ISF_GET_ENTRY ) );
72         switch ( rs->sr_err ) {
73         case LDAP_SUCCESS:
74                 break;
75
76         case LDAP_REFERRAL:
77                 if ( manageDSAit && !BER_BVISNULL( &bsi.bsi_e->e_nname ) &&
78                                 dn_match( &op->o_req_ndn, &bsi.bsi_e->e_nname ) )
79                 {
80                         rs->sr_err = LDAP_SUCCESS;
81                         rs->sr_text = NULL;
82                         rs->sr_matched = NULL;
83                         if ( rs->sr_ref ) {
84                                 ber_bvarray_free( rs->sr_ref );
85                                 rs->sr_ref = NULL;
86                         }
87                         break;
88                 }
89                 e = &m;
90                 /* fallthru */
91
92         default:
93                 Debug( LDAP_DEBUG_TRACE, "backsql_modify(): "
94                         "could not retrieve modifyDN ID - no such entry\n", 
95                         0, 0, 0 );
96                 if ( !BER_BVISNULL( &m.e_nname ) ) {
97                         /* FIXME: should always be true! */
98                         e = &m;
99
100                 } else {
101                         e = NULL;
102                 }
103                 goto done;
104         }
105
106 #ifdef BACKSQL_ARBITRARY_KEY
107         Debug( LDAP_DEBUG_TRACE, "   backsql_modify(): "
108                 "modifying entry \"%s\" (id=%s)\n", 
109                 bsi.bsi_base_id.eid_dn.bv_val,
110                 bsi.bsi_base_id.eid_id.bv_val, 0 );
111 #else /* ! BACKSQL_ARBITRARY_KEY */
112         Debug( LDAP_DEBUG_TRACE, "   backsql_modify(): "
113                 "modifying entry \"%s\" (id=%ld)\n", 
114                 bsi.bsi_base_id.eid_dn.bv_val, bsi.bsi_base_id.eid_id, 0 );
115 #endif /* ! BACKSQL_ARBITRARY_KEY */
116
117         if ( get_assert( op ) &&
118                         ( test_filter( op, &m, get_assertion( op ) )
119                           != LDAP_COMPARE_TRUE ))
120         {
121                 rs->sr_err = LDAP_ASSERTION_FAILED;
122                 e = &m;
123                 goto done;
124         }
125
126         oc = backsql_id2oc( bi, bsi.bsi_base_id.eid_oc_id );
127         assert( oc != NULL );
128
129         if ( !acl_check_modlist( op, &m, op->oq_modify.rs_modlist ) ) {
130                 rs->sr_err = LDAP_INSUFFICIENT_ACCESS;
131                 e = &m;
132                 goto done;
133         }
134
135         rs->sr_err = backsql_modify_internal( op, rs, dbh, oc,
136                         &bsi.bsi_base_id, op->oq_modify.rs_modlist );
137         if ( rs->sr_err != LDAP_SUCCESS ) {
138                 e = &m;
139                 goto do_transact;
140         }
141
142         if ( BACKSQL_CHECK_SCHEMA( bi ) ) {
143                 char            textbuf[ SLAP_TEXT_BUFLEN ] = { '\0' };
144
145                 backsql_entry_clean( op, &m );
146
147                 bsi.bsi_e = &m;
148                 rs->sr_err = backsql_id2entry( &bsi, &bsi.bsi_base_id );
149                 if ( rs->sr_err != LDAP_SUCCESS ) {
150                         e = &m;
151                         goto do_transact;
152                 }
153
154                 rs->sr_err = entry_schema_check( op, &m, NULL, 0,
155                         &rs->sr_text, textbuf, sizeof( textbuf ) );
156                 if ( rs->sr_err != LDAP_SUCCESS ) {
157                         Debug( LDAP_DEBUG_TRACE, "   backsql_add(\"%s\"): "
158                                 "entry failed schema check -- aborting\n",
159                                 m.e_name.bv_val, 0, 0 );
160                         e = NULL;
161                         goto do_transact;
162                 }
163         }
164
165 do_transact:;
166         /*
167          * Commit only if all operations succeed
168          */
169         if ( rs->sr_err == LDAP_SUCCESS && !op->o_noop ) {
170                 CompletionType = SQL_COMMIT;
171         }
172
173         SQLTransact( SQL_NULL_HENV, dbh, CompletionType );
174
175 done:;
176 #ifdef SLAP_ACL_HONOR_DISCLOSE
177         if ( e != NULL ) {
178                 if ( !access_allowed( op, e, slap_schema.si_ad_entry, NULL,
179                                         ACL_DISCLOSE, NULL ) )
180                 {
181                         rs->sr_err = LDAP_NO_SUCH_OBJECT;
182                         rs->sr_text = NULL;
183                         rs->sr_matched = NULL;
184                         if ( rs->sr_ref ) {
185                                 ber_bvarray_free( rs->sr_ref );
186                                 rs->sr_ref = NULL;
187                         }
188                 }
189         }
190 #endif /* SLAP_ACL_HONOR_DISCLOSE */
191
192         send_ldap_result( op, rs );
193
194         if ( !BER_BVISNULL( &bsi.bsi_base_id.eid_ndn ) ) {
195                 (void)backsql_free_entryID( op, &bsi.bsi_base_id, 0 );
196         }
197
198         if ( !BER_BVISNULL( &m.e_nname ) ) {
199                 backsql_entry_clean( op, &m );
200         }
201
202         if ( bsi.bsi_attrs != NULL ) {
203                 op->o_tmpfree( bsi.bsi_attrs, op->o_tmpmemctx );
204         }
205
206         Debug( LDAP_DEBUG_TRACE, "<==backsql_modify()\n", 0, 0, 0 );
207
208         return rs->sr_err;
209 }
210