geturl: Log message improvements

This commit is contained in:
Richard Hansen 2024-07-25 17:19:45 -04:00
parent b1752c2622
commit d48b482269

View file

@ -2702,8 +2702,7 @@ sub geturl {
} }
if (!opt('exec')) { if (!opt('exec')) {
debug("skipped network connection"); info("would request: ${protocol}://${server}/${url}");
verbose("SENDING:", "%s", "${server}/${url}");
} else { } else {
push(@curlopt, "silent"); push(@curlopt, "silent");
push(@curlopt, "include"); ## Include HTTP response for compatibility push(@curlopt, "include"); ## Include HTTP response for compatibility
@ -2736,11 +2735,9 @@ sub geturl {
# don't include ${url} as that might expose login credentials # don't include ${url} as that might expose login credentials
$0 = sprintf("%s - Curl system cmd sending to %s", $program, "${protocol}://${server}"); $0 = sprintf("%s - Curl system cmd sending to %s", $program, "${protocol}://${server}");
verbose("SENDING:", "Curl system cmd to %s", "${protocol}://${server}"); debug("REQUEST: curl config:\n" . join("\n", @curlopt));
verbose("SENDING:", "%s", $_) for (@curlopt);
$reply = curl_cmd(@curlopt); $reply = curl_cmd(@curlopt);
verbose("RECEIVE:", "%s", $reply // "<undefined>"); debug("RESPONSE: " . (defined($reply) ? "reply:\n$reply" : '<undefined>'));
if (!$reply) { if (!$reply) {
# don't include ${url} as that might expose login credentials # don't include ${url} as that might expose login credentials
if ($ipversion != 0) { if ($ipversion != 0) {