static void core_loadimage_fig(GVJ_t * job, usershape_t *us, boxf bf, bool filled) { int object_code = 2; /* always 2 for polyline */ int sub_type = 5; /* always 5 for image */ int line_style = 0; /* solid, dotted, dashed */ int thickness = 0; int pen_color = 0; int fill_color = -1; int depth = 1; int pen_style = -1; /* not used */ int area_fill = 0; double style_val = 0.0; int join_style = 0; int cap_style = 0; int radius = 0; int forward_arrow = 0; int backward_arrow = 0; int npoints = 5; int flipped = 0; box b; assert(job); assert(us); assert(us->name); assert(us->f); BF2B(bf, b); core_printf(job, "%d %d %d %d %d %d %d %d %d %.1f %d %d %d %d %d %d\n %d %s\n", object_code, sub_type, line_style, thickness, pen_color, fill_color, depth, pen_style, area_fill, style_val, join_style, cap_style, radius, forward_arrow, backward_arrow, npoints, flipped, us->name); core_printf(job," %d %d %d %d %d %d %d %d %d %d\n", b.LL.x, b.LL.y, b.LL.x, b.UR.y, b.UR.x, b.UR.y, b.UR.x, b.LL.y, b.LL.x, b.LL.y); }
/* finalCC: * Set graph bounding box given list of connected * components, each with its bounding box set. * If c_cnt > 1, then pts != NULL and gives translations for components. * Add margin about whole graph unless isRoot is true. * Reposition nodes based on final position of * node's connected component. * Also, entire layout is translated to origin. */ static void finalCC(graph_t * g, int c_cnt, graph_t ** cc, point * pts, graph_t * rg, layout_info* infop) { attrsym_t * G_width = infop->G_width; attrsym_t * G_height = infop->G_height; graph_t *cg; box b, bb; boxf bbf; point pt; int margin; graph_t **cp = cc; point *pp = pts; int isRoot = (rg == infop->rootg); int isEmpty = 0; /* compute graph bounding box in points */ if (c_cnt) { cg = *cp++; BF2B(GD_bb(cg), bb); if (c_cnt > 1) { pt = *pp++; bb.LL.x += pt.x; bb.LL.y += pt.y; bb.UR.x += pt.x; bb.UR.y += pt.y; while ((cg = *cp++)) { BF2B(GD_bb(cg), b); pt = *pp++; b.LL.x += pt.x; b.LL.y += pt.y; b.UR.x += pt.x; b.UR.y += pt.y; bb.LL.x = MIN(bb.LL.x, b.LL.x); bb.LL.y = MIN(bb.LL.y, b.LL.y); bb.UR.x = MAX(bb.UR.x, b.UR.x); bb.UR.y = MAX(bb.UR.y, b.UR.y); } } } else { /* empty graph */ bb.LL.x = 0; bb.LL.y = 0; bb.UR.x = late_int(rg, G_width, POINTS(DEFAULT_NODEWIDTH), 3); bb.UR.y = late_int(rg, G_height, POINTS(DEFAULT_NODEHEIGHT), 3); isEmpty = 1; } if (GD_label(rg)) { point p; int d; isEmpty = 0; PF2P(GD_label(rg)->dimen, p); d = p.x - (bb.UR.x - bb.LL.x); if (d > 0) { /* height of label added below */ d /= 2; bb.LL.x -= d; bb.UR.x += d; } } if (isRoot || isEmpty) margin = 0; else margin = late_int (g, G_margin, CL_OFFSET, 0); pt.x = -bb.LL.x + margin; pt.y = -bb.LL.y + margin + GD_border(rg)[BOTTOM_IX].y; bb.LL.x = 0; bb.LL.y = 0; bb.UR.x += pt.x + margin; bb.UR.y += pt.y + margin + GD_border(rg)[TOP_IX].y; /* translate nodes */ if (c_cnt) { cp = cc; pp = pts; while ((cg = *cp++)) { point p; node_t *n; pointf del; if (pp) { p = *pp++; p.x += pt.x; p.y += pt.y; } else { p = pt; } del.x = PS2INCH(p.x); del.y = PS2INCH(p.y); for (n = agfstnode(cg); n; n = agnxtnode(cg, n)) { ND_pos(n)[0] += del.x; ND_pos(n)[1] += del.y; } } } bbf.LL.x = PS2INCH(bb.LL.x); bbf.LL.y = PS2INCH(bb.LL.y); bbf.UR.x = PS2INCH(bb.UR.x); bbf.UR.y = PS2INCH(bb.UR.y); BB(g) = bbf; }