Diff for /libraries/libldap/result.c between versions 1.124.2.21 and 1.143

version 1.124.2.21, 2010/04/13 20:22:59 version 1.143, 2006/12/14 09:02:14
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.124.2.20 2009/11/18 17:04:31 quanah Exp $ */  /* $OpenLDAP: pkg/ldap/libraries/libldap/result.c,v 1.142 2006/12/14 05:58:57 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-2010 The OpenLDAP Foundation.   * Copyright 1998-2006 The OpenLDAP Foundation.
  * All rights reserved.   * All rights reserved.
  *   *
  * Redistribution and use in source and binary forms, with or without   * Redistribution and use in source and binary forms, with or without
Line 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 71  static int ldap_mark_abandoned LDAP_P(( Line 71  static int ldap_mark_abandoned LDAP_P((
 static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,  static int wait4msg LDAP_P(( LDAP *ld, ber_int_t msgid, int all, struct timeval *timeout,
         LDAPMessage **result ));          LDAPMessage **result ));
 static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,  static ber_tag_t try_read1msg LDAP_P(( LDAP *ld, ber_int_t msgid,
         int all, LDAPConn *lc, LDAPMessage **result ));          int all, LDAPConn **lc, LDAPMessage **result ));
 static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));  static ber_tag_t build_result_ber LDAP_P(( LDAP *ld, BerElement **bp, LDAPRequest *lr ));
 static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));  static void merge_error_info LDAP_P(( LDAP *ld, LDAPRequest *parentr, LDAPRequest *lr ));
 static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));  static LDAPMessage * chkResponseList LDAP_P(( LDAP *ld, int msgid, int all));
Line 92  static LDAPMessage * chkResponseList LDA Line 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/discarded are    * When waiting, any messages that have been abandoned are discarded.
  * discarded.  
  *   *
  * Example:   * Example:
  *      ldap_result( s, msgid, all, timeout, result )   *      ldap_result( s, msgid, all, timeout, result )
Line 106  ldap_result( Line 105  ldap_result(
         struct timeval *timeout,          struct timeval *timeout,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
           LDAPMessage     *lm = NULL;
         int             rc;          int             rc;
   
         assert( ld != NULL );          assert( ld != NULL );
Line 117  ldap_result( Line 117  ldap_result(
         ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_lock( &ld->ld_res_mutex );
 #endif  #endif
   
         rc = wait4msg( ld, msgid, all, timeout, result );  #if 0
           /* this is already done inside wait4msg(), right?... */
           lm = chkResponseList( ld, msgid, all );
   #endif
   
           if ( lm == NULL ) {
                   rc = wait4msg( ld, msgid, all, timeout, result );
   
           } else {
                   *result = lm;
                   ld->ld_errno = LDAP_SUCCESS;
                   rc = lm->lm_msgtype;
           }
   
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );          ldap_pvt_thread_mutex_unlock( &ld->ld_res_mutex );
Line 231  chkResponseList( Line 243  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%02lx\n",                          "ldap_chkResponseList returns ld %p msgid %d, type 0x%02lu\n",
                         (void *)ld, lm->lm_msgid, (unsigned long)lm->lm_msgtype );                          (void *)ld, lm->lm_msgid, (unsigned long)lm->lm_msgtype );
         }          }
 #endif  #endif
Line 250  wait4msg( Line 262  wait4msg(
         int             rc;          int             rc;
         struct timeval  tv = { 0 },          struct timeval  tv = { 0 },
                         tv0 = { 0 },                          tv0 = { 0 },
                         start_time_tv = { 0 },                          *tvp;
                         *tvp = NULL;          time_t          start_time = 0;
           time_t          tmp_time;
         LDAPConn        *lc;          LDAPConn        *lc;
   
         assert( ld != NULL );          assert( ld != NULL );
Line 261  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 276  wait4msg( Line 284  wait4msg(
         }          }
 #endif /* LDAP_DEBUG */  #endif /* LDAP_DEBUG */
   
         if ( timeout != NULL && timeout->tv_sec != -1 ) {          if ( timeout == NULL ) {
                   tvp = NULL;
           } else {
                 tv0 = *timeout;                  tv0 = *timeout;
                 tv = *timeout;                  tv = *timeout;
                 tvp = &tv;                  tvp = &tv;
 #ifdef HAVE_GETTIMEOFDAY                  start_time = time( NULL );
                 gettimeofday( &start_time_tv, NULL );  
 #else /* ! HAVE_GETTIMEOFDAY */  
                 time( &start_time_tv.tv_sec );  
                 start_time_tv.tv_usec = 0;  
 #endif /* ! HAVE_GETTIMEOFDAY */  
         }          }
                                           
         rc = LDAP_MSG_X_KEEP_LOOKING;          rc = LDAP_MSG_X_KEEP_LOOKING;
Line 309  wait4msg( Line 314  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 322  wait4msg( Line 327  wait4msg(
                                 if ( ber_sockbuf_ctrl( lc->lconn_sb,                                  if ( ber_sockbuf_ctrl( lc->lconn_sb,
                                         LBER_SB_OPT_DATA_READY, NULL ) )                                          LBER_SB_OPT_DATA_READY, NULL ) )
                                 {                                  {
   #ifdef LDAP_R_COMPILE
                                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
                                           rc = try_read1msg( ld, msgid, all, &lc, result );
   #ifdef LDAP_R_COMPILE
                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                                         lc_ready = 1;                                          lc_ready = 1;
                                         break;                                          break;
                                 }                                  }
Line 330  wait4msg( Line 342  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 ) {
                                 int err;  
                                 rc = ldap_int_select( ld, tvp );                                  rc = ldap_int_select( ld, tvp );
                                 if ( rc == -1 ) {  
                                         err = sock_errno();  
 #ifdef LDAP_DEBUG  #ifdef LDAP_DEBUG
                                   if ( rc == -1 ) {
                                         Debug( LDAP_DEBUG_TRACE,                                          Debug( LDAP_DEBUG_TRACE,
                                                 "ldap_int_select returned -1: errno %d\n",                                                  "ldap_int_select returned -1: errno %d\n",
                                                 err, 0, 0 );                                                  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)
                                                 || err != 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 355  wait4msg( Line 365  wait4msg(
                                         rc = LDAP_MSG_X_KEEP_LOOKING;   /* select interrupted: loop */                                          rc = LDAP_MSG_X_KEEP_LOOKING;   /* select interrupted: loop */
   
                                 } else {                                  } else {
                                         lc_ready = 1;                                          rc = LDAP_MSG_X_KEEP_LOOKING;
                                 }  
                         }  
                         if ( lc_ready ) {  
                                 LDAPConn *lnext;  
                                 rc = LDAP_MSG_X_KEEP_LOOKING;  
 #ifdef LDAP_R_COMPILE  
                                 ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );  
 #endif  
                                 if ( ld->ld_requests &&  
                                         ld->ld_requests->lr_status == LDAP_REQST_WRITING &&  
                                         ldap_is_write_ready( ld,  
                                                 ld->ld_requests->lr_conn->lconn_sb ) )  
                                 {  
                                         ldap_int_flush_request( ld, ld->ld_requests );  
                                 }  
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
                                 ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );                                          ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
                                 ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );  
 #endif  #endif
                                 for ( lc = ld->ld_conns;                                          if ( ld->ld_requests &&
                                         rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL;                                                  ld->ld_requests->lr_status == LDAP_REQST_WRITING &&
                                         lc = lnext )                                                  ldap_is_write_ready( ld,
                                 {                                                          ld->ld_requests->lr_conn->lconn_sb ) )
                                         if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&  
                                                 ldap_is_read_ready( ld, lc->lconn_sb ) )  
                                         {                                          {
                                                 /* Don't let it get freed out from under us */                                                  ldap_int_flush_request( ld, ld->ld_requests );
                                                 ++lc->lconn_refcnt;                                          }
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
                                                 ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );                                          ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
 #endif  #endif
                                                 rc = try_read1msg( ld, msgid, all, lc, result );                                          for ( lc = ld->ld_conns;
                                                 lnext = lc->lconn_next;                                                  rc == LDAP_MSG_X_KEEP_LOOKING && lc != NULL; )
                                           {
                                                   if ( lc->lconn_status == LDAP_CONNST_CONNECTED &&
                                                           ldap_is_read_ready( ld, lc->lconn_sb ) )
                                                   {
   #ifdef LDAP_R_COMPILE
                                                           ldap_pvt_thread_mutex_unlock( &ld->ld_conn_mutex );
   #endif
                                                           rc = try_read1msg( ld, msgid, all, &lc, result );
   #ifdef LDAP_R_COMPILE
                                                           ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );
   #endif
                                                           if ( lc == NULL ) {
                                                                   /* if lc gets free()'d,
                                                                    * there's no guarantee
                                                                    * lc->lconn_next is still
                                                                    * sane; better restart
                                                                    * (ITS#4405) */
                                                                   lc = ld->ld_conns;
   
                                                 /* Only take locks if we're really freeing */                                                                  /* don't get to next conn! */
                                                 if ( lc->lconn_refcnt <= 1 ) {                                                                  break;
 #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  
                                                 } else {  
                                                         --lc->lconn_refcnt;  
                                                 }                                                  }
 #ifdef LDAP_R_COMPILE  
                                                 ldap_pvt_thread_mutex_lock( &ld->ld_conn_mutex );                                                  /* next conn */
 #endif                                                  lc = lc->lconn_next;
                                         } else {  
                                                 lnext = lc->lconn_next;  
                                         }                                          }
                                 }  
 #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
                                   }
                         }                          }
                 }                  }
   
                 if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {                  if ( rc == LDAP_MSG_X_KEEP_LOOKING && tvp != NULL ) {
                         struct timeval  curr_time_tv = { 0 },                          tmp_time = time( NULL );
                                         delta_time_tv = { 0 };                          tv0.tv_sec -= ( tmp_time - start_time );
                           if ( tv0.tv_sec <= 0 ) {
 #ifdef HAVE_GETTIMEOFDAY                                  rc = 0; /* timed out */
                         gettimeofday( &curr_time_tv, NULL );  
 #else /* ! HAVE_GETTIMEOFDAY */  
                         time( &curr_time_tv.tv_sec );  
                         curr_time_tv.tv_usec = 0;  
 #endif /* ! HAVE_GETTIMEOFDAY */  
   
                         /* delta_time = tmp_time - start_time */  
                         delta_time_tv.tv_sec = curr_time_tv.tv_sec - start_time_tv.tv_sec;  
                         delta_time_tv.tv_usec = curr_time_tv.tv_usec - start_time_tv.tv_usec;  
                         if ( delta_time_tv.tv_usec < 0 ) {  
                                 delta_time_tv.tv_sec--;  
                                 delta_time_tv.tv_usec += 1000000;  
                         }  
   
                         /* tv0 < delta_time ? */  
                         if ( ( tv0.tv_sec < delta_time_tv.tv_sec ) ||  
                              ( ( tv0.tv_sec == delta_time_tv.tv_sec ) && ( tv0.tv_usec < delta_time_tv.tv_usec ) ) )  
                         {  
                                 rc = 0; /* timed out */  
                                 ld->ld_errno = LDAP_TIMEOUT;                                  ld->ld_errno = LDAP_TIMEOUT;
                                 break;                                  break;
                         }                          }
   
                         /* tv0 -= delta_time */  
                         tv0.tv_sec -= delta_time_tv.tv_sec;  
                         tv0.tv_usec -= delta_time_tv.tv_usec;  
                         if ( tv0.tv_usec < 0 ) {  
                                 tv0.tv_sec--;  
                                 tv0.tv_usec += 1000000;  
                         }  
   
                         tv.tv_sec = tv0.tv_sec;                          tv.tv_sec = tv0.tv_sec;
                         tv.tv_usec = tv0.tv_usec;  
   
                         Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p %ld s %ld us to go\n",  
                                 (void *)ld, (long) tv.tv_sec, (long) tv.tv_usec );  
   
                         start_time_tv.tv_sec = curr_time_tv.tv_sec;                          Debug( LDAP_DEBUG_TRACE, "wait4msg ld %p %ld secs to go\n",
                         start_time_tv.tv_usec = curr_time_tv.tv_usec;                                  (void *)ld, (long) tv.tv_sec, 0 );
                           start_time = tmp_time;
                 }                  }
         }          }
   
Line 471  try_read1msg( Line 441  try_read1msg(
         LDAP *ld,          LDAP *ld,
         ber_int_t msgid,          ber_int_t msgid,
         int all,          int all,
         LDAPConn *lc,          LDAPConn **lcp,
         LDAPMessage **result )          LDAPMessage **result )
 {  {
         BerElement      *ber;          BerElement      *ber;
Line 481  try_read1msg( Line 451  try_read1msg(
         ber_tag_t       tag;          ber_tag_t       tag;
         ber_len_t       len;          ber_len_t       len;
         int             foundit = 0;          int             foundit = 0;
         LDAPRequest     *lr, *tmplr, dummy_lr = { 0 };          LDAPRequest     *lr, *tmplr;
           LDAPConn        *lc;
         BerElement      tmpber;          BerElement      tmpber;
         int             rc, refer_cnt, hadref, simple_request, err;          int             rc, refer_cnt, hadref, simple_request;
         ber_int_t       lderr;          ber_int_t       lderr;
   
 #ifdef LDAP_CONNECTIONLESS  #ifdef LDAP_CONNECTIONLESS
Line 492  try_read1msg( Line 463  try_read1msg(
 #endif  #endif
   
         assert( ld != NULL );          assert( ld != NULL );
         assert( lc != NULL );          assert( lcp != NULL );
           assert( *lcp != NULL );
                   
 #ifdef LDAP_R_COMPILE  #ifdef LDAP_R_COMPILE
         LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );          LDAP_PVT_THREAD_ASSERT_MUTEX_OWNER( &ld->ld_res_mutex );
Line 501  try_read1msg( Line 473  try_read1msg(
         Debug( LDAP_DEBUG_TRACE, "read1msg: ld %p msgid %d all %d\n",          Debug( LDAP_DEBUG_TRACE, "read1msg: ld %p msgid %d all %d\n",
                 (void *)ld, msgid, all );                  (void *)ld, msgid, all );
   
           lc = *lcp;
   
 retry:  retry:
         if ( lc->lconn_ber == NULL ) {          if ( lc->lconn_ber == NULL ) {
                 lc->lconn_ber = ldap_alloc_ber_with_options( ld );                  lc->lconn_ber = ldap_alloc_ber_with_options( ld );
Line 534  nextresp3: Line 508  nextresp3:
                 break;                  break;
   
         case LBER_DEFAULT:          case LBER_DEFAULT:
                 err = sock_errno();  
 #ifdef LDAP_DEBUG                    #ifdef LDAP_DEBUG                  
                 Debug( LDAP_DEBUG_CONNS,                  Debug( LDAP_DEBUG_CONNS,
                         "ber_get_next failed.\n", 0, 0, 0 );                          "ber_get_next failed.\n", 0, 0, 0 );
 #endif               #endif             
 #ifdef EWOULDBLOCK                        #ifdef EWOULDBLOCK                      
                 if ( err == EWOULDBLOCK ) return LDAP_MSG_X_KEEP_LOOKING;                  if ( sock_errno() == EWOULDBLOCK ) return LDAP_MSG_X_KEEP_LOOKING;
 #endif  #endif
 #ifdef EAGAIN  #ifdef EAGAIN
                 if ( err == 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;
                 --lc->lconn_refcnt;  
                 lc->lconn_status = 0;  
                 return -1;                  return -1;
   
         default:          default:
Line 562  nextresp3: Line 533  nextresp3:
                 return( -1 );                  return( -1 );
         }          }
   
         /* id == 0 iff unsolicited notification message (RFC 4511) */  
   
         /* id < 0 is invalid, just toss it. FIXME: should we disconnect? */  
         if ( id < 0 ) {  
                 goto retry_ber;  
         }  
           
         /* if it's been abandoned, toss it */          /* if it's been abandoned, toss it */
         if ( id > 0 ) {          if ( ldap_abandoned( ld, id, &idx ) ) {
                 if ( ldap_abandoned( ld, id, &idx ) ) {                  /* the message type */
                         /* the message type */                  tag = ber_peek_tag( ber, &len );
                         tag = ber_peek_tag( ber, &len );                  switch ( tag ) {
                         switch ( tag ) {                  case LDAP_RES_SEARCH_ENTRY:
                         case LDAP_RES_SEARCH_ENTRY:                  case LDAP_RES_SEARCH_REFERENCE:
                         case LDAP_RES_SEARCH_REFERENCE:                  case LDAP_RES_INTERMEDIATE:
                         case LDAP_RES_INTERMEDIATE:                  case LBER_ERROR:
                         case LBER_ERROR:                          break;
                                 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 %d message type %s\n",                          "abandoned/discarded ld %p msgid %ld message type %s\n",
                                 (void *)ld, 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 */  
                         tag = ber_peek_tag( ber, &len );  
                         switch ( tag ) {  
                         case LBER_ERROR:  
                                 break;  
   
                         default:  
                                 msg = ldap_int_msgtype2str( tag );  
                                 break;  
                         }  
   
                         Debug( LDAP_DEBUG_ANY,                  /* the message type */
                                 "no request for response on ld %p msgid %d message type %s (tossing)\n",                  tag = ber_peek_tag( ber, &len );
                                 (void *)ld, id, msg );                  switch ( tag ) {
                   case LBER_ERROR:
                           break;
   
                         goto retry_ber;                  default:
                           msg = ldap_int_msgtype2str( tag );
                           break;
                 }                  }
   
                   Debug( LDAP_DEBUG_ANY,
                           "no request for response on ld %p msgid %ld message type %s (tossing)\n",
                           (void *)ld, (long)id, msg );
   
                   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 640  nextresp2: Line 599  nextresp2:
         }          }
   
         Debug( LDAP_DEBUG_TRACE,          Debug( LDAP_DEBUG_TRACE,
                 "read1msg: ld %p msgid %d message type %s\n",                  "read1msg: ld %p msgid %ld message type %s\n",
                 (void *)ld, id, ldap_int_msgtype2str( tag ) );                  (void *)ld, (long)lr->lr_msgid, ldap_int_msgtype2str( tag ) );
   
         if ( id == 0 ) {  
                 /* unsolicited notification message (RFC 4511) */  
                 if ( tag != LDAP_RES_EXTENDED ) {  
                         /* toss it */  
                         goto retry_ber;  
   
                         /* strictly speaking, it's an error; from RFC 4511:  
   
 4.4.  Unsolicited Notification  
   
    An unsolicited notification is an LDAPMessage sent from the server to  
    the client that is not in response to any LDAPMessage received by the  
    server.  It is used to signal an extraordinary condition in the  
    server or in the LDAP session between the client and the server.  The  
    notification is of an advisory nature, and the server will not expect  
    any response to be returned from the client.  
   
    The unsolicited notification is structured as an LDAPMessage in which  
    the messageID is zero and protocolOp is set to the extendedResp  
    choice using the ExtendedResponse type (See Section 4.12).  The  
    responseName field of the ExtendedResponse always contains an LDAPOID  
    that is unique for this notification.  
   
                          * however, since unsolicited responses  
                          * are of advisory nature, better  
                          * toss it, right now  
                          */  
   
 #if 0  
                         ld->ld_errno = LDAP_DECODING_ERROR;  
                         ber_free( ber, 1 );  
                         return( -1 );  
 #endif  
                 }  
   
                 lr = &dummy_lr;  
         }  
   
         id = lr->lr_origid;          id = lr->lr_origid;
         refer_cnt = 0;          refer_cnt = 0;
Line 722  nextresp2: Line 643  nextresp2:
                                 }                                  }
                         }                          }
                 }                  }
           } else 
         } else if ( tag != LDAP_RES_SEARCH_ENTRY && tag != LDAP_RES_INTERMEDIATE ) {          if ( tag != LDAP_RES_SEARCH_ENTRY && tag != LDAP_RES_INTERMEDIATE ) {
                 /* All results that just return a status, i.e. don't return data          /* All results that just return a status, i.e. don't return data
                  * go through the following code.  This code also chases V2 referrals           * go through the following code.  This code also chases V2 referrals
                  * and checks if all referrals have been chased.           * and checks if all referrals have been chased.
                  */           */
                 char            *lr_res_error = NULL;                  char            *lr_res_error = NULL;
   
                 tmpber = *ber;  /* struct copy */                  tmpber = *ber;  /* struct copy */
Line 790  nextresp2: Line 711  nextresp2:
                                                 break;                                                  break;
   
                                         default:                                          default:
                                                 if ( lr->lr_res_error == NULL ) {                                                  if ( lr->lr_res_error == NULL ||
                                                           lr->lr_res_error[ 0 ] == '\0' )
                                                   {
                                                         break;                                                          break;
                                                 }                                                  }
   
                                                 /* pedantic, should never happen */  
                                                 if ( lr->lr_res_error[ 0 ] == '\0' ) {  
                                                         LDAP_FREE( lr->lr_res_error );  
                                                         lr->lr_res_error = NULL;  
                                                         break;    
                                                 }  
   
                                                 /* V2 referrals are in error string */                                                  /* V2 referrals are in error string */
                                                 refer_cnt = ldap_chase_referrals( ld, lr,                                                  refer_cnt = ldap_chase_referrals( ld, lr,
                                                         &lr->lr_res_error, -1, &hadref );                                                          &lr->lr_res_error, -1, &hadref );
Line 845  nextresp2: Line 761  nextresp2:
                                 return( -1 );   /* fatal error */                                  return( -1 );   /* fatal error */
                         }                          }
                         lr->lr_res_errno = LDAP_SUCCESS; /* sucessfully chased referral */                          lr->lr_res_errno = LDAP_SUCCESS; /* sucessfully chased referral */
                         if ( lr->lr_res_matched ) {  
                                 LDAP_FREE( lr->lr_res_matched );  
                                 lr->lr_res_matched = NULL;  
                         }  
   
                 } else {                  } else {
                         if ( lr->lr_outrefcnt <= 0 && lr->lr_parent == NULL ) {                          if ( lr->lr_outrefcnt <= 0 && lr->lr_parent == NULL ) {
Line 892  nextresp2: Line 804  nextresp2:
                         {                          {
                                 id = lr->lr_msgid;                                  id = lr->lr_msgid;
                                 tag = lr->lr_res_msgtype;                                  tag = lr->lr_res_msgtype;
                                 Debug( LDAP_DEBUG_TRACE, "request done: ld %p msgid %d\n",                                  Debug( LDAP_DEBUG_ANY, "request done: ld %p msgid %ld\n",
                                         (void *)ld, id, 0 );                                          (void *)ld, (long) id, 0 );
                                 Debug( LDAP_DEBUG_TRACE,                                  Debug( LDAP_DEBUG_TRACE,
                                         "res_errno: %d, res_error: <%s>, "                                          "res_errno: %d, res_error: <%s>, "
                                         "res_matched: <%s>\n",                                          "res_matched: <%s>\n",
Line 910  nextresp2: Line 822  nextresp2:
                                         }                                          }
                                 }                                  }
   
                                 if ( lr != &dummy_lr ) {                                  ldap_return_request( ld, lr, 1 );
                                         ldap_return_request( ld, lr, 1 );  
                                 }  
                                 lr = NULL;                                  lr = NULL;
                         }                          }
   
                         /*                          if ( lc != NULL ) {
                          * RF 4511 unsolicited (id == 0) responses  #ifdef LDAP_R_COMPILE
                          * shouldn't necessarily end the connection                                  ldap_pvt_thread_mutex_lock( &ld->ld_req_mutex );
                          */  #endif
                         if ( lc != NULL && id != 0 ) {                                  ldap_free_connection( ld, lc, 0, 1 );
                                 --lc->lconn_refcnt;  #ifdef LDAP_R_COMPILE
                                 lc = NULL;                                  ldap_pvt_thread_mutex_unlock( &ld->ld_req_mutex );
   #endif
                                   lc = *lcp = NULL;
                         }                          }
                 }                  }
         }          }
   
         if ( lr != NULL ) {          if ( lr != NULL ) {
                 if ( lr != &dummy_lr ) {                  ldap_return_request( ld, lr, 0 );
                         ldap_return_request( ld, lr, 0 );  
                 }  
                 lr = NULL;                  lr = NULL;
         }          }
   
Line 938  nextresp2: Line 848  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 ) {  
                                 --lc->lconn_refcnt;  
                         }  
   
                         /* 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 1097  nextresp2: Line 948  nextresp2:
         if ( msgid == LDAP_RES_ANY || id == msgid ) {          if ( msgid == LDAP_RES_ANY || id == msgid ) {
                 if ( all == LDAP_MSG_ONE                  if ( all == LDAP_MSG_ONE
                         || ( newmsg->lm_msgtype != LDAP_RES_SEARCH_RESULT                          || ( newmsg->lm_msgtype != LDAP_RES_SEARCH_RESULT
                                 && newmsg->lm_msgtype != LDAP_RES_SEARCH_ENTRY                                  && newmsg->lm_msgtype != LDAP_RES_SEARCH_ENTRY
                                 && newmsg->lm_msgtype != LDAP_RES_INTERMEDIATE  
                                 && newmsg->lm_msgtype != LDAP_RES_SEARCH_REFERENCE ) )                                  && newmsg->lm_msgtype != LDAP_RES_SEARCH_REFERENCE ) )
                 {                  {
                         *result = newmsg;                          *result = newmsg;
Line 1118  nextresp2: Line 968  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 1136  nextresp2: Line 985  nextresp2:
                 goto exit;                  goto exit;
         }          }
   
         Debug( LDAP_DEBUG_TRACE, "adding response ld %p msgid %d type %ld:\n",          Debug( LDAP_DEBUG_TRACE, "adding response ld %p msgid %ld type %ld:\n",
                 (void *)ld, newmsg->lm_msgid, (long) newmsg->lm_msgtype );                  (void *)ld, (long) newmsg->lm_msgid, (long) newmsg->lm_msgtype );
   
         /* part of a search response - add to end of list of entries */          /* part of a search response - add to end of list of entries */
         l->lm_chain_tail->lm_chain = newmsg;          l->lm_chain_tail->lm_chain = newmsg;
Line 1145  nextresp2: Line 994  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 1387  ldap_abandoned( LDAP *ld, ber_int_t msgi Line 1235  ldap_abandoned( LDAP *ld, ber_int_t msgi
   
         assert( idxp != NULL );          assert( idxp != NULL );
         assert( msgid >= 0 );          assert( msgid >= 0 );
           assert( ld->ld_nabandoned >= 0 );
   
         return ldap_int_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, idxp );          return lutil_bisect_find( ld->ld_abandoned, ld->ld_nabandoned, msgid, idxp );
 }  }
   
 /*  /*
Line 1403  ldap_mark_abandoned( LDAP *ld, ber_int_t Line 1252  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 ldap_int_bisect_delete() */          /* NOTE: those assertions are repeated in lutil_bisect_delete() */
         assert( idx >= 0 );          assert( idx >= 0 );
         assert( (unsigned) idx < ld->ld_nabandoned );          assert( idx < ld->ld_nabandoned );
         assert( ld->ld_abandoned[ idx ] == msgid );          assert( ld->ld_abandoned[ idx ] == msgid );
   
         return ldap_int_bisect_delete( &ld->ld_abandoned, &ld->ld_nabandoned,          return lutil_bisect_delete( &ld->ld_abandoned, &ld->ld_nabandoned,
                 msgid, idx );                  msgid, idx );
 }  }

Removed from v.1.124.2.21  
changed lines
  Added in v.1.143


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