]> git.sur5r.net Git - openldap/blob - servers/slapd/abandon.c
Referrals should not (except in special cases) be
[openldap] / servers / slapd / abandon.c
1 /* abandon.c - decode and handle an ldap abandon operation */
2 /* $OpenLDAP$ */
3 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
4  *
5  * Copyright 1998-2004 The OpenLDAP Foundation.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted only as authorized by the OpenLDAP
10  * Public License.
11  *
12  * A copy of this license is available in the file LICENSE in the
13  * top-level directory of the distribution or, alternatively, at
14  * <http://www.OpenLDAP.org/license.html>.
15  */
16 /* Portions Copyright (c) 1995 Regents of the University of Michigan.
17  * All rights reserved.
18  *
19  * Redistribution and use in source and binary forms are permitted
20  * provided that this notice is preserved and that due credit is given
21  * to the University of Michigan at Ann Arbor. The name of the University
22  * may not be used to endorse or promote products derived from this
23  * software without specific prior written permission. This software
24  * is provided ``as is'' without express or implied warranty.
25  */
26
27 #include "portable.h"
28
29 #include <stdio.h>
30 #include <ac/socket.h>
31
32 #include "slap.h"
33
34 int
35 do_abandon( Operation *op, SlapReply *rs )
36 {
37         ber_int_t       id;
38         Operation       *o;
39         int             i;
40
41 #ifdef NEW_LOGGING
42         LDAP_LOG( OPERATION, ENTRY, "conn: %d do_abandon\n", op->o_connid, 0, 0);
43 #else
44         Debug( LDAP_DEBUG_TRACE, "do_abandon\n", 0, 0, 0 );
45 #endif
46
47         /*
48          * Parse the abandon request.  It looks like this:
49          *
50          *      AbandonRequest := MessageID
51          */
52
53         if ( ber_scanf( op->o_ber, "i", &id ) == LBER_ERROR ) {
54 #ifdef NEW_LOGGING
55                 LDAP_LOG( OPERATION, ERR, 
56                         "conn: %d do_abandon: ber_scanf failed\n", op->o_connid, 0, 0 );
57 #else
58                 Debug( LDAP_DEBUG_ANY, "do_abandon: ber_scanf failed\n", 0, 0 ,0 );
59 #endif
60                 send_ldap_discon( op, rs, LDAP_PROTOCOL_ERROR, "decoding error" );
61                 return SLAPD_DISCONNECT;
62         }
63
64         if( get_ctrls( op, rs, 0 ) != LDAP_SUCCESS ) {
65                 Debug( LDAP_DEBUG_ANY, "do_abandon: get_ctrls failed\n", 0, 0 ,0 );
66                 return rs->sr_err;
67         } 
68
69 #ifdef NEW_LOGGING
70         LDAP_LOG( OPERATION, ARGS, "do_abandon: conn: %d  id=%ld\n", 
71                 op->o_connid, (long) id, 0 );
72 #else
73         Debug( LDAP_DEBUG_ARGS, "do_abandon: id=%ld\n", (long) id, 0 ,0 );
74 #endif
75
76         if( id <= 0 ) {
77 #ifdef NEW_LOGGING
78                 LDAP_LOG( OPERATION, ERR, 
79                         "do_abandon: conn: %d bad msgid %ld\n", 
80                         op->o_connid, (long) id, 0 );
81 #else
82                 Debug( LDAP_DEBUG_ANY,
83                         "do_abandon: bad msgid %ld\n", (long) id, 0, 0 );
84 #endif
85                 return LDAP_SUCCESS;
86         }
87
88         ldap_pvt_thread_mutex_lock( &op->o_conn->c_mutex );
89         /*
90          * find the operation being abandoned and set the o_abandon
91          * flag.  It's up to the backend to periodically check this
92          * flag and abort the operation at a convenient time.
93          */
94
95         LDAP_STAILQ_FOREACH( o, &op->o_conn->c_ops, o_next ) {
96                 if ( o->o_msgid == id ) {
97                         o->o_abandon = 1;
98                         goto done;
99                 }
100         }
101
102         LDAP_STAILQ_FOREACH( o, &op->o_conn->c_pending_ops, o_next ) {
103                 if ( o->o_msgid == id ) {
104                         LDAP_STAILQ_REMOVE( &op->o_conn->c_pending_ops,
105                                 o, slap_op, o_next );
106                         LDAP_STAILQ_NEXT(o, o_next) = NULL;
107                         op->o_conn->c_n_ops_pending--;
108                         slap_op_free( o );
109                         goto done;
110                 }
111         }
112
113 done:
114         op->orn_msgid = id;
115
116         if ( frontendDB->be_abandon ) {
117                 op->o_bd = frontendDB;
118                 frontendDB->be_abandon( op, rs );
119         }
120
121         for ( i = 0; i < nbackends; i++ ) {
122                 op->o_bd = &backends[i];
123                 if( op->o_bd->be_abandon ) op->o_bd->be_abandon( op, rs );
124         }
125
126         ldap_pvt_thread_mutex_unlock( &op->o_conn->c_mutex );
127
128 #ifdef NEW_LOGGING
129         LDAP_LOG( OPERATION, ENTRY, 
130                 "do_abandon: conn: %d op=%ld %sfound\n",
131                 op->o_connid, (long)id, o ? "" : "not " );
132 #else
133         Debug( LDAP_DEBUG_TRACE, "do_abandon: op=%ld %sfound\n",
134                 (long) id, o ? "" : "not ", 0 );
135 #endif
136         return LDAP_SUCCESS;
137 }
138