mirror of
https://github.com/YosysHQ/yosys
synced 2025-07-24 13:18:56 +00:00
Added Verilog/AST support for DPI functions (dpi_call() still unimplemented)
This commit is contained in:
parent
38addd4c67
commit
7bfc4ae120
8 changed files with 135 additions and 3 deletions
|
@ -2,4 +2,5 @@
|
|||
OBJS += frontends/ast/ast.o
|
||||
OBJS += frontends/ast/simplify.o
|
||||
OBJS += frontends/ast/genrtlil.o
|
||||
OBJS += frontends/ast/dpicall.o
|
||||
|
||||
|
|
|
@ -68,6 +68,7 @@ std::string AST::type2str(AstNodeType type)
|
|||
X(AST_MODULE)
|
||||
X(AST_TASK)
|
||||
X(AST_FUNCTION)
|
||||
X(AST_DPI_FUNCTION)
|
||||
X(AST_WIRE)
|
||||
X(AST_MEMORY)
|
||||
X(AST_AUTOWIRE)
|
||||
|
|
|
@ -46,6 +46,7 @@ namespace AST
|
|||
AST_MODULE,
|
||||
AST_TASK,
|
||||
AST_FUNCTION,
|
||||
AST_DPI_FUNCTION,
|
||||
|
||||
AST_WIRE,
|
||||
AST_MEMORY,
|
||||
|
@ -278,6 +279,9 @@ namespace AST
|
|||
// set set_line_num and get_line_num to internal dummy functions (done by simplify() and AstModule::derive
|
||||
// to control the filename and linenum properties of new nodes not generated by a frontend parser)
|
||||
void use_internal_line_num();
|
||||
|
||||
// call a DPI function
|
||||
AstNode *dpi_call(const std::string &rtype, const std::string &fname, const std::vector<std::string> &argtypes, const std::vector<AstNode*> &args);
|
||||
}
|
||||
|
||||
namespace AST_INTERNAL
|
||||
|
|
44
frontends/ast/dpicall.cc
Normal file
44
frontends/ast/dpicall.cc
Normal file
|
@ -0,0 +1,44 @@
|
|||
/*
|
||||
* yosys -- Yosys Open SYnthesis Suite
|
||||
*
|
||||
* Copyright (C) 2012 Clifford Wolf <clifford@clifford.at>
|
||||
*
|
||||
* Permission to use, copy, modify, and/or distribute this software for any
|
||||
* purpose with or without fee is hereby granted, provided that the above
|
||||
* copyright notice and this permission notice appear in all copies.
|
||||
*
|
||||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
|
||||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
|
||||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
|
||||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
|
||||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
|
||||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
|
||||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
||||
*
|
||||
*/
|
||||
|
||||
#include "ast.h"
|
||||
|
||||
AST::AstNode *AST::dpi_call(const std::string &rtype, const std::string &fname, const std::vector<std::string> &argtypes, const std::vector<AstNode*> &args)
|
||||
{
|
||||
AST::AstNode *newNode = nullptr;
|
||||
|
||||
log("Calling DPI function `%s' and returning `%s':\n", fname.c_str(), rtype.c_str());
|
||||
|
||||
log_assert(SIZE(args) == SIZE(argtypes));
|
||||
for (int i = 0; i < SIZE(args); i++)
|
||||
if (argtypes[i] == "real" || argtypes[i] == "shortreal")
|
||||
log(" arg %d (%s): %f\n", i, argtypes[i].c_str(), args[i]->asReal(args[i]->is_signed));
|
||||
else
|
||||
log(" arg %d (%s): %d\n", i, argtypes[i].c_str(), args[i]->bitsAsConst().as_int());
|
||||
|
||||
if (rtype == "real" || rtype == "shortreal") {
|
||||
newNode = new AstNode(AST_REALVALUE);
|
||||
newNode->realvalue = 1234;
|
||||
} else {
|
||||
newNode = AstNode::mkconst_int(1234, false);
|
||||
}
|
||||
|
||||
return newNode;
|
||||
}
|
||||
|
|
@ -753,6 +753,7 @@ RTLIL::SigSpec AstNode::genRTLIL(int width_hint, bool sign_hint)
|
|||
// and are only accessed here thru this references
|
||||
case AST_TASK:
|
||||
case AST_FUNCTION:
|
||||
case AST_DPI_FUNCTION:
|
||||
case AST_AUTOWIRE:
|
||||
case AST_LOCALPARAM:
|
||||
case AST_DEFPARAM:
|
||||
|
|
|
@ -226,7 +226,7 @@ bool AstNode::simplify(bool const_fold, bool at_zero, bool in_lvalue, int stage,
|
|||
this_wire_scope[node->str] = node;
|
||||
}
|
||||
if (node->type == AST_PARAMETER || node->type == AST_LOCALPARAM || node->type == AST_WIRE || node->type == AST_AUTOWIRE || node->type == AST_GENVAR ||
|
||||
node->type == AST_MEMORY || node->type == AST_FUNCTION || node->type == AST_TASK || node->type == AST_CELL) {
|
||||
node->type == AST_MEMORY || node->type == AST_FUNCTION || node->type == AST_TASK || node->type == AST_DPI_FUNCTION || node->type == AST_CELL) {
|
||||
backup_scope[node->str] = current_scope[node->str];
|
||||
current_scope[node->str] = node;
|
||||
}
|
||||
|
@ -646,7 +646,7 @@ bool AstNode::simplify(bool const_fold, bool at_zero, bool in_lvalue, int stage,
|
|||
if (current_scope.count(str) == 0) {
|
||||
for (auto node : current_ast_mod->children) {
|
||||
if ((node->type == AST_PARAMETER || node->type == AST_LOCALPARAM || node->type == AST_WIRE || node->type == AST_AUTOWIRE || node->type == AST_GENVAR ||
|
||||
node->type == AST_MEMORY || node->type == AST_FUNCTION || node->type == AST_TASK) && str == node->str) {
|
||||
node->type == AST_MEMORY || node->type == AST_FUNCTION || node->type == AST_TASK || node->type == AST_DPI_FUNCTION) && str == node->str) {
|
||||
current_scope[node->str] = node;
|
||||
break;
|
||||
}
|
||||
|
@ -1442,6 +1442,34 @@ skip_dynamic_range_lvalue_expansion:;
|
|||
goto apply_newNode;
|
||||
}
|
||||
|
||||
if (current_scope.count(str) != 0 && current_scope[str]->type == AST_DPI_FUNCTION)
|
||||
{
|
||||
AstNode *dpi_decl = current_scope[str];
|
||||
|
||||
std::string rtype, fname;
|
||||
std::vector<std::string> argtypes;
|
||||
std::vector<AstNode*> args;
|
||||
|
||||
rtype = RTLIL::unescape_id(dpi_decl->children.at(0)->str);
|
||||
fname = RTLIL::unescape_id(dpi_decl->str);
|
||||
|
||||
for (int i = 1; i < SIZE(dpi_decl->children); i++)
|
||||
{
|
||||
if (i-1 >= SIZE(children))
|
||||
log_error("Insufficient number of arguments in DPI function call at %s:%d.\n", filename.c_str(), linenum);
|
||||
|
||||
argtypes.push_back(RTLIL::unescape_id(dpi_decl->children.at(i)->str));
|
||||
args.push_back(children.at(i-1)->clone());
|
||||
while (args.back()->simplify(true, false, false, stage, -1, false, true)) { }
|
||||
|
||||
if (args.back()->type != AST_CONSTANT && args.back()->type != AST_REALVALUE)
|
||||
log_error("Failed to evaluate DPI function with non-constant argument at %s:%d.\n", filename.c_str(), linenum);
|
||||
}
|
||||
|
||||
newNode = dpi_call(rtype, fname, argtypes, args);
|
||||
goto apply_newNode;
|
||||
}
|
||||
|
||||
if (current_scope.count(str) == 0 || current_scope[str]->type != AST_FUNCTION)
|
||||
log_error("Can't resolve function name `%s' at %s:%d.\n", str.c_str(), filename.c_str(), linenum);
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue