Network test - Revision history

T1t0: /* java specific ipv6 network behaviour = */

2025-09-30T17:16:19Z

java specific ipv6 network behaviour =

← Older revision		Revision as of 17:16, 30 September 2025
Line 171:		Line 171:
	</pre>		</pre>

	= java specific ipv6 network behaviour ==		= java specific ipv6 network behaviour =

	from https://docs.oracle.com/javase/8/docs/technotes/guides/io/example/Ping.java		from https://docs.oracle.com/javase/8/docs/technotes/guides/io/example/Ping.java

T1t0 at 17:15, 30 September 2025

2025-09-30T17:15:59Z

@@ Line 71: / Line 71: @@
 </pre>
-=== perl homemade telnet version ===
+=== homemade telnet ===
-* in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementation (using vanilla Socket package):
+In some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there are some alternatives:
 <pre>
@@ Line 105: / Line 144: @@
 if ($num_args != 3) {
      print "Usage: telnet.pl <host> <port> <text>\n";
-     print "Example: telnet.pl www.campisano.org 80 \$'GET /wiki/en/Main HTTP/1.0\\r\\nHost: www.campisano.org\\r\\n\\r\\n'\n";
+     print "Example: telnet.pl www.campisano.org 80 \$'GET /wiki/Main HTTP/1.0\\r\\nHost: www.campisano.org\\r\\n\\r\\n'\n";
      exit(-1);
+}

T1t0 at 15:18, 4 January 2023

2023-01-04T15:18:03Z

@@ Line 131: / Line 131: @@
 close(F);
 </pre>
 [[category:unix]]
 [[category:network]]

T1t0 at 13:32, 20 April 2022

2022-04-20T13:32:11Z

← Older revision		Revision as of 13:32, 20 April 2022
Line 1:		Line 1:
			= local network =

			== outgoing ip ==

			* ipv4:
			<pre>
			ip -4 --oneline route get 1 \| grep -oP '(?<=src\s)\d+(\.\d+){3}'
			</pre>

			* ipv6:
			<pre>
			ip -6 --oneline route get 1:: \| grep -oP '(?<=src\s)[\da-f:]+'
			</pre>

			== host ip of specific network ==

			* ipv4:
			<pre>
			LOCAL_NETWORK=10.0.0.0/24
			ip -4 --oneline address show to ${LOCAL_NETWORK} \| grep -oP '(?<=inet\s)\d+(\.\d+){3}'
			</pre>

			* ipv6:
			<pre>
			LOCAL_NETWORK=fc00::/7
			ip -6 --oneline address show sto ${LOCAL_NETWORK} \| grep -oP '(?<=inet\s)[\da-f:]+'
			</pre>

	= dns =		= dns =

T1t0: /* open ports */

2022-02-28T22:33:45Z

open ports

← Older revision		Revision as of 22:33, 28 February 2022
Line 11:		Line 11:
	<pre>		<pre>
	netstat -tulpn		netstat -tulpn
			# OR
			ss -tulpn
	</pre>		</pre>

T1t0 at 15:55, 20 September 2021

2021-09-20T15:55:05Z

@@ Line 5: / Line 5: @@
 <pre>
 nslookup campisano.org 8.8.4.4
 </pre>
@@ Line 87: / Line 101: @@
 close(F);
 </pre>

T1t0: /* specific port access */

2021-09-20T15:48:53Z

specific port access

← Older revision		Revision as of 15:48, 20 September 2021
Line 23:		Line 23:
	<pre>		<pre>
	telnet campisano.org 80		telnet campisano.org 80
			# or
			nc -vv -w 3 -z campisano.org 80
	</pre>		</pre>

T1t0 at 19:18, 12 October 2020

2020-10-12T19:18:43Z

← Older revision		Revision as of 19:18, 12 October 2020
Line 1:		Line 1:
	= perl homemade telnet version =		= dns =

			== name server resolver from specific dns ==

			<pre>
			nslookup campisano.org 8.8.4.4
			</pre>

			= network access =

			</pre>
			ping campisano.org
			</pre>

			== routing ==

			<pre>
			traceroute -M tcp -N 100 -m 100 campisano.org
			</pre>

			== specific port access ==

			<pre>
			telnet campisano.org 80
			</pre>

			=== perl homemade telnet version ===

	* in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementation (using vanilla Socket package):		* in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementation (using vanilla Socket package):

T1t0: Created page with "= perl homemade telnet version = * in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementat..."

2020-10-12T15:43:57Z

Created page with "= perl homemade telnet version = * in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementat..."

New page

= perl homemade telnet version =

* in some basic system like cloud minimal virtual machines, there are no network utilities like telnet, so there is a simple perl implementation (using vanilla Socket package):

<pre>
#!/usr/bin/env perl

# from https://www.oreilly.com/openbook/webclient/ch04.html

use Socket;

$|=1; # autoflush

sub open_TCP
{
# get parameters
my ($FS, $dest, $port) = @_;

my $proto = getprotobyname('tcp');
socket($FS, PF_INET, SOCK_STREAM, $proto);
my $sin = sockaddr_in($port,inet_aton($dest));
connect($FS,$sin) || return undef;

my $old_fh = select($FS);
$| = 1; # don't buffer output
select($old_fh);
1;
}

# If no parameters were given, print out help text
$num_args = $#ARGV + 1;
if ($num_args != 3) {
print "Usage: telnet.pl <host> <port> <text>\n";
print "Example: telnet.pl www.campisano.org 80 \$'GET /wiki/en/Main HTTP/1.0\\r\\nHost: www.campisano.org\\r\\n\\r\\n'\n";
exit(-1);
}

$host=$ARGV[0];
$port=$ARGV[1];
$text=$ARGV[2];

# contact the server
print "connecting $host:port ...\n";

if (open_TCP(F, $host, $port) == undef) {
print "Error connecting to server at $ARGV[0]\n";
exit(-2);
}

# send the GET method with / as a parameter
print "sending $text ...\n";
print F "$text";

# print out the response
print "printing response ... \n";
print $_ while (<F>);

close(F);
</pre>