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

Subversion Repositories idea

[/] [idea/] [trunk/] [behavioral/] [idea_machine/] [heart_ctrlr.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 `heart_ctrlr`
2
--              date : Fri Aug 24 20:54:23 2001
3
 
4
 
5
-- Entity Declaration
6
 
7
ENTITY heart_ctrlr IS
8
  PORT (
9
  ck : in BIT;  -- ck
10
  reset : in BIT;       -- reset
11
  start : in BIT;       -- start
12
  key_ready : in BIT;   -- key_ready
13
  round : in bit_vector(2 DOWNTO 0) ;   -- round
14
  en1 : out BIT;        -- en1
15
  en2 : out BIT;        -- en2
16
  en3 : out BIT;        -- en3
17
  en4 : out BIT;        -- en4
18
  en5 : out BIT;        -- en5
19
  en6 : out BIT;        -- en6
20
  en7 : out BIT;        -- en7
21
  en_out : out BIT;     -- en_out
22
  en_key_out : out BIT; -- en_key_out
23
  en_key_out9 : out BIT;        -- en_key_out9
24
  sel_in : out BIT;     -- sel_in
25
  ck_crnd : out BIT;    -- ck_crnd
26
  finish : out BIT;     -- finish
27
  vdd : in BIT; -- vdd
28
  vss : in BIT  -- vss
29
  );
30
END heart_ctrlr;
31
 
32
 
33
-- Architecture Declaration
34
 
35
ARCHITECTURE VBE OF heart_ctrlr IS
36
  SIGNAL current_state : REG_VECTOR(4 DOWNTO 0) REGISTER;       -- current_state
37
  SIGNAL current_state_s17 : BIT;               -- current_state_s17
38
  SIGNAL next_state_s17 : BIT;          -- next_state_s17
39
  SIGNAL current_state_s16 : BIT;               -- current_state_s16
40
  SIGNAL next_state_s16 : BIT;          -- next_state_s16
41
  SIGNAL current_state_s15 : BIT;               -- current_state_s15
42
  SIGNAL next_state_s15 : BIT;          -- next_state_s15
43
  SIGNAL current_state_s14 : BIT;               -- current_state_s14
44
  SIGNAL next_state_s14 : BIT;          -- next_state_s14
45
  SIGNAL current_state_s13 : BIT;               -- current_state_s13
46
  SIGNAL next_state_s13 : BIT;          -- next_state_s13
47
  SIGNAL current_state_s12 : BIT;               -- current_state_s12
48
  SIGNAL next_state_s12 : BIT;          -- next_state_s12
49
  SIGNAL current_state_s11 : BIT;               -- current_state_s11
50
  SIGNAL next_state_s11 : BIT;          -- next_state_s11
51
  SIGNAL current_state_s10 : BIT;               -- current_state_s10
52
  SIGNAL next_state_s10 : BIT;          -- next_state_s10
53
  SIGNAL current_state_s9 : BIT;                -- current_state_s9
54
  SIGNAL next_state_s9 : BIT;           -- next_state_s9
55
  SIGNAL current_state_s8 : BIT;                -- current_state_s8
56
  SIGNAL next_state_s8 : BIT;           -- next_state_s8
57
  SIGNAL current_state_s7 : BIT;                -- current_state_s7
58
  SIGNAL next_state_s7 : BIT;           -- next_state_s7
59
  SIGNAL current_state_s6 : BIT;                -- current_state_s6
60
  SIGNAL next_state_s6 : BIT;           -- next_state_s6
61
  SIGNAL current_state_s5 : BIT;                -- current_state_s5
62
  SIGNAL next_state_s5 : BIT;           -- next_state_s5
63
  SIGNAL current_state_s4 : BIT;                -- current_state_s4
64
  SIGNAL next_state_s4 : BIT;           -- next_state_s4
65
  SIGNAL current_state_s3 : BIT;                -- current_state_s3
66
  SIGNAL next_state_s3 : BIT;           -- next_state_s3
67
  SIGNAL current_state_s2 : BIT;                -- current_state_s2
68
  SIGNAL next_state_s2 : BIT;           -- next_state_s2
69
  SIGNAL current_state_s1 : BIT;                -- current_state_s1
70
  SIGNAL next_state_s1 : BIT;           -- next_state_s1
71
  SIGNAL current_state_s0 : BIT;                -- current_state_s0
72
  SIGNAL next_state_s0 : BIT;           -- next_state_s0
73
  SIGNAL next_state : BIT_VECTOR(4 DOWNTO 0);   -- next_state
74
 
75
BEGIN
76
  next_state(0) <= (next_state_s2 OR next_state_s3 OR next_state_s4
77
OR next_state_s5 OR next_state_s6 OR next_state_s9
78
OR next_state_s11 OR next_state_s15);
79
  next_state(1) <= (next_state_s1 OR next_state_s3 OR next_state_s4
80
OR next_state_s8 OR next_state_s9 OR next_state_s10
81
 OR next_state_s12 OR next_state_s15 OR
82
next_state_s16 OR next_state_s17);
83
  next_state(2) <= (next_state_s3 OR next_state_s5 OR next_state_s8
84
OR next_state_s11 OR next_state_s12 OR
85
next_state_s13 OR next_state_s14);
86
  next_state(3) <= (next_state_s1 OR next_state_s3 OR next_state_s4
87
OR next_state_s5 OR next_state_s6 OR next_state_s7
88
OR next_state_s11 OR next_state_s14 OR
89
next_state_s17);
90
  next_state(4) <= (next_state_s0 OR next_state_s2 OR next_state_s6
91
OR next_state_s7 OR next_state_s9 OR next_state_s10
92
 OR next_state_s11 OR next_state_s12 OR
93
next_state_s14 OR next_state_s17);
94
  next_state_s0 <= ((current_state_s0 AND (NOT(key_ready) OR NOT(
95
start))) OR current_state_s17 OR (current_state_s7 AND
96
 (NOT(round(0)) OR NOT(round(1)) OR NOT(round(2)))
97
));
98
  current_state_s0 <= (current_state(4) AND NOT(current_state(3)) AND
99
NOT(current_state(1)) AND NOT(current_state(0)));
100
  next_state_s1 <= (current_state_s0 AND key_ready AND start);
101
  current_state_s1 <= (NOT(current_state(4)) AND current_state(3) AND
102
NOT(current_state(2)) AND NOT(current_state(0)));
103
  next_state_s2 <= current_state_s1;
104
  current_state_s2 <= (current_state(4) AND NOT(current_state(3)) AND
105
NOT(current_state(1)) AND current_state(0));
106
  next_state_s3 <= current_state_s2;
107
  current_state_s3 <= (NOT(current_state(4)) AND current_state(3) AND
108
current_state(2) AND current_state(1));
109
  next_state_s4 <= current_state_s3;
110
  current_state_s4 <= (NOT(current_state(4)) AND current_state(3) AND
111
NOT(current_state(2)) AND current_state(0));
112
  next_state_s5 <= current_state_s4;
113
  current_state_s5 <= (NOT(current_state(4)) AND current_state(3) AND
114
current_state(2) AND NOT(current_state(1)));
115
  next_state_s6 <= current_state_s5;
116
  current_state_s6 <= (current_state(4) AND current_state(3) AND NOT(
117
current_state(2)) AND current_state(0));
118
  next_state_s7 <= current_state_s6;
119
  current_state_s7 <= (current_state(3) AND NOT(current_state(2)) AND
120
NOT(current_state(1)) AND NOT(current_state(0)));
121
  next_state_s8 <= (current_state_s7 AND round(0) AND round(1) AND
122
round(2));
123
  current_state_s8 <= (NOT(current_state(4)) AND NOT(current_state(3))
124
AND current_state(2) AND current_state(1));
125
  next_state_s9 <= current_state_s8;
126
  current_state_s9 <= (current_state(4) AND NOT(current_state(3)) AND
127
current_state(1) AND current_state(0));
128
  next_state_s10 <= current_state_s9;
129
  current_state_s10 <= (current_state(4) AND NOT(current_state(3)) AND
130
NOT(current_state(2)) AND current_state(1) AND NOT(
131
current_state(0)));
132
  next_state_s11 <= current_state_s10;
133
  current_state_s11 <= (current_state(4) AND current_state(3) AND
134
current_state(2) AND current_state(0));
135
  next_state_s12 <= current_state_s11;
136
  current_state_s12 <= (current_state(4) AND NOT(current_state(3)) AND
137
current_state(2) AND current_state(1));
138
  next_state_s13 <= current_state_s12;
139
  current_state_s13 <= (NOT(current_state(4)) AND NOT(current_state(3))
140
AND current_state(2) AND NOT(current_state(1)));
141
  next_state_s14 <= current_state_s13;
142
  current_state_s14 <= (current_state(4) AND current_state(3) AND
143
current_state(2) AND NOT(current_state(0)));
144
  next_state_s15 <= current_state_s14;
145
  current_state_s15 <= (NOT(current_state(4)) AND NOT(current_state(3))
146
AND NOT(current_state(2)) AND current_state(0));
147
  next_state_s16 <= current_state_s15;
148
  current_state_s16 <= (NOT(current_state(4)) AND NOT(current_state(3))
149
AND NOT(current_state(2)) AND NOT(current_state(0)));
150
  next_state_s17 <= current_state_s16;
151
  current_state_s17 <= (current_state(4) AND current_state(3) AND NOT(
152
current_state(2)) AND current_state(1));
153
  label0 : BLOCK ((NOT((ck'STABLE)) AND ck) = '1')
154
  BEGIN
155
    current_state(0) <= GUARDED (next_state(0) AND NOT(reset));
156
  END BLOCK label0;
157
  label1 : BLOCK ((NOT((ck'STABLE)) AND ck) = '1')
158
  BEGIN
159
    current_state(1) <= GUARDED (next_state(1) AND NOT(reset));
160
  END BLOCK label1;
161
  label2 : BLOCK ((NOT((ck'STABLE)) AND ck) = '1')
162
  BEGIN
163
    current_state(2) <= GUARDED (next_state(2) AND NOT(reset));
164
  END BLOCK label2;
165
  label3 : BLOCK ((NOT((ck'STABLE)) AND ck) = '1')
166
  BEGIN
167
    current_state(3) <= GUARDED (next_state(3) AND NOT(reset));
168
  END BLOCK label3;
169
  label4 : BLOCK ((NOT((ck'STABLE)) AND ck) = '1')
170
  BEGIN
171
    current_state(4) <= GUARDED (next_state(4) OR reset);
172
  END BLOCK label4;
173
 
174
finish <= (current_state_s17 AND NOT(reset));
175
 
176
ck_crnd <= ((current_state_s6 AND NOT(reset)) OR (
177
current_state_s17 AND NOT(reset)));
178
 
179
sel_in <= (current_state_s0 AND (round(0) OR round(1) OR
180
round(2)) AND key_ready AND start AND NOT(reset));
181
 
182
en_key_out9 <= (current_state_s15 AND NOT(reset));
183
 
184
en_key_out <= ((current_state_s0 AND key_ready AND start AND
185
NOT(reset)) OR (current_state_s8 AND NOT(reset)));
186
 
187
en_out <= (current_state_s16 AND NOT(reset));
188
 
189
en7 <= ((current_state_s7 AND NOT(reset)) OR (
190
current_state_s15 AND NOT(reset)));
191
 
192
en6 <= ((current_state_s6 AND NOT(reset)) OR (
193
current_state_s14 AND NOT(reset)));
194
 
195
en5 <= ((current_state_s5 AND NOT(reset)) OR (
196
current_state_s13 AND NOT(reset)));
197
 
198
en4 <= ((current_state_s4 AND NOT(reset)) OR (
199
current_state_s12 AND NOT(reset)));
200
 
201
en3 <= ((current_state_s3 AND NOT(reset)) OR (
202
current_state_s11 AND NOT(reset)));
203
 
204
en2 <= ((current_state_s2 AND NOT(reset)) OR (
205
current_state_s10 AND NOT(reset)));
206
 
207
en1 <= ((current_state_s1 AND NOT(reset)) OR (
208
current_state_s9 AND NOT(reset)));
209
END;

powered by: WebSVN 2.1.0

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