class awgreg_env;


  static int			pktnum;

  //Interface:
  virtual awgreg_if		aif;
  virtual spi_if		wif;
  virtual sram_if#(25,32)	xif;

  //Component:
  spi_driver			w_driver;
  awgreg_driver			a_driver;
  spi_monitor			w_monitor;
  awg_refmodel			a_model;
  awgreg_monitor		a_monitor;
  awgreg_scoreboard		a_scb;


  function new();
  endfunction;

  extern function build();

  extern task run();

endclass

function awgreg_env::build();

    w_driver   = new();
    if(!w_driver.randomize() with {
      error_time  < 0;
    })
      $fatal(0,"Randomize Failed");
    w_driver.pktnum	= pktnum;
    w_driver.vif  	= wif;
    w_driver.autarchy 	= 1'b1;
    w_driver.half_sclk  = 4;

    w_monitor = new();  
    w_monitor.wif 	= wif;
    w_monitor.xif 	= xif;

    a_driver  = new();
    a_driver.aif	= aif;
    a_driver.wif	= wif;

    a_monitor = new();  
    a_monitor.aif 	= aif;
    a_monitor.xif 	= xif;

    a_model   = new();  
    a_model.aif 	= aif; 
    a_model.wif 	= wif;
    a_model.xif 	= xif;

    a_scb     = new();

endfunction


task awgreg_env::run();
    int 	error=0;    

    fork

      w_driver.do_drive();

      a_driver.do_drive();
 
      w_monitor.do_mon();

      a_monitor.do_mon();

      a_model.do_imitate();


      while(1) begin
	repeat(2) @(posedge wif.csn);
	@(posedge wif.clk);
	a_model.dout.pop_back();
	if(a_scb.compare(
	  a_model.dout			,
	  w_monitor.act_trans.data	,
	  a_model.awgout		,
	  a_monitor.act_trans
	))
	  error++;
	a_model.dout.delete();
	a_model.awgout.delete();
	a_monitor.act_trans.delete();
      end
	  

    join

    $display("SCOREBOARD:");
    $display("\tError_awg:\t%0d",error);
    

endtask