1 | /**CFile*********************************************************************** |
---|
2 | |
---|
3 | FileName [hrcModify.c] |
---|
4 | |
---|
5 | PackageName [hrc] |
---|
6 | |
---|
7 | Synopsis [This files provides the basic functions concerned with |
---|
8 | modifying the hierarchy. This ] |
---|
9 | |
---|
10 | Description [] |
---|
11 | |
---|
12 | SeeAlso [] |
---|
13 | |
---|
14 | Author [Shaz Qadeer] |
---|
15 | |
---|
16 | Copyright [Copyright (c) 1994-1996 The Regents of the Univ. of California. |
---|
17 | All rights reserved. |
---|
18 | |
---|
19 | Permission is hereby granted, without written agreement and without license |
---|
20 | or royalty fees, to use, copy, modify, and distribute this software and its |
---|
21 | documentation for any purpose, provided that the above copyright notice and |
---|
22 | the following two paragraphs appear in all copies of this software. |
---|
23 | |
---|
24 | IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR |
---|
25 | DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT |
---|
26 | OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE UNIVERSITY OF |
---|
27 | CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
---|
28 | |
---|
29 | THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES, |
---|
30 | INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND |
---|
31 | FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS ON AN |
---|
32 | "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATION TO PROVIDE |
---|
33 | MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.] |
---|
34 | |
---|
35 | ******************************************************************************/ |
---|
36 | |
---|
37 | #include "hrcInt.h" |
---|
38 | |
---|
39 | static char rcsid[] UNUSED = "$Id: hrcModify.c,v 1.4 2005/04/16 04:23:47 fabio Exp $"; |
---|
40 | |
---|
41 | /*---------------------------------------------------------------------------*/ |
---|
42 | /* Constant declarations */ |
---|
43 | /*---------------------------------------------------------------------------*/ |
---|
44 | |
---|
45 | |
---|
46 | /*---------------------------------------------------------------------------*/ |
---|
47 | /* Stucture declarations */ |
---|
48 | /*---------------------------------------------------------------------------*/ |
---|
49 | |
---|
50 | |
---|
51 | /*---------------------------------------------------------------------------*/ |
---|
52 | /* Type declarations */ |
---|
53 | /*---------------------------------------------------------------------------*/ |
---|
54 | |
---|
55 | |
---|
56 | /*---------------------------------------------------------------------------*/ |
---|
57 | /* Variable declarations */ |
---|
58 | /*---------------------------------------------------------------------------*/ |
---|
59 | |
---|
60 | |
---|
61 | /*---------------------------------------------------------------------------*/ |
---|
62 | /* Macro declarations */ |
---|
63 | /*---------------------------------------------------------------------------*/ |
---|
64 | |
---|
65 | |
---|
66 | /**AutomaticStart*************************************************************/ |
---|
67 | |
---|
68 | /*---------------------------------------------------------------------------*/ |
---|
69 | /* Static function prototypes */ |
---|
70 | /*---------------------------------------------------------------------------*/ |
---|
71 | |
---|
72 | |
---|
73 | /**AutomaticEnd***************************************************************/ |
---|
74 | |
---|
75 | |
---|
76 | /*---------------------------------------------------------------------------*/ |
---|
77 | /* Definition of exported functions */ |
---|
78 | /*---------------------------------------------------------------------------*/ |
---|
79 | |
---|
80 | |
---|
81 | |
---|
82 | /**Function******************************************************************** |
---|
83 | |
---|
84 | Synopsis [Adds a subckt to a model.] |
---|
85 | |
---|
86 | Description [If a subckt with the same instanceName is already present, the |
---|
87 | function returns FALSE. Otherwise, a new sub-circuit is |
---|
88 | allocated and initialized and TRUE is returned. Note that |
---|
89 | it is the user's responsibility to free the string |
---|
90 | instanceName. actualInputVars and actualOutputVars are |
---|
91 | pointer-copied.] |
---|
92 | |
---|
93 | SideEffects [] |
---|
94 | |
---|
95 | SeeAlso [] |
---|
96 | |
---|
97 | ******************************************************************************/ |
---|
98 | boolean |
---|
99 | Hrc_ModelAddSubckt( |
---|
100 | Hrc_Model_t *callerModel, |
---|
101 | Hrc_Model_t *calleeModel, |
---|
102 | char *instanceName, |
---|
103 | array_t *actualInputVars, |
---|
104 | array_t *actualOutputVars) |
---|
105 | { |
---|
106 | Hrc_Subckt_t *subckt; |
---|
107 | |
---|
108 | if(!st_is_member(callerModel->subcktTable, instanceName)) { |
---|
109 | subckt = ALLOC(Hrc_Subckt_t, 1); |
---|
110 | subckt->model = calleeModel; |
---|
111 | subckt->instanceName = util_strsav(instanceName); |
---|
112 | subckt->actualInputVars = actualInputVars; |
---|
113 | subckt->actualOutputVars = actualOutputVars; |
---|
114 | st_insert(callerModel->subcktTable, subckt->instanceName, (char *) subckt); |
---|
115 | return TRUE; |
---|
116 | } |
---|
117 | else { |
---|
118 | return FALSE; |
---|
119 | } |
---|
120 | } |
---|
121 | |
---|
122 | /**Function******************************************************************** |
---|
123 | |
---|
124 | Synopsis [Adds a name table to a model.] |
---|
125 | |
---|
126 | Description [The function adds a name table to the master node of a model.] |
---|
127 | |
---|
128 | SideEffects [] |
---|
129 | |
---|
130 | SeeAlso [] |
---|
131 | |
---|
132 | ******************************************************************************/ |
---|
133 | void |
---|
134 | Hrc_ModelAddNameTable( |
---|
135 | Hrc_Model_t *model, |
---|
136 | Tbl_Table_t *table) |
---|
137 | { |
---|
138 | array_insert_last(Tbl_Table_t *, model->masterNode->nameTables, table); |
---|
139 | } |
---|
140 | |
---|
141 | /**Function******************************************************************** |
---|
142 | |
---|
143 | Synopsis [Adds a child node to a node.] |
---|
144 | |
---|
145 | Description [The function checks if a child with the same instance name |
---|
146 | is already present in parent. If it is present, FALSE is |
---|
147 | returned. Otherwise, the child is added and TRUE is returned. |
---|
148 | Note that before using this function, child should have |
---|
149 | created using Hrc_NodeAlloc().] |
---|
150 | |
---|
151 | SideEffects [] |
---|
152 | |
---|
153 | SeeAlso [] |
---|
154 | |
---|
155 | ******************************************************************************/ |
---|
156 | boolean |
---|
157 | Hrc_NodeAddChild( |
---|
158 | Hrc_Node_t *parent, |
---|
159 | Hrc_Node_t *child, |
---|
160 | array_t *actualInputs, |
---|
161 | array_t *actualOutputs) |
---|
162 | { |
---|
163 | if(!st_is_member(parent->childTable, child->instanceName)) { |
---|
164 | st_insert(parent->childTable, child->instanceName, (char *) child); |
---|
165 | child->parentNode = parent; |
---|
166 | child->actualInputs = actualInputs; |
---|
167 | child->actualOutputs = actualOutputs; |
---|
168 | return TRUE; |
---|
169 | } |
---|
170 | else { |
---|
171 | return FALSE; |
---|
172 | } |
---|
173 | } |
---|
174 | |
---|
175 | /**Function******************************************************************** |
---|
176 | |
---|
177 | Synopsis [Adds a latch to a node.] |
---|
178 | |
---|
179 | Description [The function adds a latch to a node if the latch is not |
---|
180 | present already and returns TRUE. Otherwise, it returns FALSE.] |
---|
181 | |
---|
182 | SideEffects [] |
---|
183 | |
---|
184 | SeeAlso [] |
---|
185 | |
---|
186 | ******************************************************************************/ |
---|
187 | boolean |
---|
188 | Hrc_NodeAddLatch( |
---|
189 | Hrc_Node_t *node, |
---|
190 | Hrc_Latch_t *latch) |
---|
191 | { |
---|
192 | char *latchOutputName = Var_VariableReadName(latch->latchOutput); |
---|
193 | |
---|
194 | if(!st_is_member(node->latchTable, latchOutputName)) { |
---|
195 | st_insert(node->latchTable, latchOutputName, (char *) latch); |
---|
196 | return TRUE; |
---|
197 | } |
---|
198 | else { |
---|
199 | return FALSE; |
---|
200 | } |
---|
201 | } |
---|
202 | |
---|
203 | /**Function******************************************************************** |
---|
204 | |
---|
205 | Synopsis [Adds a variable to a node.] |
---|
206 | |
---|
207 | Description [The function adds a variable to a node if the variable is not |
---|
208 | present already and returns TRUE. Otherwise, it returns FALSE.] |
---|
209 | |
---|
210 | SideEffects [] |
---|
211 | |
---|
212 | SeeAlso [] |
---|
213 | |
---|
214 | ******************************************************************************/ |
---|
215 | boolean |
---|
216 | Hrc_NodeAddVariable( |
---|
217 | Hrc_Node_t *node, |
---|
218 | Var_Variable_t *var) |
---|
219 | { |
---|
220 | char *varName = Var_VariableReadName(var); |
---|
221 | |
---|
222 | if(!st_is_member(node->varTable, varName)) { |
---|
223 | st_insert(node->varTable, varName, (char *) var); |
---|
224 | return TRUE; |
---|
225 | } |
---|
226 | else { |
---|
227 | return FALSE; |
---|
228 | } |
---|
229 | } |
---|
230 | |
---|
231 | /**Function******************************************************************** |
---|
232 | |
---|
233 | Synopsis [Deletes a variable from a node.] |
---|
234 | |
---|
235 | Description [If the variable is present in node it is deleted and TRUE is |
---|
236 | returned. Otherwise, nothing is done and FALSE is returned. |
---|
237 | Note that this function should only be used for deleting an |
---|
238 | internal variable of a node.] |
---|
239 | |
---|
240 | SideEffects [] |
---|
241 | |
---|
242 | SeeAlso [] |
---|
243 | |
---|
244 | ******************************************************************************/ |
---|
245 | boolean |
---|
246 | Hrc_NodeDeleteVariable( |
---|
247 | Hrc_Node_t *node, |
---|
248 | Var_Variable_t *var) |
---|
249 | { |
---|
250 | char *varName = Var_VariableReadName(var); |
---|
251 | |
---|
252 | return st_delete(node->varTable, &varName, &var); |
---|
253 | } |
---|
254 | |
---|
255 | /**Function******************************************************************** |
---|
256 | |
---|
257 | Synopsis [Deletes a latch from a node.] |
---|
258 | |
---|
259 | Description [If the latch is present in node it is deleted and TRUE is |
---|
260 | returned. Otherwise, nothing is done and FALSE is returned.] |
---|
261 | |
---|
262 | SideEffects [] |
---|
263 | |
---|
264 | SeeAlso [] |
---|
265 | |
---|
266 | ******************************************************************************/ |
---|
267 | boolean |
---|
268 | Hrc_NodeDeleteLatch( |
---|
269 | Hrc_Node_t *node, |
---|
270 | Hrc_Latch_t *latch) |
---|
271 | { |
---|
272 | char *latchOutputName = Var_VariableReadName(latch->latchOutput); |
---|
273 | |
---|
274 | return st_delete(node->latchTable, &latchOutputName, &latch); |
---|
275 | } |
---|
276 | |
---|
277 | /*---------------------------------------------------------------------------*/ |
---|
278 | /* Definition of internal functions */ |
---|
279 | /*---------------------------------------------------------------------------*/ |
---|
280 | /**Function******************************************************************** |
---|
281 | |
---|
282 | Synopsis [Deletes a child from a node.] |
---|
283 | |
---|
284 | Description [If a child of the name childName exists in node, it is deleted |
---|
285 | from the childTable of node and a pointer to this child is |
---|
286 | returned. Otherwise, NULL is returned.] |
---|
287 | |
---|
288 | SideEffects [] |
---|
289 | |
---|
290 | SeeAlso [Hrc_TreeReplace()] |
---|
291 | |
---|
292 | ******************************************************************************/ |
---|
293 | Hrc_Node_t * |
---|
294 | HrcNodeDeleteChild( |
---|
295 | Hrc_Node_t *node, |
---|
296 | char *childName) |
---|
297 | { |
---|
298 | Hrc_Node_t *childNode; |
---|
299 | |
---|
300 | if(st_delete(node->childTable, &childName, &childNode)) { |
---|
301 | return childNode; |
---|
302 | } |
---|
303 | else { |
---|
304 | return NIL(Hrc_Node_t); |
---|
305 | } |
---|
306 | } |
---|
307 | |
---|
308 | |
---|
309 | /*---------------------------------------------------------------------------*/ |
---|
310 | /* Definition of static functions */ |
---|
311 | /*---------------------------------------------------------------------------*/ |
---|
312 | |
---|
313 | |
---|
314 | |
---|
315 | |
---|
316 | |
---|
317 | |
---|
318 | |
---|
319 | |
---|
320 | |
---|
321 | |
---|
322 | |
---|
323 | |
---|
324 | |
---|
325 | |
---|
326 | |
---|
327 | |
---|
328 | |
---|
329 | |
---|
330 | |
---|
331 | |
---|
332 | |
---|
333 | |
---|
334 | |
---|
335 | |
---|
336 | |
---|
337 | |
---|
338 | |
---|
339 | |
---|
340 | |
---|
341 | |
---|
342 | |
---|
343 | |
---|
344 | |
---|
345 | |
---|
346 | |
---|
347 | |
---|
348 | |
---|
349 | |
---|
350 | |
---|
351 | |
---|
352 | |
---|
353 | |
---|
354 | |
---|
355 | |
---|
356 | |
---|
357 | |
---|
358 | |
---|
359 | |
---|
360 | |
---|
361 | |
---|
362 | |
---|
363 | |
---|
364 | |
---|
365 | |
---|
366 | |
---|
367 | |
---|
368 | |
---|
369 | |
---|
370 | |
---|
371 | |
---|
372 | |
---|
373 | |
---|
374 | |
---|
375 | |
---|
376 | |
---|
377 | |
---|
378 | |
---|
379 | |
---|
380 | |
---|
381 | |
---|
382 | |
---|
383 | |
---|
384 | |
---|
385 | |
---|
386 | |
---|
387 | |
---|
388 | |
---|
389 | |
---|
390 | |
---|
391 | |
---|
392 | |
---|
393 | |
---|
394 | |
---|
395 | |
---|
396 | |
---|
397 | |
---|
398 | |
---|
399 | |
---|