Diff for /libraries/libldap/result.c between versions 1.142 and 1.159

version 1.142, 2006/12/14 05:58:57 version 1.159, 2008/01/07 23:20:04
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.141 2006/12/12 23:36:12 hyc Exp $ */  /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.158 2007/12/20 01:46:59 hyc 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-2008 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 43 Line 43
  *      LDAPResult ::= SEQUENCE {   *      LDAPResult ::= SEQUENCE {
  *              resultCode                      ENUMERATED { ... },   *              resultCode                      ENUMERATED { ... },
  *              matchedDN                       LDAPDN,   *              matchedDN                       LDAPDN,
  *              diagnosticMessage       LDAPString,   *              diagnosticMessage               LDAPString,
  *              referral                        [3] 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)
  */   */
   
 #include "portable.h"  #include "portable.h"
Line 92  static LDAPMessage * chkResponseList LDA Line 92  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 are discarded.   * When waiting, any messages that have been abandoned/discarded are 
    * discarded.
  *   *
  * Example:   * Example:
  *      ldap_result( s, msgid, all, timeout, result )   *      ldap_result( s, msgid, all, timeout, result )
Line 243  chkResponseList( Line 244  chkResponseList(
                         "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%02lx\n",
                         (void *)ld, lm->lm_msgid, (unsigned long)lm->lm_msgtype );                          (void *)ld, lm->lm_msgid, (unsigned long)lm->lm_msgtype );
         }          }
 #endif  #endif
Line 262  wait4msg( Line 263  wait4msg(
         int             rc;          int             rc;
         struct timeval  tv = { 0 },          struct timeval  tv = { 0 },
                         tv0 = { 0 },                          tv0 = { 0 },
                         *tvp;                          start_time_tv = { 0 },
         time_t          start_time = 0;                          *tvp = NULL;
         time_t          tmp_time;  
         LDAPConn        *lc;          LDAPConn        *lc;
   
         assert( ld != NULL );          assert( ld != NULL );
Line 274  wait4msg( Line 274  wait4msg(
         LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
 #endif  #endif
   
           if ( timeout == NULL && ld->ld_options.ldo_tm_api.tv_sec >= 0 ) {
                   tv = ld->ld_options.ldo_tm_api;
                   timeout = &tv;
           }
   
 #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 284  wait4msg( Line 289  wait4msg(
         }          }
 #endif /* LDAP_DEBUG */  #endif /* LDAP_DEBUG */
   
         if ( timeout == NULL ) {          if ( timeout != NULL ) {
                 tvp = NULL;  
         } else {  
                 tv0 = *timeout;                  tv0 = *timeout;
                 tv = *timeout;                  tv = *timeout;
                 tvp = &tv;                  tvp = &tv;
                 start_time = time( NULL );  #ifdef HAVE_GETTIMEOFDAY
                   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 314  wait4msg( Line 322  wait4msg(
                 }                  }
 #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 342  wait4msg( Line 350  wait4msg(
                         ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );                          ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
 #endif  #endif
   
                         if ( !lc_ready ) {                          if ( !lc_ready ) {
                                 rc = ldap_int_select( ld, tvp );                                  rc = ldap_int_select( ld, tvp );
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
                                 if ( rc == -1 ) {                                  if ( rc == -1 ) {
Line 417  wait4msg( Line 425  wait4msg(
                 }                  }
   
                 if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {                  if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {
                         tmp_time = time( NULL );                          struct timeval  curr_time_tv = { 0 },
                         tv0.tv_sec -= ( tmp_time - start_time );                                          delta_time_tv = { 0 };
                         if ( tv0.tv_sec <= 0 ) {  
                                 rc = 0; /* timed out */  #ifdef HAVE_GETTIMEOFDAY
                           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 secs to go\n",                          Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p %ld s %ld us to go\n",
                                 (void *)ld, (long) tv.tv_sec, 0 );                                  (void *)ld, (long) tv.tv_sec, (long) tv.tv_usec );
                         start_time = tmp_time;  
                           start_time_tv.tv_sec = curr_time_tv.tv_sec;
                           start_time_tv.tv_usec = curr_time_tv.tv_usec;
                 }                  }
         }          }
   
Line 451  try_read1msg( Line 490  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;          LDAPRequest     *lr, *tmplr, dummy_lr = { 0 };
         LDAPConn        *lc;          LDAPConn        *lc;
         BerElement      tmpber;          BerElement      tmpber;
         int             rc, refer_cnt, hadref, simple_request;          int             rc, refer_cnt, hadref, simple_request;
Line 462  try_read1msg( Line 501  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( lcp != NULL );          assert( lcp != NULL );
         assert( *lcp != NULL );          assert( *lcp != NULL );
Line 529  nextresp3: Line 558  nextresp3:
                 if ( sock_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;
   #ifdef LDAP_R_COMPILE
                   ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
   #endif
                   ldap_free_connection( ld, lc, 1, 0 );
   #ifdef LDAP_R_COMPILE
                   ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                   lc = *lcp = NULL;
                 return -1;                  return -1;
   
         default:          default:
Line 543  nextresp3: Line 580  nextresp3:
                 return( -1 );                  return( -1 );
         }          }
   
           /* id == 0 iff unsolicited notification message (RFC 4511) */
   
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( ldap_abandoned( ld, id, &idx ) ) {          if ( id > 0 ) {
                 /* the message type */                  if ( ldap_abandoned( ld, id, &idx ) ) {
                 tag = ber_peek_tag( ber, &len );                          /* the message type */
                 switch ( tag ) {                          tag = ber_peek_tag( ber, &len );
                 case LDAP_RES_SEARCH_ENTRY:                          switch ( tag ) {
                 case LDAP_RES_SEARCH_REFERENCE:                          case LDAP_RES_SEARCH_ENTRY:
                 case LDAP_RES_INTERMEDIATE:                          case LDAP_RES_SEARCH_REFERENCE:
                 case LBER_ERROR:                          case LDAP_RES_INTERMEDIATE:
                         break;                          case LBER_ERROR:
                                   break;
   
                 default:                          default:
                         /* there's no need to keep the id                                  /* there's no need to keep the id
                          * in the abandoned list any longer */                                   * in the abandoned list any longer */
                         ldap_mark_abandoned( ld, id, idx );                                  ldap_mark_abandoned( ld, id, idx );
                         break;                                  break;
                 }                          }
   
                 Debug( LDAP_DEBUG_ANY,                          Debug( LDAP_DEBUG_ANY,
                         "abandoned/discarded ld %p msgid %ld message type %s\n",                                  "abandoned/discarded ld %p msgid %ld message type %s\n",
                         (void *)ld, (long)id, ldap_int_msgtype2str( tag ) );                                  (void *)ld, (long)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 */
                 }                  }
                 return( LDAP_MSG_X_KEEP_LOOKING );      /* continue looking */  
         }  
   
         lr = ldap_find_request_by_msgid( ld, id );                  lr = ldap_find_request_by_msgid( ld, id );
         if ( lr == NULL ) {                  if ( lr == NULL ) {
                 const char      *msg = "unknown";                          const char      *msg = "unknown";
   
                 /* the message type */                          /* the message type */
                 tag = ber_peek_tag( ber, &len );                          tag = ber_peek_tag( ber, &len );
                 switch ( tag ) {                          switch ( tag ) {
                 case LBER_ERROR:                          case LBER_ERROR:
                         break;                                  break;
   
                 default:                          default:
                         msg = ldap_int_msgtype2str( tag );                                  msg = ldap_int_msgtype2str( tag );
                         break;                                  break;
                 }                          }
   
                 Debug( LDAP_DEBUG_ANY,                          Debug( LDAP_DEBUG_ANY,
                         "no request for response on ld %p msgid %ld message type %s (tossing)\n",                                  "no request for response on ld %p msgid %ld message type %s (tossing)\n",
                         (void *)ld, (long)id, msg );                                  (void *)ld, (long)id, msg );
   
                           goto retry_ber;
                   }
   
                 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 );          tag = ber_peek_tag( ber, &len );
         if ( tag == LBER_ERROR ) {          if ( tag == LBER_ERROR ) {
Line 612  nextresp2: Line 655  nextresp2:
                 "read1msg: ld %p msgid %ld message type %s\n",                  "read1msg: ld %p msgid %ld message type %s\n",
                 (void *)ld, (long)lr->lr_msgid, 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;
         hadref = simple_request = 0;          hadref = simple_request = 0;
Line 619  nextresp2: Line 700  nextresp2:
         lr->lr_res_msgtype = tag;          lr->lr_res_msgtype = tag;
   
         /*          /*
          * This code figures out if we are going to chase a           * Check for V3 search reference
          * referral / search reference, or pass it back to the application  
          */           */
         v3ref = V3REF_NOREF;    /* Assume not a V3 search reference/referral */          if ( tag == LDAP_RES_SEARCH_REFERENCE ) {
         if ( tag != LDAP_RES_SEARCH_ENTRY && ld->ld_version > LDAP_VERSION2 ) {                  if ( 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 */
                         /* Assume we do not chase the reference,  
                          * but pass it to application */  
                         v3ref = V3REF_TOAPP;  
                         if ( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ||                          if ( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ||
                                         lr->lr_parent != NULL )                                          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;
Line 644  nextresp2: Line 720  nextresp2:
                                         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 ) {
                                                 /* sucessfully chased reference */                                                  /* successfully 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;
Line 654  nextresp2: Line 730  nextresp2:
                                                                 "id = %d\n",                                                                  "id = %d\n",
                                                                 lr->lr_msgid, 0, 0 );                                                                  lr->lr_msgid, 0, 0 );
                                                 }                                                  }
   
                                                 /* We successfully chased the reference */  
                                                 v3ref = V3REF_SUCCESS;  
                                         }                                          }
                                 }                                  }
                         }                          }
                   }
   
                 } else {          } else if ( tag != LDAP_RES_SEARCH_ENTRY && tag != LDAP_RES_INTERMEDIATE ) {
                         /* Check for V3 referral */                  /* All results that just return a status, i.e. don't return data
                         ber_len_t       len;                   * go through the following code.  This code also chases V2 referrals
                         char            *lr_res_error = NULL;                   * and checks if all referrals have been chased.
                    */
                         if ( ber_scanf( &tmpber, "{eAA",/*}*/ &lderr,                  char            *lr_res_error = NULL;
                                     &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 {                  tmpber = *ber;  /* struct copy */
                                                 lr->lr_res_error = lr_res_error;                  if ( ber_scanf( &tmpber, "{eAA", &lderr,
                                         }                                  &lr->lr_res_matched, &lr_res_error )
                                         lr_res_error = NULL;                                  != 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;
                           }
   
                           /* Do we need to check for referrals? */
                           if ( 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 ) {
                                         /* We have a V3 referral, assume we cannot chase it */                                          if ( ld->ld_version > LDAP_VERSION2 ) {
                                         v3ref = V3REF_TOAPP;  
                                         if ( LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS)  
                                                          || lr->lr_parent != NULL )  
                                         {  
                                                 /* 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;
Line 699  nextresp2: Line 779  nextresp2:
   
                                                 } else {                                                  } else {
                                                         /* Chase the referral                                                           /* Chase the referral 
                                                          * Note: refs arrary is freed by ldap_chase_v3referrals                                                           * refs array 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 );
Line 707  nextresp2: Line 787  nextresp2:
                                                         Debug( LDAP_DEBUG_TRACE,                                                          Debug( LDAP_DEBUG_TRACE,
                                                                 "read1msg: referral %s chased, "                                                                  "read1msg: referral %s chased, "
                                                                 "mark request completed, ld %p msgid %d\n",                                                                  "mark request completed, ld %p msgid %d\n",
                                                                 hadref ? "" : "not",                                                                  refer_cnt > 0 ? "" : "not",
                                                                 (void *)ld, lr->lr_msgid);                                                                  (void *)ld, lr->lr_msgid);
                                                         if ( refer_cnt > 0 ) {                                                          if ( refer_cnt < 0 ) {
                                                                 /* Referral successfully chased */  
                                                                 v3ref = V3REF_SUCCESS;  
                                                         } else {  
                                                                 refer_cnt = 0;                                                                  refer_cnt = 0;
                                                         }                                                          }
                                                 }                                                  }
                                         }                                          }
                                 }                                  } else {
                                           switch ( lderr ) {
                                 if ( lr->lr_res_matched != NULL ) {                                          case LDAP_SUCCESS:
                                         LDAP_FREE( lr->lr_res_matched );                                          case LDAP_COMPARE_TRUE:
                                         lr->lr_res_matched = NULL;                                          case LDAP_COMPARE_FALSE:
                                 }                                                  break;
   
                                 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 &&  
                 tag != LDAP_RES_SEARCH_REFERENCE &&  
                 tag != LDAP_RES_INTERMEDIATE )  
         {  
                 /* For a v3 search referral/reference, only come here if already chased it */  
                 if ( ld->ld_version >= LDAP_VERSION2 &&  
                         v3ref != V3REF_TOAPP &&  
                         ( lr->lr_parent != NULL ||  
                         LDAP_BOOL_GET(&ld->ld_options, LDAP_BOOL_REFERRALS) ) )  
                 {  
                         char            *lr_res_error = NULL;  
   
                         tmpber = *ber;  /* struct copy */  
                         if ( v3ref == V3REF_SUCCESS ) {  
                                 /* V3 search reference or V3 referral  
                                  * sucessfully chased. If this message  
                                  * 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,                                          default:
                                 &lr->lr_res_matched, &lr_res_error )                                                  if ( lr->lr_res_error == NULL ) {
                                 != LBER_ERROR )                                                          break;
                         {                                                  }
                                 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 ) {                                                  /* pedantic, should never happen */
                                 case LDAP_SUCCESS:                                                  if ( lr->lr_res_error[ 0 ] == '\0' ) {
                                 case LDAP_COMPARE_TRUE:                                                          LDAP_FREE( lr->lr_res_error );
                                 case LDAP_COMPARE_FALSE:                                                          lr->lr_res_error = NULL;
                                         break;                                                          break;  
                                                   }
   
                                 default:                                                  /* V2 referrals are in error string */
                                         if ( lr->lr_res_error == NULL ||                                                  refer_cnt = ldap_chase_referrals( ld, lr,
                                                 lr->lr_res_error[ 0 ] == '\0' )                                                          &lr->lr_res_error, -1, &hadref );
                                         {                                                  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;
                                         }                                          }
   
                                         /* referrals are in error string */  
                                         refer_cnt = ldap_chase_referrals( ld, lr,  
                                                 &lr->lr_res_error, -1, &hadref );  
                                         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;  
                                 }                                  }
                           }
   
                                 /* save errno, message, and matched string */                          /* save errno, message, and matched string */
                                 if ( !hadref || lr->lr_res_error == NULL ) {                          if ( !hadref || lr->lr_res_error == NULL ) {
                                         lr->lr_res_errno =                                  lr->lr_res_errno =
                                                 lderr == LDAP_PARTIAL_RESULTS                                          lderr == LDAP_PARTIAL_RESULTS
                                                 ? LDAP_SUCCESS : lderr;                                          ? LDAP_SUCCESS : lderr;
   
                                 } else if ( ld->ld_errno != LDAP_SUCCESS ) {  
                                         lr->lr_res_errno = ld->ld_errno;  
   
                                 } else {                          } else if ( ld->ld_errno != LDAP_SUCCESS ) {
                                         lr->lr_res_errno = LDAP_PARTIAL_RESULTS;                                  lr->lr_res_errno = ld->ld_errno;
                                 }  
   
                                 Debug( LDAP_DEBUG_TRACE, "new result:  "                          } else {
                                         "res_errno: %d, "                                  lr->lr_res_errno = LDAP_PARTIAL_RESULTS;
                                         "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 879  nextresp2: Line 900  nextresp2:
                         {                          {
                                 id = lr->lr_msgid;                                  id = lr->lr_msgid;
                                 tag = lr->lr_res_msgtype;                                  tag = lr->lr_res_msgtype;
                                 Debug( LDAP_DEBUG_ANY, "request done: ld %p msgid %ld\n",                                  Debug( LDAP_DEBUG_TRACE, "request done: ld %p msgid %ld\n",
                                         (void *)ld, (long) 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>, "
Line 897  nextresp2: Line 918  nextresp2:
                                         }                                          }
                                 }                                  }
   
                                 ldap_return_request( ld, lr, 1 );                                  if ( lr != &dummy_lr ) {
                                           ldap_return_request( ld, lr, 1 );
                                   }
                                 lr = NULL;                                  lr = NULL;
                         }                          }
   
                         if ( lc != NULL ) {                          /*
                            * RF 4511 unsolicited (id == 0) responses
                            * shouldn't necessarily end the connection
                            */
                           if ( lc != NULL && id != 0 ) {
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
                                 ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );                                  ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
 #endif  #endif
Line 915  nextresp2: Line 942  nextresp2:
         }          }
   
         if ( lr != NULL ) {          if ( lr != NULL ) {
                 ldap_return_request( ld, lr, 0 );                  if ( lr != &dummy_lr ) {
                           ldap_return_request( ld, lr, 0 );
                   }
                 lr = NULL;                  lr = NULL;
         }          }
   
Line 923  nextresp2: Line 952  nextresp2:
                 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 ) {
   #ifdef LDAP_R_COMPILE
                                   ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
   #endif
                                   ldap_free_connection( ld, lc, 0, 1 );
   #ifdef LDAP_R_COMPILE
                                   ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                                   lc = *lcp = NULL;
                           }
   
                           /* need to return -1, because otherwise
                            * a valid result is expected */
                           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 1043  nextresp2: Line 1138  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 1069  nextresp2: Line 1165  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 1312  ldap_abandoned( LDAP *ld, ber_int_t msgi Line 1409  ldap_abandoned( LDAP *ld, ber_int_t msgi
         assert( msgid >= 0 );          assert( msgid >= 0 );
         assert( ld->ld_nabandoned >= 0 );          assert( ld->ld_nabandoned >= 0 );
   
         return lutil_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, idxp );          return ldap_int_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, idxp );
 }  }
   
 /*  /*
Line 1327  ldap_mark_abandoned( LDAP *ld, ber_int_t Line 1424  ldap_mark_abandoned( LDAP *ld, ber_int_t
         LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
 #endif  #endif
   
         /* NOTE: those assertions are repeated in lutil_bisect_delete() */          /* NOTE: those assertions are repeated in ldap_int_bisect_delete() */
         assert( idx >= 0 );          assert( idx >= 0 );
         assert( idx < ld->ld_nabandoned );          assert( idx < ld->ld_nabandoned );
         assert( ld->ld_abandoned[ idx ] == msgid );          assert( ld->ld_abandoned[ idx ] == msgid );
   
         return lutil_bisect_delete( &ld->ld_abandoned, &ld->ld_nabandoned,          return ldap_int_bisect_delete( &ld->ld_abandoned, &ld->ld_nabandoned,
                 msgid, idx );                  msgid, idx );
 }  }

Removed from v.1.142  
changed lines
  Added in v.1.159


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