summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rwxr-xr-xgraphdeps20
-rw-r--r--modules.svg259
2 files changed, 279 insertions, 0 deletions
diff --git a/graphdeps b/graphdeps
new file mode 100755
index 00000000..cab3de1d
--- /dev/null
+++ b/graphdeps
@@ -0,0 +1,20 @@
1#!/bin/bash
2
3args="-r Todo"
4
5graphmod $args \
6 -i . -i Presence \
7 Presence/main.hs \
8 | awk 'BEGIN{n=1;}
9 !/label="Main"/{print;}
10 /label="Main"/{if(n==1) print;n=n+1;}' \
11 | grep -v '^u0\[' \
12 | sed '2isize="13,8!"; ratio=fill;' \
13 > modules.dot
14
15fgnode="$(sed -n '/label="FGConsole"/{s#\(.*\)\[.*#\1#; p}' modules.dot)"
16
17cat modules.dot | sed '3'i$fgnode'->monitortty;\
18monitortty[label="monitortty.c"];' | dot -Tsvg > modules.svg
19
20
diff --git a/modules.svg b/modules.svg
new file mode 100644
index 00000000..f9ceb7d4
--- /dev/null
+++ b/modules.svg
@@ -0,0 +1,259 @@
1<?xml version="1.0" encoding="UTF-8" standalone="no"?>
2<!DOCTYPE svg PUBLIC "-//W3C//DTD SVG 1.1//EN"
3 "http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd">
4<!-- Generated by graphviz version 2.26.3 (20100126.1600)
5 -->
6<!-- Title: G Pages: 1 -->
7<svg width="933pt" height="576pt"
8 viewBox="0.00 0.00 932.55 576.00" xmlns="http://www.w3.org/2000/svg" xmlns:xlink="http://www.w3.org/1999/xlink">
9<g id="graph1" class="graph" transform="scale(0.690775 0.690775) rotate(0) translate(4 829.846)">
10<title>G</title>
11<polygon fill="white" stroke="white" points="-4,5 -4,-829.846 1347,-829.846 1347,5 -4,5"/>
12<g id="graph2" class="cluster"><title>cluster_0</title>
13<polygon fill="#ccffcc" stroke="#ccffcc" points="1200,-223.327 1200,-402.455 1334,-402.455 1334,-223.327 1200,-223.327"/>
14<text text-anchor="middle" x="1267" y="-385.855" font-family="Times Roman,serif" font-size="14.00">Data</text>
15</g>
16<g id="graph3" class="cluster"><title>cluster_1</title>
17<polygon fill="#ccffcc" stroke="#ccffcc" points="146,-18.6106 146,-555.992 284,-555.992 284,-18.6106 146,-18.6106"/>
18<text text-anchor="middle" x="215" y="-539.392" font-family="Times Roman,serif" font-size="14.00">Text</text>
19</g>
20<g id="graph4" class="cluster"><title>cluster_2</title>
21<polygon fill="#99ff99" stroke="#99ff99" points="154,-37.2212 154,-479.223 276,-479.223 276,-37.2212 154,-37.2212"/>
22<text text-anchor="middle" x="215" y="-462.623" font-family="Times Roman,serif" font-size="14.00">XML</text>
23</g>
24<g id="graph5" class="cluster"><title>cluster_3</title>
25<polygon fill="#66ff66" stroke="#66ff66" points="162,-55.8319 162,-402.455 268,-402.455 268,-55.8319 162,-55.8319"/>
26<text text-anchor="middle" x="215" y="-385.855" font-family="Times Roman,serif" font-size="14.00">Stream</text>
27</g>
28<!-- u5 -->
29<g id="node1" class="node"><title>u5</title>
30<ellipse fill="none" stroke="black" cx="121" cy="-616.611" rx="62.0391" ry="18"/>
31<text text-anchor="middle" x="121" y="-612.511" font-family="Times Roman,serif" font-size="14.00">FGConsole</text>
32</g>
33<!-- monitortty -->
34<g id="node3" class="node"><title>monitortty</title>
35<ellipse fill="none" stroke="black" cx="69" cy="-283.611" rx="68.9883" ry="18"/>
36<text text-anchor="middle" x="69" y="-279.511" font-family="Times Roman,serif" font-size="14.00">monitortty.c</text>
37</g>
38<!-- u5&#45;&gt;monitortty -->
39<g id="edge2" class="edge"><title>u5&#45;&gt;monitortty</title>
40<path fill="none" stroke="black" d="M118.13,-598.233C109.518,-543.083 83.8507,-378.712 73.4504,-312.11"/>
41<polygon fill="black" stroke="black" points="76.862,-311.272 71.8609,-301.932 69.9458,-312.352 76.862,-311.272"/>
42</g>
43<!-- u18 -->
44<g id="node4" class="node"><title>u18</title>
45<ellipse fill="none" stroke="black" cx="385" cy="-616.611" rx="79.9115" ry="18"/>
46<text text-anchor="middle" x="385" y="-612.511" font-family="Times Roman,serif" font-size="14.00">LocalPeerCred</text>
47</g>
48<!-- u11 -->
49<g id="node9" class="node"><title>u11</title>
50<ellipse fill="none" stroke="black" cx="535" cy="-116.611" rx="62.0391" ry="18"/>
51<text text-anchor="middle" x="535" y="-112.511" font-family="Times Roman,serif" font-size="14.00">SocketLike</text>
52</g>
53<!-- u18&#45;&gt;u11 -->
54<g id="edge60" class="edge"><title>u18&#45;&gt;u11</title>
55<path fill="none" stroke="black" d="M374.115,-598.525C342.608,-543.633 257.5,-375.494 321,-257.611 355.364,-193.816 432.617,-154.125 484.28,-133.688"/>
56<polygon fill="black" stroke="black" points="485.538,-136.954 493.612,-130.095 483.023,-130.421 485.538,-136.954"/>
57</g>
58<!-- u17 -->
59<g id="node5" class="node"><title>u17</title>
60<ellipse fill="none" stroke="black" cx="399" cy="-283.611" rx="68.9883" ry="18"/>
61<text text-anchor="middle" x="399" y="-279.511" font-family="Times Roman,serif" font-size="14.00">NestingXML</text>
62</g>
63<!-- u16 -->
64<g id="node6" class="node"><title>u16</title>
65<ellipse fill="none" stroke="black" cx="889" cy="-783.611" rx="34.2406" ry="18"/>
66<text text-anchor="middle" x="889" y="-779.511" font-family="Times Roman,serif" font-size="14.00">Main</text>
67</g>
68<!-- u16&#45;&gt;u5 -->
69<g id="edge52" class="edge"><title>u16&#45;&gt;u5</title>
70<path fill="none" stroke="black" d="M857.462,-776.753C741.161,-751.463 335.096,-663.165 180.962,-629.649"/>
71<polygon fill="black" stroke="black" points="181.258,-626.132 170.743,-627.427 179.771,-632.972 181.258,-626.132"/>
72</g>
73<!-- u16&#45;&gt;u18 -->
74<g id="edge58" class="edge"><title>u16&#45;&gt;u18</title>
75<path fill="none" stroke="black" d="M860.093,-774.032C778.654,-747.048 546.343,-670.071 439.711,-634.739"/>
76<polygon fill="black" stroke="black" points="440.694,-631.378 430.1,-631.555 438.492,-638.022 440.694,-631.378"/>
77</g>
78<!-- u12 -->
79<g id="node8" class="node"><title>u12</title>
80<ellipse fill="none" stroke="black" cx="574" cy="-616.611" rx="39.1069" ry="18"/>
81<text text-anchor="middle" x="574" y="-612.511" font-family="Times Roman,serif" font-size="14.00">XMPP</text>
82</g>
83<!-- u16&#45;&gt;u12 -->
84<g id="edge56" class="edge"><title>u16&#45;&gt;u12</title>
85<path fill="none" stroke="black" d="M864.806,-770.784C809.469,-741.447 673.49,-669.356 609.011,-635.172"/>
86<polygon fill="black" stroke="black" points="610.509,-632.005 600.034,-630.413 607.23,-638.189 610.509,-632.005"/>
87</g>
88<!-- u6 -->
89<g id="node13" class="node"><title>u6</title>
90<ellipse fill="none" stroke="black" cx="889" cy="-616.611" rx="71.0724" ry="18"/>
91<text text-anchor="middle" x="889" y="-612.511" font-family="Times Roman,serif" font-size="14.00">XMPPServer</text>
92</g>
93<!-- u16&#45;&gt;u6 -->
94<g id="edge54" class="edge"><title>u16&#45;&gt;u6</title>
95<path fill="none" stroke="black" d="M889,-765.421C889,-736.434 889,-679.53 889,-645.102"/>
96<polygon fill="black" stroke="black" points="892.5,-644.778 889,-634.778 885.5,-644.778 892.5,-644.778"/>
97</g>
98<!-- u3 -->
99<g id="node14" class="node"><title>u3</title>
100<ellipse fill="none" stroke="black" cx="1257" cy="-616.611" rx="39.1069" ry="18"/>
101<text text-anchor="middle" x="1257" y="-612.511" font-family="Times Roman,serif" font-size="14.00">UTmp</text>
102</g>
103<!-- u16&#45;&gt;u3 -->
104<g id="edge50" class="edge"><title>u16&#45;&gt;u3</title>
105<path fill="none" stroke="black" d="M914.877,-771.868C978.915,-742.807 1145,-667.438 1219.67,-633.551"/>
106<polygon fill="black" stroke="black" points="1221.5,-636.565 1229.16,-629.246 1218.6,-630.191 1221.5,-636.565"/>
107</g>
108<!-- u2 -->
109<g id="node15" class="node"><title>u2</title>
110<ellipse fill="none" stroke="black" cx="908" cy="-116.611" rx="111.181" ry="18"/>
111<text text-anchor="middle" x="908" y="-112.511" font-family="Times Roman,serif" font-size="14.00">ByteStringOperators</text>
112</g>
113<!-- u16&#45;&gt;u2 -->
114<g id="edge48" class="edge"><title>u16&#45;&gt;u2</title>
115<path fill="none" stroke="black" d="M918.794,-774.806C971.339,-757.542 1079.5,-713.847 1128,-634.611 1182.49,-545.586 1143.55,-504.895 1148,-400.611 1150.71,-337.113 1179.57,-312.771 1148,-257.611 1111.18,-193.281 1032.33,-155.422 975.032,-135.407"/>
116<polygon fill="black" stroke="black" points="975.91,-132.009 965.316,-132.11 973.661,-138.638 975.91,-132.009"/>
117</g>
118<!-- u1 -->
119<g id="node16" class="node"><title>u1</title>
120<ellipse fill="none" stroke="black" cx="1057" cy="-616.611" rx="62.0391" ry="18"/>
121<text text-anchor="middle" x="1057" y="-612.511" font-family="Times Roman,serif" font-size="14.00">ConfigFiles</text>
122</g>
123<!-- u16&#45;&gt;u1 -->
124<g id="edge46" class="edge"><title>u16&#45;&gt;u1</title>
125<path fill="none" stroke="black" d="M905.109,-767.598C934.504,-738.377 997.032,-676.222 1032,-641.461"/>
126<polygon fill="black" stroke="black" points="1034.81,-643.602 1039.44,-634.07 1029.88,-638.638 1034.81,-643.602"/>
127</g>
128<!-- u13 -->
129<g id="node7" class="node"><title>u13</title>
130<ellipse fill="none" stroke="black" cx="574" cy="-283.611" rx="50.0315" ry="18"/>
131<text text-anchor="middle" x="574" y="-279.511" font-family="Times Roman,serif" font-size="14.00">ServerC</text>
132</g>
133<!-- u13&#45;&gt;u11 -->
134<g id="edge42" class="edge"><title>u13&#45;&gt;u11</title>
135<path fill="none" stroke="black" d="M569.752,-265.421C562.953,-236.308 549.579,-179.037 541.55,-144.656"/>
136<polygon fill="black" stroke="black" points="544.925,-143.72 539.243,-134.778 538.109,-145.312 544.925,-143.72"/>
137</g>
138<!-- u13&#45;&gt;u2 -->
139<g id="edge40" class="edge"><title>u13&#45;&gt;u2</title>
140<path fill="none" stroke="black" d="M603.348,-268.937C662.26,-239.48 795.183,-173.019 864.34,-138.44"/>
141<polygon fill="black" stroke="black" points="866.282,-141.383 873.661,-133.78 863.152,-135.122 866.282,-141.383"/>
142</g>
143<!-- u12&#45;&gt;u17 -->
144<g id="edge38" class="edge"><title>u12&#45;&gt;u17</title>
145<path fill="none" stroke="black" d="M564.591,-598.707C535.63,-543.598 447.699,-376.277 413.152,-310.539"/>
146<polygon fill="black" stroke="black" points="416.206,-308.827 408.455,-301.603 410.009,-312.083 416.206,-308.827"/>
147</g>
148<!-- u12&#45;&gt;u13 -->
149<g id="edge34" class="edge"><title>u12&#45;&gt;u13</title>
150<path fill="none" stroke="black" d="M574,-598.233C574,-543.083 574,-378.712 574,-312.11"/>
151<polygon fill="black" stroke="black" points="577.5,-311.932 574,-301.932 570.5,-311.932 577.5,-311.932"/>
152</g>
153<!-- u12&#45;&gt;u11 -->
154<g id="edge32" class="edge"><title>u12&#45;&gt;u11</title>
155<path fill="none" stroke="black" d="M567.365,-598.742C554.183,-562.183 525.102,-475.934 515,-400.611 506.552,-337.619 510.526,-321.009 515,-257.611 517.778,-218.246 524.866,-173.158 529.81,-144.784"/>
156<polygon fill="black" stroke="black" points="533.285,-145.233 531.587,-134.775 526.393,-144.01 533.285,-145.233"/>
157</g>
158<!-- u10 -->
159<g id="node10" class="node"><title>u10</title>
160<ellipse fill="none" stroke="black" cx="746" cy="-283.611" rx="66.0138" ry="18"/>
161<text text-anchor="middle" x="746" y="-279.511" font-family="Times Roman,serif" font-size="14.00">XMPPTypes</text>
162</g>
163<!-- u12&#45;&gt;u10 -->
164<g id="edge30" class="edge"><title>u12&#45;&gt;u10</title>
165<path fill="none" stroke="black" d="M583.247,-598.707C611.712,-543.598 698.136,-376.277 732.091,-310.539"/>
166<polygon fill="black" stroke="black" points="735.227,-312.094 736.707,-301.603 729.008,-308.881 735.227,-312.094"/>
167</g>
168<!-- u12&#45;&gt;u2 -->
169<g id="edge28" class="edge"><title>u12&#45;&gt;u2</title>
170<path fill="none" stroke="black" d="M578.937,-598.701C589.124,-561.711 613.178,-474.18 633,-400.611 650.108,-337.114 631.364,-310.084 671,-257.611 716.325,-197.605 795.25,-158.154 849.481,-136.623"/>
171<polygon fill="black" stroke="black" points="850.915,-139.821 858.969,-132.938 848.381,-133.296 850.915,-139.821"/>
172</g>
173<!-- u14 -->
174<g id="node23" class="node"><title>u14</title>
175<ellipse fill="none" stroke="black" cx="215" cy="-283.611" rx="45.1673" ry="18"/>
176<text text-anchor="middle" x="215" y="-279.511" font-family="Times Roman,serif" font-size="14.00">Render</text>
177</g>
178<!-- u12&#45;&gt;u14 -->
179<g id="edge36" class="edge"><title>u12&#45;&gt;u14</title>
180<path fill="none" stroke="black" d="M546.04,-603.931C486.423,-575.606 345.609,-501.648 264,-400.611 242.595,-374.11 229.167,-336.917 221.892,-311.629"/>
181<polygon fill="black" stroke="black" points="225.248,-310.633 219.23,-301.913 218.497,-312.483 225.248,-310.633"/>
182</g>
183<!-- u10&#45;&gt;u11 -->
184<g id="edge26" class="edge"><title>u10&#45;&gt;u11</title>
185<path fill="none" stroke="black" d="M724.214,-266.368C686.111,-236.21 607.348,-173.872 564.435,-139.908"/>
186<polygon fill="black" stroke="black" points="566.367,-136.973 556.353,-133.511 562.022,-142.462 566.367,-136.973"/>
187</g>
188<!-- u10&#45;&gt;u2 -->
189<g id="edge24" class="edge"><title>u10&#45;&gt;u2</title>
190<path fill="none" stroke="black" d="M763.031,-266.054C791.881,-236.314 850.457,-175.93 883.64,-141.722"/>
191<polygon fill="black" stroke="black" points="886.259,-144.049 890.71,-134.434 881.235,-139.175 886.259,-144.049"/>
192</g>
193<!-- u8 -->
194<g id="node11" class="node"><title>u8</title>
195<ellipse fill="none" stroke="black" cx="1043" cy="-283.611" rx="71.0724" ry="18"/>
196<text text-anchor="middle" x="1043" y="-279.511" font-family="Times Roman,serif" font-size="14.00">AdaptServer</text>
197</g>
198<!-- u8&#45;&gt;u2 -->
199<g id="edge22" class="edge"><title>u8&#45;&gt;u2</title>
200<path fill="none" stroke="black" d="M1028.55,-265.739C1004.66,-236.185 956.817,-176.999 929.126,-142.745"/>
201<polygon fill="black" stroke="black" points="931.556,-140.183 922.548,-134.606 926.112,-144.584 931.556,-140.183"/>
202</g>
203<!-- u7 -->
204<g id="node12" class="node"><title>u7</title>
205<ellipse fill="none" stroke="black" cx="873" cy="-283.611" rx="43.0827" ry="18"/>
206<text text-anchor="middle" x="873" y="-279.511" font-family="Times Roman,serif" font-size="14.00">Server</text>
207</g>
208<!-- u7&#45;&gt;u2 -->
209<g id="edge20" class="edge"><title>u7&#45;&gt;u2</title>
210<path fill="none" stroke="black" d="M876.812,-265.421C882.914,-236.308 894.917,-179.037 902.122,-144.656"/>
211<polygon fill="black" stroke="black" points="905.567,-145.283 904.192,-134.778 898.716,-143.847 905.567,-145.283"/>
212</g>
213<!-- u6&#45;&gt;u10 -->
214<g id="edge18" class="edge"><title>u6&#45;&gt;u10</title>
215<path fill="none" stroke="black" d="M881.312,-598.707C857.695,-543.711 786.088,-376.963 757.738,-310.945"/>
216<polygon fill="black" stroke="black" points="760.888,-309.41 753.726,-301.603 754.456,-312.172 760.888,-309.41"/>
217</g>
218<!-- u6&#45;&gt;u8 -->
219<g id="edge16" class="edge"><title>u6&#45;&gt;u8</title>
220<path fill="none" stroke="black" d="M897.28,-598.707C922.714,-543.711 999.828,-376.963 1030.36,-310.945"/>
221<polygon fill="black" stroke="black" points="1033.66,-312.148 1034.68,-301.603 1027.31,-309.21 1033.66,-312.148"/>
222</g>
223<!-- u6&#45;&gt;u7 -->
224<g id="edge14" class="edge"><title>u6&#45;&gt;u7</title>
225<path fill="none" stroke="black" d="M888.117,-598.233C885.467,-543.083 877.569,-378.712 874.369,-312.11"/>
226<polygon fill="black" stroke="black" points="877.856,-311.752 873.88,-301.932 870.864,-312.088 877.856,-311.752"/>
227</g>
228<!-- u6&#45;&gt;u2 -->
229<g id="edge12" class="edge"><title>u6&#45;&gt;u2</title>
230<path fill="none" stroke="black" d="M893.054,-598.532C901.107,-561.591 918.87,-474.681 925,-400.611 930.242,-337.272 928.811,-321.052 925,-257.611 922.64,-218.327 916.615,-173.219 912.412,-144.819"/>
231<polygon fill="black" stroke="black" points="915.853,-144.166 910.902,-134.8 908.931,-145.21 915.853,-144.166"/>
232</g>
233<!-- u4 -->
234<g id="node18" class="node"><title>u4</title>
235<ellipse fill="none" stroke="black" cx="1267" cy="-283.611" rx="59.065" ry="18"/>
236<text text-anchor="middle" x="1267" y="-279.511" font-family="Times Roman,serif" font-size="14.00">BitSyntax</text>
237</g>
238<!-- u3&#45;&gt;u4 -->
239<g id="edge10" class="edge"><title>u3&#45;&gt;u4</title>
240<path fill="none" stroke="black" d="M1257.55,-598.233C1259.21,-543.083 1264.14,-378.712 1266.14,-312.11"/>
241<polygon fill="black" stroke="black" points="1269.65,-312.032 1266.45,-301.932 1262.65,-311.822 1269.65,-312.032"/>
242</g>
243<!-- u1&#45;&gt;u2 -->
244<g id="edge8" class="edge"><title>u1&#45;&gt;u2</title>
245<path fill="none" stroke="black" d="M1068.06,-598.529C1100.09,-543.649 1186.69,-375.541 1123,-257.611 1090.05,-196.603 1017.93,-157.719 966.307,-136.571"/>
246<polygon fill="black" stroke="black" points="967.505,-133.281 956.92,-132.828 964.912,-139.783 967.505,-133.281"/>
247</g>
248<!-- u15 -->
249<g id="node22" class="node"><title>u15</title>
250<ellipse fill="none" stroke="black" cx="215" cy="-116.611" rx="38.9134" ry="18"/>
251<text text-anchor="middle" x="215" y="-112.511" font-family="Times Roman,serif" font-size="14.00">Token</text>
252</g>
253<!-- u14&#45;&gt;u15 -->
254<g id="edge44" class="edge"><title>u14&#45;&gt;u15</title>
255<path fill="none" stroke="black" d="M215,-265.421C215,-236.434 215,-179.53 215,-145.102"/>
256<polygon fill="black" stroke="black" points="218.5,-144.778 215,-134.778 211.5,-144.778 218.5,-144.778"/>
257</g>
258</g>
259</svg>
generated by cgit v1.2.3 (git 2.39.1) at 2024-09-22 12:22:54 +0000