ꦫꦣꦺꦤ꧀ꦄꦤ꧀ꦠꦱꦺꦤ

PATH: usr / lib64 / perl5 / vendor_perl / auto / Net / SSLeay

# NOTE: Derived from blib/lib/Net/SSLeay.pm.
# Changes made here will be lost when autosplit is run again.
# See AutoSplit.pm.
package Net::SSLeay;

#line 1262 "blib/lib/Net/SSLeay.pm (autosplit into blib/lib/auto/Net/SSLeay/do_httpx3.al)"
sub do_httpx3 {
    my ($method, $usessl, $site, $port, $path, $headers,
	$content, $mime_type, $crt_path, $key_path) = @_;
    my ($response, $page, $h,$v);

my $len = blength($content);
    if ($len) {
	$mime_type = "application/x-www-form-urlencoded" unless $mime_type;
	$content = "Content-Type: $mime_type$CRLF"
	    . "Content-Length: $len$CRLF$CRLF$content";
    } else {
	$content = "$CRLF$CRLF";
    }
    my $req = "$method $path HTTP/1.0$CRLF";
    unless (defined $headers && $headers =~ /^Host:/m) {
        $req .= "Host: $site";
        unless (($port == 80 && !$usessl) || ($port == 443 && $usessl)) {
            $req .= ":$port";
        }
        $req .= $CRLF;
	}
    $req .= (defined $headers ? $headers : '') . "Accept: */*$CRLF$content";

warn "do_httpx3($method,$usessl,$site:$port)" if $trace;
    my ($http, $errs, $server_cert)
	= httpx_cat($usessl, $site, $port, $req, $crt_path, $key_path);
    return (undef, "HTTP/1.0 900 NET OR SSL ERROR$CRLF$CRLF$errs") if $errs;

$http = '' if !defined $http;
    ($headers, $page) = split /\s?\n\s?\n/, $http, 2;
    warn "headers >$headers< page >>$page<< http >>>$http<<<" if $trace>1;
    ($response, $headers) = split /\s?\n/, $headers, 2;
    return ($page, $response, $headers, $server_cert);
}

# end of Net::SSLeay::do_httpx3
1;

[-] get_http3.al [edit]
[-] put_httpx.al [edit]
[-] want_read.al [edit]
[-] post_http4.al [edit]
[-] head_https4.al [edit]
[-] put_httpx3.al [edit]
[-] get_https.al [edit]
[-] head_https.al [edit]
[-] httpx_cat.al [edit]
[-] do_https4.al [edit]
[-] set_proxy.al [edit]
[-] get_httpx3.al [edit]
[-] put_http4.al [edit]
[-] dump_peer_certificate.al [edit]
[-] post_https.al [edit]
[-] put_http.al [edit]
[-] put_https.al [edit]
[+] ..
[-] put_https3.al [edit]
[-] post_httpx3.al [edit]
[-] tcp_read_until.al [edit]
[-] tcp_write_all.al [edit]
[-] set_cert_and_key.al [edit]
[-] tcp_write_CRLF.al [edit]
[-] head_httpx4.al [edit]
[-] head_httpx.al [edit]
[-] post_http.al [edit]
[-] want_write.al [edit]
[-] open_proxy_tcp_connection.al [edit]
[-] head_httpx3.al [edit]
[-] sslcat.al [edit]
[-] put_httpx4.al [edit]
[-] post_https3.al [edit]
[-] ssl_write_all.al [edit]
[-] tcpxcat.al [edit]
[-] open_tcp_connection.al [edit]
[-] make_form.al [edit]
[-] post_http3.al [edit]
[-] ssl_read_all.al [edit]
[-] want_nothing.al [edit]
[-] make_headers.al [edit]
[-] get_httpx4.al [edit]
[-] do_https.al [edit]
[-] get_https4.al [edit]
[-] do_httpx4.al [edit]
[-] get_http4.al [edit]
[-] want_X509_lookup.al [edit]
[-] autosplit.ix [edit]
[-] do_httpx3.al [edit]
[-] tcp_read_all.al [edit]
[-] head_https3.al [edit]
[-] randomize.al [edit]
[-] get_https3.al [edit]
[-] get_http.al [edit]
[-] debug_read.al [edit]
[-] ssl_read_until.al [edit]
[-] put_http3.al [edit]
[-] put_https4.al [edit]
[-] do_httpx2.al [edit]
[-] ssl_read_CRLF.al [edit]
[-] post_httpx.al [edit]
[-] head_http4.al [edit]
[-] get_httpx.al [edit]
[-] ssl_write_CRLF.al [edit]
[-] do_https2.al [edit]
[-] tcp_read_CRLF.al [edit]
[-] set_server_cert_and_key.al [edit]
[-] tcpcat.al [edit]
[-] https_cat.al [edit]
[-] post_https4.al [edit]
[-] do_https3.al [edit]
[-] head_http3.al [edit]
[-] SSLeay.so [edit]
[-] post_httpx4.al [edit]
[-] head_http.al [edit]
[-] new_x_ctx.al [edit]
[-] initialize.al [edit]
[-] http_cat.al [edit]