1

set -ue

     2

     3

shopt -s globstar nullglob

     4

     5

for module in ${MODULES[@]}; do

     6

    . $LIB/pvl/$module.sh

     7

done

     8

     9

. $LIB/pvl/util.sh

    10

. $LIB/pvl/list.sh

    11

. $LIB/pvl/cmd.sh

    12

    13

function main_help {

    14

    cat <<END

    15

Usage: $0 [options]

    16

    17

General:

    18

    -h      display this help text

    19

END

    20

    21

    for module in ${MODULES[@]} $MAIN_MODULE; do

    22

        func_test ${module}_help && ${module}_help

    23

    done

    24

}

    25

    26

function main_opts {

    27

    local module=

    28

    29

    # build opts string

    30

    local opts=$(

    31

        echo -n 'h'

    32

    33

        for module in ${MODULES[@]} $MAIN_MODULE; do

    34

            module_getopts=${module}_GETOPTS

    35

            echo -n ${!module_getopts:-}

    36

        done

    37

    )

    38

    39

    local OPTIND

    40

    while getopts "$opts" opt; do

    41

        local opt_module=

    42

    43

        if [ "$opt" = 'h' ]; then

    44

            main_help

    45

            exit 0;

    46

        fi

    47

    48

        for module in ${MODULES[@]} $MAIN_MODULE; do

    49

            if func_test ${module}_opt && ${module}_opt $opt "${OPTARG:-}"; then

    50

                opt_module=$module

    51

            fi

    52

        done

    53

    54

        if [ "$opt_module" ]; then

    55

            continue

    56

        else

    57

            die "opt: $opt"

    58

        fi

    59

    done

    60

    shift $(($OPTIND - 1))

    61

}

    62

    63

function main {

    64

    local module=

    65

    66

    main_opts "$@"

    67

    68

    for module in ${MODULES[@]} $MAIN_MODULE; do

    69

        func_test ${module}_init && ${module}_init

    70

    done

    71

    72

    # initialize relative paths

    73

    [ -n "$SRV" ] && cd $SRV

    74

    75

    ${MAIN_MODULE}_main

    76

}