Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Yves/wellrng512a support #23032

Draft
wants to merge 7 commits into
base: blead
Choose a base branch
from
Draft

Yves/wellrng512a support #23032

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
7 commits
Select commit Hold shift + click to select a range
ead0068
regen/embed.pl - handle conditional duplicate symbols properly
demerphq Feb 25, 2025
54236b1
sv.c - in perl_clone() we should copy internal_random_state
demerphq Feb 24, 2025
9e3f1ec
internals - rename internal RNG support funcs and vars
demerphq Feb 24, 2025
18d503d
perl.h - replace &PL_random_state with PL_PTR_RANDOM_STATE
demerphq Feb 24, 2025
7ef411a
configure should not do anything about random number generators
demerphq Feb 25, 2025
b2f2f94
util.c - add support for building with WELLRNG512a
demerphq Feb 25, 2025
7f22457
makedef.pl changes for wellrng (squash me)
demerphq Feb 26, 2025
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
208 changes: 1 addition & 207 deletions Configure
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -439,9 +439,6 @@ d_dlopen=''
d_dlsymun=''
d_dosuid=''
d_suidsafe=''
d_drand48_r=''
drand48_r_proto=''
d_drand48proto=''
d_dup2=''
d_dup3=''
d_eaccess=''
Expand Down Expand Up @@ -729,8 +726,6 @@ d_sched_yield=''
sched_yield=''
d_ptrdiff_t=''
d_qgcvt=''
d_random_r=''
random_r_proto=''
d_readdir64_r=''
readdir64_r_proto=''
d_readdir=''
Expand Down Expand Up @@ -849,10 +844,6 @@ socketlib=''
d_socklen_t=''
d_socks5_init=''
d_sqrtl=''
d_srand48_r=''
srand48_r_proto=''
d_srandom_r=''
srandom_r_proto=''
d_sresgproto=''
d_sresuproto=''
d_stat=''
Expand Down Expand Up @@ -1280,10 +1271,8 @@ quadkind=''
quadtype=''
uquadtype=''
drand01=''
randbits=''
randfunc=''
randseedtype=''
seedfunc=''
installscript=''
scriptdir=''
scriptdirexp=''
Expand Down Expand Up @@ -4702,7 +4691,7 @@ esac
# to fail hard and early.
#
# Annoyingly -std=c99 will cause gcc to tell glibc not to define prototypes for
# syscall, drand48 etc when including <unistd.h>, which messes up our build.
# syscall, etc when including <unistd.h>, which messes up our build.
# I guess we *could* loop round trying -std=c99 first with checks both for the
# prototype found and the code compiling (because -std=gnu99 might do other
# things we don't want, particularly on non-GCC compilers) but
Expand Down Expand Up @@ -12692,52 +12681,6 @@ $rm -f fred fred.* dyna.$dlext dyna.* tmp-dyna.*
set d_dlsymun
eval $setvar

: see if drand48_r exists
set drand48_r d_drand48_r
eval $inlibc
case "$d_drand48_r" in
"$define")
hdrs="$i_systypes sys/types.h define stdio.h $i_stdlib stdlib.h"
case "$d_drand48_r_proto:$usethreads" in
":define") d_drand48_r_proto=define
set d_drand48_r_proto drand48_r $hdrs
eval $hasproto ;;
*) ;;
esac
case "$d_drand48_r_proto" in
define)
case "$drand48_r_proto" in
''|0) try='int drand48_r(struct drand48_data*, double*);'
./protochk "$extern_C $try" $hdrs && drand48_r_proto=I_ST ;;
esac
case "$drand48_r_proto" in
''|0) d_drand48_r=undef
drand48_r_proto=0
echo "Disabling drand48_r, cannot determine prototype." >&4 ;;
* ) case "$drand48_r_proto" in
REENTRANT_PROTO*) ;;
*) drand48_r_proto="REENTRANT_PROTO_$drand48_r_proto" ;;
esac
echo "Prototype: $try" ;;
esac
;;
*) case "$usethreads" in
define) echo "drand48_r has no prototype, not using it." >&4 ;;
esac
d_drand48_r=undef
drand48_r_proto=0
;;
esac
;;
*) drand48_r_proto=0
;;
esac

: see if prototype for drand48 is available
echo " "
set d_drand48proto drand48 $i_stdlib stdlib.h $i_unistd unistd.h
eval $hasproto

: see if dup2 exists
set dup2 d_dup2
eval $inlibc
Expand Down Expand Up @@ -18091,55 +18034,6 @@ $rm_try
set d_ptrdiff_t
eval $setvar

: see if random_r exists
set random_r d_random_r
eval $inlibc
case "$d_random_r" in
"$define")
hdrs="$i_systypes sys/types.h define stdio.h $i_stdlib stdlib.h"
case "$d_random_r_proto:$usethreads" in
":define") d_random_r_proto=define
set d_random_r_proto random_r $hdrs
eval $hasproto ;;
*) ;;
esac
case "$d_random_r_proto" in
define)
case "$random_r_proto" in
''|0) try='int random_r(int*, struct random_data*);'
./protochk "$extern_C $try" $hdrs && random_r_proto=I_iS ;;
esac
case "$random_r_proto" in
''|0) try='int random_r(long*, struct random_data*);'
./protochk "$extern_C $try" $hdrs && random_r_proto=I_lS ;;
esac
case "$random_r_proto" in
''|0) try='int random_r(struct random_data*, int32_t*);'
./protochk "$extern_C $try" $hdrs && random_r_proto=I_St ;;
esac
case "$random_r_proto" in
''|0) d_random_r=undef
random_r_proto=0
echo "Disabling random_r, cannot determine prototype." >&4 ;;
* ) case "$random_r_proto" in
REENTRANT_PROTO*) ;;
*) random_r_proto="REENTRANT_PROTO_$random_r_proto" ;;
esac
echo "Prototype: $try" ;;
esac
;;
*) case "$usethreads" in
define) echo "random_r has no prototype, not using it." >&4 ;;
esac
d_random_r=undef
random_r_proto=0
;;
esac
;;
*) random_r_proto=0
;;
esac

: see if readdir and friends exist
set readdir d_readdir
eval $inlibc
Expand Down Expand Up @@ -19349,88 +19243,6 @@ eval $hasproto
set socks5_init d_socks5_init
eval $inlibc

: see if srand48_r exists
set srand48_r d_srand48_r
eval $inlibc
case "$d_srand48_r" in
"$define")
hdrs="$i_systypes sys/types.h define stdio.h $i_stdlib stdlib.h"
case "$d_srand48_r_proto:$usethreads" in
":define") d_srand48_r_proto=define
set d_srand48_r_proto srand48_r $hdrs
eval $hasproto ;;
*) ;;
esac
case "$d_srand48_r_proto" in
define)
case "$srand48_r_proto" in
''|0) try='int srand48_r(long, struct drand48_data*);'
./protochk "$extern_C $try" $hdrs && srand48_r_proto=I_LS ;;
esac
case "$srand48_r_proto" in
''|0) d_srand48_r=undef
srand48_r_proto=0
echo "Disabling srand48_r, cannot determine prototype." >&4 ;;
* ) case "$srand48_r_proto" in
REENTRANT_PROTO*) ;;
*) srand48_r_proto="REENTRANT_PROTO_$srand48_r_proto" ;;
esac
echo "Prototype: $try" ;;
esac
;;
*) case "$usethreads" in
define) echo "srand48_r has no prototype, not using it." >&4 ;;
esac
d_srand48_r=undef
srand48_r_proto=0
;;
esac
;;
*) srand48_r_proto=0
;;
esac

: see if srandom_r exists
set srandom_r d_srandom_r
eval $inlibc
case "$d_srandom_r" in
"$define")
hdrs="$i_systypes sys/types.h define stdio.h $i_stdlib stdlib.h"
case "$d_srandom_r_proto:$usethreads" in
":define") d_srandom_r_proto=define
set d_srandom_r_proto srandom_r $hdrs
eval $hasproto ;;
*) ;;
esac
case "$d_srandom_r_proto" in
define)
case "$srandom_r_proto" in
''|0) try='int srandom_r(unsigned int, struct random_data*);'
./protochk "$extern_C $try" $hdrs && srandom_r_proto=I_TS ;;
esac
case "$srandom_r_proto" in
''|0) d_srandom_r=undef
srandom_r_proto=0
echo "Disabling srandom_r, cannot determine prototype." >&4 ;;
* ) case "$srandom_r_proto" in
REENTRANT_PROTO*) ;;
*) srandom_r_proto="REENTRANT_PROTO_$srandom_r_proto" ;;
esac
echo "Prototype: $try" ;;
esac
;;
*) case "$usethreads" in
define) echo "srandom_r has no prototype, not using it." >&4 ;;
esac
d_srandom_r=undef
srandom_r_proto=0
;;
esac
;;
*) srandom_r_proto=0
;;
esac

: see if prototype for setresgid is available
echo " "
set d_sresgproto setresgid $i_unistd unistd.h
Expand Down Expand Up @@ -21343,12 +21155,6 @@ case "$ccflags" in
;;
esac

randfunc=Perl_drand48
drand01="Perl_drand48()"
seedfunc="Perl_drand48_init"
randbits=48
randseedtype=U32

: Probe whether dtrace builds an object, as newer Illumos requires an input
: object file that uses at least one of the probes defined in the .d file
case "$usedtrace" in
Expand Down Expand Up @@ -24999,8 +24805,6 @@ d_double_style_cray='$d_double_style_cray'
d_double_style_ibm='$d_double_style_ibm'
d_double_style_ieee='$d_double_style_ieee'
d_double_style_vax='$d_double_style_vax'
d_drand48_r='$d_drand48_r'
d_drand48proto='$d_drand48proto'
d_dup2='$d_dup2'
d_dup3='$d_dup3'
d_duplocale='$d_duplocale'
Expand Down Expand Up @@ -25286,7 +25090,6 @@ d_pwquota='$d_pwquota'
d_qgcvt='$d_qgcvt'
d_quad='$d_quad'
d_querylocale='$d_querylocale'
d_random_r='$d_random_r'
d_re_comp='$d_re_comp'
d_readdir64_r='$d_readdir64_r'
d_readdir='$d_readdir'
Expand Down Expand Up @@ -25383,8 +25186,6 @@ d_socklen_t='$d_socklen_t'
d_sockpair='$d_sockpair'
d_socks5_init='$d_socks5_init'
d_sqrtl='$d_sqrtl'
d_srand48_r='$d_srand48_r'
d_srandom_r='$d_srandom_r'
d_sresgproto='$d_sresgproto'
d_sresuproto='$d_sresuproto'
d_stat='$d_stat'
Expand Down Expand Up @@ -25492,7 +25293,6 @@ doublemantbits='$doublemantbits'
doublenanbytes='$doublenanbytes'
doublesize='$doublesize'
drand01='$drand01'
drand48_r_proto='$drand48_r_proto'
dtrace='$dtrace'
dtraceobject='$dtraceobject'
dtracexnolibs='$dtracexnolibs'
Expand Down Expand Up @@ -25829,9 +25629,7 @@ procselfexe='$procselfexe'
ptrsize='$ptrsize'
quadkind='$quadkind'
quadtype='$quadtype'
randbits='$randbits'
randfunc='$randfunc'
random_r_proto='$random_r_proto'
randseedtype='$randseedtype'
ranlib='$ranlib'
rd_nodata='$rd_nodata'
Expand Down Expand Up @@ -25864,7 +25662,6 @@ sched_yield='$sched_yield'
scriptdir='$scriptdir'
scriptdirexp='$scriptdirexp'
sed='$sed'
seedfunc='$seedfunc'
selectminbits='$selectminbits'
selecttype='$selecttype'
sendmail='$sendmail'
Expand Down Expand Up @@ -25919,8 +25716,6 @@ socksizetype='$socksizetype'
sort='$sort'
spackage='$spackage'
spitshell='$spitshell'
srand48_r_proto='$srand48_r_proto'
srandom_r_proto='$srandom_r_proto'
src='$src'
ssizetype='$ssizetype'
st_dev_sign='$st_dev_sign'
Expand Down Expand Up @@ -26175,4 +25970,3 @@ $rm -f kit*isdone ark*isdone
$rm -rf UU

: End of Configure

14 changes: 0 additions & 14 deletions Cross/config.sh-arm-linux
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -177,8 +177,6 @@ d_double_style_cray='undef'
d_double_style_ibm='undef'
d_double_style_ieee='define'
d_double_style_vax='undef'
d_drand48_r='undef'
d_drand48proto='define'
d_dup2='define'
d_dup3='undef'
d_duplocale='undef'
Expand Down Expand Up @@ -462,7 +460,6 @@ d_pwquota='undef'
d_qgcvt='define'
d_quad='define'
d_querylocale='undef'
d_random_r='undef'
d_readdir64_r='undef'
d_readdir='define'
d_readdir_r='undef'
Expand Down Expand Up @@ -556,8 +553,6 @@ d_socklen_t='define'
d_sockpair='define'
d_socks5_init='undef'
d_sqrtl='define'
d_srand48_r='undef'
d_srandom_r='undef'
d_sresgproto='undef'
d_sresuproto='undef'
d_stat='define'
Expand Down Expand Up @@ -665,8 +660,6 @@ doublekind='3'
doublemantbits='52'
doublenanbytes='0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0xf8, 0x7f'
doublesize='8'
drand01='Perl_drand48()'
drand48_r_proto='0'
dtrace=''
dynamic_ext='B ByteLoader Cwd Data/Dumper Devel/DProf Devel/PPPort Devel/Peek Digest/MD5 Encode Fcntl File/Glob Filter/Util/Call I18N/Langinfo IO IPC/SysV List/Util MIME/Base64 Opcode POSIX PerlIO/encoding PerlIO/scalar PerlIO/via SDBM_File Socket Storable Sys/Hostname Sys/Syslog Time/HiRes Unicode/Collate Unicode/Normalize XS/APItest XS/Typemap attributes re threads threads/shared'
eagain='EAGAIN'
Expand Down Expand Up @@ -996,10 +989,6 @@ prototype='define'
ptrsize='4'
quadkind='3'
quadtype='long long'
randbits='48'
randfunc='Perl_drand48'
random_r_proto='0'
randseedtype='U32'
ranlib=':'
rd_nodata='-1'
readdir64_r_proto='0'
Expand Down Expand Up @@ -1030,7 +1019,6 @@ sched_yield='sched_yield()'
scriptdir='/usr/bin'
scriptdirexp='/usr/bin'
sed='sed'
seedfunc='Perl_drand48_init'
selectminbits='32'
selecttype='fd_set *'
sendmail=''
Expand Down Expand Up @@ -1085,8 +1073,6 @@ socksizetype='socklen_t'
sort='sort'
spackage='Perl5'
spitshell='cat'
srand48_r_proto='0'
srandom_r_proto='0'
src='.'
ssizetype='ssize_t'
st_dev_sign='1'
Expand Down
Loading