extern depends
This commit is contained in:
parent
d1277dec55
commit
830fd2af43
51 changed files with 7169 additions and 0 deletions
45
extern/lib/perl5/x86_64-linux/.meta/POSIX-1003-0.93/MYMETA.json
vendored
Normal file
45
extern/lib/perl5/x86_64-linux/.meta/POSIX-1003-0.93/MYMETA.json
vendored
Normal file
|
@ -0,0 +1,45 @@
|
||||||
|
{
|
||||||
|
"abstract" : "POSIX::1003, alternative for POSIX in core",
|
||||||
|
"author" : [
|
||||||
|
"Mark Overmeer"
|
||||||
|
],
|
||||||
|
"dynamic_config" : 0,
|
||||||
|
"generated_by" : "ExtUtils::MakeMaker version 6.64, CPAN::Meta::Converter version 2.120630",
|
||||||
|
"license" : [
|
||||||
|
"perl_5"
|
||||||
|
],
|
||||||
|
"meta-spec" : {
|
||||||
|
"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
|
||||||
|
"version" : "2"
|
||||||
|
},
|
||||||
|
"name" : "POSIX-1003",
|
||||||
|
"no_index" : {
|
||||||
|
"directory" : [
|
||||||
|
"t",
|
||||||
|
"inc"
|
||||||
|
]
|
||||||
|
},
|
||||||
|
"prereqs" : {
|
||||||
|
"build" : {
|
||||||
|
"requires" : {
|
||||||
|
"ExtUtils::MakeMaker" : "0"
|
||||||
|
}
|
||||||
|
},
|
||||||
|
"configure" : {
|
||||||
|
"requires" : {
|
||||||
|
"ExtUtils::MakeMaker" : "0"
|
||||||
|
}
|
||||||
|
},
|
||||||
|
"runtime" : {
|
||||||
|
"requires" : {
|
||||||
|
"Errno" : "0",
|
||||||
|
"File::Spec" : "0",
|
||||||
|
"POSIX" : "0",
|
||||||
|
"Test::More" : "0.47",
|
||||||
|
"XSLoader" : "0"
|
||||||
|
}
|
||||||
|
}
|
||||||
|
},
|
||||||
|
"release_status" : "stable",
|
||||||
|
"version" : "0.93"
|
||||||
|
}
|
1
extern/lib/perl5/x86_64-linux/.meta/POSIX-1003-0.93/install.json
vendored
Normal file
1
extern/lib/perl5/x86_64-linux/.meta/POSIX-1003-0.93/install.json
vendored
Normal file
|
@ -0,0 +1 @@
|
||||||
|
{"provides":{"POSIX::1003":{"version":"0.93","file":"POSIX/1003.pm"},"POSIX::1003::Proc":{"version":"0.93","file":"POSIX/1003/Proc.pm"},"POSIX::1003::OS":{"version":"0.93","file":"POSIX/1003/OS.pm"},"POSIX::1003::Confstr":{"version":"0.93","file":"POSIX/1003/Confstr.pm"},"POSIX::1003::FdIO":{"version":"0.93","file":"POSIX/1003/FdIO.pm"},"POSIX::1003::Pathconf":{"version":"0.93","file":"POSIX/1003/Pathconf.pm"},"POSIX::1003::Events":{"version":"0.93","file":"POSIX/1003/Events.pm"},"POSIX::1003::Signals":{"version":"0.93","file":"POSIX/1003/Signals.pm"},"POSIX::1003::Locale":{"version":"0.93","file":"POSIX/1003/Locale.pm"},"POSIX::1003::Limit":{"version":"0.93","file":"POSIX/1003/Limit.pm"},"POSIX::1003::Time":{"version":"0.93","file":"POSIX/1003/Time.pm"},"POSIX::1003::Math":{"version":"0.93","file":"POSIX/1003/Math.pm"},"POSIX::1003::ReadOnlyTable":{"version":"0.93","file":"POSIX/1003/Module.pm"},"POSIX::1003::Termios":{"version":"0.93","file":"POSIX/1003/Termios.pm"},"POSIX::1003::Properties":{"version":"0.93","file":"POSIX/1003/Properties.pm"},"POSIX::1003::Module":{"version":"0.93","file":"POSIX/1003/Module.pm"},"POSIX::1003::FS":{"version":"0.93","file":"POSIX/1003/FS.pm"},"POSIX::1003::Sysconf":{"version":"0.93","file":"POSIX/1003/Sysconf.pm"}},"target":"POSIX::1003::FdIO","version":"0.93","name":"POSIX::1003","dist":"POSIX-1003-0.93","pathname":"M/MA/MARKOV/POSIX-1003-0.93.tar.gz"}
|
196
extern/lib/perl5/x86_64-linux/POSIX/1003.pm
vendored
Normal file
196
extern/lib/perl5/x86_64-linux/POSIX/1003.pm
vendored
Normal file
|
@ -0,0 +1,196 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
|
||||||
|
use Carp qw/croak/;
|
||||||
|
|
||||||
|
my %own_functions = map +($_ => 1), qw/
|
||||||
|
posix_1003_modules
|
||||||
|
posix_1003_names
|
||||||
|
show_posix_names
|
||||||
|
/;
|
||||||
|
|
||||||
|
our (%EXPORT_TAGS, %IMPORT_FROM);
|
||||||
|
|
||||||
|
|
||||||
|
my %tags =
|
||||||
|
( confstr => 'POSIX::1003::Confstr'
|
||||||
|
, cs => 'POSIX::1003::Confstr'
|
||||||
|
, events => 'POSIX::1003::Events'
|
||||||
|
, ev => 'POSIX::1003::Events'
|
||||||
|
, fdio => 'POSIX::1003::FdIO'
|
||||||
|
, fd => 'POSIX::1003::FdIO'
|
||||||
|
, filesystem => 'POSIX::1003::FS'
|
||||||
|
, fs => 'POSIX::1003::FS'
|
||||||
|
, limit => 'POSIX::1003::Limit'
|
||||||
|
, limits => 'POSIX::1003::Limit'
|
||||||
|
, locale => 'POSIX::1003::Locale'
|
||||||
|
, math => 'POSIX::1003::Math'
|
||||||
|
, os => 'POSIX::1003::OS'
|
||||||
|
, opsys => 'POSIX::1003::OS'
|
||||||
|
, pathconf => 'POSIX::1003::Pathconf'
|
||||||
|
, pc => 'POSIX::1003::Pathconf'
|
||||||
|
, processes => 'POSIX::1003::Proc'
|
||||||
|
, proc => 'POSIX::1003::Proc'
|
||||||
|
, properties => 'POSIX::1003::Properties'
|
||||||
|
, property => 'POSIX::1003::Properties'
|
||||||
|
, props => 'POSIX::1003::Properties'
|
||||||
|
, posix => 'POSIX::1003::Properties'
|
||||||
|
, sc => 'POSIX::1003::Sysconf'
|
||||||
|
, sigaction => 'POSIX::SigAction'
|
||||||
|
, signals => [qw/POSIX::1003::Signals POSIX::SigSet POSIX::SigAction/]
|
||||||
|
, sigset => 'POSIX::SigSet'
|
||||||
|
, sysconf => 'POSIX::1003::Sysconf'
|
||||||
|
, termio => 'POSIX::1003::Termios'
|
||||||
|
, termios => 'POSIX::1003::Termios'
|
||||||
|
, time => 'POSIX::1003::Time'
|
||||||
|
);
|
||||||
|
|
||||||
|
my %mod_tag;
|
||||||
|
while(my ($tag, $pkg) = each %tags)
|
||||||
|
{ $pkg = $pkg->[0] if ref $pkg eq 'ARRAY';
|
||||||
|
$mod_tag{$pkg} = $tag
|
||||||
|
if !$mod_tag{$pkg}
|
||||||
|
|| length $mod_tag{$pkg} < length $tag;
|
||||||
|
}
|
||||||
|
|
||||||
|
{ eval "require POSIX::1003::Symbols";
|
||||||
|
die $@ if $@;
|
||||||
|
}
|
||||||
|
|
||||||
|
while(my ($pkg, $tag) = each %mod_tag) # unique modules
|
||||||
|
{ $IMPORT_FROM{$_} = $tag for @{$EXPORT_TAGS{$tag}};
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _tag2mods($)
|
||||||
|
{ my $tag = shift;
|
||||||
|
my $r = $tags{$tag} or croak "unknown tag '$tag'";
|
||||||
|
ref $r eq 'ARRAY' ? @$r : $r;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _mod2tag($) { $mod_tag{$_[0]} }
|
||||||
|
sub _tags() { keys %tags}
|
||||||
|
|
||||||
|
sub import(@)
|
||||||
|
{ my $class = shift;
|
||||||
|
my (%mods, %from);
|
||||||
|
|
||||||
|
my $level = @_ && $_[0] =~ /^\+(\d+)$/ ? shift : 0;
|
||||||
|
return if @_==1 && $_[0] eq ':none';
|
||||||
|
@_ = ':all' if !@_;
|
||||||
|
|
||||||
|
no strict 'refs';
|
||||||
|
no warnings 'once';
|
||||||
|
my $to = (caller $level)[0];
|
||||||
|
|
||||||
|
foreach (@_)
|
||||||
|
{ if($_ eq ':all')
|
||||||
|
{ $mods{$_}++ for values %mod_tag;
|
||||||
|
*{$to.'::'.$_} = \&$_ for keys %own_functions;
|
||||||
|
}
|
||||||
|
elsif(m/^\:(.*)/)
|
||||||
|
{ exists $tags{$1} or croak "unknown tag '$_'";
|
||||||
|
$mods{$_}++ for map $mod_tag{$_}, _tag2mods $1; # remove aliases
|
||||||
|
}
|
||||||
|
elsif($own_functions{$_})
|
||||||
|
{ *{$to.'::'.$_} = \&$_;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ my $mod = $IMPORT_FROM{$_} or croak "unknown symbol '$_'";
|
||||||
|
push @{$from{$mod}}, $_;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
# no need for separate symbols when we need all
|
||||||
|
delete $from{$_} for keys %mods;
|
||||||
|
|
||||||
|
# print "from $_ all\n" for keys %mods;
|
||||||
|
# print "from $_ @{$from{$_}}\n" for keys %from;
|
||||||
|
|
||||||
|
my $up = '+' . ($level+1);
|
||||||
|
foreach my $tag (keys %mods) # whole tags
|
||||||
|
{ foreach my $pkg (_tag2mods($tag))
|
||||||
|
{ eval "require $pkg"; die $@ if $@;
|
||||||
|
$pkg->import($up, ':all');
|
||||||
|
}
|
||||||
|
}
|
||||||
|
foreach my $tag (keys %from) # separate symbols
|
||||||
|
{ foreach my $pkg (_tag2mods($tag))
|
||||||
|
{ eval "require $pkg"; die $@ if $@;
|
||||||
|
$pkg->import($up, @{$from{$tag}});
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub posix_1003_modules()
|
||||||
|
{ my %mods;
|
||||||
|
foreach my $mods (values %tags)
|
||||||
|
{ $mods{$_}++ for ref $mods eq 'ARRAY' ? @$mods : $mods;
|
||||||
|
}
|
||||||
|
keys %mods;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub posix_1003_names(@)
|
||||||
|
{ my %names;
|
||||||
|
my @modules;
|
||||||
|
if(@_)
|
||||||
|
{ my %mods;
|
||||||
|
foreach my $sel (@_)
|
||||||
|
{ $mods{$_}++ for $sel =~ m/^:(\w+)/ ? _tag2mods($1) : $sel;
|
||||||
|
}
|
||||||
|
@modules = keys %mods;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ @modules = posix_1003_modules;
|
||||||
|
}
|
||||||
|
|
||||||
|
foreach my $pkg (@modules)
|
||||||
|
{ eval "require $pkg";
|
||||||
|
$@ && next; # die?
|
||||||
|
$pkg->can('import') or next;
|
||||||
|
$pkg->import(':none'); # create %EXPORT_OK
|
||||||
|
|
||||||
|
no strict 'refs';
|
||||||
|
my $exports = \%{"${pkg}::EXPORT_OK"};
|
||||||
|
$names{$_} = $pkg for keys %$exports;
|
||||||
|
}
|
||||||
|
|
||||||
|
wantarray ? keys %names : \%names;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub show_posix_names(@)
|
||||||
|
{ my $pkg_of = posix_1003_names @_;
|
||||||
|
my %order = map {(my $n = lc $_) =~ s/[^A-Za-z0-9]//g; ($n => $_)}
|
||||||
|
keys %$pkg_of; # Swartzian transform
|
||||||
|
|
||||||
|
no strict 'refs';
|
||||||
|
foreach (sort keys %order)
|
||||||
|
{ my $name = $order{$_};
|
||||||
|
my $pkg = $pkg_of->{$name};
|
||||||
|
$pkg->import($name);
|
||||||
|
my $val = $pkg->exampleValue($name);
|
||||||
|
(my $abbrev = $pkg) =~ s/^POSIX\:\:1003\:\:/::/;
|
||||||
|
my $mod = $mod_tag{$pkg};
|
||||||
|
if(defined $val)
|
||||||
|
{ printf "%-12s :%-10s %-30s %s\n", $abbrev, $mod, $name, $val;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ printf "%-12s :%-10s %s\n", $abbrev, $mod, $name;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
print "*** ".(keys %$pkg_of)." symbols in total\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
290
extern/lib/perl5/x86_64-linux/POSIX/1003.pod
vendored
Normal file
290
extern/lib/perl5/x86_64-linux/POSIX/1003.pod
vendored
Normal file
|
@ -0,0 +1,290 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003 - bulk-load POSIX::1003 symbols
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003 qw(:termios :pc PATH_MAX);
|
||||||
|
# is short for all of these:
|
||||||
|
use POSIX::1003::Termios qw(:all);
|
||||||
|
use POSIX::1003::Pathconf qw(:all);
|
||||||
|
use POSIX::1003::FS qw(PATH_MAX);
|
||||||
|
|
||||||
|
# overview about all exported symbols (by a module)
|
||||||
|
show_posix_names 'POSIX::1003::Pathconf';
|
||||||
|
show_posix_names ':pc';
|
||||||
|
perl -MPOSIX::1003 'show_posix_names'
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
The L<POSIX::1003|POSIX::1003> suite implements access to many POSIX functions. The
|
||||||
|
POSIX module in I<core> (distributed with Perl itself) is ancient, the
|
||||||
|
documentation is usually wrong, and it has too much unusable code in it.
|
||||||
|
C<POSIX::1003> tries to provide cleaner access to the operating system.
|
||||||
|
More about the choices made can be found in section L</Rationale>.
|
||||||
|
|
||||||
|
=head2 POSIX
|
||||||
|
|
||||||
|
The official POSIX standard is large, with over 1200 functions;
|
||||||
|
L<POSIX::Overview|POSIX::Overview> does list them all. This collection of C<POSIX::1003>
|
||||||
|
extension provides access to quite a number of those functions, when they
|
||||||
|
are not provided by "core". They also define as many system constants
|
||||||
|
as possible. More functions may get added in the future.
|
||||||
|
|
||||||
|
B<Start looking in POSIX::Overview>, to discover which module
|
||||||
|
provides certain functionality. You may also guess the location from
|
||||||
|
the module names listed in L</DETAILS>, below.
|
||||||
|
|
||||||
|
=head2 Bulk loading
|
||||||
|
|
||||||
|
It can be quite some work to work-out which modules define what symbols
|
||||||
|
and then write down all the explicit C<require> lines. Using bulk loading
|
||||||
|
via this C<POSIX::1003> will be slower during the import (because it needs
|
||||||
|
to load the location of each of the hundreds of symbols into memory),
|
||||||
|
but provides convenience: it loads the right modules automagically.
|
||||||
|
|
||||||
|
=head3 Exporter
|
||||||
|
|
||||||
|
This module uses nasty export tricks, so is not based in Exporter.
|
||||||
|
Some modules have more than one tag related to them, and one tag may
|
||||||
|
load multiple modules. When you do not specify symbol or tag, then B<all>
|
||||||
|
are loaded into your namespace(!), the same behavior as POSIX has.
|
||||||
|
|
||||||
|
If your import list starts with C<+1>, the symbols will not get into
|
||||||
|
your own namespace, but that of your caller. Just like
|
||||||
|
C<$Exporter::ExportLevel> (but a simpler syntax).
|
||||||
|
|
||||||
|
use POSIX::1003 ':pathconf';
|
||||||
|
use POSIX::1003 ':pc'; # same, abbreviated name
|
||||||
|
|
||||||
|
use POSIX::1003 qw(PATH_MAX :math sin);
|
||||||
|
|
||||||
|
sub MyModule::import(@) # your own tricky exporter
|
||||||
|
{ POSIX::1003->import('+1', @_);
|
||||||
|
}
|
||||||
|
|
||||||
|
=head3 EXPORT_TAGS
|
||||||
|
|
||||||
|
:all (all symbols, default)
|
||||||
|
:cs :confstr POSIX::1003::Confstr
|
||||||
|
:ev :events POSIX::1003::Events
|
||||||
|
:fd :fdio POSIX::1003::FdIO
|
||||||
|
:fs :filesystem POSIX::1003::FS
|
||||||
|
:limit :limits POSIX::1003::Limit
|
||||||
|
:locale POSIX::1003::Locale
|
||||||
|
:math POSIX::1003::Math
|
||||||
|
:none (nothing)
|
||||||
|
:os :opsys POSIX::1003::OS
|
||||||
|
:pc :pathconf POSIX::1003::Pathconf
|
||||||
|
:proc :processes POSIX::1003::Proc
|
||||||
|
:props :properties POSIX::1003::Properties
|
||||||
|
:posix :property POSIX::1003::Properties
|
||||||
|
:sc :sysconf POSIX::1003::Sysconf
|
||||||
|
:signals POSIX::1003::Signals
|
||||||
|
:signals :sigaction POSIX::SigAction
|
||||||
|
:signals :sigset POSIX::SigSet
|
||||||
|
:termio :termios POSIX::1003::Termios
|
||||||
|
:time POSIX::1003::Time
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<posix_1003_modules>()
|
||||||
|
|
||||||
|
Returns the names of all modules in the current release of POSIX::1003.
|
||||||
|
|
||||||
|
=item B<posix_1003_names>([MODULES|TAGS])
|
||||||
|
|
||||||
|
Returns all the names, when in LIST content. In SCALAR context,
|
||||||
|
it returns (a reference to) an HASH which contains exported names
|
||||||
|
to modules mappings. If no explicit MODULES are specified, then all
|
||||||
|
available modules are taken.
|
||||||
|
|
||||||
|
=item B<show_posix_names>([MODULES|TAGS])
|
||||||
|
|
||||||
|
Print all names defined by the POSIX::1003 suite in alphabetical
|
||||||
|
(case-insensitive) order. If no explicit MODULES are specified, then all
|
||||||
|
available modules are taken.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 DETAILS
|
||||||
|
|
||||||
|
=head2 Modules in this distribution
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Confstr|POSIX::1003::Confstr>
|
||||||
|
|
||||||
|
Provide access to the C<_CS_*> constants.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::FdIO|POSIX::1003::FdIO>
|
||||||
|
|
||||||
|
Provides unbuffered IO handling; based on file-descriptors.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::FS|POSIX::1003::FS>
|
||||||
|
|
||||||
|
Some generic file-system information. See also L<POSIX::1003::Pathconf|POSIX::1003::Pathconf>
|
||||||
|
for more precise info.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Locale|POSIX::1003::Locale>
|
||||||
|
|
||||||
|
Locales, see also L<perllocale>.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Math|POSIX::1003::Math>
|
||||||
|
|
||||||
|
Standard math functions of unknown precission.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::OS|POSIX::1003::OS>
|
||||||
|
|
||||||
|
A few ways to get Operating system information.
|
||||||
|
See also L<POSIX::1003::Sysconf|POSIX::1003::Sysconf>, L<POSIX::1003::Confstr|POSIX::1003::Confstr>, and
|
||||||
|
L<POSIX::1003::Properties|POSIX::1003::Properties>,
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Pathconf|POSIX::1003::Pathconf>
|
||||||
|
|
||||||
|
Provide access to the C<pathconf()> and its trillion C<_PC_*> constants.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Properties|POSIX::1003::Properties>
|
||||||
|
|
||||||
|
Provide access to the C<_POSIX_*> constants.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Signals|POSIX::1003::Signals>
|
||||||
|
|
||||||
|
With helper modules L<POSIX::SigSet|POSIX::SigSet> and L<POSIX::SigAction|POSIX::SigAction>.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Sysconf|POSIX::1003::Sysconf>
|
||||||
|
|
||||||
|
Provide access to the C<sysconf> and its zillion C<_SC_*> constants.
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Termios|POSIX::1003::Termios>
|
||||||
|
|
||||||
|
Terminal IO
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Time|POSIX::1003::Time>
|
||||||
|
|
||||||
|
Time-stamp processing
|
||||||
|
|
||||||
|
=item L<POSIX::1003::Limit|POSIX::1003::Limit>
|
||||||
|
|
||||||
|
For getting and setting resource limits.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Other modules
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item User::pwent
|
||||||
|
|
||||||
|
Provides an OO interface around C<getpw*()>
|
||||||
|
|
||||||
|
=item User::grent
|
||||||
|
|
||||||
|
Provides an OO interface around C<getgr*()>
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Rationale
|
||||||
|
|
||||||
|
The POSIX module as distributed with Perl itself is ancient (it dates
|
||||||
|
before Perl5) Although it proclaims that it provides access to all
|
||||||
|
POSIX functions, it only lists about 200 out of 1200. From that subset,
|
||||||
|
half of the functions with croak when you use them, complaining that
|
||||||
|
they cannot get implemented in Perl for some reason.
|
||||||
|
|
||||||
|
Many other functions provided by POSIX-in-Core simply forward the caller
|
||||||
|
to a function with the same name which is in basic perl (see perldoc).
|
||||||
|
With a few serious complications: the functions in POSIX do not use
|
||||||
|
prototypes, sometimes expect different arguments and sometimes return
|
||||||
|
different values.
|
||||||
|
|
||||||
|
Back to the basics: the L<POSIX::1003|POSIX::1003> provides access to the POSIX
|
||||||
|
libraries where they can be made compatible with Perl's way of doing
|
||||||
|
things. For instance, C<setuid> of POSIX is implemented with C<$)>,
|
||||||
|
whose exact behavior depends on compile-flags and OS: it's not the pure
|
||||||
|
C<setuid()> of the standard hence left-out. There is no C<isalpha()>
|
||||||
|
either: not compatible with Perl strings and implemented very different
|
||||||
|
interface from POSIX. And there is also no own C<exit()>, because we have
|
||||||
|
a C<CORE::exit()> with the same functionality.
|
||||||
|
|
||||||
|
=head2 POSIX::1003 compared to POSIX
|
||||||
|
|
||||||
|
This distribution does not add much functionality itself: it is
|
||||||
|
mainly core's POSIX.xs (which is always available and ported to
|
||||||
|
all platforms). You can access these routines via POSIX as
|
||||||
|
well.
|
||||||
|
|
||||||
|
When you are used to POSIX.pm but want to move to L<POSIX::1003|POSIX::1003>,
|
||||||
|
you must be aware about the following differences:
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
the constants and functions are spread over many separate modules,
|
||||||
|
based on their purpose, where POSIX uses a header filename as
|
||||||
|
tag to group provided functionality.
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
functions provided by CORE are usually not exported again by
|
||||||
|
POSIX::1003 (unless to avoid confusion, for instance: is
|
||||||
|
C<atan2()> in core or ::Math?)
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
constants which are already provided via Fcntl or Errno are
|
||||||
|
not provided by this module as well. This should reduce the chance
|
||||||
|
for confusion.
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
functions which are also in CORE can be imported, but will silently
|
||||||
|
be ignored. In C<POSIX>, functions with the same name get exported
|
||||||
|
without prototype, which does have consequences for interpretation of
|
||||||
|
your program. This module uses prototypes on all exported functions,
|
||||||
|
like CORE does.
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
hundreds of C<_SC_*>, C<_CS_*>, C<_PC_*>, C<_POSIX_*>, C<UL_*>,
|
||||||
|
and C<RLIMIT_*> constants were collected from various sources, not just
|
||||||
|
a minimal subset. You get access to all defined on your system.
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
when an user program addresses a constant which is not defined by the
|
||||||
|
system, POSIX will croak. Modules in POSIX::1003 on the other hand,
|
||||||
|
will return C<undef>.
|
||||||
|
|
||||||
|
This simplifies code like this:
|
||||||
|
|
||||||
|
use POSIX::1003::FS 'PATH_MAX';
|
||||||
|
use POSIX::1003::PathConfig '_PC_PATH_MAX';
|
||||||
|
my $max_fn = _PC_PATH_MAX($fn) // PATH_MAX // 1024;
|
||||||
|
|
||||||
|
With the tranditional POSIX, you have to C<eval()> each use
|
||||||
|
of a constant.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
67
extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pm
vendored
Normal file
67
extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pm
vendored
Normal file
|
@ -0,0 +1,67 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Confstr;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
my @constants;
|
||||||
|
my @functions = qw/confstr confstr_names/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ '%confstr' ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my $confstr;
|
||||||
|
our %confstr;
|
||||||
|
sub confstr($);
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :constants export tag
|
||||||
|
$confstr = confstr_table;
|
||||||
|
push @constants, keys %$confstr;
|
||||||
|
tie %confstr, 'POSIX::1003::ReadOnlyTable', $confstr;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
$name =~ m/^_CS_/ or return;
|
||||||
|
my $val = confstr $name;
|
||||||
|
defined $val ? "'$val'" : 'undef';
|
||||||
|
}
|
||||||
|
|
||||||
|
#-----------------------
|
||||||
|
|
||||||
|
sub confstr($)
|
||||||
|
{ my $key = shift // return;
|
||||||
|
$key =~ /^_CS_/
|
||||||
|
or croak "pass the constant name as string";
|
||||||
|
|
||||||
|
my $id = $confstr->{$key} // return;
|
||||||
|
_confstr($id);
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $id = $confstr->{$name} // return sub() {undef};
|
||||||
|
sub() {_confstr($id)};
|
||||||
|
}
|
||||||
|
|
||||||
|
#--------------------------
|
||||||
|
|
||||||
|
sub confstr_names() { keys %$confstr }
|
||||||
|
|
||||||
|
#--------------------------
|
||||||
|
|
||||||
|
1;
|
163
extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pod
vendored
Normal file
163
extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pod
vendored
Normal file
|
@ -0,0 +1,163 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Confstr - POSIX access to confstr()
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Confstr; # import all
|
||||||
|
|
||||||
|
use POSIX::1003::Confstr 'confstr';
|
||||||
|
my $path = confstr('_CS_PATH');
|
||||||
|
|
||||||
|
use POSIX::1003::Confstr '_CS_PATH';
|
||||||
|
my $path = _CS_PATH;
|
||||||
|
|
||||||
|
use POSIX::1003::Confstr '%confstr';
|
||||||
|
my $key = $confstr{_CS_PATH};
|
||||||
|
$confstr{_CS_NEW_CONF} = $key;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
With C<confstr()> you can retreive string values from the operating
|
||||||
|
system. It is the counterpart of C<sysconf()> which can only return
|
||||||
|
numeric values.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<confstr>(NAME)
|
||||||
|
|
||||||
|
Returns the confstr value related to the NAMEd constant. The NAME
|
||||||
|
must be a string. C<undef> will be returned when the NAME is not
|
||||||
|
known by the system.
|
||||||
|
|
||||||
|
example:
|
||||||
|
|
||||||
|
my $path = confstr('_CS_PATH') || '/bin:/usr/bin';
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<confstr_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%confstr>
|
||||||
|
|
||||||
|
This exported variable is a (tied) HASH which maps C<_CS_*>
|
||||||
|
names to the unique numbers to be used with the system's C<confstr()>
|
||||||
|
function.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned at that time.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_CONFSTR_START
|
||||||
|
|
||||||
|
_CS_GNU_LIBC_VERSION 'glibc 2.15'
|
||||||
|
_CS_GNU_LIBPTHREAD_VERSION 'NPTL 2.15'
|
||||||
|
_CS_LFS64_CFLAGS '-D_LARGEFILE64_SOURCE'
|
||||||
|
_CS_LFS64_LDFLAGS ''
|
||||||
|
_CS_LFS64_LIBS ''
|
||||||
|
_CS_LFS64_LINTFLAGS '-D_LARGEFILE64_SOURCE'
|
||||||
|
_CS_LFS_CFLAGS ''
|
||||||
|
_CS_LFS_LDFLAGS ''
|
||||||
|
_CS_LFS_LIBS ''
|
||||||
|
_CS_LFS_LINTFLAGS ''
|
||||||
|
_CS_PATH '/bin:/usr/bin'
|
||||||
|
_CS_POSIX_V5_WIDTH_RESTRICTED_ENVS 'XBS5_LP64_OFF64'
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_CFLAGS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LDFLAGS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LIBS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_CFLAGS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LIBS ''
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_CFLAGS '-m64'
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LDFLAGS '-m64'
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LIBS ''
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_CFLAGS ''
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LIBS ''
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V6_WIDTH_RESTRICTED_ENVS 'POSIX_V6_LP64_OFF64'
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_CFLAGS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LDFLAGS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LIBS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_CFLAGS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LIBS ''
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_CFLAGS '-m64'
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LDFLAGS '-m64'
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LIBS ''
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_CFLAGS ''
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LIBS ''
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LINTFLAGS ''
|
||||||
|
_CS_POSIX_V7_WIDTH_RESTRICTED_ENVS 'POSIX_V7_LP64_OFF64'
|
||||||
|
_CS_V5_WIDTH_RESTRICTED_ENVS 'XBS5_LP64_OFF64'
|
||||||
|
_CS_V6_WIDTH_RESTRICTED_ENVS 'POSIX_V6_LP64_OFF64'
|
||||||
|
_CS_V7_WIDTH_RESTRICTED_ENVS 'POSIX_V7_LP64_OFF64'
|
||||||
|
_CS_XBS5_ILP32_OFF32_CFLAGS ''
|
||||||
|
_CS_XBS5_ILP32_OFF32_LDFLAGS ''
|
||||||
|
_CS_XBS5_ILP32_OFF32_LIBS ''
|
||||||
|
_CS_XBS5_ILP32_OFF32_LINTFLAGS ''
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_CFLAGS ''
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LIBS ''
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LINTFLAGS ''
|
||||||
|
_CS_XBS5_LP64_OFF64_CFLAGS '-m64'
|
||||||
|
_CS_XBS5_LP64_OFF64_LDFLAGS '-m64'
|
||||||
|
_CS_XBS5_LP64_OFF64_LIBS ''
|
||||||
|
_CS_XBS5_LP64_OFF64_LINTFLAGS ''
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_CFLAGS ''
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LDFLAGS ''
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LIBS ''
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LINTFLAGS ''
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_CONFSTR_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
67
extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pm
vendored
Normal file
67
extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pm
vendored
Normal file
|
@ -0,0 +1,67 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Events;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
my @constants;
|
||||||
|
my @functions = qw/
|
||||||
|
FD_CLR FD_ISSET FD_SET FD_ZERO select
|
||||||
|
poll poll_names
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @poll = qw(poll poll_names);
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
my $poll;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
$poll = poll_table;
|
||||||
|
push @constants, keys %$poll;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub select($$$;$)
|
||||||
|
{ push @_, undef if @_==3;
|
||||||
|
goto &select;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub FD_CLR($$) {vec($_[1],$_[0],1) = 0}
|
||||||
|
sub FD_ISSET($$) {vec($_[1],$_[0],1) ==1}
|
||||||
|
sub FD_SET($$) {vec($_[1],$_[0],1) = 1}
|
||||||
|
sub FD_ZERO($) {$_[0] = 0}
|
||||||
|
|
||||||
|
|
||||||
|
sub poll($;$)
|
||||||
|
{ my ($data, $timeout) = @_;
|
||||||
|
defined $timeout or $timeout = -1;
|
||||||
|
_poll($data, $timeout);
|
||||||
|
}
|
||||||
|
|
||||||
|
#----------------------
|
||||||
|
|
||||||
|
sub poll_names() { keys %$poll }
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
$name =~ m/^POLL/
|
||||||
|
or die "constants expected to start with POLL, not $name\n";
|
||||||
|
my $val = $poll->{$name} // return sub() {undef};
|
||||||
|
sub() {$val};
|
||||||
|
|
||||||
|
}
|
||||||
|
#----------------------
|
||||||
|
|
||||||
|
1;
|
112
extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pod
vendored
Normal file
112
extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pod
vendored
Normal file
|
@ -0,0 +1,112 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Events - POSIX for the file-system
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Events;
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<FD_CLR>(FD, SET)
|
||||||
|
|
||||||
|
Remove the file descriptor FD from the SET. If FD is not a member of
|
||||||
|
this set, there shall be no effect on the set, nor will an error be
|
||||||
|
returned.
|
||||||
|
|
||||||
|
=item B<FD_ISSET>(FD, SET)
|
||||||
|
|
||||||
|
Returns true if the file descriptor FD is a member of the SET
|
||||||
|
|
||||||
|
=item B<FD_SET>(FD, SET)
|
||||||
|
|
||||||
|
Add the file descriptor FD to the SET
|
||||||
|
If the file descriptor FD is already in this set, there
|
||||||
|
is no effect on the set, nor will an error be returned.
|
||||||
|
|
||||||
|
=item B<FD_ZERO>(SET)
|
||||||
|
|
||||||
|
Clear the set
|
||||||
|
|
||||||
|
=item B<poll>(HASH, [TIMEOUT])
|
||||||
|
|
||||||
|
If TIMEOUT is not defined, the poll will wait until something
|
||||||
|
happend. When C<undef> is returned, then there is an error.
|
||||||
|
With an empy HASH returned, then the poll timed out. Otherwise,
|
||||||
|
the returned HASH contains the FDs where something happened.
|
||||||
|
|
||||||
|
=item B<select>(RBITS, WBITS, EBITS, [TIMEOUT])
|
||||||
|
|
||||||
|
Perl core contains two functions named C<select>. The second is the
|
||||||
|
one we need here. Without TIMEOUT, the select will wait until an event
|
||||||
|
emerges (or an interrupt).
|
||||||
|
|
||||||
|
In the example below, C<$rin> is a bit-set indicating on which
|
||||||
|
file-descriptors should be listed for read events (I<data available>)
|
||||||
|
and C<$rout> is a sub-set of that. The bit-sets can be manipulated
|
||||||
|
with the C<FD_*> functions also exported by this module.
|
||||||
|
|
||||||
|
my ($nfound, $timeleft) =
|
||||||
|
select($rout=$rin, $wout=$win, $eout=$ein, $timeout);
|
||||||
|
|
||||||
|
my $nfound = select($rout=$rin, $wout=$win, $eout=$ein);
|
||||||
|
|
||||||
|
The C<select> interface is inefficient when used with many filehandles.
|
||||||
|
You can better use L<poll()|POSIX::1003::Events/"Standard POSIX">.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<poll_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned at that time.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_POLL_START
|
||||||
|
|
||||||
|
POLLERR 8 POLLOUT 4 POLLWRBAND 512
|
||||||
|
POLLHUP 16 POLLPRI 2 POLLWRNORM 256
|
||||||
|
POLLIN 1 POLLRDBAND 128
|
||||||
|
POLLNVAL 32 POLLRDNORM 64
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_POLL_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
84
extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pm
vendored
Normal file
84
extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pm
vendored
Normal file
|
@ -0,0 +1,84 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::FS;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks resp from unistd.h, stdio.h, limits.h
|
||||||
|
my @constants;
|
||||||
|
my @access = qw/access/;
|
||||||
|
my @stat_checks = qw/S_ISDIR S_ISCHR S_ISBLK S_ISREG S_ISFIFO
|
||||||
|
S_ISLNK S_ISSOCK S_ISWHT/;
|
||||||
|
my @stat = (qw/stat lstat/, @stat_checks);
|
||||||
|
|
||||||
|
sub S_ISDIR($) { ($_[0] & S_IFMT()) == S_IFDIR()}
|
||||||
|
sub S_ISCHR($) { ($_[0] & S_IFMT()) == S_IFCHR()}
|
||||||
|
sub S_ISBLK($) { ($_[0] & S_IFMT()) == S_IFBLK()}
|
||||||
|
sub S_ISREG($) { ($_[0] & S_IFMT()) == S_IFREG()}
|
||||||
|
sub S_ISFIFO($) { ($_[0] & S_IFMT()) == S_IFIFO()}
|
||||||
|
sub S_ISLNK($) { ($_[0] & S_IFMT()) == S_IFLNK()}
|
||||||
|
sub S_ISSOCK($) { ($_[0] & S_IFMT()) == S_IFSOCK()}
|
||||||
|
sub S_ISWHT($) { ($_[0] & S_IFMT()) == S_IFWHT()} # FreeBSD
|
||||||
|
|
||||||
|
# POSIX.xs defines L_ctermid L_cuserid L_tmpname: useless!
|
||||||
|
|
||||||
|
# Blocks resp from sys/stat.h, unistd.h, utime.h, sys/types
|
||||||
|
my @functions = qw/
|
||||||
|
mkfifo mknod stat lstat rename
|
||||||
|
access lchown
|
||||||
|
utime
|
||||||
|
major minor makedev
|
||||||
|
/;
|
||||||
|
|
||||||
|
our @IN_CORE = qw(utime mkdir stat lstat rename);
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, access => \@access
|
||||||
|
, stat => \@stat
|
||||||
|
, tables => [ qw/%access %stat/ ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my ($fsys, %access, %stat);
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
$fsys = fsys_table;
|
||||||
|
push @constants, keys %$fsys;
|
||||||
|
|
||||||
|
# initialize the :access export tag
|
||||||
|
push @access, grep /_OK$/, keys %$fsys;
|
||||||
|
my %access_subset;
|
||||||
|
@access_subset{@access} = @{$fsys}{@access};
|
||||||
|
tie %access, 'POSIX::1003::ReadOnlyTable', \%access_subset;
|
||||||
|
|
||||||
|
# initialize the :fsys export tag
|
||||||
|
push @stat, grep /^S_/, keys %$fsys;
|
||||||
|
my %stat_subset;
|
||||||
|
@stat_subset{@stat} = @{$fsys}{@stat};
|
||||||
|
tie %stat, 'POSIX::1003::ReadOnlyTable', \%stat_subset;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub lchown($$@)
|
||||||
|
{ my ($uid, $gid) = (shift, shift);
|
||||||
|
my $successes = 0;
|
||||||
|
POSIX::lchown($uid, $gid, $_) && $successes++ for @_;
|
||||||
|
$successes;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $val = $fsys->{$name};
|
||||||
|
sub() {$val};
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
177
extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pod
vendored
Normal file
177
extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pod
vendored
Normal file
|
@ -0,0 +1,177 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::FS - POSIX for the file-system
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::FS ':access';
|
||||||
|
if(access $fn, R_OK) # $fn is readible?
|
||||||
|
|
||||||
|
use POSIX::1003::FS qw(mkfifo :stat);
|
||||||
|
mkfifo($path, S_IRUSR|S_IWUSR) or die $!;
|
||||||
|
|
||||||
|
# Absorbed from Unix::Mknod
|
||||||
|
use POSIX::1003::FS qw(mknod major minor makedev);
|
||||||
|
use File::stat
|
||||||
|
my $st = stat '/dev/null';
|
||||||
|
my $major = major $st->rdev;
|
||||||
|
my $minor = minor $st->rdev;
|
||||||
|
mknod '/tmp/special', S_IFCHR|0600, makedev($major,$minor+1);
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
You may also need L<POSIX::1003::Pathconf|POSIX::1003::Pathconf>.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<access>(FILENAME, FLAGS)
|
||||||
|
|
||||||
|
Read C<man filetest> before you start using this function!
|
||||||
|
Use the C<*_OK> constants for FLAGS.
|
||||||
|
|
||||||
|
=item B<lchown>(UID, GID, FILENAMES)
|
||||||
|
|
||||||
|
Like C<chown()>, but does not follow symlinks when encountered. Returns
|
||||||
|
the number of files successfully changed.
|
||||||
|
|
||||||
|
B<Warning>, POSIX uses different parameter order:
|
||||||
|
|
||||||
|
# POSIX specification:
|
||||||
|
# int lchown(const char *path, uid_t owner, gid_t group);
|
||||||
|
|
||||||
|
# Perl core implementation:
|
||||||
|
my $successes = chown($uid, $gid, @filenames);
|
||||||
|
|
||||||
|
use POSIX;
|
||||||
|
POSIX::lchown($uid, $gid, $filename) or die $!;
|
||||||
|
|
||||||
|
use POSIX::1003::FS 'lchown';
|
||||||
|
my @successes = lchown($uid, $gid, @filenames);
|
||||||
|
|
||||||
|
=item B<mkdir>([FILENAME [MASK]])
|
||||||
|
|
||||||
|
Simple C<CORE::mkdir()>
|
||||||
|
|
||||||
|
=item B<mkfifo>(FILENAME, MODE)
|
||||||
|
|
||||||
|
=item B<mknod>(PATH, MODE, DEVICE)
|
||||||
|
|
||||||
|
Create a special device node on PATH. Useful symbols for MODE can be
|
||||||
|
collected from Fcntl (import tag C<:mode>). The DEVICE number is
|
||||||
|
a combination from the type (I<major> number), a sequence number and
|
||||||
|
usage information (combined in a I<minor> number).
|
||||||
|
|
||||||
|
=item B<rename>(OLDNAME, NEWNAME)
|
||||||
|
|
||||||
|
[0.93] This will use C<CORE::rename()>. Be warned that Window's C<rename>
|
||||||
|
implementation will fail when NEWNAME exists, which is not POSIX compliant.
|
||||||
|
On many platforms, C<rename> between different partitions is not allowed.
|
||||||
|
|
||||||
|
=item B<utime>(ATIME, MTIME, FILENAMES)
|
||||||
|
|
||||||
|
Simply C<CORE::utime()>
|
||||||
|
|
||||||
|
B<Warning,> C<POSIX.pm> uses a different parameter order than core.
|
||||||
|
|
||||||
|
POSIX::utime($filename, $atime, $mtime);
|
||||||
|
CORE::utime($atime, $mtime, @filenames);
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<S_ISBLK>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISCHR>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISDIR>(MODE)
|
||||||
|
|
||||||
|
example:
|
||||||
|
|
||||||
|
use File::stat 'stat';
|
||||||
|
if(S_ISDIR(stat($fn)->mode)) ...
|
||||||
|
|
||||||
|
if(S_ISDIR((lstat $fn)[2])) ...
|
||||||
|
|
||||||
|
=item B<S_ISFIFO>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISLNK>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISREG>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISSOCK>(MODE)
|
||||||
|
|
||||||
|
=item B<S_ISWHT>(MODE)
|
||||||
|
|
||||||
|
=item B<major>(DEVICE)
|
||||||
|
|
||||||
|
=item B<makedev>(MAJOR, MINOR)
|
||||||
|
|
||||||
|
Combine MAJOR and MINOR into a single DEVICE number.
|
||||||
|
|
||||||
|
my $device = (stat $filename)[6];
|
||||||
|
my $device_type = major $device;
|
||||||
|
my $sequence_nr = minor $device;
|
||||||
|
|
||||||
|
my $device = makedev $major, $minor;
|
||||||
|
mknod $specialfile, $mode, $device;
|
||||||
|
|
||||||
|
=item B<minor>(DEVICE)
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
The following constants are exported, shown here with the values
|
||||||
|
discovered during installation of this module:
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_FSYS_START
|
||||||
|
|
||||||
|
F_OK 0 S_IFLNK 40960 S_ISVTX 512
|
||||||
|
FILENAME_MAX 4096 S_IFMT 61440 S_IWGRP 16
|
||||||
|
MAX_CANON 255 S_IFREG 32768 S_IWOTH 2
|
||||||
|
NAME_MAX 255 S_IFSOCK 49152 S_IWUSR 128
|
||||||
|
PATH_MAX 4096 S_IRGRP 32 S_IXGRP 8
|
||||||
|
R_OK 4 S_IROTH 4 S_IXOTH 1
|
||||||
|
S_IFBLK 24576 S_IRUSR 256 S_IXUSR 64
|
||||||
|
S_IFCHR 8192 S_IRWXG 56 W_OK 2
|
||||||
|
S_IFDIR 16384 S_IRWXO 7 X_OK 1
|
||||||
|
S_IFIFO 4096 S_IRWXU 448
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_FSYS_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
All functions and constants which start with C<S_*> can be imported
|
||||||
|
using the C<:stat> tag, including all related C<S_IF*> functions.
|
||||||
|
The C<*_OK> tags can be imported with C<:access> =cut
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
70
extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pm
vendored
Normal file
70
extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pm
vendored
Normal file
|
@ -0,0 +1,70 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::FdIO;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks resp from unistd.h, limits.h, and stdio.h
|
||||||
|
my (@constants, @seek, @mode);
|
||||||
|
my @functions = qw/closefd creatfd dupfd dup2fd openfd pipefd
|
||||||
|
readfd seekfd writefd tellfd/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, seek => \@seek
|
||||||
|
, mode => \@mode
|
||||||
|
, tables => [ qw/%seek %mode/ ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my $fdio;
|
||||||
|
our (%fdio, %seek, %mode);
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
$fdio = fdio_table;
|
||||||
|
push @constants, keys %$fdio;
|
||||||
|
|
||||||
|
# initialize the :seek export tag
|
||||||
|
push @seek, grep /^SEEK_/, keys %$fdio;
|
||||||
|
my %seek_subset;
|
||||||
|
@seek_subset{@seek} = @{$fdio}{@seek};
|
||||||
|
tie %seek, 'POSIX::1003::ReadOnlyTable', \%seek_subset;
|
||||||
|
|
||||||
|
# initialize the :mode export tag
|
||||||
|
push @mode, grep /^O_/, keys %$fdio;
|
||||||
|
my %mode_subset;
|
||||||
|
@mode_subset{@mode} = @{$fdio}{@mode};
|
||||||
|
tie %mode, 'POSIX::1003::ReadOnlyTable', \%mode_subset;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub seekfd($$$) { goto &POSIX::lseek }
|
||||||
|
sub openfd($$;$) { goto &POSIX::open }
|
||||||
|
sub closefd($) { goto &POSIX::close }
|
||||||
|
sub readfd($$;$) { push @_, SSIZE_MAX() if @_==2; goto &POSIX::read }
|
||||||
|
sub writefd($$;$) { push @_, length $_[1] if @_==2; goto &POSIX::write }
|
||||||
|
sub pipefd() { goto &POSIX::pipe }
|
||||||
|
sub dupfd($) { goto &POSIX::dup }
|
||||||
|
sub dup2fd($$) { goto &POSIX::dup2 }
|
||||||
|
sub statfd($) { goto &POSIX::fstat }
|
||||||
|
sub creatfd($$) { openfd $_[0], O_WRONLY()|O_CREAT()|O_TRUNC(), $_[1] }
|
||||||
|
|
||||||
|
|
||||||
|
sub tellfd($) {seekfd $_[0], 0, SEEK_CUR() }
|
||||||
|
sub rewindfd() {seekfd $_[0], 0, SEEK_SET() }
|
||||||
|
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $val = $fdio->{$name};
|
||||||
|
sub() {$val};
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
244
extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pod
vendored
Normal file
244
extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pod
vendored
Normal file
|
@ -0,0 +1,244 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::FdIO - POSIX handling file descriptors
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::FdIO;
|
||||||
|
|
||||||
|
$fd = openfd($fn, O_RDWR);
|
||||||
|
defined $fd or die $!; # $fd==0 is valid value! (STDIN)
|
||||||
|
|
||||||
|
$fd = openfd($fn, O_WRONLY|O_TRUNC);
|
||||||
|
$fd = openfd($fn, O_CREAT|O_WRONLY, 0640);
|
||||||
|
# Permission bit constants in POSIX::1003::FS
|
||||||
|
|
||||||
|
my $buf;
|
||||||
|
$bytes_read = readfd($fd, $buf, BUFSIZ);
|
||||||
|
$bytes_written = writefd($fd, $buf, 5);
|
||||||
|
|
||||||
|
$off_t = seekfd($fd, 0, SEEK_SET); # rewind!
|
||||||
|
$fd2 = dupfd($fd);
|
||||||
|
|
||||||
|
closefd($fd) or die $!;
|
||||||
|
|
||||||
|
my ($r, $w) = pipefd();
|
||||||
|
writefd($w, "hello", 5);
|
||||||
|
readfd($r, $buf, 5);
|
||||||
|
closefd($r) && closefd($w) or die $!;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
Most people believe that the C<sys*> commands in Perl-Core are not
|
||||||
|
capable of doing unbuffered IO. For those people, we have this module.
|
||||||
|
Whether C<sysread()> or L<readfd()|POSIX::1003::FdIO/"Standard POSIX"> is meassurable faster cannot be
|
||||||
|
answered.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Overview
|
||||||
|
|
||||||
|
Perl defaults to use file-handles avoiding file descriptors. For
|
||||||
|
that reason, the C<fread> of POSIX is the C<read> of Perl; that's
|
||||||
|
confusing. The POSIX-in-Core implementation makes you write
|
||||||
|
C<CORE::read()> and C<POSIX::read()> explicitly. However,
|
||||||
|
C<POSIX::read()> is the same as C<CORE::sysread()>!
|
||||||
|
|
||||||
|
For all people who do not trust the C<sys*> commands (and there are
|
||||||
|
many), we provide the implementation of POSIX-in-Core with a less
|
||||||
|
confusing name to avoid accidents.
|
||||||
|
|
||||||
|
POSIX Perl-Core POSIX.pm POSIX::1003::FdIO
|
||||||
|
FH fseek seek
|
||||||
|
FD lseek sysseek lseek seekfd
|
||||||
|
FH fopen open
|
||||||
|
FD open sysopen openfd # sysopen is clumpsy
|
||||||
|
FD fdopen # IO::Handle->new_from_fd
|
||||||
|
FH fclose close
|
||||||
|
FD close close close closefd
|
||||||
|
FH fread read
|
||||||
|
FD read sysread read readfd
|
||||||
|
FH fwrite print
|
||||||
|
FD write syswrite write writefd
|
||||||
|
FH pipe,open # buffered unless $|=0
|
||||||
|
FD pipe pipe pipefd
|
||||||
|
FH stat stat
|
||||||
|
FD fstat fstat statfd
|
||||||
|
FN lstat lstat
|
||||||
|
FH ftell tell
|
||||||
|
FD tellfd # tell on fd not in POSIX
|
||||||
|
FH rewind rewind
|
||||||
|
FD rewindfd # idem
|
||||||
|
FD creat creat creatfd
|
||||||
|
FD dup dupfd
|
||||||
|
|
||||||
|
Works on: FH=file handle, FD=file descriptor, FN=file name
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<closefd>(FD)
|
||||||
|
|
||||||
|
Always check the return code: C<undef> on error, cause in C<$!>.
|
||||||
|
closefd $fd or die $!;
|
||||||
|
|
||||||
|
There is no C<sysclose()> in core, because C<sysopen()> does unbuffered
|
||||||
|
IO via its perl-style file-handle: when you open with C<CORE::sysopen()>,
|
||||||
|
you must close with C<CORE::close()>.
|
||||||
|
|
||||||
|
=item B<creatfd>(FILENAME, MODE)
|
||||||
|
|
||||||
|
Implemented via L<openfd()|POSIX::1003::FdIO/"Standard POSIX">, which is true by definition of POSIX.
|
||||||
|
|
||||||
|
=item B<dup2fd>(FD, NEWFD)
|
||||||
|
|
||||||
|
Copy file-descriptor FD to an explicit NEWFD number. When already
|
||||||
|
in use, the file at NEWFD will be closed first. Returns undef on
|
||||||
|
failure.
|
||||||
|
|
||||||
|
=item B<dupfd>(FD)
|
||||||
|
|
||||||
|
Copy the file-descriptor FD into the lowest-numbered unused descriptor.
|
||||||
|
The new fd is returned, undef on failure.
|
||||||
|
|
||||||
|
=item B<openfd>(FILENAME, FLAGS, MODE)
|
||||||
|
|
||||||
|
Returned is an integer file descriptor (FD). Returns C<undef> on
|
||||||
|
failure (and '0' is a valid FD!)
|
||||||
|
|
||||||
|
FLAGS are composed from the C<O_*> constants defined by this module (import
|
||||||
|
tag C<:mode>) The MODE field combines C<S_I*> constants defined by
|
||||||
|
L<POSIX::1003::FS|POSIX::1003::FS> (import tag C<:stat>).
|
||||||
|
|
||||||
|
=item B<pipefd>()
|
||||||
|
|
||||||
|
Returns the reader and writer file descriptors.
|
||||||
|
my ($r, $w) = pipefd;
|
||||||
|
writefd($w, "hello", 5 );
|
||||||
|
readfd($r, $buf, 5 );
|
||||||
|
|
||||||
|
=item B<readfd>(FD, SCALAR, [LENGTH])
|
||||||
|
|
||||||
|
Read the maximum of LENGTH bytes from FD into the SCALAR. Returned is
|
||||||
|
the actual number of bytes read. The value C<-1> tells you there is
|
||||||
|
an error, reported in C<$!>
|
||||||
|
|
||||||
|
B<Be warned> that a returned value smaller than LENGTH does not mean
|
||||||
|
that the FD has nothing more to offer: the end is reached only when 0
|
||||||
|
(zero) is returned. Therefore, this reading is quite inconvenient.
|
||||||
|
You may want to use POSIX::Util subroutine readfd_all
|
||||||
|
|
||||||
|
=item B<seekfd>(FD, OFFSET, WHENCE)
|
||||||
|
|
||||||
|
The WHENCE is a C<SEEK_*> constant.
|
||||||
|
|
||||||
|
=item B<statfd>(FD)
|
||||||
|
|
||||||
|
Request file administration information about an open file. It returns
|
||||||
|
the same list of values as C<stat> on filenames.
|
||||||
|
|
||||||
|
=item B<writefd>(FD, BYTES, [LENGTH])
|
||||||
|
|
||||||
|
Attempt to write the first LENGTH bytes of STRING to FD. Returned is
|
||||||
|
the number of bytes actually written. You have an error only when C<-1>
|
||||||
|
is returned.
|
||||||
|
|
||||||
|
The number of bytes written can be less than LENGTH without an error
|
||||||
|
condition: you have to call write again with the remaining bytes. This
|
||||||
|
is quite inconvenient. You may want to use POSIX::Util subroutine readfd_all
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
Zillions of Perl programs reimplement these functions. Let's simplify
|
||||||
|
code.
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<rewindfd>(FD)
|
||||||
|
|
||||||
|
Seek to the beginning of the file
|
||||||
|
|
||||||
|
=item B<tellfd>(FD)
|
||||||
|
|
||||||
|
Reports the location in the file. This call does not exist (not in POSIX,
|
||||||
|
nor on other UNIXes), however is a logical counterpart of the C<tell()> on
|
||||||
|
filenames.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
The following constants are exported, shown here with the values
|
||||||
|
discovered during installation of this module.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_FDIO_START
|
||||||
|
|
||||||
|
BUFSIZ 8192
|
||||||
|
EOF -1
|
||||||
|
MAX_INPUT 255
|
||||||
|
O_APPEND 1024
|
||||||
|
O_ASYNC 8192
|
||||||
|
O_CLOEXEC 524288
|
||||||
|
O_CREAT 64
|
||||||
|
O_DIRECT 16384
|
||||||
|
O_DIRECTORY 65536
|
||||||
|
O_DSYNC 4096
|
||||||
|
O_EXCL 128
|
||||||
|
O_FSYNC 1052672
|
||||||
|
O_LARGEFILE 0
|
||||||
|
O_NDELAY 2048
|
||||||
|
O_NOATIME 262144
|
||||||
|
O_NOCTTY 256
|
||||||
|
O_NOFOLLOW 131072
|
||||||
|
O_NONBLOCK 2048
|
||||||
|
O_RDONLY 0
|
||||||
|
O_RDWR 2
|
||||||
|
O_RSYNC 1052672
|
||||||
|
O_SYNC 1052672
|
||||||
|
O_TRUNC 512
|
||||||
|
O_WRONLY 1
|
||||||
|
PIPE_BUF 4096
|
||||||
|
SEEK_CUR 1
|
||||||
|
SEEK_DATA 3
|
||||||
|
SEEK_END 2
|
||||||
|
SEEK_HOLE 4
|
||||||
|
SEEK_SET 0
|
||||||
|
SSIZE_MAX 9223372036854775807
|
||||||
|
STDERR_FILENO 2
|
||||||
|
STDIN_FILENO 0
|
||||||
|
STDOUT_FILENO 1
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_FDIO_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
You can limit the import to the C<SEEK_*> constants by explicitly
|
||||||
|
using the C<:seek> import tag. Use the C<:mode> for all C<O_*>
|
||||||
|
constants, to be used with L<openfd()|POSIX::1003::FdIO/"Standard POSIX">.
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
140
extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pm
vendored
Normal file
140
extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pm
vendored
Normal file
|
@ -0,0 +1,140 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Limit;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
my (@ulimit, @rlimit, @constants, @functions);
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( ulimit => \@ulimit
|
||||||
|
, rlimit => \@rlimit
|
||||||
|
, constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ qw/%ulimit %rlimit/ ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my ($ulimit, $rlimit);
|
||||||
|
our (%ulimit, %rlimit);
|
||||||
|
my ($rlim_saved_max, $rlim_saved_cur, $rlim_infinity);
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :constants export tag
|
||||||
|
my @ufuncs = qw/ulimit ulimit_names/;
|
||||||
|
my @rfuncs = qw/getrlimit setrlimit rlimit_names/;
|
||||||
|
my @rconst = qw/RLIM_SAVED_MAX RLIM_SAVED_CUR RLIM_INFINITY/;
|
||||||
|
|
||||||
|
$ulimit = ulimit_table;
|
||||||
|
@ulimit = (keys %$ulimit, @ufuncs, '%ulimit');
|
||||||
|
tie %ulimit, 'POSIX::1003::ReadOnlyTable', $ulimit;
|
||||||
|
|
||||||
|
$rlimit = rlimit_table;
|
||||||
|
@rlimit = (keys %$rlimit, @rfuncs, @rconst, '%rlimit');
|
||||||
|
tie %rlimit, 'POSIX::1003::ReadOnlyTable', $rlimit;
|
||||||
|
|
||||||
|
push @constants, keys %$ulimit, keys %$rlimit;
|
||||||
|
push @functions, @ufuncs, @rfuncs;
|
||||||
|
|
||||||
|
# Special meaning for
|
||||||
|
$rlim_saved_max = delete $rlimit->{RLIM_SAVED_MAX};
|
||||||
|
$rlim_saved_cur = delete $rlimit->{RLIM_SAVED_CUR};
|
||||||
|
$rlim_infinity = delete $rlimit->{RLIM_INFINITY};
|
||||||
|
}
|
||||||
|
|
||||||
|
sub RLIM_SAVED_MAX { $rlim_saved_max }
|
||||||
|
sub RLIM_SAVED_CUR { $rlim_saved_cur }
|
||||||
|
sub RLIM_INFINITY { $rlim_infinity }
|
||||||
|
|
||||||
|
sub getrlimit($);
|
||||||
|
sub setrlimit($$;$);
|
||||||
|
sub ulimit($;$);
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
if($name =~ m/^RLIMIT_/)
|
||||||
|
{ my ($soft, $hard, $success) = getrlimit $name;
|
||||||
|
$soft //= 'undef';
|
||||||
|
$hard //= 'undef';
|
||||||
|
return "$soft, $hard";
|
||||||
|
}
|
||||||
|
elsif($name =~ m/^UL_GET|^GET_/)
|
||||||
|
{ my $val = ulimit $name;
|
||||||
|
return defined $val ? $val : 'undef';
|
||||||
|
}
|
||||||
|
elsif($name =~ m/^UL_SET|^SET_/)
|
||||||
|
{ return '(setter)';
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ $class->SUPER::exampleValue($name);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub ulimit($;$)
|
||||||
|
{ my $key = shift // return;
|
||||||
|
if(@_)
|
||||||
|
{ $key =~ /^UL_SET|^SET_/
|
||||||
|
or croak "pass the constant name as string ($key)";
|
||||||
|
my $id = $ulimit->{$key} // return;
|
||||||
|
return _ulimit($id, shift);
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ $key =~ /^UL_GET|^GET_/
|
||||||
|
or croak "pass the constant name as string ($key)";
|
||||||
|
my $id = $ulimit->{$key} // return;
|
||||||
|
_ulimit($id, 0);
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
if($name =~ m/^RLIMIT_/)
|
||||||
|
{ my $id = $rlimit->{$name} // return sub() {undef};
|
||||||
|
return sub(;$$) { @_ ? _setrlimit($id, $_[0], $_[1]) : (_getrlimit($id))[0] };
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ my $id = $ulimit->{$name} // return sub() {undef};
|
||||||
|
return $name =~ m/^UL_GET|^GET_/
|
||||||
|
? sub() {_ulimit($id, 0)} : sub($) {_ulimit($id, shift)};
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub getrlimit($)
|
||||||
|
{ my $key = shift // return;
|
||||||
|
$key =~ /^RLIMIT_/
|
||||||
|
or croak "pass the constant name as string ($key)";
|
||||||
|
|
||||||
|
my $id = $rlimit->{$key};
|
||||||
|
defined $id ? _getrlimit($id) : ();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub setrlimit($$;$)
|
||||||
|
{ my ($key, $cur, $max) = @_;
|
||||||
|
$key =~ /^RLIMIT_/
|
||||||
|
or croak "pass the constant name as string ($key)";
|
||||||
|
|
||||||
|
my $id = $rlimit->{$key};
|
||||||
|
$max //= RLIM_INFINITY;
|
||||||
|
defined $id ? _setrlimit($id, $cur, $max) : ();
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub ulimit_names() { keys %$ulimit }
|
||||||
|
|
||||||
|
|
||||||
|
sub rlimit_names() { keys %$rlimit }
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
171
extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pod
vendored
Normal file
171
extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pod
vendored
Normal file
|
@ -0,0 +1,171 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Limit - POSIX access to ulimit and rlimit
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
# ULIMIT support
|
||||||
|
|
||||||
|
use POSIX::1003::Limit; # load all names
|
||||||
|
|
||||||
|
use POSIX::1003::Limit qw(ulimit);
|
||||||
|
# keys are strings!
|
||||||
|
$size = ulimit('UL_GETFSIZE');
|
||||||
|
|
||||||
|
use POSIX::1003::Limit qw(ulimit UL_GETFSIZE);
|
||||||
|
$size = UL_GETFSIZE; # constants are subs
|
||||||
|
|
||||||
|
use POSIX::1003::Limit '%ulimit';
|
||||||
|
my $key = $ulimit{UL_GETFSIZE};
|
||||||
|
$ulimit{_SC_NEW_KEY} = $key_code;
|
||||||
|
$size = ulimit($key);
|
||||||
|
|
||||||
|
print "$_\n" for keys %ulimit;
|
||||||
|
|
||||||
|
# RLIMIT support
|
||||||
|
|
||||||
|
use POSIX::1003::Limit ':rlimit';
|
||||||
|
|
||||||
|
my ($cur, $max, $success) = getrlimit('RLIMIT_CORE');
|
||||||
|
my ($cur, $max) = getrlimit('RLIMIT_CORE');
|
||||||
|
my $cur = RLIMIT_CORE;
|
||||||
|
|
||||||
|
my $success = setrlimit('RLIMIT_CORE', 1e6, 1e8);
|
||||||
|
setrlimit('RLIMIT_CORE', 1e6) or die;
|
||||||
|
setrlimit('RLIMIT_CORE', RLIM_SAVED_MAX, RLIM_INFINITY);
|
||||||
|
RLIMIT_CORE(1e6, 1e8);
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
This module provides access to the "ulimit" (user limit) and "rlimit"
|
||||||
|
(resource limit) handling. On most systems, C<ulimit()> is succeeded
|
||||||
|
by C<rlimit()> hence provides a very limited set of features.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<getrlimit>(RESOURCE)
|
||||||
|
|
||||||
|
my ($cur, $max, $success) = getrlimit('RLIMIT_CORE');
|
||||||
|
my ($cur, $max) = getrlimit('RLIMIT_CORE');
|
||||||
|
|
||||||
|
=item B<setrlimit>(RESOURCE, CUR, [MAX])
|
||||||
|
|
||||||
|
my $success = setrlimit('RLIMIT_CORE', 1e6, 1e8);
|
||||||
|
|
||||||
|
=item B<ulimit>(NAME)
|
||||||
|
|
||||||
|
Returns the ulimit value related to the NAMEd constant. The NAME
|
||||||
|
must be a string. C<undef> will be returned when the NAME is not
|
||||||
|
known by the system.
|
||||||
|
|
||||||
|
my $filesize = ulimit('UL_GETFSIZE') || SSIZE_MAX;
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<rlimit_names>()
|
||||||
|
|
||||||
|
Returns a list with all known resource names, unsorted.
|
||||||
|
|
||||||
|
=item B<ulimit_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%ulimit>
|
||||||
|
|
||||||
|
This exported variable is a tied HASH which maps C<UL_*> names
|
||||||
|
on unique numbers, to be used with L<ulimit()|POSIX::1003::Limit/"Standard POSIX">.
|
||||||
|
|
||||||
|
=item B<%rlimit>
|
||||||
|
|
||||||
|
This exported variable is a tied HASH which maps C<RLIMIT_*> names
|
||||||
|
on unique numbers, to be used with L<getrlimit()|POSIX::1003::Limit/"Standard POSIX"> and L<setrlimit()|POSIX::1003::Limit/"Standard POSIX">.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned at that time.
|
||||||
|
|
||||||
|
For ulimit, with a value when it is a getter:
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_ULIMIT_START
|
||||||
|
|
||||||
|
UL_GETFSIZE 9223372036854775807
|
||||||
|
UL_GETMAXBRK undef
|
||||||
|
UL_GETOPENMAX 1024
|
||||||
|
UL_SETFSIZE (setter)
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_ULIMIT_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
The constant names for rlimit, with the soft and hard limits that
|
||||||
|
L<getrlimit()|POSIX::1003::Limit/"Standard POSIX"> returned during installation of the module.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_RLIMIT_START
|
||||||
|
|
||||||
|
RLIMIT_AS 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_CORE 0, 18446744073709551615
|
||||||
|
RLIMIT_CPU 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_DATA 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_FSIZE 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_LOCKS 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_MEMLOCK 65536, 65536
|
||||||
|
RLIMIT_MSGQUEUE 819200, 819200
|
||||||
|
RLIMIT_NICE 0, 0
|
||||||
|
RLIMIT_NLIMITS 0, 15
|
||||||
|
RLIMIT_NOFILE 1024, 4096
|
||||||
|
RLIMIT_NPROC 61461, 61461
|
||||||
|
RLIMIT_OFILE 1024, 4096
|
||||||
|
RLIMIT_RSS 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_RTPRIO 0, 0
|
||||||
|
RLIMIT_RTTIME 18446744073709551615, 18446744073709551615
|
||||||
|
RLIMIT_SIGPENDING 61461, 61461
|
||||||
|
RLIMIT_STACK 8388608, 18446744073709551615
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_RLIMIT_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
30
extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pm
vendored
Normal file
30
extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pm
vendored
Normal file
|
@ -0,0 +1,30 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Locale;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks from resp. limits.h and local.h
|
||||||
|
my @constants = qw/
|
||||||
|
MB_LEN_MAX
|
||||||
|
|
||||||
|
LC_ALL LC_COLLATE LC_CTYPE LC_MESSAGES LC_MONETARY LC_NUMERIC
|
||||||
|
LC_TIME
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @functions = qw/localeconv setlocale/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
65
extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pod
vendored
Normal file
65
extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pod
vendored
Normal file
|
@ -0,0 +1,65 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Locale - POSIX handling locale settings
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Locale;
|
||||||
|
|
||||||
|
my $location = setlocale(LC_ALL, 'de'); # German
|
||||||
|
my $info = localeconv(); # is HASH
|
||||||
|
print Dumper $info; # use Data::Dumper to inspect
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
See L<perllocale> for the details.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<localeconv>()
|
||||||
|
|
||||||
|
Get detailed information about the current locale
|
||||||
|
|
||||||
|
my $info = localeconv(); # is HASH
|
||||||
|
print Dumper $info; # use Data::Dumper to inspect
|
||||||
|
|
||||||
|
=item B<setlocale>()
|
||||||
|
|
||||||
|
Locales describe national and language specific facts. With
|
||||||
|
L<setlocale()|POSIX::1003::Locale/"FUNCTIONS"> you change the locale.
|
||||||
|
|
||||||
|
my $location = setlocale(LC_ALL, 'de'); # German
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=head2 Constants from limits.h
|
||||||
|
|
||||||
|
MB_LEN_MAX Max multi-byte length of a char across all locales
|
||||||
|
|
||||||
|
=head2 Constants from locale.h
|
||||||
|
|
||||||
|
LC_ALL LC_COLLATE LC_CTYPE LC_MESSAGES LC_MONETARY LC_NUMERIC
|
||||||
|
LC_TIME
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
85
extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pm
vendored
Normal file
85
extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pm
vendored
Normal file
|
@ -0,0 +1,85 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Math;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Block respectively from float.h, math.h, stdlib.h, limits.h
|
||||||
|
my @constants = qw/
|
||||||
|
DBL_DIG DBL_EPSILON DBL_MANT_DIG DBL_MAX DBL_MAX_10_EXP
|
||||||
|
DBL_MAX_EXP DBL_MIN DBL_MIN_10_EXP DBL_MIN_EXP FLT_DIG FLT_EPSILON
|
||||||
|
FLT_MANT_DIG FLT_MAX FLT_MAX_10_EXP FLT_MAX_EXP FLT_MIN FLT_MIN_10_EXP
|
||||||
|
FLT_MIN_EXP FLT_RADIX FLT_ROUNDS LDBL_DIG LDBL_EPSILON LDBL_MANT_DIG
|
||||||
|
LDBL_MAX LDBL_MAX_10_EXP LDBL_MAX_EXP LDBL_MIN LDBL_MIN_10_EXP
|
||||||
|
LDBL_MIN_EXP
|
||||||
|
|
||||||
|
HUGE_VAL
|
||||||
|
|
||||||
|
RAND_MAX
|
||||||
|
|
||||||
|
CHAR_BIT CHAR_MAX CHAR_MIN UCHAR_MAX SCHAR_MAX SCHAR_MIN
|
||||||
|
SHRT_MAX SHRT_MIN USHRT_MAX
|
||||||
|
INT_MAX INT_MIN UINT_MAX
|
||||||
|
LONG_MAX LONG_MIN ULONG_MAX
|
||||||
|
/;
|
||||||
|
|
||||||
|
# Only from math.h. The first block are defined in POSIX.xs, the
|
||||||
|
# second block present in Core. The last is from string.h
|
||||||
|
our @IN_CORE = qw/abs exp log sqrt sin cos atan2 rand srand int/;
|
||||||
|
|
||||||
|
my @functions = qw/
|
||||||
|
acos asin atan ceil cosh floor fmod frexp
|
||||||
|
ldexp log10 modf sinh tan tanh
|
||||||
|
|
||||||
|
div rint pow
|
||||||
|
strtod strtol strtoul
|
||||||
|
/;
|
||||||
|
push @functions, @IN_CORE;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
# the argument to be optional is important for expression priority!
|
||||||
|
sub acos(_) { goto &POSIX::acos }
|
||||||
|
sub asin(_) { goto &POSIX::asin }
|
||||||
|
sub atan(_) { goto &POSIX::atan }
|
||||||
|
sub ceil(_) { goto &POSIX::ceil }
|
||||||
|
sub cosh(_) { goto &POSIX::cosh }
|
||||||
|
sub floor(_) { goto &POSIX::floor }
|
||||||
|
sub frexp(_) { goto &POSIX::frexp }
|
||||||
|
sub ldexp(_) { goto &POSIX::ldexp }
|
||||||
|
sub log10(_) { goto &POSIX::log10 }
|
||||||
|
sub sinh(_) { goto &POSIX::sinh }
|
||||||
|
sub tan(_) { goto &POSIX::tan }
|
||||||
|
sub tanh(_) { goto &POSIX::tanh }
|
||||||
|
|
||||||
|
sub modf($$) { goto &POSIX::modf }
|
||||||
|
sub fmod($$) { goto &POSIX::fmod }
|
||||||
|
|
||||||
|
# All provided by POSIX.xs
|
||||||
|
|
||||||
|
|
||||||
|
sub div($$) { ( int($_[0]/$_[1]), ($_[0] % $_[1]) ) }
|
||||||
|
|
||||||
|
|
||||||
|
sub rint(;$) { my $v = @_ ? shift : $_; int($v + 0.5) }
|
||||||
|
|
||||||
|
|
||||||
|
sub pow($$) { $_[0] ** $_[1] }
|
||||||
|
|
||||||
|
|
||||||
|
#------------------------------
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
239
extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pod
vendored
Normal file
239
extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pod
vendored
Normal file
|
@ -0,0 +1,239 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Math - POSIX handling time
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Math qw/ceil floor sqrt/;
|
||||||
|
print ceil 3.14;
|
||||||
|
print sqrt floor 4.9;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
B<Be aware> that math in Perl has unclear precission! Be aware that the
|
||||||
|
math library often provides many variations of these functions... it is
|
||||||
|
hard to determine which one is used. Probably, Math::Trig will serve
|
||||||
|
you better. Or PDL for real number crunchers.
|
||||||
|
|
||||||
|
B<Be warned> that these functions do not have an obligatory scalar
|
||||||
|
parameter, but only an optional parameter (defaults to C<$_>). This
|
||||||
|
means that they have the lowest (is list) priority.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX via this module (via POSIX.xs)
|
||||||
|
|
||||||
|
Like the built-in sin, cos, and sqrt, the EXPR defaults to C<$_> and
|
||||||
|
there is a scalar context (missing from POSIX.pm).
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<acos>(EXPR)
|
||||||
|
|
||||||
|
=item B<asin>(EXPR)
|
||||||
|
|
||||||
|
=item B<atan>(EXPR)
|
||||||
|
|
||||||
|
=item B<ceil>(EXPR)
|
||||||
|
|
||||||
|
=item B<cosh>(EXPR)
|
||||||
|
|
||||||
|
=item B<div>(NUMER, DENOM)
|
||||||
|
|
||||||
|
Devide NUMER by DENOminator. The result is a list of two: quotient and
|
||||||
|
remainder. Implemented in Perl for completeness, currently not with the
|
||||||
|
speed of XS.
|
||||||
|
|
||||||
|
my ($quotient, $remainder) = div($number, $denom);
|
||||||
|
|
||||||
|
=item B<floor>(EXPR)
|
||||||
|
|
||||||
|
=item B<fmod>(EXPR, EXPR)
|
||||||
|
|
||||||
|
=item B<frexp>(EXPR)
|
||||||
|
|
||||||
|
=item B<ldexp>(EXPR)
|
||||||
|
|
||||||
|
=item B<log10>(EXPR)
|
||||||
|
|
||||||
|
=item B<modf>(EXPR, EXPR)
|
||||||
|
|
||||||
|
=item B<pow>(EXPR1, EXPR2)
|
||||||
|
|
||||||
|
Returns C<EXPR1 ** EXPR2>
|
||||||
|
|
||||||
|
=item B<rint>(NUMBER)
|
||||||
|
|
||||||
|
Round to the closest integer. Implemented in Perl for completeness.
|
||||||
|
|
||||||
|
=item B<sinh>(EXPR)
|
||||||
|
|
||||||
|
=item B<tan>(EXPR)
|
||||||
|
|
||||||
|
=item B<tanh>(EXPR)
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Standard POSIX, using CORE
|
||||||
|
|
||||||
|
A small set of mathematical functions are available in Perl CORE,
|
||||||
|
without the need to load this module. But if you do import them,
|
||||||
|
it simply gets ignored.
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<abs>([EXPR])
|
||||||
|
|
||||||
|
=item B<atan2>(EXPR, EXPR)
|
||||||
|
|
||||||
|
=item B<cos>([EXPR])
|
||||||
|
|
||||||
|
=item B<exp>([EXPR])
|
||||||
|
|
||||||
|
=item B<log>([EXPR])
|
||||||
|
|
||||||
|
=item B<rand>([EXPR])
|
||||||
|
|
||||||
|
=item B<sin>([EXPR])
|
||||||
|
|
||||||
|
=item B<sqrt>([EXPR])
|
||||||
|
|
||||||
|
=item B<srand>([EXPR])
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Numeric conversions
|
||||||
|
|
||||||
|
All C<strto*>, C<atof>, C<atoi> and friends functions are usually
|
||||||
|
not needed in Perl programs: the integer and float types are at their
|
||||||
|
largest size, so when a string is used in numeric context it will get
|
||||||
|
converted automatically. Still, POSIX.xs does provide a few of those
|
||||||
|
functions, which are sometimes more accurate in number parsing for
|
||||||
|
large numbers.
|
||||||
|
|
||||||
|
All three provided functions treat errors the same way. Truly
|
||||||
|
POSIX-compliant systems set C<$ERRNO> ($!) to indicate a translation
|
||||||
|
error, so clear C<$!> before calling strto*. Non-compliant systems
|
||||||
|
may not check for overflow, and therefore will never set C<$!>.
|
||||||
|
|
||||||
|
To parse a string C<$str> as a floating point number use
|
||||||
|
|
||||||
|
$! = 0;
|
||||||
|
($num, $n_unparsed) = strtod($str);
|
||||||
|
|
||||||
|
if($str eq '' || $n_unparsed != 0 || $!) {
|
||||||
|
die "Non-numeric input $str" . ($! ? ": $!\n" : "\n");
|
||||||
|
}
|
||||||
|
|
||||||
|
# When you do not care about handling errors, you can do
|
||||||
|
$num = strtod($str);
|
||||||
|
$num = $str + 0; # same: Perl auto-converts
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<strtod>(STRING)
|
||||||
|
|
||||||
|
String to double translation. Returns the parsed number and the number
|
||||||
|
of characters in the unparsed portion of the string. When called in a
|
||||||
|
scalar context C<strtod> returns the parsed number.
|
||||||
|
|
||||||
|
=item B<strtol>(STRING, BASE)
|
||||||
|
|
||||||
|
String to integer translation. Returns the parsed number and
|
||||||
|
the number of characters in the unparsed portion of the string.
|
||||||
|
When called in a scalar context C<strtol> returns the parsed number.
|
||||||
|
|
||||||
|
The base should be zero or between 2 and 36, inclusive. When the base
|
||||||
|
is zero or omitted C<strtol> will use the string itself to determine the
|
||||||
|
base: a leading "0x" or "0X" means hexadecimal; a leading "0" means
|
||||||
|
octal; any other leading characters mean decimal. Thus, "1234" is
|
||||||
|
parsed as a decimal number, "01234" as an octal number, and "0x1234"
|
||||||
|
as a hexadecimal number.
|
||||||
|
|
||||||
|
=item B<strtoul>(STRING, BASE)
|
||||||
|
|
||||||
|
String to unsigned integer translation, which behaves like C<strtol>.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
The following constants are exported, shown here with the values
|
||||||
|
discovered during installation of this module:
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_MATH_START
|
||||||
|
|
||||||
|
CHAR_BIT 8
|
||||||
|
CHAR_MAX 127
|
||||||
|
CHAR_MIN -128
|
||||||
|
DBL_DIG 15
|
||||||
|
DBL_EPSILON 2.22044604925031e-16
|
||||||
|
DBL_MANT_DIG 53
|
||||||
|
DBL_MAX 1.79769313486232e+308
|
||||||
|
DBL_MAX_10_EXP 308
|
||||||
|
DBL_MAX_EXP 1024
|
||||||
|
DBL_MIN 2.2250738585072e-308
|
||||||
|
DBL_MIN_10_EXP -307
|
||||||
|
DBL_MIN_EXP -1021
|
||||||
|
FLT_DIG 6
|
||||||
|
FLT_EPSILON 1.19209289550781e-07
|
||||||
|
FLT_MANT_DIG 24
|
||||||
|
FLT_MAX 3.40282346638529e+38
|
||||||
|
FLT_MAX_10_EXP 38
|
||||||
|
FLT_MAX_EXP 128
|
||||||
|
FLT_MIN 1.17549435082229e-38
|
||||||
|
FLT_MIN_10_EXP -37
|
||||||
|
FLT_MIN_EXP -125
|
||||||
|
FLT_RADIX 2
|
||||||
|
FLT_ROUNDS 1
|
||||||
|
HUGE_VAL inf
|
||||||
|
INT_MAX 2147483647
|
||||||
|
INT_MIN -2147483648
|
||||||
|
LDBL_DIG 18
|
||||||
|
LDBL_EPSILON undef
|
||||||
|
LDBL_MANT_DIG 64
|
||||||
|
LDBL_MAX undef
|
||||||
|
LDBL_MAX_10_EXP 4932
|
||||||
|
LDBL_MAX_EXP 16384
|
||||||
|
LDBL_MIN undef
|
||||||
|
LDBL_MIN_10_EXP -4931
|
||||||
|
LDBL_MIN_EXP -16381
|
||||||
|
LONG_MAX 9223372036854775807
|
||||||
|
LONG_MIN -9223372036854775808
|
||||||
|
RAND_MAX 2147483647
|
||||||
|
SCHAR_MAX 127
|
||||||
|
SCHAR_MIN -128
|
||||||
|
SHRT_MAX 32767
|
||||||
|
SHRT_MIN -32768
|
||||||
|
UCHAR_MAX 255
|
||||||
|
UINT_MAX 4294967295
|
||||||
|
ULONG_MAX 18446744073709551615
|
||||||
|
USHRT_MAX 65535
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_MATH_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
148
extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pm
vendored
Normal file
148
extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pm
vendored
Normal file
|
@ -0,0 +1,148 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
|
package POSIX::1003::Module;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
|
||||||
|
our $VERSION = '0.93';
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
{ use XSLoader;
|
||||||
|
no warnings 'redefine';
|
||||||
|
XSLoader::load 'POSIX';
|
||||||
|
XSLoader::load 'POSIX::1003', $VERSION;
|
||||||
|
}
|
||||||
|
|
||||||
|
my $in_constant_table;
|
||||||
|
BEGIN { $in_constant_table = qr/
|
||||||
|
^_CS_ # confstr
|
||||||
|
| ^GET_ # rlimit
|
||||||
|
| ^O_ # fdio
|
||||||
|
| ^_PC_ # pathconf
|
||||||
|
| ^POLL # poll
|
||||||
|
| ^_POSIX # property
|
||||||
|
| ^RLIM # rlimit
|
||||||
|
| ^_SC_ # sysconf
|
||||||
|
| ^S_ # stat
|
||||||
|
| ^SEEK_ # fdio
|
||||||
|
| ^SET_ # rlimit aix
|
||||||
|
| ^SIG[^_] # signals
|
||||||
|
| ^UL_ # ulimit
|
||||||
|
| _OK$ # access
|
||||||
|
/x
|
||||||
|
};
|
||||||
|
|
||||||
|
|
||||||
|
sub import(@)
|
||||||
|
{ my $class = shift;
|
||||||
|
return if $class eq __PACKAGE__;
|
||||||
|
|
||||||
|
no strict 'refs';
|
||||||
|
no warnings 'once';
|
||||||
|
|
||||||
|
my $tags = \%{"${class}::EXPORT_TAGS"} or die;
|
||||||
|
|
||||||
|
# A hash-lookup is faster than an array lookup, so %EXPORT_OK
|
||||||
|
%{"${class}::EXPORT_OK"} = ();
|
||||||
|
my $ok = \%{"${class}::EXPORT_OK"};
|
||||||
|
unless(keys %$ok)
|
||||||
|
{ @{$ok}{@{$tags->{$_}}} = () for keys %$tags;
|
||||||
|
}
|
||||||
|
|
||||||
|
my $level = @_ && $_[0] =~ m/^\+(\d+)$/ ? shift : 0;
|
||||||
|
return if @_==1 && $_[0] eq ':none';
|
||||||
|
@_ = ':all' if !@_;
|
||||||
|
|
||||||
|
my %take;
|
||||||
|
foreach (@_)
|
||||||
|
{ if( $_ eq ':all')
|
||||||
|
{ @take{keys %$ok} = ();
|
||||||
|
}
|
||||||
|
elsif( m/^:(.*)/ )
|
||||||
|
{ my $tag = $tags->{$1} or croak "$class does not export $_";
|
||||||
|
@take{@$tag} = ();
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ $_ =~ $in_constant_table or exists $ok->{$_}
|
||||||
|
or croak "$class does not export $_";
|
||||||
|
undef $take{$_};
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
my $in_core = \@{$class.'::IN_CORE'} || [];
|
||||||
|
|
||||||
|
my $pkg = (caller $level)[0];
|
||||||
|
foreach my $f (sort keys %take)
|
||||||
|
{ my $export;
|
||||||
|
if(exists ${$class.'::'}{$f} && ($export = *{"${class}::$f"}{CODE}))
|
||||||
|
{ # reuse the already created function; might also be a function
|
||||||
|
# which is actually implemented in the $class namespace.
|
||||||
|
}
|
||||||
|
elsif($f =~ $in_constant_table)
|
||||||
|
{ *{$class.'::'.$f} = $export = $class->_create_constant($f);
|
||||||
|
}
|
||||||
|
elsif( $f !~ m/[^A-Z0-9_]/ ) # faster than: $f =~ m!^[A-Z0-9_]+$!
|
||||||
|
{ # other all-caps names are always from POSIX.xs
|
||||||
|
if(exists $POSIX::{$f} && defined *{"POSIX::$f"}{CODE})
|
||||||
|
{ # POSIX.xs croaks on undefined constants, we will return undef
|
||||||
|
my $const = eval "POSIX::$f()";
|
||||||
|
*{$class.'::'.$f} = $export
|
||||||
|
= defined $const ? sub() {$const} : sub() {undef};
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ # ignore the missing value
|
||||||
|
# warn "missing constant in POSIX.pm $f" && next;
|
||||||
|
*{$class.'::'.$f} = $export = sub() {undef};
|
||||||
|
}
|
||||||
|
}
|
||||||
|
elsif(exists $POSIX::{$f} && defined *{"POSIX::$f"}{CODE})
|
||||||
|
{ # normal functions implemented in POSIX.xs
|
||||||
|
*{"${class}::$f"} = $export = *{"POSIX::$f"}{CODE};
|
||||||
|
}
|
||||||
|
elsif($f =~ s/^%//)
|
||||||
|
{ $export = \%{"${class}::$f"};
|
||||||
|
}
|
||||||
|
elsif($in_core && grep {$f eq $_} @$in_core)
|
||||||
|
{ # function is in core, simply ignore the export
|
||||||
|
next;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{ croak "unable to load $f";
|
||||||
|
}
|
||||||
|
|
||||||
|
no warnings 'once';
|
||||||
|
*{"${pkg}::$f"} = $export;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($pkg, $name) = @_;
|
||||||
|
no strict 'refs';
|
||||||
|
|
||||||
|
my $tags = \%{"$pkg\::EXPORT_TAGS"} or die;
|
||||||
|
my $constants = $tags->{constants} || [];
|
||||||
|
grep {$_ eq $name} @$constants
|
||||||
|
or return undef;
|
||||||
|
|
||||||
|
my $val = &{"$pkg\::$name"};
|
||||||
|
defined $val ? $val : 'undef';
|
||||||
|
}
|
||||||
|
|
||||||
|
package POSIX::1003::ReadOnlyTable;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
sub TIEHASH($) { bless $_[1], $_[0] }
|
||||||
|
sub FETCH($) { $_[0]->{$_[1]} }
|
||||||
|
sub EXISTS($) { exists $_[0]->{$_[1]} }
|
||||||
|
sub FIRSTKEY() { scalar %{$_[0]}; scalar each %{$_[0]} }
|
||||||
|
sub NEXTKEY() { scalar each %{$_[0]} }
|
||||||
|
|
||||||
|
1;
|
62
extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pod
vendored
Normal file
62
extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pod
vendored
Normal file
|
@ -0,0 +1,62 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Module - Base of POSIX::1003 components
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
# use the specific extensions
|
||||||
|
# and see POSIX::Overview and POSIX::1003
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
The POSIX functions and constants are provided via extensions of this
|
||||||
|
module. This module itself only facilitates those implementations.
|
||||||
|
|
||||||
|
=head1 METHODS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item POSIX::1003::Module-E<gt>B<exampleValue>(NAME)
|
||||||
|
|
||||||
|
Returns an example value for the NAMEd variable. Often, this is a
|
||||||
|
compile-time or runtime constant. For some extensions, like C<::Pathconf>,
|
||||||
|
that may not be the case.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<import>()
|
||||||
|
|
||||||
|
All modules provide a C<:constants> and a C<:functions> tag, sometimes
|
||||||
|
more. The default is C<:all>, which means: everthing. You may also
|
||||||
|
specify C<:none> (of course: nothing).
|
||||||
|
|
||||||
|
When the import list is preceeded by C<+1>, the symbols will get published
|
||||||
|
into the namespace of your caller namespace, not your own namespace.
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf;
|
||||||
|
use POSIX::1003::Pathconf ':all'; # same
|
||||||
|
use POSIX::1003 ':pc'; # same, for the lazy
|
||||||
|
use POSIX::1003 ':pathconf'; # same, less lazy
|
||||||
|
|
||||||
|
sub MyModule::import(@) # your own tricky exporter
|
||||||
|
{ POSIX::1003::Pathconf->import('+1', @_);
|
||||||
|
}
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
28
extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pm
vendored
Normal file
28
extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pm
vendored
Normal file
|
@ -0,0 +1,28 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::OS;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks resp from limits.h
|
||||||
|
my @constants = qw/
|
||||||
|
ARG_MAX NGROUPS_MAX OPEN_MAX TMP_MAX
|
||||||
|
/;
|
||||||
|
|
||||||
|
# Blocks resp from sys/utsname.h
|
||||||
|
my @functions = qw/uname/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
62
extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pod
vendored
Normal file
62
extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pod
vendored
Normal file
|
@ -0,0 +1,62 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::OS - POSIX for the file-system
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::OS qw(uname TMP_MAX);
|
||||||
|
my ($sys, $node, $rel, $version, $machine) = uname();
|
||||||
|
print TMP_MAX;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
You may also need L<POSIX::1003::Pathconf|POSIX::1003::Pathconf>.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<uname>()
|
||||||
|
|
||||||
|
Get the name of current operating system.
|
||||||
|
|
||||||
|
my ($sysname, $node, $release, $version, $machine) = uname();
|
||||||
|
|
||||||
|
Note that the actual meanings of the various fields are not
|
||||||
|
that well standardized: do not expect any great portability.
|
||||||
|
The C<$sysname> might be the name of the operating system, the
|
||||||
|
C<$nodename> might be the name of the host, the C<$release> might be
|
||||||
|
the (major) release number of the operating system, the
|
||||||
|
C<$version> might be the (minor) release number of the operating
|
||||||
|
system, and C<$machine> might be a hardware identifier.
|
||||||
|
Maybe.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=head2 Constants from limits.h
|
||||||
|
|
||||||
|
ARG_MAX Max bytes of args + env for exec
|
||||||
|
NGROUPS_MAX
|
||||||
|
OPEN_MAX Max # files that one process can have open
|
||||||
|
TMP_MAX Min # of unique filenames generated by tmpnam
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
76
extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pm
vendored
Normal file
76
extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pm
vendored
Normal file
|
@ -0,0 +1,76 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Pathconf;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
my @constants;
|
||||||
|
my @functions = qw/pathconf fpathconf pathconf_names/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ '%pathconf' ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my $pathconf;
|
||||||
|
our %pathconf;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :constants export tag
|
||||||
|
$pathconf = pathconf_table;
|
||||||
|
push @constants, keys %$pathconf;
|
||||||
|
tie %pathconf, 'POSIX::1003::ReadOnlyTable', $pathconf;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub pathconf($$);
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
$name =~ m/^_PC_/ or return;
|
||||||
|
my $val = pathconf __FILE__, $name;
|
||||||
|
defined $val ? $val : 'undef';
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub fpathconf($$)
|
||||||
|
{ my ($fd, $key) = @_;
|
||||||
|
$key =~ /^_PC_/
|
||||||
|
or croak "pass the constant name as string";
|
||||||
|
my $id = $pathconf{$key} // return;
|
||||||
|
my $v = POSIX::fpathconf($fd, $id);
|
||||||
|
defined $v && $v eq '0 but true' ? 0 : $v;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub pathconf($$)
|
||||||
|
{ my ($fn, $key) = @_;
|
||||||
|
$key =~ /^_PC_/
|
||||||
|
or croak "pass the constant name as string";
|
||||||
|
my $id = $pathconf{$key} // return;
|
||||||
|
my $v = POSIX::pathconf($fn, $id);
|
||||||
|
defined $v ? $v+0 : undef; # remove 'but true' from '0'
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $id = $pathconf->{$name} // return sub($) {undef};
|
||||||
|
sub($) { my $f = shift;
|
||||||
|
$f =~ m/\D/
|
||||||
|
? POSIX::pathconf($f, $id)
|
||||||
|
: POSIX::fpathconf($f, $id)
|
||||||
|
};
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub pathconf_names() { keys %$pathconf }
|
||||||
|
|
116
extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pod
vendored
Normal file
116
extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pod
vendored
Normal file
|
@ -0,0 +1,116 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Pathconf - POSIX access to pathconf()
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf; # import all
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf 'pathconf';
|
||||||
|
my $max = pathconf($filename, '_PC_PATH_MAX');
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf '_PC_PATH_MAX';
|
||||||
|
my $max = _PC_PATH_MAX($filename);
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf qw(pathconf %pathconf);
|
||||||
|
my $key = $pathconf{_PC_PATH_MAX};
|
||||||
|
$pathconf{_PC_NEW_KEY} = $value
|
||||||
|
foreach my $name (keys %pathconf) ...
|
||||||
|
|
||||||
|
use POSIX::1003::Pathconf qw(fpathconf);
|
||||||
|
use POSIX::1003::FdIO qw(openfd);
|
||||||
|
use Fcntl qw(O_RDONLY);
|
||||||
|
my $fd = openfd $fn, O_RDONLY;
|
||||||
|
my $max = fpathconf $fd, '_PC_PATH_MAX';
|
||||||
|
my $max = _PC_PATH_MAX($fd);
|
||||||
|
|
||||||
|
foreach my $pc (pathconf_names) ...
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
With C<pathconf()> you query filesystem limits for a certain existing
|
||||||
|
location.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<fpathconf>(FD, NAME)
|
||||||
|
|
||||||
|
Returns the numeric value related to the NAME or C<undef>.
|
||||||
|
|
||||||
|
=item B<pathconf>(FILENAME, NAME)
|
||||||
|
|
||||||
|
Returns the numeric value related to the NAME or C<undef>.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<pathconf_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%pathconf>
|
||||||
|
|
||||||
|
This exported variable is a tied HASH which maps C<_PC_*> names
|
||||||
|
on unique numbers, to be used with the system's C<pathconf()>
|
||||||
|
and C<fpathconf()> functions.
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned for a random file at the time.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_PATHCONF_START
|
||||||
|
|
||||||
|
_PC_2_SYMLINKS 1 _PC_PIPE_BUF 4096
|
||||||
|
_PC_ALLOC_SIZE_MIN 4096 _PC_PRIO_IO undef
|
||||||
|
_PC_ASYNC_IO 1 _PC_REC_INCR_XFER_SIZE undef
|
||||||
|
_PC_CHOWN_RESTRICTED 1 _PC_REC_MAX_XFER_SIZE undef
|
||||||
|
_PC_FILESIZEBITS 64 _PC_REC_MIN_XFER_SIZE 4096
|
||||||
|
_PC_LINK_MAX 65000 _PC_REC_XFER_ALIGN 4096
|
||||||
|
_PC_MAX_CANON 255 _PC_SOCK_MAXBUF undef
|
||||||
|
_PC_MAX_INPUT 255 _PC_SYMLINK_MAX undef
|
||||||
|
_PC_NAME_MAX 255 _PC_SYNC_IO undef
|
||||||
|
_PC_NO_TRUNC 1 _PC_VDISABLE 0
|
||||||
|
_PC_PATH_MAX 4096
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_PATHCONF_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
53
extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pm
vendored
Normal file
53
extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pm
vendored
Normal file
|
@ -0,0 +1,53 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Proc;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks resp. in stdlib.h, limits.h
|
||||||
|
my @constants = qw/EXIT_FAILURE EXIT_SUCCESS CHILD_MAX /;
|
||||||
|
our @IN_CORE = qw/wait waitpid/;
|
||||||
|
|
||||||
|
# Blocks resp. in stdlib.h, sys/wait.h, unistd.h
|
||||||
|
my @functions = qw/
|
||||||
|
abort
|
||||||
|
|
||||||
|
WEXITSTATUS WIFEXITED WIFSIGNALED WIFSTOPPED
|
||||||
|
WNOHANG WSTOPSIG WTERMSIG WUNTRACED
|
||||||
|
|
||||||
|
_exit pause setpgid setsid tcgetpgrp tcsetpgrp
|
||||||
|
ctermid cuserid getcwd nice
|
||||||
|
/;
|
||||||
|
push @functions, @IN_CORE;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
#-------------------------------------
|
||||||
|
|
||||||
|
sub cuserid() {goto &POSIX::cuserid}
|
||||||
|
sub ctermid() {goto &POSIX::ctermid}
|
||||||
|
sub _exit($) {goto &POSIX::_exit}
|
||||||
|
sub pause() {goto &POSIX::pause}
|
||||||
|
sub setpgid($$) {goto &POSIX::setpgid}
|
||||||
|
sub setsid() {goto &POSIX::setsid}
|
||||||
|
sub cgetpgrp($) {goto &POSIX::cgetpgrp}
|
||||||
|
sub tcsetpgrp($$) {goto &POSIX::tcsetpgrp}
|
||||||
|
|
||||||
|
|
||||||
|
sub nice($) {goto &POSIX::nice}
|
||||||
|
|
||||||
|
|
||||||
|
sub times5() {goto &POSIX::times}
|
||||||
|
|
||||||
|
1;
|
154
extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pod
vendored
Normal file
154
extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pod
vendored
Normal file
|
@ -0,0 +1,154 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Proc - POSIX handling processes
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Proc qw/abort setpgid/;
|
||||||
|
|
||||||
|
abort();
|
||||||
|
setpgid($pid, $pgid);
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
Functions which are bound to each separate process.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX functions from stdlib.h
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<abort>()
|
||||||
|
|
||||||
|
Abnormal process exit.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Standard POSIX functions from sys/wait.h
|
||||||
|
|
||||||
|
These functions have captial names because in C they are implemented
|
||||||
|
as macro's (which are capitalized by convension)
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<WEXITSTATUS>($?)
|
||||||
|
|
||||||
|
Returns the normal exit status of the child process. Only meaningful
|
||||||
|
if C<WIFEXITED($?)> is true.
|
||||||
|
|
||||||
|
=item B<WIFEXITED>($?)
|
||||||
|
|
||||||
|
Returns true if the child process exited normally: "exit()" or by
|
||||||
|
falling off the end of "main()".
|
||||||
|
|
||||||
|
=item B<WIFSIGNALED>($?)
|
||||||
|
|
||||||
|
Returns true if the child process terminated because of a signal.
|
||||||
|
|
||||||
|
=item B<WIFSTOPPED>($?)
|
||||||
|
|
||||||
|
Returns true if the child process is currently stopped. Can happen only
|
||||||
|
if you specified the C<WUNTRACED> flag to waitpid().
|
||||||
|
|
||||||
|
=item B<WSTOPSIG>($?)
|
||||||
|
|
||||||
|
Returns the signal the child process was stopped for. Only meaningful
|
||||||
|
if C<WIFSTOPPED($?)> is true.
|
||||||
|
|
||||||
|
=item B<WTERMSIG>($?)
|
||||||
|
|
||||||
|
Returns the signal the child process terminated for. Only meaningful
|
||||||
|
if C<WIFSIGNALED($?)> is true.
|
||||||
|
|
||||||
|
=item B<wait>()
|
||||||
|
|
||||||
|
Simply L<perlfunc/wait>.
|
||||||
|
|
||||||
|
=item B<waitpid>(PID)
|
||||||
|
|
||||||
|
Simply L<perlfunc/waitpid>.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Standard POSIX functions from unistd.h
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<_exit>(CODE)
|
||||||
|
|
||||||
|
Leave the program without calling handlers registered with C<atexit>
|
||||||
|
(which is not available in Perl)
|
||||||
|
|
||||||
|
=item B<ctermid>()
|
||||||
|
|
||||||
|
Generates the path name for the controlling terminal of this process.
|
||||||
|
my $path = ctermid();
|
||||||
|
|
||||||
|
=item B<cuserid>()
|
||||||
|
|
||||||
|
Get the login name of the effective user of the current process.
|
||||||
|
See also C<perldoc -f getlogin>
|
||||||
|
my $name = cuserid();
|
||||||
|
|
||||||
|
=item B<getcwd>()
|
||||||
|
|
||||||
|
Returns the name of the current working directory. See also Cwd.
|
||||||
|
|
||||||
|
=item B<nice>(INTEGER)
|
||||||
|
|
||||||
|
use POSIX::1003::Proc 'nice';
|
||||||
|
$new_prio = nice($increment);
|
||||||
|
|
||||||
|
=item B<pause>()
|
||||||
|
|
||||||
|
=item B<setpgid>(PID, PPID)
|
||||||
|
|
||||||
|
=item B<setsid>()
|
||||||
|
|
||||||
|
=item B<tcgetpgrp>(FD)
|
||||||
|
|
||||||
|
=item B<tcsetpgrp>(FD, PID)
|
||||||
|
|
||||||
|
=item B<times5>()
|
||||||
|
|
||||||
|
The CORE C<times()> function returns four values, conveniently converted
|
||||||
|
into seconds (float). The POSIX C<times()> returns five values in
|
||||||
|
clocktics. To disambique those two, we offer the POSIX function under
|
||||||
|
a slightly different name.
|
||||||
|
|
||||||
|
($user, $sys, $cuser, $csys) = CORE::times();
|
||||||
|
($elapse, $user, $sys, $cuser, $csys) = POSIX::times();
|
||||||
|
($elapse, $user, $sys, $cuser, $csys) = times5();
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=head2 Constants from stdlib.h
|
||||||
|
|
||||||
|
EXIT_FAILURE
|
||||||
|
EXIT_SUCCESS
|
||||||
|
|
||||||
|
=head2 Constants from limits.h
|
||||||
|
|
||||||
|
CHILD_MAX
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
64
extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pm
vendored
Normal file
64
extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pm
vendored
Normal file
|
@ -0,0 +1,64 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Properties;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
my @constants;
|
||||||
|
my @functions = qw/property property_names/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ '%property' ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my $property;
|
||||||
|
our %property;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :constants export tag
|
||||||
|
$property = property_table;
|
||||||
|
push @constants, keys %$property;
|
||||||
|
tie %property, 'POSIX::1003::ReadOnlyTable', $property;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub property($);
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
$name =~ m/^_POSIX/ or return;
|
||||||
|
my $val = property $name;
|
||||||
|
defined $val ? $val : 'undef';
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub property($)
|
||||||
|
{ my $key = shift // return;
|
||||||
|
$key =~ /^_POSIX/
|
||||||
|
or croak "pass the constant name as string";
|
||||||
|
|
||||||
|
$property->{$key};
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $value = $property->{$name};
|
||||||
|
sub() {$value};
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub property_names() { keys %$property }
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
194
extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pod
vendored
Normal file
194
extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pod
vendored
Normal file
|
@ -0,0 +1,194 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Properties - POSIX access to _POSIX_ constants
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Properties; # import all
|
||||||
|
|
||||||
|
use POSIX::1003::Properties 'property';
|
||||||
|
$hasnt = property('_POSIX_NO_TRUNC');
|
||||||
|
|
||||||
|
use POSIX::1003::Properties '_POSIX_NO_TRUNC';
|
||||||
|
$hasnt = _POSIX_NO_TRUNC;
|
||||||
|
|
||||||
|
use POSIX::1003::Properties '%property';
|
||||||
|
my $key = $property{_POSIX_NO_TRUNC};
|
||||||
|
$property{_POSIX_NEW} = $value;
|
||||||
|
|
||||||
|
foreach my $prop (property_names) ...
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
When you compile C/C++ programs, the header files provide you with
|
||||||
|
a long list of C<_POSIX> constants. This module pass these values
|
||||||
|
on to Perl.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
There is no system call to retrieve these values: they are defined
|
||||||
|
in the C sources only.
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<property>(NAME)
|
||||||
|
|
||||||
|
Returns the property value related to NAME.
|
||||||
|
|
||||||
|
=item B<property_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%property>
|
||||||
|
|
||||||
|
This exported variable is a tie HASH which contains the
|
||||||
|
values related to the system property names.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned at that time.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_PROPERTY_START
|
||||||
|
|
||||||
|
_POSIX2_C_BIND 200809
|
||||||
|
_POSIX2_C_DEV 200809
|
||||||
|
_POSIX2_CHAR_TERM 200809
|
||||||
|
_POSIX2_LOCALEDEF 200809
|
||||||
|
_POSIX2_SW_DEV 200809
|
||||||
|
_POSIX2_VERSION 200809
|
||||||
|
_POSIX_ADVISORY_INFO 200809
|
||||||
|
_POSIX_AIO_LISTIO_MAX 2
|
||||||
|
_POSIX_AIO_MAX 1
|
||||||
|
_POSIX_ARG_MAX 4096
|
||||||
|
_POSIX_ASYNC_IO 1
|
||||||
|
_POSIX_ASYNCHRONOUS_IO 200809
|
||||||
|
_POSIX_BARRIERS 200809
|
||||||
|
_POSIX_C_SOURCE 200809
|
||||||
|
_POSIX_CHILD_MAX 25
|
||||||
|
_POSIX_CHOWN_RESTRICTED 0
|
||||||
|
_POSIX_CLOCK_SELECTION 200809
|
||||||
|
_POSIX_CLOCKRES_MIN 20000000
|
||||||
|
_POSIX_CPUTIME 0
|
||||||
|
_POSIX_DELAYTIMER_MAX 32
|
||||||
|
_POSIX_FD_SETSIZE 20
|
||||||
|
_POSIX_FSYNC 200809
|
||||||
|
_POSIX_HIWAT 512
|
||||||
|
_POSIX_HOST_NAME_MAX 255
|
||||||
|
_POSIX_IPV6 200809
|
||||||
|
_POSIX_JOB_CONTROL 1
|
||||||
|
_POSIX_LINK_MAX 8
|
||||||
|
_POSIX_LOGIN_NAME_MAX 9
|
||||||
|
_POSIX_MAPPED_FILES 200809
|
||||||
|
_POSIX_MAX_CANON 255
|
||||||
|
_POSIX_MAX_INPUT 255
|
||||||
|
_POSIX_MEMLOCK 200809
|
||||||
|
_POSIX_MEMLOCK_RANGE 200809
|
||||||
|
_POSIX_MEMORY_PROTECTION 200809
|
||||||
|
_POSIX_MESSAGE_PASSING 200809
|
||||||
|
_POSIX_MONOTONIC_CLOCK 0
|
||||||
|
_POSIX_MQ_OPEN_MAX 8
|
||||||
|
_POSIX_MQ_PRIO_MAX 32
|
||||||
|
_POSIX_NAME_MAX 14
|
||||||
|
_POSIX_NGROUPS_MAX 8
|
||||||
|
_POSIX_NO_TRUNC 1
|
||||||
|
_POSIX_OPEN_MAX 20
|
||||||
|
_POSIX_PATH_MAX 256
|
||||||
|
_POSIX_PIPE_BUF 512
|
||||||
|
_POSIX_PRIORITIZED_IO 200809
|
||||||
|
_POSIX_PRIORITY_SCHEDULING 200809
|
||||||
|
_POSIX_QLIMIT 1
|
||||||
|
_POSIX_RAW_SOCKETS 200809
|
||||||
|
_POSIX_RE_DUP_MAX 255
|
||||||
|
_POSIX_READER_WRITER_LOCKS 200809
|
||||||
|
_POSIX_REALTIME_SIGNALS 200809
|
||||||
|
_POSIX_REENTRANT_FUNCTIONS 1
|
||||||
|
_POSIX_REGEXP 1
|
||||||
|
_POSIX_RTSIG_MAX 8
|
||||||
|
_POSIX_SAVED_IDS 1
|
||||||
|
_POSIX_SEM_NSEMS_MAX 256
|
||||||
|
_POSIX_SEM_VALUE_MAX 32767
|
||||||
|
_POSIX_SEMAPHORES 200809
|
||||||
|
_POSIX_SHARED_MEMORY_OBJECTS 200809
|
||||||
|
_POSIX_SHELL 1
|
||||||
|
_POSIX_SIGQUEUE_MAX 32
|
||||||
|
_POSIX_SOURCE 1
|
||||||
|
_POSIX_SPAWN 200809
|
||||||
|
_POSIX_SPIN_LOCKS 200809
|
||||||
|
_POSIX_SPORADIC_SERVER -1
|
||||||
|
_POSIX_SSIZE_MAX 32767
|
||||||
|
_POSIX_STREAM_MAX 8
|
||||||
|
_POSIX_SYMLINK_MAX 255
|
||||||
|
_POSIX_SYMLOOP_MAX 8
|
||||||
|
_POSIX_SYNCHRONIZED_IO 200809
|
||||||
|
_POSIX_THREAD_ATTR_STACKADDR 200809
|
||||||
|
_POSIX_THREAD_ATTR_STACKSIZE 200809
|
||||||
|
_POSIX_THREAD_CPUTIME 0
|
||||||
|
_POSIX_THREAD_DESTRUCTOR_ITERATIONS 4
|
||||||
|
_POSIX_THREAD_KEYS_MAX 128
|
||||||
|
_POSIX_THREAD_PRIO_INHERIT 200809
|
||||||
|
_POSIX_THREAD_PRIO_PROTECT 200809
|
||||||
|
_POSIX_THREAD_PRIORITY_SCHEDULING 200809
|
||||||
|
_POSIX_THREAD_PROCESS_SHARED 200809
|
||||||
|
_POSIX_THREAD_ROBUST_PRIO_INHERIT 200809
|
||||||
|
_POSIX_THREAD_ROBUST_PRIO_PROTECT -1
|
||||||
|
_POSIX_THREAD_SAFE_FUNCTIONS 200809
|
||||||
|
_POSIX_THREAD_SPORADIC_SERVER -1
|
||||||
|
_POSIX_THREAD_THREADS_MAX 64
|
||||||
|
_POSIX_THREADS 200809
|
||||||
|
_POSIX_TIMEOUTS 200809
|
||||||
|
_POSIX_TIMER_MAX 32
|
||||||
|
_POSIX_TIMERS 200809
|
||||||
|
_POSIX_TRACE -1
|
||||||
|
_POSIX_TRACE_EVENT_FILTER -1
|
||||||
|
_POSIX_TRACE_INHERIT -1
|
||||||
|
_POSIX_TRACE_LOG -1
|
||||||
|
_POSIX_TTY_NAME_MAX 9
|
||||||
|
_POSIX_TYPED_MEMORY_OBJECTS -1
|
||||||
|
_POSIX_TZNAME_MAX 6
|
||||||
|
_POSIX_UIO_MAXIOV 16
|
||||||
|
_POSIX_V6_LP64_OFF64 1
|
||||||
|
_POSIX_V6_LPBIG_OFFBIG -1
|
||||||
|
_POSIX_V7_LP64_OFF64 1
|
||||||
|
_POSIX_V7_LPBIG_OFFBIG -1
|
||||||
|
_POSIX_VDISABLE 0
|
||||||
|
_POSIX_VERSION 200809
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_PROPERTY_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
80
extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pm
vendored
Normal file
80
extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pm
vendored
Normal file
|
@ -0,0 +1,80 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Signals;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
my @signals;
|
||||||
|
my @states = qw/
|
||||||
|
SIG_BLOCK SIG_DFL SIG_ERR
|
||||||
|
SIG_IGN SIG_SETMASK SIG_UNBLOCK
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @actions = qw/
|
||||||
|
SA_NOCLDSTOP SA_NOCLDWAIT SA_NODEFER SA_ONSTACK SA_RESETHAND SA_RESTART
|
||||||
|
SA_SIGINFO
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @functions = qw/
|
||||||
|
raise sigaction signal sigpending sigprocmask sigsuspend signal
|
||||||
|
signal_names strsignal
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @constants = (@signals, @states, @actions);
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( signals => \@signals
|
||||||
|
, actions => \@actions
|
||||||
|
, status => \@states
|
||||||
|
, constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ '%signals' ]
|
||||||
|
);
|
||||||
|
|
||||||
|
our @IN_CORE = qw/kill/;
|
||||||
|
|
||||||
|
my $signals;
|
||||||
|
our %signals;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :signals export tag
|
||||||
|
$signals = signals_table;
|
||||||
|
push @constants, keys %$signals;
|
||||||
|
push @signals, keys %$signals;
|
||||||
|
tie %signals, 'POSIX::1003::ReadOnlyTable', $signals;
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
# Perl does not support pthreads, so:
|
||||||
|
sub raise($) { CORE::kill $_[0], $$ }
|
||||||
|
|
||||||
|
|
||||||
|
sub sigaction($$;$) {goto &POSIX::sigaction }
|
||||||
|
sub sigpending($) {goto &POSIX::sigpending }
|
||||||
|
sub sigprocmask($$;$) {goto &POSIX::sigprocmask }
|
||||||
|
sub sigsuspend($) {goto &POSIX::sigsuspend }
|
||||||
|
sub signal($$) { $SIG{$_[0]} = $_[1] }
|
||||||
|
|
||||||
|
sub strsignal($) { _strsignal($_[0]) || "Unknown signal $_[0]" }
|
||||||
|
|
||||||
|
#--------------------------
|
||||||
|
|
||||||
|
sub signal_names() { keys %$signals }
|
||||||
|
|
||||||
|
#--------------------------
|
||||||
|
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $val = $signals->{$name};
|
||||||
|
sub() {$val};
|
||||||
|
}
|
||||||
|
|
||||||
|
1;
|
196
extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pod
vendored
Normal file
196
extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pod
vendored
Normal file
|
@ -0,0 +1,196 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Signals - POSIX using signals
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Signals qw(:functions SIGPOLL SIGHUP);
|
||||||
|
sigaction($signal, $action, $oldaction);
|
||||||
|
sigpending($sigset);
|
||||||
|
sigprocmask($how, $sigset, $oldsigset)
|
||||||
|
sigsuspend($signal_mask);
|
||||||
|
|
||||||
|
kill SIGPOLL//SIGHUP, $$;
|
||||||
|
|
||||||
|
use POSIX::1003::Signals '%signals';
|
||||||
|
my $number = $signals{SIGHUP};
|
||||||
|
$signals{SIGNEW} = $number;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
This manual page explains the access to the POSIX C<sigaction>
|
||||||
|
functions and its relatives. This module uses two helper objects:
|
||||||
|
L<POSIX::SigSet|POSIX::SigSet> and L<POSIX::SigAction|POSIX::SigAction>.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
These functions are implemened in POSIX.xs
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<kill>(SIGNAL, PROCESS)
|
||||||
|
|
||||||
|
Simply L<perlfunc/kill>.
|
||||||
|
|
||||||
|
B<Be warned> the order of parameters is reversed in the C<kill>
|
||||||
|
exported by POSIX!
|
||||||
|
|
||||||
|
CORE::kill($signal, $pid);
|
||||||
|
::Signals::kill($signal, $pid);
|
||||||
|
POSIX::kill($pid, $signal);
|
||||||
|
|
||||||
|
=item B<raise>(SIGNAL)
|
||||||
|
|
||||||
|
Send a signal to the executing process.
|
||||||
|
|
||||||
|
=item B<sigaction>(SIGNAL, ACTION, [OLDACTION])
|
||||||
|
|
||||||
|
Detailed signal management. The C<signal> must be a number (like SIGHUP),
|
||||||
|
not a string (like "SIGHUP"). The C<action> and C<oldaction> arguments
|
||||||
|
are C<POSIX::SigAction> objects. Returns C<undef> on failure.
|
||||||
|
|
||||||
|
If you use the C<SA_SIGINFO flag>, the signal handler will in addition to
|
||||||
|
the first argument (the signal name) also receive a second argument: a
|
||||||
|
hash reference, inside which are the following keys with the following
|
||||||
|
semantics, as defined by POSIX/SUSv3:
|
||||||
|
|
||||||
|
signo the signal number
|
||||||
|
errno the error number
|
||||||
|
code if this is zero or less, the signal was sent by
|
||||||
|
a user process and the uid and pid make sense,
|
||||||
|
otherwise the signal was sent by the kernel
|
||||||
|
|
||||||
|
The following are also defined by POSIX/SUSv3, but unfortunately
|
||||||
|
not very widely implemented:
|
||||||
|
|
||||||
|
pid the process id generating the signal
|
||||||
|
uid the uid of the process id generating the signal
|
||||||
|
status exit value or signal for SIGCHLD
|
||||||
|
band band event for SIGPOLL
|
||||||
|
|
||||||
|
A third argument is also passed to the handler, which contains a copy
|
||||||
|
of the raw binary contents of the siginfo structure: if a system has
|
||||||
|
some non-POSIX fields, this third argument is where to unpack() them
|
||||||
|
from.
|
||||||
|
|
||||||
|
Note that not all siginfo values make sense simultaneously (some are
|
||||||
|
valid only for certain signals, for example), and not all values make
|
||||||
|
sense from Perl perspective.
|
||||||
|
|
||||||
|
=item B<signal>(SIGNAL, (CODE|'IGNORE'|'DEFAULT'))
|
||||||
|
|
||||||
|
Set the CODE (subroutine reference) to be called when the SIGNAL appears.
|
||||||
|
See L<perlvar/%SIG>.
|
||||||
|
|
||||||
|
signal(SIGINT, \&handler);
|
||||||
|
$SIG{SIGINT} = \&handler; # same
|
||||||
|
|
||||||
|
=item B<sigpending>(SIGSET)
|
||||||
|
|
||||||
|
Examine signals that are blocked and pending. This uses C<POSIX::SigSet>
|
||||||
|
objects for the C<sigset> argument. Returns C<undef> on failure.
|
||||||
|
|
||||||
|
=item B<sigprocmask>(HOW, SIGSET, [OLDSIGSET])
|
||||||
|
|
||||||
|
Change and/or examine calling process's signal mask. This uses
|
||||||
|
C<POSIX::SigSet> objects for the C<sigset> and C<oldsigset> arguments.
|
||||||
|
Returns C<undef> on failure.
|
||||||
|
|
||||||
|
Note that you can't reliably block or unblock a signal from its own signal
|
||||||
|
handler if you're using safe signals. Other signals can be blocked or
|
||||||
|
unblocked reliably.
|
||||||
|
|
||||||
|
=item B<sigsuspend>(SIGSET)
|
||||||
|
|
||||||
|
Install a signal mask and suspend process until signal arrives.
|
||||||
|
This uses C<POSIX::SigSet> objects for the C<signal_mask> argument.
|
||||||
|
Returns C<undef> on failure.
|
||||||
|
|
||||||
|
=item B<strsignal>(SIGNAL)
|
||||||
|
|
||||||
|
Returns a string reprentation of the SIGNAL. When the SIGNAL is unknown,
|
||||||
|
a standard string is returned (never undef)
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<signal_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%signals>
|
||||||
|
|
||||||
|
This exported variable is a (tied) HASH which maps C<SIG*> names
|
||||||
|
to their numbers.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
The following constants are exported, shown here with the values
|
||||||
|
discovered during installation of this module:
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_SIGNALS_START
|
||||||
|
|
||||||
|
SA_NOCLDSTOP 1 SIGKILL 9
|
||||||
|
SA_NOCLDWAIT 2 SIGPIPE 13
|
||||||
|
SA_NODEFER 1073741824 SIGPOLL 29
|
||||||
|
SA_ONSTACK 134217728 SIGPROF 27
|
||||||
|
SA_RESETHAND 2147483648 SIGPWR 30
|
||||||
|
SA_RESTART 268435456 SIGQUIT 3
|
||||||
|
SA_SIGINFO 4 SIGRTMAX 64
|
||||||
|
SIG_BLOCK 0 SIGRTMIN 34
|
||||||
|
SIG_DFL 0 SIGSEGV 11
|
||||||
|
SIG_ERR -1 SIGSTKFLT 16
|
||||||
|
SIG_IGN 1 SIGSTOP 19
|
||||||
|
SIG_SETMASK 2 SIGSYS 31
|
||||||
|
SIG_UNBLOCK 1 SIGTERM 15
|
||||||
|
SIGABRT 6 SIGTRAP 5
|
||||||
|
SIGALRM 14 SIGTSTP 20
|
||||||
|
SIGBUS 7 SIGTTIN 21
|
||||||
|
SIGCHLD 17 SIGTTOU 22
|
||||||
|
SIGCLD 17 SIGURG 23
|
||||||
|
SIGCONT 18 SIGUSR1 10
|
||||||
|
SIGFPE 8 SIGUSR2 12
|
||||||
|
SIGHUP 1 SIGVTALRM 26
|
||||||
|
SIGILL 4 SIGWINCH 28
|
||||||
|
SIGINT 2 SIGXCPU 24
|
||||||
|
SIGIO 29 SIGXFSZ 25
|
||||||
|
SIGIOT 6
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_SIGNALS_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
876
extern/lib/perl5/x86_64-linux/POSIX/1003/Symbols.pm
vendored
Normal file
876
extern/lib/perl5/x86_64-linux/POSIX/1003/Symbols.pm
vendored
Normal file
|
@ -0,0 +1,876 @@
|
||||||
|
# Warning: generated during module installation
|
||||||
|
# by ./symbols.PL
|
||||||
|
# at Sun Aug 11 17:26:50 2013
|
||||||
|
# do not edit by hand!
|
||||||
|
|
||||||
|
package POSIX::1003;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS = (
|
||||||
|
sigaction => [ qw(
|
||||||
|
|
||||||
|
) ],
|
||||||
|
processes => [ qw(
|
||||||
|
_exit
|
||||||
|
abort
|
||||||
|
CHILD_MAX
|
||||||
|
ctermid
|
||||||
|
cuserid
|
||||||
|
EXIT_FAILURE
|
||||||
|
EXIT_SUCCESS
|
||||||
|
getcwd
|
||||||
|
nice
|
||||||
|
pause
|
||||||
|
setpgid
|
||||||
|
setsid
|
||||||
|
tcgetpgrp
|
||||||
|
tcsetpgrp
|
||||||
|
wait
|
||||||
|
waitpid
|
||||||
|
WEXITSTATUS
|
||||||
|
WIFEXITED
|
||||||
|
WIFSIGNALED
|
||||||
|
WIFSTOPPED
|
||||||
|
WNOHANG
|
||||||
|
WSTOPSIG
|
||||||
|
WTERMSIG
|
||||||
|
WUNTRACED
|
||||||
|
) ],
|
||||||
|
opsys => [ qw(
|
||||||
|
ARG_MAX
|
||||||
|
NGROUPS_MAX
|
||||||
|
OPEN_MAX
|
||||||
|
TMP_MAX
|
||||||
|
uname
|
||||||
|
) ],
|
||||||
|
confstr => [ qw(
|
||||||
|
%confstr
|
||||||
|
_CS_GNU_LIBC_VERSION
|
||||||
|
_CS_GNU_LIBPTHREAD_VERSION
|
||||||
|
_CS_LFS64_CFLAGS
|
||||||
|
_CS_LFS64_LDFLAGS
|
||||||
|
_CS_LFS64_LIBS
|
||||||
|
_CS_LFS64_LINTFLAGS
|
||||||
|
_CS_LFS_CFLAGS
|
||||||
|
_CS_LFS_LDFLAGS
|
||||||
|
_CS_LFS_LIBS
|
||||||
|
_CS_LFS_LINTFLAGS
|
||||||
|
_CS_PATH
|
||||||
|
_CS_POSIX_V5_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_CFLAGS
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LDFLAGS
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LIBS
|
||||||
|
_CS_POSIX_V6_ILP32_OFF32_LINTFLAGS
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_CFLAGS
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LDFLAGS
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LIBS
|
||||||
|
_CS_POSIX_V6_ILP32_OFFBIG_LINTFLAGS
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_CFLAGS
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LDFLAGS
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LIBS
|
||||||
|
_CS_POSIX_V6_LP64_OFF64_LINTFLAGS
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_CFLAGS
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LDFLAGS
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LIBS
|
||||||
|
_CS_POSIX_V6_LPBIG_OFFBIG_LINTFLAGS
|
||||||
|
_CS_POSIX_V6_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_CFLAGS
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LDFLAGS
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LIBS
|
||||||
|
_CS_POSIX_V7_ILP32_OFF32_LINTFLAGS
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_CFLAGS
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LDFLAGS
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LIBS
|
||||||
|
_CS_POSIX_V7_ILP32_OFFBIG_LINTFLAGS
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_CFLAGS
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LDFLAGS
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LIBS
|
||||||
|
_CS_POSIX_V7_LP64_OFF64_LINTFLAGS
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_CFLAGS
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LDFLAGS
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LIBS
|
||||||
|
_CS_POSIX_V7_LPBIG_OFFBIG_LINTFLAGS
|
||||||
|
_CS_POSIX_V7_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_V5_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_V6_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_V7_WIDTH_RESTRICTED_ENVS
|
||||||
|
_CS_XBS5_ILP32_OFF32_CFLAGS
|
||||||
|
_CS_XBS5_ILP32_OFF32_LDFLAGS
|
||||||
|
_CS_XBS5_ILP32_OFF32_LIBS
|
||||||
|
_CS_XBS5_ILP32_OFF32_LINTFLAGS
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_CFLAGS
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LDFLAGS
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LIBS
|
||||||
|
_CS_XBS5_ILP32_OFFBIG_LINTFLAGS
|
||||||
|
_CS_XBS5_LP64_OFF64_CFLAGS
|
||||||
|
_CS_XBS5_LP64_OFF64_LDFLAGS
|
||||||
|
_CS_XBS5_LP64_OFF64_LIBS
|
||||||
|
_CS_XBS5_LP64_OFF64_LINTFLAGS
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_CFLAGS
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LDFLAGS
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LIBS
|
||||||
|
_CS_XBS5_LPBIG_OFFBIG_LINTFLAGS
|
||||||
|
confstr
|
||||||
|
confstr_names
|
||||||
|
) ],
|
||||||
|
fdio => [ qw(
|
||||||
|
%mode
|
||||||
|
%seek
|
||||||
|
BUFSIZ
|
||||||
|
closefd
|
||||||
|
creatfd
|
||||||
|
dup2fd
|
||||||
|
dupfd
|
||||||
|
EOF
|
||||||
|
MAX_INPUT
|
||||||
|
O_APPEND
|
||||||
|
O_ASYNC
|
||||||
|
O_CLOEXEC
|
||||||
|
O_CREAT
|
||||||
|
O_DIRECT
|
||||||
|
O_DIRECTORY
|
||||||
|
O_DSYNC
|
||||||
|
O_EXCL
|
||||||
|
O_FSYNC
|
||||||
|
O_LARGEFILE
|
||||||
|
O_NDELAY
|
||||||
|
O_NOATIME
|
||||||
|
O_NOCTTY
|
||||||
|
O_NOFOLLOW
|
||||||
|
O_NONBLOCK
|
||||||
|
O_RDONLY
|
||||||
|
O_RDWR
|
||||||
|
O_RSYNC
|
||||||
|
O_SYNC
|
||||||
|
O_TRUNC
|
||||||
|
O_WRONLY
|
||||||
|
openfd
|
||||||
|
PIPE_BUF
|
||||||
|
pipefd
|
||||||
|
readfd
|
||||||
|
SEEK_CUR
|
||||||
|
SEEK_DATA
|
||||||
|
SEEK_END
|
||||||
|
SEEK_HOLE
|
||||||
|
SEEK_SET
|
||||||
|
seekfd
|
||||||
|
SSIZE_MAX
|
||||||
|
STDERR_FILENO
|
||||||
|
STDIN_FILENO
|
||||||
|
STDOUT_FILENO
|
||||||
|
tellfd
|
||||||
|
writefd
|
||||||
|
) ],
|
||||||
|
pathconf => [ qw(
|
||||||
|
%pathconf
|
||||||
|
_PC_2_SYMLINKS
|
||||||
|
_PC_ALLOC_SIZE_MIN
|
||||||
|
_PC_ASYNC_IO
|
||||||
|
_PC_CHOWN_RESTRICTED
|
||||||
|
_PC_FILESIZEBITS
|
||||||
|
_PC_LINK_MAX
|
||||||
|
_PC_MAX_CANON
|
||||||
|
_PC_MAX_INPUT
|
||||||
|
_PC_NAME_MAX
|
||||||
|
_PC_NO_TRUNC
|
||||||
|
_PC_PATH_MAX
|
||||||
|
_PC_PIPE_BUF
|
||||||
|
_PC_PRIO_IO
|
||||||
|
_PC_REC_INCR_XFER_SIZE
|
||||||
|
_PC_REC_MAX_XFER_SIZE
|
||||||
|
_PC_REC_MIN_XFER_SIZE
|
||||||
|
_PC_REC_XFER_ALIGN
|
||||||
|
_PC_SOCK_MAXBUF
|
||||||
|
_PC_SYMLINK_MAX
|
||||||
|
_PC_SYNC_IO
|
||||||
|
_PC_VDISABLE
|
||||||
|
fpathconf
|
||||||
|
pathconf
|
||||||
|
pathconf_names
|
||||||
|
) ],
|
||||||
|
events => [ qw(
|
||||||
|
FD_CLR
|
||||||
|
FD_ISSET
|
||||||
|
FD_SET
|
||||||
|
FD_ZERO
|
||||||
|
poll
|
||||||
|
poll_names
|
||||||
|
POLLERR
|
||||||
|
POLLHUP
|
||||||
|
POLLIN
|
||||||
|
POLLNVAL
|
||||||
|
POLLOUT
|
||||||
|
POLLPRI
|
||||||
|
POLLRDBAND
|
||||||
|
POLLRDNORM
|
||||||
|
POLLWRBAND
|
||||||
|
POLLWRNORM
|
||||||
|
select
|
||||||
|
) ],
|
||||||
|
signals => [ qw(
|
||||||
|
%signals
|
||||||
|
raise
|
||||||
|
SA_NOCLDSTOP
|
||||||
|
SA_NOCLDWAIT
|
||||||
|
SA_NODEFER
|
||||||
|
SA_ONSTACK
|
||||||
|
SA_RESETHAND
|
||||||
|
SA_RESTART
|
||||||
|
SA_SIGINFO
|
||||||
|
SIG_BLOCK
|
||||||
|
SIG_DFL
|
||||||
|
SIG_ERR
|
||||||
|
SIG_IGN
|
||||||
|
SIG_SETMASK
|
||||||
|
SIG_UNBLOCK
|
||||||
|
SIGABRT
|
||||||
|
sigaction
|
||||||
|
SIGALRM
|
||||||
|
SIGBUS
|
||||||
|
SIGCHLD
|
||||||
|
SIGCLD
|
||||||
|
SIGCONT
|
||||||
|
SIGFPE
|
||||||
|
SIGHUP
|
||||||
|
SIGILL
|
||||||
|
SIGINT
|
||||||
|
SIGIO
|
||||||
|
SIGIOT
|
||||||
|
SIGKILL
|
||||||
|
signal
|
||||||
|
signal_names
|
||||||
|
sigpending
|
||||||
|
SIGPIPE
|
||||||
|
SIGPOLL
|
||||||
|
sigprocmask
|
||||||
|
SIGPROF
|
||||||
|
SIGPWR
|
||||||
|
SIGQUIT
|
||||||
|
SIGRTMAX
|
||||||
|
SIGRTMIN
|
||||||
|
SIGSEGV
|
||||||
|
SIGSTKFLT
|
||||||
|
SIGSTOP
|
||||||
|
sigsuspend
|
||||||
|
SIGSYS
|
||||||
|
SIGTERM
|
||||||
|
SIGTRAP
|
||||||
|
SIGTSTP
|
||||||
|
SIGTTIN
|
||||||
|
SIGTTOU
|
||||||
|
SIGURG
|
||||||
|
SIGUSR1
|
||||||
|
SIGUSR2
|
||||||
|
SIGVTALRM
|
||||||
|
SIGWINCH
|
||||||
|
SIGXCPU
|
||||||
|
SIGXFSZ
|
||||||
|
strsignal
|
||||||
|
) ],
|
||||||
|
locale => [ qw(
|
||||||
|
LC_ALL
|
||||||
|
LC_COLLATE
|
||||||
|
LC_CTYPE
|
||||||
|
LC_MESSAGES
|
||||||
|
LC_MONETARY
|
||||||
|
LC_NUMERIC
|
||||||
|
LC_TIME
|
||||||
|
localeconv
|
||||||
|
MB_LEN_MAX
|
||||||
|
setlocale
|
||||||
|
) ],
|
||||||
|
limits => [ qw(
|
||||||
|
%rlimit
|
||||||
|
%ulimit
|
||||||
|
getrlimit
|
||||||
|
RLIM_INFINITY
|
||||||
|
RLIM_SAVED_CUR
|
||||||
|
RLIM_SAVED_MAX
|
||||||
|
RLIMIT_AS
|
||||||
|
RLIMIT_CORE
|
||||||
|
RLIMIT_CPU
|
||||||
|
RLIMIT_DATA
|
||||||
|
RLIMIT_FSIZE
|
||||||
|
RLIMIT_LOCKS
|
||||||
|
RLIMIT_MEMLOCK
|
||||||
|
RLIMIT_MSGQUEUE
|
||||||
|
rlimit_names
|
||||||
|
RLIMIT_NICE
|
||||||
|
RLIMIT_NLIMITS
|
||||||
|
RLIMIT_NOFILE
|
||||||
|
RLIMIT_NPROC
|
||||||
|
RLIMIT_OFILE
|
||||||
|
RLIMIT_RSS
|
||||||
|
RLIMIT_RTPRIO
|
||||||
|
RLIMIT_RTTIME
|
||||||
|
RLIMIT_SIGPENDING
|
||||||
|
RLIMIT_STACK
|
||||||
|
setrlimit
|
||||||
|
UL_GETFSIZE
|
||||||
|
UL_GETMAXBRK
|
||||||
|
UL_GETOPENMAX
|
||||||
|
UL_SETFSIZE
|
||||||
|
ulimit
|
||||||
|
ulimit_names
|
||||||
|
) ],
|
||||||
|
time => [ qw(
|
||||||
|
asctime
|
||||||
|
CLK_TCK
|
||||||
|
clock
|
||||||
|
CLOCKS_PER_SEC
|
||||||
|
ctime
|
||||||
|
difftime
|
||||||
|
gmtime
|
||||||
|
localtime
|
||||||
|
mktime
|
||||||
|
NULL
|
||||||
|
strftime
|
||||||
|
tzname
|
||||||
|
TZNAME_MAX
|
||||||
|
tzset
|
||||||
|
) ],
|
||||||
|
math => [ qw(
|
||||||
|
abs
|
||||||
|
acos
|
||||||
|
asin
|
||||||
|
atan
|
||||||
|
atan2
|
||||||
|
ceil
|
||||||
|
CHAR_BIT
|
||||||
|
CHAR_MAX
|
||||||
|
CHAR_MIN
|
||||||
|
cos
|
||||||
|
cosh
|
||||||
|
DBL_DIG
|
||||||
|
DBL_EPSILON
|
||||||
|
DBL_MANT_DIG
|
||||||
|
DBL_MAX
|
||||||
|
DBL_MAX_10_EXP
|
||||||
|
DBL_MAX_EXP
|
||||||
|
DBL_MIN
|
||||||
|
DBL_MIN_10_EXP
|
||||||
|
DBL_MIN_EXP
|
||||||
|
div
|
||||||
|
exp
|
||||||
|
floor
|
||||||
|
FLT_DIG
|
||||||
|
FLT_EPSILON
|
||||||
|
FLT_MANT_DIG
|
||||||
|
FLT_MAX
|
||||||
|
FLT_MAX_10_EXP
|
||||||
|
FLT_MAX_EXP
|
||||||
|
FLT_MIN
|
||||||
|
FLT_MIN_10_EXP
|
||||||
|
FLT_MIN_EXP
|
||||||
|
FLT_RADIX
|
||||||
|
FLT_ROUNDS
|
||||||
|
fmod
|
||||||
|
frexp
|
||||||
|
HUGE_VAL
|
||||||
|
int
|
||||||
|
INT_MAX
|
||||||
|
INT_MIN
|
||||||
|
LDBL_DIG
|
||||||
|
LDBL_EPSILON
|
||||||
|
LDBL_MANT_DIG
|
||||||
|
LDBL_MAX
|
||||||
|
LDBL_MAX_10_EXP
|
||||||
|
LDBL_MAX_EXP
|
||||||
|
LDBL_MIN
|
||||||
|
LDBL_MIN_10_EXP
|
||||||
|
LDBL_MIN_EXP
|
||||||
|
ldexp
|
||||||
|
log
|
||||||
|
log10
|
||||||
|
LONG_MAX
|
||||||
|
LONG_MIN
|
||||||
|
modf
|
||||||
|
pow
|
||||||
|
rand
|
||||||
|
RAND_MAX
|
||||||
|
rint
|
||||||
|
SCHAR_MAX
|
||||||
|
SCHAR_MIN
|
||||||
|
SHRT_MAX
|
||||||
|
SHRT_MIN
|
||||||
|
sin
|
||||||
|
sinh
|
||||||
|
sqrt
|
||||||
|
srand
|
||||||
|
strtod
|
||||||
|
strtol
|
||||||
|
strtoul
|
||||||
|
tan
|
||||||
|
tanh
|
||||||
|
UCHAR_MAX
|
||||||
|
UINT_MAX
|
||||||
|
ULONG_MAX
|
||||||
|
USHRT_MAX
|
||||||
|
) ],
|
||||||
|
sigset => [ qw(
|
||||||
|
|
||||||
|
) ],
|
||||||
|
termios => [ qw(
|
||||||
|
B0
|
||||||
|
B110
|
||||||
|
B1200
|
||||||
|
B134
|
||||||
|
B150
|
||||||
|
B1800
|
||||||
|
B19200
|
||||||
|
B200
|
||||||
|
B2400
|
||||||
|
B300
|
||||||
|
B38400
|
||||||
|
B4800
|
||||||
|
B50
|
||||||
|
B600
|
||||||
|
B75
|
||||||
|
B9600
|
||||||
|
BRKINT
|
||||||
|
CLOCAL
|
||||||
|
ECHONL
|
||||||
|
HUPCL
|
||||||
|
ICANON
|
||||||
|
ICRNL
|
||||||
|
IEXTEN
|
||||||
|
IGNBRK
|
||||||
|
IGNCR
|
||||||
|
IGNPAR
|
||||||
|
INLCR
|
||||||
|
INPCK
|
||||||
|
ISIG
|
||||||
|
ISTRIP
|
||||||
|
IXOFF
|
||||||
|
IXON
|
||||||
|
NCCS
|
||||||
|
NOFLSH
|
||||||
|
OPOST
|
||||||
|
PARENB
|
||||||
|
PARMRK
|
||||||
|
PARODD
|
||||||
|
tcdrain
|
||||||
|
tcflow
|
||||||
|
tcflush
|
||||||
|
TCIFLUSH
|
||||||
|
TCIOFF
|
||||||
|
TCIOFLUSH
|
||||||
|
TCION
|
||||||
|
TCOFLUSH
|
||||||
|
TCOOFF
|
||||||
|
TCOON
|
||||||
|
TCSADRAIN
|
||||||
|
TCSAFLUSH
|
||||||
|
TCSANOW
|
||||||
|
tcsendbreak
|
||||||
|
TOSTOP
|
||||||
|
ttyname
|
||||||
|
VEOF
|
||||||
|
VEOL
|
||||||
|
VERASE
|
||||||
|
VINTR
|
||||||
|
VKILL
|
||||||
|
VMIN
|
||||||
|
VQUIT
|
||||||
|
VSTART
|
||||||
|
VSTOP
|
||||||
|
VSUSP
|
||||||
|
VTIME
|
||||||
|
) ],
|
||||||
|
properties => [ qw(
|
||||||
|
%property
|
||||||
|
_POSIX2_C_BIND
|
||||||
|
_POSIX2_C_DEV
|
||||||
|
_POSIX2_CHAR_TERM
|
||||||
|
_POSIX2_LOCALEDEF
|
||||||
|
_POSIX2_SW_DEV
|
||||||
|
_POSIX2_VERSION
|
||||||
|
_POSIX_ADVISORY_INFO
|
||||||
|
_POSIX_AIO_LISTIO_MAX
|
||||||
|
_POSIX_AIO_MAX
|
||||||
|
_POSIX_ARG_MAX
|
||||||
|
_POSIX_ASYNC_IO
|
||||||
|
_POSIX_ASYNCHRONOUS_IO
|
||||||
|
_POSIX_BARRIERS
|
||||||
|
_POSIX_C_SOURCE
|
||||||
|
_POSIX_CHILD_MAX
|
||||||
|
_POSIX_CHOWN_RESTRICTED
|
||||||
|
_POSIX_CLOCK_SELECTION
|
||||||
|
_POSIX_CLOCKRES_MIN
|
||||||
|
_POSIX_CPUTIME
|
||||||
|
_POSIX_DELAYTIMER_MAX
|
||||||
|
_POSIX_FD_SETSIZE
|
||||||
|
_POSIX_FSYNC
|
||||||
|
_POSIX_HIWAT
|
||||||
|
_POSIX_HOST_NAME_MAX
|
||||||
|
_POSIX_IPV6
|
||||||
|
_POSIX_JOB_CONTROL
|
||||||
|
_POSIX_LINK_MAX
|
||||||
|
_POSIX_LOGIN_NAME_MAX
|
||||||
|
_POSIX_MAPPED_FILES
|
||||||
|
_POSIX_MAX_CANON
|
||||||
|
_POSIX_MAX_INPUT
|
||||||
|
_POSIX_MEMLOCK
|
||||||
|
_POSIX_MEMLOCK_RANGE
|
||||||
|
_POSIX_MEMORY_PROTECTION
|
||||||
|
_POSIX_MESSAGE_PASSING
|
||||||
|
_POSIX_MONOTONIC_CLOCK
|
||||||
|
_POSIX_MQ_OPEN_MAX
|
||||||
|
_POSIX_MQ_PRIO_MAX
|
||||||
|
_POSIX_NAME_MAX
|
||||||
|
_POSIX_NGROUPS_MAX
|
||||||
|
_POSIX_NO_TRUNC
|
||||||
|
_POSIX_OPEN_MAX
|
||||||
|
_POSIX_PATH_MAX
|
||||||
|
_POSIX_PIPE_BUF
|
||||||
|
_POSIX_PRIORITIZED_IO
|
||||||
|
_POSIX_PRIORITY_SCHEDULING
|
||||||
|
_POSIX_QLIMIT
|
||||||
|
_POSIX_RAW_SOCKETS
|
||||||
|
_POSIX_RE_DUP_MAX
|
||||||
|
_POSIX_READER_WRITER_LOCKS
|
||||||
|
_POSIX_REALTIME_SIGNALS
|
||||||
|
_POSIX_REENTRANT_FUNCTIONS
|
||||||
|
_POSIX_REGEXP
|
||||||
|
_POSIX_RTSIG_MAX
|
||||||
|
_POSIX_SAVED_IDS
|
||||||
|
_POSIX_SEM_NSEMS_MAX
|
||||||
|
_POSIX_SEM_VALUE_MAX
|
||||||
|
_POSIX_SEMAPHORES
|
||||||
|
_POSIX_SHARED_MEMORY_OBJECTS
|
||||||
|
_POSIX_SHELL
|
||||||
|
_POSIX_SIGQUEUE_MAX
|
||||||
|
_POSIX_SOURCE
|
||||||
|
_POSIX_SPAWN
|
||||||
|
_POSIX_SPIN_LOCKS
|
||||||
|
_POSIX_SPORADIC_SERVER
|
||||||
|
_POSIX_SSIZE_MAX
|
||||||
|
_POSIX_STREAM_MAX
|
||||||
|
_POSIX_SYMLINK_MAX
|
||||||
|
_POSIX_SYMLOOP_MAX
|
||||||
|
_POSIX_SYNCHRONIZED_IO
|
||||||
|
_POSIX_THREAD_ATTR_STACKADDR
|
||||||
|
_POSIX_THREAD_ATTR_STACKSIZE
|
||||||
|
_POSIX_THREAD_CPUTIME
|
||||||
|
_POSIX_THREAD_DESTRUCTOR_ITERATIONS
|
||||||
|
_POSIX_THREAD_KEYS_MAX
|
||||||
|
_POSIX_THREAD_PRIO_INHERIT
|
||||||
|
_POSIX_THREAD_PRIO_PROTECT
|
||||||
|
_POSIX_THREAD_PRIORITY_SCHEDULING
|
||||||
|
_POSIX_THREAD_PROCESS_SHARED
|
||||||
|
_POSIX_THREAD_ROBUST_PRIO_INHERIT
|
||||||
|
_POSIX_THREAD_ROBUST_PRIO_PROTECT
|
||||||
|
_POSIX_THREAD_SAFE_FUNCTIONS
|
||||||
|
_POSIX_THREAD_SPORADIC_SERVER
|
||||||
|
_POSIX_THREAD_THREADS_MAX
|
||||||
|
_POSIX_THREADS
|
||||||
|
_POSIX_TIMEOUTS
|
||||||
|
_POSIX_TIMER_MAX
|
||||||
|
_POSIX_TIMERS
|
||||||
|
_POSIX_TRACE
|
||||||
|
_POSIX_TRACE_EVENT_FILTER
|
||||||
|
_POSIX_TRACE_INHERIT
|
||||||
|
_POSIX_TRACE_LOG
|
||||||
|
_POSIX_TTY_NAME_MAX
|
||||||
|
_POSIX_TYPED_MEMORY_OBJECTS
|
||||||
|
_POSIX_TZNAME_MAX
|
||||||
|
_POSIX_UIO_MAXIOV
|
||||||
|
_POSIX_V6_LP64_OFF64
|
||||||
|
_POSIX_V6_LPBIG_OFFBIG
|
||||||
|
_POSIX_V7_LP64_OFF64
|
||||||
|
_POSIX_V7_LPBIG_OFFBIG
|
||||||
|
_POSIX_VDISABLE
|
||||||
|
_POSIX_VERSION
|
||||||
|
property
|
||||||
|
property_names
|
||||||
|
) ],
|
||||||
|
filesystem => [ qw(
|
||||||
|
%access
|
||||||
|
%stat
|
||||||
|
access
|
||||||
|
F_OK
|
||||||
|
FILENAME_MAX
|
||||||
|
lchown
|
||||||
|
lstat
|
||||||
|
major
|
||||||
|
makedev
|
||||||
|
MAX_CANON
|
||||||
|
minor
|
||||||
|
mkfifo
|
||||||
|
mknod
|
||||||
|
NAME_MAX
|
||||||
|
PATH_MAX
|
||||||
|
R_OK
|
||||||
|
rename
|
||||||
|
S_IFBLK
|
||||||
|
S_IFCHR
|
||||||
|
S_IFDIR
|
||||||
|
S_IFIFO
|
||||||
|
S_IFLNK
|
||||||
|
S_IFMT
|
||||||
|
S_IFREG
|
||||||
|
S_IFSOCK
|
||||||
|
S_IRGRP
|
||||||
|
S_IROTH
|
||||||
|
S_IRUSR
|
||||||
|
S_IRWXG
|
||||||
|
S_IRWXO
|
||||||
|
S_IRWXU
|
||||||
|
S_ISBLK
|
||||||
|
S_ISCHR
|
||||||
|
S_ISDIR
|
||||||
|
S_ISFIFO
|
||||||
|
S_ISLNK
|
||||||
|
S_ISREG
|
||||||
|
S_ISSOCK
|
||||||
|
S_ISVTX
|
||||||
|
S_ISWHT
|
||||||
|
S_IWGRP
|
||||||
|
S_IWOTH
|
||||||
|
S_IWUSR
|
||||||
|
S_IXGRP
|
||||||
|
S_IXOTH
|
||||||
|
S_IXUSR
|
||||||
|
stat
|
||||||
|
utime
|
||||||
|
W_OK
|
||||||
|
X_OK
|
||||||
|
) ],
|
||||||
|
sysconf => [ qw(
|
||||||
|
%sysconf
|
||||||
|
_SC_2_C_BIND
|
||||||
|
_SC_2_C_DEV
|
||||||
|
_SC_2_C_VERSION
|
||||||
|
_SC_2_CHAR_TERM
|
||||||
|
_SC_2_FORT_DEV
|
||||||
|
_SC_2_FORT_RUN
|
||||||
|
_SC_2_LOCALEDEF
|
||||||
|
_SC_2_PBS
|
||||||
|
_SC_2_PBS_ACCOUNTING
|
||||||
|
_SC_2_PBS_CHECKPOINT
|
||||||
|
_SC_2_PBS_LOCATE
|
||||||
|
_SC_2_PBS_MESSAGE
|
||||||
|
_SC_2_PBS_TRACK
|
||||||
|
_SC_2_SW_DEV
|
||||||
|
_SC_2_UPE
|
||||||
|
_SC_2_VERSION
|
||||||
|
_SC_ADVISORY_INFO
|
||||||
|
_SC_AIO_LISTIO_MAX
|
||||||
|
_SC_AIO_MAX
|
||||||
|
_SC_AIO_PRIO_DELTA_MAX
|
||||||
|
_SC_ARG_MAX
|
||||||
|
_SC_ASYNCHRONOUS_IO
|
||||||
|
_SC_ATEXIT_MAX
|
||||||
|
_SC_AVPHYS_PAGES
|
||||||
|
_SC_BARRIERS
|
||||||
|
_SC_BASE
|
||||||
|
_SC_BC_BASE_MAX
|
||||||
|
_SC_BC_DIM_MAX
|
||||||
|
_SC_BC_SCALE_MAX
|
||||||
|
_SC_BC_STRING_MAX
|
||||||
|
_SC_C_LANG_SUPPORT
|
||||||
|
_SC_C_LANG_SUPPORT_R
|
||||||
|
_SC_CHAR_BIT
|
||||||
|
_SC_CHAR_MAX
|
||||||
|
_SC_CHAR_MIN
|
||||||
|
_SC_CHARCLASS_NAME_MAX
|
||||||
|
_SC_CHILD_MAX
|
||||||
|
_SC_CLK_TCK
|
||||||
|
_SC_CLOCK_SELECTION
|
||||||
|
_SC_COLL_WEIGHTS_MAX
|
||||||
|
_SC_CPUTIME
|
||||||
|
_SC_DELAYTIMER_MAX
|
||||||
|
_SC_DEVICE_IO
|
||||||
|
_SC_DEVICE_SPECIFIC
|
||||||
|
_SC_DEVICE_SPECIFIC_R
|
||||||
|
_SC_EQUIV_CLASS_MAX
|
||||||
|
_SC_EXPR_NEST_MAX
|
||||||
|
_SC_FD_MGMT
|
||||||
|
_SC_FIFO
|
||||||
|
_SC_FILE_ATTRIBUTES
|
||||||
|
_SC_FILE_LOCKING
|
||||||
|
_SC_FILE_SYSTEM
|
||||||
|
_SC_FSYNC
|
||||||
|
_SC_GETGR_R_SIZE_MAX
|
||||||
|
_SC_GETPW_R_SIZE_MAX
|
||||||
|
_SC_HOST_NAME_MAX
|
||||||
|
_SC_INT_MAX
|
||||||
|
_SC_INT_MIN
|
||||||
|
_SC_IOV_MAX
|
||||||
|
_SC_IPV6
|
||||||
|
_SC_JOB_CONTROL
|
||||||
|
_SC_LEVEL1_DCACHE_ASSOC
|
||||||
|
_SC_LEVEL1_DCACHE_LINESIZE
|
||||||
|
_SC_LEVEL1_DCACHE_SIZE
|
||||||
|
_SC_LEVEL1_ICACHE_ASSOC
|
||||||
|
_SC_LEVEL1_ICACHE_LINESIZE
|
||||||
|
_SC_LEVEL1_ICACHE_SIZE
|
||||||
|
_SC_LEVEL2_CACHE_ASSOC
|
||||||
|
_SC_LEVEL2_CACHE_LINESIZE
|
||||||
|
_SC_LEVEL2_CACHE_SIZE
|
||||||
|
_SC_LEVEL3_CACHE_ASSOC
|
||||||
|
_SC_LEVEL3_CACHE_LINESIZE
|
||||||
|
_SC_LEVEL3_CACHE_SIZE
|
||||||
|
_SC_LEVEL4_CACHE_ASSOC
|
||||||
|
_SC_LEVEL4_CACHE_LINESIZE
|
||||||
|
_SC_LEVEL4_CACHE_SIZE
|
||||||
|
_SC_LINE_MAX
|
||||||
|
_SC_LOGIN_NAME_MAX
|
||||||
|
_SC_LONG_BIT
|
||||||
|
_SC_MAPPED_FILES
|
||||||
|
_SC_MB_LEN_MAX
|
||||||
|
_SC_MEMLOCK
|
||||||
|
_SC_MEMLOCK_RANGE
|
||||||
|
_SC_MEMORY_PROTECTION
|
||||||
|
_SC_MESSAGE_PASSING
|
||||||
|
_SC_MONOTONIC_CLOCK
|
||||||
|
_SC_MQ_OPEN_MAX
|
||||||
|
_SC_MQ_PRIO_MAX
|
||||||
|
_SC_MULTI_PROCESS
|
||||||
|
_SC_NETWORKING
|
||||||
|
_SC_NGROUPS_MAX
|
||||||
|
_SC_NL_ARGMAX
|
||||||
|
_SC_NL_LANGMAX
|
||||||
|
_SC_NL_MSGMAX
|
||||||
|
_SC_NL_NMAX
|
||||||
|
_SC_NL_SETMAX
|
||||||
|
_SC_NL_TEXTMAX
|
||||||
|
_SC_NPROCESSORS_CONF
|
||||||
|
_SC_NPROCESSORS_ONLN
|
||||||
|
_SC_NZERO
|
||||||
|
_SC_OPEN_MAX
|
||||||
|
_SC_PAGE_SIZE
|
||||||
|
_SC_PAGESIZE
|
||||||
|
_SC_PASS_MAX
|
||||||
|
_SC_PHYS_PAGES
|
||||||
|
_SC_PII
|
||||||
|
_SC_PII_INTERNET
|
||||||
|
_SC_PII_INTERNET_DGRAM
|
||||||
|
_SC_PII_INTERNET_STREAM
|
||||||
|
_SC_PII_OSI
|
||||||
|
_SC_PII_OSI_CLTS
|
||||||
|
_SC_PII_OSI_COTS
|
||||||
|
_SC_PII_OSI_M
|
||||||
|
_SC_PII_SOCKET
|
||||||
|
_SC_PII_XTI
|
||||||
|
_SC_PIPE
|
||||||
|
_SC_POLL
|
||||||
|
_SC_PRIORITIZED_IO
|
||||||
|
_SC_PRIORITY_SCHEDULING
|
||||||
|
_SC_RAW_SOCKETS
|
||||||
|
_SC_RE_DUP_MAX
|
||||||
|
_SC_READER_WRITER_LOCKS
|
||||||
|
_SC_REALTIME_SIGNALS
|
||||||
|
_SC_REGEX_VERSION
|
||||||
|
_SC_REGEXP
|
||||||
|
_SC_RTSIG_MAX
|
||||||
|
_SC_SAVED_IDS
|
||||||
|
_SC_SCHAR_MAX
|
||||||
|
_SC_SCHAR_MIN
|
||||||
|
_SC_SELECT
|
||||||
|
_SC_SEM_NSEMS_MAX
|
||||||
|
_SC_SEM_VALUE_MAX
|
||||||
|
_SC_SEMAPHORES
|
||||||
|
_SC_SHARED_MEMORY_OBJECTS
|
||||||
|
_SC_SHELL
|
||||||
|
_SC_SHRT_MAX
|
||||||
|
_SC_SHRT_MIN
|
||||||
|
_SC_SIGNALS
|
||||||
|
_SC_SIGQUEUE_MAX
|
||||||
|
_SC_SINGLE_PROCESS
|
||||||
|
_SC_SPAWN
|
||||||
|
_SC_SPIN_LOCKS
|
||||||
|
_SC_SPORADIC_SERVER
|
||||||
|
_SC_SS_REPL_MAX
|
||||||
|
_SC_SSIZE_MAX
|
||||||
|
_SC_STREAM_MAX
|
||||||
|
_SC_STREAMS
|
||||||
|
_SC_SYMLOOP_MAX
|
||||||
|
_SC_SYNCHRONIZED_IO
|
||||||
|
_SC_SYSTEM_DATABASE
|
||||||
|
_SC_SYSTEM_DATABASE_R
|
||||||
|
_SC_T_IOV_MAX
|
||||||
|
_SC_THREAD_ATTR_STACKADDR
|
||||||
|
_SC_THREAD_ATTR_STACKSIZE
|
||||||
|
_SC_THREAD_CPUTIME
|
||||||
|
_SC_THREAD_DESTRUCTOR_ITERATIONS
|
||||||
|
_SC_THREAD_KEYS_MAX
|
||||||
|
_SC_THREAD_PRIO_INHERIT
|
||||||
|
_SC_THREAD_PRIO_PROTECT
|
||||||
|
_SC_THREAD_PRIORITY_SCHEDULING
|
||||||
|
_SC_THREAD_PROCESS_SHARED
|
||||||
|
_SC_THREAD_ROBUST_PRIO_INHERIT
|
||||||
|
_SC_THREAD_ROBUST_PRIO_PROTECT
|
||||||
|
_SC_THREAD_SAFE_FUNCTIONS
|
||||||
|
_SC_THREAD_SPORADIC_SERVER
|
||||||
|
_SC_THREAD_STACK_MIN
|
||||||
|
_SC_THREAD_THREADS_MAX
|
||||||
|
_SC_THREADS
|
||||||
|
_SC_TIMEOUTS
|
||||||
|
_SC_TIMER_MAX
|
||||||
|
_SC_TIMERS
|
||||||
|
_SC_TRACE
|
||||||
|
_SC_TRACE_EVENT_FILTER
|
||||||
|
_SC_TRACE_EVENT_NAME_MAX
|
||||||
|
_SC_TRACE_INHERIT
|
||||||
|
_SC_TRACE_LOG
|
||||||
|
_SC_TRACE_NAME_MAX
|
||||||
|
_SC_TRACE_SYS_MAX
|
||||||
|
_SC_TRACE_USER_EVENT_MAX
|
||||||
|
_SC_TTY_NAME_MAX
|
||||||
|
_SC_TYPED_MEMORY_OBJECTS
|
||||||
|
_SC_TZNAME_MAX
|
||||||
|
_SC_UCHAR_MAX
|
||||||
|
_SC_UINT_MAX
|
||||||
|
_SC_UIO_MAXIOV
|
||||||
|
_SC_ULONG_MAX
|
||||||
|
_SC_USER_GROUPS
|
||||||
|
_SC_USER_GROUPS_R
|
||||||
|
_SC_USHRT_MAX
|
||||||
|
_SC_V6_ILP32_OFF32
|
||||||
|
_SC_V6_ILP32_OFFBIG
|
||||||
|
_SC_V6_LP64_OFF64
|
||||||
|
_SC_V6_LPBIG_OFFBIG
|
||||||
|
_SC_V7_ILP32_OFF32
|
||||||
|
_SC_V7_ILP32_OFFBIG
|
||||||
|
_SC_V7_LP64_OFF64
|
||||||
|
_SC_V7_LPBIG_OFFBIG
|
||||||
|
_SC_VERSION
|
||||||
|
_SC_WORD_BIT
|
||||||
|
_SC_XBS5_ILP32_OFF32
|
||||||
|
_SC_XBS5_ILP32_OFFBIG
|
||||||
|
_SC_XBS5_LP64_OFF64
|
||||||
|
_SC_XBS5_LPBIG_OFFBIG
|
||||||
|
_SC_XOPEN_CRYPT
|
||||||
|
_SC_XOPEN_ENH_I18N
|
||||||
|
_SC_XOPEN_LEGACY
|
||||||
|
_SC_XOPEN_REALTIME
|
||||||
|
_SC_XOPEN_REALTIME_THREADS
|
||||||
|
_SC_XOPEN_SHM
|
||||||
|
_SC_XOPEN_STREAMS
|
||||||
|
_SC_XOPEN_UNIX
|
||||||
|
_SC_XOPEN_VERSION
|
||||||
|
_SC_XOPEN_XCU_VERSION
|
||||||
|
_SC_XOPEN_XPG2
|
||||||
|
_SC_XOPEN_XPG3
|
||||||
|
_SC_XOPEN_XPG4
|
||||||
|
sysconf
|
||||||
|
sysconf_names
|
||||||
|
) ],
|
||||||
|
);
|
||||||
|
|
||||||
|
# shorter aliases:
|
||||||
|
$EXPORT_TAGS{cs} = $EXPORT_TAGS{confstr};
|
||||||
|
$EXPORT_TAGS{ev} = $EXPORT_TAGS{events};
|
||||||
|
$EXPORT_TAGS{fd} = $EXPORT_TAGS{fdio};
|
||||||
|
$EXPORT_TAGS{fs} = $EXPORT_TAGS{filesystem};
|
||||||
|
$EXPORT_TAGS{limit} = $EXPORT_TAGS{limits};
|
||||||
|
$EXPORT_TAGS{os} = $EXPORT_TAGS{opsys};
|
||||||
|
$EXPORT_TAGS{pc} = $EXPORT_TAGS{pathconf};
|
||||||
|
$EXPORT_TAGS{posix} = $EXPORT_TAGS{properties};
|
||||||
|
$EXPORT_TAGS{proc} = $EXPORT_TAGS{processes};
|
||||||
|
$EXPORT_TAGS{property} = $EXPORT_TAGS{properties};
|
||||||
|
$EXPORT_TAGS{props} = $EXPORT_TAGS{properties};
|
||||||
|
$EXPORT_TAGS{sc} = $EXPORT_TAGS{sysconf};
|
||||||
|
$EXPORT_TAGS{termio} = $EXPORT_TAGS{termios};
|
||||||
|
|
||||||
|
1;
|
66
extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pm
vendored
Normal file
66
extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pm
vendored
Normal file
|
@ -0,0 +1,66 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Sysconf;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
use Carp 'croak';
|
||||||
|
|
||||||
|
my @constants;
|
||||||
|
my @functions = qw/sysconf sysconf_names/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
, tables => [ '%sysconf' ]
|
||||||
|
);
|
||||||
|
|
||||||
|
my $sysconf;
|
||||||
|
our %sysconf;
|
||||||
|
|
||||||
|
BEGIN {
|
||||||
|
# initialize the :constants export tag
|
||||||
|
$sysconf = sysconf_table;
|
||||||
|
push @constants, keys %$sysconf;
|
||||||
|
tie %sysconf, 'POSIX::1003::ReadOnlyTable', $sysconf;
|
||||||
|
}
|
||||||
|
|
||||||
|
sub sysconf($);
|
||||||
|
|
||||||
|
|
||||||
|
sub exampleValue($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
$name =~ m/^_SC_/ or return;
|
||||||
|
my $val = sysconf $name;
|
||||||
|
defined $val ? $val : 'undef';
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub sysconf($)
|
||||||
|
{ my $key = shift // return;
|
||||||
|
$key =~ /^_SC_/
|
||||||
|
or croak "pass the constant name as string";
|
||||||
|
|
||||||
|
my $id = $sysconf->{$key} // return;
|
||||||
|
my $val = POSIX::sysconf($id) // return;
|
||||||
|
$val+0; # remove " but true" from "0"
|
||||||
|
}
|
||||||
|
|
||||||
|
sub _create_constant($)
|
||||||
|
{ my ($class, $name) = @_;
|
||||||
|
my $id = $sysconf->{$name} // return sub() {undef};
|
||||||
|
sub() {POSIX::sysconf($id)};
|
||||||
|
}
|
||||||
|
|
||||||
|
|
||||||
|
sub sysconf_names() { keys %$sysconf }
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
316
extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pod
vendored
Normal file
316
extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pod
vendored
Normal file
|
@ -0,0 +1,316 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Sysconf - POSIX access to sysconf()
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Sysconf; # load all names
|
||||||
|
|
||||||
|
use POSIX::1003::Sysconf qw(sysconf);
|
||||||
|
# keys are strings!
|
||||||
|
$ticks = sysconf('_SC_CLK_TCK');
|
||||||
|
|
||||||
|
use POSIX::1003::Sysconf qw(sysconf _SC_CLK_TCK);
|
||||||
|
$ticks = _SC_CLK_TCK; # constants are subs
|
||||||
|
|
||||||
|
use POSIX::1003::Sysconf '%sysconf';
|
||||||
|
my $key = $sysconf{_SC_CLK_TCK};
|
||||||
|
$sysconf{_SC_NEW_KEY} = $key_code;
|
||||||
|
$ticks = sysconf($key);
|
||||||
|
|
||||||
|
print "$_\n" for keys %sysconf;
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
The C<sysconf()> interface can be used to query system information
|
||||||
|
in numerical form, where C<confstr()> returns strings.
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<sysconf>(NAME)
|
||||||
|
|
||||||
|
Returns the sysconf value related to the NAMEd constant. The NAME
|
||||||
|
must be a string. C<undef> will be returned when the NAME is not
|
||||||
|
known by the system.
|
||||||
|
|
||||||
|
example:
|
||||||
|
|
||||||
|
my $ticks = sysconf('_SC_CLK_TCK') || 1000;
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Additional
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<sysconf_names>()
|
||||||
|
|
||||||
|
Returns a list with all known names, unsorted.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<%sysconf>
|
||||||
|
|
||||||
|
This exported variable is a tied HASH which maps C<_SC_*> names
|
||||||
|
on unique numbers, to be used with the system's C<sysconf()> function.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
The following constants where detected on your system when the
|
||||||
|
module got installed. The second column shows the value which
|
||||||
|
where returned at that time.
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_SYSCONF_START
|
||||||
|
|
||||||
|
_SC_2_C_BIND 200809
|
||||||
|
_SC_2_C_DEV 200809
|
||||||
|
_SC_2_C_VERSION undef
|
||||||
|
_SC_2_CHAR_TERM 200809
|
||||||
|
_SC_2_FORT_DEV undef
|
||||||
|
_SC_2_FORT_RUN undef
|
||||||
|
_SC_2_LOCALEDEF 200809
|
||||||
|
_SC_2_PBS undef
|
||||||
|
_SC_2_PBS_ACCOUNTING undef
|
||||||
|
_SC_2_PBS_CHECKPOINT undef
|
||||||
|
_SC_2_PBS_LOCATE undef
|
||||||
|
_SC_2_PBS_MESSAGE undef
|
||||||
|
_SC_2_PBS_TRACK undef
|
||||||
|
_SC_2_SW_DEV 200809
|
||||||
|
_SC_2_UPE undef
|
||||||
|
_SC_2_VERSION 200809
|
||||||
|
_SC_ADVISORY_INFO 200809
|
||||||
|
_SC_AIO_LISTIO_MAX undef
|
||||||
|
_SC_AIO_MAX undef
|
||||||
|
_SC_AIO_PRIO_DELTA_MAX 20
|
||||||
|
_SC_ARG_MAX 2097152
|
||||||
|
_SC_ASYNCHRONOUS_IO 200809
|
||||||
|
_SC_ATEXIT_MAX 2147483647
|
||||||
|
_SC_AVPHYS_PAGES 38454
|
||||||
|
_SC_BARRIERS 200809
|
||||||
|
_SC_BASE undef
|
||||||
|
_SC_BC_BASE_MAX 99
|
||||||
|
_SC_BC_DIM_MAX 2048
|
||||||
|
_SC_BC_SCALE_MAX 99
|
||||||
|
_SC_BC_STRING_MAX 1000
|
||||||
|
_SC_C_LANG_SUPPORT undef
|
||||||
|
_SC_C_LANG_SUPPORT_R undef
|
||||||
|
_SC_CHAR_BIT 8
|
||||||
|
_SC_CHAR_MAX 127
|
||||||
|
_SC_CHAR_MIN -128
|
||||||
|
_SC_CHARCLASS_NAME_MAX 2048
|
||||||
|
_SC_CHILD_MAX 61461
|
||||||
|
_SC_CLK_TCK 100
|
||||||
|
_SC_CLOCK_SELECTION 200809
|
||||||
|
_SC_COLL_WEIGHTS_MAX 255
|
||||||
|
_SC_CPUTIME 200809
|
||||||
|
_SC_DELAYTIMER_MAX 2147483647
|
||||||
|
_SC_DEVICE_IO undef
|
||||||
|
_SC_DEVICE_SPECIFIC undef
|
||||||
|
_SC_DEVICE_SPECIFIC_R undef
|
||||||
|
_SC_EQUIV_CLASS_MAX undef
|
||||||
|
_SC_EXPR_NEST_MAX 32
|
||||||
|
_SC_FD_MGMT undef
|
||||||
|
_SC_FIFO undef
|
||||||
|
_SC_FILE_ATTRIBUTES undef
|
||||||
|
_SC_FILE_LOCKING undef
|
||||||
|
_SC_FILE_SYSTEM undef
|
||||||
|
_SC_FSYNC 200809
|
||||||
|
_SC_GETGR_R_SIZE_MAX 1024
|
||||||
|
_SC_GETPW_R_SIZE_MAX 1024
|
||||||
|
_SC_HOST_NAME_MAX 64
|
||||||
|
_SC_INT_MAX 2147483647
|
||||||
|
_SC_INT_MIN -2147483648
|
||||||
|
_SC_IOV_MAX 1024
|
||||||
|
_SC_IPV6 200809
|
||||||
|
_SC_JOB_CONTROL 1
|
||||||
|
_SC_LEVEL1_DCACHE_ASSOC 8
|
||||||
|
_SC_LEVEL1_DCACHE_LINESIZE 64
|
||||||
|
_SC_LEVEL1_DCACHE_SIZE 32768
|
||||||
|
_SC_LEVEL1_ICACHE_ASSOC 8
|
||||||
|
_SC_LEVEL1_ICACHE_LINESIZE 64
|
||||||
|
_SC_LEVEL1_ICACHE_SIZE 32768
|
||||||
|
_SC_LEVEL2_CACHE_ASSOC 8
|
||||||
|
_SC_LEVEL2_CACHE_LINESIZE 64
|
||||||
|
_SC_LEVEL2_CACHE_SIZE 262144
|
||||||
|
_SC_LEVEL3_CACHE_ASSOC 12
|
||||||
|
_SC_LEVEL3_CACHE_LINESIZE 64
|
||||||
|
_SC_LEVEL3_CACHE_SIZE 6291456
|
||||||
|
_SC_LEVEL4_CACHE_ASSOC 0
|
||||||
|
_SC_LEVEL4_CACHE_LINESIZE 0
|
||||||
|
_SC_LEVEL4_CACHE_SIZE 0
|
||||||
|
_SC_LINE_MAX 2048
|
||||||
|
_SC_LOGIN_NAME_MAX 256
|
||||||
|
_SC_LONG_BIT 64
|
||||||
|
_SC_MAPPED_FILES 200809
|
||||||
|
_SC_MB_LEN_MAX 16
|
||||||
|
_SC_MEMLOCK 200809
|
||||||
|
_SC_MEMLOCK_RANGE 200809
|
||||||
|
_SC_MEMORY_PROTECTION 200809
|
||||||
|
_SC_MESSAGE_PASSING 200809
|
||||||
|
_SC_MONOTONIC_CLOCK 200809
|
||||||
|
_SC_MQ_OPEN_MAX undef
|
||||||
|
_SC_MQ_PRIO_MAX 32768
|
||||||
|
_SC_MULTI_PROCESS undef
|
||||||
|
_SC_NETWORKING undef
|
||||||
|
_SC_NGROUPS_MAX 65536
|
||||||
|
_SC_NL_ARGMAX 4096
|
||||||
|
_SC_NL_LANGMAX 2048
|
||||||
|
_SC_NL_MSGMAX 2147483647
|
||||||
|
_SC_NL_NMAX 2147483647
|
||||||
|
_SC_NL_SETMAX 2147483647
|
||||||
|
_SC_NL_TEXTMAX 2147483647
|
||||||
|
_SC_NPROCESSORS_CONF 4
|
||||||
|
_SC_NPROCESSORS_ONLN 4
|
||||||
|
_SC_NZERO 20
|
||||||
|
_SC_OPEN_MAX 1024
|
||||||
|
_SC_PAGE_SIZE 4096
|
||||||
|
_SC_PAGESIZE 4096
|
||||||
|
_SC_PASS_MAX 8192
|
||||||
|
_SC_PHYS_PAGES 1971261
|
||||||
|
_SC_PII undef
|
||||||
|
_SC_PII_INTERNET undef
|
||||||
|
_SC_PII_INTERNET_DGRAM undef
|
||||||
|
_SC_PII_INTERNET_STREAM undef
|
||||||
|
_SC_PII_OSI undef
|
||||||
|
_SC_PII_OSI_CLTS undef
|
||||||
|
_SC_PII_OSI_COTS undef
|
||||||
|
_SC_PII_OSI_M undef
|
||||||
|
_SC_PII_SOCKET undef
|
||||||
|
_SC_PII_XTI undef
|
||||||
|
_SC_PIPE undef
|
||||||
|
_SC_POLL undef
|
||||||
|
_SC_PRIORITIZED_IO 200809
|
||||||
|
_SC_PRIORITY_SCHEDULING 200809
|
||||||
|
_SC_RAW_SOCKETS 200809
|
||||||
|
_SC_RE_DUP_MAX 32767
|
||||||
|
_SC_READER_WRITER_LOCKS 200809
|
||||||
|
_SC_REALTIME_SIGNALS 200809
|
||||||
|
_SC_REGEX_VERSION undef
|
||||||
|
_SC_REGEXP 1
|
||||||
|
_SC_RTSIG_MAX 32
|
||||||
|
_SC_SAVED_IDS 1
|
||||||
|
_SC_SCHAR_MAX 127
|
||||||
|
_SC_SCHAR_MIN -128
|
||||||
|
_SC_SELECT undef
|
||||||
|
_SC_SEM_NSEMS_MAX undef
|
||||||
|
_SC_SEM_VALUE_MAX 2147483647
|
||||||
|
_SC_SEMAPHORES 200809
|
||||||
|
_SC_SHARED_MEMORY_OBJECTS 200809
|
||||||
|
_SC_SHELL 1
|
||||||
|
_SC_SHRT_MAX 32767
|
||||||
|
_SC_SHRT_MIN -32768
|
||||||
|
_SC_SIGNALS undef
|
||||||
|
_SC_SIGQUEUE_MAX 61461
|
||||||
|
_SC_SINGLE_PROCESS undef
|
||||||
|
_SC_SPAWN 200809
|
||||||
|
_SC_SPIN_LOCKS 200809
|
||||||
|
_SC_SPORADIC_SERVER undef
|
||||||
|
_SC_SS_REPL_MAX undef
|
||||||
|
_SC_SSIZE_MAX 32767
|
||||||
|
_SC_STREAM_MAX 16
|
||||||
|
_SC_STREAMS undef
|
||||||
|
_SC_SYMLOOP_MAX undef
|
||||||
|
_SC_SYNCHRONIZED_IO 200809
|
||||||
|
_SC_SYSTEM_DATABASE undef
|
||||||
|
_SC_SYSTEM_DATABASE_R undef
|
||||||
|
_SC_T_IOV_MAX undef
|
||||||
|
_SC_THREAD_ATTR_STACKADDR 200809
|
||||||
|
_SC_THREAD_ATTR_STACKSIZE 200809
|
||||||
|
_SC_THREAD_CPUTIME 200809
|
||||||
|
_SC_THREAD_DESTRUCTOR_ITERATIONS 4
|
||||||
|
_SC_THREAD_KEYS_MAX 1024
|
||||||
|
_SC_THREAD_PRIO_INHERIT 200809
|
||||||
|
_SC_THREAD_PRIO_PROTECT 200809
|
||||||
|
_SC_THREAD_PRIORITY_SCHEDULING 200809
|
||||||
|
_SC_THREAD_PROCESS_SHARED 200809
|
||||||
|
_SC_THREAD_ROBUST_PRIO_INHERIT undef
|
||||||
|
_SC_THREAD_ROBUST_PRIO_PROTECT undef
|
||||||
|
_SC_THREAD_SAFE_FUNCTIONS 200809
|
||||||
|
_SC_THREAD_SPORADIC_SERVER undef
|
||||||
|
_SC_THREAD_STACK_MIN 16384
|
||||||
|
_SC_THREAD_THREADS_MAX undef
|
||||||
|
_SC_THREADS 200809
|
||||||
|
_SC_TIMEOUTS 200809
|
||||||
|
_SC_TIMER_MAX undef
|
||||||
|
_SC_TIMERS 200809
|
||||||
|
_SC_TRACE undef
|
||||||
|
_SC_TRACE_EVENT_FILTER undef
|
||||||
|
_SC_TRACE_EVENT_NAME_MAX undef
|
||||||
|
_SC_TRACE_INHERIT undef
|
||||||
|
_SC_TRACE_LOG undef
|
||||||
|
_SC_TRACE_NAME_MAX undef
|
||||||
|
_SC_TRACE_SYS_MAX undef
|
||||||
|
_SC_TRACE_USER_EVENT_MAX undef
|
||||||
|
_SC_TTY_NAME_MAX 32
|
||||||
|
_SC_TYPED_MEMORY_OBJECTS undef
|
||||||
|
_SC_TZNAME_MAX 6
|
||||||
|
_SC_UCHAR_MAX 255
|
||||||
|
_SC_UINT_MAX 4294967295
|
||||||
|
_SC_UIO_MAXIOV 1024
|
||||||
|
_SC_ULONG_MAX undef
|
||||||
|
_SC_USER_GROUPS undef
|
||||||
|
_SC_USER_GROUPS_R undef
|
||||||
|
_SC_USHRT_MAX 65535
|
||||||
|
_SC_V6_ILP32_OFF32 undef
|
||||||
|
_SC_V6_ILP32_OFFBIG undef
|
||||||
|
_SC_V6_LP64_OFF64 1
|
||||||
|
_SC_V6_LPBIG_OFFBIG undef
|
||||||
|
_SC_V7_ILP32_OFF32 undef
|
||||||
|
_SC_V7_ILP32_OFFBIG undef
|
||||||
|
_SC_V7_LP64_OFF64 1
|
||||||
|
_SC_V7_LPBIG_OFFBIG undef
|
||||||
|
_SC_VERSION 200809
|
||||||
|
_SC_WORD_BIT 32
|
||||||
|
_SC_XBS5_ILP32_OFF32 undef
|
||||||
|
_SC_XBS5_ILP32_OFFBIG undef
|
||||||
|
_SC_XBS5_LP64_OFF64 1
|
||||||
|
_SC_XBS5_LPBIG_OFFBIG undef
|
||||||
|
_SC_XOPEN_CRYPT 1
|
||||||
|
_SC_XOPEN_ENH_I18N 1
|
||||||
|
_SC_XOPEN_LEGACY 1
|
||||||
|
_SC_XOPEN_REALTIME 1
|
||||||
|
_SC_XOPEN_REALTIME_THREADS 1
|
||||||
|
_SC_XOPEN_SHM 1
|
||||||
|
_SC_XOPEN_STREAMS undef
|
||||||
|
_SC_XOPEN_UNIX 1
|
||||||
|
_SC_XOPEN_VERSION 700
|
||||||
|
_SC_XOPEN_XCU_VERSION 4
|
||||||
|
_SC_XOPEN_XPG2 1
|
||||||
|
_SC_XOPEN_XPG3 1
|
||||||
|
_SC_XOPEN_XPG4 1
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_SYSCONF_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
46
extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pm
vendored
Normal file
46
extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pm
vendored
Normal file
|
@ -0,0 +1,46 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Termios;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module', 'POSIX::Termios';
|
||||||
|
|
||||||
|
my @speed = qw/
|
||||||
|
B0 B110 B1200 B134 B150 B1800 B19200 B200 B2400
|
||||||
|
B300 B38400 B4800 B50 B600 B75 B9600
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @flags = qw/
|
||||||
|
BRKINT CLOCAL ECHONL HUPCL ICANON ICRNL IEXTEN IGNBRK IGNCR IGNPAR
|
||||||
|
INLCR INPCK ISIG ISTRIP IXOFF IXON NCCS NOFLSH OPOST PARENB PARMRK
|
||||||
|
PARODD TOSTOP VEOF VEOL VERASE VINTR VKILL VMIN VQUIT VSTART VSTOP
|
||||||
|
VSUSP VTIME
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @actions = qw/
|
||||||
|
TCSADRAIN TCSANOW TCOON TCION TCSAFLUSH TCIOFF TCOOFF
|
||||||
|
/;
|
||||||
|
|
||||||
|
my @flush = qw/TCIOFLUSH TCOFLUSH TCIFLUSH/;
|
||||||
|
my @functions = qw/
|
||||||
|
tcdrain tcflow tcflush tcsendbreak
|
||||||
|
ttyname
|
||||||
|
/;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( speed => \@speed
|
||||||
|
, flags => \@flags
|
||||||
|
, actions => \@actions
|
||||||
|
, flush => \@flush
|
||||||
|
, constants => [@speed, @flags, @actions, @flush]
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
259
extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pod
vendored
Normal file
259
extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pod
vendored
Normal file
|
@ -0,0 +1,259 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Termios - POSIX general terminal interface
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Termios qw(:speed);
|
||||||
|
$termios = POSIX::1003::Termios->new;
|
||||||
|
$ispeed = $termios->getispeed;
|
||||||
|
$termios->setospeed(B9600);
|
||||||
|
|
||||||
|
use POSIX::1003::Termios qw(:functions :actions);
|
||||||
|
tcsendbreak($fd, $duration);
|
||||||
|
tcflush($fd, TCIFLUSH);
|
||||||
|
|
||||||
|
$tty = ttyname($fd);
|
||||||
|
$tty = ttyname($fh->fileno);
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
This module provides an interface to the "General Terminal Interfaces",
|
||||||
|
as specified by POSIX. The actual implementation is part of POSIX.xs
|
||||||
|
|
||||||
|
=head1 METHODS
|
||||||
|
|
||||||
|
=head2 Constructors
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item POSIX::1003::Termios-E<gt>B<new>()
|
||||||
|
|
||||||
|
Create a new Termios object. This object will be destroyed automatically
|
||||||
|
when it is no longer needed. A Termios object corresponds to the
|
||||||
|
termios C struct.
|
||||||
|
|
||||||
|
$termios = POSIX::1003::Termios->new;
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Accessors
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getattr>([FD])
|
||||||
|
|
||||||
|
Get terminal control attributes (POSIX function C<tcgetattr>). Pass a file
|
||||||
|
descriptor, which defaults to C<0> (stdin). Returns C<undef> on failure.
|
||||||
|
|
||||||
|
# Obtain the attributes for stdin
|
||||||
|
$termios->getattr(0);
|
||||||
|
$termios->getattr();
|
||||||
|
|
||||||
|
# Obtain the attributes for stdout
|
||||||
|
$termios->getattr(1);
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getcc>(INDEX)
|
||||||
|
|
||||||
|
Retrieve a value from the C<c_cc> field of a termios object. The c_cc field is
|
||||||
|
an array so an index must be specified.
|
||||||
|
$c_cc[1] = $termios->getcc(1);
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getcflag>()
|
||||||
|
|
||||||
|
Retrieve the C<c_cflag> field of a termios object.
|
||||||
|
$c_cflag = $termios->getcflag;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getiflag>()
|
||||||
|
|
||||||
|
Retrieve the C<c_iflag> field of a termios object.
|
||||||
|
$c_iflag = $termios->getiflag;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getispeed>()
|
||||||
|
|
||||||
|
Retrieve the input baud rate.
|
||||||
|
$ispeed = $termios->getispeed;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getlflag>()
|
||||||
|
|
||||||
|
Retrieve the C<c_lflag> field of a termios object.
|
||||||
|
$c_lflag = $termios->getlflag;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getoflag>()
|
||||||
|
|
||||||
|
Retrieve the C<c_oflag> field of a termios object.
|
||||||
|
$c_oflag = $termios->getoflag;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<getospeed>()
|
||||||
|
|
||||||
|
Retrieve the output baud rate.
|
||||||
|
$ospeed = $termios->getospeed;
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setattr>(FD, FLAGS)
|
||||||
|
|
||||||
|
Set terminal control attributes (POSIX function C<tcsetattr>). Returns
|
||||||
|
C<undef> on failure.
|
||||||
|
|
||||||
|
# Set attributes immediately for stdout.
|
||||||
|
$termios->setattr(1, TCSANOW);
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setcc>(VALUE, INDEX)
|
||||||
|
|
||||||
|
Set a value in the C<c_cc> field of a termios object. The c_cc field is an
|
||||||
|
array so an index must be specified.
|
||||||
|
$termios->setcc(VEOF, 1 );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setcflag>(FLAGS)
|
||||||
|
|
||||||
|
Set the C<c_cflag> field of a termios object.
|
||||||
|
$termios->setcflag( $c_cflag | CLOCAL );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setiflag>(FLAGS)
|
||||||
|
|
||||||
|
Set the C<c_iflag> field of a termios object.
|
||||||
|
$termios->setiflag( $c_iflag | BRKINT );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setispeed>()
|
||||||
|
|
||||||
|
Set the input baud rate. Returns C<undef> on failure.
|
||||||
|
$termios->setispeed( B9600 );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setlflag>(FLAGS)
|
||||||
|
|
||||||
|
Set the C<c_lflag> field of a termios object.
|
||||||
|
$termios->setlflag( $c_lflag | ECHO );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setoflag>(FLAGS)
|
||||||
|
|
||||||
|
Set the c_oflag field of a termios object.
|
||||||
|
$termios->setoflag( $c_oflag | OPOST );
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<setospeed>()
|
||||||
|
|
||||||
|
Set the output baud rate.
|
||||||
|
$termios->setospeed( B9600 );
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<tcdrain>(FD)
|
||||||
|
|
||||||
|
=item B<tcflow>(FD, ACTION)
|
||||||
|
|
||||||
|
See the possible ACTION values in L</CONSTANTS>, import tag C<:action>
|
||||||
|
|
||||||
|
=item B<tcflush>(FD, QUEUE)
|
||||||
|
|
||||||
|
See the possible QUEUE values in L</CONSTANTS>, import tag C<:flush>
|
||||||
|
|
||||||
|
=item B<tcsendbreak>(FD, DURATION)
|
||||||
|
|
||||||
|
DURATION is system dependent.
|
||||||
|
|
||||||
|
=item B<ttyname>(FD)
|
||||||
|
|
||||||
|
Returns the path to the special device which relates to the file-descriptor.
|
||||||
|
See also L<POSIX::1003::Proc::ctermid()|POSIX::1003::Proc/"Standard POSIX functions from unistd.h">
|
||||||
|
|
||||||
|
$tty = ttyname($fd);
|
||||||
|
$tty = ttyname($fh->fileno);
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item Available baudrates (ispeed and ospeed), export tag C<:speed>.
|
||||||
|
|
||||||
|
B0 B50 B75 B110 B134 B150 B200 B300 B600 B1200
|
||||||
|
B1800 B2400 B4800 B9600 B19200 B38400
|
||||||
|
|
||||||
|
=item Interface values (getattr and setattr), export tag C<:actions>.
|
||||||
|
|
||||||
|
TCSADRAIN TCSANOW TCOON TCION TCSAFLUSH TCIOFF TCOOFF
|
||||||
|
|
||||||
|
=item To be used as L<tcflush()|POSIX::1003::Termios/"FUNCTIONS"> parameter QUEUE
|
||||||
|
|
||||||
|
TCIOFLUSH TCOFLUSH TCIFLUSH
|
||||||
|
|
||||||
|
=item c_cc field values, export tag C<:flags> as have all following constants.
|
||||||
|
|
||||||
|
VEOF VEOL VERASE VINTR VKILL VQUIT VSUSP VSTART VSTOP VMIN
|
||||||
|
VTIME NCCS
|
||||||
|
|
||||||
|
=item c_cflag field values
|
||||||
|
|
||||||
|
CLOCAL CREAD CSIZE CS5 CS6 CS7 CS8 CSTOPB HUPCL PARENB PARODD
|
||||||
|
|
||||||
|
=item c_iflag field values
|
||||||
|
|
||||||
|
BRKINT ICRNL IGNBRK IGNCR IGNPAR INLCR INPCK ISTRIP IXOFF
|
||||||
|
IXON PARMRK
|
||||||
|
|
||||||
|
=item c_lflag field values
|
||||||
|
|
||||||
|
ECHO ECHOE ECHOK ECHONL ICANON IEXTEN ISIG NOFLSH TOSTOP
|
||||||
|
|
||||||
|
=item c_oflag field values
|
||||||
|
|
||||||
|
OPOST
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
All constants, shown here with the values discovered during installation
|
||||||
|
of this module:
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_TERMIOS_START
|
||||||
|
|
||||||
|
B0 0 ICANON 2 TCIOFLUSH 2
|
||||||
|
B110 3 ICRNL 256 TCION 3
|
||||||
|
B1200 9 IEXTEN 32768 TCOFLUSH 1
|
||||||
|
B134 4 IGNBRK 1 TCOOFF 0
|
||||||
|
B150 5 IGNCR 128 TCOON 1
|
||||||
|
B1800 10 IGNPAR 4 TCSADRAIN 1
|
||||||
|
B19200 14 INLCR 64 TCSAFLUSH 2
|
||||||
|
B200 6 INPCK 16 TCSANOW 0
|
||||||
|
B2400 11 ISIG 1 TOSTOP 256
|
||||||
|
B300 7 ISTRIP 32 VEOF 4
|
||||||
|
B38400 15 IXOFF 4096 VEOL 11
|
||||||
|
B4800 12 IXON 1024 VERASE 2
|
||||||
|
B50 1 NCCS 32 VINTR 0
|
||||||
|
B600 8 NOFLSH 128 VKILL 3
|
||||||
|
B75 2 OPOST 1 VMIN 6
|
||||||
|
B9600 13 PARENB 256 VQUIT 1
|
||||||
|
BRKINT 2 PARMRK 8 VSTART 8
|
||||||
|
CLOCAL 2048 PARODD 512 VSTOP 9
|
||||||
|
ECHONL 64 TCIFLUSH 0 VSUSP 10
|
||||||
|
HUPCL 1024 TCIOFF 2 VTIME 5
|
||||||
|
|
||||||
|
|
||||||
|
=for comment
|
||||||
|
#TABLE_TERMIOS_END
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
37
extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pm
vendored
Normal file
37
extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pm
vendored
Normal file
|
@ -0,0 +1,37 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
package POSIX::1003::Time;
|
||||||
|
use vars '$VERSION';
|
||||||
|
$VERSION = '0.93';
|
||||||
|
|
||||||
|
use base 'POSIX::1003::Module';
|
||||||
|
|
||||||
|
# Blocks resp. defined in time.h, limits.h
|
||||||
|
my @constants = qw/
|
||||||
|
CLK_TCK CLOCKS_PER_SEC NULL
|
||||||
|
TZNAME_MAX
|
||||||
|
/;
|
||||||
|
|
||||||
|
our @IN_CORE = qw/gmtime localtime/;
|
||||||
|
|
||||||
|
my @functions = qw/
|
||||||
|
asctime ctime strftime
|
||||||
|
clock difftime mktime
|
||||||
|
tzset tzname/;
|
||||||
|
push @functions, @IN_CORE;
|
||||||
|
|
||||||
|
our %EXPORT_TAGS =
|
||||||
|
( constants => \@constants
|
||||||
|
, functions => \@functions
|
||||||
|
);
|
||||||
|
|
||||||
|
|
||||||
|
# Everything in POSIX.xs
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
142
extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pod
vendored
Normal file
142
extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pod
vendored
Normal file
|
@ -0,0 +1,142 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::1003::Time - POSIX handling time
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::1003::Time;
|
||||||
|
|
||||||
|
tzset(); # set-up local timezone from $ENV{TZ}
|
||||||
|
($std, $dst) = tzname; # timezone abbreviations
|
||||||
|
|
||||||
|
$str = ctime($timestamp); # is equivalent to:
|
||||||
|
$str = asctime(localtime($timestamp))
|
||||||
|
|
||||||
|
$str = strftime("%A, %B %d, %Y", 0, 0, 0, 12, 11, 95, 2);
|
||||||
|
# $str contains "Tuesday, December 12, 1995"
|
||||||
|
|
||||||
|
$timestamp = mktime(0, 30, 10, 12, 11, 95);
|
||||||
|
print "Date = ", ctime($timestamp);
|
||||||
|
|
||||||
|
print scalar localtime;
|
||||||
|
my $year = (localtime)[5] + 1900;
|
||||||
|
|
||||||
|
$timespan = difftime($end, $begin);
|
||||||
|
|
||||||
|
=head1 FUNCTIONS
|
||||||
|
|
||||||
|
=head2 Standard POSIX
|
||||||
|
|
||||||
|
B<Warning:> the functions L<asctime()|POSIX::1003::Time/"Standard POSIX">, L<mktime()|POSIX::1003::Time/"Standard POSIX">, and L<strftime()|POSIX::1003::Time/"Standard POSIX">
|
||||||
|
share a weird complex encoding with L<localtime()|POSIX::1003::Time/"Standard POSIX"> and L<gmtime()|POSIX::1003::Time/"Standard POSIX">:
|
||||||
|
the month (C<mon>), weekday (C<wday>), and yearday (C<yday>) begin at
|
||||||
|
zero. I.e. January is 0, not 1; Sunday is 0, not 1; January 1st is 0,
|
||||||
|
not 1. The year (C<year>) is given in years since 1900. I.e., the year
|
||||||
|
1995 is 95; the year 2001 is 101.
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item B<asctime>(SEC, MIN, HOUR, MDAY, MON, YEAR, ...)
|
||||||
|
|
||||||
|
The C<asctime> function uses C<strftime> with a fixed format, to produce
|
||||||
|
timestamps with a trailing new-line. Example:
|
||||||
|
|
||||||
|
"Sun Sep 16 01:03:52 1973\n"
|
||||||
|
|
||||||
|
The parameter order is the same as for L<strftime()|POSIX::1003::Time/"Standard POSIX"> without the C<$fmt>:
|
||||||
|
|
||||||
|
my $str = asctime($sec, $min, $hour, $mday, $mon, $year,
|
||||||
|
$wday, $yday, $isdst);
|
||||||
|
|
||||||
|
=item B<clock>()
|
||||||
|
|
||||||
|
The amount of spent processor time in microseconds.
|
||||||
|
|
||||||
|
=item B<ctime>(TIMESTAMP)
|
||||||
|
|
||||||
|
# equivalent
|
||||||
|
my $str = ctime $timestamp;
|
||||||
|
my $str = asctime localtime $timestamp;
|
||||||
|
|
||||||
|
=item B<difftime>(TIMESTAMP, TIMESTAMP)
|
||||||
|
|
||||||
|
Difference between two TIMESTAMPs, which are floats.
|
||||||
|
|
||||||
|
$timespan = difftime($end, $begin);
|
||||||
|
|
||||||
|
=item B<gmtime>([TIME])
|
||||||
|
|
||||||
|
Simply L<perlfunc/gmtime>
|
||||||
|
|
||||||
|
=item B<localtime>([TIME])
|
||||||
|
|
||||||
|
Simply L<perlfunc/localtime>
|
||||||
|
|
||||||
|
=item B<mktime>(SEC, MIN, HOUR, MDAY, MON, YEAR, ...)
|
||||||
|
|
||||||
|
Convert date/time info to a calendar time.
|
||||||
|
Returns "undef" on failure.
|
||||||
|
|
||||||
|
my $t = mktime(sec, min, hour, mday, mon, year,
|
||||||
|
wday = 0, yday = 0, isdst = -1)
|
||||||
|
|
||||||
|
# Calendar time for December 12, 1995, at 10:30 am
|
||||||
|
$timestamp = mktime(0, 30, 10, 12, 11, 95);
|
||||||
|
print "Date = ", ctime($time_t);
|
||||||
|
|
||||||
|
=item B<strftime>(FMT, SEC, MIN, HOUR, MDAY, MON, YEAR, ...)
|
||||||
|
|
||||||
|
The formatting of C<strftime> is extremely flexible but the parameters
|
||||||
|
are quite tricky. Read carefully!
|
||||||
|
|
||||||
|
my $str = strftime($fmt, $sec, $min, $hour,
|
||||||
|
$mday, $mon, $year, $wday, $yday, $isdst);
|
||||||
|
|
||||||
|
If you want your code to be portable, your format (FMT) argument
|
||||||
|
should use only the conversion specifiers defined by the ANSI C
|
||||||
|
standard (C89, to play safe). These are C<aAbBcdHIjmMpSUwWxXyYZ%>.
|
||||||
|
But even then, the results of some of the conversion specifiers are
|
||||||
|
non-portable.
|
||||||
|
|
||||||
|
=item B<tzname>()
|
||||||
|
|
||||||
|
Returns the strings to be used to represent Standard time (STD)
|
||||||
|
respectively Daylight Savings Time (DST).
|
||||||
|
|
||||||
|
tzset();
|
||||||
|
my ($std, $dst) = tzname;
|
||||||
|
|
||||||
|
=item B<tzset>()
|
||||||
|
|
||||||
|
Set-up local timezone from C<$ENV{TZ}> and the OS.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 CONSTANTS
|
||||||
|
|
||||||
|
=head2 Constants from time.h
|
||||||
|
|
||||||
|
CLK_TCK CLOCKS_PER_SEC NULL
|
||||||
|
|
||||||
|
=head2 Constants from limits.h
|
||||||
|
|
||||||
|
TXNAME_MAX
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
1161
extern/lib/perl5/x86_64-linux/POSIX/Overview.pod
vendored
Normal file
1161
extern/lib/perl5/x86_64-linux/POSIX/Overview.pod
vendored
Normal file
File diff suppressed because it is too large
Load diff
35
extern/lib/perl5/x86_64-linux/POSIX/SigAction.pm
vendored
Normal file
35
extern/lib/perl5/x86_64-linux/POSIX/SigAction.pm
vendored
Normal file
|
@ -0,0 +1,35 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
|
||||||
|
no warnings 'redefine', 'prototype'; # during release of distribution
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
sub POSIX::SigAction::new
|
||||||
|
{ my $class = shift;
|
||||||
|
bless {HANDLER => $_[0], MASK => $_[1], FLAGS => $_[2] || 0, SAFE => 0},
|
||||||
|
$class;
|
||||||
|
}
|
||||||
|
|
||||||
|
#---------------------------
|
||||||
|
|
||||||
|
# We cannot use a "package" statement, because it confuses CPAN: the
|
||||||
|
# namespace is assigned to the perl core distribution.
|
||||||
|
no warnings 'redefine';
|
||||||
|
sub POSIX::SigAction::handler($;$)
|
||||||
|
{ $_[0]->{HANDLER} = $_[1] if @_ > 1; $_[0]->{HANDLER} }
|
||||||
|
|
||||||
|
sub POSIX::SigAction::mask($;$)
|
||||||
|
{ $_[0]->{MASK} = $_[1] if @_ > 1; $_[0]->{MASK} }
|
||||||
|
|
||||||
|
sub POSIX::SigAction::flags($;$)
|
||||||
|
{ $_[0]->{FLAGS} = $_[1] if @_ > 1; $_[0]->{FLAGS} }
|
||||||
|
|
||||||
|
sub POSIX::SigAction::safe($;$)
|
||||||
|
{ $_[0]->{SAFE} = $_[1] if @_ > 1; $_[0]->{SAFE} }
|
||||||
|
|
||||||
|
1;
|
89
extern/lib/perl5/x86_64-linux/POSIX/SigAction.pod
vendored
Normal file
89
extern/lib/perl5/x86_64-linux/POSIX/SigAction.pod
vendored
Normal file
|
@ -0,0 +1,89 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::SigAction - represent a struct sigaction
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
$sigset = POSIX::SigSet->new(SIGINT, SIGQUIT);
|
||||||
|
$sigaction = POSIX::SigAction
|
||||||
|
->new(\&handler, $sigset, SA_NOCLDSTOP);
|
||||||
|
|
||||||
|
$sigset = $sigaction->mask;
|
||||||
|
$sigaction->flags(SA_RESTART);
|
||||||
|
$sigaction->safe(1);
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
The C<POSIX::SigAction> object corresponds to the C C<struct sigaction>,
|
||||||
|
defined by C<signal.h>.
|
||||||
|
|
||||||
|
This module is a bit tricky: POSIX.pm contains the same code for
|
||||||
|
the C<POSIX::SigAction> namespace. However, we do not need POSIX.pm
|
||||||
|
but only the POSIX.xs component which has the namespace hard-coded.
|
||||||
|
|
||||||
|
=head1 METHODS
|
||||||
|
|
||||||
|
=head2 Constructors
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item POSIX::SigAction-E<gt>B<new>(HANDLER, [SIGSET, [FLAGS]])
|
||||||
|
|
||||||
|
The first parameter is the handler, a code reference. The second parameter
|
||||||
|
is a L<POSIX::SigSet|POSIX::SigSet> object, it defaults to the empty set. The third
|
||||||
|
parameter contains the C<sa_flags>, it defaults to 0.
|
||||||
|
|
||||||
|
This object will be destroyed automatically when it is no longer needed.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Accessors
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<flags>()
|
||||||
|
|
||||||
|
Accessor functions to get/set the values of a SigAction object.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<handler>()
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<mask>()
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<safe>()
|
||||||
|
|
||||||
|
Accessor function for the "safe signals" flag of a SigAction object; see
|
||||||
|
L<perlipc> for general information on safe (a.k.a. "deferred") signals. If
|
||||||
|
you wish to handle a signal safely, use this accessor to set the "safe" flag
|
||||||
|
in the C<POSIX::SigAction> object:
|
||||||
|
|
||||||
|
$sigaction->safe(1);
|
||||||
|
|
||||||
|
You may also examine the "safe" flag on the output action object which is
|
||||||
|
filled in when given as the third parameter to
|
||||||
|
L<POSIX::1003::Signals::sigaction()|POSIX::1003::Signals/"Standard POSIX">:
|
||||||
|
|
||||||
|
sigaction(SIGINT, $new_action, $old_action);
|
||||||
|
if ($old_action->safe) {
|
||||||
|
# previous SIGINT handler used safe signals
|
||||||
|
}
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
11
extern/lib/perl5/x86_64-linux/POSIX/SigSet.pm
vendored
Normal file
11
extern/lib/perl5/x86_64-linux/POSIX/SigSet.pm
vendored
Normal file
|
@ -0,0 +1,11 @@
|
||||||
|
# Copyrights 2011-2013 by [Mark Overmeer].
|
||||||
|
# For other contributors see ChangeLog.
|
||||||
|
# See the manual pages for details on the licensing terms.
|
||||||
|
# Pod stripped from pm file by OODoc 2.01.
|
||||||
|
use warnings;
|
||||||
|
use strict;
|
||||||
|
# Implemented in XS
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
88
extern/lib/perl5/x86_64-linux/POSIX/SigSet.pod
vendored
Normal file
88
extern/lib/perl5/x86_64-linux/POSIX/SigSet.pod
vendored
Normal file
|
@ -0,0 +1,88 @@
|
||||||
|
=encoding utf8
|
||||||
|
|
||||||
|
=head1 NAME
|
||||||
|
|
||||||
|
POSIX::SigSet - collect signal flags
|
||||||
|
|
||||||
|
=head1 SYNOPSIS
|
||||||
|
|
||||||
|
use POSIX::SigSet ();
|
||||||
|
use POSIX::1003::Signals;
|
||||||
|
|
||||||
|
$sigset = POSIX::SigSet->new;
|
||||||
|
$sigset = POSIX::SigSet->new(SIGUSR1);
|
||||||
|
$sigset->addset(SIGUSR2);
|
||||||
|
$sigset->delset(SIGUSR2);
|
||||||
|
$sigset->emptyset();
|
||||||
|
$sigset->fillset();
|
||||||
|
if( $sigset->ismember(SIGUSR1) ) { ... }
|
||||||
|
|
||||||
|
=head1 DESCRIPTION
|
||||||
|
|
||||||
|
The C<POSIX::SigSet> object is simple a collection of signal flags. The
|
||||||
|
object is administered in POSIX.xs. See L<POSIX::SigAction|POSIX::SigAction> for
|
||||||
|
examples of its usage.
|
||||||
|
|
||||||
|
=head1 METHODS
|
||||||
|
|
||||||
|
=head2 Constructors
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item POSIX::SigSet-E<gt>B<new>([SIGNALS])
|
||||||
|
|
||||||
|
Create a new SigSet object. One or more SIGNALS can be added immediately.
|
||||||
|
The object will be destroyed automatically when it is no longer needed.
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head2 Other
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<addset>(SIGNAL)
|
||||||
|
|
||||||
|
Add one signal to a SigSet object. Returns C<undef> on failure.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<delset>(SIGNAL)
|
||||||
|
|
||||||
|
Remove one signal from the SigSet object.
|
||||||
|
Returns C<undef> on failure.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<emptyset>()
|
||||||
|
|
||||||
|
Initialize the SigSet object to be empty. Returns C<undef> on failure.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<fillset>()
|
||||||
|
|
||||||
|
Initialize the SigSet object to include all signals. Returns C<undef>
|
||||||
|
on failure.
|
||||||
|
|
||||||
|
=item $obj-E<gt>B<ismember>()
|
||||||
|
|
||||||
|
Tests the SigSet object to see if it contains a specific signal.
|
||||||
|
|
||||||
|
example:
|
||||||
|
|
||||||
|
if($sigset->ismember(SIGUSR1)) {
|
||||||
|
print "contains SIGUSR1\n";
|
||||||
|
}
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
||||||
|
=head1 SEE ALSO
|
||||||
|
|
||||||
|
This module is part of POSIX-1003 distribution version 0.93,
|
||||||
|
built on April 23, 2013. Website: F<http://perl.overmeer.net>. The code is based on L<POSIX>, which
|
||||||
|
is released with Perl itself. See also L<POSIX::Util> for
|
||||||
|
additional functionality.
|
||||||
|
|
||||||
|
=head1 COPYRIGHTS
|
||||||
|
|
||||||
|
Copyrights 2011-2013 on the perl code and the related documentation
|
||||||
|
by [Mark Overmeer]. For other contributors see ChangeLog.
|
||||||
|
|
||||||
|
This program is free software; you can redistribute it and/or modify it
|
||||||
|
under the same terms as Perl itself.
|
||||||
|
See F<http://www.perl.com/perl/misc/Artistic.html>
|
||||||
|
|
42
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/.packlist
vendored
Normal file
42
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/.packlist
vendored
Normal file
|
@ -0,0 +1,42 @@
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Confstr.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Events.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/FS.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/FdIO.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Limit.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Locale.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Math.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Module.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/OS.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Pathconf.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Proc.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Properties.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Signals.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Symbols.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Sysconf.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Termios.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/1003/Time.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/Overview.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/SigAction.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/SigAction.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/SigSet.pm
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/POSIX/SigSet.pod
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.bs
|
||||||
|
/mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.so
|
0
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.bs
vendored
Normal file
0
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.bs
vendored
Normal file
BIN
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.so
vendored
Executable file
BIN
extern/lib/perl5/x86_64-linux/auto/POSIX/1003/1003.so
vendored
Executable file
Binary file not shown.
22
extern/lib/perl5/x86_64-linux/perllocal.pod
vendored
Normal file
22
extern/lib/perl5/x86_64-linux/perllocal.pod
vendored
Normal file
|
@ -0,0 +1,22 @@
|
||||||
|
=head2 Sun Aug 11 17:26:50 2013: C<Module> L<POSIX::1003|POSIX::1003>
|
||||||
|
|
||||||
|
=over 4
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
C<installed into: /mnt/mintdisk/home/ryan/workspace/web_light/extern/lib/perl5>
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
C<LINKTYPE: dynamic>
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
C<VERSION: 0.93>
|
||||||
|
|
||||||
|
=item *
|
||||||
|
|
||||||
|
C<EXE_FILES: >
|
||||||
|
|
||||||
|
=back
|
||||||
|
|
1
lib/POSIX
Symbolic link
1
lib/POSIX
Symbolic link
|
@ -0,0 +1 @@
|
||||||
|
../extern/lib/perl5/x86_64-linux/POSIX
|
491
lib/_h2ph_pre.ph
Normal file
491
lib/_h2ph_pre.ph
Normal file
|
@ -0,0 +1,491 @@
|
||||||
|
# This file was created by h2ph version 3
|
||||||
|
unless (defined &_FILE_OFFSET_BITS) { sub _FILE_OFFSET_BITS() { 64 } }
|
||||||
|
|
||||||
|
unless (defined &_FORTIFY_SOURCE) { sub _FORTIFY_SOURCE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &_LARGEFILE_SOURCE) { sub _LARGEFILE_SOURCE() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &_LP64) { sub _LP64() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &_POSIX_C_SOURCE) { sub _POSIX_C_SOURCE() { 200809 } }
|
||||||
|
|
||||||
|
unless (defined &_POSIX_SOURCE) { sub _POSIX_SOURCE() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_ACQUIRE) { sub __ATOMIC_ACQUIRE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_ACQ_REL) { sub __ATOMIC_ACQ_REL() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_CONSUME) { sub __ATOMIC_CONSUME() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_RELAXED) { sub __ATOMIC_RELAXED() { 0 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_RELEASE) { sub __ATOMIC_RELEASE() { 3 } }
|
||||||
|
|
||||||
|
unless (defined &__ATOMIC_SEQ_CST) { sub __ATOMIC_SEQ_CST() { 5 } }
|
||||||
|
|
||||||
|
unless (defined &__BIGGEST_ALIGNMENT__) { sub __BIGGEST_ALIGNMENT__() { 16 } }
|
||||||
|
|
||||||
|
unless (defined &__BYTE_ORDER__) { sub __BYTE_ORDER__() { 1234 } }
|
||||||
|
|
||||||
|
unless (defined &__CHAR16_TYPE__) { sub __CHAR16_TYPE__() { "short\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__CHAR32_TYPE__) { sub __CHAR32_TYPE__() { "unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__CHAR_BIT__) { sub __CHAR_BIT__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_DECIMAL_DIG__) { sub __DBL_DECIMAL_DIG__() { 17 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_DENORM_MIN__) { sub __DBL_DENORM_MIN__() { "\(double\)4\.94065645841246544177e\-324L" } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_DIG__) { sub __DBL_DIG__() { 15 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_EPSILON__) { sub __DBL_EPSILON__() { "\(double\)2\.22044604925031308085e\-16L" } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_HAS_DENORM__) { sub __DBL_HAS_DENORM__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_HAS_INFINITY__) { sub __DBL_HAS_INFINITY__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_HAS_QUIET_NAN__) { sub __DBL_HAS_QUIET_NAN__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MANT_DIG__) { sub __DBL_MANT_DIG__() { 53 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MAX_10_EXP__) { sub __DBL_MAX_10_EXP__() { 308 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MAX_EXP__) { sub __DBL_MAX_EXP__() { 1024 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MAX__) { sub __DBL_MAX__() { "\(double\)1\.79769313486231570815e\+308L" } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MIN_10_EXP__) { sub __DBL_MIN_10_EXP__() { -307 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MIN_EXP__) { sub __DBL_MIN_EXP__() { -1021 } }
|
||||||
|
|
||||||
|
unless (defined &__DBL_MIN__) { sub __DBL_MIN__() { "\(double\)2\.22507385850720138309e\-308L" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_EPSILON__) { sub __DEC128_EPSILON__() { "1E\-33DL" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_MANT_DIG__) { sub __DEC128_MANT_DIG__() { 34 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_MAX_EXP__) { sub __DEC128_MAX_EXP__() { 6145 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_MAX__) { sub __DEC128_MAX__() { "9\.999999999999999999999999999999999E6144DL" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_MIN_EXP__) { sub __DEC128_MIN_EXP__() { -6142 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_MIN__) { sub __DEC128_MIN__() { "1E\-6143DL" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC128_SUBNORMAL_MIN__) { sub __DEC128_SUBNORMAL_MIN__() { "0\.000000000000000000000000000000001E\-6143DL" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_EPSILON__) { sub __DEC32_EPSILON__() { "1E\-6DF" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_MANT_DIG__) { sub __DEC32_MANT_DIG__() { 7 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_MAX_EXP__) { sub __DEC32_MAX_EXP__() { 97 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_MAX__) { sub __DEC32_MAX__() { "9\.999999E96DF" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_MIN_EXP__) { sub __DEC32_MIN_EXP__() { -94 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_MIN__) { sub __DEC32_MIN__() { "1E\-95DF" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC32_SUBNORMAL_MIN__) { sub __DEC32_SUBNORMAL_MIN__() { "0\.000001E\-95DF" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_EPSILON__) { sub __DEC64_EPSILON__() { "1E\-15DD" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_MANT_DIG__) { sub __DEC64_MANT_DIG__() { 16 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_MAX_EXP__) { sub __DEC64_MAX_EXP__() { 385 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_MAX__) { sub __DEC64_MAX__() { "9\.999999999999999E384DD" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_MIN_EXP__) { sub __DEC64_MIN_EXP__() { -382 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_MIN__) { sub __DEC64_MIN__() { "1E\-383DD" } }
|
||||||
|
|
||||||
|
unless (defined &__DEC64_SUBNORMAL_MIN__) { sub __DEC64_SUBNORMAL_MIN__() { "0\.000000000000001E\-383DD" } }
|
||||||
|
|
||||||
|
unless (defined &__DECIMAL_BID_FORMAT__) { sub __DECIMAL_BID_FORMAT__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__DECIMAL_DIG__) { sub __DECIMAL_DIG__() { 21 } }
|
||||||
|
|
||||||
|
unless (defined &__DEC_EVAL_METHOD__) { sub __DEC_EVAL_METHOD__() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__ELF__) { sub __ELF__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__FINITE_MATH_ONLY__) { sub __FINITE_MATH_ONLY__() { 0 } }
|
||||||
|
|
||||||
|
unless (defined &__FLOAT_WORD_ORDER__) { sub __FLOAT_WORD_ORDER__() { 1234 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_DECIMAL_DIG__) { sub __FLT_DECIMAL_DIG__() { 9 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_DENORM_MIN__) { sub __FLT_DENORM_MIN__() { 1.40129846432481707092e-45 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_DIG__) { sub __FLT_DIG__() { 6 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_EPSILON__) { sub __FLT_EPSILON__() { 1.19209289550781250000e-7 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_EVAL_METHOD__) { sub __FLT_EVAL_METHOD__() { 0 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_HAS_DENORM__) { sub __FLT_HAS_DENORM__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_HAS_INFINITY__) { sub __FLT_HAS_INFINITY__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_HAS_QUIET_NAN__) { sub __FLT_HAS_QUIET_NAN__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MANT_DIG__) { sub __FLT_MANT_DIG__() { 24 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MAX_10_EXP__) { sub __FLT_MAX_10_EXP__() { 38 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MAX_EXP__) { sub __FLT_MAX_EXP__() { 128 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MAX__) { sub __FLT_MAX__() { 3.40282346638528859812e+38 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MIN_10_EXP__) { sub __FLT_MIN_10_EXP__() { -37 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MIN_EXP__) { sub __FLT_MIN_EXP__() { -125 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_MIN__) { sub __FLT_MIN__() { 1.17549435082228750797e-38 } }
|
||||||
|
|
||||||
|
unless (defined &__FLT_RADIX__) { sub __FLT_RADIX__() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_BOOL_LOCK_FREE) { sub __GCC_ATOMIC_BOOL_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_CHAR16_T_LOCK_FREE) { sub __GCC_ATOMIC_CHAR16_T_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_CHAR32_T_LOCK_FREE) { sub __GCC_ATOMIC_CHAR32_T_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_CHAR_LOCK_FREE) { sub __GCC_ATOMIC_CHAR_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_INT_LOCK_FREE) { sub __GCC_ATOMIC_INT_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_LLONG_LOCK_FREE) { sub __GCC_ATOMIC_LLONG_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_LONG_LOCK_FREE) { sub __GCC_ATOMIC_LONG_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_POINTER_LOCK_FREE) { sub __GCC_ATOMIC_POINTER_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_SHORT_LOCK_FREE) { sub __GCC_ATOMIC_SHORT_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_TEST_AND_SET_TRUEVAL) { sub __GCC_ATOMIC_TEST_AND_SET_TRUEVAL() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_ATOMIC_WCHAR_T_LOCK_FREE) { sub __GCC_ATOMIC_WCHAR_T_LOCK_FREE() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_HAVE_DWARF2_CFI_ASM) { sub __GCC_HAVE_DWARF2_CFI_ASM() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_HAVE_SYNC_COMPARE_AND_SWAP_1) { sub __GCC_HAVE_SYNC_COMPARE_AND_SWAP_1() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_HAVE_SYNC_COMPARE_AND_SWAP_2) { sub __GCC_HAVE_SYNC_COMPARE_AND_SWAP_2() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_HAVE_SYNC_COMPARE_AND_SWAP_4) { sub __GCC_HAVE_SYNC_COMPARE_AND_SWAP_4() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GCC_HAVE_SYNC_COMPARE_AND_SWAP_8) { sub __GCC_HAVE_SYNC_COMPARE_AND_SWAP_8() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GLIBC_MINOR__) { sub __GLIBC_MINOR__() { 15 } }
|
||||||
|
|
||||||
|
unless (defined &__GLIBC__) { sub __GLIBC__() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GNUC_GNU_INLINE__) { sub __GNUC_GNU_INLINE__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__GNUC_MINOR__) { sub __GNUC_MINOR__() { 7 } }
|
||||||
|
|
||||||
|
unless (defined &__GNUC_PATCHLEVEL__) { sub __GNUC_PATCHLEVEL__() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__GNUC__) { sub __GNUC__() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__GNU_LIBRARY__) { sub __GNU_LIBRARY__() { 6 } }
|
||||||
|
|
||||||
|
unless (defined &__GXX_ABI_VERSION) { sub __GXX_ABI_VERSION() { 1002 } }
|
||||||
|
|
||||||
|
unless (defined &__INT16_C) { sub __INT16_C($) { my ($c) = @_; "${c}" } }
|
||||||
|
|
||||||
|
unless (defined &__INT16_MAX__) { sub __INT16_MAX__() { 32767 } }
|
||||||
|
|
||||||
|
unless (defined &__INT16_TYPE__) { sub __INT16_TYPE__() { "short\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT32_C) { sub __INT32_C($) { my ($c) = @_; "${c}" } }
|
||||||
|
|
||||||
|
unless (defined &__INT32_MAX__) { sub __INT32_MAX__() { 2147483647 } }
|
||||||
|
|
||||||
|
unless (defined &__INT32_TYPE__) { sub __INT32_TYPE__() { "int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT64_C) { sub __INT64_C($) { my ($c) = @_; "${c}L" } }
|
||||||
|
|
||||||
|
unless (defined &__INT64_MAX__) { sub __INT64_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INT64_TYPE__) { sub __INT64_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT8_C) { sub __INT8_C($) { my ($c) = @_; "${c}" } }
|
||||||
|
|
||||||
|
unless (defined &__INT8_MAX__) { sub __INT8_MAX__() { 127 } }
|
||||||
|
|
||||||
|
unless (defined &__INT8_TYPE__) { sub __INT8_TYPE__() { "signed\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__INTMAX_C) { sub __INTMAX_C($) { my ($c) = @_; "${c}L" } }
|
||||||
|
|
||||||
|
unless (defined &__INTMAX_MAX__) { sub __INTMAX_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INTMAX_TYPE__) { sub __INTMAX_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INTPTR_MAX__) { sub __INTPTR_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INTPTR_TYPE__) { sub __INTPTR_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST16_MAX__) { sub __INT_FAST16_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST16_TYPE__) { sub __INT_FAST16_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST32_MAX__) { sub __INT_FAST32_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST32_TYPE__) { sub __INT_FAST32_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST64_MAX__) { sub __INT_FAST64_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST64_TYPE__) { sub __INT_FAST64_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST8_MAX__) { sub __INT_FAST8_MAX__() { 127 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_FAST8_TYPE__) { sub __INT_FAST8_TYPE__() { "signed\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST16_MAX__) { sub __INT_LEAST16_MAX__() { 32767 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST16_TYPE__) { sub __INT_LEAST16_TYPE__() { "short\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST32_MAX__) { sub __INT_LEAST32_MAX__() { 2147483647 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST32_TYPE__) { sub __INT_LEAST32_TYPE__() { "int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST64_MAX__) { sub __INT_LEAST64_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST64_TYPE__) { sub __INT_LEAST64_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST8_MAX__) { sub __INT_LEAST8_MAX__() { 127 } }
|
||||||
|
|
||||||
|
unless (defined &__INT_LEAST8_TYPE__) { sub __INT_LEAST8_TYPE__() { "signed\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__INT_MAX__) { sub __INT_MAX__() { 2147483647 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_DENORM_MIN__) { sub __LDBL_DENORM_MIN__() { 3.64519953188247460253e-4951 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_DIG__) { sub __LDBL_DIG__() { 18 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_EPSILON__) { sub __LDBL_EPSILON__() { 1.08420217248550443401e-19 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_HAS_DENORM__) { sub __LDBL_HAS_DENORM__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_HAS_INFINITY__) { sub __LDBL_HAS_INFINITY__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_HAS_QUIET_NAN__) { sub __LDBL_HAS_QUIET_NAN__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MANT_DIG__) { sub __LDBL_MANT_DIG__() { 64 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MAX_10_EXP__) { sub __LDBL_MAX_10_EXP__() { 4932 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MAX_EXP__) { sub __LDBL_MAX_EXP__() { 16384 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MAX__) { sub __LDBL_MAX__() { 1.18973149535723176502e+4932 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MIN_10_EXP__) { sub __LDBL_MIN_10_EXP__() { -4931 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MIN_EXP__) { sub __LDBL_MIN_EXP__() { -16381 } }
|
||||||
|
|
||||||
|
unless (defined &__LDBL_MIN__) { sub __LDBL_MIN__() { 3.36210314311209350626e-4932 } }
|
||||||
|
|
||||||
|
unless (defined &__LONG_LONG_MAX__) { sub __LONG_LONG_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__LONG_MAX__) { sub __LONG_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__LP64__) { sub __LP64__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__MMX__) { sub __MMX__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__ORDER_BIG_ENDIAN__) { sub __ORDER_BIG_ENDIAN__() { 4321 } }
|
||||||
|
|
||||||
|
unless (defined &__ORDER_LITTLE_ENDIAN__) { sub __ORDER_LITTLE_ENDIAN__() { 1234 } }
|
||||||
|
|
||||||
|
unless (defined &__ORDER_PDP_ENDIAN__) { sub __ORDER_PDP_ENDIAN__() { 3412 } }
|
||||||
|
|
||||||
|
unless (defined &__PRAGMA_REDEFINE_EXTNAME) { sub __PRAGMA_REDEFINE_EXTNAME() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__PTRDIFF_MAX__) { sub __PTRDIFF_MAX__() { 9223372036854775807 } }
|
||||||
|
|
||||||
|
unless (defined &__PTRDIFF_TYPE__) { sub __PTRDIFF_TYPE__() { "long\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__SCHAR_MAX__) { sub __SCHAR_MAX__() { 127 } }
|
||||||
|
|
||||||
|
unless (defined &__SHRT_MAX__) { sub __SHRT_MAX__() { 32767 } }
|
||||||
|
|
||||||
|
unless (defined &__SIG_ATOMIC_MAX__) { sub __SIG_ATOMIC_MAX__() { 2147483647 } }
|
||||||
|
|
||||||
|
unless (defined &__SIG_ATOMIC_MIN__) { sub __SIG_ATOMIC_MIN__() { "\-2147483647\\\ \-\\\ 1" } }
|
||||||
|
|
||||||
|
unless (defined &__SIG_ATOMIC_TYPE__) { sub __SIG_ATOMIC_TYPE__() { "int" } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_DOUBLE__) { sub __SIZEOF_DOUBLE__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_FLOAT__) { sub __SIZEOF_FLOAT__() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_INT128__) { sub __SIZEOF_INT128__() { 16 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_INT__) { sub __SIZEOF_INT__() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_LONG_DOUBLE__) { sub __SIZEOF_LONG_DOUBLE__() { 16 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_LONG_LONG__) { sub __SIZEOF_LONG_LONG__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_LONG__) { sub __SIZEOF_LONG__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_POINTER__) { sub __SIZEOF_POINTER__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_PTRDIFF_T__) { sub __SIZEOF_PTRDIFF_T__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_SHORT__) { sub __SIZEOF_SHORT__() { 2 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_SIZE_T__) { sub __SIZEOF_SIZE_T__() { 8 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_WCHAR_T__) { sub __SIZEOF_WCHAR_T__() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZEOF_WINT_T__) { sub __SIZEOF_WINT_T__() { 4 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZE_MAX__) { sub __SIZE_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__SIZE_TYPE__) { sub __SIZE_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__SSE2_MATH__) { sub __SSE2_MATH__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__SSE2__) { sub __SSE2__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__SSE_MATH__) { sub __SSE_MATH__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__SSE__) { sub __SSE__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__SSP__) { sub __SSP__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__STDC_HOSTED__) { sub __STDC_HOSTED__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__STDC__) { sub __STDC__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT16_C) { sub __UINT16_C($) { my ($c) = @_; "${c}" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT16_MAX__) { sub __UINT16_MAX__() { 65535 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT16_TYPE__) { sub __UINT16_TYPE__() { "short\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT32_C) { sub __UINT32_C($) { my ($c) = @_; "${c}U" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT32_MAX__) { sub __UINT32_MAX__() { 4294967295 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT32_TYPE__) { sub __UINT32_TYPE__() { "unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT64_C) { sub __UINT64_C($) { my ($c) = @_; "${c}UL" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT64_MAX__) { sub __UINT64_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT64_TYPE__) { sub __UINT64_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT8_C) { sub __UINT8_C($) { my ($c) = @_; "${c}" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT8_MAX__) { sub __UINT8_MAX__() { 255 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT8_TYPE__) { sub __UINT8_TYPE__() { "unsigned\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__UINTMAX_C) { sub __UINTMAX_C($) { my ($c) = @_; "${c}UL" } }
|
||||||
|
|
||||||
|
unless (defined &__UINTMAX_MAX__) { sub __UINTMAX_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINTMAX_TYPE__) { sub __UINTMAX_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINTPTR_MAX__) { sub __UINTPTR_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINTPTR_TYPE__) { sub __UINTPTR_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST16_MAX__) { sub __UINT_FAST16_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST16_TYPE__) { sub __UINT_FAST16_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST32_MAX__) { sub __UINT_FAST32_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST32_TYPE__) { sub __UINT_FAST32_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST64_MAX__) { sub __UINT_FAST64_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST64_TYPE__) { sub __UINT_FAST64_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST8_MAX__) { sub __UINT_FAST8_MAX__() { 255 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_FAST8_TYPE__) { sub __UINT_FAST8_TYPE__() { "unsigned\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST16_MAX__) { sub __UINT_LEAST16_MAX__() { 65535 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST16_TYPE__) { sub __UINT_LEAST16_TYPE__() { "short\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST32_MAX__) { sub __UINT_LEAST32_MAX__() { 4294967295 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST32_TYPE__) { sub __UINT_LEAST32_TYPE__() { "unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST64_MAX__) { sub __UINT_LEAST64_MAX__() { 18446744073709551615 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST64_TYPE__) { sub __UINT_LEAST64_TYPE__() { "long\\\ unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST8_MAX__) { sub __UINT_LEAST8_MAX__() { 255 } }
|
||||||
|
|
||||||
|
unless (defined &__UINT_LEAST8_TYPE__) { sub __UINT_LEAST8_TYPE__() { "unsigned\\\ char" } }
|
||||||
|
|
||||||
|
unless (defined &__USE_BSD) { sub __USE_BSD() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_FILE_OFFSET64) { sub __USE_FILE_OFFSET64() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_LARGEFILE) { sub __USE_LARGEFILE() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_MISC) { sub __USE_MISC() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_POSIX) { sub __USE_POSIX() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_POSIX199309) { sub __USE_POSIX199309() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_POSIX199506) { sub __USE_POSIX199506() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_POSIX2) { sub __USE_POSIX2() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__USE_SVID) { sub __USE_SVID() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__VERSION__) { sub __VERSION__() { "\"4\.7\.2\"" } }
|
||||||
|
|
||||||
|
unless (defined &__WCHAR_MAX__) { sub __WCHAR_MAX__() { 2147483647 } }
|
||||||
|
|
||||||
|
unless (defined &__WCHAR_MIN__) { sub __WCHAR_MIN__() { "\-2147483647\\\ \-\\\ 1" } }
|
||||||
|
|
||||||
|
unless (defined &__WCHAR_TYPE__) { sub __WCHAR_TYPE__() { "int" } }
|
||||||
|
|
||||||
|
unless (defined &__WINT_MAX__) { sub __WINT_MAX__() { 4294967295 } }
|
||||||
|
|
||||||
|
unless (defined &__WINT_MIN__) { sub __WINT_MIN__() { 0 } }
|
||||||
|
|
||||||
|
unless (defined &__WINT_TYPE__) { sub __WINT_TYPE__() { "unsigned\\\ int" } }
|
||||||
|
|
||||||
|
unless (defined &__amd64) { sub __amd64() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__amd64__) { sub __amd64__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__gnu_linux__) { sub __gnu_linux__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__k8) { sub __k8() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__k8__) { sub __k8__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__linux) { sub __linux() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__linux__) { sub __linux__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__unix) { sub __unix() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__unix__) { sub __unix__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__x86_64) { sub __x86_64() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &__x86_64__) { sub __x86_64__() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &linux) { sub linux() { 1 } }
|
||||||
|
|
||||||
|
unless (defined &unix) { sub unix() { 1 } }
|
||||||
|
|
||||||
|
|
||||||
|
1;
|
1
lib/auto
Symbolic link
1
lib/auto
Symbolic link
|
@ -0,0 +1 @@
|
||||||
|
../extern/lib/perl5/x86_64-linux/auto
|
1
lib/syscall.h
Normal file
1
lib/syscall.h
Normal file
|
@ -0,0 +1 @@
|
||||||
|
#include <sys/syscall.h>
|
6
lib/syscall.ph
Normal file
6
lib/syscall.ph
Normal file
|
@ -0,0 +1,6 @@
|
||||||
|
require '_h2ph_pre.ph';
|
||||||
|
|
||||||
|
no warnings qw(redefine misc);
|
||||||
|
|
||||||
|
require 'sys/syscall.ph';
|
||||||
|
1;
|
Loading…
Add table
Reference in a new issue