source: icGREP/icgrep-devel/icgrep/pablo/printer_pablos.cpp @ 4249

Last change on this file since 4249 was 4249, checked in by nmedfort, 5 years ago

Big update to use CC_NameMap; removed CharClass? and RE_Reducer.

File size: 4.3 KB
Line 
1/*
2 *  Copyright (c) 2014 International Characters.
3 *  This software is licensed to the public under the Open Software License 3.0.
4 *  icgrep is a trademark of International Characters.
5 */
6
7#include "printer_pablos.h"
8
9
10//Regular Expressions
11#include <re/re_re.h>
12#include <re/re_cc.h>
13#include <re/re_start.h>
14#include <re/re_end.h>
15#include <re/re_seq.h>
16#include <re/re_name.h>
17
18//Pablo Expressions
19#include <pablo/pabloAST.h>
20#include <pablo/pe_advance.h>
21#include <pablo/pe_and.h>
22#include <pablo/pe_call.h>
23#include <pablo/pe_matchstar.h>
24#include <pablo/pe_not.h>
25#include <pablo/pe_or.h>
26#include <pablo/pe_scanthru.h>
27#include <pablo/pe_sel.h>
28#include <pablo/pe_var.h>
29#include <pablo/pe_xor.h>
30#include <pablo/ps_assign.h>
31#include <pablo/ps_if.h>
32#include <pablo/ps_while.h>
33#include <pablo/pe_zeroes.h>
34#include <pablo/pe_ones.h>
35#include <pablo/codegenstate.h>
36
37using namespace re;
38using namespace pablo;
39
40std::string StatementPrinter::PrintStmts(const PabloBlock & cg_state)
41{
42    std::string strOut = "[";
43
44    strOut = strOut.substr(0, strOut.length() - 1);
45    strOut += "],[";
46
47    strOut = Print_PB_PabloStmts(cg_state.expressions(), strOut);
48
49    strOut = strOut.substr(0, strOut.length() - 1);
50    strOut += "]";
51
52    return strOut;
53}
54
55std::string StatementPrinter::Print_PB_PabloStmts(const ExpressionList & stmts, std::string strOut) {
56    for (const auto stmt : stmts) {
57        strOut += ShowPabloS(stmt);
58    }
59    return strOut;
60}
61
62std::string StatementPrinter::Print_CC_PabloStmts(const pablo::ExpressionList &stmts) {
63    std::string strOut = "Total Statements: " + std::to_string(stmts.size()) + "\n";
64    for (const auto stmt : stmts) {
65        strOut += ShowPabloS(stmt) + "\n";
66    }
67    return strOut;
68}
69
70std::string StatementPrinter::ShowPabloS(const PabloAST * stmt)
71{
72    std::string retVal = "";
73
74    if (const Assign * an = dyn_cast<const Assign>(stmt))
75    {
76        retVal = "Assign('" + an->getName() + "', " + ShowPabloAST(an->getExpr()) + "),";
77    }
78    else if (const If * ifstmt = dyn_cast<const If>(stmt))
79    {
80        retVal = "If(" + ShowPabloAST(ifstmt->getCondition()) + ", " + Print_PB_PabloStmts(ifstmt->getBody(), retVal) + ")";
81    }
82    else if (const While * whl = dyn_cast<const While>(stmt))
83    {
84        retVal = "While(" + ShowPabloAST(whl->getCondition()) + ", " + Print_PB_PabloStmts(whl->getBody(), retVal) + ")";
85    }
86    else retVal = "UNKNOWN_STATEMENT_TYPE!!!";
87    return retVal;
88}
89
90std::string StatementPrinter::ShowPabloAST(const PabloAST *expr)
91{
92    std::string retVal = "";
93
94    if (isa<const Zeroes>(expr))
95    {
96        retVal = "Zeroes";
97    }
98    else if (isa<const Ones>(expr))
99    {
100        retVal = "Ones";
101    }
102    else if (const Call * pablo_call = dyn_cast<const Call>(expr))
103    {
104        retVal = "Call '" + pablo_call->getCallee() + "'";
105    }
106    else if (const Var * pablo_var = dyn_cast<const Var>(expr))
107    {
108        retVal = "Var '" + pablo_var->getName() + "' ";
109    }
110    else if (const And * pablo_and = dyn_cast<const And>(expr))
111    {
112        retVal = "And(" + ShowPabloAST(pablo_and->getExpr1()) +", " + ShowPabloAST(pablo_and->getExpr2()) + ")";
113    }
114    else if (const Or * pablo_or = dyn_cast<const Or>(expr))
115    {
116        retVal = "Or(" + ShowPabloAST(pablo_or->getExpr1()) + ", " + ShowPabloAST(pablo_or->getExpr2()) + ")";
117    }
118    else if (const Sel * pablo_sel = dyn_cast<const Sel>(expr))
119    {
120        retVal = "((" + ShowPabloAST(pablo_sel->getCondition()) + "And " + ShowPabloAST(pablo_sel->getTrueExpr()) +
121                ")|(Not(" + ShowPabloAST(pablo_sel->getCondition()) + ") And " + ShowPabloAST(pablo_sel->getFalseExpr()) + ")";
122    }
123    else if (const Not * pablo_not = dyn_cast<const Not>(expr))
124    {
125        retVal = "Not (" + ShowPabloAST(pablo_not->getExpr()) + ")";
126    }
127    else if (const Advance * adv = dyn_cast<const Advance>(expr))
128    {
129        retVal = "Advance(" + ShowPabloAST(adv->getExpr()) + ")";
130    }
131    else if (const MatchStar * mstar = dyn_cast<const MatchStar>(expr))
132    {
133        retVal = "MatchStar (" + ShowPabloAST(mstar->getExpr1()) + ", " + ShowPabloAST(mstar->getExpr2()) + ")";
134    }
135    else if (const ScanThru * sthru = dyn_cast<const ScanThru>(expr))
136    {
137        retVal = "ScanThru (" + ShowPabloAST(sthru->getScanFrom()) + ", " + ShowPabloAST(sthru->getScanThru()) + ")";
138    }
139    else retVal = "UNKNOWN_Pablo_EXPRESSION_TYPE!!!";
140
141    return retVal;
142}
143
144
Note: See TracBrowser for help on using the repository browser.