Radish alpha
H
HardenedBSD-pkg
rad:z3QDZAW2FAfuLvihrhiyDC9fAD8G9
HardenedBSD Package Manager
Radicle
Git
Commits › 8e69071
Add small testsuite for lua scripts
Baptiste Daroussin committed 6 years ago
commit 8e69071ba0e01db669f5955dca2341be1e252ef3
parent bef5fac
3 files changed +101 -1
modified .gitignore
@@ -98,6 +98,7 @@ scripts/sbin/pkg2ng
/tests/frontend/issue1445

/tests/frontend/jpeg

/tests/frontend/lock
+ 
/tests/frontend/lua

/tests/frontend/messages

/tests/frontend/multipleprovider

/tests/frontend/packagemerge
modified tests/Makefile.autosetup
@@ -48,7 +48,8 @@ TESTS_SH= \
	frontend/issue1425.sh \

	frontend/issue1440.sh \

	frontend/issue1445.sh \
- 
	frontend/fingerprint.sh
+ 
	frontend/fingerprint.sh \
+ 
	frontend/lua.sh



merge_OBJS=	lib/merge.o

plist_OBJS=	lib/plist.o
added tests/frontend/lua.sh
@@ -0,0 +1,98 @@
+ 
#! /usr/bin/env atf-sh
+
+ 
. $(atf_get_srcdir)/test_environment.sh
+
+ 
tests_init \
+ 
	script_basic \
+ 
	script_message \
+ 
	script_rooteddir
+
+ 
script_basic_body() {
+ 
	atf_check -s exit:0 sh ${RESOURCEDIR}/test_subr.sh new_pkg "test" "test" "1"
+ 
	cat << EOF >> test.ucl
+ 
lua_scripts: {
+ 
  post-install: [
+ 
  'print("this is post install1")',
+ 
  'print("this is post install2")',
+ 
  ]
+ 
}
+ 
EOF
+
+ 
	atf_check \
+ 
		-o empty \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg create -M test.ucl
+
+ 
	mkdir ${TMPDIR}/target
+ 
	atf_check \
+ 
		-o inline:"this is post install1\nthis is post install2\n" \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg -o REPOS_DIR=/dev/null -r ${TMPDIR}/target install -qfy ${TMPDIR}/test-1.txz
+
+ 
}
+
+ 
script_message_body() {
+ 
	# The message should be the last thing planned
+ 
	atf_check -s exit:0 sh ${RESOURCEDIR}/test_subr.sh new_pkg "test" "test" "1"
+ 
	cat << EOF >> test.ucl
+ 
lua_scripts: {
+ 
  post-install: [
+ 
  "print(\"this is post install1\")\npkg.print_msg(\"this is a message\")",
+ 
  'print("this is post install2")',
+ 
  ]
+ 
}
+ 
EOF
+
+ 
	atf_check \
+ 
		-o empty \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg create -M test.ucl
+
+ 
	mkdir ${TMPDIR}/target
+ 
	atf_check \
+ 
		-o inline:"this is post install1\nthis is post install2\nthis is a message\n" \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg -o REPOS_DIR=/dev/null -r ${TMPDIR}/target install -qfy ${TMPDIR}/test-1.txz
+
+ 
}
+
+ 
script_rooteddir_body() {
+ 
	# The message should be the last thing planned
+ 
	atf_check -s exit:0 sh ${RESOURCEDIR}/test_subr.sh new_pkg "test" "test" "1"
+ 
	cat << EOF >> test.ucl
+ 
lua_scripts: {
+ 
  post-install: [ <<EOS
+ 
test = io.open("/file.txt", "w+")
+ 
test:write("test\n")
+ 
io.close(test)
+ 
EOS
+ 
,
+ 
  ]
+ 
}
+ 
EOF
+
+ 
	atf_check \
+ 
		-o empty \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg create -M test.ucl
+
+ 
	mkdir ${TMPDIR}/target
+ 
	atf_check \
+ 
		-e empty \
+ 
		-s exit:0 \
+ 
		pkg -o REPOS_DIR=/dev/null -r ${TMPDIR}/target install -qfy ${TMPDIR}/test-1.txz
+ 
	[ -f ${TMPDIR}/target/file.txt ] || atf_fail "File not created in the rootdir"
+ 
	# test the mode
+ 
	atf_check -o match:"^-rw-r--r--" ls -l ${TMPDIR}/target/file.txt
+ 
	atf_check \
+ 
		-e empty \
+ 
		-o inline:"test\n" \
+ 
		-s exit:0 \
+ 
		cat ${TMPDIR}/target/file.txt
+
+ 
}