| Server IP : 85.193.89.191 / Your IP : 18.191.122.146 Web Server : Apache System : Linux 956367-cx40159.tmweb.ru 3.10.0-1160.105.1.el7.x86_64 #1 SMP Thu Dec 7 15:39:45 UTC 2023 x86_64 User : bitrix ( 600) PHP Version : 8.1.27 Disable Function : NONE MySQL : OFF | cURL : OFF | WGET : ON | Perl : ON | Python : ON | Sudo : ON | Pkexec : ON Directory : /proc/982/root/usr/share/graphviz/gvpr/ |
Upload File : |
/* Generate copy of topology of input graph
* Replace names with numbers
*/
BEGIN {
int id = 0;
char* names[char*];
char* mapn (char* inname)
{
char* s = names[inname];
if (s == "") {
s = id++;
names[inname] = s;
}
return s;
}
}
BEG_G {
graph_t g = graph ($.name, "U");
}
N { node (g, mapn($.name)); }
E { edge (node (g, mapn($.tail.name)), node (g, mapn($.head.name)), ""); }
END_G {
write (g);
}