eac_tools 0.86.1 → 0.86.3

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/lib/test/tap.bash

@@ -0,0 +1,153 @@
+# test/tap.bash - TAP Testing Foundation for Bash
+#
+# Copyright (c) 2013-2016. Ingy döt Net.
+
+#------------------------------------------------------------------------------
+Test::Tap:die() { echo "$@" >&2; trap EXIT; exit 1; }
+#------------------------------------------------------------------------------
+
+Test__Tap_VERSION=0.0.4
+
+Test::Tap:init() {
+  [ -n "$BASH_SOURCE" ] ||
+    Test::Tap:die "Error: test-tap-bash must be run under Bash only"
+  Test__Tap_plan=0
+  Test__Tap_run=0
+  Test__Tap_failed=0
+  Test__Tap_pid=$BASHPID
+
+  if [ $# -gt 0 ]; then
+    [[ $# -eq 2 ]] ||
+      Test::Tap:die 'Usage: test/tap.bash tests <number>'
+    Test::Tap:plan "$@"
+  fi
+
+  trap Test::Tap:END EXIT
+}
+
+Test::Tap:plan() {
+  Test::Tap:_check-pid
+  [ $# -eq 2 ] ||
+    Test::Tap:die 'Usage: plan tests <number>'
+  if [ "$1" = tests ]; then
+    [[ "$2" =~ ^-?[0-9]+$ ]] ||
+      Test::Tap:die 'Plan must be a number'
+    [[ $2 -gt 0 ]] ||
+      Test::Tap:die 'Plan must greater then 0'
+    Test__Tap_plan=$2
+    printf "1..%d\n" $Test__Tap_plan
+  elif [ "$1" == skip_all ]; then
+    printf "1..0 # SKIP $2\n"
+    exit 0
+  else
+    Test::Tap:die 'Usage: plan tests <number>'
+  fi
+}
+
+Test::Tap:pass() {
+  Test::Tap:_check-pid
+  let Test__Tap_run=Test__Tap_run+1
+  local label="$1"
+  if [ -n "$label" ]; then
+    echo "ok $Test__Tap_run - $label"
+  else
+    echo "ok $Test__Tap_run"
+  fi
+}
+
+Test__Tap_CALL_STACK_LEVEL=1
+Test::Tap:fail() {
+  Test::Tap:_check-pid
+  let Test__Tap_run=Test__Tap_run+1
+  local c=( $(caller $Test__Tap_CALL_STACK_LEVEL) )
+  local file=${c[2]}
+  local line=${c[0]}
+  local label="$1" callback="$2"
+  if [ -n "$label" ]; then
+    echo "not ok $Test__Tap_run - $label"
+  else
+    echo "not ok $Test__Tap_run"
+  fi
+  label=${label:+"'$label'\n#   at $file line $line."}
+  label=${label:-"at $file line $line."}
+  echo -e "#   Failed test $label" >&2
+
+  [ -n "$callback" ] && $callback
+
+  local rc=${TEST_TAP_BAIL_ON_FAIL:-0}
+  [[ $TEST_TAP_BAIL_ON_FAIL -eq 0 ]] || exit $rc
+}
+
+Test::Tap:done_testing() {
+  Test::Tap:_check-pid
+  Test__Tap_plan=$Test__Tap_run
+  echo 1..${1:-$Test__Tap_run}
+}
+
+Test::Tap:diag() {
+  Test::Tap:_check-pid
+  local msg="$@"
+  msg="# ${msg//$'\n'/$'\n'# }"
+  echo "$msg" >&2
+}
+
+Test::Tap:note() {
+  Test::Tap:_check-pid
+  local msg="$@"
+  msg="# ${msg//$'\n'/$'\n'# }"
+  echo "$msg"
+}
+
+Test::Tap:BAIL_OUT() {
+  Test::Tap:_check-pid
+  Test__Tap_bail_msg="$@"
+  : "${Test__Tap_bail_msg:=No reason given.}"
+  exit 255
+}
+
+Test::Tap:BAIL_ON_FAIL() {
+  Test::Tap:_check-pid
+  TEST_TAP_BAIL_ON_FAIL=1
+}
+
+Test::Tap:END() {
+  local rc=$?
+  Test::Tap:_check-pid
+  if [ $rc -ne 0 ]; then
+    if [ -n "$Test__Tap_bail_msg" -o -n "$TEST_TAP_BAIL_ON_FAIL" ]; then
+      local bail="${Test__Tap_bail_msg:-"Bailing out on status=$rc"}"
+      echo "Bail out!  $bail"
+      exit $rc
+    fi
+  fi
+
+  for v in plan run failed; do eval local $v=\$Test__Tap_$v; done
+  if [ $plan -eq 0 ]; then
+    if [ $run -gt 0 ]; then
+      echo "# Tests were run but no plan was declared." >&2
+    fi
+  else
+    if [ $run -eq 0 ]; then
+      echo "# No tests run!" >&2
+    elif [ $run -ne $plan ]; then
+      local msg="# Looks like you planned $plan tests but ran $run."
+      [ $plan -eq 1 ] && msg=${msg/tests/test}
+      echo "$msg" >&2
+    fi
+  fi
+  local exit_code=0
+  if [ $Test__Tap_failed -gt 0 ]; then
+    exit_code=$Test__Tap_failed
+    [ $exit_code -gt 254 ] && exit_code=254
+    local msg="# Looks like you failed $failed tests of $run run."
+    [ $Test__Tap_failed -eq 1 ] && msg=${msg/tests/test}
+    echo "$msg" >&2
+  fi
+  exit $exit_code
+}
+
+Test::Tap:_check-pid() {
+  if [ ${BASHPID:-0} -ne ${Test__Tap_pid:-0} ]; then
+    die "Error: Called Test::Tap method from a subprocess" 3
+  fi
+}

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/man/man3/test-tap.3

@@ -0,0 +1,119 @@
+.\" Automatically generated by Pod::Man 2.27 (Pod::Simple 3.28)
+.\"
+.\" Standard preamble:
+.\" ========================================================================
+.de Sp \" Vertical space (when we can't use .PP)
+.if t .sp .5v
+.if n .sp
+..
+.de Vb \" Begin verbatim text
+.ft CW
+.nf
+.ne \\$1
+..
+.de Ve \" End verbatim text
+.ft R
+.fi
+..
+.\" Set up some character translations and predefined strings.  \*(-- will
+.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
+.\" double quote, and \*(R" will give a right double quote.  \*(C+ will
+.\" give a nicer C++.  Capital omega is used to do unbreakable dashes and
+.\" therefore won't be available.  \*(C` and \*(C' expand to `' in nroff,
+.\" nothing in troff, for use with C<>.
+.tr \(*W-
+.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
+.ie n \{\
+.    ds -- \(*W-
+.    ds PI pi
+.    if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
+.    if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\"  diablo 12 pitch
+.    ds L" ""
+.    ds R" ""
+.    ds C` ""
+.    ds C' ""
+'br\}
+.el\{\
+.    ds -- \|\(em\|
+.    ds PI \(*p
+.    ds L" ``
+.    ds R" ''
+.    ds C`
+.    ds C'
+'br\}
+.\"
+.\" Escape single quotes in literal strings from groff's Unicode transform.
+.ie \n(.g .ds Aq \(aq
+.el       .ds Aq '
+.\"
+.\" If the F register is turned on, we'll generate index entries on stderr for
+.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
+.\" entries marked with X<> in POD.  Of course, you'll have to process the
+.\" output yourself in some meaningful fashion.
+.\"
+.\" Avoid warning from groff about undefined register 'F'.
+.de IX
+..
+.nr rF 0
+.if \n(.g .if rF .nr rF 1
+.if (\n(rF:(\n(.g==0)) \{
+.    if \nF \{
+.        de IX
+.        tm Index:\\$1\t\\n%\t"\\$2"
+..
+.        if !\nF==2 \{
+.            nr % 0
+.            nr F 2
+.        \}
+.    \}
+.\}
+.rr rF
+.\" ========================================================================
+.\"
+.IX Title "Test::Tap 1"
+.TH Test::Tap 1 "January 2016" "Generated by Swim v0.1.41" "\s-1TAP\s0 Test Base for Bash"
+.\" For nroff, turn off justification.  Always turn off hyphenation; it makes
+.\" way too many mistakes in technical documents.
+.if n .ad l
+.nh
+.SH "Name"
+.IX Header "Name"
+Test::Tap \- \s-1TAP\s0 Test Base for Bash
+.SH "Synopsis"
+.IX Header "Synopsis"
+.Vb 1
+\&    source test/tap.bash
+\&
+\&    Test::Tap:plan tests 1
+\&
+\&    pass \*(AqEverything is OK!\*(Aq
+.Ve
+.SH "Description"
+.IX Header "Description"
+This is a \s-1TAP\s0 testing base class for Bash. It has all the basic \s-1TAP\s0 functions, and works properly from a \s-1TAP\s0 harness, like the \f(CW\*(C`prove\*(C'\fR utility.
+.PP
+test-tap-bash is used as the base for test-more-bash, which is what you want if you are writing tests in bash.
+.PP
+See: <https://github.com/ingydotnet/test\-more\-bash/>
+.SH "Functions"
+.IX Header "Functions"
+.ie n .IP """Test::Tap:init""" 4
+.el .IP "\f(CWTest::Tap:init\fR" 4
+.IX Item "Test::Tap:init"
+Must be called first for every test file/process.
+.ie n .IP """Test::Tap::plan""" 4
+.el .IP "\f(CWTest::Tap::plan\fR" 4
+.IX Item "Test::Tap::plan"
+Used to set the plan.
+.SH "TODO"
+.IX Header "TODO"
+.IP "\(bu" 4
+Finish this doc.
+.SH "Author"
+.IX Header "Author"
+Written by Ingy döt Net <ingy@ingy.net>
+.SH "Copyright & License"
+.IX Header "Copyright & License"
+Copyright 2013\-2016. Ingy döt Net.
+.PP
+The \s-1MIT\s0 License (\s-1MIT\s0).

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/bail_out.t

@@ -0,0 +1,13 @@
+#!/usr/bin/env bash
+
+source test/helper.bash
+source lib/test/tap.bash
+
+Test::Tap:init tests 1
+
+output=$(prove -v test/test/{b,f}ail.t 2>&1)
+
+test-helper:like \
+  "$output" \
+  'Bailout called.  Further testing stopped:  Get me outta here' \
+  'Test::Tap:BAIL_OUT works'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/done.t

@@ -0,0 +1,10 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init
+
+Test::Tap:pass one
+Test::Tap:pass two
+
+Test::Tap:done_testing

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/fail.t

@@ -0,0 +1,20 @@
+#!/usr/bin/env bash
+
+source test/helper.bash
+source lib/test/tap.bash
+
+Test::Tap:init tests 2
+
+output="$(prove -v test/test/fail.t 2>&1)"
+
+# echo "# >>>${output//$'\n'/$'\n'# }<<<" >&2
+
+test-helper:like \
+  "$output" \
+  'not ok 1 - I am a failure' \
+  'Test::Tap:fail works'
+
+test-helper:like \
+  "$output" \
+  'Failed 1/1 subtests' \
+  'Proper summary'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/fail_fast.t

@@ -0,0 +1,15 @@
+#!/usr/bin/env bash
+
+source test/helper.bash
+source lib/test/tap.bash
+
+Test::Tap:init tests 1
+
+output="$(prove -v test/test/fail_fast.t 2>&1)"
+
+# echo ">>>$output<<<" >&2
+
+test-helper:like \
+  "$output" \
+  'Further testing stopped:  Bailing out on status=1' \
+  'Test::Tap:BAIL_OUT works'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/helper.bash

@@ -0,0 +1,9 @@
+test-helper:like() {
+  local got=$1 regex=$2 label=$3
+  if [[ "$got" =~ "$regex" ]]; then
+    Test::Tap:pass "$label"
+  else
+    Test::Tap:fail "$label"
+    Test::Tap:diag "Got: '$got'"
+  fi
+}

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/pass.t

@@ -0,0 +1,9 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init tests 3
+
+Test::Tap:pass 'pass 1 - with label'
+Test::Tap:pass
+Test::Tap:pass 'pass 3 - 2 has no label'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/plan.t

@@ -0,0 +1,10 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init
+Test::Tap:plan tests 3
+
+for n in 1 2 3; do
+  Test::Tap:pass "Test #$n"
+done

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/skip_all.t

@@ -0,0 +1,20 @@
+#!/usr/bin/env bash
+
+source test/helper.bash
+source lib/test/tap.bash
+
+Test::Tap:init tests 4
+
+for s in plan init; do
+  output=$(prove test/test/skip-all-$s.t)
+
+  test-helper:like \
+    "$output" \
+    "skipped: Test for skip_all from $s" \
+    "skip_all from $s: it works"
+
+  test-helper:like \
+    "$output" \
+    'Result: NOTESTS' \
+    "skip_all from $s: No tests run"
+done

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/tap.t

@@ -0,0 +1,13 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init tests 4
+
+Test::Tap:pass 'pass with label'
+Test::Tap:pass
+Test::Tap:pass 'previous test has no label'
+msg="$(Test::Tap:fail 'faaaaailll' 2>/dev/null)"
+if [[ "$msg" =~ not\ ok\ 4\ -\ faaaaailll ]]; then
+  Test::Tap:pass 'fail works'
+fi

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/test/bail.t

@@ -0,0 +1,14 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init tests 5
+
+Test::Tap:pass 'test #1'
+Test::Tap:pass 'test #2'
+Test::Tap:pass 'test #3'
+
+Test::Tap:BAIL_OUT 'Get me outta here'
+
+Test::Tap:pass 'test #4'
+Test::Tap:fail 'test #5'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/test/fail.t

@@ -0,0 +1,7 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init tests 1
+
+Test::Tap:fail 'I am a failure'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/test/fail_fast.t

@@ -0,0 +1,12 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init tests 5
+Test::Tap:BAIL_ON_FAIL
+
+Test::Tap:pass 'test #1'
+Test::Tap:pass 'test #2'
+Test::Tap:fail 'test #3'
+Test::Tap:pass 'test #4'
+Test::Tap:pass 'test #5'

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/test/skip-all-init.t

@@ -0,0 +1,8 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init skip_all 'Test for skip_all from init'
+
+Test::Tap:diag "This code should not be run"
+Test::Tap:fail

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/ext/test-tap-bash/test/test/skip-all-plan.t

@@ -0,0 +1,9 @@
+#!/usr/bin/env bash
+
+source lib/test/tap.bash
+
+Test::Tap:init
+Test::Tap:plan skip_all 'Test for skip_all from plan'
+
+Test::Tap:diag "This code should not be run"
+Test::Tap:fail

data/sub/eac_git/vendor/git-subrepo/ext/test-more-bash/lib/test/more.bash

@@ -0,0 +1,95 @@
+# test/more.bash - Complete TAP test framework for Bash
+#
+# Copyright (c) 2013-2016. Ingy döt Net.
+
+set -e
+
+Test__More_VERSION=0.0.3
+
+source bash+ :std
+use Test::Tap
+
+Test::More:import() { Test::Tap:init "$@"; }
+
+plan() { Test::Tap:plan "$@"; }
+pass() { Test::Tap:pass "$@"; }
+fail() { Test::Tap:fail "$@"; }
+diag() { Test::Tap:diag "$@"; }
+note() { Test::Tap:note "$@"; }
+done_testing() { Test::Tap:done_testing "$@"; }
+BAIL_OUT() { Test::Tap:BAIL_OUT "$@"; }
+BAIL_ON_FAIL() { Test::Tap:BAIL_ON_FAIL "$@"; }
+
+is() {
+  local got="$1" want="$2" label="$3"
+  if [[ $got == "$want" ]]; then
+    Test::Tap:pass "$label"
+  else
+    Test::Tap:fail "$label" Test::More:is-fail
+  fi
+}
+
+Test::More:is-fail() {
+  local Test__Tap_CALL_STACK_LEVEL=
+  Test__Tap_CALL_STACK_LEVEL=$(( Test__Tap_CALL_STACK_LEVEL + 1 ))
+  if [[ "$want" =~ \n ]]; then
+    echo "$got" > /tmp/got-$$
+    echo "$want" > /tmp/want-$$
+    diff -u /tmp/{want,got}-$$ >&2
+    wc /tmp/{want,got}-$$ >&2
+    rm -f /tmp/{got,want}-$$
+  else
+    Test::Tap:diag "\
+    got: '$got'
+  expected: '$want'"
+  fi
+}
+
+isnt() {
+  local Test__Tap_CALL_STACK_LEVEL=
+  Test__Tap_CALL_STACK_LEVEL=$(( Test__Tap_CALL_STACK_LEVEL + 1 ))
+  local got="$1" dontwant="$2" label="$3"
+  if [[ $got != "$dontwant" ]]; then
+    Test::Tap:pass "$label"
+  else
+    Test::Tap:fail "$label" Test::More:isnt-fail
+  fi
+}
+
+Test::More:isnt-fail() {
+    Test::Tap:diag "\
+      got: '$got'
+   expected: anything else"
+}
+
+ok() {
+  (exit ${1:-$?}) &&
+    Test::Tap:pass "$2" ||
+    Test::Tap:fail "$2"
+}
+
+like() {
+  local got=$1 regex=$2 label=$3
+  if [[ $got =~ "$regex" ]]; then
+    Test::Tap:pass "$label"
+  else
+    Test::Tap:fail "$label" Test::More:like-fail
+  fi
+}
+
+Test::More:like-fail() {
+    Test::Tap:diag "Got: '$got'"
+}
+
+unlike() {
+  local got=$1 regex=$2 label=$3
+  if [[ ! $got =~ "$regex" ]]; then
+    Test::Tap:pass "$label"
+  else
+    Test::Tap:fail "$label" Test::More:unlike-fail
+  fi
+}
+
+Test::More:unlike-fail() {
+    Test::Tap:diag "Got: '$got'"
+}