Gecko [ www.leshallesdegournay.geraud-market.com ]

Name	Size	Permission	Date
fileattrs	[ DIR ]	drwxr-xr-x	2026-08-17 17:15
macros.d	[ DIR ]	drwxr-xr-x	2026-08-17 17:23
platform	[ DIR ]	drwxr-xr-x	2026-04-29 18:19
redhat	[ DIR ]	drwxr-xr-x	2019-10-01 22:42
alt-nodejs10-fixdep	3.48 KB	-rwxr-xr-x	2022-04-13 16:10
alt-nodejs10-provide.sh	70 B	-rwxr-xr-x	2022-04-13 16:11
alt-nodejs10-require.sh	69 B	-rwxr-xr-x	2022-04-13 16:11
alt-nodejs10-symlink-deps	4.92 KB	-rwxr-xr-x	2022-04-13 16:10
alt-nodejs10.prov	1.92 KB	-rwxr-xr-x	2022-04-13 16:10
alt-nodejs10.req	6.75 KB	-rwxr-xr-x	2022-04-13 16:10
alt-nodejs10_native.req	70 B	-rwxr-xr-x	2023-03-19 21:11
alt-nodejs11_native.req	70 B	-rwxr-xr-x	2021-10-19 11:18
alt-nodejs12_native.req	70 B	-rwxr-xr-x	2026-03-09 07:26
alt-nodejs14-fixdep	3.48 KB	-rwxr-xr-x	2022-04-13 16:38
alt-nodejs14-provide.sh	70 B	-rwxr-xr-x	2022-04-13 16:39
alt-nodejs14-require.sh	69 B	-rwxr-xr-x	2022-04-13 16:39
alt-nodejs14-symlink-deps	4.92 KB	-rwxr-xr-x	2022-04-13 16:38
alt-nodejs14.prov	1.92 KB	-rwxr-xr-x	2022-04-13 16:38
alt-nodejs14.req	6.75 KB	-rwxr-xr-x	2022-04-13 16:38
alt-nodejs14_native.req	70 B	-rwxr-xr-x	2026-02-22 21:20
alt-nodejs16-fixdep	3.48 KB	-rwxr-xr-x	2022-04-13 16:43
alt-nodejs16-provide.sh	70 B	-rwxr-xr-x	2022-04-13 16:44
alt-nodejs16-require.sh	69 B	-rwxr-xr-x	2022-04-13 16:44
alt-nodejs16-symlink-deps	4.92 KB	-rwxr-xr-x	2022-04-13 16:43
alt-nodejs16.prov	1.92 KB	-rwxr-xr-x	2022-04-13 16:43
alt-nodejs16.req	6.75 KB	-rwxr-xr-x	2022-04-13 16:43
alt-nodejs16_native.req	40 B	-rwxr-xr-x	2026-03-17 07:37
alt-nodejs18_native.req	40 B	-rwxr-xr-x	2026-03-09 08:07
alt-nodejs19_native.req	39 B	-rwxr-xr-x	2023-12-06 18:42
alt-nodejs20_native.req	40 B	-rwxr-xr-x	2026-04-09 11:13
alt-nodejs6_native.req	64 B	-rwxr-xr-x	2021-09-28 11:04
alt-nodejs8_native.req	68 B	-rwxr-xr-x	2021-09-28 11:58
alt-nodejs9_native.req	68 B	-rwxr-xr-x	2021-09-28 12:43
appdata.prov	333 B	-rwxr-xr-x	2026-04-29 18:19
brp-compress	1.41 KB	-rwxr-xr-x	2026-04-29 18:19
brp-java-gcjcompile	1.38 KB	-rwxr-xr-x	2026-04-29 18:19
brp-python-bytecompile	2.96 KB	-rwxr-xr-x	2026-04-29 18:19
brp-python-hardlink	658 B	-rwxr-xr-x	2026-04-29 18:19
brp-scl-compress	1.77 KB	-rwxr-xr-x	2018-10-26 21:40
brp-scl-python-bytecompile	3.04 KB	-rwxr-xr-x	2018-10-26 21:40
brp-strip	509 B	-rwxr-xr-x	2026-04-29 18:19
brp-strip-comment-note	741 B	-rwxr-xr-x	2026-04-29 18:19
brp-strip-shared	706 B	-rwxr-xr-x	2026-04-29 18:19
brp-strip-static-archive	411 B	-rwxr-xr-x	2026-04-29 18:19
check-buildroot	1.21 KB	-rwxr-xr-x	2026-04-29 18:19
check-files	1.02 KB	-rwxr-xr-x	2026-04-29 18:19
check-prereqs	418 B	-rwxr-xr-x	2026-04-29 18:19
check-rpaths	1.01 KB	-rwxr-xr-x	2026-04-29 18:19
check-rpaths-worker	4.93 KB	-rwxr-xr-x	2026-04-29 18:19
config.guess	44.24 KB	-rwxr-xr-x	2026-04-29 18:19
config.sub	34.62 KB	-rwxr-xr-x	2026-04-29 18:19
debugedit	33.02 KB	-rwxr-xr-x	2026-04-29 18:19
desktop-file.prov	602 B	-rwxr-xr-x	2026-04-29 18:19
elfdeps	15.31 KB	-rwxr-xr-x	2026-04-29 18:19
find-debuginfo.sh	14.42 KB	-rwxr-xr-x	2026-04-29 18:19
find-lang.sh	5.77 KB	-rwxr-xr-x	2026-04-29 18:19
find-provides	1.52 KB	-rwxr-xr-x	2026-04-29 18:19
find-requires	3.43 KB	-rwxr-xr-x	2026-04-29 18:19
fontconfig.prov	489 B	-rwxr-xr-x	2026-04-29 18:19
javadoc.req	76 B	-rwxr-xr-x	2013-11-05 16:22
kabi.sh	428 B	-rwxr-xr-x	2019-06-08 16:32
libtooldeps.sh	718 B	-rwxr-xr-x	2026-04-29 18:19
macros	37.33 KB	-rw-r--r--	2026-04-29 18:19
macros.perl	473 B	-rw-r--r--	2026-04-29 18:19
macros.php	192 B	-rw-r--r--	2026-04-29 18:19
macros.python	906 B	-rw-r--r--	2026-04-29 18:19
maven.prov	3.67 KB	-rwxr-xr-x	2013-11-05 16:22
maven.req	7.75 KB	-rwxr-xr-x	2013-11-05 16:22
mkinstalldirs	3.41 KB	-rwxr-xr-x	2026-04-29 18:19
mono-find-provides	1.08 KB	-rwxr-xr-x	2026-04-29 18:19
mono-find-requires	1.87 KB	-rwxr-xr-x	2026-04-29 18:19
ocaml-find-provides.sh	1.62 KB	-rwxr-xr-x	2026-04-29 18:19
ocaml-find-requires.sh	2.08 KB	-rwxr-xr-x	2026-04-29 18:19
osgi.prov	3.51 KB	-rwxr-xr-x	2013-11-05 16:22
osgi.req	3.79 KB	-rwxr-xr-x	2013-11-05 16:22
osgideps.pl	10.33 KB	-rwxr-xr-x	2026-04-29 18:19
perl.prov	5.72 KB	-rwxr-xr-x	2026-04-29 18:19
perl.req	11.48 KB	-rwxr-xr-x	2026-04-29 18:19
perldeps.pl	32.13 KB	-rw-r--r--	2026-04-29 18:19
pkgconfigdeps.sh	1.25 KB	-rwxr-xr-x	2026-04-29 18:19
pythondeps.sh	875 B	-rwxr-xr-x	2026-04-29 18:19
rpm.daily	296 B	-rw-r--r--	2026-04-29 18:19
rpm.log	61 B	-rw-r--r--	2026-04-29 18:19
rpm.supp	688 B	-rw-r--r--	2026-04-29 18:19
rpm2cpio.sh	1.3 KB	-rwxr-xr-x	2026-04-29 18:19
rpmdb_loadcvt	1.43 KB	-rwxr-xr-x	2026-04-29 18:19
rpmdeps	11.52 KB	-rwxr-xr-x	2026-04-29 18:19
rpmpopt-4.11.3	9.51 KB	-rw-r--r--	2026-04-29 18:19
rpmrc	15.01 KB	-rw-r--r--	2026-04-29 18:19
scldeps.sh	179 B	-rwxr-xr-x	2018-10-26 21:40
script.req	322 B	-rwxr-xr-x	2026-04-29 18:19
sepdebugcrcfix	15.24 KB	-rwxr-xr-x	2026-04-29 18:19
tcl.req	2.02 KB	-rwxr-xr-x	2026-04-29 18:19
tgpg	929 B	-rwxr-xr-x	2026-04-29 18:19

Rename

#!/usr/bin/perl

# RPM (and it's source code) is covered under two separate licenses.

# The entire code base may be distributed under the terms of the GNU
# General Public License (GPL), which appears immediately below.
# Alternatively, all of the source code in the lib subdirectory of the
# RPM source code distribution as well as any code derived from that
# code may instead be distributed under the GNU Library General Public
# License (LGPL), at the choice of the distributor. The complete text
# of the LGPL appears at the bottom of this file.

# This alternative is allowed to enable applications to be linked
# against the RPM library (commonly called librpm) without forcing
# such applications to be distributed under the GPL.

# Any questions regarding the licensing of RPM should be addressed to
# Erik Troan <ewt@redhat.com>.

# a simple script to print the proper name for perl libraries.

# To save development time I do not parse the perl grammar but
# instead just lex it looking for what I want.  I take special care to
# ignore comments and pod's.

# it would be much better if perl could tell us the proper name of a
# given script.

# The filenames to scan are either passed on the command line or if
# that is empty they are passed via stdin.

# If there are lines in the file which match the pattern
#      (m/^\s*\$VERSION\s*=\s+/)
# then these are taken to be the version numbers of the modules.
# Special care is taken with a few known idioms for specifying version
# numbers of files under rcs/cvs control.

# If there are strings in the file which match the pattern
#     m/^\s*\$RPM_Provides\s*=\s*["'](.*)['"]/i
# then these are treated as additional names which are provided by the
# file and are printed as well.

# I plan to rewrite this in C so that perl is not required by RPM at
# build time.

# by Ken Estes Mail.com kestes@staff.mail.com

if ("@ARGV") {
  foreach (@ARGV) {
    process_file($_);
  }
} else {

# notice we are passed a list of filenames NOT as common in unix the
  # contents of the file.

foreach (<>) {
    process_file($_);
  }
}

foreach $module (sort keys %require) {
  if (length($require{$module}) == 0) {
    print "perl($module)\n";
  } else {

# I am not using rpm3.0 so I do not want spaces around my
    # operators. Also I will need to change the processing of the
    # $RPM_* variable when I upgrade.

print "perl($module) = $require{$module}\n";
  }
}

exit 0;

sub process_file {

my ($file) = @_;
  chomp $file;

if (!open(FILE, $file)) {
    warn("$0: Warning: Could not open file '$file' for reading: $!\n");
    return;
  }

my ($package, $version, $incomment, $inover) = ();

while (<FILE>) {

# skip the documentation

# we should not need to have item in this if statement (it
    # properly belongs in the over/back section) but people do not
    # read the perldoc.

if (m/^=(head[1-4]|pod|for|item)/) {
      $incomment = 1;
    }

if (m/^=(cut)/) {
      $incomment = 0;
      $inover = 0;
    }

if (m/^=(over)/) {
      $inover = 1;
    }

if (m/^=(back)/) {
      $inover = 0;
    }

if ($incomment || $inover) {
       next;
    }

# skip the data section
    if (m/^__(DATA|END)__$/) {
      last;
    }

# not everyone puts the package name of the file as the first
    # package name so we report all namespaces except some common
    # false positives as if they were provided packages (really ugly).

if (m/^\s*package\s+([_:a-zA-Z0-9]+)\s*;/) {
      $package = $1;
      undef $version;
      if ($package eq 'main') {
        undef $package;
      } else {
        # If $package already exists in the $require hash, it means
        # the package definition is broken up over multiple blocks.
        # In that case, don't stomp a previous $VERSION we might have
        # found.  (See BZ#214496.)
        $require{$package} = undef unless (exists $require{$package});
      }
    }

# after we found the package name take the first assignment to
    # $VERSION as the version number. Exporter requires that the
    # variable be called VERSION so we are safe.

# here are examples of VERSION lines from the perl distribution

#FindBin.pm:$VERSION = $VERSION = sprintf("%d.%02d", q$Revision: 1.9 $ =~ /(\d+)\.(\d+)/);
    #ExtUtils/Install.pm:$VERSION = substr q$Revision: 1.9 $, 10;
    #CGI/Apache.pm:$VERSION = (qw$Revision: 1.9 $)[1];
    #DynaLoader.pm:$VERSION = $VERSION = "1.03";     # avoid typo warning
    #General.pm:$Config::General::VERSION = 2.33;
    #
    # or with the new "our" pragma you could (read will) see:
    #
    #    our $VERSION = '1.00'
    if ($package && m/^\s*(our\s+)?\$(\Q$package\E::)?VERSION\s*=\s+/) {

# first see if the version string contains the string
      # '$Revision' this often causes bizarre strings and is the most
      # common method of non static numbering.

if (m/\$Revision: (\d+[.0-9]+)/) {
        $version = $1;
      } elsif (m/['"]?(\d+[.0-9]+)['"]?/) {

# look for a static number hard coded in the script

$version = $1;
      }
      $require{$package} = $version;
    }

# Allow someone to have a variable that defines virtual packages
    # The variable is called $RPM_Provides.  It must be scoped with
    # "our", but not "local" or "my" (just would not make sense).
    #
    # For instance:
    #
    #     $RPM_Provides = "blah bleah"
    #
    # Will generate provides for "blah" and "bleah".
    #
    # Each keyword can appear multiple times.  Don't
    #  bother with datastructures to store these strings,
    #  if we need to print it print it now.

if (m/^\s*(our\s+)?\$RPM_Provides\s*=\s*["'](.*)['"]/i) {
      foreach $_ (split(/\s+/, $2)) {
        print "$_\n";
      }
    }

}

close(FILE) ||
    die("$0: Could not close file: '$file' : $!\n");

return;
}