File: split

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 (76 lines) | stat: -rw-r--r-- 2,764 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
# (C) 2010 magicant

# Completion script for the "split" 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/split {

        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=( #>#
        "a: ${long:+--suffix-length:}; specify the suffix length for output files"
        "b: ${long:+--bytes:}; specify the output file size in bytes"
        "l: ${long:+--lines:}; specify the number of lines in each output file"
        ) #<#

        case $type in (GNU)
                OPTIONS=("$OPTIONS" #>#
                "C: --line-bytes:; like -b, but split at line breaks"
                "d --numeric-suffixes; use numeric suffixes rather than lowercase letters"
                "--verbose; print a message for each output file processed"
                "--help"
                "--version"
                ) #<#
        esac
        case $type in (FreeBSD|NetBSD)
                OPTIONS=("$OPTIONS" #>#
                "n:; specify the number of output files"
                ) #<#
        esac
        case $type in (Darwin|FreeBSD|OpenBSD)
                OPTIONS=("$OPTIONS" #>#
                "p:; split at lines matching the specified extended regular expression"
                ) #<#
        esac

        command -f completion//parseoptions ${long:+-es}
        case $ARGOPT in
        (-)
                command -f completion//completeoptions
                ;;
        ([alnp]|--suffix-length|--lines)
                ;;
        ([bC]|--bytes|--line-bytes)
                if command -vf completion//prefixdigits >/dev/null 2>&1 ||
                                . -AL completion/_blocksize; then
                        if command -f completion//prefixdigits; then
                                command -f completion//completesizesuffix k m
                                case $type in
                                (GNU)
                                        command -f completion//completesizesuffix GNU b
                                        ;;
                                (FreeBSD)
                                        command -f completion//completesizesuffix g
                                        ;;
                                esac
                        fi
                fi
                ;;
        (*)
                complete -f
                ;;
        esac

}


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