Excecise the two-step stevedore closing before/after waiting for VCL

... references to vanish

Author: nigoroll

bin/varnishd/cache/cache_main.c

@@ -512,6 +512,7 @@ child_main(int sigmagic, size_t altstksz)
 	VCA_Shutdown();
 	BAN_Shutdown();
 	EXP_Shutdown();
+	STV_warn();
 	VCL_Shutdown();
 	STV_close();
 

bin/varnishd/cache/cache_varnishd.h

@@ -573,6 +573,7 @@ void V2D_Init(void);
 
 /* stevedore.c */
 void STV_open(void);
+void STV_warn(void);
 void STV_close(void);
 const struct stevedore *STV_next(void);
 int STV_BanInfoDrop(const uint8_t *ban, unsigned len);

bin/varnishd/storage/stevedore.c

@@ -198,19 +198,28 @@ STV_open(void)
 	AN(stv_h2_rxbuf);
 }
 
+void
+STV_warn(void)
+{
+	struct stevedore *stv;
+
+	ASSERT_CLI();
+	/* First send close warning */
+	STV_Foreach(stv)
+		if (stv->close != NULL)
+			stv->close(stv, 0);
+}
+
 void
 STV_close(void)
 {
 	struct stevedore *stv;
-	int i;
 
 	ASSERT_CLI();
-	for (i = 1; i >= 0; i--) {
-		/* First send close warning */
-		STV_Foreach(stv)
-			if (stv->close != NULL)
-				stv->close(stv, i);
-	}
+	/* First send close warning */
+	STV_Foreach(stv)
+		if (stv->close != NULL)
+			stv->close(stv, 1);
 }
 
 /*-------------------------------------------------------------------