OpenCores
URL https://opencores.org/ocsvn/qaz_libs/qaz_libs/trunk

Subversion Repositories qaz_libs

[/] [qaz_libs/] [trunk/] [basal/] [src/] [PRBS/] [prbs_7_to_14.v] - Blame information for rev 34

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 34 qaztronic
//-----------------------------------------------------------------------------
2
// Copyright (C) 2009 OutputLogic.com 
3
// This source file may be used and distributed without restriction 
4
// provided that this copyright statement is not removed from the file 
5
// and that any derivative work contains the original copyright notice 
6
// and the associated disclaimer. 
7
// 
8
// THIS SOURCE FILE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS 
9
// OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED 
10
// WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. 
11
//-----------------------------------------------------------------------------
12
// scrambler module for data[13:0],   lfsr[6:0]=1+x^6+x^7;
13
//-----------------------------------------------------------------------------
14
module prbs_7_to_14(
15
  input [13:0] data_in,
16
  input scram_en,
17
  input scram_rst,
18
  output reg [13:0] data_out,
19
  input rst,
20
  input clk);
21
 
22
  reg [6:0] lfsr_q,lfsr_c;
23
  reg [13:0] data_c;
24
 
25
  always @(*) begin
26
    lfsr_c[0] = lfsr_q[1] ^ lfsr_q[3] ^ lfsr_q[5];
27
    lfsr_c[1] = lfsr_q[0] ^ lfsr_q[2] ^ lfsr_q[4] ^ lfsr_q[6];
28
    lfsr_c[2] = lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[3] ^ lfsr_q[5];
29
    lfsr_c[3] = lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[4] ^ lfsr_q[6];
30
    lfsr_c[4] = lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[5];
31
    lfsr_c[5] = lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[6];
32
    lfsr_c[6] = lfsr_q[0] ^ lfsr_q[2] ^ lfsr_q[4];
33
 
34
    data_c[0] = data_in[0] ^ lfsr_q[6];
35
    data_c[1] = data_in[1] ^ lfsr_q[5] ^ lfsr_q[6];
36
    data_c[2] = data_in[2] ^ lfsr_q[4] ^ lfsr_q[5] ^ lfsr_q[6];
37
    data_c[3] = data_in[3] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[5] ^ lfsr_q[6];
38
    data_c[4] = data_in[4] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[5] ^ lfsr_q[6];
39
    data_c[5] = data_in[5] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[5] ^ lfsr_q[6];
40
    data_c[6] = data_in[6] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[5] ^ lfsr_q[6];
41
    data_c[7] = data_in[7] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[5];
42
    data_c[8] = data_in[8] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[4] ^ lfsr_q[6];
43
    data_c[9] = data_in[9] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[3] ^ lfsr_q[5];
44
    data_c[10] = data_in[10] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[2] ^ lfsr_q[4] ^ lfsr_q[6];
45
    data_c[11] = data_in[11] ^ lfsr_q[0] ^ lfsr_q[1] ^ lfsr_q[3] ^ lfsr_q[5];
46
    data_c[12] = data_in[12] ^ lfsr_q[0] ^ lfsr_q[2] ^ lfsr_q[4] ^ lfsr_q[6];
47
    data_c[13] = data_in[13] ^ lfsr_q[1] ^ lfsr_q[3] ^ lfsr_q[5];
48
  end // always
49
 
50
  always @(posedge clk, posedge rst) begin
51
    if(rst) begin
52
      lfsr_q <= {7{1'b1}};
53
      data_out <= {14{1'b0}};
54
    end
55
    else begin
56
      lfsr_q <= scram_rst ? {7{1'b1}} : scram_en ? lfsr_c : lfsr_q;
57
      data_out <= scram_en ? data_c : data_out;
58
    end
59
  end // always
60
endmodule // scrambler
61
 

powered by: WebSVN 2.1.0

© copyright 1999-2019 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.