-
- DEBUG0("<graph>");
- if(A_graphxml_graph_isDirected == A_graphxml_graph_isDirected_true)
- parsed_graph = xbt_graph_new_graph(1, NULL);
- else parsed_graph = xbt_graph_new_graph(0, NULL);
-
- parsed_nodes = xbt_dict_new();
-}
-static void __parse_graph_end(void)
-{
- xbt_dict_free(&parsed_nodes);
- DEBUG0("</graph>");
-}
-
-static void __parse_node(void)
-{
- xbt_node_t node =
- xbt_graph_new_node(parsed_graph, NULL);
-
- DEBUG1("<node name=\"%s\"/>", A_graphxml_node_name);
- if(__parse_node_label_and_data)
- node->data = __parse_node_label_and_data(node,A_graphxml_node_label,
- A_graphxml_node_data);
- xbt_graph_parse_get_double(&(node->position_x),A_graphxml_node_position_x);
- xbt_graph_parse_get_double(&(node->position_y),A_graphxml_node_position_y);
-
- xbt_dict_set(parsed_nodes, A_graphxml_node_name, (void *) node, NULL);
-}
-
-static void __parse_edge(void)
-{
- xbt_edge_t edge =
- xbt_graph_new_edge(parsed_graph,
- xbt_dict_get(parsed_nodes,A_graphxml_edge_source),
- xbt_dict_get(parsed_nodes,A_graphxml_edge_target),
- NULL);
-
- if(__parse_edge_label_and_data)
- edge->data = __parse_edge_label_and_data(edge,A_graphxml_edge_label,
- A_graphxml_edge_data);
-
- xbt_graph_parse_get_double(&(edge->length),A_graphxml_edge_length);
-
- DEBUG3("<edge source=\"%s\" target=\"%s\" length=\"%f\"/>",
- (char *) (edge->src)->data,
- (char *) (edge->dst)->data,
- xbt_graph_edge_get_length(edge));
-}
-
-xbt_graph_t xbt_graph_read(const char *filename,
- void *(node_label_and_data)(xbt_node_t, const char*, const char*),
- void *(edge_label_and_data)(xbt_edge_t, const char*, const char*))
-{
-
- xbt_graph_t graph = NULL;
-
- __parse_node_label_and_data = node_label_and_data;
- __parse_edge_label_and_data = edge_label_and_data;
-
- xbt_graph_parse_reset_parser();
-
- STag_graphxml_graph_fun = __parse_graph_begin;
- ETag_graphxml_graph_fun = __parse_graph_end;
- ETag_graphxml_node_fun = __parse_node;
- ETag_graphxml_edge_fun = __parse_edge;
-
- xbt_graph_parse_open(filename);
- xbt_assert1((!xbt_graph_parse()), "Parse error in %s", filename);
- xbt_graph_parse_close();
-
- graph = parsed_graph;
- parsed_graph = NULL;
-
- return graph;
-}
-
-void xbt_graph_export_graphviz(xbt_graph_t g, const char *filename,
- const char *(node_name) (xbt_node_t),
- const char *(edge_name) (xbt_edge_t))
-{
- int cursor = 0;