Method ReadXML

IO/Parallel/vtkPDataSetReader.cxx:197–379

------------------------------------------------------------------------------ Returns 0 for end of file. Returns 1 for start block, Returns 2 for parameter-value pair (occurs after 1 but before 3). Returns 3 for termination of start block. Returns 4 for string inside block. Puts string in retVal. (param = nullptr) Returns 5 for end block. ======= The statistics should be instance variables ...

// =======
// The statistics should be instance variables ...
int vtkPDataSetReader::ReadXML(istream* file, char** retBlock, char** retParam, char** retVal)
{
  static char str[1024];
  static char* ptr = nullptr;
  static char block[256];
  static char param[256];
  static char value[512];
  // I could keep track of the blocks on a stack, but I don't need to.
  static int inStartBlock = 0;
  char* tmp;

  // Initialize the strings.
  if (ptr == nullptr)
  {
    block[0] = param[0] = value[0] = '\0';
  }

  // Skip white space
  // We could do this with a get char ...
  while (ptr == nullptr || *ptr == ' ' || *ptr == '\t' || *ptr == '\n' || *ptr == '\0')
  {
    if (ptr == nullptr || *ptr == '\0')
    { // At the end of a line.  Read another.
      file->getline(str, 1024);
      if (file->fail())
      {
        *retBlock = nullptr;
        *retParam = nullptr;
        *retVal = nullptr;
        return 0;
      }
      str[1023] = '\0';
      ptr = str;
    }
    else
    {
      ++ptr;
    }
  }

  // Handle normal end block.  </Block>
  if (!inStartBlock && ptr[0] == '<' && ptr[1] == '/')
  { // Assumes no spaces
    ptr += 2;
    // We could check to see if the block name matches the start block...
    // Copy block name into block var.
    tmp = block;
    while (*ptr != '>' && *ptr != ' ' && *ptr != '\0')
    {
      *tmp++ = *ptr++;
    }
    *tmp = '\0';
    // Now scan to the end of the end block.
    while (*ptr != '>' && *ptr != '\0')
    {
      *tmp++ = *ptr++;
    }
    *retBlock = block;