AFS
view release on metacpan or search on metacpan
* fixed bug in kas_KAM_SetFields
Developer-visible changes:
* fixed problems in internal_pts_new and in pts_name
Version 1.05 (dated 2 November 1996, revision 21)
* oldest available version, extracted from the original tar
package, compiled by Roland Schemers
Perl; see the file 'README' in Perl distribution.
You should have received a copy of the GNU General Public License
along with Perl; see the file 'COPYING'. If not, write to the Free
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA.
You should have received a copy of the Artistic License
along with Perl; see the file 'Artistic'.
The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be
used to endorse or promote products derived from this software
without specific prior written permission. THIS SOFTWARE IS
Perl; see the file 'README' in Perl distribution.
You should have received a copy of the GNU General Public License
along with Perl; see the file 'COPYING'. If not, write to the Free
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA.
You should have received a copy of the Artistic License
along with Perl; see the file 'Artistic'.
The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be
used to endorse or promote products derived from this software
without specific prior written permission. THIS SOFTWARE IS
LICENCES/Artistic view on Meta::CPAN
Copyright Holder, but only to the computing community at large
as a market that must bear the fee.)
"Freely Available" means that no fee is charged for the item
itself, though there may be fees involved in handling the item.
It also means that recipients of the item may redistribute it
under the same conditions they received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications
derived from the Public Domain or from the Copyright Holder. A Package
modified in such a way shall still be considered the Standard Version.
3. You may otherwise modify your copy of this Package in any way, provided
that you insert a prominent notice in each changed file stating how and
when you changed that file, and provided that you do at least ONE of the
following:
LICENCES/COPYING view on Meta::CPAN
source code. And you must show them these terms so they know their
rights.
We protect your rights with two steps: (1) copyright the software, and
(2) offer you this license which gives you legal permission to copy,
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
Finally, any free program is threatened constantly by software
patents. We wish to avoid the danger that redistributors of a free
program will individually obtain patent licenses, in effect making the
program proprietary. To prevent this, we have made it clear that any
patent must be licensed for everyone's free use or not licensed at all.
The precise terms and conditions for copying, distribution and
modification follow.
LICENCES/COPYING view on Meta::CPAN
signed it. However, nothing else grants you permission to modify or
distribute the Program or its derivative works. These actions are
prohibited by law if you do not accept this License. Therefore, by
modifying or distributing the Program (or any work based on the
Program), you indicate your acceptance of this License to do so, and
all its terms and conditions for copying, distributing or modifying
the Program or works based on it.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the
original licensor to copy, distribute or modify the Program subject to
these terms and conditions. You may not impose any further
restrictions on the recipients' exercise of the rights granted herein.
You are not responsible for enforcing compliance by third parties to
this License.
7. If, as a consequence of a court judgment or allegation of patent
infringement or for any other reason (not limited to patent issues),
conditions are imposed on you (whether by court order, agreement or
otherwise) that contradict the conditions of this License, they do not
excuse you from the conditions of this License. If you cannot
LICENCES/COPYING view on Meta::CPAN
through that system in reliance on consistent application of that
system; it is up to the author/donor to decide if he or she is willing
to distribute software through any other system and a licensee cannot
impose that choice.
This section is intended to make thoroughly clear what is believed to
be a consequence of the rest of this License.
8. If the distribution and/or use of the Program is restricted in
certain countries either by patents or by copyrighted interfaces, the
original copyright holder who places the Program under this License
may add an explicit geographical distribution limitation excluding
those countries, so that distribution is permitted only in or among
countries not thus excluded. In such case, this License incorporates
the limitation as if written in the body of this License.
9. The Free Software Foundation may publish revised and/or new versions
of the General Public License from time to time. Such new versions will
be similar in spirit to the present version, but may differ in detail to
address new problems or concerns.
LICENCES/IBM-LICENCE view on Meta::CPAN
"Contribution" means:
a) in the case of International Business Machines Corporation ("IBM"),
the Original Program, and
b) in the case of each Contributor,
i) changes to the Program, and
ii) additions to the Program;
where such changes and/or additions to the Program originate from and
are distributed by that particular Contributor. A Contribution
'originates' from a Contributor if it was added to the Program by
such Contributor itself or anyone acting on such Contributor's
behalf. Contributions do not include additions to the Program
which: (i) are separate modules of software distributed in
conjunction with the Program under their own license agreement,
and (ii) are not derivative works of the Program.
"Contributor" means IBM and any other entity that distributes the
Program.
"Licensed Patents " mean patent claims licensable by a Contributor
which are necessarily infringed by the use or sale of its Contribution
alone or when combined with the Program.
"Original Program" means the original version of the software
accompanying this Agreement as released by IBM, including source code,
object code and documentation, if any.
"Program" means the Original Program and Contributions.
"Recipient" means anyone who receives the Program under this
Agreement, including all Contributors.
2. GRANT OF RIGHTS
a) Subject to the terms of this Agreement, each Contributor hereby
LICENCES/IBM-LICENCE view on Meta::CPAN
b) a copy of this Agreement must be included with each copy of the
Program.
Each Contributor must include the following in a conspicuous location
in the Program:
Copyright © {date here}, International Business Machines Corporation
and others. All Rights Reserved.
In addition, each Contributor must identify itself as the originator
of its Contribution, if any, in a manner that reasonably allows
subsequent Recipients to identify the originator of the Contribution.
4. COMMERCIAL DISTRIBUTION
Commercial distributors of software may accept certain
responsibilities with respect to end users, business partners and the
like. While this license is intended to facilitate the commercial use
of the Program, the Contributor who includes the Program in a
commercial product offering should do so in a manner which does not
create potential liability for other Contributors. Therefore, if a
Contributor includes the Program in a commercial product offering,
Perl; see the file 'README' in Perl distribution.
You should have received a copy of the GNU General Public License
along with Perl; see the file 'COPYING'. If not, write to the Free
Software Foundation, 59 Temple Place - Suite 330, Boston, MA
02111-1307, USA.
You should have received a copy of the Artistic License
along with Perl; see the file 'Artistic'.
The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be
used to endorse or promote products derived from this software
without specific prior written permission. THIS SOFTWARE IS
pod/v2/afsperl.pod view on Meta::CPAN
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlacl.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2011 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
File Server/Cache Manager Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlbase.pod view on Meta::CPAN
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlbos.pod view on Meta::CPAN
=back
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2005-2012 Norbert E. Gruener <nog@MPA-Garching.MPG.de>
Copyright (c) 2003-2004 Alf Wachsmann <alfw@slac.stanford.edu>,
Venkata Phani Kiran Achanta <neo_phani@hotmail.com>, and
Norbert E. Gruener <nog@MPA-Garching.MPG.de>
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
BOS Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
pod/v2/afsperlcell.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
File Server/Cache Manager Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlcm.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
File Server/Cache Manager Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlfs.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
File Server/Cache Manager Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlkas.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Authentication Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlktck.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Authentication Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlktcp.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Authentication Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlktct.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Authentication Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlpts.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Protection Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlutils.pod view on Meta::CPAN
Roland Schemers E<lt>schemers@slapshot.stanford.eduE<gt>
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2001-2010 Norbert E. Gruener <nog@MPA-Garching.MPG.de>.
All rights reserved.
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University.
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
File Server/Cache Manager Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
All rights reserved.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=over 6
=item The original module is covered by the following copyright:
Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
Redistribution and use in source and binary forms are permitted
provided that the above copyright notice and this paragraph are
duplicated in all such forms and that any documentation,
advertising materials, and other materials related to such
distribution and use acknowledge that the software was developed
by Stanford University. The name of the University may not be used
to endorse or promote products derived from this software without
pod/v2/afsperlvldb.pod view on Meta::CPAN
=back
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2005-2011 Norbert E. Gruener <nog@MPA-Garching.MPG.de>
Copyright (c) 2003-2004 Alf Wachsmann <alfw@slac.stanford.edu> and
Norbert E. Gruener <nog@MPA-Garching.MPG.de>
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Volume Server/Volume Location Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
pod/v2/afsperlvos.pod view on Meta::CPAN
=back
=head1 COPYRIGHT AND LICENSE
Copyright (c) 2005-2011 Norbert E. Gruener <nog@MPA-Garching.MPG.de>
Copyright (c) 2003-2004 Alf Wachsmann <alfw@slac.stanford.edu>,
Venkata Phani Kiran Achanta <neo_phani@hotmail.com>, and
Norbert E. Gruener <nog@MPA-Garching.MPG.de>
All rights reserved.
Most of the explanations in this document are taken from the original
AFS documentation.
AFS-3 Programmer's Reference:
Volume Server/Volume Location Server Interface
Edward R. Zayas
Copyright (c) 1991 Transarc Corporation.
All rights reserved.
IBM AFS Administration Reference
Copyright (c) IBM Corporation 2000.
#------------------------------------------------------------------------------
# RCS-Id: "@(#)$RCS-Id: src/AFS.pm 7a64d4d Wed May 1 22:05:49 2013 +0200 Norbert E Gruener$"
#
# This library is free software; you can redistribute it and/or modify it
# under the same terms as Perl itself.
#
# © 2001-2011 Norbert E. Gruener <nog@MPA-Garching.MPG.de>
# © 1994 Board of Trustees, Leland Stanford Jr. University.
#
# The original library is covered by the following copyright:
#
# Redistribution and use in source and binary forms are permitted
# provided that the above copyright notice and this paragraph are
# duplicated in all such forms and that any documentation,
# advertising materials, and other materials related to such
# distribution and use acknowledge that the software was developed
# by Stanford University. The name of the University may not be used
# to endorse or promote products derived from this software without
# specific prior written permission.
# THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* License. For details, see the IBM-LICENSE file in the LICENCES
* directory or online at http://www.openafs.org/dl/license10.html
*
* Contributors
* 2004-2014: Norbert E. Gruener <nog@MPA-Garching.MPG.de>
* 2003: Alf Wachsmann <alfw@slac.stanford.edu>
* Venkata Phani Kiran Achanta <neo_phani@hotmail.com>, and
* Norbert E. Gruener <nog@MPA-Garching.MPG.de>
* 2001-2002: Norbert E. Gruener <nog@MPA-Garching.MPG.de>
*
* The original library was written by Roland Schemers <schemers@slapshot.stanford.edu>
* and is covered by the following copyright:
*
* Copyright (c) 1994 Board of Trustees, Leland Stanford Jr. University
* For conditions of distribution and use, see the copyright notice in
* the Stanford-LICENCE file.
*
* The code for the original library were mainly taken from the AFS
* source distribution, which comes with this message:
*
* Copyright (C) 1989-1994 Transarc Corporation - All rights reserved
* P_R_P_Q_# (C) COPYRIGHT IBM CORPORATION 1987, 1988, 1989
*
***********************************************************************/
#include "EXTERN.h"
#ifdef __sgi /* needed to get a clean compile */
ip2 = GetServer(newip);
if (!ip2) {
char buffer[256];
sprintf(buffer, "AFS::VLDB: invalid host address\n");
VSETCODE(EINVAL, buffer);
goto done;
}
}
else {
/* Play a trick here. If we are removing an address, ip1 will be -1
* and ip2 will be the original address. This switch prevents an
* older revision vlserver from removing the IP address.
*/
remove = 1;
ip2 = ip1;
ip1 = 0xffffffff;
}
vcode = ubik_Call_New(VL_ChangeAddr, cstruct, 0, ntohl(ip1), ntohl(ip2));
if (vcode) {
char buffer[256];
src/inc/version/vpp.pm view on Meta::CPAN
for (;;) {
$rev = 0;
{
# this is atoi() that delimits on underscores
my $end = $pos;
my $mult = 1;
my $orev;
# the following if() will only be true after the decimal
# point of a version originally created with a bare
# floating point number, i.e. not quoted in any way
#
if ( !$qv && $s > $start && $saw_decimal == 1 ) {
$mult *= 100;
while ( $s < $end ) {
$orev = $rev;
$rev += $s * $mult;
$mult /= 10;
if ( (abs($orev) > abs($rev))
|| (abs($rev) > $VERSION_MAX )) {
src/inc/version/vpp.pm view on Meta::CPAN
# av_push(MUTABLE_AV(sv), newSViv(0));
#
$len = 2 - $len;
while ($len-- > 0) {
push @av, 0;
}
}
# need to save off the current version string for later
if ( $vinf ) {
$$rv->{original} = "v.Inf";
$$rv->{vinf} = 1;
}
elsif ( $s > $start ) {
$$rv->{original} = $start->currstr($s);
if ( $qv && $saw_decimal == 1 && $start ne 'v' ) {
# need to insert a v to be consistent
$$rv->{original} = 'v' . $$rv->{original};
}
}
else {
$$rv->{original} = '0';
push(@av, 0);
}
# And finally, store the AV in the hash
$$rv->{version} = \@av;
# fix RT#19517 - special case 'undef' as string
if ($s eq 'undef') {
$s += 5;
}
src/inc/version/vpp.pm view on Meta::CPAN
{
my ($class, $value) = @_;
my $self = bless ({}, ref ($class) || $class);
my $qv = FALSE;
if ( ref($value) && eval('$value->isa("version")') ) {
# Can copy the elements directly
$self->{version} = [ @{$value->{version} } ];
$self->{qv} = 1 if $value->{qv};
$self->{alpha} = 1 if $value->{alpha};
$self->{original} = ''.$value->{original};
return $self;
}
my $currlocale = setlocale(LC_ALL);
# if the current locale uses commas for decimal points, we
# just replace commas with decimal places, rather than changing
# locales
if ( localeconv()->{decimal_point} eq ',' ) {
$value =~ tr/,/./;
}
if ( not defined $value or $value =~ /^undef$/ ) {
# RT #19517 - special case for undef comparison
# or someone forgot to pass a value
push @{$self->{version}}, 0;
$self->{original} = "0";
return ($self);
}
if ( $#_ == 2 ) { # must be CVS-style
$value = $_[2];
$qv = TRUE;
}
$value = _un_vstring($value);
src/inc/version/vpp.pm view on Meta::CPAN
return $string;
}
sub stringify
{
my ($self) = @_;
unless (_verify($self)) {
require Carp;
Carp::croak("Invalid version object");
}
return exists $self->{original}
? $self->{original}
: exists $self->{qv}
? $self->normal
: $self->numify;
}
sub vcmp
{
require UNIVERSAL;
my ($left,$right,$swap) = @_;
my $class = ref($left);
src/ppport.h view on Meta::CPAN
If this option is given, a single patch file will be created if
any changes are suggested. This requires a working diff program
to be installed on your system.
=head2 --copy=I<suffix>
If this option is given, a copy of each file will be saved with
the given suffix that contains the suggested changes. This does
not require any external programs. Note that this does not
automagially add a dot between the original filename and the
suffix. If you want the dot, you have to include it in the option
argument.
If neither C<--patch> or C<--copy> are given, the default is to
simply print the diffs for each file. This requires either
C<Text::Diff> or a C<diff> program to be installed.
=head2 --diff=I<program>
Manually set the diff program and options to use. The default
src/ppport.h view on Meta::CPAN
{
my $self = do { local(@ARGV,$/)=($0); <> };
my($copy) = $self =~ /^=head\d\s+COPYRIGHT\s*^(.*?)^=\w+/ms;
$copy =~ s/^(?=\S+)/ /gms;
$self =~ s/^$HS+Do NOT edit.*?(?=^-)/$copy/ms;
$self =~ s/^SKIP.*(?=^__DATA__)/SKIP
if (\@ARGV && \$ARGV[0] eq '--unstrip') {
eval { require Devel::PPPort };
\$@ and die "Cannot require Devel::PPPort, please install.\\n";
if (eval \$Devel::PPPort::VERSION < $VERSION) {
die "$0 was originally generated with Devel::PPPort $VERSION.\\n"
. "Your Devel::PPPort is only version \$Devel::PPPort::VERSION.\\n"
. "Please install a newer version, or --unstrip will not work.\\n";
}
Devel::PPPort::WriteFile(\$0);
exit 0;
}
print <<END;
Sorry, but this is a stripped version of \$0.
To be able to use its original script and doc functionality,
please try to regenerate this file using:
\$^X \$0 --unstrip
END
/ms;
my($pl, $c) = $self =~ /(.*^__DATA__)(.*)/ms;
$c =~ s{
/ (?: \*[^*]*\*+(?:[^$ccs][^*]*\*+)* / | /[^\r\n]*)
| ( "[^"\\]*(?:\\.[^"\\]*)*"
( run in 0.995 second using v1.01-cache-2.11-cpan-f985c23238c )