/*! \brief create a new net object
* \par Function Description
* This function creates and returns a new net object.
*
* \param [in] toplevel The TOPLEVEL object.
* \param [in] type The OBJECT type (usually OBJ_NET)
* \param [in] color The color of the net
* \param [in] x1 x-coord of the first point
* \param [in] y1 y-coord of the first point
* \param [in] x2 x-coord of the second point
* \param [in] y2 y-coord of the second point
* \return A new net OBJECT
*/
OBJECT *o_net_new(TOPLEVEL *toplevel, char type,
int color, int x1, int y1, int x2, int y2)
{
OBJECT *new_node;
new_node = s_basic_new_object(type, "net");
new_node->color = color;
new_node->line = (LINE *) g_malloc(sizeof(LINE));
/* check for null */
new_node->line->x[0] = x1;
new_node->line->y[0] = y1;
new_node->line->x[1] = x2;
new_node->line->y[1] = y2;
new_node->line_width = NET_WIDTH;
o_net_recalc (toplevel, new_node);
new_node->draw_func = net_draw_func;
new_node->sel_func = select_func;
if (!toplevel->ADDING_SEL) {
s_tile_add_object (toplevel, new_node);
s_conn_update_object (toplevel, new_node);
}
return new_node;
}
/*! \brief modify one point of a net object
* \par Function Description
* This function modifies one point of a net \a object. The point
* is specified by the \a whichone variable and the new coordinate
* is (\a x, \a y).
*
* \param toplevel The TOPLEVEL object
* \param object The net OBJECT to modify
* \param x new x-coord of the net point
* \param y new y-coord of the net point
* \param whichone net point to modify
*
*/
void o_net_modify(TOPLEVEL *toplevel, OBJECT *object,
int x, int y, int whichone)
{
object->line->x[whichone] = x;
object->line->y[whichone] = y;
o_net_recalc (toplevel, object);
s_tile_update_object(toplevel, object);
}
/*! \brief Recalculate position of the given object.
* \par Function Description
* This function will take an object and recalculate its
* position on the screen.
*
* \param [in] toplevel The TOPLEVEL object.
* \param [in,out] o_current OBJECT to recalculate.
*
*/
void o_recalc_single_object(TOPLEVEL *toplevel, OBJECT *o_current)
{
if (o_current != NULL) {
switch(o_current->type) {
case(OBJ_LINE):
o_line_recalc(toplevel, o_current);
break;
case(OBJ_NET):
o_net_recalc(toplevel, o_current);
break;
case(OBJ_BUS):
o_bus_recalc(toplevel, o_current);
break;
case(OBJ_BOX):
o_box_recalc(toplevel, o_current);
break;
case(OBJ_PATH):
o_path_recalc(toplevel, o_current);
break;
case(OBJ_PICTURE):
o_picture_recalc(toplevel, o_current);
break;
case(OBJ_CIRCLE):
o_circle_recalc(toplevel, o_current);
break;
case(OBJ_COMPLEX):
case(OBJ_PLACEHOLDER):
o_complex_recalc(toplevel, o_current);
break;
case(OBJ_PIN):
o_pin_recalc(toplevel, o_current);
break;
case(OBJ_ARC):
o_arc_recalc(toplevel, o_current);
break;
case(OBJ_TEXT):
o_text_recalc(toplevel, o_current);
break;
}
}
}
/*! \brief move a net object
* \par Function Description
* This function changes the position of a net \a object.
*
* \param [in] toplevel The TOPLEVEL object
* \param [in] dx The x-distance to move the object
* \param [in] dy The y-distance to move the object
* \param [in] object The net OBJECT to be moved
*
*/
void o_net_translate_world(TOPLEVEL *toplevel, int dx, int dy,
OBJECT *object)
{
/* Update world coords */
object->line->x[0] = object->line->x[0] + dx;
object->line->y[0] = object->line->y[0] + dy;
object->line->x[1] = object->line->x[1] + dx;
object->line->y[1] = object->line->y[1] + dy;
/* Update bounding box */
o_net_recalc (toplevel, object);
s_tile_update_object(toplevel, object);
}
/*! \brief create a new net object
* \par Function Description
* This function creates and returns a new net object.
*
* \param [in] toplevel The TOPLEVEL object.
* \param [in] type The OBJECT type (usually OBJ_NET)
* \param [in] color The color of the net
* \param [in] x1 x-coord of the first point
* \param [in] y1 y-coord of the first point
* \param [in] x2 x-coord of the second point
* \param [in] y2 y-coord of the second point
* \return A new net OBJECT
*/
OBJECT *o_net_new(TOPLEVEL *toplevel, char type,
int color, int x1, int y1, int x2, int y2)
{
OBJECT *new_node;
new_node = s_basic_new_object(type, "net");
new_node->color = color;
new_node->line = (LINE *) g_malloc(sizeof(LINE));
/* check for null */
new_node->line->x[0] = x1;
new_node->line->y[0] = y1;
new_node->line->x[1] = x2;
new_node->line->y[1] = y2;
new_node->line_width = NET_WIDTH;
o_net_recalc (toplevel, new_node);
return new_node;
}
/*! \brief try to consolidate a net object
* \par Function Description
* This function tries to consolidate a net with any other object
* that is connected to the current \a object.
*
* \param toplevel The TOPLEVEL object
* \param object The object to consolidate
* \return 0 if no consolidation was possible, -1 otherwise
*
*/
static int o_net_consolidate_segments (TOPLEVEL *toplevel, OBJECT *object)
{
int object_orient;
int other_orient;
GList *c_current;
CONN *conn;
OBJECT *other_object;
PAGE *page;
int changed = 0;
g_return_val_if_fail ((toplevel != NULL), 0);
g_return_val_if_fail ((object != NULL), 0);
g_return_val_if_fail ((object->type == OBJ_NET), 0);
/* It's meaningless to do anything here if the object isn't in a page. */
page = o_get_page (toplevel, object);
g_return_val_if_fail ((page != NULL), 0);
object_orient = o_net_orientation(object);
c_current = object->conn_list;
while(c_current != NULL) {
conn = (CONN *) c_current->data;
other_object = conn->other_object;
/* only look at end points which have a valid end on the other side */
if (other_object != NULL && conn->type == CONN_ENDPOINT &&
conn->other_whichone != -1 && conn->whichone != -1 &&
o_net_consolidate_nomidpoint(object, conn->x, conn->y) ) {
if (other_object->type == OBJ_NET) {
other_orient = o_net_orientation(other_object);
/* - both objects have the same orientation (either vert or horiz) */
/* - it's not the same object */
if (object_orient == other_orient &&
object->sid != other_object->sid &&
other_orient != NEITHER) {
#if DEBUG
printf("consolidating %s to %s\n", object->name, other_object->name);
#endif
o_net_consolidate_lowlevel(object, other_object, other_orient);
changed++;
if (other_object->selected == TRUE ) {
o_selection_remove (toplevel, page->selection_list, other_object);
/* If we're consolidating with a selected object,
* ensure we select the resulting object.
*/
if (object->selected == FALSE) {
o_selection_add (toplevel, page->selection_list, object);
}
}
s_delete_object (toplevel, other_object);
o_net_recalc(toplevel, object);
s_tile_update_object(toplevel, object);
s_conn_update_object (toplevel, object);
return(-1);
}
}
}
c_current = g_list_next (c_current);
}
return(0);
}
/*! \brief try to consolidate a net object
* \par Function Description
* This function tries to consolidate a net with any other object
* that is connected to the current \a object.
*
* \param toplevel The TOPLEVEL object
* \param object The object to consolidate
* \return 0 if no consolidation was possible, -1 otherwise
*
*/
int o_net_consolidate_segments(TOPLEVEL *toplevel, OBJECT *object)
{
int object_orient;
int other_orient;
GList *c_current;
CONN *conn;
OBJECT *other_object;
int changed = 0;
int reselect_new=FALSE;
if (object == NULL) {
return(0);
}
if (object->type != OBJ_NET) {
return(0);
}
object_orient = o_net_orientation(object);
c_current = object->conn_list;
while(c_current != NULL) {
conn = (CONN *) c_current->data;
other_object = conn->other_object;
/* only look at end points which have a valid end on the other side */
if (other_object != NULL && conn->type == CONN_ENDPOINT &&
conn->other_whichone != -1 && conn->whichone != -1 &&
o_net_consolidate_nomidpoint(object, conn->x, conn->y) ) {
if (other_object->type == OBJ_NET) {
other_orient = o_net_orientation(other_object);
/* - both objects have the same orientation (either vert or horiz) */
/* - it's not the same object */
if (object_orient == other_orient &&
object->sid != other_object->sid &&
other_orient != NEITHER) {
#if DEBUG
printf("consolidating %s to %s\n", object->name, other_object->name);
#endif
o_net_consolidate_lowlevel(object, other_object, other_orient);
changed++;
if (other_object->selected == TRUE ) {
o_selection_remove( toplevel->page_current->selection_list, other_object );
reselect_new=TRUE;
}
if (reselect_new == TRUE) {
o_selection_remove( toplevel->page_current->selection_list, object );
o_selection_add( toplevel->page_current->selection_list, object );
}
s_conn_remove_object (toplevel, other_object);
s_page_remove (toplevel->page_current, other_object);
s_delete_object (toplevel, other_object);
o_net_recalc(toplevel, object);
s_tile_update_object(toplevel, object);
s_conn_update_object (toplevel, object);
return(-1);
}
}
}
c_current = g_list_next (c_current);
}
return(0);
}