Diff for /libraries/libldap/result.c between versions 1.124.2.29 and 1.125

version 1.124.2.29, 2011/01/06 18:43:21 version 1.125, 2006/04/08 09:01:19
Line 1 Line 1
 /* result.c - wait for an ldap result */  /* result.c - wait for an ldap result */
 /* $OpenLDAP$ */  /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.124 2006/03/24 00:18:36 ando Exp $ */
 /* This work is part of OpenLDAP Software <http://www.openldap.org/>.  /* This work is part of OpenLDAP Software <http://www.openldap.org/>.
  *   *
  * Copyright 1998-2011 The OpenLDAP Foundation.   * Copyright 1998-2006 The OpenLDAP Foundation.
  * All rights reserved.   * All rights reserved.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
Line 37 Line 37
  * can be found in the file "build/LICENSE-2.0.1" in this distribution   * can be found in the file "build/LICENSE-2.0.1" in this distribution
  * of OpenLDAP Software.   * of OpenLDAP Software.
  */   */
   /* Portions Copyright (C) The Internet Society (1997)
    * ASN.1 fragments are from RFC 2251; see RFC for full legal notices.
    */
   
 /*  /*
  * LDAPv3 (RFC 4511)   * LDAPv3 (RFC2251)
  *      LDAPResult ::= SEQUENCE {   *      LDAPResult ::= SEQUENCE {
  *              resultCode                      ENUMERATED { ... },   *              resultCode              ENUMERATED { ... },
  *              matchedDN                       LDAPDN,   *              matchedDN               LDAPDN,
  *              diagnosticMessage               LDAPString,   *              errorMessage    LDAPString,
  *              referral                        [3] Referral OPTIONAL   *              referral                Referral OPTIONAL
  *      }   *      }
  *      Referral ::= SEQUENCE OF LDAPURL        (one or more)   *      Referral ::= SEQUENCE OF LDAPURL        (one or more)
  *      LDAPURL ::= LDAPString                  (limited to URL chars)   *      LDAPURL ::= LDAPString                          (limited to URL chars)
  */   */
   
 #include "portable.h"  #include "portable.h"
Line 64 Line 67
   
 #include "ldap-int.h"  #include "ldap-int.h"
 #include "ldap_log.h"  #include "ldap_log.h"
 #include "lutil.h"  
   
 static int ldap_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));  static int ldap_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));
 static int ldap_mark_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));  static int ldap_mark_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));
 static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,  static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,
         LDAPMessage **result ));          LDAPMessage **result ));
 static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,  static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,
         int all, LDAPConn *lc, LDAPMessage **result ));          int all, LDAPConn **lc, LDAPMessage **result ));
 static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));  static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));
 static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));  static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));
 static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));  static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));
Line 92  static LDAPMessage * chkResponseList LDA Line 94  static LDAPMessage * chkResponseList LDA
  * search references, followed by an ldap result).  An extension to   * search references, followed by an ldap result).  An extension to
  * LDAPv3 allows partial extended responses to be returned in response   * LDAPv3 allows partial extended responses to be returned in response
  * to any request.  The type of the first message received is returned.   * to any request.  The type of the first message received is returned.
  * When waiting, any messages that have been abandoned/discarded are    * When waiting, any messages that have been abandoned are discarded.
  * discarded.  
  *   *
  * Example:   * Example:
  *      ldap_result( s, msgid, all, timeout, result )   *      ldap_result( s, msgid, all, timeout, result )
Line 106  ldap_result( Line 107  ldap_result(
         struct timeval *timeout,          struct timeval *timeout,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         int             rc;          LDAPMessage     *lm;
           int     rc;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( result != NULL );          assert( result != NULL );
   
         Debug( LDAP_DEBUG_TRACE, "ldap_result ld %p msgid %d\n", (void *)ld, msgid, 0 );          Debug( LDAP_DEBUG_TRACE, "ldap_result ld %p msgid %d\n", (void *)ld, msgid, 0 );
   
         LDAP_MUTEX_LOCK( &ld->ld_res_mutex );  #ifdef LDAP_R_COMPILE
         rc = wait4msg( ld, msgid, all, timeout, result );          ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );
         LDAP_MUTEX_UNLOCK( &ld->ld_res_mutex );  #endif
           lm = chkResponseList(ld, msgid, all);
   
         return rc;          if ( lm == NULL ) {
                   rc = wait4msg( ld, msgid, all, timeout, result );
           } else {
                   *result = lm;
                   ld->ld_errno = LDAP_SUCCESS;
                   rc = lm->lm_msgtype;
           }
   #ifdef LDAP_R_COMPILE
           ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );
   #endif
           return( rc );
 }  }
   
 /* protected by res_mutex */  
 static LDAPMessage *  static LDAPMessage *
 chkResponseList(  chkResponseList(
         LDAP *ld,          LDAP *ld,
Line 128  chkResponseList( Line 140  chkResponseList(
         int all)          int all)
 {  {
         LDAPMessage     *lm, **lastlm, *nextlm;          LDAPMessage     *lm, **lastlm, *nextlm;
         int             cnt = 0;  
   
         /*          /*
          * Look through the list of responses we have received on           * Look through the list of responses we have received on
Line 137  chkResponseList( Line 148  chkResponseList(
          * wait until it arrives or timeout occurs.           * wait until it arrives or timeout occurs.
          */           */
   
         LDAP_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );  #ifdef LDAP_R_COMPILE
           LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
   #endif
   
         Debug( LDAP_DEBUG_TRACE,          Debug( LDAP_DEBUG_TRACE,
                 "ldap_chkResponseList ld %p msgid %d all %d\n",                  "ldap_chkResponseList ld %p msgid %d all %d\n",
Line 146  chkResponseList( Line 159  chkResponseList(
         lastlm = &ld->ld_responses;          lastlm = &ld->ld_responses;
         for ( lm = ld->ld_responses; lm != NULL; lm = nextlm ) {          for ( lm = ld->ld_responses; lm != NULL; lm = nextlm ) {
                 nextlm = lm->lm_next;                  nextlm = lm->lm_next;
                 ++cnt;  
   
                 if ( ldap_abandoned( ld, lm->lm_msgid ) ) {                  if ( ldap_abandoned( ld, lm->lm_msgid ) ) {
                         Debug( LDAP_DEBUG_ANY,                          Debug( LDAP_DEBUG_TRACE,
                                 "response list msg abandoned, "                                  "ldap_chkResponseList msg abandoned, msgid %d\n",
                                 "msgid %d message type %s\n",                              msgid, 0, 0 );
                                 lm->lm_msgid, ldap_int_msgtype2str( lm->lm_msgtype ), 0 );                          ldap_mark_abandoned( ld, lm->lm_msgid );
   
                         switch ( lm->lm_msgtype ) {  
                         case LDAP_RES_SEARCH_ENTRY:  
                         case LDAP_RES_SEARCH_REFERENCE:  
                         case LDAP_RES_INTERMEDIATE:  
                                 break;  
   
                         default:  
                                 /* there's no need to keep the id  
                                  * in the abandoned list any longer */  
                                 ldap_mark_abandoned( ld, lm->lm_msgid );  
                                 break;  
                         }  
   
                         /* Remove this entry from list */                          /* Remove this entry from list */
                         *lastlm = nextlm;                          *lastlm = nextlm;
Line 178  chkResponseList( Line 177  chkResponseList(
                 if ( msgid == LDAP_RES_ANY || lm->lm_msgid == msgid ) {                  if ( msgid == LDAP_RES_ANY || lm->lm_msgid == msgid ) {
                         LDAPMessage     *tmp;                          LDAPMessage     *tmp;
   
                         if ( all == LDAP_MSG_ONE ||                          if ( all == LDAP_MSG_ONE || all == LDAP_MSG_RECEIVED ||
                                 all == LDAP_MSG_RECEIVED ||                                  msgid == LDAP_RES_UNSOLICITED ) {
                                 msgid == LDAP_RES_UNSOLICITED )  
                         {  
                                 break;                                  break;
                         }                          }
   
                         tmp = lm->lm_chain_tail;                          tmp = lm->lm_chain_tail;
                         if ( tmp->lm_msgtype == LDAP_RES_SEARCH_ENTRY ||                          if ((tmp->lm_msgtype == LDAP_RES_SEARCH_ENTRY) ||
                                 tmp->lm_msgtype == LDAP_RES_SEARCH_REFERENCE ||                                  (tmp->lm_msgtype == LDAP_RES_SEARCH_REFERENCE) ||
                                 tmp->lm_msgtype == LDAP_RES_INTERMEDIATE )                                  (tmp->lm_msgtype == LDAP_RES_INTERMEDIATE)) {
                         {  
                                 tmp = NULL;                                  tmp = NULL;
                         }                          }
   
Line 202  chkResponseList( Line 198  chkResponseList(
                 lastlm = &lm->lm_next;                  lastlm = &lm->lm_next;
         }          }
   
         if ( lm != NULL ) {      if ( lm != NULL ) {
                 /* Found an entry, remove it from the list */                  /* Found an entry, remove it from the list */
                 if ( all == LDAP_MSG_ONE && lm->lm_chain != NULL ) {              if ( all == LDAP_MSG_ONE && lm->lm_chain != NULL ) {
                         *lastlm = lm->lm_chain;                          *lastlm = lm->lm_chain;
                         lm->lm_chain->lm_next = lm->lm_next;                          lm->lm_chain->lm_next = lm->lm_next;
                         lm->lm_chain->lm_chain_tail = ( lm->lm_chain_tail != lm ) ? lm->lm_chain_tail : lm->lm_chain;                          lm->lm_chain->lm_chain_tail = ( lm->lm_chain_tail != lm ) ? lm->lm_chain_tail : lm->lm_chain;
                         lm->lm_chain = NULL;                          lm->lm_chain = NULL;
                         lm->lm_chain_tail = NULL;                          lm->lm_chain_tail = NULL;
                 } else {              } else {
                         *lastlm = lm->lm_next;                          *lastlm = lm->lm_next;
                 }                  }
                 lm->lm_next = NULL;              lm->lm_next = NULL;
         }      }
   
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
         if ( lm == NULL) {          if( lm == NULL) {
                 Debug( LDAP_DEBUG_TRACE,                  Debug( LDAP_DEBUG_TRACE,
                         "ldap_chkResponseList returns ld %p NULL\n", (void *)ld, 0, 0);                          "ldap_chkResponseList returns ld %p NULL\n", (void *)ld, 0, 0);
         } else {          } else {
                 Debug( LDAP_DEBUG_TRACE,                  Debug( LDAP_DEBUG_TRACE,
                         "ldap_chkResponseList returns ld %p msgid %d, type 0x%02lx\n",                          "ldap_chkResponseList returns ld %p msgid %d, type 0x%02lu\n",
                         (void *)ld, lm->lm_msgid, (unsigned long)lm->lm_msgtype );                          (void *)ld, lm->lm_msgid, (unsigned long) lm->lm_msgtype);
         }          }
 #endif  #endif
       return lm;
         return lm;  
 }  }
   
 /* protected by res_mutex */  
 static int  static int
 wait4msg(  wait4msg(
         LDAP *ld,          LDAP *ld,
Line 242  wait4msg( Line 236  wait4msg(
         int             rc;          int             rc;
         struct timeval  tv = { 0 },          struct timeval  tv = { 0 },
                         tv0 = { 0 },                          tv0 = { 0 },
                         start_time_tv = { 0 },                          *tvp;
                         *tvp = NULL;          time_t          start_time = 0;
         LDAPConn        *lc;          time_t          tmp_time;
           LDAPConn        *lc, *nextlc;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( result != NULL );          assert( result != NULL );
   
         LDAP_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );  #ifdef LDAP_R_COMPILE
           LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
         if ( timeout == NULL && ld->ld_options.ldo_tm_api.tv_sec >= 0 ) {  #endif
                 tv = ld->ld_options.ldo_tm_api;  
                 timeout = &tv;  
         }  
   
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
         if ( timeout == NULL ) {          if ( timeout == NULL ) {
Line 266  wait4msg( Line 258  wait4msg(
         }          }
 #endif /* LDAP_DEBUG */  #endif /* LDAP_DEBUG */
   
         if ( timeout != NULL && timeout->tv_sec != -1 ) {          if ( timeout == NULL ) {
                   tvp = NULL;
           } else {
                 tv0 = *timeout;                  tv0 = *timeout;
                 tv = *timeout;                  tv = *timeout;
                 tvp = &tv;                  tvp = &tv;
 #ifdef HAVE_GETTIMEOFDAY                  start_time = time( NULL );
                 gettimeofday( &start_time_tv, NULL );  
 #else /* ! HAVE_GETTIMEOFDAY */  
                 time( &start_time_tv.tv_sec );  
                 start_time_tv.tv_usec = 0;  
 #endif /* ! HAVE_GETTIMEOFDAY */  
         }          }
                                           
         rc = LDAP_MSG_X_KEEP_LOOKING;          rc = LDAP_MSG_X_KEEP_LOOKING;
Line 285  wait4msg( Line 274  wait4msg(
                         Debug( LDAP_DEBUG_TRACE, "wait4msg continue ld %p msgid %d all %d\n",                          Debug( LDAP_DEBUG_TRACE, "wait4msg continue ld %p msgid %d all %d\n",
                                 (void *)ld, msgid, all );                                  (void *)ld, msgid, all );
                         ldap_dump_connection( ld, ld->ld_conns, 1 );                          ldap_dump_connection( ld, ld->ld_conns, 1 );
                         LDAP_MUTEX_LOCK( &ld->ld_req_mutex );  
                         ldap_dump_requests_and_responses( ld );                          ldap_dump_requests_and_responses( ld );
                         LDAP_MUTEX_UNLOCK( &ld->ld_req_mutex );  
                 }                  }
 #endif /* LDAP_DEBUG */  #endif /* LDAP_DEBUG */
   
                 if ( ( *result = chkResponseList( ld, msgid, all ) ) != NULL ) {                  if ( (*result = chkResponseList(ld, msgid, all)) != NULL ) {
                         rc = (*result)->lm_msgtype;                          rc = (*result)->lm_msgtype;
   
                 } else {                  } else {
                         int lc_ready = 0;                          int lc_ready = 0;
   
                         LDAP_MUTEX_LOCK( &ld->ld_conn_mutex );  #ifdef LDAP_R_COMPILE
                         for ( lc = ld->ld_conns; lc != NULL; lc = lc->lconn_next ) {                          ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                           for ( lc = ld->ld_conns; lc != NULL; lc = nextlc ) {
                                   nextlc = lc->lconn_next;
                                 if ( ber_sockbuf_ctrl( lc->lconn_sb,                                  if ( ber_sockbuf_ctrl( lc->lconn_sb,
                                         LBER_SB_OPT_DATA_READY, NULL ) )                                                  LBER_SB_OPT_DATA_READY, NULL ) ) {
                                 {  #ifdef LDAP_R_COMPILE
                                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
                                           rc = try_read1msg( ld, msgid, all, &lc, result );
   #ifdef LDAP_R_COMPILE
                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                                         lc_ready = 1;                                          lc_ready = 1;
                                         break;                                          break;
                                 }                                  }
                         }                          }
   #ifdef LDAP_R_COMPILE
                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
   
                         if ( !lc_ready ) {                          if ( !lc_ready ) {
                                 int err;  
                                 rc = ldap_int_select( ld, tvp );                                  rc = ldap_int_select( ld, tvp );
                                 if ( rc == -1 ) {  
                                         err = sock_errno();  
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
                                   if ( rc == -1 ) {
                                         Debug( LDAP_DEBUG_TRACE,                                          Debug( LDAP_DEBUG_TRACE,
                                                 "ldap_int_select returned -1: errno %d\n",                                                  "ldap_int_select returned -1: errno %d\n",
                                                 err, 0, 0 );                                                  errno, 0, 0 );
 #endif  
                                 }                                  }
   #endif
   
                                 if ( rc == 0 || ( rc == -1 && (                                  if ( rc == 0 || ( rc == -1 && (
                                         !LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_RESTART)                                          !LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_RESTART)
                                                 || err != EINTR ) ) )                                                  || errno != EINTR )))
                                 {                                  {
                                         ld->ld_errno = (rc == -1 ? LDAP_SERVER_DOWN :                                          ld->ld_errno = (rc == -1 ? LDAP_SERVER_DOWN :
                                                 LDAP_TIMEOUT);                                                  LDAP_TIMEOUT);
                                         LDAP_MUTEX_UNLOCK( &ld->ld_conn_mutex );  
                                         return( rc );                                          return( rc );
                                 }                                  }
   
                                 if ( rc == -1 ) {                                  if ( rc == -1 ) {
                                         rc = LDAP_MSG_X_KEEP_LOOKING;   /* select interrupted: loop */                                          rc = LDAP_MSG_X_KEEP_LOOKING;   /* select interrupted: loop */
   
                                 } else {                                  } else {
                                         lc_ready = 1;                                          rc = LDAP_MSG_X_KEEP_LOOKING;
                                 }  #ifdef LDAP_R_COMPILE
                         }                                          ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
                         if ( lc_ready ) {  #endif
                                 LDAPConn *lnext;                                          if ( ld->ld_requests &&
                                 rc = LDAP_MSG_X_KEEP_LOOKING;                                                  ld->ld_requests->lr_status == LDAP_REQST_WRITING &&
                                 LDAP_MUTEX_LOCK( &ld->ld_req_mutex );                                                  ldap_is_write_ready( ld,
                                 if ( ld->ld_requests &&                                                          ld->ld_requests->lr_conn->lconn_sb ) )
                                         ld->ld_requests->lr_status == LDAP_REQST_WRITING &&  
                                         ldap_is_write_ready( ld,  
                                                 ld->ld_requests->lr_conn->lconn_sb ) )  
                                 {  
                                         ldap_int_flush_request( ld, ld->ld_requests );  
                                 }  
                                 for ( lc = ld->ld_conns;  
                                         rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL;  
                                         lc = lnext )  
                                 {  
                                         if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&  
                                                 ldap_is_read_ready( ld, lc->lconn_sb ) )  
                                         {                                          {
                                                 /* Don't let it get freed out from under us */                                                  ldap_int_flush_request( ld, ld->ld_requests );
                                                 ++lc->lconn_refcnt;                                          }
                                                 rc = try_read1msg( ld, msgid, all, lc, result );  #ifdef LDAP_R_COMPILE
                                                 lnext = lc->lconn_next;                                          ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
                                                 /* Only take locks if we're really freeing */  #endif
                                                 if ( lc->lconn_refcnt <= 1 ) {                                          for ( lc = ld->ld_conns; rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL;
                                                         ldap_free_connection( ld, lc, 0, 1 );                                                  lc = nextlc )
                                                 } else {                                          {
                                                         --lc->lconn_refcnt;                                                  nextlc = lc->lconn_next;
                                                   if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&
                                                           ldap_is_read_ready( ld, lc->lconn_sb ))
                                                   {
   #ifdef LDAP_R_COMPILE
                                                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
                                                           rc = try_read1msg( ld, msgid, all, &lc, result );
                                                                   if ( lc == NULL ) lc = nextlc;
   #ifdef LDAP_R_COMPILE
                                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                                                 }                                                  }
                                         } else {  
                                                 lnext = lc->lconn_next;  
                                         }                                          }
   #ifdef LDAP_R_COMPILE
                                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
                                 }                                  }
                                 LDAP_MUTEX_UNLOCK( &ld->ld_req_mutex );  
                         }                          }
                         LDAP_MUTEX_UNLOCK( &ld->ld_conn_mutex );  
                 }                  }
   
                 if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {                  if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {
                         struct timeval  curr_time_tv = { 0 },                          tmp_time = time( NULL );
                                         delta_time_tv = { 0 };                          tv0.tv_sec -= ( tmp_time - start_time );
                           if ( tv0.tv_sec <= 0 ) {
 #ifdef HAVE_GETTIMEOFDAY                                  rc = 0; /* timed out */
                         gettimeofday( &curr_time_tv, NULL );  
 #else /* ! HAVE_GETTIMEOFDAY */  
                         time( &curr_time_tv.tv_sec );  
                         curr_time_tv.tv_usec = 0;  
 #endif /* ! HAVE_GETTIMEOFDAY */  
   
                         /* delta_time = tmp_time - start_time */  
                         delta_time_tv.tv_sec = curr_time_tv.tv_sec - start_time_tv.tv_sec;  
                         delta_time_tv.tv_usec = curr_time_tv.tv_usec - start_time_tv.tv_usec;  
                         if ( delta_time_tv.tv_usec < 0 ) {  
                                 delta_time_tv.tv_sec--;  
                                 delta_time_tv.tv_usec += 1000000;  
                         }  
   
                         /* tv0 < delta_time ? */  
                         if ( ( tv0.tv_sec < delta_time_tv.tv_sec ) ||  
                              ( ( tv0.tv_sec == delta_time_tv.tv_sec ) && ( tv0.tv_usec < delta_time_tv.tv_usec ) ) )  
                         {  
                                 rc = 0; /* timed out */  
                                 ld->ld_errno = LDAP_TIMEOUT;                                  ld->ld_errno = LDAP_TIMEOUT;
                                 break;                                  break;
                         }                          }
   
                         /* tv0 -= delta_time */  
                         tv0.tv_sec -= delta_time_tv.tv_sec;  
                         tv0.tv_usec -= delta_time_tv.tv_usec;  
                         if ( tv0.tv_usec < 0 ) {  
                                 tv0.tv_sec--;  
                                 tv0.tv_usec += 1000000;  
                         }  
   
                         tv.tv_sec = tv0.tv_sec;                          tv.tv_sec = tv0.tv_sec;
                         tv.tv_usec = tv0.tv_usec;  
   
                         Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p %ld s %ld us to go\n",  
                                 (void *)ld, (long) tv.tv_sec, (long) tv.tv_usec );  
   
                         start_time_tv.tv_sec = curr_time_tv.tv_sec;                          Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p %ld secs to go\n",
                         start_time_tv.tv_usec = curr_time_tv.tv_usec;                                  (void *)ld, (long) tv.tv_sec, 0 );
                           start_time = tmp_time;
                 }                  }
         }          }
   
Line 425  wait4msg( Line 387  wait4msg(
 }  }
   
   
 /* protected by res_mutex, conn_mutex and req_mutex */  
 static ber_tag_t  static ber_tag_t
 try_read1msg(  try_read1msg(
         LDAP *ld,          LDAP *ld,
         ber_int_t msgid,          ber_int_t msgid,
         int all,          int all,
         LDAPConn *lc,          LDAPConn **lcp,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         BerElement      *ber;          BerElement      *ber;
Line 440  try_read1msg( Line 401  try_read1msg(
         ber_tag_t       tag;          ber_tag_t       tag;
         ber_len_t       len;          ber_len_t       len;
         int             foundit = 0;          int             foundit = 0;
         LDAPRequest     *lr, *tmplr, dummy_lr = { 0 };          LDAPRequest     *lr, *tmplr;
           LDAPConn        *lc;
         BerElement      tmpber;          BerElement      tmpber;
         int             rc, refer_cnt, hadref, simple_request, err;          int             rc, refer_cnt, hadref, simple_request;
         ber_int_t       lderr;          ber_int_t       lderr;
   
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
Line 450  try_read1msg( Line 412  try_read1msg(
         int             moremsgs = 0, isv2 = 0;          int             moremsgs = 0, isv2 = 0;
 #endif  #endif
   
           /*
            * v3ref = flag for V3 referral / search reference
            * 0 = not a ref, 1 = sucessfully chased ref, -1 = pass ref to application
            */
           enum {
                   V3REF_NOREF     = 0,
                   V3REF_SUCCESS   = 1,
                   V3REF_TOAPP     = -1
           }       v3ref;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( lc != NULL );          assert( lcp != NULL );
           assert( *lcp != NULL );
                   
         LDAP_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );  #ifdef LDAP_R_COMPILE
         LDAP_ASSERT_MUTEX_OWNER( &ld->ld_conn_mutex );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
         LDAP_ASSERT_MUTEX_OWNER( &ld->ld_req_mutex );  #endif
   
         Debug( LDAP_DEBUG_TRACE, "read1msg: ld %p msgid %d all %d\n",          Debug( LDAP_DEBUG_TRACE, "read1msg: ld %p msgid %d all %d\n",
                 (void *)ld, msgid, all );                  (void *)ld, msgid, all );
   
           lc = *lcp;
   
 retry:  retry:
         if ( lc->lconn_ber == NULL ) {          if ( lc->lconn_ber == NULL ) {
                 lc->lconn_ber = ldap_alloc_ber_with_options( ld );                  lc->lconn_ber = ldap_alloc_ber_with_options(ld);
   
                 if ( lc->lconn_ber == NULL ) {                  if( lc->lconn_ber == NULL ) {
                         return -1;                          return -1;
                 }                  }
         }          }
Line 473  retry: Line 448  retry:
         assert( LBER_VALID (ber) );          assert( LBER_VALID (ber) );
   
         /* get the next message */          /* get the next message */
         sock_errset(0);          errno = 0;
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
         if ( LDAP_IS_UDP(ld) ) {          if ( LDAP_IS_UDP(ld) ) {
                 struct sockaddr from;                  struct sockaddr from;
                 ber_int_sb_read( lc->lconn_sb, &from, sizeof(struct sockaddr) );                  ber_int_sb_read( lc->lconn_sb, &from, sizeof(struct sockaddr) );
                 if ( ld->ld_options.ldo_version == LDAP_VERSION2 ) isv2 = 1;                  if (ld->ld_options.ldo_version == LDAP_VERSION2) isv2=1;
         }          }
 nextresp3:  nextresp3:
 #endif  #endif
         tag = ber_get_next( lc->lconn_sb, &len, ber );          tag = ber_get_next( lc->lconn_sb, &len, ber );
         switch ( tag ) {          if ( tag == LDAP_TAG_MESSAGE ) {
         case LDAP_TAG_MESSAGE:  
                 /*                  /*
                  * We read a complete message.                   * We read a complete message.
                  * The connection should no longer need this ber.                   * The connection should no longer need this ber.
                  */                   */
                 lc->lconn_ber = NULL;                  lc->lconn_ber = NULL;
                 break;          }
           if ( tag != LDAP_TAG_MESSAGE ) {
         case LBER_DEFAULT:                  if ( tag == LBER_DEFAULT) {
                 err = sock_errno();  
 #ifdef LDAP_DEBUG                    #ifdef LDAP_DEBUG                  
                 Debug( LDAP_DEBUG_CONNS,                          Debug( LDAP_DEBUG_CONNS,
                         "ber_get_next failed.\n", 0, 0, 0 );                                  "ber_get_next failed.\n", 0, 0, 0 );
 #endif               #endif             
                 if ( err == EWOULDBLOCK ) return LDAP_MSG_X_KEEP_LOOKING;  #ifdef EWOULDBLOCK                      
                 if ( err == EAGAIN ) return LDAP_MSG_X_KEEP_LOOKING;                          if (errno==EWOULDBLOCK) return LDAP_MSG_X_KEEP_LOOKING;
                 ld->ld_errno = LDAP_SERVER_DOWN;  #endif
                 --lc->lconn_refcnt;  #ifdef EAGAIN
                 lc->lconn_status = 0;                          if (errno == EAGAIN) return LDAP_MSG_X_KEEP_LOOKING;
                 return -1;  #endif
                           ld->ld_errno = LDAP_SERVER_DOWN;
         default:                          return -1;
                   }
                 ld->ld_errno = LDAP_LOCAL_ERROR;                  ld->ld_errno = LDAP_LOCAL_ERROR;
                 return -1;                  return -1;
         }          }
Line 517  nextresp3: Line 491  nextresp3:
                 return( -1 );                  return( -1 );
         }          }
   
         /* id == 0 iff unsolicited notification message (RFC 4511) */  
   
         /* id < 0 is invalid, just toss it. FIXME: should we disconnect? */  
         if ( id < 0 ) {  
                 goto retry_ber;  
         }  
           
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( id > 0 ) {          if ( ldap_abandoned( ld, id ) ) {
                 if ( ldap_abandoned( ld, id ) ) {                  Debug( LDAP_DEBUG_ANY, "abandoned ld %p msgid %ld\n",
                         /* the message type */                          (void *)ld, (long) id, 0);
                         tag = ber_peek_tag( ber, &len );  
                         switch ( tag ) {  
                         case LDAP_RES_SEARCH_ENTRY:  
                         case LDAP_RES_SEARCH_REFERENCE:  
                         case LDAP_RES_INTERMEDIATE:  
                         case LBER_ERROR:  
                                 break;  
   
                         default:  
                                 /* there's no need to keep the id  
                                  * in the abandoned list any longer */  
                                 ldap_mark_abandoned( ld, id );  
                                 break;  
                         }  
   
                         Debug( LDAP_DEBUG_ANY,  
                                 "abandoned/discarded ld %p msgid %d message type %s\n",  
                                 (void *)ld, id, ldap_int_msgtype2str( tag ) );  
   
 retry_ber:  retry_ber:
                         ber_free( ber, 1 );                  ber_free( ber, 1 );
                         if ( ber_sockbuf_ctrl( lc->lconn_sb, LBER_SB_OPT_DATA_READY, NULL ) ) {                  if ( ber_sockbuf_ctrl( lc->lconn_sb, LBER_SB_OPT_DATA_READY, NULL ) ) {
                                 goto retry;                          goto retry;
                         }  
                         return( LDAP_MSG_X_KEEP_LOOKING );      /* continue looking */  
                 }  
   
                 lr = ldap_find_request_by_msgid( ld, id );  
                 if ( lr == NULL ) {  
                         const char      *msg = "unknown";  
   
                         /* the message type */  
                         tag = ber_peek_tag( ber, &len );  
                         switch ( tag ) {  
                         case LBER_ERROR:  
                                 break;  
   
                         default:  
                                 msg = ldap_int_msgtype2str( tag );  
                                 break;  
                         }  
   
                         Debug( LDAP_DEBUG_ANY,  
                                 "no request for response on ld %p msgid %d message type %s (tossing)\n",  
                                 (void *)ld, id, msg );  
   
                         goto retry_ber;  
                 }                  }
                   return( LDAP_MSG_X_KEEP_LOOKING );      /* continue looking */
           }
   
           lr = ldap_find_request_by_msgid( ld, id );
           if ( lr == NULL ) {
                   Debug( LDAP_DEBUG_ANY,
                           "no request for response on ld %p msgid %ld (tossing)\n",
                           (void *)ld, (long) id, 0 );
                   goto retry_ber;
           }
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
                 if ( LDAP_IS_UDP(ld) && isv2 ) {          if (LDAP_IS_UDP(ld) && isv2) {
                         ber_scanf(ber, "x{");                  ber_scanf(ber, "x{");
                 }          }
 nextresp2:  nextresp2:
                 ;  
 #endif  #endif
         }  
   
         /* the message type */          /* the message type */
         tag = ber_peek_tag( ber, &len );          if ( (tag = ber_peek_tag( ber, &len )) == LBER_ERROR ) {
         if ( tag == LBER_ERROR ) {  
                 ld->ld_errno = LDAP_DECODING_ERROR;                  ld->ld_errno = LDAP_DECODING_ERROR;
                 ber_free( ber, 1 );                  ber_free( ber, 1 );
                 return( -1 );                  return( -1 );
         }          }
   
         Debug( LDAP_DEBUG_TRACE,          Debug( LDAP_DEBUG_TRACE,
                 "read1msg: ld %p msgid %d message type %s\n",                  "read1msg: ld %p msgid %ld message type %s\n",
                 (void *)ld, id, ldap_int_msgtype2str( tag ) );                  (void *)ld, (long) lr->lr_msgid, ldap_int_msgtype2str( tag ));
   
         if ( id == 0 ) {  
                 /* unsolicited notification message (RFC 4511) */  
                 if ( tag != LDAP_RES_EXTENDED ) {  
                         /* toss it */  
                         goto retry_ber;  
   
                         /* strictly speaking, it's an error; from RFC 4511:  
   
 4.4.  Unsolicited Notification  
   
    An unsolicited notification is an LDAPMessage sent from the server to  
    the client that is not in response to any LDAPMessage received by the  
    server.  It is used to signal an extraordinary condition in the  
    server or in the LDAP session between the client and the server.  The  
    notification is of an advisory nature, and the server will not expect  
    any response to be returned from the client.  
   
    The unsolicited notification is structured as an LDAPMessage in which  
    the messageID is zero and protocolOp is set to the extendedResp  
    choice using the ExtendedResponse type (See Section 4.12).  The  
    responseName field of the ExtendedResponse always contains an LDAPOID  
    that is unique for this notification.  
   
                          * however, since unsolicited responses  
                          * are of advisory nature, better  
                          * toss it, right now  
                          */  
   
 #if 0  
                         ld->ld_errno = LDAP_DECODING_ERROR;  
                         ber_free( ber, 1 );  
                         return( -1 );  
 #endif  
                 }  
   
                 lr = &dummy_lr;  
         }  
   
         id = lr->lr_origid;          id = lr->lr_origid;
         refer_cnt = 0;          refer_cnt = 0;
Line 643  nextresp2: Line 534  nextresp2:
         lr->lr_res_msgtype = tag;          lr->lr_res_msgtype = tag;
   
         /*          /*
          * Check for V3 search reference           * This code figures out if we are going to chase a
            * referral / search reference, or pass it back to the application
          */           */
         if ( tag == LDAP_RES_SEARCH_REFERENCE ) {          v3ref = V3REF_NOREF;    /* Assume not a V3 search reference/referral */
                 if ( ld->ld_version > LDAP_VERSION2 ) {          if( (tag != LDAP_RES_SEARCH_ENTRY) && (ld->ld_version > LDAP_VERSION2) ) {
                   BerElement      tmpber = *ber;  /* struct copy */
                   char **refs = NULL;
   
                   if( tag == LDAP_RES_SEARCH_REFERENCE ) {
                         /* This is a V3 search reference */                          /* This is a V3 search reference */
                         if ( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ||                          /* Assume we do not chase the reference,
                                         lr->lr_parent != NULL )                           * but pass it to application */
                           v3ref = V3REF_TOAPP;
                           if( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ||
                                           (lr->lr_parent != NULL) )
                         {                          {
                                 char **refs = NULL;  
                                 tmpber = *ber;  
   
                                 /* Get the referral list */                                  /* Get the referral list */
                                 if ( ber_scanf( &tmpber, "{v}", &refs ) == LBER_ERROR ) {                                  if ( ber_scanf( &tmpber, "{v}", &refs ) == LBER_ERROR ) {
                                         rc = LDAP_DECODING_ERROR;                                          rc = LDAP_DECODING_ERROR;
   
                                 } else {                                  } else {
                                         /* Note: refs array is freed by ldap_chase_v3referrals */                                          /* Note: refs array is freed by ldap_chase_v3referrals */
                                         refer_cnt = ldap_chase_v3referrals( ld, lr, refs,                                          refer_cnt = ldap_chase_v3referrals( ld, lr, refs,
                                                 1, &lr->lr_res_error, &hadref );                                              1, &lr->lr_res_error, &hadref );
                                         if ( refer_cnt > 0 ) {                                          if ( refer_cnt > 0 ) {
                                                 /* successfully chased reference */                                                  /* sucessfully chased reference */
                                                 /* If haven't got end search, set chasing referrals */                                                  /* If haven't got end search, set chasing referrals */
                                                 if ( lr->lr_status != LDAP_REQST_COMPLETED ) {                                                  if( lr->lr_status != LDAP_REQST_COMPLETED) {
                                                         lr->lr_status = LDAP_REQST_CHASINGREFS;                                                          lr->lr_status = LDAP_REQST_CHASINGREFS;
                                                         Debug( LDAP_DEBUG_TRACE,                                                          Debug( LDAP_DEBUG_TRACE,
                                                                 "read1msg:  search ref chased, "                                                                  "read1msg:  search ref chased, "
                                                                 "mark request chasing refs, "                                                                  "mark request chasing refs, "
                                                                 "id = %d\n",                                                                  "id = %d\n",
                                                                 lr->lr_msgid, 0, 0 );                                                                  lr->lr_msgid, 0, 0);
                                                 }                                                  }
   
                                                   /* We sucessfully chased the reference */
                                                   v3ref = V3REF_SUCCESS;
                                         }                                          }
                                 }                                  }
                         }                          }
                 }                  } else {
                           /* Check for V3 referral */
         } else if ( tag != LDAP_RES_SEARCH_ENTRY && tag != LDAP_RES_INTERMEDIATE ) {                          ber_len_t       len;
                 /* All results that just return a status, i.e. don't return data                          char            *lr_res_error = NULL;
                  * go through the following code.  This code also chases V2 referrals  
                  * and checks if all referrals have been chased.                          if ( ber_scanf( &tmpber, "{eAA",/*}*/ &lderr,
                  */                                      &lr->lr_res_matched, &lr_res_error )
                 char            *lr_res_error = NULL;                                      != LBER_ERROR )
                           {
                 tmpber = *ber;  /* struct copy */                                  if ( lr_res_error != NULL ) {
                 if ( ber_scanf( &tmpber, "{eAA", &lderr,                                          {
                                 &lr->lr_res_matched, &lr_res_error )                                                  if ( lr->lr_res_error != NULL ) {
                                 != LBER_ERROR )                                                          (void)ldap_append_referral( ld, &lr->lr_res_error, lr_res_error );
                 {                                                          LDAP_FREE( (char *)lr_res_error );
                         if ( lr_res_error != NULL ) {  
                                 if ( lr->lr_res_error != NULL ) {  
                                         (void)ldap_append_referral( ld, &lr->lr_res_error, lr_res_error );  
                                         LDAP_FREE( (char *)lr_res_error );  
   
                                 } else {                                                  } else {
                                         lr->lr_res_error = lr_res_error;                                                          lr->lr_res_error = lr_res_error;
                                                   }
                                           }
                                           lr_res_error = NULL;
                                 }                                  }
                                 lr_res_error = NULL;  
                         }  
   
                         /* Do we need to check for referrals? */  
                         if ( tag != LDAP_RES_BIND &&  
                                 ( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ||  
                                         lr->lr_parent != NULL ))  
                         {  
                                 char            **refs = NULL;  
                                 ber_len_t       len;  
   
                                 /* Check if V3 referral */                                  /* Check if V3 referral */
                                 if ( ber_peek_tag( &tmpber, &len ) == LDAP_TAG_REFERRAL ) {                                  if ( ber_peek_tag( &tmpber, &len ) == LDAP_TAG_REFERRAL ) {
                                         if ( ld->ld_version > LDAP_VERSION2 ) {                                          /* We have a V3 referral, assume we cannot chase it */
                                           v3ref = V3REF_TOAPP;
                                           if( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS)
                                                            || (lr->lr_parent != NULL) )
                                           {
                                                   /* Assume referral not chased and return it to app */
                                                   v3ref = V3REF_TOAPP;
   
                                                 /* Get the referral list */                                                  /* Get the referral list */
                                                 if ( ber_scanf( &tmpber, "{v}", &refs) == LBER_ERROR) {                                                  if( ber_scanf( &tmpber, "{v}", &refs) == LBER_ERROR) {
                                                         rc = LDAP_DECODING_ERROR;                                                          rc = LDAP_DECODING_ERROR;
                                                         lr->lr_status = LDAP_REQST_COMPLETED;                                                          lr->lr_status = LDAP_REQST_COMPLETED;
                                                         Debug( LDAP_DEBUG_TRACE,                                                          Debug( LDAP_DEBUG_TRACE,
                                                                 "read1msg: referral decode error, "                                                                  "read1msg: referral decode error, mark request completed, ld %p msgid %d\n",
                                                                 "mark request completed, ld %p msgid %d\n",                                                                  (void *)ld, lr->lr_msgid, 0);
                                                                 (void *)ld, lr->lr_msgid, 0 );  
   
                                                 } else {                                                  } else {
                                                         /* Chase the referral                                                           /* Chase the referral 
                                                          * refs array is freed by ldap_chase_v3referrals                                                           * Note: refs arrary is freed by ldap_chase_v3referrals
                                                          */                                                           */
                                                         refer_cnt = ldap_chase_v3referrals( ld, lr, refs,                                                          refer_cnt = ldap_chase_v3referrals( ld, lr, refs,
                                                                 0, &lr->lr_res_error, &hadref );                                                              0, &lr->lr_res_error, &hadref );
                                                         lr->lr_status = LDAP_REQST_COMPLETED;                                                          lr->lr_status = LDAP_REQST_COMPLETED;
                                                         Debug( LDAP_DEBUG_TRACE,                                                          Debug( LDAP_DEBUG_TRACE,
                                                                 "read1msg: referral %s chased, "                                                                  "read1msg: referral chased, mark request completed, ld %p msgid %d\n",
                                                                 "mark request completed, ld %p msgid %d\n",                                                                  (void *)ld, lr->lr_msgid, 0);
                                                                 refer_cnt > 0 ? "" : "not",                                                          if( refer_cnt > 0) {
                                                                 (void *)ld, lr->lr_msgid);                                                                  /* Referral successfully chased */
                                                         if ( refer_cnt < 0 ) {                                                                  v3ref = V3REF_SUCCESS;
                                                                 refer_cnt = 0;  
                                                         }                                                          }
                                                 }                                                  }
                                         }                                          }
                                 } else {                                  }
                                         switch ( lderr ) {  
                                         case LDAP_SUCCESS:  
                                         case LDAP_COMPARE_TRUE:  
                                         case LDAP_COMPARE_FALSE:  
                                                 break;  
   
                                         default:                                  if( lr->lr_res_matched != NULL ) {
                                                 if ( lr->lr_res_error == NULL ) {                                          LDAP_FREE( lr->lr_res_matched );
                                                         break;                                          lr->lr_res_matched = NULL;
                                                 }                                  }
                                   if( lr->lr_res_error != NULL ) {
                                           LDAP_FREE( lr->lr_res_error );
                                           lr->lr_res_error = NULL;
                                   }
                           }
                   }
           }
   
           /* All results that just return a status, i.e. don't return data
            * go through the following code.  This code also chases V2 referrals
            * and checks if all referrals have been chased.
            */
           if ( (tag != LDAP_RES_SEARCH_ENTRY) && (v3ref != V3REF_TOAPP) &&
                   (tag != LDAP_RES_INTERMEDIATE ))
           {
                   /* For a v3 search referral/reference, only come here if already chased it */
                   if ( ld->ld_version >= LDAP_VERSION2 &&
                           ( lr->lr_parent != NULL ||
                           LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ) )
                   {
                           char            *lr_res_error = NULL;
   
                                                 /* pedantic, should never happen */                          tmpber = *ber;  /* struct copy */
                                                 if ( lr->lr_res_error[ 0 ] == '\0' ) {                          if ( v3ref == V3REF_SUCCESS ) {
                                                         LDAP_FREE( lr->lr_res_error );                                  /* V3 search reference or V3 referral
                                                         lr->lr_res_error = NULL;                                   * sucessfully chased. If this message
                                                         break;                                     * is a search result, then it has no more
                                    * outstanding referrals.
                                    */
                                   if ( tag == LDAP_RES_SEARCH_RESULT )
                                           refer_cnt = 0;
                           } else if ( ber_scanf( &tmpber, "{eAA}", &lderr,
                                   &lr->lr_res_matched, &lr_res_error )
                                   != LBER_ERROR )
                           {
                                   if ( lr_res_error != NULL ) {
                                           {
                                                   if ( lr->lr_res_error != NULL ) {
                                                           (void)ldap_append_referral( ld, &lr->lr_res_error, lr_res_error );
                                                           LDAP_FREE( (char *)lr_res_error );
                                                   } else {
                                                           lr->lr_res_error = lr_res_error;
                                                 }                                                  }
                                           }
                                           lr_res_error = NULL;
                                   }
   
                                   switch ( lderr ) {
                                   case LDAP_SUCCESS:
                                   case LDAP_COMPARE_TRUE:
                                   case LDAP_COMPARE_FALSE:
                                           break;
   
                                                 /* V2 referrals are in error string */                                  default:
                                                 refer_cnt = ldap_chase_referrals( ld, lr,                                          if ( lr->lr_res_error == NULL
                                                         &lr->lr_res_error, -1, &hadref );                                                  || lr->lr_res_error[ 0 ] == '\0' )
                                                 lr->lr_status = LDAP_REQST_COMPLETED;                                          {
                                                 Debug( LDAP_DEBUG_TRACE,  
                                                         "read1msg:  V2 referral chased, "  
                                                         "mark request completed, id = %d\n",  
                                                         lr->lr_msgid, 0, 0 );  
                                                 break;                                                  break;
                                         }                                          }
                                 }  
                         }  
   
                         /* save errno, message, and matched string */                                          /* referrals are in error string */
                         if ( !hadref || lr->lr_res_error == NULL ) {                                          refer_cnt = ldap_chase_referrals( ld, lr,
                                 lr->lr_res_errno =                                                  &lr->lr_res_error, -1, &hadref );
                                         lderr == LDAP_PARTIAL_RESULTS                                          lr->lr_status = LDAP_REQST_COMPLETED;
                                         ? LDAP_SUCCESS : lderr;                                          Debug( LDAP_DEBUG_TRACE,
                                                   "read1msg:  V2 referral chased, "
                                                   "mark request completed, id = %d\n",
                                                   lr->lr_msgid, 0, 0 );
                                           break;
                                   }
   
                         } else if ( ld->ld_errno != LDAP_SUCCESS ) {                                  /* save errno, message, and matched string */
                                 lr->lr_res_errno = ld->ld_errno;                                  if ( !hadref || lr->lr_res_error == NULL ) {
                                           lr->lr_res_errno = ( lderr ==
                                           LDAP_PARTIAL_RESULTS ) ? LDAP_SUCCESS
                                           : lderr;
                                   } else if ( ld->ld_errno != LDAP_SUCCESS ) {
                                           lr->lr_res_errno = ld->ld_errno;
                                   } else {
                                           lr->lr_res_errno = LDAP_PARTIAL_RESULTS;
                                   }
   
                         } else {                                  Debug( LDAP_DEBUG_TRACE, "new result:  "
                                 lr->lr_res_errno = LDAP_PARTIAL_RESULTS;                                          "res_errno: %d, "
                                           "res_error: <%s>, "
                                           "res_matched: <%s>\n",
                                           lr->lr_res_errno,
                                           lr->lr_res_error ? lr->lr_res_error : "",
                                           lr->lr_res_matched ? lr->lr_res_matched : "" );
                         }                          }
                 }  
   
                 /* in any case, don't leave any lr_res_error 'round */                          /* in any case, don't leave any lr_res_error 'round */
                 if ( lr_res_error ) {                          if ( lr_res_error ) {
                         LDAP_FREE( lr_res_error );                                  LDAP_FREE( lr_res_error );
                           }
                 }                  }
   
                 Debug( LDAP_DEBUG_TRACE,                  Debug( LDAP_DEBUG_TRACE,
Line 797  nextresp2: Line 740  nextresp2:
                         ber_free( ber, 1 );                          ber_free( ber, 1 );
                         ber = NULL;                          ber = NULL;
                         if ( refer_cnt < 0 ) {                          if ( refer_cnt < 0 ) {
                                 ldap_return_request( ld, lr, 0 );  
                                 return( -1 );   /* fatal error */                                  return( -1 );   /* fatal error */
                         }                          }
                         lr->lr_res_errno = LDAP_SUCCESS; /* sucessfully chased referral */                          lr->lr_res_errno = LDAP_SUCCESS; /* sucessfully chased referral */
                         if ( lr->lr_res_matched ) {  
                                 LDAP_FREE( lr->lr_res_matched );  
                                 lr->lr_res_matched = NULL;  
                         }  
   
                 } else {                  } else {
                         if ( lr->lr_outrefcnt <= 0 && lr->lr_parent == NULL ) {                          if ( lr->lr_outrefcnt <= 0 && lr->lr_parent == NULL ) {
                                 /* request without any referrals */                                  /* request without any referrals */
                                 simple_request = ( hadref ? 0 : 1 );                                  simple_request = ( hadref ? 0 : 1 );
   
                         } else {                          } else {
                                 /* request with referrals or child request */                                  /* request with referrals or child request */
                                 ber_free( ber, 1 );                                  ber_free( ber, 1 );
Line 821  nextresp2: Line 757  nextresp2:
                         Debug( LDAP_DEBUG_TRACE,                          Debug( LDAP_DEBUG_TRACE,
                                 "read1msg:  mark request completed, ld %p msgid %d\n",                                  "read1msg:  mark request completed, ld %p msgid %d\n",
                                 (void *)ld, lr->lr_msgid, 0);                                  (void *)ld, lr->lr_msgid, 0);
                         tmplr = lr;  
                         while ( lr->lr_parent != NULL ) {                          while ( lr->lr_parent != NULL ) {
                                 merge_error_info( ld, lr->lr_parent, lr );                                  merge_error_info( ld, lr->lr_parent, lr );
   
Line 830  nextresp2: Line 765  nextresp2:
                                         break;  /* not completely done yet */                                          break;  /* not completely done yet */
                                 }                                  }
                         }                          }
                         /* ITS#6744: Original lr was refcounted when we retrieved it,  
                          * must release it now that we're working with the parent  
                          */  
                         if ( tmplr->lr_parent ) {  
                                 ldap_return_request( ld, tmplr, 0 );  
                         }  
   
                         /* Check if all requests are finished, lr is now parent */                          /* Check if all requests are finished, lr is now parent */
                         tmplr = lr;                          tmplr = lr;
                         if ( tmplr->lr_status == LDAP_REQST_COMPLETED ) {                          if (tmplr->lr_status == LDAP_REQST_COMPLETED) {
                                 for ( tmplr = lr->lr_child;                                  for ( tmplr=lr->lr_child;
                                         tmplr != NULL;                                          tmplr != NULL;
                                         tmplr = tmplr->lr_refnext )                                          tmplr=tmplr->lr_refnext)
                                 {                                  {
                                         if ( tmplr->lr_status != LDAP_REQST_COMPLETED ) break;                                          if( tmplr->lr_status != LDAP_REQST_COMPLETED) break;
                                 }                                  }
                         }                          }
   
                         /* This is the parent request if the request has referrals */                          /* This is the parent request if the request has referrals */
                         if ( lr->lr_outrefcnt <= 0 &&                          if ( lr->lr_outrefcnt <= 0 && lr->lr_parent == NULL &&
                                 lr->lr_parent == NULL &&  
                                 tmplr == NULL )                                  tmplr == NULL )
                         {                          {
                                 id = lr->lr_msgid;                                  id = lr->lr_msgid;
                                 tag = lr->lr_res_msgtype;                                  tag = lr->lr_res_msgtype;
                                 Debug( LDAP_DEBUG_TRACE, "request done: ld %p msgid %d\n",                                  Debug( LDAP_DEBUG_ANY, "request done: ld %p msgid %ld\n",
                                         (void *)ld, id, 0 );                                          (void *)ld, (long) id, 0 );
                                 Debug( LDAP_DEBUG_TRACE,  Debug( LDAP_DEBUG_TRACE,
                                         "res_errno: %d, res_error: <%s>, "  "res_errno: %d, res_error: <%s>, res_matched: <%s>\n",
                                         "res_matched: <%s>\n",  lr->lr_res_errno, lr->lr_res_error ? lr->lr_res_error : "",
                                         lr->lr_res_errno,  lr->lr_res_matched ? lr->lr_res_matched : "" );
                                         lr->lr_res_error ? lr->lr_res_error : "",  
                                         lr->lr_res_matched ? lr->lr_res_matched : "" );  
                                 if ( !simple_request ) {                                  if ( !simple_request ) {
                                         ber_free( ber, 1 );                                          ber_free( ber, 1 );
                                         ber = NULL;                                          ber = NULL;
                                         if ( build_result_ber( ld, &ber, lr )                                          if ( build_result_ber( ld, &ber, lr )
                                             == LBER_ERROR )                                              == LBER_ERROR ) {
                                         {  
                                                 rc = -1; /* fatal error */                                                  rc = -1; /* fatal error */
                                         }                                          }
                                 }                                  }
   
                                 if ( lr != &dummy_lr ) {  #ifdef LDAP_R_COMPILE
                                         ldap_return_request( ld, lr, 1 );                                  ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
                                 }  #endif
                                 lr = NULL;                                  ldap_free_request( ld, lr );
   #ifdef LDAP_R_COMPILE
                                   ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                         }                          }
   
                         /*                          if ( lc != NULL ) {
                          * RFC 4511 unsolicited (id == 0) responses  #ifdef LDAP_R_COMPILE
                          * shouldn't necessarily end the connection                                  ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
                          */  #endif
                         if ( lc != NULL && id != 0 ) {                                  ldap_free_connection( ld, lc, 0, 1 );
                                 --lc->lconn_refcnt;  #ifdef LDAP_R_COMPILE
                                 lc = NULL;                                  ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                                   lc = *lcp = NULL;
                         }                          }
                 }                  }
         }          }
   
         if ( lr != NULL ) {  
                 if ( lr != &dummy_lr ) {  
                         ldap_return_request( ld, lr, 0 );  
                 }  
                 lr = NULL;  
         }  
   
         if ( ber == NULL ) {          if ( ber == NULL ) {
                 return( rc );                  return( rc );
         }          }
   
         /* try to handle unsolicited responses as appropriate */  
         if ( id == 0 && msgid > LDAP_RES_UNSOLICITED ) {  
                 int     is_nod = 0;  
   
                 tag = ber_peek_tag( &tmpber, &len );  
   
                 /* we have a res oid */  
                 if ( tag == LDAP_TAG_EXOP_RES_OID ) {  
                         static struct berval    bv_nod = BER_BVC( LDAP_NOTICE_OF_DISCONNECTION );  
                         struct berval           resoid = BER_BVNULL;  
   
                         if ( ber_scanf( &tmpber, "m", &resoid ) == LBER_ERROR ) {  
                                 ld->ld_errno = LDAP_DECODING_ERROR;  
                                 ber_free( ber, 1 );  
                                 return -1;  
                         }  
   
                         assert( !BER_BVISEMPTY( &resoid ) );  
   
                         is_nod = ber_bvcmp( &resoid, &bv_nod ) == 0;  
   
                         tag = ber_peek_tag( &tmpber, &len );  
                 }  
   
 #if 0 /* don't need right now */  
                 /* we have res data */  
                 if ( tag == LDAP_TAG_EXOP_RES_VALUE ) {  
                         struct berval resdata;  
   
                         if ( ber_scanf( &tmpber, "m", &resdata ) == LBER_ERROR ) {  
                                 ld->ld_errno = LDAP_DECODING_ERROR;  
                                 ber_free( ber, 0 );  
                                 return ld->ld_errno;  
                         }  
   
                         /* use it... */  
                 }  
 #endif  
   
                 /* handle RFC 4511 "Notice of Disconnection" locally */  
   
                 if ( is_nod ) {  
                         if ( tag == LDAP_TAG_EXOP_RES_VALUE ) {  
                                 ld->ld_errno = LDAP_DECODING_ERROR;  
                                 ber_free( ber, 1 );  
                                 return -1;  
                         }  
   
                         /* get rid of the connection... */  
                         if ( lc != NULL ) {  
                                 --lc->lconn_refcnt;  
                         }  
   
                         /* need to return -1, because otherwise  
                          * a valid result is expected */  
                         ld->ld_errno = lderr;  
                         return -1;  
                 }  
         }  
   
         /* make a new ldap message */          /* make a new ldap message */
         newmsg = (LDAPMessage *) LDAP_CALLOC( 1, sizeof(LDAPMessage) );          newmsg = (LDAPMessage *) LDAP_CALLOC( 1, sizeof(LDAPMessage) );
         if ( newmsg == NULL ) {          if ( newmsg == NULL ) {
Line 994  nextresp2: Line 857  nextresp2:
                                  */                                   */
                                 ber = ber_dup( ber );                                  ber = ber_dup( ber );
                                 ber_scanf( ber, "x" );                                  ber_scanf( ber, "x" );
                                 if ( ber_peek_tag( ber, &len ) != LBER_DEFAULT ) {                                  if (ber_peek_tag(ber, &len) != LBER_DEFAULT) {
                                         /* There's more - dup the ber buffer so they can all be                                          /* There's more - dup the ber buffer so they can all be
                                          * individually freed by ldap_msgfree.                                           * individually freed by ldap_msgfree.
                                          */                                           */
                                         struct berval bv;                                          struct berval bv;
                                         ber_get_option( ber, LBER_OPT_BER_REMAINING_BYTES, &len );                                          ber_get_option(ber, LBER_OPT_BER_REMAINING_BYTES, &len);
                                         bv.bv_val = LDAP_MALLOC( len );                                          bv.bv_val = LDAP_MALLOC(len);
                                         if ( bv.bv_val ) {                                          if (bv.bv_val) {
                                                 ok = 1;                                                  ok=1;
                                                 ber_read( ber, bv.bv_val, len );                                                  ber_read(ber, bv.bv_val, len);
                                                 bv.bv_len = len;                                                  bv.bv_len = len;
                                                 ber_init2( ber, &bv, ld->ld_lberoptions );                                                  ber_init2(ber, &bv, ld->ld_lberoptions );
                                         }                                          }
                                 }                                  }
                         } else {                          } else {
Line 1027  nextresp2: Line 890  nextresp2:
                         chain_head->lm_chain_tail = newmsg;                          chain_head->lm_chain_tail = newmsg;
                         tmp = newmsg;                          tmp = newmsg;
                         /* "ok" means there's more to parse */                          /* "ok" means there's more to parse */
                         if ( ok ) {                          if (ok) {
                                 if ( isv2 ) {                                  if (isv2) goto nextresp2;
                                         goto nextresp2;                                  else goto nextresp3;
   
                                 } else {  
                                         goto nextresp3;  
                                 }  
                         } else {                          } else {
                                 /* got to end of datagram without a SearchResult. Free                                  /* got to end of datagram without a SearchResult. Free
                                  * our dup'd ber, but leave any buffer alone. For v2 case,                                   * our dup'd ber, but leave any buffer alone. For v2 case,
                                  * the previous response is still using this buffer. For v3,                                   * the previous response is still using this buffer. For v3,
                                  * the new ber has no buffer to free yet.                                   * the new ber has no buffer to free yet.
                                  */                                   */
                                 ber_free( ber, 0 );                                  ber_free(ber, 0);
                                 return -1;                                  return -1;
                         }                          }
                 } else if ( moremsgs ) {                  } else if ( moremsgs ) {
Line 1060  nextresp2: Line 919  nextresp2:
         /* is this the one we're looking for? */          /* is this the one we're looking for? */
         if ( msgid == LDAP_RES_ANY || id == msgid ) {          if ( msgid == LDAP_RES_ANY || id == msgid ) {
                 if ( all == LDAP_MSG_ONE                  if ( all == LDAP_MSG_ONE
                         || ( newmsg->lm_msgtype != LDAP_RES_SEARCH_RESULT                      || (newmsg->lm_msgtype != LDAP_RES_SEARCH_RESULT
                                 && newmsg->lm_msgtype != LDAP_RES_SEARCH_ENTRY                      && newmsg->lm_msgtype != LDAP_RES_SEARCH_ENTRY
                                 && newmsg->lm_msgtype != LDAP_RES_INTERMEDIATE                      && newmsg->lm_msgtype != LDAP_RES_SEARCH_REFERENCE) ) {
                                 && newmsg->lm_msgtype != LDAP_RES_SEARCH_REFERENCE ) )  
                 {  
                         *result = newmsg;                          *result = newmsg;
                         ld->ld_errno = LDAP_SUCCESS;                          ld->ld_errno = LDAP_SUCCESS;
                         return( tag );                          return( tag );
   
                 } else if ( newmsg->lm_msgtype == LDAP_RES_SEARCH_RESULT) {                  } else if ( newmsg->lm_msgtype == LDAP_RES_SEARCH_RESULT) {
                         foundit = 1;    /* return the chain later */                          foundit = 1;    /* return the chain later */
                 }                  }
Line 1082  nextresp2: Line 938  nextresp2:
   
         prev = NULL;          prev = NULL;
         for ( l = ld->ld_responses; l != NULL; l = l->lm_next ) {          for ( l = ld->ld_responses; l != NULL; l = l->lm_next ) {
                 if ( l->lm_msgid == newmsg->lm_msgid ) {                  if ( l->lm_msgid == newmsg->lm_msgid )
                         break;                          break;
                 }  
                 prev = l;                  prev = l;
         }          }
   
Line 1100  nextresp2: Line 955  nextresp2:
                 goto exit;                  goto exit;
         }          }
   
         Debug( LDAP_DEBUG_TRACE, "adding response ld %p msgid %d type %ld:\n",          Debug( LDAP_DEBUG_TRACE, "adding response ld %p msgid %ld type %ld:\n",
                 (void *)ld, newmsg->lm_msgid, (long) newmsg->lm_msgtype );                  (void *)ld, (long) newmsg->lm_msgid, (long) newmsg->lm_msgtype );
   
         /* part of a search response - add to end of list of entries */          /* part of a search response - add to end of list of entries */
         l->lm_chain_tail->lm_chain = newmsg;          l->lm_chain_tail->lm_chain = newmsg;
Line 1109  nextresp2: Line 964  nextresp2:
   
         /* return the whole chain if that's what we were looking for */          /* return the whole chain if that's what we were looking for */
         if ( foundit ) {          if ( foundit ) {
                 if ( prev == NULL ) {                  if ( prev == NULL )
                         ld->ld_responses = l->lm_next;                          ld->ld_responses = l->lm_next;
                 } else {                  else
                         prev->lm_next = l->lm_next;                          prev->lm_next = l->lm_next;
                 }  
                 *result = l;                  *result = l;
         }          }
   
Line 1151  build_result_ber( LDAP *ld, BerElement * Line 1005  build_result_ber( LDAP *ld, BerElement *
                 lr->lr_res_error ? lr->lr_res_error : "" ) == -1 )                  lr->lr_res_error ? lr->lr_res_error : "" ) == -1 )
         {          {
                 ld->ld_errno = LDAP_ENCODING_ERROR;                  ld->ld_errno = LDAP_ENCODING_ERROR;
                 ber_free( ber, 1 );                  ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
Line 1159  build_result_ber( LDAP *ld, BerElement * Line 1013  build_result_ber( LDAP *ld, BerElement *
   
         if ( ber_skip_tag( ber, &len ) == LBER_ERROR ) {          if ( ber_skip_tag( ber, &len ) == LBER_ERROR ) {
                 ld->ld_errno = LDAP_DECODING_ERROR;                  ld->ld_errno = LDAP_DECODING_ERROR;
                 ber_free( ber, 1 );                  ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
         if ( ber_get_enum( ber, &along ) == LBER_ERROR ) {          if ( ber_get_enum( ber, &along ) == LBER_ERROR ) {
                 ld->ld_errno = LDAP_DECODING_ERROR;                  ld->ld_errno = LDAP_DECODING_ERROR;
                 ber_free( ber, 1 );                  ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
Line 1173  build_result_ber( LDAP *ld, BerElement * Line 1027  build_result_ber( LDAP *ld, BerElement *
   
         if ( tag == LBER_ERROR ) {          if ( tag == LBER_ERROR ) {
                 ld->ld_errno = LDAP_DECODING_ERROR;                  ld->ld_errno = LDAP_DECODING_ERROR;
                 ber_free( ber, 1 );                  ber_free(ber, 1);
                 return( LBER_ERROR );                  return( LBER_ERROR );
         }          }
   
Line 1182  build_result_ber( LDAP *ld, BerElement * Line 1036  build_result_ber( LDAP *ld, BerElement *
 }  }
   
   
 /*  
  * Merge error information in "lr" with "parentr" error code and string.  
  */  
 static void  static void
 merge_error_info( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr )  merge_error_info( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr )
 {  {
   /*
    * Merge error information in "lr" with "parentr" error code and string.
    */
         if ( lr->lr_res_errno == LDAP_PARTIAL_RESULTS ) {          if ( lr->lr_res_errno == LDAP_PARTIAL_RESULTS ) {
                 parentr->lr_res_errno = lr->lr_res_errno;                  parentr->lr_res_errno = lr->lr_res_errno;
                 if ( lr->lr_res_error != NULL ) {                  if ( lr->lr_res_error != NULL ) {
                         (void)ldap_append_referral( ld, &parentr->lr_res_error,                          (void)ldap_append_referral( ld, &parentr->lr_res_error,
                                 lr->lr_res_error );                              lr->lr_res_error );
                 }                  }
   
         } else if ( lr->lr_res_errno != LDAP_SUCCESS &&          } else if ( lr->lr_res_errno != LDAP_SUCCESS &&
                 parentr->lr_res_errno == LDAP_SUCCESS )                  parentr->lr_res_errno == LDAP_SUCCESS )
         {          {
Line 1214  merge_error_info( LDAP *ld, LDAPRequest Line 1067  merge_error_info( LDAP *ld, LDAPRequest
         }          }
   
         Debug( LDAP_DEBUG_TRACE, "merged parent (id %d) error info:  ",          Debug( LDAP_DEBUG_TRACE, "merged parent (id %d) error info:  ",
                 parentr->lr_msgid, 0, 0 );              parentr->lr_msgid, 0, 0 );
         Debug( LDAP_DEBUG_TRACE, "result errno %d, error <%s>, matched <%s>\n",          Debug( LDAP_DEBUG_TRACE, "result errno %d, error <%s>, matched <%s>\n",
                 parentr->lr_res_errno,              parentr->lr_res_errno, parentr->lr_res_error ?
                 parentr->lr_res_error ?  parentr->lr_res_error : "",              parentr->lr_res_error : "", parentr->lr_res_matched ?
                 parentr->lr_res_matched ?  parentr->lr_res_matched : "" );              parentr->lr_res_matched : "" );
 }  }
   
   
Line 1240  ldap_msgid( LDAPMessage *lm ) Line 1093  ldap_msgid( LDAPMessage *lm )
 }  }
   
   
 const char *  char * ldap_int_msgtype2str( ber_tag_t tag )
 ldap_int_msgtype2str( ber_tag_t tag )  
 {  {
         switch( tag ) {          switch( tag ) {
         case LDAP_RES_ADD: return "add";          case LDAP_RES_ADD: return "add";
Line 1274  ldap_msgfree( LDAPMessage *lm ) Line 1126  ldap_msgfree( LDAPMessage *lm )
                 LDAP_FREE( (char *) lm );                  LDAP_FREE( (char *) lm );
         }          }
   
         return type;          return( type );
 }  }
   
 /*  /*
Line 1286  int Line 1138  int
 ldap_msgdelete( LDAP *ld, int msgid )  ldap_msgdelete( LDAP *ld, int msgid )
 {  {
         LDAPMessage     *lm, *prev;          LDAPMessage     *lm, *prev;
         int             rc = 0;          int rc = 0;
   
         assert( ld != NULL );          assert( ld != NULL );
   
         Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete ld=%p msgid=%d\n",          Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete\n", 0, 0, 0 );
                 (void *)ld, msgid, 0 );  
   
         LDAP_MUTEX_LOCK( &ld->ld_res_mutex );  
         prev = NULL;          prev = NULL;
   #ifdef LDAP_R_COMPILE
           ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );
   #endif
         for ( lm = ld->ld_responses; lm != NULL; lm = lm->lm_next ) {          for ( lm = ld->ld_responses; lm != NULL; lm = lm->lm_next ) {
                 if ( lm->lm_msgid == msgid ) {                  if ( lm->lm_msgid == msgid )
                         break;                          break;
                 }  
                 prev = lm;                  prev = lm;
         }          }
   
         if ( lm == NULL ) {          if ( lm == NULL ) {
                 rc = -1;                  rc = -1;
   
         } else {          } else {
                 if ( prev == NULL ) {                  if ( prev == NULL )
                         ld->ld_responses = lm->lm_next;                          ld->ld_responses = lm->lm_next;
                 } else {                  else
                         prev->lm_next = lm->lm_next;                          prev->lm_next = lm->lm_next;
                 }  
         }  
         LDAP_MUTEX_UNLOCK( &ld->ld_res_mutex );  
         if ( lm ) {  
                 switch ( ldap_msgfree( lm ) ) {  
                 case LDAP_RES_SEARCH_ENTRY:  
                 case LDAP_RES_SEARCH_REFERENCE:  
                 case LDAP_RES_INTERMEDIATE:  
                         rc = -1;  
                         break;  
   
                 default:  
                         break;  
                 }  
         }          }
   #ifdef LDAP_R_COMPILE
           ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );
   #endif
           if ( lm && ldap_msgfree( lm ) == LDAP_RES_SEARCH_ENTRY )
                   rc = -1;
   
         return rc;          return( rc );
 }  }
   
   
 /*  /*
  * ldap_abandoned   * ldap_abandoned
  *   *
  * return the location of the message id in the array of abandoned   * return 1 if message msgid is waiting to be abandoned, 0 otherwise
  * message ids, or -1   *
    * expects ld_res_mutex to be locked
  */   */
 static int  static int
 ldap_abandoned( LDAP *ld, ber_int_t msgid )  ldap_abandoned( LDAP *ld, ber_int_t msgid )
 {  {
         int     ret, idx;          int     i;
         assert( msgid >= 0 );  
   
         LDAP_MUTEX_LOCK( &ld->ld_abandon_mutex );  #ifdef LDAP_R_COMPILE
         ret = ldap_int_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, &idx );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
         LDAP_MUTEX_UNLOCK( &ld->ld_abandon_mutex );  #endif
         return ret;  
           if ( ld->ld_abandoned == NULL )
                   return( 0 );
   
           for ( i = 0; ld->ld_abandoned[i] != -1; i++ )
                   if ( ld->ld_abandoned[i] == msgid )
                           return( 1 );
   
           return( 0 );
 }  }
   
   
 /*  /*
  * ldap_mark_abandoned   * ldap_mark_abandoned
    *
    * expects ld_res_mutex to be locked
  */   */
 static int  static int
 ldap_mark_abandoned( LDAP *ld, ber_int_t msgid )  ldap_mark_abandoned( LDAP *ld, ber_int_t msgid )
 {  {
         int     ret, idx;          int     i;
   
   #ifdef LDAP_R_COMPILE
           LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
   #endif
   
           if ( ld->ld_abandoned == NULL )
                   return( -1 );
   
           for ( i = 0; ld->ld_abandoned[i] != -1; i++ )
                   if ( ld->ld_abandoned[i] == msgid )
                           break;
   
           if ( ld->ld_abandoned[i] == -1 )
                   return( -1 );
   
           for ( ; ld->ld_abandoned[i] != -1; i++ ) {
                   ld->ld_abandoned[i] = ld->ld_abandoned[i + 1];
           }
   
         assert( msgid >= 0 );          return( 0 );
         LDAP_MUTEX_LOCK( &ld->ld_abandon_mutex );  
         ret = ldap_int_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, &idx );  
         if (ret <= 0) {         /* error or already deleted by another thread */  
                 LDAP_MUTEX_UNLOCK( &ld->ld_abandon_mutex );  
                 return ret;  
         }  
         /* still in abandoned array, so delete */  
         ret = ldap_int_bisect_delete( &ld->ld_abandoned, &ld->ld_nabandoned,  
                 msgid, idx );  
         LDAP_MUTEX_UNLOCK( &ld->ld_abandon_mutex );  
         return ret;  
 }  }

Removed from v.1.124.2.29  
changed lines
  Added in v.1.125


______________
© Copyright 1998-2020, OpenLDAP Foundation, info@OpenLDAP.org