arangodb/QL/formatter.c

////////////////////////////////////////////////////////////////////////////////
/// @brief AST dump functions
///
/// @file
///
/// DISCLAIMER
///
/// Copyright 2010-2012 triagens GmbH, Cologne, Germany
///
/// Licensed under the Apache License, Version 2.0 (the "License");
/// you may not use this file except in compliance with the License.
/// You may obtain a copy of the License at
///
///     http://www.apache.org/licenses/LICENSE-2.0
///
/// Unless required by applicable law or agreed to in writing, software
/// distributed under the License is distributed on an "AS IS" BASIS,
/// WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
/// See the License for the specific language governing permissions and
/// limitations under the License.
///
/// Copyright holder is triAGENS GmbH, Cologne, Germany
///
/// @author Jan Steemann
/// @author Copyright 2012, triagens GmbH, Cologne, Germany
////////////////////////////////////////////////////////////////////////////////


#include "QL/formatter.h" 

////////////////////////////////////////////////////////////////////////////////
/// @addtogroup QL
/// @{
////////////////////////////////////////////////////////////////////////////////


////////////////////////////////////////////////////////////////////////////////
/// @brief Increase indentation
////////////////////////////////////////////////////////////////////////////////

void QLFormatterIndentationInc (QL_formatter_t *formatter) {
  formatter->indentLevel++;
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Decrease indentation
////////////////////////////////////////////////////////////////////////////////

void QLFormatterIndentationDec (QL_formatter_t *formatter) {
  formatter->indentLevel--;
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print current indentation
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintIndentation (QL_formatter_t *formatter) {
  unsigned int i=0;

  for (; i < formatter->indentLevel; i++) {
     printf("  ");
  }
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print start of a block
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintBlockStart (QL_formatter_t *formatter,const char *name) {
  QLFormatterPrintIndentation(formatter);
  printf("%s {\n",name);
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print end of a block
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintBlockEnd (QL_formatter_t *formatter,const char *name) {
  QLFormatterPrintIndentation(formatter);
  printf("}\n");
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print an indented int value
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintInt (QL_formatter_t *formatter,const char *name,uint64_t value) {
  QLFormatterPrintIndentation(formatter);
  //printf("%s: %llu\n",name,value);
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print an indented double value
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintDouble (QL_formatter_t *formatter,const char *name,double value) {
  QLFormatterPrintIndentation(formatter);
  printf("%s: %f\n",name,value);
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Print an indented string value
////////////////////////////////////////////////////////////////////////////////

void QLFormatterPrintStr (QL_formatter_t *formatter,const char *name,const char *value) {
  QLFormatterPrintIndentation(formatter);
  printf("%s: %s\n",name,value);
}


////////////////////////////////////////////////////////////////////////////////
/// @brief Recursively dump an AST
////////////////////////////////////////////////////////////////////////////////

void QLFormatterDump (QL_ast_node_t *node, QL_formatter_t *formatter,const int blockBehaviour) {
  const char *name;
  QL_ast_node_type_e  type;
  QL_ast_node_t       *lhs;
  QL_ast_node_t       *rhs;
  QL_ast_node_t       *next;

  if (node == 0) {
    return;
  }

  type   = node->_type;
  name   = QLAstNodeGetName(type);

  if (type == QLNodeContainerList || QLAstNodeGetTypeGroup(type) == QLNodeGroupJoin) {
    next   = node->_next;
    QLFormatterPrintBlockStart(formatter,name);
    QLFormatterIndentationInc(formatter);
    while (next) {
      QLFormatterDump(next,formatter,1);
      next = next->_next;
    }
    QLFormatterIndentationDec(formatter);
    QLFormatterPrintBlockEnd(formatter,"");
    return;
  }

  QLFormatterPrintBlockStart(formatter,name);
  QLFormatterIndentationInc(formatter);
  
  if (type == QLNodeValueString || type ==QLNodeValueNumberDoubleString || 
      type == QLNodeValueIdentifier || type == QLNodeValueParameterNamed) { 
    QLFormatterPrintStr(formatter,"value",node->_value._stringValue);
  } else if (type == QLNodeValueNumberInt) { 
    QLFormatterPrintInt(formatter,"value",node->_value._intValue);
  } else if (type == QLNodeValueNumberDouble) { 
    QLFormatterPrintDouble(formatter,"value",node->_value._doubleValue);
  } else if (type == QLNodeValueBool) {
    QLFormatterPrintStr(formatter,"value",node->_value._boolValue ? "true" : "false");
  } else if (type == QLNodeValueOrderDirection) {
    QLFormatterPrintStr(formatter,"value",node->_value._boolValue ? "asc" : "desc");
  } else if (type == QLNodeValueParameterNumeric) {
    QLFormatterPrintInt(formatter,"value",node->_value._intValue);
  }

  lhs    = node->_lhs;
  if (lhs != 0) {
    QLFormatterDump(lhs,formatter,0);
  }

  rhs    = node->_rhs;
  if (rhs != 0) { 
    QLFormatterDump(rhs,formatter,0);
  }

  QLFormatterIndentationDec(formatter);
  QLFormatterPrintBlockEnd(formatter,"");
}


// Local Variables:
// mode: outline-minor
// outline-regexp: "^\\(/// @brief\\|/// {@inheritDoc}\\|/// @addtogroup\\|// --SECTION--\\|/// @\\}\\)"
// End: