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

Subversion Repositories idea

[/] [idea/] [trunk/] [behavioral/] [inout_port/] [in_key_bop.vbe] - Blame information for rev 9

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 6 marta
-- VHDL data flow description generated from `in_key_bop`
2
--              date : Sat Sep  1 20:10:30 2001
3
 
4
 
5
-- Entity Declaration
6
 
7
ENTITY in_key_bop IS
8
  PORT (
9
  clk : in BIT; -- clk
10
  rst : in BIT; -- rst
11
  key_sended : in BIT;  -- key_sended
12
  en_bufin : out BIT;   -- en_bufin
13
  req_key : out BIT;    -- req_key
14
  ikey_ready : out BIT; -- ikey_ready
15
  n_block : out BIT;    -- n_block
16
  vdd : in BIT; -- vdd
17
  vss : in BIT  -- vss
18
  );
19
END in_key_bop;
20
 
21
 
22
-- Architecture Declaration
23
 
24
ARCHITECTURE behaviour_data_flow OF in_key_bop IS
25
  SIGNAL current_state : REG_VECTOR(2 DOWNTO 0) REGISTER;       -- current_state
26
  SIGNAL aux6 : BIT;            -- aux6
27
  SIGNAL auxinit1 : BIT;                -- auxinit1
28
 
29
BEGIN
30
  auxinit1 <= (not (current_state (2)) and not (rst) and key_sended and not
31
((current_state (1) and current_state (0))));
32
  aux6 <= (not (rst) and (not (current_state (0)) or current_state (2)));
33
  label0 : BLOCK ((clk and not (clk'STABLE)) = '1')
34
  BEGIN
35
    current_state (0) <= GUARDED ((not (current_state (0)) and not (current_state (1)) and current_state
36
(2)) or not (aux6));
37
  END BLOCK label0;
38
  label1 : BLOCK ((clk and not (clk'STABLE)) = '1')
39
  BEGIN
40
    current_state (1) <= GUARDED ((not (rst) and not (current_state (1)) and current_state (2))
41
or (not (current_state (0)) and not (rst) and not (current_state
42
(2)) and current_state (1)));
43
  END BLOCK label1;
44
  label2 : BLOCK ((clk and not (clk'STABLE)) = '1')
45
  BEGIN
46
    current_state (2) <= GUARDED auxinit1;
47
  END BLOCK label2;
48
 
49
n_block <= aux6;
50
 
51
ikey_ready <= (not (rst) and current_state (0) and not (current_state (2))
52
and current_state (1));
53
 
54
req_key <= (rst or current_state (2) or (not (key_sended) and not ((current_state
55
(1) and current_state (0)))));
56
 
57
en_bufin <= auxinit1;
58
END;

powered by: WebSVN 2.1.0

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