1 files changed, 123 insertions, 0 deletions
diff --git a/modules/CIAO/tools/IDL3_to_IDL2/identifier_helper.cpp b/modules/CIAO/tools/IDL3_to_IDL2/identifier_helper.cpp
new file mode 100644
index 00000000000..9b8a255b9c5
--- /dev/null
+++ b/modules/CIAO/tools/IDL3_to_IDL2/identifier_helper.cpp
@@ -0,0 +1,123 @@
+/* -*- c++ -*- */
+// $Id$
+
+#include "identifier_helper.h"
+#include "utl_identifier.h"
+#include "utl_string.h"
+#include "fe_private.h"
+#include "global_extern.h"
+
+Identifier *
+IdentifierHelper::original_local_name (Identifier * local_name)
+{
+  Identifier * id = 0;
+  const char *lname = local_name->get_string ();
+   
+  // Remove _cxx_ if:
+  // 1. it occurs and
+  // 2. it occurs at the beginning of the string and
+  // 3. the rest of the string is a C++ keyword
+  if (ACE_OS::strstr (lname, "_cxx_") == lname)
+    {
+      TAO_IDL_CPP_Keyword_Table cpp_key_tbl;
+      
+      unsigned int len =
+        static_cast<unsigned int> (ACE_OS::strlen (lname + 5));
+        
+      const TAO_IDL_CPP_Keyword_Entry *entry =
+        cpp_key_tbl.lookup (lname + 5, len);
+
+      if (entry != 0)
+        {
+          // Remove _cxx_ and assign to the Identifier variable.
+          ACE_NEW_RETURN (id,
+                          Identifier (lname + 5),
+                          0);
+        }
+    }
+    
+  if (id == 0)
+    {
+      id = local_name->copy ();
+    }
+   
+  return id;
+}
+
+ACE_CString
+IdentifierHelper::orig_sn (UTL_IdList * sn, bool appended_to)
+{
+  ACE_CString retval;
+  bool first = true;
+  bool second = false;
+  Identifier *id = 0;
+
+  for (UTL_IdListActiveIterator i (sn); !i.is_done ();)
+    {
+      if (!first)
+        {
+          retval += "::";
+        }
+      else if (second)
+        {
+          first = second = false;
+        }
+
+      id = IdentifierHelper::original_local_name (i.item ());
+      i.next ();
+      
+      // Append the identifier.
+      retval +=
+        appended_to && i.is_done ()
+          ? id->get_string ()
+          : IdentifierHelper::try_escape (id).c_str ();
+
+       if (first)
+        {
+          if (ACE_OS::strcmp (id->get_string (), "") != 0)
+            {
+              // Does not start with a "".
+              first = false;
+            }
+          else
+            {
+              second = true;
+            }
+        }
+        
+      id->destroy ();
+      delete id;
+      id = 0;
+    }
+  
+  return retval;
+}
+
+bool
+IdentifierHelper::is_idl_keyword (Identifier * local_name)
+{
+  UTL_String utl_tmp (local_name->get_string ());
+  ACE_CString ext_id (utl_tmp.get_canonical_rep (),
+                      0,
+                      false);
+
+  int status = idl_global->idl_keywords ().find (ext_id);
+  utl_tmp.destroy ();
+
+  return status == 0;
+}
+
+ACE_CString 
+IdentifierHelper::try_escape (Identifier * local_name)
+{
+  ACE_CString s_local_name (local_name->get_string ());
+
+  if (IdentifierHelper::is_idl_keyword (local_name))
+    {
+      return "_" + s_local_name;
+    }
+  else
+    {
+      return s_local_name;
+    }
+}