1 files changed, 0 insertions, 353 deletions
diff --git a/TAO/tao/MProfile.cpp b/TAO/tao/MProfile.cpp
deleted file mode 100644
index 58ce5f09406..00000000000
--- a/TAO/tao/MProfile.cpp
+++ /dev/null
@@ -1,353 +0,0 @@
-// This may look like C, but it's really -*- C++ -*-
-// $Id$
-
-#include "tao/MProfile.h"
-#include "tao/Pluggable.h"
-
-ACE_RCSID(tao, MProfile, "$Id$")
-
-TAO_MProfile::TAO_MProfile (CORBA::ULong sz)
-  :  fwded_mprofile_(0),
-     pfiles_ (0),
-     current_ (0),
-     size_ (0),
-     last_ (0)
-{
-  this->set (sz);
-}
-
-TAO_MProfile::TAO_MProfile (TAO_MProfile *mprofiles)
-  :  fwded_mprofile_(0),
-     pfiles_ (0),
-     current_ (0),
-     size_ (0),
-     last_ (0)
-{
-  this->set (mprofiles);
-}
-
-int
-TAO_MProfile::set (CORBA::ULong sz)
-{
-  if (sz == 0)
-    {
-      // We do, so release all of our profiles.
-      for (TAO_PHandle h = 0; h < this->size_; h++ )
-        {
-          if (this->pfiles_[h]) 
-            {
-              this->pfiles_[h]->_decr_refcnt ();
-              this->pfiles_[h] = 0;
-            }
-        }
-
-      if (size_)
-        delete [] this->pfiles_;
-  
-    if (fwded_mprofile_)
-      delete fwded_mprofile_;
-  
-    pfiles_ = 0;
-    current_ = 0;
-    size_ = 0;
-    last_= 0;
-
-    return  0;
-  }
-
-  // see if we already have an existing profile list
-  // or if we need to get ridof what we have
-  if (size_)
-    {
-      
-      // We do, so release all of our profiles.
-      for (TAO_PHandle h = 0; h < size_; h++)
-        {
-          if (this->pfiles_[h]) 
-            {
-              this->pfiles_[h]->_decr_refcnt ();
-              this->pfiles_[h] = 0;
-            }
-        }
-  
-      // Next see if we can reuse our profile list memory Since
-      if (this->size_ != sz)
-        {
-          // we cant reuse memory since the array sized are different!
-          delete [] this->pfiles_;
-  
-          ACE_NEW_RETURN (this->pfiles_,
-                          TAO_Profile_ptr [sz],
-                          -1);
-        } 
-    }
-  else
-    {
-      // first time, initialize!
-      ACE_NEW_RETURN (this->pfiles_,
-                      TAO_Profile_ptr [sz],
-                      -1);
-    } // this->pfiles_
-
-  ACE_OS::memset (this->pfiles_,
-                  0,
-                  sizeof (TAO_Profile_ptr) * sz);
-
-  size_ = sz;
-  this->last_ = 0;
-  this->current_ = 0;
-
-  // @@ since we are being reset, get rid of fwd references!
-  if (fwded_mprofile_)
-    delete fwded_mprofile_;
-
-  return size_;
-}
-  
-int
-TAO_MProfile::set (TAO_MProfile *mprofile)
-{
-  // NOTE: We use mprofile->last_ instead of mprofile->size_ to set
-  // this->size_.  This is so we can use set () to trim a profile
-  // list!!
-
-  if (! mprofile)
-    return this->set ((CORBA::ULong) 0);
-
-  this->set (mprofile->last_);
-
-  // set indexes ...
-  this->last_ = mprofile->last_;
-  
-  // these are set in set (ULong);
-  // this->current_ = 0;
-  // this->fwded_mprofile_ = 0;
-
-  // Now reference all profiles.
-  for (TAO_PHandle h = 0 ; h < this->size_ ; h++ )
-    {
-      if (mprofile->pfiles_[h]) 
-        {
-          this->pfiles_[h] = mprofile->pfiles_[h];
-          this->pfiles_[h]->_incr_refcnt ();
-        }
-    } // for (TAO_PHandle ...)
-
-  if (mprofile->fwded_mprofile_)
-    {
-      this->fwded_mprofile_ = mprofile->fwded_mprofile_;
-    }
-
-  return 1;
-}
-
-TAO_MProfile::~TAO_MProfile (void)
- {
-  if (this->pfiles_)
-    for (TAO_PHandle h = 0; h < size_; h++)
-      {
-        if (this->pfiles_[h])
-          this->pfiles_[h]->_decr_refcnt ();
-      }
-
-  delete [] pfiles_;
-  pfiles_ = 0;
-
-}
-
-// cyclic get next.  It will simply cycle through the complete list.
-
-TAO_Profile *
-TAO_MProfile::get_cnext (void)
-{
-  if (last_ == 0)
-      return 0;
-
-  if (current_ == last_)
-      current_ = 0;
-
-  return pfiles_ [current_++];
-
-  // was 
-  // return last_ == 0 ? 0 : ((current_ < last_) ? pfiles_ [current_++] : 
-  //                          pfiles_ [(current_ = 1, 0)]);
-}
-
-// This will return the next element until either null is found or the
-// end of list.  It then continues to return NULL until rewind.
-
-TAO_Profile *
-TAO_MProfile::get_next (void)
-{
-  // Nolist or EndOfList
-  if (last_ == 0 || current_ == last_)
-    return 0;
-
-  return pfiles_ [current_++];
-
-  // was 
-  // return last_ == 0 ? 0 : ((current_ == last_) ? 0 : pfiles_ [current_++]);
-}
-
-TAO_Profile *
-TAO_MProfile::get_cprev (void)
-{
-  if (last_ == 0)
-    return 0;
-
-  if (last_ == 1)
-    current_=1;
-  else if (current_ > 1)
-    current_--;
-  else // current_ == 0 or 1, 0 => list never read before and == 1
-    current_ = last_;
-      
-  return pfiles_ [current_ - 1];
-
-  // was
-  // return last_ == 0 ? 0 : 
-  //             (last_ == 1 ? pfiles_ [current_=0] :
-  //                   (current_ > 1 ? pfiles_ [(--current_ - 1)] :
-  //                    pfiles_ [(current_ = last_, last_ - 1)]));
-}
-
-TAO_Profile *
-TAO_MProfile::get_prev (void)
-{
-  if (last_ == 0 || current_ <= 1)
-    // No List of BeginningOfList
-    return 0;
-
-  if (current_ > 1)
-    {
-      current_--;
-    }
-
-  return pfiles_ [current_ - 1];
-
-  // was 
-  // return last_ == 0 ? 0 :
-  //        (current_ > 1 ? pfiles_ [--current_ - 1] : 
-  //         (TAO_Profile *)(current_ = 0, 0));
-}
-
-// does not affect the current_ setting!
-TAO_Profile *
-TAO_MProfile::get_profile (TAO_PHandle handle)
-{
-  if (handle < last_)
-    return pfiles_ [handle];
-
-  return 0;
-}
-  
-TAO_Profile *
-TAO_MProfile::get_current_profile (void)
-{
-  if (last_ == 0) 
-    return 0;
- 
-  if (current_ == 0)
-    // means list has not been read before.
-    current_ = 1;
-
-  return pfiles_ [current_-1];
-
-  // was 
-  //  return current_ == 0 ? pfiles_ [current_] : pfiles_ [current_-1];
-}
-
-TAO_PHandle 
-TAO_MProfile::get_current_handle (void)
-{
-  if (current_ > 0)
-    return current_ - 1;
-
-  return 0;
-
-  // was
-  // return current_ > 0 ? (current_ - 1) : 0;
-}
-
-void 
-TAO_MProfile::rewind (void)
-{
-  current_ = 0;
-}
-
-int 
-TAO_MProfile::add_profile (TAO_Profile *pfile)
-{
-  // skip by the used slots
-  if (last_ == size_) // full!
-    return -1;
-   
-  pfiles_ [last_++] = pfile;
-
-  if (pfile && pfile->_incr_refcnt () == 0) 
-    ACE_ERROR_RETURN ((LM_ERROR, 
-                       "(%P|%t) Unable to increment reference count in add_profile!\n"), 
-                      -1);
-  return last_ - 1;
-}
-
-void
-TAO_MProfile::fwded_mprofile (TAO_MProfile *fwded)
-{
-  this->fwded_mprofile_ = fwded;
-}
-
-TAO_MProfile *
-TAO_MProfile::fwded_mprofile (void)
-{
-  return this->fwded_mprofile_;
-}
-
-CORBA::ULong
-TAO_MProfile::profile_count (void)
-{
-  return this->last_;
-}
-
-TAO_Profile_ptr *
-TAO_MProfile::pfiles (void) const
-{
-  return this->pfiles_;
-}
-
-CORBA::Boolean
-TAO_MProfile::is_equivalent (TAO_MProfile *first, 
-                             TAO_MProfile *second,
-                             CORBA::Environment &env)
-{
-  // Two profile lists are equivalent iff at least one of the 
-  // profiles form the first list is_equivalent to at least one
-  // of the profiles from the second list!!
-  TAO_Profile_ptr *pfiles1 = first->pfiles ();
-  TAO_Profile_ptr *pfiles2 = second->pfiles ();
-  TAO_PHandle first_cnt = first->profile_count ();
-  TAO_PHandle second_cnt = second->profile_count ();
-  
-  for (TAO_PHandle h1 = 0; h1 < first_cnt;h1++)
-    for (TAO_PHandle h2 = 0; h2 < second_cnt; h2++ )
-      if (pfiles1[h1]->is_equivalent (pfiles2[h2], env))
-        return 1;
-  
-  return 0;
-}
-
-CORBA::ULong
-TAO_MProfile::hash (CORBA::ULong max, CORBA::Environment &env)
-{
-  CORBA::ULong hashval = 0;
-
-  if (last_ == 0) 
-    return 0;
-
-  for (TAO_PHandle h=0; h < last_ ; h++) 
-    hashval += pfiles_[h]->hash (max, env);
-
-  // The above hash function return an ULong between 0 and max here we
-  // simply take the average value and round
-  return hashval / last_; 
-}