From a1eb7ae8b26ee696fb7a904bf59ae18cf2b42256 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Sat, 24 Mar 2012 16:16:09 +0000 Subject: add RPM4 fake package (for eg: iurt) --- NEWS | 1 + fake_packages/RPM4.pm | 267 +++++++++++++++++++++++++++++++++++++++++++ fake_packages/RPM4/Header.pm | 36 ++++++ 3 files changed, 304 insertions(+) create mode 100644 fake_packages/RPM4.pm create mode 100644 fake_packages/RPM4/Header.pm diff --git a/NEWS b/NEWS index 059e2f2..99aef07 100644 --- a/NEWS +++ b/NEWS @@ -1,3 +1,4 @@ +- add RPM4 fake package (for eg: iurt) - update Net::FTP fake package for installer Version 1.2.17 - 19 March 2012, by Thierry Vignaud diff --git a/fake_packages/RPM4.pm b/fake_packages/RPM4.pm new file mode 100644 index 0000000..554cd33 --- /dev/null +++ b/fake_packages/RPM4.pm @@ -0,0 +1,267 @@ + +package RPM4; +our @ISA = qw(); +sub N { my ($_msg, @_more_paras) = @_ } +sub add_macro() {} +sub addmacro { my ($_macro) = @_ } +sub archscore { my ($_arch, $_o_build) = @_ } +sub buildhost() {} +sub compare_evr() {} +sub del_macro() {} +sub delmacro { my ($_name) = @_ } +sub dumpmacros { my ($_fp) = @_ } +sub dumprc { my ($_fp) = @_ } +sub emptydb() {} +sub expand { my ($_name) = @_ } +sub expandnumeric { my ($_name) = @_ } +sub flagvalue { my ($_flagtype, $_sv_value) = @_ } +sub format_rpmpb { my (@_more_paras) = @_ } +sub getarchname() {} +sub getosname() {} +sub headernew() {} +sub installsrpm { my ($_filename, $_o_sv_vsflags) = @_ } +sub isdebug() {} +sub lastlogmsg() {} +sub loadmacrosfile { my ($_filename) = @_ } +sub moduleinfo() {} +sub newdb { my ($_o_write , $_o_rootdir) = @_ } +sub newdep { my ($_sv_depTag, $_Name, $_o_sv_sense, $_o_sv_evr) = @_ } +sub newspec { my ($_o_filename , $_o_passphrase, $_o_rootdir, $_o_cookies, $_o_anyarch, $_o_force, $_o_verify) = @_ } +sub osscore { my ($_os, $_o_build) = @_ } +sub parserpms { my (@_more_paras) = @_ } +sub platformscore { my ($_platform) = @_ } +sub querytag() {} +sub readconfig { my ($_o_rcfile , $_o_target) = @_ } +sub resetmacros() {} +sub resetrc() {} +sub rpm2header { my ($_filename, $_o_sv_vsflags) = @_ } +sub rpmcpuinfodep { my ($_o_path ) = @_ } +sub rpmdbinit { my ($_o_rootdir ) = @_ } +sub rpmdbrebuild { my ($_o_rootdir ) = @_ } +sub rpmdbverify { my ($_o_rootdir ) = @_ } +sub rpmgetconfdep { my ($_o_path ) = @_ } +sub rpmlibdep() {} +sub rpmlog { my ($_svcode, $_msg) = @_ } +sub rpmpipedep { my ($_cmd, $_o_tag) = @_ } +sub rpmresign { my ($_passphrase, $_rpmfile) = @_ } +sub rpmsysinfodep { my ($_o_sysinfofile ) = @_ } +sub rpmunamedep() {} +sub rpmvercmp { my ($_one, $_two) = @_ } +sub setlogcallback { my ($_function) = @_ } +sub setlogfile { my ($_filename) = @_ } +sub setverbosity { my ($_svlevel) = @_ } +sub specnew() {} +sub stream2header { my ($_fp, $_o_no_header_magic, $_o_callback) = @_ } +sub tagName { my ($_tag) = @_ } +sub tagValue { my ($_tagname) = @_ } +sub tagtypevalue { my ($_svtagtype) = @_ } + +package RPM4::Db::Te; +our @ISA = qw(); +sub DESTROY { my ($_Te) = @_ } +sub arch { my ($_Te) = @_ } +sub dep { my ($_Te, $_type) = @_ } +sub epoch { my ($_Te) = @_ } +sub files { my ($_Te) = @_ } +sub fullname { my ($_Te) = @_ } +sub name { my ($_Te) = @_ } +sub os { my ($_Te) = @_ } +sub release { my ($_Te) = @_ } +sub size { my ($_Te) = @_ } +sub type { my ($_Te) = @_ } +sub version { my ($_Te) = @_ } + +package RPM4::Db::_Problems; +our @ISA = qw(); +sub DESTROY { my ($_ps) = @_ } +sub count { my ($_ps) = @_ } +sub fmtpb { my ($_ps, $_numpb) = @_ } +sub isignore { my ($_ps, $_numpb) = @_ } +sub new { my ($_perlclass, $_ts) = @_ } + +package RPM4::Header; +our @ISA = qw(); +sub AUTOLOAD { my ($_o_header) = @_ } +sub DESTROY { my ($_h) = @_ } +sub addtag { my ($_h, $_sv_tag, $_sv_tagtype, @_more_paras) = @_ } +sub archscore { my ($_o_header) = @_ } +sub buildlight { my ($_header, $_o_hinfo) = @_ } +sub compare { my ($_h1, $_h2) = @_ } +sub copy { my ($_h) = @_ } +sub dep { my ($_header, $_type, $_o_scaremem) = @_ } +sub files { my ($_header, $_o_scaremem) = @_ } +sub fullname { my ($_h) = @_ } +sub getlight { my ($_header, $_o_reqfiles) = @_ } +sub hastag { my ($_h, $_sv_tag) = @_ } +sub hchkdep { my ($_h1, $_h2, $_type) = @_ } +sub hsize { my ($_h, $_o_no_header_magic) = @_ } +sub is_better_than { my ($_header, $_o_h) = @_ } +sub issrc { my ($_h) = @_ } +sub listtag { my ($_h) = @_ } +sub matchdep { my ($_header, $_Dep, $_o_sv_nopromote) = @_ } +sub namematchdep { my ($_header, $_Dep, $_o_sv_nopromote) = @_ } +sub nevr { my ($_header) = @_ } +sub new { my ($_class, $_o_arg) = @_ } +sub osscore { my ($_o_header) = @_ } +sub queryformat { my ($_h, $_query) = @_ } +sub removetag { my ($_h, $_sv_tag) = @_ } +sub requiredfiles { my ($_o_header) = @_ } +sub sourcerpmname() {} +sub string { my ($_h, $_o_no_header_magic) = @_ } +sub synthesisinfo { my ($_header, $_o_filestoprovides) = @_ } +sub tag { my ($_h, $_sv_tag) = @_ } +sub tagtype { my ($_h, $_sv_tag) = @_ } +sub write { my ($_h, $_fp, $_o_no_header_magic) = @_ } +sub writesynthesis { my ($_header, $_handle, $_o_filestoprovides) = @_ } + +package RPM4::Header::Changelogs; +our @ISA = qw(); +sub hasnext { my ($_o_self) = @_ } +sub init { my ($_o_self) = @_ } +sub name { my ($_o_self) = @_ } +sub new { my ($_class, $_o_header) = @_ } +sub text { my ($_o_self) = @_ } +sub time { my ($_o_self) = @_ } + +package RPM4::Header::Checks; +our @ISA = qw(); +sub check { my ($_o_header) = @_ } +sub reporterror() {} + +package RPM4::Header::Dependencies; +our @ISA = qw(); +sub DESTROY { my ($_Dep) = @_ } +sub add { my ($_Dep, $_name, $_o_sv_sense, $_o_sv_evr) = @_ } +sub color { my ($_Dep) = @_ } +sub count { my ($_Dep) = @_ } +sub evr { my ($_Dep) = @_ } +sub find { my ($_Dep, $_depb) = @_ } +sub flags { my ($_Dep) = @_ } +sub hasnext { my ($_Dep) = @_ } +sub info { my ($_Dep) = @_ } +sub init { my ($_Dep) = @_ } +sub matchheader { my ($_Dep, $_header, $_o_sv_nopromote) = @_ } +sub matchheadername { my ($_Dep, $_header, $_o_sv_nopromote) = @_ } +sub merge { my ($_Dep, $_depb) = @_ } +sub move { my ($_Dep, $_o_index) = @_ } +sub name { my ($_Dep) = @_ } +sub new { my ($_class, $_deptag, $_initdep, @_more_paras) = @_ } +sub newsingle { my ($_perlclass, $_sv_tag, $_name, $_o_sv_sense, $_o_sv_evr) = @_ } +sub next { my ($_Dep) = @_ } +sub nopromote { my ($_Dep, $_o_sv_nopromote) = @_ } +sub overlap { my ($_Dep1, $_Dep2) = @_ } +sub tag { my ($_Dep) = @_ } + +package RPM4::Header::Files; +our @ISA = qw(); +sub DESTROY { my ($_Files) = @_ } +sub basename { my ($_Files) = @_ } +sub class { my ($_Files) = @_ } +sub color { my ($_Files) = @_ } +sub compare { my ($_Files, $_Fb) = @_ } +sub count { my ($_Files) = @_ } +sub countdir { my ($_Files) = @_ } +sub dev { my ($_Files) = @_ } +sub dircount() {} +sub dirname { my ($_Files) = @_ } +sub fflags { my ($_Files) = @_ } +sub filename { my ($_Files) = @_ } +sub group { my ($_Files) = @_ } +sub hasnext { my ($_Files) = @_ } +sub init { my ($_Files) = @_ } +sub initdir { my ($_Files) = @_ } +sub inode { my ($_Files) = @_ } +sub link { my ($_Files) = @_ } +sub md5 { my ($_Files) = @_ } +sub mode { my ($_Files) = @_ } +sub move { my ($_Files, $_o_index) = @_ } +sub mtime { my ($_Files) = @_ } +sub next { my ($_Files) = @_ } +sub nextdir { my ($_Files) = @_ } +sub nlink { my ($_Files) = @_ } +sub size { my ($_Files) = @_ } +sub user { my ($_Files) = @_ } + +package RPM4::Index; +our @ISA = qw(); +sub buildhdlist { my (@_more_paras) = @_ } +sub buildindex { my (@_more_paras) = @_ } +sub buildsynthesis { my (@_more_paras) = @_ } +sub parsehdlist { my (@_more_paras) = @_ } +sub parsesynthesis { my (@_more_paras) = @_ } + +package RPM4::Media; +our @ISA = qw(); +sub get_header { my ($_self, $_o_id) = @_ } +sub get_indexfile { my ($_self, $_o_file) = @_ } +sub get_rpm { my ($_self, $_o_rpm) = @_ } +sub id2rpm { my ($_self, $_o_id) = @_ } +sub init { my ($_self, $_o_callback) = @_ } +sub load { my ($_self, $_o_reqfiles) = @_ } +sub new { my ($_class, @_more_paras) = @_ } +sub traverse { my ($_self, $_o_callback) = @_ } + +package RPM4::Sign; +our @ISA = qw(); +sub adjustmacro { my ($_o_self) = @_ } +sub getpasswdfile { my ($_o_self) = @_ } +sub getpubkey { my ($_o_self) = @_ } +sub new { my ($_class, @_more_paras) = @_ } +sub restoremacro { my ($_o_self) = @_ } +sub rpmsign { my ($_self, $_rpm, $_o_header) = @_ } +sub rpmssign { my ($_self, @_more_paras) = @_ } + +package RPM4::Spec; +our @ISA = qw(); +sub DESTROY { my ($_spec) = @_ } +sub binheader { my ($_spec) = @_ } +sub binrpm { my ($_spec) = @_ } +sub build { my ($_spec, $_sv_buildflags) = @_ } +sub check { my ($_spec, $_o_ts) = @_ } +sub icon { my ($_spec) = @_ } +sub icon_url { my ($_spec) = @_ } +sub new { my ($_perlclass, $_o_specfile, @_more_paras) = @_ } +sub rpmbuild { my ($_spec, $_flags, @_more_paras) = @_ } +sub sources { my ($_spec, $_o_is) = @_ } +sub sources_url { my ($_spec, $_o_is) = @_ } +sub specfile { my ($_spec) = @_ } +sub srcheader { my ($_spec) = @_ } +sub srcrpm { my ($_spec) = @_ } + +package RPM4::Transaction; +our @ISA = qw(); +sub DESTROY { my ($_ts) = @_ } +sub _transpbs { my ($_ts) = @_ } +sub checkrpm { my ($_ts, $_filename, $_o_sv_vsflags) = @_ } +sub deleteheader { my ($_db, $_sv_offset) = @_ } +sub get_header { my ($_ts, $_off) = @_ } +sub importpubkey { my ($_ts, $_filename) = @_ } +sub injectheader { my ($_db, $_header) = @_ } +sub installsrpm { my ($_ts, $_filename) = @_ } +sub new { my ($_perlclass, $_o_rootdir) = @_ } +sub newspec { my ($_self, $_filename, @_more_paras) = @_ } +sub rpm2header { my ($_ts, $_filename) = @_ } +sub specbuild { my ($_ts, $_spec, $_sv_buildflags) = @_ } +sub transadd { my ($_ts, $_header, $_o_key, $_o_upgrade, $_o_sv_relocation, $_o_force) = @_ } +sub transcheck { my ($_ts) = @_ } +sub transclean { my ($_ts) = @_ } +sub transflag { my ($_ts, $_o_sv_transflag) = @_ } +sub transorder { my ($_ts) = @_ } +sub transpbs { my ($_o_self) = @_ } +sub transremove { my ($_ts, $_recOffset, $_o_header) = @_ } +sub transremove_pkg { my ($_ts, $_N_evr) = @_ } +sub transreset { my ($_ts) = @_ } +sub transrun { my ($_ts, $_callback, @_more_paras) = @_ } +sub traverse { my ($_ts, $_o_callback, $_o_sv_tagname, $_o_sv_tagvalue, $_o_keylen, $_o_sv_exclude) = @_ } +sub traverse_transaction { my ($_ts, $_callback, $_o_type) = @_ } +sub vsflags { my ($_ts, $_o_sv_vsflags) = @_ } + +package RPM4::Transaction::Problems; +our @ISA = qw(); +sub count { my ($_o_self) = @_ } +sub hasnext { my ($_o_self) = @_ } +sub init { my ($_o_self) = @_ } +sub is_ignore { my ($_o_self) = @_ } +sub new { my ($_class, $_o_ts) = @_ } +sub print_all { my ($_self, $_o_handle) = @_ } +sub problem { my ($_o_self) = @_ } diff --git a/fake_packages/RPM4/Header.pm b/fake_packages/RPM4/Header.pm new file mode 100644 index 0000000..b6975bc --- /dev/null +++ b/fake_packages/RPM4/Header.pm @@ -0,0 +1,36 @@ +package RPM4::Header; +our @ISA = qw(); +sub AUTOLOAD { my ($_o_header) = @_ } +sub DESTROY { my ($_h) = @_ } +sub addtag { my ($_h, $_sv_tag, $_sv_tagtype, @_more_paras) = @_ } +sub archscore { my ($_o_header) = @_ } +sub buildlight { my ($_header, $_o_hinfo) = @_ } +sub compare { my ($_h1, $_h2) = @_ } +sub copy { my ($_h) = @_ } +sub dep { my ($_header, $_type, $_o_scaremem) = @_ } +sub files { my ($_header, $_o_scaremem) = @_ } +sub fullname { my ($_h) = @_ } +sub getlight { my ($_header, $_o_reqfiles) = @_ } +sub hastag { my ($_h, $_sv_tag) = @_ } +sub hchkdep { my ($_h1, $_h2, $_type) = @_ } +sub hsize { my ($_h, $_o_no_header_magic) = @_ } +sub is_better_than { my ($_header, $_o_h) = @_ } +sub issrc { my ($_h) = @_ } +sub listtag { my ($_h) = @_ } +sub matchdep { my ($_header, $_Dep, $_o_sv_nopromote) = @_ } +sub namematchdep { my ($_header, $_Dep, $_o_sv_nopromote) = @_ } +sub nevr { my ($_header) = @_ } +sub new { my ($_class, $_o_arg) = @_ } +sub osscore { my ($_o_header) = @_ } +sub queryformat { my ($_h, $_query) = @_ } +sub removetag { my ($_h, $_sv_tag) = @_ } +sub requiredfiles { my ($_o_header) = @_ } +sub sourcerpmname() {} +sub string { my ($_h, $_o_no_header_magic) = @_ } +sub synthesisinfo { my ($_header, $_o_filestoprovides) = @_ } +sub tag { my ($_h, $_sv_tag) = @_ } +sub tagtype { my ($_h, $_sv_tag) = @_ } +sub write { my ($_h, $_fp, $_o_no_header_magic) = @_ } +sub writesynthesis { my ($_header, $_handle, $_o_filestoprovides) = @_ } + + -- cgit v1.2.1