File: page-list.awk

package info (click to toggle)
cook 2.33-1
  • links: PTS
  • area: main
  • in suites: jessie, jessie-kfreebsd, squeeze, wheezy
  • size: 8,640 kB
  • ctags: 4,140
  • sloc: ansic: 47,848; sh: 14,477; makefile: 4,681; yacc: 3,170; perl: 224; awk: 219
file content (86 lines) | stat: -rw-r--r-- 2,087 bytes parent folder | download
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
#
#       cook - file construction tool
#       Copyright (C) 2002, 2007, 2008 Peter Miller
#
#       This program is free software; you can redistribute it and/or modify
#       it under the terms of the GNU General Public License as published by
#       the Free Software Foundation; either version 3 of the License, or
#       (at your option) any later version.
#
#       This program is distributed in the hope that it will be useful,
#       but WITHOUT ANY WARRANTY; without even the implied warranty of
#       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
#       GNU General Public License for more details.
#
#       You should have received a copy of the GNU General Public License
#       along with this program. If not, see
#       <http://www.gnu.org/licenses/>.
#
function output_end()
{
        if (start == 0)
                return;
        if (middle != 0)
                printf(",")
        middle = 1
        printf("%d", start);
        if (start != finish)
                printf("-%d", finish);
        start = 0;
        finish = 0;
}

function output(n)
{
        if (start == 0)
        {
                start = n
                finish = n
                return
        }
        if (n == finish + 1)
        {
                finish = n;
                return
        }
        output_end();
        start = n;
        finish = n;
}

function output_even()
{
        if ((page[finish] % 2) != 0)
        {
                output_end();
                printf(",_");
        }
}

/Page:/ {
        page[$3] = $2
        if ($3 > max)
                max = $3
}
END {
        output(1);
        output(2);
        numtoc = 0
        for (j = 3; j <= max; ++j)
        {
                if (page[j] > 1000)
                {
                        output(j);
                        numtoc++
                }
        }
        output_even();
        for (j = 3; j <= max; ++j)
        {
                if (page[j] < 1000)
                        output(j);
        }
        output_even();
        output_end();
        printf("\n");
}