#include <VCG.h>

Public Member Functions
	VCG ()
	Standard Constructor for Main VCG class.

	~VCG ()
	Standard Destructor for Main VCG class.

void	MakeGraph (const PNode *node)

void	PrintGraph ()

void	Evaluate (const PNode node, const char parent, const int anchor)

Detailed Description

Definition at line 43 of file VCG.h.

Constructor & Destructor Documentation

◆ VCG()

VCG::VCG ( )

Standard Constructor for Main VCG class.

Definition at line 50 of file VCG.cpp.

        :
    mNodeIndex((int)0),
    mHeader(strdup("/*PEBL VGC-Tool Graph for selected program.\n (C) 2003 Shane T. Mueller, Ph.D.*/\n"))
{
    mGraph = new VCGGraph();
}

◆ ~VCG()

VCG::~VCG ( )

Standard Destructor for Main VCG class.

Definition at line 59 of file VCG.cpp.

{
    free(mHeader);
    delete mGraph;
}

Member Function Documentation

◆ Evaluate()

void VCG::Evaluate	(	const PNode *	node,
		const char *	parent,
		const int	anchor
	)

Definition at line 82 of file VCG.cpp.

{
 
    
    //First, generate a unique name for the node
    char * name;
    ostrstream ost1;
    ost1 << "NODE-" << mNodeIndex++;
    ost1.put(0);  //null terminate the ostring-stream
    name = strdup(ost1.str());
    
 
    //Now determine what type of node it is, and what
    //value resides within it.
 
    //Start making a label; use an ostrstream for easy concatenation
 
    ostrstream ost2;
    Variant variant;
  
    switch(node->GetType())
        {
        case PEBL_OP_NODE:
 
            ost2 << "OpNode\\n" << ((OpNode*)node)->GetOpName();
            break;
 
        case PEBL_DATA_NODE:
            
            //retrieve tha vlaue from tha data node
            variant = ((DataNode*)node)->GetValue();
 
            ost2 << variant.GetDataTypeName() << "\\n" << variant;
    
            break;
        
        default:
            ost2 << "Unknown Node Type\\nUnknown Value";
            
        }
 
    //Null-terminate the label stream and make it into a char array
    ost2.put(0);
    char* label = strdup(ost2.str());
 
    //Now, create a new node with all the right trimmings.
    cerr << "About to make node with:  ["<< name << "] and [" << label << "]." << endl;
 
    VCGNode * tmpNode=new VCGNode(name, label);
 
    //Change the shape and color of the node if it is an OpNode
    if(node->GetType() == PEBL_OP_NODE)
        {
            tmpNode->SetShape("ellipse");
            tmpNode->SetBorderColor("red");
        }
    else if(node->GetType() == PEBL_DATA_NODE)
        {
            tmpNode->SetShape("box");
            tmpNode->SetBorderColor("black");
      
        }
    else
        {
            tmpNode->SetShape("rhomb");
            tmpNode->SetBorderColor("orange");
            
        }
 
 
    mGraph->AddNode(tmpNode);
 
 
    //Now, add an edge from this node's parent to the current node
    if(parent)
        {
            VCGEdge * tmpEdge = new VCGEdge(parent,name);
            tmpEdge->SetAnchor(anchor);
            mGraph->AddEdge(tmpEdge);
        }
    
    // Now, if we are an OpNode, evaluate each of the child nodes (if they exist)
    
    if(node->GetType() == PEBL_OP_NODE)
        {
            PNode *left, *right;
            left  = ((OpNode*)node)->GetLeft();
            right = ((OpNode*)node)->GetRight();
            
            if(left)  Evaluate(left,  name, 1);
            if(right) Evaluate(right, name, 2);
        }
 
    //Clean up after ourselves
    free(name);
    free(label);
}

References VCGGraph::AddEdge(), VCGGraph::AddNode(), Evaluate(), Variant::GetDataTypeName(), PNode::GetType(), PEBL_DATA_NODE, PEBL_OP_NODE, VCGEdge::SetAnchor(), VCGNode::SetBorderColor(), and VCGNode::SetShape().

Referenced by Evaluate(), and MakeGraph().

◆ MakeGraph()

void VCG::MakeGraph ( const PNode * node )

Definition at line 65 of file VCG.cpp.

{
    //First, fill up the mGraph structure by parsing the graph
    Evaluate(node, NULL, 1);
}

References Evaluate(), and NULL.

Referenced by PEBLInterpret().

◆ PrintGraph()

void VCG::PrintGraph ( )

Definition at line 71 of file VCG.cpp.

{
    //First, put in some identifying information
    cout << mHeader;
    if(mGraph)
        {
            cout << (*mGraph) << endl;
        }
}