我有一组用DOT语言编码的有向图,我想将它们合并为一个有向图,其中将不同输入图中具有相同名称的节点合并在一起。
例如,给出以下文件:
1.dot
:
digraph {
A -> B
A -> C
}
2.dot
:
digraph {
D -> E
E -> F
}
3.dot
:
digraph {
D -> G
G -> A
}
我想获得以下result.dot
:
digraph {
subgraph {
A -> B
A -> C
}
subgraph {
D -> E
E -> F
}
subgraph {
D -> G
G -> A
}
}
我尝试使用gvpack
,但它重命名了重复的节点。
> gvpack -u 1.dot 2.dot 3.dot
Warning: node D in graph[2] %15 already defined
Some nodes will be renamed.
digraph root {
node [label="\N"];
{
node [label="\N"];
A -> B;
A -> C;
}
{
node [label="\N"];
D -> E;
E -> F;
}
{
node [label="\N"];
D_gv1 -> G;
G -> A_gv1;
}
}
我发现a similar question on SO建议使用sed
重命名已重命名的节点,但这似乎不太干净。
是否可以按照我想要的方式合并图形?
答案 0 :(得分:2)
对于您正在描述的情况,使用您提供的示例文件,有一个非常简单的答案,使用m4-在大多数发行版中应默认安装的标准GNU Linux工具。
使用以下内容创建文件merge123.m4
:
digraph 123 {
define(`digraph',`subgraph')
include(1.dot)
include(2.dot)
include(3.dot)
}
并使用命令
执行它m4 merge123.m4 > 123.dot
,生成的123.dot
文件将是
digraph 123 {
subgraph {
A -> B
A -> C
}
subgraph {
D -> E
E -> F
}
subgraph {
D -> G
G -> A
}
}
如果您不喜欢空行,请使用dnl
(例如,内置dnl
代表“丢弃到下一行” :)关闭脚本中的每一行
include(1.dot)dnl
m4
非常有用,因为它为graphviz
添加了功能,这些功能对于涉及更多项目非常有用;另请参见this SO question。
编辑以回答评论中的问题:
如果您需要包含文件并且不知道文件的编号和名称,则可以使用(至少)两个选项:
1)如果文件数量很少,并且您知道它们可能具有的所有名称,则可以全部sinclude()
:
digraph 123 {
define(`digraph',`subgraph')
sinclude(1.dot)
sinclude(2.dot)
sinclude(3.dot)
sinclude(4.dot)
sinclude(5.dot)
}
m4
仅包含实际存在的文件,而不抱怨丢失的文件(s
表示“无声”)。
2)如果产生大量.dot
文件且名称不可预测,则需要进行一些预处理。创建与此脚本类似的shell脚本include.sh
#!/bin/sh
# get *.dot files (or any pattern you like) into one place
ls *.dot > files.txt
# bring them into a format m4 likes
awk '{print "include(" $1 ")" "dnl"}' files.txt > includes.txt
#done
includes.txt
现在向m4
提供必要的信息:
include(1.dot)dnl
include(2.dot)dnl
include(3.dot)dnl
现在修改您的merge.m4
文件,使其能够使用提供的文件列表(我在此处添加dnl
来避免生成的合并文件中有很多空白):
### merge dot files
digraph 123 {
define(`digraph',`subgraph')dnl
syscmd(`./include.sh')dnl
include(`includes.txt')dnl
}
为了使生成的文件与输入文件分开,合并时最好使用其他扩展名:
m4 merge.m4 > merged.gv
现在看起来像
### merge dot files
digraph 123 {
subgraph {
A -> B
A -> C
}
subgraph {
D -> E
E -> F
}
subgraph {
D -> G
G -> A
}
}
答案 1 :(得分:0)
如果真的只是对输入文件的较小修改,那么perl是很合适的:
use strict;
sub main {
local $/ = undef;
print "digraph {\n";
for my $f (@ARGV) {
open(F, $f) or die $!;
my $text = <F>;
close(F);
$text =~ s/digraph/subgraph/;
$text =~s/^/ /mg;
print $text;
}
print "}\n";
}
main;
然后
$ perl merge.pl 1.dot 2.dot 3.dot
digraph {
subgraph {
A -> B
A -> C
}
subgraph {
D -> E
E -> F
}
subgraph {
D -> G
G -> A
}
}
答案 2 :(得分:0)
我最终使用Java library执行合并,还有更多!
有了这个库,我可以轻松地进入数据结构,如果需要,可以更改节点,并为图添加属性。
Kotlin中的一个简单示例:
// prepare root graph and set direction
val wamap = mutGraph("wamap")
.setDirected(true)
wamap.graphAttrs().add(RankDir.LEFT_TO_RIGHT)
// add subgraphs from the content of .gv files from disk
Files.walk(Paths.get("D:\\src\\work\\Wamap"), 1)
.filter { Files.isRegularFile(it) }
.filter { it.fileName.toString().endsWith(".gv") }
.map { Parser.read(it.toFile()) }
.forEach { it.addTo(wamap) }
// normalize node names to lowercase, to ensure nodes with same name are the same node
wamap.graphs()
.flatMap { it.nodes() }
.forEach { it.setName(it.name().toString().toLowerCase()) }
// output as file, but also render the image directly with all the possible Graphviz layout engines
File("out/wamap.gv").writeText(wamap.toString())
Engine.values()
.forEach { engine ->
Graphviz.fromGraph(wamap).engine(engine).render(Format.PNG).toFile(File("out/wamap-$engine.png"))
}