File: tail

package info (click to toggle)
yash 2.60-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 6,152 kB
  • sloc: ansic: 34,578; makefile: 851; sh: 808; sed: 16
file content (92 lines) | stat: -rw-r--r-- 3,379 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
87
88
89
90
91
92
# (C) 2010 magicant

# Completion script for the "tail" command.
# Supports POSIX 2008, GNU coreutils 8.6, FreeBSD 8.1, OpenBSD 4.8, NetBSD 5.0,
# Mac OS X 10.6.4, SunOS 5.10, HP-UX 11i v3.

function completion/tail {

        case $("${WORDS[1]}" --version 2>/dev/null) in
                (*'coreutils'*) typeset type=GNU ;;
                (*)             typeset type="$(uname 2>/dev/null)" ;;
        esac
        case $type in
                (GNU) typeset long=true ;;
                (*)   typeset long= ;;
        esac

        typeset OPTIONS ARGOPT PREFIX
        OPTIONS=( #>#
        "c: ${long:+--bytes:}; specify the number of bytes to print"
        "f; keep watching the file for more data"
        "n: ${long:+--lines:}; specify the number of lines to print"
        ) #<#

        case $type in (*BSD|Darwin|SunOS)
                OPTIONS=("$OPTIONS" #>#
                "r; print lines in reverse order"
                ) #<#
        esac
        case $type in (*BSD|Darwin|HP-UX)
                OPTIONS=("$OPTIONS" #>#
                "b:; specify the number of 512-byte blocks to print"
                ) #<#
        esac
        case $type in (FreeBSD|NetBSD|Darwin)
                OPTIONS=("$OPTIONS" #>#
                "F; like -f, but reopen the file if renamed"
                ) #<#
        esac
        case $type in (GNU|FreeBSD)
                OPTIONS=("$OPTIONS" #>#
                "q ${long:+--quiet --silent}; never print filename headers"
                ) #<#
        esac
        case $type in (GNU)
                OPTIONS=("$OPTIONS" #>#
                "--follow::; specify how to watch the file for more data"
                "F; like --follow=name --retry"
                "--max-unchanged-stats:; recheck file status every n checks"
                "--pid:; specify the ID of a process to follow"
                "--retry; try to reopen the file if removed"
                "--sleep-interval:; specify the number of seconds to wait between checks for more data"
                "v --verbose; always print filename headers"
                "--help"
                "--version"
                ) #<#
        esac

        command -f completion//parseoptions ${long:+-es}
        case $ARGOPT in
        (-)
                command -f completion//completeoptions
                ;;
        ([bcn]|--bytes|--lines)
                case $type in (GNU)
                        if command -vf completion//prefixdigits >/dev/null 2>&1 ||
                                        . -AL completion/_blocksize; then
                                if command -f completion//prefixdigits; then
                                        command -f completion//completesizesuffix b GNU
                                fi
                        fi
                esac
                ;;
        (--follow) #>>#
                complete -P "$PREFIX" -D "never reopen the file" descriptor
                complete -P "$PREFIX" -D "reopen the file when renamed/removed" name
                ;; #<<#
        (--pid)
                typeset pid args
                while read -r pid args; do
                        complete -P "$PREFIX" -D "$args" -- "$pid"
                done <(ps -A -o pid= -o args= 2>/dev/null)
                ;;
        ('')
                complete -f
                ;;
        esac

}


# vim: set ft=sh ts=8 sts=8 sw=8 et: