source: icGREP/icgrep-devel/icgrep/printer_pablos.cpp @ 4206

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

Minor clean-up

File size: 4.5 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/pe_pabloe.h>
20#include <pablo/ps_pablos.h>
21#include <pablo/pe_advance.h>
22#include <pablo/pe_all.h>
23#include <pablo/pe_and.h>
24#include <pablo/pe_call.h>
25#include <pablo/pe_charclass.h>
26#include <pablo/pe_matchstar.h>
27#include <pablo/pe_not.h>
28#include <pablo/pe_or.h>
29#include <pablo/pe_scanthru.h>
30#include <pablo/pe_sel.h>
31#include <pablo/pe_var.h>
32#include <pablo/pe_xor.h>
33#include <pablo/ps_pablos.h>
34#include <pablo/ps_assign.h>
35#include <pablo/ps_if.h>
36#include <pablo/ps_while.h>
37
38using namespace re;
39using namespace pablo;
40
41std::string StatementPrinter::PrintStmts(const CodeGenState & cg_state)
42{
43    std::string strOut = "[";
44
45    strOut = strOut.substr(0, strOut.length() - 1);
46    strOut += "],[";
47
48    strOut = Print_PB_PabloStmts(cg_state.stmtsl, strOut);
49
50    strOut = strOut.substr(0, strOut.length() - 1);
51    strOut += "],";
52
53    //Print the name of the variable that holds the match result for the overall expression so far.
54    strOut += "'" + cg_state.newsym + "'";
55
56    return strOut;
57}
58
59std::string StatementPrinter::Print_PB_PabloStmts(const List &stmts, std::string strOut) {
60    for (const auto stmt : stmts) {
61        strOut += ShowPabloS(stmt);
62    }
63    return strOut;
64}
65
66std::string StatementPrinter::Print_CC_PabloStmts(const List & stmts) {
67    std::string strOut = "Total Statements: " + std::to_string(stmts.size()) + "\n";
68    for (const auto stmt : stmts) {
69        strOut += ShowPabloS(stmt) + "\n";
70    }
71    return strOut;
72}
73
74std::string StatementPrinter::ShowPabloS(const PabloE * stmt)
75{
76    std::string retVal = "";
77
78    if (const Assign * an = dyn_cast<const Assign>(stmt))
79    {
80        retVal = "Assign('" + an->getM() + "', " + ShowPabloE(an->getExpr()) + "),";
81    }
82    else if (const If * ifstmt = dyn_cast<const If>(stmt))
83    {
84        retVal = "If(" + ShowPabloE(ifstmt->getExpr()) + ", " + Print_PB_PabloStmts(ifstmt->getPSList(), retVal) + ")";
85    }
86    else if (const While * whl = dyn_cast<const While>(stmt))
87    {
88        retVal = "While(" + ShowPabloE(whl->getExpr()) + ", " + Print_PB_PabloStmts(whl->getPSList(), retVal) + ")";
89    }
90    else retVal = "UNKNOWN_STATEMENT_TYPE!!!";
91    return retVal;
92}
93
94std::string StatementPrinter::ShowPabloE(const PabloE *expr)
95{
96    std::string retVal = "";
97
98    if (const All * all = dyn_cast<const All>(expr))
99    {
100        retVal = "All " + std::to_string(all->getValue()) + " ";
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->getVar() + "' ";
109    }
110    else if (const And * pablo_and = dyn_cast<const And>(expr))
111    {
112        retVal = "And(" + ShowPabloE(pablo_and->getExpr1()) +", " + ShowPabloE(pablo_and->getExpr2()) + ")";
113    }
114    else if (const Or * pablo_or = dyn_cast<const Or>(expr))
115    {
116        retVal = "Or(" + ShowPabloE(pablo_or->getExpr1()) + ", " + ShowPabloE(pablo_or->getExpr2()) + ")";
117    }
118    else if (const Sel * pablo_sel = dyn_cast<const Sel>(expr))
119    {
120        retVal = "((" + ShowPabloE(pablo_sel->getIf_expr()) + "And " + ShowPabloE(pablo_sel->getT_expr()) +
121                ")|(Not(" + ShowPabloE(pablo_sel->getIf_expr()) + ") And " + ShowPabloE(pablo_sel->getF_expr()) + ")";
122    }
123    else if (const Not * pablo_not = dyn_cast<const Not>(expr))
124    {
125        retVal = "Not (" + ShowPabloE(pablo_not->getExpr()) + ")";
126    }
127    else if (const CharClass * cc = dyn_cast<const CharClass>(expr))
128    {
129        retVal = "CharClass '" + cc->getCharClass() + "'";
130    }
131    else if (const Advance * adv = dyn_cast<const Advance>(expr))
132    {
133        retVal = "Advance(" + ShowPabloE(adv->getExpr()) + ")";
134    }
135    else if (const MatchStar * mstar = dyn_cast<const MatchStar>(expr))
136    {
137        retVal = "MatchStar (" + ShowPabloE(mstar->getExpr1()) + ", " + ShowPabloE(mstar->getExpr2()) + ")";
138    }
139    else if (const ScanThru * sthru = dyn_cast<const ScanThru>(expr))
140    {
141        retVal = "ScanThru (" + ShowPabloE(sthru->getScanFrom()) + ", " + ShowPabloE(sthru->getScanThru()) + ")";
142    }
143    else retVal = "UNKNOWN_Pablo_EXPRESSION_TYPE!!!";
144
145    return retVal;
146}
147
148
Note: See TracBrowser for help on using the repository browser.