Result:
found more than 1183 distributions - search limited to the first 2001 files matching your query
( run in 3.748 )
Storable
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Stow
view release on metacpan or search on metacpan
automake/install-sh view on Meta::CPAN
# Put in absolute file names if you don't have them in your path;
# or use environment vars.
chgrpprog=${CHGRPPROG-chgrp}
chmodprog=${CHMODPROG-chmod}
chownprog=${CHOWNPROG-chown}
cmpprog=${CMPPROG-cmp}
cpprog=${CPPROG-cp}
mkdirprog=${MKDIRPROG-mkdir}
mvprog=${MVPROG-mv}
rmprog=${RMPROG-rm}
automake/install-sh view on Meta::CPAN
# Desired mode of installed file.
mode=0755
chgrpcmd=
chmodcmd=$chmodprog
chowncmd=
mvcmd=$mvprog
rmcmd="$rmprog -f"
stripcmd=
src=
automake/install-sh view on Meta::CPAN
-c (ignored)
-C install only if different (preserve the last data modification time)
-d create directories instead of installing files.
-g GROUP $chgrpprog installed files to GROUP.
-m MODE $chmodprog installed files to MODE.
-o USER $chownprog installed files to USER.
-s $stripprog installed files.
-t DIRECTORY install into DIRECTORY.
-T report an error if DSTFILE is a directory.
Environment variables override the default commands:
automake/install-sh view on Meta::CPAN
echo "$0: invalid mode: $mode" >&2
exit 1;;
esac
shift;;
-o) chowncmd="$chownprog $2"
shift;;
-s) stripcmd=$stripprog;;
-t)
automake/install-sh view on Meta::CPAN
fi
fi
fi
if test -n "$dir_arg"; then
{ test -z "$chowncmd" || $doit $chowncmd "$dst"; } &&
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dst"; } &&
{ test "$obsolete_mkdir_used$chowncmd$chgrpcmd" = false ||
test -z "$chmodcmd" || $doit $chmodcmd $mode "$dst"; } || exit 1
else
# Make a couple of temp file names in the proper directory.
dsttmp=${dstdirslash}_inst.$$_
automake/install-sh view on Meta::CPAN
#
# If any of these fail, we abort the whole thing. If we want to
# ignore errors from any of these, just make sure not to ignore
# errors from the above "$doit $cpprog $src $dsttmp" command.
#
{ test -z "$chowncmd" || $doit $chowncmd "$dsttmp"; } &&
{ test -z "$chgrpcmd" || $doit $chgrpcmd "$dsttmp"; } &&
{ test -z "$stripcmd" || $doit $stripcmd "$dsttmp"; } &&
{ test -z "$chmodcmd" || $doit $chmodcmd $mode "$dsttmp"; } &&
# If -C, don't bother to copy if it wouldn't change the file.
Strict-Perl
view release on metacpan or search on metacpan
lib/Strict/Perl.pm view on Meta::CPAN
my $package = (caller(1))[0];
for my $function (
qw(seek sysseek), # :io (excluded: read sysread syswrite)
qw(dbmclose dbmopen), # :dbm
qw(binmode close chmod chown fcntl flock ioctl truncate), # :file (excluded: fileno)
qw(chdir closedir link mkdir readlink rename rmdir symlink), # :filesys (excluded: unlink)
qw(msgctl msgget msgrcv msgsnd), # :msg
qw(semctl semget semop), # :semaphore
qw(shmctl shmget shmread), # :shm
qw(bind connect getsockopt listen recv send setsockopt shutdown socketpair), # :socket
lib/Strict/Perl.pm view on Meta::CPAN
use warnings qw(FATAL all); # not follow incompatible version-up of warnings.pm
use Fatal # by compatible routine in Strict::Perl
qw(
seek sysseek
dbmclose dbmopen
binmode close chmod chown fcntl flock ioctl open sysopen truncate
chdir closedir opendir link mkdir readlink rename rmdir symlink
pipe
msgctl msgget msgrcv msgsnd
semctl semget semop
shmctl shmget shmread
lib/Strict/Perl.pm view on Meta::CPAN
use warnings qw(FATAL all); # not follow incompatible version-up of warnings.pm
use Fatal # by compatible routine in Strict::Perl
qw(
seek sysseek
dbmclose dbmopen
binmode close chmod chown fcntl flock ioctl open sysopen truncate
chdir closedir opendir link mkdir readlink rename rmdir symlink
pipe
msgctl msgget msgrcv msgsnd
semctl semget semop
shmctl shmget shmread
lib/Strict/Perl.pm view on Meta::CPAN
$SIG{__WARN__} = sub { die "$_[0]\n" }; # not follow incompatible version-up of warnings.pm
use Fatal # by compatible routine in Strict::Perl
qw(
seek sysseek
dbmclose dbmopen
binmode close chmod chown fcntl flock ioctl open sysopen truncate
chdir closedir opendir link mkdir readlink rename rmdir symlink
pipe
msgctl msgget msgrcv msgsnd
semctl semget semop
shmctl shmget shmread
Sub-Call-Tail
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Sub-Deferrable
view release on metacpan or search on metacpan
Debian_CPANTS.txt view on Meta::CPAN
"liblatex-decode-perl", "LaTeX-Decode", "0.03", "0", "1"
"liblatex-driver-perl", "LaTeX-Driver", "0.08", "0", "6"
"liblatex-encode-perl", "LaTeX-Encode", "0.03", "1", "1"
"liblatex-table-perl", "LaTeX-Table", "1.0.6", "0", "0"
"liblayout-manager-perl", "Layout-Manager", "0.34", "0", "0"
"liblchown-perl", "Lchown", "1.01", "0", "0"
"liblexical-persistence-perl", "Lexical-Persistence", "0.98", "1", "0"
"liblingua-en-inflect-number-perl", "Lingua-EN-Inflect-Number", "1.1", "0", "0"
"liblingua-en-inflect-perl", "Lingua-EN-Inflect", "1.893", "0", "1"
"liblingua-en-inflect-phrase-perl", "Lingua-EN-Inflect-Phrase", "0.04", "0", "0"
"liblingua-en-nameparse-perl", "Lingua-EN-NameParse", "1.30", "0", "2"
Sub-HandlesVia-XS
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Sub-Name
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Syntax-Feature-Loop
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Syntax-Feature-QwComments
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Syntax-Feature-Void
view release on metacpan or search on metacpan
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Syntax-Highlight-Engine-Kate
view release on metacpan or search on metacpan
lib/Syntax/Highlight/Engine/Kate/Bash.pm view on Meta::CPAN
'chfn',
'chgrp',
'chgrp',
'chmod',
'chmod',
'chown',
'chown',
'chroot',
'chsh',
'chvt',
'clear',
'cmp',
Syntax-Highlight-Engine-Simple-Perl
view release on metacpan or search on metacpan
lib/Syntax/Highlight/Engine/Simple/Perl.pm view on Meta::CPAN
'bless',
'break',
'chdir',
'chmod',
'chomp',
'chown',
'close',
'crypt',
'fcntl',
'flock',
'index',
Syntax-Highlight-Engine-Simple
view release on metacpan or search on metacpan
t/subclass.t view on Meta::CPAN
'bless',
'break',
'chdir',
'chmod',
'chomp',
'chown',
'close',
'crypt',
'fcntl',
'flock',
'index',
Syntax-Highlight-Perl-Improved
view release on metacpan or search on metacpan
lib/Syntax/Highlight/Perl/Improved.pm view on Meta::CPAN
| index
| undef
| lstat
| times
| srand
| chown
| fcntl
| close
| write
| umask
| rmdir
Syntax-Highlight-Perl
view release on metacpan or search on metacpan
lib/Syntax/Highlight/Perl.pm view on Meta::CPAN
| index
| undef
| lstat
| times
| srand
| chown
| fcntl
| close
| write
| umask
| rmdir
Syntax-Highlight-Universal
view release on metacpan or search on metacpan
lib/Syntax/Highlight/Universal/hrc/auto/gen/ant.hrc view on Meta::CPAN
<inherit scheme="javadoc-element"/>
<inherit scheme="p4integrate-element"/>
<inherit scheme="translate-element"/>
<inherit scheme="signjar-element"/>
<inherit scheme="cclock-element"/>
<inherit scheme="chown-element"/>
<inherit scheme="vajload-element"/>
<inherit scheme="jarlib-available-element"/>
<inherit scheme="WsdlToDotnet-element"/>
<inherit scheme="buildnumber-element"/>
<inherit scheme="jpcovmerge-element"/>
lib/Syntax/Highlight/Universal/hrc/auto/gen/ant.hrc view on Meta::CPAN
<block start="/\M < (%nsprefix;signjar ([\s\/>]|$) )/x" end="/ > /x" scheme="_hrc_int_d0e2764-elementContent"/>
</scheme>
<scheme name="cclock-element">
<block start="/\M < (%nsprefix;cclock ([\s\/>]|$) )/x" end="/ > /x" scheme="_hrc_int_d0e2784-elementContent"/>
</scheme>
<scheme name="chown-element">
<block start="/\M < (%nsprefix;chown ([\s\/>]|$) )/x" end="/ > /x" scheme="_hrc_int_d0e2797-elementContent"/>
</scheme>
<scheme name="targetfile-element">
<block start="/\M < (%nsprefix;targetfile ([\s\/>]|$) )/x" end="/ > /x" scheme="_hrc_int_d0e2847-elementContent"/>
</scheme>
<scheme name="srcfile-element">
lib/Syntax/Highlight/Universal/hrc/auto/gen/ant.hrc view on Meta::CPAN
<virtual scheme="xml:content.cdata" subst-scheme="xml:badChar"/>
<virtual scheme="xml:Attribute.any" subst-scheme="_hrc_int_d0e2784-Attributes"/>
</inherit>
</scheme>
<!--
parent: chown
-->
<scheme name="_hrc_int_d0e2797-content">
<inherit scheme="arg-element"/>
<inherit scheme="fileset-element"/>
Syntax-Infix-Smartmatch
view release on metacpan or search on metacpan
lib/Syntax/Infix/ppport.h view on Meta::CPAN
KEY_chdir|5.003007||Viu
KEY_CHECK|5.006000||Viu
KEY_chmod|5.003007||Viu
KEY_chomp|5.003007||Viu
KEY_chop|5.003007||Viu
KEY_chown|5.003007||Viu
KEY_chr|5.003007||Viu
KEY_chroot|5.003007||Viu
KEY_close|5.003007||Viu
KEY_closedir|5.003007||Viu
KEY_cmp|5.003007||Viu
lib/Syntax/Infix/ppport.h view on Meta::CPAN
PERL_LANGINFO_H|5.027004||Viu
PERL_LAST_5_18_0_INTERP_MEMBER|5.017009||Viu
Perl_ldexp|5.021003|5.021003|n
PerlLIO_access|5.005000||Viu
PerlLIO_chmod|5.005000||Viu
PerlLIO_chown|5.005000||Viu
PerlLIO_chsize|5.005000||Viu
PerlLIO_close|5.005000||Viu
PerlLIO_dup2|5.005000||Viu
PerlLIO_dup2_cloexec|5.027008||Viu
PerlLIO_dup|5.005000||Viu
Syntax-Kamelon
view release on metacpan or search on metacpan
lib/Syntax/Kamelon/XML/apparmor.xml view on Meta::CPAN
<list name="rule_capability">
<item>audit_control</item>
<item>audit_read</item>
<item>audit_write</item>
<item>block_suspend</item>
<item>chown</item>
<item>dac_override</item>
<item>dac_read_search</item>
<item>fowner</item>
<item>fsetid</item>
<item>ipc_lock</item>
Sys-Binmode
view release on metacpan or search on metacpan
lib/Sys/Binmode.pm view on Meta::CPAN
=item * C<exec>, C<system>, and C<readpipe>
=item * C<do> and C<require>
=item * File tests (e.g., C<-e>) and the following:
C<chdir>, C<chmod>, C<chown>, C<chroot>, C<ioctl>,
C<link>, C<lstat>, C<mkdir>, C<open>, C<opendir>, C<readlink>, C<rename>,
C<rmdir>, C<stat>, C<symlink>, C<sysopen>, C<truncate>,
C<unlink>, C<utime>
=item * C<bind>, C<connect>, C<setsockopt>, and C<send> (last argument)
Sys-Config-Manage
view release on metacpan or search on metacpan
lib/Sys/Config/Manage/Ownership.pm view on Meta::CPAN
}
#try to chmod it
if(!chmod( $uid, $gid, $files[$int] )){
$self->{error}='17';
$self->{errorString}='chown( '.$uid.', '.$gid.', "'.$files[$int].'") errored';
$self->warn;
return undef;
}
$int++;
Sys-Ebpf
view release on metacpan or search on metacpan
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
eval 'sub __NR_execve () {11;}' unless defined(&__NR_execve);
eval 'sub __NR_chdir () {12;}' unless defined(&__NR_chdir);
eval 'sub __NR_time () {13;}' unless defined(&__NR_time);
eval 'sub __NR_mknod () {14;}' unless defined(&__NR_mknod);
eval 'sub __NR_chmod () {15;}' unless defined(&__NR_chmod);
eval 'sub __NR_lchown () {16;}' unless defined(&__NR_lchown);
eval 'sub __NR_break () {17;}' unless defined(&__NR_break);
eval 'sub __NR_oldstat () {18;}' unless defined(&__NR_oldstat);
eval 'sub __NR_lseek () {19;}' unless defined(&__NR_lseek);
eval 'sub __NR_getpid () {20;}' unless defined(&__NR_getpid);
eval 'sub __NR_mount () {21;}' unless defined(&__NR_mount);
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
eval 'sub __NR_mmap () {90;}' unless defined(&__NR_mmap);
eval 'sub __NR_munmap () {91;}' unless defined(&__NR_munmap);
eval 'sub __NR_truncate () {92;}' unless defined(&__NR_truncate);
eval 'sub __NR_ftruncate () {93;}' unless defined(&__NR_ftruncate);
eval 'sub __NR_fchmod () {94;}' unless defined(&__NR_fchmod);
eval 'sub __NR_fchown () {95;}' unless defined(&__NR_fchown);
eval 'sub __NR_getpriority () {96;}' unless defined(&__NR_getpriority);
eval 'sub __NR_setpriority () {97;}' unless defined(&__NR_setpriority);
eval 'sub __NR_profil () {98;}' unless defined(&__NR_profil);
eval 'sub __NR_statfs () {99;}' unless defined(&__NR_statfs);
eval 'sub __NR_fstatfs () {100;}' unless defined(&__NR_fstatfs);
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
eval 'sub __NR_rt_sigtimedwait () {177;}' unless defined(&__NR_rt_sigtimedwait);
eval 'sub __NR_rt_sigqueueinfo () {178;}' unless defined(&__NR_rt_sigqueueinfo);
eval 'sub __NR_rt_sigsuspend () {179;}' unless defined(&__NR_rt_sigsuspend);
eval 'sub __NR_pread64 () {180;}' unless defined(&__NR_pread64);
eval 'sub __NR_pwrite64 () {181;}' unless defined(&__NR_pwrite64);
eval 'sub __NR_chown () {182;}' unless defined(&__NR_chown);
eval 'sub __NR_getcwd () {183;}' unless defined(&__NR_getcwd);
eval 'sub __NR_capget () {184;}' unless defined(&__NR_capget);
eval 'sub __NR_capset () {185;}' unless defined(&__NR_capset);
eval 'sub __NR_sigaltstack () {186;}' unless defined(&__NR_sigaltstack);
eval 'sub __NR_sendfile () {187;}' unless defined(&__NR_sendfile);
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
eval 'sub __NR_truncate64 () {193;}' unless defined(&__NR_truncate64);
eval 'sub __NR_ftruncate64 () {194;}' unless defined(&__NR_ftruncate64);
eval 'sub __NR_stat64 () {195;}' unless defined(&__NR_stat64);
eval 'sub __NR_lstat64 () {196;}' unless defined(&__NR_lstat64);
eval 'sub __NR_fstat64 () {197;}' unless defined(&__NR_fstat64);
eval 'sub __NR_lchown32 () {198;}' unless defined(&__NR_lchown32);
eval 'sub __NR_getuid32 () {199;}' unless defined(&__NR_getuid32);
eval 'sub __NR_getgid32 () {200;}' unless defined(&__NR_getgid32);
eval 'sub __NR_geteuid32 () {201;}' unless defined(&__NR_geteuid32);
eval 'sub __NR_getegid32 () {202;}' unless defined(&__NR_getegid32);
eval 'sub __NR_setreuid32 () {203;}' unless defined(&__NR_setreuid32);
eval 'sub __NR_setregid32 () {204;}' unless defined(&__NR_setregid32);
eval 'sub __NR_getgroups32 () {205;}' unless defined(&__NR_getgroups32);
eval 'sub __NR_setgroups32 () {206;}' unless defined(&__NR_setgroups32);
eval 'sub __NR_fchown32 () {207;}' unless defined(&__NR_fchown32);
eval 'sub __NR_setresuid32 () {208;}' unless defined(&__NR_setresuid32);
eval 'sub __NR_getresuid32 () {209;}' unless defined(&__NR_getresuid32);
eval 'sub __NR_setresgid32 () {210;}' unless defined(&__NR_setresgid32);
eval 'sub __NR_getresgid32 () {211;}' unless defined(&__NR_getresgid32);
eval 'sub __NR_chown32 () {212;}' unless defined(&__NR_chown32);
eval 'sub __NR_setuid32 () {213;}' unless defined(&__NR_setuid32);
eval 'sub __NR_setgid32 () {214;}' unless defined(&__NR_setgid32);
eval 'sub __NR_setfsuid32 () {215;}' unless defined(&__NR_setfsuid32);
eval 'sub __NR_setfsgid32 () {216;}' unless defined(&__NR_setfsgid32);
eval 'sub __NR_pivot_root () {217;}' unless defined(&__NR_pivot_root);
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
eval 'sub __NR_inotify_rm_watch () {293;}' unless defined(&__NR_inotify_rm_watch);
eval 'sub __NR_migrate_pages () {294;}' unless defined(&__NR_migrate_pages);
eval 'sub __NR_openat () {295;}' unless defined(&__NR_openat);
eval 'sub __NR_mkdirat () {296;}' unless defined(&__NR_mkdirat);
eval 'sub __NR_mknodat () {297;}' unless defined(&__NR_mknodat);
eval 'sub __NR_fchownat () {298;}' unless defined(&__NR_fchownat);
eval 'sub __NR_futimesat () {299;}' unless defined(&__NR_futimesat);
eval 'sub __NR_fstatat64 () {300;}' unless defined(&__NR_fstatat64);
eval 'sub __NR_unlinkat () {301;}' unless defined(&__NR_unlinkat);
eval 'sub __NR_renameat () {302;}' unless defined(&__NR_renameat);
eval 'sub __NR_linkat () {303;}' unless defined(&__NR_linkat);
Sys-Export
view release on metacpan or search on metacpan
lib/Sys/Export/Unix/WriteFS.pm view on Meta::CPAN
if ($change_uid || $change_gid) {
# only UID 0 can change UID, and only GID 0 or GID in supplemental groups can change GID.
$uid= -1 unless $change_uid && $> == 0;
$gid= -1 unless $change_gid && ($) == 0 || grep $stat->{gid}, split / /, $) );
# Only attempt change if able
POSIX::lchown($uid, $gid, $abs_path) or croak "lchown($uid, $gid, $abs_path): $!"
if $uid >= 0 || $gid >= 0;
}
my @delayed;
Sys-FS
view release on metacpan or search on metacpan
lib/Sys/FS.pm view on Meta::CPAN
}
else {
$self->logger()->log( message => $msg . ' FAILED!', level => 'debug', );
}
if ( $opts->{'Uid'} && $opts->{'Gid'} ) {
chown $opts->{'Uid'}, $opts->{'Gid'} => $dir;
}
}
}
my $msg = "Filename: $filename - created $mkdirs dirs for $dir";
$self->logger()->log( message => $msg, level => 'debug', );
Sys-OsPackage
view release on metacpan or search on metacpan
t/container-workspace/container-tests.pl view on Meta::CPAN
no autodie;
mkdir $dir
or croak "mkdir($dir) failed; $!";
}
}
chown $user_id, $user_id, $home;
chmod 0750, $home;
chdir $home;
$ENV{HOME} = $home;
$ENV{USER} = $user_id;
$ENV{LOGNAME} = $user_id;
Sys-Tlock
view release on metacpan or search on metacpan
lib/Sys/Tlock.pm view on Meta::CPAN
my $t;
if ( not tlock_taken($label,$n->%*) ) {
my $tdn = tdn($label,$d,$m);
mkdir $tdn if not -e $tdn;
chown $o , $g , $tdn;
mkdir $tdn.'/d' if not -e $tdn.'/d';
chown $o , $g , $tdn.'/d';
$t = int time;
utime undef , $t , $tdn;
utime undef , $timeout , $tdn.'/d';
};
SysV-SharedMem
view release on metacpan or search on metacpan
lib/SysV/SharedMem.pm view on Meta::CPAN
use strict;
use warnings FATAL => 'all';
use Carp qw/croak/;
use IPC::SysV qw/ftok IPC_PRIVATE IPC_CREAT SHM_RDONLY/;
use Sub::Exporter::Progressive -setup => { exports => [qw/shared_open shared_remove shared_stat shared_chmod shared_chown shared_detach shared_identifier/] };
use XSLoader;
XSLoader::load(__PACKAGE__, __PACKAGE__->VERSION);
lib/SysV/SharedMem.pm view on Meta::CPAN
=head2 shared_chmod($var, $modebits)
Change the (lower 9) modebits of the shared memory object.
=head2 shared_chown($var, $uid, $gid = undef)
Change the owning uid and optionally gid of the shared memory object.
=head2 shared_detach($var)
Sysadm-Install
view release on metacpan or search on metacpan
lib/Sysadm/Install.pm view on Meta::CPAN
use File::Basename;
owner_cp( dirname($file), $file );
Usually requires root privileges, just like chown does.
=cut
######################################
sub owner_cp {
lib/Sysadm/Install.pm view on Meta::CPAN
if(!defined $uid or !defined $gid ) {
LOGCROAK("stat of $src failed: $!");
return undef;
}
if(!chown $uid, $gid, @dst ) {
LOGCROAK("chown of ", join(" ", @dst), " failed: $!");
return undef;
}
return 1;
}
lib/Sysadm/Install.pm view on Meta::CPAN
local $Log::Log4perl::caller_depth =
$Log::Log4perl::caller_depth + 1;
_confirm "perm_set $filename (@$perms)" or return 1;
chown($perms->[1], $perms->[2], $filename) or
LOGCROAK("Cannot chown $filename ($!)");
chmod($perms->[0] & 07777, $filename) or
LOGCROAK("Cannot chmod $filename ($!)");
}
System-Daemon
view release on metacpan or search on metacpan
lib/System/Daemon/Utils.pm view on Meta::CPAN
if ($owner{user} || $owner{group}) {
my $uid = getpwnam($owner{user});
my $gid = getgrnam($owner{group});
chown $uid, $gid, $pidfile or
croak "Can't chown $owner{user}:$owner{group}";
}
return 1;
}
lib/System/Daemon/Utils.pm view on Meta::CPAN
mkdir $path or croak "Can't 'mkdir $path' Error: $!";
if ($daemon_data->{user} || $daemon_data->{group}) {
my $uid = getpwnam($daemon_data->{user});
my $gid = getgrnam($daemon_data->{group});
chown $uid, $gid, $path;
}
return 1;
}
Sysync
view release on metacpan or search on metacpan
lib/Sysync.pm view on Meta::CPAN
unless (-d "$stagefilesdir/$host")
{
mkdir "$stagefilesdir/$host";
chmod 0755, "$stagefilesdir/$host";
chown 0, 0, "$stagefilesdir/$host";
$self->log("creating: $stagefilesdir/$host");
$r++;
}
unless (-d "$stagefilesdir/$host/etc")
{
mkdir "$stagefilesdir/$host/etc";
chmod 0755, "$stagefilesdir/$host/etc";
chown 0, 0, "$stagefilesdir/$host/etc";
$self->log("creating: $stagefilesdir/$host/etc");
$r++;
}
unless (-d "$stagefilesdir/$host/etc/ssh")
{
mkdir "$stagefilesdir/$host/etc/ssh";
chmod 0755, "$stagefilesdir/$host/etc/ssh";
chown 0, 0, "$stagefilesdir/$host/etc/ssh";
$self->log("creating: $stagefilesdir/$host/etc/ssh");
$r++;
}
unless (-d "$stagefilesdir/$host/etc/ssh/authorized_keys")
{
mkdir "$stagefilesdir/$host/etc/ssh/authorized_keys";
chmod 0755, "$stagefilesdir/$host/etc/ssh/authorized_keys";
chown 0, 0, "$stagefilesdir/$host/etc/ssh/authorized_keys";
$self->log("creating: $stagefilesdir/$host/etc/ssh/authorized_keys");
$r++;
}
lib/Sysync.pm view on Meta::CPAN
$self->log("creating: $stagefilesdir/$host/$item->{directory}");
}
my $mode = sprintf("%04i", $item->{mode});
chmod $mode, "$stagefilesdir/$host/$item->{directory}";
chown $item->{uid}, $item->{gid}, "$stagefilesdir/$host/$item->{directory}";
$r++;
}
for my $path (keys %{ $files || {} })
lib/Sysync.pm view on Meta::CPAN
}
my $mode = sprintf("%04i", $item->{mode});
chmod oct($mode), "$stagefilesdir/$host/$item->{file}";
chown $item->{uid}, $item->{gid}, "$stagefilesdir/$host/$item->{file}";
}
# get list of staging directory contents
my @staged_file_list;
File::Find::find({
lib/Sysync.pm view on Meta::CPAN
unless (-d "$stagedir/$host")
{
mkdir "$stagedir/$host";
chmod 0755, "$stagedir/$host";
chown 0, 0, "$stagedir/$host";
$self->log("creating: $stagedir/$host");
$r++;
}
unless (-d "$stagedir/$host/etc")
{
mkdir "$stagedir/$host/etc";
chmod 0755, "$stagedir/$host/etc";
chown 0, 0, "$stagedir/$host/etc";
$self->log("creating: $stagedir/$host/etc");
$r++;
}
unless (-d "$stagedir/$host/etc/ssh")
{
mkdir "$stagedir/$host/etc/ssh";
chmod 0755, "$stagedir/$host/etc/ssh";
chown 0, 0, "$stagedir/$host/etc/ssh";
$self->log("creating: $stagedir/$host/etc/ssh");
$r++;
}
unless (-d "$stagedir/$host/etc/ssh/authorized_keys")
{
mkdir "$stagedir/$host/etc/ssh/authorized_keys";
chmod 0755, "$stagedir/$host/etc/ssh/authorized_keys";
chown 0, 0, "$stagedir/$host/etc/ssh/authorized_keys";
$self->log("creating: $stagedir/$host/etc/ssh/authorized_keys");
$r++;
}
unless (-d "$stagedir/$host/var")
{
mkdir "$stagedir/$host/var";
chmod 0755, "$stagedir/$host/var";
chown 0, 0, "$stagedir/$host/var";
$self->log("creating: $stagedir/$host/var");
$r++;
}
unless (-d "$stagedir/$host/var/lib")
{
mkdir "$stagedir/$host/var/lib";
chmod 0755, "$stagedir/$host/var/lib";
chown 0, 0, "$stagedir/$host/var/lib";
$self->log("creating: $stagedir/$host/var/lib");
$r++;
}
unless (-d "$stagedir/$host/var/lib/extrausers")
{
mkdir "$stagedir/$host/var/lib/extrausers";
chmod 0755, "$stagedir/$host/var/lib/extrausers";
chown 0, 0, "$stagedir/$host/var/lib/extrausers";
$self->log("creating: $stagedir/$host/var/lib/extrausers");
$r++;
}
lib/Sysync.pm view on Meta::CPAN
my $text = $key->{keys};
if ($self->write_file_contents("$stagedir/$host/etc/ssh/authorized_keys/$username", $text))
{
chmod 0600, "$stagedir/$host/etc/ssh/authorized_keys/$username";
chown $uid, 0, "$stagedir/$host/etc/ssh/authorized_keys/$username";
$r++;
}
}
my ($shadow_group) =
lib/Sysync.pm view on Meta::CPAN
$shadow_group = $shadow_group->{gid} || 0;
if ($self->write_file_contents("$stagedir/$host/$passwd_file", $ent_data->{passwd}))
{
chmod 0644, "$stagedir/$host/$passwd_file";
chown 0, 0, "$stagedir/$host/$passwd_file";
$r++;
}
if ($self->write_file_contents("$stagedir/$host/${group_file}", $ent_data->{group}))
{
chmod 0644, "$stagedir/$host/${group_file}";
chown 0, 0, "$stagedir/$host/${group_file}";
$r++;
}
if ($self->write_file_contents("$stagedir/$host/${shadow_file}", $ent_data->{shadow}))
{
chmod 0640, "$stagedir/$host/${shadow_file}";
chown 0, $shadow_group, "$stagedir/$host/${shadow_file}";
$r++;
}
if ($self->write_file_contents("$stagedir/$host/${gshadow_file}", $ent_data->{gshadow}))
{
chmod 0640, "$stagedir/$host/${gshadow_file}";
chown 0, $shadow_group, "$stagedir/$host/${gshadow_file}";
$r++;
}
}
return $r;
( run in 3.748 seconds using v1.01-cache-2.11-cpan-71847e10f99 )