copy rights update

[thirdparty/dhcp.git] / tests / DHCPv6 / 282-release-no-address.pl

diff --git a/tests/DHCPv6/282-release-no-address.pl b/tests/DHCPv6/282-release-no-address.pl
index bb727f590c974f62f4b837eaa72ff1f311e36bc2..1fd76d359d1daf37446fbf6b3cf481e66be16601 100644 (file)
--- a/tests/DHCPv6/282-release-no-address.pl
+++ b/tests/DHCPv6/282-release-no-address.pl
@@ -1,6 +1,6 @@
 #! /usr/bin/perl -w
 
-# Copyright (c) 2007 by Internet Systems Consortium, Inc. ("ISC")
+# Copyright (C) 2007-2022 Internet Systems Consortium, Inc. ("ISC")
 #
 # Permission to use, copy, modify, and distribute this software for any
 # purpose with or without fee is hereby granted, provided that the above
@@ -15,10 +15,10 @@
 # OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 #
 #   Internet Systems Consortium, Inc.
-#   950 Charter Street
-#   Redwood City, CA 94063
+#   PO Box 360
+#   Newmarket, NH 03857 USA
 #   <info@isc.org>
-#   http://www.isc.org/
+#   https://www.isc.org/
 
 use strict;
 use English;
@@ -97,10 +97,10 @@ do {
        socket(SOCK, PF_INET6, SOCK_DGRAM, getprotobyname('udp')) || die;
        my $addr = inet_pton(AF_INET6, $All_DHCP_Servers);
        my $packet = $msg->packet();
-       my $send_ret = send(SOCK, $packet, 0, 
+       my $send_ret = send(SOCK, $packet, 0,
                            pack_sockaddr_in6($server_port, $addr));
        if (not defined($send_ret)) {
-               printf STDERR 
+               printf STDERR
                        "Error \%d sending DHCPv6 Solicit message;\n\%s\n",
                        0+$ERRNO, $ERRNO;
                exit(1);
@@ -121,7 +121,7 @@ do {
        }
 
        my $rt_end_time = time() + $RT;
-       if (defined($mrd_end_time) && ($mrd_end_time > $rt_end_time)) { 
+       if (defined($mrd_end_time) && ($mrd_end_time > $rt_end_time)) {
                $rt_end_time = $mrd_end_time;
        }
 
@@ -138,11 +138,11 @@ do {
                if (@ready) {
                        my $reply;
                        my $recv_ret;
-       
+
                        $recv_ret = recv(SOCK, $reply, 1500, 0);
                        if (not defined $recv_ret) {
-                               printf STDERR 
-                                       "Error \%d receiving DHCPv6 " . 
+                               printf STDERR
+                                       "Error \%d receiving DHCPv6 " .
                                                "message;\n\%s\n",
                                        0+$ERRNO, $ERRNO;
                                exit(1);
@@ -156,16 +156,16 @@ do {
                }
        }
 
-} until ($reply_msg || 
+} until ($reply_msg ||
         (($MRC != 0) && ($count > $MRC)) ||
         (defined($mrd_end_time) && ($mrd_end_time > time())));
 
 unless ($reply_msg) {
        if (($MRC != 0) && ($count >= $MRC)) {
-               print STDERR 
+               print STDERR
                        "No reply after maximum retransmission count.\n";
        } else {
-               print STDERR 
+               print STDERR
                        "No reply after maximum retransmission duration.\n";
        }
 }
@@ -180,4 +180,3 @@ if ($reply_msg && ($reply_msg->{msg_type} == $MSG_REPLY)) {
 #print Dumper($msg->packet()), "\n";
 #
 #print "packet length: ", length($msg->packet()), "\n";
-