| /openbsd-src/gnu/llvm/lldb/source/Host/common/ |
| H A D | Socket.cpp | 57 const NativeSocket Socket::kInvalidSocketValue = INVALID_SOCKET; 61 const NativeSocket Socket::kInvalidSocketValue = -1; 72 Socket::Socket(SocketProtocol protocol, bool should_close, in Socket() function in Socket 79 Socket::~Socket() { Close(); } in ~Socket() 81 llvm::Error Socket::Initialize() { in Initialize() 100 void Socket::Terminate() { in Terminate() 106 std::unique_ptr<Socket> Socket::Create(const SocketProtocol protocol, in Create() 111 std::unique_ptr<Socket> socket_up; in Create() 147 llvm::Expected<std::unique_ptr<Socket>> 148 Socket::TcpConnect(llvm::StringRef host_and_port, in TcpConnect() [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Socket/t/ |
| H A D | sockaddr.t | 7 use Socket qw( 27 like($@, qr/^Wide character in Socket::inet_ntoa at/, 'inet_ntoa warns about wide characters'); 43 like($@, qr/^Wide character in Socket::inet_ntop at/, 'inet_ntop warns about wide characters'); 47 skip "No AF_INET6", 3 unless my $AF_INET6 = eval { Socket::AF_INET6() }; 64 like($@, qr/^Bad arg length for Socket::sockaddr_family, length is 0, should be at least \d+/, 'sockaddr_family warns about argument length'); 100 like( $warnings, qr/^Port number above 0xFFFF, will be truncated to 33229 for Socket::pack_sockaddr_in at /, 107 skip "No AF_INET6", 15 unless my $AF_INET6 = eval { Socket::AF_INET6() }; 108 skip "Cannot pack_sockaddr_in6()", 15 unless my $sin6 = eval { Socket::pack_sockaddr_in6(0x1234, "0123456789abcdef", 0, 89) }; 114 is((Socket::unpack_sockaddr_in6($sin6))[0], 0x1234, 'pack_sockaddr_in6->unpack_sockaddr_in6 port'); 115 is((Socket [all...] |
| /openbsd-src/gnu/llvm/lldb/tools/lldb-server/ |
| H A D | Acceptor.cpp | 29 const Socket::SocketProtocol m_protocol; 33 {"tcp", Socket::ProtocolTcp}, 34 {"udp", Socket::ProtocolUdp}, 35 {"unix", Socket::ProtocolUnixDomain}, 36 {"unix-abstract", Socket::ProtocolUnixAbstract}, 40 Socket::SocketProtocol &protocol) { in FindProtocolByScheme() 50 const char *FindSchemeByProtocol(const Socket::SocketProtocol protocol) { in FindSchemeByProtocol() 64 Socket *conn_socket = nullptr; in Accept() 72 Socket::SocketProtocol Acceptor::GetSocketProtocol() const { in GetSocketProtocol() 87 Socket::SocketProtocol socket_protocol = Socket::ProtocolUnixDomain; in Create() [all …]
|
| /openbsd-src/gnu/usr.bin/perl/cpan/IO-Socket-IP/t/ |
| H A D | 05local-server-v6.t | 8 use IO::Socket::IP; 9 use Socket qw( inet_pton inet_ntop pack_sockaddr_in6 unpack_sockaddr_in6 IN6ADDR_LOOPBACK ); 11 my $AF_INET6 = eval { Socket::AF_INET6() } or 17 socket my $sockh, Socket::PF_INET6(), SOCK_STREAM, 0 or die "Cannot socket(PF_INET6) - $!"; 29 return ( Socket::unpack_sockaddr_in6( shift ) )[0,1]; 33 my $testserver = IO::Socket::IP->new( 37 Type => Socket->$socktype, 41 ok( defined $testserver, "IO::Socket::IP->new constructs a $socktype socket" ) or 42 diag( " error was $IO::Socket::errstr" ); 45 is( $testserver->socktype, Socket [all...] |
| H A D | 04local-client-v6.t | 8 use IO::Socket::IP; 9 use Socket qw( inet_pton inet_ntop pack_sockaddr_in6 unpack_sockaddr_in6 IN6ADDR_LOOPBACK ); 11 my $AF_INET6 = eval { Socket::AF_INET6() } or 17 socket my $sockh, Socket::PF_INET6(), SOCK_STREAM, 0 or die "Cannot socket(PF_INET6) - $!"; 29 return ( Socket::unpack_sockaddr_in6( shift ) )[0,1]; 33 my $testserver = IO::Socket->new; 34 $testserver->socket( $AF_INET6, Socket->$socktype, 0 ) 37 my ( $err, $ai ) = Socket::getaddrinfo( "::1", 0, { family => $AF_INET6, socktype => Socket->$socktype } ); 46 my $testport = ( Socket [all...] |
| H A D | 10args.t | 8 use IO::Socket::IP; 22 local *IO::Socket::IP::_io_socket_ip__configure = sub { 27 IO::Socket::IP->new(@$arg); 51 # IO::Socket::INET is happy to take port from the *Host argument even if a *Port argument 58 is_deeply( [ IO::Socket::IP->split_addr( "hostname:http" ) ], 62 is_deeply( [ IO::Socket::IP->split_addr( "192.0.2.1:80" ) ], 66 is_deeply( [ IO::Socket::IP->split_addr( "[2001:db8::1]:80" ) ], 70 is_deeply( [ IO::Socket::IP->split_addr( "something.else" ) ], 74 is( IO::Socket::IP->join_addr( "hostname", "http" ), 78 is( IO::Socket [all...] |
| H A D | 15io-socket.t | 8 use IO::Socket; 9 use IO::Socket::IP -register; 13 my $sock = IO::Socket->new( 21 isa_ok( $sock, "IO::Socket::IP", 'IO::Socket->new( Domain => AF_INET )' ) or 22 diag( " error was $IO::Socket::errstr" ); 24 $sock = IO::Socket->new( 34 my $AF_INET6 = eval { Socket::AF_INET6() } || 37 eval { IO::Socket::IP->new( LocalHost => "::1" ) } or 40 my $sock = IO::Socket [all...] |
| H A D | 19no-addrs.t | 8 use IO::Socket::IP; 9 use Socket qw( SOCK_STREAM AF_INET ); 12 # IO::Socket::INET->new( Blocking => 0 ) still creates a defined filehandle 15 my $sock = IO::Socket::IP->new( Family => AF_INET ); 16 my $save_exc = $IO::Socket::errstr; 26 my $AF_INET6 = eval { require Socket and Socket::AF_INET6() } or 29 eval { IO::Socket::IP->new( LocalHost => "::1" ) } or 32 my $sock = IO::Socket::IP->new( Family => $AF_INET6 ); 33 my $save_exc = $IO::Socket [all...] |
| H A D | 11sockopts.t | 8 use IO::Socket::IP; 11 use Socket qw( SOL_SOCKET SO_REUSEADDR SO_REUSEPORT SO_BROADCAST ); 19 my $sock = IO::Socket::IP->new( 24 ) or die "Cannot socket() - $IO::Socket::errstr"; 28 $sock = IO::Socket::IP->new( 35 ) or die "Cannot socket() - $IO::Socket::errstr"; 45 socket( $s, Socket::PF_INET, Socket::SOCK_STREAM, 0 ) and 48 my $sock = IO::Socket::IP->new( 53 ) or die "Cannot socket() - $IO::Socket [all...] |
| H A D | 16v6only.t | 8 use Socket qw(PF_INET6 PF_INET IPPROTO_IPV6 IPV6_V6ONLY); 9 use IO::Socket::IP; 11 eval { IO::Socket::IP->new( LocalHost => "::1" ) } or 26 my $listensock = IO::Socket::IP->new( 33 ) or die "Cannot listen on PF_INET6 - $IO::Socket::errstr"; 37 my $testsock = IO::Socket::IP->new( 44 my $err = "$IO::Socket::errstr"; 47 like( $err, qr/\Q$ECONNREFUSED_STR/, 'Socket creation fails with connection refused' ); 51 skip "This platform does not allow turning IPV6_V6ONLY off", 3 unless IO::Socket::IP->CAN_DISABLE_V6ONLY; 55 my $listensock = IO::Socket [all...] |
| H A D | 02local-server-v4.t | 8 use IO::Socket::IP; 10 use IO::Socket::INET; 11 use Socket qw( inet_aton inet_ntoa pack_sockaddr_in unpack_sockaddr_in ); 27 my $testserver = IO::Socket::IP->new( 31 Type => Socket->$socktype, 34 ok( defined $testserver, "IO::Socket::IP->new constructs a $socktype socket" ) or 35 diag( " error was $IO::Socket::errstr" ); 38 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" ); 50 my $socket = IO::Socket::INET->new( 53 Type => Socket [all...] |
| H A D | 13addrinfo.t | 8 use IO::Socket::IP; 10 use IO::Socket::INET; 11 use Socket qw( SOCK_STREAM unpack_sockaddr_in getaddrinfo ); 14 my $testserver = IO::Socket::INET->new( 18 ) or die "Cannot listen on PF_INET - $IO::Socket::errstr"; 23 my $socket = IO::Socket::IP->new( 27 ok( defined $socket, 'IO::Socket::IP->new( PeerAddrInfo => ... ) constructs a new socket' ) or 28 diag( " error was $IO::Socket::errstr" ); 39 my $socket = IO::Socket::IP->new( 44 ok( defined $socket, 'IO::Socket [all...] |
| H A D | 01local-client-v4.t | 8 use IO::Socket::IP; 10 use IO::Socket::INET; 11 use Socket qw( inet_aton inet_ntoa pack_sockaddr_in unpack_sockaddr_in ); 27 my $testserver = IO::Socket::INET->new( 30 Type => Socket->$socktype, 31 Proto => ( $socktype eq "SOCK_STREAM" ? "tcp" : "udp" ), # Because IO::Socket::INET is stupid and always presumes tcp 32 ) or die "Cannot listen on PF_INET - $IO::Socket::errstr"; 34 my $socket = IO::Socket::IP->new( 37 Type => Socket->$socktype, 40 ok( defined $socket, "IO::Socket [all...] |
| /openbsd-src/gnu/usr.bin/perl/dist/IO/t/ |
| H A D | cachepropagate-unix.t | 8 use IO::Socket; 9 use IO::Socket::UNIX; 10 use Socket; 37 my $listener = IO::Socket::UNIX->new(Type => SOCK_STREAM, 69 my $connector = IO::Socket::UNIX->new(Peer => $socketpath); 79 skip "no Socket::SO_PROTOCOL", 1 if !defined(eval { Socket::SO_PROTOCOL }); 81 if !defined $new->sockopt(Socket::SO_PROTOCOL); 85 skip "no Socket::SO_TYPE", 1 if !defined(eval { Socket::SO_TYPE }); 87 if !defined $new->sockopt(Socket::SO_TYPE); 100 $listener = IO::Socket::UNIX->new(Type => SOCK_DGRAM, [all …]
|
| H A D | io_sock.t | 38 use IO::Socket; 40 my $listen = IO::Socket::INET->new(LocalAddr => 'localhost', 77 my $sock = IO::Socket::INET->new(PeerPort => $port, 81 || IO::Socket::INET->new(PeerPort => $port, 102 $listen = IO::Socket::INET->new(LocalAddr => 'localhost', Listen => '', Timeout => 15) or die "$!"; 119 my $sock = IO::Socket::INET->new("localhost:$port") 120 || IO::Socket::INET->new("127.0.0.1:$port"); 142 $sock = IO::Socket::INET->new("127.0.0.1:$port"); 156 $sock = IO::Socket->new(Domain => AF_INET, 158 || IO::Socket->new(Domain => AF_INET, [all …]
|
| H A D | cachepropagate-udp.t | 6 use IO::Socket; 7 use IO::Socket::INET; 8 use Socket; 13 my $listener = IO::Socket::INET->new(LocalAddr => '127.0.0.1', 24 my $new = IO::Socket::INET->new_from_fd($listener->fileno(), 'r+'); 28 skip "no Socket::SO_PROTOCOL", 1 if !defined(eval { Socket::SO_PROTOCOL }); 30 if !defined $new->sockopt(Socket::SO_PROTOCOL); 36 skip "no Socket::SO_TYPE", 1 if !defined(eval { Socket::SO_TYPE }); 38 if !defined $new->sockopt(Socket::SO_TYPE);
|
| H A D | cachepropagate-tcp.t | 6 use IO::Socket; 7 use IO::Socket::INET; 8 use Socket; 14 my $listener = IO::Socket::INET->new(Listen => 1, 36 my $connector = IO::Socket::INET->new(PeerAddr => '127.0.0.1', 59 skip "no Socket::SO_PROTOCOL", 1 if !defined(eval { Socket::SO_PROTOCOL }); 63 skip "no Socket::SO_TYPE", 1 if !defined(eval { Socket::SO_TYPE });
|
| /openbsd-src/gnu/usr.bin/perl/cpan/Socket/ |
| H A D | Socket.pm | 1 package Socket; package 10 C<Socket> - networking constants and support functions 14 C<Socket> a low-level module used by, among other things, the L<IO::Socket> 17 C<IO::Socket> or similar instead. 19 use Socket qw(PF_INET SOCK_STREAM pack_sockaddr_in inet_aton); 45 C<use Socket> line, the default exports are not automatically imported. It is 55 use Socket qw(:DEFAULT :crlf); 87 Socket type constants to use as the second argument to socket(), or the value 99 Socket optio [all...] |
| /openbsd-src/regress/sys/net/pf_divert/ |
| H A D | Packet.pm | 23 use Socket; 25 use IO::Socket; 26 use IO::Socket::IP -register; 48 my $ds = do { local $> = 0; IO::Socket->new( 49 Type => Socket::SOCK_RAW, 54 $sa = pack_sockaddr_in($self->{bindport}, Socket::INADDR_ANY) 56 $sa = pack_sockaddr_in6($self->{bindport}, Socket::IN6ADDR_ANY)
|
| /openbsd-src/regress/sys/kern/sosplice/error/ |
| H A D | args-EBUSY.pl | 5 use IO::Socket::IP; 6 use BSD::Socket::Splice "SO_SPLICE"; 11 my $sl = IO::Socket::IP->new( 17 my $s = IO::Socket::IP->new( 23 my $ss = IO::Socket::IP->new( 32 my $so = IO::Socket::IP->new(
|
| H A D | args-splice-EBUSY.pl | 5 use IO::Socket::IP; 6 use BSD::Socket::Splice "SO_SPLICE"; 11 my $sl = IO::Socket::IP->new( 17 my $s = IO::Socket::IP->new( 23 my $ss = IO::Socket::IP->new( 32 my $so = IO::Socket::IP->new(
|
| /openbsd-src/gnu/usr.bin/perl/dist/IO/lib/IO/Socket/ |
| H A D | INET.pm | 1 # IO::Socket::INET.pm 7 package IO::Socket::INET; 10 use IO::Socket; 11 use Socket; 16 our @ISA = qw(IO::Socket); 21 IO::Socket::INET->register_domain( AF_INET ); 28 $proto_number{tcp} = Socket::IPPROTO_TCP() if defined &Socket::IPPROTO_TCP; 29 $proto_number{udp} = Socket::IPPROTO_UDP() if defined &Socket [all...] |
| /openbsd-src/gnu/usr.bin/perl/cpan/libnet/t/ |
| H A D | pop3_ssl.t | 11 if (!eval { require Socket }) { 35 my $srv = IO::Socket::INET->new( 44 require IO::Socket::SSL::Utils; 45 my ($ca,$key) = IO::Socket::SSL::Utils::CERT_create( CA => 1 ); 47 print $fh IO::Socket::SSL::Utils::PEM_cert2string($ca); 53 my ($cert) = IO::Socket::SSL::Utils::CERT_create( 104 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) { 123 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) {
|
| H A D | nntp_ssl.t | 11 if (!eval { require Socket }) { 35 my $srv = IO::Socket::INET->new( 45 require IO::Socket::SSL::Utils; 46 my ($ca,$key) = IO::Socket::SSL::Utils::CERT_create( CA => 1 ); 48 print $fh IO::Socket::SSL::Utils::PEM_cert2string($ca); 54 my ($cert) = IO::Socket::SSL::Utils::CERT_create( 110 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) { 127 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) {
|
| H A D | smtp_ssl.t | 11 if (!eval { require Socket }) { 35 my $srv = IO::Socket::INET->new( 44 require IO::Socket::SSL::Utils; 45 my ($ca,$key) = IO::Socket::SSL::Utils::CERT_create( CA => 1 ); 47 print $fh IO::Socket::SSL::Utils::PEM_cert2string($ca); 53 my ($cert) = IO::Socket::SSL::Utils::CERT_create( 104 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) { 125 if ( ! IO::Socket::SSL->start_SSL($cl, %sslargs)) {
|