- Pacman-dev - lists.archlinux.org

[pacman-dev] [PATCH] makepkg-template: Add gettext support
by Florian Pritz 20 May '13

20 May '13

This also slighty changes the word order in the description for --newest. Signed-off-by: Florian Pritz <bluewind(a)xinu.at> --- scripts/makepkg-template.pl.in | 74 +++++++++++++++++++++++++++--------------- 1 file changed, 48 insertions(+), 26 deletions(-) diff --git a/scripts/makepkg-template.pl.in b/scripts/makepkg-template.pl.in index 1ba007b..10035a6 100755 --- a/scripts/makepkg-template.pl.in +++ b/scripts/makepkg-template.pl.in @@ -5,7 +5,8 @@ use v5.10.1; use Cwd qw(abs_path); use File::Spec; use Getopt::Long; -use Pod::Usage; +use Module::Load; +use Module::Load::Conditional qw(can_load); my %opts = ( input => '@BUILDSCRIPT@', @@ -15,9 +16,27 @@ my %opts = ( my $template_name_charset = qr/[[:alnum:]+_.@-]/; my $template_marker = qr/# template/; +# runtime loading to avoid dependency on cpan since this is the only non-core module +my $have_gettext = can_load(modules => {'Locale::gettext' => undef}); +if ($have_gettext) { + load 'Locale::gettext', qw(gettext); + Locale::gettext::bindtextdomain("pacman-scripts", '@localedir@'); + Locale::gettext::textdomain("pacman-scripts"); +} + +sub _ { + my ($string) = @_; + + if ($have_gettext) { + return gettext($string); + } else { + return $string; + } +} + sub burp { my ($file_name, @lines) = @_; - open (my $fh, ">", $file_name) || die "can't create $file_name $!" ; + open (my $fh, ">", $file_name) || die sprintf(_("can't create '%s': %s"), $file_name, $!); print $fh @lines; close $fh; } @@ -34,20 +53,22 @@ sub parse_template_line { foreach my $element (@elements) { my ($key, $val) = ($element =~ /^([a-z0-9]+)=(.*)$/); - die "invalid key/value pair $filename:$linenumber: $line" - unless $key and $val; + unless ($key and $val) { + die _("invalid key/value pair\n%s:%s: %s"), + "$filename:$linenumber: $line"; + } $values{$key} = $val; } # end doesn't take arguments if ($values{command} ne "end") { if (!$values{name}) { - die "invalid template line: can't find template name\n", + die _("invalid template line: can't find template name\n"), "$filename:$linenumber: $line"; } unless ($values{name} =~ /^$template_name_charset+$/) { - die "invalid chars used in name '$values{name}'. allowed: [:alnum:]+_.@-\n", + die sprintf(_("invalid chars used in name '%s'. allowed: [:alnum:]+_.@-\n"), $values{name}), "$filename:$linenumber: $line"; } } @@ -72,7 +93,7 @@ sub load_template { my ($version) = (abs_path($path) =~ /-([0-9.]+)[.]template$/); if (!$version) { - die "Couldn't detect version for template '$values->{name}'"; + die sprintf(_("Couldn't detect version for template '%s'"), $values->{name}); } my $parsed = process_file($path); @@ -91,7 +112,7 @@ sub process_file { my $nesting_level = 0; my $linenumber = 0; - open (my $fh, "<", $filename) or die "failed to open '$filename': $!"; + open (my $fh, "<", $filename) or die sprintf(_("failed to open '%s': %s"), $filename, $!); my @lines = <$fh>; close $fh; @@ -113,7 +134,7 @@ sub process_file { } default { - die "Unknown template marker '$values->{command}'\n", + die sprintf(_("Unknown template marker '%s'\n"), $values->{command}), "$filename:$linenumber: $line"; } } @@ -134,15 +155,30 @@ sub process_file { return $ret; } +sub usage { + my ($exitstatus) = @_; + print "makepkg-template [options]\n"; + print "\n"; + print _("Options:\n"); + printf(_(" --input, -p <file> Build script to read (default: %s)\n"), '@BUILDSCRIPT@'); + print _(" --output, -o <file> file to output to (default: input file)\n"); + print _(" --newest, -n update templates to newest version\n"); + print _(" (default: use version specified in the template markers)\n"); + print _(" --template-dir <dir> directory to search for templates\n"); + printf(_(" (default: %s)\n"), '@TEMPLATE_DIR@'); + print "\n"; + exit($exitstatus); +} + Getopt::Long::Configure ("bundling"); GetOptions( - "help" => sub {pod2usage(-exitval => 0, -verbose => 1); }, - "h" => sub {pod2usage(-exitval => 0, -verbose => 0); }, + "help" => sub {usage(0); }, + "h" => sub {usage(0); }, "input|p=s" => \$opts{input}, "output|o=s" => \$opts{output}, "newest|n" => \$opts{newest}, "template-dir=s" => \$opts{template_dir}, -) or pod2usage(1); +) or usage(1); $opts{output} = $opts{input} unless $opts{output}; @@ -151,18 +187,4 @@ $opts{output} = "/dev/stdout" if $opts{output} eq "-"; burp($opts{output}, process_file($opts{input})); -__END__ -=head1 SYNOPSIS - -makepkg-template [options] - - Options: - --input, -p <file> Build script to read (default: @BUILDSCRIPT@) - --output, -o <file> file to output to (default: input file) - --newest, -n update templates to newest version - (default: use specified version in the template markers) - --template-dir <dir> directory to search for templates - (default: @TEMPLATE_DIR@) - -=cut # vim: set noet: -- 1.8.2.3

2 5

[pacman-dev] [PATCH] Remove incorrect bug number from NEWS
by Allan McRae 19 May '13

19 May '13

The wrong bug number is mentioned in commit 32327dc8 and this was perpetuated into the NEWS file. Signed-off-by: Allan McRae <allan(a)archlinux.org> --- NEWS | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/NEWS b/NEWS index 6fdb5d5..ec19407 100644 --- a/NEWS +++ b/NEWS @@ -29,7 +29,7 @@ VERSION DESCRIPTION (FS#28014) - configure shell for running install scriptlets (FS#20557) - make path to ldconfig configurable - - display repo in VerbosePkgLists output (FS#26334) + - display repo in VerbosePkgLists output - do not check file conflicts or diskspace with --dbonly (FS#25667) - UseDelta takes a ratio for the largest delta to use -- 1.8.2.3

1 0

[pacman-dev] [PATCH 1/2] makepkg: Add helper to test for functions in build script
by Allan McRae 19 May '13

19 May '13

Signed-off-by: Allan McRae <allan(a)archlinux.org> --- scripts/makepkg.sh.in | 18 +++++++++++------- 1 file changed, 11 insertions(+), 7 deletions(-) diff --git a/scripts/makepkg.sh.in b/scripts/makepkg.sh.in index c311c30..8b222da 100644 --- a/scripts/makepkg.sh.in +++ b/scripts/makepkg.sh.in @@ -2095,6 +2095,10 @@ install_package() { fi } +has_function() { + return $(declare -f $1 >/dev/null) +} + check_sanity() { # check for no-no's in the build script local i @@ -2238,7 +2242,7 @@ check_sanity() { if (( ${#pkgname[@]} > 1 )); then for i in ${pkgname[@]}; do - if ! declare -f package_${i} >/dev/null; then + if ! has_function package_${i}; then error "$(gettext "Missing %s function for split package '%s'")" "package_$i()" "$i" ret=1 fi @@ -2799,7 +2803,7 @@ if (( GENINTEG )); then exit 0 # $E_OK fi -if declare -f pkgver >/dev/null; then +if has_function pkgver; then PKGVERFUNC=1 fi @@ -2814,24 +2818,24 @@ if (( ${#pkgname[@]} > 1 )); then fi # test for available PKGBUILD functions -if declare -f prepare >/dev/null; then +if has_function prepare; then # "Hide" prepare() function if not going to be run if [[ $RUN_PREPARE != "n" ]]; then PREPAREFUNC=1 fi fi -if declare -f build >/dev/null; then +if has_function build; then BUILDFUNC=1 fi -if declare -f check >/dev/null; then +if has_function check; then # "Hide" check() function if not going to be run if [[ $RUN_CHECK = 'y' ]] || { ! check_buildenv "check" "n" && [[ $RUN_CHECK != "n" ]]; }; then CHECKFUNC=1 fi fi -if declare -f package >/dev/null; then +if has_function package; then PKGFUNC=1 -elif [[ $SPLITPKG -eq 0 ]] && declare -f package_${pkgname} >/dev/null; then +elif [[ $SPLITPKG -eq 0 ]] && has_function package_${pkgname}; then SPLITPKG=1 fi -- 1.8.2.3

2 3

[pacman-dev] [PATCH] pacman.8: document .pacorig files
by Andrew Gregory 18 May '13

18 May '13

Signed-off-by: Andrew Gregory <andrew.gregory.8(a)gmail.com> --- doc/pacman.8.txt | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/doc/pacman.8.txt b/doc/pacman.8.txt index 189e113..c13099a 100644 --- a/doc/pacman.8.txt +++ b/doc/pacman.8.txt @@ -445,6 +445,10 @@ original=X, current=Y, new=Z:: extension and warn the user. The user must then manually merge any necessary changes into the original file. +original=NULL, current=Y, new=Z:: + Package was not previously installed. Save the current file with + a '.pacorig' extension, install the new file, and warn the user. + Examples -------- -- 1.8.2.2

2 2

[pacman-dev] [PATCH] check for backup file changes more cautiously
by Andrew Gregory 18 May '13

18 May '13

A couple of our tests checked for a non-match between hashes, therefore assuming that backup files were the same if the hashing process failed. Because treating the files as the same prevents the user from ever seeing the new file, we should instead check for a hash match and treat the files as different unless we have actually been able to verify that they are the same. Refactoring also removes the need to set hash_orig = "" just to reach some of the tests. Signed-off-by: Andrew Gregory <andrew.gregory.8(a)gmail.com> --- lib/libalpm/add.c | 120 ++++++++++++++++++++++++++---------------------------- 1 file changed, 58 insertions(+), 62 deletions(-) diff --git a/lib/libalpm/add.c b/lib/libalpm/add.c index 3ef81e3..9c930f5 100644 --- a/lib/libalpm/add.c +++ b/lib/libalpm/add.c @@ -273,8 +273,6 @@ static int extract_single_file(alpm_handle_t *handle, struct archive *archive, /* check newpkg first, so that adding backup files is retroactive */ backup = _alpm_needbackup(entryname, newpkg); if(backup) { - /* if we force hash_orig to be non-NULL retroactive backup works */ - hash_orig = ""; needbackup = 1; } @@ -332,83 +330,81 @@ static int extract_single_file(alpm_handle_t *handle, struct archive *archive, _alpm_log(handle, ALPM_LOG_DEBUG, "new: %s\n", hash_pkg); _alpm_log(handle, ALPM_LOG_DEBUG, "original: %s\n", hash_orig); - if(!oldpkg) { - if(hash_local && hash_pkg && strcmp(hash_local, hash_pkg) != 0) { + if(hash_orig && hash_local && strcmp(hash_orig, hash_local) == 0) { + /* installed file has NOT been changed by user */ + if(hash_pkg && strcmp(hash_orig, hash_pkg) == 0) { + /* no sense in installing the same file twice, install + * ONLY if the original and package hashes differ */ + _alpm_log(handle, ALPM_LOG_DEBUG, + "action: leaving existing file in place\n"); + unlink(checkfile); + } else { + _alpm_log(handle, ALPM_LOG_DEBUG, "action: installing new file: %s\n", + entryname_orig); + + if(try_rename(handle, checkfile, filename)) { + errors++; + } + } + } else if(hash_orig && hash_pkg && strcmp(hash_orig, hash_pkg) == 0) { + /* originally installed file and new file are the same - this + * implies the case above failed - i.e. the file was changed by a + * user */ + _alpm_log(handle, ALPM_LOG_DEBUG, + "action: leaving existing file in place\n"); + unlink(checkfile); + } else if(hash_local && hash_pkg && strcmp(hash_local, hash_pkg) == 0) { + /* this would be magical. The above two cases failed, but the + * user changes just so happened to make the new file exactly the + * same as the one in the package... skip it */ + _alpm_log(handle, ALPM_LOG_DEBUG, + "action: leaving existing file in place\n"); + unlink(checkfile); + } else { + char *newpath; + size_t newlen = strlen(filename) + 9; + MALLOC(newpath, newlen, + errors++; handle->pm_errno = ALPM_ERR_MEMORY; goto needbackup_cleanup); + + if(oldpkg) { + _alpm_log(handle, ALPM_LOG_DEBUG, + "action: keeping current file and installing" + " new one with .pacnew ending\n"); + snprintf(newpath, newlen, "%s.pacnew", filename); + if(try_rename(handle, checkfile, newpath)) { + errors++; + } else { + _alpm_log(handle, ALPM_LOG_WARNING, _("%s installed as %s\n"), + filename, newpath); + alpm_logaction(handle, ALPM_CALLER_PREFIX, + "warning: %s installed as %s\n", filename, newpath); + } + } else { /* looks like we have a local file that has a different hash as the * file in the package, move it to a .pacorig */ - char *newpath; - size_t newlen = strlen(filename) + 9; - MALLOC(newpath, newlen, - errors++; handle->pm_errno = ALPM_ERR_MEMORY; goto needbackup_cleanup); + _alpm_log(handle, ALPM_LOG_DEBUG, + "action: saving existing file with a .pacorig ending" + " and installing a new one\n"); snprintf(newpath, newlen, "%s.pacorig", filename); /* move the existing file to the "pacorig" */ if(try_rename(handle, filename, newpath)) { - errors++; - errors++; + errors++; /* failed rename filename -> filename.pacorig */ + errors++; /* failed rename checkfile -> filename */ } else { /* rename the file we extracted to the real name */ if(try_rename(handle, checkfile, filename)) { errors++; } else { - _alpm_log(handle, ALPM_LOG_WARNING, _("%s saved as %s\n"), filename, newpath); + _alpm_log(handle, ALPM_LOG_WARNING, + _("%s saved as %s\n"), filename, newpath); alpm_logaction(handle, ALPM_CALLER_PREFIX, "warning: %s saved as %s\n", filename, newpath); } } - free(newpath); - } else { - /* local file is identical to pkg one, so just remove pkg one */ - unlink(checkfile); } - } else if(hash_orig) { - /* the fun part */ - - if(hash_local && strcmp(hash_orig, hash_local) == 0) { - /* installed file has NOT been changed by user */ - if(hash_pkg && strcmp(hash_orig, hash_pkg) != 0) { - _alpm_log(handle, ALPM_LOG_DEBUG, "action: installing new file: %s\n", - entryname_orig); - if(try_rename(handle, checkfile, filename)) { - errors++; - } - } else { - /* no sense in installing the same file twice, install - * ONLY if the original and package hashes differ */ - _alpm_log(handle, ALPM_LOG_DEBUG, "action: leaving existing file in place\n"); - unlink(checkfile); - } - } else if(hash_pkg && strcmp(hash_orig, hash_pkg) == 0) { - /* originally installed file and new file are the same - this - * implies the case above failed - i.e. the file was changed by a - * user */ - _alpm_log(handle, ALPM_LOG_DEBUG, "action: leaving existing file in place\n"); - unlink(checkfile); - } else if(hash_local && hash_pkg && strcmp(hash_local, hash_pkg) == 0) { - /* this would be magical. The above two cases failed, but the - * user changes just so happened to make the new file exactly the - * same as the one in the package... skip it */ - _alpm_log(handle, ALPM_LOG_DEBUG, "action: leaving existing file in place\n"); - unlink(checkfile); - } else { - char *newpath; - size_t newlen = strlen(filename) + 8; - _alpm_log(handle, ALPM_LOG_DEBUG, "action: keeping current file and installing" - " new one with .pacnew ending\n"); - MALLOC(newpath, newlen, - errors++; handle->pm_errno = ALPM_ERR_MEMORY; goto needbackup_cleanup); - snprintf(newpath, newlen, "%s.pacnew", filename); - if(try_rename(handle, checkfile, newpath)) { - errors++; - } else { - _alpm_log(handle, ALPM_LOG_WARNING, _("%s installed as %s\n"), - filename, newpath); - alpm_logaction(handle, ALPM_CALLER_PREFIX, - "warning: %s installed as %s\n", filename, newpath); - } - free(newpath); - } + free(newpath); } needbackup_cleanup: -- 1.8.2.2

3 5

[pacman-dev] [PATCH] makepkg: add support for CARCH environment var
by Allan McRae 18 May '13

18 May '13

From: Phillip Smith <fukawi2(a)gmail.com> Add support for overriding configuration in /etc/makepkg.conf and ~/.makepkg.conf by setting the environment variable CARCH similar to how SRCDEST and PKGDEST behave. Fixes FS#35030. --- Sending to mailing list for reference. doc/makepkg.8.txt | 4 ++++ scripts/makepkg.sh.in | 2 ++ 2 files changed, 6 insertions(+) diff --git a/doc/makepkg.8.txt b/doc/makepkg.8.txt index ecee63a..5716202 100644 --- a/doc/makepkg.8.txt +++ b/doc/makepkg.8.txt @@ -223,6 +223,10 @@ Environment Variables Folder where the package will be built. Overrides the corresponding value defined in linkman:makepkg.conf[5]. +**CARCH=**"(i686|x86_64)":: + Force build for a specific architecture. Useful for cross-compiling. + Overrides the corresponding value defined in linkman:makepkg.conf[5]. + Configuration ------------- See linkman:makepkg.conf[5] for more details on configuring makepkg using the diff --git a/scripts/makepkg.sh.in b/scripts/makepkg.sh.in index da620a4..50bf41d 100644 --- a/scripts/makepkg.sh.in +++ b/scripts/makepkg.sh.in @@ -2604,6 +2604,7 @@ trap 'trap_exit USR1 "$(gettext "An unknown error has occurred. Exiting...")"' E [[ -n ${SRCEXT} ]] && _SRCEXT=${SRCEXT} [[ -n ${GPGKEY} ]] && _GPGKEY=${GPGKEY} [[ -n ${PACKAGER} ]] && _PACKAGER=${PACKAGER} +[[ -n ${CARCH} ]] && _CARCH=${CARCH} # default config is makepkg.conf MAKEPKG_CONF=${MAKEPKG_CONF:-$confdir/makepkg.conf} @@ -2703,6 +2704,7 @@ PKGEXT=${_PKGEXT:-$PKGEXT} SRCEXT=${_SRCEXT:-$SRCEXT} GPGKEY=${_GPGKEY:-$GPGKEY} PACKAGER=${_PACKAGER:-$PACKAGER} +CARCH=${_CARCH:-$CARCH} if (( ! INFAKEROOT )); then if (( EUID == 0 && ! ASROOT )); then -- 1.8.2.1

1 0

[pacman-dev] [PATCH] Clean partial downloads from cache
by Allan McRae 18 May '13

18 May '13

When using "pacman -Sc" to clean the cache, it make sense to also remove partially downloaded files. Fixes FS#34317. Signed-off-by: Allan McRae <allan(a)archlinux.org> --- src/pacman/sync.c | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/src/pacman/sync.c b/src/pacman/sync.c index e8da346..2093029 100644 --- a/src/pacman/sync.c +++ b/src/pacman/sync.c @@ -238,9 +238,7 @@ static int sync_cleancache(int level) /* skip source packages within the cache directory */ "*.src.tar.*", /* skip package deltas, we aren't smart enough to clean these yet */ - "*.delta", - /* skip any partial downloads */ - "*.part" + "*.delta" }; size_t j; -- 1.8.2.3

1 0

[pacman-dev] [PATCH] makepkg: Use LOGDEST for logpipe
by Allan McRae 18 May '13

18 May '13

If LOGDEST is set, we may not check that $startdir is writable. Store the log pipe in LOGDEST instead. Signed-off-by: Allan McRae <allan(a)archlinux.org> --- For maint. scripts/makepkg.sh.in | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/scripts/makepkg.sh.in b/scripts/makepkg.sh.in index c311c30..9f7707c 100644 --- a/scripts/makepkg.sh.in +++ b/scripts/makepkg.sh.in @@ -1463,7 +1463,7 @@ run_function() { fi # ensure overridden package variables survive tee with split packages - logpipe=$(mktemp -u "$startdir/logpipe.XXXXXXXX") + logpipe=$(mktemp -u "$LOGDEST/logpipe.XXXXXXXX") mkfifo "$logpipe" tee "$BUILDLOG" < "$logpipe" & local teepid=$! -- 1.8.2.3

1 0

[pacman-dev] [PATCH] Fix comment typo
by Allan McRae 18 May '13

18 May '13

Signed-off-by: Allan McRae <allan(a)archlinux.org> --- lib/libalpm/deps.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/libalpm/deps.c b/lib/libalpm/deps.c index 96c49a9..6d43dd0 100644 --- a/lib/libalpm/deps.c +++ b/lib/libalpm/deps.c @@ -488,7 +488,7 @@ alpm_depend_t *_alpm_dep_dup(const alpm_depend_t *dep) /* These parameters are messy. We check if this package, given a list of * targets and a db is safe to remove. We do NOT remove it if it is in the - * target list, or if if the package was explicitly installed and + * target list, or if the package was explicitly installed and * include_explicit == 0 */ static int can_remove_package(alpm_db_t *db, alpm_pkg_t *pkg, alpm_list_t *targets, int include_explicit) -- 1.8.2.3

1 0

[pacman-dev] [RFC][PATCH] makepkg: remove sourcing PKGBUILD from stdin
by Allan McRae 18 May '13

18 May '13

Using PKGBUILDs from stdin means that we can not use pkgver() in packages. Given we have the "-p" option to pass any file to makepkg and passing a PKGBUILD in the form "cat foo | makepkg" does not work, this feature is unneeded. Signed-off-by: Allan McRae <allan(a)archlinux.org> --- Any objections to this? scripts/makepkg.sh.in | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) diff --git a/scripts/makepkg.sh.in b/scripts/makepkg.sh.in index b85b87e..c311c30 100644 --- a/scripts/makepkg.sh.in +++ b/scripts/makepkg.sh.in @@ -2760,14 +2760,8 @@ unset makedepends optdepends options noextract BUILDFILE=${BUILDFILE:-$BUILDSCRIPT} if [[ ! -f $BUILDFILE ]]; then - if [[ -t 0 ]]; then - error "$(gettext "%s does not exist.")" "$BUILDFILE" - exit 1 - else - # PKGBUILD passed through a pipe - BUILDFILE=/dev/stdin - source_safe "$BUILDFILE" - fi + error "$(gettext "%s does not exist.")" "$BUILDFILE" + exit 1 else if [[ $(<"$BUILDFILE") = *$'\r'* ]]; then error "$(gettext "%s contains %s characters and cannot be sourced.")" "$BUILDFILE" "CRLF" -- 1.8.2.3

1 0