| [14] | 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 |  | 
|---|