Home
last modified time | relevance | path

Searched refs:socktype (Results 1 – 25 of 1385) sorted by relevance

12345678910>>...56

/dports/lang/perl5.30/perl-5.30.3/cpan/IO-Socket-IP/t/
H A D05local-server-v6.t32 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 D02local-server-v4.t26 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 D01local-client-v4.t26 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 D04local-client-v6.t32 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 D06local-cross-v6.t13 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 …]
/dports/lang/perl5.32/perl-5.32.1/cpan/IO-Socket-IP/t/
H A D05local-server-v6.t32 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 D02local-server-v4.t26 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 D01local-client-v4.t26 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 D04local-client-v6.t32 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 D06local-cross-v6.t13 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 …]
/dports/lang/perl5.34/perl-5.34.0/cpan/IO-Socket-IP/t/
H A D05local-server-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
38 Type => Socket->$socktype,
46 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
55 $socket->socket( $AF_INET6, Socket->$socktype, 0 )
58 …etaddrinfo( "::1", $testserver->sockport, { family => $AF_INET6, socktype => Socket->$socktype } );
63 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
71 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
75 "\$socket->sockname for $socktype" );
79 "\$socket->peername for $socktype" );
[all …]
H A D02local-server-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
32 Type => Socket->$socktype,
39 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
54 Type => Socket->$socktype,
58 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
62 ok( defined $testclient, "accepted test $socktype client" );
63 isa_ok( $testclient, "IO::Socket::IP", "\$testclient for $socktype" );
66 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
70 "\$socket->sockname for $socktype" );
[all …]
H A D04local-client-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 $testserver->socket( $AF_INET6, Socket->$socktype, 0 )
38 …r, $ai ) = Socket::getaddrinfo( "::1", 0, { family => $AF_INET6, socktype => Socket->$socktype } );
43 if( $socktype eq "SOCK_STREAM" ) {
52 Type => Socket->$socktype,
60 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
62 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
66 ok( defined $testclient, "accepted test $socktype client" );
72 "\$socket->sockname for $socktype" );
76 "\$socket->peername for $socktype" );
[all …]
H A D01local-client-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
31 Type => Socket->$socktype,
38 Type => Socket->$socktype,
41 ok( defined $socket, "IO::Socket::IP->new constructs a $socktype socket" ) or
45 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
47 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
51 ok( defined $testclient, "accepted test $socktype client" );
53 ok( $socket->connected, "\$socket is connected for $socktype" );
58 "\$socket->sockname for $socktype" );
[all …]
H A D06local-cross-v6.t14 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
16 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
19 Type => Socket->$socktype,
25 Type => Socket->$socktype,
28 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
32 is( $testclient->sockport, $socket->peerport, "\$testclient->sockport for $socktype" );
33 is( $testclient->peerport, $socket->sockport, "\$testclient->peerport for $socktype" );
35 is( $testclient->sockhost, $socket->peerhost, "\$testclient->sockhost for $socktype" );
36 is( $testclient->peerhost, $socket->sockhost, "\$testclient->peerhost for $socktype" );
39 is( $testclient->getline, "Request\n", "\$socket to \$testclient for $socktype" );
[all …]
/dports/net/p5-IO-Socket-IP/IO-Socket-IP-0.41/t/
H A D05local-server-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
38 Type => Socket->$socktype,
46 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
55 $socket->socket( $AF_INET6, Socket->$socktype, 0 )
58 …etaddrinfo( "::1", $testserver->sockport, { family => $AF_INET6, socktype => Socket->$socktype } );
63 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
71 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
75 "\$socket->sockname for $socktype" );
79 "\$socket->peername for $socktype" );
[all …]
H A D02local-server-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
32 Type => Socket->$socktype,
39 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
54 Type => Socket->$socktype,
58 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
62 ok( defined $testclient, "accepted test $socktype client" );
63 isa_ok( $testclient, "IO::Socket::IP", "\$testclient for $socktype" );
66 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
70 "\$socket->sockname for $socktype" );
[all …]
H A D04local-client-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 $testserver->socket( $AF_INET6, Socket->$socktype, 0 )
38 …r, $ai ) = Socket::getaddrinfo( "::1", 0, { family => $AF_INET6, socktype => Socket->$socktype } );
43 if( $socktype eq "SOCK_STREAM" ) {
52 Type => Socket->$socktype,
60 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
62 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
66 ok( defined $testclient, "accepted test $socktype client" );
72 "\$socket->sockname for $socktype" );
76 "\$socket->peername for $socktype" );
[all …]
H A D01local-client-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
31 Type => Socket->$socktype,
38 Type => Socket->$socktype,
41 ok( defined $socket, "IO::Socket::IP->new constructs a $socktype socket" ) or
45 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
47 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
51 ok( defined $testclient, "accepted test $socktype client" );
53 ok( $socket->connected, "\$socket is connected for $socktype" );
58 "\$socket->sockname for $socktype" );
[all …]
H A D06local-cross-v6.t14 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
16 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
19 Type => Socket->$socktype,
25 Type => Socket->$socktype,
28 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
32 is( $testclient->sockport, $socket->peerport, "\$testclient->sockport for $socktype" );
33 is( $testclient->peerport, $socket->sockport, "\$testclient->peerport for $socktype" );
35 is( $testclient->sockhost, $socket->peerhost, "\$testclient->sockhost for $socktype" );
36 is( $testclient->peerhost, $socket->sockhost, "\$testclient->peerhost for $socktype" );
39 is( $testclient->getline, "Request\n", "\$socket to \$testclient for $socktype" );
[all …]
/dports/lang/perl5-devel/perl5-5.35.4-102-ge43d289c7c/cpan/IO-Socket-IP/t/
H A D05local-server-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
38 Type => Socket->$socktype,
46 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
55 $socket->socket( $AF_INET6, Socket->$socktype, 0 )
58 …etaddrinfo( "::1", $testserver->sockport, { family => $AF_INET6, socktype => Socket->$socktype } );
63 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
71 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
75 "\$socket->sockname for $socktype" );
79 "\$socket->peername for $socktype" );
[all …]
H A D02local-server-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
32 Type => Socket->$socktype,
39 is( $testserver->socktype, Socket->$socktype, "\$testserver->socktype for $socktype" );
54 Type => Socket->$socktype,
58 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
62 ok( defined $testclient, "accepted test $socktype client" );
63 isa_ok( $testclient, "IO::Socket::IP", "\$testclient for $socktype" );
66 is( $testclient->socktype, Socket->$socktype, "\$testclient->socktype for $socktype" );
70 "\$socket->sockname for $socktype" );
[all …]
H A D04local-client-v6.t33 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
35 $testserver->socket( $AF_INET6, Socket->$socktype, 0 )
38 …r, $ai ) = Socket::getaddrinfo( "::1", 0, { family => $AF_INET6, socktype => Socket->$socktype } );
43 if( $socktype eq "SOCK_STREAM" ) {
52 Type => Socket->$socktype,
60 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
62 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
66 ok( defined $testclient, "accepted test $socktype client" );
72 "\$socket->sockname for $socktype" );
76 "\$socket->peername for $socktype" );
[all …]
H A D01local-client-v4.t27 foreach my $socktype (qw( SOCK_STREAM SOCK_DGRAM )) {
29 ( $socktype eq "SOCK_STREAM" ? ( Listen => 1 ) : () ),
31 Type => Socket->$socktype,
38 Type => Socket->$socktype,
41 ok( defined $socket, "IO::Socket::IP->new constructs a $socktype socket" ) or
45 is( $socket->socktype, Socket->$socktype, "\$socket->socktype for $socktype" );
47 my $testclient = ( $socktype eq "SOCK_STREAM" ) ?
51 ok( defined $testclient, "accepted test $socktype client" );
53 ok( $socket->connected, "\$socket is connected for $socktype" );
58 "\$socket->sockname for $socktype" );
[all …]
/dports/net/libunp/unpv12e/libgai/
H A Dga_echeck.c25 if (socktype != 0 && in ga_echeck()
26 (socktype != SOCK_STREAM && in ga_echeck()
27 socktype != SOCK_DGRAM && in ga_echeck()
28 socktype != SOCK_RAW)) in ga_echeck()
34 if (socktype != 0 && in ga_echeck()
35 (socktype != SOCK_STREAM && in ga_echeck()
36 socktype != SOCK_DGRAM && in ga_echeck()
37 socktype != SOCK_RAW)) in ga_echeck()
43 if (socktype != 0 && in ga_echeck()
44 (socktype != SOCK_STREAM && in ga_echeck()
[all …]

12345678910>>...56