]>
Commit | Line | Data |
---|---|---|
cfd811fa AF |
1 | --- rpm-3.0.3/scripts/Makefile.am.wiget Sat Jun 5 22:52:30 1999 |
2 | +++ rpm-3.0.3/scripts/Makefile.am Sat Oct 30 12:28:50 1999 | |
edf87823 | 3 | @@ -4,7 +4,8 @@ |
4 | ||
5 | EXTRA_DIST = \ | |
6 | convertrpmrc.sh find-lang.sh freshen.sh getpo.sh \ | |
7 | - perl.prov perl.req vpkg-provides.sh | |
8 | + perl.prov perl.req find-perl-requires find-perl-provides \ | |
9 | + vpkg-provides.sh | |
10 | ||
11 | installprefix = $(DESTDIR) | |
12 | ||
13 | @@ -13,5 +14,6 @@ | |
14 | configdir = ${prefix}/lib/rpm | |
15 | config_SCRIPTS = \ | |
16 | convertrpmrc.sh find-lang.sh freshen.sh getpo.sh \ | |
17 | - perl.prov perl.req vpkg-provides.sh | |
18 | + perl.prov perl.req find-perl-requires find-perl-provides \ | |
19 | + vpkg-provides.sh | |
20 | ||
cfd811fa AF |
21 | --- rpm-3.0.3/scripts/find-perl-provides.wiget Sat Oct 30 12:28:50 1999 |
22 | +++ rpm-3.0.3/scripts/find-perl-provides Sat Oct 30 12:28:50 1999 | |
edf87823 | 23 | @@ -0,0 +1,8 @@ |
24 | +#!/bin/sh | |
25 | +ulimit -c 0 | |
26 | + | |
27 | +filelist=`sed "s/['\"]/\\\&/g"` | |
28 | + | |
29 | +echo $filelist|/usr/lib/rpm/find-provides | |
30 | +/usr/lib/rpm/perl.prov $filelist | |
31 | + | |
cfd811fa AF |
32 | --- rpm-3.0.3/scripts/find-perl-requires.wiget Sat Oct 30 12:28:50 1999 |
33 | +++ rpm-3.0.3/scripts/find-perl-requires Sat Oct 30 12:28:50 1999 | |
edf87823 | 34 | @@ -0,0 +1,11 @@ |
35 | +#!/bin/sh | |
36 | +ulimit -c 0 | |
37 | + | |
38 | +filelist=`sed "s/['\"]/\\\&/g"` | |
39 | + | |
40 | +requires="`echo $filelist|/usr/lib/rpm/find-requires`" | |
41 | +requires_perl="`/usr/lib/rpm/perl.req $filelist`" | |
42 | +requires_mod="`rpm -q --whatprovides --qf "%{NAME}\n" $requires_perl 2>/dev/null`" | |
43 | +echo "$requires | |
44 | +$requires_perl | |
45 | +$requires_mod"| sort -u | |
cfd811fa AF |
46 | --- rpm-3.0.3/scripts/perl.prov.wiget Sat Jun 5 22:52:31 1999 |
47 | +++ rpm-3.0.3/scripts/perl.prov Sat Oct 30 12:28:50 1999 | |
2fa5aec3 AF |
48 | @@ -1,4 +1,4 @@ |
49 | -#!/usr/bin/perl | |
50 | +#!@PERL@ | |
51 | ||
52 | # a simple script to print the proper name for perl libraries. | |
53 | ||
83bd3403 | 54 | @@ -30,12 +30,12 @@ |
edf87823 | 55 | if (length($require{$module}) == 0) { |
2fa5aec3 | 56 | print "perl($module)\n"; |
edf87823 | 57 | } else { |
58 | - print "perl($module)=$require{$module}\n"; | |
83bd3403 | 59 | + print "perl($module) = $require{$module}\n"; |
edf87823 | 60 | |
61 | # we need to print it without the version number until the | |
62 | # requires syntax accepts version numbers correctly. | |
63 | ||
64 | - print "perl($module)\n"; | |
65 | +# print "perl($module)\n"; | |
66 | } | |
67 | } | |
68 | ||
cfd811fa AF |
69 | --- rpm-3.0.3/scripts/perl.req.wiget Sat Jun 5 22:52:31 1999 |
70 | +++ rpm-3.0.3/scripts/perl.req Sat Oct 30 12:34:07 1999 | |
2fa5aec3 AF |
71 | @@ -1,4 +1,4 @@ |
72 | -#!/usr/bin/perl | |
73 | +#!@PERL@ | |
74 | ||
75 | # a simple makedepends like script for perl. | |
76 | ||
77 | @@ -12,7 +12,11 @@ | |
78 | ||
79 | if ("@ARGV") { | |
80 | foreach (@ARGV) { | |
81 | - process_file($_); | |
82 | + if (m=/usr/(bin|lib|share|X11R6/(lib|bin))/=) { | |
83 | + if (! m=(/((doc|man|info)|/usr/src)/)\.so$)=) { | |
84 | + process_file($_); | |
85 | + } | |
86 | + } | |
87 | } | |
88 | } else { | |
89 | ||
cfd811fa | 90 | @@ -20,22 +24,32 @@ |
2fa5aec3 AF |
91 | # contents of the file. |
92 | ||
93 | foreach (<>) { | |
94 | - process_file($_); | |
95 | + if (m=/usr/(bin|lib|share|X11R6/(lib|bin))/=) { | |
cfd811fa | 96 | + if (! m=(/((doc|man|info)|/usr/src)/)\.(so|pl|ph)$)=) { |
2fa5aec3 AF |
97 | + process_file($_); |
98 | + } | |
99 | + } | |
100 | } | |
101 | } | |
edf87823 | 102 | |
103 | ||
104 | foreach $module (sort keys %require) { | |
edf87823 | 105 | if (length($require{$module}) == 0) { |
106 | - print "perl($module)\n"; | |
107 | + if ($module =~ /^[0-9._]+$/) { | |
108 | + print "perl >= $module\n"; | |
109 | + } else { | |
cfd811fa AF |
110 | + if ($module !~ /\.ph$/ && $module !~ /\.pl/) { |
111 | + print "perl($module)\n"; | |
112 | + } | |
edf87823 | 113 | + } |
114 | } else { | |
115 | ||
116 | - print "perl($module)>=$require{$module}\n"; | |
117 | + print "perl($module) >= $require{$module}\n"; | |
118 | ||
119 | # we need to print it without the version number until the | |
120 | # requires syntax accepts version numbers correctly. | |
121 | ||
122 | - print "perl($module)\n"; | |
123 | +# print "perl($module)\n"; | |
124 | } | |
125 | } | |
126 | ||
cfd811fa | 127 | @@ -54,7 +68,7 @@ |
2fa5aec3 AF |
128 | while (<FILE>) { |
129 | ||
130 | # skip the documentation | |
131 | - if ( (m/^=(head1|head2|pod)/) .. (m/^=(cut)/) ) { | |
132 | + if ( (m/^=(head1|head2|pod|item)/) .. (m/^=(cut)/) ) { | |
133 | next; | |
134 | } | |
135 | ||
cfd811fa AF |
136 | --- rpm-3.0.3/macros.in.wiget Sat Oct 30 12:28:50 1999 |
137 | +++ rpm-3.0.3/macros.in Sat Oct 30 12:28:50 1999 | |
138 | @@ -248,6 +248,8 @@ | |
139 | # %{perl_sitearch}/Image | |
140 | # %dir %{perl_sitearch}/auto/Image | |
141 | # | |
142 | +# | |
143 | +# NOTE: %{perl_sitearch}, %{perl_archlib} and %{perl_sitelib} macros | |
144 | +# has been moved to macros.perl (see info in this file for details). | |
145 | +# | |
146 | %requires_eq() %(LC_ALL="C" rpm -q --queryformat 'Requires:%%{NAME} = %%{VERSION}' %1| grep -v "is not") | |
147 | -%perl_sitearch %(eval "`perl -V:installsitearch`"; echo $installsitearch) | |
148 | -%perl_archlib %(eval "`perl -V:installarchlib`"; echo $installarchlib) | |
149 | --- rpm-3.0.3/macros.perl.in.wiget Sat Oct 30 12:28:50 1999 | |
150 | +++ rpm-3.0.3/macros.perl.in Sat Oct 30 12:28:50 1999 | |
151 | @@ -0,0 +1,11 @@ | |
152 | +# Perl specific macro definitions. | |
153 | +# To make use of these macros insert the following line into your spec file: | |
154 | +# %include @RPMCONFIGDIR@/macros.perl | |
155 | + | |
156 | +%define __find_requires @RPMCONFIGDIR@/find-perl-requires | |
157 | +%define __find_provides @RPMCONFIGDIR@/find-perl-provides | |
158 | + | |
159 | +%define perl_sitelib %(eval "`perl -V:installsitelib`"; echo $installsitelib) | |
160 | +%define perl_sitearch %(eval "`perl -V:installsitearch`"; echo $installsitearch) | |
161 | +%define perl_archlib %(eval "`perl -V:installarchlib`"; echo $installarchlib) | |
162 | + | |
33043440 | 163 | --- rpm-3.0.3/configure.in.wiget Sat Oct 30 13:17:49 1999 |
164 | +++ rpm-3.0.3/configure.in Sat Oct 30 13:18:52 1999 | |
cfd811fa AF |
165 | @@ -181,6 +181,7 @@ |
166 | AC_MSG_RESULT(patch later then 2.2 found) | |
167 | fi | |
168 | ||
169 | + AC_PATH_PROG(PERL, perl, /usr/bin/perl, $MYPATH) | |
170 | AC_PATH_PROG(PGPBIN, pgp, /usr/bin/pgp, $MYPATH) | |
171 | AC_PATH_PROG(__RM, rm, /bin/rm, $MYPATH) | |
172 | AC_PATH_PROG(__TAR, tar, /bin/tar, $MYPATH) | |
33043440 | 173 | @@ -906,8 +907,9 @@ |
174 | export LIBS INCPATH CONFIG_SITE | |
cfd811fa AF |
175 | |
176 | AC_CONFIG_SUBDIRS(popt) | |
33043440 | 177 | -AC_OUTPUT([Makefile rpmrc macros macros.pld lib/Makefile |
cfd811fa | 178 | - build/Makefile tools/Makefile scripts/Makefile |
33043440 | 179 | +AC_OUTPUT([Makefile rpmrc macros macros.pld macros.perl lib/Makefile |
180 | + build/Makefile tools/Makefile | |
cfd811fa AF |
181 | + scripts/Makefile scripts/perl.req scripts/perl.prov |
182 | tests/Makefile tests/rpmrc tests/macros tests/hello-test/Makefile | |
183 | misc/Makefile po/Makefile.in intl/Makefile | |
184 | doc/Makefile doc/manual/Makefile doc/pl/Makefile doc/ru/Makefile |