summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
Diffstat
-rw-r--r--gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.c6
-rw-r--r--gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.h42
-rwxr-xr-xgnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.t32
-rw-r--r--gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.xr34
-rwxr-xr-xgnu/usr.bin/perl/t/op/while_readdir.t62
-rw-r--r--gnu/usr.bin/perl/win32/config.gc6434
-rw-r--r--gnu/usr.bin/perl/win32/config.gc64nox34
7 files changed, 59 insertions, 185 deletions
diff --git a/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.c b/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.c
index 5d782ac75be..ca5536e67a4 100644
--- a/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.c
+++ b/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.c
@@ -3,10 +3,10 @@
*
* Ref: FIPS PUB 198 The Keyed-Hash Message Authentication Code
*
- * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
+ * Copyright (C) 2003-2008 Mark Shelor, All Rights Reserved
*
- * Version: 5.71
- * Wed Feb 29 04:06:10 MST 2012
+ * Version: 5.47
+ * Wed Apr 30 04:00:54 MST 2008
*
*/
diff --git a/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.h b/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.h
index ce592777d16..b2f5795f055 100644
--- a/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.h
+++ b/gnu/usr.bin/perl/cpan/Digest-SHA/src/hmac.h
@@ -3,10 +3,10 @@
*
* Ref: FIPS PUB 198 The Keyed-Hash Message Authentication Code
*
- * Copyright (C) 2003-2012 Mark Shelor, All Rights Reserved
+ * Copyright (C) 2003-2008 Mark Shelor, All Rights Reserved
*
- * Version: 5.71
- * Wed Feb 29 04:06:10 MST 2012
+ * Version: 5.47
+ * Wed Apr 30 04:00:54 MST 2008
*
*/
@@ -37,27 +37,21 @@ int hmacclose (_HMAC_STATE);
#ifndef SHA_PERL_MODULE
-unsigned char *hmac1digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac1hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac1base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac224digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac224hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac224base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac256digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac256hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac256base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac384digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac384hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac384base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac512digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac512hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac512base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac512224digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac512224hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac512224base64 (_HMAC_DATA, _HMAC_KEY);
-unsigned char *hmac512256digest (_HMAC_DATA, _HMAC_KEY);
-char *hmac512256hex (_HMAC_DATA, _HMAC_KEY);
-char *hmac512256base64 (_HMAC_DATA, _HMAC_KEY);
+unsigned char *hmac1digest (_HMAC_DATA, _HMAC_KEY);
+char *hmac1hex (_HMAC_DATA, _HMAC_KEY);
+char *hmac1base64 (_HMAC_DATA, _HMAC_KEY);
+unsigned char *hmac224digest (_HMAC_DATA, _HMAC_KEY);
+char *hmac224hex (_HMAC_DATA, _HMAC_KEY);
+char *hmac224base64 (_HMAC_DATA, _HMAC_KEY);
+unsigned char *hmac256digest (_HMAC_DATA, _HMAC_KEY);
+char *hmac256hex (_HMAC_DATA, _HMAC_KEY);
+char *hmac256base64 (_HMAC_DATA, _HMAC_KEY);
+unsigned char *hmac384digest (_HMAC_DATA, _HMAC_KEY);
+char *hmac384hex (_HMAC_DATA, _HMAC_KEY);
+char *hmac384base64 (_HMAC_DATA, _HMAC_KEY);
+unsigned char *hmac512digest (_HMAC_DATA, _HMAC_KEY);
+char *hmac512hex (_HMAC_DATA, _HMAC_KEY);
+char *hmac512base64 (_HMAC_DATA, _HMAC_KEY);
#endif
diff --git a/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.t b/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.t
index 03ecc5b73b0..98c6320792a 100755
--- a/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.t
+++ b/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.t
@@ -118,8 +118,6 @@ L< aha>
L<oho >
L<"Warnings"> this one is ok
L</unescaped> ok too, this POD has an X of the same name
-L<http://www.perl.org> this is OK
-L<The Perl Home Page|http://www.perl.org> this is also OK
=head2 Warnings
@@ -194,15 +192,6 @@ we already have a head Misc
=head2 another one
-=head2 the next line should be empty
-=head2 ... but there is a command instead
-
-And here is some text
-=head2 again followed by a command
-
- verbatim
-=item line missing
-
previous section is empty!
=head1 LINK TESTS
@@ -217,25 +206,4 @@ trigger a podchecker warning (using bleadperl) :
=cut
-=pod
-
-=head1 ON-OFF tests
-
-The above =pod is OK. The following =cut is ok, the one after not.
-
-=cut
-
-# some comment or code here, not POD
-
-=cut
-
-# more code
-
-=head2 This opens POD
-
-=pod
-
-And the =pod above is too much.
-
-=cut
diff --git a/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.xr b/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.xr
index 8c16609b208..5b40d7a138c 100644
--- a/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.xr
+++ b/gnu/usr.bin/perl/cpan/Pod-Parser/t/pod/poderrs.xr
@@ -27,27 +27,21 @@
*** ERROR: malformed link L<> : empty link at line 116 in file t/pod/poderrs.t
*** WARNING: ignoring leading whitespace in link at line 117 in file t/pod/poderrs.t
*** WARNING: ignoring trailing whitespace in link at line 118 in file t/pod/poderrs.t
-*** WARNING: (section) in 'passwd(5)' deprecated at line 126 in file t/pod/poderrs.t
-*** WARNING: node '$|' contains non-escaped | or / at line 127 in file t/pod/poderrs.t
-*** WARNING: alternative text '$|' contains non-escaped | or / at line 127 in file t/pod/poderrs.t
-*** ERROR: Spurious character(s) after =back at line 133 in file t/pod/poderrs.t
-*** ERROR: Nonempty Z<> at line 147 in file t/pod/poderrs.t
-*** ERROR: Empty X<> at line 149 in file t/pod/poderrs.t
-*** WARNING: preceding non-item paragraph(s) at line 155 in file t/pod/poderrs.t
-*** WARNING: No argument for =item at line 157 in file t/pod/poderrs.t
-*** WARNING: previous =item has no contents at line 159 in file t/pod/poderrs.t
-*** WARNING: No items in =over (at line 167) / =back list at line 169 in file t/pod/poderrs.t
-*** ERROR: Spurious text after =pod at line 175 in file t/pod/poderrs.t
-*** ERROR: Spurious text after =cut at line 179 in file t/pod/poderrs.t
-*** WARNING: empty section in previous paragraph at line 195 in file t/pod/poderrs.t
-*** ERROR: Apparent command =head2 not preceded by blank line at line 198 in file t/pod/poderrs.t
-*** WARNING: empty section in previous paragraph at line 197 in file t/pod/poderrs.t
-*** ERROR: Apparent command =head2 not preceded by blank line at line 201 in file t/pod/poderrs.t
-*** ERROR: Apparent command =item not preceded by blank line at line 204 in file t/pod/poderrs.t
-*** ERROR: Spurious =cut command at line 230 in file t/pod/poderrs.t
-*** ERROR: Spurious =pod command at line 236 in file t/pod/poderrs.t
+*** WARNING: (section) in 'passwd(5)' deprecated at line 124 in file t/pod/poderrs.t
+*** WARNING: node '$|' contains non-escaped | or / at line 125 in file t/pod/poderrs.t
+*** WARNING: alternative text '$|' contains non-escaped | or / at line 125 in file t/pod/poderrs.t
+*** ERROR: Spurious character(s) after =back at line 131 in file t/pod/poderrs.t
+*** ERROR: Nonempty Z<> at line 145 in file t/pod/poderrs.t
+*** ERROR: Empty X<> at line 147 in file t/pod/poderrs.t
+*** WARNING: preceding non-item paragraph(s) at line 153 in file t/pod/poderrs.t
+*** WARNING: No argument for =item at line 155 in file t/pod/poderrs.t
+*** WARNING: previous =item has no contents at line 157 in file t/pod/poderrs.t
+*** WARNING: No items in =over (at line 165) / =back list at line 167 in file t/pod/poderrs.t
+*** ERROR: Spurious text after =pod at line 173 in file t/pod/poderrs.t
+*** ERROR: Spurious text after =cut at line 177 in file t/pod/poderrs.t
+*** WARNING: empty section in previous paragraph at line 193 in file t/pod/poderrs.t
*** ERROR: unresolved internal link 'begin or begin' at line 108 in file t/pod/poderrs.t
*** ERROR: unresolved internal link 'end with begin' at line 109 in file t/pod/poderrs.t
*** ERROR: unresolved internal link 'OoPs' at line 110 in file t/pod/poderrs.t
*** ERROR: unresolved internal link 'abc def' at line 114 in file t/pod/poderrs.t
-*** ERROR: unresolved internal link 'I/O Operators' at line 213 in file t/pod/poderrs.t
+*** ERROR: unresolved internal link 'I/O Operators' at line 202 in file t/pod/poderrs.t
diff --git a/gnu/usr.bin/perl/t/op/while_readdir.t b/gnu/usr.bin/perl/t/op/while_readdir.t
index 63f8d92ba29..39641582874 100755
--- a/gnu/usr.bin/perl/t/op/while_readdir.t
+++ b/gnu/usr.bin/perl/t/op/while_readdir.t
@@ -9,49 +9,8 @@ BEGIN {
use strict;
use warnings;
-plan 10;
-
-# Need to run this in a quiet private directory as it assumes that it can read
-# the contents twice and get the same result.
-my $tempdir = tempfile;
-
-mkdir $tempdir, 0700 or die "Can't mkdir '$tempdir': $!";
-chdir $tempdir or die die "Can't chdir '$tempdir': $!";
-
-my $cleanup = 1;
-my %tempfiles;
-
-END {
- if ($cleanup) {
- foreach my $file (keys %tempfiles) {
- # We only wrote each of these once so 1 delete should work:
- if (unlink $file) {
- warn "unlink tempfile '$file' passed but it's still there"
- if -e $file;
- } else {
- warn "Couldn't unlink tempfile '$file': $!";
- }
- }
- chdir '..' or die "Couldn't chdir .. for cleanup: $!";
- rmdir $tempdir or die "Couldn't unlink tempdir '$tempdir': $!";
- }
-}
-
-# This is intentionally not random (per run), but intentionally will try to
-# give different file names for different people running this test.
-srand $< * $];
-
-my @chars = ('A' .. 'Z', 'a' .. 'z', 0 .. 9);
-
-sub make_file {
- my $name = shift;
-
- return if $tempfiles{$name}++;
-
- print "# Writing to $name in $tempdir\n";
-
- open my $fh, '>', $name or die "Can't open '$name' for writing: $!\n";
- print $fh <<'FILE0';
+open my $fh, ">", "0" or die "Can't open '0' for writing: $!\n";
+print $fh <<'FILE0';
This file is here for testing
while(readdir $dir){...}
@@ -59,20 +18,9 @@ while(readdir $dir){...}
etc
FILE0
- close $fh or die "Can't close '$name': $!";
-}
-
-sub make_some_files {
- for (1..int rand 10) {
- my $name;
- $name .= $chars[rand $#chars] for 1..int(10 + rand 5);
- make_file($name);
- }
-}
+close $fh;
-make_some_files();
-make_file('0');
-make_some_files();
+plan 10;
ok(-f '0', "'0' file is here");
@@ -178,3 +126,5 @@ rewinddir $dirhandle;
}
closedir $dirhandle;
+
+END { 1 while unlink "0" }
diff --git a/gnu/usr.bin/perl/win32/config.gc64 b/gnu/usr.bin/perl/win32/config.gc64
index 2b13d2d6379..cf6d4649ec6 100644
--- a/gnu/usr.bin/perl/win32/config.gc64
+++ b/gnu/usr.bin/perl/win32/config.gc64
@@ -51,7 +51,6 @@ ccversion=''
cf_by='nobody'
cf_email='nobody@no.where.net'
cf_time=''
-charbits='8'
chgrp=''
chmod=''
chown=''
@@ -129,7 +128,7 @@ d_cmsghdr_s='undef'
d_const='define'
d_copysignl='undef'
d_cplusplus='undef'
-d_crypt='define'
+d_crypt='undef'
d_crypt_r='undef'
d_csh='undef'
d_ctermid='undef'
@@ -170,14 +169,14 @@ d_faststdio='define'
d_fchdir='undef'
d_fchmod='undef'
d_fchown='undef'
-d_fcntl='undef'
d_fcntl_can_lock='undef'
+d_fcntl='undef'
d_fd_macros='define'
d_fd_set='define'
d_fds_bits='define'
d_fgetpos='define'
-d_finite='undef'
d_finitel='undef'
+d_finite='undef'
d_flexfnam='define'
d_flock='define'
d_flockproto='define'
@@ -271,9 +270,7 @@ d_inetaton='undef'
d_inetntop='undef'
d_inetpton='undef'
d_int64_t='undef'
-d_ipv6_mreq='undef'
d_isascii='define'
-d_isblank='undef'
d_isfinite='undef'
d_isinf='undef'
d_isnan='define'
@@ -315,17 +312,17 @@ d_modfl='undef'
d_modfl_pow32_bug='undef'
d_modflproto='undef'
d_mprotect='undef'
-d_msg='undef'
+d_msgctl='undef'
d_msg_ctrunc='undef'
d_msg_dontroute='undef'
+d_msgget='undef'
+d_msghdr_s='undef'
d_msg_oob='undef'
d_msg_peek='undef'
d_msg_proxy='undef'
-d_msgctl='undef'
-d_msgget='undef'
-d_msghdr_s='undef'
d_msgrcv='undef'
d_msgsnd='undef'
+d_msg='undef'
d_msync='undef'
d_munmap='undef'
d_mymalloc='undef'
@@ -347,8 +344,6 @@ d_phostname='undef'
d_pipe='define'
d_poll='undef'
d_portable='define'
-d_prctl='undef'
-d_prctl_set_name='undef'
d_printf_format_null='undef'
d_procselfexe='undef'
d_pseudofork='undef'
@@ -434,11 +429,8 @@ d_sigaction='undef'
d_signbit='undef'
d_sigprocmask='undef'
d_sigsetjmp='undef'
-d_sin6_scope_id='define'
d_sitearch='define'
d_snprintf='define'
-d_sockaddr_in6='undef'
-d_sockaddr_sa_len='undef'
d_sockatmark='undef'
d_sockatmarkproto='undef'
d_socket='define'
@@ -454,7 +446,6 @@ d_sresuproto='undef'
d_statblks='undef'
d_statfs_f_flags='undef'
d_statfs_s='undef'
-d_static_inline='define'
d_statvfs='undef'
d_stdio_cnt_lval='define'
d_stdio_ptr_lval='define'
@@ -669,7 +660,6 @@ i_sgtty='undef'
i_shadow='undef'
i_socks='undef'
i_stdarg='define'
-i_stdbool='undef'
i_stddef='define'
i_stdlib='define'
i_string='define'
@@ -787,8 +777,8 @@ longsize='4'
lp=''
lpr=''
ls='dir'
-lseeksize='4'
-lseektype='long'
+lseeksize='8'
+lseektype='long long'
mad='undef'
madlyh=''
madlyobj=''
@@ -855,7 +845,6 @@ path_sep=';'
perl5=''
perl='perl'
perl_patchlevel='~PERL_PATCHLEVEL~'
-perl_static_inline='static __inline__'
perladmin=''
perllibs='~libs~'
perlpath='~INST_TOP~~INST_VER~\bin~INST_ARCH~\perl.exe'
@@ -968,8 +957,6 @@ srand48_r_proto='0'
srandom_r_proto='0'
src=''
ssizetype='long long'
-st_ino_sign='1'
-st_ino_size='8'
startperl='#!perl'
startsh='#!/bin/sh'
static_ext=' '
@@ -1024,7 +1011,6 @@ usedl='define'
usedtrace='undef'
usefaststdio='undef'
useithreads='undef'
-usekernprocpathname='undef'
uselargefiles='undef'
uselongdouble='undef'
usemallocwrap='define'
@@ -1032,7 +1018,6 @@ usemorebits='undef'
usemultiplicity='undef'
usemymalloc='n'
usenm='false'
-usensgetexecutablepath='undef'
useopcode='true'
useperlio='undef'
useposix='true'
@@ -1053,7 +1038,6 @@ uvsize='8'
uvtype='unsigned long long'
uvuformat='"I64u"'
uvxformat='"I64x"'
-vaproto='undef'
vendorarch=''
vendorarchexp=''
vendorbin=''
diff --git a/gnu/usr.bin/perl/win32/config.gc64nox b/gnu/usr.bin/perl/win32/config.gc64nox
index c463323a0ec..f33fba531c3 100644
--- a/gnu/usr.bin/perl/win32/config.gc64nox
+++ b/gnu/usr.bin/perl/win32/config.gc64nox
@@ -51,7 +51,6 @@ ccversion=''
cf_by='nobody'
cf_email='nobody@no.where.net'
cf_time=''
-charbits='8'
chgrp=''
chmod=''
chown=''
@@ -129,7 +128,7 @@ d_cmsghdr_s='undef'
d_const='define'
d_copysignl='undef'
d_cplusplus='undef'
-d_crypt='define'
+d_crypt='undef'
d_crypt_r='undef'
d_csh='undef'
d_ctermid='undef'
@@ -170,14 +169,14 @@ d_faststdio='define'
d_fchdir='undef'
d_fchmod='undef'
d_fchown='undef'
-d_fcntl='undef'
d_fcntl_can_lock='undef'
+d_fcntl='undef'
d_fd_macros='define'
d_fd_set='define'
d_fds_bits='define'
d_fgetpos='define'
-d_finite='undef'
d_finitel='undef'
+d_finite='undef'
d_flexfnam='define'
d_flock='define'
d_flockproto='define'
@@ -271,9 +270,7 @@ d_inetaton='undef'
d_inetntop='undef'
d_inetpton='undef'
d_int64_t='undef'
-d_ipv6_mreq='undef'
d_isascii='define'
-d_isblank='undef'
d_isfinite='undef'
d_isinf='undef'
d_isnan='define'
@@ -315,17 +312,17 @@ d_modfl='undef'
d_modfl_pow32_bug='undef'
d_modflproto='undef'
d_mprotect='undef'
-d_msg='undef'
+d_msgctl='undef'
d_msg_ctrunc='undef'
d_msg_dontroute='undef'
+d_msgget='undef'
+d_msghdr_s='undef'
d_msg_oob='undef'
d_msg_peek='undef'
d_msg_proxy='undef'
-d_msgctl='undef'
-d_msgget='undef'
-d_msghdr_s='undef'
d_msgrcv='undef'
d_msgsnd='undef'
+d_msg='undef'
d_msync='undef'
d_munmap='undef'
d_mymalloc='undef'
@@ -347,8 +344,6 @@ d_phostname='undef'
d_pipe='define'
d_poll='undef'
d_portable='define'
-d_prctl='undef'
-d_prctl_set_name='undef'
d_printf_format_null='undef'
d_procselfexe='undef'
d_pseudofork='undef'
@@ -434,11 +429,8 @@ d_sigaction='undef'
d_signbit='undef'
d_sigprocmask='undef'
d_sigsetjmp='undef'
-d_sin6_scope_id='define'
d_sitearch='define'
d_snprintf='define'
-d_sockaddr_in6='undef'
-d_sockaddr_sa_len='undef'
d_sockatmark='undef'
d_sockatmarkproto='undef'
d_socket='define'
@@ -454,7 +446,6 @@ d_sresuproto='undef'
d_statblks='undef'
d_statfs_f_flags='undef'
d_statfs_s='undef'
-d_static_inline='define'
d_statvfs='undef'
d_stdio_cnt_lval='define'
d_stdio_ptr_lval='define'
@@ -669,7 +660,6 @@ i_sgtty='undef'
i_shadow='undef'
i_socks='undef'
i_stdarg='define'
-i_stdbool='undef'
i_stddef='define'
i_stdlib='define'
i_string='define'
@@ -787,8 +777,8 @@ longsize='4'
lp=''
lpr=''
ls='dir'
-lseeksize='4'
-lseektype='long'
+lseeksize='8'
+lseektype='long long'
mad='undef'
madlyh=''
madlyobj=''
@@ -855,7 +845,6 @@ path_sep=';'
perl5=''
perl='perl'
perl_patchlevel='~PERL_PATCHLEVEL~'
-perl_static_inline='static __inline__'
perladmin=''
perllibs='~libs~'
perlpath='~INST_TOP~~INST_VER~\bin~INST_ARCH~\perl.exe'
@@ -968,8 +957,6 @@ srand48_r_proto='0'
srandom_r_proto='0'
src=''
ssizetype='long long'
-st_ino_sign='1'
-st_ino_size='8'
startperl='#!perl'
startsh='#!/bin/sh'
static_ext=' '
@@ -1024,7 +1011,6 @@ usedl='define'
usedtrace='undef'
usefaststdio='undef'
useithreads='undef'
-usekernprocpathname='undef'
uselargefiles='undef'
uselongdouble='undef'
usemallocwrap='define'
@@ -1032,7 +1018,6 @@ usemorebits='undef'
usemultiplicity='undef'
usemymalloc='n'
usenm='false'
-usensgetexecutablepath='undef'
useopcode='true'
useperlio='undef'
useposix='true'
@@ -1053,7 +1038,6 @@ uvsize='8'
uvtype='unsigned long long'
uvuformat='"I64u"'
uvxformat='"I64x"'
-vaproto='undef'
vendorarch=''
vendorarchexp=''
vendorbin=''
generated by cgit v1.2.3 (git 2.25.1) at 2024-11-23 00:46:08 +0000