Not in rpm-4_4.
authorjbj <devnull@localhost>
Fri, 19 Nov 2004 15:44:15 +0000 (15:44 +0000)
committerjbj <devnull@localhost>
Fri, 19 Nov 2004 15:44:15 +0000 (15:44 +0000)
CVS patchset: 7584
CVS date: 2004/11/19 15:44:15

19 files changed:
perl/ChangeLog [deleted file]
perl/MANIFEST [deleted file]
perl/Makefile.PL [deleted file]
perl/Makefile.PL.in [deleted file]
perl/Makefile.am [deleted file]
perl/Makefile.in [deleted file]
perl/PMakefile [deleted file]
perl/README [deleted file]
perl/check [deleted file]
perl/constant.c [deleted file]
perl/db.xs [deleted file]
perl/foo.i386.rpm [deleted file]
perl/header.xs [deleted file]
perl/junk.xs [deleted file]
perl/rpm.pm [deleted file]
perl/rpm.xs [deleted file]
perl/test.pl [deleted file]
perl/transaction.xs [deleted file]
perl/typemap [deleted file]

diff --git a/perl/ChangeLog b/perl/ChangeLog
deleted file mode 100644 (file)
index 48fc68c..0000000
+++ /dev/null
@@ -1,13 +0,0 @@
-1999-07-14  Cristian Gafton  <gafton@redhat.com>
-
-       * rpm.xs: Take the count return value into consideration
-       when processing int return types
-
-       * test.pl: Added test for the number fo tags and the number of 
-       files in the test package
-
-Revision history for Perl extension rpm.
-
-0.01  Mon Jul 12 13:07:43 1999
-       - original version; created by h2xs 1.19
-
diff --git a/perl/MANIFEST b/perl/MANIFEST
deleted file mode 100644 (file)
index 9e352e2..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-ChangeLog
-MANIFEST
-Makefile.PL
-constant.c
-rpm.pm
-rpm.xs
-test.pl
-typemap
-foo.i386.rpm
-junk.xs
-transaction.xs
-header.xs
diff --git a/perl/Makefile.PL b/perl/Makefile.PL
deleted file mode 100644 (file)
index 641cc14..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-# Generated automatically from Makefile.PL.in by configure.
-use ExtUtils::MakeMaker;
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-
-WriteMakefile(
-             'NAME'    => 'rpm',
-             'OBJECT'  => 'rpm.o constant.o',
-             'VERSION_FROM' => 'rpm.pm',               # finds $VERSION
-             'MAKEFILE'=> 'PMakefile',
-             'LIBS'    => [' -L/usr/local/lib  -lz -lbz2'],                    # e.g., '-lm' 
-             'CCFLAGS' => '-g -O2 -D_GNU_SOURCE -Wall -Wpointer-arith -Wstrict-prototypes -Wmissing-prototypes -Wno-char-subscripts',
-             'OPTIMIZE'=> '-g',
-             'DEFINE'  => '-Dbool=char -DHAS_BOOL',
-             'INC'     => ' -I/usr/local/include -I../build -I../lib -I../popt -I/usr/include/rpm',
-             'depend'  => { 'rpm.c' => 'transaction.xs header.xs db.xs' },
-);
-
diff --git a/perl/Makefile.PL.in b/perl/Makefile.PL.in
deleted file mode 100644 (file)
index 625f0eb..0000000
+++ /dev/null
@@ -1,17 +0,0 @@
-use ExtUtils::MakeMaker;
-# See lib/ExtUtils/MakeMaker.pm for details of how to influence
-# the contents of the Makefile that is written.
-
-WriteMakefile(
-             'NAME'    => 'rpm',
-             'OBJECT'  => 'rpm.o constant.o',
-             'VERSION_FROM' => 'rpm.pm',               # finds $VERSION
-             'MAKEFILE'=> 'PMakefile',
-             'LIBS'    => ['@LIBS@'],                  # e.g., '-lm' 
-             'CCFLAGS' => '@CFLAGS@',
-             'OPTIMIZE'=> '-g',
-             'DEFINE'  => '-Dbool=char -DHAS_BOOL',
-             'INC'     => '@INCPATH@ -I../build -I../lib -I../popt -I/usr/include/rpm',
-             'depend'  => { 'rpm.c' => 'transaction.xs header.xs db.xs' },
-);
-
diff --git a/perl/Makefile.am b/perl/Makefile.am
deleted file mode 100644 (file)
index e55c09c..0000000
+++ /dev/null
@@ -1,18 +0,0 @@
-# Makefile for rpm scripts.
-
-AUTOMAKE_OPTIONS = 1.4 foreign
-
-EXTRA_DIST = \
-       db.xs header.xs junk.xs rpm.xs transaction.xs
-
-installprefix = $(DESTDIR)
-
-configdir = ${prefix}/lib/rpm
-config_SCRIPTS = \
-       db.xs header.xs junk.xs rpm.xs transaction.xs
-
-all install clean: PMakefile
-       make -f $< $@
-       
-PMakefile: Makefile.PL
-       perl Makefile.PL
diff --git a/perl/Makefile.in b/perl/Makefile.in
deleted file mode 100644 (file)
index 5158513..0000000
+++ /dev/null
@@ -1,332 +0,0 @@
-# Makefile.in generated automatically by automake 1.4-p4 from Makefile.am
-
-# Copyright (C) 1994, 1995-8, 1999 Free Software Foundation, Inc.
-# This Makefile.in is free software; the Free Software Foundation
-# gives unlimited permission to copy and/or distribute it,
-# with or without modifications, as long as this notice is preserved.
-
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
-# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
-# PARTICULAR PURPOSE.
-
-# Makefile for rpm scripts.
-
-
-SHELL = @SHELL@
-
-srcdir = @srcdir@
-top_srcdir = @top_srcdir@
-VPATH = @srcdir@
-prefix = @prefix@
-exec_prefix = @exec_prefix@
-
-bindir = @bindir@
-sbindir = @sbindir@
-libexecdir = @libexecdir@
-datadir = @datadir@
-sysconfdir = @sysconfdir@
-sharedstatedir = @sharedstatedir@
-localstatedir = @localstatedir@
-libdir = @libdir@
-infodir = @infodir@
-mandir = @mandir@
-includedir = @includedir@
-oldincludedir = /usr/include
-
-DESTDIR =
-
-pkgdatadir = $(datadir)/@PACKAGE@
-pkglibdir = $(libdir)/@PACKAGE@
-pkgincludedir = $(includedir)/@PACKAGE@
-
-top_builddir = ..
-
-ACLOCAL = @ACLOCAL@
-AUTOCONF = @AUTOCONF@
-AUTOMAKE = @AUTOMAKE@
-AUTOHEADER = @AUTOHEADER@
-
-INSTALL = @INSTALL@
-INSTALL_PROGRAM = @INSTALL_PROGRAM@ $(AM_INSTALL_PROGRAM_FLAGS)
-INSTALL_DATA = @INSTALL_DATA@
-INSTALL_SCRIPT = @INSTALL_SCRIPT@
-transform = @program_transform_name@
-
-NORMAL_INSTALL = :
-PRE_INSTALL = :
-POST_INSTALL = :
-NORMAL_UNINSTALL = :
-PRE_UNINSTALL = :
-POST_UNINSTALL = :
-build_alias = @build_alias@
-build_triplet = @build@
-host_alias = @host_alias@
-host_triplet = @host@
-target_alias = @target_alias@
-target_triplet = @target@
-AR = @AR@
-AS = @AS@
-AWK = @AWK@
-BUILD_INCLUDED_LIBINTL = @BUILD_INCLUDED_LIBINTL@
-BUILD_RPMNLSTOOLS = @BUILD_RPMNLSTOOLS@
-BZIP2BIN = @BZIP2BIN@
-CATALOGS = @CATALOGS@
-CATOBJEXT = @CATOBJEXT@
-CC = @CC@
-CPP = @CPP@
-CSCOPE = @CSCOPE@
-CTAGS = @CTAGS@
-DATADIRNAME = @DATADIRNAME@
-DBLIBOBJS = @DBLIBOBJS@
-DBLIBSRCS = @DBLIBSRCS@
-DLLTOOL = @DLLTOOL@
-ECHO = @ECHO@
-EXEEXT = @EXEEXT@
-FINDPROVIDES = @FINDPROVIDES@
-FINDREQUIRES = @FINDREQUIRES@
-FIXPERMS = @FIXPERMS@
-GENCAT = @GENCAT@
-GLIBC21 = @GLIBC21@
-GMOFILES = @GMOFILES@
-GMSGFMT = @GMSGFMT@
-GZIPBIN = @GZIPBIN@
-INCPATH = @INCPATH@
-INSTOBJEXT = @INSTOBJEXT@
-INTLBISON = @INTLBISON@
-INTLLIBS = @INTLLIBS@
-INTLOBJS = @INTLOBJS@
-INTL_LIBTOOL_SUFFIX_PREFIX = @INTL_LIBTOOL_SUFFIX_PREFIX@
-LDFLAGS_STATIC = @LDFLAGS_STATIC@
-LIBDIR = @LIBDIR@
-LIBICONV = @LIBICONV@
-LIBMISC = @LIBMISC@
-LIBOBJS = @LIBOBJS@
-LIBRPMALIAS_FILENAME = @LIBRPMALIAS_FILENAME@
-LIBRPMRC_FILENAME = @LIBRPMRC_FILENAME@
-LIBS = @LIBS@
-LIBTOOL = @LIBTOOL@
-LN_S = @LN_S@
-LOCALEDIR = @LOCALEDIR@
-MACROFILES = @MACROFILES@
-MAKEINFO = @MAKEINFO@
-MKDIR = @MKDIR@
-MKDIR_P = @MKDIR_P@
-MKINSTALLDIRS = @MKINSTALLDIRS@
-MSGFMT = @MSGFMT@
-OBJDUMP = @OBJDUMP@
-OBJEXT = @OBJEXT@
-PACKAGE = @PACKAGE@
-PGPBIN = @PGPBIN@
-POFILES = @POFILES@
-POSUB = @POSUB@
-RANLIB = @RANLIB@
-ROOT_GROUP = @ROOT_GROUP@
-RPM = @RPM@
-RPMCANONARCH = @RPMCANONARCH@
-RPMCANONOS = @RPMCANONOS@
-RPMCANONVENDOR = @RPMCANONVENDOR@
-RPMCONFIGDIR = @RPMCONFIGDIR@
-RPMGID = @RPMGID@
-RPMGROUP = @RPMGROUP@
-RPMUID = @RPMUID@
-RPMUSER = @RPMUSER@
-STRIP = @STRIP@
-SYSCONFIGDIR = @SYSCONFIGDIR@
-U = @U@
-UNZIPBIN = @UNZIPBIN@
-USE_INCLUDED_LIBINTL = @USE_INCLUDED_LIBINTL@
-USE_NLS = @USE_NLS@
-VERSION = @VERSION@
-WITH_APIDOCS = @WITH_APIDOCS@
-WITH_APIDOCS_TARGET = @WITH_APIDOCS_TARGET@
-WITH_BZIP2 = @WITH_BZIP2@
-WITH_DB_SUBDIR = @WITH_DB_SUBDIR@
-WITH_INTERNAL_DB = @WITH_INTERNAL_DB@
-WITH_PYTHON_SUBDIR = @WITH_PYTHON_SUBDIR@
-WITH_PYTHON_SUBPACKAGE = @WITH_PYTHON_SUBPACKAGE@
-__CAT = @__CAT@
-__CHGRP = @__CHGRP@
-__CHGRP_RHF = @__CHGRP_RHF@
-__CHMOD = @__CHMOD@
-__CHOWN = @__CHOWN@
-__CHOWN_RHF = @__CHOWN_RHF@
-__CP = @__CP@
-__CPIO = @__CPIO@
-__DOXYGEN = @__DOXYGEN@
-__FILE = @__FILE@
-__GPG = @__GPG@
-__GREP = @__GREP@
-__ID = @__ID@
-__ID_U = @__ID_U@
-__INSTALL = @__INSTALL@
-__LD = @__LD@
-__MAKE = @__MAKE@
-__MKDIR = @__MKDIR@
-__MV = @__MV@
-__NM = @__NM@
-__OBJCOPY = @__OBJCOPY@
-__OBJDUMP = @__OBJDUMP@
-__PATCH = @__PATCH@
-__PERL = @__PERL@
-__PYTHON = @__PYTHON@
-__RM = @__RM@
-__RSH = @__RSH@
-__SED = @__SED@
-__SSH = @__SSH@
-__STRIP = @__STRIP@
-__TAR = @__TAR@
-libdb3 = @libdb3@
-libdb3a = @libdb3a@
-testdir = @testdir@
-tmpdir = @tmpdir@
-varprefix = @varprefix@
-
-AUTOMAKE_OPTIONS = 1.4 foreign
-
-EXTRA_DIST =   db.xs header.xs junk.xs rpm.xs transaction.xs
-
-
-installprefix = $(DESTDIR)
-
-configdir = ${prefix}/lib/rpm
-config_SCRIPTS =       db.xs header.xs junk.xs rpm.xs transaction.xs
-
-mkinstalldirs = $(SHELL) $(top_srcdir)/mkinstalldirs
-CONFIG_HEADER = ../config.h
-CONFIG_CLEAN_FILES =  Makefile.PL
-SCRIPTS =  $(config_SCRIPTS)
-
-DIST_COMMON =  README ChangeLog Makefile.PL.in Makefile.am Makefile.in
-
-
-DISTFILES = $(DIST_COMMON) $(SOURCES) $(HEADERS) $(TEXINFOS) $(EXTRA_DIST)
-
-TAR = gtar
-GZIP_ENV = --best
-all: all-redirect
-.SUFFIXES:
-$(srcdir)/Makefile.in: Makefile.am $(top_srcdir)/configure.in $(ACLOCAL_M4) 
-       cd $(top_srcdir) && $(AUTOMAKE) --foreign perl/Makefile
-
-Makefile: $(srcdir)/Makefile.in  $(top_builddir)/config.status $(BUILT_SOURCES)
-       cd $(top_builddir) \
-         && CONFIG_FILES=$(subdir)/$@ CONFIG_HEADERS= $(SHELL) ./config.status
-
-Makefile.PL: $(top_builddir)/config.status Makefile.PL.in
-       cd $(top_builddir) && CONFIG_FILES=$(subdir)/$@ CONFIG_HEADERS= $(SHELL) ./config.status
-
-install-configSCRIPTS: $(config_SCRIPTS)
-       @$(NORMAL_INSTALL)
-       $(mkinstalldirs) $(DESTDIR)$(configdir)
-       @list='$(config_SCRIPTS)'; for p in $$list; do \
-         if test -f $$p; then \
-           echo " $(INSTALL_SCRIPT) $$p $(DESTDIR)$(configdir)/`echo $$p|sed '$(transform)'`"; \
-           $(INSTALL_SCRIPT) $$p $(DESTDIR)$(configdir)/`echo $$p|sed '$(transform)'`; \
-         else if test -f $(srcdir)/$$p; then \
-           echo " $(INSTALL_SCRIPT) $(srcdir)/$$p $(DESTDIR)$(configdir)/`echo $$p|sed '$(transform)'`"; \
-           $(INSTALL_SCRIPT) $(srcdir)/$$p $(DESTDIR)$(configdir)/`echo $$p|sed '$(transform)'`; \
-         else :; fi; fi; \
-       done
-
-uninstall-configSCRIPTS:
-       @$(NORMAL_UNINSTALL)
-       list='$(config_SCRIPTS)'; for p in $$list; do \
-         rm -f $(DESTDIR)$(configdir)/`echo $$p|sed '$(transform)'`; \
-       done
-tags: TAGS
-TAGS:
-
-
-distdir = $(top_builddir)/$(PACKAGE)-$(VERSION)/$(subdir)
-
-subdir = perl
-
-distdir: $(DISTFILES)
-       here=`cd $(top_builddir) && pwd`; \
-       top_distdir=`cd $(top_distdir) && pwd`; \
-       distdir=`cd $(distdir) && pwd`; \
-       cd $(top_srcdir) \
-         && $(AUTOMAKE) --include-deps --build-dir=$$here --srcdir-name=$(top_srcdir) --output-dir=$$top_distdir --foreign perl/Makefile
-       @for file in $(DISTFILES); do \
-         d=$(srcdir); \
-         if test -d $$d/$$file; then \
-           cp -pr $$d/$$file $(distdir)/$$file; \
-         else \
-           test -f $(distdir)/$$file \
-           || ln $$d/$$file $(distdir)/$$file 2> /dev/null \
-           || cp -p $$d/$$file $(distdir)/$$file || :; \
-         fi; \
-       done
-info-am:
-info: info-am
-dvi-am:
-dvi: dvi-am
-check-am: all-am
-check: check-am
-installcheck-am:
-installcheck: installcheck-am
-install-exec-am:
-install-exec: install-exec-am
-
-install-data-am: install-configSCRIPTS
-install-data: install-data-am
-
-install-am: all-am
-       @$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
-install: install-am
-uninstall-am: uninstall-configSCRIPTS
-uninstall: uninstall-am
-all-am: Makefile $(SCRIPTS)
-all-redirect: all-am
-install-strip:
-       $(MAKE) $(AM_MAKEFLAGS) AM_INSTALL_PROGRAM_FLAGS=-s install
-installdirs:
-       $(mkinstalldirs)  $(DESTDIR)$(configdir)
-
-
-mostlyclean-generic:
-
-clean-generic:
-
-distclean-generic:
-       -rm -f Makefile $(CONFIG_CLEAN_FILES)
-       -rm -f config.cache config.log stamp-h stamp-h[0-9]*
-
-maintainer-clean-generic:
-mostlyclean-am:  mostlyclean-generic
-
-mostlyclean: mostlyclean-am
-
-clean-am:  clean-generic mostlyclean-am
-
-clean: clean-am
-
-distclean-am:  distclean-generic clean-am
-       -rm -f libtool
-
-distclean: distclean-am
-
-maintainer-clean-am:  maintainer-clean-generic distclean-am
-       @echo "This command is intended for maintainers to use;"
-       @echo "it deletes files that may require special tools to rebuild."
-
-maintainer-clean: maintainer-clean-am
-
-.PHONY: uninstall-configSCRIPTS install-configSCRIPTS tags distdir \
-info-am info dvi-am dvi check check-am installcheck-am installcheck \
-install-exec-am install-exec install-data-am install-data install-am \
-install uninstall-am uninstall all-redirect all-am all installdirs \
-mostlyclean-generic distclean-generic clean-generic \
-maintainer-clean-generic clean mostlyclean distclean maintainer-clean
-
-
-all install clean: PMakefile
-       make -f $< $@
-
-PMakefile: Makefile.PL
-       perl Makefile.PL
-
-# Tell versions [3.59,3.63) of GNU make to not export all variables.
-# Otherwise a system limit (for SysV at least) may be exceeded.
-.NOEXPORT:
diff --git a/perl/PMakefile b/perl/PMakefile
deleted file mode 100644 (file)
index cbed49b..0000000
+++ /dev/null
@@ -1,779 +0,0 @@
-# This Makefile is for the rpm extension to perl.
-#
-# It was generated automatically by MakeMaker version
-# 5.4302 (Revision: 1.222) from the contents of
-# Makefile.PL. Don't edit this file, edit Makefile.PL instead.
-#
-#      ANY CHANGES MADE HERE WILL BE LOST!
-#
-#   MakeMaker ARGV: ()
-#
-#   MakeMaker Parameters:
-
-#      CCFLAGS => q[-g -O2 -D_GNU_SOURCE -Wall -Wpointer-arith -Wstrict-prototypes -Wmissing-prototypes -Wno-char-subscripts]
-#      DEFINE => q[-Dbool=char -DHAS_BOOL]
-#      INC => q[ -I../build -I../lib -I../popt -I/usr/include/rpm]
-#      LIBS => [q[-L/usr/local/lib  -ldb1 -lz -lbz2]]
-#      MAKEFILE => q[PMakefile]
-#      NAME => q[rpm]
-#      OBJECT => q[rpm.o constant.o]
-#      OPTIMIZE => q[-g]
-#      VERSION_FROM => q[rpm.pm]
-#      depend => { rpm.c=>q[transaction.xs header.xs db.xs] }
-
-# --- MakeMaker post_initialize section:
-
-
-# --- MakeMaker const_config section:
-
-# These definitions are from config.sh (via /usr/lib/perl5/5.00503/sparc-linux/Config.pm)
-
-# They may have been overridden via Makefile.PL or on the command line
-AR = ar
-CC = cc
-CCCDLFLAGS = -fpic
-CCDLFLAGS = -rdynamic
-DLEXT = so
-DLSRC = dl_dlopen.xs
-LD = cc
-LDDLFLAGS = -shared -L/usr/local/lib
-LDFLAGS =  -L/usr/local/lib
-LIBC = 
-LIB_EXT = .a
-OBJ_EXT = .o
-OSNAME = linux
-OSVERS = 2.2.12-42
-RANLIB = :
-SO = so
-EXE_EXT = 
-
-
-# --- MakeMaker constants section:
-AR_STATIC_ARGS = cr
-NAME = rpm
-DISTNAME = rpm
-NAME_SYM = rpm
-VERSION = 0.01
-VERSION_SYM = 0_01
-XS_VERSION = 0.01
-INST_BIN = blib/bin
-INST_EXE = blib/script
-INST_LIB = blib/lib
-INST_ARCHLIB = blib/arch
-INST_SCRIPT = blib/script
-PREFIX = /usr
-INSTALLDIRS = site
-INSTALLPRIVLIB = $(PREFIX)/lib/perl5/5.00503
-INSTALLARCHLIB = $(PREFIX)/lib/perl5/5.00503/sparc-linux
-INSTALLSITELIB = $(PREFIX)/lib/perl5/site_perl/5.005
-INSTALLSITEARCH = $(PREFIX)/lib/perl5/site_perl/5.005/sparc-linux
-INSTALLBIN = $(PREFIX)/bin
-INSTALLSCRIPT = $(PREFIX)/bin
-PERL_LIB = /usr/lib/perl5/5.00503
-PERL_ARCHLIB = /usr/lib/perl5/5.00503/sparc-linux
-SITELIBEXP = /usr/lib/perl5/site_perl/5.005
-SITEARCHEXP = /usr/lib/perl5/site_perl/5.005/sparc-linux
-LIBPERL_A = libperl.a
-FIRST_MAKEFILE = Makefile
-MAKE_APERL_FILE = Makefile.aperl
-PERLMAINCC = $(CC)
-PERL_INC = /usr/lib/perl5/5.00503/sparc-linux/CORE
-PERL = /usr/bin/perl
-FULLPERL = /usr/bin/perl
-
-VERSION_MACRO = VERSION
-DEFINE_VERSION = -D$(VERSION_MACRO)=\"$(VERSION)\"
-XS_VERSION_MACRO = XS_VERSION
-XS_DEFINE_VERSION = -D$(XS_VERSION_MACRO)=\"$(XS_VERSION)\"
-
-MAKEMAKER = /usr/lib/perl5/5.00503/ExtUtils/MakeMaker.pm
-MM_VERSION = 5.4302
-
-# FULLEXT = Pathname for extension directory (eg Foo/Bar/Oracle).
-# BASEEXT = Basename part of FULLEXT. May be just equal FULLEXT. (eg Oracle)
-# ROOTEXT = Directory part of FULLEXT with leading slash (eg /DBD)  !!! Deprecated from MM 5.32  !!!
-# PARENT_NAME = NAME without BASEEXT and no trailing :: (eg Foo::Bar)
-# DLBASE  = Basename part of dynamic library. May be just equal BASEEXT.
-FULLEXT = rpm
-BASEEXT = rpm
-DLBASE = $(BASEEXT)
-VERSION_FROM = rpm.pm
-INC =  -I../build -I../lib -I../popt -I/usr/include/rpm
-DEFINE = -Dbool=char -DHAS_BOOL
-OBJECT = rpm$(OBJ_EXT) constant$(OBJ_EXT)
-LDFROM = $(OBJECT)
-LINKTYPE = dynamic
-
-# Handy lists of source code files:
-XS_FILES= db.xs \
-       header.xs \
-       junk.xs \
-       rpm.xs \
-       transaction.xs
-C_FILES = constant.c \
-       db.c \
-       header.c \
-       junk.c \
-       rpm.c \
-       transaction.c
-O_FILES = constant.o \
-       db.o \
-       header.o \
-       junk.o \
-       rpm.o \
-       transaction.o
-H_FILES = 
-MAN1PODS = 
-MAN3PODS = rpm.pm
-INST_MAN1DIR = blib/man1
-INSTALLMAN1DIR = $(PREFIX)/man/man1
-MAN1EXT = 1
-INST_MAN3DIR = blib/man3
-INSTALLMAN3DIR = $(PREFIX)/lib/perl5/man/man3
-MAN3EXT = 3
-PERM_RW = 644
-PERM_RWX = 755
-
-# work around a famous dec-osf make(1) feature(?):
-makemakerdflt: all
-
-.SUFFIXES: .xs .c .C .cpp .cxx .cc $(OBJ_EXT)
-
-# Nick wanted to get rid of .PRECIOUS. I don't remember why. I seem to recall, that
-# some make implementations will delete the Makefile when we rebuild it. Because
-# we call false(1) when we rebuild it. So make(1) is not completely wrong when it
-# does so. Our milage may vary.
-# .PRECIOUS: Makefile    # seems to be not necessary anymore
-
-.PHONY: all config static dynamic test linkext manifest
-
-# Where is the Config information that we are using/depend on
-CONFIGDEP = $(PERL_ARCHLIB)/Config.pm $(PERL_INC)/config.h
-
-# Where to put things:
-INST_LIBDIR      = $(INST_LIB)
-INST_ARCHLIBDIR  = $(INST_ARCHLIB)
-
-INST_AUTODIR     = $(INST_LIB)/auto/$(FULLEXT)
-INST_ARCHAUTODIR = $(INST_ARCHLIB)/auto/$(FULLEXT)
-
-INST_STATIC  = $(INST_ARCHAUTODIR)/$(BASEEXT)$(LIB_EXT)
-INST_DYNAMIC = $(INST_ARCHAUTODIR)/$(DLBASE).$(DLEXT)
-INST_BOOT    = $(INST_ARCHAUTODIR)/$(BASEEXT).bs
-
-EXPORT_LIST = 
-
-PERL_ARCHIVE = 
-
-TO_INST_PM = rpm.pm
-
-PM_TO_BLIB = rpm.pm \
-       $(INST_LIBDIR)/rpm.pm
-
-
-# --- MakeMaker tool_autosplit section:
-
-# Usage: $(AUTOSPLITFILE) FileToSplit AutoDirToSplitInto
-AUTOSPLITFILE = $(PERL) "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" -e 'use AutoSplit;autosplit($$ARGV[0], $$ARGV[1], 0, 1, 1) ;'
-
-
-# --- MakeMaker tool_xsubpp section:
-
-XSUBPPDIR = /usr/lib/perl5/5.00503/ExtUtils
-XSUBPP = $(XSUBPPDIR)/xsubpp
-XSPROTOARG = 
-XSUBPPDEPS = $(XSUBPPDIR)/typemap typemap
-XSUBPPARGS = -typemap $(XSUBPPDIR)/typemap -typemap typemap
-
-
-# --- MakeMaker tools_other section:
-
-SHELL = /bin/sh
-CHMOD = chmod
-CP = cp
-LD = cc
-MV = mv
-NOOP = $(SHELL) -c true
-RM_F = rm -f
-RM_RF = rm -rf
-TEST_F = test -f
-TOUCH = touch
-UMASK_NULL = umask 0
-DEV_NULL = > /dev/null 2>&1
-
-# The following is a portable way to say mkdir -p
-# To see which directories are created, change the if 0 to if 1
-MKPATH = $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Command -e mkpath
-
-# This helps us to minimize the effect of the .exists files A yet
-# better solution would be to have a stable file in the perl
-# distribution with a timestamp of zero. But this solution doesn't
-# need any changes to the core distribution and works with older perls
-EQUALIZE_TIMESTAMP = $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Command -e eqtime
-
-# Here we warn users that an old packlist file was found somewhere,
-# and that they should call some uninstall routine
-WARN_IF_OLD_PACKLIST = $(PERL) -we 'exit unless -f $$ARGV[0];' \
--e 'print "WARNING: I have found an old package in\n";' \
--e 'print "\t$$ARGV[0].\n";' \
--e 'print "Please make sure the two installations are not conflicting\n";'
-
-UNINST=0
-VERBINST=1
-
-MOD_INSTALL = $(PERL) -I$(INST_LIB) -I$(PERL_LIB) -MExtUtils::Install \
--e "install({@ARGV},'$(VERBINST)',0,'$(UNINST)');"
-
-DOC_INSTALL = $(PERL) -e '$$\="\n\n";' \
--e 'print "=head2 ", scalar(localtime), ": C<", shift, ">", " L<", shift, ">";' \
--e 'print "=over 4";' \
--e 'while (defined($$key = shift) and defined($$val = shift)){print "=item *";print "C<$$key: $$val>";}' \
--e 'print "=back";'
-
-UNINSTALL =   $(PERL) -MExtUtils::Install \
--e 'uninstall($$ARGV[0],1,1); print "\nUninstall is deprecated. Please check the";' \
--e 'print " packlist above carefully.\n  There may be errors. Remove the";' \
--e 'print " appropriate files manually.\n  Sorry for the inconveniences.\n"'
-
-
-# --- MakeMaker dist section:
-
-DISTVNAME = $(DISTNAME)-$(VERSION)
-TAR  = tar
-TARFLAGS = cvf
-ZIP  = zip
-ZIPFLAGS = -r
-COMPRESS = gzip --best
-SUFFIX = .gz
-SHAR = shar
-PREOP = @$(NOOP)
-POSTOP = @$(NOOP)
-TO_UNIX = @$(NOOP)
-CI = ci -u
-RCS_LABEL = rcs -Nv$(VERSION_SYM): -q
-DIST_CP = best
-DIST_DEFAULT = tardist
-
-
-# --- MakeMaker macro section:
-
-
-# --- MakeMaker depend section:
-rpm.c: transaction.xs header.xs db.xs
-
-
-# --- MakeMaker cflags section:
-
-CCFLAGS = -g -O2 -D_GNU_SOURCE -Wall -Wpointer-arith -Wstrict-prototypes -Wmissing-prototypes -Wno-char-subscripts
-OPTIMIZE = -g
-PERLTYPE = 
-LARGE = 
-SPLIT = 
-
-
-# --- MakeMaker const_loadlibs section:
-
-# rpm might depend on some other libraries:
-# See ExtUtils::Liblist for details
-#
-EXTRALIBS = -L/usr/local/lib -ldb1 -lz -lbz2
-LDLOADLIBS = -L/usr/local/lib -ldb1 -lz -lbz2
-BSLOADLIBS = 
-LD_RUN_PATH = /lib:/usr/lib
-
-
-# --- MakeMaker const_cccmd section:
-CCCMD = $(CC) -c $(INC) $(CCFLAGS) $(OPTIMIZE) \
-       $(PERLTYPE) $(LARGE) $(SPLIT) $(DEFINE_VERSION) \
-       $(XS_DEFINE_VERSION)
-
-# --- MakeMaker post_constants section:
-
-
-# --- MakeMaker pasthru section:
-
-PASTHRU = LIB="$(LIB)"\
-       LIBPERL_A="$(LIBPERL_A)"\
-       LINKTYPE="$(LINKTYPE)"\
-       PREFIX="$(PREFIX)"\
-       OPTIMIZE="$(OPTIMIZE)"
-
-
-# --- MakeMaker c_o section:
-
-.c$(OBJ_EXT):
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.c
-
-.C$(OBJ_EXT):
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.C
-
-.cpp$(OBJ_EXT):
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.cpp
-
-.cxx$(OBJ_EXT):
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.cxx
-
-.cc$(OBJ_EXT):
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.cc
-
-
-# --- MakeMaker xs_c section:
-
-.xs.c:
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) $(XSPROTOARG) $(XSUBPPARGS) $*.xs >xstmp.c && $(MV) xstmp.c $*.c
-
-
-# --- MakeMaker xs_o section:
-
-.xs$(OBJ_EXT):
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(XSUBPP) $(XSPROTOARG) $(XSUBPPARGS) $*.xs >xstmp.c && $(MV) xstmp.c $*.c
-       $(CCCMD) $(CCCDLFLAGS) -I$(PERL_INC) $(DEFINE) $*.c
-
-
-# --- MakeMaker top_targets section:
-
-#all ::        config $(INST_PM) subdirs linkext manifypods
-
-all :: pure_all manifypods
-       @$(NOOP)
-
-pure_all :: config pm_to_blib subdirs linkext
-       @$(NOOP)
-
-subdirs :: $(MYEXTLIB)
-       @$(NOOP)
-
-config :: PMakefile $(INST_LIBDIR)/.exists
-       @$(NOOP)
-
-config :: $(INST_ARCHAUTODIR)/.exists
-       @$(NOOP)
-
-config :: $(INST_AUTODIR)/.exists
-       @$(NOOP)
-
-config :: Version_check
-       @$(NOOP)
-
-
-$(INST_AUTODIR)/.exists :: /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h
-       @$(MKPATH) $(INST_AUTODIR)
-       @$(EQUALIZE_TIMESTAMP) /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h $(INST_AUTODIR)/.exists
-
-       -@$(CHMOD) $(PERM_RWX) $(INST_AUTODIR)
-
-$(INST_LIBDIR)/.exists :: /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h
-       @$(MKPATH) $(INST_LIBDIR)
-       @$(EQUALIZE_TIMESTAMP) /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h $(INST_LIBDIR)/.exists
-
-       -@$(CHMOD) $(PERM_RWX) $(INST_LIBDIR)
-
-$(INST_ARCHAUTODIR)/.exists :: /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h
-       @$(MKPATH) $(INST_ARCHAUTODIR)
-       @$(EQUALIZE_TIMESTAMP) /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h $(INST_ARCHAUTODIR)/.exists
-
-       -@$(CHMOD) $(PERM_RWX) $(INST_ARCHAUTODIR)
-
-config :: $(INST_MAN3DIR)/.exists
-       @$(NOOP)
-
-
-$(INST_MAN3DIR)/.exists :: /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h
-       @$(MKPATH) $(INST_MAN3DIR)
-       @$(EQUALIZE_TIMESTAMP) /usr/lib/perl5/5.00503/sparc-linux/CORE/perl.h $(INST_MAN3DIR)/.exists
-
-       -@$(CHMOD) $(PERM_RWX) $(INST_MAN3DIR)
-
-help:
-       perldoc ExtUtils::MakeMaker
-
-Version_check:
-       @$(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) \
-               -MExtUtils::MakeMaker=Version_check \
-               -e "Version_check('$(MM_VERSION)')"
-
-
-# --- MakeMaker linkext section:
-
-linkext :: $(LINKTYPE)
-       @$(NOOP)
-
-
-# --- MakeMaker dlsyms section:
-
-
-# --- MakeMaker dynamic section:
-
-## $(INST_PM) has been moved to the all: target.
-## It remains here for awhile to allow for old usage: "make dynamic"
-#dynamic :: PMakefile $(INST_DYNAMIC) $(INST_BOOT) $(INST_PM)
-dynamic :: PMakefile $(INST_DYNAMIC) $(INST_BOOT)
-       @$(NOOP)
-
-
-# --- MakeMaker dynamic_bs section:
-
-BOOTSTRAP = rpm.bs
-
-# As Mkbootstrap might not write a file (if none is required)
-# we use touch to prevent make continually trying to remake it.
-# The DynaLoader only reads a non-empty file.
-$(BOOTSTRAP): PMakefile  $(INST_ARCHAUTODIR)/.exists
-       @echo "Running Mkbootstrap for $(NAME) ($(BSLOADLIBS))"
-       @$(PERL) "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" \
-               -MExtUtils::Mkbootstrap \
-               -e "Mkbootstrap('$(BASEEXT)','$(BSLOADLIBS)');"
-       @$(TOUCH) $(BOOTSTRAP)
-       $(CHMOD) $(PERM_RW) $@
-
-$(INST_BOOT): $(BOOTSTRAP) $(INST_ARCHAUTODIR)/.exists
-       @rm -rf $(INST_BOOT)
-       -cp $(BOOTSTRAP) $(INST_BOOT)
-       $(CHMOD) $(PERM_RW) $@
-
-
-# --- MakeMaker dynamic_lib section:
-
-# This section creates the dynamically loadable $(INST_DYNAMIC)
-# from $(OBJECT) and possibly $(MYEXTLIB).
-ARMAYBE = :
-OTHERLDFLAGS = 
-INST_DYNAMIC_DEP = 
-
-$(INST_DYNAMIC): $(OBJECT) $(MYEXTLIB) $(BOOTSTRAP) $(INST_ARCHAUTODIR)/.exists $(EXPORT_LIST) $(PERL_ARCHIVE) $(INST_DYNAMIC_DEP)
-       LD_RUN_PATH="$(LD_RUN_PATH)" $(LD) -o $@  $(LDDLFLAGS) $(LDFROM) $(OTHERLDFLAGS) $(MYEXTLIB) $(PERL_ARCHIVE) $(LDLOADLIBS) $(EXPORT_LIST)
-       $(CHMOD) $(PERM_RWX) $@
-
-
-# --- MakeMaker static section:
-
-## $(INST_PM) has been moved to the all: target.
-## It remains here for awhile to allow for old usage: "make static"
-#static :: PMakefile $(INST_STATIC) $(INST_PM)
-static :: PMakefile $(INST_STATIC)
-       @$(NOOP)
-
-
-# --- MakeMaker static_lib section:
-
-$(INST_STATIC): $(OBJECT) $(MYEXTLIB) $(INST_ARCHAUTODIR)/.exists
-       $(RM_RF) $@
-       $(AR) $(AR_STATIC_ARGS) $@ $(OBJECT) && $(RANLIB) $@
-       $(CHMOD) $(PERM_RWX) $@
-       @echo "$(EXTRALIBS)" > $(INST_ARCHAUTODIR)/extralibs.ld
-
-
-
-# --- MakeMaker manifypods section:
-POD2MAN_EXE = /usr/bin/pod2man
-POD2MAN = $(PERL) -we '%m=@ARGV;for (keys %m){' \
--e 'next if -e $$m{$$_} && -M $$m{$$_} < -M $$_ && -M $$m{$$_} < -M "PMakefile";' \
--e 'print "Manifying $$m{$$_}\n";' \
--e 'system(qq[$$^X ].q["-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" $(POD2MAN_EXE) ].qq[$$_>$$m{$$_}])==0 or warn "Couldn\047t install $$m{$$_}\n";' \
--e 'chmod(oct($(PERM_RW))), $$m{$$_} or warn "chmod $(PERM_RW) $$m{$$_}: $$!\n";}'
-
-manifypods : pure_all rpm.pm
-       @$(POD2MAN) \
-       rpm.pm \
-       $(INST_MAN3DIR)/rpm.$(MAN3EXT)
-
-# --- MakeMaker processPL section:
-
-
-# --- MakeMaker installbin section:
-
-
-# --- MakeMaker subdirs section:
-
-# none
-
-# --- MakeMaker clean section:
-
-# Delete temporary files but do not touch installed files. We don't delete
-# the Makefile here so a later make realclean still has a makefile to use.
-
-clean ::
-       -rm -rf rpm.c junk.c header.c transaction.c db.c ./blib $(MAKE_APERL_FILE) $(INST_ARCHAUTODIR)/extralibs.all perlmain.c mon.out core so_locations pm_to_blib *~ */*~ */*/*~ *$(OBJ_EXT) *$(LIB_EXT) perl.exe $(BOOTSTRAP) $(BASEEXT).bso $(BASEEXT).def $(BASEEXT).exp
-       -mv PMakefile PMakefile.old $(DEV_NULL)
-
-
-# --- MakeMaker realclean section:
-
-# Delete temporary files (via clean) and also delete installed files
-realclean purge ::  clean
-       rm -rf $(INST_AUTODIR) $(INST_ARCHAUTODIR)
-       rm -f $(INST_DYNAMIC) $(INST_BOOT)
-       rm -f $(INST_STATIC)
-       rm -f $(INST_LIBDIR)/rpm.pm
-       rm -rf PMakefile PMakefile.old
-
-
-# --- MakeMaker dist_basics section:
-
-distclean :: realclean distcheck
-
-distcheck :
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Manifest=fullcheck \
-               -e fullcheck
-
-skipcheck :
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Manifest=skipcheck \
-               -e skipcheck
-
-manifest :
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Manifest=mkmanifest \
-               -e mkmanifest
-
-
-# --- MakeMaker dist_core section:
-
-dist : $(DIST_DEFAULT)
-       @$(PERL) -le 'print "Warning: Makefile possibly out of date with $$vf" if ' \
-           -e '-e ($$vf="$(VERSION_FROM)") and -M $$vf < -M "PMakefile";'
-
-tardist : $(DISTVNAME).tar$(SUFFIX)
-
-zipdist : $(DISTVNAME).zip
-
-$(DISTVNAME).tar$(SUFFIX) : distdir
-       $(PREOP)
-       $(TO_UNIX)
-       $(TAR) $(TARFLAGS) $(DISTVNAME).tar $(DISTVNAME)
-       $(RM_RF) $(DISTVNAME)
-       $(COMPRESS) $(DISTVNAME).tar
-       $(POSTOP)
-
-$(DISTVNAME).zip : distdir
-       $(PREOP)
-       $(ZIP) $(ZIPFLAGS) $(DISTVNAME).zip $(DISTVNAME)
-       $(RM_RF) $(DISTVNAME)
-       $(POSTOP)
-
-uutardist : $(DISTVNAME).tar$(SUFFIX)
-       uuencode $(DISTVNAME).tar$(SUFFIX) \
-               $(DISTVNAME).tar$(SUFFIX) > \
-               $(DISTVNAME).tar$(SUFFIX)_uu
-
-shdist : distdir
-       $(PREOP)
-       $(SHAR) $(DISTVNAME) > $(DISTVNAME).shar
-       $(RM_RF) $(DISTVNAME)
-       $(POSTOP)
-
-
-# --- MakeMaker dist_dir section:
-
-distdir :
-       $(RM_RF) $(DISTVNAME)
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Manifest=manicopy,maniread \
-               -e "manicopy(maniread(),'$(DISTVNAME)', '$(DIST_CP)');"
-
-
-# --- MakeMaker dist_test section:
-
-disttest : distdir
-       cd $(DISTVNAME) && $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) Makefile.PL
-       cd $(DISTVNAME) && $(MAKE)
-       cd $(DISTVNAME) && $(MAKE) test
-
-
-# --- MakeMaker dist_ci section:
-
-ci :
-       $(PERL) -I$(PERL_ARCHLIB) -I$(PERL_LIB) -MExtUtils::Manifest=maniread \
-               -e "@all = keys %{ maniread() };" \
-               -e 'print("Executing $(CI) @all\n"); system("$(CI) @all");' \
-               -e 'print("Executing $(RCS_LABEL) ...\n"); system("$(RCS_LABEL) @all");'
-
-
-# --- MakeMaker install section:
-
-install :: all pure_install doc_install
-
-install_perl :: all pure_perl_install doc_perl_install
-
-install_site :: all pure_site_install doc_site_install
-
-install_ :: install_site
-       @echo INSTALLDIRS not defined, defaulting to INSTALLDIRS=site
-
-pure_install :: pure_$(INSTALLDIRS)_install
-
-doc_install :: doc_$(INSTALLDIRS)_install
-       @echo Appending installation info to $(INSTALLARCHLIB)/perllocal.pod
-
-pure__install : pure_site_install
-       @echo INSTALLDIRS not defined, defaulting to INSTALLDIRS=site
-
-doc__install : doc_site_install
-       @echo INSTALLDIRS not defined, defaulting to INSTALLDIRS=site
-
-pure_perl_install ::
-       @$(MOD_INSTALL) \
-               read $(PERL_ARCHLIB)/auto/$(FULLEXT)/.packlist \
-               write $(INSTALLARCHLIB)/auto/$(FULLEXT)/.packlist \
-               $(INST_LIB) $(INSTALLPRIVLIB) \
-               $(INST_ARCHLIB) $(INSTALLARCHLIB) \
-               $(INST_BIN) $(INSTALLBIN) \
-               $(INST_SCRIPT) $(INSTALLSCRIPT) \
-               $(INST_MAN1DIR) $(INSTALLMAN1DIR) \
-               $(INST_MAN3DIR) $(INSTALLMAN3DIR)
-       @$(WARN_IF_OLD_PACKLIST) \
-               $(SITEARCHEXP)/auto/$(FULLEXT)
-
-
-pure_site_install ::
-       @$(MOD_INSTALL) \
-               read $(SITEARCHEXP)/auto/$(FULLEXT)/.packlist \
-               write $(INSTALLSITEARCH)/auto/$(FULLEXT)/.packlist \
-               $(INST_LIB) $(INSTALLSITELIB) \
-               $(INST_ARCHLIB) $(INSTALLSITEARCH) \
-               $(INST_BIN) $(INSTALLBIN) \
-               $(INST_SCRIPT) $(INSTALLSCRIPT) \
-               $(INST_MAN1DIR) $(INSTALLMAN1DIR) \
-               $(INST_MAN3DIR) $(INSTALLMAN3DIR)
-       @$(WARN_IF_OLD_PACKLIST) \
-               $(PERL_ARCHLIB)/auto/$(FULLEXT)
-
-doc_perl_install ::
-       -@$(DOC_INSTALL) \
-               "Module" "$(NAME)" \
-               "installed into" "$(INSTALLPRIVLIB)" \
-               LINKTYPE "$(LINKTYPE)" \
-               VERSION "$(VERSION)" \
-               EXE_FILES "$(EXE_FILES)" \
-               >> $(INSTALLARCHLIB)/perllocal.pod
-
-doc_site_install ::
-       -@$(DOC_INSTALL) \
-               "Module" "$(NAME)" \
-               "installed into" "$(INSTALLSITELIB)" \
-               LINKTYPE "$(LINKTYPE)" \
-               VERSION "$(VERSION)" \
-               EXE_FILES "$(EXE_FILES)" \
-               >> $(INSTALLARCHLIB)/perllocal.pod
-
-
-uninstall :: uninstall_from_$(INSTALLDIRS)dirs
-
-uninstall_from_perldirs ::
-       @$(UNINSTALL) $(PERL_ARCHLIB)/auto/$(FULLEXT)/.packlist
-
-uninstall_from_sitedirs ::
-       @$(UNINSTALL) $(SITEARCHEXP)/auto/$(FULLEXT)/.packlist
-
-
-# --- MakeMaker force section:
-# Phony target to force checking subdirectories.
-FORCE:
-       @$(NOOP)
-
-
-# --- MakeMaker perldepend section:
-
-PERL_HDRS = \
-$(PERL_INC)/EXTERN.h       $(PERL_INC)/gv.h           $(PERL_INC)/pp.h       \
-$(PERL_INC)/INTERN.h       $(PERL_INC)/handy.h        $(PERL_INC)/proto.h    \
-$(PERL_INC)/XSUB.h         $(PERL_INC)/hv.h           $(PERL_INC)/regcomp.h  \
-$(PERL_INC)/av.h           $(PERL_INC)/keywords.h     $(PERL_INC)/regexp.h   \
-$(PERL_INC)/config.h       $(PERL_INC)/mg.h           $(PERL_INC)/scope.h    \
-$(PERL_INC)/cop.h          $(PERL_INC)/op.h           $(PERL_INC)/sv.h      \
-$(PERL_INC)/cv.h           $(PERL_INC)/opcode.h       $(PERL_INC)/unixish.h  \
-$(PERL_INC)/dosish.h       $(PERL_INC)/patchlevel.h   $(PERL_INC)/util.h     \
-$(PERL_INC)/embed.h        $(PERL_INC)/perl.h         $(PERL_INC)/iperlsys.h \
-$(PERL_INC)/form.h         $(PERL_INC)/perly.h
-
-$(OBJECT) : $(PERL_HDRS)
-
-rpm.c junk.c header.c transaction.c db.c : $(XSUBPPDEPS)
-
-
-# --- MakeMaker makefile section:
-
-$(OBJECT) : $(FIRST_MAKEFILE)
-
-# We take a very conservative approach here, but it\'s worth it.
-# We move Makefile to Makefile.old here to avoid gnu make looping.
-PMakefile : Makefile.PL $(CONFIGDEP)
-       @echo "Makefile out-of-date with respect to $?"
-       @echo "Cleaning current config before rebuilding Makefile..."
-       -@$(RM_F) PMakefile.old
-       -@$(MV) PMakefile PMakefile.old
-       -$(MAKE) -f PMakefile.old clean $(DEV_NULL) || $(NOOP)
-       $(PERL) "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" Makefile.PL 
-       @echo "==> Your Makefile has been rebuilt. <=="
-       @echo "==> Please rerun the make command.  <=="
-       false
-
-# To change behavior to :: would be nice, but would break Tk b9.02
-# so you find such a warning below the dist target.
-#PMakefile :: $(VERSION_FROM)
-#      @echo "Warning: Makefile possibly out of date with $(VERSION_FROM)"
-
-
-# --- MakeMaker staticmake section:
-
-# --- MakeMaker makeaperl section ---
-MAP_TARGET    = perl
-FULLPERL      = /usr/bin/perl
-
-$(MAP_TARGET) :: static $(MAKE_APERL_FILE)
-       $(MAKE) -f $(MAKE_APERL_FILE) $@
-
-$(MAKE_APERL_FILE) : $(FIRST_MAKEFILE)
-       @echo Writing \"$(MAKE_APERL_FILE)\" for this $(MAP_TARGET)
-       @$(PERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) \
-               Makefile.PL DIR= \
-               MAKEFILE=$(MAKE_APERL_FILE) LINKTYPE=static \
-               MAKEAPERL=1 NORECURS=1 CCCDLFLAGS=
-
-
-# --- MakeMaker test section:
-
-TEST_VERBOSE=0
-TEST_TYPE=test_$(LINKTYPE)
-TEST_FILE = test.pl
-TEST_FILES = 
-TESTDB_SW = -d
-
-testdb :: testdb_$(LINKTYPE)
-
-test :: $(TEST_TYPE)
-
-test_dynamic :: pure_all
-       PERL_DL_NONLAZY=1 $(FULLPERL) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(TEST_FILE)
-
-testdb_dynamic :: pure_all
-       PERL_DL_NONLAZY=1 $(FULLPERL) $(TESTDB_SW) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(TEST_FILE)
-
-test_ : test_dynamic
-
-test_static :: pure_all $(MAP_TARGET)
-       PERL_DL_NONLAZY=1 ./$(MAP_TARGET) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(TEST_FILE)
-
-testdb_static :: pure_all $(MAP_TARGET)
-       PERL_DL_NONLAZY=1 ./$(MAP_TARGET) $(TESTDB_SW) -I$(INST_ARCHLIB) -I$(INST_LIB) -I$(PERL_ARCHLIB) -I$(PERL_LIB) $(TEST_FILE)
-
-
-
-# --- MakeMaker ppd section:
-# Creates a PPD (Perl Package Description) for a binary distribution.
-ppd:
-       @$(PERL) -e "print qq{<SOFTPKG NAME=\"rpm\" VERSION=\"0,01,0,0\">\n}. qq{\t<TITLE>rpm</TITLE>\n}. qq{\t<ABSTRACT></ABSTRACT>\n}. qq{\t<AUTHOR></AUTHOR>\n}. qq{\t<IMPLEMENTATION>\n}. qq{\t\t<OS NAME=\"$(OSNAME)\" />\n}. qq{\t\t<ARCHITECTURE NAME=\"sparc-linux\" />\n}. qq{\t\t<CODEBASE HREF=\"\" />\n}. qq{\t</IMPLEMENTATION>\n}. qq{</SOFTPKG>\n}" > rpm.ppd
-
-# --- MakeMaker pm_to_blib section:
-
-pm_to_blib: $(TO_INST_PM)
-       @$(PERL) "-I$(INST_ARCHLIB)" "-I$(INST_LIB)" \
-       "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" -MExtUtils::Install \
-        -e "pm_to_blib({qw{$(PM_TO_BLIB)}},'$(INST_LIB)/auto')"
-       @$(TOUCH) $@
-
-
-# --- MakeMaker selfdocument section:
-
-
-# --- MakeMaker postamble section:
-
-
-# End.
diff --git a/perl/README b/perl/README
deleted file mode 100644 (file)
index 4caa313..0000000
+++ /dev/null
@@ -1,6 +0,0 @@
-Copyright (c) 1999 Red Hat, Inc. All rights reserved. 
-
-Developed by Cristian Gafton <gafton@redhat.com>
-
-This program is free software; you can redistribute it and/or 
-modify it under the same terms as Perl itself.
diff --git a/perl/check b/perl/check
deleted file mode 100755 (executable)
index b9232d8..0000000
+++ /dev/null
@@ -1,55 +0,0 @@
-#!/usr/bin/perl
-
-use ExtUtils::testlib;
-use rpm;
-
-my $testfile = "foo.i386.rpm";
-
-my $header = rpm::Header($testfile);
-
-print "Test No. 1\n";
-if ($header) {
-  my @foo_test = ();
-  my %foo_test = ();
-  my $key;
-
-  print "call to the header function SUCCEEDED\n";
-  @foo_test = $header->ItemByVal(1027);
-  print "values returned by ItemByVal(1027) ", join(' ',@foo_test), "\n\n\n";
-  @foo_test = $header->ItemByName("Filenames");
-  print "values returned by ItemByName(\"Filenames\") ", join(' ',@foo_test), "\n\n\n";
-
-  print "\n\nTest No. 2\n";
-  %foo_test = $header->List();
-  foreach $key (sort keys %foo_test) {
-    my $foo_it;
-    print "Item [$key] has [", scalar @{$foo_test{$key}}, "] values: ";
-    foreach $foo_it (@{$foo_test{$key}}) {
-      print "[$foo_it] ";
-    }
-    print "\n";
-  }
-  
-  print "\n\nTest No. 3\n";
-  print "The number of header tags is: ", scalar $header->Tags(), "\n";
-
-  print "\n\nTest No. 4\n";
-  rpm::Debug();
-  my $db = rpm::dbOpen();
-  if ($db) {
-    my $rec = $db->First();
-    while ($rec != 0) {
-      my $hdr = $db->Record($rec);
-      print "Found header: Name=[", $hdr->ItemByName("Name"), "]\n";
-      $rec = $db->Next($rec);
-    }
-    $db->Close();
-  } else {
-    print "Could not open the RPM database! Error code: ", rpm::Error(), "\n";
-  }
-} else {
-  print "call to the header function FAILED\n";
-}
-
-
-
diff --git a/perl/constant.c b/perl/constant.c
deleted file mode 100644 (file)
index 7a2a346..0000000
+++ /dev/null
@@ -1,1650 +0,0 @@
-/*
- * This file contains the constant() function that is used
- * by perl AutoLoader when looking up exported constant symbols
- *
- * $Id: constant.c,v 1.2 1999/07/14 18:23:16 gafton Exp $
- */
-
-#include "EXTERN.h" 
-#include "perl.h" 
-#include "XSUB.h" 
-#include <rpm/rpmio.h> 
-#include <rpm/dbindex.h> 
-#include <rpm/header.h> 
-#include <popt.h> 
-#include <rpm/rpmlib.h> 
-
-static int
-not_here(char *s)
-{
-    croak("%s not implemented on this architecture", s);
-    return -1;
-}
-
-double
-constant(char *name, int arg)
-{
-    errno = 0;
-    switch (*name) {
-    case 'A':
-       break;
-    case 'B':
-       break;
-    case 'C':
-       break;
-    case 'D':
-       break;
-    case 'E':
-       break;
-    case 'F':
-       break;
-    case 'G':
-       break;
-    case 'H':
-       break;
-    case 'I':
-       break;
-    case 'J':
-       break;
-    case 'K':
-       break;
-    case 'L':
-       break;
-    case 'M':
-       break;
-    case 'N':
-       break;
-    case 'O':
-       break;
-    case 'P':
-       break;
-    case 'Q':
-       if (strEQ(name, "QUERY_FOR_CONFIG"))
-#ifdef QUERY_FOR_CONFIG
-           return QUERY_FOR_CONFIG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "QUERY_FOR_DOCS"))
-#ifdef QUERY_FOR_DOCS
-           return QUERY_FOR_DOCS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "QUERY_FOR_DUMPFILES"))
-#ifdef QUERY_FOR_DUMPFILES
-           return QUERY_FOR_DUMPFILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "QUERY_FOR_LIST"))
-#ifdef QUERY_FOR_LIST
-           return QUERY_FOR_LIST;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "QUERY_FOR_STATE"))
-#ifdef QUERY_FOR_STATE
-           return QUERY_FOR_STATE;
-#else
-           goto not_there;
-#endif
-       break;
-    case 'R':
-       if (strEQ(name, "RPMERR_BADARG"))
-#ifdef RPMERR_BADARG
-           return RPMERR_BADARG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADDEV"))
-#ifdef RPMERR_BADDEV
-           return RPMERR_BADDEV;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADFILENAME"))
-#ifdef RPMERR_BADFILENAME
-           return RPMERR_BADFILENAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADMAGIC"))
-#ifdef RPMERR_BADMAGIC
-           return RPMERR_BADMAGIC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADRELOCATE"))
-#ifdef RPMERR_BADRELOCATE
-           return RPMERR_BADRELOCATE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADSIGTYPE"))
-#ifdef RPMERR_BADSIGTYPE
-           return RPMERR_BADSIGTYPE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_BADSPEC"))
-#ifdef RPMERR_BADSPEC
-           return RPMERR_BADSPEC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_CHOWN"))
-#ifdef RPMERR_CHOWN
-           return RPMERR_CHOWN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_CPIO"))
-#ifdef RPMERR_CPIO
-           return RPMERR_CPIO;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_CREATE"))
-#ifdef RPMERR_CREATE
-           return RPMERR_CREATE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_DBCORRUPT"))
-#ifdef RPMERR_DBCORRUPT
-           return RPMERR_DBCORRUPT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_DBGETINDEX"))
-#ifdef RPMERR_DBGETINDEX
-           return RPMERR_DBGETINDEX;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_DBOPEN"))
-#ifdef RPMERR_DBOPEN
-           return RPMERR_DBOPEN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_DBPUTINDEX"))
-#ifdef RPMERR_DBPUTINDEX
-           return RPMERR_DBPUTINDEX;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_EXEC"))
-#ifdef RPMERR_EXEC
-           return RPMERR_EXEC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_FILECONFLICT"))
-#ifdef RPMERR_FILECONFLICT
-           return RPMERR_FILECONFLICT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_FLOCK"))
-#ifdef RPMERR_FLOCK
-           return RPMERR_FLOCK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_FORK"))
-#ifdef RPMERR_FORK
-           return RPMERR_FORK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_GDBMOPEN"))
-#ifdef RPMERR_GDBMOPEN
-           return RPMERR_GDBMOPEN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_GDBMREAD"))
-#ifdef RPMERR_GDBMREAD
-           return RPMERR_GDBMREAD;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_GDBMWRITE"))
-#ifdef RPMERR_GDBMWRITE
-           return RPMERR_GDBMWRITE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_GZIP"))
-#ifdef RPMERR_GZIP
-           return RPMERR_GZIP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_INTERNAL"))
-#ifdef RPMERR_INTERNAL
-           return RPMERR_INTERNAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_LDD"))
-#ifdef RPMERR_LDD
-           return RPMERR_LDD;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_MKDIR"))
-#ifdef RPMERR_MKDIR
-           return RPMERR_MKDIR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_MTAB"))
-#ifdef RPMERR_MTAB
-           return RPMERR_MTAB;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NEWPACKAGE"))
-#ifdef RPMERR_NEWPACKAGE
-           return RPMERR_NEWPACKAGE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOCREATEDB"))
-#ifdef RPMERR_NOCREATEDB
-           return RPMERR_NOCREATEDB;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOGROUP"))
-#ifdef RPMERR_NOGROUP
-           return RPMERR_NOGROUP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NORELOCATE"))
-#ifdef RPMERR_NORELOCATE
-           return RPMERR_NORELOCATE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOSPACE"))
-#ifdef RPMERR_NOSPACE
-           return RPMERR_NOSPACE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOSPEC"))
-#ifdef RPMERR_NOSPEC
-           return RPMERR_NOSPEC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOTSRPM"))
-#ifdef RPMERR_NOTSRPM
-           return RPMERR_NOTSRPM;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_NOUSER"))
-#ifdef RPMERR_NOUSER
-           return RPMERR_NOUSER;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_OLDDB"))
-#ifdef RPMERR_OLDDB
-           return RPMERR_OLDDB;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_OLDDBCORRUPT"))
-#ifdef RPMERR_OLDDBCORRUPT
-           return RPMERR_OLDDBCORRUPT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_OLDDBMISSING"))
-#ifdef RPMERR_OLDDBMISSING
-           return RPMERR_OLDDBMISSING;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_OLDPACKAGE"))
-#ifdef RPMERR_OLDPACKAGE
-           return RPMERR_OLDPACKAGE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_PKGINSTALLED"))
-#ifdef RPMERR_PKGINSTALLED
-           return RPMERR_PKGINSTALLED;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_READERROR"))
-#ifdef RPMERR_READERROR
-           return RPMERR_READERROR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_RENAME"))
-#ifdef RPMERR_RENAME
-           return RPMERR_RENAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_RMDIR"))
-#ifdef RPMERR_RMDIR
-           return RPMERR_RMDIR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_RPMRC"))
-#ifdef RPMERR_RPMRC
-           return RPMERR_RPMRC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_SCRIPT"))
-#ifdef RPMERR_SCRIPT
-           return RPMERR_SCRIPT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_SIGGEN"))
-#ifdef RPMERR_SIGGEN
-           return RPMERR_SIGGEN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_STAT"))
-#ifdef RPMERR_STAT
-           return RPMERR_STAT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_UNKNOWNARCH"))
-#ifdef RPMERR_UNKNOWNARCH
-           return RPMERR_UNKNOWNARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_UNKNOWNOS"))
-#ifdef RPMERR_UNKNOWNOS
-           return RPMERR_UNKNOWNOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_UNLINK"))
-#ifdef RPMERR_UNLINK
-           return RPMERR_UNLINK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMERR_UNMATCHEDIF"))
-#ifdef RPMERR_UNMATCHEDIF
-           return RPMERR_UNMATCHEDIF;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_CONFIG"))
-#ifdef RPMFILE_CONFIG
-           return RPMFILE_CONFIG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_DOC"))
-#ifdef RPMFILE_DOC
-           return RPMFILE_DOC;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_DONOTUSE"))
-#ifdef RPMFILE_DONOTUSE
-           return RPMFILE_DONOTUSE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_GHOST"))
-#ifdef RPMFILE_GHOST
-           return RPMFILE_GHOST;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_LICENSE"))
-#ifdef RPMFILE_LICENSE
-           return RPMFILE_LICENSE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_MISSINGOK"))
-#ifdef RPMFILE_MISSINGOK
-           return RPMFILE_MISSINGOK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_NOREPLACE"))
-#ifdef RPMFILE_NOREPLACE
-           return RPMFILE_NOREPLACE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_README"))
-#ifdef RPMFILE_README
-           return RPMFILE_README;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_SPECFILE"))
-#ifdef RPMFILE_SPECFILE
-           return RPMFILE_SPECFILE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_STATE_NETSHARED"))
-#ifdef RPMFILE_STATE_NETSHARED
-           return RPMFILE_STATE_NETSHARED;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_STATE_NORMAL"))
-#ifdef RPMFILE_STATE_NORMAL
-           return RPMFILE_STATE_NORMAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_STATE_NOTINSTALLED"))
-#ifdef RPMFILE_STATE_NOTINSTALLED
-           return RPMFILE_STATE_NOTINSTALLED;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMFILE_STATE_REPLACED"))
-#ifdef RPMFILE_STATE_REPLACED
-           return RPMFILE_STATE_REPLACED;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_BINARY"))
-#ifdef RPMLEAD_BINARY
-           return RPMLEAD_BINARY;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_MAGIC0"))
-#ifdef RPMLEAD_MAGIC0
-           return RPMLEAD_MAGIC0;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_MAGIC1"))
-#ifdef RPMLEAD_MAGIC1
-           return RPMLEAD_MAGIC1;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_MAGIC2"))
-#ifdef RPMLEAD_MAGIC2
-           return RPMLEAD_MAGIC2;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_MAGIC3"))
-#ifdef RPMLEAD_MAGIC3
-           return RPMLEAD_MAGIC3;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_SIZE"))
-#ifdef RPMLEAD_SIZE
-           return RPMLEAD_SIZE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMLEAD_SOURCE"))
-#ifdef RPMLEAD_SOURCE
-           return RPMLEAD_SOURCE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_ALTNAME"))
-#ifdef RPMMESS_ALTNAME
-           return RPMMESS_ALTNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_BACKUP"))
-#ifdef RPMMESS_BACKUP
-           return RPMMESS_BACKUP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_DEBUG"))
-#ifdef RPMMESS_DEBUG
-           return RPMMESS_DEBUG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_ERROR"))
-#ifdef RPMMESS_ERROR
-           return RPMMESS_ERROR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_FATALERROR"))
-#ifdef RPMMESS_FATALERROR
-           return RPMMESS_FATALERROR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_NORMAL"))
-#ifdef RPMMESS_NORMAL
-           return RPMMESS_NORMAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_PREREQLOOP"))
-#ifdef RPMMESS_PREREQLOOP
-           return RPMMESS_PREREQLOOP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_QUIET"))
-#ifdef RPMMESS_QUIET
-           return RPMMESS_QUIET;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_VERBOSE"))
-#ifdef RPMMESS_VERBOSE
-           return RPMMESS_VERBOSE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMMESS_WARNING"))
-#ifdef RPMMESS_WARNING
-           return RPMMESS_WARNING;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_DISKSPACE"))
-#ifdef RPMPROB_FILTER_DISKSPACE
-           return RPMPROB_FILTER_DISKSPACE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_FORCERELOCATE"))
-#ifdef RPMPROB_FILTER_FORCERELOCATE
-           return RPMPROB_FILTER_FORCERELOCATE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_IGNOREARCH"))
-#ifdef RPMPROB_FILTER_IGNOREARCH
-           return RPMPROB_FILTER_IGNOREARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_IGNOREOS"))
-#ifdef RPMPROB_FILTER_IGNOREOS
-           return RPMPROB_FILTER_IGNOREOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_OLDPACKAGE"))
-#ifdef RPMPROB_FILTER_OLDPACKAGE
-           return RPMPROB_FILTER_OLDPACKAGE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_REPLACENEWFILES"))
-#ifdef RPMPROB_FILTER_REPLACENEWFILES
-           return RPMPROB_FILTER_REPLACENEWFILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_REPLACEOLDFILES"))
-#ifdef RPMPROB_FILTER_REPLACEOLDFILES
-           return RPMPROB_FILTER_REPLACEOLDFILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMPROB_FILTER_REPLACEPKG"))
-#ifdef RPMPROB_FILTER_REPLACEPKG
-           return RPMPROB_FILTER_REPLACEPKG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_ANY"))
-#ifdef RPMSENSE_ANY
-           return RPMSENSE_ANY;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_CONFLICTS"))
-#ifdef RPMSENSE_CONFLICTS
-           return RPMSENSE_CONFLICTS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_EQUAL"))
-#ifdef RPMSENSE_EQUAL
-           return RPMSENSE_EQUAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_GREATER"))
-#ifdef RPMSENSE_GREATER
-           return RPMSENSE_GREATER;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_LESS"))
-#ifdef RPMSENSE_LESS
-           return RPMSENSE_LESS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_OBSOLETES"))
-#ifdef RPMSENSE_OBSOLETES
-           return RPMSENSE_OBSOLETES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_PREREQ"))
-#ifdef RPMSENSE_PREREQ
-           return RPMSENSE_PREREQ;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_PROVIDES"))
-#ifdef RPMSENSE_PROVIDES
-           return RPMSENSE_PROVIDES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_SENSEMASK"))
-#ifdef RPMSENSE_SENSEMASK
-           return RPMSENSE_SENSEMASK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_SERIAL"))
-#ifdef RPMSENSE_SERIAL
-           return RPMSENSE_SERIAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_TRIGGER"))
-#ifdef RPMSENSE_TRIGGER
-           return RPMSENSE_TRIGGER;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_TRIGGERIN"))
-#ifdef RPMSENSE_TRIGGERIN
-           return RPMSENSE_TRIGGERIN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_TRIGGERPOSTUN"))
-#ifdef RPMSENSE_TRIGGERPOSTUN
-           return RPMSENSE_TRIGGERPOSTUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSENSE_TRIGGERUN"))
-#ifdef RPMSENSE_TRIGGERUN
-           return RPMSENSE_TRIGGERUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_GPG"))
-#ifdef RPMSIGTAG_GPG
-           return RPMSIGTAG_GPG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_LEMD5_1"))
-#ifdef RPMSIGTAG_LEMD5_1
-           return RPMSIGTAG_LEMD5_1;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_LEMD5_2"))
-#ifdef RPMSIGTAG_LEMD5_2
-           return RPMSIGTAG_LEMD5_2;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_MD5"))
-#ifdef RPMSIGTAG_MD5
-           return RPMSIGTAG_MD5;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_PGP"))
-#ifdef RPMSIGTAG_PGP
-           return RPMSIGTAG_PGP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_PGP5"))
-#ifdef RPMSIGTAG_PGP5
-           return RPMSIGTAG_PGP5;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIGTAG_SIZE"))
-#ifdef RPMSIGTAG_SIZE
-           return RPMSIGTAG_SIZE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIG_BAD"))
-#ifdef RPMSIG_BAD
-           return RPMSIG_BAD;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIG_NOKEY"))
-#ifdef RPMSIG_NOKEY
-           return RPMSIG_NOKEY;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIG_NOTTRUSTED"))
-#ifdef RPMSIG_NOTTRUSTED
-           return RPMSIG_NOTTRUSTED;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIG_OK"))
-#ifdef RPMSIG_OK
-           return RPMSIG_OK;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMSIG_UNKNOWN"))
-#ifdef RPMSIG_UNKNOWN
-           return RPMSIG_UNKNOWN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_ARCH"))
-#ifdef RPMTAG_ARCH
-           return RPMTAG_ARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_ARCHIVESIZE"))
-#ifdef RPMTAG_ARCHIVESIZE
-           return RPMTAG_ARCHIVESIZE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_AUTOPROV"))
-#ifdef RPMTAG_AUTOPROV
-           return RPMTAG_AUTOPROV;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_AUTOREQ"))
-#ifdef RPMTAG_AUTOREQ
-           return RPMTAG_AUTOREQ;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_AUTOREQPROV"))
-#ifdef RPMTAG_AUTOREQPROV
-           return RPMTAG_AUTOREQPROV;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BROKENMD5"))
-#ifdef RPMTAG_BROKENMD5
-           return RPMTAG_BROKENMD5;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDARCHS"))
-#ifdef RPMTAG_BUILDARCHS
-           return RPMTAG_BUILDARCHS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDCONFLICTS"))
-#ifdef RPMTAG_BUILDCONFLICTS
-           return RPMTAG_BUILDCONFLICTS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDHOST"))
-#ifdef RPMTAG_BUILDHOST
-           return RPMTAG_BUILDHOST;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDMACROS"))
-#ifdef RPMTAG_BUILDMACROS
-           return RPMTAG_BUILDMACROS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDPREREQ"))
-#ifdef RPMTAG_BUILDPREREQ
-           return RPMTAG_BUILDPREREQ;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDREQUIRES"))
-#ifdef RPMTAG_BUILDREQUIRES
-           return RPMTAG_BUILDREQUIRES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDROOT"))
-#ifdef RPMTAG_BUILDROOT
-           return RPMTAG_BUILDROOT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_BUILDTIME"))
-#ifdef RPMTAG_BUILDTIME
-           return RPMTAG_BUILDTIME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CAPABILITY"))
-#ifdef RPMTAG_CAPABILITY
-           return RPMTAG_CAPABILITY;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CHANGELOG"))
-#ifdef RPMTAG_CHANGELOG
-           return RPMTAG_CHANGELOG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CHANGELOGNAME"))
-#ifdef RPMTAG_CHANGELOGNAME
-           return RPMTAG_CHANGELOGNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CHANGELOGTEXT"))
-#ifdef RPMTAG_CHANGELOGTEXT
-           return RPMTAG_CHANGELOGTEXT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CHANGELOGTIME"))
-#ifdef RPMTAG_CHANGELOGTIME
-           return RPMTAG_CHANGELOGTIME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CONFLICTFLAGS"))
-#ifdef RPMTAG_CONFLICTFLAGS
-           return RPMTAG_CONFLICTFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CONFLICTNAME"))
-#ifdef RPMTAG_CONFLICTNAME
-           return RPMTAG_CONFLICTNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_CONFLICTVERSION"))
-#ifdef RPMTAG_CONFLICTVERSION
-           return RPMTAG_CONFLICTVERSION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_COOKIE"))
-#ifdef RPMTAG_COOKIE
-           return RPMTAG_COOKIE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_COPYRIGHT"))
-#ifdef RPMTAG_COPYRIGHT
-           return RPMTAG_COPYRIGHT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_DEFAULTPREFIX"))
-#ifdef RPMTAG_DEFAULTPREFIX
-           return RPMTAG_DEFAULTPREFIX;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_DESCRIPTION"))
-#ifdef RPMTAG_DESCRIPTION
-           return RPMTAG_DESCRIPTION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_DISTRIBUTION"))
-#ifdef RPMTAG_DISTRIBUTION
-           return RPMTAG_DISTRIBUTION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_DOCDIR"))
-#ifdef RPMTAG_DOCDIR
-           return RPMTAG_DOCDIR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EPOCH"))
-#ifdef RPMTAG_EPOCH
-           return RPMTAG_EPOCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUDE"))
-#ifdef RPMTAG_EXCLUDE
-           return RPMTAG_EXCLUDE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUDEARCH"))
-#ifdef RPMTAG_EXCLUDEARCH
-           return RPMTAG_EXCLUDEARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUDEOS"))
-#ifdef RPMTAG_EXCLUDEOS
-           return RPMTAG_EXCLUDEOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUSIVE"))
-#ifdef RPMTAG_EXCLUSIVE
-           return RPMTAG_EXCLUSIVE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUSIVEARCH"))
-#ifdef RPMTAG_EXCLUSIVEARCH
-           return RPMTAG_EXCLUSIVEARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXCLUSIVEOS"))
-#ifdef RPMTAG_EXCLUSIVEOS
-           return RPMTAG_EXCLUSIVEOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_EXTERNAL_TAG"))
-#ifdef RPMTAG_EXTERNAL_TAG
-           return RPMTAG_EXTERNAL_TAG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEDEVICES"))
-#ifdef RPMTAG_FILEDEVICES
-           return RPMTAG_FILEDEVICES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEFLAGS"))
-#ifdef RPMTAG_FILEFLAGS
-           return RPMTAG_FILEFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEGIDS"))
-#ifdef RPMTAG_FILEGIDS
-           return RPMTAG_FILEGIDS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEGROUPNAME"))
-#ifdef RPMTAG_FILEGROUPNAME
-           return RPMTAG_FILEGROUPNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEINODES"))
-#ifdef RPMTAG_FILEINODES
-           return RPMTAG_FILEINODES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILELANGS"))
-#ifdef RPMTAG_FILELANGS
-           return RPMTAG_FILELANGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILELINKTOS"))
-#ifdef RPMTAG_FILELINKTOS
-           return RPMTAG_FILELINKTOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEMD5S"))
-#ifdef RPMTAG_FILEMD5S
-           return RPMTAG_FILEMD5S;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEMODES"))
-#ifdef RPMTAG_FILEMODES
-           return RPMTAG_FILEMODES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEMTIMES"))
-#ifdef RPMTAG_FILEMTIMES
-           return RPMTAG_FILEMTIMES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILENAMES"))
-#ifdef RPMTAG_FILENAMES
-           return RPMTAG_FILENAMES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILERDEVS"))
-#ifdef RPMTAG_FILERDEVS
-           return RPMTAG_FILERDEVS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILESIZES"))
-#ifdef RPMTAG_FILESIZES
-           return RPMTAG_FILESIZES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILESTATES"))
-#ifdef RPMTAG_FILESTATES
-           return RPMTAG_FILESTATES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEUIDS"))
-#ifdef RPMTAG_FILEUIDS
-           return RPMTAG_FILEUIDS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEUSERNAME"))
-#ifdef RPMTAG_FILEUSERNAME
-           return RPMTAG_FILEUSERNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_FILEVERIFYFLAGS"))
-#ifdef RPMTAG_FILEVERIFYFLAGS
-           return RPMTAG_FILEVERIFYFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_GIF"))
-#ifdef RPMTAG_GIF
-           return RPMTAG_GIF;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_GROUP"))
-#ifdef RPMTAG_GROUP
-           return RPMTAG_GROUP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_ICON"))
-#ifdef RPMTAG_ICON
-           return RPMTAG_ICON;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_INSTALLPREFIX"))
-#ifdef RPMTAG_INSTALLPREFIX
-           return RPMTAG_INSTALLPREFIX;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_INSTALLTIME"))
-#ifdef RPMTAG_INSTALLTIME
-           return RPMTAG_INSTALLTIME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_INSTPREFIXES"))
-#ifdef RPMTAG_INSTPREFIXES
-           return RPMTAG_INSTPREFIXES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_LICENSE"))
-#ifdef RPMTAG_LICENSE
-           return RPMTAG_LICENSE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_NAME"))
-#ifdef RPMTAG_NAME
-           return RPMTAG_NAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_NOPATCH"))
-#ifdef RPMTAG_NOPATCH
-           return RPMTAG_NOPATCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_NOSOURCE"))
-#ifdef RPMTAG_NOSOURCE
-           return RPMTAG_NOSOURCE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_OBSOLETES"))
-#ifdef RPMTAG_OBSOLETES
-           return RPMTAG_OBSOLETES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_ORIGFILENAMES"))
-#ifdef RPMTAG_ORIGFILENAMES
-           return RPMTAG_ORIGFILENAMES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_OS"))
-#ifdef RPMTAG_OS
-           return RPMTAG_OS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PACKAGER"))
-#ifdef RPMTAG_PACKAGER
-           return RPMTAG_PACKAGER;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PATCH"))
-#ifdef RPMTAG_PATCH
-           return RPMTAG_PATCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_POSTIN"))
-#ifdef RPMTAG_POSTIN
-           return RPMTAG_POSTIN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_POSTINPROG"))
-#ifdef RPMTAG_POSTINPROG
-           return RPMTAG_POSTINPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_POSTUN"))
-#ifdef RPMTAG_POSTUN
-           return RPMTAG_POSTUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_POSTUNPROG"))
-#ifdef RPMTAG_POSTUNPROG
-           return RPMTAG_POSTUNPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREFIXES"))
-#ifdef RPMTAG_PREFIXES
-           return RPMTAG_PREFIXES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREIN"))
-#ifdef RPMTAG_PREIN
-           return RPMTAG_PREIN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREINPROG"))
-#ifdef RPMTAG_PREINPROG
-           return RPMTAG_PREINPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREREQ"))
-#ifdef RPMTAG_PREREQ
-           return RPMTAG_PREREQ;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREUN"))
-#ifdef RPMTAG_PREUN
-           return RPMTAG_PREUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PREUNPROG"))
-#ifdef RPMTAG_PREUNPROG
-           return RPMTAG_PREUNPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_PROVIDES"))
-#ifdef RPMTAG_PROVIDES
-           return RPMTAG_PROVIDES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_RELEASE"))
-#ifdef RPMTAG_RELEASE
-           return RPMTAG_RELEASE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_REQUIREFLAGS"))
-#ifdef RPMTAG_REQUIREFLAGS
-           return RPMTAG_REQUIREFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_REQUIRENAME"))
-#ifdef RPMTAG_REQUIRENAME
-           return RPMTAG_REQUIRENAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_REQUIREVERSION"))
-#ifdef RPMTAG_REQUIREVERSION
-           return RPMTAG_REQUIREVERSION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_ROOT"))
-#ifdef RPMTAG_ROOT
-           return RPMTAG_ROOT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_RPMVERSION"))
-#ifdef RPMTAG_RPMVERSION
-           return RPMTAG_RPMVERSION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SERIAL"))
-#ifdef RPMTAG_SERIAL
-           return RPMTAG_SERIAL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SIZE"))
-#ifdef RPMTAG_SIZE
-           return RPMTAG_SIZE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SOURCE"))
-#ifdef RPMTAG_SOURCE
-           return RPMTAG_SOURCE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SOURCEPACKAGE"))
-#ifdef RPMTAG_SOURCEPACKAGE
-           return RPMTAG_SOURCEPACKAGE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SOURCERPM"))
-#ifdef RPMTAG_SOURCERPM
-           return RPMTAG_SOURCERPM;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_SUMMARY"))
-#ifdef RPMTAG_SUMMARY
-           return RPMTAG_SUMMARY;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERFLAGS"))
-#ifdef RPMTAG_TRIGGERFLAGS
-           return RPMTAG_TRIGGERFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERIN"))
-#ifdef RPMTAG_TRIGGERIN
-           return RPMTAG_TRIGGERIN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERINDEX"))
-#ifdef RPMTAG_TRIGGERINDEX
-           return RPMTAG_TRIGGERINDEX;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERNAME"))
-#ifdef RPMTAG_TRIGGERNAME
-           return RPMTAG_TRIGGERNAME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERPOSTUN"))
-#ifdef RPMTAG_TRIGGERPOSTUN
-           return RPMTAG_TRIGGERPOSTUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERSCRIPTPROG"))
-#ifdef RPMTAG_TRIGGERSCRIPTPROG
-           return RPMTAG_TRIGGERSCRIPTPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERSCRIPTS"))
-#ifdef RPMTAG_TRIGGERSCRIPTS
-           return RPMTAG_TRIGGERSCRIPTS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERUN"))
-#ifdef RPMTAG_TRIGGERUN
-           return RPMTAG_TRIGGERUN;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_TRIGGERVERSION"))
-#ifdef RPMTAG_TRIGGERVERSION
-           return RPMTAG_TRIGGERVERSION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_URL"))
-#ifdef RPMTAG_URL
-           return RPMTAG_URL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_VENDOR"))
-#ifdef RPMTAG_VENDOR
-           return RPMTAG_VENDOR;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_VERIFYSCRIPT"))
-#ifdef RPMTAG_VERIFYSCRIPT
-           return RPMTAG_VERIFYSCRIPT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_VERIFYSCRIPTPROG"))
-#ifdef RPMTAG_VERIFYSCRIPTPROG
-           return RPMTAG_VERIFYSCRIPTPROG;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_VERSION"))
-#ifdef RPMTAG_VERSION
-           return RPMTAG_VERSION;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTAG_XPM"))
-#ifdef RPMTAG_XPM
-           return RPMTAG_XPM;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_ALLFILES"))
-#ifdef RPMTRANS_FLAG_ALLFILES
-           return RPMTRANS_FLAG_ALLFILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_BUILD_PROBS"))
-#ifdef RPMTRANS_FLAG_BUILD_PROBS
-           return RPMTRANS_FLAG_BUILD_PROBS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_JUSTDB"))
-#ifdef RPMTRANS_FLAG_JUSTDB
-           return RPMTRANS_FLAG_JUSTDB;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_KEEPOBSOLETE"))
-#ifdef RPMTRANS_FLAG_KEEPOBSOLETE
-           return RPMTRANS_FLAG_KEEPOBSOLETE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_NODOCS"))
-#ifdef RPMTRANS_FLAG_NODOCS
-           return RPMTRANS_FLAG_NODOCS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_NOSCRIPTS"))
-#ifdef RPMTRANS_FLAG_NOSCRIPTS
-           return RPMTRANS_FLAG_NOSCRIPTS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_NOTRIGGERS"))
-#ifdef RPMTRANS_FLAG_NOTRIGGERS
-           return RPMTRANS_FLAG_NOTRIGGERS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMTRANS_FLAG_TEST"))
-#ifdef RPMTRANS_FLAG_TEST
-           return RPMTRANS_FLAG_TEST;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVAR_INCLUDE"))
-#ifdef RPMVAR_INCLUDE
-           return RPMVAR_INCLUDE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVAR_MACROFILES"))
-#ifdef RPMVAR_MACROFILES
-           return RPMVAR_MACROFILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVAR_NUM"))
-#ifdef RPMVAR_NUM
-           return RPMVAR_NUM;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVAR_OPTFLAGS"))
-#ifdef RPMVAR_OPTFLAGS
-           return RPMVAR_OPTFLAGS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVAR_PROVIDES"))
-#ifdef RPMVAR_PROVIDES
-           return RPMVAR_PROVIDES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_ALL"))
-#ifdef RPMVERIFY_ALL
-           return RPMVERIFY_ALL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_FILESIZE"))
-#ifdef RPMVERIFY_FILESIZE
-           return RPMVERIFY_FILESIZE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_GROUP"))
-#ifdef RPMVERIFY_GROUP
-           return RPMVERIFY_GROUP;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_LINKTO"))
-#ifdef RPMVERIFY_LINKTO
-           return RPMVERIFY_LINKTO;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_LSTATFAIL"))
-#ifdef RPMVERIFY_LSTATFAIL
-           return RPMVERIFY_LSTATFAIL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_MD5"))
-#ifdef RPMVERIFY_MD5
-           return RPMVERIFY_MD5;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_MODE"))
-#ifdef RPMVERIFY_MODE
-           return RPMVERIFY_MODE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_MTIME"))
-#ifdef RPMVERIFY_MTIME
-           return RPMVERIFY_MTIME;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_NONE"))
-#ifdef RPMVERIFY_NONE
-           return RPMVERIFY_NONE;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_RDEV"))
-#ifdef RPMVERIFY_RDEV
-           return RPMVERIFY_RDEV;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_READFAIL"))
-#ifdef RPMVERIFY_READFAIL
-           return RPMVERIFY_READFAIL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_READLINKFAIL"))
-#ifdef RPMVERIFY_READLINKFAIL
-           return RPMVERIFY_READLINKFAIL;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPMVERIFY_USER"))
-#ifdef RPMVERIFY_USER
-           return RPMVERIFY_USER;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPM_MACHTABLE_BUILDARCH"))
-#ifdef RPM_MACHTABLE_BUILDARCH
-           return RPM_MACHTABLE_BUILDARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPM_MACHTABLE_BUILDOS"))
-#ifdef RPM_MACHTABLE_BUILDOS
-           return RPM_MACHTABLE_BUILDOS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPM_MACHTABLE_COUNT"))
-#ifdef RPM_MACHTABLE_COUNT
-           return RPM_MACHTABLE_COUNT;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPM_MACHTABLE_INSTARCH"))
-#ifdef RPM_MACHTABLE_INSTARCH
-           return RPM_MACHTABLE_INSTARCH;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "RPM_MACHTABLE_INSTOS"))
-#ifdef RPM_MACHTABLE_INSTOS
-           return RPM_MACHTABLE_INSTOS;
-#else
-           goto not_there;
-#endif
-       break;
-    case 'S':
-       break;
-    case 'T':
-       break;
-    case 'U':
-       break;
-    case 'V':
-       if (strEQ(name, "VERIFY_DEPS"))
-#ifdef VERIFY_DEPS
-           return VERIFY_DEPS;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "VERIFY_FILES"))
-#ifdef VERIFY_FILES
-           return VERIFY_FILES;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "VERIFY_MD5"))
-#ifdef VERIFY_MD5
-           return VERIFY_MD5;
-#else
-           goto not_there;
-#endif
-       if (strEQ(name, "VERIFY_SCRIPT"))
-#ifdef VERIFY_SCRIPT
-           return VERIFY_SCRIPT;
-#else
-           goto not_there;
-#endif
-       break;
-    case 'W':
-       break;
-    case 'X':
-       break;
-    case 'Y':
-       break;
-    case 'Z':
-       break;
-    }
-    errno = EINVAL;
-    return 0;
-
-not_there:
-    errno = ENOENT;
-    return 0;
-}
-
diff --git a/perl/db.xs b/perl/db.xs
deleted file mode 100644 (file)
index 0789272..0000000
+++ /dev/null
@@ -1,33 +0,0 @@
-
-MODULE = rpm           PACKAGE = rpmdb         PREFIX = rpmdb
-
-void
-rpmdbClose(db)
-  rpmdb db
-
-unsigned int
-rpmdbFirst(db)
-  rpmdb db
-  CODE:
-       RETVAL = rpmdbFirstRecNum(db);
-  OUTPUT:
-       RETVAL
-
-unsigned int
-rpmdbNext(db, last_rec)
-  rpmdb db
-  unsigned int last_rec
-  CODE:
-       RETVAL = rpmdbNextRecNum(db, last_rec);
-  OUTPUT:
-       RETVAL
-
-Header
-rpmdbRecord(db, rec)
-  rpmdb db
-  unsigned int rec
-  CODE:
-       RETVAL = rpmdbGetRecord(db, rec);
-  OUTPUT:
-       RETVAL
-
diff --git a/perl/foo.i386.rpm b/perl/foo.i386.rpm
deleted file mode 100644 (file)
index 9a575f5..0000000
Binary files a/perl/foo.i386.rpm and /dev/null differ
diff --git a/perl/header.xs b/perl/header.xs
deleted file mode 100644 (file)
index d132a78..0000000
+++ /dev/null
@@ -1,211 +0,0 @@
-
-MODULE = rpm           PACKAGE = Header                PREFIX = Header
-
-AV *
-HeaderItemByValRef(header, item)
-  Header       header
-  int          item
-  PREINIT:
-       int_32 count, type;
-       int rc;
-       void * value;
-       char ** src;
-       AV * array;
-  CODE:
-       rc = headerGetEntry(header, item, &type, &value, &count);
-       array = newAV();
-       if (rc != 0) {
-         switch(type) {
-           case RPM_CHAR_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((char) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT8_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_8) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT16_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_16) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT32_TYPE:
-               while (count-- > 0) {               
-                   av_push(array, newSViv((int_32)value));
-                   value++;
-               }
-               break;
-           case RPM_STRING_TYPE:
-               av_push(array, newSVpv((char *)value, 0));
-               break;
-           case RPM_BIN_TYPE:
-               /* XXX: this looks mostly unused - how do we deal with it? */
-               break;
-           case RPM_STRING_ARRAY_TYPE:
-           case RPM_I18NSTRING_TYPE:
-               src = (char **) value;
-               while (count--) {
-                 av_push(array, newSVpv(*src++, 0));
-               }
-               free(value);
-               break;
-         }
-       }
-       RETVAL = array;
-  OUTPUT:
-       RETVAL
-
-AV *
-HeaderItemByNameRef(header, tag)
-  Header       header
-  const char * tag
-  PREINIT:
-       int_32 count, type, item = -1;
-       int rc, i;
-       void * value;
-       char ** src;
-       AV * array;
-  CODE:
-       /* walk first through the list of items and get the proper value */
-       for (i = 0; i < rpmTagTableSize; i++) {
-         if (rpmTagTable[i].name != NULL && strcasecmp(tag, rpmTagTable[i].name + 7) == 0) {
-           item = rpmTagTable[i].val;
-           break;
-         }
-       }
-       rc = headerGetEntry(header, item, &type, &value, &count);
-       array = newAV();
-       if (rc != 0) {
-         switch(type) {
-           case RPM_CHAR_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((char) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT8_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_8) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT16_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_16) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT32_TYPE:
-               while (count-- > 0) {               
-                   av_push(array, newSViv((int_32)value));
-                   value++;
-               }
-               break;
-           case RPM_STRING_TYPE:
-               av_push(array, newSVpv((char *)value, 0));
-               break;
-           case RPM_BIN_TYPE:
-               /* XXX: this looks mostly unused - how do we deal with it? */
-               break;
-           case RPM_STRING_ARRAY_TYPE:
-           case RPM_I18NSTRING_TYPE:
-               src = (char **) value;
-               while (count--) {
-                 av_push(array, newSVpv(*src++, 0));
-               }
-               free(value);
-               break;
-         }
-       }
-       RETVAL = array;
-  OUTPUT:
-       RETVAL
-
-
-HV *
-HeaderListRef(header)
-  Header       header
-  PREINIT:
-       HeaderIterator iterator;
-       int_32 tag, type, count;
-       void *value;
-  CODE:
-       RETVAL = newHV();
-       iterator = headerInitIterator(header);
-       while (headerNextIterator(iterator, &tag, &type, &value, &count)) {
-         SV  ** sv;
-         AV   * array;
-          char ** src;
-         char * tagStr = tagName(tag);
-         array = newAV();
-         switch(type) {
-           case RPM_CHAR_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((char) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT8_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_8) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT16_TYPE:
-               while (count-- > 0) {
-                   av_push(array, newSViv((int_16) (int) value));
-                   value++;
-               }
-               break;
-           case RPM_INT32_TYPE:
-               while (count-- > 0) {               
-                   av_push(array, newSViv((int_32)value));
-                   value++;
-               }
-               break;
-           case RPM_STRING_TYPE:
-               av_push(array, newSVpv((char *)value, 0));
-               break;
-           case RPM_BIN_TYPE:
-               /* XXX: this looks mostly unused - how do we deal with it? */
-               break;
-           case RPM_STRING_ARRAY_TYPE:
-           case RPM_I18NSTRING_TYPE:
-               /* we have to build an array first */
-               src = (char **) value;
-               while (count--) {
-                 av_push(array, newSVpv(*src++, 0));
-               }
-               free(value);
-               break;
-         }
-         sv = hv_store(RETVAL, tagStr, strlen(tagStr), newRV_inc((SV*)array), 0);
-       }
-       headerFreeIterator(iterator);
-  OUTPUT:
-       RETVAL
-
-AV * 
-HeaderTagsRef(header) 
-  Header      header 
-  PREINIT: 
-        HeaderIterator iterator; 
-        int_32 tag, type;
-        void *value; 
-  CODE: 
-        RETVAL = newAV(); 
-       iterator = headerInitIterator(header); 
-       while (headerNextIterator(iterator, &tag, &type, &value, NULL)) { 
-         av_push(RETVAL, newSVpv(tagName(tag), 0));
-         if (type == RPM_STRING_ARRAY_TYPE || type == RPM_I18NSTRING_TYPE)
-           free(value);
-       }
-       headerFreeIterator(iterator);      
-  OUTPUT:
-       RETVAL
-
diff --git a/perl/junk.xs b/perl/junk.xs
deleted file mode 100644 (file)
index a3f0237..0000000
+++ /dev/null
@@ -1,55 +0,0 @@
-/*
- * This file includes misc functions that were once implemented and retired
- * later in the process
- *
- * $Id: junk.xs,v 1.2 1999/07/14 17:23:30 gafton Exp $
- */
-
-SV *
-HeaderRawItem(header, item)
-  Header *     header
-  int          item
-  PREINIT:
-       int_32 count, type;
-       int rc;
-       void * value;
-       AV * array;
-       char ** src;
-  CODE:
-       rc = headerGetEntry(*header, item, &type, &value, &count);
-       RETVAL = &PL_sv_undef;
-       if (rc != 0) {
-         switch(type) {
-           case RPM_CHAR_TYPE:
-               RETVAL = newSViv((char) (int)value);
-               break;
-           case RPM_INT8_TYPE:
-               RETVAL = newSViv((int_8) (int) value);
-               break;
-           case RPM_INT16_TYPE:
-               RETVAL = newSViv((int_16) (int) value);
-               break;
-           case RPM_INT32_TYPE:
-               RETVAL = newSViv((int_32)value);
-               break;
-           case RPM_STRING_TYPE:
-               RETVAL = newSVpv((char *)value, 0);
-               break;
-           case RPM_BIN_TYPE:
-               /* XXX: this looks mostly unused - how do we deal with it? */
-               break;
-           case RPM_STRING_ARRAY_TYPE:
-           case RPM_I18NSTRING_TYPE:
-               /* we have to build an array first */
-               array = newAV();
-               src = (char **) value;
-               while (count--) {
-                 av_push(array, newSVpv(*src++, 0));
-               }
-               RETVAL = newRV_inc((SV*)array);
-               free(value);
-               break;
-         }
-       }
-  OUTPUT:
-       RETVAL
diff --git a/perl/rpm.pm b/perl/rpm.pm
deleted file mode 100644 (file)
index b86f44f..0000000
+++ /dev/null
@@ -1,117 +0,0 @@
-package rpm;
-
-use strict;
-use Carp;
-use vars qw($VERSION @ISA @EXPORT @EXPORT_OK $AUTOLOAD);
-
-require Exporter;
-require DynaLoader;
-require AutoLoader;
-
-@ISA = qw(Exporter DynaLoader);
-# Items to export into callers namespace by default. Note: do not export
-# names by default without a very good reason. Use EXPORT_OK instead.
-# Do not simply export all your public functions/methods/constants.
-@EXPORT = qw(
-
-);
-$VERSION = '0.01';
-
-sub AUTOLOAD {
-    # This AUTOLOAD is used to 'autoload' constants from the constant()
-    # XS function.  If a constant is not found then control is passed
-    # to the AUTOLOAD in AutoLoader.
-
-    my $constname;
-    ($constname = $AUTOLOAD) =~ s/.*:://;
-    croak "& not defined" if $constname eq 'constant';
-    my $val = constant($constname, @_ ? $_[0] : 0);
-    if ($! != 0) {
-       if ($! =~ /Invalid/) {
-           $AutoLoader::AUTOLOAD = $AUTOLOAD;
-           goto &AutoLoader::AUTOLOAD;
-       }
-       else {
-               croak "Your vendor has not defined rpm macro $constname";
-       }
-    }
-    no strict 'refs';
-    *$AUTOLOAD = sub () { $val };
-    goto &$AUTOLOAD;
-}
-
-bootstrap rpm $VERSION;
-
-# Preloaded methods go here.
-
-sub Header::ItemByName {
-  my $header = shift;
-  my $item = shift;
-  my $item_index = shift;
-
-  if (defined $item_index) {
-    return @{$header->ItemByNameRef($item)}[$item_index];
-  } else {
-    return @{$header->ItemByNameRef($item)};
-  }
-}
-
-sub Header::ItemByVal {
-  my $header = shift;
-  my $item = shift;
-  my $item_index = shift;
-
-  if (defined $item_index) {
-    return @{$header->ItemByValRef($item)}[$item_index];
-  } else {
-    return @{$header->ItemByValRef($item)};
-  }
-}
-
-sub Header::List {
-  my $header = shift;
-
-  return %{$header->ListRef()};
-}
-
-sub Header::Tags {
-  my $header = shift;
-
-  return @{$header->TagsRef()};
-}
-
-# Autoload methods go after =cut, and are processed by the autosplit program.
-
-1;
-__END__
-# Below is the stub of documentation for your module. You better edit it!
-
-=head1 NAME
-
-rpm - Perl extension for blah blah blah
-
-=head1 SYNOPSIS
-
-  use rpm;
-  blah blah blah
-
-=head1 DESCRIPTION
-
-Stub documentation for rpm was created by h2xs. It looks like the
-author of the extension was negligent enough to leave the stub
-unedited.
-
-Blah blah blah.
-
-=head1 Exported constants
-
-
-=head1 AUTHOR
-
-Cristian Gafton, gafton@redhat.com
-
-=head1 SEE ALSO
-
-perl(1), rpm(8).
-
-=cut
diff --git a/perl/rpm.xs b/perl/rpm.xs
deleted file mode 100644 (file)
index 9b7fe2a..0000000
+++ /dev/null
@@ -1,149 +0,0 @@
-/*
- * Perl interface to rpmlib
- *
- * $Id: rpm.xs,v 1.5 2000/02/10 22:13:48 jbj Exp $
- */
-
-#include "EXTERN.h"
-#include "perl.h"
-#include "XSUB.h"
-
-#include <sys/types.h>
-#include <sys/stat.h>
-#include <fcntl.h>
-
-#include "rpmlib.h"
-#include "rpmio.h"
-#include "dbindex.h"
-#include "header.h"
-#include "popt.h"
-
-/*
- * External functions
- */
-extern double constant(char *name, int arg);
-
-
-MODULE = rpm           PACKAGE = rpm           
-
-PROTOTYPES: ENABLE
-
-BOOT:
-# The following message will be printed when the
-# bootstrap function executes.
-       if (rpmReadConfigFiles(NULL, NULL) != 0) {
-         XSRETURN_NO;
-       }
-
-double
-constant(name,arg)
-       char *          name
-       int             arg
-
-Header
-Header(package)
-  const char * package
-  PREINIT:
-       FD_t file_desc = NULL;
-       int rc;
-       int isSource;
-       int had_error = 0;
-  CODE:
-       /* New(1,RETVAL,1,Header); */
-       file_desc = fdOpen(package, O_RDONLY, 0);
-       if (file_desc != NULL && RETVAL != NULL) {
-         rc = rpmReadPackageHeader(file_desc, &RETVAL, &isSource, NULL, NULL);
-         if (rc != 0) {
-           had_error++;
-         }
-         if (file_desc != NULL) {
-           fdClose(file_desc);
-         }
-       } else {
-         had_error++;
-       }
-       ST(0) = sv_newmortal();
-       if (had_error) {
-         ST(0) = &PL_sv_undef;
-       } else {
-         sv_setref_pv(ST(0), "Header", (void*)RETVAL);
-       }
-
-rpmTransactionSet
-Transaction(header)
-  Header header
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-rpmdb
-dbOpen(root = "", forWrite = 0)
-  const char * root
-  int forWrite
-  PREINIT:
-       int retval;
-  CODE:
-       retval = rpmdbOpen(root, &RETVAL, forWrite ? O_RDWR | O_CREAT : O_RDONLY, 0644);
-       printf("\nretval is %d\n", retval);
-       ST(0) = sv_newmortal();
-       if (retval != 0) {
-         ST(0) = &PL_sv_undef;
-       } else {
-         sv_setref_pv(ST(0), "rpmdb", (void *)RETVAL);
-       }
-
-
-int
-dbInit(root = NULL)
-  char * root
-  CODE:
-       RETVAL = rpmdbInit(root, 0);
-  OUTPUT:
-       RETVAL
-
-int
-dbRebuild(root = NULL)
-  char * root
-  CODE:
-       RETVAL = rpmdbRebuild(root);
-  OUTPUT:
-       RETVAL
-
-
-int
-Error()
-  CODE:
-       RETVAL = rpmErrorCode();
-  OUTPUT:
-       RETVAL
-
-void
-Debug(enable = 1)
-  int enable
-  CODE:
-       if (enable) {
-         rpmSetVerbosity(RPMMESS_DEBUG);
-       } else {
-         rpmSetVerbosity(RPMMESS_QUIET);
-       }
-
-char *
-GetVar(var)
-  int var
-  CODE:
-       RETVAL = rpmGetVar(var);
-  OUTPUT:
-       RETVAL
-
-void
-SetVar(var, value)
-  int var
-  char * value
-  CODE:
-       rpmSetVar(var, value);
-
-INCLUDE: db.xs
-INCLUDE: header.xs
-INCLUDE: transaction.xs
-
-
diff --git a/perl/test.pl b/perl/test.pl
deleted file mode 100644 (file)
index 7a750a5..0000000
+++ /dev/null
@@ -1,37 +0,0 @@
-# Before `make install' is performed this script should be runnable with
-# `make test'. After `make install' it should work as `perl test.pl'
-
-######################### We start with some black magic to print on failure.
-
-# Change 1..1 below to 1..last_test_to_print .
-# (It may become useful if the test is moved to ./t subdirectory.)
-
-BEGIN { $| = 1; print "1..6\n"; }
-END {print "not ok 1\n" unless $loaded;}
-use rpm;
-$loaded = 1;
-print "ok 1\n";
-
-######################### End of black magic.
-
-# Insert your test code below (better if it prints "ok 13"
-# (correspondingly "not ok 13") depending on the success of chunk 13
-# of the test code):
-
-my $valid_package = "foo.i386.rpm";
-
-# we should be able to open a valid file
-print rpm::Header($valid_package) ? "ok 2" : "not ok 2", "\n";
-
-# we should not be able to read stuff from an invalid file
-print rpm::Header("this is not a valid package") ? "not ok 3" : "ok 3", "\n";
-
-# in the test file we have there are exactly 42 headers
-print scalar rpm::Header($valid_package)->Tags() == 42 ? "ok 4" : "not ok 4", "\n";
-
-# there are exactly 4 files in the package
-print scalar rpm::Header($valid_package)->ItemByName('Filenames') == 4 ? "ok 5" : "not ok 5", "\n";
-
-# item 1000 should be the name of the package
-print scalar rpm::Header($valid_package)->ItemByVal(1000) eq "xemacs-extras" ? "ok 6" : "not ok 6", "\n";
-
diff --git a/perl/transaction.xs b/perl/transaction.xs
deleted file mode 100644 (file)
index 02aad70..0000000
+++ /dev/null
@@ -1,56 +0,0 @@
-
-MODULE = rpm           PACKAGE = rpmTransactionSet             PREFIX = Transaction
-
-int
-TransactionAdd(trans, header)
-  rpmTransactionSet trans
-  Header header
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-int
-TransactionDepCheck(trans)
-  rpmTransactionSet trans
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-int
-TransactionRun(trans)
-  rpmTransactionSet trans
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-rpmTransactionSet
-TransactionOrder(trans)
-  rpmTransactionSet trans
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-int
-TransactionDealloc(trans)
-  rpmTransactionSet trans
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-int
-TransactionGetAttr(trans, name)
-  rpmTransactionSet trans
-  const char * name
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
-int 
-TransactionSetAttr(trans, name, val)
-  rpmTransactionSet trans
-  const char * name
-  void * val
-  CODE:
-       ST(0) = sv_newmortal();
-       ST(0) = &PL_sv_undef;
-
diff --git a/perl/typemap b/perl/typemap
deleted file mode 100644 (file)
index 78ccb99..0000000
+++ /dev/null
@@ -1,9 +0,0 @@
-/* $Id: typemap,v 1.4 1999/07/16 08:44:54 gafton Exp $ */
-
-TYPEMAP
-
-Header                 T_PTROBJ
-rpmTransactionSet      T_PTROBJ
-rpmdb                  T_PTROBJ
-
-const char *           T_PV