SystemCallToHostDirs.cpp

Go to the documentation of this file.

#ifndef _MADARA_NO_KARL_


#include "madara/utility/Utility.h"
#include "madara/expression/LeafNode.h"
#include "madara/expression/SystemCallToHostDirs.h"
#include "madara/knowledge/ThreadSafeContext.h"
#include "madara/expression/Visitor.h"


madara::expression::SystemCallToHostDirs::SystemCallToHostDirs (
  madara::knowledge::ThreadSafeContext & context,
  const ComponentNodes & nodes)
  : SystemCallNode (context, nodes)
{

}

// Dtor
madara::expression::SystemCallToHostDirs::~SystemCallToHostDirs (void)
{
}

madara::knowledge::KnowledgeRecord
madara::expression::SystemCallToHostDirs::item (void) const
{
  return madara::knowledge::KnowledgeRecord (nodes_.size ());
}

madara::knowledge::KnowledgeRecord
madara::expression::SystemCallToHostDirs::prune (bool & can_change)
{
  // user can always change a function, and we have no control over
  // what it does. Consequently, a function node cannot be pruned out
  // under any situation
  can_change = true;
  
  madara::knowledge::KnowledgeRecord result;

  if (nodes_.size () == 1)
  {
    bool arg_can_change = false;
    result = nodes_[0]->prune (arg_can_change);
    
    if (!arg_can_change && dynamic_cast <LeafNode *> (nodes_[0]) == 0)
    {
      delete nodes_[0];
      nodes_[0] = new LeafNode (*(this->logger_), result);
    }
  }
  else
  {
    madara_logger_ptr_log (logger_, logger::LOG_EMERGENCY,
      "KARL COMPILE ERROR: System call to_host_dirs requires 1 argument,"
      "e.g., #to_host_dirs ('files/file.txt') will convert to files\file.txt"
      " on Windows\n");
  }


  return result;
}

madara::knowledge::KnowledgeRecord 
madara::expression::SystemCallToHostDirs::evaluate (
const madara::knowledge::KnowledgeUpdateSettings & settings)
{
  knowledge::KnowledgeRecord return_value;

  if (nodes_.size () == 1)
  {
    std::string statement (nodes_[0]->evaluate (settings).to_string ());

    madara_logger_ptr_log (logger_, logger::LOG_MINOR,
      "System call to_host_dirs is returning the proper directory structure "
      "of %s.\n", statement.c_str ());

    return knowledge::KnowledgeRecord (
        madara::utility::clean_dir_name (statement));
  }
  else
  {
    madara_logger_ptr_log (logger_, logger::LOG_EMERGENCY,
      "KARL COMPILE ERROR: System call to_host_dirs requires 1 argument,"
      "e.g., #to_host_dirs ('files/file.txt') will convert to files\file.txt"
      " on Windows\n");
  }

  return return_value;
}

// accept a visitor
void 
madara::expression::SystemCallToHostDirs::accept (
  madara::expression::Visitor &visitor) const
{
  visitor.visit (*this);
}

#endif // _MADARA_NO_KARL_