mk-lib1521: make the test set each string option again

In an attempt to make sure that setting it again does not leak memory.

The second string is set to `""`, which is done so that this now finds
the problem reported in #20179.

Ref: #20179
Closes #20181
This commit is contained in:
Daniel Stenberg 2026-01-04 12:24:41 +01:00
parent 193397bf4e
commit 20ac5531cd
No known key found for this signature in database
GPG Key ID: 5CC908FDB71E12C2

View File

@ -449,6 +449,8 @@ while(<STDIN>) {
my $ifpresent = "${w2}if(present(first)) {\n";
my $pref = "${w3}result =\n".
"${w3} curl_easy_setopt(curl, $name,";
my $ignoreset = "${w3}/* set string again to check for leaks */\n".
"${w3}(void)curl_easy_setopt(curl, $name,";
my $i = ' ' x (length($w) + 25);
my $fcheck = <<MOO
if(first && present(first)) /* first setopt check only */
@ -494,6 +496,7 @@ MOO
if($type eq "CURLOPTTYPE_STRINGPOINT") {
print $fh "${fpref} \"string\");\n$fstringcheck";
print $fh "$ifpresent";
print $fh "${ignoreset} \"\");\n";
print $fh "${pref} NULL);\n$nullcheck";
}
elsif(($type eq "CURLOPTTYPE_LONG") ||