-- File: GCCIG.mesa
Copyright © 1986 by Xerox Corporation. All rights reserved.
Last Edited by: Preas, January 15, 1987 3:48:05 pm PST
Provides abstraction for channel intersection graphs
DIRECTORY
CD, GC, RTStructure, Graphs0, Graphs0Path;
GCCIG: CEDAR DEFINITIONS = BEGIN
Graph: TYPE = REF GraphRec;
GraphRec: TYPE = RECORD [
context: GC.Context ← NIL,
graph: Graphs0.Graph ← NIL
];
Node: TYPE = Graphs0.Node;
NodeList: TYPE = Graphs0.NodeList;
NodeSetList: TYPE = Graphs0Path.NodeSetList;
Create: PROC[context: GC.Context] RETURNS[cig: Graph];
Destroy: PROC [cig: Graph];
Invalidates cig and removes circular references
ConnectionStrength: TYPE = {goodInternal, power, highImpedance};
InsertNet: PROC[cig: Graph, net: RTStructure.Net, connectionStrength: ConnectionStrength ← goodInternal] RETURNS [nodeSetList: NodeSetList];
Add the net to cig. connectionStrength indicates that connections through a cell may be used as part of the signal path. 1) highImpedance indicates that physical pins on a cell are connected internally bur these internal connections must not be used for carring net current; 2) power indicates that each physical pin should be connected by the net wiring; 3) goodInternal indicates that the internal connections may be used for carrying net current and that not all pins must be connected by net wiring. For example, you might set connectionStrength = power for power supply nets and connectionStrength = goodInternal for all aothers.
RemoveNodes: PROC[cig: Graph, nodeSetList: NodeSetList];
Remove all additions from cig. Inverse of InsertNet
ShortestPath: PUBLIC PROC[cig: Graph, nodeSetList: NodeSetList, net: RTStructure.Net];
Find shortest path among pins of nodeSetList
Check: PROC[cig: Graph];
Verify cig
Length: PROC[nodeSetList: NodeSetList] RETURNS [n: INT];
count members of nodeList
PaintShortestPath: PROC[cig: Graph, nodeSetList: NodeSetList] RETURNS [object: CD.Object];
PaintGraph: PROC [cig: Graph] RETURNS [object: CD.Object];
END.