Fix CIDs 174500 and 174471

src/sbbs3/ftpsrvr.c

@@ -1909,11 +1909,14 @@ static BOOL send_mlsx(FILE *fp, SOCKET sock, CRYPT_SESSION sess, const char *for
 {
 	va_list va;
 	char *str;
+	int rval;
 
 	if (fp == NULL && sock == INVALID_SOCKET)
 		return FALSE;
 	va_start(va, format);
-	if (vasprintf(&str, format, va) == -1)
+	rval = vasprintf(&str, format, va);
+	va_end(va);
+	if (rval == -1)
 		return FALSE;
 	if (fp != NULL)
 		fprintf(fp, "%s\r\n", str);
@@ -1959,7 +1962,7 @@ static BOOL send_mlsx_entry(FILE *fp, SOCKET sock, CRYPT_SESSION sess, unsigned
 	if (unique != NULL && (feats & MLSX_UNIQUE))
 		end += sprintf(end, "Unique=%s;", unique);
 	if (ul != 0 && (feats & MLSX_CREATE)) {
-		t = *gmtime(&modify);
+		t = *gmtime(&ul);
 		end += sprintf(end, "Create=%04d%02d%02d%02d%02d%02d;",
 		    t.tm_year+1900, t.tm_mon+1, t.tm_mday,
 		    t.tm_hour, t.tm_min, t.tm_sec);