[PATCH 1/4] t/httpd-unit: extra test for fencepost errors

[Eric Wong <e@80x24.org>]

I'm terrible at this stuff :<
---
 t/httpd-unit.t | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/t/httpd-unit.t b/t/httpd-unit.t
index 049d5fc..30d1717 100644
--- a/t/httpd-unit.t
+++ b/t/httpd-unit.t
@@ -95,4 +95,11 @@ open STDERR, '>', $err;
 isnt(system(@vg, $exe, "socket_dir:$s"), 0, "listen dir on socket fails");
 like($end_err->(), qr/stat.*directory/, 'stat failure shown');
 
+# check for fencepost errors
+my $len = 108 - length("$tmp");
+$len -= length("\0//$TEST_PID.sock");
+my $max = "$tmp/".('x'x$len);
+is(system(@vg, $exe, "socket_dir:$max"), 0, "listen dir on max");
+isnt(system(@vg, $exe, "socket_dir:$max+"), 0, "listen dir too long");
+
 done_testing;