pinapa-module-decoration.h

Go to the documentation of this file.

/*******************************************************************************
 * arch-tag: Matthieu Moy  September 16, 2003 (parser/include/scp-module-decoration.h)
 *------------------------------------------------------------------------------
 *         Copyright (c) STMicroelectronics,Verimag
 * Pinapa 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.
 * 
 * This 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
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free
 * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
 * MA 02111-1307, USA
 *------------------------------------------------------------------------------
 *                 System Platform Group - HPC
 *******************************************************************************/

#include "pinapa-parser-all.h"

#ifndef PINAPA_MODULE_DECORATION_H
#define PINAPA_MODULE_DECORATION_H

#include "pinapa-systemc-light.h"

#include "pinapa-tree.h"
#include "pinapa-basic-slave-process.h"
#include "pinapa-tac-slave-process.h"
#include "pinapa-extend-slave-process.h"
#include "pinapa-decoration-base.h"

#include <map>
#include <set>
#include <vector>

#include "pinapa-hash.h"

namespace pinapa {
  class st_module_deco_t {
  public:
    st_module_deco_t() : m_class_context(NULL),
                         m_tac_read_func(NULL), m_tac_read_byte_enable_func(NULL),
                         m_tac_read_block_func(NULL),
                         m_tac_write_func(NULL), m_tac_write_byte_enable_func(NULL),
                         m_tac_write_block_func(NULL)
                         {}
                         
    // Thierry Grellier
    // add association towards module class definition
public:
    tree get_class_context() const             { return m_class_context; }
    void set_class_context(tree class_context) { m_class_context = class_context; }
protected:
    tree m_class_context;

  public:
    tree get_basic_write_func() const
    {
      return get_slave_func("basic_slave_base","write");
    }
    void set_basic_write_func(tree w)
    {
      set_slave_func("basic_slave_base", "write", w);
    }
    inline tree get_basic_read_func() const 
    {
      return get_slave_func("basic_slave_base","read");
    }
    inline void set_basic_read_func(tree r) 
    {
      set_slave_func("basic_slave_base", "read", r);
    }
    inline basic_slave_method_handle get_basic_write_handle() const 
    {
      return dynamic_cast<basic_slave_method_handle>(get_slave_method_handle("basic_slave_base",
                                                                             "write"
                                                                             )
                                                     );
    }
    inline void set_basic_write_handle(basic_slave_method_handle  w) 
    {
      set_slave_method_handle("basic_slave_base","write",w);
    }
    inline basic_slave_method_handle get_basic_read_handle() const 
    {
      return dynamic_cast<basic_slave_method_handle>(get_slave_method_handle("basic_slave_base",
                                                                             "read"
                                                                             )
                                                     );
    }
    inline void set_basic_read_handle(basic_slave_method_handle  r) 
    {
      set_slave_method_handle("basic_slave_base","read",r);
    }

  public:
    tree get_tac_write_func() const {return m_tac_write_func;}
    void set_tac_write_func(tree w) {m_tac_write_func = w;}
  
    tree get_tac_write_byte_enable_func() const {return m_tac_write_byte_enable_func;}
    void set_tac_write_byte_enable_func(tree w) {m_tac_write_byte_enable_func = w;}
  
    tree get_tac_write_block_func() const {return m_tac_write_block_func;}
    void set_tac_write_block_func(tree w) {m_tac_write_block_func = w;}

    tree get_tac_read_func() const {return m_tac_read_func;}
    void set_tac_read_func(tree r) {m_tac_read_func = r;}
  
    tree get_tac_read_byte_enable_func() const {return m_tac_read_byte_enable_func;}
    void set_tac_read_byte_enable_func(tree r) {m_tac_read_byte_enable_func = r;}
  
    tree get_tac_read_block_func() const {return m_tac_read_block_func;}
    void set_tac_read_block_func(tree r) {m_tac_read_block_func = r;}

    tac_slave_method_handle get_tac_write_handle() const {return m_tac_write_handle;}
    void set_tac_write_handle(tac_slave_method_handle  w) {m_tac_write_handle = w;}
  
    tac_slave_method_handle get_tac_write_byte_enable_handle() const {return m_tac_write_byte_enable_handle;}
    void set_tac_write_byte_enable_handle(tac_slave_method_handle  w) {m_tac_write_byte_enable_handle = w;}

    tac_slave_method_handle get_tac_write_block_handle() const {return m_tac_write_block_handle;}
    void set_tac_write_block_handle(tac_slave_method_handle  w) {m_tac_write_block_handle = w;}
  
    tac_slave_method_handle get_tac_read_handle() const {return m_tac_read_handle;}
    void set_tac_read_handle(tac_slave_method_handle  r) {m_tac_read_handle = r;}
  
    tac_slave_method_handle get_tac_read_byte_enable_handle() const {return m_tac_read_byte_enable_handle;}
    void set_tac_read_byte_enable_handle(tac_slave_method_handle  r) {m_tac_read_byte_enable_handle = r;}

    tac_slave_method_handle get_tac_read_block_handle() const {return m_tac_read_block_handle;}
    void set_tac_read_block_handle(tac_slave_method_handle  r) {m_tac_read_block_handle = r;}
  
  private:
    tree m_tac_read_func;
    tree m_tac_read_byte_enable_func;
    tree m_tac_read_block_func;
  
    tree m_tac_write_func;
    tree m_tac_write_byte_enable_func;
    tree m_tac_write_block_func;

    tac_slave_method_handle m_tac_read_handle;
    tac_slave_method_handle m_tac_read_byte_enable_handle;
    tac_slave_method_handle m_tac_read_block_handle;
  
    tac_slave_method_handle m_tac_write_handle;
    tac_slave_method_handle m_tac_write_byte_enable_handle;
    tac_slave_method_handle m_tac_write_block_handle;

  public:
    vector<string> get_slave_funcs(string slavebase) const;

    tree get_slave_func(string slavebase, string fn) const
    {
      map<string,tree>::const_iterator i = m_slave_func_trees.find(slavebase_index(slavebase,fn));
      return (i != m_slave_func_trees.end()) ? i->second : NULL_TREE;
    }

    void set_slave_func(string slavebase, string fn, tree w)
    {
      m_slave_bases.insert(slavebase);
      m_slave_funcs[slavebase].insert(fn);
      m_slave_func_trees[slavebase_index(slavebase,fn)] = w;
    }

    slave_method_handle get_slave_method_handle(string slavebase, string fn) const
    {
      map<string,slave_method_handle>::const_iterator i = m_slave_handles.find(slavebase_index(slavebase,fn));
      return (i != m_slave_handles.end()) ? i->second : 0;
    }

    void set_slave_method_handle(string slavebase, string fn, slave_method_handle w)
    {
      m_slave_handles[slavebase_index(slavebase,fn)] = w;
    }

    static inline string slavebase_index(string slavebase, string fn) {
      if (slavebase.size()) {
        return string(slavebase + string("::") + fn);
      }
      else {
        return fn;
      }
    }

  private:
    set<string>                     m_slave_bases;
    map<string,set<string> >        m_slave_funcs;
    map<string,tree>                m_slave_func_trees;
    map<string,slave_method_handle> m_slave_handles;
  };

  typedef st_deco_first<st_module_deco_t,
                        sc_module> st_module_deco;

  typedef st_module_deco * module_deco;

}

#endif // PINAPA_MODULE_DECORATION_H

Generated by

Back to Pinapa Home Page