Diff for /libraries/libldap/result.c between versions 1.99.2.17 and 1.138

version 1.99.2.17, 2006/08/18 15:14:38 version 1.138, 2006/11/12 13:22:25
Line 1 Line 1
 /* result.c - wait for an ldap result */  /* result.c - wait for an ldap result */
 /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.99.2.16 2006/08/17 02:43:58 kurt Exp $ */  /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.137 2006/10/28 14:19:08 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-2006 The OpenLDAP Foundation.   * Copyright 1998-2006 The OpenLDAP Foundation.
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 (RFC2251)   * LDAPv3 (RFC 4511)
  *      LDAPResult ::= SEQUENCE {   *      LDAPResult ::= SEQUENCE {
  *              resultCode              ENUMERATED { ... },   *              resultCode                      ENUMERATED { ... },
  *              matchedDN               LDAPDN,   *              matchedDN                       LDAPDN,
  *              errorMessage    LDAPString,   *              diagnosticMessage       LDAPString,
  *              referral                Referral OPTIONAL   *              referral                        [3] 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)
Line 68 Line 65
 #include "ldap-int.h"  #include "ldap-int.h"
 #include "ldap_log.h"  #include "ldap_log.h"
   
 static int ldap_abandoned LDAP_P(( LDAP *ld, ber_int_t msgid ));  static int ldap_abandoned_idx LDAP_P(( LDAP *ld, ber_int_t msgid ));
   #define ldap_abandoned(ld, msgid)       ( ldap_abandoned_idx((ld), (msgid)) > -1 )
 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 ));
Line 107  ldap_result( Line 105  ldap_result(
         struct timeval *timeout,          struct timeval *timeout,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         LDAPMessage     *lm;          LDAPMessage     *lm = NULL;
         int     rc;          int             rc;
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( result != NULL );          assert( result != NULL );
Line 118  ldap_result( Line 116  ldap_result(
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );
 #endif  #endif
         lm = chkResponseList(ld, msgid, all);  
   #if 0
           /* this is already done inside wait4msg(), right?... */
           lm = chkResponseList( ld, msgid, all );
   #endif
   
         if ( lm == NULL ) {          if ( lm == NULL ) {
                 rc = wait4msg( ld, msgid, all, timeout, result );                  rc = wait4msg( ld, msgid, all, timeout, result );
   
         } else {          } else {
                 *result = lm;                  *result = lm;
                 ld->ld_errno = LDAP_SUCCESS;                  ld->ld_errno = LDAP_SUCCESS;
                 rc = lm->lm_msgtype;                  rc = lm->lm_msgtype;
         }          }
   
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );
 #endif  #endif
         return( rc );  
           return rc;
 }  }
   
 static LDAPMessage *  static LDAPMessage *
Line 140  chkResponseList( Line 145  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
          * this association and see if the response we're interested in           * this association and see if the response we're interested in
          * is there.  If it is, return it.  If not, call wait4msg() to           * is there.  If it is, return it.  If not, call wait4msg() to
          * wait until it arrives or timeout occurs.           * wait until it arrives or timeout occurs.
          */           */
   
   #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",
                 (void *)ld, msgid, all );                  (void *)ld, msgid, all );
   
         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_TRACE,                          Debug( LDAP_DEBUG_TRACE,
                                 "ldap_chkResponseList msg abandoned, msgid %d\n",                                  "ldap_chkResponseList msg abandoned, msgid %d\n",
                             msgid, 0, 0 );                                  msgid, 0, 0 );
                         ldap_mark_abandoned( ld, lm->lm_msgid );                          ldap_mark_abandoned( ld, lm->lm_msgid );
   
                         /* Remove this entry from list */                          /* Remove this entry from list */
Line 172  chkResponseList( Line 185  chkResponseList(
                         LDAPMessage     *tmp;                          LDAPMessage     *tmp;
   
                         if ( all == LDAP_MSG_ONE || all == LDAP_MSG_RECEIVED ||                          if ( all == LDAP_MSG_ONE || 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 192  chkResponseList( Line 207  chkResponseList(
                 lastlm = &lm->lm_next;                  lastlm = &lm->lm_next;
         }          }
   
     if ( lm != NULL ) {  #if 0
           {
                   char    buf[ BUFSIZ ];
   
                   snprintf( buf, sizeof( buf ), "ld=%p msgid=%d%s cnt=%d",
                           ld, msgid, all ? " all" : "", cnt );
                   Debug( LDAP_DEBUG_TRACE, "+++ chkResponseList %s\n", buf, 0, 0 );
           }
   #endif
   
           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%02lu\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;
Line 238  wait4msg( Line 263  wait4msg(
         assert( ld != NULL );          assert( ld != NULL );
         assert( result != NULL );          assert( result != NULL );
   
   #ifdef LDAP_R_COMPILE
           LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
   #endif
   
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
         if ( timeout == NULL ) {          if ( timeout == NULL ) {
                 Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p msgid %d (infinite timeout)\n",                  Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p msgid %d (infinite timeout)\n",
Line 263  wait4msg( Line 292  wait4msg(
                 if ( ldap_debug & LDAP_DEBUG_TRACE ) {                  if ( ldap_debug & LDAP_DEBUG_TRACE ) {
                         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 );
   #ifdef LDAP_R_COMPILE
                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                         ldap_dump_connection( ld, ld->ld_conns, 1 );                          ldap_dump_connection( ld, ld->ld_conns, 1 );
   #ifdef LDAP_R_COMPILE
                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
                           ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
   #endif
                         ldap_dump_requests_and_responses( ld );                          ldap_dump_requests_and_responses( ld );
   #ifdef LDAP_R_COMPILE
                           ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                 }                  }
 #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 {
Line 279  wait4msg( Line 318  wait4msg(
 #endif  #endif
                         for ( lc = ld->ld_conns; lc != NULL; lc = lc->lconn_next ) {                          for ( lc = ld->ld_conns; lc != NULL; lc = 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  #ifdef LDAP_R_COMPILE
                                         ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );                                          ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
 #endif  #endif
Line 301  wait4msg( Line 341  wait4msg(
                                 if ( rc == -1 ) {                                  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",
                                                 errno, 0, 0 );                                                  sock_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)
                                                 || errno != EINTR )))                                                  || sock_errno() != EINTR ) ) )
                                 {                                  {
                                         ld->ld_errno = (rc == -1 ? LDAP_SERVER_DOWN :                                          ld->ld_errno = (rc == -1 ? LDAP_SERVER_DOWN :
                                                 LDAP_TIMEOUT);                                                  LDAP_TIMEOUT);
Line 316  wait4msg( Line 356  wait4msg(
   
                                 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 {
                                         rc = LDAP_MSG_X_KEEP_LOOKING;                                          rc = LDAP_MSG_X_KEEP_LOOKING;
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
Line 336  wait4msg( Line 377  wait4msg(
                                                 rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL; )                                                  rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL; )
                                         {                                          {
                                                 if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&                                                  if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&
                                                         ldap_is_read_ready( ld, lc->lconn_sb ))                                                          ldap_is_read_ready( ld, lc->lconn_sb ) )
                                                 {                                                  {
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
                                                         ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );                                                          ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
Line 427  try_read1msg( Line 468  try_read1msg(
         assert( lcp != NULL );          assert( lcp != NULL );
         assert( *lcp != NULL );          assert( *lcp != NULL );
                   
   #ifdef LDAP_R_COMPILE
           LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_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 );
   
Line 434  try_read1msg( Line 479  try_read1msg(
   
 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 445  retry: Line 490  retry:
         assert( LBER_VALID (ber) );          assert( LBER_VALID (ber) );
   
         /* get the next message */          /* get the next message */
         errno = 0;          sock_errset(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 );
         if ( tag == LDAP_TAG_MESSAGE ) {          switch ( tag ) {
           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 ) {  
                 if ( tag == LBER_DEFAULT) {          case LBER_DEFAULT:
 #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             
 #ifdef EWOULDBLOCK                        #ifdef EWOULDBLOCK                      
                         if (errno==EWOULDBLOCK) return LDAP_MSG_X_KEEP_LOOKING;                  if ( sock_errno() == EWOULDBLOCK ) return LDAP_MSG_X_KEEP_LOOKING;
 #endif  #endif
 #ifdef EAGAIN  #ifdef EAGAIN
                         if (errno == EAGAIN) return LDAP_MSG_X_KEEP_LOOKING;                  if ( sock_errno() == EAGAIN ) return LDAP_MSG_X_KEEP_LOOKING;
 #endif  #endif
                         ld->ld_errno = LDAP_SERVER_DOWN;                  ld->ld_errno = LDAP_SERVER_DOWN;
                         return -1;                  return -1;
                 }  
           default:
                 ld->ld_errno = LDAP_LOCAL_ERROR;                  ld->ld_errno = LDAP_LOCAL_ERROR;
                 return -1;                  return -1;
         }          }
Line 490  nextresp3: Line 537  nextresp3:
   
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( ldap_abandoned( ld, id ) ) {          if ( ldap_abandoned( ld, id ) ) {
                 Debug( LDAP_DEBUG_ANY, "abandoned ld %p msgid %ld\n",                  Debug( LDAP_DEBUG_ANY, "abandoned/discarded ld %p msgid %ld\n",
                         (void *)ld, (long) id, 0);                          (void *)ld, (long) id, 0);
 retry_ber:  retry_ber:
                 ber_free( ber, 1 );                  ber_free( ber, 1 );
Line 504  retry_ber: Line 551  retry_ber:
         if ( lr == NULL ) {          if ( lr == NULL ) {
                 Debug( LDAP_DEBUG_ANY,                  Debug( LDAP_DEBUG_ANY,
                         "no request for response on ld %p msgid %ld (tossing)\n",                          "no request for response on ld %p msgid %ld (tossing)\n",
                         (void *)ld, (long) id, 0 );                          (void *)ld, (long)id, 0 );
                 goto retry_ber;                  goto retry_ber;
         }          }
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
Line 550  nextresp2: Line 597  nextresp2:
                                 /* 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,
Line 557  nextresp2: Line 605  nextresp2:
                                         if ( refer_cnt > 0 ) {                                          if ( refer_cnt > 0 ) {
                                                 /* sucessfully 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, "
Line 571  nextresp2: Line 619  nextresp2:
                                         }                                          }
                                 }                                  }
                         }                          }
   
                 } else {                  } else {
                         /* Check for V3 referral */                          /* Check for V3 referral */
                         ber_len_t       len;                          ber_len_t       len;
                         char            *lr_res_error = NULL;                          char            *lr_res_error = NULL;
   
 #ifdef LDAP_NULL_IS_NULL  
                         if ( ber_scanf( &tmpber, "{eAA",/*}*/ &lderr,                          if ( ber_scanf( &tmpber, "{eAA",/*}*/ &lderr,
                                     &lr->lr_res_matched, &lr_res_error )                                      &lr->lr_res_matched, &lr_res_error )
                                     != LBER_ERROR )                                      != LBER_ERROR )
 #else /* ! LDAP_NULL_IS_NULL */  
                         if ( ber_scanf( &tmpber, "{eaa",/*}*/ &lderr,  
                                     &lr->lr_res_matched, &lr_res_error )  
                                     != LBER_ERROR )  
 #endif /* ! LDAP_NULL_IS_NULL */  
                         {                          {
                                 if ( lr_res_error != NULL ) {                                  if ( lr_res_error != NULL ) {
 #ifndef LDAP_NULL_IS_NULL                                          if ( lr->lr_res_error != NULL ) {
                                         if ( lr_res_error[ 0 ] == '\0' ) {                                                  (void)ldap_append_referral( ld, &lr->lr_res_error, lr_res_error );
                                                 LDAP_FREE( lr_res_error );                                                  LDAP_FREE( (char *)lr_res_error );
                                                 lr_res_error = NULL;  
                                         } else  
 #endif /* ! LDAP_NULL_IS_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;
                                 }                                  }
Line 622  nextresp2: Line 657  nextresp2:
                                                         Debug( LDAP_DEBUG_TRACE,                                                          Debug( LDAP_DEBUG_TRACE,
                                                                 "read1msg: referral decode error, mark request completed, ld %p msgid %d\n",                                                                  "read1msg: referral decode error, 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 
                                                          * Note: refs arrary 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 chased, mark request completed, ld %p msgid %d\n",                                                                  "read1msg: referral chased, mark request completed, ld %p msgid %d\n",
Line 644  nextresp2: Line 680  nextresp2:
                                         LDAP_FREE( lr->lr_res_matched );                                          LDAP_FREE( lr->lr_res_matched );
                                         lr->lr_res_matched = NULL;                                          lr->lr_res_matched = NULL;
                                 }                                  }
   
                                 if( lr->lr_res_error != NULL ) {                                  if( lr->lr_res_error != NULL ) {
                                         LDAP_FREE( lr->lr_res_error );                                          LDAP_FREE( lr->lr_res_error );
                                         lr->lr_res_error = NULL;                                          lr->lr_res_error = NULL;
Line 675  nextresp2: Line 712  nextresp2:
                                  */                                   */
                                 if ( tag == LDAP_RES_SEARCH_RESULT )                                  if ( tag == LDAP_RES_SEARCH_RESULT )
                                         refer_cnt = 0;                                          refer_cnt = 0;
 #ifdef LDAP_NULL_IS_NULL  
                         } else if ( ber_scanf( &tmpber, "{eAA}", &lderr,                          } else if ( ber_scanf( &tmpber, "{eAA}", &lderr,
                                 &lr->lr_res_matched, &lr_res_error )                                  &lr->lr_res_matched, &lr_res_error )
                                 != LBER_ERROR )                                  != LBER_ERROR )
 #else /* ! LDAP_NULL_IS_NULL */  
                         } else if ( ber_scanf( &tmpber, "{eaa}", &lderr,  
                                 &lr->lr_res_matched, &lr_res_error )  
                                 != LBER_ERROR )  
 #endif /* ! LDAP_NULL_IS_NULL */  
                         {                          {
                                 if ( lr_res_error != NULL ) {                                  if ( lr_res_error != NULL ) {
 #ifndef LDAP_NULL_IS_NULL                                          if ( lr->lr_res_error != NULL ) {
                                         if ( lr_res_error[ 0 ] == '\0' ) {                                                  (void)ldap_append_referral( ld, &lr->lr_res_error, lr_res_error );
                                                 LDAP_FREE( lr_res_error );                                                  LDAP_FREE( (char *)lr_res_error );
                                         } else                                          } else {
 #endif /* ! LDAP_NULL_IS_NULL */                                                  lr->lr_res_error = lr_res_error;
                                         {  
                                                 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;                                          lr_res_error = NULL;
                                 }                                  }
Line 731  nextresp2: Line 756  nextresp2:
                                         lr->lr_res_errno = ( lderr ==                                          lr->lr_res_errno = ( lderr ==
                                         LDAP_PARTIAL_RESULTS ) ? LDAP_SUCCESS                                          LDAP_PARTIAL_RESULTS ) ? LDAP_SUCCESS
                                         : lderr;                                          : lderr;
   
                                 } else if ( ld->ld_errno != LDAP_SUCCESS ) {                                  } else if ( ld->ld_errno != LDAP_SUCCESS ) {
                                         lr->lr_res_errno = ld->ld_errno;                                          lr->lr_res_errno = ld->ld_errno;
   
                                 } else {                                  } else {
                                         lr->lr_res_errno = LDAP_PARTIAL_RESULTS;                                          lr->lr_res_errno = LDAP_PARTIAL_RESULTS;
                                 }                                  }
Line 760  nextresp2: Line 787  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 */
   
                 } 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 788  nextresp2: Line 818  nextresp2:
   
                         /* 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;
                                 }                                  }
                         }                          }
   
Line 813  lr->lr_res_matched ? lr->lr_res_matched Line 843  lr->lr_res_matched ? lr->lr_res_matched
                                         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 */
                                         }                                          }
                                 }                                  }
   
 #ifdef LDAP_R_COMPILE                                  ldap_return_request( ld, lr, 1 );
                                 ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );                                  lr = NULL;
 #endif  
                                 ldap_free_request( ld, lr );  
 #ifdef LDAP_R_COMPILE  
                                 ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );  
 #endif  
                         }                          }
   
                         if ( lc != NULL ) {                          if ( lc != NULL ) {
Line 840  lr->lr_res_matched ? lr->lr_res_matched Line 866  lr->lr_res_matched ? lr->lr_res_matched
                 }                  }
         }          }
   
           if ( lr != NULL ) {
                   ldap_return_request( ld, lr, 0 );
                   lr = NULL;
           }
   
         if ( ber == NULL ) {          if ( ber == NULL ) {
                 return( rc );                  return( rc );
         }          }
Line 1056  build_result_ber( LDAP *ld, BerElement * Line 1087  build_result_ber( LDAP *ld, BerElement *
 }  }
   
   
 static void  
 merge_error_info( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr )  
 {  
 /*  /*
  * Merge error information in "lr" with "parentr" error code and string.   * Merge error information in "lr" with "parentr" error code and string.
  */   */
   static void
   merge_error_info( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr )
   {
         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 1087  merge_error_info( LDAP *ld, LDAPRequest Line 1119  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_error ?                  parentr->lr_res_errno,
             parentr->lr_res_error : "", parentr->lr_res_matched ?                  parentr->lr_res_error ?  parentr->lr_res_error : "",
             parentr->lr_res_matched : "" );                  parentr->lr_res_matched ?  parentr->lr_res_matched : "" );
 }  }
   
   
Line 1146  ldap_msgfree( LDAPMessage *lm ) Line 1178  ldap_msgfree( LDAPMessage *lm )
                 LDAP_FREE( (char *) lm );                  LDAP_FREE( (char *) lm );
         }          }
   
         return( type );          return type;
 }  }
   
 /*  /*
Line 1162  ldap_msgdelete( LDAP *ld, int msgid ) Line 1194  ldap_msgdelete( LDAP *ld, int msgid )
   
         assert( ld != NULL );          assert( ld != NULL );
   
         Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete\n", 0, 0, 0 );          Debug( LDAP_DEBUG_TRACE, "ldap_msgdelete ld=%p msgid=%d\n",
                   (void *)ld, msgid, 0 );
   
         prev = NULL;  
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );
 #endif  #endif
           prev = NULL;
         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;
                   }
         }          }
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );
 #endif  #endif
         if ( lm && ldap_msgfree( lm ) == LDAP_RES_SEARCH_ENTRY )          if ( lm && ldap_msgfree( lm ) == LDAP_RES_SEARCH_ENTRY ) {
                 rc = -1;                  rc = -1;
           }
   
         return( rc );          return rc;
 }  }
   
   
 /*  /*
  * return 1 if message msgid is waiting to be abandoned, 0 otherwise   * ldap_abandoned_idx
    *
    * return the location of the message id in the array of abandoned
    * 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_idx( LDAP *ld, ber_int_t msgid )
 {  {
         int     i;          int     begin,
                   end;
   
         if ( ld->ld_abandoned == NULL )  #ifdef LDAP_R_COMPILE
                 return( 0 );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
   #endif
   
         for ( i = 0; ld->ld_abandoned[i] != -1; i++ )          assert( ld->ld_nabandoned >= 0 );
                 if ( ld->ld_abandoned[i] == msgid )  
                         return( 1 );  
   
         return( 0 );          if ( ld->ld_abandoned == NULL || ld->ld_nabandoned == 0 ) {
 }                  return -1;
           }
   
           begin = 0;
           end = ld->ld_nabandoned - 1;
   
           /* use bisection */
           if ( msgid < ld->ld_abandoned[ begin ] ) {
                   return -1;
           }
   
           if ( msgid > ld->ld_abandoned[ end ] ) {
                   return -1;
           }
   
           while ( end >= begin ) {
                   int     pos = (begin + end)/2;
                   int     curid = ld->ld_abandoned[ pos ];
   
                   if ( msgid < curid ) {
                           end = pos - 1;
   
                   } else if ( msgid > curid ) {
                           begin = pos + 1;
   
                   } else {
                           return pos;
                   }
           }
   
           /* not abandoned */
           return -1;
   }
   
   /*
    * 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     i;          int     i, idx;
   
         if ( ld->ld_abandoned == NULL )  #ifdef LDAP_R_COMPILE
                 return( -1 );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
   #endif
         for ( i = 0; ld->ld_abandoned[i] != -1; i++ )  
                 if ( ld->ld_abandoned[i] == msgid )  
                         break;  
   
         if ( ld->ld_abandoned[i] == -1 )          idx = ldap_abandoned_idx( ld, msgid );
                 return( -1 );          if ( idx == -1 ) {
                   return -1;
           }
   
         for ( ; ld->ld_abandoned[i] != -1; i++ ) {          --ld->ld_nabandoned;
                 ld->ld_abandoned[i] = ld->ld_abandoned[i + 1];          assert( ld->ld_nabandoned >= 0 );
           for ( i = idx; i < ld->ld_nabandoned; i++ ) {
                   ld->ld_abandoned[ i ] = ld->ld_abandoned[ i + 1 ];
         }          }
   
         return( 0 );          return 0;
 }  }

Removed from v.1.99.2.17  
changed lines
  Added in v.1.138


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