Subversion Repositories ha1588

`timescale 1ns/1ns

module rgs (

  // generic bus interface

  input         rst,clk,

  input         wr_in,rd_in,

  input  [ 7:0] addr_in,

  input  [31:0] data_in,

  output [31:0] data_out,

  // rtc interface

  input         rtc_clk_in,

  output        rtc_rst_out,

  output        time_ld_out,

  output [37:0] time_reg_ns_out,

  output [47:0] time_reg_sec_out,

  output        period_ld_out,

  output [39:0] period_out,

  output [37:0] time_acc_modulo_out,

  output        adj_ld_out,

  output [31:0] adj_ld_data_out,

  output [39:0] period_adj_out,

  input  [37:0] time_reg_ns_in,

  input  [47:0] time_reg_sec_in,

  // rx tsu interface

  output        rx_q_rst_out,

  output        rx_q_rd_clk_out,

  output        rx_q_rd_en_out,

  input  [ 7:0] rx_q_stat_in,

  input  [63:0] rx_q_data_in,

  // tx tsu interface

  output        tx_q_rst_out,

  output        tx_q_rd_clk_out,

  output        tx_q_rd_en_out,

  input  [ 7:0] tx_q_stat_in,

  input  [63:0] tx_q_data_in

);

parameter const_00 = 8'h00;

parameter const_04 = 8'h04;

parameter const_08 = 8'h08;

parameter const_0c = 8'h0C;

parameter const_10 = 8'h10;

parameter const_14 = 8'h14;

parameter const_18 = 8'h18;

parameter const_1c = 8'h1C;

parameter const_20 = 8'h20;

parameter const_24 = 8'h24;

parameter const_28 = 8'h28;

parameter const_2c = 8'h2C;

parameter const_30 = 8'h30;

parameter const_34 = 8'h34;

parameter const_38 = 8'h38;

parameter const_3c = 8'h3C;

parameter const_40 = 8'h40;

parameter const_44 = 8'h44;

parameter const_48 = 8'h48;

parameter const_4c = 8'h4C;

parameter const_50 = 8'h50;

parameter const_54 = 8'h54;

parameter const_58 = 8'h58;

parameter const_5c = 8'h5C;

wire cs_00 = (addr_in[7:2]==const_00[7:2])? 1'b1: 1'b0;

wire cs_04 = (addr_in[7:2]==const_04[7:2])? 1'b1: 1'b0;

wire cs_08 = (addr_in[7:2]==const_08[7:2])? 1'b1: 1'b0;

wire cs_0c = (addr_in[7:2]==const_0c[7:2])? 1'b1: 1'b0;

wire cs_10 = (addr_in[7:2]==const_10[7:2])? 1'b1: 1'b0;

wire cs_14 = (addr_in[7:2]==const_14[7:2])? 1'b1: 1'b0;

wire cs_18 = (addr_in[7:2]==const_18[7:2])? 1'b1: 1'b0;

wire cs_1c = (addr_in[7:2]==const_1c[7:2])? 1'b1: 1'b0;

wire cs_20 = (addr_in[7:2]==const_20[7:2])? 1'b1: 1'b0;

wire cs_24 = (addr_in[7:2]==const_24[7:2])? 1'b1: 1'b0;

wire cs_28 = (addr_in[7:2]==const_28[7:2])? 1'b1: 1'b0;

wire cs_2c = (addr_in[7:2]==const_2c[7:2])? 1'b1: 1'b0;

wire cs_30 = (addr_in[7:2]==const_30[7:2])? 1'b1: 1'b0;

wire cs_34 = (addr_in[7:2]==const_34[7:2])? 1'b1: 1'b0;

wire cs_38 = (addr_in[7:2]==const_38[7:2])? 1'b1: 1'b0;

wire cs_3c = (addr_in[7:2]==const_3c[7:2])? 1'b1: 1'b0;

wire cs_40 = (addr_in[7:2]==const_40[7:2])? 1'b1: 1'b0;

wire cs_44 = (addr_in[7:2]==const_44[7:2])? 1'b1: 1'b0;

wire cs_48 = (addr_in[7:2]==const_48[7:2])? 1'b1: 1'b0;

wire cs_4c = (addr_in[7:2]==const_4c[7:2])? 1'b1: 1'b0;

wire cs_50 = (addr_in[7:2]==const_50[7:2])? 1'b1: 1'b0;

wire cs_54 = (addr_in[7:2]==const_54[7:2])? 1'b1: 1'b0;

wire cs_58 = (addr_in[7:2]==const_58[7:2])? 1'b1: 1'b0;

wire cs_5c = (addr_in[7:2]==const_5c[7:2])? 1'b1: 1'b0;

reg [31:0] reg_00;  // ctrl 12 bit

reg [31:0] reg_04;  // qsta 16 bit

reg [31:0] reg_08;  // 

reg [31:0] reg_0c;  // 

reg [31:0] reg_10;  // tout 16 s

reg [31:0] reg_14;  // tout 32 s

reg [31:0] reg_18;  // tout 30 ns

reg [31:0] reg_1c;  // tout  8 nsf

reg [31:0] reg_20;  // peri  8 ns

reg [31:0] reg_24;  // peri 32 nsf

reg [31:0] reg_28;  // amod 30 ns

reg [31:0] reg_2c;  // amod  8 nsf

reg [31:0] reg_30;  // ajld 32 bit

reg [31:0] reg_34;  // 

reg [31:0] reg_38;  // ajpr  8 ns

reg [31:0] reg_3c;  // ajpr 32 nsf

reg [31:0] reg_40;  // tmin 16 s

reg [31:0] reg_44;  // tmin 32 s

reg [31:0] reg_48;  // tmin 30 ns

reg [31:0] reg_4c;  // tmin  8 nsf

reg [31:0] reg_50;  // rxqu 24 bit

reg [31:0] reg_54;  // rxqu 32 bit

reg [31:0] reg_58;  // txqu 24 bit

reg [31:0] reg_5c;  // txqu 32 bit

// write registers

always @(posedge clk) begin

  if (wr_in && cs_00) reg_00 <= data_in;

  if (wr_in && cs_04) reg_04 <= data_in;

  if (wr_in && cs_08) reg_08 <= data_in;

  if (wr_in && cs_0c) reg_0c <= data_in;

  if (wr_in && cs_10) reg_10 <= data_in;

  if (wr_in && cs_14) reg_14 <= data_in;

  if (wr_in && cs_18) reg_18 <= data_in;

  if (wr_in && cs_1c) reg_1c <= data_in;

  if (wr_in && cs_20) reg_20 <= data_in;

  if (wr_in && cs_24) reg_24 <= data_in;

  if (wr_in && cs_28) reg_28 <= data_in;

  if (wr_in && cs_2c) reg_2c <= data_in;

  if (wr_in && cs_30) reg_30 <= data_in;

  if (wr_in && cs_34) reg_34 <= data_in;

  if (wr_in && cs_38) reg_38 <= data_in;

  if (wr_in && cs_3c) reg_3c <= data_in;

  if (wr_in && cs_40) reg_40 <= data_in;

  if (wr_in && cs_44) reg_44 <= data_in;

  if (wr_in && cs_48) reg_48 <= data_in;

  if (wr_in && cs_4c) reg_4c <= data_in;

  if (wr_in && cs_50) reg_50 <= data_in;

  if (wr_in && cs_54) reg_54 <= data_in;

  if (wr_in && cs_58) reg_58 <= data_in;

  if (wr_in && cs_5c) reg_5c <= data_in;

end

// read registers

reg  [37:0] time_reg_ns_int;

reg  [47:0] time_reg_sec_int;

reg  [63:0] rx_q_data_int;

reg  [ 7:0] rx_q_stat_int;

reg  [63:0] tx_q_data_int;

reg  [ 7:0] tx_q_stat_int;

reg         time_ok;

reg  [31:0] data_out_reg;

always @(posedge clk) begin

  if (rd_in && cs_00) data_out_reg <= {reg_00[31:1], time_ok};

  if (rd_in && cs_04) data_out_reg <= {24'd0, rx_q_stat_int[ 7: 0]};

  if (rd_in && cs_08) data_out_reg <= {24'd0, tx_q_stat_int[ 7: 0]};

  if (rd_in && cs_0c) data_out_reg <= reg_0c;

  if (rd_in && cs_10) data_out_reg <= reg_10;

  if (rd_in && cs_14) data_out_reg <= reg_14;

  if (rd_in && cs_18) data_out_reg <= reg_18;

  if (rd_in && cs_1c) data_out_reg <= reg_1c;

  if (rd_in && cs_20) data_out_reg <= reg_20;

  if (rd_in && cs_24) data_out_reg <= reg_24;

  if (rd_in && cs_28) data_out_reg <= reg_28;

  if (rd_in && cs_2c) data_out_reg <= reg_2c;

  if (rd_in && cs_30) data_out_reg <= reg_30;

  if (rd_in && cs_34) data_out_reg <= reg_34;

  if (rd_in && cs_38) data_out_reg <= reg_38;

  if (rd_in && cs_3c) data_out_reg <= reg_3c;

  if (rd_in && cs_40) data_out_reg <= {16'd0, time_reg_sec_int[47:32]};

  if (rd_in && cs_44) data_out_reg <=         time_reg_sec_int[31: 0];

  if (rd_in && cs_48) data_out_reg <= { 2'd0, time_reg_ns_int [37: 8]};

  if (rd_in && cs_4c) data_out_reg <= {24'd0, time_reg_ns_int [ 7: 0]};

  if (rd_in && cs_50) data_out_reg <= rx_q_data_int[63:32];

  if (rd_in && cs_54) data_out_reg <= rx_q_data_int[31: 0];

  if (rd_in && cs_58) data_out_reg <= tx_q_data_int[63:32];

  if (rd_in && cs_5c) data_out_reg <= tx_q_data_int[31: 0];

end

assign data_out = data_out_reg;

// register mapping

wire rxq_rst = reg_00[11];

wire rxqu_rd = reg_00[10];

wire txq_rst = reg_00[ 9];

wire txqu_rd = reg_00[ 8];

//wire       = reg_00[ 7];

//wire       = reg_00[ 6];

//wire       = reg_00[ 5];

wire rtc_rst = reg_00[ 4];

wire time_ld = reg_00[ 3];

wire perd_ld = reg_00[ 2];

wire adjt_ld = reg_00[ 1];

wire time_rd = reg_00[ 0];

assign time_reg_sec_out   [47:0] = {reg_10[15: 0], reg_14[31: 0]};

assign time_reg_ns_out    [37:0] = {reg_18[29: 0], reg_1c[ 7: 0]};

assign period_out         [39:0] = {reg_20[ 7: 0], reg_24[31: 0]};

assign time_acc_modulo_out[37:0] = {reg_28[29: 0], reg_2c[ 7: 0]};

assign adj_ld_data_out    [31:0] =  reg_30[31: 0];

assign period_adj_out     [39:0] = {reg_38[ 7: 0], reg_3c[31: 0]};

// real time clock

reg rtc_rst_s1, rtc_rst_s2, rtc_rst_s3;

assign rtc_rst_out = rtc_rst_s2 && !rtc_rst_s3;

always @(posedge rtc_clk_in) begin

  rtc_rst_s1 <= rtc_rst;

  rtc_rst_s2 <= rtc_rst_s1;

  rtc_rst_s3 <= rtc_rst_s2;

end

reg time_ld_s1, time_ld_s2, time_ld_s3;

assign time_ld_out = time_ld_s2 && !time_ld_s3;

always @(posedge rtc_clk_in) begin

  time_ld_s1 <= time_ld;

  time_ld_s2 <= time_ld_s1;

  time_ld_s3 <= time_ld_s2;

end

reg perd_ld_s1, perd_ld_s2, perd_ld_s3;

assign period_ld_out  = perd_ld_s2 && !perd_ld_s3;

always @(posedge rtc_clk_in) begin

  perd_ld_s1 <= perd_ld;

  perd_ld_s2 <= perd_ld_s1;

  perd_ld_s3 <= perd_ld_s2;

end

reg adjt_ld_s1, adjt_ld_s2, adjt_ld_s3;

assign adj_ld_out = adjt_ld_s2 && !adjt_ld_s3;

always @(posedge rtc_clk_in) begin

  adjt_ld_s1 <= adjt_ld;

  adjt_ld_s2 <= adjt_ld_s1;

  adjt_ld_s3 <= adjt_ld_s2;

end

// RTC time read CDC hand-shaking

reg time_rd_s1, time_rd_s2, time_rd_s3;

wire time_rd_ack = time_rd_s2 && !time_rd_s3;

always @(posedge rtc_clk_in) begin

  time_rd_s1 <= time_rd;

  time_rd_s2 <= time_rd_s1;

  time_rd_s3 <= time_rd_s2;

end

always @(posedge rtc_clk_in) begin

  if (time_rd_ack) begin

    time_reg_ns_int  <= time_reg_ns_in;

    time_reg_sec_int <= time_reg_sec_in;

  end

end

reg time_rd_d1;

wire time_rd_req = time_rd && !time_rd_d1;

always @(posedge clk) begin

  time_rd_d1 <= time_rd;

end

always @(posedge clk or posedge time_rd_ack) begin

  if (time_rd_ack)

    time_ok <= 1'b1;

  else if (time_rd_req)

    time_ok <= 1'b0;

end

// rx time stamp queue

assign rx_q_rd_clk_out = clk;

reg rxq_rst_d1, rxq_rst_d2, rxq_rst_d3;

assign rx_q_rst_out = rxq_rst_d2 && !rxq_rst_d3;

always @(posedge clk) begin

  rxq_rst_d1 <= rxq_rst;

  rxq_rst_d2 <= rxq_rst_d1;

  rxq_rst_d3 <= rxq_rst_d2;

end

reg rxqu_rd_d1, rxqu_rd_d2, rxqu_rd_d3;

assign rx_q_rd_en_out = rxqu_rd_d2 && !rxqu_rd_d3;

always @(posedge clk) begin

  rxqu_rd_d1 <= rxqu_rd;

  rxqu_rd_d2 <= rxqu_rd_d1;

  rxqu_rd_d3 <= rxqu_rd_d2;

end

always @(posedge clk) begin

  rx_q_data_int <= rx_q_data_in;

  rx_q_stat_int <= rx_q_stat_in;

end

// tx time stamp queue

assign tx_q_rd_clk_out = clk;

reg txq_rst_d1, txq_rst_d2, txq_rst_d3;

assign tx_q_rst_out = txq_rst_d2 && !txq_rst_d3;

always @(posedge clk) begin

  txq_rst_d1 <= txq_rst;

  txq_rst_d2 <= txq_rst_d1;

  txq_rst_d3 <= txq_rst_d2;

end

reg txqu_rd_d1, txqu_rd_d2, txqu_rd_d3;

assign tx_q_rd_en_out = txqu_rd_d2 && !txqu_rd_d3;

always @(posedge clk) begin

  txqu_rd_d1 <= txqu_rd;

  txqu_rd_d2 <= txqu_rd_d1;

  txqu_rd_d3 <= txqu_rd_d2;

end

always @(posedge clk) begin

  tx_q_data_int <= tx_q_data_in;

  tx_q_stat_int <= tx_q_stat_in;

end

endmodule