]> git.saurik.com Git - bison.git/blame - src/vcg.c
(reduce_grammar): Remove unnecessary cast to bool.
[bison.git] / src / vcg.c
CommitLineData
ce4d5ce0 1/* VCG description handler for Bison.
4613f49b 2
a8999f94 3 Copyright (C) 2001, 2002, 2003, 2004, 2005 Free Software Foundation, Inc.
ce4d5ce0
AD
4
5 This file is part of Bison, the GNU Compiler Compiler.
6
7 Bison is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
10 any later version.
11
12 Bison is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with Bison; see the file COPYING. If not, write to
0fb669f9
PE
19 the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
20 Boston, MA 02110-1301, USA. */
ce4d5ce0 21
2cec9080 22#include <config.h>
ce4d5ce0 23#include "system.h"
17ee7397
PE
24
25#include <quotearg.h>
26
ce4d5ce0
AD
27#include "vcg.h"
28#include "vcg_defaults.h"
08a946e0 29
e5fb6710
AD
30/* Return an unambiguous printable representated, for NAME, suitable
31 for C strings. Use slot 2 since the user may use slots 0 and 1.
32 */
33
08a946e0
AD
34static char const *
35quote (char const *name)
36{
e5fb6710 37 return quotearg_n_style (2, c_quoting_style, name);
08a946e0
AD
38}
39
ce4d5ce0
AD
40
41/* Initialize a graph with the default values. */
42void
17ee7397 43new_graph (graph *g)
ce4d5ce0
AD
44{
45 g->title = G_TITLE;
46 g->label = G_LABEL;
3e3da797 47
ce4d5ce0
AD
48 g->infos[0] = G_INFOS1;
49 g->infos[1] = G_INFOS2;
50 g->infos[2] = G_INFOS3;
3e3da797 51
ce4d5ce0
AD
52 g->color = G_COLOR;
53 g->textcolor = G_TEXTCOLOR;
54 g->bordercolor = G_BORDERCOLOR;
3e3da797 55
ce4d5ce0
AD
56 g->width = G_WIDTH;
57 g->height = G_HEIGHT;
58 g->borderwidth = G_BORDERWIDTH;
59 g->x = G_X;
60 g->y = G_Y;
61 g->folding = G_FOLDING;
62 g->shrink = G_SHRINK;
ea193b9d 63 g->stretch = G_STRETCH;
ce4d5ce0
AD
64
65 g->textmode = G_TEXTMODE;
66 g->shape = G_SHAPE;
3e3da797 67
342b8b6e
AD
68 g->vertical_order = G_VERTICAL_ORDER;
69 g->horizontal_order = G_HORIZONTAL_ORDER;
70
ce4d5ce0
AD
71 g->xmax = G_XMAX; /* Not output. */
72 g->ymax = G_YMAX; /* Not output. */
3e3da797 73
ce4d5ce0
AD
74 g->xbase = G_XBASE;
75 g->ybase = G_YBASE;
76
77 g->xspace = G_XSPACE;
78 g->yspace = G_YSPACE;
79 g->xlspace = G_XLSPACE; /* Not output. */
3e3da797 80
ce4d5ce0
AD
81 g->xraster = G_XRASTER;
82 g->yraster = G_YRASTER;
83 g->xlraster = G_XLRASTER;
84
85 g->hidden = G_HIDDEN; /* No default value. */
86
87 g->classname = G_CLASSNAME; /* No class name association. */
3e3da797 88
ce4d5ce0
AD
89 g->layout_downfactor = G_LAYOUT_DOWNFACTOR;
90 g->layout_upfactor = G_LAYOUT_UPFACTOR;
91 g->layout_nearfactor = G_LAYOUT_NEARFACTOR;
92 g->layout_splinefactor = G_LAYOUT_SPLINEFACTOR;
3e3da797 93
ce4d5ce0
AD
94 g->late_edge_labels = G_LATE_EDGE_LABELS;
95 g->display_edge_labels = G_DISPLAY_EDGE_LABELS;
96 g->dirty_edge_labels = G_DIRTY_EDGE_LABELS;
97 g->finetuning = G_FINETUNING;
98 g->ignore_singles = G_IGNORE_SINGLES;
ce4d5ce0
AD
99 g->priority_phase = G_PRIORITY_PHASE;
100 g->manhattan_edges = G_MANHATTAN_EDGES;
101 g->smanhattan_edges = G_SMANHATTAN_EDGES;
102 g->near_edges = G_NEAR_EDGES;
3e3da797 103
ce4d5ce0 104 g->orientation = G_ORIENTATION;
17ee7397 105 g->node_alignment = G_NODE_ALIGNMENT;
ce4d5ce0
AD
106 g->port_sharing = G_PORT_SHARING;
107 g->arrow_mode = G_ARROW_MODE;
108 g->treefactor = G_TREEFACTOR;
109 g->spreadlevel = G_SPREADLEVEL;
110 g->crossing_weight = G_CROSSING_WEIGHT;
111 g->crossing_phase2 = G_CROSSING_PHASE2;
112 g->crossing_optimization = G_CROSSING_OPTIMIZATION;
113 g->view = G_VIEW;
114
115 g->edges = G_EDGES;
116 g->nodes = G_NODES;
117 g->splines = G_SPLINES;
118
119 g->bmax = G_BMAX;
120 g->cmin = G_CMIN;
121 g->cmax = G_CMAX;
122 g->pmin = G_PMIN;
123 g->pmax = G_PMAX;
124 g->rmin = G_RMIN;
125 g->rmax = G_RMAX;
126 g->smax = G_SMAX;
3e3da797 127
ce4d5ce0
AD
128 g->node_list = G_NODE_LIST;
129 g->edge_list = G_EDGE_LIST;
3e3da797 130
17ee7397
PE
131 new_edge (&g->edge);
132 new_node (&g->node);
ce4d5ce0
AD
133}
134
17ee7397 135/* Initialize a node with the default values. */
ce4d5ce0 136void
17ee7397 137new_node (node *n)
ce4d5ce0 138{
17ee7397
PE
139 n->title = N_TITLE;
140 n->label = N_LABEL;
3e3da797 141
17ee7397
PE
142 n->locx = N_LOCX; /* Default unspcified. */
143 n->locy = N_LOCY; /* Default unspcified. */
3e3da797 144
17ee7397
PE
145 n->vertical_order = N_VERTICAL_ORDER; /* Default unspcified. */
146 n->horizontal_order = N_HORIZONTAL_ORDER; /* Default unspcified. */
3e3da797 147
17ee7397
PE
148 n->width = N_WIDTH; /* We assume that we can't define it now. */
149 n->height = N_HEIGHT; /* Also. */
3e3da797 150
17ee7397 151 n->shrink = N_SHRINK;
ea193b9d 152 n->stretch = N_STRETCH;
3e3da797 153
17ee7397 154 n->folding = N_FOLDING; /* No explicit default value. */
3e3da797 155
17ee7397
PE
156 n->shape = N_SHAPE;
157 n->textmode = N_TEXTMODE;
158 n->borderwidth = N_BORDERWIDTH;
3e3da797 159
17ee7397
PE
160 n->color = N_COLOR;
161 n->textcolor = N_TEXTCOLOR;
162 n->bordercolor = N_BORDERCOLOR;
3e3da797 163
17ee7397
PE
164 n->infos[0] = N_INFOS1;
165 n->infos[1] = N_INFOS2;
166 n->infos[2] = N_INFOS3;
3e3da797 167
17ee7397 168 n->next = N_NEXT;
ce4d5ce0
AD
169}
170
17ee7397 171/* Initialize an edge with the default values. */
ce4d5ce0 172void
17ee7397 173new_edge (edge *e)
ce4d5ce0 174{
17ee7397 175 e->type = E_EDGE_TYPE;
ce4d5ce0 176
17ee7397
PE
177 e->sourcename = E_SOURCENAME;
178 e->targetname = E_TARGETNAME;
179 e->label = E_LABEL;
ce4d5ce0 180
17ee7397
PE
181 e->linestyle = E_LINESTYLE;
182 e->thickness = E_THICKNESS;
ce4d5ce0 183
17ee7397 184 e->class = E_CLASS;
ce4d5ce0 185
17ee7397
PE
186 e->color = E_COLOR;
187 e->textcolor = E_TEXTCOLOR;
188 e->arrowcolor = E_ARROWCOLOR;
189 e->backarrowcolor = E_BACKARROWCOLOR;
ce4d5ce0 190
17ee7397
PE
191 e->arrowsize = E_ARROWSIZE;
192 e->backarrowsize = E_BACKARROWSIZE;
193 e->arrowstyle = E_ARROWSTYLE;
ce4d5ce0 194
17ee7397 195 e->backarrowstyle = E_BACKARROWSTYLE;
ce4d5ce0 196
17ee7397 197 e->priority = E_PRIORITY;
ce4d5ce0 198
17ee7397 199 e->anchor = E_ANCHOR;
ce4d5ce0 200
17ee7397 201 e->horizontal_order = E_HORIZONTAL_ORDER;
ce4d5ce0 202
17ee7397 203 e->next = E_NEXT;
ce4d5ce0
AD
204}
205
206/*----------------------------------------------.
04098407 207| Get functions. |
ce4d5ce0
AD
208| Return string corresponding to an enum value. |
209`----------------------------------------------*/
210
211static const char *
a737b216 212get_color_str (enum color color)
ce4d5ce0 213{
a737b216 214 switch (color)
ce4d5ce0 215 {
3e3da797
AD
216 case white: return "white";
217 case blue: return "blue";
218 case red: return "red";
219 case green: return "green";
220 case yellow: return "yellow";
221 case magenta: return "magenta";
222 case cyan: return "cyan";
223 case darkgrey: return "darkgrey";
224 case darkblue: return "darkblue";
225 case darkred: return "darkred";
226 case darkgreen: return "darkgreen";
227 case darkyellow: return "darkyellow";
228 case darkmagenta: return "darkmagenta";
229 case darkcyan: return "darkcyan";
230 case gold: return "gold";
231 case lightgrey: return "lightgrey";
232 case lightblue: return "lightblue";
233 case lightred: return "lightred";
234 case lightgreen: return "lightgreen";
235 case lightyellow: return "lightyellow";
236 case lightmagenta: return "lightmagenta";
237 case lightcyan: return "lightcyan";
238 case lilac: return "lilac";
239 case turquoise: return "turquoise";
240 case aquamarine: return "aquamarine";
241 case khaki: return "khaki";
242 case purple: return "purple";
243 case yellowgreen: return "yellowgreen";
244 case pink: return "pink";
245 case orange: return "orange";
246 case orchid: return "orchid";
247 case black: return "black";
4344c500 248 default: abort (); return NULL;
ce4d5ce0 249 }
ce4d5ce0
AD
250}
251
252static const char *
a737b216 253get_textmode_str (enum textmode textmode)
ce4d5ce0 254{
a737b216 255 switch (textmode)
ce4d5ce0 256 {
3e3da797
AD
257 case centered: return "center";
258 case left_justify: return "left_justify";
259 case right_justify: return "right_justify";
4344c500 260 default: abort (); return NULL;
ce4d5ce0 261 }
ce4d5ce0
AD
262}
263
264static const char *
a737b216 265get_shape_str (enum shape shape)
ce4d5ce0 266{
a737b216 267 switch (shape)
ce4d5ce0 268 {
3e3da797
AD
269 case box: return "box";
270 case rhomb: return "rhomb";
271 case ellipse: return "ellipse";
272 case triangle: return "triangle";
4344c500 273 default: abort (); return NULL;
ce4d5ce0 274 }
ce4d5ce0
AD
275}
276
ce4d5ce0 277static const char *
a737b216 278get_decision_str (enum decision decision)
ce4d5ce0 279{
a737b216 280 switch (decision)
ce4d5ce0 281 {
3e3da797
AD
282 case no: return "no";
283 case yes: return "yes";
4344c500 284 default: abort (); return NULL;
ce4d5ce0 285 }
ce4d5ce0
AD
286}
287
288static const char *
a737b216 289get_orientation_str (enum orientation orientation)
ce4d5ce0 290{
a737b216 291 switch (orientation)
ce4d5ce0 292 {
3e3da797
AD
293 case top_to_bottom: return "top_to_bottom";
294 case bottom_to_top: return "bottom_to_top";
295 case left_to_right: return "left_to_right";
296 case right_to_left: return "right_to_left";
4344c500 297 default: abort (); return NULL;
ce4d5ce0 298 }
ce4d5ce0
AD
299}
300
301static const char *
a737b216 302get_node_alignment_str (enum alignment alignment)
ce4d5ce0 303{
a737b216 304 switch (alignment)
ce4d5ce0 305 {
3e3da797
AD
306 case center: return "center";
307 case top: return "top";
308 case bottom: return "bottom";
4344c500 309 default: abort (); return NULL;
ce4d5ce0 310 }
ce4d5ce0
AD
311}
312
313static const char *
a737b216 314get_arrow_mode_str (enum arrow_mode arrow_mode)
ce4d5ce0 315{
a737b216 316 switch (arrow_mode)
ce4d5ce0 317 {
3e3da797
AD
318 case fixed: return "fixed";
319 case free_a: return "free";
4344c500 320 default: abort (); return NULL;
ce4d5ce0 321 }
ce4d5ce0
AD
322}
323
324static const char *
a737b216 325get_crossing_type_str (enum crossing_type crossing_type)
ce4d5ce0 326{
a737b216 327 switch (crossing_type)
ce4d5ce0 328 {
3e3da797
AD
329 case bary: return "bary";
330 case median: return "median";
331 case barymedian: return "barymedian";
332 case medianbary: return "medianbary";
4344c500 333 default: abort (); return NULL;
3e3da797 334 }
ce4d5ce0
AD
335}
336
337static const char *
a737b216 338get_view_str (enum view view)
ce4d5ce0 339{
a8999f94
PE
340 /* There is no way with vcg 1.30 to specify a normal view explicitly,
341 so it is an error here if view == normal_view. */
a737b216 342 switch (view)
ce4d5ce0 343 {
3e3da797
AD
344 case cfish: return "cfish";
345 case pfish: return "pfish";
346 case fcfish: return "fcfish";
347 case fpfish: return "fpfish";
4344c500 348 default: abort (); return NULL;
ce4d5ce0 349 }
ce4d5ce0
AD
350}
351
352static const char *
a737b216 353get_linestyle_str (enum linestyle linestyle)
ce4d5ce0 354{
a737b216 355 switch (linestyle)
ce4d5ce0 356 {
3e3da797
AD
357 case continuous: return "continuous";
358 case dashed: return "dashed";
359 case dotted: return "dotted";
360 case invisible: return "invisible";
4344c500 361 default: abort (); return NULL;
3e3da797 362 }
ce4d5ce0
AD
363}
364
365static const char *
a737b216 366get_arrowstyle_str (enum arrowstyle arrowstyle)
ce4d5ce0 367{
a737b216 368 switch (arrowstyle)
ce4d5ce0 369 {
3e3da797
AD
370 case solid: return "solid";
371 case line: return "line";
372 case none: return "none";
4344c500 373 default: abort (); return NULL;
ce4d5ce0 374 }
ce4d5ce0
AD
375}
376
17ee7397 377/*------------------------------.
04098407 378| Add functions. |
17ee7397
PE
379| Edge and nodes into a graph. |
380`------------------------------*/
ce4d5ce0
AD
381
382void
17ee7397 383add_node (graph *g, node *n)
ce4d5ce0 384{
17ee7397
PE
385 n->next = g->node_list;
386 g->node_list = n;
ce4d5ce0
AD
387}
388
389void
17ee7397 390add_edge (graph *g, edge *e)
ce4d5ce0 391{
17ee7397
PE
392 e->next = g->edge_list;
393 g->edge_list = e;
ce4d5ce0
AD
394}
395
342b8b6e 396void
17ee7397 397add_classname (graph *g, int val, const char *name)
342b8b6e 398{
da2a7671 399 struct classname *classname = xmalloc (sizeof *classname);
342b8b6e
AD
400 classname->no = val;
401 classname->name = name;
402 classname->next = g->classname;
403 g->classname = classname;
404}
405
406void
17ee7397 407add_infoname (graph *g, int integer, const char *str)
342b8b6e 408{
da2a7671 409 struct infoname *infoname = xmalloc (sizeof *infoname);
342b8b6e 410 infoname->integer = integer;
17ee7397 411 infoname->chars = str;
342b8b6e
AD
412 infoname->next = g->infoname;
413 g->infoname = infoname;
414}
415
416/* Build a colorentry struct and add it to the list. */
417void
17ee7397 418add_colorentry (graph *g, int color_idx, int red_cp,
342b8b6e
AD
419 int green_cp, int blue_cp)
420{
da2a7671 421 struct colorentry *ce = xmalloc (sizeof *ce);
342b8b6e
AD
422 ce->color_index = color_idx;
423 ce->red_cp = red_cp;
424 ce->green_cp = green_cp;
425 ce->blue_cp = blue_cp;
426 ce->next = g->colorentry;
427 g->colorentry = ce;
428}
429
ce4d5ce0
AD
430/*-------------------------------------.
431| Open and close functions (formatted) |
432`-------------------------------------*/
433
434void
17ee7397 435open_edge (edge *e, FILE *fout)
ce4d5ce0 436{
17ee7397 437 switch (e->type)
ce4d5ce0
AD
438 {
439 case normal_edge:
342b8b6e 440 fputs ("\tedge: {\n", fout);
ce4d5ce0
AD
441 break;
442 case back_edge:
342b8b6e 443 fputs ("\tbackedge: {\n", fout);
ce4d5ce0
AD
444 break;
445 case near_edge:
342b8b6e 446 fputs ("\tnearedge: {\n", fout);
ce4d5ce0
AD
447 break;
448 case bent_near_edge:
342b8b6e 449 fputs ("\tbentnearedge: {\n", fout);
3e3da797 450 break;
ce4d5ce0 451 default:
342b8b6e 452 fputs ("\tedge: {\n", fout);
3e3da797 453 }
ce4d5ce0
AD
454}
455
456void
17ee7397 457close_edge (FILE *fout)
ce4d5ce0 458{
342b8b6e 459 fputs ("\t}\n", fout);
ce4d5ce0
AD
460}
461
462void
17ee7397 463open_node (FILE *fout)
ce4d5ce0 464{
342b8b6e 465 fputs ("\tnode: {\n", fout);
ce4d5ce0
AD
466}
467
468void
17ee7397 469close_node (FILE *fout)
3e3da797 470{
342b8b6e 471 fputs ("\t}\n", fout);
ce4d5ce0
AD
472}
473
474void
17ee7397 475open_graph (FILE *fout)
ce4d5ce0 476{
342b8b6e 477 fputs ("graph: {\n", fout);
ce4d5ce0
AD
478}
479
480void
17ee7397 481close_graph (graph *g, FILE *fout)
ce4d5ce0 482{
342b8b6e 483 fputc ('\n', fout);
ce4d5ce0 484
342b8b6e 485 /* FIXME: Unallocate nodes and edges if required. */
ce4d5ce0 486 {
17ee7397 487 node *n;
3e3da797 488
17ee7397 489 for (n = g->node_list; n; n = n->next)
ce4d5ce0 490 {
342b8b6e 491 open_node (fout);
17ee7397 492 output_node (n, fout);
342b8b6e 493 close_node (fout);
ce4d5ce0
AD
494 }
495 }
3e3da797 496
342b8b6e 497 fputc ('\n', fout);
3e3da797 498
ce4d5ce0 499 {
17ee7397 500 edge *e;
3e3da797 501
17ee7397 502 for (e = g->edge_list; e; e = e->next)
3e3da797 503 {
17ee7397
PE
504 open_edge (e, fout);
505 output_edge (e, fout);
342b8b6e 506 close_edge (fout);
ce4d5ce0
AD
507 }
508 }
3e3da797 509
342b8b6e 510 fputs ("}\n", fout);
3e3da797
AD
511}
512
ce4d5ce0 513/*-------------------------------------------.
342b8b6e 514| Output functions (formatted) in file FOUT |
ce4d5ce0
AD
515`-------------------------------------------*/
516
517void
17ee7397 518output_node (node *n, FILE *fout)
ce4d5ce0 519{
17ee7397
PE
520 if (n->title != N_TITLE)
521 fprintf (fout, "\t\ttitle:\t%s\n", quote (n->title));
522 if (n->label != N_LABEL)
523 fprintf (fout, "\t\tlabel:\t%s\n", quote (n->label));
ce4d5ce0 524
17ee7397
PE
525 if ((n->locx != N_LOCX) && (n->locy != N_LOCY))
526 fprintf (fout, "\t\tloc { x: %d y: %d }\t\n", n->locx, n->locy);
3e3da797 527
17ee7397
PE
528 if (n->vertical_order != N_VERTICAL_ORDER)
529 fprintf (fout, "\t\tvertical_order:\t%d\n", n->vertical_order);
530 if (n->horizontal_order != N_HORIZONTAL_ORDER)
531 fprintf (fout, "\t\thorizontal_order:\t%d\n", n->horizontal_order);
3e3da797 532
17ee7397
PE
533 if (n->width != N_WIDTH)
534 fprintf (fout, "\t\twidth:\t%d\n", n->width);
535 if (n->height != N_HEIGHT)
536 fprintf (fout, "\t\theight:\t%d\n", n->height);
3e3da797 537
17ee7397
PE
538 if (n->shrink != N_SHRINK)
539 fprintf (fout, "\t\tshrink:\t%d\n", n->shrink);
ea193b9d
PE
540 if (n->stretch != N_STRETCH)
541 fprintf (fout, "\t\tstretch:\t%d\n", n->stretch);
3e3da797 542
17ee7397
PE
543 if (n->folding != N_FOLDING)
544 fprintf (fout, "\t\tfolding:\t%d\n", n->folding);
3e3da797 545
17ee7397 546 if (n->textmode != N_TEXTMODE)
342b8b6e 547 fprintf (fout, "\t\ttextmode:\t%s\n",
17ee7397 548 get_textmode_str (n->textmode));
3e3da797 549
17ee7397
PE
550 if (n->shape != N_SHAPE)
551 fprintf (fout, "\t\tshape:\t%s\n", get_shape_str (n->shape));
3e3da797 552
17ee7397
PE
553 if (n->borderwidth != N_BORDERWIDTH)
554 fprintf (fout, "\t\tborderwidth:\t%d\n", n->borderwidth);
3e3da797 555
17ee7397
PE
556 if (n->color != N_COLOR)
557 fprintf (fout, "\t\tcolor:\t%s\n", get_color_str (n->color));
558 if (n->textcolor != N_TEXTCOLOR)
342b8b6e 559 fprintf (fout, "\t\ttextcolor:\t%s\n",
17ee7397
PE
560 get_color_str (n->textcolor));
561 if (n->bordercolor != N_BORDERCOLOR)
342b8b6e 562 fprintf (fout, "\t\tbordercolor:\t%s\n",
17ee7397 563 get_color_str (n->bordercolor));
3e3da797 564
08a946e0
AD
565 {
566 int i;
567 for (i = 0; i < 3; ++i)
17ee7397 568 if (n->infos[i])
08a946e0 569 fprintf (fout, "\t\tinfo%d:\t%s\n",
17ee7397 570 i, quote (n->infos[i]));
08a946e0 571 }
ce4d5ce0
AD
572}
573
574void
17ee7397 575output_edge (edge *e, FILE *fout)
ce4d5ce0 576{
600cad3b
MA
577 /* FIXME: SOURCENAME and TARGETNAME are mandatory
578 so it has to be fatal not to give these informations. */
17ee7397
PE
579 if (e->sourcename != E_SOURCENAME)
580 fprintf (fout, "\t\tsourcename:\t%s\n", quote (e->sourcename));
581 if (e->targetname != E_TARGETNAME)
582 fprintf (fout, "\t\ttargetname:\t%s\n", quote (e->targetname));
3e3da797 583
17ee7397
PE
584 if (e->label != E_LABEL)
585 fprintf (fout, "\t\tlabel:\t%s\n", quote (e->label));
ce4d5ce0 586
17ee7397 587 if (e->linestyle != E_LINESTYLE)
080e7348 588 fprintf (fout, "\t\tlinestyle:\t%s\n", get_linestyle_str (e->linestyle));
3e3da797 589
17ee7397
PE
590 if (e->thickness != E_THICKNESS)
591 fprintf (fout, "\t\tthickness:\t%d\n", e->thickness);
592 if (e->class != E_CLASS)
593 fprintf (fout, "\t\tclass:\t%d\n", e->class);
ce4d5ce0 594
17ee7397
PE
595 if (e->color != E_COLOR)
596 fprintf (fout, "\t\tcolor:\t%s\n", get_color_str (e->color));
597 if (e->color != E_TEXTCOLOR)
342b8b6e 598 fprintf (fout, "\t\ttextcolor:\t%s\n",
17ee7397
PE
599 get_color_str (e->textcolor));
600 if (e->arrowcolor != E_ARROWCOLOR)
342b8b6e 601 fprintf (fout, "\t\tarrowcolor:\t%s\n",
17ee7397
PE
602 get_color_str (e->arrowcolor));
603 if (e->backarrowcolor != E_BACKARROWCOLOR)
342b8b6e 604 fprintf (fout, "\t\tbackarrowcolor:\t%s\n",
17ee7397 605 get_color_str (e->backarrowcolor));
ce4d5ce0 606
17ee7397
PE
607 if (e->arrowsize != E_ARROWSIZE)
608 fprintf (fout, "\t\tarrowsize:\t%d\n", e->arrowsize);
609 if (e->backarrowsize != E_BACKARROWSIZE)
610 fprintf (fout, "\t\tbackarrowsize:\t%d\n", e->backarrowsize);
3e3da797 611
17ee7397 612 if (e->arrowstyle != E_ARROWSTYLE)
342b8b6e 613 fprintf (fout, "\t\tarrowstyle:\t%s\n",
17ee7397
PE
614 get_arrowstyle_str (e->arrowstyle));
615 if (e->backarrowstyle != E_BACKARROWSTYLE)
342b8b6e 616 fprintf (fout, "\t\tbackarrowstyle:\t%s\n",
17ee7397
PE
617 get_arrowstyle_str (e->backarrowstyle));
618
619 if (e->priority != E_PRIORITY)
620 fprintf (fout, "\t\tpriority:\t%d\n", e->priority);
621 if (e->anchor != E_ANCHOR)
622 fprintf (fout, "\t\tanchor:\t%d\n", e->anchor);
623 if (e->horizontal_order != E_HORIZONTAL_ORDER)
624 fprintf (fout, "\t\thorizontal_order:\t%d\n", e->horizontal_order);
ce4d5ce0
AD
625}
626
627void
17ee7397 628output_graph (graph *g, FILE *fout)
ce4d5ce0 629{
17ee7397
PE
630 if (g->title)
631 fprintf (fout, "\ttitle:\t%s\n", quote (g->title));
632 if (g->label)
633 fprintf (fout, "\tlabel:\t%s\n", quote (g->label));
3e3da797 634
08a946e0
AD
635 {
636 int i;
637 for (i = 0; i < 3; ++i)
17ee7397
PE
638 if (g->infos[i])
639 fprintf (fout, "\tinfo%d:\t%s\n", i, quote (g->infos[i]));
08a946e0 640 }
3e3da797 641
17ee7397
PE
642 if (g->color != G_COLOR)
643 fprintf (fout, "\tcolor:\t%s\n", get_color_str (g->color));
644 if (g->textcolor != G_TEXTCOLOR)
645 fprintf (fout, "\ttextcolor:\t%s\n", get_color_str (g->textcolor));
646 if (g->bordercolor != G_BORDERCOLOR)
342b8b6e 647 fprintf (fout, "\tbordercolor:\t%s\n",
17ee7397 648 get_color_str (g->bordercolor));
3e3da797 649
17ee7397
PE
650 if (g->width != G_WIDTH)
651 fprintf (fout, "\twidth:\t%d\n", g->width);
652 if (g->height != G_HEIGHT)
653 fprintf (fout, "\theight:\t%d\n", g->height);
654 if (g->borderwidth != G_BORDERWIDTH)
655 fprintf (fout, "\tborderwidth:\t%d\n", g->borderwidth);
3e3da797 656
17ee7397
PE
657 if (g->x != G_X)
658 fprintf (fout, "\tx:\t%d\n", g->x);
659 if (g->y != G_Y)
660 fprintf (fout, "\ty:\t%d\n", g->y);
ce4d5ce0 661
17ee7397
PE
662 if (g->folding != G_FOLDING)
663 fprintf (fout, "\tfolding:\t%d\n", g->folding);
ce4d5ce0 664
17ee7397
PE
665 if (g->shrink != G_SHRINK)
666 fprintf (fout, "\tshrink:\t%d\n", g->shrink);
ea193b9d
PE
667 if (g->stretch != G_STRETCH)
668 fprintf (fout, "\tstretch:\t%d\n", g->stretch);
3e3da797 669
17ee7397 670 if (g->textmode != G_TEXTMODE)
342b8b6e 671 fprintf (fout, "\ttextmode:\t%s\n",
17ee7397
PE
672 get_textmode_str (g->textmode));
673
674 if (g->shape != G_SHAPE)
675 fprintf (fout, "\tshape:\t%s\n", get_shape_str (g->shape));
676
677 if (g->vertical_order != G_VERTICAL_ORDER)
678 fprintf (fout, "\tvertical_order:\t%d\n", g->vertical_order);
679 if (g->horizontal_order != G_HORIZONTAL_ORDER)
680 fprintf (fout, "\thorizontal_order:\t%d\n", g->horizontal_order);
681
682 if (g->xmax != G_XMAX)
683 fprintf (fout, "\txmax:\t%d\n", g->xmax);
684 if (g->ymax != G_YMAX)
685 fprintf (fout, "\tymax:\t%d\n", g->ymax);
686
687 if (g->xbase != G_XBASE)
688 fprintf (fout, "\txbase:\t%d\n", g->xbase);
689 if (g->ybase != G_YBASE)
690 fprintf (fout, "\tybase:\t%d\n", g->ybase);
691
692 if (g->xspace != G_XSPACE)
693 fprintf (fout, "\txspace:\t%d\n", g->xspace);
694 if (g->yspace != G_YSPACE)
695 fprintf (fout, "\tyspace:\t%d\n", g->yspace);
696 if (g->xlspace != G_XLSPACE)
697 fprintf (fout, "\txlspace:\t%d\n", g->xlspace);
698
699 if (g->xraster != G_XRASTER)
700 fprintf (fout, "\txraster:\t%d\n", g->xraster);
701 if (g->yraster != G_YRASTER)
702 fprintf (fout, "\tyraster:\t%d\n", g->yraster);
703 if (g->xlraster != G_XLRASTER)
704 fprintf (fout, "\txlraster:\t%d\n", g->xlraster);
705
706 if (g->hidden != G_HIDDEN)
707 fprintf (fout, "\thidden:\t%d\n", g->hidden);
08a946e0
AD
708
709 /* FIXME: Unallocate struct list if required.
342b8b6e 710 Maybe with a little function. */
17ee7397 711 if (g->classname != G_CLASSNAME)
ce4d5ce0 712 {
17ee7397 713 struct classname *ite;
3e3da797 714
17ee7397 715 for (ite = g->classname; ite; ite = ite->next)
342b8b6e
AD
716 fprintf (fout, "\tclassname %d :\t%s\n", ite->no, ite->name);
717 }
718
17ee7397 719 if (g->infoname != G_INFONAME)
342b8b6e 720 {
17ee7397 721 struct infoname *ite;
342b8b6e 722
17ee7397
PE
723 for (ite = g->infoname; ite; ite = ite->next)
724 fprintf (fout, "\tinfoname %d :\t%s\n", ite->integer, ite->chars);
342b8b6e
AD
725 }
726
17ee7397 727 if (g->colorentry != G_COLORENTRY)
342b8b6e 728 {
17ee7397 729 struct colorentry *ite;
08a946e0 730
17ee7397 731 for (ite = g->colorentry; ite; ite = ite->next)
08a946e0
AD
732 {
733 fprintf (fout, "\tcolorentry %d :\t%d %d %d\n",
734 ite->color_index,
342b8b6e
AD
735 ite->red_cp,
736 ite->green_cp,
737 ite->blue_cp);
08a946e0 738 }
ce4d5ce0 739 }
3e3da797 740
17ee7397
PE
741 if (g->layout_downfactor != G_LAYOUT_DOWNFACTOR)
742 fprintf (fout, "\tlayout_downfactor:\t%d\n", g->layout_downfactor);
743 if (g->layout_upfactor != G_LAYOUT_UPFACTOR)
744 fprintf (fout, "\tlayout_upfactor:\t%d\n", g->layout_upfactor);
745 if (g->layout_nearfactor != G_LAYOUT_NEARFACTOR)
746 fprintf (fout, "\tlayout_nearfactor:\t%d\n", g->layout_nearfactor);
747 if (g->layout_splinefactor != G_LAYOUT_SPLINEFACTOR)
342b8b6e 748 fprintf (fout, "\tlayout_splinefactor:\t%d\n",
17ee7397 749 g->layout_splinefactor);
3e3da797 750
17ee7397 751 if (g->late_edge_labels != G_LATE_EDGE_LABELS)
342b8b6e 752 fprintf (fout, "\tlate_edge_labels:\t%s\n",
17ee7397
PE
753 get_decision_str (g->late_edge_labels));
754 if (g->display_edge_labels != G_DISPLAY_EDGE_LABELS)
342b8b6e 755 fprintf (fout, "\tdisplay_edge_labels:\t%s\n",
17ee7397
PE
756 get_decision_str (g->display_edge_labels));
757 if (g->dirty_edge_labels != G_DIRTY_EDGE_LABELS)
342b8b6e 758 fprintf (fout, "\tdirty_edge_labels:\t%s\n",
17ee7397
PE
759 get_decision_str (g->dirty_edge_labels));
760 if (g->finetuning != G_FINETUNING)
342b8b6e 761 fprintf (fout, "\tfinetuning:\t%s\n",
17ee7397
PE
762 get_decision_str (g->finetuning));
763 if (g->ignore_singles != G_IGNORE_SINGLES)
342b8b6e 764 fprintf (fout, "\tignore_singles:\t%s\n",
17ee7397 765 get_decision_str (g->ignore_singles));
17ee7397 766 if (g->priority_phase != G_PRIORITY_PHASE)
342b8b6e 767 fprintf (fout, "\tpriority_phase:\t%s\n",
17ee7397
PE
768 get_decision_str (g->priority_phase));
769 if (g->manhattan_edges != G_MANHATTAN_EDGES)
342b8b6e
AD
770 fprintf (fout,
771 "\tmanhattan_edges:\t%s\n",
17ee7397
PE
772 get_decision_str (g->manhattan_edges));
773 if (g->smanhattan_edges != G_SMANHATTAN_EDGES)
342b8b6e
AD
774 fprintf (fout,
775 "\tsmanhattan_edges:\t%s\n",
17ee7397
PE
776 get_decision_str (g->smanhattan_edges));
777 if (g->near_edges != G_NEAR_EDGES)
342b8b6e 778 fprintf (fout, "\tnear_edges:\t%s\n",
17ee7397 779 get_decision_str (g->near_edges));
3e3da797 780
17ee7397 781 if (g->orientation != G_ORIENTATION)
342b8b6e 782 fprintf (fout, "\torientation:\t%s\n",
17ee7397 783 get_orientation_str (g->orientation));
3e3da797 784
17ee7397
PE
785 if (g->node_alignment != G_NODE_ALIGNMENT)
786 fprintf (fout, "\tnode_alignment:\t%s\n",
787 get_node_alignment_str (g->node_alignment));
3e3da797 788
17ee7397 789 if (g->port_sharing != G_PORT_SHARING)
342b8b6e 790 fprintf (fout, "\tport_sharing:\t%s\n",
17ee7397 791 get_decision_str (g->port_sharing));
3e3da797 792
17ee7397 793 if (g->arrow_mode != G_ARROW_MODE)
342b8b6e 794 fprintf (fout, "\tarrow_mode:\t%s\n",
17ee7397 795 get_arrow_mode_str (g->arrow_mode));
3e3da797 796
17ee7397
PE
797 if (g->treefactor != G_TREEFACTOR)
798 fprintf (fout, "\ttreefactor:\t%f\n", g->treefactor);
799 if (g->spreadlevel != G_SPREADLEVEL)
800 fprintf (fout, "\tspreadlevel:\t%d\n", g->spreadlevel);
3e3da797 801
17ee7397 802 if (g->crossing_weight != G_CROSSING_WEIGHT)
342b8b6e 803 fprintf (fout, "\tcrossing_weight:\t%s\n",
17ee7397
PE
804 get_crossing_type_str (g->crossing_weight));
805 if (g->crossing_phase2 != G_CROSSING_PHASE2)
342b8b6e 806 fprintf (fout, "\tcrossing_phase2:\t%s\n",
17ee7397
PE
807 get_decision_str (g->crossing_phase2));
808 if (g->crossing_optimization != G_CROSSING_OPTIMIZATION)
342b8b6e 809 fprintf (fout, "\tcrossing_optimization:\t%s\n",
17ee7397
PE
810 get_decision_str (g->crossing_optimization));
811
f8b30d02 812 if (g->view != normal_view)
17ee7397
PE
813 fprintf (fout, "\tview:\t%s\n", get_view_str (g->view));
814
815 if (g->edges != G_EDGES)
816 fprintf (fout, "\tedges:\t%s\n", get_decision_str (g->edges));
817
818 if (g->nodes != G_NODES)
819 fprintf (fout,"\tnodes:\t%s\n", get_decision_str (g->nodes));
820
821 if (g->splines != G_SPLINES)
822 fprintf (fout, "\tsplines:\t%s\n", get_decision_str (g->splines));
823
824 if (g->bmax != G_BMAX)
825 fprintf (fout, "\tbmax:\t%d\n", g->bmax);
826 if (g->cmin != G_CMIN)
827 fprintf (fout, "\tcmin:\t%d\n", g->cmin);
828 if (g->cmax != G_CMAX)
829 fprintf (fout, "\tcmax:\t%d\n", g->cmax);
830 if (g->pmin != G_PMIN)
831 fprintf (fout, "\tpmin:\t%d\n", g->pmin);
832 if (g->pmax != G_PMAX)
833 fprintf (fout, "\tpmax:\t%d\n", g->pmax);
834 if (g->rmin != G_RMIN)
835 fprintf (fout, "\trmin:\t%d\n", g->rmin);
836 if (g->rmax != G_RMAX)
837 fprintf (fout, "\trmax:\t%d\n", g->rmax);
838 if (g->smax != G_SMAX)
839 fprintf (fout, "\tsmax:\t%d\n", g->smax);
ce4d5ce0 840}