1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
#!/bin/sh
#
# growthplot -- plot the fetchmail project's growth as a function of time
#
PATH="$PATH:.:./dist-tools"; export PATH
tmp=/tmp/fetchmail-growthplot.$$
mkdir $tmp
# Get data from the NEWS file
timeseries >$tmp/growthplot$$
grep "^[0-9]" $tmp/growthplot$$ >$tmp/growthnumbers$$
grep "^[0-9.]*.[05].0 " $tmp/growthplot$$ >$tmp/growthmajors$$
sed '/^4.2.9/,$d' <$tmp/growthnumbers$$ >$tmp/growthannounce$$
# gnuplot line styles. These occasionally change (like beteween 3.5 and 3.7);
# use "echo 'set terminal png; test' | gnuplot | display -" to check.
blue_boxes=3
green_crosses=2
cyan_diamonds=37 # Once purple triangles, but we can't do that anymore
brown_triangles=23
cat >$tmp/growthimage$$ <<EOF
set title "Fetchmail project growth history"
set xlabel 'Days since baseline'
set ylabel 'Participants'
set y2label 'Lines of code'
set ytics nomirror
set y2tics
set tics out
set autoscale y
set y2range [5000:50000]
set key bottom right box
set terminal png
EOF
# OK, now write the event labels
(
count=0
lastday=0
breakheight=510
while read version legend
do
if [ "$version" = '%' ]
then
echo "# Associate $lastday to '$legend'"
count=$((count+1))
lastday=$(($lastday-5))
endy=$((breakheight+50+count*50))
if ((endy>lasttotal))
then
# Label over curve hanging right, arrow down
arrowhead=$((lasttotal+50))
echo "set label '$legend' at $lastday-10, $endy+15"
else
# Label under curve hanging left, arrow up
arrowhead=$((lasttotal-5))
strlen=`python -c "print len('$legend')"`
lablen=$((strlen*22))
echo "set label '$legend' at $lastday-$lablen+10, $endy-15"
fi
echo set arrow \
from $lastday, $endy \
to $lastday, $arrowhead \
head
else
set -- $legend
size=$1
friends=$2
announce=$3
total=$4
days=$5
date=$6
lastday=$days
lasttotal=$total
fi
done
) <$tmp/growthplot$$ >>$tmp/growthimage$$
# OK, now write the major-release labels
(
while read version size friends announce total days date
do
echo "set arrow from $days, $total - 55 to $days, $total - 15 head"
echo "set label '$version' at $days - 5, $total - 65"
done
) <$tmp/growthmajors$$ >>$tmp/growthimage$$
cat >>$tmp/growthimage$$ <<EOF
plot [] [0:] '$tmp/growthnumbers$$' using 6:5 \
title "Both lists" with points $blue_boxes, \
'$tmp/growthannounce$$' using 6:4 \
title "fetchmail-announce" with points $cyan_diamonds, \
'$tmp/growthannounce$$' using 6:3 \
title "fetchmail-friends" with points $green_crosses, \
'$tmp/growthnumbers$$' using 6:2 axes x1y2 \
title "Lines of code" with points $brown_triangles
EOF
gnuplot $tmp/growthimage$$ >growth.png
rm -f $tmp/growth*
rmdir $tmp
# growthplot ends here
|
