1 files changed, 67 insertions, 0 deletions
diff --git a/ACE/TAO/orbsvcs/orbsvcs/PortableGroup/PG_Properties_Encoder.cpp b/ACE/TAO/orbsvcs/orbsvcs/PortableGroup/PG_Properties_Encoder.cpp
new file mode 100644
index 00000000000..de1fa1c7223
--- /dev/null
+++ b/ACE/TAO/orbsvcs/orbsvcs/PortableGroup/PG_Properties_Encoder.cpp
@@ -0,0 +1,67 @@
+//=============================================================================
+/**
+ *  @file    PG_Properties_Encoder.cpp
+ *
+ *  $Id$
+ *
+ *  This file implements classes to help manage the Properties
+ *  defined in the Portable Object Group.
+ *
+ *  @author Dale Wilson <wilson_d@ociweb.com>
+ */
+//=============================================================================
+#include "orbsvcs/PortableGroup/PG_Properties_Encoder.h"
+
+
+#if ! defined (__ACE_INLINE__)
+#include "orbsvcs/PortableGroup/PG_Properties_Encoder.inl"
+#endif /* !  __ACE_INLINE__ */
+
+TAO_BEGIN_VERSIONED_NAMESPACE_DECL
+
+//////////
+// Properties_Encoder
+TAO_PG::Properties_Encoder::Properties_Encoder ()
+{
+}
+
+TAO_PG::Properties_Encoder::~Properties_Encoder ()
+{
+}
+
+
+void TAO_PG::Properties_Encoder::add (
+  const char * name,
+  const PortableGroup::Value & value)
+{
+  NamedValue nv(name, value);
+  values_.push_back(nv);
+}
+
+void TAO_PG::Properties_Encoder::encode (
+  PortableGroup::Properties * property_set) const
+{
+  ACE_ASSERT (property_set != 0);
+  size_t count = values_.size();
+  property_set->length(count);
+  for( size_t nItem = 0; nItem < count; ++nItem )
+  {
+    const NamedValue & nv = values_[nItem];
+    PortableGroup::Property & property = (*property_set)[nItem];
+    PortableGroup::Name & nsName = property.nam;
+    PortableGroup::Value & anyValue = property.val;
+    // assign the value
+    anyValue = (nv.value_);
+
+    // assign the name
+    // @@: This restricts the name to a single level with no "kind"
+    // @@: remove this restriction (?)
+    nsName.length(1);
+    CosNaming::NameComponent & nc = nsName[0];
+
+    nc.id = CORBA::string_dup (nv.name_.c_str());
+    // nc.kind defaults to empty.  Leave it that way (for now)
+  }
+}
+
+TAO_END_VERSIONED_NAMESPACE_DECL