2024-10-31 07:03:33 +00:00
|
|
|
/*
|
|
|
|
This file is part of TON Blockchain Library.
|
|
|
|
|
|
|
|
TON Blockchain Library is free software: you can redistribute it and/or modify
|
|
|
|
it under the terms of the GNU Lesser General Public License as published by
|
|
|
|
the Free Software Foundation, either version 2 of the License, or
|
|
|
|
(at your option) any later version.
|
|
|
|
|
|
|
|
TON Blockchain Library is distributed in the hope that it will be useful,
|
|
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
GNU Lesser General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
|
|
along with TON Blockchain Library. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
*/
|
|
|
|
#pragma once
|
|
|
|
|
|
|
|
#ifdef TOLK_DEBUG
|
|
|
|
|
|
|
|
#include "ast.h"
|
|
|
|
#include "ast-visitor.h"
|
|
|
|
#include <sstream>
|
|
|
|
|
|
|
|
/*
|
|
|
|
* ASTStringifier is used to print out the whole vertex tree in a human-readable format.
|
|
|
|
* To stringify any vertex, call v->debug_print(), which uses this class.
|
|
|
|
*/
|
|
|
|
|
|
|
|
namespace tolk {
|
|
|
|
|
|
|
|
class ASTStringifier final : public ASTVisitor {
|
|
|
|
constexpr static std::pair<ASTNodeType, const char*> name_pairs[] = {
|
|
|
|
{ast_empty, "ast_empty"},
|
|
|
|
{ast_identifier, "ast_identifier"},
|
|
|
|
{ast_int_const, "ast_int_const"},
|
|
|
|
{ast_string_const, "ast_string_const"},
|
|
|
|
{ast_bool_const, "ast_bool_const"},
|
|
|
|
{ast_nil_tuple, "ast_nil_tuple"},
|
|
|
|
{ast_function_call, "ast_function_call"},
|
|
|
|
{ast_parenthesized_expr, "ast_parenthesized_expr"},
|
|
|
|
{ast_global_var_declaration, "ast_global_var_declaration"},
|
|
|
|
{ast_global_var_declaration_list, "ast_global_var_declaration_list"},
|
|
|
|
{ast_constant_declaration, "ast_constant_declaration"},
|
|
|
|
{ast_constant_declaration_list, "ast_constant_declaration_list"},
|
|
|
|
{ast_underscore, "ast_underscore"},
|
|
|
|
{ast_type_expression, "ast_type_expression"},
|
|
|
|
{ast_variable_declaration, "ast_variable_declaration"},
|
|
|
|
{ast_tensor, "ast_tensor"},
|
|
|
|
{ast_tensor_square, "ast_tensor_square"},
|
|
|
|
{ast_dot_tilde_call, "ast_dot_tilde_call"},
|
|
|
|
{ast_unary_operator, "ast_unary_operator"},
|
|
|
|
{ast_binary_operator, "ast_binary_operator"},
|
|
|
|
{ast_ternary_operator, "ast_ternary_operator"},
|
|
|
|
{ast_return_statement, "ast_return_statement"},
|
|
|
|
{ast_sequence, "ast_sequence"},
|
|
|
|
{ast_repeat_statement, "ast_repeat_statement"},
|
|
|
|
{ast_while_statement, "ast_while_statement"},
|
|
|
|
{ast_do_until_statement, "ast_do_until_statement"},
|
|
|
|
{ast_try_catch_statement, "ast_try_catch_statement"},
|
|
|
|
{ast_if_statement, "ast_if_statement"},
|
|
|
|
{ast_forall_item, "ast_forall_item"},
|
|
|
|
{ast_forall_list, "ast_forall_list"},
|
|
|
|
{ast_argument, "ast_argument"},
|
|
|
|
{ast_argument_list, "ast_argument_list"},
|
|
|
|
{ast_asm_body, "ast_asm_body"},
|
|
|
|
{ast_function_declaration, "ast_function_declaration"},
|
|
|
|
{ast_pragma_no_arg, "ast_pragma_no_arg"},
|
|
|
|
{ast_pragma_version, "ast_pragma_version"},
|
|
|
|
{ast_include_statement, "ast_include_statement"},
|
|
|
|
{ast_tolk_file, "ast_tolk_file"},
|
|
|
|
};
|
|
|
|
|
|
|
|
template<ASTNodeType node_type>
|
|
|
|
constexpr static const char* ast_node_type_to_string() {
|
|
|
|
static_assert(std::size(name_pairs) == ast_tolk_file + 1, "name_pairs needs to be updated");
|
|
|
|
return name_pairs[node_type].second;
|
|
|
|
}
|
|
|
|
|
|
|
|
int depth = 0;
|
|
|
|
std::string out;
|
|
|
|
bool colored = false;
|
|
|
|
|
|
|
|
template<ASTNodeType node_type>
|
|
|
|
void handle_vertex(V<node_type> v) {
|
|
|
|
out += std::string(depth * 2, ' ');
|
|
|
|
out += ast_node_type_to_string<node_type>();
|
|
|
|
if (std::string postfix = specific_str(v); !postfix.empty()) {
|
|
|
|
out += colored ? " \x1b[34m" : " // ";
|
|
|
|
out += postfix;
|
|
|
|
out += colored ? "\x1b[0m" : "";
|
|
|
|
}
|
|
|
|
out += '\n';
|
|
|
|
depth++;
|
|
|
|
visit_children(v);
|
|
|
|
depth--;
|
|
|
|
}
|
|
|
|
|
2024-10-31 07:04:58 +00:00
|
|
|
static std::string specific_str(AnyV v) {
|
|
|
|
switch (v->type) {
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_identifier:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_identifier>()->name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_int_const:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_int_const>()->int_val);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_string_const:
|
2024-10-31 07:04:58 +00:00
|
|
|
if (char modifier = v->as<ast_string_const>()->modifier) {
|
|
|
|
return "\"" + static_cast<std::string>(v->as<ast_string_const>()->str_val) + "\"" + std::string(1, modifier);
|
2024-10-31 07:03:33 +00:00
|
|
|
} else {
|
2024-10-31 07:04:58 +00:00
|
|
|
return "\"" + static_cast<std::string>(v->as<ast_string_const>()->str_val) + "\"";
|
2024-10-31 07:03:33 +00:00
|
|
|
}
|
2024-10-31 07:04:58 +00:00
|
|
|
case ast_function_call: {
|
|
|
|
if (auto v_lhs = v->as<ast_function_call>()->get_called_f()->try_as<ast_identifier>()) {
|
|
|
|
return static_cast<std::string>(v_lhs->name) + "()";
|
|
|
|
}
|
|
|
|
return {};
|
|
|
|
}
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_global_var_declaration:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_global_var_declaration>()->get_identifier()->name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_constant_declaration:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_constant_declaration>()->get_identifier()->name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_type_expression: {
|
|
|
|
std::ostringstream os;
|
2024-10-31 07:04:58 +00:00
|
|
|
os << v->as<ast_type_expression>()->declared_type;
|
2024-10-31 07:03:33 +00:00
|
|
|
return os.str();
|
|
|
|
}
|
|
|
|
case ast_variable_declaration: {
|
|
|
|
std::ostringstream os;
|
2024-10-31 07:04:58 +00:00
|
|
|
os << v->as<ast_variable_declaration>()->declared_type;
|
2024-10-31 07:03:33 +00:00
|
|
|
return os.str();
|
|
|
|
}
|
|
|
|
case ast_dot_tilde_call:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_dot_tilde_call>()->method_name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_unary_operator:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_unary_operator>()->operator_name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_binary_operator:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_binary_operator>()->operator_name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_sequence:
|
2024-10-31 07:04:58 +00:00
|
|
|
return "↓" + std::to_string(v->as<ast_sequence>()->get_items().size());
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_if_statement:
|
2024-10-31 07:04:58 +00:00
|
|
|
return v->as<ast_if_statement>()->is_ifnot ? "ifnot" : "";
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_argument: {
|
|
|
|
std::ostringstream os;
|
2024-10-31 07:04:58 +00:00
|
|
|
os << v->as<ast_argument>()->arg_type;
|
|
|
|
return static_cast<std::string>(v->as<ast_argument>()->get_identifier()->name) + ": " + os.str();
|
2024-10-31 07:03:33 +00:00
|
|
|
}
|
|
|
|
case ast_function_declaration: {
|
|
|
|
std::string arg_names;
|
2024-10-31 07:04:58 +00:00
|
|
|
for (int i = 0; i < v->as<ast_function_declaration>()->get_num_args(); i++) {
|
2024-10-31 07:03:33 +00:00
|
|
|
if (!arg_names.empty())
|
|
|
|
arg_names += ",";
|
2024-10-31 07:04:58 +00:00
|
|
|
arg_names += v->as<ast_function_declaration>()->get_arg(i)->get_identifier()->name;
|
2024-10-31 07:03:33 +00:00
|
|
|
}
|
2024-10-31 07:04:58 +00:00
|
|
|
return "fun " + static_cast<std::string>(v->as<ast_function_declaration>()->get_identifier()->name) + "(" + arg_names + ")";
|
2024-10-31 07:03:33 +00:00
|
|
|
}
|
|
|
|
case ast_pragma_no_arg:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_pragma_no_arg>()->pragma_name);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_pragma_version:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_pragma_version>()->semver);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_include_statement:
|
2024-10-31 07:04:58 +00:00
|
|
|
return static_cast<std::string>(v->as<ast_include_statement>()->get_file_leaf()->str_val);
|
2024-10-31 07:03:33 +00:00
|
|
|
case ast_tolk_file:
|
2024-10-31 07:04:58 +00:00
|
|
|
return v->as<ast_tolk_file>()->file->rel_filename;
|
2024-10-31 07:03:33 +00:00
|
|
|
default:
|
|
|
|
return {};
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
public:
|
|
|
|
explicit ASTStringifier(bool colored) : colored(colored) {
|
|
|
|
}
|
|
|
|
|
|
|
|
std::string to_string_with_children(AnyV v) {
|
|
|
|
out.clear();
|
|
|
|
visit(v);
|
|
|
|
return std::move(out);
|
|
|
|
}
|
|
|
|
|
|
|
|
static std::string to_string_without_children(AnyV v) {
|
|
|
|
std::string result = ast_node_type_to_string(v->type);
|
|
|
|
if (std::string postfix = specific_str(v); !postfix.empty()) {
|
|
|
|
result += ' ';
|
|
|
|
result += specific_str(v);
|
|
|
|
}
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
static const char* ast_node_type_to_string(ASTNodeType node_type) {
|
|
|
|
return name_pairs[node_type].second;
|
|
|
|
}
|
|
|
|
|
|
|
|
void visit(AnyV v) override {
|
|
|
|
switch (v->type) {
|
|
|
|
case ast_empty: return handle_vertex(v->as<ast_empty>());
|
|
|
|
case ast_identifier: return handle_vertex(v->as<ast_identifier>());
|
|
|
|
case ast_int_const: return handle_vertex(v->as<ast_int_const>());
|
|
|
|
case ast_string_const: return handle_vertex(v->as<ast_string_const>());
|
|
|
|
case ast_bool_const: return handle_vertex(v->as<ast_bool_const>());
|
|
|
|
case ast_nil_tuple: return handle_vertex(v->as<ast_nil_tuple>());
|
|
|
|
case ast_function_call: return handle_vertex(v->as<ast_function_call>());
|
|
|
|
case ast_parenthesized_expr: return handle_vertex(v->as<ast_parenthesized_expr>());
|
|
|
|
case ast_global_var_declaration: return handle_vertex(v->as<ast_global_var_declaration>());
|
|
|
|
case ast_global_var_declaration_list: return handle_vertex(v->as<ast_global_var_declaration_list>());
|
|
|
|
case ast_constant_declaration: return handle_vertex(v->as<ast_constant_declaration>());
|
|
|
|
case ast_constant_declaration_list: return handle_vertex(v->as<ast_constant_declaration_list>());
|
|
|
|
case ast_underscore: return handle_vertex(v->as<ast_underscore>());
|
|
|
|
case ast_type_expression: return handle_vertex(v->as<ast_type_expression>());
|
|
|
|
case ast_variable_declaration: return handle_vertex(v->as<ast_variable_declaration>());
|
|
|
|
case ast_tensor: return handle_vertex(v->as<ast_tensor>());
|
|
|
|
case ast_tensor_square: return handle_vertex(v->as<ast_tensor_square>());
|
|
|
|
case ast_dot_tilde_call: return handle_vertex(v->as<ast_dot_tilde_call>());
|
|
|
|
case ast_unary_operator: return handle_vertex(v->as<ast_unary_operator>());
|
|
|
|
case ast_binary_operator: return handle_vertex(v->as<ast_binary_operator>());
|
|
|
|
case ast_ternary_operator: return handle_vertex(v->as<ast_ternary_operator>());
|
|
|
|
case ast_return_statement: return handle_vertex(v->as<ast_return_statement>());
|
|
|
|
case ast_sequence: return handle_vertex(v->as<ast_sequence>());
|
|
|
|
case ast_repeat_statement: return handle_vertex(v->as<ast_repeat_statement>());
|
|
|
|
case ast_while_statement: return handle_vertex(v->as<ast_while_statement>());
|
|
|
|
case ast_do_until_statement: return handle_vertex(v->as<ast_do_until_statement>());
|
|
|
|
case ast_try_catch_statement: return handle_vertex(v->as<ast_try_catch_statement>());
|
|
|
|
case ast_if_statement: return handle_vertex(v->as<ast_if_statement>());
|
|
|
|
case ast_forall_item: return handle_vertex(v->as<ast_forall_item>());
|
|
|
|
case ast_forall_list: return handle_vertex(v->as<ast_forall_list>());
|
|
|
|
case ast_argument: return handle_vertex(v->as<ast_argument>());
|
|
|
|
case ast_argument_list: return handle_vertex(v->as<ast_argument_list>());
|
|
|
|
case ast_asm_body: return handle_vertex(v->as<ast_asm_body>());
|
|
|
|
case ast_function_declaration: return handle_vertex(v->as<ast_function_declaration>());
|
|
|
|
case ast_pragma_no_arg: return handle_vertex(v->as<ast_pragma_no_arg>());
|
|
|
|
case ast_pragma_version: return handle_vertex(v->as<ast_pragma_version>());
|
|
|
|
case ast_include_statement: return handle_vertex(v->as<ast_include_statement>());
|
|
|
|
case ast_tolk_file: return handle_vertex(v->as<ast_tolk_file>());
|
|
|
|
default:
|
|
|
|
throw UnexpectedASTNodeType(v, "ASTStringifier::visit");
|
|
|
|
}
|
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
} // namespace tolk
|
|
|
|
|
|
|
|
#endif // TOLK_DEBUG
|