1 files changed, 0 insertions, 431 deletions
diff --git a/TAO/utils/IorParser/ior-handler.cpp b/TAO/utils/IorParser/ior-handler.cpp
deleted file mode 100644
index 0ffe4adbb81..00000000000
--- a/TAO/utils/IorParser/ior-handler.cpp
+++ /dev/null
@@ -1,431 +0,0 @@
-// $Id$
-
-#include "ior-handler.h"
-
-IorHandler::IorHandler (void)
-{
-}
-
-// @@ Priya, can you please see if you can replace this function with
-// the ACE::hex2byte() method?
-
-int 
-IorHandler::hexChar2int (char thisChar)
-{
-  switch (thisChar)
-    {
-    case '0': return (0);
-    case '1': return (1);
-    case '2': return (2);
-    case '3': return (3);
-    case '4': return (4);
-    case '5': return (5);
-    case '6': return (6);
-    case '7': return (7);
-    case '8': return (8);
-    case '9': return (9);
-    case 'a': return (10);
-    case 'b': return (11);
-    case 'c': return (12);
-    case 'd': return (13);
-    case 'e': return (14);
-    case 'f': return (15);
-    }
-}
-
-u_long
-IorHandler::getOctet8Field (char *readPtr, int *hexCharsRead)
-{
-  char octet8Holder[8];
-  u_long value;
-  int i;
- 
-  for (i = 0; i < 8; i++)
-    octet8Holder[i] = * (readPtr + i);
-
-  *hexCharsRead = 8;
-
-  value = 16*hexChar2int (octet8Holder[6]) + hexChar2int (octet8Holder[7]);
-  return (value);
-}
-
-u_long
-IorHandler::getOctet4Field (char *readPtr, int *hexCharsRead)
-{
-  char octet4Holder[4];
-  u_long value;
-  int i;
-
-  for (i = 0; i < 4; i++)
-    octet4Holder[i] = * (readPtr + i);
-
-  *hexCharsRead = 4;
-
-  value = 16*16*16* hexChar2int (octet4Holder[0]) +
-    16*16* hexChar2int (octet4Holder[1]) +
-    16* hexChar2int (octet4Holder[2]) + 
-    hexChar2int (octet4Holder[3]);
-  return (value);
-}
-
-u_long
-IorHandler::getOctet2Field (char *readPtr, int *hexCharsRead)
-{
-  char octet2Holder[2];
-  u_long value;
-  int i;
-
-  for (i = 0; i < 2; i++)
-    octet2Holder[i] = * (readPtr + i);
-
-  *hexCharsRead = 2;
-
-  value = 16 * hexChar2int (octet2Holder[0]) +  hexChar2int (octet2Holder[1]);
-  return (value);
-}
-
-void
-IorHandler::skipNullOctets (char *readPtr, int *hexCharsRead)
-{
-  char nullOctet[2];
-  int offset;
-
-  *hexCharsRead = 0;
-  offset = 0;
-
-  // There sometimes occurs a null padding of 2 octets after strings
-  // such as the type_id in order to ensure even number of octets.
-
-  while (1)
-    {
-      nullOctet[0] = * (readPtr + offset);
-      nullOctet[1] = * (readPtr + offset + 1);
-      if ((nullOctet[0] == '0') && (nullOctet[1] == '0'))
-	offset += 2;  
-      else
-	break;
-    }
-
-  *hexCharsRead = offset;
-}
-
-char *
-IorHandler::getString (char *readPtr, int givenLen)
-{
-  char parsedStr[MAX_IOR_FIELD_LEN];
-  char octetPair[2];
-  char parsedOctetPair[2];
-  int intEquiv;
-  int i = 0;
-  int j = 0;
- 
-  // i indexes hexChars while j indexes octet pairs
-
-  while (i <= (givenLen - 2))
-    {
-      octetPair[0] = * (readPtr + i);
-      octetPair[1] = * (readPtr + i + 1);
-
-      intEquiv = 16*hexChar2int (octetPair[0]) + hexChar2int (octetPair[1]);
-      sprintf (parsedOctetPair, "%c", intEquiv);
-      parsedStr[j] = parsedOctetPair[0];
-      j ++;
-      
-      i += 2;
-    }
-
-  return (parsedStr);
-}
-
-void
-IorHandler::prettyPrintIOR (struct IOR thisIor)
-{
-  ACE_DEBUG ((LM_DEBUG,
-              "TypeIdLen\t: %lu bytes\n",
-              thisIor.typeIdLen));
-  ACE_DEBUG ((LM_DEBUG,
-              "TypeId\t\t: %s\n",
-              thisIor.typeId));
-  ACE_DEBUG ((LM_DEBUG,
-              "IDL Interface\t: %s\n",
-              thisIor.idlInterface));
-  ACE_DEBUG ((LM_DEBUG,
-              "ProfileBodyLen\t: %lu bytes\n",
-              thisIor.profileBodyLen));
-  ACE_DEBUG ((LM_DEBUG,
-              "HostLen\t\t: %lu bytes\n",
-              thisIor.hostLen));
-  ACE_DEBUG ((LM_DEBUG,
-              "HostName\t: %s\n",
-              thisIor.HostName));
-  ACE_DEBUG ((LM_DEBUG,
-              "Port Number\t: %lu\n",
-              thisIor.portNum));
-  ACE_DEBUG ((LM_DEBUG,
-              "ObjectKeyLen\t: %lu bytes\n",
-              thisIor.objectKeyLen));
-  ACE_DEBUG ((LM_DEBUG,
-              "ObjectKey\t: %s\n",
-              thisIor.objectKey));
-}
-
-void
-IorHandler::interpretIor (char *thisIor, struct IOR *thisIorInfo)
-{
-  int numCharsToSkip;
-  char nullOctet[2];
-
-  // Skip the prefix "IOR:" 
-  int numHexCharsRead = 4;
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead), &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
-
-  int ulongValue = getOctet2Field ((char *) (thisIor + numHexCharsRead),
-                                   &numCharsToSkip);
-
-  // Read the length of the type_id field
-  if (ulongValue == 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: type_id len seems to be NULL \n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-
-  numHexCharsRead += numCharsToSkip;
-  thisIorInfo->typeIdLen = ulongValue;
-
-  // Read the type_id and store it
-  ACE_OS::strncpy (thisIorInfo->typeId, 
-                   getString ((char *) (thisIor + numHexCharsRead),
-                              2 * thisIorInfo->typeIdLen),
-                   thisIorInfo->typeIdLen);
-  numHexCharsRead += 2 * thisIorInfo->typeIdLen;
-
-  // While we have the type_id, we may as well extract the IDL
-  // interface name from it.
-  ACE_OS::strcpy (thisIorInfo->idlInterface,
-                  getIdlInterface (thisIorInfo->typeId));
-  ACE_DEBUG ((LM_DEBUG,
-              "\nTypeId\t\t: %s \n",
-              thisIorInfo->typeId));
-  ACE_DEBUG ((LM_DEBUG,
-              "IDL Interface\t: %s\n",
-              thisIorInfo->idlInterface));
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead), &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
-
-  ulongValue = getOctet2Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the 4 octets, which should equal 1 (numTaggedProfiles = 1)
-  if (ulongValue != 1)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: numTaggedProfiles != 1\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;  
-
-  ulongValue = getOctet8Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the 4 octets, which should equal 0 (TAG_INTERNET_IOP = 0)
-
-  if (ulongValue != 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: TAG_INTERNET_IOP != 0\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;  
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead),
-                  &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
- 
-  // Since the object_key and the hostname are part of the ProfileBody
-  // field of the IOR, and this is the part that needs to be changed,
-  // the IOR should be cut here typically if we want to fake it.
-  cutAndPasteHere = numHexCharsRead;
-
-  ulongValue = getOctet2Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the 4 octets, which represent the length of the ProfileBody
-  if (ulongValue == 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: ProfileBody len equals NULL\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-
-  numHexCharsRead += numCharsToSkip;  
-  thisIorInfo->profileBodyLen = ulongValue;
-
-  ACE_DEBUG ((LM_DEBUG,
-              "\nTAG_INTERNET_IOP Profile:\n"));
-
-  ulongValue = getOctet4Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the 4 octets, which represent the IIOP version number = 1
-  if (ulongValue != 1)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: IIOP version != 1\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;    
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead), &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
-
-  ulongValue = getOctet2Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the 2 octets, which represent the length of the hostname
-  if (ulongValue == 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: hostLen equals NULL\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;  
-  thisIorInfo->hostLen = ulongValue;  
-
-  // Read the hostname and store it
-  ACE_OS::strncpy (thisIorInfo->HostName, 
-                   getString ((char *) (thisIor + numHexCharsRead),
-                              2 * thisIorInfo->hostLen),
-                   thisIorInfo->hostLen);
-  numHexCharsRead += 2 * thisIorInfo->hostLen;  
-
-  ACE_DEBUG ((LM_DEBUG,
-              "    HostName   : %s\n",
-              thisIorInfo->HostName));
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead),
-                  &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
-  
-  ulongValue = getOctet4Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the port number and store it
-  if (ulongValue == 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: port number equals NULL\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;  
-  thisIorInfo->portNum = ulongValue;  
-  ACE_DEBUG ((LM_DEBUG,
-              "    Port Number: %lu\n",
-              thisIorInfo->portNum));
-
-  skipNullOctets ((char *) (thisIor + numHexCharsRead),
-                  &numCharsToSkip);
-  numHexCharsRead += numCharsToSkip;
-
-  ulongValue = getOctet2Field ((char *) (thisIor + numHexCharsRead),
-                               &numCharsToSkip);
-
-  // Read the object key length and store it
-  if (ulongValue == 0)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "<%d hexChars read>: objectKeyLen equals NULL\n",
-                  numHexCharsRead));
-      ACE_OS::exit (1);
-    }
-  numHexCharsRead += numCharsToSkip;  
-  thisIorInfo->objectKeyLen = ulongValue;  
-
-  // Read the object_key and store it
-  ACE_OS::strncpy (thisIorInfo->objectKey, 
-                   getString ((char *) (thisIor + numHexCharsRead),
-                              2 * thisIorInfo->objectKeyLen), 
-                   thisIorInfo->objectKeyLen);
-  numHexCharsRead += 2 * thisIorInfo->objectKeyLen;
-
-  ACE_DEBUG ((LM_DEBUG,
-              "    ObjectKey  : %s \n\n",
-              thisIorInfo->objectKey));
-
-  // Pretty print the IOR with more debugging information
-  // prettyPrintIOR (*thisIorInfo);
-}
-
-char *
-IorHandler::getIdlInterface (char *typeId)
-{
-  char idlInterface[MAX_TYPE_ID_LEN];
-  int lenInterface;
-
-  // @@ Priya, can you please avoid the use of "magic constants" like
-  // 58.
-  char *readStart = strchr (typeId, 58);
-
-  // A sample type_id for an IDL interface name "EchoTests" is
-  // IDL:EchoTests:1.0 => the trick is to isolate the parts between
-  // the two colons. The ASCII equivalent of ":" is 58.
-
-  if (readStart == NULL)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "getIdlInterface: type_id contains no starting :\n"));
-      ACE_OS::exit (1);
-    }
-
-  char *readEnd = strrchr (typeId, 58);
-
-  if (readEnd == NULL)
-    {
-      ACE_DEBUG ((LM_DEBUG,
-                  "getIdlInterface: type_id contains no ending:\n"));
-      ACE_OS::exit (1);
-    }
-
-  // Now, count the number of bytes between the two colons.
-  lenInterface = readEnd - readStart - 1;
-
-  // Copy the IDL interface part of the type_id.
-  ACE_OS::strncpy ((char *)idlInterface,
-                   readStart+1,
-                   lenInterface);
-  idlInterface[lenInterface] = '\0';
-  
-  return (char *) idlInterface;
-}
-
-void
-IorHandler::readIorFromFile (char *filename)
-{
-  FILE *fp = ACE_OS::fopen (filename, "r");
-
-  // Read the real IOR from the file REAL_IOR_FILE.
-  if (fp == NULL)
-    {
-      ACE_ERROR ((LM_ERROR,
-                  "%p\n",
-                  "Unable to open file"));
-      ACE_OS::exit (1);
-    }
-
-  fscanf (fp,
-          "%s",
-          stringRealIOR);
-  ACE_OS::fclose (fp);
-
-  interpretIor (stringRealIOR, &parsedRealIOR);
-}