/*! \brief Create a character string representation of a circle OBJECT.
* \par Function Description
* This function formats a string in the buffer <B>*buff</B> to describe the
* circle object <B>*object</B>.
* It follows the post-20000704 release file format that handle the line
* type and fill options.
*
* \param [in] object Circle OBJECT to create string from.
* \return A pointer to the circle OBJECT character string.
*
* \note
* Caller must g_free returned character string.
*
*/
gchar*
geda_circle_object_to_buffer (const GedaObject *object)
{
g_return_val_if_fail (object != NULL, NULL);
g_return_val_if_fail (object->circle != NULL, NULL);
g_return_val_if_fail (object->type == OBJ_CIRCLE, NULL);
return g_strdup_printf ("%c %d %d %d %d %d %d %d %d %d %d %d %d %d %d %d",
OBJ_CIRCLE,
geda_circle_object_get_center_x (object),
geda_circle_object_get_center_y (object),
geda_circle_object_get_radius (object),
geda_object_get_color (object),
object->line_width,
object->line_end,
object->line_type,
object->line_length,
object->line_space,
object->fill_type,
object->fill_width,
object->fill_angle1,
object->fill_pitch1,
object->fill_angle2,
object->fill_pitch2);
}
/* text item */
OBJECT *o_attrib_add_attrib(GschemToplevel *w_current,
const char *text_string, int visibility,
int show_name_value, OBJECT *object)
{
TOPLEVEL *toplevel = gschem_toplevel_get_toplevel (w_current);
OBJECT *new_obj;
int world_x = - 1, world_y = -1;
int align = LOWER_LEFT;
int angle = 0;
int color;
int left, right, top, bottom;
OBJECT *o_current;
color = DETACHED_ATTRIBUTE_COLOR;
o_current = object;
/* creating a toplevel or unattached attribute */
if (o_current) {
/* get coordinates of where to place the text object */
switch(o_current->type) {
case(OBJ_COMPLEX):
case(OBJ_PLACEHOLDER):
world_x = o_current->complex->x;
world_y = o_current->complex->y;
align = LOWER_LEFT;
angle = 0;
color = ATTRIBUTE_COLOR;
break;
case(OBJ_ARC):
world_x = geda_arc_object_get_center_x (o_current);
world_y = geda_arc_object_get_center_y (o_current);
align = LOWER_LEFT;
angle = 0;
color = ATTRIBUTE_COLOR;
break;
case(OBJ_CIRCLE):
world_x = geda_circle_object_get_center_x (o_current);
world_y = geda_circle_object_get_center_y (o_current);
align = LOWER_LEFT;
angle = 0;
color = ATTRIBUTE_COLOR;
break;
case(OBJ_BOX):
world_x = o_current->box->upper_x;
world_y = o_current->box->upper_y;
align = LOWER_LEFT;
angle = 0;
color = ATTRIBUTE_COLOR;
break;
case(OBJ_LINE):
case(OBJ_NET):
case(OBJ_PIN):
case(OBJ_BUS):
{
int dx = o_current->line->x[1] - o_current->line->x[0];
int dy = o_current->line->y[1] - o_current->line->y[0];
if (dy == 0) {
if (dx > 0) {
world_x = o_current->line->x[0] + SPACING_FROM_END;
world_y = o_current->line->y[0] + SPACING_PERPENDICULAR;
align = LOWER_LEFT;
angle = 0;
}
else {
world_x = o_current->line->x[0] - SPACING_FROM_END;
world_y = o_current->line->y[0] + SPACING_PERPENDICULAR;
align = LOWER_RIGHT;
angle = 0;
}
}
else if (dx == 0) {
if (dy > 0) {
world_x = o_current->line->x[0] - SPACING_PERPENDICULAR;
world_y = o_current->line->y[0] + SPACING_FROM_END;
align = LOWER_LEFT;
angle = 90;
}
else {
world_x = o_current->line->x[0] - SPACING_PERPENDICULAR;
world_y = o_current->line->y[0] - SPACING_FROM_END;
align = LOWER_RIGHT;
angle = 90;
}
}
else {
world_x = o_current->line->x[0];
world_y = o_current->line->y[0];
align = LOWER_LEFT;
angle = 0;
}
color = ATTRIBUTE_COLOR;
}
break;
case(OBJ_TEXT):
world_x = o_current->text->x;
world_y = o_current->text->y;
color = DETACHED_ATTRIBUTE_COLOR;
align = LOWER_LEFT;
angle = 0;
o_current = NULL;
break;
}
} else {
world_get_object_glist_bounds (toplevel,
s_page_objects (toplevel->page_current),
&left, &top, &right, &bottom);
/* this really is the lower left hand corner */
world_x = left;
world_y = top;
/* printf("%d %d\n", world_x, world_y); */
align = LOWER_LEFT;
angle = 0;
color = DETACHED_ATTRIBUTE_COLOR;
}
/* first create text item */
new_obj = geda_text_object_new (toplevel,
color,
world_x,
world_y,
align,
angle,
text_string,
w_current->text_size, /* current text size */
visibility,
show_name_value);
s_page_append (toplevel, toplevel->page_current, new_obj);
/* now attach the attribute to the object (if o_current is not NULL) */
/* remember that o_current contains the object to get the attribute */
if (o_current) {
o_attrib_attach (toplevel, new_obj, o_current, FALSE);
}
o_selection_add (toplevel, toplevel->page_current->selection_list, new_obj);
/* handle slot= attribute, it's a special case */
if (o_current != NULL &&
g_ascii_strncasecmp (text_string, "slot=", 5) == 0) {
o_slot_end (w_current, o_current, text_string);
}
/* Call add-objects-hook. */
g_run_hook_object (w_current, "%add-objects-hook", new_obj);
g_run_hook_object (w_current, "%select-objects-hook", new_obj);
gschem_toplevel_page_content_changed (w_current, toplevel->page_current);
return new_obj;
}
