summaryrefslogtreecommitdiffstats
path: root/fake_packages
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2016-09-13 14:49:15 +0200
committerThierry Vignaud <thierry.vignaud@gmail.com>2016-09-13 14:49:15 +0200
commit788ba4e1cc535c45bac60800a8daff15e049de06 (patch)
tree977e9c922e2eea1b19f33a67d3618864647924d0 /fake_packages
parent7dd999c823ecfe916ca05b8b6d58f499d9f14767 (diff)
downloadperl_checker-788ba4e1cc535c45bac60800a8daff15e049de06.tar
perl_checker-788ba4e1cc535c45bac60800a8daff15e049de06.tar.gz
perl_checker-788ba4e1cc535c45bac60800a8daff15e049de06.tar.bz2
perl_checker-788ba4e1cc535c45bac60800a8daff15e049de06.tar.xz
perl_checker-788ba4e1cc535c45bac60800a8daff15e049de06.zip
update MDV::Distribconf fake package
Diffstat (limited to 'fake_packages')
-rw-r--r--fake_packages/MDV/Distribconf.pm93
1 files changed, 61 insertions, 32 deletions
diff --git a/fake_packages/MDV/Distribconf.pm b/fake_packages/MDV/Distribconf.pm
index 19df2c2..4338df7 100644
--- a/fake_packages/MDV/Distribconf.pm
+++ b/fake_packages/MDV/Distribconf.pm
@@ -1,33 +1,62 @@
-package MDV::Distribconf;
-
-sub new {
- my ($_class, $_path, $_mediacfg_version) = @_;
-}
-
-sub parse_mediacfg {
- my ($_distrib, $_mediacfg) = @_;
-}
-
-sub getvalue {
- my ($_distrib, $_media, $_var) = @_;
-}
-
-sub listmedia {
- my ($_distrib) = @_;
-}
-sub getfullpath {
- my ($_distrib, $_media, $_var) = @_;
-}
-
-sub getpath {
- my ($_distrib, $_media, $_var) = @_;
-}
-
-sub settree {
- my ($_distrib, $_spec) = @_;
-}
-
-sub load {
- my ($_distrib) = @_;
-}
+package MDV::Distribconf;
+our @ISA = qw();
+sub _expand { my ($_self, $_media, $_value, $_o_level) = @_ }
+sub check_mediacfg_version { my ($_distrib, $_o_wanted_version) = @_ }
+sub getdpath { my ($_distrib, $_media, $_o_var) = @_ }
+sub getfulldpath() {}
+sub getfullmediapath() {}
+sub getfullpath() {}
+sub getmediapath { my ($_distrib, $_media, $_o_var) = @_ }
+sub getpath { my ($_distrib, $_media, $_o_var) = @_ }
+sub getvalue { my ($_distrib, $_media, $_var, $_o_level) = @_ }
+sub listmedia { my ($_o_distrib) = @_ }
+sub load { my ($_o_distrib) = @_ }
+sub loadtree { my ($_o_distrib) = @_ }
+sub mediaexists { my ($_distrib, $_o_media) = @_ }
+sub mymediacfg_version() {}
+sub new { my ($_class, $_path, $_o_mediacfg_version) = @_ }
+sub parse_hdlists { my ($_distrib, $_o_hdlists) = @_ }
+sub parse_mediacfg { my ($_distrib, $_o_mediacfg) = @_ }
+sub parse_version { my ($_distrib, $_o_fversion) = @_ }
+sub settree { my ($_distrib, $_o_spec) = @_ }
+
+package MDV::Distribconf::Build;
+our @ISA = qw();
+sub _post_delvalue { my ($_distrib, $_cmedia, $_o_cvar) = @_ }
+sub _post_setvalue { my ($_distrib, $_cmedia, $_cvar, $_o_cval) = @_ }
+sub create_media { my ($_self, $_o_media) = @_ }
+sub delvalue { my ($_distrib, $_media, $_o_var) = @_ }
+sub init { my ($_self, $_o_flavour) = @_ }
+sub list_existing_medias { my ($_o_self) = @_ }
+sub new() {}
+sub set_all_medias_size { my ($_o_self) = @_ }
+sub set_media_size { my ($_self, $_o_media) = @_ }
+sub setvalue { my ($_distrib, $_media, $_var, $_o_val) = @_ }
+sub write_hdlists { my ($_distrib, $_o_hdlists) = @_ }
+sub write_mediacfg { my ($_distrib, $_o_hdlistscfg) = @_ }
+sub write_productid { my ($_distrib, $_o_productid) = @_ }
+sub write_version { my ($_distrib, $_o_version) = @_ }
+
+package MDV::Distribconf::Checks;
+our @ISA = qw();
+sub _report_err { my ($_out, $_err_code, $_fmt, @_more_paras) = @_ }
+sub check { my ($_self, $_o_fhout) = @_ }
+sub check_config { my ($_self, $_o_fhout) = @_ }
+sub check_global_md5 { my ($_o_self) = @_ }
+sub check_index_sync() {}
+sub check_media_coherency { my ($_distrib, $_o_fhout) = @_ }
+sub check_media_md5 { my ($_self, $_o_media) = @_ }
+sub checkdistrib { my ($_self, $_o_fhout) = @_ }
+sub get_index_sync_offset { my ($_self, $_media, $_o_submedia) = @_ }
+sub new() {}
+
+package MDV::Distribconf::MediaCFG;
+our @ISA = qw();
+sub _valid_param { my ($_media, $_var, $_o_val) = @_ }
+sub _value_info() {}
+
+package MDV::Distribconf::Utils;
+our @ISA = qw();
+sub checkmd5 { my ($_md5file, @_more_paras) = @_ }
+sub hdlist_vs_dir { my ($_hdlist, @_more_paras) = @_ }