aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2012-06-17 20:38:28 +0000
committerThierry Vignaud <tv@mageia.org>2012-06-17 20:38:28 +0000
commit5e6eb5037f411987e994522e640a8efbc4c6a0a5 (patch)
treec96e995a3b53d3d83c43d3e4786df383225e16fd
parent498227c7e53d0d68f7fa22f7b26e6bf0e68b25fc (diff)
downloadperl-URPM-5e6eb5037f411987e994522e640a8efbc4c6a0a5.tar
perl-URPM-5e6eb5037f411987e994522e640a8efbc4c6a0a5.tar.gz
perl-URPM-5e6eb5037f411987e994522e640a8efbc4c6a0a5.tar.bz2
perl-URPM-5e6eb5037f411987e994522e640a8efbc4c6a0a5.tar.xz
perl-URPM-5e6eb5037f411987e994522e640a8efbc4c6a0a5.zip
resplit all functions using return_list_number() into Pkg_files_mtime()
-rw-r--r--URPM.xs53
1 files changed, 32 insertions, 21 deletions
diff --git a/URPM.xs b/URPM.xs
index 54f0b0c..0aa61af 100644
--- a/URPM.xs
+++ b/URPM.xs
@@ -2068,7 +2068,6 @@ Pkg_provides_nosense(pkg)
return_list_str(pkg->provides, pkg->h, RPMTAG_PROVIDENAME, 0, 0, callback_list_str_xpush, NULL);
SPAGAIN;
-
void
Pkg_buildarchs(pkg)
URPM::Package pkg
@@ -2081,14 +2080,8 @@ Pkg_buildarchs(pkg)
files_md5sum = 6
files_owner = 7
files_group = 8
- files_mtime = 9
- files_size = 10
- files_uid = 11
- files_gid = 12
- files_mode = 13
files_flags = 14
conf_files = 15
- changelog_time = 16
changelog_name = 17
changelog_text = 18
PPCODE:
@@ -2112,22 +2105,8 @@ Pkg_buildarchs(pkg)
xpush_simple_list_str(pkg->h, RPMTAG_FILEUSERNAME); break;
case 8:
xpush_simple_list_str(pkg->h, RPMTAG_FILEGROUPNAME); break;
- case 9:
- return_list_number(pkg->h, RPMTAG_FILEMTIMES); break;
- case 10:
- return_list_number(pkg->h, RPMTAG_FILESIZES); break;
- case 11:
- return_list_number(pkg->h, RPMTAG_FILEUIDS); break;
- case 12:
- return_list_number(pkg->h, RPMTAG_FILEGIDS); break;
- case 13:
- return_list_number(pkg->h, RPMTAG_FILEMODES); break;
- case 14:
- return_list_number(pkg->h, RPMTAG_FILEFLAGS); break;
case 15:
return_files(pkg->h, FILTER_MODE_CONF_FILES); break;
- case 16:
- return_list_number(pkg->h, RPMTAG_CHANGELOGTIME); break;
case 17:
xpush_simple_list_str(pkg->h, RPMTAG_CHANGELOGNAME); break;
case 18:
@@ -2136,6 +2115,38 @@ Pkg_buildarchs(pkg)
SPAGAIN;
void
+Pkg_files_mtime(pkg)
+ URPM::Package pkg
+ ALIAS:
+ files_size = 1
+ files_uid = 2
+ files_gid = 3
+ files_mode = 4
+ files_flags = 5
+ changelog_time = 6
+ PPCODE:
+ PUTBACK;
+ rpmTag tag;
+ switch (ix) {
+ case 1:
+ tag = RPMTAG_FILESIZES; break;
+ case 2:
+ tag = RPMTAG_FILEUIDS; break;
+ case 3:
+ tag = RPMTAG_FILEGIDS; break;
+ case 4:
+ tag = RPMTAG_FILEMODES; break;
+ case 5:
+ tag = RPMTAG_FILEFLAGS; break;
+ case 6:
+ tag = RPMTAG_CHANGELOGTIME; break;
+ default:
+ tag = RPMTAG_FILEMTIMES; break;
+ }
+ return_list_number(pkg->h, tag);
+ SPAGAIN;
+
+void
Pkg_queryformat(pkg, fmt)
URPM::Package pkg
char *fmt