From 48251be9125f8e23df180126d50422b0e6561030 Mon Sep 17 00:00:00 2001
From: Nathan Gass
Date: Wed, 17 Jul 2013 10:21:36 +0000
Subject: add --opts variant to shell_command which adds dashes for posix
 options, add tests for -opts and --opts

---
 tests/exec.t | 52 ++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)

(limited to 'tests/exec.t')

diff --git a/tests/exec.t b/tests/exec.t
index 6418716..4702681 100755
--- a/tests/exec.t
+++ b/tests/exec.t
@@ -10,6 +10,58 @@ is(it::shell_command("echo {arg}", array('arg' => 'gna07,-:blah')), "echo gna07,
 is(it::shell_command("echo {arg}", array('arg' => '2>&1')), "echo '2>&1'", "quote arguments with dangerous characters");
 is(it::shell_command("echo {arg}", array('arg' => '')), "echo ''", "quote empty arguments");
 
+
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('--longopt' => true))),
+	"echo --longopt",
+	"options argument with long option"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('-onedash' => true))),
+	"echo -onedash",
+	"... with long option but only one dash"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('-s' => true))),
+	"echo -s",
+	"... with short option"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('--longopt' => 'val'))),
+	"echo --longopt val",
+	"... with long option with value"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('-onedash' => 'val'))),
+	"echo -onedash val",
+	"... with long option but only one dash and with value"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('-s' => 'val'))),
+	"echo -s val",
+	"... with short option with value"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('--longopt' => false))),
+	"echo ",
+	"... with disabled long option"
+);
+is(
+	it::shell_command("echo {-opts}", array('-opts' => array('-s' => false))),
+	"echo ",
+	"... with disabled short option"
+);
+is(
+	it::shell_command("echo {--opts}", array('--opts' => array('longopt' => true))),
+	"echo --longopt",
+	"... long option without dashes for --opts"
+);
+is(
+	it::shell_command("echo {--opts}", array('--opts' => array('s' => true))),
+	"echo -s",
+	"... short option without dashes for --opts"
+);
+
 foreach (array("", "C", "de_CH", "de_CH.utf8") as $locale) {
 	setlocale(LC_ALL, $locale);
 	$arg = "preüpost";
-- 
cgit v1.2.3