Commit f9548c01-fb39-4467-8262-194231cc4f93/upstream - libfile-lchown-perl

+1

-0

Build.PL less more

35	35	'ExtUtils::CChecker' => 0.03,
36	36	},
37	37	requires => {
	38	'Exporter' => '5.57',
38	39	},
39	40	build_requires => {
40	41	'Module::Build' => 0,

+16

-14

LICENSE less more

0		This software is copyright (c) 2010 by Paul Evans <leonerd@leonerd.org.uk>.
	0	This software is copyright (c) 2021 by Paul Evans <leonerd@leonerd.org.uk>.
1	1
2	2	This is free software; you can redistribute it and/or modify it under
3	3	the same terms as the Perl 5 programming language system itself.

11	11
12	12	--- The GNU General Public License, Version 1, February 1989 ---
13	13
14		This software is Copyright (c) 2010 by Paul Evans <leonerd@leonerd.org.uk>.
	14	This software is Copyright (c) 2021 by Paul Evans <leonerd@leonerd.org.uk>.
15	15
16	16	This is free software, licensed under:
17	17
18	18	The GNU General Public License, Version 1, February 1989
19	19
20		GNU GENERAL PUBLIC LICENSE
21		Version 1, February 1989
	20	GNU GENERAL PUBLIC LICENSE
	21	Version 1, February 1989
22	22
23	23	Copyright (C) 1989 Free Software Foundation, Inc.
24		59 Temple Place, Suite 330, Boston, MA 02111-1307, USA
	24	51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
	25
25	26	Everyone is permitted to copy and distribute verbatim copies
26	27	of this license document, but changing it is not allowed.
27	28
28		Preamble
	29	Preamble
29	30
30	31	The license agreements of most software companies try to keep users
31	32	at the mercy of those companies. By contrast, our General Public

66	67	The precise terms and conditions for copying, distribution and
67	68	modification follow.
68	69
69		GNU GENERAL PUBLIC LICENSE
	70	GNU GENERAL PUBLIC LICENSE
70	71	TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
71	72
72	73	0. This License Agreement applies to any program or other work which

184	185	of preserving the free status of all derivatives of our free software and
185	186	of promoting the sharing and reuse of software generally.
186	187
187		NO WARRANTY
	188	NO WARRANTY
188	189
189	190	9. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
190	191	FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN

206	207	PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
207	208	POSSIBILITY OF SUCH DAMAGES.
208	209
209		END OF TERMS AND CONDITIONS
210
211		Appendix: How to Apply These Terms to Your New Programs
	210	END OF TERMS AND CONDITIONS
	211
	212	Appendix: How to Apply These Terms to Your New Programs
212	213
213	214	If you develop a new program, and you want it to be of the greatest
214	215	possible use to humanity, the best way to achieve this is to make it

234	235	GNU General Public License for more details.
235	236
236	237	You should have received a copy of the GNU General Public License
237		along with this program; if not, write to the Free Software Foundation,
238		Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA.
	238	along with this program; if not, write to the Free Software
	239	Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301 USA
	240
239	241
240	242	Also add information on how to contact you by electronic and paper mail.
241	243

269	271
270	272	--- The Artistic License 1.0 ---
271	273
272		This software is Copyright (c) 2010 by Paul Evans <leonerd@leonerd.org.uk>.
	274	This software is Copyright (c) 2021 by Paul Evans <leonerd@leonerd.org.uk>.
273	275
274	276	This is free software, licensed under:
275	277

+5

-4

MANIFEST less more

1	1	Changes
2	2	lib/File/lchown.pm
3	3	lib/File/lchown.xs
	4	LICENSE
	5	Makefile.PL
4	6	MANIFEST This list of files
	7	META.json
	8	META.yml
	9	README
5	10	t/00use.t
6	11	t/01lchown.t
7	12	t/02lutimes.t
8	13	t/99pod.t
9		Makefile.PL
10		README
11		LICENSE
12		META.yml

+51

-0

META.json less more

	0	{
	1	"abstract" : "modify attributes of symlinks without dereferencing them",
	2	"author" : [
	3	"Paul Evans <leonerd@leonerd.org.uk>"
	4	],
	5	"dynamic_config" : 1,
	6	"generated_by" : "Module::Build version 0.4231",
	7	"license" : [
	8	"perl_5"
	9	],
	10	"meta-spec" : {
	11	"url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",
	12	"version" : 2
	13	},
	14	"name" : "File-lchown",
	15	"prereqs" : {
	16	"build" : {
	17	"requires" : {
	18	"ExtUtils::CBuilder" : "0",
	19	"Module::Build" : "0",
	20	"Module::Build::Compat" : "0",
	21	"Test::More" : "0"
	22	}
	23	},
	24	"configure" : {
	25	"requires" : {
	26	"ExtUtils::CChecker" : "0.03",
	27	"Module::Build" : "0.42"
	28	}
	29	},
	30	"runtime" : {
	31	"requires" : {
	32	"Exporter" : "5.57"
	33	}
	34	}
	35	},
	36	"provides" : {
	37	"File::lchown" : {
	38	"file" : "lib/File/lchown.pm",
	39	"version" : "0.02"
	40	}
	41	},
	42	"release_status" : "stable",
	43	"resources" : {
	44	"license" : [
	45	"http://dev.perl.org/licenses/"
	46	]
	47	},
	48	"version" : "0.02",
	49	"x_serialization_backend" : "JSON::PP version 4.04"
	50	}

+14

-10

META.yml less more

2	2	author:
3	3	- 'Paul Evans <leonerd@leonerd.org.uk>'
4	4	build_requires:
5		ExtUtils::CBuilder: 0
6		Module::Build: 0
7		Module::Build::Compat: 0
8		Test::More: 0
	5	ExtUtils::CBuilder: '0'
	6	Module::Build: '0'
	7	Module::Build::Compat: '0'
	8	Test::More: '0'
9	9	configure_requires:
10		ExtUtils::CChecker: 0.03
11		Module::Build: 0.36
12		generated_by: 'Module::Build version 0.3603'
	10	ExtUtils::CChecker: '0.03'
	11	Module::Build: '0.42'
	12	dynamic_config: 1
	13	generated_by: 'Module::Build version 0.4231, CPAN::Meta::Converter version 2.150010'
13	14	license: perl
14	15	meta-spec:
15	16	url: http://module-build.sourceforge.net/META-spec-v1.4.html
16		version: 1.4
	17	version: '1.4'
17	18	name: File-lchown
18	19	provides:
19	20	File::lchown:
20	21	file: lib/File/lchown.pm
21		version: 0.02
	22	version: '0.02'
	23	requires:
	24	Exporter: '5.57'
22	25	resources:
23	26	license: http://dev.perl.org/licenses/
24		version: 0.02
	27	version: '0.02'
	28	x_serialization_backend: 'CPAN::Meta::YAML version 0.018'

+1

-1

Makefile.PL less more

0		# Note: this file was auto-generated by Module::Build::Compat version 0.3603
	0	# Note: this file was auto-generated by Module::Build::Compat version 0.4231
1	1	use Module::Build::Compat 0.02;
2	2
3	3	Module::Build::Compat->run_build_pl(args => \@ARGV);

+27

-19

README less more

0	0	NAME
1		"File::lchown" - modify attributes of symlinks without dereferencing
2		them
	1
	2	File::lchown - modify attributes of symlinks without dereferencing them
3	3
4	4	SYNOPSIS
	5
5	6	use File::lchown qw( lchown lutimes );
6
	7
7	8	lchown $uid, $gid, $linkpath or die "Cannot lchown() - $!";
8
	9
9	10	lutimes $atime, $mtime, $linkpath or die "Cannot lutimes() - $!";
10	11
11	12	DESCRIPTION
12		The regular "chown" system call will dereference a symlink and apply
	13
	14	The regular chown system call will dereference a symlink and apply
13	15	ownership changes to the file at which it points. Some OSes provide
14	16	system calls that do not dereference a symlink but instead apply their
15	17	changes directly to the named path, even if that path is a symlink (in
16		much the same way that "lstat" will return attributes of a symlink
17		rather than the file at which it points).
	18	much the same way that lstat will return attributes of a symlink rather
	19	than the file at which it points).
18	20
19	21	FUNCTIONS
20		$count = lchown $uid, $gid, @paths
	22
	23	$count = lchown $uid, $gid, @paths
	24
21	25	Set the new user or group ownership of the specified paths, without
22	26	dereferencing any symlinks. Passing the value -1 as either the $uid or
23	27	$gid will leave that attribute unchanged. Returns the number of files
24	28	successfully changed.
25	29
26		$count = lutimes $atime, $mtime, @paths
	30	$count = lutimes $atime, $mtime, @paths
	31
27	32	Set the access and modification times on the specified paths, without
28		dereferencing any symlinks. Passing "undef" as both $atime and $mtime
	33	dereferencing any symlinks. Passing undef as both $atime and $mtime
29	34	will update the times to the current system time.
30	35
31		Note that for both "lchown" and "lutimes", if more than one path is
32		given, if later paths succeed after earlier failures, then the value of
33		$! will not be reliable to indicate the nature of the failure. If you
34		wish to use $! to report on failures, make sure only to pass one path at
35		a time.
	36	Note that for both lchown and lutimes, if more than one path is given,
	37	if later paths succeed after earlier failures, then the value of $!
	38	will not be reliable to indicate the nature of the failure. If you wish
	39	to use $! to report on failures, make sure only to pass one path at a
	40	time.
36	41
37	42	TODO
38		* Implement sub-second precision on "lutimes", most likely by taking
39		floats or two-element ARRAY refs, similar to "Time::HiRes" uses.
	43
	44	* Implement sub-second precision on lutimes, most likely by taking
	45	floats or two-element ARRAY refs, similar to Time::HiRes uses.
40	46
41	47	SEE ALSO
42		* lchown(2) - change ownership of a file
43	48
44		* lutimes(2) - change file timestamps
	49	* lchown(2) - change ownership of a file
	50
	51	* lutimes(2) - change file timestamps
45	52
46	53	AUTHOR
	54
47	55	Paul Evans <leonerd@leonerd.org.uk>
48	56