From b6d2a5fb6343c3ee61c9c5d8290e9656dedb28f9 Mon Sep 17 00:00:00 2001
From: Jim Garlick <garlick.jim@gmail.com>
Date: Tue, 29 Aug 2017 15:15:26 -0700
Subject: [PATCH] t/t1000-kvs.t: cover "flux ls"

---
 t/t1000-kvs.t | 117 ++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 117 insertions(+)

diff --git a/t/t1000-kvs.t b/t/t1000-kvs.t
index 58db2bb4e702..8d4505f76fdd 100755
--- a/t/t1000-kvs.t
+++ b/t/t1000-kvs.t
@@ -278,6 +278,123 @@ EOF
 	test_cmp expected output
 '
 
+#
+# ls tests
+#
+test_expect_success 'kvs: ls -1F DIR works' '
+	flux kvs unlink -Rf $DIR &&
+	flux kvs put $DIR.a=69 &&
+	flux kvs mkdir $DIR.b &&
+	flux kvs link b $DIR.c &&
+	flux kvs ls -1F $DIR | sort >output &&
+	cat >expected <<-EOF &&
+	a
+	b.
+	c@
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls -1Fd DIR.a DIR.b DIR.c works' '
+	flux kvs unlink -Rf $DIR &&
+	flux kvs put $DIR.a=69 &&
+	flux kvs mkdir $DIR.b &&
+	flux kvs link b $DIR.c &&
+	flux kvs ls -1Fd $DIR.a $DIR.b $DIR.c | sort >output &&
+	cat >expected <<-EOF &&
+	$DIR.a
+	$DIR.b.
+	$DIR.c@
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls -1RF shows directory titles' '
+	flux kvs unlink -Rf $DIR &&
+	flux kvs put $DIR.a=69 &&
+	flux kvs put $DIR.b.d=42 &&
+	flux kvs link b $DIR.c &&
+	flux kvs ls -1RF $DIR | grep : | wc -l >output &&
+	cat >expected <<-EOF &&
+	2
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls with no options adjusts output width to 80' '
+	flux kvs unlink -Rf $DIR &&
+	${FLUX_BUILD_DIR}/t/kvs/dtree -p$DIR -h1 -w50 &&
+	flux kvs ls $DIR | wc -wl >output &&
+	cat >expected <<-EOF &&
+	      5      50
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls -w40 adjusts output width to 40' '
+	flux kvs unlink -Rf $DIR &&
+	${FLUX_BUILD_DIR}/t/kvs/dtree -p$DIR -h1 -w50 &&
+	flux kvs ls -w40 $DIR | wc -wl >output &&
+	cat >expected <<-EOF &&
+	     10      50
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls with COLUMNS=20 adjusts output width to 20' '
+	flux kvs unlink -Rf $DIR &&
+	${FLUX_BUILD_DIR}/t/kvs/dtree -p$DIR -h1 -w50 &&
+	COLUMNS=20 flux kvs ls $DIR | wc -wl >output &&
+	cat >expected <<-EOF &&
+	     25      50
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls -R lists deep directory hierarchy' '
+	flux kvs unlink -Rf $DIR &&
+	${FLUX_BUILD_DIR}/t/kvs/dtree -p$DIR -h8 -w1 &&
+	flux kvs ls -R $DIR >output &&
+	cat >expected <<-EOF &&
+	$DIR:
+	0000
+
+	$DIR.0000:
+	0000
+
+	$DIR.0000.0000:
+	0000
+
+	$DIR.0000.0000.0000:
+	0000
+
+	$DIR.0000.0000.0000.0000:
+	0000
+
+	$DIR.0000.0000.0000.0000.0000:
+	0000
+
+	$DIR.0000.0000.0000.0000.0000.0000:
+	0000
+
+	$DIR.0000.0000.0000.0000.0000.0000.0000:
+	0000
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls key. works' '
+	flux kvs unlink -Rf $DIR &&
+	flux kvs mkdir $DIR.a &&
+	flux kvs ls -d $DIR.a. >output &&
+	cat >expected <<-EOF &&
+	$DIR.a
+	EOF
+	test_cmp expected output
+'
+test_expect_success 'kvs: ls key. fails if key is not a directory' '
+	flux kvs unlink -Rf $DIR &&
+	flux kvs put $DIR.a=42 &&
+	! flux kvs ls -d $DIR.a.
+'
+test_expect_success 'kvs: ls key. fails if key does not exist' '
+	flux kvs unlink -Rf $DIR &&
+	! flux kvs ls $DIR.a
+'
+
 #
 # get corner case tests
 #