| /openbsd/regress/lib/libc/getaddrinfo/ |
| H A D | answer | 2 arg: flags 0x2 family 0 socktype 0 protocol 0 addrlen 0 host ::1 serv http
3 ai1: flags 0x2 family 24 socktype 1 protocol 6 addrlen 28 host ::1 serv 80
4 arg: flags 0x2 family 0 socktype 0 protocol 0 addrlen 0 host 127.0.0.1 serv http
5 ai1: flags 0x2 family 2 socktype 1 protocol 6 addrlen 16 host 127.0.0.1 serv 80
8 ai2: flags 0x2 family 24 socktype 1 protocol 6 addrlen 28 host ::1 serv 80
9 arg: flags 0x2 family 0 socktype 0 protocol 0 addrlen 0 host ::1 serv tftp
10 ai1: flags 0x2 family 24 socktype 2 protocol 17 addrlen 28 host ::1 serv 69
16 arg: flags 0x2 family 0 socktype 0 protocol 0 addrlen 0 host ::1 serv echo
17 ai1: flags 0x2 family 24 socktype 2 protocol 17 addrlen 28 host ::1 serv 7
18 ai2: flags 0x2 family 24 socktype 1 protocol 6 addrlen 28 host ::1 serv 7
[all …]
|
| /openbsd/gnu/usr.bin/perl/cpan/IO-Socket-IP/t/ |
| H A D | 05local-server-v6.t | 32 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
34 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
37 Type => Socket->$socktype,
45 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
54 $socket->socket( $AF_INET6, Socket->$socktype, 0 )
57 …etaddrinfo( "::1", $testserver->sockport, { family => $AF_INET6, socktype => Socket->$socktype } );
62 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
70 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
74 "\$socket->sockname for $socktype" );
78 "\$socket->peername for $socktype" );
[all …]
|
| H A D | 02local-server-v4.t | 26 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
28 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
31 Type => Socket->$socktype,
38 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
53 Type => Socket->$socktype,
57 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
61 ok( defined $testclient, "accepted test $socktype client" );
62 isa_ok( $testclient, "IO::Socket::IP", "\$testclient for $socktype" );
65 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
69 "\$socket->sockname for $socktype" );
[all …]
|
| H A D | 04local-client-v6.t | 32 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
34 $testserver->socket( $AF_INET6, Socket->$socktype, 0 )
37 …r, $ai ) = Socket::getaddrinfo( "::1", 0, { family => $AF_INET6, socktype => Socket->$socktype } );
42 if( $socktype eq "SOCK_STREAM" ) {
51 Type => Socket->$socktype,
59 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
61 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
65 ok( defined $testclient, "accepted test $socktype client" );
71 "\$socket->sockname for $socktype" );
75 "\$socket->peername for $socktype" );
[all …]
|
| H A D | 01local-client-v4.t | 26 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
28 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
30 Type => Socket->$socktype,
37 Type => Socket->$socktype,
40 ok( defined $socket, "IO::Socket::IP->new constructs a $socktype socket" ) or
44 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
46 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
50 ok( defined $testclient, "accepted test $socktype client" );
52 ok( $socket->connected, "\$socket is connected for $socktype" );
57 "\$socket->sockname for $socktype" );
[all …]
|
| H A D | 06local-cross-v6.t | 13 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
15 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
18 Type => Socket->$socktype,
24 Type => Socket->$socktype,
27 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
31 is( $testclient->sockport, $socket->peerport, "\$testclient->sockport for $socktype" );
32 is( $testclient->peerport, $socket->sockport, "\$testclient->peerport for $socktype" );
34 is( $testclient->sockhost, $socket->peerhost, "\$testclient->sockhost for $socktype" );
35 is( $testclient->peerhost, $socket->sockhost, "\$testclient->peerhost for $socktype" );
38 is( $testclient->getline, "Request\n", "\$socket to \$testclient for $socktype" );
[all …]
|
| H A D | 03local-cross-v4.t | 10 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
12 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
15 Type => Socket->$socktype,
21 Type => Socket->$socktype,
24 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
28 is( $testclient->sockport, $socket->peerport, "\$testclient->sockport for $socktype" );
29 is( $testclient->peerport, $socket->sockport, "\$testclient->peerport for $socktype" );
31 is( $testclient->sockhost, $socket->peerhost, "\$testclient->sockhost for $socktype" );
32 is( $testclient->peerhost, $socket->sockhost, "\$testclient->peerhost for $socktype" );
35 is( $testclient->getline, "Request\n", "\$socket to \$testclient for $socktype" );
[all …]
|
| H A D | 17gai-flags.t | 31 socktype => SOCK_STREAM,
40 …[ undef, "80", { flags => AI_PASSIVE|$AI_ADDRCONFIG, socktype => SOCK_STREAM, protocol => IPPROTO_…
51 socktype => SOCK_STREAM,
60 …[ undef, "80", { flags => AI_PASSIVE|AI_NUMERICSERV, socktype => SOCK_STREAM, protocol => IPPROTO_…
|
| H A D | 12port-fallback.t | 31 socktype => SOCK_STREAM,
41 …[ undef, "zyxxyblarg", { flags => AI_PASSIVE|$AI_ADDRCONFIG, socktype => SOCK_STREAM, protocol => …
42 …[ undef, "80", { flags => AI_PASSIVE|$AI_ADDRCONFIG, socktype => SOCK_STREAM, protocol => …
|
| H A D | 19no-addrs.t | 22 is( $sock->socktype, SOCK_STREAM, '$sock->socktype for Family => AF_INET' );
39 is( $sock->socktype, SOCK_STREAM, '$sock->socktype for Family => AF_INET6' );
51 is( $sock->socktype, SOCK_STREAM, '$sock->socktype for Type => SOCK_STREAM' );
|
| H A D | 13addrinfo.t | 20 …my ( $err, @peeraddrinfo ) = getaddrinfo( "127.0.0.1", $testserver->sockport, { socktype => SOCK_S…
36 my ( $err, @localaddrinfo ) = getaddrinfo( "127.0.0.1", 0, { socktype => SOCK_STREAM } );
|
| /openbsd/gnu/usr.bin/perl/cpan/Socket/t/ |
| H A D | getaddrinfo.t | 10 ( $err, @res ) = getaddrinfo( "127.0.0.1", "80", { socktype => SOCK_STREAM } );
11 cmp_ok( $err, "==", 0, '$err == 0 for host=127.0.0.1/service=80/socktype=STREAM' );
12 cmp_ok( $err, "eq", "", '$err eq "" for host=127.0.0.1/service=80/socktype=STREAM' );
18 is( $res[0]->{socktype}, SOCK_STREAM,
19 '$res[0] socktype is SOCK_STREAM' );
33 ( $err, @res ) = getaddrinfo( "127.0.0.1", 80, { socktype => SOCK_STREAM } );
34 cmp_ok( $err, "==", 0, '$err == 0 for host=127.0.0.1/service=80/socktype=STREAM' );
65 is( $res[0]->{socktype}, SOCK_STREAM,
66 '$res[0] socktype is SOCK_STREAM' );
92 ( $err, @res ) = getaddrinfo( $missinghost, "ftp", { socktype => SOCK_STREAM } );
[all …]
|
| /openbsd/gnu/usr.bin/perl/cpan/IO-Socket-IP/lib/IO/Socket/ |
| H A D | IP.pm | 438 $hints{socktype} = $type;
456 $hints{socktype} = SOCK_STREAM;
462 if( !defined $hints{socktype} and defined $hints{protocol} ) {
567 next if defined $local->{socktype} and defined $peer->{socktype} and
568 $local->{socktype} != $peer->{socktype};
573 my $socktype = $local->{socktype} || $peer->{socktype} or next;
578 socktype => $socktype,
591 socktype => $hints{socktype},
804 $flags |= NI_DGRAM if $self->socktype == SOCK_DGRAM;
991 *socktype = sub {
[all …]
|
| /openbsd/regress/sys/nfs/ |
| H A D | Makefile | 71 .for socktype nctype in stream -U dgram -Uu
72 REGRESS_TARGETS+= run-socket-${socktype}
73 run-socket-${socktype}:
74 rm -f /mnt/regress-nfs-client/socket-${socktype}
75 nc ${nctype} -v -l /mnt/regress-nfs-client/socket-${socktype} &
76 [ -S /mnt/regress-nfs-client/socket-${socktype} ] || sleep 1
77 [ -S /mnt/regress-nfs-client/socket-${socktype} ]
78 nc ${nctype} -z /mnt/regress-nfs-client/socket-${socktype}
79 .if "${socktype}" == dgram
|
| /openbsd/gnu/usr.bin/perl/cpan/Socket/ |
| H A D | Socket.pm | 980 my ( $family, $socktype, $protocol, $flags ) = @$hints{qw( family socktype protocol flags )};
985 $socktype ||= 0;
1034 next if $socktype and $this_socktype != $socktype;
1062 my ( $socktype, $protocol, $port ) = @$portspec;
1065 socktype => $socktype,
|
| /openbsd/gnu/usr.bin/perl/dist/IO/t/ |
| H A D | cachepropagate-unix.t | 58 my $s = $listener->socktype();
88 is($new->socktype(), $s, 'type match');
113 $s = $listener->socktype();
133 is($new->socktype(), $s, 'type match');
|
| H A D | cachepropagate-udp.t | 21 my $s = $listener->socktype();
39 is($new->socktype(), $s, 'type match');
|
| H A D | cachepropagate-tcp.t | 25 my $s = $listener->socktype();
64 is($new->socktype(), $s, 'type match');
|
| /openbsd/regress/sys/net/pf_divert/ |
| H A D | Client.pm | 57 Type => $self->{socktype},
69 Type => $self->{socktype},
95 Type => $self->{socktype},
|
| H A D | args-rip-reply-to.pl | 12 socktype => Socket::SOCK_RAW,
|
| H A D | args-rip-reply.pl | 11 socktype => Socket::SOCK_RAW,
|
| H A D | args-rip-to.pl | 11 socktype => Socket::SOCK_RAW,
|
| H A D | args-icmp-reply-to.pl | 12 socktype => Socket::SOCK_RAW,
|
| H A D | args-icmp-to.pl | 11 socktype => Socket::SOCK_RAW,
|
| /openbsd/usr.bin/netstat/ |
| H A D | unix.c | 53 static const char *socktype[] = variable
75 FAKE_PTR(kf->so_pcb), socktype[kf->so_type], in unixdomainpr()
|