SystemCallTan.cpp

Go to the documentation of this file.

 
#ifndef _MADARA_NO_KARL_
 
#include <math.h>
 
#include "madara/expression/LeafNode.h"
#include "madara/expression/SystemCallTan.h"
#include "madara/knowledge/ThreadSafeContext.h"
#include "madara/expression/Visitor.h"
 
madara::expression::SystemCallTan::SystemCallTan(
    madara::knowledge::ThreadSafeContext& context, const ComponentNodes& nodes)
  : SystemCallNode(context, nodes)
{
}
 
// Dtor
madara::expression::SystemCallTan::~SystemCallTan(void) {}
 
madara::knowledge::KnowledgeRecord madara::expression::SystemCallTan::item(
    void) const
{
  return madara::knowledge::KnowledgeRecord(nodes_.size());
}
 
madara::knowledge::KnowledgeRecord madara::expression::SystemCallTan::prune(
    bool& can_change)
{
  madara::knowledge::KnowledgeRecord result;
 
  if (nodes_.size() == 1)
  {
    bool arg_can_change = false;
    result = knowledge::KnowledgeRecord(
        tan(nodes_[0]->prune(arg_can_change).to_double()));
 
    if (!arg_can_change && dynamic_cast<LeafNode*>(nodes_[0]) == 0)
    {
      delete nodes_[0];
      nodes_[0] = new LeafNode(*(this->logger_), result);
    }
 
    can_change = can_change || arg_can_change;
  }
  else
  {
    std::stringstream args;
 
    for (unsigned int i = 0; i < nodes_.size(); ++i)
    {
      if (nodes_[i])
      {
        bool unused = false;
        args << nodes_[i]->prune(unused).to_double();
 
        if (i != nodes_.size() - 1)
          args << ",";
      }
      else
      {
        madara_logger_ptr_log(logger_, logger::LOG_ERROR,
            "madara::expression::SystemCallTan: "
            "KARL COMPILE ERROR: System call tan encountered a null arg at "
            "%d\n",
            i);
      }
    }
 
    madara_logger_ptr_log(logger_, logger::LOG_ERROR,
        "madara::expression::SystemCallTan: "
        "KARL COMPILE ERROR:"
        "System call tan requires 1 argument,"
        " e.g., #tan (1.5), where 1.5 is radians. Args currently are: %s\n",
        args.str().c_str());
 
    throw exceptions::KarlException(
        "madara::expression::SystemCallTan: "
        "KARL COMPILE ERROR: "
        "System call tan requires 1 argument,"
        " e.g., #tan (1.5), where 1.5 is radians. Args currently are: " +
        args.str());
  }
 
  return result;
}
 
madara::knowledge::KnowledgeRecord madara::expression::SystemCallTan::evaluate(
    const madara::knowledge::KnowledgeUpdateSettings& settings)
{
  knowledge::KnowledgeRecord return_value;
 
  if (nodes_.size() == 1)
  {
    madara_logger_ptr_log(logger_, logger::LOG_MINOR,
        "madara::expression::SystemCallTan: "
        "System call tan is returning the tangent "
        "of its first argument\n");
 
    return_value = knowledge::KnowledgeRecord(
        tan(nodes_[0]->evaluate(settings).to_double()));
  }
  else
  {
    madara_logger_ptr_log(logger_, logger::LOG_ERROR,
        "madara::expression::SystemCallTan: "
        "KARL RUNTIME ERROR:"
        "System call tan requires 1 argument,"
        " e.g., #tan (1.5), where 1.5 is radians\n");
 
    throw exceptions::KarlException(
        "madara::expression::SystemCallTan: "
        "KARL RUNTIME ERROR: "
        "System call tan requires 1 argument,"
        " e.g., #tan (1.5), where 1.5 is radians\n");
  }
 
  return return_value;
}
 
// accept a visitor
void madara::expression::SystemCallTan::accept(
    madara::expression::Visitor& visitor) const
{
  visitor.visit(*this);
}
 
#endif  // _MADARA_NO_KARL_