#ifndef XRAM_TRANSACTION_H_
#define XRAM_TRANSACTION_H_

#include <inttypes.h>
#include <systemc>
#include <cassert>
#include "arithmetics.h"

#define DEBUG_XRAM_TRANSACTION 0

////////////////////////////////////////////////////////////////////////
//                  A transaction tab entry         
////////////////////////////////////////////////////////////////////////

class TransactionTabEntry 
{
    typedef sc_dt::sc_uint<64>    wide_data_t;
    typedef sc_dt::sc_uint<40>    addr_t;
    typedef uint32_t              data_t;
    typedef uint32_t              be_t;

    public:
    bool 		        valid;     	    // entry valid 
    bool 		        xram_read; 	    // read request to XRAM
    addr_t   	        nline;    	    // index (zy) of the requested line
    size_t 	            srcid;     	    // processor requesting the transaction
    size_t 	            trdid;     	    // processor requesting the transaction
    size_t 	            pktid;     	    // processor requesting the transaction
    bool 		        proc_read;	    // read request from processor
    size_t 	            read_length;    // length of the read (for the response)
    size_t 	            word_index;    	// index of the first read word (for the response)
    std::vector<data_t> wdata;          // write buffer (one cache line)
    std::vector<be_t>   wdata_be;    	// be for each data in the write buffer
    bool                rerror;         // error returned by xram
    data_t              ll_key;         // LL key returned by the llsc_global_table

    /////////////////////////////////////////////////////////////////////
    // The init() function initializes the entry 
    /////////////////////////////////////////////////////////////////////
    void init()
    {
        valid		= false;
        rerror      = false;
    }

    /////////////////////////////////////////////////////////////////////
    // The alloc() function initializes the vectors of an entry
    // Its arguments are :
    // - n_words : number of words per line in the cache
    /////////////////////////////////////////////////////////////////////
    void alloc(size_t n_words)
    {
        wdata_be.reserve( (int)n_words );
        wdata.reserve( (int)n_words );
        for(size_t i=0; i<n_words; i++)
        {
            wdata_be.push_back(0);
            wdata.push_back(0);
        }
    }

    ////////////////////////////////////////////////////////////////////
    // The copy() function copies an existing entry
    // Its arguments are :
    // - source : the transaction tab entry to copy
    ////////////////////////////////////////////////////////////////////
    void copy(const TransactionTabEntry &source)
    {
        valid	    = source.valid;
        xram_read 	= source.xram_read;
        nline	    = source.nline;
        srcid	    = source.srcid;
        trdid	    = source.trdid;
        pktid	    = source.pktid;
        proc_read 	= source.proc_read;
        read_length = source.read_length;
        word_index	= source.word_index;
        wdata_be.assign(source.wdata_be.begin(),source.wdata_be.end());
        wdata.assign(source.wdata.begin(),source.wdata.end());
        rerror      = source.rerror;
        ll_key      = source.ll_key;
    }

    ////////////////////////////////////////////////////////////////////
    // The print() function prints the entry 
    ////////////////////////////////////////////////////////////////////
    void print()
    {
        std::cout << "valid       = " << valid        << std::endl;
        std::cout << "xram_read   = " << xram_read    << std::endl;
        std::cout << "nline       = " << std::hex << nline << std::endl;
        std::cout << "srcid       = " << srcid        << std::endl;
        std::cout << "trdid       = " << trdid        << std::endl;
        std::cout << "pktid       = " << pktid        << std::endl;
        std::cout << "proc_read   = " << proc_read    << std::endl;
        std::cout << "read_length = " << read_length  << std::endl;
        std::cout << "word_index  = " << word_index   << std::endl; 
        for(size_t i=0; i<wdata_be.size() ; i++){
            std::cout << "wdata_be [" << i <<"] = " << wdata_be[i] << std::endl;
        }
        for(size_t i=0; i<wdata.size() ; i++){
            std::cout << "wdata [" << i <<"] = " << wdata[i] << std::endl;
        }
        std::cout << std::endl;
        std::cout << "rerror      = " << rerror       << std::endl;
    }

    /////////////////////////////////////////////////////////////////////
    // 		Constructors
    /////////////////////////////////////////////////////////////////////

    TransactionTabEntry()
    {
        wdata_be.clear();
        wdata.clear();
        valid=false;
        rerror=false;
    }

    TransactionTabEntry(const TransactionTabEntry &source){
        valid	    = source.valid;
        xram_read	= source.xram_read;
        nline	    = source.nline;
        srcid	    = source.srcid;
        trdid	    = source.trdid;
        pktid	    = source.pktid;
        proc_read	= source.proc_read;
        read_length = source.read_length;
        word_index	= source.word_index;
        wdata_be.assign(source.wdata_be.begin(),source.wdata_be.end());
        wdata.assign(source.wdata.begin(),source.wdata.end());	
        rerror      = source.rerror;
        ll_key      = source.ll_key;
    }

}; // end class TransactionTabEntry

////////////////////////////////////////////////////////////////////////
//                  The transaction tab                              
////////////////////////////////////////////////////////////////////////
class TransactionTab
{
    typedef sc_dt::sc_uint<64>    wide_data_t;
    typedef sc_dt::sc_uint<40>    addr_t;
    typedef uint32_t              data_t;
    typedef uint32_t              be_t;

    private:
    const std::string tab_name;                // the name for logs
    size_t            size_tab;                // the size of the tab

    data_t be_to_mask(be_t be)
    {
        data_t ret = 0;
        if ( be&0x1 ) {
            ret = ret | 0x000000FF;
        }
        if ( be&0x2 ) {
            ret = ret | 0x0000FF00;
        }
        if ( be&0x4 ) {
            ret = ret | 0x00FF0000;
        }
        if ( be&0x8 ) {
            ret = ret | 0xFF000000;
        }
        return ret;
    }

    public:
    TransactionTabEntry *tab;       // The transaction tab

    ////////////////////////////////////////////////////////////////////
    //		Constructors
    ////////////////////////////////////////////////////////////////////
    TransactionTab()
    {
        size_tab=0;
        tab=NULL;
    }

    TransactionTab(const std::string &name,
                   size_t            n_entries, 
                   size_t            n_words )
    : tab_name( name ),
      size_tab( n_entries ) 
    {
        tab = new TransactionTabEntry[size_tab];
        for ( size_t i=0; i<size_tab; i++) 
        {
            tab[i].alloc(n_words);
        }
    }

    ~TransactionTab()
    {
        delete [] tab;
    }

    /////////////////////////////////////////////////////////////////////
    // The size() function returns the size of the tab
    /////////////////////////////////////////////////////////////////////
    size_t size()
    {
        return size_tab;
    }

    /////////////////////////////////////////////////////////////////////
    // The init() function initializes the transaction tab entries
    /////////////////////////////////////////////////////////////////////
    void init()
    {
        for ( size_t i=0; i<size_tab; i++) {
            tab[i].init();
        }
    }

    /////////////////////////////////////////////////////////////////////
    // The print() function prints a transaction tab entry
    // Arguments :
    // - index : the index of the entry to print
    /////////////////////////////////////////////////////////////////////
    void print(const size_t index)
    {
        assert( (index < size_tab) 
                && "Invalid Transaction Tab Entry");
        tab[index].print();
        return;
    }

    /////////////////////////////////////////////////////////////////////
    // The read() function returns a transaction tab entry.
    // Arguments :
    // - index : the index of the entry to read
    /////////////////////////////////////////////////////////////////////
    TransactionTabEntry read(const size_t index)
    {
        assert( (index < size_tab) 
                && "Invalid Transaction Tab Entry");
        return tab[index];
    }

    /////////////////////////////////////////////////////////////////////
    // The full() function returns the state of the transaction tab
    // Arguments :
    // - index : (return argument) the index of an empty entry 
    // The function returns true if the transaction tab is full
    /////////////////////////////////////////////////////////////////////
    bool full(size_t &index)
    {
        for(size_t i=0; i<size_tab; i++){
            if(!tab[i].valid){
                index=i;
                return false;	
            }
        }
        return true;
    }

    /////////////////////////////////////////////////////////////////////
    // The hit_read() function checks if an XRAM read transaction exists 
    // for a given cache line.
    // Arguments :
    // - index : (return argument) the index of the hit entry, if there is 
    // - nline : the index (zy) of the requested line
    // The function returns true if a read request has already been sent
    //////////////////////////////////////////////////////////////////////
    bool hit_read(const addr_t nline,size_t &index)
    {
        for(size_t i=0; i<size_tab; i++){
            if((tab[i].valid && (nline==tab[i].nline)) && (tab[i].xram_read)) {
                index=i;
                return true;	
            }
        }
        return false;
    }

    ///////////////////////////////////////////////////////////////////////
    // The hit_write() function looks if an XRAM write transaction exists 
    // for a given line.
    // Arguments :
    // - nline : the index (zy) of the requested line
    // The function returns true if a write request has already been sent
    ///////////////////////////////////////////////////////////////////////
    bool hit_write(const addr_t nline)
    {
        for(size_t i=0; i<size_tab; i++){
            if(tab[i].valid && (nline==tab[i].nline) && !(tab[i].xram_read)) {
                return true;	
            }
        }
        return false;
    }

    ///////////////////////////////////////////////////////////////////////
    // The hit_write() function looks if an XRAM write transaction exists 
    // for a given line.
    // Arguments :
    // - index : (return argument) the index of the hit entry, if there is
    // - nline : the index (zy) of the requested line
    // The function returns true if a write request has already been sent
    ///////////////////////////////////////////////////////////////////////
    bool hit_write(const addr_t nline, size_t* index)
    {
        for(size_t i=0; i<size_tab; i++){
            if(tab[i].valid && (nline==tab[i].nline) && !(tab[i].xram_read)) {
                *index = i;
                return true;	
            }
        }
        return false;
    }
    /////////////////////////////////////////////////////////////////////
    // The write_data_mask() function writes a vector of data (a line).
    // The data is written only if the corresponding bits are set
    // in the be vector. 
    // Arguments :
    // - index : the index of the request in the transaction tab
    // - be   : vector of be 
    // - data : vector of data
    /////////////////////////////////////////////////////////////////////
    void write_data_mask(const size_t index, 
            const std::vector<be_t> &be, 
            const std::vector<data_t> &data) 
    {
        assert( (index < size_tab) 
                && "Invalid Transaction Tab Entry");
        assert(be.size()==tab[index].wdata_be.size() 
                && "Bad data mask in write_data_mask in TransactionTab");
        assert(data.size()==tab[index].wdata.size() 
                && "Bad data in write_data_mask in TransactionTab");

        for(size_t i=0; i<tab[index].wdata_be.size() ; i++) {
            tab[index].wdata_be[i] = tab[index].wdata_be[i] | be[i];
            data_t mask = be_to_mask(be[i]);
            tab[index].wdata[i] = (tab[index].wdata[i] & ~mask) | (data[i] & mask);
        }
    }

    /////////////////////////////////////////////////////////////////////
    // The set() function registers a transaction (read or write)
    // to the XRAM in the transaction tab.
    // Arguments :
    // - index : index in the transaction tab
    // - xram_read : transaction type (read or write a cache line)
    // - nline : the index (zy) of the cache line
    // - srcid : srcid of the initiator that caused the transaction
    // - trdid : trdid of the initiator that caused the transaction
    // - pktid : pktid of the initiator that caused the transaction
    // - proc_read : does the initiator want a copy
    // - read_length : length of read (in case of processor read)
    // - word_index : index in the line (in case of single word read)
    // - data : the data to write (in case of write)
    // - data_be : the mask of the data to write (in case of write)
    // - ll_key  : the ll key (if any) returned by the llsc_global_table
    /////////////////////////////////////////////////////////////////////
    void set(const size_t index,
            const bool xram_read,
            const addr_t nline,
            const size_t srcid,
            const size_t trdid,
            const size_t pktid,
            const bool proc_read,
            const size_t read_length,
            const size_t word_index,
            const std::vector<be_t> &data_be,
            const std::vector<data_t> &data, 
            const data_t ll_key = 0) 
    {
        assert( (index < size_tab) 
                && "The selected entry is out of range in set() Transaction Tab");
        assert(data_be.size()==tab[index].wdata_be.size() 
                && "Bad data_be argument in set() TransactionTab");
        assert(data.size()==tab[index].wdata.size() 
                && "Bad data argument in set() TransactionTab");

        tab[index].valid	        = true;
        tab[index].xram_read        = xram_read;
        tab[index].nline	        = nline;
        tab[index].srcid	        = srcid;
        tab[index].trdid	        = trdid;
        tab[index].pktid	        = pktid;
        tab[index].proc_read	    = proc_read;
        tab[index].read_length	    = read_length;
        tab[index].word_index	    = word_index;
        tab[index].ll_key   	    = ll_key;
        for(size_t i=0; i<tab[index].wdata.size(); i++) 
        {
            tab[index].wdata_be[i]    = data_be[i];
            tab[index].wdata[i]       = data[i];
        }
    }

    /////////////////////////////////////////////////////////////////////
    // The write_rsp() function writes two 32 bits words of the response 
    // to a XRAM read transaction.
    // The BE field in TRT is taken into account.
    // Arguments :
    // - index : the index of the transaction in the transaction tab
    // - word_index : the index of the data in the line
    // - data : a 64 bits value
    // - error : invalid data
    /////////////////////////////////////////////////////////////////////
    void write_rsp(const size_t      index,
                   const size_t      word,
                   const wide_data_t data,
                   const bool        rerror)
    {
        data_t  value;
        data_t  mask;

        if ( index >= size_tab )
        { 
            std::cout << "VCI_MEM_CACHE ERRROR " << tab_name
                      <<  " TRT entry  out of range in write_rsp()" << std::endl;
            exit(0);
        }
        if ( word > tab[index].wdata_be.size() ) 
        { 
            std::cout << "VCI_MEM_CACHE ERRROR " << tab_name
                      <<  " Bad word_index in write_rsp() in TRT" << std::endl;
            exit(0);
        }
        if ( not tab[index].valid )
        { 
            std::cout << "VCI_MEM_CACHE ERRROR " << tab_name
                      <<  " TRT Entry invalid in write_rsp()" << std::endl;
            exit(0);
        }
        if ( not tab[index].xram_read )
        { 
            std::cout << "VCI_MEM_CACHE ERRROR " << tab_name
                      <<  " TRT entry is not an XRAM GET in write_rsp()" << std::endl;
            exit(0);
        }

        // first 32 bits word
        value = (data_t)data;
        mask  = be_to_mask(tab[index].wdata_be[word]);
        tab[index].wdata[word] = (tab[index].wdata[word] & mask) | (value & ~mask);

        // second 32 bits word
        value = (data_t)(data>>32);
        mask  = be_to_mask(tab[index].wdata_be[word+1]);
        tab[index].wdata[word+1] = (tab[index].wdata[word+1] & mask) | (value & ~mask);

        // error update
        tab[index].rerror |= rerror;
    }

    /////////////////////////////////////////////////////////////////////
    // The erase() function erases an entry in the transaction tab.
    // Arguments :
    // - index : the index of the request in the transaction tab
    /////////////////////////////////////////////////////////////////////
    void erase(const size_t index)
    {
        assert( (index < size_tab) 
                && "The selected entry is out of range in erase() Transaction Tab");
        tab[index].valid	= false;
        tab[index].rerror   = false;
    }
}; // end class TransactionTab

#endif

// Local Variables:
// tab-width: 4
// c-basic-offset: 4
// c-file-offsets:((innamespace . 0)(inline-open . 0))
// indent-tabs-mode: nil
// End:

// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=4:softtabstop=4