Test inetd components.

* lib/Makefile.am: Add urlconn.c
* lib/libpies.h (url_connect): New proto.
* lib/urlconn.c: New file.
* src/piesctl.c (shttp_connect): Use url_connect.
* tests/.gitignore: Update.
* tests/Makefile.am: New auxtool: aux/in.test
New test: inet.at
* tests/aux/in.test: New file.
* tests/inet.at: New file.
* tests/iobuf.h: New file.
* tests/nt.c: New file.
* tests/testsuite.at: Add new test.
* tests/to.c: explicitly terminate the child process on timeout.

1 files changed, 38 insertions, 0 deletions

diff --git a/tests/inet.at b/tests/inet.at
new file mode 100644
index 0000000..41cae6a
--- /dev/null
+++ b/tests/inet.at
@@ -0,0 +1,38 @@
+AT_SETUP([inet component])
+AT_CHECK([
+PIES_XFAIL_CHECK
+PIES_CONTROL_INIT
+AT_DATA([input],
+[line 1
+line 2
+stop
+])
+: ${PIES_TEST_INET_SOCKET:=unix://$PWD/in.sock}
+cat > pies.conf <<_EOT
+component in {
+  command "$auxdir/in.test $PWD/inlog";
+  env {
+     set "STOPCMD=piesctl --url unix:///$PWD/pies.ctl --no-netrc shutdown";
+  }
+  mode inetd;
+  socket "$PIES_TEST_INET_SOCKET";
+  stderr file "$PWD/log.err";
+}
+component controller {
+  command "nt $PIES_TEST_INET_SOCKET -i input";
+}
+_EOT
+set -e
+to 10 \
+  pies --foreground --stderr \
+       --config-file control.conf --config-file pies.conf --debug 1 2>errlog
+
+cat inlog
+cat log.err >&2
+],
+[0],
+[line 1
+line 2
+stop
+])
+AT_CLEANUP